home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / octave-1.1.1p1-src.tgz / tar.out / fsf / octave / readline / signals.c < prev    next >
C/C++ Source or Header  |  1996-09-28  |  8KB  |  314 lines
  1. /* signals.c -- signal handling support for readline. */
  2.  
  3. /* Copyright (C) 1987, 1989, 1992 Free Software Foundation, Inc.
  4.  
  5.    This file is part of the GNU Readline Library, a library for
  6.    reading lines of text with interactive input and history editing.
  7.  
  8.    The GNU Readline Library is free software; you can redistribute it
  9.    and/or modify it under the terms of the GNU General Public License
  10.    as published by the Free Software Foundation; either version 1, or
  11.    (at your option) any later version.
  12.  
  13.    The GNU Readline Library is distributed in the hope that it will be
  14.    useful, but WITHOUT ANY WARRANTY; without even the implied warranty
  15.    of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16.    GNU General Public License for more details.
  17.  
  18.    The GNU General Public License is often shipped with GNU software, and
  19.    is generally kept in a file called COPYING or LICENSE.  If you do not
  20.    have a copy of the license, write to the Free Software Foundation,
  21.    675 Mass Ave, Cambridge, MA 02139, USA. */
  22.  
  23. #include <stdio.h>
  24. #include <sys/types.h>
  25. #include <fcntl.h>
  26. #if !defined (NO_SYS_FILE)
  27. #  include <sys/file.h>
  28. #endif /* !NO_SYS_FILE */
  29. #include <signal.h>
  30.  
  31. /* This is needed to include support for TIOCGWINSZ and window resizing. */
  32. #if defined (OSF1) || defined (BSD386) || defined (_386BSD) || defined (__BSD_4_4__) || defined (AIX)
  33. #  include <sys/ioctl.h>
  34. #endif /* OSF1 || BSD386 || _386BSD || __BSD_4_4__ || AIX */
  35.  
  36. #if defined (HAVE_UNISTD_H)
  37. #  include <unistd.h>
  38. #endif /* HAVE_UNISTD_H */
  39.  
  40. #if defined (HAVE_STDLIB_H)
  41. #  include <stdlib.h>
  42. #else
  43. #  include "ansi_stdlib.h"
  44. #endif /* HAVE_STDLIB_H */
  45.  
  46. #include <errno.h>
  47. /* Not all systems declare ERRNO in errno.h... and some systems #define it! */
  48. #if !defined (errno)
  49. extern int errno;
  50. #endif /* !errno */
  51.  
  52. #include "posixstat.h"
  53.  
  54. /* System-specific feature definitions and include files. */
  55. #include "rldefs.h"
  56.  
  57. /* Some standard library routines. */
  58. #include "readline.h"
  59. #include "history.h"
  60.  
  61. static void cr ();
  62.  
  63. extern int readline_echoing_p;
  64. extern int rl_pending_input;
  65.  
  66. extern int _rl_meta_flag;
  67.  
  68. extern void _rl_output_character_function ();
  69.  
  70. extern void free_undo_list ();
  71.  
  72. #if defined (VOID_SIGHANDLER)
  73. #  define sighandler void
  74. #else
  75. #  define sighandler int
  76. #endif /* VOID_SIGHANDLER */
  77.  
  78. /* This typedef is equivalant to the one for Function; it allows us
  79.    to say SigHandler *foo = signal (SIGKILL, SIG_IGN); */
  80. typedef sighandler SigHandler ();
  81.  
  82. #if defined (_GO32_)
  83. #  undef HANDLE_SIGNALS
  84. #endif /* _GO32_ */
  85.  
  86. #if defined (STATIC_MALLOC)
  87. static char *xmalloc (), *xrealloc ();
  88. #else
  89. extern char *xmalloc (), *xrealloc ();
  90. #endif /* STATIC_MALLOC */
  91.  
  92. /* Defined in this file */
  93. int rl_set_signals (), rl_clear_signals ();
  94.  
  95. /* Defined in display.c  */
  96. extern int rl_clear_message (), rl_forced_update_display ();
  97.  
  98. /* Defined in rltty.c */
  99. extern void rl_prep_terminal (), rl_deprep_terminal ();
  100.  
  101.  
  102. /* **************************************************************** */
  103. /*                                        */
  104. /*               Signal Handling                          */
  105. /*                                    */
  106. /* **************************************************************** */
  107.  
  108. #if defined (SIGWINCH)
  109. static SigHandler *old_sigwinch = (SigHandler *)NULL;
  110.  
  111. static sighandler
  112. rl_handle_sigwinch (sig)
  113.      int sig;
  114. {
  115.   if (readline_echoing_p)
  116.     {
  117.       _rl_set_screen_size (fileno (rl_instream), 1);
  118.  
  119.       cr ();                /* was crlf () */
  120.       rl_forced_update_display ();
  121.     }
  122.  
  123.   if (old_sigwinch &&
  124.       old_sigwinch != (SigHandler *)SIG_IGN &&
  125.       old_sigwinch != (SigHandler *)SIG_DFL)
  126.     (*old_sigwinch) (sig);
  127. #if !defined (VOID_SIGHANDLER)
  128.   return (0);
  129. #endif /* VOID_SIGHANDLER */
  130. }
  131. #endif  /* SIGWINCH */
  132.  
  133. #if defined (HANDLE_SIGNALS)
  134. /* Interrupt handling. */
  135. static SigHandler
  136.   *old_int  = (SigHandler *)NULL,
  137.   *old_tstp = (SigHandler *)NULL,
  138.   *old_ttou = (SigHandler *)NULL,
  139.   *old_ttin = (SigHandler *)NULL,
  140.   *old_cont = (SigHandler *)NULL,
  141.   *old_alrm = (SigHandler *)NULL;
  142.  
  143. /* Handle an interrupt character. */
  144. static sighandler
  145. rl_signal_handler (sig)
  146.      int sig;
  147. {
  148. #if defined (HAVE_POSIX_SIGNALS)
  149.   sigset_t set;
  150. #else /* !HAVE_POSIX_SIGNALS */
  151. #  if defined (HAVE_BSD_SIGNALS)
  152.   long omask;
  153. #  endif /* HAVE_BSD_SIGNALS */
  154. #endif /* !HAVE_POSIX_SIGNALS */
  155.  
  156. #if !defined (HAVE_BSD_SIGNALS) && !defined (HAVE_POSIX_SIGNALS)
  157.   /* Since the signal will not be blocked while we are in the signal
  158.      handler, ignore it until rl_clear_signals resets the catcher. */
  159.   if (sig == SIGINT)
  160.     signal (sig, SIG_IGN);
  161. #endif /* !HAVE_BSD_SIGNALS */
  162.  
  163.   switch (sig)
  164.     {
  165.     case SIGINT:
  166.       {
  167.     register HIST_ENTRY *entry;
  168.  
  169.     free_undo_list ();
  170.  
  171.     entry = current_history ();
  172.     if (entry)
  173.       entry->data = (char *)NULL;
  174.       }
  175.       _rl_kill_kbd_macro ();
  176.       rl_clear_message ();
  177.       rl_init_argument ();
  178.  
  179. #if defined (SIGTSTP)
  180.     case SIGTSTP:
  181.     case SIGTTOU:
  182.     case SIGTTIN:
  183. #endif /* SIGTSTP */
  184.     case SIGALRM:
  185.       rl_clean_up_for_exit ();
  186.       rl_deprep_terminal ();
  187.       rl_clear_signals ();
  188.       rl_pending_input = 0;
  189.  
  190. #if defined (HAVE_POSIX_SIGNALS)
  191.       sigprocmask (SIG_BLOCK, (sigset_t *)NULL, &set);
  192.       sigdelset (&set, sig);
  193. #else /* !HAVE_POSIX_SIGNALS */
  194. #  if defined (HAVE_BSD_SIGNALS)
  195.       omask = sigblock (0);
  196. #  endif /* HAVE_BSD_SIGNALS */
  197. #endif /* !HAVE_POSIX_SIGNALS */
  198.  
  199.       kill (getpid (), sig);
  200.  
  201.       /* Let the signal that we just sent through.  */
  202. #if defined (HAVE_POSIX_SIGNALS)
  203.       sigprocmask (SIG_SETMASK, &set, (sigset_t *)NULL);
  204. #else /* !HAVE_POSIX_SIGNALS */
  205. #  if defined (HAVE_BSD_SIGNALS)
  206.       sigsetmask (omask & ~(sigmask (sig)));
  207. #  endif /* HAVE_BSD_SIGNALS */
  208. #endif /* !HAVE_POSIX_SIGNALS */
  209.  
  210.       rl_prep_terminal (_rl_meta_flag);
  211.       rl_set_signals ();
  212.     }
  213.  
  214. #if !defined (VOID_SIGHANDLER)
  215.   return (0);
  216. #endif /* !VOID_SIGHANDLER */
  217. }
  218.  
  219. #if defined (HAVE_POSIX_SIGNALS)
  220. static SigHandler *
  221. rl_set_sighandler (sig, handler)
  222.      int sig;
  223.      SigHandler *handler;
  224. {
  225.   struct sigaction act, oact;
  226.  
  227.   act.sa_handler = handler;
  228.   act.sa_flags = 0;
  229.   sigemptyset (&act.sa_mask);
  230.   sigemptyset (&oact.sa_mask);
  231.   sigaction (sig, &act, &oact);
  232.   return (oact.sa_handler);
  233. }
  234.  
  235. #else /* !HAVE_POSIX_SIGNALS */
  236. #  define rl_set_sighandler(sig, handler) (SigHandler *)signal (sig, handler)
  237. #endif /* !HAVE_POSIX_SIGNALS */
  238.  
  239. int
  240. rl_set_signals ()
  241. {
  242.   old_int = (SigHandler *)rl_set_sighandler (SIGINT, rl_signal_handler);
  243.   if (old_int == (SigHandler *)SIG_IGN)
  244.     signal (SIGINT, SIG_IGN);
  245.  
  246.   old_alrm = (SigHandler *)rl_set_sighandler (SIGALRM, rl_signal_handler);
  247.   if (old_alrm == (SigHandler *)SIG_IGN)
  248.     signal (SIGALRM, SIG_IGN);
  249.  
  250. #if !defined (SHELL)
  251.  
  252. #if defined (SIGTSTP)
  253.   old_tstp = (SigHandler *)rl_set_sighandler (SIGTSTP, rl_signal_handler);
  254.   if (old_tstp == (SigHandler *)SIG_IGN)
  255.     signal (SIGTSTP, SIG_IGN);
  256. #endif /* SIGTSTP */
  257. #if defined (SIGTTOU)
  258.   old_ttou = (SigHandler *)rl_set_sighandler (SIGTTOU, rl_signal_handler);
  259.   old_ttin = (SigHandler *)rl_set_sighandler (SIGTTIN, rl_signal_handler);
  260.  
  261.   if (old_tstp == (SigHandler *)SIG_IGN)
  262.     {
  263.       signal (SIGTTOU, SIG_IGN);
  264.       signal (SIGTTIN, SIG_IGN);
  265.     }
  266. #endif /* SIGTTOU */
  267.  
  268. #endif /* !SHELL */
  269.  
  270. #if defined (SIGWINCH)
  271.   old_sigwinch =
  272.     (SigHandler *) rl_set_sighandler (SIGWINCH, rl_handle_sigwinch);
  273. #endif /* SIGWINCH */
  274.  
  275.   return 0;
  276. }
  277.  
  278. int
  279. rl_clear_signals ()
  280. {
  281.   rl_set_sighandler (SIGINT, old_int);
  282.   rl_set_sighandler (SIGALRM, old_alrm);
  283.  
  284. #if !defined (SHELL)
  285.  
  286. #if defined (SIGTSTP)
  287.   signal (SIGTSTP, old_tstp);
  288. #endif
  289.  
  290. #if defined (SIGTTOU)
  291.   signal (SIGTTOU, old_ttou);
  292.   signal (SIGTTIN, old_ttin);
  293. #endif /* SIGTTOU */
  294.  
  295. #endif /* !SHELL */
  296.  
  297. #if defined (SIGWINCH)
  298.   signal (SIGWINCH, old_sigwinch);
  299. #endif
  300.  
  301.   return 0;
  302. }
  303.  
  304. /* Move to the start of the current line. */
  305. static void
  306. cr ()
  307. {
  308.   extern char *term_cr;
  309.  
  310.   if (term_cr)    
  311.     tputs (term_cr, 1, _rl_output_character_function);
  312. }
  313. #endif  /* HANDLE_SIGNALS */
  314.