chiark / gitweb /
I've had two complaints that Solo ought to recognise the numeric
[sgt-puzzles.git] / gtk.c
1 /*
2  * gtk.c: GTK front end for my puzzle collection.
3  */
4
5 #include <stdio.h>
6 #include <assert.h>
7 #include <stdlib.h>
8 #include <time.h>
9 #include <stdarg.h>
10 #include <string.h>
11
12 #include <sys/time.h>
13
14 #include <gtk/gtk.h>
15 #include <gdk/gdkkeysyms.h>
16
17 #include <gdk/gdkx.h>
18 #include <X11/Xlib.h>
19 #include <X11/Xutil.h>
20 #include <X11/Xatom.h>
21
22 #include "puzzles.h"
23
24 /* ----------------------------------------------------------------------
25  * Error reporting functions used elsewhere.
26  */
27
28 void fatal(char *fmt, ...)
29 {
30     va_list ap;
31
32     fprintf(stderr, "fatal error: ");
33
34     va_start(ap, fmt);
35     vfprintf(stderr, fmt, ap);
36     va_end(ap);
37
38     fprintf(stderr, "\n");
39     exit(1);
40 }
41
42 /* ----------------------------------------------------------------------
43  * GTK front end to puzzles.
44  */
45
46 struct font {
47     GdkFont *font;
48     int type;
49     int size;
50 };
51
52 /*
53  * This structure holds all the data relevant to a single window.
54  * In principle this would allow us to open multiple independent
55  * puzzle windows, although I can't currently see any real point in
56  * doing so. I'm just coding cleanly because there's no
57  * particularly good reason not to.
58  */
59 struct frontend {
60     GtkWidget *window;
61     GtkWidget *area;
62     GtkWidget *statusbar;
63     guint statusctx;
64     GdkPixmap *pixmap;
65     GdkColor *colours;
66     int ncolours;
67     GdkColormap *colmap;
68     int w, h;
69     midend_data *me;
70     GdkGC *gc;
71     int bbox_l, bbox_r, bbox_u, bbox_d;
72     int timer_active, timer_id;
73     struct timeval last_time;
74     struct font *fonts;
75     int nfonts, fontsize;
76     config_item *cfg;
77     int cfg_which, cfgret;
78     GtkWidget *cfgbox;
79     char *paste_data;
80     int paste_data_len;
81 };
82
83 void get_random_seed(void **randseed, int *randseedsize)
84 {
85     time_t *tp = snew(time_t);
86     time(tp);
87     *randseed = (void *)tp;
88     *randseedsize = sizeof(time_t);
89 }
90
91 void frontend_default_colour(frontend *fe, float *output)
92 {
93     GdkColor col = fe->window->style->bg[GTK_STATE_NORMAL];
94     output[0] = col.red / 65535.0;
95     output[1] = col.green / 65535.0;
96     output[2] = col.blue / 65535.0;
97 }
98
99 void status_bar(frontend *fe, char *text)
100 {
101     assert(fe->statusbar);
102
103     gtk_statusbar_pop(GTK_STATUSBAR(fe->statusbar), fe->statusctx);
104     gtk_statusbar_push(GTK_STATUSBAR(fe->statusbar), fe->statusctx, text);
105 }
106
107 void start_draw(frontend *fe)
108 {
109     fe->gc = gdk_gc_new(fe->area->window);
110     fe->bbox_l = fe->w;
111     fe->bbox_r = 0;
112     fe->bbox_u = fe->h;
113     fe->bbox_d = 0;
114 }
115
116 void clip(frontend *fe, int x, int y, int w, int h)
117 {
118     GdkRectangle rect;
119
120     rect.x = x;
121     rect.y = y;
122     rect.width = w;
123     rect.height = h;
124
125     gdk_gc_set_clip_rectangle(fe->gc, &rect);
126 }
127
128 void unclip(frontend *fe)
129 {
130     GdkRectangle rect;
131
132     rect.x = 0;
133     rect.y = 0;
134     rect.width = fe->w;
135     rect.height = fe->h;
136
137     gdk_gc_set_clip_rectangle(fe->gc, &rect);
138 }
139
140 void draw_text(frontend *fe, int x, int y, int fonttype, int fontsize,
141                int align, int colour, char *text)
142 {
143     int i;
144
145     /*
146      * Find or create the font.
147      */
148     for (i = 0; i < fe->nfonts; i++)
149         if (fe->fonts[i].type == fonttype && fe->fonts[i].size == fontsize)
150             break;
151
152     if (i == fe->nfonts) {
153         if (fe->fontsize <= fe->nfonts) {
154             fe->fontsize = fe->nfonts + 10;
155             fe->fonts = sresize(fe->fonts, fe->fontsize, struct font);
156         }
157
158         fe->nfonts++;
159
160         fe->fonts[i].type = fonttype;
161         fe->fonts[i].size = fontsize;
162
163 #if GTK_CHECK_VERSION(2,0,0)
164         /*
165          * Use Pango to find the closest match to the requested
166          * font.
167          */
168         {
169             PangoFontDescription *fd;
170
171             fd = pango_font_description_new();
172             /* `Monospace' and `Sans' are meta-families guaranteed to exist */
173             pango_font_description_set_family(fd, fonttype == FONT_FIXED ?
174                                               "Monospace" : "Sans");
175             pango_font_description_set_weight(fd, PANGO_WEIGHT_BOLD);
176             /*
177              * I found some online Pango documentation which
178              * described a function called
179              * pango_font_description_set_absolute_size(), which is
180              * _exactly_ what I want here. Unfortunately, none of
181              * my local Pango installations have it (presumably
182              * they're too old), so I'm going to have to hack round
183              * it by figuring out the point size myself. This
184              * limits me to X and probably also breaks in later
185              * Pango installations, so ideally I should add another
186              * CHECK_VERSION type ifdef and use set_absolute_size
187              * where available. All very annoying.
188              */
189 #ifdef HAVE_SENSIBLE_ABSOLUTE_SIZE_FUNCTION
190             pango_font_description_set_absolute_size(fd, PANGO_SCALE*fontsize);
191 #else
192             {
193                 Display *d = GDK_DISPLAY();
194                 int s = DefaultScreen(d);
195                 double resolution =
196                     (PANGO_SCALE * 72.27 / 25.4) * 
197                     ((double) DisplayWidthMM(d, s) / DisplayWidth (d, s));
198                 pango_font_description_set_size(fd, resolution * fontsize);
199             }
200 #endif
201             fe->fonts[i].font = gdk_font_from_description(fd);
202             pango_font_description_free(fd);
203         }
204
205         if (!fe->fonts[i].font)
206 #endif
207             /*
208              * In GTK 1.2, I don't know of any plausible way to
209              * pick a suitable font, so I'm just going to be
210              * tedious.
211              * 
212              * This is also fallback code called if the Pango
213              * approach fails to find an appropriate font.
214              */
215             fe->fonts[i].font = gdk_font_load(fonttype == FONT_FIXED ?
216                                               "fixed" : "variable");
217     }
218
219     /*
220      * Find string dimensions and process alignment.
221      */
222     {
223         int lb, rb, wid, asc, desc;
224
225         /*
226          * Measure vertical string extents with respect to the same
227          * string always...
228          */
229         gdk_string_extents(fe->fonts[i].font,
230                            "ABCDEFGHIJKLMNOPQRSTUVWXYZ",
231                            &lb, &rb, &wid, &asc, &desc);
232         if (align & ALIGN_VCENTRE)
233             y += asc - (asc+desc)/2;
234
235         /*
236          * ... but horizontal extents with respect to the provided
237          * string. This means that multiple pieces of text centred
238          * on the same y-coordinate don't have different baselines.
239          */
240         gdk_string_extents(fe->fonts[i].font, text,
241                            &lb, &rb, &wid, &asc, &desc);
242
243         if (align & ALIGN_HCENTRE)
244             x -= wid / 2;
245         else if (align & ALIGN_HRIGHT)
246             x -= wid;
247
248     }
249
250     /*
251      * Set colour and actually draw text.
252      */
253     gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
254     gdk_draw_string(fe->pixmap, fe->fonts[i].font, fe->gc, x, y, text);
255 }
256
257 void draw_rect(frontend *fe, int x, int y, int w, int h, int colour)
258 {
259     gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
260     gdk_draw_rectangle(fe->pixmap, fe->gc, 1, x, y, w, h);
261 }
262
263 void draw_line(frontend *fe, int x1, int y1, int x2, int y2, int colour)
264 {
265     gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
266     gdk_draw_line(fe->pixmap, fe->gc, x1, y1, x2, y2);
267 }
268
269 void draw_polygon(frontend *fe, int *coords, int npoints,
270                   int fill, int colour)
271 {
272     GdkPoint *points = snewn(npoints, GdkPoint);
273     int i;
274
275     for (i = 0; i < npoints; i++) {
276         points[i].x = coords[i*2];
277         points[i].y = coords[i*2+1];
278     }
279
280     gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
281     gdk_draw_polygon(fe->pixmap, fe->gc, fill, points, npoints);
282
283     sfree(points);
284 }
285
286 void draw_update(frontend *fe, int x, int y, int w, int h)
287 {
288     if (fe->bbox_l > x  ) fe->bbox_l = x  ;
289     if (fe->bbox_r < x+w) fe->bbox_r = x+w;
290     if (fe->bbox_u > y  ) fe->bbox_u = y  ;
291     if (fe->bbox_d < y+h) fe->bbox_d = y+h;
292 }
293
294 void end_draw(frontend *fe)
295 {
296     gdk_gc_unref(fe->gc);
297     fe->gc = NULL;
298
299     if (fe->bbox_l < fe->bbox_r && fe->bbox_u < fe->bbox_d) {
300         gdk_draw_pixmap(fe->area->window,
301                         fe->area->style->fg_gc[GTK_WIDGET_STATE(fe->area)],
302                         fe->pixmap,
303                         fe->bbox_l, fe->bbox_u,
304                         fe->bbox_l, fe->bbox_u,
305                         fe->bbox_r - fe->bbox_l, fe->bbox_d - fe->bbox_u);
306     }
307 }
308
309 static void destroy(GtkWidget *widget, gpointer data)
310 {
311     frontend *fe = (frontend *)data;
312     deactivate_timer(fe);
313     gtk_main_quit();
314 }
315
316 static gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
317 {
318     frontend *fe = (frontend *)data;
319     int keyval;
320
321     if (!fe->pixmap)
322         return TRUE;
323
324     if (event->keyval == GDK_Up)
325         keyval = CURSOR_UP;
326     else if (event->keyval == GDK_KP_Up || event->keyval == GDK_KP_8)
327         keyval = MOD_NUM_KEYPAD | '8';
328     else if (event->keyval == GDK_Down)
329         keyval = CURSOR_DOWN;
330     else if (event->keyval == GDK_KP_Down || event->keyval == GDK_KP_2)
331         keyval = MOD_NUM_KEYPAD | '2';
332     else if (event->keyval == GDK_Left)
333         keyval = CURSOR_LEFT;
334     else if (event->keyval == GDK_KP_Left || event->keyval == GDK_KP_4)
335         keyval = MOD_NUM_KEYPAD | '4';
336     else if (event->keyval == GDK_Right)
337         keyval = CURSOR_RIGHT;
338     else if (event->keyval == GDK_KP_Right || event->keyval == GDK_KP_6)
339         keyval = MOD_NUM_KEYPAD | '6';
340     else if (event->keyval == GDK_KP_Home || event->keyval == GDK_KP_7)
341         keyval = MOD_NUM_KEYPAD | '7';
342     else if (event->keyval == GDK_KP_End || event->keyval == GDK_KP_1)
343         keyval = MOD_NUM_KEYPAD | '1';
344     else if (event->keyval == GDK_KP_Page_Up || event->keyval == GDK_KP_9)
345         keyval = MOD_NUM_KEYPAD | '9';
346     else if (event->keyval == GDK_KP_Page_Down || event->keyval == GDK_KP_3)
347         keyval = MOD_NUM_KEYPAD | '3';
348     else if (event->keyval == GDK_KP_Insert || event->keyval == GDK_KP_0)
349         keyval = MOD_NUM_KEYPAD | '0';
350     else if (event->keyval == GDK_KP_Begin || event->keyval == GDK_KP_5)
351         keyval = MOD_NUM_KEYPAD | '5';
352     else if (event->string[0] && !event->string[1])
353         keyval = (unsigned char)event->string[0];
354     else
355         keyval = -1;
356
357     if (keyval >= 0 &&
358         !midend_process_key(fe->me, 0, 0, keyval))
359         gtk_widget_destroy(fe->window);
360
361     return TRUE;
362 }
363
364 static gint button_event(GtkWidget *widget, GdkEventButton *event,
365                          gpointer data)
366 {
367     frontend *fe = (frontend *)data;
368     int button;
369
370     if (!fe->pixmap)
371         return TRUE;
372
373     if (event->type != GDK_BUTTON_PRESS && event->type != GDK_BUTTON_RELEASE)
374         return TRUE;
375
376     if (event->button == 2 || (event->state & GDK_SHIFT_MASK))
377         button = MIDDLE_BUTTON;
378     else if (event->button == 1)
379         button = LEFT_BUTTON;
380     else if (event->button == 3)
381         button = RIGHT_BUTTON;
382     else
383         return FALSE;                  /* don't even know what button! */
384
385     if (event->type == GDK_BUTTON_RELEASE)
386         button += LEFT_RELEASE - LEFT_BUTTON;
387
388     if (!midend_process_key(fe->me, event->x, event->y, button))
389         gtk_widget_destroy(fe->window);
390
391     return TRUE;
392 }
393
394 static gint motion_event(GtkWidget *widget, GdkEventMotion *event,
395                          gpointer data)
396 {
397     frontend *fe = (frontend *)data;
398     int button;
399
400     if (!fe->pixmap)
401         return TRUE;
402
403     if (event->state & (GDK_BUTTON2_MASK | GDK_SHIFT_MASK))
404         button = MIDDLE_DRAG;
405     else if (event->state & GDK_BUTTON1_MASK)
406         button = LEFT_DRAG;
407     else if (event->state & GDK_BUTTON3_MASK)
408         button = RIGHT_DRAG;
409     else
410         return FALSE;                  /* don't even know what button! */
411
412     if (!midend_process_key(fe->me, event->x, event->y, button))
413         gtk_widget_destroy(fe->window);
414
415     return TRUE;
416 }
417
418 static gint expose_area(GtkWidget *widget, GdkEventExpose *event,
419                         gpointer data)
420 {
421     frontend *fe = (frontend *)data;
422
423     if (fe->pixmap) {
424         gdk_draw_pixmap(widget->window,
425                         widget->style->fg_gc[GTK_WIDGET_STATE(widget)],
426                         fe->pixmap,
427                         event->area.x, event->area.y,
428                         event->area.x, event->area.y,
429                         event->area.width, event->area.height);
430     }
431     return TRUE;
432 }
433
434 static gint map_window(GtkWidget *widget, GdkEvent *event,
435                        gpointer data)
436 {
437     frontend *fe = (frontend *)data;
438
439     /*
440      * Apparently we need to do this because otherwise the status
441      * bar will fail to update immediately. Annoying, but there we
442      * go.
443      */
444     gtk_widget_queue_draw(fe->window);
445
446     return TRUE;
447 }
448
449 static gint configure_area(GtkWidget *widget,
450                            GdkEventConfigure *event, gpointer data)
451 {
452     frontend *fe = (frontend *)data;
453     GdkGC *gc;
454
455     if (fe->pixmap)
456         gdk_pixmap_unref(fe->pixmap);
457
458     fe->pixmap = gdk_pixmap_new(widget->window, fe->w, fe->h, -1);
459
460     gc = gdk_gc_new(fe->area->window);
461     gdk_gc_set_foreground(gc, &fe->colours[0]);
462     gdk_draw_rectangle(fe->pixmap, gc, 1, 0, 0, fe->w, fe->h);
463     gdk_gc_unref(gc);
464
465     midend_redraw(fe->me);
466
467     return TRUE;
468 }
469
470 static gint timer_func(gpointer data)
471 {
472     frontend *fe = (frontend *)data;
473
474     if (fe->timer_active) {
475         struct timeval now;
476         float elapsed;
477         gettimeofday(&now, NULL);
478         elapsed = ((now.tv_usec - fe->last_time.tv_usec) * 0.000001F +
479                    (now.tv_sec - fe->last_time.tv_sec));
480         midend_timer(fe->me, elapsed);  /* may clear timer_active */
481         fe->last_time = now;
482     }
483
484     return fe->timer_active;
485 }
486
487 void deactivate_timer(frontend *fe)
488 {
489     if (fe->timer_active)
490         gtk_timeout_remove(fe->timer_id);
491     fe->timer_active = FALSE;
492 }
493
494 void activate_timer(frontend *fe)
495 {
496     if (!fe->timer_active) {
497         fe->timer_id = gtk_timeout_add(20, timer_func, fe);
498         gettimeofday(&fe->last_time, NULL);
499     }
500     fe->timer_active = TRUE;
501 }
502
503 static void window_destroy(GtkWidget *widget, gpointer data)
504 {
505     gtk_main_quit();
506 }
507
508 static void errmsg_button_clicked(GtkButton *button, gpointer data)
509 {
510     gtk_widget_destroy(GTK_WIDGET(data));
511 }
512
513 static int win_key_press(GtkWidget *widget, GdkEventKey *event, gpointer data)
514 {
515     GtkObject *cancelbutton = GTK_OBJECT(data);
516
517     /*
518      * `Escape' effectively clicks the cancel button
519      */
520     if (event->keyval == GDK_Escape) {
521         gtk_signal_emit_by_name(GTK_OBJECT(cancelbutton), "clicked");
522         return TRUE;
523     }
524
525     return FALSE;
526 }
527
528 void error_box(GtkWidget *parent, char *msg)
529 {
530     GtkWidget *window, *hbox, *text, *ok;
531
532     window = gtk_dialog_new();
533     text = gtk_label_new(msg);
534     gtk_misc_set_alignment(GTK_MISC(text), 0.0, 0.0);
535     hbox = gtk_hbox_new(FALSE, 0);
536     gtk_box_pack_start(GTK_BOX(hbox), text, FALSE, FALSE, 20);
537     gtk_box_pack_start(GTK_BOX(GTK_DIALOG(window)->vbox),
538                        hbox, FALSE, FALSE, 20);
539     gtk_widget_show(text);
540     gtk_widget_show(hbox);
541     gtk_window_set_title(GTK_WINDOW(window), "Error");
542     gtk_label_set_line_wrap(GTK_LABEL(text), TRUE);
543     ok = gtk_button_new_with_label("OK");
544     gtk_box_pack_end(GTK_BOX(GTK_DIALOG(window)->action_area),
545                      ok, FALSE, FALSE, 0);
546     gtk_widget_show(ok);
547     GTK_WIDGET_SET_FLAGS(ok, GTK_CAN_DEFAULT);
548     gtk_window_set_default(GTK_WINDOW(window), ok);
549     gtk_signal_connect(GTK_OBJECT(ok), "clicked",
550                        GTK_SIGNAL_FUNC(errmsg_button_clicked), window);
551     gtk_signal_connect(GTK_OBJECT(window), "destroy",
552                        GTK_SIGNAL_FUNC(window_destroy), NULL);
553     gtk_signal_connect(GTK_OBJECT(window), "key_press_event",
554                        GTK_SIGNAL_FUNC(win_key_press), ok);
555     gtk_window_set_modal(GTK_WINDOW(window), TRUE);
556     gtk_window_set_transient_for(GTK_WINDOW(window), GTK_WINDOW(parent));
557     //set_transient_window_pos(parent, window);
558     gtk_widget_show(window);
559     gtk_main();
560 }
561
562 static void config_ok_button_clicked(GtkButton *button, gpointer data)
563 {
564     frontend *fe = (frontend *)data;
565     char *err;
566
567     err = midend_set_config(fe->me, fe->cfg_which, fe->cfg);
568
569     if (err)
570         error_box(fe->cfgbox, err);
571     else {
572         fe->cfgret = TRUE;
573         gtk_widget_destroy(fe->cfgbox);
574     }
575 }
576
577 static void config_cancel_button_clicked(GtkButton *button, gpointer data)
578 {
579     frontend *fe = (frontend *)data;
580
581     gtk_widget_destroy(fe->cfgbox);
582 }
583
584 static int editbox_key(GtkWidget *widget, GdkEventKey *event, gpointer data)
585 {
586     /*
587      * GtkEntry has a nasty habit of eating the Return key, which
588      * is unhelpful since it doesn't actually _do_ anything with it
589      * (it calls gtk_widget_activate, but our edit boxes never need
590      * activating). So I catch Return before GtkEntry sees it, and
591      * pass it straight on to the parent widget. Effect: hitting
592      * Return in an edit box will now activate the default button
593      * in the dialog just like it will everywhere else.
594      */
595     if (event->keyval == GDK_Return && widget->parent != NULL) {
596         gint return_val;
597         gtk_signal_emit_stop_by_name(GTK_OBJECT(widget), "key_press_event");
598         gtk_signal_emit_by_name(GTK_OBJECT(widget->parent), "key_press_event",
599                                 event, &return_val);
600         return return_val;
601     }
602     return FALSE;
603 }
604
605 static void editbox_changed(GtkEditable *ed, gpointer data)
606 {
607     config_item *i = (config_item *)data;
608
609     sfree(i->sval);
610     i->sval = dupstr(gtk_entry_get_text(GTK_ENTRY(ed)));
611 }
612
613 static void button_toggled(GtkToggleButton *tb, gpointer data)
614 {
615     config_item *i = (config_item *)data;
616
617     i->ival = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(tb));
618 }
619
620 static void droplist_sel(GtkMenuItem *item, gpointer data)
621 {
622     config_item *i = (config_item *)data;
623
624     i->ival = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(item),
625                                                   "user-data"));
626 }
627
628 static int get_config(frontend *fe, int which)
629 {
630     GtkWidget *w, *table, *cancel;
631     char *title;
632     config_item *i;
633     int y;
634
635     fe->cfg = midend_get_config(fe->me, which, &title);
636     fe->cfg_which = which;
637     fe->cfgret = FALSE;
638
639     fe->cfgbox = gtk_dialog_new();
640     gtk_window_set_title(GTK_WINDOW(fe->cfgbox), title);
641     sfree(title);
642
643     w = gtk_button_new_with_label("OK");
644     gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->action_area),
645                      w, FALSE, FALSE, 0);
646     gtk_widget_show(w);
647     GTK_WIDGET_SET_FLAGS(w, GTK_CAN_DEFAULT);
648     gtk_window_set_default(GTK_WINDOW(fe->cfgbox), w);
649     gtk_signal_connect(GTK_OBJECT(w), "clicked",
650                        GTK_SIGNAL_FUNC(config_ok_button_clicked), fe);
651
652     w = gtk_button_new_with_label("Cancel");
653     gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->action_area),
654                      w, FALSE, FALSE, 0);
655     gtk_widget_show(w);
656     gtk_signal_connect(GTK_OBJECT(w), "clicked",
657                        GTK_SIGNAL_FUNC(config_cancel_button_clicked), fe);
658     cancel = w;
659
660     table = gtk_table_new(1, 2, FALSE);
661     y = 0;
662     gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->vbox),
663                      table, FALSE, FALSE, 0);
664     gtk_widget_show(table);
665
666     for (i = fe->cfg; i->type != C_END; i++) {
667         gtk_table_resize(GTK_TABLE(table), y+1, 2);
668
669         switch (i->type) {
670           case C_STRING:
671             /*
672              * Edit box with a label beside it.
673              */
674
675             w = gtk_label_new(i->name);
676             gtk_misc_set_alignment(GTK_MISC(w), 0.0, 0.5);
677             gtk_table_attach(GTK_TABLE(table), w, 0, 1, y, y+1,
678                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
679                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
680                              3, 3);
681             gtk_widget_show(w);
682
683             w = gtk_entry_new();
684             gtk_table_attach(GTK_TABLE(table), w, 1, 2, y, y+1,
685                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
686                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
687                              3, 3);
688             gtk_entry_set_text(GTK_ENTRY(w), i->sval);
689             gtk_signal_connect(GTK_OBJECT(w), "changed",
690                                GTK_SIGNAL_FUNC(editbox_changed), i);
691             gtk_signal_connect(GTK_OBJECT(w), "key_press_event",
692                                GTK_SIGNAL_FUNC(editbox_key), NULL);
693             gtk_widget_show(w);
694
695             break;
696
697           case C_BOOLEAN:
698             /*
699              * Simple checkbox.
700              */
701             w = gtk_check_button_new_with_label(i->name);
702             gtk_signal_connect(GTK_OBJECT(w), "toggled",
703                                GTK_SIGNAL_FUNC(button_toggled), i);
704             gtk_table_attach(GTK_TABLE(table), w, 0, 2, y, y+1,
705                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
706                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
707                              3, 3);
708             gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(w), i->ival);
709             gtk_widget_show(w);
710             break;
711
712           case C_CHOICES:
713             /*
714              * Drop-down list (GtkOptionMenu).
715              */
716
717             w = gtk_label_new(i->name);
718             gtk_misc_set_alignment(GTK_MISC(w), 0.0, 0.5);
719             gtk_table_attach(GTK_TABLE(table), w, 0, 1, y, y+1,
720                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
721                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
722                              3, 3);
723             gtk_widget_show(w);
724
725             w = gtk_option_menu_new();
726             gtk_table_attach(GTK_TABLE(table), w, 1, 2, y, y+1,
727                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
728                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
729                              3, 3);
730             gtk_widget_show(w);
731
732             {
733                 int c, val;
734                 char *p, *q, *name;
735                 GtkWidget *menuitem;
736                 GtkWidget *menu = gtk_menu_new();
737
738                 gtk_option_menu_set_menu(GTK_OPTION_MENU(w), menu);
739
740                 c = *i->sval;
741                 p = i->sval+1;
742                 val = 0;
743
744                 while (*p) {
745                     q = p;
746                     while (*q && *q != c)
747                         q++;
748
749                     name = snewn(q-p+1, char);
750                     strncpy(name, p, q-p);
751                     name[q-p] = '\0';
752
753                     if (*q) q++;       /* eat delimiter */
754
755                     menuitem = gtk_menu_item_new_with_label(name);
756                     gtk_container_add(GTK_CONTAINER(menu), menuitem);
757                     gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
758                                         GINT_TO_POINTER(val));
759                     gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
760                                        GTK_SIGNAL_FUNC(droplist_sel), i);
761                     gtk_widget_show(menuitem);
762
763                     val++;
764
765                     p = q;
766                 }
767
768                 gtk_option_menu_set_history(GTK_OPTION_MENU(w), i->ival);
769             }
770
771             break;
772         }
773
774         y++;
775     }
776
777     gtk_signal_connect(GTK_OBJECT(fe->cfgbox), "destroy",
778                        GTK_SIGNAL_FUNC(window_destroy), NULL);
779     gtk_signal_connect(GTK_OBJECT(fe->cfgbox), "key_press_event",
780                        GTK_SIGNAL_FUNC(win_key_press), cancel);
781     gtk_window_set_modal(GTK_WINDOW(fe->cfgbox), TRUE);
782     gtk_window_set_transient_for(GTK_WINDOW(fe->cfgbox),
783                                  GTK_WINDOW(fe->window));
784     //set_transient_window_pos(fe->window, fe->cfgbox);
785     gtk_widget_show(fe->cfgbox);
786     gtk_main();
787
788     free_cfg(fe->cfg);
789
790     return fe->cfgret;
791 }
792
793 static void menu_key_event(GtkMenuItem *menuitem, gpointer data)
794 {
795     frontend *fe = (frontend *)data;
796     int key = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem),
797                                                   "user-data"));
798     if (!midend_process_key(fe->me, 0, 0, key))
799         gtk_widget_destroy(fe->window);
800 }
801
802 static void menu_preset_event(GtkMenuItem *menuitem, gpointer data)
803 {
804     frontend *fe = (frontend *)data;
805     game_params *params =
806         (game_params *)gtk_object_get_data(GTK_OBJECT(menuitem), "user-data");
807     int x, y;
808
809     midend_set_params(fe->me, params);
810     midend_new_game(fe->me);
811     midend_size(fe->me, &x, &y);
812     gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
813     fe->w = x;
814     fe->h = y;
815 }
816
817 GdkAtom compound_text_atom, utf8_string_atom;
818 int paste_initialised = FALSE;
819
820 void init_paste()
821 {
822     if (paste_initialised)
823         return;
824
825     if (!compound_text_atom)
826         compound_text_atom = gdk_atom_intern("COMPOUND_TEXT", FALSE);
827     if (!utf8_string_atom)
828         utf8_string_atom = gdk_atom_intern("UTF8_STRING", FALSE);
829
830     /*
831      * Ensure that all the cut buffers exist - according to the
832      * ICCCM, we must do this before we start using cut buffers.
833      */
834     XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
835                     XA_CUT_BUFFER0, XA_STRING, 8, PropModeAppend, "", 0);
836     XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
837                     XA_CUT_BUFFER1, XA_STRING, 8, PropModeAppend, "", 0);
838     XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
839                     XA_CUT_BUFFER2, XA_STRING, 8, PropModeAppend, "", 0);
840     XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
841                     XA_CUT_BUFFER3, XA_STRING, 8, PropModeAppend, "", 0);
842     XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
843                     XA_CUT_BUFFER4, XA_STRING, 8, PropModeAppend, "", 0);
844     XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
845                     XA_CUT_BUFFER5, XA_STRING, 8, PropModeAppend, "", 0);
846     XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
847                     XA_CUT_BUFFER6, XA_STRING, 8, PropModeAppend, "", 0);
848     XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
849                     XA_CUT_BUFFER7, XA_STRING, 8, PropModeAppend, "", 0);
850 }
851
852 /* Store data in a cut-buffer. */
853 void store_cutbuffer(char *ptr, int len)
854 {
855     /* ICCCM says we must rotate the buffers before storing to buffer 0. */
856     XRotateBuffers(GDK_DISPLAY(), 1);
857     XStoreBytes(GDK_DISPLAY(), ptr, len);
858 }
859
860 void write_clip(frontend *fe, char *data)
861 {
862     init_paste();
863
864     if (fe->paste_data)
865         sfree(fe->paste_data);
866
867     /*
868      * For this simple application we can safely assume that the
869      * data passed to this function is pure ASCII, which means we
870      * can return precisely the same stuff for types STRING,
871      * COMPOUND_TEXT or UTF8_STRING.
872      */
873
874     fe->paste_data = data;
875     fe->paste_data_len = strlen(data);
876
877     store_cutbuffer(fe->paste_data, fe->paste_data_len);
878
879     if (gtk_selection_owner_set(fe->area, GDK_SELECTION_PRIMARY,
880                                 CurrentTime)) {
881         gtk_selection_add_target(fe->area, GDK_SELECTION_PRIMARY,
882                                  GDK_SELECTION_TYPE_STRING, 1);
883         gtk_selection_add_target(fe->area, GDK_SELECTION_PRIMARY,
884                                  compound_text_atom, 1);
885         gtk_selection_add_target(fe->area, GDK_SELECTION_PRIMARY,
886                                  utf8_string_atom, 1);
887     }
888 }
889
890 void selection_get(GtkWidget *widget, GtkSelectionData *seldata,
891                    guint info, guint time_stamp, gpointer data)
892 {
893     frontend *fe = (frontend *)data;
894     gtk_selection_data_set(seldata, seldata->target, 8,
895                            fe->paste_data, fe->paste_data_len);
896 }
897
898 gint selection_clear(GtkWidget *widget, GdkEventSelection *seldata,
899                      gpointer data)
900 {
901     frontend *fe = (frontend *)data;
902
903     if (fe->paste_data)
904         sfree(fe->paste_data);
905     fe->paste_data = NULL;
906     fe->paste_data_len = 0;
907     return TRUE;
908 }
909
910 static void menu_copy_event(GtkMenuItem *menuitem, gpointer data)
911 {
912     frontend *fe = (frontend *)data;
913     char *text;
914
915     text = midend_text_format(fe->me);
916
917     if (text) {
918         write_clip(fe, text);
919     } else {
920         gdk_beep();
921     }
922 }
923
924 static void menu_solve_event(GtkMenuItem *menuitem, gpointer data)
925 {
926     frontend *fe = (frontend *)data;
927     char *msg;
928
929     msg = midend_solve(fe->me);
930
931     if (msg)
932         error_box(fe->window, msg);
933 }
934
935 static void menu_config_event(GtkMenuItem *menuitem, gpointer data)
936 {
937     frontend *fe = (frontend *)data;
938     int which = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem),
939                                                     "user-data"));
940     int x, y;
941
942     if (!get_config(fe, which))
943         return;
944
945     midend_new_game(fe->me);
946     midend_size(fe->me, &x, &y);
947     gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
948     fe->w = x;
949     fe->h = y;
950 }
951
952 static GtkWidget *add_menu_item_with_key(frontend *fe, GtkContainer *cont,
953                                          char *text, int key)
954 {
955     GtkWidget *menuitem = gtk_menu_item_new_with_label(text);
956     gtk_container_add(cont, menuitem);
957     gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
958                         GINT_TO_POINTER(key));
959     gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
960                        GTK_SIGNAL_FUNC(menu_key_event), fe);
961     gtk_widget_show(menuitem);
962     return menuitem;
963 }
964
965 static void add_menu_separator(GtkContainer *cont)
966 {
967     GtkWidget *menuitem = gtk_menu_item_new();
968     gtk_container_add(cont, menuitem);
969     gtk_widget_show(menuitem);
970 }
971
972 static frontend *new_window(char *game_id, char **error)
973 {
974     frontend *fe;
975     GtkBox *vbox;
976     GtkWidget *menubar, *menu, *menuitem;
977     int x, y, n;
978
979     fe = snew(frontend);
980
981     fe->me = midend_new(fe, &thegame);
982     if (game_id) {
983         *error = midend_game_id(fe->me, game_id, FALSE);
984         if (*error) {
985             midend_free(fe->me);
986             sfree(fe);
987             return NULL;
988         }
989     }
990     midend_new_game(fe->me);
991
992     fe->window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
993     gtk_window_set_title(GTK_WINDOW(fe->window), thegame.name);
994 #if 0
995     gtk_window_set_resizable(GTK_WINDOW(fe->window), FALSE);
996 #else
997     gtk_window_set_policy(GTK_WINDOW(fe->window), FALSE, FALSE, TRUE);
998 #endif
999     vbox = GTK_BOX(gtk_vbox_new(FALSE, 0));
1000     gtk_container_add(GTK_CONTAINER(fe->window), GTK_WIDGET(vbox));
1001     gtk_widget_show(GTK_WIDGET(vbox));
1002
1003     menubar = gtk_menu_bar_new();
1004     gtk_box_pack_start(vbox, menubar, FALSE, FALSE, 0);
1005     gtk_widget_show(menubar);
1006
1007     menuitem = gtk_menu_item_new_with_label("Game");
1008     gtk_container_add(GTK_CONTAINER(menubar), menuitem);
1009     gtk_widget_show(menuitem);
1010
1011     menu = gtk_menu_new();
1012     gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), menu);
1013
1014     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "New", 'n');
1015     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Restart", 'r');
1016
1017     menuitem = gtk_menu_item_new_with_label("Specific...");
1018     gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
1019                         GINT_TO_POINTER(CFG_SEED));
1020     gtk_container_add(GTK_CONTAINER(menu), menuitem);
1021     gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1022                        GTK_SIGNAL_FUNC(menu_config_event), fe);
1023     gtk_widget_show(menuitem);
1024
1025     if ((n = midend_num_presets(fe->me)) > 0 || thegame.can_configure) {
1026         GtkWidget *submenu;
1027         int i;
1028
1029         menuitem = gtk_menu_item_new_with_label("Type");
1030         gtk_container_add(GTK_CONTAINER(menubar), menuitem);
1031         gtk_widget_show(menuitem);
1032
1033         submenu = gtk_menu_new();
1034         gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), submenu);
1035
1036         for (i = 0; i < n; i++) {
1037             char *name;
1038             game_params *params;
1039
1040             midend_fetch_preset(fe->me, i, &name, &params);
1041
1042             menuitem = gtk_menu_item_new_with_label(name);
1043             gtk_container_add(GTK_CONTAINER(submenu), menuitem);
1044             gtk_object_set_data(GTK_OBJECT(menuitem), "user-data", params);
1045             gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1046                                GTK_SIGNAL_FUNC(menu_preset_event), fe);
1047             gtk_widget_show(menuitem);
1048         }
1049
1050         if (thegame.can_configure) {
1051             menuitem = gtk_menu_item_new_with_label("Custom...");
1052             gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
1053                                 GPOINTER_TO_INT(CFG_SETTINGS));
1054             gtk_container_add(GTK_CONTAINER(submenu), menuitem);
1055             gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1056                                GTK_SIGNAL_FUNC(menu_config_event), fe);
1057             gtk_widget_show(menuitem);
1058         }
1059     }
1060
1061     add_menu_separator(GTK_CONTAINER(menu));
1062     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Undo", 'u');
1063     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Redo", '\x12');
1064     if (thegame.can_format_as_text) {
1065         add_menu_separator(GTK_CONTAINER(menu));
1066         menuitem = gtk_menu_item_new_with_label("Copy");
1067         gtk_container_add(GTK_CONTAINER(menu), menuitem);
1068         gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1069                            GTK_SIGNAL_FUNC(menu_copy_event), fe);
1070         gtk_widget_show(menuitem);
1071     }
1072     if (thegame.can_solve) {
1073         add_menu_separator(GTK_CONTAINER(menu));
1074         menuitem = gtk_menu_item_new_with_label("Solve");
1075         gtk_container_add(GTK_CONTAINER(menu), menuitem);
1076         gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1077                            GTK_SIGNAL_FUNC(menu_solve_event), fe);
1078         gtk_widget_show(menuitem);
1079     }
1080     add_menu_separator(GTK_CONTAINER(menu));
1081     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Exit", 'q');
1082
1083     {
1084         int i, ncolours;
1085         float *colours;
1086         gboolean *success;
1087
1088         fe->colmap = gdk_colormap_get_system();
1089         colours = midend_colours(fe->me, &ncolours);
1090         fe->ncolours = ncolours;
1091         fe->colours = snewn(ncolours, GdkColor);
1092         for (i = 0; i < ncolours; i++) {
1093             fe->colours[i].red = colours[i*3] * 0xFFFF;
1094             fe->colours[i].green = colours[i*3+1] * 0xFFFF;
1095             fe->colours[i].blue = colours[i*3+2] * 0xFFFF;
1096         }
1097         success = snewn(ncolours, gboolean);
1098         gdk_colormap_alloc_colors(fe->colmap, fe->colours, ncolours,
1099                                   FALSE, FALSE, success);
1100         for (i = 0; i < ncolours; i++) {
1101             if (!success[i])
1102                 g_error("couldn't allocate colour %d (#%02x%02x%02x)\n",
1103                         i, fe->colours[i].red >> 8,
1104                         fe->colours[i].green >> 8,
1105                         fe->colours[i].blue >> 8);
1106         }
1107     }
1108
1109     if (midend_wants_statusbar(fe->me)) {
1110         GtkWidget *viewport;
1111         GtkRequisition req;
1112
1113         viewport = gtk_viewport_new(NULL, NULL);
1114         gtk_viewport_set_shadow_type(GTK_VIEWPORT(viewport), GTK_SHADOW_NONE);
1115         fe->statusbar = gtk_statusbar_new();
1116         gtk_container_add(GTK_CONTAINER(viewport), fe->statusbar);
1117         gtk_widget_show(viewport);
1118         gtk_box_pack_end(vbox, viewport, FALSE, FALSE, 0);
1119         gtk_widget_show(fe->statusbar);
1120         fe->statusctx = gtk_statusbar_get_context_id
1121             (GTK_STATUSBAR(fe->statusbar), "game");
1122         gtk_statusbar_push(GTK_STATUSBAR(fe->statusbar), fe->statusctx,
1123                            "test");
1124         gtk_widget_size_request(fe->statusbar, &req);
1125 #if 0
1126         /* For GTK 2.0, should we be using gtk_widget_set_size_request? */
1127 #endif
1128         gtk_widget_set_usize(viewport, -1, req.height);
1129     } else
1130         fe->statusbar = NULL;
1131
1132     fe->area = gtk_drawing_area_new();
1133     midend_size(fe->me, &x, &y);
1134     gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
1135     fe->w = x;
1136     fe->h = y;
1137
1138     gtk_box_pack_end(vbox, fe->area, FALSE, FALSE, 0);
1139
1140     fe->pixmap = NULL;
1141     fe->fonts = NULL;
1142     fe->nfonts = fe->fontsize = 0;
1143
1144     fe->timer_active = FALSE;
1145
1146     fe->paste_data = NULL;
1147     fe->paste_data_len = 0;
1148
1149     gtk_signal_connect(GTK_OBJECT(fe->window), "destroy",
1150                        GTK_SIGNAL_FUNC(destroy), fe);
1151     gtk_signal_connect(GTK_OBJECT(fe->window), "key_press_event",
1152                        GTK_SIGNAL_FUNC(key_event), fe);
1153     gtk_signal_connect(GTK_OBJECT(fe->area), "button_press_event",
1154                        GTK_SIGNAL_FUNC(button_event), fe);
1155     gtk_signal_connect(GTK_OBJECT(fe->area), "button_release_event",
1156                        GTK_SIGNAL_FUNC(button_event), fe);
1157     gtk_signal_connect(GTK_OBJECT(fe->area), "motion_notify_event",
1158                        GTK_SIGNAL_FUNC(motion_event), fe);
1159     gtk_signal_connect(GTK_OBJECT(fe->area), "selection_get",
1160                        GTK_SIGNAL_FUNC(selection_get), fe);
1161     gtk_signal_connect(GTK_OBJECT(fe->area), "selection_clear_event",
1162                        GTK_SIGNAL_FUNC(selection_clear), fe);
1163     gtk_signal_connect(GTK_OBJECT(fe->area), "expose_event",
1164                        GTK_SIGNAL_FUNC(expose_area), fe);
1165     gtk_signal_connect(GTK_OBJECT(fe->window), "map_event",
1166                        GTK_SIGNAL_FUNC(map_window), fe);
1167     gtk_signal_connect(GTK_OBJECT(fe->area), "configure_event",
1168                        GTK_SIGNAL_FUNC(configure_area), fe);
1169
1170     gtk_widget_add_events(GTK_WIDGET(fe->area),
1171                           GDK_BUTTON_PRESS_MASK |
1172                           GDK_BUTTON_RELEASE_MASK |
1173                           GDK_BUTTON_MOTION_MASK);
1174
1175     gtk_widget_show(fe->area);
1176     gtk_widget_show(fe->window);
1177
1178     return fe;
1179 }
1180
1181 int main(int argc, char **argv)
1182 {
1183     char *pname = argv[0];
1184     char *error;
1185
1186     /*
1187      * Special standalone mode for generating puzzle IDs on the
1188      * command line. Useful for generating puzzles to be printed
1189      * out and solved offline (for puzzles where that even makes
1190      * sense - Solo, for example, is a lot more pencil-and-paper
1191      * friendly than Net!)
1192      * 
1193      * Usage:
1194      * 
1195      *   <puzzle-name> --generate [<n> [<params>]]
1196      * 
1197      * <n>, if present, is the number of puzzle IDs to generate.
1198      * <params>, if present, is the same type of parameter string
1199      * you would pass to the puzzle when running it in GUI mode,
1200      * including optional extras such as the expansion factor in
1201      * Rectangles and the difficulty level in Solo.
1202      * 
1203      * If you specify <params>, you must also specify <n> (although
1204      * you may specify it to be 1). Sorry; that was the
1205      * simplest-to-parse command-line syntax I came up with.
1206      */
1207     if (argc > 1 && !strcmp(argv[1], "--generate")) {
1208         int n = 1;
1209         char *params = NULL;
1210         game_params *par;
1211         random_state *rs;
1212         char *parstr;
1213
1214         {
1215             void *seed;
1216             int seedlen;
1217             get_random_seed(&seed, &seedlen);
1218             rs = random_init(seed, seedlen);
1219         }
1220
1221         if (argc > 2)
1222             n = atoi(argv[2]);
1223         if (argc > 3)
1224             params = argv[3];
1225
1226         if (params)
1227             par = thegame.decode_params(params);
1228         else
1229             par = thegame.default_params();
1230         parstr = thegame.encode_params(par);
1231
1232         while (n-- > 0) {
1233             game_aux_info *aux = NULL;
1234             char *seed = thegame.new_seed(par, rs, &aux);
1235             printf("%s:%s\n", parstr, seed);
1236             sfree(seed);
1237             if (aux)
1238                 thegame.free_aux_info(aux);
1239         }
1240
1241         return 0;
1242     } else {
1243
1244         gtk_init(&argc, &argv);
1245
1246         if (!new_window(argc > 1 ? argv[1] : NULL, &error)) {
1247             fprintf(stderr, "%s: %s\n", pname, error);
1248             return 1;
1249         }
1250
1251         gtk_main();
1252     }
1253
1254     return 0;
1255 }