sysmon_envsys_events.c revision 1.92 1 /* $NetBSD: sysmon_envsys_events.c,v 1.92 2010/04/10 19:01:01 pgoyette Exp $ */
2
3 /*-
4 * Copyright (c) 2007, 2008 Juan Romero Pardines.
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 AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 */
27
28 /*
29 * sysmon_envsys(9) events framework.
30 */
31
32 #include <sys/cdefs.h>
33 __KERNEL_RCSID(0, "$NetBSD: sysmon_envsys_events.c,v 1.92 2010/04/10 19:01:01 pgoyette Exp $");
34
35 #include <sys/param.h>
36 #include <sys/types.h>
37 #include <sys/conf.h>
38 #include <sys/errno.h>
39 #include <sys/kernel.h>
40 #include <sys/systm.h>
41 #include <sys/proc.h>
42 #include <sys/mutex.h>
43 #include <sys/kmem.h>
44 #include <sys/callout.h>
45
46 /* #define ENVSYS_DEBUG */
47 /* #define ENVSYS_OBJECTS_DEBUG */
48
49 #include <dev/sysmon/sysmonvar.h>
50 #include <dev/sysmon/sysmon_envsysvar.h>
51
52 struct sme_sensor_event {
53 int state;
54 int event;
55 };
56
57 static const struct sme_sensor_event sme_sensor_event[] = {
58 { ENVSYS_SVALID, PENVSYS_EVENT_NORMAL },
59 { ENVSYS_SCRITOVER, PENVSYS_EVENT_CRITOVER },
60 { ENVSYS_SCRITUNDER, PENVSYS_EVENT_CRITUNDER },
61 { ENVSYS_SWARNOVER, PENVSYS_EVENT_WARNOVER },
62 { ENVSYS_SWARNUNDER, PENVSYS_EVENT_WARNUNDER },
63 { ENVSYS_BATTERY_CAPACITY_NORMAL, PENVSYS_EVENT_NORMAL },
64 { ENVSYS_BATTERY_CAPACITY_WARNING, PENVSYS_EVENT_BATT_WARN },
65 { ENVSYS_BATTERY_CAPACITY_CRITICAL, PENVSYS_EVENT_BATT_CRIT },
66 { ENVSYS_BATTERY_CAPACITY_HIGH, PENVSYS_EVENT_BATT_HIGH },
67 { ENVSYS_BATTERY_CAPACITY_MAX, PENVSYS_EVENT_BATT_MAX },
68 { -1, -1 }
69 };
70
71 static bool sysmon_low_power;
72
73 #define SME_EVTIMO (SME_EVENTS_DEFTIMEOUT * hz)
74
75 static bool sme_event_check_low_power(void);
76 static bool sme_battery_check(void);
77 static bool sme_battery_critical(envsys_data_t *);
78 static bool sme_acadapter_check(void);
79
80 /*
81 * sme_event_register:
82 *
83 * + Registers a new sysmon envsys event or updates any event
84 * already in the queue.
85 */
86 int
87 sme_event_register(prop_dictionary_t sdict, envsys_data_t *edata,
88 struct sysmon_envsys *sme, sysmon_envsys_lim_t *lims,
89 uint32_t props, int crittype, int powertype)
90 {
91 sme_event_t *see = NULL, *osee = NULL;
92 prop_object_t obj;
93 int error = 0;
94 const char *objkey;
95
96 KASSERT(sdict != NULL);
97 KASSERT(edata != NULL);
98 KASSERT(sme != NULL);
99 KASSERT(lims != NULL);
100
101 /*
102 * Some validation first for limit-checking events
103 *
104 * 1. Limits are not permitted if the units is ENVSYS_INDICATOR.
105 *
106 * 2. Capacity limits are permitted only if the sensor has the
107 * ENVSYS_FPERCENT flag set and value_max is set.
108 *
109 * 3. It is not permissible for both capacity and value limits
110 * to coexist.
111 *
112 * Note that it permissible for a sensor to have value limits
113 * even if its ENVSYS_FPERCENT flag and value_max are set.
114 */
115
116 DPRINTF(("%s: units %d props 0x%04x upropset 0x%04x max_val %d"
117 " edata-flags 0x%04x\n", __func__, edata->units, props,
118 edata->upropset, edata->value_max, edata->flags));
119
120 if (props && edata->units == ENVSYS_INDICATOR)
121 return ENOTSUP;
122
123 if ((props & PROP_CAP_LIMITS) &&
124 ((edata->value_max == 0) ||
125 !(edata->flags & ENVSYS_FPERCENT) ||
126 (props & PROP_VAL_LIMITS) ||
127 (edata->upropset & PROP_VAL_LIMITS)))
128 props = 0;
129
130 if ((props & PROP_VAL_LIMITS) && (edata->upropset & PROP_CAP_LIMITS))
131 props = 0;
132
133 /*
134 * check if the event is already on the list and return
135 * EEXIST if value provided hasn't been changed.
136 */
137 mutex_enter(&sme->sme_mtx);
138 LIST_FOREACH(osee, &sme->sme_events_list, see_list) {
139 if (strcmp(edata->desc, osee->see_pes.pes_sensname) != 0)
140 continue;
141 if (crittype != osee->see_type)
142 continue;
143
144 /*
145 * We found an existing event for this sensor. Make
146 * sure it references the correct edata
147 */
148 KASSERT(edata == osee->see_edata);
149
150 DPRINTF(("%s: dev %s sensor %s: event type %d exists\n",
151 __func__, sme->sme_name, edata->desc, crittype));
152
153 see = osee;
154 if (props & (PROP_CRITMAX | PROP_BATTMAX)) {
155 if (lims->sel_critmax == edata->limits.sel_critmax) {
156 DPRINTF(("%s: type=%d (critmax exists)\n",
157 __func__, crittype));
158 error = EEXIST;
159 props &= ~(PROP_CRITMAX | PROP_BATTMAX);
160 }
161 }
162 if (props & (PROP_WARNMAX | PROP_BATTHIGH)) {
163 if (lims->sel_warnmax == edata->limits.sel_warnmax) {
164 DPRINTF(("%s: warnmax exists\n", __func__));
165 error = EEXIST;
166 props &= ~(PROP_WARNMAX | PROP_BATTHIGH);
167 }
168 }
169 if (props & (PROP_WARNMIN | PROP_BATTWARN)) {
170 if (lims->sel_warnmin == edata->limits.sel_warnmin) {
171 DPRINTF(("%s: warnmin exists\n", __func__));
172 error = EEXIST;
173 props &= ~(PROP_WARNMIN | PROP_BATTWARN);
174 }
175 }
176 if (props & (PROP_CRITMIN | PROP_BATTCAP)) {
177 if (lims->sel_critmin == edata->limits.sel_critmin) {
178 DPRINTF(("%s: critmin exists\n", __func__));
179 error = EEXIST;
180 props &= ~(PROP_CRITMIN | PROP_BATTCAP);
181 }
182 }
183 break;
184 }
185 if (see == NULL) {
186 /*
187 * New event requested - allocate a sysmon_envsys event.
188 */
189 see = kmem_zalloc(sizeof(*see), KM_SLEEP);
190 if (see == NULL)
191 return ENOMEM;
192
193 DPRINTF(("%s: dev %s sensor %s: new event\n",
194 __func__, sme->sme_name, edata->desc));
195
196 see->see_type = crittype;
197 see->see_sme = sme;
198 see->see_edata = edata;
199
200 /* Initialize sensor type and previously-sent state */
201
202 see->see_pes.pes_type = powertype;
203
204 switch (crittype) {
205 case PENVSYS_EVENT_LIMITS:
206 see->see_evsent = ENVSYS_SVALID;
207 break;
208 case PENVSYS_EVENT_CAPACITY:
209 see->see_evsent = ENVSYS_BATTERY_CAPACITY_NORMAL;
210 break;
211 case PENVSYS_EVENT_STATE_CHANGED:
212 if (edata->units == ENVSYS_BATTERY_CAPACITY)
213 see->see_evsent = ENVSYS_BATTERY_CAPACITY_NORMAL;
214 else if (edata->units == ENVSYS_DRIVE)
215 see->see_evsent = ENVSYS_DRIVE_EMPTY;
216 else
217 panic("%s: bad units for "
218 "PENVSYS_EVENT_STATE_CHANGED", __func__);
219 break;
220 case PENVSYS_EVENT_CRITICAL:
221 default:
222 see->see_evsent = 0;
223 break;
224 }
225
226 (void)strlcpy(see->see_pes.pes_dvname, sme->sme_name,
227 sizeof(see->see_pes.pes_dvname));
228 (void)strlcpy(see->see_pes.pes_sensname, edata->desc,
229 sizeof(see->see_pes.pes_sensname));
230 }
231
232 /*
233 * Limit operation requested.
234 */
235 #define LIMIT_OP(k, l, p) \
236 if (props & p) { \
237 objkey = k; \
238 obj = prop_dictionary_get(sdict, objkey); \
239 if (obj != NULL && \
240 prop_object_type(obj) != PROP_TYPE_NUMBER) { \
241 DPRINTF(("%s: (%s) %s object no TYPE_NUMBER\n", \
242 __func__, sme->sme_name, objkey)); \
243 error = ENOTSUP; \
244 } else { \
245 edata->limits.l = lims->l; \
246 error = sme_sensor_upint32(sdict, objkey,lims->l); \
247 DPRINTF(("%s: (%s) event [sensor=%s type=%d] " \
248 "(%s updated)\n", __func__, sme->sme_name, \
249 edata->desc, crittype, objkey)); \
250 } \
251 if (error && error != EEXIST) \
252 goto out; \
253 edata->upropset |= p; \
254 }
255
256 /* Value-based limits */
257 LIMIT_OP("critical-max", sel_critmax, PROP_CRITMAX);
258 LIMIT_OP("warning-max", sel_warnmax, PROP_WARNMAX);
259 LIMIT_OP("warning-min", sel_warnmin, PROP_WARNMIN);
260 LIMIT_OP("critical-min", sel_critmin, PROP_CRITMIN);
261
262 /* %Capacity-based limits */
263 LIMIT_OP("maximum-capacity", sel_critmax, PROP_BATTMAX);
264 LIMIT_OP("high-capacity", sel_warnmax, PROP_BATTHIGH);
265 LIMIT_OP("warning-capacity", sel_warnmin, PROP_BATTWARN);
266 LIMIT_OP("critical-capacity", sel_critmin, PROP_BATTCAP);
267
268 #undef LIMIT_OP
269
270 if (props & PROP_DRIVER_LIMITS)
271 edata->upropset |= PROP_DRIVER_LIMITS;
272 else
273 edata->upropset &= ~PROP_DRIVER_LIMITS;
274
275 DPRINTF(("%s: (%s) event registered (sensor=%s snum=%d type=%d "
276 "critmin=%" PRIu32 " warnmin=%" PRIu32 " warnmax=%" PRIu32
277 " critmax=%" PRIu32 " props 0x%04x)\n", __func__,
278 see->see_sme->sme_name, see->see_pes.pes_sensname,
279 edata->sensor, see->see_type, edata->limits.sel_critmin,
280 edata->limits.sel_warnmin, edata->limits.sel_warnmax,
281 edata->limits.sel_critmax, edata->upropset));
282 /*
283 * Initialize the events framework if it wasn't initialized before.
284 */
285 if ((sme->sme_flags & SME_CALLOUT_INITIALIZED) == 0)
286 error = sme_events_init(sme);
287
288 /*
289 * If driver requested notification, advise it of new
290 * limit values
291 */
292 if (sme->sme_set_limits)
293 (*sme->sme_set_limits)(sme, edata, &(edata->limits),
294 &(edata->upropset));
295
296 out:
297 if ((error == 0 || error == EEXIST) && osee == NULL)
298 LIST_INSERT_HEAD(&sme->sme_events_list, see, see_list);
299
300 mutex_exit(&sme->sme_mtx);
301
302 return error;
303 }
304
305 /*
306 * sme_event_unregister_all:
307 *
308 * + Unregisters all events associated with a sysmon envsys device.
309 */
310 void
311 sme_event_unregister_all(struct sysmon_envsys *sme)
312 {
313 sme_event_t *see;
314 int evcounter = 0;
315
316 KASSERT(sme != NULL);
317
318 mutex_enter(&sme->sme_mtx);
319 LIST_FOREACH(see, &sme->sme_events_list, see_list) {
320 while (see->see_flags & SEE_EVENT_WORKING)
321 cv_wait(&sme->sme_condvar, &sme->sme_mtx);
322
323 if (strcmp(see->see_pes.pes_dvname, sme->sme_name) == 0)
324 evcounter++;
325 }
326
327 DPRINTF(("%s: total events %d (%s)\n", __func__,
328 evcounter, sme->sme_name));
329
330 while ((see = LIST_FIRST(&sme->sme_events_list))) {
331 if (evcounter == 0)
332 break;
333
334 if (strcmp(see->see_pes.pes_dvname, sme->sme_name) == 0) {
335 LIST_REMOVE(see, see_list);
336 DPRINTF(("%s: event %s %d removed (%s)\n", __func__,
337 see->see_pes.pes_sensname, see->see_type,
338 sme->sme_name));
339 kmem_free(see, sizeof(*see));
340 evcounter--;
341 }
342 }
343
344 if (LIST_EMPTY(&sme->sme_events_list))
345 if (sme->sme_flags & SME_CALLOUT_INITIALIZED)
346 sme_events_destroy(sme);
347 mutex_exit(&sme->sme_mtx);
348 }
349
350 /*
351 * sme_event_unregister:
352 *
353 * + Unregisters an event from the specified sysmon envsys device.
354 */
355 int
356 sme_event_unregister(struct sysmon_envsys *sme, const char *sensor, int type)
357 {
358 sme_event_t *see;
359 bool found = false;
360
361 KASSERT(sensor != NULL);
362
363 mutex_enter(&sme->sme_mtx);
364 LIST_FOREACH(see, &sme->sme_events_list, see_list) {
365 if (strcmp(see->see_pes.pes_sensname, sensor) == 0) {
366 if (see->see_type == type) {
367 found = true;
368 break;
369 }
370 }
371 }
372
373 if (!found) {
374 mutex_exit(&sme->sme_mtx);
375 return EINVAL;
376 }
377
378 /*
379 * Wait for the event to finish its work, remove from the list
380 * and release resouces.
381 */
382 while (see->see_flags & SEE_EVENT_WORKING)
383 cv_wait(&sme->sme_condvar, &sme->sme_mtx);
384
385 DPRINTF(("%s: removed dev=%s sensor=%s type=%d\n",
386 __func__, see->see_pes.pes_dvname, sensor, type));
387 LIST_REMOVE(see, see_list);
388 /*
389 * So the events list is empty, we'll do the following:
390 *
391 * - stop and destroy the callout.
392 * - destroy the workqueue.
393 */
394 if (LIST_EMPTY(&sme->sme_events_list))
395 sme_events_destroy(sme);
396 mutex_exit(&sme->sme_mtx);
397
398 kmem_free(see, sizeof(*see));
399 return 0;
400 }
401
402 /*
403 * sme_event_drvadd:
404 *
405 * + Registers a new event for a device that had enabled any of
406 * the monitoring flags in the driver.
407 */
408 void
409 sme_event_drvadd(void *arg)
410 {
411 sme_event_drv_t *sed_t = arg;
412 sysmon_envsys_lim_t lims;
413 uint32_t props;
414 int error = 0;
415
416 KASSERT(sed_t != NULL);
417
418 #define SEE_REGEVENT(a, b, c) \
419 do { \
420 if (sed_t->sed_edata->flags & (a)) { \
421 char str[ENVSYS_DESCLEN] = "monitoring-state-"; \
422 \
423 error = sme_event_register(sed_t->sed_sdict, \
424 sed_t->sed_edata, \
425 sed_t->sed_sme, \
426 &lims, props, \
427 (b), \
428 sed_t->sed_powertype); \
429 if (error && error != EEXIST) \
430 printf("%s: failed to add event! " \
431 "error=%d sensor=%s event=%s\n", \
432 __func__, error, \
433 sed_t->sed_edata->desc, (c)); \
434 else { \
435 (void)strlcat(str, (c), sizeof(str)); \
436 prop_dictionary_set_bool(sed_t->sed_sdict, \
437 str, \
438 true); \
439 } \
440 } \
441 } while (/* CONSTCOND */ 0)
442
443 /*
444 * If driver provides a method to retrieve its internal limit
445 * values, call it and use those returned values as initial
446 * limits for event monitoring.
447 */
448 props = 0;
449 if (sed_t->sed_edata->flags & ENVSYS_FMONLIMITS)
450 if (sed_t->sed_sme->sme_get_limits)
451 (*sed_t->sed_sme->sme_get_limits)(sed_t->sed_sme,
452 sed_t->sed_edata,
453 &lims, &props);
454 /*
455 * If driver doesn't provide a way to "absorb" user-specified
456 * limit values, we must monitor all limits ourselves
457 */
458 if (sed_t->sed_sme->sme_set_limits == NULL)
459 props &= ~PROP_DRIVER_LIMITS;
460
461 /* Register the events that were specified */
462
463 SEE_REGEVENT(ENVSYS_FMONCRITICAL,
464 PENVSYS_EVENT_CRITICAL,
465 "critical");
466
467 SEE_REGEVENT(ENVSYS_FMONSTCHANGED,
468 PENVSYS_EVENT_STATE_CHANGED,
469 "state-changed");
470
471 SEE_REGEVENT(ENVSYS_FMONLIMITS,
472 PENVSYS_EVENT_LIMITS,
473 "hw-range-limits");
474
475 /*
476 * we are done, free memory now.
477 */
478 kmem_free(sed_t, sizeof(*sed_t));
479 }
480
481 /*
482 * sme_events_init:
483 *
484 * + Initialize the events framework for this device.
485 */
486 int
487 sme_events_init(struct sysmon_envsys *sme)
488 {
489 int error = 0;
490 uint64_t timo;
491
492 KASSERT(sme != NULL);
493 KASSERT(mutex_owned(&sme->sme_mtx));
494
495 if (sme->sme_events_timeout)
496 timo = sme->sme_events_timeout * hz;
497 else
498 timo = SME_EVTIMO;
499
500 error = workqueue_create(&sme->sme_wq, sme->sme_name,
501 sme_events_worker, sme, PRI_NONE, IPL_SOFTCLOCK, WQ_MPSAFE);
502 if (error)
503 return error;
504
505 mutex_init(&sme->sme_callout_mtx, MUTEX_DEFAULT, IPL_SOFTCLOCK);
506 callout_init(&sme->sme_callout, CALLOUT_MPSAFE);
507 callout_setfunc(&sme->sme_callout, sme_events_check, sme);
508 callout_schedule(&sme->sme_callout, timo);
509 sme->sme_flags |= SME_CALLOUT_INITIALIZED;
510 DPRINTF(("%s: events framework initialized for '%s'\n",
511 __func__, sme->sme_name));
512
513 return error;
514 }
515
516 /*
517 * sme_events_destroy:
518 *
519 * + Destroys the event framework for this device: callout
520 * stopped, workqueue destroyed and callout mutex destroyed.
521 */
522 void
523 sme_events_destroy(struct sysmon_envsys *sme)
524 {
525 KASSERT(mutex_owned(&sme->sme_mtx));
526
527 callout_stop(&sme->sme_callout);
528 workqueue_destroy(sme->sme_wq);
529 mutex_destroy(&sme->sme_callout_mtx);
530 callout_destroy(&sme->sme_callout);
531 sme->sme_flags &= ~SME_CALLOUT_INITIALIZED;
532 DPRINTF(("%s: events framework destroyed for '%s'\n",
533 __func__, sme->sme_name));
534 }
535
536 /*
537 * sysmon_envsys_update_limits
538 *
539 * + If a driver needs to update the limits that it is providing,
540 * we need to update the dictionary data as well as the limits.
541 * This only makes sense if the driver is capable of providing
542 * its limits, and if there is a limits event-monitor.
543 */
544 int
545 sysmon_envsys_update_limits(struct sysmon_envsys *sme, envsys_data_t *edata)
546 {
547 int err;
548
549 if (sme->sme_get_limits == NULL ||
550 (edata->flags & ENVSYS_FMONLIMITS) == 0)
551 return EINVAL;
552
553 sysmon_envsys_acquire(sme, false);
554 err = sme_update_limits(sme, edata);
555 sysmon_envsys_release(sme, false);
556
557 return err;
558 }
559
560 /*
561 * sme_update_limits
562 *
563 * + Internal version of sysmon_envsys_update_limits() to be used
564 * when the device has already been sysmon_envsys_acquire()d.
565 */
566
567 int
568 sme_update_limits(struct sysmon_envsys *sme, envsys_data_t *edata)
569 {
570 prop_dictionary_t sdict = NULL;
571 prop_array_t array = NULL;
572 sysmon_envsys_lim_t lims;
573 sme_event_t *see;
574 uint32_t props = 0;
575
576 /* Find the dictionary for this sensor */
577 array = prop_dictionary_get(sme_propd, sme->sme_name);
578 if (array == NULL ||
579 prop_object_type(array) != PROP_TYPE_ARRAY) {
580 DPRINTF(("%s: array device failed\n", __func__));
581 return EINVAL;
582 }
583
584 sdict = prop_array_get(array, edata->sensor);
585 if (sdict == NULL) {
586 return EINVAL;
587 }
588
589 /* Find the event definition to get its powertype */
590 LIST_FOREACH(see, &sme->sme_events_list, see_list) {
591 if (edata == see->see_edata &&
592 see->see_type == PENVSYS_EVENT_LIMITS)
593 break;
594 }
595 if (see == NULL)
596 return EINVAL;
597
598 /* Get new limit values */
599 (*sme->sme_get_limits)(sme, edata, &lims, &props);
600
601 /* Update event and dictionary */
602 sme_event_register(sdict, edata, sme, &lims, props,
603 PENVSYS_EVENT_LIMITS, see->see_pes.pes_type);
604
605 return 0;
606 }
607
608 /*
609 * sme_events_check:
610 *
611 * + Passes the events to the workqueue thread and stops
612 * the callout if the 'low-power' condition is triggered.
613 */
614 void
615 sme_events_check(void *arg)
616 {
617 struct sysmon_envsys *sme = arg;
618 sme_event_t *see;
619 uint64_t timo;
620
621 KASSERT(sme != NULL);
622
623 mutex_enter(&sme->sme_callout_mtx);
624 LIST_FOREACH(see, &sme->sme_events_list, see_list) {
625 workqueue_enqueue(sme->sme_wq, &see->see_wk, NULL);
626 see->see_edata->flags |= ENVSYS_FNEED_REFRESH;
627 }
628 if (sme->sme_events_timeout)
629 timo = sme->sme_events_timeout * hz;
630 else
631 timo = SME_EVTIMO;
632 if (!sysmon_low_power)
633 callout_schedule(&sme->sme_callout, timo);
634 mutex_exit(&sme->sme_callout_mtx);
635 }
636
637 /*
638 * sme_events_worker:
639 *
640 * + workqueue thread that checks if there's a critical condition
641 * and sends an event if it was triggered.
642 */
643 void
644 sme_events_worker(struct work *wk, void *arg)
645 {
646 sme_event_t *see = (void *)wk;
647 struct sysmon_envsys *sme = see->see_sme;
648 envsys_data_t *edata = see->see_edata;
649
650 KASSERT(wk == &see->see_wk);
651 KASSERT(sme != NULL || edata != NULL);
652
653 mutex_enter(&sme->sme_mtx);
654 see->see_flags |= SEE_EVENT_WORKING;
655 /*
656 * sme_events_check marks the sensors to make us refresh them here.
657 * Don't refresh if the driver uses its own method for refreshing.
658 */
659 if ((sme->sme_flags & SME_DISABLE_REFRESH) == 0) {
660 if ((edata->flags & ENVSYS_FNEED_REFRESH) != 0) {
661 /* refresh sensor in device */
662 (*sme->sme_refresh)(sme, edata);
663 edata->flags &= ~ENVSYS_FNEED_REFRESH;
664 }
665 }
666
667 DPRINTFOBJ(("%s: (%s) desc=%s sensor=%d type=%d state=%d units=%d "
668 "value_cur=%d upropset=%d\n", __func__, sme->sme_name, edata->desc,
669 edata->sensor, see->see_type, edata->state, edata->units,
670 edata->value_cur, edata->upropset));
671
672 /* skip the event if current sensor is in invalid state */
673 if (edata->state == ENVSYS_SINVALID)
674 goto out;
675
676 /*
677 * For range limits, if the driver claims responsibility for
678 * limit/range checking, just user driver-supplied status.
679 * Else calculate our own status. Note that driver must
680 * relinquish responsibility for ALL limits if there is even
681 * one limit that it cannot handle!
682 *
683 * If this is a CAPACITY monitor, but the sensor's max_value
684 * is not set, treat it as though the monitor does not exist.
685 */
686 if ((see->see_type == PENVSYS_EVENT_LIMITS ||
687 see->see_type == PENVSYS_EVENT_CAPACITY) &&
688 (edata->upropset & PROP_DRIVER_LIMITS) == 0) {
689 if ((see->see_type == PENVSYS_EVENT_CAPACITY) &&
690 (edata->value_max == 0))
691 edata->state = ENVSYS_SVALID;
692 else if ((edata->upropset & (PROP_CRITMIN | PROP_BATTCAP)) &&
693 (edata->value_cur < edata->limits.sel_critmin))
694 edata->state = ENVSYS_SCRITUNDER;
695 else if ((edata->upropset & (PROP_WARNMIN | PROP_BATTWARN)) &&
696 (edata->value_cur < edata->limits.sel_warnmin))
697 edata->state = ENVSYS_SWARNUNDER;
698 else if ((edata->upropset & (PROP_CRITMAX | PROP_BATTMAX)) &&
699 (edata->value_cur > edata->limits.sel_critmax))
700 edata->state = ENVSYS_SCRITOVER;
701 else if ((edata->upropset & (PROP_WARNMAX | PROP_BATTHIGH)) &&
702 (edata->value_cur > edata->limits.sel_warnmax))
703 edata->state = ENVSYS_SWARNOVER;
704 else
705 edata->state = ENVSYS_SVALID;
706 }
707 sme_deliver_event(see);
708
709 out:
710 see->see_flags &= ~SEE_EVENT_WORKING;
711 cv_broadcast(&sme->sme_condvar);
712 mutex_exit(&sme->sme_mtx);
713 }
714
715 /*
716 * sysmon_envsys_sensor_event
717 *
718 * + Find the monitor event of a particular type for a given sensor
719 * on a device and deliver the event if one is required. If
720 * no event type is specified, deliver all events for the sensor.
721 */
722 void
723 sysmon_envsys_sensor_event(struct sysmon_envsys *sme, envsys_data_t *edata,
724 int ev_type)
725 {
726 sme_event_t *see;
727
728 mutex_enter(&sme->sme_mtx);
729 LIST_FOREACH(see, &sme->sme_events_list, see_list) {
730 if (edata != see->see_edata)
731 continue;
732 if (ev_type == 0 ||
733 ev_type == see->see_type) {
734 sme_deliver_event(see);
735 if (ev_type != 0)
736 break;
737 }
738 }
739 mutex_exit(&sme->sme_mtx);
740 }
741
742 /*
743 * sme_deliver_event:
744 *
745 * + If new sensor state requires it, send an event to powerd
746 *
747 * Must be called with the device's sysmon mutex held
748 * see->see_sme->sme_mtx
749 */
750 void
751 sme_deliver_event(sme_event_t *see)
752 {
753 envsys_data_t *edata = see->see_edata;
754 const struct sme_description_table *sdt = NULL;
755 const struct sme_sensor_event *sse = sme_sensor_event;
756 int i, state = 0;
757
758 switch (see->see_type) {
759 case PENVSYS_EVENT_LIMITS:
760 case PENVSYS_EVENT_CAPACITY:
761 /*
762 * Send event if state has changed
763 */
764 if (edata->state == see->see_evsent)
765 break;
766
767 for (i = 0; sse[i].state != -1; i++)
768 if (sse[i].state == edata->state)
769 break;
770
771 if (sse[i].state == -1)
772 break;
773
774 if (edata->state == ENVSYS_SVALID)
775 sysmon_penvsys_event(&see->see_pes,
776 PENVSYS_EVENT_NORMAL);
777 else
778 sysmon_penvsys_event(&see->see_pes, sse[i].event);
779
780 see->see_evsent = edata->state;
781 DPRINTFOBJ(("%s: (%s) desc=%s sensor=%d state=%d send_ev=%d\n",
782 __func__, sme->sme_name, edata->desc, edata->sensor,
783 edata->state,
784 (edata->state == ENVSYS_SVALID) ? PENVSYS_EVENT_NORMAL :
785 sse[i].event));
786
787 break;
788
789 /*
790 * Send PENVSYS_EVENT_CRITICAL event if:
791 * State has gone from non-CRITICAL to CRITICAL,
792 * State remains CRITICAL and value has changed, or
793 * State has returned from CRITICAL to non-CRITICAL
794 */
795 case PENVSYS_EVENT_CRITICAL:
796 if (edata->state == ENVSYS_SVALID &&
797 see->see_evsent != 0) {
798 sysmon_penvsys_event(&see->see_pes,
799 PENVSYS_EVENT_NORMAL);
800 see->see_evsent = 0;
801 } else if (edata->state == ENVSYS_SCRITICAL &&
802 see->see_evsent != edata->value_cur) {
803 sysmon_penvsys_event(&see->see_pes,
804 PENVSYS_EVENT_CRITICAL);
805 see->see_evsent = edata->value_cur;
806 }
807 break;
808
809 /*
810 * if value_cur is not normal (battery) or online (drive),
811 * send the event...
812 */
813 case PENVSYS_EVENT_STATE_CHANGED:
814 /*
815 * the state has not been changed, just ignore the event.
816 */
817 if (edata->value_cur == see->see_evsent)
818 break;
819
820 switch (edata->units) {
821 case ENVSYS_DRIVE:
822 sdt = sme_get_description_table(SME_DESC_DRIVE_STATES);
823 state = ENVSYS_DRIVE_ONLINE;
824 break;
825 case ENVSYS_BATTERY_CAPACITY:
826 sdt = sme_get_description_table(
827 SME_DESC_BATTERY_CAPACITY);
828 state = ENVSYS_BATTERY_CAPACITY_NORMAL;
829 break;
830 default:
831 panic("%s: bad units for PENVSYS_EVENT_STATE_CHANGED",
832 __func__);
833 }
834
835 for (i = 0; sdt[i].type != -1; i++)
836 if (sdt[i].type == edata->value_cur)
837 break;
838
839 if (sdt[i].type == -1)
840 break;
841
842 /*
843 * copy current state description.
844 */
845 (void)strlcpy(see->see_pes.pes_statedesc, sdt[i].desc,
846 sizeof(see->see_pes.pes_statedesc));
847
848 if (edata->value_cur == state)
849 /*
850 * state returned to normal condition
851 */
852 sysmon_penvsys_event(&see->see_pes,
853 PENVSYS_EVENT_NORMAL);
854 else
855 /*
856 * state changed to abnormal condition
857 */
858 sysmon_penvsys_event(&see->see_pes, see->see_type);
859
860 see->see_evsent = edata->value_cur;
861
862 /*
863 * There's no need to continue if it's a drive sensor.
864 */
865 if (edata->units == ENVSYS_DRIVE)
866 break;
867
868 /*
869 * Check if the system is running in low power and send the
870 * event to powerd (if running) or shutdown the system
871 * otherwise.
872 */
873 if (!sysmon_low_power && sme_event_check_low_power()) {
874 struct penvsys_state pes;
875
876 /*
877 * Stop the callout and send the 'low-power' event.
878 */
879 sysmon_low_power = true;
880 callout_stop(&see->see_sme->sme_callout);
881 pes.pes_type = PENVSYS_TYPE_BATTERY;
882 sysmon_penvsys_event(&pes, PENVSYS_EVENT_LOW_POWER);
883 }
884 break;
885 default:
886 panic("%s: invalid event type %d", __func__, see->see_type);
887 }
888 }
889
890 /*
891 * Returns true if the system is in low power state: an AC adapter
892 * is OFF and all batteries are in LOW/CRITICAL state.
893 */
894 static bool
895 sme_event_check_low_power(void)
896 {
897 if (!sme_acadapter_check())
898 return false;
899
900 return sme_battery_check();
901 }
902
903 /*
904 * Called with the sysmon_envsys device mtx held through the
905 * workqueue thread.
906 */
907 static bool
908 sme_acadapter_check(void)
909 {
910 struct sysmon_envsys *sme;
911 envsys_data_t *edata;
912 bool dev = false, sensor = false;
913
914 LIST_FOREACH(sme, &sysmon_envsys_list, sme_list) {
915 if (sme->sme_class == SME_CLASS_ACADAPTER) {
916 dev = true;
917 break;
918 }
919 }
920
921 /*
922 * No AC Adapter devices were found.
923 */
924 if (!dev)
925 return false;
926
927 /*
928 * Check if there's an AC adapter device connected.
929 */
930 TAILQ_FOREACH(edata, &sme->sme_sensors_list, sensors_head) {
931 if (edata->units == ENVSYS_INDICATOR) {
932 sensor = true;
933 /* refresh current sensor */
934 if ((sme->sme_flags & SME_DISABLE_REFRESH) == 0)
935 (*sme->sme_refresh)(sme, edata);
936 if (edata->value_cur)
937 return false;
938 }
939 }
940
941 if (!sensor)
942 return false;
943
944 /*
945 * AC adapter found and not connected.
946 */
947 return true;
948 }
949
950 /*
951 * Called with the sysmon_envsys device mtx held through the
952 * workqueue thread.
953 */
954 static bool
955 sme_battery_check(void)
956 {
957 struct sysmon_envsys *sme;
958 envsys_data_t *edata;
959 int batteriesfound = 0;
960 bool present, batterycap, batterycharge;
961
962 /*
963 * Check for battery devices and its state.
964 */
965 LIST_FOREACH(sme, &sysmon_envsys_list, sme_list) {
966 if (sme->sme_class != SME_CLASS_BATTERY)
967 continue;
968
969 present = true;
970 TAILQ_FOREACH(edata, &sme->sme_sensors_list, sensors_head) {
971 if (edata->units == ENVSYS_INDICATOR &&
972 !edata->value_cur) {
973 present = false;
974 break;
975 }
976 }
977 if (!present)
978 continue;
979 /*
980 * We've found a battery device...
981 */
982 batteriesfound++;
983 batterycap = batterycharge = false;
984 TAILQ_FOREACH(edata, &sme->sme_sensors_list, sensors_head) {
985 if (edata->units == ENVSYS_BATTERY_CAPACITY) {
986 batterycap = true;
987 if (!sme_battery_critical(edata))
988 return false;
989 } else if (edata->units == ENVSYS_BATTERY_CHARGE) {
990 batterycharge = true;
991 if (edata->value_cur)
992 return false;
993 }
994 }
995 if (!batterycap || !batterycharge)
996 return false;
997 }
998
999 if (!batteriesfound)
1000 return false;
1001
1002 /*
1003 * All batteries in low/critical capacity and discharging.
1004 */
1005 return true;
1006 }
1007
1008 static bool
1009 sme_battery_critical(envsys_data_t *edata)
1010 {
1011 if (edata->value_cur == ENVSYS_BATTERY_CAPACITY_CRITICAL ||
1012 edata->value_cur == ENVSYS_BATTERY_CAPACITY_LOW)
1013 return true;
1014
1015 return false;
1016 }
1017