Annotation of freem/src/sighnd.c, revision 1.4
1.1 snw 1: /*
1.4 ! snw 2: * $Id: sighnd.c,v 1.3 2025/03/09 19:50:47 snw Exp $
1.1 snw 3: * FreeM signal handlers
4: *
5: *
1.2 snw 6: * Author: Serena Willis <snw@coherent-logic.com>
1.1 snw 7: * Copyright (C) 1998 MUG Deutschland
1.3 snw 8: * Copyright (C) 2020, 2025 Coherent Logic Development LLC
1.1 snw 9: *
10: *
11: * This file is part of FreeM.
12: *
13: * FreeM is free software: you can redistribute it and/or modify
14: * it under the terms of the GNU Affero Public License as published by
15: * the Free Software Foundation, either version 3 of the License, or
16: * (at your option) any later version.
17: *
18: * FreeM is distributed in the hope that it will be useful,
19: * but WITHOUT ANY WARRANTY; without even the implied warranty of
20: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21: * GNU Affero Public License for more details.
22: *
23: * You should have received a copy of the GNU Affero Public License
24: * along with FreeM. If not, see <https://www.gnu.org/licenses/>.
25: *
1.4 ! snw 26: * $Log: sighnd.c,v $
! 27: * Revision 1.3 2025/03/09 19:50:47 snw
! 28: * Second phase of REUSE compliance and header reformat
! 29: *
1.3 snw 30: *
31: * SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC
32: * SPDX-License-Identifier: AGPL-3.0-or-later
1.1 snw 33: **/
34:
35: #include <stddef.h>
36: #include <stdlib.h>
37: #include <setjmp.h>
38: #include <signal.h>
39: #include <unistd.h>
40: #include <stdio.h>
41:
42: #include <sys/types.h>
43: #include <sys/wait.h>
44:
1.4 ! snw 45: #if !defined(__APPLE__) && !defined(__gnu_hurd__) && !defined(EMSCRIPTEN)
! 46: # if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__AMIGA)
! 47: # include <termios.h>
! 48: # if !defined(__AMIGA)
! 49: # define TCGETA TIOCGETA
! 50: # define TCSETA TIOCSETA
! 51: # endif
! 52: # define termio termios
! 53: # else
! 54: # if !defined(MSDOS)
! 55: # include <termio.h>
! 56: # endif
! 57: # endif
! 58: #else
! 59: # include <termios.h>
! 60: #endif
! 61:
1.1 snw 62: #include <sys/ioctl.h>
63:
64: #include "mpsdef.h"
65: #include "transact.h"
66: #include "init.h"
67: #include "events.h"
68: #include "jobtab.h"
69: #include "shmmgr.h"
70:
1.4 ! snw 71:
! 72:
1.1 snw 73: void m_log (int, const char *);
74: int pending_signal_type = -1;
75:
76: void sig_attach(int sig, void *handler)
77: {
78: struct sigaction act;
79:
80: act.sa_handler = handler;
81: #if !defined(__AMIGA)
82: sigaction (sig, &act, NULL);
83: #else
84: //TODO: fill in for m68k-amigaos
85: #endif
86: }
87:
88:
89: void sig_init(void)
90: {
91: /* signals stuff */
92: sig_attach (SIGINT, &onintr); /* set_up INTERRUPT */
93: sig_attach (SIGQUIT, &onquit); /* set_up ZBREAK */
94: sig_attach (SIGTERM, &onkill); /* catch kill signal */
95:
96: #if !defined(__CYGWIN__) && !defined(MSDOS)
97: sig_attach (SIGIOT, &onbus); /* catch IOT error */
98: #endif/*__CYGWIN__*/
99:
100: #ifndef LINUX
101: sig_attach (SIGEMT, &onbus); /* catch EMT error */
102: #endif/*LINUX*/
103:
104: #if !defined(MSDOS)
105: sig_attach (SIGWINCH, &onwinch);
106: #endif
107:
108: sig_attach (SIGUSR1, &oncld); /* catch son dies signal */
109: sig_attach (SIGHUP, &onhup); /* catch hangup */
110:
111: sig_attach (SIGUSR2, &onipc); /* catch IPC signal */
112: sig_attach (SIGFPE, &onfpe); /* catch floating pt except */
113: }
114:
115:
116: #if !defined(MSDOS)
117: void onwinch (void)
118: {
119: struct winsize ws;
120:
121: /* restore handler */
122: sig_attach (SIGWINCH, &onwinch);
123:
124: ioctl (STDIN_FILENO, TIOCGWINSZ, &ws);
125:
126: n_lines = ws.ws_row;
127: n_columns = ws.ws_col;
128:
129: if (evt_async_enabled) {
130: pending_signal_type = SIGWINCH;
131: merr_raise (ASYNC);
132: }
133:
134: return;
135: }
136: #endif
137:
138: void onintr (void)
139: {
140: sig_attach (SIGINT, &onintr); /* restore handler */
141:
142: //printf ("\r\nSIGINT codptr = '%s'\r\n", codptr);
143:
144: if (first_process) {
145: job_request_stop (pid);
146: }
147: else {
148: if (shm_config->hdr->maintenance_mode == 1) {
149:
150: job_slot_t *s = job_get (pid);
151:
152:
153: if ((s->flags & JFLG_FMADM) != JFLG_FMADM) {
154:
155: fprintf (stderr, "\r\n***ENVIRONMENT IN MAINTENANCE MODE***\r\n");
156:
157: while (shm_config->hdr->maintenance_mode == 1) {
158: sleep (1);
159: }
160:
161: return;
162:
163: }
164:
165: }
166: }
167:
168:
169: if (breakon) {
170: merr_raise (INRPT);
171: inrpt_after_async = TRUE;
172: if (forsw) sigint_in_for = TRUE;
173: }
174: else {
175: zcc = TRUE;
176: }
177:
178: if (evt_async_enabled) {
179: pending_signal_type = SIGINT;
180: }
181:
182: return;
183: } /* end of onintr */
184:
185: void onfpe (void)
186: {
187: sig_attach (SIGFPE, &onfpe); /* restore handler */
188:
189: if (evt_async_enabled) {
190: pending_signal_type = SIGFPE;
191: }
192:
193: merr_raise (MXNUM);
194: return;
195: } /* end of onfpe */
196:
197: void onquit (void)
198: {
199:
200: if (run_daemon == TRUE) {
201: job_request_stop (pid);
202: }
203:
204: sig_attach (SIGQUIT, &onquit); /* restore handler */
205:
206: if (zbreakon && (merr () == OK)) ierr = OK - CTRLB;
207:
208: if (evt_async_enabled) {
209: pending_signal_type = SIGQUIT;
210: }
211:
212: return;
213: } /* end of onquit */
214:
215: void onkill (void)
216: {
217: int n = 0;
218:
219: if (run_daemon == TRUE) {
220: job_request_stop (pid);
221: }
222:
223: #if !defined(AMIGA68K)
224: if (direct_mode == TRUE) {
225: set_io (UNIX);
226: fprintf (stderr, "\n\nFreeM process %d caught SIGTERM\n", pid);
227: set_io (MUMPS);
228: }
229: #endif
230:
231:
232: sig_attach (SIGTERM, &onkill); /* restore handler */
233:
234: if (killerflag == FALSE) return; /* ignore that signal */
235:
236: /* if there exists an error trap, process as an error */
237: /* otherwise terminate the job */
238:
239: if (DSM2err) { /* DSM V.2 error trapping */
240:
241:
242:
243: if (ztrap[NESTLEVLS + 1][0] != EOL) {
244: merr_raise (KILLER);
245: return;
246: }
247:
248:
249: }
250: else {
251:
252:
253: while (n >= 0) {
254: if (ztrap[n--][0] != EOL) {
255: merr_raise (KILLER);
256: return;
257: }
258: }
259:
260:
261: }
262:
263: cleanup ();
264: if (father) kill (father, SIGUSR1); /* advertise death to parent */
265:
266: exit (1); /* terminate mumps */
267: } /* end of onkill() */
268:
269: void onhup (void)
270: {
271:
272: int n = nstx;
273:
274:
275: if (run_daemon == TRUE) {
276: fprintf (stderr, "freem: daemon received SIGHUP\r\n");
277: m_log (1, "freem: daemon received SIGHUP");
278:
279: sig_attach (SIGHUP, &onhup); /* restore handler */
280:
281: return;
282: }
283:
284: sig_attach (SIGHUP, &onhup); /* restore handler */
285:
286: if (huperflag == FALSE) return; /* ignore that signal */
287:
288: /* if there exists an error trap, process as an error */
289: /* otherwise terminate the job */
290:
291: if (DSM2err) { /* DSM V.2 error trapping */
292:
293: if (ztrap[NESTLEVLS + 1][0] != EOL) {
294: merr_raise (HUPER);
295: return;
296: }
297:
298:
299: }
300: else {
301:
302: while (n >= 0) {
303: if (ztrap[n--][0] != EOL) {
304: merr_raise (HUPER);
305: return;
306: }
307: }
308:
309: }
310:
311: cleanup ();
312:
313: if (father) kill (father, SIGUSR1); /* advertise death to parent */
314:
315: exit (1); /* terminate mumps */
316:
317: } /* end of onhup() */
318:
319: void onbus (void)
320: {
321: cleanup ();
322:
323: printf ("\012\015BUS ERROR, SEGMENTATION VIOLATION\012\015");
324:
325: if (father) kill (father, SIGUSR1); /* advertise death to parent */
326:
327: exit (1); /* terminate mumps */
328: } /* end of onbus() */
329:
330: /* under XENIX processes started with JOB hang around as zombies */
331: /* if they HALT before the parent process, unless the parent process */
332: /* waits for his child to terminate. to solve the problem, the child */
333: /* sends a signal to his parent to avoid an unattended funeral which */
334: /* inevitably would result in a living dead sucking up cpu time */
335: void oncld (void)
336: {
337: int status;
338:
339: /* ignore signal while as we're here */
340: sig_attach (SIGUSR1, SIG_IGN);
341:
342: wait (&status); /* wait for report from child */
343:
344: sig_attach (SIGUSR1, &oncld);/* restore handler */
345:
346: return;
347: } /* end of oncld() */
348:
349: void onipc (void)
350: {
351: /* restore handler */
352: sig_attach (SIGUSR2, &onipc);
353:
354: ipc_pending = 1;
355:
356: return;
357: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to sighnd.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Coherent Logic Development] / freem / src