drivers/powercap/intel_rapl.c

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