Use _IO_FILE_complete, not _IO_file_plus.
[kopensolaris-gnu/glibc.git] / posix / execvp.c
index 50488bb..26c7be9 100644 (file)
@@ -1,50 +1,79 @@
-/* Copyright (C) 1991, 1992 Free Software Foundation, Inc.
-This file is part of the GNU C Library.
+/* Copyright (C) 1991, 1992, 1995, 1996, 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
 
-The GNU C Library is free software; you can redistribute it and/or
-modify it under the terms of the GNU Library General Public License as
-published by the Free Software Foundation; either version 2 of the
-License, or (at your option) any later version.
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
 
-The GNU C Library is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-Library General Public License for more details.
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
 
-You should have received a copy of the GNU Library General Public
-License along with the GNU C Library; see the file COPYING.LIB.  If
-not, write to the Free Software Foundation, Inc., 675 Mass Ave,
-Cambridge, MA 02139, USA.  */
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
 
-#include <ansidecl.h>
 #include <unistd.h>
 #include <stdarg.h>
 #include <stdlib.h>
 #include <string.h>
-#include <sys/stat.h>
-#include <limits.h>
-#include <sys/types.h>
+#include <errno.h>
+#include <paths.h>
+
+
+static void
+internal_function
+execute (const char *file, char *const argv[])
+{
+  execv (file, argv);
+
+  if (errno == ENOEXEC)
+    {
+      /* The file is accessible but it is not an executable file.
+        Invoke the shell to interpret it as a script.  */
+
+      /* Count the arguments.  */
+      int argc = 0;
+      while (argv[argc++])
+       ;
+
+      /* Construct an argument list for the shell.  */
+      {
+       char *new_argv[argc + 1];
+       new_argv[0] = (char *) _PATH_BSHELL;
+       new_argv[1] = (char *) file;
+       while (argc > 1)
+         {
+           new_argv[argc] = argv[argc - 1];
+           --argc;
+         }
+
+       /* Execute the shell.  */
+       execv (new_argv[0], new_argv);
+      }
+       }
+}
 
-#ifndef        HAVE_GNU_LD
-#define        __environ       environ
-#endif
 
 /* Execute FILE, searching in the `PATH' environment variable if it contains
    no slashes, with arguments ARGV and environment from `environ'.  */
 int
-DEFUN (execvp, (file, argv), CONST char *file AND char *CONST argv[])
+execvp (file, argv)
+     const char *file;
+     char *const argv[];
 {
-  char name[PATH_MAX];
+  int got_eacces = 0;
 
-  if (strchr (file, '/') == NULL)
+  if (strchr (file, '/') != NULL)
+    /* Don't search when it contains a slash.  */
+    execute (file, argv);
+  else
     {
-      char *path, *p;
-      struct stat st;
+      char *path, *p, *name;
       size_t len;
-      uid_t uid;
-      gid_t gid;
-      int ngroups;
-      gid_t groups[NGROUPS_MAX];
 
       path = getenv ("PATH");
       if (path == NULL)
@@ -59,9 +88,7 @@ DEFUN (execvp, (file, argv), CONST char *file AND char *CONST argv[])
        }
 
       len = strlen (file) + 1;
-      uid = geteuid ();
-      gid = getegid ();
-      ngroups = getgroups (sizeof (groups) / sizeof (groups[0]), groups);
+      name = __alloca (strlen (path) + len);
       p = path;
       do
        {
@@ -81,32 +108,40 @@ DEFUN (execvp, (file, argv), CONST char *file AND char *CONST argv[])
              name[p - path] = '/';
              (void) memcpy (&name[(p - path) + 1], file, len);
            }
-         if (stat (name, &st) == 0 && S_ISREG (st.st_mode))
+
+         /* Try to execute this name.  If it works, execv will not return.  */
+         execute (name, argv);
+
+         switch (errno)
            {
-             int bit = S_IXOTH;
-             if (st.st_uid == uid)
-               bit = S_IXUSR;
-             else if (st.st_gid == gid)
-               bit = S_IXGRP;
-             else
-               {
-                 register int i;
-                 for (i = 0; i < ngroups; ++i)
-                   if (st.st_gid == groups[i])
-                     {
-                       bit = S_IXGRP;
-                       break;
-                     }
-               }
-             if (st.st_mode & bit)
-               {
-                 file = name;
-                 break;
-               }
+           case EACCES:
+             /* Record the we got a `Permission denied' error.  If we end
+                up finding no executable we can use, we want to diagnose
+                that we did find one but were denied access.  */
+             got_eacces = 1;
+           case ENOENT:
+           case ESTALE:
+             /* Those errors indicate the file is missing or not executable
+                by us, in which case we want to just try the next path
+                directory.  */
+             break;
+
+           default:
+             /* Some other error means we found an executable file, but
+                something went wrong executing it; return the error to our
+                caller.  */
+             return -1;
            }
        }
       while (*p++ != '\0');
     }
 
-  return __execve (file, argv, __environ);
+  /* We tried every element and none of them worked.  */
+
+  if (got_eacces)
+    /* At least one failure was due to permissions, so report that error.  */
+    __set_errno (EACCES);
+
+  /* Return the error from the last attempt (probably ENOENT).  */
+  return -1;
 }