dstemp.c revision 1.5 1 /* $NetBSD: dstemp.c,v 1.5 2020/02/28 13:18:25 macallan Exp $ */
2
3 /*-
4 * Copyright (c) 2018 Michael Lorenz
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
17 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 __KERNEL_RCSID(0, "$NetBSD: dstemp.c,v 1.5 2020/02/28 13:18:25 macallan Exp $");
31
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/device.h>
35 #include <sys/conf.h>
36 #include <sys/bus.h>
37
38 #include <dev/i2c/i2cvar.h>
39
40 #include <dev/sysmon/sysmonvar.h>
41
42 #ifdef macppc
43 #define HAVE_OF 1
44 #endif
45
46 #ifdef HAVE_OF
47 #include <dev/ofw/openfirm.h>
48 #endif
49
50 #define DSTEMP_CMD_START 0x51 /* command, no data */
51 #define DSTEMP_CMD_POR 0x54 /* command, no data */
52 #define DSTEMP_CMD_STOP 0x22 /* command, no data */
53 #define DSTEMP_TCURRENT 0xaa /* current temperature, 2 bytes */
54 #define DSTEMP_THIGH 0xa1 /* high threshold, 2 bytes */
55 #define DSTEMP_TLOW 0xa2 /* low threshold, 2 bytes */
56 #define DSTEMP_CONFIG 0xac /* 1 byte */
57
58 #define DSTEMP_1SHOT 0x01
59 #define DSTEMP_POL 0x02 /* Tout polarity, 1 - active high */
60 #define DSTEMP_8BIT 0x00
61 #define DSTEMP_10BIT 0x04
62 #define DSTEMP_11BIT 0x08
63 #define DSTEMP_12BIT 0x0c
64 #define DSTEMP_RES_MASK 0x0c
65 #define DSTEMP_NVB 0x10 /* EEPROM busy */
66 #define DSTEMP_TLF 0x20 /* temperature low flag */
67 #define DSTEMP_THF 0x40 /* temperature high flag */
68 #define DSTEMP_DONE 0x80
69
70 struct dstemp_softc {
71 device_t sc_dev;
72 i2c_tag_t sc_i2c;
73 i2c_addr_t sc_addr;
74
75 struct sysmon_envsys *sc_sme;
76 envsys_data_t sc_sensor_temp;
77 };
78
79 static int dstemp_match(device_t, cfdata_t, void *);
80 static void dstemp_attach(device_t, device_t, void *);
81
82 static void dstemp_sensors_refresh(struct sysmon_envsys *, envsys_data_t *);
83 static void dstemp_init(struct dstemp_softc *);
84
85 CFATTACH_DECL_NEW(dstemp, sizeof(struct dstemp_softc),
86 dstemp_match, dstemp_attach, NULL, NULL);
87
88 static const struct device_compatible_entry compat_data[] = {
89 { "ds1631", 0 },
90 { NULL, 0 }
91 };
92
93 static int
94 dstemp_match(device_t parent, cfdata_t match, void *aux)
95 {
96 struct i2c_attach_args *ia = aux;
97 int match_result;
98
99 if (iic_use_direct_match(ia, match, compat_data, &match_result))
100 return match_result;
101
102 if ((ia->ia_addr & 0xf8) == 0x48)
103 return I2C_MATCH_ADDRESS_ONLY;
104
105 return 0;
106 }
107
108 static void
109 dstemp_attach(device_t parent, device_t self, void *aux)
110 {
111 struct dstemp_softc *sc = device_private(self);
112 struct i2c_attach_args *ia = aux;
113 char name[64] = "temperature";
114
115 sc->sc_dev = self;
116 sc->sc_i2c = ia->ia_tag;
117 sc->sc_addr = ia->ia_addr;
118
119 aprint_naive("\n");
120 aprint_normal(": DS1361\n");
121
122 dstemp_init(sc);
123
124 sc->sc_sme = sysmon_envsys_create();
125 sc->sc_sme->sme_name = device_xname(self);
126 sc->sc_sme->sme_cookie = sc;
127 sc->sc_sme->sme_refresh = dstemp_sensors_refresh;
128
129 sc->sc_sensor_temp.units = ENVSYS_STEMP;
130 sc->sc_sensor_temp.state = ENVSYS_SINVALID;
131 #ifdef HAVE_OF
132 int ch;
133 ch = OF_child(ia->ia_cookie);
134 if (ch != 0) {
135 OF_getprop(ch, "location", name, 64);
136 }
137 #endif
138 strncpy(sc->sc_sensor_temp.desc, name, sizeof(sc->sc_sensor_temp.desc));
139
140 sysmon_envsys_sensor_attach(sc->sc_sme, &sc->sc_sensor_temp);
141
142 sysmon_envsys_register(sc->sc_sme);
143 }
144
145 static void
146 dstemp_init(struct dstemp_softc *sc)
147 {
148 int error;
149 uint8_t cmd[2], data;
150
151 iic_acquire_bus(sc->sc_i2c, 0);
152 cmd[0] = DSTEMP_CONFIG;
153 data = 0;
154 error = iic_exec(sc->sc_i2c, I2C_OP_READ_WITH_STOP,
155 sc->sc_addr, cmd, 1, &data, 1, 0);
156 /* we don't want to change the POL bit, so preserve it */
157 cmd[1] = (data & DSTEMP_POL) | DSTEMP_12BIT;
158 error |= iic_exec(sc->sc_i2c, I2C_OP_WRITE_WITH_STOP,
159 sc->sc_addr, cmd, 2, NULL, 0, 0);
160 /* ... and start converting */
161 cmd[0] = DSTEMP_CMD_START;
162 error |= iic_exec(sc->sc_i2c, I2C_OP_WRITE_WITH_STOP,
163 sc->sc_addr, cmd, 1, NULL, 0, 0);
164 if (error) aprint_error_dev(sc->sc_dev, "chip initialization failed\n");
165 iic_release_bus(sc->sc_i2c, 0);
166 }
167
168 static void
169 dstemp_sensors_refresh(struct sysmon_envsys *sme, envsys_data_t *edata)
170 {
171 struct dstemp_softc *sc = sme->sme_cookie;
172 uint8_t cmd = DSTEMP_TCURRENT;
173 uint16_t data = 0;
174 int error;
175
176
177 iic_acquire_bus(sc->sc_i2c, 0);
178 error = iic_exec(sc->sc_i2c, I2C_OP_READ_WITH_STOP,
179 sc->sc_addr, &cmd, 1, &data, 2, 0);
180 iic_release_bus(sc->sc_i2c, 0);
181
182 if (error) {
183 edata->state = ENVSYS_SINVALID;
184 } else {
185 edata->value_cur =
186 ((uint64_t)(be16toh(data) >> 4) * 62500) +
187 + 273150000;
188 if (edata->value_cur > (273150000 + 120000000)) {
189 edata->state = ENVSYS_SINVALID;
190 } else
191 edata->state = ENVSYS_SVALID;
192 }
193 }
194