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