openfirmio.c revision 1.5 1 /* $NetBSD: openfirmio.c,v 1.5 2002/10/23 09:13:30 jdolecek Exp $ */
2
3 /*
4 * Copyright (c) 1992, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * This software was developed by the Computer Systems Engineering group
8 * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
9 * contributed to Berkeley.
10 *
11 * All advertising materials mentioning features or use of this software
12 * must display the following acknowledgement:
13 * This product includes software developed by the University of
14 * California, Lawrence Berkeley Laboratory.
15 *
16 * Redistribution and use in source and binary forms, with or without
17 * modification, are permitted provided that the following conditions
18 * are met:
19 * 1. Redistributions of source code must retain the above copyright
20 * notice, this list of conditions and the following disclaimer.
21 * 2. Redistributions in binary form must reproduce the above copyright
22 * notice, this list of conditions and the following disclaimer in the
23 * documentation and/or other materials provided with the distribution.
24 * 3. All advertising materials mentioning features or use of this software
25 * must display the following acknowledgement:
26 * This product includes software developed by the University of
27 * California, Berkeley and its contributors.
28 * 4. Neither the name of the University nor the names of its contributors
29 * may be used to endorse or promote products derived from this software
30 * without specific prior written permission.
31 *
32 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
33 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
34 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
35 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
36 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
37 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
38 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
39 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
40 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
41 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
42 * SUCH DAMAGE.
43 *
44 * @(#)openfirm.c 8.1 (Berkeley) 6/11/93
45 */
46
47 #include <sys/cdefs.h>
48 __KERNEL_RCSID(0, "$NetBSD: openfirmio.c,v 1.5 2002/10/23 09:13:30 jdolecek Exp $");
49
50 #include <sys/param.h>
51 #include <sys/systm.h>
52 #include <sys/errno.h>
53 #include <sys/fcntl.h>
54 #include <sys/ioctl.h>
55 #include <sys/malloc.h>
56 #include <sys/conf.h>
57 #include <sys/device.h>
58 #include <sys/event.h>
59
60 #include <dev/ofw/openfirm.h>
61 #include <dev/ofw/openfirmio.h>
62
63 static int lastnode; /* speed hack */
64
65 static int openfirmcheckid (int, int);
66 static int openfirmgetstr (int, char *, char **);
67
68 void openfirmattach (int);
69
70 dev_type_ioctl(openfirmioctl);
71
72 const struct cdevsw openfirm_cdevsw = {
73 nullopen, nullclose, noread, nowrite, openfirmioctl,
74 nostop, notty, nopoll, nommap, nokqfilter,
75 };
76
77 void
78 openfirmattach(int num)
79 {
80 /* nothing */
81 }
82
83 /*
84 * Verify target ID is valid (exists in the OPENPROM tree), as
85 * listed from node ID sid forward.
86 */
87 static int
88 openfirmcheckid(int sid, int tid)
89 {
90
91 for (; sid != 0; sid = OF_peer(sid))
92 if (sid == tid || openfirmcheckid(OF_child(sid), tid))
93 return (1);
94
95 return (0);
96 }
97
98 static int
99 openfirmgetstr(int len, char *user, char **cpp)
100 {
101 int error;
102 char *cp;
103
104 /* Reject obvious bogus requests */
105 if ((u_int)len > (8 * 1024) - 1)
106 return (ENAMETOOLONG);
107
108 *cpp = cp = malloc(len + 1, M_TEMP, M_WAITOK);
109 error = copyin(user, cp, len);
110 cp[len] = '\0';
111 return (error);
112 }
113
114 int
115 openfirmioctl(dev_t dev, u_long cmd, caddr_t data, int flags, struct proc *p)
116 {
117 struct ofiocdesc *of;
118 int node, len, ok, error, s;
119 char *name, *value;
120
121 if (cmd == OFIOCGETOPTNODE) {
122 s = splhigh();
123 *(int *) data = OF_finddevice("/options");
124 splx(s);
125 return (0);
126 }
127
128 /* Verify node id */
129 of = (struct ofiocdesc *)data;
130 node = of->of_nodeid;
131 if (node != 0 && node != lastnode) {
132 /* Not an easy one, must search for it */
133 s = splhigh();
134 ok = openfirmcheckid(OF_peer(0), node);
135 splx(s);
136 if (!ok)
137 return (EINVAL);
138 lastnode = node;
139 }
140
141 name = value = NULL;
142 error = 0;
143 switch (cmd) {
144
145 case OFIOCGET:
146 if ((flags & FREAD) == 0)
147 return (EBADF);
148 if (node == 0)
149 return (EINVAL);
150 error = openfirmgetstr(of->of_namelen, of->of_name, &name);
151 if (error)
152 break;
153 s = splhigh();
154 len = OF_getproplen(node, name);
155 splx(s);
156 if (len > of->of_buflen) {
157 error = ENOMEM;
158 break;
159 }
160 of->of_buflen = len;
161 /* -1 means no entry; 0 means no value */
162 if (len <= 0)
163 break;
164 value = malloc(len, M_TEMP, M_WAITOK);
165 if (value == NULL) {
166 error = ENOMEM;
167 break;
168 }
169 s = splhigh();
170 len = OF_getprop(node, name, (void *)value, len);
171 splx(s);
172 error = copyout(value, of->of_buf, len);
173 break;
174
175 #if 0
176 case OFIOCSET:
177 if ((flags & FWRITE) == 0)
178 return (EBADF);
179 if (node == 0)
180 return (EINVAL);
181 error = openfirmgetstr(of->of_namelen, of->of_name, &name);
182 if (error)
183 break;
184 error = openfirmgetstr(of->of_buflen, of->of_buf, &value);
185 if (error)
186 break;
187 s = splhigh();
188 len = OF_setprop(node, name, value, of->of_buflen + 1);
189 splx(s);
190 if (len != of->of_buflen)
191 error = EINVAL;
192 break;
193 #endif
194
195 case OFIOCNEXTPROP: {
196 char newname[32];
197 if ((flags & FREAD) == 0)
198 return (EBADF);
199 if (node == 0)
200 return (EINVAL);
201 if (of->of_namelen != 0) {
202 error = openfirmgetstr(of->of_namelen, of->of_name,
203 &name);
204 if (error)
205 break;
206 }
207 s = splhigh();
208 ok = OF_nextprop(node, name, newname);
209 splx(s);
210 if (ok == 0) {
211 error = ENOENT;
212 break;
213 }
214 if (ok == -1) {
215 error = EINVAL;
216 break;
217 }
218 len = strlen(newname);
219 if (len > of->of_buflen)
220 len = of->of_buflen;
221 else
222 of->of_buflen = len;
223 error = copyout(newname, of->of_buf, len);
224 break;
225 }
226
227 case OFIOCGETNEXT:
228 if ((flags & FREAD) == 0)
229 return (EBADF);
230 s = splhigh();
231 node = OF_peer(node);
232 splx(s);
233 *(int *)data = lastnode = node;
234 break;
235
236 case OFIOCGETCHILD:
237 if ((flags & FREAD) == 0)
238 return (EBADF);
239 if (node == 0)
240 return (EINVAL);
241 s = splhigh();
242 node = OF_child(node);
243 splx(s);
244 *(int *)data = lastnode = node;
245 break;
246
247 case OFIOCFINDDEVICE:
248 if ((flags & FREAD) == 0)
249 return (EBADF);
250 error = openfirmgetstr(of->of_namelen, of->of_name, &name);
251 if (error)
252 break;
253 node = OF_finddevice(name);
254 if (node == 0 || node == -1) {
255 error = ENOENT;
256 break;
257 }
258 of->of_nodeid = lastnode = node;
259 break;
260
261 default:
262 return (ENOTTY);
263 }
264
265 if (name)
266 free(name, M_TEMP);
267 if (value)
268 free(value, M_TEMP);
269
270 return (error);
271 }
272