sysdeps/posix/system.c

   1 /* Copyright (C) 1991, 1992 Free Software Foundation, Inc.
   2 This file is part of the GNU C Library.
   3
   4 The GNU C Library is free software; you can redistribute it and/or
   5 modify it under the terms of the GNU Library General Public License as
   6 published by the Free Software Foundation; either version 2 of the
   7 License, or (at your option) any later version.
   8
   9 The GNU C Library is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12 Library General Public License for more details.
  13
  14 You should have received a copy of the GNU Library General Public
  15 License along with the GNU C Library; see the file COPYING.LIB.  If
  16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
  17 Cambridge, MA 02139, USA.  */
  18
  19 #include <ansidecl.h>
  20 #include <stddef.h>
  21 #include <stdlib.h>
  22 #include <unistd.h>
  23 #include <sys/wait.h>
  24 #include <signal.h>
  25 #include <sys/types.h>
  26
  27
  28 #ifndef HAVE_GNU_LD
  29 #define __environ       environ
  30 #endif
  31
  32 #define SHELL_PATH      "/bin/sh"       /* Path of the shell.  */
  33 #define SHELL_NAME      "sh"            /* Name to give it.  */
  34
  35 #ifndef FORK
  36 #define FORK    __fork
  37 #endif
  38
  39 /* Execute LINE as a shell command, returning its status.  */
  40 int
  41 DEFUN(system, (line), register CONST char *line)
  42 {
  43   int status;
  44   pid_t pid;
  45   struct sigaction sa, intr, quit;
  46   sigset_t block, omask;
  47
  48   if (line == NULL)
  49     return 1;
  50
  51   sa.sa_handler = SIG_IGN;
  52   sa.sa_flags = 0;
  53   if (__sigemptyset(&sa.sa_mask) < 0)
  54     return -1;
  55   if (__sigaction(SIGINT, &sa, &intr) < 0)
  56     return -1;
  57   if (__sigaction(SIGQUIT, &sa, &quit) < 0)
  58     {
  59       (void) __sigaction(SIGINT, &intr, (struct sigaction *) NULL);
  60       return -1;
  61     }
  62   if (__sigemptyset(&block) < 0 || __sigaddset(&block, SIGCHLD) < 0 ||
  63       __sigprocmask(SIG_BLOCK, &block, &omask) < 0)
  64     {
  65       (void) __sigaction(SIGINT, &intr, (struct sigaction *) NULL);
  66       (void) __sigaction(SIGQUIT, &quit, (struct sigaction *) NULL);
  67       return -1;
  68     }
  69
  70   pid = FORK();
  71   if (pid == (pid_t) 0)
  72     {
  73       /* Child side.  */
  74       CONST char *new_argv[4];
  75       new_argv[0] = SHELL_NAME;
  76       new_argv[1] = "-c";
  77       new_argv[2] = line;
  78       new_argv[3] = NULL;
  79
  80       /* Restore the signals.  */
  81       (void) __sigaction(SIGINT, &intr, (struct sigaction *) NULL);
  82       (void) __sigaction(SIGQUIT, &quit, (struct sigaction *) NULL);
  83       (void) __sigprocmask(SIG_SETMASK, &omask, (sigset_t *) NULL);
  84
  85       /* Exec the shell.  */
  86       (void) __execve(SHELL_PATH, (char *CONST *) new_argv, __environ);
  87       _exit(127);
  88     }
  89   else if (pid < (pid_t) 0)
  90     /* The fork failed.  */
  91     status = -1;
  92   else
  93     /* Parent side.  */
  94 #ifdef  NO_WAITPID
  95     {
  96       pid_t child;
  97       do
  98         {
  99           child = __wait (&status);
 100           if (child <= -1)
 101             {
 102               status = -1;
 103               break;
 104             }
 105         } while (child != pid);
 106     }
 107 #else
 108     if (__waitpid(pid, &status, 0) != pid)
 109       status = -1;
 110 #endif
 111
 112   if ((__sigaction(SIGINT, &intr, (struct sigaction *) NULL) |
 113        __sigaction(SIGQUIT, &quit, (struct sigaction *) NULL) |
 114        __sigprocmask(SIG_SETMASK, &omask, (sigset_t *) NULL)) != 0)
 115     return -1;
 116
 117   return status;
 118 }