Sat, 22 Mar 2014 16:25:49 +0100
implemented castling (without validation)
universe@6 | 1 | /* |
universe@6 | 2 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER. |
universe@6 | 3 | * |
universe@6 | 4 | * Copyright 2014 Mike Becker. All rights reserved. |
universe@6 | 5 | * |
universe@6 | 6 | * Redistribution and use in source and binary forms, with or without |
universe@6 | 7 | * modification, are permitted provided that the following conditions are met: |
universe@6 | 8 | * |
universe@6 | 9 | * 1. Redistributions of source code must retain the above copyright |
universe@6 | 10 | * notice, this list of conditions and the following disclaimer. |
universe@6 | 11 | * |
universe@6 | 12 | * 2. Redistributions in binary form must reproduce the above copyright |
universe@6 | 13 | * notice, this list of conditions and the following disclaimer in the |
universe@6 | 14 | * documentation and/or other materials provided with the distribution. |
universe@6 | 15 | * |
universe@6 | 16 | * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |
universe@6 | 17 | * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
universe@6 | 18 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
universe@6 | 19 | * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE |
universe@6 | 20 | * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
universe@6 | 21 | * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
universe@6 | 22 | * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
universe@6 | 23 | * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
universe@6 | 24 | * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
universe@6 | 25 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
universe@6 | 26 | * POSSIBILITY OF SUCH DAMAGE. |
universe@6 | 27 | * |
universe@6 | 28 | */ |
universe@6 | 29 | |
universe@6 | 30 | #include "game.h" |
universe@7 | 31 | #include "input.h" |
universe@7 | 32 | #include <ncurses.h> |
universe@7 | 33 | #include <string.h> |
universe@7 | 34 | |
universe@7 | 35 | static const uint8_t boardx = 10, boardy = 10; |
universe@7 | 36 | |
universe@8 | 37 | static void draw_board(Board board, uint8_t mycolor) { |
universe@7 | 38 | |
universe@7 | 39 | for (uint8_t y = 0 ; y < 8 ; y++) { |
universe@7 | 40 | for (uint8_t x = 0 ; x < 8 ; x++) { |
universe@7 | 41 | uint8_t col = board[y][x] & COLOR_MASK; |
universe@7 | 42 | uint8_t piece = board[y][x] & PIECE_MASK; |
universe@7 | 43 | char piecec = ' '; |
universe@7 | 44 | switch (piece) { |
universe@7 | 45 | case PAWN: piecec = 'P'; break; |
universe@7 | 46 | case ROOK: piecec = 'R'; break; |
universe@7 | 47 | case KNIGHT: piecec = 'N'; break; |
universe@7 | 48 | case BISHOP: piecec = 'B'; break; |
universe@7 | 49 | case QUEEN: piecec = 'Q'; break; |
universe@7 | 50 | case KING: piecec = 'K'; break; |
universe@7 | 51 | } |
universe@7 | 52 | |
universe@7 | 53 | attrset((col == WHITE ? A_BOLD : A_DIM) | |
universe@7 | 54 | COLOR_PAIR((y&1)==(x&1) ? COL_WB : COL_BW)); |
universe@7 | 55 | |
universe@8 | 56 | int cy = mycolor == WHITE ? boardy-y : boardy-7+y; |
universe@8 | 57 | int cx = mycolor == WHITE ? boardx+x*3 : boardx+21-x*3; |
universe@8 | 58 | mvaddch(cy, cx, ' '); |
universe@8 | 59 | mvaddch(cy, cx+1, piecec); |
universe@8 | 60 | mvaddch(cy, cx+2, ' '); |
universe@7 | 61 | } |
universe@7 | 62 | } |
universe@7 | 63 | |
universe@7 | 64 | attrset(A_NORMAL); |
universe@7 | 65 | for (uint8_t i = 0 ; i < 8 ; i++) { |
universe@8 | 66 | int x = mycolor == WHITE ? boardx+i*3+1 : boardx+22-i*3; |
universe@8 | 67 | int y = mycolor == WHITE ? boardy-i : boardy-7+i; |
universe@8 | 68 | mvaddch(boardy+1, x, 'a'+i); |
universe@8 | 69 | mvaddch(y, boardx-2, '1'+i); |
universe@7 | 70 | } |
universe@7 | 71 | } |
universe@7 | 72 | |
universe@8 | 73 | static void apply_move(Board board, Move *move) { |
universe@8 | 74 | board[move->fromrow][move->fromfile] = 0; |
universe@8 | 75 | // TODO: care for en passant capture |
universe@8 | 76 | board[move->torow][move->tofile] = move->piece; |
universe@9 | 77 | |
universe@9 | 78 | /* castling */ |
universe@9 | 79 | if ((move->piece & PIECE_MASK) == KING && |
universe@9 | 80 | move->fromfile == fileidx('e')) { |
universe@9 | 81 | uint8_t color = move->piece & COLOR_MASK; |
universe@9 | 82 | |
universe@9 | 83 | if (move->tofile == fileidx('g')) { |
universe@9 | 84 | board[move->torow][fileidx('h')] = 0; |
universe@9 | 85 | board[move->torow][fileidx('f')] = color|ROOK; |
universe@9 | 86 | } else if (move->tofile == fileidx('c')) { |
universe@9 | 87 | board[move->torow][fileidx('a')] = 0; |
universe@9 | 88 | board[move->torow][fileidx('d')] = color|ROOK; |
universe@9 | 89 | } |
universe@9 | 90 | } |
universe@8 | 91 | } |
universe@8 | 92 | |
universe@8 | 93 | static _Bool validate_move(Board board, uint8_t mycolor, Move *move) { |
universe@8 | 94 | _Bool result = TRUE; |
universe@8 | 95 | |
universe@8 | 96 | /* does piece exist */ |
universe@8 | 97 | result &= board[move->fromrow][move->fromfile] == move->piece; |
universe@8 | 98 | |
universe@9 | 99 | /* does move comply to rules */ |
universe@8 | 100 | // TODO: make it so |
universe@8 | 101 | |
universe@8 | 102 | /* is piece blocked */ |
universe@8 | 103 | // TODO: make it so |
universe@8 | 104 | |
universe@8 | 105 | /* is piece pinned */ |
universe@8 | 106 | // TODO: make it so |
universe@8 | 107 | |
universe@8 | 108 | return result; |
universe@8 | 109 | } |
universe@8 | 110 | |
universe@9 | 111 | static _Bool eval_move(Board board, uint8_t mycolor, char *mstr, Move *move) { |
universe@8 | 112 | memset(move, 0, sizeof(Move)); |
universe@8 | 113 | |
universe@9 | 114 | size_t len = strlen(mstr); |
universe@8 | 115 | |
universe@8 | 116 | /* remove check */ |
universe@9 | 117 | if (mstr[len-1] == '+') { |
universe@9 | 118 | len--; mstr[len] = '\0'; |
universe@8 | 119 | move->check = TRUE; |
universe@8 | 120 | } |
universe@8 | 121 | |
universe@8 | 122 | if (len == 2) { |
universe@8 | 123 | /* pawn move (e.g. "e4") */ |
universe@9 | 124 | if (isfile(mstr[0]) && isrow(mstr[1])) { |
universe@8 | 125 | move->piece = PAWN; |
universe@9 | 126 | move->fromfile = move->tofile = fileidx(mstr[0]); |
universe@9 | 127 | move->torow = rowidx(mstr[1]); |
universe@9 | 128 | move->fromrow = rowidx(mstr[1]) + (mycolor == WHITE ? -1 : 1); |
universe@8 | 129 | if (move->fromrow > 6) { |
universe@8 | 130 | move->piece = 0; |
universe@8 | 131 | } else { |
universe@8 | 132 | /* advanced first move */ |
universe@8 | 133 | if (move->fromrow == (mycolor == WHITE ? 2 : 5) && |
universe@8 | 134 | board[move->fromrow][move->fromfile] != (mycolor|PAWN)) { |
universe@8 | 135 | |
universe@8 | 136 | move->fromrow += (mycolor == WHITE ? -1 : 1); |
universe@8 | 137 | if (move->fromrow > 6) { |
universe@8 | 138 | move->piece = 0; |
universe@8 | 139 | } |
universe@8 | 140 | } |
universe@8 | 141 | } |
universe@8 | 142 | } |
universe@8 | 143 | } else if (len == 3) { |
universe@9 | 144 | if (strcmp(mstr, "O-O") == 0) { |
universe@8 | 145 | /* king side castling */ |
universe@8 | 146 | move->piece = KING; |
universe@8 | 147 | move->fromfile = fileidx('e'); |
universe@9 | 148 | move->tofile = fileidx('g'); |
universe@8 | 149 | move->fromrow = move->torow = mycolor == WHITE ? 0 : 7; |
universe@8 | 150 | } else { |
universe@8 | 151 | /* unambiguous move (e.g. "Nf3") */ |
universe@8 | 152 | } |
universe@8 | 153 | |
universe@8 | 154 | } else if (len == 4) { |
universe@8 | 155 | /* ambiguous move (e.g. "Ndf3") */ |
universe@8 | 156 | |
universe@8 | 157 | /* unambiguous capture (e.g. "Nxf3", "dxe5") */ |
universe@8 | 158 | |
universe@8 | 159 | } else if (len == 5) { |
universe@9 | 160 | if (strcmp(mstr, "O-O-O") == 0) { |
universe@9 | 161 | /* queen side castling "O-O-O" */ |
universe@9 | 162 | move->piece = KING; |
universe@9 | 163 | move->fromfile = fileidx('e'); |
universe@9 | 164 | move->tofile = fileidx('c'); |
universe@9 | 165 | move->fromrow = move->torow = mycolor == WHITE ? 0 : 7; |
universe@9 | 166 | } else { |
universe@9 | 167 | /* ambiguous capture (e.g. "Ndxf3") */ |
universe@9 | 168 | |
universe@9 | 169 | /* long notation move (e.g. "Nc5a4") */ |
universe@9 | 170 | |
universe@9 | 171 | /* long notation capture (e.g. "e5xf6") */ |
universe@9 | 172 | } |
universe@8 | 173 | } else if (len == 6) { |
universe@8 | 174 | /* long notation capture (e.g. "Nc5xf3") */ |
universe@8 | 175 | } |
universe@8 | 176 | |
universe@8 | 177 | if (move->piece) { |
universe@8 | 178 | move->piece |= mycolor; |
universe@8 | 179 | return TRUE; |
universe@8 | 180 | } else { |
universe@8 | 181 | return FALSE; |
universe@8 | 182 | } |
universe@8 | 183 | } |
universe@8 | 184 | |
universe@8 | 185 | static int sendmove(Board board, uint8_t mycolor, int opponent) { |
universe@7 | 186 | const size_t buflen = 8; |
universe@8 | 187 | char movestr[buflen]; |
universe@7 | 188 | _Bool remisrejected = FALSE; |
universe@7 | 189 | |
universe@7 | 190 | while (1) { |
universe@7 | 191 | move(boardy+3, 0); |
universe@7 | 192 | if (remisrejected) { |
universe@7 | 193 | printw( |
universe@7 | 194 | "Use chess notation to enter your move.\n" |
universe@7 | 195 | "Remis offer rejected - type 'surr' to surrender. \n\n" |
universe@7 | 196 | "Type your move: "); |
universe@7 | 197 | } else { |
universe@7 | 198 | printw( |
universe@7 | 199 | "Use chess notation to enter your move.\n" |
universe@7 | 200 | "Or type 'surr' to surrender or 'remis' to offer remis.\n\n" |
universe@7 | 201 | "Type your move: "); |
universe@7 | 202 | } |
universe@7 | 203 | clrtoeol(); |
universe@7 | 204 | refresh(); |
universe@8 | 205 | getnstr(movestr, buflen); |
universe@7 | 206 | |
universe@8 | 207 | if (strncmp(movestr, "surr", buflen) == 0) { |
universe@7 | 208 | printw("You surrendered!"); |
universe@8 | 209 | refresh(); |
universe@7 | 210 | net_send_code(opponent, NETCODE_SURRENDER); |
universe@7 | 211 | return 1; |
universe@8 | 212 | } else if (strncmp(movestr, "remis", buflen) == 0) { |
universe@7 | 213 | if (!remisrejected) { |
universe@7 | 214 | net_send_code(opponent, NETCODE_REMIS); |
universe@7 | 215 | printw("Remis offer sent - waiting for acceptance..."); |
universe@7 | 216 | refresh(); |
universe@7 | 217 | if (net_recieve_code(opponent) == NETCODE_ACCEPT) { |
universe@7 | 218 | printw("\rRemis accepted!"); |
universe@7 | 219 | clrtoeol(); |
universe@8 | 220 | refresh(); |
universe@7 | 221 | return 1; |
universe@7 | 222 | } else { |
universe@7 | 223 | remisrejected = TRUE; |
universe@7 | 224 | } |
universe@7 | 225 | } |
universe@7 | 226 | } else { |
universe@8 | 227 | Move move; |
universe@8 | 228 | if (eval_move(board, mycolor, movestr, &move)) { |
universe@8 | 229 | net_send_code(opponent, NETCODE_MOVE); |
universe@8 | 230 | net_send_data(opponent, &move, sizeof(Move)); |
universe@8 | 231 | if (net_recieve_code(opponent) == NETCODE_ACCEPT) { |
universe@8 | 232 | apply_move(board, &move); |
universe@8 | 233 | return 0; |
universe@8 | 234 | } else { |
universe@8 | 235 | printw("Invalid move."); |
universe@8 | 236 | clrtoeol(); |
universe@8 | 237 | } |
universe@8 | 238 | } else { |
universe@8 | 239 | printw("Can't interpret move - please use algebraic notation."); |
universe@8 | 240 | } |
universe@7 | 241 | } |
universe@7 | 242 | } |
universe@7 | 243 | } |
universe@7 | 244 | |
universe@8 | 245 | static int recvmove(Board board, uint8_t mycolor, int opponent) { |
universe@7 | 246 | |
universe@7 | 247 | while (1) { |
universe@7 | 248 | move(boardy+3, 0); |
universe@7 | 249 | printw("Awaiting opponent move..."); |
universe@7 | 250 | clrtoeol(); |
universe@7 | 251 | refresh(); |
universe@7 | 252 | |
universe@7 | 253 | // TODO: nonblocking |
universe@7 | 254 | uint32_t code = net_recieve_code(opponent); |
universe@8 | 255 | |
universe@8 | 256 | Move move; |
universe@7 | 257 | switch (code) { |
universe@7 | 258 | case NETCODE_SURRENDER: |
universe@7 | 259 | printw("\rYour opponent surrendered!"); |
universe@7 | 260 | clrtoeol(); |
universe@7 | 261 | return 1; |
universe@7 | 262 | case NETCODE_REMIS: |
universe@7 | 263 | if (prompt_yesno( |
universe@7 | 264 | "\rYour opponent offers remis - do you accept")) { |
universe@7 | 265 | printw("\rRemis accepted!"); |
universe@7 | 266 | clrtoeol(); |
universe@7 | 267 | net_send_code(opponent, NETCODE_ACCEPT); |
universe@7 | 268 | return 1; |
universe@7 | 269 | } else { |
universe@7 | 270 | net_send_code(opponent, NETCODE_DECLINE); |
universe@7 | 271 | } |
universe@7 | 272 | break; |
universe@7 | 273 | case NETCODE_MOVE: |
universe@8 | 274 | net_recieve_data(opponent, &move, sizeof(Move)); |
universe@8 | 275 | if (validate_move(board, mycolor, &move)) { |
universe@8 | 276 | apply_move(board, &move); |
universe@8 | 277 | net_send_code(opponent, NETCODE_ACCEPT); |
universe@8 | 278 | return 0; |
universe@8 | 279 | } else { |
universe@8 | 280 | net_send_code(opponent, NETCODE_DECLINE); |
universe@8 | 281 | } |
universe@7 | 282 | } |
universe@7 | 283 | } |
universe@7 | 284 | } |
universe@6 | 285 | |
universe@6 | 286 | void game_start(Settings *settings, int opponent) { |
universe@7 | 287 | _Bool myturn = is_server(settings) == |
universe@7 | 288 | (settings->gameinfo.servercolor == WHITE); |
universe@8 | 289 | uint8_t mycolor = myturn ? WHITE:BLACK; |
universe@8 | 290 | |
universe@7 | 291 | _Bool running; |
universe@6 | 292 | |
universe@7 | 293 | Board board = { |
universe@7 | 294 | {WROOK, WKNIGHT, WBISHOP, WQUEEN, WKING, WBISHOP, WKNIGHT, WROOK}, |
universe@7 | 295 | {WPAWN, WPAWN, WPAWN, WPAWN, WPAWN, WPAWN, WPAWN, WPAWN}, |
universe@7 | 296 | {0, 0, 0, 0, 0, 0, 0, 0}, |
universe@7 | 297 | {0, 0, 0, 0, 0, 0, 0, 0}, |
universe@7 | 298 | {0, 0, 0, 0, 0, 0, 0, 0}, |
universe@7 | 299 | {0, 0, 0, 0, 0, 0, 0, 0}, |
universe@7 | 300 | {BPAWN, BPAWN, BPAWN, BPAWN, BPAWN, BPAWN, BPAWN, BPAWN}, |
universe@7 | 301 | {BROOK, BKNIGHT, BBISHOP, BQUEEN, BKING, BBISHOP, BKNIGHT, BROOK} |
universe@7 | 302 | }; |
universe@7 | 303 | |
universe@7 | 304 | do { |
universe@7 | 305 | clear(); |
universe@8 | 306 | draw_board(board, mycolor); |
universe@7 | 307 | if (myturn) { |
universe@8 | 308 | running = !sendmove(board, mycolor, opponent); |
universe@7 | 309 | } else { |
universe@8 | 310 | running = !recvmove(board, mycolor, opponent); |
universe@7 | 311 | flushinp(); // flush any input the user hacked in while waiting |
universe@7 | 312 | } |
universe@7 | 313 | myturn ^= 1; |
universe@7 | 314 | } while (running); |
universe@7 | 315 | |
universe@7 | 316 | mvaddstr(getmaxy(tchess_window)-1, 0, |
universe@7 | 317 | "Game has ended. Press any key to leave..."); |
universe@7 | 318 | getch(); |
universe@6 | 319 | } |