Hex Artifact Content
Not logged in

Artifact 3d15ff20e76164b83101d0ebb98e6f6c64de1b1b:


0000: 69 6d 70 6f 72 74 20 67 61 6d 65 3b 0a 69 6d 70  import game;.imp
0010: 6f 72 74 20 75 74 69 6c 3b 0a 0a 69 6e 74 65 72  ort util;..inter
0020: 66 61 63 65 20 47 61 6d 65 4f 62 73 65 72 76 65  face GameObserve
0030: 72 0a 7b 0a 09 2f 2f 20 74 68 69 73 28 69 6e 20  r.{..// this(in 
0040: 47 61 6d 65 20 67 29 3b 0a 09 76 6f 69 64 20 6f  Game g);..void o
0050: 6e 5f 67 61 6d 65 5f 63 68 61 6e 67 65 64 28 63  n_game_changed(c
0060: 68 61 72 20 63 2c 20 69 6e 20 47 61 6d 65 20 67  har c, in Game g
0070: 2c 20 62 6f 6f 6c 20 66 69 6e 69 73 68 65 64 29  , bool finished)
0080: 3b 0a 7d 0a 0a 63 6c 61 73 73 20 44 72 69 76 65  ;.}..class Drive
0090: 72 0a 7b 0a 09 74 68 69 73 28 47 61 6d 65 20 67  r.{..this(Game g
00a0: 29 20 7b 20 74 68 69 73 2e 67 61 6d 65 20 3d 20  ) { this.game = 
00b0: 67 3b 20 7d 0a 09 74 68 69 73 28 46 69 6c 65 20  g; }..this(File 
00c0: 67 61 6d 65 5f 64 61 74 61 29 20 7b 20 74 68 69  game_data) { thi
00d0: 73 28 6e 65 77 20 47 61 6d 65 28 67 61 6d 65 5f  s(new Game(game_
00e0: 64 61 74 61 29 29 3b 20 7d 0a 0a 09 76 6f 69 64  data)); }...void
00f0: 20 63 6f 6d 6d 61 6e 64 28 63 68 61 72 20 63 29   command(char c)
0100: 0a 09 7b 0a 09 09 69 66 28 20 66 69 6e 69 73 68  ..{...if( finish
0110: 65 64 20 29 0a 09 09 09 72 65 74 75 72 6e 3b 0a  ed )....return;.
0120: 09 09 69 66 28 20 63 20 3d 3d 20 27 41 27 20 29  ..if( c == 'A' )
0130: 0a 09 09 09 61 62 6f 72 74 65 64 20 3d 20 74 72  ....aborted = tr
0140: 75 65 3b 0a 09 09 65 6c 73 65 0a 09 09 09 67 61  ue;...else....ga
0150: 6d 65 2e 63 6f 6d 6d 61 6e 64 28 63 29 3b 0a 09  me.command(c);..
0160: 09 66 6f 72 65 61 63 68 28 6f 62 3b 20 6f 62 73  .foreach(ob; obs
0170: 65 72 76 65 72 73 29 0a 09 09 09 6f 62 2e 6f 6e  ervers)....ob.on
0180: 5f 67 61 6d 65 5f 63 68 61 6e 67 65 64 28 63 2c  _game_changed(c,
0190: 20 67 61 6d 65 2c 20 66 69 6e 69 73 68 65 64 29   game, finished)
01a0: 3b 0a 09 7d 0a 0a 09 54 20 61 64 64 4f 62 73 65  ;..}...T addObse
01b0: 72 76 65 72 28 54 29 28 29 0a 09 7b 0a 09 09 54  rver(T)()..{...T
01c0: 20 74 20 3d 20 6e 65 77 20 54 28 67 61 6d 65 29   t = new T(game)
01d0: 3b 0a 09 09 6f 62 73 65 72 76 65 72 73 20 7e 3d  ;...observers ~=
01e0: 20 74 3b 0a 09 09 72 65 74 75 72 6e 20 74 3b 0a   t;...return t;.
01f0: 09 7d 0a 0a 09 40 70 72 6f 70 65 72 74 79 20 62  .}...@property b
0200: 6f 6f 6c 20 66 69 6e 69 73 68 65 64 28 29 0a 09  ool finished()..
0210: 7b 0a 09 09 72 65 74 75 72 6e 20 67 61 6d 65 2e  {...return game.
0220: 63 6c 65 61 72 65 64 20 7c 7c 20 67 61 6d 65 2e  cleared || game.
0230: 64 65 61 64 20 7c 7c 20 61 62 6f 72 74 65 64 3b  dead || aborted;
0240: 0a 09 7d 0a 0a 70 72 69 76 61 74 65 3a 0a 09 47  ..}..private:..G
0250: 61 6d 65 20 20 20 20 20 20 20 20 20 20 20 67 61  ame           ga
0260: 6d 65 3b 0a 09 47 61 6d 65 4f 62 73 65 72 76 65  me;..GameObserve
0270: 72 5b 5d 20 6f 62 73 65 72 76 65 72 73 3b 0a 09  r[] observers;..
0280: 62 6f 6f 6c 20 20 20 20 20 20 20 20 20 20 20 61  bool           a
0290: 62 6f 72 74 65 64 20 3d 20 66 61 6c 73 65 3b 0a  borted = false;.
02a0: 7d 0a 0a 75 6e 69 74 74 65 73 74 0a 7b 0a 09 73  }..unittest.{..s
02b0: 74 61 74 69 63 20 63 6c 61 73 73 20 4d 6f 63 6b  tatic class Mock
02c0: 47 61 6d 65 20 3a 20 47 61 6d 65 20 7b 0a 09 09  Game : Game {...
02d0: 74 68 69 73 28 29 20 7b 20 73 75 70 65 72 28 6e  this() { super(n
02e0: 75 6c 6c 2c 6e 75 6c 6c 2c 6e 75 6c 6c 29 3b 20  ull,null,null); 
02f0: 7d 0a 09 09 73 74 72 69 6e 67 20 6c 6f 67 3b 0a  }...string log;.
0300: 09 09 76 6f 69 64 20 63 6f 6d 6d 61 6e 64 28 63  ..void command(c
0310: 68 61 72 20 63 29 20 7b 20 6c 6f 67 20 7e 3d 20  har c) { log ~= 
0320: 63 3b 20 7d 0a 09 7d 0a 09 73 74 61 74 69 63 20  c; }..}..static 
0330: 63 6c 61 73 73 20 4d 6f 63 6b 4f 62 73 65 72 76  class MockObserv
0340: 65 72 20 3a 20 47 61 6d 65 4f 62 73 65 72 76 65  er : GameObserve
0350: 72 20 7b 0a 09 09 73 74 72 69 6e 67 20 6c 6f 67  r {...string log
0360: 3b 0a 09 09 74 68 69 73 28 69 6e 20 47 61 6d 65  ;...this(in Game
0370: 20 67 29 20 7b 7d 0a 09 09 76 6f 69 64 20 6f 6e   g) {}...void on
0380: 5f 67 61 6d 65 5f 63 68 61 6e 67 65 64 28 63 68  _game_changed(ch
0390: 61 72 20 63 2c 20 69 6e 20 47 61 6d 65 20 67 2c  ar c, in Game g,
03a0: 20 62 6f 6f 6c 20 66 69 6e 29 20 7b 20 6c 6f 67   bool fin) { log
03b0: 7e 3d 63 3b 20 69 66 28 66 69 6e 29 6c 6f 67 7e  ~=c; if(fin)log~
03c0: 3d 22 24 22 3b 20 7d 0a 09 7d 0a 0a 09 61 75 74  ="$"; }..}...aut
03d0: 6f 20 67 20 3d 20 6e 65 77 20 4d 6f 63 6b 47 61  o g = new MockGa
03e0: 6d 65 3b 0a 09 61 75 74 6f 20 64 20 3d 20 6e 65  me;..auto d = ne
03f0: 77 20 44 72 69 76 65 72 28 67 29 3b 0a 09 61 75  w Driver(g);..au
0400: 74 6f 20 6f 20 3d 20 64 2e 61 64 64 4f 62 73 65  to o = d.addObse
0410: 72 76 65 72 21 4d 6f 63 6b 4f 62 73 65 72 76 65  rver!MockObserve
0420: 72 28 29 3b 0a 09 66 6f 72 65 61 63 68 28 63 68  r();..foreach(ch
0430: 61 72 20 63 3b 20 22 55 44 4c 52 53 41 55 44 4c  ar c; "UDLRSAUDL
0440: 52 53 41 22 29 0a 09 09 64 2e 63 6f 6d 6d 61 6e  RSA")...d.comman
0450: 64 28 63 29 3b 0a 09 61 73 73 65 72 74 28 67 2e  d(c);..assert(g.
0460: 6c 6f 67 20 3d 3d 20 22 55 44 4c 52 53 22 29 3b  log == "UDLRS");
0470: 0a 09 61 73 73 65 72 74 28 6f 2e 6c 6f 67 20 3d  ..assert(o.log =
0480: 3d 20 22 55 44 4c 52 53 41 24 22 29 3b 0a 7d 0a  = "UDLRSA$");.}.