compiler/posixc/execlp.c

   1 /*
   2     Copyright © 2008-2013, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     POSIX.1-2008 function execlp().
   6 */
   7
   8 #include <aros/debug.h>
   9 #include <errno.h>
  10 #include <assert.h>
  11 #include <stdlib.h>
  12
  13 #include "__exec.h"
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18 #include <unistd.h>
  19
  20         int execlp(
  21
  22 /*  SYNOPSIS */
  23         const char *file,
  24         const char *arg, ...)
  25
  26 /*  FUNCTION
  27         Executes a file with given name. The search paths for the executed
  28         file are paths specified in the PATH environment variable.
  29
  30     INPUTS
  31         file - Name of the file to execute.
  32         arg - First argument passed to the executed file.
  33         ... - Other arguments passed to the executed file.
  34
  35     RESULT
  36         Returns -1 and sets errno appropriately in case of error, otherwise
  37         doesn't return.
  38
  39     NOTES
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46         execve(), execl(), execv(), execvp()
  47
  48     INTERNALS
  49
  50 ******************************************************************************/
  51 {
  52     va_list args;
  53     char *const *argv;
  54     char ***environptr = __posixc_get_environptr();
  55     char **environ = (environptr != NULL) ? *environptr : NULL;
  56
  57     va_start(args, arg);
  58
  59     if(!(argv = __exec_valist2array(arg, args)))
  60     {
  61         errno = ENOMEM;
  62         return -1;
  63     }
  64
  65     va_end(args);
  66
  67     APTR id = __exec_prepare(file, 1, argv, environ);
  68     __exec_cleanup_array();
  69     if (!id)
  70         return -1;
  71
  72     __exec_do(id);
  73
  74     assert(0); /* Should not be reached */
  75     return -1;
  76 } /* execlp() */
  77