curses 1.2.6 → 1.4.0

data/vendor/PDCurses/dos/Makefile.wcc

@@ -0,0 +1,107 @@
+# Watcom WMAKE Makefile for PDCurses library - DOS (16 bit) or DOS/4GW Watcom C/C++ 10.6+
+#
+# Usage: wmake -f [path/]Makefile.wcc [DEBUG=Y] [MODEL=c|h|l|m|s|f]
+#        [CROSS=Y|N] [CHTYPE=[-DCHTYPE_16|-DCHTYPE_32]] [target]
+#
+# where target can be any of:
+# [all|demos|pdcurses.lib|testcurs.exe...]
+#
+# and MODEL specifies the memory model (16-bit compact/huge/large/medium/
+# small, or 32-bit flat)
+#
+# and CROSS=Y (CROSS=N) means to assume we are (are not) cross-compiling
+# (default is to auto-detect)
+#
+# and CHTYPE is an optional compiler flag to set the size of chtype (default
+# is 64 bits)
+
+# Change the memory MODEL here, if desired
+!ifndef MODEL
+MODEL		= l
+!endif
+
+!ifdef %PDCURSES_SRCDIR
+PDCURSES_SRCDIR	= $(%PDCURSES_SRCDIR)
+!else
+PDCURSES_SRCDIR	= ..
+!endif
+
+!include $(PDCURSES_SRCDIR)/version.mif
+
+!ifndef CROSS
+!ifeq %SHELL /bin/bash
+# assume we are cross-compiling
+CROSS		= Y
+!endif
+!ifeq %SHELL /bin/sh
+CROSS		= Y
+!endif
+!ifeq %SHELL /bin/csh
+CROSS		= Y
+!endif
+!ifeq %SHELL /bin/dash
+CROSS		= Y
+!endif
+!endif
+
+osdir		= $(PDCURSES_SRCDIR)/dos
+# Open Watcom README strongly recommends setting WATCOM environment variable...
+!ifeq CROSS Y
+!ifdef %WATCOM
+watcomdir	= $(%WATCOM)
+!else
+watcomdir	= "`which wcc | xargs realpath | xargs dirname`"/..
+!endif
+!endif
+
+!ifneq MODEL f
+CC		= wcc
+TARGET		= dos
+!else
+CC		= wcc386
+TARGET		= dos4g
+!endif
+
+CFLAGS		= -bt=$(TARGET) -zq -wx -m$(MODEL) -i=$(PDCURSES_SRCDIR)
+CFLAGS		+= $(CHTYPE)
+# the README also recommends setting INCLUDE; if absent, we need an extra -i=
+!ifndef %INCLUDE
+CFLAGS		+= -i=$(watcomdir)/h
+!endif
+
+!ifeq DEBUG Y
+CFLAGS  	+= -d2 -DPDCDEBUG
+LDFLAGS 	= D W A op q sys $(TARGET)
+!else
+CFLAGS  	+= -oneatx
+LDFLAGS		= op q sys $(TARGET)
+!ifeq CROSS Y
+!ifneq MODEL f
+LDFLAGS		+= libp $(watcomdir)/lib286/dos\;$(watcomdir)/lib286
+!else
+LDFLAGS		+= libp $(watcomdir)/lib386/dos\;$(watcomdir)/lib386
+!endif
+!endif
+!endif
+
+LIBEXE		= wlib -q -n -t
+
+!include $(PDCURSES_SRCDIR)/watcom.mif
+
+$(LIBCURSES) : $(LIBOBJS) $(PDCOBJS)
+	%write wccdos.lrf $(LIBOBJS) $(PDCOBJS)
+	$(LIBEXE) $@ @wccdos.lrf
+	-$(DEL) wccdos.lrf
+	-$(COPY) $(LIBCURSES) panel.lib
+
+!ifneq MODEL f
+PLATFORM1	= Watcom C++ 16-bit DOS
+PLATFORM2	= Open Watcom 1.6 for 16-bit DOS
+ARCNAME		= pdc$(VER)16w
+!else
+PLATFORM1	= Watcom C++ 32-bit DOS
+PLATFORM2	= Open Watcom 1.6 for 32-bit DOS
+ARCNAME		= pdc$(VER)32w
+!endif
+
+!include $(PDCURSES_SRCDIR)/makedist.mif

data/vendor/PDCurses/dos/README.md

@@ -0,0 +1,51 @@
+PDCurses for DOS
+================
+
+This directory contains PDCurses source code files specific to DOS.
+
+
+Building
+--------
+
+- Choose the appropriate makefile for your compiler:
+
+        Makefile     - DJGPP V2
+        Makefile.bcc - Borland C++ 3.0+
+        Makefile.wcc - Open Watcom 1.8+ (16-bit or 32-bit)
+        Makefile.dmc - Digital Mars
+        Makefile.msc - Microsoft C
+
+- For 16-bit compilers, you can change the memory MODEL in the makefile.
+  (Large model is the default, and recommended.)
+
+  (For Open Watcom, pass MODEL=f (flat model) to "wmake" in order to use
+  the 32-bit compiler. Selcting a 16-bit MODEL (e.g. MODEL=l) will
+  invoke the 16-bit compiler.)
+
+- 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 makefile
+
+  (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.
+
+
+Distribution Status
+-------------------
+
+The files in this directory are released to the Public Domain.
+
+
+Acknowledgements
+----------------
+
+Watcom C port was provided by Pieter Kunst <kunst@prl.philips.nl>
+
+DJGPP 1.x port was provided by David Nugent <davidn@csource.oz.au>

data/vendor/PDCurses/dos/bccdos.lrf

@@ -0,0 +1,9 @@
++addch.obj +addchstr.obj +addstr.obj +attr.obj +beep.obj +bkgd.obj &
++border.obj +clear.obj +color.obj +delch.obj +deleteln.obj +deprec.obj &
++getch.obj +getstr.obj +getyx.obj +inch.obj +inchstr.obj +initscr.obj &
++inopts.obj +insch.obj +insstr.obj +instr.obj +kernel.obj +keyname.obj &
++mouse.obj +move.obj +outopts.obj +overlay.obj +pad.obj +panel.obj &
++printw.obj +refresh.obj +scanw.obj +scr_dump.obj +scroll.obj +slk.obj &
++termattr.obj +terminfo.obj +touch.obj +util.obj +window.obj +debug.obj &
++pdcclip.obj +pdcdisp.obj +pdcgetsc.obj +pdckbd.obj +pdcscrn.obj &
++pdcsetsc.obj +pdcutil.obj ,lib.map

data/vendor/PDCurses/dos/mscdos.lrf

@@ -0,0 +1,50 @@
+-+addch.obj &
+-+addchstr.obj &
+-+addstr.obj &
+-+attr.obj &
+-+beep.obj &
+-+bkgd.obj &
+-+border.obj &
+-+clear.obj &
+-+color.obj &
+-+delch.obj &
+-+deleteln.obj &
+-+deprec.obj &
+-+getch.obj &
+-+getstr.obj &
+-+getyx.obj &
+-+inch.obj & 
+-+inchstr.obj &
+-+initscr.obj &
+-+inopts.obj &
+-+insch.obj &
+-+insstr.obj &
+-+instr.obj &
+-+kernel.obj &
+-+keyname.obj &
+-+mouse.obj &
+-+move.obj & 
+-+outopts.obj &
+-+overlay.obj &
+-+pad.obj &  
+-+panel.obj &
+-+printw.obj &
+-+refresh.obj &
+-+scanw.obj &
+-+scr_dump.obj &
+-+scroll.obj &
+-+slk.obj &  
+-+termattr.obj &
+-+terminfo.obj &
+-+touch.obj &
+-+util.obj & 
+-+window.obj &
+-+debug.obj &
+-+pdcclip.obj &
+-+pdcdisp.obj &
+-+pdcgetsc.obj &
+-+pdckbd.obj &
+-+pdcscrn.obj &
+-+pdcsetsc.obj &
+-+pdcutil.obj &
+,lib.map;

data/vendor/PDCurses/dos/pdcclip.c

@@ -0,0 +1,132 @@
+/* Public Domain Curses */
+
+#include "pdcdos.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****************************************************************/
+
+/* global clipboard contents, should be NULL if none set */
+
+static char *pdc_DOS_clipboard = NULL;
+
+int PDC_getclipboard(char **contents, long *length)
+{
+    int len;
+
+    PDC_LOG(("PDC_getclipboard() - called\n"));
+
+    if (!pdc_DOS_clipboard)
+        return PDC_CLIP_EMPTY;
+
+    len = strlen(pdc_DOS_clipboard);
+    if ((*contents = malloc(len + 1)) == NULL)
+        return PDC_CLIP_MEMORY_ERROR;
+
+    strcpy(*contents, pdc_DOS_clipboard);
+    *length = len;
+
+    return PDC_CLIP_SUCCESS;
+}
+
+int PDC_setclipboard(const char *contents, long length)
+{
+    PDC_LOG(("PDC_setclipboard() - called\n"));
+
+    if (pdc_DOS_clipboard)
+    {
+        free(pdc_DOS_clipboard);
+        pdc_DOS_clipboard = NULL;
+    }
+
+    if (contents)
+    {
+        if ((pdc_DOS_clipboard = malloc(length + 1)) == NULL)
+            return PDC_CLIP_MEMORY_ERROR;
+
+        strcpy(pdc_DOS_clipboard, contents);
+    }
+
+    return PDC_CLIP_SUCCESS;
+}
+
+int PDC_freeclipboard(char *contents)
+{
+    PDC_LOG(("PDC_freeclipboard() - called\n"));
+
+    /* should we also free empty the system clipboard? probably not */
+
+    if (contents)
+    {
+
+        /* NOTE: We free the memory, but we can not set caller's pointer 
+           to NULL, so if caller calls again then will try to access 
+           free'd memory.  We 1st overwrite memory with a string so if 
+           caller tries to use free memory they won't get what they 
+           expect & hopefully notice. */
+
+        /* memset(contents, 0xFD, strlen(contents)); */
+
+        if (strlen(contents) >= strlen("PDCURSES"))
+            strcpy(contents, "PDCURSES");
+
+        free(contents);
+    }
+
+    return PDC_CLIP_SUCCESS;
+}
+
+int PDC_clearclipboard(void)
+{
+    PDC_LOG(("PDC_clearclipboard() - called\n"));
+
+    if (pdc_DOS_clipboard) 
+    {
+        free(pdc_DOS_clipboard);
+        pdc_DOS_clipboard = NULL;
+    }
+
+    return PDC_CLIP_SUCCESS;
+}

data/vendor/PDCurses/dos/pdcdisp.c

@@ -0,0 +1,135 @@
+/* Public Domain Curses */
+
+#include "pdcdos.h"
+
+/* ACS definitions originally by jshumate@wrdis01.robins.af.mil -- these
+   match code page 437 and compatible pages (CP850, CP852, etc.) */
+
+#ifdef CHTYPE_LONG
+   #define USE_UNICODE_ACS_CHARS 0
+   #include "acs_defs.h"
+#endif
+
+#ifdef __PACIFIC__
+void movedata(unsigned sseg, unsigned soff, unsigned dseg,
+              unsigned doff, unsigned n)
+{
+    far char *src = MK_FP(sseg, soff);
+    far char *dst = MK_FP(dseg, doff);
+
+    while (n--)
+        *dst++ = *src++;
+}
+#endif
+
+/* position hardware cursor at (y, x) */
+
+void PDC_gotoyx(int row, int col)
+{
+    PDCREGS regs;
+
+    PDC_LOG(("PDC_gotoyx() - called: row %d col %d\n", row, col));
+
+    regs.h.ah = 0x02;
+    regs.h.bh = 0;
+    regs.h.dh = (unsigned char) row;
+    regs.h.dl = (unsigned char) col;
+    PDCINT(0x10, regs);
+}
+
+/* update the given physical line to look like the corresponding line in
+   curscr */
+
+/* NOTE:  the original indexing into pdc_atrtab[] relied on three or five
+   attribute bits in 'chtype' being adjacent to the color bits.  Such is
+   not the case for 64-bit chtypes (CHTYPE_LONG == 2),  so we have to do
+   additional bit-fiddling for that situation.  Code is similar in Win32
+   and DOS flavors.  (BJG) */
+
+void PDC_transform_line(int lineno, int x, int len, const chtype *srcp)
+{
+    int j;
+
+    PDC_LOG(("PDC_transform_line() - called: line %d\n", lineno));
+
+    if (pdc_direct_video)
+    {
+#if SMALL || MEDIUM
+# ifndef __PACIFIC__
+        struct SREGS segregs;
+# endif
+        int ds;
+#endif
+        /* this should be enough for the maximum width of a screen */
+
+        struct {unsigned char text, attr;} temp_line[256];
+
+        /* replace the attribute part of the chtype with the actual
+           color value for each chtype in the line */
+
+        for (j = 0; j < len; j++)
+        {
+            chtype ch = srcp[j];
+
+#if defined( CHTYPE_LONG) && (CHTYPE_LONG >= 2)
+            temp_line[j].attr = pdc_atrtab[((ch >> PDC_ATTR_SHIFT) & 0x1f)
+                     | (((ch >> PDC_COLOR_SHIFT) & 0xff) << 5)];
+#else
+            temp_line[j].attr = pdc_atrtab[ch >> PDC_ATTR_SHIFT];
+#endif
+
+#ifdef CHTYPE_LONG
+            if (ch & A_ALTCHARSET && !(ch & 0xff80))
+                ch = acs_map[ch & 0x7f];
+#endif
+            temp_line[j].text = ch & 0xff;
+        }
+
+#ifdef __DJGPP__
+        dosmemput(temp_line, len * 2,
+                  (unsigned long)_FAR_POINTER(pdc_video_seg,
+                  pdc_video_ofs + (lineno * curscr->_maxx + x) * 2));
+#else
+# if SMALL || MEDIUM
+#  ifdef __PACIFIC__
+        ds = FP_SEG((void far *) temp_line);
+#  else
+        segread(&segregs);
+        ds = segregs.ds;
+#  endif
+        movedata(ds, (int)temp_line, pdc_video_seg,
+                 pdc_video_ofs + (lineno * curscr->_maxx + x) * 2, len * 2);
+# else
+        memcpy((void *)_FAR_POINTER(pdc_video_seg,
+               pdc_video_ofs + (lineno * curscr->_maxx + x) * 2),
+               temp_line, len * 2);
+# endif
+#endif
+
+    }
+    else
+        for (j = 0; j < len;)
+        {
+            PDCREGS regs;
+            unsigned short count = 1;
+            chtype ch = srcp[j];
+
+            while ((j + count < len) && (ch == srcp[j + count]))
+                count++;
+
+            PDC_gotoyx(lineno, j + x);
+
+            regs.h.ah = 0x09;
+            regs.W.bx = pdc_atrtab[ch >> PDC_ATTR_SHIFT];
+            regs.W.cx = count;
+#ifdef CHTYPE_LONG
+            if (ch & A_ALTCHARSET && !(ch & 0xff80))
+                ch = acs_map[ch & 0x7f];
+#endif
+            regs.h.al = (unsigned char) (ch & 0xff);
+
+            PDCINT(0x10, regs);
+
+            j += count;
+        }
+}