xref: /dragonfly/usr.bin/systat/sensors.c (revision 110def69)
1 /* $OpenBSD: sensors.c,v 1.11 2007/03/23 14:48:22 ckuethe Exp $ */
2 
3 /*
4  * Copyright (c) 2007 Deanna Phillips <deanna@openbsd.org>
5  * Copyright (c) 2003 Henning Brauer <henning@openbsd.org>
6  * Copyright (c) 2006 Constantine A. Murenin <cnst+openbsd@bugmail.mojo.ru>
7  *
8  * Permission to use, copy, modify, and distribute this software for any
9  * purpose with or without fee is hereby granted, provided that the above
10  * copyright notice and this permission notice appear in all copies.
11  *
12  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
13  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
14  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
15  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
16  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
17  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
18  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19  */
20 
21 #include <sys/param.h>
22 #include <sys/sysctl.h>
23 #include <sys/sensors.h>
24 
25 #include <ctype.h>
26 #include <err.h>
27 #include <errno.h>
28 #include <libutil.h>
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include <string.h>
32 
33 #include "systat.h"
34 #include "extern.h"
35 
36 struct sensor sensor;
37 struct sensordev sensordev;
38 int row, sensor_cnt;
39 void printline(void);
40 static char * fmttime(double);
41 
42 struct sensordev_xname {
43 	char	xname[24];
44 	int	xname_len;
45 	u_int	flags;	/* XNAME_FLAG_ */
46 };
47 
48 #define XNAME_FLAG_WILDCARD	0x1
49 
50 static int	sensors_enabled[SENSOR_MAX_TYPES];
51 
52 #define XNAME_MAX		64
53 
54 static int	sensordev_xname_cnt;
55 static struct sensordev_xname sensordev_xname[XNAME_MAX];
56 
57 WINDOW *
58 opensensors(void)
59 {
60 	return (subwin(stdscr, LINES-5-1, 0, 5, 0));
61 }
62 
63 void
64 closesensors(WINDOW *w)
65 {
66 	if (w == NULL)
67 		return;
68 	wclear(w);
69 	wrefresh(w);
70 	delwin(w);
71 }
72 
73 void
74 labelsensors(void)
75 {
76 	wmove(wnd, 0, 0);
77 	wclrtobot(wnd);
78 	mvwaddstr(wnd, 0, 0, "Sensor");
79 	mvwaddstr(wnd, 0, 34, "Value");
80 	mvwaddstr(wnd, 0, 45, "Status");
81 	mvwaddstr(wnd, 0, 58, "Description");
82 }
83 
84 void
85 fetchsensors(void)
86 {
87 	enum sensor_type type;
88 	size_t		 slen, sdlen, idmax_len;
89 	int		 mib[5], dev, numt, idmax;
90 	int		 maxsensordevices;
91 
92 	maxsensordevices = MAXSENSORDEVICES;
93 	idmax_len = sizeof(idmax);
94 	if (sysctlbyname("hw.sensors.dev_idmax", &idmax, &idmax_len,
95 	    NULL, 0) == 0)
96 		maxsensordevices = idmax;
97 
98 	mib[0] = CTL_HW;
99 	mib[1] = HW_SENSORS;
100 	slen = sizeof(struct sensor);
101 	sdlen = sizeof(struct sensordev);
102 
103 	row = 1;
104 	sensor_cnt = 0;
105 
106 	wmove(wnd, row, 0);
107 	wclrtobot(wnd);
108 
109 	for (dev = 0; dev < maxsensordevices; dev++) {
110 		mib[2] = dev;
111 		if (sysctl(mib, 3, &sensordev, &sdlen, NULL, 0) == -1) {
112 			if (errno != ENOENT)
113 				warn("sysctl");
114 			continue;
115 		}
116 
117 		if (sensordev_xname_cnt > 0) {
118 			int i, match = 0, xname_len;
119 
120 			xname_len = strlen(sensordev.xname);
121 			for (i = 0; i < sensordev_xname_cnt; ++i) {
122 				const struct sensordev_xname *x;
123 
124 				x = &sensordev_xname[i];
125 				if (x->flags & XNAME_FLAG_WILDCARD) {
126 					if (xname_len <= x->xname_len)
127 						continue;
128 					if (!isdigit(
129 					    sensordev.xname[x->xname_len]))
130 						continue;
131 					if (strncmp(x->xname, sensordev.xname,
132 					    x->xname_len) == 0) {
133 						match = 1;
134 						break;
135 					}
136 				} else if (xname_len == x->xname_len &&
137 				    strcmp(x->xname, sensordev.xname) == 0) {
138 					match = 1;
139 					break;
140 				}
141 			}
142 			if (!match)
143 				continue;
144 		}
145 
146 		for (type = 0; type < SENSOR_MAX_TYPES; type++) {
147 			if (!sensors_enabled[type])
148 				continue;
149 
150 			mib[3] = type;
151 			for (numt = 0; numt < sensordev.maxnumt[type]; numt++) {
152 				mib[4] = numt;
153 				if (sysctl(mib, 5, &sensor, &slen, NULL, 0)
154 				    == -1) {
155 					if (errno != ENOENT)
156 						warn("sysctl");
157 					continue;
158 				}
159 				if (sensor.flags & SENSOR_FINVALID)
160 					continue;
161 				sensor_cnt++;
162 				printline();
163 			}
164 		}
165 	}
166 }
167 
168 const char *drvstat[] = {
169 	NULL,
170 	"empty", "ready", "powerup", "online", "idle", "active",
171 	"rebuild", "powerdown", "fail", "pfail"
172 };
173 
174 void
175 showsensors(void)
176 {
177 	if (sensor_cnt == 0)
178 		mvwaddstr(wnd, row, 0, "No sensors found.");
179 }
180 
181 int
182 initsensors(void)
183 {
184 	int i;
185 
186 	for (i = 0; i < SENSOR_MAX_TYPES; ++i)
187 		sensors_enabled[i] = 1;
188 	return (1);
189 }
190 
191 void
192 printline(void)
193 {
194 	char buf[9];
195 
196 	mvwprintw(wnd, row, 0, "%s.%s%d", sensordev.xname,
197 	    sensor_type_s[sensor.type], sensor.numt);
198 	switch (sensor.type) {
199 	case SENSOR_TEMP:
200 		mvwprintw(wnd, row, 24, "%10.2f degC",
201 		    (sensor.value - 273150000) / 1000000.0);
202 		break;
203 	case SENSOR_FANRPM:
204 		mvwprintw(wnd, row, 24, "%11lld RPM", sensor.value);
205 		break;
206 	case SENSOR_VOLTS_DC:
207 		mvwprintw(wnd, row, 24, "%10.2f V DC",
208 		    sensor.value / 1000000.0);
209 		break;
210 	case SENSOR_WATTS:
211 		mvwprintw(wnd, row, 24, "%13.2f W", sensor.value / 1000000.0);
212 		break;
213 	case SENSOR_AMPS:
214 		mvwprintw(wnd, row, 24, "%10.2f A", sensor.value / 1000000.0);
215 		break;
216 	case SENSOR_INDICATOR:
217 		mvwprintw(wnd, row, 24, "%15s", sensor.value? "On" : "Off");
218 		break;
219 	case SENSOR_INTEGER:
220 		mvwprintw(wnd, row, 24, "%11lld raw", sensor.value);
221 		break;
222 	case SENSOR_PERCENT:
223 		mvwprintw(wnd, row, 24, "%14.2f%%", sensor.value / 1000.0);
224 		break;
225 	case SENSOR_LUX:
226 		mvwprintw(wnd, row, 24, "%15.2f lx", sensor.value / 1000000.0);
227 		break;
228 	case SENSOR_DRIVE:
229 		if (0 < sensor.value &&
230 		    (size_t)sensor.value < NELEM(drvstat)) {
231 			mvwprintw(wnd, row, 24, "%15s", drvstat[sensor.value]);
232 			break;
233 		}
234 		break;
235 	case SENSOR_TIMEDELTA:
236 		mvwprintw(wnd, row, 24, "%15s", fmttime(sensor.value / 1000000000.0));
237 		break;
238 	case SENSOR_WATTHOUR:
239 		mvwprintw(wnd, row, 24, "%12.2f Wh", sensor.value / 1000000.0);
240 		break;
241 	case SENSOR_AMPHOUR:
242 		mvwprintw(wnd, row, 24, "%10.2f Ah", sensor.value / 1000000.0);
243 		break;
244 	case SENSOR_FREQ:
245 		humanize_number(buf, sizeof(buf), sensor.value, "Hz",
246 		    HN_AUTOSCALE, HN_DIVISOR_1000 | HN_DECIMAL);
247 		mvwprintw(wnd, row, 24, "%15s", buf);
248 		break;
249 	default:
250 		mvwprintw(wnd, row, 24, "%10lld", sensor.value);
251 		break;
252 	}
253 	if (sensor.desc[0] != '\0')
254 		mvwprintw(wnd, row, 58, "(%s)", sensor.desc);
255 
256 	switch (sensor.status) {
257 	case SENSOR_S_UNSPEC:
258 		break;
259 	case SENSOR_S_UNKNOWN:
260 		mvwaddstr(wnd, row, 45, "unknown");
261 		break;
262 	case SENSOR_S_WARN:
263 		mvwaddstr(wnd, row, 45, "WARNING");
264 		break;
265 	case SENSOR_S_CRIT:
266 		mvwaddstr(wnd, row, 45, "CRITICAL");
267 		break;
268 	case SENSOR_S_OK:
269 		mvwaddstr(wnd, row, 45, "OK");
270 		break;
271 	}
272 	row++;
273 }
274 
275 #define SECS_PER_DAY 86400
276 #define SECS_PER_HOUR 3600
277 #define SECS_PER_MIN 60
278 
279 static char *
280 fmttime(double in)
281 {
282 	int signbit = 1;
283 	int tiny = 0;
284 	const char *unit;
285 #define LEN 32
286 	static char outbuf[LEN];
287 
288 	if (in < 0){
289 		signbit = -1;
290 		in *= -1;
291 	}
292 
293 	if (in >= SECS_PER_DAY ){
294 		unit = "days";
295 		in /= SECS_PER_DAY;
296 	} else if (in >= SECS_PER_HOUR ){
297 		unit = "hr";
298 		in /= SECS_PER_HOUR;
299 	} else if (in >= SECS_PER_MIN ){
300 		unit = "min";
301 		in /= SECS_PER_MIN;
302 	} else if (in >= 1 ){
303 		unit = "s";
304 		/* in *= 1; */ /* no op */
305 	} else if (in == 0 ){ /* direct comparisons to floats are scary */
306 		unit = "s";
307 	} else if (in >= 1e-3 ){
308 		unit = "ms";
309 		in *= 1e3;
310 	} else if (in >= 1e-6 ){
311 		unit = "us";
312 		in *= 1e6;
313 	} else if (in >= 1e-9 ){
314 		unit = "ns";
315 		in *= 1e9;
316 	} else {
317 		unit = "ps";
318 		if (in < 1e-13)
319 			tiny = 1;
320 		in *= 1e12;
321 	}
322 
323 	snprintf(outbuf, LEN,
324 	    tiny ? "%s%lf %s" : "%s%.3lf %s",
325 	    signbit == -1 ? "-" : "", in, unit);
326 
327 	return outbuf;
328 }
329 
330 int
331 cmdsensors(const char *cmd, char *args)
332 {
333 	if (prefix(cmd, "type")) {
334 		const char *t;
335 		int i, has_type = 0;
336 
337 		for (i = 0; i < SENSOR_MAX_TYPES; ++i)
338 			sensors_enabled[i] = 0;
339 
340 		while ((t = strsep(&args, " ")) != NULL) {
341 			if (*t == '\0')
342 				continue;
343 
344 			has_type = 1;
345 			for (i = 0; i < SENSOR_MAX_TYPES; ++i) {
346 				if (strcmp(t, sensor_type_s[i]) == 0) {
347 					sensors_enabled[i] = 1;
348 					break;
349 				}
350 			}
351 		}
352 
353 		if (!has_type) {
354 			for (i = 0; i < SENSOR_MAX_TYPES; ++i)
355 				sensors_enabled[i] = 1;
356 		}
357 	} else if (prefix(cmd, "match")) {
358 		const char *xname;
359 
360 		sensordev_xname_cnt = 0;
361 		while ((xname = strsep(&args, " ")) != NULL) {
362 			struct sensordev_xname *x;
363 			int xname_len, cp_len;
364 
365 			xname_len = strlen(xname);
366 			if (xname_len == 0)
367 				continue;
368 
369 			x = &sensordev_xname[sensordev_xname_cnt];
370 			x->flags = 0;
371 
372 			if (xname[xname_len - 1] == '*') {
373 				--xname_len;
374 				if (xname_len == 0)
375 					continue;
376 				x->flags |= XNAME_FLAG_WILDCARD;
377 			}
378 			cp_len = xname_len;
379 			if (cp_len >= (int)sizeof(x->xname))
380 				cp_len = sizeof(x->xname) - 1;
381 
382 			memcpy(x->xname, xname, cp_len);
383 			x->xname[cp_len] = '\0';
384 			x->xname_len = strlen(x->xname);
385 
386 			sensordev_xname_cnt++;
387 			if (sensordev_xname_cnt == XNAME_MAX)
388 				break;
389 		}
390 	}
391 
392 	wclear(wnd);
393 	labelsensors();
394 	refresh();
395 	return (1);
396 }
397