fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

move gtwin.c to gt dir

Browse Source
This commit is contained in:
Leslee Griffith
1999-05-27 05:02:42 +00:00
parent 192ca545c6
commit 0ff0e0d5cf
1 changed files with 0 additions and 223 deletions
Download Patch File Download Diff File Expand all files Collapse all files

223
harbour/source/rtl/gtwin.c
View File

@@ -1,223 +0,0 @@
/*
* GTWIN.C: Video subsystem for Windows 95/NT compilers.
*
* This module is based on VIDMGR by Andrew Clarke and modified for
* the Harbour project
*/
#include <stdlib.h>
#include <string.h>
#define WIN32_LEAN_AND_MEAN
#include <windows.h>
#include <gtapi.h>
#ifdef __CYGWIN32__
typedef WORD far *LPWORD;
#endif
static HANDLE HInput = INVALID_HANDLE_VALUE;
static HANDLE HOutput = INVALID_HANDLE_VALUE;
static unsigned long key_hit = 0xFFFFFFFFUL;
void gtInit(void)
{
HInput = GetStdHandle(STD_INPUT_HANDLE);
HOutput = GetStdHandle(STD_OUTPUT_HANDLE);
}
void gtDone(void)
{
CloseHandle(HInput);
HInput = INVALID_HANDLE_VALUE;
CloseHandle(HOutput);
HOutput = INVALID_HANDLE_VALUE;
}
char gtGetScreenWidth(void)
{
CONSOLE_SCREEN_BUFFER_INFO csbi;
GetConsoleScreenBufferInfo(HOutput, &csbi);
return (char)csbi.dwSize.X;
}
char gtGetScreenHeight(void)
{
CONSOLE_SCREEN_BUFFER_INFO csbi;
GetConsoleScreenBufferInfo(HOutput, &csbi);
return (char)csbi.dwSize.Y;
}
void gtGotoXY(char x, char y)
{
COORD dwCursorPosition;
dwCursorPosition.X = (SHORT) (x - 1);
dwCursorPosition.Y = (SHORT) (y - 1);
SetConsoleCursorPosition(HOutput, dwCursorPosition);
}
void gtSetCursorStyle(int style)
{
CONSOLE_CURSOR_INFO cci;
GetConsoleCursorInfo(HOutput, &cci);
switch (style)
{
case 0:
cci.bVisible = 0;
SetConsoleCursorInfo(HOutput, &cci);
break;
case 1:
cci.bVisible = 1;
cci.dwSize = 12;
SetConsoleCursorInfo(HOutput, &cci);
break;
case 2:
cci.bVisible = 1;
cci.dwSize = 99;
SetConsoleCursorInfo(HOutput, &cci);
break;
case 3:
cci.bVisible = 1;
cci.dwSize = 49;
SetConsoleCursorInfo(HOutput, &cci);
break;
default:
break;
}
}
int gtGetCursorStyle(void)
{
CONSOLE_CURSOR_INFO cci;
int rc;
GetConsoleCursorInfo(HOutput, &cci);
if(cci.bVisible)
{
rc=0;
}
else
{
switch(cci.dwSize)
{
case 12:
rc=1;
break;
case 49:
rc=2;
break;
case 99:
rc=3;
break;
/* TODO: cannot tell if the block is upper or lower for cursor */
default:
rc=4;
}
}
return(rc);
}
void gtPuts(char x, char y, char attr, char *str, int len)
{
DWORD i, dwlen;
COORD coord;
LPWORD pwattr;
pwattr = malloc(strlen(str) * sizeof(*pwattr));
if (!pwattr)
{
return;
}
coord.X = (DWORD) (x - 1);
coord.Y = (DWORD) (y - 1);
for (i = 0; i < strlen(str); i++)
{
*(pwattr + i) = attr;
}
WriteConsoleOutputCharacterA(HOutput, str, (DWORD) len, coord, &dwlen);
WriteConsoleOutputAttribute(HOutput, pwattr, (DWORD) len, coord, &dwlen);
free(pwattr);
}
void gtGetText(char x1, char y1, char x2, char y2, char *dest)
{
DWORD i, len, width;
COORD coord;
LPWORD pwattr;
char y, *pstr;
width = (x2 - x1 + 1);
pwattr = malloc(width * sizeof(*pwattr));
if (!pwattr)
{
return;
}
pstr = malloc(width);
if (!pstr)
{
free(pwattr);
return;
}
for (y = y1; y <= y2; y++)
{
coord.X = (DWORD) (x1 - 1);
coord.Y = (DWORD) (y - 1);
ReadConsoleOutputCharacterA(HOutput, pstr, width, coord, &len);
ReadConsoleOutputAttribute(HOutput, pwattr, width, coord, &len);
for (i = 0; i < width; i++)
{
*dest = *(pstr + i);
dest++;
*dest = (char)*(pwattr + i);
dest++;
}
}
free(pwattr);
free(pstr);
}
void gtPutText(char x1, char y1, char x2, char y2, char *srce)
{
DWORD i, len, width;
COORD coord;
LPWORD pwattr;
char y, *pstr;
width = (x2 - x1 + 1);
pwattr = malloc(width * sizeof(*pwattr));
if (!pwattr)
{
return;
}
pstr = malloc(width);
if (!pstr)
{
free(pwattr);
return;
}
for (y = y1; y <= y2; y++)
{
for (i = 0; i < width; i++)
{
*(pstr + i) = *srce;
srce++;
*(pwattr + i) = *srce;
srce++;
}
coord.X = (DWORD) (x1 - 1);
coord.Y = (DWORD) (y - 1);
WriteConsoleOutputCharacterA(HOutput, pstr, width, coord, &len);
WriteConsoleOutputAttribute(HOutput, pwattr, width, coord, &len);
}
free(pwattr);
free(pstr);
}