Category : C Source Code
Archive   : CURSESNT.ZIP
Filename : INITSCR.C

/****************************************************************/
/* Initscr() routine of the PCcurses package */
/* */
/****************************************************************/
/* This version of curses is based on ncurses, a curses version */
/* originally written by Pavel Curtis at Cornell University. */
/* I have made substantial changes to make it run on IBM PC's, */
/* and therefore consider myself free to make it public domain. */
/* Bjorn Larsson ([email protected]) */
/****************************************************************/
/* 1.4: Use of short wherever possible. Portability */
/* improvements: 900114 */
/* 1.3: MSC -W3, Turbo'C' -w -w-pro checkes: 881005 */
/* 1.2: Rcsid[] string for maintenance: 881002 */
/* 1.1: Revision string in the code: 880306 */
/* 1.0: Release: 870515 */
/****************************************************************/

#include
#include

#ifdef WIN32
#include
#endif

char _curses_initscr_rcsid[] = "@(#)initscr.c v.1.4 - 900114";
char _curses_revcod[] = CURSES_RCS_ID;
char _curses_cpyrgt[] = "Author B. Larsson - Public Domain";

extern void exit(); /* to avoid warings */

WINDOW *curscr; /* the current screen image */
WINDOW *stdscr; /* the default screen window */
cursv _cursvar; /* curses variables */
int LINES; /* terminal height */
int COLS; /* terminal width */

#ifdef WIN32
HANDLE hConIn, hConOut;
#endif

/****************************************************************/
/* Initscr() does neccessary initializations for the PCcurses */
/* package. It MUST be called before any other curses routines. */
/****************************************************************/

int initscr()
{

_cursvar.cursrow = -1; /* Initial cursor unknown */
_cursvar.curscol = -1;
_cursvar.autocr = TRUE; /* lf -> crlf by default */
_cursvar.raw = FALSE; /* tty I/O modes */
_cursvar.cbreak = FALSE;
_cursvar.echo = TRUE;
_cursvar.refrbrk = FALSE; /* no premature end of refresh */
_cursvar.orgcbr = (bool)_cursesgcb();/* original ^BREAK setting */

#ifdef WIN32
LINES = _cursesglines();
#else
LINES = 25; /* this ought to be fixed */
#endif
COLS = _cursesgcols();
#ifdef WIN32
hConOut = CreateFile("CONOUT$", GENERIC_READ | GENERIC_WRITE,
FILE_SHARE_READ | FILE_SHARE_WRITE,
NULL, OPEN_EXISTING, 0, NULL);
hConIn = CreateFile("CONIN$", GENERIC_READ | GENERIC_WRITE,
FILE_SHARE_READ | FILE_SHARE_WRITE,
NULL, OPEN_EXISTING, 0, NULL);
#endif
if ((_cursvar.tmpwin = newwin(LINES,COLS,0,0)) == (WINDOW *)ERR)
exit(1);
if ((curscr = newwin(LINES,COLS,0,0)) == (WINDOW *)ERR)
exit(1);
if ((stdscr = newwin(LINES,COLS,0,0)) == (WINDOW *)ERR)
exit(1);
curscr->_clear = FALSE;
return(OK);
} /* initscr */