execvp.c revision 1.6 1 /* $NetBSD: execvp.c,v 1.6 1998/02/26 02:26:12 perry Exp $ */
2
3 /*-
4 * Copyright (c) 1991, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by the University of
18 * California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35
36 #include <sys/cdefs.h>
37 #if defined(LIBC_SCCS) && !defined(lint)
38 #if 0
39 static char sccsid[] = "@(#)exec.c 8.1 (Berkeley) 6/4/93";
40 #else
41 __RCSID("$NetBSD: execvp.c,v 1.6 1998/02/26 02:26:12 perry Exp $");
42 #endif
43 #endif /* LIBC_SCCS and not lint */
44
45 #include "namespace.h"
46 #include <errno.h>
47 #include <stdio.h>
48 #include <stdlib.h>
49 #include <string.h>
50 #include <limits.h>
51 #include <unistd.h>
52 #include <paths.h>
53
54 #ifdef __weak_alias
55 __weak_alias(execvp,_execvp);
56 #endif
57
58 extern char **environ;
59
60 int
61 execvp(name, argv)
62 const char *name;
63 char * const *argv;
64 {
65 static size_t memsize;
66 static char **memp;
67 int cnt;
68 size_t lp, ln;
69 char *p;
70 int eacces = 0;
71 unsigned int etxtbsy = 0;
72 char *bp, *cur, *path, buf[PATH_MAX];
73
74 /* "" is not a valid filename; check this before traversing PATH. */
75 if (name[0] == '\0') {
76 errno = ENOENT;
77 path = NULL;
78 goto done;
79 }
80 /* If it's an absolute or relative path name, it's easy. */
81 if (strchr(name, '/')) {
82 bp = (char *)name;
83 cur = path = NULL;
84 goto retry;
85 }
86 bp = buf;
87
88 /* Get the path we're searching. */
89 if (!(path = getenv("PATH")))
90 path = _PATH_DEFPATH;
91 cur = path = strdup(path);
92
93 while ((p = strsep(&cur, ":")) != NULL) {
94 /*
95 * It's a SHELL path -- double, leading and trailing colons
96 * mean the current directory.
97 */
98 if (!*p) {
99 p = ".";
100 lp = 1;
101 } else
102 lp = strlen(p);
103 ln = strlen(name);
104
105 /*
106 * If the path is too long complain. This is a possible
107 * security issue; given a way to make the path too long
108 * the user may execute the wrong program.
109 */
110 if (lp + ln + 2 > sizeof(buf)) {
111 (void)write(STDERR_FILENO, "execvp: ", 8);
112 (void)write(STDERR_FILENO, p, lp);
113 (void)write(STDERR_FILENO, ": path too long\n", 16);
114 continue;
115 }
116 bcopy(p, buf, lp);
117 buf[lp] = '/';
118 bcopy(name, buf + lp + 1, ln);
119 buf[lp + ln + 1] = '\0';
120
121 retry: (void)execve(bp, argv, environ);
122 switch(errno) {
123 case EACCES:
124 eacces = 1;
125 break;
126 case ENOENT:
127 break;
128 case ENOEXEC:
129 for (cnt = 0; argv[cnt]; ++cnt);
130 if ((cnt + 2) * sizeof(char *) > memsize) {
131 memsize = (cnt + 2) * sizeof(char *);
132 if ((memp = realloc(memp, memsize)) == NULL) {
133 memsize = 0;
134 goto done;
135 }
136 }
137 memp[0] = "sh";
138 memp[1] = bp;
139 bcopy(argv + 1, memp + 2, cnt * sizeof(char *));
140 (void)execve(_PATH_BSHELL, memp, environ);
141 goto done;
142 case ETXTBSY:
143 if (etxtbsy < 3)
144 (void)sleep(++etxtbsy);
145 goto retry;
146 default:
147 goto done;
148 }
149 }
150 if (eacces)
151 errno = EACCES;
152 else if (!errno)
153 errno = ENOENT;
154 done: if (path)
155 free(path);
156 return (-1);
157 }
158