1/*
2 * Intel Running Average Power Limit (RAPL) Driver
3 * Copyright (c) 2013, Intel Corporation.
4 *
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms and conditions of the GNU General Public License,
7 * version 2, as published by the Free Software Foundation.
8 *
9 * This program is distributed in the hope it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
12 * more details.
13 *
14 * You should have received a copy of the GNU General Public License along with
15 * this program; if not, write to the Free Software Foundation, Inc.
16 *
17 */
18#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
19
20#include <linux/kernel.h>
21#include <linux/module.h>
22#include <linux/list.h>
23#include <linux/types.h>
24#include <linux/device.h>
25#include <linux/slab.h>
26#include <linux/log2.h>
27#include <linux/bitmap.h>
28#include <linux/delay.h>
29#include <linux/sysfs.h>
30#include <linux/cpu.h>
31#include <linux/powercap.h>
32#include <asm/iosf_mbi.h>
33
34#include <asm/processor.h>
35#include <asm/cpu_device_id.h>
36
37/* bitmasks for RAPL MSRs, used by primitive access functions */
38#define ENERGY_STATUS_MASK      0xffffffff
39
40#define POWER_LIMIT1_MASK       0x7FFF
41#define POWER_LIMIT1_ENABLE     BIT(15)
42#define POWER_LIMIT1_CLAMP      BIT(16)
43
44#define POWER_LIMIT2_MASK       (0x7FFFULL<<32)
45#define POWER_LIMIT2_ENABLE     BIT_ULL(47)
46#define POWER_LIMIT2_CLAMP      BIT_ULL(48)
47#define POWER_PACKAGE_LOCK      BIT_ULL(63)
48#define POWER_PP_LOCK           BIT(31)
49
50#define TIME_WINDOW1_MASK       (0x7FULL<<17)
51#define TIME_WINDOW2_MASK       (0x7FULL<<49)
52
53#define POWER_UNIT_OFFSET	0
54#define POWER_UNIT_MASK		0x0F
55
56#define ENERGY_UNIT_OFFSET	0x08
57#define ENERGY_UNIT_MASK	0x1F00
58
59#define TIME_UNIT_OFFSET	0x10
60#define TIME_UNIT_MASK		0xF0000
61
62#define POWER_INFO_MAX_MASK     (0x7fffULL<<32)
63#define POWER_INFO_MIN_MASK     (0x7fffULL<<16)
64#define POWER_INFO_MAX_TIME_WIN_MASK     (0x3fULL<<48)
65#define POWER_INFO_THERMAL_SPEC_MASK     0x7fff
66
67#define PERF_STATUS_THROTTLE_TIME_MASK 0xffffffff
68#define PP_POLICY_MASK         0x1F
69
70/* Non HW constants */
71#define RAPL_PRIMITIVE_DERIVED       BIT(1) /* not from raw data */
72#define RAPL_PRIMITIVE_DUMMY         BIT(2)
73
74#define TIME_WINDOW_MAX_MSEC 40000
75#define TIME_WINDOW_MIN_MSEC 250
76#define ENERGY_UNIT_SCALE    1000 /* scale from driver unit to powercap unit */
77enum unit_type {
78	ARBITRARY_UNIT, /* no translation */
79	POWER_UNIT,
80	ENERGY_UNIT,
81	TIME_UNIT,
82};
83
84enum rapl_domain_type {
85	RAPL_DOMAIN_PACKAGE, /* entire package/socket */
86	RAPL_DOMAIN_PP0, /* core power plane */
87	RAPL_DOMAIN_PP1, /* graphics uncore */
88	RAPL_DOMAIN_DRAM,/* DRAM control_type */
89	RAPL_DOMAIN_MAX,
90};
91
92enum rapl_domain_msr_id {
93	RAPL_DOMAIN_MSR_LIMIT,
94	RAPL_DOMAIN_MSR_STATUS,
95	RAPL_DOMAIN_MSR_PERF,
96	RAPL_DOMAIN_MSR_POLICY,
97	RAPL_DOMAIN_MSR_INFO,
98	RAPL_DOMAIN_MSR_MAX,
99};
100
101/* per domain data, some are optional */
102enum rapl_primitives {
103	ENERGY_COUNTER,
104	POWER_LIMIT1,
105	POWER_LIMIT2,
106	FW_LOCK,
107
108	PL1_ENABLE,  /* power limit 1, aka long term */
109	PL1_CLAMP,   /* allow frequency to go below OS request */
110	PL2_ENABLE,  /* power limit 2, aka short term, instantaneous */
111	PL2_CLAMP,
112
113	TIME_WINDOW1, /* long term */
114	TIME_WINDOW2, /* short term */
115	THERMAL_SPEC_POWER,
116	MAX_POWER,
117
118	MIN_POWER,
119	MAX_TIME_WINDOW,
120	THROTTLED_TIME,
121	PRIORITY_LEVEL,
122
123	/* below are not raw primitive data */
124	AVERAGE_POWER,
125	NR_RAPL_PRIMITIVES,
126};
127
128#define NR_RAW_PRIMITIVES (NR_RAPL_PRIMITIVES - 2)
129
130/* Can be expanded to include events, etc.*/
131struct rapl_domain_data {
132	u64 primitives[NR_RAPL_PRIMITIVES];
133	unsigned long timestamp;
134};
135
136
137#define	DOMAIN_STATE_INACTIVE           BIT(0)
138#define	DOMAIN_STATE_POWER_LIMIT_SET    BIT(1)
139#define DOMAIN_STATE_BIOS_LOCKED        BIT(2)
140
141#define NR_POWER_LIMITS (2)
142struct rapl_power_limit {
143	struct powercap_zone_constraint *constraint;
144	int prim_id; /* primitive ID used to enable */
145	struct rapl_domain *domain;
146	const char *name;
147};
148
149static const char pl1_name[] = "long_term";
150static const char pl2_name[] = "short_term";
151
152struct rapl_domain {
153	const char *name;
154	enum rapl_domain_type id;
155	int msrs[RAPL_DOMAIN_MSR_MAX];
156	struct powercap_zone power_zone;
157	struct rapl_domain_data rdd;
158	struct rapl_power_limit rpl[NR_POWER_LIMITS];
159	u64 attr_map; /* track capabilities */
160	unsigned int state;
161	unsigned int domain_energy_unit;
162	int package_id;
163};
164#define power_zone_to_rapl_domain(_zone) \
165	container_of(_zone, struct rapl_domain, power_zone)
166
167
168/* Each physical package contains multiple domains, these are the common
169 * data across RAPL domains within a package.
170 */
171struct rapl_package {
172	unsigned int id; /* physical package/socket id */
173	unsigned int nr_domains;
174	unsigned long domain_map; /* bit map of active domains */
175	unsigned int power_unit;
176	unsigned int energy_unit;
177	unsigned int time_unit;
178	struct rapl_domain *domains; /* array of domains, sized at runtime */
179	struct powercap_zone *power_zone; /* keep track of parent zone */
180	int nr_cpus; /* active cpus on the package, topology info is lost during
181		      * cpu hotplug. so we have to track ourselves.
182		      */
183	unsigned long power_limit_irq; /* keep track of package power limit
184					* notify interrupt enable status.
185					*/
186	struct list_head plist;
187};
188
189struct rapl_defaults {
190	int (*check_unit)(struct rapl_package *rp, int cpu);
191	void (*set_floor_freq)(struct rapl_domain *rd, bool mode);
192	u64 (*compute_time_window)(struct rapl_package *rp, u64 val,
193				bool to_raw);
194	unsigned int dram_domain_energy_unit;
195};
196static struct rapl_defaults *rapl_defaults;
197
198/* Sideband MBI registers */
199#define IOSF_CPU_POWER_BUDGET_CTL (0x2)
200
201#define PACKAGE_PLN_INT_SAVED   BIT(0)
202#define MAX_PRIM_NAME (32)
203
204/* per domain data. used to describe individual knobs such that access function
205 * can be consolidated into one instead of many inline functions.
206 */
207struct rapl_primitive_info {
208	const char *name;
209	u64 mask;
210	int shift;
211	enum rapl_domain_msr_id id;
212	enum unit_type unit;
213	u32 flag;
214};
215
216#define PRIMITIVE_INFO_INIT(p, m, s, i, u, f) {	\
217		.name = #p,			\
218		.mask = m,			\
219		.shift = s,			\
220		.id = i,			\
221		.unit = u,			\
222		.flag = f			\
223	}
224
225static void rapl_init_domains(struct rapl_package *rp);
226static int rapl_read_data_raw(struct rapl_domain *rd,
227			enum rapl_primitives prim,
228			bool xlate, u64 *data);
229static int rapl_write_data_raw(struct rapl_domain *rd,
230			enum rapl_primitives prim,
231			unsigned long long value);
232static u64 rapl_unit_xlate(struct rapl_domain *rd, int package,
233			enum unit_type type, u64 value,
234			int to_raw);
235static void package_power_limit_irq_save(int package_id);
236
237static LIST_HEAD(rapl_packages); /* guarded by CPU hotplug lock */
238
239static const char * const rapl_domain_names[] = {
240	"package",
241	"core",
242	"uncore",
243	"dram",
244};
245
246static struct powercap_control_type *control_type; /* PowerCap Controller */
247
248/* caller to ensure CPU hotplug lock is held */
249static struct rapl_package *find_package_by_id(int id)
250{
251	struct rapl_package *rp;
252
253	list_for_each_entry(rp, &rapl_packages, plist) {
254		if (rp->id == id)
255			return rp;
256	}
257
258	return NULL;
259}
260
261/* caller to ensure CPU hotplug lock is held */
262static int find_active_cpu_on_package(int package_id)
263{
264	int i;
265
266	for_each_online_cpu(i) {
267		if (topology_physical_package_id(i) == package_id)
268			return i;
269	}
270	/* all CPUs on this package are offline */
271
272	return -ENODEV;
273}
274
275/* caller must hold cpu hotplug lock */
276static void rapl_cleanup_data(void)
277{
278	struct rapl_package *p, *tmp;
279
280	list_for_each_entry_safe(p, tmp, &rapl_packages, plist) {
281		kfree(p->domains);
282		list_del(&p->plist);
283		kfree(p);
284	}
285}
286
287static int get_energy_counter(struct powercap_zone *power_zone, u64 *energy_raw)
288{
289	struct rapl_domain *rd;
290	u64 energy_now;
291
292	/* prevent CPU hotplug, make sure the RAPL domain does not go
293	 * away while reading the counter.
294	 */
295	get_online_cpus();
296	rd = power_zone_to_rapl_domain(power_zone);
297
298	if (!rapl_read_data_raw(rd, ENERGY_COUNTER, true, &energy_now)) {
299		*energy_raw = energy_now;
300		put_online_cpus();
301
302		return 0;
303	}
304	put_online_cpus();
305
306	return -EIO;
307}
308
309static int get_max_energy_counter(struct powercap_zone *pcd_dev, u64 *energy)
310{
311	struct rapl_domain *rd = power_zone_to_rapl_domain(pcd_dev);
312
313	*energy = rapl_unit_xlate(rd, 0, ENERGY_UNIT, ENERGY_STATUS_MASK, 0);
314	return 0;
315}
316
317static int release_zone(struct powercap_zone *power_zone)
318{
319	struct rapl_domain *rd = power_zone_to_rapl_domain(power_zone);
320	struct rapl_package *rp;
321
322	/* package zone is the last zone of a package, we can free
323	 * memory here since all children has been unregistered.
324	 */
325	if (rd->id == RAPL_DOMAIN_PACKAGE) {
326		rp = find_package_by_id(rd->package_id);
327		if (!rp) {
328			dev_warn(&power_zone->dev, "no package id %s\n",
329				rd->name);
330			return -ENODEV;
331		}
332		kfree(rd);
333		rp->domains = NULL;
334	}
335
336	return 0;
337
338}
339
340static int find_nr_power_limit(struct rapl_domain *rd)
341{
342	int i;
343
344	for (i = 0; i < NR_POWER_LIMITS; i++) {
345		if (rd->rpl[i].name == NULL)
346			break;
347	}
348
349	return i;
350}
351
352static int set_domain_enable(struct powercap_zone *power_zone, bool mode)
353{
354	struct rapl_domain *rd = power_zone_to_rapl_domain(power_zone);
355
356	if (rd->state & DOMAIN_STATE_BIOS_LOCKED)
357		return -EACCES;
358
359	get_online_cpus();
360	rapl_write_data_raw(rd, PL1_ENABLE, mode);
361	rapl_defaults->set_floor_freq(rd, mode);
362	put_online_cpus();
363
364	return 0;
365}
366
367static int get_domain_enable(struct powercap_zone *power_zone, bool *mode)
368{
369	struct rapl_domain *rd = power_zone_to_rapl_domain(power_zone);
370	u64 val;
371
372	if (rd->state & DOMAIN_STATE_BIOS_LOCKED) {
373		*mode = false;
374		return 0;
375	}
376	get_online_cpus();
377	if (rapl_read_data_raw(rd, PL1_ENABLE, true, &val)) {
378		put_online_cpus();
379		return -EIO;
380	}
381	*mode = val;
382	put_online_cpus();
383
384	return 0;
385}
386
387/* per RAPL domain ops, in the order of rapl_domain_type */
388static struct powercap_zone_ops zone_ops[] = {
389	/* RAPL_DOMAIN_PACKAGE */
390	{
391		.get_energy_uj = get_energy_counter,
392		.get_max_energy_range_uj = get_max_energy_counter,
393		.release = release_zone,
394		.set_enable = set_domain_enable,
395		.get_enable = get_domain_enable,
396	},
397	/* RAPL_DOMAIN_PP0 */
398	{
399		.get_energy_uj = get_energy_counter,
400		.get_max_energy_range_uj = get_max_energy_counter,
401		.release = release_zone,
402		.set_enable = set_domain_enable,
403		.get_enable = get_domain_enable,
404	},
405	/* RAPL_DOMAIN_PP1 */
406	{
407		.get_energy_uj = get_energy_counter,
408		.get_max_energy_range_uj = get_max_energy_counter,
409		.release = release_zone,
410		.set_enable = set_domain_enable,
411		.get_enable = get_domain_enable,
412	},
413	/* RAPL_DOMAIN_DRAM */
414	{
415		.get_energy_uj = get_energy_counter,
416		.get_max_energy_range_uj = get_max_energy_counter,
417		.release = release_zone,
418		.set_enable = set_domain_enable,
419		.get_enable = get_domain_enable,
420	},
421};
422
423static int set_power_limit(struct powercap_zone *power_zone, int id,
424			u64 power_limit)
425{
426	struct rapl_domain *rd;
427	struct rapl_package *rp;
428	int ret = 0;
429
430	get_online_cpus();
431	rd = power_zone_to_rapl_domain(power_zone);
432	rp = find_package_by_id(rd->package_id);
433	if (!rp) {
434		ret = -ENODEV;
435		goto set_exit;
436	}
437
438	if (rd->state & DOMAIN_STATE_BIOS_LOCKED) {
439		dev_warn(&power_zone->dev, "%s locked by BIOS, monitoring only\n",
440			rd->name);
441		ret = -EACCES;
442		goto set_exit;
443	}
444
445	switch (rd->rpl[id].prim_id) {
446	case PL1_ENABLE:
447		rapl_write_data_raw(rd, POWER_LIMIT1, power_limit);
448		break;
449	case PL2_ENABLE:
450		rapl_write_data_raw(rd, POWER_LIMIT2, power_limit);
451		break;
452	default:
453		ret = -EINVAL;
454	}
455	if (!ret)
456		package_power_limit_irq_save(rd->package_id);
457set_exit:
458	put_online_cpus();
459	return ret;
460}
461
462static int get_current_power_limit(struct powercap_zone *power_zone, int id,
463					u64 *data)
464{
465	struct rapl_domain *rd;
466	u64 val;
467	int prim;
468	int ret = 0;
469
470	get_online_cpus();
471	rd = power_zone_to_rapl_domain(power_zone);
472	switch (rd->rpl[id].prim_id) {
473	case PL1_ENABLE:
474		prim = POWER_LIMIT1;
475		break;
476	case PL2_ENABLE:
477		prim = POWER_LIMIT2;
478		break;
479	default:
480		put_online_cpus();
481		return -EINVAL;
482	}
483	if (rapl_read_data_raw(rd, prim, true, &val))
484		ret = -EIO;
485	else
486		*data = val;
487
488	put_online_cpus();
489
490	return ret;
491}
492
493static int set_time_window(struct powercap_zone *power_zone, int id,
494								u64 window)
495{
496	struct rapl_domain *rd;
497	int ret = 0;
498
499	get_online_cpus();
500	rd = power_zone_to_rapl_domain(power_zone);
501	switch (rd->rpl[id].prim_id) {
502	case PL1_ENABLE:
503		rapl_write_data_raw(rd, TIME_WINDOW1, window);
504		break;
505	case PL2_ENABLE:
506		rapl_write_data_raw(rd, TIME_WINDOW2, window);
507		break;
508	default:
509		ret = -EINVAL;
510	}
511	put_online_cpus();
512	return ret;
513}
514
515static int get_time_window(struct powercap_zone *power_zone, int id, u64 *data)
516{
517	struct rapl_domain *rd;
518	u64 val;
519	int ret = 0;
520
521	get_online_cpus();
522	rd = power_zone_to_rapl_domain(power_zone);
523	switch (rd->rpl[id].prim_id) {
524	case PL1_ENABLE:
525		ret = rapl_read_data_raw(rd, TIME_WINDOW1, true, &val);
526		break;
527	case PL2_ENABLE:
528		ret = rapl_read_data_raw(rd, TIME_WINDOW2, true, &val);
529		break;
530	default:
531		put_online_cpus();
532		return -EINVAL;
533	}
534	if (!ret)
535		*data = val;
536	put_online_cpus();
537
538	return ret;
539}
540
541static const char *get_constraint_name(struct powercap_zone *power_zone, int id)
542{
543	struct rapl_power_limit *rpl;
544	struct rapl_domain *rd;
545
546	rd = power_zone_to_rapl_domain(power_zone);
547	rpl = (struct rapl_power_limit *) &rd->rpl[id];
548
549	return rpl->name;
550}
551
552
553static int get_max_power(struct powercap_zone *power_zone, int id,
554					u64 *data)
555{
556	struct rapl_domain *rd;
557	u64 val;
558	int prim;
559	int ret = 0;
560
561	get_online_cpus();
562	rd = power_zone_to_rapl_domain(power_zone);
563	switch (rd->rpl[id].prim_id) {
564	case PL1_ENABLE:
565		prim = THERMAL_SPEC_POWER;
566		break;
567	case PL2_ENABLE:
568		prim = MAX_POWER;
569		break;
570	default:
571		put_online_cpus();
572		return -EINVAL;
573	}
574	if (rapl_read_data_raw(rd, prim, true, &val))
575		ret = -EIO;
576	else
577		*data = val;
578
579	put_online_cpus();
580
581	return ret;
582}
583
584static struct powercap_zone_constraint_ops constraint_ops = {
585	.set_power_limit_uw = set_power_limit,
586	.get_power_limit_uw = get_current_power_limit,
587	.set_time_window_us = set_time_window,
588	.get_time_window_us = get_time_window,
589	.get_max_power_uw = get_max_power,
590	.get_name = get_constraint_name,
591};
592
593/* called after domain detection and package level data are set */
594static void rapl_init_domains(struct rapl_package *rp)
595{
596	int i;
597	struct rapl_domain *rd = rp->domains;
598
599	for (i = 0; i < RAPL_DOMAIN_MAX; i++) {
600		unsigned int mask = rp->domain_map & (1 << i);
601		switch (mask) {
602		case BIT(RAPL_DOMAIN_PACKAGE):
603			rd->name = rapl_domain_names[RAPL_DOMAIN_PACKAGE];
604			rd->id = RAPL_DOMAIN_PACKAGE;
605			rd->msrs[0] = MSR_PKG_POWER_LIMIT;
606			rd->msrs[1] = MSR_PKG_ENERGY_STATUS;
607			rd->msrs[2] = MSR_PKG_PERF_STATUS;
608			rd->msrs[3] = 0;
609			rd->msrs[4] = MSR_PKG_POWER_INFO;
610			rd->rpl[0].prim_id = PL1_ENABLE;
611			rd->rpl[0].name = pl1_name;
612			rd->rpl[1].prim_id = PL2_ENABLE;
613			rd->rpl[1].name = pl2_name;
614			break;
615		case BIT(RAPL_DOMAIN_PP0):
616			rd->name = rapl_domain_names[RAPL_DOMAIN_PP0];
617			rd->id = RAPL_DOMAIN_PP0;
618			rd->msrs[0] = MSR_PP0_POWER_LIMIT;
619			rd->msrs[1] = MSR_PP0_ENERGY_STATUS;
620			rd->msrs[2] = 0;
621			rd->msrs[3] = MSR_PP0_POLICY;
622			rd->msrs[4] = 0;
623			rd->rpl[0].prim_id = PL1_ENABLE;
624			rd->rpl[0].name = pl1_name;
625			break;
626		case BIT(RAPL_DOMAIN_PP1):
627			rd->name = rapl_domain_names[RAPL_DOMAIN_PP1];
628			rd->id = RAPL_DOMAIN_PP1;
629			rd->msrs[0] = MSR_PP1_POWER_LIMIT;
630			rd->msrs[1] = MSR_PP1_ENERGY_STATUS;
631			rd->msrs[2] = 0;
632			rd->msrs[3] = MSR_PP1_POLICY;
633			rd->msrs[4] = 0;
634			rd->rpl[0].prim_id = PL1_ENABLE;
635			rd->rpl[0].name = pl1_name;
636			break;
637		case BIT(RAPL_DOMAIN_DRAM):
638			rd->name = rapl_domain_names[RAPL_DOMAIN_DRAM];
639			rd->id = RAPL_DOMAIN_DRAM;
640			rd->msrs[0] = MSR_DRAM_POWER_LIMIT;
641			rd->msrs[1] = MSR_DRAM_ENERGY_STATUS;
642			rd->msrs[2] = MSR_DRAM_PERF_STATUS;
643			rd->msrs[3] = 0;
644			rd->msrs[4] = MSR_DRAM_POWER_INFO;
645			rd->rpl[0].prim_id = PL1_ENABLE;
646			rd->rpl[0].name = pl1_name;
647			rd->domain_energy_unit =
648				rapl_defaults->dram_domain_energy_unit;
649			if (rd->domain_energy_unit)
650				pr_info("DRAM domain energy unit %dpj\n",
651					rd->domain_energy_unit);
652			break;
653		}
654		if (mask) {
655			rd->package_id = rp->id;
656			rd++;
657		}
658	}
659}
660
661static u64 rapl_unit_xlate(struct rapl_domain *rd, int package,
662			enum unit_type type, u64 value,
663			int to_raw)
664{
665	u64 units = 1;
666	struct rapl_package *rp;
667	u64 scale = 1;
668
669	rp = find_package_by_id(package);
670	if (!rp)
671		return value;
672
673	switch (type) {
674	case POWER_UNIT:
675		units = rp->power_unit;
676		break;
677	case ENERGY_UNIT:
678		scale = ENERGY_UNIT_SCALE;
679		/* per domain unit takes precedence */
680		if (rd && rd->domain_energy_unit)
681			units = rd->domain_energy_unit;
682		else
683			units = rp->energy_unit;
684		break;
685	case TIME_UNIT:
686		return rapl_defaults->compute_time_window(rp, value, to_raw);
687	case ARBITRARY_UNIT:
688	default:
689		return value;
690	};
691
692	if (to_raw)
693		return div64_u64(value, units) * scale;
694
695	value *= units;
696
697	return div64_u64(value, scale);
698}
699
700/* in the order of enum rapl_primitives */
701static struct rapl_primitive_info rpi[] = {
702	/* name, mask, shift, msr index, unit divisor */
703	PRIMITIVE_INFO_INIT(ENERGY_COUNTER, ENERGY_STATUS_MASK, 0,
704				RAPL_DOMAIN_MSR_STATUS, ENERGY_UNIT, 0),
705	PRIMITIVE_INFO_INIT(POWER_LIMIT1, POWER_LIMIT1_MASK, 0,
706				RAPL_DOMAIN_MSR_LIMIT, POWER_UNIT, 0),
707	PRIMITIVE_INFO_INIT(POWER_LIMIT2, POWER_LIMIT2_MASK, 32,
708				RAPL_DOMAIN_MSR_LIMIT, POWER_UNIT, 0),
709	PRIMITIVE_INFO_INIT(FW_LOCK, POWER_PP_LOCK, 31,
710				RAPL_DOMAIN_MSR_LIMIT, ARBITRARY_UNIT, 0),
711	PRIMITIVE_INFO_INIT(PL1_ENABLE, POWER_LIMIT1_ENABLE, 15,
712				RAPL_DOMAIN_MSR_LIMIT, ARBITRARY_UNIT, 0),
713	PRIMITIVE_INFO_INIT(PL1_CLAMP, POWER_LIMIT1_CLAMP, 16,
714				RAPL_DOMAIN_MSR_LIMIT, ARBITRARY_UNIT, 0),
715	PRIMITIVE_INFO_INIT(PL2_ENABLE, POWER_LIMIT2_ENABLE, 47,
716				RAPL_DOMAIN_MSR_LIMIT, ARBITRARY_UNIT, 0),
717	PRIMITIVE_INFO_INIT(PL2_CLAMP, POWER_LIMIT2_CLAMP, 48,
718				RAPL_DOMAIN_MSR_LIMIT, ARBITRARY_UNIT, 0),
719	PRIMITIVE_INFO_INIT(TIME_WINDOW1, TIME_WINDOW1_MASK, 17,
720				RAPL_DOMAIN_MSR_LIMIT, TIME_UNIT, 0),
721	PRIMITIVE_INFO_INIT(TIME_WINDOW2, TIME_WINDOW2_MASK, 49,
722				RAPL_DOMAIN_MSR_LIMIT, TIME_UNIT, 0),
723	PRIMITIVE_INFO_INIT(THERMAL_SPEC_POWER, POWER_INFO_THERMAL_SPEC_MASK,
724				0, RAPL_DOMAIN_MSR_INFO, POWER_UNIT, 0),
725	PRIMITIVE_INFO_INIT(MAX_POWER, POWER_INFO_MAX_MASK, 32,
726				RAPL_DOMAIN_MSR_INFO, POWER_UNIT, 0),
727	PRIMITIVE_INFO_INIT(MIN_POWER, POWER_INFO_MIN_MASK, 16,
728				RAPL_DOMAIN_MSR_INFO, POWER_UNIT, 0),
729	PRIMITIVE_INFO_INIT(MAX_TIME_WINDOW, POWER_INFO_MAX_TIME_WIN_MASK, 48,
730				RAPL_DOMAIN_MSR_INFO, TIME_UNIT, 0),
731	PRIMITIVE_INFO_INIT(THROTTLED_TIME, PERF_STATUS_THROTTLE_TIME_MASK, 0,
732				RAPL_DOMAIN_MSR_PERF, TIME_UNIT, 0),
733	PRIMITIVE_INFO_INIT(PRIORITY_LEVEL, PP_POLICY_MASK, 0,
734				RAPL_DOMAIN_MSR_POLICY, ARBITRARY_UNIT, 0),
735	/* non-hardware */
736	PRIMITIVE_INFO_INIT(AVERAGE_POWER, 0, 0, 0, POWER_UNIT,
737				RAPL_PRIMITIVE_DERIVED),
738	{NULL, 0, 0, 0},
739};
740
741/* Read primitive data based on its related struct rapl_primitive_info.
742 * if xlate flag is set, return translated data based on data units, i.e.
743 * time, energy, and power.
744 * RAPL MSRs are non-architectual and are laid out not consistently across
745 * domains. Here we use primitive info to allow writing consolidated access
746 * functions.
747 * For a given primitive, it is processed by MSR mask and shift. Unit conversion
748 * is pre-assigned based on RAPL unit MSRs read at init time.
749 * 63-------------------------- 31--------------------------- 0
750 * |                           xxxxx (mask)                   |
751 * |                                |<- shift ----------------|
752 * 63-------------------------- 31--------------------------- 0
753 */
754static int rapl_read_data_raw(struct rapl_domain *rd,
755			enum rapl_primitives prim,
756			bool xlate, u64 *data)
757{
758	u64 value, final;
759	u32 msr;
760	struct rapl_primitive_info *rp = &rpi[prim];
761	int cpu;
762
763	if (!rp->name || rp->flag & RAPL_PRIMITIVE_DUMMY)
764		return -EINVAL;
765
766	msr = rd->msrs[rp->id];
767	if (!msr)
768		return -EINVAL;
769	/* use physical package id to look up active cpus */
770	cpu = find_active_cpu_on_package(rd->package_id);
771	if (cpu < 0)
772		return cpu;
773
774	/* special-case package domain, which uses a different bit*/
775	if (prim == FW_LOCK && rd->id == RAPL_DOMAIN_PACKAGE) {
776		rp->mask = POWER_PACKAGE_LOCK;
777		rp->shift = 63;
778	}
779	/* non-hardware data are collected by the polling thread */
780	if (rp->flag & RAPL_PRIMITIVE_DERIVED) {
781		*data = rd->rdd.primitives[prim];
782		return 0;
783	}
784
785	if (rdmsrl_safe_on_cpu(cpu, msr, &value)) {
786		pr_debug("failed to read msr 0x%x on cpu %d\n", msr, cpu);
787		return -EIO;
788	}
789
790	final = value & rp->mask;
791	final = final >> rp->shift;
792	if (xlate)
793		*data = rapl_unit_xlate(rd, rd->package_id, rp->unit, final, 0);
794	else
795		*data = final;
796
797	return 0;
798}
799
800/* Similar use of primitive info in the read counterpart */
801static int rapl_write_data_raw(struct rapl_domain *rd,
802			enum rapl_primitives prim,
803			unsigned long long value)
804{
805	u64 msr_val;
806	u32 msr;
807	struct rapl_primitive_info *rp = &rpi[prim];
808	int cpu;
809
810	cpu = find_active_cpu_on_package(rd->package_id);
811	if (cpu < 0)
812		return cpu;
813	msr = rd->msrs[rp->id];
814	if (rdmsrl_safe_on_cpu(cpu, msr, &msr_val)) {
815		dev_dbg(&rd->power_zone.dev,
816			"failed to read msr 0x%x on cpu %d\n", msr, cpu);
817		return -EIO;
818	}
819	value = rapl_unit_xlate(rd, rd->package_id, rp->unit, value, 1);
820	msr_val &= ~rp->mask;
821	msr_val |= value << rp->shift;
822	if (wrmsrl_safe_on_cpu(cpu, msr, msr_val)) {
823		dev_dbg(&rd->power_zone.dev,
824			"failed to write msr 0x%x on cpu %d\n", msr, cpu);
825		return -EIO;
826	}
827
828	return 0;
829}
830
831/*
832 * Raw RAPL data stored in MSRs are in certain scales. We need to
833 * convert them into standard units based on the units reported in
834 * the RAPL unit MSRs. This is specific to CPUs as the method to
835 * calculate units differ on different CPUs.
836 * We convert the units to below format based on CPUs.
837 * i.e.
838 * energy unit: picoJoules  : Represented in picoJoules by default
839 * power unit : microWatts  : Represented in milliWatts by default
840 * time unit  : microseconds: Represented in seconds by default
841 */
842static int rapl_check_unit_core(struct rapl_package *rp, int cpu)
843{
844	u64 msr_val;
845	u32 value;
846
847	if (rdmsrl_safe_on_cpu(cpu, MSR_RAPL_POWER_UNIT, &msr_val)) {
848		pr_err("Failed to read power unit MSR 0x%x on CPU %d, exit.\n",
849			MSR_RAPL_POWER_UNIT, cpu);
850		return -ENODEV;
851	}
852
853	value = (msr_val & ENERGY_UNIT_MASK) >> ENERGY_UNIT_OFFSET;
854	rp->energy_unit = ENERGY_UNIT_SCALE * 1000000 / (1 << value);
855
856	value = (msr_val & POWER_UNIT_MASK) >> POWER_UNIT_OFFSET;
857	rp->power_unit = 1000000 / (1 << value);
858
859	value = (msr_val & TIME_UNIT_MASK) >> TIME_UNIT_OFFSET;
860	rp->time_unit = 1000000 / (1 << value);
861
862	pr_debug("Core CPU package %d energy=%dpJ, time=%dus, power=%duW\n",
863		rp->id, rp->energy_unit, rp->time_unit, rp->power_unit);
864
865	return 0;
866}
867
868static int rapl_check_unit_atom(struct rapl_package *rp, int cpu)
869{
870	u64 msr_val;
871	u32 value;
872
873	if (rdmsrl_safe_on_cpu(cpu, MSR_RAPL_POWER_UNIT, &msr_val)) {
874		pr_err("Failed to read power unit MSR 0x%x on CPU %d, exit.\n",
875			MSR_RAPL_POWER_UNIT, cpu);
876		return -ENODEV;
877	}
878	value = (msr_val & ENERGY_UNIT_MASK) >> ENERGY_UNIT_OFFSET;
879	rp->energy_unit = ENERGY_UNIT_SCALE * 1 << value;
880
881	value = (msr_val & POWER_UNIT_MASK) >> POWER_UNIT_OFFSET;
882	rp->power_unit = (1 << value) * 1000;
883
884	value = (msr_val & TIME_UNIT_MASK) >> TIME_UNIT_OFFSET;
885	rp->time_unit = 1000000 / (1 << value);
886
887	pr_debug("Atom package %d energy=%dpJ, time=%dus, power=%duW\n",
888		rp->id, rp->energy_unit, rp->time_unit, rp->power_unit);
889
890	return 0;
891}
892
893
894/* REVISIT:
895 * When package power limit is set artificially low by RAPL, LVT
896 * thermal interrupt for package power limit should be ignored
897 * since we are not really exceeding the real limit. The intention
898 * is to avoid excessive interrupts while we are trying to save power.
899 * A useful feature might be routing the package_power_limit interrupt
900 * to userspace via eventfd. once we have a usecase, this is simple
901 * to do by adding an atomic notifier.
902 */
903
904static void package_power_limit_irq_save(int package_id)
905{
906	u32 l, h = 0;
907	int cpu;
908	struct rapl_package *rp;
909
910	rp = find_package_by_id(package_id);
911	if (!rp)
912		return;
913
914	if (!boot_cpu_has(X86_FEATURE_PTS) || !boot_cpu_has(X86_FEATURE_PLN))
915		return;
916
917	cpu = find_active_cpu_on_package(package_id);
918	if (cpu < 0)
919		return;
920	/* save the state of PLN irq mask bit before disabling it */
921	rdmsr_safe_on_cpu(cpu, MSR_IA32_PACKAGE_THERM_INTERRUPT, &l, &h);
922	if (!(rp->power_limit_irq & PACKAGE_PLN_INT_SAVED)) {
923		rp->power_limit_irq = l & PACKAGE_THERM_INT_PLN_ENABLE;
924		rp->power_limit_irq |= PACKAGE_PLN_INT_SAVED;
925	}
926	l &= ~PACKAGE_THERM_INT_PLN_ENABLE;
927	wrmsr_on_cpu(cpu, MSR_IA32_PACKAGE_THERM_INTERRUPT, l, h);
928}
929
930/* restore per package power limit interrupt enable state */
931static void package_power_limit_irq_restore(int package_id)
932{
933	u32 l, h;
934	int cpu;
935	struct rapl_package *rp;
936
937	rp = find_package_by_id(package_id);
938	if (!rp)
939		return;
940
941	if (!boot_cpu_has(X86_FEATURE_PTS) || !boot_cpu_has(X86_FEATURE_PLN))
942		return;
943
944	cpu = find_active_cpu_on_package(package_id);
945	if (cpu < 0)
946		return;
947
948	/* irq enable state not saved, nothing to restore */
949	if (!(rp->power_limit_irq & PACKAGE_PLN_INT_SAVED))
950		return;
951	rdmsr_safe_on_cpu(cpu, MSR_IA32_PACKAGE_THERM_INTERRUPT, &l, &h);
952
953	if (rp->power_limit_irq & PACKAGE_THERM_INT_PLN_ENABLE)
954		l |= PACKAGE_THERM_INT_PLN_ENABLE;
955	else
956		l &= ~PACKAGE_THERM_INT_PLN_ENABLE;
957
958	wrmsr_on_cpu(cpu, MSR_IA32_PACKAGE_THERM_INTERRUPT, l, h);
959}
960
961static void set_floor_freq_default(struct rapl_domain *rd, bool mode)
962{
963	int nr_powerlimit = find_nr_power_limit(rd);
964
965	/* always enable clamp such that p-state can go below OS requested
966	 * range. power capping priority over guranteed frequency.
967	 */
968	rapl_write_data_raw(rd, PL1_CLAMP, mode);
969
970	/* some domains have pl2 */
971	if (nr_powerlimit > 1) {
972		rapl_write_data_raw(rd, PL2_ENABLE, mode);
973		rapl_write_data_raw(rd, PL2_CLAMP, mode);
974	}
975}
976
977static void set_floor_freq_atom(struct rapl_domain *rd, bool enable)
978{
979	static u32 power_ctrl_orig_val;
980	u32 mdata;
981
982	if (!power_ctrl_orig_val)
983		iosf_mbi_read(BT_MBI_UNIT_PMC, BT_MBI_PMC_READ,
984			IOSF_CPU_POWER_BUDGET_CTL, &power_ctrl_orig_val);
985	mdata = power_ctrl_orig_val;
986	if (enable) {
987		mdata &= ~(0x7f << 8);
988		mdata |= 1 << 8;
989	}
990	iosf_mbi_write(BT_MBI_UNIT_PMC, BT_MBI_PMC_WRITE,
991		IOSF_CPU_POWER_BUDGET_CTL, mdata);
992}
993
994static u64 rapl_compute_time_window_core(struct rapl_package *rp, u64 value,
995					bool to_raw)
996{
997	u64 f, y; /* fraction and exp. used for time unit */
998
999	/*
1000	 * Special processing based on 2^Y*(1+F/4), refer
1001	 * to Intel Software Developer's manual Vol.3B: CH 14.9.3.
1002	 */
1003	if (!to_raw) {
1004		f = (value & 0x60) >> 5;
1005		y = value & 0x1f;
1006		value = (1 << y) * (4 + f) * rp->time_unit / 4;
1007	} else {
1008		do_div(value, rp->time_unit);
1009		y = ilog2(value);
1010		f = div64_u64(4 * (value - (1 << y)), 1 << y);
1011		value = (y & 0x1f) | ((f & 0x3) << 5);
1012	}
1013	return value;
1014}
1015
1016static u64 rapl_compute_time_window_atom(struct rapl_package *rp, u64 value,
1017					bool to_raw)
1018{
1019	/*
1020	 * Atom time unit encoding is straight forward val * time_unit,
1021	 * where time_unit is default to 1 sec. Never 0.
1022	 */
1023	if (!to_raw)
1024		return (value) ? value *= rp->time_unit : rp->time_unit;
1025	else
1026		value = div64_u64(value, rp->time_unit);
1027
1028	return value;
1029}
1030
1031static const struct rapl_defaults rapl_defaults_core = {
1032	.check_unit = rapl_check_unit_core,
1033	.set_floor_freq = set_floor_freq_default,
1034	.compute_time_window = rapl_compute_time_window_core,
1035};
1036
1037static const struct rapl_defaults rapl_defaults_hsw_server = {
1038	.check_unit = rapl_check_unit_core,
1039	.set_floor_freq = set_floor_freq_default,
1040	.compute_time_window = rapl_compute_time_window_core,
1041	.dram_domain_energy_unit = 15300,
1042};
1043
1044static const struct rapl_defaults rapl_defaults_atom = {
1045	.check_unit = rapl_check_unit_atom,
1046	.set_floor_freq = set_floor_freq_atom,
1047	.compute_time_window = rapl_compute_time_window_atom,
1048};
1049
1050#define RAPL_CPU(_model, _ops) {			\
1051		.vendor = X86_VENDOR_INTEL,		\
1052		.family = 6,				\
1053		.model = _model,			\
1054		.driver_data = (kernel_ulong_t)&_ops,	\
1055		}
1056
1057static const struct x86_cpu_id rapl_ids[] __initconst = {
1058	RAPL_CPU(0x2a, rapl_defaults_core),/* Sandy Bridge */
1059	RAPL_CPU(0x2d, rapl_defaults_core),/* Sandy Bridge EP */
1060	RAPL_CPU(0x37, rapl_defaults_atom),/* Valleyview */
1061	RAPL_CPU(0x3a, rapl_defaults_core),/* Ivy Bridge */
1062	RAPL_CPU(0x3c, rapl_defaults_core),/* Haswell */
1063	RAPL_CPU(0x3d, rapl_defaults_core),/* Broadwell */
1064	RAPL_CPU(0x3f, rapl_defaults_hsw_server),/* Haswell servers */
1065	RAPL_CPU(0x4f, rapl_defaults_hsw_server),/* Broadwell servers */
1066	RAPL_CPU(0x45, rapl_defaults_core),/* Haswell ULT */
1067	RAPL_CPU(0x4E, rapl_defaults_core),/* Skylake */
1068	RAPL_CPU(0x4C, rapl_defaults_atom),/* Braswell */
1069	RAPL_CPU(0x4A, rapl_defaults_atom),/* Tangier */
1070	RAPL_CPU(0x56, rapl_defaults_core),/* Future Xeon */
1071	RAPL_CPU(0x5A, rapl_defaults_atom),/* Annidale */
1072	{}
1073};
1074MODULE_DEVICE_TABLE(x86cpu, rapl_ids);
1075
1076/* read once for all raw primitive data for all packages, domains */
1077static void rapl_update_domain_data(void)
1078{
1079	int dmn, prim;
1080	u64 val;
1081	struct rapl_package *rp;
1082
1083	list_for_each_entry(rp, &rapl_packages, plist) {
1084		for (dmn = 0; dmn < rp->nr_domains; dmn++) {
1085			pr_debug("update package %d domain %s data\n", rp->id,
1086				rp->domains[dmn].name);
1087			/* exclude non-raw primitives */
1088			for (prim = 0; prim < NR_RAW_PRIMITIVES; prim++)
1089				if (!rapl_read_data_raw(&rp->domains[dmn], prim,
1090								rpi[prim].unit,
1091								&val))
1092					rp->domains[dmn].rdd.primitives[prim] =
1093									val;
1094		}
1095	}
1096
1097}
1098
1099static int rapl_unregister_powercap(void)
1100{
1101	struct rapl_package *rp;
1102	struct rapl_domain *rd, *rd_package = NULL;
1103
1104	/* unregister all active rapl packages from the powercap layer,
1105	 * hotplug lock held
1106	 */
1107	list_for_each_entry(rp, &rapl_packages, plist) {
1108		package_power_limit_irq_restore(rp->id);
1109
1110		for (rd = rp->domains; rd < rp->domains + rp->nr_domains;
1111		     rd++) {
1112			pr_debug("remove package, undo power limit on %d: %s\n",
1113				rp->id, rd->name);
1114			rapl_write_data_raw(rd, PL1_ENABLE, 0);
1115			rapl_write_data_raw(rd, PL2_ENABLE, 0);
1116			rapl_write_data_raw(rd, PL1_CLAMP, 0);
1117			rapl_write_data_raw(rd, PL2_CLAMP, 0);
1118			if (rd->id == RAPL_DOMAIN_PACKAGE) {
1119				rd_package = rd;
1120				continue;
1121			}
1122			powercap_unregister_zone(control_type, &rd->power_zone);
1123		}
1124		/* do the package zone last */
1125		if (rd_package)
1126			powercap_unregister_zone(control_type,
1127						&rd_package->power_zone);
1128	}
1129	powercap_unregister_control_type(control_type);
1130
1131	return 0;
1132}
1133
1134static int rapl_package_register_powercap(struct rapl_package *rp)
1135{
1136	struct rapl_domain *rd;
1137	int ret = 0;
1138	char dev_name[17]; /* max domain name = 7 + 1 + 8 for int + 1 for null*/
1139	struct powercap_zone *power_zone = NULL;
1140	int nr_pl;
1141
1142	/* first we register package domain as the parent zone*/
1143	for (rd = rp->domains; rd < rp->domains + rp->nr_domains; rd++) {
1144		if (rd->id == RAPL_DOMAIN_PACKAGE) {
1145			nr_pl = find_nr_power_limit(rd);
1146			pr_debug("register socket %d package domain %s\n",
1147				rp->id, rd->name);
1148			memset(dev_name, 0, sizeof(dev_name));
1149			snprintf(dev_name, sizeof(dev_name), "%s-%d",
1150				rd->name, rp->id);
1151			power_zone = powercap_register_zone(&rd->power_zone,
1152							control_type,
1153							dev_name, NULL,
1154							&zone_ops[rd->id],
1155							nr_pl,
1156							&constraint_ops);
1157			if (IS_ERR(power_zone)) {
1158				pr_debug("failed to register package, %d\n",
1159					rp->id);
1160				ret = PTR_ERR(power_zone);
1161				goto exit_package;
1162			}
1163			/* track parent zone in per package/socket data */
1164			rp->power_zone = power_zone;
1165			/* done, only one package domain per socket */
1166			break;
1167		}
1168	}
1169	if (!power_zone) {
1170		pr_err("no package domain found, unknown topology!\n");
1171		ret = -ENODEV;
1172		goto exit_package;
1173	}
1174	/* now register domains as children of the socket/package*/
1175	for (rd = rp->domains; rd < rp->domains + rp->nr_domains; rd++) {
1176		if (rd->id == RAPL_DOMAIN_PACKAGE)
1177			continue;
1178		/* number of power limits per domain varies */
1179		nr_pl = find_nr_power_limit(rd);
1180		power_zone = powercap_register_zone(&rd->power_zone,
1181						control_type, rd->name,
1182						rp->power_zone,
1183						&zone_ops[rd->id], nr_pl,
1184						&constraint_ops);
1185
1186		if (IS_ERR(power_zone)) {
1187			pr_debug("failed to register power_zone, %d:%s:%s\n",
1188				rp->id, rd->name, dev_name);
1189			ret = PTR_ERR(power_zone);
1190			goto err_cleanup;
1191		}
1192	}
1193
1194exit_package:
1195	return ret;
1196err_cleanup:
1197	/* clean up previously initialized domains within the package if we
1198	 * failed after the first domain setup.
1199	 */
1200	while (--rd >= rp->domains) {
1201		pr_debug("unregister package %d domain %s\n", rp->id, rd->name);
1202		powercap_unregister_zone(control_type, &rd->power_zone);
1203	}
1204
1205	return ret;
1206}
1207
1208static int rapl_register_powercap(void)
1209{
1210	struct rapl_domain *rd;
1211	struct rapl_package *rp;
1212	int ret = 0;
1213
1214	control_type = powercap_register_control_type(NULL, "intel-rapl", NULL);
1215	if (IS_ERR(control_type)) {
1216		pr_debug("failed to register powercap control_type.\n");
1217		return PTR_ERR(control_type);
1218	}
1219	/* read the initial data */
1220	rapl_update_domain_data();
1221	list_for_each_entry(rp, &rapl_packages, plist)
1222		if (rapl_package_register_powercap(rp))
1223			goto err_cleanup_package;
1224	return ret;
1225
1226err_cleanup_package:
1227	/* clean up previously initialized packages */
1228	list_for_each_entry_continue_reverse(rp, &rapl_packages, plist) {
1229		for (rd = rp->domains; rd < rp->domains + rp->nr_domains;
1230		     rd++) {
1231			pr_debug("unregister zone/package %d, %s domain\n",
1232				rp->id, rd->name);
1233			powercap_unregister_zone(control_type, &rd->power_zone);
1234		}
1235	}
1236
1237	return ret;
1238}
1239
1240static int rapl_check_domain(int cpu, int domain)
1241{
1242	unsigned msr;
1243	u64 val = 0;
1244
1245	switch (domain) {
1246	case RAPL_DOMAIN_PACKAGE:
1247		msr = MSR_PKG_ENERGY_STATUS;
1248		break;
1249	case RAPL_DOMAIN_PP0:
1250		msr = MSR_PP0_ENERGY_STATUS;
1251		break;
1252	case RAPL_DOMAIN_PP1:
1253		msr = MSR_PP1_ENERGY_STATUS;
1254		break;
1255	case RAPL_DOMAIN_DRAM:
1256		msr = MSR_DRAM_ENERGY_STATUS;
1257		break;
1258	default:
1259		pr_err("invalid domain id %d\n", domain);
1260		return -EINVAL;
1261	}
1262	/* make sure domain counters are available and contains non-zero
1263	 * values, otherwise skip it.
1264	 */
1265	if (rdmsrl_safe_on_cpu(cpu, msr, &val) || !val)
1266		return -ENODEV;
1267
1268	return 0;
1269}
1270
1271/* Detect active and valid domains for the given CPU, caller must
1272 * ensure the CPU belongs to the targeted package and CPU hotlug is disabled.
1273 */
1274static int rapl_detect_domains(struct rapl_package *rp, int cpu)
1275{
1276	int i;
1277	int ret = 0;
1278	struct rapl_domain *rd;
1279	u64 locked;
1280
1281	for (i = 0; i < RAPL_DOMAIN_MAX; i++) {
1282		/* use physical package id to read counters */
1283		if (!rapl_check_domain(cpu, i)) {
1284			rp->domain_map |= 1 << i;
1285			pr_info("Found RAPL domain %s\n", rapl_domain_names[i]);
1286		}
1287	}
1288	rp->nr_domains = bitmap_weight(&rp->domain_map,	RAPL_DOMAIN_MAX);
1289	if (!rp->nr_domains) {
1290		pr_err("no valid rapl domains found in package %d\n", rp->id);
1291		ret = -ENODEV;
1292		goto done;
1293	}
1294	pr_debug("found %d domains on package %d\n", rp->nr_domains, rp->id);
1295
1296	rp->domains = kcalloc(rp->nr_domains + 1, sizeof(struct rapl_domain),
1297			GFP_KERNEL);
1298	if (!rp->domains) {
1299		ret = -ENOMEM;
1300		goto done;
1301	}
1302	rapl_init_domains(rp);
1303
1304	for (rd = rp->domains; rd < rp->domains + rp->nr_domains; rd++) {
1305		/* check if the domain is locked by BIOS */
1306		if (rapl_read_data_raw(rd, FW_LOCK, false, &locked)) {
1307			pr_info("RAPL package %d domain %s locked by BIOS\n",
1308				rp->id, rd->name);
1309				rd->state |= DOMAIN_STATE_BIOS_LOCKED;
1310		}
1311	}
1312
1313
1314done:
1315	return ret;
1316}
1317
1318static bool is_package_new(int package)
1319{
1320	struct rapl_package *rp;
1321
1322	/* caller prevents cpu hotplug, there will be no new packages added
1323	 * or deleted while traversing the package list, no need for locking.
1324	 */
1325	list_for_each_entry(rp, &rapl_packages, plist)
1326		if (package == rp->id)
1327			return false;
1328
1329	return true;
1330}
1331
1332/* RAPL interface can be made of a two-level hierarchy: package level and domain
1333 * level. We first detect the number of packages then domains of each package.
1334 * We have to consider the possiblity of CPU online/offline due to hotplug and
1335 * other scenarios.
1336 */
1337static int rapl_detect_topology(void)
1338{
1339	int i;
1340	int phy_package_id;
1341	struct rapl_package *new_package, *rp;
1342
1343	for_each_online_cpu(i) {
1344		phy_package_id = topology_physical_package_id(i);
1345		if (is_package_new(phy_package_id)) {
1346			new_package = kzalloc(sizeof(*rp), GFP_KERNEL);
1347			if (!new_package) {
1348				rapl_cleanup_data();
1349				return -ENOMEM;
1350			}
1351			/* add the new package to the list */
1352			new_package->id = phy_package_id;
1353			new_package->nr_cpus = 1;
1354
1355			/* check if the package contains valid domains */
1356			if (rapl_detect_domains(new_package, i) ||
1357				rapl_defaults->check_unit(new_package, i)) {
1358				kfree(new_package->domains);
1359				kfree(new_package);
1360				/* free up the packages already initialized */
1361				rapl_cleanup_data();
1362				return -ENODEV;
1363			}
1364			INIT_LIST_HEAD(&new_package->plist);
1365			list_add(&new_package->plist, &rapl_packages);
1366		} else {
1367			rp = find_package_by_id(phy_package_id);
1368			if (rp)
1369				++rp->nr_cpus;
1370		}
1371	}
1372
1373	return 0;
1374}
1375
1376/* called from CPU hotplug notifier, hotplug lock held */
1377static void rapl_remove_package(struct rapl_package *rp)
1378{
1379	struct rapl_domain *rd, *rd_package = NULL;
1380
1381	for (rd = rp->domains; rd < rp->domains + rp->nr_domains; rd++) {
1382		if (rd->id == RAPL_DOMAIN_PACKAGE) {
1383			rd_package = rd;
1384			continue;
1385		}
1386		pr_debug("remove package %d, %s domain\n", rp->id, rd->name);
1387		powercap_unregister_zone(control_type, &rd->power_zone);
1388	}
1389	/* do parent zone last */
1390	powercap_unregister_zone(control_type, &rd_package->power_zone);
1391	list_del(&rp->plist);
1392	kfree(rp);
1393}
1394
1395/* called from CPU hotplug notifier, hotplug lock held */
1396static int rapl_add_package(int cpu)
1397{
1398	int ret = 0;
1399	int phy_package_id;
1400	struct rapl_package *rp;
1401
1402	phy_package_id = topology_physical_package_id(cpu);
1403	rp = kzalloc(sizeof(struct rapl_package), GFP_KERNEL);
1404	if (!rp)
1405		return -ENOMEM;
1406
1407	/* add the new package to the list */
1408	rp->id = phy_package_id;
1409	rp->nr_cpus = 1;
1410	/* check if the package contains valid domains */
1411	if (rapl_detect_domains(rp, cpu) ||
1412		rapl_defaults->check_unit(rp, cpu)) {
1413		ret = -ENODEV;
1414		goto err_free_package;
1415	}
1416	if (!rapl_package_register_powercap(rp)) {
1417		INIT_LIST_HEAD(&rp->plist);
1418		list_add(&rp->plist, &rapl_packages);
1419		return ret;
1420	}
1421
1422err_free_package:
1423	kfree(rp->domains);
1424	kfree(rp);
1425
1426	return ret;
1427}
1428
1429/* Handles CPU hotplug on multi-socket systems.
1430 * If a CPU goes online as the first CPU of the physical package
1431 * we add the RAPL package to the system. Similarly, when the last
1432 * CPU of the package is removed, we remove the RAPL package and its
1433 * associated domains. Cooling devices are handled accordingly at
1434 * per-domain level.
1435 */
1436static int rapl_cpu_callback(struct notifier_block *nfb,
1437				unsigned long action, void *hcpu)
1438{
1439	unsigned long cpu = (unsigned long)hcpu;
1440	int phy_package_id;
1441	struct rapl_package *rp;
1442
1443	phy_package_id = topology_physical_package_id(cpu);
1444	switch (action) {
1445	case CPU_ONLINE:
1446	case CPU_ONLINE_FROZEN:
1447	case CPU_DOWN_FAILED:
1448	case CPU_DOWN_FAILED_FROZEN:
1449		rp = find_package_by_id(phy_package_id);
1450		if (rp)
1451			++rp->nr_cpus;
1452		else
1453			rapl_add_package(cpu);
1454		break;
1455	case CPU_DOWN_PREPARE:
1456	case CPU_DOWN_PREPARE_FROZEN:
1457		rp = find_package_by_id(phy_package_id);
1458		if (!rp)
1459			break;
1460		if (--rp->nr_cpus == 0)
1461			rapl_remove_package(rp);
1462	}
1463
1464	return NOTIFY_OK;
1465}
1466
1467static struct notifier_block rapl_cpu_notifier = {
1468	.notifier_call = rapl_cpu_callback,
1469};
1470
1471static int __init rapl_init(void)
1472{
1473	int ret = 0;
1474	const struct x86_cpu_id *id;
1475
1476	id = x86_match_cpu(rapl_ids);
1477	if (!id) {
1478		pr_err("driver does not support CPU family %d model %d\n",
1479			boot_cpu_data.x86, boot_cpu_data.x86_model);
1480
1481		return -ENODEV;
1482	}
1483
1484	rapl_defaults = (struct rapl_defaults *)id->driver_data;
1485
1486	cpu_notifier_register_begin();
1487
1488	/* prevent CPU hotplug during detection */
1489	get_online_cpus();
1490	ret = rapl_detect_topology();
1491	if (ret)
1492		goto done;
1493
1494	if (rapl_register_powercap()) {
1495		rapl_cleanup_data();
1496		ret = -ENODEV;
1497		goto done;
1498	}
1499	__register_hotcpu_notifier(&rapl_cpu_notifier);
1500done:
1501	put_online_cpus();
1502	cpu_notifier_register_done();
1503
1504	return ret;
1505}
1506
1507static void __exit rapl_exit(void)
1508{
1509	cpu_notifier_register_begin();
1510	get_online_cpus();
1511	__unregister_hotcpu_notifier(&rapl_cpu_notifier);
1512	rapl_unregister_powercap();
1513	rapl_cleanup_data();
1514	put_online_cpus();
1515	cpu_notifier_register_done();
1516}
1517
1518module_init(rapl_init);
1519module_exit(rapl_exit);
1520
1521MODULE_DESCRIPTION("Driver for Intel RAPL (Running Average Power Limit)");
1522MODULE_AUTHOR("Jacob Pan <jacob.jun.pan@intel.com>");
1523MODULE_LICENSE("GPL v2");
1524