sysmon.c revision 1.2.2.3 1 1.2.2.3 bouyer /* $NetBSD: sysmon.c,v 1.2.2.3 2000/07/30 18:03:03 bouyer Exp $ */
2 1.2.2.2 bouyer
3 1.2.2.2 bouyer /*-
4 1.2.2.2 bouyer * Copyright (c) 2000 Zembu Labs, Inc.
5 1.2.2.2 bouyer * All rights reserved.
6 1.2.2.2 bouyer *
7 1.2.2.2 bouyer * Author: Jason R. Thorpe <thorpej (at) zembu.com>
8 1.2.2.2 bouyer *
9 1.2.2.2 bouyer * Redistribution and use in source and binary forms, with or without
10 1.2.2.2 bouyer * modification, are permitted provided that the following conditions
11 1.2.2.2 bouyer * are met:
12 1.2.2.2 bouyer * 1. Redistributions of source code must retain the above copyright
13 1.2.2.2 bouyer * notice, this list of conditions and the following disclaimer.
14 1.2.2.2 bouyer * 2. Redistributions in binary form must reproduce the above copyright
15 1.2.2.2 bouyer * notice, this list of conditions and the following disclaimer in the
16 1.2.2.2 bouyer * documentation and/or other materials provided with the distribution.
17 1.2.2.2 bouyer * 3. All advertising materials mentioning features or use of this software
18 1.2.2.2 bouyer * must display the following acknowledgement:
19 1.2.2.2 bouyer * This product includes software developed by Zembu Labs, Inc.
20 1.2.2.2 bouyer * 4. Neither the name of Zembu Labs nor the names of its employees may
21 1.2.2.2 bouyer * be used to endorse or promote products derived from this software
22 1.2.2.2 bouyer * without specific prior written permission.
23 1.2.2.2 bouyer *
24 1.2.2.2 bouyer * THIS SOFTWARE IS PROVIDED BY ZEMBU LABS, INC. ``AS IS'' AND ANY EXPRESS
25 1.2.2.2 bouyer * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WAR-
26 1.2.2.2 bouyer * RANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DIS-
27 1.2.2.2 bouyer * CLAIMED. IN NO EVENT SHALL ZEMBU LABS BE LIABLE FOR ANY DIRECT, INDIRECT,
28 1.2.2.2 bouyer * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29 1.2.2.2 bouyer * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 1.2.2.2 bouyer * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 1.2.2.2 bouyer * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 1.2.2.2 bouyer * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33 1.2.2.2 bouyer * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 1.2.2.2 bouyer */
35 1.2.2.2 bouyer
36 1.2.2.2 bouyer /*
37 1.2.2.2 bouyer * Clearing house for system monitoring hardware. This pseudo-device
38 1.2.2.2 bouyer * is a place where hardware monitors such as the LM78 and VIA 82C686A
39 1.2.2.2 bouyer * (or even ACPI, eventually) can register themselves to provide
40 1.2.2.2 bouyer * backplane fan and temperature information, etc.
41 1.2.2.2 bouyer *
42 1.2.2.2 bouyer * Eventually, we will also provide a way for a hardware watchdog timer
43 1.2.2.2 bouyer * to hook itself up here (with an option to fall back on a software
44 1.2.2.2 bouyer * watchdog timer if hardware is not available).
45 1.2.2.2 bouyer */
46 1.2.2.2 bouyer
47 1.2.2.2 bouyer #include <sys/param.h>
48 1.2.2.2 bouyer #include <sys/conf.h>
49 1.2.2.2 bouyer #include <sys/errno.h>
50 1.2.2.2 bouyer #include <sys/fcntl.h>
51 1.2.2.2 bouyer #include <sys/lock.h>
52 1.2.2.2 bouyer
53 1.2.2.2 bouyer #include <dev/sysmon/sysmonvar.h>
54 1.2.2.2 bouyer
55 1.2.2.2 bouyer /*
56 1.2.2.2 bouyer * We run at ENVSYS version 1.
57 1.2.2.2 bouyer */
58 1.2.2.2 bouyer #define SYSMON_ENVSYS_VERSION (1 * 1000)
59 1.2.2.2 bouyer
60 1.2.2.2 bouyer struct lock sysmon_lock;
61 1.2.2.2 bouyer
62 1.2.2.2 bouyer LIST_HEAD(, sysmon_envsys) sysmon_envsys_list;
63 1.2.2.2 bouyer struct simplelock sysmon_envsys_list_slock = SIMPLELOCK_INITIALIZER;
64 1.2.2.2 bouyer u_int sysmon_envsys_next_sensor_index;
65 1.2.2.2 bouyer
66 1.2.2.2 bouyer int sysmon_initialized;
67 1.2.2.2 bouyer struct simplelock sysmon_initialized_slock = SIMPLELOCK_INITIALIZER;
68 1.2.2.2 bouyer
69 1.2.2.2 bouyer cdev_decl(sysmon);
70 1.2.2.2 bouyer
71 1.2.2.2 bouyer void sysmon_init(void);
72 1.2.2.2 bouyer
73 1.2.2.2 bouyer struct sysmon_envsys *sysmon_envsys_find(u_int);
74 1.2.2.2 bouyer void sysmon_envsys_release(struct sysmon_envsys *);
75 1.2.2.2 bouyer
76 1.2.2.2 bouyer /*
77 1.2.2.2 bouyer * sysmon_init:
78 1.2.2.2 bouyer *
79 1.2.2.2 bouyer * Initialize the system monitor.
80 1.2.2.2 bouyer */
81 1.2.2.2 bouyer void
82 1.2.2.2 bouyer sysmon_init(void)
83 1.2.2.2 bouyer {
84 1.2.2.2 bouyer
85 1.2.2.3 bouyer lockinit(&sysmon_lock, PWAIT|PCATCH, "sysmon", 0, 0);
86 1.2.2.2 bouyer sysmon_initialized = 1;
87 1.2.2.2 bouyer }
88 1.2.2.2 bouyer
89 1.2.2.2 bouyer /*
90 1.2.2.2 bouyer * sysmonopen:
91 1.2.2.2 bouyer *
92 1.2.2.2 bouyer * Open the system monitor device.
93 1.2.2.2 bouyer */
94 1.2.2.2 bouyer int
95 1.2.2.2 bouyer sysmonopen(dev_t dev, int flag, int mode, struct proc *p)
96 1.2.2.2 bouyer {
97 1.2.2.2 bouyer int error;
98 1.2.2.2 bouyer
99 1.2.2.2 bouyer simple_lock(&sysmon_initialized_slock);
100 1.2.2.2 bouyer if (sysmon_initialized == 0)
101 1.2.2.2 bouyer sysmon_init();
102 1.2.2.2 bouyer
103 1.2.2.2 bouyer error = lockmgr(&sysmon_lock,
104 1.2.2.2 bouyer LK_EXCLUSIVE | LK_INTERLOCK |
105 1.2.2.2 bouyer ((flag & O_NONBLOCK) ? LK_NOWAIT : 0), &sysmon_initialized_slock);
106 1.2.2.2 bouyer
107 1.2.2.2 bouyer return (error);
108 1.2.2.2 bouyer }
109 1.2.2.2 bouyer
110 1.2.2.2 bouyer /*
111 1.2.2.2 bouyer * sysmonclose:
112 1.2.2.2 bouyer *
113 1.2.2.2 bouyer * Close the system monitor device.
114 1.2.2.2 bouyer */
115 1.2.2.2 bouyer int
116 1.2.2.2 bouyer sysmonclose(dev_t dev, int flag, int mode, struct proc *p)
117 1.2.2.2 bouyer {
118 1.2.2.2 bouyer
119 1.2.2.2 bouyer (void) lockmgr(&sysmon_lock, LK_RELEASE, NULL);
120 1.2.2.2 bouyer return (0);
121 1.2.2.2 bouyer }
122 1.2.2.2 bouyer
123 1.2.2.2 bouyer /*
124 1.2.2.2 bouyer * sysmonioctl:
125 1.2.2.2 bouyer *
126 1.2.2.2 bouyer * Perform a control request.
127 1.2.2.2 bouyer */
128 1.2.2.2 bouyer int
129 1.2.2.2 bouyer sysmonioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p)
130 1.2.2.2 bouyer {
131 1.2.2.2 bouyer struct sysmon_envsys *sme;
132 1.2.2.2 bouyer int error = 0;
133 1.2.2.2 bouyer u_int oidx;
134 1.2.2.2 bouyer
135 1.2.2.2 bouyer switch (cmd) {
136 1.2.2.2 bouyer /*
137 1.2.2.2 bouyer * For ENVSYS commands, we translate the absolute sensor index
138 1.2.2.2 bouyer * to a device-relative sensor index.
139 1.2.2.2 bouyer */
140 1.2.2.2 bouyer case ENVSYS_VERSION:
141 1.2.2.2 bouyer *(int32_t *)data = SYSMON_ENVSYS_VERSION;
142 1.2.2.2 bouyer break;
143 1.2.2.2 bouyer
144 1.2.2.2 bouyer case ENVSYS_GRANGE:
145 1.2.2.2 bouyer {
146 1.2.2.2 bouyer struct envsys_range *rng = (void *) data;
147 1.2.2.2 bouyer
148 1.2.2.2 bouyer sme = sysmon_envsys_find(0); /* XXX */
149 1.2.2.2 bouyer if (sme == NULL) {
150 1.2.2.2 bouyer /* Return empty range for `no sensors'. */
151 1.2.2.2 bouyer rng->low = 1;
152 1.2.2.2 bouyer rng->high = 0;
153 1.2.2.2 bouyer break;
154 1.2.2.2 bouyer }
155 1.2.2.2 bouyer
156 1.2.2.2 bouyer if (rng->units < ENVSYS_NSENSORS)
157 1.2.2.2 bouyer *rng = sme->sme_ranges[rng->units];
158 1.2.2.2 bouyer else {
159 1.2.2.2 bouyer /* Return empty range for unsupported sensor types. */
160 1.2.2.2 bouyer rng->low = 1;
161 1.2.2.2 bouyer rng->high = 0;
162 1.2.2.2 bouyer }
163 1.2.2.2 bouyer sysmon_envsys_release(sme);
164 1.2.2.2 bouyer break;
165 1.2.2.2 bouyer }
166 1.2.2.2 bouyer
167 1.2.2.2 bouyer case ENVSYS_GTREDATA:
168 1.2.2.2 bouyer {
169 1.2.2.2 bouyer struct envsys_tre_data *tred = (void *) data;
170 1.2.2.2 bouyer
171 1.2.2.3 bouyer tred->validflags = 0;
172 1.2.2.3 bouyer
173 1.2.2.2 bouyer sme = sysmon_envsys_find(tred->sensor);
174 1.2.2.2 bouyer if (sme == NULL)
175 1.2.2.2 bouyer break;
176 1.2.2.2 bouyer oidx = tred->sensor;
177 1.2.2.2 bouyer tred->sensor = SME_SENSOR_IDX(sme, tred->sensor);
178 1.2.2.2 bouyer if (tred->sensor < sme->sme_nsensors)
179 1.2.2.2 bouyer error = (*sme->sme_gtredata)(sme, tred);
180 1.2.2.2 bouyer tred->sensor = oidx;
181 1.2.2.2 bouyer sysmon_envsys_release(sme);
182 1.2.2.2 bouyer break;
183 1.2.2.2 bouyer }
184 1.2.2.2 bouyer
185 1.2.2.2 bouyer case ENVSYS_STREINFO:
186 1.2.2.2 bouyer {
187 1.2.2.2 bouyer struct envsys_basic_info *binfo = (void *) data;
188 1.2.2.2 bouyer
189 1.2.2.2 bouyer sme = sysmon_envsys_find(binfo->sensor);
190 1.2.2.3 bouyer if (sme == NULL) {
191 1.2.2.3 bouyer binfo->validflags = 0;
192 1.2.2.3 bouyer break;
193 1.2.2.3 bouyer }
194 1.2.2.2 bouyer oidx = binfo->sensor;
195 1.2.2.2 bouyer binfo->sensor = SME_SENSOR_IDX(sme, binfo->sensor);
196 1.2.2.2 bouyer if (binfo->sensor < sme->sme_nsensors)
197 1.2.2.2 bouyer error = (*sme->sme_streinfo)(sme, binfo);
198 1.2.2.2 bouyer else
199 1.2.2.2 bouyer binfo->validflags = 0;
200 1.2.2.2 bouyer binfo->sensor = oidx;
201 1.2.2.2 bouyer sysmon_envsys_release(sme);
202 1.2.2.2 bouyer break;
203 1.2.2.2 bouyer }
204 1.2.2.2 bouyer
205 1.2.2.2 bouyer case ENVSYS_GTREINFO:
206 1.2.2.2 bouyer {
207 1.2.2.2 bouyer struct envsys_basic_info *binfo = (void *) data;
208 1.2.2.2 bouyer
209 1.2.2.3 bouyer binfo->validflags = 0;
210 1.2.2.3 bouyer
211 1.2.2.2 bouyer sme = sysmon_envsys_find(binfo->sensor);
212 1.2.2.3 bouyer if (sme == NULL)
213 1.2.2.3 bouyer break;
214 1.2.2.2 bouyer oidx = binfo->sensor;
215 1.2.2.2 bouyer binfo->sensor = SME_SENSOR_IDX(sme, binfo->sensor);
216 1.2.2.2 bouyer if (binfo->sensor < sme->sme_nsensors)
217 1.2.2.2 bouyer *binfo = sme->sme_sensor_info[binfo->sensor];
218 1.2.2.2 bouyer binfo->sensor = oidx;
219 1.2.2.2 bouyer sysmon_envsys_release(sme);
220 1.2.2.2 bouyer break;
221 1.2.2.2 bouyer }
222 1.2.2.2 bouyer
223 1.2.2.2 bouyer default:
224 1.2.2.2 bouyer error = ENOTTY;
225 1.2.2.2 bouyer }
226 1.2.2.2 bouyer
227 1.2.2.2 bouyer return (error);
228 1.2.2.2 bouyer }
229 1.2.2.2 bouyer
230 1.2.2.2 bouyer /*
231 1.2.2.2 bouyer * sysmon_envsys_register:
232 1.2.2.2 bouyer *
233 1.2.2.2 bouyer * Register an ENVSYS device.
234 1.2.2.2 bouyer */
235 1.2.2.2 bouyer int
236 1.2.2.2 bouyer sysmon_envsys_register(struct sysmon_envsys *sme)
237 1.2.2.2 bouyer {
238 1.2.2.2 bouyer int error = 0;
239 1.2.2.2 bouyer
240 1.2.2.2 bouyer simple_lock(&sysmon_envsys_list_slock);
241 1.2.2.2 bouyer
242 1.2.2.2 bouyer /* XXX Only get to register one, for now. */
243 1.2.2.2 bouyer if (LIST_FIRST(&sysmon_envsys_list) != NULL) {
244 1.2.2.2 bouyer error = EEXIST;
245 1.2.2.2 bouyer goto out;
246 1.2.2.2 bouyer }
247 1.2.2.2 bouyer
248 1.2.2.2 bouyer if (sme->sme_envsys_version != SYSMON_ENVSYS_VERSION) {
249 1.2.2.2 bouyer error = EINVAL;
250 1.2.2.2 bouyer goto out;
251 1.2.2.2 bouyer }
252 1.2.2.2 bouyer
253 1.2.2.2 bouyer sme->sme_fsensor = sysmon_envsys_next_sensor_index;
254 1.2.2.2 bouyer sysmon_envsys_next_sensor_index += sme->sme_nsensors;
255 1.2.2.2 bouyer LIST_INSERT_HEAD(&sysmon_envsys_list, sme, sme_list);
256 1.2.2.2 bouyer
257 1.2.2.2 bouyer out:
258 1.2.2.2 bouyer simple_unlock(&sysmon_envsys_list_slock);
259 1.2.2.2 bouyer return (error);
260 1.2.2.2 bouyer }
261 1.2.2.2 bouyer
262 1.2.2.2 bouyer /*
263 1.2.2.2 bouyer * sysmon_envsys_unregister:
264 1.2.2.2 bouyer *
265 1.2.2.2 bouyer * Unregister an ENVSYS device.
266 1.2.2.2 bouyer */
267 1.2.2.2 bouyer void
268 1.2.2.2 bouyer sysmon_envsys_unregister(struct sysmon_envsys *sme)
269 1.2.2.2 bouyer {
270 1.2.2.2 bouyer
271 1.2.2.2 bouyer simple_lock(&sysmon_envsys_list_slock);
272 1.2.2.2 bouyer LIST_REMOVE(sme, sme_list);
273 1.2.2.2 bouyer simple_unlock(&sysmon_envsys_list_slock);
274 1.2.2.2 bouyer }
275 1.2.2.2 bouyer
276 1.2.2.2 bouyer /*
277 1.2.2.2 bouyer * sysmon_envsys_find:
278 1.2.2.2 bouyer *
279 1.2.2.2 bouyer * Find an ENVSYS device. The list remains locked upon
280 1.2.2.2 bouyer * a match.
281 1.2.2.2 bouyer */
282 1.2.2.2 bouyer struct sysmon_envsys *
283 1.2.2.2 bouyer sysmon_envsys_find(u_int idx)
284 1.2.2.2 bouyer {
285 1.2.2.2 bouyer struct sysmon_envsys *sme;
286 1.2.2.2 bouyer
287 1.2.2.2 bouyer simple_lock(&sysmon_envsys_list_slock);
288 1.2.2.2 bouyer
289 1.2.2.2 bouyer for (sme = LIST_FIRST(&sysmon_envsys_list); sme != NULL;
290 1.2.2.2 bouyer sme = LIST_NEXT(sme, sme_list)) {
291 1.2.2.2 bouyer if (idx >= sme->sme_fsensor &&
292 1.2.2.2 bouyer idx < (sme->sme_fsensor + sme->sme_nsensors))
293 1.2.2.2 bouyer return (sme);
294 1.2.2.2 bouyer }
295 1.2.2.2 bouyer
296 1.2.2.2 bouyer simple_unlock(&sysmon_envsys_list_slock);
297 1.2.2.2 bouyer return (NULL);
298 1.2.2.2 bouyer }
299 1.2.2.2 bouyer
300 1.2.2.2 bouyer /*
301 1.2.2.2 bouyer * sysmon_envsys_release:
302 1.2.2.2 bouyer *
303 1.2.2.2 bouyer * Release an ENVSYS device.
304 1.2.2.2 bouyer */
305 1.2.2.2 bouyer /* ARGSUSED */
306 1.2.2.2 bouyer void
307 1.2.2.2 bouyer sysmon_envsys_release(struct sysmon_envsys *sme)
308 1.2.2.2 bouyer {
309 1.2.2.2 bouyer
310 1.2.2.2 bouyer simple_unlock(&sysmon_envsys_list_slock);
311 1.2.2.2 bouyer }
312