gtk.c

   1 /*
   2  * gtk.c: GTK front end for my puzzle collection.
   3  */
   4
   5 #include <stdio.h>
   6 #include <assert.h>
   7 #include <stdlib.h>
   8 #include <time.h>
   9 #include <stdarg.h>
  10 #include <string.h>
  11
  12 #include <sys/time.h>
  13
  14 #include <gtk/gtk.h>
  15 #include <gdk/gdkkeysyms.h>
  16
  17 #include "puzzles.h"
  18
  19 /* ----------------------------------------------------------------------
  20  * Error reporting functions used elsewhere.
  21  */
  22
  23 void fatal(char *fmt, ...)
  24 {
  25     va_list ap;
  26
  27     fprintf(stderr, "fatal error: ");
  28
  29     va_start(ap, fmt);
  30     vfprintf(stderr, fmt, ap);
  31     va_end(ap);
  32
  33     fprintf(stderr, "\n");
  34     exit(1);
  35 }
  36
  37 /* ----------------------------------------------------------------------
  38  * GTK front end to puzzles.
  39  */
  40
  41 struct font {
  42     GdkFont *font;
  43     int type;
  44     int size;
  45 };
  46
  47 /*
  48  * This structure holds all the data relevant to a single window.
  49  * In principle this would allow us to open multiple independent
  50  * puzzle windows, although I can't currently see any real point in
  51  * doing so. I'm just coding cleanly because there's no
  52  * particularly good reason not to.
  53  */
  54 struct frontend {
  55     GtkWidget *window;
  56     GtkWidget *area;
  57     GtkWidget *statusbar;
  58     guint statusctx;
  59     GdkPixmap *pixmap;
  60     GdkColor *colours;
  61     int ncolours;
  62     GdkColormap *colmap;
  63     int w, h;
  64     midend_data *me;
  65     GdkGC *gc;
  66     int bbox_l, bbox_r, bbox_u, bbox_d;
  67     int timer_active, timer_id;
  68     struct timeval last_time;
  69     struct font *fonts;
  70     int nfonts, fontsize;
  71     config_item *cfg;
  72     int cfg_which, cfgret;
  73     GtkWidget *cfgbox;
  74 };
  75
  76 void frontend_default_colour(frontend *fe, float *output)
  77 {
  78     GdkColor col = fe->window->style->bg[GTK_STATE_NORMAL];
  79     output[0] = col.red / 65535.0;
  80     output[1] = col.green / 65535.0;
  81     output[2] = col.blue / 65535.0;
  82 }
  83
  84 void status_bar(frontend *fe, char *text)
  85 {
  86     assert(fe->statusbar);
  87
  88     gtk_statusbar_pop(GTK_STATUSBAR(fe->statusbar), fe->statusctx);
  89     gtk_statusbar_push(GTK_STATUSBAR(fe->statusbar), fe->statusctx, text);
  90 }
  91
  92 void start_draw(frontend *fe)
  93 {
  94     fe->gc = gdk_gc_new(fe->area->window);
  95     fe->bbox_l = fe->w;
  96     fe->bbox_r = 0;
  97     fe->bbox_u = fe->h;
  98     fe->bbox_d = 0;
  99 }
 100
 101 void clip(frontend *fe, int x, int y, int w, int h)
 102 {
 103     GdkRectangle rect;
 104
 105     rect.x = x;
 106     rect.y = y;
 107     rect.width = w;
 108     rect.height = h;
 109
 110     gdk_gc_set_clip_rectangle(fe->gc, &rect);
 111 }
 112
 113 void unclip(frontend *fe)
 114 {
 115     GdkRectangle rect;
 116
 117     rect.x = 0;
 118     rect.y = 0;
 119     rect.width = fe->w;
 120     rect.height = fe->h;
 121
 122     gdk_gc_set_clip_rectangle(fe->gc, &rect);
 123 }
 124
 125 void draw_text(frontend *fe, int x, int y, int fonttype, int fontsize,
 126                int align, int colour, char *text)
 127 {
 128     int i;
 129
 130     /*
 131      * Find or create the font.
 132      */
 133     for (i = 0; i < fe->nfonts; i++)
 134         if (fe->fonts[i].type == fonttype && fe->fonts[i].size == fontsize)
 135             break;
 136
 137     if (i == fe->nfonts) {
 138         if (fe->fontsize <= fe->nfonts) {
 139             fe->fontsize = fe->nfonts + 10;
 140             fe->fonts = sresize(fe->fonts, fe->fontsize, struct font);
 141         }
 142
 143         fe->nfonts++;
 144
 145         fe->fonts[i].type = fonttype;
 146         fe->fonts[i].size = fontsize;
 147
 148         /*
 149          * FIXME: Really I should make at least _some_ effort to
 150          * pick the correct font.
 151          */
 152         fe->fonts[i].font = gdk_font_load("variable");
 153     }
 154
 155     /*
 156      * Find string dimensions and process alignment.
 157      */
 158     {
 159         int lb, rb, wid, asc, desc;
 160
 161         gdk_string_extents(fe->fonts[i].font, text,
 162                            &lb, &rb, &wid, &asc, &desc);
 163         if (align & ALIGN_VCENTRE)
 164             y += asc - (asc+desc)/2;
 165
 166         if (align & ALIGN_HCENTRE)
 167             x -= wid / 2;
 168         else if (align & ALIGN_HRIGHT)
 169             x -= wid;
 170
 171     }
 172
 173     /*
 174      * Set colour and actually draw text.
 175      */
 176     gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
 177     gdk_draw_string(fe->pixmap, fe->fonts[i].font, fe->gc, x, y, text);
 178 }
 179
 180 void draw_rect(frontend *fe, int x, int y, int w, int h, int colour)
 181 {
 182     gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
 183     gdk_draw_rectangle(fe->pixmap, fe->gc, 1, x, y, w, h);
 184 }
 185
 186 void draw_line(frontend *fe, int x1, int y1, int x2, int y2, int colour)
 187 {
 188     gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
 189     gdk_draw_line(fe->pixmap, fe->gc, x1, y1, x2, y2);
 190 }
 191
 192 void draw_polygon(frontend *fe, int *coords, int npoints,
 193                   int fill, int colour)
 194 {
 195     GdkPoint *points = snewn(npoints, GdkPoint);
 196     int i;
 197
 198     for (i = 0; i < npoints; i++) {
 199         points[i].x = coords[i*2];
 200         points[i].y = coords[i*2+1];
 201     }
 202
 203     gdk_gc_set_foreground(fe->gc, &fe->colours[colour]);
 204     gdk_draw_polygon(fe->pixmap, fe->gc, fill, points, npoints);
 205
 206     sfree(points);
 207 }
 208
 209 void draw_update(frontend *fe, int x, int y, int w, int h)
 210 {
 211     if (fe->bbox_l > x  ) fe->bbox_l = x  ;
 212     if (fe->bbox_r < x+w) fe->bbox_r = x+w;
 213     if (fe->bbox_u > y  ) fe->bbox_u = y  ;
 214     if (fe->bbox_d < y+h) fe->bbox_d = y+h;
 215 }
 216
 217 void end_draw(frontend *fe)
 218 {
 219     gdk_gc_unref(fe->gc);
 220     fe->gc = NULL;
 221
 222     if (fe->bbox_l < fe->bbox_r && fe->bbox_u < fe->bbox_d) {
 223         gdk_draw_pixmap(fe->area->window,
 224                         fe->area->style->fg_gc[GTK_WIDGET_STATE(fe->area)],
 225                         fe->pixmap,
 226                         fe->bbox_l, fe->bbox_u,
 227                         fe->bbox_l, fe->bbox_u,
 228                         fe->bbox_r - fe->bbox_l, fe->bbox_d - fe->bbox_u);
 229     }
 230 }
 231
 232 static void destroy(GtkWidget *widget, gpointer data)
 233 {
 234     gtk_main_quit();
 235 }
 236
 237 static gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
 238 {
 239     frontend *fe = (frontend *)data;
 240     int keyval;
 241
 242     if (!fe->pixmap)
 243         return TRUE;
 244
 245     if (event->string[0] && !event->string[1])
 246         keyval = (unsigned char)event->string[0];
 247     else if (event->keyval == GDK_Up || event->keyval == GDK_KP_Up ||
 248              event->keyval == GDK_KP_8)
 249         keyval = CURSOR_UP;
 250     else if (event->keyval == GDK_Down || event->keyval == GDK_KP_Down ||
 251              event->keyval == GDK_KP_2)
 252         keyval = CURSOR_DOWN;
 253     else if (event->keyval == GDK_Left || event->keyval == GDK_KP_Left ||
 254              event->keyval == GDK_KP_4)
 255         keyval = CURSOR_LEFT;
 256     else if (event->keyval == GDK_Right || event->keyval == GDK_KP_Right ||
 257              event->keyval == GDK_KP_6)
 258         keyval = CURSOR_RIGHT;
 259     else if (event->keyval == GDK_KP_Home || event->keyval == GDK_KP_7)
 260         keyval = CURSOR_UP_LEFT;
 261     else if (event->keyval == GDK_KP_End || event->keyval == GDK_KP_1)
 262         keyval = CURSOR_DOWN_LEFT;
 263     else if (event->keyval == GDK_KP_Page_Up || event->keyval == GDK_KP_9)
 264         keyval = CURSOR_UP_RIGHT;
 265     else if (event->keyval == GDK_KP_Page_Down || event->keyval == GDK_KP_3)
 266         keyval = CURSOR_DOWN_RIGHT;
 267     else
 268         keyval = -1;
 269
 270     if (keyval >= 0 &&
 271         !midend_process_key(fe->me, 0, 0, keyval))
 272         gtk_widget_destroy(fe->window);
 273
 274     return TRUE;
 275 }
 276
 277 static gint button_event(GtkWidget *widget, GdkEventButton *event,
 278                          gpointer data)
 279 {
 280     frontend *fe = (frontend *)data;
 281     int button;
 282
 283     if (!fe->pixmap)
 284         return TRUE;
 285
 286     if (event->type != GDK_BUTTON_PRESS && event->type != GDK_BUTTON_RELEASE)
 287         return TRUE;
 288
 289     if (event->button == 2 || (event->state & GDK_SHIFT_MASK))
 290         button = MIDDLE_BUTTON;
 291     else if (event->button == 1)
 292         button = LEFT_BUTTON;
 293     else if (event->button == 3)
 294         button = RIGHT_BUTTON;
 295     else
 296         return FALSE;                  /* don't even know what button! */
 297
 298     if (event->type == GDK_BUTTON_RELEASE)
 299         button += LEFT_RELEASE - LEFT_BUTTON;
 300
 301     if (!midend_process_key(fe->me, event->x, event->y, button))
 302         gtk_widget_destroy(fe->window);
 303
 304     return TRUE;
 305 }
 306
 307 static gint motion_event(GtkWidget *widget, GdkEventMotion *event,
 308                          gpointer data)
 309 {
 310     frontend *fe = (frontend *)data;
 311     int button;
 312
 313     if (!fe->pixmap)
 314         return TRUE;
 315
 316     if (event->state & (GDK_BUTTON2_MASK | GDK_SHIFT_MASK))
 317         button = MIDDLE_DRAG;
 318     else if (event->state & GDK_BUTTON1_MASK)
 319         button = LEFT_DRAG;
 320     else if (event->state & GDK_BUTTON3_MASK)
 321         button = RIGHT_DRAG;
 322     else
 323         return FALSE;                  /* don't even know what button! */
 324
 325     if (!midend_process_key(fe->me, event->x, event->y, button))
 326         gtk_widget_destroy(fe->window);
 327
 328     return TRUE;
 329 }
 330
 331 static gint expose_area(GtkWidget *widget, GdkEventExpose *event,
 332                         gpointer data)
 333 {
 334     frontend *fe = (frontend *)data;
 335
 336     if (fe->pixmap) {
 337         gdk_draw_pixmap(widget->window,
 338                         widget->style->fg_gc[GTK_WIDGET_STATE(widget)],
 339                         fe->pixmap,
 340                         event->area.x, event->area.y,
 341                         event->area.x, event->area.y,
 342                         event->area.width, event->area.height);
 343     }
 344     return TRUE;
 345 }
 346
 347 static gint map_window(GtkWidget *widget, GdkEvent *event,
 348                        gpointer data)
 349 {
 350     frontend *fe = (frontend *)data;
 351
 352     /*
 353      * Apparently we need to do this because otherwise the status
 354      * bar will fail to update immediately. Annoying, but there we
 355      * go.
 356      */
 357     gtk_widget_queue_draw(fe->window);
 358
 359     return TRUE;
 360 }
 361
 362 static gint configure_area(GtkWidget *widget,
 363                            GdkEventConfigure *event, gpointer data)
 364 {
 365     frontend *fe = (frontend *)data;
 366     GdkGC *gc;
 367
 368     if (fe->pixmap)
 369         gdk_pixmap_unref(fe->pixmap);
 370
 371     fe->pixmap = gdk_pixmap_new(widget->window, fe->w, fe->h, -1);
 372
 373     gc = gdk_gc_new(fe->area->window);
 374     gdk_gc_set_foreground(gc, &fe->colours[0]);
 375     gdk_draw_rectangle(fe->pixmap, gc, 1, 0, 0, fe->w, fe->h);
 376     gdk_gc_unref(gc);
 377
 378     midend_redraw(fe->me);
 379
 380     return TRUE;
 381 }
 382
 383 static gint timer_func(gpointer data)
 384 {
 385     frontend *fe = (frontend *)data;
 386
 387     if (fe->timer_active) {
 388         struct timeval now;
 389         float elapsed;
 390         gettimeofday(&now, NULL);
 391         elapsed = ((now.tv_usec - fe->last_time.tv_usec) * 0.000001F +
 392                    (now.tv_sec - fe->last_time.tv_sec));
 393         midend_timer(fe->me, elapsed);  /* may clear timer_active */
 394         fe->last_time = now;
 395     }
 396
 397     return fe->timer_active;
 398 }
 399
 400 void deactivate_timer(frontend *fe)
 401 {
 402     if (fe->timer_active)
 403         gtk_timeout_remove(fe->timer_id);
 404     fe->timer_active = FALSE;
 405 }
 406
 407 void activate_timer(frontend *fe)
 408 {
 409     if (!fe->timer_active) {
 410         fe->timer_id = gtk_timeout_add(20, timer_func, fe);
 411         gettimeofday(&fe->last_time, NULL);
 412     }
 413     fe->timer_active = TRUE;
 414 }
 415
 416 static void window_destroy(GtkWidget *widget, gpointer data)
 417 {
 418     gtk_main_quit();
 419 }
 420
 421 static void errmsg_button_clicked(GtkButton *button, gpointer data)
 422 {
 423     gtk_widget_destroy(GTK_WIDGET(data));
 424 }
 425
 426 static int win_key_press(GtkWidget *widget, GdkEventKey *event, gpointer data)
 427 {
 428     GtkObject *cancelbutton = GTK_OBJECT(data);
 429
 430     /*
 431      * `Escape' effectively clicks the cancel button
 432      */
 433     if (event->keyval == GDK_Escape) {
 434         gtk_signal_emit_by_name(GTK_OBJECT(cancelbutton), "clicked");
 435         return TRUE;
 436     }
 437
 438     return FALSE;
 439 }
 440
 441 void error_box(GtkWidget *parent, char *msg)
 442 {
 443     GtkWidget *window, *hbox, *text, *ok;
 444
 445     window = gtk_dialog_new();
 446     text = gtk_label_new(msg);
 447     gtk_misc_set_alignment(GTK_MISC(text), 0.0, 0.0);
 448     hbox = gtk_hbox_new(FALSE, 0);
 449     gtk_box_pack_start(GTK_BOX(hbox), text, FALSE, FALSE, 20);
 450     gtk_box_pack_start(GTK_BOX(GTK_DIALOG(window)->vbox),
 451                        hbox, FALSE, FALSE, 20);
 452     gtk_widget_show(text);
 453     gtk_widget_show(hbox);
 454     gtk_window_set_title(GTK_WINDOW(window), "Error");
 455     gtk_label_set_line_wrap(GTK_LABEL(text), TRUE);
 456     ok = gtk_button_new_with_label("OK");
 457     gtk_box_pack_end(GTK_BOX(GTK_DIALOG(window)->action_area),
 458                      ok, FALSE, FALSE, 0);
 459     gtk_widget_show(ok);
 460     GTK_WIDGET_SET_FLAGS(ok, GTK_CAN_DEFAULT);
 461     gtk_window_set_default(GTK_WINDOW(window), ok);
 462     gtk_signal_connect(GTK_OBJECT(ok), "clicked",
 463                        GTK_SIGNAL_FUNC(errmsg_button_clicked), window);
 464     gtk_signal_connect(GTK_OBJECT(window), "destroy",
 465                        GTK_SIGNAL_FUNC(window_destroy), NULL);
 466     gtk_signal_connect(GTK_OBJECT(window), "key_press_event",
 467                        GTK_SIGNAL_FUNC(win_key_press), ok);
 468     gtk_window_set_modal(GTK_WINDOW(window), TRUE);
 469     gtk_window_set_transient_for(GTK_WINDOW(window), GTK_WINDOW(parent));
 470     //set_transient_window_pos(parent, window);
 471     gtk_widget_show(window);
 472     gtk_main();
 473 }
 474
 475 static void config_ok_button_clicked(GtkButton *button, gpointer data)
 476 {
 477     frontend *fe = (frontend *)data;
 478     char *err;
 479
 480     err = midend_set_config(fe->me, fe->cfg_which, fe->cfg);
 481
 482     if (err)
 483         error_box(fe->cfgbox, err);
 484     else {
 485         fe->cfgret = TRUE;
 486         gtk_widget_destroy(fe->cfgbox);
 487     }
 488 }
 489
 490 static void config_cancel_button_clicked(GtkButton *button, gpointer data)
 491 {
 492     frontend *fe = (frontend *)data;
 493
 494     gtk_widget_destroy(fe->cfgbox);
 495 }
 496
 497 static int editbox_key(GtkWidget *widget, GdkEventKey *event, gpointer data)
 498 {
 499     /*
 500      * GtkEntry has a nasty habit of eating the Return key, which
 501      * is unhelpful since it doesn't actually _do_ anything with it
 502      * (it calls gtk_widget_activate, but our edit boxes never need
 503      * activating). So I catch Return before GtkEntry sees it, and
 504      * pass it straight on to the parent widget. Effect: hitting
 505      * Return in an edit box will now activate the default button
 506      * in the dialog just like it will everywhere else.
 507      */
 508     if (event->keyval == GDK_Return && widget->parent != NULL) {
 509         gint return_val;
 510         gtk_signal_emit_stop_by_name(GTK_OBJECT(widget), "key_press_event");
 511         gtk_signal_emit_by_name(GTK_OBJECT(widget->parent), "key_press_event",
 512                                 event, &return_val);
 513         return return_val;
 514     }
 515     return FALSE;
 516 }
 517
 518 static void editbox_changed(GtkEditable *ed, gpointer data)
 519 {
 520     config_item *i = (config_item *)data;
 521
 522     sfree(i->sval);
 523     i->sval = dupstr(gtk_entry_get_text(GTK_ENTRY(ed)));
 524 }
 525
 526 static void button_toggled(GtkToggleButton *tb, gpointer data)
 527 {
 528     config_item *i = (config_item *)data;
 529
 530     i->ival = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(tb));
 531 }
 532
 533 static void droplist_sel(GtkMenuItem *item, gpointer data)
 534 {
 535     config_item *i = (config_item *)data;
 536
 537     i->ival = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(item),
 538                                                   "user-data"));
 539 }
 540
 541 static int get_config(frontend *fe, int which)
 542 {
 543     GtkWidget *w, *table, *cancel;
 544     char *title;
 545     config_item *i;
 546     int y;
 547
 548     fe->cfg = midend_get_config(fe->me, which, &title);
 549     fe->cfg_which = which;
 550     fe->cfgret = FALSE;
 551
 552     fe->cfgbox = gtk_dialog_new();
 553     gtk_window_set_title(GTK_WINDOW(fe->cfgbox), title);
 554     sfree(title);
 555
 556     w = gtk_button_new_with_label("OK");
 557     gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->action_area),
 558                      w, FALSE, FALSE, 0);
 559     gtk_widget_show(w);
 560     GTK_WIDGET_SET_FLAGS(w, GTK_CAN_DEFAULT);
 561     gtk_window_set_default(GTK_WINDOW(fe->cfgbox), w);
 562     gtk_signal_connect(GTK_OBJECT(w), "clicked",
 563                        GTK_SIGNAL_FUNC(config_ok_button_clicked), fe);
 564
 565     w = gtk_button_new_with_label("Cancel");
 566     gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->action_area),
 567                      w, FALSE, FALSE, 0);
 568     gtk_widget_show(w);
 569     gtk_signal_connect(GTK_OBJECT(w), "clicked",
 570                        GTK_SIGNAL_FUNC(config_cancel_button_clicked), fe);
 571     cancel = w;
 572
 573     table = gtk_table_new(1, 2, FALSE);
 574     y = 0;
 575     gtk_box_pack_end(GTK_BOX(GTK_DIALOG(fe->cfgbox)->vbox),
 576                      table, FALSE, FALSE, 0);
 577     gtk_widget_show(table);
 578
 579     for (i = fe->cfg; i->type != C_END; i++) {
 580         gtk_table_resize(GTK_TABLE(table), y+1, 2);
 581
 582         switch (i->type) {
 583           case C_STRING:
 584             /*
 585              * Edit box with a label beside it.
 586              */
 587
 588             w = gtk_label_new(i->name);
 589             gtk_misc_set_alignment(GTK_MISC(w), 0.0, 0.5);
 590             gtk_table_attach(GTK_TABLE(table), w, 0, 1, y, y+1,
 591                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 592                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 593                              3, 3);
 594             gtk_widget_show(w);
 595
 596             w = gtk_entry_new();
 597             gtk_table_attach(GTK_TABLE(table), w, 1, 2, y, y+1,
 598                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 599                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 600                              3, 3);
 601             gtk_entry_set_text(GTK_ENTRY(w), i->sval);
 602             gtk_signal_connect(GTK_OBJECT(w), "changed",
 603                                GTK_SIGNAL_FUNC(editbox_changed), i);
 604             gtk_signal_connect(GTK_OBJECT(w), "key_press_event",
 605                                GTK_SIGNAL_FUNC(editbox_key), NULL);
 606             gtk_widget_show(w);
 607
 608             break;
 609
 610           case C_BOOLEAN:
 611             /*
 612              * Simple checkbox.
 613              */
 614             w = gtk_check_button_new_with_label(i->name);
 615             gtk_signal_connect(GTK_OBJECT(w), "toggled",
 616                                GTK_SIGNAL_FUNC(button_toggled), i);
 617             gtk_table_attach(GTK_TABLE(table), w, 0, 2, y, y+1,
 618                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 619                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 620                              3, 3);
 621             gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(w), i->ival);
 622             gtk_widget_show(w);
 623             break;
 624
 625           case C_CHOICES:
 626             /*
 627              * Drop-down list (GtkOptionMenu).
 628              */
 629
 630             w = gtk_label_new(i->name);
 631             gtk_misc_set_alignment(GTK_MISC(w), 0.0, 0.5);
 632             gtk_table_attach(GTK_TABLE(table), w, 0, 1, y, y+1,
 633                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 634                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 635                              3, 3);
 636             gtk_widget_show(w);
 637
 638             w = gtk_option_menu_new();
 639             gtk_table_attach(GTK_TABLE(table), w, 1, 2, y, y+1,
 640                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 641                              GTK_EXPAND | GTK_SHRINK | GTK_FILL,
 642                              3, 3);
 643             gtk_widget_show(w);
 644
 645             {
 646                 int c, val;
 647                 char *p, *q, *name;
 648                 GtkWidget *menuitem;
 649                 GtkWidget *menu = gtk_menu_new();
 650
 651                 gtk_option_menu_set_menu(GTK_OPTION_MENU(w), menu);
 652
 653                 c = *i->sval;
 654                 p = i->sval+1;
 655                 val = 0;
 656
 657                 while (*p) {
 658                     q = p;
 659                     while (*q && *q != c)
 660                         q++;
 661
 662                     name = snewn(q-p+1, char);
 663                     strncpy(name, p, q-p);
 664                     name[q-p] = '\0';
 665
 666                     if (*q) q++;       /* eat delimiter */
 667
 668                     menuitem = gtk_menu_item_new_with_label(name);
 669                     gtk_container_add(GTK_CONTAINER(menu), menuitem);
 670                     gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
 671                                         GINT_TO_POINTER(val));
 672                     gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
 673                                        GTK_SIGNAL_FUNC(droplist_sel), i);
 674                     gtk_widget_show(menuitem);
 675
 676                     val++;
 677
 678                     p = q;
 679                 }
 680
 681                 gtk_option_menu_set_history(GTK_OPTION_MENU(w), i->ival);
 682             }
 683
 684             break;
 685         }
 686
 687         y++;
 688     }
 689
 690     gtk_signal_connect(GTK_OBJECT(fe->cfgbox), "destroy",
 691                        GTK_SIGNAL_FUNC(window_destroy), NULL);
 692     gtk_signal_connect(GTK_OBJECT(fe->cfgbox), "key_press_event",
 693                        GTK_SIGNAL_FUNC(win_key_press), cancel);
 694     gtk_window_set_modal(GTK_WINDOW(fe->cfgbox), TRUE);
 695     gtk_window_set_transient_for(GTK_WINDOW(fe->cfgbox),
 696                                  GTK_WINDOW(fe->window));
 697     //set_transient_window_pos(fe->window, fe->cfgbox);
 698     gtk_widget_show(fe->cfgbox);
 699     gtk_main();
 700
 701     free_cfg(fe->cfg);
 702
 703     return fe->cfgret;
 704 }
 705
 706 static void menu_key_event(GtkMenuItem *menuitem, gpointer data)
 707 {
 708     frontend *fe = (frontend *)data;
 709     int key = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem),
 710                                                   "user-data"));
 711     if (!midend_process_key(fe->me, 0, 0, key))
 712         gtk_widget_destroy(fe->window);
 713 }
 714
 715 static void menu_preset_event(GtkMenuItem *menuitem, gpointer data)
 716 {
 717     frontend *fe = (frontend *)data;
 718     game_params *params =
 719         (game_params *)gtk_object_get_data(GTK_OBJECT(menuitem), "user-data");
 720     int x, y;
 721
 722     midend_set_params(fe->me, params);
 723     midend_new_game(fe->me);
 724     midend_size(fe->me, &x, &y);
 725     gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
 726     fe->w = x;
 727     fe->h = y;
 728 }
 729
 730 static void menu_config_event(GtkMenuItem *menuitem, gpointer data)
 731 {
 732     frontend *fe = (frontend *)data;
 733     int which = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(menuitem),
 734                                                     "user-data"));
 735     int x, y;
 736
 737     if (!get_config(fe, which))
 738         return;
 739
 740     midend_new_game(fe->me);
 741     midend_size(fe->me, &x, &y);
 742     gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
 743     fe->w = x;
 744     fe->h = y;
 745 }
 746
 747 static GtkWidget *add_menu_item_with_key(frontend *fe, GtkContainer *cont,
 748                                          char *text, int key)
 749 {
 750     GtkWidget *menuitem = gtk_menu_item_new_with_label(text);
 751     gtk_container_add(cont, menuitem);
 752     gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
 753                         GINT_TO_POINTER(key));
 754     gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
 755                        GTK_SIGNAL_FUNC(menu_key_event), fe);
 756     gtk_widget_show(menuitem);
 757     return menuitem;
 758 }
 759
 760 static void add_menu_separator(GtkContainer *cont)
 761 {
 762     GtkWidget *menuitem = gtk_menu_item_new();
 763     gtk_container_add(cont, menuitem);
 764     gtk_widget_show(menuitem);
 765 }
 766
 767 static frontend *new_window(char *game_id, char **error)
 768 {
 769     frontend *fe;
 770     GtkBox *vbox;
 771     GtkWidget *menubar, *menu, *menuitem;
 772     int x, y, n;
 773     time_t t;
 774
 775     fe = snew(frontend);
 776
 777     time(&t);
 778     fe->me = midend_new(fe, &t, sizeof(t));
 779     if (game_id) {
 780         *error = midend_game_id(fe->me, game_id, FALSE);
 781         if (*error) {
 782             midend_free(fe->me);
 783             sfree(fe);
 784             return NULL;
 785         }
 786     }
 787     midend_new_game(fe->me);
 788
 789     fe->window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
 790     gtk_window_set_title(GTK_WINDOW(fe->window), game_name);
 791 #if 0
 792     gtk_window_set_resizable(GTK_WINDOW(fe->window), FALSE);
 793 #else
 794     gtk_window_set_policy(GTK_WINDOW(fe->window), FALSE, FALSE, TRUE);
 795 #endif
 796     vbox = GTK_BOX(gtk_vbox_new(FALSE, 0));
 797     gtk_container_add(GTK_CONTAINER(fe->window), GTK_WIDGET(vbox));
 798     gtk_widget_show(GTK_WIDGET(vbox));
 799
 800     menubar = gtk_menu_bar_new();
 801     gtk_box_pack_start(vbox, menubar, FALSE, FALSE, 0);
 802     gtk_widget_show(menubar);
 803
 804     menuitem = gtk_menu_item_new_with_label("Game");
 805     gtk_container_add(GTK_CONTAINER(menubar), menuitem);
 806     gtk_widget_show(menuitem);
 807
 808     menu = gtk_menu_new();
 809     gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), menu);
 810
 811     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "New", 'n');
 812     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Restart", 'r');
 813
 814     menuitem = gtk_menu_item_new_with_label("Specific...");
 815     gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
 816                         GINT_TO_POINTER(CFG_SEED));
 817     gtk_container_add(GTK_CONTAINER(menu), menuitem);
 818     gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
 819                        GTK_SIGNAL_FUNC(menu_config_event), fe);
 820     gtk_widget_show(menuitem);
 821
 822     if ((n = midend_num_presets(fe->me)) > 0 || game_can_configure) {
 823         GtkWidget *submenu;
 824         int i;
 825
 826         menuitem = gtk_menu_item_new_with_label("Type");
 827         gtk_container_add(GTK_CONTAINER(menubar), menuitem);
 828         gtk_widget_show(menuitem);
 829
 830         submenu = gtk_menu_new();
 831         gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), submenu);
 832
 833         for (i = 0; i < n; i++) {
 834             char *name;
 835             game_params *params;
 836
 837             midend_fetch_preset(fe->me, i, &name, &params);
 838
 839             menuitem = gtk_menu_item_new_with_label(name);
 840             gtk_container_add(GTK_CONTAINER(submenu), menuitem);
 841             gtk_object_set_data(GTK_OBJECT(menuitem), "user-data", params);
 842             gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
 843                                GTK_SIGNAL_FUNC(menu_preset_event), fe);
 844             gtk_widget_show(menuitem);
 845         }
 846
 847         if (game_can_configure) {
 848             menuitem = gtk_menu_item_new_with_label("Custom...");
 849             gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
 850                                 GPOINTER_TO_INT(CFG_SETTINGS));
 851             gtk_container_add(GTK_CONTAINER(submenu), menuitem);
 852             gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
 853                                GTK_SIGNAL_FUNC(menu_config_event), fe);
 854             gtk_widget_show(menuitem);
 855         }
 856     }
 857
 858     add_menu_separator(GTK_CONTAINER(menu));
 859     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Undo", 'u');
 860     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Redo", '\x12');
 861     add_menu_separator(GTK_CONTAINER(menu));
 862     add_menu_item_with_key(fe, GTK_CONTAINER(menu), "Exit", 'q');
 863
 864     {
 865         int i, ncolours;
 866         float *colours;
 867         gboolean *success;
 868
 869         fe->colmap = gdk_colormap_get_system();
 870         colours = midend_colours(fe->me, &ncolours);
 871         fe->ncolours = ncolours;
 872         fe->colours = snewn(ncolours, GdkColor);
 873         for (i = 0; i < ncolours; i++) {
 874             fe->colours[i].red = colours[i*3] * 0xFFFF;
 875             fe->colours[i].green = colours[i*3+1] * 0xFFFF;
 876             fe->colours[i].blue = colours[i*3+2] * 0xFFFF;
 877         }
 878         success = snewn(ncolours, gboolean);
 879         gdk_colormap_alloc_colors(fe->colmap, fe->colours, ncolours,
 880                                   FALSE, FALSE, success);
 881         for (i = 0; i < ncolours; i++) {
 882             if (!success[i])
 883                 g_error("couldn't allocate colour %d (#%02x%02x%02x)\n",
 884                         i, fe->colours[i].red >> 8,
 885                         fe->colours[i].green >> 8,
 886                         fe->colours[i].blue >> 8);
 887         }
 888     }
 889
 890     if (midend_wants_statusbar(fe->me)) {
 891         GtkWidget *viewport;
 892         GtkRequisition req;
 893
 894         viewport = gtk_viewport_new(NULL, NULL);
 895         gtk_viewport_set_shadow_type(GTK_VIEWPORT(viewport), GTK_SHADOW_NONE);
 896         fe->statusbar = gtk_statusbar_new();
 897         gtk_container_add(GTK_CONTAINER(viewport), fe->statusbar);
 898         gtk_widget_show(viewport);
 899         gtk_box_pack_end(vbox, viewport, FALSE, FALSE, 0);
 900         gtk_widget_show(fe->statusbar);
 901         fe->statusctx = gtk_statusbar_get_context_id
 902             (GTK_STATUSBAR(fe->statusbar), "game");
 903         gtk_statusbar_push(GTK_STATUSBAR(fe->statusbar), fe->statusctx,
 904                            "test");
 905         gtk_widget_size_request(fe->statusbar, &req);
 906 #if 0
 907         /* For GTK 2.0, should we be using gtk_widget_set_size_request? */
 908 #endif
 909         gtk_widget_set_usize(viewport, -1, req.height);
 910     } else
 911         fe->statusbar = NULL;
 912
 913     fe->area = gtk_drawing_area_new();
 914     midend_size(fe->me, &x, &y);
 915     gtk_drawing_area_size(GTK_DRAWING_AREA(fe->area), x, y);
 916     fe->w = x;
 917     fe->h = y;
 918
 919     gtk_box_pack_end(vbox, fe->area, FALSE, FALSE, 0);
 920
 921     fe->pixmap = NULL;
 922     fe->fonts = NULL;
 923     fe->nfonts = fe->fontsize = 0;
 924
 925     fe->timer_active = FALSE;
 926
 927     gtk_signal_connect(GTK_OBJECT(fe->window), "destroy",
 928                        GTK_SIGNAL_FUNC(destroy), fe);
 929     gtk_signal_connect(GTK_OBJECT(fe->window), "key_press_event",
 930                        GTK_SIGNAL_FUNC(key_event), fe);
 931     gtk_signal_connect(GTK_OBJECT(fe->area), "button_press_event",
 932                        GTK_SIGNAL_FUNC(button_event), fe);
 933     gtk_signal_connect(GTK_OBJECT(fe->area), "button_release_event",
 934                        GTK_SIGNAL_FUNC(button_event), fe);
 935     gtk_signal_connect(GTK_OBJECT(fe->area), "motion_notify_event",
 936                        GTK_SIGNAL_FUNC(motion_event), fe);
 937     gtk_signal_connect(GTK_OBJECT(fe->area), "expose_event",
 938                        GTK_SIGNAL_FUNC(expose_area), fe);
 939     gtk_signal_connect(GTK_OBJECT(fe->window), "map_event",
 940                        GTK_SIGNAL_FUNC(map_window), fe);
 941     gtk_signal_connect(GTK_OBJECT(fe->area), "configure_event",
 942                        GTK_SIGNAL_FUNC(configure_area), fe);
 943
 944     gtk_widget_add_events(GTK_WIDGET(fe->area),
 945                           GDK_BUTTON_PRESS_MASK |
 946                           GDK_BUTTON_RELEASE_MASK |
 947                           GDK_BUTTON_MOTION_MASK);
 948
 949     gtk_widget_show(fe->area);
 950     gtk_widget_show(fe->window);
 951
 952     return fe;
 953 }
 954
 955 int main(int argc, char **argv)
 956 {
 957     char *pname = argv[0];
 958     char *error;
 959
 960     gtk_init(&argc, &argv);
 961
 962     if (!new_window(argc > 1 ? argv[1] : NULL, &error)) {
 963         fprintf(stderr, "%s: %s\n", pname, error);
 964         return 1;
 965     }
 966
 967     gtk_main();
 968
 969     return 0;
 970 }