1 /*
2 * Copyright (C) 2010 Cyril Hrubis chrubis@suse.cz
3 *
4 * This program is free software; you can redistribute it and/or modify it
5 * under the terms of version 2 of the GNU General Public License as
6 * published by the Free Software Foundation.
7 *
8 * This program is distributed in the hope that it would be useful, but
9 * WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
11 *
12 * Further, this software is distributed without any warranty that it is
13 * free of the rightful claim of any third person regarding infringement
14 * or the like. Any license provided herein, whether implied or
15 * otherwise, applies only to this software file. Patent licenses, if
16 * any, provided herein do not apply to combinations of this program with
17 * other software, or any other product whatsoever.
18 *
19 * You should have received a copy of the GNU General Public License along
20 * with this program; if not, write the Free Software Foundation, Inc.,
21 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
22 */
23
24 /*
25 * Looks for binary prog_name in $PATH.
26 *
27 * If such file exists and if you are able at least to read it, zero is
28 * returned and absolute path to the file is filled into buf. In case buf is
29 * too short to hold the absolute path + prog_name for the file we are looking
30 * for -1 is returned as well as when there is no such file in all paths in
31 * $PATH.
32 */
33
34 #include <stdio.h>
35 #include <string.h>
36 #include <stdlib.h>
37 #include <unistd.h>
38 #include <sys/types.h>
39 #include <sys/stat.h>
40
41 #include "test.h"
42
file_exist(const char * path)43 static int file_exist(const char *path)
44 {
45 struct stat st;
46
47 if (!access(path, R_OK) && !stat(path, &st) && S_ISREG(st.st_mode))
48 return 1;
49
50 return 0;
51 }
52
tst_get_path(const char * prog_name,char * buf,size_t buf_len)53 int tst_get_path(const char *prog_name, char *buf, size_t buf_len)
54 {
55 const char *path = (const char *)getenv("PATH");
56 const char *start = path;
57 const char *end;
58 size_t size, ret;
59
60 if (path == NULL)
61 return -1;
62
63 do {
64 end = strchr(start, ':');
65
66 if (end != NULL)
67 snprintf(buf, MIN(buf_len, (size_t) (end - start + 1)),
68 "%s", start);
69 else
70 snprintf(buf, buf_len, "%s", start);
71
72 size = strlen(buf);
73
74 /*
75 * "::" inside $PATH, $PATH ending with ':' or $PATH starting
76 * with ':' should be expanded into current working directory.
77 */
78 if (size == 0) {
79 snprintf(buf, buf_len, ".");
80 size = strlen(buf);
81 }
82
83 /*
84 * If there is no '/' ad the end of path from $PATH add it.
85 */
86 if (buf[size - 1] != '/')
87 ret =
88 snprintf(buf + size, buf_len - size, "/%s",
89 prog_name);
90 else
91 ret =
92 snprintf(buf + size, buf_len - size, "%s",
93 prog_name);
94
95 if (buf_len - size > ret && file_exist(buf))
96 return 0;
97
98 start = end + 1;
99
100 } while (end != NULL);
101
102 return -1;
103 }
104