1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
|
/* See LICENSE file for copyright and license details. */
#include "common.h"
#ifndef TEST
const char *
libsimple_which(const char *file, int cwdfd, const char *path, char **free_this_out)
{
const char *p, *q;
char *buf = NULL;
size_t bufsize, len, filelen;
int got_eacces = 0, saved_errno = errno;
free_this_out = NULL;
if (!file || !free_this_out) {
errno = EINVAL;
return NULL;
}
if (strchr(file, '/'))
return file;
if (!path) {
path = getenv("PATH");
if (!path)
path = "";
}
if (!*path) {
errno = ENOENT;
return NULL;
}
bufsize = 0;
for (p = path; p; p = q) {
q = strchr(p, ':');
if (q)
len = (size_t)(q++ - p);
else
len = strlen(p);
if (len > bufsize)
bufsize = len;
}
if (bufsize) {
filelen = strlen(file) + 1U;
bufsize += 1U + filelen;
buf = malloc(bufsize);
if (!buf)
return NULL;
}
for (p = path; p; p = q) {
q = strchr(p, ':');
if (q)
len = (size_t)(q++ - p);
else
len = strlen(p);
if (len) {
memcpy(buf, p, len);
buf[len] = '/';
memcpy(&buf[len + 1], file, filelen);
if (!faccessat(cwdfd, buf, X_OK, AT_EACCESS)) {
*free_this_out = buf;
errno = saved_errno;
return buf;
}
} else {
if (!faccessat(cwdfd, file, X_OK, AT_EACCESS)) {
errno = saved_errno;
return file;
}
}
if (errno == EACCES)
got_eacces = 1;
}
free(buf);
errno = got_eacces ? EACCES : ENOENT;
return NULL;
}
#else
#include "test.h"
int
main(void)
{
return 0;
}
#endif
|
