xref: /openbmc/linux/arch/x86/events/amd/uncore.c (revision 293d5b43)
1 /*
2  * Copyright (C) 2013 Advanced Micro Devices, Inc.
3  *
4  * Author: Jacob Shin <jacob.shin@amd.com>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 as
8  * published by the Free Software Foundation.
9  */
10 
11 #include <linux/perf_event.h>
12 #include <linux/percpu.h>
13 #include <linux/types.h>
14 #include <linux/slab.h>
15 #include <linux/init.h>
16 #include <linux/cpu.h>
17 #include <linux/cpumask.h>
18 
19 #include <asm/cpufeature.h>
20 #include <asm/perf_event.h>
21 #include <asm/msr.h>
22 
23 #define NUM_COUNTERS_NB		4
24 #define NUM_COUNTERS_L2		4
25 #define MAX_COUNTERS		NUM_COUNTERS_NB
26 
27 #define RDPMC_BASE_NB		6
28 #define RDPMC_BASE_L2		10
29 
30 #define COUNTER_SHIFT		16
31 
32 struct amd_uncore {
33 	int id;
34 	int refcnt;
35 	int cpu;
36 	int num_counters;
37 	int rdpmc_base;
38 	u32 msr_base;
39 	cpumask_t *active_mask;
40 	struct pmu *pmu;
41 	struct perf_event *events[MAX_COUNTERS];
42 	struct amd_uncore *free_when_cpu_online;
43 };
44 
45 static struct amd_uncore * __percpu *amd_uncore_nb;
46 static struct amd_uncore * __percpu *amd_uncore_l2;
47 
48 static struct pmu amd_nb_pmu;
49 static struct pmu amd_l2_pmu;
50 
51 static cpumask_t amd_nb_active_mask;
52 static cpumask_t amd_l2_active_mask;
53 
54 static bool is_nb_event(struct perf_event *event)
55 {
56 	return event->pmu->type == amd_nb_pmu.type;
57 }
58 
59 static bool is_l2_event(struct perf_event *event)
60 {
61 	return event->pmu->type == amd_l2_pmu.type;
62 }
63 
64 static struct amd_uncore *event_to_amd_uncore(struct perf_event *event)
65 {
66 	if (is_nb_event(event) && amd_uncore_nb)
67 		return *per_cpu_ptr(amd_uncore_nb, event->cpu);
68 	else if (is_l2_event(event) && amd_uncore_l2)
69 		return *per_cpu_ptr(amd_uncore_l2, event->cpu);
70 
71 	return NULL;
72 }
73 
74 static void amd_uncore_read(struct perf_event *event)
75 {
76 	struct hw_perf_event *hwc = &event->hw;
77 	u64 prev, new;
78 	s64 delta;
79 
80 	/*
81 	 * since we do not enable counter overflow interrupts,
82 	 * we do not have to worry about prev_count changing on us
83 	 */
84 
85 	prev = local64_read(&hwc->prev_count);
86 	rdpmcl(hwc->event_base_rdpmc, new);
87 	local64_set(&hwc->prev_count, new);
88 	delta = (new << COUNTER_SHIFT) - (prev << COUNTER_SHIFT);
89 	delta >>= COUNTER_SHIFT;
90 	local64_add(delta, &event->count);
91 }
92 
93 static void amd_uncore_start(struct perf_event *event, int flags)
94 {
95 	struct hw_perf_event *hwc = &event->hw;
96 
97 	if (flags & PERF_EF_RELOAD)
98 		wrmsrl(hwc->event_base, (u64)local64_read(&hwc->prev_count));
99 
100 	hwc->state = 0;
101 	wrmsrl(hwc->config_base, (hwc->config | ARCH_PERFMON_EVENTSEL_ENABLE));
102 	perf_event_update_userpage(event);
103 }
104 
105 static void amd_uncore_stop(struct perf_event *event, int flags)
106 {
107 	struct hw_perf_event *hwc = &event->hw;
108 
109 	wrmsrl(hwc->config_base, hwc->config);
110 	hwc->state |= PERF_HES_STOPPED;
111 
112 	if ((flags & PERF_EF_UPDATE) && !(hwc->state & PERF_HES_UPTODATE)) {
113 		amd_uncore_read(event);
114 		hwc->state |= PERF_HES_UPTODATE;
115 	}
116 }
117 
118 static int amd_uncore_add(struct perf_event *event, int flags)
119 {
120 	int i;
121 	struct amd_uncore *uncore = event_to_amd_uncore(event);
122 	struct hw_perf_event *hwc = &event->hw;
123 
124 	/* are we already assigned? */
125 	if (hwc->idx != -1 && uncore->events[hwc->idx] == event)
126 		goto out;
127 
128 	for (i = 0; i < uncore->num_counters; i++) {
129 		if (uncore->events[i] == event) {
130 			hwc->idx = i;
131 			goto out;
132 		}
133 	}
134 
135 	/* if not, take the first available counter */
136 	hwc->idx = -1;
137 	for (i = 0; i < uncore->num_counters; i++) {
138 		if (cmpxchg(&uncore->events[i], NULL, event) == NULL) {
139 			hwc->idx = i;
140 			break;
141 		}
142 	}
143 
144 out:
145 	if (hwc->idx == -1)
146 		return -EBUSY;
147 
148 	hwc->config_base = uncore->msr_base + (2 * hwc->idx);
149 	hwc->event_base = uncore->msr_base + 1 + (2 * hwc->idx);
150 	hwc->event_base_rdpmc = uncore->rdpmc_base + hwc->idx;
151 	hwc->state = PERF_HES_UPTODATE | PERF_HES_STOPPED;
152 
153 	if (flags & PERF_EF_START)
154 		amd_uncore_start(event, PERF_EF_RELOAD);
155 
156 	return 0;
157 }
158 
159 static void amd_uncore_del(struct perf_event *event, int flags)
160 {
161 	int i;
162 	struct amd_uncore *uncore = event_to_amd_uncore(event);
163 	struct hw_perf_event *hwc = &event->hw;
164 
165 	amd_uncore_stop(event, PERF_EF_UPDATE);
166 
167 	for (i = 0; i < uncore->num_counters; i++) {
168 		if (cmpxchg(&uncore->events[i], event, NULL) == event)
169 			break;
170 	}
171 
172 	hwc->idx = -1;
173 }
174 
175 static int amd_uncore_event_init(struct perf_event *event)
176 {
177 	struct amd_uncore *uncore;
178 	struct hw_perf_event *hwc = &event->hw;
179 
180 	if (event->attr.type != event->pmu->type)
181 		return -ENOENT;
182 
183 	/*
184 	 * NB and L2 counters (MSRs) are shared across all cores that share the
185 	 * same NB / L2 cache. Interrupts can be directed to a single target
186 	 * core, however, event counts generated by processes running on other
187 	 * cores cannot be masked out. So we do not support sampling and
188 	 * per-thread events.
189 	 */
190 	if (is_sampling_event(event) || event->attach_state & PERF_ATTACH_TASK)
191 		return -EINVAL;
192 
193 	/* NB and L2 counters do not have usr/os/guest/host bits */
194 	if (event->attr.exclude_user || event->attr.exclude_kernel ||
195 	    event->attr.exclude_host || event->attr.exclude_guest)
196 		return -EINVAL;
197 
198 	/* and we do not enable counter overflow interrupts */
199 	hwc->config = event->attr.config & AMD64_RAW_EVENT_MASK_NB;
200 	hwc->idx = -1;
201 
202 	if (event->cpu < 0)
203 		return -EINVAL;
204 
205 	uncore = event_to_amd_uncore(event);
206 	if (!uncore)
207 		return -ENODEV;
208 
209 	/*
210 	 * since request can come in to any of the shared cores, we will remap
211 	 * to a single common cpu.
212 	 */
213 	event->cpu = uncore->cpu;
214 
215 	return 0;
216 }
217 
218 static ssize_t amd_uncore_attr_show_cpumask(struct device *dev,
219 					    struct device_attribute *attr,
220 					    char *buf)
221 {
222 	cpumask_t *active_mask;
223 	struct pmu *pmu = dev_get_drvdata(dev);
224 
225 	if (pmu->type == amd_nb_pmu.type)
226 		active_mask = &amd_nb_active_mask;
227 	else if (pmu->type == amd_l2_pmu.type)
228 		active_mask = &amd_l2_active_mask;
229 	else
230 		return 0;
231 
232 	return cpumap_print_to_pagebuf(true, buf, active_mask);
233 }
234 static DEVICE_ATTR(cpumask, S_IRUGO, amd_uncore_attr_show_cpumask, NULL);
235 
236 static struct attribute *amd_uncore_attrs[] = {
237 	&dev_attr_cpumask.attr,
238 	NULL,
239 };
240 
241 static struct attribute_group amd_uncore_attr_group = {
242 	.attrs = amd_uncore_attrs,
243 };
244 
245 PMU_FORMAT_ATTR(event, "config:0-7,32-35");
246 PMU_FORMAT_ATTR(umask, "config:8-15");
247 
248 static struct attribute *amd_uncore_format_attr[] = {
249 	&format_attr_event.attr,
250 	&format_attr_umask.attr,
251 	NULL,
252 };
253 
254 static struct attribute_group amd_uncore_format_group = {
255 	.name = "format",
256 	.attrs = amd_uncore_format_attr,
257 };
258 
259 static const struct attribute_group *amd_uncore_attr_groups[] = {
260 	&amd_uncore_attr_group,
261 	&amd_uncore_format_group,
262 	NULL,
263 };
264 
265 static struct pmu amd_nb_pmu = {
266 	.task_ctx_nr	= perf_invalid_context,
267 	.attr_groups	= amd_uncore_attr_groups,
268 	.name		= "amd_nb",
269 	.event_init	= amd_uncore_event_init,
270 	.add		= amd_uncore_add,
271 	.del		= amd_uncore_del,
272 	.start		= amd_uncore_start,
273 	.stop		= amd_uncore_stop,
274 	.read		= amd_uncore_read,
275 };
276 
277 static struct pmu amd_l2_pmu = {
278 	.task_ctx_nr	= perf_invalid_context,
279 	.attr_groups	= amd_uncore_attr_groups,
280 	.name		= "amd_l2",
281 	.event_init	= amd_uncore_event_init,
282 	.add		= amd_uncore_add,
283 	.del		= amd_uncore_del,
284 	.start		= amd_uncore_start,
285 	.stop		= amd_uncore_stop,
286 	.read		= amd_uncore_read,
287 };
288 
289 static struct amd_uncore *amd_uncore_alloc(unsigned int cpu)
290 {
291 	return kzalloc_node(sizeof(struct amd_uncore), GFP_KERNEL,
292 			cpu_to_node(cpu));
293 }
294 
295 static int amd_uncore_cpu_up_prepare(unsigned int cpu)
296 {
297 	struct amd_uncore *uncore_nb = NULL, *uncore_l2;
298 
299 	if (amd_uncore_nb) {
300 		uncore_nb = amd_uncore_alloc(cpu);
301 		if (!uncore_nb)
302 			goto fail;
303 		uncore_nb->cpu = cpu;
304 		uncore_nb->num_counters = NUM_COUNTERS_NB;
305 		uncore_nb->rdpmc_base = RDPMC_BASE_NB;
306 		uncore_nb->msr_base = MSR_F15H_NB_PERF_CTL;
307 		uncore_nb->active_mask = &amd_nb_active_mask;
308 		uncore_nb->pmu = &amd_nb_pmu;
309 		*per_cpu_ptr(amd_uncore_nb, cpu) = uncore_nb;
310 	}
311 
312 	if (amd_uncore_l2) {
313 		uncore_l2 = amd_uncore_alloc(cpu);
314 		if (!uncore_l2)
315 			goto fail;
316 		uncore_l2->cpu = cpu;
317 		uncore_l2->num_counters = NUM_COUNTERS_L2;
318 		uncore_l2->rdpmc_base = RDPMC_BASE_L2;
319 		uncore_l2->msr_base = MSR_F16H_L2I_PERF_CTL;
320 		uncore_l2->active_mask = &amd_l2_active_mask;
321 		uncore_l2->pmu = &amd_l2_pmu;
322 		*per_cpu_ptr(amd_uncore_l2, cpu) = uncore_l2;
323 	}
324 
325 	return 0;
326 
327 fail:
328 	if (amd_uncore_nb)
329 		*per_cpu_ptr(amd_uncore_nb, cpu) = NULL;
330 	kfree(uncore_nb);
331 	return -ENOMEM;
332 }
333 
334 static struct amd_uncore *
335 amd_uncore_find_online_sibling(struct amd_uncore *this,
336 			       struct amd_uncore * __percpu *uncores)
337 {
338 	unsigned int cpu;
339 	struct amd_uncore *that;
340 
341 	for_each_online_cpu(cpu) {
342 		that = *per_cpu_ptr(uncores, cpu);
343 
344 		if (!that)
345 			continue;
346 
347 		if (this == that)
348 			continue;
349 
350 		if (this->id == that->id) {
351 			that->free_when_cpu_online = this;
352 			this = that;
353 			break;
354 		}
355 	}
356 
357 	this->refcnt++;
358 	return this;
359 }
360 
361 static int amd_uncore_cpu_starting(unsigned int cpu)
362 {
363 	unsigned int eax, ebx, ecx, edx;
364 	struct amd_uncore *uncore;
365 
366 	if (amd_uncore_nb) {
367 		uncore = *per_cpu_ptr(amd_uncore_nb, cpu);
368 		cpuid(0x8000001e, &eax, &ebx, &ecx, &edx);
369 		uncore->id = ecx & 0xff;
370 
371 		uncore = amd_uncore_find_online_sibling(uncore, amd_uncore_nb);
372 		*per_cpu_ptr(amd_uncore_nb, cpu) = uncore;
373 	}
374 
375 	if (amd_uncore_l2) {
376 		unsigned int apicid = cpu_data(cpu).apicid;
377 		unsigned int nshared;
378 
379 		uncore = *per_cpu_ptr(amd_uncore_l2, cpu);
380 		cpuid_count(0x8000001d, 2, &eax, &ebx, &ecx, &edx);
381 		nshared = ((eax >> 14) & 0xfff) + 1;
382 		uncore->id = apicid - (apicid % nshared);
383 
384 		uncore = amd_uncore_find_online_sibling(uncore, amd_uncore_l2);
385 		*per_cpu_ptr(amd_uncore_l2, cpu) = uncore;
386 	}
387 
388 	return 0;
389 }
390 
391 static void uncore_online(unsigned int cpu,
392 			  struct amd_uncore * __percpu *uncores)
393 {
394 	struct amd_uncore *uncore = *per_cpu_ptr(uncores, cpu);
395 
396 	kfree(uncore->free_when_cpu_online);
397 	uncore->free_when_cpu_online = NULL;
398 
399 	if (cpu == uncore->cpu)
400 		cpumask_set_cpu(cpu, uncore->active_mask);
401 }
402 
403 static int amd_uncore_cpu_online(unsigned int cpu)
404 {
405 	if (amd_uncore_nb)
406 		uncore_online(cpu, amd_uncore_nb);
407 
408 	if (amd_uncore_l2)
409 		uncore_online(cpu, amd_uncore_l2);
410 
411 	return 0;
412 }
413 
414 static void uncore_down_prepare(unsigned int cpu,
415 				struct amd_uncore * __percpu *uncores)
416 {
417 	unsigned int i;
418 	struct amd_uncore *this = *per_cpu_ptr(uncores, cpu);
419 
420 	if (this->cpu != cpu)
421 		return;
422 
423 	/* this cpu is going down, migrate to a shared sibling if possible */
424 	for_each_online_cpu(i) {
425 		struct amd_uncore *that = *per_cpu_ptr(uncores, i);
426 
427 		if (cpu == i)
428 			continue;
429 
430 		if (this == that) {
431 			perf_pmu_migrate_context(this->pmu, cpu, i);
432 			cpumask_clear_cpu(cpu, that->active_mask);
433 			cpumask_set_cpu(i, that->active_mask);
434 			that->cpu = i;
435 			break;
436 		}
437 	}
438 }
439 
440 static int amd_uncore_cpu_down_prepare(unsigned int cpu)
441 {
442 	if (amd_uncore_nb)
443 		uncore_down_prepare(cpu, amd_uncore_nb);
444 
445 	if (amd_uncore_l2)
446 		uncore_down_prepare(cpu, amd_uncore_l2);
447 
448 	return 0;
449 }
450 
451 static void uncore_dead(unsigned int cpu, struct amd_uncore * __percpu *uncores)
452 {
453 	struct amd_uncore *uncore = *per_cpu_ptr(uncores, cpu);
454 
455 	if (cpu == uncore->cpu)
456 		cpumask_clear_cpu(cpu, uncore->active_mask);
457 
458 	if (!--uncore->refcnt)
459 		kfree(uncore);
460 	*per_cpu_ptr(uncores, cpu) = NULL;
461 }
462 
463 static int amd_uncore_cpu_dead(unsigned int cpu)
464 {
465 	if (amd_uncore_nb)
466 		uncore_dead(cpu, amd_uncore_nb);
467 
468 	if (amd_uncore_l2)
469 		uncore_dead(cpu, amd_uncore_l2);
470 
471 	return 0;
472 }
473 
474 static int __init amd_uncore_init(void)
475 {
476 	int ret = -ENODEV;
477 
478 	if (boot_cpu_data.x86_vendor != X86_VENDOR_AMD)
479 		goto fail_nodev;
480 
481 	if (!boot_cpu_has(X86_FEATURE_TOPOEXT))
482 		goto fail_nodev;
483 
484 	if (boot_cpu_has(X86_FEATURE_PERFCTR_NB)) {
485 		amd_uncore_nb = alloc_percpu(struct amd_uncore *);
486 		if (!amd_uncore_nb) {
487 			ret = -ENOMEM;
488 			goto fail_nb;
489 		}
490 		ret = perf_pmu_register(&amd_nb_pmu, amd_nb_pmu.name, -1);
491 		if (ret)
492 			goto fail_nb;
493 
494 		pr_info("perf: AMD NB counters detected\n");
495 		ret = 0;
496 	}
497 
498 	if (boot_cpu_has(X86_FEATURE_PERFCTR_L2)) {
499 		amd_uncore_l2 = alloc_percpu(struct amd_uncore *);
500 		if (!amd_uncore_l2) {
501 			ret = -ENOMEM;
502 			goto fail_l2;
503 		}
504 		ret = perf_pmu_register(&amd_l2_pmu, amd_l2_pmu.name, -1);
505 		if (ret)
506 			goto fail_l2;
507 
508 		pr_info("perf: AMD L2I counters detected\n");
509 		ret = 0;
510 	}
511 
512 	/*
513 	 * Install callbacks. Core will call them for each online cpu.
514 	 */
515 	if (cpuhp_setup_state(CPUHP_PERF_X86_AMD_UNCORE_PREP,
516 			      "PERF_X86_AMD_UNCORE_PREP",
517 			      amd_uncore_cpu_up_prepare, amd_uncore_cpu_dead))
518 		goto fail_l2;
519 
520 	if (cpuhp_setup_state(CPUHP_AP_PERF_X86_AMD_UNCORE_STARTING,
521 			      "AP_PERF_X86_AMD_UNCORE_STARTING",
522 			      amd_uncore_cpu_starting, NULL))
523 		goto fail_prep;
524 	if (cpuhp_setup_state(CPUHP_AP_PERF_X86_AMD_UNCORE_ONLINE,
525 			      "AP_PERF_X86_AMD_UNCORE_ONLINE",
526 			      amd_uncore_cpu_online,
527 			      amd_uncore_cpu_down_prepare))
528 		goto fail_start;
529 	return 0;
530 
531 fail_start:
532 	cpuhp_remove_state(CPUHP_AP_PERF_X86_AMD_UNCORE_STARTING);
533 fail_prep:
534 	cpuhp_remove_state(CPUHP_PERF_X86_AMD_UNCORE_PREP);
535 fail_l2:
536 	if (boot_cpu_has(X86_FEATURE_PERFCTR_NB))
537 		perf_pmu_unregister(&amd_nb_pmu);
538 	if (amd_uncore_l2)
539 		free_percpu(amd_uncore_l2);
540 fail_nb:
541 	if (amd_uncore_nb)
542 		free_percpu(amd_uncore_nb);
543 
544 fail_nodev:
545 	return ret;
546 }
547 device_initcall(amd_uncore_init);
548