69 lines
1.2 KiB
C
69 lines
1.2 KiB
C
|
/*
|
||
|
|
* popen - open a pipe
|
||
|
|
*/
|
||
|
|
/* $Id$ */
|
||
|
|
|
||
|
|
#include <errno.h>
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <signal.h>
|
||
|
|
#include <unistd.h>
|
||
|
|
|
||
|
|
#if ACKCONF_WANT_EMULATED_POPEN
|
||
|
|
|
||
|
|
static int pids[FOPEN_MAX];
|
||
|
|
|
||
|
|
FILE* popen(const char* command, const char* type)
|
||
|
|
{
|
||
|
|
int piped[2];
|
||
|
|
int Xtype = *type == 'r' ? 0 : *type == 'w' ? 1 : 2;
|
||
|
|
int pid;
|
||
|
|
|
||
|
|
if (Xtype == 2 || pipe(piped) < 0 || (pid = fork()) < 0)
|
||
|
|
return 0;
|
||
|
|
|
||
|
|
if (pid == 0)
|
||
|
|
{
|
||
|
|
/* child */
|
||
|
|
register int* p;
|
||
|
|
|
||
|
|
for (p = pids; p < &pids[FOPEN_MAX]; p++)
|
||
|
|
{
|
||
|
|
if (*p)
|
||
|
|
close(p - pids);
|
||
|
|
}
|
||
|
|
close(piped[Xtype]);
|
||
|
|
dup2(piped[!Xtype], !Xtype);
|
||
|
|
close(piped[!Xtype]);
|
||
|
|
execl("/bin/sh", "sh", "-c", command, (char*)0);
|
||
|
|
_exit(127); /* like system() ??? */
|
||
|
|
}
|
||
|
|
|
||
|
|
pids[piped[Xtype]] = pid;
|
||
|
|
close(piped[!Xtype]);
|
||
|
|
return fdopen(piped[Xtype], type);
|
||
|
|
}
|
||
|
|
|
||
|
|
int pclose(FILE* stream)
|
||
|
|
{
|
||
|
|
int fd = fileno(stream);
|
||
|
|
int status;
|
||
|
|
int wret;
|
||
|
|
void (*intsave)(int) = signal(SIGINT, SIG_IGN);
|
||
|
|
void (*quitsave)(int) = signal(SIGQUIT, SIG_IGN);
|
||
|
|
|
||
|
|
fclose(stream);
|
||
|
|
while ((wret = wait(&status)) != -1)
|
||
|
|
{
|
||
|
|
if (wret == pids[fd])
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
if (wret == -1)
|
||
|
|
status = -1;
|
||
|
|
signal(SIGINT, intsave);
|
||
|
|
signal(SIGQUIT, quitsave);
|
||
|
|
pids[fd] = 0;
|
||
|
|
return status;
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif
|