lm87.c revision 1.9
1 /* $NetBSD: lm87.c,v 1.9 2018/06/18 17:07:07 thorpej Exp $ */ 2 /* $OpenBSD: lm87.c,v 1.20 2008/11/10 05:19:48 cnst Exp $ */ 3 4 /* 5 * Copyright (c) 2005 Mark Kettenis 6 * 7 * Permission to use, copy, modify, and distribute this software for any 8 * purpose with or without fee is hereby granted, provided that the above 9 * copyright notice and this permission notice appear in all copies. 10 * 11 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES 12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR 14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 15 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 16 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF 17 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 18 */ 19 20 #include <sys/cdefs.h> 21 __KERNEL_RCSID(0, "$NetBSD: lm87.c,v 1.9 2018/06/18 17:07:07 thorpej Exp $"); 22 23 #include <sys/param.h> 24 #include <sys/systm.h> 25 #include <sys/device.h> 26 #include <dev/sysmon/sysmonvar.h> 27 28 #include <dev/i2c/i2cvar.h> 29 30 /* LM87 registers */ 31 #define LM87_INT_HHIGH_L 0x13 /* Hardware int high limit (lockable) */ 32 #define LM87_EXT_HHIGH_L 0x14 /* Hardware ext high limit (lockable) */ 33 #define LM87_TEST 0x15 34 #define LM87_CHANNEL 0x16 /* Dual purpose pin and scaling */ 35 #define LM87_INT_HHIGH 0x17 /* Hardware int temp high limit */ 36 #define LM87_EXT_HHIGH 0x18 /* Hardware ext temp high limit */ 37 #define LM87_DAC_DATA 0x19 /* DAC output scaling */ 38 #define LM87_AIN1_LOW 0x1a /* Analog in 1 low limit */ 39 #define LM87_AIN2_LOW 0x1b /* Analog in 2 low limit */ 40 #define LM87_2_5V 0x20 /* +2.5V or ext temp 2 reading */ 41 #define LM87_VCCP1 0x21 /* Vccp1 reading */ 42 #define LM87_VCC 0x22 /* +Vcc reading */ 43 #define LM87_5V 0x23 /* +5V reading */ 44 #define LM87_12V 0x24 /* +12V reading */ 45 #define LM87_VCCP2 0x25 /* Vccp2 reading */ 46 #define LM87_EXT_TEMP 0x26 /* External tempurature 1 reading */ 47 #define LM87_INT_TEMP 0x27 /* Internal temperature reading */ 48 #define LM87_FAN1 0x28 /* Fan1 or AIN1 reading */ 49 #define LM87_FAN2 0x29 /* Fan2 or AIN2 reading */ 50 #define LM87_2_5V_HIGH 0x2b /* +2.5V or ext temp 2 high limit */ 51 #define LM87_2_5V_LOW 0x2c /* +2.5V or ext temp 2 low limit */ 52 #define LM87_VCCP1_HIGH 0x2d /* Vccp1 high limit */ 53 #define LM87_VCCP1_LOW 0x2e /* Vccp1 low limit */ 54 #define LM87_VCC_HIGH 0x2f /* +3.3V (Vcc) high limit */ 55 #define LM87_VCC_LOW 0x30 /* +3.3V (Vcc) low limit */ 56 #define LM87_5V_HIGH 0x31 /* +5V high limit */ 57 #define LM87_5V_LOW 0x32 /* +5V low limit */ 58 #define LM87_12V_HIGH 0x33 /* +12V high limit */ 59 #define LM87_12V_LOW 0x34 /* +12V low limit */ 60 #define LM87_VCCP2_HIGH 0x35 /* Vccp2 high limit */ 61 #define LM87_VCCP2_LOW 0x36 /* Vccp2 low limit */ 62 #define LM87_EXT_HIGH 0x37 /* External tempurature 1 high limit */ 63 #define LM87_EXT_LOW 0x38 /* External tempurature low limit */ 64 #define LM87_INT_HIGH 0x39 /* Internal tempurature 1 high limit */ 65 #define LM87_INT_LOW 0x3a /* Internal tempurature low limit */ 66 #define LM87_FAN1_HIGH 0x3b /* Fan 1 count or AIN1 high limit */ 67 #define LM87_FAN2_HIGH 0x3c /* Fan 2 count or AIN2 high limit */ 68 #define LM87_COMPANY_ID 0x3e /* Company ID */ 69 #define LM87_REVISION 0x3f /* Revision */ 70 #define LM87_CONFIG1 0x40 /* Configuration 1 */ 71 #define LM87_INT_STAT1 0x41 /* Interrupt status 1 */ 72 #define LM87_INT_STAT2 0x42 /* Interrupt status 2 */ 73 #define LM87_INT_MASK1 0x43 /* Interrupt mask 1 */ 74 #define LM87_INT_MASK2 0x44 /* Interrupt mask 2 */ 75 #define LM87_CI_CLEAR 0x46 /* Chassis intrusion */ 76 #define LM87_FANDIV 0x47 /* Fan divisor + VID 0-3 */ 77 #define LM87_VID4 0x48 /* VID4 */ 78 #define LM87_CONFIG2 0x4a /* Configuration 2 */ 79 #define LM87_INT_MIRR1 0x4c /* Interrupt status 1 mirror */ 80 #define LM87_INT_MIRR2 0x4d /* Interrupt status 2 mirror */ 81 #define LM87_ALERT 0x80 /* SMB Alert enable */ 82 83 /* Register contents */ 84 #define LM87_CONFIG1_START 0x01 85 #define LM87_CONFIG1_INTCLR 0x08 86 87 #define LM87_CHANNEL_AIN1 0x01 88 #define LM87_CHANNEL_AIN2 0x02 89 #define LM87_CHANNEL_TEMP2 0x04 90 #define LM87_CHANNEL_VCC5 0x08 91 92 struct lmenv_id { 93 u_int8_t id, family; 94 const char *name; 95 }; 96 97 static const struct lmenv_id lmenv_ids[] = { 98 { 0x01, 81, "LM81" }, 99 { 0x02, 87, "LM87" }, /* LM87 or LM87CIMT */ 100 { 0x23, 81, "ADM9240" }, 101 { 0xda, 81, "DSL780" }, 102 { 0x00, 0, NULL } 103 }; 104 105 /* Sensors */ 106 #define LMENV_2_5V 0 107 #define LMENV_VCCP1 1 108 #define LMENV_VCC 2 109 #define LMENV_5V 3 110 #define LMENV_12V 4 111 #define LMENV_VCCP2 5 112 #define LMENV_EXT_TEMP 6 113 #define LMENV_INT_TEMP 7 114 #define LMENV_FAN1 8 115 #define LMENV_FAN2 9 116 #define LMENV_NUM_SENSORS 10 117 118 struct lmenv_softc { 119 i2c_tag_t sc_tag; 120 i2c_addr_t sc_addr; 121 122 int sc_fan1_div, sc_fan2_div; 123 int sc_family; 124 uint8_t sc_channel; 125 126 struct sysmon_envsys *sc_sme; 127 envsys_data_t sc_sensor[LMENV_NUM_SENSORS]; 128 }; 129 130 int lmenv_match(device_t, cfdata_t, void *); 131 void lmenv_attach(device_t, device_t, void *); 132 133 void lmenv_refresh(struct sysmon_envsys *, envsys_data_t *); 134 135 CFATTACH_DECL_NEW(lmenv, sizeof(struct lmenv_softc), 136 lmenv_match, lmenv_attach, NULL, NULL); 137 138 static const char * lmenv_compats[] = { 139 "lm87", 140 "lm87cimt", 141 "adm9240", 142 "lm81", 143 "ds1780", 144 NULL 145 }; 146 147 static const struct device_compatible_entry lmenv_compat_data[] = { 148 DEVICE_COMPAT_ENTRY(lmenv_compats), 149 DEVICE_COMPAT_TERMINATOR, 150 }; 151 152 int 153 lmenv_match(device_t parent, cfdata_t match, void *aux) 154 { 155 struct i2c_attach_args *ia = aux; 156 u_int8_t cmd, val; 157 int error, i, match_result; 158 159 if (iic_use_direct_match(ia, match, lmenv_compat_data, &match_result)) 160 return match_result; 161 162 /* 163 * Indirect config - not much we can do! 164 * Check typical addresses and read the Company ID register 165 */ 166 if ((ia->ia_addr < 0x2c) || (ia->ia_addr > 0x2f)) 167 return 0; 168 169 cmd = LM87_COMPANY_ID; 170 iic_acquire_bus(ia->ia_tag, 0); 171 error = iic_exec(ia->ia_tag, I2C_OP_READ_WITH_STOP, ia->ia_addr, 172 &cmd, 1, &val, 1, I2C_F_POLL); 173 iic_release_bus(ia->ia_tag, 0); 174 175 if (error) 176 return 0; 177 178 for (i = 0; lmenv_ids[i].id != 0; i++) 179 if (lmenv_ids[i].id == val) 180 return I2C_MATCH_ADDRESS_AND_PROBE; 181 182 return 0; 183 } 184 185 void 186 lmenv_attach(device_t parent, device_t self, void *aux) 187 { 188 struct lmenv_softc *sc = device_private(self); 189 struct i2c_attach_args *ia = aux; 190 u_int8_t cmd, data, data2; 191 int i; 192 193 sc->sc_tag = ia->ia_tag; 194 sc->sc_addr = ia->ia_addr; 195 196 iic_acquire_bus(sc->sc_tag, 0); 197 198 cmd = LM87_COMPANY_ID; 199 if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, 200 sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) { 201 iic_release_bus(sc->sc_tag, 0); 202 printf(": cannot read ID register\n"); 203 return; 204 } 205 for (i = 0; lmenv_ids[i].id != 0; i++) 206 if (lmenv_ids[i].id == data) 207 break; 208 209 cmd = LM87_REVISION; 210 if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, 211 sc->sc_addr, &cmd, sizeof cmd, &data2, sizeof data, 0)) { 212 iic_release_bus(sc->sc_tag, 0); 213 printf(": cannot read revision register\n"); 214 return; 215 } 216 printf(": %s rev %x\n", lmenv_ids[i].name, data2); 217 sc->sc_family = lmenv_ids[i].family; 218 219 cmd = LM87_FANDIV; 220 if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, 221 sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) { 222 iic_release_bus(sc->sc_tag, 0); 223 printf(", cannot read Fan Divisor register\n"); 224 return; 225 } 226 sc->sc_fan1_div = 1 << ((data >> 4) & 0x03); 227 sc->sc_fan2_div = 1 << ((data >> 6) & 0x03); 228 229 if (sc->sc_family == 87) { 230 cmd = LM87_CHANNEL; 231 if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, 232 sc->sc_addr, &cmd, sizeof cmd, &sc->sc_channel, 233 sizeof sc->sc_channel, 0)) { 234 iic_release_bus(sc->sc_tag, 0); 235 printf(", cannot read Channel register\n"); 236 return; 237 } 238 } else 239 sc->sc_channel = 0; 240 241 cmd = LM87_CONFIG1; 242 if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, 243 sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) { 244 iic_release_bus(sc->sc_tag, 0); 245 printf(", cannot read Configuration Register 1\n"); 246 return; 247 } 248 249 /* 250 * if chip is not running, try to start it. 251 * if it is stalled doing an interrupt, unstall it 252 */ 253 data2 = (data | LM87_CONFIG1_START); 254 data2 = data2 & ~LM87_CONFIG1_INTCLR; 255 256 if (data != data2) { 257 if (iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP, 258 sc->sc_addr, &cmd, sizeof cmd, &data2, sizeof data2, 0)) { 259 iic_release_bus(sc->sc_tag, 0); 260 printf(", cannot write Configuration Register 1\n"); 261 return; 262 } 263 } 264 iic_release_bus(sc->sc_tag, 0); 265 266 /* Initialize sensor data. */ 267 sc->sc_sensor[LMENV_2_5V].state = ENVSYS_SINVALID; 268 if (sc->sc_channel & LM87_CHANNEL_TEMP2) { 269 sc->sc_sensor[LMENV_INT_TEMP].units = ENVSYS_STEMP; 270 strlcpy(sc->sc_sensor[LMENV_2_5V].desc, "External 2", 271 sizeof(sc->sc_sensor[LMENV_2_5V].desc)); 272 } else { 273 sc->sc_sensor[LMENV_2_5V].units = ENVSYS_SVOLTS_DC; 274 strlcpy(sc->sc_sensor[LMENV_2_5V].desc, "+2.5Vin", 275 sizeof(sc->sc_sensor[LMENV_2_5V].desc)); 276 } 277 278 sc->sc_sensor[LMENV_VCCP1].state = ENVSYS_SINVALID; 279 sc->sc_sensor[LMENV_VCCP1].units = ENVSYS_SVOLTS_DC; 280 strlcpy(sc->sc_sensor[LMENV_VCCP1].desc, "Vccp1", 281 sizeof(sc->sc_sensor[LMENV_VCCP1].desc)); 282 283 sc->sc_sensor[LMENV_VCC].state = ENVSYS_SINVALID; 284 sc->sc_sensor[LMENV_VCC].units = ENVSYS_SVOLTS_DC; 285 strlcpy(sc->sc_sensor[LMENV_VCC].desc, "+Vcc", 286 sizeof(sc->sc_sensor[LMENV_VCC].desc)); 287 288 sc->sc_sensor[LMENV_5V].state = ENVSYS_SINVALID; 289 sc->sc_sensor[LMENV_5V].units = ENVSYS_SVOLTS_DC; 290 strlcpy(sc->sc_sensor[LMENV_5V].desc, "+5Vin/Vcc", 291 sizeof(sc->sc_sensor[LMENV_5V].desc)); 292 293 sc->sc_sensor[LMENV_12V].state = ENVSYS_SINVALID; 294 sc->sc_sensor[LMENV_12V].units = ENVSYS_SVOLTS_DC; 295 strlcpy(sc->sc_sensor[LMENV_12V].desc, "+12Vin", 296 sizeof(sc->sc_sensor[LMENV_12V].desc)); 297 298 sc->sc_sensor[LMENV_VCCP2].state = ENVSYS_SINVALID; 299 if (!(sc->sc_channel & LM87_CHANNEL_TEMP2)) { 300 sc->sc_sensor[LMENV_VCCP2].units = ENVSYS_SVOLTS_DC; 301 strlcpy(sc->sc_sensor[LMENV_VCCP2].desc, "Vccp2", 302 sizeof(sc->sc_sensor[LMENV_VCCP2].desc)); 303 } 304 305 sc->sc_sensor[LMENV_EXT_TEMP].state = ENVSYS_SINVALID; 306 sc->sc_sensor[LMENV_EXT_TEMP].units = ENVSYS_STEMP; 307 if (sc->sc_channel & LM87_CHANNEL_TEMP2) 308 strlcpy(sc->sc_sensor[LMENV_EXT_TEMP].desc, "External 1", 309 sizeof(sc->sc_sensor[LMENV_EXT_TEMP].desc)); 310 else 311 strlcpy(sc->sc_sensor[LMENV_EXT_TEMP].desc, "External", 312 sizeof(sc->sc_sensor[LMENV_EXT_TEMP].desc)); 313 314 sc->sc_sensor[LMENV_INT_TEMP].state = ENVSYS_SINVALID; 315 sc->sc_sensor[LMENV_INT_TEMP].units = ENVSYS_STEMP; 316 strlcpy(sc->sc_sensor[LMENV_INT_TEMP].desc, "Internal", 317 sizeof(sc->sc_sensor[LMENV_INT_TEMP].desc)); 318 319 sc->sc_sensor[LMENV_FAN1].state = ENVSYS_SINVALID; 320 if (sc->sc_channel & LM87_CHANNEL_AIN1) { 321 sc->sc_sensor[LMENV_FAN1].units = ENVSYS_SVOLTS_DC; 322 strlcpy(sc->sc_sensor[LMENV_FAN1].desc, "AIN1", 323 sizeof(sc->sc_sensor[LMENV_FAN1].desc)); 324 } else { 325 sc->sc_sensor[LMENV_FAN1].units = ENVSYS_SFANRPM; 326 strlcpy(sc->sc_sensor[LMENV_FAN1].desc, "FAN1", 327 sizeof(sc->sc_sensor[LMENV_FAN1].desc)); 328 } 329 330 sc->sc_sensor[LMENV_FAN2].state = ENVSYS_SINVALID; 331 if (sc->sc_channel & LM87_CHANNEL_AIN2) { 332 sc->sc_sensor[LMENV_FAN2].units = ENVSYS_SVOLTS_DC; 333 strlcpy(sc->sc_sensor[LMENV_FAN2].desc, "AIN2", 334 sizeof(sc->sc_sensor[LMENV_FAN2].desc)); 335 } else { 336 sc->sc_sensor[LMENV_FAN2].units = ENVSYS_SFANRPM; 337 strlcpy(sc->sc_sensor[LMENV_FAN2].desc, "FAN2", 338 sizeof(sc->sc_sensor[LMENV_FAN2].desc)); 339 } 340 341 sc->sc_sme = sysmon_envsys_create(); 342 for (i = 0; i < LMENV_NUM_SENSORS; i++) 343 if (sysmon_envsys_sensor_attach(sc->sc_sme, 344 &sc->sc_sensor[i])) { 345 sysmon_envsys_destroy(sc->sc_sme); 346 aprint_error_dev(self, 347 "unable to attach sensor %d at sysmon\n", i); 348 return; 349 } 350 sc->sc_sme->sme_name = device_xname(self); 351 sc->sc_sme->sme_cookie = sc; 352 sc->sc_sme->sme_refresh = lmenv_refresh; 353 if (sysmon_envsys_register(sc->sc_sme)) { 354 aprint_error_dev(self, 355 "unable to register with sysmon\n"); 356 sysmon_envsys_destroy(sc->sc_sme); 357 return; 358 } 359 } 360 361 void 362 lmenv_refresh(struct sysmon_envsys *sme, envsys_data_t *edata) 363 { 364 struct lmenv_softc *sc = sme->sme_cookie; 365 u_int8_t cmd, data; 366 u_int tmp; 367 368 iic_acquire_bus(sc->sc_tag, 0); 369 370 cmd = LM87_2_5V + edata->sensor; 371 if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, 372 sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) { 373 edata->state = ENVSYS_SINVALID; 374 return; 375 } 376 377 switch (edata->sensor) { 378 case LMENV_2_5V: 379 /* Might be external temperature 2 */ 380 if (sc->sc_channel & LM87_CHANNEL_TEMP2) { 381 if (data == 0x80) 382 edata->state = ENVSYS_SINVALID; 383 else { 384 edata->value_cur = 385 (int8_t)data * 1000000 + 273150000; 386 edata->state = ENVSYS_SVALID; 387 } 388 break; 389 } 390 edata->value_cur = 2500000 * data / 192; 391 edata->state = ENVSYS_SVALID; 392 break; 393 case LMENV_5V: 394 edata->value_cur = 5000000 * data / 192; 395 edata->state = ENVSYS_SVALID; 396 break; 397 case LMENV_12V: 398 edata->value_cur = 12000000 * data / 192; 399 edata->state = ENVSYS_SVALID; 400 break; 401 case LMENV_VCCP1: 402 edata->value_cur = 2700000 * data / 192; 403 edata->state = ENVSYS_SVALID; 404 break; 405 case LMENV_VCCP2: 406 /* If monitoring external temperature 2, this isn't monitored */ 407 if (sc->sc_channel & LM87_CHANNEL_TEMP2) { 408 edata->state = ENVSYS_SINVALID; 409 break; 410 } 411 edata->value_cur = 2700000 * data / 192; 412 edata->state = ENVSYS_SVALID; 413 break; 414 case LMENV_VCC: 415 /* Voltage scale selectable (5V or 3.3V) */ 416 edata->value_cur = 417 (LM87_CHANNEL_VCC5 ? 5000000 : 3300000) * data / 192; 418 edata->state = ENVSYS_SVALID; 419 break; 420 case LMENV_EXT_TEMP: 421 if (sc->sc_family == 81) { 422 edata->state = ENVSYS_SINVALID; 423 break; /* missing on LM81 */ 424 } 425 /* FALLTHROUGH */ 426 case LMENV_INT_TEMP: 427 if (data == 0x80) 428 edata->state = ENVSYS_SINVALID; 429 else { 430 edata->value_cur = (int8_t)data * 1000000 + 273150000; 431 edata->state = ENVSYS_SVALID; 432 } 433 break; 434 case LMENV_FAN1: 435 /* Might be analogue input 1 */ 436 if (sc->sc_channel & LM87_CHANNEL_AIN1) { 437 edata->value_cur = 1870000 * data / 192; 438 edata->state = ENVSYS_SVALID; 439 break; 440 } 441 if (data == 0xff) { 442 edata->state = ENVSYS_SINVALID; 443 break; 444 } 445 tmp = data * sc->sc_fan1_div; 446 if (tmp == 0) 447 edata->state = ENVSYS_SINVALID; 448 else { 449 edata->value_cur = 1350000 / tmp; 450 edata->state = ENVSYS_SVALID; 451 } 452 break; 453 case LMENV_FAN2: 454 /* Might be analogue input 2 */ 455 if (sc->sc_channel & LM87_CHANNEL_AIN2) { 456 edata->value_cur = 1870000 * data / 192; 457 edata->state = ENVSYS_SVALID; 458 break; 459 } 460 if (data == 0xff) { 461 edata->state = ENVSYS_SINVALID; 462 break; 463 } 464 tmp = data * sc->sc_fan2_div; 465 if (tmp == 0) 466 edata->state = ENVSYS_SINVALID; 467 else { 468 edata->value_cur = 1350000 / tmp; 469 edata->state = ENVSYS_SVALID; 470 } 471 break; 472 default: 473 edata->state = ENVSYS_SINVALID; 474 break; 475 } 476 477 iic_release_bus(sc->sc_tag, 0); 478 } 479
Indexes created Thu Oct 02 14:10:14 GMT 2025