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 91 92 93 94 95 96 97 98 99 100 101
|
#include <sys/wait.h>
#include <errno.h>
#include <fcntl.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
pid_t
pipeto(const char *cmdline)
{
int pipe0[2]; // stdout -> stdin
int pipe1[2]; // child errno -> parent
pid_t pid;
if (pipe(pipe0) < 0)
return -1;
if (pipe(pipe1) < 0)
return -1;
pid = fork();
if (pid < 0) {
return -1;
} else if (pid == 0) { // in child
close(pipe1[0]);
// close errno pipe on successful exec
fcntl(pipe1[1], F_SETFD, FD_CLOEXEC);
if (dup2(pipe0[0], 0) < 0)
exit(111);
close(pipe0[0]);
close(pipe0[1]);
// split cmdline, just on spaces
char *argv[16];
int argc = 0;
char *cp = strdup(cmdline);
if (!cp)
exit(111);
while (argc < 16 && *cp) {
argv[argc++] = cp;
cp = strchr(cp, ' ');
if (!cp)
break;
*cp++ = 0;
while (*cp == ' ')
cp++;
}
argv[argc] = 0;
if (argv[0])
execvp(argv[0], argv);
else
errno = EINVAL;
// execvp failed, write errno to parent
int e = errno;
if (write(pipe1[1], &e, sizeof e) < 0)
exit(111); // do a magic dance for gcc -Wunused-result
exit(111);
} else { // in parent
close(pipe1[1]);
int e;
ssize_t n = read(pipe1[0], &e, sizeof e);
if (n < 0)
e = errno;
close(pipe1[0]);
if (n == 0) {
// child executed successfully, redirect stdout to it
if (dup2(pipe0[1], 1) < 0)
return -1;
close(pipe0[0]);
close(pipe0[1]);
return pid;
} else {
errno = e;
return -1;
}
}
// return pid;
}
int
pipeclose(pid_t pid)
{
int s;
fflush(0);
close(1);
waitpid(pid, &s, 0);
return s;
}
|