envstat.c revision 1.38 1 1.38 xtraeme /* $NetBSD: envstat.c,v 1.38 2007/07/17 18:15:02 xtraeme Exp $ */
2 1.1 groo
3 1.1 groo /*-
4 1.25 xtraeme * Copyright (c) 2007 The NetBSD Foundation, Inc.
5 1.1 groo * All rights reserved.
6 1.1 groo *
7 1.1 groo * This code is derived from software contributed to The NetBSD Foundation
8 1.25 xtraeme * by Juan Romero Pardines.
9 1.1 groo *
10 1.1 groo * Redistribution and use in source and binary forms, with or without
11 1.1 groo * modification, are permitted provided that the following conditions
12 1.1 groo * are met:
13 1.1 groo * 1. Redistributions of source code must retain the above copyright
14 1.1 groo * notice, this list of conditions and the following disclaimer.
15 1.1 groo * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 groo * notice, this list of conditions and the following disclaimer in the
17 1.1 groo * documentation and/or other materials provided with the distribution.
18 1.1 groo * 3. All advertising materials mentioning features or use of this software
19 1.1 groo * must display the following acknowledgement:
20 1.25 xtraeme * This product includes software developed by Juan Romero Pardines
21 1.25 xtraeme * for the NetBSD Foundation, Inc. and its contributors.
22 1.1 groo * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.1 groo * contributors may be used to endorse or promote products derived
24 1.1 groo * from this software without specific prior written permission.
25 1.1 groo *
26 1.1 groo * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.1 groo * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.1 groo * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.1 groo * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.1 groo * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.1 groo * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.1 groo * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.1 groo * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.1 groo * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.1 groo * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.1 groo * POSSIBILITY OF SUCH DAMAGE.
37 1.1 groo */
38 1.1 groo
39 1.25 xtraeme /*
40 1.25 xtraeme * TODO:
41 1.25 xtraeme *
42 1.25 xtraeme * o Some checks should be added to ensure that the user does not
43 1.25 xtraeme * set unwanted values for the critical limits.
44 1.25 xtraeme */
45 1.1 groo
46 1.1 groo #include <stdio.h>
47 1.1 groo #include <stdlib.h>
48 1.25 xtraeme #include <stdbool.h>
49 1.1 groo #include <string.h>
50 1.1 groo #include <unistd.h>
51 1.25 xtraeme #include <fcntl.h>
52 1.3 thorpej #include <err.h>
53 1.25 xtraeme #include <errno.h>
54 1.25 xtraeme #include <prop/proplib.h>
55 1.1 groo #include <sys/envsys.h>
56 1.1 groo
57 1.25 xtraeme #define _PATH_DEV_SYSMON "/dev/sysmon"
58 1.1 groo
59 1.25 xtraeme #define ENVSYS_DFLAG 0x00000001 /* list registered devices */
60 1.25 xtraeme #define ENVSYS_FFLAG 0x00000002 /* show temp in farenheit */
61 1.25 xtraeme #define ENVSYS_LFLAG 0x00000004 /* list sensors */
62 1.25 xtraeme #define ENVSYS_XFLAG 0x00000008 /* externalize dictionary */
63 1.6 explorer
64 1.25 xtraeme /*
65 1.25 xtraeme * Operation flags for -m.
66 1.25 xtraeme */
67 1.25 xtraeme #define USERF_SCRITICAL 0x00000001 /* set a critical limit */
68 1.25 xtraeme #define USERF_RCRITICAL 0x00000002 /* remove a critical limit */
69 1.25 xtraeme #define USERF_SCRITMAX 0x00000004 /* set a critical max limit */
70 1.25 xtraeme #define USERF_RCRITMAX 0x00000008 /* remove a critical max limit */
71 1.25 xtraeme #define USERF_SCRITMIN 0x00000010 /* set a critical min limit */
72 1.25 xtraeme #define USERF_RCRITMIN 0x00000020 /* remove a critical min limit */
73 1.25 xtraeme #define USERF_SRFACT 0x00000040 /* set a new rfact */
74 1.25 xtraeme #define USERF_SDESCR 0x00000080 /* set a new description */
75 1.25 xtraeme
76 1.25 xtraeme struct envsys_sensor {
77 1.26 xtraeme bool invalid;
78 1.25 xtraeme bool visible;
79 1.25 xtraeme bool percentage;
80 1.25 xtraeme int32_t cur_value;
81 1.25 xtraeme int32_t max_value;
82 1.25 xtraeme int32_t min_value;
83 1.25 xtraeme int32_t avg_value;
84 1.25 xtraeme int32_t critcap_value;
85 1.25 xtraeme int32_t critmin_value;
86 1.25 xtraeme int32_t critmax_value;
87 1.25 xtraeme char desc[ENVSYS_DESCLEN];
88 1.25 xtraeme char type[ENVSYS_DESCLEN];
89 1.25 xtraeme char drvstate[ENVSYS_DESCLEN];
90 1.25 xtraeme };
91 1.25 xtraeme
92 1.25 xtraeme static int interval, flags, width;
93 1.25 xtraeme static char *mydevname, *sensors, *userreq;
94 1.25 xtraeme static struct envsys_sensor *gesen;
95 1.31 xtraeme static size_t gnelems, newsize;
96 1.25 xtraeme
97 1.25 xtraeme static int parse_dictionary(int);
98 1.25 xtraeme static int send_dictionary(int);
99 1.25 xtraeme static int find_sensors(prop_array_t);
100 1.25 xtraeme static void print_sensors(struct envsys_sensor *, size_t);
101 1.25 xtraeme static int check_sensors(struct envsys_sensor *, char *, size_t);
102 1.25 xtraeme static int usage(void);
103 1.25 xtraeme
104 1.25 xtraeme
105 1.25 xtraeme int main(int argc, char **argv)
106 1.25 xtraeme {
107 1.25 xtraeme prop_dictionary_t dict;
108 1.25 xtraeme int c, fd, rval;
109 1.25 xtraeme char *endptr;
110 1.25 xtraeme
111 1.25 xtraeme rval = flags = interval = width = 0;
112 1.31 xtraeme newsize = gnelems = 0;
113 1.31 xtraeme gesen = NULL;
114 1.25 xtraeme
115 1.25 xtraeme setprogname(argv[0]);
116 1.25 xtraeme
117 1.35 xtraeme while ((c = getopt(argc, argv, "Dd:fi:lm:rs:w:x")) != -1) {
118 1.25 xtraeme switch (c) {
119 1.25 xtraeme case 'd': /* show sensors of a specific device */
120 1.25 xtraeme mydevname = strdup(optarg);
121 1.25 xtraeme if (mydevname == NULL)
122 1.25 xtraeme err(ENOMEM, "out of memory");
123 1.25 xtraeme break;
124 1.25 xtraeme case 'i': /* wait time between intervals */
125 1.25 xtraeme interval = strtoul(optarg, &endptr, 10);
126 1.25 xtraeme if (*endptr != '\0')
127 1.25 xtraeme errx(1, "interval must be an integer");
128 1.25 xtraeme break;
129 1.25 xtraeme case 'D': /* list registered devices */
130 1.25 xtraeme flags |= ENVSYS_DFLAG;
131 1.25 xtraeme break;
132 1.25 xtraeme case 'f': /* display temperature in Farenheit */
133 1.25 xtraeme flags |= ENVSYS_FFLAG;
134 1.25 xtraeme break;
135 1.25 xtraeme case 'l': /* list sensors */
136 1.25 xtraeme flags |= ENVSYS_LFLAG;
137 1.25 xtraeme break;
138 1.25 xtraeme case 'w': /* width value for the lines */
139 1.25 xtraeme width = strtoul(optarg, &endptr, 10);
140 1.25 xtraeme if (*endptr != '\0')
141 1.25 xtraeme errx(1, "width must be an integer");
142 1.6 explorer break;
143 1.25 xtraeme case 'x': /* print the dictionary in raw format */
144 1.25 xtraeme flags |= ENVSYS_XFLAG;
145 1.1 groo break;
146 1.35 xtraeme case 'r':
147 1.35 xtraeme /*
148 1.35 xtraeme * This flag doesn't do anything... it's only here for
149 1.35 xtraeme * compatibility with the old implementation.
150 1.35 xtraeme */
151 1.35 xtraeme break;
152 1.25 xtraeme case 's': /* only show specified sensors */
153 1.25 xtraeme sensors = strdup(optarg);
154 1.1 groo if (sensors == NULL)
155 1.25 xtraeme err(ENOMEM, "out of memory");
156 1.1 groo break;
157 1.25 xtraeme case 'm':
158 1.25 xtraeme userreq = strdup(optarg);
159 1.25 xtraeme if (userreq == NULL)
160 1.25 xtraeme err(ENOMEM, "out of memory");
161 1.1 groo break;
162 1.1 groo case '?':
163 1.1 groo default:
164 1.1 groo usage();
165 1.1 groo /* NOTREACHED */
166 1.1 groo }
167 1.1 groo }
168 1.1 groo
169 1.25 xtraeme if ((fd = open(_PATH_DEV_SYSMON, O_RDONLY)) == -1)
170 1.25 xtraeme err(EXIT_FAILURE, "open");
171 1.1 groo
172 1.25 xtraeme if (!interval && (flags & ENVSYS_XFLAG)) {
173 1.38 xtraeme rval = prop_dictionary_recv_ioctl(fd,
174 1.38 xtraeme ENVSYS_GETDICTIONARY,
175 1.38 xtraeme &dict);
176 1.38 xtraeme if (rval) {
177 1.38 xtraeme (void)printf("%s: %s\n", getprogname(),
178 1.38 xtraeme strerror(rval));
179 1.38 xtraeme goto out;
180 1.25 xtraeme }
181 1.25 xtraeme }
182 1.1 groo
183 1.25 xtraeme if (argc == 1) {
184 1.25 xtraeme rval = parse_dictionary(fd);
185 1.3 thorpej
186 1.25 xtraeme } else if (userreq) {
187 1.25 xtraeme if (!sensors || !mydevname) {
188 1.25 xtraeme (void)fprintf(stderr, "%s: -m cannot be used without "
189 1.25 xtraeme "-s and -d\n", getprogname());
190 1.25 xtraeme return EINVAL;
191 1.25 xtraeme }
192 1.25 xtraeme
193 1.25 xtraeme rval = send_dictionary(fd);
194 1.25 xtraeme goto out;
195 1.25 xtraeme
196 1.25 xtraeme } else if (interval) {
197 1.25 xtraeme for (;;) {
198 1.25 xtraeme rval = parse_dictionary(fd);
199 1.25 xtraeme if (rval)
200 1.25 xtraeme goto out;
201 1.25 xtraeme (void)fflush(stdout);
202 1.25 xtraeme (void)sleep(interval);
203 1.25 xtraeme }
204 1.1 groo
205 1.25 xtraeme } else if (!interval) {
206 1.25 xtraeme if (flags & ENVSYS_XFLAG)
207 1.25 xtraeme (void)printf("%s", prop_dictionary_externalize(dict));
208 1.25 xtraeme else
209 1.25 xtraeme rval = parse_dictionary(fd);
210 1.25 xtraeme
211 1.25 xtraeme } else
212 1.25 xtraeme usage();
213 1.25 xtraeme
214 1.25 xtraeme out:
215 1.25 xtraeme if (sensors)
216 1.25 xtraeme free(sensors);
217 1.25 xtraeme if (userreq)
218 1.25 xtraeme free(userreq);
219 1.25 xtraeme if (mydevname)
220 1.25 xtraeme free(mydevname);
221 1.31 xtraeme if (gesen)
222 1.31 xtraeme free(gesen);
223 1.25 xtraeme (void)close(fd);
224 1.25 xtraeme return rval;
225 1.25 xtraeme }
226 1.25 xtraeme
227 1.25 xtraeme static int
228 1.25 xtraeme send_dictionary(int fd)
229 1.25 xtraeme {
230 1.25 xtraeme prop_dictionary_t dict, udict;
231 1.25 xtraeme prop_object_t obj;
232 1.25 xtraeme char *buf, *target, *endptr;
233 1.25 xtraeme int error, i, uflag;
234 1.25 xtraeme double val;
235 1.25 xtraeme
236 1.25 xtraeme error = uflag = val = 0;
237 1.25 xtraeme
238 1.25 xtraeme /*
239 1.25 xtraeme * part 1: kernel dictionary.
240 1.25 xtraeme *
241 1.25 xtraeme * This parts consists in parsing the kernel dictionary
242 1.25 xtraeme * to check for unknown device or sensor and we must
243 1.25 xtraeme * know what type of sensor are we trying to set
244 1.25 xtraeme * a critical condition.
245 1.25 xtraeme */
246 1.37 xtraeme error = prop_dictionary_recv_ioctl(fd, ENVSYS_GETDICTIONARY, &dict);
247 1.37 xtraeme if (error)
248 1.37 xtraeme return error;
249 1.1 groo
250 1.25 xtraeme if (mydevname) {
251 1.25 xtraeme obj = prop_dictionary_get(dict, mydevname);
252 1.25 xtraeme if (prop_object_type(obj) != PROP_TYPE_ARRAY) {
253 1.25 xtraeme warnx("unknown device `%s'", mydevname);
254 1.25 xtraeme prop_object_release(dict);
255 1.25 xtraeme return EINVAL;
256 1.25 xtraeme }
257 1.1 groo
258 1.25 xtraeme if (find_sensors(obj)) {
259 1.25 xtraeme prop_object_release(dict);
260 1.25 xtraeme return EINVAL;
261 1.25 xtraeme }
262 1.1 groo }
263 1.1 groo
264 1.25 xtraeme /* find the type for selected sensor */
265 1.25 xtraeme for (i = 0; i < gnelems; i++)
266 1.25 xtraeme if (strcmp(sensors, gesen[i].desc) == 0)
267 1.25 xtraeme break;
268 1.1 groo
269 1.25 xtraeme /* we know the type of the sensor now, release kernel dict */
270 1.25 xtraeme prop_object_release(dict);
271 1.36 xtraeme /* we don't need the rdonly fd */
272 1.36 xtraeme (void)close(fd);
273 1.36 xtraeme
274 1.25 xtraeme
275 1.25 xtraeme /*
276 1.25 xtraeme * part 2: userland dictionary.
277 1.25 xtraeme *
278 1.25 xtraeme * This parts consists in setting the values provided
279 1.25 xtraeme * by the user and convert when necesssary to send
280 1.25 xtraeme * them to the kernel again.
281 1.25 xtraeme */
282 1.25 xtraeme udict = prop_dictionary_create();
283 1.1 groo
284 1.34 xtraeme #define MKPROP(var, str) \
285 1.34 xtraeme do { \
286 1.34 xtraeme obj = prop_string_create_cstring_nocopy(var); \
287 1.34 xtraeme if (obj == NULL || !prop_dictionary_set(udict, (str), obj)) { \
288 1.34 xtraeme error = EINVAL; \
289 1.34 xtraeme goto out; \
290 1.34 xtraeme } \
291 1.34 xtraeme } while (/* CONSTCOND */ 0)
292 1.34 xtraeme
293 1.25 xtraeme /* create the driver-name object */
294 1.34 xtraeme MKPROP(mydevname, "driver-name");
295 1.34 xtraeme prop_object_release(obj);
296 1.25 xtraeme
297 1.34 xtraeme /* create the sensor-name object */
298 1.34 xtraeme MKPROP(sensors, "sensor-name");
299 1.25 xtraeme prop_object_release(obj);
300 1.25 xtraeme
301 1.34 xtraeme #undef MKPROP
302 1.25 xtraeme
303 1.25 xtraeme /*
304 1.25 xtraeme * parse the -m argument; we understand the following ways:
305 1.25 xtraeme *
306 1.25 xtraeme * -m critical/crit{max,min}=value
307 1.25 xtraeme * -m critical/crit{max,min}=remove
308 1.25 xtraeme * -m desc="BLAH"
309 1.25 xtraeme * -m rfact=value
310 1.25 xtraeme */
311 1.25 xtraeme if (userreq) {
312 1.25 xtraeme buf = strtok(userreq, "=");
313 1.25 xtraeme target = strdup(buf);
314 1.25 xtraeme if (target == NULL) {
315 1.25 xtraeme error = ENOMEM;
316 1.25 xtraeme goto out;
317 1.25 xtraeme }
318 1.1 groo
319 1.25 xtraeme while (buf != NULL) {
320 1.25 xtraeme /*
321 1.25 xtraeme * skip current string if it's the same
322 1.25 xtraeme * than target requested.
323 1.25 xtraeme */
324 1.25 xtraeme if (strcmp(target, buf) == 0)
325 1.25 xtraeme buf = strtok(NULL, "=");
326 1.25 xtraeme
327 1.25 xtraeme /* check what target was requested */
328 1.25 xtraeme if (strcmp(target, "desc") == 0) {
329 1.25 xtraeme uflag |= USERF_SDESCR;
330 1.25 xtraeme obj = prop_string_create_cstring_nocopy(buf);
331 1.25 xtraeme break;
332 1.25 xtraeme #define SETNCHECKVAL(a, b) \
333 1.25 xtraeme do { \
334 1.25 xtraeme if (strcmp(buf, "remove") == 0) \
335 1.25 xtraeme uflag |= (a); \
336 1.25 xtraeme else { \
337 1.25 xtraeme uflag |= (b); \
338 1.25 xtraeme val = strtod(buf, &endptr); \
339 1.25 xtraeme if (*endptr != '\0') { \
340 1.25 xtraeme (void)printf("%s: invalid value\n", \
341 1.25 xtraeme getprogname()); \
342 1.25 xtraeme error = EINVAL; \
343 1.25 xtraeme goto out; \
344 1.25 xtraeme } \
345 1.25 xtraeme } \
346 1.25 xtraeme } while (/* CONSTCOND */ 0)
347 1.6 explorer
348 1.25 xtraeme } else if (strcmp(target, "critical") == 0) {
349 1.25 xtraeme SETNCHECKVAL(USERF_RCRITICAL, USERF_SCRITICAL);
350 1.25 xtraeme break;
351 1.25 xtraeme } else if (strcmp(target, "critmax") == 0) {
352 1.25 xtraeme SETNCHECKVAL(USERF_RCRITMAX, USERF_SCRITMAX);
353 1.25 xtraeme break;
354 1.25 xtraeme } else if (strcmp(target, "critmin") == 0) {
355 1.25 xtraeme SETNCHECKVAL(USERF_RCRITMIN, USERF_SCRITMIN);
356 1.25 xtraeme break;
357 1.25 xtraeme } else if (strcmp(target, "rfact") == 0) {
358 1.25 xtraeme uflag |= USERF_SRFACT;
359 1.25 xtraeme val = strtod(buf, &endptr);
360 1.25 xtraeme if (*endptr != '\0') {
361 1.25 xtraeme (void)printf("%s: invalid value\n",
362 1.25 xtraeme getprogname());
363 1.25 xtraeme error = EINVAL;
364 1.25 xtraeme goto out;
365 1.25 xtraeme }
366 1.25 xtraeme break;
367 1.25 xtraeme } else {
368 1.25 xtraeme (void)printf("%s: invalid target\n",
369 1.25 xtraeme getprogname());
370 1.25 xtraeme error = EINVAL;
371 1.25 xtraeme goto out;
372 1.25 xtraeme }
373 1.6 explorer }
374 1.25 xtraeme free(target);
375 1.6 explorer }
376 1.6 explorer
377 1.34 xtraeme #undef SETNCHECKVAL
378 1.34 xtraeme
379 1.25 xtraeme /* critical capacity for percentage sensors */
380 1.25 xtraeme if (uflag & USERF_SCRITICAL) {
381 1.25 xtraeme /* sanity check */
382 1.25 xtraeme if (val < 0 || val > 100) {
383 1.25 xtraeme (void)printf("%s: invalid value (0><100)\n",
384 1.25 xtraeme getprogname());
385 1.25 xtraeme error = EINVAL;
386 1.25 xtraeme goto out;
387 1.25 xtraeme }
388 1.6 explorer
389 1.25 xtraeme /* ok... convert the value */
390 1.25 xtraeme val = (val / 100) * gesen[i].max_value;
391 1.25 xtraeme obj = prop_number_create_unsigned_integer(val);
392 1.1 groo }
393 1.1 groo
394 1.25 xtraeme /*
395 1.25 xtraeme * conversions required to send a proper value to the kernel.
396 1.25 xtraeme */
397 1.25 xtraeme if ((uflag & USERF_SCRITMAX) || (uflag & USERF_SCRITMIN)) {
398 1.25 xtraeme /* temperatures */
399 1.25 xtraeme if (strcmp(gesen[i].type, "Temperature") == 0) {
400 1.25 xtraeme /* convert from farenheit to celsius */
401 1.25 xtraeme if (flags & ENVSYS_FFLAG)
402 1.25 xtraeme val = (val - 32.0) * (5.0 / 9.0);
403 1.25 xtraeme
404 1.25 xtraeme /* convert to microKelvin */
405 1.25 xtraeme val = val * 1000000 + 273150000;
406 1.25 xtraeme /* printf("val=%d\n", (int)val); */
407 1.25 xtraeme obj = prop_number_create_unsigned_integer(val);
408 1.25 xtraeme /* fans */
409 1.25 xtraeme } else if (strcmp(gesen[i].type, "Fan") == 0) {
410 1.25 xtraeme if (val < 0 || val > 10000) {
411 1.25 xtraeme error = EINVAL;
412 1.25 xtraeme goto out;
413 1.25 xtraeme }
414 1.25 xtraeme /* printf("val=%d\n", (int)val); */
415 1.25 xtraeme obj = prop_number_create_unsigned_integer(val);
416 1.1 groo
417 1.25 xtraeme /* volts, watts, ohms, etc */
418 1.25 xtraeme } else {
419 1.25 xtraeme /* convert to m[V,W,Ohms] again */
420 1.25 xtraeme val *= 1000000.0;
421 1.25 xtraeme /* printf("val=%5.0f\n", val); */
422 1.25 xtraeme obj = prop_number_create_integer(val);
423 1.1 groo }
424 1.1 groo }
425 1.1 groo
426 1.34 xtraeme #define SETPROP(str) \
427 1.34 xtraeme do { \
428 1.34 xtraeme if (!prop_dictionary_set(udict, (str), obj)) { \
429 1.34 xtraeme error = EINVAL; \
430 1.34 xtraeme goto out; \
431 1.34 xtraeme } \
432 1.34 xtraeme } while ( /*CONSTCOND*/ 0)
433 1.34 xtraeme
434 1.25 xtraeme /* user wanted to set a new description */
435 1.25 xtraeme if (uflag & USERF_SDESCR) {
436 1.34 xtraeme SETPROP("new-description");
437 1.1 groo
438 1.25 xtraeme /* user wanted to set a new critical capacity */
439 1.25 xtraeme } else if (uflag & USERF_SCRITICAL) {
440 1.34 xtraeme SETPROP("critical-capacity");
441 1.19 mrg
442 1.25 xtraeme } else if (uflag & USERF_RCRITICAL) {
443 1.25 xtraeme obj = prop_bool_create(1);
444 1.34 xtraeme SETPROP("remove-critical-cap");
445 1.19 mrg
446 1.25 xtraeme /* user wanted to remove a critical min limit */
447 1.25 xtraeme } else if (uflag & USERF_RCRITMIN) {
448 1.25 xtraeme obj = prop_bool_create(1);
449 1.34 xtraeme SETPROP("remove-cmin-limit");
450 1.19 mrg
451 1.25 xtraeme /* user wanted to remove a critical max limit */
452 1.25 xtraeme } else if (uflag & USERF_RCRITMAX) {
453 1.25 xtraeme obj = prop_bool_create(1);
454 1.34 xtraeme SETPROP("remove-cmax-limit");
455 1.19 mrg
456 1.25 xtraeme /* user wanted to set a new critical min value */
457 1.25 xtraeme } else if (uflag & USERF_SCRITMIN) {
458 1.34 xtraeme SETPROP("critical-min-limit");
459 1.25 xtraeme
460 1.25 xtraeme /* user wanted to set a new critical max value */
461 1.25 xtraeme } else if (uflag & USERF_SCRITMAX) {
462 1.34 xtraeme SETPROP("critical-max-limit");
463 1.19 mrg
464 1.25 xtraeme /* user wanted to set a new rfact */
465 1.25 xtraeme } else if (uflag & USERF_SRFACT) {
466 1.25 xtraeme obj = prop_number_create_integer(val);
467 1.34 xtraeme SETPROP("new-rfact");
468 1.19 mrg
469 1.25 xtraeme } else {
470 1.25 xtraeme (void)printf("%s: unknown operation\n", getprogname());
471 1.25 xtraeme error = EINVAL;
472 1.25 xtraeme goto out;
473 1.19 mrg }
474 1.19 mrg
475 1.34 xtraeme #undef SETPROP
476 1.34 xtraeme
477 1.25 xtraeme prop_object_release(obj);
478 1.1 groo
479 1.34 xtraeme #ifdef DEBUG
480 1.25 xtraeme printf("%s", prop_dictionary_externalize(udict));
481 1.25 xtraeme return error;
482 1.25 xtraeme #endif
483 1.1 groo
484 1.36 xtraeme if ((fd = open(_PATH_DEV_SYSMON, O_RDWR)) == -1) {
485 1.36 xtraeme error = errno;
486 1.36 xtraeme warnx("%s", strerror(errno));
487 1.36 xtraeme goto out;
488 1.36 xtraeme }
489 1.36 xtraeme
490 1.25 xtraeme /* all done? send our dictionary now */
491 1.25 xtraeme error = prop_dictionary_send_ioctl(udict, fd, ENVSYS_SETDICTIONARY);
492 1.6 explorer
493 1.25 xtraeme if (error)
494 1.25 xtraeme (void)printf("%s: %s\n", getprogname(), strerror(error));
495 1.25 xtraeme out:
496 1.25 xtraeme prop_object_release(udict);
497 1.25 xtraeme return error;
498 1.25 xtraeme }
499 1.25 xtraeme
500 1.25 xtraeme static int
501 1.25 xtraeme parse_dictionary(int fd)
502 1.25 xtraeme {
503 1.25 xtraeme prop_array_t array;
504 1.25 xtraeme prop_dictionary_t dict;
505 1.25 xtraeme prop_object_iterator_t iter;
506 1.25 xtraeme prop_object_t obj;
507 1.25 xtraeme const char *dnp = NULL;
508 1.25 xtraeme int rval = 0;
509 1.25 xtraeme
510 1.25 xtraeme /* receive dictionary from kernel */
511 1.37 xtraeme rval = prop_dictionary_recv_ioctl(fd, ENVSYS_GETDICTIONARY, &dict);
512 1.37 xtraeme if (rval)
513 1.37 xtraeme return rval;
514 1.25 xtraeme
515 1.25 xtraeme if (mydevname) {
516 1.25 xtraeme obj = prop_dictionary_get(dict, mydevname);
517 1.25 xtraeme if (prop_object_type(obj) != PROP_TYPE_ARRAY) {
518 1.25 xtraeme warnx("unknown device `%s'", mydevname);
519 1.25 xtraeme rval = EINVAL;
520 1.25 xtraeme goto out;
521 1.1 groo }
522 1.1 groo
523 1.25 xtraeme rval = find_sensors(obj);
524 1.25 xtraeme if (rval)
525 1.25 xtraeme goto out;
526 1.25 xtraeme } else {
527 1.25 xtraeme iter = prop_dictionary_iterator(dict);
528 1.25 xtraeme if (iter == NULL) {
529 1.25 xtraeme rval = EINVAL;
530 1.25 xtraeme goto out;
531 1.25 xtraeme }
532 1.6 explorer
533 1.25 xtraeme /* iterate over the dictionary returned by the kernel */
534 1.25 xtraeme while ((obj = prop_object_iterator_next(iter)) != NULL) {
535 1.1 groo
536 1.25 xtraeme array = prop_dictionary_get_keysym(dict, obj);
537 1.25 xtraeme if (prop_object_type(array) != PROP_TYPE_ARRAY) {
538 1.25 xtraeme warnx("no sensors found");
539 1.25 xtraeme rval = EINVAL;
540 1.25 xtraeme goto out;
541 1.1 groo }
542 1.1 groo
543 1.25 xtraeme dnp = prop_dictionary_keysym_cstring_nocopy(obj);
544 1.25 xtraeme
545 1.25 xtraeme if (flags & ENVSYS_DFLAG) {
546 1.31 xtraeme (void)printf("%s\n", dnp);
547 1.25 xtraeme } else {
548 1.25 xtraeme rval = find_sensors(array);
549 1.25 xtraeme if (rval)
550 1.25 xtraeme goto out;
551 1.1 groo }
552 1.1 groo }
553 1.31 xtraeme
554 1.25 xtraeme prop_object_iterator_release(iter);
555 1.33 xtraeme }
556 1.31 xtraeme
557 1.33 xtraeme if (userreq == NULL)
558 1.33 xtraeme if ((flags & ENVSYS_LFLAG) == 0)
559 1.33 xtraeme print_sensors(gesen, gnelems);
560 1.33 xtraeme
561 1.33 xtraeme if (interval)
562 1.33 xtraeme (void)printf("\n");
563 1.25 xtraeme
564 1.25 xtraeme out:
565 1.31 xtraeme if (gesen) {
566 1.31 xtraeme free(gesen);
567 1.31 xtraeme gesen = NULL;
568 1.31 xtraeme gnelems = 0;
569 1.31 xtraeme newsize = 0;
570 1.31 xtraeme }
571 1.25 xtraeme prop_object_release(dict);
572 1.25 xtraeme return rval;
573 1.1 groo }
574 1.1 groo
575 1.25 xtraeme static int
576 1.25 xtraeme find_sensors(prop_array_t array)
577 1.25 xtraeme {
578 1.25 xtraeme prop_object_iterator_t iter;
579 1.25 xtraeme prop_object_t obj, obj1;
580 1.25 xtraeme prop_string_t state, desc = NULL;
581 1.31 xtraeme struct envsys_sensor *esen = NULL;
582 1.31 xtraeme int rval = 0;
583 1.31 xtraeme size_t oldsize;
584 1.25 xtraeme char *str = NULL;
585 1.25 xtraeme
586 1.31 xtraeme oldsize = newsize;
587 1.31 xtraeme newsize += prop_array_count(array) * sizeof(*gesen);
588 1.31 xtraeme esen = realloc(gesen, newsize);
589 1.31 xtraeme if (esen == NULL) {
590 1.31 xtraeme if (gesen)
591 1.31 xtraeme free(gesen);
592 1.31 xtraeme gesen = NULL;
593 1.31 xtraeme rval = ENOMEM;
594 1.31 xtraeme goto out;
595 1.31 xtraeme }
596 1.31 xtraeme gesen = esen;
597 1.25 xtraeme
598 1.25 xtraeme iter = prop_array_iterator(array);
599 1.25 xtraeme if (iter == NULL) {
600 1.25 xtraeme rval = EINVAL;
601 1.25 xtraeme goto out;
602 1.25 xtraeme }
603 1.25 xtraeme
604 1.25 xtraeme /* iterate over the array of dictionaries */
605 1.25 xtraeme while ((obj = prop_object_iterator_next(iter)) != NULL) {
606 1.31 xtraeme
607 1.31 xtraeme gesen[gnelems].visible = false;
608 1.31 xtraeme
609 1.25 xtraeme /* check sensor's state */
610 1.25 xtraeme state = prop_dictionary_get(obj, "state");
611 1.1 groo
612 1.26 xtraeme /* mark invalid sensors */
613 1.25 xtraeme if (prop_string_equals_cstring(state, "invalid"))
614 1.31 xtraeme gesen[gnelems].invalid = true;
615 1.31 xtraeme else
616 1.31 xtraeme gesen[gnelems].invalid = false;
617 1.25 xtraeme
618 1.25 xtraeme /* description string */
619 1.25 xtraeme desc = prop_dictionary_get(obj, "description");
620 1.37 xtraeme if (desc != NULL) {
621 1.37 xtraeme /* copy description */
622 1.37 xtraeme (void)strlcpy(gesen[gnelems].desc,
623 1.37 xtraeme prop_string_cstring_nocopy(desc),
624 1.37 xtraeme sizeof(gesen[gnelems].desc));
625 1.37 xtraeme } else
626 1.37 xtraeme continue;
627 1.25 xtraeme
628 1.25 xtraeme /* type string */
629 1.25 xtraeme obj1 = prop_dictionary_get(obj, "type");
630 1.25 xtraeme /* copy type */
631 1.31 xtraeme (void)strlcpy(gesen[gnelems].type,
632 1.31 xtraeme prop_string_cstring_nocopy(obj1),
633 1.31 xtraeme sizeof(gesen[gnelems].type));
634 1.25 xtraeme
635 1.25 xtraeme /* get current drive state string */
636 1.25 xtraeme obj1 = prop_dictionary_get(obj, "drive-state");
637 1.25 xtraeme if (obj1 != NULL)
638 1.31 xtraeme (void)strlcpy(gesen[gnelems].drvstate,
639 1.25 xtraeme prop_string_cstring_nocopy(obj1),
640 1.31 xtraeme sizeof(gesen[gnelems].drvstate));
641 1.25 xtraeme
642 1.25 xtraeme /* get current value */
643 1.25 xtraeme obj1 = prop_dictionary_get(obj, "cur-value");
644 1.31 xtraeme gesen[gnelems].cur_value = prop_number_integer_value(obj1);
645 1.25 xtraeme
646 1.25 xtraeme /* get max value */
647 1.25 xtraeme obj1 = prop_dictionary_get(obj, "max-value");
648 1.25 xtraeme if (obj1 != NULL)
649 1.31 xtraeme gesen[gnelems].max_value =
650 1.31 xtraeme prop_number_integer_value(obj1);
651 1.31 xtraeme else
652 1.31 xtraeme gesen[gnelems].max_value = 0;
653 1.25 xtraeme
654 1.25 xtraeme /* get min value */
655 1.25 xtraeme obj1 = prop_dictionary_get(obj, "min-value");
656 1.25 xtraeme if (obj1 != NULL)
657 1.31 xtraeme gesen[gnelems].min_value =
658 1.31 xtraeme prop_number_integer_value(obj1);
659 1.31 xtraeme else
660 1.31 xtraeme gesen[gnelems].min_value = 0;
661 1.25 xtraeme
662 1.25 xtraeme /* get avg value */
663 1.25 xtraeme obj1 = prop_dictionary_get(obj, "avg-value");
664 1.25 xtraeme if (obj1 != NULL)
665 1.31 xtraeme gesen[gnelems].avg_value =
666 1.31 xtraeme prop_number_integer_value(obj1);
667 1.31 xtraeme else
668 1.31 xtraeme gesen[gnelems].avg_value = 0;
669 1.25 xtraeme
670 1.25 xtraeme /* get percentage flag */
671 1.25 xtraeme obj1 = prop_dictionary_get(obj, "want-percentage");
672 1.25 xtraeme if (obj1 != NULL)
673 1.31 xtraeme gesen[gnelems].percentage = prop_bool_true(obj1);
674 1.25 xtraeme
675 1.25 xtraeme /* get critical max value if available */
676 1.25 xtraeme obj1 = prop_dictionary_get(obj, "critical-max-limit");
677 1.25 xtraeme if (obj1 != NULL) {
678 1.31 xtraeme gesen[gnelems].critmax_value =
679 1.25 xtraeme prop_number_integer_value(obj1);
680 1.31 xtraeme } else
681 1.31 xtraeme gesen[gnelems].critmax_value = 0;
682 1.5 cgd
683 1.25 xtraeme /* get critical min value if available */
684 1.25 xtraeme obj1 = prop_dictionary_get(obj, "critical-min-limit");
685 1.25 xtraeme if (obj1 != NULL) {
686 1.31 xtraeme gesen[gnelems].critmin_value =
687 1.25 xtraeme prop_number_integer_value(obj1);
688 1.31 xtraeme } else
689 1.31 xtraeme gesen[gnelems].critmin_value = 0;
690 1.1 groo
691 1.25 xtraeme /* get critical capacity value if available */
692 1.25 xtraeme obj1 = prop_dictionary_get(obj, "critical-capacity");
693 1.25 xtraeme if (obj1 != NULL) {
694 1.31 xtraeme gesen[gnelems].critcap_value =
695 1.25 xtraeme prop_number_integer_value(obj1);
696 1.31 xtraeme } else
697 1.31 xtraeme gesen[gnelems].critcap_value = 0;
698 1.1 groo
699 1.31 xtraeme /* pass to the next struct and increase the counter */
700 1.31 xtraeme gnelems++;
701 1.25 xtraeme
702 1.25 xtraeme /* print sensor names if -l was given */
703 1.25 xtraeme if (flags & ENVSYS_LFLAG) {
704 1.25 xtraeme if (width)
705 1.25 xtraeme (void)printf("%*s\n", width,
706 1.25 xtraeme prop_string_cstring_nocopy(desc));
707 1.25 xtraeme else
708 1.25 xtraeme (void)printf("%s\n",
709 1.25 xtraeme prop_string_cstring_nocopy(desc));
710 1.25 xtraeme }
711 1.25 xtraeme }
712 1.1 groo
713 1.25 xtraeme /* free memory */
714 1.25 xtraeme prop_object_iterator_release(iter);
715 1.1 groo
716 1.25 xtraeme /*
717 1.25 xtraeme * if -s was specified, we need a way to mark if a sensor
718 1.25 xtraeme * was found.
719 1.25 xtraeme */
720 1.25 xtraeme if (sensors) {
721 1.25 xtraeme str = strdup(sensors);
722 1.25 xtraeme if (str == NULL)
723 1.25 xtraeme return ENOMEM;
724 1.6 explorer
725 1.31 xtraeme rval = check_sensors(gesen, str, gnelems);
726 1.25 xtraeme if (rval)
727 1.25 xtraeme goto out;
728 1.1 groo }
729 1.1 groo
730 1.25 xtraeme out:
731 1.31 xtraeme if (str)
732 1.31 xtraeme free(str);
733 1.25 xtraeme return rval;
734 1.1 groo }
735 1.1 groo
736 1.25 xtraeme static int
737 1.25 xtraeme check_sensors(struct envsys_sensor *es, char *str, size_t nelems)
738 1.1 groo {
739 1.1 groo int i;
740 1.25 xtraeme char *sname;
741 1.25 xtraeme
742 1.25 xtraeme sname = strtok(str, ",");
743 1.25 xtraeme while (sname != NULL) {
744 1.25 xtraeme for (i = 0; i < nelems; i++) {
745 1.25 xtraeme if (strcmp(sname, es[i].desc) == 0) {
746 1.25 xtraeme es[i].visible = true;
747 1.25 xtraeme break;
748 1.25 xtraeme }
749 1.25 xtraeme }
750 1.25 xtraeme if (i >= nelems) {
751 1.25 xtraeme if (mydevname) {
752 1.25 xtraeme warnx("unknown sensor `%s' for device `%s'",
753 1.25 xtraeme sname, mydevname);
754 1.25 xtraeme return EINVAL;
755 1.25 xtraeme } else {
756 1.25 xtraeme warnx("unknown sensor `%s'", sname);
757 1.25 xtraeme return EINVAL;
758 1.25 xtraeme }
759 1.25 xtraeme }
760 1.25 xtraeme sname = strtok(NULL, ",");
761 1.25 xtraeme }
762 1.1 groo
763 1.25 xtraeme /* check if all sensors were ok, and error out if not */
764 1.25 xtraeme for (i = 0; i < nelems; i++) {
765 1.25 xtraeme if (es[i].visible)
766 1.25 xtraeme return 0;
767 1.1 groo }
768 1.25 xtraeme
769 1.25 xtraeme warnx("no sensors selected to display");
770 1.25 xtraeme return EINVAL;
771 1.1 groo }
772 1.1 groo
773 1.25 xtraeme static void
774 1.25 xtraeme print_sensors(struct envsys_sensor *es, size_t nelems)
775 1.1 groo {
776 1.25 xtraeme size_t maxlen = 0;
777 1.25 xtraeme double temp = 0;
778 1.27 xtraeme const char *invalid = "N/A";
779 1.25 xtraeme const char *degrees = NULL;
780 1.25 xtraeme int i;
781 1.1 groo
782 1.25 xtraeme /* find the longest description */
783 1.31 xtraeme for (i = 0; i < nelems; i++) {
784 1.25 xtraeme if (strlen(es[i].desc) > maxlen)
785 1.25 xtraeme maxlen = strlen(es[i].desc);
786 1.25 xtraeme }
787 1.1 groo
788 1.25 xtraeme if (width)
789 1.25 xtraeme maxlen = width;
790 1.1 groo
791 1.25 xtraeme /* print the sensors */
792 1.31 xtraeme for (i = 0; i < nelems; i++) {
793 1.1 groo
794 1.25 xtraeme /* skip sensors that were not marked as visible */
795 1.25 xtraeme if (sensors && !es[i].visible)
796 1.25 xtraeme continue;
797 1.1 groo
798 1.25 xtraeme (void)printf("%*.*s", (int)maxlen, (int)maxlen, es[i].desc);
799 1.1 groo
800 1.29 xtraeme if (es[i].invalid) {
801 1.29 xtraeme (void)printf(": %10s\n", invalid);
802 1.29 xtraeme continue;
803 1.29 xtraeme }
804 1.29 xtraeme
805 1.25 xtraeme if (strcmp(es[i].type, "Indicator") == 0) {
806 1.29 xtraeme
807 1.29 xtraeme (void)printf(": %10s", es[i].cur_value ? "ON" : "OFF");
808 1.1 groo
809 1.25 xtraeme /* converts the value to degC or degF */
810 1.25 xtraeme #define CONVERTTEMP(a, b, c) \
811 1.25 xtraeme do { \
812 1.25 xtraeme (a) = ((b) / 1000000.0) - 273.15; \
813 1.25 xtraeme if (flags & ENVSYS_FFLAG) { \
814 1.25 xtraeme (a) = (9.0 / 5.0) * (a) + 32.0; \
815 1.25 xtraeme (c) = "degF"; \
816 1.25 xtraeme } else \
817 1.25 xtraeme (c) = "degC"; \
818 1.25 xtraeme } while (/* CONSTCOND */ 0)
819 1.25 xtraeme
820 1.25 xtraeme
821 1.25 xtraeme /* temperatures */
822 1.27 xtraeme } else if (strcmp(es[i].type, "Temperature") == 0) {
823 1.25 xtraeme
824 1.25 xtraeme CONVERTTEMP(temp, es[i].cur_value, degrees);
825 1.29 xtraeme (void)printf(": %10.3f %s", temp, degrees);
826 1.25 xtraeme
827 1.25 xtraeme if (es[i].critmax_value || es[i].critmin_value)
828 1.25 xtraeme (void)printf(" ");
829 1.25 xtraeme
830 1.25 xtraeme if (es[i].critmax_value) {
831 1.25 xtraeme CONVERTTEMP(temp, es[i].critmax_value, degrees);
832 1.25 xtraeme (void)printf("max: %8.3f %s ", temp, degrees);
833 1.25 xtraeme }
834 1.25 xtraeme
835 1.25 xtraeme if (es[i].critmin_value) {
836 1.25 xtraeme CONVERTTEMP(temp, es[i].critmin_value, degrees);
837 1.25 xtraeme (void)printf("min: %8.3f %s", temp, degrees);
838 1.25 xtraeme }
839 1.34 xtraeme #undef CONVERTTEMP
840 1.25 xtraeme
841 1.25 xtraeme /* fans */
842 1.25 xtraeme } else if (strcmp(es[i].type, "Fan") == 0) {
843 1.25 xtraeme
844 1.29 xtraeme (void)printf(": %10u RPM", es[i].cur_value);
845 1.25 xtraeme
846 1.25 xtraeme if (es[i].critmax_value || es[i].critmin_value)
847 1.25 xtraeme (void)printf(" ");
848 1.25 xtraeme if (es[i].critmax_value)
849 1.25 xtraeme (void)printf("max: %8u RPM ",
850 1.25 xtraeme es[i].critmax_value);
851 1.25 xtraeme if (es[i].critmin_value)
852 1.25 xtraeme (void)printf("min: %8u RPM",
853 1.25 xtraeme es[i].critmin_value);
854 1.25 xtraeme
855 1.25 xtraeme /* integers */
856 1.25 xtraeme } else if (strcmp(es[i].type, "Integer") == 0) {
857 1.25 xtraeme
858 1.29 xtraeme (void)printf(": %10d", es[i].cur_value);
859 1.25 xtraeme
860 1.25 xtraeme /* drives */
861 1.25 xtraeme } else if (strcmp(es[i].type, "Drive") == 0) {
862 1.27 xtraeme
863 1.30 xtraeme (void)printf(": %10s", es[i].drvstate);
864 1.25 xtraeme
865 1.25 xtraeme /* everything else */
866 1.25 xtraeme } else {
867 1.25 xtraeme const char *type;
868 1.25 xtraeme
869 1.25 xtraeme if (strcmp(es[i].type, "Voltage DC") == 0)
870 1.25 xtraeme type = "V";
871 1.25 xtraeme else if (strcmp(es[i].type, "Voltage AC") == 0)
872 1.25 xtraeme type = "VAC";
873 1.25 xtraeme else if (strcmp(es[i].type, "Ampere") == 0)
874 1.25 xtraeme type = "A";
875 1.25 xtraeme else if (strcmp(es[i].type, "Watts") == 0)
876 1.25 xtraeme type = "W";
877 1.25 xtraeme else if (strcmp(es[i].type, "Ohms") == 0)
878 1.25 xtraeme type = "Ohms";
879 1.25 xtraeme else if (strcmp(es[i].type, "Watt hour") == 0)
880 1.25 xtraeme type = "Wh";
881 1.25 xtraeme else if (strcmp(es[i].type, "Ampere hour") == 0)
882 1.25 xtraeme type = "Ah";
883 1.25 xtraeme else
884 1.25 xtraeme type = NULL;
885 1.1 groo
886 1.29 xtraeme (void)printf(": %10.3f %s",
887 1.29 xtraeme es[i].cur_value / 1000000.0, type);
888 1.29 xtraeme
889 1.29 xtraeme if (es[i].percentage && es[i].max_value) {
890 1.29 xtraeme (void)printf(" (%5.2f%%)",
891 1.29 xtraeme (es[i].cur_value * 100.0) /
892 1.29 xtraeme es[i].max_value);
893 1.25 xtraeme }
894 1.25 xtraeme
895 1.25 xtraeme if (es[i].critcap_value) {
896 1.25 xtraeme (void)printf(" critical (%5.2f%%)",
897 1.25 xtraeme (es[i].critcap_value * 100.0) /
898 1.25 xtraeme es[i].max_value);
899 1.25 xtraeme }
900 1.6 explorer
901 1.25 xtraeme if (es[i].critmax_value || es[i].critmin_value)
902 1.25 xtraeme (void)printf(" ");
903 1.25 xtraeme if (es[i].critmax_value)
904 1.25 xtraeme (void)printf("max: %8.3f %s ",
905 1.25 xtraeme es[i].critmax_value / 1000000.0,
906 1.25 xtraeme type);
907 1.25 xtraeme if (es[i].critmin_value)
908 1.25 xtraeme (void)printf("min: %8.3f %s",
909 1.25 xtraeme es[i].critmin_value / 1000000.0,
910 1.25 xtraeme type);
911 1.1 groo
912 1.25 xtraeme }
913 1.1 groo
914 1.25 xtraeme (void)printf("\n");
915 1.1 groo }
916 1.25 xtraeme }
917 1.1 groo
918 1.25 xtraeme static int
919 1.25 xtraeme usage(void)
920 1.25 xtraeme {
921 1.35 xtraeme (void)fprintf(stderr, "Usage: %s [-Dflrx] ", getprogname());
922 1.25 xtraeme (void)fprintf(stderr, "[-m ...] [-s s1,s2 ] [-w num] ");
923 1.25 xtraeme (void)fprintf(stderr, "[-i num] [-d ...]\n");
924 1.25 xtraeme exit(EXIT_FAILURE);
925 1.25 xtraeme /* NOTREACHED */
926 1.1 groo }
927