perf_event.c 38.5 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;

P
Peter Zijlstra 已提交
989 990 991 992 993 994 995 996 997 998 999 1000
	if (WARN_ON_ONCE(!(event->hw.state & PERF_HES_STOPPED)))
		return;

	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 1307
	if (x86_pmu.event_constraints) {
		for_each_event_constraint(c, x86_pmu.event_constraints) {
1308
			if (c->cmask != X86_RAW_EVENT_MASK)
1309 1310
				continue;

1311 1312
			c->idxmsk64 |= (1ULL << x86_pmu.num_counters) - 1;
			c->weight += x86_pmu.num_counters;
1313 1314 1315
		}
	}

I
Ingo Molnar 已提交
1316
	pr_info("... version:                %d\n",     x86_pmu.version);
1317 1318 1319
	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 已提交
1320
	pr_info("... max period:             %016Lx\n", x86_pmu.max_period);
1321
	pr_info("... fixed-purpose events:   %d\n",     x86_pmu.num_counters_fixed);
1322
	pr_info("... event mask:             %016Lx\n", x86_pmu.intel_ctrl);
1323

P
Peter Zijlstra 已提交
1324
	perf_pmu_register(&pmu, "cpu", PERF_TYPE_RAW);
1325
	perf_cpu_notifier(x86_pmu_notifier);
1326 1327

	return 0;
I
Ingo Molnar 已提交
1328
}
1329
early_initcall(init_hw_perf_events);
I
Ingo Molnar 已提交
1330

1331
static inline void x86_pmu_read(struct perf_event *event)
1332
{
1333
	x86_perf_event_update(event);
1334 1335
}

1336 1337 1338 1339 1340
/*
 * 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 已提交
1341
static void x86_pmu_start_txn(struct pmu *pmu)
1342
{
P
Peter Zijlstra 已提交
1343
	perf_pmu_disable(pmu);
T
Tejun Heo 已提交
1344 1345
	__this_cpu_or(cpu_hw_events.group_flag, PERF_EVENT_TXN);
	__this_cpu_write(cpu_hw_events.n_txn, 0);
1346 1347 1348 1349 1350 1351 1352
}

/*
 * Stop group events scheduling transaction
 * Clear the flag and pmu::enable() will perform the
 * schedulability test.
 */
P
Peter Zijlstra 已提交
1353
static void x86_pmu_cancel_txn(struct pmu *pmu)
1354
{
T
Tejun Heo 已提交
1355
	__this_cpu_and(cpu_hw_events.group_flag, ~PERF_EVENT_TXN);
1356 1357 1358
	/*
	 * Truncate the collected events.
	 */
T
Tejun Heo 已提交
1359 1360
	__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 已提交
1361
	perf_pmu_enable(pmu);
1362 1363 1364 1365 1366 1367 1368
}

/*
 * Commit group events scheduling transaction
 * Perform the group schedulability test as a whole
 * Return 0 if success
 */
P
Peter Zijlstra 已提交
1369
static int x86_pmu_commit_txn(struct pmu *pmu)
1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389
{
	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));

1390
	cpuc->group_flag &= ~PERF_EVENT_TXN;
P
Peter Zijlstra 已提交
1391
	perf_pmu_enable(pmu);
1392 1393
	return 0;
}
1394 1395 1396 1397 1398 1399 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
/*
 * 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);
}
1428

1429 1430 1431 1432 1433 1434 1435 1436 1437
/*
 * 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;

1438 1439 1440
	fake_cpuc = allocate_fake_cpuc();
	if (IS_ERR(fake_cpuc))
		return PTR_ERR(fake_cpuc);
1441 1442 1443 1444

	c = x86_pmu.get_event_constraints(fake_cpuc, event);

	if (!c || !c->weight)
1445
		ret = -EINVAL;
1446 1447 1448 1449

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

1450
	free_fake_cpuc(fake_cpuc);
1451 1452 1453 1454

	return ret;
}

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

1472 1473 1474
	fake_cpuc = allocate_fake_cpuc();
	if (IS_ERR(fake_cpuc))
		return PTR_ERR(fake_cpuc);
1475 1476 1477 1478 1479 1480
	/*
	 * 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
	 */
1481
	n = collect_events(fake_cpuc, leader, true);
1482
	if (n < 0)
1483
		goto out;
1484

1485 1486
	fake_cpuc->n_events = n;
	n = collect_events(fake_cpuc, event, false);
1487
	if (n < 0)
1488
		goto out;
1489

1490
	fake_cpuc->n_events = n;
1491

1492
	ret = x86_pmu.schedule_events(fake_cpuc, n, NULL);
1493 1494

out:
1495
	free_fake_cpuc(fake_cpuc);
1496
	return ret;
1497 1498
}

1499
static int x86_pmu_event_init(struct perf_event *event)
I
Ingo Molnar 已提交
1500
{
P
Peter Zijlstra 已提交
1501
	struct pmu *tmp;
I
Ingo Molnar 已提交
1502 1503
	int err;

1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514
	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);
1515
	if (!err) {
1516 1517 1518 1519 1520 1521 1522 1523
		/*
		 * 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;

1524 1525
		if (event->group_leader != event)
			err = validate_group(event);
1526 1527
		else
			err = validate_event(event);
1528 1529

		event->pmu = tmp;
1530
	}
1531
	if (err) {
1532 1533
		if (event->destroy)
			event->destroy(event);
1534
	}
I
Ingo Molnar 已提交
1535

1536
	return err;
I
Ingo Molnar 已提交
1537
}
1538

1539
static struct pmu pmu = {
P
Peter Zijlstra 已提交
1540 1541 1542
	.pmu_enable	= x86_pmu_enable,
	.pmu_disable	= x86_pmu_disable,

1543
	.event_init	= x86_pmu_event_init,
P
Peter Zijlstra 已提交
1544 1545 1546

	.add		= x86_pmu_add,
	.del		= x86_pmu_del,
1547 1548 1549
	.start		= x86_pmu_start,
	.stop		= x86_pmu_stop,
	.read		= x86_pmu_read,
P
Peter Zijlstra 已提交
1550

1551 1552 1553 1554 1555
	.start_txn	= x86_pmu_start_txn,
	.cancel_txn	= x86_pmu_cancel_txn,
	.commit_txn	= x86_pmu_commit_txn,
};

1556 1557 1558 1559 1560 1561
/*
 * callchain support
 */

static int backtrace_stack(void *data, char *name)
{
1562
	return 0;
1563 1564 1565 1566 1567 1568
}

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

1569
	perf_callchain_store(entry, addr);
1570 1571 1572 1573 1574
}

static const struct stacktrace_ops backtrace_ops = {
	.stack			= backtrace_stack,
	.address		= backtrace_address,
1575
	.walk_stack		= print_context_stack_bp,
1576 1577
};

1578 1579
void
perf_callchain_kernel(struct perf_callchain_entry *entry, struct pt_regs *regs)
1580
{
1581 1582
	if (perf_guest_cbs && perf_guest_cbs->is_in_guest()) {
		/* TODO: We don't support guest os callchain now */
1583
		return;
1584 1585
	}

1586
	perf_callchain_store(entry, regs->ip);
1587

1588
	dump_trace(NULL, regs, NULL, 0, &backtrace_ops, entry);
1589 1590
}

1591 1592 1593
#ifdef CONFIG_COMPAT
static inline int
perf_callchain_user32(struct pt_regs *regs, struct perf_callchain_entry *entry)
1594
{
1595 1596 1597
	/* 32-bit process in 64-bit kernel. */
	struct stack_frame_ia32 frame;
	const void __user *fp;
1598

1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610
	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;
1611

1612 1613
		if (fp < compat_ptr(regs->sp))
			break;
1614

1615
		perf_callchain_store(entry, frame.return_address);
1616 1617 1618
		fp = compat_ptr(frame.next_frame);
	}
	return 1;
1619
}
1620 1621 1622 1623 1624 1625 1626
#else
static inline int
perf_callchain_user32(struct pt_regs *regs, struct perf_callchain_entry *entry)
{
    return 0;
}
#endif
1627

1628 1629
void
perf_callchain_user(struct perf_callchain_entry *entry, struct pt_regs *regs)
1630 1631 1632 1633
{
	struct stack_frame frame;
	const void __user *fp;

1634 1635
	if (perf_guest_cbs && perf_guest_cbs->is_in_guest()) {
		/* TODO: We don't support guest os callchain now */
1636
		return;
1637
	}
1638

1639
	fp = (void __user *)regs->bp;
1640

1641
	perf_callchain_store(entry, regs->ip);
1642

1643 1644 1645
	if (!current->mm)
		return;

1646 1647 1648
	if (perf_callchain_user32(regs, entry))
		return;

1649
	while (entry->nr < PERF_MAX_STACK_DEPTH) {
1650
		unsigned long bytes;
1651
		frame.next_frame	     = NULL;
1652 1653
		frame.return_address = 0;

1654 1655
		bytes = copy_from_user_nmi(&frame, fp, sizeof(frame));
		if (bytes != sizeof(frame))
1656 1657
			break;

1658
		if ((unsigned long)fp < regs->sp)
1659 1660
			break;

1661
		perf_callchain_store(entry, frame.return_address);
1662
		fp = frame.next_frame;
1663 1664 1665
	}
}

1666 1667 1668
unsigned long perf_instruction_pointer(struct pt_regs *regs)
{
	unsigned long ip;
1669

1670 1671 1672 1673
	if (perf_guest_cbs && perf_guest_cbs->is_in_guest())
		ip = perf_guest_cbs->get_guest_ip();
	else
		ip = instruction_pointer(regs);
1674

1675 1676 1677 1678 1679 1680
	return ip;
}

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

1682
	if (perf_guest_cbs && perf_guest_cbs->is_in_guest()) {
1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693
		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;
	}

1694
	if (regs->flags & PERF_EFLAGS_EXACT)
P
Peter Zijlstra 已提交
1695
		misc |= PERF_RECORD_MISC_EXACT_IP;
1696 1697 1698

	return misc;
}
1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710

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);