ncurses 5.6 - patch 20080816
[ncurses.git] / ncurses / base / lib_newterm.c
index ad7b122be8ad1baecee24607cd0ade96c2e8f41c..05982b84cee4c9b5cfba85c7b5b2a9f54390ddad 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
 /****************************************************************************
- * Copyright (c) 1998-2002,2004 Free Software Foundation, Inc.              *
+ * Copyright (c) 1998-2007,2008 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            *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
@@ -48,7 +48,7 @@
 #include <term.h>              /* clear_screen, cup & friends, cur_term */
 #include <tic.h>
 
 #include <term.h>              /* clear_screen, cup & friends, cur_term */
 #include <tic.h>
 
-MODULE_ID("$Id: lib_newterm.c,v 1.58 2004/08/14 20:36:39 tom Exp $")
+MODULE_ID("$Id: lib_newterm.c,v 1.73 2008/08/16 21:20:48 Werner.Fink Exp $")
 
 #ifndef ONLCR                  /* Allows compilation under the QNX 4.2 OS */
 #define ONLCR 0
 
 #ifndef ONLCR                  /* Allows compilation under the QNX 4.2 OS */
 #define ONLCR 0
@@ -62,7 +62,7 @@ MODULE_ID("$Id: lib_newterm.c,v 1.58 2004/08/14 20:36:39 tom Exp $")
  * The newterm function also initializes terminal settings, and since initscr
  * is supposed to behave as if it calls newterm, we do it here.
  */
  * The newterm function also initializes terminal settings, and since initscr
  * is supposed to behave as if it calls newterm, we do it here.
  */
-static inline int
+static NCURSES_INLINE int
 _nc_initscr(void)
 {
     int result = ERR;
 _nc_initscr(void)
 {
     int result = ERR;
@@ -77,8 +77,10 @@ _nc_initscr(void)
        buf.c_lflag &= ~(ECHO | ECHONL);
        buf.c_iflag &= ~(ICRNL | INLCR | IGNCR);
        buf.c_oflag &= ~(ONLCR);
        buf.c_lflag &= ~(ECHO | ECHONL);
        buf.c_iflag &= ~(ICRNL | INLCR | IGNCR);
        buf.c_oflag &= ~(ONLCR);
-#else
+#elif HAVE_SGTTY_H
        buf.sg_flags &= ~(ECHO | CRMOD);
        buf.sg_flags &= ~(ECHO | CRMOD);
+#else
+       memset(&buf, 0, sizeof(buf));
 #endif
        if ((result = _nc_set_tty_mode(&buf)) == OK)
            cur_term->Nttyb = buf;
 #endif
        if ((result = _nc_set_tty_mode(&buf)) == OK)
            cur_term->Nttyb = buf;
@@ -92,120 +94,142 @@ _nc_initscr(void)
  * aside from possibly delaying a filter() call until some terminals have been
  * initialized.
  */
  * aside from possibly delaying a filter() call until some terminals have been
  * initialized.
  */
-static int filter_mode = FALSE;
-
 NCURSES_EXPORT(void)
 filter(void)
 {
 NCURSES_EXPORT(void)
 filter(void)
 {
+    START_TRACE();
     T((T_CALLED("filter")));
     T((T_CALLED("filter")));
-    filter_mode = TRUE;
+    _nc_prescreen.filter_mode = TRUE;
     returnVoid;
 }
 
     returnVoid;
 }
 
+#if NCURSES_EXT_FUNCS
+/*
+ * An extension, allowing the application to open a new screen without
+ * requiring it to also be filtered.
+ */
+NCURSES_EXPORT(void)
+nofilter(void)
+{
+    START_TRACE();
+    T((T_CALLED("nofilter")));
+    _nc_prescreen.filter_mode = FALSE;
+    returnVoid;
+}
+#endif
+
 NCURSES_EXPORT(SCREEN *)
 newterm(NCURSES_CONST char *name, FILE *ofp, FILE *ifp)
 {
 NCURSES_EXPORT(SCREEN *)
 newterm(NCURSES_CONST char *name, FILE *ofp, FILE *ifp)
 {
+    int value;
     int errret;
     int errret;
-    int slk_format = _nc_slk_format;
     SCREEN *current;
     SCREEN *current;
+    SCREEN *result = 0;
+    TERMINAL *its_term;
 
     START_TRACE();
     T((T_CALLED("newterm(\"%s\",%p,%p)"), name, ofp, ifp));
 
 
     START_TRACE();
     T((T_CALLED("newterm(\"%s\",%p,%p)"), name, ofp, ifp));
 
-    /* this loads the capability entry, then sets LINES and COLS */
-    if (setupterm(name, fileno(ofp), &errret) == ERR)
-       returnSP(0);
-
-    /* implement filter mode */
-    if (filter_mode) {
-       LINES = 1;
+    _nc_init_pthreads();
+    _nc_lock_global(curses);
 
 
-       clear_screen = 0;
-       cursor_down = parm_down_cursor = 0;
-       cursor_address = 0;
-       cursor_up = parm_up_cursor = 0;
-       row_address = 0;
-
-       cursor_home = carriage_return;
-    }
-
-    /* If we must simulate soft labels, grab off the line to be used.
-       We assume that we must simulate, if it is none of the standard
-       formats (4-4  or 3-2-3) for which there may be some hardware
-       support. */
-    if (num_labels <= 0 || !SLK_STDFMT(slk_format))
-       if (slk_format) {
-           if (ERR == _nc_ripoffline(-SLK_LINES(slk_format),
-                                     _nc_slk_initialize))
-               returnSP(0);
-       }
-    /* this actually allocates the screen structure, and saves the
-     * original terminal settings.
-     */
     current = SP;
     current = SP;
-    _nc_set_screen(0);
-    if (_nc_setupscreen(LINES, COLS, ofp) == ERR) {
-       _nc_set_screen(current);
-       returnSP(0);
-    }
+    its_term = (SP ? SP->_term : 0);
 
 
-    /* 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);
+    /* this loads the capability entry, then sets LINES and COLS */
+    if (setupterm(name, fileno(ofp), &errret) != ERR) {
+       int slk_format = _nc_globals.slk_format;
+
+       /*
+        * 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);
+       }
 
 
-    SP->_ifd = fileno(ifp);
-    typeahead(fileno(ifp));
+       if (_nc_setupscreen(LINES,
+                           COLS,
+                           ofp,
+                           _nc_prescreen.filter_mode,
+                           slk_format) == ERR) {
+           _nc_set_screen(current);
+           result = 0;
+       } else {
+           assert(SP != 0);
+           /*
+            * 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.
+            *
+            * Restore the terminal-pointer for the pre-existing screen, if
+            * any.
+            */
+           if (current)
+               current->_term = its_term;
+
+           /* 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);
+
+           SP->_ifd = fileno(ifp);
+           typeahead(fileno(ifp));
 #ifdef TERMIOS
 #ifdef TERMIOS
-    SP->_use_meta = ((cur_term->Ottyb.c_cflag & CSIZE) == CS8 &&
-                    !(cur_term->Ottyb.c_iflag & ISTRIP));
+           SP->_use_meta = ((cur_term->Ottyb.c_cflag & CSIZE) == CS8 &&
+                            !(cur_term->Ottyb.c_iflag & ISTRIP));
 #else
 #else
-    SP->_use_meta = FALSE;
+           SP->_use_meta = FALSE;
 #endif
 #endif
-    SP->_endwin = FALSE;
-
-    /* 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)));
-
-    baudrate();                        /* sets a field in the SP structure */
-
-    SP->_keytry = 0;
-
-    /*
-     * Check for mismatched graphic-rendition capabilities.  Most SVr4
-     * terminfo trees contain entries that have rmul or rmso equated to
-     * sgr0 (Solaris curses copes with those entries).  We do this only for
-     * curses, since many termcap applications assume that smso/rmso and
-     * smul/rmul are paired, and will not function properly if we remove
-     * rmso or rmul.  Curses applications shouldn't be looking at this
-     * detail.
-     */
+           SP->_endwin = FALSE;
+
+           /*
+            * 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)));
+
+           baudrate();         /* sets a field in the SP structure */
+
+           SP->_keytry = 0;
+
+           /*
+            * Check for mismatched graphic-rendition capabilities.  Most SVr4
+            * terminfo trees contain entries that have rmul or rmso equated to
+            * sgr0 (Solaris curses copes with those entries).  We do this only
+            * for curses, since many termcap applications assume that
+            * smso/rmso and smul/rmul are paired, and will not function
+            * properly if we remove rmso or rmul.  Curses applications
+            * shouldn't be looking at this detail.
+            */
 #define SGR0_TEST(mode) (mode != 0) && (exit_attribute_mode == 0 || strcmp(mode, exit_attribute_mode))
 #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);
-
-    /* compute movement costs so we can do better move optimization */
-    _nc_mvcur_init();
+           SP->_use_rmso = SGR0_TEST(exit_standout_mode);
+           SP->_use_rmul = SGR0_TEST(exit_underline_mode);
 
 
-    /* initialize terminal to a sane state */
-    _nc_screen_init();
+           /* compute movement costs so we can do better move optimization */
+           _nc_mvcur_init();
 
 
-    /* Initialize the terminal line settings. */
-    _nc_initscr();
+           /* initialize terminal to a sane state */
+           _nc_screen_init();
 
 
-    _nc_signal_handler(TRUE);
+           /* Initialize the terminal line settings. */
+           _nc_initscr();
 
 
-#if USE_SIZECHANGE
-    /*
-     * Pretend we received a SIGWINCH, just in case we're starting up in a
-     * terminal that cannot initialize its size properly (Debian #265631).
-     */
-    SP->_sig_winch = TRUE;
-#endif
+           _nc_signal_handler(TRUE);
 
 
-    returnSP(SP);
+           result = SP;
+       }
+    }
+    _nc_unlock_global(curses);
+    returnSP(result);
 }
 }