contrib/printing/timeout.c

   1 /*
   2  * $Id: timeout.c,v 1.3 2001-06-29 14:14:46 rufustfirefly Exp $
   3  */
   4
   5 #ifdef HAVE_CONFIG_H
   6 #include "config.h"
   7 #endif /* HAVE_CONFIG_H */
   8
   9 #include <stdio.h>
  10 #include <stdlib.h>
  11 #include <string.h>
  12 #include <signal.h>
  13 #include <ctype.h>
  14 #ifdef HAVE_UNISTD_H
  15 #include <unistd.h>
  16 #endif /* HAVE_UNISTD_H */
  17
  18 char **av;
  19
  20 struct slist {
  21         char *name;
  22         int num;
  23 } sigs[] = {
  24 #ifdef SIGHUP
  25         "HUP",          SIGHUP,
  26 #endif
  27 #ifdef SIGINT
  28         "INT",          SIGINT,
  29 #endif
  30 #ifdef SIGQUIT
  31         "QUIT",         SIGQUIT,
  32 #endif
  33 #ifdef SIGILL
  34         "ILL",          SIGILL,
  35 #endif
  36 #ifdef SIGTRAP
  37         "TRAP",         SIGTRAP,
  38 #endif
  39 #ifdef SIGABRT
  40         "ABRT",         SIGABRT,
  41 #endif
  42 #ifdef SIGIOT
  43         "IOT",          SIGIOT,
  44 #endif
  45 #ifdef SIGEMT
  46         "EMT",          SIGEMT,
  47 #endif
  48 #ifdef SIGFPE
  49         "FPE",          SIGFPE,
  50 #endif
  51 #ifdef SIGKILL
  52         "KILL",         SIGKILL,
  53 #endif
  54 #ifdef SIGBUS
  55         "BUS",          SIGBUS,
  56 #endif
  57 #ifdef SIGSEGV
  58         "SEGV",         SIGSEGV,
  59 #endif
  60 #ifdef SIGSYS
  61         "SYS",          SIGSYS,
  62 #endif
  63 #ifdef SIGPIPE
  64         "PIPE",         SIGPIPE,
  65 #endif
  66 #ifdef SIGALRM
  67         "ALRM",         SIGALRM,
  68 #endif
  69 #ifdef SIGTERM
  70         "TERM",         SIGTERM,
  71 #endif
  72 #ifdef SIGURG
  73         "URG",          SIGURG,
  74 #endif
  75 #ifdef SIGSTOP
  76         "STOP",         SIGSTOP,
  77 #endif
  78 #ifdef SIGTSTP
  79         "TSTP",         SIGTSTP,
  80 #endif
  81 #ifdef SIGCONT
  82         "CONT",         SIGCONT,
  83 #endif
  84 #ifdef SIGCHLD
  85         "CHLD",         SIGCHLD,
  86 #endif
  87 #ifdef SIGCLD
  88         "CLD",          SIGCLD,
  89 #endif
  90 #ifdef SIGTTIN
  91         "TTIN",         SIGTTIN,
  92 #endif
  93 #ifdef SIGTTOU
  94         "TTOU",         SIGTTOU,
  95 #endif
  96 #ifdef SIGIO
  97         "IO",           SIGIO,
  98 #endif
  99 #ifdef SIGXCPU
 100         "XCPU",         SIGXCPU,
 101 #endif
 102 #ifdef SIGXFSZ
 103         "XFSZ",         SIGXFSZ,
 104 #endif
 105 #ifdef SIGVTALRM
 106         "VTALRM",       SIGVTALRM,
 107 #endif
 108 #ifdef SIGPROF
 109         "PROF",         SIGPROF,
 110 #endif
 111 #ifdef SIGWINCH
 112         "WINCH",        SIGWINCH,
 113 #endif
 114 #ifdef SIGINFO
 115         "INFO",         SIGINFO,
 116 #endif
 117 #ifdef SIGUSR1
 118         "USR1",         SIGUSR1,
 119 #endif
 120 #ifdef SIGUSR2
 121         "USR2",         SIGUSR2,
 122 #endif
 123 #ifdef SIGPWR
 124         "PWR",          SIGPWR,
 125 #endif
 126         0,              0
 127 };
 128
 129 void
 130 usage()
 131 {
 132         int i;
 133
 134         fprintf (stderr, "Usage: %s [-s signal] seconds program [args]\n\n",
 135                  *av);
 136         fprintf (stderr, "You can use a numerical signal, or one of these:\n");
 137
 138 #define COLS 8
 139
 140         for (i = 0; sigs[i].name; i++) {
 141                 if (i % COLS == 0)
 142                         fprintf (stderr, "\n\t");
 143
 144                 fprintf (stderr, "%s", sigs[i].name);
 145
 146                 if ((i + 1) % COLS != 0)
 147                         fprintf (stderr, "\t");
 148         }
 149
 150         fprintf (stderr, "\n\n");
 151 }
 152
 153 int
 154 main (argc, argv)
 155         int argc;
 156         char **argv;
 157 {
 158         int i;
 159         int whatsig = SIGTERM;
 160         extern char *optarg;
 161         extern int optind;
 162         int pid;
 163
 164         av = argv;
 165
 166         while ((i = getopt (argc, argv, "s:")) != -1) {
 167                 switch (i) {
 168                 case 's':
 169                         if (isdigit (*optarg)) {
 170                                 whatsig = atoi (optarg);
 171                         } else {
 172                                 for (i = 0; sigs[i].name; i++) {
 173                                         if (!strcmp (sigs[i].name, optarg)) {
 174                                                 whatsig = sigs[i].num;
 175                                                 break;
 176                                         }
 177                                 }
 178
 179                                 if (!sigs[i].name) {
 180                                         fprintf (stderr,
 181                                                  "%s: Unknown signal %s\n",
 182                                                  *av, optarg);
 183                                         usage();
 184                                         exit (1);
 185                                 }
 186                         }
 187
 188                         break;
 189
 190                 default:
 191                         usage();
 192                         exit (1);
 193                 }
 194         }
 195
 196         if (optind > argc - 2) {
 197                 usage();
 198                 exit (1);
 199         }
 200
 201         if (!isdigit (*argv[optind])) {
 202                 fprintf (stderr, "%s: \"seconds\" must be numeric, not %s\n",
 203                          *av, argv[optind]);
 204                 usage();
 205                 exit (1);
 206         }
 207
 208         pid = fork();
 209
 210         if (pid < 0) {
 211                 fprintf (stderr, "%s: fork failed: ", *av);
 212                 perror ("fork");
 213                 exit (1);
 214         } else if (pid == 0) {
 215                 int seconds = atoi (argv[optind]);
 216
 217                 pid = getppid();
 218
 219                 fclose (stdin);
 220                 fclose (stdout);
 221                 fclose (stderr);
 222
 223                 while (seconds-- > 0) {
 224                         /*
 225                          * too bad there's no SIGPARENT so we have to keep
 226                          * polling to find out if it's still there
 227                          */
 228
 229                         if (kill (pid, 0) != 0)
 230                                 exit (0);
 231
 232                         sleep (1);
 233                 }
 234
 235                 kill (pid, whatsig);
 236                 exit (0);
 237         } else {
 238                 execvp (argv[optind + 1], argv + optind + 1);
 239
 240                 fprintf (stderr, "%s: can't execute ", *av);
 241                 perror (argv[optind + 1]);
 242                 exit (1);
 243         }
 244 }