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