]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - ncurses/tty/lib_tstp.c
ncurses 5.7 - patch 20100424
[ncurses.git] / ncurses / tty / lib_tstp.c
index 512de68dc5ff32bb90f1102cb41a2c74299b0636..4a0ef50336362e3bb99b665e08ead49e7d47fa12 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 1998,1999,2000 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            *
@@ -29,6 +29,7 @@
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
+ *     and: Thomas E. Dickey                        1995-on                 *
  ****************************************************************************/
 
 /*
 **     The routine _nc_signal_handler().
 **
 */
-
 #include <curses.priv.h>
 
-#include <signal.h>
 #include <SigAction.h>
 
 #if SVR4_ACTION && !defined(_POSIX_SOURCE)
 #define _POSIX_SOURCE
 #endif
 
-MODULE_ID("$Id: lib_tstp.c,v 1.22 2000/09/02 18:33:17 tom Exp $")
+MODULE_ID("$Id: lib_tstp.c,v 1.39 2009/05/09 15:46:20 tom Exp $")
 
 #if defined(SIGTSTP) && (HAVE_SIGACTION || HAVE_SIGVEC)
 #define USE_SIGTSTP 1
@@ -55,6 +54,45 @@ MODULE_ID("$Id: lib_tstp.c,v 1.22 2000/09/02 18:33:17 tom Exp $")
 #define USE_SIGTSTP 0
 #endif
 
+#ifdef TRACE
+static const char *
+signal_name(int sig)
+{
+    switch (sig) {
+#ifdef SIGALRM
+    case SIGALRM:
+       return "SIGALRM";
+#endif
+#ifdef SIGCONT
+    case SIGCONT:
+       return "SIGCONT";
+#endif
+    case SIGINT:
+       return "SIGINT";
+#ifdef SIGQUIT
+    case SIGQUIT:
+       return "SIGQUIT";
+#endif
+    case SIGTERM:
+       return "SIGTERM";
+#ifdef SIGTSTP
+    case SIGTSTP:
+       return "SIGTSTP";
+#endif
+#ifdef SIGTTOU
+    case SIGTTOU:
+       return "SIGTTOU";
+#endif
+#ifdef SIGWINCH
+    case SIGWINCH:
+       return "SIGWINCH";
+#endif
+    default:
+       return "unknown signal";
+    }
+}
+#endif
+
 /*
  * Note: This code is fragile!  Its problem is that different OSs
  * handle restart of system calls interrupted by signals differently.
@@ -102,6 +140,7 @@ MODULE_ID("$Id: lib_tstp.c,v 1.22 2000/09/02 18:33:17 tom Exp $")
 static void
 tstp(int dummy GCC_UNUSED)
 {
+    SCREEN *sp = CURRENT_SCREEN;
     sigset_t mask, omask;
     sigaction_t act, oact;
 
@@ -120,11 +159,11 @@ tstp(int dummy GCC_UNUSED)
      * parent was stopped before us, and we would likely pick up the
      * settings already modified by the shell.
      */
-    if (SP != 0 && !SP->_endwin)       /* don't do this if we're not in curses */
+    if (sp != 0 && !sp->_endwin)       /* don't do this if we're not in curses */
 #if HAVE_TCGETPGRP
        if (tcgetpgrp(STDIN_FILENO) == getpgrp())
 #endif
-           def_prog_mode();
+           NCURSES_SP_NAME(def_prog_mode) (NCURSES_SP_ARG);
 
     /*
      * Block window change and timer signals.  The latter
@@ -132,7 +171,9 @@ tstp(int dummy GCC_UNUSED)
      * to repaint the screen.
      */
     (void) sigemptyset(&mask);
+#ifdef SIGALRM
     (void) sigaddset(&mask, SIGALRM);
+#endif
 #if USE_SIGWINCH
     (void) sigaddset(&mask, SIGWINCH);
 #endif
@@ -151,7 +192,7 @@ tstp(int dummy GCC_UNUSED)
      * End window mode, which also resets the terminal state to the
      * original (pre-curses) modes.
      */
-    endwin();
+    NCURSES_SP_NAME(endwin) (NCURSES_SP_ARG);
 
     /* Unblock SIGTSTP. */
     (void) sigemptyset(&mask);
@@ -178,19 +219,19 @@ tstp(int dummy GCC_UNUSED)
 
     T(("SIGCONT received"));
     sigaction(SIGTSTP, &oact, NULL);
-    flushinp();
+    NCURSES_SP_NAME(flushinp) (NCURSES_SP_ARG);
 
     /*
      * If the user modified the tty state while suspended, he wants
      * those changes to stick.  So save the new "default" terminal state.
      */
-    def_shell_mode();
+    NCURSES_SP_NAME(def_shell_mode) (NCURSES_SP_ARG);
 
     /*
      * This relies on the fact that doupdate() will restore the
      * program-mode tty state, and issue enter_ca_mode if need be.
      */
-    doupdate();
+    NCURSES_SP_NAME(doupdate) (NCURSES_SP_ARG);
 
     /* Reset the signals. */
     (void) sigprocmask(SIG_SETMASK, &omask, NULL);
@@ -200,39 +241,40 @@ tstp(int dummy GCC_UNUSED)
 static void
 cleanup(int sig)
 {
-    static int nested;
+    SCREEN *sp = CURRENT_SCREEN;
 
     /*
      * Actually, doing any sort of I/O from within an signal handler is
      * "unsafe".  But we'll _try_ to clean up the screen and terminal
      * settings on the way out.
      */
-    if (!nested++
+    if (!_nc_globals.cleanup_nested++
        && (sig == SIGINT
-           || sig == SIGQUIT)) {
+#ifdef SIGQUIT
+           || sig == SIGQUIT
+#endif
+       )) {
 #if HAVE_SIGACTION || HAVE_SIGVEC
        sigaction_t act;
        sigemptyset(&act.sa_mask);
        act.sa_flags = 0;
        act.sa_handler = SIG_IGN;
-       if (sigaction(sig, &act, (sigaction_t *) 0) == 0)
+       if (sigaction(sig, &act, NULL) == 0)
 #else
        if (signal(sig, SIG_IGN) != SIG_ERR)
 #endif
        {
-           SCREEN *scan = _nc_screen_chain;
-           while (scan) {
-               if (SP != 0
-                   && SP->_ofp != 0
-                   && isatty(fileno(SP->_ofp))) {
-                   SP->_cleanup = TRUE;
-                   SP->_outch = _nc_outch;
+           SCREEN *scan;
+           for (each_screen(scan)) {
+               if (scan->_ofp != 0
+                   && isatty(fileno(scan->_ofp))) {
+                   scan->_cleanup = TRUE;
+                   scan->_outch = NCURSES_SP_NAME(_nc_outch);
                }
                set_term(scan);
-               endwin();
-               if (SP)
-                   SP->_endwin = FALSE;        /* in case we have an atexit! */
-               scan = scan->_next_screen;
+               NCURSES_SP_NAME(endwin) (NCURSES_SP_ARG);
+               if (sp)
+                   sp->_endwin = FALSE;        /* in case we have an atexit! */
            }
        }
     }
@@ -243,11 +285,7 @@ cleanup(int sig)
 static void
 sigwinch(int sig GCC_UNUSED)
 {
-    SCREEN *scan = _nc_screen_chain;
-    while (scan) {
-       scan->_sig_winch = TRUE;
-       scan = scan->_next_screen;
-    }
+    _nc_globals.have_sigwinch = 1;
 }
 #endif /* USE_SIGWINCH */
 
@@ -255,43 +293,57 @@ sigwinch(int sig GCC_UNUSED)
  * If the given signal is still in its default state, set it to the given
  * handler.
  */
-#if HAVE_SIGACTION || HAVE_SIGVEC
 static int
-CatchIfDefault(int sig, sigaction_t * act)
+CatchIfDefault(int sig, RETSIGTYPE (*handler) (int))
 {
+    int result;
+#if HAVE_SIGACTION || HAVE_SIGVEC
     sigaction_t old_act;
+    sigaction_t new_act;
+
+    memset(&new_act, 0, sizeof(new_act));
+    sigemptyset(&new_act.sa_mask);
+#ifdef SA_RESTART
+#ifdef SIGWINCH
+    if (sig != SIGWINCH)
+#endif
+       new_act.sa_flags |= SA_RESTART;
+#endif /* SA_RESTART */
+    new_act.sa_handler = handler;
 
-    if (sigaction(sig, (sigaction_t *) 0, &old_act) == 0
+    if (sigaction(sig, NULL, &old_act) == 0
        && (old_act.sa_handler == SIG_DFL
+           || old_act.sa_handler == handler
 #if USE_SIGWINCH
            || (sig == SIGWINCH && old_act.sa_handler == SIG_IGN)
 #endif
        )) {
-       (void) sigaction(sig, act, (sigaction_t *) 0);
-       return TRUE;
+       (void) sigaction(sig, &new_act, NULL);
+       result = TRUE;
+    } else {
+       result = FALSE;
     }
-    return FALSE;
-}
-#else
-static int
-CatchIfDefault(int sig, RETSIGTYPE(*handler) (int))
-{
-    void (*ohandler) (int);
+#else /* !HAVE_SIGACTION */
+    RETSIGTYPE (*ohandler) (int);
 
     ohandler = signal(sig, SIG_IGN);
     if (ohandler == SIG_DFL
+       || ohandler == handler
 #if USE_SIGWINCH
        || (sig == SIGWINCH && ohandler == SIG_IGN)
 #endif
        ) {
        signal(sig, handler);
-       return TRUE;
+       result = TRUE;
     } else {
        signal(sig, ohandler);
-       return FALSE;
+       result = FALSE;
     }
-}
 #endif
+    T(("CatchIfDefault - will %scatch %s",
+       result ? "" : "not ", signal_name(sig)));
+    return result;
+}
 
 /*
  * This is invoked once at the beginning (e.g., from 'initscr()'), to
@@ -304,63 +356,46 @@ CatchIfDefault(int sig, RETSIGTYPE(*handler) (int))
  * The XSI document implies that we shouldn't keep the SIGTSTP handler if
  * the caller later changes its mind, but that doesn't seem correct.
  */
-void
+NCURSES_EXPORT(void)
 _nc_signal_handler(bool enable)
 {
+    T((T_CALLED("_nc_signal_handler(%d)"), enable));
 #if USE_SIGTSTP                        /* Xenix 2.x doesn't have SIGTSTP, for example */
-    static sigaction_t act, oact;
-    static int ignore;
-
-    if (!ignore) {
-       if (!enable) {
-           act.sa_handler = SIG_IGN;
-           sigaction(SIGTSTP, &act, &oact);
-       } else if (act.sa_handler) {
-           sigaction(SIGTSTP, &oact, NULL);
-       } else {                /*initialize */
-           sigemptyset(&act.sa_mask);
-           act.sa_flags = 0;
-#if USE_SIGWINCH
-           act.sa_handler = sigwinch;
-           CatchIfDefault(SIGWINCH, &act);
-#endif
-
+    {
+       static bool ignore_tstp = FALSE;
+
+       if (!ignore_tstp) {
+           static sigaction_t new_sigaction, old_sigaction;
+
+           if (!enable) {
+               new_sigaction.sa_handler = SIG_IGN;
+               sigaction(SIGTSTP, &new_sigaction, &old_sigaction);
+           } else if (new_sigaction.sa_handler != SIG_DFL) {
+               sigaction(SIGTSTP, &old_sigaction, NULL);
+           } else if (sigaction(SIGTSTP, NULL, &old_sigaction) == 0
+                      && (old_sigaction.sa_handler == SIG_DFL)) {
+               sigemptyset(&new_sigaction.sa_mask);
 #ifdef SA_RESTART
-           act.sa_flags |= SA_RESTART;
+               new_sigaction.sa_flags |= SA_RESTART;
 #endif /* SA_RESTART */
-           act.sa_handler = cleanup;
-           CatchIfDefault(SIGINT, &act);
-           CatchIfDefault(SIGTERM, &act);
-
-           act.sa_handler = tstp;
-           if (!CatchIfDefault(SIGTSTP, &act))
-               ignore = TRUE;
+               new_sigaction.sa_handler = tstp;
+               (void) sigaction(SIGTSTP, &new_sigaction, NULL);
+           } else {
+               ignore_tstp = TRUE;
+           }
        }
     }
-#else /* !USE_SIGTSTP */
-    if (enable) {
-#if HAVE_SIGACTION || HAVE_SIGVEC
-       static sigaction_t act;
-       sigemptyset(&act.sa_mask);
-#if USE_SIGWINCH
-       act.sa_handler = sigwinch;
-       CatchIfDefault(SIGWINCH, &act);
-#endif
-#ifdef SA_RESTART
-       act.sa_flags |= SA_RESTART;
-#endif /* SA_RESTART */
-       act.sa_handler = cleanup;
-       CatchIfDefault(SIGINT, &act);
-       CatchIfDefault(SIGTERM, &act);
-
-#else /* !(HAVE_SIGACTION || HAVE_SIGVEC) */
+#endif /* !USE_SIGTSTP */
 
-       CatchIfDefault(SIGINT, cleanup);
-       CatchIfDefault(SIGTERM, cleanup);
+    if (!_nc_globals.init_signals) {
+       if (enable) {
+           CatchIfDefault(SIGINT, cleanup);
+           CatchIfDefault(SIGTERM, cleanup);
 #if USE_SIGWINCH
-       CatchIfDefault(SIGWINCH, sigwinch);
+           CatchIfDefault(SIGWINCH, sigwinch);
 #endif
-#endif /* !(HAVE_SIGACTION || HAVE_SIGVEC) */
+           _nc_globals.init_signals = TRUE;
+       }
     }
-#endif /* !USE_SIGTSTP */
+    returnVoid;
 }