diplodocus.org Git - nmh/blob - sbr/ext_hook.c

   1 /*
   2  *
   3  *      Run a program that hooks into some other system.  The first argument is
   4  *      name of the hook to use, the second is the full path name of a mail message.
   5  *      The third argument is also the full path name of a mail message, or a NULL
   6  *      pointer if it isn't needed.  Look in the context for an error message if
   7  *      something goes wrong; there is a built-in message in case one isn't specified.
   8  *      Only produce the error message once.
   9  */
  10
  11 #include <h/mh.h>
  12
  13 int
  14 ext_hook(char *hook_name, char *message_file_name_1, char *message_file_name_2)
  15 {
  16     char        *hook;                  /* hook program from context */
  17     pid_t       pid;                    /* ID of child process */
  18     int         status;                 /* exit or other child process status */
  19     char        **vec;                  /* argument vector for child process */
  20     int         vecp;                   /* Vector index */
  21     char        *program;               /* Name of program to execute */
  22
  23     static  int did_message = 0;        /* set if we've already output a message */
  24
  25     if ((hook = context_find(hook_name)) == (char *)0)
  26         return (OK);
  27
  28     switch (pid = fork()) {
  29     case -1:
  30         status = NOTOK;
  31         advise(NULL, "external database may be out-of-date.");
  32         break;
  33
  34     case 0:
  35         vec = argsplit(hook, &program, &vecp);
  36         vec[vecp++] = message_file_name_1;
  37         vec[vecp++] = message_file_name_2;
  38         vec[vecp++] = NULL;
  39         execvp(program, vec);
  40         _exit(-1);
  41         /* NOTREACHED */
  42
  43     default:
  44         status = pidwait(pid, -1);
  45         break;
  46     }
  47
  48     if (status != OK) {
  49         if (did_message == 0) {
  50             if ((hook = context_find("msg-hook")) != (char *)0)
  51                 advise(NULL, hook);
  52             else
  53                 advise(NULL, "external hook (%s) did not work properly.", hook);
  54
  55             did_message = 1;
  56         }
  57
  58         return (NOTOK);
  59     }
  60
  61     else
  62         return (OK);
  63 }