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; |
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 |
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 | 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 |
159 | void 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 |
169 | void 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 |
182 | void 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 |
195 | void 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 |
348 | void 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 |
355 | void 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 |
362 | void 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 |
395 | void 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 |
413 | struct blitter { |
414 | GdkPixmap *pixmap; |
415 | int w, h, x, y; |
416 | }; |
417 | |
dafd6cf6 |
418 | blitter *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 |
432 | void 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 |
439 | void 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 |
452 | void 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 |
466 | void 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 |
475 | void 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 |
491 | const 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 |
511 | static 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 |
519 | static 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 |
573 | static 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 | |
604 | static 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 |
629 | static 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 |
645 | static 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 |
660 | static 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 | |
690 | static 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 | |
707 | void 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 | |
716 | void 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 |
727 | static void window_destroy(GtkWidget *widget, gpointer data) |
728 | { |
729 | gtk_main_quit(); |
730 | } |
731 | |
668be019 |
732 | static 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 |
744 | static 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 |
759 | enum { MB_OK, MB_YESNO }; |
760 | |
761 | int 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 |
824 | void error_box(GtkWidget *parent, char *msg) |
825 | { |
668be019 |
826 | message_box(parent, "Error", msg, FALSE, MB_OK); |
97098757 |
827 | } |
828 | |
c8230524 |
829 | static 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 | |
844 | static 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 |
851 | static 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 |
872 | static 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 | |
880 | static 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 | |
887 | static 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 |
895 | static 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 |
1060 | static 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 |
1069 | static 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 |
1097 | static 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 |
1117 | GdkAtom compound_text_atom, utf8_string_atom; |
1118 | int paste_initialised = FALSE; |
1119 | |
1120 | void 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. */ |
1155 | void 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 | |
1162 | void 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 | |
1192 | void 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 | |
1200 | gint 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 | |
1212 | static 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 |
1226 | static 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 | |
1238 | static 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 | |
1267 | static void savefile_write(void *wctx, void *buf, int len) |
1268 | { |
1269 | FILE *fp = (FILE *)wctx; |
1270 | fwrite(buf, 1, len, fp); |
1271 | } |
1272 | |
1273 | static 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 | |
1282 | static 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 | |
1318 | static 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 |
1357 | static 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 |
1368 | static void menu_restart_event(GtkMenuItem *menuitem, gpointer data) |
1369 | { |
1370 | frontend *fe = (frontend *)data; |
1371 | |
1372 | midend_restart_game(fe->me); |
1373 | } |
1374 | |
c8230524 |
1375 | static 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 |
1397 | static 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 |
1412 | static 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 | |
1425 | static 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 |
1432 | static 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, >k_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, ¶ms); |
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 |
1713 | char *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 |
1732 | int 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 | } |