octave: libinterp/corefcn/sighandlers.cc annotate

annotate libinterp/corefcn/sighandlers.cc @ 27923:bd51beb6205e

update formatting of copyright notices * Use <https://octave.org/copyright/> instead of <https://octave.org/COPYRIGHT.html/>. * For consistency with other comments in the Octave sources, use C++-style comments for copyright blocks in C and C++ files. * Use delimiters above and below copyright blocks that are appropriate for the language used in the file. * Eliminate extra spacing inside copyright blocks. * lex.ll (looks_like_copyright): Also allow newlines and carriage returns before the word "Copyright". * scripts/mk-doc.pl (gethelp): Also skip empty comment lines. * bp-table.cc, type.m: Adjust tests.

author	John W. Eaton <jwe@octave.org>
date	Wed, 08 Jan 2020 11:59:41 -0500
parents	1891570abac8
children	2883b3d08b7e 0a5b15007766

rev	line source
27923 bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	1 ////////////////////////////////////////////////////////////////////////
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	2 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	3 // Copyright (C) 1993-2020 The Octave Project Developers
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	4 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	5 // See the file COPYRIGHT.md in the top-level directory of this
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	6 // distribution or <https://octave.org/copyright/>.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	7 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	8 // This file is part of Octave.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	9 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	10 // Octave is free software: you can redistribute it and/or modify it
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	11 // under the terms of the GNU General Public License as published by
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	12 // the Free Software Foundation, either version 3 of the License, or
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	13 // (at your option) any later version.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	14 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	15 // Octave is distributed in the hope that it will be useful, but
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	16 // WITHOUT ANY WARRANTY; without even the implied warranty of
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	17 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	18 // GNU General Public License for more details.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	19 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	20 // You should have received a copy of the GNU General Public License
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	21 // along with Octave; see the file COPYING. If not, see
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	22 // <https://www.gnu.org/licenses/>.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	23 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	24 ////////////////////////////////////////////////////////////////////////
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	25
21724 aba2e6293dd8 use "#if ..." consistently instead of "#ifdef" and "#ifndef" John W. Eaton <jwe@octave.org> parents: 21609 diff changeset	26 #if defined (HAVE_CONFIG_H)
21301 40de9f8f23a6 Use '#include "config.h"' rather than <config.h>. Rik <rik@octave.org> parents: 21200 diff changeset	27 # include "config.h"
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	28 #endif
78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	29
21941 1d23b75cbcd1 hide signal.h from C++ sources John W. Eaton <jwe@octave.org> parents: 21938 diff changeset	30 #include <csignal>
2536 1d63e820ee13 [project @ 1996-11-19 20:34:29 by jwe] jwe parents: 2512 diff changeset	31 #include <cstdlib>
1d63e820ee13 [project @ 1996-11-19 20:34:29 by jwe] jwe parents: 2512 diff changeset	32
3503 d14c483b3c12 [project @ 2000-02-01 04:06:07 by jwe] jwe parents: 3343 diff changeset	33 #include <iostream>
1344 c2ca372d3279 [project @ 1995-09-04 00:50:16 by jwe] jwe parents: 1343 diff changeset	34 #include <new>
c2ca372d3279 [project @ 1995-09-04 00:50:16 by jwe] jwe parents: 1343 diff changeset	35
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	36 #if defined (OCTAVE_USE_WINDOWS_API)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	37 # define WIN32_LEAN_AND_MEAN
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	38 # include <windows.h>
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	39 #endif
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	40
24734 5d8c4cbc56d7 don't use singleton pattern for child_list John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	41 #include "child-list.h"
3281 aaaa20d31a5f [project @ 1999-10-13 07:02:46 by jwe] jwe parents: 3252 diff changeset	42 #include "cmd-edit.h"
5453 89f5979e8552 [project @ 2005-09-17 00:50:58 by jwe] jwe parents: 5451 diff changeset	43 #include "oct-syscalls.h"
4153 6b96ce9f5743 [project @ 2002-11-06 20:38:49 by jwe] jwe parents: 4092 diff changeset	44 #include "quit.h"
21938 da9b960b1b2d use gnulib strsignal module John W. Eaton <jwe@octave.org> parents: 21936 diff changeset	45 #include "signal-wrappers.h"
3281 aaaa20d31a5f [project @ 1999-10-13 07:02:46 by jwe] jwe parents: 3252 diff changeset	46
4185 8f6d418d31c3 [project @ 2002-11-15 23:22:03 by jwe] jwe parents: 4182 diff changeset	47 #include "defun.h"
1352 19c10b8657d5 [project @ 1995-09-05 08:11:57 by jwe] jwe parents: 1350 diff changeset	48 #include "error.h"
10194 d4f813c3f5ed more debug mode fixes John W. Eaton <jwe@octave.org> parents: 10182 diff changeset	49 #include "input.h"
24734 5d8c4cbc56d7 don't use singleton pattern for child_list John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	50 #include "interpreter-private.h"
22094 9203833cab7d move new interpreter class to separate file John W. Eaton <jwe@octave.org> parents: 22089 diff changeset	51 #include "interpreter.h"
1373 cea4101a2f18 [project @ 1995-09-07 07:19:58 by jwe] jwe parents: 1358 diff changeset	52 #include "load-save.h"
22089 c2c668b3051b use classes for octave application and interpreter John W. Eaton <jwe@octave.org> parents: 22051 diff changeset	53 #include "octave.h"
4294 755f6509bb01 [project @ 2003-01-11 04:01:53 by jwe] jwe parents: 4233 diff changeset	54 #include "oct-map.h"
2091 60f5e1c20815 [project @ 1996-04-28 08:32:39 by jwe] jwe parents: 2016 diff changeset	55 #include "pager.h"
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	56 #include "sighandlers.h"
4787 02c748eb2ddc [project @ 2004-02-18 21:20:26 by jwe] jwe parents: 4675 diff changeset	57 #include "sysdep.h"
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	58 #include "utils.h"
5794 1138ced03f14 [project @ 2006-05-08 20:23:04 by jwe] jwe parents: 5780 diff changeset	59 #include "variables.h"
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	60
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	61 namespace octave
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	62 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	63 // Nonzero means we have already printed a message for this series of
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	64 // SIGPIPES. We assume that the writer will eventually give up.
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	65 int pipe_handler_error_count = 0;
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	66
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	67 // TRUE means we can be interrupted.
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	68 bool can_interrupt = false;
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	69
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	70 // TRUE means we should try to enter the debugger on SIGINT.
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	71 bool Vdebug_on_interrupt = false;
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	72
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	73 // Allow users to avoid writing octave-workspace for SIGHUP (sent by
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	74 // closing gnome-terminal, for example). Note that this variable has
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	75 // no effect if Vcrash_dumps_octave_core is FALSE.
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	76 static bool Vsighup_dumps_octave_core = true;
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	77
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	78 // Similar to Vsighup_dumps_octave_core, but for SIGQUIT signal.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	79 static bool Vsigquit_dumps_octave_core = true;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	80
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	81 // Similar to Vsighup_dumps_octave_core, but for SIGTERM signal.
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	82 static bool Vsigterm_dumps_octave_core = true;
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	83
23696 08036a7f3660 remove octave:: namespace tag from symbols used inside octave namespace John W. Eaton <jwe@octave.org> parents: 23457 diff changeset	84 // List of signals we have caught since last call to signal_handler.
23457 21baad6b35c4 maint: Use C++11 nullptr rather than 0 or NULL when possible. Rik <rik@octave.org> parents: 23449 diff changeset	85 static bool *signals_caught = nullptr;
4185 8f6d418d31c3 [project @ 2002-11-15 23:22:03 by jwe] jwe parents: 4182 diff changeset	86
23096 b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	87 static void
23101 86376c04cb66 generate signal name from number when needed in signal handler functions John W. Eaton <jwe@octave.org> parents: 23096 diff changeset	88 my_friendly_exit (int sig, bool save_vars = true)
23096 b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	89 {
23101 86376c04cb66 generate signal name from number when needed in signal handler functions John W. Eaton <jwe@octave.org> parents: 23096 diff changeset	90 std::cerr << "fatal: caught signal "
86376c04cb66 generate signal name from number when needed in signal handler functions John W. Eaton <jwe@octave.org> parents: 23096 diff changeset	91 << octave_strsignal_wrapper (sig)
23096 b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	92 << " -- stopping myself..." << std::endl;
b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	93
b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	94 if (save_vars)
b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	95 dump_octave_core ();
b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	96
b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	97 sysdep_cleanup ();
b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	98
23696 08036a7f3660 remove octave:: namespace tag from symbols used inside octave namespace John W. Eaton <jwe@octave.org> parents: 23457 diff changeset	99 throw exit_exception (1);
23096 b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	100 }
b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	101
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	102 // Called from octave_quit () to actually do something about the signals
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	103 // we have caught.
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	104
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	105 void
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	106 respond_to_pending_signals (void)
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	107 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	108 // The list of signals is relatively short, so we will just go
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	109 // linearly through the list.
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	110
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	111 // Interrupt signals are currently handled separately.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	112
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	113 static int sigint;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	114 static const bool have_sigint
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	115 = octave_get_sig_number ("SIGINT", &sigint);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	116
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	117 static int sigbreak;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	118 static const bool have_sigbreak
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	119 = octave_get_sig_number ("SIGBREAK", &sigbreak);
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	120
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	121 // Termination signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	122
23096 b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	123 static int sighup;
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	124 static const bool have_sighup
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	125 = octave_get_sig_number ("SIGHUP", &sighup);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	126
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	127 static int sigquit;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	128 static const bool have_sigquit
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	129 = octave_get_sig_number ("SIGQUIT", &sigquit);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	130
23096 b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	131 static int sigterm;
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	132 static const bool have_sigterm
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	133 = octave_get_sig_number ("SIGTERM", &sigterm);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	134
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	135 // Alarm signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	136
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	137 static int sigalrm;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	138 static const bool have_sigalrm
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	139 = octave_get_sig_number ("SIGALRM", &sigalrm);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	140
24525 a8eb8a734b9d tweaks to signal handlers John W. Eaton <jwe@octave.org> parents: 24520 diff changeset	141 static int sigvtalrm;
a8eb8a734b9d tweaks to signal handlers John W. Eaton <jwe@octave.org> parents: 24520 diff changeset	142 static const bool have_sigvtalrm
a8eb8a734b9d tweaks to signal handlers John W. Eaton <jwe@octave.org> parents: 24520 diff changeset	143 = octave_get_sig_number ("SIGVTALRM", &sigvtalrm);
a8eb8a734b9d tweaks to signal handlers John W. Eaton <jwe@octave.org> parents: 24520 diff changeset	144
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	145 // I/O signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	146
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	147 static int sigio;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	148 static const bool have_sigio
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	149 = octave_get_sig_number ("SIGIO", &sigio);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	150
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	151 static int siglost;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	152 static const bool have_siglost
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	153 = octave_get_sig_number ("SIGLOST", &siglost);
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	154
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	155 static int sigpipe;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	156 static const bool have_sigpipe
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	157 = octave_get_sig_number ("SIGPIPE", &sigpipe);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	158
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	159 // Job control signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	160
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	161 static int sigchld;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	162 static const bool have_sigchld
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	163 = octave_get_sig_number ("SIGCHLD", &sigchld);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	164
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	165 static int sigcld;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	166 static const bool have_sigcld
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	167 = octave_get_sig_number ("SIGCLD", &sigcld);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	168
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	169 // Resource limit signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	170
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	171 static int sigxcpu;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	172 static const bool have_sigxcpu
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	173 = octave_get_sig_number ("SIGXCPU", &sigxcpu);
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	174
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	175 static int sigxfsz;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	176 static const bool have_sigxfsz
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	177 = octave_get_sig_number ("SIGXFSZ", &sigxfsz);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	178
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	179 // User signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	180
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	181 static int sigusr1;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	182 static const bool have_sigusr1
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	183 = octave_get_sig_number ("SIGUSR1", &sigusr1);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	184
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	185 static int sigusr2;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	186 static const bool have_sigusr2
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	187 = octave_get_sig_number ("SIGUSR2", &sigusr2);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	188
25336 389757b7b6af eliminate redundant octave:: namespace tags John W. Eaton <jwe@octave.org> parents: 25284 diff changeset	189 child_list& kids = __get_child_list__ ("respond_to_pending_signals");
24734 5d8c4cbc56d7 don't use singleton pattern for child_list John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	190
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	191 for (int sig = 0; sig < octave_num_signals (); sig++)
17958 1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	192 {
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	193 if (signals_caught[sig])
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	194 {
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	195 signals_caught[sig] = false;
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	196
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	197 if ((have_sigchld && sig == sigchld)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	198 \|\| (have_sigcld && sig == sigcld))
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	199 {
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	200 // FIXME: should we block or ignore?
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	201 volatile interrupt_handler saved_interrupt_handler
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	202 = ignore_interrupts ();
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	203
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	204 void *context = octave_block_child ();
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	205
24734 5d8c4cbc56d7 don't use singleton pattern for child_list John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	206 kids.wait ();
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	207
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	208 set_interrupt_handler (saved_interrupt_handler);
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	209
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	210 octave_unblock_child (context);
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	211
24734 5d8c4cbc56d7 don't use singleton pattern for child_list John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	212 kids.reap ();
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	213 }
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	214 else if (have_sigpipe && sig == sigpipe)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	215 {
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	216 std::cerr << "warning: broken pipe" << std::endl;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	217
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	218 // Don't loop forever on account of this.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	219 // FIXME: is this really needed? Does it do anything
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	220 // useful now?
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	221
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	222 if (pipe_handler_error_count++ > 100
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	223 && octave_interrupt_state >= 0)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	224 octave_interrupt_state++;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	225 }
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	226 else if (have_sighup && sig == sighup)
23101 86376c04cb66 generate signal name from number when needed in signal handler functions John W. Eaton <jwe@octave.org> parents: 23096 diff changeset	227 my_friendly_exit (sighup, Vsighup_dumps_octave_core);
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	228 else if (have_sigquit && sig == sigquit)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	229 my_friendly_exit (sigquit, Vsigquit_dumps_octave_core);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	230 else if (have_sigterm && sig == sigterm)
23101 86376c04cb66 generate signal name from number when needed in signal handler functions John W. Eaton <jwe@octave.org> parents: 23096 diff changeset	231 my_friendly_exit (sigterm, Vsigterm_dumps_octave_core);
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	232 else if ((have_sigalrm && sig == sigalrm)
24525 a8eb8a734b9d tweaks to signal handlers John W. Eaton <jwe@octave.org> parents: 24520 diff changeset	233 \|\| (have_sigvtalrm && sig == sigvtalrm)
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	234 \|\| (have_sigio && sig == sigio)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	235 \|\| (have_siglost && sig == siglost)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	236 \|\| (have_sigxcpu && sig == sigxcpu)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	237 \|\| (have_sigxfsz && sig == sigxfsz)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	238 \|\| (have_sigusr1 && sig == sigusr1)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	239 \|\| (have_sigusr2 && sig == sigusr2))
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	240 std::cerr << "warning: ignoring signal: "
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	241 << octave_strsignal_wrapper (sig)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	242 << std::endl;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	243 else if ((have_sigint && sig == sigint)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	244 \|\| (have_sigbreak && sig == sigbreak))
25284 78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	245 ; // Handled separately; do nothing.
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	246 else
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	247 std::cerr << "warning: ignoring unexpected signal: "
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	248 << octave_strsignal_wrapper (sig)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	249 << std::endl;
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	250 }
17958 1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	251 }
1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	252 }
1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	253
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	254 sig_handler *
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	255 set_signal_handler (int sig, sig_handler *handler, bool restart_syscalls)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	256 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	257 return octave_set_signal_handler_internal (sig, handler, restart_syscalls);
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	258 }
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	259
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	260 sig_handler *
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	261 set_signal_handler (const char signame, sig_handler handler,
22407 34ce5be04942 maint: Style check C++ code in libinterp/. Rik <rik@octave.org> parents: 22382 diff changeset	262 bool restart_syscalls)
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	263 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	264 return octave_set_signal_handler_by_name (signame, handler,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	265 restart_syscalls);
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	266 }
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	267
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	268 static void
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	269 generic_sig_handler (int sig)
17958 1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	270 {
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	271 // FIXME: this function may execute in a separate signal handler or
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	272 // signal watcher thread so it should probably be more careful about
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	273 // how it accesses global objects.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	274
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	275 octave_signal_caught = 1;
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	276
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	277 signals_caught[sig] = true;
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	278
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	279 static int sigint;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	280 static const bool have_sigint
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	281 = octave_get_sig_number ("SIGINT", &sigint);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	282
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	283 static int sigbreak;
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	284 static const bool have_sigbreak
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	285 = octave_get_sig_number ("SIGBREAK", &sigbreak);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	286
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	287 if ((have_sigint && sig == sigint)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	288 \|\| (have_sigbreak && sig == sigbreak))
25284 78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	289 {
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	290 if (! octave_initialized)
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	291 exit (1);
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	292
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	293 if (can_interrupt)
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	294 {
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	295 octave_signal_caught = 1;
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	296 octave_interrupt_state++;
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	297 }
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	298 }
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	299 }
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	300
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	301 static void
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	302 deadly_sig_handler (int sig)
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	303 {
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	304 std::cerr << "fatal: caught signal "
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	305 << octave_strsignal_wrapper (sig)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	306 << " -- stopping myself..." << std::endl;
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	307
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	308 octave_set_default_signal_handler (sig);
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	309
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	310 octave_raise_wrapper (sig);
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	311 }
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	312
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	313 static void
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	314 fpe_sig_handler (int)
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	315 {
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	316 // FIXME: is there something better we can do?
23096 b7a24a734c37 defer SIGHUP and SIGTERM actions until octave_quit is called John W. Eaton <jwe@octave.org> parents: 23084 diff changeset	317
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	318 std::cerr << "warning: floating point exception" << std::endl;
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	319 }
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	320
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	321 interrupt_handler
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	322 catch_interrupts (void)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	323 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	324 interrupt_handler retval;
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	325
25284 78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	326 retval.int_handler = set_signal_handler ("SIGINT", generic_sig_handler);
78fb24bdd8bb unblock async signals before executing subprocess (bug #53635) John W. Eaton <jwe@octave.org> parents: 25103 diff changeset	327 retval.brk_handler = set_signal_handler ("SIGBREAK", generic_sig_handler);
17958 1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	328
1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	329 return retval;
1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	330 }
1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	331
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	332 interrupt_handler
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	333 ignore_interrupts (void)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	334 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	335 interrupt_handler retval;
17958 1adf3710bb68 Working CTRL-C handling implementation for Win32. Michael Goffioul <michael.goffioul@gmail.com> parents: 17861 diff changeset	336
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	337 retval.int_handler = set_signal_handler ("SIGINT", SIG_IGN);
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	338 retval.brk_handler = set_signal_handler ("SIGBREAK", SIG_IGN);
21941 1d23b75cbcd1 hide signal.h from C++ sources John W. Eaton <jwe@octave.org> parents: 21938 diff changeset	339
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	340 return retval;
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	341 }
11555 f359cfc6e24d sighandlers.cc: wait for children in octave_signal_handler, not sigchld_handler John W. Eaton <jwe@octave.org> parents: 11525 diff changeset	342
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	343 interrupt_handler
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	344 set_interrupt_handler (const volatile interrupt_handler& h,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	345 bool restart_syscalls)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	346 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	347 interrupt_handler retval;
5142 0f9108f298ab [project @ 2005-02-12 02:29:34 by jwe] jwe parents: 5128 diff changeset	348
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	349 retval.int_handler = set_signal_handler ("SIGINT", h.int_handler,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	350 restart_syscalls);
5142 0f9108f298ab [project @ 2005-02-12 02:29:34 by jwe] jwe parents: 5128 diff changeset	351
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	352 retval.brk_handler = set_signal_handler ("SIGBREAK", h.brk_handler,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	353 restart_syscalls);
2536 1d63e820ee13 [project @ 1996-11-19 20:34:29 by jwe] jwe parents: 2512 diff changeset	354
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	355 return retval;
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	356 }
5451 ed08548b9054 [project @ 2005-09-15 19:52:50 by jwe] jwe parents: 5333 diff changeset	357
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	358 // Install all the handlers for the signals we might care about.
1373 cea4101a2f18 [project @ 1995-09-07 07:19:58 by jwe] jwe parents: 1358 diff changeset	359
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	360 void
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	361 install_signal_handlers (void)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	362 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	363 if (! signals_caught)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	364 signals_caught = new bool [octave_num_signals ()];
5451 ed08548b9054 [project @ 2005-09-15 19:52:50 by jwe] jwe parents: 5333 diff changeset	365
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	366 for (int i = 0; i < octave_num_signals (); i++)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	367 signals_caught[i] = false;
3162 7c96e85c76db [project @ 1998-04-08 18:19:35 by jwe] jwe parents: 3018 diff changeset	368
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	369 // Interrupt signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	370
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	371 catch_interrupts ();
5144 25b090e1be9f [project @ 2005-02-15 12:06:05 by jwe] jwe parents: 5142 diff changeset	372
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	373 // Program Error signals. These are most likely unrecoverable for
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	374 // us.
1446 5135dac66704 [project @ 1995-09-19 22:34:06 by jwe] jwe parents: 1395 diff changeset	375
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	376 set_signal_handler ("SIGABRT", deadly_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	377 set_signal_handler ("SIGBUS", deadly_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	378 set_signal_handler ("SIGEMT", deadly_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	379 set_signal_handler ("SIGILL", deadly_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	380 // SIGIOT is normally another name for SIGABRT.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	381 set_signal_handler ("SIGIOT", deadly_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	382 set_signal_handler ("SIGSEGV", deadly_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	383 set_signal_handler ("SIGSYS", deadly_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	384 set_signal_handler ("SIGTRAP", deadly_sig_handler);
1230 92609e161b29 [project @ 1995-04-10 01:08:57 by jwe] jwe parents: 1009 diff changeset	385
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	386 // Handle SIGFPE separately.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	387
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	388 set_signal_handler ("SIGFPE", fpe_sig_handler);
3281 aaaa20d31a5f [project @ 1999-10-13 07:02:46 by jwe] jwe parents: 3252 diff changeset	389
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	390 // Handle other signals for which the default action is to terminate
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	391 // the program.
4172 2e94b2abfe6d [project @ 2002-11-12 21:14:04 by jwe] jwe parents: 4153 diff changeset	392
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	393 // Termination signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	394
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	395 set_signal_handler ("SIGHUP", generic_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	396 set_signal_handler ("SIGQUIT", generic_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	397 set_signal_handler ("SIGTERM", generic_sig_handler);
8658 73c4516fae10 New evaluator and debugger derived from tree-walker class John W. Eaton <jwe@octave.org> parents: 7481 diff changeset	398
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	399 // Alarm signals.
7481 78f3811155f7 use exceptions in liboctave error handler John W. Eaton <jwe@octave.org> parents: 7017 diff changeset	400
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	401 set_signal_handler ("SIGALRM", generic_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	402 set_signal_handler ("SIGVTALRM", generic_sig_handler);
4793 a62215ab8a03 [project @ 2004-02-20 20:59:34 by jwe] jwe parents: 4791 diff changeset	403
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	404 // I/O signals.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	405
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	406 set_signal_handler ("SIGLOST", generic_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	407 set_signal_handler ("SIGPIPE", generic_sig_handler);
4787 02c748eb2ddc [project @ 2004-02-18 21:20:26 by jwe] jwe parents: 4675 diff changeset	408
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	409 // Job control signals. We only recognize signals about child
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	410 // processes.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	411
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	412 set_signal_handler ("SIGCHLD", generic_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	413 set_signal_handler ("SIGCLD", generic_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	414
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	415 // Resource limit signals.
5451 ed08548b9054 [project @ 2005-09-15 19:52:50 by jwe] jwe parents: 5333 diff changeset	416
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	417 // FIXME: does it really make sense to try to handle the CPU limit
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	418 // signal?
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	419
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	420 set_signal_handler ("SIGXCPU", generic_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	421 set_signal_handler ("SIGXFSZ", generic_sig_handler);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	422
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	423 // User signals.
2554 f7e3d23f0a8f [project @ 1996-11-21 01:41:57 by jwe] jwe parents: 2536 diff changeset	424
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	425 set_signal_handler ("SIGUSR1", generic_sig_handler);
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	426 set_signal_handler ("SIGUSR2", generic_sig_handler);
2705 18395aaeafb7 [project @ 1997-02-20 04:56:43 by jwe] jwe parents: 2693 diff changeset	427
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	428 // This does nothing on Windows systems.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	429 octave_create_interrupt_watcher_thread (generic_sig_handler);
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	430 }
635 5338832d2cf6 [project @ 1994-08-23 17:57:20 by jwe] jwe parents: 529 diff changeset	431
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	432 static void
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	433 set_sig_struct_field (octave_scalar_map& m, const char *signame)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	434 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	435 int signum;
21941 1d23b75cbcd1 hide signal.h from C++ sources John W. Eaton <jwe@octave.org> parents: 21938 diff changeset	436
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	437 // The names in the struct do not include the leading "SIG" prefix.
1 78fd87e624cb [project @ 1993-08-08 01:13:40 by jwe] jwe parents: diff changeset	438
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	439 if (octave_get_sig_number (signame, &signum))
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	440 m.assign (&signame[3], signum);
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	441 }
3174 390d5e396682 [project @ 1998-05-04 16:36:17 by jwe] jwe parents: 3162 diff changeset	442
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	443 static octave_scalar_map
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	444 make_sig_struct (void)
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	445 {
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	446 octave_scalar_map m;
3174 390d5e396682 [project @ 1998-05-04 16:36:17 by jwe] jwe parents: 3162 diff changeset	447
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	448 set_sig_struct_field (m, "SIGABRT");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	449 set_sig_struct_field (m, "SIGALRM");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	450 set_sig_struct_field (m, "SIGBUS");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	451 set_sig_struct_field (m, "SIGCHLD");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	452 set_sig_struct_field (m, "SIGCLD");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	453 set_sig_struct_field (m, "SIGCONT");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	454 set_sig_struct_field (m, "SIGEMT");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	455 set_sig_struct_field (m, "SIGFPE");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	456 set_sig_struct_field (m, "SIGHUP");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	457 set_sig_struct_field (m, "SIGILL");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	458 set_sig_struct_field (m, "SIGINFO");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	459 set_sig_struct_field (m, "SIGINT");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	460 set_sig_struct_field (m, "SIGIO");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	461 set_sig_struct_field (m, "SIGIOT");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	462 set_sig_struct_field (m, "SIGKILL");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	463 set_sig_struct_field (m, "SIGLOST");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	464 set_sig_struct_field (m, "SIGPIPE");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	465 set_sig_struct_field (m, "SIGPOLL");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	466 set_sig_struct_field (m, "SIGPROF");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	467 set_sig_struct_field (m, "SIGPWR");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	468 set_sig_struct_field (m, "SIGQUIT");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	469 set_sig_struct_field (m, "SIGSEGV");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	470 set_sig_struct_field (m, "SIGSTKFLT");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	471 set_sig_struct_field (m, "SIGSTOP");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	472 set_sig_struct_field (m, "SIGSYS");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	473 set_sig_struct_field (m, "SIGTERM");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	474 set_sig_struct_field (m, "SIGTRAP");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	475 set_sig_struct_field (m, "SIGTSTP");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	476 set_sig_struct_field (m, "SIGTTIN");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	477 set_sig_struct_field (m, "SIGTTOU");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	478 set_sig_struct_field (m, "SIGUNUSED");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	479 set_sig_struct_field (m, "SIGURG");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	480 set_sig_struct_field (m, "SIGUSR1");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	481 set_sig_struct_field (m, "SIGUSR2");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	482 set_sig_struct_field (m, "SIGVTALRM");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	483 set_sig_struct_field (m, "SIGWINCH");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	484 set_sig_struct_field (m, "SIGXCPU");
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	485 set_sig_struct_field (m, "SIGXFSZ");
4294 755f6509bb01 [project @ 2003-01-11 04:01:53 by jwe] jwe parents: 4233 diff changeset	486
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	487 return m;
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	488 }
4294 755f6509bb01 [project @ 2003-01-11 04:01:53 by jwe] jwe parents: 4233 diff changeset	489 }
755f6509bb01 [project @ 2003-01-11 04:01:53 by jwe] jwe parents: 4233 diff changeset	490
5780 cbf717bf8150 [project @ 2006-04-27 20:02:30 by jwe] jwe parents: 5775 diff changeset	491 DEFUN (SIG, args, ,
21966 112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	492 doc: /* -- texinfo --
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	493 @deftypefn {} {} SIG ()
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	494 Return a structure containing Unix signal names and their defined values.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	495 @end deftypefn */)
5780 cbf717bf8150 [project @ 2006-04-27 20:02:30 by jwe] jwe parents: 5775 diff changeset	496 {
20801 a542a9bf177e eliminate return statements after calls to print_usage John W. Eaton <jwe@octave.org> parents: 20791 diff changeset	497 if (args.length () != 0)
5823 080c08b192d8 [project @ 2006-05-19 05:32:17 by jwe] jwe parents: 5794 diff changeset	498 print_usage ();
5780 cbf717bf8150 [project @ 2006-04-27 20:02:30 by jwe] jwe parents: 5775 diff changeset	499
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	500 static octave_scalar_map m = octave::make_sig_struct ();
20801 a542a9bf177e eliminate return statements after calls to print_usage John W. Eaton <jwe@octave.org> parents: 20791 diff changeset	501
20939 b17fda023ca6 maint: Use new C++ archetype in more files. Rik <rik@octave.org> parents: 20853 diff changeset	502 return ovl (m);
5780 cbf717bf8150 [project @ 2006-04-27 20:02:30 by jwe] jwe parents: 5775 diff changeset	503 }
cbf717bf8150 [project @ 2006-04-27 20:02:30 by jwe] jwe parents: 5775 diff changeset	504
12827 8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	505 /*
14429 eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	506 %!assert (isstruct (SIG ()))
eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	507 %!assert (! isempty (SIG ()))
eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	508
eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	509 %!error SIG (1)
12827 8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	510 */
8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	511
5794 1138ced03f14 [project @ 2006-05-08 20:23:04 by jwe] jwe parents: 5780 diff changeset	512 DEFUN (debug_on_interrupt, args, nargout,
21966 112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	513 doc: /* -- texinfo --
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	514 @deftypefn {} {@var{val} =} debug_on_interrupt ()
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	515 @deftypefnx {} {@var{old_val} =} debug_on_interrupt (@var{new_val})
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	516 @deftypefnx {} {} debug_on_interrupt (@var{new_val}, "local")
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	517 Query or set the internal variable that controls whether Octave will try
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	518 to enter debugging mode when it receives an interrupt signal (typically
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	519 generated with @kbd{C-c}).
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	520
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	521 If a second interrupt signal is received before reaching the debugging mode,
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	522 a normal interrupt will occur.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	523
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	524 When called from inside a function with the @qcode{"local"} option, the
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	525 variable is changed locally for the function and any subroutines it calls.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	526 The original variable value is restored when exiting the function.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	527 @seealso{debug_on_error, debug_on_warning}
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	528 @end deftypefn */)
4449 e2c91da0aa16 [project @ 2003-07-09 02:21:11 by jwe] jwe parents: 4429 diff changeset	529 {
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	530 return set_internal_variable (octave::Vdebug_on_interrupt, args, nargout,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	531 "debug_on_interrupt");
4449 e2c91da0aa16 [project @ 2003-07-09 02:21:11 by jwe] jwe parents: 4429 diff changeset	532 }
e2c91da0aa16 [project @ 2003-07-09 02:21:11 by jwe] jwe parents: 4429 diff changeset	533
12827 8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	534 /*
8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	535 %!test
12832 03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	536 %! orig_val = debug_on_interrupt ();
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	537 %! old_val = debug_on_interrupt (! orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	538 %! assert (orig_val, old_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	539 %! assert (debug_on_interrupt (), ! orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	540 %! debug_on_interrupt (orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	541 %! assert (debug_on_interrupt (), orig_val);
14429 eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	542
eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	543 %!error (debug_on_interrupt (1, 2))
12827 8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	544 */
8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	545
5794 1138ced03f14 [project @ 2006-05-08 20:23:04 by jwe] jwe parents: 5780 diff changeset	546 DEFUN (sighup_dumps_octave_core, args, nargout,
21966 112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	547 doc: /* -- texinfo --
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	548 @deftypefn {} {@var{val} =} sighup_dumps_octave_core ()
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	549 @deftypefnx {} {@var{old_val} =} sighup_dumps_octave_core (@var{new_val})
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	550 @deftypefnx {} {} sighup_dumps_octave_core (@var{new_val}, "local")
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	551 Query or set the internal variable that controls whether Octave tries
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	552 to save all current variables to the file @file{octave-workspace} if it
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	553 receives a hangup signal.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	554
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	555 When called from inside a function with the @qcode{"local"} option, the
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	556 variable is changed locally for the function and any subroutines it calls.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	557 The original variable value is restored when exiting the function.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	558 @end deftypefn */)
4185 8f6d418d31c3 [project @ 2002-11-15 23:22:03 by jwe] jwe parents: 4182 diff changeset	559 {
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	560 return set_internal_variable (octave::Vsighup_dumps_octave_core,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	561 args, nargout,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	562 "sighup_dumps_octave_core");
5794 1138ced03f14 [project @ 2006-05-08 20:23:04 by jwe] jwe parents: 5780 diff changeset	563 }
4294 755f6509bb01 [project @ 2003-01-11 04:01:53 by jwe] jwe parents: 4233 diff changeset	564
12827 8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	565 /*
8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	566 %!test
12832 03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	567 %! orig_val = sighup_dumps_octave_core ();
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	568 %! old_val = sighup_dumps_octave_core (! orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	569 %! assert (orig_val, old_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	570 %! assert (sighup_dumps_octave_core (), ! orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	571 %! sighup_dumps_octave_core (orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	572 %! assert (sighup_dumps_octave_core (), orig_val);
14429 eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	573
eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	574 %!error (sighup_dumps_octave_core (1, 2))
12827 8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	575 */
8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	576
24520 c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	577 DEFUN (sigquit_dumps_octave_core, args, nargout,
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	578 doc: /* -- texinfo --
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	579 @deftypefn {} {@var{val} =} sigquit_dumps_octave_core ()
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	580 @deftypefnx {} {@var{old_val} =} sigquit_dumps_octave_core (@var{new_val})
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	581 @deftypefnx {} {} sigquit_dumps_octave_core (@var{new_val}, "local")
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	582 Query or set the internal variable that controls whether Octave tries
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	583 to save all current variables to the file @file{octave-workspace} if it
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	584 receives a quit signal.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	585
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	586 When called from inside a function with the @qcode{"local"} option, the
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	587 variable is changed locally for the function and any subroutines it calls.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	588 The original variable value is restored when exiting the function.
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	589 @end deftypefn */)
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	590 {
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	591 return set_internal_variable (octave::Vsigquit_dumps_octave_core,
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	592 args, nargout,
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	593 "sigquit_dumps_octave_core");
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	594 }
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	595
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	596 /*
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	597 %!test
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	598 %! orig_val = sigquit_dumps_octave_core ();
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	599 %! old_val = sigquit_dumps_octave_core (! orig_val);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	600 %! assert (orig_val, old_val);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	601 %! assert (sigquit_dumps_octave_core (), ! orig_val);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	602 %! sigquit_dumps_octave_core (orig_val);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	603 %! assert (sigquit_dumps_octave_core (), orig_val);
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	604
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	605 %!error (sigquit_dumps_octave_core (1, 2))
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	606 */
c5c11b07598a refactor signal handling (bug #52757) John W. Eaton <jwe@octave.org> parents: 24118 diff changeset	607
5794 1138ced03f14 [project @ 2006-05-08 20:23:04 by jwe] jwe parents: 5780 diff changeset	608 DEFUN (sigterm_dumps_octave_core, args, nargout,
21966 112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	609 doc: /* -- texinfo --
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	610 @deftypefn {} {@var{val} =} sigterm_dumps_octave_core ()
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	611 @deftypefnx {} {@var{old_val} =} sigterm_dumps_octave_core (@var{new_val})
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	612 @deftypefnx {} {} sigterm_dumps_octave_core (@var{new_val}, "local")
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	613 Query or set the internal variable that controls whether Octave tries
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	614 to save all current variables to the file @file{octave-workspace} if it
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	615 receives a terminate signal.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	616
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	617 When called from inside a function with the @qcode{"local"} option, the
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	618 variable is changed locally for the function and any subroutines it calls.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	619 The original variable value is restored when exiting the function.
112b20240c87 move docstrings in C++ files out of C strings and into comments John W. Eaton <jwe@octave.org> parents: 21941 diff changeset	620 @end deftypefn */)
5794 1138ced03f14 [project @ 2006-05-08 20:23:04 by jwe] jwe parents: 5780 diff changeset	621 {
22051 6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	622 return set_internal_variable (octave::Vsigterm_dumps_octave_core,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	623 args, nargout,
6db928d06b07 move signal functions into octave namespace John W. Eaton <jwe@octave.org> parents: 22049 diff changeset	624 "sigterm_dumps_octave_core");
4185 8f6d418d31c3 [project @ 2002-11-15 23:22:03 by jwe] jwe parents: 4182 diff changeset	625 }
12827 8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	626
8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	627 /*
8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	628 %!test
12832 03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	629 %! orig_val = sigterm_dumps_octave_core ();
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	630 %! old_val = sigterm_dumps_octave_core (! orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	631 %! assert (orig_val, old_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	632 %! assert (sigterm_dumps_octave_core (), ! orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	633 %! sigterm_dumps_octave_core (orig_val);
03f125c0fb7b codesprint: improve tests John W. Eaton <jwe@octave.org> parents: 12827 diff changeset	634 %! assert (sigterm_dumps_octave_core (), orig_val);
14429 eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	635
eff4a5933e28 Update %!tests in src/ directory with Octave coding conventions. Rik <octave@nomad.inbox5.com> parents: 14338 diff changeset	636 %!error (sigterm_dumps_octave_core (1, 2))
12827 8c6d71520920 codesprint: new tests for sysdep.cc functions John W. Eaton <jwe@octave.org> parents: 11586 diff changeset	637 */

Mercurial > octave

annotate libinterp/corefcn/sighandlers.cc @ 27923:bd51beb6205e