libs/port/spawn.c

   1 /*
   2  * spawnvp function
   3  *
   4  * Copyright 2003 Dimitrie O. Paun
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22 #include "wine/port.h"
  23
  24 #ifndef HAVE__SPAWNVP
  25
  26 #include <errno.h>
  27 #include <signal.h>
  28 #include <stdlib.h>
  29 #ifdef HAVE_SYS_WAIT_H
  30 #include <sys/wait.h>
  31 #endif
  32 #include <sys/stat.h>
  33 #ifdef HAVE_UNISTD_H
  34 # include <unistd.h>
  35 #endif
  36
  37 int _spawnvp(int mode, const char *cmdname, const char *const argv[])
  38 {
  39     int pid, status, wret;
  40
  41     if (mode == _P_OVERLAY)
  42     {
  43         execvp(cmdname, (char **)argv);
  44         /* if we get here it failed */
  45 #ifdef ENOTSUP
  46         if (errno != ENOTSUP)  /* exec fails on MacOS if the process has multiple threads */
  47 #endif
  48             return -1;
  49     }
  50
  51     pid = fork();
  52     if (pid == 0)
  53     {
  54         /* in child */
  55         if (mode == _P_DETACH)
  56         {
  57             pid = fork();
  58             if (pid == -1) _exit(1);
  59             else if (pid > 0) _exit(0);
  60             /* else in grandchild */
  61         }
  62
  63         signal( SIGPIPE, SIG_DFL );
  64         execvp(cmdname, (char **)argv);
  65         _exit(1);
  66     }
  67
  68     if (pid == -1)
  69         return -1;
  70
  71     if (mode == _P_OVERLAY) exit(0);
  72
  73     if (mode == _P_WAIT || mode == _P_DETACH)
  74     {
  75         while (pid != (wret = waitpid(pid, &status, 0)))
  76             if (wret == -1 && errno != EINTR) break;
  77
  78         if (pid == wret && WIFEXITED(status))
  79         {
  80             if (mode == _P_WAIT)
  81                 pid = WEXITSTATUS(status);
  82             else /* mode == _P_DETACH */
  83                 if (WEXITSTATUS(status) != 0) /* child couldn't fork grandchild */
  84                     pid = -1;
  85         }
  86         else
  87         {
  88             if (mode == _P_WAIT)
  89                 pid = 255; /* abnormal exit with an abort or an interrupt */
  90             else /* mode == _P_DETACH */
  91                 pid = -1;
  92         }
  93     }
  94
  95     return pid;
  96 }
  97
  98 #endif  /* HAVE__SPAWNVP */