curses 1.6.0 → 1.7.0

data/vendor/PDCurses/os2/pdcscrn.c

@@ -1,449 +0,0 @@
-/* Public Domain Curses */
-
-#include "pdcos2.h"
-
-#ifdef CHTYPE_LONG
-# define PDC_OFFSET 32
-#else
-# define PDC_OFFSET  8
-#endif
-
-/* COLOR_PAIR to attribute encoding table. */
-
-unsigned char *pdc_atrtab = (unsigned char *)NULL;
-
-int pdc_font;  /* default font size */
-
-static short curstoreal[16], realtocurs[16] =
-{
-    COLOR_BLACK, COLOR_BLUE, COLOR_GREEN, COLOR_CYAN, COLOR_RED,
-    COLOR_MAGENTA, COLOR_YELLOW, COLOR_WHITE, COLOR_BLACK + 8,
-    COLOR_BLUE + 8, COLOR_GREEN + 8, COLOR_CYAN + 8, COLOR_RED + 8,
-    COLOR_MAGENTA + 8, COLOR_YELLOW + 8, COLOR_WHITE + 8
-};
-
-#ifdef EMXVIDEO
-static unsigned char *saved_screen = NULL;
-static int saved_lines = 0;
-static int saved_cols = 0;
-#else
-# ifdef PDCTHUNK
-#  ifdef __EMX__
-#   define THUNKEDVIO VIOCOLORREG
-#  else
-
-typedef struct {
-    USHORT cb;
-    USHORT type;
-    USHORT firstcolorreg;
-    USHORT numcolorregs;
-    ptr_16 colorregaddr;
-} THUNKEDVIO;
-
-#  endif
-# endif
-
-static PCH saved_screen = NULL;
-static USHORT saved_lines = 0;
-static USHORT saved_cols = 0;
-static VIOMODEINFO scrnmode;    /* default screen mode  */
-static VIOMODEINFO saved_scrnmode[3];
-static int saved_font[3];
-static bool can_change = FALSE;
-
-/* special purpose function keys */
-static int PDC_shutdown_key[PDC_MAX_FUNCTION_KEYS] = { 0, 0, 0, 0, 0 };
-
-static int _get_font(void)
-{
-    VIOMODEINFO modeInfo = {0};
-
-    modeInfo.cb = sizeof(modeInfo);
-
-    VioGetMode(&modeInfo, 0);
-    return (modeInfo.vres / modeInfo.row);
-}
-
-static void _set_font(int size)
-{
-    VIOMODEINFO modeInfo = {0};
-
-    if (pdc_font != size)
-    {
-        modeInfo.cb = sizeof(modeInfo);
-
-        /* set most parameters of modeInfo */
-
-        VioGetMode(&modeInfo, 0);
-        modeInfo.cb = 8;    /* ignore horiz an vert resolution */
-        modeInfo.row = modeInfo.vres / size;
-        VioSetMode(&modeInfo, 0);
-    }
-
-    curs_set(SP->visibility);
-
-    pdc_font = _get_font();
-}
-
-#endif
-
-/* close the physical screen -- may restore the screen to its state
-   before PDC_scr_open(); miscellaneous cleanup */
-
-void PDC_scr_close(void)
-{
-    PDC_LOG(("PDC_scr_close() - called\n"));
-
-    if (saved_screen && getenv("PDC_RESTORE_SCREEN"))
-    {
-#ifdef EMXVIDEO
-        v_putline(saved_screen, 0, 0, saved_lines * saved_cols);
-#else
-        VioWrtCellStr(saved_screen, saved_lines * saved_cols * 2,
-            0, 0, (HVIO)NULL);
-#endif
-        free(saved_screen);
-        saved_screen = NULL;
-    }
-
-    reset_shell_mode();
-
-    if (SP->visibility != 1)
-        curs_set(1);
-
-    /* Position cursor to the bottom left of the screen. */
-
-    PDC_gotoyx(PDC_get_rows() - 2, 0);
-}
-
-void PDC_scr_free(void)
-{
-    if (SP)
-        free(SP);
-    if (pdc_atrtab)
-        free(pdc_atrtab);
-
-    pdc_atrtab = (unsigned char *)NULL;
-}
-
-/* open the physical screen -- allocate SP, miscellaneous intialization,
-   and may save the existing screen for later restoration */
-
-int PDC_scr_open(int argc, char **argv)
-{
-#ifdef EMXVIDEO
-    int adapter;
-#else
-    USHORT totchars;
-#endif
-    int i;
-    short r, g, b;
-
-    PDC_LOG(("PDC_scr_open() - called\n"));
-
-    SP = calloc(1, sizeof(SCREEN));
-    pdc_atrtab = calloc(PDC_COLOR_PAIRS * PDC_OFFSET, 1);
-
-    if (!SP || !pdc_atrtab)
-        return ERR;
-
-    for (i = 0; i < 16; i++)
-        curstoreal[realtocurs[i]] = i;
-
-#ifdef EMXVIDEO
-    v_init();
-#endif
-    SP->orig_attr = FALSE;
-
-#ifdef EMXVIDEO
-    adapter = v_hardware();
-    SP->mono = (adapter == V_MONOCHROME);
-
-    pdc_font = SP->mono ? 14 : (adapter == V_COLOR_8) ? 8 : 12;
-#else
-    VioGetMode(&scrnmode, 0);
-    PDC_get_keyboard_info();
-
-    pdc_font = _get_font();
-#endif
-    SP->lines = PDC_get_rows();
-    SP->cols = PDC_get_columns();
-
-    SP->mouse_wait = PDC_CLICK_PERIOD;
-    SP->audible = TRUE;
-
-    /* This code for preserving the current screen */
-
-    if (getenv("PDC_RESTORE_SCREEN"))
-    {
-        saved_lines = SP->lines;
-        saved_cols = SP->cols;
-
-        saved_screen = malloc(2 * saved_lines * saved_cols);
-
-        if (!saved_screen)
-        {
-            SP->_preserve = FALSE;
-            return OK;
-        }
-#ifdef EMXVIDEO
-        v_getline(saved_screen, 0, 0, saved_lines * saved_cols);
-#else
-        totchars = saved_lines * saved_cols * 2;
-        VioReadCellStr((PCH)saved_screen, &totchars, 0, 0, (HVIO)NULL);
-#endif
-    }
-
-    SP->_preserve = (getenv("PDC_PRESERVE_SCREEN") != NULL);
-
-    can_change = (PDC_color_content(0, &r, &g, &b) == OK);
-
-    return OK;
-}
-
-/* the core of resize_term() */
-
-int PDC_resize_screen(int nlines, int ncols)
-{
-#ifndef EMXVIDEO
-    VIOMODEINFO modeInfo = {0};
-    USHORT result;
-#endif
-
-    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    */
-        return OK;    /* ...which doesn't work (yet) on Win32   */
-    }
-#ifdef EMXVIDEO
-    return ERR;
-#else
-    modeInfo.cb = sizeof(modeInfo);
-
-    /* set most parameters of modeInfo */
-
-    VioGetMode(&modeInfo, 0);
-    modeInfo.fbType = 1;
-    modeInfo.row = nlines;
-    modeInfo.col = ncols;
-    result = VioSetMode(&modeInfo, 0);
-
-    LINES = PDC_get_rows();
-    COLS = PDC_get_columns();
-
-    return (result == 0) ? OK : ERR;
-#endif
-}
-
-void PDC_reset_prog_mode(void)
-{
-    PDC_LOG(("PDC_reset_prog_mode() - called.\n"));
-
-#ifndef EMXVIDEO
-    PDC_set_keyboard_binary(TRUE);
-#endif
-}
-
-void PDC_reset_shell_mode(void)
-{
-    PDC_LOG(("PDC_reset_shell_mode() - called.\n"));
-
-#ifndef EMXVIDEO
-    PDC_set_keyboard_default();
-#endif
-}
-
-#ifndef EMXVIDEO
-
-static bool _screen_mode_equals(VIOMODEINFO *oldmode)
-{
-    VIOMODEINFO current = {0};
-
-    VioGetMode(&current, 0);
-
-    return ((current.cb == oldmode->cb) &&
-            (current.fbType == oldmode->fbType) &&
-            (current.color == oldmode->color) &&
-            (current.col == oldmode->col) &&
-            (current.row == oldmode->row) &&
-            (current.hres == oldmode->vres) &&
-            (current.vres == oldmode->vres));
-}
-
-#endif
-
-void PDC_restore_screen_mode(int i)
-{
-#ifndef EMXVIDEO
-    if (i >= 0 && i <= 2)
-    {
-        pdc_font = _get_font();
-        _set_font(saved_font[i]);
-
-        if (!_screen_mode_equals(&saved_scrnmode[i]))
-            if (VioSetMode(&saved_scrnmode[i], 0) != 0)
-            {
-                pdc_font = _get_font();
-                scrnmode = saved_scrnmode[i];
-                LINES = PDC_get_rows();
-                COLS = PDC_get_columns();
-            }
-    }
-#endif
-}
-
-void PDC_save_screen_mode(int i)
-{
-#ifndef EMXVIDEO
-    if (i >= 0 && i <= 2)
-    {
-        saved_font[i] = pdc_font;
-        saved_scrnmode[i] = scrnmode;
-    }
-#endif
-}
-
-void PDC_init_pair(short pair, short fg, short bg)
-{
-    unsigned char att, temp_bg;
-    chtype i;
-
-    fg = curstoreal[fg];
-    bg = curstoreal[bg];
-
-    for (i = 0; i < PDC_OFFSET; i++)
-    {
-        att = fg | (bg << 4);
-
-        if (i & (A_REVERSE >> PDC_ATTR_SHIFT))
-            att = bg | (fg << 4);
-        if (i & (A_UNDERLINE >> PDC_ATTR_SHIFT))
-            att = 1;
-        if (i & (A_INVIS >> PDC_ATTR_SHIFT))
-        {
-            temp_bg = att >> 4;
-            att = temp_bg << 4 | temp_bg;
-        }
-        if (i & (A_BOLD >> PDC_ATTR_SHIFT))
-            att |= 8;
-        if (i & (A_BLINK >> PDC_ATTR_SHIFT))
-            att |= 128;
-
-        pdc_atrtab[pair * PDC_OFFSET + i] = att;
-    }
-}
-
-int PDC_pair_content(short pair, short *fg, short *bg)
-{
-    *fg = realtocurs[pdc_atrtab[pair * PDC_OFFSET] & 0x0F];
-    *bg = realtocurs[(pdc_atrtab[pair * PDC_OFFSET] & 0xF0) >> 4];
-
-    return OK;
-}
-
-bool PDC_can_change_color(void)
-{
-    return can_change;
-}
-
-int PDC_color_content(short color, short *red, short *green, short *blue)
-{
-#ifdef PDCTHUNK
-    THUNKEDVIO vcr;
-    USHORT palbuf[4];
-    unsigned char pal[3];
-    int rc;
-
-    /* Read single DAC register */
-
-    palbuf[0] = 8;
-    palbuf[1] = 0;
-    palbuf[2] = curstoreal[color];
-
-    rc = VioGetState(&palbuf, 0);
-    if (rc)
-        return ERR;
-
-    vcr.cb = sizeof(vcr);
-    vcr.type = 3;
-    vcr.firstcolorreg = palbuf[3];
-    vcr.numcolorregs = 1;
-    vcr.colorregaddr = PDCTHUNK(pal);
-
-    rc = VioGetState(&vcr, 0);
-    if (rc)
-        return ERR;
-
-    /* Scale and store */
-
-    *red = DIVROUND((unsigned)(pal[0]) * 1000, 63);
-    *green = DIVROUND((unsigned)(pal[1]) * 1000, 63);
-    *blue = DIVROUND((unsigned)(pal[2]) * 1000, 63);
-
-    return OK;
-#else
-    return ERR;
-#endif
-}
-
-int PDC_init_color(short color, short red, short green, short blue)
-{
-#ifdef PDCTHUNK
-    THUNKEDVIO vcr;
-    USHORT palbuf[4];
-    unsigned char pal[3];
-    int rc;
-
-    /* Scale */
-
-    pal[0] = DIVROUND((unsigned)red * 63, 1000);
-    pal[1] = DIVROUND((unsigned)green * 63, 1000);
-    pal[2] = DIVROUND((unsigned)blue * 63, 1000);
-
-    /* Set single DAC register */
-
-    palbuf[0] = 8;
-    palbuf[1] = 0;
-    palbuf[2] = curstoreal[color];
-
-    rc = VioGetState(&palbuf, 0);
-    if (rc)
-        return ERR;
-
-    vcr.cb = sizeof(vcr);
-    vcr.type = 3;
-    vcr.firstcolorreg = palbuf[3];
-    vcr.numcolorregs = 1;
-    vcr.colorregaddr = PDCTHUNK(pal);
-
-    rc = VioSetState(&vcr, 0);
-
-    return rc ? ERR : OK;
-#else
-    return ERR;
-#endif
-}
-
- /* Does nothing in the DOS (or OS/2 or Win32 console) flavors of PDCurses,
-which lack user resizing.  See X11 or Win32a versions of this function for
-details of what it does on platforms that do support user resizing. */
-
-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_set_function_key() does nothing on this platform */
-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;
-    }
-    return( old_key);
-}

data/vendor/PDCurses/os2/pdcsetsc.c

@@ -1,112 +0,0 @@
-/* Public Domain Curses */
-
-#include "pdcos2.h"
-
-/*man-start**************************************************************
-
-pdcsetsc
---------
-
-### Synopsis
-
-    int PDC_set_blink(bool blinkon);
-    void PDC_set_title(const char *title);
-
-### Description
-
-   PDC_set_blink() toggles whether the A_BLINK attribute sets an
-   actual blink mode (TRUE), or sets the background color to high
-   intensity (FALSE). The default is platform-dependent (FALSE in
-   most cases). It returns OK if it could set the state to match
-   the given parameter, ERR otherwise. Current platforms also
-   adjust the value of COLORS according to this function -- 16 for
-   FALSE, and 8 for TRUE.
-
-   PDC_set_title() sets the title of the window in which the curses
-   program is running. This function may not do anything on some
-   platforms. (Currently it only works in Win32 and X11.)
-
-### Portability
-                             X/Open    BSD    SYS V
-    PDC_set_blink               -       -       -
-    PDC_set_title               -       -       -
-
-**man-end****************************************************************/
-
-int PDC_curs_set(int visibility)
-{
-#ifndef EMXVIDEO
-    VIOCURSORINFO pvioCursorInfo;
-#endif
-    int ret_vis, hidden = 0, start = 0, end = 0;
-
-    PDC_LOG(("PDC_curs_set() - called: visibility=%d\n", visibility));
-
-    ret_vis = SP->visibility;
-    SP->visibility = visibility;
-
-    switch(visibility)
-    {
-    case 0:     /* invisible */
-#ifdef EMXVIDEO
-        start = end = 0;
-#else
-        start = pdc_font / 4;
-        end = pdc_font;
-        hidden = -1;
-#endif
-        break;
-
-    case 2:     /* highly visible */
-        start = 2;      /* almost full-height block */
-        end = pdc_font - 1;
-        break;
-
-    default:    /* normal visibility */
-        start = (SP->orig_cursor >> 8) & 0xff;
-        end = SP->orig_cursor & 0xff;
-    }
-
-#ifdef EMXVIDEO
-    if (!visibility)
-        v_hidecursor();
-    else
-        v_ctype(start, end);
-#else
-    pvioCursorInfo.yStart = (USHORT)start;
-    pvioCursorInfo.cEnd = (USHORT)end;
-    pvioCursorInfo.cx = (USHORT)1;
-    pvioCursorInfo.attr = hidden;
-    VioSetCurType((PVIOCURSORINFO)&pvioCursorInfo, 0);
-#endif
-    return ret_vis;
-}
-
-void PDC_set_title(const char *title)
-{
-    PDC_LOG(("PDC_set_title() - called:<%s>\n", title));
-}
-
-int PDC_set_blink(bool blinkon)
-{
-#ifndef EMXVIDEO
-    USHORT statebuf[3], result;
-
-    statebuf[0] = 6;    /* length */
-    statebuf[1] = 2;    /* blink/intensity */
-    statebuf[2] = !blinkon;
-
-    result = VioSetState(&statebuf, 0);
-    VioGetState(&statebuf, 0);  /* needed? */
-
-    if (pdc_color_started)
-        COLORS = statebuf[2] ? 16 : 8;
-
-    return (result == 0) ? OK : ERR;
-#else
-    if (pdc_color_started)
-        COLORS = 16;
-
-    return blinkon ? ERR : OK;
-#endif
-}

data/vendor/PDCurses/os2/pdcutil.c

@@ -1,52 +0,0 @@
-/* Public Domain Curses */
-
-#include "pdcos2.h"
-
-#if defined(OS2) && !defined(__EMX__)
-APIRET APIENTRY DosSleep(ULONG ulTime);
-#endif
-
-void PDC_beep(void)
-{
-    PDC_LOG(("PDC_beep() - called\n"));
-
-#ifdef EMXVIDEO
-    putchar('\007');
-#else
-    DosBeep(1380, 100);
-#endif
-}
-
-void PDC_napms(int ms)
-{
-    PDC_LOG(("PDC_napms() - called: ms=%d\n", ms));
-
-#ifdef __EMX__
-    _sleep2(ms);
-#else
-    DosSleep(ms);
-#endif
-}
-
-const char *PDC_sysname(void)
-{
-    return "OS/2";
-}
-
-PDCEX PDC_version_info PDC_version = { PDC_PORT_OS2,
-          PDC_VER_MAJOR, PDC_VER_MINOR, PDC_VER_CHANGE,
-          sizeof( chtype),
-               /* note that thus far,  'wide' and 'UTF8' versions exist */
-               /* only for SDL2, X11,  Win32,  and Win32a;  elsewhere, */
-               /* these will be FALSE */
-#ifdef PDC_WIDE
-          TRUE,
-#else
-          FALSE,
-#endif
-#ifdef PDC_FORCE_UTF8
-          TRUE,
-#else
-          FALSE,
-#endif
-          };

data/vendor/PDCurses/panel.h

@@ -1,56 +0,0 @@
-/* Public Domain Curses */
-
-/*----------------------------------------------------------------------*
- *                         Panels for PDCurses                          *
- *----------------------------------------------------------------------*/
-
-#ifndef __PDCURSES_PANEL_H__
-#define __PDCURSES_PANEL_H__ 1
-
-#include <curses.h>
-
-#if defined(__cplusplus) || defined(__cplusplus__) || defined(__CPLUSPLUS)
-extern "C"
-{
-#endif
-
-typedef struct panelobs
-{
-    struct panelobs *above;
-    struct panel *pan;
-} PANELOBS;
-
-typedef struct panel
-{
-    WINDOW *win;
-    int wstarty;
-    int wendy;
-    int wstartx;
-    int wendx;
-    struct panel *below;
-    struct panel *above;
-    const void *user;
-    struct panelobs *obscure;
-} PANEL;
-
-PDCEX int     bottom_panel(PANEL *pan);
-PDCEX int     del_panel(PANEL *pan);
-PDCEX int     hide_panel(PANEL *pan);
-PDCEX int     move_panel(PANEL *pan, int starty, int startx);
-PDCEX PANEL  *new_panel(WINDOW *win);
-PDCEX PANEL  *panel_above(const PANEL *pan);
-PDCEX PANEL  *panel_below(const PANEL *pan);
-PDCEX int     panel_hidden(const PANEL *pan);
-PDCEX const void *panel_userptr(const PANEL *pan);
-PDCEX WINDOW *panel_window(const PANEL *pan);
-PDCEX int     replace_panel(PANEL *pan, WINDOW *win);
-PDCEX int     set_panel_userptr(PANEL *pan, const void *uptr);
-PDCEX int     show_panel(PANEL *pan);
-PDCEX int     top_panel(PANEL *pan);
-PDCEX void    update_panels(void);
-
-#if defined(__cplusplus) || defined(__cplusplus__) || defined(__CPLUSPLUS)
-}
-#endif
-
-#endif /* __PDCURSES_PANEL_H__ */