1 /*- 2 * Copyright (c) 2007, 2008 Rui Paulo <rpaulo@FreeBSD.org> 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 AUTHOR ``AS IS'' AND ANY EXPRESS OR 15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 16 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 17 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, 18 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 19 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 20 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 22 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN 23 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 24 * POSSIBILITY OF SUCH DAMAGE. 25 * 26 */ 27 28 /* 29 * Driver for Apple's System Management Console (SMC). 30 * SMC can be found on the MacBook, MacBook Pro and Mac Mini. 31 * 32 * Inspired by the Linux applesmc driver. 33 */ 34 35 #include <sys/cdefs.h> 36 __FBSDID("$FreeBSD$"); 37 38 #include <sys/param.h> 39 #include <sys/bus.h> 40 #include <sys/conf.h> 41 #include <sys/kernel.h> 42 #include <sys/lock.h> 43 #include <sys/malloc.h> 44 #include <sys/module.h> 45 #include <sys/mutex.h> 46 #include <sys/sysctl.h> 47 #include <sys/systm.h> 48 #include <sys/taskqueue.h> 49 #include <sys/rman.h> 50 51 #include <machine/resource.h> 52 53 #include <contrib/dev/acpica/include/acpi.h> 54 55 #include <dev/acpica/acpivar.h> 56 #include <dev/asmc/asmcvar.h> 57 58 #include "opt_intr_filter.h" 59 60 /* 61 * Device interface. 62 */ 63 static int asmc_probe(device_t dev); 64 static int asmc_attach(device_t dev); 65 static int asmc_detach(device_t dev); 66 67 /* 68 * SMC functions. 69 */ 70 static int asmc_init(device_t dev); 71 static int asmc_command(device_t dev, uint8_t command); 72 static int asmc_wait(device_t dev, uint8_t val); 73 static int asmc_wait_ack(device_t dev, uint8_t val, int amount); 74 static int asmc_key_write(device_t dev, const char *key, uint8_t *buf, 75 uint8_t len); 76 static int asmc_key_read(device_t dev, const char *key, uint8_t *buf, 77 uint8_t); 78 static int asmc_fan_count(device_t dev); 79 static int asmc_fan_getvalue(device_t dev, const char *key, int fan); 80 static int asmc_temp_getvalue(device_t dev, const char *key); 81 static int asmc_sms_read(device_t, const char *key, int16_t *val); 82 static void asmc_sms_calibrate(device_t dev); 83 static int asmc_sms_intrfast(void *arg); 84 #ifdef INTR_FILTER 85 static void asmc_sms_handler(void *arg); 86 #endif 87 static void asmc_sms_printintr(device_t dev, uint8_t); 88 static void asmc_sms_task(void *arg, int pending); 89 #ifdef DEBUG 90 void asmc_dumpall(device_t); 91 static int asmc_key_dump(device_t, int); 92 #endif 93 94 /* 95 * Model functions. 96 */ 97 static int asmc_mb_sysctl_fanspeed(SYSCTL_HANDLER_ARGS); 98 static int asmc_mb_sysctl_fansafespeed(SYSCTL_HANDLER_ARGS); 99 static int asmc_mb_sysctl_fanminspeed(SYSCTL_HANDLER_ARGS); 100 static int asmc_mb_sysctl_fanmaxspeed(SYSCTL_HANDLER_ARGS); 101 static int asmc_mb_sysctl_fantargetspeed(SYSCTL_HANDLER_ARGS); 102 static int asmc_temp_sysctl(SYSCTL_HANDLER_ARGS); 103 static int asmc_mb_sysctl_sms_x(SYSCTL_HANDLER_ARGS); 104 static int asmc_mb_sysctl_sms_y(SYSCTL_HANDLER_ARGS); 105 static int asmc_mb_sysctl_sms_z(SYSCTL_HANDLER_ARGS); 106 static int asmc_mbp_sysctl_light_left(SYSCTL_HANDLER_ARGS); 107 static int asmc_mbp_sysctl_light_right(SYSCTL_HANDLER_ARGS); 108 static int asmc_mbp_sysctl_light_control(SYSCTL_HANDLER_ARGS); 109 110 struct asmc_model { 111 const char *smc_model; /* smbios.system.product env var. */ 112 const char *smc_desc; /* driver description */ 113 114 /* Helper functions */ 115 int (*smc_sms_x)(SYSCTL_HANDLER_ARGS); 116 int (*smc_sms_y)(SYSCTL_HANDLER_ARGS); 117 int (*smc_sms_z)(SYSCTL_HANDLER_ARGS); 118 int (*smc_fan_speed)(SYSCTL_HANDLER_ARGS); 119 int (*smc_fan_safespeed)(SYSCTL_HANDLER_ARGS); 120 int (*smc_fan_minspeed)(SYSCTL_HANDLER_ARGS); 121 int (*smc_fan_maxspeed)(SYSCTL_HANDLER_ARGS); 122 int (*smc_fan_targetspeed)(SYSCTL_HANDLER_ARGS); 123 int (*smc_light_left)(SYSCTL_HANDLER_ARGS); 124 int (*smc_light_right)(SYSCTL_HANDLER_ARGS); 125 int (*smc_light_control)(SYSCTL_HANDLER_ARGS); 126 127 const char *smc_temps[ASMC_TEMP_MAX]; 128 const char *smc_tempnames[ASMC_TEMP_MAX]; 129 const char *smc_tempdescs[ASMC_TEMP_MAX]; 130 }; 131 132 static struct asmc_model *asmc_match(device_t dev); 133 134 #define ASMC_SMS_FUNCS asmc_mb_sysctl_sms_x, asmc_mb_sysctl_sms_y, \ 135 asmc_mb_sysctl_sms_z 136 137 #define ASMC_FAN_FUNCS asmc_mb_sysctl_fanspeed, asmc_mb_sysctl_fansafespeed, \ 138 asmc_mb_sysctl_fanminspeed, \ 139 asmc_mb_sysctl_fanmaxspeed, \ 140 asmc_mb_sysctl_fantargetspeed 141 #define ASMC_LIGHT_FUNCS asmc_mbp_sysctl_light_left, \ 142 asmc_mbp_sysctl_light_right, \ 143 asmc_mbp_sysctl_light_control 144 145 struct asmc_model asmc_models[] = { 146 { 147 "MacBook1,1", "Apple SMC MacBook Core Duo", 148 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, NULL, NULL, NULL, 149 ASMC_MB_TEMPS, ASMC_MB_TEMPNAMES, ASMC_MB_TEMPDESCS 150 }, 151 152 { 153 "MacBook2,1", "Apple SMC MacBook Core 2 Duo", 154 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, NULL, NULL, NULL, 155 ASMC_MB_TEMPS, ASMC_MB_TEMPNAMES, ASMC_MB_TEMPDESCS 156 }, 157 158 { 159 "MacBookPro1,1", "Apple SMC MacBook Pro Core Duo (15-inch)", 160 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, ASMC_LIGHT_FUNCS, 161 ASMC_MBP_TEMPS, ASMC_MBP_TEMPNAMES, ASMC_MBP_TEMPDESCS 162 }, 163 164 { 165 "MacBookPro1,2", "Apple SMC MacBook Pro Core Duo (17-inch)", 166 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, ASMC_LIGHT_FUNCS, 167 ASMC_MBP_TEMPS, ASMC_MBP_TEMPNAMES, ASMC_MBP_TEMPDESCS 168 }, 169 170 { 171 "MacBookPro2,1", "Apple SMC MacBook Pro Core 2 Duo (17-inch)", 172 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, ASMC_LIGHT_FUNCS, 173 ASMC_MBP_TEMPS, ASMC_MBP_TEMPNAMES, ASMC_MBP_TEMPDESCS 174 }, 175 176 { 177 "MacBookPro2,2", "Apple SMC MacBook Pro Core 2 Duo (15-inch)", 178 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, ASMC_LIGHT_FUNCS, 179 ASMC_MBP_TEMPS, ASMC_MBP_TEMPNAMES, ASMC_MBP_TEMPDESCS 180 }, 181 182 { 183 "MacBookPro3,1", "Apple SMC MacBook Pro Core 2 Duo (15-inch LED)", 184 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, ASMC_LIGHT_FUNCS, 185 ASMC_MBP_TEMPS, ASMC_MBP_TEMPNAMES, ASMC_MBP_TEMPDESCS 186 }, 187 188 { 189 "MacBookPro3,2", "Apple SMC MacBook Pro Core 2 Duo (17-inch HD)", 190 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, ASMC_LIGHT_FUNCS, 191 ASMC_MBP_TEMPS, ASMC_MBP_TEMPNAMES, ASMC_MBP_TEMPDESCS 192 }, 193 194 { 195 "MacBookPro4,1", "Apple SMC MacBook Pro Core 2 Duo (Penryn)", 196 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, ASMC_LIGHT_FUNCS, 197 ASMC_MBP4_TEMPS, ASMC_MBP4_TEMPNAMES, ASMC_MBP4_TEMPDESCS 198 }, 199 200 /* The Mac Mini has no SMS */ 201 { 202 "Macmini1,1", "Apple SMC Mac Mini", 203 NULL, NULL, NULL, 204 ASMC_FAN_FUNCS, 205 NULL, NULL, NULL, 206 ASMC_MM_TEMPS, ASMC_MM_TEMPNAMES, ASMC_MM_TEMPDESCS 207 }, 208 209 /* Idem for the MacPro */ 210 { 211 "MacPro2", "Apple SMC Mac Pro (8-core)", 212 NULL, NULL, NULL, 213 ASMC_FAN_FUNCS, 214 NULL, NULL, NULL, 215 ASMC_MP_TEMPS, ASMC_MP_TEMPNAMES, ASMC_MP_TEMPDESCS 216 }, 217 218 { 219 "MacBookAir1,1", "Apple SMC MacBook Air", 220 ASMC_SMS_FUNCS, ASMC_FAN_FUNCS, NULL, NULL, NULL, 221 ASMC_MBA_TEMPS, ASMC_MBA_TEMPNAMES, ASMC_MBA_TEMPDESCS 222 }, 223 224 225 { NULL, NULL } 226 }; 227 228 #undef ASMC_SMS_FUNCS 229 #undef ASMC_FAN_FUNCS 230 #undef ASMC_LIGHT_FUNCS 231 232 /* 233 * Driver methods. 234 */ 235 static device_method_t asmc_methods[] = { 236 DEVMETHOD(device_probe, asmc_probe), 237 DEVMETHOD(device_attach, asmc_attach), 238 DEVMETHOD(device_detach, asmc_detach), 239 240 { 0, 0 } 241 }; 242 243 static driver_t asmc_driver = { 244 "asmc", 245 asmc_methods, 246 sizeof(struct asmc_softc) 247 }; 248 249 /* 250 * Debugging 251 */ 252 #define _COMPONENT ACPI_OEM 253 ACPI_MODULE_NAME("ASMC") 254 #ifdef DEBUG 255 #define ASMC_DPRINTF(str) device_printf(dev, str) 256 #else 257 #define ASMC_DPRINTF(str) 258 #endif 259 260 /* NB: can't be const */ 261 static char *asmc_ids[] = { "APP0001", NULL }; 262 263 static devclass_t asmc_devclass; 264 265 DRIVER_MODULE(asmc, acpi, asmc_driver, asmc_devclass, NULL, NULL); 266 MODULE_DEPEND(asmc, acpi, 1, 1, 1); 267 268 static struct asmc_model * 269 asmc_match(device_t dev) 270 { 271 int i; 272 char *model; 273 274 model = getenv("smbios.system.product"); 275 if (model == NULL) 276 return (NULL); 277 278 for (i = 0; asmc_models[i].smc_model; i++) { 279 if (!strncmp(model, asmc_models[i].smc_model, strlen(model))) { 280 freeenv(model); 281 return (&asmc_models[i]); 282 } 283 } 284 freeenv(model); 285 286 return (NULL); 287 } 288 289 static int 290 asmc_probe(device_t dev) 291 { 292 struct asmc_model *model; 293 294 if (resource_disabled("asmc", 0)) 295 return (ENXIO); 296 if (ACPI_ID_PROBE(device_get_parent(dev), dev, asmc_ids) == NULL) 297 return (ENXIO); 298 299 model = asmc_match(dev); 300 if (!model) { 301 device_printf(dev, "model not recognized\n"); 302 return (ENXIO); 303 } 304 device_set_desc(dev, model->smc_desc); 305 306 return (BUS_PROBE_DEFAULT); 307 } 308 309 static int 310 asmc_attach(device_t dev) 311 { 312 int i, j; 313 int ret; 314 char name[2]; 315 struct asmc_softc *sc = device_get_softc(dev); 316 struct sysctl_ctx_list *sysctlctx; 317 struct sysctl_oid *sysctlnode; 318 struct asmc_model *model; 319 320 sc->sc_ioport = bus_alloc_resource_any(dev, SYS_RES_IOPORT, 321 &sc->sc_rid_port, RF_ACTIVE); 322 if (sc->sc_ioport == NULL) { 323 device_printf(dev, "unable to allocate IO port\n"); 324 return (ENOMEM); 325 } 326 327 sysctlctx = device_get_sysctl_ctx(dev); 328 sysctlnode = device_get_sysctl_tree(dev); 329 330 model = asmc_match(dev); 331 332 mtx_init(&sc->sc_mtx, "asmc", NULL, MTX_SPIN); 333 334 sc->sc_model = model; 335 asmc_init(dev); 336 337 /* 338 * dev.asmc.n.fan.* tree. 339 */ 340 sc->sc_fan_tree[0] = SYSCTL_ADD_NODE(sysctlctx, 341 SYSCTL_CHILDREN(sysctlnode), OID_AUTO, "fan", 342 CTLFLAG_RD, 0, "Fan Root Tree"); 343 344 for (i = 1; i <= sc->sc_nfan; i++) { 345 j = i - 1; 346 name[0] = '0' + j; 347 name[1] = 0; 348 sc->sc_fan_tree[i] = SYSCTL_ADD_NODE(sysctlctx, 349 SYSCTL_CHILDREN(sc->sc_fan_tree[0]), 350 OID_AUTO, name, CTLFLAG_RD, 0, 351 "Fan Subtree"); 352 353 SYSCTL_ADD_PROC(sysctlctx, 354 SYSCTL_CHILDREN(sc->sc_fan_tree[i]), 355 OID_AUTO, "speed", CTLTYPE_INT | CTLFLAG_RD, 356 dev, j, model->smc_fan_speed, "I", 357 "Fan speed in RPM"); 358 359 SYSCTL_ADD_PROC(sysctlctx, 360 SYSCTL_CHILDREN(sc->sc_fan_tree[i]), 361 OID_AUTO, "safespeed", 362 CTLTYPE_INT | CTLFLAG_RD, 363 dev, j, model->smc_fan_safespeed, "I", 364 "Fan safe speed in RPM"); 365 366 SYSCTL_ADD_PROC(sysctlctx, 367 SYSCTL_CHILDREN(sc->sc_fan_tree[i]), 368 OID_AUTO, "minspeed", 369 CTLTYPE_INT | CTLFLAG_RD, 370 dev, j, model->smc_fan_minspeed, "I", 371 "Fan minimum speed in RPM"); 372 373 SYSCTL_ADD_PROC(sysctlctx, 374 SYSCTL_CHILDREN(sc->sc_fan_tree[i]), 375 OID_AUTO, "maxspeed", 376 CTLTYPE_INT | CTLFLAG_RD, 377 dev, j, model->smc_fan_maxspeed, "I", 378 "Fan maximum speed in RPM"); 379 380 SYSCTL_ADD_PROC(sysctlctx, 381 SYSCTL_CHILDREN(sc->sc_fan_tree[i]), 382 OID_AUTO, "targetspeed", 383 CTLTYPE_INT | CTLFLAG_RD, 384 dev, j, model->smc_fan_targetspeed, "I", 385 "Fan target speed in RPM"); 386 } 387 388 /* 389 * dev.asmc.n.temp tree. 390 */ 391 sc->sc_temp_tree = SYSCTL_ADD_NODE(sysctlctx, 392 SYSCTL_CHILDREN(sysctlnode), OID_AUTO, "temp", 393 CTLFLAG_RD, 0, "Temperature sensors"); 394 395 for (i = 0; model->smc_temps[i]; i++) { 396 SYSCTL_ADD_PROC(sysctlctx, 397 SYSCTL_CHILDREN(sc->sc_temp_tree), 398 OID_AUTO, model->smc_tempnames[i], 399 CTLTYPE_INT | CTLFLAG_RD, 400 dev, i, asmc_temp_sysctl, "I", 401 model->smc_tempdescs[i]); 402 } 403 404 /* 405 * dev.asmc.n.light 406 */ 407 if (model->smc_light_left) { 408 sc->sc_light_tree = SYSCTL_ADD_NODE(sysctlctx, 409 SYSCTL_CHILDREN(sysctlnode), OID_AUTO, "light", 410 CTLFLAG_RD, 0, "Keyboard backlight sensors"); 411 412 SYSCTL_ADD_PROC(sysctlctx, 413 SYSCTL_CHILDREN(sc->sc_light_tree), 414 OID_AUTO, "left", CTLTYPE_INT | CTLFLAG_RD, 415 dev, 0, model->smc_light_left, "I", 416 "Keyboard backlight left sensor"); 417 418 SYSCTL_ADD_PROC(sysctlctx, 419 SYSCTL_CHILDREN(sc->sc_light_tree), 420 OID_AUTO, "right", CTLTYPE_INT | CTLFLAG_RD, 421 dev, 0, model->smc_light_right, "I", 422 "Keyboard backlight right sensor"); 423 424 SYSCTL_ADD_PROC(sysctlctx, 425 SYSCTL_CHILDREN(sc->sc_light_tree), 426 OID_AUTO, "control", 427 CTLTYPE_INT | CTLFLAG_RW | CTLFLAG_ANYBODY, 428 dev, 0, model->smc_light_control, "I", 429 "Keyboard backlight brightness control"); 430 } 431 432 if (model->smc_sms_x == NULL) 433 goto nosms; 434 435 /* 436 * dev.asmc.n.sms tree. 437 */ 438 sc->sc_sms_tree = SYSCTL_ADD_NODE(sysctlctx, 439 SYSCTL_CHILDREN(sysctlnode), OID_AUTO, "sms", 440 CTLFLAG_RD, 0, "Sudden Motion Sensor"); 441 442 SYSCTL_ADD_PROC(sysctlctx, 443 SYSCTL_CHILDREN(sc->sc_sms_tree), 444 OID_AUTO, "x", CTLTYPE_INT | CTLFLAG_RD, 445 dev, 0, model->smc_sms_x, "I", 446 "Sudden Motion Sensor X value"); 447 448 SYSCTL_ADD_PROC(sysctlctx, 449 SYSCTL_CHILDREN(sc->sc_sms_tree), 450 OID_AUTO, "y", CTLTYPE_INT | CTLFLAG_RD, 451 dev, 0, model->smc_sms_y, "I", 452 "Sudden Motion Sensor Y value"); 453 454 SYSCTL_ADD_PROC(sysctlctx, 455 SYSCTL_CHILDREN(sc->sc_sms_tree), 456 OID_AUTO, "z", CTLTYPE_INT | CTLFLAG_RD, 457 dev, 0, model->smc_sms_z, "I", 458 "Sudden Motion Sensor Z value"); 459 460 /* 461 * Need a taskqueue to send devctl_notify() events 462 * when the SMS interrupt us. 463 * 464 * PI_REALTIME is used due to the sensitivity of the 465 * interrupt. An interrupt from the SMS means that the 466 * disk heads should be turned off as quickly as possible. 467 * 468 * We only need to do this for the non INTR_FILTER case. 469 */ 470 sc->sc_sms_tq = NULL; 471 #ifndef INTR_FILTER 472 TASK_INIT(&sc->sc_sms_task, 0, asmc_sms_task, sc); 473 sc->sc_sms_tq = taskqueue_create_fast("asmc_taskq", M_WAITOK, 474 taskqueue_thread_enqueue, &sc->sc_sms_tq); 475 taskqueue_start_threads(&sc->sc_sms_tq, 1, PI_REALTIME, "%s sms taskq", 476 device_get_nameunit(dev)); 477 #endif 478 /* 479 * Allocate an IRQ for the SMS. 480 */ 481 sc->sc_rid_irq = 0; 482 sc->sc_irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, 483 &sc->sc_rid_irq, RF_ACTIVE); 484 if (sc->sc_irq == NULL) { 485 device_printf(dev, "unable to allocate IRQ resource\n"); 486 ret = ENXIO; 487 goto err2; 488 } 489 490 ret = bus_setup_intr(dev, sc->sc_irq, 491 INTR_TYPE_MISC | INTR_MPSAFE, 492 #ifdef INTR_FILTER 493 asmc_sms_intrfast, asmc_sms_handler, 494 #else 495 asmc_sms_intrfast, NULL, 496 #endif 497 dev, &sc->sc_cookie); 498 499 if (ret) { 500 device_printf(dev, "unable to setup SMS IRQ\n"); 501 goto err1; 502 } 503 nosms: 504 return (0); 505 err1: 506 bus_release_resource(dev, SYS_RES_IRQ, sc->sc_rid_irq, sc->sc_irq); 507 err2: 508 bus_release_resource(dev, SYS_RES_IOPORT, sc->sc_rid_port, 509 sc->sc_ioport); 510 mtx_destroy(&sc->sc_mtx); 511 if (sc->sc_sms_tq) 512 taskqueue_free(sc->sc_sms_tq); 513 514 return (ret); 515 } 516 517 static int 518 asmc_detach(device_t dev) 519 { 520 struct asmc_softc *sc = device_get_softc(dev); 521 522 if (sc->sc_sms_tq) { 523 taskqueue_drain(sc->sc_sms_tq, &sc->sc_sms_task); 524 taskqueue_free(sc->sc_sms_tq); 525 } 526 if (sc->sc_cookie) 527 bus_teardown_intr(dev, sc->sc_irq, sc->sc_cookie); 528 if (sc->sc_irq) 529 bus_release_resource(dev, SYS_RES_IRQ, sc->sc_rid_irq, 530 sc->sc_irq); 531 if (sc->sc_ioport) 532 bus_release_resource(dev, SYS_RES_IOPORT, sc->sc_rid_port, 533 sc->sc_ioport); 534 mtx_destroy(&sc->sc_mtx); 535 536 return (0); 537 } 538 539 #ifdef DEBUG 540 void asmc_dumpall(device_t dev) 541 { 542 int i; 543 544 /* XXX magic number */ 545 for (i=0; i < 0x100; i++) 546 asmc_key_dump(dev, i); 547 } 548 #endif 549 550 static int 551 asmc_init(device_t dev) 552 { 553 struct asmc_softc *sc = device_get_softc(dev); 554 int i, error = 1; 555 uint8_t buf[4]; 556 557 if (sc->sc_model->smc_sms_x == NULL) 558 goto nosms; 559 560 /* 561 * We are ready to recieve interrupts from the SMS. 562 */ 563 buf[0] = 0x01; 564 ASMC_DPRINTF(("intok key\n")); 565 asmc_key_write(dev, ASMC_KEY_INTOK, buf, 1); 566 DELAY(50); 567 568 /* 569 * Initiate the polling intervals. 570 */ 571 buf[0] = 20; /* msecs */ 572 ASMC_DPRINTF(("low int key\n")); 573 asmc_key_write(dev, ASMC_KEY_SMS_LOW_INT, buf, 1); 574 DELAY(200); 575 576 buf[0] = 20; /* msecs */ 577 ASMC_DPRINTF(("high int key\n")); 578 asmc_key_write(dev, ASMC_KEY_SMS_HIGH_INT, buf, 1); 579 DELAY(200); 580 581 buf[0] = 0x00; 582 buf[1] = 0x60; 583 ASMC_DPRINTF(("sms low key\n")); 584 asmc_key_write(dev, ASMC_KEY_SMS_LOW, buf, 2); 585 DELAY(200); 586 587 buf[0] = 0x01; 588 buf[1] = 0xc0; 589 ASMC_DPRINTF(("sms high key\n")); 590 asmc_key_write(dev, ASMC_KEY_SMS_HIGH, buf, 2); 591 DELAY(200); 592 593 /* 594 * I'm not sure what this key does, but it seems to be 595 * required. 596 */ 597 buf[0] = 0x01; 598 ASMC_DPRINTF(("sms flag key\n")); 599 asmc_key_write(dev, ASMC_KEY_SMS_FLAG, buf, 1); 600 DELAY(100); 601 602 sc->sc_sms_intr_works = 0; 603 604 /* 605 * Retry SMS initialization 1000 times 606 * (takes approx. 2 seconds in worst case) 607 */ 608 for (i = 0; i < 1000; i++) { 609 if (asmc_key_read(dev, ASMC_KEY_SMS, buf, 2) == 0 && 610 (buf[0] == ASMC_SMS_INIT1 && buf[1] == ASMC_SMS_INIT2)) { 611 error = 0; 612 sc->sc_sms_intr_works = 1; 613 goto out; 614 } 615 buf[0] = ASMC_SMS_INIT1; 616 buf[1] = ASMC_SMS_INIT2; 617 ASMC_DPRINTF(("sms key\n")); 618 asmc_key_write(dev, ASMC_KEY_SMS, buf, 2); 619 DELAY(50); 620 } 621 device_printf(dev, "WARNING: Sudden Motion Sensor not initialized!\n"); 622 623 out: 624 asmc_sms_calibrate(dev); 625 nosms: 626 sc->sc_nfan = asmc_fan_count(dev); 627 if (sc->sc_nfan > ASMC_MAXFANS) { 628 device_printf(dev, "more than %d fans were detected. Please " 629 "report this.\n", ASMC_MAXFANS); 630 sc->sc_nfan = ASMC_MAXFANS; 631 } 632 633 if (bootverbose) { 634 /* 635 * XXX: The number of keys is a 32 bit buffer, but 636 * right now Apple only uses the last 8 bit. 637 */ 638 asmc_key_read(dev, ASMC_NKEYS, buf, 4); 639 device_printf(dev, "number of keys: %d\n", buf[3]); 640 } 641 642 #ifdef DEBUG 643 asmc_dumpall(dev); 644 #endif 645 646 return (error); 647 } 648 649 /* 650 * We need to make sure that the SMC acks the byte sent. 651 * Just wait up to (amount * 10) ms. 652 */ 653 static int 654 asmc_wait_ack(device_t dev, uint8_t val, int amount) 655 { 656 struct asmc_softc *sc = device_get_softc(dev); 657 u_int i; 658 659 val = val & ASMC_STATUS_MASK; 660 661 for (i = 0; i < amount; i++) { 662 if ((ASMC_CMDPORT_READ(sc) & ASMC_STATUS_MASK) == val) 663 return (0); 664 DELAY(10); 665 } 666 667 return (1); 668 } 669 670 /* 671 * We need to make sure that the SMC acks the byte sent. 672 * Just wait up to 100 ms. 673 */ 674 static int 675 asmc_wait(device_t dev, uint8_t val) 676 { 677 struct asmc_softc *sc; 678 679 if (asmc_wait_ack(dev, val, 1000) == 0) 680 return (0); 681 682 sc = device_get_softc(dev); 683 val = val & ASMC_STATUS_MASK; 684 685 #ifdef DEBUG 686 device_printf(dev, "%s failed: 0x%x, 0x%x\n", __func__, val, 687 ASMC_CMDPORT_READ(sc)); 688 #endif 689 return (1); 690 } 691 692 /* 693 * Send the given command, retrying up to 10 times if 694 * the acknowledgement fails. 695 */ 696 static int 697 asmc_command(device_t dev, uint8_t command) { 698 699 int i; 700 struct asmc_softc *sc = device_get_softc(dev); 701 702 for (i=0; i < 10; i++) { 703 ASMC_CMDPORT_WRITE(sc, command); 704 if (asmc_wait_ack(dev, 0x0c, 100) == 0) { 705 return (0); 706 } 707 } 708 709 #ifdef DEBUG 710 device_printf(dev, "%s failed: 0x%x, 0x%x\n", __func__, command, 711 ASMC_CMDPORT_READ(sc)); 712 #endif 713 return (1); 714 } 715 716 static int 717 asmc_key_read(device_t dev, const char *key, uint8_t *buf, uint8_t len) 718 { 719 int i, error = 1, try = 0; 720 struct asmc_softc *sc = device_get_softc(dev); 721 722 mtx_lock_spin(&sc->sc_mtx); 723 724 begin: 725 if (asmc_command(dev, ASMC_CMDREAD)) 726 goto out; 727 728 for (i = 0; i < 4; i++) { 729 ASMC_DATAPORT_WRITE(sc, key[i]); 730 if (asmc_wait(dev, 0x04)) 731 goto out; 732 } 733 734 ASMC_DATAPORT_WRITE(sc, len); 735 736 for (i = 0; i < len; i++) { 737 if (asmc_wait(dev, 0x05)) 738 goto out; 739 buf[i] = ASMC_DATAPORT_READ(sc); 740 } 741 742 error = 0; 743 out: 744 if (error) { 745 if (++try < 10) goto begin; 746 device_printf(dev,"%s for key %s failed %d times, giving up\n", 747 __func__, key, try); 748 } 749 750 mtx_unlock_spin(&sc->sc_mtx); 751 752 return (error); 753 } 754 755 #ifdef DEBUG 756 static int 757 asmc_key_dump(device_t dev, int number) 758 { 759 struct asmc_softc *sc = device_get_softc(dev); 760 char key[5] = { 0 }; 761 char type[7] = { 0 }; 762 uint8_t index[4]; 763 uint8_t v[32]; 764 uint8_t maxlen; 765 int i, error = 1, try = 0; 766 767 mtx_lock_spin(&sc->sc_mtx); 768 769 index[0] = (number >> 24) & 0xff; 770 index[1] = (number >> 16) & 0xff; 771 index[2] = (number >> 8) & 0xff; 772 index[3] = (number) & 0xff; 773 774 begin: 775 if (asmc_command(dev, 0x12)) 776 goto out; 777 778 for (i = 0; i < 4; i++) { 779 ASMC_DATAPORT_WRITE(sc, index[i]); 780 if (asmc_wait(dev, 0x04)) 781 goto out; 782 } 783 784 ASMC_DATAPORT_WRITE(sc, 4); 785 786 for (i = 0; i < 4; i++) { 787 if (asmc_wait(dev, 0x05)) 788 goto out; 789 key[i] = ASMC_DATAPORT_READ(sc); 790 } 791 792 /* get type */ 793 if (asmc_command(dev, 0x13)) 794 goto out; 795 796 for (i = 0; i < 4; i++) { 797 ASMC_DATAPORT_WRITE(sc, key[i]); 798 if (asmc_wait(dev, 0x04)) 799 goto out; 800 } 801 802 ASMC_DATAPORT_WRITE(sc, 6); 803 804 for (i = 0; i < 6; i++) { 805 if (asmc_wait(dev, 0x05)) 806 goto out; 807 type[i] = ASMC_DATAPORT_READ(sc); 808 } 809 810 error = 0; 811 out: 812 if (error) { 813 if (++try < 10) goto begin; 814 device_printf(dev,"%s for key %s failed %d times, giving up\n", 815 __func__, key, try); 816 mtx_unlock_spin(&sc->sc_mtx); 817 } 818 else { 819 char buf[1024]; 820 char buf2[8]; 821 mtx_unlock_spin(&sc->sc_mtx); 822 maxlen = type[0]; 823 type[0] = ' '; 824 type[5] = 0; 825 if (maxlen > sizeof(v)) { 826 device_printf(dev, 827 "WARNING: cropping maxlen from %d to %zu\n", 828 maxlen, sizeof(v)); 829 maxlen = sizeof(v); 830 } 831 for (i = 0; i < sizeof(v); i++) { 832 v[i] = 0; 833 } 834 asmc_key_read(dev, key, v, maxlen); 835 snprintf(buf, sizeof(buf), "key %d is: %s, type %s " 836 "(len %d), data", number, key, type, maxlen); 837 for (i = 0; i < maxlen; i++) { 838 snprintf(buf2, sizeof(buf), " %02x", v[i]); 839 strlcat(buf, buf2, sizeof(buf)); 840 } 841 strlcat(buf, " \n", sizeof(buf)); 842 device_printf(dev, buf); 843 } 844 845 return (error); 846 } 847 #endif 848 849 static int 850 asmc_key_write(device_t dev, const char *key, uint8_t *buf, uint8_t len) 851 { 852 int i, error = -1, try = 0; 853 struct asmc_softc *sc = device_get_softc(dev); 854 855 mtx_lock_spin(&sc->sc_mtx); 856 857 begin: 858 ASMC_DPRINTF(("cmd port: cmd write\n")); 859 if (asmc_command(dev, ASMC_CMDWRITE)) 860 goto out; 861 862 ASMC_DPRINTF(("data port: key\n")); 863 for (i = 0; i < 4; i++) { 864 ASMC_DATAPORT_WRITE(sc, key[i]); 865 if (asmc_wait(dev, 0x04)) 866 goto out; 867 } 868 ASMC_DPRINTF(("data port: length\n")); 869 ASMC_DATAPORT_WRITE(sc, len); 870 871 ASMC_DPRINTF(("data port: buffer\n")); 872 for (i = 0; i < len; i++) { 873 if (asmc_wait(dev, 0x04)) 874 goto out; 875 ASMC_DATAPORT_WRITE(sc, buf[i]); 876 } 877 878 error = 0; 879 out: 880 if (error) { 881 if (++try < 10) goto begin; 882 device_printf(dev,"%s for key %s failed %d times, giving up\n", 883 __func__, key, try); 884 } 885 886 mtx_unlock_spin(&sc->sc_mtx); 887 888 return (error); 889 890 } 891 892 /* 893 * Fan control functions. 894 */ 895 static int 896 asmc_fan_count(device_t dev) 897 { 898 uint8_t buf[1]; 899 900 if (asmc_key_read(dev, ASMC_KEY_FANCOUNT, buf, 1) < 0) 901 return (-1); 902 903 return (buf[0]); 904 } 905 906 static int 907 asmc_fan_getvalue(device_t dev, const char *key, int fan) 908 { 909 int speed; 910 uint8_t buf[2]; 911 char fankey[5]; 912 913 snprintf(fankey, sizeof(fankey), key, fan); 914 if (asmc_key_read(dev, fankey, buf, 2) < 0) 915 return (-1); 916 speed = (buf[0] << 6) | (buf[1] >> 2); 917 918 return (speed); 919 } 920 921 static int 922 asmc_mb_sysctl_fanspeed(SYSCTL_HANDLER_ARGS) 923 { 924 device_t dev = (device_t) arg1; 925 int fan = arg2; 926 int error; 927 int32_t v; 928 929 v = asmc_fan_getvalue(dev, ASMC_KEY_FANSPEED, fan); 930 error = sysctl_handle_int(oidp, &v, 0, req); 931 932 return (error); 933 } 934 935 static int 936 asmc_mb_sysctl_fansafespeed(SYSCTL_HANDLER_ARGS) 937 { 938 device_t dev = (device_t) arg1; 939 int fan = arg2; 940 int error; 941 int32_t v; 942 943 v = asmc_fan_getvalue(dev, ASMC_KEY_FANSAFESPEED, fan); 944 error = sysctl_handle_int(oidp, &v, 0, req); 945 946 return (error); 947 } 948 949 950 static int 951 asmc_mb_sysctl_fanminspeed(SYSCTL_HANDLER_ARGS) 952 { 953 device_t dev = (device_t) arg1; 954 int fan = arg2; 955 int error; 956 int32_t v; 957 958 v = asmc_fan_getvalue(dev, ASMC_KEY_FANMINSPEED, fan); 959 error = sysctl_handle_int(oidp, &v, 0, req); 960 961 return (error); 962 } 963 964 static int 965 asmc_mb_sysctl_fanmaxspeed(SYSCTL_HANDLER_ARGS) 966 { 967 device_t dev = (device_t) arg1; 968 int fan = arg2; 969 int error; 970 int32_t v; 971 972 v = asmc_fan_getvalue(dev, ASMC_KEY_FANMAXSPEED, fan); 973 error = sysctl_handle_int(oidp, &v, 0, req); 974 975 return (error); 976 } 977 978 static int 979 asmc_mb_sysctl_fantargetspeed(SYSCTL_HANDLER_ARGS) 980 { 981 device_t dev = (device_t) arg1; 982 int fan = arg2; 983 int error; 984 int32_t v; 985 986 v = asmc_fan_getvalue(dev, ASMC_KEY_FANTARGETSPEED, fan); 987 error = sysctl_handle_int(oidp, &v, 0, req); 988 989 return (error); 990 } 991 992 /* 993 * Temperature functions. 994 */ 995 static int 996 asmc_temp_getvalue(device_t dev, const char *key) 997 { 998 uint8_t buf[2]; 999 1000 /* 1001 * Check for invalid temperatures. 1002 */ 1003 if (asmc_key_read(dev, key, buf, 2) < 0) 1004 return (-1); 1005 1006 return (buf[0]); 1007 } 1008 1009 static int 1010 asmc_temp_sysctl(SYSCTL_HANDLER_ARGS) 1011 { 1012 device_t dev = (device_t) arg1; 1013 struct asmc_softc *sc = device_get_softc(dev); 1014 int error, val; 1015 1016 val = asmc_temp_getvalue(dev, sc->sc_model->smc_temps[arg2]); 1017 error = sysctl_handle_int(oidp, &val, 0, req); 1018 1019 return (error); 1020 } 1021 1022 /* 1023 * Sudden Motion Sensor functions. 1024 */ 1025 static int 1026 asmc_sms_read(device_t dev, const char *key, int16_t *val) 1027 { 1028 uint8_t buf[2]; 1029 int error; 1030 1031 /* no need to do locking here as asmc_key_read() already does it */ 1032 switch (key[3]) { 1033 case 'X': 1034 case 'Y': 1035 case 'Z': 1036 error = asmc_key_read(dev, key, buf, 2); 1037 break; 1038 default: 1039 device_printf(dev, "%s called with invalid argument %s\n", 1040 __func__, key); 1041 error = 1; 1042 goto out; 1043 } 1044 *val = ((int16_t)buf[0] << 8) | buf[1]; 1045 out: 1046 return (error); 1047 } 1048 1049 static void 1050 asmc_sms_calibrate(device_t dev) 1051 { 1052 struct asmc_softc *sc = device_get_softc(dev); 1053 1054 asmc_sms_read(dev, ASMC_KEY_SMS_X, &sc->sms_rest_x); 1055 asmc_sms_read(dev, ASMC_KEY_SMS_Y, &sc->sms_rest_y); 1056 asmc_sms_read(dev, ASMC_KEY_SMS_Z, &sc->sms_rest_z); 1057 } 1058 1059 static int 1060 asmc_sms_intrfast(void *arg) 1061 { 1062 uint8_t type; 1063 device_t dev = (device_t) arg; 1064 struct asmc_softc *sc = device_get_softc(dev); 1065 if (!sc->sc_sms_intr_works) 1066 return (FILTER_HANDLED); 1067 1068 mtx_lock_spin(&sc->sc_mtx); 1069 type = ASMC_INTPORT_READ(sc); 1070 mtx_unlock_spin(&sc->sc_mtx); 1071 1072 sc->sc_sms_intrtype = type; 1073 asmc_sms_printintr(dev, type); 1074 1075 #ifdef INTR_FILTER 1076 return (FILTER_SCHEDULE_THREAD | FILTER_HANDLED); 1077 #else 1078 taskqueue_enqueue(sc->sc_sms_tq, &sc->sc_sms_task); 1079 #endif 1080 return (FILTER_HANDLED); 1081 } 1082 1083 #ifdef INTR_FILTER 1084 static void 1085 asmc_sms_handler(void *arg) 1086 { 1087 struct asmc_softc *sc = device_get_softc(arg); 1088 1089 asmc_sms_task(sc, 0); 1090 } 1091 #endif 1092 1093 1094 static void 1095 asmc_sms_printintr(device_t dev, uint8_t type) 1096 { 1097 1098 switch (type) { 1099 case ASMC_SMS_INTFF: 1100 device_printf(dev, "WARNING: possible free fall!\n"); 1101 break; 1102 case ASMC_SMS_INTHA: 1103 device_printf(dev, "WARNING: high acceleration detected!\n"); 1104 break; 1105 case ASMC_SMS_INTSH: 1106 device_printf(dev, "WARNING: possible shock!\n"); 1107 break; 1108 default: 1109 device_printf(dev, "%s unknown interrupt\n", __func__); 1110 } 1111 } 1112 1113 static void 1114 asmc_sms_task(void *arg, int pending) 1115 { 1116 struct asmc_softc *sc = (struct asmc_softc *)arg; 1117 char notify[16]; 1118 int type; 1119 1120 switch (sc->sc_sms_intrtype) { 1121 case ASMC_SMS_INTFF: 1122 type = 2; 1123 break; 1124 case ASMC_SMS_INTHA: 1125 type = 1; 1126 break; 1127 case ASMC_SMS_INTSH: 1128 type = 0; 1129 break; 1130 default: 1131 type = 255; 1132 } 1133 1134 snprintf(notify, sizeof(notify), " notify=0x%x", type); 1135 devctl_notify("ACPI", "asmc", "SMS", notify); 1136 } 1137 1138 static int 1139 asmc_mb_sysctl_sms_x(SYSCTL_HANDLER_ARGS) 1140 { 1141 device_t dev = (device_t) arg1; 1142 int error; 1143 int16_t val; 1144 int32_t v; 1145 1146 asmc_sms_read(dev, ASMC_KEY_SMS_X, &val); 1147 v = (int32_t) val; 1148 error = sysctl_handle_int(oidp, &v, 0, req); 1149 1150 return (error); 1151 } 1152 1153 static int 1154 asmc_mb_sysctl_sms_y(SYSCTL_HANDLER_ARGS) 1155 { 1156 device_t dev = (device_t) arg1; 1157 int error; 1158 int16_t val; 1159 int32_t v; 1160 1161 asmc_sms_read(dev, ASMC_KEY_SMS_Y, &val); 1162 v = (int32_t) val; 1163 error = sysctl_handle_int(oidp, &v, 0, req); 1164 1165 return (error); 1166 } 1167 1168 static int 1169 asmc_mb_sysctl_sms_z(SYSCTL_HANDLER_ARGS) 1170 { 1171 device_t dev = (device_t) arg1; 1172 int error; 1173 int16_t val; 1174 int32_t v; 1175 1176 asmc_sms_read(dev, ASMC_KEY_SMS_Z, &val); 1177 v = (int32_t) val; 1178 error = sysctl_handle_int(oidp, &v, sizeof(v), req); 1179 1180 return (error); 1181 } 1182 1183 static int 1184 asmc_mbp_sysctl_light_left(SYSCTL_HANDLER_ARGS) 1185 { 1186 device_t dev = (device_t) arg1; 1187 uint8_t buf[6]; 1188 int error; 1189 int32_t v; 1190 1191 asmc_key_read(dev, ASMC_KEY_LIGHTLEFT, buf, 6); 1192 v = buf[2]; 1193 error = sysctl_handle_int(oidp, &v, sizeof(v), req); 1194 1195 return (error); 1196 } 1197 1198 static int 1199 asmc_mbp_sysctl_light_right(SYSCTL_HANDLER_ARGS) 1200 { 1201 device_t dev = (device_t) arg1; 1202 uint8_t buf[6]; 1203 int error; 1204 int32_t v; 1205 1206 asmc_key_read(dev, ASMC_KEY_LIGHTRIGHT, buf, 6); 1207 v = buf[2]; 1208 error = sysctl_handle_int(oidp, &v, sizeof(v), req); 1209 1210 return (error); 1211 } 1212 1213 static int 1214 asmc_mbp_sysctl_light_control(SYSCTL_HANDLER_ARGS) 1215 { 1216 device_t dev = (device_t) arg1; 1217 uint8_t buf[2]; 1218 int error; 1219 unsigned int level; 1220 static int32_t v; 1221 1222 error = sysctl_handle_int(oidp, &v, sizeof(v), req); 1223 if (error == 0 && req->newptr != NULL) { 1224 level = *(unsigned int *)req->newptr; 1225 if (level > 255) 1226 return (EINVAL); 1227 v = level; 1228 buf[0] = level; 1229 buf[1] = 0x00; 1230 asmc_key_write(dev, ASMC_KEY_LIGHTVALUE, buf, 2); 1231 } 1232 1233 return (error); 1234 } 1235