[deliverable/linux.git] / tools / perf / arch / common.c

#include <stdio.h>
#include <sys/utsname.h>
#include "common.h"
#include "../util/util.h"
#include "../util/debug.h"

const char *const arm_triplets[] = {
	"arm-eabi-",
	"arm-linux-androideabi-",
	"arm-unknown-linux-",
	"arm-unknown-linux-gnu-",
	"arm-unknown-linux-gnueabi-",
	"arm-linux-gnu-",
	"arm-linux-gnueabihf-",
	"arm-none-eabi-",
	NULL
};

const char *const arm64_triplets[] = {
	"aarch64-linux-android-",
	"aarch64-linux-gnu-",
	NULL
};

const char *const powerpc_triplets[] = {
	"powerpc-unknown-linux-gnu-",
	"powerpc64-unknown-linux-gnu-",
	"powerpc64-linux-gnu-",
	"powerpc64le-linux-gnu-",
	NULL
};

const char *const s390_triplets[] = {
	"s390-ibm-linux-",
	"s390x-linux-gnu-",
	NULL
};

const char *const sh_triplets[] = {
	"sh-unknown-linux-gnu-",
	"sh64-unknown-linux-gnu-",
	"sh-linux-gnu-",
	"sh64-linux-gnu-",
	NULL
};

const char *const sparc_triplets[] = {
	"sparc-unknown-linux-gnu-",
	"sparc64-unknown-linux-gnu-",
	"sparc64-linux-gnu-",
	NULL
};

const char *const x86_triplets[] = {
	"x86_64-pc-linux-gnu-",
	"x86_64-unknown-linux-gnu-",
	"i686-pc-linux-gnu-",
	"i586-pc-linux-gnu-",
	"i486-pc-linux-gnu-",
	"i386-pc-linux-gnu-",
	"i686-linux-android-",
	"i686-android-linux-",
	"x86_64-linux-gnu-",
	"i586-linux-gnu-",
	NULL
};

const char *const mips_triplets[] = {
	"mips-unknown-linux-gnu-",
	"mipsel-linux-android-",
	"mips-linux-gnu-",
	"mips64-linux-gnu-",
	"mips64el-linux-gnuabi64-",
	"mips64-linux-gnuabi64-",
	"mipsel-linux-gnu-",
	NULL
};

static bool lookup_path(char *name)
{
	bool found = false;
	char *path, *tmp = NULL;
	char buf[PATH_MAX];
	char *env = getenv("PATH");

	if (!env)
		return false;

	env = strdup(env);
	if (!env)
		return false;

	path = strtok_r(env, ":", &tmp);
	while (path) {
		scnprintf(buf, sizeof(buf), "%s/%s", path, name);
		if (access(buf, F_OK) == 0) {
			found = true;
			break;
		}
		path = strtok_r(NULL, ":", &tmp);
	}
	free(env);
	return found;
}

static int lookup_triplets(const char *const *triplets, const char *name)
{
	int i;
	char buf[PATH_MAX];

	for (i = 0; triplets[i] != NULL; i++) {
		scnprintf(buf, sizeof(buf), "%s%s", triplets[i], name);
		if (lookup_path(buf))
			return i;
	}
	return -1;
}

/*
 * Return architecture name in a normalized form.
 * The conversion logic comes from the Makefile.
 */
const char *normalize_arch(char *arch)
{
	if (!strcmp(arch, "x86_64"))
		return "x86";
	if (arch[0] == 'i' && arch[2] == '8' && arch[3] == '6')
		return "x86";
	if (!strcmp(arch, "sun4u") || !strncmp(arch, "sparc", 5))
		return "sparc";
	if (!strcmp(arch, "aarch64") || !strcmp(arch, "arm64"))
		return "arm64";
	if (!strncmp(arch, "arm", 3) || !strcmp(arch, "sa110"))
		return "arm";
	if (!strncmp(arch, "s390", 4))
		return "s390";
	if (!strncmp(arch, "parisc", 6))
		return "parisc";
	if (!strncmp(arch, "powerpc", 7) || !strncmp(arch, "ppc", 3))
		return "powerpc";
	if (!strncmp(arch, "mips", 4))
		return "mips";
	if (!strncmp(arch, "sh", 2) && isdigit(arch[2]))
		return "sh";

	return arch;
}

static int perf_env__lookup_binutils_path(struct perf_env *env,
					  const char *name, const char **path)
{
	int idx;
	const char *arch, *cross_env;
	struct utsname uts;
	const char *const *path_list;
	char *buf = NULL;

	arch = normalize_arch(env->arch);

	if (uname(&uts) < 0)
		goto out;

	/*
	 * We don't need to try to find objdump path for native system.
	 * Just use default binutils path (e.g.: "objdump").
	 */
	if (!strcmp(normalize_arch(uts.machine), arch))
		goto out;

	cross_env = getenv("CROSS_COMPILE");
	if (cross_env) {
		if (asprintf(&buf, "%s%s", cross_env, name) < 0)
			goto out_error;
		if (buf[0] == '/') {
			if (access(buf, F_OK) == 0)
				goto out;
			goto out_error;
		}
		if (lookup_path(buf))
			goto out;
		zfree(&buf);
	}

	if (!strcmp(arch, "arm"))
		path_list = arm_triplets;
	else if (!strcmp(arch, "arm64"))
		path_list = arm64_triplets;
	else if (!strcmp(arch, "powerpc"))
		path_list = powerpc_triplets;
	else if (!strcmp(arch, "sh"))
		path_list = sh_triplets;
	else if (!strcmp(arch, "s390"))
		path_list = s390_triplets;
	else if (!strcmp(arch, "sparc"))
		path_list = sparc_triplets;
	else if (!strcmp(arch, "x86"))
		path_list = x86_triplets;
	else if (!strcmp(arch, "mips"))
		path_list = mips_triplets;
	else {
		ui__error("binutils for %s not supported.\n", arch);
		goto out_error;
	}

	idx = lookup_triplets(path_list, name);
	if (idx < 0) {
		ui__error("Please install %s for %s.\n"
			  "You can add it to PATH, set CROSS_COMPILE or "
			  "override the default using --%s.\n",
			  name, arch, name);
		goto out_error;
	}

	if (asprintf(&buf, "%s%s", path_list[idx], name) < 0)
		goto out_error;

out:
	*path = buf;
	return 0;
out_error:
	free(buf);
	*path = NULL;
	return -1;
}

int perf_env__lookup_objdump(struct perf_env *env)
{
	/*
	 * For live mode, env->arch will be NULL and we can use
	 * the native objdump tool.
	 */
	if (env->arch == NULL)
		return 0;

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