2 * Copyright (c) 1991, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 4. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #if defined(LIBC_SCCS) && !defined(lint)
31 static char sccsid
[] = "@(#)exec.c 8.1 (Berkeley) 6/4/93";
32 #endif /* LIBC_SCCS and not lint */
33 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD: src/lib/libc/gen/exec.c,v 1.27 2009/12/05 18:55:16 ed Exp $");
36 #include "namespace.h"
37 #include <sys/param.h>
38 #include <sys/types.h>
48 #include "un-namespace.h"
49 #include "libc_private.h"
51 #include <crt_externs.h>
52 #define environ (*_NSGetEnviron())
55 _execvpe(const char *name
, char * const argv
[], char * const envp
[]);
58 execl(const char *name
, const char *arg
, ...)
66 while (va_arg(ap
, char *) != NULL
)
69 argv
= alloca((n
+ 1) * sizeof(*argv
));
77 while ((argv
[n
] = va_arg(ap
, char *)) != NULL
)
80 return (_execve(name
, __DECONST(char **, argv
), environ
));
84 execle(const char *name
, const char *arg
, ...)
93 while (va_arg(ap
, char *) != NULL
)
96 argv
= alloca((n
+ 1) * sizeof(*argv
));
104 while ((argv
[n
] = va_arg(ap
, char *)) != NULL
)
106 envp
= va_arg(ap
, char **);
108 return (_execve(name
, __DECONST(char **, argv
), envp
));
112 execlp(const char *name
, const char *arg
, ...)
120 while (va_arg(ap
, char *) != NULL
)
123 argv
= alloca((n
+ 1) * sizeof(*argv
));
131 while ((argv
[n
] = va_arg(ap
, char *)) != NULL
)
134 return (execvp(name
, __DECONST(char **, argv
)));
142 (void)_execve(name
, argv
, environ
);
147 execvp(const char *name
, char * const *argv
)
149 return (_execvpe(name
, argv
, environ
));
153 execvPe(const char *name
, const char *path
, char * const *argv
,
158 int eacces
, save_errno
;
159 char *cur
, buf
[MAXPATHLEN
];
165 /* If it's an absolute or relative path name, it's easy. */
166 if (index(name
, '/')) {
173 /* If it's an empty path name, fail in the usual POSIX way. */
179 cur
= alloca(strlen(path
) + 1);
185 while ((p
= strsep(&cur
, ":")) != NULL
) {
187 * It's a SHELL path -- double, leading and trailing colons
188 * mean the current directory.
198 * If the path is too long complain. This is a possible
199 * security issue; given a way to make the path too long
200 * the user may execute the wrong program.
202 if (lp
+ ln
+ 2 > sizeof(buf
)) {
203 (void)_write(STDERR_FILENO
, "execvP: ", 8);
204 (void)_write(STDERR_FILENO
, p
, lp
);
205 (void)_write(STDERR_FILENO
, ": path too long\n",
211 bcopy(name
, buf
+ lp
+ 1, ln
);
212 buf
[lp
+ ln
+ 1] = '\0';
214 retry
: (void)_execve(bp
, argv
, envp
);
223 for (cnt
= 0; argv
[cnt
]; ++cnt
)
225 memp
= alloca((cnt
+ 2) * sizeof(char *));
227 /* errno = ENOMEM; XXX override ENOEXEC? */
232 bcopy(argv
+ 1, memp
+ 2, cnt
* sizeof(char *));
233 (void)_execve(_PATH_BSHELL
,
234 __DECONST(char **, memp
), envp
);
242 * We used to retry here, but sh(1) doesn't.
247 * EACCES may be for an inaccessible directory or
248 * a non-executable file. Call stat() to decide
249 * which. This also handles ambiguities for EFAULT
250 * and EIO, and undocumented errors like ESTALE.
251 * We hope that the race for a stat() is unimportant.
254 if (stat(bp
, &sb
) != 0)
256 if (save_errno
== EACCES
) {
268 /* else use existing errno from _execve */
274 execvP(const char *name
, const char *path
, char * const argv
[])
276 return execvPe(name
, path
, argv
, environ
);
279 __private_extern__
int
280 _execvpe(const char *name
, char * const argv
[], char * const envp
[])
284 /* Get the path we're searching. */
285 if ((path
= getenv("PATH")) == NULL
)
286 path
= _PATH_DEFPATH
;
288 return (execvPe(name
, path
, argv
, envp
));