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