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