adm1021.c revision 1.6 1 1.6 martin /* $NetBSD: adm1021.c,v 1.6 2011/06/19 11:44:03 martin Exp $ */
2 1.1 jkunz /* $OpenBSD: adm1021.c,v 1.27 2007/06/24 05:34:35 dlg Exp $ */
3 1.1 jkunz
4 1.1 jkunz /*
5 1.1 jkunz * Copyright (c) 2005 Theo de Raadt
6 1.1 jkunz *
7 1.1 jkunz * Permission to use, copy, modify, and distribute this software for any
8 1.1 jkunz * purpose with or without fee is hereby granted, provided that the above
9 1.1 jkunz * copyright notice and this permission notice appear in all copies.
10 1.1 jkunz *
11 1.1 jkunz * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 1.1 jkunz * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 1.1 jkunz * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 1.1 jkunz * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 1.1 jkunz * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 1.1 jkunz * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 1.1 jkunz * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18 1.1 jkunz */
19 1.1 jkunz
20 1.1 jkunz #include <sys/cdefs.h>
21 1.6 martin __KERNEL_RCSID(0, "$NetBSD: adm1021.c,v 1.6 2011/06/19 11:44:03 martin Exp $");
22 1.1 jkunz
23 1.1 jkunz #include <sys/param.h>
24 1.1 jkunz #include <sys/systm.h>
25 1.1 jkunz #include <sys/device.h>
26 1.1 jkunz #include <dev/sysmon/sysmonvar.h>
27 1.1 jkunz
28 1.1 jkunz #include <dev/i2c/i2cvar.h>
29 1.1 jkunz
30 1.1 jkunz
31 1.1 jkunz /* ADM 1021 registers */
32 1.1 jkunz #define ADM1021_INT_TEMP 0x00
33 1.1 jkunz #define ADM1021_EXT_TEMP 0x01
34 1.1 jkunz #define ADM1021_STATUS 0x02
35 1.1 jkunz #define ADM1021_STATUS_INVAL 0x7f
36 1.1 jkunz #define ADM1021_STATUS_NOEXT 0x40
37 1.1 jkunz #define ADM1021_CONFIG_READ 0x03
38 1.1 jkunz #define ADM1021_CONFIG_WRITE 0x09
39 1.1 jkunz #define ADM1021_CONFIG_RUN 0x40
40 1.1 jkunz #define ADM1021_COMPANY 0xfe /* contains 0x41 */
41 1.3 hubertf #define ADM1021_DIE_REVISION 0xff
42 1.1 jkunz
43 1.1 jkunz /* Sensors */
44 1.1 jkunz #define ADMTEMP_INT 0
45 1.1 jkunz #define ADMTEMP_EXT 1
46 1.1 jkunz #define ADMTEMP_NUM_SENSORS 2
47 1.1 jkunz
48 1.1 jkunz struct admtemp_softc {
49 1.1 jkunz struct device sc_dev;
50 1.1 jkunz i2c_tag_t sc_tag;
51 1.1 jkunz i2c_addr_t sc_addr;
52 1.1 jkunz
53 1.1 jkunz int sc_noexternal;
54 1.1 jkunz struct sysmon_envsys *sc_sme;
55 1.1 jkunz envsys_data_t sc_sensor[ADMTEMP_NUM_SENSORS];
56 1.1 jkunz };
57 1.1 jkunz
58 1.2 cegger int admtemp_match(device_t, cfdata_t, void *);
59 1.2 cegger void admtemp_attach(device_t, device_t, void *);
60 1.1 jkunz void admtemp_refresh(struct sysmon_envsys *, envsys_data_t *);
61 1.1 jkunz
62 1.1 jkunz CFATTACH_DECL_NEW(admtemp, sizeof(struct admtemp_softc),
63 1.1 jkunz admtemp_match, admtemp_attach, NULL, NULL);
64 1.1 jkunz
65 1.4 martin static const char * admtemp_compats[] = {
66 1.4 martin "i2c-max1617",
67 1.4 martin NULL
68 1.4 martin };
69 1.1 jkunz
70 1.1 jkunz int
71 1.2 cegger admtemp_match(device_t parent, cfdata_t match, void *aux)
72 1.1 jkunz {
73 1.1 jkunz struct i2c_attach_args *ia = aux;
74 1.1 jkunz
75 1.4 martin if (ia->ia_name == NULL) {
76 1.4 martin /*
77 1.4 martin * Indirect config - not much we can do!
78 1.4 martin * Check typical addresses.
79 1.4 martin */
80 1.4 martin if (((ia->ia_addr >= 0x18) && (ia->ia_addr <= 0x1a)) ||
81 1.4 martin ((ia->ia_addr >= 0x29) && (ia->ia_addr <= 0x2b)) ||
82 1.4 martin ((ia->ia_addr >= 0x4c) && (ia->ia_addr <= 0x4e)))
83 1.4 martin return (1);
84 1.4 martin } else {
85 1.4 martin /*
86 1.4 martin * Direct config - match via the list of compatible
87 1.4 martin * hardware.
88 1.4 martin */
89 1.4 martin if (iic_compat_match(ia, admtemp_compats))
90 1.4 martin return 1;
91 1.4 martin }
92 1.1 jkunz
93 1.4 martin return 0;
94 1.1 jkunz }
95 1.1 jkunz
96 1.1 jkunz
97 1.1 jkunz void
98 1.2 cegger admtemp_attach(device_t parent, device_t self, void *aux)
99 1.1 jkunz {
100 1.1 jkunz struct admtemp_softc *sc = device_private(self);
101 1.1 jkunz struct i2c_attach_args *ia = aux;
102 1.1 jkunz u_int8_t cmd, data, stat;
103 1.1 jkunz
104 1.1 jkunz sc->sc_tag = ia->ia_tag;
105 1.1 jkunz sc->sc_addr = ia->ia_addr;
106 1.1 jkunz
107 1.1 jkunz aprint_normal(": ADM1021 or compatible environmental sensor\n");
108 1.5 mrg aprint_naive(": Environmental sensor\n");
109 1.1 jkunz
110 1.1 jkunz iic_acquire_bus(sc->sc_tag, 0);
111 1.1 jkunz cmd = ADM1021_CONFIG_READ;
112 1.1 jkunz if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
113 1.1 jkunz sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) {
114 1.1 jkunz iic_release_bus(sc->sc_tag, 0);
115 1.1 jkunz aprint_error_dev(&sc->sc_dev, "cannot get control register\n");
116 1.1 jkunz return;
117 1.1 jkunz }
118 1.1 jkunz if (data & ADM1021_CONFIG_RUN) {
119 1.1 jkunz cmd = ADM1021_STATUS;
120 1.1 jkunz if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
121 1.1 jkunz sc->sc_addr, &cmd, sizeof cmd, &stat, sizeof stat, 0)) {
122 1.1 jkunz iic_release_bus(sc->sc_tag, 0);
123 1.1 jkunz aprint_error_dev(&sc->sc_dev,
124 1.1 jkunz "cannot read status register\n");
125 1.1 jkunz return;
126 1.1 jkunz }
127 1.1 jkunz if ((stat & ADM1021_STATUS_INVAL) == ADM1021_STATUS_INVAL) {
128 1.1 jkunz if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
129 1.1 jkunz sc->sc_addr, &cmd, sizeof cmd, &stat, sizeof stat,
130 1.1 jkunz 0)) {
131 1.1 jkunz iic_release_bus(sc->sc_tag, 0);
132 1.1 jkunz aprint_error_dev(&sc->sc_dev,
133 1.1 jkunz "cannot read status register\n");
134 1.1 jkunz return;
135 1.1 jkunz }
136 1.1 jkunz }
137 1.1 jkunz
138 1.1 jkunz /* means external is dead */
139 1.1 jkunz if ((stat & ADM1021_STATUS_INVAL) != ADM1021_STATUS_INVAL &&
140 1.1 jkunz (stat & ADM1021_STATUS_NOEXT))
141 1.1 jkunz sc->sc_noexternal = 1;
142 1.1 jkunz
143 1.1 jkunz data &= ~ADM1021_CONFIG_RUN;
144 1.1 jkunz cmd = ADM1021_CONFIG_WRITE;
145 1.1 jkunz if (iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP,
146 1.1 jkunz sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) {
147 1.1 jkunz iic_release_bus(sc->sc_tag, 0);
148 1.1 jkunz aprint_error_dev(&sc->sc_dev,
149 1.1 jkunz "cannot set control register\n");
150 1.1 jkunz return;
151 1.1 jkunz }
152 1.1 jkunz }
153 1.1 jkunz iic_release_bus(sc->sc_tag, 0);
154 1.1 jkunz
155 1.1 jkunz /* Initialize sensor data. */
156 1.6 martin sc->sc_sensor[ADMTEMP_INT].state = ENVSYS_SINVALID;
157 1.1 jkunz sc->sc_sensor[ADMTEMP_INT].units = ENVSYS_STEMP;
158 1.6 martin sc->sc_sensor[ADMTEMP_EXT].state = ENVSYS_SINVALID;
159 1.1 jkunz sc->sc_sensor[ADMTEMP_EXT].units = ENVSYS_STEMP;
160 1.1 jkunz strlcpy(sc->sc_sensor[ADMTEMP_INT].desc, "internal",sizeof("internal"));
161 1.1 jkunz strlcpy(sc->sc_sensor[ADMTEMP_EXT].desc, "external",sizeof("external"));
162 1.1 jkunz sc->sc_sme = sysmon_envsys_create();
163 1.1 jkunz if (sysmon_envsys_sensor_attach(
164 1.1 jkunz sc->sc_sme, &sc->sc_sensor[ADMTEMP_INT])) {
165 1.1 jkunz sysmon_envsys_destroy(sc->sc_sme);
166 1.1 jkunz aprint_error_dev(&sc->sc_dev,
167 1.1 jkunz "unable to attach internal at sysmon\n");
168 1.1 jkunz return;
169 1.1 jkunz }
170 1.1 jkunz if (sc->sc_noexternal == 0 &&
171 1.1 jkunz sysmon_envsys_sensor_attach(
172 1.1 jkunz sc->sc_sme, &sc->sc_sensor[ADMTEMP_EXT])) {
173 1.1 jkunz sysmon_envsys_destroy(sc->sc_sme);
174 1.1 jkunz aprint_error_dev(&sc->sc_dev,
175 1.1 jkunz "unable to attach external at sysmon\n");
176 1.1 jkunz return;
177 1.1 jkunz }
178 1.1 jkunz sc->sc_sme->sme_name = device_xname(self);
179 1.1 jkunz sc->sc_sme->sme_cookie = sc;
180 1.1 jkunz sc->sc_sme->sme_refresh = admtemp_refresh;
181 1.1 jkunz if (sysmon_envsys_register(sc->sc_sme)) {
182 1.1 jkunz aprint_error_dev(&sc->sc_dev,
183 1.1 jkunz "unable to register with sysmon\n");
184 1.1 jkunz sysmon_envsys_destroy(sc->sc_sme);
185 1.1 jkunz return;
186 1.1 jkunz }
187 1.1 jkunz }
188 1.1 jkunz
189 1.1 jkunz
190 1.1 jkunz void
191 1.1 jkunz admtemp_refresh(struct sysmon_envsys *sme, envsys_data_t *edata)
192 1.1 jkunz {
193 1.1 jkunz struct admtemp_softc *sc = sme->sme_cookie;
194 1.1 jkunz u_int8_t cmd;
195 1.1 jkunz int8_t sdata;
196 1.1 jkunz
197 1.1 jkunz iic_acquire_bus(sc->sc_tag, 0);
198 1.1 jkunz
199 1.1 jkunz if (edata->sensor == ADMTEMP_INT)
200 1.1 jkunz cmd = ADM1021_INT_TEMP;
201 1.1 jkunz else
202 1.1 jkunz cmd = ADM1021_EXT_TEMP;
203 1.1 jkunz if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr,
204 1.1 jkunz &cmd, sizeof cmd, &sdata, sizeof sdata, 0) == 0) {
205 1.1 jkunz if (sdata == ADM1021_STATUS_INVAL) {
206 1.1 jkunz edata->state = ENVSYS_SINVALID;
207 1.1 jkunz } else {
208 1.1 jkunz edata->value_cur = 273150000 + 1000000 * sdata;
209 1.1 jkunz edata->state = ENVSYS_SVALID;
210 1.1 jkunz }
211 1.1 jkunz }
212 1.1 jkunz
213 1.1 jkunz iic_release_bus(sc->sc_tag, 0);
214 1.1 jkunz }
215