date and time created 89/03/05 18:59:32 by bostic

SCCS-vsn: games/larn/signal.c 5.1

diff --git a/usr/src/games/larn/signal.c b/usr/src/games/larn/signal.c
new file mode 100644 (file)
index 0000000..1ad2c5c
--- /dev/null
+++ b/usr/src/games/larn/signal.c
@@ -0,0 +1,138 @@
+#include <signal.h>
+#include "header.h"                    /* "Larn is copyrighted 1986 by Noah Morgan.\n" */
+#define BIT(a) (1<<((a)-1))
+extern char savefilename[],wizard,predostuff,nosignal;
+static s2choose()      /* text to be displayed if ^C during intro screen */
+       {
+       cursor(1,24); lprcat("Press "); setbold(); lprcat("return"); resetbold();
+       lprcat(" to continue: ");   lflush(); 
+       }
+
+static cntlc() /* what to do for a ^C */
+       {
+       if (nosignal) return;   /* don't do anything if inhibited */
+       signal(SIGQUIT,SIG_IGN);        signal(SIGINT,SIG_IGN);
+       quit(); if (predostuff==1) s2choose(); else showplayer();
+       lflush();
+       signal(SIGQUIT,cntlc);  signal(SIGINT,cntlc);
+       }
+
+/*
+ *     subroutine to save the game if a hangup signal
+ */
+static sgam()
+       {
+       savegame(savefilename);  wizard=1;  died(-257); /* hangup signal */
+       }
+
+#ifdef SIGTSTP
+static tstop() /* control Y    */
+       {
+       if (nosignal)   return;  /* nothing if inhibited */
+       lcreat((char*)0);  clearvt100();        lflush();         signal(SIGTSTP,SIG_DFL);
+#ifdef SIGVTALRM
+       /* looks like BSD4.2 or higher - must clr mask for signal to take effect*/
+       sigsetmask(sigblock(0)& ~BIT(SIGTSTP));
+#endif
+       kill(getpid(),SIGTSTP);
+
+       setupvt100();  signal(SIGTSTP,tstop);
+       if (predostuff==1) s2choose(); else drawscreen();
+       showplayer();   lflush();
+       }
+#endif SIGTSTP
+
+/*
+ *     subroutine to issue the needed signal traps  called from main()
+ */
+static sigill()  { sigpanic(SIGILL); }  static sigtrap() { sigpanic(SIGTRAP); }
+static sigiot()  { sigpanic(SIGIOT); }   static sigemt()  { sigpanic(SIGEMT); }
+static sigfpe()  { sigpanic(SIGFPE); }   static sigbus()  { sigpanic(SIGBUS); }
+static sigsegv() { sigpanic(SIGSEGV); }  static sigsys()  { sigpanic(SIGSYS); }
+static sigpipe() { sigpanic(SIGPIPE); }  static sigterm() { sigpanic(SIGTERM); }
+sigsetup()
+       {
+       signal(SIGQUIT, cntlc);                 signal(SIGINT,  cntlc); 
+       signal(SIGKILL, SIG_IGN);               signal(SIGHUP,  sgam);
+       signal(SIGILL,  sigill);                signal(SIGTRAP, sigtrap);
+       signal(SIGIOT,  sigiot);                signal(SIGEMT,  sigemt);
+       signal(SIGFPE,  sigfpe);                signal(SIGBUS,  sigbus);
+       signal(SIGSEGV, sigsegv);               signal(SIGSYS,  sigsys);
+       signal(SIGPIPE, sigpipe);               signal(SIGTERM, sigterm);
+#ifdef SIGTSTP
+       signal(SIGTSTP,tstop);          signal(SIGSTOP,tstop);
+#endif SIGTSTP
+       }
+
+#ifdef BSD     /* for BSD UNIX? */
+
+static char *signame[NSIG] = { "",
+"SIGHUP",  /*  1        hangup */
+"SIGINT",  /*  2        interrupt */
+"SIGQUIT", /*  3        quit */
+"SIGILL",  /*  4        illegal instruction (not reset when caught) */
+"SIGTRAP", /*  5        trace trap (not reset when caught) */
+"SIGIOT",  /*  6        IOT instruction */
+"SIGEMT",  /*  7        EMT instruction */
+"SIGFPE",  /*  8        floating point exception */
+"SIGKILL", /*  9        kill (cannot be caught or ignored) */
+"SIGBUS",  /*  10       bus error */
+"SIGSEGV", /*  11       segmentation violation */
+"SIGSYS",  /*  12       bad argument to system call */
+"SIGPIPE", /*  13       write on a pipe with no one to read it */
+"SIGALRM", /*  14       alarm clock */
+"SIGTERM", /*  15       software termination signal from kill */
+"SIGURG",  /*  16       urgent condition on IO channel */
+"SIGSTOP", /*  17       sendable stop signal not from tty */
+"SIGTSTP", /*  18       stop signal from tty */
+"SIGCONT", /*  19       continue a stopped process */
+"SIGCHLD", /*  20       to parent on child stop or exit */
+"SIGTTIN", /*  21       to readers pgrp upon background tty read */
+"SIGTTOU", /*  22       like TTIN for output if (tp->t_local&LTOSTOP) */
+"SIGIO",   /*  23       input/output possible signal */
+"SIGXCPU", /*  24       exceeded CPU time limit */
+"SIGXFSZ", /*  25       exceeded file size limit */
+"SIGVTALRM",/*  26      virtual time alarm */
+"SIGPROF", /*  27       profiling time alarm */
+"","","","" };
+
+#else BSD      /* for system V? */
+
+static char *signame[NSIG] = { "",
+"SIGHUP",  /*  1        hangup */
+"SIGINT",  /*  2        interrupt */
+"SIGQUIT", /*  3        quit */
+"SIGILL",  /*  4        illegal instruction (not reset when caught) */
+"SIGTRAP", /*  5        trace trap (not reset when caught) */
+"SIGIOT",  /*  6        IOT instruction */
+"SIGEMT",  /*  7        EMT instruction */
+"SIGFPE",  /*  8        floating point exception */
+"SIGKILL", /*  9        kill (cannot be caught or ignored) */
+"SIGBUS",  /*  10       bus error */
+"SIGSEGV", /*  11       segmentation violation */
+"SIGSYS",  /*  12       bad argument to system call */
+"SIGPIPE", /*  13       write on a pipe with no one to read it */
+"SIGALRM", /*  14       alarm clock */
+"SIGTERM", /*  15       software termination signal from kill */
+"SIGUSR1",  /* 16       user defines signal 1 */
+"SIGUSR2", /*  17       user defines signal 2 */
+"SIGCLD",  /*  18       child death */
+"SIGPWR",  /*  19       power fail */
+"","","","","","","","","","","","" };
+
+#endif BSD
+
+/*
+ *     routine to process a fatal error signal
+ */
+static sigpanic(sig)
+       int sig;
+       {
+       char buf[128];
+       signal(sig,SIG_DFL);
+       sprintf(buf,"\nLarn - Panic! Signal %d received [%s]",sig,signame[sig]);
+       write(2,buf,strlen(buf));  sleep(2);
+       sncbr();
+       savegame(savefilename); 
+       kill(getpid(),sig); /* this will terminate us */
+       }