1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2005 Nate Lawson 5 * Copyright (c) 2004 Colin Percival 6 * Copyright (c) 2004-2005 Bruno Durcot 7 * Copyright (c) 2004 FUKUDA Nobuhiko 8 * Copyright (c) 2009 Michael Reifenberger 9 * Copyright (c) 2009 Norikatsu Shigemura 10 * Copyright (c) 2008-2009 Gen Otsuji 11 * 12 * This code is depending on kern_cpu.c, est.c, powernow.c, p4tcc.c, smist.c 13 * in various parts. The authors of these files are Nate Lawson, 14 * Colin Percival, Bruno Durcot, and FUKUDA Nobuhiko. 15 * This code contains patches by Michael Reifenberger and Norikatsu Shigemura. 16 * Thank you. 17 * 18 * Redistribution and use in source and binary forms, with or without 19 * modification, are permitted providing that the following conditions 20 * are met: 21 * 1. Redistributions of source code must retain the above copyright 22 * notice, this list of conditions and the following disclaimer. 23 * 2. Redistributions in binary form must reproduce the above copyright 24 * notice, this list of conditions and the following disclaimer in the 25 * documentation and/or other materials provided with the distribution. 26 * 27 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR``AS IS'' AND ANY EXPRESS OR 28 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 29 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 30 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY 31 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 32 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 33 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 34 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 35 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING 36 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 37 * POSSIBILITY OF SUCH DAMAGE. 38 */ 39 40 /* 41 * For more info: 42 * BIOS and Kernel Developer's Guide(BKDG) for AMD Family 10h Processors 43 * 31116 Rev 3.20 February 04, 2009 44 * BIOS and Kernel Developer's Guide(BKDG) for AMD Family 11h Processors 45 * 41256 Rev 3.00 - July 07, 2008 46 */ 47 48 #include <sys/cdefs.h> 49 __FBSDID("$FreeBSD$"); 50 51 #include <sys/param.h> 52 #include <sys/bus.h> 53 #include <sys/cpu.h> 54 #include <sys/kernel.h> 55 #include <sys/module.h> 56 #include <sys/malloc.h> 57 #include <sys/proc.h> 58 #include <sys/pcpu.h> 59 #include <sys/smp.h> 60 #include <sys/sched.h> 61 62 #include <machine/md_var.h> 63 #include <machine/cputypes.h> 64 #include <machine/specialreg.h> 65 66 #include <contrib/dev/acpica/include/acpi.h> 67 68 #include <dev/acpica/acpivar.h> 69 70 #include "acpi_if.h" 71 #include "cpufreq_if.h" 72 73 #define MSR_AMD_10H_11H_LIMIT 0xc0010061 74 #define MSR_AMD_10H_11H_CONTROL 0xc0010062 75 #define MSR_AMD_10H_11H_STATUS 0xc0010063 76 #define MSR_AMD_10H_11H_CONFIG 0xc0010064 77 78 #define AMD_10H_11H_MAX_STATES 16 79 80 /* for MSR_AMD_10H_11H_LIMIT C001_0061 */ 81 #define AMD_10H_11H_GET_PSTATE_MAX_VAL(msr) (((msr) >> 4) & 0x7) 82 #define AMD_10H_11H_GET_PSTATE_LIMIT(msr) (((msr)) & 0x7) 83 /* for MSR_AMD_10H_11H_CONFIG 10h:C001_0064:68 / 11h:C001_0064:6B */ 84 #define AMD_10H_11H_CUR_VID(msr) (((msr) >> 9) & 0x7F) 85 #define AMD_10H_11H_CUR_DID(msr) (((msr) >> 6) & 0x07) 86 #define AMD_10H_11H_CUR_FID(msr) ((msr) & 0x3F) 87 88 #define AMD_17H_CUR_VID(msr) (((msr) >> 14) & 0xFF) 89 #define AMD_17H_CUR_DID(msr) (((msr) >> 8) & 0x3F) 90 #define AMD_17H_CUR_FID(msr) ((msr) & 0xFF) 91 92 #define HWPSTATE_DEBUG(dev, msg...) \ 93 do { \ 94 if (hwpstate_verbose) \ 95 device_printf(dev, msg); \ 96 } while (0) 97 98 struct hwpstate_setting { 99 int freq; /* CPU clock in Mhz or 100ths of a percent. */ 100 int volts; /* Voltage in mV. */ 101 int power; /* Power consumed in mW. */ 102 int lat; /* Transition latency in us. */ 103 int pstate_id; /* P-State id */ 104 }; 105 106 struct hwpstate_softc { 107 device_t dev; 108 struct hwpstate_setting hwpstate_settings[AMD_10H_11H_MAX_STATES]; 109 int cfnum; 110 }; 111 112 static void hwpstate_identify(driver_t *driver, device_t parent); 113 static int hwpstate_probe(device_t dev); 114 static int hwpstate_attach(device_t dev); 115 static int hwpstate_detach(device_t dev); 116 static int hwpstate_set(device_t dev, const struct cf_setting *cf); 117 static int hwpstate_get(device_t dev, struct cf_setting *cf); 118 static int hwpstate_settings(device_t dev, struct cf_setting *sets, int *count); 119 static int hwpstate_type(device_t dev, int *type); 120 static int hwpstate_shutdown(device_t dev); 121 static int hwpstate_features(driver_t *driver, u_int *features); 122 static int hwpstate_get_info_from_acpi_perf(device_t dev, device_t perf_dev); 123 static int hwpstate_get_info_from_msr(device_t dev); 124 static int hwpstate_goto_pstate(device_t dev, int pstate_id); 125 126 static int hwpstate_verbose; 127 SYSCTL_INT(_debug, OID_AUTO, hwpstate_verbose, CTLFLAG_RWTUN, 128 &hwpstate_verbose, 0, "Debug hwpstate"); 129 130 static int hwpstate_verify; 131 SYSCTL_INT(_debug, OID_AUTO, hwpstate_verify, CTLFLAG_RWTUN, 132 &hwpstate_verify, 0, "Verify P-state after setting"); 133 134 static device_method_t hwpstate_methods[] = { 135 /* Device interface */ 136 DEVMETHOD(device_identify, hwpstate_identify), 137 DEVMETHOD(device_probe, hwpstate_probe), 138 DEVMETHOD(device_attach, hwpstate_attach), 139 DEVMETHOD(device_detach, hwpstate_detach), 140 DEVMETHOD(device_shutdown, hwpstate_shutdown), 141 142 /* cpufreq interface */ 143 DEVMETHOD(cpufreq_drv_set, hwpstate_set), 144 DEVMETHOD(cpufreq_drv_get, hwpstate_get), 145 DEVMETHOD(cpufreq_drv_settings, hwpstate_settings), 146 DEVMETHOD(cpufreq_drv_type, hwpstate_type), 147 148 /* ACPI interface */ 149 DEVMETHOD(acpi_get_features, hwpstate_features), 150 151 {0, 0} 152 }; 153 154 static devclass_t hwpstate_devclass; 155 static driver_t hwpstate_driver = { 156 "hwpstate", 157 hwpstate_methods, 158 sizeof(struct hwpstate_softc), 159 }; 160 161 DRIVER_MODULE(hwpstate, cpu, hwpstate_driver, hwpstate_devclass, 0, 0); 162 163 /* 164 * Go to Px-state on all cpus considering the limit. 165 */ 166 static int 167 hwpstate_goto_pstate(device_t dev, int id) 168 { 169 sbintime_t sbt; 170 uint64_t msr; 171 int cpu, i, j, limit; 172 173 /* get the current pstate limit */ 174 msr = rdmsr(MSR_AMD_10H_11H_LIMIT); 175 limit = AMD_10H_11H_GET_PSTATE_LIMIT(msr); 176 if (limit > id) 177 id = limit; 178 179 cpu = curcpu; 180 HWPSTATE_DEBUG(dev, "setting P%d-state on cpu%d\n", id, cpu); 181 /* Go To Px-state */ 182 wrmsr(MSR_AMD_10H_11H_CONTROL, id); 183 184 /* 185 * We are going to the same Px-state on all cpus. 186 * Probably should take _PSD into account. 187 */ 188 CPU_FOREACH(i) { 189 if (i == cpu) 190 continue; 191 192 /* Bind to each cpu. */ 193 thread_lock(curthread); 194 sched_bind(curthread, i); 195 thread_unlock(curthread); 196 HWPSTATE_DEBUG(dev, "setting P%d-state on cpu%d\n", id, i); 197 /* Go To Px-state */ 198 wrmsr(MSR_AMD_10H_11H_CONTROL, id); 199 } 200 201 /* 202 * Verify whether each core is in the requested P-state. 203 */ 204 if (hwpstate_verify) { 205 CPU_FOREACH(i) { 206 thread_lock(curthread); 207 sched_bind(curthread, i); 208 thread_unlock(curthread); 209 /* wait loop (100*100 usec is enough ?) */ 210 for (j = 0; j < 100; j++) { 211 /* get the result. not assure msr=id */ 212 msr = rdmsr(MSR_AMD_10H_11H_STATUS); 213 if (msr == id) 214 break; 215 sbt = SBT_1MS / 10; 216 tsleep_sbt(dev, PZERO, "pstate_goto", sbt, 217 sbt >> tc_precexp, 0); 218 } 219 HWPSTATE_DEBUG(dev, "result: P%d-state on cpu%d\n", 220 (int)msr, i); 221 if (msr != id) { 222 HWPSTATE_DEBUG(dev, 223 "error: loop is not enough.\n"); 224 return (ENXIO); 225 } 226 } 227 } 228 229 return (0); 230 } 231 232 static int 233 hwpstate_set(device_t dev, const struct cf_setting *cf) 234 { 235 struct hwpstate_softc *sc; 236 struct hwpstate_setting *set; 237 int i; 238 239 if (cf == NULL) 240 return (EINVAL); 241 sc = device_get_softc(dev); 242 set = sc->hwpstate_settings; 243 for (i = 0; i < sc->cfnum; i++) 244 if (CPUFREQ_CMP(cf->freq, set[i].freq)) 245 break; 246 if (i == sc->cfnum) 247 return (EINVAL); 248 249 return (hwpstate_goto_pstate(dev, set[i].pstate_id)); 250 } 251 252 static int 253 hwpstate_get(device_t dev, struct cf_setting *cf) 254 { 255 struct hwpstate_softc *sc; 256 struct hwpstate_setting set; 257 uint64_t msr; 258 259 sc = device_get_softc(dev); 260 if (cf == NULL) 261 return (EINVAL); 262 msr = rdmsr(MSR_AMD_10H_11H_STATUS); 263 if (msr >= sc->cfnum) 264 return (EINVAL); 265 set = sc->hwpstate_settings[msr]; 266 267 cf->freq = set.freq; 268 cf->volts = set.volts; 269 cf->power = set.power; 270 cf->lat = set.lat; 271 cf->dev = dev; 272 return (0); 273 } 274 275 static int 276 hwpstate_settings(device_t dev, struct cf_setting *sets, int *count) 277 { 278 struct hwpstate_softc *sc; 279 struct hwpstate_setting set; 280 int i; 281 282 if (sets == NULL || count == NULL) 283 return (EINVAL); 284 sc = device_get_softc(dev); 285 if (*count < sc->cfnum) 286 return (E2BIG); 287 for (i = 0; i < sc->cfnum; i++, sets++) { 288 set = sc->hwpstate_settings[i]; 289 sets->freq = set.freq; 290 sets->volts = set.volts; 291 sets->power = set.power; 292 sets->lat = set.lat; 293 sets->dev = dev; 294 } 295 *count = sc->cfnum; 296 297 return (0); 298 } 299 300 static int 301 hwpstate_type(device_t dev, int *type) 302 { 303 304 if (type == NULL) 305 return (EINVAL); 306 307 *type = CPUFREQ_TYPE_ABSOLUTE; 308 return (0); 309 } 310 311 static void 312 hwpstate_identify(driver_t *driver, device_t parent) 313 { 314 315 if (device_find_child(parent, "hwpstate", -1) != NULL) 316 return; 317 318 if ((cpu_vendor_id != CPU_VENDOR_AMD || CPUID_TO_FAMILY(cpu_id) < 0x10) && 319 cpu_vendor_id != CPU_VENDOR_HYGON) 320 return; 321 322 /* 323 * Check if hardware pstate enable bit is set. 324 */ 325 if ((amd_pminfo & AMDPM_HW_PSTATE) == 0) { 326 HWPSTATE_DEBUG(parent, "hwpstate enable bit is not set.\n"); 327 return; 328 } 329 330 if (resource_disabled("hwpstate", 0)) 331 return; 332 333 if (BUS_ADD_CHILD(parent, 10, "hwpstate", -1) == NULL) 334 device_printf(parent, "hwpstate: add child failed\n"); 335 } 336 337 static int 338 hwpstate_probe(device_t dev) 339 { 340 struct hwpstate_softc *sc; 341 device_t perf_dev; 342 uint64_t msr; 343 int error, type; 344 345 /* 346 * Only hwpstate0. 347 * It goes well with acpi_throttle. 348 */ 349 if (device_get_unit(dev) != 0) 350 return (ENXIO); 351 352 sc = device_get_softc(dev); 353 sc->dev = dev; 354 355 /* 356 * Check if acpi_perf has INFO only flag. 357 */ 358 perf_dev = device_find_child(device_get_parent(dev), "acpi_perf", -1); 359 error = TRUE; 360 if (perf_dev && device_is_attached(perf_dev)) { 361 error = CPUFREQ_DRV_TYPE(perf_dev, &type); 362 if (error == 0) { 363 if ((type & CPUFREQ_FLAG_INFO_ONLY) == 0) { 364 /* 365 * If acpi_perf doesn't have INFO_ONLY flag, 366 * it will take care of pstate transitions. 367 */ 368 HWPSTATE_DEBUG(dev, "acpi_perf will take care of pstate transitions.\n"); 369 return (ENXIO); 370 } else { 371 /* 372 * If acpi_perf has INFO_ONLY flag, (_PCT has FFixedHW) 373 * we can get _PSS info from acpi_perf 374 * without going into ACPI. 375 */ 376 HWPSTATE_DEBUG(dev, "going to fetch info from acpi_perf\n"); 377 error = hwpstate_get_info_from_acpi_perf(dev, perf_dev); 378 } 379 } 380 } 381 382 if (error == 0) { 383 /* 384 * Now we get _PSS info from acpi_perf without error. 385 * Let's check it. 386 */ 387 msr = rdmsr(MSR_AMD_10H_11H_LIMIT); 388 if (sc->cfnum != 1 + AMD_10H_11H_GET_PSTATE_MAX_VAL(msr)) { 389 HWPSTATE_DEBUG(dev, "MSR (%jd) and ACPI _PSS (%d)" 390 " count mismatch\n", (intmax_t)msr, sc->cfnum); 391 error = TRUE; 392 } 393 } 394 395 /* 396 * If we cannot get info from acpi_perf, 397 * Let's get info from MSRs. 398 */ 399 if (error) 400 error = hwpstate_get_info_from_msr(dev); 401 if (error) 402 return (error); 403 404 device_set_desc(dev, "Cool`n'Quiet 2.0"); 405 return (0); 406 } 407 408 static int 409 hwpstate_attach(device_t dev) 410 { 411 412 return (cpufreq_register(dev)); 413 } 414 415 static int 416 hwpstate_get_info_from_msr(device_t dev) 417 { 418 struct hwpstate_softc *sc; 419 struct hwpstate_setting *hwpstate_set; 420 uint64_t msr; 421 int family, i, fid, did; 422 423 family = CPUID_TO_FAMILY(cpu_id); 424 sc = device_get_softc(dev); 425 /* Get pstate count */ 426 msr = rdmsr(MSR_AMD_10H_11H_LIMIT); 427 sc->cfnum = 1 + AMD_10H_11H_GET_PSTATE_MAX_VAL(msr); 428 hwpstate_set = sc->hwpstate_settings; 429 for (i = 0; i < sc->cfnum; i++) { 430 msr = rdmsr(MSR_AMD_10H_11H_CONFIG + i); 431 if ((msr & ((uint64_t)1 << 63)) == 0) { 432 HWPSTATE_DEBUG(dev, "msr is not valid.\n"); 433 return (ENXIO); 434 } 435 did = AMD_10H_11H_CUR_DID(msr); 436 fid = AMD_10H_11H_CUR_FID(msr); 437 438 /* Convert fid/did to frequency. */ 439 switch (family) { 440 case 0x11: 441 hwpstate_set[i].freq = (100 * (fid + 0x08)) >> did; 442 break; 443 case 0x10: 444 case 0x12: 445 case 0x15: 446 case 0x16: 447 hwpstate_set[i].freq = (100 * (fid + 0x10)) >> did; 448 break; 449 case 0x17: 450 case 0x18: 451 did = AMD_17H_CUR_DID(msr); 452 if (did == 0) { 453 HWPSTATE_DEBUG(dev, "unexpected did: 0\n"); 454 did = 1; 455 } 456 fid = AMD_17H_CUR_FID(msr); 457 hwpstate_set[i].freq = (200 * fid) / did; 458 break; 459 default: 460 HWPSTATE_DEBUG(dev, "get_info_from_msr: %s family" 461 " 0x%02x CPUs are not supported yet\n", 462 cpu_vendor_id == CPU_VENDOR_HYGON ? "Hygon" : "AMD", 463 family); 464 return (ENXIO); 465 } 466 hwpstate_set[i].pstate_id = i; 467 /* There was volts calculation, but deleted it. */ 468 hwpstate_set[i].volts = CPUFREQ_VAL_UNKNOWN; 469 hwpstate_set[i].power = CPUFREQ_VAL_UNKNOWN; 470 hwpstate_set[i].lat = CPUFREQ_VAL_UNKNOWN; 471 } 472 return (0); 473 } 474 475 static int 476 hwpstate_get_info_from_acpi_perf(device_t dev, device_t perf_dev) 477 { 478 struct hwpstate_softc *sc; 479 struct cf_setting *perf_set; 480 struct hwpstate_setting *hwpstate_set; 481 int count, error, i; 482 483 perf_set = malloc(MAX_SETTINGS * sizeof(*perf_set), M_TEMP, M_NOWAIT); 484 if (perf_set == NULL) { 485 HWPSTATE_DEBUG(dev, "nomem\n"); 486 return (ENOMEM); 487 } 488 /* 489 * Fetch settings from acpi_perf. 490 * Now it is attached, and has info only flag. 491 */ 492 count = MAX_SETTINGS; 493 error = CPUFREQ_DRV_SETTINGS(perf_dev, perf_set, &count); 494 if (error) { 495 HWPSTATE_DEBUG(dev, "error: CPUFREQ_DRV_SETTINGS.\n"); 496 goto out; 497 } 498 sc = device_get_softc(dev); 499 sc->cfnum = count; 500 hwpstate_set = sc->hwpstate_settings; 501 for (i = 0; i < count; i++) { 502 if (i == perf_set[i].spec[0]) { 503 hwpstate_set[i].pstate_id = i; 504 hwpstate_set[i].freq = perf_set[i].freq; 505 hwpstate_set[i].volts = perf_set[i].volts; 506 hwpstate_set[i].power = perf_set[i].power; 507 hwpstate_set[i].lat = perf_set[i].lat; 508 } else { 509 HWPSTATE_DEBUG(dev, "ACPI _PSS object mismatch.\n"); 510 error = ENXIO; 511 goto out; 512 } 513 } 514 out: 515 if (perf_set) 516 free(perf_set, M_TEMP); 517 return (error); 518 } 519 520 static int 521 hwpstate_detach(device_t dev) 522 { 523 524 hwpstate_goto_pstate(dev, 0); 525 return (cpufreq_unregister(dev)); 526 } 527 528 static int 529 hwpstate_shutdown(device_t dev) 530 { 531 532 /* hwpstate_goto_pstate(dev, 0); */ 533 return (0); 534 } 535 536 static int 537 hwpstate_features(driver_t *driver, u_int *features) 538 { 539 540 /* Notify the ACPI CPU that we support direct access to MSRs */ 541 *features = ACPI_CAP_PERF_MSRS; 542 return (0); 543 } 544