Home | History | Annotate | Line # | Download | only in i2c
lm75.c revision 1.45.16.1
      1  1.45.16.1  perseant /*	$NetBSD: lm75.c,v 1.45.16.1 2025/08/02 05:56:40 perseant Exp $	*/
      2        1.1   thorpej 
      3        1.1   thorpej /*
      4        1.1   thorpej  * Copyright (c) 2003 Wasabi Systems, Inc.
      5        1.1   thorpej  * All rights reserved.
      6        1.1   thorpej  *
      7        1.1   thorpej  * Written by Jason R. Thorpe for Wasabi Systems, Inc.
      8        1.1   thorpej  *
      9        1.1   thorpej  * Redistribution and use in source and binary forms, with or without
     10        1.1   thorpej  * modification, are permitted provided that the following conditions
     11        1.1   thorpej  * are met:
     12        1.1   thorpej  * 1. Redistributions of source code must retain the above copyright
     13        1.1   thorpej  *    notice, this list of conditions and the following disclaimer.
     14        1.1   thorpej  * 2. Redistributions in binary form must reproduce the above copyright
     15        1.1   thorpej  *    notice, this list of conditions and the following disclaimer in the
     16        1.1   thorpej  *    documentation and/or other materials provided with the distribution.
     17        1.1   thorpej  * 3. All advertising materials mentioning features or use of this software
     18        1.1   thorpej  *    must display the following acknowledgement:
     19        1.1   thorpej  *      This product includes software developed for the NetBSD Project by
     20        1.1   thorpej  *      Wasabi Systems, Inc.
     21        1.1   thorpej  * 4. The name of Wasabi Systems, Inc. may not be used to endorse
     22        1.1   thorpej  *    or promote products derived from this software without specific prior
     23        1.1   thorpej  *    written permission.
     24        1.1   thorpej  *
     25        1.1   thorpej  * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
     26        1.1   thorpej  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     27        1.1   thorpej  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     28        1.1   thorpej  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
     29        1.1   thorpej  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     30        1.1   thorpej  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     31        1.1   thorpej  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     32        1.1   thorpej  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     33        1.1   thorpej  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     34        1.1   thorpej  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     35        1.1   thorpej  * POSSIBILITY OF SUCH DAMAGE.
     36        1.1   thorpej  */
     37        1.1   thorpej 
     38       1.17     lukem #include <sys/cdefs.h>
     39  1.45.16.1  perseant __KERNEL_RCSID(0, "$NetBSD: lm75.c,v 1.45.16.1 2025/08/02 05:56:40 perseant Exp $");
     40       1.17     lukem 
     41        1.1   thorpej #include <sys/param.h>
     42        1.1   thorpej #include <sys/systm.h>
     43        1.1   thorpej #include <sys/device.h>
     44        1.1   thorpej #include <sys/kernel.h>
     45       1.23  macallan #include <sys/sysctl.h>
     46        1.1   thorpej 
     47        1.1   thorpej #include <dev/sysmon/sysmonvar.h>
     48        1.1   thorpej 
     49        1.1   thorpej #include <dev/i2c/i2cvar.h>
     50        1.1   thorpej #include <dev/i2c/lm75reg.h>
     51        1.1   thorpej 
     52        1.1   thorpej struct lmtemp_softc {
     53       1.23  macallan 	device_t sc_dev;
     54        1.1   thorpej 	i2c_tag_t sc_tag;
     55        1.1   thorpej 	int sc_address;
     56       1.36  macallan 	prop_dictionary_t sc_prop;
     57        1.1   thorpej 
     58       1.18   xtraeme 	struct sysmon_envsys *sc_sme;
     59       1.16   xtraeme 	envsys_data_t sc_sensor;
     60       1.23  macallan 	int sc_tmax;
     61       1.28       jdc 	uint32_t sc_smax, sc_smin, sc_scrit;
     62        1.9  kiyohara 
     63       1.27       jdc 	uint32_t (*sc_lmtemp_decode)(const uint8_t *, int);
     64       1.28       jdc 	void (*sc_lmtemp_encode)(const uint32_t, uint8_t *, int);
     65        1.1   thorpej };
     66        1.1   thorpej 
     67       1.18   xtraeme static int  lmtemp_match(device_t, cfdata_t, void *);
     68       1.18   xtraeme static void lmtemp_attach(device_t, device_t, void *);
     69        1.1   thorpej 
     70       1.18   xtraeme CFATTACH_DECL_NEW(lmtemp, sizeof(struct lmtemp_softc),
     71        1.1   thorpej 	lmtemp_match, lmtemp_attach, NULL, NULL);
     72        1.1   thorpej 
     73       1.16   xtraeme static void	lmtemp_refresh(struct sysmon_envsys *, envsys_data_t *);
     74       1.18   xtraeme static int	lmtemp_config_write(struct lmtemp_softc *, uint8_t);
     75       1.28       jdc static int	lmtemp_temp_write(struct lmtemp_softc *, uint8_t, uint32_t,
     76       1.28       jdc 				int);
     77       1.27       jdc static int	lmtemp_temp_read(struct lmtemp_softc *, uint8_t, uint32_t *,
     78       1.27       jdc 				int);
     79       1.27       jdc static uint32_t lmtemp_decode_lm75(const uint8_t *, int);
     80       1.27       jdc static uint32_t lmtemp_decode_ds75(const uint8_t *, int);
     81       1.27       jdc static uint32_t lmtemp_decode_lm77(const uint8_t *, int);
     82       1.28       jdc static void	lmtemp_encode_lm75(const uint32_t, uint8_t *, int);
     83       1.28       jdc static void	lmtemp_encode_ds75(const uint32_t, uint8_t *, int);
     84       1.28       jdc static void	lmtemp_encode_lm77(const uint32_t, uint8_t *, int);
     85       1.28       jdc static void	lmtemp_getlim_lm75(struct sysmon_envsys *, envsys_data_t *,
     86       1.28       jdc 				sysmon_envsys_lim_t *, uint32_t *);
     87       1.28       jdc static void	lmtemp_getlim_lm77(struct sysmon_envsys *, envsys_data_t *,
     88       1.28       jdc 				sysmon_envsys_lim_t *, uint32_t *);
     89       1.28       jdc static void	lmtemp_setlim_lm75(struct sysmon_envsys *, envsys_data_t *,
     90       1.28       jdc 				sysmon_envsys_lim_t *, uint32_t *);
     91       1.28       jdc static void	lmtemp_setlim_lm77(struct sysmon_envsys *, envsys_data_t *,
     92       1.28       jdc 				sysmon_envsys_lim_t *, uint32_t *);
     93        1.9  kiyohara 
     94       1.23  macallan static void	lmtemp_setup_sysctl(struct lmtemp_softc *);
     95       1.23  macallan static int	sysctl_lm75_temp(SYSCTLFN_ARGS);
     96       1.21    martin 
     97       1.41   thorpej enum {
     98       1.41   thorpej 	lmtemp_lm75 = 0,
     99       1.41   thorpej 	lmtemp_ds75 = 1,
    100       1.41   thorpej 	lmtemp_lm77 = 2,
    101       1.41   thorpej };
    102       1.41   thorpej 
    103       1.33   thorpej static const struct device_compatible_entry compat_data[] = {
    104       1.41   thorpej 	{ .compat = "national,lm75",	.value = lmtemp_lm75 },
    105       1.41   thorpej 	{ .compat = "i2c-lm75",		.value = lmtemp_lm75 },
    106       1.41   thorpej 	{ .compat = "lm75",		.value = lmtemp_lm75 },
    107       1.41   thorpej 
    108       1.41   thorpej 	/* XXX Linux treats ds1775 and ds75 differently. */
    109       1.41   thorpej 	{ .compat = "dallas,ds1775",	.value = lmtemp_ds75 },
    110       1.41   thorpej 	{ .compat = "ds1775",		.value = lmtemp_ds75 },
    111       1.41   thorpej 
    112       1.41   thorpej 	{ .compat = "national,lm77",	.value = lmtemp_lm77 },
    113       1.41   thorpej 
    114       1.21    martin 	/*
    115       1.21    martin 	 * see XXX in _attach() below: add code once non-lm75 matches are
    116       1.21    martin 	 * added here!
    117       1.21    martin 	 */
    118       1.39   thorpej 	DEVICE_COMPAT_EOL
    119       1.32   thorpej };
    120       1.32   thorpej 
    121        1.9  kiyohara static const struct {
    122        1.9  kiyohara 	const char *lmtemp_name;
    123        1.9  kiyohara 	int lmtemp_addrmask;
    124        1.9  kiyohara 	int lmtemp_addr;
    125       1.27       jdc 	uint32_t (*lmtemp_decode)(const uint8_t *, int);
    126       1.28       jdc 	void (*lmtemp_encode)(const uint32_t, uint8_t *, int);
    127       1.28       jdc 	void (*lmtemp_getlim)(struct sysmon_envsys *, envsys_data_t *,
    128       1.28       jdc 		sysmon_envsys_lim_t *, uint32_t *);
    129       1.28       jdc 	void (*lmtemp_setlim)(struct sysmon_envsys *, envsys_data_t *,
    130       1.28       jdc 		sysmon_envsys_lim_t *, uint32_t *);
    131        1.9  kiyohara } lmtemptbl[] = {
    132       1.41   thorpej [lmtemp_lm75] =
    133       1.41   thorpej 	{
    134       1.41   thorpej 		.lmtemp_name = "LM75",
    135       1.41   thorpej 		.lmtemp_addrmask = LM75_ADDRMASK,
    136       1.41   thorpej 		.lmtemp_addr = LM75_ADDR,
    137       1.41   thorpej 		.lmtemp_decode = lmtemp_decode_lm75,
    138       1.41   thorpej 		.lmtemp_encode = lmtemp_encode_lm75,
    139       1.41   thorpej 		.lmtemp_getlim = lmtemp_getlim_lm75,
    140       1.41   thorpej 		.lmtemp_setlim = lmtemp_setlim_lm75,
    141       1.41   thorpej 	},
    142       1.41   thorpej [lmtemp_ds75] =
    143       1.41   thorpej 	{
    144       1.41   thorpej 		.lmtemp_name = "DS75",
    145       1.41   thorpej 		.lmtemp_addrmask = LM75_ADDRMASK,
    146       1.41   thorpej 		.lmtemp_addr = LM75_ADDR,
    147       1.41   thorpej 		.lmtemp_decode = lmtemp_decode_ds75,
    148       1.41   thorpej 		.lmtemp_encode = lmtemp_encode_ds75,
    149       1.41   thorpej 		.lmtemp_getlim = lmtemp_getlim_lm75,
    150       1.41   thorpej 		.lmtemp_setlim = lmtemp_setlim_lm75,
    151       1.41   thorpej 	},
    152       1.41   thorpej [lmtemp_lm77] =
    153       1.41   thorpej 	{
    154       1.41   thorpej 		.lmtemp_name = "LM77",
    155       1.41   thorpej 		.lmtemp_addrmask = LM77_ADDRMASK,
    156       1.41   thorpej 		.lmtemp_addr = LM77_ADDR,
    157       1.41   thorpej 		.lmtemp_decode = lmtemp_decode_lm77,
    158       1.41   thorpej 		.lmtemp_encode = lmtemp_encode_lm77,
    159       1.41   thorpej 		.lmtemp_getlim = lmtemp_getlim_lm77,
    160       1.41   thorpej 		.lmtemp_setlim = lmtemp_setlim_lm77,
    161       1.41   thorpej 	},
    162        1.9  kiyohara };
    163        1.1   thorpej 
    164        1.1   thorpej static int
    165       1.18   xtraeme lmtemp_match(device_t parent, cfdata_t cf, void *aux)
    166        1.1   thorpej {
    167        1.1   thorpej 	struct i2c_attach_args *ia = aux;
    168       1.31   thorpej 	int i, match_result;
    169        1.9  kiyohara 
    170       1.33   thorpej 	if (iic_use_direct_match(ia, cf, compat_data, &match_result))
    171       1.31   thorpej 		return match_result;
    172       1.21    martin 
    173       1.31   thorpej 	/*
    174       1.31   thorpej 	 * Indirect config - not much we can do!
    175       1.31   thorpej 	 */
    176       1.41   thorpej 	for (i = 0; i < __arraycount(lmtemptbl); i++) {
    177       1.41   thorpej 		if (i == cf->cf_flags) {
    178       1.31   thorpej 			break;
    179       1.41   thorpej 		}
    180       1.41   thorpej 	}
    181       1.41   thorpej 	if (i == __arraycount(lmtemptbl)) {
    182       1.31   thorpej 		return 0;
    183       1.41   thorpej 	}
    184       1.31   thorpej 
    185       1.31   thorpej 	if ((ia->ia_addr & lmtemptbl[i].lmtemp_addrmask) ==
    186       1.31   thorpej 	    lmtemptbl[i].lmtemp_addr)
    187       1.31   thorpej 		return I2C_MATCH_ADDRESS_ONLY;
    188        1.1   thorpej 
    189       1.18   xtraeme 	return 0;
    190        1.1   thorpej }
    191        1.1   thorpej 
    192        1.1   thorpej static void
    193       1.18   xtraeme lmtemp_attach(device_t parent, device_t self, void *aux)
    194        1.1   thorpej {
    195        1.6   thorpej 	struct lmtemp_softc *sc = device_private(self);
    196        1.1   thorpej 	struct i2c_attach_args *ia = aux;
    197       1.41   thorpej 	const struct device_compatible_entry *dce;
    198       1.30  macallan 	char name[64];
    199       1.36  macallan 	const char *desc;
    200        1.9  kiyohara 	int i;
    201        1.9  kiyohara 
    202       1.23  macallan 	sc->sc_dev = self;
    203       1.41   thorpej 	dce = iic_compatible_lookup(ia, compat_data);
    204       1.41   thorpej 	if (dce != NULL) {
    205       1.41   thorpej 		i = (int)dce->value;
    206       1.41   thorpej 	} else {
    207       1.41   thorpej 		for (i = 0; i < __arraycount(lmtemptbl); i++) {
    208       1.41   thorpej 			if (i == device_cfdata(self)->cf_flags) {
    209       1.21    martin 				break;
    210       1.41   thorpej 			}
    211       1.30  macallan 		}
    212       1.41   thorpej 		KASSERT(i < __arraycount(lmtemptbl));
    213       1.21    martin 	}
    214        1.1   thorpej 
    215        1.1   thorpej 	sc->sc_tag = ia->ia_tag;
    216        1.1   thorpej 	sc->sc_address = ia->ia_addr;
    217       1.36  macallan 	sc->sc_prop = ia->ia_prop;
    218  1.45.16.1  perseant 
    219       1.43  macallan 	if (ia->ia_prop != NULL) prop_object_retain(sc->sc_prop);
    220        1.1   thorpej 
    221        1.1   thorpej 	aprint_naive(": Temperature Sensor\n");
    222       1.21    martin 	if (ia->ia_name) {
    223       1.21    martin 		aprint_normal(": %s %s Temperature Sensor\n", ia->ia_name,
    224       1.21    martin 			lmtemptbl[i].lmtemp_name);
    225       1.21    martin 	} else {
    226       1.21    martin 		aprint_normal(": %s Temperature Sensor\n",
    227       1.21    martin 			lmtemptbl[i].lmtemp_name);
    228       1.21    martin 	}
    229        1.1   thorpej 
    230       1.27       jdc 	sc->sc_lmtemp_decode = lmtemptbl[i].lmtemp_decode;
    231       1.28       jdc 	sc->sc_lmtemp_encode = lmtemptbl[i].lmtemp_encode;
    232       1.27       jdc 
    233       1.44   mlelstv 	if (iic_acquire_bus(sc->sc_tag, 0)) {
    234       1.44   mlelstv 		aprint_error_dev(self,
    235       1.44   mlelstv 		    "unable to acquire I2C bus\n");
    236       1.44   mlelstv 		return;
    237       1.44   mlelstv 	}
    238       1.27       jdc 
    239       1.28       jdc 	/* Read temperature limit(s) and remember initial value(s). */
    240       1.28       jdc 	if (i == lmtemp_lm77) {
    241       1.29       jdc 		if (lmtemp_temp_read(sc, LM77_REG_TCRIT_SET_POINT,
    242       1.29       jdc 		    &sc->sc_scrit, 1) != 0) {
    243       1.29       jdc 			aprint_error_dev(self,
    244       1.29       jdc 			    "unable to read low register\n");
    245       1.35   thorpej 			iic_release_bus(sc->sc_tag, 0);
    246       1.29       jdc 			return;
    247       1.29       jdc 		}
    248       1.28       jdc 		if (lmtemp_temp_read(sc, LM77_REG_TLOW_SET_POINT,
    249       1.29       jdc 		    &sc->sc_smin, 1) != 0) {
    250       1.28       jdc 			aprint_error_dev(self,
    251       1.28       jdc 			    "unable to read low register\n");
    252       1.35   thorpej 			iic_release_bus(sc->sc_tag, 0);
    253       1.28       jdc 			return;
    254       1.28       jdc 		}
    255       1.28       jdc 		if (lmtemp_temp_read(sc, LM77_REG_THIGH_SET_POINT,
    256       1.28       jdc 		    &sc->sc_smax, 1) != 0) {
    257       1.28       jdc 			aprint_error_dev(self,
    258       1.28       jdc 			    "unable to read high register\n");
    259       1.35   thorpej 			iic_release_bus(sc->sc_tag, 0);
    260       1.28       jdc 			return;
    261       1.28       jdc 		}
    262       1.29       jdc 	} else {	/* LM75 or compatible */
    263       1.29       jdc 		if (lmtemp_temp_read(sc, LM75_REG_TOS_SET_POINT,
    264       1.29       jdc 		    &sc->sc_smax, 1) != 0) {
    265       1.29       jdc 			aprint_error_dev(self, "unable to read Tos register\n");
    266       1.35   thorpej 			iic_release_bus(sc->sc_tag, 0);
    267       1.29       jdc 			return;
    268       1.29       jdc 		}
    269       1.28       jdc 	}
    270       1.29       jdc 	sc->sc_tmax = sc->sc_smax;
    271       1.27       jdc 
    272       1.23  macallan 	if (i == lmtemp_lm75)
    273       1.23  macallan 		lmtemp_setup_sysctl(sc);
    274       1.23  macallan 
    275        1.1   thorpej 	/* Set the configuration of the LM75 to defaults. */
    276       1.23  macallan 	if (lmtemp_config_write(sc, LM75_CONFIG_FAULT_QUEUE_4) != 0) {
    277       1.18   xtraeme 		aprint_error_dev(self, "unable to write config register\n");
    278       1.35   thorpej 		iic_release_bus(sc->sc_tag, 0);
    279        1.1   thorpej 		return;
    280        1.1   thorpej 	}
    281       1.35   thorpej 	iic_release_bus(sc->sc_tag, 0);
    282        1.1   thorpej 
    283       1.16   xtraeme 	sc->sc_sme = sysmon_envsys_create();
    284        1.1   thorpej 	/* Initialize sensor data. */
    285  1.45.16.1  perseant 	sc->sc_sensor.units = ENVSYS_STEMP;
    286  1.45.16.1  perseant 	sc->sc_sensor.state = ENVSYS_SINVALID;
    287  1.45.16.1  perseant 	sc->sc_sensor.flags = ENVSYS_FMONLIMITS | ENVSYS_FHAS_ENTROPY;
    288       1.30  macallan 
    289       1.30  macallan 	(void)strlcpy(name,
    290       1.21    martin 	    ia->ia_name? ia->ia_name : device_xname(self),
    291       1.18   xtraeme 	    sizeof(sc->sc_sensor.desc));
    292       1.36  macallan 
    293       1.45  christos 	if (prop_dictionary_get_string(sc->sc_prop, "s00", &desc)) {
    294       1.36  macallan 		strncpy(name, desc, 64);
    295       1.30  macallan 	}
    296       1.36  macallan 
    297       1.30  macallan 	(void)strlcpy(sc->sc_sensor.desc, name,
    298       1.30  macallan 	    sizeof(sc->sc_sensor.desc));
    299       1.16   xtraeme 	if (sysmon_envsys_sensor_attach(sc->sc_sme, &sc->sc_sensor)) {
    300       1.16   xtraeme 		sysmon_envsys_destroy(sc->sc_sme);
    301       1.16   xtraeme 		return;
    302       1.16   xtraeme 	}
    303        1.1   thorpej 
    304        1.7       riz 	/* Hook into system monitor. */
    305       1.18   xtraeme 	sc->sc_sme->sme_name = device_xname(self);
    306       1.16   xtraeme 	sc->sc_sme->sme_cookie = sc;
    307       1.16   xtraeme 	sc->sc_sme->sme_refresh = lmtemp_refresh;
    308       1.28       jdc 	sc->sc_sme->sme_get_limits = lmtemptbl[i].lmtemp_getlim;
    309       1.28       jdc 	sc->sc_sme->sme_set_limits = lmtemptbl[i].lmtemp_setlim;
    310        1.1   thorpej 
    311       1.16   xtraeme 	if (sysmon_envsys_register(sc->sc_sme)) {
    312       1.18   xtraeme 		aprint_error_dev(self, "unable to register with sysmon\n");
    313       1.16   xtraeme 		sysmon_envsys_destroy(sc->sc_sme);
    314       1.16   xtraeme 	}
    315        1.1   thorpej }
    316        1.1   thorpej 
    317        1.1   thorpej static int
    318        1.1   thorpej lmtemp_config_write(struct lmtemp_softc *sc, uint8_t val)
    319        1.1   thorpej {
    320        1.1   thorpej 	uint8_t cmdbuf[2];
    321        1.1   thorpej 
    322        1.1   thorpej 	cmdbuf[0] = LM75_REG_CONFIG;
    323        1.1   thorpej 	cmdbuf[1] = val;
    324        1.1   thorpej 
    325       1.18   xtraeme 	return iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP,
    326       1.35   thorpej 	    sc->sc_address, cmdbuf, 1, &cmdbuf[1], 1, 0);
    327        1.1   thorpej }
    328        1.1   thorpej 
    329        1.1   thorpej static int
    330       1.28       jdc lmtemp_temp_write(struct lmtemp_softc *sc, uint8_t reg, uint32_t val, int degc)
    331       1.23  macallan {
    332       1.23  macallan 	uint8_t cmdbuf[3];
    333       1.23  macallan 
    334       1.23  macallan 	cmdbuf[0] = reg;
    335       1.28       jdc 	sc->sc_lmtemp_encode(val, &cmdbuf[1], degc);
    336       1.23  macallan 
    337       1.23  macallan 	return iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP,
    338       1.35   thorpej 	    sc->sc_address, cmdbuf, 1, &cmdbuf[1], 2, 0);
    339       1.23  macallan }
    340       1.23  macallan 
    341       1.23  macallan static int
    342       1.27       jdc lmtemp_temp_read(struct lmtemp_softc *sc, uint8_t which, uint32_t *valp,
    343       1.27       jdc     int degc)
    344        1.1   thorpej {
    345        1.2       scw 	int error;
    346        1.1   thorpej 	uint8_t cmdbuf[1];
    347        1.1   thorpej 	uint8_t buf[LM75_TEMP_LEN];
    348        1.1   thorpej 
    349        1.1   thorpej 	cmdbuf[0] = which;
    350        1.1   thorpej 
    351        1.1   thorpej 	error = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
    352        1.1   thorpej 	    sc->sc_address, cmdbuf, 1, buf, LM75_TEMP_LEN, 0);
    353        1.1   thorpej 	if (error)
    354       1.18   xtraeme 		return error;
    355        1.1   thorpej 
    356       1.27       jdc 	*valp = sc->sc_lmtemp_decode(buf, degc);
    357       1.18   xtraeme 	return 0;
    358        1.1   thorpej }
    359        1.1   thorpej 
    360        1.1   thorpej static void
    361        1.1   thorpej lmtemp_refresh_sensor_data(struct lmtemp_softc *sc)
    362        1.1   thorpej {
    363        1.1   thorpej 	uint32_t val;
    364        1.1   thorpej 	int error;
    365        1.1   thorpej 
    366       1.27       jdc 	error = lmtemp_temp_read(sc, LM75_REG_TEMP, &val, 0);
    367        1.1   thorpej 	if (error) {
    368        1.1   thorpej #if 0
    369       1.25       chs 		aprint_error_dev(sc->sc_dev, "unable to read temperature, error = %d\n",
    370       1.19    cegger 		    error);
    371        1.1   thorpej #endif
    372       1.16   xtraeme 		sc->sc_sensor.state = ENVSYS_SINVALID;
    373        1.1   thorpej 		return;
    374        1.1   thorpej 	}
    375        1.1   thorpej 
    376       1.16   xtraeme 	sc->sc_sensor.value_cur = val;
    377       1.16   xtraeme 	sc->sc_sensor.state = ENVSYS_SVALID;
    378        1.1   thorpej }
    379        1.1   thorpej 
    380       1.16   xtraeme static void
    381       1.16   xtraeme lmtemp_refresh(struct sysmon_envsys *sme, envsys_data_t *edata)
    382        1.1   thorpej {
    383        1.1   thorpej 	struct lmtemp_softc *sc = sme->sme_cookie;
    384        1.1   thorpej 
    385       1.44   mlelstv 	if (iic_acquire_bus(sc->sc_tag, 0))	/* also locks our instance */
    386       1.44   mlelstv 		return;
    387        1.1   thorpej 	lmtemp_refresh_sensor_data(sc);
    388        1.1   thorpej 	iic_release_bus(sc->sc_tag, 0);	/* also unlocks our instance */
    389        1.1   thorpej }
    390        1.2       scw 
    391       1.28       jdc static void
    392       1.28       jdc lmtemp_getlim_lm75(struct sysmon_envsys *sme, envsys_data_t *edata,
    393       1.28       jdc     sysmon_envsys_lim_t *limits, uint32_t *props)
    394       1.28       jdc {
    395       1.28       jdc 	struct lmtemp_softc *sc = sme->sme_cookie;
    396       1.28       jdc 	uint32_t val;
    397       1.28       jdc 
    398       1.28       jdc 	*props &= ~(PROP_CRITMAX);
    399       1.28       jdc 
    400       1.44   mlelstv 	if (iic_acquire_bus(sc->sc_tag, 0))
    401       1.44   mlelstv 		return;
    402       1.28       jdc 	if (lmtemp_temp_read(sc, LM75_REG_TOS_SET_POINT, &val, 0) == 0) {
    403       1.28       jdc 		limits->sel_critmax = val;
    404       1.28       jdc 		*props |= PROP_CRITMAX;
    405       1.28       jdc 	}
    406       1.29       jdc 	iic_release_bus(sc->sc_tag, 0);
    407       1.28       jdc }
    408       1.28       jdc 
    409       1.28       jdc static void
    410       1.28       jdc lmtemp_getlim_lm77(struct sysmon_envsys *sme, envsys_data_t *edata,
    411       1.28       jdc     sysmon_envsys_lim_t *limits, uint32_t *props)
    412       1.28       jdc {
    413       1.28       jdc 	struct lmtemp_softc *sc = sme->sme_cookie;
    414       1.28       jdc 	uint32_t val;
    415       1.28       jdc 
    416       1.28       jdc 	*props &= ~(PROP_CRITMAX | PROP_WARNMAX | PROP_WARNMIN);
    417       1.28       jdc 
    418       1.44   mlelstv 	if (iic_acquire_bus(sc->sc_tag, 0))
    419       1.44   mlelstv 		return;
    420       1.28       jdc 	if (lmtemp_temp_read(sc, LM77_REG_TCRIT_SET_POINT, &val, 0) == 0) {
    421       1.28       jdc 		limits->sel_critmax = val;
    422       1.28       jdc 		*props |= PROP_CRITMAX;
    423       1.28       jdc 	}
    424       1.28       jdc 	if (lmtemp_temp_read(sc, LM77_REG_THIGH_SET_POINT, &val, 0) == 0) {
    425       1.28       jdc 		limits->sel_warnmax = val;
    426       1.28       jdc 		*props |= PROP_WARNMAX;
    427       1.28       jdc 	}
    428       1.28       jdc 	if (lmtemp_temp_read(sc, LM77_REG_TLOW_SET_POINT, &val, 0) == 0) {
    429       1.28       jdc 		limits->sel_warnmin = val;
    430       1.28       jdc 		*props |= PROP_WARNMIN;
    431       1.28       jdc 	}
    432       1.29       jdc 	iic_release_bus(sc->sc_tag, 0);
    433       1.28       jdc }
    434       1.28       jdc 
    435       1.28       jdc static void
    436  1.45.16.1  perseant lmtemp_setlim_lm75(struct sysmon_envsys *sme, envsys_data_t *edata,
    437       1.28       jdc     sysmon_envsys_lim_t *limits, uint32_t *props)
    438       1.28       jdc {
    439       1.28       jdc 	struct lmtemp_softc *sc = sme->sme_cookie;
    440       1.28       jdc 	int32_t limit;
    441       1.28       jdc 
    442       1.28       jdc 	if (*props & PROP_CRITMAX) {
    443       1.28       jdc 		if (limits == NULL)	/* Restore defaults */
    444       1.28       jdc 			limit = sc->sc_smax;
    445       1.28       jdc 		else
    446       1.28       jdc 			limit = limits->sel_critmax;
    447       1.44   mlelstv 		if (iic_acquire_bus(sc->sc_tag, 0))
    448       1.44   mlelstv 			return;
    449       1.28       jdc 		lmtemp_temp_write(sc, LM75_REG_THYST_SET_POINT,
    450       1.28       jdc 		    limit - 5000000, 0);
    451       1.28       jdc 		lmtemp_temp_write(sc, LM75_REG_TOS_SET_POINT, limit, 0);
    452       1.29       jdc 		iic_release_bus(sc->sc_tag, 0);
    453       1.28       jdc 
    454       1.28       jdc 		/* Synchronise sysctl */
    455       1.28       jdc 		sc->sc_tmax = (limit - 273150000) / 1000000;
    456       1.28       jdc 	}
    457       1.28       jdc }
    458       1.28       jdc 
    459       1.28       jdc static void
    460  1.45.16.1  perseant lmtemp_setlim_lm77(struct sysmon_envsys *sme, envsys_data_t *edata,
    461       1.28       jdc     sysmon_envsys_lim_t *limits, uint32_t *props)
    462       1.28       jdc {
    463       1.28       jdc 	struct lmtemp_softc *sc = sme->sme_cookie;
    464       1.28       jdc 	int32_t limit;
    465       1.28       jdc 
    466       1.29       jdc 	iic_acquire_bus(sc->sc_tag, 0);
    467       1.28       jdc 	if (*props & PROP_CRITMAX) {
    468       1.28       jdc 		if (limits == NULL)	/* Restore defaults */
    469       1.29       jdc 			limit = sc->sc_scrit;
    470       1.28       jdc 		else
    471       1.28       jdc 			limit = limits->sel_critmax;
    472       1.28       jdc 		lmtemp_temp_write(sc, LM77_REG_TCRIT_SET_POINT, limit, 0);
    473       1.28       jdc 	}
    474       1.28       jdc 	if (*props & PROP_WARNMAX) {
    475       1.28       jdc 		if (limits == NULL)	/* Restore defaults */
    476       1.28       jdc 			limit = sc->sc_smax;
    477       1.28       jdc 		else
    478       1.28       jdc 			limit = limits->sel_warnmax;
    479       1.28       jdc 		lmtemp_temp_write(sc, LM77_REG_THIGH_SET_POINT, limit, 0);
    480       1.28       jdc 	}
    481       1.28       jdc 	if (*props & PROP_WARNMIN) {
    482       1.28       jdc 		if (limits == NULL)	/* Restore defaults */
    483       1.29       jdc 			limit = sc->sc_smin;
    484       1.28       jdc 		else
    485       1.28       jdc 			limit = limits->sel_warnmin;
    486       1.28       jdc 		lmtemp_temp_write(sc, LM77_REG_TLOW_SET_POINT, limit, 0);
    487       1.28       jdc 	}
    488       1.29       jdc 	iic_release_bus(sc->sc_tag, 0);
    489       1.28       jdc }
    490       1.28       jdc 
    491        1.2       scw static uint32_t
    492       1.27       jdc lmtemp_decode_lm75(const uint8_t *buf, int degc)
    493        1.2       scw {
    494       1.20    briggs 	int temp;
    495        1.2       scw 	uint32_t val;
    496        1.2       scw 
    497       1.20    briggs 	/*
    498       1.20    briggs 	 * LM75 temps are the most-significant 9 bits of a 16-bit reg.
    499       1.20    briggs 	 * sign-extend the MSB and add in the 0.5 from the LSB
    500       1.20    briggs 	 */
    501       1.20    briggs 	temp = (int8_t) buf[0];
    502       1.20    briggs 	temp = (temp << 1) + ((buf[1] >> 7) & 0x1);
    503        1.2       scw 
    504       1.27       jdc 	/* Temp is given in 1/2 deg. C, we convert to C or uK. */
    505       1.27       jdc 	if (degc)
    506       1.27       jdc 		val = temp / 2;
    507       1.27       jdc 	else
    508       1.27       jdc 		val = temp * 500000 + 273150000;
    509        1.2       scw 
    510       1.18   xtraeme 	return val;
    511        1.2       scw }
    512        1.2       scw 
    513        1.2       scw static uint32_t
    514       1.27       jdc lmtemp_decode_ds75(const uint8_t *buf, int degc)
    515        1.2       scw {
    516        1.2       scw 	int temp;
    517        1.2       scw 
    518        1.2       scw 	/*
    519        1.2       scw 	 * Sign-extend the MSB byte, and add in the fractions of a
    520        1.7       riz 	 * degree contained in the LSB (precision 1/16th DegC).
    521        1.2       scw 	 */
    522        1.2       scw 	temp = (int8_t)buf[0];
    523        1.2       scw 	temp = (temp << 4) | ((buf[1] >> 4) & 0xf);
    524        1.2       scw 
    525        1.2       scw 	/*
    526       1.27       jdc 	 * Conversion to C or uK is simple.
    527        1.2       scw 	 */
    528       1.27       jdc 	if (degc)
    529       1.27       jdc 		return temp / 16;
    530       1.27       jdc 	else
    531       1.27       jdc 		return (temp * 62500 + 273150000);
    532        1.2       scw }
    533        1.2       scw 
    534        1.9  kiyohara static uint32_t
    535       1.27       jdc lmtemp_decode_lm77(const uint8_t *buf, int degc)
    536        1.9  kiyohara {
    537        1.9  kiyohara 	int temp;
    538        1.9  kiyohara 	uint32_t val;
    539        1.9  kiyohara 
    540        1.9  kiyohara 	/*
    541        1.9  kiyohara 	 * Describe each bits of temperature registers on LM77.
    542        1.9  kiyohara 	 *   D15 - D12:	Sign
    543        1.9  kiyohara 	 *   D11 - D3 :	Bit8(MSB) - Bit0
    544        1.9  kiyohara 	 */
    545        1.9  kiyohara 	temp = (int8_t)buf[0];
    546       1.10  kiyohara 	temp = (temp << 5) | ((buf[1] >> 3) & 0x1f);
    547        1.9  kiyohara 
    548       1.27       jdc 	/* Temp is given in 1/2 deg. C, we convert to C or uK. */
    549       1.27       jdc 	if (degc)
    550       1.27       jdc 		val = temp / 2;
    551       1.27       jdc 	else
    552       1.27       jdc 		val = temp * 500000 + 273150000;
    553        1.9  kiyohara 
    554       1.18   xtraeme 	return val;
    555        1.9  kiyohara }
    556        1.9  kiyohara 
    557       1.28       jdc static void lmtemp_encode_lm75(const uint32_t val, uint8_t *buf, int degc)
    558       1.28       jdc {
    559       1.28       jdc 	int temp;
    560       1.28       jdc 
    561       1.28       jdc 	/* Convert from C or uK to register format */
    562       1.28       jdc 	if (degc)
    563       1.28       jdc 		temp = val * 2;
    564       1.28       jdc 	else
    565       1.28       jdc 		temp = (val - 273150000) / 500000;
    566       1.28       jdc 	buf[0] = (temp >> 1) & 0xff;
    567       1.28       jdc 	buf[1] = (temp & 1) << 7;
    568       1.28       jdc }
    569       1.28       jdc 
    570       1.28       jdc static void lmtemp_encode_ds75(const uint32_t val, uint8_t *buf, int degc)
    571       1.28       jdc {
    572       1.28       jdc 	int temp;
    573       1.28       jdc 
    574       1.28       jdc 	/* Convert from C or uK to register format */
    575       1.28       jdc 	if (degc)
    576       1.28       jdc 		temp = val * 16;
    577       1.28       jdc 	else
    578       1.28       jdc 		temp = (val - 273150000) / 62500;
    579       1.28       jdc 	buf[0] = (temp >> 4) & 0xff;
    580       1.28       jdc 	buf[1] = (temp & 0xf) << 4;
    581       1.28       jdc }
    582       1.28       jdc 
    583       1.28       jdc static void lmtemp_encode_lm77(const uint32_t val, uint8_t *buf, int degc)
    584       1.28       jdc {
    585       1.28       jdc 	int temp;
    586       1.28       jdc 
    587       1.28       jdc 	/* Convert from C or uK to register format */
    588       1.28       jdc 	if (degc)
    589       1.28       jdc 		temp = val * 2;
    590       1.28       jdc 	else
    591       1.28       jdc 		temp = (val - 273150000) / 500000;
    592       1.28       jdc 	buf[0] = (temp >> 5) & 0xff;
    593       1.28       jdc 	buf[1] = (temp & 0x1f) << 3;
    594       1.28       jdc }
    595       1.28       jdc 
    596       1.23  macallan static void
    597       1.23  macallan lmtemp_setup_sysctl(struct lmtemp_softc *sc)
    598       1.23  macallan {
    599       1.23  macallan 	const struct sysctlnode *me = NULL, *node = NULL;
    600       1.23  macallan 
    601       1.23  macallan 	sysctl_createv(NULL, 0, NULL, &me,
    602       1.23  macallan 	    CTLFLAG_READWRITE,
    603       1.23  macallan 	    CTLTYPE_NODE, device_xname(sc->sc_dev), NULL,
    604       1.23  macallan 	    NULL, 0, NULL, 0,
    605       1.23  macallan 	    CTL_MACHDEP, CTL_CREATE, CTL_EOL);
    606       1.23  macallan 
    607       1.23  macallan 	sysctl_createv(NULL, 0, NULL, &node,
    608       1.23  macallan 	    CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
    609       1.23  macallan 	    CTLTYPE_INT, "temp", "Threshold temperature",
    610       1.24       dsl 	    sysctl_lm75_temp, 1, (void *)sc, 0,
    611       1.23  macallan 	    CTL_MACHDEP, me->sysctl_num, CTL_CREATE, CTL_EOL);
    612       1.23  macallan }
    613       1.23  macallan 
    614       1.23  macallan static int
    615       1.23  macallan sysctl_lm75_temp(SYSCTLFN_ARGS)
    616       1.23  macallan {
    617       1.23  macallan 	struct sysctlnode node = *rnode;
    618       1.23  macallan 	struct lmtemp_softc *sc = node.sysctl_data;
    619       1.44   mlelstv 	int temp, error;
    620       1.23  macallan 
    621       1.23  macallan 	if (newp) {
    622       1.23  macallan 
    623  1.45.16.1  perseant 		/* we're asked to write */
    624       1.23  macallan 		node.sysctl_data = &sc->sc_tmax;
    625       1.23  macallan 		if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
    626       1.23  macallan 
    627       1.23  macallan 			temp = *(int *)node.sysctl_data;
    628       1.23  macallan 			sc->sc_tmax = temp;
    629       1.44   mlelstv 			error = iic_acquire_bus(sc->sc_tag, 0);
    630       1.44   mlelstv 			if (error)
    631       1.44   mlelstv 				return error;
    632       1.23  macallan 			lmtemp_temp_write(sc, LM75_REG_THYST_SET_POINT,
    633       1.28       jdc 			    sc->sc_tmax - 5, 1);
    634       1.23  macallan 			lmtemp_temp_write(sc, LM75_REG_TOS_SET_POINT,
    635       1.28       jdc 			    sc->sc_tmax, 1);
    636       1.35   thorpej 			iic_release_bus(sc->sc_tag, 0);
    637       1.28       jdc 
    638       1.28       jdc 			/* Synchronise envsys - calls lmtemp_getlim_lm75() */
    639       1.28       jdc 			sysmon_envsys_update_limits(sc->sc_sme, &sc->sc_sensor);
    640       1.23  macallan 			return 0;
    641       1.23  macallan 		}
    642       1.23  macallan 		return EINVAL;
    643       1.23  macallan 	} else {
    644       1.23  macallan 
    645       1.23  macallan 		node.sysctl_data = &sc->sc_tmax;
    646       1.23  macallan 		node.sysctl_size = 4;
    647       1.23  macallan 		return (sysctl_lookup(SYSCTLFN_CALL(&node)));
    648       1.23  macallan 	}
    649       1.23  macallan 
    650       1.23  macallan 	return 0;
    651       1.23  macallan }
    652       1.23  macallan 
    653       1.23  macallan SYSCTL_SETUP(sysctl_lmtemp_setup, "sysctl lmtemp subtree setup")
    654       1.23  macallan {
    655       1.23  macallan 
    656       1.23  macallan 	sysctl_createv(NULL, 0, NULL, NULL,
    657       1.23  macallan 		       CTLFLAG_PERMANENT,
    658       1.23  macallan 		       CTLTYPE_NODE, "machdep", NULL,
    659       1.23  macallan 		       NULL, 0, NULL, 0,
    660       1.23  macallan 		       CTL_MACHDEP, CTL_EOL);
    661       1.23  macallan }
    662       1.23  macallan 
    663       1.23  macallan 
    664