curses 1.6.0 → 1.7.0

data/vendor/PDCursesMod/wincon/Makefile.vc

@@ -0,0 +1,132 @@
+# Visual C++ Makefile for PDCurses - Windows console
+#
+# Usage: nmake -f [path\]Makefile.vc [DEBUG=Y] [DLL=Y] [WIDE=Y] [UTF8=Y]
+#        [CHTYPE_32=] [INFOEX=N] [target]
+#
+# where target can be any of:
+# [all|demos|tests|pdcurses.lib|testcurs.exe...]
+
+O = obj
+E = .exe
+RM = del
+
+!ifndef PDCURSES_SRCDIR
+PDCURSES_SRCDIR = ..
+!endif
+
+osdir		= $(PDCURSES_SRCDIR)\wincon
+common		= $(PDCURSES_SRCDIR)\common
+
+!include $(common)\libobjs.mif
+
+PDCURSES_WIN_H	= $(osdir)\pdcwin.h
+
+!ifdef DEBUG
+CFLAGS		= -Z7 -DPDCDEBUG
+LDFLAGS		= -debug -pdb:none
+!else
+CFLAGS		= -Ox
+LDFLAGS		=
+!endif
+
+CFLAGS		= $(CFLAGS) -W4 -WX -D_CRT_SECURE_NO_WARNINGS
+
+!ifdef WIDE
+WIDEOPT		= -DPDC_WIDE
+!endif
+
+!ifdef UTF8
+UTF8OPT		= -DPDC_FORCE_UTF8
+!endif
+
+!ifdef CHTYPE_32
+CHTYPE_FLAGS= -DCHTYPE_32
+!endif
+
+!ifdef INFOEX
+INFOPT		= -DHAVE_NO_INFOEX
+!endif
+
+CC		= cl.exe -nologo
+LINK		= link.exe -nologo
+SHL_LD		= $(LINK) $(LDFLAGS) -dll -machine:$(PLATFORM) -out:pdcurses.dll
+
+CCLIBS		= user32.lib advapi32.lib winmm.lib
+# may need to add msvcrt for older compilers
+#CCLIBS		= msvcrt.lib user32.lib advapi32.lib winmm.lib
+
+LIBEXE		= lib -nologo
+
+LIBCURSES	= pdcurses.lib
+CURSESDLL	= pdcurses.dll
+
+!ifdef DLL
+DLLOPT		= -DPDC_DLL_BUILD
+PDCLIBS		= $(CURSESDLL)
+!else
+PDCLIBS		= $(LIBCURSES)
+!endif
+
+BUILD		= $(CC) -I$(PDCURSES_SRCDIR) -c $(CFLAGS) $(CHTYPE_FLAGS) $(DLLOPT) \
+$(WIDEOPT) $(UTF8OPT) $(INFOPT)
+
+all:	$(PDCLIBS)
+
+clean:
+	-$(RM) *.obj
+	-$(RM) *.lib
+	-$(RM) *.exe
+	-$(RM) *.dll
+	-$(RM) *.exp
+	-$(RM) *.res
+
+demos:	$(PDCLIBS) $(DEMOS)
+tests:	$(PDCLIBS) $(TESTS)
+
+DEMOOBJS = $(DEMOS:.exe=.obj) tui.obj
+TESTOBJS = $(TESTS:.exe=.obj)
+
+$(LIBOBJS) $(PDCOBJS) : $(PDCURSES_HEADERS)
+$(PDCOBJS) : $(PDCURSES_WIN_H)
+$(DEMOOBJS) : $(PDCURSES_CURSES_H)
+$(DEMOS) : $(LIBCURSES)
+$(TESTOBJS) : $(PDCURSES_CURSES_H)
+$(TESTS) : $(LIBCURSES)
+panel.obj : $(PANEL_HEADER)
+terminfo.obj : $(TERM_HEADER)
+
+!ifndef DLL
+$(LIBCURSES) : $(LIBOBJS) $(PDCOBJS)
+	$(LIBEXE) -out:$@ $(LIBOBJS) $(PDCOBJS)
+!endif
+
+$(CURSESDLL) : $(LIBOBJS) $(PDCOBJS) pdcurses.obj
+	$(SHL_LD) $(LIBOBJS) $(PDCOBJS) pdcurses.obj $(CCLIBS)
+
+pdcurses.res pdcurses.obj: $(common)\pdcurses.rc
+	rc -r -fopdcurses.res $(common)\pdcurses.rc
+	cvtres -machine:$(PLATFORM) -nologo -out:pdcurses.obj pdcurses.res
+
+{$(srcdir)\}.c{}.obj::
+	$(BUILD) $<
+
+{$(osdir)\}.c{}.obj::
+	$(BUILD) $<
+
+{$(demodir)\}.c{}.obj::
+	$(BUILD) $<
+
+{$(testdir)\}.c{}.obj::
+	$(BUILD) $<
+
+.obj.exe:
+	$(LINK) $(LDFLAGS) $< $(LIBCURSES) $(CCLIBS)
+
+tuidemo.exe: tuidemo.obj tui.obj
+	$(LINK) $(LDFLAGS) $*.obj tui.obj $(LIBCURSES) $(CCLIBS)
+
+tui.obj: $(demodir)\tui.c $(demodir)\tui.h
+	$(BUILD) -I$(demodir) $(demodir)\tui.c
+
+tuidemo.obj: $(demodir)\tuidemo.c
+	$(BUILD) -I$(demodir) $(demodir)\tuidemo.c

data/vendor/PDCursesMod/wincon/Makefile.wcc

@@ -0,0 +1,33 @@
+# Watcom Makefile for PDCurses - Windows console
+#
+# Usage: wmake -f [path\]Makefile.wcc [DEBUG=Y] [WIDE=Y] [UTF8=Y]
+#        [INFOEX=N] [target]
+#
+# where target can be any of:
+# [all|demos|pdcurses.lib|testcurs.exe...]
+
+!ifdef %PDCURSES_SRCDIR
+PDCURSES_SRCDIR = $(%PDCURSES_SRCDIR)
+!else
+PDCURSES_SRCDIR = ..
+!endif
+
+osdir = wincon
+
+TARGET = nt
+
+LTARGET = nt
+
+CFLAGS =
+
+!ifeq INFOEX N
+CFLAGS += -DHAVE_NO_INFOEX
+!endif
+
+!ifeq DLL Y
+ADDED_LIBS_FOR_DLL=lib winmm.lib
+!else
+ADDED_LIBS=lib winmm.lib
+!endif
+
+!include $(PDCURSES_SRCDIR)/common/watcom.mif

data/vendor/PDCursesMod/wincon/README.md

@@ -0,0 +1,76 @@
+PDCursesMod for Windows console
+============================
+
+This directory contains PDCursesMod source code files specific to the
+Microsoft Windows console. Although historically called "Win32", this
+port can just as easily be built for 64-bit systems. Windows 95 through
+Windows 11 are covered. (Some features require later versions.)
+
+
+Building
+--------
+
+- Choose the appropriate makefile for your compiler:
+
+        Makefile      - GCC (MinGW or Cygnus)
+        Makefile.bcc  - Borland C++
+        Makefile.vc   - Microsoft Visual C++
+        Makefile.wcc  - Watcom
+
+- Optionally, you can build in a different directory than the platform
+  directory by setting PDCURSES_SRCDIR to point to the directory where
+  you unpacked PDCursesMod, and changing to your target directory:
+
+        set PDCURSES_SRCDIR=c:\pdcurses
+
+- Build it:
+
+        make -f makefilename
+
+  (For Watcom, use "wmake" instead of "make"; for MSVC, "nmake"; for
+  MinGW, "mingw32-make".) You'll get the library (pdcurses.lib or .a,
+  depending on your compiler) and a lot of object files.
+
+  You can also give the optional parameter "WIDE=Y", to build the
+  library with wide-character (Unicode) support:
+
+        wmake -f Makefile.wcc WIDE=Y
+
+  When built this way, the library is not compatible with Windows 9x,
+  unless you also link with the Microsoft Layer for Unicode (not
+  tested).
+
+  Another option, "UTF8=Y", makes PDCurses ignore the system locale, and
+  treat all narrow-character strings as UTF-8. This option has no effect
+  unless WIDE=Y is also set. Use it to get around the poor support for
+  UTF-8 in the Windows console:
+
+        make -f Makefile.bcc WIDE=Y UTF8=Y
+
+  You can also use the optional parameter "DLL=Y" with Visual C++,
+  MinGW or Cygwin, to build the library as a DLL:
+
+        nmake -f Makefile.vc WIDE=Y DLL=Y
+
+  When you build the library as a Windows DLL, you must always define
+  PDC_DLL_BUILD when linking against it. (Or, if you only want to use
+  the DLL, you could add this definition to your curses.h.)
+
+  Add the target "demos" to build the sample programs.
+
+- If your build stops with errors about PCONSOLE_SCREEN_BUFFER_INFOEX,
+  add the parameter "INFOEX=N" to your make command line and try again.
+  (This will happen with older compile environments.)
+
+
+Distribution Status
+-------------------
+
+The files in this directory are released to the public domain.
+
+
+Acknowledgements
+----------------
+
+Windows console port was originally provided by Chris Szurgot
+<szurgot@itribe.net>

data/vendor/PDCursesMod/wincon/pdcclip.c

@@ -0,0 +1,6 @@
+/* PDCurses */
+
+#include "pdcwin.h"
+#include <string.h>
+
+#include "../common/winclip.c"

data/vendor/PDCursesMod/wincon/pdcdisp.c

@@ -0,0 +1,408 @@
+/* PDCurses */
+
+#include "pdcwin.h"
+
+#include <stdlib.h>
+#include <string.h>
+#include <assert.h>
+
+#ifdef PDC_WIDE
+   #define USE_UNICODE_ACS_CHARS 1
+#else
+   #define USE_UNICODE_ACS_CHARS 0
+#endif
+
+#include "../common/acs_defs.h"
+
+DWORD pdc_last_blink;
+static bool blinked_off = FALSE;
+static bool in_italic = FALSE;
+
+/* position hardware cursor at (y, x) */
+
+void PDC_gotoyx(int row, int col)
+{
+    COORD coord;
+
+    PDC_LOG(("PDC_gotoyx() - called: row %d col %d from row %d col %d\n",
+             row, col, SP->cursrow, SP->curscol));
+
+    coord.X = (SHORT)col;
+    coord.Y = (SHORT)row;
+
+    SetConsoleCursorPosition(pdc_con_out, coord);
+}
+
+static void _set_ansi_color(short f, short b, attr_t attr)
+{
+    char esc[64], *p;
+    short tmp, underline;
+    bool italic, set_transparent_bg;
+    size_t initial_len;
+
+    if (f < 16 && !pdc_color[f].mapped)
+        f = pdc_curstoansi[f];
+
+    if (b < 16 && !pdc_color[b].mapped)
+        b = pdc_curstoansi[b];
+
+    if (attr & A_REVERSE)
+    {
+        tmp = f;
+        f = b;
+        b = tmp;
+    }
+    attr &= SP->termattrs;
+    italic = !!(attr & A_ITALIC);
+    underline = !!(attr & A_UNDERLINE);
+
+    p = esc + sprintf(esc, "\x1b[");
+
+    set_transparent_bg = (b == 0 && b != pdc_oldb);
+    if (set_transparent_bg)
+    {
+        p += sprintf(p, "m\x1b[");
+        pdc_oldb = b;
+    }
+    initial_len = strlen(esc);
+
+    if (f != pdc_oldf || set_transparent_bg)
+    {
+        if (f < 8 && !pdc_color[f].mapped)
+            p += sprintf(p, "%d", f + 30);
+        else if (f < 16 && !pdc_color[f].mapped)
+            p += sprintf(p, "%d", f + 82);
+        else if (f < 256 && !pdc_color[f].mapped)
+            p += sprintf(p, "38;5;%d", f);
+        else
+        {
+            short red = DIVROUND(pdc_color[f].r * 255, 1000);
+            short green = DIVROUND(pdc_color[f].g * 255, 1000);
+            short blue = DIVROUND(pdc_color[f].b * 255, 1000);
+
+            p += sprintf(p, "38;2;%d;%d;%d", red, green, blue);
+        }
+
+        pdc_oldf = f;
+    }
+
+    if (b != pdc_oldb)
+    {
+        if (strlen(esc) > initial_len)
+            p += sprintf(p, ";");
+
+        if (b < 8 && !pdc_color[b].mapped)
+            p += sprintf(p, "%d", b + 40);
+        else if (b < 16 && !pdc_color[b].mapped)
+            p += sprintf(p, "%d", b + 92);
+        else if (b < 256 && !pdc_color[b].mapped)
+            p += sprintf(p, "48;5;%d", b);
+        else
+        {
+            short red = DIVROUND(pdc_color[b].r * 255, 1000);
+            short green = DIVROUND(pdc_color[b].g * 255, 1000);
+            short blue = DIVROUND(pdc_color[b].b * 255, 1000);
+
+            p += sprintf(p, "48;2;%d;%d;%d", red, green, blue);
+        }
+
+        pdc_oldb = b;
+    }
+
+    if (italic != in_italic || set_transparent_bg)
+    {
+        if (strlen(esc) > initial_len )
+            p += sprintf(p, ";");
+
+        if (italic)
+            p += sprintf(p, "3");
+        else
+            p += sprintf(p, "23");
+
+        in_italic = italic;
+    }
+
+    if (underline != pdc_oldu || set_transparent_bg)
+    {
+        if (strlen(esc) > initial_len )
+            p += sprintf(p, ";");
+
+        if (underline)
+            p += sprintf(p, "4");
+        else
+            p += sprintf(p, "24");
+
+        pdc_oldu = underline;
+    }
+
+    if (strlen(esc) > 2)
+    {
+        sprintf(p, "m");
+        if (!pdc_conemu)
+            SetConsoleMode(pdc_con_out, 0x0015);
+
+        WriteConsoleA(pdc_con_out, esc, (DWORD)strlen(esc), NULL, NULL);
+
+        if (!pdc_conemu)
+            SetConsoleMode(pdc_con_out, 0x0010);
+    }
+}
+
+/* see 'addch.c' for an explanation of how combining chars are handled. */
+
+#ifdef USING_COMBINING_CHARACTER_SCHEME
+   int PDC_expand_combined_characters( const cchar_t c, cchar_t *added);  /* addch.c */
+#endif
+
+#ifdef PDC_WIDE
+#define IS_SUPPLEMENTAL_MULTILINGUAL_PLANE( c) ((c) & 0x1f0000)
+#endif
+
+static void _show_run_of_ansi_characters( const attr_t attr,
+                           const int fore, const int back, const bool blink,
+                           const int lineno, const int x, const chtype *srcp, const int len)
+{
+#ifdef PDC_WIDE
+    WCHAR buffer[MAX_PACKET_LEN];
+#else
+    char buffer[MAX_PACKET_LEN];
+#endif
+    int j, n_out;
+
+    for (j = n_out = 0; j < len; j++)
+    {
+        chtype ch = srcp[j];
+
+        if( _is_altcharset( ch))
+            ch = acs_map[ch & 0x7f];
+
+        if (blink && blinked_off)
+            ch = ' ';
+
+#ifdef PDC_WIDE
+        ch &= A_CHARTEXT;
+        if( ch <= MAX_UNICODE)
+        {
+            if( IS_SUPPLEMENTAL_MULTILINGUAL_PLANE( ch))
+            {
+                buffer[n_out++] = (WCHAR)((ch - 0x10000) >> 10 | 0xD800); /* first UTF-16 unit */
+                buffer[n_out++] = (WCHAR)(ch & 0x3FF) | 0xDC00;   /* second UTF-16 unit */
+            }
+        else
+            buffer[n_out++] = (WCHAR)ch;
+        }
+#else
+        buffer[n_out++] = (char)( ch & A_CHARTEXT);
+#endif
+    }
+
+    PDC_gotoyx(lineno, x);
+    _set_ansi_color( (short)fore, (short)back, attr);
+#ifdef PDC_WIDE
+    WriteConsoleW(pdc_con_out, buffer, n_out, NULL, NULL);
+#else
+    WriteConsoleA(pdc_con_out, buffer, n_out, NULL, NULL);
+#endif
+}
+
+static void _show_run_of_nonansi_characters( attr_t attr,
+                           int fore, int back, const bool blink,
+                           const int lineno, const int x, const chtype *srcp, const int len)
+{
+    CHAR_INFO buffer[MAX_PACKET_LEN];
+    COORD bufSize, bufPos;
+    SMALL_RECT sr;
+    WORD mapped_attr;
+    int j, n_out;;
+
+    fore = pdc_curstoreal[fore];
+    back = pdc_curstoreal[back];
+
+    if (attr & A_REVERSE)
+        mapped_attr = (WORD)( back | (fore << 4));
+    else
+        mapped_attr = (WORD)( fore | (back << 4));
+
+    if (attr & A_UNDERLINE)
+        mapped_attr |= 0x8000; /* COMMON_LVB_UNDERSCORE */
+    if (attr & A_LEFT)
+        mapped_attr |= 0x0800; /* COMMON_LVB_GRID_LVERTICAL */
+    if (attr & A_RIGHT)
+        mapped_attr |= 0x1000; /* COMMON_LVB_GRID_RVERTICAL */
+
+    for (j = n_out = 0; j < len; j++)
+    {
+        chtype ch = srcp[j];
+
+        if( _is_altcharset( ch))
+            ch = acs_map[ch & 0x7f];
+
+        if (blink && blinked_off)
+            ch = ' ';
+
+#ifdef PDC_WIDE
+        ch &= A_CHARTEXT;
+#ifdef USING_COMBINING_CHARACTER_SCHEME
+        if( ch > DUMMY_CHAR_NEXT_TO_FULLWIDTH)
+        {
+            cchar_t added[10], root = ch;
+            int n_combined = 0;
+
+            while( (root = PDC_expand_combined_characters( root,
+                                   &added[n_combined])) > MAX_UNICODE)
+                n_combined++;
+            buffer[n_out++].Char.UnicodeChar = (WCHAR)root;
+            ch = (chtype)added[n_combined];
+            while( n_combined)
+            {
+                n_combined--;
+                buffer[n_out++].Char.UnicodeChar = (WCHAR)added[n_combined];
+            }
+        }
+#endif
+        if( ch <= MAX_UNICODE)
+        {
+            if( IS_SUPPLEMENTAL_MULTILINGUAL_PLANE( ch))
+            {
+                buffer[n_out++].Char.UnicodeChar = (WCHAR)((ch - 0x10000) >> 10 | 0xD800); /* first UTF-16 unit */
+                buffer[n_out++].Char.UnicodeChar = (WCHAR)(ch & 0x3FF) | 0xDC00;   /* second UTF-16 unit */
+            }
+            else
+                buffer[n_out++].Char.UnicodeChar = (WCHAR)ch;
+        }
+#else
+        buffer[n_out++].Char.UnicodeChar = (WCHAR)( ch & A_CHARTEXT);
+#endif
+
+    }
+
+    for( j = 0; j < n_out; j++)
+        buffer[j].Attributes = mapped_attr;
+    bufPos.X = bufPos.Y = 0;
+    bufSize.X = (SHORT)n_out;
+    bufSize.Y = 1;
+
+    sr.Top = sr.Bottom = (SHORT)lineno;
+    sr.Left = (SHORT)x;
+    sr.Right = (SHORT)( x + len - 1);
+
+    WriteConsoleOutput(pdc_con_out, buffer, bufSize, bufPos, &sr);
+}
+
+static void _new_packet( attr_t attr, const int lineno,
+                                 int x, int len, const chtype *srcp)
+{
+    int fore, back;
+    bool blink, ansi;
+
+    assert( len >= 0);
+    assert( len < MAX_PACKET_LEN);
+    if (pdc_ansi && (lineno == (SP->lines - 1)) && ((x + len) == SP->cols))
+    {
+        len--;
+        if (len)
+            _new_packet(attr, lineno, x, len, srcp);
+        pdc_ansi = FALSE;
+        _new_packet(attr, lineno, x + len, 1, srcp + len);
+        pdc_ansi = TRUE;
+        return;
+    }
+
+    extended_pair_content( (int)PAIR_NUMBER(attr), &fore, &back);
+    ansi = pdc_ansi || (fore >= 16 || back >= 16);
+    blink = (SP->termattrs & A_BLINK) && (attr & A_BLINK);
+
+    if (blink)
+    {
+        attr &= ~A_BLINK;
+        if (blinked_off)
+            attr &= ~(A_UNDERLINE | A_RIGHT | A_LEFT);
+    }
+
+    if (attr & A_BOLD)
+        fore |= 8;
+    if (attr & A_BLINK)
+        back |= 8;
+
+    if (ansi)
+        _show_run_of_ansi_characters( attr, fore, back, blink, lineno, x, srcp, len);
+    else
+        _show_run_of_nonansi_characters( attr, fore, back, blink, lineno, x, srcp, len);
+}
+
+/* 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)
+{
+    attr_t old_attr, attr;
+    int i, j;
+
+    PDC_LOG(("PDC_transform_line() - called: lineno=%d\n", lineno));
+
+    old_attr = *srcp & (A_ATTRIBUTES | A_ALTCHARSET);
+
+    for (i = 1, j = 1; j < len; i++, j++)
+    {
+        attr = srcp[i] & (A_ATTRIBUTES | A_ALTCHARSET);
+
+        if (attr != old_attr)
+        {
+            _new_packet(old_attr, lineno, x, i, srcp);
+            old_attr = attr;
+            srcp += i;
+            x += i;
+            i = 0;
+        }
+    }
+
+    _new_packet(old_attr, lineno, x, i, srcp);
+}
+
+void PDC_blink_text(void)
+{
+    CONSOLE_CURSOR_INFO cci;
+    int i, j, k;
+    bool oldvis;
+
+    GetConsoleCursorInfo(pdc_con_out, &cci);
+    oldvis = (bool)cci.bVisible;
+    if (oldvis)
+    {
+        cci.bVisible = FALSE;
+        SetConsoleCursorInfo(pdc_con_out, &cci);
+    }
+
+    if (!(SP->termattrs & A_BLINK))
+        blinked_off = FALSE;
+    else
+        blinked_off = !blinked_off;
+
+    for (i = 0; i < SP->lines; i++)
+    {
+        const chtype *srcp = curscr->_y[i];
+
+        for (j = 0; j < SP->cols; j++)
+            if (srcp[j] & A_BLINK)
+            {
+                k = j;
+                while (k < SP->cols && (srcp[k] & A_BLINK))
+                    k++;
+                PDC_transform_line_sliced( i, j, k - j, srcp + j);
+                j = k;
+            }
+    }
+
+    PDC_gotoyx(SP->cursrow, SP->curscol);
+    if (oldvis)
+    {
+        cci.bVisible = TRUE;
+        SetConsoleCursorInfo(pdc_con_out, &cci);
+    }
+
+    pdc_last_blink = GetTickCount();
+}
+
+void PDC_doupdate(void)
+{
+}

data/vendor/PDCursesMod/wincon/pdcgetsc.c

@@ -0,0 +1,42 @@
+/* PDCurses */
+
+#include "pdcwin.h"
+
+/* get the cursor size/shape */
+
+int PDC_get_cursor_mode(void)
+{
+    CONSOLE_CURSOR_INFO ci;
+
+    PDC_LOG(("PDC_get_cursor_mode() - called\n"));
+
+    GetConsoleCursorInfo(pdc_con_out, &ci);
+
+    return ci.dwSize;
+}
+
+/* return number of screen rows */
+
+int PDC_get_rows(void)
+{
+    CONSOLE_SCREEN_BUFFER_INFO scr;
+
+    PDC_LOG(("PDC_get_rows() - called\n"));
+
+    GetConsoleScreenBufferInfo(pdc_con_out, &scr);
+
+    return scr.srWindow.Bottom - scr.srWindow.Top + 1;
+}
+
+/* return width of screen/viewport */
+
+int PDC_get_columns(void)
+{
+    CONSOLE_SCREEN_BUFFER_INFO scr;
+
+    PDC_LOG(("PDC_get_columns() - called\n"));
+
+    GetConsoleScreenBufferInfo(pdc_con_out, &scr);
+
+    return scr.srWindow.Right - scr.srWindow.Left + 1;
+}