Home | History | Annotate | Line # | Download | only in onewire
owtemp.c revision 1.19
      1 /*	$NetBSD: owtemp.c,v 1.19 2019/11/30 23:06:52 ad Exp $	*/
      2 /*	$OpenBSD: owtemp.c,v 1.1 2006/03/04 16:27:03 grange Exp $	*/
      3 
      4 /*-
      5  * Copyright (c) 2019 The NetBSD Foundation, Inc.
      6  * All rights reserved.
      7  *
      8  * This code is derived from software contributed to The NetBSD Foundation
      9  * by Andrew Doran.
     10  *
     11  * Redistribution and use in source and binary forms, with or without
     12  * modification, are permitted provided that the following conditions
     13  * are met:
     14  * 1. Redistributions of source code must retain the above copyright
     15  *    notice, this list of conditions and the following disclaimer.
     16  * 2. Redistributions in binary form must reproduce the above copyright
     17  *    notice, this list of conditions and the following disclaimer in the
     18  *    documentation and/or other materials provided with the distribution.
     19  *
     20  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     22  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     23  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     30  * POSSIBILITY OF SUCH DAMAGE.
     31  */
     32 
     33 /*
     34  * Copyright (c) 2006 Alexander Yurchenko <grange (at) openbsd.org>
     35  *
     36  * Permission to use, copy, modify, and distribute this software for any
     37  * purpose with or without fee is hereby granted, provided that the above
     38  * copyright notice and this permission notice appear in all copies.
     39  *
     40  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
     41  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
     42  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
     43  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
     44  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
     45  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
     46  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
     47  */
     48 
     49 /*
     50  * 1-Wire temperature family type device driver.
     51  */
     52 
     53 #include <sys/cdefs.h>
     54 __KERNEL_RCSID(0, "$NetBSD: owtemp.c,v 1.19 2019/11/30 23:06:52 ad Exp $");
     55 
     56 #include <sys/param.h>
     57 #include <sys/systm.h>
     58 #include <sys/device.h>
     59 #include <sys/kernel.h>
     60 #include <sys/proc.h>
     61 
     62 #include <dev/sysmon/sysmonvar.h>
     63 
     64 #include <dev/onewire/onewiredevs.h>
     65 #include <dev/onewire/onewirereg.h>
     66 #include <dev/onewire/onewirevar.h>
     67 
     68 #define DS_CMD_CONVERT		0x44
     69 #define DS_CMD_READ_SCRATCHPAD	0xbe
     70 
     71 struct owtemp_softc {
     72 	device_t			sc_dv;
     73 	void				*sc_onewire;
     74 	u_int64_t			sc_rom;
     75 	const char			*sc_chipname;
     76 
     77 	envsys_data_t			sc_sensor;
     78 	struct sysmon_envsys		*sc_sme;
     79 
     80 	uint32_t			(*sc_owtemp_decode)(const uint8_t *);
     81 
     82 	int				sc_dying;
     83 
     84 	struct evcnt			sc_ev_update;
     85 	struct evcnt			sc_ev_rsterr;
     86 	struct evcnt			sc_ev_crcerr;
     87 };
     88 
     89 static int	owtemp_match(device_t, cfdata_t, void *);
     90 static void	owtemp_attach(device_t, device_t, void *);
     91 static int	owtemp_detach(device_t, int);
     92 static int	owtemp_activate(device_t, enum devact);
     93 static bool	owtemp_update(struct owtemp_softc *sc, uint32_t *temp);
     94 static void	owtemp_refresh(struct sysmon_envsys *, envsys_data_t *);
     95 static uint32_t	owtemp_decode_ds18b20(const uint8_t *);
     96 static uint32_t	owtemp_decode_ds1920(const uint8_t *);
     97 
     98 CFATTACH_DECL_NEW(owtemp, sizeof(struct owtemp_softc),
     99 	owtemp_match, owtemp_attach, owtemp_detach, owtemp_activate);
    100 
    101 extern struct cfdriver owtemp_cd;
    102 
    103 static const struct onewire_matchfam owtemp_fams[] = {
    104 	{ ONEWIRE_FAMILY_DS1920 }, /* also DS1820 */
    105 	{ ONEWIRE_FAMILY_DS18B20 },
    106 	{ ONEWIRE_FAMILY_DS1822 },
    107 };
    108 
    109 int	owtemp_retries = 3;
    110 
    111 static int
    112 owtemp_match(device_t parent, cfdata_t match, void *aux)
    113 {
    114 	return (onewire_matchbyfam(aux, owtemp_fams,
    115 	    __arraycount(owtemp_fams)));
    116 }
    117 
    118 static void
    119 owtemp_attach(device_t parent, device_t self, void *aux)
    120 {
    121 	struct owtemp_softc *sc = device_private(self);
    122 	struct onewire_attach_args *oa = aux;
    123 
    124 	aprint_naive("\n");
    125 
    126 	sc->sc_dv = self;
    127 	sc->sc_onewire = oa->oa_onewire;
    128 	sc->sc_rom = oa->oa_rom;
    129 
    130 	switch(ONEWIRE_ROM_FAMILY_TYPE(sc->sc_rom)) {
    131 	case ONEWIRE_FAMILY_DS18B20:
    132 		sc->sc_chipname = "DS18B20";
    133 		sc->sc_owtemp_decode = owtemp_decode_ds18b20;
    134 		break;
    135 	case ONEWIRE_FAMILY_DS1822:
    136 		sc->sc_chipname = "DS1822";
    137 		sc->sc_owtemp_decode = owtemp_decode_ds18b20;
    138 		break;
    139 	case ONEWIRE_FAMILY_DS1920:
    140 		sc->sc_chipname = "DS1920";
    141 		sc->sc_owtemp_decode = owtemp_decode_ds1920;
    142 		break;
    143 	}
    144 
    145 	evcnt_attach_dynamic(&sc->sc_ev_update, EVCNT_TYPE_MISC, NULL,
    146 	   device_xname(self), "update");
    147 	evcnt_attach_dynamic(&sc->sc_ev_rsterr, EVCNT_TYPE_MISC, NULL,
    148 	   device_xname(self), "reset error");
    149 	evcnt_attach_dynamic(&sc->sc_ev_crcerr, EVCNT_TYPE_MISC, NULL,
    150 	   device_xname(self), "crc error");
    151 
    152 	sc->sc_sme = sysmon_envsys_create();
    153 
    154 	/* Initialize sensor */
    155 	sc->sc_sensor.units = ENVSYS_STEMP;
    156 	sc->sc_sensor.state = ENVSYS_SINVALID;
    157 	(void)strlcpy(sc->sc_sensor.desc,
    158 	    device_xname(self), sizeof(sc->sc_sensor.desc));
    159 	(void)snprintf(sc->sc_sensor.desc, sizeof(sc->sc_sensor.desc),
    160 	    "%s S/N %012" PRIx64, sc->sc_chipname, ONEWIRE_ROM_SN(sc->sc_rom));
    161 	if (sysmon_envsys_sensor_attach(sc->sc_sme, &sc->sc_sensor)) {
    162 		sysmon_envsys_destroy(sc->sc_sme);
    163 		return;
    164 	}
    165 
    166 	/* Hook into system monitor. */
    167 	sc->sc_sme->sme_name = device_xname(self);
    168 	sc->sc_sme->sme_cookie = sc;
    169 	sc->sc_sme->sme_refresh = owtemp_refresh;
    170 
    171 	if (sysmon_envsys_register(sc->sc_sme)) {
    172 		aprint_error_dev(self, "unable to register with sysmon\n");
    173 		sysmon_envsys_destroy(sc->sc_sme);
    174 		return;
    175 	}
    176 
    177 	aprint_normal("\n");
    178 }
    179 
    180 static int
    181 owtemp_detach(device_t self, int flags)
    182 {
    183 	struct owtemp_softc *sc = device_private(self);
    184 
    185 	sysmon_envsys_unregister(sc->sc_sme);
    186 	evcnt_detach(&sc->sc_ev_rsterr);
    187 	evcnt_detach(&sc->sc_ev_update);
    188 	evcnt_detach(&sc->sc_ev_crcerr);
    189 
    190 	return 0;
    191 }
    192 
    193 static int
    194 owtemp_activate(device_t self, enum devact act)
    195 {
    196 	struct owtemp_softc *sc = device_private(self);
    197 
    198 	switch (act) {
    199 	case DVACT_DEACTIVATE:
    200 		sc->sc_dying = 1;
    201 		return 0;
    202 	default:
    203 		return EOPNOTSUPP;
    204 	}
    205 }
    206 
    207 static bool
    208 owtemp_update(struct owtemp_softc *sc, uint32_t *temp)
    209 {
    210 	u_int8_t data[9];
    211 
    212 	sc->sc_ev_update.ev_count++;
    213 
    214 	/*
    215 	 * Start temperature conversion. The conversion takes up to 750ms.
    216 	 * After sending the command, the data line must be held high for
    217 	 * at least 750ms to provide power during the conversion process.
    218 	 * As such, no other activity may take place on the 1-Wire bus for
    219 	 * at least this period.  Keep the parent bus locked while waiting.
    220 	 */
    221 	if (onewire_reset(sc->sc_onewire) != 0) {
    222 		sc->sc_ev_rsterr.ev_count++;
    223 		return false;
    224 	}
    225 	onewire_matchrom(sc->sc_onewire, sc->sc_rom);
    226 	onewire_write_byte(sc->sc_onewire, DS_CMD_CONVERT);
    227 	(void)kpause("owtemp", false, mstohz(750 + 10), NULL);
    228 
    229 	/*
    230 	 * The result of the temperature measurement is placed in the
    231 	 * first two bytes of the scratchpad.  Perform the caculation
    232 	 * only if the CRC is correct.
    233 	 */
    234 	if (onewire_reset(sc->sc_onewire) != 0) {
    235 		sc->sc_ev_rsterr.ev_count++;
    236 		return false;
    237 	}
    238 	onewire_matchrom(sc->sc_onewire, sc->sc_rom);
    239 	onewire_write_byte(sc->sc_onewire, DS_CMD_READ_SCRATCHPAD);
    240 	onewire_read_block(sc->sc_onewire, data, 9);
    241 	if (onewire_crc(data, 8) != data[8]) {
    242 		sc->sc_ev_crcerr.ev_count++;
    243 		return false;
    244 	}
    245 	*temp = sc->sc_owtemp_decode(data);
    246 	return true;
    247 }
    248 
    249 static void
    250 owtemp_refresh(struct sysmon_envsys *sme, envsys_data_t *edata)
    251 {
    252 	struct owtemp_softc *sc = sme->sme_cookie;
    253 	uint32_t reading;
    254 	int retry;
    255 
    256 	onewire_lock(sc->sc_onewire);
    257 	for (retry = 0; retry < owtemp_retries; retry++) {
    258 		if (owtemp_update(sc, &reading)) {
    259 			onewire_unlock(sc->sc_onewire);
    260 			sc->sc_sensor.value_cur = reading;
    261 			sc->sc_sensor.state = ENVSYS_SVALID;
    262 			return;
    263 		}
    264 	}
    265 	onewire_unlock(sc->sc_onewire);
    266 	aprint_error_dev(sc->sc_dv,
    267 	    "update failed - use vmstat(8) to check event counters\n");
    268 	sc->sc_sensor.state = ENVSYS_SINVALID;
    269 }
    270 
    271 static uint32_t
    272 owtemp_decode_ds18b20(const uint8_t *buf)
    273 {
    274 	int temp;
    275 
    276 	/*
    277 	 * Sign-extend the MSB byte, and add in the fractions of a
    278 	 * degree contained in the LSB (precision 1/16th DegC).
    279 	 */
    280 	temp = (int8_t)buf[1];
    281 	temp = (temp << 8) | buf[0];
    282 
    283 	/*
    284 	 * Conversion to uK is simple.
    285 	 */
    286 	return (temp * 62500 + 273150000);
    287 }
    288 
    289 static uint32_t
    290 owtemp_decode_ds1920(const uint8_t *buf)
    291 {
    292 	int temp;
    293 
    294 	/*
    295 	 * Sign-extend the MSB byte, and add in the fractions of a
    296 	 * degree contained in the LSB (precision 1/2 DegC).
    297 	 */
    298 	temp = (int8_t)buf[1];
    299 	temp = (temp << 8) | buf[0];
    300 
    301 	if (buf[7] != 0) {
    302 		/*
    303 	 	 * interpolate for higher precision using the count registers
    304 	 	 *
    305 	 	 * buf[7]: COUNT_PER_C(elsius)
    306 	 	 * buf[6]: COUNT_REMAIN
    307 	 	 *
    308 	 	 * T = TEMP - 0.25 + (COUNT_PER_C - COUNT_REMAIN) / COUNT_PER_C
    309 	 	 */
    310 		temp &= ~1;
    311         	temp += 500000 * temp + (500000 * (buf[7] - buf[6])) / buf[7] - 250000;
    312 	} else {
    313 		temp *= 500000;
    314 	}
    315 
    316 	/* convert to uK */
    317 	return (temp + 273150000);
    318 }
    319