1 /*- 2 * Copyright (c) 2013 Phileas Fogg 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 15 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 16 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 17 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 18 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 19 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 20 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 21 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 22 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 23 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 24 * POSSIBILITY OF SUCH DAMAGE. 25 */ 26 27 #include <sys/param.h> 28 #include <sys/systm.h> 29 #include <sys/kernel.h> 30 #include <sys/malloc.h> 31 #include <sys/device.h> 32 #include <sys/proc.h> 33 #include <sys/mutex.h> 34 #include <sys/time.h> 35 #include <sys/reboot.h> 36 #include <sys/sysctl.h> 37 #include <sys/kthread.h> 38 39 #include <machine/autoconf.h> 40 41 #include <dev/ofw/openfirm.h> 42 #include <dev/i2c/i2cvar.h> 43 #include <dev/clock_subr.h> 44 #include <dev/sysmon/sysmonvar.h> 45 #include <dev/sysmon/sysmon_taskq.h> 46 47 #include <macppc/dev/obiovar.h> 48 #include <macppc/dev/smuvar.h> 49 #include <macppc/dev/fancontrolvar.h> 50 51 #include "opt_smu.h" 52 53 struct smu_softc; 54 55 struct smu_cmd { 56 u_char cmd; 57 u_char len; 58 u_char data[254]; 59 }; 60 61 struct smu_fan { 62 struct smu_softc* sc; 63 64 char location[32]; 65 int reg; 66 int zone; 67 int rpm_ctl; 68 int min_rpm; 69 int max_rpm; 70 int default_rpm; 71 int wanted_rpm; 72 int current_rpm; 73 int fault; 74 time_t last_update; 75 }; 76 77 struct smu_iicbus { 78 struct smu_softc* sc; 79 80 int reg; 81 struct i2c_controller i2c; 82 }; 83 84 #define SMU_MAX_FANS 8 85 #define SMU_MAX_IICBUS 3 86 #define SMU_MAX_SME_SENSORS (SMU_MAX_FANS + 8) 87 88 89 #define SMU_ZONE_CPU 0 90 #define SMU_ZONE_CASE 1 91 #define SMU_ZONE_DRIVEBAY 2 92 #define SMU_ZONES 3 93 94 #define C_TO_uK(n) (n * 1000000 + 273150000) 95 96 struct smu_softc { 97 device_t sc_dev; 98 int sc_node; 99 struct sysctlnode *sc_sysctl_me; 100 101 kmutex_t sc_cmd_lock; 102 kmutex_t sc_msg_lock; 103 struct smu_cmd *sc_cmd; 104 paddr_t sc_cmd_paddr; 105 int sc_dbell_mbox; 106 int sc_dbell_gpio; 107 108 int sc_num_fans; 109 struct smu_fan sc_fans[SMU_MAX_FANS]; 110 111 int sc_num_iicbus; 112 struct smu_iicbus sc_iicbus[SMU_MAX_IICBUS]; 113 114 struct todr_chip_handle sc_todr; 115 116 struct sysmon_envsys *sc_sme; 117 envsys_data_t sc_sme_sensors[SMU_MAX_SME_SENSORS]; 118 uint32_t cpu_m; 119 int32_t cpu_b; 120 121 fancontrol_zone_t sc_zones[SMU_ZONES]; 122 lwp_t *sc_thread; 123 bool sc_dying; 124 }; 125 126 #define SMU_CMD_FAN 0x4a 127 #define SMU_CMD_RTC 0x8e 128 #define SMU_CMD_I2C 0x9a 129 #define SMU_CMD_POWER 0xaa 130 #define SMU_CMD_ADC 0xd8 131 #define SMU_MISC 0xee 132 #define SMU_MISC_GET_DATA 0x02 133 #define SMU_MISC_LED_CTRL 0x04 134 135 #define SMU_CPUTEMP_CAL 0x18 136 #define SMU_CPUVOLT_CAL 0x21 137 #define SMU_SLOTPW_CAL 0x78 138 139 #define SMU_PARTITION 0x3e 140 #define SMU_PARTITION_LATEST 0x01 141 #define SMU_PARTITION_BASE 0x02 142 #define SMU_PARTITION_UPDATE 0x03 143 144 #ifdef SMU_DEBUG 145 #define DPRINTF printf 146 #else 147 #define DPRINTF while (0) printf 148 #endif 149 150 static int smu_match(device_t, struct cfdata *, void *); 151 static void smu_attach(device_t, device_t, void *); 152 static int smu_setup_doorbell(struct smu_softc *); 153 static void smu_setup_fans(struct smu_softc *); 154 static void smu_setup_iicbus(struct smu_softc *); 155 static void smu_setup_sme(struct smu_softc *); 156 static int smu_iicbus_print(void *, const char *); 157 static void smu_sme_refresh(struct sysmon_envsys *, envsys_data_t *); 158 static int smu_do_cmd(struct smu_softc *, struct smu_cmd *, int); 159 static int smu_dbell_gpio_intr(void *); 160 static int smu_todr_gettime_ymdhms(todr_chip_handle_t, struct clock_ymdhms *); 161 static int smu_todr_settime_ymdhms(todr_chip_handle_t, struct clock_ymdhms *); 162 static int smu_fan_update_rpm(struct smu_fan *); 163 static int smu_read_adc(struct smu_softc *, int); 164 165 static int smu_iicbus_exec(void *, i2c_op_t, i2c_addr_t, const void *, 166 size_t, void *, size_t, int); 167 168 static void smu_setup_zones(struct smu_softc *); 169 static void smu_adjust(void *); 170 171 static bool is_cpu_sensor(const envsys_data_t *); 172 static bool is_drive_sensor(const envsys_data_t *); 173 static bool is_slots_sensor(const envsys_data_t *); 174 static int smu_fan_get_rpm(void *, int); 175 static int smu_fan_set_rpm(void *, int, int); 176 177 int smu_get_datablock(int, uint8_t *, size_t); 178 179 CFATTACH_DECL_NEW(smu, sizeof(struct smu_softc), 180 smu_match, smu_attach, NULL, NULL); 181 182 static struct smu_softc *smu0 = NULL; 183 184 static int 185 smu_match(device_t parent, struct cfdata *cf, void *aux) 186 { 187 struct confargs *ca = aux; 188 189 if (strcmp(ca->ca_name, "smu") == 0) 190 return 5; 191 192 return 0; 193 } 194 195 static void 196 smu_attach(device_t parent, device_t self, void *aux) 197 { 198 struct confargs *ca = aux; 199 struct smu_softc *sc = device_private(self); 200 uint16_t data[4]; 201 202 sc->sc_dev = self; 203 sc->sc_node = ca->ca_node; 204 205 if (smu0 == NULL) 206 smu0 = sc; 207 208 sysctl_createv(NULL, 0, NULL, (void *) &sc->sc_sysctl_me, 209 CTLFLAG_READWRITE, 210 CTLTYPE_NODE, device_xname(sc->sc_dev), NULL, 211 NULL, 0, NULL, 0, 212 CTL_MACHDEP, CTL_CREATE, CTL_EOL); 213 214 if (smu_setup_doorbell(sc) != 0) { 215 aprint_normal(": unable to set up doorbell\n"); 216 return; 217 } 218 219 aprint_normal("\n"); 220 221 smu_setup_fans(sc); 222 smu_setup_iicbus(sc); 223 224 sc->sc_todr.todr_gettime_ymdhms = smu_todr_gettime_ymdhms; 225 sc->sc_todr.todr_settime_ymdhms = smu_todr_settime_ymdhms; 226 sc->sc_todr.cookie = sc; 227 todr_attach(&sc->sc_todr); 228 229 /* calibration data */ 230 memset(data, 0, 8); 231 smu_get_datablock(SMU_CPUTEMP_CAL, (void *)data, 8); 232 DPRINTF("data %04x %04x %04x %04x\n", data[0], data[1], data[2], data[3]); 233 sc->cpu_m = data[2]; 234 sc->cpu_b = (int16_t)data[3]; 235 236 smu_setup_sme(sc); 237 238 smu_setup_zones(sc); 239 } 240 241 static int 242 smu_setup_doorbell(struct smu_softc *sc) 243 { 244 int node, parent, reg[4], gpio_base, irq; 245 246 mutex_init(&sc->sc_cmd_lock, MUTEX_DEFAULT, IPL_NONE); 247 sc->sc_cmd = malloc(4096, M_DEVBUF, M_WAITOK); 248 sc->sc_cmd_paddr = vtophys((vaddr_t) sc->sc_cmd); 249 250 DPRINTF("%s: cmd vaddr 0x%x paddr 0x%x\n", 251 __func__, (unsigned int) sc->sc_cmd, 252 (unsigned int) sc->sc_cmd_paddr); 253 254 if (OF_getprop(sc->sc_node, "platform-doorbell-buff", 255 &node, sizeof(node)) <= 0) 256 return -1; 257 258 if (OF_getprop(node, "platform-do-doorbell-buff", 259 reg, sizeof(reg)) < sizeof(reg)) 260 return -1; 261 262 sc->sc_dbell_mbox = reg[3]; 263 264 if (OF_getprop(sc->sc_node, "platform-doorbell-ack", 265 &node, sizeof(node)) <= 0) 266 return -1; 267 268 parent = OF_parent(node); 269 if (parent == 0) 270 return -1; 271 272 if (OF_getprop(parent, "reg", &gpio_base, sizeof(gpio_base)) <= 0) 273 return -1; 274 275 if (OF_getprop(node, "reg", reg, sizeof(reg)) <= 0) 276 return -1; 277 278 if (OF_getprop(node, "interrupts", &irq, sizeof(irq)) <= 0) 279 return -1; 280 281 sc->sc_dbell_gpio = gpio_base + reg[0]; 282 283 aprint_normal(" mbox 0x%x gpio 0x%x irq %d", 284 sc->sc_dbell_mbox, sc->sc_dbell_gpio, irq); 285 286 intr_establish_xname(irq, IST_EDGE_FALLING, IPL_TTY, 287 smu_dbell_gpio_intr, sc, device_xname(sc->sc_dev)); 288 289 return 0; 290 } 291 292 static void 293 smu_setup_fans(struct smu_softc *sc) 294 { 295 struct smu_fan *fan; 296 char type[32]; 297 int node, i; 298 const char *fans[] = { "fans", "rpm-fans", 0 }; 299 int n = 0; 300 301 while (fans[n][0] != 0) { 302 node = of_getnode_byname(sc->sc_node, fans[n]); 303 for (node = OF_child(node); 304 (node != 0) && (sc->sc_num_fans < SMU_MAX_FANS); 305 node = OF_peer(node)) { 306 fan = &sc->sc_fans[sc->sc_num_fans]; 307 fan->sc = sc; 308 309 memset(fan->location, 0, sizeof(fan->location)); 310 OF_getprop(node, "location", fan->location, 311 sizeof(fan->location)); 312 313 if (OF_getprop(node, "reg", &fan->reg, 314 sizeof(fan->reg)) <= 0) 315 continue; 316 317 if (OF_getprop(node, "zone", &fan->zone , 318 sizeof(fan->zone)) <= 0) 319 continue; 320 321 memset(type, 0, sizeof(type)); 322 OF_getprop(node, "device_type", type, sizeof(type)); 323 if (strcmp(type, "fan-rpm-control") == 0) 324 fan->rpm_ctl = 1; 325 else 326 fan->rpm_ctl = 0; 327 328 if (OF_getprop(node, "min-value", &fan->min_rpm, 329 sizeof(fan->min_rpm)) <= 0) 330 fan->min_rpm = 0; 331 332 if (OF_getprop(node, "max-value", &fan->max_rpm, 333 sizeof(fan->max_rpm)) <= 0) 334 fan->max_rpm = 0xffff; 335 336 if (OF_getprop(node, "unmanage-value", &fan->default_rpm, 337 sizeof(fan->default_rpm)) <= 0) 338 fan->default_rpm = fan->max_rpm; 339 340 DPRINTF("fan: location %s reg %x zone %d rpm_ctl %d " 341 "min_rpm %d max_rpm %d default_rpm %d\n", 342 fan->location, fan->reg, fan->zone, fan->rpm_ctl, 343 fan->min_rpm, fan->max_rpm, fan->default_rpm); 344 345 fan->wanted_rpm = fan->default_rpm; 346 fan->fault = 0; 347 sc->sc_num_fans++; 348 } 349 n++; 350 } 351 352 for (i = 0; i < sc->sc_num_fans; i++) { 353 fan = &sc->sc_fans[i]; 354 smu_fan_set_rpm(sc, i, fan->default_rpm); 355 smu_fan_update_rpm(fan); 356 } 357 } 358 359 static void 360 smu_setup_iicbus(struct smu_softc *sc) 361 { 362 struct smu_iicbus *iicbus; 363 struct i2c_controller *i2c; 364 struct smu_iicbus_confargs ca; 365 int node; 366 char name[32]; 367 368 node = of_getnode_byname(sc->sc_node, "smu-i2c-control"); 369 if (node == 0) node = sc->sc_node; 370 for (node = OF_child(node); 371 (node != 0) && (sc->sc_num_iicbus < SMU_MAX_IICBUS); 372 node = OF_peer(node)) { 373 memset(name, 0, sizeof(name)); 374 OF_getprop(node, "name", name, sizeof(name)); 375 if ((strcmp(name, "i2c-bus") != 0) && 376 (strcmp(name, "i2c") != 0)) 377 continue; 378 379 iicbus = &sc->sc_iicbus[sc->sc_num_iicbus]; 380 iicbus->sc = sc; 381 i2c = &iicbus->i2c; 382 383 if (OF_getprop(node, "reg", &iicbus->reg, sizeof(iicbus->reg)) <= 0) 384 continue; 385 386 DPRINTF("iicbus: reg %x\n", iicbus->reg); 387 388 iic_tag_init(i2c); 389 i2c->ic_cookie = iicbus; 390 i2c->ic_exec = smu_iicbus_exec; 391 392 ca.ca_name = name; 393 ca.ca_node = node; 394 ca.ca_tag = i2c; 395 config_found(sc->sc_dev, &ca, smu_iicbus_print, 396 CFARGS(.devhandle = devhandle_from_of(node))); 397 398 sc->sc_num_iicbus++; 399 } 400 } 401 402 static void 403 smu_setup_sme(struct smu_softc *sc) 404 { 405 struct smu_fan *fan; 406 envsys_data_t *sme_sensor; 407 int i, sensors, child, reg; 408 char loc[32], type[32]; 409 410 sc->sc_sme = sysmon_envsys_create(); 411 412 for (i = 0; i < sc->sc_num_fans; i++) { 413 sme_sensor = &sc->sc_sme_sensors[i]; 414 fan = &sc->sc_fans[i]; 415 416 sme_sensor->units = ENVSYS_SFANRPM; 417 sme_sensor->state = ENVSYS_SINVALID; 418 snprintf(sme_sensor->desc, sizeof(sme_sensor->desc), 419 "%s", fan->location); 420 421 if (sysmon_envsys_sensor_attach(sc->sc_sme, sme_sensor)) { 422 sysmon_envsys_destroy(sc->sc_sme); 423 return; 424 } 425 } 426 sensors = OF_finddevice("/smu/sensors"); 427 child = OF_child(sensors); 428 while (child != 0) { 429 sme_sensor = &sc->sc_sme_sensors[i]; 430 if (OF_getprop(child, "location", loc, 32) == 0) goto next; 431 if (OF_getprop(child, "device_type", type, 32) == 0) goto next; 432 if (OF_getprop(child, "reg", ®, 4) == 0) goto next; 433 if (strcmp(type, "temp-sensor") == 0) { 434 sme_sensor->units = ENVSYS_STEMP; 435 sme_sensor->state = ENVSYS_SINVALID; 436 strncpy(sme_sensor->desc, loc, sizeof(sme_sensor->desc)); 437 sme_sensor->private = reg; 438 sysmon_envsys_sensor_attach(sc->sc_sme, sme_sensor); 439 i++; 440 printf("%s: %s@%x\n", loc, type, reg); 441 } 442 next: 443 child = OF_peer(child); 444 } 445 446 sc->sc_sme->sme_name = device_xname(sc->sc_dev); 447 sc->sc_sme->sme_cookie = sc; 448 sc->sc_sme->sme_refresh = smu_sme_refresh; 449 450 if (sysmon_envsys_register(sc->sc_sme)) { 451 aprint_error_dev(sc->sc_dev, 452 "unable to register with sysmon\n"); 453 sysmon_envsys_destroy(sc->sc_sme); 454 } 455 } 456 457 static int 458 smu_iicbus_print(void *aux, const char *smu) 459 { 460 struct smu_iicbus_confargs *ca = aux; 461 462 if (smu) 463 aprint_normal("%s at %s", ca->ca_name, smu); 464 465 return UNCONF; 466 } 467 468 static void 469 smu_sme_refresh(struct sysmon_envsys *sme, envsys_data_t *edata) 470 { 471 struct smu_softc *sc = sme->sme_cookie; 472 int which = edata->sensor; 473 int ret; 474 475 edata->state = ENVSYS_SINVALID; 476 477 if (which < sc->sc_num_fans) { 478 479 ret = smu_fan_get_rpm(sc, which); 480 if (ret != -1) { 481 sc->sc_fans[which].current_rpm = ret; 482 edata->value_cur = ret; 483 edata->state = ENVSYS_SVALID; 484 } 485 } else if (edata->private > 0) { 486 /* this works only for the CPU diode */ 487 int64_t r = smu_read_adc(sc, edata->private); 488 if (r != -1) { 489 r = r * sc->cpu_m; 490 r >>= 3; 491 r += (int64_t)sc->cpu_b << 9; 492 r <<= 1; 493 r *= 15625; 494 r /= 1024; 495 edata->value_cur = r + 273150000; 496 edata->state = ENVSYS_SVALID; 497 } 498 } 499 } 500 501 static int 502 smu_do_cmd(struct smu_softc *sc, struct smu_cmd *cmd, int timo) 503 { 504 int gpio, ret, bail; 505 u_char ack; 506 507 mutex_enter(&sc->sc_cmd_lock); 508 509 DPRINTF("%s: cmd %02x len %02x\n", __func__, cmd->cmd, cmd->len); 510 DPRINTF("%s: data %02x %02x %02x %02x %02x %02x %02x %02x\n", __func__, 511 cmd->data[0], cmd->data[1], cmd->data[2], cmd->data[3], 512 cmd->data[4], cmd->data[5], cmd->data[6], cmd->data[7]); 513 514 sc->sc_cmd->cmd = cmd->cmd; 515 sc->sc_cmd->len = cmd->len; 516 memcpy(sc->sc_cmd->data, cmd->data, cmd->len); 517 518 __asm volatile ("dcbf 0,%0; sync" :: "r"(sc->sc_cmd) : "memory"); 519 520 obio_write_4(sc->sc_dbell_mbox, sc->sc_cmd_paddr); 521 obio_write_1(sc->sc_dbell_gpio, 0x04); 522 523 bail = 0; 524 525 gpio = obio_read_1(sc->sc_dbell_gpio); 526 527 while (((gpio & 0x07) != 0x07) && (bail < timo)) { 528 ret = tsleep(sc->sc_cmd, PWAIT, "smu_cmd", mstohz(10)); 529 if (ret != 0) { 530 bail++; 531 } 532 gpio = obio_read_1(sc->sc_dbell_gpio); 533 } 534 535 if ((gpio & 0x07) != 0x07) { 536 mutex_exit(&sc->sc_cmd_lock); 537 return EWOULDBLOCK; 538 } 539 540 __asm volatile ("dcbf 0,%0; sync" :: "r"(sc->sc_cmd) : "memory"); 541 542 ack = (~cmd->cmd) & 0xff; 543 if (sc->sc_cmd->cmd != ack) { 544 DPRINTF("%s: invalid ack, got %x expected %x\n", 545 __func__, sc->sc_cmd->cmd, ack); 546 mutex_exit(&sc->sc_cmd_lock); 547 return EIO; 548 } 549 550 cmd->cmd = sc->sc_cmd->cmd; 551 cmd->len = sc->sc_cmd->len; 552 memcpy(cmd->data, sc->sc_cmd->data, sc->sc_cmd->len); 553 554 mutex_exit(&sc->sc_cmd_lock); 555 556 return 0; 557 } 558 559 560 static int 561 smu_dbell_gpio_intr(void *arg) 562 { 563 struct smu_softc *sc = arg; 564 565 DPRINTF("%s\n", __func__); 566 567 wakeup(sc->sc_cmd); 568 569 return 1; 570 } 571 572 void 573 smu_poweroff(void) 574 { 575 struct smu_cmd cmd; 576 577 if (smu0 == NULL) 578 return; 579 580 cmd.cmd = SMU_CMD_POWER; 581 strcpy(cmd.data, "SHUTDOWN"); 582 cmd.len = strlen(cmd.data) + 1; 583 smu_do_cmd(smu0, &cmd, 800); 584 585 for (;;); 586 } 587 588 void 589 smu_restart(void) 590 { 591 struct smu_cmd cmd; 592 593 if (smu0 == NULL) 594 return; 595 596 cmd.cmd = SMU_CMD_POWER; 597 strcpy(cmd.data, "RESTART"); 598 cmd.len = strlen(cmd.data) + 1; 599 smu_do_cmd(smu0, &cmd, 800); 600 601 for (;;); 602 } 603 604 static int 605 smu_todr_gettime_ymdhms(todr_chip_handle_t tch, struct clock_ymdhms *dt) 606 { 607 struct smu_softc *sc = tch->cookie; 608 struct smu_cmd cmd; 609 int ret; 610 611 cmd.cmd = SMU_CMD_RTC; 612 cmd.len = 1; 613 cmd.data[0] = 0x81; 614 615 ret = smu_do_cmd(sc, &cmd, 800); 616 if (ret != 0) 617 return ret; 618 619 dt->dt_sec = bcdtobin(cmd.data[0]); 620 dt->dt_min = bcdtobin(cmd.data[1]); 621 dt->dt_hour = bcdtobin(cmd.data[2]); 622 dt->dt_wday = bcdtobin(cmd.data[3]); 623 dt->dt_day = bcdtobin(cmd.data[4]); 624 dt->dt_mon = bcdtobin(cmd.data[5]); 625 dt->dt_year = bcdtobin(cmd.data[6]) + 2000; 626 627 return 0; 628 } 629 630 static int 631 smu_todr_settime_ymdhms(todr_chip_handle_t tch, struct clock_ymdhms *dt) 632 { 633 struct smu_softc *sc = tch->cookie; 634 struct smu_cmd cmd; 635 636 cmd.cmd = SMU_CMD_RTC; 637 cmd.len = 8; 638 cmd.data[0] = 0x80; 639 cmd.data[1] = bintobcd(dt->dt_sec); 640 cmd.data[2] = bintobcd(dt->dt_min); 641 cmd.data[3] = bintobcd(dt->dt_hour); 642 cmd.data[4] = bintobcd(dt->dt_wday); 643 cmd.data[5] = bintobcd(dt->dt_day); 644 cmd.data[6] = bintobcd(dt->dt_mon); 645 cmd.data[7] = bintobcd(dt->dt_year - 2000); 646 647 return smu_do_cmd(sc, &cmd, 800); 648 } 649 650 static int 651 smu_fan_update_rpm(struct smu_fan *fan) 652 { 653 struct smu_softc *sc = fan->sc; 654 struct smu_cmd cmd; 655 int ret, diff; 656 657 cmd.cmd = SMU_CMD_FAN; 658 cmd.len = 2; 659 cmd.data[0] = 0x31; 660 cmd.data[1] = fan->reg; 661 662 ret = smu_do_cmd(sc, &cmd, 800); 663 if (ret == 0) { 664 fan->last_update = time_uptime; 665 fan->current_rpm = (cmd.data[0] << 8) | cmd.data[1]; 666 } else { 667 cmd.cmd = SMU_CMD_FAN; 668 cmd.len = 1; 669 cmd.data[0] = 0x01; 670 671 ret = smu_do_cmd(sc, &cmd, 800); 672 if (ret == 0) { 673 fan->last_update = time_uptime; 674 fan->current_rpm = (cmd.data[1 + fan->reg * 2] << 8) | 675 cmd.data[2 + fan->reg * 2]; 676 } 677 } 678 diff = abs(fan->current_rpm - fan->wanted_rpm); 679 if (diff > fan->max_rpm >> 3) { 680 fan->fault++; 681 } else fan->fault = 0; 682 return ret; 683 } 684 685 static int 686 smu_fan_get_rpm(void *cookie, int which) 687 { 688 struct smu_softc *sc = cookie; 689 struct smu_fan *fan = &sc->sc_fans[which]; 690 int ret; 691 ret = 0; 692 693 if (time_uptime - fan->last_update > 1) { 694 ret = smu_fan_update_rpm(fan); 695 if (ret != 0) 696 return -1; 697 } 698 699 return fan->current_rpm; 700 } 701 702 static int 703 smu_fan_set_rpm(void *cookie, int which, int rpm) 704 { 705 struct smu_softc *sc = cookie; 706 struct smu_fan *fan = &sc->sc_fans[which]; 707 struct smu_cmd cmd; 708 int ret; 709 710 DPRINTF("%s: fan %s rpm %d\n", __func__, fan->location, rpm); 711 712 rpm = uimax(fan->min_rpm, rpm); 713 rpm = uimin(fan->max_rpm, rpm); 714 715 fan->wanted_rpm = rpm; 716 717 cmd.cmd = SMU_CMD_FAN; 718 cmd.len = 4; 719 cmd.data[0] = 0x30; 720 cmd.data[1] = fan->reg; 721 cmd.data[2] = (rpm >> 8) & 0xff; 722 cmd.data[3] = rpm & 0xff; 723 724 ret = smu_do_cmd(sc, &cmd, 800); 725 if (ret != 0) { 726 cmd.cmd = SMU_CMD_FAN; 727 cmd.len = 14; 728 cmd.data[0] = fan->rpm_ctl ? 0x00 : 0x10; 729 cmd.data[1] = 1 << fan->reg; 730 cmd.data[2] = cmd.data[2 + fan->reg * 2] = (rpm >> 8) & 0xff; 731 cmd.data[3] = cmd.data[3 + fan->reg * 2] = rpm & 0xff; 732 733 ret = smu_do_cmd(sc, &cmd, 800); 734 } 735 736 return ret; 737 } 738 739 static int 740 smu_read_adc(struct smu_softc *sc, int id) 741 { 742 struct smu_cmd cmd; 743 int ret; 744 745 cmd.cmd = SMU_CMD_ADC; 746 cmd.len = 1; 747 cmd.data[0] = id; 748 749 ret = smu_do_cmd(sc, &cmd, 800); 750 if (ret == 0) { 751 return cmd.data[0] << 8 | cmd.data[1]; 752 } 753 return -1; 754 } 755 756 static int 757 smu_iicbus_exec(void *cookie, i2c_op_t op, i2c_addr_t addr, const void *send, 758 size_t send_len, void *recv, size_t recv_len, int flags) 759 { 760 struct smu_iicbus *iicbus = cookie; 761 struct smu_softc *sc = iicbus->sc; 762 struct smu_cmd cmd; 763 int retries, ret; 764 765 DPRINTF("%s: op %x addr %x send_len %d recv_len %d\n", 766 __func__, op, addr, send_len, recv_len); 767 768 cmd.cmd = SMU_CMD_I2C; 769 cmd.len = 9 + recv_len; 770 cmd.data[0] = iicbus->reg; 771 cmd.data[1] = I2C_OP_READ_P(op) ? 0x02 : 0x00; 772 cmd.data[2] = addr << 1; 773 cmd.data[3] = send_len; 774 memcpy(&cmd.data[4], send, send_len); 775 cmd.data[7] = addr << 1; 776 if (I2C_OP_READ_P(op)) 777 cmd.data[7] |= 0x01; 778 cmd.data[8] = recv_len; 779 memcpy(&cmd.data[9], recv, recv_len); 780 781 ret = smu_do_cmd(sc, &cmd, 800); 782 if (ret != 0) 783 return (ret); 784 785 for (retries = 0; retries < 10; retries++) { 786 cmd.cmd = SMU_CMD_I2C; 787 cmd.len = 1; 788 cmd.data[0] = 0x00; 789 memset(&cmd.data[1], 0xff, recv_len); 790 791 ret = smu_do_cmd(sc, &cmd, 800); 792 793 DPRINTF("%s: cmd data[0] %x\n", __func__, cmd.data[0]); 794 795 if (ret == 0 && (cmd.data[0] & 0x80) == 0) 796 break; 797 798 DELAY(10000); 799 } 800 801 if (cmd.data[0] & 0x80) 802 return EIO; 803 804 if (I2C_OP_READ_P(op)) 805 memcpy(recv, &cmd.data[1], recv_len); 806 807 return 0; 808 } 809 810 SYSCTL_SETUP(smu_sysctl_setup, "SMU sysctl subtree setup") 811 { 812 sysctl_createv(NULL, 0, NULL, NULL, 813 CTLFLAG_PERMANENT, CTLTYPE_NODE, "machdep", NULL, 814 NULL, 0, NULL, 0, CTL_MACHDEP, CTL_EOL); 815 } 816 817 static void 818 smu_setup_zones(struct smu_softc *sc) 819 { 820 struct smu_fan *f; 821 fancontrol_zone_t *z; 822 int i; 823 824 /* init zones */ 825 sc->sc_zones[SMU_ZONE_CPU].name = "CPUs"; 826 sc->sc_zones[SMU_ZONE_CPU].filter = is_cpu_sensor; 827 sc->sc_zones[SMU_ZONE_CPU].cookie = sc; 828 sc->sc_zones[SMU_ZONE_CPU].get_rpm = smu_fan_get_rpm; 829 sc->sc_zones[SMU_ZONE_CPU].set_rpm = smu_fan_set_rpm; 830 sc->sc_zones[SMU_ZONE_CPU].Tmin = 45; 831 sc->sc_zones[SMU_ZONE_CPU].Tmax = 80; 832 sc->sc_zones[SMU_ZONE_CPU].nfans = 0; 833 sc->sc_zones[SMU_ZONE_CASE].name = "Slots"; 834 sc->sc_zones[SMU_ZONE_CASE].filter = is_slots_sensor; 835 sc->sc_zones[SMU_ZONE_CASE].cookie = sc; 836 sc->sc_zones[SMU_ZONE_CASE].Tmin = 50; 837 sc->sc_zones[SMU_ZONE_CASE].Tmax = 75; 838 sc->sc_zones[SMU_ZONE_CASE].nfans = 0; 839 sc->sc_zones[SMU_ZONE_CASE].get_rpm = smu_fan_get_rpm; 840 sc->sc_zones[SMU_ZONE_CASE].set_rpm = smu_fan_set_rpm; 841 sc->sc_zones[SMU_ZONE_DRIVEBAY].name = "Drivebays"; 842 sc->sc_zones[SMU_ZONE_DRIVEBAY].filter = is_drive_sensor; 843 sc->sc_zones[SMU_ZONE_DRIVEBAY].cookie = sc; 844 sc->sc_zones[SMU_ZONE_DRIVEBAY].get_rpm = smu_fan_get_rpm; 845 sc->sc_zones[SMU_ZONE_DRIVEBAY].set_rpm = smu_fan_set_rpm; 846 sc->sc_zones[SMU_ZONE_DRIVEBAY].Tmin = 30; 847 sc->sc_zones[SMU_ZONE_DRIVEBAY].Tmax = 50; 848 sc->sc_zones[SMU_ZONE_DRIVEBAY].nfans = 0; 849 850 /* find CPU fans */ 851 z = &sc->sc_zones[SMU_ZONE_CPU]; 852 for (i = 0; i < SMU_MAX_FANS; i++) { 853 f = &sc->sc_fans[i]; 854 if ((strstr(f->location, "CPU") != NULL) || 855 (strstr(f->location, "System") != NULL)) { 856 z->fans[z->nfans].num = i; 857 z->fans[z->nfans].min_rpm = f->min_rpm; 858 z->fans[z->nfans].max_rpm = f->max_rpm; 859 z->fans[z->nfans].name = f->location; 860 z->nfans++; 861 } 862 } 863 aprint_normal_dev(sc->sc_dev, 864 "using %d fans for CPU zone\n", z->nfans); 865 866 z = &sc->sc_zones[SMU_ZONE_DRIVEBAY]; 867 for (i = 0; i < SMU_MAX_FANS; i++) { 868 f = &sc->sc_fans[i]; 869 if ((strstr(f->location, "DRIVE") != NULL) || 870 (strstr(f->location, "Drive") != NULL)) { 871 z->fans[z->nfans].num = i; 872 z->fans[z->nfans].min_rpm = f->min_rpm; 873 z->fans[z->nfans].max_rpm = f->max_rpm; 874 z->fans[z->nfans].name = f->location; 875 z->nfans++; 876 } 877 } 878 aprint_normal_dev(sc->sc_dev, 879 "using %d fans for drive bay zone\n", z->nfans); 880 881 z = &sc->sc_zones[SMU_ZONE_CASE]; 882 for (i = 0; i < SMU_MAX_FANS; i++) { 883 f = &sc->sc_fans[i]; 884 if ((strstr(f->location, "BACKSIDE") != NULL) || 885 (strstr(f->location, "SLOTS") != NULL)) { 886 z->fans[z->nfans].num = i; 887 z->fans[z->nfans].min_rpm = f->min_rpm; 888 z->fans[z->nfans].max_rpm = f->max_rpm; 889 z->fans[z->nfans].name = f->location; 890 z->nfans++; 891 } 892 } 893 aprint_normal_dev(sc->sc_dev, 894 "using %d fans for expansion slots zone\n", z->nfans); 895 896 /* setup sysctls for our zones etc. */ 897 for (i = 0; i < SMU_ZONES; i++) { 898 fancontrol_init_zone(&sc->sc_zones[i], sc->sc_sysctl_me); 899 } 900 901 sc->sc_dying = false; 902 kthread_create(PRI_NONE, 0, curcpu(), smu_adjust, sc, &sc->sc_thread, 903 "fan control"); 904 } 905 906 static void 907 smu_adjust(void *cookie) 908 { 909 struct smu_softc *sc = cookie; 910 int i; 911 912 while (!sc->sc_dying) { 913 for (i = 0; i < SMU_ZONES; i++) 914 if (sc->sc_zones[i].nfans > 0) 915 fancontrol_adjust_zone(&sc->sc_zones[i]); 916 kpause("fanctrl", true, mstohz(2000), NULL); 917 } 918 kthread_exit(0); 919 } 920 921 static bool is_cpu_sensor(const envsys_data_t *edata) 922 { 923 if (edata->units != ENVSYS_STEMP) 924 return false; 925 if (strstr(edata->desc, "CPU") != NULL) 926 return TRUE; 927 return false; 928 } 929 930 static bool is_drive_sensor(const envsys_data_t *edata) 931 { 932 if (edata->units != ENVSYS_STEMP) 933 return false; 934 if (strstr(edata->desc, "DRIVE") != NULL) 935 return TRUE; 936 if (strstr(edata->desc, "drive") != NULL) 937 return TRUE; 938 return false; 939 } 940 941 static bool is_slots_sensor(const envsys_data_t *edata) 942 { 943 if (edata->units != ENVSYS_STEMP) 944 return false; 945 if (strstr(edata->desc, "BACKSIDE") != NULL) 946 return TRUE; 947 if (strstr(edata->desc, "INLET") != NULL) 948 return TRUE; 949 if (strstr(edata->desc, "DIODE") != NULL) 950 return TRUE; 951 if (strstr(edata->desc, "TUNNEL") != NULL) 952 return TRUE; 953 return false; 954 } 955 956 int 957 smu_get_datablock(int id, uint8_t *buf, size_t len) 958 { 959 struct smu_cmd cmd; 960 961 cmd.cmd = SMU_PARTITION; 962 cmd.len = 2; 963 cmd.data[0] = SMU_PARTITION_LATEST; 964 cmd.data[1] = id; 965 smu_do_cmd(smu0, &cmd, 100); 966 967 cmd.data[4] = cmd.data[0]; 968 cmd.data[5] = cmd.data[1]; 969 970 cmd.cmd = SMU_MISC; 971 cmd.len = 7; 972 cmd.data[0] = SMU_MISC_GET_DATA; 973 cmd.data[1] = 4; 974 cmd.data[2] = 0; 975 cmd.data[3] = 0; 976 cmd.data[6] = len; 977 smu_do_cmd(smu0, &cmd, 100); 978 979 memcpy(buf, cmd.data, len); 980 return 0; 981 } 982