Quelle  evsel.c

// SPDX-License-Identifier: GPL-2.0-only
/*
 * Copyright (C) 2011, Red Hat Inc, Arnaldo Carvalho de Melo <acme@redhat.com>
 *
 * Parts came from builtin-{top,stat,record}.c, see those files for further
 * copyright notes.
 */
/*
 * Powerpc needs __SANE_USERSPACE_TYPES__ before <linux/types.h> to select
 * 'int-ll64.h' and avoid compile warnings when printing __u64 with %llu.
 */
#define __SANE_USERSPACE_TYPES__

#include <byteswap.h>
#include <errno.h>
#include <inttypes.h>
#include <linux/bitops.h>
#include <api/fs/fs.h>
#include <api/fs/tracing_path.h>
#include <linux/hw_breakpoint.h>
#include <linux/perf_event.h>
#include <linux/compiler.h>
#include <linux/err.h>
#include <linux/zalloc.h>
#include <sys/ioctl.h>
#include <sys/resource.h>
#include <sys/syscall.h>
#include <sys/types.h>
#include <dirent.h>
#include <stdlib.h>
#include <perf/evsel.h>
#include "asm/bug.h"
#include "bpf_counter.h"
#include "callchain.h"
#include "cgroup.h"
#include "counts.h"
#include "event.h"
#include "evsel.h"
#include "time-utils.h"
#include "util/env.h"
#include "util/evsel_config.h"
#include "util/evsel_fprintf.h"
#include "evlist.h"
#include <perf/cpumap.h>
#include "thread_map.h"
#include "target.h"
#include "perf_regs.h"
#include "record.h"
#include "debug.h"
#include "trace-event.h"
#include "session.h"
#include "stat.h"
#include "string2.h"
#include "memswap.h"
#include "util.h"
#include "util/hashmap.h"
#include "off_cpu.h"
#include "pmu.h"
#include "pmus.h"
#include "drm_pmu.h"
#include "hwmon_pmu.h"
#include "tool_pmu.h"
#include "tp_pmu.h"
#include "rlimit.h"
#include "../perf-sys.h"
#include "util/parse-branch-options.h"
#include "util/bpf-filter.h"
#include "util/hist.h"
#include <internal/xyarray.h>
#include <internal/lib.h>
#include <internal/threadmap.h>
#include "util/intel-tpebs.h"

#include <linux/ctype.h>

#ifdef HAVE_LIBTRACEEVENT
#include <event-parse.h>
#endif

struct perf_missing_features perf_missing_features;

static clockid_t clockid;

static int evsel__no_extra_init(struct evsel *evsel __maybe_unused)
{
 return 0;
}

static bool test_attr__enabled(void)
{
 static bool test_attr__enabled;
 static bool test_attr__enabled_tested;

 if (!test_attr__enabled_tested) {
  char *dir = getenv("PERF_TEST_ATTR");

  test_attr__enabled = (dir != NULL);
  test_attr__enabled_tested = true;
 }
 return test_attr__enabled;
}

#define __WRITE_ASS(str, fmt, data)     \
do {         \
 if (fprintf(file, #str "=%"fmt "\n", data) < 0) {  \
  perror("test attr - failed to write event file"); \
  fclose(file);      \
  return -1;      \
 }        \
} while (0)

#define WRITE_ASS(field, fmt) __WRITE_ASS(field, fmt, attr->field)

static int store_event(struct perf_event_attr *attr, pid_t pid, struct perf_cpu cpu,
         int fd, int group_fd, unsigned long flags)
{
 FILE *file;
 char path[PATH_MAX];
 char *dir = getenv("PERF_TEST_ATTR");

 snprintf(path, PATH_MAX, "%s/event-%d-%llu-%d", dir,
   attr->type, attr->config, fd);

 file = fopen(path, "w+");
 if (!file) {
  perror("test attr - failed to open event file");
  return -1;
 }

 if (fprintf(file, "[event-%d-%llu-%d]\n",
      attr->type, attr->config, fd) < 0) {
  perror("test attr - failed to write event file");
  fclose(file);
  return -1;
 }

 /* syscall arguments */
 __WRITE_ASS(fd,       "d", fd);
 __WRITE_ASS(group_fd, "d", group_fd);
 __WRITE_ASS(cpu,      "d", cpu.cpu);
 __WRITE_ASS(pid,      "d", pid);
 __WRITE_ASS(flags,   "lu", flags);

 /* struct perf_event_attr */
 WRITE_ASS(type,   PRIu32);
 WRITE_ASS(size,   PRIu32);
 WRITE_ASS(config,  "llu");
 WRITE_ASS(sample_period, "llu");
 WRITE_ASS(sample_type,   "llu");
 WRITE_ASS(read_format,   "llu");
 WRITE_ASS(disabled,       "d");
 WRITE_ASS(inherit,        "d");
 WRITE_ASS(pinned,         "d");
 WRITE_ASS(exclusive,      "d");
 WRITE_ASS(exclude_user,   "d");
 WRITE_ASS(exclude_kernel, "d");
 WRITE_ASS(exclude_hv,     "d");
 WRITE_ASS(exclude_idle,   "d");
 WRITE_ASS(mmap,           "d");
 WRITE_ASS(comm,           "d");
 WRITE_ASS(freq,           "d");
 WRITE_ASS(inherit_stat,   "d");
 WRITE_ASS(enable_on_exec, "d");
 WRITE_ASS(task,           "d");
 WRITE_ASS(watermark,      "d");
 WRITE_ASS(precise_ip,     "d");
 WRITE_ASS(mmap_data,      "d");
 WRITE_ASS(sample_id_all,  "d");
 WRITE_ASS(exclude_host,   "d");
 WRITE_ASS(exclude_guest,  "d");
 WRITE_ASS(exclude_callchain_kernel, "d");
 WRITE_ASS(exclude_callchain_user, "d");
 WRITE_ASS(mmap2,   "d");
 WRITE_ASS(comm_exec,   "d");
 WRITE_ASS(context_switch, "d");
 WRITE_ASS(write_backward, "d");
 WRITE_ASS(namespaces,   "d");
 WRITE_ASS(use_clockid,    "d");
 WRITE_ASS(wakeup_events, PRIu32);
 WRITE_ASS(bp_type, PRIu32);
 WRITE_ASS(config1, "llu");
 WRITE_ASS(config2, "llu");
 WRITE_ASS(branch_sample_type, "llu");
 WRITE_ASS(sample_regs_user,   "llu");
 WRITE_ASS(sample_stack_user,  PRIu32);

 fclose(file);
 return 0;
}

#undef __WRITE_ASS
#undef WRITE_ASS

static void test_attr__open(struct perf_event_attr *attr, pid_t pid, struct perf_cpu cpu,
       int fd, int group_fd, unsigned long flags)
{
 int errno_saved = errno;

 if ((fd != -1) && store_event(attr, pid, cpu, fd, group_fd, flags)) {
  pr_err("test attr FAILED");
  exit(128);
 }

 errno = errno_saved;
}

static void evsel__no_extra_fini(struct evsel *evsel __maybe_unused)
{
}

static struct {
 size_t size;
 int (*init)(struct evsel *evsel);
 void (*fini)(struct evsel *evsel);
} perf_evsel__object = {
 .size = sizeof(struct evsel),
 .init = evsel__no_extra_init,
 .fini = evsel__no_extra_fini,
};

int evsel__object_config(size_t object_size, int (*init)(struct evsel *evsel),
    void (*fini)(struct evsel *evsel))
{

 if (object_size == 0)
  goto set_methods;

 if (perf_evsel__object.size > object_size)
  return -EINVAL;

 perf_evsel__object.size = object_size;

set_methods:
 if (init != NULL)
  perf_evsel__object.init = init;

 if (fini != NULL)
  perf_evsel__object.fini = fini;

 return 0;
}

const char *evsel__pmu_name(const struct evsel *evsel)
{
 struct perf_pmu *pmu = evsel__find_pmu(evsel);

 if (pmu)
  return pmu->name;

 return event_type(evsel->core.attr.type);
}

#define FD(e, x, y) (*(int *)xyarray__entry(e->core.fd, x, y))

int __evsel__sample_size(u64 sample_type)
{
 u64 mask = sample_type & PERF_SAMPLE_MASK;
 int size = 0;
 int i;

 for (i = 0; i < 64; i++) {
  if (mask & (1ULL << i))
   size++;
 }

 size *= sizeof(u64);

 return size;
}

/**
 * __perf_evsel__calc_id_pos - calculate id_pos.
 * @sample_type: sample type
 *
 * This function returns the position of the event id (PERF_SAMPLE_ID or
 * PERF_SAMPLE_IDENTIFIER) in a sample event i.e. in the array of struct
 * perf_record_sample.
 */
static int __perf_evsel__calc_id_pos(u64 sample_type)
{
 int idx = 0;

 if (sample_type & PERF_SAMPLE_IDENTIFIER)
  return 0;

 if (!(sample_type & PERF_SAMPLE_ID))
  return -1;

 if (sample_type & PERF_SAMPLE_IP)
  idx += 1;

 if (sample_type & PERF_SAMPLE_TID)
  idx += 1;

 if (sample_type & PERF_SAMPLE_TIME)
  idx += 1;

 if (sample_type & PERF_SAMPLE_ADDR)
  idx += 1;

 return idx;
}

/**
 * __perf_evsel__calc_is_pos - calculate is_pos.
 * @sample_type: sample type
 *
 * This function returns the position (counting backwards) of the event id
 * (PERF_SAMPLE_ID or PERF_SAMPLE_IDENTIFIER) in a non-sample event i.e. if
 * sample_id_all is used there is an id sample appended to non-sample events.
 */
static int __perf_evsel__calc_is_pos(u64 sample_type)
{
 int idx = 1;

 if (sample_type & PERF_SAMPLE_IDENTIFIER)
  return 1;

 if (!(sample_type & PERF_SAMPLE_ID))
  return -1;

 if (sample_type & PERF_SAMPLE_CPU)
  idx += 1;

 if (sample_type & PERF_SAMPLE_STREAM_ID)
  idx += 1;

 return idx;
}

void evsel__calc_id_pos(struct evsel *evsel)
{
 evsel->id_pos = __perf_evsel__calc_id_pos(evsel->core.attr.sample_type);
 evsel->is_pos = __perf_evsel__calc_is_pos(evsel->core.attr.sample_type);
}

void __evsel__set_sample_bit(struct evsel *evsel,
      enum perf_event_sample_format bit)
{
 if (!(evsel->core.attr.sample_type & bit)) {
  evsel->core.attr.sample_type |= bit;
  evsel->sample_size += sizeof(u64);
  evsel__calc_id_pos(evsel);
 }
}

void __evsel__reset_sample_bit(struct evsel *evsel,
        enum perf_event_sample_format bit)
{
 if (evsel->core.attr.sample_type & bit) {
  evsel->core.attr.sample_type &= ~bit;
  evsel->sample_size -= sizeof(u64);
  evsel__calc_id_pos(evsel);
 }
}

void evsel__set_sample_id(struct evsel *evsel,
          bool can_sample_identifier)
{
 if (can_sample_identifier) {
  evsel__reset_sample_bit(evsel, ID);
  evsel__set_sample_bit(evsel, IDENTIFIER);
 } else {
  evsel__set_sample_bit(evsel, ID);
 }
 evsel->core.attr.read_format |= PERF_FORMAT_ID;
}

/**
 * evsel__is_function_event - Return whether given evsel is a function
 * trace event
 *
 * @evsel - evsel selector to be tested
 *
 * Return %true if event is function trace event
 */
bool evsel__is_function_event(struct evsel *evsel)
{
#define FUNCTION_EVENT "ftrace:function"

 return evsel->name &&
        !strncmp(FUNCTION_EVENT, evsel->name, sizeof(FUNCTION_EVENT));

#undef FUNCTION_EVENT
}

void evsel__init(struct evsel *evsel,
   struct perf_event_attr *attr, int idx)
{
 perf_evsel__init(&evsel->core, attr, idx);
 evsel->tracking    = !idx;
 evsel->unit    = strdup("");
 evsel->scale    = 1.0;
 evsel->max_events  = ULONG_MAX;
 evsel->evlist    = NULL;
 evsel->bpf_obj    = NULL;
 evsel->bpf_fd    = -1;
 INIT_LIST_HEAD(&evsel->config_terms);
 INIT_LIST_HEAD(&evsel->bpf_counter_list);
 INIT_LIST_HEAD(&evsel->bpf_filters);
 perf_evsel__object.init(evsel);
 evsel->sample_size = __evsel__sample_size(attr->sample_type);
 evsel__calc_id_pos(evsel);
 evsel->cmdline_group_boundary = false;
 evsel->metric_events = NULL;
 evsel->per_pkg_mask  = NULL;
 evsel->collect_stat  = false;
 evsel->group_pmu_name = NULL;
 evsel->skippable     = false;
 evsel->alternate_hw_config = PERF_COUNT_HW_MAX;
 evsel->script_output_type = -1; // FIXME: OUTPUT_TYPE_UNSET, see builtin-script.c
}

struct evsel *evsel__new_idx(struct perf_event_attr *attr, int idx)
{
 struct evsel *evsel = zalloc(perf_evsel__object.size);

 if (!evsel)
  return NULL;
 evsel__init(evsel, attr, idx);

 if (evsel__is_bpf_output(evsel) && !attr->sample_type) {
  evsel->core.attr.sample_type = (PERF_SAMPLE_RAW | PERF_SAMPLE_TIME |
         PERF_SAMPLE_CPU | PERF_SAMPLE_PERIOD),
  evsel->core.attr.sample_period = 1;
 }

 if (evsel__is_clock(evsel)) {
  free((char *)evsel->unit);
  evsel->unit = strdup("msec");
  evsel->scale = 1e-6;
 }

 return evsel;
}

int copy_config_terms(struct list_head *dst, struct list_head *src)
{
 struct evsel_config_term *pos, *tmp;

 list_for_each_entry(pos, src, list) {
  tmp = malloc(sizeof(*tmp));
  if (tmp == NULL)
   return -ENOMEM;

  *tmp = *pos;
  if (tmp->free_str) {
   tmp->val.str = strdup(pos->val.str);
   if (tmp->val.str == NULL) {
    free(tmp);
    return -ENOMEM;
   }
  }
  list_add_tail(&tmp->list, dst);
 }
 return 0;
}

static int evsel__copy_config_terms(struct evsel *dst, struct evsel *src)
{
 return copy_config_terms(&dst->config_terms, &src->config_terms);
}

/**
 * evsel__clone - create a new evsel copied from @orig
 * @orig: original evsel
 *
 * The assumption is that @orig is not configured nor opened yet.
 * So we only care about the attributes that can be set while it's parsed.
 */
struct evsel *evsel__clone(struct evsel *dest, struct evsel *orig)
{
 struct evsel *evsel;

 BUG_ON(orig->core.fd);
 BUG_ON(orig->counts);
 BUG_ON(orig->priv);
 BUG_ON(orig->per_pkg_mask);

 /* cannot handle BPF objects for now */
 if (orig->bpf_obj)
  return NULL;

 if (dest)
  evsel = dest;
 else
  evsel = evsel__new(&orig->core.attr);

 if (evsel == NULL)
  return NULL;

 evsel->core.cpus = perf_cpu_map__get(orig->core.cpus);
 evsel->core.pmu_cpus = perf_cpu_map__get(orig->core.pmu_cpus);
 evsel->core.threads = perf_thread_map__get(orig->core.threads);
 evsel->core.nr_members = orig->core.nr_members;
 evsel->core.system_wide = orig->core.system_wide;
 evsel->core.requires_cpu = orig->core.requires_cpu;
 evsel->core.is_pmu_core = orig->core.is_pmu_core;

 if (orig->name) {
  evsel->name = strdup(orig->name);
  if (evsel->name == NULL)
   goto out_err;
 }
 if (orig->group_name) {
  evsel->group_name = strdup(orig->group_name);
  if (evsel->group_name == NULL)
   goto out_err;
 }
 if (orig->group_pmu_name) {
  evsel->group_pmu_name = strdup(orig->group_pmu_name);
  if (evsel->group_pmu_name == NULL)
   goto out_err;
 }
 if (orig->filter) {
  evsel->filter = strdup(orig->filter);
  if (evsel->filter == NULL)
   goto out_err;
 }
 if (orig->metric_id) {
  evsel->metric_id = strdup(orig->metric_id);
  if (evsel->metric_id == NULL)
   goto out_err;
 }
 evsel->cgrp = cgroup__get(orig->cgrp);
#ifdef HAVE_LIBTRACEEVENT
 if (orig->tp_sys) {
  evsel->tp_sys = strdup(orig->tp_sys);
  if (evsel->tp_sys == NULL)
   goto out_err;
 }
 if (orig->tp_name) {
  evsel->tp_name = strdup(orig->tp_name);
  if (evsel->tp_name == NULL)
   goto out_err;
 }
 evsel->tp_format = orig->tp_format;
#endif
 evsel->handler = orig->handler;
 evsel->core.leader = orig->core.leader;

 evsel->max_events = orig->max_events;
 zfree(&evsel->unit);
 if (orig->unit) {
  evsel->unit = strdup(orig->unit);
  if (evsel->unit == NULL)
   goto out_err;
 }
 evsel->scale = orig->scale;
 evsel->snapshot = orig->snapshot;
 evsel->per_pkg = orig->per_pkg;
 evsel->percore = orig->percore;
 evsel->precise_max = orig->precise_max;
 evsel->is_libpfm_event = orig->is_libpfm_event;

 evsel->exclude_GH = orig->exclude_GH;
 evsel->sample_read = orig->sample_read;
 evsel->collect_stat = orig->collect_stat;
 evsel->weak_group = orig->weak_group;
 evsel->use_config_name = orig->use_config_name;
 evsel->pmu = orig->pmu;
 evsel->first_wildcard_match = orig->first_wildcard_match;

 if (evsel__copy_config_terms(evsel, orig) < 0)
  goto out_err;

 evsel->alternate_hw_config = orig->alternate_hw_config;

 return evsel;

out_err:
 evsel__delete(evsel);
 return NULL;
}

/*
 * Returns pointer with encoded error via <linux/err.h> interface.
 */
struct evsel *evsel__newtp_idx(const char *sys, const char *name, int idx, bool format)
{
 struct perf_event_attr attr = {
  .type        = PERF_TYPE_TRACEPOINT,
  .sample_type   = (PERF_SAMPLE_RAW | PERF_SAMPLE_TIME |
    PERF_SAMPLE_CPU | PERF_SAMPLE_PERIOD),
 };
 struct evsel *evsel = zalloc(perf_evsel__object.size);
 int err = -ENOMEM, id = -1;

 if (evsel == NULL)
  goto out_err;


 if (asprintf(&evsel->name, "%s:%s", sys, name) < 0)
  goto out_free;

#ifdef HAVE_LIBTRACEEVENT
 evsel->tp_sys = strdup(sys);
 if (!evsel->tp_sys)
  goto out_free;

 evsel->tp_name = strdup(name);
 if (!evsel->tp_name)
  goto out_free;
#endif

 event_attr_init(&attr);

 if (format) {
  id = tp_pmu__id(sys, name);
  if (id < 0) {
   err = id;
   goto out_free;
  }
 }
 attr.config = (__u64)id;
 attr.sample_period = 1;
 evsel__init(evsel, &attr, idx);
 return evsel;

out_free:
 zfree(&evsel->name);
#ifdef HAVE_LIBTRACEEVENT
 zfree(&evsel->tp_sys);
 zfree(&evsel->tp_name);
#endif
 free(evsel);
out_err:
 return ERR_PTR(err);
}

#ifdef HAVE_LIBTRACEEVENT
struct tep_event *evsel__tp_format(struct evsel *evsel)
{
 struct tep_event *tp_format = evsel->tp_format;

 if (tp_format)
  return tp_format;

 if (evsel->core.attr.type != PERF_TYPE_TRACEPOINT)
  return NULL;

 if (!evsel->tp_sys)
  tp_format = trace_event__tp_format_id(evsel->core.attr.config);
 else
  tp_format = trace_event__tp_format(evsel->tp_sys, evsel->tp_name);

 if (IS_ERR(tp_format)) {
  int err = -PTR_ERR(evsel->tp_format);

  pr_err("Error getting tracepoint format '%s' '%s'(%d)\n",
   evsel__name(evsel), strerror(err), err);
  return NULL;
 }
 evsel->tp_format = tp_format;
 return evsel->tp_format;
}
#endif

const char *const evsel__hw_names[PERF_COUNT_HW_MAX] = {
 "cycles",
 "instructions",
 "cache-references",
 "cache-misses",
 "branches",
 "branch-misses",
 "bus-cycles",
 "stalled-cycles-frontend",
 "stalled-cycles-backend",
 "ref-cycles",
};

char *evsel__bpf_counter_events;

bool evsel__match_bpf_counter_events(const char *name)
{
 int name_len;
 bool match;
 char *ptr;

 if (!evsel__bpf_counter_events)
  return false;

 ptr = strstr(evsel__bpf_counter_events, name);
 name_len = strlen(name);

 /* check name matches a full token in evsel__bpf_counter_events */
 match = (ptr != NULL) &&
  ((ptr == evsel__bpf_counter_events) || (*(ptr - 1) == ',')) &&
  ((*(ptr + name_len) == ',') || (*(ptr + name_len) == '\0'));

 return match;
}

static const char *__evsel__hw_name(u64 config)
{
 if (config < PERF_COUNT_HW_MAX && evsel__hw_names[config])
  return evsel__hw_names[config];

 return "unknown-hardware";
}

static int evsel__add_modifiers(struct evsel *evsel, char *bf, size_t size)
{
 int colon = 0, r = 0;
 struct perf_event_attr *attr = &evsel->core.attr;

#define MOD_PRINT(context, mod) do {     \
  if (!attr->exclude_##context) {    \
   if (!colon) colon = ++r;   \
   r += scnprintf(bf + r, size - r, "%c", mod); \
  } } while(0)

 if (attr->exclude_kernel || attr->exclude_user || attr->exclude_hv) {
  MOD_PRINT(kernel, 'k');
  MOD_PRINT(user, 'u');
  MOD_PRINT(hv, 'h');
 }

 if (attr->precise_ip) {
  if (!colon)
   colon = ++r;
  r += scnprintf(bf + r, size - r, "%.*s", attr->precise_ip, "ppp");
 }

 if (attr->exclude_host || attr->exclude_guest) {
  MOD_PRINT(host, 'H');
  MOD_PRINT(guest, 'G');
 }
#undef MOD_PRINT
 if (colon)
  bf[colon - 1] = ':';
 return r;
}

int __weak arch_evsel__hw_name(struct evsel *evsel, char *bf, size_t size)
{
 return scnprintf(bf, size, "%s", __evsel__hw_name(evsel->core.attr.config));
}

static int evsel__hw_name(struct evsel *evsel, char *bf, size_t size)
{
 int r = arch_evsel__hw_name(evsel, bf, size);
 return r + evsel__add_modifiers(evsel, bf + r, size - r);
}

const char *const evsel__sw_names[PERF_COUNT_SW_MAX] = {
 "cpu-clock",
 "task-clock",
 "page-faults",
 "context-switches",
 "cpu-migrations",
 "minor-faults",
 "major-faults",
 "alignment-faults",
 "emulation-faults",
 "dummy",
};

static const char *__evsel__sw_name(u64 config)
{
 if (config < PERF_COUNT_SW_MAX && evsel__sw_names[config])
  return evsel__sw_names[config];
 return "unknown-software";
}

static int evsel__sw_name(struct evsel *evsel, char *bf, size_t size)
{
 int r = scnprintf(bf, size, "%s", __evsel__sw_name(evsel->core.attr.config));
 return r + evsel__add_modifiers(evsel, bf + r, size - r);
}

static int __evsel__bp_name(char *bf, size_t size, u64 addr, u64 type)
{
 int r;

 r = scnprintf(bf, size, "mem:0x%" PRIx64 ":", addr);

 if (type & HW_BREAKPOINT_R)
  r += scnprintf(bf + r, size - r, "r");

 if (type & HW_BREAKPOINT_W)
  r += scnprintf(bf + r, size - r, "w");

 if (type & HW_BREAKPOINT_X)
  r += scnprintf(bf + r, size - r, "x");

 return r;
}

static int evsel__bp_name(struct evsel *evsel, char *bf, size_t size)
{
 struct perf_event_attr *attr = &evsel->core.attr;
 int r = __evsel__bp_name(bf, size, attr->bp_addr, attr->bp_type);
 return r + evsel__add_modifiers(evsel, bf + r, size - r);
}

const char *const evsel__hw_cache[PERF_COUNT_HW_CACHE_MAX][EVSEL__MAX_ALIASES] = {
 { "L1-dcache", "l1-d",  "l1d",  "L1-data",  },
 { "L1-icache", "l1-i",  "l1i",  "L1-instruction", },
 { "LLC", "L2",       },
 { "dTLB", "d-tlb", "Data-TLB",    },
 { "iTLB", "i-tlb", "Instruction-TLB",   },
 { "branch", "branches", "bpu",  "btb",  "bpc", },
 { "node",        },
};

const char *const evsel__hw_cache_op[PERF_COUNT_HW_CACHE_OP_MAX][EVSEL__MAX_ALIASES] = {
 { "load", "loads", "read",     },
 { "store", "stores", "write",    },
 { "prefetch", "prefetches", "speculative-read", "speculative-load", },
};

const char *const evsel__hw_cache_result[PERF_COUNT_HW_CACHE_RESULT_MAX][EVSEL__MAX_ALIASES] = {
 { "refs", "Reference", "ops",  "access",  },
 { "misses", "miss",       },
};

#define C(x)  PERF_COUNT_HW_CACHE_##x
#define CACHE_READ (1 << C(OP_READ))
#define CACHE_WRITE (1 << C(OP_WRITE))
#define CACHE_PREFETCH (1 << C(OP_PREFETCH))
#define COP(x)  (1 << x)

/*
 * cache operation stat
 * L1I : Read and prefetch only
 * ITLB and BPU : Read-only
 */
static const unsigned long evsel__hw_cache_stat[C(MAX)] = {
 [C(L1D)] = (CACHE_READ | CACHE_WRITE | CACHE_PREFETCH),
 [C(L1I)] = (CACHE_READ | CACHE_PREFETCH),
 [C(LL)] = (CACHE_READ | CACHE_WRITE | CACHE_PREFETCH),
 [C(DTLB)] = (CACHE_READ | CACHE_WRITE | CACHE_PREFETCH),
 [C(ITLB)] = (CACHE_READ),
 [C(BPU)] = (CACHE_READ),
 [C(NODE)] = (CACHE_READ | CACHE_WRITE | CACHE_PREFETCH),
};

bool evsel__is_cache_op_valid(u8 type, u8 op)
{
 if (evsel__hw_cache_stat[type] & COP(op))
  return true; /* valid */
 else
  return false; /* invalid */
}

int __evsel__hw_cache_type_op_res_name(u8 type, u8 op, u8 result, char *bf, size_t size)
{
 if (result) {
  return scnprintf(bf, size, "%s-%s-%s", evsel__hw_cache[type][0],
     evsel__hw_cache_op[op][0],
     evsel__hw_cache_result[result][0]);
 }

 return scnprintf(bf, size, "%s-%s", evsel__hw_cache[type][0],
    evsel__hw_cache_op[op][1]);
}

static int __evsel__hw_cache_name(u64 config, char *bf, size_t size)
{
 u8 op, result, type = (config >>  0) & 0xff;
 const char *err = "unknown-ext-hardware-cache-type";

 if (type >= PERF_COUNT_HW_CACHE_MAX)
  goto out_err;

 op = (config >>  8) & 0xff;
 err = "unknown-ext-hardware-cache-op";
 if (op >= PERF_COUNT_HW_CACHE_OP_MAX)
  goto out_err;

 result = (config >> 16) & 0xff;
 err = "unknown-ext-hardware-cache-result";
 if (result >= PERF_COUNT_HW_CACHE_RESULT_MAX)
  goto out_err;

 err = "invalid-cache";
 if (!evsel__is_cache_op_valid(type, op))
  goto out_err;

 return __evsel__hw_cache_type_op_res_name(type, op, result, bf, size);
out_err:
 return scnprintf(bf, size, "%s", err);
}

static int evsel__hw_cache_name(struct evsel *evsel, char *bf, size_t size)
{
 int ret = __evsel__hw_cache_name(evsel->core.attr.config, bf, size);
 return ret + evsel__add_modifiers(evsel, bf + ret, size - ret);
}

static int evsel__raw_name(struct evsel *evsel, char *bf, size_t size)
{
 int ret = scnprintf(bf, size, "raw 0x%" PRIx64, evsel->core.attr.config);
 return ret + evsel__add_modifiers(evsel, bf + ret, size - ret);
}

const char *evsel__name(struct evsel *evsel)
{
 char bf[128];

 if (!evsel)
  goto out_unknown;

 if (evsel->name)
  return evsel->name;

 switch (evsel->core.attr.type) {
 case PERF_TYPE_RAW:
  evsel__raw_name(evsel, bf, sizeof(bf));
  break;

 case PERF_TYPE_HARDWARE:
  evsel__hw_name(evsel, bf, sizeof(bf));
  break;

 case PERF_TYPE_HW_CACHE:
  evsel__hw_cache_name(evsel, bf, sizeof(bf));
  break;

 case PERF_TYPE_SOFTWARE:
  evsel__sw_name(evsel, bf, sizeof(bf));
  break;

 case PERF_TYPE_TRACEPOINT:
  scnprintf(bf, sizeof(bf), "%s", "unknown tracepoint");
  break;

 case PERF_TYPE_BREAKPOINT:
  evsel__bp_name(evsel, bf, sizeof(bf));
  break;

 case PERF_PMU_TYPE_TOOL:
  scnprintf(bf, sizeof(bf), "%s", evsel__tool_pmu_event_name(evsel));
  break;

 default:
  scnprintf(bf, sizeof(bf), "unknown attr type: %d",
     evsel->core.attr.type);
  break;
 }

 evsel->name = strdup(bf);

 if (evsel->name)
  return evsel->name;
out_unknown:
 return "unknown";
}

bool evsel__name_is(struct evsel *evsel, const char *name)
{
 return !strcmp(evsel__name(evsel), name);
}

const char *evsel__metric_id(const struct evsel *evsel)
{
 if (evsel->metric_id)
  return evsel->metric_id;

 if (evsel__is_tool(evsel))
  return evsel__tool_pmu_event_name(evsel);

 return "unknown";
}

const char *evsel__group_name(struct evsel *evsel)
{
 return evsel->group_name ?: "anon group";
}

/*
 * Returns the group details for the specified leader,
 * with following rules.
 *
 *  For record -e '{cycles,instructions}'
 *    'anon group { cycles:u, instructions:u }'
 *
 *  For record -e 'cycles,instructions' and report --group
 *    'cycles:u, instructions:u'
 */
int evsel__group_desc(struct evsel *evsel, char *buf, size_t size)
{
 int ret = 0;
 bool first = true;
 struct evsel *pos;
 const char *group_name = evsel__group_name(evsel);

 if (!evsel->forced_leader)
  ret = scnprintf(buf, size, "%s { ", group_name);

 for_each_group_evsel(pos, evsel) {
  if (symbol_conf.skip_empty &&
      evsel__hists(pos)->stats.nr_samples == 0)
   continue;

  ret += scnprintf(buf + ret, size - ret, "%s%s",
     first ? "" : ", ", evsel__name(pos));
  first = false;
 }

 if (!evsel->forced_leader)
  ret += scnprintf(buf + ret, size - ret, " }");

 return ret;
}

static void __evsel__config_callchain(struct evsel *evsel, struct record_opts *opts,
          struct callchain_param *param)
{
 bool function = evsel__is_function_event(evsel);
 struct perf_event_attr *attr = &evsel->core.attr;

 evsel__set_sample_bit(evsel, CALLCHAIN);

 attr->sample_max_stack = param->max_stack;

 if (opts->kernel_callchains)
  attr->exclude_callchain_user = 1;
 if (opts->user_callchains)
  attr->exclude_callchain_kernel = 1;
 if (param->record_mode == CALLCHAIN_LBR) {
  if (!opts->branch_stack) {
   if (attr->exclude_user) {
    pr_warning("LBR callstack option is only available "
        "to get user callchain information. "
        "Falling back to framepointers.\n");
   } else {
    evsel__set_sample_bit(evsel, BRANCH_STACK);
    attr->branch_sample_type = PERF_SAMPLE_BRANCH_USER |
       PERF_SAMPLE_BRANCH_CALL_STACK |
       PERF_SAMPLE_BRANCH_NO_CYCLES |
       PERF_SAMPLE_BRANCH_NO_FLAGS |
       PERF_SAMPLE_BRANCH_HW_INDEX;
   }
  } else
    pr_warning("Cannot use LBR callstack with branch stack. "
        "Falling back to framepointers.\n");
 }

 if (param->record_mode == CALLCHAIN_DWARF) {
  if (!function) {
   const char *arch = perf_env__arch(evsel__env(evsel));

   evsel__set_sample_bit(evsel, REGS_USER);
   evsel__set_sample_bit(evsel, STACK_USER);
   if (opts->sample_user_regs &&
       DWARF_MINIMAL_REGS(arch) != arch__user_reg_mask()) {
    attr->sample_regs_user |= DWARF_MINIMAL_REGS(arch);
    pr_warning("WARNING: The use of --call-graph=dwarf may require all the user registers, "
        "specifying a subset with --user-regs may render DWARF unwinding unreliable, "
        "so the minimal registers set (IP, SP) is explicitly forced.\n");
   } else {
    attr->sample_regs_user |= arch__user_reg_mask();
   }
   attr->sample_stack_user = param->dump_size;
   attr->exclude_callchain_user = 1;
  } else {
   pr_info("Cannot use DWARF unwind for function trace event,"
    " falling back to framepointers.\n");
  }
 }

 if (function) {
  pr_info("Disabling user space callchains for function trace event.\n");
  attr->exclude_callchain_user = 1;
 }
}

void evsel__config_callchain(struct evsel *evsel, struct record_opts *opts,
        struct callchain_param *param)
{
 if (param->enabled)
  return __evsel__config_callchain(evsel, opts, param);
}

static void evsel__reset_callgraph(struct evsel *evsel, struct callchain_param *param)
{
 struct perf_event_attr *attr = &evsel->core.attr;

 evsel__reset_sample_bit(evsel, CALLCHAIN);
 if (param->record_mode == CALLCHAIN_LBR) {
  evsel__reset_sample_bit(evsel, BRANCH_STACK);
  attr->branch_sample_type &= ~(PERF_SAMPLE_BRANCH_USER |
           PERF_SAMPLE_BRANCH_CALL_STACK |
           PERF_SAMPLE_BRANCH_HW_INDEX);
 }
 if (param->record_mode == CALLCHAIN_DWARF) {
  evsel__reset_sample_bit(evsel, REGS_USER);
  evsel__reset_sample_bit(evsel, STACK_USER);
 }
}

static void evsel__apply_config_terms(struct evsel *evsel,
          struct record_opts *opts, bool track)
{
 struct evsel_config_term *term;
 struct list_head *config_terms = &evsel->config_terms;
 struct perf_event_attr *attr = &evsel->core.attr;
 /* callgraph default */
 struct callchain_param param = {
  .record_mode = callchain_param.record_mode,
 };
 u32 dump_size = 0;
 int max_stack = 0;
 const char *callgraph_buf = NULL;

 list_for_each_entry(term, config_terms, list) {
  switch (term->type) {
  case EVSEL__CONFIG_TERM_PERIOD:
   if (!(term->weak && opts->user_interval != ULLONG_MAX)) {
    attr->sample_period = term->val.period;
    attr->freq = 0;
    evsel__reset_sample_bit(evsel, PERIOD);
   }
   break;
  case EVSEL__CONFIG_TERM_FREQ:
   if (!(term->weak && opts->user_freq != UINT_MAX)) {
    attr->sample_freq = term->val.freq;
    attr->freq = 1;
    evsel__set_sample_bit(evsel, PERIOD);
   }
   break;
  case EVSEL__CONFIG_TERM_TIME:
   if (term->val.time)
    evsel__set_sample_bit(evsel, TIME);
   else
    evsel__reset_sample_bit(evsel, TIME);
   break;
  case EVSEL__CONFIG_TERM_CALLGRAPH:
   callgraph_buf = term->val.str;
   break;
  case EVSEL__CONFIG_TERM_BRANCH:
   if (term->val.str && strcmp(term->val.str, "no")) {
    evsel__set_sample_bit(evsel, BRANCH_STACK);
    parse_branch_str(term->val.str,
       &attr->branch_sample_type);
   } else
    evsel__reset_sample_bit(evsel, BRANCH_STACK);
   break;
  case EVSEL__CONFIG_TERM_STACK_USER:
   dump_size = term->val.stack_user;
   break;
  case EVSEL__CONFIG_TERM_MAX_STACK:
   max_stack = term->val.max_stack;
   break;
  case EVSEL__CONFIG_TERM_MAX_EVENTS:
   evsel->max_events = term->val.max_events;
   break;
  case EVSEL__CONFIG_TERM_INHERIT:
   /*
 * attr->inherit should has already been set by
 * evsel__config. If user explicitly set
 * inherit using config terms, override global
 * opt->no_inherit setting.
 */
   attr->inherit = term->val.inherit ? 1 : 0;
   break;
  case EVSEL__CONFIG_TERM_OVERWRITE:
   attr->write_backward = term->val.overwrite ? 1 : 0;
   break;
  case EVSEL__CONFIG_TERM_DRV_CFG:
   break;
  case EVSEL__CONFIG_TERM_PERCORE:
   break;
  case EVSEL__CONFIG_TERM_AUX_OUTPUT:
   attr->aux_output = term->val.aux_output ? 1 : 0;
   break;
  case EVSEL__CONFIG_TERM_AUX_ACTION:
   /* Already applied by auxtrace */
   break;
  case EVSEL__CONFIG_TERM_AUX_SAMPLE_SIZE:
   /* Already applied by auxtrace */
   break;
  case EVSEL__CONFIG_TERM_CFG_CHG:
   break;
  default:
   break;
  }
 }

 /* User explicitly set per-event callgraph, clear the old setting and reset. */
 if ((callgraph_buf != NULL) || (dump_size > 0) || max_stack) {
  bool sample_address = false;

  if (max_stack) {
   param.max_stack = max_stack;
   if (callgraph_buf == NULL)
    callgraph_buf = "fp";
  }

  /* parse callgraph parameters */
  if (callgraph_buf != NULL) {
   if (!strcmp(callgraph_buf, "no")) {
    param.enabled = false;
    param.record_mode = CALLCHAIN_NONE;
   } else {
    param.enabled = true;
    if (parse_callchain_record(callgraph_buf, ¶m)) {
     pr_err("per-event callgraph setting for %s failed. "
            "Apply callgraph global setting for it\n",
            evsel->name);
     return;
    }
    if (param.record_mode == CALLCHAIN_DWARF)
     sample_address = true;
   }
  }
  if (dump_size > 0) {
   dump_size = round_up(dump_size, sizeof(u64));
   param.dump_size = dump_size;
  }

  /* If global callgraph set, clear it */
  if (callchain_param.enabled)
   evsel__reset_callgraph(evsel, &callchain_param);

  /* set perf-event callgraph */
  if (param.enabled) {
   if (sample_address) {
    evsel__set_sample_bit(evsel, ADDR);
    evsel__set_sample_bit(evsel, DATA_SRC);
    evsel->core.attr.mmap_data = track;
   }
   evsel__config_callchain(evsel, opts, ¶m);
  }
 }
}

struct evsel_config_term *__evsel__get_config_term(struct evsel *evsel, enum evsel_term_type type)
{
 struct evsel_config_term *term, *found_term = NULL;

 list_for_each_entry(term, &evsel->config_terms, list) {
  if (term->type == type)
   found_term = term;
 }

 return found_term;
}

void __weak arch_evsel__set_sample_weight(struct evsel *evsel)
{
 evsel__set_sample_bit(evsel, WEIGHT);
}

void __weak arch__post_evsel_config(struct evsel *evsel __maybe_unused,
        struct perf_event_attr *attr __maybe_unused)
{
}

static void evsel__set_default_freq_period(struct record_opts *opts,
        struct perf_event_attr *attr)
{
 if (opts->freq) {
  attr->freq = 1;
  attr->sample_freq = opts->freq;
 } else {
  attr->sample_period = opts->default_interval;
 }
}

bool evsel__is_offcpu_event(struct evsel *evsel)
{
 return evsel__is_bpf_output(evsel) && evsel__name_is(evsel, OFFCPU_EVENT) &&
        evsel->core.attr.sample_type & PERF_SAMPLE_RAW;
}

/*
 * The enable_on_exec/disabled value strategy:
 *
 *  1) For any type of traced program:
 *    - all independent events and group leaders are disabled
 *    - all group members are enabled
 *
 *     Group members are ruled by group leaders. They need to
 *     be enabled, because the group scheduling relies on that.
 *
 *  2) For traced programs executed by perf:
 *     - all independent events and group leaders have
 *       enable_on_exec set
 *     - we don't specifically enable or disable any event during
 *       the record command
 *
 *     Independent events and group leaders are initially disabled
 *     and get enabled by exec. Group members are ruled by group
 *     leaders as stated in 1).
 *
 *  3) For traced programs attached by perf (pid/tid):
 *     - we specifically enable or disable all events during
 *       the record command
 *
 *     When attaching events to already running traced we
 *     enable/disable events specifically, as there's no
 *     initial traced exec call.
 */
void evsel__config(struct evsel *evsel, struct record_opts *opts,
     struct callchain_param *callchain)
{
 struct evsel *leader = evsel__leader(evsel);
 struct perf_event_attr *attr = &evsel->core.attr;
 int track = evsel->tracking;
 bool per_cpu = opts->target.default_per_cpu && !opts->target.per_thread;

 attr->sample_id_all = perf_missing_features.sample_id_all ? 0 : 1;
 attr->inherit     = target__has_cpu(&opts->target) ? 0 : !opts->no_inherit;
 attr->write_backward = opts->overwrite ? 1 : 0;
 attr->read_format   = PERF_FORMAT_LOST;

 evsel__set_sample_bit(evsel, IP);
 evsel__set_sample_bit(evsel, TID);

 if (evsel->sample_read) {
  evsel__set_sample_bit(evsel, READ);

  /*
 * We need ID even in case of single event, because
 * PERF_SAMPLE_READ process ID specific data.
 */
  evsel__set_sample_id(evsel, false);

  /*
 * Apply group format only if we belong to group
 * with more than one members.
 */
  if (leader->core.nr_members > 1) {
   attr->read_format |= PERF_FORMAT_GROUP;
  }

  /*
 * Inherit + SAMPLE_READ requires SAMPLE_TID in the read_format
 */
  if (attr->inherit) {
   evsel__set_sample_bit(evsel, TID);
   evsel->core.attr.read_format |=
    PERF_FORMAT_ID;
  }
 }

 /*
 * We default some events to have a default interval. But keep
 * it a weak assumption overridable by the user.
 */
 if ((evsel->is_libpfm_event && !attr->sample_period) ||
     (!evsel->is_libpfm_event && (!attr->sample_period ||
      opts->user_freq != UINT_MAX ||
      opts->user_interval != ULLONG_MAX)))
  evsel__set_default_freq_period(opts, attr);

 /*
 * If attr->freq was set (here or earlier), ask for period
 * to be sampled.
 */
 if (attr->freq)
  evsel__set_sample_bit(evsel, PERIOD);

 if (opts->no_samples)
  attr->sample_freq = 0;

 if (opts->inherit_stat) {
  evsel->core.attr.read_format |=
   PERF_FORMAT_TOTAL_TIME_ENABLED |
   PERF_FORMAT_TOTAL_TIME_RUNNING |
   PERF_FORMAT_ID;
  attr->inherit_stat = 1;
 }

 if (opts->sample_address) {
  evsel__set_sample_bit(evsel, ADDR);
  attr->mmap_data = track;
 }

 /*
 * We don't allow user space callchains for  function trace
 * event, due to issues with page faults while tracing page
 * fault handler and its overall trickiness nature.
 */
 if (evsel__is_function_event(evsel))
  evsel->core.attr.exclude_callchain_user = 1;

 if (callchain && callchain->enabled && !evsel->no_aux_samples)
  evsel__config_callchain(evsel, opts, callchain);

 if (opts->sample_intr_regs && !evsel->no_aux_samples &&
     !evsel__is_dummy_event(evsel)) {
  attr->sample_regs_intr = opts->sample_intr_regs;
  evsel__set_sample_bit(evsel, REGS_INTR);
 }

 if (opts->sample_user_regs && !evsel->no_aux_samples &&
     !evsel__is_dummy_event(evsel)) {
  attr->sample_regs_user |= opts->sample_user_regs;
  evsel__set_sample_bit(evsel, REGS_USER);
 }

 if (target__has_cpu(&opts->target) || opts->sample_cpu)
  evsel__set_sample_bit(evsel, CPU);

 /*
 * When the user explicitly disabled time don't force it here.
 */
 if (opts->sample_time &&
     (!perf_missing_features.sample_id_all &&
     (!opts->no_inherit || target__has_cpu(&opts->target) || per_cpu ||
      opts->sample_time_set)))
  evsel__set_sample_bit(evsel, TIME);

 if (opts->raw_samples && !evsel->no_aux_samples) {
  evsel__set_sample_bit(evsel, TIME);
  evsel__set_sample_bit(evsel, RAW);
  evsel__set_sample_bit(evsel, CPU);
 }

 if (opts->sample_data_src)
  evsel__set_sample_bit(evsel, DATA_SRC);

 if (opts->sample_phys_addr)
  evsel__set_sample_bit(evsel, PHYS_ADDR);

 if (opts->no_buffering) {
  attr->watermark = 0;
  attr->wakeup_events = 1;
 }
 if (opts->branch_stack && !evsel->no_aux_samples) {
  evsel__set_sample_bit(evsel, BRANCH_STACK);
  attr->branch_sample_type = opts->branch_stack;
 }

 if (opts->sample_weight || evsel->retire_lat) {
  arch_evsel__set_sample_weight(evsel);
  evsel->retire_lat = false;
 }
 attr->task     = track;
 attr->mmap     = track;
 attr->mmap2    = track && !perf_missing_features.mmap2;
 attr->comm     = track;
 attr->build_id = track && opts->build_id;

 /*
 * ksymbol is tracked separately with text poke because it needs to be
 * system wide and enabled immediately.
 */
 if (!opts->text_poke)
  attr->ksymbol = track && !perf_missing_features.ksymbol;
 attr->bpf_event = track && !opts->no_bpf_event && !perf_missing_features.bpf;

 if (opts->record_namespaces)
  attr->namespaces  = track;

 if (opts->record_cgroup) {
  attr->cgroup = track && !perf_missing_features.cgroup;
  evsel__set_sample_bit(evsel, CGROUP);
 }

 if (opts->sample_data_page_size)
  evsel__set_sample_bit(evsel, DATA_PAGE_SIZE);

 if (opts->sample_code_page_size)
  evsel__set_sample_bit(evsel, CODE_PAGE_SIZE);

 if (opts->record_switch_events)
  attr->context_switch = track;

 if (opts->sample_transaction)
  evsel__set_sample_bit(evsel, TRANSACTION);

 if (opts->running_time) {
  evsel->core.attr.read_format |=
   PERF_FORMAT_TOTAL_TIME_ENABLED |
   PERF_FORMAT_TOTAL_TIME_RUNNING;
 }

 /*
 * XXX see the function comment above
 *
 * Disabling only independent events or group leaders,
 * keeping group members enabled.
 */
 if (evsel__is_group_leader(evsel))
  attr->disabled = 1;

 /*
 * Setting enable_on_exec for independent events and
 * group leaders for traced executed by perf.
 */
 if (target__none(&opts->target) && evsel__is_group_leader(evsel) &&
     !opts->target.initial_delay)
  attr->enable_on_exec = 1;

 if (evsel->immediate) {
  attr->disabled = 0;
  attr->enable_on_exec = 0;
 }

 clockid = opts->clockid;
 if (opts->use_clockid) {
  attr->use_clockid = 1;
  attr->clockid = opts->clockid;
 }

 if (evsel->precise_max)
  attr->precise_ip = 3;

 if (opts->all_user) {
  attr->exclude_kernel = 1;
  attr->exclude_user   = 0;
 }

 if (opts->all_kernel) {
  attr->exclude_kernel = 0;
  attr->exclude_user   = 1;
 }

 if (evsel->core.pmu_cpus || evsel->unit)
  evsel->core.attr.read_format |= PERF_FORMAT_ID;

 /*
 * Apply event specific term settings,
 * it overloads any global configuration.
 */
 evsel__apply_config_terms(evsel, opts, track);

 evsel->ignore_missing_thread = opts->ignore_missing_thread;

 /* The --period option takes the precedence. */
 if (opts->period_set) {
  if (opts->period)
   evsel__set_sample_bit(evsel, PERIOD);
  else
   evsel__reset_sample_bit(evsel, PERIOD);
 }

 /*
 * A dummy event never triggers any actual counter and therefore
 * cannot be used with branch_stack.
 *
 * For initial_delay, a dummy event is added implicitly.
 * The software event will trigger -EOPNOTSUPP error out,
 * if BRANCH_STACK bit is set.
 */
 if (evsel__is_dummy_event(evsel))
  evsel__reset_sample_bit(evsel, BRANCH_STACK);

 if (evsel__is_offcpu_event(evsel)) {
  evsel->core.attr.sample_type &= OFFCPU_SAMPLE_TYPES;
  attr->inherit = 0;
 }

 arch__post_evsel_config(evsel, attr);
}

int evsel__set_filter(struct evsel *evsel, const char *filter)
{
 char *new_filter = strdup(filter);

 if (new_filter != NULL) {
  free(evsel->filter);
  evsel->filter = new_filter;
  return 0;
 }

 return -1;
}

static int evsel__append_filter(struct evsel *evsel, const char *fmt, const char *filter)
{
 char *new_filter;

 if (evsel->filter == NULL)
  return evsel__set_filter(evsel, filter);

 if (asprintf(&new_filter, fmt, evsel->filter, filter) > 0) {
  free(evsel->filter);
  evsel->filter = new_filter;
  return 0;
 }

 return -1;
}

int evsel__append_tp_filter(struct evsel *evsel, const char *filter)
{
 return evsel__append_filter(evsel, "(%s) && (%s)", filter);
}

int evsel__append_addr_filter(struct evsel *evsel, const char *filter)
{
 return evsel__append_filter(evsel, "%s,%s", filter);
}

/* Caller has to clear disabled after going through all CPUs. */
int evsel__enable_cpu(struct evsel *evsel, int cpu_map_idx)
{
 return perf_evsel__enable_cpu(&evsel->core, cpu_map_idx);
}

int evsel__enable(struct evsel *evsel)
{
 int err = perf_evsel__enable(&evsel->core);

 if (!err)
  evsel->disabled = false;
 return err;
}

/* Caller has to set disabled after going through all CPUs. */
int evsel__disable_cpu(struct evsel *evsel, int cpu_map_idx)
{
 return perf_evsel__disable_cpu(&evsel->core, cpu_map_idx);
}

int evsel__disable(struct evsel *evsel)
{
 int err = perf_evsel__disable(&evsel->core);
 /*
 * We mark it disabled here so that tools that disable a event can
 * ignore events after they disable it. I.e. the ring buffer may have
 * already a few more events queued up before the kernel got the stop
 * request.
 */
 if (!err)
  evsel->disabled = true;

 return err;
}

void free_config_terms(struct list_head *config_terms)
{
 struct evsel_config_term *term, *h;

 list_for_each_entry_safe(term, h, config_terms, list) {
  list_del_init(&term->list);
  if (term->free_str)
   zfree(&term->val.str);
  free(term);
 }
}

static void evsel__free_config_terms(struct evsel *evsel)
{
 free_config_terms(&evsel->config_terms);
}

static void (*evsel__priv_destructor)(void *priv);

void evsel__set_priv_destructor(void (*destructor)(void *priv))
{
 assert(evsel__priv_destructor == NULL);

 evsel__priv_destructor = destructor;
}

void evsel__exit(struct evsel *evsel)
{
 assert(list_empty(&evsel->core.node));
 assert(evsel->evlist == NULL);
 if (evsel__is_retire_lat(evsel))
  evsel__tpebs_close(evsel);
 bpf_counter__destroy(evsel);
 perf_bpf_filter__destroy(evsel);
 evsel__free_counts(evsel);
 perf_evsel__free_fd(&evsel->core);
 perf_evsel__free_id(&evsel->core);
 evsel__free_config_terms(evsel);
 cgroup__put(evsel->cgrp);
 perf_evsel__exit(&evsel->core);
 zfree(&evsel->group_name);
 zfree(&evsel->name);
#ifdef HAVE_LIBTRACEEVENT
 zfree(&evsel->tp_sys);
 zfree(&evsel->tp_name);
#endif
 zfree(&evsel->filter);
 zfree(&evsel->group_pmu_name);
 zfree(&evsel->unit);
 zfree(&evsel->metric_id);
 evsel__zero_per_pkg(evsel);
 hashmap__free(evsel->per_pkg_mask);
 evsel->per_pkg_mask = NULL;
 zfree(&evsel->metric_events);
 if (evsel__priv_destructor)
  evsel__priv_destructor(evsel->priv);
 perf_evsel__object.fini(evsel);
 if (evsel__tool_event(evsel) == TOOL_PMU__EVENT_SYSTEM_TIME ||
     evsel__tool_event(evsel) == TOOL_PMU__EVENT_USER_TIME)
  xyarray__delete(evsel->start_times);
}

void evsel__delete(struct evsel *evsel)
{
 if (!evsel)
  return;

 evsel__exit(evsel);
 free(evsel);
}

void evsel__compute_deltas(struct evsel *evsel, int cpu_map_idx, int thread,
      struct perf_counts_values *count)
{
 struct perf_counts_values tmp;

 if (!evsel->prev_raw_counts)
  return;

 tmp = *perf_counts(evsel->prev_raw_counts, cpu_map_idx, thread);
 *perf_counts(evsel->prev_raw_counts, cpu_map_idx, thread) = *count;

 count->val = count->val - tmp.val;
 count->ena = count->ena - tmp.ena;
 count->run = count->run - tmp.run;
}

static int evsel__read_one(struct evsel *evsel, int cpu_map_idx, int thread)
{
 struct perf_counts_values *count = perf_counts(evsel->counts, cpu_map_idx, thread);

 return perf_evsel__read(&evsel->core, cpu_map_idx, thread, count);
}

static void evsel__set_count(struct evsel *counter, int cpu_map_idx, int thread,
        u64 val, u64 ena, u64 run, u64 lost)
{
 struct perf_counts_values *count;

 count = perf_counts(counter->counts, cpu_map_idx, thread);

 if (evsel__is_retire_lat(counter)) {
  evsel__tpebs_read(counter, cpu_map_idx, thread);
  perf_counts__set_loaded(counter->counts, cpu_map_idx, thread, true);
  return;
 }

 count->val    = val;
 count->ena    = ena;
 count->run    = run;
 count->lost   = lost;

 perf_counts__set_loaded(counter->counts, cpu_map_idx, thread, true);
}

static bool evsel__group_has_tpebs(struct evsel *leader)
{
 struct evsel *evsel;

 for_each_group_evsel(evsel, leader) {
  if (evsel__is_retire_lat(evsel))
   return true;
 }
 return false;
}

static u64 evsel__group_read_nr_members(struct evsel *leader)
{
 u64 nr = leader->core.nr_members;
 struct evsel *evsel;

 for_each_group_evsel(evsel, leader) {
  if (evsel__is_retire_lat(evsel))
   nr--;
 }
 return nr;
}

static u64 evsel__group_read_size(struct evsel *leader)
{
 u64 read_format = leader->core.attr.read_format;
 int entry = sizeof(u64); /* value */
 int size = 0;
 int nr = 1;

 if (!evsel__group_has_tpebs(leader))
  return perf_evsel__read_size(&leader->core);

 if (read_format & PERF_FORMAT_TOTAL_TIME_ENABLED)
  size += sizeof(u64);

 if (read_format & PERF_FORMAT_TOTAL_TIME_RUNNING)
  size += sizeof(u64);

 if (read_format & PERF_FORMAT_ID)
  entry += sizeof(u64);

 if (read_format & PERF_FORMAT_LOST)
  entry += sizeof(u64);

 if (read_format & PERF_FORMAT_GROUP) {
  nr = evsel__group_read_nr_members(leader);
  size += sizeof(u64);
 }

 size += entry * nr;
 return size;
}

static int evsel__process_group_data(struct evsel *leader, int cpu_map_idx, int thread, u64 *data)
{
 u64 read_format = leader->core.attr.read_format;
 struct sample_read_value *v;
 u64 nr, ena = 0, run = 0, lost = 0;

 nr = *data++;

 if (nr != evsel__group_read_nr_members(leader))
  return -EINVAL;

 if (read_format & PERF_FORMAT_TOTAL_TIME_ENABLED)
  ena = *data++;

 if (read_format & PERF_FORMAT_TOTAL_TIME_RUNNING)
  run = *data++;

 v = (void *)data;
 sample_read_group__for_each(v, nr, read_format) {
  struct evsel *counter;

  counter = evlist__id2evsel(leader->evlist, v->id);
  if (!counter)
   return -EINVAL;

  if (read_format & PERF_FORMAT_LOST)
   lost = v->lost;

  evsel__set_count(counter, cpu_map_idx, thread, v->value, ena, run, lost);
 }

 return 0;
}

static int evsel__read_group(struct evsel *leader, int cpu_map_idx, int thread)
{
 struct perf_stat_evsel *ps = leader->stats;
 u64 read_format = leader->core.attr.read_format;
 int size = evsel__group_read_size(leader);
 u64 *data = ps->group_data;

 if (!(read_format & PERF_FORMAT_ID))
  return -EINVAL;

 if (!evsel__is_group_leader(leader))
  return -EINVAL;

 if (!data) {
  data = zalloc(size);
  if (!data)
   return -ENOMEM;

  ps->group_data = data;
 }

 if (FD(leader, cpu_map_idx, thread) < 0)
  return -EINVAL;

 if (readn(FD(leader, cpu_map_idx, thread), data, size) <= 0)
  return -errno;

 return evsel__process_group_data(leader, cpu_map_idx, thread, data);
}

bool __evsel__match(const struct evsel *evsel, u32 type, u64 config)
{

 u32 e_type = evsel->core.attr.type;
 u64 e_config = evsel->core.attr.config;

 if (e_type != type) {
  return type == PERF_TYPE_HARDWARE && evsel->pmu && evsel->pmu->is_core &&
   evsel->alternate_hw_config == config;
 }

 if ((type == PERF_TYPE_HARDWARE || type == PERF_TYPE_HW_CACHE) &&
     perf_pmus__supports_extended_type())
  e_config &= PERF_HW_EVENT_MASK;

 return e_config == config;
}

int evsel__read_counter(struct evsel *evsel, int cpu_map_idx, int thread)
{
 if (evsel__is_tool(evsel))
  return evsel__tool_pmu_read(evsel, cpu_map_idx, thread);

 if (evsel__is_hwmon(evsel))
  return evsel__hwmon_pmu_read(evsel, cpu_map_idx, thread);

 if (evsel__is_drm(evsel))
  return evsel__drm_pmu_read(evsel, cpu_map_idx, thread);

 if (evsel__is_retire_lat(evsel))
  return evsel__tpebs_read(evsel, cpu_map_idx, thread);

 if (evsel->core.attr.read_format & PERF_FORMAT_GROUP)
  return evsel__read_group(evsel, cpu_map_idx, thread);

 return evsel__read_one(evsel, cpu_map_idx, thread);
}

int __evsel__read_on_cpu(struct evsel *evsel, int cpu_map_idx, int thread, bool scale)
{
 struct perf_counts_values count;
 size_t nv = scale ? 3 : 1;

 if (FD(evsel, cpu_map_idx, thread) < 0)
  return -EINVAL;

 if (evsel->counts == NULL && evsel__alloc_counts(evsel) < 0)
  return -ENOMEM;

 if (readn(FD(evsel, cpu_map_idx, thread), &count, nv * sizeof(u64)) <= 0)
  return -errno;

 evsel__compute_deltas(evsel, cpu_map_idx, thread, &count);
 perf_counts_values__scale(&count, scale, NULL);
 *perf_counts(evsel->counts, cpu_map_idx, thread) = count;
 return 0;
}

static int evsel__match_other_cpu(struct evsel *evsel, struct evsel *other,
      int cpu_map_idx)
{
 struct perf_cpu cpu;

 cpu = perf_cpu_map__cpu(evsel->core.cpus, cpu_map_idx);
 return perf_cpu_map__idx(other->core.cpus, cpu);
}

static int evsel__hybrid_group_cpu_map_idx(struct evsel *evsel, int cpu_map_idx)
{
 struct evsel *leader = evsel__leader(evsel);

 if ((evsel__is_hybrid(evsel) && !evsel__is_hybrid(leader)) ||
     (!evsel__is_hybrid(evsel) && evsel__is_hybrid(leader))) {
  return evsel__match_other_cpu(evsel, leader, cpu_map_idx);
 }

 return cpu_map_idx;
}

static int get_group_fd(struct evsel *evsel, int cpu_map_idx, int thread)
{
 struct evsel *leader = evsel__leader(evsel);
 int fd;

 if (evsel__is_group_leader(evsel))
  return -1;

 /*
 * Leader must be already processed/open,
 * if not it's a bug.
 */
 BUG_ON(!leader->core.fd);

 cpu_map_idx = evsel__hybrid_group_cpu_map_idx(evsel, cpu_map_idx);
 if (cpu_map_idx == -1)
  return -1;

 fd = FD(leader, cpu_map_idx, thread);
 BUG_ON(fd == -1 && !leader->skippable);

 /*
 * When the leader has been skipped, return -2 to distinguish from no
 * group leader case.
 */
 return fd == -1 ? -2 : fd;
}

static void evsel__remove_fd(struct evsel *pos, int nr_cpus, int nr_threads, int thread_idx)
{
 for (int cpu = 0; cpu < nr_cpus; cpu++)
  for (int thread = thread_idx; thread < nr_threads - 1; thread++)
   FD(pos, cpu, thread) = FD(pos, cpu, thread + 1);
}

static int update_fds(struct evsel *evsel,
        int nr_cpus, int cpu_map_idx,
        int nr_threads, int thread_idx)
{
 struct evsel *pos;

 if (cpu_map_idx >= nr_cpus || thread_idx >= nr_threads)
  return -EINVAL;

 evlist__for_each_entry(evsel->evlist, pos) {
  nr_cpus = pos != evsel ? nr_cpus : cpu_map_idx;

  evsel__remove_fd(pos, nr_cpus, nr_threads, thread_idx);

  /*
 * Since fds for next evsel has not been created,
 * there is no need to iterate whole event list.
 */
  if (pos == evsel)
   break;
 }
 return 0;
}

static bool evsel__ignore_missing_thread(struct evsel *evsel,
      int nr_cpus, int cpu_map_idx,
      struct perf_thread_map *threads,
      int thread, int err)
{
 pid_t ignore_pid = perf_thread_map__pid(threads, thread);

 if (!evsel->ignore_missing_thread)
  return false;

 /* The system wide setup does not work with threads. */
 if (evsel->core.system_wide)
  return false;

 /* The -ESRCH is perf event syscall errno for pid's not found. */
 if (err != -ESRCH)
  return false;

 /* If there's only one thread, let it fail. */
 if (threads->nr == 1)
  return false;

 /*
 * We should remove fd for missing_thread first
 * because thread_map__remove() will decrease threads->nr.
 */
 if (update_fds(evsel, nr_cpus, cpu_map_idx, threads->nr, thread))
  return false;

 if (thread_map__remove(threads, thread))
  return false;

 pr_warning("WARNING: Ignored open failure for pid %d\n",
     ignore_pid);
 return true;
}

static int __open_attr__fprintf(FILE *fp, const char *name, const char *val,
    void *priv __maybe_unused)
{
 return fprintf(fp, "  %-32s %s\n", name, val);
}

static void display_attr(struct perf_event_attr *attr)
{
 if (verbose >= 2 || debug_peo_args) {
  fprintf(stderr, "%.60s\n", graph_dotted_line);
  fprintf(stderr, "perf_event_attr:\n");
  perf_event_attr__fprintf(stderr, attr, __open_attr__fprintf, NULL);
  fprintf(stderr, "%.60s\n", graph_dotted_line);
 }
}

bool evsel__precise_ip_fallback(struct evsel *evsel)
{
 /* Do not try less precise if not requested. */
 if (!evsel->precise_max)
  return false;

 /*
 * We tried all the precise_ip values, and it's
 * still failing, so leave it to standard fallback.
 */
 if (!evsel->core.attr.precise_ip) {
  evsel->core.attr.precise_ip = evsel->precise_ip_original;
  return false;
 }

 if (!evsel->precise_ip_original)
  evsel->precise_ip_original = evsel->core.attr.precise_ip;

 evsel->core.attr.precise_ip--;
 pr_debug2_peo("decreasing precise_ip by one (%d)\n", evsel->core.attr.precise_ip);
 display_attr(&evsel->core.attr);
 return true;
}

static struct perf_cpu_map *empty_cpu_map;
static struct perf_thread_map *empty_thread_map;

static int __evsel__prepare_open(struct evsel *evsel, struct perf_cpu_map *cpus,
  struct perf_thread_map *threads)
{
 int ret = 0;
 int nthreads = perf_thread_map__nr(threads);

 if ((perf_missing_features.write_backward && evsel->core.attr.write_backward) ||
     (perf_missing_features.aux_output     && evsel->core.attr.aux_output))
  return -EINVAL;

 if (cpus == NULL) {
  if (empty_cpu_map == NULL) {
   empty_cpu_map = perf_cpu_map__new_any_cpu();
   if (empty_cpu_map == NULL)
    return -ENOMEM;
  }

  cpus = empty_cpu_map;
 }

 if (threads == NULL) {
  if (empty_thread_map == NULL) {
   empty_thread_map = thread_map__new_by_tid(-1);
   if (empty_thread_map == NULL)
    return -ENOMEM;
  }

  threads = empty_thread_map;
 }

 if (evsel->core.fd == NULL &&
     perf_evsel__alloc_fd(&evsel->core, perf_cpu_map__nr(cpus), nthreads) < 0)
  return -ENOMEM;

 if (evsel__is_tool(evsel))
  ret = evsel__tool_pmu_prepare_open(evsel, cpus, nthreads);

 evsel->open_flags = PERF_FLAG_FD_CLOEXEC;
 if (evsel->cgrp)
  evsel->open_flags |= PERF_FLAG_PID_CGROUP;

 return ret;
}

static void evsel__disable_missing_features(struct evsel *evsel)
{
 if (perf_missing_features.inherit_sample_read && evsel->core.attr.inherit &&
     (evsel->core.attr.sample_type & PERF_SAMPLE_READ))
  evsel->core.attr.inherit = 0;
 if (perf_missing_features.branch_counters)
  evsel->core.attr.branch_sample_type &= ~PERF_SAMPLE_BRANCH_COUNTERS;
 if (perf_missing_features.read_lost)
  evsel->core.attr.read_format &= ~PERF_FORMAT_LOST;
 if (perf_missing_features.weight_struct) {
  evsel__set_sample_bit(evsel, WEIGHT);
  evsel__reset_sample_bit(evsel, WEIGHT_STRUCT);
 }
 if (perf_missing_features.clockid_wrong)
  evsel->core.attr.clockid = CLOCK_MONOTONIC; /* should always work */
 if (perf_missing_features.clockid) {
  evsel->core.attr.use_clockid = 0;
  evsel->core.attr.clockid = 0;
 }
 if (perf_missing_features.cloexec)
  evsel->open_flags &= ~(unsigned long)PERF_FLAG_FD_CLOEXEC;
 if (perf_missing_features.mmap2)
  evsel->core.attr.mmap2 = 0;
 if (evsel->pmu && evsel->pmu->missing_features.exclude_guest)
  evsel->core.attr.exclude_guest = evsel->core.attr.exclude_host = 0;
 if (perf_missing_features.lbr_flags)
  evsel->core.attr.branch_sample_type &= ~(PERF_SAMPLE_BRANCH_NO_FLAGS |
         PERF_SAMPLE_BRANCH_NO_CYCLES);
 if (perf_missing_features.group_read && evsel->core.attr.inherit)
  evsel->core.attr.read_format &= ~(PERF_FORMAT_GROUP|PERF_FORMAT_ID);
 if (perf_missing_features.ksymbol)
  evsel->core.attr.ksymbol = 0;
 if (perf_missing_features.bpf)
  evsel->core.attr.bpf_event = 0;
 if (perf_missing_features.branch_hw_idx)
  evsel->core.attr.branch_sample_type &= ~PERF_SAMPLE_BRANCH_HW_INDEX;
 if (perf_missing_features.sample_id_all)
  evsel->core.attr.sample_id_all = 0;
}

int evsel__prepare_open(struct evsel *evsel, struct perf_cpu_map *cpus,
   struct perf_thread_map *threads)
{
 int err;

 err = __evsel__prepare_open(evsel, cpus, threads);
 if (err)
  return err;

 evsel__disable_missing_features(evsel);

 return err;
}

static bool __has_attr_feature(struct perf_event_attr *attr,
          struct perf_cpu cpu, unsigned long flags)
{
 int fd = syscall(SYS_perf_event_open, attr, /*pid=*/0, cpu.cpu,
    /*group_fd=*/-1, flags);
 close(fd);

 if (fd < 0) {
  attr->exclude_kernel = 1;

  fd = syscall(SYS_perf_event_open, attr, /*pid=*/0, cpu.cpu,
        /*group_fd=*/-1, flags);
  close(fd);
 }

 if (fd < 0) {
  attr->exclude_hv = 1;

  fd = syscall(SYS_perf_event_open, attr, /*pid=*/0, cpu.cpu,
        /*group_fd=*/-1, flags);
  close(fd);
 }

 if (fd < 0) {
  attr->exclude_guest = 1;

  fd = syscall(SYS_perf_event_open, attr, /*pid=*/0, cpu.cpu,
        /*group_fd=*/-1, flags);
  close(fd);
 }

 attr->exclude_kernel = 0;
 attr->exclude_guest = 0;
 attr->exclude_hv = 0;

 return fd >= 0;
}

static bool has_attr_feature(struct perf_event_attr *attr, unsigned long flags)
{
 struct perf_cpu cpu = {.cpu = -1};

 return __has_attr_feature(attr, cpu, flags);
}

static void evsel__detect_missing_pmu_features(struct evsel *evsel)
{
 struct perf_event_attr attr = {
  .type = evsel->core.attr.type,
  .config = evsel->core.attr.config,
  .disabled = 1,
 };
 struct perf_pmu *pmu = evsel->pmu;
 int old_errno;

 old_errno = errno;

 if (pmu == NULL)
  pmu = evsel->pmu = evsel__find_pmu(evsel);

 if (pmu == NULL || pmu->missing_features.checked)
  goto out;

 /*
 * Must probe features in the order they were added to the
 * perf_event_attr interface.  These are kernel core limitation but
 * specific to PMUs with branch stack.  So we can detect with the given
 * hardware event and stop on the first one succeeded.
 */

 /* Please add new feature detection here. */

 attr.exclude_guest = 1;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 pmu->missing_features.exclude_guest = true;
 pr_debug2("switching off exclude_guest for PMU %s\n", pmu->name);

found:
 pmu->missing_features.checked = true;
out:
 errno = old_errno;
}

static void evsel__detect_missing_brstack_features(struct evsel *evsel)
{
 static bool detection_done = false;
 struct perf_event_attr attr = {
  .type = evsel->core.attr.type,
  .config = evsel->core.attr.config,
  .disabled = 1,
  .sample_type = PERF_SAMPLE_BRANCH_STACK,
  .sample_period = 1000,
 };
 int old_errno;

 if (detection_done)
  return;

 old_errno = errno;

 /*
 * Must probe features in the order they were added to the
 * perf_event_attr interface.  These are PMU specific limitation
 * so we can detect with the given hardware event and stop on the
 * first one succeeded.
 */

 /* Please add new feature detection here. */

 attr.branch_sample_type = PERF_SAMPLE_BRANCH_COUNTERS;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.branch_counters = true;
 pr_debug2("switching off branch counters support\n");

 attr.branch_sample_type = PERF_SAMPLE_BRANCH_HW_INDEX;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.branch_hw_idx = true;
 pr_debug2("switching off branch HW index support\n");

 attr.branch_sample_type = PERF_SAMPLE_BRANCH_NO_CYCLES | PERF_SAMPLE_BRANCH_NO_FLAGS;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.lbr_flags = true;
 pr_debug2_peo("switching off branch sample type no (cycles/flags)\n");

found:
 detection_done = true;
 errno = old_errno;
}

static bool evsel__probe_aux_action(struct evsel *evsel, struct perf_cpu cpu)
{
 struct perf_event_attr attr = evsel->core.attr;
 int old_errno = errno;

 attr.disabled = 1;
 attr.aux_start_paused = 1;

 if (__has_attr_feature(&attr, cpu, /*flags=*/0)) {
  errno = old_errno;
  return true;
 }

 /*
 * EOPNOTSUPP means the kernel supports the feature but the PMU does
 * not, so keep that distinction if possible.
 */
 if (errno != EOPNOTSUPP)
  errno = old_errno;

 return false;
}

static void evsel__detect_missing_aux_action_feature(struct evsel *evsel, struct perf_cpu cpu)
{
 static bool detection_done;
 struct evsel *leader;

 /*
 * Don't bother probing aux_action if it is not being used or has been
 * probed before.
 */
 if (!evsel->core.attr.aux_action || detection_done)
  return;

 detection_done = true;

 /*
 * The leader is an AUX area event. If it has failed, assume the feature
 * is not supported.
 */
 leader = evsel__leader(evsel);
 if (evsel == leader) {
  perf_missing_features.aux_action = true;
  return;
 }

 /*
 * AUX area event with aux_action must have been opened successfully
 * already, so feature is supported.
 */
 if (leader->core.attr.aux_action)
  return;

 if (!evsel__probe_aux_action(leader, cpu))
  perf_missing_features.aux_action = true;
}

static bool evsel__detect_missing_features(struct evsel *evsel, struct perf_cpu cpu)
{
 static bool detection_done = false;
 struct perf_event_attr attr = {
  .type = PERF_TYPE_SOFTWARE,
  .config = PERF_COUNT_SW_TASK_CLOCK,
  .disabled = 1,
 };
 int old_errno;

 evsel__detect_missing_aux_action_feature(evsel, cpu);

 evsel__detect_missing_pmu_features(evsel);

 if (evsel__has_br_stack(evsel))
  evsel__detect_missing_brstack_features(evsel);

 if (detection_done)
  goto check;

 old_errno = errno;

 /*
 * Must probe features in the order they were added to the
 * perf_event_attr interface.  These are kernel core limitation
 * not PMU-specific so we can detect with a software event and
 * stop on the first one succeeded.
 */

 /* Please add new feature detection here. */

 attr.inherit = true;
 attr.sample_type = PERF_SAMPLE_READ;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.inherit_sample_read = true;
 pr_debug2("Using PERF_SAMPLE_READ / :S modifier is not compatible with inherit, falling back to no-inherit.\n");
 attr.inherit = false;
 attr.sample_type = 0;

 attr.read_format = PERF_FORMAT_LOST;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.read_lost = true;
 pr_debug2("switching off PERF_FORMAT_LOST support\n");
 attr.read_format = 0;

 attr.sample_type = PERF_SAMPLE_WEIGHT_STRUCT;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.weight_struct = true;
 pr_debug2("switching off weight struct support\n");
 attr.sample_type = 0;

 attr.sample_type = PERF_SAMPLE_CODE_PAGE_SIZE;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.code_page_size = true;
 pr_debug2_peo("Kernel has no PERF_SAMPLE_CODE_PAGE_SIZE support\n");
 attr.sample_type = 0;

 attr.sample_type = PERF_SAMPLE_DATA_PAGE_SIZE;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.data_page_size = true;
 pr_debug2_peo("Kernel has no PERF_SAMPLE_DATA_PAGE_SIZE support\n");
 attr.sample_type = 0;

 attr.cgroup = 1;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.cgroup = true;
 pr_debug2_peo("Kernel has no cgroup sampling support\n");
 attr.cgroup = 0;

 attr.aux_output = 1;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.aux_output = true;
 pr_debug2_peo("Kernel has no attr.aux_output support\n");
 attr.aux_output = 0;

 attr.bpf_event = 1;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.bpf = true;
 pr_debug2_peo("switching off bpf_event\n");
 attr.bpf_event = 0;

 attr.ksymbol = 1;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.ksymbol = true;
 pr_debug2_peo("switching off ksymbol\n");
 attr.ksymbol = 0;

 attr.write_backward = 1;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.write_backward = true;
 pr_debug2_peo("switching off write_backward\n");
 attr.write_backward = 0;

 attr.use_clockid = 1;
 attr.clockid = CLOCK_MONOTONIC;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.clockid = true;
 pr_debug2_peo("switching off clockid\n");
 attr.use_clockid = 0;
 attr.clockid = 0;

 if (has_attr_feature(&attr, /*flags=*/PERF_FLAG_FD_CLOEXEC))
  goto found;
 perf_missing_features.cloexec = true;
 pr_debug2_peo("switching off cloexec flag\n");

 attr.mmap2 = 1;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.mmap2 = true;
 pr_debug2_peo("switching off mmap2\n");
 attr.mmap2 = 0;

 /* set this unconditionally? */
 perf_missing_features.sample_id_all = true;
 pr_debug2_peo("switching off sample_id_all\n");

 attr.inherit = 1;
 attr.read_format = PERF_FORMAT_GROUP;
 if (has_attr_feature(&attr, /*flags=*/0))
  goto found;
 perf_missing_features.group_read = true;
 pr_debug2_peo("switching off group read\n");
 attr.inherit = 0;
 attr.read_format = 0;

found:
 detection_done = true;
 errno = old_errno;

check:
 if (evsel->core.attr.inherit &&
     (evsel->core.attr.sample_type & PERF_SAMPLE_READ) &&
     perf_missing_features.inherit_sample_read)
  return true;

 if ((evsel->core.attr.branch_sample_type & PERF_SAMPLE_BRANCH_COUNTERS) &&
     perf_missing_features.branch_counters)
  return true;

 if ((evsel->core.attr.read_format & PERF_FORMAT_LOST) &&
     perf_missing_features.read_lost)
  return true;

 if ((evsel->core.attr.sample_type & PERF_SAMPLE_WEIGHT_STRUCT) &&
     perf_missing_features.weight_struct)
  return true;

 if (evsel->core.attr.use_clockid && evsel->core.attr.clockid != CLOCK_MONOTONIC &&
     !perf_missing_features.clockid) {
  perf_missing_features.clockid_wrong = true;
  return true;
 }

 if (evsel->core.attr.use_clockid && perf_missing_features.clockid)
  return true;

 if ((evsel->open_flags & PERF_FLAG_FD_CLOEXEC) &&
     perf_missing_features.cloexec)
  return true;

 if (evsel->core.attr.mmap2 && perf_missing_features.mmap2)
  return true;

 if ((evsel->core.attr.branch_sample_type & (PERF_SAMPLE_BRANCH_NO_FLAGS |
          PERF_SAMPLE_BRANCH_NO_CYCLES)) &&
     perf_missing_features.lbr_flags)
  return true;

 if (evsel->core.attr.inherit && (evsel->core.attr.read_format & PERF_FORMAT_GROUP) &&
     perf_missing_features.group_read)
  return true;

 if (evsel->core.attr.ksymbol && perf_missing_features.ksymbol)
  return true;

 if (evsel->core.attr.bpf_event && perf_missing_features.bpf)
  return true;

 if ((evsel->core.attr.branch_sample_type & PERF_SAMPLE_BRANCH_HW_INDEX) &&
     perf_missing_features.branch_hw_idx)
  return true;

 if (evsel->core.attr.sample_id_all && perf_missing_features.sample_id_all)
  return true;

 return false;
}

static int evsel__open_cpu(struct evsel *evsel, struct perf_cpu_map *cpus,
  struct perf_thread_map *threads,
  int start_cpu_map_idx, int end_cpu_map_idx)
{
 int idx, thread, nthreads;
 int pid = -1, err, old_errno;
 enum rlimit_action set_rlimit = NO_CHANGE;
 struct perf_cpu cpu;

 if (evsel__is_retire_lat(evsel))
  return evsel__tpebs_open(evsel);

 err = __evsel__prepare_open(evsel, cpus, threads);
 if (err)
  return err;

 if (cpus == NULL)
  cpus = empty_cpu_map;

 if (threads == NULL)
  threads = empty_thread_map;

 nthreads = perf_thread_map__nr(threads);

 if (evsel->cgrp)
  pid = evsel->cgrp->fd;

fallback_missing_features:
 evsel__disable_missing_features(evsel);

 pr_debug3("Opening: %s\n", evsel__name(evsel));
 display_attr(&evsel->core.attr);

 if (evsel__is_tool(evsel)) {
  return evsel__tool_pmu_open(evsel, threads,
         start_cpu_map_idx,
         end_cpu_map_idx);
 }
 if (evsel__is_hwmon(evsel)) {
  return evsel__hwmon_pmu_open(evsel, threads,
          start_cpu_map_idx,
          end_cpu_map_idx);
 }
 if (evsel__is_drm(evsel)) {
  return evsel__drm_pmu_open(evsel, threads,
        start_cpu_map_idx,
        end_cpu_map_idx);
 }

 for (idx = start_cpu_map_idx; idx < end_cpu_map_idx; idx++) {
  cpu = perf_cpu_map__cpu(cpus, idx);

  for (thread = 0; thread < nthreads; thread++) {
   int fd, group_fd;
retry_open:
   if (thread >= nthreads)
    break;

   if (!evsel->cgrp && !evsel->core.system_wide)
    pid = perf_thread_map__pid(threads, thread);

   group_fd = get_group_fd(evsel, idx, thread);

   if (group_fd == -2) {
    pr_debug("broken group leader for %s\n", evsel->name);
    err = -EINVAL;
    goto out_close;
   }

   /* Debug message used by test scripts */
   pr_debug2_peo("sys_perf_event_open: pid %d  cpu %d  group_fd %d  flags %#lx",
    pid, cpu.cpu, group_fd, evsel->open_flags);

   fd = sys_perf_event_open(&evsel->core.attr, pid, cpu.cpu,
      group_fd, evsel->open_flags);

   FD(evsel, idx, thread) = fd;

   if (fd < 0) {
    err = -errno;

    pr_debug2_peo("\nsys_perf_event_open failed, error %d\n",
       err);
    goto try_fallback;
   }

   bpf_counter__install_pe(evsel, idx, fd);

   if (unlikely(test_attr__enabled())) {
    test_attr__open(&evsel->core.attr, pid, cpu,
      fd, group_fd, evsel->open_flags);
   }

   /* Debug message used by test scripts */
   pr_debug2_peo(" = %d\n", fd);

   if (evsel->bpf_fd >= 0) {
    int evt_fd = fd;
    int bpf_fd = evsel->bpf_fd;

    err = ioctl(evt_fd,
         PERF_EVENT_IOC_SET_BPF,
         bpf_fd);
    if (err && errno != EEXIST) {
     pr_err("failed to attach bpf fd %d: %s\n",
            bpf_fd, strerror(errno));
     err = -EINVAL;
     goto out_close;
    }
   }

   set_rlimit = NO_CHANGE;

   /*
 * If we succeeded but had to kill clockid, fail and
 * have evsel__open_strerror() print us a nice error.
 */
   if (perf_missing_features.clockid ||
       perf_missing_features.clockid_wrong) {
    err = -EINVAL;
    goto out_close;
   }
  }
 }

 return 0;

try_fallback:
 if (evsel__ignore_missing_thread(evsel, perf_cpu_map__nr(cpus),
      idx, threads, thread, err)) {
  /* We just removed 1 thread, so lower the upper nthreads limit. */
  nthreads--;

  /* ... and pretend like nothing have happened. */
  err = 0;
  goto retry_open;
 }
 /*
 * perf stat needs between 5 and 22 fds per CPU. When we run out
 * of them try to increase the limits.
 */
 if (err == -EMFILE && rlimit__increase_nofile(&set_rlimit))
  goto retry_open;

 if (err == -EINVAL && evsel__detect_missing_features(evsel, cpu))
  goto fallback_missing_features;

 if (evsel__precise_ip_fallback(evsel))
  goto retry_open;

out_close:
 if (err)
  threads->err_thread = thread;

 old_errno = errno;
 do {
  while (--thread >= 0) {
   if (FD(evsel, idx, thread) >= 0)
    close(FD(evsel, idx, thread));
   FD(evsel, idx, thread) = -1;
  }
  thread = nthreads;
 } while (--idx >= 0);
 errno = old_errno;
 return err;
}

int evsel__open(struct evsel *evsel, struct perf_cpu_map *cpus,
  struct perf_thread_map *threads)
{
 return evsel__open_cpu(evsel, cpus, threads, 0, perf_cpu_map__nr(cpus));
}

void evsel__close(struct evsel *evsel)
{
 if (evsel__is_retire_lat(evsel))
  evsel__tpebs_close(evsel);
 perf_evsel__close(&evsel->core);
 perf_evsel__free_id(&evsel->core);
}

int evsel__open_per_cpu_and_thread(struct evsel *evsel,
       struct perf_cpu_map *cpus, int cpu_map_idx,
       struct perf_thread_map *threads)
{
 if (cpu_map_idx == -1)
  return evsel__open_cpu(evsel, cpus, threads, 0, perf_cpu_map__nr(cpus));

 return evsel__open_cpu(evsel, cpus, threads, cpu_map_idx, cpu_map_idx + 1);
}

int evsel__open_per_cpu(struct evsel *evsel, struct perf_cpu_map *cpus, int cpu_map_idx)
{
 struct perf_thread_map *threads = thread_map__new_by_tid(-1);
 int ret = evsel__open_per_cpu_and_thread(evsel, cpus, cpu_map_idx, threads);

 perf_thread_map__put(threads);
 return ret;
}

int evsel__open_per_thread(struct evsel *evsel, struct perf_thread_map *threads)
{
 struct perf_cpu_map *cpus = perf_cpu_map__new_any_cpu();
 int ret = evsel__open_per_cpu_and_thread(evsel, cpus, -1, threads);

 perf_cpu_map__put(cpus);
 return ret;
}

static int perf_evsel__parse_id_sample(const struct evsel *evsel,
           const union perf_event *event,
           struct perf_sample *sample)
{
 u64 type = evsel->core.attr.sample_type;
 const __u64 *array = event->sample.array;
 bool swapped = evsel->needs_swap;
 union u64_swap u;

 array += ((event->header.size -
     sizeof(event->header)) / sizeof(u64)) - 1;

 if (type & PERF_SAMPLE_IDENTIFIER) {
  sample->id = *array;
  array--;
 }

 if (type & PERF_SAMPLE_CPU) {
  u.val64 = *array;
  if (swapped) {
   /* undo swap of u64, then swap on individual u32s */
   u.val64 = bswap_64(u.val64);
   u.val32[0] = bswap_32(u.val32[0]);
  }

  sample->cpu = u.val32[0];
  array--;
 }

 if (type & PERF_SAMPLE_STREAM_ID) {
  sample->stream_id = *array;
  array--;
 }

 if (type & PERF_SAMPLE_ID) {
  sample->id = *array;
  array--;
 }

 if (type & PERF_SAMPLE_TIME) {
  sample->time = *array;
  array--;
 }

 if (type & PERF_SAMPLE_TID) {
  u.val64 = *array;
  if (swapped) {
   /* undo swap of u64, then swap on individual u32s */
   u.val64 = bswap_64(u.val64);
   u.val32[0] = bswap_32(u.val32[0]);
   u.val32[1] = bswap_32(u.val32[1]);
  }

  sample->pid = u.val32[0];
  sample->tid = u.val32[1];
  array--;
 }

 return 0;
}

static inline bool overflow(const void *endp, u16 max_size, const void *offset,
       u64 size)
{
 return size > max_size || offset + size > endp;
}

#define OVERFLOW_CHECK(offset, size, max_size)    \
 do {        \
  if (overflow(endp, (max_size), (offset), (size))) \
   return -EFAULT;     \
 } while (0)

#define OVERFLOW_CHECK_u64(offset) \
 OVERFLOW_CHECK(offset, sizeof(u64), sizeof(u64))

static int
perf_event__check_size(union perf_event *event, unsigned int sample_size)
{
 /*
 * The evsel's sample_size is based on PERF_SAMPLE_MASK which includes
 * up to PERF_SAMPLE_PERIOD.  After that overflow() must be used to
 * check the format does not go past the end of the event.
 */
 if (sample_size + sizeof(event->header) > event->header.size)
  return -EFAULT;

 return 0;
}

static void perf_parse_sample_weight(struct perf_sample *data, const __u64 *array, u64 type)
{
 union perf_sample_weight weight;

 weight.full = *array;
 if (type & PERF_SAMPLE_WEIGHT_STRUCT) {
  data->weight = weight.var1_dw;
  data->ins_lat = weight.var2_w;
  data->weight3 = weight.var3_w;
 } else {
  data->weight = weight.full;
 }
}

u64 evsel__bitfield_swap_branch_flags(u64 value)
{
 u64 new_val = 0;

 /*
 * branch_flags
 * union {
 *  u64 values;
 *  struct {
 *  mispred:1 //target mispredicted
 *  predicted:1 //target predicted
 *  in_tx:1 //in transaction
 *  abort:1 //transaction abort
 *  cycles:16 //cycle count to last branch
 *  type:4 //branch type
 *  spec:2 //branch speculation info
 *  new_type:4 //additional branch type
 *  priv:3 //privilege level
 *  reserved:31
 *  }
 * }
 *
 * Avoid bswap64() the entire branch_flag.value,
 * as it has variable bit-field sizes. Instead the
 * macro takes the bit-field position/size,
 * swaps it based on the host endianness.
 */
 if (host_is_bigendian()) {
  new_val = bitfield_swap(value, 0, 1);
  new_val |= bitfield_swap(value, 1, 1);
  new_val |= bitfield_swap(value, 2, 1);
  new_val |= bitfield_swap(value, 3, 1);
  new_val |= bitfield_swap(value, 4, 16);
  new_val |= bitfield_swap(value, 20, 4);
  new_val |= bitfield_swap(value, 24, 2);
  new_val |= bitfield_swap(value, 26, 4);
  new_val |= bitfield_swap(value, 30, 3);
  new_val |= bitfield_swap(value, 33, 31);
 } else {
  new_val = bitfield_swap(value, 63, 1);
  new_val |= bitfield_swap(value, 62, 1);
  new_val |= bitfield_swap(value, 61, 1);
  new_val |= bitfield_swap(value, 60, 1);
  new_val |= bitfield_swap(value, 44, 16);
  new_val |= bitfield_swap(value, 40, 4);
  new_val |= bitfield_swap(value, 38, 2);
  new_val |= bitfield_swap(value, 34, 4);
  new_val |= bitfield_swap(value, 31, 3);
  new_val |= bitfield_swap(value, 0, 31);
 }

 return new_val;
}

static inline bool evsel__has_branch_counters(const struct evsel *evsel)
{
 struct evsel *leader = evsel__leader(evsel);

 /* The branch counters feature only supports group */
 if (!leader || !evsel->evlist)
  return false;

 if (evsel->evlist->nr_br_cntr < 0)
  evlist__update_br_cntr(evsel->evlist);

 if (leader->br_cntr_nr > 0)
  return true;

 return false;
}

static int __set_offcpu_sample(struct perf_sample *data)
{
 u64 *array = data->raw_data;
 u32 max_size = data->raw_size, *p32;
 const void *endp = (void *)array + max_size;

 if (array == NULL)
  return -EFAULT;

 OVERFLOW_CHECK_u64(array);
 p32 = (void *)array++;
 data->pid = p32[0];
 data->tid = p32[1];

 OVERFLOW_CHECK_u64(array);
 data->period = *array++;

 OVERFLOW_CHECK_u64(array);
 data->callchain = (struct ip_callchain *)array++;
 OVERFLOW_CHECK(array, data->callchain->nr * sizeof(u64), max_size);
 data->ip = data->callchain->ips[1];
 array += data->callchain->nr;

 OVERFLOW_CHECK_u64(array);
 data->cgroup = *array;

 return 0;
}

int evsel__parse_sample(struct evsel *evsel, union perf_event *event,
   struct perf_sample *data)
{
 u64 type = evsel->core.attr.sample_type;
 bool swapped = evsel->needs_swap;
 const __u64 *array;
 u16 max_size = event->header.size;
 const void *endp = (void *)event + max_size;
 u64 sz;

 /*
 * used for cross-endian analysis. See git commit 65014ab3
 * for why this goofiness is needed.
 */
 union u64_swap u;

 memset(data, 0, sizeof(*data));
 data->cpu = data->pid = data->tid = -1;
 data->stream_id = data->id = data->time = -1ULL;
 data->period = evsel->core.attr.sample_period;
 data->cpumode = event->header.misc & PERF_RECORD_MISC_CPUMODE_MASK;
 data->misc    = event->header.misc;
 data->data_src = PERF_MEM_DATA_SRC_NONE;
 data->vcpu = -1;

 if (event->header.type != PERF_RECORD_SAMPLE) {
  if (!evsel->core.attr.sample_id_all)
   return 0;
  return perf_evsel__parse_id_sample(evsel, event, data);
 }

 array = event->sample.array;

 if (perf_event__check_size(event, evsel->sample_size))
  return -EFAULT;

 if (type & PERF_SAMPLE_IDENTIFIER) {
  data->id = *array;
  array++;
 }

 if (type & PERF_SAMPLE_IP) {
  data->ip = *array;
  array++;
 }

 if (type & PERF_SAMPLE_TID) {
  u.val64 = *array;
  if (swapped) {
   /* undo swap of u64, then swap on individual u32s */
   u.val64 = bswap_64(u.val64);
   u.val32[0] = bswap_32(u.val32[0]);
   u.val32[1] = bswap_32(u.val32[1]);
  }

  data->pid = u.val32[0];
  data->tid = u.val32[1];
  array++;
 }

 if (type & PERF_SAMPLE_TIME) {
  data->time = *array;
  array++;
 }

 if (type & PERF_SAMPLE_ADDR) {
  data->addr = *array;
  array++;
 }

 if (type & PERF_SAMPLE_ID) {
  data->id = *array;
  array++;
 }

 if (type & PERF_SAMPLE_STREAM_ID) {
  data->stream_id = *array;
  array++;
 }

 if (type & PERF_SAMPLE_CPU) {

  u.val64 = *array;
  if (swapped) {
   /* undo swap of u64, then swap on individual u32s */
   u.val64 = bswap_64(u.val64);
   u.val32[0] = bswap_32(u.val32[0]);
  }

  data->cpu = u.val32[0];
  array++;
 }

 if (type & PERF_SAMPLE_PERIOD) {
  data->period = *array;
  array++;
 }

 if (type & PERF_SAMPLE_READ) {
  u64 read_format = evsel->core.attr.read_format;

  OVERFLOW_CHECK_u64(array);
  if (read_format & PERF_FORMAT_GROUP)
   data->read.group.nr = *array;
  else
   data->read.one.value = *array;

  array++;

  if (read_format & PERF_FORMAT_TOTAL_TIME_ENABLED) {
   OVERFLOW_CHECK_u64(array);
   data->read.time_enabled = *array;
   array++;
  }

  if (read_format & PERF_FORMAT_TOTAL_TIME_RUNNING) {
   OVERFLOW_CHECK_u64(array);
   data->read.time_running = *array;
   array++;
  }

  /* PERF_FORMAT_ID is forced for PERF_SAMPLE_READ */
  if (read_format & PERF_FORMAT_GROUP) {
   const u64 max_group_nr = UINT64_MAX /
     sizeof(struct sample_read_value);

   if (data->read.group.nr > max_group_nr)
    return -EFAULT;

   sz = data->read.group.nr * sample_read_value_size(read_format);
   OVERFLOW_CHECK(array, sz, max_size);
   data->read.group.values =
     (struct sample_read_value *)array;
   array = (void *)array + sz;
  } else {
   OVERFLOW_CHECK_u64(array);
   data->read.one.id = *array;
   array++;

   if (read_format & PERF_FORMAT_LOST) {
    OVERFLOW_CHECK_u64(array);
    data->read.one.lost = *array;
    array++;
   }
  }
 }

 if (type & PERF_SAMPLE_CALLCHAIN) {
  const u64 max_callchain_nr = UINT64_MAX / sizeof(u64);

  OVERFLOW_CHECK_u64(array);
  data->callchain = (struct ip_callchain *)array++;
  if (data->callchain->nr > max_callchain_nr)
   return -EFAULT;
  sz = data->callchain->nr * sizeof(u64);
  OVERFLOW_CHECK(array, sz, max_size);
  array = (void *)array + sz;
 }

 if (type & PERF_SAMPLE_RAW) {
  OVERFLOW_CHECK_u64(array);
  u.val64 = *array;

  /*
 * Undo swap of u64, then swap on individual u32s,
 * get the size of the raw area and undo all of the
 * swap. The pevent interface handles endianness by
 * itself.
 */
  if (swapped) {
   u.val64 = bswap_64(u.val64);
   u.val32[0] = bswap_32(u.val32[0]);
   u.val32[1] = bswap_32(u.val32[1]);
  }
  data->raw_size = u.val32[0];

  /*
 * The raw data is aligned on 64bits including the
 * u32 size, so it's safe to use mem_bswap_64.
 */
  if (swapped)
   mem_bswap_64((void *) array, data->raw_size);

  array = (void *)array + sizeof(u32);

  OVERFLOW_CHECK(array, data->raw_size, max_size);
  data->raw_data = (void *)array;
  array = (void *)array + data->raw_size;
 }

 if (type & PERF_SAMPLE_BRANCH_STACK) {
  const u64 max_branch_nr = UINT64_MAX /
       sizeof(struct branch_entry);
  struct branch_entry *e;
  unsigned int i;

  OVERFLOW_CHECK_u64(array);
  data->branch_stack = (struct branch_stack *)array++;

  if (data->branch_stack->nr > max_branch_nr)
   return -EFAULT;

  sz = data->branch_stack->nr * sizeof(struct branch_entry);
  if (evsel__has_branch_hw_idx(evsel)) {
   sz += sizeof(u64);
   e = &data->branch_stack->entries[0];
  } else {
   data->no_hw_idx = true;
   /*
 * if the PERF_SAMPLE_BRANCH_HW_INDEX is not applied,
 * only nr and entries[] will be output by kernel.
 */
   e = (struct branch_entry *)&data->branch_stack->hw_idx;
  }

  if (swapped) {
   /*
 * struct branch_flag does not have endian
 * specific bit field definition. And bswap
 * will not resolve the issue, since these
 * are bit fields.
 *
 * evsel__bitfield_swap_branch_flags() uses a
 * bitfield_swap macro to swap the bit position
 * based on the host endians.
 */
   for (i = 0; i < data->branch_stack->nr; i++, e++)
    e->flags.value = evsel__bitfield_swap_branch_flags(e->flags.value);
  }

  OVERFLOW_CHECK(array, sz, max_size);
  array = (void *)array + sz;

  if (evsel__has_branch_counters(evsel)) {
   data->branch_stack_cntr = (u64 *)array;
   sz = data->branch_stack->nr * sizeof(u64);

   OVERFLOW_CHECK(array, sz, max_size);
   array = (void *)array + sz;
  }
 }

 if (type & PERF_SAMPLE_REGS_USER) {
  struct regs_dump *regs = perf_sample__user_regs(data);

  OVERFLOW_CHECK_u64(array);
  regs->abi = *array;
  array++;

  if (regs->abi) {
   u64 mask = evsel->core.attr.sample_regs_user;

   sz = hweight64(mask) * sizeof(u64);
   OVERFLOW_CHECK(array, sz, max_size);
   regs->mask = mask;
   regs->regs = (u64 *)array;
   array = (void *)array + sz;
  }
 }

 if (type & PERF_SAMPLE_STACK_USER) {
  OVERFLOW_CHECK_u64(array);
  sz = *array++;

  data->user_stack.offset = ((char *)(array - 1)
       - (char *) event);

  if (!sz) {
   data->user_stack.size = 0;
  } else {
   OVERFLOW_CHECK(array, sz, max_size);
   data->user_stack.data = (char *)array;
   array = (void *)array + sz;
   OVERFLOW_CHECK_u64(array);
   data->user_stack.size = *array++;
   if (WARN_ONCE(data->user_stack.size > sz,
          "user stack dump failure\n"))
    return -EFAULT;
  }
 }

 if (type & PERF_SAMPLE_WEIGHT_TYPE) {
  OVERFLOW_CHECK_u64(array);
  perf_parse_sample_weight(data, array, type);
  array++;
 }

 if (type & PERF_SAMPLE_DATA_SRC) {
  OVERFLOW_CHECK_u64(array);
  data->data_src = *array;
  array++;
 }

 if (type & PERF_SAMPLE_TRANSACTION) {
  OVERFLOW_CHECK_u64(array);
  data->transaction = *array;
  array++;
 }

 if (type & PERF_SAMPLE_REGS_INTR) {
  struct regs_dump *regs = perf_sample__intr_regs(data);

  OVERFLOW_CHECK_u64(array);
  regs->abi = *array;
  array++;

  if (regs->abi != PERF_SAMPLE_REGS_ABI_NONE) {
   u64 mask = evsel->core.attr.sample_regs_intr;

   sz = hweight64(mask) * sizeof(u64);
   OVERFLOW_CHECK(array, sz, max_size);
   regs->mask = mask;
   regs->regs = (u64 *)array;
   array = (void *)array + sz;
  }
 }

 data->phys_addr = 0;
 if (type & PERF_SAMPLE_PHYS_ADDR) {
  data->phys_addr = *array;
  array++;
 }

 data->cgroup = 0;
 if (type & PERF_SAMPLE_CGROUP) {
  data->cgroup = *array;
  array++;
 }

 data->data_page_size = 0;
 if (type & PERF_SAMPLE_DATA_PAGE_SIZE) {
  data->data_page_size = *array;
  array++;
 }

 data->code_page_size = 0;
 if (type & PERF_SAMPLE_CODE_PAGE_SIZE) {
  data->code_page_size = *array;
  array++;
 }

 if (type & PERF_SAMPLE_AUX) {
  OVERFLOW_CHECK_u64(array);
  sz = *array++;

  OVERFLOW_CHECK(array, sz, max_size);
  /* Undo swap of data */
  if (swapped)
   mem_bswap_64((char *)array, sz);
  data->aux_sample.size = sz;
  data->aux_sample.data = (char *)array;
  array = (void *)array + sz;
 }

 if (evsel__is_offcpu_event(evsel))
  return __set_offcpu_sample(data);

 return 0;
}

int evsel__parse_sample_timestamp(struct evsel *evsel, union perf_event *event,
      u64 *timestamp)
{
 u64 type = evsel->core.attr.sample_type;
 const __u64 *array;

 if (!(type & PERF_SAMPLE_TIME))
  return -1;

 if (event->header.type != PERF_RECORD_SAMPLE) {
  struct perf_sample data = {
   .time = -1ULL,
  };

  if (!evsel->core.attr.sample_id_all)
   return -1;
  if (perf_evsel__parse_id_sample(evsel, event, &data))
   return -1;

  *timestamp = data.time;
  return 0;
 }

 array = event->sample.array;

 if (perf_event__check_size(event, evsel->sample_size))
  return -EFAULT;

 if (type & PERF_SAMPLE_IDENTIFIER)
  array++;

 if (type & PERF_SAMPLE_IP)
  array++;

 if (type & PERF_SAMPLE_TID)
  array++;

 if (type & PERF_SAMPLE_TIME)
  *timestamp = *array;

 return 0;
}

u16 evsel__id_hdr_size(const struct evsel *evsel)
{
 u64 sample_type = evsel->core.attr.sample_type;
 u16 size = 0;

 if (sample_type & PERF_SAMPLE_TID)
  size += sizeof(u64);

 if (sample_type & PERF_SAMPLE_TIME)
  size += sizeof(u64);

 if (sample_type & PERF_SAMPLE_ID)
  size += sizeof(u64);

 if (sample_type & PERF_SAMPLE_STREAM_ID)
  size += sizeof(u64);

 if (sample_type & PERF_SAMPLE_CPU)
  size += sizeof(u64);

 if (sample_type & PERF_SAMPLE_IDENTIFIER)
  size += sizeof(u64);

 return size;
}

#ifdef HAVE_LIBTRACEEVENT
struct tep_format_field *evsel__field(struct evsel *evsel, const char *name)
{
 struct tep_event *tp_format = evsel__tp_format(evsel);

 return tp_format ? tep_find_field(tp_format, name) : NULL;
}

struct tep_format_field *evsel__common_field(struct evsel *evsel, const char *name)
{
 struct tep_event *tp_format = evsel__tp_format(evsel);

 return tp_format ? tep_find_common_field(tp_format, name) : NULL;
}

void *evsel__rawptr(struct evsel *evsel, struct perf_sample *sample, const char *name)
{
 struct tep_format_field *field = evsel__field(evsel, name);
 int offset;

 if (!field)
  return NULL;

 offset = field->offset;

 if (field->flags & TEP_FIELD_IS_DYNAMIC) {
  offset = *(int *)(sample->raw_data + field->offset);
  offset &= 0xffff;
  if (tep_field_is_relative(field->flags))
   offset += field->offset + field->size;
 }

 return sample->raw_data + offset;
}

u64 format_field__intval(struct tep_format_field *field, struct perf_sample *sample,
    bool needs_swap)
{
 u64 value;
 void *ptr = sample->raw_data + field->offset;

 switch (field->size) {
 case 1:
  return *(u8 *)ptr;
 case 2:
  value = *(u16 *)ptr;
  break;
 case 4:
  value = *(u32 *)ptr;
  break;
 case 8:
  memcpy(&value, ptr, sizeof(u64));
  break;
 default:
  return 0;
 }

 if (!needs_swap)
  return value;

 switch (field->size) {
 case 2:
  return bswap_16(value);
 case 4:
  return bswap_32(value);
 case 8:
  return bswap_64(value);
 default:
  return 0;
 }

 return 0;
}

u64 evsel__intval(struct evsel *evsel, struct perf_sample *sample, const char *name)
{
 struct tep_format_field *field = evsel__field(evsel, name);

 return field ? format_field__intval(field, sample, evsel->needs_swap) : 0;
}

u64 evsel__intval_common(struct evsel *evsel, struct perf_sample *sample, const char *name)
{
 struct tep_format_field *field = evsel__common_field(evsel, name);

 return field ? format_field__intval(field, sample, evsel->needs_swap) : 0;
}

char evsel__taskstate(struct evsel *evsel, struct perf_sample *sample, const char *name)
{
 static struct tep_format_field *prev_state_field;
 static const char *states;
 struct tep_format_field *field;
 unsigned long long val;
 unsigned int bit;
 char state = '?'; /* '?' denotes unknown task state */

 field = evsel__field(evsel, name);

 if (!field)
  return state;

 if (!states || field != prev_state_field) {
  states = parse_task_states(field);
  if (!states)
   return state;
  prev_state_field = field;
 }

 /*
 * Note since the kernel exposes TASK_REPORT_MAX to userspace
 * to denote the 'preempted' state, we might as welll report
 * 'R' for this case, which make senses to users as well.
 *
 * We can change this if we have a good reason in the future.
 */
 val = evsel__intval(evsel, sample, name);
 bit = val ? ffs(val) : 0;
 state = (!bit || bit > strlen(states)) ? 'R' : states[bit-1];
 return state;
}
#endif

bool evsel__fallback(struct evsel *evsel, struct target *target, int err,
       char *msg, size_t msgsize)
{
 int paranoid;

 if ((err == ENOENT || err == ENXIO || err == ENODEV) &&
     evsel->core.attr.type   == PERF_TYPE_HARDWARE &&
     evsel->core.attr.config == PERF_COUNT_HW_CPU_CYCLES) {
  /*
 * If it's cycles then fall back to hrtimer based cpu-clock sw
 * counter, which is always available even if no PMU support.
 *
 * PPC returns ENXIO until 2.6.37 (behavior changed with commit
 * b0a873e).
 */
  evsel->core.attr.type   = PERF_TYPE_SOFTWARE;
  evsel->core.attr.config = target__has_cpu(target)
   ? PERF_COUNT_SW_CPU_CLOCK
   : PERF_COUNT_SW_TASK_CLOCK;
  scnprintf(msg, msgsize,
   "The cycles event is not supported, trying to fall back to %s",
   target__has_cpu(target) ? "cpu-clock" : "task-clock");

  zfree(&evsel->name);
  return true;
 } else if (err == EACCES && !evsel->core.attr.exclude_kernel &&
     (paranoid = perf_event_paranoid()) > 1) {
  const char *name = evsel__name(evsel);
  char *new_name;
  const char *sep = ":";

  /* If event has exclude user then don't exclude kernel. */
  if (evsel->core.attr.exclude_user)
   goto no_fallback;

  /* Is there already the separator in the name. */
  if (strchr(name, '/') ||
      (strchr(name, ':') && !evsel->is_libpfm_event))
   sep = "";

  if (asprintf(&new_name, "%s%su", name, sep) < 0)
   goto no_fallback;

  free(evsel->name);
  evsel->name = new_name;
  scnprintf(msg, msgsize, "kernel.perf_event_paranoid=%d, trying "
     "to fall back to excluding kernel and hypervisor "
     " samples", paranoid);
  evsel->core.attr.exclude_kernel = 1;
  evsel->core.attr.exclude_hv     = 1;

  return true;
 } else if (err == EOPNOTSUPP && !evsel->core.attr.exclude_guest &&
     !evsel->exclude_GH) {
  const char *name = evsel__name(evsel);
  char *new_name;
  const char *sep = ":";

  /* Is there already the separator in the name. */
  if (strchr(name, '/') ||
      (strchr(name, ':') && !evsel->is_libpfm_event))
   sep = "";

  if (asprintf(&new_name, "%s%sH", name, sep) < 0)
   goto no_fallback;

  free(evsel->name);
  evsel->name = new_name;
  /* Apple M1 requires exclude_guest */
  scnprintf(msg, msgsize, "Trying to fall back to excluding guest samples");
  evsel->core.attr.exclude_guest = 1;

  return true;
 }
no_fallback:
 scnprintf(msg, msgsize, "No fallback found for '%s' for error %d",
    evsel__name(evsel), err);
 return false;
}

static bool find_process(const char *name)
{
 size_t len = strlen(name);
 DIR *dir;
 struct dirent *d;
 int ret = -1;

 dir = opendir(procfs__mountpoint());
 if (!dir)
  return false;

 /* Walk through the directory. */
 while (ret && (d = readdir(dir)) != NULL) {
  char path[PATH_MAX];
  char *data;
  size_t size;

  if ((d->d_type != DT_DIR) ||
       !strcmp(".", d->d_name) ||
       !strcmp("..", d->d_name))
   continue;

  scnprintf(path, sizeof(path), "%s/%s/comm",
     procfs__mountpoint(), d->d_name);

  if (filename__read_str(path, &data, &size))
   continue;

  ret = strncmp(name, data, len);
  free(data);
 }

 closedir(dir);
 return ret ? false : true;
}

static int dump_perf_event_processes(char *msg, size_t size)
{
 DIR *proc_dir;
 struct dirent *proc_entry;
 int printed = 0;

 proc_dir = opendir(procfs__mountpoint());
 if (!proc_dir)
  return 0;

 /* Walk through the /proc directory. */
 while ((proc_entry = readdir(proc_dir)) != NULL) {
  char buf[256];
  DIR *fd_dir;
  struct dirent *fd_entry;
  int fd_dir_fd;

  if (proc_entry->d_type != DT_DIR ||
      !isdigit(proc_entry->d_name[0]) ||
      strlen(proc_entry->d_name) > sizeof(buf) - 4)
   continue;

  scnprintf(buf, sizeof(buf), "%s/fd", proc_entry->d_name);
  fd_dir_fd = openat(dirfd(proc_dir), buf, O_DIRECTORY);
  if (fd_dir_fd == -1)
   continue;
  fd_dir = fdopendir(fd_dir_fd);
  if (!fd_dir) {
   close(fd_dir_fd);
   continue;
  }
  while ((fd_entry = readdir(fd_dir)) != NULL) {
   ssize_t link_size;

   if (fd_entry->d_type != DT_LNK)
    continue;
   link_size = readlinkat(fd_dir_fd, fd_entry->d_name, buf, sizeof(buf));
   if (link_size < 0)
    continue;
   /* Take care as readlink doesn't null terminate the string. */
   if (!strncmp(buf, "anon_inode:[perf_event]", link_size)) {
    int cmdline_fd;
    ssize_t cmdline_size;

    scnprintf(buf, sizeof(buf), "%s/cmdline", proc_entry->d_name);
    cmdline_fd = openat(dirfd(proc_dir), buf, O_RDONLY);
    if (cmdline_fd == -1)
     continue;
    cmdline_size = read(cmdline_fd, buf, sizeof(buf) - 1);
    close(cmdline_fd);
    if (cmdline_size < 0)
     continue;
    buf[cmdline_size] = '\0';
    for (ssize_t i = 0; i < cmdline_size; i++) {
     if (buf[i] == '\0')
      buf[i] = ' ';
    }

    if (printed == 0)
     printed += scnprintf(msg, size, "Possible processes:\n");

    printed += scnprintf(msg + printed, size - printed,
      "%s %s\n", proc_entry->d_name, buf);
    break;
   }
  }
  closedir(fd_dir);
 }
 closedir(proc_dir);
 return printed;
}

int __weak arch_evsel__open_strerror(struct evsel *evsel __maybe_unused,
         char *msg __maybe_unused,
         size_t size __maybe_unused)
{
 return 0;
}

int evsel__open_strerror(struct evsel *evsel, struct target *target,
    int err, char *msg, size_t size)
{
 char sbuf[STRERR_BUFSIZE];
 int printed = 0, enforced = 0;
 int ret;

 switch (err) {
 case EPERM:
 case EACCES:
  printed += scnprintf(msg + printed, size - printed,
   "Access to performance monitoring and observability operations is limited.\n");

  if (!sysfs__read_int("fs/selinux/enforce", &enforced)) {
   if (enforced) {
    printed += scnprintf(msg + printed, size - printed,
     "Enforced MAC policy settings (SELinux) can limit access to performance\n"
     "monitoring and observability operations. Inspect system audit records for\n"
     "more perf_event access control information and adjusting the policy.\n");
   }
  }

  if (err == EPERM)
   printed += scnprintf(msg, size,
    "No permission to enable %s event.\n\n", evsel__name(evsel));

  return printed + scnprintf(msg + printed, size - printed,
   "Consider adjusting /proc/sys/kernel/perf_event_paranoid setting to open\n"
   "access to performance monitoring and observability operations for processes\n"
   "without CAP_PERFMON, CAP_SYS_PTRACE or CAP_SYS_ADMIN Linux capability.\n"
   "More information can be found at 'Perf events and tool security' document:\n"
   "https://www.kernel.org/doc/html/latest/admin-guide/perf-security.html\n"
   "perf_event_paranoid setting is %d:\n"
   "  -1: Allow use of (almost) all events by all users\n"
   "      Ignore mlock limit after perf_event_mlock_kb without CAP_IPC_LOCK\n"
   ">= 0: Disallow raw and ftrace function tracepoint access\n"
   ">= 1: Disallow CPU event access\n"
   ">= 2: Disallow kernel profiling\n"
   "To make the adjusted perf_event_paranoid setting permanent preserve it\n"
   "in /etc/sysctl.conf (e.g. kernel.perf_event_paranoid = <setting>)",
   perf_event_paranoid());
 case ENOENT:
  return scnprintf(msg, size, "The %s event is not supported.", evsel__name(evsel));
 case EMFILE:
  return scnprintf(msg, size, "%s",
    "Too many events are opened.\n"
    "Probably the maximum number of open file descriptors has been reached.\n"
    "Hint: Try again after reducing the number of events.\n"
    "Hint: Try increasing the limit with 'ulimit -n <limit>'");
 case ENOMEM:
  if (evsel__has_callchain(evsel) &&
      access("/proc/sys/kernel/perf_event_max_stack", F_OK) == 0)
   return scnprintf(msg, size,
      "Not enough memory to setup event with callchain.\n"
      "Hint: Try tweaking /proc/sys/kernel/perf_event_max_stack\n"
      "Hint: Current value: %d", sysctl__max_stack());
  break;
 case ENODEV:
  if (target->cpu_list)
   return scnprintf(msg, size, "%s",
  "No such device - did you specify an out-of-range profile CPU?");
  break;
 case EOPNOTSUPP:
  if (evsel->core.attr.sample_type & PERF_SAMPLE_BRANCH_STACK)
   return scnprintf(msg, size,
 "%s: PMU Hardware or event type doesn't support branch stack sampling.",
      evsel__name(evsel));
  if (evsel->core.attr.aux_output)
   return scnprintf(msg, size,
 "%s: PMU Hardware doesn't support 'aux_output' feature",
      evsel__name(evsel));
  if (evsel->core.attr.aux_action)
   return scnprintf(msg, size,
 "%s: PMU Hardware doesn't support 'aux_action' feature",
     evsel__name(evsel));
  if (evsel->core.attr.sample_period != 0)
   return scnprintf(msg, size,
 "%s: PMU Hardware doesn't support sampling/overflow-interrupts. Try 'perf stat'",
      evsel__name(evsel));
  if (evsel->core.attr.precise_ip)
   return scnprintf(msg, size, "%s",
 "\'precise\' request may not be supported. Try removing 'p' modifier.");
#if defined(__i386__) || defined(__x86_64__)
  if (evsel->core.attr.type == PERF_TYPE_HARDWARE)
   return scnprintf(msg, size, "%s",
 "No hardware sampling interrupt available.\n");
#endif
  if (!target__has_cpu(target))
   return scnprintf(msg, size,
 "Unsupported event (%s) in per-thread mode, enable system wide with '-a'.",
     evsel__name(evsel));
  break;
 case EBUSY:
  if (find_process("oprofiled"))
   return scnprintf(msg, size,
 "The PMU counters are busy/taken by another profiler.\n"
 "We found oprofile daemon running, please stop it and try again.");
  printed += scnprintf(
   msg, size,
   "The PMU %s counters are busy and in use by another process.\n",
   evsel->pmu ? evsel->pmu->name : "");
  return printed + dump_perf_event_processes(msg + printed, size - printed);
  break;
 case EINVAL:
  if (evsel->core.attr.sample_type & PERF_SAMPLE_CODE_PAGE_SIZE && perf_missing_features.code_page_size)
   return scnprintf(msg, size, "Asking for the code page size isn't supported by this kernel.");
  if (evsel->core.attr.sample_type & PERF_SAMPLE_DATA_PAGE_SIZE && perf_missing_features.data_page_size)
   return scnprintf(msg, size, "Asking for the data page size isn't supported by this kernel.");
  if (evsel->core.attr.write_backward && perf_missing_features.write_backward)
   return scnprintf(msg, size, "Reading from overwrite event is not supported by this kernel.");
  if (perf_missing_features.clockid)
   return scnprintf(msg, size, "clockid feature not supported.");
  if (perf_missing_features.clockid_wrong)
   return scnprintf(msg, size, "wrong clockid (%d).", clockid);
  if (perf_missing_features.aux_action)
   return scnprintf(msg, size, "The 'aux_action' feature is not supported, update the kernel.");
  if (perf_missing_features.aux_output)
   return scnprintf(msg, size, "The 'aux_output' feature is not supported, update the kernel.");
  if (!target__has_cpu(target))
   return scnprintf(msg, size,
 "Invalid event (%s) in per-thread mode, enable system wide with '-a'.",
     evsel__name(evsel));

  break;
 case ENODATA:
  return scnprintf(msg, size, "Cannot collect data source with the load latency event alone. "
     "Please add an auxiliary event in front of the load latency event.");
 default:
  break;
 }

 ret = arch_evsel__open_strerror(evsel, msg, size);
 if (ret)
  return ret;

 return scnprintf(msg, size,
 "The sys_perf_event_open() syscall returned with %d (%s) for event (%s).\n"
 "\"dmesg | grep -i perf\" may provide additional information.\n",
    err, str_error_r(err, sbuf, sizeof(sbuf)), evsel__name(evsel));
}

struct perf_session *evsel__session(struct evsel *evsel)
{
 return evsel && evsel->evlist ? evsel->evlist->session : NULL;
}

struct perf_env *evsel__env(struct evsel *evsel)
{
 struct perf_session *session = evsel__session(evsel);

 return session ? perf_session__env(session) : NULL;
}

static int store_evsel_ids(struct evsel *evsel, struct evlist *evlist)
{
 int cpu_map_idx, thread;

 if (evsel__is_retire_lat(evsel))
  return 0;

 for (cpu_map_idx = 0; cpu_map_idx < xyarray__max_x(evsel->core.fd); cpu_map_idx++) {
  for (thread = 0; thread < xyarray__max_y(evsel->core.fd);
       thread++) {
   int fd = FD(evsel, cpu_map_idx, thread);

   if (perf_evlist__id_add_fd(&evlist->core, &evsel->core,
         cpu_map_idx, thread, fd) < 0)
    return -1;
  }
 }

 return 0;
}

int evsel__store_ids(struct evsel *evsel, struct evlist *evlist)
{
 struct perf_cpu_map *cpus = evsel->core.cpus;
 struct perf_thread_map *threads = evsel->core.threads;

 if (perf_evsel__alloc_id(&evsel->core, perf_cpu_map__nr(cpus), threads->nr))
  return -ENOMEM;

 return store_evsel_ids(evsel, evlist);
}

void evsel__zero_per_pkg(struct evsel *evsel)
{
 struct hashmap_entry *cur;
 size_t bkt;

 if (evsel->per_pkg_mask) {
  hashmap__for_each_entry(evsel->per_pkg_mask, cur, bkt)
   zfree(&cur->pkey);

  hashmap__clear(evsel->per_pkg_mask);
 }
}

/**
 * evsel__is_hybrid - does the evsel have a known PMU that is hybrid. Note, this
 *                    will be false on hybrid systems for hardware and legacy
 *                    cache events.
 */
bool evsel__is_hybrid(const struct evsel *evsel)
{
 if (!evsel->core.is_pmu_core)
  return false;

 return perf_pmus__num_core_pmus() > 1;
}

struct evsel *evsel__leader(const struct evsel *evsel)
{
 if (evsel->core.leader == NULL)
  return NULL;
 return container_of(evsel->core.leader, struct evsel, core);
}

bool evsel__has_leader(struct evsel *evsel, struct evsel *leader)
{
 return evsel->core.leader == &leader->core;
}

bool evsel__is_leader(struct evsel *evsel)
{
 return evsel__has_leader(evsel, evsel);
}

void evsel__set_leader(struct evsel *evsel, struct evsel *leader)
{
 evsel->core.leader = &leader->core;
}

int evsel__source_count(const struct evsel *evsel)
{
 struct evsel *pos;
 int count = 0;

 evlist__for_each_entry(evsel->evlist, pos) {
  if (pos->metric_leader == evsel)
   count++;
 }
 return count;
}

bool __weak arch_evsel__must_be_in_group(const struct evsel *evsel __maybe_unused)
{
 return false;
}

/*
 * Remove an event from a given group (leader).
 * Some events, e.g., perf metrics Topdown events,
 * must always be grouped. Ignore the events.
 */
void evsel__remove_from_group(struct evsel *evsel, struct evsel *leader)
{
 if (!arch_evsel__must_be_in_group(evsel) && evsel != leader) {
  evsel__set_leader(evsel, evsel);
  evsel->core.nr_members = 0;
  leader->core.nr_members--;
 }
}

bool evsel__set_needs_uniquify(struct evsel *counter, const struct perf_stat_config *config)
{
 struct evsel *evsel;

 if (counter->needs_uniquify) {
  /* Already set. */
  return true;
 }

 if (counter->use_config_name || counter->is_libpfm_event) {
  /* Original name will be used. */
  return false;
 }

 if (!config->hybrid_merge && evsel__is_hybrid(counter)) {
  /* Unique hybrid counters necessary. */
  counter->needs_uniquify = true;
  return true;
 }

 if  (counter->core.attr.type < PERF_TYPE_MAX && counter->core.attr.type != PERF_TYPE_RAW) {
  /* Legacy event, don't uniquify. */
  return false;
 }

 if (counter->pmu && counter->pmu->is_core &&
     counter->alternate_hw_config != PERF_COUNT_HW_MAX) {
  /* A sysfs or json event replacing a legacy event, don't uniquify. */
  return false;
 }

 if (config->aggr_mode == AGGR_NONE) {
  /* Always unique with no aggregation. */
  counter->needs_uniquify = true;
  return true;
 }

 if (counter->first_wildcard_match != NULL) {
  /*
 * If stats are merged then only the first_wildcard_match is
 * displayed, there is no need to uniquify this evsel as the
 * name won't be shown.
 */
  return false;
 }

 /*
 * Do other non-merged events in the evlist have the same name? If so
 * uniquify is necessary.
 */
 evlist__for_each_entry(counter->evlist, evsel) {
  if (evsel == counter || evsel->first_wildcard_match || evsel->pmu == counter->pmu)
   continue;

  if (evsel__name_is(counter, evsel__name(evsel))) {
   counter->needs_uniquify = true;
   return true;
  }
 }
 return false;
}

void evsel__uniquify_counter(struct evsel *counter)
{
 const char *name, *pmu_name, *config;
 char *new_name;
 int len, ret;

 /* No uniquification necessary. */
 if (!counter->needs_uniquify)
  return;

 /* The evsel was already uniquified. */
 if (counter->uniquified_name)
  return;

 /* Avoid checking to uniquify twice. */
 counter->uniquified_name = true;

 name = evsel__name(counter);
 config = strchr(name, '/');
 pmu_name = counter->pmu->name;

 /* Already prefixed by the PMU name? */
 len = pmu_name_len_no_suffix(pmu_name);

 if (!strncmp(name, pmu_name, len)) {
  /*
 * If the PMU name is there, then there is no sense in not
 * having a slash. Do this for robustness.
 */
  if (config == NULL)
   config = name - 1;

  ret = asprintf(&new_name, "%s/%s", pmu_name, config + 1);
 } else if (config) {
  len = config - name;
  if (config[1] == '/') {
   /* case: event// */
   ret = asprintf(&new_name, "%s/%.*s/%s", pmu_name, len, name, config + 2);
  } else {
   /* case: event/.../ */
   ret = asprintf(&new_name, "%s/%.*s,%s", pmu_name, len, name, config + 1);
  }
 } else {
  config = strchr(name, ':');
  if (config) {
   /* case: event:.. */
   len = config - name;

   ret = asprintf(&new_name, "%s/%.*s/%s", pmu_name, len, name, config + 1);
  } else {
   /* case: event */
   ret = asprintf(&new_name, "%s/%s/", pmu_name, name);
  }
 }
 if (ret > 0) {
  free(counter->name);
  counter->name = new_name;
 } else {
  /* ENOMEM from asprintf. */
  counter->uniquified_name = false;
 }
}

void evsel__warn_user_requested_cpus(struct evsel *evsel, struct perf_cpu_map *user_requested_cpus)
{
 struct perf_cpu_map *intersect, *online = NULL;
 const struct perf_pmu *pmu = evsel__find_pmu(evsel);

 if (pmu && pmu->is_core) {
  intersect = perf_cpu_map__intersect(pmu->cpus, user_requested_cpus);
 } else {
  online = cpu_map__online();
  intersect = perf_cpu_map__intersect(online, user_requested_cpus);
 }
 if (!perf_cpu_map__equal(intersect, user_requested_cpus)) {
  char buf1[128];
  char buf2[128];

  cpu_map__snprint(user_requested_cpus, buf1, sizeof(buf1));
  cpu_map__snprint(online ?: pmu->cpus, buf2, sizeof(buf2));
  pr_warning("WARNING: A requested CPU in '%s' is not supported by PMU '%s' (CPUs %s) for event '%s'\n",
      buf1, pmu ? pmu->name : "cpu", buf2, evsel__name(evsel));
 }
 perf_cpu_map__put(intersect);
 perf_cpu_map__put(online);
}