Quelle  common.c   Sprache: C

// SPDX-License-Identifier: GPL-2.0
#include <limits.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "common.h"
#include "../util/env.h"
#include "../util/debug.h"
#include <linux/zalloc.h>

const char *const arc_triplets[] = {
 "arc-linux-",
 "arc-snps-linux-uclibc-",
 "arc-snps-linux-gnu-",
 NULL
};

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-",
 "powerpc-linux-gnu-",
 "powerpc64-unknown-linux-gnu-",
 "powerpc64-linux-gnu-",
 "powerpc64le-linux-gnu-",
 NULL
};

const char *const riscv32_triplets[] = {
 "riscv32-unknown-linux-gnu-",
 "riscv32-linux-android-",
 "riscv32-linux-gnu-",
 NULL
};

const char *const riscv64_triplets[] = {
 "riscv64-unknown-linux-gnu-",
 "riscv64-linux-android-",
 "riscv64-linux-gnu-",
 NULL
};

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

const char *const sh_triplets[] = {
 "sh-unknown-linux-gnu-",
 "sh-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;
}

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

 /*
 * We don't need to try to find objdump path for native system.
 * Just use default binutils path (e.g.: "objdump").
 */
 if (!strcmp(perf_env__arch(NULL), 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, "arc"))
  path_list = arc_triplets;
 else 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, "riscv32"))
  path_list = riscv32_triplets;
 else if (!strcmp(arch, "riscv64"))
  path_list = riscv64_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, char **path)
{
 /*
 * 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", path);
}

/*
 * Some architectures have a single address space for kernel and user addresses,
 * which makes it possible to determine if an address is in kernel space or user
 * space.
 */
bool perf_env__single_address_space(struct perf_env *env)
{
 return strcmp(perf_env__arch(env), "sparc");
}