curses 1.2.6 → 1.4.0

data/vendor/PDCurses/x11/pdcx11.h

@@ -0,0 +1,191 @@
+/* Public Domain Curses */
+
+#ifdef HAVE_CONFIG_H
+# include "config.h"
+#endif
+
+#include <curspriv.h>
+
+#ifdef HAVE_UNISTD_H
+# include <unistd.h>
+#endif
+
+#include <signal.h>
+#include <ctype.h>
+#include <pwd.h>
+
+#include <sys/types.h>
+#include <sys/socket.h>
+#ifdef HAVE_FCNTL_H
+# include <fcntl.h>
+#endif
+#ifdef HAVE_SYS_SELECT_H
+# include <sys/select.h>   /* AIX needs this for FD_ZERO etc macros */
+#endif
+#include <sys/ipc.h>
+#include <sys/shm.h>
+
+#ifdef TIME_WITH_SYS_TIME
+# include <sys/time.h>
+# include <time.h>
+#else
+# ifdef HAVE_SYS_TIME_H
+#  include <sys/time.h>
+# else
+#  include <time.h>
+# endif
+#endif
+
+#include <Intrinsic.h>
+#include <StringDefs.h>
+#include <Shell.h>
+
+#ifdef USE_XAW3D
+# include <Xaw3d/Box.h>
+# include <Xaw3d/Scrollbar.h>
+#elif defined(USE_NEXTAW)
+# include <neXtaw/Box.h>
+# include <neXtaw/Scrollbar.h>
+#else
+# include <Xaw/Box.h>
+# include <Xaw/Scrollbar.h>
+#endif
+#include "x11/ScrollBox.h"
+
+#include "Xmu/StdSel.h"
+#include "Xmu/Atoms.h"
+
+#include <keysym.h>
+#include <Xatom.h>
+
+#define XCURSCR_Y_SIZE      (XCursesLINES * XCursesCOLS * sizeof(chtype))
+#define XCURSCR_FLAG_SIZE   (XCursesLINES * sizeof(int))
+#define XCURSCR_START_SIZE  (XCursesLINES * sizeof(int))
+#define XCURSCR_LENGTH_SIZE (XCursesLINES * sizeof(int))
+#define XCURSCR_ATRTAB_SIZE (PDC_COLOR_PAIRS * 2 * sizeof(short))
+#define XCURSCR_SIZE        (XCURSCR_FLAG_SIZE + XCURSCR_START_SIZE + \
+        XCURSCR_LENGTH_SIZE + XCURSCR_Y_SIZE + XCURSCR_ATRTAB_SIZE + \
+        sizeof(XColor))
+
+#define XCURSCR_Y_OFF(y)    ((y) * XCursesCOLS * sizeof(chtype))
+#define XCURSCR_FLAG_OFF    (XCURSCR_Y_OFF(0) + XCURSCR_Y_SIZE)
+#define XCURSCR_START_OFF   (XCURSCR_FLAG_OFF + XCURSCR_FLAG_SIZE)
+#define XCURSCR_LENGTH_OFF  (XCURSCR_START_OFF + XCURSCR_START_SIZE)
+#define XCURSCR_ATRTAB_OFF  (XCURSCR_LENGTH_OFF + XCURSCR_LENGTH_SIZE)
+#define XCURSCR_XCOLOR_OFF  (XCURSCR_ATRTAB_OFF + XCURSCR_ATRTAB_SIZE)
+
+typedef struct
+{
+    int lines;
+    int cols;
+    Pixel cursorColor;
+    Pixel colorBlack;
+    Pixel colorRed;
+    Pixel colorGreen;
+    Pixel colorYellow;
+    Pixel colorBlue;
+    Pixel colorMagenta;
+    Pixel colorCyan;
+    Pixel colorWhite;
+    Pixel colorBoldBlack;
+    Pixel colorBoldRed;
+    Pixel colorBoldGreen;
+    Pixel colorBoldYellow;
+    Pixel colorBoldBlue;
+    Pixel colorBoldMagenta;
+    Pixel colorBoldCyan;
+    Pixel colorBoldWhite;
+    Pixel pointerForeColor;
+    Pixel pointerBackColor;
+    XFontStruct *normalFont;
+    XFontStruct *italicFont;
+    XFontStruct *boldFont;
+    char *bitmap;
+#ifdef HAVE_XPM_H
+    char *pixmap;
+#endif
+    char *composeKey;
+    Cursor pointer;
+    int shmmin;
+    int borderWidth;
+    int borderColor;
+    int clickPeriod;
+    int doubleClickPeriod;
+    int scrollbarWidth;
+    int cursorBlinkRate;
+    char *textCursor;
+} XCursesAppData;
+
+extern XCursesAppData xc_app_data;
+
+#define XCURSESSHMMIN xc_app_data.shmmin
+
+#define XCLOGMSG (XCursesProcess ? "     X" : "CURSES")
+
+void XC_get_line_lock(int);
+void XC_release_line_lock(int);
+
+int PDC_display_cursor(int, int, int, int, int);
+
+void XCursesExitCursesProcess(int, char *);
+int XCursesInstruct(int);
+int XCursesInstructAndWait(int);
+int XCursesInitscr(int, char **);
+
+int XC_write_socket(int, const void *, int);
+int XC_read_socket(int, void *, int);
+int XC_write_display_socket_int(int);
+
+int XCursesSetupX(int argc, char *argv[]);
+RETSIGTYPE XCursesSigwinchHandler(int signo);
+
+#ifdef _HPUX_SOURCE
+# define FD_SET_CAST int *
+#else
+# define FD_SET_CAST fd_set *
+#endif
+
+extern fd_set xc_readfds;
+
+extern unsigned char *Xcurscr;
+extern int XCursesProcess;
+extern int shmidSP;
+extern int shmid_Xcurscr;
+extern int shmkeySP;
+extern int shmkey_Xcurscr;
+extern int xc_otherpid;
+extern int XCursesLINES;
+extern int XCursesCOLS;
+extern int xc_display_sock;
+extern int xc_key_sock;
+extern int xc_display_sockets[2];
+extern int xc_key_sockets[2];
+extern int xc_exit_sock;
+
+typedef RETSIGTYPE (*signal_handler)();
+
+signal_handler XCursesSetSignal(int, signal_handler);
+
+#ifdef PDCDEBUG
+void XC_say(const char *msg);
+# define XC_LOG(x) XC_say x
+#else
+# define XC_LOG(x)
+#endif
+
+#ifdef MOUSE_DEBUG
+# define MOUSE_LOG(x) printf x
+#else
+# define MOUSE_LOG(x)
+#endif
+
+enum
+{
+    CURSES_CLEAR_SELECTION, CURSES_DISPLAY_CURSOR, CURSES_SET_SELECTION,
+    CURSES_GET_SELECTION, CURSES_TITLE, CURSES_REFRESH_SCROLLBAR,
+    CURSES_RESIZE, CURSES_BELL, CURSES_CONTINUE, CURSES_CURSOR,
+    CURSES_CHILD, CURSES_REFRESH, CURSES_GET_COLOR, CURSES_SET_COLOR,
+    CURSES_BLINK_ON, CURSES_BLINK_OFF, CURSES_EXIT
+};
+
+extern short *xc_atrtab;

data/vendor/PDCurses/x11/sb.c

@@ -0,0 +1,155 @@
+/* Public Domain Curses */
+
+#include "pdcx11.h"
+
+/*man-start**************************************************************
+
+sb
+--
+
+### Synopsis
+
+    int sb_init(void)
+    int sb_set_horz(int total, int viewport, int cur)
+    int sb_set_vert(int total, int viewport, int cur)
+    int sb_get_horz(int *total, int *viewport, int *cur)
+    int sb_get_vert(int *total, int *viewport, int *cur)
+    int sb_refresh(void);
+
+### Description
+
+   These functions manipulate the scrollbar.
+
+### Return Value
+
+   All functions return OK on success and ERR on error.
+
+### Portability
+                             X/Open    BSD    SYS V
+    sb_init                     -       -       -
+    sb_set_horz                 -       -       -
+    sb_set_vert                 -       -       -
+    sb_get_horz                 -       -       -
+    sb_get_vert                 -       -       -
+    sb_refresh                  -       -       -
+
+**man-end****************************************************************/
+
+bool sb_started = FALSE;
+
+/* sb_init() is the sb initialization routine.
+   This must be called before initscr(). */
+
+int sb_init(void)
+{
+    PDC_LOG(("sb_init() - called\n"));
+
+    if (SP)
+        return ERR;
+
+    sb_started = TRUE;
+
+    return OK;
+}
+
+/* sb_set_horz() - Used to set horizontal scrollbar.
+
+   total = total number of columns
+   viewport = size of viewport in columns
+   cur = current column in total */
+
+int sb_set_horz(int total, int viewport, int cur)
+{
+    PDC_LOG(("sb_set_horz() - called: total %d viewport %d cur %d\n",
+             total, viewport, cur));
+
+    if (!SP)
+        return ERR;
+
+    SP->sb_total_x = total;
+    SP->sb_viewport_x = viewport;
+    SP->sb_cur_x = cur;
+
+    return OK;
+}
+
+/* sb_set_vert() - Used to set vertical scrollbar.
+
+   total = total number of columns on line
+   viewport = size of viewport in columns
+   cur = current column in total */
+
+int sb_set_vert(int total, int viewport, int cur)
+{
+    PDC_LOG(("sb_set_vert() - called: total %d viewport %d cur %d\n",
+             total, viewport, cur));
+
+    if (!SP)
+        return ERR;
+
+    SP->sb_total_y = total;
+    SP->sb_viewport_y = viewport;
+    SP->sb_cur_y = cur;
+
+    return OK;
+}
+
+/* sb_get_horz() - Used to get horizontal scrollbar.
+
+   total = total number of lines
+   viewport = size of viewport in lines
+   cur = current line in total */
+
+int sb_get_horz(int *total, int *viewport, int *cur)
+{
+    PDC_LOG(("sb_get_horz() - called\n"));
+
+    if (!SP)
+        return ERR;
+
+    if (total)
+        *total = SP->sb_total_x;
+    if (viewport)
+        *viewport = SP->sb_viewport_x;
+    if (cur)
+        *cur = SP->sb_cur_x;
+
+    return OK;
+}
+
+/* sb_get_vert() - Used to get vertical scrollbar.
+
+   total = total number of lines
+   viewport = size of viewport in lines
+   cur = current line in total */
+
+int sb_get_vert(int *total, int *viewport, int *cur)
+{
+    PDC_LOG(("sb_get_vert() - called\n"));
+
+    if (!SP)
+        return ERR;
+
+    if (total)
+        *total = SP->sb_total_y;
+    if (viewport)
+        *viewport = SP->sb_viewport_y;
+    if (cur)
+        *cur = SP->sb_cur_y;
+
+    return OK;
+}
+
+/* sb_refresh() - Used to draw the scrollbars. */
+
+int sb_refresh(void)
+{
+    PDC_LOG(("sb_refresh() - called\n"));
+
+    if (!SP)
+        return ERR;
+
+    XCursesInstruct(CURSES_REFRESH_SCROLLBAR);
+
+    return OK;
+}

data/vendor/PDCurses/x11/x11.c

@@ -0,0 +1,3686 @@
+/* Public Domain Curses */
+
+#include "pdcx11.h"
+
+#ifdef HAVE_DECKEYSYM_H
+# include <DECkeysym.h>
+#endif
+
+#ifdef HAVE_SUNKEYSYM_H
+# include <Sunkeysym.h>
+#endif
+
+#ifdef HAVE_XPM_H
+# include <xpm.h>
+#endif
+
+#if defined PDC_XIM
+# include <Xlocale.h>
+#endif
+
+#ifdef HAVE_XF86KEYSYM_H
+# include <XF86keysym.h>
+#endif
+
+#include <stdlib.h>
+#include <string.h>
+
+#ifndef XPOINTER_TYPEDEFED
+typedef char * XPointer;
+#endif
+
+#ifndef MAX_PATH
+# define MAX_PATH 256
+#endif
+
+XCursesAppData xc_app_data;
+
+#if NeedWidePrototypes
+# define PDC_SCROLLBAR_TYPE double
+#else
+# define PDC_SCROLLBAR_TYPE float
+#endif
+
+#define MAX_COLORS  256            /* maximum of "normal" colors */
+#define COLOR_CURSOR MAX_COLORS     /* color of cursor */
+#define COLOR_BORDER MAX_COLORS + 1 /* color of border */
+
+#define XCURSESDISPLAY (XtDisplay(drawing))
+#define XCURSESWIN     (XtWindow(drawing))
+
+/* Default icons for XCurses applications.  */
+
+#include "big_icon.xbm"
+#include "little_icon.xbm"
+
+#define CURSOR_BLINK_RATE 500
+         /* Used to be set in xc_app_data.cursorBlinkRate */
+
+static void _selection_off(void);
+static void _display_cursor(int, int, int, int);
+static void _redraw_cursor(void);
+static void _exit_process(int, int, char *);
+static void _send_key_to_curses(unsigned long, MOUSE_STATUS *, bool);
+
+static void XCursesButton(Widget, XEvent *, String *, Cardinal *);
+static void XCursesHandleString(Widget, XEvent *, String *, Cardinal *);
+static void XCursesKeyPress(Widget, XEvent *, String *, Cardinal *);
+static void XCursesPasteSelection(Widget, XButtonEvent *);
+
+static struct
+{
+    KeySym keycode;
+    bool numkeypad;
+    unsigned short normal;
+    unsigned short shifted;
+    unsigned short control;
+    unsigned short alt;
+} key_table[] =
+{
+/* keycode  keypad  normal   shifted       control      alt*/
+ {';',      FALSE,  ';',     ':',   CTL_SEMICOLON,  ALT_SEMICOLON },
+ {'=',      FALSE,  '=',     '+',   CTL_EQUAL,      ALT_EQUAL },
+ {',',      FALSE,  ',',     '<',   CTL_COMMA,      ALT_COMMA },
+ {'-',      FALSE,  '-',     '_',   CTL_MINUS,      ALT_MINUS },
+ {'.',      FALSE,  '.',     '>',   CTL_STOP,       ALT_STOP  },
+ {'/',      FALSE,  '/',     '?',   CTL_FSLASH,     ALT_FSLASH },
+ {'`',      FALSE,  '`',     '~',   CTL_BQUOTE,     ALT_BQUOTE },
+
+/* keycode      keypad  normal       shifted       control      alt*/
+ {XK_Left,      FALSE,  KEY_LEFT,    KEY_SLEFT,    CTL_LEFT,    ALT_LEFT},
+ {XK_Right,     FALSE,  KEY_RIGHT,   KEY_SRIGHT,   CTL_RIGHT,   ALT_RIGHT},
+ {XK_Up,        FALSE,  KEY_UP,      KEY_SUP,      CTL_UP,      ALT_UP},
+ {XK_Down,      FALSE,  KEY_DOWN,    KEY_SDOWN,    CTL_DOWN,    ALT_DOWN},
+ {XK_Home,      FALSE,  KEY_HOME,    KEY_SHOME,    CTL_HOME,    ALT_HOME},
+/* Sun Type 4 keyboard */
+ {XK_R7,        FALSE,  KEY_HOME,    KEY_SHOME,    CTL_HOME,    ALT_HOME},
+ {XK_End,       FALSE,  KEY_END,     KEY_SEND,     CTL_END,     ALT_END},
+/* Sun Type 4 keyboard */
+ {XK_R13,       FALSE,  KEY_END,     KEY_SEND,     CTL_END,     ALT_END},
+ {XK_Prior,     FALSE,  KEY_PPAGE,   KEY_SPREVIOUS,CTL_PGUP,    ALT_PGUP},
+/* Sun Type 4 keyboard */
+ {XK_R9,        FALSE,  KEY_PPAGE,   KEY_SPREVIOUS,CTL_PGUP,    ALT_PGUP},
+ {XK_Next,      FALSE,  KEY_NPAGE,   KEY_SNEXT,    CTL_PGDN,    ALT_PGDN},
+/* Sun Type 4 keyboard */
+ {XK_R15,       FALSE,  KEY_NPAGE,   KEY_SNEXT,    CTL_PGDN,    ALT_PGDN},
+ {XK_Insert,    FALSE,  KEY_IC,      KEY_SIC,      CTL_INS,     ALT_INS},
+ {XK_Delete,    FALSE,  KEY_DC,      KEY_SDC,      CTL_DEL,     ALT_DEL},
+ {XK_F1,        FALSE,  KEY_F(1),    KEY_F(13),    KEY_F(25),   KEY_F(37)},
+ {XK_F2,        FALSE,  KEY_F(2),    KEY_F(14),    KEY_F(26),   KEY_F(38)},
+ {XK_F3,        FALSE,  KEY_F(3),    KEY_F(15),    KEY_F(27),   KEY_F(39)},
+ {XK_F4,        FALSE,  KEY_F(4),    KEY_F(16),    KEY_F(28),   KEY_F(40)},
+ {XK_F5,        FALSE,  KEY_F(5),    KEY_F(17),    KEY_F(29),   KEY_F(41)},
+ {XK_F6,        FALSE,  KEY_F(6),    KEY_F(18),    KEY_F(30),   KEY_F(42)},
+ {XK_F7,        FALSE,  KEY_F(7),    KEY_F(19),    KEY_F(31),   KEY_F(43)},
+ {XK_F8,        FALSE,  KEY_F(8),    KEY_F(20),    KEY_F(32),   KEY_F(44)},
+ {XK_F9,        FALSE,  KEY_F(9),    KEY_F(21),    KEY_F(33),   KEY_F(45)},
+ {XK_F10,       FALSE,  KEY_F(10),   KEY_F(22),    KEY_F(34),   KEY_F(46)},
+ {XK_F11,       FALSE,  KEY_F(11),   KEY_F(23),    KEY_F(35),   KEY_F(47)},
+ {XK_F12,       FALSE,  KEY_F(12),   KEY_F(24),    KEY_F(36),   KEY_F(48)},
+ {XK_F13,       FALSE,  KEY_F(13),   KEY_F(25),    KEY_F(37),   KEY_F(49)},
+ {XK_F14,       FALSE,  KEY_F(14),   KEY_F(26),    KEY_F(38),   KEY_F(50)},
+ {XK_F15,       FALSE,  KEY_F(15),   KEY_F(27),    KEY_F(39),   KEY_F(51)},
+ {XK_F16,       FALSE,  KEY_F(16),   KEY_F(28),    KEY_F(40),   KEY_F(52)},
+ {XK_F17,       FALSE,  KEY_F(17),   KEY_F(29),    KEY_F(41),   KEY_F(53)},
+ {XK_F18,       FALSE,  KEY_F(18),   KEY_F(30),    KEY_F(42),   KEY_F(54)},
+ {XK_F19,       FALSE,  KEY_F(19),   KEY_F(31),    KEY_F(43),   KEY_F(55)},
+ {XK_F20,       FALSE,  KEY_F(20),   KEY_F(32),    KEY_F(44),   KEY_F(56)},
+ {XK_BackSpace, FALSE,  0x08,        0x08,         CTL_BKSP,    ALT_BKSP},
+ {XK_Tab,       FALSE,  0x09,        KEY_BTAB,     CTL_TAB,     ALT_TAB},
+#if defined(XK_ISO_Left_Tab)
+ {XK_ISO_Left_Tab, FALSE,  0x09,        KEY_BTAB,     CTL_TAB,     ALT_TAB},
+#endif
+ {XK_Select,    FALSE,  KEY_SELECT,  KEY_SELECT,   KEY_SELECT,  KEY_SELECT},
+ {XK_Print,     FALSE,  KEY_PRINT,   KEY_SPRINT,   KEY_PRINT,   KEY_PRINT},
+ {XK_Find,      FALSE,  KEY_FIND,    KEY_SFIND,    KEY_FIND,    KEY_FIND},
+ {XK_Pause,     FALSE,  KEY_SUSPEND, KEY_SSUSPEND, KEY_SUSPEND, KEY_SUSPEND},
+ {XK_Clear,     FALSE,  KEY_CLEAR,   KEY_CLEAR,    KEY_CLEAR,   KEY_CLEAR},
+ {XK_Cancel,    FALSE,  KEY_CANCEL,  KEY_SCANCEL,  KEY_CANCEL,  KEY_CANCEL},
+ {XK_Break,     FALSE,  KEY_BREAK,   KEY_BREAK,    KEY_BREAK,   KEY_BREAK},
+ {XK_Help,      FALSE,  KEY_HELP,    KEY_SHELP,    KEY_LHELP,   KEY_HELP},
+ {XK_L4,        FALSE,  KEY_UNDO,    KEY_SUNDO,    KEY_UNDO,    KEY_UNDO},
+ {XK_L6,        FALSE,  KEY_COPY,    KEY_SCOPY,    KEY_COPY,    KEY_COPY},
+ {XK_L9,        FALSE,  KEY_FIND,    KEY_SFIND,    KEY_FIND,    KEY_FIND},
+ {XK_Menu,      FALSE,  KEY_OPTIONS, KEY_SOPTIONS, KEY_OPTIONS, KEY_OPTIONS},
+ {XK_Super_R,   FALSE,  KEY_COMMAND, KEY_SCOMMAND, KEY_COMMAND, KEY_COMMAND},
+ {XK_Super_L,   FALSE,  KEY_COMMAND, KEY_SCOMMAND, KEY_COMMAND, KEY_COMMAND},
+#ifdef HAVE_SUNKEYSYM_H
+ {SunXK_F36,    FALSE,  KEY_F(41),   KEY_F(43),    KEY_F(45),   KEY_F(47)},
+ {SunXK_F37,    FALSE,  KEY_F(42),   KEY_F(44),    KEY_F(46),   KEY_F(48)},
+#endif
+#ifdef HAVE_DECKEYSYM_H
+ {DXK_Remove,   FALSE,  KEY_DC,      KEY_SDC,      CTL_DEL,     ALT_DEL},
+#endif
+ {XK_Escape,    FALSE,  0x1B,        0x1B,         0x1B,        ALT_ESC},
+ {XK_KP_Enter,  TRUE,   PADENTER,    PADENTER,     CTL_PADENTER,ALT_PADENTER},
+ {XK_KP_Add,    TRUE,   PADPLUS,     '+',          CTL_PADPLUS, ALT_PADPLUS},
+ {XK_KP_Subtract,TRUE,  PADMINUS,    '-',          CTL_PADMINUS,ALT_PADMINUS},
+ {XK_KP_Multiply,TRUE,  PADSTAR,     '*',          CTL_PADSTAR, ALT_PADSTAR},
+/* Sun Type 4 keyboard */
+ {XK_R6,        TRUE,   PADSTAR,     '*',          CTL_PADSTAR, ALT_PADSTAR},
+ {XK_KP_Divide, TRUE,   PADSLASH,    '/',          CTL_PADSLASH,ALT_PADSLASH},
+/* Sun Type 4 keyboard */
+ {XK_R5,        TRUE,   PADSLASH,    '/',          CTL_PADSLASH,ALT_PADSLASH},
+ {XK_KP_Decimal,TRUE,   PADSTOP,     '.',          CTL_PADSTOP, ALT_PADSTOP},
+ {XK_KP_0,      TRUE,   PAD0,        '0',          CTL_PAD0,    ALT_PAD0},
+ {XK_KP_1,      TRUE,   KEY_C1,      '1',          CTL_PAD1,    ALT_PAD1},
+ {XK_KP_2,      TRUE,   KEY_C2,      '2',          CTL_PAD2,    ALT_PAD2},
+ {XK_KP_3,      TRUE,   KEY_C3,      '3',          CTL_PAD3,    ALT_PAD3},
+ {XK_KP_4,      TRUE,   KEY_B1,      '4',          CTL_PAD4,    ALT_PAD4},
+ {XK_KP_5,      TRUE,   KEY_B2,      '5',          CTL_PAD5,    ALT_PAD5},
+/* Sun Type 4 keyboard */
+ {XK_R11,       TRUE,   KEY_B2,      '5',          CTL_PAD5,    ALT_PAD5},
+ {XK_KP_6,      TRUE,   KEY_B3,      '6',          CTL_PAD6,    ALT_PAD6},
+ {XK_KP_7,      TRUE,   KEY_A1,      '7',          CTL_PAD7,    ALT_PAD7},
+ {XK_KP_8,      TRUE,   KEY_A2,      '8',          CTL_PAD8,    ALT_PAD8},
+ {XK_KP_9,      TRUE,   KEY_A3,      '9',          CTL_PAD9,    ALT_PAD9},
+/* the following added to support Sun Type 5 keyboards */
+ {XK_F21,       FALSE,  KEY_SUSPEND, KEY_SSUSPEND, KEY_SUSPEND, KEY_SUSPEND},
+ {XK_F22,       FALSE,  KEY_PRINT,   KEY_SPRINT,   KEY_PRINT,   KEY_PRINT},
+ {XK_F24,       TRUE,   PADMINUS,    '-',          CTL_PADMINUS,ALT_PADMINUS},
+/* Sun Type 4 keyboard */
+ {XK_F25,       TRUE,   PADSLASH,    '/',          CTL_PADSLASH,ALT_PADSLASH},
+/* Sun Type 4 keyboard */
+ {XK_F26,       TRUE,   PADSTAR,     '*',          CTL_PADSTAR, ALT_PADSTAR},
+ {XK_F27,       TRUE,   KEY_A1,      '7',          CTL_PAD7,    ALT_PAD7},
+ {XK_F29,       TRUE,   KEY_A3,      '9',          CTL_PAD9,    ALT_PAD9},
+ {XK_F31,       TRUE,   KEY_B2,      '5',          CTL_PAD5,    ALT_PAD5},
+ {XK_F35,       TRUE,   KEY_C3,      '3',          CTL_PAD3,    ALT_PAD3},
+#ifdef HAVE_XK_KP_DELETE
+ {XK_KP_Delete, TRUE,   PADSTOP,     '.',          CTL_PADSTOP, ALT_PADSTOP},
+#endif
+#ifdef HAVE_XK_KP_INSERT
+ {XK_KP_Insert, TRUE,   PAD0,        '0',          CTL_PAD0,    ALT_PAD0},
+#endif
+#ifdef HAVE_XK_KP_END
+ {XK_KP_End,    TRUE,   KEY_C1,      '1',          CTL_PAD1,    ALT_PAD1},
+#endif
+#ifdef HAVE_XK_KP_DOWN
+ {XK_KP_Down,   TRUE,   KEY_C2,      '2',          CTL_PAD2,    ALT_PAD2},
+#endif
+#ifdef HAVE_XK_KP_NEXT
+ {XK_KP_Next,   TRUE,   KEY_C3,      '3',          CTL_PAD3,    ALT_PAD3},
+#endif
+#ifdef HAVE_XK_KP_LEFT
+ {XK_KP_Left,   TRUE,   KEY_B1,      '4',          CTL_PAD4,    ALT_PAD4},
+#endif
+#ifdef HAVE_XK_KP_BEGIN
+ {XK_KP_Begin,  TRUE,   KEY_B2,      '5',          CTL_PAD5,    ALT_PAD5},
+#endif
+#ifdef HAVE_XK_KP_RIGHT
+ {XK_KP_Right,  TRUE,   KEY_B3,      '6',          CTL_PAD6,    ALT_PAD6},
+#endif
+#ifdef HAVE_XK_KP_HOME
+ {XK_KP_Home,   TRUE,   KEY_A1,      '7',          CTL_PAD7,    ALT_PAD7},
+#endif
+#ifdef HAVE_XK_KP_UP
+ {XK_KP_Up,     TRUE,   KEY_A2,      '8',          CTL_PAD8,    ALT_PAD8},
+#endif
+#ifdef HAVE_XK_KP_PRIOR
+ {XK_KP_Prior,  TRUE,   KEY_A3,      '9',          CTL_PAD9,    ALT_PAD9},
+#endif
+
+#ifdef XF86XK_Back
+ {XF86XK_Back,  FALSE,  KEY_BROWSER_BACK, KEY_SBROWSER_BACK,
+                        KEY_CBROWSER_BACK, KEY_ABROWSER_BACK },
+#endif
+
+#ifdef XF86XK_Forward
+ {XF86XK_Forward, FALSE,  KEY_BROWSER_FWD, KEY_SBROWSER_FWD,
+                        KEY_CBROWSER_FWD, KEY_ABROWSER_FWD },
+#endif
+
+#ifdef XF86XK_Reload
+ {XF86XK_Reload, FALSE,  KEY_BROWSER_REF, KEY_SBROWSER_REF,
+                        KEY_CBROWSER_REF, KEY_ABROWSER_REF },
+#endif
+
+#ifdef XF86XK_Search
+ {XF86XK_Search, FALSE,  KEY_SEARCH, KEY_SSEARCH,
+                        KEY_CSEARCH, KEY_ASEARCH },
+#endif
+
+#ifdef XF86XK_Favorites
+ {XF86XK_Favorites, FALSE,  KEY_FAVORITES, KEY_SFAVORITES,
+                        KEY_CFAVORITES, KEY_AFAVORITES },
+#endif
+
+#ifdef XF86XK_AudioPlay
+ {XF86XK_AudioPlay, FALSE,  KEY_PLAY_PAUSE, KEY_SPLAY_PAUSE,
+                        KEY_CPLAY_PAUSE, KEY_APLAY_PAUSE },
+#endif
+
+#ifdef XF86XK_AudioStop
+ {XF86XK_AudioStop, FALSE,  KEY_MEDIA_STOP, KEY_SMEDIA_STOP,
+                        KEY_CMEDIA_STOP, KEY_AMEDIA_STOP },
+#endif
+
+#ifdef XF86XK_AudioPrev
+ {XF86XK_AudioPrev, FALSE,  KEY_PREV_TRACK, KEY_SPREV_TRACK,
+                        KEY_CPREV_TRACK, KEY_APREV_TRACK },
+#endif
+
+#ifdef XF86XK_AudioNext
+ {XF86XK_AudioNext, FALSE,  KEY_NEXT_TRACK, KEY_SNEXT_TRACK,
+                        KEY_CNEXT_TRACK, KEY_ANEXT_TRACK },
+#endif
+
+#ifdef XF86XK_Tools
+ {XF86XK_Tools,     FALSE,  KEY_MEDIA_SELECT, KEY_SMEDIA_SELECT,
+                        KEY_CMEDIA_SELECT, KEY_AMEDIA_SELECT },
+#endif
+
+ {0,            0,      0,           0,            0,           0}
+};
+
+#ifndef PDC_XIM
+# include "compose.h"
+#endif
+
+#define BITMAPDEPTH 1
+
+unsigned long pdc_key_modifiers = 0L;
+
+static GC normal_gc, bold_gc, block_cursor_gc, rect_cursor_gc, italic_gc, border_gc;
+static int font_height, font_width, font_ascent, font_descent,
+           window_width, window_height;
+static int resize_window_width = 0, resize_window_height = 0;
+static char *bitmap_file = NULL;
+#ifdef HAVE_XPM_H
+static char *pixmap_file = NULL;
+#endif
+static KeySym keysym = 0;
+static int PDC_blink_state = 1;
+static int PDC_really_blinking = FALSE;     /* see 'pdcsetsc.c' */
+
+#ifndef PDC_XIM
+static int state_mask[8] =
+{
+    ShiftMask,
+    LockMask,
+    ControlMask,
+    Mod1Mask,
+    Mod2Mask,
+    Mod3Mask,
+    Mod4Mask,
+    Mod5Mask
+};
+#endif
+
+static Atom wm_atom[2];
+static String class_name = "XCurses";
+static XtAppContext app_context;
+static Widget topLevel, drawing, scrollBox, scrollVert, scrollHoriz;
+static int received_map_notify = 0;
+static bool mouse_selection = FALSE;
+static chtype *tmpsel = NULL;
+static unsigned long tmpsel_length = 0;
+static int selection_start_x = 0, selection_start_y = 0,
+           selection_end_x = 0, selection_end_y = 0;
+static Pixmap icon_bitmap;
+#ifdef HAVE_XPM_H
+static Pixmap icon_pixmap;
+static Pixmap icon_pixmap_mask;
+#endif
+static bool window_entered = TRUE;
+static char *program_name;
+
+/* Macros just for app_resources */
+
+#ifdef PDC_WIDE
+# define DEFFONT "-misc-fixed-medium-r-normal--13-120-75-75-c-70-iso10646-1"
+# define DEFBOLDFONT "-misc-fixed-bold-r-normal--13-120-75-75-c-70-iso10646-1"
+# define DEFITALICFONT "-misc-fixed-medium-o-normal--13-120-75-75-c-70-iso10646-1"
+#else
+# define DEFFONT "-misc-fixed-medium-r-normal--13-120-75-75-c-70-iso8859-1"
+# define DEFBOLDFONT "-misc-fixed-bold-r-normal--13-120-75-75-c-70-iso8859-1"
+# define DEFITALICFONT "-misc-fixed-medium-o-normal--13-120-75-75-c-70-iso8859-1"
+#endif
+
+#define APPDATAOFF(n) XtOffsetOf(XCursesAppData, n)
+
+#define RINT(name1, name2, value) { \
+                #name1, #name2, XtRInt, \
+                sizeof(int), APPDATAOFF(name1), XtRImmediate, \
+                (XtPointer)value \
+        }
+
+#define RPIXEL(name1, name2, value) { \
+                #name1, #name2, XtRPixel, \
+                sizeof(Pixel), APPDATAOFF(name1), XtRString, \
+                (XtPointer)#value \
+        }
+
+#define RCOLOR(name, value) RPIXEL(color##name, Color##name, value)
+
+
+#define RSTRINGP(name1, name2, param) { \
+                #name1, #name2, XtRString, \
+                MAX_PATH, APPDATAOFF(name1), XtRString, (XtPointer)param \
+        }
+
+#define RSTRING(name1, name2) RSTRINGP(name1, name2, "")
+
+#define RFONT(name1, name2, value) { \
+                #name1, #name2, XtRFontStruct, \
+                sizeof(XFontStruct), APPDATAOFF(name1), XtRString, \
+                (XtPointer)value \
+        }
+
+#define RCURSOR(name1, name2, value) { \
+                #name1, #name2, XtRCursor, \
+                sizeof(Cursor), APPDATAOFF(name1), XtRString, \
+                (XtPointer)#value \
+        }
+
+static XtResource app_resources[] =
+{
+    RINT(lines, Lines, 24),
+    RINT(cols, Cols, 80),
+
+    RPIXEL(cursorColor, CursorColor, Red),
+
+    RCOLOR(Black, Black),
+    RCOLOR(Red, red3),
+    RCOLOR(Green, green3),
+    RCOLOR(Yellow, yellow3),
+    RCOLOR(Blue, blue3),
+    RCOLOR(Magenta, magenta3),
+    RCOLOR(Cyan, cyan3),
+    RCOLOR(White, Grey),
+
+    RCOLOR(BoldBlack, grey40),
+    RCOLOR(BoldRed, red1),
+    RCOLOR(BoldGreen, green1),
+    RCOLOR(BoldYellow, yellow1),
+    RCOLOR(BoldBlue, blue1),
+    RCOLOR(BoldMagenta, magenta1),
+    RCOLOR(BoldCyan, cyan1),
+    RCOLOR(BoldWhite, White),
+
+    RFONT(normalFont, NormalFont, DEFFONT),
+    RFONT(italicFont, ItalicFont, DEFITALICFONT),
+    RFONT(boldFont, BoldFont, DEFBOLDFONT),
+
+    RSTRING(bitmap, Bitmap),
+#ifdef HAVE_XPM_H
+    RSTRING(pixmap, Pixmap),
+#endif
+    RSTRINGP(composeKey, ComposeKey, "Multi_key"),
+
+    RCURSOR(pointer, Pointer, xterm),
+
+    RPIXEL(pointerForeColor, PointerForeColor, Black),
+    RPIXEL(pointerBackColor, PointerBackColor, White),
+
+    RINT(shmmin, Shmmin, 0),
+    RINT(borderWidth, BorderWidth, 0),
+
+    RPIXEL(borderColor, BorderColor, Black),
+
+    RINT(doubleClickPeriod, DoubleClickPeriod, (PDC_CLICK_PERIOD * 2)),
+    RINT(clickPeriod, ClickPeriod, PDC_CLICK_PERIOD),
+    RINT(scrollbarWidth, ScrollbarWidth, 15),
+    RINT(cursorBlinkRate, CursorBlinkRate, 0),
+
+    RSTRING(textCursor, TextCursor)
+};
+
+
+#undef RCURSOR
+#undef RFONT
+#undef RSTRING
+#undef RCOLOR
+#undef RPIXEL
+/* #undef RINT          */
+/* #undef APPDATAOFF    */
+#undef DEFFONT
+#undef DEFBOLDFONT
+#undef DEFITALICFONT
+
+/* Macros for options */
+
+#define COPT(name) {"-" #name, "*" #name, XrmoptionSepArg, NULL}
+#define CCOLOR(name) COPT(color##name)
+
+static XrmOptionDescRec options[] =
+{
+    COPT(lines), COPT(cols), COPT(normalFont), COPT(italicFont),
+    COPT(bitmap), COPT(boldFont),
+#ifdef HAVE_XPM_H
+    COPT(pixmap),
+#endif
+    COPT(pointer), COPT(shmmin), COPT(composeKey), COPT(clickPeriod),
+    COPT(doubleClickPeriod), COPT(scrollbarWidth),
+    COPT(pointerForeColor), COPT(pointerBackColor),
+    COPT(cursorBlinkRate), COPT(cursorColor), COPT(textCursor),
+
+    CCOLOR(Black), CCOLOR(Red), CCOLOR(Green), CCOLOR(Yellow),
+    CCOLOR(Blue), CCOLOR(Magenta), CCOLOR(Cyan), CCOLOR(White),
+
+    CCOLOR(BoldBlack), CCOLOR(BoldRed), CCOLOR(BoldGreen),
+    CCOLOR(BoldYellow), CCOLOR(BoldBlue), CCOLOR(BoldMagenta),
+    CCOLOR(BoldCyan), CCOLOR(BoldWhite)
+};
+
+#undef CCOLOR
+#undef COPT
+
+static XtActionsRec action_table[] =
+{
+    {"XCursesButton",         (XtActionProc)XCursesButton},
+    {"XCursesKeyPress",       (XtActionProc)XCursesKeyPress},
+    {"XCursesPasteSelection", (XtActionProc)XCursesPasteSelection},
+    {"string",                (XtActionProc)XCursesHandleString}
+};
+
+static bool after_first_curses_request = FALSE;
+static Pixel colors[MAX_COLORS + 2];
+
+#ifdef PDC_XIM
+static XIM Xim = NULL;
+static XIC Xic = NULL;
+#endif
+
+static const char *default_translations =
+{
+    "<Key>: XCursesKeyPress() \n" \
+    "<KeyUp>: XCursesKeyPress() \n" \
+    "<BtnDown>: XCursesButton() \n" \
+    "<BtnUp>: XCursesButton() \n" \
+    "<BtnMotion>: XCursesButton()"
+};
+
+static int _to_utf8(char *outcode, chtype code)
+{
+#ifdef PDC_WIDE
+    if (code & A_ALTCHARSET && !(code & 0xff80))
+        code = acs_map[code & 0x7f];
+#endif
+    code &= A_CHARTEXT;
+
+    if (code < 0x80)
+    {
+        outcode[0] = code;
+        return 1;
+    }
+    else
+        if (code < 0x800)
+        {
+            outcode[0] = ((code & 0x07c0) >> 6) | 0xc0;
+            outcode[1] = (code & 0x003f) | 0x80;
+            return 2;
+        }
+        else if( code < 0x10000)
+        {
+            outcode[0] = ((code & 0xf000) >> 12) | 0xe0;
+            outcode[1] = ((code & 0x0fc0) >> 6) | 0x80;
+            outcode[2] = (code & 0x003f) | 0x80;
+            return 3;
+        }
+        else      /* SMP: Unicode past 64K */
+        {
+            outcode[0] = (code >> 18) | 0xf0;
+            outcode[1] = ((code >> 12) & 0x3f) | 0x80;
+            outcode[2] = ((code >>  6) & 0x3f) | 0x80;
+            outcode[3] = ( code        & 0x3f) | 0x80;
+            return 4;
+        }
+}
+
+static int _from_utf8(wchar_t *pwc, const char *s, size_t n)
+{
+    wchar_t key;
+    int i = -1;
+    const unsigned char *string;
+
+    if (!s || (n < 1))
+        return -1;
+
+    if (!*s)
+        return 0;
+
+    string = (const unsigned char *)s;
+
+    key = string[0];
+
+    /* Simplistic UTF-8 decoder -- minimal validation */
+
+    if (key & 0x80)
+    {
+        if ((key & 0xe0) == 0xc0)
+        {
+            if (1 < n)
+            {
+                key = ((key & 0x1f) << 6) | (string[1] & 0x3f);
+                i = 2;
+            }
+        }
+        else if ((key & 0xf0) == 0xe0)   /* Unicode from 0x800 to 0xffff */
+        {
+            if (2 < n)
+            {
+                key = ((key & 0x0f) << 12) |
+                      ((string[1] & 0x3f) << 6) | (string[2] & 0x3f);
+                i = 3;
+            }
+        }
+        else if ((key & 0xf8) == 0xf0)   /* SMP: Unicode past 64K */
+        {
+            if (3 < n)
+            {
+                key = ((key & 0x07) << 18) | ((string[1] & 0x3f) << 12) |
+                      ((string[2] & 0x3f) << 6) | (string[3] & 0x3f);
+                i = 4;
+            }
+        }
+        else
+            fprintf(stderr, "Invalid UTF8\n");
+    }
+    else
+        i = 1;
+
+    if (i)
+        *pwc = key;
+
+    return i;
+}
+
+#ifndef X_HAVE_UTF8_STRING
+static Atom XA_UTF8_STRING(Display *dpy)
+{
+    static AtomPtr p = NULL;
+
+    if (!p)
+        p = XmuMakeAtom("UTF8_STRING");
+
+    return XmuInternAtom(dpy, p);
+}
+#endif
+
+signal_handler XCursesSetSignal(int signo, signal_handler action)
+{
+#if defined(SA_INTERRUPT) || defined(SA_RESTART)
+    struct sigaction sigact, osigact;
+
+    sigact.sa_handler = action;
+
+    sigact.sa_flags =
+# ifdef SA_INTERRUPT
+#  ifdef SA_RESTART
+        SA_INTERRUPT | SA_RESTART;
+#  else
+        SA_INTERRUPT;
+#  endif
+# else  /* must be SA_RESTART */
+        SA_RESTART;
+# endif
+    sigemptyset(&sigact.sa_mask);
+
+    if (sigaction(signo, &sigact, &osigact))
+        return SIG_ERR;
+
+    return osigact.sa_handler;
+
+#else   /* not SA_INTERRUPT or SA_RESTART, use plain signal */
+    return signal(signo, action);
+#endif
+}
+
+RETSIGTYPE XCursesSigwinchHandler(int signo)
+{
+    PDC_LOG(("%s:XCursesSigwinchHandler() - called: SIGNO: %d\n",
+             XCLOGMSG, signo));
+
+    /* Patch by: Georg Fuchs, georg.fuchs@rz.uni-regensburg.de
+       02-Feb-1999 */
+
+    SP->resized += 1;
+
+    /* Always trap SIGWINCH if the C library supports SIGWINCH */
+
+#ifdef SIGWINCH
+    XCursesSetSignal(SIGWINCH, XCursesSigwinchHandler);
+#endif
+}
+
+/* Convert character positions x and y to pixel positions, stored in
+   xpos and ypos */
+
+static void _make_xy(int x, int y, int *xpos, int *ypos)
+{
+    *xpos = (x * font_width) + xc_app_data.borderWidth;
+    *ypos = xc_app_data.normalFont->ascent + (y * font_height) +
+            xc_app_data.borderWidth;
+}
+
+    /* This function 'intensifies' a color by shifting it toward white. */
+    /* It used to average the input color with white.  Then it did a    */
+    /* weighted average:  2/3 of the input color,  1/3 white,   for a   */
+    /* lower "intensification" level.                                   */
+    /*    Then Mark Hessling suggested that the output level should     */
+    /* remap zero to 85 (= 255 / 3, so one-third intensity),  and input */
+    /* of 192 or greater should be remapped to 255 (full intensity).    */
+    /* Assuming we want a linear response between zero and 192,  that   */
+    /* leads to output = 85 + input * (255-85)/192.                     */
+    /*    This should lead to proper handling of bold text in legacy    */
+    /* apps,  where "bold" means "high intensity".                      */
+    /*   NOTE that this is basically a clone of code in wingui/pdcdisp.c. */
+    /* The same basic logic should eventually be used in SDL,  I think. */
+
+static Pixel intensified_color( Pixel ival)
+{
+    int rgb, i;
+    Pixel oval = 0;
+
+    for( i = 0; i < 3; i++, ival >>= 8)
+    {
+        rgb = (int)( ival & 0xff);
+        if( rgb >= 192)
+            rgb = 255;
+        else
+            rgb = 85 + rgb * (255 - 85) / 192;
+        oval |= ((Pixel)rgb << (i * 8));
+    }
+    return( oval);
+}
+
+   /* For use in adjusting colors for A_DIMmed characters.  Just */
+   /* knocks down the intensity of R, G, and B by 1/3.           */
+
+static Pixel dimmed_color( Pixel ival)
+{
+    unsigned i;
+    Pixel oval = 0;
+
+    for( i = 0; i < 3; i++, ival >>= 8)
+    {
+        unsigned rgb = (unsigned)( ival & 0xff);
+
+        rgb -= (rgb / 3);
+        oval |= ((Pixel)rgb << (i * 8));
+    }
+    return( oval);
+}
+
+/* see 'addch.c' for an explanation of how combining chars are handled. */
+/* Though note that right now,  it doesn't work at all;  we'll have to  */
+/* arrange shared memory or communication between the X process and the */
+/* "host" process... to be done later.                                  */
+
+#if defined( CHTYPE_LONG) && CHTYPE_LONG >= 2
+   #ifdef PDC_WIDE
+      #define USING_COMBINING_CHARACTER_SCHEME
+      int PDC_expand_combined_characters( const cchar_t c, cchar_t *added);  /* addch.c */
+   #endif
+
+   /* PDC_get_rgb_values(), extract_packed_rgb(), intensified_component(), */
+   /* intensified_color(),  and dimmed_color() each exist in x11/x11.c,    */
+   /* wingui/pdcdisp.c,  and sdl2/pdcdisp.c in forms slightly modified for */
+   /* each platform.  But they all look pretty much alike.  */
+
+            /* PDCurses stores RGBs in fifteen bits,  five bits each */
+            /* for red, green, blue.  A Pixel uses eight bits per    */
+            /* channel.  Hence the following.                        */
+static Pixel extract_packed_rgb( const chtype color)
+{
+    const int red   = (int)( (color << 3) & 0xf8);
+    const int green = (int)( (color >> 2) & 0xf8);
+    const int blue  = (int)( (color >> 7) & 0xf8);
+
+    return( ((Pixel)red << 16) | ((Pixel)green << 8) | (Pixel)blue);
+}
+#endif
+
+
+void PDC_get_rgb_values( const chtype srcp,
+            Pixel *foreground_rgb, Pixel *background_rgb)
+{
+    bool reverse_colors = ((srcp & A_REVERSE) ? TRUE : FALSE);
+    bool intensify_backgnd = FALSE;
+
+#if defined( CHTYPE_LONG) && CHTYPE_LONG >= 2
+    if( srcp & A_RGB_COLOR)
+    {
+        /* Extract RGB from 30 bits of the color field */
+        *background_rgb = extract_packed_rgb( srcp >> PDC_COLOR_SHIFT);
+        *foreground_rgb = extract_packed_rgb( srcp >> (PDC_COLOR_SHIFT + 15));
+    }
+    else
+#endif
+    {
+        short foreground_index, background_index;
+
+        PDC_pair_content( PAIR_NUMBER( srcp), &foreground_index, &background_index);
+        *foreground_rgb = colors[foreground_index];
+        *background_rgb = colors[background_index];
+    }
+
+    if( srcp & A_BLINK)
+    {
+        if( !PDC_really_blinking)   /* convert 'blinking' to 'bold' */
+            intensify_backgnd = TRUE;
+        else if( PDC_blink_state)
+            reverse_colors = !reverse_colors;
+    }
+    if( reverse_colors)
+    {
+        const Pixel temp = *foreground_rgb;
+
+        *foreground_rgb = *background_rgb;
+        *background_rgb = temp;
+    }
+
+    if( srcp & A_BOLD)
+        *foreground_rgb = intensified_color( *foreground_rgb);
+    if( intensify_backgnd)
+        *background_rgb = intensified_color( *background_rgb);
+    if( srcp & A_DIM)
+        *foreground_rgb = dimmed_color( *foreground_rgb);
+    if( srcp & A_DIM)
+        *background_rgb = dimmed_color( *background_rgb);
+}
+
+/* Output a block of characters with common attributes */
+
+static int _new_packet( const chtype attr, const bool rev, const int len,
+                        const int col, const int row,
+#ifdef PDC_WIDE
+                            XChar2b *text)
+#else
+                            char *text)
+#endif
+{
+    XRectangle bounds;
+    GC gc;
+    int xpos, ypos;
+    Pixel foreground_rgb, background_rgb;
+
+#ifdef PDC_WIDE
+    text[len].byte1 = text[len].byte2 = 0;
+#else
+    text[len] = '\0';
+#endif
+
+    /* Determine which GC to use - normal or italic */
+    if ( attr & A_ITALIC )
+    {
+       gc = italic_gc;
+    }
+    else if ( attr & A_BOLD )
+    {
+       gc = bold_gc;
+    }
+    else
+    {
+       gc = normal_gc;
+    }
+
+    /* Draw it */
+
+    PDC_get_rgb_values( attr, &foreground_rgb, &background_rgb);
+    if( rev)
+      {
+      const Pixel swap_val = foreground_rgb;
+
+      foreground_rgb = background_rgb;
+      background_rgb = swap_val;
+      }
+    XSetForeground(XCURSESDISPLAY, gc, foreground_rgb);
+    XSetBackground(XCURSESDISPLAY, gc, background_rgb);
+
+    _make_xy(col, row, &xpos, &ypos);
+
+    bounds.x = xpos;
+    bounds.y = ypos - font_ascent;
+    bounds.width = font_width * len;
+    bounds.height = font_height;
+
+    XSetClipRectangles(XCURSESDISPLAY, gc, 0, 0, &bounds, 1, Unsorted);
+
+#ifdef PDC_WIDE
+    XDrawImageString16(
+#else
+    XDrawImageString(
+#endif
+                     XCURSESDISPLAY, XCURSESWIN, gc, xpos, ypos, text, len);
+
+    /* Underline, etc. */
+
+    if (attr & (A_LEFTLINE|A_RIGHTLINE|A_UNDERLINE|A_OVERLINE|A_STRIKEOUT))
+    {
+        int k;
+
+        if (SP->line_color != -1)
+            XSetForeground(XCURSESDISPLAY, gc, colors[SP->line_color]);
+
+        if (attr & A_UNDERLINE)     /* UNDER */
+            XDrawLine(XCURSESDISPLAY, XCURSESWIN, gc,
+                      xpos, ypos + xc_app_data.normalFont->descent-1, xpos + font_width * len, ypos + xc_app_data.normalFont->descent-1);
+/*                      xpos, ypos + 1, xpos + font_width * len, ypos + 1);*/
+
+        if (attr & A_OVERLINE)
+            XDrawLine(XCURSESDISPLAY, XCURSESWIN, gc,
+                      xpos, ypos - font_ascent, xpos + font_width * len, ypos - font_ascent);
+
+        if (attr & A_STRIKEOUT)
+            XDrawLine(XCURSESDISPLAY, XCURSESWIN, gc,
+                      xpos, ypos + (font_descent - font_ascent) / 2,
+                      xpos + font_width * len, ypos + (font_descent - font_ascent) / 2);
+
+        if (attr & A_LEFTLINE)      /* LEFT */
+            for (k = 0; k < len; k++)
+            {
+                int x = xpos + font_width * k;
+                XDrawLine(XCURSESDISPLAY, XCURSESWIN, gc,
+                          x, ypos - font_ascent, x, ypos + font_descent);
+            }
+
+        if (attr & A_RIGHTLINE)     /* RIGHT */
+            for (k = 0; k < len; k++)
+            {
+                int x = xpos + font_width * (k + 1) - 1;
+                XDrawLine(XCURSESDISPLAY, XCURSESWIN, gc,
+                          x, ypos - font_ascent, x, ypos + font_descent);
+            }
+    }
+
+    PDC_LOG(("%s:_new_packet() - row: %d col: %d "
+             "num_cols: %d fore: %d back: %d text:<%s>\n",
+             XCLOGMSG, row, col, len, foreground_rgb, background_rgb, text));
+
+    return OK;
+}
+
+/* The core display routine -- update one line of text */
+
+static int _display_text(const chtype *ch, int row, int col,
+                         int num_cols, bool highlight)
+{
+#ifdef PDC_WIDE
+    XChar2b text[513];
+#else
+    char text[513];
+#endif
+    chtype old_attr, attr;
+    int i, j;
+
+    PDC_LOG(("%s:_display_text() - called: row: %d col: %d "
+             "num_cols: %d\n", XCLOGMSG, row, col, num_cols));
+
+    if (!num_cols)
+        return OK;
+
+    old_attr = *ch & A_ATTRIBUTES;
+
+    for (i = 0, j = 0; j < num_cols; j++)
+    {
+        chtype curr = ch[j];
+
+        attr = curr & A_ATTRIBUTES;
+
+#ifdef CHTYPE_LONG
+        if (attr & A_ALTCHARSET && !(curr & 0xff80))
+        {
+            attr ^= A_ALTCHARSET;
+            curr = acs_map[curr & 0x7f];
+        }
+#endif
+
+#ifndef PDC_WIDE
+        /* Special handling for ACS_BLOCK */
+
+        if (!(curr & A_CHARTEXT))
+        {
+            curr |= ' ';
+            attr ^= A_REVERSE;
+        }
+#endif
+        if (attr != old_attr || i > 100)
+        {
+            if (_new_packet(old_attr, highlight, i, col, row, text) == ERR)
+                return ERR;
+
+            old_attr = attr;
+            col += i;
+            i = 0;
+        }
+
+#ifdef PDC_WIDE
+        curr &= A_CHARTEXT;
+        if( curr <= 0xffff)      /* BMP Unicode */
+        {
+            if( !curr)
+                curr = ' ';
+            text[i].byte1 = (curr & 0xff00) >> 8;
+            text[i++].byte2 = curr & 0x00ff;
+        }
+        else     /* SMP & combining chars */
+        {
+            const chtype MAX_UNICODE = 0x110000;
+
+            if( curr < MAX_UNICODE)    /* Supplemental Multilingual Plane */
+            {                          /* (SMP);  store w/surrogates      */
+                const unsigned short part1 = (unsigned short)
+                        (0xd800 | ((curr - 0x10000) >> 10));
+                const unsigned short part2 = (unsigned short)
+                        (0xdc00 | (curr & 0x3ff));
+
+                text[i].byte1 = part1 >> 8;
+                text[i++].byte2 = part1 & 0xff;
+                text[i].byte1 = part2 >> 8;
+                text[i++].byte2 = part2 & 0xff;
+            }
+#ifdef USING_COMBINING_CHARACTER_SCHEME
+            else if( curr > MAX_UNICODE)
+            {
+#ifdef GOT_COMBINING_CHARS_IN_X
+                cchar_t added[10];
+                int n_combined = 0;
+
+                while( (curr = PDC_expand_combined_characters( curr,
+                                   &added[n_combined])) > MAX_UNICODE)
+                    n_combined++;
+                while( n_combined >= 0)
+                {
+                    text[i].byte1   = added[n_combined] >> 8;
+                    text[i++].byte2 = added[n_combined] & 0xff;
+                    n_combined--;
+                }
+#else
+            text[i].byte1 = 0;
+            text[i++].byte2 = '?';
+#endif
+            }
+#endif
+        }
+#else                /* non-wide case */
+        text[i++] = curr & 0xff;
+#endif
+    }
+
+    return _new_packet(old_attr, highlight, i, col, row, text);
+}
+
+static void _get_gc(GC *gc, XFontStruct *font_info, int fore, int back)
+{
+    XGCValues values;
+
+    /* Create default Graphics Context */
+
+    *gc = XCreateGC(XCURSESDISPLAY, XCURSESWIN, 0L, &values);
+
+    /* specify font */
+
+    XSetFont(XCURSESDISPLAY, *gc, font_info->fid);
+
+#ifdef WHY_IS_THIS_HERE
+    XSetForeground(XCURSESDISPLAY, *gc, colors[fore]);
+    XSetBackground(XCURSESDISPLAY, *gc, colors[back]);
+#endif
+}
+
+#define RGB( R, G, B)  (((unsigned long)(R)) << 16         \
+            | ((unsigned long)(G) << 8) | (unsigned long)(B))
+
+static void _initialize_colors(void)
+{
+    int i, r, g, b;
+
+    colors[COLOR_BLACK]   = xc_app_data.colorBlack;
+    colors[COLOR_RED]     = xc_app_data.colorRed;
+    colors[COLOR_GREEN]   = xc_app_data.colorGreen;
+    colors[COLOR_YELLOW]  = xc_app_data.colorYellow;
+    colors[COLOR_BLUE]    = xc_app_data.colorBlue;
+    colors[COLOR_MAGENTA] = xc_app_data.colorMagenta;
+    colors[COLOR_CYAN]    = xc_app_data.colorCyan;
+    colors[COLOR_WHITE]   = xc_app_data.colorWhite;
+
+    colors[COLOR_BLACK + 8]   = xc_app_data.colorBoldBlack;
+    colors[COLOR_RED + 8]     = xc_app_data.colorBoldRed;
+    colors[COLOR_GREEN + 8]   = xc_app_data.colorBoldGreen;
+    colors[COLOR_YELLOW + 8]  = xc_app_data.colorBoldYellow;
+    colors[COLOR_BLUE + 8]    = xc_app_data.colorBoldBlue;
+    colors[COLOR_MAGENTA + 8] = xc_app_data.colorBoldMagenta;
+    colors[COLOR_CYAN + 8]    = xc_app_data.colorBoldCyan;
+    colors[COLOR_WHITE + 8]   = xc_app_data.colorBoldWhite;
+    i = 16;
+           /* 256-color xterm extended palette:  216 colors in a
+            6x6x6 color cube,  plus 24 (not 50) shades of gray */
+    for( r = 0; r < 6; r++)
+        for( g = 0; g < 6; g++)
+            for( b = 0; b < 6; b++)
+                colors[i++] = RGB( r ? r * 40 + 55 : 0,
+                                   g ? g * 40 + 55 : 0,
+                                   b ? b * 40 + 55 : 0);
+    for( i = 0; i < 24; i++)
+        colors[i + 232] = RGB( i * 10 + 8, i * 10 + 8, i * 10 + 8);
+
+    colors[COLOR_CURSOR] = xc_app_data.cursorColor;
+    colors[COLOR_BORDER] = xc_app_data.borderColor;
+}
+
+static void _refresh_scrollbar(void)
+{
+    XC_LOG(("_refresh_scrollbar() - called\n"));
+
+    if (SP->sb_on)
+    {
+        PDC_SCROLLBAR_TYPE total_y = SP->sb_total_y;
+        PDC_SCROLLBAR_TYPE total_x = SP->sb_total_x;
+
+        if (total_y)
+            XawScrollbarSetThumb(scrollVert,
+                (PDC_SCROLLBAR_TYPE)(SP->sb_cur_y) / total_y,
+                (PDC_SCROLLBAR_TYPE)(SP->sb_viewport_y) / total_y);
+
+        if (total_x)
+            XawScrollbarSetThumb(scrollHoriz,
+                (PDC_SCROLLBAR_TYPE)(SP->sb_cur_x) / total_x,
+                (PDC_SCROLLBAR_TYPE)(SP->sb_viewport_x) / total_x);
+    }
+}
+
+static void _set_cursor_color(chtype *ch, short *fore, short *back)
+{
+    int attr;
+    short f, b;
+
+    attr = PAIR_NUMBER(*ch);
+
+    if (attr)
+    {
+        PDC_pair_content(attr, &f, &b);
+        *fore = 7 - (f % 8);
+        *back = 7 - (b % 8);
+    }
+    else
+    {
+        if (*ch & A_REVERSE)
+        {
+            *back = COLOR_BLACK;
+            *fore = COLOR_WHITE;
+        }
+        else
+        {
+            *back = COLOR_WHITE;
+            *fore = COLOR_BLACK;
+        }
+    }
+}
+
+static void _get_icon(void)
+{
+    XIconSize *icon_size;
+    int size_count = 0;
+    Status rc;
+    unsigned char *bitmap_bits = NULL;
+    unsigned icon_bitmap_width = 0, icon_bitmap_height = 0,
+             file_bitmap_width = 0, file_bitmap_height = 0;
+
+    XC_LOG(("_get_icon() - called\n"));
+
+    icon_size = XAllocIconSize();
+
+    rc = XGetIconSizes(XtDisplay(topLevel),
+                       RootWindowOfScreen(XtScreen(topLevel)),
+                       &icon_size, &size_count);
+
+    /* if the WM can advise on icon sizes... */
+
+    if (rc && size_count)
+    {
+        int i, max_height = 0, max_width = 0;
+
+        PDC_LOG(("%s:size_count: %d rc: %d\n", XCLOGMSG, size_count, rc));
+
+        for (i = 0; i < size_count; i++)
+        {
+            if (icon_size[i].max_width > max_width)
+                max_width = icon_size[i].max_width;
+            if (icon_size[i].max_height > max_height)
+                max_height = icon_size[i].max_height;
+
+            PDC_LOG(("%s:min: %d %d\n", XCLOGMSG,
+                     icon_size[i].min_width, icon_size[i].min_height));
+
+            PDC_LOG(("%s:max: %d %d\n", XCLOGMSG,
+                     icon_size[i].max_width, icon_size[i].max_height));
+
+            PDC_LOG(("%s:inc: %d %d\n", XCLOGMSG,
+                     icon_size[i].width_inc, icon_size[i].height_inc));
+        }
+
+        if (max_width >= big_icon_width && max_height >= big_icon_height)
+        {
+            icon_bitmap_width = big_icon_width;
+            icon_bitmap_height = big_icon_height;
+            bitmap_bits = (unsigned char *)big_icon_bits;
+        }
+        else
+        {
+            icon_bitmap_width = little_icon_width;
+            icon_bitmap_height = little_icon_height;
+            bitmap_bits = (unsigned char *)little_icon_bits;
+        }
+
+    }
+    else  /* use small icon */
+    {
+        icon_bitmap_width = little_icon_width;
+        icon_bitmap_height = little_icon_height;
+        bitmap_bits = (unsigned char *)little_icon_bits;
+    }
+
+    XFree(icon_size);
+
+#ifdef HAVE_XPM_H
+    if (xc_app_data.pixmap && xc_app_data.pixmap[0]) /* supplied pixmap */
+    {
+        XpmReadFileToPixmap(XtDisplay(topLevel),
+                            RootWindowOfScreen(XtScreen(topLevel)),
+                            (char *)xc_app_data.pixmap,
+                            &icon_pixmap, &icon_pixmap_mask, NULL);
+        return;
+    }
+#endif
+
+    if (xc_app_data.bitmap && xc_app_data.bitmap[0]) /* supplied bitmap */
+    {
+        int x_hot = 0, y_hot = 0;
+
+        rc = XReadBitmapFile(XtDisplay(topLevel),
+                             RootWindowOfScreen(XtScreen(topLevel)),
+                             (char *)xc_app_data.bitmap,
+                             &file_bitmap_width, &file_bitmap_height,
+                             &icon_bitmap, &x_hot, &y_hot);
+
+        switch(rc)
+        {
+        case BitmapOpenFailed:
+            fprintf(stderr, "bitmap file %s: not found\n",
+                    xc_app_data.bitmap);
+            break;
+        case BitmapFileInvalid:
+            fprintf(stderr, "bitmap file %s: contents invalid\n",
+                    xc_app_data.bitmap);
+            break;
+        default:
+            return;
+        }
+    }
+
+    icon_bitmap = XCreateBitmapFromData(XtDisplay(topLevel),
+        RootWindowOfScreen(XtScreen(topLevel)),
+        (char *)bitmap_bits, icon_bitmap_width, icon_bitmap_height);
+}
+
+static void _draw_border(void)
+{
+    /* Draw the border if required */
+
+    if (xc_app_data.borderWidth)
+        XDrawRectangle(XCURSESDISPLAY, XCURSESWIN, border_gc,
+                       xc_app_data.borderWidth / 2,
+                       xc_app_data.borderWidth / 2,
+                       window_width - xc_app_data.borderWidth,
+                       window_height - xc_app_data.borderWidth);
+}
+
+/* Redraw the entire screen */
+
+static void _display_screen(void)
+{
+    int row;
+
+    XC_LOG(("_display_screen() - called\n"));
+
+    for (row = 0; row < XCursesLINES; row++)
+    {
+        XC_get_line_lock(row);
+
+        _display_text((const chtype *)(Xcurscr + XCURSCR_Y_OFF(row)),
+                      row, 0, COLS, FALSE);
+
+        XC_release_line_lock(row);
+        if( row == SP->cursrow && SP->visibility)
+            _redraw_cursor();
+    }
+
+    _draw_border();
+}
+
+/* Draw changed portions of the screen */
+
+static void _refresh_screen(void)
+{
+    int row, start_col, num_cols;
+
+    XC_LOG(("_refresh_screen() - called\n"));
+
+    for (row = 0; row < XCursesLINES; row++)
+    {
+        num_cols = (int)*(Xcurscr + XCURSCR_LENGTH_OFF + row);
+
+        if (num_cols)
+        {
+            XC_get_line_lock(row);
+
+            start_col = (int)*(Xcurscr + XCURSCR_START_OFF + row);
+
+            _display_text((const chtype *)(Xcurscr + XCURSCR_Y_OFF(row) +
+                          (start_col * sizeof(chtype))), row, start_col,
+                          num_cols, FALSE);
+
+            *(Xcurscr + XCURSCR_LENGTH_OFF + row) = 0;
+
+            XC_release_line_lock(row);
+            if( row == SP->cursrow && SP->visibility)
+                _redraw_cursor();
+        }
+    }
+
+    _selection_off();
+}
+
+static void _handle_expose(Widget w, XtPointer client_data, XEvent *event,
+                           Boolean *unused)
+{
+    XC_LOG(("_handle_expose() - called\n"));
+
+    /* ignore all Exposes except last */
+
+    if (event->xexpose.count)
+        return;
+
+    if (after_first_curses_request && received_map_notify)
+        _display_screen();
+}
+
+static void _handle_nonmaskable(Widget w, XtPointer client_data, XEvent *event,
+                                Boolean *unused)
+{
+    XClientMessageEvent *client_event = (XClientMessageEvent *)event;
+
+    PDC_LOG(("%s:_handle_nonmaskable called: xc_otherpid %d event %d\n",
+             XCLOGMSG, xc_otherpid, event->type));
+
+    if (event->type == ClientMessage)
+    {
+        XC_LOG(("ClientMessage received\n"));
+
+        /* This code used to include handling of WM_SAVE_YOURSELF, but
+           it resulted in continual failure of THE on my Toshiba laptop.
+           Removed on 3-3-2001. Now only exits on WM_DELETE_WINDOW. */
+
+        if ((Atom)client_event->data.s[0] == wm_atom[0])
+        {
+            /* if we specified an exit key return it, otherwise exit the process */
+            if ( SP->exit_key )
+                _send_key_to_curses(SP->exit_key, NULL, TRUE);
+            else
+                _exit_process(0, SIGKILL, "");
+        }
+    }
+}
+
+static int override_cursor = -1;
+
+#define CURSOR_UNBLINKING_RECTANGLE 0x303
+
+static void XCursesKeyPress(Widget w, XEvent *event, String *params,
+                            Cardinal *nparams)
+{
+    enum { STATE_NORMAL, STATE_COMPOSE, STATE_CHAR };
+
+#ifdef PDC_XIM
+    Status status;
+    wchar_t buffer[120];
+#else
+    unsigned char buffer[120];
+    XComposeStatus compose;
+    static int compose_state = STATE_NORMAL;
+    static int compose_index = 0;
+    int char_idx = 0;
+#endif
+    unsigned long key = 0;
+    int buflen = 40;
+    int i, count;
+    unsigned long modifier = 0;
+    bool key_code = FALSE;
+    static XEvent prev_event;
+    static int repeat_count = 0;
+
+    XC_LOG(("XCursesKeyPress() - called\n"));
+
+    /* Handle modifier keys first; ignore other KeyReleases */
+    if( event->type == KeyPress && prev_event.type == KeyRelease
+            && event->xkey.time == prev_event.xkey.time
+            && event->xkey.keycode == prev_event.xkey.keycode)
+    {
+        repeat_count++;
+    }
+    else if( event->type == KeyPress)
+        repeat_count = 0;
+    prev_event = *event;
+
+    if (event->type == KeyRelease)
+    {
+        /* The keysym value was set by a previous call to this function
+           with a KeyPress event (or reset by the mouse event handler) */
+
+        if (SP->return_key_modifiers &&
+#ifndef PDC_XIM
+            keysym != compose_key &&
+#endif
+            IsModifierKey(keysym))
+        {
+            switch (keysym) {
+            case XK_Shift_L:
+                key = KEY_SHIFT_L;
+                break;
+            case XK_Shift_R:
+                key = KEY_SHIFT_R;
+                break;
+            case XK_Control_L:
+                key = KEY_CONTROL_L;
+                break;
+            case XK_Control_R:
+                key = KEY_CONTROL_R;
+                break;
+            case XK_Alt_L:
+                key = KEY_ALT_L;
+                break;
+            case XK_Alt_R:
+                key = KEY_ALT_R;
+            }
+
+            if (key)
+                _send_key_to_curses(key, NULL, TRUE);
+        }
+
+        return;
+    }
+
+    buffer[0] = '\0';
+
+#ifdef PDC_XIM
+    count = XwcLookupString(Xic, &(event->xkey), buffer, buflen,
+                            &keysym, &status);
+#else
+    count = XLookupString(&(event->xkey), (char *)buffer, buflen,
+                          &keysym, &compose);
+#endif
+
+    /* translate keysym into curses key code */
+
+    PDC_LOG(("%s:Key mask: %x\n", XCLOGMSG, event->xkey.state));
+
+#ifdef PDCDEBUG
+    for (i = 0; i < 4; i++)
+        PDC_debug("%s:Keysym %x %d\n", XCLOGMSG,
+                  XKeycodeToKeysym(XCURSESDISPLAY, event->xkey.keycode, i), i);
+#endif
+
+#ifndef PDC_XIM
+
+    /* Check if the key just pressed is the user-specified compose
+       key; if it is, set the compose state and exit. */
+
+    if (keysym == compose_key)
+    {
+        /* Change the shape of the cursor to an outline rectangle to
+           indicate we are in "compose" status */
+
+        override_cursor = CURSOR_UNBLINKING_RECTANGLE;
+        compose_state = STATE_COMPOSE;
+        return;
+    }
+
+    switch (compose_state)
+    {
+    case STATE_COMPOSE:
+        if (IsModifierKey(keysym))
+            return;
+
+        if (event->xkey.state & compose_mask)
+        {
+            compose_state = STATE_NORMAL;
+            override_cursor = -1;
+            break;
+        }
+
+        if (buffer[0] && count == 1)
+            key = buffer[0];
+
+        compose_index = -1;
+
+        for (i = 0; i < (int)strlen(compose_chars); i++)
+            if (compose_chars[i] == key)
+            {
+                compose_index = i;
+                break;
+            }
+
+        if (compose_index == -1)
+        {
+            compose_state = STATE_NORMAL;
+            compose_index = 0;
+            override_cursor = -1;
+            break;
+        }
+
+        compose_state = STATE_CHAR;
+        return;
+
+    case STATE_CHAR:
+        if (IsModifierKey(keysym))
+            return;
+
+        if (event->xkey.state & compose_mask)
+        {
+            compose_state = STATE_NORMAL;
+            override_cursor = -1;
+            break;
+        }
+
+        if (buffer[0] && count == 1)
+            key = buffer[0];
+
+        char_idx = -1;
+
+        for (i = 0; i < MAX_COMPOSE_CHARS; i++)
+            if (compose_lookups[compose_index][i] == key)
+            {
+                char_idx = i;
+                break;
+            }
+
+        if (char_idx == -1)
+        {
+            compose_state = STATE_NORMAL;
+            compose_index = 0;
+            override_cursor = -1;
+            break;
+        }
+
+        _send_key_to_curses(compose_keys[compose_index][char_idx],
+            NULL, FALSE);
+
+        compose_state = STATE_NORMAL;
+        compose_index = 0;
+        override_cursor = -1;
+
+        return;
+    }
+
+#endif /* PDC_XIM */
+
+    /* To get here we are procesing "normal" keys */
+
+    PDC_LOG(("%s:Keysym %x %d\n", XCLOGMSG,
+             XKeycodeToKeysym(XCURSESDISPLAY, event->xkey.keycode, key), key));
+
+        /* 0x10: usually, numlock modifier */
+
+    if (event->xkey.state & Mod2Mask)
+        modifier |= PDC_KEY_MODIFIER_NUMLOCK;
+
+        /* 0x01: shift modifier */
+
+    if (event->xkey.state & ShiftMask)
+        modifier |= PDC_KEY_MODIFIER_SHIFT;
+
+        /* 0x04: control modifier */
+
+    if (event->xkey.state & ControlMask)
+        modifier |= PDC_KEY_MODIFIER_CONTROL;
+
+        /* 0x08: usually, alt modifier */
+
+    if (event->xkey.state & Mod1Mask)
+        modifier |= PDC_KEY_MODIFIER_ALT;
+
+    if( repeat_count)
+        modifier |= PDC_KEY_MODIFIER_REPEAT;
+
+    for (i = 0; key_table[i].keycode; i++)
+    {
+        if (key_table[i].keycode == keysym)
+        {
+            PDC_LOG(("%s:State %x\n", XCLOGMSG, event->xkey.state));
+
+            /* ControlMask: 0x04: control modifier
+               Mod1Mask: 0x08: usually, alt modifier
+               Mod2Mask: 0x10: usually, numlock modifier
+               ShiftMask: 0x01: shift modifier */
+
+            if ((event->xkey.state & ShiftMask) ||
+                (key_table[i].numkeypad &&
+                (event->xkey.state & Mod2Mask)))
+            {
+                key = key_table[i].shifted;
+            }
+            else if (event->xkey.state & ControlMask)
+            {
+                key = key_table[i].control;
+            }
+            else if (event->xkey.state & Mod1Mask)
+            {
+                key = key_table[i].alt;
+            }
+
+            /* To get here, we ignore all other modifiers */
+
+            else
+                key = key_table[i].normal;
+
+            key_code = (key > 0x100);
+            break;
+        }
+    }
+
+    if (!key && buffer[0] && count == 1)
+        key = buffer[0];
+
+    PDC_LOG(("%s:Key: %s (%lx) pressed - %lx Mod: %x\n", XCLOGMSG,
+             XKeysymToString(keysym), keysym, key, event->xkey.state));
+
+    /* Handle ALT letters and numbers */
+
+    /* enable Alt key without numlock on */
+    if (event->xkey.state & Mod1Mask)
+    {
+        if (key >= 'A' && key <= 'Z')
+        {
+            key += ALT_A - 'A';
+            key_code = TRUE;
+        }
+
+        if (key >= 'a' && key <= 'z')
+        {
+            key += ALT_A - 'a';
+            key_code = TRUE;
+        }
+
+        if (key >= '0' && key <= '9')
+        {
+            key += ALT_0 - '0';
+            key_code = TRUE;
+        }
+    }
+
+    /* After all that, send the key back to the application if is
+       NOT zero. */
+
+    if (key)
+    {
+        static long unicode_value = -1L;
+
+        if( key == 21 && modifier ==    /* Ctrl-Shift-U hit: Unicode entry */
+                 (PDC_KEY_MODIFIER_SHIFT | PDC_KEY_MODIFIER_CONTROL))
+            unicode_value = 0L;
+        if( unicode_value >= 0L)
+        {
+            int offset = 0;
+
+            override_cursor = CURSOR_UNBLINKING_RECTANGLE;
+            if( key >= '0' && key <= '9')
+                offset = '0';
+            if( key >= 'a' && key <= 'f')
+                offset = 'a' - 10;
+            if( key >= 'A' && key <= 'F')
+                offset = 'A' - 10;
+            if( offset)
+            {
+                unicode_value <<= 4;
+                unicode_value |= (long)( key - offset);
+            }
+            if( key == 13 || key == PADENTER)
+            {
+                key = unicode_value;
+                unicode_value = -1L;
+                modifier = 0;
+                key_code = FALSE;
+                override_cursor = -1;
+            }
+            else     /* still in unicode entry mode */
+                return;
+        }
+
+        if (SP->save_key_modifiers)
+            key |= (modifier << 24);
+
+        _send_key_to_curses(key, NULL, key_code);
+    }
+}
+
+static void XCursesHandleString(Widget w, XEvent *event, String *params,
+                                Cardinal *nparams)
+{
+    unsigned char *ptr;
+
+    if (*nparams != 1)
+        return;
+
+    ptr = (unsigned char *)*params;
+
+    if (ptr[0] == '0' && ptr[1] == 'x' && ptr[2] != '\0')
+    {
+        unsigned char c;
+        unsigned long total = 0;
+
+        for (ptr += 2; (c = tolower(*ptr)); ptr++)
+        {
+            total <<= 4;
+
+            if (c >= '0' && c <= '9')
+                total += c - '0';
+            else
+                if (c >= 'a' && c <= 'f')
+                    total += c - ('a' - 10);
+                else
+                    break;
+        }
+
+        if (c == '\0')
+            _send_key_to_curses(total, NULL, FALSE);
+    }
+    else
+        for (; *ptr; ptr++)
+            _send_key_to_curses((unsigned long)*ptr, NULL, FALSE);
+}
+
+static void _paste_string(Widget w, XtPointer data, Atom *selection, Atom *type,
+                          XtPointer value, unsigned long *length, int *format)
+{
+    unsigned long i, key;
+    unsigned char *string = value;
+
+    XC_LOG(("_paste_string() - called\n"));
+
+    if (!*type || !*length || !string)
+        return;
+
+    for (i = 0; string[i] && (i < (*length)); i++)
+    {
+        key = string[i];
+
+        if (key == 10)      /* new line - convert to ^M */
+            key = 13;
+
+        _send_key_to_curses(key, NULL, FALSE);
+    }
+
+    XtFree(value);
+}
+
+static void _paste_utf8(Widget w, XtPointer event, Atom *selection, Atom *type,
+                        XtPointer value, unsigned long *length, int *format)
+{
+    wchar_t key;
+    size_t i = 0, len;
+    char *string = value;
+
+    XC_LOG(("_paste_utf8() - called\n"));
+
+    if (!*type || !*length)
+    {
+        XtGetSelectionValue(w, XA_PRIMARY, XA_STRING, _paste_string,
+                            event, ((XButtonEvent *)event)->time);
+        return;
+    }
+
+    len = *length;
+
+    if (!string)
+        return;
+
+    while (string[i] && (i < len))
+    {
+        int retval = _from_utf8(&key, string + i, len - i);
+
+        if (retval < 1)
+            return;
+
+        if (key == 10)      /* new line - convert to ^M */
+            key = 13;
+
+        _send_key_to_curses(key, NULL, FALSE);
+
+        i += retval;
+    }
+
+    XtFree(value);
+}
+
+static void XCursesPasteSelection(Widget w, XButtonEvent *button_event)
+{
+    XC_LOG(("XCursesPasteSelection() - called\n"));
+
+    XtGetSelectionValue(w, XA_PRIMARY, XA_UTF8_STRING(XtDisplay(w)),
+                        _paste_utf8, (XtPointer)button_event,
+                        button_event->time);
+}
+
+static Boolean _convert_proc(Widget w, Atom *selection, Atom *target,
+                             Atom *type_return, XtPointer *value_return,
+                             unsigned long *length_return, int *format_return)
+{
+    XC_LOG(("_convert_proc() - called\n"));
+
+    if (*target == XA_TARGETS(XtDisplay(topLevel)))
+    {
+        XSelectionRequestEvent *req = XtGetSelectionRequest(w,
+            *selection, (XtRequestId)NULL);
+
+        Atom *targetP;
+        XPointer std_targets;
+        unsigned long std_length;
+
+        XmuConvertStandardSelection(topLevel, req->time, selection,
+                                    target, type_return, &std_targets,
+                                    &std_length, format_return);
+
+        *length_return = std_length + 2;
+        *value_return = XtMalloc(sizeof(Atom) * (*length_return));
+
+        targetP = *(Atom**)value_return;
+        *targetP++ = XA_STRING;
+        *targetP++ = XA_UTF8_STRING(XtDisplay(topLevel));
+
+        memmove((void *)targetP, (const void *)std_targets,
+                sizeof(Atom) * std_length);
+
+        XtFree((char *)std_targets);
+        *type_return = XA_ATOM;
+        *format_return = sizeof(Atom) * 8;
+
+        return True;
+    }
+    else if (*target == XA_UTF8_STRING(XtDisplay(topLevel)) ||
+             *target == XA_STRING)
+    {
+        bool utf8 = !(*target == XA_STRING);
+        char *data = XtMalloc(tmpsel_length * 3 + 1);
+        chtype *tmp = tmpsel;
+        int ret_length = 0;
+
+        if (utf8)
+        {
+            while (*tmp)
+                ret_length += _to_utf8(data + ret_length, *tmp++);
+        }
+        else
+            while (*tmp)
+                data[ret_length++] = *tmp++ & 0xff;
+
+        data[ret_length++] = '\0';
+
+        *value_return = data;
+        *length_return = ret_length;
+        *format_return = 8;
+        *type_return = *target;
+
+        return True;
+    }
+    else
+    {
+        return XmuConvertStandardSelection(topLevel, CurrentTime,
+            selection, target, type_return, (XPointer*)value_return,
+            length_return, format_return);
+    }
+}
+
+static void _lose_ownership(Widget w, Atom *type)
+{
+    XC_LOG(("_lose_ownership() - called\n"));
+
+    if (tmpsel)
+        free(tmpsel);
+
+    tmpsel = NULL;
+    tmpsel_length = 0;
+    _selection_off();
+}
+
+static void _show_selection(int start_x, int start_y, int end_x, int end_y,
+                            bool highlight)
+{
+    int i, num_cols, start_col, row;
+
+    PDC_LOG(("%s:_show_selection() - called StartX: %d StartY: %d "
+             "EndX: %d EndY: %d Highlight: %d\n", XCLOGMSG,
+             start_x, start_y, end_x, end_y, highlight));
+
+    for (i = 0; i < end_y - start_y + 1; i++)
+    {
+        if (start_y == end_y)       /* only one line */
+        {
+            start_col = start_x;
+            num_cols = end_x - start_x + 1;
+            row = start_y;
+        }
+        else if (!i)            /* first line */
+        {
+            start_col = start_x;
+            num_cols = COLS - start_x;
+            row = start_y;
+        }
+        else if (start_y + i == end_y)  /* last line */
+        {
+            start_col = 0;
+            num_cols = end_x + 1;
+            row = end_y;
+        }
+        else                /* full line */
+        {
+            start_col = 0;
+            num_cols = COLS;
+            row = start_y + i;
+        }
+
+        XC_get_line_lock(row);
+
+        _display_text((const chtype *)(Xcurscr + XCURSCR_Y_OFF(row) +
+                      (start_col * sizeof(chtype))), row, start_col,
+                      num_cols, highlight);
+
+        XC_release_line_lock(row);
+    }
+}
+
+static void _selection_off(void)
+{
+    XC_LOG(("_selection_off() - called\n"));
+
+    if( mouse_selection)
+    {
+        _display_screen();
+
+        selection_start_x = selection_start_y = selection_end_x =
+            selection_end_y = 0;
+
+        mouse_selection = FALSE;
+    }
+}
+
+static void _selection_on(int x, int y)
+{
+    XC_LOG(("_selection_on() - called\n"));
+
+    selection_start_x = selection_end_x = x;
+    selection_start_y = selection_end_y = y;
+}
+
+static void _selection_extend(int x, int y)
+{
+    int temp, current_start, current_end, current_start_x,
+        current_end_x, current_start_y, current_end_y, new_start,
+        new_end, new_start_x, new_end_x, new_start_y, new_end_y;
+
+    XC_LOG(("_selection_extend() - called\n"));
+
+    mouse_selection = TRUE;
+
+    /* convert x/y coordinates into start/stop */
+
+    current_start = (selection_start_y * COLS) + selection_start_x;
+    current_end = (selection_end_y * COLS) + selection_end_x;
+
+    if (current_start > current_end)
+    {
+        current_start_x = selection_end_x;
+        current_start_y = selection_end_y;
+        current_end_x = selection_start_x;
+        current_end_y = selection_start_y;
+        temp = current_start;
+        current_start = current_end;
+        current_end = temp;
+    }
+    else
+    {
+        current_end_x = selection_end_x;
+        current_end_y = selection_end_y;
+        current_start_x = selection_start_x;
+        current_start_y = selection_start_y;
+    }
+
+    /* Now we have the current selection as a linear expression.
+       Convert the new position to a linear expression. */
+
+    selection_end_x = x;
+    selection_end_y = y;
+
+    /* convert x/y coordinates into start/stop */
+
+    new_start = (selection_start_y * COLS) + selection_start_x;
+    new_end = (selection_end_y * COLS) + selection_end_x;
+
+    if (new_start > new_end)
+    {
+        new_start_x = selection_end_x;
+        new_start_y = selection_end_y;
+        new_end_x = selection_start_x;
+        new_end_y = selection_start_y;
+        temp = new_start;
+        new_start = new_end;
+        new_end = temp;
+    }
+    else
+    {
+        new_end_x = selection_end_x;
+        new_end_y = selection_end_y;
+        new_start_x = selection_start_x;
+        new_start_y = selection_start_y;
+    }
+
+    if (new_end > current_end)
+        _show_selection(current_end_x, current_end_y, new_end_x,
+                        new_end_y, TRUE);
+    else if (new_end < current_end)
+        _show_selection(new_end_x, new_end_y, current_end_x,
+                        current_end_y, FALSE);
+    else if (new_start < current_start)
+        _show_selection(new_start_x, new_start_y, current_start_x,
+                        current_start_y, TRUE);
+    else if (new_start > current_start)
+        _show_selection(current_start_x, current_start_y,
+                        new_start_x, new_start_y, FALSE);
+    else
+        _show_selection(current_start_x, current_start_y,
+                        new_start_x, new_start_y, TRUE);
+}
+
+static void _selection_set(void)
+{
+    int i, j, start, end, start_x, end_x, start_y, end_y, num_cols,
+        start_col, row, num_chars, ch, last_nonblank, length, newlen;
+    chtype *ptr = NULL;
+
+    XC_LOG(("_selection_set() - called\n"));
+
+    /* convert x/y coordinates into start/stop */
+
+    start = (selection_start_y * COLS) + selection_start_x;
+    end = (selection_end_y * COLS) + selection_end_x;
+
+    if (start == end)
+    {
+        if (tmpsel)
+            free(tmpsel);
+
+        tmpsel = NULL;
+        tmpsel_length = 0;
+
+        return;
+    }
+
+    if (start > end)
+    {
+        start_x = selection_end_x;
+        start_y = selection_end_y;
+        end_x = selection_start_x;
+        end_y = selection_start_y;
+        length = start - end + 1;
+    }
+    else
+    {
+        end_x = selection_end_x;
+        end_y = selection_end_y;
+        start_x = selection_start_x;
+        start_y = selection_start_y;
+        length = end - start + 1;
+    }
+
+    newlen = length + end_y - start_y + 2;
+
+    if (length > (int)tmpsel_length)
+    {
+        if (!tmpsel_length)
+            tmpsel = malloc(newlen * sizeof(chtype));
+        else
+            tmpsel = realloc(tmpsel, newlen * sizeof(chtype));
+    }
+
+    if (!tmpsel)
+    {
+        tmpsel_length = 0;
+        return;
+    }
+
+    tmpsel_length = length;
+    num_chars = 0;
+
+    for (i = 0; i < end_y - start_y + 1; i++)
+    {
+
+        if (start_y == end_y)       /* only one line */
+        {
+            start_col = start_x;
+            num_cols = end_x - start_x + 1;
+            row = start_y;
+        }
+        else if (!i)            /* first line */
+        {
+            start_col = start_x;
+            num_cols = COLS - start_x;
+            row = start_y;
+        }
+        else if (start_y + i == end_y)  /* last line */
+        {
+            start_col = 0;
+            num_cols = end_x + 1;
+            row = end_y;
+        }
+        else                /* full line */
+        {
+            start_col = 0;
+            num_cols = COLS;
+            row = start_y + i;
+        }
+
+        XC_get_line_lock(row);
+
+        ptr = (chtype *)(Xcurscr + XCURSCR_Y_OFF(row) +
+              start_col * sizeof(chtype));
+
+        if (i < end_y - start_y)
+        {
+            last_nonblank = 0;
+
+            for (j = 0; j < num_cols; j++)
+            {
+                ch = (int)(ptr[j] & A_CHARTEXT);
+                if (ch != (int)' ')
+                    last_nonblank = j;
+            }
+        }
+        else
+            last_nonblank = num_cols - 1;
+
+        for (j = 0; j <= last_nonblank; j++)
+            tmpsel[num_chars++] = ptr[j];
+
+        XC_release_line_lock(row);
+
+        if (i < end_y - start_y)
+            tmpsel[num_chars++] = '\n';
+    }
+
+    tmpsel[num_chars] = '\0';
+    tmpsel_length = num_chars;
+}
+
+#define CURSOR_INVISIBLE  0
+#define CURSOR_NORMAL     1
+#define CURSOR_BLOCK      2
+#define CURSOR_RECTANGLE  3
+#define CURSOR_VLINE      4
+#define CURSOR_HALF_BLOCK 5
+
+static void _display_cursor(int old_row, int old_x, int new_row, int new_x)
+{
+    int xpos, ypos, i, cursor_to_show;
+    chtype *ch;
+    short fore = 0, back = 0;
+
+    PDC_LOG(("%s:_display_cursor() - draw char at row: %d col %d\n",
+             XCLOGMSG, old_row, old_x));
+
+    /* if the cursor position is outside the boundary of the screen,
+       ignore the request */
+
+    if (old_row >= XCursesLINES || old_x >= COLS ||
+        new_row >= XCursesLINES || new_x >= COLS)
+        return;
+
+    /* display the character at the current cursor position */
+    PDC_LOG(("%s:_display_cursor() - draw char at row: %d col %d\n",
+             XCLOGMSG, old_row, old_x));
+
+    _display_text((const chtype *)(Xcurscr + (XCURSCR_Y_OFF(old_row) +
+                  (old_x * sizeof(chtype)))), old_row, old_x, 1, FALSE);
+
+    /* display the cursor at the new cursor position */
+
+                  /* use lower 8 bits for 1/2 cycle (or if not in window) */
+    if( PDC_blink_state || !window_entered)
+        cursor_to_show = (SP->visibility & 0xff);
+    else                  /* ...& upper 8 bits on other 1/2 cycle */
+        cursor_to_show = (SP->visibility >> 8);
+    if( override_cursor >= 0)
+        cursor_to_show = (PDC_blink_state ? override_cursor & 0xff
+                                          : override_cursor >> 8);
+    if( !cursor_to_show)
+        return;     /* cursor not displayed, no more to do */
+
+    _make_xy(new_x, new_row, &xpos, &ypos);
+
+    ch = (chtype *)(Xcurscr + XCURSCR_Y_OFF(new_row) + new_x * sizeof(chtype));
+
+    _set_cursor_color(ch, &fore, &back);
+    XSetForeground(XCURSESDISPLAY, rect_cursor_gc, colors[back]);
+
+    switch( cursor_to_show)
+    {
+        case CURSOR_VLINE:
+            for (i = 1; i <= 2; i++)
+                XDrawLine(XCURSESDISPLAY, XCURSESWIN, rect_cursor_gc,
+                      xpos + i, ypos - xc_app_data.normalFont->ascent,
+                      xpos + i, ypos - xc_app_data.normalFont->ascent +
+                      font_height - 1);
+            break;
+        case CURSOR_NORMAL:
+        case CURSOR_HALF_BLOCK:
+        {
+            int n_lines = xc_app_data.normalFont->descent;
+
+            ypos += n_lines - 1;
+            if( cursor_to_show == CURSOR_HALF_BLOCK)
+               n_lines += xc_app_data.normalFont->ascent / 2;
+            else
+               n_lines += 2;
+            for( i = 0; i < n_lines; i++, ypos--)
+                XDrawLine(XCURSESDISPLAY, XCURSESWIN, rect_cursor_gc,
+                          xpos, ypos, xpos + font_width, ypos);
+            break;
+        }
+        case CURSOR_RECTANGLE:
+            XDrawRectangle(XCURSESDISPLAY, XCURSESWIN, rect_cursor_gc,
+                       xpos + 1, ypos - font_height +
+                       xc_app_data.normalFont->descent + 1,
+                       font_width - 2, font_height - 2);
+            break;
+        case CURSOR_BLOCK:
+        default:
+        {
+            /* cursor visibility high */
+#ifdef PDC_WIDE
+            XChar2b buf[2];
+
+            buf[0].byte1 = (*ch & 0xff00) >> 8;
+            buf[0].byte2 = *ch & 0x00ff;
+
+            buf[1].byte1 = buf[1].byte2 = 0;
+#else
+            char buf[2];
+
+            buf[0] = *ch & 0xff;
+            buf[1] = '\0';
+#endif
+            XSetForeground(XCURSESDISPLAY, block_cursor_gc, colors[fore]);
+            XSetBackground(XCURSESDISPLAY, block_cursor_gc, colors[back]);
+#ifdef PDC_WIDE
+            XDrawImageString16(
+#else
+            XDrawImageString(
+#endif
+                         XCURSESDISPLAY, XCURSESWIN, block_cursor_gc,
+                         xpos, ypos, buf, 1);
+        }
+        break;
+    }
+
+    PDC_LOG(("%s:_display_cursor() - draw cursor at row %d col %d\n",
+             XCLOGMSG, new_row, new_x));
+}
+
+static void _redraw_cursor(void)
+{
+    _display_cursor(SP->cursrow, SP->curscol, SP->cursrow, SP->curscol);
+}
+
+static void _handle_enter_leave(Widget w, XtPointer client_data,
+                                XEvent *event, Boolean *unused)
+{
+    XC_LOG(("_handle_enter_leave called\n"));
+
+    switch(event->type)
+    {
+    case EnterNotify:
+        XC_LOG(("EnterNotify received\n"));
+
+        window_entered = TRUE;
+        break;
+
+    case LeaveNotify:
+        XC_LOG(("LeaveNotify received\n"));
+
+        window_entered = FALSE;
+
+        /* Display the cursor so it stays on while the window is
+           not current */
+
+//      _redraw_cursor();
+        break;
+
+    default:
+        PDC_LOG(("%s:_handle_enter_leave - unknown event %d\n",
+                 XCLOGMSG, event->type));
+    }
+}
+
+static void _send_key_to_curses(unsigned long key, MOUSE_STATUS *ms,
+                                bool key_code)
+{
+    PDC_LOG(("%s:_send_key_to_curses() - called: sending %d\n",
+             XCLOGMSG, key));
+
+    SP->key_code = key_code;
+
+    if (XC_write_socket(xc_key_sock, &key, sizeof(unsigned long)) < 0)
+        _exit_process(1, SIGKILL, "exiting from _send_key_to_curses");
+
+    if (ms)
+    {
+        MOUSE_LOG(("%s:writing mouse stuff\n", XCLOGMSG));
+
+        if (XC_write_socket(xc_key_sock, ms, sizeof(MOUSE_STATUS)) < 0)
+            _exit_process(1, SIGKILL, "exiting from _send_key_to_curses");
+    }
+}
+
+#ifdef A_OVERLINE
+#define A_ALL_LINES (A_UNDERLINE | A_LEFTLINE | A_RIGHTLINE | A_OVERLINE | A_STRIKEOUT)
+#else
+#define A_ALL_LINES (A_UNDERLINE | A_LEFTLINE | A_RIGHTLINE)
+#endif
+
+/* Note that the logic used to avoid unnecessary drawing is heavily
+borrowed from the HandleTimer function in wingui/pdcscrn.c.  The
+comments there may be helpful. */
+
+static void _blink_cursor(XtPointer unused, XtIntervalId *id)
+{
+    XC_LOG(("_blink_cursor() - called:\n"));
+
+    int i;
+    static int previously_really_blinking = 0;
+    static int prev_line_color = -1;
+    chtype attr_to_seek = 0;
+
+    if( prev_line_color != SP->line_color)
+        attr_to_seek = A_ALL_LINES;
+    if( PDC_really_blinking || previously_really_blinking)
+        attr_to_seek |= A_BLINK;
+    prev_line_color = SP->line_color;
+    previously_really_blinking = PDC_really_blinking;
+    PDC_blink_state ^= 1;
+    if( attr_to_seek)
+        for( i = 0; i < SP->lines; i++)
+        {
+            const chtype *line;
+            int j = 0, n_chars;
+
+            XC_get_line_lock( i);
+            line = (const chtype *)(Xcurscr + XCURSCR_Y_OFF( i));
+
+               /* skip over starting text that isn't blinking: */
+            while( j < SP->cols && !(*line & attr_to_seek))
+            {
+                j++;
+                line++;
+            }
+            n_chars = SP->cols - j;
+            /* then skip over text at the end that's not blinking: */
+            while( n_chars && !(line[n_chars - 1] & attr_to_seek))
+                n_chars--;
+            if( n_chars)
+               _display_text( line, i, j, n_chars, 0);
+            XC_release_line_lock( i);
+        }
+
+    _redraw_cursor();
+
+    XtAppAddTimeOut(app_context, CURSOR_BLINK_RATE,
+                    _blink_cursor, NULL);
+}
+
+static void XCursesButton(Widget w, XEvent *event, String *params,
+                          Cardinal *nparams)
+{
+    int button_no;
+    static int last_button_no = 0;
+    static Time last_button_press_time = 0;
+    MOUSE_STATUS save_mouse_status;
+    bool send_key = TRUE;
+    static bool remove_release;
+    static bool handle_real_release;
+
+    XC_LOG(("XCursesButton() - called\n"));
+
+    keysym = 0; /* suppress any modifier key return */
+
+    save_mouse_status = Mouse_status;
+    button_no = event->xbutton.button;
+
+    /* It appears that under X11R6 (at least on Linux), that an
+       event_type of ButtonMotion does not include the mouse button in
+       the event. The following code is designed to cater for this
+       situation. */
+
+    if (!button_no)
+        button_no = last_button_no;
+
+    last_button_no = button_no;
+
+    Mouse_status.changes = 0;
+
+    switch(event->type)
+    {
+    case ButtonPress:
+        /* Handle button 4 and 5, which are normally mapped to the wheel
+           mouse scroll up and down, and button 6 and 7, which are
+           normally mapped to the wheel mouse scroll left and right */
+
+        if (button_no >= 4 && button_no <= 7)
+        {
+            /* Send the KEY_MOUSE to curses program */
+
+            memset(&Mouse_status, 0, sizeof(Mouse_status));
+
+            switch(button_no)
+            {
+               case 4:
+                  Mouse_status.changes = PDC_MOUSE_WHEEL_UP;
+                  break;
+               case 5:
+                  Mouse_status.changes = PDC_MOUSE_WHEEL_DOWN;
+                  break;
+               case 6:
+                  Mouse_status.changes = PDC_MOUSE_WHEEL_LEFT;
+                  break;
+               case 7:
+                  Mouse_status.changes = PDC_MOUSE_WHEEL_RIGHT;
+            }
+
+            MOUSE_X_POS = MOUSE_Y_POS = -1;
+            _send_key_to_curses(KEY_MOUSE, &Mouse_status, TRUE);
+            remove_release = TRUE;
+
+            return;
+        }
+
+        if (button_no == 2 &&
+            (!SP->_trap_mbe || (event->xbutton.state & ShiftMask)))
+        {
+            XCursesPasteSelection(drawing, (XButtonEvent *)event);
+            remove_release = TRUE;
+
+            return;
+        }
+
+        remove_release = False;
+        handle_real_release = False;
+
+        MOUSE_LOG(("\nButtonPress\n"));
+
+        if ((event->xbutton.time - last_button_press_time) <
+            xc_app_data.doubleClickPeriod)
+        {
+            const short curr_status = BUTTON_STATUS( button_no);
+
+            MOUSE_X_POS = save_mouse_status.x;
+            MOUSE_Y_POS = save_mouse_status.y;
+            if( curr_status == BUTTON_DOUBLE_CLICKED
+                     || curr_status == BUTTON_TRIPLE_CLICKED)
+               BUTTON_STATUS(button_no) = BUTTON_TRIPLE_CLICKED;
+            else
+               BUTTON_STATUS(button_no) = BUTTON_DOUBLE_CLICKED;
+
+            _selection_off();
+            remove_release = True;
+        }
+        else
+        {
+            napms(SP->mouse_wait);
+            event->type = ButtonRelease;
+            XSendEvent(event->xbutton.display, event->xbutton.window,
+                       True, 0, event);
+            last_button_press_time = event->xbutton.time;
+
+            return;
+        }
+
+        last_button_press_time = event->xbutton.time;
+        break;
+
+    case MotionNotify:
+        MOUSE_LOG(("\nMotionNotify: y: %d x: %d Width: %d "
+                   "Height: %d\n", event->xbutton.y, event->xbutton.x,
+                   font_width, font_height));
+
+        MOUSE_X_POS = (event->xbutton.x - xc_app_data.borderWidth) /
+                      font_width;
+        MOUSE_Y_POS = (event->xbutton.y - xc_app_data.borderWidth) /
+                      font_height;
+
+        if (button_no == 1 &&
+            (!SP->_trap_mbe || (event->xbutton.state & ShiftMask)))
+        {
+            _selection_extend(MOUSE_X_POS, MOUSE_Y_POS);
+            send_key = FALSE;
+        }
+        else
+            _selection_off();
+
+        /* Throw away mouse movements if they are in the same character
+           position as the last mouse event, or if we are currently in
+           the middle of a double click event. */
+
+        if ((MOUSE_X_POS == save_mouse_status.x &&
+             MOUSE_Y_POS == save_mouse_status.y) ||
+             save_mouse_status.button[button_no - 1] == BUTTON_DOUBLE_CLICKED)
+        {
+            send_key = FALSE;
+            break;
+        }
+
+        Mouse_status.changes |= PDC_MOUSE_MOVED;
+        break;
+
+    case ButtonRelease:
+        if (remove_release)
+        {
+            MOUSE_LOG(("Release at: %ld - removed\n", event->xbutton.time));
+            return;
+        }
+        else
+        {
+            MOUSE_X_POS = (event->xbutton.x - xc_app_data.borderWidth) /
+                          font_width;
+            MOUSE_Y_POS = (event->xbutton.y - xc_app_data.borderWidth) /
+                          font_height;
+
+            if (!handle_real_release)
+            {
+                if ((event->xbutton.time - last_button_press_time) <
+                    SP->mouse_wait &&
+                    (event->xbutton.time != last_button_press_time))
+                {
+                    /* The "real" release was shorter than usleep() time;
+                       therefore generate a click event */
+
+                    MOUSE_LOG(("Release at: %ld - click\n",
+                               event->xbutton.time));
+
+                    BUTTON_STATUS(button_no) = BUTTON_CLICKED;
+
+                    if (button_no == 1 && mouse_selection &&
+                        (!SP->_trap_mbe || (event->xbutton.state & ShiftMask)))
+                    {
+                        send_key = FALSE;
+
+                        if (XtOwnSelection(topLevel, XA_PRIMARY,
+                                           event->xbutton.time, _convert_proc,
+                                           _lose_ownership, NULL) == False)
+                            _selection_off();
+                    }
+                    else
+                        _selection_off();
+
+                    /* Ensure the "pseudo" release event is ignored */
+
+                    remove_release = True;
+                    handle_real_release = False;
+                    break;
+                }
+                else
+                {
+                    /* Button release longer than usleep() time;
+                       therefore generate a press and wait for the real
+                       release to occur later. */
+
+                    MOUSE_LOG(("Generated Release at: %ld - "
+                               "press & release\n", event->xbutton.time));
+
+                    BUTTON_STATUS(button_no) = BUTTON_PRESSED;
+
+                    if (button_no == 1 &&
+                        (!SP->_trap_mbe || (event->xbutton.state & ShiftMask)))
+                    {
+                        _selection_off();
+                        _selection_on(MOUSE_X_POS, MOUSE_Y_POS);
+                    }
+
+                    handle_real_release = True;
+                    break;
+                }
+            }
+            else
+            {
+                MOUSE_LOG(("Release at: %ld - released\n",
+                           event->xbutton.time));
+            }
+        }
+
+        MOUSE_LOG(("\nButtonRelease\n"));
+
+        BUTTON_STATUS(button_no) = BUTTON_RELEASED;
+
+        if (button_no == 1 && mouse_selection &&
+            (!SP->_trap_mbe || (event->xbutton.state & ShiftMask)))
+        {
+            send_key = FALSE;
+
+            if (XtOwnSelection(topLevel, XA_PRIMARY,
+                               event->xbutton.time, _convert_proc,
+                               _lose_ownership, NULL) == False)
+                _selection_off();
+
+            _selection_set();
+        }
+        else
+            _selection_off();
+
+        break;
+    }
+
+    /* Set up the mouse status fields in preparation for sending */
+
+    Mouse_status.changes |= 1 << (button_no - 1);
+
+    if (Mouse_status.changes & PDC_MOUSE_MOVED &&
+        BUTTON_STATUS(button_no) == BUTTON_PRESSED)
+        BUTTON_STATUS(button_no) = BUTTON_MOVED;
+
+    if (event->xbutton.state & ShiftMask)
+        BUTTON_STATUS(button_no) |= BUTTON_SHIFT;
+    if (event->xbutton.state & ControlMask)
+        BUTTON_STATUS(button_no) |= BUTTON_CONTROL;
+    if (event->xbutton.state & Mod1Mask)
+        BUTTON_STATUS(button_no) |= BUTTON_ALT;
+
+    /* If we are ignoring the event, or the mouse position is outside
+       the bounds of the screen (because of the border), return here */
+
+    MOUSE_LOG(("Button: %d x: %d y: %d Button status: %x "
+        "Mouse status: %x\n", button_no, MOUSE_X_POS, MOUSE_Y_POS,
+        BUTTON_STATUS(button_no), Mouse_status.changes));
+
+    MOUSE_LOG(("Send: %d Button1: %x Button2: %x Button3: %x %d %d\n",
+        send_key, BUTTON_STATUS(1), BUTTON_STATUS(2),
+        BUTTON_STATUS(3), XCursesLINES, XCursesCOLS));
+
+    if (!send_key || MOUSE_X_POS < 0 || MOUSE_X_POS >= XCursesCOLS ||
+        MOUSE_Y_POS < 0 || MOUSE_Y_POS >= XCursesLINES)
+        return;
+
+    /* Send the KEY_MOUSE to curses program */
+
+    _send_key_to_curses(KEY_MOUSE, &Mouse_status, TRUE);
+}
+
+static void _scroll_up_down(Widget w, XtPointer client_data,
+                            XtPointer call_data)
+{
+    int pixels = (long) call_data;
+    int total_y = SP->sb_total_y * font_height;
+    int viewport_y = SP->sb_viewport_y * font_height;
+    int cur_y = SP->sb_cur_y * font_height;
+
+    /* When pixels is negative, right button pressed, move data down,
+       thumb moves up.  Otherwise, left button pressed, pixels positive,
+       move data up, thumb down. */
+
+    cur_y += pixels;
+
+    /* limit panning to size of overall */
+
+    if (cur_y < 0)
+        cur_y = 0;
+    else
+        if (cur_y > (total_y - viewport_y))
+            cur_y = total_y - viewport_y;
+
+    SP->sb_cur_y = cur_y / font_height;
+
+    XawScrollbarSetThumb(w, (double)((double)cur_y / (double)total_y),
+                         (double)((double)viewport_y / (double)total_y));
+
+    /* Send a key: if pixels negative, send KEY_SCROLL_DOWN */
+
+    _send_key_to_curses(KEY_SF, NULL, TRUE);
+}
+
+static void _scroll_left_right(Widget w, XtPointer client_data,
+                               XtPointer call_data)
+{
+    int pixels = (long) call_data;
+    int total_x = SP->sb_total_x * font_width;
+    int viewport_x = SP->sb_viewport_x * font_width;
+    int cur_x = SP->sb_cur_x * font_width;
+
+    cur_x += pixels;
+
+    /* limit panning to size of overall */
+
+    if (cur_x < 0)
+        cur_x = 0;
+    else
+        if (cur_x > (total_x - viewport_x))
+            cur_x = total_x - viewport_x;
+
+    SP->sb_cur_x = cur_x / font_width;
+
+    XawScrollbarSetThumb(w, (double)((double)cur_x / (double)total_x),
+                         (double)((double)viewport_x / (double)total_x));
+
+    _send_key_to_curses(KEY_SR, NULL, TRUE);
+}
+
+static void _thumb_up_down(Widget w, XtPointer client_data,
+                           XtPointer call_data)
+{
+    double percent = *(double *) call_data;
+    double total_y = (double)SP->sb_total_y;
+    double viewport_y = (double)SP->sb_viewport_y;
+    int cur_y = SP->sb_cur_y;
+
+    /* If the size of the viewport is > overall area simply return,
+       as no scrolling is permitted. */
+
+    if (SP->sb_viewport_y >= SP->sb_total_y)
+        return;
+
+    if ((SP->sb_cur_y = (int)((double)total_y * percent)) >=
+        (total_y - viewport_y))
+        SP->sb_cur_y = total_y - viewport_y;
+
+    XawScrollbarSetThumb(w, (double)(cur_y / total_y),
+                         (double)(viewport_y / total_y));
+
+    _send_key_to_curses(KEY_SF, NULL, TRUE);
+}
+
+static void _thumb_left_right(Widget w, XtPointer client_data,
+                  XtPointer call_data)
+{
+    double percent = *(double *) call_data;
+    double total_x = (double)SP->sb_total_x;
+    double viewport_x = (double)SP->sb_viewport_x;
+    int cur_x = SP->sb_cur_x;
+
+    if (SP->sb_viewport_x >= SP->sb_total_x)
+        return;
+
+    if ((SP->sb_cur_x = (int)((float)total_x * percent)) >=
+        (total_x - viewport_x))
+        SP->sb_cur_x = total_x - viewport_x;
+
+    XawScrollbarSetThumb(w, (double)(cur_x / total_x),
+                         (double)(viewport_x / total_x));
+
+    _send_key_to_curses(KEY_SR, NULL, TRUE);
+}
+
+static void _exit_process(int rc, int sig, char *msg)
+{
+    if (rc || sig)
+        fprintf(stderr, "%s:_exit_process() - called: rc:%d sig:%d <%s>\n",
+                XCLOGMSG, rc, sig, msg);
+
+    shmdt((char *)SP);
+    shmdt((char *)Xcurscr);
+    shmctl(shmidSP, IPC_RMID, 0);
+    shmctl(shmid_Xcurscr, IPC_RMID, 0);
+
+    if (bitmap_file)
+    {
+        XFreePixmap(XCURSESDISPLAY, icon_bitmap);
+        free(bitmap_file);
+    }
+
+#ifdef HAVE_XPM_H
+    if (pixmap_file)
+    {
+        XFreePixmap(XCURSESDISPLAY, icon_pixmap);
+        XFreePixmap(XCURSESDISPLAY, icon_pixmap_mask);
+        free(pixmap_file);
+    }
+#endif
+    XFreeGC(XCURSESDISPLAY, normal_gc);
+    XFreeGC(XCURSESDISPLAY, italic_gc);
+    XFreeGC(XCURSESDISPLAY, bold_gc);
+    XFreeGC(XCURSESDISPLAY, block_cursor_gc);
+    XFreeGC(XCURSESDISPLAY, rect_cursor_gc);
+    XFreeGC(XCURSESDISPLAY, border_gc);
+#ifdef PDC_XIM
+    XDestroyIC(Xic);
+#endif
+
+    shutdown(xc_display_sock, 2);
+    close(xc_display_sock);
+
+    shutdown(xc_exit_sock, 2);
+    close(xc_exit_sock);
+
+    shutdown(xc_key_sock, 2);
+    close(xc_key_sock);
+
+    if (sig)
+        kill(xc_otherpid, sig); /* to kill parent process */
+
+    _exit(rc);
+}
+
+static void _resize(void)
+{
+    short save_atrtab[PDC_COLOR_PAIRS * 2];
+
+    after_first_curses_request = FALSE;
+
+    SP->lines = XCursesLINES = ((resize_window_height -
+        (2 * xc_app_data.borderWidth)) / font_height);
+
+    LINES = XCursesLINES - SP->linesrippedoff - SP->slklines;
+
+    SP->cols = COLS = XCursesCOLS = ((resize_window_width -
+        (2 * xc_app_data.borderWidth)) / font_width);
+
+    window_width = resize_window_width;
+    window_height = resize_window_height;
+
+    _draw_border();
+
+    /* Detach and drop the current shared memory segment and create and
+       attach to a new segment */
+
+    memcpy(save_atrtab, xc_atrtab, sizeof(save_atrtab));
+
+    SP->XcurscrSize = XCURSCR_SIZE;
+    shmdt((char *)Xcurscr);
+    shmctl(shmid_Xcurscr, IPC_RMID, 0);
+
+    if ((shmid_Xcurscr = shmget(shmkey_Xcurscr,
+        SP->XcurscrSize + XCURSESSHMMIN, 0700 | IPC_CREAT)) < 0)
+    {
+        perror("Cannot allocate shared memory for curscr");
+
+        _exit_process(4, SIGKILL, "exiting from _process_curses_requests");
+    }
+
+    Xcurscr = (unsigned char*)shmat(shmid_Xcurscr, 0, 0);
+    memset(Xcurscr, 0, SP->XcurscrSize);
+    xc_atrtab = (short *)(Xcurscr + XCURSCR_ATRTAB_OFF);
+    memcpy(xc_atrtab, save_atrtab, sizeof(save_atrtab));
+}
+
+/* For PDC_set_title() */
+
+static void _set_title(void)
+{
+    char title[1024];   /* big enough for window title */
+    int pos;
+
+    if ((XC_read_socket(xc_display_sock, &pos, sizeof(int)) < 0) ||
+        (XC_read_socket(xc_display_sock, title, pos) < 0))
+    {
+        _exit_process(5, SIGKILL, "exiting from _set_title");
+    }
+
+    XtVaSetValues(topLevel, XtNtitle, title, NULL);
+}
+
+/* For color_content() */
+
+static void _get_color(void)
+{
+    XColor *tmp = (XColor *)(Xcurscr + XCURSCR_XCOLOR_OFF);
+    int index = tmp->pixel;
+    Colormap cmap = DefaultColormap(XCURSESDISPLAY,
+                                    DefaultScreen(XCURSESDISPLAY));
+
+    if (index < 0 || index >= MAX_COLORS)
+        _exit_process(4, SIGKILL, "exiting from _get_color");
+
+    tmp->pixel = colors[index];
+    XQueryColor(XCURSESDISPLAY, cmap, tmp);
+}
+
+/* For init_color() */
+
+static void _set_color(void)
+{
+    XColor *tmp = (XColor *)(Xcurscr + XCURSCR_XCOLOR_OFF);
+    int index = tmp->pixel;
+    Colormap cmap = DefaultColormap(XCURSESDISPLAY,
+                                    DefaultScreen(XCURSESDISPLAY));
+
+    if (index < 0 || index >= MAX_COLORS)
+        _exit_process(4, SIGKILL, "exiting from _set_color");
+
+    if (XAllocColor(XCURSESDISPLAY, cmap, tmp))
+    {
+        colors[index] = tmp->pixel;
+
+        _display_screen();
+    }
+}
+
+/* For PDC_getclipboard() */
+
+static void _get_selection(Widget w, XtPointer data, Atom *selection,
+                           Atom *type, XtPointer value,
+                           unsigned long *length, int *format)
+{
+    unsigned char *src = value;
+    int pos, len = *length;
+
+    XC_LOG(("_get_selection() - called\n"));
+
+    if (!value && !len)
+    {
+        if (XC_write_display_socket_int(PDC_CLIP_EMPTY) < 0)
+            _exit_process(4, SIGKILL, "exiting from _get_selection");
+    }
+    else
+    {
+        /* Here all is OK, send PDC_CLIP_SUCCESS, then length, then
+           contents */
+
+        if (XC_write_display_socket_int(PDC_CLIP_SUCCESS) < 0)
+            _exit_process(4, SIGKILL, "exiting from _get_selection");
+
+        if (XC_write_display_socket_int(len) < 0)
+            _exit_process(4, SIGKILL, "exiting from _get_selection");
+
+        for (pos = 0; pos < len; pos++)
+        {
+#ifdef PDC_WIDE
+            wchar_t c;
+#else
+            unsigned char c;
+#endif
+            c = *src++;
+
+            if (XC_write_socket(xc_display_sock, &c, sizeof(c)) < 0)
+                _exit_process(4, SIGKILL, "exiting from _get_selection");
+        }
+    }
+}
+
+#ifdef PDC_WIDE
+static void _get_selection_utf8(Widget w, XtPointer data, Atom *selection,
+                                Atom *type, XtPointer value,
+                                unsigned long *length, int *format)
+{
+    int len = *length;
+
+    XC_LOG(("_get_selection_utf8() - called\n"));
+
+    if (!*type || !*length)
+    {
+        XtGetSelectionValue(w, XA_PRIMARY, XA_STRING, _get_selection,
+                            (XtPointer)NULL, 0);
+        return;
+    }
+
+    if (!value && !len)
+    {
+        if (XC_write_display_socket_int(PDC_CLIP_EMPTY) >= 0)
+            return;
+    }
+    else
+    {
+        wchar_t *wcontents = malloc((len + 1) * sizeof(wchar_t));
+        char *src = value;
+        int i = 0;
+
+        while (*src && i < (*length))
+        {
+            int retval = _from_utf8(wcontents + i, src, len);
+
+            src += retval;
+            len -= retval;
+            i++;
+        }
+
+        wcontents[i] = 0;
+        len = i;
+
+        /* Here all is OK, send PDC_CLIP_SUCCESS, then length, then
+           contents */
+
+        if (XC_write_display_socket_int(PDC_CLIP_SUCCESS) >= 0)
+            if (XC_write_display_socket_int(len) >= 0)
+                if (XC_write_socket(xc_display_sock,
+                    wcontents, len * sizeof(wchar_t)) >= 0)
+                {
+                    free(wcontents);
+                    return;
+                }
+    }
+
+    _exit_process(4, SIGKILL, "exiting from _get_selection_utf8");
+}
+#endif
+
+/* For PDC_setclipboard() */
+
+static void _set_selection(void)
+{
+    long length, pos;
+    int status;
+
+    if (XC_read_socket(xc_display_sock, &length, sizeof(long)) < 0)
+        _exit_process(5, SIGKILL, "exiting from _set_selection");
+
+    if (length > (long)tmpsel_length)
+    {
+        if (!tmpsel_length)
+            tmpsel = malloc((length + 1) * sizeof(chtype));
+        else
+            tmpsel = realloc(tmpsel, (length + 1) * sizeof(chtype));
+    }
+
+    if (!tmpsel)
+        if (XC_write_display_socket_int(PDC_CLIP_MEMORY_ERROR) < 0)
+            _exit_process(4, SIGKILL, "exiting from _set_selection");
+
+    for (pos = 0; pos < length; pos++)
+    {
+#ifdef PDC_WIDE
+        wchar_t c;
+#else
+        unsigned char c;
+#endif
+        if (XC_read_socket(xc_display_sock, &c, sizeof(c)) < 0)
+            _exit_process(5, SIGKILL, "exiting from _set_selection");
+
+        tmpsel[pos] = c;
+    }
+
+    tmpsel_length = length;
+    tmpsel[length] = 0;
+
+    if (XtOwnSelection(topLevel, XA_PRIMARY, CurrentTime,
+                       _convert_proc, _lose_ownership, NULL) == False)
+    {
+        status = PDC_CLIP_ACCESS_ERROR;
+        free(tmpsel);
+        tmpsel = NULL;
+        tmpsel_length = 0;
+    }
+    else
+        status = PDC_CLIP_SUCCESS;
+
+    _selection_off();
+
+    if (XC_write_display_socket_int(status) < 0)
+        _exit_process(4, SIGKILL, "exiting from _set_selection");
+}
+
+/* The curses process is waiting; tell it to continue */
+
+static void _resume_curses(void)
+{
+    if (XC_write_display_socket_int(CURSES_CONTINUE) < 0)
+        _exit_process(4, SIGKILL, "exiting from _process_curses_requests");
+}
+
+/* The curses process sent us a message */
+
+static void _process_curses_requests(XtPointer client_data, int *fid,
+                                     XtInputId *id)
+{
+    struct timeval socket_timeout = {0};
+    int s;
+    int old_row, new_row;
+    int old_x, new_x;
+    int pos, num_cols;
+
+    char buf[12];       /* big enough for 2 integers */
+
+    XC_LOG(("_process_curses_requests() - called\n"));
+
+    if (!received_map_notify)
+        return;
+
+    FD_ZERO(&xc_readfds);
+    FD_SET(xc_display_sock, &xc_readfds);
+
+    if ((s = select(FD_SETSIZE, (FD_SET_CAST)&xc_readfds, NULL,
+                    NULL, &socket_timeout)) < 0)
+        _exit_process(2, SIGKILL, "exiting from _process_curses_requests"
+                                  " - select failed");
+
+    if (!s)     /* no requests pending - should never happen! */
+        return;
+
+    if (FD_ISSET(xc_display_sock, &xc_readfds))
+    {
+        /* read first integer to determine total message has been
+           received */
+
+        XC_LOG(("_process_curses_requests() - before XC_read_socket()\n"));
+
+        if (XC_read_socket(xc_display_sock, &num_cols, sizeof(int)) < 0)
+            _exit_process(3, SIGKILL, "exiting from _process_curses_requests"
+                                      " - first read");
+
+        XC_LOG(("_process_curses_requests() - after XC_read_socket()\n"));
+
+        after_first_curses_request = TRUE;
+
+        switch(num_cols)
+        {
+        case CURSES_EXIT:   /* request from curses to stop */
+            XC_LOG(("CURSES_EXIT received from child\n"));
+            _exit_process(0, 0, "XCursesProcess requested to exit by child");
+            break;
+
+        case CURSES_BELL:
+            XC_LOG(("CURSES_BELL received from child\n"));
+            XBell(XCURSESDISPLAY, 50);
+            break;
+
+        /* request from curses to confirm completion of display */
+
+        case CURSES_REFRESH:
+            XC_LOG(("CURSES_REFRESH received from child\n"));
+            _refresh_screen();
+            _resume_curses();
+            break;
+
+        case CURSES_REFRESH_SCROLLBAR:
+            _refresh_scrollbar();
+            break;
+
+        case CURSES_BLINK_ON:
+            PDC_really_blinking = TRUE;
+            break;
+
+        case CURSES_BLINK_OFF:
+            PDC_really_blinking = FALSE;
+            break;
+
+        case CURSES_CURSOR:
+            XC_LOG(("CURSES_CURSOR received from child\n"));
+
+            if (XC_read_socket(xc_display_sock, buf, sizeof(int) * 2) < 0)
+                _exit_process(5, SIGKILL, "exiting from CURSES_CURSOR "
+                                          "_process_curses_requests");
+
+            memcpy(&pos, buf, sizeof(int));
+            old_row = pos & 0xFF;
+            old_x = pos >> 8;
+
+            memcpy(&pos, buf + sizeof(int), sizeof(int));
+            new_row = pos & 0xFF;
+            new_x = pos >> 8;
+
+                  /* Only redraw the cursor if it's actually moved. */
+                  /* Otherwise,  it'll get refreshed at the next cycle. */
+            if( old_row != new_row || old_x != new_x)
+               _display_cursor(old_row, old_x, new_row, new_x);
+            break;
+
+        case CURSES_DISPLAY_CURSOR:
+            if(PDC_blink_state)
+            {
+                XC_LOG(("CURSES_DISPLAY_CURSOR received from child.  Vis. now: 1\n"));
+            }
+            else
+            {
+                XC_LOG(("CURSES_DISPLAY_CURSOR received from child.  Vis. now: 0\n"));
+            }
+            break;
+
+        case CURSES_TITLE:
+            XC_LOG(("CURSES_TITLE received from child\n"));
+            _set_title();
+            break;
+
+        case CURSES_RESIZE:
+            XC_LOG(("CURSES_RESIZE received from child\n"));
+            _resize();
+            _resume_curses();
+            break;
+
+        case CURSES_GET_SELECTION:
+            XC_LOG(("CURSES_GET_SELECTION received from child\n"));
+
+            _resume_curses();
+
+            XtGetSelectionValue(topLevel, XA_PRIMARY,
+#ifdef PDC_WIDE
+                                XA_UTF8_STRING(XtDisplay(topLevel)),
+                                _get_selection_utf8,
+#else
+                                XA_STRING, _get_selection,
+#endif
+                                (XtPointer)NULL, 0);
+
+            break;
+
+        case CURSES_SET_SELECTION:
+            XC_LOG(("CURSES_SET_SELECTION received from child\n"));
+            _set_selection();
+            break;
+
+        case CURSES_CLEAR_SELECTION:
+            XC_LOG(("CURSES_CLEAR_SELECTION received from child\n"));
+            _resume_curses();
+            _selection_off();
+            break;
+
+        case CURSES_GET_COLOR:
+            XC_LOG(("CURSES_GET_COLOR recieved from child\n"));
+            _get_color();
+            _resume_curses();
+            break;
+
+        case CURSES_SET_COLOR:
+            XC_LOG(("CURSES_SET_COLOR recieved from child\n"));
+            _set_color();
+            _resume_curses();
+            break;
+
+        default:
+            PDC_LOG(("%s:Unknown request %d\n", XCLOGMSG, num_cols));
+        }
+    }
+}
+
+static void _handle_structure_notify(Widget w, XtPointer client_data,
+                                     XEvent *event, Boolean *unused)
+{
+    XC_LOG(("_handle_structure_notify() - called\n"));
+
+    switch(event->type)
+    {
+    case ConfigureNotify:
+        XC_LOG(("ConfigureNotify received\n"));
+
+        /* Window has been resized, change width and height to send to
+           place_text and place_graphics in next Expose. Also will need
+           to kill (SIGWINCH) curses process if screen size changes. */
+
+        resize_window_width = event->xconfigure.width;
+        resize_window_height = event->xconfigure.height;
+
+        after_first_curses_request = FALSE;
+
+#ifdef SIGWINCH
+        SP->resized = 1;
+
+        kill(xc_otherpid, SIGWINCH);
+#endif
+        _send_key_to_curses(KEY_RESIZE, NULL, TRUE);
+        break;
+
+    case MapNotify:
+        XC_LOG(("MapNotify received\n"));
+
+        received_map_notify = 1;
+
+        _draw_border();
+        break;
+
+    default:
+        PDC_LOG(("%s:_handle_structure_notify - unknown event %d\n",
+                 XCLOGMSG, event->type));
+    }
+}
+
+static RETSIGTYPE _handle_signals(int signo)
+{
+    int flag = CURSES_EXIT;
+
+    PDC_LOG(("%s:_handle_signals() - called: %d\n", XCLOGMSG, signo));
+
+    /* Patch by: Georg Fuchs */
+
+    XCursesSetSignal(signo, _handle_signals);
+
+#ifdef SIGTSTP
+    if (signo == SIGTSTP)
+    {
+        pause();
+        return;
+    }
+#endif
+#ifdef SIGCONT
+    if (signo == SIGCONT)
+        return;
+#endif
+#ifdef SIGCLD
+    if (signo == SIGCLD)
+        return;
+#endif
+#ifdef SIGTTIN
+    if (signo == SIGTTIN)
+        return;
+#endif
+#ifdef SIGWINCH
+    if (signo == SIGWINCH)
+        return;
+#endif
+
+    /* End of patch by: Georg Fuchs */
+
+    XCursesSetSignal(signo, SIG_IGN);
+
+    /* Send a CURSES_EXIT to myself */
+
+    if (XC_write_socket(xc_exit_sock, &flag, sizeof(int)) < 0)
+        _exit_process(7, signo, "exiting from _handle_signals");
+}
+
+#ifdef PDC_XIM
+static void _dummy_handler(Widget w, XtPointer client_data,
+                           XEvent *event, Boolean *unused)
+{
+}
+#endif
+
+int XCursesSetupX(int argc, char *argv[])
+{
+    char *myargv[] = {"PDCurses", NULL};
+    char override_text[2][10];
+    char **new_argv = NULL;
+    extern bool sb_started;
+
+    int italic_font_valid, bold_font_valid;
+    int italic_font_width, italic_font_height;
+    int bold_font_width, bold_font_height;
+    XColor pointerforecolor, pointerbackcolor;
+    XrmValue rmfrom, rmto;
+    int i;
+    int minwidth, minheight;
+
+    XC_LOG(("XCursesSetupX called\n"));
+
+    if (!argv)
+    {
+        argv = myargv;
+        argc = 1;
+    }
+
+    program_name = argv[0];
+    if( XCursesLINES != 24 || XCursesCOLS != 80)
+    {                      /* a call to resize() was made before initscr() */
+        int pass;
+
+        new_argv = (char **)calloc( argc + 5, sizeof( char *));
+        for( i = 0; i < argc; i++)
+            new_argv[i] = argv[i];
+        argv = new_argv;
+        for( pass = 0; pass < 2; pass++)
+        {
+            const char *override = (pass ? "-cols" : "-lines");
+
+            i = 0;
+            while( i < argc && strcmp( argv[i], override))
+               i++;
+            argv[i] = (char *)override;
+            argv[i + 1] = override_text[pass];
+            sprintf( override_text[pass], "%d",
+                        (pass ? XCursesCOLS : XCursesLINES));
+            if( i == argc)    /* this is new (usual case) */
+               argc += 2;
+        }
+    }
+
+    /* Keep open the 'write' end of the socket so the XCurses process
+       can send a CURSES_EXIT to itself from within the signal handler */
+
+    xc_exit_sock = xc_display_sockets[0];
+    xc_display_sock = xc_display_sockets[1];
+
+    close(xc_key_sockets[0]);
+    xc_key_sock = xc_key_sockets[1];
+
+    /* Trap all signals when XCurses is the child process, but only if
+       they haven't already been ignored by the application. */
+
+    for (i = 0; i < PDC_MAX_SIGNALS; i++)
+        if (XCursesSetSignal(i, _handle_signals) == SIG_IGN)
+            XCursesSetSignal(i, SIG_IGN);
+
+    /* Start defining X Toolkit things */
+
+#if XtSpecificationRelease > 4
+    XtSetLanguageProc(NULL, (XtLanguageProc)NULL, NULL);
+#endif
+
+    /* Exit if no DISPLAY variable set */
+
+    if (!getenv("DISPLAY"))
+    {
+        fprintf(stderr, "Error: no DISPLAY variable set\n");
+        kill(xc_otherpid, SIGKILL);
+        return ERR;
+    }
+
+    /* Initialise the top level widget */
+
+    topLevel = XtVaAppInitialize(&app_context, class_name, options,
+                                 XtNumber(options), &argc, argv, NULL, NULL);
+    if( new_argv)
+        free( new_argv);
+
+    XtVaGetApplicationResources(topLevel, &xc_app_data, app_resources,
+                                XtNumber(app_resources), NULL);
+
+    /* Check application resource values here */
+
+    font_width = xc_app_data.normalFont->max_bounds.rbearing -
+                 xc_app_data.normalFont->min_bounds.lbearing;
+
+    font_height = xc_app_data.normalFont->max_bounds.ascent +
+                  xc_app_data.normalFont->max_bounds.descent;
+
+    font_ascent = xc_app_data.normalFont->max_bounds.ascent;
+    font_descent = xc_app_data.normalFont->max_bounds.descent;
+
+    /* Check that the italic font and normal fonts are the same size */
+    /* italic fonts can have negative lbearings! */
+    if ( xc_app_data.italicFont->min_bounds.lbearing < 0 )
+       italic_font_width = xc_app_data.italicFont->max_bounds.rbearing + xc_app_data.italicFont->min_bounds.lbearing;
+    else
+       italic_font_width = xc_app_data.italicFont->max_bounds.rbearing - xc_app_data.italicFont->min_bounds.lbearing;
+    italic_font_height = xc_app_data.italicFont->max_bounds.ascent + xc_app_data.italicFont->max_bounds.descent;
+    italic_font_valid = (font_width == italic_font_width) && (font_height == italic_font_height);
+
+    /* Check that the bold font and normal fonts are the same size */
+    if ( xc_app_data.boldFont->min_bounds.lbearing < 0 )
+       bold_font_width = xc_app_data.boldFont->max_bounds.rbearing + xc_app_data.boldFont->min_bounds.lbearing;
+    else
+       bold_font_width = xc_app_data.boldFont->max_bounds.rbearing - xc_app_data.boldFont->min_bounds.lbearing;
+    bold_font_height = xc_app_data.boldFont->max_bounds.ascent + xc_app_data.boldFont->max_bounds.descent;
+    bold_font_valid = (font_width == bold_font_width) && (font_height == bold_font_height);
+
+    /* Calculate size of display window */
+
+    XCursesCOLS = xc_app_data.cols;
+    XCursesLINES = xc_app_data.lines;
+
+    window_width = font_width * XCursesCOLS +
+                   2 * xc_app_data.borderWidth;
+
+    window_height = font_height * XCursesLINES +
+                    2 * xc_app_data.borderWidth;
+
+    minwidth = font_width * 2 + xc_app_data.borderWidth * 2;
+    minheight = font_height * 2 + xc_app_data.borderWidth * 2;
+
+    /* Set up the icon for the application; the default is an internal
+       one for PDCurses. Then set various application level resources. */
+
+    _get_icon();
+
+#ifdef HAVE_XPM_H
+    if (xc_app_data.pixmap && xc_app_data.pixmap[0])
+        XtVaSetValues(topLevel, XtNminWidth, minwidth, XtNminHeight,
+                      minheight, XtNbaseWidth, xc_app_data.borderWidth * 2,
+                      XtNbaseHeight, xc_app_data.borderWidth * 2,
+                      XtNiconPixmap, icon_pixmap,
+                      XtNiconMask, icon_pixmap_mask, NULL);
+    else
+#endif
+        XtVaSetValues(topLevel, XtNminWidth, minwidth, XtNminHeight,
+                      minheight, XtNbaseWidth, xc_app_data.borderWidth * 2,
+                      XtNbaseHeight, xc_app_data.borderWidth * 2,
+                      XtNiconPixmap, icon_bitmap, NULL);
+
+    /* Create a BOX widget in which to draw */
+
+    if (xc_app_data.scrollbarWidth && sb_started)
+    {
+        scrollBox = XtVaCreateManagedWidget(program_name,
+            scrollBoxWidgetClass, topLevel, XtNwidth,
+            window_width + xc_app_data.scrollbarWidth,
+            XtNheight, window_height + xc_app_data.scrollbarWidth,
+            XtNwidthInc, font_width, XtNheightInc, font_height, NULL);
+
+        drawing = XtVaCreateManagedWidget(program_name,
+            boxWidgetClass, scrollBox, XtNwidth,
+            window_width, XtNheight, window_height, XtNwidthInc,
+            font_width, XtNheightInc, font_height, NULL);
+
+        scrollVert = XtVaCreateManagedWidget("scrollVert",
+            scrollbarWidgetClass, scrollBox, XtNorientation,
+            XtorientVertical, XtNheight, window_height, XtNwidth,
+            xc_app_data.scrollbarWidth, NULL);
+
+        XtAddCallback(scrollVert, XtNscrollProc, _scroll_up_down, drawing);
+        XtAddCallback(scrollVert, XtNjumpProc, _thumb_up_down, drawing);
+
+        scrollHoriz = XtVaCreateManagedWidget("scrollHoriz",
+            scrollbarWidgetClass, scrollBox, XtNorientation,
+            XtorientHorizontal, XtNwidth, window_width, XtNheight,
+            xc_app_data.scrollbarWidth, NULL);
+
+        XtAddCallback(scrollHoriz, XtNscrollProc, _scroll_left_right, drawing);
+        XtAddCallback(scrollHoriz, XtNjumpProc, _thumb_left_right, drawing);
+    }
+    else
+    {
+        drawing = XtVaCreateManagedWidget(program_name, boxWidgetClass,
+            topLevel, XtNwidth, window_width, XtNheight, window_height,
+            XtNwidthInc, font_width, XtNheightInc, font_height, NULL);
+
+        XtVaSetValues(topLevel, XtNwidthInc, font_width, XtNheightInc,
+                      font_height, NULL);
+    }
+
+    /* Process any default translations */
+
+    XtAugmentTranslations(drawing,
+                          XtParseTranslationTable(default_translations));
+    XtAppAddActions(app_context, action_table, XtNumber(action_table));
+
+    /* Process the supplied colors */
+
+    _initialize_colors();
+
+    /* Now have LINES and COLS. Set these in the shared SP so the curses
+       program can find them. */
+
+    LINES = XCursesLINES;
+    COLS = XCursesCOLS;
+
+    if ((shmidSP = shmget(shmkeySP, sizeof(SCREEN) + XCURSESSHMMIN,
+        0700 | IPC_CREAT)) < 0)
+    {
+        perror("Cannot allocate shared memory for SCREEN");
+        kill(xc_otherpid, SIGKILL);
+        return ERR;
+    }
+
+    SP = (SCREEN*)shmat(shmidSP, 0, 0);
+    memset(SP, 0, sizeof(SCREEN));
+    SP->XcurscrSize = XCURSCR_SIZE;
+    SP->lines = XCursesLINES;
+    SP->cols = XCursesCOLS;
+
+    SP->mouse_wait = xc_app_data.clickPeriod;
+    SP->audible = TRUE;
+
+    PDC_LOG(("%s:SHM size for curscr %d\n", XCLOGMSG, SP->XcurscrSize));
+
+    if ((shmid_Xcurscr = shmget(shmkey_Xcurscr, SP->XcurscrSize +
+        XCURSESSHMMIN, 0700 | IPC_CREAT)) < 0)
+    {
+        perror("Cannot allocate shared memory for curscr");
+        kill(xc_otherpid, SIGKILL);
+        shmdt((char *)SP);
+        shmctl(shmidSP, IPC_RMID, 0);
+        return ERR;
+    }
+
+    Xcurscr = (unsigned char *)shmat(shmid_Xcurscr, 0, 0);
+    memset(Xcurscr, 0, SP->XcurscrSize);
+    xc_atrtab = (short *)(Xcurscr + XCURSCR_ATRTAB_OFF);
+
+    PDC_LOG(("%s:shmid_Xcurscr %d shmkey_Xcurscr %d LINES %d COLS %d\n",
+             XCLOGMSG, shmid_Xcurscr, shmkey_Xcurscr, LINES, COLS));
+
+    /* Add Event handlers to the drawing widget */
+
+    XtAddEventHandler(drawing, ExposureMask, False, _handle_expose, NULL);
+    XtAddEventHandler(drawing, StructureNotifyMask, False,
+                      _handle_structure_notify, NULL);
+    XtAddEventHandler(drawing, EnterWindowMask | LeaveWindowMask, False,
+                      _handle_enter_leave, NULL);
+    XtAddEventHandler(topLevel, 0, True, _handle_nonmaskable, NULL);
+
+    /* Add input handler from xc_display_sock (requests from curses
+       program) */
+
+    XtAppAddInput(app_context, xc_display_sock, (XtPointer)XtInputReadMask,
+                  _process_curses_requests, NULL);
+
+    /* start the Timeout event for blinking the cursor (and blinking text) */
+
+    XtAppAddTimeOut(app_context, CURSOR_BLINK_RATE,
+                        _blink_cursor, NULL);
+
+    /* Leave telling the curses process that it can start to here so
+       that when the curses process makes a request, the Xcurses
+       process can service the request. */
+
+    XC_write_display_socket_int(CURSES_CHILD);
+
+    XtRealizeWidget(topLevel);
+
+    /* Handle trapping of the WM_DELETE_WINDOW property */
+
+    wm_atom[0] = XInternAtom(XtDisplay(topLevel), "WM_DELETE_WINDOW", False);
+
+    XSetWMProtocols(XtDisplay(topLevel), XtWindow(topLevel), wm_atom, 1);
+
+    /* Create the Graphics Context for drawing. This MUST be done AFTER
+       the associated widget has been realized. */
+
+    XC_LOG(("before _get_gc\n"));
+
+    _get_gc(&normal_gc, xc_app_data.normalFont, COLOR_WHITE, COLOR_BLACK);
+
+    _get_gc(&italic_gc, italic_font_valid ? xc_app_data.italicFont :
+            xc_app_data.normalFont, COLOR_WHITE, COLOR_BLACK);
+
+    _get_gc(&bold_gc, bold_font_valid ? xc_app_data.boldFont :
+            xc_app_data.normalFont, COLOR_WHITE, COLOR_BLACK);
+
+    _get_gc(&block_cursor_gc, xc_app_data.normalFont,
+            COLOR_BLACK, COLOR_CURSOR);
+
+    _get_gc(&rect_cursor_gc, xc_app_data.normalFont,
+            COLOR_CURSOR, COLOR_BLACK);
+
+    _get_gc(&border_gc, xc_app_data.normalFont, COLOR_BORDER, COLOR_BLACK);
+
+    XSetLineAttributes(XCURSESDISPLAY, rect_cursor_gc, 2,
+                       LineSolid, CapButt, JoinMiter);
+
+    XSetLineAttributes(XCURSESDISPLAY, border_gc, xc_app_data.borderWidth,
+                       LineSolid, CapButt, JoinMiter);
+
+    /* Set the cursor for the application */
+
+    XDefineCursor(XCURSESDISPLAY, XCURSESWIN, xc_app_data.pointer);
+    rmfrom.size = sizeof(Pixel);
+    rmto.size = sizeof(XColor);
+
+    rmto.addr = (XPointer)&pointerforecolor;
+    rmfrom.addr = (XPointer)&(xc_app_data.pointerForeColor);
+    XtConvertAndStore(drawing, XtRPixel, &rmfrom, XtRColor, &rmto);
+
+    rmfrom.size = sizeof(Pixel);
+    rmto.size = sizeof(XColor);
+
+    rmfrom.addr = (XPointer)&(xc_app_data.pointerBackColor);
+    rmto.addr = (XPointer)&pointerbackcolor;
+    XtConvertAndStore(drawing, XtRPixel, &rmfrom, XtRColor, &rmto);
+
+    XRecolorCursor(XCURSESDISPLAY, xc_app_data.pointer,
+                   &pointerforecolor, &pointerbackcolor);
+
+#ifndef PDC_XIM
+
+    /* Convert the supplied compose key to a Keysym */
+
+    compose_key = XStringToKeysym(xc_app_data.composeKey);
+
+    if (compose_key && IsModifierKey(compose_key))
+    {
+        int i, j;
+        KeyCode *kcp;
+        XModifierKeymap *map;
+        KeyCode compose_keycode = XKeysymToKeycode(XCURSESDISPLAY, compose_key);
+
+        map = XGetModifierMapping(XCURSESDISPLAY);
+        kcp = map->modifiermap;
+
+        for (i = 0; i < 8; i++)
+        {
+            for (j = 0; j < map->max_keypermod; j++, kcp++)
+            {
+                if (!*kcp)
+                    continue;
+
+                if (compose_keycode == *kcp)
+                {
+                    compose_mask = state_mask[i];
+                    break;
+                }
+            }
+
+            if (compose_mask)
+                break;
+        }
+
+        XFreeModifiermap(map);
+    }
+
+#else
+    Xim = XOpenIM(XCURSESDISPLAY, NULL, NULL, NULL);
+
+    if (Xim)
+    {
+        Xic = XCreateIC(Xim, XNInputStyle,
+                        XIMPreeditNothing | XIMStatusNothing,
+                        XNClientWindow, XCURSESWIN, NULL);
+    }
+
+    if (Xic)
+    {
+        long im_event_mask;
+
+        XGetICValues(Xic, XNFilterEvents, &im_event_mask, NULL);
+        if (im_event_mask)
+            XtAddEventHandler(drawing, im_event_mask, False,
+                              _dummy_handler, NULL);
+
+        XSetICFocus(Xic);
+    }
+    else
+    {
+        perror("ERROR: Cannot create input context");
+        kill(xc_otherpid, SIGKILL);
+        shmdt((char *)SP);
+        shmdt((char *)Xcurscr);
+        shmctl(shmidSP, IPC_RMID, 0);
+        shmctl(shmid_Xcurscr, IPC_RMID, 0);
+        return ERR;
+    }
+
+#endif
+
+    /* Wait for events */
+    {
+        XEvent event;
+
+        for (;;) /* forever */
+        {
+             XtAppNextEvent(app_context, &event);
+             XtDispatchEvent(&event);
+        }
+    }
+
+    return OK;          /* won't get here */
+}