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