1f2699491SMichael Ellerman /* 2f2699491SMichael Ellerman * Performance event support - powerpc architecture code 3f2699491SMichael Ellerman * 4f2699491SMichael Ellerman * Copyright 2008-2009 Paul Mackerras, IBM Corporation. 5f2699491SMichael Ellerman * 6f2699491SMichael Ellerman * This program is free software; you can redistribute it and/or 7f2699491SMichael Ellerman * modify it under the terms of the GNU General Public License 8f2699491SMichael Ellerman * as published by the Free Software Foundation; either version 9f2699491SMichael Ellerman * 2 of the License, or (at your option) any later version. 10f2699491SMichael Ellerman */ 11f2699491SMichael Ellerman #include <linux/kernel.h> 12f2699491SMichael Ellerman #include <linux/sched.h> 13f2699491SMichael Ellerman #include <linux/perf_event.h> 14f2699491SMichael Ellerman #include <linux/percpu.h> 15f2699491SMichael Ellerman #include <linux/hardirq.h> 1669123184SMichael Neuling #include <linux/uaccess.h> 17f2699491SMichael Ellerman #include <asm/reg.h> 18f2699491SMichael Ellerman #include <asm/pmc.h> 19f2699491SMichael Ellerman #include <asm/machdep.h> 20f2699491SMichael Ellerman #include <asm/firmware.h> 21f2699491SMichael Ellerman #include <asm/ptrace.h> 2269123184SMichael Neuling #include <asm/code-patching.h> 23f2699491SMichael Ellerman 243925f46bSAnshuman Khandual #define BHRB_MAX_ENTRIES 32 253925f46bSAnshuman Khandual #define BHRB_TARGET 0x0000000000000002 263925f46bSAnshuman Khandual #define BHRB_PREDICTION 0x0000000000000001 273925f46bSAnshuman Khandual #define BHRB_EA 0xFFFFFFFFFFFFFFFC 283925f46bSAnshuman Khandual 29f2699491SMichael Ellerman struct cpu_hw_events { 30f2699491SMichael Ellerman int n_events; 31f2699491SMichael Ellerman int n_percpu; 32f2699491SMichael Ellerman int disabled; 33f2699491SMichael Ellerman int n_added; 34f2699491SMichael Ellerman int n_limited; 35f2699491SMichael Ellerman u8 pmcs_enabled; 36f2699491SMichael Ellerman struct perf_event *event[MAX_HWEVENTS]; 37f2699491SMichael Ellerman u64 events[MAX_HWEVENTS]; 38f2699491SMichael Ellerman unsigned int flags[MAX_HWEVENTS]; 39f2699491SMichael Ellerman unsigned long mmcr[3]; 40f2699491SMichael Ellerman struct perf_event *limited_counter[MAX_LIMITED_HWCOUNTERS]; 41f2699491SMichael Ellerman u8 limited_hwidx[MAX_LIMITED_HWCOUNTERS]; 42f2699491SMichael Ellerman u64 alternatives[MAX_HWEVENTS][MAX_EVENT_ALTERNATIVES]; 43f2699491SMichael Ellerman unsigned long amasks[MAX_HWEVENTS][MAX_EVENT_ALTERNATIVES]; 44f2699491SMichael Ellerman unsigned long avalues[MAX_HWEVENTS][MAX_EVENT_ALTERNATIVES]; 45f2699491SMichael Ellerman 46f2699491SMichael Ellerman unsigned int group_flag; 47f2699491SMichael Ellerman int n_txn_start; 483925f46bSAnshuman Khandual 493925f46bSAnshuman Khandual /* BHRB bits */ 503925f46bSAnshuman Khandual u64 bhrb_filter; /* BHRB HW branch filter */ 513925f46bSAnshuman Khandual int bhrb_users; 523925f46bSAnshuman Khandual void *bhrb_context; 533925f46bSAnshuman Khandual struct perf_branch_stack bhrb_stack; 543925f46bSAnshuman Khandual struct perf_branch_entry bhrb_entries[BHRB_MAX_ENTRIES]; 55f2699491SMichael Ellerman }; 563925f46bSAnshuman Khandual 57f2699491SMichael Ellerman DEFINE_PER_CPU(struct cpu_hw_events, cpu_hw_events); 58f2699491SMichael Ellerman 59f2699491SMichael Ellerman struct power_pmu *ppmu; 60f2699491SMichael Ellerman 61f2699491SMichael Ellerman /* 62f2699491SMichael Ellerman * Normally, to ignore kernel events we set the FCS (freeze counters 63f2699491SMichael Ellerman * in supervisor mode) bit in MMCR0, but if the kernel runs with the 64f2699491SMichael Ellerman * hypervisor bit set in the MSR, or if we are running on a processor 65f2699491SMichael Ellerman * where the hypervisor bit is forced to 1 (as on Apple G5 processors), 66f2699491SMichael Ellerman * then we need to use the FCHV bit to ignore kernel events. 67f2699491SMichael Ellerman */ 68f2699491SMichael Ellerman static unsigned int freeze_events_kernel = MMCR0_FCS; 69f2699491SMichael Ellerman 70f2699491SMichael Ellerman /* 71f2699491SMichael Ellerman * 32-bit doesn't have MMCRA but does have an MMCR2, 72f2699491SMichael Ellerman * and a few other names are different. 73f2699491SMichael Ellerman */ 74f2699491SMichael Ellerman #ifdef CONFIG_PPC32 75f2699491SMichael Ellerman 76f2699491SMichael Ellerman #define MMCR0_FCHV 0 77f2699491SMichael Ellerman #define MMCR0_PMCjCE MMCR0_PMCnCE 78f2699491SMichael Ellerman 79f2699491SMichael Ellerman #define SPRN_MMCRA SPRN_MMCR2 80f2699491SMichael Ellerman #define MMCRA_SAMPLE_ENABLE 0 81f2699491SMichael Ellerman 82f2699491SMichael Ellerman static inline unsigned long perf_ip_adjust(struct pt_regs *regs) 83f2699491SMichael Ellerman { 84f2699491SMichael Ellerman return 0; 85f2699491SMichael Ellerman } 86f2699491SMichael Ellerman static inline void perf_get_data_addr(struct pt_regs *regs, u64 *addrp) { } 87f2699491SMichael Ellerman static inline u32 perf_get_misc_flags(struct pt_regs *regs) 88f2699491SMichael Ellerman { 89f2699491SMichael Ellerman return 0; 90f2699491SMichael Ellerman } 9175382aa7SAnton Blanchard static inline void perf_read_regs(struct pt_regs *regs) 9275382aa7SAnton Blanchard { 9375382aa7SAnton Blanchard regs->result = 0; 9475382aa7SAnton Blanchard } 95f2699491SMichael Ellerman static inline int perf_intr_is_nmi(struct pt_regs *regs) 96f2699491SMichael Ellerman { 97f2699491SMichael Ellerman return 0; 98f2699491SMichael Ellerman } 99f2699491SMichael Ellerman 100e6878835Ssukadev@linux.vnet.ibm.com static inline int siar_valid(struct pt_regs *regs) 101e6878835Ssukadev@linux.vnet.ibm.com { 102e6878835Ssukadev@linux.vnet.ibm.com return 1; 103e6878835Ssukadev@linux.vnet.ibm.com } 104e6878835Ssukadev@linux.vnet.ibm.com 105d52f2dc4SMichael Neuling static inline void power_pmu_bhrb_enable(struct perf_event *event) {} 106d52f2dc4SMichael Neuling static inline void power_pmu_bhrb_disable(struct perf_event *event) {} 107d52f2dc4SMichael Neuling void power_pmu_flush_branch_stack(void) {} 108d52f2dc4SMichael Neuling static inline void power_pmu_bhrb_read(struct cpu_hw_events *cpuhw) {} 109f2699491SMichael Ellerman #endif /* CONFIG_PPC32 */ 110f2699491SMichael Ellerman 11133904054SMichael Ellerman static bool regs_use_siar(struct pt_regs *regs) 11233904054SMichael Ellerman { 11333904054SMichael Ellerman return !!(regs->result & 1); 11433904054SMichael Ellerman } 11533904054SMichael Ellerman 116f2699491SMichael Ellerman /* 117f2699491SMichael Ellerman * Things that are specific to 64-bit implementations. 118f2699491SMichael Ellerman */ 119f2699491SMichael Ellerman #ifdef CONFIG_PPC64 120f2699491SMichael Ellerman 121f2699491SMichael Ellerman static inline unsigned long perf_ip_adjust(struct pt_regs *regs) 122f2699491SMichael Ellerman { 123f2699491SMichael Ellerman unsigned long mmcra = regs->dsisr; 124f2699491SMichael Ellerman 1257a786832SMichael Ellerman if ((ppmu->flags & PPMU_HAS_SSLOT) && (mmcra & MMCRA_SAMPLE_ENABLE)) { 126f2699491SMichael Ellerman unsigned long slot = (mmcra & MMCRA_SLOT) >> MMCRA_SLOT_SHIFT; 127f2699491SMichael Ellerman if (slot > 1) 128f2699491SMichael Ellerman return 4 * (slot - 1); 129f2699491SMichael Ellerman } 1307a786832SMichael Ellerman 131f2699491SMichael Ellerman return 0; 132f2699491SMichael Ellerman } 133f2699491SMichael Ellerman 134f2699491SMichael Ellerman /* 135f2699491SMichael Ellerman * The user wants a data address recorded. 136f2699491SMichael Ellerman * If we're not doing instruction sampling, give them the SDAR 137f2699491SMichael Ellerman * (sampled data address). If we are doing instruction sampling, then 138f2699491SMichael Ellerman * only give them the SDAR if it corresponds to the instruction 139e6878835Ssukadev@linux.vnet.ibm.com * pointed to by SIAR; this is indicated by the [POWER6_]MMCRA_SDSYNC or 140e6878835Ssukadev@linux.vnet.ibm.com * the [POWER7P_]MMCRA_SDAR_VALID bit in MMCRA. 141f2699491SMichael Ellerman */ 142f2699491SMichael Ellerman static inline void perf_get_data_addr(struct pt_regs *regs, u64 *addrp) 143f2699491SMichael Ellerman { 144f2699491SMichael Ellerman unsigned long mmcra = regs->dsisr; 145e6878835Ssukadev@linux.vnet.ibm.com unsigned long sdsync; 146e6878835Ssukadev@linux.vnet.ibm.com 147e6878835Ssukadev@linux.vnet.ibm.com if (ppmu->flags & PPMU_SIAR_VALID) 148e6878835Ssukadev@linux.vnet.ibm.com sdsync = POWER7P_MMCRA_SDAR_VALID; 149e6878835Ssukadev@linux.vnet.ibm.com else if (ppmu->flags & PPMU_ALT_SIPR) 150e6878835Ssukadev@linux.vnet.ibm.com sdsync = POWER6_MMCRA_SDSYNC; 151e6878835Ssukadev@linux.vnet.ibm.com else 152e6878835Ssukadev@linux.vnet.ibm.com sdsync = MMCRA_SDSYNC; 153f2699491SMichael Ellerman 154f2699491SMichael Ellerman if (!(mmcra & MMCRA_SAMPLE_ENABLE) || (mmcra & sdsync)) 155f2699491SMichael Ellerman *addrp = mfspr(SPRN_SDAR); 156f2699491SMichael Ellerman } 157f2699491SMichael Ellerman 1585682c460SMichael Ellerman static bool regs_sihv(struct pt_regs *regs) 15968b30bb9SAnton Blanchard { 16068b30bb9SAnton Blanchard unsigned long sihv = MMCRA_SIHV; 16168b30bb9SAnton Blanchard 1628f61aa32SMichael Ellerman if (ppmu->flags & PPMU_HAS_SIER) 1638f61aa32SMichael Ellerman return !!(regs->dar & SIER_SIHV); 1648f61aa32SMichael Ellerman 16568b30bb9SAnton Blanchard if (ppmu->flags & PPMU_ALT_SIPR) 16668b30bb9SAnton Blanchard sihv = POWER6_MMCRA_SIHV; 16768b30bb9SAnton Blanchard 1685682c460SMichael Ellerman return !!(regs->dsisr & sihv); 16968b30bb9SAnton Blanchard } 17068b30bb9SAnton Blanchard 1715682c460SMichael Ellerman static bool regs_sipr(struct pt_regs *regs) 17268b30bb9SAnton Blanchard { 17368b30bb9SAnton Blanchard unsigned long sipr = MMCRA_SIPR; 17468b30bb9SAnton Blanchard 1758f61aa32SMichael Ellerman if (ppmu->flags & PPMU_HAS_SIER) 1768f61aa32SMichael Ellerman return !!(regs->dar & SIER_SIPR); 1778f61aa32SMichael Ellerman 17868b30bb9SAnton Blanchard if (ppmu->flags & PPMU_ALT_SIPR) 17968b30bb9SAnton Blanchard sipr = POWER6_MMCRA_SIPR; 18068b30bb9SAnton Blanchard 1815682c460SMichael Ellerman return !!(regs->dsisr & sipr); 18268b30bb9SAnton Blanchard } 18368b30bb9SAnton Blanchard 184860aad71SMichael Ellerman static bool regs_no_sipr(struct pt_regs *regs) 185860aad71SMichael Ellerman { 186860aad71SMichael Ellerman return !!(regs->result & 2); 187860aad71SMichael Ellerman } 188860aad71SMichael Ellerman 1891ce447b9SBenjamin Herrenschmidt static inline u32 perf_flags_from_msr(struct pt_regs *regs) 1901ce447b9SBenjamin Herrenschmidt { 1911ce447b9SBenjamin Herrenschmidt if (regs->msr & MSR_PR) 1921ce447b9SBenjamin Herrenschmidt return PERF_RECORD_MISC_USER; 1931ce447b9SBenjamin Herrenschmidt if ((regs->msr & MSR_HV) && freeze_events_kernel != MMCR0_FCHV) 1941ce447b9SBenjamin Herrenschmidt return PERF_RECORD_MISC_HYPERVISOR; 1951ce447b9SBenjamin Herrenschmidt return PERF_RECORD_MISC_KERNEL; 1961ce447b9SBenjamin Herrenschmidt } 1971ce447b9SBenjamin Herrenschmidt 198f2699491SMichael Ellerman static inline u32 perf_get_misc_flags(struct pt_regs *regs) 199f2699491SMichael Ellerman { 20033904054SMichael Ellerman bool use_siar = regs_use_siar(regs); 201f2699491SMichael Ellerman 20275382aa7SAnton Blanchard if (!use_siar) 2031ce447b9SBenjamin Herrenschmidt return perf_flags_from_msr(regs); 2041ce447b9SBenjamin Herrenschmidt 2051ce447b9SBenjamin Herrenschmidt /* 2061ce447b9SBenjamin Herrenschmidt * If we don't have flags in MMCRA, rather than using 2071ce447b9SBenjamin Herrenschmidt * the MSR, we intuit the flags from the address in 2081ce447b9SBenjamin Herrenschmidt * SIAR which should give slightly more reliable 2091ce447b9SBenjamin Herrenschmidt * results 2101ce447b9SBenjamin Herrenschmidt */ 211860aad71SMichael Ellerman if (regs_no_sipr(regs)) { 2121ce447b9SBenjamin Herrenschmidt unsigned long siar = mfspr(SPRN_SIAR); 2131ce447b9SBenjamin Herrenschmidt if (siar >= PAGE_OFFSET) 2141ce447b9SBenjamin Herrenschmidt return PERF_RECORD_MISC_KERNEL; 2151ce447b9SBenjamin Herrenschmidt return PERF_RECORD_MISC_USER; 2161ce447b9SBenjamin Herrenschmidt } 217f2699491SMichael Ellerman 218f2699491SMichael Ellerman /* PR has priority over HV, so order below is important */ 2195682c460SMichael Ellerman if (regs_sipr(regs)) 220f2699491SMichael Ellerman return PERF_RECORD_MISC_USER; 2215682c460SMichael Ellerman 2225682c460SMichael Ellerman if (regs_sihv(regs) && (freeze_events_kernel != MMCR0_FCHV)) 223f2699491SMichael Ellerman return PERF_RECORD_MISC_HYPERVISOR; 2245682c460SMichael Ellerman 225f2699491SMichael Ellerman return PERF_RECORD_MISC_KERNEL; 226f2699491SMichael Ellerman } 227f2699491SMichael Ellerman 228f2699491SMichael Ellerman /* 229f2699491SMichael Ellerman * Overload regs->dsisr to store MMCRA so we only need to read it once 230f2699491SMichael Ellerman * on each interrupt. 2318f61aa32SMichael Ellerman * Overload regs->dar to store SIER if we have it. 23275382aa7SAnton Blanchard * Overload regs->result to specify whether we should use the MSR (result 23375382aa7SAnton Blanchard * is zero) or the SIAR (result is non zero). 234f2699491SMichael Ellerman */ 235f2699491SMichael Ellerman static inline void perf_read_regs(struct pt_regs *regs) 236f2699491SMichael Ellerman { 23775382aa7SAnton Blanchard unsigned long mmcra = mfspr(SPRN_MMCRA); 23875382aa7SAnton Blanchard int marked = mmcra & MMCRA_SAMPLE_ENABLE; 23975382aa7SAnton Blanchard int use_siar; 24075382aa7SAnton Blanchard 2415682c460SMichael Ellerman regs->dsisr = mmcra; 242860aad71SMichael Ellerman regs->result = 0; 243860aad71SMichael Ellerman 244860aad71SMichael Ellerman if (ppmu->flags & PPMU_NO_SIPR) 245860aad71SMichael Ellerman regs->result |= 2; 2465682c460SMichael Ellerman 2475c093efaSAnton Blanchard /* 2488f61aa32SMichael Ellerman * On power8 if we're in random sampling mode, the SIER is updated. 2498f61aa32SMichael Ellerman * If we're in continuous sampling mode, we don't have SIPR. 2508f61aa32SMichael Ellerman */ 2518f61aa32SMichael Ellerman if (ppmu->flags & PPMU_HAS_SIER) { 2528f61aa32SMichael Ellerman if (marked) 2538f61aa32SMichael Ellerman regs->dar = mfspr(SPRN_SIER); 2548f61aa32SMichael Ellerman else 2558f61aa32SMichael Ellerman regs->result |= 2; 2568f61aa32SMichael Ellerman } 2578f61aa32SMichael Ellerman 2588f61aa32SMichael Ellerman 2598f61aa32SMichael Ellerman /* 2605c093efaSAnton Blanchard * If this isn't a PMU exception (eg a software event) the SIAR is 2615c093efaSAnton Blanchard * not valid. Use pt_regs. 2625c093efaSAnton Blanchard * 2635c093efaSAnton Blanchard * If it is a marked event use the SIAR. 2645c093efaSAnton Blanchard * 2655c093efaSAnton Blanchard * If the PMU doesn't update the SIAR for non marked events use 2665c093efaSAnton Blanchard * pt_regs. 2675c093efaSAnton Blanchard * 2685c093efaSAnton Blanchard * If the PMU has HV/PR flags then check to see if they 2695c093efaSAnton Blanchard * place the exception in userspace. If so, use pt_regs. In 2705c093efaSAnton Blanchard * continuous sampling mode the SIAR and the PMU exception are 2715c093efaSAnton Blanchard * not synchronised, so they may be many instructions apart. 2725c093efaSAnton Blanchard * This can result in confusing backtraces. We still want 2735c093efaSAnton Blanchard * hypervisor samples as well as samples in the kernel with 2745c093efaSAnton Blanchard * interrupts off hence the userspace check. 2755c093efaSAnton Blanchard */ 27675382aa7SAnton Blanchard if (TRAP(regs) != 0xf00) 27775382aa7SAnton Blanchard use_siar = 0; 2785c093efaSAnton Blanchard else if (marked) 2795c093efaSAnton Blanchard use_siar = 1; 2805c093efaSAnton Blanchard else if ((ppmu->flags & PPMU_NO_CONT_SAMPLING)) 2815c093efaSAnton Blanchard use_siar = 0; 282860aad71SMichael Ellerman else if (!regs_no_sipr(regs) && regs_sipr(regs)) 28375382aa7SAnton Blanchard use_siar = 0; 28475382aa7SAnton Blanchard else 28575382aa7SAnton Blanchard use_siar = 1; 28675382aa7SAnton Blanchard 287860aad71SMichael Ellerman regs->result |= use_siar; 288f2699491SMichael Ellerman } 289f2699491SMichael Ellerman 290f2699491SMichael Ellerman /* 291f2699491SMichael Ellerman * If interrupts were soft-disabled when a PMU interrupt occurs, treat 292f2699491SMichael Ellerman * it as an NMI. 293f2699491SMichael Ellerman */ 294f2699491SMichael Ellerman static inline int perf_intr_is_nmi(struct pt_regs *regs) 295f2699491SMichael Ellerman { 296f2699491SMichael Ellerman return !regs->softe; 297f2699491SMichael Ellerman } 298f2699491SMichael Ellerman 299e6878835Ssukadev@linux.vnet.ibm.com /* 300e6878835Ssukadev@linux.vnet.ibm.com * On processors like P7+ that have the SIAR-Valid bit, marked instructions 301e6878835Ssukadev@linux.vnet.ibm.com * must be sampled only if the SIAR-valid bit is set. 302e6878835Ssukadev@linux.vnet.ibm.com * 303e6878835Ssukadev@linux.vnet.ibm.com * For unmarked instructions and for processors that don't have the SIAR-Valid 304e6878835Ssukadev@linux.vnet.ibm.com * bit, assume that SIAR is valid. 305e6878835Ssukadev@linux.vnet.ibm.com */ 306e6878835Ssukadev@linux.vnet.ibm.com static inline int siar_valid(struct pt_regs *regs) 307e6878835Ssukadev@linux.vnet.ibm.com { 308e6878835Ssukadev@linux.vnet.ibm.com unsigned long mmcra = regs->dsisr; 309e6878835Ssukadev@linux.vnet.ibm.com int marked = mmcra & MMCRA_SAMPLE_ENABLE; 310e6878835Ssukadev@linux.vnet.ibm.com 311e6878835Ssukadev@linux.vnet.ibm.com if ((ppmu->flags & PPMU_SIAR_VALID) && marked) 312e6878835Ssukadev@linux.vnet.ibm.com return mmcra & POWER7P_MMCRA_SIAR_VALID; 313e6878835Ssukadev@linux.vnet.ibm.com 314e6878835Ssukadev@linux.vnet.ibm.com return 1; 315e6878835Ssukadev@linux.vnet.ibm.com } 316e6878835Ssukadev@linux.vnet.ibm.com 317d52f2dc4SMichael Neuling 318d52f2dc4SMichael Neuling /* Reset all possible BHRB entries */ 319d52f2dc4SMichael Neuling static void power_pmu_bhrb_reset(void) 320d52f2dc4SMichael Neuling { 321d52f2dc4SMichael Neuling asm volatile(PPC_CLRBHRB); 322d52f2dc4SMichael Neuling } 323d52f2dc4SMichael Neuling 324d52f2dc4SMichael Neuling static void power_pmu_bhrb_enable(struct perf_event *event) 325d52f2dc4SMichael Neuling { 326d52f2dc4SMichael Neuling struct cpu_hw_events *cpuhw = &__get_cpu_var(cpu_hw_events); 327d52f2dc4SMichael Neuling 328d52f2dc4SMichael Neuling if (!ppmu->bhrb_nr) 329d52f2dc4SMichael Neuling return; 330d52f2dc4SMichael Neuling 331d52f2dc4SMichael Neuling /* Clear BHRB if we changed task context to avoid data leaks */ 332d52f2dc4SMichael Neuling if (event->ctx->task && cpuhw->bhrb_context != event->ctx) { 333d52f2dc4SMichael Neuling power_pmu_bhrb_reset(); 334d52f2dc4SMichael Neuling cpuhw->bhrb_context = event->ctx; 335d52f2dc4SMichael Neuling } 336d52f2dc4SMichael Neuling cpuhw->bhrb_users++; 337d52f2dc4SMichael Neuling } 338d52f2dc4SMichael Neuling 339d52f2dc4SMichael Neuling static void power_pmu_bhrb_disable(struct perf_event *event) 340d52f2dc4SMichael Neuling { 341d52f2dc4SMichael Neuling struct cpu_hw_events *cpuhw = &__get_cpu_var(cpu_hw_events); 342d52f2dc4SMichael Neuling 343d52f2dc4SMichael Neuling if (!ppmu->bhrb_nr) 344d52f2dc4SMichael Neuling return; 345d52f2dc4SMichael Neuling 346d52f2dc4SMichael Neuling cpuhw->bhrb_users--; 347d52f2dc4SMichael Neuling WARN_ON_ONCE(cpuhw->bhrb_users < 0); 348d52f2dc4SMichael Neuling 349d52f2dc4SMichael Neuling if (!cpuhw->disabled && !cpuhw->bhrb_users) { 350d52f2dc4SMichael Neuling /* BHRB cannot be turned off when other 351d52f2dc4SMichael Neuling * events are active on the PMU. 352d52f2dc4SMichael Neuling */ 353d52f2dc4SMichael Neuling 354d52f2dc4SMichael Neuling /* avoid stale pointer */ 355d52f2dc4SMichael Neuling cpuhw->bhrb_context = NULL; 356d52f2dc4SMichael Neuling } 357d52f2dc4SMichael Neuling } 358d52f2dc4SMichael Neuling 359d52f2dc4SMichael Neuling /* Called from ctxsw to prevent one process's branch entries to 360d52f2dc4SMichael Neuling * mingle with the other process's entries during context switch. 361d52f2dc4SMichael Neuling */ 362d52f2dc4SMichael Neuling void power_pmu_flush_branch_stack(void) 363d52f2dc4SMichael Neuling { 364d52f2dc4SMichael Neuling if (ppmu->bhrb_nr) 365d52f2dc4SMichael Neuling power_pmu_bhrb_reset(); 366d52f2dc4SMichael Neuling } 36769123184SMichael Neuling /* Calculate the to address for a branch */ 36869123184SMichael Neuling static __u64 power_pmu_bhrb_to(u64 addr) 36969123184SMichael Neuling { 37069123184SMichael Neuling unsigned int instr; 37169123184SMichael Neuling int ret; 37269123184SMichael Neuling __u64 target; 37369123184SMichael Neuling 37469123184SMichael Neuling if (is_kernel_addr(addr)) 37569123184SMichael Neuling return branch_target((unsigned int *)addr); 37669123184SMichael Neuling 37769123184SMichael Neuling /* Userspace: need copy instruction here then translate it */ 37869123184SMichael Neuling pagefault_disable(); 37969123184SMichael Neuling ret = __get_user_inatomic(instr, (unsigned int __user *)addr); 38069123184SMichael Neuling if (ret) { 38169123184SMichael Neuling pagefault_enable(); 38269123184SMichael Neuling return 0; 38369123184SMichael Neuling } 38469123184SMichael Neuling pagefault_enable(); 38569123184SMichael Neuling 38669123184SMichael Neuling target = branch_target(&instr); 38769123184SMichael Neuling if ((!target) || (instr & BRANCH_ABSOLUTE)) 38869123184SMichael Neuling return target; 38969123184SMichael Neuling 39069123184SMichael Neuling /* Translate relative branch target from kernel to user address */ 39169123184SMichael Neuling return target - (unsigned long)&instr + addr; 39269123184SMichael Neuling } 393d52f2dc4SMichael Neuling 394d52f2dc4SMichael Neuling /* Processing BHRB entries */ 395506e70d1SMichael Neuling void power_pmu_bhrb_read(struct cpu_hw_events *cpuhw) 396d52f2dc4SMichael Neuling { 397d52f2dc4SMichael Neuling u64 val; 398d52f2dc4SMichael Neuling u64 addr; 399506e70d1SMichael Neuling int r_index, u_index, pred; 400d52f2dc4SMichael Neuling 401d52f2dc4SMichael Neuling r_index = 0; 402d52f2dc4SMichael Neuling u_index = 0; 403d52f2dc4SMichael Neuling while (r_index < ppmu->bhrb_nr) { 404d52f2dc4SMichael Neuling /* Assembly read function */ 405506e70d1SMichael Neuling val = read_bhrb(r_index++); 406506e70d1SMichael Neuling if (!val) 407d52f2dc4SMichael Neuling /* Terminal marker: End of valid BHRB entries */ 408d52f2dc4SMichael Neuling break; 409506e70d1SMichael Neuling else { 410d52f2dc4SMichael Neuling addr = val & BHRB_EA; 411d52f2dc4SMichael Neuling pred = val & BHRB_PREDICTION; 412d52f2dc4SMichael Neuling 413506e70d1SMichael Neuling if (!addr) 414506e70d1SMichael Neuling /* invalid entry */ 415d52f2dc4SMichael Neuling continue; 416d52f2dc4SMichael Neuling 417506e70d1SMichael Neuling /* Branches are read most recent first (ie. mfbhrb 0 is 418506e70d1SMichael Neuling * the most recent branch). 419506e70d1SMichael Neuling * There are two types of valid entries: 420506e70d1SMichael Neuling * 1) a target entry which is the to address of a 421506e70d1SMichael Neuling * computed goto like a blr,bctr,btar. The next 422506e70d1SMichael Neuling * entry read from the bhrb will be branch 423506e70d1SMichael Neuling * corresponding to this target (ie. the actual 424506e70d1SMichael Neuling * blr/bctr/btar instruction). 425506e70d1SMichael Neuling * 2) a from address which is an actual branch. If a 426506e70d1SMichael Neuling * target entry proceeds this, then this is the 427506e70d1SMichael Neuling * matching branch for that target. If this is not 428506e70d1SMichael Neuling * following a target entry, then this is a branch 429506e70d1SMichael Neuling * where the target is given as an immediate field 430506e70d1SMichael Neuling * in the instruction (ie. an i or b form branch). 431506e70d1SMichael Neuling * In this case we need to read the instruction from 432506e70d1SMichael Neuling * memory to determine the target/to address. 433506e70d1SMichael Neuling */ 434d52f2dc4SMichael Neuling 435d52f2dc4SMichael Neuling if (val & BHRB_TARGET) { 436506e70d1SMichael Neuling /* Target branches use two entries 437506e70d1SMichael Neuling * (ie. computed gotos/XL form) 438506e70d1SMichael Neuling */ 439506e70d1SMichael Neuling cpuhw->bhrb_entries[u_index].to = addr; 440d52f2dc4SMichael Neuling cpuhw->bhrb_entries[u_index].mispred = pred; 441d52f2dc4SMichael Neuling cpuhw->bhrb_entries[u_index].predicted = ~pred; 442d52f2dc4SMichael Neuling 443506e70d1SMichael Neuling /* Get from address in next entry */ 444506e70d1SMichael Neuling val = read_bhrb(r_index++); 445506e70d1SMichael Neuling addr = val & BHRB_EA; 446506e70d1SMichael Neuling if (val & BHRB_TARGET) { 447506e70d1SMichael Neuling /* Shouldn't have two targets in a 448506e70d1SMichael Neuling row.. Reset index and try again */ 449506e70d1SMichael Neuling r_index--; 450506e70d1SMichael Neuling addr = 0; 451d52f2dc4SMichael Neuling } 452506e70d1SMichael Neuling cpuhw->bhrb_entries[u_index].from = addr; 453506e70d1SMichael Neuling } else { 454506e70d1SMichael Neuling /* Branches to immediate field 455506e70d1SMichael Neuling (ie I or B form) */ 456506e70d1SMichael Neuling cpuhw->bhrb_entries[u_index].from = addr; 45769123184SMichael Neuling cpuhw->bhrb_entries[u_index].to = 45869123184SMichael Neuling power_pmu_bhrb_to(addr); 459506e70d1SMichael Neuling cpuhw->bhrb_entries[u_index].mispred = pred; 460506e70d1SMichael Neuling cpuhw->bhrb_entries[u_index].predicted = ~pred; 461506e70d1SMichael Neuling } 462506e70d1SMichael Neuling u_index++; 463506e70d1SMichael Neuling 464d52f2dc4SMichael Neuling } 465d52f2dc4SMichael Neuling } 466d52f2dc4SMichael Neuling cpuhw->bhrb_stack.nr = u_index; 467d52f2dc4SMichael Neuling return; 468d52f2dc4SMichael Neuling } 469d52f2dc4SMichael Neuling 470f2699491SMichael Ellerman #endif /* CONFIG_PPC64 */ 471f2699491SMichael Ellerman 472f2699491SMichael Ellerman static void perf_event_interrupt(struct pt_regs *regs); 473f2699491SMichael Ellerman 474f2699491SMichael Ellerman void perf_event_print_debug(void) 475f2699491SMichael Ellerman { 476f2699491SMichael Ellerman } 477f2699491SMichael Ellerman 478f2699491SMichael Ellerman /* 479f2699491SMichael Ellerman * Read one performance monitor counter (PMC). 480f2699491SMichael Ellerman */ 481f2699491SMichael Ellerman static unsigned long read_pmc(int idx) 482f2699491SMichael Ellerman { 483f2699491SMichael Ellerman unsigned long val; 484f2699491SMichael Ellerman 485f2699491SMichael Ellerman switch (idx) { 486f2699491SMichael Ellerman case 1: 487f2699491SMichael Ellerman val = mfspr(SPRN_PMC1); 488f2699491SMichael Ellerman break; 489f2699491SMichael Ellerman case 2: 490f2699491SMichael Ellerman val = mfspr(SPRN_PMC2); 491f2699491SMichael Ellerman break; 492f2699491SMichael Ellerman case 3: 493f2699491SMichael Ellerman val = mfspr(SPRN_PMC3); 494f2699491SMichael Ellerman break; 495f2699491SMichael Ellerman case 4: 496f2699491SMichael Ellerman val = mfspr(SPRN_PMC4); 497f2699491SMichael Ellerman break; 498f2699491SMichael Ellerman case 5: 499f2699491SMichael Ellerman val = mfspr(SPRN_PMC5); 500f2699491SMichael Ellerman break; 501f2699491SMichael Ellerman case 6: 502f2699491SMichael Ellerman val = mfspr(SPRN_PMC6); 503f2699491SMichael Ellerman break; 504f2699491SMichael Ellerman #ifdef CONFIG_PPC64 505f2699491SMichael Ellerman case 7: 506f2699491SMichael Ellerman val = mfspr(SPRN_PMC7); 507f2699491SMichael Ellerman break; 508f2699491SMichael Ellerman case 8: 509f2699491SMichael Ellerman val = mfspr(SPRN_PMC8); 510f2699491SMichael Ellerman break; 511f2699491SMichael Ellerman #endif /* CONFIG_PPC64 */ 512f2699491SMichael Ellerman default: 513f2699491SMichael Ellerman printk(KERN_ERR "oops trying to read PMC%d\n", idx); 514f2699491SMichael Ellerman val = 0; 515f2699491SMichael Ellerman } 516f2699491SMichael Ellerman return val; 517f2699491SMichael Ellerman } 518f2699491SMichael Ellerman 519f2699491SMichael Ellerman /* 520f2699491SMichael Ellerman * Write one PMC. 521f2699491SMichael Ellerman */ 522f2699491SMichael Ellerman static void write_pmc(int idx, unsigned long val) 523f2699491SMichael Ellerman { 524f2699491SMichael Ellerman switch (idx) { 525f2699491SMichael Ellerman case 1: 526f2699491SMichael Ellerman mtspr(SPRN_PMC1, val); 527f2699491SMichael Ellerman break; 528f2699491SMichael Ellerman case 2: 529f2699491SMichael Ellerman mtspr(SPRN_PMC2, val); 530f2699491SMichael Ellerman break; 531f2699491SMichael Ellerman case 3: 532f2699491SMichael Ellerman mtspr(SPRN_PMC3, val); 533f2699491SMichael Ellerman break; 534f2699491SMichael Ellerman case 4: 535f2699491SMichael Ellerman mtspr(SPRN_PMC4, val); 536f2699491SMichael Ellerman break; 537f2699491SMichael Ellerman case 5: 538f2699491SMichael Ellerman mtspr(SPRN_PMC5, val); 539f2699491SMichael Ellerman break; 540f2699491SMichael Ellerman case 6: 541f2699491SMichael Ellerman mtspr(SPRN_PMC6, val); 542f2699491SMichael Ellerman break; 543f2699491SMichael Ellerman #ifdef CONFIG_PPC64 544f2699491SMichael Ellerman case 7: 545f2699491SMichael Ellerman mtspr(SPRN_PMC7, val); 546f2699491SMichael Ellerman break; 547f2699491SMichael Ellerman case 8: 548f2699491SMichael Ellerman mtspr(SPRN_PMC8, val); 549f2699491SMichael Ellerman break; 550f2699491SMichael Ellerman #endif /* CONFIG_PPC64 */ 551f2699491SMichael Ellerman default: 552f2699491SMichael Ellerman printk(KERN_ERR "oops trying to write PMC%d\n", idx); 553f2699491SMichael Ellerman } 554f2699491SMichael Ellerman } 555f2699491SMichael Ellerman 556f2699491SMichael Ellerman /* 557f2699491SMichael Ellerman * Check if a set of events can all go on the PMU at once. 558f2699491SMichael Ellerman * If they can't, this will look at alternative codes for the events 559f2699491SMichael Ellerman * and see if any combination of alternative codes is feasible. 560f2699491SMichael Ellerman * The feasible set is returned in event_id[]. 561f2699491SMichael Ellerman */ 562f2699491SMichael Ellerman static int power_check_constraints(struct cpu_hw_events *cpuhw, 563f2699491SMichael Ellerman u64 event_id[], unsigned int cflags[], 564f2699491SMichael Ellerman int n_ev) 565f2699491SMichael Ellerman { 566f2699491SMichael Ellerman unsigned long mask, value, nv; 567f2699491SMichael Ellerman unsigned long smasks[MAX_HWEVENTS], svalues[MAX_HWEVENTS]; 568f2699491SMichael Ellerman int n_alt[MAX_HWEVENTS], choice[MAX_HWEVENTS]; 569f2699491SMichael Ellerman int i, j; 570f2699491SMichael Ellerman unsigned long addf = ppmu->add_fields; 571f2699491SMichael Ellerman unsigned long tadd = ppmu->test_adder; 572f2699491SMichael Ellerman 573f2699491SMichael Ellerman if (n_ev > ppmu->n_counter) 574f2699491SMichael Ellerman return -1; 575f2699491SMichael Ellerman 576f2699491SMichael Ellerman /* First see if the events will go on as-is */ 577f2699491SMichael Ellerman for (i = 0; i < n_ev; ++i) { 578f2699491SMichael Ellerman if ((cflags[i] & PPMU_LIMITED_PMC_REQD) 579f2699491SMichael Ellerman && !ppmu->limited_pmc_event(event_id[i])) { 580f2699491SMichael Ellerman ppmu->get_alternatives(event_id[i], cflags[i], 581f2699491SMichael Ellerman cpuhw->alternatives[i]); 582f2699491SMichael Ellerman event_id[i] = cpuhw->alternatives[i][0]; 583f2699491SMichael Ellerman } 584f2699491SMichael Ellerman if (ppmu->get_constraint(event_id[i], &cpuhw->amasks[i][0], 585f2699491SMichael Ellerman &cpuhw->avalues[i][0])) 586f2699491SMichael Ellerman return -1; 587f2699491SMichael Ellerman } 588f2699491SMichael Ellerman value = mask = 0; 589f2699491SMichael Ellerman for (i = 0; i < n_ev; ++i) { 590f2699491SMichael Ellerman nv = (value | cpuhw->avalues[i][0]) + 591f2699491SMichael Ellerman (value & cpuhw->avalues[i][0] & addf); 592f2699491SMichael Ellerman if ((((nv + tadd) ^ value) & mask) != 0 || 593f2699491SMichael Ellerman (((nv + tadd) ^ cpuhw->avalues[i][0]) & 594f2699491SMichael Ellerman cpuhw->amasks[i][0]) != 0) 595f2699491SMichael Ellerman break; 596f2699491SMichael Ellerman value = nv; 597f2699491SMichael Ellerman mask |= cpuhw->amasks[i][0]; 598f2699491SMichael Ellerman } 599f2699491SMichael Ellerman if (i == n_ev) 600f2699491SMichael Ellerman return 0; /* all OK */ 601f2699491SMichael Ellerman 602f2699491SMichael Ellerman /* doesn't work, gather alternatives... */ 603f2699491SMichael Ellerman if (!ppmu->get_alternatives) 604f2699491SMichael Ellerman return -1; 605f2699491SMichael Ellerman for (i = 0; i < n_ev; ++i) { 606f2699491SMichael Ellerman choice[i] = 0; 607f2699491SMichael Ellerman n_alt[i] = ppmu->get_alternatives(event_id[i], cflags[i], 608f2699491SMichael Ellerman cpuhw->alternatives[i]); 609f2699491SMichael Ellerman for (j = 1; j < n_alt[i]; ++j) 610f2699491SMichael Ellerman ppmu->get_constraint(cpuhw->alternatives[i][j], 611f2699491SMichael Ellerman &cpuhw->amasks[i][j], 612f2699491SMichael Ellerman &cpuhw->avalues[i][j]); 613f2699491SMichael Ellerman } 614f2699491SMichael Ellerman 615f2699491SMichael Ellerman /* enumerate all possibilities and see if any will work */ 616f2699491SMichael Ellerman i = 0; 617f2699491SMichael Ellerman j = -1; 618f2699491SMichael Ellerman value = mask = nv = 0; 619f2699491SMichael Ellerman while (i < n_ev) { 620f2699491SMichael Ellerman if (j >= 0) { 621f2699491SMichael Ellerman /* we're backtracking, restore context */ 622f2699491SMichael Ellerman value = svalues[i]; 623f2699491SMichael Ellerman mask = smasks[i]; 624f2699491SMichael Ellerman j = choice[i]; 625f2699491SMichael Ellerman } 626f2699491SMichael Ellerman /* 627f2699491SMichael Ellerman * See if any alternative k for event_id i, 628f2699491SMichael Ellerman * where k > j, will satisfy the constraints. 629f2699491SMichael Ellerman */ 630f2699491SMichael Ellerman while (++j < n_alt[i]) { 631f2699491SMichael Ellerman nv = (value | cpuhw->avalues[i][j]) + 632f2699491SMichael Ellerman (value & cpuhw->avalues[i][j] & addf); 633f2699491SMichael Ellerman if ((((nv + tadd) ^ value) & mask) == 0 && 634f2699491SMichael Ellerman (((nv + tadd) ^ cpuhw->avalues[i][j]) 635f2699491SMichael Ellerman & cpuhw->amasks[i][j]) == 0) 636f2699491SMichael Ellerman break; 637f2699491SMichael Ellerman } 638f2699491SMichael Ellerman if (j >= n_alt[i]) { 639f2699491SMichael Ellerman /* 640f2699491SMichael Ellerman * No feasible alternative, backtrack 641f2699491SMichael Ellerman * to event_id i-1 and continue enumerating its 642f2699491SMichael Ellerman * alternatives from where we got up to. 643f2699491SMichael Ellerman */ 644f2699491SMichael Ellerman if (--i < 0) 645f2699491SMichael Ellerman return -1; 646f2699491SMichael Ellerman } else { 647f2699491SMichael Ellerman /* 648f2699491SMichael Ellerman * Found a feasible alternative for event_id i, 649f2699491SMichael Ellerman * remember where we got up to with this event_id, 650f2699491SMichael Ellerman * go on to the next event_id, and start with 651f2699491SMichael Ellerman * the first alternative for it. 652f2699491SMichael Ellerman */ 653f2699491SMichael Ellerman choice[i] = j; 654f2699491SMichael Ellerman svalues[i] = value; 655f2699491SMichael Ellerman smasks[i] = mask; 656f2699491SMichael Ellerman value = nv; 657f2699491SMichael Ellerman mask |= cpuhw->amasks[i][j]; 658f2699491SMichael Ellerman ++i; 659f2699491SMichael Ellerman j = -1; 660f2699491SMichael Ellerman } 661f2699491SMichael Ellerman } 662f2699491SMichael Ellerman 663f2699491SMichael Ellerman /* OK, we have a feasible combination, tell the caller the solution */ 664f2699491SMichael Ellerman for (i = 0; i < n_ev; ++i) 665f2699491SMichael Ellerman event_id[i] = cpuhw->alternatives[i][choice[i]]; 666f2699491SMichael Ellerman return 0; 667f2699491SMichael Ellerman } 668f2699491SMichael Ellerman 669f2699491SMichael Ellerman /* 670f2699491SMichael Ellerman * Check if newly-added events have consistent settings for 671f2699491SMichael Ellerman * exclude_{user,kernel,hv} with each other and any previously 672f2699491SMichael Ellerman * added events. 673f2699491SMichael Ellerman */ 674f2699491SMichael Ellerman static int check_excludes(struct perf_event **ctrs, unsigned int cflags[], 675f2699491SMichael Ellerman int n_prev, int n_new) 676f2699491SMichael Ellerman { 677f2699491SMichael Ellerman int eu = 0, ek = 0, eh = 0; 678f2699491SMichael Ellerman int i, n, first; 679f2699491SMichael Ellerman struct perf_event *event; 680f2699491SMichael Ellerman 681f2699491SMichael Ellerman n = n_prev + n_new; 682f2699491SMichael Ellerman if (n <= 1) 683f2699491SMichael Ellerman return 0; 684f2699491SMichael Ellerman 685f2699491SMichael Ellerman first = 1; 686f2699491SMichael Ellerman for (i = 0; i < n; ++i) { 687f2699491SMichael Ellerman if (cflags[i] & PPMU_LIMITED_PMC_OK) { 688f2699491SMichael Ellerman cflags[i] &= ~PPMU_LIMITED_PMC_REQD; 689f2699491SMichael Ellerman continue; 690f2699491SMichael Ellerman } 691f2699491SMichael Ellerman event = ctrs[i]; 692f2699491SMichael Ellerman if (first) { 693f2699491SMichael Ellerman eu = event->attr.exclude_user; 694f2699491SMichael Ellerman ek = event->attr.exclude_kernel; 695f2699491SMichael Ellerman eh = event->attr.exclude_hv; 696f2699491SMichael Ellerman first = 0; 697f2699491SMichael Ellerman } else if (event->attr.exclude_user != eu || 698f2699491SMichael Ellerman event->attr.exclude_kernel != ek || 699f2699491SMichael Ellerman event->attr.exclude_hv != eh) { 700f2699491SMichael Ellerman return -EAGAIN; 701f2699491SMichael Ellerman } 702f2699491SMichael Ellerman } 703f2699491SMichael Ellerman 704f2699491SMichael Ellerman if (eu || ek || eh) 705f2699491SMichael Ellerman for (i = 0; i < n; ++i) 706f2699491SMichael Ellerman if (cflags[i] & PPMU_LIMITED_PMC_OK) 707f2699491SMichael Ellerman cflags[i] |= PPMU_LIMITED_PMC_REQD; 708f2699491SMichael Ellerman 709f2699491SMichael Ellerman return 0; 710f2699491SMichael Ellerman } 711f2699491SMichael Ellerman 712f2699491SMichael Ellerman static u64 check_and_compute_delta(u64 prev, u64 val) 713f2699491SMichael Ellerman { 714f2699491SMichael Ellerman u64 delta = (val - prev) & 0xfffffffful; 715f2699491SMichael Ellerman 716f2699491SMichael Ellerman /* 717f2699491SMichael Ellerman * POWER7 can roll back counter values, if the new value is smaller 718f2699491SMichael Ellerman * than the previous value it will cause the delta and the counter to 719f2699491SMichael Ellerman * have bogus values unless we rolled a counter over. If a coutner is 720f2699491SMichael Ellerman * rolled back, it will be smaller, but within 256, which is the maximum 721f2699491SMichael Ellerman * number of events to rollback at once. If we dectect a rollback 722f2699491SMichael Ellerman * return 0. This can lead to a small lack of precision in the 723f2699491SMichael Ellerman * counters. 724f2699491SMichael Ellerman */ 725f2699491SMichael Ellerman if (prev > val && (prev - val) < 256) 726f2699491SMichael Ellerman delta = 0; 727f2699491SMichael Ellerman 728f2699491SMichael Ellerman return delta; 729f2699491SMichael Ellerman } 730f2699491SMichael Ellerman 731f2699491SMichael Ellerman static void power_pmu_read(struct perf_event *event) 732f2699491SMichael Ellerman { 733f2699491SMichael Ellerman s64 val, delta, prev; 734f2699491SMichael Ellerman 735f2699491SMichael Ellerman if (event->hw.state & PERF_HES_STOPPED) 736f2699491SMichael Ellerman return; 737f2699491SMichael Ellerman 738f2699491SMichael Ellerman if (!event->hw.idx) 739f2699491SMichael Ellerman return; 740f2699491SMichael Ellerman /* 741f2699491SMichael Ellerman * Performance monitor interrupts come even when interrupts 742f2699491SMichael Ellerman * are soft-disabled, as long as interrupts are hard-enabled. 743f2699491SMichael Ellerman * Therefore we treat them like NMIs. 744f2699491SMichael Ellerman */ 745f2699491SMichael Ellerman do { 746f2699491SMichael Ellerman prev = local64_read(&event->hw.prev_count); 747f2699491SMichael Ellerman barrier(); 748f2699491SMichael Ellerman val = read_pmc(event->hw.idx); 749f2699491SMichael Ellerman delta = check_and_compute_delta(prev, val); 750f2699491SMichael Ellerman if (!delta) 751f2699491SMichael Ellerman return; 752f2699491SMichael Ellerman } while (local64_cmpxchg(&event->hw.prev_count, prev, val) != prev); 753f2699491SMichael Ellerman 754f2699491SMichael Ellerman local64_add(delta, &event->count); 755f2699491SMichael Ellerman local64_sub(delta, &event->hw.period_left); 756f2699491SMichael Ellerman } 757f2699491SMichael Ellerman 758f2699491SMichael Ellerman /* 759f2699491SMichael Ellerman * On some machines, PMC5 and PMC6 can't be written, don't respect 760f2699491SMichael Ellerman * the freeze conditions, and don't generate interrupts. This tells 761f2699491SMichael Ellerman * us if `event' is using such a PMC. 762f2699491SMichael Ellerman */ 763f2699491SMichael Ellerman static int is_limited_pmc(int pmcnum) 764f2699491SMichael Ellerman { 765f2699491SMichael Ellerman return (ppmu->flags & PPMU_LIMITED_PMC5_6) 766f2699491SMichael Ellerman && (pmcnum == 5 || pmcnum == 6); 767f2699491SMichael Ellerman } 768f2699491SMichael Ellerman 769f2699491SMichael Ellerman static void freeze_limited_counters(struct cpu_hw_events *cpuhw, 770f2699491SMichael Ellerman unsigned long pmc5, unsigned long pmc6) 771f2699491SMichael Ellerman { 772f2699491SMichael Ellerman struct perf_event *event; 773f2699491SMichael Ellerman u64 val, prev, delta; 774f2699491SMichael Ellerman int i; 775f2699491SMichael Ellerman 776f2699491SMichael Ellerman for (i = 0; i < cpuhw->n_limited; ++i) { 777f2699491SMichael Ellerman event = cpuhw->limited_counter[i]; 778f2699491SMichael Ellerman if (!event->hw.idx) 779f2699491SMichael Ellerman continue; 780f2699491SMichael Ellerman val = (event->hw.idx == 5) ? pmc5 : pmc6; 781f2699491SMichael Ellerman prev = local64_read(&event->hw.prev_count); 782f2699491SMichael Ellerman event->hw.idx = 0; 783f2699491SMichael Ellerman delta = check_and_compute_delta(prev, val); 784f2699491SMichael Ellerman if (delta) 785f2699491SMichael Ellerman local64_add(delta, &event->count); 786f2699491SMichael Ellerman } 787f2699491SMichael Ellerman } 788f2699491SMichael Ellerman 789f2699491SMichael Ellerman static void thaw_limited_counters(struct cpu_hw_events *cpuhw, 790f2699491SMichael Ellerman unsigned long pmc5, unsigned long pmc6) 791f2699491SMichael Ellerman { 792f2699491SMichael Ellerman struct perf_event *event; 793f2699491SMichael Ellerman u64 val, prev; 794f2699491SMichael Ellerman int i; 795f2699491SMichael Ellerman 796f2699491SMichael Ellerman for (i = 0; i < cpuhw->n_limited; ++i) { 797f2699491SMichael Ellerman event = cpuhw->limited_counter[i]; 798f2699491SMichael Ellerman event->hw.idx = cpuhw->limited_hwidx[i]; 799f2699491SMichael Ellerman val = (event->hw.idx == 5) ? pmc5 : pmc6; 800f2699491SMichael Ellerman prev = local64_read(&event->hw.prev_count); 801f2699491SMichael Ellerman if (check_and_compute_delta(prev, val)) 802f2699491SMichael Ellerman local64_set(&event->hw.prev_count, val); 803f2699491SMichael Ellerman perf_event_update_userpage(event); 804f2699491SMichael Ellerman } 805f2699491SMichael Ellerman } 806f2699491SMichael Ellerman 807f2699491SMichael Ellerman /* 808f2699491SMichael Ellerman * Since limited events don't respect the freeze conditions, we 809f2699491SMichael Ellerman * have to read them immediately after freezing or unfreezing the 810f2699491SMichael Ellerman * other events. We try to keep the values from the limited 811f2699491SMichael Ellerman * events as consistent as possible by keeping the delay (in 812f2699491SMichael Ellerman * cycles and instructions) between freezing/unfreezing and reading 813f2699491SMichael Ellerman * the limited events as small and consistent as possible. 814f2699491SMichael Ellerman * Therefore, if any limited events are in use, we read them 815f2699491SMichael Ellerman * both, and always in the same order, to minimize variability, 816f2699491SMichael Ellerman * and do it inside the same asm that writes MMCR0. 817f2699491SMichael Ellerman */ 818f2699491SMichael Ellerman static void write_mmcr0(struct cpu_hw_events *cpuhw, unsigned long mmcr0) 819f2699491SMichael Ellerman { 820f2699491SMichael Ellerman unsigned long pmc5, pmc6; 821f2699491SMichael Ellerman 822f2699491SMichael Ellerman if (!cpuhw->n_limited) { 823f2699491SMichael Ellerman mtspr(SPRN_MMCR0, mmcr0); 824f2699491SMichael Ellerman return; 825f2699491SMichael Ellerman } 826f2699491SMichael Ellerman 827f2699491SMichael Ellerman /* 828f2699491SMichael Ellerman * Write MMCR0, then read PMC5 and PMC6 immediately. 829f2699491SMichael Ellerman * To ensure we don't get a performance monitor interrupt 830f2699491SMichael Ellerman * between writing MMCR0 and freezing/thawing the limited 831f2699491SMichael Ellerman * events, we first write MMCR0 with the event overflow 832f2699491SMichael Ellerman * interrupt enable bits turned off. 833f2699491SMichael Ellerman */ 834f2699491SMichael Ellerman asm volatile("mtspr %3,%2; mfspr %0,%4; mfspr %1,%5" 835f2699491SMichael Ellerman : "=&r" (pmc5), "=&r" (pmc6) 836f2699491SMichael Ellerman : "r" (mmcr0 & ~(MMCR0_PMC1CE | MMCR0_PMCjCE)), 837f2699491SMichael Ellerman "i" (SPRN_MMCR0), 838f2699491SMichael Ellerman "i" (SPRN_PMC5), "i" (SPRN_PMC6)); 839f2699491SMichael Ellerman 840f2699491SMichael Ellerman if (mmcr0 & MMCR0_FC) 841f2699491SMichael Ellerman freeze_limited_counters(cpuhw, pmc5, pmc6); 842f2699491SMichael Ellerman else 843f2699491SMichael Ellerman thaw_limited_counters(cpuhw, pmc5, pmc6); 844f2699491SMichael Ellerman 845f2699491SMichael Ellerman /* 846f2699491SMichael Ellerman * Write the full MMCR0 including the event overflow interrupt 847f2699491SMichael Ellerman * enable bits, if necessary. 848f2699491SMichael Ellerman */ 849f2699491SMichael Ellerman if (mmcr0 & (MMCR0_PMC1CE | MMCR0_PMCjCE)) 850f2699491SMichael Ellerman mtspr(SPRN_MMCR0, mmcr0); 851f2699491SMichael Ellerman } 852f2699491SMichael Ellerman 853f2699491SMichael Ellerman /* 854f2699491SMichael Ellerman * Disable all events to prevent PMU interrupts and to allow 855f2699491SMichael Ellerman * events to be added or removed. 856f2699491SMichael Ellerman */ 857f2699491SMichael Ellerman static void power_pmu_disable(struct pmu *pmu) 858f2699491SMichael Ellerman { 859f2699491SMichael Ellerman struct cpu_hw_events *cpuhw; 860f2699491SMichael Ellerman unsigned long flags; 861f2699491SMichael Ellerman 862f2699491SMichael Ellerman if (!ppmu) 863f2699491SMichael Ellerman return; 864f2699491SMichael Ellerman local_irq_save(flags); 865f2699491SMichael Ellerman cpuhw = &__get_cpu_var(cpu_hw_events); 866f2699491SMichael Ellerman 867f2699491SMichael Ellerman if (!cpuhw->disabled) { 868f2699491SMichael Ellerman cpuhw->disabled = 1; 869f2699491SMichael Ellerman cpuhw->n_added = 0; 870f2699491SMichael Ellerman 871f2699491SMichael Ellerman /* 872f2699491SMichael Ellerman * Check if we ever enabled the PMU on this cpu. 873f2699491SMichael Ellerman */ 874f2699491SMichael Ellerman if (!cpuhw->pmcs_enabled) { 875f2699491SMichael Ellerman ppc_enable_pmcs(); 876f2699491SMichael Ellerman cpuhw->pmcs_enabled = 1; 877f2699491SMichael Ellerman } 878f2699491SMichael Ellerman 879f2699491SMichael Ellerman /* 880f2699491SMichael Ellerman * Disable instruction sampling if it was enabled 881f2699491SMichael Ellerman */ 882f2699491SMichael Ellerman if (cpuhw->mmcr[2] & MMCRA_SAMPLE_ENABLE) { 883f2699491SMichael Ellerman mtspr(SPRN_MMCRA, 884f2699491SMichael Ellerman cpuhw->mmcr[2] & ~MMCRA_SAMPLE_ENABLE); 885f2699491SMichael Ellerman mb(); 886f2699491SMichael Ellerman } 887f2699491SMichael Ellerman 888f2699491SMichael Ellerman /* 889f2699491SMichael Ellerman * Set the 'freeze counters' bit. 890f2699491SMichael Ellerman * The barrier is to make sure the mtspr has been 891f2699491SMichael Ellerman * executed and the PMU has frozen the events 892f2699491SMichael Ellerman * before we return. 893f2699491SMichael Ellerman */ 894f2699491SMichael Ellerman write_mmcr0(cpuhw, mfspr(SPRN_MMCR0) | MMCR0_FC); 895f2699491SMichael Ellerman mb(); 896f2699491SMichael Ellerman } 897f2699491SMichael Ellerman local_irq_restore(flags); 898f2699491SMichael Ellerman } 899f2699491SMichael Ellerman 900f2699491SMichael Ellerman /* 901f2699491SMichael Ellerman * Re-enable all events if disable == 0. 902f2699491SMichael Ellerman * If we were previously disabled and events were added, then 903f2699491SMichael Ellerman * put the new config on the PMU. 904f2699491SMichael Ellerman */ 905f2699491SMichael Ellerman static void power_pmu_enable(struct pmu *pmu) 906f2699491SMichael Ellerman { 907f2699491SMichael Ellerman struct perf_event *event; 908f2699491SMichael Ellerman struct cpu_hw_events *cpuhw; 909f2699491SMichael Ellerman unsigned long flags; 910f2699491SMichael Ellerman long i; 911f2699491SMichael Ellerman unsigned long val; 912f2699491SMichael Ellerman s64 left; 913f2699491SMichael Ellerman unsigned int hwc_index[MAX_HWEVENTS]; 914f2699491SMichael Ellerman int n_lim; 915f2699491SMichael Ellerman int idx; 916f2699491SMichael Ellerman 917f2699491SMichael Ellerman if (!ppmu) 918f2699491SMichael Ellerman return; 919f2699491SMichael Ellerman local_irq_save(flags); 920f2699491SMichael Ellerman cpuhw = &__get_cpu_var(cpu_hw_events); 921f2699491SMichael Ellerman if (!cpuhw->disabled) { 922f2699491SMichael Ellerman local_irq_restore(flags); 923f2699491SMichael Ellerman return; 924f2699491SMichael Ellerman } 925f2699491SMichael Ellerman cpuhw->disabled = 0; 926f2699491SMichael Ellerman 927f2699491SMichael Ellerman /* 928f2699491SMichael Ellerman * If we didn't change anything, or only removed events, 929f2699491SMichael Ellerman * no need to recalculate MMCR* settings and reset the PMCs. 930f2699491SMichael Ellerman * Just reenable the PMU with the current MMCR* settings 931f2699491SMichael Ellerman * (possibly updated for removal of events). 932f2699491SMichael Ellerman */ 933f2699491SMichael Ellerman if (!cpuhw->n_added) { 934f2699491SMichael Ellerman mtspr(SPRN_MMCRA, cpuhw->mmcr[2] & ~MMCRA_SAMPLE_ENABLE); 935f2699491SMichael Ellerman mtspr(SPRN_MMCR1, cpuhw->mmcr[1]); 936f2699491SMichael Ellerman if (cpuhw->n_events == 0) 937f2699491SMichael Ellerman ppc_set_pmu_inuse(0); 938f2699491SMichael Ellerman goto out_enable; 939f2699491SMichael Ellerman } 940f2699491SMichael Ellerman 941f2699491SMichael Ellerman /* 942f2699491SMichael Ellerman * Compute MMCR* values for the new set of events 943f2699491SMichael Ellerman */ 944f2699491SMichael Ellerman if (ppmu->compute_mmcr(cpuhw->events, cpuhw->n_events, hwc_index, 945f2699491SMichael Ellerman cpuhw->mmcr)) { 946f2699491SMichael Ellerman /* shouldn't ever get here */ 947f2699491SMichael Ellerman printk(KERN_ERR "oops compute_mmcr failed\n"); 948f2699491SMichael Ellerman goto out; 949f2699491SMichael Ellerman } 950f2699491SMichael Ellerman 951f2699491SMichael Ellerman /* 952f2699491SMichael Ellerman * Add in MMCR0 freeze bits corresponding to the 953f2699491SMichael Ellerman * attr.exclude_* bits for the first event. 954f2699491SMichael Ellerman * We have already checked that all events have the 955f2699491SMichael Ellerman * same values for these bits as the first event. 956f2699491SMichael Ellerman */ 957f2699491SMichael Ellerman event = cpuhw->event[0]; 958f2699491SMichael Ellerman if (event->attr.exclude_user) 959f2699491SMichael Ellerman cpuhw->mmcr[0] |= MMCR0_FCP; 960f2699491SMichael Ellerman if (event->attr.exclude_kernel) 961f2699491SMichael Ellerman cpuhw->mmcr[0] |= freeze_events_kernel; 962f2699491SMichael Ellerman if (event->attr.exclude_hv) 963f2699491SMichael Ellerman cpuhw->mmcr[0] |= MMCR0_FCHV; 964f2699491SMichael Ellerman 965f2699491SMichael Ellerman /* 966f2699491SMichael Ellerman * Write the new configuration to MMCR* with the freeze 967f2699491SMichael Ellerman * bit set and set the hardware events to their initial values. 968f2699491SMichael Ellerman * Then unfreeze the events. 969f2699491SMichael Ellerman */ 970f2699491SMichael Ellerman ppc_set_pmu_inuse(1); 971f2699491SMichael Ellerman mtspr(SPRN_MMCRA, cpuhw->mmcr[2] & ~MMCRA_SAMPLE_ENABLE); 972f2699491SMichael Ellerman mtspr(SPRN_MMCR1, cpuhw->mmcr[1]); 973f2699491SMichael Ellerman mtspr(SPRN_MMCR0, (cpuhw->mmcr[0] & ~(MMCR0_PMC1CE | MMCR0_PMCjCE)) 974f2699491SMichael Ellerman | MMCR0_FC); 975f2699491SMichael Ellerman 976f2699491SMichael Ellerman /* 977f2699491SMichael Ellerman * Read off any pre-existing events that need to move 978f2699491SMichael Ellerman * to another PMC. 979f2699491SMichael Ellerman */ 980f2699491SMichael Ellerman for (i = 0; i < cpuhw->n_events; ++i) { 981f2699491SMichael Ellerman event = cpuhw->event[i]; 982f2699491SMichael Ellerman if (event->hw.idx && event->hw.idx != hwc_index[i] + 1) { 983f2699491SMichael Ellerman power_pmu_read(event); 984f2699491SMichael Ellerman write_pmc(event->hw.idx, 0); 985f2699491SMichael Ellerman event->hw.idx = 0; 986f2699491SMichael Ellerman } 987f2699491SMichael Ellerman } 988f2699491SMichael Ellerman 989f2699491SMichael Ellerman /* 990f2699491SMichael Ellerman * Initialize the PMCs for all the new and moved events. 991f2699491SMichael Ellerman */ 992f2699491SMichael Ellerman cpuhw->n_limited = n_lim = 0; 993f2699491SMichael Ellerman for (i = 0; i < cpuhw->n_events; ++i) { 994f2699491SMichael Ellerman event = cpuhw->event[i]; 995f2699491SMichael Ellerman if (event->hw.idx) 996f2699491SMichael Ellerman continue; 997f2699491SMichael Ellerman idx = hwc_index[i] + 1; 998f2699491SMichael Ellerman if (is_limited_pmc(idx)) { 999f2699491SMichael Ellerman cpuhw->limited_counter[n_lim] = event; 1000f2699491SMichael Ellerman cpuhw->limited_hwidx[n_lim] = idx; 1001f2699491SMichael Ellerman ++n_lim; 1002f2699491SMichael Ellerman continue; 1003f2699491SMichael Ellerman } 1004f2699491SMichael Ellerman val = 0; 1005f2699491SMichael Ellerman if (event->hw.sample_period) { 1006f2699491SMichael Ellerman left = local64_read(&event->hw.period_left); 1007f2699491SMichael Ellerman if (left < 0x80000000L) 1008f2699491SMichael Ellerman val = 0x80000000L - left; 1009f2699491SMichael Ellerman } 1010f2699491SMichael Ellerman local64_set(&event->hw.prev_count, val); 1011f2699491SMichael Ellerman event->hw.idx = idx; 1012f2699491SMichael Ellerman if (event->hw.state & PERF_HES_STOPPED) 1013f2699491SMichael Ellerman val = 0; 1014f2699491SMichael Ellerman write_pmc(idx, val); 1015f2699491SMichael Ellerman perf_event_update_userpage(event); 1016f2699491SMichael Ellerman } 1017f2699491SMichael Ellerman cpuhw->n_limited = n_lim; 1018f2699491SMichael Ellerman cpuhw->mmcr[0] |= MMCR0_PMXE | MMCR0_FCECE; 1019f2699491SMichael Ellerman 1020f2699491SMichael Ellerman out_enable: 1021f2699491SMichael Ellerman mb(); 1022f2699491SMichael Ellerman write_mmcr0(cpuhw, cpuhw->mmcr[0]); 1023f2699491SMichael Ellerman 1024f2699491SMichael Ellerman /* 1025f2699491SMichael Ellerman * Enable instruction sampling if necessary 1026f2699491SMichael Ellerman */ 1027f2699491SMichael Ellerman if (cpuhw->mmcr[2] & MMCRA_SAMPLE_ENABLE) { 1028f2699491SMichael Ellerman mb(); 1029f2699491SMichael Ellerman mtspr(SPRN_MMCRA, cpuhw->mmcr[2]); 1030f2699491SMichael Ellerman } 1031f2699491SMichael Ellerman 1032f2699491SMichael Ellerman out: 10333925f46bSAnshuman Khandual if (cpuhw->bhrb_users) 10343925f46bSAnshuman Khandual ppmu->config_bhrb(cpuhw->bhrb_filter); 10353925f46bSAnshuman Khandual 1036f2699491SMichael Ellerman local_irq_restore(flags); 1037f2699491SMichael Ellerman } 1038f2699491SMichael Ellerman 1039f2699491SMichael Ellerman static int collect_events(struct perf_event *group, int max_count, 1040f2699491SMichael Ellerman struct perf_event *ctrs[], u64 *events, 1041f2699491SMichael Ellerman unsigned int *flags) 1042f2699491SMichael Ellerman { 1043f2699491SMichael Ellerman int n = 0; 1044f2699491SMichael Ellerman struct perf_event *event; 1045f2699491SMichael Ellerman 1046f2699491SMichael Ellerman if (!is_software_event(group)) { 1047f2699491SMichael Ellerman if (n >= max_count) 1048f2699491SMichael Ellerman return -1; 1049f2699491SMichael Ellerman ctrs[n] = group; 1050f2699491SMichael Ellerman flags[n] = group->hw.event_base; 1051f2699491SMichael Ellerman events[n++] = group->hw.config; 1052f2699491SMichael Ellerman } 1053f2699491SMichael Ellerman list_for_each_entry(event, &group->sibling_list, group_entry) { 1054f2699491SMichael Ellerman if (!is_software_event(event) && 1055f2699491SMichael Ellerman event->state != PERF_EVENT_STATE_OFF) { 1056f2699491SMichael Ellerman if (n >= max_count) 1057f2699491SMichael Ellerman return -1; 1058f2699491SMichael Ellerman ctrs[n] = event; 1059f2699491SMichael Ellerman flags[n] = event->hw.event_base; 1060f2699491SMichael Ellerman events[n++] = event->hw.config; 1061f2699491SMichael Ellerman } 1062f2699491SMichael Ellerman } 1063f2699491SMichael Ellerman return n; 1064f2699491SMichael Ellerman } 1065f2699491SMichael Ellerman 1066f2699491SMichael Ellerman /* 1067f2699491SMichael Ellerman * Add a event to the PMU. 1068f2699491SMichael Ellerman * If all events are not already frozen, then we disable and 1069f2699491SMichael Ellerman * re-enable the PMU in order to get hw_perf_enable to do the 1070f2699491SMichael Ellerman * actual work of reconfiguring the PMU. 1071f2699491SMichael Ellerman */ 1072f2699491SMichael Ellerman static int power_pmu_add(struct perf_event *event, int ef_flags) 1073f2699491SMichael Ellerman { 1074f2699491SMichael Ellerman struct cpu_hw_events *cpuhw; 1075f2699491SMichael Ellerman unsigned long flags; 1076f2699491SMichael Ellerman int n0; 1077f2699491SMichael Ellerman int ret = -EAGAIN; 1078f2699491SMichael Ellerman 1079f2699491SMichael Ellerman local_irq_save(flags); 1080f2699491SMichael Ellerman perf_pmu_disable(event->pmu); 1081f2699491SMichael Ellerman 1082f2699491SMichael Ellerman /* 1083f2699491SMichael Ellerman * Add the event to the list (if there is room) 1084f2699491SMichael Ellerman * and check whether the total set is still feasible. 1085f2699491SMichael Ellerman */ 1086f2699491SMichael Ellerman cpuhw = &__get_cpu_var(cpu_hw_events); 1087f2699491SMichael Ellerman n0 = cpuhw->n_events; 1088f2699491SMichael Ellerman if (n0 >= ppmu->n_counter) 1089f2699491SMichael Ellerman goto out; 1090f2699491SMichael Ellerman cpuhw->event[n0] = event; 1091f2699491SMichael Ellerman cpuhw->events[n0] = event->hw.config; 1092f2699491SMichael Ellerman cpuhw->flags[n0] = event->hw.event_base; 1093f2699491SMichael Ellerman 1094f53d168cSsukadev@linux.vnet.ibm.com /* 1095f53d168cSsukadev@linux.vnet.ibm.com * This event may have been disabled/stopped in record_and_restart() 1096f53d168cSsukadev@linux.vnet.ibm.com * because we exceeded the ->event_limit. If re-starting the event, 1097f53d168cSsukadev@linux.vnet.ibm.com * clear the ->hw.state (STOPPED and UPTODATE flags), so the user 1098f53d168cSsukadev@linux.vnet.ibm.com * notification is re-enabled. 1099f53d168cSsukadev@linux.vnet.ibm.com */ 1100f2699491SMichael Ellerman if (!(ef_flags & PERF_EF_START)) 1101f2699491SMichael Ellerman event->hw.state = PERF_HES_STOPPED | PERF_HES_UPTODATE; 1102f53d168cSsukadev@linux.vnet.ibm.com else 1103f53d168cSsukadev@linux.vnet.ibm.com event->hw.state = 0; 1104f2699491SMichael Ellerman 1105f2699491SMichael Ellerman /* 1106f2699491SMichael Ellerman * If group events scheduling transaction was started, 1107f2699491SMichael Ellerman * skip the schedulability test here, it will be performed 1108f2699491SMichael Ellerman * at commit time(->commit_txn) as a whole 1109f2699491SMichael Ellerman */ 1110f2699491SMichael Ellerman if (cpuhw->group_flag & PERF_EVENT_TXN) 1111f2699491SMichael Ellerman goto nocheck; 1112f2699491SMichael Ellerman 1113f2699491SMichael Ellerman if (check_excludes(cpuhw->event, cpuhw->flags, n0, 1)) 1114f2699491SMichael Ellerman goto out; 1115f2699491SMichael Ellerman if (power_check_constraints(cpuhw, cpuhw->events, cpuhw->flags, n0 + 1)) 1116f2699491SMichael Ellerman goto out; 1117f2699491SMichael Ellerman event->hw.config = cpuhw->events[n0]; 1118f2699491SMichael Ellerman 1119f2699491SMichael Ellerman nocheck: 1120f2699491SMichael Ellerman ++cpuhw->n_events; 1121f2699491SMichael Ellerman ++cpuhw->n_added; 1122f2699491SMichael Ellerman 1123f2699491SMichael Ellerman ret = 0; 1124f2699491SMichael Ellerman out: 11253925f46bSAnshuman Khandual if (has_branch_stack(event)) 11263925f46bSAnshuman Khandual power_pmu_bhrb_enable(event); 11273925f46bSAnshuman Khandual 1128f2699491SMichael Ellerman perf_pmu_enable(event->pmu); 1129f2699491SMichael Ellerman local_irq_restore(flags); 1130f2699491SMichael Ellerman return ret; 1131f2699491SMichael Ellerman } 1132f2699491SMichael Ellerman 1133f2699491SMichael Ellerman /* 1134f2699491SMichael Ellerman * Remove a event from the PMU. 1135f2699491SMichael Ellerman */ 1136f2699491SMichael Ellerman static void power_pmu_del(struct perf_event *event, int ef_flags) 1137f2699491SMichael Ellerman { 1138f2699491SMichael Ellerman struct cpu_hw_events *cpuhw; 1139f2699491SMichael Ellerman long i; 1140f2699491SMichael Ellerman unsigned long flags; 1141f2699491SMichael Ellerman 1142f2699491SMichael Ellerman local_irq_save(flags); 1143f2699491SMichael Ellerman perf_pmu_disable(event->pmu); 1144f2699491SMichael Ellerman 1145f2699491SMichael Ellerman power_pmu_read(event); 1146f2699491SMichael Ellerman 1147f2699491SMichael Ellerman cpuhw = &__get_cpu_var(cpu_hw_events); 1148f2699491SMichael Ellerman for (i = 0; i < cpuhw->n_events; ++i) { 1149f2699491SMichael Ellerman if (event == cpuhw->event[i]) { 1150f2699491SMichael Ellerman while (++i < cpuhw->n_events) { 1151f2699491SMichael Ellerman cpuhw->event[i-1] = cpuhw->event[i]; 1152f2699491SMichael Ellerman cpuhw->events[i-1] = cpuhw->events[i]; 1153f2699491SMichael Ellerman cpuhw->flags[i-1] = cpuhw->flags[i]; 1154f2699491SMichael Ellerman } 1155f2699491SMichael Ellerman --cpuhw->n_events; 1156f2699491SMichael Ellerman ppmu->disable_pmc(event->hw.idx - 1, cpuhw->mmcr); 1157f2699491SMichael Ellerman if (event->hw.idx) { 1158f2699491SMichael Ellerman write_pmc(event->hw.idx, 0); 1159f2699491SMichael Ellerman event->hw.idx = 0; 1160f2699491SMichael Ellerman } 1161f2699491SMichael Ellerman perf_event_update_userpage(event); 1162f2699491SMichael Ellerman break; 1163f2699491SMichael Ellerman } 1164f2699491SMichael Ellerman } 1165f2699491SMichael Ellerman for (i = 0; i < cpuhw->n_limited; ++i) 1166f2699491SMichael Ellerman if (event == cpuhw->limited_counter[i]) 1167f2699491SMichael Ellerman break; 1168f2699491SMichael Ellerman if (i < cpuhw->n_limited) { 1169f2699491SMichael Ellerman while (++i < cpuhw->n_limited) { 1170f2699491SMichael Ellerman cpuhw->limited_counter[i-1] = cpuhw->limited_counter[i]; 1171f2699491SMichael Ellerman cpuhw->limited_hwidx[i-1] = cpuhw->limited_hwidx[i]; 1172f2699491SMichael Ellerman } 1173f2699491SMichael Ellerman --cpuhw->n_limited; 1174f2699491SMichael Ellerman } 1175f2699491SMichael Ellerman if (cpuhw->n_events == 0) { 1176f2699491SMichael Ellerman /* disable exceptions if no events are running */ 1177f2699491SMichael Ellerman cpuhw->mmcr[0] &= ~(MMCR0_PMXE | MMCR0_FCECE); 1178f2699491SMichael Ellerman } 1179f2699491SMichael Ellerman 11803925f46bSAnshuman Khandual if (has_branch_stack(event)) 11813925f46bSAnshuman Khandual power_pmu_bhrb_disable(event); 11823925f46bSAnshuman Khandual 1183f2699491SMichael Ellerman perf_pmu_enable(event->pmu); 1184f2699491SMichael Ellerman local_irq_restore(flags); 1185f2699491SMichael Ellerman } 1186f2699491SMichael Ellerman 1187f2699491SMichael Ellerman /* 1188f2699491SMichael Ellerman * POWER-PMU does not support disabling individual counters, hence 1189f2699491SMichael Ellerman * program their cycle counter to their max value and ignore the interrupts. 1190f2699491SMichael Ellerman */ 1191f2699491SMichael Ellerman 1192f2699491SMichael Ellerman static void power_pmu_start(struct perf_event *event, int ef_flags) 1193f2699491SMichael Ellerman { 1194f2699491SMichael Ellerman unsigned long flags; 1195f2699491SMichael Ellerman s64 left; 1196f2699491SMichael Ellerman unsigned long val; 1197f2699491SMichael Ellerman 1198f2699491SMichael Ellerman if (!event->hw.idx || !event->hw.sample_period) 1199f2699491SMichael Ellerman return; 1200f2699491SMichael Ellerman 1201f2699491SMichael Ellerman if (!(event->hw.state & PERF_HES_STOPPED)) 1202f2699491SMichael Ellerman return; 1203f2699491SMichael Ellerman 1204f2699491SMichael Ellerman if (ef_flags & PERF_EF_RELOAD) 1205f2699491SMichael Ellerman WARN_ON_ONCE(!(event->hw.state & PERF_HES_UPTODATE)); 1206f2699491SMichael Ellerman 1207f2699491SMichael Ellerman local_irq_save(flags); 1208f2699491SMichael Ellerman perf_pmu_disable(event->pmu); 1209f2699491SMichael Ellerman 1210f2699491SMichael Ellerman event->hw.state = 0; 1211f2699491SMichael Ellerman left = local64_read(&event->hw.period_left); 1212f2699491SMichael Ellerman 1213f2699491SMichael Ellerman val = 0; 1214f2699491SMichael Ellerman if (left < 0x80000000L) 1215f2699491SMichael Ellerman val = 0x80000000L - left; 1216f2699491SMichael Ellerman 1217f2699491SMichael Ellerman write_pmc(event->hw.idx, val); 1218f2699491SMichael Ellerman 1219f2699491SMichael Ellerman perf_event_update_userpage(event); 1220f2699491SMichael Ellerman perf_pmu_enable(event->pmu); 1221f2699491SMichael Ellerman local_irq_restore(flags); 1222f2699491SMichael Ellerman } 1223f2699491SMichael Ellerman 1224f2699491SMichael Ellerman static void power_pmu_stop(struct perf_event *event, int ef_flags) 1225f2699491SMichael Ellerman { 1226f2699491SMichael Ellerman unsigned long flags; 1227f2699491SMichael Ellerman 1228f2699491SMichael Ellerman if (!event->hw.idx || !event->hw.sample_period) 1229f2699491SMichael Ellerman return; 1230f2699491SMichael Ellerman 1231f2699491SMichael Ellerman if (event->hw.state & PERF_HES_STOPPED) 1232f2699491SMichael Ellerman return; 1233f2699491SMichael Ellerman 1234f2699491SMichael Ellerman local_irq_save(flags); 1235f2699491SMichael Ellerman perf_pmu_disable(event->pmu); 1236f2699491SMichael Ellerman 1237f2699491SMichael Ellerman power_pmu_read(event); 1238f2699491SMichael Ellerman event->hw.state |= PERF_HES_STOPPED | PERF_HES_UPTODATE; 1239f2699491SMichael Ellerman write_pmc(event->hw.idx, 0); 1240f2699491SMichael Ellerman 1241f2699491SMichael Ellerman perf_event_update_userpage(event); 1242f2699491SMichael Ellerman perf_pmu_enable(event->pmu); 1243f2699491SMichael Ellerman local_irq_restore(flags); 1244f2699491SMichael Ellerman } 1245f2699491SMichael Ellerman 1246f2699491SMichael Ellerman /* 1247f2699491SMichael Ellerman * Start group events scheduling transaction 1248f2699491SMichael Ellerman * Set the flag to make pmu::enable() not perform the 1249f2699491SMichael Ellerman * schedulability test, it will be performed at commit time 1250f2699491SMichael Ellerman */ 1251f2699491SMichael Ellerman void power_pmu_start_txn(struct pmu *pmu) 1252f2699491SMichael Ellerman { 1253f2699491SMichael Ellerman struct cpu_hw_events *cpuhw = &__get_cpu_var(cpu_hw_events); 1254f2699491SMichael Ellerman 1255f2699491SMichael Ellerman perf_pmu_disable(pmu); 1256f2699491SMichael Ellerman cpuhw->group_flag |= PERF_EVENT_TXN; 1257f2699491SMichael Ellerman cpuhw->n_txn_start = cpuhw->n_events; 1258f2699491SMichael Ellerman } 1259f2699491SMichael Ellerman 1260f2699491SMichael Ellerman /* 1261f2699491SMichael Ellerman * Stop group events scheduling transaction 1262f2699491SMichael Ellerman * Clear the flag and pmu::enable() will perform the 1263f2699491SMichael Ellerman * schedulability test. 1264f2699491SMichael Ellerman */ 1265f2699491SMichael Ellerman void power_pmu_cancel_txn(struct pmu *pmu) 1266f2699491SMichael Ellerman { 1267f2699491SMichael Ellerman struct cpu_hw_events *cpuhw = &__get_cpu_var(cpu_hw_events); 1268f2699491SMichael Ellerman 1269f2699491SMichael Ellerman cpuhw->group_flag &= ~PERF_EVENT_TXN; 1270f2699491SMichael Ellerman perf_pmu_enable(pmu); 1271f2699491SMichael Ellerman } 1272f2699491SMichael Ellerman 1273f2699491SMichael Ellerman /* 1274f2699491SMichael Ellerman * Commit group events scheduling transaction 1275f2699491SMichael Ellerman * Perform the group schedulability test as a whole 1276f2699491SMichael Ellerman * Return 0 if success 1277f2699491SMichael Ellerman */ 1278f2699491SMichael Ellerman int power_pmu_commit_txn(struct pmu *pmu) 1279f2699491SMichael Ellerman { 1280f2699491SMichael Ellerman struct cpu_hw_events *cpuhw; 1281f2699491SMichael Ellerman long i, n; 1282f2699491SMichael Ellerman 1283f2699491SMichael Ellerman if (!ppmu) 1284f2699491SMichael Ellerman return -EAGAIN; 1285f2699491SMichael Ellerman cpuhw = &__get_cpu_var(cpu_hw_events); 1286f2699491SMichael Ellerman n = cpuhw->n_events; 1287f2699491SMichael Ellerman if (check_excludes(cpuhw->event, cpuhw->flags, 0, n)) 1288f2699491SMichael Ellerman return -EAGAIN; 1289f2699491SMichael Ellerman i = power_check_constraints(cpuhw, cpuhw->events, cpuhw->flags, n); 1290f2699491SMichael Ellerman if (i < 0) 1291f2699491SMichael Ellerman return -EAGAIN; 1292f2699491SMichael Ellerman 1293f2699491SMichael Ellerman for (i = cpuhw->n_txn_start; i < n; ++i) 1294f2699491SMichael Ellerman cpuhw->event[i]->hw.config = cpuhw->events[i]; 1295f2699491SMichael Ellerman 1296f2699491SMichael Ellerman cpuhw->group_flag &= ~PERF_EVENT_TXN; 1297f2699491SMichael Ellerman perf_pmu_enable(pmu); 1298f2699491SMichael Ellerman return 0; 1299f2699491SMichael Ellerman } 1300f2699491SMichael Ellerman 1301f2699491SMichael Ellerman /* 1302f2699491SMichael Ellerman * Return 1 if we might be able to put event on a limited PMC, 1303f2699491SMichael Ellerman * or 0 if not. 1304f2699491SMichael Ellerman * A event can only go on a limited PMC if it counts something 1305f2699491SMichael Ellerman * that a limited PMC can count, doesn't require interrupts, and 1306f2699491SMichael Ellerman * doesn't exclude any processor mode. 1307f2699491SMichael Ellerman */ 1308f2699491SMichael Ellerman static int can_go_on_limited_pmc(struct perf_event *event, u64 ev, 1309f2699491SMichael Ellerman unsigned int flags) 1310f2699491SMichael Ellerman { 1311f2699491SMichael Ellerman int n; 1312f2699491SMichael Ellerman u64 alt[MAX_EVENT_ALTERNATIVES]; 1313f2699491SMichael Ellerman 1314f2699491SMichael Ellerman if (event->attr.exclude_user 1315f2699491SMichael Ellerman || event->attr.exclude_kernel 1316f2699491SMichael Ellerman || event->attr.exclude_hv 1317f2699491SMichael Ellerman || event->attr.sample_period) 1318f2699491SMichael Ellerman return 0; 1319f2699491SMichael Ellerman 1320f2699491SMichael Ellerman if (ppmu->limited_pmc_event(ev)) 1321f2699491SMichael Ellerman return 1; 1322f2699491SMichael Ellerman 1323f2699491SMichael Ellerman /* 1324f2699491SMichael Ellerman * The requested event_id isn't on a limited PMC already; 1325f2699491SMichael Ellerman * see if any alternative code goes on a limited PMC. 1326f2699491SMichael Ellerman */ 1327f2699491SMichael Ellerman if (!ppmu->get_alternatives) 1328f2699491SMichael Ellerman return 0; 1329f2699491SMichael Ellerman 1330f2699491SMichael Ellerman flags |= PPMU_LIMITED_PMC_OK | PPMU_LIMITED_PMC_REQD; 1331f2699491SMichael Ellerman n = ppmu->get_alternatives(ev, flags, alt); 1332f2699491SMichael Ellerman 1333f2699491SMichael Ellerman return n > 0; 1334f2699491SMichael Ellerman } 1335f2699491SMichael Ellerman 1336f2699491SMichael Ellerman /* 1337f2699491SMichael Ellerman * Find an alternative event_id that goes on a normal PMC, if possible, 1338f2699491SMichael Ellerman * and return the event_id code, or 0 if there is no such alternative. 1339f2699491SMichael Ellerman * (Note: event_id code 0 is "don't count" on all machines.) 1340f2699491SMichael Ellerman */ 1341f2699491SMichael Ellerman static u64 normal_pmc_alternative(u64 ev, unsigned long flags) 1342f2699491SMichael Ellerman { 1343f2699491SMichael Ellerman u64 alt[MAX_EVENT_ALTERNATIVES]; 1344f2699491SMichael Ellerman int n; 1345f2699491SMichael Ellerman 1346f2699491SMichael Ellerman flags &= ~(PPMU_LIMITED_PMC_OK | PPMU_LIMITED_PMC_REQD); 1347f2699491SMichael Ellerman n = ppmu->get_alternatives(ev, flags, alt); 1348f2699491SMichael Ellerman if (!n) 1349f2699491SMichael Ellerman return 0; 1350f2699491SMichael Ellerman return alt[0]; 1351f2699491SMichael Ellerman } 1352f2699491SMichael Ellerman 1353f2699491SMichael Ellerman /* Number of perf_events counting hardware events */ 1354f2699491SMichael Ellerman static atomic_t num_events; 1355f2699491SMichael Ellerman /* Used to avoid races in calling reserve/release_pmc_hardware */ 1356f2699491SMichael Ellerman static DEFINE_MUTEX(pmc_reserve_mutex); 1357f2699491SMichael Ellerman 1358f2699491SMichael Ellerman /* 1359f2699491SMichael Ellerman * Release the PMU if this is the last perf_event. 1360f2699491SMichael Ellerman */ 1361f2699491SMichael Ellerman static void hw_perf_event_destroy(struct perf_event *event) 1362f2699491SMichael Ellerman { 1363f2699491SMichael Ellerman if (!atomic_add_unless(&num_events, -1, 1)) { 1364f2699491SMichael Ellerman mutex_lock(&pmc_reserve_mutex); 1365f2699491SMichael Ellerman if (atomic_dec_return(&num_events) == 0) 1366f2699491SMichael Ellerman release_pmc_hardware(); 1367f2699491SMichael Ellerman mutex_unlock(&pmc_reserve_mutex); 1368f2699491SMichael Ellerman } 1369f2699491SMichael Ellerman } 1370f2699491SMichael Ellerman 1371f2699491SMichael Ellerman /* 1372f2699491SMichael Ellerman * Translate a generic cache event_id config to a raw event_id code. 1373f2699491SMichael Ellerman */ 1374f2699491SMichael Ellerman static int hw_perf_cache_event(u64 config, u64 *eventp) 1375f2699491SMichael Ellerman { 1376f2699491SMichael Ellerman unsigned long type, op, result; 1377f2699491SMichael Ellerman int ev; 1378f2699491SMichael Ellerman 1379f2699491SMichael Ellerman if (!ppmu->cache_events) 1380f2699491SMichael Ellerman return -EINVAL; 1381f2699491SMichael Ellerman 1382f2699491SMichael Ellerman /* unpack config */ 1383f2699491SMichael Ellerman type = config & 0xff; 1384f2699491SMichael Ellerman op = (config >> 8) & 0xff; 1385f2699491SMichael Ellerman result = (config >> 16) & 0xff; 1386f2699491SMichael Ellerman 1387f2699491SMichael Ellerman if (type >= PERF_COUNT_HW_CACHE_MAX || 1388f2699491SMichael Ellerman op >= PERF_COUNT_HW_CACHE_OP_MAX || 1389f2699491SMichael Ellerman result >= PERF_COUNT_HW_CACHE_RESULT_MAX) 1390f2699491SMichael Ellerman return -EINVAL; 1391f2699491SMichael Ellerman 1392f2699491SMichael Ellerman ev = (*ppmu->cache_events)[type][op][result]; 1393f2699491SMichael Ellerman if (ev == 0) 1394f2699491SMichael Ellerman return -EOPNOTSUPP; 1395f2699491SMichael Ellerman if (ev == -1) 1396f2699491SMichael Ellerman return -EINVAL; 1397f2699491SMichael Ellerman *eventp = ev; 1398f2699491SMichael Ellerman return 0; 1399f2699491SMichael Ellerman } 1400f2699491SMichael Ellerman 1401f2699491SMichael Ellerman static int power_pmu_event_init(struct perf_event *event) 1402f2699491SMichael Ellerman { 1403f2699491SMichael Ellerman u64 ev; 1404f2699491SMichael Ellerman unsigned long flags; 1405f2699491SMichael Ellerman struct perf_event *ctrs[MAX_HWEVENTS]; 1406f2699491SMichael Ellerman u64 events[MAX_HWEVENTS]; 1407f2699491SMichael Ellerman unsigned int cflags[MAX_HWEVENTS]; 1408f2699491SMichael Ellerman int n; 1409f2699491SMichael Ellerman int err; 1410f2699491SMichael Ellerman struct cpu_hw_events *cpuhw; 1411f2699491SMichael Ellerman 1412f2699491SMichael Ellerman if (!ppmu) 1413f2699491SMichael Ellerman return -ENOENT; 1414f2699491SMichael Ellerman 14153925f46bSAnshuman Khandual if (has_branch_stack(event)) { 14163925f46bSAnshuman Khandual /* PMU has BHRB enabled */ 14173925f46bSAnshuman Khandual if (!(ppmu->flags & PPMU_BHRB)) 14185375871dSLinus Torvalds return -EOPNOTSUPP; 14193925f46bSAnshuman Khandual } 14205375871dSLinus Torvalds 1421f2699491SMichael Ellerman switch (event->attr.type) { 1422f2699491SMichael Ellerman case PERF_TYPE_HARDWARE: 1423f2699491SMichael Ellerman ev = event->attr.config; 1424f2699491SMichael Ellerman if (ev >= ppmu->n_generic || ppmu->generic_events[ev] == 0) 1425f2699491SMichael Ellerman return -EOPNOTSUPP; 1426f2699491SMichael Ellerman ev = ppmu->generic_events[ev]; 1427f2699491SMichael Ellerman break; 1428f2699491SMichael Ellerman case PERF_TYPE_HW_CACHE: 1429f2699491SMichael Ellerman err = hw_perf_cache_event(event->attr.config, &ev); 1430f2699491SMichael Ellerman if (err) 1431f2699491SMichael Ellerman return err; 1432f2699491SMichael Ellerman break; 1433f2699491SMichael Ellerman case PERF_TYPE_RAW: 1434f2699491SMichael Ellerman ev = event->attr.config; 1435f2699491SMichael Ellerman break; 1436f2699491SMichael Ellerman default: 1437f2699491SMichael Ellerman return -ENOENT; 1438f2699491SMichael Ellerman } 1439f2699491SMichael Ellerman 1440f2699491SMichael Ellerman event->hw.config_base = ev; 1441f2699491SMichael Ellerman event->hw.idx = 0; 1442f2699491SMichael Ellerman 1443f2699491SMichael Ellerman /* 1444f2699491SMichael Ellerman * If we are not running on a hypervisor, force the 1445f2699491SMichael Ellerman * exclude_hv bit to 0 so that we don't care what 1446f2699491SMichael Ellerman * the user set it to. 1447f2699491SMichael Ellerman */ 1448f2699491SMichael Ellerman if (!firmware_has_feature(FW_FEATURE_LPAR)) 1449f2699491SMichael Ellerman event->attr.exclude_hv = 0; 1450f2699491SMichael Ellerman 1451f2699491SMichael Ellerman /* 1452f2699491SMichael Ellerman * If this is a per-task event, then we can use 1453f2699491SMichael Ellerman * PM_RUN_* events interchangeably with their non RUN_* 1454f2699491SMichael Ellerman * equivalents, e.g. PM_RUN_CYC instead of PM_CYC. 1455f2699491SMichael Ellerman * XXX we should check if the task is an idle task. 1456f2699491SMichael Ellerman */ 1457f2699491SMichael Ellerman flags = 0; 1458f2699491SMichael Ellerman if (event->attach_state & PERF_ATTACH_TASK) 1459f2699491SMichael Ellerman flags |= PPMU_ONLY_COUNT_RUN; 1460f2699491SMichael Ellerman 1461f2699491SMichael Ellerman /* 1462f2699491SMichael Ellerman * If this machine has limited events, check whether this 1463f2699491SMichael Ellerman * event_id could go on a limited event. 1464f2699491SMichael Ellerman */ 1465f2699491SMichael Ellerman if (ppmu->flags & PPMU_LIMITED_PMC5_6) { 1466f2699491SMichael Ellerman if (can_go_on_limited_pmc(event, ev, flags)) { 1467f2699491SMichael Ellerman flags |= PPMU_LIMITED_PMC_OK; 1468f2699491SMichael Ellerman } else if (ppmu->limited_pmc_event(ev)) { 1469f2699491SMichael Ellerman /* 1470f2699491SMichael Ellerman * The requested event_id is on a limited PMC, 1471f2699491SMichael Ellerman * but we can't use a limited PMC; see if any 1472f2699491SMichael Ellerman * alternative goes on a normal PMC. 1473f2699491SMichael Ellerman */ 1474f2699491SMichael Ellerman ev = normal_pmc_alternative(ev, flags); 1475f2699491SMichael Ellerman if (!ev) 1476f2699491SMichael Ellerman return -EINVAL; 1477f2699491SMichael Ellerman } 1478f2699491SMichael Ellerman } 1479f2699491SMichael Ellerman 1480f2699491SMichael Ellerman /* 1481f2699491SMichael Ellerman * If this is in a group, check if it can go on with all the 1482f2699491SMichael Ellerman * other hardware events in the group. We assume the event 1483f2699491SMichael Ellerman * hasn't been linked into its leader's sibling list at this point. 1484f2699491SMichael Ellerman */ 1485f2699491SMichael Ellerman n = 0; 1486f2699491SMichael Ellerman if (event->group_leader != event) { 1487f2699491SMichael Ellerman n = collect_events(event->group_leader, ppmu->n_counter - 1, 1488f2699491SMichael Ellerman ctrs, events, cflags); 1489f2699491SMichael Ellerman if (n < 0) 1490f2699491SMichael Ellerman return -EINVAL; 1491f2699491SMichael Ellerman } 1492f2699491SMichael Ellerman events[n] = ev; 1493f2699491SMichael Ellerman ctrs[n] = event; 1494f2699491SMichael Ellerman cflags[n] = flags; 1495f2699491SMichael Ellerman if (check_excludes(ctrs, cflags, n, 1)) 1496f2699491SMichael Ellerman return -EINVAL; 1497f2699491SMichael Ellerman 1498f2699491SMichael Ellerman cpuhw = &get_cpu_var(cpu_hw_events); 1499f2699491SMichael Ellerman err = power_check_constraints(cpuhw, events, cflags, n + 1); 15003925f46bSAnshuman Khandual 15013925f46bSAnshuman Khandual if (has_branch_stack(event)) { 15023925f46bSAnshuman Khandual cpuhw->bhrb_filter = ppmu->bhrb_filter_map( 15033925f46bSAnshuman Khandual event->attr.branch_sample_type); 15043925f46bSAnshuman Khandual 15053925f46bSAnshuman Khandual if(cpuhw->bhrb_filter == -1) 15063925f46bSAnshuman Khandual return -EOPNOTSUPP; 15073925f46bSAnshuman Khandual } 15083925f46bSAnshuman Khandual 1509f2699491SMichael Ellerman put_cpu_var(cpu_hw_events); 1510f2699491SMichael Ellerman if (err) 1511f2699491SMichael Ellerman return -EINVAL; 1512f2699491SMichael Ellerman 1513f2699491SMichael Ellerman event->hw.config = events[n]; 1514f2699491SMichael Ellerman event->hw.event_base = cflags[n]; 1515f2699491SMichael Ellerman event->hw.last_period = event->hw.sample_period; 1516f2699491SMichael Ellerman local64_set(&event->hw.period_left, event->hw.last_period); 1517f2699491SMichael Ellerman 1518f2699491SMichael Ellerman /* 1519f2699491SMichael Ellerman * See if we need to reserve the PMU. 1520f2699491SMichael Ellerman * If no events are currently in use, then we have to take a 1521f2699491SMichael Ellerman * mutex to ensure that we don't race with another task doing 1522f2699491SMichael Ellerman * reserve_pmc_hardware or release_pmc_hardware. 1523f2699491SMichael Ellerman */ 1524f2699491SMichael Ellerman err = 0; 1525f2699491SMichael Ellerman if (!atomic_inc_not_zero(&num_events)) { 1526f2699491SMichael Ellerman mutex_lock(&pmc_reserve_mutex); 1527f2699491SMichael Ellerman if (atomic_read(&num_events) == 0 && 1528f2699491SMichael Ellerman reserve_pmc_hardware(perf_event_interrupt)) 1529f2699491SMichael Ellerman err = -EBUSY; 1530f2699491SMichael Ellerman else 1531f2699491SMichael Ellerman atomic_inc(&num_events); 1532f2699491SMichael Ellerman mutex_unlock(&pmc_reserve_mutex); 1533f2699491SMichael Ellerman } 1534f2699491SMichael Ellerman event->destroy = hw_perf_event_destroy; 1535f2699491SMichael Ellerman 1536f2699491SMichael Ellerman return err; 1537f2699491SMichael Ellerman } 1538f2699491SMichael Ellerman 15395375871dSLinus Torvalds static int power_pmu_event_idx(struct perf_event *event) 15405375871dSLinus Torvalds { 15415375871dSLinus Torvalds return event->hw.idx; 15425375871dSLinus Torvalds } 15435375871dSLinus Torvalds 15441c53a270SSukadev Bhattiprolu ssize_t power_events_sysfs_show(struct device *dev, 15451c53a270SSukadev Bhattiprolu struct device_attribute *attr, char *page) 15461c53a270SSukadev Bhattiprolu { 15471c53a270SSukadev Bhattiprolu struct perf_pmu_events_attr *pmu_attr; 15481c53a270SSukadev Bhattiprolu 15491c53a270SSukadev Bhattiprolu pmu_attr = container_of(attr, struct perf_pmu_events_attr, attr); 15501c53a270SSukadev Bhattiprolu 15511c53a270SSukadev Bhattiprolu return sprintf(page, "event=0x%02llx\n", pmu_attr->id); 15521c53a270SSukadev Bhattiprolu } 15531c53a270SSukadev Bhattiprolu 1554f2699491SMichael Ellerman struct pmu power_pmu = { 1555f2699491SMichael Ellerman .pmu_enable = power_pmu_enable, 1556f2699491SMichael Ellerman .pmu_disable = power_pmu_disable, 1557f2699491SMichael Ellerman .event_init = power_pmu_event_init, 1558f2699491SMichael Ellerman .add = power_pmu_add, 1559f2699491SMichael Ellerman .del = power_pmu_del, 1560f2699491SMichael Ellerman .start = power_pmu_start, 1561f2699491SMichael Ellerman .stop = power_pmu_stop, 1562f2699491SMichael Ellerman .read = power_pmu_read, 1563f2699491SMichael Ellerman .start_txn = power_pmu_start_txn, 1564f2699491SMichael Ellerman .cancel_txn = power_pmu_cancel_txn, 1565f2699491SMichael Ellerman .commit_txn = power_pmu_commit_txn, 15665375871dSLinus Torvalds .event_idx = power_pmu_event_idx, 15673925f46bSAnshuman Khandual .flush_branch_stack = power_pmu_flush_branch_stack, 1568f2699491SMichael Ellerman }; 1569f2699491SMichael Ellerman 1570f2699491SMichael Ellerman /* 1571f2699491SMichael Ellerman * A counter has overflowed; update its count and record 1572f2699491SMichael Ellerman * things if requested. Note that interrupts are hard-disabled 1573f2699491SMichael Ellerman * here so there is no possibility of being interrupted. 1574f2699491SMichael Ellerman */ 1575f2699491SMichael Ellerman static void record_and_restart(struct perf_event *event, unsigned long val, 1576f2699491SMichael Ellerman struct pt_regs *regs) 1577f2699491SMichael Ellerman { 1578f2699491SMichael Ellerman u64 period = event->hw.sample_period; 1579f2699491SMichael Ellerman s64 prev, delta, left; 1580f2699491SMichael Ellerman int record = 0; 1581f2699491SMichael Ellerman 1582f2699491SMichael Ellerman if (event->hw.state & PERF_HES_STOPPED) { 1583f2699491SMichael Ellerman write_pmc(event->hw.idx, 0); 1584f2699491SMichael Ellerman return; 1585f2699491SMichael Ellerman } 1586f2699491SMichael Ellerman 1587f2699491SMichael Ellerman /* we don't have to worry about interrupts here */ 1588f2699491SMichael Ellerman prev = local64_read(&event->hw.prev_count); 1589f2699491SMichael Ellerman delta = check_and_compute_delta(prev, val); 1590f2699491SMichael Ellerman local64_add(delta, &event->count); 1591f2699491SMichael Ellerman 1592f2699491SMichael Ellerman /* 1593f2699491SMichael Ellerman * See if the total period for this event has expired, 1594f2699491SMichael Ellerman * and update for the next period. 1595f2699491SMichael Ellerman */ 1596f2699491SMichael Ellerman val = 0; 1597f2699491SMichael Ellerman left = local64_read(&event->hw.period_left) - delta; 1598e13e895fSMichael Neuling if (delta == 0) 1599e13e895fSMichael Neuling left++; 1600f2699491SMichael Ellerman if (period) { 1601f2699491SMichael Ellerman if (left <= 0) { 1602f2699491SMichael Ellerman left += period; 1603f2699491SMichael Ellerman if (left <= 0) 1604f2699491SMichael Ellerman left = period; 1605e6878835Ssukadev@linux.vnet.ibm.com record = siar_valid(regs); 1606f2699491SMichael Ellerman event->hw.last_period = event->hw.sample_period; 1607f2699491SMichael Ellerman } 1608f2699491SMichael Ellerman if (left < 0x80000000LL) 1609f2699491SMichael Ellerman val = 0x80000000LL - left; 1610f2699491SMichael Ellerman } 1611f2699491SMichael Ellerman 1612f2699491SMichael Ellerman write_pmc(event->hw.idx, val); 1613f2699491SMichael Ellerman local64_set(&event->hw.prev_count, val); 1614f2699491SMichael Ellerman local64_set(&event->hw.period_left, left); 1615f2699491SMichael Ellerman perf_event_update_userpage(event); 1616f2699491SMichael Ellerman 1617f2699491SMichael Ellerman /* 1618f2699491SMichael Ellerman * Finally record data if requested. 1619f2699491SMichael Ellerman */ 1620f2699491SMichael Ellerman if (record) { 1621f2699491SMichael Ellerman struct perf_sample_data data; 1622f2699491SMichael Ellerman 1623fd0d000bSRobert Richter perf_sample_data_init(&data, ~0ULL, event->hw.last_period); 1624f2699491SMichael Ellerman 1625f2699491SMichael Ellerman if (event->attr.sample_type & PERF_SAMPLE_ADDR) 1626f2699491SMichael Ellerman perf_get_data_addr(regs, &data.addr); 1627f2699491SMichael Ellerman 16283925f46bSAnshuman Khandual if (event->attr.sample_type & PERF_SAMPLE_BRANCH_STACK) { 16293925f46bSAnshuman Khandual struct cpu_hw_events *cpuhw; 16303925f46bSAnshuman Khandual cpuhw = &__get_cpu_var(cpu_hw_events); 16313925f46bSAnshuman Khandual power_pmu_bhrb_read(cpuhw); 16323925f46bSAnshuman Khandual data.br_stack = &cpuhw->bhrb_stack; 16333925f46bSAnshuman Khandual } 16343925f46bSAnshuman Khandual 1635f2699491SMichael Ellerman if (perf_event_overflow(event, &data, regs)) 1636f2699491SMichael Ellerman power_pmu_stop(event, 0); 1637f2699491SMichael Ellerman } 1638f2699491SMichael Ellerman } 1639f2699491SMichael Ellerman 1640f2699491SMichael Ellerman /* 1641f2699491SMichael Ellerman * Called from generic code to get the misc flags (i.e. processor mode) 1642f2699491SMichael Ellerman * for an event_id. 1643f2699491SMichael Ellerman */ 1644f2699491SMichael Ellerman unsigned long perf_misc_flags(struct pt_regs *regs) 1645f2699491SMichael Ellerman { 1646f2699491SMichael Ellerman u32 flags = perf_get_misc_flags(regs); 1647f2699491SMichael Ellerman 1648f2699491SMichael Ellerman if (flags) 1649f2699491SMichael Ellerman return flags; 1650f2699491SMichael Ellerman return user_mode(regs) ? PERF_RECORD_MISC_USER : 1651f2699491SMichael Ellerman PERF_RECORD_MISC_KERNEL; 1652f2699491SMichael Ellerman } 1653f2699491SMichael Ellerman 1654f2699491SMichael Ellerman /* 1655f2699491SMichael Ellerman * Called from generic code to get the instruction pointer 1656f2699491SMichael Ellerman * for an event_id. 1657f2699491SMichael Ellerman */ 1658f2699491SMichael Ellerman unsigned long perf_instruction_pointer(struct pt_regs *regs) 1659f2699491SMichael Ellerman { 166033904054SMichael Ellerman bool use_siar = regs_use_siar(regs); 1661f2699491SMichael Ellerman 1662e6878835Ssukadev@linux.vnet.ibm.com if (use_siar && siar_valid(regs)) 16631ce447b9SBenjamin Herrenschmidt return mfspr(SPRN_SIAR) + perf_ip_adjust(regs); 1664e6878835Ssukadev@linux.vnet.ibm.com else if (use_siar) 1665e6878835Ssukadev@linux.vnet.ibm.com return 0; // no valid instruction pointer 166675382aa7SAnton Blanchard else 166775382aa7SAnton Blanchard return regs->nip; 1668f2699491SMichael Ellerman } 1669f2699491SMichael Ellerman 1670bc09c219SMichael Neuling static bool pmc_overflow_power7(unsigned long val) 1671f2699491SMichael Ellerman { 1672f2699491SMichael Ellerman /* 1673f2699491SMichael Ellerman * Events on POWER7 can roll back if a speculative event doesn't 1674f2699491SMichael Ellerman * eventually complete. Unfortunately in some rare cases they will 1675f2699491SMichael Ellerman * raise a performance monitor exception. We need to catch this to 1676f2699491SMichael Ellerman * ensure we reset the PMC. In all cases the PMC will be 256 or less 1677f2699491SMichael Ellerman * cycles from overflow. 1678f2699491SMichael Ellerman * 1679f2699491SMichael Ellerman * We only do this if the first pass fails to find any overflowing 1680f2699491SMichael Ellerman * PMCs because a user might set a period of less than 256 and we 1681f2699491SMichael Ellerman * don't want to mistakenly reset them. 1682f2699491SMichael Ellerman */ 1683bc09c219SMichael Neuling if ((0x80000000 - val) <= 256) 1684bc09c219SMichael Neuling return true; 1685bc09c219SMichael Neuling 1686bc09c219SMichael Neuling return false; 1687bc09c219SMichael Neuling } 1688bc09c219SMichael Neuling 1689bc09c219SMichael Neuling static bool pmc_overflow(unsigned long val) 1690bc09c219SMichael Neuling { 1691bc09c219SMichael Neuling if ((int)val < 0) 1692f2699491SMichael Ellerman return true; 1693f2699491SMichael Ellerman 1694f2699491SMichael Ellerman return false; 1695f2699491SMichael Ellerman } 1696f2699491SMichael Ellerman 1697f2699491SMichael Ellerman /* 1698f2699491SMichael Ellerman * Performance monitor interrupt stuff 1699f2699491SMichael Ellerman */ 1700f2699491SMichael Ellerman static void perf_event_interrupt(struct pt_regs *regs) 1701f2699491SMichael Ellerman { 1702bc09c219SMichael Neuling int i, j; 1703f2699491SMichael Ellerman struct cpu_hw_events *cpuhw = &__get_cpu_var(cpu_hw_events); 1704f2699491SMichael Ellerman struct perf_event *event; 1705bc09c219SMichael Neuling unsigned long val[8]; 1706bc09c219SMichael Neuling int found, active; 1707f2699491SMichael Ellerman int nmi; 1708f2699491SMichael Ellerman 1709f2699491SMichael Ellerman if (cpuhw->n_limited) 1710f2699491SMichael Ellerman freeze_limited_counters(cpuhw, mfspr(SPRN_PMC5), 1711f2699491SMichael Ellerman mfspr(SPRN_PMC6)); 1712f2699491SMichael Ellerman 1713f2699491SMichael Ellerman perf_read_regs(regs); 1714f2699491SMichael Ellerman 1715f2699491SMichael Ellerman nmi = perf_intr_is_nmi(regs); 1716f2699491SMichael Ellerman if (nmi) 1717f2699491SMichael Ellerman nmi_enter(); 1718f2699491SMichael Ellerman else 1719f2699491SMichael Ellerman irq_enter(); 1720f2699491SMichael Ellerman 1721bc09c219SMichael Neuling /* Read all the PMCs since we'll need them a bunch of times */ 1722bc09c219SMichael Neuling for (i = 0; i < ppmu->n_counter; ++i) 1723bc09c219SMichael Neuling val[i] = read_pmc(i + 1); 1724bc09c219SMichael Neuling 1725bc09c219SMichael Neuling /* Try to find what caused the IRQ */ 1726bc09c219SMichael Neuling found = 0; 1727bc09c219SMichael Neuling for (i = 0; i < ppmu->n_counter; ++i) { 1728bc09c219SMichael Neuling if (!pmc_overflow(val[i])) 1729bc09c219SMichael Neuling continue; 1730bc09c219SMichael Neuling if (is_limited_pmc(i + 1)) 1731bc09c219SMichael Neuling continue; /* these won't generate IRQs */ 1732bc09c219SMichael Neuling /* 1733bc09c219SMichael Neuling * We've found one that's overflowed. For active 1734bc09c219SMichael Neuling * counters we need to log this. For inactive 1735bc09c219SMichael Neuling * counters, we need to reset it anyway 1736bc09c219SMichael Neuling */ 1737bc09c219SMichael Neuling found = 1; 1738bc09c219SMichael Neuling active = 0; 1739bc09c219SMichael Neuling for (j = 0; j < cpuhw->n_events; ++j) { 1740bc09c219SMichael Neuling event = cpuhw->event[j]; 1741bc09c219SMichael Neuling if (event->hw.idx == (i + 1)) { 1742bc09c219SMichael Neuling active = 1; 1743bc09c219SMichael Neuling record_and_restart(event, val[i], regs); 1744bc09c219SMichael Neuling break; 1745bc09c219SMichael Neuling } 1746bc09c219SMichael Neuling } 1747bc09c219SMichael Neuling if (!active) 1748bc09c219SMichael Neuling /* reset non active counters that have overflowed */ 1749bc09c219SMichael Neuling write_pmc(i + 1, 0); 1750bc09c219SMichael Neuling } 1751bc09c219SMichael Neuling if (!found && pvr_version_is(PVR_POWER7)) { 1752bc09c219SMichael Neuling /* check active counters for special buggy p7 overflow */ 1753f2699491SMichael Ellerman for (i = 0; i < cpuhw->n_events; ++i) { 1754f2699491SMichael Ellerman event = cpuhw->event[i]; 1755f2699491SMichael Ellerman if (!event->hw.idx || is_limited_pmc(event->hw.idx)) 1756f2699491SMichael Ellerman continue; 1757bc09c219SMichael Neuling if (pmc_overflow_power7(val[event->hw.idx - 1])) { 1758bc09c219SMichael Neuling /* event has overflowed in a buggy way*/ 1759f2699491SMichael Ellerman found = 1; 1760bc09c219SMichael Neuling record_and_restart(event, 1761bc09c219SMichael Neuling val[event->hw.idx - 1], 1762bc09c219SMichael Neuling regs); 1763f2699491SMichael Ellerman } 1764f2699491SMichael Ellerman } 1765f2699491SMichael Ellerman } 1766bc09c219SMichael Neuling if ((!found) && printk_ratelimit()) 1767bc09c219SMichael Neuling printk(KERN_WARNING "Can't find PMC that caused IRQ\n"); 1768f2699491SMichael Ellerman 1769f2699491SMichael Ellerman /* 1770f2699491SMichael Ellerman * Reset MMCR0 to its normal value. This will set PMXE and 1771f2699491SMichael Ellerman * clear FC (freeze counters) and PMAO (perf mon alert occurred) 1772f2699491SMichael Ellerman * and thus allow interrupts to occur again. 1773f2699491SMichael Ellerman * XXX might want to use MSR.PM to keep the events frozen until 1774f2699491SMichael Ellerman * we get back out of this interrupt. 1775f2699491SMichael Ellerman */ 1776f2699491SMichael Ellerman write_mmcr0(cpuhw, cpuhw->mmcr[0]); 1777f2699491SMichael Ellerman 1778f2699491SMichael Ellerman if (nmi) 1779f2699491SMichael Ellerman nmi_exit(); 1780f2699491SMichael Ellerman else 1781f2699491SMichael Ellerman irq_exit(); 1782f2699491SMichael Ellerman } 1783f2699491SMichael Ellerman 1784f2699491SMichael Ellerman static void power_pmu_setup(int cpu) 1785f2699491SMichael Ellerman { 1786f2699491SMichael Ellerman struct cpu_hw_events *cpuhw = &per_cpu(cpu_hw_events, cpu); 1787f2699491SMichael Ellerman 1788f2699491SMichael Ellerman if (!ppmu) 1789f2699491SMichael Ellerman return; 1790f2699491SMichael Ellerman memset(cpuhw, 0, sizeof(*cpuhw)); 1791f2699491SMichael Ellerman cpuhw->mmcr[0] = MMCR0_FC; 1792f2699491SMichael Ellerman } 1793f2699491SMichael Ellerman 1794f2699491SMichael Ellerman static int __cpuinit 1795f2699491SMichael Ellerman power_pmu_notifier(struct notifier_block *self, unsigned long action, void *hcpu) 1796f2699491SMichael Ellerman { 1797f2699491SMichael Ellerman unsigned int cpu = (long)hcpu; 1798f2699491SMichael Ellerman 1799f2699491SMichael Ellerman switch (action & ~CPU_TASKS_FROZEN) { 1800f2699491SMichael Ellerman case CPU_UP_PREPARE: 1801f2699491SMichael Ellerman power_pmu_setup(cpu); 1802f2699491SMichael Ellerman break; 1803f2699491SMichael Ellerman 1804f2699491SMichael Ellerman default: 1805f2699491SMichael Ellerman break; 1806f2699491SMichael Ellerman } 1807f2699491SMichael Ellerman 1808f2699491SMichael Ellerman return NOTIFY_OK; 1809f2699491SMichael Ellerman } 1810f2699491SMichael Ellerman 1811f2699491SMichael Ellerman int __cpuinit register_power_pmu(struct power_pmu *pmu) 1812f2699491SMichael Ellerman { 1813f2699491SMichael Ellerman if (ppmu) 1814f2699491SMichael Ellerman return -EBUSY; /* something's already registered */ 1815f2699491SMichael Ellerman 1816f2699491SMichael Ellerman ppmu = pmu; 1817f2699491SMichael Ellerman pr_info("%s performance monitor hardware support registered\n", 1818f2699491SMichael Ellerman pmu->name); 1819f2699491SMichael Ellerman 18201c53a270SSukadev Bhattiprolu power_pmu.attr_groups = ppmu->attr_groups; 18211c53a270SSukadev Bhattiprolu 1822f2699491SMichael Ellerman #ifdef MSR_HV 1823f2699491SMichael Ellerman /* 1824f2699491SMichael Ellerman * Use FCHV to ignore kernel events if MSR.HV is set. 1825f2699491SMichael Ellerman */ 1826f2699491SMichael Ellerman if (mfmsr() & MSR_HV) 1827f2699491SMichael Ellerman freeze_events_kernel = MMCR0_FCHV; 1828f2699491SMichael Ellerman #endif /* CONFIG_PPC64 */ 1829f2699491SMichael Ellerman 1830f2699491SMichael Ellerman perf_pmu_register(&power_pmu, "cpu", PERF_TYPE_RAW); 1831f2699491SMichael Ellerman perf_cpu_notifier(power_pmu_notifier); 1832f2699491SMichael Ellerman 1833f2699491SMichael Ellerman return 0; 1834f2699491SMichael Ellerman } 1835