| #include <stdlib.h> |
| #include <string.h> |
| #include <unistd.h> |
| #include <errno.h> |
| #include <limits.h> |
| #include "libc.h" |
| |
| extern char **__environ; |
| |
| int __execvpe(const char *file, char *const argv[], char *const envp[]) |
| { |
| const char *p, *z, *path = getenv("PATH"); |
| size_t l, k; |
| int seen_eacces = 0; |
| |
| errno = ENOENT; |
| if (!*file) return -1; |
| |
| if (strchr(file, '/')) |
| return execve(file, argv, envp); |
| |
| if (!path) path = "/usr/local/bin:/bin:/usr/bin"; |
| k = strnlen(file, NAME_MAX+1); |
| if (k > NAME_MAX) { |
| errno = ENAMETOOLONG; |
| return -1; |
| } |
| l = strnlen(path, PATH_MAX-1)+1; |
| |
| for(p=path; ; p=z) { |
| char b[l+k+1]; |
| z = strchr(p, ':'); |
| if (!z) z = p+strlen(p); |
| if (z-p >= l) { |
| if (!*z++) break; |
| continue; |
| } |
| memcpy(b, p, z-p); |
| b[z-p] = '/'; |
| memcpy(b+(z-p)+(z>p), file, k+1); |
| execve(b, argv, envp); |
| if (errno == EACCES) seen_eacces = 1; |
| else if (errno != ENOENT && errno != ENOTDIR) return -1; |
| if (!*z++) break; |
| } |
| if (seen_eacces) errno = EACCES; |
| return -1; |
| } |
| |
| int execvp(const char *file, char *const argv[]) |
| { |
| return __execvpe(file, argv, __environ); |
| } |
| |
| weak_alias(__execvpe, execvpe); |