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