acpi_tz.c revision 1.77 1 1.77 jruoho /* $NetBSD: acpi_tz.c,v 1.77 2011/01/09 14:58:10 jruoho Exp $ */
2 1.1 jmcneill
3 1.1 jmcneill /*
4 1.1 jmcneill * Copyright (c) 2003 Jared D. McNeill <jmcneill (at) invisible.ca>
5 1.1 jmcneill * All rights reserved.
6 1.1 jmcneill *
7 1.1 jmcneill * Redistribution and use in source and binary forms, with or without
8 1.1 jmcneill * modification, are permitted provided that the following conditions
9 1.1 jmcneill * are met:
10 1.1 jmcneill * 1. Redistributions of source code must retain the above copyright
11 1.1 jmcneill * notice, this list of conditions and the following disclaimer.
12 1.1 jmcneill * 2. The name of the author may not be used to endorse or promote products
13 1.1 jmcneill * derived from this software without specific prior written permission.
14 1.1 jmcneill *
15 1.1 jmcneill * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 1.1 jmcneill * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 1.1 jmcneill * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 1.1 jmcneill * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 1.1 jmcneill * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
20 1.1 jmcneill * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
21 1.1 jmcneill * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
22 1.1 jmcneill * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
23 1.1 jmcneill * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 1.1 jmcneill * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 1.1 jmcneill * SUCH DAMAGE.
26 1.1 jmcneill */
27 1.1 jmcneill
28 1.1 jmcneill /*
29 1.1 jmcneill * ACPI Thermal Zone driver
30 1.1 jmcneill */
31 1.1 jmcneill
32 1.1 jmcneill #include <sys/cdefs.h>
33 1.77 jruoho __KERNEL_RCSID(0, "$NetBSD: acpi_tz.c,v 1.77 2011/01/09 14:58:10 jruoho Exp $");
34 1.1 jmcneill
35 1.1 jmcneill #include <sys/param.h>
36 1.1 jmcneill #include <sys/device.h>
37 1.1 jmcneill #include <sys/callout.h>
38 1.61 jruoho #include <sys/kernel.h>
39 1.75 jruoho #include <sys/module.h>
40 1.61 jruoho #include <sys/systm.h>
41 1.1 jmcneill
42 1.1 jmcneill #include <dev/acpi/acpireg.h>
43 1.1 jmcneill #include <dev/acpi/acpivar.h>
44 1.67 jruoho #include <dev/acpi/acpi_power.h>
45 1.1 jmcneill
46 1.69 jruoho #define _COMPONENT ACPI_TZ_COMPONENT
47 1.69 jruoho ACPI_MODULE_NAME ("acpi_tz")
48 1.47 mlelstv
49 1.71 jruoho #define ACPI_NOTIFY_TZ_ZONE 0x80
50 1.71 jruoho #define ACPI_NOTIFY_TZ_TRIP 0x81
51 1.71 jruoho #define ACPI_NOTIFY_TZ_DEVLIST 0x82
52 1.71 jruoho
53 1.69 jruoho #define ATZ_F_CRITICAL 0x01 /* zone critical */
54 1.69 jruoho #define ATZ_F_HOT 0x02 /* zone hot */
55 1.69 jruoho #define ATZ_F_PASSIVE 0x04 /* zone passive cooling */
56 1.69 jruoho #define ATZ_F_PASSIVEONLY 0x08 /* zone is passive cooling only */
57 1.1 jmcneill
58 1.69 jruoho #define ATZ_ACTIVE_NONE -1
59 1.1 jmcneill
60 1.1 jmcneill /*
61 1.69 jruoho * The constants are as follows:
62 1.69 jruoho *
63 1.69 jruoho * ATZ_TZP_RATE default polling interval (30 seconds) if no _TZP
64 1.69 jruoho * ATZ_NLEVELS number of cooling levels for _ACx and _ALx
65 1.69 jruoho * ATZ_ZEROC 0 C, measured in 0.1 Kelvin
66 1.69 jruoho * ATZ_TMP_INVALID temporarily invalid temperature
67 1.69 jruoho * ATZ_ZONE_EXPIRE zone info refetch interval (15 minutes)
68 1.1 jmcneill */
69 1.69 jruoho #define ATZ_TZP_RATE 300
70 1.69 jruoho #define ATZ_NLEVELS 10
71 1.69 jruoho #define ATZ_ZEROC 2732
72 1.69 jruoho #define ATZ_TMP_INVALID 0xffffffff
73 1.69 jruoho #define ATZ_ZONE_EXPIRE 9000
74 1.45 pgoyette
75 1.69 jruoho /*
76 1.69 jruoho * All temperatures are reported in 0.1 Kelvin.
77 1.69 jruoho * The ACPI specification assumes that K = C + 273.2
78 1.69 jruoho * rather than the nominal 273.15 used by envsys(4).
79 1.69 jruoho */
80 1.45 pgoyette #define ATZ2UKELVIN(t) ((t) * 100000 - 50000)
81 1.45 pgoyette
82 1.1 jmcneill struct acpitz_zone {
83 1.69 jruoho ACPI_BUFFER al[ATZ_NLEVELS];
84 1.69 jruoho uint32_t ac[ATZ_NLEVELS];
85 1.69 jruoho uint32_t crt;
86 1.69 jruoho uint32_t hot;
87 1.69 jruoho uint32_t rtv;
88 1.69 jruoho uint32_t psv;
89 1.69 jruoho uint32_t tc1;
90 1.69 jruoho uint32_t tc2;
91 1.69 jruoho uint32_t tmp;
92 1.69 jruoho uint32_t prevtmp;
93 1.69 jruoho uint32_t tzp;
94 1.69 jruoho uint32_t fanmin;
95 1.69 jruoho uint32_t fanmax;
96 1.69 jruoho uint32_t fancurrent;
97 1.1 jmcneill };
98 1.1 jmcneill
99 1.1 jmcneill struct acpitz_softc {
100 1.69 jruoho struct acpi_devnode *sc_node;
101 1.69 jruoho struct sysmon_envsys *sc_sme;
102 1.69 jruoho struct acpitz_zone sc_zone;
103 1.69 jruoho struct callout sc_callout;
104 1.69 jruoho envsys_data_t sc_temp_sensor;
105 1.69 jruoho envsys_data_t sc_fan_sensor;
106 1.69 jruoho int sc_active;
107 1.69 jruoho int sc_flags;
108 1.69 jruoho int sc_zone_expire;
109 1.69 jruoho bool sc_first;
110 1.69 jruoho bool sc_have_fan;
111 1.1 jmcneill };
112 1.1 jmcneill
113 1.69 jruoho static int acpitz_match(device_t, cfdata_t, void *);
114 1.69 jruoho static void acpitz_attach(device_t, device_t, void *);
115 1.69 jruoho static int acpitz_detach(device_t, int);
116 1.69 jruoho static void acpitz_get_status(void *);
117 1.69 jruoho static void acpitz_get_zone(void *, int);
118 1.69 jruoho static void acpitz_get_zone_quiet(void *);
119 1.69 jruoho static char *acpitz_celcius_string(int);
120 1.69 jruoho static void acpitz_power_off(struct acpitz_softc *);
121 1.69 jruoho static void acpitz_power_zone(struct acpitz_softc *, int, int);
122 1.69 jruoho static void acpitz_sane_temp(uint32_t *tmp);
123 1.69 jruoho static ACPI_STATUS acpitz_switch_cooler(ACPI_OBJECT *, void *);
124 1.69 jruoho static void acpitz_notify_handler(ACPI_HANDLE, uint32_t, void *);
125 1.69 jruoho static int acpitz_get_integer(device_t, const char *, uint32_t *);
126 1.69 jruoho static void acpitz_tick(void *);
127 1.69 jruoho static void acpitz_init_envsys(device_t);
128 1.69 jruoho static void acpitz_get_limits(struct sysmon_envsys *,
129 1.69 jruoho envsys_data_t *,
130 1.69 jruoho sysmon_envsys_lim_t *, uint32_t *);
131 1.69 jruoho static int acpitz_get_fanspeed(device_t, uint32_t *,
132 1.69 jruoho uint32_t *, uint32_t *);
133 1.49 cegger #ifdef notyet
134 1.69 jruoho static ACPI_STATUS acpitz_set_fanspeed(device_t, uint32_t);
135 1.49 cegger #endif
136 1.1 jmcneill
137 1.68 jruoho CFATTACH_DECL_NEW(acpitz, sizeof(struct acpitz_softc),
138 1.68 jruoho acpitz_match, acpitz_attach, acpitz_detach, NULL);
139 1.1 jmcneill
140 1.1 jmcneill /*
141 1.1 jmcneill * acpitz_match: autoconf(9) match routine
142 1.1 jmcneill */
143 1.11 kochi static int
144 1.33 xtraeme acpitz_match(device_t parent, cfdata_t match, void *aux)
145 1.1 jmcneill {
146 1.1 jmcneill struct acpi_attach_args *aa = aux;
147 1.1 jmcneill
148 1.1 jmcneill if (aa->aa_node->ad_type != ACPI_TYPE_THERMAL)
149 1.1 jmcneill return 0;
150 1.1 jmcneill
151 1.1 jmcneill return 1;
152 1.1 jmcneill }
153 1.1 jmcneill
154 1.1 jmcneill /*
155 1.1 jmcneill * acpitz_attach: autoconf(9) attach routine
156 1.1 jmcneill */
157 1.11 kochi static void
158 1.33 xtraeme acpitz_attach(device_t parent, device_t self, void *aux)
159 1.1 jmcneill {
160 1.33 xtraeme struct acpitz_softc *sc = device_private(self);
161 1.1 jmcneill struct acpi_attach_args *aa = aux;
162 1.69 jruoho ACPI_INTEGER val;
163 1.1 jmcneill ACPI_STATUS rv;
164 1.1 jmcneill
165 1.29 jmcneill aprint_naive("\n");
166 1.63 jruoho aprint_normal(": ACPI Thermal Zone\n");
167 1.1 jmcneill
168 1.69 jruoho sc->sc_first = true;
169 1.69 jruoho sc->sc_have_fan = false;
170 1.69 jruoho sc->sc_node = aa->aa_node;
171 1.69 jruoho sc->sc_zone.tzp = ATZ_TZP_RATE;
172 1.69 jruoho
173 1.69 jruoho /*
174 1.69 jruoho * The _TZP (ACPI 4.0, p. 430) defines the recommended
175 1.69 jruoho * polling interval (in tenths of seconds). A value zero
176 1.69 jruoho * means that polling "should not be necessary".
177 1.69 jruoho */
178 1.69 jruoho rv = acpi_eval_integer(sc->sc_node->ad_handle, "_TZP", &val);
179 1.69 jruoho
180 1.69 jruoho if (ACPI_SUCCESS(rv) && val != 0)
181 1.69 jruoho sc->sc_zone.tzp = val;
182 1.31 jmcneill
183 1.76 jruoho aprint_debug_dev(self, "polling interval %d.%d seconds\n",
184 1.31 jmcneill sc->sc_zone.tzp / 10, sc->sc_zone.tzp % 10);
185 1.3 mycroft
186 1.69 jruoho sc->sc_zone_expire = ATZ_ZONE_EXPIRE / sc->sc_zone.tzp;
187 1.10 kochi
188 1.69 jruoho /*
189 1.69 jruoho * XXX: The fan controls seen here are available on
190 1.69 jruoho * some HP laptops. Arguably these should not
191 1.69 jruoho * appear in a generic device driver like this.
192 1.69 jruoho */
193 1.69 jruoho if (acpitz_get_fanspeed(self, &sc->sc_zone.fanmin,
194 1.69 jruoho &sc->sc_zone.fanmax, &sc->sc_zone.fancurrent) == 0)
195 1.69 jruoho sc->sc_have_fan = true;
196 1.13 kochi
197 1.33 xtraeme acpitz_get_zone(self, 1);
198 1.33 xtraeme acpitz_get_status(self);
199 1.1 jmcneill
200 1.68 jruoho (void)pmf_device_register(self, NULL, NULL);
201 1.77 jruoho (void)acpi_power_register(sc->sc_node->ad_handle);
202 1.69 jruoho (void)acpi_register_notify(sc->sc_node, acpitz_notify_handler);
203 1.1 jmcneill
204 1.33 xtraeme callout_init(&sc->sc_callout, CALLOUT_MPSAFE);
205 1.33 xtraeme callout_setfunc(&sc->sc_callout, acpitz_tick, self);
206 1.1 jmcneill
207 1.33 xtraeme acpitz_init_envsys(self);
208 1.25 joerg
209 1.68 jruoho callout_schedule(&sc->sc_callout, sc->sc_zone.tzp * hz / 10);
210 1.68 jruoho }
211 1.68 jruoho
212 1.68 jruoho static int
213 1.68 jruoho acpitz_detach(device_t self, int flags)
214 1.68 jruoho {
215 1.68 jruoho struct acpitz_softc *sc = device_private(self);
216 1.68 jruoho ACPI_HANDLE hdl;
217 1.68 jruoho ACPI_BUFFER al;
218 1.68 jruoho ACPI_STATUS rv;
219 1.68 jruoho int i;
220 1.68 jruoho
221 1.68 jruoho callout_halt(&sc->sc_callout, NULL);
222 1.68 jruoho callout_destroy(&sc->sc_callout);
223 1.68 jruoho
224 1.68 jruoho pmf_device_deregister(self);
225 1.69 jruoho acpi_deregister_notify(sc->sc_node);
226 1.68 jruoho
227 1.68 jruoho /*
228 1.68 jruoho * Although the device itself should not contain any power
229 1.68 jruoho * resources, we have possibly used the resources of active
230 1.68 jruoho * cooling devices. To unregister these, first fetch a fresh
231 1.68 jruoho * active cooling zone, and then detach the resources from
232 1.68 jruoho * the reference handles contained in the cooling zone.
233 1.68 jruoho */
234 1.68 jruoho acpitz_get_zone(self, 0);
235 1.68 jruoho
236 1.68 jruoho for (i = 0; i < ATZ_NLEVELS; i++) {
237 1.68 jruoho
238 1.68 jruoho if (sc->sc_zone.al[i].Pointer == NULL)
239 1.68 jruoho continue;
240 1.68 jruoho
241 1.68 jruoho al = sc->sc_zone.al[i];
242 1.68 jruoho rv = acpi_eval_reference_handle(al.Pointer, &hdl);
243 1.68 jruoho
244 1.68 jruoho if (ACPI_SUCCESS(rv))
245 1.74 jruoho acpi_power_deregister(hdl);
246 1.68 jruoho
247 1.68 jruoho ACPI_FREE(sc->sc_zone.al[i].Pointer);
248 1.68 jruoho }
249 1.32 jmcneill
250 1.68 jruoho if (sc->sc_sme != NULL)
251 1.68 jruoho sysmon_envsys_unregister(sc->sc_sme);
252 1.68 jruoho
253 1.68 jruoho return 0;
254 1.1 jmcneill }
255 1.1 jmcneill
256 1.11 kochi static void
257 1.14 martin acpitz_get_zone_quiet(void *opaque)
258 1.14 martin {
259 1.14 martin acpitz_get_zone(opaque, 0);
260 1.14 martin }
261 1.14 martin
262 1.14 martin static void
263 1.1 jmcneill acpitz_get_status(void *opaque)
264 1.1 jmcneill {
265 1.33 xtraeme device_t dv = opaque;
266 1.33 xtraeme struct acpitz_softc *sc = device_private(dv);
267 1.76 jruoho uint32_t tmp, fmin, fmax, fcurrent;
268 1.76 jruoho int active, changed, flags, i;
269 1.13 kochi
270 1.13 kochi sc->sc_zone_expire--;
271 1.69 jruoho
272 1.13 kochi if (sc->sc_zone_expire <= 0) {
273 1.13 kochi sc->sc_zone_expire = ATZ_ZONE_EXPIRE / sc->sc_zone.tzp;
274 1.69 jruoho
275 1.69 jruoho ACPI_DEBUG_PRINT((ACPI_DB_INFO,
276 1.69 jruoho "%s: zone refetch forced\n", device_xname(dv)));
277 1.69 jruoho
278 1.34 xtraeme acpitz_get_zone(dv, 0);
279 1.13 kochi }
280 1.3 mycroft
281 1.63 jruoho if (acpitz_get_integer(dv, "_TMP", &tmp) != 0)
282 1.3 mycroft return;
283 1.49 cegger
284 1.49 cegger sc->sc_zone.prevtmp = sc->sc_zone.tmp;
285 1.13 kochi sc->sc_zone.tmp = tmp;
286 1.69 jruoho
287 1.69 jruoho if (sc->sc_first != false)
288 1.69 jruoho sc->sc_zone.prevtmp = tmp; /* XXX: Sanity check? */
289 1.1 jmcneill
290 1.49 cegger if (acpitz_get_fanspeed(dv, &fmin, &fmax, &fcurrent) == 0) {
291 1.69 jruoho
292 1.49 cegger if (fcurrent != ATZ_TMP_INVALID)
293 1.49 cegger sc->sc_zone.fancurrent = fcurrent;
294 1.49 cegger }
295 1.49 cegger
296 1.69 jruoho sc->sc_temp_sensor.state = ENVSYS_SVALID;
297 1.69 jruoho sc->sc_temp_sensor.value_cur = ATZ2UKELVIN(sc->sc_zone.tmp);
298 1.69 jruoho
299 1.69 jruoho sc->sc_fan_sensor.state = ENVSYS_SVALID;
300 1.69 jruoho sc->sc_fan_sensor.value_cur = sc->sc_zone.fancurrent;
301 1.69 jruoho
302 1.69 jruoho ACPI_DEBUG_PRINT((ACPI_DB_INFO, "%s: zone temperature is %s C\n",
303 1.69 jruoho device_xname(dv), acpitz_celcius_string(sc->sc_zone.tmp)));
304 1.69 jruoho
305 1.7 soren /*
306 1.69 jruoho * XXX: Passive cooling is not yet supported.
307 1.7 soren */
308 1.69 jruoho if ((sc->sc_flags & ATZ_F_PASSIVEONLY) != 0)
309 1.69 jruoho return;
310 1.69 jruoho
311 1.69 jruoho /*
312 1.69 jruoho * As noted in ACPI 4.0 (p. 420), the temperature
313 1.69 jruoho * thresholds are conveyed in the optional _ACx
314 1.69 jruoho * object (x = 0 ... 9). The smaller the x, the
315 1.69 jruoho * greater the cooling level. We prefer to keep
316 1.69 jruoho * the highest cooling mode when in "active".
317 1.69 jruoho */
318 1.69 jruoho active = ATZ_ACTIVE_NONE;
319 1.69 jruoho
320 1.69 jruoho for (i = ATZ_NLEVELS - 1; i >= 0; i--) {
321 1.69 jruoho
322 1.69 jruoho if (sc->sc_zone.ac[i] == ATZ_TMP_INVALID)
323 1.69 jruoho continue;
324 1.69 jruoho
325 1.69 jruoho if (sc->sc_zone.ac[i] <= tmp)
326 1.69 jruoho active = i;
327 1.69 jruoho }
328 1.69 jruoho
329 1.69 jruoho flags = sc->sc_flags & ~(ATZ_F_CRITICAL | ATZ_F_HOT | ATZ_F_PASSIVE);
330 1.69 jruoho
331 1.69 jruoho if (sc->sc_zone.psv != ATZ_TMP_INVALID && tmp >= sc->sc_zone.psv)
332 1.69 jruoho flags |= ATZ_F_PASSIVE;
333 1.49 cegger
334 1.69 jruoho if (sc->sc_zone.hot != ATZ_TMP_INVALID && tmp >= sc->sc_zone.hot)
335 1.69 jruoho flags |= ATZ_F_HOT;
336 1.1 jmcneill
337 1.69 jruoho if (sc->sc_zone.crt != ATZ_TMP_INVALID && tmp >= sc->sc_zone.crt)
338 1.69 jruoho flags |= ATZ_F_CRITICAL;
339 1.1 jmcneill
340 1.69 jruoho if (flags != sc->sc_flags) {
341 1.13 kochi
342 1.69 jruoho changed = (sc->sc_flags ^ flags) & flags;
343 1.69 jruoho sc->sc_flags = flags;
344 1.13 kochi
345 1.69 jruoho if ((changed & ATZ_F_CRITICAL) != 0) {
346 1.69 jruoho sc->sc_temp_sensor.state = ENVSYS_SCRITOVER;
347 1.13 kochi
348 1.69 jruoho aprint_debug_dev(dv, "zone went critical, %s C\n",
349 1.69 jruoho acpitz_celcius_string(tmp));
350 1.13 kochi
351 1.69 jruoho } else if ((changed & ATZ_F_HOT) != 0) {
352 1.69 jruoho sc->sc_temp_sensor.state = ENVSYS_SCRITOVER;
353 1.13 kochi
354 1.69 jruoho aprint_debug_dev(dv, "zone went hot, %s C\n",
355 1.69 jruoho acpitz_celcius_string(tmp));
356 1.13 kochi }
357 1.13 kochi }
358 1.13 kochi
359 1.69 jruoho /* Power on the fans. */
360 1.69 jruoho if (sc->sc_active != active) {
361 1.69 jruoho
362 1.69 jruoho if (sc->sc_active != ATZ_ACTIVE_NONE)
363 1.69 jruoho acpitz_power_zone(sc, sc->sc_active, 0);
364 1.69 jruoho
365 1.69 jruoho ACPI_DEBUG_PRINT((ACPI_DB_INFO, "%s: active cooling "
366 1.76 jruoho "level %d\n", device_xname(dv), active));
367 1.69 jruoho
368 1.69 jruoho if (active != ATZ_ACTIVE_NONE)
369 1.69 jruoho acpitz_power_zone(sc, active, 1);
370 1.69 jruoho
371 1.69 jruoho sc->sc_active = active;
372 1.69 jruoho }
373 1.1 jmcneill }
374 1.1 jmcneill
375 1.13 kochi static char *
376 1.13 kochi acpitz_celcius_string(int dk)
377 1.13 kochi {
378 1.13 kochi static char buf[10];
379 1.59 pgoyette int dc;
380 1.13 kochi
381 1.59 pgoyette dc = abs(dk - ATZ_ZEROC);
382 1.69 jruoho
383 1.69 jruoho (void)snprintf(buf, sizeof(buf), "%s%d.%d",
384 1.69 jruoho (dk >= ATZ_ZEROC) ? "" : "-", dc / 10, dc % 10);
385 1.13 kochi
386 1.13 kochi return buf;
387 1.13 kochi }
388 1.13 kochi
389 1.13 kochi static ACPI_STATUS
390 1.13 kochi acpitz_switch_cooler(ACPI_OBJECT *obj, void *arg)
391 1.13 kochi {
392 1.68 jruoho int flag, pwr_state;
393 1.13 kochi ACPI_HANDLE cooler;
394 1.13 kochi ACPI_STATUS rv;
395 1.13 kochi
396 1.68 jruoho /*
397 1.68 jruoho * The _ALx object is a package in which the elements
398 1.68 jruoho * are reference handles to an active cooling device
399 1.68 jruoho * (typically PNP0C0B, ACPI fan device). Try to turn
400 1.68 jruoho * on (or off) the power resources behind these handles
401 1.68 jruoho * to start (or terminate) the active cooling.
402 1.68 jruoho */
403 1.13 kochi flag = *(int *)arg;
404 1.68 jruoho pwr_state = (flag != 0) ? ACPI_STATE_D0 : ACPI_STATE_D3;
405 1.13 kochi
406 1.56 jruoho rv = acpi_eval_reference_handle(obj, &cooler);
407 1.67 jruoho
408 1.69 jruoho if (ACPI_FAILURE(rv))
409 1.56 jruoho return rv;
410 1.13 kochi
411 1.74 jruoho (void)acpi_power_set(cooler, pwr_state);
412 1.13 kochi
413 1.13 kochi return AE_OK;
414 1.13 kochi }
415 1.13 kochi
416 1.13 kochi /*
417 1.13 kochi * acpitz_power_zone:
418 1.69 jruoho *
419 1.69 jruoho * Power on or off the i:th part of the zone zone.
420 1.13 kochi */
421 1.13 kochi static void
422 1.13 kochi acpitz_power_zone(struct acpitz_softc *sc, int i, int on)
423 1.13 kochi {
424 1.69 jruoho
425 1.13 kochi KASSERT(i >= 0 && i < ATZ_NLEVELS);
426 1.13 kochi
427 1.69 jruoho (void)acpi_foreach_package_object(sc->sc_zone.al[i].Pointer,
428 1.13 kochi acpitz_switch_cooler, &on);
429 1.13 kochi }
430 1.13 kochi
431 1.13 kochi
432 1.13 kochi /*
433 1.13 kochi * acpitz_power_off:
434 1.69 jruoho *
435 1.69 jruoho * Power off parts of the zone.
436 1.13 kochi */
437 1.13 kochi static void
438 1.13 kochi acpitz_power_off(struct acpitz_softc *sc)
439 1.13 kochi {
440 1.13 kochi int i;
441 1.13 kochi
442 1.13 kochi for (i = 0 ; i < ATZ_NLEVELS; i++) {
443 1.69 jruoho
444 1.13 kochi if (sc->sc_zone.al[i].Pointer == NULL)
445 1.13 kochi continue;
446 1.69 jruoho
447 1.13 kochi acpitz_power_zone(sc, i, 0);
448 1.13 kochi }
449 1.69 jruoho
450 1.13 kochi sc->sc_active = ATZ_ACTIVE_NONE;
451 1.69 jruoho sc->sc_flags &= ~(ATZ_F_CRITICAL | ATZ_F_HOT | ATZ_F_PASSIVE);
452 1.13 kochi }
453 1.13 kochi
454 1.13 kochi static void
455 1.14 martin acpitz_get_zone(void *opaque, int verbose)
456 1.13 kochi {
457 1.33 xtraeme device_t dv = opaque;
458 1.33 xtraeme struct acpitz_softc *sc = device_private(dv);
459 1.69 jruoho int comma, i, valid_levels;
460 1.69 jruoho ACPI_OBJECT *obj;
461 1.13 kochi ACPI_STATUS rv;
462 1.69 jruoho char buf[5];
463 1.13 kochi
464 1.69 jruoho if (sc->sc_first != true) {
465 1.13 kochi acpitz_power_off(sc);
466 1.13 kochi
467 1.13 kochi for (i = 0; i < ATZ_NLEVELS; i++) {
468 1.69 jruoho
469 1.13 kochi if (sc->sc_zone.al[i].Pointer != NULL)
470 1.47 mlelstv ACPI_FREE(sc->sc_zone.al[i].Pointer);
471 1.69 jruoho
472 1.13 kochi sc->sc_zone.al[i].Pointer = NULL;
473 1.13 kochi }
474 1.63 jruoho }
475 1.13 kochi
476 1.13 kochi valid_levels = 0;
477 1.13 kochi
478 1.13 kochi for (i = 0; i < ATZ_NLEVELS; i++) {
479 1.13 kochi
480 1.69 jruoho (void)snprintf(buf, sizeof(buf), "_AC%d", i);
481 1.69 jruoho
482 1.33 xtraeme if (acpitz_get_integer(dv, buf, &sc->sc_zone.ac[i]))
483 1.13 kochi continue;
484 1.13 kochi
485 1.69 jruoho (void)snprintf(buf, sizeof(buf), "_AL%d", i);
486 1.69 jruoho
487 1.69 jruoho rv = acpi_eval_struct(sc->sc_node->ad_handle, buf,
488 1.13 kochi &sc->sc_zone.al[i]);
489 1.69 jruoho
490 1.13 kochi if (ACPI_FAILURE(rv)) {
491 1.13 kochi sc->sc_zone.al[i].Pointer = NULL;
492 1.13 kochi continue;
493 1.13 kochi }
494 1.13 kochi
495 1.13 kochi obj = sc->sc_zone.al[i].Pointer;
496 1.69 jruoho
497 1.69 jruoho if (obj->Type != ACPI_TYPE_PACKAGE) {
498 1.69 jruoho sc->sc_zone.al[i].Pointer = NULL;
499 1.69 jruoho ACPI_FREE(obj);
500 1.69 jruoho continue;
501 1.13 kochi }
502 1.13 kochi
503 1.69 jruoho if (sc->sc_first != false)
504 1.72 plunky aprint_normal_dev(dv, "active cooling level %d: %sC\n",
505 1.72 plunky i, acpitz_celcius_string(sc->sc_zone.ac[i]));
506 1.13 kochi
507 1.13 kochi valid_levels++;
508 1.13 kochi }
509 1.13 kochi
510 1.69 jruoho /*
511 1.69 jruoho * A brief summary (ACPI 4.0, section 11.4):
512 1.69 jruoho *
513 1.69 jruoho * _TMP : current temperature (in tenths of degrees)
514 1.69 jruoho * _CRT : critical trip-point at which to shutdown
515 1.69 jruoho * _HOT : critical trip-point at which to go to S4
516 1.69 jruoho * _PSV : passive cooling policy threshold
517 1.69 jruoho * _TC1 : thermal constant for passive cooling
518 1.69 jruoho * _TC2 : thermal constant for passive cooling
519 1.69 jruoho */
520 1.69 jruoho (void)acpitz_get_integer(dv, "_TMP", &sc->sc_zone.tmp);
521 1.69 jruoho (void)acpitz_get_integer(dv, "_CRT", &sc->sc_zone.crt);
522 1.69 jruoho (void)acpitz_get_integer(dv, "_HOT", &sc->sc_zone.hot);
523 1.69 jruoho (void)acpitz_get_integer(dv, "_PSV", &sc->sc_zone.psv);
524 1.69 jruoho (void)acpitz_get_integer(dv, "_TC1", &sc->sc_zone.tc1);
525 1.69 jruoho (void)acpitz_get_integer(dv, "_TC2", &sc->sc_zone.tc2);
526 1.13 kochi
527 1.69 jruoho /*
528 1.69 jruoho * If _RTV is not present or present and zero,
529 1.69 jruoho * values are absolute (see ACPI 4.0, 425).
530 1.69 jruoho */
531 1.48 cegger acpitz_get_integer(dv, "_RTV", &sc->sc_zone.rtv);
532 1.69 jruoho
533 1.48 cegger if (sc->sc_zone.rtv == ATZ_TMP_INVALID)
534 1.48 cegger sc->sc_zone.rtv = 0;
535 1.48 cegger
536 1.13 kochi acpitz_sane_temp(&sc->sc_zone.tmp);
537 1.13 kochi acpitz_sane_temp(&sc->sc_zone.crt);
538 1.13 kochi acpitz_sane_temp(&sc->sc_zone.hot);
539 1.13 kochi acpitz_sane_temp(&sc->sc_zone.psv);
540 1.13 kochi
541 1.63 jruoho if (verbose != 0) {
542 1.69 jruoho comma = 0;
543 1.66 christos
544 1.76 jruoho aprint_verbose_dev(dv, "levels: ");
545 1.63 jruoho
546 1.66 christos if (sc->sc_zone.crt != ATZ_TMP_INVALID) {
547 1.63 jruoho aprint_verbose("critical %s C",
548 1.14 martin acpitz_celcius_string(sc->sc_zone.crt));
549 1.66 christos comma = 1;
550 1.66 christos }
551 1.63 jruoho
552 1.66 christos if (sc->sc_zone.hot != ATZ_TMP_INVALID) {
553 1.66 christos aprint_verbose("%shot %s C", comma ? ", " : "",
554 1.14 martin acpitz_celcius_string(sc->sc_zone.hot));
555 1.66 christos comma = 1;
556 1.66 christos }
557 1.63 jruoho
558 1.66 christos if (sc->sc_zone.psv != ATZ_TMP_INVALID) {
559 1.73 plunky aprint_verbose("%spassive %s C", comma ? ", " : "",
560 1.59 pgoyette acpitz_celcius_string(sc->sc_zone.psv));
561 1.66 christos comma = 1;
562 1.66 christos }
563 1.29 jmcneill
564 1.66 christos if (valid_levels == 0) {
565 1.66 christos sc->sc_flags |= ATZ_F_PASSIVEONLY;
566 1.63 jruoho
567 1.69 jruoho if (sc->sc_first != false)
568 1.66 christos aprint_verbose("%spassive cooling", comma ?
569 1.66 christos ", " : "");
570 1.66 christos }
571 1.63 jruoho
572 1.63 jruoho aprint_verbose("\n");
573 1.66 christos }
574 1.13 kochi
575 1.13 kochi for (i = 0; i < ATZ_NLEVELS; i++)
576 1.13 kochi acpitz_sane_temp(&sc->sc_zone.ac[i]);
577 1.13 kochi
578 1.13 kochi acpitz_power_off(sc);
579 1.69 jruoho sc->sc_first = false;
580 1.13 kochi }
581 1.13 kochi
582 1.11 kochi static void
583 1.64 jruoho acpitz_notify_handler(ACPI_HANDLE hdl, uint32_t notify, void *opaque)
584 1.1 jmcneill {
585 1.69 jruoho ACPI_OSD_EXEC_CALLBACK func = NULL;
586 1.33 xtraeme device_t dv = opaque;
587 1.1 jmcneill
588 1.1 jmcneill switch (notify) {
589 1.69 jruoho
590 1.71 jruoho case ACPI_NOTIFY_TZ_ZONE:
591 1.13 kochi func = acpitz_get_status;
592 1.13 kochi break;
593 1.69 jruoho
594 1.71 jruoho case ACPI_NOTIFY_TZ_TRIP:
595 1.71 jruoho case ACPI_NOTIFY_TZ_DEVLIST:
596 1.14 martin func = acpitz_get_zone_quiet;
597 1.1 jmcneill break;
598 1.69 jruoho
599 1.1 jmcneill default:
600 1.69 jruoho aprint_debug_dev(dv, "unknown notify 0x%02X\n", notify);
601 1.13 kochi return;
602 1.1 jmcneill }
603 1.1 jmcneill
604 1.69 jruoho (void)AcpiOsExecute(OSL_NOTIFY_HANDLER, func, dv);
605 1.1 jmcneill }
606 1.1 jmcneill
607 1.1 jmcneill static void
608 1.64 jruoho acpitz_sane_temp(uint32_t *tmp)
609 1.13 kochi {
610 1.69 jruoho /* Sane temperatures are beteen 0 and 150 C. */
611 1.13 kochi if (*tmp < ATZ_ZEROC || *tmp > ATZ_ZEROC + 1500)
612 1.13 kochi *tmp = ATZ_TMP_INVALID;
613 1.13 kochi }
614 1.13 kochi
615 1.13 kochi static int
616 1.64 jruoho acpitz_get_integer(device_t dv, const char *cm, uint32_t *val)
617 1.13 kochi {
618 1.33 xtraeme struct acpitz_softc *sc = device_private(dv);
619 1.69 jruoho ACPI_INTEGER tmp;
620 1.13 kochi ACPI_STATUS rv;
621 1.13 kochi
622 1.69 jruoho rv = acpi_eval_integer(sc->sc_node->ad_handle, cm, &tmp);
623 1.63 jruoho
624 1.13 kochi if (ACPI_FAILURE(rv)) {
625 1.13 kochi *val = ATZ_TMP_INVALID;
626 1.63 jruoho
627 1.69 jruoho ACPI_DEBUG_PRINT((ACPI_DB_DEBUG_OBJECT,
628 1.69 jruoho "%s: failed to evaluate %s: %s\n",
629 1.69 jruoho device_xname(dv), cm, AcpiFormatException(rv)));
630 1.63 jruoho
631 1.13 kochi return 1;
632 1.13 kochi }
633 1.13 kochi
634 1.13 kochi *val = tmp;
635 1.13 kochi
636 1.13 kochi return 0;
637 1.13 kochi }
638 1.13 kochi
639 1.49 cegger static int
640 1.49 cegger acpitz_get_fanspeed(device_t dv,
641 1.64 jruoho uint32_t *fanmin, uint32_t *fanmax, uint32_t *fancurrent)
642 1.49 cegger {
643 1.49 cegger struct acpitz_softc *sc = device_private(dv);
644 1.69 jruoho ACPI_INTEGER fmin, fmax, fcurr;
645 1.69 jruoho ACPI_HANDLE handle;
646 1.49 cegger ACPI_STATUS rv;
647 1.49 cegger int rc = 0;
648 1.49 cegger
649 1.69 jruoho handle = sc->sc_node->ad_handle;
650 1.69 jruoho
651 1.49 cegger rv = acpi_eval_integer(handle, "FMIN", &fmin);
652 1.69 jruoho
653 1.49 cegger if (ACPI_FAILURE(rv)) {
654 1.49 cegger fmin = ATZ_TMP_INVALID;
655 1.49 cegger rc = 1;
656 1.49 cegger }
657 1.69 jruoho
658 1.49 cegger rv = acpi_eval_integer(handle, "FMAX", &fmax);
659 1.69 jruoho
660 1.49 cegger if (ACPI_FAILURE(rv)) {
661 1.49 cegger fmax = ATZ_TMP_INVALID;
662 1.49 cegger rc = 1;
663 1.49 cegger }
664 1.49 cegger rv = acpi_eval_integer(handle, "FRSP", &fcurr);
665 1.69 jruoho
666 1.49 cegger if (ACPI_FAILURE(rv)) {
667 1.49 cegger fcurr = ATZ_TMP_INVALID;
668 1.49 cegger rc = 1;
669 1.49 cegger }
670 1.49 cegger
671 1.69 jruoho if (fanmin != NULL)
672 1.49 cegger *fanmin = fmin;
673 1.69 jruoho
674 1.69 jruoho if (fanmax != NULL)
675 1.49 cegger *fanmax = fmax;
676 1.69 jruoho
677 1.69 jruoho if (fancurrent != NULL)
678 1.49 cegger *fancurrent = fcurr;
679 1.69 jruoho
680 1.49 cegger return rc;
681 1.49 cegger }
682 1.49 cegger
683 1.49 cegger #ifdef notyet
684 1.49 cegger static ACPI_STATUS
685 1.64 jruoho acpitz_set_fanspeed(device_t dv, uint32_t fanspeed)
686 1.49 cegger {
687 1.49 cegger struct acpitz_softc *sc = device_private(dv);
688 1.69 jruoho ACPI_HANDLE handle;
689 1.49 cegger ACPI_STATUS rv;
690 1.69 jruoho
691 1.69 jruoho handle = sc->sc_node->ad_handle;
692 1.49 cegger
693 1.49 cegger rv = acpi_eval_set_integer(handle, "FSSP", fanspeed);
694 1.69 jruoho
695 1.49 cegger if (ACPI_FAILURE(rv))
696 1.69 jruoho aprint_debug_dev(dv, "failed to set fan speed to %u RPM: %s\n",
697 1.69 jruoho fanspeed, AcpiFormatException(rv));
698 1.69 jruoho
699 1.49 cegger return rv;
700 1.49 cegger }
701 1.49 cegger #endif
702 1.49 cegger
703 1.13 kochi static void
704 1.1 jmcneill acpitz_tick(void *opaque)
705 1.1 jmcneill {
706 1.33 xtraeme device_t dv = opaque;
707 1.33 xtraeme struct acpitz_softc *sc = device_private(dv);
708 1.1 jmcneill
709 1.69 jruoho (void)AcpiOsExecute(OSL_NOTIFY_HANDLER, acpitz_get_status, dv);
710 1.1 jmcneill
711 1.25 joerg callout_schedule(&sc->sc_callout, sc->sc_zone.tzp * hz / 10);
712 1.1 jmcneill }
713 1.1 jmcneill
714 1.1 jmcneill static void
715 1.33 xtraeme acpitz_init_envsys(device_t dv)
716 1.1 jmcneill {
717 1.68 jruoho const int flags = ENVSYS_FMONLIMITS | ENVSYS_FMONNOTSUPP;
718 1.33 xtraeme struct acpitz_softc *sc = device_private(dv);
719 1.33 xtraeme
720 1.27 xtraeme sc->sc_sme = sysmon_envsys_create();
721 1.68 jruoho
722 1.42 pgoyette sc->sc_sme->sme_cookie = sc;
723 1.42 pgoyette sc->sc_sme->sme_name = device_xname(dv);
724 1.42 pgoyette sc->sc_sme->sme_flags = SME_DISABLE_REFRESH;
725 1.68 jruoho sc->sc_sme->sme_get_limits = acpitz_get_limits;
726 1.49 cegger
727 1.68 jruoho sc->sc_temp_sensor.flags = flags;
728 1.49 cegger sc->sc_temp_sensor.units = ENVSYS_STEMP;
729 1.68 jruoho
730 1.70 jruoho (void)strlcpy(sc->sc_temp_sensor.desc, "temperature",
731 1.70 jruoho sizeof(sc->sc_temp_sensor.desc));
732 1.68 jruoho
733 1.49 cegger if (sysmon_envsys_sensor_attach(sc->sc_sme, &sc->sc_temp_sensor))
734 1.42 pgoyette goto out;
735 1.42 pgoyette
736 1.69 jruoho if (sc->sc_have_fan != false) {
737 1.68 jruoho
738 1.68 jruoho sc->sc_fan_sensor.flags = flags;
739 1.49 cegger sc->sc_fan_sensor.units = ENVSYS_SFANRPM;
740 1.68 jruoho
741 1.68 jruoho (void)strlcpy(sc->sc_fan_sensor.desc,
742 1.49 cegger "FAN", sizeof(sc->sc_fan_sensor.desc));
743 1.68 jruoho
744 1.68 jruoho /* Ignore error because fan sensor is optional. */
745 1.68 jruoho (void)sysmon_envsys_sensor_attach(sc->sc_sme,
746 1.68 jruoho &sc->sc_fan_sensor);
747 1.49 cegger }
748 1.49 cegger
749 1.42 pgoyette if (sysmon_envsys_register(sc->sc_sme) == 0)
750 1.27 xtraeme return;
751 1.49 cegger
752 1.42 pgoyette out:
753 1.42 pgoyette aprint_error_dev(dv, "unable to register with sysmon\n");
754 1.68 jruoho
755 1.42 pgoyette sysmon_envsys_destroy(sc->sc_sme);
756 1.68 jruoho sc->sc_sme = NULL;
757 1.42 pgoyette }
758 1.42 pgoyette
759 1.42 pgoyette static void
760 1.42 pgoyette acpitz_get_limits(struct sysmon_envsys *sme, envsys_data_t *edata,
761 1.58 pgoyette sysmon_envsys_lim_t *limits, uint32_t *props)
762 1.42 pgoyette {
763 1.42 pgoyette struct acpitz_softc *sc = sme->sme_cookie;
764 1.42 pgoyette int i;
765 1.1 jmcneill
766 1.49 cegger switch (edata->units) {
767 1.49 cegger case ENVSYS_STEMP:
768 1.58 pgoyette *props = 0;
769 1.49 cegger if (sc->sc_zone.hot != ATZ_TMP_INVALID) {
770 1.58 pgoyette *props |= PROP_CRITMAX;
771 1.49 cegger limits->sel_critmax = ATZ2UKELVIN(sc->sc_zone.hot);
772 1.49 cegger } else if (sc->sc_zone.crt != ATZ_TMP_INVALID) {
773 1.58 pgoyette *props |= PROP_CRITMAX;
774 1.49 cegger limits->sel_critmax = ATZ2UKELVIN(sc->sc_zone.crt);
775 1.49 cegger }
776 1.49 cegger for (i = 0; i < ATZ_NLEVELS; i++) {
777 1.49 cegger if (sc->sc_zone.ac[i] != ATZ_TMP_INVALID) {
778 1.51 pgoyette limits->sel_warnmax =
779 1.49 cegger ATZ2UKELVIN(sc->sc_zone.ac[i]);
780 1.58 pgoyette *props |= PROP_WARNMAX;
781 1.49 cegger break;
782 1.49 cegger }
783 1.49 cegger }
784 1.49 cegger break;
785 1.49 cegger
786 1.49 cegger case ENVSYS_SFANRPM:
787 1.58 pgoyette *props = 0;
788 1.49 cegger if (sc->sc_zone.fanmin != ATZ_TMP_INVALID) {
789 1.58 pgoyette *props |= PROP_WARNMIN;
790 1.49 cegger limits->sel_warnmin = sc->sc_zone.fanmin;
791 1.49 cegger sc->sc_fan_sensor.flags |= ENVSYS_FVALID_MIN;
792 1.49 cegger }
793 1.49 cegger if (sc->sc_zone.fanmax != ATZ_TMP_INVALID) {
794 1.58 pgoyette *props |= PROP_WARNMAX;
795 1.49 cegger limits->sel_warnmax = sc->sc_zone.fanmax;
796 1.49 cegger sc->sc_fan_sensor.flags |= ENVSYS_FVALID_MAX;
797 1.42 pgoyette }
798 1.49 cegger break;
799 1.49 cegger }
800 1.1 jmcneill }
801 1.75 jruoho
802 1.75 jruoho #ifdef _MODULE
803 1.75 jruoho
804 1.75 jruoho MODULE(MODULE_CLASS_DRIVER, acpitz, NULL);
805 1.75 jruoho
806 1.75 jruoho #include "ioconf.c"
807 1.75 jruoho
808 1.75 jruoho static int
809 1.75 jruoho acpitz_modcmd(modcmd_t cmd, void *context)
810 1.75 jruoho {
811 1.75 jruoho
812 1.75 jruoho switch (cmd) {
813 1.75 jruoho
814 1.75 jruoho case MODULE_CMD_INIT:
815 1.75 jruoho return config_init_component(cfdriver_ioconf_acpitz,
816 1.75 jruoho cfattach_ioconf_acpitz, cfdata_ioconf_acpitz);
817 1.75 jruoho
818 1.75 jruoho case MODULE_CMD_FINI:
819 1.75 jruoho return config_fini_component(cfdriver_ioconf_acpitz,
820 1.75 jruoho cfattach_ioconf_acpitz, cfdata_ioconf_acpitz);
821 1.75 jruoho
822 1.75 jruoho default:
823 1.75 jruoho return ENOTTY;
824 1.75 jruoho }
825 1.75 jruoho }
826 1.75 jruoho
827 1.75 jruoho #endif /* _MODULE */
828