~mdw / sgt / puzzles / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Miscellaneous fixes. Correct a comparison of y with w causing
[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>
720a8fb7 12
8c1fd974 13#include <sys/time.h>
14
83680571 15#include <gtk/gtk.h>
1482ee76 16#include <gdk/gdkkeysyms.h>
83680571 17
a9668451 18#include <gdk/gdkx.h>
19#include <X11/Xlib.h>
9b4b03d3 20#include <X11/Xutil.h>
21#include <X11/Xatom.h>
a9668451 22
720a8fb7 23#include "puzzles.h"
24
1fad7a3b 25#if GTK_CHECK_VERSION(2,0,0)
26#define USE_PANGO
27#endif
28
81ff8295 29#ifdef DEBUGGING
30static FILE *debug_fp = NULL;
31
32void dputs(char *buf)
33{
34 if (!debug_fp) {
35 debug_fp = fopen("debug.log", "w");
36 }
37
38 fputs(buf, stderr);
39
40 if (debug_fp) {
41 fputs(buf, debug_fp);
42 fflush(debug_fp);
43 }
44}
45
46void debug_printf(char *fmt, ...)
47{
48 char buf[4096];
49 va_list ap;
50
51 va_start(ap, fmt);
52 vsprintf(buf, fmt, ap);
53 dputs(buf);
54 va_end(ap);
55}
56#endif
57
83680571 58/* ----------------------------------------------------------------------
59 * Error reporting functions used elsewhere.
60 */
61
720a8fb7 62void fatal(char *fmt, ...)
63{
64 va_list ap;
65
66 fprintf(stderr, "fatal error: ");
67
68 va_start(ap, fmt);
69 vfprintf(stderr, fmt, ap);
70 va_end(ap);
71
72 fprintf(stderr, "\n");
73 exit(1);
74}
83680571 75
76/* ----------------------------------------------------------------------
77 * GTK front end to puzzles.
78 */
79
4efb3868 80struct font {
1fad7a3b 81#ifdef USE_PANGO
82 PangoFontDescription *desc;
83#else
4efb3868 84 GdkFont *font;
1fad7a3b 85#endif
4efb3868 86 int type;
87 int size;
88};
89
83680571 90/*
91 * This structure holds all the data relevant to a single window.
92 * In principle this would allow us to open multiple independent
93 * puzzle windows, although I can't currently see any real point in
94 * doing so. I'm just coding cleanly because there's no
95 * particularly good reason not to.
96 */
2ef96bd6 97struct frontend {
83680571 98 GtkWidget *window;
7f77ea24 99 GtkWidget *area;
fd1a1a2b 100 GtkWidget *statusbar;
101 guint statusctx;
2ef96bd6 102 GdkPixmap *pixmap;
103 GdkColor *colours;
104 int ncolours;
105 GdkColormap *colmap;
106 int w, h;
dafd6cf6 107 midend *me;
2ef96bd6 108 GdkGC *gc;
109 int bbox_l, bbox_r, bbox_u, bbox_d;
20ee89e3 110 int timer_active, timer_id;
8c1fd974 111 struct timeval last_time;
4efb3868 112 struct font *fonts;
113 int nfonts, fontsize;
c8230524 114 config_item *cfg;
5928817c 115 int cfg_which, cfgret;
c8230524 116 GtkWidget *cfgbox;
23e8c9fd 117 void *paste_data;
9b4b03d3 118 int paste_data_len;
f5f4a1f1 119 char *laststatus;
1e3e152d 120 int pw, ph; /* pixmap size (w, h are area size) */
121 int ox, oy; /* offset of pixmap in drawing area */
a4393230 122 char *filesel_name;
83680571 123};
124
cbb5549e 125void get_random_seed(void **randseed, int *randseedsize)
126{
102d0d14 127 struct timeval *tvp = snew(struct timeval);
128 gettimeofday(tvp, NULL);
129 *randseed = (void *)tvp;
130 *randseedsize = sizeof(struct timeval);
cbb5549e 131}
132
2ef96bd6 133void frontend_default_colour(frontend *fe, float *output)
134{
135 GdkColor col = fe->window->style->bg[GTK_STATE_NORMAL];
136 output[0] = col.red / 65535.0;
137 output[1] = col.green / 65535.0;
138 output[2] = col.blue / 65535.0;
139}
140
dafd6cf6 141void gtk_status_bar(void *handle, char *text)
fd1a1a2b 142{
dafd6cf6 143 frontend *fe = (frontend *)handle;
48dcdd62 144 char *rewritten;
145
fd1a1a2b 146 assert(fe->statusbar);
147
48dcdd62 148 rewritten = midend_rewrite_statusbar(fe->me, text);
f5f4a1f1 149 if (!fe->laststatus || strcmp(rewritten, fe->laststatus)) {
150 gtk_statusbar_pop(GTK_STATUSBAR(fe->statusbar), fe->statusctx);
151 gtk_statusbar_push(GTK_STATUSBAR(fe->statusbar), fe->statusctx, rewritten);
152 sfree(fe->laststatus);
153 fe->laststatus = rewritten;
154 } else {
155 sfree(rewritten);
156 }
fd1a1a2b 157}
158
dafd6cf6 159void gtk_start_draw(void *handle)
2ef96bd6 160{
dafd6cf6 161 frontend *fe = (frontend *)handle;
2ef96bd6 162 fe->gc = gdk_gc_new(fe->area->window);
163 fe->bbox_l = fe->w;
164 fe->bbox_r = 0;
165 fe->bbox_u = fe->h;
166 fe->bbox_d = 0;
167}
168
dafd6cf6 169void gtk_clip(void *handle, int x, int y, int w, int h)
4efb3868 170{
dafd6cf6 171 frontend *fe = (frontend *)handle;
4efb3868 172 GdkRectangle rect;
173
174 rect.x = x;
175 rect.y = y;
176 rect.width = w;
177 rect.height = h;
178
179 gdk_gc_set_clip_rectangle(fe->gc, &rect);
180}
181
dafd6cf6 182void gtk_unclip(void *handle)
4efb3868 183{
dafd6cf6 184 frontend *fe = (frontend *)handle;
4efb3868 185 GdkRectangle rect;
186
187 rect.x = 0;
188 rect.y = 0;
189 rect.width = fe->w;
190 rect.height = fe->h;
191
192 gdk_gc_set_clip_rectangle(fe->gc, &rect);
193}
194
dafd6cf6 195void gtk_draw_text(void *handle, int x, int y, int fonttype, int fontsize,
196 int align, int colour, char *text)
4efb3868 197{
dafd6cf6 198 frontend *fe = (frontend *)handle;
4efb3868 199 int i;
200
201 /*
202 * Find or create the font.
203 */
204 for (i = 0; i < fe->nfonts; i++)
205 if (fe->fonts[i].type == fonttype && fe->fonts[i].size == fontsize)
206 break;
207
208 if (i == fe->nfonts) {
209 if (fe->fontsize <= fe->nfonts) {
210 fe->fontsize = fe->nfonts + 10;
211 fe->fonts = sresize(fe->fonts, fe->fontsize, struct font);
212 }
213
214 fe->nfonts++;
215
216 fe->fonts[i].type = fonttype;
217 fe->fonts[i].size = fontsize;
218
1fad7a3b 219#ifdef USE_PANGO
4efb3868 220 /*
a9668451 221 * Use Pango to find the closest match to the requested
222 * font.
4efb3868 223 */
a9668451 224 {
225 PangoFontDescription *fd;
226
227 fd = pango_font_description_new();
228 /* `Monospace' and `Sans' are meta-families guaranteed to exist */
229 pango_font_description_set_family(fd, fonttype == FONT_FIXED ?
230 "Monospace" : "Sans");
2e837d78 231 pango_font_description_set_weight(fd, PANGO_WEIGHT_BOLD);
a9668451 232 /*
233 * I found some online Pango documentation which
234 * described a function called
235 * pango_font_description_set_absolute_size(), which is
236 * _exactly_ what I want here. Unfortunately, none of
237 * my local Pango installations have it (presumably
238 * they're too old), so I'm going to have to hack round
239 * it by figuring out the point size myself. This
240 * limits me to X and probably also breaks in later
241 * Pango installations, so ideally I should add another
242 * CHECK_VERSION type ifdef and use set_absolute_size
243 * where available. All very annoying.
244 */
245#ifdef HAVE_SENSIBLE_ABSOLUTE_SIZE_FUNCTION
246 pango_font_description_set_absolute_size(fd, PANGO_SCALE*fontsize);
247#else
248 {
249 Display *d = GDK_DISPLAY();
250 int s = DefaultScreen(d);
251 double resolution =
252 (PANGO_SCALE * 72.27 / 25.4) *
253 ((double) DisplayWidthMM(d, s) / DisplayWidth (d, s));
254 pango_font_description_set_size(fd, resolution * fontsize);
255 }
256#endif
1fad7a3b 257 fe->fonts[i].desc = fd;
a9668451 258 }
259
1fad7a3b 260#else
261 /*
262 * In GTK 1.2, I don't know of any plausible way to
263 * pick a suitable font, so I'm just going to be
264 * tedious.
265 */
266 fe->fonts[i].font = gdk_font_load(fonttype == FONT_FIXED ?
267 "fixed" : "variable");
a9668451 268#endif
1fad7a3b 269
270 }
271
272 /*
273 * Set the colour.
274 */
275 gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
276
277#ifdef USE_PANGO
278
279 {
280 PangoLayout *layout;
281 PangoRectangle rect;
282
283 /*
284 * Create a layout.
285 */
286 layout = pango_layout_new(gtk_widget_get_pango_context(fe->area));
287 pango_layout_set_font_description(layout, fe->fonts[i].desc);
288 pango_layout_set_text(layout, text, strlen(text));
289 pango_layout_get_pixel_extents(layout, NULL, &rect);
290
291 if (align & ALIGN_VCENTRE)
292 rect.y -= rect.height / 2;
86e60e3d 293 else
294 rect.y -= rect.height;
1fad7a3b 295
296 if (align & ALIGN_HCENTRE)
297 rect.x -= rect.width / 2;
298 else if (align & ALIGN_HRIGHT)
299 rect.x -= rect.width;
300
301 gdk_draw_layout(fe->pixmap, fe->gc, rect.x + x, rect.y + y, layout);
302
303 g_object_unref(layout);
4efb3868 304 }
305
1fad7a3b 306#else
4efb3868 307 /*
308 * Find string dimensions and process alignment.
309 */
310 {
311 int lb, rb, wid, asc, desc;
312
3bcf831a 313 /*
314 * Measure vertical string extents with respect to the same
315 * string always...
316 */
317 gdk_string_extents(fe->fonts[i].font,
318 "ABCDEFGHIJKLMNOPQRSTUVWXYZ",
4efb3868 319 &lb, &rb, &wid, &asc, &desc);
320 if (align & ALIGN_VCENTRE)
321 y += asc - (asc+desc)/2;
86e60e3d 322 else
323 y += asc;
4efb3868 324
3bcf831a 325 /*
326 * ... but horizontal extents with respect to the provided
327 * string. This means that multiple pieces of text centred
328 * on the same y-coordinate don't have different baselines.
329 */
330 gdk_string_extents(fe->fonts[i].font, text,
331 &lb, &rb, &wid, &asc, &desc);
332
4efb3868 333 if (align & ALIGN_HCENTRE)
334 x -= wid / 2;
335 else if (align & ALIGN_HRIGHT)
336 x -= wid;
337
338 }
339
340 /*
1fad7a3b 341 * Actually draw the text.
4efb3868 342 */
4efb3868 343 gdk_draw_string(fe->pixmap, fe->fonts[i].font, fe->gc, x, y, text);
1fad7a3b 344#endif
345
4efb3868 346}
347
dafd6cf6 348void gtk_draw_rect(void *handle, int x, int y, int w, int h, int colour)
2ef96bd6 349{
dafd6cf6 350 frontend *fe = (frontend *)handle;
2ef96bd6 351 gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
352 gdk_draw_rectangle(fe->pixmap, fe->gc, 1, x, y, w, h);
353}
354
dafd6cf6 355void gtk_draw_line(void *handle, int x1, int y1, int x2, int y2, int colour)
2ef96bd6 356{
dafd6cf6 357 frontend *fe = (frontend *)handle;
2ef96bd6 358 gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
359 gdk_draw_line(fe->pixmap, fe->gc, x1, y1, x2, y2);
360}
361
dafd6cf6 362void gtk_draw_poly(void *handle, int *coords, int npoints,
363 int fillcolour, int outlinecolour)
2ef96bd6 364{
dafd6cf6 365 frontend *fe = (frontend *)handle;
2ef96bd6 366 GdkPoint *points = snewn(npoints, GdkPoint);
367 int i;
368
369 for (i = 0; i < npoints; i++) {
370 points[i].x = coords[i*2];
371 points[i].y = coords[i*2+1];
372 }
373
28b5987d 374 if (fillcolour >= 0) {
375 gdk_gc_set_foreground(fe->gc, &fe->colours[fillcolour]);
376 gdk_draw_polygon(fe->pixmap, fe->gc, TRUE, points, npoints);
377 }
378 assert(outlinecolour >= 0);
379 gdk_gc_set_foreground(fe->gc, &fe->colours[outlinecolour]);
dddad8fb 380
381 /*
382 * In principle we ought to be able to use gdk_draw_polygon for
383 * the outline as well. In fact, it turns out to interact badly
384 * with a clipping region, for no terribly obvious reason, so I
385 * draw the outline as a sequence of lines instead.
386 */
387 for (i = 0; i < npoints; i++)
388 gdk_draw_line(fe->pixmap, fe->gc,
389 points[i].x, points[i].y,
390 points[(i+1)%npoints].x, points[(i+1)%npoints].y);
2ef96bd6 391
392 sfree(points);
393}
394
dafd6cf6 395void gtk_draw_circle(void *handle, int cx, int cy, int radius,
396 int fillcolour, int outlinecolour)
550efd7f 397{
dafd6cf6 398 frontend *fe = (frontend *)handle;
28b5987d 399 if (fillcolour >= 0) {
400 gdk_gc_set_foreground(fe->gc, &fe->colours[fillcolour]);
401 gdk_draw_arc(fe->pixmap, fe->gc, TRUE,
402 cx - radius, cy - radius,
403 2 * radius, 2 * radius, 0, 360 * 64);
404 }
405
406 assert(outlinecolour >= 0);
407 gdk_gc_set_foreground(fe->gc, &fe->colours[outlinecolour]);
408 gdk_draw_arc(fe->pixmap, fe->gc, FALSE,
409 cx - radius, cy - radius,
410 2 * radius, 2 * radius, 0, 360 * 64);
550efd7f 411}
412
3161048d 413struct blitter {
414 GdkPixmap *pixmap;
415 int w, h, x, y;
416};
417
dafd6cf6 418blitter *gtk_blitter_new(void *handle, int w, int h)
3161048d 419{
420 /*
421 * We can't create the pixmap right now, because fe->window
422 * might not yet exist. So we just cache w and h and create it
423 * during the firs call to blitter_save.
424 */
425 blitter *bl = snew(blitter);
426 bl->pixmap = NULL;
427 bl->w = w;
428 bl->h = h;
429 return bl;
430}
431
dafd6cf6 432void gtk_blitter_free(void *handle, blitter *bl)
3161048d 433{
434 if (bl->pixmap)
435 gdk_pixmap_unref(bl->pixmap);
436 sfree(bl);
437}
438
dafd6cf6 439void gtk_blitter_save(void *handle, blitter *bl, int x, int y)
3161048d 440{
dafd6cf6 441 frontend *fe = (frontend *)handle;
3161048d 442 if (!bl->pixmap)
443 bl->pixmap = gdk_pixmap_new(fe->area->window, bl->w, bl->h, -1);
444 bl->x = x;
445 bl->y = y;
446 gdk_draw_pixmap(bl->pixmap,
447 fe->area->style->fg_gc[GTK_WIDGET_STATE(fe->area)],
448 fe->pixmap,
449 x, y, 0, 0, bl->w, bl->h);
450}
451
dafd6cf6 452void gtk_blitter_load(void *handle, blitter *bl, int x, int y)
3161048d 453{
dafd6cf6 454 frontend *fe = (frontend *)handle;
3161048d 455 assert(bl->pixmap);
456 if (x == BLITTER_FROMSAVED && y == BLITTER_FROMSAVED) {
457 x = bl->x;
458 y = bl->y;
459 }
460 gdk_draw_pixmap(fe->pixmap,
461 fe->area->style->fg_gc[GTK_WIDGET_STATE(fe->area)],
462 bl->pixmap,
463 0, 0, x, y, bl->w, bl->h);
464}
465
dafd6cf6 466void gtk_draw_update(void *handle, int x, int y, int w, int h)
2ef96bd6 467{
dafd6cf6 468 frontend *fe = (frontend *)handle;
2ef96bd6 469 if (fe->bbox_l > x ) fe->bbox_l = x ;
470 if (fe->bbox_r < x+w) fe->bbox_r = x+w;
471 if (fe->bbox_u > y ) fe->bbox_u = y ;
472 if (fe->bbox_d < y+h) fe->bbox_d = y+h;
473}
474
dafd6cf6 475void gtk_end_draw(void *handle)
2ef96bd6 476{
dafd6cf6 477 frontend *fe = (frontend *)handle;
2ef96bd6 478 gdk_gc_unref(fe->gc);
479 fe->gc = NULL;
480
481 if (fe->bbox_l < fe->bbox_r && fe->bbox_u < fe->bbox_d) {
482 gdk_draw_pixmap(fe->area->window,
483 fe->area->style->fg_gc[GTK_WIDGET_STATE(fe->area)],
484 fe->pixmap,
485 fe->bbox_l, fe->bbox_u,
1e3e152d 486 fe->ox + fe->bbox_l, fe->oy + fe->bbox_u,
2ef96bd6 487 fe->bbox_r - fe->bbox_l, fe->bbox_d - fe->bbox_u);
488 }
489}
490
dafd6cf6 491const struct drawing_api gtk_drawing = {
492 gtk_draw_text,
493 gtk_draw_rect,
494 gtk_draw_line,
495 gtk_draw_poly,
496 gtk_draw_circle,
497 gtk_draw_update,
498 gtk_clip,
499 gtk_unclip,
500 gtk_start_draw,
501 gtk_end_draw,
502 gtk_status_bar,
503 gtk_blitter_new,
504 gtk_blitter_free,
505 gtk_blitter_save,
506 gtk_blitter_load,
507 NULL, NULL, NULL, NULL, NULL, NULL, /* {begin,end}_{doc,page,puzzle} */
508 NULL, /* line_width */
509};
510
83680571 511static void destroy(GtkWidget *widget, gpointer data)
512{
f49650a7 513 frontend *fe = (frontend *)data;
514 deactivate_timer(fe);
a4393230 515 midend_free(fe->me);
83680571 516 gtk_main_quit();
517}
518
2ef96bd6 519static gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
7f77ea24 520{
2ef96bd6 521 frontend *fe = (frontend *)data;
1482ee76 522 int keyval;
f0ee053c 523 int shift = (event->state & GDK_SHIFT_MASK) ? MOD_SHFT : 0;
524 int ctrl = (event->state & GDK_CONTROL_MASK) ? MOD_CTRL : 0;
7f77ea24 525
2ef96bd6 526 if (!fe->pixmap)
527 return TRUE;
7f77ea24 528
3c833d45 529 if (event->keyval == GDK_Up)
f0ee053c 530 keyval = shift | ctrl | CURSOR_UP;
3c833d45 531 else if (event->keyval == GDK_KP_Up || event->keyval == GDK_KP_8)
532 keyval = MOD_NUM_KEYPAD | '8';
533 else if (event->keyval == GDK_Down)
f0ee053c 534 keyval = shift | ctrl | CURSOR_DOWN;
3c833d45 535 else if (event->keyval == GDK_KP_Down || event->keyval == GDK_KP_2)
536 keyval = MOD_NUM_KEYPAD | '2';
537 else if (event->keyval == GDK_Left)
f0ee053c 538 keyval = shift | ctrl | CURSOR_LEFT;
3c833d45 539 else if (event->keyval == GDK_KP_Left || event->keyval == GDK_KP_4)
540 keyval = MOD_NUM_KEYPAD | '4';
541 else if (event->keyval == GDK_Right)
f0ee053c 542 keyval = shift | ctrl | CURSOR_RIGHT;
3c833d45 543 else if (event->keyval == GDK_KP_Right || event->keyval == GDK_KP_6)
544 keyval = MOD_NUM_KEYPAD | '6';
c71454c0 545 else if (event->keyval == GDK_KP_Home || event->keyval == GDK_KP_7)
3c833d45 546 keyval = MOD_NUM_KEYPAD | '7';
c71454c0 547 else if (event->keyval == GDK_KP_End || event->keyval == GDK_KP_1)
3c833d45 548 keyval = MOD_NUM_KEYPAD | '1';
c71454c0 549 else if (event->keyval == GDK_KP_Page_Up || event->keyval == GDK_KP_9)
3c833d45 550 keyval = MOD_NUM_KEYPAD | '9';
c71454c0 551 else if (event->keyval == GDK_KP_Page_Down || event->keyval == GDK_KP_3)
3c833d45 552 keyval = MOD_NUM_KEYPAD | '3';
553 else if (event->keyval == GDK_KP_Insert || event->keyval == GDK_KP_0)
554 keyval = MOD_NUM_KEYPAD | '0';
555 else if (event->keyval == GDK_KP_Begin || event->keyval == GDK_KP_5)
556 keyval = MOD_NUM_KEYPAD | '5';
0eb4d76e 557 else if (event->keyval == GDK_BackSpace ||
558 event->keyval == GDK_Delete ||
559 event->keyval == GDK_KP_Delete)
560 keyval = '\177';
3c833d45 561 else if (event->string[0] && !event->string[1])
562 keyval = (unsigned char)event->string[0];
1482ee76 563 else
564 keyval = -1;
565
566 if (keyval >= 0 &&
567 !midend_process_key(fe->me, 0, 0, keyval))
2ef96bd6 568 gtk_widget_destroy(fe->window);
7f77ea24 569
570 return TRUE;
571}
572
2ef96bd6 573static gint button_event(GtkWidget *widget, GdkEventButton *event,
574 gpointer data)
7f77ea24 575{
2ef96bd6 576 frontend *fe = (frontend *)data;
577 int button;
578
579 if (!fe->pixmap)
580 return TRUE;
581
74a4e547 582 if (event->type != GDK_BUTTON_PRESS && event->type != GDK_BUTTON_RELEASE)
2ef96bd6 583 return TRUE;
7f77ea24 584
b0f06719 585 if (event->button == 2 || (event->state & GDK_SHIFT_MASK))
2ef96bd6 586 button = MIDDLE_BUTTON;
97c2790f 587 else if (event->button == 3 || (event->state & GDK_MOD1_MASK))
588 button = RIGHT_BUTTON;
b0f06719 589 else if (event->button == 1)
590 button = LEFT_BUTTON;
2ef96bd6 591 else
592 return FALSE; /* don't even know what button! */
593
74a4e547 594 if (event->type == GDK_BUTTON_RELEASE)
595 button += LEFT_RELEASE - LEFT_BUTTON;
596
1e3e152d 597 if (!midend_process_key(fe->me, event->x - fe->ox,
598 event->y - fe->oy, button))
74a4e547 599 gtk_widget_destroy(fe->window);
600
601 return TRUE;
602}
603
604static gint motion_event(GtkWidget *widget, GdkEventMotion *event,
605 gpointer data)
606{
607 frontend *fe = (frontend *)data;
608 int button;
609
610 if (!fe->pixmap)
611 return TRUE;
612
74a4e547 613 if (event->state & (GDK_BUTTON2_MASK | GDK_SHIFT_MASK))
614 button = MIDDLE_DRAG;
615 else if (event->state & GDK_BUTTON1_MASK)
616 button = LEFT_DRAG;
617 else if (event->state & GDK_BUTTON3_MASK)
618 button = RIGHT_DRAG;
619 else
620 return FALSE; /* don't even know what button! */
621
1e3e152d 622 if (!midend_process_key(fe->me, event->x - fe->ox,
623 event->y - fe->oy, button))
2ef96bd6 624 gtk_widget_destroy(fe->window);
7f77ea24 625
626 return TRUE;
627}
628
2ef96bd6 629static gint expose_area(GtkWidget *widget, GdkEventExpose *event,
630 gpointer data)
83680571 631{
2ef96bd6 632 frontend *fe = (frontend *)data;
633
634 if (fe->pixmap) {
635 gdk_draw_pixmap(widget->window,
636 widget->style->fg_gc[GTK_WIDGET_STATE(widget)],
637 fe->pixmap,
1e3e152d 638 event->area.x - fe->ox, event->area.y - fe->oy,
2ef96bd6 639 event->area.x, event->area.y,
640 event->area.width, event->area.height);
641 }
642 return TRUE;
643}
644
fd1a1a2b 645static gint map_window(GtkWidget *widget, GdkEvent *event,
646 gpointer data)
647{
648 frontend *fe = (frontend *)data;
649
650 /*
651 * Apparently we need to do this because otherwise the status
652 * bar will fail to update immediately. Annoying, but there we
653 * go.
654 */
655 gtk_widget_queue_draw(fe->window);
656
657 return TRUE;
658}
659
2ef96bd6 660static gint configure_area(GtkWidget *widget,
661 GdkEventConfigure *event, gpointer data)
662{
663 frontend *fe = (frontend *)data;
664 GdkGC *gc;
1e3e152d 665 int x, y;
2ef96bd6 666
eb2ad6f1 667 if (fe->pixmap)
668 gdk_pixmap_unref(fe->pixmap);
669
1e3e152d 670 x = fe->w = event->width;
671 y = fe->h = event->height;
672 midend_size(fe->me, &x, &y, TRUE);
673 fe->pw = x;
674 fe->ph = y;
675 fe->ox = (fe->w - fe->pw) / 2;
676 fe->oy = (fe->h - fe->ph) / 2;
677
678 fe->pixmap = gdk_pixmap_new(widget->window, fe->pw, fe->ph, -1);
2ef96bd6 679
680 gc = gdk_gc_new(fe->area->window);
681 gdk_gc_set_foreground(gc, &fe->colours[0]);
1e3e152d 682 gdk_draw_rectangle(fe->pixmap, gc, 1, 0, 0, fe->pw, fe->ph);
2ef96bd6 683 gdk_gc_unref(gc);
684
008b4378 685 midend_force_redraw(fe->me);
2ef96bd6 686
687 return TRUE;
688}
689
690static gint timer_func(gpointer data)
691{
692 frontend *fe = (frontend *)data;
693
8c1fd974 694 if (fe->timer_active) {
695 struct timeval now;
696 float elapsed;
697 gettimeofday(&now, NULL);
698 elapsed = ((now.tv_usec - fe->last_time.tv_usec) * 0.000001F +
699 (now.tv_sec - fe->last_time.tv_sec));
700 midend_timer(fe->me, elapsed); /* may clear timer_active */
701 fe->last_time = now;
702 }
2ef96bd6 703
704 return fe->timer_active;
705}
706
707void deactivate_timer(frontend *fe)
708{
dafd6cf6 709 if (!fe)
710 return; /* can happen due to --generate */
20ee89e3 711 if (fe->timer_active)
712 gtk_timeout_remove(fe->timer_id);
2ef96bd6 713 fe->timer_active = FALSE;
714}
715
716void activate_timer(frontend *fe)
717{
dafd6cf6 718 if (!fe)
719 return; /* can happen due to --generate */
8c1fd974 720 if (!fe->timer_active) {
20ee89e3 721 fe->timer_id = gtk_timeout_add(20, timer_func, fe);
8c1fd974 722 gettimeofday(&fe->last_time, NULL);
723 }
2ef96bd6 724 fe->timer_active = TRUE;
725}
726
c8230524 727static void window_destroy(GtkWidget *widget, gpointer data)
728{
729 gtk_main_quit();
730}
731
668be019 732static void msgbox_button_clicked(GtkButton *button, gpointer data)
c8230524 733{
668be019 734 GtkWidget *window = GTK_WIDGET(data);
735 int v, *ip;
736
737 ip = (int *)gtk_object_get_data(GTK_OBJECT(window), "user-data");
738 v = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(button), "user-data"));
739 *ip = v;
740
c8230524 741 gtk_widget_destroy(GTK_WIDGET(data));
742}
743
a163b7c2 744static int win_key_press(GtkWidget *widget, GdkEventKey *event, gpointer data)
745{
746 GtkObject *cancelbutton = GTK_OBJECT(data);
747
748 /*
749 * `Escape' effectively clicks the cancel button
750 */
751 if (event->keyval == GDK_Escape) {
752 gtk_signal_emit_by_name(GTK_OBJECT(cancelbutton), "clicked");
753 return TRUE;
754 }
755
756 return FALSE;
757}
758
668be019 759enum { MB_OK, MB_YESNO };
760
761int message_box(GtkWidget *parent, char *title, char *msg, int centre,
762 int type)
c8230524 763{
668be019 764 GtkWidget *window, *hbox, *text, *button;
765 char *titles;
766 int i, def, cancel;
c8230524 767
768 window = gtk_dialog_new();
769 text = gtk_label_new(msg);
770 gtk_misc_set_alignment(GTK_MISC(text), 0.0, 0.0);
771 hbox = gtk_hbox_new(FALSE, 0);
772 gtk_box_pack_start(GTK_BOX(hbox), text, FALSE, FALSE, 20);
773 gtk_box_pack_start(GTK_BOX(GTK_DIALOG(window)->vbox),
774 hbox, FALSE, FALSE, 20);
775 gtk_widget_show(text);
776 gtk_widget_show(hbox);
97098757 777 gtk_window_set_title(GTK_WINDOW(window), title);
c8230524 778 gtk_label_set_line_wrap(GTK_LABEL(text), TRUE);
668be019 779
780 if (type == MB_OK) {
781 titles = "OK\0";
782 def = cancel = 0;
783 } else {
784 assert(type == MB_YESNO);
785 titles = "Yes\0No\0";
786 def = 0;
787 cancel = 1;
788 }
789 i = 0;
790
791 while (*titles) {
792 button = gtk_button_new_with_label(titles);
793 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(window)->action_area),
794 button, FALSE, FALSE, 0);
795 gtk_widget_show(button);
796 if (i == def) {
797 GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);
798 gtk_window_set_default(GTK_WINDOW(window), button);
799 }
800 if (i == cancel) {
801 gtk_signal_connect(GTK_OBJECT(window), "key_press_event",
802 GTK_SIGNAL_FUNC(win_key_press), button);
803 }
804 gtk_signal_connect(GTK_OBJECT(button), "clicked",
805 GTK_SIGNAL_FUNC(msgbox_button_clicked), window);
806 gtk_object_set_data(GTK_OBJECT(button), "user-data",
807 GINT_TO_POINTER(i));
808 titles += strlen(titles)+1;
809 i++;
810 }
811 gtk_object_set_data(GTK_OBJECT(window), "user-data",
812 GINT_TO_POINTER(&i));
a1ed9f0e 813 gtk_signal_connect(GTK_OBJECT(window), "destroy",
814 GTK_SIGNAL_FUNC(window_destroy), NULL);
c8230524 815 gtk_window_set_modal(GTK_WINDOW(window), TRUE);
816 gtk_window_set_transient_for(GTK_WINDOW(window), GTK_WINDOW(parent));
23e8c9fd 817 /* set_transient_window_pos(parent, window); */
c8230524 818 gtk_widget_show(window);
668be019 819 i = -1;
c8230524 820 gtk_main();
668be019 821 return (type == MB_YESNO ? i == 0 : TRUE);
c8230524 822}
823
97098757 824void error_box(GtkWidget *parent, char *msg)
825{
668be019 826 message_box(parent, "Error", msg, FALSE, MB_OK);
97098757 827}
828
c8230524 829static void config_ok_button_clicked(GtkButton *button, gpointer data)
830{
831 frontend *fe = (frontend *)data;
832 char *err;
833
5928817c 834 err = midend_set_config(fe->me, fe->cfg_which, fe->cfg);
c8230524 835
836 if (err)
837 error_box(fe->cfgbox, err);
838 else {
839 fe->cfgret = TRUE;
840 gtk_widget_destroy(fe->cfgbox);
841 }
842}
843
844static void config_cancel_button_clicked(GtkButton *button, gpointer data)
845{
846 frontend *fe = (frontend *)data;
847
848 gtk_widget_destroy(fe->cfgbox);
849}
850
a163b7c2 851static int editbox_key(GtkWidget *widget, GdkEventKey *event, gpointer data)
852{
853 /*
854 * GtkEntry has a nasty habit of eating the Return key, which
855 * is unhelpful since it doesn't actually _do_ anything with it
856 * (it calls gtk_widget_activate, but our edit boxes never need
857 * activating). So I catch Return before GtkEntry sees it, and
858 * pass it straight on to the parent widget. Effect: hitting
859 * Return in an edit box will now activate the default button
860 * in the dialog just like it will everywhere else.
861 */
862 if (event->keyval == GDK_Return && widget->parent != NULL) {
863 gint return_val;
864 gtk_signal_emit_stop_by_name(GTK_OBJECT(widget), "key_press_event");
865 gtk_signal_emit_by_name(GTK_OBJECT(widget->parent), "key_press_event",
866 event, &return_val);
867 return return_val;
868 }
869 return FALSE;
870}
871
c8230524 872static void editbox_changed(GtkEditable *ed, gpointer data)
873{
874 config_item *i = (config_item *)data;
875
876 sfree(i->sval);
877 i->sval = dupstr(gtk_entry_get_text(GTK_ENTRY(ed)));
878}
879
880static void button_toggled(GtkToggleButton *tb, gpointer data)
881{
882 config_item *i = (config_item *)data;
883
884 i->ival = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(tb));
885}
886
887static void droplist_sel(GtkMenuItem *item, gpointer data)
888{
889 config_item *i = (config_item *)data;
890
891 i->ival = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(item),
892 "user-data"));
893}
894
5928817c 895static int get_config(frontend *fe, int which)
c8230524 896{
a163b7c2 897 GtkWidget *w, *table, *cancel;
5928817c 898 char *title;
c8230524 899 config_item *i;
900 int y;
901
5928817c 902 fe->cfg = midend_get_config(fe->me, which, &title);
903 fe->cfg_which = which;
c8230524 904 fe->cfgret = FALSE;
905
906 fe->cfgbox = gtk_dialog_new();
5928817c 907 gtk_window_set_title(GTK_WINDOW(fe->cfgbox), title);
908 sfree(title);
c8230524 909
910 w = gtk_button_new_with_label("OK");
911 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->action_area),
912 w, FALSE, FALSE, 0);
913 gtk_widget_show(w);
914 GTK_WIDGET_SET_FLAGS(w, GTK_CAN_DEFAULT);
915 gtk_window_set_default(GTK_WINDOW(fe->cfgbox), w);
916 gtk_signal_connect(GTK_OBJECT(w), "clicked",
917 GTK_SIGNAL_FUNC(config_ok_button_clicked), fe);
918
919 w = gtk_button_new_with_label("Cancel");
920 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->action_area),
921 w, FALSE, FALSE, 0);
922 gtk_widget_show(w);
923 gtk_signal_connect(GTK_OBJECT(w), "clicked",
924 GTK_SIGNAL_FUNC(config_cancel_button_clicked), fe);
a163b7c2 925 cancel = w;
c8230524 926
927 table = gtk_table_new(1, 2, FALSE);
928 y = 0;
929 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->vbox),
930 table, FALSE, FALSE, 0);
931 gtk_widget_show(table);
932
95709966 933 for (i = fe->cfg; i->type != C_END; i++) {
c8230524 934 gtk_table_resize(GTK_TABLE(table), y+1, 2);
935
936 switch (i->type) {
95709966 937 case C_STRING:
c8230524 938 /*
939 * Edit box with a label beside it.
940 */
941
942 w = gtk_label_new(i->name);
943 gtk_misc_set_alignment(GTK_MISC(w), 0.0, 0.5);
944 gtk_table_attach(GTK_TABLE(table), w, 0, 1, y, y+1,
945 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
946 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
947 3, 3);
948 gtk_widget_show(w);
949
950 w = gtk_entry_new();
951 gtk_table_attach(GTK_TABLE(table), w, 1, 2, y, y+1,
952 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
953 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
954 3, 3);
955 gtk_entry_set_text(GTK_ENTRY(w), i->sval);
956 gtk_signal_connect(GTK_OBJECT(w), "changed",
957 GTK_SIGNAL_FUNC(editbox_changed), i);
a163b7c2 958 gtk_signal_connect(GTK_OBJECT(w), "key_press_event",
959 GTK_SIGNAL_FUNC(editbox_key), NULL);
c8230524 960 gtk_widget_show(w);
961
962 break;
963
95709966 964 case C_BOOLEAN:
c8230524 965 /*
966 * Simple checkbox.
967 */
968 w = gtk_check_button_new_with_label(i->name);
969 gtk_signal_connect(GTK_OBJECT(w), "toggled",
970 GTK_SIGNAL_FUNC(button_toggled), i);
971 gtk_table_attach(GTK_TABLE(table), w, 0, 2, y, y+1,
972 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
973 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
974 3, 3);
975 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(w), i->ival);
976 gtk_widget_show(w);
977 break;
978
95709966 979 case C_CHOICES:
c8230524 980 /*
981 * Drop-down list (GtkOptionMenu).
982 */
983
984 w = gtk_label_new(i->name);
985 gtk_misc_set_alignment(GTK_MISC(w), 0.0, 0.5);
986 gtk_table_attach(GTK_TABLE(table), w, 0, 1, y, y+1,
987 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
988 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
989 3, 3);
990 gtk_widget_show(w);
991
992 w = gtk_option_menu_new();
993 gtk_table_attach(GTK_TABLE(table), w, 1, 2, y, y+1,
994 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
995 GTK_EXPAND | GTK_SHRINK | GTK_FILL,
996 3, 3);
997 gtk_widget_show(w);
998
999 {
1000 int c, val;
1001 char *p, *q, *name;
1002 GtkWidget *menuitem;
1003 GtkWidget *menu = gtk_menu_new();
1004
1005 gtk_option_menu_set_menu(GTK_OPTION_MENU(w), menu);
1006
1007 c = *i->sval;
1008 p = i->sval+1;
1009 val = 0;
1010
1011 while (*p) {
1012 q = p;
1013 while (*q && *q != c)
1014 q++;
1015
1016 name = snewn(q-p+1, char);
1017 strncpy(name, p, q-p);
1018 name[q-p] = '\0';
1019
1020 if (*q) q++; /* eat delimiter */
1021
1022 menuitem = gtk_menu_item_new_with_label(name);
1023 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1024 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
1025 GINT_TO_POINTER(val));
1026 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1027 GTK_SIGNAL_FUNC(droplist_sel), i);
1028 gtk_widget_show(menuitem);
1029
1030 val++;
1031
1032 p = q;
1033 }
1034
1035 gtk_option_menu_set_history(GTK_OPTION_MENU(w), i->ival);
1036 }
1037
1038 break;
1039 }
1040
1041 y++;
1042 }
1043
1044 gtk_signal_connect(GTK_OBJECT(fe->cfgbox), "destroy",
1045 GTK_SIGNAL_FUNC(window_destroy), NULL);
a163b7c2 1046 gtk_signal_connect(GTK_OBJECT(fe->cfgbox), "key_press_event",
1047 GTK_SIGNAL_FUNC(win_key_press), cancel);
c8230524 1048 gtk_window_set_modal(GTK_WINDOW(fe->cfgbox), TRUE);
1049 gtk_window_set_transient_for(GTK_WINDOW(fe->cfgbox),
1050 GTK_WINDOW(fe->window));
23e8c9fd 1051 /* set_transient_window_pos(fe->window, fe->cfgbox); */
c8230524 1052 gtk_widget_show(fe->cfgbox);
1053 gtk_main();
1054
077f3cbe 1055 free_cfg(fe->cfg);
c8230524 1056
1057 return fe->cfgret;
1058}
1059
eb2ad6f1 1060static void menu_key_event(GtkMenuItem *menuitem, gpointer data)
1061{
1062 frontend *fe = (frontend *)data;
1063 int key = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem),
1064 "user-data"));
1065 if (!midend_process_key(fe->me, 0, 0, key))
1066 gtk_widget_destroy(fe->window);
1067}
1068
1e3e152d 1069static void get_size(frontend *fe, int *px, int *py)
1070{
1071 int x, y;
1072
1073 /*
1074 * Currently I don't want to make the GTK port scale large
1075 * puzzles to fit on the screen. This is because X does permit
1076 * extremely large windows and many window managers provide a
1077 * means of navigating round them, and the users I consulted
1078 * before deciding said that they'd rather have enormous puzzle
1079 * windows spanning multiple screen pages than have them
1080 * shrunk. I could change my mind later or introduce
1081 * configurability; this would be the place to do so, by
1082 * replacing the initial values of x and y with the screen
1083 * dimensions.
1084 */
1085 x = INT_MAX;
1086 y = INT_MAX;
1087 midend_size(fe->me, &x, &y, FALSE);
1088 *px = x;
1089 *py = y;
1090}
1091
ef429a6c 1092#if !GTK_CHECK_VERSION(2,0,0)
1093#define gtk_window_resize(win, x, y) \
1094 gdk_window_resize(GTK_WIDGET(win)->window, x, y)
1095#endif
1096
eb2ad6f1 1097static void menu_preset_event(GtkMenuItem *menuitem, gpointer data)
1098{
1099 frontend *fe = (frontend *)data;
1100 game_params *params =
1101 (game_params *)gtk_object_get_data(GTK_OBJECT(menuitem), "user-data");
1102 int x, y;
1103
1104 midend_set_params(fe->me, params);
5928817c 1105 midend_new_game(fe->me);
1e3e152d 1106 get_size(fe, &x, &y);
eb2ad6f1 1107 fe->w = x;
1108 fe->h = y;
1e3e152d 1109 gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
4e1f57ba 1110 {
1111 GtkRequisition req;
1112 gtk_widget_size_request(GTK_WIDGET(fe->window), &req);
cbdf34a0 1113 gtk_window_resize(GTK_WINDOW(fe->window), req.width, req.height);
4e1f57ba 1114 }
eb2ad6f1 1115}
1116
9b4b03d3 1117GdkAtom compound_text_atom, utf8_string_atom;
1118int paste_initialised = FALSE;
1119
1120void init_paste()
1121{
23e8c9fd 1122 unsigned char empty[] = { 0 };
1123
9b4b03d3 1124 if (paste_initialised)
1125 return;
1126
1127 if (!compound_text_atom)
1128 compound_text_atom = gdk_atom_intern("COMPOUND_TEXT", FALSE);
1129 if (!utf8_string_atom)
1130 utf8_string_atom = gdk_atom_intern("UTF8_STRING", FALSE);
1131
1132 /*
1133 * Ensure that all the cut buffers exist - according to the
1134 * ICCCM, we must do this before we start using cut buffers.
1135 */
1136 XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
23e8c9fd 1137 XA_CUT_BUFFER0, XA_STRING, 8, PropModeAppend, empty, 0);
9b4b03d3 1138 XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
23e8c9fd 1139 XA_CUT_BUFFER1, XA_STRING, 8, PropModeAppend, empty, 0);
9b4b03d3 1140 XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
23e8c9fd 1141 XA_CUT_BUFFER2, XA_STRING, 8, PropModeAppend, empty, 0);
9b4b03d3 1142 XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
23e8c9fd 1143 XA_CUT_BUFFER3, XA_STRING, 8, PropModeAppend, empty, 0);
9b4b03d3 1144 XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
23e8c9fd 1145 XA_CUT_BUFFER4, XA_STRING, 8, PropModeAppend, empty, 0);
9b4b03d3 1146 XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
23e8c9fd 1147 XA_CUT_BUFFER5, XA_STRING, 8, PropModeAppend, empty, 0);
9b4b03d3 1148 XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
23e8c9fd 1149 XA_CUT_BUFFER6, XA_STRING, 8, PropModeAppend, empty, 0);
9b4b03d3 1150 XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
23e8c9fd 1151 XA_CUT_BUFFER7, XA_STRING, 8, PropModeAppend, empty, 0);
9b4b03d3 1152}
1153
1154/* Store data in a cut-buffer. */
1155void store_cutbuffer(char *ptr, int len)
1156{
1157 /* ICCCM says we must rotate the buffers before storing to buffer 0. */
1158 XRotateBuffers(GDK_DISPLAY(), 1);
1159 XStoreBytes(GDK_DISPLAY(), ptr, len);
1160}
1161
1162void write_clip(frontend *fe, char *data)
1163{
1164 init_paste();
1165
1166 if (fe->paste_data)
1167 sfree(fe->paste_data);
1168
1169 /*
1170 * For this simple application we can safely assume that the
1171 * data passed to this function is pure ASCII, which means we
1172 * can return precisely the same stuff for types STRING,
1173 * COMPOUND_TEXT or UTF8_STRING.
1174 */
1175
1176 fe->paste_data = data;
1177 fe->paste_data_len = strlen(data);
1178
1179 store_cutbuffer(fe->paste_data, fe->paste_data_len);
1180
1181 if (gtk_selection_owner_set(fe->area, GDK_SELECTION_PRIMARY,
1182 CurrentTime)) {
1183 gtk_selection_add_target(fe->area, GDK_SELECTION_PRIMARY,
1184 GDK_SELECTION_TYPE_STRING, 1);
1185 gtk_selection_add_target(fe->area, GDK_SELECTION_PRIMARY,
1186 compound_text_atom, 1);
1187 gtk_selection_add_target(fe->area, GDK_SELECTION_PRIMARY,
1188 utf8_string_atom, 1);
1189 }
1190}
1191
1192void selection_get(GtkWidget *widget, GtkSelectionData *seldata,
1193 guint info, guint time_stamp, gpointer data)
1194{
1195 frontend *fe = (frontend *)data;
1196 gtk_selection_data_set(seldata, seldata->target, 8,
1197 fe->paste_data, fe->paste_data_len);
1198}
1199
1200gint selection_clear(GtkWidget *widget, GdkEventSelection *seldata,
1201 gpointer data)
1202{
1203 frontend *fe = (frontend *)data;
1204
1205 if (fe->paste_data)
1206 sfree(fe->paste_data);
1207 fe->paste_data = NULL;
1208 fe->paste_data_len = 0;
1209 return TRUE;
1210}
1211
1212static void menu_copy_event(GtkMenuItem *menuitem, gpointer data)
1213{
1214 frontend *fe = (frontend *)data;
1215 char *text;
1216
1217 text = midend_text_format(fe->me);
1218
1219 if (text) {
1220 write_clip(fe, text);
1221 } else {
1222 gdk_beep();
1223 }
1224}
1225
a4393230 1226static void filesel_ok(GtkButton *button, gpointer data)
1227{
1228 frontend *fe = (frontend *)data;
1229
1230 gpointer filesel = gtk_object_get_data(GTK_OBJECT(button), "user-data");
1231
1232 const char *name =
1233 gtk_file_selection_get_filename(GTK_FILE_SELECTION(filesel));
1234
1235 fe->filesel_name = dupstr(name);
1236}
1237
1238static char *file_selector(frontend *fe, char *title, int save)
1239{
1240 GtkWidget *filesel =
1241 gtk_file_selection_new(title);
1242
1243 fe->filesel_name = NULL;
1244
1245 gtk_window_set_modal(GTK_WINDOW(filesel), TRUE);
1246 gtk_object_set_data
1247 (GTK_OBJECT(GTK_FILE_SELECTION(filesel)->ok_button), "user-data",
1248 (gpointer)filesel);
1249 gtk_signal_connect
1250 (GTK_OBJECT(GTK_FILE_SELECTION(filesel)->ok_button), "clicked",
1251 GTK_SIGNAL_FUNC(filesel_ok), fe);
1252 gtk_signal_connect_object
1253 (GTK_OBJECT(GTK_FILE_SELECTION(filesel)->ok_button), "clicked",
1254 GTK_SIGNAL_FUNC(gtk_widget_destroy), (gpointer)filesel);
1255 gtk_signal_connect_object
1256 (GTK_OBJECT(GTK_FILE_SELECTION(filesel)->cancel_button), "clicked",
1257 GTK_SIGNAL_FUNC(gtk_widget_destroy), (gpointer)filesel);
1258 gtk_signal_connect(GTK_OBJECT(filesel), "destroy",
1259 GTK_SIGNAL_FUNC(window_destroy), NULL);
1260 gtk_widget_show(filesel);
1261 gtk_window_set_transient_for(GTK_WINDOW(filesel), GTK_WINDOW(fe->window));
1262 gtk_main();
1263
1264 return fe->filesel_name;
1265}
1266
1267static void savefile_write(void *wctx, void *buf, int len)
1268{
1269 FILE *fp = (FILE *)wctx;
1270 fwrite(buf, 1, len, fp);
1271}
1272
1273static int savefile_read(void *wctx, void *buf, int len)
1274{
1275 FILE *fp = (FILE *)wctx;
1276 int ret;
1277
1278 ret = fread(buf, 1, len, fp);
1279 return (ret == len);
1280}
1281
1282static void menu_save_event(GtkMenuItem *menuitem, gpointer data)
1283{
1284 frontend *fe = (frontend *)data;
1285 char *name;
1286
1287 name = file_selector(fe, "Enter name of game file to save", TRUE);
1288
1289 if (name) {
668be019 1290 FILE *fp;
1291
1292 if ((fp = fopen(name, "r")) != NULL) {
1293 char buf[256 + FILENAME_MAX];
1294 fclose(fp);
1295 /* file exists */
1296
1297 sprintf(buf, "Are you sure you want to overwrite the"
1298 " file \"%.*s\"?",
1299 FILENAME_MAX, name);
1300 if (!message_box(fe->window, "Question", buf, TRUE, MB_YESNO))
1301 return;
1302 }
1303
1304 fp = fopen(name, "w");
a4393230 1305 sfree(name);
1306
1307 if (!fp) {
1308 error_box(fe->window, "Unable to open save file");
1309 return;
1310 }
1311
1312 midend_serialise(fe->me, savefile_write, fp);
1313
1314 fclose(fp);
1315 }
1316}
1317
1318static void menu_load_event(GtkMenuItem *menuitem, gpointer data)
1319{
1320 frontend *fe = (frontend *)data;
1321 char *name, *err;
1322 int x, y;
1323
1324 name = file_selector(fe, "Enter name of saved game file to load", FALSE);
1325
1326 if (name) {
1327 FILE *fp = fopen(name, "r");
1328 sfree(name);
1329
1330 if (!fp) {
1331 error_box(fe->window, "Unable to open saved game file");
1332 return;
1333 }
1334
1335 err = midend_deserialise(fe->me, savefile_read, fp);
1336
1337 fclose(fp);
1338
1339 if (err) {
1340 error_box(fe->window, err);
1341 return;
1342 }
1343
1344 get_size(fe, &x, &y);
1345 fe->w = x;
1346 fe->h = y;
1347 gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
1348 {
1349 GtkRequisition req;
1350 gtk_widget_size_request(GTK_WIDGET(fe->window), &req);
1351 gtk_window_resize(GTK_WINDOW(fe->window), req.width, req.height);
1352 }
1353
1354 }
1355}
1356
2ac6d24e 1357static void menu_solve_event(GtkMenuItem *menuitem, gpointer data)
1358{
1359 frontend *fe = (frontend *)data;
1360 char *msg;
1361
1362 msg = midend_solve(fe->me);
1363
1364 if (msg)
1365 error_box(fe->window, msg);
1366}
1367
7f89707c 1368static void menu_restart_event(GtkMenuItem *menuitem, gpointer data)
1369{
1370 frontend *fe = (frontend *)data;
1371
1372 midend_restart_game(fe->me);
1373}
1374
c8230524 1375static void menu_config_event(GtkMenuItem *menuitem, gpointer data)
1376{
1377 frontend *fe = (frontend *)data;
5928817c 1378 int which = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem),
1379 "user-data"));
c8230524 1380 int x, y;
1381
5928817c 1382 if (!get_config(fe, which))
c8230524 1383 return;
1384
5928817c 1385 midend_new_game(fe->me);
1e3e152d 1386 get_size(fe, &x, &y);
c8230524 1387 fe->w = x;
1388 fe->h = y;
1e3e152d 1389 gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
4e1f57ba 1390 {
1391 GtkRequisition req;
1392 gtk_widget_size_request(GTK_WIDGET(fe->window), &req);
cbdf34a0 1393 gtk_window_resize(GTK_WINDOW(fe->window), req.width, req.height);
4e1f57ba 1394 }
c8230524 1395}
1396
97098757 1397static void menu_about_event(GtkMenuItem *menuitem, gpointer data)
1398{
1399 frontend *fe = (frontend *)data;
1400 char titlebuf[256];
1401 char textbuf[1024];
1402
1403 sprintf(titlebuf, "About %.200s", thegame.name);
1404 sprintf(textbuf,
1405 "%.200s\n\n"
1406 "from Simon Tatham's Portable Puzzle Collection\n\n"
1407 "%.500s", thegame.name, ver);
1408
668be019 1409 message_box(fe->window, titlebuf, textbuf, TRUE, MB_OK);
97098757 1410}
1411
eb2ad6f1 1412static GtkWidget *add_menu_item_with_key(frontend *fe, GtkContainer *cont,
1413 char *text, int key)
1414{
1415 GtkWidget *menuitem = gtk_menu_item_new_with_label(text);
1416 gtk_container_add(cont, menuitem);
1417 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
1418 GINT_TO_POINTER(key));
1419 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1420 GTK_SIGNAL_FUNC(menu_key_event), fe);
1421 gtk_widget_show(menuitem);
1422 return menuitem;
1423}
1424
1425static void add_menu_separator(GtkContainer *cont)
1426{
1427 GtkWidget *menuitem = gtk_menu_item_new();
1428 gtk_container_add(cont, menuitem);
1429 gtk_widget_show(menuitem);
1430}
1431
7d1cfbb7 1432static frontend *new_window(char *arg, char **error)
2ef96bd6 1433{
1434 frontend *fe;
eb2ad6f1 1435 GtkBox *vbox;
1436 GtkWidget *menubar, *menu, *menuitem;
1437 int x, y, n;
dafd6cf6 1438 char errbuf[1024];
83680571 1439
2ef96bd6 1440 fe = snew(frontend);
83680571 1441
171fbdaa 1442 fe->timer_active = FALSE;
1443 fe->timer_id = -1;
1444
dafd6cf6 1445 fe->me = midend_new(fe, &thegame, &gtk_drawing, fe);
171fbdaa 1446
7d1cfbb7 1447 if (arg) {
1448 char *err;
dafd6cf6 1449
1450 errbuf[0] = '\0';
1451
7d1cfbb7 1452 /*
1453 * Try treating the argument as a game ID.
1454 */
1455 err = midend_game_id(fe->me, arg);
1456 if (!err) {
1457 /*
1458 * It's a valid game ID.
1459 */
1460 midend_new_game(fe->me);
1461 } else {
1462 FILE *fp = fopen(arg, "r");
1463 if (!fp) {
dafd6cf6 1464 sprintf(errbuf, "Supplied argument is neither a game ID (%.400s)"
1465 " nor a save file (%.400s)", err, strerror(errno));
7d1cfbb7 1466 } else {
1467 err = midend_deserialise(fe->me, savefile_read, fp);
93548721 1468 if (err)
1469 sprintf(errbuf, "%.800s", err);
1470 fclose(fp);
7d1cfbb7 1471 }
8b7938e7 1472 }
dafd6cf6 1473 if (*errbuf) {
1474 *error = dupstr(errbuf);
7d1cfbb7 1475 midend_free(fe->me);
1476 sfree(fe);
1477 return NULL;
1478 }
1479
1480 } else {
1481 midend_new_game(fe->me);
8b7938e7 1482 }
7f77ea24 1483
2ef96bd6 1484 fe->window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
be8d5aa1 1485 gtk_window_set_title(GTK_WINDOW(fe->window), thegame.name);
ff2f787b 1486#if 0
1487 gtk_window_set_resizable(GTK_WINDOW(fe->window), FALSE);
1488#else
1489 gtk_window_set_policy(GTK_WINDOW(fe->window), FALSE, FALSE, TRUE);
1490#endif
eb2ad6f1 1491 vbox = GTK_BOX(gtk_vbox_new(FALSE, 0));
1492 gtk_container_add(GTK_CONTAINER(fe->window), GTK_WIDGET(vbox));
1493 gtk_widget_show(GTK_WIDGET(vbox));
1494
1495 menubar = gtk_menu_bar_new();
1496 gtk_box_pack_start(vbox, menubar, FALSE, FALSE, 0);
1497 gtk_widget_show(menubar);
1498
1499 menuitem = gtk_menu_item_new_with_label("Game");
1500 gtk_container_add(GTK_CONTAINER(menubar), menuitem);
1501 gtk_widget_show(menuitem);
1502
1503 menu = gtk_menu_new();
1504 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), menu);
1505
1506 add_menu_item_with_key(fe, GTK_CONTAINER(menu), "New", 'n');
7f89707c 1507
1508 menuitem = gtk_menu_item_new_with_label("Restart");
1509 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1510 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1511 GTK_SIGNAL_FUNC(menu_restart_event), fe);
1512 gtk_widget_show(menuitem);
eb2ad6f1 1513
5928817c 1514 menuitem = gtk_menu_item_new_with_label("Specific...");
1515 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
1185e3c5 1516 GINT_TO_POINTER(CFG_DESC));
1517 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1518 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1519 GTK_SIGNAL_FUNC(menu_config_event), fe);
1520 gtk_widget_show(menuitem);
1521
1522 menuitem = gtk_menu_item_new_with_label("Random Seed...");
1523 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
5928817c 1524 GINT_TO_POINTER(CFG_SEED));
1525 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1526 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1527 GTK_SIGNAL_FUNC(menu_config_event), fe);
1528 gtk_widget_show(menuitem);
1529
be8d5aa1 1530 if ((n = midend_num_presets(fe->me)) > 0 || thegame.can_configure) {
eb2ad6f1 1531 GtkWidget *submenu;
1532 int i;
1533
1534 menuitem = gtk_menu_item_new_with_label("Type");
c8230524 1535 gtk_container_add(GTK_CONTAINER(menubar), menuitem);
eb2ad6f1 1536 gtk_widget_show(menuitem);
1537
1538 submenu = gtk_menu_new();
1539 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), submenu);
1540
1541 for (i = 0; i < n; i++) {
1542 char *name;
1543 game_params *params;
1544
1545 midend_fetch_preset(fe->me, i, &name, &params);
1546
1547 menuitem = gtk_menu_item_new_with_label(name);
1548 gtk_container_add(GTK_CONTAINER(submenu), menuitem);
1549 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data", params);
1550 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1551 GTK_SIGNAL_FUNC(menu_preset_event), fe);
1552 gtk_widget_show(menuitem);
1553 }
c8230524 1554
be8d5aa1 1555 if (thegame.can_configure) {
c8230524 1556 menuitem = gtk_menu_item_new_with_label("Custom...");
5928817c 1557 gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
1558 GPOINTER_TO_INT(CFG_SETTINGS));
c8230524 1559 gtk_container_add(GTK_CONTAINER(submenu), menuitem);
1560 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1561 GTK_SIGNAL_FUNC(menu_config_event), fe);
1562 gtk_widget_show(menuitem);
1563 }
eb2ad6f1 1564 }
1565
668be019 1566 add_menu_separator(GTK_CONTAINER(menu));
1567 menuitem = gtk_menu_item_new_with_label("Load");
1568 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1569 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1570 GTK_SIGNAL_FUNC(menu_load_event), fe);
1571 gtk_widget_show(menuitem);
1572 menuitem = gtk_menu_item_new_with_label("Save");
1573 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1574 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1575 GTK_SIGNAL_FUNC(menu_save_event), fe);
1576 gtk_widget_show(menuitem);
eb2ad6f1 1577 add_menu_separator(GTK_CONTAINER(menu));
1578 add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Undo", 'u');
1579 add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Redo", '\x12');
9b4b03d3 1580 if (thegame.can_format_as_text) {
1581 add_menu_separator(GTK_CONTAINER(menu));
1582 menuitem = gtk_menu_item_new_with_label("Copy");
1583 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1584 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1585 GTK_SIGNAL_FUNC(menu_copy_event), fe);
1586 gtk_widget_show(menuitem);
1587 }
2ac6d24e 1588 if (thegame.can_solve) {
1589 add_menu_separator(GTK_CONTAINER(menu));
1590 menuitem = gtk_menu_item_new_with_label("Solve");
1591 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1592 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1593 GTK_SIGNAL_FUNC(menu_solve_event), fe);
1594 gtk_widget_show(menuitem);
1595 }
eb2ad6f1 1596 add_menu_separator(GTK_CONTAINER(menu));
1597 add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Exit", 'q');
7f77ea24 1598
97098757 1599 menuitem = gtk_menu_item_new_with_label("Help");
1600 gtk_container_add(GTK_CONTAINER(menubar), menuitem);
1601 gtk_widget_show(menuitem);
1602
1603 menu = gtk_menu_new();
1604 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), menu);
1605
1606 menuitem = gtk_menu_item_new_with_label("About");
1607 gtk_container_add(GTK_CONTAINER(menu), menuitem);
1608 gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
1609 GTK_SIGNAL_FUNC(menu_about_event), fe);
1610 gtk_widget_show(menuitem);
1611
2ef96bd6 1612 {
1613 int i, ncolours;
1614 float *colours;
1615 gboolean *success;
7f77ea24 1616
2ef96bd6 1617 fe->colmap = gdk_colormap_get_system();
1618 colours = midend_colours(fe->me, &ncolours);
1619 fe->ncolours = ncolours;
1620 fe->colours = snewn(ncolours, GdkColor);
1621 for (i = 0; i < ncolours; i++) {
813593cc 1622 fe->colours[i].red = colours[i*3] * 0xFFFF;
1623 fe->colours[i].green = colours[i*3+1] * 0xFFFF;
1624 fe->colours[i].blue = colours[i*3+2] * 0xFFFF;
2ef96bd6 1625 }
1626 success = snewn(ncolours, gboolean);
1627 gdk_colormap_alloc_colors(fe->colmap, fe->colours, ncolours,
1628 FALSE, FALSE, success);
1629 for (i = 0; i < ncolours; i++) {
1630 if (!success[i])
1631 g_error("couldn't allocate colour %d (#%02x%02x%02x)\n",
1632 i, fe->colours[i].red >> 8,
1633 fe->colours[i].green >> 8,
1634 fe->colours[i].blue >> 8);
1635 }
1636 }
7f77ea24 1637
fd1a1a2b 1638 if (midend_wants_statusbar(fe->me)) {
5725d728 1639 GtkWidget *viewport;
1640 GtkRequisition req;
1641
1642 viewport = gtk_viewport_new(NULL, NULL);
1643 gtk_viewport_set_shadow_type(GTK_VIEWPORT(viewport), GTK_SHADOW_NONE);
fd1a1a2b 1644 fe->statusbar = gtk_statusbar_new();
5725d728 1645 gtk_container_add(GTK_CONTAINER(viewport), fe->statusbar);
1646 gtk_widget_show(viewport);
1647 gtk_box_pack_end(vbox, viewport, FALSE, FALSE, 0);
fd1a1a2b 1648 gtk_widget_show(fe->statusbar);
1649 fe->statusctx = gtk_statusbar_get_context_id
1650 (GTK_STATUSBAR(fe->statusbar), "game");
1651 gtk_statusbar_push(GTK_STATUSBAR(fe->statusbar), fe->statusctx,
5725d728 1652 "test");
1653 gtk_widget_size_request(fe->statusbar, &req);
1654#if 0
1655 /* For GTK 2.0, should we be using gtk_widget_set_size_request? */
1656#endif
60d42abc 1657 gtk_widget_set_usize(viewport, -1, req.height);
fd1a1a2b 1658 } else
1659 fe->statusbar = NULL;
1660
2ef96bd6 1661 fe->area = gtk_drawing_area_new();
1e3e152d 1662 get_size(fe, &x, &y);
2ef96bd6 1663 gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
1664 fe->w = x;
1665 fe->h = y;
1666
1e3e152d 1667 gtk_box_pack_end(vbox, fe->area, TRUE, TRUE, 0);
2ef96bd6 1668
1669 fe->pixmap = NULL;
4efb3868 1670 fe->fonts = NULL;
1671 fe->nfonts = fe->fontsize = 0;
2ef96bd6 1672
f5f4a1f1 1673 fe->laststatus = NULL;
1674
9b4b03d3 1675 fe->paste_data = NULL;
1676 fe->paste_data_len = 0;
1677
2ef96bd6 1678 gtk_signal_connect(GTK_OBJECT(fe->window), "destroy",
1679 GTK_SIGNAL_FUNC(destroy), fe);
1680 gtk_signal_connect(GTK_OBJECT(fe->window), "key_press_event",
1681 GTK_SIGNAL_FUNC(key_event), fe);
1682 gtk_signal_connect(GTK_OBJECT(fe->area), "button_press_event",
1683 GTK_SIGNAL_FUNC(button_event), fe);
74a4e547 1684 gtk_signal_connect(GTK_OBJECT(fe->area), "button_release_event",
1685 GTK_SIGNAL_FUNC(button_event), fe);
1686 gtk_signal_connect(GTK_OBJECT(fe->area), "motion_notify_event",
1687 GTK_SIGNAL_FUNC(motion_event), fe);
9b4b03d3 1688 gtk_signal_connect(GTK_OBJECT(fe->area), "selection_get",
1689 GTK_SIGNAL_FUNC(selection_get), fe);
1690 gtk_signal_connect(GTK_OBJECT(fe->area), "selection_clear_event",
1691 GTK_SIGNAL_FUNC(selection_clear), fe);
2ef96bd6 1692 gtk_signal_connect(GTK_OBJECT(fe->area), "expose_event",
1693 GTK_SIGNAL_FUNC(expose_area), fe);
fd1a1a2b 1694 gtk_signal_connect(GTK_OBJECT(fe->window), "map_event",
1695 GTK_SIGNAL_FUNC(map_window), fe);
2ef96bd6 1696 gtk_signal_connect(GTK_OBJECT(fe->area), "configure_event",
1697 GTK_SIGNAL_FUNC(configure_area), fe);
1698
74a4e547 1699 gtk_widget_add_events(GTK_WIDGET(fe->area),
1700 GDK_BUTTON_PRESS_MASK |
1701 GDK_BUTTON_RELEASE_MASK |
1702 GDK_BUTTON_MOTION_MASK);
2ef96bd6 1703
1704 gtk_widget_show(fe->area);
1705 gtk_widget_show(fe->window);
1706
1e3e152d 1707 gdk_window_set_background(fe->area->window, &fe->colours[0]);
1708 gdk_window_set_background(fe->window->window, &fe->colours[0]);
1709
2ef96bd6 1710 return fe;
83680571 1711}
1712
dafd6cf6 1713char *fgetline(FILE *fp)
1714{
1715 char *ret = snewn(512, char);
1716 int size = 512, len = 0;
1717 while (fgets(ret + len, size - len, fp)) {
1718 len += strlen(ret + len);
1719 if (ret[len-1] == '\n')
1720 break; /* got a newline, we're done */
1721 size = len + 512;
1722 ret = sresize(ret, size, char);
1723 }
1724 if (len == 0) { /* first fgets returned NULL */
1725 sfree(ret);
1726 return NULL;
1727 }
1728 ret[len] = '\0';
1729 return ret;
1730}
1731
83680571 1732int main(int argc, char **argv)
1733{
8b7938e7 1734 char *pname = argv[0];
1735 char *error;
dafd6cf6 1736 int ngenerate = 0, print = FALSE, px = 1, py = 1;
1737 int soln = FALSE, colour = FALSE;
1738 float scale = 1.0F;
1739 char *arg = NULL;
1740 int doing_opts = TRUE;
1741 int ac = argc;
1742 char **av = argv;
1743 char errbuf[500];
8b7938e7 1744
dafd6cf6 1745 /*
1746 * Command line parsing in this function is rather fiddly,
1747 * because GTK wants to have a go at argc/argv _first_ - and
1748 * yet we can't let it, because gtk_init() will bomb out if it
1749 * can't open an X display, whereas in fact we want to permit
1750 * our --generate and --print modes to run without an X
1751 * display.
1752 *
1753 * So what we do is:
1754 * - we parse the command line ourselves, without modifying
1755 * argc/argv
1756 * - if we encounter an error which might plausibly be the
1757 * result of a GTK command line (i.e. not detailed errors in
1758 * particular options of ours) we store the error message
1759 * and terminate parsing.
1760 * - if we got enough out of the command line to know it
1761 * specifies a non-X mode of operation, we either display
1762 * the stored error and return failure, or if there is no
1763 * stored error we do the non-X operation and return
1764 * success.
1765 * - otherwise, we go straight to gtk_init().
1766 */
1767
1768 errbuf[0] = '\0';
1769 while (--ac > 0) {
1770 char *p = *++av;
1771 if (doing_opts && !strcmp(p, "--version")) {
1772 printf("%s, from Simon Tatham's Portable Puzzle Collection\n%s\n",
1773 thegame.name, ver);
1774 return 0;
1775 } else if (doing_opts && !strcmp(p, "--generate")) {
1776 if (--ac > 0) {
1777 ngenerate = atoi(*++av);
1778 if (!ngenerate) {
1779 fprintf(stderr, "%s: '--generate' expected a number\n",
1780 pname);
1781 return 1;
1782 }
1783 } else
1784 ngenerate = 1;
1785 } else if (doing_opts && !strcmp(p, "--print")) {
1786 if (!thegame.can_print) {
1787 fprintf(stderr, "%s: this game does not support printing\n",
1788 pname);
1789 return 1;
1790 }
1791 print = TRUE;
1792 if (--ac > 0) {
1793 char *dim = *++av;
1794 if (sscanf(dim, "%dx%d", &px, &py) != 2) {
1795 fprintf(stderr, "%s: unable to parse argument '%s' to "
1796 "'--print'\n", pname, dim);
1797 return 1;
1798 }
1799 } else {
1800 px = py = 1;
1801 }
1802 } else if (doing_opts && !strcmp(p, "--scale")) {
1803 if (--ac > 0) {
1804 scale = atof(*++av);
1805 } else {
1806 fprintf(stderr, "%s: no argument supplied to '--scale'\n",
1807 pname);
1808 return 1;
1809 }
1810 } else if (doing_opts && (!strcmp(p, "--with-solutions") ||
1811 !strcmp(p, "--with-solution") ||
1812 !strcmp(p, "--with-solns") ||
1813 !strcmp(p, "--with-soln") ||
1814 !strcmp(p, "--solutions") ||
1815 !strcmp(p, "--solution") ||
1816 !strcmp(p, "--solns") ||
1817 !strcmp(p, "--soln"))) {
1818 soln = TRUE;
1819 } else if (doing_opts && !strcmp(p, "--colour")) {
1820 if (!thegame.can_print_in_colour) {
1821 fprintf(stderr, "%s: this game does not support colour"
1822 " printing\n", pname);
1823 return 1;
1824 }
1825 colour = TRUE;
1826 } else if (doing_opts && !strcmp(p, "--")) {
1827 doing_opts = FALSE;
1828 } else if (!doing_opts || p[0] != '-') {
1829 if (arg) {
1830 fprintf(stderr, "%s: more than one argument supplied\n",
1831 pname);
1832 return 1;
1833 }
1834 arg = p;
1835 } else {
1836 sprintf(errbuf, "%.100s: unrecognised option '%.100s'\n",
1837 pname, p);
1838 break;
1839 }
45f953cc 1840 }
1841
d91e1fc9 1842 /*
1843 * Special standalone mode for generating puzzle IDs on the
1844 * command line. Useful for generating puzzles to be printed
1845 * out and solved offline (for puzzles where that even makes
1846 * sense - Solo, for example, is a lot more pencil-and-paper
dafd6cf6 1847 * friendly than Twiddle!)
d91e1fc9 1848 *
1849 * Usage:
1850 *
1851 * <puzzle-name> --generate [<n> [<params>]]
1852 *
1853 * <n>, if present, is the number of puzzle IDs to generate.
1854 * <params>, if present, is the same type of parameter string
1855 * you would pass to the puzzle when running it in GUI mode,
1856 * including optional extras such as the expansion factor in
1857 * Rectangles and the difficulty level in Solo.
1858 *
1859 * If you specify <params>, you must also specify <n> (although
1860 * you may specify it to be 1). Sorry; that was the
1861 * simplest-to-parse command-line syntax I came up with.
1862 */
dafd6cf6 1863 if (ngenerate > 0 || print) {
1864 int i, n = 1;
1865 midend *me;
1866 char *id;
1867 document *doc = NULL;
1868
1869 if (*errbuf) {
1870 fputs(errbuf, stderr);
1871 return 1;
1185e3c5 1872 }
d91e1fc9 1873
dafd6cf6 1874 n = ngenerate;
1875
1876 me = midend_new(NULL, &thegame, NULL, NULL);
1877 i = 0;
1878
1879 if (print)
1880 doc = document_new(px, py, scale);
1881
1882 /*
1883 * In this loop, we either generate a game ID or read one
1884 * from stdin depending on whether we're in generate mode;
1885 * then we either write it to stdout or print it, depending
1886 * on whether we're in print mode. Thus, this loop handles
1887 * generate-to-stdout, print-from-stdin and generate-and-
1888 * immediately-print modes.
1889 *
1890 * (It could also handle a copy-stdin-to-stdout mode,
1891 * although there's currently no combination of options
1892 * which will cause this loop to be activated in that mode.
1893 * It wouldn't be _entirely_ pointless, though, because
1894 * stdin could contain bare params strings or random-seed
1895 * IDs, and stdout would contain nothing but fully
1896 * generated descriptive game IDs.)
1897 */
1898 while (ngenerate == 0 || i < n) {
1899 char *pstr, *err;
1900
1901 if (ngenerate == 0) {
1902 pstr = fgetline(stdin);
1903 if (!pstr)
1904 break;
1905 pstr[strcspn(pstr, "\r\n")] = '\0';
1906 } else {
1907 if (arg) {
1908 pstr = snewn(strlen(arg) + 40, char);
1909
1910 strcpy(pstr, arg);
1911 if (i > 0 && strchr(arg, '#'))
1912 sprintf(pstr + strlen(pstr), "-%d", i);
1913 } else
1914 pstr = NULL;
1915 }
1916
1917 if (pstr) {
1918 err = midend_game_id(me, pstr);
1919 if (err) {
1920 fprintf(stderr, "%s: error parsing '%s': %s\n",
1921 pname, pstr, err);
1922 return 1;
1923 }
1924 }
1925 sfree(pstr);
1926
1927 midend_new_game(me);
1928
1929 if (doc) {
1930 err = midend_print_puzzle(me, doc, soln);
1931 if (err) {
1932 fprintf(stderr, "%s: error in printing: %s\n", pname, err);
1933 return 1;
1934 }
1935 } else {
1936 id = midend_get_game_id(me);
1937 puts(id);
1938 sfree(id);
1939 }
1940
1941 i++;
d91e1fc9 1942 }
8b7938e7 1943
dafd6cf6 1944 if (doc) {
1945 psdata *ps = ps_init(stdout, colour);
1946 document_print(doc, ps_drawing_api(ps));
1947 document_free(doc);
1948 ps_free(ps);
1949 }
1950
1951 midend_free(me);
1952
d91e1fc9 1953 return 0;
1954 } else {
1955
1956 gtk_init(&argc, &argv);
1957
1958 if (!new_window(argc > 1 ? argv[1] : NULL, &error)) {
1959 fprintf(stderr, "%s: %s\n", pname, error);
1960 return 1;
1961 }
1962
1963 gtk_main();
1964 }
83680571 1965
1966 return 0;
1967}
Simon Tatham's portable puzzles collection; import of svn://svn.tartarus.org/sgt/puzzles