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