ncurses 5.7 - patch 20100123
[ncurses.git] / ncurses / base / lib_newterm.c
index 3e6034c271f11bc2b01d656f9effd48e25458dfc..c276a0fccc1a4e0d08648c0a928a8da733c04147 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 1998-2007,2008 Free Software Foundation, Inc.              *
+ * Copyright (c) 1998-2008,2009 Free Software Foundation, Inc.              *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
@@ -30,6 +30,7 @@
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
  *     and: Thomas E. Dickey                        1996-on                 *
+ *     and: Juergen Pfeifer                         2009                    *
  ****************************************************************************/
 
 /*
 #define _POSIX_SOURCE
 #endif
 
-#include <term.h>              /* clear_screen, cup & friends, cur_term */
+#ifndef CUR
+#define CUR SP_TERMTYPE
+#endif
+
 #include <tic.h>
 
-MODULE_ID("$Id: lib_newterm.c,v 1.71 2008/06/21 20:55:11 tom Exp $")
+MODULE_ID("$Id: lib_newterm.c,v 1.84 2009/11/28 22:43:51 tom Exp $")
+
+#ifdef USE_TERM_DRIVER
+#define NumLabels      InfoOf(SP_PARM).numlabels
+#else
+#define NumLabels      num_labels
+#endif
 
 #ifndef ONLCR                  /* Allows compilation under the QNX 4.2 OS */
 #define ONLCR 0
@@ -63,16 +73,17 @@ MODULE_ID("$Id: lib_newterm.c,v 1.71 2008/06/21 20:55:11 tom Exp $")
  * is supposed to behave as if it calls newterm, we do it here.
  */
 static NCURSES_INLINE int
-_nc_initscr(void)
+_nc_initscr(NCURSES_SP_DCL0)
 {
     int result = ERR;
+    TERMINAL *term = TerminalOf(SP_PARM);
 
     /* for extended XPG4 conformance requires cbreak() at this point */
     /* (SVr4 curses does this anyway) */
-    if (cbreak() == OK) {
+    if (NCURSES_SP_NAME(cbreak) (NCURSES_SP_ARG) == OK) {
        TTY buf;
 
-       buf = cur_term->Nttyb;
+       buf = term->Nttyb;
 #ifdef TERMIOS
        buf.c_lflag &= ~(ECHO | ECHONL);
        buf.c_iflag &= ~(ICRNL | INLCR | IGNCR);
@@ -82,8 +93,9 @@ _nc_initscr(void)
 #else
        memset(&buf, 0, sizeof(buf));
 #endif
-       if ((result = _nc_set_tty_mode(&buf)) == OK)
-           cur_term->Nttyb = buf;
+       result = NCURSES_SP_NAME(_nc_set_tty_mode) (NCURSES_SP_ARGx &buf);
+       if (result == OK)
+           term->Nttyb = buf;
     }
     return result;
 }
@@ -95,13 +107,30 @@ _nc_initscr(void)
  * initialized.
  */
 NCURSES_EXPORT(void)
+NCURSES_SP_NAME(filter) (NCURSES_SP_DCL0)
+{
+    START_TRACE();
+    T((T_CALLED("filter(%p)"), (void *) SP_PARM));
+#if NCURSES_SP_FUNCS
+    if (IsPreScreen(SP_PARM)) {
+       SP_PARM->_filtered = TRUE;
+    }
+#else
+    _nc_prescreen.filter_mode = TRUE;
+#endif
+    returnVoid;
+}
+
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(void)
 filter(void)
 {
     START_TRACE();
-    T((T_CALLED("filter")));
+    T((T_CALLED("filter()")));
     _nc_prescreen.filter_mode = TRUE;
     returnVoid;
 }
+#endif
 
 #if NCURSES_EXT_FUNCS
 /*
@@ -109,60 +138,125 @@ filter(void)
  * requiring it to also be filtered.
  */
 NCURSES_EXPORT(void)
+NCURSES_SP_NAME(nofilter) (NCURSES_SP_DCL0)
+{
+    START_TRACE();
+    T((T_CALLED("nofilter(%p)"), (void *) SP_PARM));
+#if NCURSES_SP_FUNCS
+    if (IsPreScreen(SP_PARM)) {
+       SP_PARM->_filtered = FALSE;
+    }
+#else
+    _nc_prescreen.filter_mode = FALSE;
+#endif
+    returnVoid;
+}
+
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(void)
 nofilter(void)
 {
     START_TRACE();
-    T((T_CALLED("nofilter")));
+    T((T_CALLED("nofilter()")));
     _nc_prescreen.filter_mode = FALSE;
     returnVoid;
 }
 #endif
+#endif /* NCURSES_EXT_FUNCS */
 
 NCURSES_EXPORT(SCREEN *)
-newterm(NCURSES_CONST char *name, FILE *ofp, FILE *ifp)
+NCURSES_SP_NAME(newterm) (NCURSES_SP_DCLx
+                         NCURSES_CONST char *name,
+                         FILE *ofp,
+                         FILE *ifp)
 {
     int value;
     int errret;
-    SCREEN *current;
     SCREEN *result = 0;
+    SCREEN *current;
     TERMINAL *its_term;
+    FILE *_ofp = ofp ? ofp : stdout;
+    FILE *_ifp = ifp ? ifp : stdin;
+    int cols;
+    int slk_format;
+    int filter_mode;
+    TERMINAL *new_term = 0;
 
     START_TRACE();
-    T((T_CALLED("newterm(\"%s\",%p,%p)"), name, ofp, ifp));
+    T((T_CALLED("newterm(%p, \"%s\", %p,%p)"),
+       (void *) SP_PARM,
+       name,
+       (void *) ofp,
+       (void *) ifp));
+
+#if NCURSES_SP_FUNCS
+    assert(SP_PARM != 0);
+    if (SP_PARM == 0)
+       returnSP(SP_PARM);
+#endif
 
+    _nc_init_pthreads();
     _nc_lock_global(curses);
 
-    current = SP;
-    its_term = (SP ? SP->_term : 0);
+    current = CURRENT_SCREEN;
+    its_term = (current ? current->_term : 0);
 
+    INIT_TERM_DRIVER();
     /* this loads the capability entry, then sets LINES and COLS */
-    if (setupterm(name, fileno(ofp), &errret) != ERR) {
-       int slk_format = _nc_globals.slk_format;
+    if (
+#if NCURSES_SP_FUNCS
+          SP_PARM->_prescreen &&
+#endif
+          TINFO_SETUP_TERM(&new_term, name,
+                           fileno(_ofp), &errret, FALSE) != ERR) {
+
+       _nc_set_screen(0);
+#ifdef USE_TERM_DRIVER
+       assert(new_term != 0);
+#endif
+
+#if NCURSES_SP_FUNCS
+       slk_format = SP_PARM->slk_format;
+       filter_mode = SP_PARM->_filtered;
+#else
+       slk_format = _nc_globals.slk_format;
+       filter_mode = _nc_prescreen.filter_mode;
+#endif
 
        /*
         * This actually allocates the screen structure, and saves the original
         * terminal settings.
         */
-       _nc_set_screen(0);
-
-       /* allow user to set maximum escape delay from the environment */
-       if ((value = _nc_getenv_num("ESCDELAY")) >= 0) {
-           set_escdelay(value);
-       }
-
-       if (_nc_setupscreen(LINES,
-                           COLS,
-                           ofp,
-                           _nc_prescreen.filter_mode,
-                           slk_format) == ERR) {
+       if (NCURSES_SP_NAME(_nc_setupscreen) (
+#if NCURSES_SP_FUNCS
+                                                &SP_PARM,
+#endif
+                                                *(ptrLines(SP_PARM)),
+                                                *(ptrCols(SP_PARM)),
+                                                _ofp,
+                                                filter_mode,
+                                                slk_format) == ERR) {
            _nc_set_screen(current);
            result = 0;
        } else {
+#ifdef USE_TERM_DRIVER
+           TERMINAL_CONTROL_BLOCK *TCB;
+#elif !NCURSES_SP_FUNCS
+           SP_PARM = CURRENT_SCREEN;
+#endif
+           assert(SP_PARM != 0);
+           cols = *(ptrCols(SP_PARM));
+#ifdef USE_TERM_DRIVER
+           _nc_set_screen(SP_PARM);
+           TCB = (TERMINAL_CONTROL_BLOCK *) new_term;
+           TCB->csp = SP_PARM;
+#endif
            /*
             * In setupterm() we did a set_curterm(), but it was before we set
-            * SP.  So the "current" screen's terminal pointer was overwritten
-            * with a different terminal.  Later, in _nc_setupscreen(), we set
-            * SP and the terminal pointer in the new screen.
+            * CURRENT_SCREEN.  So the "current" screen's terminal pointer was
+            * overwritten with a different terminal.  Later, in
+            * _nc_setupscreen(), we set CURRENT_SCREEN and the terminal
+            * pointer in the new screen.
             *
             * Restore the terminal-pointer for the pre-existing screen, if
             * any.
@@ -170,37 +264,53 @@ newterm(NCURSES_CONST char *name, FILE *ofp, FILE *ifp)
            if (current)
                current->_term = its_term;
 
+#ifdef USE_TERM_DRIVER
+           SP_PARM->_term = new_term;
+#else
+           new_term = SP_PARM->_term;
+#endif
+
+           /* allow user to set maximum escape delay from the environment */
+           if ((value = _nc_getenv_num("ESCDELAY")) >= 0) {
+               NCURSES_SP_NAME(set_escdelay) (NCURSES_SP_ARGx value);
+           }
+
            /* if the terminal type has real soft labels, set those up */
-           if (slk_format && num_labels > 0 && SLK_STDFMT(slk_format))
-               _nc_slk_initialize(stdscr, COLS);
+           if (slk_format && NumLabels > 0 && SLK_STDFMT(slk_format))
+               _nc_slk_initialize(StdScreen(SP_PARM), cols);
 
-           SP->_ifd = fileno(ifp);
-           typeahead(fileno(ifp));
+           SP_PARM->_ifd = fileno(_ifp);
+           NCURSES_SP_NAME(typeahead) (NCURSES_SP_ARGx fileno(_ifp));
 #ifdef TERMIOS
-           SP->_use_meta = ((cur_term->Ottyb.c_cflag & CSIZE) == CS8 &&
-                            !(cur_term->Ottyb.c_iflag & ISTRIP));
+           SP_PARM->_use_meta = ((new_term->Ottyb.c_cflag & CSIZE) == CS8 &&
+                                 !(new_term->Ottyb.c_iflag & ISTRIP));
 #else
-           SP->_use_meta = FALSE;
+           SP_PARM->_use_meta = FALSE;
 #endif
-           SP->_endwin = FALSE;
-
+           SP_PARM->_endwin = FALSE;
+#ifndef USE_TERM_DRIVER
            /*
             * Check whether we can optimize scrolling under dumb terminals in
             * case we do not have any of these capabilities, scrolling
             * optimization will be useless.
             */
-           SP->_scrolling = ((scroll_forward && scroll_reverse) ||
-                             ((parm_rindex ||
-                               parm_insert_line ||
-                               insert_line) &&
-                              (parm_index ||
-                               parm_delete_line ||
-                               delete_line)));
+           SP_PARM->_scrolling = ((scroll_forward && scroll_reverse) ||
+                                  ((parm_rindex ||
+                                    parm_insert_line ||
+                                    insert_line) &&
+                                   (parm_index ||
+                                    parm_delete_line ||
+                                    delete_line)));
+#endif
 
-           baudrate();         /* sets a field in the SP structure */
+           NCURSES_SP_NAME(baudrate) (NCURSES_SP_ARG);         /* sets a field in the screen structure */
 
-           SP->_keytry = 0;
+           SP_PARM->_keytry = 0;
 
+           /* compute movement costs so we can do better move optimization */
+#ifdef USE_TERM_DRIVER
+           TCBOf(SP_PARM)->drv->scinit(SP_PARM);
+#else
            /*
             * Check for mismatched graphic-rendition capabilities.  Most SVr4
             * terminfo trees contain entries that have rmul or rmso equated to
@@ -211,23 +321,31 @@ newterm(NCURSES_CONST char *name, FILE *ofp, FILE *ifp)
             * shouldn't be looking at this detail.
             */
 #define SGR0_TEST(mode) (mode != 0) && (exit_attribute_mode == 0 || strcmp(mode, exit_attribute_mode))
-           SP->_use_rmso = SGR0_TEST(exit_standout_mode);
-           SP->_use_rmul = SGR0_TEST(exit_underline_mode);
+           SP_PARM->_use_rmso = SGR0_TEST(exit_standout_mode);
+           SP_PARM->_use_rmul = SGR0_TEST(exit_underline_mode);
 
            /* compute movement costs so we can do better move optimization */
            _nc_mvcur_init();
 
            /* initialize terminal to a sane state */
            _nc_screen_init();
+#endif
 
            /* Initialize the terminal line settings. */
-           _nc_initscr();
+           _nc_initscr(NCURSES_SP_ARG);
 
            _nc_signal_handler(TRUE);
-
-           result = SP;
+           result = SP_PARM;
        }
     }
     _nc_unlock_global(curses);
     returnSP(result);
 }
+
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(SCREEN *)
+newterm(NCURSES_CONST char *name, FILE *ofp, FILE *ifp)
+{
+    return NCURSES_SP_NAME(newterm) (CURRENT_SCREEN_PRE, name, ofp, ifp);
+}
+#endif