fgetws implementation.
[kopensolaris-gnu/glibc.git] / posix / execl.c
index 65f9049..5ea1c4e 100644 (file)
@@ -1,44 +1,75 @@
-/* Copyright (C) 1991 Free Software Foundation, Inc.
-This file is part of the GNU C Library.
+/* Copyright (C) 1991, 92, 94, 97, 98, 99 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 <alloca.h>
 #include <unistd.h>
 #include <stdarg.h>
 #include <stddef.h>
+#include <string.h>
+
+#include <stackinfo.h>
+
+#ifndef        HAVE_GNU_LD
+# define __environ     environ
+#endif
 
 /* Execute PATH with all arguments after PATH until
    a NULL pointer and environment from `environ'.  */
 int
-DEFUN(execl, (path), CONST char *path AND CONST char *arg DOTS)
+execl (const char *path, const char *arg, ...)
 {
-  CONST char *argv[1024];
-  register unsigned int i;
+  size_t argv_max = 1024;
+  const char **argv = alloca (argv_max * sizeof (const char *));
+  unsigned int i;
   va_list args;
 
-  va_start(args, path);
   argv[0] = arg;
-  i = 1;
-  do
+
+  va_start (args, arg);
+  i = 0;
+  while (argv[i++] != NULL)
     {
-      argv[i] = va_arg(args, CONST char *);
-    } while (argv[i++] != NULL);
+      if (i == argv_max)
+       {
+         const char **nptr = alloca ((argv_max *= 2) * sizeof (const char *));
+
+#ifndef _STACK_GROWS_UP
+         if ((char *) nptr + argv_max == (char *) argv)
+           {
+             /* Stack grows down.  */
+             argv = (const char **) memcpy (nptr, argv, i);
+             argv_max += i;
+           }
+         else
+#endif
+#ifndef _STACK_GROWS_DOWN
+           if ((char *) argv + i == (char *) nptr)
+           /* Stack grows up.  */
+           argv_max += i;
+         else
+#endif
+           /* We have a hole in the stack.  */
+           argv = (const char **) memcpy (nptr, argv, i);
+       }
 
-  va_end(args);
+      argv[i] = va_arg (args, const char *);
+    }
+  va_end (args);
 
-  return __execve(path, (char *CONST *) argv, __environ);
+  return __execve (path, (char *const *) argv, __environ);
 }