1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
|
#include "fd.h"
#include "sgetopt.h"
#include "readwrite.h"
#include "strerr.h"
#include "substdio.h"
#include "exit.h"
#include "fork.h"
#include "wait.h"
#include "env.h"
#include "sig.h"
#include "error.h"
#define FATAL "preline: fatal: "
void die_usage()
{
strerr_die1x(100,"preline: usage: preline cmd [ arg ... ]");
}
int flagufline = 1; char *ufline;
int flagrpline = 1; char *rpline;
int flagdtline = 1; char *dtline;
char outbuf[SUBSTDIO_OUTSIZE];
char inbuf[SUBSTDIO_INSIZE];
substdio ssout = SUBSTDIO_FDBUF(write,1,outbuf,sizeof outbuf);
substdio ssin = SUBSTDIO_FDBUF(read,0,inbuf,sizeof inbuf);
void main(argc,argv)
int argc;
char **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 = getopt(argc,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)
strerr_die2sys(111,FATAL,"unable to create pipe: ");
pid = fork();
if (pid == -1)
strerr_die2sys(111,FATAL,"unable to fork: ");
if (pid == 0) {
close(pi[1]);
if (fd_move(0,pi[0]) == -1)
strerr_die2sys(111,FATAL,"unable to set up fds: ");
sig_pipedefault();
execvp(*argv,argv);
strerr_die4sys(error_temp(errno) ? 111 : 100,FATAL,"unable to run ",*argv,": ");
}
close(pi[0]);
if (fd_move(1,pi[1]) == -1)
strerr_die2sys(111,FATAL,"unable to set up fds: ");
if (flagufline) substdio_bputs(&ssout,ufline);
if (flagrpline) substdio_bputs(&ssout,rpline);
if (flagdtline) substdio_bputs(&ssout,dtline);
if (substdio_copy(&ssout,&ssin) != 0)
strerr_die2sys(111,FATAL,"unable to copy input: ");
substdio_flush(&ssout);
close(1);
if (wait_pid(&wstat,pid) == -1)
strerr_die2sys(111,FATAL,"wait failed: ");
if (wait_crashed(wstat))
strerr_die2x(111,FATAL,"child crashed");
_exit(wait_exitcode(wstat));
}
|
