/* 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
