1 /* $NetBSD: uthum.c,v 1.6 2010/11/03 22:34:24 dyoung Exp $ */ 2 /* $OpenBSD: uthum.c,v 1.6 2010/01/03 18:43:02 deraadt Exp $ */ 3 4 /* 5 * Copyright (c) 2009 Yojiro UO <yuo@nui.org> 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 DISCAIMS 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 /* Driver for TEMPer and TEMPerHUM HID */ 21 22 #include <sys/param.h> 23 #include <sys/proc.h> 24 #include <sys/systm.h> 25 #include <sys/kernel.h> 26 #include <sys/malloc.h> 27 #include <sys/device.h> 28 #include <sys/conf.h> 29 30 #include <dev/sysmon/sysmonvar.h> 31 32 #include <dev/usb/usb.h> 33 #include <dev/usb/usbhid.h> 34 #include <dev/usb/usbdi.h> 35 #include <dev/usb/usbdi_util.h> 36 #include <dev/usb/usbdevs.h> 37 #include <dev/usb/uhidev.h> 38 #include <dev/usb/hid.h> 39 40 #ifdef USB_DEBUG 41 #define UTHUM_DEBUG 42 #endif 43 44 #ifdef UTHUM_DEBUG 45 int uthumdebug = 0; 46 #define DPRINTFN(n, x) do { if (uthumdebug > (n)) printf x; } while (0) 47 #else 48 #define DPRINTFN(n, x) 49 #endif 50 51 #define DPRINTF(x) DPRINTFN(0, x) 52 53 54 /* TEMPerHUM */ 55 #define CMD_DEVTYPE 0x52 /* XXX */ 56 #define CMD_GETDATA 0x48 /* XXX */ 57 #define CMD_GETTEMP 0x54 /* XXX */ 58 static uint8_t cmd_start[8] = 59 { 0x0a, 0x0b, 0x0c, 0x0d, 0x00, 0x00, 0x02, 0x00 }; 60 static uint8_t cmd_end[8] = 61 { 0x0a, 0x0b, 0x0c, 0x0d, 0x00, 0x00, 0x01, 0x00 }; 62 63 /* sensors */ 64 #define UTHUM_TEMP 0 65 #define UTHUM_HUMIDITY 1 66 #define UTHUM_MAX_SENSORS 2 67 68 #define UTHUM_TYPE_UNKNOWN 0 69 #define UTHUM_TYPE_SHT1x 1 70 #define UTHUM_TYPE_TEMPER 2 71 72 struct uthum_softc { 73 struct uhidev sc_hdev; 74 usbd_device_handle sc_udev; 75 u_char sc_dying; 76 uint16_t sc_flag; 77 int sc_sensortype; 78 79 /* uhidev parameters */ 80 size_t sc_flen; /* feature report length */ 81 size_t sc_ilen; /* input report length */ 82 size_t sc_olen; /* output report length */ 83 84 /* sensor framework */ 85 struct sysmon_envsys *sc_sme; 86 envsys_data_t sc_sensor[UTHUM_MAX_SENSORS]; 87 88 uint8_t sc_num_sensors; 89 }; 90 91 92 const struct usb_devno uthum_devs[] = { 93 /* XXX: various TEMPer variants using same VID/PID */ 94 { USB_VENDOR_TENX, USB_PRODUCT_TENX_TEMPER}, 95 }; 96 #define uthum_lookup(v, p) usb_lookup(uthum_devs, v, p) 97 98 int uthum_match(device_t, cfdata_t, void *); 99 void uthum_attach(device_t, device_t, void *); 100 void uthum_childdet(device_t, device_t); 101 int uthum_detach(device_t, int); 102 int uthum_activate(device_t, enum devact); 103 104 int uthum_read_data(struct uthum_softc *, uint8_t, uint8_t *, size_t, int); 105 int uthum_check_sensortype(struct uthum_softc *); 106 int uthum_temper_temp(uint8_t, uint8_t); 107 int uthum_sht1x_temp(uint8_t, uint8_t); 108 int uthum_sht1x_rh(unsigned int, int); 109 110 void uthum_intr(struct uhidev *, void *, u_int); 111 static void uthum_refresh(struct sysmon_envsys *, envsys_data_t *); 112 113 extern struct cfdriver uthum_cd; 114 CFATTACH_DECL_NEW(uthum, sizeof(struct uthum_softc), uthum_match, uthum_attach, 115 uthum_detach, uthum_activate); 116 117 int 118 uthum_match(device_t parent, cfdata_t match, void *aux) 119 { 120 struct usb_attach_arg *uaa = aux; 121 struct uhidev_attach_arg *uha = (struct uhidev_attach_arg *)uaa; 122 123 return (uthum_lookup(uha->uaa->vendor, uha->uaa->product) != NULL ? 124 UMATCH_VENDOR_PRODUCT : UMATCH_NONE); 125 } 126 127 void 128 uthum_attach(device_t parent, device_t self, void *aux) 129 { 130 struct uthum_softc *sc = device_private(self); 131 struct usb_attach_arg *uaa = aux; 132 struct uhidev_attach_arg *uha = (struct uhidev_attach_arg *)uaa; 133 usbd_device_handle dev = uha->parent->sc_udev; 134 int size, repid; 135 void *desc; 136 137 sc->sc_udev = dev; 138 sc->sc_hdev.sc_dev = self; 139 sc->sc_hdev.sc_intr = uthum_intr; 140 sc->sc_hdev.sc_parent = uha->parent; 141 sc->sc_hdev.sc_report_id = uha->reportid; 142 sc->sc_num_sensors = 0; 143 144 aprint_normal("\n"); 145 aprint_naive("\n"); 146 147 uhidev_get_report_desc(uha->parent, &desc, &size); 148 repid = uha->reportid; 149 sc->sc_ilen = hid_report_size(desc, size, hid_input, repid); 150 sc->sc_olen = hid_report_size(desc, size, hid_output, repid); 151 sc->sc_flen = hid_report_size(desc, size, hid_feature, repid); 152 153 usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev, 154 sc->sc_hdev.sc_dev); 155 156 if (sc->sc_flen < 32) { 157 /* not sensor interface, just attach */ 158 return; 159 } 160 161 sc->sc_sensortype = uthum_check_sensortype(sc); 162 163 /* attach sensor */ 164 sc->sc_sme = sysmon_envsys_create(); 165 sc->sc_sme->sme_name = device_xname(self); 166 167 switch (sc->sc_sensortype) { 168 case UTHUM_TYPE_SHT1x: 169 (void)strlcpy(sc->sc_sensor[UTHUM_TEMP].desc, "temp", 170 sizeof(sc->sc_sensor[UTHUM_TEMP].desc)); 171 sc->sc_sensor[UTHUM_TEMP].units = ENVSYS_STEMP; 172 sc->sc_sensor[UTHUM_TEMP].state = ENVSYS_SINVALID; 173 174 (void)strlcpy(sc->sc_sensor[UTHUM_HUMIDITY].desc, 175 "relative humidity", 176 sizeof(sc->sc_sensor[UTHUM_HUMIDITY].desc)); 177 sc->sc_sensor[UTHUM_HUMIDITY].units = ENVSYS_INTEGER; 178 sc->sc_sensor[UTHUM_HUMIDITY].value_cur = 0; 179 sc->sc_sensor[UTHUM_HUMIDITY].state = ENVSYS_SINVALID; 180 181 sysmon_envsys_sensor_attach(sc->sc_sme, &sc->sc_sensor[UTHUM_TEMP]); 182 sysmon_envsys_sensor_attach(sc->sc_sme, &sc->sc_sensor[UTHUM_HUMIDITY]); 183 sc->sc_num_sensors = 2; 184 DPRINTF(("sensor type: SHT1x\n")); 185 break; 186 case UTHUM_TYPE_TEMPER: 187 (void)strlcpy(sc->sc_sensor[UTHUM_TEMP].desc, "temp", 188 sizeof(sc->sc_sensor[UTHUM_TEMP].desc)); 189 sc->sc_sensor[UTHUM_TEMP].units = ENVSYS_STEMP; 190 sc->sc_sensor[UTHUM_TEMP].state = ENVSYS_SINVALID; 191 192 sysmon_envsys_sensor_attach(sc->sc_sme, &sc->sc_sensor[UTHUM_TEMP]); 193 sc->sc_num_sensors = 1; 194 DPRINTF(("sensor type: TEMPer\n")); 195 break; 196 case UTHUM_TYPE_UNKNOWN: 197 DPRINTF(("sensor type: unknown, give up to attach sensors\n")); 198 default: 199 break; 200 } 201 202 if (sc->sc_num_sensors > 0) { 203 sc->sc_sme->sme_cookie = sc; 204 sc->sc_sme->sme_refresh = uthum_refresh; 205 206 if (sysmon_envsys_register(sc->sc_sme)) { 207 aprint_error_dev(self, "unable to register with sysmon\n"); 208 sysmon_envsys_destroy(sc->sc_sme); 209 } 210 } else { 211 sysmon_envsys_destroy(sc->sc_sme); 212 } 213 214 DPRINTF(("uthum_attach: complete\n")); 215 } 216 217 int 218 uthum_detach(device_t self, int flags) 219 { 220 struct uthum_softc *sc = device_private(self); 221 int rv = 0; 222 223 sc->sc_dying = 1; 224 225 if (sc->sc_num_sensors > 0) { 226 sysmon_envsys_unregister(sc->sc_sme); 227 } 228 229 usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev, 230 sc->sc_hdev.sc_dev); 231 232 return (rv); 233 } 234 235 int 236 uthum_activate(device_t self, enum devact act) 237 { 238 struct uthum_softc *sc = device_private(self); 239 240 switch (act) { 241 case DVACT_DEACTIVATE: 242 sc->sc_dying = 1; 243 break; 244 } 245 return (0); 246 } 247 248 void 249 uthum_intr(struct uhidev *addr, void *ibuf, u_int len) 250 { 251 /* do nothing */ 252 } 253 254 int 255 uthum_read_data(struct uthum_softc *sc, uint8_t target_cmd, uint8_t *buf, 256 size_t len, int need_delay) 257 { 258 int i; 259 uint8_t cmdbuf[32], report[256]; 260 261 /* if return buffer is null, do nothing */ 262 if ((buf == NULL) || len == 0) 263 return 0; 264 265 /* issue query */ 266 bzero(cmdbuf, sizeof(cmdbuf)); 267 memcpy(cmdbuf, cmd_start, sizeof(cmd_start)); 268 if (uhidev_set_report(&sc->sc_hdev, UHID_OUTPUT_REPORT, 269 cmdbuf, sc->sc_olen)) 270 return EIO; 271 272 bzero(cmdbuf, sizeof(cmdbuf)); 273 cmdbuf[0] = target_cmd; 274 if (uhidev_set_report(&sc->sc_hdev, UHID_OUTPUT_REPORT, 275 cmdbuf, sc->sc_olen)) 276 return EIO; 277 278 bzero(cmdbuf, sizeof(cmdbuf)); 279 for (i = 0; i < 7; i++) { 280 if (uhidev_set_report(&sc->sc_hdev, UHID_OUTPUT_REPORT, 281 cmdbuf, sc->sc_olen)) 282 return EIO; 283 } 284 memcpy(cmdbuf, cmd_end, sizeof(cmd_end)); 285 if (uhidev_set_report(&sc->sc_hdev, UHID_OUTPUT_REPORT, 286 cmdbuf, sc->sc_olen)) 287 return EIO; 288 289 /* wait if required */ 290 if (need_delay > 1) 291 tsleep(&sc->sc_sme, 0, "uthum", (need_delay*hz+999)/1000 + 1); 292 293 /* get answer */ 294 if (uhidev_get_report(&sc->sc_hdev, UHID_FEATURE_REPORT, 295 report, sc->sc_flen)) 296 return EIO; 297 memcpy(buf, report, len); 298 return 0; 299 } 300 301 int 302 uthum_check_sensortype(struct uthum_softc *sc) 303 { 304 uint8_t buf[8]; 305 static uint8_t sht1x_sig0[] = 306 { 0x57, 0x5a, 0x13, 0x00, 0x14, 0x00, 0x53, 0x00 }; 307 static uint8_t sht1x_sig1[] = 308 { 0x57, 0x5a, 0x14, 0x00, 0x14, 0x00, 0x53, 0x00 }; 309 static uint8_t temper_sig[] = 310 { 0x57, 0x58, 0x14, 0x00, 0x14, 0x00, 0x53, 0x00 }; 311 312 if (uthum_read_data(sc, CMD_DEVTYPE, buf, sizeof(buf), 0) != 0) { 313 DPRINTF(("uthum: read fail\n")); 314 return UTHUM_TYPE_UNKNOWN; 315 } 316 317 /* 318 * currently we have not enough information about the return value, 319 * therefore, compare full bytes. 320 * TEMPerHUM HID (SHT1x version) will return: 321 * { 0x57, 0x5a, 0x13, 0x00, 0x14, 0x00, 0x53, 0x00 } 322 * { 0x57, 0x5a, 0x14, 0x00, 0x14, 0x00, 0x53, 0x00 } 323 * TEMPer HID (TEMPer version) will return: 324 * { 0x57, 0x58, 0x14, 0x00, 0x14, 0x00, 0x53, 0x00 } 325 */ 326 DPRINTF(("uthum: device signature: " 327 "0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x\n", 328 buf[0], buf[1], buf[2], buf[3], buf[4], buf[5], buf[6], buf[7])); 329 if (0 == memcmp(buf, sht1x_sig0, sizeof(sht1x_sig0))) 330 return UTHUM_TYPE_SHT1x; 331 if (0 == memcmp(buf, sht1x_sig1, sizeof(sht1x_sig1))) 332 return UTHUM_TYPE_SHT1x; 333 if (0 == memcmp(buf, temper_sig, sizeof(temper_sig))) 334 return UTHUM_TYPE_TEMPER; 335 336 return UTHUM_TYPE_UNKNOWN; 337 } 338 339 340 static void 341 uthum_refresh(struct sysmon_envsys *sme, envsys_data_t *edata) 342 { 343 struct uthum_softc *sc = sme->sme_cookie; 344 uint8_t buf[8]; 345 unsigned int humidity_tick; 346 int temp, rh; 347 348 switch (sc->sc_sensortype) { 349 case UTHUM_TYPE_SHT1x: 350 if (uthum_read_data(sc, CMD_GETDATA, buf, sizeof(buf), 1000) != 0) { 351 DPRINTF(("uthum: data read fail\n")); 352 sc->sc_sensor[UTHUM_TEMP].state = ENVSYS_SINVALID; 353 sc->sc_sensor[UTHUM_HUMIDITY].state = ENVSYS_SINVALID; 354 return; 355 } 356 DPRINTF(("%s: read SHT1x data " 357 "0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x\n", 358 sc->sc_sme->sme_name, buf[0], buf[1], buf[2], buf[3], 359 buf[4], buf[5], buf[6], buf[7])); 360 361 humidity_tick = (buf[2] * 256 + buf[3]) & 0x0fff; 362 363 temp = uthum_sht1x_temp(buf[0], buf[1]); 364 rh = uthum_sht1x_rh(humidity_tick, temp); 365 366 sc->sc_sensor[UTHUM_HUMIDITY].value_cur = rh / 1000; 367 sc->sc_sensor[UTHUM_HUMIDITY].state = ENVSYS_SVALID; 368 break; 369 case UTHUM_TYPE_TEMPER: 370 if (uthum_read_data(sc, CMD_GETTEMP, buf, sizeof(buf), 0) != 0) { 371 DPRINTF(("uthum: data read fail\n")); 372 sc->sc_sensor[UTHUM_TEMP].state = ENVSYS_SINVALID; 373 return; 374 } 375 DPRINTF(("%s: read TEMPER data " 376 "0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x 0x%0x\n", 377 sc->sc_sme->sme_name, buf[0], buf[1], buf[2], buf[3], 378 buf[4], buf[5], buf[6], buf[7])); 379 temp = uthum_temper_temp(buf[0], buf[1]); 380 break; 381 default: 382 /* do nothing */ 383 return; 384 } 385 386 sc->sc_sensor[UTHUM_TEMP].value_cur = (temp * 10000) + 273150000; 387 sc->sc_sensor[UTHUM_TEMP].state = ENVSYS_SVALID; 388 } 389 390 /* return C-degree * 100 value */ 391 int 392 uthum_temper_temp(uint8_t msb, uint8_t lsb) 393 { 394 int val; 395 396 val = (msb << 8) | lsb; 397 if (val >= 32768) { 398 val = val - 65536; 399 } 400 val = (val * 100) >> 8; 401 return val; 402 } 403 404 /* return C-degree * 100 value */ 405 int 406 uthum_sht1x_temp(uint8_t msb, uint8_t lsb) 407 { 408 int val; 409 410 val = ((msb << 8) + lsb) - 4096; 411 return val; 412 } 413 414 /* return %RH * 1000 */ 415 int 416 uthum_sht1x_rh(unsigned int ticks, int temp) 417 { 418 int rh_l, rh; 419 420 rh_l = (-40000 + 405 * ticks) - ((7 * ticks * ticks) / 250); 421 rh = ((temp - 2500) * (1 + (ticks >> 7)) + rh_l) / 10; 422 return rh; 423 } 424