home *** CD-ROM | disk | FTP | other *** search
/ Serving the Web / ServingTheWeb1995.disc1of1.iso / linux / slacksrce / d / libc / libc-4.6 / libc-4 / libc-linux / posix / execl.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-09-25  |  1.5 KB  |  55 lines
  1. /* Copyright (C) 1991, 1992, 1994 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 <unistd.h>
  21. #include <errno.h>
  22. #include <stdarg.h>
  23. #include <stddef.h>
  24.  
  25. #if !defined(HAVE_GNU_LD) && !defined (__ELF__)
  26. #define    __environ    environ
  27. #endif
  28.  
  29. /* Execute PATH with all arguments after PATH until
  30.    a NULL pointer and environment from `environ'.  */
  31. int
  32. DEFUN(execl, (path, arg), CONST char *path AND CONST char *arg DOTS)
  33. {
  34.   CONST char *argv[8192];
  35.   register unsigned int i;
  36.   va_list args;
  37.  
  38.   argv[0] = arg;
  39.  
  40.   va_start (args, arg);
  41.   for (i = 0; argv[i++] != NULL;)
  42.     {
  43.       if (i >= sizeof argv / sizeof argv[0])
  44.     {
  45.       va_end(args);
  46.       return E2BIG;
  47.     }
  48.       argv[i] = va_arg(args, CONST char *);
  49.     }
  50.  
  51.   va_end(args);
  52.  
  53.   return __execve(path, (char *CONST *) argv, __environ);
  54. }
  55.