xref: /dragonfly/games/larn/signal.c (revision 28c26f7e)
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 static const char *signame[NSIG] = { "",
130 "SIGHUP",  /*	1	 hangup */
131 "SIGINT",  /*	2	 interrupt */
132 "SIGQUIT", /*	3	 quit */
133 "SIGILL",  /*	4	 illegal instruction (not reset when caught) */
134 "SIGTRAP", /*	5	 trace trap (not reset when caught) */
135 "SIGIOT",  /*	6	 IOT instruction */
136 "SIGEMT",  /*	7	 EMT instruction */
137 "SIGFPE",  /*	8	 floating point exception */
138 "SIGKILL", /*	9	 kill (cannot be caught or ignored) */
139 "SIGBUS",  /*	10	 bus error */
140 "SIGSEGV", /*	11	 segmentation violation */
141 "SIGSYS",  /*	12	 bad argument to system call */
142 "SIGPIPE", /*	13	 write on a pipe with no one to read it */
143 "SIGALRM", /*	14	 alarm clock */
144 "SIGTERM", /*	15	 software termination signal from kill */
145 "SIGURG",  /*	16	 urgent condition on IO channel */
146 "SIGSTOP", /*	17	 sendable stop signal not from tty */
147 "SIGTSTP", /*	18	 stop signal from tty */
148 "SIGCONT", /*	19	 continue a stopped process */
149 "SIGCHLD", /*	20	 to parent on child stop or exit */
150 "SIGTTIN", /*	21	 to readers pgrp upon background tty read */
151 "SIGTTOU", /*	22	 like TTIN for output if (tp->t_local&LTOSTOP) */
152 "SIGIO",   /*	23	 input/output possible signal */
153 "SIGXCPU", /*	24	 exceeded CPU time limit */
154 "SIGXFSZ", /*	25	 exceeded file size limit */
155 "SIGVTALRM",/*  26	 virtual time alarm */
156 "SIGPROF", /*	27	 profiling time alarm */
157 "SIGWINCH",/*	28	 window size changes */
158 "SIGINFO",/*	29	 information request */
159 "SIGUSR1",/*	30	 user defined signal 1 */
160 "SIGUSR2",/*	31	 user defined signal 2 */
161 };
162 
163 /*
164  *	routine to process a fatal error signal
165  */
166 static void
167 sigpanic(int sig)
168 	{
169 	char buf[128];
170 	signal(sig,SIG_DFL);
171 	sprintf(buf,"\nLarn - Panic! Signal %d received [%s]",sig,signame[sig]);
172 	write(2,buf,strlen(buf));  sleep(2);
173 	sncbr();
174 	savegame(savefilename);
175 	kill(getpid(),sig); /* this will terminate us */
176 	}
177