a69f986b2b2e5994226ca15cbddf7968fe11f61d
[dragonfly.git] / games / larn / signal.c
1 /*
2  * $DragonFly: src/games/larn/signal.c,v 1.4 2006/08/26 17:05:05 pavalos Exp $
3  */
4
5 #include <signal.h>
6 #include "header.h"                     /* "Larn is copyrighted 1986 by Noah Morgan.\n" */
7 #define BIT(a) (1<<((a)-1))
8
9 static void     s2choose(void);
10 static void     cntlc(void);
11 static void     sgam(void);
12 #ifdef SIGTSTP
13 static void     tstop(void);
14 #endif
15 static void     sigill(void);
16 static void     sigtrap(void);
17 static void     sigiot(void);
18 static void     sigemt(void);
19 static void     sigfpe(void);
20 static void     sigbus(void);
21 static void     sigsegv(void);
22 static void     sigsys(void);
23 static void     sigpipe(void);
24 static void     sigterm(void);
25 static void     sigpanic(int);
26
27 static void
28 s2choose(void)  /* text to be displayed if ^C during intro screen */
29         {
30         cursor(1,24); lprcat("Press "); setbold(); lprcat("return"); resetbold();
31         lprcat(" to continue: ");   lflush();
32         }
33
34 static void
35 cntlc(void)     /* what to do for a ^C */
36         {
37         if (nosignal) return;   /* don't do anything if inhibited */
38         signal(SIGQUIT,SIG_IGN);        signal(SIGINT,SIG_IGN);
39         quit(); if (predostuff==1) s2choose(); else showplayer();
40         lflush();
41         signal(SIGQUIT,(sig_t)cntlc);   signal(SIGINT,(sig_t)cntlc);
42         }
43
44 /*
45  *      subroutine to save the game if a hangup signal
46  */
47 static void
48 sgam(void)
49         {
50         savegame(savefilename);  wizard=1;  died(-257); /* hangup signal */
51         }
52
53 #ifdef SIGTSTP
54 static void
55 tstop(void) /* control Y        */
56         {
57         if (nosignal)   return;  /* nothing if inhibited */
58         lcreat(NULL);  clearvt100();    lflush();         signal(SIGTSTP,SIG_DFL);
59 #ifdef SIGVTALRM
60         /* looks like BSD4.2 or higher - must clr mask for signal to take effect*/
61         sigsetmask(sigblock(0)& ~BIT(SIGTSTP));
62 #endif
63         kill(getpid(),SIGTSTP);
64
65         setupvt100();  signal(SIGTSTP,(sig_t)tstop);
66         if (predostuff==1) s2choose(); else drawscreen();
67         showplayer();   lflush();
68         }
69 #endif /* SIGTSTP */
70
71 /*
72  *      subroutine to issue the needed signal traps  called from main()
73  */
74 static void
75 sigill(void)
76         { sigpanic(SIGILL); }
77
78 static void
79 sigtrap(void)
80         { sigpanic(SIGTRAP); }
81
82 static void
83 sigiot(void)
84         { sigpanic(SIGIOT); }
85
86 static void
87 sigemt(void)
88         { sigpanic(SIGEMT); }
89
90 static void
91 sigfpe(void)
92         { sigpanic(SIGFPE); }
93
94 static void
95 sigbus(void)
96         { sigpanic(SIGBUS); }
97
98 static void
99 sigsegv(void)
100         { sigpanic(SIGSEGV); }
101
102 static void
103 sigsys(void)
104         { sigpanic(SIGSYS); }
105
106 static void
107 sigpipe(void)
108         { sigpanic(SIGPIPE); }
109
110 static void
111 sigterm(void)
112         { sigpanic(SIGTERM); }
113
114 void
115 sigsetup(void)
116         {
117         signal(SIGQUIT, (sig_t)cntlc);          signal(SIGINT,  (sig_t)cntlc);
118         signal(SIGKILL, SIG_IGN);               signal(SIGHUP,  (sig_t)sgam);
119         signal(SIGILL,  (sig_t)sigill);         signal(SIGTRAP, (sig_t)sigtrap);
120         signal(SIGIOT,  (sig_t)sigiot);         signal(SIGEMT,  (sig_t)sigemt);
121         signal(SIGFPE,  (sig_t)sigfpe);         signal(SIGBUS,  (sig_t)sigbus);
122         signal(SIGSEGV, (sig_t)sigsegv);        signal(SIGSYS,  (sig_t)sigsys);
123         signal(SIGPIPE, (sig_t)sigpipe);        signal(SIGTERM, (sig_t)sigterm);
124 #ifdef SIGTSTP
125         signal(SIGTSTP, (sig_t)tstop);          signal(SIGSTOP, (sig_t)tstop);
126 #endif /* SIGTSTP */
127         }
128
129 #ifdef BSD      /* for BSD UNIX? */
130
131 static const char *signame[NSIG] = { "",
132 "SIGHUP",  /*   1        hangup */
133 "SIGINT",  /*   2        interrupt */
134 "SIGQUIT", /*   3        quit */
135 "SIGILL",  /*   4        illegal instruction (not reset when caught) */
136 "SIGTRAP", /*   5        trace trap (not reset when caught) */
137 "SIGIOT",  /*   6        IOT instruction */
138 "SIGEMT",  /*   7        EMT instruction */
139 "SIGFPE",  /*   8        floating point exception */
140 "SIGKILL", /*   9        kill (cannot be caught or ignored) */
141 "SIGBUS",  /*   10       bus error */
142 "SIGSEGV", /*   11       segmentation violation */
143 "SIGSYS",  /*   12       bad argument to system call */
144 "SIGPIPE", /*   13       write on a pipe with no one to read it */
145 "SIGALRM", /*   14       alarm clock */
146 "SIGTERM", /*   15       software termination signal from kill */
147 "SIGURG",  /*   16       urgent condition on IO channel */
148 "SIGSTOP", /*   17       sendable stop signal not from tty */
149 "SIGTSTP", /*   18       stop signal from tty */
150 "SIGCONT", /*   19       continue a stopped process */
151 "SIGCHLD", /*   20       to parent on child stop or exit */
152 "SIGTTIN", /*   21       to readers pgrp upon background tty read */
153 "SIGTTOU", /*   22       like TTIN for output if (tp->t_local&LTOSTOP) */
154 "SIGIO",   /*   23       input/output possible signal */
155 "SIGXCPU", /*   24       exceeded CPU time limit */
156 "SIGXFSZ", /*   25       exceeded file size limit */
157 "SIGVTALRM",/*  26       virtual time alarm */
158 "SIGPROF", /*   27       profiling time alarm */
159 "","","","" };
160
161 #else           /* for system V? */
162
163 static const char *signame[NSIG] = { "",
164 "SIGHUP",  /*   1        hangup */
165 "SIGINT",  /*   2        interrupt */
166 "SIGQUIT", /*   3        quit */
167 "SIGILL",  /*   4        illegal instruction (not reset when caught) */
168 "SIGTRAP", /*   5        trace trap (not reset when caught) */
169 "SIGIOT",  /*   6        IOT instruction */
170 "SIGEMT",  /*   7        EMT instruction */
171 "SIGFPE",  /*   8        floating point exception */
172 "SIGKILL", /*   9        kill (cannot be caught or ignored) */
173 "SIGBUS",  /*   10       bus error */
174 "SIGSEGV", /*   11       segmentation violation */
175 "SIGSYS",  /*   12       bad argument to system call */
176 "SIGPIPE", /*   13       write on a pipe with no one to read it */
177 "SIGALRM", /*   14       alarm clock */
178 "SIGTERM", /*   15       software termination signal from kill */
179 "SIGUSR1",  /*  16       user defines signal 1 */
180 "SIGUSR2", /*   17       user defines signal 2 */
181 "SIGCLD",  /*   18       child death */
182 "SIGPWR",  /*   19       power fail */
183 "","","","","","","","","","","","" };
184
185 #endif /* BSD */
186
187 /*
188  *      routine to process a fatal error signal
189  */
190 static void
191 sigpanic(int sig)
192         {
193         char buf[128];
194         signal(sig,SIG_DFL);
195         sprintf(buf,"\nLarn - Panic! Signal %d received [%s]",sig,signame[sig]);
196         write(2,buf,strlen(buf));  sleep(2);
197         sncbr();
198         savegame(savefilename);
199         kill(getpid(),sig); /* this will terminate us */
200         }