source: roaraudio/plugins/universal/tic-tac-toe.c @ 5823:f9f70dbaa376

Last change on this file since 5823:f9f70dbaa376 was 5823:f9f70dbaa376, checked in by phi, 11 years ago

updated copyright

File size: 10.9 KB
Line 
1//tic-tac-toe.c:
2
3/*
4 *      Copyright (C) Philipp 'ph3-der-loewe' Schafft - 2012-2013
5 *
6 *  This file is part of roard a part of RoarAudio,
7 *  a cross-platform sound system for both, home and professional use.
8 *  See README for details.
9 *
10 *  This file is free software; you can redistribute it and/or modify
11 *  it under the terms of the GNU General Public License version 3
12 *  as published by the Free Software Foundation.
13 *
14 *  RoarAudio is distributed in the hope that it will be useful,
15 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
16 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17 *  GNU General Public License for more details.
18 *
19 *  You should have received a copy of the GNU General Public License
20 *  along with this software; see the file COPYING.  If not, write to
21 *  the Free Software Foundation, 51 Franklin Street, Fifth Floor,
22 *  Boston, MA 02110-1301, USA.
23 *
24 */
25
26#include <roaraudio.h>
27
28#define _FREE     ' '
29#define _PLAYER   'X'
30#define _COMPUTER 'O'
31#define _NOBODY   '#'
32
33#define _DISPLAY \
34/* Bring Telnet in right mode: */ \
35/* IAC WILL ECHO IAC WILL SUPPRESS_GO_AHEAD IAC WONT LINEMODE */ \
36/* 255  251    1 255  251                 3 255  252       34 */ \
37"\377\373\001\377\373\003\377\374\042" \
38"\e[2J\e[H" \
39" Tic Tac Toe\r\n" \
40" (running: %s, API: %s)\r\n" \
41"\r\n" \
42"Game board:     IDs:\r\n"        \
43" %c | %c | %c      7 | 8 | 9\r\n"   \
44"---+---+---     ---+---+---\r\n" \
45" %c | %c | %c      4 | 5 | 6\r\n"   \
46"---+---+---     ---+---+---\r\n" \
47" %c | %c | %c      1 | 2 | 3\r\n"   \
48"\r\n" \
49"%s\r\n"
50#define _DISPLAY_BUFFER_LEN 1024
51
52#define _HELP \
53"\e[2J\e[H" \
54" Tic Tac Toe\r\n" \
55" (running: roard " ROAR_VERSION_STRING ")\r\n" \
56"\r\n" \
57"IDs:            Alternative IDs:\r\n" \
58" 7 | 8 | 9       a | s | d\r\n"   \
59"---+---+---     ---+---+---\r\n"  \
60" 4 | 5 | 6       f |SPC| h\r\n"   \
61"---+---+---     ---+---+---\r\n"  \
62" 1 | 2 | 3       j | k | l\r\n"   \
63"\r\n" \
64"Other keys:\r\n" \
65" q g , .  - Quit\r\n" \
66" n +      - New game\r\n" \
67" H 0      - Help\r\n" \
68" e        - Exit help / Redraw game\r\n" \
69"\r\n" \
70"%s\r\n"
71
72#define MSG__YOUR_TURN       "It's your turn. -- press any ID or H for help, q to quit --"
73#define MSG__CANNOT_PUT_HERE "You can not put your mark here. -- try again another position --"
74#define MSG__WON_PLAYER      "You won. -- press any key to continue or H for help, q to quit --"
75#define MSG__WON_COMPUTER    "I won. -- press any key to continue or H for help, q to quit --"
76#define MSG__WON_NOBODY      "Nobody won. -- press any key to continue or H for help, q to quit --"
77#define MSG__HELP            "-- press e to continue or q to quit --"
78
79typedef char game_state[9];
80
81struct test_result {
82 int score_player, score_computer;
83 int free;
84};
85
86struct stats {
87 int free;
88 struct test_result results[9];
89};
90
91static void new_game(game_state * state) {
92 memset(state, _FREE, sizeof(game_state));
93}
94
95static int try_put(game_state * state, int id, char player) {
96 if ( id < 0 || id > 8 )
97  return -1;
98
99 if ( (*state)[id] == _FREE ) {
100  (*state)[id] = player;
101  return 0;
102 } else {
103  return -1;
104 }
105};
106
107static void analyze(struct stats * stats, game_state * state) {
108 static const int textvec[3][3][2] = {
109  {{0, 3}, {1, 3}, {2,  3}},
110  {{0, 1}, {3, 1}, {6,  1}},
111  {{0, 1}, {4, 0}, {8, -1}}
112 };
113 struct test_result * res;
114 int i, j;
115 int test;
116
117 stats->free = 0;
118
119 for (i = 0; i < 9; i++)
120  if ( (*state)[i] == _FREE )
121   stats->free++;
122
123 for (test = 0; test < 3; test++) {
124  for (i = 0; i < 3; i++) {
125   res = &(stats->results[i+test*3]);
126   res->score_player = 0;
127   res->score_computer = 0;
128   res->free = -1;
129   for (j = 0; j < 3; j++) {
130    switch ((*state)[textvec[test][j][0] + textvec[test][j][1]*i]) {
131     case _PLAYER: res->score_player++; break;
132     case _COMPUTER: res->score_computer++; break;
133     case _FREE: res->free = textvec[test][j][0] + textvec[test][j][1]*i; break;
134    }
135   }
136  }
137 }
138}
139
140static char check_won(game_state * state) {
141 struct stats stats;
142 int i;
143
144 analyze(&stats, state);
145
146 for (i = 0; i < 9; i++) {
147  if ( stats.results[i].score_player == 3 )
148   return _PLAYER;
149  if ( stats.results[i].score_computer == 3 )
150   return _COMPUTER;
151 }
152
153 if ( stats.free == 0)
154  return _NOBODY;
155
156 return 0;
157}
158
159static void auto_move(game_state * state, int player_move) {
160 static const int corner[4] = {0, 2, 6, 8};
161 static const int side[4]   = {1, 3, 5, 7};
162 struct stats stats;
163 struct test_result * res;
164 int i;
165
166 analyze(&stats, state);
167
168 // step 0: try to win.
169 for (i = 0; i < 9; i++) {
170  res = &(stats.results[i]);
171  if ( res->score_computer == 2 && res->free != -1 ) {
172   if ( try_put(state, res->free, _COMPUTER) == 0 )
173    return;
174  }
175 }
176
177 // step 1: block winning
178 for (i = 0; i < 9; i++) {
179  res = &(stats.results[i]);
180  if ( res->score_player == 2 && res->free != -1 ) {
181   if ( try_put(state, res->free, _COMPUTER) == 0 )
182    return;
183  }
184 }
185
186 // step 2: fork
187 // TODO: implement
188
189 // step 3: block forking
190 // TODO: implement
191
192 // step 4: play center
193 if ( try_put(state, 4, _COMPUTER) == 0 )
194  return;
195
196 // step 5: "Opposite corner"
197 for (i = 0; i < 4; i++)
198  if ( player_move == corner[i] )
199   if ( try_put(state, 8 - player_move, _COMPUTER) == 0 )
200    return;
201
202 // step 6: Empty corner
203 for (i = 0; i < 4; i++)
204  if ( try_put(state, corner[i], _COMPUTER) == 0 )
205   return;
206
207 // step 7: Empty side
208 for (i = 0; i < 4; i++)
209  if ( try_put(state, side[i], _COMPUTER) == 0 )
210   return;
211}
212
213static void draw_help(struct roar_buffer ** obuffer) {
214 struct roar_buffer * buf;
215 ssize_t len = 0;
216 void * data;
217
218 if ( roar_buffer_new_data(&buf, _DISPLAY_BUFFER_LEN, &data) == -1 )
219  return;
220
221 snprintf(data, _DISPLAY_BUFFER_LEN, _HELP, MSG__HELP);
222
223 len = roar_mm_strlen(data);
224
225 if ( roar_buffer_set_len(buf, len) == -1 ) {
226  roar_buffer_free(buf);
227 }
228
229 _LIBROAR_IGNORE_RET(roar_buffer_moveintoqueue(obuffer, &buf));
230}
231
232static void draw_game(game_state * state, const char * info, struct roar_buffer ** obuffer, struct roar_dl_librarypara * pluginpara) {
233 struct roar_buffer * buf;
234 ssize_t len = 0;
235 void * data;
236
237 if ( roar_buffer_new_data(&buf, _DISPLAY_BUFFER_LEN, &data) == -1 )
238  return;
239
240 snprintf(data, _DISPLAY_BUFFER_LEN, _DISPLAY,
241          pluginpara == NULL || pluginpara->appname    == NULL ? "<unknown>" : pluginpara->appname,
242          pluginpara == NULL || pluginpara->abiversion == NULL ? "<unknown>" : pluginpara->abiversion,
243          (*state)[0], (*state)[1], (*state)[2],
244          (*state)[3], (*state)[4], (*state)[5],
245          (*state)[6], (*state)[7], (*state)[8],
246          info);
247
248 len = roar_mm_strlen(data);
249
250 if ( roar_buffer_set_len(buf, len) == -1 ) {
251  roar_buffer_free(buf);
252 }
253
254 _LIBROAR_IGNORE_RET(roar_buffer_moveintoqueue(obuffer, &buf));
255}
256
257static int _set_proto(int client, struct roar_vio_calls * vio, struct roar_buffer ** obuffer, void ** userdata, const struct roar_keyval * protopara, ssize_t protoparalen, struct roar_dl_librarypara * pluginpara) {
258 game_state * state;
259
260 (void)client, (void)vio, (void)obuffer, (void)protopara, (void)protoparalen;
261
262 ROAR_DBG("_set_proto(*) = ?");
263
264 state = roar_mm_malloc(sizeof(game_state));
265 if ( state == NULL )
266  return -1;
267
268 new_game(state);
269
270 *userdata = state;
271
272 draw_game(state, MSG__YOUR_TURN, obuffer, pluginpara);
273
274 ROAR_DBG("_set_proto(client=%i, vio=%p, obuffer=%p, userdata=%p{%p}, protopara=%p, protoparalen=?, pluginpara=%p) = 0", client, vio, obuffer, userdata, *userdata, protopara, pluginpara);
275 return 0;
276}
277
278static char map_input(char c) {
279 switch (c) {
280  case ',':
281  case '.':
282  case 'g':
283    return 'q';
284   break;
285  case 'a': return '0'; break;
286  case 's': return '1'; break;
287  case 'd': return '2'; break;
288  case 'f': return '3'; break;
289  case ' ': return '4'; break;
290  case 'h': return '5'; break;
291  case 'j': return '6'; break;
292  case 'k': return '7'; break;
293  case 'l': return '8'; break;
294  case '+': return 'n'; break;
295  case '0': return 'H'; break;
296 }
297
298 if ( c > '9' )
299  return c;
300 if ( c >= '7' )
301  return c - 7;
302 if ( c >= '4' )
303  return c - 1;
304 if ( c >= '1' )
305  return c + 5;
306 return c;
307}
308
309static int _handle(int client, struct roar_vio_calls * vio, struct roar_buffer ** obuffer, void ** userdata, const struct roar_keyval * protopara, ssize_t protoparalen, struct roar_dl_librarypara * pluginpara) {
310 char buf[32];
311 ssize_t len;
312 ssize_t i;
313 const char * msg = MSG__YOUR_TURN;
314 char won;
315 int player_move = -1;
316 char c;
317
318 (void)client, (void)obuffer, (void)protopara, (void)protoparalen;
319
320 ROAR_DBG("_handle(client=%i, vio=%p, obuffer=%p, userdata=%p{%p}, protopara=%p, protoparalen=?, pluginpara=%p) = ?", client, vio, obuffer, userdata, *userdata, protopara, pluginpara);
321
322 len = roar_vio_read(vio, buf, sizeof(buf));
323
324 if ( len < 1 ) {
325  return -1;
326 }
327
328 if ( check_won(*userdata) ) {
329  for (i = 0; i < len; i++) {
330   if ( map_input(buf[i]) == 'q' ) {
331    return -1;
332   } else {
333    new_game(*userdata);
334    draw_game(*userdata, MSG__YOUR_TURN, obuffer, pluginpara);
335    return 0;
336   }
337  }
338 }
339
340 for (i = 0; i < len; i++) {
341  c = map_input(buf[i]);
342  switch (c) {
343   case 'q':
344     return -1;
345    break;
346   case 'n':
347     new_game(*userdata);
348     draw_game(*userdata, MSG__YOUR_TURN, obuffer, pluginpara);
349     return 0;
350    break;
351   case 'H':
352     draw_help(obuffer);
353     return 0;
354    break;
355   case 'e':
356     draw_game(*userdata, MSG__YOUR_TURN, obuffer, pluginpara);
357     return 0;
358    break;
359   case '0': case '1': case '2': case '3': case '4':
360   case '5': case '6': case '7': case '8':
361     if ( try_put(*userdata, c - '0', _PLAYER) == -1 ) {
362      msg = MSG__CANNOT_PUT_HERE;
363      draw_game(*userdata, msg, obuffer, pluginpara);
364      return 0;
365     } else {
366      msg = MSG__YOUR_TURN;
367      i = len; // end the loop.
368      player_move = c - '0';
369     }
370    break;
371  }
372 }
373
374 won = check_won(*userdata);
375
376 if ( !won && player_move != -1 ) {
377  auto_move(*userdata, player_move);
378  won = check_won(*userdata);
379 }
380
381 switch (won) {
382  case _PLAYER: msg = MSG__WON_PLAYER; break;
383  case _COMPUTER: msg = MSG__WON_COMPUTER; break;
384  case _NOBODY: msg = MSG__WON_NOBODY; break;
385 }
386
387 draw_game(*userdata, msg, obuffer, pluginpara);
388
389 ROAR_DBG("check_client(client=%i, vio=%p) = 0", client, vio);
390 return 0;
391}
392
393
394static const struct roar_dl_proto proto = {
395 .proto = ROAR_PROTO_GAME,
396 .description = "Simple Tic-Tac-Toe game",
397 .flags = ROAR_DL_PROTO_FLAGS_NONE,
398 .set_proto = _set_proto,
399 .unset_proto = NULL,
400 .handle = _handle,
401 .flush = NULL,
402 .flushed = NULL,
403 .status = NULL
404};
405
406static int __reg_proto(struct roar_dl_librarypara * para, struct roar_dl_libraryinst * lib) {
407 (void)para, (void)lib;
408 ROAR_DL_PLUGIN_REG_FN(ROAR_DL_PROTO_SUBTYPE, proto, ROAR_DL_PROTO_VERSION);
409 return 0;
410}
411
412ROAR_DL_PLUGIN_START(protocol_tic_tac_toe) {
413 ROAR_DL_PLUGIN_META_PRODUCT_NIV("protocol-tic-tac-toe", ROAR_VID_ROARAUDIO, ROAR_VNAME_ROARAUDIO);
414 ROAR_DL_PLUGIN_META_VERSION(ROAR_VERSION_STRING);
415 ROAR_DL_PLUGIN_META_LICENSE_TAG(GPLv3_0);
416 ROAR_DL_PLUGIN_META_CONTACT_FLNE("Philipp", "Schafft", "ph3-der-loewe", "lion@lion.leolix.org");
417 ROAR_DL_PLUGIN_META_DESC("Implementation of a the well known game Tic-Tac-Toe");
418
419 ROAR_DL_PLUGIN_REG(ROAR_DL_FN_PROTO, __reg_proto);
420} ROAR_DL_PLUGIN_END
421
422//ll
Note: See TracBrowser for help on using the repository browser.