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