~mdw / sgt / puzzles / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Work around an annoying GTK behaviour I noticed the other day on my
[sgt/puzzles] / gtk.c
CommitLineData
720a8fb7 1/*
2 * gtk.c: GTK front end for my puzzle collection.
3 */
4
5#include <stdio.h>
fd1a1a2b 6#include <assert.h>
720a8fb7 7#include <stdlib.h>
2ef96bd6 8#include <time.h>
720a8fb7 9#include <stdarg.h>
c8230524 10#include <string.h>
dafd6cf6 11#include <errno.h>
40570a4e 12#include <math.h>
720a8fb7 13
8c1fd974 14#include <sys/time.h>
15
83680571 16#include <gtk/gtk.h>
1482ee76 17#include <gdk/gdkkeysyms.h>
83680571 18
f12cdd72 19#include <gdk-pixbuf/gdk-pixbuf.h>
20
a9668451 21#include <gdk/gdkx.h>
22#include <X11/Xlib.h>
9b4b03d3 23#include <X11/Xutil.h>
24#include <X11/Xatom.h>
a9668451 25
720a8fb7 26#include "puzzles.h"
27
1fad7a3b 28#if GTK_CHECK_VERSION(2,0,0)
4beb922b 29# define USE_PANGO
30# ifdef PANGO_VERSION_CHECK
31# if PANGO_VERSION_CHECK(1,8,0)
32# define HAVE_SENSIBLE_ABSOLUTE_SIZE_FUNCTION
33# endif
34# endif
1fad7a3b 35#endif
3847eb66 36#if !GTK_CHECK_VERSION(2,4,0)
37# define OLD_FILESEL
38#endif
40570a4e 39#if GTK_CHECK_VERSION(2,8,0)
40# define USE_CAIRO
41#endif
1fad7a3b 42
a39c3aa0 43/* #undef USE_CAIRO */
44/* #define NO_THICK_LINE */
81ff8295 45#ifdef DEBUGGING
46static FILE *debug_fp = NULL;
47
48void dputs(char *buf)
49{
50 if (!debug_fp) {
51 debug_fp = fopen("debug.log", "w");
52 }
53
54 fputs(buf, stderr);
55
56 if (debug_fp) {
57 fputs(buf, debug_fp);
58 fflush(debug_fp);
59 }
60}
61
62void debug_printf(char *fmt, ...)
63{
64 char buf[4096];
65 va_list ap;
66
67 va_start(ap, fmt);
68 vsprintf(buf, fmt, ap);
69 dputs(buf);
70 va_end(ap);
71}
72#endif
73
83680571 74/* ----------------------------------------------------------------------
75 * Error reporting functions used elsewhere.
76 */
77
720a8fb7 78void fatal(char *fmt, ...)
79{
80 va_list ap;
81
82 fprintf(stderr, "fatal error: ");
83
84 va_start(ap, fmt);
85 vfprintf(stderr, fmt, ap);
86 va_end(ap);
87
88 fprintf(stderr, "\n");
89 exit(1);
90}
83680571 91
92/* ----------------------------------------------------------------------
93 * GTK front end to puzzles.
94 */
95
fa3abef5 96static void changed_preset(frontend *fe);
f92acd1a 97
4efb3868 98struct font {
1fad7a3b 99#ifdef USE_PANGO
100 PangoFontDescription *desc;
101#else
4efb3868 102 GdkFont *font;
1fad7a3b 103#endif
4efb3868 104 int type;
105 int size;
106};
107
83680571 108/*
109 * This structure holds all the data relevant to a single window.
110 * In principle this would allow us to open multiple independent
111 * puzzle windows, although I can't currently see any real point in
112 * doing so. I'm just coding cleanly because there's no
113 * particularly good reason not to.
114 */
2ef96bd6 115struct frontend {
83680571 116 GtkWidget *window;
a383a9be 117 GtkAccelGroup *accelgroup;
7f77ea24 118 GtkWidget *area;
fd1a1a2b 119 GtkWidget *statusbar;
8f32c9e8 120 GtkWidget *menubar;
fd1a1a2b 121 guint statusctx;
2ef96bd6 122 int w, h;
dafd6cf6 123 midend *me;
40570a4e 124#ifdef USE_CAIRO
125 const float *colours;
126 cairo_t *cr;
127 cairo_surface_t *image;
128 GdkPixmap *pixmap;
0b236a42 129 GdkColor background; /* for painting outside puzzle area */
40570a4e 130#else
131 GdkPixmap *pixmap;
2ef96bd6 132 GdkGC *gc;
40570a4e 133 GdkColor *colours;
134 GdkColormap *colmap;
0b236a42 135 int backgroundindex; /* which of colours[] is background */
40570a4e 136#endif
137 int ncolours;
2ef96bd6 138 int bbox_l, bbox_r, bbox_u, bbox_d;
20ee89e3 139 int timer_active, timer_id;
8c1fd974 140 struct timeval last_time;
4efb3868 141 struct font *fonts;
142 int nfonts, fontsize;
c8230524 143 config_item *cfg;
5928817c 144 int cfg_which, cfgret;
c8230524 145 GtkWidget *cfgbox;
23e8c9fd 146 void *paste_data;
9b4b03d3 147 int paste_data_len;
1e3e152d 148 int pw, ph; /* pixmap size (w, h are area size) */
149 int ox, oy; /* offset of pixmap in drawing area */
3847eb66 150#ifdef OLD_FILESEL
a4393230 151 char *filesel_name;
3847eb66 152#endif
8f32c9e8 153 int drawing_area_shrink_pending;
98488ab9 154 GSList *preset_radio;
155 int n_preset_menu_items;
156 int preset_threaded;
157 GtkWidget *preset_custom;
fa3abef5 158 GtkWidget *copy_menu_item;
83680571 159};
160
40570a4e 161struct blitter {
162#ifdef USE_CAIRO
163 cairo_surface_t *image;
164#else
165 GdkPixmap *pixmap;
166#endif
167 int w, h, x, y;
168};
169
cbb5549e 170void get_random_seed(void **randseed, int *randseedsize)
171{
102d0d14 172 struct timeval *tvp = snew(struct timeval);
173 gettimeofday(tvp, NULL);
174 *randseed = (void *)tvp;
175 *randseedsize = sizeof(struct timeval);
cbb5549e 176}
177
2ef96bd6 178void frontend_default_colour(frontend *fe, float *output)
179{
180 GdkColor col = fe->window->style->bg[GTK_STATE_NORMAL];
181 output[0] = col.red / 65535.0;
182 output[1] = col.green / 65535.0;
183 output[2] = col.blue / 65535.0;
184}
185
dafd6cf6 186void gtk_status_bar(void *handle, char *text)
fd1a1a2b 187{
dafd6cf6 188 frontend *fe = (frontend *)handle;
48dcdd62 189
fd1a1a2b 190 assert(fe->statusbar);
191
83c0438f 192 gtk_statusbar_pop(GTK_STATUSBAR(fe->statusbar), fe->statusctx);
193 gtk_statusbar_push(GTK_STATUSBAR(fe->statusbar), fe->statusctx, text);
fd1a1a2b 194}
195
40570a4e 196/* ----------------------------------------------------------------------
197 * Cairo drawing functions.
198 */
199
200#ifdef USE_CAIRO
201
202static void setup_drawing(frontend *fe)
2ef96bd6 203{
40570a4e 204 fe->cr = cairo_create(fe->image);
205 cairo_set_antialias(fe->cr, CAIRO_ANTIALIAS_GRAY);
206 cairo_set_line_width(fe->cr, 1.0);
207 cairo_set_line_cap(fe->cr, CAIRO_LINE_CAP_SQUARE);
208 cairo_set_line_join(fe->cr, CAIRO_LINE_JOIN_ROUND);
2ef96bd6 209}
210
40570a4e 211static void teardown_drawing(frontend *fe)
4efb3868 212{
40570a4e 213 cairo_t *cr;
4efb3868 214
40570a4e 215 cairo_destroy(fe->cr);
216 fe->cr = NULL;
4efb3868 217
40570a4e 218 cr = gdk_cairo_create(fe->pixmap);
219 cairo_set_source_surface(cr, fe->image, 0, 0);
220 cairo_rectangle(cr,
221 fe->bbox_l - 1,
222 fe->bbox_u - 1,
223 fe->bbox_r - fe->bbox_l + 2,
224 fe->bbox_d - fe->bbox_u + 2);
225 cairo_fill(cr);
226 cairo_destroy(cr);
4efb3868 227}
228
40570a4e 229static void snaffle_colours(frontend *fe)
4efb3868 230{
40570a4e 231 fe->colours = midend_colours(fe->me, &fe->ncolours);
232}
4efb3868 233
40570a4e 234static void set_colour(frontend *fe, int colour)
235{
236 cairo_set_source_rgb(fe->cr,
237 fe->colours[3*colour + 0],
238 fe->colours[3*colour + 1],
239 fe->colours[3*colour + 2]);
240}
4efb3868 241
40570a4e 242static void set_window_background(frontend *fe, int colour)
243{
244 GdkColormap *colmap;
40570a4e 245
246 colmap = gdk_colormap_get_system();
0b236a42 247 fe->background.red = fe->colours[3*colour + 0] * 65535;
248 fe->background.green = fe->colours[3*colour + 1] * 65535;
249 fe->background.blue = fe->colours[3*colour + 2] * 65535;
250 if (!gdk_colormap_alloc_color(colmap, &fe->background, FALSE, FALSE)) {
40570a4e 251 g_error("couldn't allocate background (#%02x%02x%02x)\n",
0b236a42 252 fe->background.red >> 8, fe->background.green >> 8,
253 fe->background.blue >> 8);
40570a4e 254 }
0b236a42 255 gdk_window_set_background(fe->area->window, &fe->background);
256 gdk_window_set_background(fe->window->window, &fe->background);
4efb3868 257}
258
40570a4e 259static PangoLayout *make_pango_layout(frontend *fe)
4efb3868 260{
40570a4e 261 return (pango_cairo_create_layout(fe->cr));
262}
4efb3868 263
40570a4e 264static void draw_pango_layout(frontend *fe, PangoLayout *layout,
265 int x, int y)
266{
267 cairo_move_to(fe->cr, x, y);
268 pango_cairo_show_layout(fe->cr, layout);
269}
4efb3868 270
40570a4e 271static void save_screenshot_png(frontend *fe, const char *screenshot_file)
272{
273 cairo_surface_write_to_png(fe->image, screenshot_file);
274}
4efb3868 275
40570a4e 276static void do_clip(frontend *fe, int x, int y, int w, int h)
277{
278 cairo_new_path(fe->cr);
279 cairo_rectangle(fe->cr, x, y, w, h);
280 cairo_clip(fe->cr);
281}
4efb3868 282
40570a4e 283static void do_unclip(frontend *fe)
284{
285 cairo_reset_clip(fe->cr);
286}
4efb3868 287
40570a4e 288static void do_draw_rect(frontend *fe, int x, int y, int w, int h)
289{
290 cairo_save(fe->cr);
291 cairo_new_path(fe->cr);
292 cairo_set_antialias(fe->cr, CAIRO_ANTIALIAS_NONE);
293 cairo_rectangle(fe->cr, x, y, w, h);
294 cairo_fill(fe->cr);
295 cairo_restore(fe->cr);
296}
a9668451 297
40570a4e 298static void do_draw_line(frontend *fe, int x1, int y1, int x2, int y2)
299{
300 cairo_new_path(fe->cr);
301 cairo_move_to(fe->cr, x1 + 0.5, y1 + 0.5);
302 cairo_line_to(fe->cr, x2 + 0.5, y2 + 0.5);
303 cairo_stroke(fe->cr);
304}
1fad7a3b 305
a39c3aa0 306static void do_draw_thick_line(frontend *fe, float thickness,
307 float x1, float y1, float x2, float y2)
308{
309 cairo_save(fe->cr);
310 cairo_set_line_width(fe->cr, thickness);
311 cairo_new_path(fe->cr);
312 cairo_move_to(fe->cr, x1, y1);
313 cairo_line_to(fe->cr, x2, y2);
314 cairo_stroke(fe->cr);
315 cairo_restore(fe->cr);
316}
317
40570a4e 318static void do_draw_poly(frontend *fe, int *coords, int npoints,
319 int fillcolour, int outlinecolour)
320{
321 int i;
322
323 cairo_new_path(fe->cr);
324 for (i = 0; i < npoints; i++)
325 cairo_line_to(fe->cr, coords[i*2] + 0.5, coords[i*2 + 1] + 0.5);
326 cairo_close_path(fe->cr);
327 if (fillcolour >= 0) {
328 set_colour(fe, fillcolour);
329 cairo_fill_preserve(fe->cr);
1fad7a3b 330 }
40570a4e 331 assert(outlinecolour >= 0);
332 set_colour(fe, outlinecolour);
333 cairo_stroke(fe->cr);
334}
1fad7a3b 335
40570a4e 336static void do_draw_circle(frontend *fe, int cx, int cy, int radius,
337 int fillcolour, int outlinecolour)
338{
339 cairo_new_path(fe->cr);
340 cairo_arc(fe->cr, cx + 0.5, cy + 0.5, radius, 0, 2*PI);
341 cairo_close_path(fe->cr); /* Just in case... */
342 if (fillcolour >= 0) {
343 set_colour(fe, fillcolour);
344 cairo_fill_preserve(fe->cr);
345 }
346 assert(outlinecolour >= 0);
347 set_colour(fe, outlinecolour);
348 cairo_stroke(fe->cr);
349}
1fad7a3b 350
40570a4e 351static void setup_blitter(blitter *bl, int w, int h)
352{
353 bl->image = cairo_image_surface_create(CAIRO_FORMAT_RGB24, w, h);
354}
1fad7a3b 355
40570a4e 356static void teardown_blitter(blitter *bl)
357{
358 cairo_surface_destroy(bl->image);
359}
1fad7a3b 360
40570a4e 361static void do_blitter_save(frontend *fe, blitter *bl, int x, int y)
362{
363 cairo_t *cr = cairo_create(bl->image);
1fad7a3b 364
40570a4e 365 cairo_set_source_surface(cr, fe->image, -x, -y);
366 cairo_paint(cr);
367 cairo_destroy(cr);
368}
1fad7a3b 369
40570a4e 370static void do_blitter_load(frontend *fe, blitter *bl, int x, int y)
371{
372 cairo_set_source_surface(fe->cr, bl->image, x, y);
373 cairo_paint(fe->cr);
374}
1fad7a3b 375
40570a4e 376static void clear_backing_store(frontend *fe)
377{
378 fe->image = NULL;
379}
1fad7a3b 380
40570a4e 381static void setup_backing_store(frontend *fe)
382{
383 cairo_t *cr;
384 int i;
385
386 fe->pixmap = gdk_pixmap_new(fe->area->window, fe->pw, fe->ph, -1);
387 fe->image = cairo_image_surface_create(CAIRO_FORMAT_RGB24,
388 fe->pw, fe->ph);
389
390 for (i = 0; i < 3; i++) {
391 switch (i) {
392 case 0: cr = cairo_create(fe->image); break;
393 case 1: cr = gdk_cairo_create(fe->pixmap); break;
394 case 2: cr = gdk_cairo_create(fe->area->window); break;
395 }
396 cairo_set_source_rgb(cr,
397 fe->colours[0], fe->colours[1], fe->colours[2]);
398 cairo_paint(cr);
399 cairo_destroy(cr);
4efb3868 400 }
40570a4e 401}
4efb3868 402
40570a4e 403static int backing_store_ok(frontend *fe)
404{
405 return (!!fe->image);
406}
4efb3868 407
40570a4e 408static void teardown_backing_store(frontend *fe)
409{
410 cairo_surface_destroy(fe->image);
411 gdk_pixmap_unref(fe->pixmap);
412 fe->image = NULL;
413}
4efb3868 414
40570a4e 415#endif
3bcf831a 416
40570a4e 417/* ----------------------------------------------------------------------
418 * GDK drawing functions.
419 */
420
421#ifndef USE_CAIRO
422
423static void setup_drawing(frontend *fe)
424{
425 fe->gc = gdk_gc_new(fe->area->window);
426}
4efb3868 427
40570a4e 428static void teardown_drawing(frontend *fe)
429{
430 gdk_gc_unref(fe->gc);
431 fe->gc = NULL;
432}
433
434static void snaffle_colours(frontend *fe)
435{
436 int i, ncolours;
437 float *colours;
438 gboolean *success;
439
440 fe->colmap = gdk_colormap_get_system();
441 colours = midend_colours(fe->me, &ncolours);
442 fe->ncolours = ncolours;
443 fe->colours = snewn(ncolours, GdkColor);
444 for (i = 0; i < ncolours; i++) {
445 fe->colours[i].red = colours[i*3] * 0xFFFF;
446 fe->colours[i].green = colours[i*3+1] * 0xFFFF;
447 fe->colours[i].blue = colours[i*3+2] * 0xFFFF;
4efb3868 448 }
40570a4e 449 success = snewn(ncolours, gboolean);
450 gdk_colormap_alloc_colors(fe->colmap, fe->colours, ncolours,
451 FALSE, FALSE, success);
452 for (i = 0; i < ncolours; i++) {
453 if (!success[i]) {
454 g_error("couldn't allocate colour %d (#%02x%02x%02x)\n",
455 i, fe->colours[i].red >> 8,
456 fe->colours[i].green >> 8,
457 fe->colours[i].blue >> 8);
458 }
459 }
460}
4efb3868 461
40570a4e 462static void set_window_background(frontend *fe, int colour)
463{
0b236a42 464 fe->backgroundindex = colour;
40570a4e 465 gdk_window_set_background(fe->area->window, &fe->colours[colour]);
466 gdk_window_set_background(fe->window->window, &fe->colours[colour]);
467}
468
469static void set_colour(frontend *fe, int colour)
470{
471 gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
472}
473
474#ifdef USE_PANGO
475static PangoLayout *make_pango_layout(frontend *fe)
476{
477 return (pango_layout_new(gtk_widget_get_pango_context(fe->area)));
478}
479
480static void draw_pango_layout(frontend *fe, PangoLayout *layout,
481 int x, int y)
482{
483 gdk_draw_layout(fe->pixmap, fe->gc, x, y, layout);
484}
1fad7a3b 485#endif
486
40570a4e 487static void save_screenshot_png(frontend *fe, const char *screenshot_file)
488{
489 GdkPixbuf *pb;
490 GError *gerror = NULL;
491
492 midend_redraw(fe->me);
493
494 pb = gdk_pixbuf_get_from_drawable(NULL, fe->pixmap,
495 NULL, 0, 0, 0, 0, -1, -1);
496 gdk_pixbuf_save(pb, screenshot_file, "png", &gerror, NULL);
4efb3868 497}
498
40570a4e 499static void do_clip(frontend *fe, int x, int y, int w, int h)
500{
501 GdkRectangle rect;
502
503 rect.x = x;
504 rect.y = y;
505 rect.width = w;
506 rect.height = h;
507 gdk_gc_set_clip_rectangle(fe->gc, &rect);
508}
509
510static void do_unclip(frontend *fe)
511{
512 GdkRectangle rect;
513
514 rect.x = 0;
515 rect.y = 0;
516 rect.width = fe->w;
517 rect.height = fe->h;
518 gdk_gc_set_clip_rectangle(fe->gc, &rect);
519}
520
521static void do_draw_rect(frontend *fe, int x, int y, int w, int h)
2ef96bd6 522{
2ef96bd6 523 gdk_draw_rectangle(fe->pixmap, fe->gc, 1, x, y, w, h);
524}
525
40570a4e 526static void do_draw_line(frontend *fe, int x1, int y1, int x2, int y2)
2ef96bd6 527{
2ef96bd6 528 gdk_draw_line(fe->pixmap, fe->gc, x1, y1, x2, y2);
529}
530
a39c3aa0 531static void do_draw_thick_line(frontend *fe, float thickness,
532 float x1, float y1, float x2, float y2)
533{
534 GdkGCValues save;
535
536 gdk_gc_get_values(fe->gc, &save);
537 gdk_gc_set_line_attributes(fe->gc,
538 thickness,
539 GDK_LINE_SOLID,
540 GDK_CAP_BUTT,
541 GDK_JOIN_BEVEL);
542 gdk_draw_line(fe->pixmap, fe->gc, x1, y1, x2, y2);
543 gdk_gc_set_line_attributes(fe->gc,
544 save.line_width,
545 save.line_style,
546 save.cap_style,
547 save.join_style);
548}
549
40570a4e 550static void do_draw_poly(frontend *fe, int *coords, int npoints,
551 int fillcolour, int outlinecolour)
2ef96bd6 552{
553 GdkPoint *points = snewn(npoints, GdkPoint);
554 int i;
555
556 for (i = 0; i < npoints; i++) {
557 points[i].x = coords[i*2];
558 points[i].y = coords[i*2+1];
559 }
560
28b5987d 561 if (fillcolour >= 0) {
40570a4e 562 set_colour(fe, fillcolour);
28b5987d 563 gdk_draw_polygon(fe->pixmap, fe->gc, TRUE, points, npoints);
564 }
565 assert(outlinecolour >= 0);
40570a4e 566 set_colour(fe, outlinecolour);
dddad8fb 567
568 /*
569 * In principle we ought to be able to use gdk_draw_polygon for
570 * the outline as well. In fact, it turns out to interact badly
571 * with a clipping region, for no terribly obvious reason, so I
572 * draw the outline as a sequence of lines instead.
573 */
574 for (i = 0; i < npoints; i++)
575 gdk_draw_line(fe->pixmap, fe->gc,
576 points[i].x, points[i].y,
577 points[(i+1)%npoints].x, points[(i+1)%npoints].y);
2ef96bd6 578
579 sfree(points);
580}
581
40570a4e 582static void do_draw_circle(frontend *fe, int cx, int cy, int radius,
583 int fillcolour, int outlinecolour)
550efd7f 584{
28b5987d 585 if (fillcolour >= 0) {
40570a4e 586 set_colour(fe, fillcolour);
28b5987d 587 gdk_draw_arc(fe->pixmap, fe->gc, TRUE,
588 cx - radius, cy - radius,
589 2 * radius, 2 * radius, 0, 360 * 64);
590 }
591
592 assert(outlinecolour >= 0);
40570a4e 593 set_colour(fe, outlinecolour);
28b5987d 594 gdk_draw_arc(fe->pixmap, fe->gc, FALSE,
595 cx - radius, cy - radius,
596 2 * radius, 2 * radius, 0, 360 * 64);
550efd7f 597}
598
40570a4e 599static void setup_blitter(blitter *bl, int w, int h)
3161048d 600{
601 /*
602 * We can't create the pixmap right now, because fe->window
603 * might not yet exist. So we just cache w and h and create it
604 * during the firs call to blitter_save.
605 */
3161048d 606 bl->pixmap = NULL;
40570a4e 607}
608
609static void teardown_blitter(blitter *bl)
610{
611 if (bl->pixmap)
612 gdk_pixmap_unref(bl->pixmap);
613}
614
615static void do_blitter_save(frontend *fe, blitter *bl, int x, int y)
616{
617 if (!bl->pixmap)
618 bl->pixmap = gdk_pixmap_new(fe->area->window, bl->w, bl->h, -1);
619 gdk_draw_pixmap(bl->pixmap,
620 fe->area->style->fg_gc[GTK_WIDGET_STATE(fe->area)],
621 fe->pixmap,
622 x, y, 0, 0, bl->w, bl->h);
623}
624
625static void do_blitter_load(frontend *fe, blitter *bl, int x, int y)
626{
627 assert(bl->pixmap);
628 gdk_draw_pixmap(fe->pixmap,
629 fe->area->style->fg_gc[GTK_WIDGET_STATE(fe->area)],
630 bl->pixmap,
631 0, 0, x, y, bl->w, bl->h);
632}
633
634static void clear_backing_store(frontend *fe)
635{
636 fe->pixmap = NULL;
637}
638
639static void setup_backing_store(frontend *fe)
640{
641 GdkGC *gc;
642
643 fe->pixmap = gdk_pixmap_new(fe->area->window, fe->pw, fe->ph, -1);
644
645 gc = gdk_gc_new(fe->area->window);
646 gdk_gc_set_foreground(gc, &fe->colours[0]);
647 gdk_draw_rectangle(fe->pixmap, gc, 1, 0, 0, fe->pw, fe->ph);
648 gdk_draw_rectangle(fe->area->window, gc, 1, 0, 0, fe->w, fe->h);
649 gdk_gc_unref(gc);
650}
651
652static int backing_store_ok(frontend *fe)
653{
654 return (!!fe->pixmap);
655}
656
657static void teardown_backing_store(frontend *fe)
658{
659 gdk_pixmap_unref(fe->pixmap);
660 fe->pixmap = NULL;
661}
662
0b236a42 663#endif
664
40570a4e 665static void repaint_rectangle(frontend *fe, GtkWidget *widget,
666 int x, int y, int w, int h)
667{
0b236a42 668 GdkGC *gc = gdk_gc_new(widget->window);
669#ifdef USE_CAIRO
670 gdk_gc_set_foreground(gc, &fe->background);
671#else
672 gdk_gc_set_foreground(gc, &fe->colours[fe->backgroundindex]);
673#endif
674 if (x < fe->ox) {
675 gdk_draw_rectangle(widget->window, gc,
676 TRUE, x, y, fe->ox - x, h);
677 w -= (fe->ox - x);
678 x = fe->ox;
679 }
680 if (y < fe->oy) {
681 gdk_draw_rectangle(widget->window, gc,
682 TRUE, x, y, w, fe->oy - y);
683 h -= (fe->oy - y);
684 y = fe->oy;
685 }
686 if (w > fe->pw) {
687 gdk_draw_rectangle(widget->window, gc,
688 TRUE, x + fe->pw, y, w - fe->pw, h);
689 w = fe->pw;
690 }
691 if (h > fe->ph) {
692 gdk_draw_rectangle(widget->window, gc,
693 TRUE, x, y + fe->ph, w, h - fe->ph);
694 h = fe->ph;
695 }
696 gdk_draw_pixmap(widget->window, gc, fe->pixmap,
40570a4e 697 x - fe->ox, y - fe->oy, x, y, w, h);
0b236a42 698 gdk_gc_unref(gc);
40570a4e 699}
700
40570a4e 701/* ----------------------------------------------------------------------
702 * Pango font functions.
703 */
704
705#ifdef USE_PANGO
706
707static void add_font(frontend *fe, int index, int fonttype, int fontsize)
708{
709 /*
710 * Use Pango to find the closest match to the requested
711 * font.
712 */
713 PangoFontDescription *fd;
714
715 fd = pango_font_description_new();
716 /* `Monospace' and `Sans' are meta-families guaranteed to exist */
717 pango_font_description_set_family(fd, fonttype == FONT_FIXED ?
718 "Monospace" : "Sans");
719 pango_font_description_set_weight(fd, PANGO_WEIGHT_BOLD);
720 /*
721 * I found some online Pango documentation which
722 * described a function called
723 * pango_font_description_set_absolute_size(), which is
724 * _exactly_ what I want here. Unfortunately, none of
725 * my local Pango installations have it (presumably
726 * they're too old), so I'm going to have to hack round
727 * it by figuring out the point size myself. This
728 * limits me to X and probably also breaks in later
729 * Pango installations, so ideally I should add another
730 * CHECK_VERSION type ifdef and use set_absolute_size
731 * where available. All very annoying.
732 */
733#ifdef HAVE_SENSIBLE_ABSOLUTE_SIZE_FUNCTION
734 pango_font_description_set_absolute_size(fd, PANGO_SCALE*fontsize);
735#else
736 {
737 Display *d = GDK_DISPLAY();
738 int s = DefaultScreen(d);
739 double resolution =
740 (PANGO_SCALE * 72.27 / 25.4) *
741 ((double) DisplayWidthMM(d, s) / DisplayWidth (d, s));
742 pango_font_description_set_size(fd, resolution * fontsize);
743 }
744#endif
745 fe->fonts[index].desc = fd;
746}
747
748static void align_and_draw_text(frontend *fe,
749 int index, int align, int x, int y,
750 const char *text)
751{
752 PangoLayout *layout;
753 PangoRectangle rect;
754
755 layout = make_pango_layout(fe);
756
757 /*
758 * Create a layout.
759 */
760 pango_layout_set_font_description(layout, fe->fonts[index].desc);
761 pango_layout_set_text(layout, text, strlen(text));
762 pango_layout_get_pixel_extents(layout, NULL, &rect);
763
764 if (align & ALIGN_VCENTRE)
765 rect.y -= rect.height / 2;
766 else
767 rect.y -= rect.height;
768
769 if (align & ALIGN_HCENTRE)
770 rect.x -= rect.width / 2;
771 else if (align & ALIGN_HRIGHT)
772 rect.x -= rect.width;
773
774 draw_pango_layout(fe, layout, rect.x + x, rect.y + y);
775
776 g_object_unref(layout);
777}
778
779#endif
780
781/* ----------------------------------------------------------------------
782 * Old-fashioned font functions.
783 */
784
785#ifndef USE_PANGO
786
787static void add_font(int index, int fonttype, int fontsize)
788{
789 /*
790 * In GTK 1.2, I don't know of any plausible way to
791 * pick a suitable font, so I'm just going to be
792 * tedious.
793 */
794 fe->fonts[i].font = gdk_font_load(fonttype == FONT_FIXED ?
795 "fixed" : "variable");
796}
797
798static void align_and_draw_text(int index, int align, int x, int y,
799 const char *text)
800{
801 int lb, rb, wid, asc, desc;
802
803 /*
804 * Measure vertical string extents with respect to the same
805 * string always...
806 */
807 gdk_string_extents(fe->fonts[i].font,
808 "ABCDEFGHIJKLMNOPQRSTUVWXYZ",
809 &lb, &rb, &wid, &asc, &desc);
810 if (align & ALIGN_VCENTRE)
811 y += asc - (asc+desc)/2;
812 else
813 y += asc;
814
815 /*
816 * ... but horizontal extents with respect to the provided
817 * string. This means that multiple pieces of text centred
818 * on the same y-coordinate don't have different baselines.
819 */
820 gdk_string_extents(fe->fonts[i].font, text,
821 &lb, &rb, &wid, &asc, &desc);
822
823 if (align & ALIGN_HCENTRE)
824 x -= wid / 2;
825 else if (align & ALIGN_HRIGHT)
826 x -= wid;
827
828 /*
829 * Actually draw the text.
830 */
831 gdk_draw_string(fe->pixmap, fe->fonts[i].font, fe->gc, x, y, text);
832}
833
834#endif
835
836/* ----------------------------------------------------------------------
837 * The exported drawing functions.
838 */
839
840void gtk_start_draw(void *handle)
841{
842 frontend *fe = (frontend *)handle;
843 fe->bbox_l = fe->w;
844 fe->bbox_r = 0;
845 fe->bbox_u = fe->h;
846 fe->bbox_d = 0;
847 setup_drawing(fe);
848}
849
850void gtk_clip(void *handle, int x, int y, int w, int h)
851{
852 frontend *fe = (frontend *)handle;
853 do_clip(fe, x, y, w, h);
854}
855
856void gtk_unclip(void *handle)
857{
858 frontend *fe = (frontend *)handle;
859 do_unclip(fe);
860}
861
862void gtk_draw_text(void *handle, int x, int y, int fonttype, int fontsize,
863 int align, int colour, char *text)
864{
865 frontend *fe = (frontend *)handle;
866 int i;
867
868 /*
869 * Find or create the font.
870 */
871 for (i = 0; i < fe->nfonts; i++)
872 if (fe->fonts[i].type == fonttype && fe->fonts[i].size == fontsize)
873 break;
874
875 if (i == fe->nfonts) {
876 if (fe->fontsize <= fe->nfonts) {
877 fe->fontsize = fe->nfonts + 10;
878 fe->fonts = sresize(fe->fonts, fe->fontsize, struct font);
879 }
880
881 fe->nfonts++;
882
883 fe->fonts[i].type = fonttype;
884 fe->fonts[i].size = fontsize;
885 add_font(fe, i, fonttype, fontsize);
886 }
887
888 /*
889 * Do the job.
890 */
891 set_colour(fe, colour);
892 align_and_draw_text(fe, i, align, x, y, text);
893}
894
895void gtk_draw_rect(void *handle, int x, int y, int w, int h, int colour)
896{
897 frontend *fe = (frontend *)handle;
898 set_colour(fe, colour);
899 do_draw_rect(fe, x, y, w, h);
900}
901
902void gtk_draw_line(void *handle, int x1, int y1, int x2, int y2, int colour)
903{
904 frontend *fe = (frontend *)handle;
905 set_colour(fe, colour);
906 do_draw_line(fe, x1, y1, x2, y2);
907}
908
a39c3aa0 909void gtk_draw_thick_line(void *handle, float thickness,
910 float x1, float y1, float x2, float y2, int colour)
911{
912 frontend *fe = (frontend *)handle;
913 set_colour(fe, colour);
914 do_draw_thick_line(fe, thickness, x1, y1, x2, y2);
915}
916
40570a4e 917void gtk_draw_poly(void *handle, int *coords, int npoints,
918 int fillcolour, int outlinecolour)
919{
920 frontend *fe = (frontend *)handle;
921 do_draw_poly(fe, coords, npoints, fillcolour, outlinecolour);
922}
923
924void gtk_draw_circle(void *handle, int cx, int cy, int radius,
925 int fillcolour, int outlinecolour)
926{
927 frontend *fe = (frontend *)handle;
928 do_draw_circle(fe, cx, cy, radius, fillcolour, outlinecolour);
929}
930
931blitter *gtk_blitter_new(void *handle, int w, int h)
932{
933 blitter *bl = snew(blitter);
934 setup_blitter(bl, w, h);
3161048d 935 bl->w = w;
936 bl->h = h;
937 return bl;
938}
939
dafd6cf6 940void gtk_blitter_free(void *handle, blitter *bl)
3161048d 941{
40570a4e 942 teardown_blitter(bl);
3161048d 943 sfree(bl);
944}
945
dafd6cf6 946void gtk_blitter_save(void *handle, blitter *bl, int x, int y)
3161048d 947{
dafd6cf6 948 frontend *fe = (frontend *)handle;
40570a4e 949 do_blitter_save(fe, bl, x, y);
3161048d 950 bl->x = x;
951 bl->y = y;
3161048d 952}
953
dafd6cf6 954void gtk_blitter_load(void *handle, blitter *bl, int x, int y)
3161048d 955{
dafd6cf6 956 frontend *fe = (frontend *)handle;
3161048d 957 if (x == BLITTER_FROMSAVED && y == BLITTER_FROMSAVED) {
958 x = bl->x;
959 y = bl->y;
960 }
40570a4e 961 do_blitter_load(fe, bl, x, y);
3161048d 962}
963
dafd6cf6 964void gtk_draw_update(void *handle, int x, int y, int w, int h)
2ef96bd6 965{
dafd6cf6 966 frontend *fe = (frontend *)handle;
2ef96bd6 967 if (fe->bbox_l > x ) fe->bbox_l = x ;
968 if (fe->bbox_r < x+w) fe->bbox_r = x+w;
969 if (fe->bbox_u > y ) fe->bbox_u = y ;
970 if (fe->bbox_d < y+h) fe->bbox_d = y+h;
971}
972
dafd6cf6 973void gtk_end_draw(void *handle)
2ef96bd6 974{
dafd6cf6 975 frontend *fe = (frontend *)handle;
40570a4e 976
977 teardown_drawing(fe);
2ef96bd6 978
979 if (fe->bbox_l < fe->bbox_r && fe->bbox_u < fe->bbox_d) {
40570a4e 980 repaint_rectangle(fe, fe->area,
981 fe->bbox_l - 1 + fe->ox,
982 fe->bbox_u - 1 + fe->oy,
983 fe->bbox_r - fe->bbox_l + 2,
984 fe->bbox_d - fe->bbox_u + 2);
2ef96bd6 985 }
986}
987
4011952c 988#ifdef USE_PANGO
989char *gtk_text_fallback(void *handle, const char *const *strings, int nstrings)
990{
991 /*
992 * We assume Pango can cope with any UTF-8 likely to be emitted
993 * by a puzzle.
994 */
995 return dupstr(strings[0]);
996}
997#endif
998
dafd6cf6 999const struct drawing_api gtk_drawing = {
1000 gtk_draw_text,
1001 gtk_draw_rect,
1002 gtk_draw_line,
1003 gtk_draw_poly,
1004 gtk_draw_circle,
1005 gtk_draw_update,
1006 gtk_clip,
1007 gtk_unclip,
1008 gtk_start_draw,
1009 gtk_end_draw,
1010 gtk_status_bar,
1011 gtk_blitter_new,
1012 gtk_blitter_free,
1013 gtk_blitter_save,
1014 gtk_blitter_load,
1015 NULL, NULL, NULL, NULL, NULL, NULL, /* {begin,end}_{doc,page,puzzle} */
4011952c 1016 NULL, NULL, /* line_width, line_dotted */
1017#ifdef USE_PANGO
1018 gtk_text_fallback,
1019#else
1020 NULL,
1021#endif
a39c3aa0 1022#ifdef NO_THICK_LINE
1023 NULL,
1024#else
1025 gtk_draw_thick_line,
1026#endif
dafd6cf6 1027};
1028
83680571 1029static void destroy(GtkWidget *widget, gpointer data)
1030{
f49650a7 1031 frontend *fe = (frontend *)data;
1032 deactivate_timer(fe);
a4393230 1033 midend_free(fe->me);
83680571 1034 gtk_main_quit();
1035}
1036
2ef96bd6 1037static gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
7f77ea24 1038{
2ef96bd6 1039 frontend *fe = (frontend *)data;
1482ee76 1040 int keyval;
f0ee053c 1041 int shift = (event->state & GDK_SHIFT_MASK) ? MOD_SHFT : 0;
1042 int ctrl = (event->state & GDK_CONTROL_MASK) ? MOD_CTRL : 0;
7f77ea24 1043
40570a4e 1044 if (!backing_store_ok(fe))
2ef96bd6 1045 return TRUE;
7f77ea24 1046
08d7c4ba 1047#if !GTK_CHECK_VERSION(2,0,0)
1048 /* Gtk 1.2 passes a key event to this function even if it's also
1049 * defined as an accelerator.
1050 * Gtk 2 doesn't do this, and this function appears not to exist there. */
1051 if (fe->accelgroup &&
1052 gtk_accel_group_get_entry(fe->accelgroup,
1053 event->keyval, event->state))
1054 return TRUE;
1055#endif
1056
f52166e6 1057 /* Handle mnemonics. */
1058 if (gtk_window_activate_key(GTK_WINDOW(fe->window), event))
1059 return TRUE;
1060
3c833d45 1061 if (event->keyval == GDK_Up)
f0ee053c 1062 keyval = shift | ctrl | CURSOR_UP;
3c833d45 1063 else if (event->keyval == GDK_KP_Up || event->keyval == GDK_KP_8)
1064 keyval = MOD_NUM_KEYPAD | '8';
1065 else if (event->keyval == GDK_Down)
f0ee053c 1066 keyval = shift | ctrl | CURSOR_DOWN;
3c833d45 1067 else if (event->keyval == GDK_KP_Down || event->keyval == GDK_KP_2)
1068 keyval = MOD_NUM_KEYPAD | '2';
1069 else if (event->keyval == GDK_Left)
f0ee053c 1070 keyval = shift | ctrl | CURSOR_LEFT;
3c833d45 1071 else if (event->keyval == GDK_KP_Left || event->keyval == GDK_KP_4)
1072 keyval = MOD_NUM_KEYPAD | '4';
1073 else if (event->keyval == GDK_Right)
f0ee053c 1074 keyval = shift | ctrl | CURSOR_RIGHT;
3c833d45 1075 else if (event->keyval == GDK_KP_Right || event->keyval == GDK_KP_6)
1076 keyval = MOD_NUM_KEYPAD | '6';
c71454c0 1077 else if (event->keyval == GDK_KP_Home || event->keyval == GDK_KP_7)
3c833d45 1078 keyval = MOD_NUM_KEYPAD | '7';
c71454c0 1079 else if (event->keyval == GDK_KP_End || event->keyval == GDK_KP_1)
3c833d45 1080 keyval = MOD_NUM_KEYPAD | '1';
c71454c0 1081 else if (event->keyval == GDK_KP_Page_Up || event->keyval == GDK_KP_9)
3c833d45 1082 keyval = MOD_NUM_KEYPAD | '9';
c71454c0 1083 else if (event->keyval == GDK_KP_Page_Down || event->keyval == GDK_KP_3)
3c833d45 1084 keyval = MOD_NUM_KEYPAD | '3';
1085 else if (event->keyval == GDK_KP_Insert || event->keyval == GDK_KP_0)
1086 keyval = MOD_NUM_KEYPAD | '0';
1087 else if (event->keyval == GDK_KP_Begin || event->keyval == GDK_KP_5)
1088 keyval = MOD_NUM_KEYPAD | '5';
0eb4d76e 1089 else if (event->keyval == GDK_BackSpace ||
1090 event->keyval == GDK_Delete ||
1091 event->keyval == GDK_KP_Delete)
1092 keyval = '\177';
3c833d45 1093 else if (event->string[0] && !event->string[1])
1094 keyval = (unsigned char)event->string[0];
1482ee76 1095 else
1096 keyval = -1;
1097
1098 if (keyval >= 0 &&
1099 !midend_process_key(fe->me, 0, 0, keyval))
2ef96bd6 1100 gtk_widget_destroy(fe->window);
7f77ea24 1101
1102 return TRUE;
1103}
1104
2ef96bd6 1105static gint button_event(GtkWidget *widget, GdkEventButton *event,
1106 gpointer data)
7f77ea24 1107{
2ef96bd6 1108 frontend *fe = (frontend *)data;
1109 int button;
1110
40570a4e 1111 if (!backing_store_ok(fe))
2ef96bd6 1112 return TRUE;
1113
74a4e547 1114 if (event->type != GDK_BUTTON_PRESS && event->type != GDK_BUTTON_RELEASE)
2ef96bd6 1115 return TRUE;
7f77ea24 1116
b0f06719 1117 if (event->button == 2 || (event->state & GDK_SHIFT_MASK))
2ef96bd6 1118 button = MIDDLE_BUTTON;
97c2790f 1119 else if (event->button == 3 || (event->state & GDK_MOD1_MASK))
1120 button = RIGHT_BUTTON;
b0f06719 1121 else if (event->button == 1)
1122 button = LEFT_BUTTON;
2ef96bd6 1123 else
1124 return FALSE; /* don't even know what button! */
1125
74a4e547 1126 if (event->type == GDK_BUTTON_RELEASE)
1127 button += LEFT_RELEASE - LEFT_BUTTON;
1128
1e3e152d 1129 if (!midend_process_key(fe->me, event->x - fe->ox,
1130 event->y - fe->oy, button))
74a4e547 1131 gtk_widget_destroy(fe->window);
1132
1133 return TRUE;
1134}
1135
1136static gint motion_event(GtkWidget *widget, GdkEventMotion *event,
1137 gpointer data)
1138{
1139 frontend *fe = (frontend *)data;
1140 int button;
1141
40570a4e 1142 if (!backing_store_ok(fe))
74a4e547 1143 return TRUE;
1144
74a4e547 1145 if (event->state & (GDK_BUTTON2_MASK | GDK_SHIFT_MASK))
1146 button = MIDDLE_DRAG;
1147 else if (event->state & GDK_BUTTON1_MASK)
1148 button = LEFT_DRAG;
1149 else if (event->state & GDK_BUTTON3_MASK)
1150 button = RIGHT_DRAG;
1151 else
1152 return FALSE; /* don't even know what button! */
1153
1e3e152d 1154 if (!midend_process_key(fe->me, event->x - fe->ox,
1155 event->y - fe->oy, button))
2ef96bd6 1156 gtk_widget_destroy(fe->window);
4a59b80c 1157#if GTK_CHECK_VERSION(2,12,0)
1158 gdk_event_request_motions(event);
1159#else
1160 gdk_window_get_pointer(widget->window, NULL, NULL, NULL);
1161#endif
7f77ea24 1162
1163 return TRUE;
1164}
1165
2ef96bd6 1166static gint expose_area(GtkWidget *widget, GdkEventExpose *event,
1167 gpointer data)
83680571 1168{
2ef96bd6 1169 frontend *fe = (frontend *)data;
1170
40570a4e 1171 if (backing_store_ok(fe)) {
1172 repaint_rectangle(fe, widget,
1173 event->area.x, event->area.y,
1174 event->area.width, event->area.height);
2ef96bd6 1175 }
1176 return TRUE;
1177}
1178
fd1a1a2b 1179static gint map_window(GtkWidget *widget, GdkEvent *event,
1180 gpointer data)
1181{
1182 frontend *fe = (frontend *)data;
1183
1184 /*
1185 * Apparently we need to do this because otherwise the status
1186 * bar will fail to update immediately. Annoying, but there we
1187 * go.
1188 */
1189 gtk_widget_queue_draw(fe->window);
1190
1191 return TRUE;
1192}
1193
2ef96bd6 1194static gint configure_area(GtkWidget *widget,
1195 GdkEventConfigure *event, gpointer data)
1196{
1197 frontend *fe = (frontend *)data;
1e3e152d 1198 int x, y;
2ef96bd6 1199
40570a4e 1200 if (backing_store_ok(fe))
1201 teardown_backing_store(fe);
eb2ad6f1 1202
1e3e152d 1203 x = fe->w = event->width;
1204 y = fe->h = event->height;
1205 midend_size(fe->me, &x, &y, TRUE);
1206 fe->pw = x;
1207 fe->ph = y;
1208 fe->ox = (fe->w - fe->pw) / 2;
1209 fe->oy = (fe->h - fe->ph) / 2;
1210
40570a4e 1211 setup_backing_store(fe);
008b4378 1212 midend_force_redraw(fe->me);
2ef96bd6 1213
1214 return TRUE;
1215}
1216
1217static gint timer_func(gpointer data)
1218{
1219 frontend *fe = (frontend *)data;
1220
8c1fd974 1221 if (fe->timer_active) {
1222 struct timeval now;
1223 float elapsed;
1224 gettimeofday(&now, NULL);
1225 elapsed = ((now.tv_usec - fe->last_time.tv_usec) * 0.000001F +
1226 (now.tv_sec - fe->last_time.tv_sec));
1227 midend_timer(fe->me, elapsed); /* may clear timer_active */
1228 fe->last_time = now;
1229 }
2ef96bd6 1230
1231 return fe->timer_active;
1232}
1233
1234void deactivate_timer(frontend *fe)
1235{
dafd6cf6 1236 if (!fe)
1237 return; /* can happen due to --generate */
20ee89e3 1238 if (fe->timer_active)
1239 gtk_timeout_remove(fe->timer_id);
2ef96bd6 1240 fe->timer_active = FALSE;
1241}
1242
1243void activate_timer(frontend *fe)
1244{
dafd6cf6 1245 if (!fe)
1246 return; /* can happen due to --generate */
8c1fd974 1247 if (!fe->timer_active) {
20ee89e3 1248 fe->timer_id = gtk_timeout_add(20, timer_func, fe);
8c1fd974 1249 gettimeofday(&fe->last_time, NULL);
1250 }
2ef96bd6 1251 fe->timer_active = TRUE;
1252}
1253
c8230524 1254static void window_destroy(GtkWidget *widget, gpointer data)
1255{
1256 gtk_main_quit();
1257}
1258
668be019 1259static void msgbox_button_clicked(GtkButton *button, gpointer data)
c8230524 1260{
668be019 1261 GtkWidget *window = GTK_WIDGET(data);
1262 int v, *ip;
1263
1264 ip = (int *)gtk_object_get_data(GTK_OBJECT(window), "user-data");
1265 v = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(button), "user-data"));
1266 *ip = v;
1267
c8230524 1268 gtk_widget_destroy(GTK_WIDGET(data));
1269}
1270
a163b7c2 1271static int win_key_press(GtkWidget *widget, GdkEventKey *event, gpointer data)
1272{
1273 GtkObject *cancelbutton = GTK_OBJECT(data);
1274
1275 /*
1276 * `Escape' effectively clicks the cancel button
1277 */
1278 if (event->keyval == GDK_Escape) {
1279 gtk_signal_emit_by_name(GTK_OBJECT(cancelbutton), "clicked");
1280 return TRUE;
1281 }
1282
1283 return FALSE;
1284}
1285
668be019 1286enum { MB_OK, MB_YESNO };
1287
1288int message_box(GtkWidget *parent, char *title, char *msg, int centre,
1289 int type)
c8230524 1290{
668be019 1291 GtkWidget *window, *hbox, *text, *button;
1292 char *titles;
1293 int i, def, cancel;
c8230524 1294
1295 window = gtk_dialog_new();
1296 text = gtk_label_new(msg);
1297 gtk_misc_set_alignment(GTK_MISC(text), 0.0, 0.0);
1298 hbox = gtk_hbox_new(FALSE, 0);
1299 gtk_box_pack_start(GTK_BOX(hbox), text, FALSE, FALSE, 20);
1300 gtk_box_pack_start(GTK_BOX(GTK_DIALOG(window)->vbox),
1301 hbox, FALSE, FALSE, 20);
1302 gtk_widget_show(text);
1303 gtk_widget_show(hbox);
97098757 1304 gtk_window_set_title(GTK_WINDOW(window), title);
c8230524 1305 gtk_label_set_line_wrap(GTK_LABEL(text), TRUE);
668be019 1306
1307 if (type == MB_OK) {
28938066 1308 titles = GTK_STOCK_OK "\0";
668be019 1309 def = cancel = 0;
1310 } else {
1311 assert(type == MB_YESNO);
28938066 1312 titles = GTK_STOCK_NO "\0" GTK_STOCK_YES "\0";
1313 def = 1;
1314 cancel = 0;
668be019 1315 }
1316 i = 0;
1317
1318 while (*titles) {
28938066 1319 button = gtk_button_new_from_stock(titles);
668be019 1320 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(window)->action_area),
1321 button, FALSE, FALSE, 0);
1322 gtk_widget_show(button);
1323 if (i == def) {
1324 GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);
1325 gtk_window_set_default(GTK_WINDOW(window), button);
1326 }
1327 if (i == cancel) {
1328 gtk_signal_connect(GTK_OBJECT(window), "key_press_event",
1329 GTK_SIGNAL_FUNC(win_key_press), button);
1330 }
1331 gtk_signal_connect(GTK_OBJECT(button), "clicked",
1332 GTK_SIGNAL_FUNC(msgbox_button_clicked), window);
1333 gtk_object_set_data(GTK_OBJECT(button), "user-data",
1334 GINT_TO_POINTER(i));
1335 titles += strlen(titles)+1;
1336 i++;
1337 }
1338 gtk_object_set_data(GTK_OBJECT(window), "user-data",
1339 GINT_TO_POINTER(&i));
a1ed9f0e 1340 gtk_signal_connect(GTK_OBJECT(window), "destroy",
1341 GTK_SIGNAL_FUNC(window_destroy), NULL);
c8230524 1342 gtk_window_set_modal(GTK_WINDOW(window), TRUE);
1343 gtk_window_set_transient_for(GTK_WINDOW(window), GTK_WINDOW(parent));
23e8c9fd 1344 /* set_transient_window_pos(parent, window); */
c8230524 1345 gtk_widget_show(window);
668be019 1346 i = -1;
c8230524 1347 gtk_main();
28938066 1348 return (type == MB_YESNO ? i == 1 : TRUE);
c8230524 1349}
1350
97098757 1351void error_box(GtkWidget *parent, char *msg)
1352{
668be019 1353 message_box(parent, "Error", msg, FALSE, MB_OK);
97098757 1354}
1355
c8230524 1356static void config_ok_button_clicked(GtkButton *button, gpointer data)
1357{
1358 frontend *fe = (frontend *)data;
1359 char *err;
1360
5928817c 1361 err = midend_set_config(fe->me, fe->cfg_which, fe->cfg);
c8230524 1362
1363 if (err)
1364 error_box(fe->cfgbox, err);
1365 else {
1366 fe->cfgret = TRUE;
1367 gtk_widget_destroy(fe->cfgbox);
fa3abef5 1368 changed_preset(fe);
c8230524 1369 }
1370}
1371
1372static void config_cancel_button_clicked(GtkButton *button, gpointer data)
1373{
1374 frontend *fe = (frontend *)data;
1375
1376 gtk_widget_destroy(fe->cfgbox);
1377}
1378
a163b7c2 1379static int editbox_key(GtkWidget *widget, GdkEventKey *event, gpointer data)
1380{
1381 /*
1382 * GtkEntry has a nasty habit of eating the Return key, which
1383 * is unhelpful since it doesn't actually _do_ anything with it
1384 * (it calls gtk_widget_activate, but our edit boxes never need
1385 * activating). So I catch Return before GtkEntry sees it, and
1386 * pass it straight on to the parent widget. Effect: hitting
1387 * Return in an edit box will now activate the default button
1388 * in the dialog just like it will everywhere else.
1389 */
1390 if (event->keyval == GDK_Return && widget->parent != NULL) {
1391 gint return_val;
1392 gtk_signal_emit_stop_by_name(GTK_OBJECT(widget), "key_press_event");
1393 gtk_signal_emit_by_name(GTK_OBJECT(widget->parent), "key_press_event",
1394 event, &return_val);
1395 return return_val;
1396 }
1397 return FALSE;
1398}
1399
c8230524 1400static void editbox_changed(GtkEditable *ed, gpointer data)
1401{
1402 config_item *i = (config_item *)data;
1403
1404 sfree(i->sval);
1405 i->sval = dupstr(gtk_entry_get_text(GTK_ENTRY(ed)));
1406}
1407
1408static void button_toggled(GtkToggleButton *tb, gpointer data)
1409{
1410 config_item *i = (config_item *)data;
1411
1412 i->ival = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(tb));
1413}
1414
1415static void droplist_sel(GtkMenuItem *item, gpointer data)
1416{
1417 config_item *i = (config_item *)data;
1418
1419 i->ival = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(item),
1420 "user-data"));
1421}
1422
5928817c 1423static int get_config(frontend *fe, int which)
c8230524 1424{
a163b7c2 1425 GtkWidget *w, *table, *cancel;
5928817c 1426 char *title;
c8230524 1427 config_item *i;
1428 int y;
1429
5928817c 1430 fe->cfg = midend_get_config(fe->me, which, &title);
1431 fe->cfg_which = which;
c8230524 1432 fe->cfgret = FALSE;
1433
1434 fe->cfgbox = gtk_dialog_new();
5928817c 1435 gtk_window_set_title(GTK_WINDOW(fe->cfgbox), title);
1436 sfree(title);
c8230524 1437
28938066 1438 w = gtk_button_new_from_stock(GTK_STOCK_CANCEL);
c8230524 1439 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->action_area),
1440 w, FALSE, FALSE, 0);
1441 gtk_widget_show(w);
c8230524 1442 gtk_signal_connect(GTK_OBJECT(w), "clicked",
28938066 1443 GTK_SIGNAL_FUNC(config_cancel_button_clicked), fe);
1444 cancel = w;
c8230524 1445
28938066 1446 w = gtk_button_new_from_stock(GTK_STOCK_OK);
c8230524 1447 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->action_area),
1448 w, FALSE, FALSE, 0);
1449 gtk_widget_show(w);
28938066 1450 GTK_WIDGET_SET_FLAGS(w, GTK_CAN_DEFAULT);
1451 gtk_window_set_default(GTK_WINDOW(fe->cfgbox), w);
c8230524 1452 gtk_signal_connect(GTK_OBJECT(w), "clicked",
28938066 1453 GTK_SIGNAL_FUNC(config_ok_button_clicked), fe);
c8230524 1454
1455 table = gtk_table_new(1, 2, FALSE);
1456 y = 0;
1457 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->vbox),
1458 table, FALSE, FALSE, 0);
1459 gtk_widget_show(table);
1460
95709966 1461 for (i = fe->cfg; i->type != C_END; i++) {
c8230524 1462 gtk_table_resize(GTK_TABLE(table), y+1, 2);
1463
1464 switch (i->type) {
95709966 1465 case C_STRING:
c8230524 1466 /*
1467 * Edit box with a label beside it.
1468 */
1469
1470 w = gtk_label_new(i->name);
1471 gtk_misc_set_alignment(GTK_MISC(w), 0.0, 0.5);
1472 gtk_table_attach(GTK_TABLE(table), w, 0, 1, y, y+1,
c7efa5be 1473 GTK_SHRINK | GTK_FILL,
c8230524 1474 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
1475 3, 3);
1476 gtk_widget_show(w);
1477
1478 w = gtk_entry_new();
1479 gtk_table_attach(GTK_TABLE(table), w, 1, 2, y, y+1,
1480 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
1481 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
1482 3, 3);
1483 gtk_entry_set_text(GTK_ENTRY(w), i->sval);
1484 gtk_signal_connect(GTK_OBJECT(w), "changed",
1485 GTK_SIGNAL_FUNC(editbox_changed), i);
a163b7c2 1486 gtk_signal_connect(GTK_OBJECT(w), "key_press_event",
1487 GTK_SIGNAL_FUNC(editbox_key), NULL);
c8230524 1488 gtk_widget_show(w);
1489
1490 break;
1491
95709966 1492 case C_BOOLEAN:
c8230524 1493 /*
1494 * Simple checkbox.
1495 */
1496 w = gtk_check_button_new_with_label(i->name);
1497 gtk_signal_connect(GTK_OBJECT(w), "toggled",
1498 GTK_SIGNAL_FUNC(button_toggled), i);
1499 gtk_table_attach(GTK_TABLE(table), w, 0, 2, y, y+1,
1500 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
1501 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
1502 3, 3);
1503 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(w), i->ival);
1504 gtk_widget_show(w);
1505 break;
1506
95709966 1507 case C_CHOICES:
c8230524 1508 /*
1509 * Drop-down list (GtkOptionMenu).
1510 */
1511
1512 w = gtk_label_new(i->name);
1513 gtk_misc_set_alignment(GTK_MISC(w), 0.0, 0.5);
1514 gtk_table_attach(GTK_TABLE(table), w, 0, 1, y, y+1,
c7efa5be 1515 GTK_SHRINK | GTK_FILL,
1516 GTK_EXPAND | GTK_SHRINK | GTK_FILL ,
c8230524 1517 3, 3);
1518 gtk_widget_show(w);
1519
1520 w = gtk_option_menu_new();
1521 gtk_table_attach(GTK_TABLE(table), w, 1, 2, y, y+1,
1522 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
1523 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
1524 3, 3);
1525 gtk_widget_show(w);
1526
1527 {
1528 int c, val;
1529 char *p, *q, *name;
1530 GtkWidget *menuitem;
1531 GtkWidget *menu = gtk_menu_new();
1532
1533 gtk_option_menu_set_menu(GTK_OPTION_MENU(w), menu);
1534
1535 c = *i->sval;
1536 p = i->sval+1;
1537 val = 0;
1538
1539 while (*p) {
1540 q = p;
1541 while (*q && *q != c)
1542 q++;
1543
1544 name = snewn(q-p+1, char);
1545 strncpy(name, p, q-p);
1546 name[q-p] = '\0';
1547
1548 if (*q) q++; /* eat delimiter */
1549
1550 menuitem = gtk_menu_item_new_with_label(name);
1551 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1552 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
1553 GINT_TO_POINTER(val));
1554 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1555 GTK_SIGNAL_FUNC(droplist_sel), i);
1556 gtk_widget_show(menuitem);
1557
1558 val++;
1559
1560 p = q;
1561 }
1562
1563 gtk_option_menu_set_history(GTK_OPTION_MENU(w), i->ival);
1564 }
1565
1566 break;
1567 }
1568
1569 y++;
1570 }
1571
1572 gtk_signal_connect(GTK_OBJECT(fe->cfgbox), "destroy",
1573 GTK_SIGNAL_FUNC(window_destroy), NULL);
a163b7c2 1574 gtk_signal_connect(GTK_OBJECT(fe->cfgbox), "key_press_event",
1575 GTK_SIGNAL_FUNC(win_key_press), cancel);
c8230524 1576 gtk_window_set_modal(GTK_WINDOW(fe->cfgbox), TRUE);
1577 gtk_window_set_transient_for(GTK_WINDOW(fe->cfgbox),
1578 GTK_WINDOW(fe->window));
23e8c9fd 1579 /* set_transient_window_pos(fe->window, fe->cfgbox); */
c8230524 1580 gtk_widget_show(fe->cfgbox);
1581 gtk_main();
1582
077f3cbe 1583 free_cfg(fe->cfg);
c8230524 1584
1585 return fe->cfgret;
1586}
1587
eb2ad6f1 1588static void menu_key_event(GtkMenuItem *menuitem, gpointer data)
1589{
1590 frontend *fe = (frontend *)data;
1591 int key = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem),
1592 "user-data"));
1593 if (!midend_process_key(fe->me, 0, 0, key))
1594 gtk_widget_destroy(fe->window);
1595}
1596
1e3e152d 1597static void get_size(frontend *fe, int *px, int *py)
1598{
1599 int x, y;
1600
1601 /*
1602 * Currently I don't want to make the GTK port scale large
1603 * puzzles to fit on the screen. This is because X does permit
1604 * extremely large windows and many window managers provide a
1605 * means of navigating round them, and the users I consulted
1606 * before deciding said that they'd rather have enormous puzzle
1607 * windows spanning multiple screen pages than have them
1608 * shrunk. I could change my mind later or introduce
1609 * configurability; this would be the place to do so, by
1610 * replacing the initial values of x and y with the screen
1611 * dimensions.
1612 */
1613 x = INT_MAX;
1614 y = INT_MAX;
1615 midend_size(fe->me, &x, &y, FALSE);
1616 *px = x;
1617 *py = y;
1618}
1619
ef429a6c 1620#if !GTK_CHECK_VERSION(2,0,0)
1621#define gtk_window_resize(win, x, y) \
1622 gdk_window_resize(GTK_WIDGET(win)->window, x, y)
1623#endif
1624
fa3abef5 1625/*
1626 * Called when any other code in this file has changed the
1627 * selected game parameters.
1628 */
1629static void changed_preset(frontend *fe)
f92acd1a 1630{
1631 int n = midend_which_preset(fe->me);
f92acd1a 1632
98488ab9 1633 fe->preset_threaded = TRUE;
1634 if (n < 0 && fe->preset_custom) {
1635 gtk_check_menu_item_set_active(
1636 GTK_CHECK_MENU_ITEM(fe->preset_custom),
1637 TRUE);
1638 } else {
1639 GSList *gs = fe->preset_radio;
1640 int i = fe->n_preset_menu_items - 1 - n;
1641 if (fe->preset_custom)
1642 gs = gs->next;
1643 while (i && gs) {
1644 i--;
1645 gs = gs->next;
1646 }
1647 if (gs) {
1648 gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(gs->data),
1649 TRUE);
1650 } else for (gs = fe->preset_radio; gs; gs = gs->next) {
1651 gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(gs->data),
1652 FALSE);
1653 }
f92acd1a 1654 }
98488ab9 1655 fe->preset_threaded = FALSE;
fa3abef5 1656
1657 /*
1658 * Update the greying on the Copy menu option.
1659 */
1660 if (fe->copy_menu_item) {
1661 int enabled = midend_can_format_as_text_now(fe->me);
1662 gtk_widget_set_sensitive(fe->copy_menu_item, enabled);
1663 }
f92acd1a 1664}
1665
8f32c9e8 1666static gboolean not_size_allocated_yet(GtkWidget *w)
1667{
1668 /*
1669 * This function tests whether a widget has not yet taken up space
1670 * on the screen which it will occupy in future. (Therefore, it
1671 * returns true only if the widget does exist but does not have a
1672 * size allocation. A null widget is already taking up all the
1673 * space it ever will.)
1674 */
1675 GtkAllocation a;
1676
1677 if (!w)
1678 return FALSE; /* nonexistent widgets aren't a problem */
1679
1680 gtk_widget_get_allocation(w, &a);
1681 return a.height == 0 || a.width == 0;
1682}
1683
1684static void try_shrink_drawing_area(frontend *fe)
1685{
1686 if (fe->drawing_area_shrink_pending &&
1687 !not_size_allocated_yet(fe->menubar) &&
1688 !not_size_allocated_yet(fe->statusbar)) {
1689 /*
1690 * In order to permit the user to resize the window smaller as
1691 * well as bigger, we call this function after the window size
1692 * has ended up where we want it. This shouldn't shrink the
1693 * window immediately; it just arranges that the next time the
1694 * user tries to shrink it, they can.
1695 *
1696 * However, at puzzle creation time, we defer the first of
1697 * these operations until after the menu bar and status bar
1698 * are actually visible. On Ubuntu 12.04 I've found that these
1699 * can take a while to be displayed, and that it's a mistake
1700 * to reduce the drawing area's size allocation before they've
1701 * turned up or else the drawing area makes room for them by
1702 * shrinking to less than the size we intended.
1703 */
1704 gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), 1, 1);
1705 fe->drawing_area_shrink_pending = FALSE;
1706 }
1707}
1708
1709static gint configure_window(GtkWidget *widget,
1710 GdkEventConfigure *event, gpointer data)
1711{
1712 frontend *fe = (frontend *)data;
1713 /*
1714 * When the main puzzle window changes size, it might be because
1715 * the menu bar or status bar has turned up after starting off
1716 * absent, in which case we should have another go at enacting a
1717 * pending shrink of the drawing area.
1718 */
1719 try_shrink_drawing_area(fe);
1720 return FALSE;
1721}
1722
854a4f51 1723static void resize_fe(frontend *fe)
eb2ad6f1 1724{
eb2ad6f1 1725 int x, y;
1726
1e3e152d 1727 get_size(fe, &x, &y);
eb2ad6f1 1728 fe->w = x;
1729 fe->h = y;
8f32c9e8 1730 fe->drawing_area_shrink_pending = FALSE;
1e3e152d 1731 gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
4e1f57ba 1732 {
1733 GtkRequisition req;
1734 gtk_widget_size_request(GTK_WIDGET(fe->window), &req);
cbdf34a0 1735 gtk_window_resize(GTK_WINDOW(fe->window), req.width, req.height);
4e1f57ba 1736 }
8f32c9e8 1737 fe->drawing_area_shrink_pending = TRUE;
1738 try_shrink_drawing_area(fe);
eb2ad6f1 1739}
1740
854a4f51 1741static void menu_preset_event(GtkMenuItem *menuitem, gpointer data)
1742{
1743 frontend *fe = (frontend *)data;
1744 game_params *params =
1745 (game_params *)gtk_object_get_data(GTK_OBJECT(menuitem), "user-data");
1746
98488ab9 1747 if (fe->preset_threaded ||
1748 (GTK_IS_CHECK_MENU_ITEM(menuitem) &&
1749 !gtk_check_menu_item_get_active(GTK_CHECK_MENU_ITEM(menuitem))))
1750 return;
854a4f51 1751 midend_set_params(fe->me, params);
1752 midend_new_game(fe->me);
fa3abef5 1753 changed_preset(fe);
854a4f51 1754 resize_fe(fe);
1755}
1756
9b4b03d3 1757GdkAtom compound_text_atom, utf8_string_atom;
1758int paste_initialised = FALSE;
1759
7710307c 1760static void set_selection(frontend *fe, GdkAtom selection)
9b4b03d3 1761{
7710307c 1762 if (!paste_initialised) {
1763 compound_text_atom = gdk_atom_intern("COMPOUND_TEXT", FALSE);
1764 utf8_string_atom = gdk_atom_intern("UTF8_STRING", FALSE);
1765 paste_initialised = TRUE;
1766 }
9b4b03d3 1767
1768 /*
7710307c 1769 * For this simple application we can safely assume that the
1770 * data passed to this function is pure ASCII, which means we
1771 * can return precisely the same stuff for types STRING,
1772 * COMPOUND_TEXT or UTF8_STRING.
9b4b03d3 1773 */
9b4b03d3 1774
7710307c 1775 if (gtk_selection_owner_set(fe->area, selection, CurrentTime)) {
1776 gtk_selection_clear_targets(fe->area, selection);
1777 gtk_selection_add_target(fe->area, selection,
1778 GDK_SELECTION_TYPE_STRING, 1);
1779 gtk_selection_add_target(fe->area, selection, compound_text_atom, 1);
1780 gtk_selection_add_target(fe->area, selection, utf8_string_atom, 1);
1781 }
9b4b03d3 1782}
1783
1784void write_clip(frontend *fe, char *data)
1785{
9b4b03d3 1786 if (fe->paste_data)
1787 sfree(fe->paste_data);
1788
9b4b03d3 1789 fe->paste_data = data;
1790 fe->paste_data_len = strlen(data);
1791
7710307c 1792 set_selection(fe, GDK_SELECTION_PRIMARY);
1793 set_selection(fe, GDK_SELECTION_CLIPBOARD);
9b4b03d3 1794}
1795
1796void selection_get(GtkWidget *widget, GtkSelectionData *seldata,
1797 guint info, guint time_stamp, gpointer data)
1798{
1799 frontend *fe = (frontend *)data;
1800 gtk_selection_data_set(seldata, seldata->target, 8,
1801 fe->paste_data, fe->paste_data_len);
1802}
1803
1804gint selection_clear(GtkWidget *widget, GdkEventSelection *seldata,
1805 gpointer data)
1806{
1807 frontend *fe = (frontend *)data;
1808
1809 if (fe->paste_data)
1810 sfree(fe->paste_data);
1811 fe->paste_data = NULL;
1812 fe->paste_data_len = 0;
1813 return TRUE;
1814}
1815
1816static void menu_copy_event(GtkMenuItem *menuitem, gpointer data)
1817{
1818 frontend *fe = (frontend *)data;
1819 char *text;
1820
1821 text = midend_text_format(fe->me);
1822
1823 if (text) {
1824 write_clip(fe, text);
1825 } else {
1826 gdk_beep();
1827 }
1828}
1829
3847eb66 1830#ifdef OLD_FILESEL
1831
a4393230 1832static void filesel_ok(GtkButton *button, gpointer data)
1833{
1834 frontend *fe = (frontend *)data;
1835
1836 gpointer filesel = gtk_object_get_data(GTK_OBJECT(button), "user-data");
1837
1838 const char *name =
1839 gtk_file_selection_get_filename(GTK_FILE_SELECTION(filesel));
1840
1841 fe->filesel_name = dupstr(name);
1842}
1843
1844static char *file_selector(frontend *fe, char *title, int save)
1845{
1846 GtkWidget *filesel =
1847 gtk_file_selection_new(title);
1848
1849 fe->filesel_name = NULL;
1850
1851 gtk_window_set_modal(GTK_WINDOW(filesel), TRUE);
1852 gtk_object_set_data
1853 (GTK_OBJECT(GTK_FILE_SELECTION(filesel)->ok_button), "user-data",
1854 (gpointer)filesel);
1855 gtk_signal_connect
1856 (GTK_OBJECT(GTK_FILE_SELECTION(filesel)->ok_button), "clicked",
1857 GTK_SIGNAL_FUNC(filesel_ok), fe);
1858 gtk_signal_connect_object
1859 (GTK_OBJECT(GTK_FILE_SELECTION(filesel)->ok_button), "clicked",
1860 GTK_SIGNAL_FUNC(gtk_widget_destroy), (gpointer)filesel);
1861 gtk_signal_connect_object
1862 (GTK_OBJECT(GTK_FILE_SELECTION(filesel)->cancel_button), "clicked",
1863 GTK_SIGNAL_FUNC(gtk_widget_destroy), (gpointer)filesel);
1864 gtk_signal_connect(GTK_OBJECT(filesel), "destroy",
1865 GTK_SIGNAL_FUNC(window_destroy), NULL);
1866 gtk_widget_show(filesel);
1867 gtk_window_set_transient_for(GTK_WINDOW(filesel), GTK_WINDOW(fe->window));
1868 gtk_main();
1869
1870 return fe->filesel_name;
1871}
1872
3847eb66 1873#else
1874
1875static char *file_selector(frontend *fe, char *title, int save)
1876{
1877 char *filesel_name = NULL;
1878
1879 GtkWidget *filesel =
1880 gtk_file_chooser_dialog_new(title,
1881 GTK_WINDOW(fe->window),
1882 save ? GTK_FILE_CHOOSER_ACTION_SAVE :
1883 GTK_FILE_CHOOSER_ACTION_OPEN,
1884 GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
1885 save ? GTK_STOCK_SAVE : GTK_STOCK_OPEN,
1886 GTK_RESPONSE_ACCEPT,
1887 NULL);
1888
1889 if (gtk_dialog_run(GTK_DIALOG(filesel)) == GTK_RESPONSE_ACCEPT) {
1890 const char *name = gtk_file_chooser_get_filename(GTK_FILE_CHOOSER(filesel));
1891 filesel_name = dupstr(name);
1892 }
1893
1894 gtk_widget_destroy(filesel);
1895
1896 return filesel_name;
1897}
1898
1899#endif
1900
f7692dd8 1901struct savefile_write_ctx {
1902 FILE *fp;
1903 int error;
1904};
1905
a4393230 1906static void savefile_write(void *wctx, void *buf, int len)
1907{
f7692dd8 1908 struct savefile_write_ctx *ctx = (struct savefile_write_ctx *)wctx;
1909 if (fwrite(buf, 1, len, ctx->fp) < len)
8b5625f5 1910 ctx->error = errno;
a4393230 1911}
1912
1913static int savefile_read(void *wctx, void *buf, int len)
1914{
1915 FILE *fp = (FILE *)wctx;
1916 int ret;
1917
1918 ret = fread(buf, 1, len, fp);
1919 return (ret == len);
1920}
1921
1922static void menu_save_event(GtkMenuItem *menuitem, gpointer data)
1923{
1924 frontend *fe = (frontend *)data;
1925 char *name;
1926
1927 name = file_selector(fe, "Enter name of game file to save", TRUE);
1928
1929 if (name) {
668be019 1930 FILE *fp;
1931
1932 if ((fp = fopen(name, "r")) != NULL) {
1933 char buf[256 + FILENAME_MAX];
1934 fclose(fp);
1935 /* file exists */
1936
1937 sprintf(buf, "Are you sure you want to overwrite the"
1938 " file \"%.*s\"?",
1939 FILENAME_MAX, name);
1940 if (!message_box(fe->window, "Question", buf, TRUE, MB_YESNO))
1941 return;
1942 }
1943
1944 fp = fopen(name, "w");
a4393230 1945 sfree(name);
1946
1947 if (!fp) {
1948 error_box(fe->window, "Unable to open save file");
1949 return;
1950 }
1951
f7692dd8 1952 {
1953 struct savefile_write_ctx ctx;
1954 ctx.fp = fp;
1955 ctx.error = 0;
1956 midend_serialise(fe->me, savefile_write, &ctx);
1957 fclose(fp);
1958 if (ctx.error) {
8b5625f5 1959 char boxmsg[512];
1960 sprintf(boxmsg, "Error writing save file: %.400s",
1961 strerror(errno));
1962 error_box(fe->window, boxmsg);
f7692dd8 1963 return;
1964 }
1965 }
a4393230 1966
a4393230 1967 }
1968}
1969
1970static void menu_load_event(GtkMenuItem *menuitem, gpointer data)
1971{
1972 frontend *fe = (frontend *)data;
1973 char *name, *err;
a4393230 1974
1975 name = file_selector(fe, "Enter name of saved game file to load", FALSE);
1976
1977 if (name) {
1978 FILE *fp = fopen(name, "r");
1979 sfree(name);
1980
1981 if (!fp) {
1982 error_box(fe->window, "Unable to open saved game file");
1983 return;
1984 }
1985
1986 err = midend_deserialise(fe->me, savefile_read, fp);
1987
1988 fclose(fp);
1989
1990 if (err) {
1991 error_box(fe->window, err);
1992 return;
1993 }
1994
fa3abef5 1995 changed_preset(fe);
854a4f51 1996 resize_fe(fe);
a4393230 1997 }
1998}
1999
2ac6d24e 2000static void menu_solve_event(GtkMenuItem *menuitem, gpointer data)
2001{
2002 frontend *fe = (frontend *)data;
2003 char *msg;
2004
2005 msg = midend_solve(fe->me);
2006
2007 if (msg)
2008 error_box(fe->window, msg);
2009}
2010
7f89707c 2011static void menu_restart_event(GtkMenuItem *menuitem, gpointer data)
2012{
2013 frontend *fe = (frontend *)data;
2014
2015 midend_restart_game(fe->me);
2016}
2017
c8230524 2018static void menu_config_event(GtkMenuItem *menuitem, gpointer data)
2019{
2020 frontend *fe = (frontend *)data;
5928817c 2021 int which = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem),
2022 "user-data"));
c8230524 2023
98488ab9 2024 if (fe->preset_threaded ||
2025 (GTK_IS_CHECK_MENU_ITEM(menuitem) &&
2026 !gtk_check_menu_item_get_active(GTK_CHECK_MENU_ITEM(menuitem))))
2027 return;
2028 changed_preset(fe); /* Put the old preset back! */
5928817c 2029 if (!get_config(fe, which))
c8230524 2030 return;
2031
5928817c 2032 midend_new_game(fe->me);
854a4f51 2033 resize_fe(fe);
c8230524 2034}
2035
97098757 2036static void menu_about_event(GtkMenuItem *menuitem, gpointer data)
2037{
2038 frontend *fe = (frontend *)data;
2039 char titlebuf[256];
2040 char textbuf[1024];
2041
2042 sprintf(titlebuf, "About %.200s", thegame.name);
2043 sprintf(textbuf,
2044 "%.200s\n\n"
2045 "from Simon Tatham's Portable Puzzle Collection\n\n"
2046 "%.500s", thegame.name, ver);
2047
668be019 2048 message_box(fe->window, titlebuf, textbuf, TRUE, MB_OK);
97098757 2049}
2050
eb2ad6f1 2051static GtkWidget *add_menu_item_with_key(frontend *fe, GtkContainer *cont,
2052 char *text, int key)
2053{
2054 GtkWidget *menuitem = gtk_menu_item_new_with_label(text);
a383a9be 2055 int keyqual;
eb2ad6f1 2056 gtk_container_add(cont, menuitem);
2057 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
2058 GINT_TO_POINTER(key));
2059 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2060 GTK_SIGNAL_FUNC(menu_key_event), fe);
a383a9be 2061 switch (key & ~0x1F) {
2062 case 0x00:
2063 key += 0x60;
2064 keyqual = GDK_CONTROL_MASK;
2065 break;
2066 case 0x40:
2067 key += 0x20;
2068 keyqual = GDK_SHIFT_MASK;
2069 break;
2070 default:
2071 keyqual = 0;
2072 break;
2073 }
2074 gtk_widget_add_accelerator(menuitem,
2075 "activate", fe->accelgroup,
2076 key, keyqual,
2077 GTK_ACCEL_VISIBLE);
eb2ad6f1 2078 gtk_widget_show(menuitem);
2079 return menuitem;
2080}
2081
2082static void add_menu_separator(GtkContainer *cont)
2083{
2084 GtkWidget *menuitem = gtk_menu_item_new();
2085 gtk_container_add(cont, menuitem);
2086 gtk_widget_show(menuitem);
2087}
2088
afc306fc 2089enum { ARG_EITHER, ARG_SAVE, ARG_ID }; /* for argtype */
2090
2091static frontend *new_window(char *arg, int argtype, char **error)
2ef96bd6 2092{
2093 frontend *fe;
858d4f32 2094 GtkBox *vbox, *hbox;
8f32c9e8 2095 GtkWidget *menu, *menuitem;
f12cdd72 2096 GdkPixmap *iconpm;
2097 GList *iconlist;
eb2ad6f1 2098 int x, y, n;
dafd6cf6 2099 char errbuf[1024];
f12cdd72 2100 extern char *const *const xpm_icons[];
2101 extern const int n_xpm_icons;
83680571 2102
2ef96bd6 2103 fe = snew(frontend);
83680571 2104
171fbdaa 2105 fe->timer_active = FALSE;
2106 fe->timer_id = -1;
2107
dafd6cf6 2108 fe->me = midend_new(fe, &thegame, &gtk_drawing, fe);
171fbdaa 2109
7d1cfbb7 2110 if (arg) {
2111 char *err;
afc306fc 2112 FILE *fp;
dafd6cf6 2113
2114 errbuf[0] = '\0';
2115
afc306fc 2116 switch (argtype) {
2117 case ARG_ID:
2118 err = midend_game_id(fe->me, arg);
2119 if (!err)
2120 midend_new_game(fe->me);
2121 else
2122 sprintf(errbuf, "Invalid game ID: %.800s", err);
2123 break;
2124 case ARG_SAVE:
2125 fp = fopen(arg, "r");
7d1cfbb7 2126 if (!fp) {
afc306fc 2127 sprintf(errbuf, "Error opening file: %.800s", strerror(errno));
7d1cfbb7 2128 } else {
2129 err = midend_deserialise(fe->me, savefile_read, fp);
93548721 2130 if (err)
afc306fc 2131 sprintf(errbuf, "Invalid save file: %.800s", err);
93548721 2132 fclose(fp);
7d1cfbb7 2133 }
afc306fc 2134 break;
2135 default /*case ARG_EITHER*/:
2136 /*
2137 * First try treating the argument as a game ID.
2138 */
2139 err = midend_game_id(fe->me, arg);
2140 if (!err) {
2141 /*
2142 * It's a valid game ID.
2143 */
2144 midend_new_game(fe->me);
2145 } else {
2146 FILE *fp = fopen(arg, "r");
2147 if (!fp) {
2148 sprintf(errbuf, "Supplied argument is neither a game ID (%.400s)"
2149 " nor a save file (%.400s)", err, strerror(errno));
2150 } else {
2151 err = midend_deserialise(fe->me, savefile_read, fp);
2152 if (err)
2153 sprintf(errbuf, "%.800s", err);
2154 fclose(fp);
2155 }
2156 }
2157 break;
2158 }
dafd6cf6 2159 if (*errbuf) {
2160 *error = dupstr(errbuf);
7d1cfbb7 2161 midend_free(fe->me);
2162 sfree(fe);
2163 return NULL;
2164 }
2165
2166 } else {
2167 midend_new_game(fe->me);
8b7938e7 2168 }
7f77ea24 2169
2ef96bd6 2170 fe->window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
be8d5aa1 2171 gtk_window_set_title(GTK_WINDOW(fe->window), thegame.name);
47432032 2172
eb2ad6f1 2173 vbox = GTK_BOX(gtk_vbox_new(FALSE, 0));
2174 gtk_container_add(GTK_CONTAINER(fe->window), GTK_WIDGET(vbox));
2175 gtk_widget_show(GTK_WIDGET(vbox));
2176
a383a9be 2177 fe->accelgroup = gtk_accel_group_new();
2178 gtk_window_add_accel_group(GTK_WINDOW(fe->window), fe->accelgroup);
2179
858d4f32 2180 hbox = GTK_BOX(gtk_hbox_new(FALSE, 0));
2181 gtk_box_pack_start(vbox, GTK_WIDGET(hbox), FALSE, FALSE, 0);
2182 gtk_widget_show(GTK_WIDGET(hbox));
2183
8f32c9e8 2184 fe->menubar = gtk_menu_bar_new();
2185 gtk_box_pack_start(hbox, fe->menubar, TRUE, TRUE, 0);
2186 gtk_widget_show(fe->menubar);
eb2ad6f1 2187
f52166e6 2188 menuitem = gtk_menu_item_new_with_mnemonic("_Game");
8f32c9e8 2189 gtk_container_add(GTK_CONTAINER(fe->menubar), menuitem);
eb2ad6f1 2190 gtk_widget_show(menuitem);
2191
2192 menu = gtk_menu_new();
2193 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), menu);
2194
2195 add_menu_item_with_key(fe, GTK_CONTAINER(menu), "New", 'n');
7f89707c 2196
2197 menuitem = gtk_menu_item_new_with_label("Restart");
2198 gtk_container_add(GTK_CONTAINER(menu), menuitem);
2199 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2200 GTK_SIGNAL_FUNC(menu_restart_event), fe);
2201 gtk_widget_show(menuitem);
eb2ad6f1 2202
5928817c 2203 menuitem = gtk_menu_item_new_with_label("Specific...");
2204 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
1185e3c5 2205 GINT_TO_POINTER(CFG_DESC));
2206 gtk_container_add(GTK_CONTAINER(menu), menuitem);
2207 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2208 GTK_SIGNAL_FUNC(menu_config_event), fe);
2209 gtk_widget_show(menuitem);
2210
2211 menuitem = gtk_menu_item_new_with_label("Random Seed...");
2212 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
5928817c 2213 GINT_TO_POINTER(CFG_SEED));
2214 gtk_container_add(GTK_CONTAINER(menu), menuitem);
2215 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2216 GTK_SIGNAL_FUNC(menu_config_event), fe);
2217 gtk_widget_show(menuitem);
2218
98488ab9 2219 fe->preset_radio = NULL;
2220 fe->preset_custom = NULL;
2221 fe->n_preset_menu_items = 0;
2222 fe->preset_threaded = FALSE;
be8d5aa1 2223 if ((n = midend_num_presets(fe->me)) > 0 || thegame.can_configure) {
eb2ad6f1 2224 GtkWidget *submenu;
2225 int i;
2226
f52166e6 2227 menuitem = gtk_menu_item_new_with_mnemonic("_Type");
8f32c9e8 2228 gtk_container_add(GTK_CONTAINER(fe->menubar), menuitem);
eb2ad6f1 2229 gtk_widget_show(menuitem);
2230
2231 submenu = gtk_menu_new();
2232 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), submenu);
2233
2234 for (i = 0; i < n; i++) {
2235 char *name;
2236 game_params *params;
2237
2238 midend_fetch_preset(fe->me, i, &name, &params);
2239
98488ab9 2240 menuitem =
2241 gtk_radio_menu_item_new_with_label(fe->preset_radio, name);
2242 fe->preset_radio =
2243 gtk_radio_menu_item_group(GTK_RADIO_MENU_ITEM(menuitem));
2244 fe->n_preset_menu_items++;
eb2ad6f1 2245 gtk_container_add(GTK_CONTAINER(submenu), menuitem);
2246 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data", params);
2247 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2248 GTK_SIGNAL_FUNC(menu_preset_event), fe);
2249 gtk_widget_show(menuitem);
2250 }
c8230524 2251
be8d5aa1 2252 if (thegame.can_configure) {
98488ab9 2253 menuitem = fe->preset_custom =
2254 gtk_radio_menu_item_new_with_label(fe->preset_radio,
2255 "Custom...");
2256 fe->preset_radio =
2257 gtk_radio_menu_item_group(GTK_RADIO_MENU_ITEM(menuitem));
f92acd1a 2258 gtk_container_add(GTK_CONTAINER(submenu), menuitem);
5928817c 2259 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
2260 GPOINTER_TO_INT(CFG_SETTINGS));
c8230524 2261 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2262 GTK_SIGNAL_FUNC(menu_config_event), fe);
2263 gtk_widget_show(menuitem);
98488ab9 2264 }
f92acd1a 2265
eb2ad6f1 2266 }
2267
668be019 2268 add_menu_separator(GTK_CONTAINER(menu));
cccb7f09 2269 menuitem = gtk_menu_item_new_with_label("Load...");
668be019 2270 gtk_container_add(GTK_CONTAINER(menu), menuitem);
2271 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2272 GTK_SIGNAL_FUNC(menu_load_event), fe);
2273 gtk_widget_show(menuitem);
cccb7f09 2274 menuitem = gtk_menu_item_new_with_label("Save...");
668be019 2275 gtk_container_add(GTK_CONTAINER(menu), menuitem);
2276 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2277 GTK_SIGNAL_FUNC(menu_save_event), fe);
2278 gtk_widget_show(menuitem);
858d4f32 2279#ifndef STYLUS_BASED
eb2ad6f1 2280 add_menu_separator(GTK_CONTAINER(menu));
2281 add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Undo", 'u');
a383a9be 2282 add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Redo", 'r');
858d4f32 2283#endif
fa3abef5 2284 if (thegame.can_format_as_text_ever) {
9b4b03d3 2285 add_menu_separator(GTK_CONTAINER(menu));
2286 menuitem = gtk_menu_item_new_with_label("Copy");
2287 gtk_container_add(GTK_CONTAINER(menu), menuitem);
2288 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2289 GTK_SIGNAL_FUNC(menu_copy_event), fe);
2290 gtk_widget_show(menuitem);
fa3abef5 2291 fe->copy_menu_item = menuitem;
2292 } else {
2293 fe->copy_menu_item = NULL;
9b4b03d3 2294 }
2ac6d24e 2295 if (thegame.can_solve) {
2296 add_menu_separator(GTK_CONTAINER(menu));
2297 menuitem = gtk_menu_item_new_with_label("Solve");
2298 gtk_container_add(GTK_CONTAINER(menu), menuitem);
2299 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2300 GTK_SIGNAL_FUNC(menu_solve_event), fe);
2301 gtk_widget_show(menuitem);
2302 }
eb2ad6f1 2303 add_menu_separator(GTK_CONTAINER(menu));
2304 add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Exit", 'q');
7f77ea24 2305
f52166e6 2306 menuitem = gtk_menu_item_new_with_mnemonic("_Help");
8f32c9e8 2307 gtk_container_add(GTK_CONTAINER(fe->menubar), menuitem);
97098757 2308 gtk_widget_show(menuitem);
2309
2310 menu = gtk_menu_new();
2311 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), menu);
2312
2313 menuitem = gtk_menu_item_new_with_label("About");
2314 gtk_container_add(GTK_CONTAINER(menu), menuitem);
2315 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
2316 GTK_SIGNAL_FUNC(menu_about_event), fe);
2317 gtk_widget_show(menuitem);
2318
858d4f32 2319#ifdef STYLUS_BASED
2320 menuitem=gtk_button_new_with_mnemonic("_Redo");
2321 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
2322 GINT_TO_POINTER((int)('r')));
2323 gtk_signal_connect(GTK_OBJECT(menuitem), "clicked",
2324 GTK_SIGNAL_FUNC(menu_key_event), fe);
2325 gtk_box_pack_end(hbox, menuitem, FALSE, FALSE, 0);
2326 gtk_widget_show(menuitem);
2327
2328 menuitem=gtk_button_new_with_mnemonic("_Undo");
2329 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
2330 GINT_TO_POINTER((int)('u')));
2331 gtk_signal_connect(GTK_OBJECT(menuitem), "clicked",
2332 GTK_SIGNAL_FUNC(menu_key_event), fe);
2333 gtk_box_pack_end(hbox, menuitem, FALSE, FALSE, 0);
2334 gtk_widget_show(menuitem);
2335
2336 if (thegame.flags & REQUIRE_NUMPAD) {
2337 hbox = GTK_BOX(gtk_hbox_new(FALSE, 0));
2338 gtk_box_pack_start(vbox, GTK_WIDGET(hbox), FALSE, FALSE, 0);
2339 gtk_widget_show(GTK_WIDGET(hbox));
2340
2341 *((int*)errbuf)=0;
2342 errbuf[1]='\0';
2343 for(errbuf[0]='0';errbuf[0]<='9';errbuf[0]++) {
2344 menuitem=gtk_button_new_with_label(errbuf);
2345 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
2346 GINT_TO_POINTER((int)(errbuf[0])));
2347 gtk_signal_connect(GTK_OBJECT(menuitem), "clicked",
2348 GTK_SIGNAL_FUNC(menu_key_event), fe);
2349 gtk_box_pack_start(hbox, menuitem, TRUE, TRUE, 0);
2350 gtk_widget_show(menuitem);
2351 }
2352 }
2353#endif /* STYLUS_BASED */
2354
f1a5cc88 2355 changed_preset(fe);
2356
40570a4e 2357 snaffle_colours(fe);
7f77ea24 2358
fd1a1a2b 2359 if (midend_wants_statusbar(fe->me)) {
5725d728 2360 GtkWidget *viewport;
2361 GtkRequisition req;
2362
2363 viewport = gtk_viewport_new(NULL, NULL);
2364 gtk_viewport_set_shadow_type(GTK_VIEWPORT(viewport), GTK_SHADOW_NONE);
fd1a1a2b 2365 fe->statusbar = gtk_statusbar_new();
5725d728 2366 gtk_container_add(GTK_CONTAINER(viewport), fe->statusbar);
2367 gtk_widget_show(viewport);
2368 gtk_box_pack_end(vbox, viewport, FALSE, FALSE, 0);
fd1a1a2b 2369 gtk_widget_show(fe->statusbar);
2370 fe->statusctx = gtk_statusbar_get_context_id
2371 (GTK_STATUSBAR(fe->statusbar), "game");
2372 gtk_statusbar_push(GTK_STATUSBAR(fe->statusbar), fe->statusctx,
5725d728 2373 "test");
2374 gtk_widget_size_request(fe->statusbar, &req);
2375#if 0
2376 /* For GTK 2.0, should we be using gtk_widget_set_size_request? */
2377#endif
60d42abc 2378 gtk_widget_set_usize(viewport, -1, req.height);
fd1a1a2b 2379 } else
2380 fe->statusbar = NULL;
2381
2ef96bd6 2382 fe->area = gtk_drawing_area_new();
d5b1e2c1 2383#if GTK_CHECK_VERSION(2,0,0)
2384 GTK_WIDGET_UNSET_FLAGS(fe->area, GTK_DOUBLE_BUFFERED);
2385#endif
1e3e152d 2386 get_size(fe, &x, &y);
8f32c9e8 2387 fe->drawing_area_shrink_pending = FALSE;
2ef96bd6 2388 gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
2389 fe->w = x;
2390 fe->h = y;
2391
1e3e152d 2392 gtk_box_pack_end(vbox, fe->area, TRUE, TRUE, 0);
2ef96bd6 2393
40570a4e 2394 clear_backing_store(fe);
4efb3868 2395 fe->fonts = NULL;
2396 fe->nfonts = fe->fontsize = 0;
2ef96bd6 2397
9b4b03d3 2398 fe->paste_data = NULL;
2399 fe->paste_data_len = 0;
2400
2ef96bd6 2401 gtk_signal_connect(GTK_OBJECT(fe->window), "destroy",
2402 GTK_SIGNAL_FUNC(destroy), fe);
2403 gtk_signal_connect(GTK_OBJECT(fe->window), "key_press_event",
2404 GTK_SIGNAL_FUNC(key_event), fe);
2405 gtk_signal_connect(GTK_OBJECT(fe->area), "button_press_event",
2406 GTK_SIGNAL_FUNC(button_event), fe);
74a4e547 2407 gtk_signal_connect(GTK_OBJECT(fe->area), "button_release_event",
2408 GTK_SIGNAL_FUNC(button_event), fe);
2409 gtk_signal_connect(GTK_OBJECT(fe->area), "motion_notify_event",
2410 GTK_SIGNAL_FUNC(motion_event), fe);
9b4b03d3 2411 gtk_signal_connect(GTK_OBJECT(fe->area), "selection_get",
2412 GTK_SIGNAL_FUNC(selection_get), fe);
2413 gtk_signal_connect(GTK_OBJECT(fe->area), "selection_clear_event",
2414 GTK_SIGNAL_FUNC(selection_clear), fe);
2ef96bd6 2415 gtk_signal_connect(GTK_OBJECT(fe->area), "expose_event",
2416 GTK_SIGNAL_FUNC(expose_area), fe);
fd1a1a2b 2417 gtk_signal_connect(GTK_OBJECT(fe->window), "map_event",
2418 GTK_SIGNAL_FUNC(map_window), fe);
2ef96bd6 2419 gtk_signal_connect(GTK_OBJECT(fe->area), "configure_event",
2420 GTK_SIGNAL_FUNC(configure_area), fe);
8f32c9e8 2421 gtk_signal_connect(GTK_OBJECT(fe->window), "configure_event",
2422 GTK_SIGNAL_FUNC(configure_window), fe);
2ef96bd6 2423
74a4e547 2424 gtk_widget_add_events(GTK_WIDGET(fe->area),
2425 GDK_BUTTON_PRESS_MASK |
2426 GDK_BUTTON_RELEASE_MASK |
4a59b80c 2427 GDK_BUTTON_MOTION_MASK |
2428 GDK_POINTER_MOTION_HINT_MASK);
2ef96bd6 2429
f12cdd72 2430 if (n_xpm_icons) {
2431 gtk_widget_realize(fe->window);
2432 iconpm = gdk_pixmap_create_from_xpm_d(fe->window->window, NULL,
2433 NULL, (gchar **)xpm_icons[0]);
2434 gdk_window_set_icon(fe->window->window, NULL, iconpm, NULL);
2435 iconlist = NULL;
2436 for (n = 0; n < n_xpm_icons; n++) {
2437 iconlist =
2438 g_list_append(iconlist,
2439 gdk_pixbuf_new_from_xpm_data((const gchar **)
2440 xpm_icons[n]));
2441 }
2442 gdk_window_set_icon_list(fe->window->window, iconlist);
2443 }
2444
2ef96bd6 2445 gtk_widget_show(fe->area);
2446 gtk_widget_show(fe->window);
2447
8f32c9e8 2448 fe->drawing_area_shrink_pending = TRUE;
2449 try_shrink_drawing_area(fe);
40570a4e 2450 set_window_background(fe, 0);
1e3e152d 2451
2ef96bd6 2452 return fe;
83680571 2453}
2454
dafd6cf6 2455char *fgetline(FILE *fp)
2456{
2457 char *ret = snewn(512, char);
2458 int size = 512, len = 0;
2459 while (fgets(ret + len, size - len, fp)) {
2460 len += strlen(ret + len);
2461 if (ret[len-1] == '\n')
2462 break; /* got a newline, we're done */
2463 size = len + 512;
2464 ret = sresize(ret, size, char);
2465 }
2466 if (len == 0) { /* first fgets returned NULL */
2467 sfree(ret);
2468 return NULL;
2469 }
2470 ret[len] = '\0';
2471 return ret;
2472}
2473
83680571 2474int main(int argc, char **argv)
2475{
8b7938e7 2476 char *pname = argv[0];
2477 char *error;
dafd6cf6 2478 int ngenerate = 0, print = FALSE, px = 1, py = 1;
2479 int soln = FALSE, colour = FALSE;
2480 float scale = 1.0F;
afc306fc 2481 float redo_proportion = 0.0F;
8b5625f5 2482 char *savefile = NULL, *savesuffix = NULL;
dafd6cf6 2483 char *arg = NULL;
afc306fc 2484 int argtype = ARG_EITHER;
9edb9f35 2485 char *screenshot_file = NULL;
dafd6cf6 2486 int doing_opts = TRUE;
2487 int ac = argc;
2488 char **av = argv;
2489 char errbuf[500];
8b7938e7 2490
dafd6cf6 2491 /*
2492 * Command line parsing in this function is rather fiddly,
2493 * because GTK wants to have a go at argc/argv _first_ - and
2494 * yet we can't let it, because gtk_init() will bomb out if it
2495 * can't open an X display, whereas in fact we want to permit
2496 * our --generate and --print modes to run without an X
2497 * display.
2498 *
2499 * So what we do is:
2500 * - we parse the command line ourselves, without modifying
2501 * argc/argv
2502 * - if we encounter an error which might plausibly be the
2503 * result of a GTK command line (i.e. not detailed errors in
2504 * particular options of ours) we store the error message
2505 * and terminate parsing.
2506 * - if we got enough out of the command line to know it
2507 * specifies a non-X mode of operation, we either display
2508 * the stored error and return failure, or if there is no
2509 * stored error we do the non-X operation and return
2510 * success.
2511 * - otherwise, we go straight to gtk_init().
2512 */
2513
2514 errbuf[0] = '\0';
2515 while (--ac > 0) {
2516 char *p = *++av;
2517 if (doing_opts && !strcmp(p, "--version")) {
2518 printf("%s, from Simon Tatham's Portable Puzzle Collection\n%s\n",
2519 thegame.name, ver);
2520 return 0;
2521 } else if (doing_opts && !strcmp(p, "--generate")) {
2522 if (--ac > 0) {
2523 ngenerate = atoi(*++av);
2524 if (!ngenerate) {
2525 fprintf(stderr, "%s: '--generate' expected a number\n",
2526 pname);
2527 return 1;
2528 }
2529 } else
2530 ngenerate = 1;
8b5625f5 2531 } else if (doing_opts && !strcmp(p, "--save")) {
2532 if (--ac > 0) {
2533 savefile = *++av;
2534 } else {
2535 fprintf(stderr, "%s: '--save' expected a filename\n",
2536 pname);
2537 return 1;
2538 }
2539 } else if (doing_opts && (!strcmp(p, "--save-suffix") ||
2540 !strcmp(p, "--savesuffix"))) {
2541 if (--ac > 0) {
2542 savesuffix = *++av;
2543 } else {
2544 fprintf(stderr, "%s: '--save-suffix' expected a filename\n",
2545 pname);
2546 return 1;
2547 }
dafd6cf6 2548 } else if (doing_opts && !strcmp(p, "--print")) {
2549 if (!thegame.can_print) {
2550 fprintf(stderr, "%s: this game does not support printing\n",
2551 pname);
2552 return 1;
2553 }
2554 print = TRUE;
2555 if (--ac > 0) {
2556 char *dim = *++av;
2557 if (sscanf(dim, "%dx%d", &px, &py) != 2) {
2558 fprintf(stderr, "%s: unable to parse argument '%s' to "
2559 "'--print'\n", pname, dim);
2560 return 1;
2561 }
2562 } else {
2563 px = py = 1;
2564 }
2565 } else if (doing_opts && !strcmp(p, "--scale")) {
2566 if (--ac > 0) {
2567 scale = atof(*++av);
2568 } else {
2569 fprintf(stderr, "%s: no argument supplied to '--scale'\n",
2570 pname);
2571 return 1;
2572 }
afc306fc 2573 } else if (doing_opts && !strcmp(p, "--redo")) {
2574 /*
2575 * This is an internal option which I don't expect
2576 * users to have any particular use for. The effect of
2577 * --redo is that once the game has been loaded and
2578 * initialised, the next move in the redo chain is
2579 * replayed, and the game screen is redrawn part way
2580 * through the making of the move. This is only
2581 * meaningful if there _is_ a next move in the redo
2582 * chain, which means in turn that this option is only
2583 * useful if you're also passing a save file on the
2584 * command line.
2585 *
2586 * This option is used by the script which generates
2587 * the puzzle icons and website screenshots, and I
2588 * don't imagine it's useful for anything else.
2589 * (Unless, I suppose, users don't like my screenshots
2590 * and want to generate their own in the same way for
2591 * some repackaged version of the puzzles.)
2592 */
2593 if (--ac > 0) {
2594 redo_proportion = atof(*++av);
2595 } else {
2596 fprintf(stderr, "%s: no argument supplied to '--redo'\n",
2597 pname);
2598 return 1;
2599 }
9edb9f35 2600 } else if (doing_opts && !strcmp(p, "--screenshot")) {
afc306fc 2601 /*
2602 * Another internal option for the icon building
9edb9f35 2603 * script. This causes a screenshot of the central
afc306fc 2604 * drawing area (i.e. not including the menu bar or
9edb9f35 2605 * status bar) to be saved to a PNG file once the
2606 * window has been drawn, and then the application
2607 * quits immediately.
afc306fc 2608 */
9edb9f35 2609 if (--ac > 0) {
2610 screenshot_file = *++av;
2611 } else {
2612 fprintf(stderr, "%s: no argument supplied to '--screenshot'\n",
2613 pname);
2614 return 1;
2615 }
dafd6cf6 2616 } else if (doing_opts && (!strcmp(p, "--with-solutions") ||
2617 !strcmp(p, "--with-solution") ||
2618 !strcmp(p, "--with-solns") ||
2619 !strcmp(p, "--with-soln") ||
2620 !strcmp(p, "--solutions") ||
2621 !strcmp(p, "--solution") ||
2622 !strcmp(p, "--solns") ||
2623 !strcmp(p, "--soln"))) {
2624 soln = TRUE;
2625 } else if (doing_opts && !strcmp(p, "--colour")) {
2626 if (!thegame.can_print_in_colour) {
2627 fprintf(stderr, "%s: this game does not support colour"
2628 " printing\n", pname);
2629 return 1;
2630 }
2631 colour = TRUE;
afc306fc 2632 } else if (doing_opts && !strcmp(p, "--load")) {
2633 argtype = ARG_SAVE;
2634 } else if (doing_opts && !strcmp(p, "--game")) {
2635 argtype = ARG_ID;
dafd6cf6 2636 } else if (doing_opts && !strcmp(p, "--")) {
2637 doing_opts = FALSE;
2638 } else if (!doing_opts || p[0] != '-') {
2639 if (arg) {
2640 fprintf(stderr, "%s: more than one argument supplied\n",
2641 pname);
2642 return 1;
2643 }
2644 arg = p;
2645 } else {
2646 sprintf(errbuf, "%.100s: unrecognised option '%.100s'\n",
2647 pname, p);
2648 break;
2649 }
45f953cc 2650 }
2651
95c76d7c 2652 if (*errbuf) {
2653 fputs(errbuf, stderr);
2654 return 1;
2655 }
2656
d91e1fc9 2657 /*
2658 * Special standalone mode for generating puzzle IDs on the
2659 * command line. Useful for generating puzzles to be printed
2660 * out and solved offline (for puzzles where that even makes
2661 * sense - Solo, for example, is a lot more pencil-and-paper
dafd6cf6 2662 * friendly than Twiddle!)
d91e1fc9 2663 *
2664 * Usage:
2665 *
2666 * <puzzle-name> --generate [<n> [<params>]]
2667 *
2668 * <n>, if present, is the number of puzzle IDs to generate.
2669 * <params>, if present, is the same type of parameter string
2670 * you would pass to the puzzle when running it in GUI mode,
2671 * including optional extras such as the expansion factor in
2672 * Rectangles and the difficulty level in Solo.
2673 *
2674 * If you specify <params>, you must also specify <n> (although
2675 * you may specify it to be 1). Sorry; that was the
2676 * simplest-to-parse command-line syntax I came up with.
2677 */
8b5625f5 2678 if (ngenerate > 0 || print || savefile || savesuffix) {
dafd6cf6 2679 int i, n = 1;
2680 midend *me;
2681 char *id;
2682 document *doc = NULL;
2683
dafd6cf6 2684 n = ngenerate;
2685
2686 me = midend_new(NULL, &thegame, NULL, NULL);
2687 i = 0;
2688
8b5625f5 2689 if (savefile && !savesuffix)
2690 savesuffix = "";
2691 if (!savefile && savesuffix)
2692 savefile = "";
2693
dafd6cf6 2694 if (print)
2695 doc = document_new(px, py, scale);
2696
2697 /*
2698 * In this loop, we either generate a game ID or read one
2699 * from stdin depending on whether we're in generate mode;
2700 * then we either write it to stdout or print it, depending
2701 * on whether we're in print mode. Thus, this loop handles
2702 * generate-to-stdout, print-from-stdin and generate-and-
2703 * immediately-print modes.
2704 *
2705 * (It could also handle a copy-stdin-to-stdout mode,
2706 * although there's currently no combination of options
2707 * which will cause this loop to be activated in that mode.
2708 * It wouldn't be _entirely_ pointless, though, because
2709 * stdin could contain bare params strings or random-seed
2710 * IDs, and stdout would contain nothing but fully
2711 * generated descriptive game IDs.)
2712 */
2713 while (ngenerate == 0 || i < n) {
2714 char *pstr, *err;
2715
2716 if (ngenerate == 0) {
2717 pstr = fgetline(stdin);
2718 if (!pstr)
2719 break;
2720 pstr[strcspn(pstr, "\r\n")] = '\0';
2721 } else {
2722 if (arg) {
2723 pstr = snewn(strlen(arg) + 40, char);
2724
2725 strcpy(pstr, arg);
2726 if (i > 0 && strchr(arg, '#'))
2727 sprintf(pstr + strlen(pstr), "-%d", i);
2728 } else
2729 pstr = NULL;
2730 }
2731
2732 if (pstr) {
2733 err = midend_game_id(me, pstr);
2734 if (err) {
2735 fprintf(stderr, "%s: error parsing '%s': %s\n",
2736 pname, pstr, err);
2737 return 1;
2738 }
2739 }
2740 sfree(pstr);
2741
2742 midend_new_game(me);
2743
2744 if (doc) {
2745 err = midend_print_puzzle(me, doc, soln);
2746 if (err) {
2747 fprintf(stderr, "%s: error in printing: %s\n", pname, err);
2748 return 1;
2749 }
8b5625f5 2750 }
2751 if (savefile) {
2752 struct savefile_write_ctx ctx;
2753 char *realname = snewn(40 + strlen(savefile) +
2754 strlen(savesuffix), char);
2755 sprintf(realname, "%s%d%s", savefile, i, savesuffix);
91d3791c 2756
2757 if (soln) {
2758 char *err = midend_solve(me);
2759 if (err) {
2760 fprintf(stderr, "%s: unable to show solution: %s\n",
2761 realname, err);
2762 return 1;
2763 }
2764 }
2765
8b5625f5 2766 ctx.fp = fopen(realname, "w");
2767 if (!ctx.fp) {
2768 fprintf(stderr, "%s: open: %s\n", realname,
2769 strerror(errno));
2770 return 1;
2771 }
2337bd6d 2772 ctx.error = 0;
8b5625f5 2773 midend_serialise(me, savefile_write, &ctx);
2774 if (ctx.error) {
2775 fprintf(stderr, "%s: write: %s\n", realname,
2776 strerror(ctx.error));
2777 return 1;
2778 }
2779 if (fclose(ctx.fp)) {
2780 fprintf(stderr, "%s: close: %s\n", realname,
2781 strerror(errno));
2782 return 1;
2783 }
08288595 2784 sfree(realname);
8b5625f5 2785 }
2786 if (!doc && !savefile) {
dafd6cf6 2787 id = midend_get_game_id(me);
2788 puts(id);
2789 sfree(id);
2790 }
2791
2792 i++;
d91e1fc9 2793 }
8b7938e7 2794
dafd6cf6 2795 if (doc) {
2796 psdata *ps = ps_init(stdout, colour);
2797 document_print(doc, ps_drawing_api(ps));
2798 document_free(doc);
2799 ps_free(ps);
2800 }
2801
2802 midend_free(me);
2803
d91e1fc9 2804 return 0;
2805 } else {
afc306fc 2806 frontend *fe;
d91e1fc9 2807
2808 gtk_init(&argc, &argv);
2809
afc306fc 2810 fe = new_window(arg, argtype, &error);
2811
2812 if (!fe) {
d91e1fc9 2813 fprintf(stderr, "%s: %s\n", pname, error);
2814 return 1;
2815 }
2816
9edb9f35 2817 if (screenshot_file) {
afc306fc 2818 /*
2819 * Some puzzles will not redraw their entire area if
2820 * given a partially completed animation, which means
2821 * we must redraw now and _then_ redraw again after
2822 * freezing the move timer.
2823 */
2824 midend_force_redraw(fe->me);
2825 }
2826
2827 if (redo_proportion) {
2828 /* Start a redo. */
2829 midend_process_key(fe->me, 0, 0, 'r');
2830 /* And freeze the timer at the specified position. */
2831 midend_freeze_timer(fe->me, redo_proportion);
2832 }
2833
9edb9f35 2834 if (screenshot_file) {
40570a4e 2835 save_screenshot_png(fe, screenshot_file);
9edb9f35 2836 exit(0);
afc306fc 2837 }
2838
d91e1fc9 2839 gtk_main();
2840 }
83680571 2841
2842 return 0;
2843}
Simon Tatham's portable puzzles collection; import of svn://svn.tartarus.org/sgt/puzzles