perf_event.c 38.7 KB
Newer Older
I
Ingo Molnar 已提交
1
/*
2
 * Performance events x86 architecture code
I
Ingo Molnar 已提交
3
 *
4 5 6 7 8
 *  Copyright (C) 2008 Thomas Gleixner <tglx@linutronix.de>
 *  Copyright (C) 2008-2009 Red Hat, Inc., Ingo Molnar
 *  Copyright (C) 2009 Jaswinder Singh Rajput
 *  Copyright (C) 2009 Advanced Micro Devices, Inc., Robert Richter
 *  Copyright (C) 2008-2009 Red Hat, Inc., Peter Zijlstra <pzijlstr@redhat.com>
9
 *  Copyright (C) 2009 Intel Corporation, <markus.t.metzger@intel.com>
10
 *  Copyright (C) 2009 Google, Inc., Stephane Eranian
I
Ingo Molnar 已提交
11 12 13 14
 *
 *  For licencing details see kernel-base/COPYING
 */

15
#include <linux/perf_event.h>
I
Ingo Molnar 已提交
16 17 18 19
#include <linux/capability.h>
#include <linux/notifier.h>
#include <linux/hardirq.h>
#include <linux/kprobes.h>
20
#include <linux/module.h>
I
Ingo Molnar 已提交
21 22
#include <linux/kdebug.h>
#include <linux/sched.h>
23
#include <linux/uaccess.h>
24
#include <linux/slab.h>
25
#include <linux/cpu.h>
26
#include <linux/bitops.h>
I
Ingo Molnar 已提交
27 28

#include <asm/apic.h>
29
#include <asm/stacktrace.h>
P
Peter Zijlstra 已提交
30
#include <asm/nmi.h>
31
#include <asm/compat.h>
32
#include <asm/smp.h>
33
#include <asm/alternative.h>
I
Ingo Molnar 已提交
34

35 36
#include "perf_event.h"

37 38 39 40 41 42 43 44 45 46 47
#if 0
#undef wrmsrl
#define wrmsrl(msr, val) 					\
do {								\
	trace_printk("wrmsrl(%lx, %lx)\n", (unsigned long)(msr),\
			(unsigned long)(val));			\
	native_write_msr((msr), (u32)((u64)(val)), 		\
			(u32)((u64)(val) >> 32));		\
} while (0)
#endif

48
struct x86_pmu x86_pmu __read_mostly;
49

50
DEFINE_PER_CPU(struct cpu_hw_events, cpu_hw_events) = {
51 52
	.enabled = 1,
};
I
Ingo Molnar 已提交
53

54
u64 __read_mostly hw_cache_event_ids
55 56 57
				[PERF_COUNT_HW_CACHE_MAX]
				[PERF_COUNT_HW_CACHE_OP_MAX]
				[PERF_COUNT_HW_CACHE_RESULT_MAX];
58
u64 __read_mostly hw_cache_extra_regs
59 60 61
				[PERF_COUNT_HW_CACHE_MAX]
				[PERF_COUNT_HW_CACHE_OP_MAX]
				[PERF_COUNT_HW_CACHE_RESULT_MAX];
62

63
/*
64 65
 * Propagate event elapsed time into the generic event.
 * Can only be executed on the CPU where the event is active.
66 67
 * Returns the delta events processed.
 */
68
u64 x86_perf_event_update(struct perf_event *event)
69
{
70
	struct hw_perf_event *hwc = &event->hw;
71
	int shift = 64 - x86_pmu.cntval_bits;
72
	u64 prev_raw_count, new_raw_count;
73
	int idx = hwc->idx;
74
	s64 delta;
75

76 77 78
	if (idx == X86_PMC_IDX_FIXED_BTS)
		return 0;

79
	/*
80
	 * Careful: an NMI might modify the previous event value.
81 82 83
	 *
	 * Our tactic to handle this is to first atomically read and
	 * exchange a new raw count - then add that new-prev delta
84
	 * count to the generic event atomically:
85 86
	 */
again:
87
	prev_raw_count = local64_read(&hwc->prev_count);
88
	rdmsrl(hwc->event_base, new_raw_count);
89

90
	if (local64_cmpxchg(&hwc->prev_count, prev_raw_count,
91 92 93 94 95 96
					new_raw_count) != prev_raw_count)
		goto again;

	/*
	 * Now we have the new raw value and have updated the prev
	 * timestamp already. We can now calculate the elapsed delta
97
	 * (event-)time and add that to the generic event.
98 99
	 *
	 * Careful, not all hw sign-extends above the physical width
100
	 * of the count.
101
	 */
102 103
	delta = (new_raw_count << shift) - (prev_raw_count << shift);
	delta >>= shift;
104

105 106
	local64_add(delta, &event->count);
	local64_sub(delta, &hwc->period_left);
107 108

	return new_raw_count;
109 110
}

111 112 113 114 115
/*
 * Find and validate any extra registers to set up.
 */
static int x86_pmu_extra_regs(u64 config, struct perf_event *event)
{
116
	struct hw_perf_event_extra *reg;
117 118
	struct extra_reg *er;

119
	reg = &event->hw.extra_reg;
120 121 122 123 124 125 126 127 128

	if (!x86_pmu.extra_regs)
		return 0;

	for (er = x86_pmu.extra_regs; er->msr; er++) {
		if (er->event != (config & er->config_mask))
			continue;
		if (event->attr.config1 & ~er->valid_mask)
			return -EINVAL;
129 130 131 132

		reg->idx = er->idx;
		reg->config = event->attr.config1;
		reg->reg = er->msr;
133 134 135 136 137
		break;
	}
	return 0;
}

138
static atomic_t active_events;
P
Peter Zijlstra 已提交
139 140
static DEFINE_MUTEX(pmc_reserve_mutex);

141 142
#ifdef CONFIG_X86_LOCAL_APIC

P
Peter Zijlstra 已提交
143 144 145 146
static bool reserve_pmc_hardware(void)
{
	int i;

147
	for (i = 0; i < x86_pmu.num_counters; i++) {
148
		if (!reserve_perfctr_nmi(x86_pmu_event_addr(i)))
P
Peter Zijlstra 已提交
149 150 151
			goto perfctr_fail;
	}

152
	for (i = 0; i < x86_pmu.num_counters; i++) {
153
		if (!reserve_evntsel_nmi(x86_pmu_config_addr(i)))
P
Peter Zijlstra 已提交
154 155 156 157 158 159 160
			goto eventsel_fail;
	}

	return true;

eventsel_fail:
	for (i--; i >= 0; i--)
161
		release_evntsel_nmi(x86_pmu_config_addr(i));
P
Peter Zijlstra 已提交
162

163
	i = x86_pmu.num_counters;
P
Peter Zijlstra 已提交
164 165 166

perfctr_fail:
	for (i--; i >= 0; i--)
167
		release_perfctr_nmi(x86_pmu_event_addr(i));
P
Peter Zijlstra 已提交
168 169 170 171 172 173 174 175

	return false;
}

static void release_pmc_hardware(void)
{
	int i;

176
	for (i = 0; i < x86_pmu.num_counters; i++) {
177 178
		release_perfctr_nmi(x86_pmu_event_addr(i));
		release_evntsel_nmi(x86_pmu_config_addr(i));
P
Peter Zijlstra 已提交
179 180 181
	}
}

182 183 184 185 186 187 188
#else

static bool reserve_pmc_hardware(void) { return true; }
static void release_pmc_hardware(void) {}

#endif

189 190 191
static bool check_hw_exists(void)
{
	u64 val, val_new = 0;
192
	int i, reg, ret = 0;
193

194 195 196 197 198
	/*
	 * Check to see if the BIOS enabled any of the counters, if so
	 * complain and bail.
	 */
	for (i = 0; i < x86_pmu.num_counters; i++) {
199
		reg = x86_pmu_config_addr(i);
200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222
		ret = rdmsrl_safe(reg, &val);
		if (ret)
			goto msr_fail;
		if (val & ARCH_PERFMON_EVENTSEL_ENABLE)
			goto bios_fail;
	}

	if (x86_pmu.num_counters_fixed) {
		reg = MSR_ARCH_PERFMON_FIXED_CTR_CTRL;
		ret = rdmsrl_safe(reg, &val);
		if (ret)
			goto msr_fail;
		for (i = 0; i < x86_pmu.num_counters_fixed; i++) {
			if (val & (0x03 << i*4))
				goto bios_fail;
		}
	}

	/*
	 * Now write a value and read it back to see if it matches,
	 * this is needed to detect certain hardware emulators (qemu/kvm)
	 * that don't trap on the MSR access and always return 0s.
	 */
223
	val = 0xabcdUL;
224 225
	ret = checking_wrmsrl(x86_pmu_event_addr(0), val);
	ret |= rdmsrl_safe(x86_pmu_event_addr(0), &val_new);
226
	if (ret || val != val_new)
227
		goto msr_fail;
228 229

	return true;
230 231

bios_fail:
232 233 234 235
	/*
	 * We still allow the PMU driver to operate:
	 */
	printk(KERN_CONT "Broken BIOS detected, complain to your hardware vendor.\n");
236
	printk(KERN_ERR FW_BUG "the BIOS has corrupted hw-PMU resources (MSR %x is %Lx)\n", reg, val);
237 238

	return true;
239 240 241

msr_fail:
	printk(KERN_CONT "Broken PMU hardware detected, using software events only.\n");
242

243
	return false;
244 245
}

246
static void hw_perf_event_destroy(struct perf_event *event)
P
Peter Zijlstra 已提交
247
{
248
	if (atomic_dec_and_mutex_lock(&active_events, &pmc_reserve_mutex)) {
P
Peter Zijlstra 已提交
249
		release_pmc_hardware();
250
		release_ds_buffers();
P
Peter Zijlstra 已提交
251 252 253 254
		mutex_unlock(&pmc_reserve_mutex);
	}
}

255 256 257 258 259
static inline int x86_pmu_initialized(void)
{
	return x86_pmu.handle_irq != NULL;
}

260
static inline int
261
set_ext_hw_attr(struct hw_perf_event *hwc, struct perf_event *event)
262
{
263
	struct perf_event_attr *attr = &event->attr;
264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289
	unsigned int cache_type, cache_op, cache_result;
	u64 config, val;

	config = attr->config;

	cache_type = (config >>  0) & 0xff;
	if (cache_type >= PERF_COUNT_HW_CACHE_MAX)
		return -EINVAL;

	cache_op = (config >>  8) & 0xff;
	if (cache_op >= PERF_COUNT_HW_CACHE_OP_MAX)
		return -EINVAL;

	cache_result = (config >> 16) & 0xff;
	if (cache_result >= PERF_COUNT_HW_CACHE_RESULT_MAX)
		return -EINVAL;

	val = hw_cache_event_ids[cache_type][cache_op][cache_result];

	if (val == 0)
		return -ENOENT;

	if (val == -1)
		return -EINVAL;

	hwc->config |= val;
290 291
	attr->config1 = hw_cache_extra_regs[cache_type][cache_op][cache_result];
	return x86_pmu_extra_regs(val, event);
292 293
}

294
int x86_setup_perfctr(struct perf_event *event)
295 296 297 298 299
{
	struct perf_event_attr *attr = &event->attr;
	struct hw_perf_event *hwc = &event->hw;
	u64 config;

300
	if (!is_sampling_event(event)) {
301 302
		hwc->sample_period = x86_pmu.max_period;
		hwc->last_period = hwc->sample_period;
303
		local64_set(&hwc->period_left, hwc->sample_period);
304 305 306 307 308 309 310 311 312 313 314 315
	} else {
		/*
		 * If we have a PMU initialized but no APIC
		 * interrupts, we cannot sample hardware
		 * events (user-space has to fall back and
		 * sample via a hrtimer based software event):
		 */
		if (!x86_pmu.apic)
			return -EOPNOTSUPP;
	}

	if (attr->type == PERF_TYPE_RAW)
316
		return x86_pmu_extra_regs(event->attr.config, event);
317 318

	if (attr->type == PERF_TYPE_HW_CACHE)
319
		return set_ext_hw_attr(hwc, event);
320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337

	if (attr->config >= x86_pmu.max_events)
		return -EINVAL;

	/*
	 * The generic map:
	 */
	config = x86_pmu.event_map(attr->config);

	if (config == 0)
		return -ENOENT;

	if (config == -1LL)
		return -EINVAL;

	/*
	 * Branch tracing:
	 */
P
Peter Zijlstra 已提交
338 339
	if (attr->config == PERF_COUNT_HW_BRANCH_INSTRUCTIONS &&
	    !attr->freq && hwc->sample_period == 1) {
340
		/* BTS is not supported by this architecture. */
341
		if (!x86_pmu.bts_active)
342 343 344 345 346 347 348 349 350 351 352
			return -EOPNOTSUPP;

		/* BTS is currently only allowed for user-mode. */
		if (!attr->exclude_kernel)
			return -EOPNOTSUPP;
	}

	hwc->config |= config;

	return 0;
}
353

354
int x86_pmu_hw_config(struct perf_event *event)
355
{
P
Peter Zijlstra 已提交
356 357 358 359
	if (event->attr.precise_ip) {
		int precise = 0;

		/* Support for constant skid */
360
		if (x86_pmu.pebs_active) {
P
Peter Zijlstra 已提交
361 362
			precise++;

363 364 365 366
			/* Support for IP fixup */
			if (x86_pmu.lbr_nr)
				precise++;
		}
P
Peter Zijlstra 已提交
367 368 369 370 371

		if (event->attr.precise_ip > precise)
			return -EOPNOTSUPP;
	}

372 373 374 375
	/*
	 * Generate PMC IRQs:
	 * (keep 'enabled' bit clear for now)
	 */
376
	event->hw.config = ARCH_PERFMON_EVENTSEL_INT;
377 378 379 380

	/*
	 * Count user and OS events unless requested not to
	 */
381 382 383 384
	if (!event->attr.exclude_user)
		event->hw.config |= ARCH_PERFMON_EVENTSEL_USR;
	if (!event->attr.exclude_kernel)
		event->hw.config |= ARCH_PERFMON_EVENTSEL_OS;
385

386 387
	if (event->attr.type == PERF_TYPE_RAW)
		event->hw.config |= event->attr.config & X86_RAW_EVENT_MASK;
388

389
	return x86_setup_perfctr(event);
390 391
}

I
Ingo Molnar 已提交
392
/*
393
 * Setup the hardware configuration for a given attr_type
I
Ingo Molnar 已提交
394
 */
395
static int __x86_pmu_event_init(struct perf_event *event)
I
Ingo Molnar 已提交
396
{
P
Peter Zijlstra 已提交
397
	int err;
I
Ingo Molnar 已提交
398

399 400
	if (!x86_pmu_initialized())
		return -ENODEV;
I
Ingo Molnar 已提交
401

P
Peter Zijlstra 已提交
402
	err = 0;
403
	if (!atomic_inc_not_zero(&active_events)) {
P
Peter Zijlstra 已提交
404
		mutex_lock(&pmc_reserve_mutex);
405
		if (atomic_read(&active_events) == 0) {
406 407
			if (!reserve_pmc_hardware())
				err = -EBUSY;
408 409
			else
				reserve_ds_buffers();
410 411
		}
		if (!err)
412
			atomic_inc(&active_events);
P
Peter Zijlstra 已提交
413 414 415 416 417
		mutex_unlock(&pmc_reserve_mutex);
	}
	if (err)
		return err;

418
	event->destroy = hw_perf_event_destroy;
419

420 421 422
	event->hw.idx = -1;
	event->hw.last_cpu = -1;
	event->hw.last_tag = ~0ULL;
423

424 425 426
	/* mark unused */
	event->hw.extra_reg.idx = EXTRA_REG_NONE;

427
	return x86_pmu.hw_config(event);
428 429
}

430
void x86_pmu_disable_all(void)
431
{
432
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);
433 434
	int idx;

435
	for (idx = 0; idx < x86_pmu.num_counters; idx++) {
436 437
		u64 val;

438
		if (!test_bit(idx, cpuc->active_mask))
439
			continue;
440
		rdmsrl(x86_pmu_config_addr(idx), val);
441
		if (!(val & ARCH_PERFMON_EVENTSEL_ENABLE))
442
			continue;
443
		val &= ~ARCH_PERFMON_EVENTSEL_ENABLE;
444
		wrmsrl(x86_pmu_config_addr(idx), val);
445 446 447
	}
}

P
Peter Zijlstra 已提交
448
static void x86_pmu_disable(struct pmu *pmu)
449
{
450 451
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);

452
	if (!x86_pmu_initialized())
453
		return;
454

455 456 457 458 459 460
	if (!cpuc->enabled)
		return;

	cpuc->n_added = 0;
	cpuc->enabled = 0;
	barrier();
461 462

	x86_pmu.disable_all();
463
}
I
Ingo Molnar 已提交
464

465
void x86_pmu_enable_all(int added)
466
{
467
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);
468 469
	int idx;

470
	for (idx = 0; idx < x86_pmu.num_counters; idx++) {
471
		struct hw_perf_event *hwc = &cpuc->events[idx]->hw;
472

473
		if (!test_bit(idx, cpuc->active_mask))
474
			continue;
475

476
		__x86_pmu_enable_event(hwc, ARCH_PERFMON_EVENTSEL_ENABLE);
477 478 479
	}
}

P
Peter Zijlstra 已提交
480
static struct pmu pmu;
481 482 483 484 485 486

static inline int is_x86_event(struct perf_event *event)
{
	return event->pmu == &pmu;
}

487 488 489 490 491 492 493 494 495 496 497 498 499 500 501
/*
 * Event scheduler state:
 *
 * Assign events iterating over all events and counters, beginning
 * with events with least weights first. Keep the current iterator
 * state in struct sched_state.
 */
struct sched_state {
	int	weight;
	int	event;		/* event index */
	int	counter;	/* counter index */
	int	unassigned;	/* number of events to be assigned left */
	unsigned long used[BITS_TO_LONGS(X86_PMC_IDX_MAX)];
};

502 503 504
/* Total max is X86_PMC_IDX_MAX, but we are O(n!) limited */
#define	SCHED_STATES_MAX	2

505 506 507 508 509
struct perf_sched {
	int			max_weight;
	int			max_events;
	struct event_constraint	**constraints;
	struct sched_state	state;
510 511
	int			saved_states;
	struct sched_state	saved[SCHED_STATES_MAX];
512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536
};

/*
 * Initialize interator that runs through all events and counters.
 */
static void perf_sched_init(struct perf_sched *sched, struct event_constraint **c,
			    int num, int wmin, int wmax)
{
	int idx;

	memset(sched, 0, sizeof(*sched));
	sched->max_events	= num;
	sched->max_weight	= wmax;
	sched->constraints	= c;

	for (idx = 0; idx < num; idx++) {
		if (c[idx]->weight == wmin)
			break;
	}

	sched->state.event	= idx;		/* start with min weight */
	sched->state.weight	= wmin;
	sched->state.unassigned	= num;
}

537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559
static void perf_sched_save_state(struct perf_sched *sched)
{
	if (WARN_ON_ONCE(sched->saved_states >= SCHED_STATES_MAX))
		return;

	sched->saved[sched->saved_states] = sched->state;
	sched->saved_states++;
}

static bool perf_sched_restore_state(struct perf_sched *sched)
{
	if (!sched->saved_states)
		return false;

	sched->saved_states--;
	sched->state = sched->saved[sched->saved_states];

	/* continue with next counter: */
	clear_bit(sched->state.counter++, sched->state.used);

	return true;
}

560 561 562 563
/*
 * Select a counter for the current event to schedule. Return true on
 * success.
 */
564
static bool __perf_sched_find_counter(struct perf_sched *sched)
565 566 567 568 569 570 571 572 573 574 575 576
{
	struct event_constraint *c;
	int idx;

	if (!sched->state.unassigned)
		return false;

	if (sched->state.event >= sched->max_events)
		return false;

	c = sched->constraints[sched->state.event];

577 578 579 580 581 582 583 584
	/* Prefer fixed purpose counters */
	if (x86_pmu.num_counters_fixed) {
		idx = X86_PMC_IDX_FIXED;
		for_each_set_bit_cont(idx, c->idxmsk, X86_PMC_IDX_MAX) {
			if (!__test_and_set_bit(idx, sched->state.used))
				goto done;
		}
	}
585 586
	/* Grab the first unused counter starting with idx */
	idx = sched->state.counter;
587
	for_each_set_bit_cont(idx, c->idxmsk, X86_PMC_IDX_FIXED) {
588
		if (!__test_and_set_bit(idx, sched->state.used))
589
			goto done;
590 591
	}

592 593 594 595
	return false;

done:
	sched->state.counter = idx;
596

597 598 599 600 601 602 603 604 605 606 607 608 609
	if (c->overlap)
		perf_sched_save_state(sched);

	return true;
}

static bool perf_sched_find_counter(struct perf_sched *sched)
{
	while (!__perf_sched_find_counter(sched)) {
		if (!perf_sched_restore_state(sched))
			return false;
	}

610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661
	return true;
}

/*
 * Go through all unassigned events and find the next one to schedule.
 * Take events with the least weight first. Return true on success.
 */
static bool perf_sched_next_event(struct perf_sched *sched)
{
	struct event_constraint *c;

	if (!sched->state.unassigned || !--sched->state.unassigned)
		return false;

	do {
		/* next event */
		sched->state.event++;
		if (sched->state.event >= sched->max_events) {
			/* next weight */
			sched->state.event = 0;
			sched->state.weight++;
			if (sched->state.weight > sched->max_weight)
				return false;
		}
		c = sched->constraints[sched->state.event];
	} while (c->weight != sched->state.weight);

	sched->state.counter = 0;	/* start with first counter */

	return true;
}

/*
 * Assign a counter for each event.
 */
static int perf_assign_events(struct event_constraint **constraints, int n,
			      int wmin, int wmax, int *assign)
{
	struct perf_sched sched;

	perf_sched_init(&sched, constraints, n, wmin, wmax);

	do {
		if (!perf_sched_find_counter(&sched))
			break;	/* failed */
		if (assign)
			assign[sched.state.event] = sched.state.counter;
	} while (perf_sched_next_event(&sched));

	return sched.state.unassigned;
}

662
int x86_schedule_events(struct cpu_hw_events *cpuc, int n, int *assign)
663
{
664
	struct event_constraint *c, *constraints[X86_PMC_IDX_MAX];
665
	unsigned long used_mask[BITS_TO_LONGS(X86_PMC_IDX_MAX)];
666
	int i, wmin, wmax, num = 0;
667 668 669 670
	struct hw_perf_event *hwc;

	bitmap_zero(used_mask, X86_PMC_IDX_MAX);

671
	for (i = 0, wmin = X86_PMC_IDX_MAX, wmax = 0; i < n; i++) {
672 673
		c = x86_pmu.get_event_constraints(cpuc, cpuc->event_list[i]);
		constraints[i] = c;
674 675
		wmin = min(wmin, c->weight);
		wmax = max(wmax, c->weight);
676 677
	}

678 679 680
	/*
	 * fastpath, try to reuse previous register
	 */
681
	for (i = 0; i < n; i++) {
682
		hwc = &cpuc->event_list[i]->hw;
683
		c = constraints[i];
684 685 686 687 688 689

		/* never assigned */
		if (hwc->idx == -1)
			break;

		/* constraint still honored */
690
		if (!test_bit(hwc->idx, c->idxmsk))
691 692 693 694 695 696
			break;

		/* not already used */
		if (test_bit(hwc->idx, used_mask))
			break;

P
Peter Zijlstra 已提交
697
		__set_bit(hwc->idx, used_mask);
698 699 700 701
		if (assign)
			assign[i] = hwc->idx;
	}

702 703 704
	/* slow path */
	if (i != n)
		num = perf_assign_events(constraints, n, wmin, wmax, assign);
705

706 707 708 709 710 711 712 713 714 715
	/*
	 * scheduling failed or is just a simulation,
	 * free resources if necessary
	 */
	if (!assign || num) {
		for (i = 0; i < n; i++) {
			if (x86_pmu.put_event_constraints)
				x86_pmu.put_event_constraints(cpuc, cpuc->event_list[i]);
		}
	}
716
	return num ? -EINVAL : 0;
717 718 719 720 721 722 723 724 725 726 727
}

/*
 * dogrp: true if must collect siblings events (group)
 * returns total number of events and error code
 */
static int collect_events(struct cpu_hw_events *cpuc, struct perf_event *leader, bool dogrp)
{
	struct perf_event *event;
	int n, max_count;

728
	max_count = x86_pmu.num_counters + x86_pmu.num_counters_fixed;
729 730 731 732 733 734

	/* current number of events already accepted */
	n = cpuc->n_events;

	if (is_x86_event(leader)) {
		if (n >= max_count)
735
			return -EINVAL;
736 737 738 739 740 741 742 743
		cpuc->event_list[n] = leader;
		n++;
	}
	if (!dogrp)
		return n;

	list_for_each_entry(event, &leader->sibling_list, group_entry) {
		if (!is_x86_event(event) ||
744
		    event->state <= PERF_EVENT_STATE_OFF)
745 746 747
			continue;

		if (n >= max_count)
748
			return -EINVAL;
749 750 751 752 753 754 755 756

		cpuc->event_list[n] = event;
		n++;
	}
	return n;
}

static inline void x86_assign_hw_event(struct perf_event *event,
757
				struct cpu_hw_events *cpuc, int i)
758
{
759 760 761 762 763
	struct hw_perf_event *hwc = &event->hw;

	hwc->idx = cpuc->assign[i];
	hwc->last_cpu = smp_processor_id();
	hwc->last_tag = ++cpuc->tags[i];
764 765 766 767 768 769

	if (hwc->idx == X86_PMC_IDX_FIXED_BTS) {
		hwc->config_base = 0;
		hwc->event_base	= 0;
	} else if (hwc->idx >= X86_PMC_IDX_FIXED) {
		hwc->config_base = MSR_ARCH_PERFMON_FIXED_CTR_CTRL;
770
		hwc->event_base = MSR_ARCH_PERFMON_FIXED_CTR0 + (hwc->idx - X86_PMC_IDX_FIXED);
771
	} else {
772 773
		hwc->config_base = x86_pmu_config_addr(hwc->idx);
		hwc->event_base  = x86_pmu_event_addr(hwc->idx);
774 775 776
	}
}

777 778 779 780 781 782 783 784 785
static inline int match_prev_assignment(struct hw_perf_event *hwc,
					struct cpu_hw_events *cpuc,
					int i)
{
	return hwc->idx == cpuc->assign[i] &&
		hwc->last_cpu == smp_processor_id() &&
		hwc->last_tag == cpuc->tags[i];
}

P
Peter Zijlstra 已提交
786
static void x86_pmu_start(struct perf_event *event, int flags);
787

P
Peter Zijlstra 已提交
788
static void x86_pmu_enable(struct pmu *pmu)
789
{
790 791 792
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);
	struct perf_event *event;
	struct hw_perf_event *hwc;
793
	int i, added = cpuc->n_added;
794

795
	if (!x86_pmu_initialized())
796
		return;
797 798 799 800

	if (cpuc->enabled)
		return;

801
	if (cpuc->n_added) {
802
		int n_running = cpuc->n_events - cpuc->n_added;
803 804 805 806 807 808 809
		/*
		 * apply assignment obtained either from
		 * hw_perf_group_sched_in() or x86_pmu_enable()
		 *
		 * step1: save events moving to new counters
		 * step2: reprogram moved events into new counters
		 */
810
		for (i = 0; i < n_running; i++) {
811 812 813
			event = cpuc->event_list[i];
			hwc = &event->hw;

814 815 816 817 818 819 820 821
			/*
			 * we can avoid reprogramming counter if:
			 * - assigned same counter as last time
			 * - running on same CPU as last time
			 * - no other event has used the counter since
			 */
			if (hwc->idx == -1 ||
			    match_prev_assignment(hwc, cpuc, i))
822 823
				continue;

P
Peter Zijlstra 已提交
824 825 826 827 828 829 830 831
			/*
			 * Ensure we don't accidentally enable a stopped
			 * counter simply because we rescheduled.
			 */
			if (hwc->state & PERF_HES_STOPPED)
				hwc->state |= PERF_HES_ARCH;

			x86_pmu_stop(event, PERF_EF_UPDATE);
832 833 834 835 836 837
		}

		for (i = 0; i < cpuc->n_events; i++) {
			event = cpuc->event_list[i];
			hwc = &event->hw;

838
			if (!match_prev_assignment(hwc, cpuc, i))
839
				x86_assign_hw_event(event, cpuc, i);
840 841
			else if (i < n_running)
				continue;
842

P
Peter Zijlstra 已提交
843 844 845 846
			if (hwc->state & PERF_HES_ARCH)
				continue;

			x86_pmu_start(event, PERF_EF_RELOAD);
847 848 849 850
		}
		cpuc->n_added = 0;
		perf_events_lapic_init();
	}
851 852 853 854

	cpuc->enabled = 1;
	barrier();

855
	x86_pmu.enable_all(added);
856 857
}

858
static DEFINE_PER_CPU(u64 [X86_PMC_IDX_MAX], pmc_prev_left);
I
Ingo Molnar 已提交
859

860 861
/*
 * Set the next IRQ period, based on the hwc->period_left value.
862
 * To be called with the event disabled in hw:
863
 */
864
int x86_perf_event_set_period(struct perf_event *event)
I
Ingo Molnar 已提交
865
{
866
	struct hw_perf_event *hwc = &event->hw;
867
	s64 left = local64_read(&hwc->period_left);
868
	s64 period = hwc->sample_period;
869
	int ret = 0, idx = hwc->idx;
870

871 872 873
	if (idx == X86_PMC_IDX_FIXED_BTS)
		return 0;

874
	/*
875
	 * If we are way outside a reasonable range then just skip forward:
876 877 878
	 */
	if (unlikely(left <= -period)) {
		left = period;
879
		local64_set(&hwc->period_left, left);
880
		hwc->last_period = period;
881
		ret = 1;
882 883 884 885
	}

	if (unlikely(left <= 0)) {
		left += period;
886
		local64_set(&hwc->period_left, left);
887
		hwc->last_period = period;
888
		ret = 1;
889
	}
890
	/*
891
	 * Quirk: certain CPUs dont like it if just 1 hw_event is left:
892 893 894
	 */
	if (unlikely(left < 2))
		left = 2;
I
Ingo Molnar 已提交
895

896 897 898
	if (left > x86_pmu.max_period)
		left = x86_pmu.max_period;

899
	per_cpu(pmc_prev_left[idx], smp_processor_id()) = left;
900 901

	/*
902
	 * The hw event starts counting from this event offset,
903 904
	 * mark it to be able to extra future deltas:
	 */
905
	local64_set(&hwc->prev_count, (u64)-left);
906

907
	wrmsrl(hwc->event_base, (u64)(-left) & x86_pmu.cntval_mask);
908 909 910 911 912 913 914

	/*
	 * Due to erratum on certan cpu we need
	 * a second write to be sure the register
	 * is updated properly
	 */
	if (x86_pmu.perfctr_second_write) {
915
		wrmsrl(hwc->event_base,
916
			(u64)(-left) & x86_pmu.cntval_mask);
917
	}
918

919
	perf_event_update_userpage(event);
920

921
	return ret;
922 923
}

924
void x86_pmu_enable_event(struct perf_event *event)
925
{
T
Tejun Heo 已提交
926
	if (__this_cpu_read(cpu_hw_events.enabled))
927 928
		__x86_pmu_enable_event(&event->hw,
				       ARCH_PERFMON_EVENTSEL_ENABLE);
I
Ingo Molnar 已提交
929 930
}

931
/*
P
Peter Zijlstra 已提交
932
 * Add a single event to the PMU.
933 934 935
 *
 * The event is added to the group of enabled events
 * but only if it can be scehduled with existing events.
936
 */
P
Peter Zijlstra 已提交
937
static int x86_pmu_add(struct perf_event *event, int flags)
938 939
{
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);
940 941 942
	struct hw_perf_event *hwc;
	int assign[X86_PMC_IDX_MAX];
	int n, n0, ret;
943

944
	hwc = &event->hw;
945

P
Peter Zijlstra 已提交
946
	perf_pmu_disable(event->pmu);
947
	n0 = cpuc->n_events;
948 949 950
	ret = n = collect_events(cpuc, event, false);
	if (ret < 0)
		goto out;
951

P
Peter Zijlstra 已提交
952 953 954 955
	hwc->state = PERF_HES_UPTODATE | PERF_HES_STOPPED;
	if (!(flags & PERF_EF_START))
		hwc->state |= PERF_HES_ARCH;

956 957
	/*
	 * If group events scheduling transaction was started,
L
Lucas De Marchi 已提交
958
	 * skip the schedulability test here, it will be performed
P
Peter Zijlstra 已提交
959
	 * at commit time (->commit_txn) as a whole
960
	 */
961
	if (cpuc->group_flag & PERF_EVENT_TXN)
962
		goto done_collect;
963

964
	ret = x86_pmu.schedule_events(cpuc, n, assign);
965
	if (ret)
966
		goto out;
967 968 969 970 971
	/*
	 * copy new assignment, now we know it is possible
	 * will be used by hw_perf_enable()
	 */
	memcpy(cpuc->assign, assign, n*sizeof(int));
972

973
done_collect:
974
	cpuc->n_events = n;
975
	cpuc->n_added += n - n0;
976
	cpuc->n_txn += n - n0;
977

978 979
	ret = 0;
out:
P
Peter Zijlstra 已提交
980
	perf_pmu_enable(event->pmu);
981
	return ret;
I
Ingo Molnar 已提交
982 983
}

P
Peter Zijlstra 已提交
984
static void x86_pmu_start(struct perf_event *event, int flags)
985
{
P
Peter Zijlstra 已提交
986 987 988
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);
	int idx = event->hw.idx;

989 990 991
	if (WARN_ON_ONCE(!(event->hw.state & PERF_HES_STOPPED)))
		return;

P
Peter Zijlstra 已提交
992 993 994 995 996 997 998 999 1000
	if (WARN_ON_ONCE(idx == -1))
		return;

	if (flags & PERF_EF_RELOAD) {
		WARN_ON_ONCE(!(event->hw.state & PERF_HES_UPTODATE));
		x86_perf_event_set_period(event);
	}

	event->hw.state = 0;
1001

P
Peter Zijlstra 已提交
1002 1003
	cpuc->events[idx] = event;
	__set_bit(idx, cpuc->active_mask);
1004
	__set_bit(idx, cpuc->running);
1005
	x86_pmu.enable(event);
P
Peter Zijlstra 已提交
1006
	perf_event_update_userpage(event);
1007 1008
}

1009
void perf_event_print_debug(void)
I
Ingo Molnar 已提交
1010
{
1011
	u64 ctrl, status, overflow, pmc_ctrl, pmc_count, prev_left, fixed;
1012
	u64 pebs;
1013
	struct cpu_hw_events *cpuc;
1014
	unsigned long flags;
1015 1016
	int cpu, idx;

1017
	if (!x86_pmu.num_counters)
1018
		return;
I
Ingo Molnar 已提交
1019

1020
	local_irq_save(flags);
I
Ingo Molnar 已提交
1021 1022

	cpu = smp_processor_id();
1023
	cpuc = &per_cpu(cpu_hw_events, cpu);
I
Ingo Molnar 已提交
1024

1025
	if (x86_pmu.version >= 2) {
1026 1027 1028 1029
		rdmsrl(MSR_CORE_PERF_GLOBAL_CTRL, ctrl);
		rdmsrl(MSR_CORE_PERF_GLOBAL_STATUS, status);
		rdmsrl(MSR_CORE_PERF_GLOBAL_OVF_CTRL, overflow);
		rdmsrl(MSR_ARCH_PERFMON_FIXED_CTR_CTRL, fixed);
1030
		rdmsrl(MSR_IA32_PEBS_ENABLE, pebs);
1031 1032 1033 1034 1035 1036

		pr_info("\n");
		pr_info("CPU#%d: ctrl:       %016llx\n", cpu, ctrl);
		pr_info("CPU#%d: status:     %016llx\n", cpu, status);
		pr_info("CPU#%d: overflow:   %016llx\n", cpu, overflow);
		pr_info("CPU#%d: fixed:      %016llx\n", cpu, fixed);
1037
		pr_info("CPU#%d: pebs:       %016llx\n", cpu, pebs);
1038
	}
1039
	pr_info("CPU#%d: active:     %016llx\n", cpu, *(u64 *)cpuc->active_mask);
I
Ingo Molnar 已提交
1040

1041
	for (idx = 0; idx < x86_pmu.num_counters; idx++) {
1042 1043
		rdmsrl(x86_pmu_config_addr(idx), pmc_ctrl);
		rdmsrl(x86_pmu_event_addr(idx), pmc_count);
I
Ingo Molnar 已提交
1044

1045
		prev_left = per_cpu(pmc_prev_left[idx], cpu);
I
Ingo Molnar 已提交
1046

1047
		pr_info("CPU#%d:   gen-PMC%d ctrl:  %016llx\n",
I
Ingo Molnar 已提交
1048
			cpu, idx, pmc_ctrl);
1049
		pr_info("CPU#%d:   gen-PMC%d count: %016llx\n",
I
Ingo Molnar 已提交
1050
			cpu, idx, pmc_count);
1051
		pr_info("CPU#%d:   gen-PMC%d left:  %016llx\n",
1052
			cpu, idx, prev_left);
I
Ingo Molnar 已提交
1053
	}
1054
	for (idx = 0; idx < x86_pmu.num_counters_fixed; idx++) {
1055 1056
		rdmsrl(MSR_ARCH_PERFMON_FIXED_CTR0 + idx, pmc_count);

1057
		pr_info("CPU#%d: fixed-PMC%d count: %016llx\n",
1058 1059
			cpu, idx, pmc_count);
	}
1060
	local_irq_restore(flags);
I
Ingo Molnar 已提交
1061 1062
}

1063
void x86_pmu_stop(struct perf_event *event, int flags)
I
Ingo Molnar 已提交
1064
{
1065
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);
1066
	struct hw_perf_event *hwc = &event->hw;
I
Ingo Molnar 已提交
1067

P
Peter Zijlstra 已提交
1068 1069 1070 1071 1072 1073
	if (__test_and_clear_bit(hwc->idx, cpuc->active_mask)) {
		x86_pmu.disable(event);
		cpuc->events[hwc->idx] = NULL;
		WARN_ON_ONCE(hwc->state & PERF_HES_STOPPED);
		hwc->state |= PERF_HES_STOPPED;
	}
1074

P
Peter Zijlstra 已提交
1075 1076 1077 1078 1079 1080 1081 1082
	if ((flags & PERF_EF_UPDATE) && !(hwc->state & PERF_HES_UPTODATE)) {
		/*
		 * Drain the remaining delta count out of a event
		 * that we are disabling:
		 */
		x86_perf_event_update(event);
		hwc->state |= PERF_HES_UPTODATE;
	}
1083 1084
}

P
Peter Zijlstra 已提交
1085
static void x86_pmu_del(struct perf_event *event, int flags)
1086 1087 1088 1089
{
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);
	int i;

1090 1091 1092 1093 1094
	/*
	 * If we're called during a txn, we don't need to do anything.
	 * The events never got scheduled and ->cancel_txn will truncate
	 * the event_list.
	 */
1095
	if (cpuc->group_flag & PERF_EVENT_TXN)
1096 1097
		return;

P
Peter Zijlstra 已提交
1098
	x86_pmu_stop(event, PERF_EF_UPDATE);
1099

1100 1101 1102 1103 1104 1105 1106 1107 1108 1109
	for (i = 0; i < cpuc->n_events; i++) {
		if (event == cpuc->event_list[i]) {

			if (x86_pmu.put_event_constraints)
				x86_pmu.put_event_constraints(cpuc, event);

			while (++i < cpuc->n_events)
				cpuc->event_list[i-1] = cpuc->event_list[i];

			--cpuc->n_events;
1110
			break;
1111 1112
		}
	}
1113
	perf_event_update_userpage(event);
I
Ingo Molnar 已提交
1114 1115
}

1116
int x86_pmu_handle_irq(struct pt_regs *regs)
1117
{
1118
	struct perf_sample_data data;
1119 1120
	struct cpu_hw_events *cpuc;
	struct perf_event *event;
V
Vince Weaver 已提交
1121
	int idx, handled = 0;
1122 1123
	u64 val;

1124
	perf_sample_data_init(&data, 0);
1125

1126
	cpuc = &__get_cpu_var(cpu_hw_events);
1127

1128 1129 1130 1131 1132 1133 1134 1135 1136 1137
	/*
	 * Some chipsets need to unmask the LVTPC in a particular spot
	 * inside the nmi handler.  As a result, the unmasking was pushed
	 * into all the nmi handlers.
	 *
	 * This generic handler doesn't seem to have any issues where the
	 * unmasking occurs so it was left at the top.
	 */
	apic_write(APIC_LVTPC, APIC_DM_NMI);

1138
	for (idx = 0; idx < x86_pmu.num_counters; idx++) {
1139 1140 1141 1142 1143 1144 1145 1146
		if (!test_bit(idx, cpuc->active_mask)) {
			/*
			 * Though we deactivated the counter some cpus
			 * might still deliver spurious interrupts still
			 * in flight. Catch them:
			 */
			if (__test_and_clear_bit(idx, cpuc->running))
				handled++;
1147
			continue;
1148
		}
1149

1150
		event = cpuc->events[idx];
1151

1152
		val = x86_perf_event_update(event);
1153
		if (val & (1ULL << (x86_pmu.cntval_bits - 1)))
1154
			continue;
1155

1156
		/*
1157
		 * event overflow
1158
		 */
1159
		handled++;
1160
		data.period	= event->hw.last_period;
1161

1162
		if (!x86_perf_event_set_period(event))
1163 1164
			continue;

1165
		if (perf_event_overflow(event, &data, regs))
P
Peter Zijlstra 已提交
1166
			x86_pmu_stop(event, 0);
1167
	}
1168

1169 1170 1171
	if (handled)
		inc_irq_stat(apic_perf_irqs);

1172 1173
	return handled;
}
1174

1175
void perf_events_lapic_init(void)
I
Ingo Molnar 已提交
1176
{
1177
	if (!x86_pmu.apic || !x86_pmu_initialized())
I
Ingo Molnar 已提交
1178
		return;
1179

I
Ingo Molnar 已提交
1180
	/*
1181
	 * Always use NMI for PMU
I
Ingo Molnar 已提交
1182
	 */
1183
	apic_write(APIC_LVTPC, APIC_DM_NMI);
I
Ingo Molnar 已提交
1184 1185 1186
}

static int __kprobes
1187
perf_event_nmi_handler(unsigned int cmd, struct pt_regs *regs)
I
Ingo Molnar 已提交
1188
{
1189
	if (!atomic_read(&active_events))
1190
		return NMI_DONE;
1191

1192
	return x86_pmu.handle_irq(regs);
I
Ingo Molnar 已提交
1193 1194
}

1195 1196
struct event_constraint emptyconstraint;
struct event_constraint unconstrained;
1197

1198 1199 1200 1201
static int __cpuinit
x86_pmu_notifier(struct notifier_block *self, unsigned long action, void *hcpu)
{
	unsigned int cpu = (long)hcpu;
1202
	struct cpu_hw_events *cpuc = &per_cpu(cpu_hw_events, cpu);
1203
	int ret = NOTIFY_OK;
1204 1205 1206

	switch (action & ~CPU_TASKS_FROZEN) {
	case CPU_UP_PREPARE:
1207
		cpuc->kfree_on_online = NULL;
1208
		if (x86_pmu.cpu_prepare)
1209
			ret = x86_pmu.cpu_prepare(cpu);
1210 1211 1212 1213 1214 1215 1216
		break;

	case CPU_STARTING:
		if (x86_pmu.cpu_starting)
			x86_pmu.cpu_starting(cpu);
		break;

1217 1218 1219 1220
	case CPU_ONLINE:
		kfree(cpuc->kfree_on_online);
		break;

1221 1222 1223 1224 1225
	case CPU_DYING:
		if (x86_pmu.cpu_dying)
			x86_pmu.cpu_dying(cpu);
		break;

1226
	case CPU_UP_CANCELED:
1227 1228 1229 1230 1231 1232 1233 1234 1235
	case CPU_DEAD:
		if (x86_pmu.cpu_dead)
			x86_pmu.cpu_dead(cpu);
		break;

	default:
		break;
	}

1236
	return ret;
1237 1238
}

1239 1240 1241 1242 1243 1244 1245 1246 1247 1248
static void __init pmu_check_apic(void)
{
	if (cpu_has_apic)
		return;

	x86_pmu.apic = 0;
	pr_info("no APIC, boot with the \"lapic\" boot parameter to force-enable it.\n");
	pr_info("no hardware sampling interrupt available.\n");
}

1249
static int __init init_hw_perf_events(void)
1250
{
1251
	struct x86_pmu_quirk *quirk;
1252
	struct event_constraint *c;
1253 1254
	int err;

1255
	pr_info("Performance Events: ");
1256

1257 1258
	switch (boot_cpu_data.x86_vendor) {
	case X86_VENDOR_INTEL:
1259
		err = intel_pmu_init();
1260
		break;
1261
	case X86_VENDOR_AMD:
1262
		err = amd_pmu_init();
1263
		break;
1264
	default:
1265
		return 0;
1266
	}
1267
	if (err != 0) {
1268
		pr_cont("no PMU driver, software events only.\n");
1269
		return 0;
1270
	}
1271

1272 1273
	pmu_check_apic();

1274
	/* sanity check that the hardware exists or is emulated */
1275
	if (!check_hw_exists())
1276
		return 0;
1277

1278
	pr_cont("%s PMU driver.\n", x86_pmu.name);
1279

1280 1281
	for (quirk = x86_pmu.quirks; quirk; quirk = quirk->next)
		quirk->func();
1282

1283
	if (x86_pmu.num_counters > X86_PMC_MAX_GENERIC) {
1284
		WARN(1, KERN_ERR "hw perf events %d > max(%d), clipping!",
1285 1286
		     x86_pmu.num_counters, X86_PMC_MAX_GENERIC);
		x86_pmu.num_counters = X86_PMC_MAX_GENERIC;
I
Ingo Molnar 已提交
1287
	}
1288
	x86_pmu.intel_ctrl = (1 << x86_pmu.num_counters) - 1;
I
Ingo Molnar 已提交
1289

1290
	if (x86_pmu.num_counters_fixed > X86_PMC_MAX_FIXED) {
1291
		WARN(1, KERN_ERR "hw perf events fixed %d > max(%d), clipping!",
1292 1293
		     x86_pmu.num_counters_fixed, X86_PMC_MAX_FIXED);
		x86_pmu.num_counters_fixed = X86_PMC_MAX_FIXED;
1294
	}
1295

1296
	x86_pmu.intel_ctrl |=
1297
		((1LL << x86_pmu.num_counters_fixed)-1) << X86_PMC_IDX_FIXED;
I
Ingo Molnar 已提交
1298

1299
	perf_events_lapic_init();
1300
	register_nmi_handler(NMI_LOCAL, perf_event_nmi_handler, 0, "PMI");
1301

1302
	unconstrained = (struct event_constraint)
1303
		__EVENT_CONSTRAINT(0, (1ULL << x86_pmu.num_counters) - 1,
1304
				   0, x86_pmu.num_counters, 0);
1305

1306
	if (x86_pmu.event_constraints) {
1307 1308 1309 1310
		/*
		 * event on fixed counter2 (REF_CYCLES) only works on this
		 * counter, so do not extend mask to generic counters
		 */
1311
		for_each_event_constraint(c, x86_pmu.event_constraints) {
1312 1313
			if (c->cmask != X86_RAW_EVENT_MASK
			    || c->idxmsk64 == X86_PMC_MSK_FIXED_REF_CYCLES) {
1314
				continue;
1315
			}
1316

1317 1318
			c->idxmsk64 |= (1ULL << x86_pmu.num_counters) - 1;
			c->weight += x86_pmu.num_counters;
1319 1320 1321
		}
	}

I
Ingo Molnar 已提交
1322
	pr_info("... version:                %d\n",     x86_pmu.version);
1323 1324 1325
	pr_info("... bit width:              %d\n",     x86_pmu.cntval_bits);
	pr_info("... generic registers:      %d\n",     x86_pmu.num_counters);
	pr_info("... value mask:             %016Lx\n", x86_pmu.cntval_mask);
I
Ingo Molnar 已提交
1326
	pr_info("... max period:             %016Lx\n", x86_pmu.max_period);
1327
	pr_info("... fixed-purpose events:   %d\n",     x86_pmu.num_counters_fixed);
1328
	pr_info("... event mask:             %016Lx\n", x86_pmu.intel_ctrl);
1329

P
Peter Zijlstra 已提交
1330
	perf_pmu_register(&pmu, "cpu", PERF_TYPE_RAW);
1331
	perf_cpu_notifier(x86_pmu_notifier);
1332 1333

	return 0;
I
Ingo Molnar 已提交
1334
}
1335
early_initcall(init_hw_perf_events);
I
Ingo Molnar 已提交
1336

1337
static inline void x86_pmu_read(struct perf_event *event)
1338
{
1339
	x86_perf_event_update(event);
1340 1341
}

1342 1343 1344 1345 1346
/*
 * Start group events scheduling transaction
 * Set the flag to make pmu::enable() not perform the
 * schedulability test, it will be performed at commit time
 */
P
Peter Zijlstra 已提交
1347
static void x86_pmu_start_txn(struct pmu *pmu)
1348
{
P
Peter Zijlstra 已提交
1349
	perf_pmu_disable(pmu);
T
Tejun Heo 已提交
1350 1351
	__this_cpu_or(cpu_hw_events.group_flag, PERF_EVENT_TXN);
	__this_cpu_write(cpu_hw_events.n_txn, 0);
1352 1353 1354 1355 1356 1357 1358
}

/*
 * Stop group events scheduling transaction
 * Clear the flag and pmu::enable() will perform the
 * schedulability test.
 */
P
Peter Zijlstra 已提交
1359
static void x86_pmu_cancel_txn(struct pmu *pmu)
1360
{
T
Tejun Heo 已提交
1361
	__this_cpu_and(cpu_hw_events.group_flag, ~PERF_EVENT_TXN);
1362 1363 1364
	/*
	 * Truncate the collected events.
	 */
T
Tejun Heo 已提交
1365 1366
	__this_cpu_sub(cpu_hw_events.n_added, __this_cpu_read(cpu_hw_events.n_txn));
	__this_cpu_sub(cpu_hw_events.n_events, __this_cpu_read(cpu_hw_events.n_txn));
P
Peter Zijlstra 已提交
1367
	perf_pmu_enable(pmu);
1368 1369 1370 1371 1372 1373 1374
}

/*
 * Commit group events scheduling transaction
 * Perform the group schedulability test as a whole
 * Return 0 if success
 */
P
Peter Zijlstra 已提交
1375
static int x86_pmu_commit_txn(struct pmu *pmu)
1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395
{
	struct cpu_hw_events *cpuc = &__get_cpu_var(cpu_hw_events);
	int assign[X86_PMC_IDX_MAX];
	int n, ret;

	n = cpuc->n_events;

	if (!x86_pmu_initialized())
		return -EAGAIN;

	ret = x86_pmu.schedule_events(cpuc, n, assign);
	if (ret)
		return ret;

	/*
	 * copy new assignment, now we know it is possible
	 * will be used by hw_perf_enable()
	 */
	memcpy(cpuc->assign, assign, n*sizeof(int));

1396
	cpuc->group_flag &= ~PERF_EVENT_TXN;
P
Peter Zijlstra 已提交
1397
	perf_pmu_enable(pmu);
1398 1399
	return 0;
}
1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433
/*
 * a fake_cpuc is used to validate event groups. Due to
 * the extra reg logic, we need to also allocate a fake
 * per_core and per_cpu structure. Otherwise, group events
 * using extra reg may conflict without the kernel being
 * able to catch this when the last event gets added to
 * the group.
 */
static void free_fake_cpuc(struct cpu_hw_events *cpuc)
{
	kfree(cpuc->shared_regs);
	kfree(cpuc);
}

static struct cpu_hw_events *allocate_fake_cpuc(void)
{
	struct cpu_hw_events *cpuc;
	int cpu = raw_smp_processor_id();

	cpuc = kzalloc(sizeof(*cpuc), GFP_KERNEL);
	if (!cpuc)
		return ERR_PTR(-ENOMEM);

	/* only needed, if we have extra_regs */
	if (x86_pmu.extra_regs) {
		cpuc->shared_regs = allocate_shared_regs(cpu);
		if (!cpuc->shared_regs)
			goto error;
	}
	return cpuc;
error:
	free_fake_cpuc(cpuc);
	return ERR_PTR(-ENOMEM);
}
1434

1435 1436 1437 1438 1439 1440 1441 1442 1443
/*
 * validate that we can schedule this event
 */
static int validate_event(struct perf_event *event)
{
	struct cpu_hw_events *fake_cpuc;
	struct event_constraint *c;
	int ret = 0;

1444 1445 1446
	fake_cpuc = allocate_fake_cpuc();
	if (IS_ERR(fake_cpuc))
		return PTR_ERR(fake_cpuc);
1447 1448 1449 1450

	c = x86_pmu.get_event_constraints(fake_cpuc, event);

	if (!c || !c->weight)
1451
		ret = -EINVAL;
1452 1453 1454 1455

	if (x86_pmu.put_event_constraints)
		x86_pmu.put_event_constraints(fake_cpuc, event);

1456
	free_fake_cpuc(fake_cpuc);
1457 1458 1459 1460

	return ret;
}

1461 1462 1463 1464
/*
 * validate a single event group
 *
 * validation include:
1465 1466 1467
 *	- check events are compatible which each other
 *	- events do not compete for the same counter
 *	- number of events <= number of counters
1468 1469 1470 1471
 *
 * validation ensures the group can be loaded onto the
 * PMU if it was the only group available.
 */
1472 1473
static int validate_group(struct perf_event *event)
{
1474
	struct perf_event *leader = event->group_leader;
1475
	struct cpu_hw_events *fake_cpuc;
1476
	int ret = -EINVAL, n;
1477

1478 1479 1480
	fake_cpuc = allocate_fake_cpuc();
	if (IS_ERR(fake_cpuc))
		return PTR_ERR(fake_cpuc);
1481 1482 1483 1484 1485 1486
	/*
	 * the event is not yet connected with its
	 * siblings therefore we must first collect
	 * existing siblings, then add the new event
	 * before we can simulate the scheduling
	 */
1487
	n = collect_events(fake_cpuc, leader, true);
1488
	if (n < 0)
1489
		goto out;
1490

1491 1492
	fake_cpuc->n_events = n;
	n = collect_events(fake_cpuc, event, false);
1493
	if (n < 0)
1494
		goto out;
1495

1496
	fake_cpuc->n_events = n;
1497

1498
	ret = x86_pmu.schedule_events(fake_cpuc, n, NULL);
1499 1500

out:
1501
	free_fake_cpuc(fake_cpuc);
1502
	return ret;
1503 1504
}

1505
static int x86_pmu_event_init(struct perf_event *event)
I
Ingo Molnar 已提交
1506
{
P
Peter Zijlstra 已提交
1507
	struct pmu *tmp;
I
Ingo Molnar 已提交
1508 1509
	int err;

1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520
	switch (event->attr.type) {
	case PERF_TYPE_RAW:
	case PERF_TYPE_HARDWARE:
	case PERF_TYPE_HW_CACHE:
		break;

	default:
		return -ENOENT;
	}

	err = __x86_pmu_event_init(event);
1521
	if (!err) {
1522 1523 1524 1525 1526 1527 1528 1529
		/*
		 * we temporarily connect event to its pmu
		 * such that validate_group() can classify
		 * it as an x86 event using is_x86_event()
		 */
		tmp = event->pmu;
		event->pmu = &pmu;

1530 1531
		if (event->group_leader != event)
			err = validate_group(event);
1532 1533
		else
			err = validate_event(event);
1534 1535

		event->pmu = tmp;
1536
	}
1537
	if (err) {
1538 1539
		if (event->destroy)
			event->destroy(event);
1540
	}
I
Ingo Molnar 已提交
1541

1542
	return err;
I
Ingo Molnar 已提交
1543
}
1544

1545
static struct pmu pmu = {
P
Peter Zijlstra 已提交
1546 1547 1548
	.pmu_enable	= x86_pmu_enable,
	.pmu_disable	= x86_pmu_disable,

1549
	.event_init	= x86_pmu_event_init,
P
Peter Zijlstra 已提交
1550 1551 1552

	.add		= x86_pmu_add,
	.del		= x86_pmu_del,
1553 1554 1555
	.start		= x86_pmu_start,
	.stop		= x86_pmu_stop,
	.read		= x86_pmu_read,
P
Peter Zijlstra 已提交
1556

1557 1558 1559 1560 1561
	.start_txn	= x86_pmu_start_txn,
	.cancel_txn	= x86_pmu_cancel_txn,
	.commit_txn	= x86_pmu_commit_txn,
};

1562 1563 1564 1565 1566 1567
/*
 * callchain support
 */

static int backtrace_stack(void *data, char *name)
{
1568
	return 0;
1569 1570 1571 1572 1573 1574
}

static void backtrace_address(void *data, unsigned long addr, int reliable)
{
	struct perf_callchain_entry *entry = data;

1575
	perf_callchain_store(entry, addr);
1576 1577 1578 1579 1580
}

static const struct stacktrace_ops backtrace_ops = {
	.stack			= backtrace_stack,
	.address		= backtrace_address,
1581
	.walk_stack		= print_context_stack_bp,
1582 1583
};

1584 1585
void
perf_callchain_kernel(struct perf_callchain_entry *entry, struct pt_regs *regs)
1586
{
1587 1588
	if (perf_guest_cbs && perf_guest_cbs->is_in_guest()) {
		/* TODO: We don't support guest os callchain now */
1589
		return;
1590 1591
	}

1592
	perf_callchain_store(entry, regs->ip);
1593

1594
	dump_trace(NULL, regs, NULL, 0, &backtrace_ops, entry);
1595 1596
}

1597 1598 1599
#ifdef CONFIG_COMPAT
static inline int
perf_callchain_user32(struct pt_regs *regs, struct perf_callchain_entry *entry)
1600
{
1601 1602 1603
	/* 32-bit process in 64-bit kernel. */
	struct stack_frame_ia32 frame;
	const void __user *fp;
1604

1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616
	if (!test_thread_flag(TIF_IA32))
		return 0;

	fp = compat_ptr(regs->bp);
	while (entry->nr < PERF_MAX_STACK_DEPTH) {
		unsigned long bytes;
		frame.next_frame     = 0;
		frame.return_address = 0;

		bytes = copy_from_user_nmi(&frame, fp, sizeof(frame));
		if (bytes != sizeof(frame))
			break;
1617

1618 1619
		if (fp < compat_ptr(regs->sp))
			break;
1620

1621
		perf_callchain_store(entry, frame.return_address);
1622 1623 1624
		fp = compat_ptr(frame.next_frame);
	}
	return 1;
1625
}
1626 1627 1628 1629 1630 1631 1632
#else
static inline int
perf_callchain_user32(struct pt_regs *regs, struct perf_callchain_entry *entry)
{
    return 0;
}
#endif
1633

1634 1635
void
perf_callchain_user(struct perf_callchain_entry *entry, struct pt_regs *regs)
1636 1637 1638 1639
{
	struct stack_frame frame;
	const void __user *fp;

1640 1641
	if (perf_guest_cbs && perf_guest_cbs->is_in_guest()) {
		/* TODO: We don't support guest os callchain now */
1642
		return;
1643
	}
1644

1645
	fp = (void __user *)regs->bp;
1646

1647
	perf_callchain_store(entry, regs->ip);
1648

1649 1650 1651
	if (!current->mm)
		return;

1652 1653 1654
	if (perf_callchain_user32(regs, entry))
		return;

1655
	while (entry->nr < PERF_MAX_STACK_DEPTH) {
1656
		unsigned long bytes;
1657
		frame.next_frame	     = NULL;
1658 1659
		frame.return_address = 0;

1660 1661
		bytes = copy_from_user_nmi(&frame, fp, sizeof(frame));
		if (bytes != sizeof(frame))
1662 1663
			break;

1664
		if ((unsigned long)fp < regs->sp)
1665 1666
			break;

1667
		perf_callchain_store(entry, frame.return_address);
1668
		fp = frame.next_frame;
1669 1670 1671
	}
}

1672 1673 1674
unsigned long perf_instruction_pointer(struct pt_regs *regs)
{
	unsigned long ip;
1675

1676 1677 1678 1679
	if (perf_guest_cbs && perf_guest_cbs->is_in_guest())
		ip = perf_guest_cbs->get_guest_ip();
	else
		ip = instruction_pointer(regs);
1680

1681 1682 1683 1684 1685 1686
	return ip;
}

unsigned long perf_misc_flags(struct pt_regs *regs)
{
	int misc = 0;
1687

1688
	if (perf_guest_cbs && perf_guest_cbs->is_in_guest()) {
1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699
		if (perf_guest_cbs->is_user_mode())
			misc |= PERF_RECORD_MISC_GUEST_USER;
		else
			misc |= PERF_RECORD_MISC_GUEST_KERNEL;
	} else {
		if (user_mode(regs))
			misc |= PERF_RECORD_MISC_USER;
		else
			misc |= PERF_RECORD_MISC_KERNEL;
	}

1700
	if (regs->flags & PERF_EFLAGS_EXACT)
P
Peter Zijlstra 已提交
1701
		misc |= PERF_RECORD_MISC_EXACT_IP;
1702 1703 1704

	return misc;
}
1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716

void perf_get_x86_pmu_capability(struct x86_pmu_capability *cap)
{
	cap->version		= x86_pmu.version;
	cap->num_counters_gp	= x86_pmu.num_counters;
	cap->num_counters_fixed	= x86_pmu.num_counters_fixed;
	cap->bit_width_gp	= x86_pmu.cntval_bits;
	cap->bit_width_fixed	= x86_pmu.cntval_bits;
	cap->events_mask	= (unsigned int)x86_pmu.events_maskl;
	cap->events_mask_len	= x86_pmu.events_mask_len;
}
EXPORT_SYMBOL_GPL(perf_get_x86_pmu_capability);