xref: /openbmc/linux/tools/perf/arch/common.c (revision 74ce1896)
1 #include <stdio.h>
2 #include <sys/utsname.h>
3 #include "common.h"
4 #include "../util/util.h"
5 #include "../util/debug.h"
6 
7 #include "sane_ctype.h"
8 
9 const char *const arm_triplets[] = {
10 	"arm-eabi-",
11 	"arm-linux-androideabi-",
12 	"arm-unknown-linux-",
13 	"arm-unknown-linux-gnu-",
14 	"arm-unknown-linux-gnueabi-",
15 	"arm-linux-gnu-",
16 	"arm-linux-gnueabihf-",
17 	"arm-none-eabi-",
18 	NULL
19 };
20 
21 const char *const arm64_triplets[] = {
22 	"aarch64-linux-android-",
23 	"aarch64-linux-gnu-",
24 	NULL
25 };
26 
27 const char *const powerpc_triplets[] = {
28 	"powerpc-unknown-linux-gnu-",
29 	"powerpc-linux-gnu-",
30 	"powerpc64-unknown-linux-gnu-",
31 	"powerpc64-linux-gnu-",
32 	"powerpc64le-linux-gnu-",
33 	NULL
34 };
35 
36 const char *const s390_triplets[] = {
37 	"s390-ibm-linux-",
38 	"s390x-linux-gnu-",
39 	NULL
40 };
41 
42 const char *const sh_triplets[] = {
43 	"sh-unknown-linux-gnu-",
44 	"sh64-unknown-linux-gnu-",
45 	"sh-linux-gnu-",
46 	"sh64-linux-gnu-",
47 	NULL
48 };
49 
50 const char *const sparc_triplets[] = {
51 	"sparc-unknown-linux-gnu-",
52 	"sparc64-unknown-linux-gnu-",
53 	"sparc64-linux-gnu-",
54 	NULL
55 };
56 
57 const char *const x86_triplets[] = {
58 	"x86_64-pc-linux-gnu-",
59 	"x86_64-unknown-linux-gnu-",
60 	"i686-pc-linux-gnu-",
61 	"i586-pc-linux-gnu-",
62 	"i486-pc-linux-gnu-",
63 	"i386-pc-linux-gnu-",
64 	"i686-linux-android-",
65 	"i686-android-linux-",
66 	"x86_64-linux-gnu-",
67 	"i586-linux-gnu-",
68 	NULL
69 };
70 
71 const char *const mips_triplets[] = {
72 	"mips-unknown-linux-gnu-",
73 	"mipsel-linux-android-",
74 	"mips-linux-gnu-",
75 	"mips64-linux-gnu-",
76 	"mips64el-linux-gnuabi64-",
77 	"mips64-linux-gnuabi64-",
78 	"mipsel-linux-gnu-",
79 	NULL
80 };
81 
82 static bool lookup_path(char *name)
83 {
84 	bool found = false;
85 	char *path, *tmp = NULL;
86 	char buf[PATH_MAX];
87 	char *env = getenv("PATH");
88 
89 	if (!env)
90 		return false;
91 
92 	env = strdup(env);
93 	if (!env)
94 		return false;
95 
96 	path = strtok_r(env, ":", &tmp);
97 	while (path) {
98 		scnprintf(buf, sizeof(buf), "%s/%s", path, name);
99 		if (access(buf, F_OK) == 0) {
100 			found = true;
101 			break;
102 		}
103 		path = strtok_r(NULL, ":", &tmp);
104 	}
105 	free(env);
106 	return found;
107 }
108 
109 static int lookup_triplets(const char *const *triplets, const char *name)
110 {
111 	int i;
112 	char buf[PATH_MAX];
113 
114 	for (i = 0; triplets[i] != NULL; i++) {
115 		scnprintf(buf, sizeof(buf), "%s%s", triplets[i], name);
116 		if (lookup_path(buf))
117 			return i;
118 	}
119 	return -1;
120 }
121 
122 /*
123  * Return architecture name in a normalized form.
124  * The conversion logic comes from the Makefile.
125  */
126 const char *normalize_arch(char *arch)
127 {
128 	if (!strcmp(arch, "x86_64"))
129 		return "x86";
130 	if (arch[0] == 'i' && arch[2] == '8' && arch[3] == '6')
131 		return "x86";
132 	if (!strcmp(arch, "sun4u") || !strncmp(arch, "sparc", 5))
133 		return "sparc";
134 	if (!strcmp(arch, "aarch64") || !strcmp(arch, "arm64"))
135 		return "arm64";
136 	if (!strncmp(arch, "arm", 3) || !strcmp(arch, "sa110"))
137 		return "arm";
138 	if (!strncmp(arch, "s390", 4))
139 		return "s390";
140 	if (!strncmp(arch, "parisc", 6))
141 		return "parisc";
142 	if (!strncmp(arch, "powerpc", 7) || !strncmp(arch, "ppc", 3))
143 		return "powerpc";
144 	if (!strncmp(arch, "mips", 4))
145 		return "mips";
146 	if (!strncmp(arch, "sh", 2) && isdigit(arch[2]))
147 		return "sh";
148 
149 	return arch;
150 }
151 
152 static int perf_env__lookup_binutils_path(struct perf_env *env,
153 					  const char *name, const char **path)
154 {
155 	int idx;
156 	const char *arch, *cross_env;
157 	struct utsname uts;
158 	const char *const *path_list;
159 	char *buf = NULL;
160 
161 	arch = normalize_arch(env->arch);
162 
163 	if (uname(&uts) < 0)
164 		goto out;
165 
166 	/*
167 	 * We don't need to try to find objdump path for native system.
168 	 * Just use default binutils path (e.g.: "objdump").
169 	 */
170 	if (!strcmp(normalize_arch(uts.machine), arch))
171 		goto out;
172 
173 	cross_env = getenv("CROSS_COMPILE");
174 	if (cross_env) {
175 		if (asprintf(&buf, "%s%s", cross_env, name) < 0)
176 			goto out_error;
177 		if (buf[0] == '/') {
178 			if (access(buf, F_OK) == 0)
179 				goto out;
180 			goto out_error;
181 		}
182 		if (lookup_path(buf))
183 			goto out;
184 		zfree(&buf);
185 	}
186 
187 	if (!strcmp(arch, "arm"))
188 		path_list = arm_triplets;
189 	else if (!strcmp(arch, "arm64"))
190 		path_list = arm64_triplets;
191 	else if (!strcmp(arch, "powerpc"))
192 		path_list = powerpc_triplets;
193 	else if (!strcmp(arch, "sh"))
194 		path_list = sh_triplets;
195 	else if (!strcmp(arch, "s390"))
196 		path_list = s390_triplets;
197 	else if (!strcmp(arch, "sparc"))
198 		path_list = sparc_triplets;
199 	else if (!strcmp(arch, "x86"))
200 		path_list = x86_triplets;
201 	else if (!strcmp(arch, "mips"))
202 		path_list = mips_triplets;
203 	else {
204 		ui__error("binutils for %s not supported.\n", arch);
205 		goto out_error;
206 	}
207 
208 	idx = lookup_triplets(path_list, name);
209 	if (idx < 0) {
210 		ui__error("Please install %s for %s.\n"
211 			  "You can add it to PATH, set CROSS_COMPILE or "
212 			  "override the default using --%s.\n",
213 			  name, arch, name);
214 		goto out_error;
215 	}
216 
217 	if (asprintf(&buf, "%s%s", path_list[idx], name) < 0)
218 		goto out_error;
219 
220 out:
221 	*path = buf;
222 	return 0;
223 out_error:
224 	free(buf);
225 	*path = NULL;
226 	return -1;
227 }
228 
229 int perf_env__lookup_objdump(struct perf_env *env)
230 {
231 	/*
232 	 * For live mode, env->arch will be NULL and we can use
233 	 * the native objdump tool.
234 	 */
235 	if (env->arch == NULL)
236 		return 0;
237 
238 	return perf_env__lookup_binutils_path(env, "objdump", &objdump_path);
239 }
240