mars_nwe/mars-flaim
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
9ca6ef1b890f01e7cb6c3bf2cc43eb6a95c19010
mars-flaim/flaim/util/ftx.cpp
dsandersoremutah c55dab446f Renamed version4 to flaim and version5 to xflaim 
git-svn-id: https://svn.code.sf.net/p/flaim/code/trunk@7 0109f412-320b-0410-ab79-c3e0c5ffbbe6
2006-01-27 21:06:39 +00:00

6407 lines
138 KiB
C++
Raw Blame History

//-------------------------------------------------------------------------
// Desc: Cross-platform text user interface APIs - windowing.
// Tabs: 3
//
// Copyright (c) 1996-2006 Novell, Inc. All Rights Reserved.
//
// This program is free software; you can redistribute it and/or
// modify it under the terms of version 2 of the GNU General Public
// License as published by the Free Software Foundation.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, contact Novell, Inc.
//
// To contact Novell about this file by physical or electronic mail,
// you may find current contact information at www.novell.com
//
// $Id: ftx.cpp 12345 2006-01-25 14:06:06 -0700 (Wed, 25 Jan 2006) dsanders $
//-------------------------------------------------------------------------
#if defined( _WIN32) && !defined( _WIN64)
#pragma pack( push, enter_windows, 8)
/*
This pragma is needed because FLAIM may be built with a
packing other than 8-bytes on Win32 (such as 1-byte packing).
Code in this file uses windows structures and system calls
that MUST use 8-byte packing (the packing used by the O/S).
See Microsoft technical article Q117388.
*/
#endif
#if defined( _WIN32)
#define WIN32_LEAN_AND_MEAN
#define WIN32_EXTRA_LEAN
#include <windows.h>
#endif
#if defined( _WIN32) && !defined( _WIN64)
#pragma pack( pop, enter_windows)
#endif
#include "ftx.h"
#if defined( FLM_WIN)
#include <string.h>
typedef struct
{
unsigned char LeadChar;
unsigned char SecondChar;
} ftxWinCharPair;
typedef struct
{
unsigned short ScanCode;
ftxWinCharPair RegChars;
ftxWinCharPair ShiftChars;
ftxWinCharPair CtrlChars;
ftxWinCharPair AltChars;
} ftxWinEnhKeyVals;
typedef struct
{
ftxWinCharPair RegChars;
ftxWinCharPair ShiftChars;
ftxWinCharPair CtrlChars;
ftxWinCharPair AltChars;
} ftxWinNormKeyVals;
/*
* Table of key values for enhanced keys
*/
static ftxWinEnhKeyVals ftxWinEnhancedKeys[] = {
{ 28, { 13, 0 }, { 13, 0 }, { 10, 0 }, { 0, 166 } },
{ 53, { 47, 0 }, { 63, 0 }, { 0, 149 }, { 0, 164 } },
{ 71, { 224, 71 }, { 224, 71 }, { 224, 119 }, { 0, 151 } },
{ 72, { 224, 72 }, { 224, 72 }, { 224, 141 }, { 0, 152 } },
{ 73, { 224, 73 }, { 224, 73 }, { 224, 134 }, { 0, 153 } },
{ 75, { 224, 75 }, { 224, 75 }, { 224, 115 }, { 0, 155 } },
{ 77, { 224, 77 }, { 224, 77 }, { 224, 116 }, { 0, 157 } },
{ 79, { 224, 79 }, { 224, 79 }, { 224, 117 }, { 0, 159 } },
{ 80, { 224, 80 }, { 224, 80 }, { 224, 145 }, { 0, 160 } },
{ 81, { 224, 81 }, { 224, 81 }, { 224, 118 }, { 0, 161 } },
{ 82, { 224, 82 }, { 224, 82 }, { 224, 146 }, { 0, 162 } },
{ 83, { 224, 83 }, { 224, 83 }, { 224, 147 }, { 0, 163 } }
};
/*
* macro for the number of elements of in EnhancedKeys[]
*/
#define FTX_WIN_NUM_EKA_ELTS (sizeof( ftxWinEnhancedKeys) / sizeof( ftxWinEnhKeyVals))
/*
* Table of key values for normal keys. Note that the table is padded so
* that the key scan code serves as an index into the table.
*/
static ftxWinNormKeyVals ftxWinNormalKeys[] = {
/* padding */
{ /* 0 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 1 */ { 27, 0 }, { 27, 0 }, { 27, 0 }, { 0, 1 } },
{ /* 2 */ { 49, 0 }, { 33, 0 }, { 0, 0 }, { 0, 120 } },
{ /* 3 */ { 50, 0 }, { 64, 0 }, { 0, 3 }, { 0, 121 } },
{ /* 4 */ { 51, 0 }, { 35, 0 }, { 0, 0 }, { 0, 122 } },
{ /* 5 */ { 52, 0 }, { 36, 0 }, { 0, 0 }, { 0, 123 } },
{ /* 6 */ { 53, 0 }, { 37, 0 }, { 0, 0 }, { 0, 124 } },
{ /* 7 */ { 54, 0 }, { 94, 0 }, { 30, 0 }, { 0, 125 } },
{ /* 8 */ { 55, 0 }, { 38, 0 }, { 0, 0 }, { 0, 126 } },
{ /* 9 */ { 56, 0 }, { 42, 0 }, { 0, 0 }, { 0, 127 } },
{ /* 10 */ { 57, 0 }, { 40, 0 }, { 0, 0 }, { 0, 128 } },
{ /* 11 */ { 48, 0 }, { 41, 0 }, { 0, 0 }, { 0, 129 } },
{ /* 12 */ { 45, 0 }, { 95, 0 }, { 31, 0 }, { 0, 130 } },
{ /* 13 */ { 61, 0 }, { 43, 0 }, { 0, 0 }, { 0, 131 } },
{ /* 14 */ { 8, 0 }, { 8, 0 }, { 127, 0 }, { 0, 14 } },
{ /* 15 */ { 9, 0 }, { 0, 15 }, { 0, 148 }, { 0, 15 } },
{ /* 16 */ { 113, 0 }, { 81, 0 }, { 17, 0 }, { 0, 16 } },
{ /* 17 */ { 119, 0 }, { 87, 0 }, { 23, 0 }, { 0, 17 } },
{ /* 18 */ { 101, 0 }, { 69, 0 }, { 5, 0 }, { 0, 18 } },
{ /* 19 */ { 114, 0 }, { 82, 0 }, { 18, 0 }, { 0, 19 } },
{ /* 20 */ { 116, 0 }, { 84, 0 }, { 20, 0 }, { 0, 20 } },
{ /* 21 */ { 121, 0 }, { 89, 0 }, { 25, 0 }, { 0, 21 } },
{ /* 22 */ { 117, 0 }, { 85, 0 }, { 21, 0 }, { 0, 22 } },
{ /* 23 */ { 105, 0 }, { 73, 0 }, { 9, 0 }, { 0, 23 } },
{ /* 24 */ { 111, 0 }, { 79, 0 }, { 15, 0 }, { 0, 24 } },
{ /* 25 */ { 112, 0 }, { 80, 0 }, { 16, 0 }, { 0, 25 } },
{ /* 26 */ { 91, 0 }, { 123, 0 }, { 27, 0 }, { 0, 26 } },
{ /* 27 */ { 93, 0 }, { 125, 0 }, { 29, 0 }, { 0, 27 } },
{ /* 28 */ { 13, 0 }, { 13, 0 }, { 10, 0 }, { 0, 28 } },
/* padding */
{ /* 29 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 30 */ { 97, 0 }, { 65, 0 }, { 1, 0 }, { 0, 30 } },
{ /* 31 */ { 115, 0 }, { 83, 0 }, { 19, 0 }, { 0, 31 } },
{ /* 32 */ { 100, 0 }, { 68, 0 }, { 4, 0 }, { 0, 32 } },
{ /* 33 */ { 102, 0 }, { 70, 0 }, { 6, 0 }, { 0, 33 } },
{ /* 34 */ { 103, 0 }, { 71, 0 }, { 7, 0 }, { 0, 34 } },
{ /* 35 */ { 104, 0 }, { 72, 0 }, { 8, 0 }, { 0, 35 } },
{ /* 36 */ { 106, 0 }, { 74, 0 }, { 10, 0 }, { 0, 36 } },
{ /* 37 */ { 107, 0 }, { 75, 0 }, { 11, 0 }, { 0, 37 } },
{ /* 38 */ { 108, 0 }, { 76, 0 }, { 12, 0 }, { 0, 38 } },
{ /* 39 */ { 59, 0 }, { 58, 0 }, { 0, 0 }, { 0, 39 } },
{ /* 40 */ { 39, 0 }, { 34, 0 }, { 0, 0 }, { 0, 40 } },
{ /* 41 */ { 96, 0 }, { 126, 0 }, { 0, 0 }, { 0, 41 } },
/* padding */
{ /* 42 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 43 */ { 92, 0 }, { 124, 0 }, { 28, 0 }, { 0, 0 } },
{ /* 44 */ { 122, 0 }, { 90, 0 }, { 26, 0 }, { 0, 44 } },
{ /* 45 */ { 120, 0 }, { 88, 0 }, { 24, 0 }, { 0, 45 } },
{ /* 46 */ { 99, 0 }, { 67, 0 }, { 3, 0 }, { 0, 46 } },
{ /* 47 */ { 118, 0 }, { 86, 0 }, { 22, 0 }, { 0, 47 } },
{ /* 48 */ { 98, 0 }, { 66, 0 }, { 2, 0 }, { 0, 48 } },
{ /* 49 */ { 110, 0 }, { 78, 0 }, { 14, 0 }, { 0, 49 } },
{ /* 50 */ { 109, 0 }, { 77, 0 }, { 13, 0 }, { 0, 50 } },
{ /* 51 */ { 44, 0 }, { 60, 0 }, { 0, 0 }, { 0, 51 } },
{ /* 52 */ { 46, 0 }, { 62, 0 }, { 0, 0 }, { 0, 52 } },
{ /* 53 */ { 47, 0 }, { 63, 0 }, { 0, 0 }, { 0, 53 } },
/* padding */
{ /* 54 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 55 */ { 42, 0 }, { 0, 0 }, { 114, 0 }, { 0, 0 } },
/* padding */
{ /* 56 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 57 */ { 32, 0 }, { 32, 0 }, { 32, 0 }, { 32, 0 } },
/* padding */
{ /* 58 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 59 */ { 0, 59 }, { 0, 84 }, { 0, 94 }, { 0, 104 } },
{ /* 60 */ { 0, 60 }, { 0, 85 }, { 0, 95 }, { 0, 105 } },
{ /* 61 */ { 0, 61 }, { 0, 86 }, { 0, 96 }, { 0, 106 } },
{ /* 62 */ { 0, 62 }, { 0, 87 }, { 0, 97 }, { 0, 107 } },
{ /* 63 */ { 0, 63 }, { 0, 88 }, { 0, 98 }, { 0, 108 } },
{ /* 64 */ { 0, 64 }, { 0, 89 }, { 0, 99 }, { 0, 109 } },
{ /* 65 */ { 0, 65 }, { 0, 90 }, { 0, 100 }, { 0, 110 } },
{ /* 66 */ { 0, 66 }, { 0, 91 }, { 0, 101 }, { 0, 111 } },
{ /* 67 */ { 0, 67 }, { 0, 92 }, { 0, 102 }, { 0, 112 } },
{ /* 68 */ { 0, 68 }, { 0, 93 }, { 0, 103 }, { 0, 113 } },
/* padding */
{ /* 69 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 70 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 71 */ { 0, 71 }, { 55, 0 }, { 0, 119 }, { 0, 0 } },
{ /* 72 */ { 0, 72 }, { 56, 0 }, { 0, 141 }, { 0, 0 } },
{ /* 73 */ { 0, 73 }, { 57, 0 }, { 0, 132 }, { 0, 0 } },
{ /* 74 */ { 0, 0 }, { 45, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 75 */ { 0, 75 }, { 52, 0 }, { 0, 115 }, { 0, 0 } },
{ /* 76 */ { 0, 0 }, { 53, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 77 */ { 0, 77 }, { 54, 0 }, { 0, 116 }, { 0, 0 } },
{ /* 78 */ { 0, 0 }, { 43, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 79 */ { 0, 79 }, { 49, 0 }, { 0, 117 }, { 0, 0 } },
{ /* 80 */ { 0, 80 }, { 50, 0 }, { 0, 145 }, { 0, 0 } },
{ /* 81 */ { 0, 81 }, { 51, 0 }, { 0, 118 }, { 0, 0 } },
{ /* 82 */ { 0, 82 }, { 48, 0 }, { 0, 146 }, { 0, 0 } },
{ /* 83 */ { 0, 83 }, { 46, 0 }, { 0, 147 }, { 0, 0 } },
/* padding */
{ /* 84 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 85 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 86 */ { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } },
{ /* 87 */ { 224, 133 }, { 224, 135 }, { 224, 137 }, { 224, 139 } },
{ /* 88 */ { 224, 134 }, { 224, 136 }, { 224, 138 }, { 224, 140 } }
};
static HANDLE gv_hStdOut;
static HANDLE gv_hStdIn;
static FLMBOOL gv_bAllocatedConsole = FALSE;
static CONSOLE_SCREEN_BUFFER_INFO gv_ConsoleScreenBufferInfo;
FSTATIC FLMUINT
ftxWinKBGetChar();
FSTATIC ftxWinCharPair *
ftxWinGetExtendedKeycode(
KEY_EVENT_RECORD * pKE);
static int chbuf = EOF;
#elif defined( FLM_UNIX)
#include "ftxunix.h"
#endif
static FLMBOOL gv_bInitialized = FALSE;
static FLMBOOL gv_bDisplayInitialized = FALSE;
static FLMUINT gv_uiInitCount = 0;
static FTX_INFO_p gv_pFtxInfo = NULL;
#if defined( FLM_WIN)
FSTATIC FTXRCODE
ftxWinRefresh(
FTX_INFO_p pFtxInfo);
#elif defined( FLM_NLM)
extern "C"
{
#ifndef ScreenSignature
#define ScreenSignature 0x4E524353 /* 'NRCS' */
#endif
int OpenScreen(
void * pvScreenName,
void * pvResourceTag,
void ** pvScreenHandle);
void CloseScreen(
void * pvScreenHandle);
void ActivateScreen(
void * pvScreenHandle);
void ClearScreen(
void * pvScreenHandle);
void GetScreenSize(
WORD * swScreenHeight,
WORD * swScreenWidth);
void PositionInputCursor(
void * pvScreenHandle,
WORD swRow,
WORD swColumn);
void EnableInputCursor(
void * pvScreenHandle);
void DisableInputCursor(
void * pvScreenHandle);
LONG PositionOutputCursor(
void * pvScreenHandle,
WORD swRow,
WORD swColumn);
void GetKey(
void * pvScreenHandle,
BYTE * pucKeyType,
BYTE * pucKeyValue,
BYTE * pucKeyStatus,
BYTE * pucScanCode,
LONG sdLinesToProtect);
LONG UngetKey(
struct ScreenStruct *screenID,
BYTE keyType,
BYTE keyValue,
BYTE keyStatus,
BYTE scanCode);
LONG CheckKeyStatus(
void * pvScreenHandle);
LONG DisplayScreenTextWithAttribute(
void * pvScreenHandleD,
LONG sdLine,
LONG sdColumn,
LONG sdLength,
BYTE ucLineAttribute,
BYTE * pszText);
void SetCursorStyle(
void * pvScreenHandle,
WORD swNewCursorStyle);
} // extern "C"
FSTATIC FTXRCODE
ftxNLMRefresh(
FTX_INFO_p pFtxInfo);
#else
FSTATIC FTXRCODE ftxRefresh(
FTX_INFO_p pFtxInfo);
#endif
FSTATIC FTXRCODE ftxSyncImage(
FTX_INFO_p pFtxInfo);
FSTATIC FTXRCODE ftxWinReset(
FTX_WINDOW_p pWindow);
FSTATIC FTXRCODE ftxCursorUpdate(
FTX_INFO_p pFtxInfo);
FSTATIC FTXRCODE ftxWinPrintChar(
FTX_WINDOW_p pWindow,
FLMUINT uiChar);
FSTATIC void ftxLock(
F_MUTEX * phMutex);
FSTATIC void ftxUnlock(
F_MUTEX * phMutex);
FSTATIC FTXRCODE ftxKeyboardFlush(
FTX_INFO_p pFtxInfo);
FSTATIC FTXRCODE ftxWinClearLine(
FTX_WINDOW_p pWindow,
FLMUINT uiCol,
FLMUINT uiRow);
FSTATIC FTXRCODE ftxWinClose(
FTX_WINDOW_p pWindow);
FSTATIC FTXRCODE ftxWinFree(
FTX_WINDOW_p pWindow);
FSTATIC FTXRCODE ftxWinOpen(
FTX_WINDOW_p pWindow);
FSTATIC FTXRCODE ftxScreenFree(
FTX_SCREEN_p pScreen);
FSTATIC FTXRCODE ftxWinSetCursorPos(
FTX_WINDOW_p pWindow,
FLMUINT uiCol,
FLMUINT uiRow);
FSTATIC FTXRCODE ftxDisplayInit(
FTX_INFO_p pFtxInfo,
FLMUINT uiRows,
FLMUINT uiCols,
const char * pucTitle);
FSTATIC void ftxDisplayReset(
FTX_INFO_p pFtxInfo);
FSTATIC void ftxDisplayGetSize(
FLMUINT * puiNumColsRV,
FLMUINT * puiNumRowsRV);
FSTATIC FLMBOOL ftxDisplaySetCursorType(
FTX_INFO_p pFtxInfo,
FLMUINT uiType);
FSTATIC void ftxDisplayExit( void);
FSTATIC void ftxDisplaySetCursorPos(
FTX_INFO_p pFtxInfo,
FLMUINT uiCol,
FLMUINT uiRow);
FSTATIC void ftxDisplaySetBackFore(
FLMUINT uiBackground,
FLMUINT uiForeground);
RCODE _ftxBackgroundThread(
F_Thread * pThread);
#if defined( FLM_UNIX)
FSTATIC FLMUINT ftxDisplayStrOut(
const char * pucString,
FLMUINT uiAttribute);
#endif
/* widthAndPrecisionFlags */
#define MINUS_FLAG 0x0001
#define PLUS_FLAG 0x0002
#define SPACE_FLAG 0x0004
#define POUND_FLAG 0x0008
#define ZERO_FLAG 0x0010
#define SHORT_FLAG 0x0020
#define LONG_FLAG 0x0040
#define DOUBLE_FLAG 0x0080
typedef int (*FORMHAND)(
int formChar,
unsigned width,
unsigned precision,
int widthAndPrecisionFlags,
void * passThru,
f_va_list * args);
typedef struct FORMATTERTABLE
{
FORMHAND formatTextHandler, percentHandler;
FORMHAND lowerCaseHandlers[26], upperCaseHandlers[26];
} FORMATTERTABLE;
typedef struct SPRINTF_INFO
{
char * szDestStr;
size_t iMaxLen;
} SPRINTF_INFO;
FSTATIC int FTXProcessFormatStringText(
FORMATTERTABLE * former,
unsigned len,
void * passThru, ...);
FSTATIC void FTXProcessFieldInfo(
const char ** format,
unsigned * width,
unsigned * precision,
int * flags,
f_va_list * args);
int FTXParsePrintfArgs(
FORMATTERTABLE * former,
const char * fmt,
f_va_list * args,
void * passThru);
FSTATIC unsigned FTXPrintNumber(
FLMUINT number,
unsigned base,
char * buffer);
FSTATIC int FTXFormSprintfNumber(
int formChar,
unsigned width,
unsigned precision,
int flags,
void * passThru,
f_va_list * args);
FSTATIC int FTXFormSprintfChar(
int iFormChar,
unsigned uiWidth,
unsigned uiPrecision,
int iFlags,
void * passThru,
f_va_list * args);
int FTXFormSprintfString(
int formChar,
unsigned width,
unsigned precision,
int flags,
void * passThru,
f_va_list * args);
FSTATIC int FTXFormSprintfNotHandled(
int formChar,
unsigned width,
unsigned precision,
int flags,
void * passThru,
f_va_list * args);
static FORMATTERTABLE SPrintFFormatters =
{
FTXFormSprintfString, FTXFormSprintfChar,
{
/* a */ FTXFormSprintfNotHandled,
/* b */ FTXFormSprintfNotHandled,
/* c */ FTXFormSprintfChar,
/* d */ FTXFormSprintfNumber,
/* e */ FTXFormSprintfNotHandled,
/* f */ FTXFormSprintfNotHandled,
/* g */ FTXFormSprintfNotHandled,
/* h */ FTXFormSprintfNotHandled,
/* i */ FTXFormSprintfNotHandled,
/* j */ FTXFormSprintfNotHandled,
/* k */ FTXFormSprintfNotHandled,
/* l */ FTXFormSprintfNotHandled,
/* m */ FTXFormSprintfNotHandled,
/* n */ FTXFormSprintfNotHandled,
/* o */ FTXFormSprintfNumber,
/* p */ FTXFormSprintfNotHandled,
/* q */ FTXFormSprintfNotHandled,
/* r */ FTXFormSprintfNotHandled,
/* s */ FTXFormSprintfString,
/* t */ FTXFormSprintfNotHandled,
/* u */ FTXFormSprintfNumber,
/* v */ FTXFormSprintfNotHandled,
/* w */ FTXFormSprintfNotHandled,
/* x */ FTXFormSprintfNumber,
/* y */ FTXFormSprintfNotHandled,
/* z */ FTXFormSprintfNotHandled,
},
{
/* A */ FTXFormSprintfNotHandled,
/* B */ FTXFormSprintfNotHandled,
/* C */ FTXFormSprintfNotHandled,
/* D */ FTXFormSprintfNotHandled,
/* E */ FTXFormSprintfNotHandled,
/* F */ FTXFormSprintfNotHandled,
/* G */ FTXFormSprintfNotHandled,
/* H */ FTXFormSprintfNotHandled,
/* I */ FTXFormSprintfNotHandled,
/* J */ FTXFormSprintfNotHandled,
/* K */ FTXFormSprintfNotHandled,
/* L */ FTXFormSprintfNotHandled,
/* M */ FTXFormSprintfNotHandled,
/* N */ FTXFormSprintfNotHandled,
/* O */ FTXFormSprintfNotHandled,
/* P */ FTXFormSprintfNotHandled,
/* Q */ FTXFormSprintfNotHandled,
/* R */ FTXFormSprintfNotHandled,
/* S */ FTXFormSprintfNotHandled,
/* T */ FTXFormSprintfNotHandled,
/* U */ FTXFormSprintfString,
/* V */ FTXFormSprintfNotHandled,
/* W */ FTXFormSprintfNotHandled,
/* X */ FTXFormSprintfNumber,
/* Y */ FTXFormSprintfNotHandled,
/* Z */ FTXFormSprintfNotHandled,
}
};
/* Scan Code Conversion Tables */
#if defined( FLM_WIN) || defined( FLM_NLM)
static FLMUINT ScanCodeToWPK[] = {
0, 0, 0, 0, /* 00..03 */
0, 0, 0, 0, /* 04 */
0, 0, 0, 0, /* 08 */
0, 0, 0, WPK_STAB, /* 0C */
WPK_ALT_Q, WPK_ALT_W, WPK_ALT_E, WPK_ALT_R, /* 10 */
WPK_ALT_T, WPK_ALT_Y, WPK_ALT_U, WPK_ALT_I, /* 14 */
WPK_ALT_O, WPK_ALT_P, 0, 0, /* 18 */
0, 0, WPK_ALT_A, WPK_ALT_S, /* 1C */
WPK_ALT_D, WPK_ALT_F, WPK_ALT_G, WPK_ALT_H, /* 20 */
WPK_ALT_J, WPK_ALT_K, WPK_ALT_L, 0, /* 24 */
0, 0, 0, 0, /* 28 */
WPK_ALT_Z, WPK_ALT_X, WPK_ALT_C, WPK_ALT_V, /* 2C */
WPK_ALT_B, WPK_ALT_N, WPK_ALT_M, 0, /* 30 */
0, 0, 0, 0, /* 34 */
0, 0, 0, WPK_F1, /* 38 */
WPK_F2, WPK_F3, WPK_F4, WPK_F5, /* 3C */
WPK_F6, WPK_F7, WPK_F8, WPK_F9, /* 40 */
/* F8 MAY BE BAD*/
WPK_F10, WPK_F11, WPK_F12, WPK_HOME, /* 44 */
WPK_UP, WPK_PGUP, 0, WPK_LEFT, /* 48 */
0, WPK_RIGHT, 0, WPK_END, /* 4C */
WPK_DOWN, WPK_PGDN, WPK_INSERT, WPK_DELETE, /* 50 */
WPK_SF1, WPK_SF2, WPK_SF3, WPK_SF4, /* 54 */
WPK_SF5, WPK_SF6, WPK_SF7, WPK_SF8, /* 58 */
WPK_SF9, WPK_SF10, WPK_CTRL_F1, WPK_CTRL_F2, /* 5C */
WPK_CTRL_F3, WPK_CTRL_F4, WPK_CTRL_F5, WPK_CTRL_F6, /* 60 */
WPK_CTRL_F7, WPK_CTRL_F8, WPK_CTRL_F9, WPK_CTRL_F10, /* 64 */
WPK_ALT_F1, WPK_ALT_F2, WPK_ALT_F3, WPK_ALT_F4, /* 68 */
WPK_ALT_F5, WPK_ALT_F6, WPK_ALT_F7, WPK_ALT_F8, /* 6C */
WPK_ALT_F9, WPK_ALT_F10, 0, WPK_CTRL_LEFT, /* 70 */
WPK_CTRL_RIGHT,WPK_CTRL_END, WPK_CTRL_PGDN, WPK_CTRL_HOME, /* 74 */
WPK_CTRL_1, WPK_CTRL_2, WPK_CTRL_3, WPK_CTRL_4, /* 78 */
WPK_CTRL_5, WPK_CTRL_6, WPK_CTRL_7, WPK_CTRL_8, /* 7C */
WPK_CTRL_9, WPK_CTRL_0, WPK_CTRL_MINUS,WPK_CTRL_EQUAL,/* 80 */
WPK_CTRL_PGUP, 0, 0, 0, /* 84 */
0, 0, 0, 0, /* 88 */
0, WPK_CTRL_UP, 0, 0, /* 8C */
0, WPK_CTRL_DOWN, 0, 0 /* 90 */
};
#endif
#ifdef FLM_NLM
void * g_pvScreenTag;
#endif
/****************************************************************************
Desc: Initializes the FTX environment.
****************************************************************************/
FTXRCODE
FTXInit(
const char * pucAppName,
FLMUINT uiCols,
FLMUINT uiRows,
FLMUINT uiBackground,
FLMUINT uiForeground,
KEY_HANDLER_p pKeyHandler,
void * pvKeyHandlerData,
FTX_INFO_pp ppFtxInfo
)
{
FTX_INFO_p pFtxInfo;
FTXRCODE rc = FTXRC_SUCCESS;
*ppFtxInfo = NULL;
if( gv_bInitialized)
{
gv_uiInitCount++;
*ppFtxInfo = gv_pFtxInfo;
goto Exit;
}
if( RC_BAD( f_calloc( sizeof( FTX_INFO), &pFtxInfo)))
{
rc = FTXRC_MEM;
goto Exit;
}
gv_pFtxInfo = pFtxInfo;
if( RC_BAD( f_mutexCreate( &(pFtxInfo->hFtxMutex))))
{
rc = FTXRC_MEM;
}
#ifdef FLM_NLM
/* Create a screen for display */
g_pvScreenTag = (void *)AllocateResourceTag(
(LONG)f_getNLMHandle(),
(BYTE *)"Screen", (LONG)ScreenSignature);
(void)OpenScreen( (void *)pucAppName,
(void *)g_pvScreenTag, (void **)&pFtxInfo->pvScreenHandle);
ActivateScreen( pFtxInfo->pvScreenHandle);
#endif
if( (rc = ftxDisplayInit( pFtxInfo, uiRows, uiCols,
pucAppName)) != FTXRC_SUCCESS)
{
goto Exit;
}
ftxDisplayReset( pFtxInfo);
ftxDisplayGetSize( &(pFtxInfo->uiCols), &(pFtxInfo->uiRows));
if( pFtxInfo->uiCols > uiCols)
{
pFtxInfo->uiCols = uiCols;
}
if( pFtxInfo->uiRows > uiRows)
{
pFtxInfo->uiRows = uiRows;
}
pFtxInfo->uiCursorType = WPS_CURSOR_INVISIBLE;
ftxDisplaySetCursorType( pFtxInfo, pFtxInfo->uiCursorType);
#if defined( FLM_WIN)
if( RC_BAD( f_calloc( (FLMUINT)(sizeof( CHAR_INFO) * (pFtxInfo->uiCols *
pFtxInfo->uiRows)), &pFtxInfo->pCells)))
{
rc = FTXRC_MEM;
goto Exit;
}
#elif !defined( FLM_NLM) || !defined( FLM_UNIX)
pFtxInfo->uiRows--;
#endif
if( RC_BAD( f_threadCreate( &pFtxInfo->pBackgroundThrd,
_ftxBackgroundThread, "ftx_background")))
{
rc = FTXRC_MEM;
goto Exit;
}
pFtxInfo->uiBackground = uiBackground;
pFtxInfo->uiForeground = uiForeground;
if( RC_BAD( f_threadCreate( &pFtxInfo->pDisplayThrd,
_ftxDefaultDisplayHandler, "ftx_display")))
{
rc = FTXRC_MEM;
goto Exit;
}
// Start the keyboard handler
pFtxInfo->uiCurKey = 0;
f_memset( pFtxInfo->puiKeyBuffer, 0, sizeof( FLMUINT) * CV_KEYBUF_SIZE);
pFtxInfo->pKeyHandler = pKeyHandler;
pFtxInfo->pvKeyHandlerData = pvKeyHandlerData;
if( RC_BAD( f_threadCreate( &pFtxInfo->pKeyboardThrd,
_ftxDefaultKeyboardHandler, "ftx_keyboard")))
{
rc = FTXRC_MEM;
goto Exit;
}
gv_bInitialized = TRUE;
gv_uiInitCount++;
*ppFtxInfo = pFtxInfo;
Exit:
return( rc);
}
/****************************************************************************
Desc: Frees all resources allocated to the FTX environment
Notes: All screens and windows are freed automatically
****************************************************************************/
FTXRCODE
FTXFree(
FTX_INFO_pp ppFtxInfo
)
{
FTX_INFO_p pFtxInfo;
FTX_SCREEN_p pScreen;
FTXRCODE rc = FTXRC_SUCCESS;
if( !gv_bInitialized)
{
rc = FTXRC_ILLEGAL_OP;
goto Exit;
}
if( --gv_uiInitCount > 0)
{
*ppFtxInfo = NULL;
goto Exit;
}
if( !ppFtxInfo)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
pFtxInfo = *ppFtxInfo;
// Shut down the display, keyboard, and backgroudn threads
f_threadDestroy( &pFtxInfo->pKeyboardThrd);
f_threadDestroy( &pFtxInfo->pDisplayThrd);
f_threadDestroy( &pFtxInfo->pBackgroundThrd);
ftxLock( &(pFtxInfo->hFtxMutex));
gv_bInitialized = FALSE;
pFtxInfo->bExiting = TRUE;
while( (pScreen = pFtxInfo->pScreenCur) != NULL)
{
ftxScreenFree( pScreen);
}
ftxDisplayReset( pFtxInfo);
ftxDisplayExit();
#if defined( FLM_WIN)
f_free( &pFtxInfo->pCells);
#elif defined( FLM_NLM)
CloseScreen( pFtxInfo->pvScreenHandle);
#endif
ftxUnlock( &(pFtxInfo->hFtxMutex));
f_mutexDestroy( &(pFtxInfo->hFtxMutex));
f_free( &pFtxInfo);
*ppFtxInfo = NULL;
Exit:
return( rc);
}
/****************************************************************************
Desc: Refreshes the current screen
****************************************************************************/
FTXRCODE
FTXRefresh(
FTX_INFO_p pFtxInfo
)
{
FTX_WINDOW_p pWinScreen;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
if( !pFtxInfo->bRefreshDisabled && pFtxInfo->pScreenCur)
{
ftxLock( &(pFtxInfo->pScreenCur->hScreenMutex));
if( pFtxInfo->pScreenCur->bChanged || pFtxInfo->bScreenSwitch)
{
if( pFtxInfo->bScreenSwitch)
{
pWinScreen = pFtxInfo->pScreenCur->pWinScreen;
f_memset( pWinScreen->pucBuffer, 0,
pWinScreen->uiRows * pWinScreen->uiCols);
#ifdef FLM_UNIX
ftxUnixDisplayReset();
#endif
}
#if defined( FLM_WIN)
rc = ftxWinRefresh( pFtxInfo);
#elif defined( FLM_NLM)
rc = ftxNLMRefresh( pFtxInfo);
#else
rc = ftxRefresh( pFtxInfo);
#endif
pFtxInfo->pScreenCur->bChanged = FALSE;
pFtxInfo->bScreenSwitch = FALSE;
pFtxInfo->pScreenCur->bUpdateCursor = TRUE;
}
if( pFtxInfo->pScreenCur->bUpdateCursor)
{
ftxCursorUpdate( pFtxInfo);
}
ftxUnlock( &(pFtxInfo->pScreenCur->hScreenMutex));
}
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Enables or disables refresh
****************************************************************************/
FTXRCODE
FTXSetRefreshState(
FTX_INFO_p pFtxInfo,
FLMBOOL bDisable
)
{
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
pFtxInfo->bRefreshDisabled = bDisable;
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Allows a keyboard handler to add a key to the FTX key buffer
****************************************************************************/
FTXRCODE
FTXAddKey(
FTX_INFO_p pFtxInfo,
FLMUINT uiKey
)
{
FLMBOOL bSet = FALSE;
FLMUINT uiLoop;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
uiLoop = pFtxInfo->uiCurKey;
while( uiLoop < CV_KEYBUF_SIZE)
{
if( pFtxInfo->puiKeyBuffer[ uiLoop] == 0)
{
pFtxInfo->puiKeyBuffer[ uiLoop] = uiKey;
bSet = TRUE;
goto Exit;
}
uiLoop++;
}
if( !bSet)
{
uiLoop = 0;
while( uiLoop < pFtxInfo->uiCurKey)
{
if( pFtxInfo->puiKeyBuffer[ uiLoop] == 0)
{
pFtxInfo->puiKeyBuffer[ uiLoop] = uiKey;
bSet = TRUE;
goto Exit;
}
uiLoop++;
}
}
Exit:
ftxUnlock( &(pFtxInfo->hFtxMutex));
if( !bSet)
{
rc = FTXRC_BUF_OVERRUN;
}
else
{
if( pFtxInfo->pScreenCur != NULL)
{
f_semSignal( pFtxInfo->pScreenCur->hKeySem);
}
}
return( rc);
}
/****************************************************************************
Desc: Cycles to the next screen in the FTX environment
****************************************************************************/
FTXRCODE
FTXCycleScreensNext(
FTX_INFO_p pFtxInfo
)
{
FTX_SCREEN_p pScreenTmp;
FTX_SCREEN_p pScreenLast;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
if( pFtxInfo->pScreenCur && pFtxInfo->pScreenCur->pScreenNext)
{
pScreenTmp = pFtxInfo->pScreenCur;
pFtxInfo->pScreenCur = pFtxInfo->pScreenCur->pScreenNext;
pScreenLast = pFtxInfo->pScreenCur;
while( pScreenLast->pScreenNext)
{
pScreenLast = pScreenLast->pScreenNext;
}
pScreenLast->pScreenNext = pScreenTmp;
pScreenTmp->pScreenPrev = pScreenLast;
pScreenTmp->pScreenNext = NULL;
pFtxInfo->pScreenCur->pScreenPrev = NULL;
pFtxInfo->bScreenSwitch = TRUE;
ftxKeyboardFlush( pFtxInfo);
}
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Cycles to the previous screen in the FTX environment
****************************************************************************/
FTXRCODE
FTXCycleScreensPrev(
FTX_INFO_p pFtxInfo
)
{
FTX_SCREEN_p pScreenPreviousFront;
FTX_SCREEN_p pScreenLast;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
if( pFtxInfo->pScreenCur && pFtxInfo->pScreenCur->pScreenNext)
{
pScreenPreviousFront = pFtxInfo->pScreenCur;
pScreenLast = pScreenPreviousFront;
while ( pScreenLast->pScreenNext)
{
pScreenLast = pScreenLast->pScreenNext;
}
pScreenLast->pScreenPrev->pScreenNext = NULL;
pScreenLast->pScreenPrev = NULL;
pScreenLast->pScreenNext = pScreenPreviousFront;
pScreenPreviousFront->pScreenPrev = pScreenLast;
pFtxInfo->pScreenCur = pScreenLast;
pFtxInfo->bScreenSwitch = TRUE;
ftxKeyboardFlush( pFtxInfo);
}
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Cycles to the next screen in the FTX environment (used when
debugging on NetWare).
****************************************************************************/
void
debugFTXCycleScreens( void)
{
if( gv_pFtxInfo)
{
FTXCycleScreensNext( gv_pFtxInfo);
}
}
/****************************************************************************
Desc: Force cursor refresh
****************************************************************************/
FTXRCODE
FTXRefreshCursor(
FTX_INFO_p pFtxInfo
)
{
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
if( pFtxInfo->pScreenCur)
{
pFtxInfo->pScreenCur->bUpdateCursor = TRUE;
}
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Invalidates the current screen so that it will be completly redrawn
****************************************************************************/
FTXRCODE
FTXInvalidate(
FTX_INFO_p pFtxInfo
)
{
FTX_WINDOW_p pWinScreen;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
if( pFtxInfo->pScreenCur)
{
ftxLock( &(pFtxInfo->pScreenCur->hScreenMutex));
pWinScreen = pFtxInfo->pScreenCur->pWinScreen;
f_memset( pWinScreen->pucBuffer, 0,
pWinScreen->uiRows * pWinScreen->uiCols);
pFtxInfo->pScreenCur->bChanged = TRUE;
ftxUnlock( &(pFtxInfo->pScreenCur->hScreenMutex));
}
#ifdef FLM_UNIX
ftxUnixDisplayReset();
#endif
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Allocates and initializes a new screen object
****************************************************************************/
FTXRCODE
FTXScreenInit(
FTX_INFO_p pFtxInfo,
const char * pucName,
FTX_SCREEN_pp ppScreen
)
{
FTX_SCREEN_p pScreen;
FTX_SCREEN_p pScreenTmp;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
*ppScreen = NULL;
if( RC_BAD( f_calloc( sizeof( FTX_SCREEN), &pScreen)))
{
rc = FTXRC_MEM;
goto Exit;
}
if( RC_BAD( f_mutexCreate( &(pScreen->hScreenMutex))))
{
rc = FTXRC_MEM;
goto Exit;
}
if( RC_BAD( f_semCreate( &(pScreen->hKeySem))))
{
rc = FTXRC_MEM;
goto Exit;
}
pScreen->uiRows = pFtxInfo->uiRows;
pScreen->uiCols = pFtxInfo->uiCols;
pScreen->uiBackground = pFtxInfo->uiBackground;
pScreen->uiForeground = pFtxInfo->uiForeground;
pScreen->uiCursorType = WPS_CURSOR_VISIBLE | WPS_CURSOR_UNDERLINE;
pScreen->pFtxInfo = pFtxInfo;
if( f_strlen( pucName) <= CV_MAX_WINNAME_LEN)
{
f_strcpy( pScreen->pucName, pucName);
}
else
{
f_sprintf( (char *)(pScreen->pucName), "?");
}
pScreen->bInitialized = TRUE;
if( (rc = FTXWinInit( pScreen, pScreen->uiCols, pScreen->uiRows,
&(pScreen->pWinScreen))) != FTXRC_SUCCESS)
{
goto Exit;
}
pScreen->pWinScreen->uiBackground = pScreen->uiBackground;
pScreen->pWinScreen->uiForeground = pScreen->uiForeground;
if( (rc = FTXWinInit( pScreen, pScreen->uiCols, pScreen->uiRows,
&(pScreen->pWinImage))) != FTXRC_SUCCESS)
{
goto Exit;
}
f_memset( pScreen->pWinScreen->pucBuffer, 0,
pScreen->pWinScreen->uiRows *
pScreen->pWinScreen->uiCols);
Exit:
if( rc != FTXRC_SUCCESS)
{
pScreen->bInitialized = FALSE;
}
else
{
if( pFtxInfo->pScreenCur)
{
pScreenTmp = pFtxInfo->pScreenCur;
while( pScreenTmp->pScreenNext)
{
pScreenTmp = pScreenTmp->pScreenNext;
}
pScreenTmp->pScreenNext = pScreen;
pScreen->pScreenPrev = pScreenTmp;
}
else
{
pFtxInfo->pScreenCur = pScreen;
pFtxInfo->bScreenSwitch = TRUE;
}
pScreen->uiId = pFtxInfo->uiSequence++;
*ppScreen = pScreen;
}
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Frees all resources allocated to a screen, including all window
objects
****************************************************************************/
FTXRCODE
FTXScreenFree(
FTX_SCREEN_pp ppScreen
)
{
FTX_SCREEN_p pScreen;
FTX_INFO_p pFtxInfo;
FTXRCODE rc = FTXRC_SUCCESS;
if( !ppScreen)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
pScreen = *ppScreen;
if( !pScreen)
{
goto Exit;
}
if( pScreen->bInitialized == FALSE)
{
rc = FTXRC_INVALID_SCREEN;
goto Exit;
}
pFtxInfo = pScreen->pFtxInfo;
ftxLock( &(pFtxInfo->hFtxMutex));
rc = ftxScreenFree( pScreen);
pFtxInfo->bScreenSwitch = TRUE;
ftxUnlock( &(pFtxInfo->hFtxMutex));
Exit:
if( rc == FTXRC_SUCCESS)
{
*ppScreen = NULL;
}
return( rc);
}
/****************************************************************************
Desc: Makes the passed-in screen the visible screen
****************************************************************************/
FTXRCODE
FTXScreenDisplay(
FTX_SCREEN_p pScreen
)
{
FLMBOOL bScreenValid = FALSE;
FTX_SCREEN_p pTmpScreen;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(gv_pFtxInfo->hFtxMutex));
// Make sure the screen is still in the list. If it isn't, the thread
// that owned the screen may have terminated.
pTmpScreen = gv_pFtxInfo->pScreenCur;
while( pTmpScreen)
{
if( pTmpScreen == pScreen)
{
bScreenValid = TRUE;
break;
}
pTmpScreen = pTmpScreen->pScreenPrev;
}
pTmpScreen = gv_pFtxInfo->pScreenCur;
while( pTmpScreen)
{
if( pTmpScreen == pScreen)
{
bScreenValid = TRUE;
break;
}
pTmpScreen = pTmpScreen->pScreenNext;
}
if( !bScreenValid)
{
rc = FTXRC_INVALID_SCREEN;
goto Exit;
}
if( pScreen != pScreen->pFtxInfo->pScreenCur)
{
if( pScreen->pScreenNext != NULL)
{
pScreen->pScreenNext->pScreenPrev = pScreen->pScreenPrev;
}
if( pScreen->pScreenPrev != NULL)
{
pScreen->pScreenPrev->pScreenNext = pScreen->pScreenNext;
}
pScreen->pScreenPrev = NULL;
pScreen->pScreenNext = pScreen->pFtxInfo->pScreenCur;
pScreen->pFtxInfo->pScreenCur->pScreenPrev = pScreen;
pScreen->pFtxInfo->pScreenCur = pScreen;
pScreen->pFtxInfo->bScreenSwitch = TRUE;
ftxKeyboardFlush( pScreen->pFtxInfo);
}
Exit:
ftxUnlock( &(gv_pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Retrieves the size of the passed-in screen
****************************************************************************/
FTXRCODE
FTXScreenGetSize(
FTX_SCREEN_p pScreen,
FLMUINT * puiNumCols,
FLMUINT * puiNumRows
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pScreen == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
if( puiNumCols)
{
*puiNumCols = pScreen->uiCols;
}
if( puiNumRows)
{
*puiNumRows = pScreen->uiRows;
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Sets the screen's shutdown flag
****************************************************************************/
FTXRCODE
FTXScreenSetShutdownFlag(
FTX_SCREEN_p pScreen,
FLMBOOL * pbShutdownFlag
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pScreen == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
pScreen->pbShutdown = pbShutdownFlag;
Exit:
return( rc);
}
/****************************************************************************
Desc: Creates a title window and main window (with border)
****************************************************************************/
FTXRCODE
FTXScreenInitStandardWindows(
FTX_SCREEN_p pScreen,
FLMUINT uiTitleBackColor,
FLMUINT uiTitleForeColor,
FLMUINT uiMainBackColor,
FLMUINT uiMainForeColor,
FLMBOOL bBorder,
FLMBOOL bBackFill,
const char * pucTitle,
FTX_WINDOW_pp ppTitleWin,
FTX_WINDOW_pp ppMainWin
)
{
FLMUINT uiScreenCols;
FLMUINT uiScreenRows;
FTX_WINDOW_p pTitleWin;
FTX_WINDOW_p pMainWin;
FTXRCODE rc;
if( (rc = FTXScreenGetSize( pScreen,
&uiScreenCols, &uiScreenRows)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinInit( pScreen, 0, 1, &pTitleWin)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinSetBackFore( pTitleWin,
uiTitleBackColor, uiTitleForeColor)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinClear( pTitleWin)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinSetCursorType( pTitleWin,
WPS_CURSOR_INVISIBLE)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( pucTitle)
{
FTXWinPrintf( pTitleWin, "%s", pucTitle);
}
if( (rc = FTXWinOpen( pTitleWin)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinInit( pScreen, uiScreenCols,
uiScreenRows - 1, &pMainWin)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinMove( pMainWin, 0, 1)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinSetBackFore( pMainWin,
uiMainBackColor, uiMainForeColor)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinClear( pMainWin)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( bBorder)
{
if( (rc = FTXWinDrawBorder( pMainWin)) != FTXRC_SUCCESS)
{
goto Exit;
}
}
#if defined( FLM_WIN) || defined( FLM_NLM)
if( bBackFill)
{
FTXWinSetChar( pMainWin, 176);
}
#else
F_UNREFERENCED_PARM( bBackFill);
#endif
if( (rc = FTXWinOpen( pMainWin)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( ppTitleWin)
{
*ppTitleWin = pTitleWin;
}
if( ppMainWin)
{
*ppMainWin = pMainWin;
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Allocates and initializes a window object
****************************************************************************/
FTXRCODE
FTXWinInit(
FTX_SCREEN_p pScreen,
FLMUINT uiCols,
FLMUINT uiRows,
FTX_WINDOW_pp ppWindow
)
{
FLMUINT uiSize;
FTX_WINDOW_p pWindow;
FTX_WINDOW_p pWinTmp;
FTXRCODE rc = FTXRC_SUCCESS;
*ppWindow = NULL;
if( !pScreen->bInitialized)
{
rc = FTXRC_INVALID_SCREEN;
goto Exit;
}
ftxLock( &(pScreen->hScreenMutex));
if( uiRows > pScreen->uiRows || uiCols > pScreen->uiCols)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
if( uiRows == 0)
{
uiRows = pScreen->uiRows;
}
if( uiCols == 0)
{
uiCols = pScreen->uiCols;
}
if( RC_BAD( f_calloc( sizeof( FTX_WINDOW), &pWindow)))
{
rc = FTXRC_MEM;
goto Exit;
}
uiSize = (FLMUINT)((uiRows * uiCols) + 1);
if( RC_BAD( f_calloc( (FLMUINT)(sizeof( FLMBYTE) * uiSize),
&pWindow->pucBuffer)))
{
rc = FTXRC_MEM;
goto Exit;
}
if( RC_BAD( f_calloc( (FLMUINT)(sizeof( FLMBYTE) * uiSize),
&pWindow->pucForeAttrib)))
{
rc = FTXRC_MEM;
goto Exit;
}
if( RC_BAD( f_calloc( (FLMUINT)(sizeof( FLMBYTE) * uiSize),
&pWindow->pucBackAttrib)))
{
rc = FTXRC_MEM;
goto Exit;
}
f_memset( pWindow->pucForeAttrib, (FLMBYTE)pScreen->uiForeground, uiSize);
f_memset( pWindow->pucBackAttrib, (FLMBYTE)pScreen->uiBackground, uiSize);
pWindow->uiRows = uiRows;
pWindow->uiCols = uiCols;
pWindow->uiCursorType = WPS_CURSOR_VISIBLE | WPS_CURSOR_UNDERLINE;
pWindow->bScroll = TRUE;
pWindow->bOpen = FALSE;
pWindow->bInitialized = TRUE;
pWindow->bForceOutput = FALSE;
pWindow->pScreen = pScreen;
pWindow->uiId = pScreen->uiSequence++;
ftxWinReset( pWindow);
if( pScreen->pWinCur)
{
pWinTmp = pScreen->pWinCur;
while( pWinTmp->pWinNext)
{
pWinTmp = pWinTmp->pWinNext;
}
pWindow->pWinPrev = pWinTmp;
pWinTmp->pWinNext = pWindow;
}
else
{
pScreen->pWinCur = pWindow;
}
Exit:
if( rc == FTXRC_SUCCESS)
{
*ppWindow = pWindow;
}
ftxUnlock( &(pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Frees all resources associated with the passed-in window object
****************************************************************************/
FTXRCODE
FTXWinFree(
FTX_WINDOW_pp ppWindow
)
{
FTX_WINDOW_p pWindow;
FTX_SCREEN_p pScreen;
FTXRCODE rc = FTXRC_SUCCESS;
if( !ppWindow)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
pWindow = *ppWindow;
if( pWindow->bInitialized == FALSE)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
pScreen = pWindow->pScreen;
ftxLock( &(pScreen->hScreenMutex));
rc = ftxWinFree( pWindow);
ftxUnlock( &(pScreen->hScreenMutex));
Exit:
if( rc == FTXRC_SUCCESS)
{
*ppWindow = NULL;
}
return( rc);
}
/****************************************************************************
Desc: Opens the specified window and makes it visible
****************************************************************************/
FTXRCODE
FTXWinOpen(
FTX_WINDOW_p pWindow
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL || !pWindow->bInitialized)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
ftxLock( &(pWindow->pScreen->hScreenMutex));
rc = ftxWinOpen( pWindow);
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
Exit:
return( rc);
}
/****************************************************************************
Desc: Closes (or hides) the specified window
****************************************************************************/
FTXRCODE
FTXWinClose(
FTX_WINDOW_p pWindow
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
if( !pWindow->bInitialized || !pWindow->bOpen)
{
goto Exit;
}
ftxLock( &(pWindow->pScreen->hScreenMutex));
rc = ftxWinClose( pWindow);
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
Exit:
return( rc);
}
/****************************************************************************
Desc: Sets the specified window's name
****************************************************************************/
FTXRCODE
FTXWinSetName(
FTX_WINDOW_p pWindow,
const char * pucName
)
{
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
if( f_strlen( pucName) > CV_MAX_WINNAME_LEN)
{
rc = FTXRC_BUF_OVERRUN;
goto Exit;
}
f_strcpy( pWindow->pucName, pucName);
Exit:
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Moves the specified window to a new location on the screen
****************************************************************************/
FTXRCODE
FTXWinMove(
FTX_WINDOW_p pWindow,
FLMUINT uiCol,
FLMUINT uiRow
)
{
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
if( (FLMUINT)uiCol + (FLMUINT)pWindow->uiCols >
(FLMUINT)pWindow->pScreen->uiCols)
{
rc = FTXRC_INVALID_POS;
goto Exit;
}
if( uiRow + pWindow->uiRows > pWindow->pScreen->uiRows)
{
rc = FTXRC_INVALID_POS;
goto Exit;
}
if( pWindow->uiUlx != uiCol || pWindow->uiUly != uiRow)
{
pWindow->uiUlx = uiCol;
pWindow->uiUly = uiRow;
if( pWindow->bOpen)
{
pWindow->pScreen->bChanged = TRUE;
}
}
Exit:
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Sets the input focus to the specified window
****************************************************************************/
FTXRCODE
FTXWinSetFocus(
FTX_WINDOW_p pWindow
)
{
ftxLock( &(pWindow->pScreen->hScreenMutex));
if( pWindow->bOpen && pWindow->pScreen->pWinCur != pWindow)
{
ftxWinClose( pWindow);
ftxWinOpen( pWindow);
}
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( FTXRC_SUCCESS);
}
/****************************************************************************
Desc: Sets the background color of all characters in the specified window
to the same color
****************************************************************************/
FTXRCODE
FTXWinPaintBackground(
FTX_WINDOW_p pWindow,
FLMUINT uiBackground
)
{
FLMUINT uiSize;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
uiSize = (FLMUINT)(pWindow->uiRows * pWindow->uiCols);
f_memset( pWindow->pucBackAttrib, (FLMBYTE)uiBackground, uiSize);
pWindow->uiBackground = uiBackground;
if( pWindow->bOpen)
{
pWindow->pScreen->bChanged = TRUE;
}
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Sets the background and/or foreground color of a row in the
specified window
****************************************************************************/
FTXRCODE
FTXWinPaintRow(
FTX_WINDOW_p pWindow,
FLMUINT * puiBackground,
FLMUINT * puiForeground,
FLMUINT uiRow
)
{
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
if( uiRow < (pWindow->uiRows - (2 * pWindow->uiOffset)))
{
if( puiBackground != NULL)
{
f_memset( pWindow->pucBackAttrib +
(pWindow->uiCols * (uiRow + pWindow->uiOffset)) + pWindow->uiOffset,
(FLMBYTE)*puiBackground, pWindow->uiCols - (2 * pWindow->uiOffset));
}
if( puiForeground != NULL)
{
f_memset( pWindow->pucForeAttrib +
(pWindow->uiCols * (uiRow + pWindow->uiOffset)) + pWindow->uiOffset,
(FLMBYTE)*puiForeground, pWindow->uiCols - (2 * pWindow->uiOffset));
}
if( pWindow->bOpen)
{
pWindow->pScreen->bChanged = TRUE;
}
}
else
{
rc = FTXRC_INVALID_POS;
}
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Sets all of the characters in the window to the specified character
****************************************************************************/
FTXRCODE
FTXWinSetChar(
FTX_WINDOW_p pWindow,
FLMUINT uiChar
)
{
FLMUINT uiSize;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
uiSize = (FLMUINT)(pWindow->uiCols - pWindow->uiOffset) *
(FLMUINT)(pWindow->uiRows - pWindow->uiOffset);
f_memset( pWindow->pucBuffer, (FLMBYTE)uiChar, uiSize);
if( pWindow->bOpen)
{
pWindow->pScreen->bChanged = TRUE;
}
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Sets the background color of a row in the specified window.
****************************************************************************/
FTXRCODE
FTXWinPaintRowBackground(
FTX_WINDOW_p pWindow,
FLMUINT uiBackground,
FLMUINT uiRow
)
{
return( FTXWinPaintRow( pWindow, &uiBackground, NULL, uiRow));
}
/****************************************************************************
Desc: Sets the foreground color of all characters in the specified window
****************************************************************************/
FTXRCODE
FTXWinPaintForeground(
FTX_WINDOW_p pWindow,
FLMUINT uiForeground
)
{
FLMUINT uiSize;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
uiSize = (FLMUINT)(pWindow->uiRows * pWindow->uiCols);
f_memset( pWindow->pucForeAttrib, (FLMBYTE)uiForeground, uiSize);
pWindow->uiForeground = uiForeground;
if( pWindow->bOpen)
{
pWindow->pScreen->bChanged = TRUE;
}
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Sets the foreground color of a row in the specified window.
****************************************************************************/
FTXRCODE
FTXWinPaintRowForeground(
FTX_WINDOW_p pWindow,
FLMUINT uiForeground,
FLMUINT uiRow
)
{
return( FTXWinPaintRow( pWindow, NULL, &uiForeground, uiRow));
}
/****************************************************************************
Desc: Sets the background and foreground color of the pen associated
with the current window
****************************************************************************/
FTXRCODE
FTXWinSetBackFore(
FTX_WINDOW_p pWindow,
FLMUINT uiBackground,
FLMUINT uiForeground
)
{
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
pWindow->uiBackground = uiBackground;
pWindow->uiForeground = uiForeground;
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Retrieves the current background and/or foreground color of
the pen associated with the specified window
****************************************************************************/
FTXRCODE
FTXWinGetBackFore(
FTX_WINDOW_p pWindow,
FLMUINT * puiBackground,
FLMUINT * puiForeground
)
{
ftxLock( &(pWindow->pScreen->hScreenMutex));
if( puiBackground != NULL)
{
*puiBackground = pWindow->uiBackground;
}
if( puiForeground != NULL)
{
*puiForeground = pWindow->uiForeground;
}
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( FTXRC_SUCCESS);
}
/****************************************************************************
Desc: Prints a character at the current cursor location in the
specified window.
****************************************************************************/
FTXRCODE
FTXWinPrintChar(
FTX_WINDOW_p pWindow,
FLMUINT uiChar
)
{
FTXRCODE rc;
ftxLock( &(pWindow->pScreen->hScreenMutex));
rc = ftxWinPrintChar( pWindow, uiChar);
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Prints a string starting at the current cursor location in the
specified window.
****************************************************************************/
FTXRCODE
FTXWinPrintStr(
FTX_WINDOW_p pWindow,
const char * pucString
)
{
FLMBOOL bSemLocked = FALSE;
FTXRCODE rc = FTXRC_SUCCESS;
if( pucString == NULL)
{
goto Exit;
}
ftxLock( &(pWindow->pScreen->hScreenMutex));
bSemLocked = TRUE;
while( *pucString != '\0')
{
if( (rc = ftxWinPrintChar( pWindow, *pucString)) != FTXRC_SUCCESS)
{
goto Exit;
}
pucString++;
}
Exit:
if( bSemLocked)
{
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
}
return( rc);
}
/****************************************************************************
Desc: Output a formatted string at present cursor location.
****************************************************************************/
FTXRCODE
FTXWinPrintf(
FTX_WINDOW_p pWindow,
const char * pucFormat, ...)
{
char pucBuffer[ 512];
f_va_list args;
f_va_start( args, pucFormat);
FTXVSprintf( 512, (char *)pucBuffer, pucFormat, (f_va_list *)&args);
f_va_end( args);
return( FTXWinPrintStr( pWindow, pucBuffer));
}
/****************************************************************************
Desc: Output a formatted string (with color) at present cursor location.
****************************************************************************/
FTXRCODE
FTXWinCPrintf(
FTX_WINDOW_p pWindow,
FLMUINT uiBackground,
FLMUINT uiForeground,
const char * pucFormat, ...)
{
char pucBuffer[ 512];
FLMUINT uiOldBackground;
FLMUINT uiOldForeground;
FTXRCODE rc;
f_va_list args;
uiOldBackground = pWindow->uiBackground;
uiOldForeground = pWindow->uiForeground;
pWindow->uiBackground = uiBackground;
pWindow->uiForeground = uiForeground;
f_va_start( args, pucFormat);
FTXVSprintf( 512, (char *)pucBuffer, pucFormat, (f_va_list *)&args);
f_va_end( args);
rc = FTXWinPrintStr( pWindow, pucBuffer);
pWindow->uiBackground = uiOldBackground;
pWindow->uiForeground = uiOldForeground;
return( rc);
}
/****************************************************************************
Desc: Prints a string starting at the current cursor location in the
specified window. Once printed, the screen is refreshed.
****************************************************************************/
FTXRCODE
FTXWinPrintStrR(
FTX_WINDOW_p pWindow,
const char * pucString
)
{
FTXRCODE rc;
if( (rc = FTXWinPrintStr( pWindow, pucString)) != FTXRC_SUCCESS)
{
goto Exit;
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Prints a string at a specific offset in the specified window.
****************************************************************************/
FTXRCODE
FTXWinPrintStrXY(
FTX_WINDOW_p pWindow,
const char * pucString,
FLMUINT uiCol,
FLMUINT uiRow
)
{
FTXRCODE rc;
if( (rc = FTXWinSetCursorPos( pWindow, uiCol, uiRow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinPrintStr( pWindow, pucString)) != FTXRC_SUCCESS)
{
goto Exit;
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Prints a string at a specific offset in the specified window.
Once printed, the screen is refreshed.
****************************************************************************/
FTXRCODE
FTXWinPrintStrXYR(
FTX_WINDOW_p pWindow,
const char * pucString,
FLMUINT uiCol,
FLMUINT uiRow
)
{
FTXRCODE rc;
if( (rc = FTXWinPrintStrXY( pWindow, pucString,
uiCol, uiRow)) != FTXRC_SUCCESS)
{
goto Exit;
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Retrieves the size of the specified window
****************************************************************************/
FTXRCODE
FTXWinGetSize(
FTX_WINDOW_p pWindow,
FLMUINT * puiNumCols,
FLMUINT * puiNumRows
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( puiNumCols)
{
*puiNumCols = pWindow->uiCols;
}
if( puiNumRows)
{
*puiNumRows = pWindow->uiRows;
}
return( rc);
}
/****************************************************************************
Desc: Retrieves the printable region (canvas) size of the specified
window
****************************************************************************/
FTXRCODE
FTXWinGetCanvasSize(
FTX_WINDOW_p pWindow,
FLMUINT * puiNumCols,
FLMUINT * puiNumRows
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
if( puiNumCols)
{
*puiNumCols = (FLMUINT)(pWindow->uiCols - ((FLMUINT)2 * pWindow->uiOffset));
}
if( puiNumRows)
{
*puiNumRows = (FLMUINT)(pWindow->uiRows - ((FLMUINT)2 * pWindow->uiOffset));
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Retrieves the current cursor row in the specified window
****************************************************************************/
FTXRCODE
FTXWinGetCurrRow(
FTX_WINDOW_p pWindow,
FLMUINT * puiRow
)
{
*puiRow = (FLMUINT)(pWindow->uiCurY - pWindow->uiOffset);
return( FTXRC_SUCCESS);
}
/****************************************************************************
Desc: Retrieves the current cursor column in the specified window
****************************************************************************/
FTXRCODE
FTXWinGetCurrCol(
FTX_WINDOW_p pWindow,
FLMUINT * puiCol
)
{
*puiCol = (FLMUINT)(pWindow->uiCurX - pWindow->uiOffset);
return( FTXRC_SUCCESS);
}
/****************************************************************************
Desc: Sets the cursor position in the specified window
****************************************************************************/
FTXRCODE
FTXWinSetCursorPos(
FTX_WINDOW_p pWindow,
FLMUINT uiCol,
FLMUINT uiRow
)
{
FTXRCODE rc;
ftxLock( &(pWindow->pScreen->hScreenMutex));
rc = ftxWinSetCursorPos( pWindow, uiCol, uiRow);
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Retrieves the row and/or column position of the cursor
****************************************************************************/
FTXRCODE
FTXWinGetCursorPos(
FTX_WINDOW_p pWindow,
FLMUINT * puiCol,
FLMUINT * puiRow
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
if( puiCol != NULL)
{
*puiCol = (FLMUINT)(pWindow->uiCurX - pWindow->uiOffset);
}
if( puiRow != NULL)
{
*puiRow = (FLMUINT)(pWindow->uiCurY - pWindow->uiOffset);
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Sets or changes the appearance of the cursor in the specified
window.
****************************************************************************/
FTXRCODE
FTXWinSetCursorType(
FTX_WINDOW_p pWindow,
FLMUINT uiType
)
{
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
pWindow->uiCursorType = uiType;
pWindow->pScreen->bUpdateCursor = TRUE;
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Retrieves the cursor type of the specified window
****************************************************************************/
FTXRCODE
FTXWinGetCursorType(
FTX_WINDOW_p pWindow,
FLMUINT * puiType
)
{
*puiType = pWindow->uiCursorType;
return( FTXRC_SUCCESS);
}
/****************************************************************************
Desc: Enables or disables scrolling in the specified window
****************************************************************************/
FTXRCODE
FTXWinSetScroll(
FTX_WINDOW_p pWindow,
FLMBOOL bScroll
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
if( pWindow->bInitialized == FALSE)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
pWindow->bScroll = bScroll;
Exit:
return( rc);
}
/****************************************************************************
Desc: Enables or disables line wrap
****************************************************************************/
FTXRCODE
FTXWinSetLineWrap(
FTX_WINDOW_p pWindow,
FLMBOOL bLineWrap
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
if( pWindow->bInitialized == FALSE)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
pWindow->bNoLineWrap = !bLineWrap;
Exit:
return( rc);
}
/****************************************************************************
Desc: Retrieves the scroll flag for the specified window
****************************************************************************/
FTXRCODE
FTXWinGetScroll(
FTX_WINDOW_p pWindow,
FLMBOOL * pbScroll
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL || pbScroll == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
if( pWindow->bInitialized == FALSE)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
*pbScroll = pWindow->bScroll;
Exit:
return( rc);
}
/****************************************************************************
Desc: Retrieves the screen of the current window
****************************************************************************/
FTXRCODE
FTXWinGetScreen(
FTX_WINDOW_p pWindow,
FTX_SCREEN_p * ppScreen
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL || ppScreen == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
*ppScreen = NULL;
if( pWindow->bInitialized == FALSE)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
*ppScreen = pWindow->pScreen;
Exit:
return( rc);
}
/****************************************************************************
Desc: Retrieves the windows position on the screen
****************************************************************************/
FTXRCODE
FTXWinGetPosition(
FTX_WINDOW_p pWindow,
FLMUINT * puiCol,
FLMUINT * puiRow)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
if( pWindow->bInitialized == FALSE)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
if( puiCol)
{
*puiCol = pWindow->uiUlx;
}
if( puiRow)
{
*puiRow = pWindow->uiUly;
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Clears from the specified column and row to the end of the row in
the specified window
****************************************************************************/
FTXRCODE
FTXWinClearLine(
FTX_WINDOW_p pWindow,
FLMUINT uiCol,
FLMUINT uiRow
)
{
FTXRCODE rc;
ftxLock( &(pWindow->pScreen->hScreenMutex));
rc = ftxWinClearLine( pWindow, uiCol, uiRow);
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Clears from the current cursor position to the end of the current
line
****************************************************************************/
FTXRCODE
FTXWinClearToEOL(
FTX_WINDOW_p pWindow
)
{
FTXRCODE rc;
ftxLock( &(pWindow->pScreen->hScreenMutex));
rc = ftxWinClearLine( pWindow,
(FLMUINT)(pWindow->uiCurX - pWindow->uiOffset),
(FLMUINT)(pWindow->uiCurY - pWindow->uiOffset));
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Clears the canvas of the specified window starting at the requested
row and column offset
****************************************************************************/
FTXRCODE
FTXWinClearXY(
FTX_WINDOW_p pWindow,
FLMUINT uiCol,
FLMUINT uiRow
)
{
FLMUINT uiSaveCol;
FLMUINT uiSaveRow;
FLMUINT uiLoop;
FTXRCODE rc;
ftxLock( &(pWindow->pScreen->hScreenMutex));
uiSaveCol = pWindow->uiCurX;
uiSaveRow = pWindow->uiCurY;
if( (rc = ftxWinClearLine( pWindow, uiCol, uiRow)) != FTXRC_SUCCESS)
{
goto Exit;
}
uiLoop = (FLMUINT)(uiRow + 1);
while( uiLoop < pWindow->uiRows - pWindow->uiOffset)
{
if( (rc = ftxWinClearLine( pWindow, 0, uiLoop)) != FTXRC_SUCCESS)
{
goto Exit;
}
uiLoop++;
}
pWindow->uiCurY = uiSaveRow;
pWindow->uiCurX = uiSaveCol;
Exit:
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Clears the canvas area of the specified window
****************************************************************************/
FTXRCODE
FTXWinClear(
FTX_WINDOW_p pWindow
)
{
FTXRCODE rc;
if( (rc = FTXWinClearXY( pWindow, 0, 0)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinSetCursorPos( pWindow, 0, 0)) != FTXRC_SUCCESS)
{
goto Exit;
}
Exit:
return( rc);
}
/****************************************************************************
Desc: Draws a border around the canvas area of the specified window
****************************************************************************/
FTXRCODE
FTXWinDrawBorder(
FTX_WINDOW_p pWindow
)
{
FLMUINT uiLoop;
FLMBOOL bScroll;
FLMUINT uiCols;
FLMUINT uiRows;
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pWindow->pScreen->hScreenMutex));
uiCols = pWindow->uiCols;
uiRows = pWindow->uiRows;
if( (uiRows > 2 && uiCols > 2))
{
pWindow->bForceOutput = TRUE;
pWindow->uiOffset = 0;
bScroll = pWindow->bScroll;
pWindow->uiOffset = 0;
pWindow->bScroll = FALSE;
ftxWinSetCursorPos( pWindow, 0, 0);
#if defined( FLM_WIN) || defined( FLM_NLM)
ftxWinPrintChar( pWindow, (FLMUINT)201);
#else
ftxWinPrintChar( pWindow, (FLMUINT)'+');
#endif
ftxWinSetCursorPos( pWindow, (FLMUINT)(uiCols - 1), 0);
#if defined( FLM_WIN) || defined( FLM_NLM)
ftxWinPrintChar( pWindow, (FLMUINT)187);
#else
ftxWinPrintChar( pWindow, (FLMUINT)'+');
#endif
ftxWinSetCursorPos( pWindow, 0, (FLMUINT)(uiRows - 1));
#if defined( FLM_WIN) || defined( FLM_NLM)
ftxWinPrintChar( pWindow, (FLMUINT)200);
#else
ftxWinPrintChar( pWindow, (FLMUINT)'+');
#endif
ftxWinSetCursorPos( pWindow, (FLMUINT)(uiCols - 1),
(FLMUINT)(uiRows - 1));
#if defined( FLM_WIN) || defined( FLM_NLM)
ftxWinPrintChar( pWindow, (FLMUINT)188);
#else
ftxWinPrintChar( pWindow, (FLMUINT)'+');
#endif
for( uiLoop = 1; uiLoop < uiCols - 1; uiLoop++)
{
ftxWinSetCursorPos( pWindow, uiLoop, 0);
#if defined( FLM_WIN) || defined( FLM_NLM)
ftxWinPrintChar( pWindow, (FLMUINT)205);
#else
ftxWinPrintChar( pWindow, (FLMUINT)'-');
#endif
ftxWinSetCursorPos( pWindow, uiLoop,
(FLMUINT)(uiRows - 1));
#if defined( FLM_WIN) || defined( FLM_NLM)
ftxWinPrintChar( pWindow, (FLMUINT)205);
#else
ftxWinPrintChar( pWindow, (FLMUINT)'-');
#endif
}
for( uiLoop = 1; uiLoop < uiRows - 1; uiLoop++)
{
ftxWinSetCursorPos( pWindow, 0, uiLoop);
#if defined( FLM_WIN) || defined( FLM_NLM)
ftxWinPrintChar( pWindow, (FLMUINT)186);
#else
ftxWinPrintChar( pWindow, (FLMUINT)'|');
#endif
ftxWinSetCursorPos( pWindow, (FLMUINT)(uiCols - 1),
uiLoop);
#if defined( FLM_WIN) || defined( FLM_NLM)
ftxWinPrintChar( pWindow, (FLMUINT)186);
#else
ftxWinPrintChar( pWindow, (FLMUINT)'|');
#endif
}
pWindow->uiOffset = 1;
pWindow->bScroll = bScroll;
pWindow->bForceOutput = FALSE;
ftxWinSetCursorPos( pWindow, 0, 0);
}
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Draws a border around the canvas area of the specified window
****************************************************************************/
FTXRCODE
FTXWinSetTitle(
FTX_WINDOW_p pWindow,
const char * pucTitle,
FLMUINT uiBackground,
FLMUINT uiForeground
)
{
FLMBOOL bScroll = FALSE;
FLMUINT uiCols;
FLMUINT uiRows;
FLMUINT uiStrLen;
FTXRCODE rc = FTXRC_SUCCESS;
FLMUINT uiSaveForeground;
FLMUINT uiSaveBackground;
ftxLock( &(pWindow->pScreen->hScreenMutex));
uiCols = pWindow->uiCols;
uiRows = pWindow->uiRows;
if( (uiRows > 2 && uiCols > 2))
{
pWindow->bForceOutput = TRUE;
pWindow->uiOffset = 0;
bScroll = pWindow->bScroll;
pWindow->uiOffset = 0;
pWindow->bScroll = FALSE;
uiSaveBackground = pWindow->uiBackground;
pWindow->uiBackground = uiBackground;
uiSaveForeground = pWindow->uiForeground;
pWindow->uiForeground = uiForeground;
uiStrLen = f_strlen( pucTitle);
if( uiStrLen < uiCols)
{
ftxWinSetCursorPos( pWindow, (FLMUINT)((uiCols - uiStrLen) / 2), 0);
}
else
{
ftxWinSetCursorPos( pWindow, 0, 0);
}
while( *pucTitle != '\0')
{
if( (rc = ftxWinPrintChar( pWindow, *pucTitle)) != FTXRC_SUCCESS)
{
goto Exit;
}
pucTitle++;
}
pWindow->uiBackground = uiSaveBackground;
pWindow->uiForeground = uiSaveForeground;
}
Exit:
pWindow->uiOffset = 1;
pWindow->bScroll = bScroll;
pWindow->bForceOutput = FALSE;
ftxWinSetCursorPos( pWindow, 0, 0);
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Draws a border around the canvas area of the specified window
****************************************************************************/
FTXRCODE
FTXWinSetHelp(
FTX_WINDOW_p pWindow,
const char * pszHelp,
FLMUINT uiBackground,
FLMUINT uiForeground
)
{
FLMBOOL bScroll = FALSE;
FLMUINT uiCols;
FLMUINT uiRows;
FLMUINT uiStrLen;
FTXRCODE rc = FTXRC_SUCCESS;
FLMUINT uiSaveForeground;
FLMUINT uiSaveBackground;
ftxLock( &(pWindow->pScreen->hScreenMutex));
uiCols = pWindow->uiCols;
uiRows = pWindow->uiRows;
if( (uiRows > 2 && uiCols > 2))
{
pWindow->bForceOutput = TRUE;
pWindow->uiOffset = 0;
bScroll = pWindow->bScroll;
pWindow->uiOffset = 0;
pWindow->bScroll = FALSE;
uiSaveBackground = pWindow->uiBackground;
pWindow->uiBackground = uiBackground;
uiSaveForeground = pWindow->uiForeground;
pWindow->uiForeground = uiForeground;
uiStrLen = f_strlen( pszHelp);
if( uiStrLen < uiCols)
{
ftxWinSetCursorPos( pWindow, (FLMUINT)((uiCols - uiStrLen) / 2), uiRows-1);
}
else
{
ftxWinSetCursorPos( pWindow, 0, uiRows-1);
}
while( *pszHelp != '\0')
{
if( (rc = ftxWinPrintChar( pWindow, *pszHelp)) != FTXRC_SUCCESS)
{
goto Exit;
}
pszHelp++;
}
pWindow->uiBackground = uiSaveBackground;
pWindow->uiForeground = uiSaveForeground;
}
Exit:
pWindow->uiOffset = 1;
pWindow->bScroll = bScroll;
pWindow->bForceOutput = FALSE;
ftxWinSetCursorPos( pWindow, 0, 0);
ftxUnlock( &(pWindow->pScreen->hScreenMutex));
return( rc);
}
/****************************************************************************
Desc: Tests the key buffer for an available key
****************************************************************************/
FTXRCODE
FTXWinTestKB(
FTX_WINDOW_p pWindow
)
{
FTX_INFO_p pFtxInfo;
FTXRCODE rc = FTXRC_SUCCESS;
pFtxInfo = pWindow->pScreen->pFtxInfo;
ftxLock( &(pFtxInfo->hFtxMutex));
if( !pWindow->bOpen || pWindow->pScreen->pWinCur != pWindow ||
pFtxInfo->pScreenCur != pWindow->pScreen)
{
rc = FTXRC_NO_INPUT;
goto Exit;
}
if( pFtxInfo->puiKeyBuffer[ pFtxInfo->uiCurKey] == 0)
{
rc = FTXRC_NO_INPUT;
}
Exit:
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Gets a character from the keyboard
****************************************************************************/
FTXRCODE
FTXWinInputChar(
FTX_WINDOW_p pWindow,
FLMUINT * puiChar
)
{
FTX_INFO_p pFtxInfo;
FTXRCODE rc = FTXRC_SUCCESS;
FLMBOOL bLocked = FALSE;
if( puiChar)
{
*puiChar = 0;
}
if( pWindow == NULL)
{
rc = FTXRC_NULL_POINTER;
goto Exit;
}
if( pWindow->bInitialized == FALSE)
{
rc = FTXRC_INVALID_WIN;
goto Exit;
}
if( !pWindow->bOpen || pWindow->pScreen->pWinCur != pWindow)
{
rc = FTXRC_NO_INPUT;
goto Exit;
}
pFtxInfo = pWindow->pScreen->pFtxInfo;
for( ;;)
{
ftxLock( &(pFtxInfo->hFtxMutex));
bLocked = TRUE;
if( (pWindow->pScreen->pFtxInfo->pbShutdown != NULL &&
*(pWindow->pScreen->pFtxInfo->pbShutdown) == TRUE) ||
(pWindow->pScreen->pbShutdown != NULL &&
*(pWindow->pScreen->pbShutdown) == TRUE))
{
rc = FTXRC_SHUTDOWN;
goto Exit;
}
if( pFtxInfo->pScreenCur == pWindow->pScreen)
{
if( pFtxInfo->puiKeyBuffer[ pFtxInfo->uiCurKey])
{
if( puiChar)
{
*puiChar = pFtxInfo->puiKeyBuffer[ pFtxInfo->uiCurKey];
}
pFtxInfo->puiKeyBuffer[ pFtxInfo->uiCurKey] = 0;
pFtxInfo->uiCurKey++;
if( pFtxInfo->uiCurKey >= CV_KEYBUF_SIZE)
{
pFtxInfo->uiCurKey = 0;
}
break;
}
}
ftxUnlock( &(pFtxInfo->hFtxMutex));
bLocked = FALSE;
(void)f_semWait( pWindow->pScreen->hKeySem, 1000);
}
Exit:
if( bLocked)
{
ftxUnlock( &(pFtxInfo->hFtxMutex));
}
return( rc);
}
/****************************************************************************
Desc: Line editor routine
****************************************************************************/
FTXRCODE
FTXLineEdit(
FTX_WINDOW_p pWindow,
char * pucBuffer,
FLMUINT uiBufSize,
FLMUINT uiMaxWidth,
FLMUINT * puiCharCount,
FLMUINT * puiTermChar)
{
FLMBYTE pucLnBuf[ 256];
FLMBYTE pucSnapBuf[ 256];
FLMUINT uiCharCount;
FLMUINT uiBufPos;
FLMUINT uiStartCol;
FLMUINT uiStartRow;
FLMUINT uiChar;
FLMUINT uiCursorOutputPos = 0;
FLMUINT uiNumRows;
FLMUINT uiNumCols;
FLMUINT uiSaveCursor;
FLMUINT uiLoop;
FLMUINT uiCharsLn;
FLMUINT uiOutputStart = 0;
FLMUINT uiCursorPos;
FLMUINT uiOutputEnd = 0;
FLMBOOL bDone;
FLMBOOL bInsert;
FLMBOOL bRefresh;
FLMBOOL bGotChar = FALSE;
FLMBOOL bSaveScroll;
FTXRCODE rc = FTXRC_SUCCESS;
if( puiCharCount)
{
*puiCharCount = 0;
}
FTXWinGetCursorType( pWindow, &uiSaveCursor);
FTXWinGetCanvasSize( pWindow, &uiNumCols, &uiNumRows);
FTXWinGetCurrCol( pWindow, &uiStartCol);
FTXWinGetCurrRow( pWindow, &uiStartRow);
FTXWinGetScroll( pWindow, &bSaveScroll);
if( uiBufSize < 2 || uiMaxWidth < 2 || (uiNumCols - uiStartCol) < 3)
{
return( 0);
}
FTXWinSetScroll( pWindow, FALSE);
FTXWinSetFocus( pWindow);
FTXRefresh( pWindow->pScreen->pFtxInfo);
uiCharsLn = (FLMUINT)(uiNumCols - uiStartCol);
if( uiCharsLn > uiMaxWidth)
{
uiCharsLn = uiMaxWidth;
}
f_memset( pucLnBuf, (FLMBYTE)32, uiCharsLn);
pucLnBuf[ uiCharsLn] = '\0';
pucBuffer[ uiBufSize - 1] = '\0';
uiCharCount = f_strlen( pucBuffer);
if( uiCharCount > 0)
{
bGotChar = TRUE;
uiBufPos = uiCharCount;
uiCursorPos = (uiBufPos < uiCharsLn) ? uiBufPos : (uiCharsLn - 1);
}
else
{
uiBufPos = 0;
uiCursorPos = 0;
}
bDone = FALSE;
bInsert = TRUE;
bRefresh = FALSE;
uiChar = 0;
while( !bDone)
{
if( (pWindow->pScreen->pFtxInfo->pbShutdown != NULL &&
*(pWindow->pScreen->pFtxInfo->pbShutdown) == TRUE) ||
(pWindow->pScreen->pbShutdown != NULL &&
*(pWindow->pScreen->pbShutdown) == TRUE))
{
pucBuffer[ 0] = '\0';
uiCharCount = 0;
rc = FTXRC_SHUTDOWN;
break;
}
if( !bGotChar)
{
if( (rc = FTXWinInputChar( pWindow, &uiChar)) != FTXRC_SUCCESS)
{
goto Exit;
}
bGotChar = TRUE;
switch( uiChar)
{
case WPK_HOME:
{
uiBufPos = 0;
uiCursorPos = 0;
break;
}
case WPK_LEFT:
{
if( uiBufPos > 0)
{
uiBufPos--;
if( uiCursorPos > 0)
{
uiCursorPos--;
}
}
break;
}
case WPK_RIGHT:
{
if( uiBufPos < uiCharCount)
{
uiBufPos++;
if( uiCursorPos < (uiCharsLn - 1))
{
uiCursorPos++;
}
}
break;
}
case WPK_END:
{
if( uiBufPos != uiCharCount)
{
if( uiCharCount < (uiCharsLn - 1))
{
uiCursorPos = uiCharCount;
}
else
{
uiCursorPos = (FLMUINT)(uiCharsLn - 1);
}
uiBufPos = uiCharCount;
}
break;
}
case WPK_CTRL_LEFT:
{
if( uiBufPos > 0)
{
if( pucBuffer[ uiBufPos - 1] == ' ')
{
if( uiCursorPos > 0)
{
uiCursorPos--;
}
uiBufPos--;
}
while(
uiBufPos > 0 && pucBuffer[ uiBufPos] == ' ')
{
uiBufPos--;
if( uiCursorPos > 0)
{
uiCursorPos--;
}
}
while( uiBufPos > 0 && pucBuffer[ uiBufPos] != ' ')
{
uiBufPos--;
if( uiCursorPos > 0)
{
uiCursorPos--;
}
}
}
if( uiBufPos > 0 && pucBuffer[ uiBufPos] == ' ' &&
uiBufPos < uiCharCount)
{
uiBufPos++;
if( uiCursorPos < (uiCharsLn - 1))
{
uiCursorPos++;
}
}
break;
}
case WPK_CTRL_RIGHT:
{
if( uiBufPos < uiCharCount)
{
while( uiBufPos < uiCharCount && pucBuffer[ uiBufPos] != ' ')
{
uiBufPos++;
if( uiCursorPos < (uiCharsLn - 1))
{
uiCursorPos++;
}
}
while( uiBufPos < uiCharCount && pucBuffer[ uiBufPos] == ' ')
{
uiBufPos++;
if( uiCursorPos < (uiCharsLn - 1))
{
uiCursorPos++;
}
}
}
break;
}
case WPK_INSERT:
{
if( bInsert == TRUE)
{
bInsert = FALSE;
FTXWinSetCursorType( pWindow,
WPS_CURSOR_VISIBLE | WPS_CURSOR_BLOCK);
}
else
{
bInsert = TRUE;
FTXWinSetCursorType( pWindow,
WPS_CURSOR_VISIBLE | WPS_CURSOR_UNDERLINE);
}
ftxCursorUpdate( pWindow->pScreen->pFtxInfo);
break;
}
case WPK_DELETE:
{
if( uiBufPos < uiCharCount)
{
f_memmove( &(pucBuffer[ uiBufPos]),
&(pucBuffer[ uiBufPos + 1]), uiCharCount - uiBufPos);
uiCharCount--;
}
break;
}
case WPK_BACKSPACE:
{
if( uiBufPos > 0)
{
if( uiCursorPos > 0)
{
uiCursorPos--;
}
uiBufPos--;
f_memmove( &(pucBuffer[ uiBufPos]),
&(pucBuffer[ uiBufPos + 1]), uiCharCount - uiBufPos);
uiCharCount--;
}
break;
}
case WPK_CTRL_B:
{
if( uiBufPos > 0)
{
uiCharCount -= uiBufPos;
f_memmove( pucBuffer,
&(pucBuffer[ uiBufPos]), uiCharCount + 1);
uiBufPos = 0;
uiCursorPos = 0;
}
break;
}
case WPK_CTRL_D:
{
if( uiBufPos < uiCharCount)
{
uiCharCount = uiBufPos;
pucBuffer[ uiCharCount] = '\0';
}
break;
}
default:
{
if( (uiChar & 0xFF00) == 0)
{
if( bInsert && uiBufPos < uiCharCount &&
uiCharCount < (uiBufSize - 1))
{
for( uiLoop = 0; uiLoop < uiCharCount - uiBufPos; uiLoop++)
{
pucBuffer[ uiCharCount - uiLoop] =
pucBuffer[ uiCharCount - uiLoop - 1];
}
pucBuffer[ uiBufPos] = (FLMBYTE)uiChar;
if( uiCursorPos < (uiCharsLn - 1))
{
uiCursorPos++;
}
pucBuffer[ ++uiCharCount] = '\0';
uiBufPos++;
}
else if( (uiBufPos < uiCharCount && !bInsert) ||
uiCharCount < (uiBufSize - 1))
{
pucBuffer[ uiBufPos] = (FLMBYTE)uiChar;
if( uiBufPos == uiCharCount)
{
pucBuffer[ ++uiCharCount] = '\0';
}
if( uiCursorPos < (uiCharsLn - 1))
{
uiCursorPos++;
}
uiBufPos++;
}
}
else if( uiChar & 0xFF00)
{
bDone = TRUE;
bGotChar = FALSE;
}
}
}
}
if( bGotChar)
{
uiOutputStart = (FLMUINT)(uiBufPos - uiCursorPos);
uiOutputEnd = (FLMUINT)(uiOutputStart + uiCharsLn);
if( uiOutputEnd > uiCharCount)
{
uiOutputEnd = uiCharCount;
}
f_memset( pucSnapBuf, (FLMBYTE)32, uiCharsLn);
pucSnapBuf[ uiCharsLn] = '\0';
f_memmove( pucSnapBuf, &(pucBuffer[ uiOutputStart]),
(FLMUINT)(uiOutputEnd - uiOutputStart));
uiCursorOutputPos = 0;
uiLoop = 0;
while( uiLoop < uiCharsLn)
{
if( pucSnapBuf[ uiLoop] != pucLnBuf[ uiLoop])
{
bRefresh = TRUE;
uiCursorOutputPos = uiLoop;
break;
}
uiLoop++;
}
uiLoop = uiCharsLn;
while( uiLoop > uiCursorOutputPos)
{
if( pucSnapBuf[ uiLoop - 1] != pucLnBuf[ uiLoop - 1])
{
bRefresh = TRUE;
break;
}
uiLoop--;
}
pucSnapBuf[ uiLoop] = '\0';
bGotChar = FALSE;
}
if( bRefresh)
{
f_memset( pucLnBuf, (FLMBYTE)32, uiCharsLn);
pucLnBuf[ uiCharsLn] = '\0';
f_memmove( pucLnBuf, &(pucBuffer[ uiOutputStart]),
(FLMUINT)(uiOutputEnd - uiOutputStart));
FTXWinSetCursorPos( pWindow,
(FLMUINT)(uiStartCol + uiCursorOutputPos), uiStartRow);
FTXWinPrintStr( pWindow, (const char *)&(pucSnapBuf[ uiCursorOutputPos]));
FTXWinSetCursorPos( pWindow,
(FLMUINT)(uiStartCol + uiCursorPos), uiStartRow);
FTXRefresh( pWindow->pScreen->pFtxInfo);
bRefresh = FALSE;
}
else
{
FLMUINT uiTmpCol;
FLMUINT uiTmpRow;
FTXWinGetCurrCol( pWindow, &uiTmpCol);
FTXWinGetCurrRow( pWindow, &uiTmpRow);
if( uiTmpCol != uiStartCol + uiCursorPos || uiTmpRow != uiStartRow)
{
FTXWinSetCursorPos( pWindow, (FLMUINT)(uiStartCol + uiCursorPos),
uiStartRow);
ftxCursorUpdate( pWindow->pScreen->pFtxInfo);
}
}
}
if( puiTermChar)
{
*puiTermChar = uiChar;
}
if( puiCharCount)
{
*puiCharCount = uiCharCount;
}
Exit:
FTXWinSetCursorType( pWindow, uiSaveCursor);
FTXWinSetScroll( pWindow, bSaveScroll);
return( rc);
}
/****************************************************************************
Desc: Line editor routine which assumes some defaults
****************************************************************************/
FLMUINT
FTXLineEd(
FTX_WINDOW_p pWindow,
char * pucBuffer,
FLMUINT uiBufSize)
{
FLMUINT uiTermChar;
FLMUINT uiStartCol;
FLMUINT uiStartRow;
FLMUINT uiCharsInput;
FLMBOOL bDone = FALSE;
FTXWinGetCurrCol( pWindow, &uiStartCol);
FTXWinGetCurrRow( pWindow, &uiStartRow);
while( !bDone)
{
if( (pWindow->pScreen->pFtxInfo->pbShutdown != NULL &&
*(pWindow->pScreen->pFtxInfo->pbShutdown) == TRUE) ||
(pWindow->pScreen->pbShutdown != NULL &&
*(pWindow->pScreen->pbShutdown) == TRUE))
{
pucBuffer[ 0] = '\0';
uiCharsInput = 0;
break;
}
pucBuffer[ 0] = '\0';
if( FTXLineEdit( pWindow, pucBuffer, uiBufSize, 255, &uiCharsInput,
&uiTermChar) != FTXRC_SUCCESS)
{
uiCharsInput = 0;
*pucBuffer = '\0';
goto Exit;
}
switch( uiTermChar)
{
case WPK_ENTER:
{
FTXWinPrintChar( pWindow, '\n');
bDone = TRUE;
break;
}
case WPK_ESC:
{
pucBuffer[ 0] = '\0';
bDone = TRUE;
break;
}
default:
{
FTXWinClearLine( pWindow, uiStartCol, uiStartRow);
FTXWinSetCursorPos( pWindow, uiStartCol, uiStartRow);
break;
}
}
}
Exit:
return( uiCharsInput);
}
/****************************************************************************
Desc: Displays a message window
*****************************************************************************/
FTXRCODE FTXMessageWindow(
FTX_SCREEN * pScreen,
FLMUINT uiBack,
FLMUINT uiFore,
const char * pucMessage1,
const char * pucMessage2,
FTX_WINDOW_p * ppWindow)
{
FLMUINT uiNumCols;
FLMUINT uiNumRows;
FLMUINT uiNumWinRows = 10;
FLMUINT uiNumWinCols;
FLMUINT uiNumCanvCols;
FLMBYTE pucTmpBuf[ 128];
FLMUINT uiMessageLen;
FTX_WINDOW_p pWindow = NULL;
FTXRCODE rc = FTXRC_SUCCESS;
if( (rc = FTXScreenGetSize( pScreen,
&uiNumCols, &uiNumRows)) != FTXRC_SUCCESS)
{
goto Exit;
}
uiNumWinCols = uiNumCols - 8;
if( (rc = FTXWinInit( pScreen, uiNumWinCols,
uiNumWinRows, &pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinSetScroll( pWindow, FALSE)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinSetCursorType( pWindow,
WPS_CURSOR_INVISIBLE)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinSetBackFore( pWindow,
uiBack, uiFore)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinClear( pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinDrawBorder( pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinMove( pWindow, (FLMUINT)((uiNumCols - uiNumWinCols) / 2),
(FLMUINT)((uiNumRows - uiNumWinRows) / 2))) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinGetCanvasSize( pWindow,
&uiNumCanvCols, NULL)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( (rc = FTXWinOpen( pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if( pucMessage1)
{
f_strncpy( (char *)pucTmpBuf, pucMessage1, uiNumCanvCols);
pucTmpBuf[ uiNumCanvCols] = '\0';
uiMessageLen = f_strlen( (const char *)pucTmpBuf);
FTXWinSetCursorPos( pWindow,
(FLMUINT)((uiNumCanvCols - uiMessageLen) / 2), 3);
FTXWinPrintf( pWindow, "%s", pucTmpBuf);
}
if( pucMessage2)
{
f_strncpy( (char *)pucTmpBuf, pucMessage2, uiNumCanvCols);
pucTmpBuf[ uiNumCanvCols] = '\0';
uiMessageLen = f_strlen( (const char *)pucTmpBuf);
FTXWinSetCursorPos( pWindow,
(FLMUINT)((uiNumCanvCols - uiMessageLen) / 2), 4);
FTXWinPrintf( pWindow, "%s", pucTmpBuf);
}
FTXRefresh( pScreen->pFtxInfo);
Exit:
if( rc != FTXRC_SUCCESS && pWindow)
{
*ppWindow = NULL;
FTXWinFree( &pWindow);
}
else
{
*ppWindow = pWindow;
}
return( rc);
}
/****************************************************************************
Desc: Displays a dialog-style message box
*****************************************************************************/
FTXRCODE FTXDisplayMessage(
FTX_SCREEN * pScreen,
FLMUINT uiBack,
FLMUINT uiFore,
const char * pucMessage1,
const char * pucMessage2,
FLMUINT * puiTermChar)
{
FTX_WINDOW_p pWindow = NULL;
FTXRCODE rc = FTXRC_SUCCESS;
if( puiTermChar)
{
*puiTermChar = 0;
}
if ((rc = FTXMessageWindow( pScreen, uiBack, uiFore,
pucMessage1, pucMessage2, &pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
for( ;;)
{
if( (pWindow->pScreen->pFtxInfo->pbShutdown != NULL &&
*(pWindow->pScreen->pFtxInfo->pbShutdown) == TRUE) ||
(pWindow->pScreen->pbShutdown != NULL &&
*(pWindow->pScreen->pbShutdown) == TRUE))
{
rc = FTXRC_SHUTDOWN;
goto Exit;
}
if( FTXWinTestKB( pWindow) == FTXRC_SUCCESS)
{
FLMUINT uiChar;
FTXWinInputChar( pWindow, &uiChar);
if( uiChar == WPK_ESCAPE || uiChar == WPK_ENTER)
{
if( puiTermChar)
{
*puiTermChar = uiChar;
}
break;
}
}
else
{
f_sleep( 10);
}
}
Exit:
if( pWindow)
{
FTXWinFree( &pWindow);
}
return( rc);
}
/****************************************************************************
Desc:
*****************************************************************************/
FTXRCODE FTXGetInput(
FTX_SCREEN * pScreen,
const char * pszMessage,
char * pszResponse,
FLMUINT uiMaxRespLen,
FLMUINT * puiTermChar)
{
FLMUINT uiNumCols;
FLMUINT uiNumRows;
FLMUINT uiNumWinRows = 3;
FLMUINT uiNumWinCols;
FTX_WINDOW_p pWindow = NULL;
FTXRCODE rc = FTXRC_SUCCESS;
if ( (rc =
FTXScreenGetSize( pScreen, &uiNumCols, &uiNumRows)) != FTXRC_SUCCESS)
{
goto Exit;
}
uiNumWinCols = uiNumCols - 8;
if ( (rc = FTXWinInit( pScreen, uiNumWinCols,
uiNumWinRows, &pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if ( (rc = FTXWinSetScroll( pWindow, FALSE)) != FTXRC_SUCCESS)
{
goto Exit;
}
if ( (rc =
FTXWinSetCursorType( pWindow, WPS_CURSOR_UNDERLINE)) != FTXRC_SUCCESS)
{
goto Exit;
}
if ( (rc =
FTXWinSetBackFore( pWindow, WPS_CYAN, WPS_WHITE)) != FTXRC_SUCCESS)
{
goto Exit;
}
if ( (rc = FTXWinClear( pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if ( (rc = FTXWinDrawBorder( pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if ( (rc = FTXWinMove( pWindow, (uiNumCols - uiNumWinCols) / 2,
(uiNumRows - uiNumWinRows) / 2)) != FTXRC_SUCCESS)
{
goto Exit;
}
if ( (rc = FTXWinOpen( pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
if ( (rc = FTXWinClear( pWindow)) != FTXRC_SUCCESS)
{
goto Exit;
}
FTXWinPrintf( pWindow, "%s: ", pszMessage);
if ((rc = FTXLineEdit( pWindow, pszResponse, uiMaxRespLen, uiMaxRespLen,
NULL, puiTermChar)) != FTXRC_SUCCESS)
{
goto Exit;
}
Exit:
if( pWindow)
{
FTXWinFree( &pWindow);
}
return( rc);
}
/****************************************************************************
Desc: Allows the keyboard handler to recieve ping characters
****************************************************************************/
FTXRCODE
FTXEnablePingChar(
FTX_INFO_p pFtxInfo)
{
ftxLock( &(pFtxInfo->hFtxMutex));
pFtxInfo->bEnablePingChar = TRUE;
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( FTXRC_SUCCESS);
}
/****************************************************************************
Desc: Sets the shutdown flag pointer
****************************************************************************/
FTXRCODE
FTXSetShutdownFlag(
FTX_INFO_p pFtxInfo,
FLMBOOL * pbShutdownFlag
)
{
FTXRCODE rc = FTXRC_SUCCESS;
ftxLock( &(pFtxInfo->hFtxMutex));
pFtxInfo->pbShutdown = pbShutdownFlag;
ftxUnlock( &(pFtxInfo->hFtxMutex));
return( rc);
}
/****************************************************************************
Desc: Locks the specified semaphore
****************************************************************************/
FSTATIC void
ftxLock( F_MUTEX * phSem)
{
f_mutexLock( *phSem);
}
/****************************************************************************
Desc: Unlocks the specified semaphore
****************************************************************************/
FSTATIC void
ftxUnlock( F_MUTEX * phSem)
{
f_mutexUnlock( *phSem);
}
/****************************************************************************
Desc: Synchronizes the "camera-ready" display image with the "in-memory"
image
****************************************************************************/
FSTATIC FTXRCODE
ftxSyncImage(
FTX_INFO_p pFtxInfo
)
{
FTX_WINDOW_p pWin;
FTX_SCREEN_p pScreenCur;
FLMBYTE * pucWTBuf;
FLMBYTE * pucSBuf;
FLMBYTE * pucWTBackAttrib;
FLMBYTE * pucWTForeAttrib;
FLMBYTE * pucSBackAttrib;
FLMBYTE * pucSForeAttrib;
FLMUINT uiLoop;
FLMUINT uiOffset;
FTXRCODE rc = FTXRC_SUCCESS;
pScreenCur = pFtxInfo->pScreenCur;
ftxWinReset( pScreenCur->pWinImage);
pWin = pScreenCur->pWinCur;
if( pWin)
{
while( pWin->pWinNext)
{
pWin = pWin->pWinNext;
}
}
while( pWin != NULL)
{
if( pWin->bOpen)
{
pucSBuf = pWin->pucBuffer;
pucSBackAttrib = pWin->pucBackAttrib;
pucSForeAttrib = pWin->pucForeAttrib;
uiOffset = (FLMUINT)(((FLMUINT)pScreenCur->pWinImage->uiCols *
(FLMUINT)pWin->uiUly) + (FLMUINT)pWin->uiUlx);
pucWTBuf = pScreenCur->pWinImage->pucBuffer + uiOffset;
pucWTBackAttrib = pScreenCur->pWinImage->pucBackAttrib + uiOffset;
pucWTForeAttrib = pScreenCur->pWinImage->pucForeAttrib + uiOffset;
for( uiLoop = 0; uiLoop < pWin->uiRows; uiLoop++)
{
f_memmove( pucWTBuf, pucSBuf, pWin->uiCols);
f_memmove( pucWTBackAttrib, pucSBackAttrib, pWin->uiCols);
f_memmove( pucWTForeAttrib, pucSForeAttrib, pWin->uiCols);
pucSBuf += pWin->uiCols;
pucSBackAttrib += pWin->uiCols;
pucSForeAttrib += pWin->uiCols;
pucWTBuf += pScreenCur->pWinImage->uiCols;
pucWTBackAttrib += pScreenCur->pWinImage->uiCols;
pucWTForeAttrib += pScreenCur->pWinImage->uiCols;
}
}
pWin = pWin->pWinPrev;
}
return( rc);
}
/****************************************************************************
Desc: Win display update
****************************************************************************/
#if defined( FLM_WIN)
FSTATIC FTXRCODE
ftxWinRefresh(
FTX_INFO_p pFtxInfo
)
{
PCHAR_INFO paCell;
COORD size;
COORD coord;
SMALL_RECT region;
HANDLE hStdOut;
FLMUINT uiLoop;
FLMUINT uiSubloop;
FLMUINT uiOffset;
FLMUINT uiLeft = 0;
FLMUINT uiRight = 0;
FLMUINT uiTop = 0;
FLMUINT uiBottom = 0;
FLMBOOL bTopSet = FALSE;
FLMBOOL bLeftSet = FALSE;
FLMBOOL bChanged = FALSE;
FTX_WINDOW_p pWinImage;
FTX_WINDOW_p pWinScreen;
ftxSyncImage( pFtxInfo);
pWinImage = pFtxInfo->pScreenCur->pWinImage;
pWinScreen = pFtxInfo->pScreenCur->pWinScreen;
for( uiLoop = 0; uiLoop < pWinImage->uiRows; uiLoop++)
{
for( uiSubloop = 0; uiSubloop < pWinImage->uiCols; uiSubloop++)
{
uiOffset = (FLMUINT)((uiLoop * (FLMUINT)(pWinImage->uiCols)) + uiSubloop);
if( pWinImage->pucBuffer[ uiOffset] !=
pWinScreen->pucBuffer[ uiOffset] ||
pWinImage->pucForeAttrib[ uiOffset] !=
pWinScreen->pucForeAttrib[ uiOffset] ||
pWinImage->pucBackAttrib[ uiOffset] !=
pWinScreen->pucBackAttrib[ uiOffset])
{
pWinScreen->pucBuffer[ uiOffset] =
pWinImage->pucBuffer[ uiOffset];
pWinScreen->pucForeAttrib[ uiOffset] =
pWinImage->pucForeAttrib[ uiOffset];
pWinScreen->pucBackAttrib[ uiOffset] =
pWinImage->pucBackAttrib[ uiOffset];
if( uiSubloop > uiRight)
{
uiRight = uiSubloop;
}
if( uiLoop > uiBottom)
{
uiBottom = uiLoop;
}
if( !bTopSet)
{
uiTop = uiLoop;
bTopSet = TRUE;
}
if( !bLeftSet || uiLeft > uiSubloop)
{
uiLeft = uiSubloop;
bLeftSet = TRUE;
}
if( !bChanged)
{
bChanged = TRUE;
}
}
paCell = &(pFtxInfo->pCells[ ((uiLoop + pWinImage->uiUly) *
pWinScreen->uiCols) + (uiSubloop + pWinImage->uiUlx)]);
paCell->Char.AsciiChar = pWinImage->pucBuffer[ uiOffset];
paCell->Attributes =
(WORD)(((pWinImage->pucForeAttrib[ uiOffset] & 0x8F) |
((pWinImage->pucBackAttrib[ uiOffset] << 4) & 0x7F)));
}
}
if( bChanged)
{
if( (hStdOut = GetStdHandle( STD_OUTPUT_HANDLE)) ==
INVALID_HANDLE_VALUE)
{
goto Exit;
}
size.X = (SHORT)pWinScreen->uiCols;
size.Y = (SHORT)pWinScreen->uiRows;
coord.X = (SHORT)uiLeft;
coord.Y = (SHORT)uiTop;
region.Left = (SHORT)uiLeft;
region.Right = (SHORT)uiRight;
region.Top = (SHORT)uiTop;
region.Bottom = (SHORT)uiBottom;
WriteConsoleOutput( hStdOut, pFtxInfo->pCells, size, coord, &region);
}
Exit:
return( FTXRC_SUCCESS);
}
#elif defined( FLM_NLM)
/****************************************************************************
Desc: NLM display update
****************************************************************************/
FSTATIC FTXRCODE
ftxNLMRefresh(
FTX_INFO_p pFtxInfo)
{
FLMUINT uiLoop;
FLMUINT uiSubLoop;
FLMUINT uiOffset;
FTX_WINDOW_p pWinImage;
FTX_WINDOW_p pWinScreen;
FLMBOOL bModified;
LONG udCnt;
LONG udStartColumn;
FLMUINT uiStartOffset;
BYTE * pucStartValue;
BYTE attribute;
BYTE ucStartAttr;
ftxSyncImage( pFtxInfo);
pWinImage = pFtxInfo->pScreenCur->pWinImage;
pWinScreen = pFtxInfo->pScreenCur->pWinScreen;
for( uiLoop = 0; uiLoop < (FLMUINT)pWinImage->uiRows; uiLoop++)
{
bModified = FALSE;
for( uiSubLoop = 0; uiSubLoop < pWinImage->uiCols; uiSubLoop++)
{
uiOffset = (FLMUINT)((uiLoop * (FLMUINT)(pWinImage->uiCols)) + uiSubLoop);
if((pWinImage->pucBuffer[ uiOffset] !=
pWinScreen->pucBuffer[ uiOffset] ||
pWinImage->pucForeAttrib[ uiOffset] !=
pWinScreen->pucForeAttrib[ uiOffset] ||
pWinImage->pucBackAttrib[ uiOffset] !=
pWinScreen->pucBackAttrib[ uiOffset]))
{
attribute = (pWinImage->pucBackAttrib[ uiOffset] << 4) +
pWinImage->pucForeAttrib[ uiOffset];
if (!bModified || attribute != ucStartAttr)
{
if (bModified)
{
(void)DisplayScreenTextWithAttribute( pFtxInfo->pvScreenHandle,
(LONG)uiLoop, (LONG)udStartColumn, udCnt, ucStartAttr,
pucStartValue);
}
ucStartAttr = attribute;
udCnt = 0;
uiStartOffset = uiOffset;
udStartColumn = (LONG)uiSubLoop;
bModified = TRUE;
pucStartValue = &pWinImage->pucBuffer[ uiOffset];
}
udCnt++;
}
else
{
if (bModified)
{
bModified = FALSE;
(void)DisplayScreenTextWithAttribute( pFtxInfo->pvScreenHandle,
(LONG)uiLoop, (LONG)udStartColumn, udCnt, ucStartAttr,
pucStartValue);
}
}
}
if (bModified)
{
bModified = FALSE;
(void)DisplayScreenTextWithAttribute( pFtxInfo->pvScreenHandle,
(LONG)uiLoop, (LONG)udStartColumn, udCnt, ucStartAttr,
pucStartValue);
}
}
return( FTXRC_SUCCESS);
}
#else
/****************************************************************************
Desc: Win16/Other display update
****************************************************************************/
FSTATIC FTXRCODE
ftxRefresh(
FTX_INFO_p pFtxInfo)
{
FLMBYTE * pucWTBuf;
FLMBYTE * pucSBuf;
FLMBYTE * pucWTBackAttrib;
FLMBYTE * pucWTForeAttrib;
FLMBYTE * pucSBackAttrib;
FLMBYTE * pucSForeAttrib;
FLMUINT uiChangeStart;
FLMUINT uiChangeEnd;
FLMUINT uiSaveChar;
FLMBOOL bChange;
FLMUINT uiLoop;
FLMUINT uiSubloop;
FLMUINT uiTempAttrib;
FTX_WINDOW_p pWinImage;
FTX_WINDOW_p pWinScreen;
FTXRCODE rc = FTXRC_SUCCESS;
ftxSyncImage( pFtxInfo);
pWinImage = pFtxInfo->pScreenCur->pWinImage;
pWinScreen = pFtxInfo->pScreenCur->pWinScreen;
pFtxInfo->uiCursorType = WPS_CURSOR_INVISIBLE;
ftxDisplaySetCursorType( pFtxInfo, pFtxInfo->uiCursorType);
pucSBuf = pWinScreen->pucBuffer;
pucSBackAttrib = pWinScreen->pucBackAttrib;
pucSForeAttrib = pWinScreen->pucForeAttrib;
pucWTBuf = pWinImage->pucBuffer;
pucWTBackAttrib = pWinImage->pucBackAttrib;
pucWTForeAttrib = pWinImage->pucForeAttrib;
for( uiLoop = 0; uiLoop < pWinScreen->uiRows; uiLoop++)
{
uiSubloop = 0;
while( uiSubloop < pWinScreen->uiCols)
{
bChange = FALSE;
if( pucSBuf[ uiSubloop] != pucWTBuf[ uiSubloop] ||
pucSBackAttrib[ uiSubloop] != pucWTBackAttrib[ uiSubloop] ||
pucSForeAttrib[ uiSubloop] != pucWTForeAttrib[ uiSubloop])
{
bChange = TRUE;
uiChangeStart = uiSubloop;
uiChangeEnd = uiSubloop;
while( pucWTBackAttrib[ uiChangeStart] ==
pucWTBackAttrib[ uiSubloop] &&
pucWTForeAttrib[ uiChangeStart] == pucWTForeAttrib[ uiSubloop] &&
uiSubloop < pWinScreen->uiCols)
{
if( pucSBuf[ uiSubloop] != pucWTBuf[ uiSubloop] ||
pucSBackAttrib[ uiSubloop] != pucWTBackAttrib[ uiSubloop] ||
pucSForeAttrib[ uiSubloop] != pucWTForeAttrib[ uiSubloop])
{
uiChangeEnd = uiSubloop;
}
pucSBuf[ uiSubloop] = pucWTBuf[ uiSubloop];
pucSBackAttrib[ uiSubloop] = pucWTBackAttrib[ uiSubloop];
pucSForeAttrib[ uiSubloop] = pucWTForeAttrib[ uiSubloop];
uiSubloop++;
}
uiSubloop--;
}
if( bChange)
{
ftxDisplaySetCursorPos( pFtxInfo, uiChangeStart, uiLoop);
uiSaveChar = pucSBuf[ uiChangeEnd + 1];
pucSBuf[ uiChangeEnd + 1] = '\0';
uiTempAttrib = (pucSBackAttrib [uiChangeStart] << 4) +
pucSForeAttrib [uiChangeStart];
ftxDisplaySetBackFore( pucSBackAttrib[ uiChangeStart],
pucSForeAttrib[ uiChangeStart]);
ftxDisplayStrOut( (const char *)&(pucSBuf[ uiChangeStart]),
uiTempAttrib);
pucSBuf[ uiChangeEnd + 1] = (FLMBYTE)uiSaveChar;
}
uiSubloop++;
}
pucSBuf += pWinScreen->uiCols;
pucSBackAttrib += pWinScreen->uiCols;
pucSForeAttrib += pWinScreen->uiCols;
pucWTBuf += pWinImage->uiCols;
pucWTBackAttrib += pWinImage->uiCols;
pucWTForeAttrib += pWinImage->uiCols;
}
return( rc);
}
#endif
/****************************************************************************
Desc: Initializes / resets a window object
****************************************************************************/
FSTATIC FTXRCODE
ftxWinReset(
FTX_WINDOW_p pWindow
)
{
FLMUINT uiSize;
FTXRCODE rc = FTXRC_SUCCESS;
uiSize = (FLMUINT)(pWindow->uiRows * pWindow->uiCols);
f_memset( pWindow->pucBuffer, (FLMBYTE)' ', uiSize);
f_memset( pWindow->pucBackAttrib, (FLMBYTE)pWindow->pScreen->uiBackground, uiSize);
f_memset( pWindow->pucForeAttrib, (FLMBYTE)pWindow->pScreen->uiForeground, uiSize);
pWindow->uiBackground = pWindow->pScreen->uiBackground;
pWindow->uiForeground = pWindow->pScreen->uiForeground;
pWindow->uiCurX = pWindow->uiOffset;
pWindow->uiCurY = pWindow->uiOffset;
return( rc);
}
/****************************************************************************
Desc: Low-level routine for freeing a screen object
****************************************************************************/
FSTATIC FTXRCODE
ftxScreenFree(
FTX_SCREEN_p pScreen
)
{
FTX_WINDOW_p pWin;
FTXRCODE rc = FTXRC_SUCCESS;
while( (pWin = pScreen->pWinCur) != NULL)
{
ftxWinFree( pWin);
}
if( pScreen == pScreen->pFtxInfo->pScreenCur)
{
pScreen->pFtxInfo->pScreenCur = pScreen->pScreenNext;
if( pScreen->pFtxInfo->pScreenCur)
{
pScreen->pFtxInfo->pScreenCur->pScreenPrev = NULL;
}
}
else
{
if( pScreen->pScreenNext)
{
pScreen->pScreenNext->pScreenPrev = pScreen->pScreenPrev;
}
if( pScreen->pScreenPrev)
{
pScreen->pScreenPrev->pScreenNext = pScreen->pScreenNext;
}
}
f_mutexDestroy( &(pScreen->hScreenMutex));
f_semDestroy( &(pScreen->hKeySem));
f_free( &pScreen);
return( rc);
}
/****************************************************************************
Desc: Low-level routine for freeing a window object
****************************************************************************/
FSTATIC FTXRCODE
ftxWinFree(
FTX_WINDOW_p pWindow
)
{
FTX_WINDOW_p pWin;
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow->bOpen)
{
ftxWinClose( pWindow);
}
pWin = pWindow->pScreen->pWinCur;
while( pWin != pWindow)
{
pWin = pWin->pWinNext;
if( pWin == NULL)
{
break;
}
}
if( pWin)
{
if( pWin == pWindow->pScreen->pWinCur)
{
pWindow->pScreen->pWinCur = pWin->pWinNext;
if( pWindow->pScreen->pWinCur)
{
pWindow->pScreen->pWinCur->pWinPrev = NULL;
}
}
else
{
if( pWin->pWinNext)
{
pWin->pWinNext->pWinPrev = pWin->pWinPrev;
}
if( pWin->pWinPrev)
{
pWin->pWinPrev->pWinNext = pWin->pWinNext;
}
}
}
f_free( &(pWindow->pucBuffer));
f_free( &(pWindow->pucForeAttrib));
f_free( &(pWindow->pucBackAttrib));
f_free( &pWindow);
return( rc);
}
/****************************************************************************
Desc: Low-level routine for opening a window
****************************************************************************/
FSTATIC FTXRCODE
ftxWinOpen(
FTX_WINDOW_p pWindow
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow->bOpen)
{
goto Exit;
}
if( pWindow != pWindow->pScreen->pWinCur)
{
if( pWindow->pWinNext != NULL)
{
pWindow->pWinNext->pWinPrev = pWindow->pWinPrev;
}
if( pWindow->pWinPrev != NULL)
{
pWindow->pWinPrev->pWinNext = pWindow->pWinNext;
}
pWindow->pWinPrev = NULL;
pWindow->pWinNext = pWindow->pScreen->pWinCur;
if( pWindow->pWinNext)
{
pWindow->pWinNext->pWinPrev = pWindow;
}
pWindow->pScreen->pWinCur = pWindow;
}
pWindow->bOpen = TRUE;
Exit:
pWindow->pScreen->bChanged = TRUE;
return( rc);
}
/****************************************************************************
Desc: Low-level routine for closing a window
****************************************************************************/
FSTATIC FTXRCODE
ftxWinClose(
FTX_WINDOW_p pWindow
)
{
FTX_WINDOW_p pWinTmp;
FTXRCODE rc = FTXRC_SUCCESS;
if( pWindow->pScreen->pWinCur == pWindow &&
pWindow->pWinNext != NULL)
{
pWindow->pScreen->pWinCur = pWindow->pWinNext;
}
if( pWindow->pWinNext != NULL)
{
pWindow->pWinNext->pWinPrev = pWindow->pWinPrev;
}
if( pWindow->pWinPrev != NULL)
{
pWindow->pWinPrev->pWinNext = pWindow->pWinNext;
}
pWinTmp = pWindow->pScreen->pWinCur;
while( pWinTmp->pWinNext)
{
pWinTmp = pWinTmp->pWinNext;
}
pWindow->pWinPrev = pWinTmp;
pWinTmp->pWinNext = pWindow;
pWindow->pWinNext = NULL;
pWindow->bOpen = FALSE;
pWindow->pScreen->bChanged = TRUE;
return( rc);
}
/****************************************************************************
Desc: Low-level routine for printing a character
****************************************************************************/
FSTATIC FTXRCODE
ftxWinPrintChar(
FTX_WINDOW_p pWindow,
FLMUINT uiChar
)
{
FLMBOOL bChanged = FALSE;
FLMUINT uiOffset;
FLMUINT uiRow;
FTXRCODE rc = FTXRC_SUCCESS;
uiOffset = (FLMUINT)((FLMUINT)(pWindow->uiCurY * pWindow->uiCols) +
pWindow->uiCurX);
if( uiOffset >= ((FLMUINT)(pWindow->uiCols) * pWindow->uiRows))
{
goto Exit;
}
if( (uiChar > 31 && uiChar <= 126) || pWindow->bForceOutput)
{
if( pWindow->pucBuffer[ uiOffset] != uiChar ||
pWindow->pucForeAttrib[ uiOffset] != pWindow->uiForeground ||
pWindow->pucBackAttrib[ uiOffset] != pWindow->uiBackground)
{
pWindow->pucBuffer[ uiOffset] = (FLMBYTE)uiChar;
pWindow->pucForeAttrib[ uiOffset] = (FLMBYTE)pWindow->uiForeground;
pWindow->pucBackAttrib[ uiOffset] = (FLMBYTE)pWindow->uiBackground;
bChanged = TRUE;
}
pWindow->uiCurX++;
}
else
{
switch( uiChar)
{
case 9: /* TAB */
{
pWindow->uiCurX += (FLMUINT)(8 - (pWindow->uiCurX % 8));
if( pWindow->uiCurX > pWindow->uiCols)
{
pWindow->uiCurX = pWindow->uiOffset;
pWindow->uiCurY++;
}
break;
}
case 10: /* LF */
{
pWindow->uiCurX = pWindow->uiOffset;
pWindow->uiCurY++;
break;
}
case 13: /* CR */
{
pWindow->uiCurX = pWindow->uiOffset;
break;
}
}
}
if( pWindow->uiCurX + pWindow->uiOffset >= pWindow->uiCols)
{
if( pWindow->bNoLineWrap)
{
pWindow->uiCurX = (pWindow->uiCols - pWindow->uiOffset) - 1;
}
else
{
pWindow->uiCurY++;
pWindow->uiCurX = pWindow->uiOffset;
}
}
if( pWindow->uiCurY + pWindow->uiOffset >= pWindow->uiRows)
{
pWindow->uiCurY = (FLMUINT)(pWindow->uiRows - pWindow->uiOffset - 1);
if( pWindow->bScroll)
{
if( pWindow->uiRows - pWindow->uiOffset > 1)
{
if( pWindow->uiOffset)
{
for( uiRow = pWindow->uiOffset;
uiRow < pWindow->uiRows - (2 * pWindow->uiOffset); uiRow++)
{
uiOffset = (FLMUINT)((FLMUINT)(uiRow * pWindow->uiCols) +
pWindow->uiOffset);
f_memmove( pWindow->pucBuffer + uiOffset,
pWindow->pucBuffer + uiOffset + pWindow->uiCols,
pWindow->uiCols - (2 * pWindow->uiOffset));
f_memmove( pWindow->pucForeAttrib + uiOffset,
pWindow->pucForeAttrib + uiOffset + pWindow->uiCols,
pWindow->uiCols - (2 * pWindow->uiOffset));
f_memmove( pWindow->pucBackAttrib + uiOffset,
pWindow->pucBackAttrib + uiOffset + pWindow->uiCols,
pWindow->uiCols - (2 * pWindow->uiOffset));
}
}
else
{
f_memmove( pWindow->pucBuffer,
pWindow->pucBuffer + pWindow->uiCols,
(pWindow->uiRows - 1) * pWindow->uiCols);
f_memmove( pWindow->pucForeAttrib,
pWindow->pucForeAttrib + pWindow->uiCols,
(pWindow->uiRows - 1) * pWindow->uiCols);
f_memmove( pWindow->pucBackAttrib,
pWindow->pucBackAttrib + pWindow->uiCols,
(pWindow->uiRows - 1) * pWindow->uiCols);
}
}
uiOffset = (FLMUINT)(((FLMUINT)(pWindow->uiRows - pWindow->uiOffset - 1) *
pWindow->uiCols) + pWindow->uiOffset);
f_memset( pWindow->pucBuffer + uiOffset, (FLMBYTE)' ',
pWindow->uiCols - (2 * pWindow->uiOffset));
f_memset( pWindow->pucForeAttrib + uiOffset, (FLMBYTE)pWindow->uiForeground,
pWindow->uiCols - (2 * pWindow->uiOffset));
f_memset( pWindow->pucBackAttrib + uiOffset, (FLMBYTE)pWindow->uiBackground,
pWindow->uiCols - (2 * pWindow->uiOffset));
bChanged = TRUE;
}
}
Exit:
if( pWindow->bOpen && bChanged)
{
pWindow->pScreen->bChanged = TRUE;
}
return( rc);
}
/****************************************************************************
Desc: Low-level routine for updating the cursor
****************************************************************************/
FSTATIC FTXRCODE
ftxCursorUpdate(
FTX_INFO_p pFtxInfo
)
{
FLMUINT uiCurX;
FLMUINT uiCurY;
FTX_WINDOW_p pWinCur;
FTXRCODE rc = FTXRC_SUCCESS;
if( pFtxInfo->pScreenCur && pFtxInfo->pScreenCur->bUpdateCursor)
{
pWinCur = pFtxInfo->pScreenCur->pWinCur;
if( pWinCur && pWinCur->bOpen)
{
uiCurX = (FLMUINT)(pWinCur->uiUlx + pWinCur->uiCurX);
uiCurY = (FLMUINT)(pWinCur->uiUly + pWinCur->uiCurY);
ftxDisplaySetCursorPos( pFtxInfo, uiCurX, uiCurY);
ftxDisplaySetCursorType( pFtxInfo, pWinCur->uiCursorType);
pFtxInfo->uiCursorType = pWinCur->uiCursorType;
}
else
{
ftxDisplaySetCursorType( pFtxInfo, WPS_CURSOR_INVISIBLE);
pFtxInfo->uiCursorType = WPS_CURSOR_INVISIBLE;
}
pFtxInfo->pScreenCur->bUpdateCursor = FALSE;
}
return( rc);
}
/****************************************************************************
Desc: Low-level routine for flushing the keyboard buffer
****************************************************************************/
FSTATIC FTXRCODE
ftxKeyboardFlush(
FTX_INFO_p pFtxInfo
)
{
pFtxInfo->uiCurKey = 0;
f_memset( pFtxInfo->puiKeyBuffer, (FLMBYTE)0,
sizeof( FLMUINT) * CV_KEYBUF_SIZE);
return( FTXRC_SUCCESS);
}
/****************************************************************************
Desc: Low-level routine for clearing a line
****************************************************************************/
FSTATIC FTXRCODE
ftxWinClearLine(
FTX_WINDOW_p pWindow,
FLMUINT uiCol,
FLMUINT uiRow
)
{
FLMUINT uiOffset;
FLMUINT uiSize;
FTXRCODE rc = FTXRC_SUCCESS;
if( (pWindow->uiRows - (2 * pWindow->uiOffset)) > uiRow &&
(pWindow->uiCols - (2 * pWindow->uiOffset)) > uiCol)
{
pWindow->uiCurY = (FLMUINT)(uiRow + pWindow->uiOffset);
pWindow->uiCurX = (FLMUINT)(uiCol + pWindow->uiOffset);
uiOffset = ((FLMUINT)(pWindow->uiCurY) * pWindow->uiCols) +
pWindow->uiCurX;
uiSize = (FLMUINT)(pWindow->uiCols - pWindow->uiOffset) - pWindow->uiCurX;
f_memset( pWindow->pucBuffer + uiOffset, (FLMBYTE)' ', uiSize);
f_memset( pWindow->pucForeAttrib + uiOffset, (FLMBYTE)pWindow->uiForeground, uiSize);
f_memset( pWindow->pucBackAttrib + uiOffset, (FLMBYTE)pWindow->uiBackground, uiSize);
pWindow->uiCurY = (FLMUINT)(uiRow + pWindow->uiOffset);
pWindow->uiCurX = (FLMUINT)(uiCol + pWindow->uiOffset);
if( pWindow->bOpen)
{
pWindow->pScreen->bChanged = TRUE;
}
}
return( rc);
}
/****************************************************************************
Desc: Low-level routine for setting the cursor's position
****************************************************************************/
FSTATIC FTXRCODE
ftxWinSetCursorPos(
FTX_WINDOW_p pWindow,
FLMUINT uiCol,
FLMUINT uiRow
)
{
FTXRCODE rc = FTXRC_SUCCESS;
if( (pWindow->uiRows - (2 * pWindow->uiOffset)) > uiRow &&
(pWindow->uiCols - (2 * pWindow->uiOffset)) > uiCol)
{
pWindow->uiCurY = (FLMUINT)(uiRow + pWindow->uiOffset);
pWindow->uiCurX = (FLMUINT)(uiCol + pWindow->uiOffset);
pWindow->pScreen->bUpdateCursor = TRUE;
}
return( rc);
}
/****************************************************************************
Desc: Initializes the "physical" screen
****************************************************************************/
FSTATIC FTXRCODE
ftxDisplayInit(
FTX_INFO_p pFtxInfo,
FLMUINT uiRows, // 0xFF means use current screen height.
FLMUINT uiCols, // 0xFF means use current screen width.
const char * pucTitle
)
{
#if defined( FLM_WIN)
/*
Allocate a console if the application does not already have
one.
*/
if( AllocConsole())
{
gv_bAllocatedConsole = TRUE;
}
/*
Set up the console.
*/
if( (gv_hStdOut = GetStdHandle( STD_OUTPUT_HANDLE)) ==
INVALID_HANDLE_VALUE)
{
return( FTXRC_MEM);
}
/*
If FTX allocated the console, re-size the console to match
the requested size
*/
if( gv_bAllocatedConsole)
{
COORD conSize;
conSize.X = (SHORT)uiCols;
conSize.Y = (SHORT)uiRows;
SetConsoleScreenBufferSize( gv_hStdOut, conSize);
}
SMALL_RECT conRec;
conRec.Left = 0;
conRec.Top = 0;
conRec.Right = (SHORT)(uiCols - 1);
conRec.Bottom = (SHORT)(uiRows - 1);
SetConsoleWindowInfo( gv_hStdOut, TRUE, &conRec);
if( (gv_hStdIn = GetStdHandle( STD_INPUT_HANDLE)) ==
INVALID_HANDLE_VALUE)
{
return( FTXRC_MEM);
}
/* Save information about the screen attributes */
if( !GetConsoleScreenBufferInfo( gv_hStdOut, &gv_ConsoleScreenBufferInfo))
{
return( FTXRC_MEM);
}
FlushConsoleInputBuffer( gv_hStdIn);
SetConsoleMode( gv_hStdIn, 0);
SetConsoleTitle( (LPCTSTR)pucTitle);
#elif defined( FLM_UNIX)
ftxUnixDisplayInit();
F_UNREFERENCED_PARM( uiRows);
F_UNREFERENCED_PARM( uiCols);
F_UNREFERENCED_PARM( pucTitle);
#else
F_UNREFERENCED_PARM( uiRows);
F_UNREFERENCED_PARM( uiCols);
F_UNREFERENCED_PARM( pucTitle);
#endif
/* Set default cursor type */
ftxDisplaySetCursorType( pFtxInfo, WPS_CURSOR_VISIBLE | WPS_CURSOR_UNDERLINE);
/* Set default foreground/background colors */
ftxDisplaySetBackFore( WPS_BLACK, WPS_LIGHTGRAY);
gv_bDisplayInitialized = TRUE;
return( FTXRC_SUCCESS);
}
/****************************************************************************
Desc: Restores the "physical" screen to an initial state
****************************************************************************/
FSTATIC void
ftxDisplayExit( void)
{
if( gv_bDisplayInitialized)
{
#if defined( FLM_UNIX)
ftxUnixDisplayFree();
#elif defined( FLM_WIN)
/*
Reset the console cursor
*/
CONSOLE_CURSOR_INFO CursorInfo;
CursorInfo.bVisible = TRUE;
CursorInfo.dwSize = (DWORD)25;
SetConsoleCursorInfo( gv_hStdOut, &CursorInfo);
/*
Reset the screen attributes
*/
SetConsoleTextAttribute( gv_hStdOut,
gv_ConsoleScreenBufferInfo.wAttributes);
/*
Free the console if the application allocated one.
*/
if( gv_bAllocatedConsole)
{
(void)FreeConsole();
gv_bAllocatedConsole = FALSE;
}
#endif
}
gv_bDisplayInitialized = FALSE;
return;
}
/****************************************************************************
Desc: Resets (clears) the "physical" screen and positions the cursor
at the origin
****************************************************************************/
FSTATIC void
ftxDisplayReset(
FTX_INFO_p pFtxInfo
)
{
#if defined( FLM_WIN)
{
COORD coord;
DWORD dCharWritten;
DWORD dCharsToWrite;
CONSOLE_SCREEN_BUFFER_INFO Console;
F_UNREFERENCED_PARM( pFtxInfo);
if( GetConsoleScreenBufferInfo( gv_hStdOut, &Console) == FALSE)
return;
dCharsToWrite = Console.dwMaximumWindowSize.X *
Console.dwMaximumWindowSize.Y;
coord.X = 0;
coord.Y = 0;
// Fill the screen with spaces
FillConsoleOutputCharacter( gv_hStdOut, ' ',
dCharsToWrite, coord, &dCharWritten);
// Set the screen colors back to default colors.
FillConsoleOutputAttribute( gv_hStdOut, FOREGROUND_INTENSITY,
dCharsToWrite, coord, &dCharWritten);
}
#elif defined( FLM_UNIX)
F_UNREFERENCED_PARM( pFtxInfo);
ftxUnixDisplayReset();
#elif defined( FLM_NLM)
ClearScreen( pFtxInfo->pvScreenHandle);
#else
F_UNREFERENCED_PARM( pFtxInfo);
clrscr(); /* Clear entire screen */
#endif
return;
}
/****************************************************************************
Desc: Returns the size of the "physical" screen in columns and rows
****************************************************************************/
FSTATIC void
ftxDisplayGetSize(
FLMUINT * puiNumColsRV,
FLMUINT * puiNumRowsRV
)
{
#if defined( FLM_WIN)
CONSOLE_SCREEN_BUFFER_INFO Console;
if( GetConsoleScreenBufferInfo( gv_hStdOut, &Console) == FALSE)
return;
*puiNumColsRV = (FLMUINT)Console.dwSize.X;
*puiNumRowsRV = (FLMUINT)Console.dwSize.Y;
#elif defined( FLM_UNIX)
ftxUnixDisplayGetSize( puiNumColsRV, puiNumRowsRV);
#else
WORD screenHeight;
WORD screenWidth;
GetScreenSize( &screenHeight, &screenWidth);
*puiNumColsRV = (FLMUINT)screenWidth;
*puiNumRowsRV = (FLMUINT)screenHeight;
/* NLM may call GetScreenInfo() - but the screenID must be passed in */
#endif
}
/****************************************************************************
Desc : Sets the "physical" cursor attributes
****************************************************************************/
FSTATIC FLMBOOL
ftxDisplaySetCursorType(
FTX_INFO_p pFtxInfo,
FLMUINT uiType
)
{
#if defined( FLM_WIN)
{
CONSOLE_CURSOR_INFO CursorInfo;
F_UNREFERENCED_PARM( pFtxInfo);
if( uiType & WPS_CURSOR_INVISIBLE)
{
CursorInfo.dwSize = (DWORD)99;
CursorInfo.bVisible = FALSE;
}
else
{
CursorInfo.bVisible = TRUE;
if( uiType & WPS_CURSOR_BLOCK)
{
CursorInfo.dwSize = (DWORD)99;
}
else
{
CursorInfo.dwSize = (DWORD)25;
}
}
return( (FLMBOOL)SetConsoleCursorInfo( gv_hStdOut, &CursorInfo));
}
#elif defined( FLM_NLM)
if (uiType & WPS_CURSOR_INVISIBLE)
{
DisableInputCursor( pFtxInfo->pvScreenHandle);
}
else if (uiType & WPS_CURSOR_BLOCK)
{
EnableInputCursor( pFtxInfo->pvScreenHandle);
SetCursorStyle( pFtxInfo->pvScreenHandle,
0x0c00); // CURSOR_BLOCK
}
else
{
EnableInputCursor( pFtxInfo->pvScreenHandle);
SetCursorStyle( pFtxInfo->pvScreenHandle,
0x0c0B); // CURSOR_NORMAL
}
return( TRUE);
#else
F_UNREFERENCED_PARM( pFtxInfo);
F_UNREFERENCED_PARM( uiType);
return( FALSE);
#endif
}
/****************************************************************************
Desc: Sets the "physical" cursor to the column and row specified
****************************************************************************/
FSTATIC void
ftxDisplaySetCursorPos(
FTX_INFO_p pFtxInfo,
FLMUINT uiCol,
FLMUINT uiRow
)
{
if( uiCol == (FLMUINT)255 ||
uiRow == (FLMUINT)255)
{
return;
}
#if defined( FLM_NLM)
PositionOutputCursor( pFtxInfo->pvScreenHandle,
(WORD)uiRow, (WORD)uiCol);
// Wake up the input thread and send it a special code to
// cause the cursor to be re-positioned.
UngetKey( (struct ScreenStruct *)pFtxInfo->pvScreenHandle,
0xFE,
(BYTE)uiRow, (BYTE)uiCol, 0);
#elif defined( FLM_WIN)
{
COORD coord;
F_UNREFERENCED_PARM( pFtxInfo);
coord.X = (SHORT)uiCol;
coord.Y = (SHORT)uiRow;
SetConsoleCursorPosition( gv_hStdOut, coord);
}
#elif defined( FLM_UNIX)
F_UNREFERENCED_PARM( pFtxInfo);
ftxUnixDisplaySetCursorPos( uiCol, uiRow);
ftxUnixDisplayRefresh();
#else
F_UNREFERENCED_PARM( pFtxInfo);
/* gotoxy() uses 1 based numbers for borland/OS2- "Neither arg can be 0" */
gotoxy( (FLMUINT)(uiCol + 1), (FLMUINT)(uiRow + 1));
#endif
}
/****************************************************************************
Desc: Outputs a string to the "physical" screen
****************************************************************************/
#if defined( FLM_UNIX)
FSTATIC FLMUINT
ftxDisplayStrOut(
const char * pucString,
FLMUINT uiAttr
)
{
while( *pucString)
{
ftxUnixDisplayChar( *pucString, uiAttr);
pucString++;
}
return( (FLMUINT)0);
}
#endif
/****************************************************************************
Desc: Set the background and foreground colors of the "physical" screen
****************************************************************************/
FSTATIC void
ftxDisplaySetBackFore(
FLMUINT uiBackground,
FLMUINT uiForeground
)
{
#if defined( FLM_WIN)
FLMUINT uiAttrib = 0;
uiAttrib = (uiForeground & 0x8F) | (( uiBackground << 4) & 0x7F);
SetConsoleTextAttribute( gv_hStdOut, (WORD)uiAttrib);
#else
F_UNREFERENCED_PARM( uiBackground);
F_UNREFERENCED_PARM( uiForeground);
#endif
}
/****************************************************************************
Desc: Gets a character from the "physical" keyboard and converts keyboard
sequences/scan codes to WPK key strokes.
Ret: WPK Character
Notes: Does not support WP extended character input
****************************************************************************/
FLMUINT
ftxKBGetChar( void)
{
FLMUINT uiChar=0;
#ifdef FLM_NLM
BYTE scanCode;
BYTE keyType;
BYTE keyValue;
BYTE keyStatus;
#endif
#if defined( FLM_NLM)
get_key:
// Are we exiting?
if( gv_pFtxInfo->pbShutdown != NULL)
{
if( *(gv_pFtxInfo->pbShutdown) == TRUE)
{
return( uiChar);
}
}
// Get a key
GetKey( gv_pFtxInfo->pvScreenHandle,
&keyType, &keyValue,
&keyStatus, &scanCode, 0);
switch (keyType)
{
case 0: // NORMAL_KEY
if (keyStatus & 4) // CTRL key pressed
{
uiChar = WPK_CTRL_A + keyValue - 1;
}
else if (keyStatus & 8) // ALT key pressed
{
uiChar = ScanCodeToWPK [scanCode];
}
else // Handles SHIFT key case.
{
uiChar = (FLMUINT)keyValue;
}
break;
case 1: // FUNCTION_KEY
uiChar = ScanCodeToWPK [scanCode];
if (keyStatus & 4) // CTRL key pressed
{
uiChar = WPK_CTRL_F1 + (uiChar - WPK_F1);
}
else if (keyStatus & 8) // ALT key pressed
{
uiChar = WPK_ALT_F1 + (uiChar - WPK_F1);
}
else if (keyStatus & 2) // SHIFT key pressed
{
uiChar = WPK_SF1 + (uiChar - WPK_F1);
}
break;
case 2: // ENTER_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_ENTER;
}
else
{
uiChar = WPK_ENTER;
}
break;
case 3: // ESCAPE_KEY
uiChar = WPK_ESCAPE;
break;
case 4: // BACKSPACE_KEY
uiChar = WPK_BACKSPACE;
break;
case 5: // DELETE_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_DELETE;
}
else
{
uiChar = WPK_DELETE;
}
break;
case 6: // INSERT_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_INSERT;
}
else
{
uiChar = WPK_INSERT;
}
break;
case 7: // CURSOR_UP_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_UP;
}
else
{
uiChar = WPK_UP;
}
break;
case 8: // CURSOR_DOWN_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_DOWN;
}
else
{
uiChar = WPK_DOWN;
}
break;
case 9: // CURSOR_RIGHT_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_RIGHT;
}
else
{
uiChar = WPK_RIGHT;
}
break;
case 10: // CURSOR_LEFT_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_LEFT;
}
else
{
uiChar = WPK_LEFT;
}
break;
case 11: // CURSOR_HOME_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_HOME;
}
else
{
uiChar = WPK_HOME;
}
break;
case 12: // CURSOR_END_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_END;
}
else
{
uiChar = WPK_END;
}
break;
case 13: // CURSOR_PUP_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_PGUP;
}
else
{
uiChar = WPK_PGUP;
}
break;
case 14: // CURSOR_PDOWN_KEY
if (keyStatus & 4)
{
uiChar = WPK_CTRL_PGDN;
}
else
{
uiChar = WPK_PGDN;
}
break;
case 0xFE:
// Re-position the input cursor
PositionInputCursor( gv_pFtxInfo->pvScreenHandle,
(WORD)keyValue, (WORD)keyStatus);
goto get_key;
case 0xFF:
// Ping
uiChar = (FLMUINT)0xFFFF;
break;
default:
uiChar = (FLMUINT)keyValue;
break;
}
#elif defined( FLM_WIN)
uiChar = (FLMUINT) ftxWinKBGetChar();
#elif defined( FLM_UNIX)
uiChar = ftxUnixKBGetChar();
#else
uiChar = (FLMUINT) getch();
#endif
#if defined( FLM_WIN)
if( uiChar == 0 || uiChar == 0x00E0)
{
FLMUINT scanCode = (FLMUINT)ftxWinKBGetChar();
if( scanCode < (sizeof( ScanCodeToWPK) / sizeof( FLMUINT)))
{
uiChar = ScanCodeToWPK[ scanCode ];
}
}
else if( (uiChar > 0) && (uiChar < 0x20))
{
switch( uiChar)
{
case 0x0D:
uiChar = WPK_ENTER; break;
case 0x1B:
uiChar = WPK_ESCAPE; break;
case 0x08:
uiChar = WPK_BACKSPACE; break;
case 0x09:
uiChar = WPK_TAB; break;
case 0x0A:
uiChar = WPK_CTRL_ENTER; break;
/* Default is a ctrl-letter code */
default:
uiChar = (FLMUINT)((WPK_CTRL_A - 1) + uiChar);
break;
}
}
#endif
return( uiChar);
}
/****************************************************************************
Desc: Returns TRUE if a key is available from the "physical" keyboard
****************************************************************************/
FLMBOOL
ftxKBTest( void)
{
#if defined( FLM_UNIX)
return( ftxUnixKBTest());
#elif defined( FLM_WIN)
DWORD lRecordsRead;
INPUT_RECORD inputRecord;
FLMBOOL bKeyHit = FALSE;
// VISIT: If a keyboard handler has not been started, need
// to protect this code with a critical section?
for( ;;)
{
if( PeekConsoleInput( gv_hStdIn, &inputRecord, 1, &lRecordsRead))
{
if( !lRecordsRead)
{
break;
}
if( inputRecord.EventType == KEY_EVENT)
{
if( inputRecord.Event.KeyEvent.bKeyDown &&
(inputRecord.Event.KeyEvent.uChar.AsciiChar ||
ftxWinGetExtendedKeycode( &(inputRecord.Event.KeyEvent))))
{
bKeyHit = TRUE;
break;
}
}
if( !ReadConsoleInput( gv_hStdIn, &inputRecord, 1, &lRecordsRead))
{
goto Exit;
}
}
else
{
break;
}
}
Exit:
return( bKeyHit);
#elif defined( FLM_NLM)
return( (FLMBOOL)CheckKeyStatus( gv_pFtxInfo->pvScreenHandle));
#else
return( kbhit());
#endif
}
/****************************************************************************
Desc: Causes the console to "beep"
Ret: If the console does not support this feature, FALSE is returned.
****************************************************************************/
FLMBOOL
ftxBeep( void)
{
#if defined( FLM_WIN)
Beep( (DWORD)2000, (DWORD)250);
return( TRUE);
#else
return( FALSE);
#endif
}
/****************************************************************************
Desc: Gets a character from the Win console
Ret: Retrieved character
****************************************************************************/
#if defined( FLM_WIN)
FSTATIC FLMUINT
ftxWinKBGetChar()
{
INPUT_RECORD ConInpRec;
DWORD NumRead;
ftxWinCharPair * pCP;
int uiChar = 0; /* single character buffer */
/*
* check pushback buffer (chbuf) a for character
*/
if( chbuf != EOF )
{
/*
* something there, clear buffer and return the character.
*/
uiChar = (unsigned char)(chbuf & 0xFF);
chbuf = EOF;
return uiChar;
}
for( ;;)
{
if( gv_pFtxInfo->pbShutdown != NULL)
{
if( *(gv_pFtxInfo->pbShutdown) == TRUE)
{
return( 0);
}
}
/*
* Get a console input event.
*/
if( !ReadConsoleInput( gv_hStdIn,
&ConInpRec, 1L, &NumRead) || (NumRead == 0L))
{
uiChar = EOF;
break;
}
/*
* Look for, and decipher, key events.
*/
if ( ConInpRec.EventType == KEY_EVENT)
{
if( ConInpRec.Event.KeyEvent.bKeyDown)
{
if ( !(ConInpRec.Event.KeyEvent.dwControlKeyState &
(LEFT_ALT_PRESSED | RIGHT_ALT_PRESSED | SHIFT_PRESSED | CAPSLOCK_ON)))
{
if( (uiChar = (FLMUINT)ConInpRec.Event.KeyEvent.uChar.AsciiChar) != 0)
{
break;
}
}
/*
* Hard case: either an extended code or an event which should
* not be recognized. let _getextendedkeycode() do the work...
*/
if( (pCP = ftxWinGetExtendedKeycode(
&(ConInpRec.Event.KeyEvent))) != NULL)
{
uiChar = pCP->LeadChar;
if( pCP->SecondChar)
{
chbuf = pCP->SecondChar;
}
break;
}
}
else
{
if( ConInpRec.Event.KeyEvent.uChar.AsciiChar == (unsigned char)0xFF &&
ConInpRec.Event.KeyEvent.wRepeatCount == 0)
{
// Ping
uiChar = (FLMUINT)0xFFFF;
break;
}
}
}
}
return( uiChar);
}
#endif
#if defined( FLM_WIN)
FSTATIC ftxWinCharPair *
ftxWinGetExtendedKeycode(
KEY_EVENT_RECORD * pKE)
{
DWORD CKS; /* hold dwControlKeyState value */
ftxWinCharPair * pCP; /* pointer to CharPair containing extended
code */
int iLoop;
if( (CKS = pKE->dwControlKeyState) & ENHANCED_KEY )
{
/*
* Find the appropriate entry in EnhancedKeys[]
*/
for( pCP = NULL, iLoop = 0; iLoop < FTX_WIN_NUM_EKA_ELTS; iLoop++)
{
if( ftxWinEnhancedKeys[ iLoop].ScanCode == pKE->wVirtualScanCode)
{
if( CKS & (LEFT_ALT_PRESSED | RIGHT_ALT_PRESSED))
{
pCP = &(ftxWinEnhancedKeys[ iLoop].AltChars);
}
else if( CKS & (LEFT_CTRL_PRESSED | RIGHT_CTRL_PRESSED))
{
pCP = &(ftxWinEnhancedKeys[ iLoop].CtrlChars);
}
else if( CKS & SHIFT_PRESSED)
{
pCP = &(ftxWinEnhancedKeys[ iLoop].ShiftChars);
}
else
{
pCP = &(ftxWinEnhancedKeys[ iLoop].RegChars);
}
break;
}
}
}
else
{
/*
* Regular key or a keyboard event which shouldn't be recognized.
* Determine which by getting the proper field of the proper
* entry in NormalKeys[], and examining the extended code.
*/
if( CKS & (LEFT_ALT_PRESSED | RIGHT_ALT_PRESSED))
{
pCP = &(ftxWinNormalKeys[pKE->wVirtualScanCode].AltChars);
}
else if( CKS & (LEFT_CTRL_PRESSED | RIGHT_CTRL_PRESSED))
{
pCP = &(ftxWinNormalKeys[pKE->wVirtualScanCode].CtrlChars);
}
else if( CKS & SHIFT_PRESSED)
{
pCP = &(ftxWinNormalKeys[pKE->wVirtualScanCode].ShiftChars);
}
else
{
pCP = &(ftxWinNormalKeys[pKE->wVirtualScanCode].RegChars);
if( (CKS & CAPSLOCK_ON) && pCP->SecondChar == 0)
{
if( pCP->LeadChar >= 'a' && pCP->LeadChar <= 'z')
{
pCP->LeadChar = pCP->LeadChar - 'a' + 'A';
}
}
}
if( pCP->LeadChar == 0 && pCP->SecondChar == 0)
{
pCP = NULL;
}
}
return( pCP);
}
#endif
/****************************************************************************
Desc:
****************************************************************************/
RCODE _ftxDefaultDisplayHandler(
F_Thread * pThread)
{
#if defined( FLM_WIN)
FLMUINT uiRefreshCount = 0;
#endif
for( ;;)
{
if( pThread->getShutdownFlag())
{
break;
}
if( gv_pFtxInfo->pbShutdown != NULL)
{
if( *(gv_pFtxInfo->pbShutdown) == TRUE)
{
break;
}
}
#if defined( FLM_WIN)
if( ++uiRefreshCount > 60)
{
uiRefreshCount = 0;
/*
Update the cursor to work around a bug in NT where the
cursor is set to visible when the console is made
full-screen.
*/
FTXRefreshCursor( gv_pFtxInfo);
}
#endif
FTXRefresh( gv_pFtxInfo);
f_sleep( 50); // Refresh 20 times a second
}
return( FERR_OK);
}
/****************************************************************************
Desc:
****************************************************************************/
RCODE _ftxDefaultKeyboardHandler(
F_Thread * pThread)
{
FLMUINT uiChar;
FTXEnablePingChar( gv_pFtxInfo);
for( ;;)
{
if( pThread->getShutdownFlag())
{
break;
}
if( gv_pFtxInfo->pbShutdown != NULL)
{
if( *(gv_pFtxInfo->pbShutdown) == TRUE)
{
break;
}
}
uiChar = 0;
#if !defined( FLM_NLM) && !defined( FLM_WIN) // NetWare and Win will wake up periodically
// to check for shutdown and therefore do not
// need to poll the keyboard.
if( ftxKBTest())
#endif
{
uiChar = ftxKBGetChar();
if( gv_pFtxInfo->pKeyHandler && uiChar != 0xFFFF)
{
gv_pFtxInfo->pKeyHandler( gv_pFtxInfo, uiChar,
&uiChar, gv_pFtxInfo->pvKeyHandlerData);
}
switch( uiChar)
{
case 0:
{
// Ignore the keystroke
break;
}
case WPK_CTRL_A:
{
FTXCycleScreensNext( gv_pFtxInfo);
FTXRefresh( gv_pFtxInfo);
break;
}
case WPK_CTRL_B:
{
flmAssert( 0);
break;
}
case WPK_CTRL_L:
{
FTXInvalidate( gv_pFtxInfo);
FTXRefresh( gv_pFtxInfo);
break;
}
case WPK_CTRL_S:
{
FTXCycleScreensPrev( gv_pFtxInfo);
FTXRefresh( gv_pFtxInfo);
break;
}
case 0xFFFF:
{
// Ping
break;
}
default:
{
FTXAddKey( gv_pFtxInfo, uiChar);
break;
}
}
}
#if !defined( FLM_NLM) && !defined( FLM_WIN)
f_sleep( 0);
#endif
}
return( FERR_OK);
}
/****************************************************************************
Desc:
****************************************************************************/
FSTATIC int FTXFormSprintfNotHandled(int formChar, unsigned width,
unsigned precision, int flags, void *passThru, f_va_list * args)
{
static const char *nfmtr = "<no formatter>";
SPRINTF_INFO *info = (SPRINTF_INFO *)passThru;
int len = (int)(info->iMaxLen < sizeof nfmtr - 1? info->iMaxLen: sizeof nfmtr - 1);
(void)formChar; (void)width; (void)precision; (void)flags; (void)args;
f_memcpy(info->szDestStr, nfmtr, len);
info->szDestStr += len;
info->iMaxLen -= len;
return 0;
}
/****************************************************************************
Desc:
****************************************************************************/
FSTATIC int FTXFormSprintfChar( int iFormChar, unsigned uiWidth, unsigned uiPrecision,
int iFlags, void *passThru, f_va_list * args)
{
SPRINTF_INFO *info = (SPRINTF_INFO *)passThru;
char c = (iFormChar == '%')? '%' : f_va_arg(*args, int);
(void)iFormChar; (void)uiWidth; (void)uiPrecision; (void)iFlags;
if (!info->iMaxLen)
return 0;
*info->szDestStr++ = c;
info->iMaxLen--;
return 0;
}
int FTXSprintf(
int iMaxLen,
char * szDestStr,
const char * szFormatStr, ...)
{
int iLen;
f_va_list args;
f_va_start( args, szFormatStr);
iLen = FTXVSprintf( iMaxLen, szDestStr, szFormatStr, (f_va_list *)&args);
f_va_end( args);
return iLen;
}
/****************************************************************************
Desc:
****************************************************************************/
int FTXVSprintf(
int iMaxLen,
char * szDestStr,
const char * szFormatStr,
f_va_list * args)
{
SPRINTF_INFO info;
if( !iMaxLen)
{
return 0;
}
info.iMaxLen = iMaxLen - 1; // leave room for terminator
info.szDestStr = szDestStr;
FTXParsePrintfArgs( &SPrintFFormatters, szFormatStr, args, &info);
*info.szDestStr = 0;
return( (int)(info.szDestStr - szDestStr));
}
/****************************************************************************
Desc:
****************************************************************************/
int FTXFormSprintfString(int formChar, unsigned width, unsigned precision,
int flags, void *passThru, f_va_list * args)
{
static char nullPointerStr[] = "<null>";
SPRINTF_INFO *info = (SPRINTF_INFO *)passThru;
unsigned length, count;
char *s = f_va_arg(*args, char *);
char *dest = (char *)(info->szDestStr);
if( info->iMaxLen == 0)
{
return 0;
}
if( !s)
{
length = (unsigned)f_strlen( nullPointerStr);
}
else if (formChar == 'S')
{
length = *(FLMBYTE *)s++;
}
else if (formChar == 'U')
{
FLMUNICODE * puzUnicode = (FLMUNICODE *)s;
length = 0;
while( *puzUnicode)
{
if( *puzUnicode <= 0x007F)
{
length++;
}
else
{
length += 8;
}
puzUnicode++;
}
}
else
{
length = (unsigned)(!formChar? width: f_strlen(s));
}
if (width > info->iMaxLen)
{
width = (unsigned)info->iMaxLen;
}
if (length > info->iMaxLen)
{
length = (unsigned)info->iMaxLen;
}
if (precision > 0 && length > precision)
{
length = precision;
}
count = width - length;
if (length < width && !(flags & MINUS_FLAG))
{ // right justify
f_memset( dest, (FLMBYTE)' ', count);
dest += count;
}
if (!s)
{
f_memcpy( dest, nullPointerStr, length);
dest += length;
}
else if (formChar == 'U')
{
FLMUNICODE * puzUnicode = (FLMUNICODE *)s;
FLMUINT uiCount = 0;
while( *puzUnicode && uiCount < length)
{
if( *puzUnicode <= 0x007F)
{
*dest = *((char *)puzUnicode);
dest++;
uiCount++;
}
else
{
if( (unsigned)(uiCount + 8) >= length)
{
break;
}
f_sprintf( dest, "[0x%4.4X]", (unsigned)(*puzUnicode));
dest += 8;
uiCount += 8;
}
puzUnicode++;
}
}
else
{
f_memcpy(dest, s, length);
dest += length;
}
if( length < width && (flags & MINUS_FLAG))
{ // left justify
f_memset(dest, (FLMBYTE)' ', count);
dest += count;
}
count = (unsigned)(dest - (char *)info->szDestStr);
info->iMaxLen -= count;
info->szDestStr = dest;
return 0;
}
/****************************************************************************
Desc:
****************************************************************************/
int FTXParsePrintfArgs(FORMATTERTABLE *former, const char *fmt,
f_va_list * args, void *passThru)
{
int err, flags, c;
unsigned width, precision;
const char *textStart = fmt;
FORMHAND handler;
while ((c = (FLMBYTE)*fmt++) != 0)
{
if (c != '%')
continue;
width = (unsigned)(fmt - textStart - 1);
if ((err = FTXProcessFormatStringText(former, width,
passThru, textStart)) != 0)
return err;
FTXProcessFieldInfo(&fmt, &width, &precision, &flags, args);
if ((c = (FLMBYTE)*fmt++) >= 'a' && c <= 'z')
handler = former->lowerCaseHandlers[c - 'a'];
else if (c >= 'A' && c <= 'Z')
handler = former->upperCaseHandlers[c - 'A'];
else if (c == '%')
handler = former->percentHandler;
else
handler = FTXFormSprintfNotHandled;
if ((err = handler(c, width, precision, flags, passThru, args)) != 0)
return err;
textStart = fmt;
}
return FTXProcessFormatStringText(former, (unsigned)(fmt - textStart - 1),
passThru, textStart);
}
/****************************************************************************
Desc:
****************************************************************************/
FSTATIC int FTXProcessFormatStringText(FORMATTERTABLE *former, unsigned len,
void *passThru, ...)
{
int err;
f_va_list args;
f_va_start(args, passThru);
err = len && former->formatTextHandler?
former->formatTextHandler(0, len, len, 0, passThru, (f_va_list *)&args): 0;
f_va_end(args);
return err;
}
/****************************************************************************
Desc:
****************************************************************************/
FSTATIC void FTXProcessFieldInfo(const char **format, unsigned *width,
unsigned *precision, int *flags, f_va_list * args)
{
const char *ptr = *format;
/* process flags */
*flags = 0;
while (*ptr == '-' || *ptr == '+' || *ptr == ' '
|| *ptr == '#' || *ptr == '0')
{
switch (*ptr)
{
case '-': *flags |= MINUS_FLAG; break;
case '+': *flags |= PLUS_FLAG; break;
case ' ': *flags |= SPACE_FLAG; break;
case '#': *flags |= POUND_FLAG; break;
case '0': *flags |= ZERO_FLAG; break;
}
ptr++;
}
/* process width */
*width = 0;
if (*ptr == '*')
{
*width = f_va_arg(*args, unsigned int);
++ptr;
}
else while (*ptr >= '0' && *ptr <= '9')
{
*width = (*width * 10) + (*ptr - '0');
++ptr;
}
/* process precision */
*precision = 0;
if (*ptr == '.')
{
++ptr;
if (*ptr == '*')
{
*precision = f_va_arg(*args, unsigned int);
++ptr;
}
else while (*ptr >= '0' && *ptr <= '9')
{
*precision = (*precision * 10) + (*ptr - '0');
++ptr;
}
}
/* size modifiers */
switch(*ptr)
{
case 'L': *flags |= DOUBLE_FLAG; ++ptr; break;
case 'l': *flags |= LONG_FLAG; ++ptr; break;
case 'h': *flags |= SHORT_FLAG; ++ptr; break;
}
*format = ptr;
return;
}
/* Percent formating prefixes */
#define P_NONE 0
#define P_MINUS 1
#define P_PLUS 2
#define P_POUND 3
/****************************************************************************
Desc:
****************************************************************************/
FSTATIC int FTXFormSprintfNumber(int formChar, unsigned width, unsigned precision,
int flags, void *passThru, f_va_list * args)
{
SPRINTF_INFO *info = (SPRINTF_INFO *)passThru;
unsigned count, prefix = P_NONE, length, base = 10, maxLen = (unsigned)info->iMaxLen;
char numberBuffer[64];
char * s;
char * dest = (char *)info->szDestStr;
unsigned long arg;
if (flags & SHORT_FLAG)
{
arg = f_va_arg(*args, int);
}
else if (flags & LONG_FLAG)
{
arg = f_va_arg(*args, long int);
}
else
{
arg = f_va_arg(*args, int);
}
switch (formChar)
{
case 'd':
if ((long)arg < 0)
{ /* handle negatives */
prefix = P_MINUS;
if (width > 0)
width--;
arg = -(long)arg;
}
else if (flags & PLUS_FLAG)
{
prefix = P_PLUS;
if (width > 0)
width--;
}
break;
case 'o':
base = 8;
break;
case 'x':
case 'X':
if (flags & POUND_FLAG && arg)
{
prefix = P_POUND;
if (width > 1)
width -= 2;
}
base = 16;
break;
}
length = FTXPrintNumber(arg, base, numberBuffer);
numberBuffer[length] = 0;
if (formChar == 'X')
{
char *p;
for (p = numberBuffer; *p; p++)
{
if ((*p >= 'a') && (*p <= 'z'))
*p = (char)(*p - 'a' + 'A');
}
}
if (width < length)
width = length;
if (flags & ZERO_FLAG)
precision = width; /* zero fill */
else if (!(flags & MINUS_FLAG))
while (width > length && width > precision && maxLen > 0) /* right justify */
{
*dest++ = ' ';
maxLen--;
--width;
}
/* handle the prefix if any */
if (maxLen) switch (prefix)
{
case P_MINUS: *dest++ = '-'; maxLen--; break;
case P_PLUS: *dest++ = '+'; maxLen--; break;
case P_POUND: *dest++ = '0'; maxLen--; *dest++ = (char)formChar; maxLen--; break;
}
/* handle the precision */
while (length < precision && maxLen)
{
*dest++ = '0';
maxLen--;
--precision;
--width;
}
/* print out the number */
for (count = length, s = numberBuffer; count > 0 && maxLen; count--, maxLen--)
*dest++ = *s++;
if (flags & MINUS_FLAG)
while (length < width && maxLen > 0) /* left justify */
{
*dest++ = ' ';
maxLen--;
--width;
}
info->szDestStr = dest;
info->iMaxLen = maxLen;
return 0;
}
/****************************************************************************
Desc:
****************************************************************************/
FSTATIC unsigned FTXPrintNumber( FLMUINT number, unsigned base, char *buffer)
{
FLMUINT c = number % base;
FLMUINT index = number / base;
index = index? FTXPrintNumber(index, base, buffer): 0;
buffer[index] = (char)(c > 9? c + 'a' - 10: c + '0');
return (unsigned)index + 1;
}
/****************************************************************************
Desc:
****************************************************************************/
FTX_INFO_p _getGlobalFtxInfo( void)
{
return( gv_pFtxInfo);
}
/****************************************************************************
Desc:
****************************************************************************/
RCODE _ftxBackgroundThread(
F_Thread * pThread)
{
for( ;;)
{
// Ping the keyboard handler to cause it to wake up
// periodically to check for the shutdown flag
if( gv_pFtxInfo->bEnablePingChar)
{
#ifdef FLM_NLM
UngetKey( (struct ScreenStruct *)gv_pFtxInfo->pvScreenHandle,
0xFF, 0, 0, 0);
#elif defined( FLM_WIN)
{
INPUT_RECORD inputRec;
DWORD numWritten;
f_memset( &inputRec, (FLMBYTE)0, sizeof( INPUT_RECORD));
inputRec.EventType = KEY_EVENT;
inputRec.Event.KeyEvent.bKeyDown = FALSE;
inputRec.Event.KeyEvent.wRepeatCount = 0;
inputRec.Event.KeyEvent.wVirtualKeyCode = 0;
inputRec.Event.KeyEvent.wVirtualScanCode = 0;
inputRec.Event.KeyEvent.uChar.AsciiChar = (unsigned char)0xFF;
inputRec.Event.KeyEvent.dwControlKeyState = 0;
WriteConsoleInput( gv_hStdIn, &inputRec, 1, &numWritten);
}
#endif
}
if( pThread->getShutdownFlag())
{
break;
}
f_sleep( 250);
}
return( FERR_OK);
}
Reference in New Issue View Git Blame Copy Permalink