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 RACK_DICT_ENTRY_FOUND (1<<1)
  31 #define MAX_TILES 7
  32
  33 typedef struct _tile
  34 {
  35     char letter;
  36     int rack_index;
  37     int x, y;
  38     GooCanvasItem *item;
  39     gboolean guessed;
  40 } tile_t;
  41
  42 typedef struct _rack
  43 {
  44     tile_t *tiles[MAX_TILES];
  45     int num_tiles;
  46     char guess[MAX_TILES+1];
  47     int guess_length;
  48     dict_t *solution;
  49     GooCanvasItem *solution_item;
  50 } rack_t;
  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, dict_entry_t *entry)
  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     if (*entry & RACK_DICT_ENTRY_FOUND) {
  88         cairo_show_text (cr, word);
  89     } else {
  90         int i, length = strlen (word);
  91         for (i = 0; i < length; i++)
  92             cairo_show_text (cr, "_");
  93     }
  94     cairo_get_current_point (cr, &new_x, &new_y);
  95     if (new_x > cursor->max_column_width)
  96         cursor->max_column_width = new_x;
  97     cursor->y += cursor->line_height;
  98     if (cursor->y > cursor->max_y) {
  99         cursor->x = cursor->max_column_width + cursor->line_height / 2;
 100         cursor->y = 0;
 101     }
 102 }
 103
 104 #define SOLUTION_FONT_SIZE      12
 105 #define SOLUTION_LINE_HEIGHT    (1.5 * SOLUTION_FONT_SIZE)
 106
 107 static void
 108 dict_paint (cairo_t *cr, void *closure, double width, double height)
 109 {
 110     dict_t *dict = closure;
 111     dict_paint_cursor_t cursor;
 112
 113     cairo_save (cr);
 114     cairo_set_source_rgb (cr, 0.0, 0.0, 0.0); /* black */
 115
 116     cursor.cr = cr;
 117
 118     cairo_select_font_face (cr, "mono", 0, 0);
 119     cairo_set_font_size (cr, SOLUTION_FONT_SIZE);
 120     cursor.line_height = SOLUTION_LINE_HEIGHT;
 121
 122     cursor.x = 0;
 123     cursor.y = 0;
 124
 125     cursor.max_column_width = 0;
 126     cursor.max_y = height;
 127
 128     dict_for_each_by_length (dict,
 129                              dict_paint_action,
 130                              &cursor);
 131
 132     cairo_restore (cr);
 133 }
 134
 135 static void
 136 tile_paint (cairo_t *cr, void *closure, double width, double height)
 137 {
 138     tile_t *tile = closure;
 139
 140     cairo_pattern_t *gradient;
 141     cairo_text_extents_t extents;
 142     int rad = (int) MIN (width / 2, height / 2);
 143     int cx = width / 2;
 144     int cy = cx;
 145     int tx, ty;
 146     double spot_angle = M_PI / 4.0;
 147     double spot_rad = rad / 2.0;
 148     char string[2];
 149
 150     cairo_save (cr);
 151
 152     gradient = cairo_pattern_create_radial (cx - spot_rad * cos (spot_angle),
 153                                             cy - spot_rad * sin (spot_angle),
 154                                             0.0,
 155                                             cx - spot_rad * cos (spot_angle),
 156                                             cy - spot_rad * sin (spot_angle),
 157                                             rad + spot_rad);
 158     cairo_pattern_add_color_stop_rgb (gradient, 0.0, 1.0, 1.0, 1.0);
 159     cairo_pattern_add_color_stop_rgb (gradient, 1.0, 0.33, 0.33, 0.33);
 160
 161     cairo_set_source (cr, gradient);
 162
 163     cairo_arc (cr,
 164                cx, cy,
 165                rad, 0, 2 * M_PI);
 166
 167     cairo_fill (cr);
 168
 169     cairo_select_font_face (cr, "mono",
 170                             CAIRO_FONT_SLANT_NORMAL,
 171                             CAIRO_FONT_WEIGHT_BOLD);
 172     cairo_set_font_size (cr, 1.8 * rad);
 173
 174     string[0] = tile->letter;
 175     string[1] = '\0';
 176     cairo_text_extents (cr, string, &extents);
 177     tx = cx - extents.width / 2 - extents.x_bearing;
 178     ty = cy - extents.height / 2 - extents.y_bearing;
 179
 180     cairo_set_source_rgb (cr, 0.7, 0.7, 0.7);
 181     cairo_move_to (cr, tx + 1, ty + 1);
 182     cairo_show_text (cr, string);
 183
 184     cairo_set_source_rgb (cr, 0.33, 0.33, 0.33);
 185     cairo_move_to (cr, tx - 1, ty - 1);
 186     cairo_show_text (cr, string);
 187
 188     cairo_set_source_rgb (cr, 0.2, 0.3, 0.8);
 189     cairo_move_to (cr, tx, ty);
 190     cairo_show_text (cr, string);
 191
 192     cairo_restore (cr);
 193 }
 194
 195 static void
 196 tile_glide_to (tile_t *tile, int x, int y)
 197 {
 198     goo_canvas_item_animate (tile->item, x, y,
 199                              1.0, 0,
 200                              500, 40,
 201                              GOO_CANVAS_ANIMATE_FREEZE);
 202     tile->x = x;
 203     tile->y = y;
 204 }
 205
 206 static tile_t *
 207 tile_create (GooCanvasItem *parent,
 208              char letter, int rack_index)
 209 {
 210     tile_t *tile;
 211
 212     tile = g_malloc (sizeof (tile_t));
 213     tile->letter = tolower (letter);
 214     tile->rack_index = rack_index;
 215     rack_tile_position (rack_index, &tile->x, &tile->y);
 216     tile->item = goo_demo_item_new (parent,
 217                                     tile->x, tile->y,
 218                                     LETTER_SIZE, LETTER_SIZE,
 219                                     tile_paint,
 220                                     tile, NULL);
 221
 222     tile->guessed = FALSE;
 223
 224     return tile;
 225 }
 226
 227 static gboolean
 228 on_delete_event (GtkWidget *window,
 229                  GdkEvent  *event,
 230                  gpointer   unused_data)
 231 {
 232     exit (0);
 233 }
 234
 235 static int
 236 rand_within (int num_values)
 237 {
 238     return (int) ((double) num_values * (rand() / (RAND_MAX + 1.0)));
 239 }
 240
 241 static void
 242 shuffle (int *array, int length)
 243 {
 244     int i, r, tmp;
 245
 246     for (i = 0; i < length; i++)
 247     {
 248         r = i + rand_within (length - i);
 249         tmp = array[i];
 250         array[i] = array[r];
 251         array[r] = tmp;
 252     }
 253 }
 254
 255 static void
 256 rack_init (rack_t       *rack,
 257            dict_t       *solution)
 258 {
 259     int i;
 260
 261     for (i = 0; i < MAX_TILES; i++)
 262         rack->tiles[i] = NULL;
 263     rack->num_tiles = 0;
 264
 265     rack->guess_length = 0;
 266     rack->solution = solution;
 267     rack->solution_item = NULL;
 268 }
 269
 270 static void
 271 rack_create_tiles (rack_t       *rack,
 272                    GooCanvas    *canvas,
 273                    char         *word)
 274 {
 275     int i;
 276
 277     GooCanvasItem *root = goo_canvas_get_root_item (canvas);
 278
 279     for (i = 0; i < MIN (MAX_TILES, strlen (word)); i++)
 280         rack->tiles[i] = tile_create (root, word[i], i);
 281     rack->num_tiles = i;
 282 }
 283
 284 static gboolean
 285 rack_shuffle (rack_t *rack)
 286 {
 287     int indices[MAX_TILES];
 288     int i, x, y;
 289
 290     for (i = 0; i < rack->num_tiles; i++)
 291         indices[i] = i;
 292
 293     shuffle (indices, rack->num_tiles);
 294
 295     for (i = 0; i < rack->num_tiles; i++) {
 296         rack->tiles[i]->rack_index = indices[i];
 297         rack_tile_position (indices[i], &x, &y);
 298         tile_glide_to (rack->tiles[i], x, y);
 299     }
 300
 301     return TRUE;
 302 }
 303
 304 static void
 305 rack_return_tile (rack_t *rack, tile_t *tile)
 306 {
 307     int x, y;
 308
 309     rack_tile_position (tile->rack_index, &x, &y);
 310     tile_glide_to (tile, x, y);
 311     tile->guessed = FALSE;
 312     rack->guess_length--;
 313     rack->guess[rack->guess_length] = '\0';
 314 }
 315
 316 static void
 317 rack_return_all (rack_t *rack)
 318 {
 319     int i;
 320
 321     for (i = 0; i < rack->num_tiles; i++) {
 322         if (rack->tiles[i]->guessed)
 323             rack_return_tile (rack, rack->tiles[i]);
 324     }
 325     rack->guess_length = 0;
 326     rack->guess[0] = '\0';
 327 }
 328
 329 static gboolean
 330 on_key_press_event (GtkWidget   *widget,
 331                     GdkEventKey *event,
 332                     gpointer     user_data)
 333 {
 334     int i, x, y;
 335     char guess_letter;
 336     rack_t *rack = user_data;
 337
 338     if (event->keyval == GDK_Return) {
 339         dict_entry_t *entry;
 340         entry = dict_lookup (rack->solution, rack->guess);
 341         if (DICT_ENTRY_IS_WORD (entry)) {
 342             *entry = *entry | RACK_DICT_ENTRY_FOUND;
 343             goo_canvas_item_simple_changed (GOO_CANVAS_ITEM_SIMPLE (rack->solution_item), FALSE);
 344         }
 345         rack_return_all (rack);
 346         return TRUE;
 347     }
 348
 349     if (event->keyval == GDK_space) {
 350         rack_return_all (rack);
 351         rack_shuffle (rack);
 352         return TRUE;
 353     }
 354
 355     if (event->keyval == GDK_BackSpace) {
 356         gboolean found = FALSE;
 357         int found_index;
 358         x = 0;
 359         for (i = 0; i < rack->num_tiles; i++) {
 360             /* XXX: evil stuff here... please refactor a lot */
 361             if (rack->guess[rack->guess_length-1] == rack->tiles[i]->letter &&
 362                 rack->tiles[i]->guessed &&
 363                 rack->tiles[i]->x > x)
 364             {
 365                 found = TRUE;
 366                 found_index = i;
 367             }
 368         }
 369         if (found) {
 370             rack_return_tile (rack, rack->tiles[found_index]);
 371             return TRUE;
 372         }
 373         return FALSE;
 374     }
 375
 376     /* XXX: event->string is deprecated, but the non-deprecated
 377      * input-method stuff (GtkIMContext) is extremely non-obvious to
 378      * use. */
 379     guess_letter = tolower (event->string[0]);
 380     for (i = 0; i < rack->num_tiles; i++) {
 381         if (guess_letter == rack->tiles[i]->letter &&
 382             ! rack->tiles[i]->guessed)
 383         {
 384             guess_tile_position (rack->guess_length, &x, &y);
 385             tile_glide_to (rack->tiles[i], x, y);
 386             rack->tiles[i]->guessed = TRUE;
 387             rack->guess[rack->guess_length++] = guess_letter;
 388             rack->guess[rack->guess_length] = '\0';
 389             return TRUE;
 390         }
 391     }
 392
 393     return FALSE;
 394 }
 395
 396 static GtkWidget *
 397 create_window (rack_t *rack)
 398 {
 399     GtkWidget *window, *scrolled_window;
 400
 401     window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
 402     gtk_window_set_default_size (GTK_WINDOW (window), 500, 500);
 403     gtk_widget_show (window);
 404     g_signal_connect (window, "delete_event",
 405                       (GtkSignalFunc) on_delete_event, NULL);
 406
 407     gtk_widget_add_events (window, GDK_KEY_PRESS_MASK);
 408     g_signal_connect (window, "key_press_event",
 409                       (GtkSignalFunc) on_key_press_event, rack);
 410
 411     scrolled_window = gtk_scrolled_window_new (NULL, NULL);
 412     gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (scrolled_window),
 413                                          GTK_SHADOW_IN);
 414     gtk_scrolled_window_set_policy  (GTK_SCROLLED_WINDOW (scrolled_window),
 415                                      GTK_POLICY_AUTOMATIC,
 416                                      GTK_POLICY_AUTOMATIC);
 417     gtk_widget_show (scrolled_window);
 418     gtk_container_add (GTK_CONTAINER (window), scrolled_window);
 419
 420     return scrolled_window;
 421 }
 422
 423 static GooCanvas *
 424 create_canvas (GtkWidget *parent, rack_t *rack)
 425 {
 426     GtkWidget *canvas;
 427     GooCanvasItem *root;
 428
 429     canvas = goo_canvas_new ();
 430     gtk_widget_set_size_request (canvas, 400, 400);
 431     goo_canvas_set_bounds (GOO_CANVAS (canvas), 0, 0, 400, 400);
 432     gtk_widget_show (canvas);
 433     gtk_container_add (GTK_CONTAINER (parent), canvas);
 434
 435     root = goo_canvas_get_root_item (GOO_CANVAS (canvas));
 436
 437     rack->solution_item = goo_demo_item_new (root,
 438                                              LETTER_PAD + SOLUTION_LINE_HEIGHT,
 439                                              LETTER_PAD + 2 * (LETTER_SIZE + 2 * LETTER_PAD),
 440                                              400, 400 - (2 * (LETTER_SIZE + 2 * LETTER_PAD)),
 441                                              dict_paint, rack->solution,
 442                                              NULL);
 443
 444     return GOO_CANVAS (canvas);
 445 }
 446
 447 int
 448 main (int argc, char *argv[])
 449 {
 450     dict_t dict, solution;
 451     struct timeval tv;
 452     bag_t bag;
 453     rack_t rack;
 454     char word[8];
 455     int i;
 456     GtkWidget *window;
 457     GooCanvas *canvas;
 458
 459     gettimeofday (&tv, NULL);
 460     srand (tv.tv_sec ^ tv.tv_usec);
 461
 462     bag_init (&bag);
 463     bag_shuffle (&bag);
 464
 465     memcpy (word, bag.tiles, 7);
 466     word[7] = '\0';
 467
 468     for (i = 0; i < 7; i++)
 469         word[i] = toupper (word[i]);
 470
 471     dict_init (&dict);
 472     dict_add_words_from_file (&dict, "words.txt");
 473
 474     dict_init (&solution);
 475     subanagram_expand (word, &dict, &solution);
 476
 477     gtk_init (&argc, &argv);
 478
 479     rack_init (&rack, &solution);
 480
 481     window = create_window (&rack);
 482
 483     canvas = create_canvas (window, &rack);
 484
 485     rack_create_tiles (&rack, canvas, word);
 486
 487     gtk_main ();
 488
 489     return 0;
 490 }