envstat.c revision 1.70 1 /* $NetBSD: envstat.c,v 1.70 2008/08/22 11:27:50 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 #include <sys/cdefs.h>
29 #ifndef lint
30 __RCSID("$NetBSD: envstat.c,v 1.70 2008/08/22 11:27:50 pgoyette Exp $");
31 #endif /* not lint */
32
33 #include <stdio.h>
34 #include <stdlib.h>
35 #include <stdbool.h>
36 #include <string.h>
37 #include <unistd.h>
38 #include <fcntl.h>
39 #include <err.h>
40 #include <errno.h>
41 #include <syslog.h>
42 #include <sys/envsys.h>
43 #include <sys/types.h>
44 #include <sys/queue.h>
45 #include <prop/proplib.h>
46
47 #include "envstat.h"
48
49 #define _PATH_DEV_SYSMON "/dev/sysmon"
50
51 #define ENVSYS_DFLAG 0x00000001 /* list registered devices */
52 #define ENVSYS_FFLAG 0x00000002 /* show temp in farenheit */
53 #define ENVSYS_LFLAG 0x00000004 /* list sensors */
54 #define ENVSYS_XFLAG 0x00000008 /* externalize dictionary */
55 #define ENVSYS_IFLAG 0x00000010 /* skip invalid sensors */
56 #define ENVSYS_SFLAG 0x00000020 /* remove all properties set */
57 #define ENVSYS_TFLAG 0x00000040 /* make statistics */
58 #define ENVSYS_WFLAG 0x00000080 /* print warn{min,max} values */
59
60 /* Sensors */
61 typedef struct envsys_sensor {
62 SIMPLEQ_ENTRY(envsys_sensor) entries;
63 int32_t cur_value;
64 int32_t max_value;
65 int32_t min_value;
66 int32_t avg_value;
67 int32_t critcap_value;
68 int32_t critmin_value;
69 int32_t critmax_value;
70 int32_t warncap_value;
71 int32_t warnmin_value;
72 int32_t warnmax_value;
73 char desc[ENVSYS_DESCLEN];
74 char type[ENVSYS_DESCLEN];
75 char drvstate[ENVSYS_DESCLEN];
76 char battcap[ENVSYS_DESCLEN];
77 char dvname[ENVSYS_DESCLEN];
78 bool invalid;
79 bool visible;
80 bool percentage;
81 } *sensor_t;
82
83 /* Sensor statistics */
84 typedef struct envsys_sensor_stats {
85 SIMPLEQ_ENTRY(envsys_sensor_stats) entries;
86 int32_t max;
87 int32_t min;
88 int32_t avg;
89 char desc[ENVSYS_DESCLEN];
90 } *sensor_stats_t;
91
92 /* Device properties */
93 typedef struct envsys_dvprops {
94 uint64_t refresh_timo;
95 /* more members could be added in the future */
96 } *dvprops_t;
97
98 /* A simple queue to manage all sensors */
99 static SIMPLEQ_HEAD(, envsys_sensor) sensors_list =
100 SIMPLEQ_HEAD_INITIALIZER(sensors_list);
101
102 /* A simple queue to manage statistics for all sensors */
103 static SIMPLEQ_HEAD(, envsys_sensor_stats) sensor_stats_list =
104 SIMPLEQ_HEAD_INITIALIZER(sensor_stats_list);
105
106 static unsigned int interval, flags, width;
107 static char *mydevname, *sensors;
108 static bool statistics;
109 static u_int header_passes;
110
111 static int parse_dictionary(int);
112 static int send_dictionary(FILE *, int);
113 static int find_sensors(prop_array_t, const char *, dvprops_t);
114 static void print_sensors(void);
115 static int check_sensors(char *);
116 static int usage(void);
117
118
119 int main(int argc, char **argv)
120 {
121 prop_dictionary_t dict;
122 int c, fd, rval = 0;
123 char *endptr, *configfile = NULL;
124 FILE *cf;
125
126 setprogname(argv[0]);
127
128 while ((c = getopt(argc, argv, "c:Dd:fIi:lrSs:Tw:Wx")) != -1) {
129 switch (c) {
130 case 'c': /* configuration file */
131 configfile = strdup(optarg);
132 if (configfile == NULL)
133 err(EXIT_FAILURE, "strdup");
134 break;
135 case 'D': /* list registered devices */
136 flags |= ENVSYS_DFLAG;
137 break;
138 case 'd': /* show sensors of a specific device */
139 mydevname = strdup(optarg);
140 if (mydevname == NULL)
141 err(EXIT_FAILURE, "strdup");
142 break;
143 case 'f': /* display temperature in Farenheit */
144 flags |= ENVSYS_FFLAG;
145 break;
146 case 'I': /* Skips invalid sensors */
147 flags |= ENVSYS_IFLAG;
148 break;
149 case 'i': /* wait time between intervals */
150 interval = (unsigned int)strtoul(optarg, &endptr, 10);
151 if (*endptr != '\0')
152 errx(EXIT_FAILURE, "bad interval '%s'", optarg);
153 break;
154 case 'l': /* list sensors */
155 flags |= ENVSYS_LFLAG;
156 break;
157 case 'r':
158 /*
159 * This flag is noop.. it's only here for
160 * compatibility with the old implementation.
161 */
162 break;
163 case 'S':
164 flags |= ENVSYS_SFLAG;
165 break;
166 case 's': /* only show specified sensors */
167 sensors = strdup(optarg);
168 if (sensors == NULL)
169 err(EXIT_FAILURE, "strdup");
170 break;
171 case 'T': /* make statistics */
172 flags |= ENVSYS_TFLAG;
173 break;
174 case 'W': /* print warn{max,min} vs crit{max,min} */
175 flags |= ENVSYS_WFLAG;
176 break;
177 case 'w': /* width value for the lines */
178 width = (unsigned int)strtoul(optarg, &endptr, 10);
179 if (*endptr != '\0')
180 errx(EXIT_FAILURE, "bad width '%s'", optarg);
181 break;
182 case 'x': /* print the dictionary in raw format */
183 flags |= ENVSYS_XFLAG;
184 break;
185 case '?':
186 default:
187 usage();
188 /* NOTREACHED */
189 }
190 }
191
192 argc -= optind;
193 argv += optind;
194
195 if (argc > 0)
196 usage();
197
198 /* Check if we want to make statistics */
199 if (flags & ENVSYS_TFLAG) {
200 if (!interval)
201 errx(EXIT_FAILURE,
202 "-T cannot be used without an interval (-i)");
203 if (flags & ENVSYS_WFLAG)
204 errx(EXIT_FAILURE,
205 "-T cannot be used with -W");
206 else
207 statistics = true;
208 }
209
210 if (mydevname && sensors)
211 errx(EXIT_FAILURE, "-d flag cannot be used with -s");
212
213 /* Open the device in ro mode */
214 if ((fd = open(_PATH_DEV_SYSMON, O_RDONLY)) == -1)
215 err(EXIT_FAILURE, "%s", _PATH_DEV_SYSMON);
216
217 /* Print dictionary in raw mode */
218 if (flags & ENVSYS_XFLAG) {
219 rval = prop_dictionary_recv_ioctl(fd,
220 ENVSYS_GETDICTIONARY,
221 &dict);
222 if (rval)
223 errx(EXIT_FAILURE, "%s", strerror(rval));
224
225 config_dict_dump(dict);
226
227 /* Remove all properties set in dictionary */
228 } else if (flags & ENVSYS_SFLAG) {
229 /* Close the ro descriptor */
230 (void)close(fd);
231
232 /* open the fd in rw mode */
233 if ((fd = open(_PATH_DEV_SYSMON, O_RDWR)) == -1)
234 err(EXIT_FAILURE, "%s", _PATH_DEV_SYSMON);
235
236 dict = prop_dictionary_create();
237 if (!dict)
238 err(EXIT_FAILURE, "prop_dictionary_create");
239
240 rval = prop_dictionary_set_bool(dict,
241 "envsys-remove-props",
242 true);
243 if (!rval)
244 err(EXIT_FAILURE, "prop_dict_set_bool");
245
246 /* send the dictionary to the kernel now */
247 rval = prop_dictionary_send_ioctl(dict, fd, ENVSYS_REMOVEPROPS);
248 if (rval)
249 warnx("%s", strerror(rval));
250
251 /* Set properties in dictionary */
252 } else if (configfile) {
253 /*
254 * Parse the configuration file.
255 */
256 if ((cf = fopen(configfile, "r")) == NULL) {
257 syslog(LOG_ERR, "fopen failed: %s", strerror(errno));
258 errx(EXIT_FAILURE, "%s", strerror(errno));
259 }
260
261 rval = send_dictionary(cf, fd);
262 (void)fclose(cf);
263
264 /* Show sensors with interval */
265 } else if (interval) {
266 for (;;) {
267 rval = parse_dictionary(fd);
268 if (rval)
269 break;
270
271 (void)fflush(stdout);
272 (void)sleep(interval);
273 }
274 /* Show sensors without interval */
275 } else {
276 rval = parse_dictionary(fd);
277 }
278
279 if (sensors)
280 free(sensors);
281 if (mydevname)
282 free(mydevname);
283 (void)close(fd);
284
285 return rval ? EXIT_FAILURE : EXIT_SUCCESS;
286 }
287
288 static int
289 send_dictionary(FILE *cf, int fd)
290 {
291 prop_dictionary_t kdict, udict;
292 int error = 0;
293
294 /* Retrieve dictionary from kernel */
295 error = prop_dictionary_recv_ioctl(fd, ENVSYS_GETDICTIONARY, &kdict);
296 if (error)
297 return error;
298
299 config_parse(cf, kdict);
300
301 /*
302 * Dictionary built by the parser from the configuration file.
303 */
304 udict = config_dict_parsed();
305
306 /*
307 * Close the read only descriptor and open a new one read write.
308 */
309 (void)close(fd);
310 if ((fd = open(_PATH_DEV_SYSMON, O_RDWR)) == -1) {
311 error = errno;
312 warn("%s", _PATH_DEV_SYSMON);
313 return error;
314 }
315
316 /*
317 * Send our sensor properties dictionary to the kernel then.
318 */
319 error = prop_dictionary_send_ioctl(udict, fd, ENVSYS_SETDICTIONARY);
320 if (error)
321 warnx("%s", strerror(error));
322
323 prop_object_release(udict);
324 return error;
325 }
326
327 static sensor_stats_t
328 find_stats_sensor(const char *desc)
329 {
330 sensor_stats_t stats;
331
332 /*
333 * If we matched a sensor by its description return it, otherwise
334 * allocate a new one.
335 */
336 SIMPLEQ_FOREACH(stats, &sensor_stats_list, entries)
337 if (strcmp(stats->desc, desc) == 0)
338 return stats;
339
340 stats = calloc(1, sizeof(*stats));
341 if (stats == NULL)
342 return NULL;
343
344 (void)strlcpy(stats->desc, desc, sizeof(stats->desc));
345 SIMPLEQ_INSERT_TAIL(&sensor_stats_list, stats, entries);
346
347 return stats;
348 }
349
350 static int
351 parse_dictionary(int fd)
352 {
353 sensor_t sensor = NULL;
354 dvprops_t edp = NULL;
355 prop_array_t array;
356 prop_dictionary_t dict;
357 prop_object_iterator_t iter;
358 prop_object_t obj;
359 const char *dnp = NULL;
360 int rval = 0;
361
362 /* receive dictionary from kernel */
363 rval = prop_dictionary_recv_ioctl(fd, ENVSYS_GETDICTIONARY, &dict);
364 if (rval)
365 return rval;
366
367 /* No drivers registered? */
368 if (prop_dictionary_count(dict) == 0) {
369 warnx("no drivers registered");
370 goto out;
371 }
372
373 if (mydevname) {
374 /* -d flag specified, print sensors only for this device */
375 obj = prop_dictionary_get(dict, mydevname);
376 if (prop_object_type(obj) != PROP_TYPE_ARRAY) {
377 warnx("unknown device `%s'", mydevname);
378 rval = EINVAL;
379 goto out;
380 }
381
382 rval = find_sensors(obj, mydevname, NULL);
383 if (rval)
384 goto out;
385
386 } else {
387 /* print sensors for all devices registered */
388 iter = prop_dictionary_iterator(dict);
389 if (iter == NULL) {
390 rval = EINVAL;
391 goto out;
392 }
393
394 /* iterate over the dictionary returned by the kernel */
395 while ((obj = prop_object_iterator_next(iter)) != NULL) {
396 array = prop_dictionary_get_keysym(dict, obj);
397 if (prop_object_type(array) != PROP_TYPE_ARRAY) {
398 warnx("no sensors found");
399 rval = EINVAL;
400 goto out;
401 }
402
403 edp = calloc(1, sizeof(*edp));
404 if (!edp) {
405 rval = ENOMEM;
406 goto out;
407 }
408
409 dnp = prop_dictionary_keysym_cstring_nocopy(obj);
410 rval = find_sensors(array, dnp, edp);
411 if (rval)
412 goto out;
413
414 if (((flags & ENVSYS_LFLAG) == 0) &&
415 (flags & ENVSYS_DFLAG)) {
416 (void)printf("%s (checking events every ",
417 dnp);
418 if (edp->refresh_timo == 1)
419 (void)printf("second)\n");
420 else
421 (void)printf("%d seconds)\n",
422 (int)edp->refresh_timo);
423 }
424
425 free(edp);
426 edp = NULL;
427 }
428 prop_object_iterator_release(iter);
429 }
430
431 /* print sensors now */
432 if (sensors) {
433 char *str = strdup(sensors);
434 if (!str) {
435 rval = ENOMEM;
436 goto out;
437 }
438 rval = check_sensors(str);
439 if (rval) {
440 free(str);
441 goto out;
442 }
443 free(str);
444 }
445 if ((flags & ENVSYS_LFLAG) == 0 && (flags & ENVSYS_DFLAG) == 0)
446 print_sensors();
447 if (interval)
448 (void)printf("\n");
449
450 out:
451 while ((sensor = SIMPLEQ_FIRST(&sensors_list))) {
452 SIMPLEQ_REMOVE_HEAD(&sensors_list, entries);
453 free(sensor);
454 }
455 if (edp)
456 free(edp);
457 prop_object_release(dict);
458 return rval;
459 }
460
461 static int
462 find_sensors(prop_array_t array, const char *dvname, dvprops_t edp)
463 {
464 prop_object_iterator_t iter;
465 prop_object_t obj, obj1, obj2;
466 prop_string_t state, desc = NULL;
467 sensor_t sensor = NULL;
468 sensor_stats_t stats = NULL;
469
470 iter = prop_array_iterator(array);
471 if (!iter)
472 return ENOMEM;
473
474 /* iterate over the array of dictionaries */
475 while ((obj = prop_object_iterator_next(iter)) != NULL) {
476 /* get the refresh-timeout property */
477 obj2 = prop_dictionary_get(obj, "device-properties");
478 if (obj2) {
479 if (!edp)
480 continue;
481 if (!prop_dictionary_get_uint64(obj2,
482 "refresh-timeout",
483 &edp->refresh_timo))
484 continue;
485 }
486
487 /* new sensor coming */
488 sensor = calloc(1, sizeof(*sensor));
489 if (sensor == NULL) {
490 prop_object_iterator_release(iter);
491 return ENOMEM;
492 }
493
494 /* copy device name */
495 (void)strlcpy(sensor->dvname, dvname, sizeof(sensor->dvname));
496
497 /* description string */
498 desc = prop_dictionary_get(obj, "description");
499 if (desc) {
500 /* copy description */
501 (void)strlcpy(sensor->desc,
502 prop_string_cstring_nocopy(desc),
503 sizeof(sensor->desc));
504 } else {
505 free(sensor);
506 continue;
507 }
508
509 /* type string */
510 obj1 = prop_dictionary_get(obj, "type");
511 if (obj1) {
512 /* copy type */
513 (void)strlcpy(sensor->type,
514 prop_string_cstring_nocopy(obj1),
515 sizeof(sensor->type));
516 } else {
517 free(sensor);
518 continue;
519 }
520
521 /* check sensor's state */
522 state = prop_dictionary_get(obj, "state");
523
524 /* mark sensors with invalid/unknown state */
525 if ((prop_string_equals_cstring(state, "invalid") ||
526 prop_string_equals_cstring(state, "unknown")))
527 sensor->invalid = true;
528
529 /* get current drive state string */
530 obj1 = prop_dictionary_get(obj, "drive-state");
531 if (obj1) {
532 (void)strlcpy(sensor->drvstate,
533 prop_string_cstring_nocopy(obj1),
534 sizeof(sensor->drvstate));
535 }
536
537 /* get current battery capacity string */
538 obj1 = prop_dictionary_get(obj, "battery-capacity");
539 if (obj1) {
540 (void)strlcpy(sensor->battcap,
541 prop_string_cstring_nocopy(obj1),
542 sizeof(sensor->battcap));
543 }
544
545 /* get current value */
546 obj1 = prop_dictionary_get(obj, "cur-value");
547 if (obj1)
548 sensor->cur_value = prop_number_integer_value(obj1);
549
550 /* get max value */
551 obj1 = prop_dictionary_get(obj, "max-value");
552 if (obj1)
553 sensor->max_value = prop_number_integer_value(obj1);
554
555 /* get min value */
556 obj1 = prop_dictionary_get(obj, "min-value");
557 if (obj1)
558 sensor->min_value = prop_number_integer_value(obj1);
559
560 /* get avg value */
561 obj1 = prop_dictionary_get(obj, "avg-value");
562 if (obj1)
563 sensor->avg_value = prop_number_integer_value(obj1);
564
565 /* get percentage flag */
566 obj1 = prop_dictionary_get(obj, "want-percentage");
567 if (obj1)
568 sensor->percentage = prop_bool_true(obj1);
569
570 /* get critical max value if available */
571 obj1 = prop_dictionary_get(obj, "critical-max");
572 if (obj1)
573 sensor->critmax_value = prop_number_integer_value(obj1);
574
575 /* get critical min value if available */
576 obj1 = prop_dictionary_get(obj, "critical-min");
577 if (obj1)
578 sensor->critmin_value = prop_number_integer_value(obj1);
579
580 /* get critical capacity value if available */
581 obj1 = prop_dictionary_get(obj, "critical-capacity");
582 if (obj1)
583 sensor->critcap_value = prop_number_integer_value(obj1);
584
585 /* get warning max value if available */
586 obj1 = prop_dictionary_get(obj, "warning-max");
587 if (obj1)
588 sensor->warnmax_value = prop_number_integer_value(obj1);
589
590 /* get warning min value if available */
591 obj1 = prop_dictionary_get(obj, "warning-min");
592 if (obj1)
593 sensor->warnmin_value = prop_number_integer_value(obj1);
594
595 /* get warning capacity value if available */
596 obj1 = prop_dictionary_get(obj, "warning-capacity");
597 if (obj1)
598 sensor->warncap_value = prop_number_integer_value(obj1);
599
600 /* print sensor names if -l was given */
601 if (flags & ENVSYS_LFLAG) {
602 if (width)
603 (void)printf("%*s\n", width,
604 prop_string_cstring_nocopy(desc));
605 else
606 (void)printf("%s\n",
607 prop_string_cstring_nocopy(desc));
608 }
609
610 /* Add the sensor into the list */
611 SIMPLEQ_INSERT_TAIL(&sensors_list, sensor, entries);
612
613 /* Collect statistics if flag enabled */
614 if (statistics) {
615 /* ignore sensors not relevant for statistics */
616 if ((strcmp(sensor->type, "Indicator") == 0) ||
617 (strcmp(sensor->type, "Battery charge") == 0) ||
618 (strcmp(sensor->type, "Drive") == 0))
619 continue;
620
621 /* ignore invalid data */
622 if (sensor->invalid || !sensor->cur_value)
623 continue;
624
625 /* find or allocate a new statistics sensor */
626 stats = find_stats_sensor(sensor->desc);
627 if (stats == NULL) {
628 free(sensor);
629 prop_object_iterator_release(iter);
630 return ENOMEM;
631 }
632
633 /* collect data */
634 if (!stats->max)
635 stats->max = sensor->cur_value;
636 if (!stats->min)
637 stats->min = sensor->cur_value;
638
639 if (sensor->cur_value > stats->max)
640 stats->max = sensor->cur_value;
641
642 if (sensor->cur_value < stats->min)
643 stats->min = sensor->cur_value;
644
645 /* compute avg value */
646 if (stats->max && stats->min)
647 stats->avg =
648 (sensor->cur_value + stats->max +
649 stats->min) / 3;
650 }
651 }
652
653 /* free memory */
654 prop_object_iterator_release(iter);
655 return 0;
656 }
657
658 static int
659 check_sensors(char *str)
660 {
661 sensor_t sensor = NULL;
662 char *dvstring, *sstring, *p, *last;
663 bool sensor_found = false;
664
665 /*
666 * Parse device name and sensor description and find out
667 * if the sensor is valid.
668 */
669 for ((p = strtok_r(str, ",", &last)); p;
670 (p = strtok_r(NULL, ",", &last))) {
671 /* get device name */
672 dvstring = strtok(p, ":");
673 if (dvstring == NULL) {
674 warnx("missing device name");
675 return EINVAL;
676 }
677
678 /* get sensor description */
679 sstring = strtok(NULL, ":");
680 if (sstring == NULL) {
681 warnx("missing sensor description");
682 return EINVAL;
683 }
684
685 SIMPLEQ_FOREACH(sensor, &sensors_list, entries) {
686 /* skip until we match device */
687 if (strcmp(dvstring, sensor->dvname))
688 continue;
689 if (strcmp(sstring, sensor->desc) == 0) {
690 sensor->visible = true;
691 sensor_found = true;
692 break;
693 }
694 }
695 if (sensor_found == false) {
696 warnx("unknown sensor `%s' for device `%s'",
697 sstring, dvstring);
698 return EINVAL;
699 }
700 sensor_found = false;
701 }
702
703 /* check if all sensors were ok, and error out if not */
704 SIMPLEQ_FOREACH(sensor, &sensors_list, entries)
705 if (sensor->visible)
706 return 0;
707
708 warnx("no sensors selected to display");
709 return EINVAL;
710 }
711
712 static void
713 print_sensors(void)
714 {
715 sensor_t sensor;
716 sensor_stats_t stats = NULL;
717 size_t maxlen = 0, ilen = 32 + 3;
718 double temp = 0;
719 const char *invalid = "N/A", *degrees, *tmpstr, *stype;
720 const char *a, *b, *c, *d, *units;
721
722 tmpstr = stype = d = NULL;
723
724 /* find the longest description */
725 SIMPLEQ_FOREACH(sensor, &sensors_list, entries)
726 if (strlen(sensor->desc) > maxlen)
727 maxlen = strlen(sensor->desc);
728
729 if (width)
730 maxlen = width;
731
732 /*
733 * Print a header at the bottom only once showing different
734 * members if the statistics flag is set or not.
735 *
736 * As bonus if -s is set, only print this header every 10 iterations
737 * to avoid redundancy... like vmstat(1).
738 */
739
740 a = "Current";
741 units = "Unit";
742 if (statistics) {
743 b = "Max";
744 c = "Min";
745 d = "Avg";
746 } else if (flags & ENVSYS_WFLAG) {
747 b = "WarnMax";
748 c = "WarnMin";
749 d = "WarnCap";
750 } else {
751 b = "CritMax";
752 c = "CritMin";
753 d = "CritCap";
754 }
755
756 if (!sensors || (!header_passes && sensors) ||
757 (header_passes == 10 && sensors)) {
758 (void)printf("%s%*s %10s %8s %8s %8s %8s\n",
759 mydevname ? "" : " ", (int)maxlen,
760 "", a, b, c, d, units);
761 if (sensors && header_passes == 10)
762 header_passes = 0;
763 }
764 if (sensors)
765 header_passes++;
766
767 /* print the sensors */
768 SIMPLEQ_FOREACH(sensor, &sensors_list, entries) {
769 /* skip sensors that were not marked as visible */
770 if (sensors && !sensor->visible)
771 continue;
772
773 /* skip invalid sensors if -I is set */
774 if ((flags & ENVSYS_IFLAG) && sensor->invalid)
775 continue;
776
777 /* print device name */
778 if (!mydevname) {
779 if (tmpstr == NULL || strcmp(tmpstr, sensor->dvname))
780 printf("[%s]\n", sensor->dvname);
781
782 tmpstr = sensor->dvname;
783 }
784
785 /* find out the statistics sensor */
786 if (statistics) {
787 stats = find_stats_sensor(sensor->desc);
788 if (stats == NULL) {
789 /* No statistics for this sensor */
790 continue;
791 }
792 }
793
794 /* print sensor description */
795 (void)printf("%s%*.*s", mydevname ? "" : " ", (int)maxlen,
796 (int)maxlen, sensor->desc);
797
798 /* print invalid string */
799 if (sensor->invalid) {
800 (void)printf(": %10s\n", invalid);
801 continue;
802 }
803
804 /*
805 * Indicator and Battery charge sensors.
806 */
807 if ((strcmp(sensor->type, "Indicator") == 0) ||
808 (strcmp(sensor->type, "Battery charge") == 0)) {
809
810 (void)printf(": %10s", sensor->cur_value ? "ON" : "OFF");
811
812 /* converts the value to degC or degF */
813 #define CONVERTTEMP(a, b, c) \
814 do { \
815 if (b) \
816 (a) = ((b) / 1000000.0) - 273.15; \
817 if (flags & ENVSYS_FFLAG) { \
818 if (b) \
819 (a) = (9.0 / 5.0) * (a) + 32.0; \
820 (c) = "degF"; \
821 } else \
822 (c) = "degC"; \
823 } while (/* CONSTCOND */ 0)
824
825
826 /* temperatures */
827 } else if (strcmp(sensor->type, "Temperature") == 0) {
828
829 CONVERTTEMP(temp, sensor->cur_value, degrees);
830 stype = degrees;
831 (void)printf(": %10.3f ", temp);
832
833 if (statistics) {
834 /* show statistics if flag set */
835 CONVERTTEMP(temp, stats->max, degrees);
836 (void)printf("%8.3f ", temp);
837 CONVERTTEMP(temp, stats->min, degrees);
838 (void)printf("%8.3f ", temp);
839 CONVERTTEMP(temp, stats->avg, degrees);
840 (void)printf("%8.3f ", temp);
841 ilen = 8;
842 } else if (flags & ENVSYS_WFLAG) {
843 if (sensor->warnmax_value) {
844 CONVERTTEMP(temp,
845 sensor->warnmax_value, degrees);
846 (void)printf( "%8.3f ", temp);
847 ilen = 24 + 2;
848 }
849
850 if (sensor->warnmin_value) {
851 CONVERTTEMP(temp,
852 sensor->warnmin_value, degrees);
853 if (sensor->warnmax_value)
854 ilen = 8;
855 else
856 ilen = 16 + 1;
857
858 (void)printf("%*.3f ", (int)ilen, temp);
859 ilen = 16 + 1;
860 }
861 } else {
862 if (sensor->critmax_value) {
863 CONVERTTEMP(temp,
864 sensor->critmax_value, degrees);
865 (void)printf( "%8.3f ", temp);
866 ilen = 24 + 2;
867 }
868
869 if (sensor->critmin_value) {
870 CONVERTTEMP(temp,
871 sensor->critmin_value, degrees);
872 if (sensor->critmax_value)
873 ilen = 8;
874 else
875 ilen = 16 + 1;
876
877 (void)printf("%*.3f ", (int)ilen, temp);
878 ilen = 16 + 1;
879 }
880 }
881
882 (void)printf("%*s", (int)ilen, stype);
883 #undef CONVERTTEMP
884
885 /* fans */
886 } else if (strcmp(sensor->type, "Fan") == 0) {
887 stype = "RPM";
888
889 (void)printf(": %10u ", sensor->cur_value);
890 if (statistics) {
891 /* show statistics if flag set */
892 (void)printf("%8u %8u %8u ",
893 stats->max, stats->min, stats->avg);
894 ilen = 8;
895 } else if (flags & ENVSYS_WFLAG) {
896 if (sensor->warnmax_value) {
897 (void)printf("%8u ",
898 sensor->warnmax_value);
899 ilen = 24 + 2;
900 }
901
902 if (sensor->warnmin_value) {
903 if (sensor->warnmax_value)
904 ilen = 8;
905 else
906 ilen = 16 + 1;
907 (void)printf("%*u ", (int)ilen,
908 sensor->warnmin_value);
909 ilen = 16 + 1;
910 }
911 } else {
912 if (sensor->critmax_value) {
913 (void)printf("%8u ",
914 sensor->critmax_value);
915 ilen = 24 + 2;
916 }
917
918 if (sensor->critmin_value) {
919 if (sensor->critmax_value)
920 ilen = 8;
921 else
922 ilen = 16 + 1;
923 (void)printf("%*u ", (int)ilen,
924 sensor->critmin_value);
925 ilen = 16 + 1;
926 }
927 }
928
929 (void)printf("%*s", (int)ilen, stype);
930
931 /* integers */
932 } else if (strcmp(sensor->type, "Integer") == 0) {
933
934 (void)printf(": %10d", sensor->cur_value);
935
936 /* drives */
937 } else if (strcmp(sensor->type, "Drive") == 0) {
938
939 (void)printf(": %10s", sensor->drvstate);
940
941 /* Battery capacity */
942 } else if (strcmp(sensor->type, "Battery capacity") == 0) {
943
944 (void)printf(": %10s", sensor->battcap);
945
946 /* everything else */
947 } else {
948 if (strcmp(sensor->type, "Voltage DC") == 0)
949 stype = "V";
950 else if (strcmp(sensor->type, "Voltage AC") == 0)
951 stype = "VAC";
952 else if (strcmp(sensor->type, "Ampere") == 0)
953 stype = "A";
954 else if (strcmp(sensor->type, "Watts") == 0)
955 stype = "W";
956 else if (strcmp(sensor->type, "Ohms") == 0)
957 stype = "Ohms";
958 else if (strcmp(sensor->type, "Watt hour") == 0)
959 stype = "Wh";
960 else if (strcmp(sensor->type, "Ampere hour") == 0)
961 stype = "Ah";
962
963 (void)printf(": %10.3f ",
964 sensor->cur_value / 1000000.0);
965
966 if (!statistics) {
967 if (flags & ENVSYS_WFLAG) {
968 if (sensor->warnmax_value) {
969 (void)printf("%8.3f ",
970 sensor->warnmax_value / 1000000.0);
971 ilen = 24 + 2;
972 }
973
974 if (sensor->warnmin_value) {
975 if (sensor->warnmax_value)
976 ilen = 8;
977 else
978 ilen = 16 + 1;
979 (void)printf("%*.3f ", (int)ilen,
980 sensor->warnmin_value / 1000000.0);
981 ilen = 16 + 1;
982 }
983 if (sensor->warncap_value) {
984 ilen = 24 + 2;
985 (void)printf("%*.2f%% ", (int)ilen,
986 (sensor->critcap_value * 100.0) /
987 sensor->max_value);
988 ilen = 8;
989 }
990 } else {
991 if (sensor->critmax_value) {
992 (void)printf("%8.3f ",
993 sensor->critmax_value / 1000000.0);
994 ilen = 24 + 2;
995 }
996
997 if (sensor->critmin_value) {
998 if (sensor->critmax_value)
999 ilen = 8;
1000 else
1001 ilen = 16 + 1;
1002 (void)printf("%*.3f ", (int)ilen,
1003 sensor->critmin_value / 1000000.0);
1004 ilen = 16 + 1;
1005
1006 }
1007
1008 if (sensor->critcap_value) {
1009 ilen = 24 + 2;
1010 (void)printf("%*.2f%% ", (int)ilen,
1011 (sensor->critcap_value * 100.0) /
1012 sensor->max_value);
1013 ilen = 8;
1014 }
1015 }
1016 }
1017
1018 if (statistics && !sensor->percentage) {
1019 /* show statistics if flag set */
1020 (void)printf("%8.3f %8.3f %8.3f ",
1021 stats->max / 1000000.0,
1022 stats->min / 1000000.0,
1023 stats->avg / 1000000.0);
1024 ilen = 8;
1025 }
1026
1027 (void)printf("%*s", (int)ilen, stype);
1028 if (sensor->percentage && sensor->max_value) {
1029 (void)printf(" (%5.2f%%)",
1030 (sensor->cur_value * 100.0) /
1031 sensor->max_value);
1032 }
1033 }
1034 (void)printf("\n");
1035 ilen = 32 + 3;
1036 }
1037 }
1038
1039 static int
1040 usage(void)
1041 {
1042 (void)fprintf(stderr, "Usage: %s [-DfIlrSTx] ", getprogname());
1043 (void)fprintf(stderr, "[-c file] [-d device] [-i interval] ");
1044 (void)fprintf(stderr, "[-s device:sensor,...] [-w width]\n");
1045 exit(EXIT_FAILURE);
1046 /* NOTREACHED */
1047 }
1048