[5449] | 1 | //tic-tac-toe.c: |
---|
| 2 | |
---|
| 3 | /* |
---|
| 4 | * Copyright (C) Philipp 'ph3-der-loewe' Schafft - 2012 |
---|
| 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 | |
---|
[5579] | 26 | #include <roaraudio.h> |
---|
[5449] | 27 | |
---|
| 28 | #define _FREE ' ' |
---|
| 29 | #define _PLAYER 'X' |
---|
| 30 | #define _COMPUTER 'O' |
---|
| 31 | #define _NOBODY '#' |
---|
| 32 | |
---|
| 33 | #define _DISPLAY \ |
---|
[5461] | 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" \ |
---|
[5449] | 38 | "\e[2J\e[H" \ |
---|
[5461] | 39 | " Tic Tac Toe\r\n" \ |
---|
| 40 | " (running: roard " ROAR_VERSION_STRING ")\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" |
---|
[5449] | 50 | #define _DISPLAY_BUFFER_LEN 1024 |
---|
| 51 | |
---|
[5569] | 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 --" |
---|
[5449] | 73 | #define MSG__CANNOT_PUT_HERE "You can not put your mark here. -- try again another position --" |
---|
[5569] | 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 --" |
---|
[5449] | 78 | |
---|
| 79 | typedef char game_state[9]; |
---|
| 80 | |
---|
| 81 | struct test_result { |
---|
| 82 | int score_player, score_computer; |
---|
| 83 | int free; |
---|
| 84 | }; |
---|
| 85 | |
---|
| 86 | struct stats { |
---|
| 87 | int free; |
---|
| 88 | struct test_result results[9]; |
---|
| 89 | }; |
---|
| 90 | |
---|
[5579] | 91 | static inline int __movein(struct roar_buffer ** buf, struct roar_buffer ** next) { |
---|
| 92 | if ( *buf == NULL ) { |
---|
| 93 | *buf = *next; |
---|
| 94 | *next = NULL; |
---|
| 95 | return 0; |
---|
| 96 | } else { |
---|
| 97 | return roar_buffer_moveinto(*buf, next); |
---|
| 98 | } |
---|
| 99 | } |
---|
| 100 | |
---|
[5449] | 101 | static void new_game(game_state * state) { |
---|
| 102 | memset(state, _FREE, sizeof(game_state)); |
---|
| 103 | } |
---|
| 104 | |
---|
| 105 | static int try_put(game_state * state, int id, char player) { |
---|
| 106 | if ( id < 0 || id > 8 ) |
---|
| 107 | return -1; |
---|
| 108 | |
---|
| 109 | if ( (*state)[id] == _FREE ) { |
---|
| 110 | (*state)[id] = player; |
---|
| 111 | return 0; |
---|
| 112 | } else { |
---|
| 113 | return -1; |
---|
| 114 | } |
---|
| 115 | }; |
---|
| 116 | |
---|
| 117 | static void analyze(struct stats * stats, game_state * state) { |
---|
| 118 | static const int textvec[3][3][2] = { |
---|
| 119 | {{0, 3}, {1, 3}, {2, 3}}, |
---|
| 120 | {{0, 1}, {3, 1}, {6, 1}}, |
---|
| 121 | {{0, 1}, {4, 0}, {8, -1}} |
---|
| 122 | }; |
---|
| 123 | struct test_result * res; |
---|
| 124 | int i, j; |
---|
| 125 | int test; |
---|
| 126 | |
---|
| 127 | stats->free = 0; |
---|
| 128 | |
---|
| 129 | for (i = 0; i < 9; i++) |
---|
| 130 | if ( (*state)[i] == _FREE ) |
---|
| 131 | stats->free++; |
---|
| 132 | |
---|
| 133 | for (test = 0; test < 3; test++) { |
---|
| 134 | for (i = 0; i < 3; i++) { |
---|
| 135 | res = &(stats->results[i+test*3]); |
---|
| 136 | res->score_player = 0; |
---|
| 137 | res->score_computer = 0; |
---|
| 138 | res->free = -1; |
---|
| 139 | for (j = 0; j < 3; j++) { |
---|
| 140 | switch ((*state)[textvec[test][j][0] + textvec[test][j][1]*i]) { |
---|
| 141 | case _PLAYER: res->score_player++; break; |
---|
| 142 | case _COMPUTER: res->score_computer++; break; |
---|
| 143 | case _FREE: res->free = textvec[test][j][0] + textvec[test][j][1]*i; break; |
---|
| 144 | } |
---|
| 145 | } |
---|
| 146 | } |
---|
| 147 | } |
---|
| 148 | } |
---|
| 149 | |
---|
| 150 | static char check_won(game_state * state) { |
---|
| 151 | struct stats stats; |
---|
| 152 | int i; |
---|
| 153 | |
---|
| 154 | analyze(&stats, state); |
---|
| 155 | |
---|
| 156 | for (i = 0; i < 9; i++) { |
---|
| 157 | if ( stats.results[i].score_player == 3 ) |
---|
| 158 | return _PLAYER; |
---|
| 159 | if ( stats.results[i].score_computer == 3 ) |
---|
| 160 | return _COMPUTER; |
---|
| 161 | } |
---|
| 162 | |
---|
| 163 | if ( stats.free == 0) |
---|
| 164 | return _NOBODY; |
---|
| 165 | |
---|
| 166 | return 0; |
---|
| 167 | } |
---|
| 168 | |
---|
| 169 | static void auto_move(game_state * state, int player_move) { |
---|
| 170 | static const int corner[4] = {0, 2, 6, 8}; |
---|
| 171 | static const int side[4] = {1, 3, 5, 7}; |
---|
| 172 | struct stats stats; |
---|
| 173 | struct test_result * res; |
---|
| 174 | int i; |
---|
| 175 | |
---|
| 176 | analyze(&stats, state); |
---|
| 177 | |
---|
| 178 | // step 0: try to win. |
---|
| 179 | for (i = 0; i < 9; i++) { |
---|
| 180 | res = &(stats.results[i]); |
---|
| 181 | if ( res->score_computer == 2 && res->free != -1 ) { |
---|
| 182 | if ( try_put(state, res->free, _COMPUTER) == 0 ) |
---|
| 183 | return; |
---|
| 184 | } |
---|
| 185 | } |
---|
| 186 | |
---|
| 187 | // step 1: block winning |
---|
| 188 | for (i = 0; i < 9; i++) { |
---|
| 189 | res = &(stats.results[i]); |
---|
| 190 | if ( res->score_player == 2 && res->free != -1 ) { |
---|
| 191 | if ( try_put(state, res->free, _COMPUTER) == 0 ) |
---|
| 192 | return; |
---|
| 193 | } |
---|
| 194 | } |
---|
| 195 | |
---|
| 196 | // step 2: fork |
---|
| 197 | // TODO: implement |
---|
| 198 | |
---|
| 199 | // step 3: block forking |
---|
| 200 | // TODO: implement |
---|
| 201 | |
---|
| 202 | // step 4: play center |
---|
| 203 | if ( try_put(state, 4, _COMPUTER) == 0 ) |
---|
| 204 | return; |
---|
| 205 | |
---|
| 206 | // step 5: "Opposite corner" |
---|
| 207 | for (i = 0; i < 4; i++) |
---|
| 208 | if ( player_move == corner[i] ) |
---|
| 209 | if ( try_put(state, 8 - player_move, _COMPUTER) == 0 ) |
---|
| 210 | return; |
---|
| 211 | |
---|
| 212 | // step 6: Empty corner |
---|
| 213 | for (i = 0; i < 4; i++) |
---|
| 214 | if ( try_put(state, corner[i], _COMPUTER) == 0 ) |
---|
| 215 | return; |
---|
| 216 | |
---|
| 217 | // step 7: Empty side |
---|
| 218 | for (i = 0; i < 4; i++) |
---|
| 219 | if ( try_put(state, side[i], _COMPUTER) == 0 ) |
---|
| 220 | return; |
---|
| 221 | } |
---|
| 222 | |
---|
[5579] | 223 | static void draw_help(struct roar_buffer ** obuffer) { |
---|
[5569] | 224 | struct roar_buffer * buf; |
---|
| 225 | ssize_t len = 0; |
---|
| 226 | void * data; |
---|
| 227 | |
---|
| 228 | if ( roar_buffer_new_data(&buf, _DISPLAY_BUFFER_LEN, &data) == -1 ) |
---|
| 229 | return; |
---|
| 230 | |
---|
| 231 | snprintf(data, _DISPLAY_BUFFER_LEN, _HELP, MSG__HELP); |
---|
| 232 | |
---|
| 233 | len = roar_mm_strlen(data); |
---|
| 234 | |
---|
| 235 | if ( roar_buffer_set_len(buf, len) == -1 ) { |
---|
| 236 | roar_buffer_free(buf); |
---|
| 237 | } |
---|
| 238 | |
---|
[5579] | 239 | __movein(obuffer, &buf); |
---|
[5569] | 240 | } |
---|
| 241 | |
---|
[5579] | 242 | static void draw_game(game_state * state, const char * info, struct roar_buffer ** obuffer) { |
---|
[5449] | 243 | struct roar_buffer * buf; |
---|
| 244 | ssize_t len = 0; |
---|
| 245 | void * data; |
---|
| 246 | |
---|
| 247 | if ( roar_buffer_new_data(&buf, _DISPLAY_BUFFER_LEN, &data) == -1 ) |
---|
| 248 | return; |
---|
| 249 | |
---|
| 250 | snprintf(data, _DISPLAY_BUFFER_LEN, _DISPLAY, |
---|
| 251 | (*state)[0], (*state)[1], (*state)[2], |
---|
| 252 | (*state)[3], (*state)[4], (*state)[5], |
---|
| 253 | (*state)[6], (*state)[7], (*state)[8], |
---|
| 254 | info); |
---|
| 255 | |
---|
| 256 | len = roar_mm_strlen(data); |
---|
| 257 | |
---|
| 258 | if ( roar_buffer_set_len(buf, len) == -1 ) { |
---|
| 259 | roar_buffer_free(buf); |
---|
| 260 | } |
---|
| 261 | |
---|
[5579] | 262 | __movein(obuffer, &buf); |
---|
[5449] | 263 | } |
---|
| 264 | |
---|
[5579] | 265 | static int _set_proto(int client, struct roar_vio_calls * vio, struct roar_buffer ** obuffer, void ** userdata, const struct roar_keyval * para, ssize_t paralen) { |
---|
[5449] | 266 | game_state * state; |
---|
| 267 | |
---|
[5579] | 268 | (void)client, (void)vio, (void)obuffer, (void)para, (void)paralen; |
---|
[5449] | 269 | |
---|
| 270 | state = roar_mm_malloc(sizeof(game_state)); |
---|
| 271 | if ( state == NULL ) |
---|
| 272 | return -1; |
---|
| 273 | |
---|
| 274 | new_game(state); |
---|
| 275 | |
---|
[5579] | 276 | *userdata = state; |
---|
[5449] | 277 | |
---|
[5579] | 278 | draw_game(state, MSG__YOUR_TURN, obuffer); |
---|
[5449] | 279 | return 0; |
---|
| 280 | } |
---|
| 281 | |
---|
[5569] | 282 | static char map_input(char c) { |
---|
| 283 | switch (c) { |
---|
| 284 | case ',': |
---|
| 285 | case '.': |
---|
| 286 | case 'g': |
---|
| 287 | return 'q'; |
---|
| 288 | break; |
---|
| 289 | case 'a': return '0'; break; |
---|
| 290 | case 's': return '1'; break; |
---|
| 291 | case 'd': return '2'; break; |
---|
| 292 | case 'f': return '3'; break; |
---|
| 293 | case ' ': return '4'; break; |
---|
| 294 | case 'h': return '5'; break; |
---|
| 295 | case 'j': return '6'; break; |
---|
| 296 | case 'k': return '7'; break; |
---|
| 297 | case 'l': return '8'; break; |
---|
| 298 | case '+': return 'n'; break; |
---|
| 299 | case '0': return 'H'; break; |
---|
| 300 | } |
---|
| 301 | |
---|
[5454] | 302 | if ( c > '9' ) |
---|
| 303 | return c; |
---|
| 304 | if ( c >= '7' ) |
---|
| 305 | return c - 7; |
---|
| 306 | if ( c >= '4' ) |
---|
| 307 | return c - 1; |
---|
| 308 | if ( c >= '1' ) |
---|
| 309 | return c + 5; |
---|
| 310 | return c; |
---|
| 311 | } |
---|
| 312 | |
---|
[5579] | 313 | static int _handle(int client, struct roar_vio_calls * vio, struct roar_buffer ** obuffer, void ** userdata, const struct roar_keyval * para, ssize_t paralen) { |
---|
[5449] | 314 | char buf[32]; |
---|
| 315 | ssize_t len; |
---|
| 316 | ssize_t i; |
---|
| 317 | const char * msg = MSG__YOUR_TURN; |
---|
| 318 | char won; |
---|
| 319 | int player_move = -1; |
---|
[5454] | 320 | char c; |
---|
[5449] | 321 | |
---|
[5579] | 322 | (void)client, (void)obuffer, (void)para, (void)paralen; |
---|
[5449] | 323 | |
---|
[5579] | 324 | ROAR_DBG("check_client(client=%i, vio=%p) = ?", client, vio); |
---|
[5449] | 325 | |
---|
| 326 | len = roar_vio_read(vio, buf, sizeof(buf)); |
---|
| 327 | |
---|
| 328 | if ( len < 1 ) { |
---|
| 329 | return -1; |
---|
| 330 | } |
---|
| 331 | |
---|
[5579] | 332 | if ( check_won(*userdata) ) { |
---|
[5449] | 333 | for (i = 0; i < len; i++) { |
---|
[5569] | 334 | if ( map_input(buf[i]) == 'q' ) { |
---|
[5449] | 335 | return -1; |
---|
| 336 | } else { |
---|
[5579] | 337 | new_game(*userdata); |
---|
| 338 | draw_game(*userdata, MSG__YOUR_TURN, obuffer); |
---|
[5449] | 339 | return 0; |
---|
| 340 | } |
---|
| 341 | } |
---|
| 342 | } |
---|
| 343 | |
---|
| 344 | for (i = 0; i < len; i++) { |
---|
[5569] | 345 | c = map_input(buf[i]); |
---|
[5454] | 346 | switch (c) { |
---|
[5449] | 347 | case 'q': |
---|
| 348 | return -1; |
---|
| 349 | break; |
---|
[5569] | 350 | case 'n': |
---|
[5579] | 351 | new_game(*userdata); |
---|
| 352 | draw_game(*userdata, MSG__YOUR_TURN, obuffer); |
---|
[5569] | 353 | return 0; |
---|
| 354 | break; |
---|
| 355 | case 'H': |
---|
[5579] | 356 | draw_help(obuffer); |
---|
[5569] | 357 | return 0; |
---|
| 358 | break; |
---|
| 359 | case 'e': |
---|
[5579] | 360 | draw_game(*userdata, MSG__YOUR_TURN, obuffer); |
---|
[5569] | 361 | return 0; |
---|
| 362 | break; |
---|
[5449] | 363 | case '0': case '1': case '2': case '3': case '4': |
---|
| 364 | case '5': case '6': case '7': case '8': |
---|
[5579] | 365 | if ( try_put(*userdata, c - '0', _PLAYER) == -1 ) { |
---|
[5449] | 366 | msg = MSG__CANNOT_PUT_HERE; |
---|
[5579] | 367 | draw_game(*userdata, msg, obuffer); |
---|
[5449] | 368 | return 0; |
---|
| 369 | } else { |
---|
| 370 | msg = MSG__YOUR_TURN; |
---|
| 371 | i = len; // end the loop. |
---|
[5454] | 372 | player_move = c - '0'; |
---|
[5449] | 373 | } |
---|
| 374 | break; |
---|
| 375 | } |
---|
| 376 | } |
---|
| 377 | |
---|
[5579] | 378 | won = check_won(*userdata); |
---|
[5449] | 379 | |
---|
| 380 | if ( !won && player_move != -1 ) { |
---|
[5579] | 381 | auto_move(*userdata, player_move); |
---|
| 382 | won = check_won(*userdata); |
---|
[5449] | 383 | } |
---|
| 384 | |
---|
| 385 | switch (won) { |
---|
| 386 | case _PLAYER: msg = MSG__WON_PLAYER; break; |
---|
| 387 | case _COMPUTER: msg = MSG__WON_COMPUTER; break; |
---|
| 388 | case _NOBODY: msg = MSG__WON_NOBODY; break; |
---|
| 389 | } |
---|
| 390 | |
---|
[5579] | 391 | draw_game(*userdata, msg, obuffer); |
---|
[5449] | 392 | |
---|
| 393 | ROAR_DBG("check_client(client=%i, vio=%p) = 0", client, vio); |
---|
| 394 | return 0; |
---|
| 395 | } |
---|
| 396 | |
---|
| 397 | |
---|
[5579] | 398 | static const struct roar_dl_proto proto = { |
---|
| 399 | .proto = ROAR_PROTO_GAME, |
---|
| 400 | .description = "Simple Tic-Tac-Toe game", |
---|
| 401 | .flags = ROAR_DL_PROTO_FLAGS_NONE, |
---|
| 402 | .set_proto = _set_proto, |
---|
| 403 | .unset_proto = NULL, |
---|
| 404 | .handle = _handle, |
---|
| 405 | .flush = NULL, |
---|
| 406 | .flushed = NULL, |
---|
| 407 | .status = NULL |
---|
[5449] | 408 | }; |
---|
| 409 | |
---|
[5579] | 410 | static int __reg_proto(struct roar_dl_librarypara * para, struct roar_dl_libraryinst * lib) { |
---|
| 411 | (void)para, (void)lib; |
---|
| 412 | ROAR_DL_PLUGIN_REG_FN(ROAR_DL_PROTO_SUBTYPE, proto, ROAR_DL_PROTO_VERSION); |
---|
| 413 | return 0; |
---|
| 414 | } |
---|
[5449] | 415 | |
---|
| 416 | ROAR_DL_PLUGIN_START(protocol_tic_tac_toe) { |
---|
| 417 | ROAR_DL_PLUGIN_META_PRODUCT_NIV("protocol-tic-tac-toe", ROAR_VID_ROARAUDIO, ROAR_VNAME_ROARAUDIO); |
---|
| 418 | ROAR_DL_PLUGIN_META_VERSION(ROAR_VERSION_STRING); |
---|
| 419 | ROAR_DL_PLUGIN_META_LICENSE_TAG(GPLv3_0); |
---|
| 420 | ROAR_DL_PLUGIN_META_CONTACT_FLNE("Philipp", "Schafft", "ph3-der-loewe", "lion@lion.leolix.org"); |
---|
| 421 | ROAR_DL_PLUGIN_META_DESC("Implementation of a the well known game Tic-Tac-Toe"); |
---|
| 422 | |
---|
[5579] | 423 | ROAR_DL_PLUGIN_REG(ROAR_DL_FN_PROTO, __reg_proto); |
---|
[5449] | 424 | } ROAR_DL_PLUGIN_END |
---|
| 425 | |
---|
| 426 | //ll |
---|