]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - ncurses/base/lib_newterm.c
ncurses 6.1 - patch 20180210
[ncurses.git] / ncurses / base / lib_newterm.c
index fe201d6b8e27054570510fe736c7a549a6e77f27..a65d3b2ddcdc4fba0a058c8d275b602b623f7ad4 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 1998-2005,2006 Free Software Foundation, Inc.              *
+ * Copyright (c) 1998-2016,2017 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                    *
  ****************************************************************************/
 
 /*
 
 #include <curses.priv.h>
 
-#if SVR4_TERMIO && !defined(_POSIX_SOURCE)
-#define _POSIX_SOURCE
+#ifndef CUR
+#define CUR SP_TERMTYPE
 #endif
 
-#include <term.h>              /* clear_screen, cup & friends, cur_term */
 #include <tic.h>
 
-MODULE_ID("$Id: lib_newterm.c,v 1.64 2006/01/14 15:36:24 tom Exp $")
+MODULE_ID("$Id: lib_newterm.c,v 1.100 2017/07/22 23:19:00 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,29 +69,32 @@ MODULE_ID("$Id: lib_newterm.c,v 1.64 2006/01/14 15:36:24 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) {
+    T((T_CALLED("_nc_initscr(%p) ->term %p"), (void *) SP_PARM, (void *) term));
+    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);
-       buf.c_oflag &= ~(ONLCR);
+       buf.c_lflag &= (unsigned) ~(ECHO | ECHONL);
+       buf.c_iflag &= (unsigned) ~(ICRNL | INLCR | IGNCR);
+       buf.c_oflag &= (unsigned) ~(ONLCR);
 #elif HAVE_SGTTY_H
        buf.sg_flags &= ~(ECHO | CRMOD);
 #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;
+    returnCode(result);
 }
 
 /*
@@ -94,16 +103,31 @@ _nc_initscr(void)
  * aside from possibly delaying a filter() call until some terminals have been
  * initialized.
  */
-static bool filter_mode = FALSE;
+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")));
-    filter_mode = TRUE;
+    T((T_CALLED("filter()")));
+    _nc_prescreen.filter_mode = TRUE;
     returnVoid;
 }
+#endif
 
 #if NCURSES_EXT_FUNCS
 /*
@@ -111,79 +135,182 @@ 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")));
-    filter_mode = FALSE;
+    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;
-    int slk_format = _nc_slk_format;
-    SCREEN *current;
     SCREEN *result = 0;
+    SCREEN *current;
+    TERMINAL *its_term;
+    FILE *_ofp = ofp ? ofp : stdout;
+    FILE *_ifp = ifp ? ifp : stdin;
+    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 ? name : ""),
+       (void *) ofp,
+       (void *) ifp));
 
-    _nc_handle_sigwinch(0);
+#if NCURSES_SP_FUNCS
+    assert(SP_PARM != 0);
+    if (SP_PARM == 0)
+       returnSP(SP_PARM);
+#endif
 
-    /* allow user to set maximum escape delay from the environment */
-    if ((value = _nc_getenv_num("ESCDELAY")) >= 0) {
-       ESCDELAY = value;
-    }
+    _nc_init_pthreads();
+    _nc_lock_global(curses);
 
+    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) {
-       result = 0;
-    } else {
+    if (
+          TINFO_SETUP_TERM(&new_term, name,
+                           fileno(_ofp), &errret, FALSE) != ERR) {
+       int slk_format;
+       int filter_mode;
+
+       _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.
         */
-       current = SP;
-       _nc_set_screen(0);
-       if (_nc_setupscreen(LINES, COLS, ofp, 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 {
+           int value;
+           int cols;
+
+#ifdef USE_TERM_DRIVER
+           TERMINAL_CONTROL_BLOCK *TCB;
+#elif !NCURSES_SP_FUNCS
+           _nc_set_screen(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
+            * 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.
+            */
+           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) {
+#if NCURSES_EXT_FUNCS
+               NCURSES_SP_NAME(set_escdelay) (NCURSES_SP_ARGx value);
+#else
+               ESCDELAY = value;
+#endif
+           }
+
            /* 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)) ||
+               USE_KLIBC_KBD;
 #else
-           SP->_use_meta = FALSE;
+           SP_PARM->_use_meta = FALSE;
 #endif
-           SP->_endwin = FALSE;
-
+           SP_PARM->_endwin = ewInitial;
+#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->td_scinit(SP_PARM);
+#else /* ! USE_TERM_DRIVER */
            /*
             * Check for mismatched graphic-rendition capabilities.  Most SVr4
             * terminfo trees contain entries that have rmul or rmso equated to
@@ -194,23 +321,40 @@ 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);
+#if USE_ITALIC
+           SP_PARM->_use_ritm = SGR0_TEST(exit_italics_mode);
+#endif
 
            /* compute movement costs so we can do better move optimization */
            _nc_mvcur_init();
 
            /* initialize terminal to a sane state */
            _nc_screen_init();
+#endif /* USE_TERM_DRIVER */
 
            /* Initialize the terminal line settings. */
-           _nc_initscr();
+           _nc_initscr(NCURSES_SP_ARG);
 
            _nc_signal_handler(TRUE);
-
-           result = SP;
+           result = SP_PARM;
        }
     }
-    _nc_handle_sigwinch(1);
+    _nc_unlock_global(curses);
     returnSP(result);
 }
+
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(SCREEN *)
+newterm(NCURSES_CONST char *name, FILE *ofp, FILE *ifp)
+{
+    SCREEN *rc;
+    _nc_lock_global(prescreen);
+    START_TRACE();
+    rc = NCURSES_SP_NAME(newterm) (CURRENT_SCREEN_PRE, name, ofp, ifp);
+    _nc_forget_prescr();
+    _nc_unlock_global(prescreen);
+    return rc;
+}
+#endif