curses 1.3.2 → 1.4.3

data/vendor/PDCurses/x11/ncurses_cfg.h

@@ -0,0 +1,45 @@
+/* This file is only used with the ncurses test programs.
+ *
+ * Have ncurses-5.6 unpacked in your $(HOME) (you don't need to build 
+ * it), or edit ncurses_testdir appropriately in the Makefile. Configure 
+ * and build PDCurses for X11. (Sorry, other ports won't work yet.) 
+ * Change to this directory, and:
+ *
+ * "make ncurses_tests" to start.
+ * "make ncurses_clean" when you're done.
+ *
+ * Builds: bs gdc hanoi knight tclock ncurses
+ */
+
+#define NCURSES_MOUSE_VERSION 2
+
+#include "../config.h"
+#include <curses.h>
+
+#define ExitProgram exit
+
+#define HAVE_CURSES_VERSION 1
+#define HAVE_GETBEGX 1
+#define HAVE_GETCURX 1
+#define HAVE_GETMAXX 1
+#define HAVE_GETNSTR 1
+#define HAVE_GETTIMEOFDAY 1
+#define HAVE_GETWIN 1
+#define HAVE_LIBPANEL 1
+#define HAVE_LOCALE_H 1
+#define HAVE_NAPMS 1
+#define HAVE_PANEL_H 1
+#define HAVE_PUTWIN 1
+#define HAVE_SLK_COLOR 1
+#define HAVE_SLK_INIT 1
+#define HAVE_WRESIZE 1
+
+#ifdef PDC_WIDE
+# define USE_WIDEC_SUPPORT 1
+#endif
+
+/* Fool ncurses.c so it gives us all the tests, and doesn't redefine 
+   ACS_ chars
+*/
+
+#define NCURSES_VERSION PDCURSES

data/vendor/PDCurses/x11/pdcclip.c

@@ -0,0 +1,173 @@
+/* Public Domain Curses */
+
+#include "pdcx11.h"
+
+#include <stdlib.h>
+
+/*man-start**************************************************************
+
+clipboard
+---------
+
+### Synopsis
+
+    int PDC_getclipboard(char **contents, long *length);
+    int PDC_setclipboard(const char *contents, long length);
+    int PDC_freeclipboard(char *contents);
+    int PDC_clearclipboard(void);
+
+### Description
+
+   PDC_getclipboard() gets the textual contents of the system's
+   clipboard. This function returns the contents of the clipboard
+   in the contents argument. It is the responsibilitiy of the
+   caller to free the memory returned, via PDC_freeclipboard().
+   The length of the clipboard contents is returned in the length
+   argument.
+
+   PDC_setclipboard copies the supplied text into the system's
+   clipboard, emptying the clipboard prior to the copy.
+
+   PDC_clearclipboard() clears the internal clipboard.
+
+### Return Values
+
+   indicator of success/failure of call.
+   PDC_CLIP_SUCCESS        the call was successful
+   PDC_CLIP_MEMORY_ERROR   unable to allocate sufficient memory for
+                           the clipboard contents
+   PDC_CLIP_EMPTY          the clipboard contains no text
+   PDC_CLIP_ACCESS_ERROR   no clipboard support
+
+### Portability
+                             X/Open    BSD    SYS V
+    PDC_getclipboard            -       -       -
+    PDC_setclipboard            -       -       -
+    PDC_freeclipboard           -       -       -
+    PDC_clearclipboard          -       -       -
+
+**man-end****************************************************************/
+
+int PDC_getclipboard(char **contents, long *length)
+{
+#ifdef PDC_WIDE
+    wchar_t *wcontents;
+#endif
+    int result = 0;
+    int len;
+
+    PDC_LOG(("PDC_getclipboard() - called\n"));
+
+    XCursesInstructAndWait(CURSES_GET_SELECTION);
+
+    if (XC_read_socket(xc_display_sock, &result, sizeof(int)) < 0)
+        XCursesExitCursesProcess(5, "exiting from PDC_getclipboard");
+
+    if (result == PDC_CLIP_SUCCESS)
+    {
+        if (XC_read_socket(xc_display_sock, &len, sizeof(int)) < 0)
+            XCursesExitCursesProcess(5, "exiting from PDC_getclipboard");
+#ifdef PDC_WIDE
+        wcontents = malloc((len + 1) * sizeof(wchar_t));
+        *contents = malloc(len * 3 + 1);
+
+        if (!wcontents || !*contents)
+#else
+            *contents = malloc(len + 1);
+
+        if (!*contents)
+#endif
+        XCursesExitCursesProcess(6, "exiting from PDC_getclipboard - "
+                                    "synchronization error");
+
+        if (len)
+        {
+            if (XC_read_socket(xc_display_sock,
+#ifdef PDC_WIDE
+                wcontents, len * sizeof(wchar_t)) < 0)
+#else
+                *contents, len) < 0)
+#endif
+                XCursesExitCursesProcess(5, "exiting from PDC_getclipboard");
+        }
+
+#ifdef PDC_WIDE
+        wcontents[len] = 0;
+        len = PDC_wcstombs(*contents, wcontents, len * 3);
+        free(wcontents);
+#endif
+        (*contents)[len] = '\0';
+        *length = len;
+    }
+
+    return result;
+}
+
+int PDC_setclipboard(const char *contents, long length)
+{
+#ifdef PDC_WIDE
+    wchar_t *wcontents;
+#endif
+    int rc;
+
+    PDC_LOG(("PDC_setclipboard() - called\n"));
+
+#ifdef PDC_WIDE
+    wcontents = malloc((length + 1) * sizeof(wchar_t));
+    if (!wcontents)
+        return PDC_CLIP_MEMORY_ERROR;
+
+    length = PDC_mbstowcs(wcontents, contents, length);
+#endif
+    XCursesInstruct(CURSES_SET_SELECTION);
+
+    /* Write, then wait for X to do its stuff; expect return code. */
+
+    if (XC_write_socket(xc_display_sock, &length, sizeof(long)) >= 0)
+    {
+        if (XC_write_socket(xc_display_sock,
+#ifdef PDC_WIDE
+            wcontents, length * sizeof(wchar_t)) >= 0)
+        {
+            free(wcontents);
+#else
+            contents, length) >= 0)
+        {
+#endif
+            if (XC_read_socket(xc_display_sock, &rc, sizeof(int)) >= 0)
+                return rc;
+        }
+    }
+
+    XCursesExitCursesProcess(5, "exiting from PDC_setclipboard");
+
+    return PDC_CLIP_ACCESS_ERROR;   /* not reached */
+}
+
+int PDC_freeclipboard(char *contents)
+{
+    PDC_LOG(("PDC_freeclipboard() - called\n"));
+
+    free(contents);
+    return PDC_CLIP_SUCCESS;
+}
+
+int PDC_clearclipboard(void)
+{
+    int rc;
+    long len = 0;
+
+    PDC_LOG(("PDC_clearclipboard() - called\n"));
+
+    XCursesInstruct(CURSES_CLEAR_SELECTION);
+
+    /* Write, then wait for X to do its stuff; expect return code. */
+
+    if (XC_write_socket(xc_display_sock, &len, sizeof(long)) >= 0)
+        if (XC_read_socket(xc_display_sock, &rc, sizeof(int)) >= 0)
+            return rc;
+
+    XCursesExitCursesProcess(5, "exiting from PDC_clearclipboard");
+
+    return PDC_CLIP_ACCESS_ERROR;   /* not reached */
+}

data/vendor/PDCurses/x11/pdcdisp.c

@@ -0,0 +1,85 @@
+/* Public Domain Curses */
+
+#include "pdcx11.h"
+
+#include <string.h>
+
+#ifdef CHTYPE_LONG
+
+#ifdef PDC_WIDE
+   #define USE_UNICODE_ACS_CHARS 1
+#else
+   #define USE_ISO8859_CHARSET
+#endif
+
+#include "acs_defs.h"
+
+#endif
+
+int PDC_display_cursor(int oldrow, int oldcol, int newrow, int newcol,
+                       int visibility)
+{
+    char buf[30];
+    int idx, pos;
+
+    PDC_LOG(("%s:PDC_display_cursor() - called: NEW row %d col %d, vis %d\n",
+             XCLOGMSG, newrow, newcol, visibility));
+
+    if (visibility == -1)
+    {
+        /* Only send the CURSES_DISPLAY_CURSOR message, no data */
+
+        idx = CURSES_DISPLAY_CURSOR;
+        memcpy(buf, &idx, sizeof(int));
+        idx = sizeof(int);
+    }
+    else
+    {
+        idx = CURSES_CURSOR;
+        memcpy(buf, &idx, sizeof(int));
+
+        idx = sizeof(int);
+        pos = oldrow + (oldcol << 8);
+        memcpy(buf + idx, &pos, sizeof(int));
+
+        idx += sizeof(int);
+        pos = newrow + (newcol << 8);
+        memcpy(buf + idx, &pos, sizeof(int));
+
+        idx += sizeof(int);
+    }
+
+    if (XC_write_socket(xc_display_sock, buf, idx) < 0)
+        XCursesExitCursesProcess(1, "exiting from PDC_display_cursor");
+
+    return OK;
+}
+
+/* position hardware cursor at (y, x) */
+
+void PDC_gotoyx(int row, int col)
+{
+    PDC_LOG(("PDC_gotoyx() - called: row %d col %d\n", row, col));
+
+    PDC_display_cursor(SP->cursrow, SP->curscol, row, col, SP->visibility);
+}
+
+/* update the given physical line to look like the corresponding line in
+   curscr */
+
+void PDC_transform_line(int lineno, int x, int len, const chtype *srcp)
+{
+    PDC_LOG(("PDC_transform_line() - called: line %d\n", lineno));
+
+    XC_get_line_lock(lineno);
+
+    memcpy(Xcurscr + XCURSCR_Y_OFF(lineno) + (x * sizeof(chtype)), srcp,
+           len * sizeof(chtype));
+
+    *(Xcurscr + XCURSCR_START_OFF + lineno) = x;
+    *(Xcurscr + XCURSCR_LENGTH_OFF + lineno) = len;
+
+    XC_release_line_lock(lineno);
+
+    XCursesInstructAndWait(CURSES_REFRESH);
+}

data/vendor/PDCurses/x11/pdcgetsc.c

@@ -0,0 +1,28 @@
+/* Public Domain Curses */
+
+#include "pdcx11.h"
+
+/* return width of screen/viewport */
+
+int PDC_get_columns(void)
+{
+    PDC_LOG(("PDC_get_columns() - called\n"));
+
+    return XCursesCOLS;
+}
+
+/* get the cursor size/shape */
+
+int PDC_get_cursor_mode(void)
+{
+    return 0;
+}
+
+/* return number of screen rows */
+
+int PDC_get_rows(void)
+{
+    PDC_LOG(("PDC_get_rows() - called\n"));
+
+    return XCursesLINES;
+}

data/vendor/PDCurses/x11/pdckbd.c

@@ -0,0 +1,104 @@
+/* Public Domain Curses */
+
+#include "pdcx11.h"
+
+/*man-start**************************************************************
+
+pdckbd
+------
+
+### Synopsis
+
+    unsigned long PDC_get_input_fd(void);
+
+### Description
+
+   PDC_get_input_fd() returns the file descriptor that PDCurses
+   reads its input from. It can be used for select().
+
+### Portability
+                             X/Open    BSD    SYS V
+    PDC_get_input_fd            -       -       -
+
+**man-end****************************************************************/
+
+/* check if a key or mouse event is waiting */
+
+bool PDC_check_key(void)
+{
+    struct timeval socket_timeout = {0};
+    int s;
+
+    /* Is something ready to be read on the socket ? Must be a key. */
+
+    FD_ZERO(&xc_readfds);
+    FD_SET(xc_key_sock, &xc_readfds);
+
+    if ((s = select(FD_SETSIZE, (FD_SET_CAST)&xc_readfds, NULL, 
+        NULL, &socket_timeout)) < 0)
+        XCursesExitCursesProcess(3, "child - exiting from "
+                                    "PDC_check_key select failed");
+
+    PDC_LOG(("%s:PDC_check_key() - returning %s\n", XCLOGMSG,
+             s ? "TRUE" : "FALSE"));
+
+    return !!s;
+}
+
+/* return the next available key or mouse event */
+
+int PDC_get_key(void)
+{
+    unsigned long newkey = 0;
+    int key = 0;
+
+    if (XC_read_socket(xc_key_sock, &newkey, sizeof(unsigned long)) < 0)
+        XCursesExitCursesProcess(2, "exiting from PDC_get_key");
+
+    pdc_key_modifiers = (newkey >> 24) & 0xFF;
+    key = (int)(newkey & 0x00FFFFFF);
+
+    if (key == KEY_MOUSE && SP->key_code)
+    {
+        if (XC_read_socket(xc_key_sock, &pdc_mouse_status,
+            sizeof(MOUSE_STATUS)) < 0)
+            XCursesExitCursesProcess(2, "exiting from PDC_get_key");
+    }
+
+    PDC_LOG(("%s:PDC_get_key() - key %d returned\n", XCLOGMSG, key));
+
+    return key;
+}
+
+unsigned long PDC_get_input_fd(void)
+{
+    PDC_LOG(("PDC_get_input_fd() - called\n"));
+
+    return xc_key_sock;
+}
+
+void PDC_set_keyboard_binary(bool on)
+{
+    PDC_LOG(("PDC_set_keyboard_binary() - called\n"));
+}
+
+/* discard any pending keyboard or mouse input -- this is the core
+   routine for flushinp() */
+
+void PDC_flushinp(void)
+{
+    PDC_LOG(("PDC_flushinp() - called\n"));
+
+    while (PDC_check_key())
+        PDC_get_key();
+}
+
+int PDC_mouse_set(void)
+{
+    return OK;
+}
+
+int PDC_modifiers_set(void)
+{
+    return OK;
+}

data/vendor/PDCurses/x11/pdcscrn.c

@@ -0,0 +1,258 @@
+/* Public Domain Curses */
+
+#include "pdcx11.h"
+
+/* special purpose function keys */
+
+static int PDC_shutdown_key[PDC_MAX_FUNCTION_KEYS] = { 0, 0, 0, 0, 0 };
+
+/* COLOR_PAIR to attribute encoding table. */
+
+short *xc_atrtab = (short *)NULL;
+
+/* close the physical screen */
+
+void PDC_scr_close(void)
+{
+    PDC_LOG(("PDC_scr_close() - called\n"));
+}
+
+void PDC_scr_free(void)
+{
+    XCursesExit();
+
+    xc_atrtab = (short *)NULL;
+}
+
+/* open the physical screen -- allocate SP, miscellaneous intialization */
+
+int PDC_scr_open(int argc, char **argv)
+{
+    extern bool sb_started;
+
+    PDC_LOG(("PDC_scr_open() - called\n"));
+
+    if ((XCursesInitscr(argc, argv) == ERR) || !SP)
+        return ERR;
+
+    SP->cursrow = SP->curscol = 0;
+    SP->orig_attr = FALSE;
+    SP->sb_on = sb_started;
+    SP->sb_total_y = 0;
+    SP->sb_viewport_y = 0;
+    SP->sb_cur_y = 0;
+    SP->sb_total_x = 0;
+    SP->sb_viewport_x = 0;
+    SP->sb_cur_x = 0;
+
+    return OK;
+}
+
+/* the core of resize_term() */
+
+int PDC_resize_screen(int nlines, int ncols)
+{
+    PDC_LOG(("PDC_resize_screen() - called. Lines: %d Cols: %d\n",
+             nlines, ncols));
+
+    if( !stdscr)      /* window hasn't been created yet;  we're */
+    {                 /* specifying its size before doing so    */
+        XCursesLINES = nlines;
+        XCursesCOLS = ncols;
+        return OK;
+    }
+
+    if (nlines || ncols || !SP->resized)
+        return ERR;
+
+    shmdt((char *)Xcurscr);
+    XCursesInstructAndWait(CURSES_RESIZE);
+
+    if ((shmid_Xcurscr = shmget(shmkey_Xcurscr,
+        SP->XcurscrSize + XCURSESSHMMIN, 0700)) < 0)
+    {
+        perror("Cannot allocate shared memory for curscr");
+        kill(xc_otherpid, SIGKILL);
+        return ERR;
+    }
+
+    XCursesLINES = SP->lines;
+    XCursesCOLS = SP->cols;
+
+    PDC_LOG(("%s:shmid_Xcurscr %d shmkey_Xcurscr %d SP->lines %d "
+             "SP->cols %d\n", XCLOGMSG, shmid_Xcurscr,
+             shmkey_Xcurscr, SP->lines, SP->cols));
+
+    Xcurscr = (unsigned char*)shmat(shmid_Xcurscr, 0, 0);
+    xc_atrtab = (short *)(Xcurscr + XCURSCR_ATRTAB_OFF);
+
+    SP->resized = FALSE;
+
+    return OK;
+}
+
+void PDC_reset_prog_mode(void)
+{
+    PDC_LOG(("PDC_reset_prog_mode() - called.\n"));
+}
+
+void PDC_reset_shell_mode(void)
+{
+    PDC_LOG(("PDC_reset_shell_mode() - called.\n"));
+}
+
+void PDC_restore_screen_mode(int i)
+{
+}
+
+void PDC_save_screen_mode(int i)
+{
+}
+
+void PDC_init_pair(short pair, short fg, short bg)
+{
+    xc_atrtab[pair * 2] = fg;
+    xc_atrtab[pair * 2 + 1] = bg;
+}
+
+int PDC_pair_content(short pair, short *fg, short *bg)
+{
+    *fg = xc_atrtab[pair * 2];
+    *bg = xc_atrtab[pair * 2 + 1];
+
+    return OK;
+}
+
+bool PDC_can_change_color(void)
+{
+    return TRUE;
+}
+
+int PDC_color_content(short color, short *red, short *green, short *blue)
+{
+    XColor *tmp = (XColor *)(Xcurscr + XCURSCR_XCOLOR_OFF);
+
+    tmp->pixel = color;
+
+    XCursesInstructAndWait(CURSES_GET_COLOR);
+
+    *red = ((double)(tmp->red) * 1000 / 65535) + 0.5;
+    *green = ((double)(tmp->green) * 1000 / 65535) + 0.5;
+    *blue = ((double)(tmp->blue) * 1000 / 65535) + 0.5;
+
+    return OK;
+}
+
+int PDC_init_color(short color, short red, short green, short blue)
+{
+    XColor *tmp = (XColor *)(Xcurscr + XCURSCR_XCOLOR_OFF);
+
+    tmp->pixel = color;
+
+    tmp->red = ((double)red * 65535 / 1000) + 0.5;
+    tmp->green = ((double)green * 65535 / 1000) + 0.5;
+    tmp->blue = ((double)blue * 65535 / 1000) + 0.5;
+
+    XCursesInstructAndWait(CURSES_SET_COLOR);
+
+    return OK;
+}
+
+/*man-start**************************************************************
+
+Function keys
+-------------
+
+### Synopsis
+
+   int PDC_set_function_key( const unsigned function, const int new_key);
+
+### Description
+
+   Allows one to set a 'shut down' key,  and reassign hotkeys used for
+   pasting from the clipboard and enlarging and decreasing the font size,
+   and for using the font selection dialog (on platforms where these
+   things are possible and implemented).  For example, calling
+
+   PDC_set_function_key( FUNCTION_KEY_SHUT_DOWN, ALT_Q);
+
+   would reset PDCurses such that,  if the user clicks on the 'close' box,
+   Alt-Q would be added to the key queue.  This would give the app the
+   opportunity to shut things down gracefully,  perhaps asking "are you
+   sure",  and/or "save changes or discard or cancel",  rather than just
+   having the window close (the default behavior).
+
+   Similarly,  one can set FUNCTION_KEY_ABORT to a key which,  when pressed,
+   will cause the program to abort gracelessly (no key returned to the
+   application).  One would normally use this to enable/disable Ctrl-C or
+   Ctrl-Break.
+
+### Return Value
+
+   Returns key code previously set for that function,  or -1 if the
+   function does not actually exist.
+
+### Portability
+
+   PDCurses-only function.
+
+**man-end****************************************************************/
+
+int PDC_set_function_key( const unsigned function, const int new_key)
+{
+    int old_key = -1;
+
+    if (function < PDC_MAX_FUNCTION_KEYS)
+    {
+         old_key = PDC_shutdown_key[function];
+         PDC_shutdown_key[function] = new_key;
+    }
+    if (function == FUNCTION_KEY_SHUT_DOWN)
+    {
+        SP->exit_key = new_key;
+    }
+    return(old_key);
+}
+
+
+/*man-start**************************************************************
+
+Resize limits
+-------------
+
+### Synopsis
+
+    void PDC_set_resize_limits( const int new_min_lines,
+                                const int new_max_lines,
+                                const int new_min_cols,
+                                const int new_max_cols);
+
+### Description
+
+   For platforms supporting resizable windows (SDLx, WinGUI, X11).  Some
+   programs may be unprepared for a resize event;  for these,  calling
+   this function with the max and min limits equal ensures that no
+   user resizing can be done.  Other programs may require at least a
+   certain number,  and/or no more than a certain number,  of columns
+   and/or lines.
+
+### Portability
+
+   PDCurses-only function.
+
+**man-end****************************************************************/
+
+/* Note that at least at present,  only WinGUI pays any attention to
+resize limits. */
+
+int PDC_min_lines = 25, PDC_min_cols = 80;
+int PDC_max_lines = 25, PDC_max_cols = 80;
+
+void PDC_set_resize_limits( const int new_min_lines, const int new_max_lines,
+                  const int new_min_cols, const int new_max_cols)
+{
+    PDC_min_lines = max( new_min_lines, 2);
+    PDC_max_lines = max( new_max_lines, PDC_min_lines);
+    PDC_min_cols = max( new_min_cols, 2);
+    PDC_max_cols = max( new_max_cols, PDC_min_cols);
+}