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