Hex Artifact Content
Not logged in

Artifact ac9f211f019469de79f969d129feae5c68ea1c68:


0000: 69 6d 70 6f 72 74 20 75 74 69 6c 3b 0a 69 6d 70  import util;.imp
0010: 6f 72 74 20 67 61 6d 65 3b 0a 69 6d 70 6f 72 74  ort game;.import
0020: 20 64 72 69 76 65 72 3b 0a 69 6d 70 6f 72 74 20   driver;.import 
0030: 63 6f 72 65 2e 73 74 64 63 2e 73 69 67 6e 61 6c  core.stdc.signal
0040: 3b 0a 0a 63 6c 61 73 73 20 4e 69 6c 4f 75 74 70  ;..class NilOutp
0050: 75 74 20 3a 20 47 61 6d 65 4f 62 73 65 72 76 65  ut : GameObserve
0060: 72 0a 7b 0a 09 74 68 69 73 28 69 6e 20 47 61 6d  r.{..this(in Gam
0070: 65 20 67 29 20 7b 7d 0a 09 6f 76 65 72 72 69 64  e g) {}..overrid
0080: 65 20 76 6f 69 64 20 6f 6e 5f 67 61 6d 65 5f 63  e void on_game_c
0090: 68 61 6e 67 65 64 28 63 68 61 72 20 63 2c 20 69  hanged(char c, i
00a0: 6e 20 47 61 6d 65 20 67 2c 20 62 6f 6f 6c 20 66  n Game g, bool f
00b0: 69 6e 69 73 68 65 64 29 20 7b 7d 0a 7d 0a 0a 63  inished) {}.}..c
00c0: 6c 61 73 73 20 53 74 64 4f 75 74 70 75 74 20 3a  lass StdOutput :
00d0: 20 47 61 6d 65 4f 62 73 65 72 76 65 72 0a 7b 0a   GameObserver.{.
00e0: 09 74 68 69 73 28 69 6e 20 47 61 6d 65 20 67 29  .this(in Game g)
00f0: 20 7b 7d 0a 09 6f 76 65 72 72 69 64 65 20 76 6f   {}..override vo
0100: 69 64 20 6f 6e 5f 67 61 6d 65 5f 63 68 61 6e 67  id on_game_chang
0110: 65 64 28 63 68 61 72 20 63 2c 20 69 6e 20 47 61  ed(char c, in Ga
0120: 6d 65 20 67 2c 20 62 6f 6f 6c 20 66 69 6e 69 73  me g, bool finis
0130: 68 65 64 29 0a 09 7b 0a 09 09 73 74 64 6f 75 74  hed)..{...stdout
0140: 2e 77 72 69 74 65 28 63 29 3b 0a 09 09 73 74 64  .write(c);...std
0150: 6f 75 74 2e 66 6c 75 73 68 28 29 3b 0a 09 7d 0a  out.flush();..}.
0160: 7d 0a 0a 63 6c 61 73 73 20 47 75 61 72 64 65 64  }..class Guarded
0170: 4f 75 74 70 75 74 20 3a 20 47 61 6d 65 4f 62 73  Output : GameObs
0180: 65 72 76 65 72 0a 7b 0a 09 74 68 69 73 28 69 6e  erver.{..this(in
0190: 20 47 61 6d 65 20 67 29 0a 09 7b 0a 09 09 73 65   Game g)..{...se
01a0: 74 75 70 5f 73 69 67 69 6e 74 5f 68 61 6e 64 6c  tup_sigint_handl
01b0: 69 6e 67 28 29 3b 0a 09 09 73 63 6f 72 65 5f 6c  ing();...score_l
01c0: 6f 67 20 7e 3d 20 67 2e 73 63 6f 72 65 3b 0a 09  og ~= g.score;..
01d0: 09 66 6c 75 73 68 65 64 20 3d 20 66 61 6c 73 65  .flushed = false
01e0: 3b 0a 09 7d 0a 0a 09 6f 76 65 72 72 69 64 65 20  ;..}...override 
01f0: 76 6f 69 64 20 6f 6e 5f 67 61 6d 65 5f 63 68 61  void on_game_cha
0200: 6e 67 65 64 28 63 68 61 72 20 63 2c 20 69 6e 20  nged(char c, in 
0210: 47 61 6d 65 20 67 2c 20 62 6f 6f 6c 20 66 69 6e  Game g, bool fin
0220: 69 73 68 65 64 29 0a 09 7b 0a 09 09 69 66 28 66  ished)..{...if(f
0230: 6c 75 73 68 65 64 29 0a 09 09 09 72 65 74 75 72  lushed)....retur
0240: 6e 3b 0a 0a 09 09 6c 6f 67 20 7e 3d 20 63 3b 0a  n;....log ~= c;.
0250: 09 09 73 63 6f 72 65 5f 6c 6f 67 20 7e 3d 20 67  ..score_log ~= g
0260: 2e 73 63 6f 72 65 3b 0a 09 09 69 66 28 66 69 6e  .score;...if(fin
0270: 69 73 68 65 64 20 7c 7c 20 6c 6f 67 2e 6c 65 6e  ished || log.len
0280: 67 74 68 2b 31 3d 3d 67 2e 6d 61 70 2e 57 2a 67  gth+1==g.map.W*g
0290: 2e 6d 61 70 2e 48 29 0a 09 09 09 66 6c 75 73 68  .map.H)....flush
02a0: 28 29 3b 0a 09 09 69 66 28 6c 6f 67 2e 6c 65 6e  ();...if(log.len
02b0: 67 74 68 2b 31 3d 3d 67 2e 6d 61 70 2e 57 2a 67  gth+1==g.map.W*g
02c0: 2e 6d 61 70 2e 48 29 0a 09 09 09 61 70 70 6c 69  .map.H)....appli
02d0: 63 61 74 69 6f 6e 5f 65 78 69 74 28 29 3b 0a 09  cation_exit();..
02e0: 7d 0a 0a 09 76 6f 69 64 20 73 61 66 65 74 79 5f  }...void safety_
02f0: 64 61 74 61 28 73 74 72 69 6e 67 20 73 5f 6c 6f  data(string s_lo
0300: 67 2c 20 6c 6f 6e 67 5b 5d 20 73 5f 73 63 6f 72  g, long[] s_scor
0310: 65 5f 6c 6f 67 29 20 7b 0a 09 09 74 68 69 73 2e  e_log) {...this.
0320: 73 5f 6c 6f 67 20 3d 20 73 5f 6c 6f 67 3b 0a 09  s_log = s_log;..
0330: 09 74 68 69 73 2e 73 5f 73 63 6f 72 65 5f 6c 6f  .this.s_score_lo
0340: 67 20 3d 20 73 5f 73 63 6f 72 65 5f 6c 6f 67 3b  g = s_score_log;
0350: 0a 09 7d 0a 0a 70 72 69 76 61 74 65 3a 0a 09 73  ..}..private:..s
0360: 74 72 69 6e 67 20 6c 6f 67 3b 0a 09 6c 6f 6e 67  tring log;..long
0370: 5b 5d 20 73 63 6f 72 65 5f 6c 6f 67 3b 0a 09 62  [] score_log;..b
0380: 6f 6f 6c 20 20 20 66 6c 75 73 68 65 64 3b 0a 0a  ool   flushed;..
0390: 09 73 74 72 69 6e 67 20 73 5f 6c 6f 67 3b 0a 09  .string s_log;..
03a0: 6c 6f 6e 67 5b 5d 20 73 5f 73 63 6f 72 65 5f 6c  long[] s_score_l
03b0: 6f 67 3b 0a 0a 09 76 6f 69 64 20 66 6c 75 73 68  og;...void flush
03c0: 28 29 20 6e 6f 74 68 72 6f 77 0a 09 7b 0a 09 09  () nothrow..{...
03d0: 69 66 28 66 6c 75 73 68 65 64 29 0a 09 09 09 72  if(flushed)....r
03e0: 65 74 75 72 6e 3b 0a 0a 09 09 54 75 70 6c 65 21  eturn;....Tuple!
03f0: 28 6c 6f 6e 67 2c 20 69 6e 74 2c 20 69 6d 6d 75  (long, int, immu
0400: 74 61 62 6c 65 28 63 68 61 72 29 2a 29 20 63 61  table(char)*) ca
0410: 6e 64 3b 0a 09 09 63 61 6e 64 5b 30 5d 20 3d 20  nd;...cand[0] = 
0420: 6c 6f 6e 67 2e 6d 69 6e 3b 0a 0a 09 09 66 6f 72  long.min;....for
0430: 28 69 6e 74 20 69 3d 30 3b 20 69 3c 73 63 6f 72  (int i=0; i<scor
0440: 65 5f 6c 6f 67 2e 6c 65 6e 67 74 68 3b 20 2b 2b  e_log.length; ++
0450: 69 29 0a 09 09 09 69 66 28 63 61 6e 64 5b 30 5d  i)....if(cand[0]
0460: 20 3c 20 73 63 6f 72 65 5f 6c 6f 67 5b 69 5d 29   < score_log[i])
0470: 09 0a 09 09 09 09 63 61 6e 64 20 3d 20 74 75 70  ......cand = tup
0480: 6c 65 28 73 63 6f 72 65 5f 6c 6f 67 5b 69 5d 2c  le(score_log[i],
0490: 69 2c 6c 6f 67 2e 70 74 72 29 3b 0a 09 09 66 6f  i,log.ptr);...fo
04a0: 72 28 69 6e 74 20 69 3d 30 3b 20 69 3c 73 5f 73  r(int i=0; i<s_s
04b0: 63 6f 72 65 5f 6c 6f 67 2e 6c 65 6e 67 74 68 3b  core_log.length;
04c0: 20 2b 2b 69 29 0a 09 09 09 69 66 28 63 61 6e 64   ++i)....if(cand
04d0: 5b 30 5d 20 3c 20 73 5f 73 63 6f 72 65 5f 6c 6f  [0] < s_score_lo
04e0: 67 5b 69 5d 29 09 0a 09 09 09 09 63 61 6e 64 20  g[i])......cand 
04f0: 3d 20 74 75 70 6c 65 28 73 5f 73 63 6f 72 65 5f  = tuple(s_score_
0500: 6c 6f 67 5b 69 5d 2c 69 2c 73 5f 6c 6f 67 2e 70  log[i],i,s_log.p
0510: 74 72 29 3b 0a 0a 09 09 73 74 64 2e 63 2e 73 74  tr);....std.c.st
0520: 64 69 6f 2e 70 72 69 6e 74 66 28 22 25 2e 2a 73  dio.printf("%.*s
0530: 41 5c 6e 22 2c 20 63 61 6e 64 5b 31 5d 2c 20 63  A\n", cand[1], c
0540: 61 6e 64 5b 32 5d 29 3b 0a 09 09 73 74 64 2e 63  and[2]);...std.c
0550: 2e 73 74 64 69 6f 2e 66 66 6c 75 73 68 28 73 74  .stdio.fflush(st
0560: 64 2e 63 2e 73 74 64 69 6f 2e 73 74 64 6f 75 74  d.c.stdio.stdout
0570: 29 3b 0a 09 09 66 6c 75 73 68 65 64 20 3d 20 74  );...flushed = t
0580: 72 75 65 3b 0a 09 7d 0a 0a 70 72 69 76 61 74 65  rue;..}..private
0590: 3a 0a 09 73 74 61 74 69 63 20 5f 5f 67 73 68 61  :..static __gsha
05a0: 72 65 64 20 47 75 61 72 64 65 64 4f 75 74 70 75  red GuardedOutpu
05b0: 74 20 67 5f 6f 75 74 70 75 74 3b 0a 0a 09 76 6f  t g_output;...vo
05c0: 69 64 20 73 65 74 75 70 5f 73 69 67 69 6e 74 5f  id setup_sigint_
05d0: 68 61 6e 64 6c 69 6e 67 28 29 0a 09 7b 0a 09 09  handling()..{...
05e0: 61 73 73 65 72 74 28 67 5f 6f 75 74 70 75 74 20  assert(g_output 
05f0: 69 73 20 6e 75 6c 6c 29 3b 0a 09 09 67 5f 6f 75  is null);...g_ou
0600: 74 70 75 74 20 3d 20 74 68 69 73 3b 0a 09 09 65  tput = this;...e
0610: 78 74 65 72 6e 28 43 29 20 6e 6f 74 68 72 6f 77  xtern(C) nothrow
0620: 20 40 73 79 73 74 65 6d 20 73 74 61 74 69 63 20   @system static 
0630: 76 6f 69 64 20 63 61 74 63 68 5f 73 69 67 69 6e  void catch_sigin
0640: 74 28 69 6e 74 29 20 7b 20 67 5f 6f 75 74 70 75  t(int) { g_outpu
0650: 74 2e 66 6c 75 73 68 28 29 3b 20 61 70 70 6c 69  t.flush(); appli
0660: 63 61 74 69 6f 6e 5f 65 78 69 74 28 29 3b 20 7d  cation_exit(); }
0670: 0a 09 09 63 6f 72 65 2e 73 74 64 63 2e 73 69 67  ...core.stdc.sig
0680: 6e 61 6c 2e 73 69 67 6e 61 6c 28 53 49 47 49 4e  nal.signal(SIGIN
0690: 54 2c 20 26 63 61 74 63 68 5f 73 69 67 69 6e 74  T, &catch_sigint
06a0: 29 3b 0a 09 7d 0a 7d 0a                          );..}.}.