git.cworth.org Git - kub/blob - kub.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <time.h>
   4 #include <gtk/gtk.h>
   5 #include <librsvg/rsvg.h>
   6 #include <librsvg/rsvg-cairo.h>
   7
   8 /*
   9  *   TILE_NUMBER_X_OFFSET = 3
  10  * //
  11  * || TILE_NUMBER_WIDTH = 34
  12  * ||/   /
  13  * ||   |  TILE_WIDTH = 40
  14  * ||   | /
  15  * |     |
  16  * +-----+ - TILE_NUMBER_Y_OFFSET = 3   -
  17  * |+---+| -                            |
  18  * ||   ||                              |
  19  * ||   ||   TILE_NUMBER_HEIGHT = 24    |
  20  * |+---+| -                            |
  21  * |  _  | _                            |-TILE_HEIGHT = 50
  22  * | / \ |                              |
  23  * ||   ||   TILE_SUN_HEIGHT = 20       |
  24  * | \_/ | _                            |
  25  * |     |   TILE_SUN_Y_OFFSET = 3      |
  26  * +-----+ -                            -
  27  * ||   | TILE_SUN_WIDTH = 20
  28  * ||
  29  * || TILE_SUN_X_OFFSET = 10
  30  */
  31 #define TILE_WIDTH              40
  32 #define TILE_HEIGHT             50
  33
  34 #define TILE_NUMBER_X_OFFSET    3
  35 #define TILE_NUMBER_Y_OFFSET    3
  36 #define TILE_NUMBER_WIDTH       34
  37 #define TILE_NUMBER_HEIGHT      24
  38
  39 #define TILE_SUN_X_OFFSET       10
  40 #define TILE_SUN_Y_OFFSET       3
  41 #define TILE_SUN_WIDTH          20
  42 #define TILE_SUN_HEIGHT         20
  43
  44 #define FATAL_ERROR(msg) \
  45     do { fprintf (stderr, "Error: %s\n", msg); exit (1); } while (0)
  46
  47 char *colors[] = {"Black", "Blue", "Red", "Yellow"};
  48
  49 typedef enum {BLACK, BLUE, RED, YELLOW} color_t;
  50
  51 typedef struct tile {
  52     color_t color;
  53     int number;
  54     int x;
  55     int y;
  56 } tile_t;
  57
  58 #define DECK_MAX_TILES 104
  59
  60 typedef struct deck {
  61     tile_t tiles[DECK_MAX_TILES];
  62     int num_tiles;
  63 } deck_t;
  64
  65 #define TILE_GROUP_MAX_TILES DECK_MAX_TILES
  66
  67 typedef struct tile_group {
  68     tile_t tiles[TILE_GROUP_MAX_TILES];
  69     int num_tiles;
  70 } tile_group_t;
  71
  72 #define BOARD_MAX_TILE_GROUPS (DECK_MAX_TILES / 3)
  73
  74 typedef struct board {
  75     tile_group_t groups[BOARD_MAX_TILE_GROUPS];
  76     int num_groups;
  77 } board_t;
  78
  79 typedef struct player {
  80     tile_group_t hand;
  81 } player_t;
  82
  83 #define GAME_MAX_PLAYERS 4
  84 #define GAME_WINDOW_DEFAULT_WIDTH  800
  85 #define GAME_WINDOW_DEFAULT_HEIGHT 600
  86
  87 typedef struct game {
  88     player_t players[GAME_MAX_PLAYERS];
  89     int num_players;
  90     board_t board;
  91     deck_t deck;
  92     RsvgHandle *blanktile;
  93
  94     int current_tile;
  95     int diff_x, diff_y;
  96 } game_t;
  97
  98 static void
  99 tile_init (tile_t *tile, color_t color, int number)
 100 {
 101     tile->color = color;
 102     tile->number = number;
 103     tile->x = 0;
 104     tile->y = 0;
 105 }
 106
 107 static void tile_print(tile_t tile)
 108 {
 109     printf("%6s %2d\n", colors[tile.color], tile.number + 1);
 110 }
 111
 112 static void tile_draw(game_t *game, tile_t *tile, cairo_t *cr)
 113 {
 114     char number_string[3];
 115     int len;
 116
 117     len = snprintf (number_string, 3, "%d", tile->number + 1);
 118     if (len < 0 || len >= 3)
 119         FATAL_ERROR ("snprintf failed");
 120
 121     cairo_save(cr);
 122     cairo_translate(cr, tile->x, tile->y);
 123     rsvg_handle_render_cairo (game->blanktile, cr);
 124
 125     if (tile->color == BLACK)
 126         cairo_set_source_rgb (cr, 0.0, 0.0, 0.0);
 127     if (tile->color == BLUE)
 128         cairo_set_source_rgb (cr, 0.0, 0.0, 1.0);
 129     if (tile->color == RED)
 130         cairo_set_source_rgb (cr, 1.0, 0.0, 0.0);
 131     if (tile->color == YELLOW)
 132         cairo_set_source_rgb (cr, 1.0, .843, 0.0);
 133     cairo_move_to (cr, 10, 25);
 134     cairo_set_font_size(cr, 25);
 135     cairo_show_text (cr, number_string);
 136
 137     cairo_restore(cr);
 138 }
 139
 140 static void tile_group_init(tile_group_t *tile_group)
 141 {
 142     tile_group->num_tiles = 0;
 143 }
 144
 145 static void board_init(board_t *board)
 146 {
 147     int i;
 148     board->num_groups = 0;
 149
 150     for (i = 0; i <= BOARD_MAX_TILE_GROUPS; ++i)
 151     {
 152         tile_group_init(&board->groups[i]);
 153     }
 154 }
 155
 156 static void player_init(player_t *player)
 157 {
 158     tile_group_init(&player->hand);
 159 }
 160
 161
 162 /* If tile_one < tile_two, then return value will be negative
 163    if they are equal, 0 will be returned,
 164    if tile_one > tile_two, then return value will be positive */
 165 static int tile_compare(const void *one, const void *two)
 166 {
 167     const tile_t *tile_one = one;
 168     const tile_t *tile_two = two;
 169     return tile_one->number - tile_two->number;
 170 }
 171
 172 static int tile_group_is_run_one(tile_group_t *tile_group)
 173 {
 174     int i;
 175     qsort (&tile_group->tiles[0], tile_group->num_tiles,
 176            sizeof (tile_t), tile_compare);
 177
 178     if (tile_group->num_tiles > 13 || tile_group->num_tiles < 3)
 179     {
 180         return 0;
 181     }
 182     for (i = 0; i < tile_group->num_tiles - 1; ++i)
 183         if(tile_group->tiles[i].color != tile_group->tiles[i + 1].color)
 184         {
 185             return 0;
 186         }
 187         if(tile_group->tiles[i].number != tile_group->tiles[i + 1].number -1)
 188         {
 189             return 0;
 190         }
 191     return 1;
 192 }
 193
 194
 195 static int tile_group_is_run_two(tile_group_t *tile_group)
 196 {
 197     int i;
 198     int lowest = 14, highest = 0;
 199     color_t run_color;
 200
 201     /* By definition, a run must have at least 3 tiles. Also, it's
 202      * impossible for any group of tiles with more than 13 tiles to be
 203      * a run, (there are only 13 unique numbers so a group with more
 204      * than 13 tiles must have some duplicates).
 205      */
 206     if (tile_group->num_tiles < 3 || tile_group->num_tiles > 13)
 207     {
 208         return 0;
 209     }
 210
 211     /* Loop through all tiles in the group, ensuring that they are all
 212      * the same color and finding the highest and lowest number in the
 213      * group. */
 214     run_color = tile_group->tiles[0].color;
 215
 216     for (i = 0; i < tile_group->num_tiles; i++)
 217     {
 218         if (tile_group->tiles[i].color != run_color)
 219             return 0;
 220         if (tile_group->tiles[i].number > highest)
 221         {
 222             highest = tile_group->tiles[i].number;
 223         }
 224         if (tile_group->tiles[i].number < lowest)
 225         {
 226             lowest = tile_group->tiles[i].number;
 227         }
 228     }
 229
 230     /* For a run, the difference between the highest and lowest tiles
 231      * will always be one less than the number of tiles in the
 232      * group. If not then we know it's not a run.
 233      */
 234     if (highest - lowest != tile_group->num_tiles - 1)
 235     {
 236         return 0;
 237     }
 238
 239     /* XXX: There's a bug here. We're guessing that at this point
 240      * anything we're looking at must be a run. This would be correct
 241      * if there were no duplicate tiles, but since there are
 242      * duplicates this us quite broken. For example consider two
 243      * sequences of entirely red tiles:
 244      *
 245      * This is a run:   1, 2, 3, 4
 246      * But this is not: 1, 3, 4, 4
 247      *
 248      * As currently written, this function will consider both of these
 249      * groups to be a run. One possible fix is to throw away the
 250      * highest - lowest heuristic and instead simply sort the tiles up
 251      * front and ensure the difference between each adjacent pair is
 252      * exactly 1.
 253      */
 254     return 1;
 255 }
 256
 257 static int tile_group_is_set(tile_group_t *tile_group)
 258 {
 259     int i;
 260     color_t seen_color[tile_group->num_tiles];
 261
 262     if (tile_group->num_tiles > 4 || tile_group->num_tiles < 3)
 263     {
 264         return 0;
 265     }
 266     for (i = 0; i < tile_group->num_tiles - 1; ++i)
 267     {
 268         if (tile_group->tiles[i].number != tile_group->tiles[i + 1].number)
 269         {
 270             return 0;
 271         }
 272     }
 273     seen_color[i] = tile_group->tiles[i].color;
 274     for (i = 0; i < tile_group->num_tiles; ++i)
 275     {
 276         seen_color[tile_group->tiles[i].color]++;
 277         if (seen_color[tile_group->tiles[i].color] > 1)
 278         {
 279             return 0;
 280         }
 281     }
 282     return 1;
 283 }
 284
 285 static void deck_deal(game_t *game, deck_t *deck)
 286 {
 287     tile_t temp;
 288     int rand_tile;
 289     int i, j, newline;
 290
 291     printf ("How many players(1-4) should I deal in? ");
 292     game->num_players = getchar();
 293     if (game->num_players == EOF)
 294     {
 295         printf ("\nGoodbye.\n");
 296         exit (1);
 297     }
 298     newline = getchar();
 299     game->num_players -= '0';
 300
 301     for (i = 0; i < game->num_players; ++i)
 302     {
 303         for (j = 0; j < 14; ++j)
 304         {
 305             rand_tile = ((deck->num_tiles + 1.0) * rand()) / (RAND_MAX + 1.0);
 306             temp = deck->tiles[rand_tile];
 307             deck->tiles[rand_tile] = deck->tiles[deck->num_tiles - 1];
 308             game->players[i].hand.tiles[j] = temp;
 309             deck->num_tiles -= 1;
 310             game->players[i].hand.num_tiles += 1;
 311         }
 312     }
 313     printf ("Game dealt for %d player(s)\n", game->num_players);
 314 }
 315
 316 static void deck_init(deck_t *deck)
 317 {
 318     int h, i, j;
 319     deck->num_tiles = 0;
 320     for (h = 0; h <= 1; ++h)
 321     {
 322         for (i = 0; i <= 3; ++i)
 323         {
 324             for (j = 0; j <= 12; ++j)
 325             {
 326                 tile_init (&deck->tiles[deck->num_tiles++], i, j);
 327                 printf ("There are %d tiles in the deck\n", deck->num_tiles);
 328             }
 329         }
 330     }
 331 }
 332
 333 static void deck_shuffle(deck_t *deck)
 334 {
 335     tile_t temp;
 336     int rand_tile;
 337     int last;
 338     for (last = deck->num_tiles; last > 0; --last)
 339     {
 340         rand_tile = ((last + 1.0) * rand()) / (RAND_MAX + 1.0);
 341         temp = deck->tiles[rand_tile];
 342         deck->tiles[rand_tile] = deck->tiles[last - 1];
 343         deck->tiles[last - 1] = temp;
 344     }
 345 }
 346
 347 static void deck_print(deck_t *deck)
 348 {
 349     int h, i, j;
 350     for (h = 0; h < 2; ++h)
 351     {
 352         for (i = 0; i < 4; ++i)
 353         {
 354             for (j = 0; j < 13; ++j)
 355             {
 356                 tile_print(deck->tiles[j + (i * 13) + (h * 52)]);
 357             }
 358         }
 359     }
 360     printf ("There are %d tiles in the deck\n" , deck->num_tiles);
 361 }
 362
 363 static void deck_spread(deck_t *deck)
 364 {
 365     int i, j;
 366     for (i = 0; i < 8; i++)
 367     {
 368         for (j = 0; j < 13; j++)
 369         {
 370             deck->tiles[j + (i * 13)].x = j * 50;
 371             deck->tiles[j + (i * 13)].y = i * 60;
 372         }
 373     }
 374 }
 375
 376 static void deck_draw(game_t *game, cairo_t *cr)
 377 {
 378     int i;
 379     for (i = 0; i < game->deck.num_tiles; i++)
 380     {
 381             tile_draw(game, &game->deck.tiles[i], cr);
 382     }
 383 }
 384
 385 static void hand_print(game_t *game)
 386 {
 387     int i;
 388     for (i = 0; i < game->players[0].hand.num_tiles; ++i)
 389     {
 390         tile_print(game->players[0].hand.tiles[i]);
 391     }
 392 }
 393
 394 /* static void hand_draw(game_t *game) */
 395 /* { */
 396
 397 /* } */
 398
 399 static void game_init(game_t *game)
 400 {
 401     int i;
 402     GError *error = NULL;
 403
 404     game->num_players = 0;
 405
 406     for (i = 0; i < GAME_MAX_PLAYERS; ++i)
 407     {
 408         player_init(&game->players[i]);
 409         game->num_players += 1;
 410     }
 411
 412     board_init(&game->board);
 413     deck_init(&game->deck);
 414     deck_shuffle(&game->deck);
 415
 416     game->blanktile = rsvg_handle_new_from_file ("tiles/blanktile.svg", &error);
 417     if (error)
 418         FATAL_ERROR (error->message);
 419
 420     game->current_tile = game->deck.num_tiles - 1;
 421     game->diff_x = game->diff_y = 0;
 422 }
 423
 424 static gboolean on_expose_event (GtkWidget *widget, GdkEventExpose *event, game_t *game)
 425 {
 426     cairo_t *cr;
 427
 428     cr = gdk_cairo_create (widget->window);
 429
 430     deck_draw(game, cr);
 431
 432     cairo_destroy (cr);
 433
 434     return TRUE;
 435 }
 436
 437 static gboolean on_key_press_event (GtkWidget *widget, GdkEventKey *event, game_t *game)
 438 {
 439     printf ("You pressed key %d\n", event->keyval);
 440
 441     return TRUE;
 442 }
 443
 444 static gboolean on_button_press_event (GtkWidget *widget, GdkEventButton *event, game_t *game)
 445 {
 446     int i, tile_x, tile_y;
 447
 448     for (i = 0; i < game->deck.num_tiles; i++)
 449     {
 450         tile_x = game->deck.tiles[i].x;
 451         tile_y = game->deck.tiles[i].y;
 452         if (event->x >= tile_x && event->x <= (tile_x + TILE_WIDTH) &&
 453             event->y >= tile_y && event->y <= (tile_y + TILE_HEIGHT) )
 454         {
 455             game->current_tile = i;
 456             game->diff_x = event->x - tile_x;
 457             game->diff_y = event->y - tile_y;
 458         }
 459     }
 460
 461     return TRUE;
 462 }
 463
 464 static gboolean on_button_release_event (GtkWidget *widget, GdkEventButton *event, game_t *game)
 465 {
 466     game->current_tile = -1;
 467     printf ("You released button %d\n", event->button);
 468
 469     return TRUE;
 470 }
 471
 472 static gboolean on_button_motion_event (GtkWidget *widget, GdkEventMotion *event,
 473                                         game_t *game, cairo_t *cr)
 474 {
 475     tile_t *tile;
 476
 477     tile = &game->deck.tiles[game->current_tile];
 478
 479     /* First, invalidate the region where the tile currently is. */
 480     gtk_widget_queue_draw_area (widget, tile->x - 1, tile->y - 1, TILE_WIDTH + 1, TILE_HEIGHT + 2);
 481
 482     /* Then, move the tile */
 483     tile->x = event->x - game->diff_x;
 484     tile->y = event->y - game->diff_y;
 485
 486     /* Finally, invalidate the region where the tile is now. */
 487     gtk_widget_queue_draw_area (widget, tile->x - 1, tile->y - 1, TILE_WIDTH + 1, TILE_HEIGHT + 2);
 488
 489     return TRUE;
 490 }
 491
 492 int main(int argc, char *argv[])
 493 {
 494     GtkWidget *window;
 495     game_t game;
 496
 497     srand(time(NULL));
 498
 499     gtk_init (&argc, &argv);
 500
 501     game_init(&game);
 502     deck_print(&game.deck);
 503     deck_spread(&game.deck);
 504     //deck_deal(&game, &game.deck);
 505     //hand_print(&game);
 506     //deck_print(&game.deck);
 507
 508     /* Create a new window */
 509     window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
 510     gtk_window_set_default_size (GTK_WINDOW (window),
 511                                  GAME_WINDOW_DEFAULT_WIDTH,
 512                                  GAME_WINDOW_DEFAULT_HEIGHT);
 513
 514     gtk_widget_set_events (window,
 515                            GDK_EXPOSURE_MASK |
 516                            GDK_KEY_PRESS_MASK |
 517                            GDK_BUTTON_MOTION_MASK |
 518                            GDK_BUTTON_PRESS_MASK |
 519                            GDK_BUTTON_RELEASE_MASK);
 520
 521     g_signal_connect (G_OBJECT (window), "delete_event",
 522                       G_CALLBACK (gtk_main_quit), NULL);
 523     g_signal_connect (G_OBJECT (window), "expose_event",
 524                       G_CALLBACK (on_expose_event), &game);
 525     g_signal_connect (G_OBJECT (window), "key_press_event",
 526                       G_CALLBACK (on_key_press_event), &game);
 527     g_signal_connect (G_OBJECT (window), "button_press_event",
 528                       G_CALLBACK (on_button_press_event), &game);
 529     g_signal_connect (G_OBJECT (window), "button_release_event",
 530                       G_CALLBACK (on_button_release_event), &game);
 531     g_signal_connect (G_OBJECT (window), "motion_notify_event",
 532                       G_CALLBACK (on_button_motion_event), &game);
 533
 534
 535     gtk_widget_show_all (window);
 536     gtk_main ();
 537
 538     return 0;
 539
 540 }