curses 1.3.2 → 1.4.3

data/vendor/PDCurses/wingui/pdcsetsc.c

@@ -0,0 +1,89 @@
+/* Public Domain Curses */
+
+#include "pdcwin.h"
+
+/*man-start**************************************************************
+
+  Name:                                                         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****************************************************************/
+
+                /* Note that the following is a line-for-line   */
+                /* copy of the SDL version of this function.    */
+int PDC_curs_set(int visibility)
+{
+    int ret_vis;
+
+    PDC_LOG(("PDC_curs_set() - called: visibility=%d\n", visibility));
+
+    ret_vis = SP->visibility;
+
+    SP->visibility = visibility;
+
+    PDC_gotoyx(SP->cursrow, SP->curscol);
+
+    return ret_vis;
+}
+
+void PDC_set_title(const char *title)
+{
+    extern HWND PDC_hWnd;
+#ifdef PDC_WIDE
+    wchar_t wtitle[512];
+#endif
+    PDC_LOG(("PDC_set_title() - called:<%s>\n", title));
+
+#ifdef PDC_WIDE
+    PDC_mbstowcs(wtitle, title, 511);
+    SetWindowTextW( PDC_hWnd, wtitle);
+#else
+    SetWindowTextA( PDC_hWnd, title);
+#endif
+}
+
+        /* If PDC_really_blinking is TRUE,  then text with the A_BLINK   */
+        /* attribute will actually blink.  Otherwise,  such text will    */
+        /* be shown with higher color intensity (the R, G, and B values  */
+        /* are averaged with pure white).  See pdcdisp.c for details of  */
+        /* how this is done.                                             */
+        /*     Unlike on other PDCurses platforms,  this doesn't require */
+        /* decreasing the number of colors by half.  Also,  the choice   */
+        /* indicated by 'blinkon' will actually be respected,  so OK is  */
+        /* always returned (most platforms don't actually support        */
+        /* blinking).                                                    */
+        /*      The default behavior is to not show A_BLINK text as      */
+        /* blinking,  i.e.,  PDC_really_blinking = FALSE.  Blinking text */
+        /* can be pretty annoying to some people.  You should probably   */
+        /* call PDC_set_blink( TRUE) only if there is something to which */
+        /* the user _must_ pay attention;  say,  "the nuclear reactor    */
+        /* is about to melt down".  Otherwise,  the bolder,  brighter    */
+        /* text should be attention-getting enough.                      */
+
+int PDC_really_blinking = FALSE;
+
+int PDC_set_blink(bool blinkon)
+{
+    PDC_really_blinking = blinkon;
+    return OK;
+}

data/vendor/PDCurses/wingui/pdcurses.rc

@@ -0,0 +1,28 @@
+#include "winver.h"
+
+1 VERSIONINFO
+ FILEVERSION 4,0,2,0
+ PRODUCTVERSION 4,0,2,0
+ FILEFLAGSMASK 0x3fL
+ FILEFLAGS 0x0L
+ FILEOS VOS_UNKNOWN
+ FILETYPE VFT_DLL
+ FILESUBTYPE 0x0L
+BEGIN
+    BLOCK "StringFileInfo"
+    BEGIN
+        BLOCK "040904b0"
+        BEGIN
+            VALUE "Maintainer", "William McBrine\0"
+            VALUE "FileDescription", "Public Domain Curses\0"
+            VALUE "FileVersion", "4.0.2\0"
+            VALUE "InternalName", "PDCurses\0"
+            VALUE "LegalCopyright", "Public Domain\0"
+            VALUE "OriginalFilename", "PDCURSES.DLL\0"
+            VALUE "ProductName", "Public Domain Curses Library\0"
+            VALUE "ProductVersion", "4.0.2\0"
+        END
+    END
+END
+
+1 ICON    DISCARDABLE     "PDCURSES.ico"

data/vendor/PDCurses/wingui/pdcutil.c

@@ -0,0 +1,61 @@
+/* Public Domain Curses */
+
+#include "pdcwin.h"
+
+void PDC_beep(void)
+{
+    PDC_LOG(("PDC_beep() - called\n"));
+
+/*  MessageBeep(MB_OK); */
+    MessageBeep(0XFFFFFFFF);
+}
+
+void PDC_napms(int ms)     /* 'ms' = milli,  _not_ microseconds! */
+{
+    /* RR: keep GUI window responsive while PDCurses sleeps */
+    MSG msg;
+    DWORD curr_ms = GetTickCount( );
+    const DWORD milliseconds_sleep_limit = ms + curr_ms;
+    extern bool PDC_bDone;
+
+    PDC_LOG(("PDC_napms() - called: ms=%d\n", ms));
+
+    /* Pump all pending messages from WIN32 to the window handler */
+    while( !PDC_bDone && curr_ms < milliseconds_sleep_limit )
+    {
+        const DWORD max_sleep_ms = 50;      /* check msgs 20 times/second */
+        DWORD sleep_millisecs;
+
+        while( PeekMessage(&msg, NULL, 0, 0, PM_REMOVE) )
+        {
+           TranslateMessage(&msg);
+           DispatchMessage(&msg);
+        }
+        curr_ms = GetTickCount( );
+        sleep_millisecs = milliseconds_sleep_limit - curr_ms;
+        if( sleep_millisecs > max_sleep_ms)
+            sleep_millisecs = max_sleep_ms;
+        Sleep( sleep_millisecs);
+        curr_ms += sleep_millisecs;
+    }
+}
+
+const char *PDC_sysname(void)
+{
+   return "WinGUI";
+}
+
+PDC_version_info PDC_version = { PDC_PORT_WINGUI,
+          PDC_VER_MAJOR, PDC_VER_MINOR, PDC_VER_CHANGE,
+          sizeof( chtype),
+#ifdef PDC_WIDE
+          TRUE,
+#else
+          FALSE,
+#endif
+#ifdef PDC_FORCE_UTF8
+          TRUE,
+#else
+          FALSE,
+#endif
+          };

data/vendor/PDCurses/wingui/pdcwin.h

@@ -0,0 +1,122 @@
+/* Public Domain Curses */
+
+/* $Id: pdcwin.h,v 1.6 2008/07/13 06:36:32 wmcbrine Exp $ */
+
+#ifdef PDC_WIDE
+# define UNICODE
+# define _UNICODE
+#endif
+
+#include <windows.h>
+
+#if defined( GS_8BIT_INDICES) && defined( PDC_WIDE)
+     /* We only need the 'fallback font' for the wide-char version, */
+     /* and it'll only work in Win2000 or later (earlier versions   */
+     /* lack the necessary GetFontUnicodeRanges() function.)  Comment */
+     /* out the following line if you're dealing with a really old  */
+     /* system,  or just don't want to use a fallback font.         */
+   #define USE_FALLBACK_FONT
+#endif
+
+/* Windows.h will #define MOUSE_MOVED to 0x1,  which is what the
+Windows API expects.  In Curses,  MOUSE_MOVED is a macro indicating
+whether the mouse has moved,  so we'd get a compiler warning that
+we're re-defining MOUSE_MOVED.  That warning may be a Good Thing in
+your software,  letting you know:  "Be careful;  in a Curses program,
+MOUSE_MOVED won't have the same meaning it does in a 'real' Windows
+program."
+
+   But in building WinGUI itself,  we're expecting the Curses
+meaning for MOUSE_MOVED,  and the compiler warning would just be
+a nuisance.  So we'll #undefine MOUSE_MOVED before getting to the
+Curses definition :                 */
+
+#undef MOUSE_MOVED
+#include <curspriv.h>
+
+extern int PDC_get_buffer_rows(void);
+
+/* The following probably ought to go into 'curses.h' at some point. */
+/* Or at least,  not be here;  this is a temporary place for them.   */
+
+/* WinGUI has some drastically extended cursor possibilities.  The
+following #defines can be used with curs_set().  For all other flavors
+of PDCurses,  only the invisible,  "normal",  and "intense" cursor
+states will be recognized.  In Win32,  caret,  half-block,  central
+block,  cross,  and outlined block cursors are available.
+
+   By default,  all such cursors will blink.  However,  in WinGUI,
+the input value to curs_set() is treated as a two-byte value,  with
+the cursor blinking between those two states.  For example,
+curs_set( 0x0102) would blink between a "normal" (underline) cursor and
+an "intense" (full-block) cursor.  One can see that this behavior is
+backward-compatible;  for example,  curs_set( 1) would blink between a
+"normal" underline cursor and an invisible cursor.  (But curs_set( 0x0101)
+would result in a non-blinking underline cursor.)  Note that one can use
+the PDC_CURSOR macro for this,  as in...
+
+   curs_set( PDC_CURSOR( PDC_CURSOR_OUTLINE, PDC_CURSOR_INTENSE));   */
+
+#define PDC_CURSOR_INVISIBLE                    0x00
+#define PDC_CURSOR_NORMAL                       0x01
+#define PDC_CURSOR_INTENSE                      0x02
+#define PDC_CURSOR_OUTLINE                      0x03
+#define PDC_CURSOR_CARET                        0x04
+#define PDC_CURSOR_HALF_BLOCK                   0x05
+#define PDC_CURSOR_CENTRAL_BLOCK                0x06
+#define PDC_CURSOR_CROSS                        0x07
+#define PDC_CURSOR_OUTLINE_BLOCK                0x08
+
+#define PDC_CURSOR( A, B) ((A)<<8 | (B))
+#define PDC_CURSOR_IS_BLINKING    \
+          ((SP->visibility >> 8) != (SP->visibility & 0xff))
+
+/* With 64-bit chtypes,  we're allowing 20 bits for the character
+(thus Unicode values up to 0xffffff) plus one bit to indicate the
+alternate character set.  With 32-bit chtypes,  we don't have so
+many bits to play with and limit ourselves to 16-bit characters
+(i.e.,  Unicode past 0xffff can't be shown),  plus that one bit
+for alternate chars.  With 16-bit chtypes,  there are only eight
+bits available to the character.  PDC_REAL_ATTR_SHIFT gives the
+number of low bits devoted to storing characters. */
+
+# if(CHTYPE_LONG >= 2)     /* 64-bit chtypes */
+    # define PDC_REAL_ATTR_SHIFT  21
+# else
+#ifdef CHTYPE_LONG         /* 32-bit chtypes */
+    # define PDC_REAL_ATTR_SHIFT  17
+#else                      /* 16-bit chtypes */
+    # define PDC_REAL_ATTR_SHIFT  8
+#endif
+#endif
+
+ /* The PDC_set_function_key() function 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.  For example, calling
+
+PDC_set_function_key( FUNCTION_KEY_SHUT_DOWN, ALT_Q);
+
+would reset the library so 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 (and perhaps ask "are you sure",  and/or
+"save changes or discard or cancel"),  rather than just having the
+window close (the default behavior).
+
+   Also,  by default,  Ctrl-V "pastes" the clipboard into the key queue,
+and Ctrl-Equals brings up the font selection dialog.  But one could
+call,  for example,
+
+PDC_set_function_key( FUNCTION_KEY_PASTE, CTL_Z);
+
+   to reset the "paste" key to be Ctrl-Z.  Or one could call
+
+PDC_set_function_key( FUNCTION_KEY_PASTE, 0);
+
+   to shut off that function.  (It would still be accessible from the menu.)
+
+   Thus far,  this is a WinGUI-flavor specific function.  But it could,  and
+in my opinion should,  be made available in the SDL and XCurses flavors too.
+
+   The return value is the key previously used for that function.
+*/