apps/openchess/src/game.c

   1 /*
   2  *  ZeX/OS
   3  *  Copyright (C) 2008  Tomas 'ZeXx86' Jedrzejek (zexx86@gmail.com)
   4  *
   5  *  This program is free software: you can redistribute it and/or modify
   6  *  it under the terms of the GNU General Public License as published by
   7  *  the Free Software Foundation, either version 3 of the License, or
   8  *  (at your option) any later version.
   9  *
  10  *  This program is distributed in the hope that it will be useful,
  11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  *  GNU General Public License for more details.
  14  *
  15  *  You should have received a copy of the GNU General Public License
  16  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17  */
  18
  19
  20 #include <stdio.h>
  21 #include <string.h>
  22 #include <stdlib.h>
  23 #include <unistd.h>
  24 #include "client.h"
  25 #include "game.h"
  26
  27 game_t game_list;
  28
  29 /** Reset game board to default positions */
  30 int game_board_reset (game_t *game)
  31 {
  32         //Vez,Jezdec,Strelec,Dama,Kral,Strelec,Jezdec,Vez
  33         memcpy (game->board[7], "VJSDKSJV", 8);         // radek 1 (bily)
  34         memcpy (game->board[6], "PPPPPPPP", 8);         // radek 2 (bily)
  35         memcpy (game->board[5], "........", 8);
  36         memcpy (game->board[4], "........", 8);
  37         memcpy (game->board[3], "........", 8);
  38         memcpy (game->board[2], "........", 8);
  39         memcpy (game->board[1], "pppppppp", 8);         // radek 7 (cerny)
  40         memcpy (game->board[0], "vjsdksjv", 8);         // radek 8 (cerny)
  41
  42         return 1;
  43 }
  44
  45 game_t *game_find (char *name)
  46 {
  47         game_t *game;
  48         for (game = game_list.next; game != &game_list; game = game->next)
  49                 if (!strcmp (game->name, name))
  50                         return game;
  51
  52         return 0;
  53 }
  54
  55 game_t *game_findbyclient (client_t *client)
  56 {
  57         game_t *game;
  58         for (game = game_list.next; game != &game_list; game = game->next)
  59                 if (game->player.white == client ||
  60                         game->player.black == client)
  61                         return game;
  62
  63         return 0;
  64 }
  65
  66 /** Create new game's structure */
  67 game_t *game_new (client_t *client, char *name, unsigned name_len)
  68 {
  69         game_t *game = game_find (name);
  70
  71         if (game)
  72                 return 0;
  73
  74         /* alloc and init context */
  75         game = (game_t *) malloc (sizeof (game_t));
  76
  77         if (!game)
  78                 return 0;
  79
  80         /* setup game name */
  81         game->name = (char *) malloc (sizeof (char) * (name_len + 1));
  82
  83         if (!game->name)
  84                 return 0;
  85
  86         memcpy (game->name, name, name_len);
  87         game->name[name_len] = '\0';
  88
  89         /* set variables to default value */
  90         game->play = 0;
  91         game->round = 0;
  92
  93         /* white player is each time game creator */
  94         game->player.white = client;
  95         /* black player have to join to game*/
  96         game->player.black = 0;
  97
  98         /* reset chess board */
  99         game_board_reset (game);
 100
 101         /* add into list */
 102         game->next = &game_list;
 103         game->prev = game_list.prev;
 104         game->prev->next = game;
 105         game->next->prev = game;
 106
 107         return game;
 108 }
 109
 110 /** Client would to join to game */
 111 int game_join (client_t *client, game_t *game)
 112 {
 113         game->play = 1;
 114         game->player.black = client;
 115
 116         return 1;
 117 }
 118
 119 /** Delete game's structure */
 120 int game_quit (game_t *game)
 121 {
 122         game->next->prev = game->prev;
 123         game->prev->next = game->next;
 124
 125         free (game->name);
 126
 127         free (game);
 128
 129         return 1;
 130 }
 131
 132 /** Synchronize game with client's positions */
 133 int game_sync (client_t *client, game_t *game)
 134 {
 135         char str[73];
 136
 137         unsigned i = 0;
 138         unsigned y = 0;
 139
 140         while (i < 8) {
 141                 y = 0;
 142
 143                 while (y < 8) {
 144                         str[y+i*9] = game->board[i][y];
 145                         y ++;
 146                 }
 147
 148                 str[8+i*9] = '\n';
 149
 150                 i ++;
 151         }
 152
 153         client_pmmsg (client, str, 72);
 154
 155         return 1;
 156 }
 157
 158 int game_pos (client_t *client, game_t *game, unsigned char x_old, unsigned char y_old, unsigned char x, unsigned char y)
 159 {
 160         int cx;
 161         int cy;
 162
 163         cx = x_old;             // pismena souradnice
 164         cx -= 'a';
 165
 166         cy = y_old;             // ciselna souradnice
 167         cy -= ('0' + 1);
 168
 169         char f = game->board[cy][cx];
 170
 171         game->board[cy][cx] = '.';
 172
 173         cx = x;         // pismena souradnice
 174         cx -= 'a';
 175
 176         cy = y;         // ciselna souradnice
 177         cy -= ('0' + 1);
 178
 179         game->board[cx][cy] = f;
 180
 181         return 1;
 182 }
 183
 184 /** Client Init function */
 185 int init_game ()
 186 {
 187         game_list.next = &game_list;
 188         game_list.prev = &game_list;
 189
 190         return 1;
 191 }
 192