Add a configuration option for TCP keepalives (SO_KEEPALIVE), default off.
[sgt/putty] / unix / pterm.c
index 5649fe0..8e2554d 100644 (file)
@@ -22,6 +22,7 @@
 #include <gdk/gdkx.h>
 #include <X11/Xlib.h>
 #include <X11/Xutil.h>
+#include <X11/Xatom.h>
 
 #define PUTTY_DO_GLOBALS              /* actually _define_ globals */
 
@@ -58,8 +59,8 @@ struct gui_data {
     wchar_t *pastein_data;
     int direct_to_font;
     int pastein_data_len;
-    char *pasteout_data, *pasteout_data_utf8;
-    int pasteout_data_len, pasteout_data_utf8_len;
+    char *pasteout_data, *pasteout_data_ctext, *pasteout_data_utf8;
+    int pasteout_data_len, pasteout_data_ctext_len, pasteout_data_utf8_len;
     int font_width, font_height;
     int width, height;
     int ignore_sbar;
@@ -81,6 +82,7 @@ struct gui_data {
     void *eventlogstuff;
     char *progname, **gtkargvstart;
     int ngtkargs;
+    guint32 input_event_time; /* Timestamp of the most recent input event. */
 };
 
 struct draw_ctx {
@@ -368,11 +370,20 @@ static void show_mouseptr(struct gui_data *inst, int show)
     inst->mouseptr_visible = show;
 }
 
+void draw_backing_rect(struct gui_data *inst)
+{
+    GdkGC *gc = gdk_gc_new(inst->area->window);
+    gdk_gc_set_foreground(gc, &inst->cols[18]);   /* default background */
+    gdk_draw_rectangle(inst->pixmap, gc, 1, 0, 0,
+                      inst->cfg.width * inst->font_width + 2*inst->cfg.window_border,
+                      inst->cfg.height * inst->font_height + 2*inst->cfg.window_border);
+    gdk_gc_unref(gc);
+}
+
 gint configure_area(GtkWidget *widget, GdkEventConfigure *event, gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
     int w, h, need_size = 0;
-    GdkGC *gc;
 
     /*
      * See if the terminal size has changed, in which case we must
@@ -397,12 +408,7 @@ gint configure_area(GtkWidget *widget, GdkEventConfigure *event, gpointer data)
                                  (inst->cfg.height * inst->font_height +
                                   2*inst->cfg.window_border), -1);
 
-    gc = gdk_gc_new(inst->area->window);
-    gdk_gc_set_foreground(gc, &inst->cols[18]);   /* default background */
-    gdk_draw_rectangle(inst->pixmap, gc, 1, 0, 0,
-                      inst->cfg.width * inst->font_width + 2*inst->cfg.window_border,
-                      inst->cfg.height * inst->font_height + 2*inst->cfg.window_border);
-    gdk_gc_unref(gc);
+    draw_backing_rect(inst);
 
     if (need_size && inst->term) {
        term_size(inst->term, h, w, inst->cfg.savelines);
@@ -443,6 +449,9 @@ gint key_event(GtkWidget *widget, GdkEventKey *event, gpointer data)
     wchar_t ucsoutput[2];
     int ucsval, start, end, special, use_ucsoutput;
 
+    /* Remember the timestamp. */
+    inst->input_event_time = event->time;
+
     /* By default, nothing is generated. */
     end = start = 0;
     special = use_ucsoutput = FALSE;
@@ -1017,6 +1026,9 @@ gint button_event(GtkWidget *widget, GdkEventButton *event, gpointer data)
     struct gui_data *inst = (struct gui_data *)data;
     int shift, ctrl, alt, x, y, button, act;
 
+    /* Remember the timestamp. */
+    inst->input_event_time = event->time;
+
     show_mouseptr(inst, 1);
 
     if (event->button == 4 && event->type == GDK_BUTTON_PRESS) {
@@ -1073,6 +1085,9 @@ gint motion_event(GtkWidget *widget, GdkEventMotion *event, gpointer data)
     struct gui_data *inst = (struct gui_data *)data;
     int shift, ctrl, alt, x, y, button;
 
+    /* Remember the timestamp. */
+    inst->input_event_time = event->time;
+
     show_mouseptr(inst, 1);
 
     shift = event->state & GDK_SHIFT_MASK;
@@ -1318,21 +1333,70 @@ void palette_reset(void *frontend)
     set_window_background(inst);
 }
 
+/* Ensure that all the cut buffers exist - according to the ICCCM, we must
+ * do this before we start using cut buffers.
+ */
+void init_cutbuffers()
+{
+    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER0, XA_STRING, 8, PropModeAppend, "", 0);
+    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER1, XA_STRING, 8, PropModeAppend, "", 0);
+    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER2, XA_STRING, 8, PropModeAppend, "", 0);
+    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER3, XA_STRING, 8, PropModeAppend, "", 0);
+    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER4, XA_STRING, 8, PropModeAppend, "", 0);
+    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER5, XA_STRING, 8, PropModeAppend, "", 0);
+    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER6, XA_STRING, 8, PropModeAppend, "", 0);
+    XChangeProperty(GDK_DISPLAY(), GDK_ROOT_WINDOW(),
+                   XA_CUT_BUFFER7, XA_STRING, 8, PropModeAppend, "", 0);
+}
+
+/* Store the data in a cut-buffer. */
+void store_cutbuffer(char * ptr, int len)
+{
+    /* ICCCM says we must rotate the buffers before storing to buffer 0. */
+    XRotateBuffers(GDK_DISPLAY(), 1);
+    XStoreBytes(GDK_DISPLAY(), ptr, len);
+}
+
+/* Retrieve data from a cut-buffer.
+ * Returned data needs to be freed with XFree().
+ */
+char * retrieve_cutbuffer(int * nbytes)
+{
+    char * ptr;
+    ptr = XFetchBytes(GDK_DISPLAY(), nbytes);
+    if (*nbytes <= 0 && ptr != 0) {
+       XFree(ptr);
+       ptr = 0;
+    }
+    return ptr;
+}
+
 void write_clip(void *frontend, wchar_t * data, int len, int must_deselect)
 {
     struct gui_data *inst = (struct gui_data *)frontend;
     if (inst->pasteout_data)
        sfree(inst->pasteout_data);
+    if (inst->pasteout_data_ctext)
+       sfree(inst->pasteout_data_ctext);
     if (inst->pasteout_data_utf8)
        sfree(inst->pasteout_data_utf8);
 
     /*
-     * Set up UTF-8 paste data. This only happens if we aren't in
-     * direct-to-font mode using the D800 hack.
+     * Set up UTF-8 and compound text paste data. This only happens
+     * if we aren't in direct-to-font mode using the D800 hack.
      */
     if (!inst->direct_to_font) {
        wchar_t *tmp = data;
        int tmplen = len;
+       XTextProperty tp;
+       char *list[1];
 
        inst->pasteout_data_utf8 = snewn(len*6, char);
        inst->pasteout_data_utf8_len = len*6;
@@ -1346,11 +1410,26 @@ void write_clip(void *frontend, wchar_t * data, int len, int must_deselect)
        } else {
            inst->pasteout_data_utf8 =
                sresize(inst->pasteout_data_utf8,
-                       inst->pasteout_data_utf8_len, char);
+                       inst->pasteout_data_utf8_len + 1, char);
+           inst->pasteout_data_utf8[inst->pasteout_data_utf8_len] = '\0';
+       }
+
+       /*
+        * Now let Xlib convert our UTF-8 data into compound text.
+        */
+       list[0] = inst->pasteout_data_utf8;
+       if (Xutf8TextListToTextProperty(GDK_DISPLAY(), 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 {
        inst->pasteout_data_utf8 = NULL;
        inst->pasteout_data_utf8_len = 0;
+       inst->pasteout_data_ctext = NULL;
+       inst->pasteout_data_ctext_len = 0;
     }
 
     inst->pasteout_data = snewn(len*6, char);
@@ -1367,12 +1446,15 @@ void write_clip(void *frontend, wchar_t * data, int len, int must_deselect)
            sresize(inst->pasteout_data, inst->pasteout_data_len, char);
     }
 
+    store_cutbuffer(inst->pasteout_data, inst->pasteout_data_len);
+
     if (gtk_selection_owner_set(inst->area, GDK_SELECTION_PRIMARY,
-                               GDK_CURRENT_TIME)) {
+                               inst->input_event_time)) {
        gtk_selection_add_target(inst->area, GDK_SELECTION_PRIMARY,
                                 GDK_SELECTION_TYPE_STRING, 1);
-       gtk_selection_add_target(inst->area, GDK_SELECTION_PRIMARY,
-                                compound_text_atom, 1);
+       if (inst->pasteout_data_ctext)
+           gtk_selection_add_target(inst->area, GDK_SELECTION_PRIMARY,
+                                    compound_text_atom, 1);
        if (inst->pasteout_data_utf8)
            gtk_selection_add_target(inst->area, GDK_SELECTION_PRIMARY,
                                     utf8_string_atom, 1);
@@ -1390,6 +1472,10 @@ void selection_get(GtkWidget *widget, GtkSelectionData *seldata,
        gtk_selection_data_set(seldata, seldata->target, 8,
                               inst->pasteout_data_utf8,
                               inst->pasteout_data_utf8_len);
+    else if (seldata->target == compound_text_atom)
+       gtk_selection_data_set(seldata, seldata->target, 8,
+                              inst->pasteout_data_ctext,
+                              inst->pasteout_data_ctext_len);
     else
        gtk_selection_data_set(seldata, seldata->target, 8,
                               inst->pasteout_data, inst->pasteout_data_len);
@@ -1399,13 +1485,18 @@ gint selection_clear(GtkWidget *widget, GdkEventSelection *seldata,
                     gpointer data)
 {
     struct gui_data *inst = (struct gui_data *)data;
+
     term_deselect(inst->term);
     if (inst->pasteout_data)
        sfree(inst->pasteout_data);
+    if (inst->pasteout_data_ctext)
+       sfree(inst->pasteout_data_ctext);
     if (inst->pasteout_data_utf8)
        sfree(inst->pasteout_data_utf8);
     inst->pasteout_data = NULL;
     inst->pasteout_data_len = 0;
+    inst->pasteout_data_ctext = NULL;
+    inst->pasteout_data_ctext_len = 0;
     inst->pasteout_data_utf8 = NULL;
     inst->pasteout_data_utf8_len = 0;
     return TRUE;
@@ -1429,14 +1520,16 @@ void request_paste(void *frontend)
         * fall back to an ordinary string.
         */
        gtk_selection_convert(inst->area, GDK_SELECTION_PRIMARY,
-                             utf8_string_atom, GDK_CURRENT_TIME);
+                             utf8_string_atom,
+                             inst->input_event_time);
     } else {
        /*
         * If we're in direct-to-font mode, we disable UTF-8
         * pasting, and go straight to ordinary string data.
         */
        gtk_selection_convert(inst->area, GDK_SELECTION_PRIMARY,
-                             GDK_SELECTION_TYPE_STRING, GDK_CURRENT_TIME);
+                             GDK_SELECTION_TYPE_STRING,
+                             inst->input_event_time);
     }
 }
 
@@ -1446,40 +1539,107 @@ 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 free_list_required = 0;
+    int free_required = 0;
+    int charset;
 
     if (seldata->target == utf8_string_atom && seldata->length <= 0) {
        /*
-        * Failed to get a UTF-8 selection string. Try an ordinary
+        * Failed to get a UTF-8 selection string. Try compound
+        * text next.
+        */
+       gtk_selection_convert(inst->area, GDK_SELECTION_PRIMARY,
+                             compound_text_atom,
+                             inst->input_event_time);
+       return;
+    }
+
+    if (seldata->target == compound_text_atom && seldata->length <= 0) {
+       /*
+        * Failed to get UTF-8 or compound text. Try an ordinary
         * string.
         */
        gtk_selection_convert(inst->area, GDK_SELECTION_PRIMARY,
-                             GDK_SELECTION_TYPE_STRING, GDK_CURRENT_TIME);
+                             GDK_SELECTION_TYPE_STRING,
+                             inst->input_event_time);
        return;
     }
 
     /*
-     * Any other failure should just go foom.
+     * 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 != utf8_string_atom))
-       return;                        /* Nothing happens. */
+    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) {
+       text = retrieve_cutbuffer(&length);
+       if (length == 0)
+           return;
+       /* Xterm is rumoured to expect Latin-1, though I havn't checked the
+        * source, so use that as a de-facto standard. */
+       charset = CS_ISO8859_1;
+       free_required = 1;
+    } 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) {
+               /*
+                * Compound text failed; fall back to STRING.
+                */
+               gtk_selection_convert(inst->area, GDK_SELECTION_PRIMARY,
+                                     GDK_SELECTION_TYPE_STRING,
+                                     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 ?
+                      CS_UTF8 : inst->ucsdata.line_codepage);
+       }
+    }
 
     if (inst->pastein_data)
        sfree(inst->pastein_data);
 
-    inst->pastein_data = snewn(seldata->length, wchar_t);
-    inst->pastein_data_len = seldata->length;
+    inst->pastein_data = snewn(length, wchar_t);
+    inst->pastein_data_len = length;
     inst->pastein_data_len =
-       mb_to_wc((seldata->type == utf8_string_atom ?
-                 CS_UTF8 : inst->ucsdata.line_codepage),
-                0, seldata->data, seldata->length,
+       mb_to_wc(charset, 0, text, length,
                 inst->pastein_data, inst->pastein_data_len);
 
     term_do_paste(inst->term);
 
     if (term_paste_pending(inst->term))
        inst->term_paste_idle_id = gtk_idle_add(idle_paste_func, inst);
+
+    if (free_list_required)
+       XFreeStringList(list);
+    if (free_required)
+       XFree(text);
 }
 
 gint idle_paste_func(gpointer data)
@@ -2463,23 +2623,27 @@ void setup_fonts_ucs(struct gui_data *inst)
     }
     font_charset = set_font_info(inst, 0);
 
-    if (inst->cfg.boldfont.name[0]) {
-       name = inst->cfg.boldfont.name;
-       guessed = FALSE;
+    if (inst->cfg.shadowbold) {
+       inst->fonts[1] = NULL;
     } else {
-       name = guess_derived_font_name(inst->fonts[0], TRUE, FALSE);
-       guessed = TRUE;
-    }
-    inst->fonts[1] = name ? gdk_font_load(name) : NULL;
-    if (inst->fonts[1]) {
-       set_font_info(inst, 1);
-    } else if (!guessed) {
-       fprintf(stderr, "%s: unable to load bold font \"%s\"\n", appname,
-               inst->cfg.boldfont.name);
-       exit(1);
+       if (inst->cfg.boldfont.name[0]) {
+           name = inst->cfg.boldfont.name;
+           guessed = FALSE;
+       } else {
+           name = guess_derived_font_name(inst->fonts[0], TRUE, FALSE);
+           guessed = TRUE;
+       }
+       inst->fonts[1] = name ? gdk_font_load(name) : NULL;
+       if (inst->fonts[1]) {
+           set_font_info(inst, 1);
+       } else if (!guessed) {
+           fprintf(stderr, "%s: unable to load bold font \"%s\"\n", appname,
+                   inst->cfg.boldfont.name);
+           exit(1);
+       }
+       if (guessed)
+           sfree(name);
     }
-    if (guessed)
-       sfree(name);
 
     if (inst->cfg.widefont.name[0]) {
        name = inst->cfg.widefont.name;
@@ -2499,33 +2663,37 @@ void setup_fonts_ucs(struct gui_data *inst)
     if (guessed)
        sfree(name);
 
-    if (inst->cfg.wideboldfont.name[0]) {
-       name = inst->cfg.wideboldfont.name;
-       guessed = FALSE;
+    if (inst->cfg.shadowbold) {
+       inst->fonts[3] = NULL;
     } else {
-       /*
-        * Here we have some choices. We can widen the bold font,
-        * bolden the wide font, or widen and bolden the standard
-        * font. Try them all, in that order!
-        */
-       if (inst->cfg.widefont.name[0])
-           name = guess_derived_font_name(inst->fonts[2], TRUE, FALSE);
-       else if (inst->cfg.boldfont.name[0])
-           name = guess_derived_font_name(inst->fonts[1], FALSE, TRUE);
-       else
-           name = guess_derived_font_name(inst->fonts[0], TRUE, TRUE);
-       guessed = TRUE;
-    }
-    inst->fonts[3] = name ? gdk_font_load(name) : NULL;
-    if (inst->fonts[3]) {
-       set_font_info(inst, 3);
-    } else if (!guessed) {
-       fprintf(stderr, "%s: unable to load wide/bold font \"%s\"\n", appname,
-               inst->cfg.wideboldfont.name);
-       exit(1);
+       if (inst->cfg.wideboldfont.name[0]) {
+           name = inst->cfg.wideboldfont.name;
+           guessed = FALSE;
+       } else {
+           /*
+            * Here we have some choices. We can widen the bold font,
+            * bolden the wide font, or widen and bolden the standard
+            * font. Try them all, in that order!
+            */
+           if (inst->cfg.widefont.name[0])
+               name = guess_derived_font_name(inst->fonts[2], TRUE, FALSE);
+           else if (inst->cfg.boldfont.name[0])
+               name = guess_derived_font_name(inst->fonts[1], FALSE, TRUE);
+           else
+               name = guess_derived_font_name(inst->fonts[0], TRUE, TRUE);
+           guessed = TRUE;
+       }
+       inst->fonts[3] = name ? gdk_font_load(name) : NULL;
+       if (inst->fonts[3]) {
+           set_font_info(inst, 3);
+       } else if (!guessed) {
+           fprintf(stderr, "%s: unable to load wide/bold font \"%s\"\n", appname,
+                   inst->cfg.wideboldfont.name);
+           exit(1);
+       }
+       if (guessed)
+           sfree(name);
     }
-    if (guessed)
-       sfree(name);
 
     inst->font_width = gdk_char_width(inst->fonts[0], ' ');
     inst->font_height = inst->fonts[0]->ascent + inst->fonts[0]->descent;
@@ -2634,10 +2802,21 @@ void change_settings_menuitem(GtkMenuItem *item, gpointer data)
         for (i = 0; i < NCOLOURS; i++) {
             if (oldcfg.colours[ww[i]][0] != cfg2.colours[ww[i]][0] ||
                 oldcfg.colours[ww[i]][1] != cfg2.colours[ww[i]][1] ||
-                oldcfg.colours[ww[i]][2] != cfg2.colours[ww[i]][2])
+                oldcfg.colours[ww[i]][2] != cfg2.colours[ww[i]][2]) {
                 real_palette_set(inst, i, cfg2.colours[ww[i]][0],
                                  cfg2.colours[ww[i]][1],
                                  cfg2.colours[ww[i]][2]);
+
+               /*
+                * If the default background has changed, we must
+                * repaint the space in between the window border
+                * and the text area.
+                */
+               if (i == 18) {
+                   set_window_background(inst);
+                   draw_backing_rect(inst);
+               }
+           }
         }
 
         /*
@@ -2671,7 +2850,8 @@ void change_settings_menuitem(GtkMenuItem *item, gpointer data)
             strcmp(oldcfg.widefont.name, cfg2.widefont.name) ||
             strcmp(oldcfg.wideboldfont.name, cfg2.wideboldfont.name) ||
             strcmp(oldcfg.line_codepage, cfg2.line_codepage) ||
-           oldcfg.vtmode != cfg2.vtmode) {
+           oldcfg.vtmode != cfg2.vtmode ||
+           oldcfg.shadowbold != cfg2.shadowbold) {
             setup_fonts_ucs(inst);
             need_size = 1;
         } else
@@ -2698,6 +2878,12 @@ void change_settings_menuitem(GtkMenuItem *item, gpointer data)
        }
 
         term_invalidate(inst->term);
+
+       /*
+        * We do an explicit full redraw here to ensure the window
+        * border has been redrawn as well as the text area.
+        */
+       gtk_widget_queue_draw(inst->area);
     }
     sfree(title);
 }
@@ -2996,6 +3182,7 @@ int pt_main(int argc, char **argv)
         utf8_string_atom = gdk_atom_intern("UTF8_STRING", FALSE);
 
     setup_fonts_ucs(inst);
+    init_cutbuffers();
 
     inst->window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
 
@@ -3180,7 +3367,8 @@ int pt_main(int argc, char **argv)
 
        error = inst->back->init((void *)inst, &inst->backhandle,
                                  &inst->cfg, inst->cfg.host, inst->cfg.port,
-                                 &realhost, inst->cfg.tcp_nodelay);
+                                 &realhost, inst->cfg.tcp_nodelay,
+                                inst->cfg.tcp_keepalives);
 
        if (error) {
            char *msg = dupprintf("Unable to open connection to %s:\n%s",