preline.c

Go to the documentation of this file.

#include <unistd.h>
#include "fd.h"
#include "buffer.h"
#include "exit.h"
#include "wait.h"
#include "env.h"
#include "sig.h"
#include "getoptb.h"
#include "logmsg.h"
#include "qmail.h"
 
#define WHO "preline"
 
static void die_usage()
{
  logmsg(WHO,100,USAGE,"preline cmd [ arg ... ]");
}
 
int flagufline = 1; char *ufline;
int flagrpline = 1; char *rpline;
int flagdtline = 1; char *dtline;
 
char outbuf[BUFSIZE_QMAIL];
buffer bo = BUFFER_INIT(buffer_unixwrite,1,outbuf,sizeof(outbuf));
char inbuf[BUFSIZE_QMAIL];
buffer bi = BUFFER_INIT(buffer_unixread,0,inbuf,sizeof(inbuf));
 
int main(int argc,char * const argv[])
{
  int opt;
  int pi[2];
  int pid;
  int wstat;
 
  sig_pipeignore();
 
  if (!(ufline = env_get("UFLINE"))) die_usage();
  if (!(rpline = env_get("RPLINE"))) die_usage();
  if (!(dtline = env_get("DTLINE"))) die_usage();
 
  while ((opt = getoptb(argc,(char **)argv,"frdFRD")) != opteof)
    switch (opt) {
      case 'f': flagufline = 0; break;
      case 'r': flagrpline = 0; break;
      case 'd': flagdtline = 0; break;
      case 'F': flagufline = 1; break;
      case 'R': flagrpline = 1; break;
      case 'D': flagdtline = 1; break;
      default: die_usage();
    }
  argc -= optind;
  argv += optind;
  if (!*argv) die_usage();
 
  if (pipe(pi) == -1)
    logmsg(WHO,111,FATAL,"unable to create pipe");
 
  pid = fork();
  if (pid == -1)
    logmsg(WHO,111,FATAL,"unable to fork");
 
  if (pid == 0) {
    close(pi[1]);
    if (fd_move(0,pi[0]) == -1)
      logmsg(WHO,111,FATAL,"unable to set up fds");
    sig_pipedefault();
    execvp(*argv,argv);
    logmsg(WHO,errno,FATAL,B("unable to run: ",*argv));
  }
  close(pi[0]);
  if (fd_move(1,pi[1]) == -1)
    logmsg(WHO,111,FATAL,"unable to set up fds");
 
  if (flagufline) 
     if (buffer_puts(&bo,ufline) == -1) 
       logmsg(WHO,111,FATAL,B("unable to copy ufline: ",ufline));
  if (flagrpline)
     if (buffer_puts(&bo,rpline) == -1) 
       logmsg(WHO,111,FATAL,B("unable to copy rpline: ",rpline));
  if (flagdtline) 
     if (buffer_puts(&bo,dtline) == -1) 
       logmsg(WHO,111,FATAL,B("unable to copy dtline",dtline));
  switch (buffer_copy(&bo,&bi)) {
    case -2: logmsg(WHO,111,FATAL,"error reading input buffer");
    case -3: logmsg(WHO,111,FATAL,"error writing output buffer");
  }
  buffer_flush(&bo);
  close(1);
 
  if (wait_pid(&wstat,pid) == -1)
    logmsg(WHO,111,FATAL,"wait failed");
  if (wait_crashed(wstat))
    logmsg(WHO,111,FATAL,"child crashed");
  _exit(wait_exitcode(wstat));
}