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
29 * @(#)exec.c 8.1 (Berkeley) 6/4/93
30 * $FreeBSD: src/lib/libc/gen/exec.c,v 1.25 2008/06/23 05:22:06 ed Exp $
31 * $DragonFly: src/lib/libc/gen/exec.c,v 1.7 2005/11/13 00:07:42 swildner Exp $
34 #include "namespace.h"
35 #include <sys/param.h>
36 #include <sys/types.h>
46 #include "un-namespace.h"
47 #include "libc_private.h"
49 extern char **environ
;
52 execl(const char *name
, const char *arg
, ...)
60 while (va_arg(ap
, char *) != NULL
)
63 argv
= alloca((n
+ 1) * sizeof(*argv
));
71 while ((argv
[n
] = va_arg(ap
, const char *)) != NULL
)
74 return (_execve(name
, __DECONST(char **, argv
),
75 __DECONST(char **, environ
)));
79 execle(const char *name
, const char *arg
, ...)
82 const char **argv
, **envp
;
87 while (va_arg(ap
, char *) != NULL
)
90 argv
= alloca((n
+ 1) * sizeof(*argv
));
98 while ((argv
[n
] = va_arg(ap
, const char *)) != NULL
)
100 envp
= va_arg(ap
, const char **);
102 return (_execve(name
, __DECONST(char **, argv
),
103 __DECONST(char **, envp
)));
107 execlp(const char *name
, const char *arg
, ...)
115 while (va_arg(ap
, char *) != NULL
)
118 argv
= alloca((n
+ 1) * sizeof(*argv
));
126 while ((argv
[n
] = va_arg(ap
, const char *)) != NULL
)
129 return (execvp(name
, __DECONST(char **, argv
)));
133 execv(const char *name
, char * const *argv
)
135 _execve(name
, argv
, environ
);
140 execvp(const char *name
, char * const *argv
)
142 return (_execvpe(name
, argv
, environ
));
146 execvPe(const char *name
, const char *path
, char * const *argv
,
152 int eacces
, save_errno
;
154 char *cur
, buf
[MAXPATHLEN
];
159 /* If it's an absolute or relative path name, it's easy. */
160 if (index(name
, '/')) {
167 /* If it's an empty path name, fail in the usual POSIX way. */
173 cur
= alloca(strlen(path
) + 1);
179 while ((p
= strsep(&cur
, ":")) != NULL
) {
181 * It's a SHELL path -- double, leading and trailing colons
182 * mean the current directory.
192 * If the path is too long complain. This is a possible
193 * security issue; given a way to make the path too long
194 * the user may execute the wrong program.
196 if (lp
+ ln
+ 2 > sizeof(buf
)) {
197 _write(STDERR_FILENO
, "execvP: ", 8);
198 _write(STDERR_FILENO
, p
, lp
);
199 _write(STDERR_FILENO
, ": path too long\n", 16);
204 bcopy(name
, buf
+ lp
+ 1, ln
);
205 buf
[lp
+ ln
+ 1] = '\0';
207 _execve(bp
, argv
, environ
);
216 for (cnt
= 0; argv
[cnt
]; ++cnt
)
218 memp
= alloca((cnt
+ 2) * sizeof(char *));
220 /* errno = ENOMEM; XXX override ENOEXEC? */
225 bcopy(argv
+ 1, memp
+ 2, cnt
* sizeof(char *));
226 _execve(_PATH_BSHELL
, __DECONST(char **, memp
), environ
);
234 * We used to retry here, but sh(1) doesn't.
239 * EACCES may be for an inaccessible directory or
240 * a non-executable file. Call stat() to decide
241 * which. This also handles ambiguities for EFAULT
242 * and EIO, and undocumented errors like ESTALE.
243 * We hope that the race for a stat() is unimportant.
246 if (stat(bp
, &sb
) != 0)
248 if (save_errno
== EACCES
) {
265 execvP(const char *name
, const char *path
, char * const argv
[])
267 return execvPe(name
, path
, argv
, environ
);
271 _execvpe(const char *name
, char * const argv
[], char * const envp
[])
275 /* Get the path we're searching. */
276 if ((path
= getenv("PATH")) == NULL
)
277 path
= _PATH_DEFPATH
;
279 return (execvPe(name
, path
, argv
, envp
));