curses 1.6.1 → 1.7.0

data/vendor/PDCursesMod/os2/pdcsetsc.c

@@ -0,0 +1,110 @@
+/* PDCurses */
+
+#include "pdcos2.h"
+
+/*man-start**************************************************************
+
+pdcsetsc
+--------
+
+### Synopsis
+
+    int PDC_set_blink(bool blinkon);
+    int PDC_set_bold(bool boldon);
+    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.
+
+   PDC_set_bold() toggles whether the A_BOLD attribute selects an actual
+   bold font (TRUE), or sets the foreground color to high intensity
+   (FALSE). It returns OK if it could set the state to match the given
+   parameter, ERR otherwise.
+
+   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.
+
+### Portability
+                             X/Open  ncurses  NetBSD
+    PDC_set_blink               -       -       -
+    PDC_set_title               -       -       -
+
+**man-end****************************************************************/
+
+int PDC_curs_set(int visibility)
+{
+    VIOCURSORINFO pvioCursorInfo;
+    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 */
+        start = pdc_font / 4;
+        end = pdc_font;
+        hidden = -1;
+        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;
+    }
+
+    pvioCursorInfo.yStart = (USHORT)start;
+    pvioCursorInfo.cEnd = (USHORT)end;
+    pvioCursorInfo.cx = (USHORT)1;
+    pvioCursorInfo.attr = hidden;
+    VioSetCurType((PVIOCURSORINFO)&pvioCursorInfo, 0);
+
+    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)
+{
+    if (!SP)
+        return ERR;
+
+    if (SP->color_started)
+        COLORS = 16;
+
+    if (blinkon)
+    {
+        if (!(SP->termattrs & A_BLINK))
+            SP->termattrs |= A_BLINK;
+    }
+    else
+    {
+        if (SP->termattrs & A_BLINK)
+        {
+            SP->termattrs &= ~A_BLINK;
+            PDC_blink_text();
+        }
+    }
+
+    return OK;
+}
+
+int PDC_set_bold(bool boldon)
+{
+    return boldon ? ERR : OK;
+}

data/vendor/PDCursesMod/os2/pdcutil.c

@@ -0,0 +1,51 @@
+/* PDCurses */
+
+#include "pdcos2.h"
+#include "time.h"
+
+#if defined(OS2) && !defined(__EMX__)
+APIRET APIENTRY DosSleep(ULONG ulTime);
+#endif
+
+void PDC_beep(void)
+{
+    PDC_LOG(("PDC_beep() - called\n"));
+
+    DosBeep(1380, 100);
+}
+
+static ULONG _PDC_ms_count(void)
+{
+    const ULONG now = (ULONG)clock( );
+    const ULONG n_seconds = now / (ULONG)CLOCKS_PER_SEC;
+    const ULONG fraction  = now % (ULONG)CLOCKS_PER_SEC;
+
+    return( n_seconds * 1000UL + fraction * 1000UL / (ULONG)CLOCKS_PER_SEC);
+}
+
+void PDC_napms(int ms)
+{
+    static ULONG _last_blink_ms = (ULONG)0;
+    const ULONG blink_interval_ms = 500;   /* blink twice a second */
+
+    PDC_LOG(("PDC_napms() - called: ms=%d\n", ms));
+
+    if( SP->termattrs & A_BLINK)
+    {
+        const ULONG curr_ms = _PDC_ms_count( );
+
+        if( curr_ms < _last_blink_ms || curr_ms >= _last_blink_ms + blink_interval_ms)
+        {
+            PDC_blink_text();
+            _last_blink_ms = curr_ms;
+        }
+    }
+    DosSleep(ms);
+}
+
+const char *PDC_sysname(void)
+{
+    return "OS/2";
+}
+
+enum PDC_port PDC_port_val = PDC_PORT_OS2;

data/vendor/PDCursesMod/os2gui/.gitignore

@@ -0,0 +1 @@
+pdcurses.lbc

data/vendor/PDCursesMod/os2gui/CMakeLists.txt

@@ -0,0 +1,30 @@
+cmake_minimum_required(VERSION 3.11)
+
+if(NOT CMAKE_BUILD_TYPE)
+    set(CMAKE_BUILD_TYPE "MinSizeRel" CACHE STRING "Choose the type of build, options are: Debug, Release, or MinSizeRel." FORCE)
+    message(STATUS "No build type specified, defaulting to MinSizeRel.")
+endif()
+
+PROJECT(wingui VERSION "${PROJECT_VERSION}" LANGUAGES C)
+
+INCLUDE(project_common)
+
+demo_app(../demos calendar)
+demo_app(../demos firework)
+demo_app(../demos init_col)
+demo_app(../demos mbrot)
+demo_app(../demos newtest WIN32)
+demo_app(../demos ozdemo)
+demo_app(../demos picsview)
+demo_app(../demos ptest)
+demo_app(../demos rain)
+demo_app(../demos speed)
+demo_app(../demos test_pan)
+demo_app(../demos testcurs)
+demo_app(../demos version)
+demo_app(../demos widetest)
+demo_app(../demos worm)
+demo_app(../demos xmas)
+
+
+SET(CPACK_COMPONENTS_ALL applications)

data/vendor/PDCursesMod/os2gui/Makefile

@@ -0,0 +1,139 @@
+# GNU MAKE Makefile for PDCurses library - OS/2 emx 0.9c+
+#
+# Usage: [g]make [-f path\Makefile] [DEBUG=Y] [DLL=Y] [target]
+#
+# where target can be any of:
+# [all|libs|demos|pdcurses.a|pdcurses.dll|testcurs.exe...]
+#
+
+E = .exe
+
+RM = del
+CP = copy
+# use following for running under 4OS/2
+#RM = rm
+#CP = cp
+
+ifndef PDCURSES_SRCDIR
+	PDCURSES_SRCDIR = ..
+endif
+
+osdir		= $(PDCURSES_SRCDIR)/os2gui
+common		= $(PDCURSES_SRCDIR)/common
+
+include $(common)/libobjs.mif
+
+#PDCURSES_OS2_H	= $(osdir)/pdcos2.h
+
+CC		= gcc
+
+CFLAGS = -I$(PDCURSES_SRCDIR) -c -Wall
+
+ifeq ($(DEBUG),Y)
+	CFLAGS  += -g -DPDCDEBUG
+	LDFLAGS = -g
+else
+	CFLAGS  += -O2
+	LDFLAGS =
+endif
+
+DLLTARGET	= pdcurses.dll
+DLLFLAGS 	= -Zdll -Zcrtdll -Zomf
+
+LINK		= gcc
+#EMXBIND		= emxbind
+#EMXOMF		= emxomf
+
+LIBEXE		= ar
+LIBFLAGS	= rcv
+
+ifeq ($(DLL),Y)
+	O = obj
+	CFLAGS += -Zdll -Zcrtdll -Zomf
+	LDFLAGS += -Zomf -Zcrtdll
+	LIBCURSES = pdcurses.lib
+	LIBDEPS = $(LIBOBJS) $(PDCOBJS)
+	PDCLIBS = $(DLLTARGET)
+	EXEPOST =
+	TUIPOST =
+	CLEAN = *.dll *.lib
+else
+	O = o
+#	CFLAGS += -Zomf
+	LDFLAGS += -Zomf
+	LIBCURSES = pdcurses.a
+	LIBDEPS = $(LIBOBJS) $(PDCOBJS)
+	PDCLIBS = $(LIBCURSES)
+#	EXEPOST = $(EMXBIND) $* $(BINDFLAGS)
+#	TUIPOST = $(EMXBIND) tuidemo $(BINDFLAGS)
+	CLEAN = *.a
+endif
+
+.PHONY: all libs clean demos dist
+
+all:	libs demos
+
+libs:	$(PDCLIBS)
+
+clean:
+	-$(RM) *.$(O)
+	-$(RM) *.def
+	-$(RM) *.exe
+	-$(RM) $(CLEAN)
+
+demos:	$(DEMOS)
+
+DEMOOBJS = calendar.$(O) firework.$(O) init_col.$(O) mbrot.$(O) newtest.$(O) \
+ ozdemo.$(O) picsview.$(O) ptest.$(O) rain.$(O) speed.$(O) test_pan.$(O) testcurs.$(O) \
+ tui.$(O) tuidemo.$(O) widetest.$(O) worm.$(O) xmas.$(O)
+
+pdcurses.a : $(LIBDEPS)
+	$(LIBEXE) $(LIBFLAGS) $@ $?
+	-$(CP) $@ panel.a
+
+pdcurses.lib : $(DLLTARGET)
+	emximp -o $@ $*.def
+	-$(CP) $@ panel.lib
+
+$(DLLTARGET) : $(LIBDEPS)
+	echo "LIBRARY PDCURSES INITINSTANCE" > $*.def
+	echo "DATA MULTIPLE NONSHARED" >> $*.def
+	echo "DESCRIPTION \"PDCURSES DLL for OS/2\"" >> $*.def
+	echo "STACKSIZE 81920" >> $*.def
+	echo "EXPORTS" >> $*.def
+	emxexp $(LIBDEPS) >> $*.def
+	$(LINK) $(DLLFLAGS) -o $@ $(LIBDEPS) $*.def
+#	lxlite $@
+
+$(LIBOBJS) $(PDCOBJS) $(DEMOOBJS) : $(PDCURSES_HEADERS)
+$(PDCOBJS) : $(PDCURSES_OS2_H)
+$(DEMOS) : $(LIBCURSES)
+panel.$(O) ptest.$(O): $(PANEL_HEADER)
+terminfo.$(O): $(TERM_HEADER)
+
+$(LIBOBJS) : %.$(O): $(srcdir)/%.c
+	$(CC) -c $(CFLAGS) -o$@ $<
+
+$(PDCOBJS) : %.$(O): $(osdir)/%.c
+	$(CC) -c $(CFLAGS) -o$@ $<
+
+$(DEMOS_EXCEPT_TUIDEMO): %.exe: %.$(O)
+	echo "NAME $* WINDOWAPI" > $*.def
+	$(LINK) $(LDFLAGS) -o $*$(E) $< $(LIBCURSES) $(CCLIBS) $*.def
+	$(EXEPOST)
+
+tuidemo.exe:	tuidemo.$(O) tui.$(O)
+	echo "NAME tuidemo WINDOWAPI" > tuidemo.def
+	$(LINK) $(LDFLAGS) -o tuidemo tuidemo.$(O) tui.$(O) $(LIBCURSES) $(CCLIBS) tuidemo.def
+	$(TUIPOST)
+
+calendar.$(O) firework.$(O) init_col.$(O) mbrot.$(O) newtest.$(O) ozdemo.$(O) picsview.$(O) \
+ ptest.$(O) rain.$(O) speed.$(O) test_pan.$(O) testcurs.$(O) widetest.$(O) worm.$(O) xmas.$(O): %.$(O): \
+$(demodir)/%.c
+	$(CC) $(CFLAGS) -o$@ $<
+
+tui.$(O): $(demodir)\tui.c $(demodir)\tui.h
+	$(CC) $(CFLAGS) -I$(demodir) -o $@ $<
+
+tuidemo.$(O): $(demodir)\tuidemo.c
+	$(CC) $(CFLAGS) -I$(demodir) -o $@ $<

data/vendor/PDCursesMod/os2gui/Makefile.wcc

@@ -0,0 +1,32 @@
+# Watcom WMAKE Makefile for PDCurses library - OS/2 Watcom C/C++
+#
+# Usage: wmake -f [wingui/]Makefile.wcc [DEBUG=Y] [WIDE=Y] [UTF8=Y] [target]
+#
+# where target can be any of:
+# [all|demos|pdcurses.lib|testcurs.exe...]
+
+!ifdef %PDCURSES_SRCDIR
+PDCURSES_SRCDIR = $(%PDCURSES_SRCDIR)
+!else
+PDCURSES_SRCDIR = ..
+!endif
+
+common     = $(PDCURSES_SRCDIR)/common
+
+osdir = os2gui
+
+TARGET = os2
+
+LTARGET = os2v2_pm
+
+CFLAGS = -ei
+
+!ifeq DLL Y
+ADDED_LIBS_FOR_DLL =
+!else
+ADDED_LIBS =
+!endif
+
+EXTRA_LIB_CMD = -$(COPY) $(PDCNAME).lib panel.lib
+
+!include $(common)/watcom.mif

data/vendor/PDCursesMod/os2gui/README.md

@@ -0,0 +1,69 @@
+PDCurses for OS2GUI
+===================
+
+This directory contains PDCurses source code files specific to OS/2
+graphics mode.
+
+Building
+--------
+
+- Choose the appropriate makefile for your compiler:
+
+        Makefile     - EMX 0.9d+
+        Makefile.wcc - Open Watcom 1.9+
+
+- Optionally, you can build in a different directory than the platform
+  directory by setting PDCURSES_SRCDIR to point to the directory where
+  you unpacked PDCurses, 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".) You'll
+  get the libraries (pdcurses.lib or .a, depending on your compiler; and
+  panel.lib or .a), the demos (*.exe), and a lot of object files. Note
+  that the panel library is just a copy of the main library, provided
+  for convenience; both panel and curses functions are in the main
+  library.
+
+  You can also give the optional parameter "WIDE=Y", to build the
+  library with wide-character (Unicode) support:
+
+        wmake -f Makefile.wcc WIDE=Y
+
+  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. This was originally provided to get around
+  poor support for UTF-8 in the Win32 console:
+
+        wmake -f Makefile.wcc WIDE=Y UTF8=Y
+
+  OS2GUI doesn't have the same limitations as the OS/2 console flavor,
+  but UTF-8 and non-UTF-8 versions are still available.  If nothing else,
+  this means that if you've built a OS/2 console PDCurses DLL with any
+  configuration,  you can build a matching OS2GUI DLL and swap between
+  console or GUI PDCurses just by swapping DLLs.
+
+  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.)
+
+Distribution Status
+-------------------
+
+The files in this directory are released to the Public Domain.
+
+Acknowledgements
+----------------
+
+Based heavily on the Win32 console flavor of PDCurses by Chris Szurgot
+<szurgot[at]itribe.net>,  ported to Win32 GUI by Bill Gray
+<pluto[at]projectpluto.com>.

data/vendor/PDCursesMod/os2gui/pdcclip.c

@@ -0,0 +1,165 @@
+/* PDCurses */
+
+#include "pdcwin.h"
+#include <stdlib.h>
+#include <string.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 responsibility 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  ncurses  NetBSD
+    PDC_getclipboard            -       -       -
+    PDC_setclipboard            -       -       -
+    PDC_freeclipboard           -       -       -
+    PDC_clearclipboard          -       -       -
+
+**man-end****************************************************************/
+
+int PDC_getclipboard(char **contents, long *length)
+{
+    HAB hab;
+    PTIB ptib;
+    PPIB ppib;
+    ULONG ulRet;
+    long len;
+    int rc;
+
+    PDC_LOG(("PDC_getclipboard() - called\n"));
+
+    DosGetInfoBlocks(&ptib, &ppib);
+    ppib->pib_ultype = 3;
+    hab = WinQueryAnchorBlock( PDC_hWnd);
+
+    if (!WinOpenClipbrd(hab))
+    {
+        return PDC_CLIP_ACCESS_ERROR;
+    }
+
+    rc = PDC_CLIP_EMPTY;
+
+    ulRet = WinQueryClipbrdData(hab, CF_TEXT);
+
+    if (ulRet)
+    {
+        len = strlen((char *)ulRet);
+        *contents = malloc(len + 1);
+
+        if (!*contents)
+            rc = PDC_CLIP_MEMORY_ERROR;
+        else
+        {
+            strcpy((char *)*contents, (char *)ulRet);
+            *length = len;
+            rc = PDC_CLIP_SUCCESS;
+        }
+    }
+
+    WinCloseClipbrd(hab);
+
+    return rc;
+}
+
+int PDC_setclipboard(const char *contents, long length)
+{
+    HAB hab;
+    PTIB ptib;
+    PPIB ppib;
+    ULONG ulRC;
+    char *szTextOut = NULL;
+    int rc;
+
+    PDC_LOG(("PDC_setclipboard() - called\n"));
+
+    DosGetInfoBlocks(&ptib, &ppib);
+    ppib->pib_ultype = 3;
+    hab = WinQueryAnchorBlock( PDC_hWnd);
+
+    if (!WinOpenClipbrd(hab))
+    {
+        return PDC_CLIP_ACCESS_ERROR;
+    }
+
+    rc = PDC_CLIP_MEMORY_ERROR;
+
+    ulRC = DosAllocSharedMem((PVOID)&szTextOut, NULL, length + 1,
+                             PAG_WRITE | PAG_COMMIT | OBJ_GIVEABLE);
+
+    if (ulRC == 0)
+    {
+        strcpy(szTextOut, contents);
+        WinEmptyClipbrd(hab);
+
+        if (WinSetClipbrdData(hab, (ULONG)szTextOut, CF_TEXT, CFI_POINTER))
+            rc = PDC_CLIP_SUCCESS;
+        else
+        {
+            DosFreeMem(szTextOut);
+            rc = PDC_CLIP_ACCESS_ERROR;
+        }
+    }
+
+    WinCloseClipbrd(hab);
+
+    return rc;
+}
+
+int PDC_freeclipboard(char *contents)
+{
+    PDC_LOG(("PDC_freeclipboard() - called\n"));
+
+    if (contents)
+        free(contents);
+
+    return PDC_CLIP_SUCCESS;
+}
+
+int PDC_clearclipboard(void)
+{
+    HAB hab;
+    PTIB ptib;
+    PPIB ppib;
+
+    PDC_LOG(("PDC_clearclipboard() - called\n"));
+
+    DosGetInfoBlocks(&ptib, &ppib);
+    ppib->pib_ultype = 3;
+    hab = WinQueryAnchorBlock( PDC_hWnd);
+
+    WinEmptyClipbrd(hab);
+
+    WinCloseClipbrd(hab);
+
+    return PDC_CLIP_SUCCESS;
+}