git.cworth.org Git - wordgame/blob - rack-fancy.c

   1 /*
   2  * Copyright © 2006 Carl Worth
   3  *
   4  * This program is free software; you can redistribute it and\/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2, or (at your option)
   7  * any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software Foundation,
  16  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA."
  17  */
  18 #include <stdlib.h>
  19 #include <string.h>
  20 #include <goocanvas.h>
  21 #include <sys/time.h>
  22 #include <time.h>
  23 #include <ctype.h>
  24 #include <math.h>
  25 #include <gdk/gdkkeysyms.h>
  26
  27 #include "word-game.h"
  28 #include "demo-item.h"
  29
  30 #define MAX_TILES 7
  31
  32 typedef struct _tile
  33 {
  34     char letter;
  35     int rack_index;
  36     int x, y;
  37     GooCanvasItem *item;
  38     gboolean guessed;
  39 } tile_t;
  40
  41 typedef struct _rack
  42 {
  43     tile_t *tiles[MAX_TILES];
  44     int num_tiles;
  45     char guess[MAX_TILES+1];
  46     int guess_length;
  47     dict_t *solution;
  48 } rack_t;
  49
  50 static rack_t the_rack;
  51
  52 #define LETTER_SIZE 60
  53 #define LETTER_PAD 5
  54
  55 static void
  56 guess_tile_position (int i, int *x, int *y)
  57 {
  58     *x = 20 + i * (LETTER_SIZE + LETTER_PAD);
  59     *y = LETTER_PAD;
  60 }
  61
  62 static void
  63 rack_tile_position (int i, int *x, int *y)
  64 {
  65     guess_tile_position (i, x, y);
  66     *y += (LETTER_SIZE + LETTER_PAD);
  67 }
  68
  69 typedef struct _dict_paint_cursor
  70 {
  71     cairo_t *cr;
  72     int line_height;
  73     int x;
  74     int y;
  75     int max_column_width;
  76     int max_y;
  77 } dict_paint_cursor_t;
  78
  79 static void
  80 dict_paint_action (void *closure, char *word)
  81 {
  82     dict_paint_cursor_t *cursor = closure;
  83     cairo_t *cr = cursor->cr;
  84     double new_x, new_y;
  85
  86     cairo_move_to (cr, cursor->x, cursor->y);
  87     cairo_show_text (cr, word);
  88     cairo_get_current_point (cr, &new_x, &new_y);
  89     if (new_x > cursor->max_column_width)
  90         cursor->max_column_width = new_x;
  91     cursor->y += cursor->line_height;
  92     if (cursor->y > cursor->max_y) {
  93         cursor->x = cursor->max_column_width + cursor->line_height / 2;
  94         cursor->y = 0;
  95     }
  96 }
  97
  98 static void
  99 dict_paint (cairo_t *cr, void *closure, double width, double height)
 100 {
 101     dict_t *dict = closure;
 102     dict_paint_cursor_t cursor;
 103
 104     cairo_save (cr);
 105     cairo_set_source_rgb (cr, 0.0, 0.0, 0.0); /* black */
 106
 107     cursor.cr = cr;
 108
 109     cairo_set_font_size (cr, 12);
 110     cursor.line_height = 14;
 111
 112     cursor.x = 0;
 113     cursor.y = 0;
 114
 115     cursor.max_column_width = 0;
 116     cursor.max_y = height;
 117
 118     dict_for_each_by_length (dict,
 119                              dict_paint_action,
 120                              &cursor);
 121
 122     cairo_restore (cr);
 123 }
 124
 125 static void
 126 tile_paint (cairo_t *cr, void *closure, double width, double height)
 127 {
 128     tile_t *tile = closure;
 129
 130     cairo_pattern_t *gradient;
 131     cairo_text_extents_t extents;
 132     int rad = (int) MIN (width / 2, height / 2);
 133     int cx = width / 2;
 134     int cy = cx;
 135     int tx, ty;
 136     double spot_angle = M_PI / 4.0;
 137     double spot_rad = rad / 2.0;
 138     char string[2];
 139
 140     cairo_save (cr);
 141
 142     gradient = cairo_pattern_create_radial (cx - spot_rad * cos (spot_angle),
 143                                             cy - spot_rad * sin (spot_angle),
 144                                             0.0,
 145                                             cx - spot_rad * cos (spot_angle),
 146                                             cy - spot_rad * sin (spot_angle),
 147                                             rad + spot_rad);
 148     cairo_pattern_add_color_stop_rgb (gradient, 0.0, 1.0, 1.0, 1.0);
 149     cairo_pattern_add_color_stop_rgb (gradient, 1.0, 0.33, 0.33, 0.33);
 150
 151     cairo_set_source (cr, gradient);
 152
 153     cairo_arc (cr,
 154                cx, cy,
 155                rad, 0, 2 * M_PI);
 156
 157     cairo_fill (cr);
 158
 159     cairo_select_font_face (cr, "mono",
 160                             CAIRO_FONT_SLANT_NORMAL,
 161                             CAIRO_FONT_WEIGHT_BOLD);
 162     cairo_set_font_size (cr, 1.8 * rad);
 163
 164     string[0] = tile->letter;
 165     string[1] = '\0';
 166     cairo_text_extents (cr, string, &extents);
 167     tx = cx - extents.width / 2 - extents.x_bearing;
 168     ty = cy - extents.height / 2 - extents.y_bearing;
 169
 170     cairo_set_source_rgb (cr, 0.7, 0.7, 0.7);
 171     cairo_move_to (cr, tx + 1, ty + 1);
 172     cairo_show_text (cr, string);
 173
 174     cairo_set_source_rgb (cr, 0.33, 0.33, 0.33);
 175     cairo_move_to (cr, tx - 1, ty - 1);
 176     cairo_show_text (cr, string);
 177
 178     cairo_set_source_rgb (cr, 0.2, 0.3, 0.8);
 179     cairo_move_to (cr, tx, ty);
 180     cairo_show_text (cr, string);
 181
 182     cairo_restore (cr);
 183 }
 184
 185 static void
 186 tile_glide_to (tile_t *tile, int x, int y)
 187 {
 188     goo_canvas_item_animate (tile->item, x, y,
 189                              1.0, 0,
 190                              500, 40,
 191                              GOO_CANVAS_ANIMATE_FREEZE);
 192     tile->x = x;
 193     tile->y = y;
 194 }
 195
 196 static tile_t *
 197 tile_create (GooCanvasItem *parent,
 198              char letter, int rack_index)
 199 {
 200     tile_t *tile;
 201
 202     tile = g_malloc (sizeof (tile_t));
 203     tile->letter = tolower (letter);
 204     tile->rack_index = rack_index;
 205     rack_tile_position (rack_index, &tile->x, &tile->y);
 206     tile->item = goo_demo_item_new (parent,
 207                                     tile->x, tile->y,
 208                                     LETTER_SIZE, LETTER_SIZE,
 209                                     tile_paint,
 210                                     tile, NULL);
 211
 212     tile->guessed = FALSE;
 213
 214     return tile;
 215 }
 216
 217 static gboolean
 218 on_delete_event (GtkWidget *window,
 219                  GdkEvent  *event,
 220                  gpointer   unused_data)
 221 {
 222     exit (0);
 223 }
 224
 225 static int
 226 rand_within (int num_values)
 227 {
 228     return (int) ((double) num_values * (rand() / (RAND_MAX + 1.0)));
 229 }
 230
 231 static void
 232 shuffle (int *array, int length)
 233 {
 234     int i, r, tmp;
 235
 236     for (i = 0; i < length; i++)
 237     {
 238         r = i + rand_within (length - i);
 239         tmp = array[i];
 240         array[i] = array[r];
 241         array[r] = tmp;
 242     }
 243 }
 244
 245 static void
 246 rack_init (rack_t *rack, GooCanvasItem *parent, char *word, dict_t *solution)
 247 {
 248     int i;
 249
 250     for (i = 0; i < MIN (MAX_TILES, strlen (word)); i++)
 251         rack->tiles[i] = tile_create (parent, word[i], i);
 252     rack->num_tiles = i;
 253     while (i < MAX_TILES)
 254         rack->tiles[i] = NULL;
 255     rack->guess_length = 0;
 256     rack->solution = solution;
 257 }
 258
 259 static gboolean
 260 rack_shuffle (rack_t *rack)
 261 {
 262     int indices[MAX_TILES];
 263     int i, x, y;
 264
 265     for (i = 0; i < rack->num_tiles; i++)
 266         indices[i] = i;
 267
 268     shuffle (indices, rack->num_tiles);
 269
 270     for (i = 0; i < rack->num_tiles; i++) {
 271         rack->tiles[i]->rack_index = indices[i];
 272         rack_tile_position (indices[i], &x, &y);
 273         tile_glide_to (rack->tiles[i], x, y);
 274     }
 275
 276     return TRUE;
 277 }
 278
 279 static void
 280 rack_return_tile (rack_t *rack, tile_t *tile)
 281 {
 282     int x, y;
 283
 284     rack_tile_position (tile->rack_index, &x, &y);
 285     tile_glide_to (tile, x, y);
 286     tile->guessed = FALSE;
 287     rack->guess_length--;
 288     rack->guess[rack->guess_length] = '\0';
 289 }
 290
 291 static void
 292 rack_return_all (rack_t *rack)
 293 {
 294     int i;
 295
 296     for (i = 0; i < rack->num_tiles; i++) {
 297         if (rack->tiles[i]->guessed)
 298             rack_return_tile (rack, rack->tiles[i]);
 299     }
 300     rack->guess_length = 0;
 301     rack->guess[0] = '\0';
 302 }
 303
 304 static gboolean
 305 on_key_press_event (GtkWidget   *widget,
 306                     GdkEventKey *event,
 307                     gpointer     user_data)
 308 {
 309     int i, x, y;
 310     char guess_letter;
 311     rack_t *rack = user_data;
 312
 313     if (event->keyval == GDK_Return) {
 314         dict_entry_t *entry;
 315         entry = dict_lookup (rack->solution, rack->guess);
 316         if (DICT_ENTRY_IS_WORD (entry))
 317             printf ("%s is good\n", rack->guess);
 318         else
 319             printf ("%s is not a word\n", rack->guess);
 320         rack_return_all (rack);
 321         return TRUE;
 322     }
 323
 324     if (event->keyval == GDK_space) {
 325         rack_return_all (rack);
 326         rack_shuffle (rack);
 327         return TRUE;
 328     }
 329
 330     if (event->keyval == GDK_BackSpace) {
 331         gboolean found = FALSE;
 332         int found_index;
 333         x = 0;
 334         for (i = 0; i < rack->num_tiles; i++) {
 335             /* XXX: evil stuff here... please refactor a lot */
 336             if (rack->guess[rack->guess_length-1] == rack->tiles[i]->letter &&
 337                 rack->tiles[i]->guessed &&
 338                 rack->tiles[i]->x > x)
 339             {
 340                 found = TRUE;
 341                 found_index = i;
 342             }
 343         }
 344         if (found) {
 345             rack_return_tile (rack, rack->tiles[found_index]);
 346             return TRUE;
 347         }
 348         return FALSE;
 349     }
 350
 351     /* XXX: event->string is deprecated, but the non-deprecated
 352      * input-method stuff (GtkIMContext) is extremely non-obvious to
 353      * use. */
 354     guess_letter = tolower (event->string[0]);
 355     for (i = 0; i < rack->num_tiles; i++) {
 356         if (guess_letter == rack->tiles[i]->letter &&
 357             ! rack->tiles[i]->guessed)
 358         {
 359             guess_tile_position (rack->guess_length, &x, &y);
 360             tile_glide_to (rack->tiles[i], x, y);
 361             rack->tiles[i]->guessed = TRUE;
 362             rack->guess[rack->guess_length++] = guess_letter;
 363             rack->guess[rack->guess_length] = '\0';
 364             return TRUE;
 365         }
 366     }
 367
 368     return FALSE;
 369 }
 370
 371 static GtkWidget *
 372 create_window (void)
 373 {
 374     GtkWidget *window, *scrolled_window;
 375
 376     window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
 377     gtk_window_set_default_size (GTK_WINDOW (window), 500, 500);
 378     gtk_widget_show (window);
 379     g_signal_connect (window, "delete_event",
 380                       (GtkSignalFunc) on_delete_event, NULL);
 381
 382     gtk_widget_add_events (window, GDK_KEY_PRESS_MASK);
 383     g_signal_connect (window, "key_press_event",
 384                       (GtkSignalFunc) on_key_press_event, &the_rack);
 385
 386     scrolled_window = gtk_scrolled_window_new (NULL, NULL);
 387     gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (scrolled_window),
 388                                          GTK_SHADOW_IN);
 389     gtk_scrolled_window_set_policy  (GTK_SCROLLED_WINDOW (scrolled_window),
 390                                      GTK_POLICY_AUTOMATIC,
 391                                      GTK_POLICY_AUTOMATIC);
 392     gtk_widget_show (scrolled_window);
 393     gtk_container_add (GTK_CONTAINER (window), scrolled_window);
 394
 395     return scrolled_window;
 396 }
 397
 398 static void
 399 create_canvas (GtkWidget *parent, char *word, dict_t *solution)
 400 {
 401     GtkWidget *canvas;
 402     GooCanvasItem *root;
 403
 404     canvas = goo_canvas_new ();
 405     gtk_widget_set_size_request (canvas, 400, 400);
 406     goo_canvas_set_bounds (GOO_CANVAS (canvas), 0, 0, 400, 400);
 407     gtk_widget_show (canvas);
 408     gtk_container_add (GTK_CONTAINER (parent), canvas);
 409
 410     root = goo_canvas_get_root_item (GOO_CANVAS (canvas));
 411
 412     rack_init (&the_rack, root, word, solution);
 413
 414     goo_demo_item_new (root,
 415                        LETTER_PAD,
 416                        LETTER_PAD + 2 * (LETTER_SIZE + 2 * LETTER_PAD),
 417                        400, 400 - (2 * (LETTER_SIZE + 2 * LETTER_PAD)),
 418                        dict_paint,
 419                        solution, NULL);
 420 }
 421
 422 int
 423 main (int argc, char *argv[])
 424 {
 425     dict_t dict, solution;
 426     struct timeval tv;
 427     bag_t bag;
 428     char rack[8];
 429     int i;
 430     GtkWidget *window;
 431
 432     gettimeofday (&tv, NULL);
 433     srand (tv.tv_sec ^ tv.tv_usec);
 434
 435     bag_init (&bag);
 436     bag_shuffle (&bag);
 437
 438     memcpy (rack, bag.tiles, 7);
 439     rack[7] = '\0';
 440
 441     for (i = 0; i < 7; i++)
 442         rack[i] = toupper (rack[i]);
 443
 444     dict_init (&dict);
 445     dict_add_words_from_file (&dict, "words.txt");
 446
 447     dict_init (&solution);
 448     subanagram_expand (rack, &dict, &solution);
 449
 450     gtk_init (&argc, &argv);
 451     window = create_window ();
 452
 453     create_canvas (window, rack, &solution);
 454
 455     gtk_main ();
 456
 457     return 0;
 458 }