]> asedeno.scripts.mit.edu Git - PuTTY.git/blobdiff - unix/gtkwin.c
New FAQ entry for 32-bit vs 64-bit.
[PuTTY.git] / unix / gtkwin.c
index f3a17d58434c2fdb1453fac5ea2ce95e794ce227..eca119eb76799476530cd471b8b105f380e49050 100644 (file)
 #include <sys/types.h>
 #include <sys/wait.h>
 #include <gtk/gtk.h>
+#if !GTK_CHECK_VERSION(3,0,0)
 #include <gdk/gdkkeysyms.h>
-#include <gdk/gdkx.h>
-#include <X11/Xlib.h>
-#include <X11/Xutil.h>
-#include <X11/Xatom.h>
+#endif
 
 #if GTK_CHECK_VERSION(2,0,0)
 #include <gtk/gtkimmodule.h>
 
 #include "putty.h"
 #include "terminal.h"
+#include "gtkcompat.h"
 #include "gtkfont.h"
+#include "gtkmisc.h"
 
-#define CAT2(x,y) x ## y
-#define CAT(x,y) CAT2(x,y)
-#define ASSERT(x) enum {CAT(assertion_,__LINE__) = 1 / (x)}
-
-#if GTK_CHECK_VERSION(2,0,0)
-ASSERT(sizeof(long) <= sizeof(gsize));
-#define LONG_TO_GPOINTER(l) GSIZE_TO_POINTER(l)
-#define GPOINTER_TO_LONG(p) GPOINTER_TO_SIZE(p)
-#else /* Gtk 1.2 */
-ASSERT(sizeof(long) <= sizeof(gpointer));
-#define LONG_TO_GPOINTER(l) ((gpointer)(long)(l))
-#define GPOINTER_TO_LONG(p) ((long)(p))
+#ifndef NOT_X_WINDOWS
+#include <gdk/gdkx.h>
+#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+#include <X11/Xatom.h>
 #endif
 
+#include "x11misc.h"
+
 /* Colours come in two flavours: configurable, and xterm-extended. */
 #define NEXTCOLOURS 240 /* 216 colour-cube plus 24 shades of grey */
 #define NALLCOLOURS (NCFGCOLOURS + NEXTCOLOURS)
 
 GdkAtom compound_text_atom, utf8_string_atom;
 
-extern char **pty_argv;               /* declared in pty.c */
-extern int use_pty_argv;
-
-/*
- * Timers are global across all sessions (even if we were handling
- * multiple sessions, which we aren't), so the current timer ID is
- * a global variable.
- */
-static guint timer_id = 0;
+struct clipboard_data_instance;
 
 struct gui_data {
     GtkWidget *window, *area, *sbar;
+    gboolean sbar_visible;
     GtkBox *hbox;
     GtkAdjustment *sbar_adjust;
     GtkWidget *menu, *specialsmenu, *specialsitem1, *specialsitem2,
        *restartitem;
     GtkWidget *sessionsmenu;
+#ifndef NO_BACKING_PIXMAPS
+    /*
+     * Server-side pixmap which we use to cache the terminal window's
+     * contents. When we draw text in the terminal, we draw it to this
+     * pixmap first, and then blit from there to the actual window;
+     * this way, X expose events can be handled with an absolute
+     * minimum of network traffic, by just sending a command to
+     * re-blit an appropriate rectangle from this pixmap.
+     */
     GdkPixmap *pixmap;
+#endif
+#ifdef DRAW_TEXT_CAIRO
+    /*
+     * If we're drawing using Cairo, we cache the same image on the
+     * client side in a Cairo surface.
+     *
+     * In GTK2+Cairo, this happens _as well_ as having the server-side
+     * pixmap cache above; in GTK3+Cairo, server-side pixmaps are
+     * deprecated, so we _just_ have this client-side cache. In the
+     * latter case that means we have to transmit a big wodge of
+     * bitmap data over the X connection on every expose event; but
+     * GTK3 apparently deliberately provides no way to avoid that
+     * inefficiency, and at least this way we don't _also_ have to
+     * redo any font rendering just because the window was temporarily
+     * covered.
+     */
+    cairo_surface_t *surface;
+#endif
 #if GTK_CHECK_VERSION(2,0,0)
     GtkIMContext *imc;
 #endif
@@ -82,19 +97,24 @@ struct gui_data {
     int xpos, ypos, gotpos, gravity;
     GdkCursor *rawcursor, *textcursor, *blankcursor, *waitcursor, *currcursor;
     GdkColor cols[NALLCOLOURS];
+#if !GTK_CHECK_VERSION(3,0,0)
     GdkColormap *colmap;
-    wchar_t *pastein_data;
+#endif
     int direct_to_font;
+    wchar_t *pastein_data;
     int pastein_data_len;
+#ifdef JUST_USE_GTK_CLIPBOARD_UTF8
+    GtkClipboard *clipboard;
+    struct clipboard_data_instance *current_cdi;
+#else
     char *pasteout_data, *pasteout_data_ctext, *pasteout_data_utf8;
     int pasteout_data_len, pasteout_data_ctext_len, pasteout_data_utf8_len;
+#endif
     int font_width, font_height;
     int width, height;
     int ignore_sbar;
     int mouseptr_visible;
     int busy_status;
-    guint toplevel_callback_idle_id;
-    int idle_fn_scheduled, quit_fn_scheduled;
     int alt_keycode;
     int alt_digits;
     char *wintitle;
@@ -109,14 +129,17 @@ struct gui_data {
     struct unicode_data ucsdata;
     Conf *conf;
     void *eventlogstuff;
-    char *progname, **gtkargvstart;
-    int ngtkargs;
     guint32 input_event_time; /* Timestamp of the most recent input event. */
     int reconfiguring;
+#if GTK_CHECK_VERSION(3,4,0)
+    gdouble cumulative_scroll;
+#endif
     /* Cached things out of conf that we refer to a lot */
     int bold_style;
     int window_border;
     int cursor_type;
+    int drawtype;
+    int meta_mod_mask;
 };
 
 static void cache_conf_values(struct gui_data *inst)
@@ -124,26 +147,28 @@ static void cache_conf_values(struct gui_data *inst)
     inst->bold_style = conf_get_int(inst->conf, CONF_bold_style);
     inst->window_border = conf_get_int(inst->conf, CONF_window_border);
     inst->cursor_type = conf_get_int(inst->conf, CONF_cursor_type);
+#ifdef OSX_META_KEY_CONFIG
+    inst->meta_mod_mask = 0;
+    if (conf_get_int(inst->conf, CONF_osx_option_meta))
+        inst->meta_mod_mask |= GDK_MOD1_MASK;
+    if (conf_get_int(inst->conf, CONF_osx_command_meta))
+        inst->meta_mod_mask |= GDK_MOD2_MASK;
+#else
+    inst->meta_mod_mask = GDK_MOD1_MASK;
+#endif
 }
 
 struct draw_ctx {
-    GdkGC *gc;
     struct gui_data *inst;
+    unifont_drawctx uctx;
 };
 
 static int send_raw_mouse;
 
-static char *app_name = "pterm";
-
 static void start_backend(struct gui_data *inst);
 static void exit_callback(void *vinst);
 
-char *x_get_default(const char *key)
-{
-    return XGetDefault(GDK_DISPLAY(), app_name, key);
-}
-
-void connection_fatal(void *frontend, char *p, ...)
+void connection_fatal(void *frontend, const char *p, ...)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
 
@@ -164,7 +189,7 @@ void connection_fatal(void *frontend, char *p, ...)
 FontSpec *platform_default_fontspec(const char *name)
 {
     if (!strcmp(name, "Font"))
-       return fontspec_new("server:fixed");
+       return fontspec_new(DEFAULT_GTK_FONT);
     else
         return fontspec_new("");
 }
@@ -221,7 +246,7 @@ int from_backend_eof(void *frontend)
     return TRUE;   /* do respond to incoming EOF with outgoing */
 }
 
-int get_userpass_input(prompts_t *p, unsigned char *in, int inlen)
+int get_userpass_input(prompts_t *p, const unsigned char *in, int inlen)
 {
     struct gui_data *inst = (struct gui_data *)p->frontend;
     int ret;
@@ -312,9 +337,11 @@ void move_window(void *frontend, int x, int y)
      * though.
      */
 #if GTK_CHECK_VERSION(2,0,0)
+    /* in case we reset this at startup due to a geometry string */
+    gtk_window_set_gravity(GTK_WINDOW(inst->window), GDK_GRAVITY_NORTH_EAST);
     gtk_window_move(GTK_WINDOW(inst->window), x, y);
 #else
-    gdk_window_move(inst->window->window, x, y);
+    gdk_window_move(gtk_widget_get_window(inst->window), x, y);
 #endif
 }
 
@@ -326,9 +353,9 @@ void set_zorder(void *frontend, int top)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
     if (top)
-       gdk_window_raise(inst->window->window);
+       gdk_window_raise(gtk_widget_get_window(inst->window));
     else
-       gdk_window_lower(inst->window->window);
+       gdk_window_lower(gtk_widget_get_window(inst->window));
 }
 
 /*
@@ -364,7 +391,7 @@ void set_zoomed(void *frontend, int zoomed)
 int is_iconic(void *frontend)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
-    return !gdk_window_is_viewable(inst->window->window);
+    return !gdk_window_is_viewable(gtk_widget_get_window(inst->window));
 }
 
 /*
@@ -381,7 +408,7 @@ void get_window_pos(void *frontend, int *x, int *y)
 #if GTK_CHECK_VERSION(2,0,0)
     gtk_window_get_position(GTK_WINDOW(inst->window), x, y);
 #else
-    gdk_window_get_position(inst->window->window, x, y);
+    gdk_window_get_position(gtk_widget_get_window(inst->window), x, y);
 #endif
 }
 
@@ -399,7 +426,7 @@ void get_window_pixels(void *frontend, int *x, int *y)
 #if GTK_CHECK_VERSION(2,0,0)
     gtk_window_get_size(GTK_WINDOW(inst->window), x, y);
 #else
-    gdk_window_get_size(inst->window->window, x, y);
+    gdk_window_get_size(gtk_widget_get_window(inst->window), x, y);
 #endif
 }
 
@@ -427,17 +454,21 @@ static void update_mouseptr(struct gui_data *inst)
     switch (inst->busy_status) {
       case BUSY_NOT:
        if (!inst->mouseptr_visible) {
-           gdk_window_set_cursor(inst->area->window, inst->blankcursor);
+           gdk_window_set_cursor(gtk_widget_get_window(inst->area),
+                                  inst->blankcursor);
        } else if (send_raw_mouse) {
-           gdk_window_set_cursor(inst->area->window, inst->rawcursor);
+           gdk_window_set_cursor(gtk_widget_get_window(inst->area),
+                                  inst->rawcursor);
        } else {
-           gdk_window_set_cursor(inst->area->window, inst->textcursor);
+           gdk_window_set_cursor(gtk_widget_get_window(inst->area),
+                                  inst->textcursor);
        }
        break;
       case BUSY_WAITING:    /* XXX can we do better? */
       case BUSY_CPU:
        /* We always display these cursors. */
-       gdk_window_set_cursor(inst->area->window, inst->waitcursor);
+       gdk_window_set_cursor(gtk_widget_get_window(inst->area),
+                              inst->waitcursor);
        break;
       default:
        assert(0);
@@ -452,15 +483,7 @@ static void show_mouseptr(struct gui_data *inst, int show)
     update_mouseptr(inst);
 }
 
-void draw_backing_rect(struct gui_data *inst)
-{
-    GdkGC *gc = gdk_gc_new(inst->area->window);
-    gdk_gc_set_foreground(gc, &inst->cols[258]);    /* default background */
-    gdk_draw_rectangle(inst->pixmap, gc, 1, 0, 0,
-                      inst->width * inst->font_width + 2*inst->window_border,
-                      inst->height * inst->font_height + 2*inst->window_border);
-    gdk_gc_unref(gc);
-}
+static void draw_backing_rect(struct gui_data *inst);
 
 gint configure_area(GtkWidget *widget, GdkEventConfigure *event, gpointer data)
 {
@@ -481,14 +504,30 @@ gint configure_area(GtkWidget *widget, GdkEventConfigure *event, gpointer data)
        need_size = 1;
     }
 
-    if (inst->pixmap) {
-       gdk_pixmap_unref(inst->pixmap);
-       inst->pixmap = NULL;
-    }
+    {
+        int backing_w = w * inst->font_width + 2*inst->window_border;
+        int backing_h = h * inst->font_height + 2*inst->window_border;
+
+#ifndef NO_BACKING_PIXMAPS
+        if (inst->pixmap) {
+            gdk_pixmap_unref(inst->pixmap);
+            inst->pixmap = NULL;
+        }
 
-    inst->pixmap = gdk_pixmap_new(widget->window,
-                                 (w * inst->font_width + 2*inst->window_border),
-                                 (h * inst->font_height + 2*inst->window_border), -1);
+        inst->pixmap = gdk_pixmap_new(gtk_widget_get_window(widget),
+                                      backing_w, backing_h, -1);
+#endif
+
+#ifdef DRAW_TEXT_CAIRO
+        if (inst->surface) {
+            cairo_surface_destroy(inst->surface);
+            inst->surface = NULL;
+        }
+
+        inst->surface = cairo_image_surface_create(CAIRO_FORMAT_RGB24,
+                                                   backing_w, backing_h);
+#endif
+    }
 
     draw_backing_rect(inst);
 
@@ -500,34 +539,107 @@ gint configure_area(GtkWidget *widget, GdkEventConfigure *event, gpointer data)
        term_invalidate(inst->term);
 
 #if GTK_CHECK_VERSION(2,0,0)
-    gtk_im_context_set_client_window(inst->imc, widget->window);
+    gtk_im_context_set_client_window(inst->imc, gtk_widget_get_window(widget));
 #endif
 
     return TRUE;
 }
 
+#ifdef DRAW_TEXT_CAIRO
+static void cairo_setup_dctx(struct draw_ctx *dctx)
+{
+    cairo_get_matrix(dctx->uctx.u.cairo.cr,
+                     &dctx->uctx.u.cairo.origmatrix);
+    cairo_set_line_width(dctx->uctx.u.cairo.cr, 1.0);
+    cairo_set_line_cap(dctx->uctx.u.cairo.cr, CAIRO_LINE_CAP_SQUARE);
+    cairo_set_line_join(dctx->uctx.u.cairo.cr, CAIRO_LINE_JOIN_MITER);
+    /* This antialiasing setting appears to be ignored for Pango
+     * font rendering but honoured for stroking and filling paths;
+     * I don't quite understand the logic of that, but I won't
+     * complain since it's exactly what I happen to want */
+    cairo_set_antialias(dctx->uctx.u.cairo.cr, CAIRO_ANTIALIAS_NONE);
+}
+#endif
+
+#if GTK_CHECK_VERSION(3,0,0)
+static gint draw_area(GtkWidget *widget, cairo_t *cr, gpointer data)
+{
+    struct gui_data *inst = (struct gui_data *)data;
+
+    /*
+     * GTK3 window redraw: we always expect Cairo to be enabled, so
+     * that inst->surface exists, and pixmaps to be disabled, so that
+     * inst->pixmap does not exist. Hence, we just blit from
+     * inst->surface to the window.
+     */
+    if (inst->surface) {
+        GdkRectangle dirtyrect;
+
+        gdk_cairo_get_clip_rectangle(cr, &dirtyrect);
+
+        cairo_set_source_surface(cr, inst->surface, 0, 0);
+        cairo_rectangle(cr, dirtyrect.x, dirtyrect.y,
+                        dirtyrect.width, dirtyrect.height);
+        cairo_fill(cr);
+    }
+
+    return TRUE;
+}
+#else
 gint expose_area(GtkWidget *widget, GdkEventExpose *event, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
 
+#ifndef NO_BACKING_PIXMAPS
     /*
-     * Pass the exposed rectangle to terminal.c, which will call us
-     * back to do the actual painting.
+     * Draw to the exposed part of the window from the server-side
+     * backing pixmap.
      */
     if (inst->pixmap) {
-       gdk_draw_pixmap(widget->window,
-                       widget->style->fg_gc[GTK_WIDGET_STATE(widget)],
+       gdk_draw_pixmap(gtk_widget_get_window(widget),
+                       (gtk_widget_get_style(widget)->fg_gc
+                         [gtk_widget_get_state(widget)]),
                        inst->pixmap,
                        event->area.x, event->area.y,
                        event->area.x, event->area.y,
                        event->area.width, event->area.height);
     }
+#else
+    /*
+     * Failing that, draw from the client-side Cairo surface. (We
+     * should never be compiled in a context where we have _neither_
+     * inst->surface nor inst->pixmap.)
+     */
+    if (inst->surface) {
+        cairo_t *cr = gdk_cairo_create(gtk_widget_get_window(widget));
+        cairo_set_source_surface(cr, inst->surface, 0, 0);
+        cairo_rectangle(cr, event->area.x, event->area.y,
+                       event->area.width, event->area.height);
+        cairo_fill(cr);
+        cairo_destroy(cr);
+    }
+#endif
+
     return TRUE;
 }
+#endif
 
 #define KEY_PRESSED(k) \
     (inst->keystate[(k) / 32] & (1 << ((k) % 32)))
 
+#ifdef KEY_EVENT_DIAGNOSTICS
+char *dup_keyval_name(guint keyval)
+{
+    const char *name = gdk_keyval_name(keyval);
+    if (name)
+        return dupstr(name);
+    else
+        return dupprintf("UNKNOWN[%u]", (unsigned)keyval);
+}
+#endif
+
+static void change_font_size(struct gui_data *inst, int increment);
+
 gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
@@ -544,6 +656,85 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
     special = use_ucsoutput = FALSE;
     output_charset = CS_ISO8859_1;
 
+#ifdef KEY_EVENT_DIAGNOSTICS
+    {
+        char *type_string, *state_string, *keyval_string, *string_string;
+
+        type_string = (event->type == GDK_KEY_PRESS ? dupstr("PRESS") :
+                       event->type == GDK_KEY_RELEASE ? dupstr("RELEASE") :
+                       dupprintf("UNKNOWN[%d]", (int)event->type));
+
+        {
+            static const struct {
+                int mod_bit;
+                const char *name;
+            } mod_bits[] = {
+                {GDK_SHIFT_MASK, "SHIFT"},
+                {GDK_LOCK_MASK, "LOCK"},
+                {GDK_CONTROL_MASK, "CONTROL"},
+                {GDK_MOD1_MASK, "MOD1"},
+                {GDK_MOD2_MASK, "MOD2"},
+                {GDK_MOD3_MASK, "MOD3"},
+                {GDK_MOD4_MASK, "MOD4"},
+                {GDK_MOD5_MASK, "MOD5"},
+                {GDK_SUPER_MASK, "SUPER"},
+                {GDK_HYPER_MASK, "HYPER"},
+                {GDK_META_MASK, "META"},
+            };
+            int i;
+            int val = event->state;
+
+            state_string = dupstr("");
+
+            for (i = 0; i < lenof(mod_bits); i++) {
+                if (val & mod_bits[i].mod_bit) {
+                    char *old = state_string;
+                    state_string = dupcat(state_string,
+                                          state_string[0] ? "|" : "",
+                                          mod_bits[i].name,
+                                          (char *)NULL);
+                    sfree(old);
+
+                    val &= ~mod_bits[i].mod_bit;
+                }
+            }
+
+            if (val || !state_string[0]) {
+                char *old = state_string;
+                state_string = dupprintf("%s%s%d", state_string,
+                                         state_string[0] ? "|" : "", val);
+                sfree(old);
+            }
+        }
+
+        keyval_string = dup_keyval_name(event->keyval);
+
+        string_string = dupstr("");
+        {
+            int i;
+            for (i = 0; event->string[i]; i++) {
+                char *old = string_string;
+                string_string = dupprintf("%s%s%02x", string_string,
+                                          string_string[0] ? " " : "",
+                                          (unsigned)event->string[i] & 0xFF);
+                sfree(old);
+            }
+        }
+
+        debug(("key_event: type=%s keyval=%s state=%s "
+               "hardware_keycode=%d is_modifier=%s string=[%s]\n",
+               type_string, keyval_string, state_string,
+               (int)event->hardware_keycode,
+               event->is_modifier ? "TRUE" : "FALSE",
+               string_string));
+
+        sfree(type_string);
+        sfree(state_string);
+        sfree(keyval_string);
+        sfree(string_string);
+    }
+#endif /* KEY_EVENT_DIAGNOSTICS */
+
     /*
      * If Alt is being released after typing an Alt+numberpad
      * sequence, we should generate the code that was typed.
@@ -555,11 +746,14 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
      * character code.
      */
     if (event->type == GDK_KEY_RELEASE) {
-        if ((event->keyval == GDK_Meta_L || event->keyval == GDK_Alt_L ||
-             event->keyval == GDK_Meta_R || event->keyval == GDK_Alt_R) &&
+        if ((event->keyval == GDK_KEY_Meta_L ||
+             event->keyval == GDK_KEY_Meta_R ||
+             event->keyval == GDK_KEY_Alt_L ||
+             event->keyval == GDK_KEY_Alt_R) &&
             inst->alt_keycode >= 0 && inst->alt_digits > 1) {
-#ifdef KEY_DEBUGGING
-            printf("Alt key up, keycode = %d\n", inst->alt_keycode);
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - modifier release terminates Alt+numberpad input, "
+                   "keycode = %d\n", inst->alt_keycode));
 #endif
             /*
              * FIXME: we might usefully try to do something clever here
@@ -571,96 +765,131 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
             goto done;
         }
 #if GTK_CHECK_VERSION(2,0,0)
-        if (gtk_im_context_filter_keypress(inst->imc, event))
+#ifdef KEY_EVENT_DIAGNOSTICS
+        debug((" - key release, passing to IM\n"));
+#endif
+        if (gtk_im_context_filter_keypress(inst->imc, event)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - key release accepted by IM\n"));
+#endif
             return TRUE;
+        } else {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - key release not accepted by IM\n"));
+#endif
+        }
 #endif
     }
 
     if (event->type == GDK_KEY_PRESS) {
-#ifdef KEY_DEBUGGING
-       {
-           int i;
-           printf("keypress: keyval = %04x, state = %08x; string =",
-                  event->keyval, event->state);
-           for (i = 0; event->string[i]; i++)
-               printf(" %02x", (unsigned char) event->string[i]);
-           printf("\n");
-       }
-#endif
-
-       /*
-        * NYI: Compose key (!!! requires Unicode faff before even trying)
-        */
-
        /*
         * If Alt has just been pressed, we start potentially
         * accumulating an Alt+numberpad code. We do this by
         * setting alt_keycode to -1 (nothing yet but plausible).
         */
-       if ((event->keyval == GDK_Meta_L || event->keyval == GDK_Alt_L ||
-            event->keyval == GDK_Meta_R || event->keyval == GDK_Alt_R)) {
+       if ((event->keyval == GDK_KEY_Meta_L ||
+            event->keyval == GDK_KEY_Meta_R ||
+             event->keyval == GDK_KEY_Alt_L ||
+             event->keyval == GDK_KEY_Alt_R)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - modifier press potentially begins Alt+numberpad "
+                   "input\n"));
+#endif
            inst->alt_keycode = -1;
             inst->alt_digits = 0;
            goto done;                 /* this generates nothing else */
        }
 
        /*
-        * If we're seeing a numberpad key press with Mod1 down,
+        * If we're seeing a numberpad key press with Meta down,
         * consider adding it to alt_keycode if that's sensible.
-        * Anything _else_ with Mod1 down cancels any possibility
+        * Anything _else_ with Meta down cancels any possibility
         * of an ALT keycode: we set alt_keycode to -2.
         */
-       if ((event->state & GDK_MOD1_MASK) && inst->alt_keycode != -2) {
+       if ((event->state & inst->meta_mod_mask) && inst->alt_keycode != -2) {
            int digit = -1;
            switch (event->keyval) {
-             case GDK_KP_0: case GDK_KP_Insert: digit = 0; break;
-             case GDK_KP_1: case GDK_KP_End: digit = 1; break;
-             case GDK_KP_2: case GDK_KP_Down: digit = 2; break;
-             case GDK_KP_3: case GDK_KP_Page_Down: digit = 3; break;
-             case GDK_KP_4: case GDK_KP_Left: digit = 4; break;
-             case GDK_KP_5: case GDK_KP_Begin: digit = 5; break;
-             case GDK_KP_6: case GDK_KP_Right: digit = 6; break;
-             case GDK_KP_7: case GDK_KP_Home: digit = 7; break;
-             case GDK_KP_8: case GDK_KP_Up: digit = 8; break;
-             case GDK_KP_9: case GDK_KP_Page_Up: digit = 9; break;
+             case GDK_KEY_KP_0: case GDK_KEY_KP_Insert: digit = 0; break;
+             case GDK_KEY_KP_1: case GDK_KEY_KP_End: digit = 1; break;
+             case GDK_KEY_KP_2: case GDK_KEY_KP_Down: digit = 2; break;
+             case GDK_KEY_KP_3: case GDK_KEY_KP_Page_Down: digit = 3; break;
+             case GDK_KEY_KP_4: case GDK_KEY_KP_Left: digit = 4; break;
+             case GDK_KEY_KP_5: case GDK_KEY_KP_Begin: digit = 5; break;
+             case GDK_KEY_KP_6: case GDK_KEY_KP_Right: digit = 6; break;
+             case GDK_KEY_KP_7: case GDK_KEY_KP_Home: digit = 7; break;
+             case GDK_KEY_KP_8: case GDK_KEY_KP_Up: digit = 8; break;
+             case GDK_KEY_KP_9: case GDK_KEY_KP_Page_Up: digit = 9; break;
            }
            if (digit < 0)
                inst->alt_keycode = -2;   /* it's invalid */
            else {
-#ifdef KEY_DEBUGGING
-               printf("Adding digit %d to keycode %d", digit,
-                      inst->alt_keycode);
+#ifdef KEY_EVENT_DIAGNOSTICS
+                int old_keycode = inst->alt_keycode;
 #endif
                if (inst->alt_keycode == -1)
                    inst->alt_keycode = digit;   /* one-digit code */
                else
                    inst->alt_keycode = inst->alt_keycode * 10 + digit;
                 inst->alt_digits++;
-#ifdef KEY_DEBUGGING
-               printf(" gives new code %d\n", inst->alt_keycode);
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - Alt+numberpad digit %d added to keycode %d"
+                       " gives %d\n", digit, old_keycode, inst->alt_keycode));
 #endif
                /* Having used this digit, we now do nothing more with it. */
                goto done;
            }
        }
 
+        if (event->keyval == GDK_KEY_greater &&
+            (event->state & GDK_CONTROL_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Ctrl->: increase font size\n"));
+#endif
+            change_font_size(inst, +1);
+            return TRUE;
+        }
+        if (event->keyval == GDK_KEY_less &&
+            (event->state & GDK_CONTROL_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Ctrl-<: increase font size\n"));
+#endif
+            change_font_size(inst, -1);
+            return TRUE;
+        }
+
        /*
         * Shift-PgUp and Shift-PgDn don't even generate keystrokes
         * at all.
         */
-       if (event->keyval == GDK_Page_Up && (event->state & GDK_SHIFT_MASK)) {
+       if (event->keyval == GDK_KEY_Page_Up &&
+            (event->state & GDK_SHIFT_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Shift-PgUp scroll\n"));
+#endif
            term_scroll(inst->term, 0, -inst->height/2);
            return TRUE;
        }
-       if (event->keyval == GDK_Page_Up && (event->state & GDK_CONTROL_MASK)) {
+       if (event->keyval == GDK_KEY_Page_Up &&
+            (event->state & GDK_CONTROL_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Ctrl-PgUp scroll\n"));
+#endif
            term_scroll(inst->term, 0, -1);
            return TRUE;
        }
-       if (event->keyval == GDK_Page_Down && (event->state & GDK_SHIFT_MASK)) {
+       if (event->keyval == GDK_KEY_Page_Down &&
+            (event->state & GDK_SHIFT_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Shift-PgDn scroll\n"));
+#endif
            term_scroll(inst->term, 0, +inst->height/2);
            return TRUE;
        }
-       if (event->keyval == GDK_Page_Down && (event->state & GDK_CONTROL_MASK)) {
+       if (event->keyval == GDK_KEY_Page_Down &&
+            (event->state & GDK_CONTROL_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Ctrl-PgDn scroll\n"));
+#endif
            term_scroll(inst->term, 0, +1);
            return TRUE;
        }
@@ -668,7 +897,11 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
        /*
         * Neither does Shift-Ins.
         */
-       if (event->keyval == GDK_Insert && (event->state & GDK_SHIFT_MASK)) {
+       if (event->keyval == GDK_KEY_Insert &&
+            (event->state & GDK_SHIFT_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Shift-Insert paste\n"));
+#endif
            request_paste(inst);
            return TRUE;
        }
@@ -692,7 +925,7 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
         */
        output_charset = CS_ISO8859_1;
        strncpy(output+1, event->string, lenof(output)-1);
-#else
+#else /* !GTK_CHECK_VERSION(2,0,0) */
         /*
          * Most things can now be passed to
          * gtk_im_context_filter_keypress without breaking anything
@@ -702,58 +935,90 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
          * it to.
          */
        if (app_keypad_mode &&
-            (event->keyval == GDK_Num_Lock ||
-             event->keyval == GDK_KP_Divide ||
-             event->keyval == GDK_KP_Multiply ||
-             event->keyval == GDK_KP_Subtract ||
-             event->keyval == GDK_KP_Add ||
-             event->keyval == GDK_KP_Enter ||
-             event->keyval == GDK_KP_0 ||
-             event->keyval == GDK_KP_Insert ||
-             event->keyval == GDK_KP_1 ||
-             event->keyval == GDK_KP_End ||
-             event->keyval == GDK_KP_2 ||
-             event->keyval == GDK_KP_Down ||
-             event->keyval == GDK_KP_3 ||
-             event->keyval == GDK_KP_Page_Down ||
-             event->keyval == GDK_KP_4 ||
-             event->keyval == GDK_KP_Left ||
-             event->keyval == GDK_KP_5 ||
-             event->keyval == GDK_KP_Begin ||
-             event->keyval == GDK_KP_6 ||
-             event->keyval == GDK_KP_Right ||
-             event->keyval == GDK_KP_7 ||
-             event->keyval == GDK_KP_Home ||
-             event->keyval == GDK_KP_8 ||
-             event->keyval == GDK_KP_Up ||
-             event->keyval == GDK_KP_9 ||
-             event->keyval == GDK_KP_Page_Up ||
-             event->keyval == GDK_KP_Decimal ||
-             event->keyval == GDK_KP_Delete)) {
+            (event->keyval == GDK_KEY_Num_Lock ||
+             event->keyval == GDK_KEY_KP_Divide ||
+             event->keyval == GDK_KEY_KP_Multiply ||
+             event->keyval == GDK_KEY_KP_Subtract ||
+             event->keyval == GDK_KEY_KP_Add ||
+             event->keyval == GDK_KEY_KP_Enter ||
+             event->keyval == GDK_KEY_KP_0 ||
+             event->keyval == GDK_KEY_KP_Insert ||
+             event->keyval == GDK_KEY_KP_1 ||
+             event->keyval == GDK_KEY_KP_End ||
+             event->keyval == GDK_KEY_KP_2 ||
+             event->keyval == GDK_KEY_KP_Down ||
+             event->keyval == GDK_KEY_KP_3 ||
+             event->keyval == GDK_KEY_KP_Page_Down ||
+             event->keyval == GDK_KEY_KP_4 ||
+             event->keyval == GDK_KEY_KP_Left ||
+             event->keyval == GDK_KEY_KP_5 ||
+             event->keyval == GDK_KEY_KP_Begin ||
+             event->keyval == GDK_KEY_KP_6 ||
+             event->keyval == GDK_KEY_KP_Right ||
+             event->keyval == GDK_KEY_KP_7 ||
+             event->keyval == GDK_KEY_KP_Home ||
+             event->keyval == GDK_KEY_KP_8 ||
+             event->keyval == GDK_KEY_KP_Up ||
+             event->keyval == GDK_KEY_KP_9 ||
+             event->keyval == GDK_KEY_KP_Page_Up ||
+             event->keyval == GDK_KEY_KP_Decimal ||
+             event->keyval == GDK_KEY_KP_Delete)) {
             /* app keypad; do nothing */
         } else if (nethack_mode &&
-                   (event->keyval == GDK_KP_1 ||
-                    event->keyval == GDK_KP_End ||
-                    event->keyval == GDK_KP_2 ||
-                    event->keyval == GDK_KP_Down ||
-                    event->keyval == GDK_KP_3 ||
-                    event->keyval == GDK_KP_Page_Down ||
-                    event->keyval == GDK_KP_4 ||
-                    event->keyval == GDK_KP_Left ||
-                    event->keyval == GDK_KP_5 ||
-                    event->keyval == GDK_KP_Begin ||
-                    event->keyval == GDK_KP_6 ||
-                    event->keyval == GDK_KP_Right ||
-                    event->keyval == GDK_KP_7 ||
-                    event->keyval == GDK_KP_Home ||
-                    event->keyval == GDK_KP_8 ||
-                    event->keyval == GDK_KP_Up ||
-                    event->keyval == GDK_KP_9 ||
-                    event->keyval == GDK_KP_Page_Up)) {
+                   (event->keyval == GDK_KEY_KP_1 ||
+                    event->keyval == GDK_KEY_KP_End ||
+                    event->keyval == GDK_KEY_KP_2 ||
+                    event->keyval == GDK_KEY_KP_Down ||
+                    event->keyval == GDK_KEY_KP_3 ||
+                    event->keyval == GDK_KEY_KP_Page_Down ||
+                    event->keyval == GDK_KEY_KP_4 ||
+                    event->keyval == GDK_KEY_KP_Left ||
+                    event->keyval == GDK_KEY_KP_5 ||
+                    event->keyval == GDK_KEY_KP_Begin ||
+                    event->keyval == GDK_KEY_KP_6 ||
+                    event->keyval == GDK_KEY_KP_Right ||
+                    event->keyval == GDK_KEY_KP_7 ||
+                    event->keyval == GDK_KEY_KP_Home ||
+                    event->keyval == GDK_KEY_KP_8 ||
+                    event->keyval == GDK_KEY_KP_Up ||
+                    event->keyval == GDK_KEY_KP_9 ||
+                    event->keyval == GDK_KEY_KP_Page_Up)) {
             /* nethack mode; do nothing */
         } else {
-            if (gtk_im_context_filter_keypress(inst->imc, event))
-                return TRUE;
+            int try_filter = TRUE;
+
+#ifdef META_MANUAL_MASK
+            if (event->state & META_MANUAL_MASK & inst->meta_mod_mask) {
+                /*
+                 * If this key event had a Meta modifier bit set which
+                 * is also in META_MANUAL_MASK, that means passing
+                 * such an event to the GtkIMContext will be unhelpful
+                 * (it will eat the keystroke and turn it into
+                 * something not what we wanted).
+                 */
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - Meta modifier requiring manual intervention, "
+                       "suppressing IM filtering\n"));
+#endif
+                try_filter = FALSE;
+            }
+#endif
+
+            if (try_filter) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - general key press, passing to IM\n"));
+#endif
+                if (gtk_im_context_filter_keypress(inst->imc, event)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                    debug((" - key press accepted by IM\n"));
+#endif
+                    return TRUE;
+                } else {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                    debug((" - key press not accepted by IM\n"));
+#endif
+                }
+            }
         }
 
        /*
@@ -779,40 +1044,162 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
                            event->string, strlen(event->string),
                            widedata, lenof(widedata)-1);
 
+#ifdef KEY_EVENT_DIAGNOSTICS
+            {
+                char *string_string = dupstr("");
+                int i;
+
+                for (i = 0; i < wlen; i++) {
+                    char *old = string_string;
+                    string_string = dupprintf("%s%s%04x", string_string,
+                                              string_string[0] ? " " : "",
+                                              (unsigned)widedata[i]);
+                    sfree(old);
+                }
+                debug((" - string translated into Unicode = [%s]\n",
+                       string_string));
+                sfree(string_string);
+            }
+#endif
+
            wp = widedata;
            ulen = charset_from_unicode(&wp, &wlen, output+1, lenof(output)-2,
                                        CS_UTF8, NULL, NULL, 0);
+
+#ifdef KEY_EVENT_DIAGNOSTICS
+            {
+                char *string_string = dupstr("");
+                int i;
+
+                for (i = 0; i < ulen; i++) {
+                    char *old = string_string;
+                    string_string = dupprintf("%s%s%02x", string_string,
+                                              string_string[0] ? " " : "",
+                                              (unsigned)output[i+1] & 0xFF);
+                    sfree(old);
+                }
+                debug((" - string translated into UTF-8 = [%s]\n",
+                       string_string));
+                sfree(string_string);
+            }
+#endif
+
            output[1+ulen] = '\0';
        }
-#endif
+#endif /* !GTK_CHECK_VERSION(2,0,0) */
 
        if (!output[1] &&
            (ucsval = keysym_to_unicode(event->keyval)) >= 0) {
            ucsoutput[0] = '\033';
            ucsoutput[1] = ucsval;
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - keysym_to_unicode gave %04x\n",
+                   (unsigned)ucsoutput[1]));
+#endif
            use_ucsoutput = TRUE;
            end = 2;
        } else {
            output[lenof(output)-1] = '\0';
            end = strlen(output);
        }
-       if (event->state & GDK_MOD1_MASK) {
+       if (event->state & inst->meta_mod_mask) {
            start = 0;
            if (end == 1) end = 0;
+
+#ifdef META_MANUAL_MASK
+            if (event->state & META_MANUAL_MASK) {
+                /*
+                 * Key events which have a META_MANUAL_MASK meta bit
+                 * set may have a keyval reflecting that, e.g. on OS X
+                 * the Option key acts as an AltGr-like modifier and
+                 * causes different Unicode characters to be output.
+                 *
+                 * To work around this, we clear the dangerous
+                 * modifier bit and retranslate from the hardware
+                 * keycode as if the key had been pressed without that
+                 * modifier. Then we prefix Esc to *that*.
+                 */
+                guint new_keyval;
+                GdkModifierType consumed;
+                if (gdk_keymap_translate_keyboard_state
+                    (gdk_keymap_get_for_display(gdk_display_get_default()),
+                     event->hardware_keycode, event->state & ~META_MANUAL_MASK,
+                     0, &new_keyval, NULL, NULL, &consumed)) {
+                    ucsoutput[0] = '\033';
+                    ucsoutput[1] = gdk_keyval_to_unicode(new_keyval);
+#ifdef KEY_EVENT_DIAGNOSTICS
+                    {
+                        char *keyval_name = dup_keyval_name(new_keyval);
+                        debug((" - retranslation for manual Meta: "
+                               "new keyval = %s, Unicode = %04x\n",
+                               keyval_name, (unsigned)ucsoutput[1]));
+                        sfree(keyval_name);
+                    }
+#endif
+                    use_ucsoutput = TRUE;
+                    end = 2;
+                }
+            }
+#endif
        } else
            start = 1;
 
        /* Control-` is the same as Control-\ (unless gtk has a better idea) */
        if (!output[1] && event->keyval == '`' &&
            (event->state & GDK_CONTROL_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Ctrl-` special case, translating as 1c\n"));
+#endif
            output[1] = '\x1C';
            use_ucsoutput = FALSE;
            end = 2;
        }
 
+        /* Some GTK backends (e.g. Quartz) do not change event->string
+         * in response to the Control modifier. So we do it ourselves
+         * here, if it's not already happened.
+         *
+         * The translations below are in line with X11 policy as far
+         * as I know. */
+        if ((event->state & GDK_CONTROL_MASK) && end == 2) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            int orig = output[1];
+#endif
+
+            if (output[1] >= '3' && output[1] <= '7') {
+                /* ^3,...,^7 map to 0x1B,...,0x1F */
+                output[1] += '\x1B' - '3';
+            } else if (output[1] == '2' || output[1] == ' ') {
+                /* ^2 and ^Space are both ^@, i.e. \0 */
+                output[1] = '\0';
+            } else if (output[1] == '8') {
+                /* ^8 is DEL */
+                output[1] = '\x7F';
+            } else if (output[1] == '/') {
+                /* ^/ is the same as ^_ */
+                output[1] = '\x1F';
+            } else if (output[1] >= 0x40 && output[1] < 0x7F) {
+                /* Everything anywhere near the alphabetics just gets
+                 * masked. */
+                output[1] &= 0x1F;
+            }
+            /* Anything else, e.g. '0', is unchanged. */
+
+#ifdef KEY_EVENT_DIAGNOSTICS
+            if (orig == output[1])
+                debug((" - manual Ctrl key handling did nothing\n"));
+            else
+                debug((" - manual Ctrl key handling: %02x -> %02x\n",
+                       (unsigned)orig, (unsigned)output[1]));
+#endif
+        }
+
        /* Control-Break sends a Break special to the backend */
-       if (event->keyval == GDK_Break &&
+       if (event->keyval == GDK_KEY_Break &&
            (event->state & GDK_CONTROL_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Ctrl-Break special case, sending TS_BRK\n"));
+#endif
            if (inst->back)
                inst->back->special(inst->backhandle, TS_BRK);
            return TRUE;
@@ -820,7 +1207,10 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
 
        /* We handle Return ourselves, because it needs to be flagged as
         * special to ldisc. */
-       if (event->keyval == GDK_Return) {
+       if (event->keyval == GDK_KEY_Return) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Return special case, translating as 0d + special\n"));
+#endif
            output[1] = '\015';
            use_ucsoutput = FALSE;
            end = 2;
@@ -833,6 +1223,9 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
             event->keyval == '@') &&
            (event->state & (GDK_SHIFT_MASK |
                             GDK_CONTROL_MASK)) == GDK_CONTROL_MASK) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Ctrl-{space,2,@} special case, translating as 00\n"));
+#endif
            output[1] = '\0';
            use_ucsoutput = FALSE;
            end = 2;
@@ -842,6 +1235,9 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
        if (!output[1] && event->keyval == ' ' &&
            (event->state & (GDK_SHIFT_MASK | GDK_CONTROL_MASK)) ==
            (GDK_SHIFT_MASK | GDK_CONTROL_MASK)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Ctrl-Shift-space special case, translating as 00a0\n"));
+#endif
            output[1] = '\240';
            output_charset = CS_ISO8859_1;
            use_ucsoutput = FALSE;
@@ -849,34 +1245,49 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
        }
 
        /* We don't let GTK tell us what Backspace is! We know better. */
-       if (event->keyval == GDK_BackSpace &&
+       if (event->keyval == GDK_KEY_BackSpace &&
            !(event->state & GDK_SHIFT_MASK)) {
            output[1] = conf_get_int(inst->conf, CONF_bksp_is_delete) ?
                '\x7F' : '\x08';
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Backspace, translating as %02x\n",
+                   (unsigned)output[1]));
+#endif
            use_ucsoutput = FALSE;
            end = 2;
            special = TRUE;
        }
        /* For Shift Backspace, do opposite of what is configured. */
-       if (event->keyval == GDK_BackSpace &&
+       if (event->keyval == GDK_KEY_BackSpace &&
            (event->state & GDK_SHIFT_MASK)) {
            output[1] = conf_get_int(inst->conf, CONF_bksp_is_delete) ?
                '\x08' : '\x7F';
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Shift-Backspace, translating as %02x\n",
+                   (unsigned)output[1]));
+#endif
            use_ucsoutput = FALSE;
            end = 2;
            special = TRUE;
        }
 
        /* Shift-Tab is ESC [ Z */
-       if (event->keyval == GDK_ISO_Left_Tab ||
-           (event->keyval == GDK_Tab && (event->state & GDK_SHIFT_MASK))) {
+       if (event->keyval == GDK_KEY_ISO_Left_Tab ||
+           (event->keyval == GDK_KEY_Tab &&
+             (event->state & GDK_SHIFT_MASK))) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Shift-Tab, translating as ESC [ Z\n"));
+#endif
            end = 1 + sprintf(output+1, "\033[Z");
            use_ucsoutput = FALSE;
        }
        /* And normal Tab is Tab, if the keymap hasn't already told us.
         * (Curiously, at least one version of the MacOS 10.5 X server
         * doesn't translate Tab for us. */
-       if (event->keyval == GDK_Tab && end <= 1) {
+       if (event->keyval == GDK_KEY_Tab && end <= 1) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            debug((" - Tab, translating as 09\n"));
+#endif
            output[1] = '\t';
            end = 2;
        }
@@ -885,17 +1296,26 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
         * NetHack keypad mode.
         */
        if (nethack_mode) {
-           char *keys = NULL;
+           const char *keys = NULL;
            switch (event->keyval) {
-             case GDK_KP_1: case GDK_KP_End: keys = "bB\002"; break;
-             case GDK_KP_2: case GDK_KP_Down: keys = "jJ\012"; break;
-             case GDK_KP_3: case GDK_KP_Page_Down: keys = "nN\016"; break;
-             case GDK_KP_4: case GDK_KP_Left: keys = "hH\010"; break;
-             case GDK_KP_5: case GDK_KP_Begin: keys = "..."; break;
-             case GDK_KP_6: case GDK_KP_Right: keys = "lL\014"; break;
-             case GDK_KP_7: case GDK_KP_Home: keys = "yY\031"; break;
-             case GDK_KP_8: case GDK_KP_Up: keys = "kK\013"; break;
-             case GDK_KP_9: case GDK_KP_Page_Up: keys = "uU\025"; break;
+             case GDK_KEY_KP_1: case GDK_KEY_KP_End:
+                keys = "bB\002"; break;
+             case GDK_KEY_KP_2: case GDK_KEY_KP_Down:
+                keys = "jJ\012"; break;
+             case GDK_KEY_KP_3: case GDK_KEY_KP_Page_Down:
+                keys = "nN\016"; break;
+             case GDK_KEY_KP_4: case GDK_KEY_KP_Left:
+                keys = "hH\010"; break;
+             case GDK_KEY_KP_5: case GDK_KEY_KP_Begin:
+                keys = "..."; break;
+             case GDK_KEY_KP_6: case GDK_KEY_KP_Right:
+                keys = "lL\014"; break;
+             case GDK_KEY_KP_7: case GDK_KEY_KP_Home:
+                keys = "yY\031"; break;
+             case GDK_KEY_KP_8: case GDK_KEY_KP_Up:
+                keys = "kK\013"; break;
+             case GDK_KEY_KP_9: case GDK_KEY_KP_Page_Up:
+                keys = "uU\025"; break;
            }
            if (keys) {
                end = 2;
@@ -905,6 +1325,9 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
                    output[1] = keys[1];
                else
                    output[1] = keys[0];
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - Nethack-mode key"));
+#endif
                use_ucsoutput = FALSE;
                goto done;
            }
@@ -916,17 +1339,17 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
        if (app_keypad_mode) {
            int xkey = 0;
            switch (event->keyval) {
-             case GDK_Num_Lock: xkey = 'P'; break;
-             case GDK_KP_Divide: xkey = 'Q'; break;
-             case GDK_KP_Multiply: xkey = 'R'; break;
-             case GDK_KP_Subtract: xkey = 'S'; break;
+             case GDK_KEY_Num_Lock: xkey = 'P'; break;
+             case GDK_KEY_KP_Divide: xkey = 'Q'; break;
+             case GDK_KEY_KP_Multiply: xkey = 'R'; break;
+             case GDK_KEY_KP_Subtract: xkey = 'S'; break;
                /*
                 * Keypad + is tricky. It covers a space that would
                 * be taken up on the VT100 by _two_ keys; so we
                 * let Shift select between the two. Worse still,
                 * in xterm function key mode we change which two...
                 */
-             case GDK_KP_Add:
+             case GDK_KEY_KP_Add:
                if (conf_get_int(inst->conf, CONF_funky_type) == FUNKY_XTERM) {
                    if (event->state & GDK_SHIFT_MASK)
                        xkey = 'l';
@@ -937,18 +1360,19 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
                else
                    xkey = 'l';
                break;
-             case GDK_KP_Enter: xkey = 'M'; break;
-             case GDK_KP_0: case GDK_KP_Insert: xkey = 'p'; break;
-             case GDK_KP_1: case GDK_KP_End: xkey = 'q'; break;
-             case GDK_KP_2: case GDK_KP_Down: xkey = 'r'; break;
-             case GDK_KP_3: case GDK_KP_Page_Down: xkey = 's'; break;
-             case GDK_KP_4: case GDK_KP_Left: xkey = 't'; break;
-             case GDK_KP_5: case GDK_KP_Begin: xkey = 'u'; break;
-             case GDK_KP_6: case GDK_KP_Right: xkey = 'v'; break;
-             case GDK_KP_7: case GDK_KP_Home: xkey = 'w'; break;
-             case GDK_KP_8: case GDK_KP_Up: xkey = 'x'; break;
-             case GDK_KP_9: case GDK_KP_Page_Up: xkey = 'y'; break;
-             case GDK_KP_Decimal: case GDK_KP_Delete: xkey = 'n'; break;
+             case GDK_KEY_KP_Enter: xkey = 'M'; break;
+             case GDK_KEY_KP_0: case GDK_KEY_KP_Insert: xkey = 'p'; break;
+             case GDK_KEY_KP_1: case GDK_KEY_KP_End: xkey = 'q'; break;
+             case GDK_KEY_KP_2: case GDK_KEY_KP_Down: xkey = 'r'; break;
+             case GDK_KEY_KP_3: case GDK_KEY_KP_Page_Down: xkey = 's'; break;
+             case GDK_KEY_KP_4: case GDK_KEY_KP_Left: xkey = 't'; break;
+             case GDK_KEY_KP_5: case GDK_KEY_KP_Begin: xkey = 'u'; break;
+             case GDK_KEY_KP_6: case GDK_KEY_KP_Right: xkey = 'v'; break;
+             case GDK_KEY_KP_7: case GDK_KEY_KP_Home: xkey = 'w'; break;
+             case GDK_KEY_KP_8: case GDK_KEY_KP_Up: xkey = 'x'; break;
+             case GDK_KEY_KP_9: case GDK_KEY_KP_Page_Up: xkey = 'y'; break;
+             case GDK_KEY_KP_Decimal: case GDK_KEY_KP_Delete:
+                xkey = 'n'; break;
            }
            if (xkey) {
                if (inst->term->vt52_mode) {
@@ -959,6 +1383,9 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
                } else
                    end = 1 + sprintf(output+1, "\033O%c", xkey);
                use_ucsoutput = FALSE;
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - Application keypad mode key"));
+#endif
                goto done;
            }
        }
@@ -976,84 +1403,84 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
            int code = 0;
            int funky_type = conf_get_int(inst->conf, CONF_funky_type);
            switch (event->keyval) {
-             case GDK_F1:
+             case GDK_KEY_F1:
                code = (event->state & GDK_SHIFT_MASK ? 23 : 11);
                break;
-             case GDK_F2:
+             case GDK_KEY_F2:
                code = (event->state & GDK_SHIFT_MASK ? 24 : 12);
                break;
-             case GDK_F3:
+             case GDK_KEY_F3:
                code = (event->state & GDK_SHIFT_MASK ? 25 : 13);
                break;
-             case GDK_F4:
+             case GDK_KEY_F4:
                code = (event->state & GDK_SHIFT_MASK ? 26 : 14);
                break;
-             case GDK_F5:
+             case GDK_KEY_F5:
                code = (event->state & GDK_SHIFT_MASK ? 28 : 15);
                break;
-             case GDK_F6:
+             case GDK_KEY_F6:
                code = (event->state & GDK_SHIFT_MASK ? 29 : 17);
                break;
-             case GDK_F7:
+             case GDK_KEY_F7:
                code = (event->state & GDK_SHIFT_MASK ? 31 : 18);
                break;
-             case GDK_F8:
+             case GDK_KEY_F8:
                code = (event->state & GDK_SHIFT_MASK ? 32 : 19);
                break;
-             case GDK_F9:
+             case GDK_KEY_F9:
                code = (event->state & GDK_SHIFT_MASK ? 33 : 20);
                break;
-             case GDK_F10:
+             case GDK_KEY_F10:
                code = (event->state & GDK_SHIFT_MASK ? 34 : 21);
                break;
-             case GDK_F11:
+             case GDK_KEY_F11:
                code = 23;
                break;
-             case GDK_F12:
+             case GDK_KEY_F12:
                code = 24;
                break;
-             case GDK_F13:
+             case GDK_KEY_F13:
                code = 25;
                break;
-             case GDK_F14:
+             case GDK_KEY_F14:
                code = 26;
                break;
-             case GDK_F15:
+             case GDK_KEY_F15:
                code = 28;
                break;
-             case GDK_F16:
+             case GDK_KEY_F16:
                code = 29;
                break;
-             case GDK_F17:
+             case GDK_KEY_F17:
                code = 31;
                break;
-             case GDK_F18:
+             case GDK_KEY_F18:
                code = 32;
                break;
-             case GDK_F19:
+             case GDK_KEY_F19:
                code = 33;
                break;
-             case GDK_F20:
+             case GDK_KEY_F20:
                code = 34;
                break;
            }
            if (!(event->state & GDK_CONTROL_MASK)) switch (event->keyval) {
-             case GDK_Home: case GDK_KP_Home:
+             case GDK_KEY_Home: case GDK_KEY_KP_Home:
                code = 1;
                break;
-             case GDK_Insert: case GDK_KP_Insert:
+             case GDK_KEY_Insert: case GDK_KEY_KP_Insert:
                code = 2;
                break;
-             case GDK_Delete: case GDK_KP_Delete:
+             case GDK_KEY_Delete: case GDK_KEY_KP_Delete:
                code = 3;
                break;
-             case GDK_End: case GDK_KP_End:
+             case GDK_KEY_End: case GDK_KEY_KP_End:
                code = 4;
                break;
-             case GDK_Page_Up: case GDK_KP_Page_Up:
+             case GDK_KEY_Page_Up: case GDK_KEY_KP_Page_Up:
                code = 5;
                break;
-             case GDK_Page_Down: case GDK_KP_Page_Down:
+             case GDK_KEY_Page_Down: case GDK_KEY_KP_Page_Down:
                code = 6;
                break;
            }
@@ -1063,6 +1490,9 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
 
            if (inst->term->vt52_mode && code > 0 && code <= 6) {
                end = 1 + sprintf(output+1, "\x1B%c", " HLMEIG"[code]);
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - VT52 mode small keypad key"));
+#endif
                use_ucsoutput = FALSE;
                goto done;
            }
@@ -1072,22 +1502,25 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
                char codes[] = "MNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz@[\\]^_`{";
                int index = 0;
                switch (event->keyval) {
-                 case GDK_F1: index = 0; break;
-                 case GDK_F2: index = 1; break;
-                 case GDK_F3: index = 2; break;
-                 case GDK_F4: index = 3; break;
-                 case GDK_F5: index = 4; break;
-                 case GDK_F6: index = 5; break;
-                 case GDK_F7: index = 6; break;
-                 case GDK_F8: index = 7; break;
-                 case GDK_F9: index = 8; break;
-                 case GDK_F10: index = 9; break;
-                 case GDK_F11: index = 10; break;
-                 case GDK_F12: index = 11; break;
+                 case GDK_KEY_F1: index = 0; break;
+                 case GDK_KEY_F2: index = 1; break;
+                 case GDK_KEY_F3: index = 2; break;
+                 case GDK_KEY_F4: index = 3; break;
+                 case GDK_KEY_F5: index = 4; break;
+                 case GDK_KEY_F6: index = 5; break;
+                 case GDK_KEY_F7: index = 6; break;
+                 case GDK_KEY_F8: index = 7; break;
+                 case GDK_KEY_F9: index = 8; break;
+                 case GDK_KEY_F10: index = 9; break;
+                 case GDK_KEY_F11: index = 10; break;
+                 case GDK_KEY_F12: index = 11; break;
                }
                if (event->state & GDK_SHIFT_MASK) index += 12;
                if (event->state & GDK_CONTROL_MASK) index += 24;
                end = 1 + sprintf(output+1, "\x1B[%c", codes[index]);
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - SCO mode function key"));
+#endif
                use_ucsoutput = FALSE;
                goto done;
            }
@@ -1100,6 +1533,9 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
                } else {
                    end = 1 + sprintf(output+1, "\x1B[%c", codes[code-1]);
                }
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - SCO mode small keypad key"));
+#endif
                use_ucsoutput = FALSE;
                goto done;
            }
@@ -1110,35 +1546,59 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
                    offt++;
                if (code > 21)
                    offt++;
-               if (inst->term->vt52_mode)
+               if (inst->term->vt52_mode) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                    debug((" - VT52 mode function key"));
+#endif
                    end = 1 + sprintf(output+1,
                                      "\x1B%c", code + 'P' - 11 - offt);
-               else
+                } else {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                    debug((" - VT100+ mode function key"));
+#endif
                    end = 1 + sprintf(output+1,
                                      "\x1BO%c", code + 'P' - 11 - offt);
+                }
                use_ucsoutput = FALSE;
                goto done;
            }
            if (funky_type == FUNKY_LINUX && code >= 11 && code <= 15) {
                end = 1 + sprintf(output+1, "\x1B[[%c", code + 'A' - 11);
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - Linux mode F1-F5 function key"));
+#endif
                use_ucsoutput = FALSE;
                goto done;
            }
            if (funky_type == FUNKY_XTERM && code >= 11 && code <= 14) {
-               if (inst->term->vt52_mode)
+               if (inst->term->vt52_mode) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                    debug((" - VT52 mode (overriding xterm) F1-F4 function"
+                           " key"));
+#endif
                    end = 1 + sprintf(output+1, "\x1B%c", code + 'P' - 11);
-               else
+                } else {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                    debug((" - xterm mode F1-F4 function key"));
+#endif
                    end = 1 + sprintf(output+1, "\x1BO%c", code + 'P' - 11);
+                }
                use_ucsoutput = FALSE;
                goto done;
            }
            if ((code == 1 || code == 4) &&
                conf_get_int(inst->conf, CONF_rxvt_homeend)) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - rxvt style Home/End"));
+#endif
                end = 1 + sprintf(output+1, code == 1 ? "\x1B[H" : "\x1BOw");
                use_ucsoutput = FALSE;
                goto done;
            }
            if (code) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - ordinary function key encoding"));
+#endif
                end = 1 + sprintf(output+1, "\x1B[%d~", code);
                use_ucsoutput = FALSE;
                goto done;
@@ -1155,15 +1615,18 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
        {
            int xkey = 0;
            switch (event->keyval) {
-             case GDK_Up: case GDK_KP_Up: xkey = 'A'; break;
-             case GDK_Down: case GDK_KP_Down: xkey = 'B'; break;
-             case GDK_Right: case GDK_KP_Right: xkey = 'C'; break;
-             case GDK_Left: case GDK_KP_Left: xkey = 'D'; break;
-             case GDK_Begin: case GDK_KP_Begin: xkey = 'G'; break;
+             case GDK_KEY_Up: case GDK_KEY_KP_Up: xkey = 'A'; break;
+             case GDK_KEY_Down: case GDK_KEY_KP_Down: xkey = 'B'; break;
+             case GDK_KEY_Right: case GDK_KEY_KP_Right: xkey = 'C'; break;
+             case GDK_KEY_Left: case GDK_KEY_KP_Left: xkey = 'D'; break;
+             case GDK_KEY_Begin: case GDK_KEY_KP_Begin: xkey = 'G'; break;
            }
            if (xkey) {
                end = 1 + format_arrow_key(output+1, inst->term, xkey,
                                           event->state & GDK_CONTROL_MASK);
+#ifdef KEY_EVENT_DIAGNOSTICS
+                debug((" - arrow key"));
+#endif
                use_ucsoutput = FALSE;
                goto done;
            }
@@ -1174,15 +1637,22 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
     done:
 
     if (end-start > 0) {
-#ifdef KEY_DEBUGGING
-       int i;
-       printf("generating sequence:");
-       for (i = start; i < end; i++)
-           printf(" %02x", (unsigned char) output[i]);
-       printf("\n");
-#endif
-
        if (special) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+            char *string_string = dupstr("");
+            int i;
+
+            for (i = start; i < end; i++) {
+                char *old = string_string;
+                string_string = dupprintf("%s%s%02x", string_string,
+                                          string_string[0] ? " " : "",
+                                          (unsigned)output[i] & 0xFF);
+                sfree(old);
+            }
+            debug((" - final output, special, generic encoding = [%s]\n",
+                   charset_to_localenc(output_charset), string_string));
+            sfree(string_string);
+#endif
            /*
             * For special control characters, the character set
             * should never matter.
@@ -1192,10 +1662,41 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
                ldisc_send(inst->ldisc, output+start, -2, 1);
        } else if (!inst->direct_to_font) {
            if (!use_ucsoutput) {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                char *string_string = dupstr("");
+                int i;
+
+                for (i = start; i < end; i++) {
+                    char *old = string_string;
+                    string_string = dupprintf("%s%s%02x", string_string,
+                                              string_string[0] ? " " : "",
+                                              (unsigned)output[i] & 0xFF);
+                    sfree(old);
+                }
+                debug((" - final output in %s = [%s]\n",
+                       charset_to_localenc(output_charset), string_string));
+                sfree(string_string);
+#endif
                if (inst->ldisc)
                    lpage_send(inst->ldisc, output_charset, output+start,
                               end-start, 1);
            } else {
+#ifdef KEY_EVENT_DIAGNOSTICS
+                char *string_string = dupstr("");
+                int i;
+
+                for (i = start; i < end; i++) {
+                    char *old = string_string;
+                    string_string = dupprintf("%s%s%04x", string_string,
+                                              string_string[0] ? " " : "",
+                                              (unsigned)ucsoutput[i]);
+                    sfree(old);
+                }
+                debug((" - final output in Unicode = [%s]\n",
+                       string_string));
+                sfree(string_string);
+#endif
+
                /*
                 * We generated our own Unicode key data from the
                 * keysym, so use that instead.
@@ -1208,6 +1709,21 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
             * In direct-to-font mode, we just send the string
             * exactly as we received it.
             */
+#ifdef KEY_EVENT_DIAGNOSTICS
+            char *string_string = dupstr("");
+            int i;
+
+            for (i = start; i < end; i++) {
+                char *old = string_string;
+                string_string = dupprintf("%s%s%02x", string_string,
+                                          string_string[0] ? " " : "",
+                                          (unsigned)output[i] & 0xFF);
+                sfree(old);
+            }
+            debug((" - final output in direct-to-font encoding = [%s]\n",
+                   string_string));
+            sfree(string_string);
+#endif
            if (inst->ldisc)
                ldisc_send(inst->ldisc, output+start, end-start, 1);
        }
@@ -1223,6 +1739,22 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
 void input_method_commit_event(GtkIMContext *imc, gchar *str, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
+
+#ifdef KEY_EVENT_DIAGNOSTICS
+    char *string_string = dupstr("");
+    int i;
+
+    for (i = 0; str[i]; i++) {
+        char *old = string_string;
+        string_string = dupprintf("%s%s%02x", string_string,
+                                  string_string[0] ? " " : "",
+                                  (unsigned)str[i] & 0xFF);
+        sfree(old);
+    }
+    debug((" - IM commit event in UTF-8 = [%s]\n", string_string));
+    sfree(string_string);
+#endif
+
     if (inst->ldisc)
         lpage_send(inst->ldisc, CS_UTF8, str, strlen(str), 1);
     show_mouseptr(inst, 0);
@@ -1230,6 +1762,61 @@ void input_method_commit_event(GtkIMContext *imc, gchar *str, gpointer data)
 }
 #endif
 
+#define SCROLL_INCREMENT_LINES 5
+
+#if GTK_CHECK_VERSION(3,4,0)
+gboolean scroll_internal(struct gui_data *inst, gdouble delta, guint state,
+                        gdouble ex, gdouble ey)
+{
+    int shift, ctrl, alt, x, y, raw_mouse_mode;
+
+    show_mouseptr(inst, 1);
+
+    shift = state & GDK_SHIFT_MASK;
+    ctrl = state & GDK_CONTROL_MASK;
+    alt = state & inst->meta_mod_mask;
+
+    x = (ex - inst->window_border) / inst->font_width;
+    y = (ey - inst->window_border) / inst->font_height;
+
+    raw_mouse_mode =
+        send_raw_mouse && !(shift && conf_get_int(inst->conf,
+                                                  CONF_mouse_override));
+
+    inst->cumulative_scroll += delta * SCROLL_INCREMENT_LINES;
+
+    if (!raw_mouse_mode) {
+        int scroll_lines = (int)inst->cumulative_scroll; /* rounds toward 0 */
+        if (scroll_lines) {
+            term_scroll(inst->term, 0, scroll_lines);
+            inst->cumulative_scroll -= scroll_lines;
+        }
+        return TRUE;
+    } else {
+        int scroll_events = (int)(inst->cumulative_scroll /
+                                  SCROLL_INCREMENT_LINES);
+        if (scroll_events) {
+            int button;
+
+            inst->cumulative_scroll -= scroll_events * SCROLL_INCREMENT_LINES;
+
+            if (scroll_events > 0) {
+                button = MBT_WHEEL_DOWN;
+            } else {
+                button = MBT_WHEEL_UP;
+                scroll_events = -scroll_events;
+            }
+
+            while (scroll_events-- > 0) {
+                term_mouse(inst->term, button, translate_button(button),
+                           MA_CLICK, x, y, shift, ctrl, alt);
+            }
+        }
+        return TRUE;
+    }
+}
+#endif
+
 gboolean button_internal(struct gui_data *inst, guint32 timestamp,
                         GdkEventType type, guint ebutton, guint state,
                         gdouble ex, gdouble ey)
@@ -1243,7 +1830,7 @@ gboolean button_internal(struct gui_data *inst, guint32 timestamp,
 
     shift = state & GDK_SHIFT_MASK;
     ctrl = state & GDK_CONTROL_MASK;
-    alt = state & GDK_MOD1_MASK;
+    alt = state & inst->meta_mod_mask;
 
     raw_mouse_mode =
         send_raw_mouse && !(shift && conf_get_int(inst->conf,
@@ -1251,11 +1838,11 @@ gboolean button_internal(struct gui_data *inst, guint32 timestamp,
 
     if (!raw_mouse_mode) {
         if (ebutton == 4 && type == GDK_BUTTON_PRESS) {
-            term_scroll(inst->term, 0, -5);
+            term_scroll(inst->term, 0, -SCROLL_INCREMENT_LINES);
             return TRUE;
         }
         if (ebutton == 5 && type == GDK_BUTTON_PRESS) {
-            term_scroll(inst->term, 0, +5);
+            term_scroll(inst->term, 0, +SCROLL_INCREMENT_LINES);
             return TRUE;
         }
     }
@@ -1315,8 +1902,15 @@ gboolean button_event(GtkWidget *widget, GdkEventButton *event, gpointer data)
 gboolean scroll_event(GtkWidget *widget, GdkEventScroll *event, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
-    guint button;
 
+#if GTK_CHECK_VERSION(3,4,0)
+    gdouble dx, dy;
+    if (gdk_event_get_scroll_deltas((GdkEvent *)event, &dx, &dy)) {
+        return scroll_internal(inst, dy, event->state, event->x, event->y);
+    } else
+        return FALSE;
+#else
+    guint button;
     if (event->direction == GDK_SCROLL_UP)
        button = 4;
     else if (event->direction == GDK_SCROLL_DOWN)
@@ -1326,6 +1920,7 @@ gboolean scroll_event(GtkWidget *widget, GdkEventScroll *event, gpointer data)
 
     return button_internal(inst, event->time, GDK_BUTTON_PRESS,
                           button, event->state, event->x, event->y);
+#endif
 }
 #endif
 
@@ -1341,7 +1936,7 @@ gint motion_event(GtkWidget *widget, GdkEventMotion *event, gpointer data)
 
     shift = event->state & GDK_SHIFT_MASK;
     ctrl = event->state & GDK_CONTROL_MASK;
-    alt = event->state & GDK_MOD1_MASK;
+    alt = event->state & inst->meta_mod_mask;
     if (event->state & GDK_BUTTON1_MASK)
        button = MBT_LEFT;
     else if (event->state & GDK_BUTTON2_MASK)
@@ -1404,166 +1999,31 @@ void notify_remote_exit(void *frontend)
     queue_toplevel_callback(exit_callback, inst);
 }
 
-static void notify_toplevel_callback(void *frontend);
-
-static gint quit_toplevel_callback_func(gpointer data)
+void destroy(GtkWidget *widget, gpointer data)
 {
-    struct gui_data *inst = (struct gui_data *)data;
-
-    notify_toplevel_callback(inst);
-
-    inst->quit_fn_scheduled = FALSE;
-
-    return 0;
+    gtk_main_quit();
 }
 
-static gint idle_toplevel_callback_func(gpointer data)
+gint focus_event(GtkWidget *widget, GdkEventFocus *event, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
-
-    if (gtk_main_level() > 1) {
-        /*
-         * We don't run the callbacks if we're in the middle of a
-         * subsidiary gtk_main. Instead, ask for a callback when we
-         * get back out of the subsidiary main loop (if we haven't
-         * already arranged one), so we can reschedule ourself then.
-         */
-        if (!inst->quit_fn_scheduled) {
-            gtk_quit_add(2, quit_toplevel_callback_func, inst);
-            inst->quit_fn_scheduled = TRUE;
-        }
-        /*
-         * And unschedule this idle function, since we've now done
-         * everything we can until the innermost gtk_main has quit and
-         * can reschedule us with a chance of actually taking action.
-         */
-        if (inst->idle_fn_scheduled) { /* double-check, just in case */
-            gtk_idle_remove(inst->toplevel_callback_idle_id);
-            inst->idle_fn_scheduled = FALSE;
-        }
-    } else {
-        run_toplevel_callbacks();
-    }
-
-    /*
-     * If we've emptied our toplevel callback queue, unschedule
-     * ourself. Otherwise, leave ourselves pending so we'll be called
-     * again to deal with more callbacks after another round of the
-     * event loop.
-     */
-    if (!toplevel_callback_pending() && inst->idle_fn_scheduled) {
-        gtk_idle_remove(inst->toplevel_callback_idle_id);
-        inst->idle_fn_scheduled = FALSE;
-    }
-
-    return TRUE;
+    term_set_focus(inst->term, event->in);
+    term_update(inst->term);
+    show_mouseptr(inst, 1);
+    return FALSE;
 }
 
-static void notify_toplevel_callback(void *frontend)
+void set_busy_status(void *frontend, int status)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
-
-    if (!inst->idle_fn_scheduled) {
-        inst->toplevel_callback_idle_id =
-            gtk_idle_add(idle_toplevel_callback_func, inst);
-        inst->idle_fn_scheduled = TRUE;
-    }
+    inst->busy_status = status;
+    update_mouseptr(inst);
 }
 
-static gint timer_trigger(gpointer data)
-{
-    unsigned long now = GPOINTER_TO_LONG(data);
-    unsigned long next, then;
-    long ticks;
-
-    /*
-     * Destroy the timer we got here on.
-     */
-    if (timer_id) {
-       gtk_timeout_remove(timer_id);
-        timer_id = 0;
-    }
-
-    /*
-     * run_timers() may cause a call to timer_change_notify, in which
-     * case a new timer will already have been set up and left in
-     * timer_id. If it hasn't, and run_timers reports that some timing
-     * still needs to be done, we do it ourselves.
-     */
-    if (run_timers(now, &next) && !timer_id) {
-       then = now;
-       now = GETTICKCOUNT();
-       if (now - then > next - then)
-           ticks = 0;
-       else
-           ticks = next - now;
-       timer_id = gtk_timeout_add(ticks, timer_trigger,
-                                  LONG_TO_GPOINTER(next));
-    }
-
-    /*
-     * Returning FALSE means 'don't call this timer again', which
-     * _should_ be redundant given that we removed it above, but just
-     * in case, return FALSE anyway.
-     */
-    return FALSE;
-}
-
-void timer_change_notify(unsigned long next)
-{
-    long ticks;
-
-    if (timer_id)
-       gtk_timeout_remove(timer_id);
-
-    ticks = next - GETTICKCOUNT();
-    if (ticks <= 0)
-       ticks = 1;                     /* just in case */
-
-    timer_id = gtk_timeout_add(ticks, timer_trigger,
-                              LONG_TO_GPOINTER(next));
-}
-
-void fd_input_func(gpointer data, gint sourcefd, GdkInputCondition condition)
-{
-    /*
-     * We must process exceptional notifications before ordinary
-     * readability ones, or we may go straight past the urgent
-     * marker.
-     */
-    if (condition & GDK_INPUT_EXCEPTION)
-        select_result(sourcefd, 4);
-    if (condition & GDK_INPUT_READ)
-        select_result(sourcefd, 1);
-    if (condition & GDK_INPUT_WRITE)
-        select_result(sourcefd, 2);
-}
-
-void destroy(GtkWidget *widget, gpointer data)
-{
-    gtk_main_quit();
-}
-
-gint focus_event(GtkWidget *widget, GdkEventFocus *event, gpointer data)
-{
-    struct gui_data *inst = (struct gui_data *)data;
-    term_set_focus(inst->term, event->in);
-    term_update(inst->term);
-    show_mouseptr(inst, 1);
-    return FALSE;
-}
-
-void set_busy_status(void *frontend, int status)
-{
-    struct gui_data *inst = (struct gui_data *)frontend;
-    inst->busy_status = status;
-    update_mouseptr(inst);
-}
-
-/*
- * set or clear the "raw mouse message" mode
- */
-void set_raw_mouse_mode(void *frontend, int activate)
+/*
+ * set or clear the "raw mouse message" mode
+ */
+void set_raw_mouse_mode(void *frontend, int activate)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
     activate = activate && !conf_get_int(inst->conf, CONF_no_mouse_rep);
@@ -1571,9 +2031,18 @@ void set_raw_mouse_mode(void *frontend, int activate)
     update_mouseptr(inst);
 }
 
+#if GTK_CHECK_VERSION(2,0,0)
+static void compute_whole_window_size(struct gui_data *inst,
+                                      int wchars, int hchars,
+                                      int *wpix, int *hpix);
+#endif
+
 void request_resize(void *frontend, int w, int h)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
+
+#if !GTK_CHECK_VERSION(3,0,0)
+
     int large_x, large_y;
     int offset_x, offset_y;
     int area_x, area_y;
@@ -1603,11 +2072,7 @@ void request_resize(void *frontend, int w, int h)
     large_x += 32;
     large_y += 32;
 
-#if GTK_CHECK_VERSION(2,0,0)
     gtk_widget_set_size_request(inst->area, large_x, large_y);
-#else
-    gtk_widget_set_usize(inst->area, large_x, large_y);
-#endif
     gtk_widget_size_request(inst->area, &inner);
     gtk_widget_size_request(inst->window, &outer);
 
@@ -1623,12 +2088,11 @@ void request_resize(void *frontend, int w, int h)
      * way to do this, I think, is to set it to what the size is
      * really going to end up being.
      */
-#if GTK_CHECK_VERSION(2,0,0)
     gtk_widget_set_size_request(inst->area, area_x, area_y);
+#if GTK_CHECK_VERSION(2,0,0)
     gtk_window_resize(GTK_WINDOW(inst->window),
                      area_x + offset_x, area_y + offset_y);
 #else
-    gtk_widget_set_usize(inst->area, area_x, area_y);
     gtk_drawing_area_size(GTK_DRAWING_AREA(inst->area), area_x, area_y);
     /*
      * I can no longer remember what this call to
@@ -1648,33 +2112,68 @@ void request_resize(void *frontend, int w, int h)
      * above.
      */
     gtk_container_dequeue_resize_handler(GTK_CONTAINER(inst->window));
-    gdk_window_resize(inst->window->window,
+    gdk_window_resize(gtk_widget_get_window(inst->window),
                      area_x + offset_x, area_y + offset_y);
 #endif
+
+#else /* GTK_CHECK_VERSION(3,0,0) */
+
+    int wp, hp;
+    compute_whole_window_size(inst, w, h, &wp, &hp);
+    gtk_window_resize(GTK_WINDOW(inst->window), wp, hp);
+
+#endif
+
 }
 
 static void real_palette_set(struct gui_data *inst, int n, int r, int g, int b)
 {
-    gboolean success[1];
-
     inst->cols[n].red = r * 0x0101;
     inst->cols[n].green = g * 0x0101;
     inst->cols[n].blue = b * 0x0101;
 
-    gdk_colormap_free_colors(inst->colmap, inst->cols + n, 1);
-    gdk_colormap_alloc_colors(inst->colmap, inst->cols + n, 1,
-                             FALSE, TRUE, success);
-    if (!success[0])
-       g_error("%s: couldn't allocate colour %d (#%02x%02x%02x)\n", appname,
-               n, r, g, b);
+#if !GTK_CHECK_VERSION(3,0,0)
+    {
+        gboolean success[1];
+        gdk_colormap_free_colors(inst->colmap, inst->cols + n, 1);
+        gdk_colormap_alloc_colors(inst->colmap, inst->cols + n, 1,
+                                  FALSE, TRUE, success);
+        if (!success[0])
+            g_error("%s: couldn't allocate colour %d (#%02x%02x%02x)\n",
+                    appname, n, r, g, b);
+    }
+#endif
+}
+
+void set_gdk_window_background(GdkWindow *win, const GdkColor *col)
+{
+#if GTK_CHECK_VERSION(3,0,0)
+    /* gdk_window_set_background is deprecated; work around its
+     * absence. */
+    GdkRGBA rgba;
+    rgba.red = col->red / 65535.0;
+    rgba.green = col->green / 65535.0;
+    rgba.blue = col->blue / 65535.0;
+    rgba.alpha = 1.0;
+    gdk_window_set_background_rgba(win, &rgba);
+#else
+    {
+        /* For GTK1, which doesn't have a 'const' on
+         * gdk_window_set_background's second parameter type. */
+        GdkColor col_mutable = *col;
+        gdk_window_set_background(win, &col_mutable);
+    }
+#endif
 }
 
 void set_window_background(struct gui_data *inst)
 {
-    if (inst->area && inst->area->window)
-       gdk_window_set_background(inst->area->window, &inst->cols[258]);
-    if (inst->window && inst->window->window)
-       gdk_window_set_background(inst->window->window, &inst->cols[258]);
+    if (inst->area && gtk_widget_get_window(inst->area))
+       set_gdk_window_background(gtk_widget_get_window(inst->area),
+                                  &inst->cols[258]);
+    if (inst->window && gtk_widget_get_window(inst->window))
+       set_gdk_window_background(gtk_widget_get_window(inst->window),
+                                  &inst->cols[258]);
 }
 
 void palette_set(void *frontend, int n, int r, int g, int b)
@@ -1703,16 +2202,17 @@ void palette_reset(void *frontend)
        0, 8, 1, 9, 2, 10, 3, 11,
        4, 12, 5, 13, 6, 14, 7, 15
     };
-    gboolean success[NALLCOLOURS];
     int i;
 
     assert(lenof(ww) == NCFGCOLOURS);
 
+#if !GTK_CHECK_VERSION(3,0,0)
     if (!inst->colmap) {
        inst->colmap = gdk_colormap_get_system();
     } else {
        gdk_colormap_free_colors(inst->colmap, inst->cols, NALLCOLOURS);
     }
+#endif
 
     for (i = 0; i < NCFGCOLOURS; i++) {
        inst->cols[ww[i]].red =
@@ -1737,73 +2237,219 @@ void palette_reset(void *frontend)
        }
     }
 
-    gdk_colormap_alloc_colors(inst->colmap, inst->cols, NALLCOLOURS,
-                             FALSE, TRUE, success);
-    for (i = 0; i < NALLCOLOURS; i++) {
-       if (!success[i])
-           g_error("%s: couldn't allocate colour %d (#%02x%02x%02x)\n",
-                    appname, i,
-                   conf_get_int_int(inst->conf, CONF_colours, i*3+0),
-                   conf_get_int_int(inst->conf, CONF_colours, i*3+1),
-                   conf_get_int_int(inst->conf, CONF_colours, i*3+2));
+#if !GTK_CHECK_VERSION(3,0,0)
+    {
+        gboolean success[NALLCOLOURS];
+        gdk_colormap_alloc_colors(inst->colmap, inst->cols, NALLCOLOURS,
+                                  FALSE, TRUE, success);
+        for (i = 0; i < NALLCOLOURS; i++) {
+            if (!success[i])
+                g_error("%s: couldn't allocate colour %d (#%02x%02x%02x)\n",
+                        appname, i,
+                        conf_get_int_int(inst->conf, CONF_colours, i*3+0),
+                        conf_get_int_int(inst->conf, CONF_colours, i*3+1),
+                        conf_get_int_int(inst->conf, CONF_colours, i*3+2));
+        }
     }
+#endif
 
     /* Since Default Background may have changed, ensure that space
      * between text area and window border is refreshed. */
     set_window_background(inst);
-    if (inst->area && inst->area->window) {
+    if (inst->area && gtk_widget_get_window(inst->area)) {
        draw_backing_rect(inst);
        gtk_widget_queue_draw(inst->area);
     }
 }
 
-/* Ensure that all the cut buffers exist - according to the ICCCM, we must
- * do this before we start using cut buffers.
+#ifdef JUST_USE_GTK_CLIPBOARD_UTF8
+
+/* ----------------------------------------------------------------------
+ * Clipboard handling, using the high-level GtkClipboard interface in
+ * as hands-off a way as possible. We write and read the clipboard as
+ * UTF-8 text, and let GTK deal with converting to any other text
+ * formats it feels like.
  */
-void init_cutbuffers()
+
+void init_clipboard(struct gui_data *inst)
 {
-    unsigned char empty[] = "";
-    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
-                   XA_CUT_BUFFER0, XA_STRING, 8, PropModeAppend, empty, 0);
-    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
-                   XA_CUT_BUFFER1, XA_STRING, 8, PropModeAppend, empty, 0);
-    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
-                   XA_CUT_BUFFER2, XA_STRING, 8, PropModeAppend, empty, 0);
-    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
-                   XA_CUT_BUFFER3, XA_STRING, 8, PropModeAppend, empty, 0);
-    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
-                   XA_CUT_BUFFER4, XA_STRING, 8, PropModeAppend, empty, 0);
-    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
-                   XA_CUT_BUFFER5, XA_STRING, 8, PropModeAppend, empty, 0);
-    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
-                   XA_CUT_BUFFER6, XA_STRING, 8, PropModeAppend, empty, 0);
-    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
-                   XA_CUT_BUFFER7, XA_STRING, 8, PropModeAppend, empty, 0);
+    inst->clipboard = gtk_clipboard_get_for_display(gdk_display_get_default(),
+                                                    DEFAULT_CLIPBOARD);
 }
 
+/*
+ * Because calling gtk_clipboard_set_with_data triggers a call to the
+ * clipboard_clear function from the last time, we need to arrange a
+ * way to distinguish a real call to clipboard_clear for the _new_
+ * instance of the clipboard data from the leftover call for the
+ * outgoing one. We do this by setting the user data field in our
+ * gtk_clipboard_set_with_data() call, instead of the obvious pointer
+ * to 'inst', to one of these.
+ */
+struct clipboard_data_instance {
+    struct gui_data *inst;
+    char *pasteout_data_utf8;
+    int pasteout_data_utf8_len;
+};
+
+static void clipboard_provide_data(GtkClipboard *clipboard,
+                                   GtkSelectionData *selection_data,
+                                   guint info, gpointer data)
+{
+    struct clipboard_data_instance *cdi =
+        (struct clipboard_data_instance *)data;
+    struct gui_data *inst = cdi->inst;
+
+    if (inst->current_cdi == cdi) {
+        gtk_selection_data_set_text(selection_data, cdi->pasteout_data_utf8,
+                                    cdi->pasteout_data_utf8_len);
+    }
+}
+
+static void clipboard_clear(GtkClipboard *clipboard, gpointer data)
+{
+    struct clipboard_data_instance *cdi =
+        (struct clipboard_data_instance *)data;
+    struct gui_data *inst = cdi->inst;
+
+    if (inst->current_cdi == cdi) {
+        term_deselect(inst->term);
+        inst->current_cdi = NULL;
+    }
+    sfree(cdi->pasteout_data_utf8);
+    sfree(cdi);
+}
+
+void write_clip(void *frontend, wchar_t *data, int *attr, int len,
+                int must_deselect)
+{
+    struct gui_data *inst = (struct gui_data *)frontend;
+    struct clipboard_data_instance *cdi;
+
+    if (inst->direct_to_font) {
+        /* In this clipboard mode, we just can't paste if we're in
+         * direct-to-font mode. Fortunately, that shouldn't be
+         * important, because we'll only use this clipboard handling
+         * code on systems where that kind of font doesn't exist
+         * anyway. */
+        return;
+    }
+
+    cdi = snew(struct clipboard_data_instance);
+    cdi->inst = inst;
+    inst->current_cdi = cdi;
+    cdi->pasteout_data_utf8 = snewn(len*6, char);
+    {
+        const wchar_t *tmp = data;
+        int tmplen = len;
+        cdi->pasteout_data_utf8_len =
+            charset_from_unicode(&tmp, &tmplen, cdi->pasteout_data_utf8,
+                                 len*6, CS_UTF8, NULL, NULL, 0);
+    }
+
+    /*
+     * It would be nice to just call gtk_clipboard_set_text() in place
+     * of all of the faffing below. Unfortunately, that won't give me
+     * access to the clipboard-clear event, which we use to visually
+     * deselect text in the terminal.
+     */
+    {
+        GtkTargetList *targetlist;
+        GtkTargetEntry *targettable;
+        gint n_targets;
+
+        targetlist = gtk_target_list_new(NULL, 0);
+        gtk_target_list_add_text_targets(targetlist, 0);
+        targettable = gtk_target_table_new_from_list(targetlist, &n_targets);
+        gtk_clipboard_set_with_data(inst->clipboard, targettable, n_targets,
+                                    clipboard_provide_data, clipboard_clear,
+                                    cdi);
+        gtk_target_table_free(targettable, n_targets);
+        gtk_target_list_unref(targetlist);
+    }
+}
+
+static void clipboard_text_received(GtkClipboard *clipboard,
+                                    const gchar *text, gpointer data)
+{
+    struct gui_data *inst = (struct gui_data *)data;
+    int length;
+
+    if (!text)
+        return;
+
+    length = strlen(text);
+
+    if (inst->pastein_data)
+       sfree(inst->pastein_data);
+
+    inst->pastein_data = snewn(length, wchar_t);
+    inst->pastein_data_len = mb_to_wc(CS_UTF8, 0, text, length,
+                                      inst->pastein_data, length);
+
+    term_do_paste(inst->term);
+}
+
+void request_paste(void *frontend)
+{
+    struct gui_data *inst = (struct gui_data *)frontend;
+    gtk_clipboard_request_text(inst->clipboard, clipboard_text_received, inst);
+}
+
+#else /* JUST_USE_GTK_CLIPBOARD_UTF8 */
+
+/* ----------------------------------------------------------------------
+ * Clipboard handling for X, using the low-level gtk_selection_*
+ * interface, handling conversions to fiddly things like compound text
+ * ourselves, and storing in X cut buffers too.
+ *
+ * This version of the clipboard code has to be kept around for GTK1,
+ * which doesn't have the higher-level GtkClipboard interface at all.
+ * And since it works on GTK2 and GTK3 too and has had a good few
+ * years of shakedown and bug fixing, we might as well keep using it
+ * where it's applicable.
+ *
+ * It's _possible_ that we might be able to replicate all the
+ * important wrinkles of this code in GtkClipboard. (In particular,
+ * cut buffers or local analogue look as if they might be accessible
+ * via gtk_clipboard_set_can_store(), and delivering text in
+ * non-Unicode formats only in the direct-to-font case ought to be
+ * possible if we can figure out the right set of things to put in the
+ * GtkTargetList.) But that work can wait until there's a need for it!
+ */
+
 /* Store the data in a cut-buffer. */
-void store_cutbuffer(char * ptr, int len)
+static void store_cutbuffer(char * ptr, int len)
 {
+#ifndef NOT_X_WINDOWS
+    Display *disp = GDK_DISPLAY_XDISPLAY(gdk_display_get_default());
     /* ICCCM says we must rotate the buffers before storing to buffer 0. */
-    XRotateBuffers(GDK_DISPLAY(), 1);
-    XStoreBytes(GDK_DISPLAY(), ptr, len);
+    XRotateBuffers(disp, 1);
+    XStoreBytes(disp, ptr, len);
+#endif
 }
 
 /* Retrieve data from a cut-buffer.
  * Returned data needs to be freed with XFree().
  */
-char * retrieve_cutbuffer(int * nbytes)
+static char *retrieve_cutbuffer(int *nbytes)
 {
+#ifndef NOT_X_WINDOWS
+    Display *disp = GDK_DISPLAY_XDISPLAY(gdk_display_get_default());
     char * ptr;
-    ptr = XFetchBytes(GDK_DISPLAY(), nbytes);
+    ptr = XFetchBytes(disp, nbytes);
     if (*nbytes <= 0 && ptr != 0) {
        XFree(ptr);
        ptr = 0;
     }
     return ptr;
+#else
+    return NULL;
+#endif
 }
 
-void write_clip(void *frontend, wchar_t * data, int *attr, int len, int must_deselect)
+void write_clip(void *frontend, wchar_t *data, int *attr, int len,
+                int must_deselect)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
     if (inst->pasteout_data)
@@ -1820,8 +2466,11 @@ void write_clip(void *frontend, wchar_t * data, int *attr, int len, int must_des
     if (!inst->direct_to_font) {
        const wchar_t *tmp = data;
        int tmplen = len;
+#ifndef NOT_X_WINDOWS
        XTextProperty tp;
        char *list[1];
+        Display *disp = GDK_DISPLAY_XDISPLAY(gdk_display_get_default());
+#endif
 
        inst->pasteout_data_utf8 = snewn(len*6, char);
        inst->pasteout_data_utf8_len = len*6;
@@ -1842,14 +2491,17 @@ void write_clip(void *frontend, wchar_t * data, int *attr, int len, int must_des
        /*
         * Now let Xlib convert our UTF-8 data into compound text.
         */
+#ifndef NOT_X_WINDOWS
        list[0] = inst->pasteout_data_utf8;
-       if (Xutf8TextListToTextProperty(GDK_DISPLAY(), list, 1,
+       if (Xutf8TextListToTextProperty(disp, list, 1,
                                        XCompoundTextStyle, &tp) == 0) {
            inst->pasteout_data_ctext = snewn(tp.nitems+1, char);
            memcpy(inst->pasteout_data_ctext, tp.value, tp.nitems);
            inst->pasteout_data_ctext_len = tp.nitems;
            XFree(tp.value);
-       } else {
+       } else
+#endif
+        {
             inst->pasteout_data_ctext = NULL;
             inst->pasteout_data_ctext_len = 0;
         }
@@ -1895,26 +2547,27 @@ void write_clip(void *frontend, wchar_t * data, int *attr, int len, int must_des
        term_deselect(inst->term);
 }
 
-void selection_get(GtkWidget *widget, GtkSelectionData *seldata,
-                  guint info, guint time_stamp, gpointer data)
+static void selection_get(GtkWidget *widget, GtkSelectionData *seldata,
+                          guint info, guint time_stamp, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
-    if (seldata->target == utf8_string_atom)
-       gtk_selection_data_set(seldata, seldata->target, 8,
-                              (unsigned char *)inst->pasteout_data_utf8,
+    GdkAtom target = gtk_selection_data_get_target(seldata);
+    if (target == utf8_string_atom)
+       gtk_selection_data_set(seldata, target, 8,
+                               (unsigned char *)inst->pasteout_data_utf8,
                               inst->pasteout_data_utf8_len);
-    else if (seldata->target == compound_text_atom)
-       gtk_selection_data_set(seldata, seldata->target, 8,
-                              (unsigned char *)inst->pasteout_data_ctext,
+    else if (target == compound_text_atom)
+       gtk_selection_data_set(seldata, target, 8,
+                               (unsigned char *)inst->pasteout_data_ctext,
                               inst->pasteout_data_ctext_len);
     else
-       gtk_selection_data_set(seldata, seldata->target, 8,
-                              (unsigned char *)inst->pasteout_data,
+       gtk_selection_data_set(seldata, target, 8,
+                               (unsigned char *)inst->pasteout_data,
                               inst->pasteout_data_len);
 }
 
-gint selection_clear(GtkWidget *widget, GdkEventSelection *seldata,
-                    gpointer data)
+static gint selection_clear(GtkWidget *widget, GdkEventSelection *seldata,
+                            gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
 
@@ -1965,21 +2618,24 @@ void request_paste(void *frontend)
     }
 }
 
-gint idle_paste_func(gpointer data);   /* forward ref */
-
-void selection_received(GtkWidget *widget, GtkSelectionData *seldata,
-                       guint time, gpointer data)
+static void selection_received(GtkWidget *widget, GtkSelectionData *seldata,
+                               guint time, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
-    XTextProperty tp;
-    char **list;
     char *text;
-    int length, count, ret;
+    int length;
+#ifndef NOT_X_WINDOWS
+    char **list;
     int free_list_required = 0;
     int free_required = 0;
+#endif
     int charset;
+    GdkAtom seldata_target = gtk_selection_data_get_target(seldata);
+    GdkAtom seldata_type = gtk_selection_data_get_data_type(seldata);
+    const guchar *seldata_data = gtk_selection_data_get_data(seldata);
+    gint seldata_length = gtk_selection_data_get_length(seldata);
 
-    if (seldata->target == utf8_string_atom && seldata->length <= 0) {
+    if (seldata_target == utf8_string_atom && seldata_length <= 0) {
        /*
         * Failed to get a UTF-8 selection string. Try compound
         * text next.
@@ -1990,7 +2646,7 @@ void selection_received(GtkWidget *widget, GtkSelectionData *seldata,
        return;
     }
 
-    if (seldata->target == compound_text_atom && seldata->length <= 0) {
+    if (seldata_target == compound_text_atom && seldata_length <= 0) {
        /*
         * Failed to get UTF-8 or compound text. Try an ordinary
         * string.
@@ -2005,16 +2661,17 @@ void selection_received(GtkWidget *widget, GtkSelectionData *seldata,
      * If we have data, but it's not of a type we can deal with,
      * we have to ignore the data.
      */
-    if (seldata->length > 0 &&
-       seldata->type != GDK_SELECTION_TYPE_STRING &&
-       seldata->type != compound_text_atom &&
-       seldata->type != utf8_string_atom)
+    if (seldata_length > 0 &&
+       seldata_type != GDK_SELECTION_TYPE_STRING &&
+       seldata_type != compound_text_atom &&
+       seldata_type != utf8_string_atom)
        return;
 
     /*
      * If we have no data, try looking in a cut buffer.
      */
-    if (seldata->length <= 0) {
+    if (seldata_length <= 0) {
+#ifndef NOT_X_WINDOWS
        text = retrieve_cutbuffer(&length);
        if (length == 0)
            return;
@@ -2022,18 +2679,32 @@ void selection_received(GtkWidget *widget, GtkSelectionData *seldata,
         * source, so use that as a de-facto standard. */
        charset = CS_ISO8859_1;
        free_required = 1;
+#else
+        return;
+#endif
     } else {
        /*
         * Convert COMPOUND_TEXT into UTF-8.
         */
-       if (seldata->type == compound_text_atom) {
-           tp.value = seldata->data;
-           tp.encoding = (Atom) seldata->type;
-           tp.format = seldata->format;
-           tp.nitems = seldata->length;
-           ret = Xutf8TextPropertyToTextList(GDK_DISPLAY(), &tp,
-                                             &list, &count);
-           if (ret != 0 || count != 1) {
+       if (seldata_type == compound_text_atom) {
+#ifndef NOT_X_WINDOWS
+            XTextProperty tp;
+            int ret, count;
+            Display *disp = GDK_DISPLAY_XDISPLAY(gdk_display_get_default());
+
+           tp.value = (unsigned char *)seldata_data;
+           tp.encoding = (Atom) seldata_type;
+           tp.format = gtk_selection_data_get_format(seldata);
+           tp.nitems = seldata_length;
+           ret = Xutf8TextPropertyToTextList(disp, &tp, &list, &count);
+           if (ret == 0 && count == 1) {
+                text = list[0];
+                length = strlen(list[0]);
+                charset = CS_UTF8;
+                free_list_required = 1;
+            } else
+#endif
+            {
                /*
                 * Compound text failed; fall back to STRING.
                 */
@@ -2042,14 +2713,10 @@ void selection_received(GtkWidget *widget, GtkSelectionData *seldata,
                                      inst->input_event_time);
                return;
            }
-           text = list[0];
-           length = strlen(list[0]);
-           charset = CS_UTF8;
-           free_list_required = 1;
        } else {
-           text = (char *)seldata->data;
-           length = seldata->length;
-           charset = (seldata->type == utf8_string_atom ?
+           text = (char *)seldata_data;
+           length = seldata_length;
+           charset = (seldata_type == utf8_string_atom ?
                       CS_UTF8 : inst->ucsdata.line_codepage);
        }
     }
@@ -2065,12 +2732,64 @@ void selection_received(GtkWidget *widget, GtkSelectionData *seldata,
 
     term_do_paste(inst->term);
 
+#ifndef NOT_X_WINDOWS
     if (free_list_required)
        XFreeStringList(list);
     if (free_required)
        XFree(text);
+#endif
 }
 
+void init_clipboard(struct gui_data *inst)
+{
+#ifndef NOT_X_WINDOWS
+    /*
+     * Ensure that all the cut buffers exist - according to the ICCCM,
+     * we must do this before we start using cut buffers.
+     */
+    unsigned char empty[] = "";
+    Display *disp = GDK_DISPLAY_XDISPLAY(gdk_display_get_default());
+    x11_ignore_error(disp, BadMatch);
+    XChangeProperty(disp, GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER0, XA_STRING, 8, PropModeAppend, empty, 0);
+    x11_ignore_error(disp, BadMatch);
+    XChangeProperty(disp, GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER1, XA_STRING, 8, PropModeAppend, empty, 0);
+    x11_ignore_error(disp, BadMatch);
+    XChangeProperty(disp, GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER2, XA_STRING, 8, PropModeAppend, empty, 0);
+    x11_ignore_error(disp, BadMatch);
+    XChangeProperty(disp, GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER3, XA_STRING, 8, PropModeAppend, empty, 0);
+    x11_ignore_error(disp, BadMatch);
+    XChangeProperty(disp, GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER4, XA_STRING, 8, PropModeAppend, empty, 0);
+    x11_ignore_error(disp, BadMatch);
+    XChangeProperty(disp, GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER5, XA_STRING, 8, PropModeAppend, empty, 0);
+    x11_ignore_error(disp, BadMatch);
+    XChangeProperty(disp, GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER6, XA_STRING, 8, PropModeAppend, empty, 0);
+    x11_ignore_error(disp, BadMatch);
+    XChangeProperty(disp, GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER7, XA_STRING, 8, PropModeAppend, empty, 0);
+#endif
+
+    g_signal_connect(G_OBJECT(inst->area), "selection_received",
+                     G_CALLBACK(selection_received), inst);
+    g_signal_connect(G_OBJECT(inst->area), "selection_get",
+                     G_CALLBACK(selection_get), inst);
+    g_signal_connect(G_OBJECT(inst->area), "selection_clear_event",
+                     G_CALLBACK(selection_clear), inst);
+}
+
+/*
+ * End of selection/clipboard handling.
+ * ----------------------------------------------------------------------
+ */
+
+#endif /* JUST_USE_GTK_CLIPBOARD_UTF8 */
+
 void get_clip(void *frontend, wchar_t ** p, int *len)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
@@ -2090,7 +2809,8 @@ static void set_window_titles(struct gui_data *inst)
      */
     gtk_window_set_title(GTK_WINDOW(inst->window), inst->wintitle);
     if (!conf_get_int(inst->conf, CONF_win_name_always))
-       gdk_window_set_icon_name(inst->window->window, inst->icontitle);
+       gdk_window_set_icon_name(gtk_widget_get_window(inst->window),
+                                 inst->icontitle);
 }
 
 void set_title(void *frontend, char *title)
@@ -2124,14 +2844,16 @@ void set_sbar(void *frontend, int total, int start, int page)
     struct gui_data *inst = (struct gui_data *)frontend;
     if (!conf_get_int(inst->conf, CONF_scrollbar))
        return;
-    inst->sbar_adjust->lower = 0;
-    inst->sbar_adjust->upper = total;
-    inst->sbar_adjust->value = start;
-    inst->sbar_adjust->page_size = page;
-    inst->sbar_adjust->step_increment = 1;
-    inst->sbar_adjust->page_increment = page/2;
+    gtk_adjustment_set_lower(inst->sbar_adjust, 0);
+    gtk_adjustment_set_upper(inst->sbar_adjust, total);
+    gtk_adjustment_set_value(inst->sbar_adjust, start);
+    gtk_adjustment_set_page_size(inst->sbar_adjust, page);
+    gtk_adjustment_set_step_increment(inst->sbar_adjust, 1);
+    gtk_adjustment_set_page_increment(inst->sbar_adjust, page/2);
     inst->ignore_sbar = TRUE;
+#if !GTK_CHECK_VERSION(3,18,0)
     gtk_adjustment_changed(inst->sbar_adjust);
+#endif
     inst->ignore_sbar = FALSE;
 }
 
@@ -2142,7 +2864,16 @@ void scrollbar_moved(GtkAdjustment *adj, gpointer data)
     if (!conf_get_int(inst->conf, CONF_scrollbar))
        return;
     if (!inst->ignore_sbar)
-       term_scroll(inst->term, 1, (int)adj->value);
+       term_scroll(inst->term, 1, (int)gtk_adjustment_get_value(adj));
+}
+
+static void show_scrollbar(struct gui_data *inst, gboolean visible)
+{
+    inst->sbar_visible = visible;
+    if (visible)
+        gtk_widget_show(inst->sbar);
+    else
+        gtk_widget_hide(inst->sbar);
 }
 
 void sys_cursor(void *frontend, int x, int y)
@@ -2167,11 +2898,8 @@ void do_beep(void *frontend, int mode)
 int char_width(Context ctx, int uc)
 {
     /*
-     * Under X, any fixed-width font really _is_ fixed-width.
-     * Double-width characters will be dealt with using a separate
-     * font. For the moment we can simply return 1.
-     * 
-     * FIXME: but is that also true of Pango?
+     * In this front end, double-width characters are handled using a
+     * separate font, so this can safely just return 1 always.
      */
     return 1;
 }
@@ -2181,22 +2909,281 @@ Context get_ctx(void *frontend)
     struct gui_data *inst = (struct gui_data *)frontend;
     struct draw_ctx *dctx;
 
-    if (!inst->area->window)
+    if (!gtk_widget_get_window(inst->area))
        return NULL;
 
-    dctx = snew(struct draw_ctx);
-    dctx->inst = inst;
-    dctx->gc = gdk_gc_new(inst->area->window);
-    return dctx;
+    dctx = snew(struct draw_ctx);
+    dctx->inst = inst;
+    dctx->uctx.type = inst->drawtype;
+#ifdef DRAW_TEXT_GDK
+    if (dctx->uctx.type == DRAWTYPE_GDK) {
+        /* If we're doing GDK-based drawing, then we also expect
+         * inst->pixmap to exist. */
+        dctx->uctx.u.gdk.target = inst->pixmap;
+        dctx->uctx.u.gdk.gc = gdk_gc_new(gtk_widget_get_window(inst->area));
+    }
+#endif
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        dctx->uctx.u.cairo.widget = GTK_WIDGET(inst->area);
+        /* If we're doing Cairo drawing, we expect inst->surface to
+         * exist, and we draw to that first, regardless of whether we
+         * subsequently copy the results to inst->pixmap. */
+        dctx->uctx.u.cairo.cr = cairo_create(inst->surface);
+        cairo_setup_dctx(dctx);
+    }
+#endif
+    return dctx;
+}
+
+void free_ctx(Context ctx)
+{
+    struct draw_ctx *dctx = (struct draw_ctx *)ctx;
+    /* struct gui_data *inst = dctx->inst; */
+#ifdef DRAW_TEXT_GDK
+    if (dctx->uctx.type == DRAWTYPE_GDK) {
+        gdk_gc_unref(dctx->uctx.u.gdk.gc);
+    }
+#endif
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        cairo_destroy(dctx->uctx.u.cairo.cr);
+    }
+#endif
+    sfree(dctx);
+}
+
+
+static void draw_update(struct draw_ctx *dctx, int x, int y, int w, int h)
+{
+#if defined DRAW_TEXT_CAIRO && !defined NO_BACKING_PIXMAPS
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        /*
+         * If inst->surface and inst->pixmap both exist, then we've
+         * just drawn new content to the former which we must copy to
+         * the latter.
+         */
+        cairo_t *cr = gdk_cairo_create(dctx->inst->pixmap);
+        cairo_set_source_surface(cr, dctx->inst->surface, 0, 0);
+        cairo_rectangle(cr, x, y, w, h);
+        cairo_fill(cr);
+        cairo_destroy(cr);
+    }
+#endif
+
+    /*
+     * Now we just queue a window redraw, which will cause
+     * inst->surface or inst->pixmap (whichever is appropriate for our
+     * compile mode) to be copied to the real window when we receive
+     * the resulting "expose" or "draw" event.
+     *
+     * Amazingly, this one API call is actually valid in all versions
+     * of GTK :-)
+     */
+    gtk_widget_queue_draw_area(dctx->inst->area, x, y, w, h);
+}
+
+static void draw_set_colour(struct draw_ctx *dctx, int col)
+{
+#ifdef DRAW_TEXT_GDK
+    if (dctx->uctx.type == DRAWTYPE_GDK) {
+        gdk_gc_set_foreground(dctx->uctx.u.gdk.gc, &dctx->inst->cols[col]);
+    }
+#endif
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        cairo_set_source_rgb(dctx->uctx.u.cairo.cr,
+                             dctx->inst->cols[col].red / 65535.0,
+                             dctx->inst->cols[col].green / 65535.0,
+                             dctx->inst->cols[col].blue / 65535.0);
+    }
+#endif
+}
+
+static void draw_rectangle(struct draw_ctx *dctx, int filled,
+                           int x, int y, int w, int h)
+{
+#ifdef DRAW_TEXT_GDK
+    if (dctx->uctx.type == DRAWTYPE_GDK) {
+        gdk_draw_rectangle(dctx->uctx.u.gdk.target, dctx->uctx.u.gdk.gc,
+                           filled, x, y, w, h);
+    }
+#endif
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        cairo_new_path(dctx->uctx.u.cairo.cr);
+        if (filled) {
+            cairo_rectangle(dctx->uctx.u.cairo.cr, x, y, w, h);
+            cairo_fill(dctx->uctx.u.cairo.cr);
+        } else {
+            cairo_rectangle(dctx->uctx.u.cairo.cr,
+                            x + 0.5, y + 0.5, w, h);
+            cairo_close_path(dctx->uctx.u.cairo.cr);
+            cairo_stroke(dctx->uctx.u.cairo.cr);
+        }
+    }
+#endif
+}
+
+static void draw_clip(struct draw_ctx *dctx, int x, int y, int w, int h)
+{
+#ifdef DRAW_TEXT_GDK
+    if (dctx->uctx.type == DRAWTYPE_GDK) {
+       GdkRectangle r;
+
+       r.x = x;
+       r.y = y;
+       r.width = w;
+       r.height = h;
+
+        gdk_gc_set_clip_rectangle(dctx->uctx.u.gdk.gc, &r);
+    }
+#endif
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        cairo_reset_clip(dctx->uctx.u.cairo.cr);
+        cairo_new_path(dctx->uctx.u.cairo.cr);
+        cairo_rectangle(dctx->uctx.u.cairo.cr, x, y, w, h);
+        cairo_clip(dctx->uctx.u.cairo.cr);
+    }
+#endif
+}
+
+static void draw_point(struct draw_ctx *dctx, int x, int y)
+{
+#ifdef DRAW_TEXT_GDK
+    if (dctx->uctx.type == DRAWTYPE_GDK) {
+        gdk_draw_point(dctx->uctx.u.gdk.target, dctx->uctx.u.gdk.gc, x, y);
+    }
+#endif
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        cairo_new_path(dctx->uctx.u.cairo.cr);
+        cairo_rectangle(dctx->uctx.u.cairo.cr, x, y, 1, 1);
+        cairo_fill(dctx->uctx.u.cairo.cr);
+    }
+#endif
+}
+
+static void draw_line(struct draw_ctx *dctx, int x0, int y0, int x1, int y1)
+{
+#ifdef DRAW_TEXT_GDK
+    if (dctx->uctx.type == DRAWTYPE_GDK) {
+        gdk_draw_line(dctx->uctx.u.gdk.target, dctx->uctx.u.gdk.gc,
+                      x0, y0, x1, y1);
+    }
+#endif
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        cairo_new_path(dctx->uctx.u.cairo.cr);
+        cairo_move_to(dctx->uctx.u.cairo.cr, x0 + 0.5, y0 + 0.5);
+        cairo_line_to(dctx->uctx.u.cairo.cr, x1 + 0.5, y1 + 0.5);
+        cairo_stroke(dctx->uctx.u.cairo.cr);
+    }
+#endif
+}
+
+static void draw_stretch_before(struct draw_ctx *dctx, int x, int y,
+                                int w, int wdouble,
+                                int h, int hdouble, int hbothalf)
+{
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        cairo_matrix_t matrix;
+
+        matrix.xy = 0;
+        matrix.yx = 0;
+
+        if (wdouble) {
+            matrix.xx = 2;
+            matrix.x0 = -x;
+        } else {
+            matrix.xx = 1;
+            matrix.x0 = 0;
+        }
+
+        if (hdouble) {
+            matrix.yy = 2;
+            if (hbothalf) {
+                matrix.y0 = -(y+h);
+            } else {
+                matrix.y0 = -y;
+            }
+        } else {
+            matrix.yy = 1;
+            matrix.y0 = 0;
+        }
+        cairo_transform(dctx->uctx.u.cairo.cr, &matrix);
+    }
+#endif
+}
+
+static void draw_stretch_after(struct draw_ctx *dctx, int x, int y,
+                               int w, int wdouble,
+                               int h, int hdouble, int hbothalf)
+{
+#ifdef DRAW_TEXT_GDK
+#ifndef NO_BACKING_PIXMAPS
+    if (dctx->uctx.type == DRAWTYPE_GDK) {
+       /*
+        * I can't find any plausible StretchBlt equivalent in the X
+        * server, so I'm going to do this the slow and painful way.
+        * This will involve repeated calls to gdk_draw_pixmap() to
+        * stretch the text horizontally. It's O(N^2) in time and O(N)
+        * in network bandwidth, but you try thinking of a better way.
+        * :-(
+        */
+       int i;
+        if (wdouble) {
+            for (i = 0; i < w; i++) {
+                gdk_draw_pixmap(dctx->uctx.u.gdk.target,
+                                dctx->uctx.u.gdk.gc,
+                                dctx->uctx.u.gdk.target,
+                                x + 2*i, y,
+                                x + 2*i+1, y,
+                                w - i, h);
+            }
+            w *= 2;
+        }
+
+       if (hdouble) {
+           int dt, db;
+           /* Now stretch vertically, in the same way. */
+           if (hbothalf)
+               dt = 0, db = 1;
+           else
+               dt = 1, db = 0;
+           for (i = 0; i < h; i += 2) {
+               gdk_draw_pixmap(dctx->uctx.u.gdk.target,
+                                dctx->uctx.u.gdk.gc,
+                                dctx->uctx.u.gdk.target,
+                                x, y + dt*i + db,
+                               x, y + dt*(i+1),
+                               w, h-i-1);
+           }
+       }
+    }
+#else
+#error No way to implement stretching in GDK without a reliable backing pixmap
+#endif
+#endif /* DRAW_TEXT_GDK */
+#ifdef DRAW_TEXT_CAIRO
+    if (dctx->uctx.type == DRAWTYPE_CAIRO) {
+        cairo_set_matrix(dctx->uctx.u.cairo.cr,
+                         &dctx->uctx.u.cairo.origmatrix);
+    }
+#endif
 }
 
-void free_ctx(Context ctx)
+static void draw_backing_rect(struct gui_data *inst)
 {
-    struct draw_ctx *dctx = (struct draw_ctx *)ctx;
-    /* struct gui_data *inst = dctx->inst; */
-    GdkGC *gc = dctx->gc;
-    gdk_gc_unref(gc);
-    sfree(dctx);
+    struct draw_ctx *dctx = get_ctx(inst);
+    int w = inst->width * inst->font_width + 2*inst->window_border;
+    int h = inst->height * inst->font_height + 2*inst->window_border;
+    draw_set_colour(dctx, 258);
+    draw_rectangle(dctx, 1, 0, 0, w, h);
+    draw_update(dctx, 0, 0, w, h);
+    free_ctx(dctx);
 }
 
 /*
@@ -2210,10 +3197,10 @@ void do_text_internal(Context ctx, int x, int y, wchar_t *text, int len,
 {
     struct draw_ctx *dctx = (struct draw_ctx *)ctx;
     struct gui_data *inst = dctx->inst;
-    GdkGC *gc = dctx->gc;
-    int ncombining, combining;
+    int ncombining;
     int nfg, nbg, t, fontid, shadow, rlen, widefactor, bold;
-    int monochrome = gtk_widget_get_visual(inst->area)->depth == 1;
+    int monochrome =
+        gdk_visual_get_depth(gtk_widget_get_visual(inst->area)) == 1;
 
     if (attr & TATTR_COMBINING) {
        ncombining = len;
@@ -2284,28 +3271,43 @@ void do_text_internal(Context ctx, int x, int y, wchar_t *text, int len,
     } else
        rlen = len;
 
-    {
-       GdkRectangle r;
+    draw_clip(dctx,
+              x*inst->font_width+inst->window_border,
+              y*inst->font_height+inst->window_border,
+              rlen*widefactor*inst->font_width,
+              inst->font_height);
 
-       r.x = x*inst->font_width+inst->window_border;
-       r.y = y*inst->font_height+inst->window_border;
-       r.width = rlen*widefactor*inst->font_width;
-       r.height = inst->font_height;
-       gdk_gc_set_clip_rectangle(gc, &r);
+    if ((lattr & LATTR_MODE) != LATTR_NORM) {
+        draw_stretch_before(dctx,
+                            x*inst->font_width+inst->window_border,
+                            y*inst->font_height+inst->window_border,
+                            rlen*widefactor*inst->font_width, TRUE,
+                            inst->font_height,
+                            ((lattr & LATTR_MODE) != LATTR_WIDE),
+                            ((lattr & LATTR_MODE) == LATTR_BOT));
     }
 
-    gdk_gc_set_foreground(gc, &inst->cols[nbg]);
-    gdk_draw_rectangle(inst->pixmap, gc, 1,
-                      x*inst->font_width+inst->window_border,
-                      y*inst->font_height+inst->window_border,
-                      rlen*widefactor*inst->font_width, inst->font_height);
-
-    gdk_gc_set_foreground(gc, &inst->cols[nfg]);
-    for (combining = 0; combining < ncombining; combining++) {
-        unifont_draw_text(inst->pixmap, gc, inst->fonts[fontid],
+    draw_set_colour(dctx, nbg);
+    draw_rectangle(dctx, TRUE,
+                   x*inst->font_width+inst->window_border,
+                   y*inst->font_height+inst->window_border,
+                   rlen*widefactor*inst->font_width, inst->font_height);
+
+    draw_set_colour(dctx, nfg);
+    if (ncombining > 1) {
+        assert(len == 1);
+        unifont_draw_combining(&dctx->uctx, inst->fonts[fontid],
+                               x*inst->font_width+inst->window_border,
+                               (y*inst->font_height+inst->window_border+
+                                inst->fonts[0]->ascent),
+                               text, ncombining, widefactor > 1,
+                               bold, inst->font_width);
+    } else {
+        unifont_draw_text(&dctx->uctx, inst->fonts[fontid],
                           x*inst->font_width+inst->window_border,
-                          y*inst->font_height+inst->window_border+inst->fonts[0]->ascent,
-                          text + combining, len, widefactor > 1,
+                          (y*inst->font_height+inst->window_border+
+                           inst->fonts[0]->ascent),
+                          text, len, widefactor > 1,
                           bold, inst->font_width);
     }
 
@@ -2313,47 +3315,20 @@ void do_text_internal(Context ctx, int x, int y, wchar_t *text, int len,
        int uheight = inst->fonts[0]->ascent + 1;
        if (uheight >= inst->font_height)
            uheight = inst->font_height - 1;
-       gdk_draw_line(inst->pixmap, gc, x*inst->font_width+inst->window_border,
-                     y*inst->font_height + uheight + inst->window_border,
-                     (x+len)*widefactor*inst->font_width-1+inst->window_border,
-                     y*inst->font_height + uheight + inst->window_border);
+        draw_line(dctx, x*inst->font_width+inst->window_border,
+                  y*inst->font_height + uheight + inst->window_border,
+                  (x+len)*widefactor*inst->font_width-1+inst->window_border,
+                  y*inst->font_height + uheight + inst->window_border);
     }
 
     if ((lattr & LATTR_MODE) != LATTR_NORM) {
-       /*
-        * I can't find any plausible StretchBlt equivalent in the
-        * X server, so I'm going to do this the slow and painful
-        * way. This will involve repeated calls to
-        * gdk_draw_pixmap() to stretch the text horizontally. It's
-        * O(N^2) in time and O(N) in network bandwidth, but you
-        * try thinking of a better way. :-(
-        */
-       int i;
-       for (i = 0; i < len * widefactor * inst->font_width; i++) {
-           gdk_draw_pixmap(inst->pixmap, gc, inst->pixmap,
-                           x*inst->font_width+inst->window_border + 2*i,
-                           y*inst->font_height+inst->window_border,
-                           x*inst->font_width+inst->window_border + 2*i+1,
-                           y*inst->font_height+inst->window_border,
-                           len * widefactor * inst->font_width - i, inst->font_height);
-       }
-       len *= 2;
-       if ((lattr & LATTR_MODE) != LATTR_WIDE) {
-           int dt, db;
-           /* Now stretch vertically, in the same way. */
-           if ((lattr & LATTR_MODE) == LATTR_BOT)
-               dt = 0, db = 1;
-           else
-               dt = 1, db = 0;
-           for (i = 0; i < inst->font_height; i+=2) {
-               gdk_draw_pixmap(inst->pixmap, gc, inst->pixmap,
-                               x*inst->font_width+inst->window_border,
-                               y*inst->font_height+inst->window_border+dt*i+db,
-                               x*inst->font_width+inst->window_border,
-                               y*inst->font_height+inst->window_border+dt*(i+1),
-                               len * widefactor * inst->font_width, inst->font_height-i-1);
-           }
-       }
+        draw_stretch_after(dctx,
+                           x*inst->font_width+inst->window_border,
+                           y*inst->font_height+inst->window_border,
+                           rlen*widefactor*inst->font_width, TRUE,
+                           inst->font_height,
+                           ((lattr & LATTR_MODE) != LATTR_WIDE),
+                           ((lattr & LATTR_MODE) == LATTR_BOT));
     }
 }
 
@@ -2362,7 +3337,6 @@ void do_text(Context ctx, int x, int y, wchar_t *text, int len,
 {
     struct draw_ctx *dctx = (struct draw_ctx *)ctx;
     struct gui_data *inst = dctx->inst;
-    GdkGC *gc = dctx->gc;
     int widefactor;
 
     do_text_internal(ctx, x, y, text, len, attr, lattr);
@@ -2382,12 +3356,10 @@ void do_text(Context ctx, int x, int y, wchar_t *text, int len,
        len *= 2;
     }
 
-    gdk_draw_pixmap(inst->area->window, gc, inst->pixmap,
-                   x*inst->font_width+inst->window_border,
-                   y*inst->font_height+inst->window_border,
-                   x*inst->font_width+inst->window_border,
-                   y*inst->font_height+inst->window_border,
-                   len*widefactor*inst->font_width, inst->font_height);
+    draw_update(dctx,
+                x*inst->font_width+inst->window_border,
+                y*inst->font_height+inst->window_border,
+                len*widefactor*inst->font_width, inst->font_height);
 }
 
 void do_cursor(Context ctx, int x, int y, wchar_t *text, int len,
@@ -2395,7 +3367,6 @@ void do_cursor(Context ctx, int x, int y, wchar_t *text, int len,
 {
     struct draw_ctx *dctx = (struct draw_ctx *)ctx;
     struct gui_data *inst = dctx->inst;
-    GdkGC *gc = dctx->gc;
 
     int active, passive, widefactor;
 
@@ -2436,11 +3407,12 @@ void do_cursor(Context ctx, int x, int y, wchar_t *text, int len,
         * if it's passive.
         */
        if (passive) {
-           gdk_gc_set_foreground(gc, &inst->cols[261]);
-           gdk_draw_rectangle(inst->pixmap, gc, 0,
-                              x*inst->font_width+inst->window_border,
-                              y*inst->font_height+inst->window_border,
-                              len*widefactor*inst->font_width-1, inst->font_height-1);
+            draw_set_colour(dctx, 261);
+            draw_rectangle(dctx, FALSE,
+                           x*inst->font_width+inst->window_border,
+                           y*inst->font_height+inst->window_border,
+                           len*widefactor*inst->font_width-1,
+                           inst->font_height-1);
        }
     } else {
        int uheight;
@@ -2474,27 +3446,25 @@ void do_cursor(Context ctx, int x, int y, wchar_t *text, int len,
            length = inst->font_height;
        }
 
-       gdk_gc_set_foreground(gc, &inst->cols[261]);
+        draw_set_colour(dctx, 261);
        if (passive) {
            for (i = 0; i < length; i++) {
                if (i % 2 == 0) {
-                   gdk_draw_point(inst->pixmap, gc, startx, starty);
+                   draw_point(dctx, startx, starty);
                }
                startx += dx;
                starty += dy;
            }
        } else if (active) {
-           gdk_draw_line(inst->pixmap, gc, startx, starty,
-                         startx + (length-1) * dx, starty + (length-1) * dy);
+           draw_line(dctx, startx, starty,
+                      startx + (length-1) * dx, starty + (length-1) * dy);
        } /* else no cursor (e.g., blinked off) */
     }
 
-    gdk_draw_pixmap(inst->area->window, gc, inst->pixmap,
-                   x*inst->font_width+inst->window_border,
-                   y*inst->font_height+inst->window_border,
-                   x*inst->font_width+inst->window_border,
-                   y*inst->font_height+inst->window_border,
-                   len*widefactor*inst->font_width, inst->font_height);
+    draw_update(dctx,
+                x*inst->font_width+inst->window_border,
+                y*inst->font_height+inst->window_border,
+                len*widefactor*inst->font_width, inst->font_height);
 
 #if GTK_CHECK_VERSION(2,0,0)
     {
@@ -2510,100 +3480,31 @@ void do_cursor(Context ctx, int x, int y, wchar_t *text, int len,
 
 GdkCursor *make_mouse_ptr(struct gui_data *inst, int cursor_val)
 {
-    /*
-     * Truly hideous hack: GTK doesn't allow us to set the mouse
-     * cursor foreground and background colours unless we've _also_
-     * created our own cursor from bitmaps. Therefore, I need to
-     * load the `cursor' font and draw glyphs from it on to
-     * pixmaps, in order to construct my cursors with the fg and bg
-     * I want. This is a gross hack, but it's more self-contained
-     * than linking in Xlib to find the X window handle to
-     * inst->area and calling XRecolorCursor, and it's more
-     * futureproof than hard-coding the shapes as bitmap arrays.
-     */
-    static GdkFont *cursor_font = NULL;
-    GdkPixmap *source, *mask;
-    GdkGC *gc;
-    GdkColor cfg = { 0, 65535, 65535, 65535 };
-    GdkColor cbg = { 0, 0, 0, 0 };
-    GdkColor dfg = { 1, 65535, 65535, 65535 };
-    GdkColor dbg = { 0, 0, 0, 0 };
-    GdkCursor *ret;
-    gchar text[2];
-    gint lb, rb, wid, asc, desc, w, h, x, y;
-
-    if (cursor_val == -2) {
-       gdk_font_unref(cursor_font);
-       return NULL;
-    }
-
-    if (cursor_val >= 0 && !cursor_font) {
-       cursor_font = gdk_font_load("cursor");
-       if (cursor_font)
-           gdk_font_ref(cursor_font);
-    }
-
-    /*
-     * Get the text extent of the cursor in question. We use the
-     * mask character for this, because it's typically slightly
-     * bigger than the main character.
-     */
-    if (cursor_val >= 0) {
-       text[1] = '\0';
-       text[0] = (char)cursor_val + 1;
-       gdk_string_extents(cursor_font, text, &lb, &rb, &wid, &asc, &desc);
-       w = rb-lb; h = asc+desc; x = -lb; y = asc;
-    } else {
-       w = h = 1;
-       x = y = 0;
-    }
-
-    source = gdk_pixmap_new(NULL, w, h, 1);
-    mask = gdk_pixmap_new(NULL, w, h, 1);
-
-    /*
-     * Draw the mask character on the mask pixmap.
-     */
-    gc = gdk_gc_new(mask);
-    gdk_gc_set_foreground(gc, &dbg);
-    gdk_draw_rectangle(mask, gc, 1, 0, 0, w, h);
-    if (cursor_val >= 0) {
-       text[1] = '\0';
-       text[0] = (char)cursor_val + 1;
-       gdk_gc_set_foreground(gc, &dfg);
-       gdk_draw_text(mask, cursor_font, gc, x, y, text, 1);
-    }
-    gdk_gc_unref(gc);
-
-    /*
-     * Draw the main character on the source pixmap.
-     */
-    gc = gdk_gc_new(source);
-    gdk_gc_set_foreground(gc, &dbg);
-    gdk_draw_rectangle(source, gc, 1, 0, 0, w, h);
-    if (cursor_val >= 0) {
-       text[1] = '\0';
-       text[0] = (char)cursor_val;
-       gdk_gc_set_foreground(gc, &dfg);
-       gdk_draw_text(source, cursor_font, gc, x, y, text, 1);
+    if (cursor_val == -1) {
+#if GTK_CHECK_VERSION(2,16,0)
+        cursor_val = GDK_BLANK_CURSOR;
+#else
+        /*
+         * Work around absence of GDK_BLANK_CURSOR by inventing a
+         * blank pixmap.
+         */
+        GdkCursor *ret;
+        GdkColor bg = { 0, 0, 0, 0 };
+        GdkPixmap *pm = gdk_pixmap_new(NULL, 1, 1, 1);
+        GdkGC *gc = gdk_gc_new(pm);
+        gdk_gc_set_foreground(gc, &bg);
+        gdk_draw_rectangle(pm, gc, 1, 0, 0, 1, 1);
+        gdk_gc_unref(gc);
+        ret = gdk_cursor_new_from_pixmap(pm, pm, &bg, &bg, 1, 1);
+        gdk_pixmap_unref(pm);
+        return ret;
+#endif
     }
-    gdk_gc_unref(gc);
-
-    /*
-     * Create the cursor.
-     */
-    ret = gdk_cursor_new_from_pixmap(source, mask, &cfg, &cbg, x, y);
-
-    /*
-     * Clean up.
-     */
-    gdk_pixmap_unref(source);
-    gdk_pixmap_unref(mask);
 
-    return ret;
+    return gdk_cursor_new(cursor_val);
 }
 
-void modalfatalbox(char *p, ...)
+void modalfatalbox(const char *p, ...)
 {
     va_list ap;
     fprintf(stderr, "FATAL ERROR: ");
@@ -2614,7 +3515,7 @@ void modalfatalbox(char *p, ...)
     exit(1);
 }
 
-void cmdline_error(char *p, ...)
+void cmdline_error(const char *p, ...)
 {
     va_list ap;
     fprintf(stderr, "%s: ", appname);
@@ -2625,293 +3526,23 @@ void cmdline_error(char *p, ...)
     exit(1);
 }
 
-char *get_x_display(void *frontend)
+const char *get_x_display(void *frontend)
 {
     return gdk_get_display();
 }
 
+#ifndef NOT_X_WINDOWS
 long get_windowid(void *frontend)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
-    return (long)GDK_WINDOW_XWINDOW(inst->area->window);
-}
-
-static void help(FILE *fp) {
-    if(fprintf(fp,
-"pterm option summary:\n"
-"\n"
-"  --display DISPLAY         Specify X display to use (note '--')\n"
-"  -name PREFIX              Prefix when looking up resources (default: pterm)\n"
-"  -fn FONT                  Normal text font\n"
-"  -fb FONT                  Bold text font\n"
-"  -geometry GEOMETRY        Position and size of window (size in characters)\n"
-"  -sl LINES                 Number of lines of scrollback\n"
-"  -fg COLOUR, -bg COLOUR    Foreground/background colour\n"
-"  -bfg COLOUR, -bbg COLOUR  Foreground/background bold colour\n"
-"  -cfg COLOUR, -bfg COLOUR  Foreground/background cursor colour\n"
-"  -T TITLE                  Window title\n"
-"  -ut, +ut                  Do(default) or do not update utmp\n"
-"  -ls, +ls                  Do(default) or do not make shell a login shell\n"
-"  -sb, +sb                  Do(default) or do not display a scrollbar\n"
-"  -log PATH                 Log all output to a file\n"
-"  -nethack                  Map numeric keypad to hjklyubn direction keys\n"
-"  -xrm RESOURCE-STRING      Set an X resource\n"
-"  -e COMMAND [ARGS...]      Execute command (consumes all remaining args)\n"
-        ) < 0 || fflush(fp) < 0) {
-       perror("output error");
-       exit(1);
-    }
-}
-
-static void version(FILE *fp) {
-    if(fprintf(fp, "%s: %s\n", appname, ver) < 0 || fflush(fp) < 0) {
-       perror("output error");
-       exit(1);
-    }
+    return (long)GDK_WINDOW_XID(gtk_widget_get_window(inst->area));
 }
+#endif
 
-int do_cmdline(int argc, char **argv, int do_everything, int *allow_launch,
-               struct gui_data *inst, Conf *conf)
+int frontend_is_utf8(void *frontend)
 {
-    int err = 0;
-    char *val;
-
-    /*
-     * Macros to make argument handling easier. Note that because
-     * they need to call `continue', they cannot be contained in
-     * the usual do {...} while (0) wrapper to make them
-     * syntactically single statements; hence it is not legal to
-     * use one of these macros as an unbraced statement between
-     * `if' and `else'.
-     */
-#define EXPECTS_ARG { \
-    if (--argc <= 0) { \
-       err = 1; \
-       fprintf(stderr, "%s: %s expects an argument\n", appname, p); \
-        continue; \
-    } else \
-       val = *++argv; \
-}
-#define SECOND_PASS_ONLY { if (!do_everything) continue; }
-
-    while (--argc > 0) {
-       char *p = *++argv;
-        int ret;
-
-       /*
-        * Shameless cheating. Debian requires all X terminal
-        * emulators to support `-T title'; but
-        * cmdline_process_param will eat -T (it means no-pty) and
-        * complain that pterm doesn't support it. So, in pterm
-        * only, we convert -T into -title.
-        */
-       if ((cmdline_tooltype & TOOLTYPE_NONNETWORK) &&
-           !strcmp(p, "-T"))
-           p = "-title";
-
-        ret = cmdline_process_param(p, (argc > 1 ? argv[1] : NULL),
-                                    do_everything ? 1 : -1, conf);
-
-       if (ret == -2) {
-           cmdline_error("option \"%s\" requires an argument", p);
-       } else if (ret == 2) {
-           --argc, ++argv;            /* skip next argument */
-            continue;
-       } else if (ret == 1) {
-            continue;
-        }
-
-       if (!strcmp(p, "-fn") || !strcmp(p, "-font")) {
-           FontSpec *fs;
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-            fs = fontspec_new(val);
-           conf_set_fontspec(conf, CONF_font, fs);
-            fontspec_free(fs);
-
-       } else if (!strcmp(p, "-fb")) {
-           FontSpec *fs;
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-            fs = fontspec_new(val);
-           conf_set_fontspec(conf, CONF_boldfont, fs);
-            fontspec_free(fs);
-
-       } else if (!strcmp(p, "-fw")) {
-           FontSpec *fs;
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-            fs = fontspec_new(val);
-           conf_set_fontspec(conf, CONF_widefont, fs);
-            fontspec_free(fs);
-
-       } else if (!strcmp(p, "-fwb")) {
-           FontSpec *fs;
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-            fs = fontspec_new(val);
-           conf_set_fontspec(conf, CONF_wideboldfont, fs);
-            fontspec_free(fs);
-
-       } else if (!strcmp(p, "-cs")) {
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-           conf_set_str(conf, CONF_line_codepage, val);
-
-       } else if (!strcmp(p, "-geometry")) {
-           int flags, x, y;
-           unsigned int w, h;
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-
-           flags = XParseGeometry(val, &x, &y, &w, &h);
-           if (flags & WidthValue)
-               conf_set_int(conf, CONF_width, w);
-           if (flags & HeightValue)
-               conf_set_int(conf, CONF_height, h);
-
-            if (flags & (XValue | YValue)) {
-                inst->xpos = x;
-                inst->ypos = y;
-                inst->gotpos = TRUE;
-                inst->gravity = ((flags & XNegative ? 1 : 0) |
-                                 (flags & YNegative ? 2 : 0));
-            }
-
-       } else if (!strcmp(p, "-sl")) {
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-           conf_set_int(conf, CONF_savelines, atoi(val));
-
-       } else if (!strcmp(p, "-fg") || !strcmp(p, "-bg") ||
-                  !strcmp(p, "-bfg") || !strcmp(p, "-bbg") ||
-                  !strcmp(p, "-cfg") || !strcmp(p, "-cbg")) {
-           GdkColor col;
-
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-           if (!gdk_color_parse(val, &col)) {
-               err = 1;
-               fprintf(stderr, "%s: unable to parse colour \"%s\"\n",
-                        appname, val);
-           } else {
-               int index;
-               index = (!strcmp(p, "-fg") ? 0 :
-                        !strcmp(p, "-bg") ? 2 :
-                        !strcmp(p, "-bfg") ? 1 :
-                        !strcmp(p, "-bbg") ? 3 :
-                        !strcmp(p, "-cfg") ? 4 :
-                        !strcmp(p, "-cbg") ? 5 : -1);
-               assert(index != -1);
-               conf_set_int_int(conf, CONF_colours, index*3+0, col.red / 256);
-               conf_set_int_int(conf, CONF_colours, index*3+1,col.green/ 256);
-               conf_set_int_int(conf, CONF_colours, index*3+2, col.blue/ 256);
-           }
-
-       } else if (use_pty_argv && !strcmp(p, "-e")) {
-           /* This option swallows all further arguments. */
-           if (!do_everything)
-               break;
-
-           if (--argc > 0) {
-               int i;
-               pty_argv = snewn(argc+1, char *);
-               ++argv;
-               for (i = 0; i < argc; i++)
-                   pty_argv[i] = argv[i];
-               pty_argv[argc] = NULL;
-               break;                 /* finished command-line processing */
-           } else
-               err = 1, fprintf(stderr, "%s: -e expects an argument\n",
-                                 appname);
-
-       } else if (!strcmp(p, "-title")) {
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-           conf_set_str(conf, CONF_wintitle, val);
-
-       } else if (!strcmp(p, "-log")) {
-           Filename *fn;
-           EXPECTS_ARG;
-           SECOND_PASS_ONLY;
-            fn = filename_from_str(val);
-           conf_set_filename(conf, CONF_logfilename, fn);
-           conf_set_int(conf, CONF_logtype, LGTYP_DEBUG);
-            filename_free(fn);
-
-       } else if (!strcmp(p, "-ut-") || !strcmp(p, "+ut")) {
-           SECOND_PASS_ONLY;
-           conf_set_int(conf, CONF_stamp_utmp, 0);
-
-       } else if (!strcmp(p, "-ut")) {
-           SECOND_PASS_ONLY;
-           conf_set_int(conf, CONF_stamp_utmp, 1);
-
-       } else if (!strcmp(p, "-ls-") || !strcmp(p, "+ls")) {
-           SECOND_PASS_ONLY;
-           conf_set_int(conf, CONF_login_shell, 0);
-
-       } else if (!strcmp(p, "-ls")) {
-           SECOND_PASS_ONLY;
-           conf_set_int(conf, CONF_login_shell, 1);
-
-       } else if (!strcmp(p, "-nethack")) {
-           SECOND_PASS_ONLY;
-           conf_set_int(conf, CONF_nethack_keypad, 1);
-
-       } else if (!strcmp(p, "-sb-") || !strcmp(p, "+sb")) {
-           SECOND_PASS_ONLY;
-           conf_set_int(conf, CONF_scrollbar, 0);
-
-       } else if (!strcmp(p, "-sb")) {
-           SECOND_PASS_ONLY;
-           conf_set_int(conf, CONF_scrollbar, 1);
-
-       } else if (!strcmp(p, "-name")) {
-           EXPECTS_ARG;
-           app_name = val;
-
-       } else if (!strcmp(p, "-xrm")) {
-           EXPECTS_ARG;
-           provide_xrm_string(val);
-
-       } else if(!strcmp(p, "-help") || !strcmp(p, "--help")) {
-           help(stdout);
-           exit(0);
-
-       } else if(!strcmp(p, "-version") || !strcmp(p, "--version")) {
-           version(stdout);
-           exit(0);
-
-        } else if (!strcmp(p, "-pgpfp")) {
-            pgp_fingerprints();
-            exit(1);
-
-       } else if(p[0] != '-' && (!do_everything ||
-                                  process_nonoption_arg(p, conf,
-                                                       allow_launch))) {
-            /* do nothing */
-
-       } else {
-           err = 1;
-           fprintf(stderr, "%s: unrecognized option '%s'\n", appname, p);
-       }
-    }
-
-    return err;
-}
-
-int uxsel_input_add(int fd, int rwx) {
-    int flags = 0;
-    if (rwx & 1) flags |= GDK_INPUT_READ;
-    if (rwx & 2) flags |= GDK_INPUT_WRITE;
-    if (rwx & 4) flags |= GDK_INPUT_EXCEPTION;
-    assert(flags);
-    return gdk_input_add(fd, flags, fd_input_func, NULL);
-}
-
-void uxsel_input_remove(int id) {
-    gdk_input_remove(id);
+    struct gui_data *inst = (struct gui_data *)frontend;
+    return inst->ucsdata.line_codepage == CS_UTF8;
 }
 
 char *setup_fonts_ucs(struct gui_data *inst)
@@ -2990,24 +3621,148 @@ char *setup_fonts_ucs(struct gui_data *inst)
                                    inst->fonts[0]->public_charset,
                                    conf_get_int(inst->conf, CONF_vtmode));
 
+    inst->drawtype = inst->fonts[0]->preferred_drawtype;
+
     return NULL;
 }
 
+#if GTK_CHECK_VERSION(3,0,0)
+struct find_app_menu_bar_ctx {
+    GtkWidget *area, *menubar;
+};
+static void find_app_menu_bar(GtkWidget *widget, gpointer data)
+{
+    struct find_app_menu_bar_ctx *ctx = (struct find_app_menu_bar_ctx *)data;
+    if (widget != ctx->area && GTK_IS_MENU_BAR(widget))
+        ctx->menubar = widget;
+}
+#endif
+
+static void compute_geom_hints(struct gui_data *inst, GdkGeometry *geom)
+{
+    /*
+     * Unused fields in geom.
+     */
+    geom->max_width = geom->max_height = -1;
+    geom->min_aspect = geom->max_aspect = 0;
+
+    /*
+     * Set up the geometry fields we care about, with reference to
+     * just the drawing area. We'll correct for other widgets in a
+     * moment.
+     */
+    geom->min_width = inst->font_width + 2*inst->window_border;
+    geom->min_height = inst->font_height + 2*inst->window_border;
+    geom->base_width = 2*inst->window_border;
+    geom->base_height = 2*inst->window_border;
+    geom->width_inc = inst->font_width;
+    geom->height_inc = inst->font_height;
+
+    /*
+     * If we've got a scrollbar visible, then we must include its
+     * width as part of the base and min width, and also ensure that
+     * our window's minimum height is at least the height required by
+     * the scrollbar.
+     *
+     * In the latter case, we must also take care to arrange that
+     * (geom->min_height - geom->base_height) is an integer multiple of
+     * geom->height_inc, because if it's not, then some window managers
+     * (we know of xfwm4) get confused, with the effect that they
+     * resize our window to a height based on min_height instead of
+     * base_height, which we then round down and the window ends up
+     * too short.
+     */
+    if (inst->sbar_visible) {
+        GtkRequisition req;
+        int min_sb_height;
+
+#if GTK_CHECK_VERSION(3,0,0)
+        gtk_widget_get_preferred_size(inst->sbar, &req, NULL);
+#else
+        gtk_widget_size_request(inst->sbar, &req);
+#endif
+
+        /* Compute rounded-up scrollbar height. */
+        min_sb_height = req.height;
+        min_sb_height += geom->height_inc - 1;
+        min_sb_height -= ((min_sb_height - geom->base_height%geom->height_inc)
+                          % geom->height_inc);
+
+        geom->min_width += req.width;
+        geom->base_width += req.width;
+        if (geom->min_height < min_sb_height)
+            geom->min_height = min_sb_height;
+    }
+
+#if GTK_CHECK_VERSION(3,0,0)
+    /*
+     * And if we're running a gtkapp.c based program and
+     * GtkApplicationWindow has given us a menu bar inside the window,
+     * then we must take that into account as well.
+     *
+     * In its unbounded wisdom, GtkApplicationWindow doesn't actually
+     * give us a direct function call to _find_ the menu bar widget.
+     * Fortunately, we can find it by enumerating the children of the
+     * top-level window and looking for one we didn't put there
+     * ourselves.
+     */
+    {
+        struct find_app_menu_bar_ctx actx, *ctx = &actx;
+        ctx->area = inst->area;
+        ctx->menubar = NULL;
+        gtk_container_foreach(GTK_CONTAINER(inst->window),
+                              find_app_menu_bar, ctx);
+
+        if (ctx->menubar) {
+            GtkRequisition req;
+            int min_menu_width;
+            gtk_widget_get_preferred_size(ctx->menubar, NULL, &req);
+
+            /*
+             * This time, the height adjustment is easy (the menu bar
+             * sits above everything), but we have to take care with
+             * the _width_ to ensure we keep min_width and base_width
+             * congruent modulo width_inc.
+             */
+            geom->min_height += req.height;
+            geom->base_height += req.height;
+
+            min_menu_width = req.width;
+            min_menu_width += geom->width_inc - 1;
+            min_menu_width -=
+                ((min_menu_width - geom->base_width%geom->width_inc)
+                 % geom->width_inc);
+            if (geom->min_width < min_menu_width)
+                geom->min_width = min_menu_width;
+        }
+    }
+#endif
+}
+
 void set_geom_hints(struct gui_data *inst)
 {
     GdkGeometry geom;
-    geom.min_width = inst->font_width + 2*inst->window_border;
-    geom.min_height = inst->font_height + 2*inst->window_border;
-    geom.max_width = geom.max_height = -1;
-    geom.base_width = 2*inst->window_border;
-    geom.base_height = 2*inst->window_border;
-    geom.width_inc = inst->font_width;
-    geom.height_inc = inst->font_height;
-    geom.min_aspect = geom.max_aspect = 0;
-    gtk_window_set_geometry_hints(GTK_WINDOW(inst->window), inst->area, &geom,
-                                  GDK_HINT_MIN_SIZE | GDK_HINT_BASE_SIZE |
-                                  GDK_HINT_RESIZE_INC);
+    gint flags = GDK_HINT_MIN_SIZE | GDK_HINT_BASE_SIZE | GDK_HINT_RESIZE_INC;
+    compute_geom_hints(inst, &geom);
+#if GTK_CHECK_VERSION(2,0,0)
+    if (inst->gotpos)
+        flags |= GDK_HINT_USER_POS;
+#endif
+    gtk_window_set_geometry_hints(GTK_WINDOW(inst->window),
+                                  NULL, &geom, flags);
+}
+
+#if GTK_CHECK_VERSION(2,0,0)
+static void compute_whole_window_size(struct gui_data *inst,
+                                      int wchars, int hchars,
+                                      int *wpix, int *hpix)
+{
+    GdkGeometry geom;
+    compute_geom_hints(inst, &geom);
+    if (wpix) *wpix = geom.base_width + wchars * geom.width_inc;
+    if (hpix) *hpix = geom.base_height + hchars * geom.height_inc;
 }
+#endif
 
 void clear_scrollback_menuitem(GtkMenuItem *item, gpointer data)
 {
@@ -3032,8 +3787,8 @@ void copy_all_menuitem(GtkMenuItem *item, gpointer data)
 void special_menuitem(GtkMenuItem *item, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
-    int code = GPOINTER_TO_INT(gtk_object_get_data(GTK_OBJECT(item),
-                                                  "user-data"));
+    int code = GPOINTER_TO_INT(g_object_get_data(G_OBJECT(item),
+                                                 "user-data"));
 
     if (inst->back)
        inst->back->special(inst->backhandle, code);
@@ -3129,16 +3884,16 @@ void change_settings_menuitem(GtkMenuItem *item, gpointer data)
            }
         }
 
+        need_size = FALSE;
+
         /*
          * If the scrollbar needs to be shown, hidden, or moved
          * from one end to the other of the window, do so now.
          */
         if (conf_get_int(oldconf, CONF_scrollbar) !=
            conf_get_int(newconf, CONF_scrollbar)) {
-            if (conf_get_int(newconf, CONF_scrollbar))
-                gtk_widget_show(inst->sbar);
-            else
-                gtk_widget_hide(inst->sbar);
+            show_scrollbar(inst, conf_get_int(newconf, CONF_scrollbar));
+            need_size = TRUE;
         }
         if (conf_get_int(oldconf, CONF_scrollbar_on_left) !=
            conf_get_int(newconf, CONF_scrollbar_on_left)) {
@@ -3159,7 +3914,6 @@ void change_settings_menuitem(GtkMenuItem *item, gpointer data)
          * Redo the whole tangled fonts and Unicode mess if
          * necessary.
          */
-        need_size = FALSE;
         if (strcmp(conf_get_fontspec(oldconf, CONF_font)->name,
                   conf_get_fontspec(newconf, CONF_font)->name) ||
            strcmp(conf_get_fontspec(oldconf, CONF_boldfont)->name,
@@ -3185,7 +3939,7 @@ void change_settings_menuitem(GtkMenuItem *item, gpointer data)
                               errmsg);
                 messagebox(inst->window, "Font setup error", msgboxtext,
                            string_width("Could not change fonts in terminal window:"),
-                           "OK", 'o', +1, 1,
+                           FALSE, "OK", 'o', +1, 1,
                            NULL);
                 sfree(msgboxtext);
                 sfree(errmsg);
@@ -3237,200 +3991,77 @@ void change_settings_menuitem(GtkMenuItem *item, gpointer data)
     inst->reconfiguring = FALSE;
 }
 
-void fork_and_exec_self(struct gui_data *inst, int fd_to_close, ...)
+static void change_font_size(struct gui_data *inst, int increment)
 {
-    /*
-     * Re-execing ourself is not an exact science under Unix. I do
-     * the best I can by using /proc/self/exe if available and by
-     * assuming argv[0] can be found on $PATH if not.
-     * 
-     * Note that we also have to reconstruct the elements of the
-     * original argv which gtk swallowed, since the user wants the
-     * new session to appear on the same X display as the old one.
-     */
-    char **args;
-    va_list ap;
-    int i, n;
-    int pid;
-
-    /*
-     * Collect the arguments with which to re-exec ourself.
-     */
-    va_start(ap, fd_to_close);
-    n = 2;                            /* progname and terminating NULL */
-    n += inst->ngtkargs;
-    while (va_arg(ap, char *) != NULL)
-       n++;
-    va_end(ap);
-
-    args = snewn(n, char *);
-    args[0] = inst->progname;
-    args[n-1] = NULL;
-    for (i = 0; i < inst->ngtkargs; i++)
-       args[i+1] = inst->gtkargvstart[i];
+    static const int conf_keys[lenof(inst->fonts)] = {
+        CONF_font, CONF_boldfont, CONF_widefont, CONF_wideboldfont,
+    };
+    FontSpec *oldfonts[lenof(inst->fonts)];
+    FontSpec *newfonts[lenof(inst->fonts)];
+    char *errmsg = NULL;
+    int i;
 
-    i++;
-    va_start(ap, fd_to_close);
-    while ((args[i++] = va_arg(ap, char *)) != NULL);
-    va_end(ap);
+    for (i = 0; i < lenof(newfonts); i++)
+        oldfonts[i] = newfonts[i] = NULL;
 
-    assert(i == n);
+    for (i = 0; i < lenof(inst->fonts); i++) {
+        if (inst->fonts[i]) {
+            char *newname = unifont_size_increment(inst->fonts[i], increment);
+            if (!newname)
+                goto cleanup;
+            newfonts[i] = fontspec_new(newname);
+            sfree(newname);
+        }
+    }
 
-    /*
-     * Do the double fork.
-     */
-    pid = fork();
-    if (pid < 0) {
-       perror("fork");
-        sfree(args);
-       return;
+    for (i = 0; i < lenof(newfonts); i++) {
+        if (newfonts[i]) {
+            oldfonts[i] = fontspec_copy(
+                conf_get_fontspec(inst->conf, conf_keys[i]));
+            conf_set_fontspec(inst->conf, conf_keys[i], newfonts[i]);
+        }
     }
 
-    if (pid == 0) {
-       int pid2 = fork();
-       if (pid2 < 0) {
-           perror("fork");
-           _exit(1);
-       } else if (pid2 > 0) {
-           /*
-            * First child has successfully forked second child. My
-            * Work Here Is Done. Note the use of _exit rather than
-            * exit: the latter appears to cause destroy messages
-            * to be sent to the X server. I suspect gtk uses
-            * atexit.
-            */
-           _exit(0);
-       }
+    errmsg = setup_fonts_ucs(inst);
+    if (errmsg)
+        goto cleanup;
 
-       /*
-        * If we reach here, we are the second child, so we now
-        * actually perform the exec.
-        */
-       if (fd_to_close >= 0)
-           close(fd_to_close);
+    /* Success, so suppress putting everything back */
+    for (i = 0; i < lenof(newfonts); i++) {
+        if (oldfonts[i]) {
+            fontspec_free(oldfonts[i]);
+            oldfonts[i] = NULL;
+        }
+    }
 
-       execv("/proc/self/exe", args);
-       execvp(inst->progname, args);
-       perror("exec");
-       _exit(127);
+    set_geom_hints(inst);
+    request_resize(inst, conf_get_int(inst->conf, CONF_width),
+                   conf_get_int(inst->conf, CONF_height));
+    term_invalidate(inst->term);
+    gtk_widget_queue_draw(inst->area);
 
-    } else {
-       int status;
-        sfree(args);
-       waitpid(pid, &status, 0);
+  cleanup:
+    for (i = 0; i < lenof(oldfonts); i++) {
+        if (oldfonts[i]) {
+            conf_set_fontspec(inst->conf, conf_keys[i], oldfonts[i]);
+            fontspec_free(oldfonts[i]);
+        }
+        if (newfonts[i])
+            fontspec_free(newfonts[i]);
     }
-
+    sfree(errmsg);
 }
 
 void dup_session_menuitem(GtkMenuItem *item, gpointer gdata)
 {
     struct gui_data *inst = (struct gui_data *)gdata;
-    /*
-     * For this feature we must marshal conf and (possibly) pty_argv
-     * into a byte stream, create a pipe, and send this byte stream
-     * to the child through the pipe.
-     */
-    int i, ret, sersize, size;
-    char *data;
-    char option[80];
-    int pipefd[2];
-
-    if (pipe(pipefd) < 0) {
-       perror("pipe");
-       return;
-    }
-
-    size = sersize = conf_serialised_size(inst->conf);
-    if (use_pty_argv && pty_argv) {
-       for (i = 0; pty_argv[i]; i++)
-           size += strlen(pty_argv[i]) + 1;
-    }
-
-    data = snewn(size, char);
-    conf_serialise(inst->conf, data);
-    if (use_pty_argv && pty_argv) {
-       int p = sersize;
-       for (i = 0; pty_argv[i]; i++) {
-           strcpy(data + p, pty_argv[i]);
-           p += strlen(pty_argv[i]) + 1;
-       }
-       assert(p == size);
-    }
-
-    sprintf(option, "---[%d,%d]", pipefd[0], size);
-    noncloexec(pipefd[0]);
-    fork_and_exec_self(inst, pipefd[1], option, NULL);
-    close(pipefd[0]);
-
-    i = ret = 0;
-    while (i < size && (ret = write(pipefd[1], data + i, size - i)) > 0)
-       i += ret;
-    if (ret < 0)
-       perror("write to pipe");
-    close(pipefd[1]);
-    sfree(data);
-}
-
-int read_dupsession_data(struct gui_data *inst, Conf *conf, char *arg)
-{
-    int fd, i, ret, size, size_used;
-    char *data;
-
-    if (sscanf(arg, "---[%d,%d]", &fd, &size) != 2) {
-       fprintf(stderr, "%s: malformed magic argument `%s'\n", appname, arg);
-       exit(1);
-    }
-
-    data = snewn(size, char);
-    i = ret = 0;
-    while (i < size && (ret = read(fd, data + i, size - i)) > 0)
-       i += ret;
-    if (ret < 0) {
-       perror("read from pipe");
-       exit(1);
-    } else if (i < size) {
-       fprintf(stderr, "%s: unexpected EOF in Duplicate Session data\n",
-               appname);
-       exit(1);
-    }
-
-    size_used = conf_deserialise(conf, data, size);
-    if (use_pty_argv && size > size_used) {
-       int n = 0;
-       i = size_used;
-       while (i < size) {
-           while (i < size && data[i]) i++;
-           if (i >= size) {
-               fprintf(stderr, "%s: malformed Duplicate Session data\n",
-                       appname);
-               exit(1);
-           }
-           i++;
-           n++;
-       }
-       pty_argv = snewn(n+1, char *);
-       pty_argv[n] = NULL;
-       n = 0;
-       i = size_used;
-       while (i < size) {
-           char *p = data + i;
-           while (i < size && data[i]) i++;
-           assert(i < size);
-           i++;
-           pty_argv[n++] = dupstr(p);
-       }
-    }
-
-    sfree(data);
 
-    return 0;
+    launch_duplicate_session(inst->conf);
 }
 
 void new_session_menuitem(GtkMenuItem *item, gpointer data)
 {
-    struct gui_data *inst = (struct gui_data *)data;
-
-    fork_and_exec_self(inst, -1, NULL);
+    launch_new_session();
 }
 
 void restart_session_menuitem(GtkMenuItem *item, gpointer data)
@@ -3447,15 +4078,14 @@ void restart_session_menuitem(GtkMenuItem *item, gpointer data)
 
 void saved_session_menuitem(GtkMenuItem *item, gpointer data)
 {
-    struct gui_data *inst = (struct gui_data *)data;
-    char *str = (char *)gtk_object_get_data(GTK_OBJECT(item), "user-data");
+    char *str = (char *)g_object_get_data(G_OBJECT(item), "user-data");
 
-    fork_and_exec_self(inst, -1, "-load", str, NULL);
+    launch_saved_session(str);
 }
 
 void saved_session_freedata(GtkMenuItem *item, gpointer data)
 {
-    char *str = (char *)gtk_object_get_data(GTK_OBJECT(item), "user-data");
+    char *str = (char *)g_object_get_data(G_OBJECT(item), "user-data");
 
     sfree(str);
 }
@@ -3476,14 +4106,14 @@ static void update_savedsess_menu(GtkMenuItem *menuitem, gpointer data)
            gtk_menu_item_new_with_label(sesslist.sessions[i]);
        gtk_container_add(GTK_CONTAINER(inst->sessionsmenu), menuitem);
        gtk_widget_show(menuitem);
-       gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
-                           dupstr(sesslist.sessions[i]));
-       gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
-                          GTK_SIGNAL_FUNC(saved_session_menuitem),
-                          inst);
-       gtk_signal_connect(GTK_OBJECT(menuitem), "destroy",
-                          GTK_SIGNAL_FUNC(saved_session_freedata),
-                          inst);
+        g_object_set_data(G_OBJECT(menuitem), "user-data",
+                          dupstr(sesslist.sessions[i]));
+        g_signal_connect(G_OBJECT(menuitem), "activate",
+                         G_CALLBACK(saved_session_menuitem),
+                         inst);
+        g_signal_connect(G_OBJECT(menuitem), "destroy",
+                         G_CALLBACK(saved_session_freedata),
+                         inst);
     }
     if (sesslist.nsessions <= 1) {
        GtkWidget *menuitem =
@@ -3498,20 +4128,26 @@ static void update_savedsess_menu(GtkMenuItem *menuitem, gpointer data)
 void set_window_icon(GtkWidget *window, const char *const *const *icon,
                     int n_icon)
 {
-    GdkPixmap *iconpm;
-    GdkBitmap *iconmask;
 #if GTK_CHECK_VERSION(2,0,0)
     GList *iconlist;
     int n;
+#else
+    GdkPixmap *iconpm;
+    GdkBitmap *iconmask;
 #endif
 
     if (!n_icon)
        return;
 
     gtk_widget_realize(window);
-    iconpm = gdk_pixmap_create_from_xpm_d(window->window, &iconmask,
-                                         NULL, (gchar **)icon[0]);
-    gdk_window_set_icon(window->window, NULL, iconpm, iconmask);
+#if GTK_CHECK_VERSION(2,0,0)
+    gtk_window_set_icon(GTK_WINDOW(window),
+                        gdk_pixbuf_new_from_xpm_data((const gchar **)icon[0]));
+#else
+    iconpm = gdk_pixmap_create_from_xpm_d(gtk_widget_get_window(window),
+                                          &iconmask, NULL, (gchar **)icon[0]);
+    gdk_window_set_icon(gtk_widget_get_window(window), NULL, iconpm, iconmask);
+#endif
 
 #if GTK_CHECK_VERSION(2,0,0)
     iconlist = NULL;
@@ -3521,7 +4157,7 @@ void set_window_icon(GtkWidget *window, const char *const *const *icon,
                          gdk_pixbuf_new_from_xpm_data((const gchar **)
                                                       icon[n]));
     }
-    gdk_window_set_icon_list(window->window, iconlist);
+    gtk_window_set_icon_list(GTK_WINDOW(window), iconlist);
 #endif
 }
 
@@ -3571,10 +4207,10 @@ void update_specials_menu(void *frontend)
                break;
              default:
                menuitem = gtk_menu_item_new_with_label(specials[i].name);
-               gtk_object_set_data(GTK_OBJECT(menuitem), "user-data",
-                                   GINT_TO_POINTER(specials[i].code));
-               gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
-                                  GTK_SIGNAL_FUNC(special_menuitem), inst);
+                g_object_set_data(G_OBJECT(menuitem), "user-data",
+                                  GINT_TO_POINTER(specials[i].code));
+                g_signal_connect(G_OBJECT(menuitem), "activate",
+                                 G_CALLBACK(special_menuitem), inst);
                break;
            }
            if (menuitem) {
@@ -3637,13 +4273,10 @@ static void start_backend(struct gui_data *inst)
     gtk_widget_set_sensitive(inst->restartitem, FALSE);
 }
 
-int pt_main(int argc, char **argv)
+struct gui_data *new_session_window(Conf *conf, const char *geometry_string)
 {
-    extern int cfgbox(Conf *conf);
     struct gui_data *inst;
 
-    setlocale(LC_CTYPE, "");
-
     /*
      * Create an instance structure and initialise to zeroes
      */
@@ -3651,54 +4284,32 @@ int pt_main(int argc, char **argv)
     memset(inst, 0, sizeof(*inst));
     inst->alt_keycode = -1;            /* this one needs _not_ to be zero */
     inst->busy_status = BUSY_NOT;
-    inst->conf = conf_new();
+    inst->conf = conf;
     inst->wintitle = inst->icontitle = NULL;
-    inst->quit_fn_scheduled = FALSE;
-    inst->idle_fn_scheduled = FALSE;
-
-    /* defer any child exit handling until we're ready to deal with
-     * it */
-    block_signal(SIGCHLD, 1);
-
-    inst->progname = argv[0];
-    /*
-     * Copy the original argv before letting gtk_init fiddle with
-     * it. It will be required later.
-     */
-    {
-       int i, oldargc;
-       inst->gtkargvstart = snewn(argc-1, char *);
-       for (i = 1; i < argc; i++)
-           inst->gtkargvstart[i-1] = dupstr(argv[i]);
-       oldargc = argc;
-       gtk_init(&argc, &argv);
-       inst->ngtkargs = oldargc - argc;
-    }
-
-    if (argc > 1 && !strncmp(argv[1], "---", 3)) {
-       read_dupsession_data(inst, inst->conf, argv[1]);
-       /* Splatter this argument so it doesn't clutter a ps listing */
-       smemclr(argv[1], strlen(argv[1]));
-    } else {
-       /* By default, we bring up the config dialog, rather than launching
-        * a session. This gets set to TRUE if something happens to change
-        * that (e.g., a hostname is specified on the command-line). */
-       int allow_launch = FALSE;
-       if (do_cmdline(argc, argv, 0, &allow_launch, inst, inst->conf))
-           exit(1);                   /* pre-defaults pass to get -class */
-       do_defaults(NULL, inst->conf);
-       if (do_cmdline(argc, argv, 1, &allow_launch, inst, inst->conf))
-           exit(1);                   /* post-defaults, do everything */
-
-       cmdline_run_saved(inst->conf);
-
-       if (loaded_session)
-           allow_launch = TRUE;
+    inst->drawtype = DRAWTYPE_DEFAULT;
+#if GTK_CHECK_VERSION(3,4,0)
+    inst->cumulative_scroll = 0.0;
+#endif
 
-       if ((!allow_launch || !conf_launchable(inst->conf)) &&
-           !cfgbox(inst->conf))
-           exit(0);                   /* config box hit Cancel */
+#ifndef NOT_X_WINDOWS
+    if (geometry_string) {
+        int flags, x, y;
+        unsigned int w, h;
+        flags = XParseGeometry(geometry_string, &x, &y, &w, &h);
+        if (flags & WidthValue)
+            conf_set_int(conf, CONF_width, w);
+        if (flags & HeightValue)
+            conf_set_int(conf, CONF_height, h);
+
+        if (flags & (XValue | YValue)) {
+            inst->xpos = x;
+            inst->ypos = y;
+            inst->gotpos = TRUE;
+            inst->gravity = ((flags & XNegative ? 1 : 0) |
+                             (flags & YNegative ? 2 : 0));
+        }
     }
+#endif
 
     if (!compound_text_atom)
         compound_text_atom = gdk_atom_intern("COMPOUND_TEXT", FALSE);
@@ -3718,9 +4329,7 @@ int pt_main(int argc, char **argv)
             exit(1);
         }
     }
-    init_cutbuffers();
-
-    inst->window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
+    inst->window = make_gtk_toplevel_window(inst);
     {
         const char *winclass = conf_get_str(inst->conf, CONF_winclass);
         if (*winclass)
@@ -3737,9 +4346,8 @@ int pt_main(int argc, char **argv)
     inst->height = conf_get_int(inst->conf, CONF_height);
     cache_conf_values(inst);
 
-    gtk_drawing_area_size(GTK_DRAWING_AREA(inst->area),
-                         inst->font_width * inst->width + 2*inst->window_border,
-                         inst->font_height * inst->height + 2*inst->window_border);
+    init_clipboard(inst);
+
     inst->sbar_adjust = GTK_ADJUSTMENT(gtk_adjustment_new(0,0,0,0,0,0));
     inst->sbar = gtk_vscrollbar_new(inst->sbar_adjust);
     inst->hbox = GTK_BOX(gtk_hbox_new(FALSE, 0));
@@ -3756,15 +4364,55 @@ int pt_main(int argc, char **argv)
 
     gtk_container_add(GTK_CONTAINER(inst->window), GTK_WIDGET(inst->hbox));
 
-    set_geom_hints(inst);
-
     gtk_widget_show(inst->area);
-    if (conf_get_int(inst->conf, CONF_scrollbar))
-       gtk_widget_show(inst->sbar);
-    else
-       gtk_widget_hide(inst->sbar);
+    show_scrollbar(inst, conf_get_int(inst->conf, CONF_scrollbar));
     gtk_widget_show(GTK_WIDGET(inst->hbox));
 
+    /*
+     * We must call gtk_widget_realize before setting up the geometry
+     * hints, so that GtkApplicationWindow will have actually created
+     * its menu bar (if it's going to) and hence compute_geom_hints
+     * can find it to take its size into account.
+     */
+    gtk_widget_realize(inst->window);
+    set_geom_hints(inst);
+
+#if GTK_CHECK_VERSION(3,0,0)
+    {
+        int wp, hp;
+        compute_whole_window_size(inst, inst->width, inst->height, &wp, &hp);
+        gtk_window_set_default_size(GTK_WINDOW(inst->window), wp, hp);
+    }
+#else
+    {
+        int w = inst->font_width * inst->width + 2*inst->window_border;
+        int h = inst->font_height * inst->height + 2*inst->window_border;
+#if GTK_CHECK_VERSION(2,0,0)
+        gtk_widget_set_size_request(inst->area, w, h);
+#else
+        gtk_drawing_area_size(GTK_DRAWING_AREA(inst->area), w, h);
+#endif
+    }
+#endif
+
+#if GTK_CHECK_VERSION(2,0,0)
+    if (inst->gotpos) {
+        static const GdkGravity gravities[] = {
+            GDK_GRAVITY_NORTH_WEST,
+            GDK_GRAVITY_NORTH_EAST,
+            GDK_GRAVITY_SOUTH_WEST,
+            GDK_GRAVITY_SOUTH_EAST,
+        };
+        int x = inst->xpos, y = inst->ypos;
+        int wp, hp;
+        compute_whole_window_size(inst, inst->width, inst->height, &wp, &hp);
+        if (inst->gravity & 1) x += (gdk_screen_width() - wp);
+        if (inst->gravity & 2) y += (gdk_screen_height() - hp);
+        gtk_window_set_gravity(GTK_WINDOW(inst->window),
+                               gravities[inst->gravity & 3]);
+       gtk_window_move(GTK_WINDOW(inst->window), x, y);
+    }
+#else
     if (inst->gotpos) {
         int x = inst->xpos, y = inst->ypos;
         GtkRequisition req;
@@ -3774,50 +4422,54 @@ int pt_main(int argc, char **argv)
        gtk_window_set_position(GTK_WINDOW(inst->window), GTK_WIN_POS_NONE);
        gtk_widget_set_uposition(GTK_WIDGET(inst->window), x, y);
     }
+#endif
 
-    gtk_signal_connect(GTK_OBJECT(inst->window), "destroy",
-                      GTK_SIGNAL_FUNC(destroy), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->window), "delete_event",
-                      GTK_SIGNAL_FUNC(delete_window), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->window), "key_press_event",
-                      GTK_SIGNAL_FUNC(key_event), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->window), "key_release_event",
-                      GTK_SIGNAL_FUNC(key_event), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->window), "focus_in_event",
-                      GTK_SIGNAL_FUNC(focus_event), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->window), "focus_out_event",
-                      GTK_SIGNAL_FUNC(focus_event), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->area), "configure_event",
-                      GTK_SIGNAL_FUNC(configure_area), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->area), "expose_event",
-                      GTK_SIGNAL_FUNC(expose_area), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->area), "button_press_event",
-                      GTK_SIGNAL_FUNC(button_event), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->area), "button_release_event",
-                      GTK_SIGNAL_FUNC(button_event), inst);
+    g_signal_connect(G_OBJECT(inst->window), "destroy",
+                     G_CALLBACK(destroy), inst);
+    g_signal_connect(G_OBJECT(inst->window), "delete_event",
+                     G_CALLBACK(delete_window), inst);
+    g_signal_connect(G_OBJECT(inst->window), "key_press_event",
+                     G_CALLBACK(key_event), inst);
+    g_signal_connect(G_OBJECT(inst->window), "key_release_event",
+                     G_CALLBACK(key_event), inst);
+    g_signal_connect(G_OBJECT(inst->window), "focus_in_event",
+                     G_CALLBACK(focus_event), inst);
+    g_signal_connect(G_OBJECT(inst->window), "focus_out_event",
+                     G_CALLBACK(focus_event), inst);
+    g_signal_connect(G_OBJECT(inst->area), "configure_event",
+                     G_CALLBACK(configure_area), inst);
+#if GTK_CHECK_VERSION(3,0,0)
+    g_signal_connect(G_OBJECT(inst->area), "draw",
+                     G_CALLBACK(draw_area), inst);
+#else
+    g_signal_connect(G_OBJECT(inst->area), "expose_event",
+                     G_CALLBACK(expose_area), inst);
+#endif
+    g_signal_connect(G_OBJECT(inst->area), "button_press_event",
+                     G_CALLBACK(button_event), inst);
+    g_signal_connect(G_OBJECT(inst->area), "button_release_event",
+                     G_CALLBACK(button_event), inst);
 #if GTK_CHECK_VERSION(2,0,0)
-    gtk_signal_connect(GTK_OBJECT(inst->area), "scroll_event",
-                      GTK_SIGNAL_FUNC(scroll_event), inst);
-#endif
-    gtk_signal_connect(GTK_OBJECT(inst->area), "motion_notify_event",
-                      GTK_SIGNAL_FUNC(motion_event), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->area), "selection_received",
-                      GTK_SIGNAL_FUNC(selection_received), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->area), "selection_get",
-                      GTK_SIGNAL_FUNC(selection_get), inst);
-    gtk_signal_connect(GTK_OBJECT(inst->area), "selection_clear_event",
-                      GTK_SIGNAL_FUNC(selection_clear), inst);
+    g_signal_connect(G_OBJECT(inst->area), "scroll_event",
+                     G_CALLBACK(scroll_event), inst);
+#endif
+    g_signal_connect(G_OBJECT(inst->area), "motion_notify_event",
+                     G_CALLBACK(motion_event), inst);
 #if GTK_CHECK_VERSION(2,0,0)
     g_signal_connect(G_OBJECT(inst->imc), "commit",
                      G_CALLBACK(input_method_commit_event), inst);
 #endif
     if (conf_get_int(inst->conf, CONF_scrollbar))
-       gtk_signal_connect(GTK_OBJECT(inst->sbar_adjust), "value_changed",
-                          GTK_SIGNAL_FUNC(scrollbar_moved), inst);
+        g_signal_connect(G_OBJECT(inst->sbar_adjust), "value_changed",
+                         G_CALLBACK(scrollbar_moved), inst);
     gtk_widget_add_events(GTK_WIDGET(inst->area),
                          GDK_KEY_PRESS_MASK | GDK_KEY_RELEASE_MASK |
                          GDK_BUTTON_PRESS_MASK | GDK_BUTTON_RELEASE_MASK |
-                         GDK_POINTER_MOTION_MASK | GDK_BUTTON_MOTION_MASK);
+                         GDK_POINTER_MOTION_MASK | GDK_BUTTON_MOTION_MASK
+#if GTK_CHECK_VERSION(3,4,0)
+                          | GDK_SMOOTH_SCROLL_MASK
+#endif
+        );
 
     {
        extern const char *const *const main_icon[];
@@ -3844,8 +4496,8 @@ int pt_main(int argc, char **argv)
             menuitem = gtk_menu_item_new_with_label(title);             \
             gtk_container_add(GTK_CONTAINER(inst->menu), menuitem);     \
             gtk_widget_show(menuitem);                                  \
-            gtk_signal_connect(GTK_OBJECT(menuitem), "activate",        \
-                               GTK_SIGNAL_FUNC(func), inst);            \
+            g_signal_connect(G_OBJECT(menuitem), "activate",            \
+                             G_CALLBACK(func), inst);                   \
         } while (0)
 
 #define MKSUBMENU(title) do                                             \
@@ -3905,20 +4557,15 @@ int pt_main(int argc, char **argv)
     inst->rawcursor = make_mouse_ptr(inst, GDK_LEFT_PTR);
     inst->waitcursor = make_mouse_ptr(inst, GDK_WATCH);
     inst->blankcursor = make_mouse_ptr(inst, -1);
-    make_mouse_ptr(inst, -2);         /* clean up cursor font */
     inst->currcursor = inst->textcursor;
     show_mouseptr(inst, 1);
 
     inst->eventlogstuff = eventlogstuff_new();
 
-    request_callback_notifications(notify_toplevel_callback, inst);
-
     inst->term = term_init(inst->conf, &inst->ucsdata, inst);
     inst->logctx = log_init(inst, inst->conf);
     term_provide_logctx(inst->term, inst->logctx);
 
-    uxsel_init();
-
     term_size(inst->term, inst->height, inst->width,
              conf_get_int(inst->conf, CONF_savelines));
 
@@ -3926,22 +4573,7 @@ int pt_main(int argc, char **argv)
 
     ldisc_echoedit_update(inst->ldisc);     /* cause ldisc to notice changes */
 
-    /* now we're reday to deal with the child exit handler being
-     * called */
-    block_signal(SIGCHLD, 0);
-
-    /*
-     * Block SIGPIPE: if we attempt Duplicate Session or similar
-     * and it falls over in some way, we certainly don't want
-     * SIGPIPE terminating the main pterm/PuTTY. Note that we do
-     * this _after_ (at least pterm) forks off its child process,
-     * since the child wants SIGPIPE handled in the usual way.
-     */
-    block_signal(SIGPIPE, 1);
-
     inst->exited = FALSE;
 
-    gtk_main();
-
-    return 0;
+    return inst;
 }