430 lines
11 KiB
C
430 lines
11 KiB
C
// SPDX-License-Identifier: GPL-2.0
|
|
/*
|
|
* RISC-V performance counter support.
|
|
*
|
|
* Copyright (C) 2021 Western Digital Corporation or its affiliates.
|
|
*
|
|
* This implementation is based on old RISC-V perf and ARM perf event code
|
|
* which are in turn based on sparc64 and x86 code.
|
|
*/
|
|
|
|
#include <linux/cpumask.h>
|
|
#include <linux/irq.h>
|
|
#include <linux/irqdesc.h>
|
|
#include <linux/perf/riscv_pmu.h>
|
|
#include <linux/printk.h>
|
|
#include <linux/smp.h>
|
|
#include <linux/sched_clock.h>
|
|
|
|
#include <asm/sbi.h>
|
|
|
|
static bool riscv_perf_user_access(struct perf_event *event)
|
|
{
|
|
return ((event->attr.type == PERF_TYPE_HARDWARE) ||
|
|
(event->attr.type == PERF_TYPE_HW_CACHE) ||
|
|
(event->attr.type == PERF_TYPE_RAW)) &&
|
|
!!(event->hw.flags & PERF_EVENT_FLAG_USER_READ_CNT) &&
|
|
(event->hw.idx != -1);
|
|
}
|
|
|
|
void arch_perf_update_userpage(struct perf_event *event,
|
|
struct perf_event_mmap_page *userpg, u64 now)
|
|
{
|
|
struct clock_read_data *rd;
|
|
unsigned int seq;
|
|
u64 ns;
|
|
|
|
userpg->cap_user_time = 0;
|
|
userpg->cap_user_time_zero = 0;
|
|
userpg->cap_user_time_short = 0;
|
|
userpg->cap_user_rdpmc = riscv_perf_user_access(event);
|
|
|
|
#ifdef CONFIG_RISCV_PMU
|
|
/*
|
|
* The counters are 64-bit but the priv spec doesn't mandate all the
|
|
* bits to be implemented: that's why, counter width can vary based on
|
|
* the cpu vendor.
|
|
*/
|
|
if (userpg->cap_user_rdpmc)
|
|
userpg->pmc_width = to_riscv_pmu(event->pmu)->ctr_get_width(event->hw.idx) + 1;
|
|
#endif
|
|
|
|
do {
|
|
rd = sched_clock_read_begin(&seq);
|
|
|
|
userpg->time_mult = rd->mult;
|
|
userpg->time_shift = rd->shift;
|
|
userpg->time_zero = rd->epoch_ns;
|
|
userpg->time_cycles = rd->epoch_cyc;
|
|
userpg->time_mask = rd->sched_clock_mask;
|
|
|
|
/*
|
|
* Subtract the cycle base, such that software that
|
|
* doesn't know about cap_user_time_short still 'works'
|
|
* assuming no wraps.
|
|
*/
|
|
ns = mul_u64_u32_shr(rd->epoch_cyc, rd->mult, rd->shift);
|
|
userpg->time_zero -= ns;
|
|
|
|
} while (sched_clock_read_retry(seq));
|
|
|
|
userpg->time_offset = userpg->time_zero - now;
|
|
|
|
/*
|
|
* time_shift is not expected to be greater than 31 due to
|
|
* the original published conversion algorithm shifting a
|
|
* 32-bit value (now specifies a 64-bit value) - refer
|
|
* perf_event_mmap_page documentation in perf_event.h.
|
|
*/
|
|
if (userpg->time_shift == 32) {
|
|
userpg->time_shift = 31;
|
|
userpg->time_mult >>= 1;
|
|
}
|
|
|
|
/*
|
|
* Internal timekeeping for enabled/running/stopped times
|
|
* is always computed with the sched_clock.
|
|
*/
|
|
userpg->cap_user_time = 1;
|
|
userpg->cap_user_time_zero = 1;
|
|
userpg->cap_user_time_short = 1;
|
|
}
|
|
|
|
static unsigned long csr_read_num(int csr_num)
|
|
{
|
|
#define switchcase_csr_read(__csr_num, __val) {\
|
|
case __csr_num: \
|
|
__val = csr_read(__csr_num); \
|
|
break; }
|
|
#define switchcase_csr_read_2(__csr_num, __val) {\
|
|
switchcase_csr_read(__csr_num + 0, __val) \
|
|
switchcase_csr_read(__csr_num + 1, __val)}
|
|
#define switchcase_csr_read_4(__csr_num, __val) {\
|
|
switchcase_csr_read_2(__csr_num + 0, __val) \
|
|
switchcase_csr_read_2(__csr_num + 2, __val)}
|
|
#define switchcase_csr_read_8(__csr_num, __val) {\
|
|
switchcase_csr_read_4(__csr_num + 0, __val) \
|
|
switchcase_csr_read_4(__csr_num + 4, __val)}
|
|
#define switchcase_csr_read_16(__csr_num, __val) {\
|
|
switchcase_csr_read_8(__csr_num + 0, __val) \
|
|
switchcase_csr_read_8(__csr_num + 8, __val)}
|
|
#define switchcase_csr_read_32(__csr_num, __val) {\
|
|
switchcase_csr_read_16(__csr_num + 0, __val) \
|
|
switchcase_csr_read_16(__csr_num + 16, __val)}
|
|
|
|
unsigned long ret = 0;
|
|
|
|
switch (csr_num) {
|
|
switchcase_csr_read_32(CSR_CYCLE, ret)
|
|
switchcase_csr_read_32(CSR_CYCLEH, ret)
|
|
default :
|
|
break;
|
|
}
|
|
|
|
return ret;
|
|
#undef switchcase_csr_read_32
|
|
#undef switchcase_csr_read_16
|
|
#undef switchcase_csr_read_8
|
|
#undef switchcase_csr_read_4
|
|
#undef switchcase_csr_read_2
|
|
#undef switchcase_csr_read
|
|
}
|
|
|
|
/*
|
|
* Read the CSR of a corresponding counter.
|
|
*/
|
|
unsigned long riscv_pmu_ctr_read_csr(unsigned long csr)
|
|
{
|
|
if (csr < CSR_CYCLE || csr > CSR_HPMCOUNTER31H ||
|
|
(csr > CSR_HPMCOUNTER31 && csr < CSR_CYCLEH)) {
|
|
pr_err("Invalid performance counter csr %lx\n", csr);
|
|
return -EINVAL;
|
|
}
|
|
|
|
return csr_read_num(csr);
|
|
}
|
|
|
|
u64 riscv_pmu_ctr_get_width_mask(struct perf_event *event)
|
|
{
|
|
int cwidth;
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
struct hw_perf_event *hwc = &event->hw;
|
|
|
|
if (hwc->idx == -1)
|
|
/* Handle init case where idx is not initialized yet */
|
|
cwidth = rvpmu->ctr_get_width(0);
|
|
else
|
|
cwidth = rvpmu->ctr_get_width(hwc->idx);
|
|
|
|
return GENMASK_ULL(cwidth, 0);
|
|
}
|
|
|
|
u64 riscv_pmu_event_update(struct perf_event *event)
|
|
{
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
struct hw_perf_event *hwc = &event->hw;
|
|
u64 prev_raw_count, new_raw_count;
|
|
unsigned long cmask;
|
|
u64 oldval, delta;
|
|
|
|
if (!rvpmu->ctr_read)
|
|
return 0;
|
|
|
|
cmask = riscv_pmu_ctr_get_width_mask(event);
|
|
|
|
do {
|
|
prev_raw_count = local64_read(&hwc->prev_count);
|
|
new_raw_count = rvpmu->ctr_read(event);
|
|
oldval = local64_cmpxchg(&hwc->prev_count, prev_raw_count,
|
|
new_raw_count);
|
|
} while (oldval != prev_raw_count);
|
|
|
|
delta = (new_raw_count - prev_raw_count) & cmask;
|
|
local64_add(delta, &event->count);
|
|
local64_sub(delta, &hwc->period_left);
|
|
|
|
return delta;
|
|
}
|
|
|
|
void riscv_pmu_stop(struct perf_event *event, int flags)
|
|
{
|
|
struct hw_perf_event *hwc = &event->hw;
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
|
|
if (!(hwc->state & PERF_HES_STOPPED)) {
|
|
if (rvpmu->ctr_stop) {
|
|
rvpmu->ctr_stop(event, 0);
|
|
hwc->state |= PERF_HES_STOPPED;
|
|
}
|
|
riscv_pmu_event_update(event);
|
|
hwc->state |= PERF_HES_UPTODATE;
|
|
}
|
|
}
|
|
|
|
int riscv_pmu_event_set_period(struct perf_event *event)
|
|
{
|
|
struct hw_perf_event *hwc = &event->hw;
|
|
s64 left = local64_read(&hwc->period_left);
|
|
s64 period = hwc->sample_period;
|
|
int overflow = 0;
|
|
uint64_t max_period = riscv_pmu_ctr_get_width_mask(event);
|
|
|
|
if (unlikely(left <= -period)) {
|
|
left = period;
|
|
local64_set(&hwc->period_left, left);
|
|
hwc->last_period = period;
|
|
overflow = 1;
|
|
}
|
|
|
|
if (unlikely(left <= 0)) {
|
|
left += period;
|
|
local64_set(&hwc->period_left, left);
|
|
hwc->last_period = period;
|
|
overflow = 1;
|
|
}
|
|
|
|
/*
|
|
* Limit the maximum period to prevent the counter value
|
|
* from overtaking the one we are about to program. In
|
|
* effect we are reducing max_period to account for
|
|
* interrupt latency (and we are being very conservative).
|
|
*/
|
|
if (left > (max_period >> 1))
|
|
left = (max_period >> 1);
|
|
|
|
local64_set(&hwc->prev_count, (u64)-left);
|
|
|
|
perf_event_update_userpage(event);
|
|
|
|
return overflow;
|
|
}
|
|
|
|
void riscv_pmu_start(struct perf_event *event, int flags)
|
|
{
|
|
struct hw_perf_event *hwc = &event->hw;
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
uint64_t max_period = riscv_pmu_ctr_get_width_mask(event);
|
|
u64 init_val;
|
|
|
|
if (flags & PERF_EF_RELOAD)
|
|
WARN_ON_ONCE(!(event->hw.state & PERF_HES_UPTODATE));
|
|
|
|
hwc->state = 0;
|
|
riscv_pmu_event_set_period(event);
|
|
init_val = local64_read(&hwc->prev_count) & max_period;
|
|
rvpmu->ctr_start(event, init_val);
|
|
perf_event_update_userpage(event);
|
|
}
|
|
|
|
static int riscv_pmu_add(struct perf_event *event, int flags)
|
|
{
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
struct cpu_hw_events *cpuc = this_cpu_ptr(rvpmu->hw_events);
|
|
struct hw_perf_event *hwc = &event->hw;
|
|
int idx;
|
|
|
|
idx = rvpmu->ctr_get_idx(event);
|
|
if (idx < 0)
|
|
return idx;
|
|
|
|
hwc->idx = idx;
|
|
cpuc->events[idx] = event;
|
|
cpuc->n_events++;
|
|
hwc->state = PERF_HES_UPTODATE | PERF_HES_STOPPED;
|
|
if (flags & PERF_EF_START)
|
|
riscv_pmu_start(event, PERF_EF_RELOAD);
|
|
|
|
/* Propagate our changes to the userspace mapping. */
|
|
perf_event_update_userpage(event);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void riscv_pmu_del(struct perf_event *event, int flags)
|
|
{
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
struct cpu_hw_events *cpuc = this_cpu_ptr(rvpmu->hw_events);
|
|
struct hw_perf_event *hwc = &event->hw;
|
|
|
|
riscv_pmu_stop(event, PERF_EF_UPDATE);
|
|
cpuc->events[hwc->idx] = NULL;
|
|
/* The firmware need to reset the counter mapping */
|
|
if (rvpmu->ctr_stop)
|
|
rvpmu->ctr_stop(event, RISCV_PMU_STOP_FLAG_RESET);
|
|
cpuc->n_events--;
|
|
if (rvpmu->ctr_clear_idx)
|
|
rvpmu->ctr_clear_idx(event);
|
|
perf_event_update_userpage(event);
|
|
hwc->idx = -1;
|
|
}
|
|
|
|
static void riscv_pmu_read(struct perf_event *event)
|
|
{
|
|
riscv_pmu_event_update(event);
|
|
}
|
|
|
|
static int riscv_pmu_event_init(struct perf_event *event)
|
|
{
|
|
struct hw_perf_event *hwc = &event->hw;
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
int mapped_event;
|
|
u64 event_config = 0;
|
|
uint64_t cmask;
|
|
|
|
/* driver does not support branch stack sampling */
|
|
if (has_branch_stack(event))
|
|
return -EOPNOTSUPP;
|
|
|
|
hwc->flags = 0;
|
|
mapped_event = rvpmu->event_map(event, &event_config);
|
|
if (mapped_event < 0) {
|
|
pr_debug("event %x:%llx not supported\n", event->attr.type,
|
|
event->attr.config);
|
|
return mapped_event;
|
|
}
|
|
|
|
/*
|
|
* idx is set to -1 because the index of a general event should not be
|
|
* decided until binding to some counter in pmu->add().
|
|
* config will contain the information about counter CSR
|
|
* the idx will contain the counter index
|
|
*/
|
|
hwc->config = event_config;
|
|
hwc->idx = -1;
|
|
hwc->event_base = mapped_event;
|
|
|
|
if (rvpmu->event_init)
|
|
rvpmu->event_init(event);
|
|
|
|
if (!is_sampling_event(event)) {
|
|
/*
|
|
* For non-sampling runs, limit the sample_period to half
|
|
* of the counter width. That way, the new counter value
|
|
* is far less likely to overtake the previous one unless
|
|
* you have some serious IRQ latency issues.
|
|
*/
|
|
cmask = riscv_pmu_ctr_get_width_mask(event);
|
|
hwc->sample_period = cmask >> 1;
|
|
hwc->last_period = hwc->sample_period;
|
|
local64_set(&hwc->period_left, hwc->sample_period);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int riscv_pmu_event_idx(struct perf_event *event)
|
|
{
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
|
|
if (!(event->hw.flags & PERF_EVENT_FLAG_USER_READ_CNT))
|
|
return 0;
|
|
|
|
if (rvpmu->csr_index)
|
|
return rvpmu->csr_index(event) + 1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void riscv_pmu_event_mapped(struct perf_event *event, struct mm_struct *mm)
|
|
{
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
|
|
if (rvpmu->event_mapped) {
|
|
rvpmu->event_mapped(event, mm);
|
|
perf_event_update_userpage(event);
|
|
}
|
|
}
|
|
|
|
static void riscv_pmu_event_unmapped(struct perf_event *event, struct mm_struct *mm)
|
|
{
|
|
struct riscv_pmu *rvpmu = to_riscv_pmu(event->pmu);
|
|
|
|
if (rvpmu->event_unmapped) {
|
|
rvpmu->event_unmapped(event, mm);
|
|
perf_event_update_userpage(event);
|
|
}
|
|
}
|
|
|
|
struct riscv_pmu *riscv_pmu_alloc(void)
|
|
{
|
|
struct riscv_pmu *pmu;
|
|
int cpuid, i;
|
|
struct cpu_hw_events *cpuc;
|
|
|
|
pmu = kzalloc(sizeof(*pmu), GFP_KERNEL);
|
|
if (!pmu)
|
|
goto out;
|
|
|
|
pmu->hw_events = alloc_percpu_gfp(struct cpu_hw_events, GFP_KERNEL);
|
|
if (!pmu->hw_events) {
|
|
pr_info("failed to allocate per-cpu PMU data.\n");
|
|
goto out_free_pmu;
|
|
}
|
|
|
|
for_each_possible_cpu(cpuid) {
|
|
cpuc = per_cpu_ptr(pmu->hw_events, cpuid);
|
|
cpuc->n_events = 0;
|
|
for (i = 0; i < RISCV_MAX_COUNTERS; i++)
|
|
cpuc->events[i] = NULL;
|
|
cpuc->snapshot_addr = NULL;
|
|
}
|
|
pmu->pmu = (struct pmu) {
|
|
.event_init = riscv_pmu_event_init,
|
|
.event_mapped = riscv_pmu_event_mapped,
|
|
.event_unmapped = riscv_pmu_event_unmapped,
|
|
.event_idx = riscv_pmu_event_idx,
|
|
.add = riscv_pmu_add,
|
|
.del = riscv_pmu_del,
|
|
.start = riscv_pmu_start,
|
|
.stop = riscv_pmu_stop,
|
|
.read = riscv_pmu_read,
|
|
};
|
|
|
|
return pmu;
|
|
|
|
out_free_pmu:
|
|
kfree(pmu);
|
|
out:
|
|
return NULL;
|
|
}
|