Artifact 7fa423ba9f8ebe9224348f3411b029f37b2176c0:
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 63 6f 6e 73 74 28 r.{..this(const(
0070: 47 61 6d 65 29 20 67 29 20 7b 7d 0a 09 6f 76 65 Game) g) {}..ove
0080: 72 72 69 64 65 20 76 6f 69 64 20 6f 6e 5f 67 61 rride void on_ga
0090: 6d 65 5f 63 68 61 6e 67 65 64 28 63 68 61 72 20 me_changed(char
00a0: 63 2c 20 63 6f 6e 73 74 28 47 61 6d 65 29 20 67 c, const(Game) g
00b0: 2c 20 62 6f 6f 6c 20 66 69 6e 69 73 68 65 64 29 , bool finished)
00c0: 20 7b 7d 0a 7d 0a 0a 63 6c 61 73 73 20 53 74 64 {}.}..class Std
00d0: 4f 75 74 70 75 74 20 3a 20 47 61 6d 65 4f 62 73 Output : GameObs
00e0: 65 72 76 65 72 0a 7b 0a 09 74 68 69 73 28 63 6f erver.{..this(co
00f0: 6e 73 74 28 47 61 6d 65 29 20 67 29 20 7b 7d 0a nst(Game) g) {}.
0100: 09 6f 76 65 72 72 69 64 65 20 76 6f 69 64 20 6f .override void o
0110: 6e 5f 67 61 6d 65 5f 63 68 61 6e 67 65 64 28 63 n_game_changed(c
0120: 68 61 72 20 63 2c 20 63 6f 6e 73 74 28 47 61 6d har c, const(Gam
0130: 65 29 20 67 2c 20 62 6f 6f 6c 20 66 69 6e 69 73 e) g, bool finis
0140: 68 65 64 29 0a 09 7b 0a 09 09 73 74 64 6f 75 74 hed)..{...stdout
0150: 2e 77 72 69 74 65 28 63 29 3b 0a 09 09 73 74 64 .write(c);...std
0160: 6f 75 74 2e 66 6c 75 73 68 28 29 3b 0a 09 7d 0a out.flush();..}.
0170: 7d 0a 0a 63 6c 61 73 73 20 47 75 61 72 64 65 64 }..class Guarded
0180: 4f 75 74 70 75 74 20 3a 20 47 61 6d 65 4f 62 73 Output : GameObs
0190: 65 72 76 65 72 0a 7b 0a 09 74 68 69 73 28 63 6f erver.{..this(co
01a0: 6e 73 74 28 47 61 6d 65 29 20 67 29 0a 09 7b 0a nst(Game) g)..{.
01b0: 09 09 73 65 74 75 70 5f 73 69 67 69 6e 74 5f 68 ..setup_sigint_h
01c0: 61 6e 64 6c 69 6e 67 28 29 3b 0a 09 09 69 64 65 andling();...ide
01d0: 61 6c 5f 6c 6f 67 20 7e 3d 20 67 2e 73 63 6f 72 al_log ~= g.scor
01e0: 65 5f 69 66 5f 61 62 6f 72 74 5f 6e 6f 77 3b 0a e_if_abort_now;.
01f0: 09 7d 0a 0a 09 6f 76 65 72 72 69 64 65 20 76 6f .}...override vo
0200: 69 64 20 6f 6e 5f 67 61 6d 65 5f 63 68 61 6e 67 id on_game_chang
0210: 65 64 28 63 68 61 72 20 63 2c 20 63 6f 6e 73 74 ed(char c, const
0220: 28 47 61 6d 65 29 20 67 2c 20 62 6f 6f 6c 20 66 (Game) g, bool f
0230: 69 6e 69 73 68 65 64 29 0a 09 7b 0a 09 09 6c 6f inished)..{...lo
0240: 67 20 7e 3d 20 63 3b 0a 09 09 73 63 6f 72 65 5f g ~= c;...score_
0250: 6c 6f 67 20 7e 3d 20 67 2e 73 63 6f 72 65 3b 0a log ~= g.score;.
0260: 09 09 69 64 65 61 6c 5f 6c 6f 67 20 7e 3d 20 67 ..ideal_log ~= g
0270: 2e 73 63 6f 72 65 5f 69 66 5f 61 62 6f 72 74 5f .score_if_abort_
0280: 6e 6f 77 3b 0a 09 09 69 66 28 66 69 6e 69 73 68 now;...if(finish
0290: 65 64 29 0a 09 09 09 66 6c 75 73 68 28 29 3b 0a ed)....flush();.
02a0: 09 7d 0a 0a 70 72 69 76 61 74 65 3a 0a 09 73 74 .}..private:..st
02b0: 72 69 6e 67 20 6c 6f 67 3b 0a 09 6c 6f 6e 67 5b ring log;..long[
02c0: 5d 20 73 63 6f 72 65 5f 6c 6f 67 3b 0a 09 6c 6f ] score_log;..lo
02d0: 6e 67 5b 5d 20 69 64 65 61 6c 5f 6c 6f 67 3b 0a ng[] ideal_log;.
02e0: 0a 09 76 6f 69 64 20 66 6c 75 73 68 28 29 0a 09 ..void flush()..
02f0: 7b 0a 09 09 54 75 70 6c 65 21 28 6c 6f 6e 67 2c {...Tuple!(long,
0300: 20 69 6e 74 2c 20 69 6e 74 29 20 63 61 6e 64 3b int, int) cand;
0310: 0a 09 09 63 61 6e 64 5b 30 5d 20 3d 20 6c 6f 6e ...cand[0] = lon
0320: 67 2e 6d 69 6e 3b 0a 0a 09 09 66 6f 72 28 69 6e g.min;....for(in
0330: 74 20 69 3d 30 3b 20 69 3c 73 63 6f 72 65 5f 6c t i=0; i<score_l
0340: 6f 67 2e 6c 65 6e 67 74 68 3b 20 2b 2b 69 29 0a og.length; ++i).
0350: 09 09 09 69 66 28 63 61 6e 64 5b 30 5d 20 3c 20 ...if(cand[0] <
0360: 73 63 6f 72 65 5f 6c 6f 67 5b 69 5d 29 09 0a 09 score_log[i])...
0370: 09 09 09 63 61 6e 64 20 3d 20 74 75 70 6c 65 28 ...cand = tuple(
0380: 73 63 6f 72 65 5f 6c 6f 67 5b 69 5d 2c 69 2c 30 score_log[i],i,0
0390: 29 3b 0a 09 09 66 6f 72 28 69 6e 74 20 69 3d 30 );...for(int i=0
03a0: 3b 20 69 3c 69 64 65 61 6c 5f 6c 6f 67 2e 6c 65 ; i<ideal_log.le
03b0: 6e 67 74 68 3b 20 2b 2b 69 29 0a 09 09 09 69 66 ngth; ++i)....if
03c0: 28 63 61 6e 64 5b 30 5d 20 3c 20 69 64 65 61 6c (cand[0] < ideal
03d0: 5f 6c 6f 67 5b 69 5d 29 09 0a 09 09 09 09 63 61 _log[i])......ca
03e0: 6e 64 20 3d 20 74 75 70 6c 65 28 69 64 65 61 6c nd = tuple(ideal
03f0: 5f 6c 6f 67 5b 69 5d 2c 69 2c 31 29 3b 0a 0a 09 _log[i],i,1);...
0400: 09 69 66 28 63 61 6e 64 5b 32 5d 3d 3d 30 29 20 .if(cand[2]==0)
0410: 7b 0a 09 09 09 73 74 72 69 6e 67 20 73 74 72 20 {....string str
0420: 3d 20 6c 6f 67 5b 30 2e 2e 63 61 6e 64 5b 31 5d = log[0..cand[1]
0430: 2b 31 5d 3b 0a 09 09 09 73 74 64 2e 63 2e 73 74 +1];....std.c.st
0440: 64 69 6f 2e 70 72 69 6e 74 66 28 22 25 2e 2a 73 dio.printf("%.*s
0450: 5c 6e 22 2c 20 73 74 72 2e 6c 65 6e 67 74 68 2c \n", str.length,
0460: 20 73 74 72 2e 70 74 72 29 3b 0a 09 09 7d 20 65 str.ptr);...} e
0470: 6c 73 65 20 7b 0a 09 09 09 73 74 72 69 6e 67 20 lse {....string
0480: 73 74 72 20 3d 20 6c 6f 67 5b 30 2e 2e 63 61 6e str = log[0..can
0490: 64 5b 31 5d 5d 3b 0a 09 09 09 73 74 64 2e 63 2e d[1]];....std.c.
04a0: 73 74 64 69 6f 2e 70 72 69 6e 74 66 28 22 25 2e stdio.printf("%.
04b0: 2a 73 41 5c 6e 22 2c 20 73 74 72 2e 6c 65 6e 67 *sA\n", str.leng
04c0: 74 68 2c 20 73 74 72 2e 70 74 72 29 3b 0a 09 09 th, str.ptr);...
04d0: 7d 0a 09 09 73 74 64 2e 63 2e 73 74 64 69 6f 2e }...std.c.stdio.
04e0: 66 66 6c 75 73 68 28 73 74 64 2e 63 2e 73 74 64 fflush(std.c.std
04f0: 69 6f 2e 73 74 64 6f 75 74 29 3b 0a 09 7d 0a 0a io.stdout);..}..
0500: 70 72 69 76 61 74 65 3a 0a 09 73 74 61 74 69 63 private:..static
0510: 20 5f 5f 67 73 68 61 72 65 64 20 47 75 61 72 64 __gshared Guard
0520: 65 64 4f 75 74 70 75 74 20 67 5f 6f 75 74 70 75 edOutput g_outpu
0530: 74 3b 0a 0a 09 76 6f 69 64 20 73 65 74 75 70 5f t;...void setup_
0540: 73 69 67 69 6e 74 5f 68 61 6e 64 6c 69 6e 67 28 sigint_handling(
0550: 29 0a 09 7b 0a 09 09 61 73 73 65 72 74 28 67 5f )..{...assert(g_
0560: 6f 75 74 70 75 74 20 69 73 20 6e 75 6c 6c 29 3b output is null);
0570: 0a 09 09 67 5f 6f 75 74 70 75 74 20 3d 20 74 68 ...g_output = th
0580: 69 73 3b 0a 09 09 65 78 74 65 72 6e 28 43 29 20 is;...extern(C)
0590: 73 74 61 74 69 63 20 76 6f 69 64 20 63 61 74 63 static void catc
05a0: 68 5f 73 69 67 69 6e 74 28 69 6e 74 29 20 7b 20 h_sigint(int) {
05b0: 67 5f 6f 75 74 70 75 74 2e 66 6c 75 73 68 28 29 g_output.flush()
05c0: 3b 20 61 70 70 6c 69 63 61 74 69 6f 6e 5f 65 78 ; application_ex
05d0: 69 74 28 29 3b 20 7d 0a 09 09 63 6f 72 65 2e 73 it(); }...core.s
05e0: 74 64 63 2e 73 69 67 6e 61 6c 2e 73 69 67 6e 61 tdc.signal.signa
05f0: 6c 28 53 49 47 49 4e 54 2c 20 26 63 61 74 63 68 l(SIGINT, &catch
0600: 5f 73 69 67 69 6e 74 29 3b 0a 09 7d 0a 7d 0a _sigint);..}.}.