69 lines
1.5 KiB
C
Executable File
69 lines
1.5 KiB
C
Executable File
#pragma ident "@(#)system.c 1.3 92/09/04 SMI" /* from S5R2 1.2 */
|
|
|
|
/*LINTLIBRARY*/
|
|
#include <signal.h>
|
|
#include <sys/types.h>
|
|
#include <sys/wait.h>
|
|
#include <string.h>
|
|
#include <sys/file.h>
|
|
|
|
extern int execl();
|
|
|
|
int
|
|
system(s)
|
|
char *s;
|
|
{
|
|
int status;
|
|
pid_t pid, w;
|
|
register void (*istat)(), (*qstat)();
|
|
char path[256];
|
|
char *c;
|
|
|
|
while (*s == ' ' || *s == '\t')
|
|
s++;
|
|
|
|
if (strncmp(s, "/usr/ucb", strlen("/usr/ucb")) == 0) {
|
|
/* check if command is under /usr/ucb, if not
|
|
* replace /usr/ucb with /usr/bin.
|
|
*/
|
|
strcpy(path, s);
|
|
if ((c = strchr(path, ' ')) != NULL)
|
|
*c ='\0';
|
|
if (access(path, F_OK) == -1) {
|
|
strncpy(path, "/usr/bin", strlen("/usr/bin"));
|
|
if (c != NULL) *c = ' ';
|
|
s = path;
|
|
}
|
|
}
|
|
else if (strncmp(s, "/bin", strlen("/bin")) == 0 ||
|
|
strncmp(s, "/usr/bin", strlen("/usr/bin")) == 0) {
|
|
/* if /usr/bin is specified, first check if the command
|
|
* exists under /usr/bin, otherwise try /usr/ucb */
|
|
if (access(path, F_OK) == -1) {
|
|
strcpy(path, "/usr/ucb");
|
|
if (strncmp(s, "/bin", strlen("/bin")) == 0)
|
|
strcat(path, strchr(s+1, '/'));
|
|
else {
|
|
c = strchr(s+1, '/');
|
|
strcat(path, strchr(c+1, '/'));
|
|
}
|
|
if (c != NULL) *c = ' ';
|
|
s = path;
|
|
}
|
|
}
|
|
|
|
if ((pid = vfork()) == 0) {
|
|
(void) execl("/bin/sh", "sh", "-c", s, (char *)0);
|
|
_exit(127);
|
|
}
|
|
if (pid == -1) {
|
|
return (-1);
|
|
}
|
|
istat = signal(SIGINT, SIG_IGN);
|
|
qstat = signal(SIGQUIT, SIG_IGN);
|
|
w = waitpid(pid, &status, 0);
|
|
(void) signal(SIGINT, istat);
|
|
(void) signal(SIGQUIT, qstat);
|
|
return ((w == -1) ? -1: status);
|
|
}
|