1 /* 2 * Copyright 2013 Red Hat Inc. 3 * 4 * Permission is hereby granted, free of charge, to any person obtaining a 5 * copy of this software and associated documentation files (the "Software"), 6 * to deal in the Software without restriction, including without limitation 7 * the rights to use, copy, modify, merge, publish, distribute, sublicense, 8 * and/or sell copies of the Software, and to permit persons to whom the 9 * Software is furnished to do so, subject to the following conditions: 10 * 11 * The above copyright notice and this permission notice shall be included in 12 * all copies or substantial portions of the Software. 13 * 14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 15 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 16 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 17 * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR 18 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, 19 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR 20 * OTHER DEALINGS IN THE SOFTWARE. 21 * 22 * Authors: Ben Skeggs 23 */ 24 #include <subdev/clk.h> 25 #include <subdev/bios.h> 26 #include <subdev/bios/boost.h> 27 #include <subdev/bios/cstep.h> 28 #include <subdev/bios/perf.h> 29 #include <subdev/fb.h> 30 #include <subdev/therm.h> 31 #include <subdev/volt.h> 32 33 #include <core/device.h> 34 #include <core/option.h> 35 36 /****************************************************************************** 37 * misc 38 *****************************************************************************/ 39 static u32 40 nvkm_clk_adjust(struct nvkm_clk *clk, bool adjust, 41 u8 pstate, u8 domain, u32 input) 42 { 43 struct nvkm_bios *bios = nvkm_bios(clk); 44 struct nvbios_boostE boostE; 45 u8 ver, hdr, cnt, len; 46 u16 data; 47 48 data = nvbios_boostEm(bios, pstate, &ver, &hdr, &cnt, &len, &boostE); 49 if (data) { 50 struct nvbios_boostS boostS; 51 u8 idx = 0, sver, shdr; 52 u16 subd; 53 54 input = max(boostE.min, input); 55 input = min(boostE.max, input); 56 do { 57 sver = ver; 58 shdr = hdr; 59 subd = nvbios_boostSp(bios, idx++, data, &sver, &shdr, 60 cnt, len, &boostS); 61 if (subd && boostS.domain == domain) { 62 if (adjust) 63 input = input * boostS.percent / 100; 64 input = max(boostS.min, input); 65 input = min(boostS.max, input); 66 break; 67 } 68 } while (subd); 69 } 70 71 return input; 72 } 73 74 /****************************************************************************** 75 * C-States 76 *****************************************************************************/ 77 static int 78 nvkm_cstate_prog(struct nvkm_clk *clk, struct nvkm_pstate *pstate, int cstatei) 79 { 80 struct nvkm_therm *ptherm = nvkm_therm(clk); 81 struct nvkm_volt *volt = nvkm_volt(clk); 82 struct nvkm_cstate *cstate; 83 int ret; 84 85 if (!list_empty(&pstate->list)) { 86 cstate = list_entry(pstate->list.prev, typeof(*cstate), head); 87 } else { 88 cstate = &pstate->base; 89 } 90 91 if (ptherm) { 92 ret = nvkm_therm_cstate(ptherm, pstate->fanspeed, +1); 93 if (ret && ret != -ENODEV) { 94 nv_error(clk, "failed to raise fan speed: %d\n", ret); 95 return ret; 96 } 97 } 98 99 if (volt) { 100 ret = volt->set_id(volt, cstate->voltage, +1); 101 if (ret && ret != -ENODEV) { 102 nv_error(clk, "failed to raise voltage: %d\n", ret); 103 return ret; 104 } 105 } 106 107 ret = clk->calc(clk, cstate); 108 if (ret == 0) { 109 ret = clk->prog(clk); 110 clk->tidy(clk); 111 } 112 113 if (volt) { 114 ret = volt->set_id(volt, cstate->voltage, -1); 115 if (ret && ret != -ENODEV) 116 nv_error(clk, "failed to lower voltage: %d\n", ret); 117 } 118 119 if (ptherm) { 120 ret = nvkm_therm_cstate(ptherm, pstate->fanspeed, -1); 121 if (ret && ret != -ENODEV) 122 nv_error(clk, "failed to lower fan speed: %d\n", ret); 123 } 124 125 return 0; 126 } 127 128 static void 129 nvkm_cstate_del(struct nvkm_cstate *cstate) 130 { 131 list_del(&cstate->head); 132 kfree(cstate); 133 } 134 135 static int 136 nvkm_cstate_new(struct nvkm_clk *clk, int idx, struct nvkm_pstate *pstate) 137 { 138 struct nvkm_bios *bios = nvkm_bios(clk); 139 struct nvkm_domain *domain = clk->domains; 140 struct nvkm_cstate *cstate = NULL; 141 struct nvbios_cstepX cstepX; 142 u8 ver, hdr; 143 u16 data; 144 145 data = nvbios_cstepXp(bios, idx, &ver, &hdr, &cstepX); 146 if (!data) 147 return -ENOENT; 148 149 cstate = kzalloc(sizeof(*cstate), GFP_KERNEL); 150 if (!cstate) 151 return -ENOMEM; 152 153 *cstate = pstate->base; 154 cstate->voltage = cstepX.voltage; 155 156 while (domain && domain->name != nv_clk_src_max) { 157 if (domain->flags & NVKM_CLK_DOM_FLAG_CORE) { 158 u32 freq = nvkm_clk_adjust(clk, true, pstate->pstate, 159 domain->bios, cstepX.freq); 160 cstate->domain[domain->name] = freq; 161 } 162 domain++; 163 } 164 165 list_add(&cstate->head, &pstate->list); 166 return 0; 167 } 168 169 /****************************************************************************** 170 * P-States 171 *****************************************************************************/ 172 static int 173 nvkm_pstate_prog(struct nvkm_clk *clk, int pstatei) 174 { 175 struct nvkm_fb *pfb = nvkm_fb(clk); 176 struct nvkm_pstate *pstate; 177 int ret, idx = 0; 178 179 list_for_each_entry(pstate, &clk->states, head) { 180 if (idx++ == pstatei) 181 break; 182 } 183 184 nv_debug(clk, "setting performance state %d\n", pstatei); 185 clk->pstate = pstatei; 186 187 if (pfb->ram->calc) { 188 int khz = pstate->base.domain[nv_clk_src_mem]; 189 do { 190 ret = pfb->ram->calc(pfb, khz); 191 if (ret == 0) 192 ret = pfb->ram->prog(pfb); 193 } while (ret > 0); 194 pfb->ram->tidy(pfb); 195 } 196 197 return nvkm_cstate_prog(clk, pstate, 0); 198 } 199 200 static void 201 nvkm_pstate_work(struct work_struct *work) 202 { 203 struct nvkm_clk *clk = container_of(work, typeof(*clk), work); 204 int pstate; 205 206 if (!atomic_xchg(&clk->waiting, 0)) 207 return; 208 clk->pwrsrc = power_supply_is_system_supplied(); 209 210 nv_trace(clk, "P %d PWR %d U(AC) %d U(DC) %d A %d T %d D %d\n", 211 clk->pstate, clk->pwrsrc, clk->ustate_ac, clk->ustate_dc, 212 clk->astate, clk->tstate, clk->dstate); 213 214 pstate = clk->pwrsrc ? clk->ustate_ac : clk->ustate_dc; 215 if (clk->state_nr && pstate != -1) { 216 pstate = (pstate < 0) ? clk->astate : pstate; 217 pstate = min(pstate, clk->state_nr - 1 - clk->tstate); 218 pstate = max(pstate, clk->dstate); 219 } else { 220 pstate = clk->pstate = -1; 221 } 222 223 nv_trace(clk, "-> %d\n", pstate); 224 if (pstate != clk->pstate) { 225 int ret = nvkm_pstate_prog(clk, pstate); 226 if (ret) { 227 nv_error(clk, "error setting pstate %d: %d\n", 228 pstate, ret); 229 } 230 } 231 232 wake_up_all(&clk->wait); 233 nvkm_notify_get(&clk->pwrsrc_ntfy); 234 } 235 236 static int 237 nvkm_pstate_calc(struct nvkm_clk *clk, bool wait) 238 { 239 atomic_set(&clk->waiting, 1); 240 schedule_work(&clk->work); 241 if (wait) 242 wait_event(clk->wait, !atomic_read(&clk->waiting)); 243 return 0; 244 } 245 246 static void 247 nvkm_pstate_info(struct nvkm_clk *clk, struct nvkm_pstate *pstate) 248 { 249 struct nvkm_domain *clock = clk->domains - 1; 250 struct nvkm_cstate *cstate; 251 char info[3][32] = { "", "", "" }; 252 char name[4] = "--"; 253 int i = -1; 254 255 if (pstate->pstate != 0xff) 256 snprintf(name, sizeof(name), "%02x", pstate->pstate); 257 258 while ((++clock)->name != nv_clk_src_max) { 259 u32 lo = pstate->base.domain[clock->name]; 260 u32 hi = lo; 261 if (hi == 0) 262 continue; 263 264 nv_debug(clk, "%02x: %10d KHz\n", clock->name, lo); 265 list_for_each_entry(cstate, &pstate->list, head) { 266 u32 freq = cstate->domain[clock->name]; 267 lo = min(lo, freq); 268 hi = max(hi, freq); 269 nv_debug(clk, "%10d KHz\n", freq); 270 } 271 272 if (clock->mname && ++i < ARRAY_SIZE(info)) { 273 lo /= clock->mdiv; 274 hi /= clock->mdiv; 275 if (lo == hi) { 276 snprintf(info[i], sizeof(info[i]), "%s %d MHz", 277 clock->mname, lo); 278 } else { 279 snprintf(info[i], sizeof(info[i]), 280 "%s %d-%d MHz", clock->mname, lo, hi); 281 } 282 } 283 } 284 285 nv_info(clk, "%s: %s %s %s\n", name, info[0], info[1], info[2]); 286 } 287 288 static void 289 nvkm_pstate_del(struct nvkm_pstate *pstate) 290 { 291 struct nvkm_cstate *cstate, *temp; 292 293 list_for_each_entry_safe(cstate, temp, &pstate->list, head) { 294 nvkm_cstate_del(cstate); 295 } 296 297 list_del(&pstate->head); 298 kfree(pstate); 299 } 300 301 static int 302 nvkm_pstate_new(struct nvkm_clk *clk, int idx) 303 { 304 struct nvkm_bios *bios = nvkm_bios(clk); 305 struct nvkm_domain *domain = clk->domains - 1; 306 struct nvkm_pstate *pstate; 307 struct nvkm_cstate *cstate; 308 struct nvbios_cstepE cstepE; 309 struct nvbios_perfE perfE; 310 u8 ver, hdr, cnt, len; 311 u16 data; 312 313 data = nvbios_perfEp(bios, idx, &ver, &hdr, &cnt, &len, &perfE); 314 if (!data) 315 return -EINVAL; 316 if (perfE.pstate == 0xff) 317 return 0; 318 319 pstate = kzalloc(sizeof(*pstate), GFP_KERNEL); 320 cstate = &pstate->base; 321 if (!pstate) 322 return -ENOMEM; 323 324 INIT_LIST_HEAD(&pstate->list); 325 326 pstate->pstate = perfE.pstate; 327 pstate->fanspeed = perfE.fanspeed; 328 cstate->voltage = perfE.voltage; 329 cstate->domain[nv_clk_src_core] = perfE.core; 330 cstate->domain[nv_clk_src_shader] = perfE.shader; 331 cstate->domain[nv_clk_src_mem] = perfE.memory; 332 cstate->domain[nv_clk_src_vdec] = perfE.vdec; 333 cstate->domain[nv_clk_src_dom6] = perfE.disp; 334 335 while (ver >= 0x40 && (++domain)->name != nv_clk_src_max) { 336 struct nvbios_perfS perfS; 337 u8 sver = ver, shdr = hdr; 338 u32 perfSe = nvbios_perfSp(bios, data, domain->bios, 339 &sver, &shdr, cnt, len, &perfS); 340 if (perfSe == 0 || sver != 0x40) 341 continue; 342 343 if (domain->flags & NVKM_CLK_DOM_FLAG_CORE) { 344 perfS.v40.freq = nvkm_clk_adjust(clk, false, 345 pstate->pstate, 346 domain->bios, 347 perfS.v40.freq); 348 } 349 350 cstate->domain[domain->name] = perfS.v40.freq; 351 } 352 353 data = nvbios_cstepEm(bios, pstate->pstate, &ver, &hdr, &cstepE); 354 if (data) { 355 int idx = cstepE.index; 356 do { 357 nvkm_cstate_new(clk, idx, pstate); 358 } while(idx--); 359 } 360 361 nvkm_pstate_info(clk, pstate); 362 list_add_tail(&pstate->head, &clk->states); 363 clk->state_nr++; 364 return 0; 365 } 366 367 /****************************************************************************** 368 * Adjustment triggers 369 *****************************************************************************/ 370 static int 371 nvkm_clk_ustate_update(struct nvkm_clk *clk, int req) 372 { 373 struct nvkm_pstate *pstate; 374 int i = 0; 375 376 if (!clk->allow_reclock) 377 return -ENOSYS; 378 379 if (req != -1 && req != -2) { 380 list_for_each_entry(pstate, &clk->states, head) { 381 if (pstate->pstate == req) 382 break; 383 i++; 384 } 385 386 if (pstate->pstate != req) 387 return -EINVAL; 388 req = i; 389 } 390 391 return req + 2; 392 } 393 394 static int 395 nvkm_clk_nstate(struct nvkm_clk *clk, const char *mode, int arglen) 396 { 397 int ret = 1; 398 399 if (clk->allow_reclock && !strncasecmpz(mode, "auto", arglen)) 400 return -2; 401 402 if (strncasecmpz(mode, "disabled", arglen)) { 403 char save = mode[arglen]; 404 long v; 405 406 ((char *)mode)[arglen] = '\0'; 407 if (!kstrtol(mode, 0, &v)) { 408 ret = nvkm_clk_ustate_update(clk, v); 409 if (ret < 0) 410 ret = 1; 411 } 412 ((char *)mode)[arglen] = save; 413 } 414 415 return ret - 2; 416 } 417 418 int 419 nvkm_clk_ustate(struct nvkm_clk *clk, int req, int pwr) 420 { 421 int ret = nvkm_clk_ustate_update(clk, req); 422 if (ret >= 0) { 423 if (ret -= 2, pwr) clk->ustate_ac = ret; 424 else clk->ustate_dc = ret; 425 return nvkm_pstate_calc(clk, true); 426 } 427 return ret; 428 } 429 430 int 431 nvkm_clk_astate(struct nvkm_clk *clk, int req, int rel, bool wait) 432 { 433 if (!rel) clk->astate = req; 434 if ( rel) clk->astate += rel; 435 clk->astate = min(clk->astate, clk->state_nr - 1); 436 clk->astate = max(clk->astate, 0); 437 return nvkm_pstate_calc(clk, wait); 438 } 439 440 int 441 nvkm_clk_tstate(struct nvkm_clk *clk, int req, int rel) 442 { 443 if (!rel) clk->tstate = req; 444 if ( rel) clk->tstate += rel; 445 clk->tstate = min(clk->tstate, 0); 446 clk->tstate = max(clk->tstate, -(clk->state_nr - 1)); 447 return nvkm_pstate_calc(clk, true); 448 } 449 450 int 451 nvkm_clk_dstate(struct nvkm_clk *clk, int req, int rel) 452 { 453 if (!rel) clk->dstate = req; 454 if ( rel) clk->dstate += rel; 455 clk->dstate = min(clk->dstate, clk->state_nr - 1); 456 clk->dstate = max(clk->dstate, 0); 457 return nvkm_pstate_calc(clk, true); 458 } 459 460 static int 461 nvkm_clk_pwrsrc(struct nvkm_notify *notify) 462 { 463 struct nvkm_clk *clk = 464 container_of(notify, typeof(*clk), pwrsrc_ntfy); 465 nvkm_pstate_calc(clk, false); 466 return NVKM_NOTIFY_DROP; 467 } 468 469 /****************************************************************************** 470 * subdev base class implementation 471 *****************************************************************************/ 472 473 int 474 _nvkm_clk_fini(struct nvkm_object *object, bool suspend) 475 { 476 struct nvkm_clk *clk = (void *)object; 477 nvkm_notify_put(&clk->pwrsrc_ntfy); 478 return nvkm_subdev_fini(&clk->base, suspend); 479 } 480 481 int 482 _nvkm_clk_init(struct nvkm_object *object) 483 { 484 struct nvkm_clk *clk = (void *)object; 485 struct nvkm_domain *clock = clk->domains; 486 int ret; 487 488 ret = nvkm_subdev_init(&clk->base); 489 if (ret) 490 return ret; 491 492 memset(&clk->bstate, 0x00, sizeof(clk->bstate)); 493 INIT_LIST_HEAD(&clk->bstate.list); 494 clk->bstate.pstate = 0xff; 495 496 while (clock->name != nv_clk_src_max) { 497 ret = clk->read(clk, clock->name); 498 if (ret < 0) { 499 nv_error(clk, "%02x freq unknown\n", clock->name); 500 return ret; 501 } 502 clk->bstate.base.domain[clock->name] = ret; 503 clock++; 504 } 505 506 nvkm_pstate_info(clk, &clk->bstate); 507 508 clk->astate = clk->state_nr - 1; 509 clk->tstate = 0; 510 clk->dstate = 0; 511 clk->pstate = -1; 512 nvkm_pstate_calc(clk, true); 513 return 0; 514 } 515 516 void 517 _nvkm_clk_dtor(struct nvkm_object *object) 518 { 519 struct nvkm_clk *clk = (void *)object; 520 struct nvkm_pstate *pstate, *temp; 521 522 nvkm_notify_fini(&clk->pwrsrc_ntfy); 523 524 list_for_each_entry_safe(pstate, temp, &clk->states, head) { 525 nvkm_pstate_del(pstate); 526 } 527 528 nvkm_subdev_destroy(&clk->base); 529 } 530 531 int 532 nvkm_clk_create_(struct nvkm_object *parent, struct nvkm_object *engine, 533 struct nvkm_oclass *oclass, struct nvkm_domain *clocks, 534 struct nvkm_pstate *pstates, int nb_pstates, 535 bool allow_reclock, int length, void **object) 536 { 537 struct nvkm_device *device = nv_device(parent); 538 struct nvkm_clk *clk; 539 int ret, idx, arglen; 540 const char *mode; 541 542 ret = nvkm_subdev_create_(parent, engine, oclass, 0, "CLK", 543 "clock", length, object); 544 clk = *object; 545 if (ret) 546 return ret; 547 548 INIT_LIST_HEAD(&clk->states); 549 clk->domains = clocks; 550 clk->ustate_ac = -1; 551 clk->ustate_dc = -1; 552 553 INIT_WORK(&clk->work, nvkm_pstate_work); 554 init_waitqueue_head(&clk->wait); 555 atomic_set(&clk->waiting, 0); 556 557 /* If no pstates are provided, try and fetch them from the BIOS */ 558 if (!pstates) { 559 idx = 0; 560 do { 561 ret = nvkm_pstate_new(clk, idx++); 562 } while (ret == 0); 563 } else { 564 for (idx = 0; idx < nb_pstates; idx++) 565 list_add_tail(&pstates[idx].head, &clk->states); 566 clk->state_nr = nb_pstates; 567 } 568 569 clk->allow_reclock = allow_reclock; 570 571 ret = nvkm_notify_init(NULL, &device->event, nvkm_clk_pwrsrc, true, 572 NULL, 0, 0, &clk->pwrsrc_ntfy); 573 if (ret) 574 return ret; 575 576 mode = nvkm_stropt(device->cfgopt, "NvClkMode", &arglen); 577 if (mode) { 578 clk->ustate_ac = nvkm_clk_nstate(clk, mode, arglen); 579 clk->ustate_dc = nvkm_clk_nstate(clk, mode, arglen); 580 } 581 582 mode = nvkm_stropt(device->cfgopt, "NvClkModeAC", &arglen); 583 if (mode) 584 clk->ustate_ac = nvkm_clk_nstate(clk, mode, arglen); 585 586 mode = nvkm_stropt(device->cfgopt, "NvClkModeDC", &arglen); 587 if (mode) 588 clk->ustate_dc = nvkm_clk_nstate(clk, mode, arglen); 589 590 return 0; 591 } 592