2 * gtk.c: GTK front end for my puzzle collection.
12 #include <gdk/gdkkeysyms.h>
16 /* ----------------------------------------------------------------------
17 * Error reporting functions used elsewhere.
20 void fatal(char *fmt
, ...)
24 fprintf(stderr
, "fatal error: ");
27 vfprintf(stderr
, fmt
, ap
);
30 fprintf(stderr
, "\n");
34 /* ----------------------------------------------------------------------
35 * GTK front end to puzzles.
45 * This structure holds all the data relevant to a single window.
46 * In principle this would allow us to open multiple independent
47 * puzzle windows, although I can't currently see any real point in
48 * doing so. I'm just coding cleanly because there's no
49 * particularly good reason not to.
63 int bbox_l
, bbox_r
, bbox_u
, bbox_d
;
64 int timer_active
, timer_id
;
69 void frontend_default_colour(frontend
*fe
, float *output
)
71 GdkColor col
= fe
->window
->style
->bg
[GTK_STATE_NORMAL
];
72 output
[0] = col
.red
/ 65535.0;
73 output
[1] = col
.green
/ 65535.0;
74 output
[2] = col
.blue
/ 65535.0;
77 void status_bar(frontend
*fe
, char *text
)
79 assert(fe
->statusbar
);
81 gtk_statusbar_pop(GTK_STATUSBAR(fe
->statusbar
), fe
->statusctx
);
82 gtk_statusbar_push(GTK_STATUSBAR(fe
->statusbar
), fe
->statusctx
, text
);
85 void start_draw(frontend
*fe
)
87 fe
->gc
= gdk_gc_new(fe
->area
->window
);
94 void clip(frontend
*fe
, int x
, int y
, int w
, int h
)
103 gdk_gc_set_clip_rectangle(fe
->gc
, &rect
);
106 void unclip(frontend
*fe
)
115 gdk_gc_set_clip_rectangle(fe
->gc
, &rect
);
118 void draw_text(frontend
*fe
, int x
, int y
, int fonttype
, int fontsize
,
119 int align
, int colour
, char *text
)
124 * Find or create the font.
126 for (i
= 0; i
< fe
->nfonts
; i
++)
127 if (fe
->fonts
[i
].type
== fonttype
&& fe
->fonts
[i
].size
== fontsize
)
130 if (i
== fe
->nfonts
) {
131 if (fe
->fontsize
<= fe
->nfonts
) {
132 fe
->fontsize
= fe
->nfonts
+ 10;
133 fe
->fonts
= sresize(fe
->fonts
, fe
->fontsize
, struct font
);
138 fe
->fonts
[i
].type
= fonttype
;
139 fe
->fonts
[i
].size
= fontsize
;
142 * FIXME: Really I should make at least _some_ effort to
143 * pick the correct font.
145 fe
->fonts
[i
].font
= gdk_font_load("variable");
149 * Find string dimensions and process alignment.
152 int lb
, rb
, wid
, asc
, desc
;
154 gdk_string_extents(fe
->fonts
[i
].font
, text
,
155 &lb
, &rb
, &wid
, &asc
, &desc
);
156 if (align
& ALIGN_VCENTRE
)
157 y
+= asc
- (asc
+desc
)/2;
159 if (align
& ALIGN_HCENTRE
)
161 else if (align
& ALIGN_HRIGHT
)
167 * Set colour and actually draw text.
169 gdk_gc_set_foreground(fe
->gc
, &fe
->colours
[colour
]);
170 gdk_draw_string(fe
->pixmap
, fe
->fonts
[i
].font
, fe
->gc
, x
, y
, text
);
173 void draw_rect(frontend
*fe
, int x
, int y
, int w
, int h
, int colour
)
175 gdk_gc_set_foreground(fe
->gc
, &fe
->colours
[colour
]);
176 gdk_draw_rectangle(fe
->pixmap
, fe
->gc
, 1, x
, y
, w
, h
);
179 void draw_line(frontend
*fe
, int x1
, int y1
, int x2
, int y2
, int colour
)
181 gdk_gc_set_foreground(fe
->gc
, &fe
->colours
[colour
]);
182 gdk_draw_line(fe
->pixmap
, fe
->gc
, x1
, y1
, x2
, y2
);
185 void draw_polygon(frontend
*fe
, int *coords
, int npoints
,
186 int fill
, int colour
)
188 GdkPoint
*points
= snewn(npoints
, GdkPoint
);
191 for (i
= 0; i
< npoints
; i
++) {
192 points
[i
].x
= coords
[i
*2];
193 points
[i
].y
= coords
[i
*2+1];
196 gdk_gc_set_foreground(fe
->gc
, &fe
->colours
[colour
]);
197 gdk_draw_polygon(fe
->pixmap
, fe
->gc
, fill
, points
, npoints
);
202 void draw_update(frontend
*fe
, int x
, int y
, int w
, int h
)
204 if (fe
->bbox_l
> x
) fe
->bbox_l
= x
;
205 if (fe
->bbox_r
< x
+w
) fe
->bbox_r
= x
+w
;
206 if (fe
->bbox_u
> y
) fe
->bbox_u
= y
;
207 if (fe
->bbox_d
< y
+h
) fe
->bbox_d
= y
+h
;
210 void end_draw(frontend
*fe
)
212 gdk_gc_unref(fe
->gc
);
215 if (fe
->bbox_l
< fe
->bbox_r
&& fe
->bbox_u
< fe
->bbox_d
) {
216 gdk_draw_pixmap(fe
->area
->window
,
217 fe
->area
->style
->fg_gc
[GTK_WIDGET_STATE(fe
->area
)],
219 fe
->bbox_l
, fe
->bbox_u
,
220 fe
->bbox_l
, fe
->bbox_u
,
221 fe
->bbox_r
- fe
->bbox_l
, fe
->bbox_d
- fe
->bbox_u
);
225 static void destroy(GtkWidget
*widget
, gpointer data
)
230 static gint
key_event(GtkWidget
*widget
, GdkEventKey
*event
, gpointer data
)
232 frontend
*fe
= (frontend
*)data
;
238 if (event
->string
[0] && !event
->string
[1])
239 keyval
= (unsigned char)event
->string
[0];
240 else if (event
->keyval
== GDK_Up
|| event
->keyval
== GDK_KP_Up
||
241 event
->keyval
== GDK_KP_8
)
243 else if (event
->keyval
== GDK_Down
|| event
->keyval
== GDK_KP_Down
||
244 event
->keyval
== GDK_KP_2
)
245 keyval
= CURSOR_DOWN
;
246 else if (event
->keyval
== GDK_Left
|| event
->keyval
== GDK_KP_Left
||
247 event
->keyval
== GDK_KP_4
)
248 keyval
= CURSOR_LEFT
;
249 else if (event
->keyval
== GDK_Right
|| event
->keyval
== GDK_KP_Right
||
250 event
->keyval
== GDK_KP_6
)
251 keyval
= CURSOR_RIGHT
;
252 else if (event
->keyval
== GDK_KP_Home
|| event
->keyval
== GDK_KP_7
)
253 keyval
= CURSOR_UP_LEFT
;
254 else if (event
->keyval
== GDK_KP_End
|| event
->keyval
== GDK_KP_1
)
255 keyval
= CURSOR_DOWN_LEFT
;
256 else if (event
->keyval
== GDK_KP_Page_Up
|| event
->keyval
== GDK_KP_9
)
257 keyval
= CURSOR_UP_RIGHT
;
258 else if (event
->keyval
== GDK_KP_Page_Down
|| event
->keyval
== GDK_KP_3
)
259 keyval
= CURSOR_DOWN_RIGHT
;
264 !midend_process_key(fe
->me
, 0, 0, keyval
))
265 gtk_widget_destroy(fe
->window
);
270 static gint
button_event(GtkWidget
*widget
, GdkEventButton
*event
,
273 frontend
*fe
= (frontend
*)data
;
279 if (event
->type
!= GDK_BUTTON_PRESS
)
282 if (event
->button
== 2 || (event
->state
& GDK_SHIFT_MASK
))
283 button
= MIDDLE_BUTTON
;
284 else if (event
->button
== 1)
285 button
= LEFT_BUTTON
;
286 else if (event
->button
== 3)
287 button
= RIGHT_BUTTON
;
289 return FALSE
; /* don't even know what button! */
291 if (!midend_process_key(fe
->me
, event
->x
, event
->y
, button
))
292 gtk_widget_destroy(fe
->window
);
297 static gint
expose_area(GtkWidget
*widget
, GdkEventExpose
*event
,
300 frontend
*fe
= (frontend
*)data
;
303 gdk_draw_pixmap(widget
->window
,
304 widget
->style
->fg_gc
[GTK_WIDGET_STATE(widget
)],
306 event
->area
.x
, event
->area
.y
,
307 event
->area
.x
, event
->area
.y
,
308 event
->area
.width
, event
->area
.height
);
313 static gint
map_window(GtkWidget
*widget
, GdkEvent
*event
,
316 frontend
*fe
= (frontend
*)data
;
319 * Apparently we need to do this because otherwise the status
320 * bar will fail to update immediately. Annoying, but there we
323 gtk_widget_queue_draw(fe
->window
);
328 static gint
configure_area(GtkWidget
*widget
,
329 GdkEventConfigure
*event
, gpointer data
)
331 frontend
*fe
= (frontend
*)data
;
335 gdk_pixmap_unref(fe
->pixmap
);
337 fe
->pixmap
= gdk_pixmap_new(widget
->window
, fe
->w
, fe
->h
, -1);
339 gc
= gdk_gc_new(fe
->area
->window
);
340 gdk_gc_set_foreground(gc
, &fe
->colours
[0]);
341 gdk_draw_rectangle(fe
->pixmap
, gc
, 1, 0, 0, fe
->w
, fe
->h
);
344 midend_redraw(fe
->me
);
349 static gint
timer_func(gpointer data
)
351 frontend
*fe
= (frontend
*)data
;
353 if (fe
->timer_active
)
354 midend_timer(fe
->me
, 0.02); /* may clear timer_active */
356 return fe
->timer_active
;
359 void deactivate_timer(frontend
*fe
)
361 if (fe
->timer_active
)
362 gtk_timeout_remove(fe
->timer_id
);
363 fe
->timer_active
= FALSE
;
366 void activate_timer(frontend
*fe
)
368 if (!fe
->timer_active
)
369 fe
->timer_id
= gtk_timeout_add(20, timer_func
, fe
);
370 fe
->timer_active
= TRUE
;
373 static void menu_key_event(GtkMenuItem
*menuitem
, gpointer data
)
375 frontend
*fe
= (frontend
*)data
;
376 int key
= GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem
),
378 if (!midend_process_key(fe
->me
, 0, 0, key
))
379 gtk_widget_destroy(fe
->window
);
382 static void menu_preset_event(GtkMenuItem
*menuitem
, gpointer data
)
384 frontend
*fe
= (frontend
*)data
;
385 game_params
*params
=
386 (game_params
*)gtk_object_get_data(GTK_OBJECT(menuitem
), "user-data");
389 midend_set_params(fe
->me
, params
);
390 midend_new_game(fe
->me
, NULL
);
391 midend_size(fe
->me
, &x
, &y
);
392 gtk_drawing_area_size(GTK_DRAWING_AREA(fe
->area
), x
, y
);
397 static GtkWidget
*add_menu_item_with_key(frontend
*fe
, GtkContainer
*cont
,
400 GtkWidget
*menuitem
= gtk_menu_item_new_with_label(text
);
401 gtk_container_add(cont
, menuitem
);
402 gtk_object_set_data(GTK_OBJECT(menuitem
), "user-data",
403 GINT_TO_POINTER(key
));
404 gtk_signal_connect(GTK_OBJECT(menuitem
), "activate",
405 GTK_SIGNAL_FUNC(menu_key_event
), fe
);
406 gtk_widget_show(menuitem
);
410 static void add_menu_separator(GtkContainer
*cont
)
412 GtkWidget
*menuitem
= gtk_menu_item_new();
413 gtk_container_add(cont
, menuitem
);
414 gtk_widget_show(menuitem
);
417 static frontend
*new_window(void)
421 GtkWidget
*menubar
, *menu
, *menuitem
;
426 fe
->me
= midend_new(fe
);
427 midend_new_game(fe
->me
, NULL
);
429 fe
->window
= gtk_window_new(GTK_WINDOW_TOPLEVEL
);
430 gtk_window_set_title(GTK_WINDOW(fe
->window
), game_name
);
432 gtk_window_set_resizable(GTK_WINDOW(fe
->window
), FALSE
);
434 gtk_window_set_policy(GTK_WINDOW(fe
->window
), FALSE
, FALSE
, TRUE
);
436 vbox
= GTK_BOX(gtk_vbox_new(FALSE
, 0));
437 gtk_container_add(GTK_CONTAINER(fe
->window
), GTK_WIDGET(vbox
));
438 gtk_widget_show(GTK_WIDGET(vbox
));
440 menubar
= gtk_menu_bar_new();
441 gtk_box_pack_start(vbox
, menubar
, FALSE
, FALSE
, 0);
442 gtk_widget_show(menubar
);
444 menuitem
= gtk_menu_item_new_with_label("Game");
445 gtk_container_add(GTK_CONTAINER(menubar
), menuitem
);
446 gtk_widget_show(menuitem
);
448 menu
= gtk_menu_new();
449 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem
), menu
);
451 add_menu_item_with_key(fe
, GTK_CONTAINER(menu
), "New", 'n');
452 add_menu_item_with_key(fe
, GTK_CONTAINER(menu
), "Restart", 'r');
454 if ((n
= midend_num_presets(fe
->me
)) > 0) {
458 menuitem
= gtk_menu_item_new_with_label("Type");
459 gtk_container_add(GTK_CONTAINER(menu
), menuitem
);
460 gtk_widget_show(menuitem
);
462 submenu
= gtk_menu_new();
463 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem
), submenu
);
465 for (i
= 0; i
< n
; i
++) {
469 midend_fetch_preset(fe
->me
, i
, &name
, ¶ms
);
471 menuitem
= gtk_menu_item_new_with_label(name
);
472 gtk_container_add(GTK_CONTAINER(submenu
), menuitem
);
473 gtk_object_set_data(GTK_OBJECT(menuitem
), "user-data", params
);
474 gtk_signal_connect(GTK_OBJECT(menuitem
), "activate",
475 GTK_SIGNAL_FUNC(menu_preset_event
), fe
);
476 gtk_widget_show(menuitem
);
480 add_menu_separator(GTK_CONTAINER(menu
));
481 add_menu_item_with_key(fe
, GTK_CONTAINER(menu
), "Undo", 'u');
482 add_menu_item_with_key(fe
, GTK_CONTAINER(menu
), "Redo", '\x12');
483 add_menu_separator(GTK_CONTAINER(menu
));
484 add_menu_item_with_key(fe
, GTK_CONTAINER(menu
), "Exit", 'q');
491 fe
->colmap
= gdk_colormap_get_system();
492 colours
= midend_colours(fe
->me
, &ncolours
);
493 fe
->ncolours
= ncolours
;
494 fe
->colours
= snewn(ncolours
, GdkColor
);
495 for (i
= 0; i
< ncolours
; i
++) {
496 fe
->colours
[i
].red
= colours
[i
*3] * 0xFFFF;
497 fe
->colours
[i
].green
= colours
[i
*3+1] * 0xFFFF;
498 fe
->colours
[i
].blue
= colours
[i
*3+2] * 0xFFFF;
500 success
= snewn(ncolours
, gboolean
);
501 gdk_colormap_alloc_colors(fe
->colmap
, fe
->colours
, ncolours
,
502 FALSE
, FALSE
, success
);
503 for (i
= 0; i
< ncolours
; i
++) {
505 g_error("couldn't allocate colour %d (#%02x%02x%02x)\n",
506 i
, fe
->colours
[i
].red
>> 8,
507 fe
->colours
[i
].green
>> 8,
508 fe
->colours
[i
].blue
>> 8);
512 if (midend_wants_statusbar(fe
->me
)) {
513 fe
->statusbar
= gtk_statusbar_new();
514 gtk_box_pack_end(vbox
, fe
->statusbar
, FALSE
, FALSE
, 0);
515 gtk_widget_show(fe
->statusbar
);
516 fe
->statusctx
= gtk_statusbar_get_context_id
517 (GTK_STATUSBAR(fe
->statusbar
), "game");
518 gtk_statusbar_push(GTK_STATUSBAR(fe
->statusbar
), fe
->statusctx
,
521 fe
->statusbar
= NULL
;
523 fe
->area
= gtk_drawing_area_new();
524 midend_size(fe
->me
, &x
, &y
);
525 gtk_drawing_area_size(GTK_DRAWING_AREA(fe
->area
), x
, y
);
529 gtk_box_pack_end(vbox
, fe
->area
, FALSE
, FALSE
, 0);
533 fe
->nfonts
= fe
->fontsize
= 0;
535 fe
->timer_active
= FALSE
;
537 gtk_signal_connect(GTK_OBJECT(fe
->window
), "destroy",
538 GTK_SIGNAL_FUNC(destroy
), fe
);
539 gtk_signal_connect(GTK_OBJECT(fe
->window
), "key_press_event",
540 GTK_SIGNAL_FUNC(key_event
), fe
);
541 gtk_signal_connect(GTK_OBJECT(fe
->area
), "button_press_event",
542 GTK_SIGNAL_FUNC(button_event
), fe
);
543 gtk_signal_connect(GTK_OBJECT(fe
->area
), "expose_event",
544 GTK_SIGNAL_FUNC(expose_area
), fe
);
545 gtk_signal_connect(GTK_OBJECT(fe
->window
), "map_event",
546 GTK_SIGNAL_FUNC(map_window
), fe
);
547 gtk_signal_connect(GTK_OBJECT(fe
->area
), "configure_event",
548 GTK_SIGNAL_FUNC(configure_area
), fe
);
550 gtk_widget_add_events(GTK_WIDGET(fe
->area
), GDK_BUTTON_PRESS_MASK
);
552 gtk_widget_show(fe
->area
);
553 gtk_widget_show(fe
->window
);
558 int main(int argc
, char **argv
)
562 gtk_init(&argc
, &argv
);