kern_sysctl.c revision 1.190.2.4 1 1.190.2.4 yamt /* $NetBSD: kern_sysctl.c,v 1.190.2.4 2006/05/24 10:58:41 yamt Exp $ */
2 1.190.2.2 yamt
3 1.190.2.2 yamt /*-
4 1.190.2.2 yamt * Copyright (c) 2003 The NetBSD Foundation, Inc.
5 1.190.2.2 yamt * All rights reserved.
6 1.190.2.2 yamt *
7 1.190.2.2 yamt * This code is derived from software contributed to The NetBSD Foundation
8 1.190.2.2 yamt * by Andrew Brown.
9 1.190.2.2 yamt *
10 1.190.2.2 yamt * Redistribution and use in source and binary forms, with or without
11 1.190.2.2 yamt * modification, are permitted provided that the following conditions
12 1.190.2.2 yamt * are met:
13 1.190.2.2 yamt * 1. Redistributions of source code must retain the above copyright
14 1.190.2.2 yamt * notice, this list of conditions and the following disclaimer.
15 1.190.2.2 yamt * 2. Redistributions in binary form must reproduce the above copyright
16 1.190.2.2 yamt * notice, this list of conditions and the following disclaimer in the
17 1.190.2.2 yamt * documentation and/or other materials provided with the distribution.
18 1.190.2.2 yamt * 3. All advertising materials mentioning features or use of this software
19 1.190.2.2 yamt * must display the following acknowledgement:
20 1.190.2.2 yamt * This product includes software developed by the NetBSD
21 1.190.2.2 yamt * Foundation, Inc. and its contributors.
22 1.190.2.2 yamt * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.190.2.2 yamt * contributors may be used to endorse or promote products derived
24 1.190.2.2 yamt * from this software without specific prior written permission.
25 1.190.2.2 yamt *
26 1.190.2.2 yamt * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.190.2.2 yamt * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.190.2.2 yamt * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.190.2.2 yamt * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.190.2.2 yamt * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.190.2.2 yamt * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.190.2.2 yamt * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.190.2.2 yamt * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.190.2.2 yamt * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.190.2.2 yamt * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.190.2.2 yamt * POSSIBILITY OF SUCH DAMAGE.
37 1.190.2.2 yamt */
38 1.190.2.2 yamt
39 1.190.2.2 yamt /*-
40 1.190.2.2 yamt * Copyright (c) 1982, 1986, 1989, 1993
41 1.190.2.2 yamt * The Regents of the University of California. All rights reserved.
42 1.190.2.2 yamt *
43 1.190.2.2 yamt * This code is derived from software contributed to Berkeley by
44 1.190.2.2 yamt * Mike Karels at Berkeley Software Design, Inc.
45 1.190.2.2 yamt *
46 1.190.2.2 yamt * Redistribution and use in source and binary forms, with or without
47 1.190.2.2 yamt * modification, are permitted provided that the following conditions
48 1.190.2.2 yamt * are met:
49 1.190.2.2 yamt * 1. Redistributions of source code must retain the above copyright
50 1.190.2.2 yamt * notice, this list of conditions and the following disclaimer.
51 1.190.2.2 yamt * 2. Redistributions in binary form must reproduce the above copyright
52 1.190.2.2 yamt * notice, this list of conditions and the following disclaimer in the
53 1.190.2.2 yamt * documentation and/or other materials provided with the distribution.
54 1.190.2.2 yamt * 3. Neither the name of the University nor the names of its contributors
55 1.190.2.2 yamt * may be used to endorse or promote products derived from this software
56 1.190.2.2 yamt * without specific prior written permission.
57 1.190.2.2 yamt *
58 1.190.2.2 yamt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
59 1.190.2.2 yamt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
60 1.190.2.2 yamt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
61 1.190.2.2 yamt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
62 1.190.2.2 yamt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
63 1.190.2.2 yamt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
64 1.190.2.2 yamt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
65 1.190.2.2 yamt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
66 1.190.2.2 yamt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
67 1.190.2.2 yamt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
68 1.190.2.2 yamt * SUCH DAMAGE.
69 1.190.2.2 yamt *
70 1.190.2.2 yamt * @(#)kern_sysctl.c 8.9 (Berkeley) 5/20/95
71 1.190.2.2 yamt */
72 1.190.2.2 yamt
73 1.190.2.2 yamt /*
74 1.190.2.2 yamt * sysctl system call.
75 1.190.2.2 yamt */
76 1.190.2.2 yamt
77 1.190.2.2 yamt #include <sys/cdefs.h>
78 1.190.2.4 yamt __KERNEL_RCSID(0, "$NetBSD: kern_sysctl.c,v 1.190.2.4 2006/05/24 10:58:41 yamt Exp $");
79 1.190.2.2 yamt
80 1.190.2.2 yamt #include "opt_defcorename.h"
81 1.190.2.2 yamt #include "ksyms.h"
82 1.190.2.2 yamt
83 1.190.2.2 yamt #include <sys/param.h>
84 1.190.2.2 yamt #define __COMPAT_SYSCTL
85 1.190.2.2 yamt #include <sys/sysctl.h>
86 1.190.2.2 yamt #include <sys/systm.h>
87 1.190.2.2 yamt #include <sys/buf.h>
88 1.190.2.2 yamt #include <sys/ksyms.h>
89 1.190.2.2 yamt #include <sys/malloc.h>
90 1.190.2.2 yamt #include <sys/mount.h>
91 1.190.2.2 yamt #include <sys/sa.h>
92 1.190.2.2 yamt #include <sys/syscallargs.h>
93 1.190.2.4 yamt #include <sys/kauth.h>
94 1.190.2.2 yamt #include <machine/stdarg.h>
95 1.190.2.2 yamt
96 1.190.2.2 yamt MALLOC_DEFINE(M_SYSCTLNODE, "sysctlnode", "sysctl node structures");
97 1.190.2.2 yamt MALLOC_DEFINE(M_SYSCTLDATA, "sysctldata", "misc sysctl data");
98 1.190.2.2 yamt
99 1.190.2.2 yamt static int sysctl_mmap(SYSCTLFN_PROTO);
100 1.190.2.2 yamt static int sysctl_alloc(struct sysctlnode *, int);
101 1.190.2.2 yamt static int sysctl_realloc(struct sysctlnode *);
102 1.190.2.2 yamt
103 1.190.2.2 yamt static int sysctl_cvt_in(struct lwp *, int *, const void *, size_t,
104 1.190.2.2 yamt struct sysctlnode *);
105 1.190.2.2 yamt static int sysctl_cvt_out(struct lwp *, int, const struct sysctlnode *,
106 1.190.2.2 yamt void *, size_t, size_t *);
107 1.190.2.2 yamt
108 1.190.2.2 yamt static int sysctl_log_add(struct sysctllog **, const struct sysctlnode *);
109 1.190.2.2 yamt static int sysctl_log_realloc(struct sysctllog *);
110 1.190.2.2 yamt
111 1.190.2.2 yamt struct sysctllog {
112 1.190.2.2 yamt const struct sysctlnode *log_root;
113 1.190.2.2 yamt int *log_num;
114 1.190.2.2 yamt int log_size, log_left;
115 1.190.2.2 yamt };
116 1.190.2.2 yamt
117 1.190.2.2 yamt /*
118 1.190.2.2 yamt * the "root" of the new sysctl tree
119 1.190.2.2 yamt */
120 1.190.2.2 yamt struct sysctlnode sysctl_root = {
121 1.190.2.2 yamt .sysctl_flags = SYSCTL_VERSION|
122 1.190.2.2 yamt CTLFLAG_ROOT|CTLFLAG_READWRITE|
123 1.190.2.2 yamt CTLTYPE_NODE,
124 1.190.2.2 yamt .sysctl_num = 0,
125 1.190.2.2 yamt /*
126 1.190.2.2 yamt * XXX once all ports are on gcc3, we can get rid of this
127 1.190.2.2 yamt * ugliness and simply make it into
128 1.190.2.2 yamt *
129 1.190.2.2 yamt * .sysctl_size = sizeof(struct sysctlnode),
130 1.190.2.2 yamt */
131 1.190.2.2 yamt sysc_init_field(_sysctl_size, sizeof(struct sysctlnode)),
132 1.190.2.2 yamt .sysctl_name = "(root)",
133 1.190.2.2 yamt };
134 1.190.2.2 yamt
135 1.190.2.2 yamt /*
136 1.190.2.2 yamt * link set of functions that add nodes at boot time (see also
137 1.190.2.2 yamt * sysctl_buildtree())
138 1.190.2.2 yamt */
139 1.190.2.2 yamt __link_set_decl(sysctl_funcs, sysctl_setup_func);
140 1.190.2.2 yamt
141 1.190.2.2 yamt /*
142 1.190.2.2 yamt * The `sysctl_lock' is intended to serialize access to the sysctl
143 1.190.2.2 yamt * tree. Given that it is now (a) dynamic, and (b) most consumers of
144 1.190.2.2 yamt * sysctl are going to be copying data out, the old `sysctl_memlock'
145 1.190.2.2 yamt * has been `upgraded' to simply guard the whole tree.
146 1.190.2.2 yamt *
147 1.190.2.2 yamt * The two new data here are to keep track of the locked chunk of
148 1.190.2.2 yamt * memory, if there is one, so that it can be released more easily
149 1.190.2.2 yamt * from anywhere.
150 1.190.2.2 yamt */
151 1.190.2.2 yamt struct lock sysctl_treelock;
152 1.190.2.2 yamt caddr_t sysctl_memaddr;
153 1.190.2.2 yamt size_t sysctl_memsize;
154 1.190.2.2 yamt
155 1.190.2.2 yamt /*
156 1.190.2.2 yamt * Attributes stored in the kernel.
157 1.190.2.2 yamt */
158 1.190.2.2 yamt char hostname[MAXHOSTNAMELEN];
159 1.190.2.2 yamt int hostnamelen;
160 1.190.2.2 yamt
161 1.190.2.2 yamt char domainname[MAXHOSTNAMELEN];
162 1.190.2.2 yamt int domainnamelen;
163 1.190.2.2 yamt
164 1.190.2.2 yamt long hostid;
165 1.190.2.2 yamt
166 1.190.2.2 yamt #ifndef DEFCORENAME
167 1.190.2.2 yamt #define DEFCORENAME "%n.core"
168 1.190.2.2 yamt #endif
169 1.190.2.2 yamt char defcorename[MAXPATHLEN] = DEFCORENAME;
170 1.190.2.2 yamt
171 1.190.2.2 yamt /*
172 1.190.2.2 yamt * ********************************************************************
173 1.190.2.2 yamt * Section 0: Some simple glue
174 1.190.2.2 yamt * ********************************************************************
175 1.190.2.2 yamt * By wrapping copyin(), copyout(), and copyinstr() like this, we can
176 1.190.2.2 yamt * stop caring about who's calling us and simplify some code a bunch.
177 1.190.2.2 yamt * ********************************************************************
178 1.190.2.2 yamt */
179 1.190.2.2 yamt static inline int
180 1.190.2.2 yamt sysctl_copyin(const struct lwp *l, const void *uaddr, void *kaddr, size_t len)
181 1.190.2.2 yamt {
182 1.190.2.2 yamt
183 1.190.2.2 yamt if (l != NULL)
184 1.190.2.2 yamt return (copyin(uaddr, kaddr, len));
185 1.190.2.2 yamt else
186 1.190.2.2 yamt return (kcopy(uaddr, kaddr, len));
187 1.190.2.2 yamt }
188 1.190.2.2 yamt
189 1.190.2.2 yamt static inline int
190 1.190.2.2 yamt sysctl_copyout(const struct lwp *l, const void *kaddr, void *uaddr, size_t len)
191 1.190.2.2 yamt {
192 1.190.2.2 yamt
193 1.190.2.2 yamt if (l != NULL)
194 1.190.2.2 yamt return (copyout(kaddr, uaddr, len));
195 1.190.2.2 yamt else
196 1.190.2.2 yamt return (kcopy(kaddr, uaddr, len));
197 1.190.2.2 yamt }
198 1.190.2.2 yamt
199 1.190.2.2 yamt static inline int
200 1.190.2.2 yamt sysctl_copyinstr(const struct lwp *l, const void *uaddr, void *kaddr,
201 1.190.2.2 yamt size_t len, size_t *done)
202 1.190.2.2 yamt {
203 1.190.2.2 yamt
204 1.190.2.2 yamt if (l != NULL)
205 1.190.2.2 yamt return (copyinstr(uaddr, kaddr, len, done));
206 1.190.2.2 yamt else
207 1.190.2.2 yamt return (copystr(uaddr, kaddr, len, done));
208 1.190.2.2 yamt }
209 1.190.2.2 yamt
210 1.190.2.2 yamt /*
211 1.190.2.2 yamt * ********************************************************************
212 1.190.2.2 yamt * Initialize sysctl subsystem.
213 1.190.2.2 yamt * ********************************************************************
214 1.190.2.2 yamt */
215 1.190.2.2 yamt void
216 1.190.2.2 yamt sysctl_init(void)
217 1.190.2.2 yamt {
218 1.190.2.2 yamt sysctl_setup_func * const *sysctl_setup, f;
219 1.190.2.2 yamt
220 1.190.2.2 yamt lockinit(&sysctl_treelock, PRIBIO|PCATCH, "sysctl", 0, 0);
221 1.190.2.2 yamt
222 1.190.2.2 yamt /*
223 1.190.2.2 yamt * dynamic mib numbers start here
224 1.190.2.2 yamt */
225 1.190.2.2 yamt sysctl_root.sysctl_num = CREATE_BASE;
226 1.190.2.2 yamt
227 1.190.2.2 yamt __link_set_foreach(sysctl_setup, sysctl_funcs) {
228 1.190.2.2 yamt /*
229 1.190.2.2 yamt * XXX - why do i have to coerce the pointers like this?
230 1.190.2.2 yamt */
231 1.190.2.2 yamt f = (void*)*sysctl_setup;
232 1.190.2.2 yamt (*f)(NULL);
233 1.190.2.2 yamt }
234 1.190.2.2 yamt
235 1.190.2.2 yamt /*
236 1.190.2.2 yamt * setting this means no more permanent nodes can be added,
237 1.190.2.2 yamt * trees that claim to be readonly at the root now are, and if
238 1.190.2.2 yamt * the main tree is readonly, *everything* is.
239 1.190.2.2 yamt */
240 1.190.2.2 yamt sysctl_root.sysctl_flags |= CTLFLAG_PERMANENT;
241 1.190.2.2 yamt
242 1.190.2.2 yamt }
243 1.190.2.2 yamt
244 1.190.2.2 yamt /*
245 1.190.2.2 yamt * ********************************************************************
246 1.190.2.2 yamt * The main native sysctl system call itself.
247 1.190.2.2 yamt * ********************************************************************
248 1.190.2.2 yamt */
249 1.190.2.2 yamt int
250 1.190.2.2 yamt sys___sysctl(struct lwp *l, void *v, register_t *retval)
251 1.190.2.2 yamt {
252 1.190.2.2 yamt struct sys___sysctl_args /* {
253 1.190.2.2 yamt syscallarg(const int *) name;
254 1.190.2.2 yamt syscallarg(u_int) namelen;
255 1.190.2.2 yamt syscallarg(void *) old;
256 1.190.2.2 yamt syscallarg(size_t *) oldlenp;
257 1.190.2.2 yamt syscallarg(const void *) new;
258 1.190.2.2 yamt syscallarg(size_t) newlen;
259 1.190.2.2 yamt } */ *uap = v;
260 1.190.2.2 yamt int error, nerror, name[CTL_MAXNAME];
261 1.190.2.2 yamt size_t oldlen, savelen, *oldlenp;
262 1.190.2.2 yamt
263 1.190.2.2 yamt /*
264 1.190.2.2 yamt * get oldlen
265 1.190.2.2 yamt */
266 1.190.2.2 yamt oldlen = 0;
267 1.190.2.2 yamt oldlenp = SCARG(uap, oldlenp);
268 1.190.2.2 yamt if (oldlenp != NULL) {
269 1.190.2.2 yamt error = copyin(oldlenp, &oldlen, sizeof(oldlen));
270 1.190.2.2 yamt if (error)
271 1.190.2.2 yamt return (error);
272 1.190.2.2 yamt }
273 1.190.2.2 yamt savelen = oldlen;
274 1.190.2.2 yamt
275 1.190.2.2 yamt /*
276 1.190.2.2 yamt * top-level sysctl names may or may not be non-terminal, but
277 1.190.2.2 yamt * we don't care
278 1.190.2.2 yamt */
279 1.190.2.2 yamt if (SCARG(uap, namelen) > CTL_MAXNAME || SCARG(uap, namelen) < 1)
280 1.190.2.2 yamt return (EINVAL);
281 1.190.2.2 yamt error = copyin(SCARG(uap, name), &name,
282 1.190.2.2 yamt SCARG(uap, namelen) * sizeof(int));
283 1.190.2.2 yamt if (error)
284 1.190.2.2 yamt return (error);
285 1.190.2.2 yamt
286 1.190.2.2 yamt /*
287 1.190.2.2 yamt * wire old so that copyout() is less likely to fail?
288 1.190.2.2 yamt */
289 1.190.2.2 yamt error = sysctl_lock(l, SCARG(uap, old), savelen);
290 1.190.2.2 yamt if (error)
291 1.190.2.2 yamt return (error);
292 1.190.2.2 yamt
293 1.190.2.2 yamt /*
294 1.190.2.2 yamt * do sysctl work (NULL means main built-in default tree)
295 1.190.2.2 yamt */
296 1.190.2.2 yamt error = sysctl_dispatch(&name[0], SCARG(uap, namelen),
297 1.190.2.2 yamt SCARG(uap, old), &oldlen,
298 1.190.2.2 yamt SCARG(uap, new), SCARG(uap, newlen),
299 1.190.2.2 yamt &name[0], l, NULL);
300 1.190.2.2 yamt
301 1.190.2.2 yamt /*
302 1.190.2.2 yamt * release the sysctl lock
303 1.190.2.2 yamt */
304 1.190.2.2 yamt sysctl_unlock(l);
305 1.190.2.2 yamt
306 1.190.2.2 yamt /*
307 1.190.2.2 yamt * set caller's oldlen to new value even in the face of an
308 1.190.2.2 yamt * error (if this gets an error and they didn't have one, they
309 1.190.2.2 yamt * get this one)
310 1.190.2.2 yamt */
311 1.190.2.2 yamt if (oldlenp) {
312 1.190.2.2 yamt nerror = copyout(&oldlen, oldlenp, sizeof(oldlen));
313 1.190.2.2 yamt if (error == 0)
314 1.190.2.2 yamt error = nerror;
315 1.190.2.2 yamt }
316 1.190.2.2 yamt
317 1.190.2.2 yamt /*
318 1.190.2.2 yamt * if the only problem is that we weren't given enough space,
319 1.190.2.2 yamt * that's an ENOMEM error
320 1.190.2.2 yamt */
321 1.190.2.2 yamt if (error == 0 && SCARG(uap, old) != NULL && savelen < oldlen)
322 1.190.2.2 yamt error = ENOMEM;
323 1.190.2.2 yamt
324 1.190.2.2 yamt return (error);
325 1.190.2.2 yamt }
326 1.190.2.2 yamt
327 1.190.2.2 yamt /*
328 1.190.2.2 yamt * ********************************************************************
329 1.190.2.2 yamt * Section 1: How the tree is used
330 1.190.2.2 yamt * ********************************************************************
331 1.190.2.2 yamt * Implementations of sysctl for emulations should typically need only
332 1.190.2.2 yamt * these three functions in this order: lock the tree, dispatch
333 1.190.2.2 yamt * request into it, unlock the tree.
334 1.190.2.2 yamt * ********************************************************************
335 1.190.2.2 yamt */
336 1.190.2.2 yamt int
337 1.190.2.2 yamt sysctl_lock(struct lwp *l, void *oldp, size_t savelen)
338 1.190.2.2 yamt {
339 1.190.2.2 yamt int error = 0;
340 1.190.2.2 yamt
341 1.190.2.2 yamt error = lockmgr(&sysctl_treelock, LK_EXCLUSIVE, NULL);
342 1.190.2.2 yamt if (error)
343 1.190.2.2 yamt return (error);
344 1.190.2.2 yamt
345 1.190.2.2 yamt if (l != NULL && oldp != NULL && savelen) {
346 1.190.2.2 yamt /*
347 1.190.2.2 yamt * be lazy - memory is locked for short time only, so
348 1.190.2.2 yamt * just do a basic check against system limit
349 1.190.2.2 yamt */
350 1.190.2.2 yamt if (uvmexp.wired + atop(savelen) > uvmexp.wiredmax) {
351 1.190.2.2 yamt lockmgr(&sysctl_treelock, LK_RELEASE, NULL);
352 1.190.2.2 yamt return (ENOMEM);
353 1.190.2.2 yamt }
354 1.190.2.2 yamt error = uvm_vslock(l->l_proc, oldp, savelen, VM_PROT_WRITE);
355 1.190.2.2 yamt if (error) {
356 1.190.2.2 yamt (void) lockmgr(&sysctl_treelock, LK_RELEASE, NULL);
357 1.190.2.2 yamt return (error);
358 1.190.2.2 yamt }
359 1.190.2.2 yamt sysctl_memaddr = oldp;
360 1.190.2.2 yamt sysctl_memsize = savelen;
361 1.190.2.2 yamt }
362 1.190.2.2 yamt
363 1.190.2.2 yamt return (0);
364 1.190.2.2 yamt }
365 1.190.2.2 yamt
366 1.190.2.2 yamt /*
367 1.190.2.2 yamt * ********************************************************************
368 1.190.2.2 yamt * the main sysctl dispatch routine. scans the given tree and picks a
369 1.190.2.2 yamt * function to call based on what it finds.
370 1.190.2.2 yamt * ********************************************************************
371 1.190.2.2 yamt */
372 1.190.2.2 yamt int
373 1.190.2.2 yamt sysctl_dispatch(SYSCTLFN_ARGS)
374 1.190.2.2 yamt {
375 1.190.2.2 yamt int error;
376 1.190.2.2 yamt sysctlfn fn;
377 1.190.2.2 yamt int ni;
378 1.190.2.2 yamt
379 1.190.2.2 yamt if (rnode && SYSCTL_VERS(rnode->sysctl_flags) != SYSCTL_VERSION) {
380 1.190.2.2 yamt printf("sysctl_dispatch: rnode %p wrong version\n", rnode);
381 1.190.2.2 yamt return (EINVAL);
382 1.190.2.2 yamt }
383 1.190.2.2 yamt
384 1.190.2.2 yamt fn = NULL;
385 1.190.2.2 yamt error = sysctl_locate(l, name, namelen, &rnode, &ni);
386 1.190.2.2 yamt
387 1.190.2.2 yamt if (rnode->sysctl_func != NULL) {
388 1.190.2.2 yamt /*
389 1.190.2.2 yamt * the node we ended up at has a function, so call it. it can
390 1.190.2.2 yamt * hand off to query or create if it wants to.
391 1.190.2.2 yamt */
392 1.190.2.2 yamt fn = rnode->sysctl_func;
393 1.190.2.2 yamt } else if (error == 0) {
394 1.190.2.2 yamt /*
395 1.190.2.2 yamt * we found the node they were looking for, so do a lookup.
396 1.190.2.2 yamt */
397 1.190.2.2 yamt fn = (sysctlfn)sysctl_lookup; /* XXX may write to rnode */
398 1.190.2.2 yamt } else if (error == ENOENT && (ni + 1) == namelen && name[ni] < 0) {
399 1.190.2.2 yamt /*
400 1.190.2.2 yamt * prospective parent node found, but the terminal node was
401 1.190.2.2 yamt * not. generic operations associate with the parent.
402 1.190.2.2 yamt */
403 1.190.2.2 yamt switch (name[ni]) {
404 1.190.2.2 yamt case CTL_QUERY:
405 1.190.2.2 yamt fn = sysctl_query;
406 1.190.2.2 yamt break;
407 1.190.2.2 yamt case CTL_CREATE:
408 1.190.2.2 yamt #if NKSYMS > 0
409 1.190.2.2 yamt case CTL_CREATESYM:
410 1.190.2.2 yamt #endif /* NKSYMS > 0 */
411 1.190.2.2 yamt fn = (sysctlfn)sysctl_create; /* we own the rnode */
412 1.190.2.2 yamt break;
413 1.190.2.2 yamt case CTL_DESTROY:
414 1.190.2.2 yamt fn = (sysctlfn)sysctl_destroy; /* we own the rnode */
415 1.190.2.2 yamt break;
416 1.190.2.2 yamt case CTL_MMAP:
417 1.190.2.2 yamt fn = (sysctlfn)sysctl_mmap; /* we own the rnode */
418 1.190.2.2 yamt break;
419 1.190.2.2 yamt case CTL_DESCRIBE:
420 1.190.2.2 yamt fn = sysctl_describe;
421 1.190.2.2 yamt break;
422 1.190.2.2 yamt default:
423 1.190.2.2 yamt error = EOPNOTSUPP;
424 1.190.2.2 yamt break;
425 1.190.2.2 yamt }
426 1.190.2.2 yamt }
427 1.190.2.2 yamt
428 1.190.2.2 yamt /*
429 1.190.2.2 yamt * after all of that, maybe we found someone who knows how to
430 1.190.2.2 yamt * get us what we want?
431 1.190.2.2 yamt */
432 1.190.2.2 yamt if (fn != NULL)
433 1.190.2.2 yamt error = (*fn)(name + ni, namelen - ni, oldp, oldlenp,
434 1.190.2.2 yamt newp, newlen, name, l, rnode);
435 1.190.2.2 yamt else if (error == 0)
436 1.190.2.2 yamt error = EOPNOTSUPP;
437 1.190.2.2 yamt
438 1.190.2.2 yamt return (error);
439 1.190.2.2 yamt }
440 1.190.2.2 yamt
441 1.190.2.2 yamt /*
442 1.190.2.2 yamt * ********************************************************************
443 1.190.2.2 yamt * Releases the tree lock. Note that if uvm_vslock() was called when
444 1.190.2.2 yamt * the lock was taken, we release that memory now. By keeping track
445 1.190.2.2 yamt * of where and how much by ourselves, the lock can be released much
446 1.190.2.2 yamt * more easily from anywhere.
447 1.190.2.2 yamt * ********************************************************************
448 1.190.2.2 yamt */
449 1.190.2.2 yamt void
450 1.190.2.2 yamt sysctl_unlock(struct lwp *l)
451 1.190.2.2 yamt {
452 1.190.2.2 yamt
453 1.190.2.2 yamt if (l != NULL && sysctl_memsize != 0) {
454 1.190.2.2 yamt uvm_vsunlock(l->l_proc, sysctl_memaddr, sysctl_memsize);
455 1.190.2.2 yamt sysctl_memsize = 0;
456 1.190.2.2 yamt }
457 1.190.2.2 yamt
458 1.190.2.2 yamt (void) lockmgr(&sysctl_treelock, LK_RELEASE, NULL);
459 1.190.2.2 yamt }
460 1.190.2.2 yamt
461 1.190.2.2 yamt /*
462 1.190.2.2 yamt * ********************************************************************
463 1.190.2.2 yamt * Section 2: The main tree interfaces
464 1.190.2.2 yamt * ********************************************************************
465 1.190.2.2 yamt * This is how sysctl_dispatch() does its work, and you can too, by
466 1.190.2.2 yamt * calling these routines from helpers (though typically only
467 1.190.2.2 yamt * sysctl_lookup() will be used). The tree MUST BE LOCKED when these
468 1.190.2.2 yamt * are called.
469 1.190.2.2 yamt * ********************************************************************
470 1.190.2.2 yamt */
471 1.190.2.2 yamt
472 1.190.2.2 yamt /*
473 1.190.2.2 yamt * sysctl_locate -- Finds the node matching the given mib under the
474 1.190.2.2 yamt * given tree (via rv). If no tree is given, we fall back to the
475 1.190.2.2 yamt * native tree. The current process (via l) is used for access
476 1.190.2.2 yamt * control on the tree (some nodes may be traversable only by root) and
477 1.190.2.2 yamt * on return, nip will show how many numbers in the mib were consumed.
478 1.190.2.2 yamt */
479 1.190.2.2 yamt int
480 1.190.2.2 yamt sysctl_locate(struct lwp *l, const int *name, u_int namelen,
481 1.190.2.2 yamt const struct sysctlnode **rnode, int *nip)
482 1.190.2.2 yamt {
483 1.190.2.2 yamt const struct sysctlnode *node, *pnode;
484 1.190.2.2 yamt int tn, si, ni, error, alias;
485 1.190.2.2 yamt
486 1.190.2.2 yamt /*
487 1.190.2.2 yamt * basic checks and setup
488 1.190.2.2 yamt */
489 1.190.2.2 yamt if (*rnode == NULL)
490 1.190.2.2 yamt *rnode = &sysctl_root;
491 1.190.2.2 yamt if (nip)
492 1.190.2.2 yamt *nip = 0;
493 1.190.2.2 yamt if (namelen < 0)
494 1.190.2.2 yamt return (EINVAL);
495 1.190.2.2 yamt if (namelen == 0)
496 1.190.2.2 yamt return (0);
497 1.190.2.2 yamt
498 1.190.2.2 yamt /*
499 1.190.2.2 yamt * search starts from "root"
500 1.190.2.2 yamt */
501 1.190.2.2 yamt pnode = *rnode;
502 1.190.2.2 yamt if (SYSCTL_VERS(pnode->sysctl_flags) != SYSCTL_VERSION) {
503 1.190.2.2 yamt printf("sysctl_locate: pnode %p wrong version\n", pnode);
504 1.190.2.2 yamt return (EINVAL);
505 1.190.2.2 yamt }
506 1.190.2.2 yamt node = pnode->sysctl_child;
507 1.190.2.2 yamt error = 0;
508 1.190.2.2 yamt
509 1.190.2.2 yamt /*
510 1.190.2.2 yamt * scan for node to which new node should be attached
511 1.190.2.2 yamt */
512 1.190.2.2 yamt for (ni = 0; ni < namelen; ni++) {
513 1.190.2.2 yamt /*
514 1.190.2.2 yamt * walked off bottom of tree
515 1.190.2.2 yamt */
516 1.190.2.2 yamt if (node == NULL) {
517 1.190.2.2 yamt if (SYSCTL_TYPE(pnode->sysctl_flags) == CTLTYPE_NODE)
518 1.190.2.2 yamt error = ENOENT;
519 1.190.2.2 yamt else
520 1.190.2.2 yamt error = ENOTDIR;
521 1.190.2.2 yamt break;
522 1.190.2.2 yamt }
523 1.190.2.2 yamt /*
524 1.190.2.2 yamt * can anyone traverse this node or only root?
525 1.190.2.2 yamt */
526 1.190.2.2 yamt if (l != NULL && (pnode->sysctl_flags & CTLFLAG_PRIVATE) &&
527 1.190.2.4 yamt (error = kauth_authorize_generic(l->l_proc->p_cred,
528 1.190.2.4 yamt KAUTH_GENERIC_ISSUSER, &l->l_proc->p_acflag))
529 1.190.2.2 yamt != 0)
530 1.190.2.2 yamt return (error);
531 1.190.2.2 yamt /*
532 1.190.2.2 yamt * find a child node with the right number
533 1.190.2.2 yamt */
534 1.190.2.2 yamt tn = name[ni];
535 1.190.2.2 yamt alias = 0;
536 1.190.2.2 yamt
537 1.190.2.2 yamt si = 0;
538 1.190.2.2 yamt /*
539 1.190.2.2 yamt * Note: ANYNUMBER only matches positive integers.
540 1.190.2.2 yamt * Since ANYNUMBER is only permitted on single-node
541 1.190.2.2 yamt * sub-trees (eg proc), check before the loop and skip
542 1.190.2.2 yamt * it if we can.
543 1.190.2.2 yamt */
544 1.190.2.2 yamt if ((node[si].sysctl_flags & CTLFLAG_ANYNUMBER) && (tn >= 0))
545 1.190.2.2 yamt goto foundit;
546 1.190.2.2 yamt for (; si < pnode->sysctl_clen; si++) {
547 1.190.2.2 yamt if (node[si].sysctl_num == tn) {
548 1.190.2.2 yamt if (node[si].sysctl_flags & CTLFLAG_ALIAS) {
549 1.190.2.2 yamt if (alias++ == 4)
550 1.190.2.2 yamt break;
551 1.190.2.2 yamt else {
552 1.190.2.2 yamt tn = node[si].sysctl_alias;
553 1.190.2.2 yamt si = -1;
554 1.190.2.2 yamt }
555 1.190.2.2 yamt } else
556 1.190.2.2 yamt goto foundit;
557 1.190.2.2 yamt }
558 1.190.2.2 yamt }
559 1.190.2.2 yamt /*
560 1.190.2.2 yamt * if we ran off the end, it obviously doesn't exist
561 1.190.2.2 yamt */
562 1.190.2.2 yamt error = ENOENT;
563 1.190.2.2 yamt break;
564 1.190.2.2 yamt
565 1.190.2.2 yamt /*
566 1.190.2.2 yamt * so far so good, move on down the line
567 1.190.2.2 yamt */
568 1.190.2.2 yamt foundit:
569 1.190.2.2 yamt pnode = &node[si];
570 1.190.2.2 yamt if (SYSCTL_TYPE(pnode->sysctl_flags) == CTLTYPE_NODE)
571 1.190.2.2 yamt node = node[si].sysctl_child;
572 1.190.2.2 yamt else
573 1.190.2.2 yamt node = NULL;
574 1.190.2.2 yamt }
575 1.190.2.2 yamt
576 1.190.2.2 yamt *rnode = pnode;
577 1.190.2.2 yamt if (nip)
578 1.190.2.2 yamt *nip = ni;
579 1.190.2.2 yamt
580 1.190.2.2 yamt return (error);
581 1.190.2.2 yamt }
582 1.190.2.2 yamt
583 1.190.2.2 yamt /*
584 1.190.2.2 yamt * sysctl_query -- The auto-discovery engine. Copies out the structs
585 1.190.2.2 yamt * describing nodes under the given node and handles overlay trees.
586 1.190.2.2 yamt */
587 1.190.2.2 yamt int
588 1.190.2.2 yamt sysctl_query(SYSCTLFN_ARGS)
589 1.190.2.2 yamt {
590 1.190.2.2 yamt int error, ni, elim, v;
591 1.190.2.2 yamt size_t out, left, t;
592 1.190.2.2 yamt const struct sysctlnode *enode, *onode;
593 1.190.2.2 yamt struct sysctlnode qnode;
594 1.190.2.2 yamt
595 1.190.2.2 yamt if (SYSCTL_VERS(rnode->sysctl_flags) != SYSCTL_VERSION) {
596 1.190.2.2 yamt printf("sysctl_query: rnode %p wrong version\n", rnode);
597 1.190.2.2 yamt return (EINVAL);
598 1.190.2.2 yamt }
599 1.190.2.2 yamt
600 1.190.2.2 yamt if (SYSCTL_TYPE(rnode->sysctl_flags) != CTLTYPE_NODE)
601 1.190.2.2 yamt return (ENOTDIR);
602 1.190.2.2 yamt if (namelen != 1 || name[0] != CTL_QUERY)
603 1.190.2.2 yamt return (EINVAL);
604 1.190.2.2 yamt
605 1.190.2.2 yamt error = 0;
606 1.190.2.2 yamt out = 0;
607 1.190.2.2 yamt left = *oldlenp;
608 1.190.2.2 yamt elim = 0;
609 1.190.2.2 yamt enode = NULL;
610 1.190.2.2 yamt
611 1.190.2.2 yamt /*
612 1.190.2.2 yamt * translate the given request to a current node
613 1.190.2.2 yamt */
614 1.190.2.2 yamt error = sysctl_cvt_in(l, &v, newp, newlen, &qnode);
615 1.190.2.2 yamt if (error)
616 1.190.2.2 yamt return (error);
617 1.190.2.2 yamt
618 1.190.2.2 yamt /*
619 1.190.2.2 yamt * if the request specifies a version, check it
620 1.190.2.2 yamt */
621 1.190.2.2 yamt if (qnode.sysctl_ver != 0) {
622 1.190.2.2 yamt enode = rnode;
623 1.190.2.2 yamt if (qnode.sysctl_ver != enode->sysctl_ver &&
624 1.190.2.2 yamt qnode.sysctl_ver != sysctl_rootof(enode)->sysctl_ver)
625 1.190.2.2 yamt return (EINVAL);
626 1.190.2.2 yamt }
627 1.190.2.2 yamt
628 1.190.2.2 yamt /*
629 1.190.2.2 yamt * process has overlay tree
630 1.190.2.2 yamt */
631 1.190.2.2 yamt if (l && l->l_proc->p_emul->e_sysctlovly) {
632 1.190.2.2 yamt enode = l->l_proc->p_emul->e_sysctlovly;
633 1.190.2.2 yamt elim = (name - oname);
634 1.190.2.2 yamt error = sysctl_locate(l, oname, elim, &enode, NULL);
635 1.190.2.2 yamt if (error == 0) {
636 1.190.2.2 yamt /* ah, found parent in overlay */
637 1.190.2.2 yamt elim = enode->sysctl_clen;
638 1.190.2.2 yamt enode = enode->sysctl_child;
639 1.190.2.2 yamt } else {
640 1.190.2.2 yamt error = 0;
641 1.190.2.2 yamt elim = 0;
642 1.190.2.2 yamt enode = NULL;
643 1.190.2.2 yamt }
644 1.190.2.2 yamt }
645 1.190.2.2 yamt
646 1.190.2.2 yamt for (ni = 0; ni < rnode->sysctl_clen; ni++) {
647 1.190.2.2 yamt onode = &rnode->sysctl_child[ni];
648 1.190.2.2 yamt if (enode && enode->sysctl_num == onode->sysctl_num) {
649 1.190.2.2 yamt if (SYSCTL_TYPE(enode->sysctl_flags) != CTLTYPE_NODE)
650 1.190.2.2 yamt onode = enode;
651 1.190.2.2 yamt if (--elim > 0)
652 1.190.2.2 yamt enode++;
653 1.190.2.2 yamt else
654 1.190.2.2 yamt enode = NULL;
655 1.190.2.2 yamt }
656 1.190.2.2 yamt error = sysctl_cvt_out(l, v, onode, oldp, left, &t);
657 1.190.2.2 yamt if (error)
658 1.190.2.2 yamt return (error);
659 1.190.2.2 yamt if (oldp != NULL)
660 1.190.2.2 yamt oldp = (char*)oldp + t;
661 1.190.2.2 yamt out += t;
662 1.190.2.2 yamt left -= MIN(left, t);
663 1.190.2.2 yamt }
664 1.190.2.2 yamt
665 1.190.2.2 yamt /*
666 1.190.2.2 yamt * overlay trees *MUST* be entirely consumed
667 1.190.2.2 yamt */
668 1.190.2.2 yamt KASSERT(enode == NULL);
669 1.190.2.2 yamt
670 1.190.2.2 yamt *oldlenp = out;
671 1.190.2.2 yamt
672 1.190.2.2 yamt return (error);
673 1.190.2.2 yamt }
674 1.190.2.2 yamt
675 1.190.2.2 yamt #ifdef SYSCTL_DEBUG_CREATE
676 1.190.2.2 yamt #undef sysctl_create
677 1.190.2.2 yamt #endif /* SYSCTL_DEBUG_CREATE */
678 1.190.2.2 yamt
679 1.190.2.2 yamt /*
680 1.190.2.2 yamt * sysctl_create -- Adds a node (the description of which is taken
681 1.190.2.2 yamt * from newp) to the tree, returning a copy of it in the space pointed
682 1.190.2.2 yamt * to by oldp. In the event that the requested slot is already taken
683 1.190.2.2 yamt * (either by name or by number), the offending node is returned
684 1.190.2.2 yamt * instead. Yes, this is complex, but we want to make sure everything
685 1.190.2.2 yamt * is proper.
686 1.190.2.2 yamt */
687 1.190.2.2 yamt int
688 1.190.2.2 yamt sysctl_create(SYSCTLFN_ARGS)
689 1.190.2.2 yamt {
690 1.190.2.2 yamt struct sysctlnode nnode, *node, *pnode;
691 1.190.2.2 yamt int error, ni, at, nm, type, sz, flags, anum, v;
692 1.190.2.2 yamt void *own;
693 1.190.2.2 yamt
694 1.190.2.2 yamt error = 0;
695 1.190.2.2 yamt own = NULL;
696 1.190.2.2 yamt anum = -1;
697 1.190.2.2 yamt
698 1.190.2.2 yamt if (SYSCTL_VERS(rnode->sysctl_flags) != SYSCTL_VERSION) {
699 1.190.2.2 yamt printf("sysctl_create: rnode %p wrong version\n", rnode);
700 1.190.2.2 yamt return (EINVAL);
701 1.190.2.2 yamt }
702 1.190.2.2 yamt
703 1.190.2.2 yamt if (namelen != 1 || (name[namelen - 1] != CTL_CREATE
704 1.190.2.2 yamt #if NKSYMS > 0
705 1.190.2.2 yamt && name[namelen - 1] != CTL_CREATESYM
706 1.190.2.2 yamt #endif /* NKSYMS > 0 */
707 1.190.2.2 yamt ))
708 1.190.2.2 yamt return (EINVAL);
709 1.190.2.2 yamt
710 1.190.2.2 yamt /*
711 1.190.2.2 yamt * processes can only add nodes at securelevel 0, must be
712 1.190.2.2 yamt * root, and can't add nodes to a parent that's not writeable
713 1.190.2.2 yamt */
714 1.190.2.2 yamt if (l != NULL) {
715 1.190.2.2 yamt #ifndef SYSCTL_DISALLOW_CREATE
716 1.190.2.2 yamt if (securelevel > 0)
717 1.190.2.2 yamt return (EPERM);
718 1.190.2.4 yamt error = kauth_authorize_generic(l->l_proc->p_cred,
719 1.190.2.4 yamt KAUTH_GENERIC_ISSUSER, &l->l_proc->p_acflag);
720 1.190.2.2 yamt if (error)
721 1.190.2.2 yamt return (error);
722 1.190.2.2 yamt if (!(rnode->sysctl_flags & CTLFLAG_READWRITE))
723 1.190.2.2 yamt #endif /* SYSCTL_DISALLOW_CREATE */
724 1.190.2.2 yamt return (EPERM);
725 1.190.2.2 yamt }
726 1.190.2.2 yamt
727 1.190.2.2 yamt /*
728 1.190.2.2 yamt * nothing can add a node if:
729 1.190.2.2 yamt * we've finished initial set up and
730 1.190.2.2 yamt * the tree itself is not writeable or
731 1.190.2.2 yamt * the entire sysctl system is not writeable
732 1.190.2.2 yamt */
733 1.190.2.2 yamt if ((sysctl_root.sysctl_flags & CTLFLAG_PERMANENT) &&
734 1.190.2.2 yamt (!(sysctl_rootof(rnode)->sysctl_flags & CTLFLAG_READWRITE) ||
735 1.190.2.2 yamt !(sysctl_root.sysctl_flags & CTLFLAG_READWRITE)))
736 1.190.2.2 yamt return (EPERM);
737 1.190.2.2 yamt
738 1.190.2.2 yamt /*
739 1.190.2.2 yamt * it must be a "node", not a "int" or something
740 1.190.2.2 yamt */
741 1.190.2.2 yamt if (SYSCTL_TYPE(rnode->sysctl_flags) != CTLTYPE_NODE)
742 1.190.2.2 yamt return (ENOTDIR);
743 1.190.2.2 yamt if (rnode->sysctl_flags & CTLFLAG_ALIAS) {
744 1.190.2.2 yamt printf("sysctl_create: attempt to add node to aliased "
745 1.190.2.2 yamt "node %p\n", rnode);
746 1.190.2.2 yamt return (EINVAL);
747 1.190.2.2 yamt }
748 1.190.2.2 yamt pnode = __UNCONST(rnode); /* we are adding children to this node */
749 1.190.2.2 yamt
750 1.190.2.2 yamt if (newp == NULL)
751 1.190.2.2 yamt return (EINVAL);
752 1.190.2.2 yamt error = sysctl_cvt_in(l, &v, newp, newlen, &nnode);
753 1.190.2.2 yamt if (error)
754 1.190.2.2 yamt return (error);
755 1.190.2.2 yamt
756 1.190.2.2 yamt /*
757 1.190.2.2 yamt * nodes passed in don't *have* parents
758 1.190.2.2 yamt */
759 1.190.2.2 yamt if (nnode.sysctl_parent != NULL)
760 1.190.2.2 yamt return (EINVAL);
761 1.190.2.2 yamt
762 1.190.2.2 yamt /*
763 1.190.2.2 yamt * if we are indeed adding it, it should be a "good" name and
764 1.190.2.2 yamt * number
765 1.190.2.2 yamt */
766 1.190.2.2 yamt nm = nnode.sysctl_num;
767 1.190.2.2 yamt #if NKSYMS > 0
768 1.190.2.2 yamt if (nm == CTL_CREATESYM)
769 1.190.2.2 yamt nm = CTL_CREATE;
770 1.190.2.2 yamt #endif /* NKSYMS > 0 */
771 1.190.2.2 yamt if (nm < 0 && nm != CTL_CREATE)
772 1.190.2.2 yamt return (EINVAL);
773 1.190.2.2 yamt sz = 0;
774 1.190.2.2 yamt
775 1.190.2.2 yamt /*
776 1.190.2.2 yamt * the name can't start with a digit
777 1.190.2.2 yamt */
778 1.190.2.2 yamt if (nnode.sysctl_name[sz] >= '0' &&
779 1.190.2.2 yamt nnode.sysctl_name[sz] <= '9')
780 1.190.2.2 yamt return (EINVAL);
781 1.190.2.2 yamt
782 1.190.2.2 yamt /*
783 1.190.2.2 yamt * the name must be only alphanumerics or - or _, longer than
784 1.190.2.2 yamt * 0 bytes and less that SYSCTL_NAMELEN
785 1.190.2.2 yamt */
786 1.190.2.2 yamt while (sz < SYSCTL_NAMELEN && nnode.sysctl_name[sz] != '\0') {
787 1.190.2.2 yamt if ((nnode.sysctl_name[sz] >= '0' &&
788 1.190.2.2 yamt nnode.sysctl_name[sz] <= '9') ||
789 1.190.2.2 yamt (nnode.sysctl_name[sz] >= 'A' &&
790 1.190.2.2 yamt nnode.sysctl_name[sz] <= 'Z') ||
791 1.190.2.2 yamt (nnode.sysctl_name[sz] >= 'a' &&
792 1.190.2.2 yamt nnode.sysctl_name[sz] <= 'z') ||
793 1.190.2.2 yamt nnode.sysctl_name[sz] == '-' ||
794 1.190.2.2 yamt nnode.sysctl_name[sz] == '_')
795 1.190.2.2 yamt sz++;
796 1.190.2.2 yamt else
797 1.190.2.2 yamt return (EINVAL);
798 1.190.2.2 yamt }
799 1.190.2.2 yamt if (sz == 0 || sz == SYSCTL_NAMELEN)
800 1.190.2.2 yamt return (EINVAL);
801 1.190.2.2 yamt
802 1.190.2.2 yamt /*
803 1.190.2.2 yamt * various checks revolve around size vs type, etc
804 1.190.2.2 yamt */
805 1.190.2.2 yamt type = SYSCTL_TYPE(nnode.sysctl_flags);
806 1.190.2.2 yamt flags = SYSCTL_FLAGS(nnode.sysctl_flags);
807 1.190.2.2 yamt sz = nnode.sysctl_size;
808 1.190.2.2 yamt
809 1.190.2.2 yamt /*
810 1.190.2.2 yamt * find out if there's a collision, and if so, let the caller
811 1.190.2.2 yamt * know what they collided with
812 1.190.2.2 yamt */
813 1.190.2.2 yamt node = pnode->sysctl_child;
814 1.190.2.3 yamt at = 0;
815 1.190.2.3 yamt if (node) {
816 1.190.2.3 yamt if ((flags | node->sysctl_flags) & CTLFLAG_ANYNUMBER)
817 1.190.2.3 yamt /* No siblings for a CTLFLAG_ANYNUMBER node */
818 1.190.2.3 yamt return EINVAL;
819 1.190.2.3 yamt for (ni = 0; ni < pnode->sysctl_clen; ni++) {
820 1.190.2.3 yamt if (nm == node[ni].sysctl_num ||
821 1.190.2.3 yamt strcmp(nnode.sysctl_name, node[ni].sysctl_name) == 0) {
822 1.190.2.3 yamt /*
823 1.190.2.3 yamt * ignore error here, since we
824 1.190.2.3 yamt * are already fixed on EEXIST
825 1.190.2.3 yamt */
826 1.190.2.3 yamt (void)sysctl_cvt_out(l, v, &node[ni], oldp,
827 1.190.2.3 yamt *oldlenp, oldlenp);
828 1.190.2.3 yamt return (EEXIST);
829 1.190.2.3 yamt }
830 1.190.2.3 yamt if (nm > node[ni].sysctl_num)
831 1.190.2.3 yamt at++;
832 1.190.2.2 yamt }
833 1.190.2.2 yamt }
834 1.190.2.2 yamt
835 1.190.2.2 yamt /*
836 1.190.2.2 yamt * use sysctl_ver to add to the tree iff it hasn't changed
837 1.190.2.2 yamt */
838 1.190.2.2 yamt if (nnode.sysctl_ver != 0) {
839 1.190.2.2 yamt /*
840 1.190.2.2 yamt * a specified value must match either the parent
841 1.190.2.2 yamt * node's version or the root node's version
842 1.190.2.2 yamt */
843 1.190.2.2 yamt if (nnode.sysctl_ver != sysctl_rootof(rnode)->sysctl_ver &&
844 1.190.2.2 yamt nnode.sysctl_ver != rnode->sysctl_ver) {
845 1.190.2.2 yamt return (EINVAL);
846 1.190.2.2 yamt }
847 1.190.2.2 yamt }
848 1.190.2.2 yamt
849 1.190.2.2 yamt /*
850 1.190.2.2 yamt * only the kernel can assign functions to entries
851 1.190.2.2 yamt */
852 1.190.2.2 yamt if (l != NULL && nnode.sysctl_func != NULL)
853 1.190.2.2 yamt return (EPERM);
854 1.190.2.2 yamt
855 1.190.2.2 yamt /*
856 1.190.2.2 yamt * only the kernel can create permanent entries, and only then
857 1.190.2.2 yamt * before the kernel is finished setting itself up
858 1.190.2.2 yamt */
859 1.190.2.2 yamt if (l != NULL && (flags & ~SYSCTL_USERFLAGS))
860 1.190.2.2 yamt return (EPERM);
861 1.190.2.2 yamt if ((flags & CTLFLAG_PERMANENT) &
862 1.190.2.2 yamt (sysctl_root.sysctl_flags & CTLFLAG_PERMANENT))
863 1.190.2.2 yamt return (EPERM);
864 1.190.2.2 yamt if ((flags & (CTLFLAG_OWNDATA | CTLFLAG_IMMEDIATE)) ==
865 1.190.2.2 yamt (CTLFLAG_OWNDATA | CTLFLAG_IMMEDIATE))
866 1.190.2.2 yamt return (EINVAL);
867 1.190.2.2 yamt if ((flags & CTLFLAG_IMMEDIATE) &&
868 1.190.2.2 yamt type != CTLTYPE_INT && type != CTLTYPE_QUAD)
869 1.190.2.2 yamt return (EINVAL);
870 1.190.2.2 yamt
871 1.190.2.2 yamt /*
872 1.190.2.2 yamt * check size, or set it if unset and we can figure it out.
873 1.190.2.2 yamt * kernel created nodes are allowed to have a function instead
874 1.190.2.2 yamt * of a size (or a data pointer).
875 1.190.2.2 yamt */
876 1.190.2.2 yamt switch (type) {
877 1.190.2.2 yamt case CTLTYPE_NODE:
878 1.190.2.2 yamt /*
879 1.190.2.2 yamt * only *i* can assert the size of a node
880 1.190.2.2 yamt */
881 1.190.2.2 yamt if (flags & CTLFLAG_ALIAS) {
882 1.190.2.2 yamt anum = nnode.sysctl_alias;
883 1.190.2.2 yamt if (anum < 0)
884 1.190.2.2 yamt return (EINVAL);
885 1.190.2.2 yamt nnode.sysctl_alias = 0;
886 1.190.2.2 yamt }
887 1.190.2.2 yamt if (sz != 0 || nnode.sysctl_data != NULL)
888 1.190.2.2 yamt return (EINVAL);
889 1.190.2.2 yamt if (nnode.sysctl_csize != 0 ||
890 1.190.2.2 yamt nnode.sysctl_clen != 0 ||
891 1.190.2.2 yamt nnode.sysctl_child != 0)
892 1.190.2.2 yamt return (EINVAL);
893 1.190.2.2 yamt if (flags & CTLFLAG_OWNDATA)
894 1.190.2.2 yamt return (EINVAL);
895 1.190.2.2 yamt sz = sizeof(struct sysctlnode);
896 1.190.2.2 yamt break;
897 1.190.2.2 yamt case CTLTYPE_INT:
898 1.190.2.2 yamt /*
899 1.190.2.2 yamt * since an int is an int, if the size is not given or
900 1.190.2.2 yamt * is wrong, we can "int-uit" it.
901 1.190.2.2 yamt */
902 1.190.2.2 yamt if (sz != 0 && sz != sizeof(int))
903 1.190.2.2 yamt return (EINVAL);
904 1.190.2.2 yamt sz = sizeof(int);
905 1.190.2.2 yamt break;
906 1.190.2.2 yamt case CTLTYPE_STRING:
907 1.190.2.2 yamt /*
908 1.190.2.2 yamt * strings are a little more tricky
909 1.190.2.2 yamt */
910 1.190.2.2 yamt if (sz == 0) {
911 1.190.2.2 yamt if (l == NULL) {
912 1.190.2.2 yamt if (nnode.sysctl_func == NULL) {
913 1.190.2.2 yamt if (nnode.sysctl_data == NULL)
914 1.190.2.2 yamt return (EINVAL);
915 1.190.2.2 yamt else
916 1.190.2.2 yamt sz = strlen(nnode.sysctl_data) +
917 1.190.2.2 yamt 1;
918 1.190.2.2 yamt }
919 1.190.2.2 yamt } else if (nnode.sysctl_data == NULL &&
920 1.190.2.2 yamt flags & CTLFLAG_OWNDATA) {
921 1.190.2.2 yamt return (EINVAL);
922 1.190.2.2 yamt } else {
923 1.190.2.2 yamt char *vp, *e;
924 1.190.2.2 yamt size_t s;
925 1.190.2.2 yamt
926 1.190.2.2 yamt /*
927 1.190.2.2 yamt * we want a rough idea of what the
928 1.190.2.2 yamt * size is now
929 1.190.2.2 yamt */
930 1.190.2.2 yamt vp = malloc(PAGE_SIZE, M_SYSCTLDATA,
931 1.190.2.2 yamt M_WAITOK|M_CANFAIL);
932 1.190.2.2 yamt if (vp == NULL)
933 1.190.2.2 yamt return (ENOMEM);
934 1.190.2.2 yamt e = nnode.sysctl_data;
935 1.190.2.2 yamt do {
936 1.190.2.2 yamt error = copyinstr(e, vp, PAGE_SIZE, &s);
937 1.190.2.2 yamt if (error) {
938 1.190.2.2 yamt if (error != ENAMETOOLONG) {
939 1.190.2.2 yamt free(vp, M_SYSCTLDATA);
940 1.190.2.2 yamt return (error);
941 1.190.2.2 yamt }
942 1.190.2.2 yamt e += PAGE_SIZE;
943 1.190.2.2 yamt if ((e - 32 * PAGE_SIZE) >
944 1.190.2.2 yamt (char*)nnode.sysctl_data) {
945 1.190.2.2 yamt free(vp, M_SYSCTLDATA);
946 1.190.2.2 yamt return (ERANGE);
947 1.190.2.2 yamt }
948 1.190.2.2 yamt }
949 1.190.2.2 yamt } while (error != 0);
950 1.190.2.2 yamt sz = s + (e - (char*)nnode.sysctl_data);
951 1.190.2.2 yamt free(vp, M_SYSCTLDATA);
952 1.190.2.2 yamt }
953 1.190.2.2 yamt }
954 1.190.2.2 yamt break;
955 1.190.2.2 yamt case CTLTYPE_QUAD:
956 1.190.2.2 yamt if (sz != 0 && sz != sizeof(u_quad_t))
957 1.190.2.2 yamt return (EINVAL);
958 1.190.2.2 yamt sz = sizeof(u_quad_t);
959 1.190.2.2 yamt break;
960 1.190.2.2 yamt case CTLTYPE_STRUCT:
961 1.190.2.2 yamt if (sz == 0) {
962 1.190.2.2 yamt if (l != NULL || nnode.sysctl_func == NULL)
963 1.190.2.2 yamt return (EINVAL);
964 1.190.2.2 yamt if (flags & CTLFLAG_OWNDATA)
965 1.190.2.2 yamt return (EINVAL);
966 1.190.2.2 yamt }
967 1.190.2.2 yamt break;
968 1.190.2.2 yamt default:
969 1.190.2.2 yamt return (EINVAL);
970 1.190.2.2 yamt }
971 1.190.2.2 yamt
972 1.190.2.2 yamt /*
973 1.190.2.2 yamt * at this point, if sz is zero, we *must* have a
974 1.190.2.2 yamt * function to go with it and we can't own it.
975 1.190.2.2 yamt */
976 1.190.2.2 yamt
977 1.190.2.2 yamt /*
978 1.190.2.2 yamt * l ptr own
979 1.190.2.2 yamt * 0 0 0 -> EINVAL (if no func)
980 1.190.2.2 yamt * 0 0 1 -> own
981 1.190.2.2 yamt * 0 1 0 -> kptr
982 1.190.2.2 yamt * 0 1 1 -> kptr
983 1.190.2.2 yamt * 1 0 0 -> EINVAL
984 1.190.2.2 yamt * 1 0 1 -> own
985 1.190.2.2 yamt * 1 1 0 -> kptr, no own (fault on lookup)
986 1.190.2.2 yamt * 1 1 1 -> uptr, own
987 1.190.2.2 yamt */
988 1.190.2.2 yamt if (type != CTLTYPE_NODE) {
989 1.190.2.2 yamt if (sz != 0) {
990 1.190.2.2 yamt if (flags & CTLFLAG_OWNDATA) {
991 1.190.2.2 yamt own = malloc(sz, M_SYSCTLDATA,
992 1.190.2.2 yamt M_WAITOK|M_CANFAIL);
993 1.190.2.3 yamt if (own == NULL)
994 1.190.2.3 yamt return ENOMEM;
995 1.190.2.2 yamt if (nnode.sysctl_data == NULL)
996 1.190.2.2 yamt memset(own, 0, sz);
997 1.190.2.2 yamt else {
998 1.190.2.2 yamt error = sysctl_copyin(l,
999 1.190.2.2 yamt nnode.sysctl_data, own, sz);
1000 1.190.2.2 yamt if (error != 0) {
1001 1.190.2.2 yamt free(own, M_SYSCTLDATA);
1002 1.190.2.2 yamt return (error);
1003 1.190.2.2 yamt }
1004 1.190.2.2 yamt }
1005 1.190.2.2 yamt } else if ((nnode.sysctl_data != NULL) &&
1006 1.190.2.2 yamt !(flags & CTLFLAG_IMMEDIATE)) {
1007 1.190.2.2 yamt #if NKSYMS > 0
1008 1.190.2.2 yamt if (name[namelen - 1] == CTL_CREATESYM) {
1009 1.190.2.2 yamt char symname[128]; /* XXX enough? */
1010 1.190.2.2 yamt u_long symaddr;
1011 1.190.2.2 yamt size_t symlen;
1012 1.190.2.2 yamt
1013 1.190.2.2 yamt error = sysctl_copyinstr(l,
1014 1.190.2.2 yamt nnode.sysctl_data, symname,
1015 1.190.2.2 yamt sizeof(symname), &symlen);
1016 1.190.2.2 yamt if (error)
1017 1.190.2.2 yamt return (error);
1018 1.190.2.2 yamt error = ksyms_getval(NULL, symname,
1019 1.190.2.2 yamt &symaddr, KSYMS_EXTERN);
1020 1.190.2.2 yamt if (error)
1021 1.190.2.2 yamt return (error); /* EINVAL? */
1022 1.190.2.2 yamt nnode.sysctl_data = (void*)symaddr;
1023 1.190.2.2 yamt }
1024 1.190.2.2 yamt #endif /* NKSYMS > 0 */
1025 1.190.2.2 yamt /*
1026 1.190.2.2 yamt * Ideally, we'd like to verify here
1027 1.190.2.2 yamt * that this address is acceptable,
1028 1.190.2.2 yamt * but...
1029 1.190.2.2 yamt *
1030 1.190.2.2 yamt * - it might be valid now, only to
1031 1.190.2.2 yamt * become invalid later
1032 1.190.2.2 yamt *
1033 1.190.2.2 yamt * - it might be invalid only for the
1034 1.190.2.2 yamt * moment and valid later
1035 1.190.2.2 yamt *
1036 1.190.2.2 yamt * - or something else.
1037 1.190.2.2 yamt *
1038 1.190.2.2 yamt * Since we can't get a good answer,
1039 1.190.2.2 yamt * we'll just accept the address as
1040 1.190.2.2 yamt * given, and fault on individual
1041 1.190.2.2 yamt * lookups.
1042 1.190.2.2 yamt */
1043 1.190.2.2 yamt }
1044 1.190.2.2 yamt } else if (nnode.sysctl_func == NULL)
1045 1.190.2.2 yamt return (EINVAL);
1046 1.190.2.2 yamt }
1047 1.190.2.2 yamt
1048 1.190.2.2 yamt /*
1049 1.190.2.2 yamt * a process can't assign a function to a node, and the kernel
1050 1.190.2.2 yamt * can't create a node that has no function or data.
1051 1.190.2.2 yamt * (XXX somewhat redundant check)
1052 1.190.2.2 yamt */
1053 1.190.2.2 yamt if (l != NULL || nnode.sysctl_func == NULL) {
1054 1.190.2.2 yamt if (type != CTLTYPE_NODE &&
1055 1.190.2.2 yamt nnode.sysctl_data == NULL &&
1056 1.190.2.2 yamt !(flags & CTLFLAG_IMMEDIATE) &&
1057 1.190.2.2 yamt own == NULL)
1058 1.190.2.2 yamt return (EINVAL);
1059 1.190.2.2 yamt }
1060 1.190.2.2 yamt
1061 1.190.2.2 yamt #ifdef SYSCTL_DISALLOW_KWRITE
1062 1.190.2.2 yamt /*
1063 1.190.2.2 yamt * a process can't create a writable node unless it refers to
1064 1.190.2.2 yamt * new data.
1065 1.190.2.2 yamt */
1066 1.190.2.2 yamt if (l != NULL && own == NULL && type != CTLTYPE_NODE &&
1067 1.190.2.2 yamt (flags & CTLFLAG_READWRITE) != CTLFLAG_READONLY &&
1068 1.190.2.2 yamt !(flags & CTLFLAG_IMMEDIATE))
1069 1.190.2.2 yamt return (EPERM);
1070 1.190.2.2 yamt #endif /* SYSCTL_DISALLOW_KWRITE */
1071 1.190.2.2 yamt
1072 1.190.2.2 yamt /*
1073 1.190.2.2 yamt * make sure there's somewhere to put the new stuff.
1074 1.190.2.2 yamt */
1075 1.190.2.2 yamt if (pnode->sysctl_child == NULL) {
1076 1.190.2.2 yamt if (flags & CTLFLAG_ANYNUMBER)
1077 1.190.2.2 yamt error = sysctl_alloc(pnode, 1);
1078 1.190.2.2 yamt else
1079 1.190.2.2 yamt error = sysctl_alloc(pnode, 0);
1080 1.190.2.3 yamt if (error) {
1081 1.190.2.3 yamt if (own != NULL)
1082 1.190.2.3 yamt free(own, M_SYSCTLDATA);
1083 1.190.2.2 yamt return (error);
1084 1.190.2.3 yamt }
1085 1.190.2.2 yamt }
1086 1.190.2.2 yamt node = pnode->sysctl_child;
1087 1.190.2.2 yamt
1088 1.190.2.2 yamt /*
1089 1.190.2.2 yamt * no collisions, so pick a good dynamic number if we need to.
1090 1.190.2.2 yamt */
1091 1.190.2.2 yamt if (nm == CTL_CREATE) {
1092 1.190.2.2 yamt nm = ++sysctl_root.sysctl_num;
1093 1.190.2.2 yamt for (ni = 0; ni < pnode->sysctl_clen; ni++) {
1094 1.190.2.2 yamt if (nm == node[ni].sysctl_num) {
1095 1.190.2.2 yamt nm++;
1096 1.190.2.2 yamt ni = -1;
1097 1.190.2.2 yamt } else if (nm > node[ni].sysctl_num)
1098 1.190.2.2 yamt at = ni + 1;
1099 1.190.2.2 yamt }
1100 1.190.2.2 yamt }
1101 1.190.2.2 yamt
1102 1.190.2.2 yamt /*
1103 1.190.2.2 yamt * oops...ran out of space
1104 1.190.2.2 yamt */
1105 1.190.2.2 yamt if (pnode->sysctl_clen == pnode->sysctl_csize) {
1106 1.190.2.2 yamt error = sysctl_realloc(pnode);
1107 1.190.2.3 yamt if (error) {
1108 1.190.2.3 yamt if (own != NULL)
1109 1.190.2.3 yamt free(own, M_SYSCTLDATA);
1110 1.190.2.2 yamt return (error);
1111 1.190.2.3 yamt }
1112 1.190.2.2 yamt node = pnode->sysctl_child;
1113 1.190.2.2 yamt }
1114 1.190.2.2 yamt
1115 1.190.2.2 yamt /*
1116 1.190.2.2 yamt * insert new node data
1117 1.190.2.2 yamt */
1118 1.190.2.2 yamt if (at < pnode->sysctl_clen) {
1119 1.190.2.2 yamt int t;
1120 1.190.2.2 yamt
1121 1.190.2.2 yamt /*
1122 1.190.2.2 yamt * move the nodes that should come after the new one
1123 1.190.2.2 yamt */
1124 1.190.2.2 yamt memmove(&node[at + 1], &node[at],
1125 1.190.2.2 yamt (pnode->sysctl_clen - at) * sizeof(struct sysctlnode));
1126 1.190.2.2 yamt memset(&node[at], 0, sizeof(struct sysctlnode));
1127 1.190.2.2 yamt node[at].sysctl_parent = pnode;
1128 1.190.2.2 yamt /*
1129 1.190.2.2 yamt * and...reparent any children of any moved nodes
1130 1.190.2.2 yamt */
1131 1.190.2.2 yamt for (ni = at; ni <= pnode->sysctl_clen; ni++)
1132 1.190.2.2 yamt if (SYSCTL_TYPE(node[ni].sysctl_flags) == CTLTYPE_NODE)
1133 1.190.2.2 yamt for (t = 0; t < node[ni].sysctl_clen; t++)
1134 1.190.2.2 yamt node[ni].sysctl_child[t].sysctl_parent =
1135 1.190.2.2 yamt &node[ni];
1136 1.190.2.2 yamt }
1137 1.190.2.2 yamt node = &node[at];
1138 1.190.2.2 yamt pnode->sysctl_clen++;
1139 1.190.2.2 yamt
1140 1.190.2.2 yamt strlcpy(node->sysctl_name, nnode.sysctl_name,
1141 1.190.2.2 yamt sizeof(node->sysctl_name));
1142 1.190.2.2 yamt node->sysctl_num = nm;
1143 1.190.2.2 yamt node->sysctl_size = sz;
1144 1.190.2.2 yamt node->sysctl_flags = SYSCTL_VERSION|type|flags; /* XXX other trees */
1145 1.190.2.2 yamt node->sysctl_csize = 0;
1146 1.190.2.2 yamt node->sysctl_clen = 0;
1147 1.190.2.2 yamt if (own) {
1148 1.190.2.2 yamt node->sysctl_data = own;
1149 1.190.2.2 yamt node->sysctl_flags |= CTLFLAG_OWNDATA;
1150 1.190.2.2 yamt } else if (flags & CTLFLAG_ALIAS) {
1151 1.190.2.2 yamt node->sysctl_alias = anum;
1152 1.190.2.2 yamt } else if (flags & CTLFLAG_IMMEDIATE) {
1153 1.190.2.2 yamt switch (type) {
1154 1.190.2.2 yamt case CTLTYPE_INT:
1155 1.190.2.2 yamt node->sysctl_idata = nnode.sysctl_idata;
1156 1.190.2.2 yamt break;
1157 1.190.2.2 yamt case CTLTYPE_QUAD:
1158 1.190.2.2 yamt node->sysctl_qdata = nnode.sysctl_qdata;
1159 1.190.2.2 yamt break;
1160 1.190.2.2 yamt }
1161 1.190.2.2 yamt } else {
1162 1.190.2.2 yamt node->sysctl_data = nnode.sysctl_data;
1163 1.190.2.2 yamt node->sysctl_flags &= ~CTLFLAG_OWNDATA;
1164 1.190.2.2 yamt }
1165 1.190.2.2 yamt node->sysctl_func = nnode.sysctl_func;
1166 1.190.2.2 yamt node->sysctl_child = NULL;
1167 1.190.2.2 yamt /* node->sysctl_parent should already be done */
1168 1.190.2.2 yamt
1169 1.190.2.2 yamt /*
1170 1.190.2.2 yamt * update "version" on path to "root"
1171 1.190.2.2 yamt */
1172 1.190.2.2 yamt for (; rnode->sysctl_parent != NULL; rnode = rnode->sysctl_parent)
1173 1.190.2.2 yamt ;
1174 1.190.2.2 yamt pnode = node;
1175 1.190.2.2 yamt for (nm = rnode->sysctl_ver + 1; pnode != NULL;
1176 1.190.2.2 yamt pnode = pnode->sysctl_parent)
1177 1.190.2.2 yamt pnode->sysctl_ver = nm;
1178 1.190.2.2 yamt
1179 1.190.2.3 yamt /* If this fails, the node is already added - the user won't know! */
1180 1.190.2.2 yamt error = sysctl_cvt_out(l, v, node, oldp, *oldlenp, oldlenp);
1181 1.190.2.2 yamt
1182 1.190.2.2 yamt return (error);
1183 1.190.2.2 yamt }
1184 1.190.2.2 yamt
1185 1.190.2.2 yamt /*
1186 1.190.2.2 yamt * ********************************************************************
1187 1.190.2.2 yamt * A wrapper around sysctl_create() that prints the thing we're trying
1188 1.190.2.2 yamt * to add.
1189 1.190.2.2 yamt * ********************************************************************
1190 1.190.2.2 yamt */
1191 1.190.2.2 yamt #ifdef SYSCTL_DEBUG_CREATE
1192 1.190.2.2 yamt int _sysctl_create(SYSCTLFN_PROTO);
1193 1.190.2.2 yamt int
1194 1.190.2.2 yamt _sysctl_create(SYSCTLFN_ARGS)
1195 1.190.2.2 yamt {
1196 1.190.2.2 yamt const struct sysctlnode *node;
1197 1.190.2.2 yamt int k, rc, ni, nl = namelen + (name - oname);
1198 1.190.2.2 yamt
1199 1.190.2.2 yamt node = newp;
1200 1.190.2.2 yamt
1201 1.190.2.2 yamt printf("namelen %d (", nl);
1202 1.190.2.2 yamt for (ni = 0; ni < nl - 1; ni++)
1203 1.190.2.2 yamt printf(" %d", oname[ni]);
1204 1.190.2.2 yamt printf(" %d )\t[%s]\tflags %08x (%08x %d %zu)\n",
1205 1.190.2.2 yamt k = node->sysctl_num,
1206 1.190.2.2 yamt node->sysctl_name,
1207 1.190.2.2 yamt node->sysctl_flags,
1208 1.190.2.2 yamt SYSCTL_FLAGS(node->sysctl_flags),
1209 1.190.2.2 yamt SYSCTL_TYPE(node->sysctl_flags),
1210 1.190.2.2 yamt node->sysctl_size);
1211 1.190.2.2 yamt
1212 1.190.2.2 yamt node = rnode;
1213 1.190.2.2 yamt rc = sysctl_create(SYSCTLFN_CALL(rnode));
1214 1.190.2.2 yamt
1215 1.190.2.2 yamt printf("sysctl_create(");
1216 1.190.2.2 yamt for (ni = 0; ni < nl - 1; ni++)
1217 1.190.2.2 yamt printf(" %d", oname[ni]);
1218 1.190.2.2 yamt printf(" %d ) returned %d\n", k, rc);
1219 1.190.2.2 yamt
1220 1.190.2.2 yamt return (rc);
1221 1.190.2.2 yamt }
1222 1.190.2.2 yamt #define sysctl_create _sysctl_create
1223 1.190.2.2 yamt #endif /* SYSCTL_DEBUG_CREATE */
1224 1.190.2.2 yamt
1225 1.190.2.2 yamt /*
1226 1.190.2.2 yamt * sysctl_destroy -- Removes a node (as described by newp) from the
1227 1.190.2.2 yamt * given tree, returning (if successful) a copy of the dead node in
1228 1.190.2.2 yamt * oldp. Since we're removing stuff, there's not much to check.
1229 1.190.2.2 yamt */
1230 1.190.2.2 yamt int
1231 1.190.2.2 yamt sysctl_destroy(SYSCTLFN_ARGS)
1232 1.190.2.2 yamt {
1233 1.190.2.2 yamt struct sysctlnode *node, *pnode, onode, nnode;
1234 1.190.2.2 yamt int ni, error, v;
1235 1.190.2.2 yamt
1236 1.190.2.2 yamt if (SYSCTL_VERS(rnode->sysctl_flags) != SYSCTL_VERSION) {
1237 1.190.2.2 yamt printf("sysctl_destroy: rnode %p wrong version\n", rnode);
1238 1.190.2.2 yamt return (EINVAL);
1239 1.190.2.2 yamt }
1240 1.190.2.2 yamt
1241 1.190.2.2 yamt error = 0;
1242 1.190.2.2 yamt
1243 1.190.2.2 yamt if (namelen != 1 || name[namelen - 1] != CTL_DESTROY)
1244 1.190.2.2 yamt return (EINVAL);
1245 1.190.2.2 yamt
1246 1.190.2.2 yamt /*
1247 1.190.2.2 yamt * processes can only destroy nodes at securelevel 0, must be
1248 1.190.2.2 yamt * root, and can't remove nodes from a parent that's not
1249 1.190.2.2 yamt * writeable
1250 1.190.2.2 yamt */
1251 1.190.2.2 yamt if (l != NULL) {
1252 1.190.2.2 yamt #ifndef SYSCTL_DISALLOW_CREATE
1253 1.190.2.2 yamt if (securelevel > 0)
1254 1.190.2.2 yamt return (EPERM);
1255 1.190.2.4 yamt error = kauth_authorize_generic(l->l_proc->p_cred,
1256 1.190.2.4 yamt KAUTH_GENERIC_ISSUSER, &l->l_proc->p_acflag);
1257 1.190.2.2 yamt if (error)
1258 1.190.2.2 yamt return (error);
1259 1.190.2.2 yamt if (!(rnode->sysctl_flags & CTLFLAG_READWRITE))
1260 1.190.2.2 yamt #endif /* SYSCTL_DISALLOW_CREATE */
1261 1.190.2.2 yamt return (EPERM);
1262 1.190.2.2 yamt }
1263 1.190.2.2 yamt
1264 1.190.2.2 yamt /*
1265 1.190.2.2 yamt * nothing can remove a node if:
1266 1.190.2.2 yamt * the node is permanent (checked later) or
1267 1.190.2.2 yamt * the tree itself is not writeable or
1268 1.190.2.2 yamt * the entire sysctl system is not writeable
1269 1.190.2.2 yamt *
1270 1.190.2.2 yamt * note that we ignore whether setup is complete or not,
1271 1.190.2.2 yamt * because these rules always apply.
1272 1.190.2.2 yamt */
1273 1.190.2.2 yamt if (!(sysctl_rootof(rnode)->sysctl_flags & CTLFLAG_READWRITE) ||
1274 1.190.2.2 yamt !(sysctl_root.sysctl_flags & CTLFLAG_READWRITE))
1275 1.190.2.2 yamt return (EPERM);
1276 1.190.2.2 yamt
1277 1.190.2.2 yamt if (newp == NULL)
1278 1.190.2.2 yamt return (EINVAL);
1279 1.190.2.2 yamt error = sysctl_cvt_in(l, &v, newp, newlen, &nnode);
1280 1.190.2.2 yamt if (error)
1281 1.190.2.2 yamt return (error);
1282 1.190.2.2 yamt memset(&onode, 0, sizeof(struct sysctlnode));
1283 1.190.2.2 yamt
1284 1.190.2.2 yamt node = rnode->sysctl_child;
1285 1.190.2.2 yamt for (ni = 0; ni < rnode->sysctl_clen; ni++) {
1286 1.190.2.2 yamt if (nnode.sysctl_num == node[ni].sysctl_num) {
1287 1.190.2.2 yamt /*
1288 1.190.2.2 yamt * if name specified, must match
1289 1.190.2.2 yamt */
1290 1.190.2.2 yamt if (nnode.sysctl_name[0] != '\0' &&
1291 1.190.2.2 yamt strcmp(nnode.sysctl_name, node[ni].sysctl_name))
1292 1.190.2.2 yamt continue;
1293 1.190.2.2 yamt /*
1294 1.190.2.2 yamt * if version specified, must match
1295 1.190.2.2 yamt */
1296 1.190.2.2 yamt if (nnode.sysctl_ver != 0 &&
1297 1.190.2.2 yamt nnode.sysctl_ver != node[ni].sysctl_ver)
1298 1.190.2.2 yamt continue;
1299 1.190.2.2 yamt /*
1300 1.190.2.2 yamt * this must be the one
1301 1.190.2.2 yamt */
1302 1.190.2.2 yamt break;
1303 1.190.2.2 yamt }
1304 1.190.2.2 yamt }
1305 1.190.2.2 yamt if (ni == rnode->sysctl_clen)
1306 1.190.2.2 yamt return (ENOENT);
1307 1.190.2.2 yamt node = &node[ni];
1308 1.190.2.2 yamt pnode = node->sysctl_parent;
1309 1.190.2.2 yamt
1310 1.190.2.2 yamt /*
1311 1.190.2.2 yamt * if the kernel says permanent, it is, so there. nyah.
1312 1.190.2.2 yamt */
1313 1.190.2.2 yamt if (SYSCTL_FLAGS(node->sysctl_flags) & CTLFLAG_PERMANENT)
1314 1.190.2.2 yamt return (EPERM);
1315 1.190.2.2 yamt
1316 1.190.2.2 yamt /*
1317 1.190.2.2 yamt * can't delete non-empty nodes
1318 1.190.2.2 yamt */
1319 1.190.2.2 yamt if (SYSCTL_TYPE(node->sysctl_flags) == CTLTYPE_NODE &&
1320 1.190.2.2 yamt node->sysctl_clen != 0)
1321 1.190.2.2 yamt return (ENOTEMPTY);
1322 1.190.2.2 yamt
1323 1.190.2.2 yamt /*
1324 1.190.2.2 yamt * if the node "owns" data, release it now
1325 1.190.2.2 yamt */
1326 1.190.2.2 yamt if (node->sysctl_flags & CTLFLAG_OWNDATA) {
1327 1.190.2.2 yamt if (node->sysctl_data != NULL)
1328 1.190.2.2 yamt free(node->sysctl_data, M_SYSCTLDATA);
1329 1.190.2.2 yamt node->sysctl_data = NULL;
1330 1.190.2.2 yamt }
1331 1.190.2.2 yamt if (node->sysctl_flags & CTLFLAG_OWNDESC) {
1332 1.190.2.2 yamt if (node->sysctl_desc != NULL)
1333 1.190.2.2 yamt /*XXXUNCONST*/
1334 1.190.2.2 yamt free(__UNCONST(node->sysctl_desc), M_SYSCTLDATA);
1335 1.190.2.2 yamt node->sysctl_desc = NULL;
1336 1.190.2.2 yamt }
1337 1.190.2.2 yamt
1338 1.190.2.2 yamt /*
1339 1.190.2.2 yamt * if the node to be removed is not the last one on the list,
1340 1.190.2.2 yamt * move the remaining nodes up, and reparent any grandchildren
1341 1.190.2.2 yamt */
1342 1.190.2.2 yamt onode = *node;
1343 1.190.2.2 yamt if (ni < pnode->sysctl_clen - 1) {
1344 1.190.2.2 yamt int t;
1345 1.190.2.2 yamt
1346 1.190.2.2 yamt memmove(&pnode->sysctl_child[ni], &pnode->sysctl_child[ni + 1],
1347 1.190.2.2 yamt (pnode->sysctl_clen - ni - 1) *
1348 1.190.2.2 yamt sizeof(struct sysctlnode));
1349 1.190.2.2 yamt for (; ni < pnode->sysctl_clen - 1; ni++)
1350 1.190.2.2 yamt if (SYSCTL_TYPE(pnode->sysctl_child[ni].sysctl_flags) ==
1351 1.190.2.2 yamt CTLTYPE_NODE)
1352 1.190.2.2 yamt for (t = 0;
1353 1.190.2.2 yamt t < pnode->sysctl_child[ni].sysctl_clen;
1354 1.190.2.2 yamt t++)
1355 1.190.2.2 yamt pnode->sysctl_child[ni].sysctl_child[t].
1356 1.190.2.2 yamt sysctl_parent =
1357 1.190.2.2 yamt &pnode->sysctl_child[ni];
1358 1.190.2.2 yamt ni = pnode->sysctl_clen - 1;
1359 1.190.2.2 yamt node = &pnode->sysctl_child[ni];
1360 1.190.2.2 yamt }
1361 1.190.2.2 yamt
1362 1.190.2.2 yamt /*
1363 1.190.2.2 yamt * reset the space we just vacated
1364 1.190.2.2 yamt */
1365 1.190.2.2 yamt memset(node, 0, sizeof(struct sysctlnode));
1366 1.190.2.2 yamt node->sysctl_parent = pnode;
1367 1.190.2.2 yamt pnode->sysctl_clen--;
1368 1.190.2.2 yamt
1369 1.190.2.2 yamt /*
1370 1.190.2.2 yamt * if this parent just lost its last child, nuke the creche
1371 1.190.2.2 yamt */
1372 1.190.2.2 yamt if (pnode->sysctl_clen == 0) {
1373 1.190.2.2 yamt free(pnode->sysctl_child, M_SYSCTLNODE);
1374 1.190.2.2 yamt pnode->sysctl_csize = 0;
1375 1.190.2.2 yamt pnode->sysctl_child = NULL;
1376 1.190.2.2 yamt }
1377 1.190.2.2 yamt
1378 1.190.2.2 yamt /*
1379 1.190.2.2 yamt * update "version" on path to "root"
1380 1.190.2.2 yamt */
1381 1.190.2.2 yamt for (; rnode->sysctl_parent != NULL; rnode = rnode->sysctl_parent)
1382 1.190.2.2 yamt ;
1383 1.190.2.2 yamt for (ni = rnode->sysctl_ver + 1; pnode != NULL;
1384 1.190.2.2 yamt pnode = pnode->sysctl_parent)
1385 1.190.2.2 yamt pnode->sysctl_ver = ni;
1386 1.190.2.2 yamt
1387 1.190.2.2 yamt error = sysctl_cvt_out(l, v, &onode, oldp, *oldlenp, oldlenp);
1388 1.190.2.2 yamt
1389 1.190.2.2 yamt return (error);
1390 1.190.2.2 yamt }
1391 1.190.2.2 yamt
1392 1.190.2.2 yamt /*
1393 1.190.2.2 yamt * sysctl_lookup -- Handles copyin/copyout of new and old values.
1394 1.190.2.2 yamt * Partial reads are globally allowed. Only root can write to things
1395 1.190.2.2 yamt * unless the node says otherwise.
1396 1.190.2.2 yamt */
1397 1.190.2.2 yamt int
1398 1.190.2.2 yamt sysctl_lookup(SYSCTLFN_ARGS)
1399 1.190.2.2 yamt {
1400 1.190.2.2 yamt int error, rw;
1401 1.190.2.2 yamt size_t sz, len;
1402 1.190.2.2 yamt void *d;
1403 1.190.2.2 yamt
1404 1.190.2.2 yamt if (SYSCTL_VERS(rnode->sysctl_flags) != SYSCTL_VERSION) {
1405 1.190.2.2 yamt printf("sysctl_lookup: rnode %p wrong version\n", rnode);
1406 1.190.2.2 yamt return (EINVAL);
1407 1.190.2.2 yamt }
1408 1.190.2.2 yamt
1409 1.190.2.2 yamt error = 0;
1410 1.190.2.2 yamt
1411 1.190.2.2 yamt /*
1412 1.190.2.2 yamt * you can't "look up" a node. you can "query" it, but you
1413 1.190.2.2 yamt * can't "look it up".
1414 1.190.2.2 yamt */
1415 1.190.2.2 yamt if (SYSCTL_TYPE(rnode->sysctl_flags) == CTLTYPE_NODE || namelen != 0)
1416 1.190.2.2 yamt return (EINVAL);
1417 1.190.2.2 yamt
1418 1.190.2.2 yamt /*
1419 1.190.2.2 yamt * some nodes are private, so only root can look into them.
1420 1.190.2.2 yamt */
1421 1.190.2.2 yamt if (l != NULL && (rnode->sysctl_flags & CTLFLAG_PRIVATE) &&
1422 1.190.2.4 yamt (error = kauth_authorize_generic(l->l_proc->p_cred,
1423 1.190.2.4 yamt KAUTH_GENERIC_ISSUSER, &l->l_proc->p_acflag)) != 0)
1424 1.190.2.2 yamt return (error);
1425 1.190.2.2 yamt
1426 1.190.2.2 yamt /*
1427 1.190.2.2 yamt * if a node wants to be writable according to different rules
1428 1.190.2.2 yamt * other than "only root can write to stuff unless a flag is
1429 1.190.2.2 yamt * set", then it needs its own function which should have been
1430 1.190.2.2 yamt * called and not us.
1431 1.190.2.2 yamt */
1432 1.190.2.2 yamt if (l != NULL && newp != NULL &&
1433 1.190.2.2 yamt !(rnode->sysctl_flags & CTLFLAG_ANYWRITE) &&
1434 1.190.2.4 yamt (error = kauth_authorize_generic(l->l_proc->p_cred,
1435 1.190.2.4 yamt KAUTH_GENERIC_ISSUSER, &l->l_proc->p_acflag)) != 0)
1436 1.190.2.2 yamt return (error);
1437 1.190.2.2 yamt
1438 1.190.2.2 yamt /*
1439 1.190.2.2 yamt * is this node supposedly writable?
1440 1.190.2.2 yamt */
1441 1.190.2.2 yamt rw = 0;
1442 1.190.2.2 yamt switch (rnode->sysctl_flags & CTLFLAG_READWRITE) {
1443 1.190.2.2 yamt case CTLFLAG_READONLY1:
1444 1.190.2.2 yamt rw = (securelevel < 1) ? 1 : 0;
1445 1.190.2.2 yamt break;
1446 1.190.2.2 yamt case CTLFLAG_READONLY2:
1447 1.190.2.2 yamt rw = (securelevel < 2) ? 1 : 0;
1448 1.190.2.2 yamt break;
1449 1.190.2.2 yamt case CTLFLAG_READWRITE:
1450 1.190.2.2 yamt rw = 1;
1451 1.190.2.2 yamt break;
1452 1.190.2.2 yamt }
1453 1.190.2.2 yamt
1454 1.190.2.2 yamt /*
1455 1.190.2.2 yamt * it appears not to be writable at this time, so if someone
1456 1.190.2.2 yamt * tried to write to it, we must tell them to go away
1457 1.190.2.2 yamt */
1458 1.190.2.2 yamt if (!rw && newp != NULL)
1459 1.190.2.2 yamt return (EPERM);
1460 1.190.2.2 yamt
1461 1.190.2.2 yamt /*
1462 1.190.2.2 yamt * step one, copy out the stuff we have presently
1463 1.190.2.2 yamt */
1464 1.190.2.2 yamt if (rnode->sysctl_flags & CTLFLAG_IMMEDIATE) {
1465 1.190.2.2 yamt /*
1466 1.190.2.2 yamt * note that we discard const here because we are
1467 1.190.2.2 yamt * modifying the contents of the node (which is okay
1468 1.190.2.2 yamt * because it's ours)
1469 1.190.2.2 yamt */
1470 1.190.2.2 yamt switch (SYSCTL_TYPE(rnode->sysctl_flags)) {
1471 1.190.2.2 yamt case CTLTYPE_INT:
1472 1.190.2.2 yamt d = __UNCONST(&rnode->sysctl_idata);
1473 1.190.2.2 yamt break;
1474 1.190.2.2 yamt case CTLTYPE_QUAD:
1475 1.190.2.2 yamt d = __UNCONST(&rnode->sysctl_qdata);
1476 1.190.2.2 yamt break;
1477 1.190.2.2 yamt default:
1478 1.190.2.2 yamt return (EINVAL);
1479 1.190.2.2 yamt }
1480 1.190.2.2 yamt } else
1481 1.190.2.2 yamt d = rnode->sysctl_data;
1482 1.190.2.2 yamt if (SYSCTL_TYPE(rnode->sysctl_flags) == CTLTYPE_STRING)
1483 1.190.2.2 yamt sz = strlen(d) + 1; /* XXX@@@ possible fault here */
1484 1.190.2.2 yamt else
1485 1.190.2.2 yamt sz = rnode->sysctl_size;
1486 1.190.2.2 yamt if (oldp != NULL)
1487 1.190.2.2 yamt error = sysctl_copyout(l, d, oldp, MIN(sz, *oldlenp));
1488 1.190.2.2 yamt if (error)
1489 1.190.2.2 yamt return (error);
1490 1.190.2.2 yamt *oldlenp = sz;
1491 1.190.2.2 yamt
1492 1.190.2.2 yamt /*
1493 1.190.2.2 yamt * are we done?
1494 1.190.2.2 yamt */
1495 1.190.2.2 yamt if (newp == NULL || newlen == 0)
1496 1.190.2.2 yamt return (0);
1497 1.190.2.2 yamt
1498 1.190.2.2 yamt /*
1499 1.190.2.2 yamt * hmm...not done. must now "copy in" new value. re-adjust
1500 1.190.2.2 yamt * sz to maximum value (strings are "weird").
1501 1.190.2.2 yamt */
1502 1.190.2.2 yamt sz = rnode->sysctl_size;
1503 1.190.2.2 yamt switch (SYSCTL_TYPE(rnode->sysctl_flags)) {
1504 1.190.2.2 yamt case CTLTYPE_INT:
1505 1.190.2.2 yamt case CTLTYPE_QUAD:
1506 1.190.2.2 yamt case CTLTYPE_STRUCT:
1507 1.190.2.2 yamt /*
1508 1.190.2.2 yamt * these data must be *exactly* the same size coming
1509 1.190.2.2 yamt * in.
1510 1.190.2.2 yamt */
1511 1.190.2.2 yamt if (newlen != sz)
1512 1.190.2.2 yamt return (EINVAL);
1513 1.190.2.2 yamt error = sysctl_copyin(l, newp, d, sz);
1514 1.190.2.2 yamt break;
1515 1.190.2.2 yamt case CTLTYPE_STRING: {
1516 1.190.2.2 yamt /*
1517 1.190.2.2 yamt * strings, on the other hand, can be shorter, and we
1518 1.190.2.2 yamt * let userland be sloppy about the trailing nul.
1519 1.190.2.2 yamt */
1520 1.190.2.2 yamt char *newbuf;
1521 1.190.2.2 yamt
1522 1.190.2.2 yamt /*
1523 1.190.2.2 yamt * too much new string?
1524 1.190.2.2 yamt */
1525 1.190.2.2 yamt if (newlen > sz)
1526 1.190.2.2 yamt return (EINVAL);
1527 1.190.2.2 yamt
1528 1.190.2.2 yamt /*
1529 1.190.2.2 yamt * temporary copy of new inbound string
1530 1.190.2.2 yamt */
1531 1.190.2.2 yamt len = MIN(sz, newlen);
1532 1.190.2.2 yamt newbuf = malloc(len, M_SYSCTLDATA, M_WAITOK|M_CANFAIL);
1533 1.190.2.2 yamt if (newbuf == NULL)
1534 1.190.2.2 yamt return (ENOMEM);
1535 1.190.2.2 yamt error = sysctl_copyin(l, newp, newbuf, len);
1536 1.190.2.2 yamt if (error) {
1537 1.190.2.2 yamt free(newbuf, M_SYSCTLDATA);
1538 1.190.2.2 yamt return (error);
1539 1.190.2.2 yamt }
1540 1.190.2.2 yamt
1541 1.190.2.2 yamt /*
1542 1.190.2.2 yamt * did they null terminate it, or do we have space
1543 1.190.2.2 yamt * left to do it ourselves?
1544 1.190.2.2 yamt */
1545 1.190.2.2 yamt if (newbuf[len - 1] != '\0' && len == sz) {
1546 1.190.2.2 yamt free(newbuf, M_SYSCTLDATA);
1547 1.190.2.2 yamt return (EINVAL);
1548 1.190.2.2 yamt }
1549 1.190.2.2 yamt
1550 1.190.2.2 yamt /*
1551 1.190.2.2 yamt * looks good, so pop it into place and zero the rest.
1552 1.190.2.2 yamt */
1553 1.190.2.2 yamt if (len > 0)
1554 1.190.2.2 yamt memcpy(d, newbuf, len);
1555 1.190.2.2 yamt if (sz != len)
1556 1.190.2.2 yamt memset((char*)d + len, 0, sz - len);
1557 1.190.2.2 yamt free(newbuf, M_SYSCTLDATA);
1558 1.190.2.2 yamt break;
1559 1.190.2.2 yamt }
1560 1.190.2.2 yamt default:
1561 1.190.2.2 yamt return (EINVAL);
1562 1.190.2.2 yamt }
1563 1.190.2.2 yamt
1564 1.190.2.2 yamt return (error);
1565 1.190.2.2 yamt }
1566 1.190.2.2 yamt
1567 1.190.2.2 yamt /*
1568 1.190.2.2 yamt * sysctl_mmap -- Dispatches sysctl mmap requests to those nodes that
1569 1.190.2.2 yamt * purport to handle it. This interface isn't fully fleshed out yet,
1570 1.190.2.2 yamt * unfortunately.
1571 1.190.2.2 yamt */
1572 1.190.2.2 yamt static int
1573 1.190.2.2 yamt sysctl_mmap(SYSCTLFN_ARGS)
1574 1.190.2.2 yamt {
1575 1.190.2.2 yamt const struct sysctlnode *node;
1576 1.190.2.2 yamt struct sysctlnode nnode;
1577 1.190.2.2 yamt int error;
1578 1.190.2.2 yamt
1579 1.190.2.2 yamt if (SYSCTL_VERS(rnode->sysctl_flags) != SYSCTL_VERSION) {
1580 1.190.2.2 yamt printf("sysctl_mmap: rnode %p wrong version\n", rnode);
1581 1.190.2.2 yamt return (EINVAL);
1582 1.190.2.2 yamt }
1583 1.190.2.2 yamt
1584 1.190.2.2 yamt /*
1585 1.190.2.2 yamt * let's just pretend that didn't happen, m'kay?
1586 1.190.2.2 yamt */
1587 1.190.2.2 yamt if (l == NULL)
1588 1.190.2.2 yamt return (EPERM);
1589 1.190.2.2 yamt
1590 1.190.2.2 yamt /*
1591 1.190.2.2 yamt * is this a sysctlnode description of an mmap request?
1592 1.190.2.2 yamt */
1593 1.190.2.2 yamt if (newp == NULL || newlen != sizeof(struct sysctlnode))
1594 1.190.2.2 yamt return (EINVAL);
1595 1.190.2.2 yamt error = sysctl_copyin(l, newp, &nnode, sizeof(nnode));
1596 1.190.2.2 yamt if (error)
1597 1.190.2.2 yamt return (error);
1598 1.190.2.2 yamt
1599 1.190.2.2 yamt /*
1600 1.190.2.2 yamt * does the node they asked for exist?
1601 1.190.2.2 yamt */
1602 1.190.2.2 yamt if (namelen != 1)
1603 1.190.2.2 yamt return (EOPNOTSUPP);
1604 1.190.2.2 yamt node = rnode;
1605 1.190.2.2 yamt error = sysctl_locate(l, &nnode.sysctl_num, 1, &node, NULL);
1606 1.190.2.2 yamt if (error)
1607 1.190.2.2 yamt return (error);
1608 1.190.2.2 yamt
1609 1.190.2.2 yamt /*
1610 1.190.2.2 yamt * does this node that we have found purport to handle mmap?
1611 1.190.2.2 yamt */
1612 1.190.2.2 yamt if (node->sysctl_func == NULL ||
1613 1.190.2.2 yamt !(node->sysctl_flags & CTLFLAG_MMAP))
1614 1.190.2.2 yamt return (EOPNOTSUPP);
1615 1.190.2.2 yamt
1616 1.190.2.2 yamt /*
1617 1.190.2.2 yamt * well...okay, they asked for it.
1618 1.190.2.2 yamt */
1619 1.190.2.2 yamt return ((*node->sysctl_func)(SYSCTLFN_CALL(node)));
1620 1.190.2.2 yamt }
1621 1.190.2.2 yamt
1622 1.190.2.2 yamt int
1623 1.190.2.2 yamt sysctl_describe(SYSCTLFN_ARGS)
1624 1.190.2.2 yamt {
1625 1.190.2.2 yamt struct sysctldesc *d;
1626 1.190.2.2 yamt char bf[1024];
1627 1.190.2.2 yamt size_t sz, left, tot;
1628 1.190.2.2 yamt int i, error, v = -1;
1629 1.190.2.2 yamt struct sysctlnode *node;
1630 1.190.2.2 yamt struct sysctlnode dnode;
1631 1.190.2.2 yamt
1632 1.190.2.2 yamt if (SYSCTL_VERS(rnode->sysctl_flags) != SYSCTL_VERSION) {
1633 1.190.2.2 yamt printf("sysctl_query: rnode %p wrong version\n", rnode);
1634 1.190.2.2 yamt return (EINVAL);
1635 1.190.2.2 yamt }
1636 1.190.2.2 yamt
1637 1.190.2.2 yamt if (SYSCTL_TYPE(rnode->sysctl_flags) != CTLTYPE_NODE)
1638 1.190.2.2 yamt return (ENOTDIR);
1639 1.190.2.2 yamt if (namelen != 1 || name[0] != CTL_DESCRIBE)
1640 1.190.2.2 yamt return (EINVAL);
1641 1.190.2.2 yamt
1642 1.190.2.2 yamt /*
1643 1.190.2.2 yamt * get ready...
1644 1.190.2.2 yamt */
1645 1.190.2.2 yamt error = 0;
1646 1.190.2.2 yamt d = (void*)bf;
1647 1.190.2.2 yamt tot = 0;
1648 1.190.2.2 yamt node = rnode->sysctl_child;
1649 1.190.2.2 yamt left = *oldlenp;
1650 1.190.2.2 yamt
1651 1.190.2.2 yamt /*
1652 1.190.2.2 yamt * no request -> all descriptions at this level
1653 1.190.2.2 yamt * request with desc unset -> just this node
1654 1.190.2.2 yamt * request with desc set -> set descr for this node
1655 1.190.2.2 yamt */
1656 1.190.2.2 yamt if (newp != NULL) {
1657 1.190.2.2 yamt error = sysctl_cvt_in(l, &v, newp, newlen, &dnode);
1658 1.190.2.2 yamt if (error)
1659 1.190.2.2 yamt return (error);
1660 1.190.2.2 yamt if (dnode.sysctl_desc != NULL) {
1661 1.190.2.2 yamt /*
1662 1.190.2.2 yamt * processes cannot set descriptions above
1663 1.190.2.2 yamt * securelevel 0. and must be root. blah
1664 1.190.2.2 yamt * blah blah. a couple more checks are made
1665 1.190.2.2 yamt * once we find the node we want.
1666 1.190.2.2 yamt */
1667 1.190.2.2 yamt if (l != NULL) {
1668 1.190.2.2 yamt #ifndef SYSCTL_DISALLOW_CREATE
1669 1.190.2.2 yamt if (securelevel > 0)
1670 1.190.2.2 yamt return (EPERM);
1671 1.190.2.4 yamt error = kauth_authorize_generic(l->l_proc->p_cred,
1672 1.190.2.4 yamt KAUTH_GENERIC_ISSUSER,
1673 1.190.2.2 yamt &l->l_proc->p_acflag);
1674 1.190.2.2 yamt if (error)
1675 1.190.2.2 yamt return (error);
1676 1.190.2.2 yamt #else /* SYSCTL_DISALLOW_CREATE */
1677 1.190.2.2 yamt return (EPERM);
1678 1.190.2.2 yamt #endif /* SYSCTL_DISALLOW_CREATE */
1679 1.190.2.2 yamt }
1680 1.190.2.2 yamt
1681 1.190.2.2 yamt /*
1682 1.190.2.2 yamt * find node and try to set the description on it
1683 1.190.2.2 yamt */
1684 1.190.2.2 yamt for (i = 0; i < rnode->sysctl_clen; i++)
1685 1.190.2.2 yamt if (node[i].sysctl_num == dnode.sysctl_num)
1686 1.190.2.2 yamt break;
1687 1.190.2.2 yamt if (i == rnode->sysctl_clen)
1688 1.190.2.2 yamt return (ENOENT);
1689 1.190.2.2 yamt node = &node[i];
1690 1.190.2.2 yamt
1691 1.190.2.2 yamt /*
1692 1.190.2.2 yamt * did the caller specify a node version?
1693 1.190.2.2 yamt */
1694 1.190.2.2 yamt if (dnode.sysctl_ver != 0 &&
1695 1.190.2.2 yamt dnode.sysctl_ver != node->sysctl_ver)
1696 1.190.2.2 yamt return (EINVAL);
1697 1.190.2.2 yamt
1698 1.190.2.2 yamt /*
1699 1.190.2.2 yamt * okay...some rules:
1700 1.190.2.2 yamt * (1) if setup is done and the tree is
1701 1.190.2.2 yamt * read-only or the whole system is
1702 1.190.2.2 yamt * read-only
1703 1.190.2.2 yamt * (2) no one can set a description on a
1704 1.190.2.2 yamt * permanent node (it must be set when
1705 1.190.2.2 yamt * using createv)
1706 1.190.2.2 yamt * (3) processes cannot *change* a description
1707 1.190.2.2 yamt * (4) processes *can*, however, set a
1708 1.190.2.2 yamt * description on a read-only node so that
1709 1.190.2.2 yamt * one can be created and then described
1710 1.190.2.2 yamt * in two steps
1711 1.190.2.2 yamt * anything else come to mind?
1712 1.190.2.2 yamt */
1713 1.190.2.2 yamt if ((sysctl_root.sysctl_flags & CTLFLAG_PERMANENT) &&
1714 1.190.2.2 yamt (!(sysctl_rootof(node)->sysctl_flags &
1715 1.190.2.2 yamt CTLFLAG_READWRITE) ||
1716 1.190.2.2 yamt !(sysctl_root.sysctl_flags & CTLFLAG_READWRITE)))
1717 1.190.2.2 yamt return (EPERM);
1718 1.190.2.2 yamt if (node->sysctl_flags & CTLFLAG_PERMANENT)
1719 1.190.2.2 yamt return (EPERM);
1720 1.190.2.2 yamt if (l != NULL && node->sysctl_desc != NULL)
1721 1.190.2.2 yamt return (EPERM);
1722 1.190.2.2 yamt
1723 1.190.2.2 yamt /*
1724 1.190.2.2 yamt * right, let's go ahead. the first step is
1725 1.190.2.2 yamt * making the description into something the
1726 1.190.2.2 yamt * node can "own", if need be.
1727 1.190.2.2 yamt */
1728 1.190.2.2 yamt if (l != NULL ||
1729 1.190.2.2 yamt dnode.sysctl_flags & CTLFLAG_OWNDESC) {
1730 1.190.2.2 yamt char *nd, k[1024];
1731 1.190.2.2 yamt
1732 1.190.2.2 yamt error = sysctl_copyinstr(l, dnode.sysctl_desc,
1733 1.190.2.2 yamt &k[0], sizeof(k), &sz);
1734 1.190.2.2 yamt if (error)
1735 1.190.2.2 yamt return (error);
1736 1.190.2.2 yamt nd = malloc(sz, M_SYSCTLDATA,
1737 1.190.2.2 yamt M_WAITOK|M_CANFAIL);
1738 1.190.2.2 yamt if (nd == NULL)
1739 1.190.2.2 yamt return (ENOMEM);
1740 1.190.2.2 yamt memcpy(nd, k, sz);
1741 1.190.2.2 yamt dnode.sysctl_flags |= CTLFLAG_OWNDESC;
1742 1.190.2.2 yamt dnode.sysctl_desc = nd;
1743 1.190.2.2 yamt }
1744 1.190.2.2 yamt
1745 1.190.2.2 yamt /*
1746 1.190.2.2 yamt * now "release" the old description and
1747 1.190.2.2 yamt * attach the new one. ta-da.
1748 1.190.2.2 yamt */
1749 1.190.2.2 yamt if ((node->sysctl_flags & CTLFLAG_OWNDESC) &&
1750 1.190.2.2 yamt node->sysctl_desc != NULL)
1751 1.190.2.2 yamt /*XXXUNCONST*/
1752 1.190.2.2 yamt free(__UNCONST(node->sysctl_desc), M_SYSCTLDATA);
1753 1.190.2.2 yamt node->sysctl_desc = dnode.sysctl_desc;
1754 1.190.2.2 yamt node->sysctl_flags |=
1755 1.190.2.2 yamt (dnode.sysctl_flags & CTLFLAG_OWNDESC);
1756 1.190.2.2 yamt
1757 1.190.2.2 yamt /*
1758 1.190.2.2 yamt * now we "fall out" and into the loop which
1759 1.190.2.2 yamt * will copy the new description back out for
1760 1.190.2.2 yamt * those interested parties
1761 1.190.2.2 yamt */
1762 1.190.2.2 yamt }
1763 1.190.2.2 yamt }
1764 1.190.2.2 yamt
1765 1.190.2.2 yamt /*
1766 1.190.2.2 yamt * scan for one description or just retrieve all descriptions
1767 1.190.2.2 yamt */
1768 1.190.2.2 yamt for (i = 0; i < rnode->sysctl_clen; i++) {
1769 1.190.2.2 yamt /*
1770 1.190.2.2 yamt * did they ask for the description of only one node?
1771 1.190.2.2 yamt */
1772 1.190.2.2 yamt if (v != -1 && node[i].sysctl_num != dnode.sysctl_num)
1773 1.190.2.2 yamt continue;
1774 1.190.2.2 yamt
1775 1.190.2.2 yamt /*
1776 1.190.2.2 yamt * don't describe "private" nodes to non-suser users
1777 1.190.2.2 yamt */
1778 1.190.2.2 yamt if ((node[i].sysctl_flags & CTLFLAG_PRIVATE) && (l != NULL) &&
1779 1.190.2.4 yamt !(kauth_authorize_generic(l->l_proc->p_cred,
1780 1.190.2.4 yamt KAUTH_GENERIC_ISSUSER, &l->l_proc->p_acflag)))
1781 1.190.2.2 yamt continue;
1782 1.190.2.2 yamt
1783 1.190.2.2 yamt /*
1784 1.190.2.2 yamt * is this description "valid"?
1785 1.190.2.2 yamt */
1786 1.190.2.2 yamt memset(bf, 0, sizeof(bf));
1787 1.190.2.2 yamt if (node[i].sysctl_desc == NULL)
1788 1.190.2.2 yamt sz = 1;
1789 1.190.2.2 yamt else if (copystr(node[i].sysctl_desc, &d->descr_str[0],
1790 1.190.2.2 yamt sizeof(bf) - sizeof(*d), &sz) != 0) {
1791 1.190.2.2 yamt /*
1792 1.190.2.2 yamt * erase possible partial description
1793 1.190.2.2 yamt */
1794 1.190.2.2 yamt memset(bf, 0, sizeof(bf));
1795 1.190.2.2 yamt sz = 1;
1796 1.190.2.2 yamt }
1797 1.190.2.2 yamt
1798 1.190.2.2 yamt /*
1799 1.190.2.2 yamt * we've got it, stuff it into the caller's buffer
1800 1.190.2.2 yamt */
1801 1.190.2.2 yamt d->descr_num = node[i].sysctl_num;
1802 1.190.2.2 yamt d->descr_ver = node[i].sysctl_ver;
1803 1.190.2.2 yamt d->descr_len = sz; /* includes trailing nul */
1804 1.190.2.2 yamt sz = (caddr_t)NEXT_DESCR(d) - (caddr_t)d;
1805 1.190.2.2 yamt if (oldp != NULL && left >= sz) {
1806 1.190.2.2 yamt error = sysctl_copyout(l, d, oldp, sz);
1807 1.190.2.2 yamt if (error)
1808 1.190.2.2 yamt return (error);
1809 1.190.2.2 yamt left -= sz;
1810 1.190.2.2 yamt oldp = (void *)__sysc_desc_adv(oldp, d->descr_len);
1811 1.190.2.2 yamt }
1812 1.190.2.2 yamt tot += sz;
1813 1.190.2.2 yamt
1814 1.190.2.2 yamt /*
1815 1.190.2.2 yamt * if we get this far with v not "unset", they asked
1816 1.190.2.2 yamt * for a specific node and we found it
1817 1.190.2.2 yamt */
1818 1.190.2.2 yamt if (v != -1)
1819 1.190.2.2 yamt break;
1820 1.190.2.2 yamt }
1821 1.190.2.2 yamt
1822 1.190.2.2 yamt /*
1823 1.190.2.2 yamt * did we find it after all?
1824 1.190.2.2 yamt */
1825 1.190.2.2 yamt if (v != -1 && tot == 0)
1826 1.190.2.2 yamt error = ENOENT;
1827 1.190.2.2 yamt else
1828 1.190.2.2 yamt *oldlenp = tot;
1829 1.190.2.2 yamt
1830 1.190.2.2 yamt return (error);
1831 1.190.2.2 yamt }
1832 1.190.2.2 yamt
1833 1.190.2.2 yamt /*
1834 1.190.2.2 yamt * ********************************************************************
1835 1.190.2.2 yamt * Section 3: Create and destroy from inside the kernel
1836 1.190.2.2 yamt * ********************************************************************
1837 1.190.2.2 yamt * sysctl_createv() and sysctl_destroyv() are simpler-to-use
1838 1.190.2.2 yamt * interfaces for the kernel to fling new entries into the mib and rip
1839 1.190.2.2 yamt * them out later. In the case of sysctl_createv(), the returned copy
1840 1.190.2.2 yamt * of the node (see sysctl_create()) will be translated back into a
1841 1.190.2.2 yamt * pointer to the actual node.
1842 1.190.2.2 yamt *
1843 1.190.2.2 yamt * Note that sysctl_createv() will return 0 if the create request
1844 1.190.2.2 yamt * matches an existing node (ala mkdir -p), and that sysctl_destroyv()
1845 1.190.2.2 yamt * will return 0 if the node to be destroyed already does not exist
1846 1.190.2.2 yamt * (aka rm -f) or if it is a parent of other nodes.
1847 1.190.2.2 yamt *
1848 1.190.2.2 yamt * This allows two (or more) different subsystems to assert sub-tree
1849 1.190.2.2 yamt * existence before populating their own nodes, and to remove their
1850 1.190.2.2 yamt * own nodes without orphaning the others when they are done.
1851 1.190.2.2 yamt * ********************************************************************
1852 1.190.2.2 yamt */
1853 1.190.2.2 yamt int
1854 1.190.2.2 yamt sysctl_createv(struct sysctllog **log, int cflags,
1855 1.190.2.2 yamt const struct sysctlnode **rnode, const struct sysctlnode **cnode,
1856 1.190.2.2 yamt int flags, int type, const char *namep, const char *descr,
1857 1.190.2.2 yamt sysctlfn func, u_quad_t qv, void *newp, size_t newlen,
1858 1.190.2.2 yamt ...)
1859 1.190.2.2 yamt {
1860 1.190.2.2 yamt va_list ap;
1861 1.190.2.2 yamt int error, ni, namelen, name[CTL_MAXNAME];
1862 1.190.2.2 yamt const struct sysctlnode *root, *pnode;
1863 1.190.2.2 yamt struct sysctlnode nnode, onode, *dnode;
1864 1.190.2.2 yamt size_t sz;
1865 1.190.2.2 yamt
1866 1.190.2.2 yamt /*
1867 1.190.2.2 yamt * where are we putting this?
1868 1.190.2.2 yamt */
1869 1.190.2.2 yamt if (rnode != NULL && *rnode == NULL) {
1870 1.190.2.2 yamt printf("sysctl_createv: rnode NULL\n");
1871 1.190.2.2 yamt return (EINVAL);
1872 1.190.2.2 yamt }
1873 1.190.2.2 yamt root = rnode ? *rnode : NULL;
1874 1.190.2.2 yamt if (cnode != NULL)
1875 1.190.2.2 yamt *cnode = NULL;
1876 1.190.2.2 yamt if (cflags != 0)
1877 1.190.2.2 yamt return (EINVAL);
1878 1.190.2.2 yamt
1879 1.190.2.2 yamt /*
1880 1.190.2.2 yamt * what is it?
1881 1.190.2.2 yamt */
1882 1.190.2.2 yamt flags = SYSCTL_VERSION|SYSCTL_TYPE(type)|SYSCTL_FLAGS(flags);
1883 1.190.2.2 yamt if (log != NULL)
1884 1.190.2.2 yamt flags &= ~CTLFLAG_PERMANENT;
1885 1.190.2.2 yamt
1886 1.190.2.2 yamt /*
1887 1.190.2.2 yamt * where do we put it?
1888 1.190.2.2 yamt */
1889 1.190.2.2 yamt va_start(ap, newlen);
1890 1.190.2.2 yamt namelen = 0;
1891 1.190.2.2 yamt ni = -1;
1892 1.190.2.2 yamt do {
1893 1.190.2.2 yamt if (++ni == CTL_MAXNAME)
1894 1.190.2.2 yamt return (ENAMETOOLONG);
1895 1.190.2.2 yamt name[ni] = va_arg(ap, int);
1896 1.190.2.2 yamt /*
1897 1.190.2.2 yamt * sorry, this is not supported from here
1898 1.190.2.2 yamt */
1899 1.190.2.2 yamt if (name[ni] == CTL_CREATESYM)
1900 1.190.2.2 yamt return (EINVAL);
1901 1.190.2.2 yamt } while (name[ni] != CTL_EOL && name[ni] != CTL_CREATE);
1902 1.190.2.2 yamt namelen = ni + (name[ni] == CTL_CREATE ? 1 : 0);
1903 1.190.2.2 yamt va_end(ap);
1904 1.190.2.2 yamt
1905 1.190.2.2 yamt /*
1906 1.190.2.2 yamt * what's it called
1907 1.190.2.2 yamt */
1908 1.190.2.2 yamt if (strlcpy(nnode.sysctl_name, namep, sizeof(nnode.sysctl_name)) >=
1909 1.190.2.2 yamt sizeof(nnode.sysctl_name))
1910 1.190.2.2 yamt return (ENAMETOOLONG);
1911 1.190.2.2 yamt
1912 1.190.2.2 yamt /*
1913 1.190.2.2 yamt * cons up the description of the new node
1914 1.190.2.2 yamt */
1915 1.190.2.2 yamt nnode.sysctl_num = name[namelen - 1];
1916 1.190.2.2 yamt name[namelen - 1] = CTL_CREATE;
1917 1.190.2.2 yamt nnode.sysctl_size = newlen;
1918 1.190.2.2 yamt nnode.sysctl_flags = flags;
1919 1.190.2.2 yamt if (type == CTLTYPE_NODE) {
1920 1.190.2.2 yamt nnode.sysctl_csize = 0;
1921 1.190.2.2 yamt nnode.sysctl_clen = 0;
1922 1.190.2.2 yamt nnode.sysctl_child = NULL;
1923 1.190.2.2 yamt if (flags & CTLFLAG_ALIAS)
1924 1.190.2.2 yamt nnode.sysctl_alias = qv;
1925 1.190.2.2 yamt } else if (flags & CTLFLAG_IMMEDIATE) {
1926 1.190.2.2 yamt switch (type) {
1927 1.190.2.2 yamt case CTLTYPE_INT:
1928 1.190.2.2 yamt nnode.sysctl_idata = qv;
1929 1.190.2.2 yamt break;
1930 1.190.2.2 yamt case CTLTYPE_QUAD:
1931 1.190.2.2 yamt nnode.sysctl_qdata = qv;
1932 1.190.2.2 yamt break;
1933 1.190.2.2 yamt default:
1934 1.190.2.2 yamt return (EINVAL);
1935 1.190.2.2 yamt }
1936 1.190.2.2 yamt } else {
1937 1.190.2.2 yamt nnode.sysctl_data = newp;
1938 1.190.2.2 yamt }
1939 1.190.2.2 yamt nnode.sysctl_func = func;
1940 1.190.2.2 yamt nnode.sysctl_parent = NULL;
1941 1.190.2.2 yamt nnode.sysctl_ver = 0;
1942 1.190.2.2 yamt
1943 1.190.2.2 yamt /*
1944 1.190.2.2 yamt * initialize lock state -- we need locks if the main tree has
1945 1.190.2.2 yamt * been marked as complete, but since we could be called from
1946 1.190.2.2 yamt * either there, or from a device driver (say, at device
1947 1.190.2.2 yamt * insertion), or from an lkm (at lkm load time, say), we
1948 1.190.2.2 yamt * don't really want to "wait"...
1949 1.190.2.2 yamt */
1950 1.190.2.2 yamt error = sysctl_lock(NULL, NULL, 0);
1951 1.190.2.2 yamt if (error)
1952 1.190.2.2 yamt return (error);
1953 1.190.2.2 yamt
1954 1.190.2.2 yamt /*
1955 1.190.2.2 yamt * locate the prospective parent of the new node, and if we
1956 1.190.2.2 yamt * find it, add the new node.
1957 1.190.2.2 yamt */
1958 1.190.2.2 yamt sz = sizeof(onode);
1959 1.190.2.2 yamt pnode = root;
1960 1.190.2.2 yamt error = sysctl_locate(NULL, &name[0], namelen - 1, &pnode, &ni);
1961 1.190.2.2 yamt if (error) {
1962 1.190.2.2 yamt printf("sysctl_createv: sysctl_locate(%s) returned %d\n",
1963 1.190.2.2 yamt nnode.sysctl_name, error);
1964 1.190.2.2 yamt sysctl_unlock(NULL);
1965 1.190.2.2 yamt return (error);
1966 1.190.2.2 yamt }
1967 1.190.2.2 yamt error = sysctl_create(&name[ni], namelen - ni, &onode, &sz,
1968 1.190.2.2 yamt &nnode, sizeof(nnode), &name[0], NULL,
1969 1.190.2.2 yamt pnode);
1970 1.190.2.2 yamt
1971 1.190.2.2 yamt /*
1972 1.190.2.2 yamt * unfortunately the node we wanted to create is already
1973 1.190.2.2 yamt * there. if the node that's already there is a reasonable
1974 1.190.2.2 yamt * facsimile of the node we wanted to create, just pretend
1975 1.190.2.2 yamt * (for the caller's benefit) that we managed to create the
1976 1.190.2.2 yamt * node they wanted.
1977 1.190.2.2 yamt */
1978 1.190.2.2 yamt if (error == EEXIST) {
1979 1.190.2.2 yamt /* name is the same as requested... */
1980 1.190.2.2 yamt if (strcmp(nnode.sysctl_name, onode.sysctl_name) == 0 &&
1981 1.190.2.2 yamt /* they want the same function... */
1982 1.190.2.2 yamt nnode.sysctl_func == onode.sysctl_func &&
1983 1.190.2.2 yamt /* number is the same as requested, or... */
1984 1.190.2.2 yamt (nnode.sysctl_num == onode.sysctl_num ||
1985 1.190.2.2 yamt /* they didn't pick a number... */
1986 1.190.2.2 yamt nnode.sysctl_num == CTL_CREATE)) {
1987 1.190.2.2 yamt /*
1988 1.190.2.2 yamt * collision here from trying to create
1989 1.190.2.2 yamt * something that already existed; let's give
1990 1.190.2.2 yamt * our customers a hand and tell them they got
1991 1.190.2.2 yamt * what they wanted.
1992 1.190.2.2 yamt */
1993 1.190.2.2 yamt #ifdef SYSCTL_DEBUG_CREATE
1994 1.190.2.2 yamt printf("cleared\n");
1995 1.190.2.2 yamt #endif /* SYSCTL_DEBUG_CREATE */
1996 1.190.2.2 yamt error = 0;
1997 1.190.2.2 yamt }
1998 1.190.2.2 yamt }
1999 1.190.2.2 yamt
2000 1.190.2.2 yamt if (error == 0 &&
2001 1.190.2.2 yamt (cnode != NULL || log != NULL || descr != NULL)) {
2002 1.190.2.2 yamt /*
2003 1.190.2.2 yamt * sysctl_create() gave us back a copy of the node,
2004 1.190.2.2 yamt * but we need to know where it actually is...
2005 1.190.2.2 yamt */
2006 1.190.2.2 yamt pnode = root;
2007 1.190.2.2 yamt error = sysctl_locate(NULL, &name[0], namelen - 1, &pnode, &ni);
2008 1.190.2.2 yamt
2009 1.190.2.2 yamt /*
2010 1.190.2.2 yamt * manual scan of last layer so that aliased nodes
2011 1.190.2.2 yamt * aren't followed.
2012 1.190.2.2 yamt */
2013 1.190.2.2 yamt if (error == 0) {
2014 1.190.2.2 yamt for (ni = 0; ni < pnode->sysctl_clen; ni++)
2015 1.190.2.2 yamt if (pnode->sysctl_child[ni].sysctl_num ==
2016 1.190.2.2 yamt onode.sysctl_num)
2017 1.190.2.2 yamt break;
2018 1.190.2.2 yamt if (ni < pnode->sysctl_clen)
2019 1.190.2.2 yamt pnode = &pnode->sysctl_child[ni];
2020 1.190.2.2 yamt else
2021 1.190.2.2 yamt error = ENOENT;
2022 1.190.2.2 yamt }
2023 1.190.2.2 yamt
2024 1.190.2.2 yamt /*
2025 1.190.2.2 yamt * not expecting an error here, but...
2026 1.190.2.2 yamt */
2027 1.190.2.2 yamt if (error == 0) {
2028 1.190.2.2 yamt if (log != NULL)
2029 1.190.2.2 yamt sysctl_log_add(log, pnode);
2030 1.190.2.2 yamt if (cnode != NULL)
2031 1.190.2.2 yamt *cnode = pnode;
2032 1.190.2.2 yamt if (descr != NULL) {
2033 1.190.2.2 yamt /*
2034 1.190.2.2 yamt * allow first caller to *set* a
2035 1.190.2.2 yamt * description actually to set it
2036 1.190.2.2 yamt *
2037 1.190.2.2 yamt * discard const here so we can attach
2038 1.190.2.2 yamt * the description
2039 1.190.2.2 yamt */
2040 1.190.2.2 yamt dnode = __UNCONST(pnode);
2041 1.190.2.2 yamt if (pnode->sysctl_desc != NULL)
2042 1.190.2.2 yamt /* skip it...we've got one */;
2043 1.190.2.2 yamt else if (flags & CTLFLAG_OWNDESC) {
2044 1.190.2.2 yamt size_t l = strlen(descr) + 1;
2045 1.190.2.2 yamt char *d = malloc(l, M_SYSCTLDATA,
2046 1.190.2.2 yamt M_WAITOK|M_CANFAIL);
2047 1.190.2.2 yamt if (d != NULL) {
2048 1.190.2.2 yamt memcpy(d, descr, l);
2049 1.190.2.2 yamt dnode->sysctl_desc = d;
2050 1.190.2.2 yamt dnode->sysctl_flags |=
2051 1.190.2.2 yamt CTLFLAG_OWNDESC;
2052 1.190.2.2 yamt }
2053 1.190.2.2 yamt } else
2054 1.190.2.2 yamt dnode->sysctl_desc = descr;
2055 1.190.2.2 yamt }
2056 1.190.2.2 yamt } else {
2057 1.190.2.2 yamt printf("sysctl_create succeeded but node not found?!\n");
2058 1.190.2.2 yamt /*
2059 1.190.2.2 yamt * confusing, but the create said it
2060 1.190.2.2 yamt * succeeded, so...
2061 1.190.2.2 yamt */
2062 1.190.2.2 yamt error = 0;
2063 1.190.2.2 yamt }
2064 1.190.2.2 yamt }
2065 1.190.2.2 yamt
2066 1.190.2.2 yamt /*
2067 1.190.2.2 yamt * now it should be safe to release the lock state. note that
2068 1.190.2.2 yamt * the pointer to the newly created node being passed back may
2069 1.190.2.2 yamt * not be "good" for very long.
2070 1.190.2.2 yamt */
2071 1.190.2.2 yamt sysctl_unlock(NULL);
2072 1.190.2.2 yamt
2073 1.190.2.2 yamt if (error != 0) {
2074 1.190.2.2 yamt printf("sysctl_createv: sysctl_create(%s) returned %d\n",
2075 1.190.2.2 yamt nnode.sysctl_name, error);
2076 1.190.2.2 yamt #if 0
2077 1.190.2.2 yamt if (error != ENOENT)
2078 1.190.2.2 yamt sysctl_dump(&onode);
2079 1.190.2.2 yamt #endif
2080 1.190.2.2 yamt }
2081 1.190.2.2 yamt
2082 1.190.2.2 yamt return (error);
2083 1.190.2.2 yamt }
2084 1.190.2.2 yamt
2085 1.190.2.2 yamt int
2086 1.190.2.2 yamt sysctl_destroyv(struct sysctlnode *rnode, ...)
2087 1.190.2.2 yamt {
2088 1.190.2.2 yamt va_list ap;
2089 1.190.2.2 yamt int error, name[CTL_MAXNAME], namelen, ni;
2090 1.190.2.2 yamt const struct sysctlnode *pnode, *node;
2091 1.190.2.2 yamt struct sysctlnode dnode, *onode;
2092 1.190.2.2 yamt size_t sz;
2093 1.190.2.2 yamt
2094 1.190.2.2 yamt va_start(ap, rnode);
2095 1.190.2.2 yamt namelen = 0;
2096 1.190.2.2 yamt ni = 0;
2097 1.190.2.2 yamt do {
2098 1.190.2.2 yamt if (ni == CTL_MAXNAME)
2099 1.190.2.2 yamt return (ENAMETOOLONG);
2100 1.190.2.2 yamt name[ni] = va_arg(ap, int);
2101 1.190.2.2 yamt } while (name[ni++] != CTL_EOL);
2102 1.190.2.2 yamt namelen = ni - 1;
2103 1.190.2.2 yamt va_end(ap);
2104 1.190.2.2 yamt
2105 1.190.2.2 yamt /*
2106 1.190.2.2 yamt * i can't imagine why we'd be destroying a node when the tree
2107 1.190.2.2 yamt * wasn't complete, but who knows?
2108 1.190.2.2 yamt */
2109 1.190.2.2 yamt error = sysctl_lock(NULL, NULL, 0);
2110 1.190.2.2 yamt if (error)
2111 1.190.2.2 yamt return (error);
2112 1.190.2.2 yamt
2113 1.190.2.2 yamt /*
2114 1.190.2.2 yamt * where is it?
2115 1.190.2.2 yamt */
2116 1.190.2.2 yamt node = rnode;
2117 1.190.2.2 yamt error = sysctl_locate(NULL, &name[0], namelen - 1, &node, &ni);
2118 1.190.2.2 yamt if (error) {
2119 1.190.2.2 yamt /* they want it gone and it's not there, so... */
2120 1.190.2.2 yamt sysctl_unlock(NULL);
2121 1.190.2.2 yamt return (error == ENOENT ? 0 : error);
2122 1.190.2.2 yamt }
2123 1.190.2.2 yamt
2124 1.190.2.2 yamt /*
2125 1.190.2.2 yamt * set up the deletion
2126 1.190.2.2 yamt */
2127 1.190.2.2 yamt pnode = node;
2128 1.190.2.2 yamt node = &dnode;
2129 1.190.2.2 yamt memset(&dnode, 0, sizeof(dnode));
2130 1.190.2.2 yamt dnode.sysctl_flags = SYSCTL_VERSION;
2131 1.190.2.2 yamt dnode.sysctl_num = name[namelen - 1];
2132 1.190.2.2 yamt
2133 1.190.2.2 yamt /*
2134 1.190.2.2 yamt * we found it, now let's nuke it
2135 1.190.2.2 yamt */
2136 1.190.2.2 yamt name[namelen - 1] = CTL_DESTROY;
2137 1.190.2.2 yamt sz = 0;
2138 1.190.2.2 yamt error = sysctl_destroy(&name[namelen - 1], 1, NULL, &sz,
2139 1.190.2.2 yamt node, sizeof(*node), &name[0], NULL,
2140 1.190.2.2 yamt pnode);
2141 1.190.2.2 yamt if (error == ENOTEMPTY) {
2142 1.190.2.2 yamt /*
2143 1.190.2.2 yamt * think of trying to delete "foo" when "foo.bar"
2144 1.190.2.2 yamt * (which someone else put there) is still in
2145 1.190.2.2 yamt * existence
2146 1.190.2.2 yamt */
2147 1.190.2.2 yamt error = 0;
2148 1.190.2.2 yamt
2149 1.190.2.2 yamt /*
2150 1.190.2.2 yamt * dunno who put the description there, but if this
2151 1.190.2.2 yamt * node can ever be removed, we need to make sure the
2152 1.190.2.2 yamt * string doesn't go out of context. that means we
2153 1.190.2.2 yamt * need to find the node that's still there (don't use
2154 1.190.2.2 yamt * sysctl_locate() because that follows aliasing).
2155 1.190.2.2 yamt */
2156 1.190.2.2 yamt node = pnode->sysctl_child;
2157 1.190.2.2 yamt for (ni = 0; ni < pnode->sysctl_clen; ni++)
2158 1.190.2.2 yamt if (node[ni].sysctl_num == dnode.sysctl_num)
2159 1.190.2.2 yamt break;
2160 1.190.2.2 yamt node = (ni < pnode->sysctl_clen) ? &node[ni] : NULL;
2161 1.190.2.2 yamt
2162 1.190.2.2 yamt /*
2163 1.190.2.2 yamt * if we found it, and this node has a description,
2164 1.190.2.2 yamt * and this node can be released, and it doesn't
2165 1.190.2.2 yamt * already own its own description...sigh. :)
2166 1.190.2.2 yamt */
2167 1.190.2.2 yamt if (node != NULL && node->sysctl_desc != NULL &&
2168 1.190.2.2 yamt !(node->sysctl_flags & CTLFLAG_PERMANENT) &&
2169 1.190.2.2 yamt !(node->sysctl_flags & CTLFLAG_OWNDESC)) {
2170 1.190.2.2 yamt char *d;
2171 1.190.2.2 yamt
2172 1.190.2.2 yamt sz = strlen(node->sysctl_desc) + 1;
2173 1.190.2.2 yamt d = malloc(sz, M_SYSCTLDATA, M_WAITOK|M_CANFAIL);
2174 1.190.2.2 yamt if (d != NULL) {
2175 1.190.2.2 yamt /*
2176 1.190.2.2 yamt * discard const so that we can
2177 1.190.2.2 yamt * re-attach the description
2178 1.190.2.2 yamt */
2179 1.190.2.2 yamt memcpy(d, node->sysctl_desc, sz);
2180 1.190.2.2 yamt onode = __UNCONST(node);
2181 1.190.2.2 yamt onode->sysctl_desc = d;
2182 1.190.2.2 yamt onode->sysctl_flags |= CTLFLAG_OWNDESC;
2183 1.190.2.2 yamt } else {
2184 1.190.2.2 yamt /*
2185 1.190.2.2 yamt * XXX drop the description? be
2186 1.190.2.2 yamt * afraid? don't care?
2187 1.190.2.2 yamt */
2188 1.190.2.2 yamt }
2189 1.190.2.2 yamt }
2190 1.190.2.2 yamt }
2191 1.190.2.2 yamt
2192 1.190.2.2 yamt sysctl_unlock(NULL);
2193 1.190.2.2 yamt
2194 1.190.2.2 yamt return (error);
2195 1.190.2.2 yamt }
2196 1.190.2.2 yamt
2197 1.190.2.2 yamt #if 0
2198 1.190.2.2 yamt /*
2199 1.190.2.2 yamt * ********************************************************************
2200 1.190.2.2 yamt * the dump routine. i haven't yet decided how (if at all) i'll call
2201 1.190.2.2 yamt * this from userland when it's in the kernel.
2202 1.190.2.2 yamt * ********************************************************************
2203 1.190.2.2 yamt */
2204 1.190.2.2 yamt static const char *
2205 1.190.2.2 yamt sf(int f)
2206 1.190.2.2 yamt {
2207 1.190.2.2 yamt static char s[256];
2208 1.190.2.2 yamt char *c;
2209 1.190.2.2 yamt
2210 1.190.2.2 yamt s[0] = '\0';
2211 1.190.2.2 yamt c = "";
2212 1.190.2.2 yamt
2213 1.190.2.2 yamt #define print_flag(_f, _s, _c, _q, _x) \
2214 1.190.2.2 yamt if (((_f) & (__CONCAT(CTLFLAG_,_x))) == (__CONCAT(CTLFLAG_,_q))) { \
2215 1.190.2.2 yamt strlcat((_s), (_c), sizeof(_s)); \
2216 1.190.2.2 yamt strlcat((_s), __STRING(_q), sizeof(_s)); \
2217 1.190.2.2 yamt (_c) = ","; \
2218 1.190.2.2 yamt (_f) &= ~__CONCAT(CTLFLAG_,_x); \
2219 1.190.2.2 yamt }
2220 1.190.2.2 yamt
2221 1.190.2.2 yamt print_flag(f, s, c, READONLY, READWRITE);
2222 1.190.2.2 yamt print_flag(f, s, c, READONLY1, READWRITE);
2223 1.190.2.2 yamt print_flag(f, s, c, READONLY2, READWRITE);
2224 1.190.2.2 yamt print_flag(f, s, c, READWRITE, READWRITE);
2225 1.190.2.2 yamt print_flag(f, s, c, ANYWRITE, ANYWRITE);
2226 1.190.2.2 yamt print_flag(f, s, c, PRIVATE, PRIVATE);
2227 1.190.2.2 yamt print_flag(f, s, c, PERMANENT, PERMANENT);
2228 1.190.2.2 yamt print_flag(f, s, c, OWNDATA, OWNDATA);
2229 1.190.2.2 yamt print_flag(f, s, c, IMMEDIATE, IMMEDIATE);
2230 1.190.2.2 yamt print_flag(f, s, c, HEX, HEX);
2231 1.190.2.2 yamt print_flag(f, s, c, ROOT, ROOT);
2232 1.190.2.2 yamt print_flag(f, s, c, ANYNUMBER, ANYNUMBER);
2233 1.190.2.2 yamt print_flag(f, s, c, HIDDEN, HIDDEN);
2234 1.190.2.2 yamt print_flag(f, s, c, ALIAS, ALIAS);
2235 1.190.2.2 yamt #undef print_flag
2236 1.190.2.2 yamt
2237 1.190.2.2 yamt if (f) {
2238 1.190.2.2 yamt char foo[9];
2239 1.190.2.2 yamt snprintf(foo, sizeof(foo), "%x", f);
2240 1.190.2.2 yamt strlcat(s, c, sizeof(s));
2241 1.190.2.2 yamt strlcat(s, foo, sizeof(s));
2242 1.190.2.2 yamt }
2243 1.190.2.2 yamt
2244 1.190.2.2 yamt return (s);
2245 1.190.2.2 yamt }
2246 1.190.2.2 yamt
2247 1.190.2.2 yamt static const char *
2248 1.190.2.2 yamt st(int t)
2249 1.190.2.2 yamt {
2250 1.190.2.2 yamt
2251 1.190.2.2 yamt switch (t) {
2252 1.190.2.2 yamt case CTLTYPE_NODE:
2253 1.190.2.2 yamt return "NODE";
2254 1.190.2.2 yamt case CTLTYPE_INT:
2255 1.190.2.2 yamt return "INT";
2256 1.190.2.2 yamt case CTLTYPE_STRING:
2257 1.190.2.2 yamt return "STRING";
2258 1.190.2.2 yamt case CTLTYPE_QUAD:
2259 1.190.2.2 yamt return "QUAD";
2260 1.190.2.2 yamt case CTLTYPE_STRUCT:
2261 1.190.2.2 yamt return "STRUCT";
2262 1.190.2.2 yamt }
2263 1.190.2.2 yamt
2264 1.190.2.2 yamt return "???";
2265 1.190.2.2 yamt }
2266 1.190.2.2 yamt
2267 1.190.2.2 yamt void
2268 1.190.2.2 yamt sysctl_dump(const struct sysctlnode *d)
2269 1.190.2.2 yamt {
2270 1.190.2.2 yamt static char nmib[64], smib[256];
2271 1.190.2.2 yamt static int indent;
2272 1.190.2.2 yamt struct sysctlnode *n;
2273 1.190.2.2 yamt char *np, *sp, tmp[20];
2274 1.190.2.2 yamt int i;
2275 1.190.2.2 yamt
2276 1.190.2.2 yamt if (d == NULL)
2277 1.190.2.2 yamt return;
2278 1.190.2.2 yamt
2279 1.190.2.2 yamt np = &nmib[strlen(nmib)];
2280 1.190.2.2 yamt sp = &smib[strlen(smib)];
2281 1.190.2.2 yamt
2282 1.190.2.2 yamt if (!(d->sysctl_flags & CTLFLAG_ROOT)) {
2283 1.190.2.2 yamt snprintf(tmp, sizeof(tmp), "%d", d->sysctl_num);
2284 1.190.2.2 yamt strcat(nmib, ".");
2285 1.190.2.2 yamt strcat(smib, ".");
2286 1.190.2.2 yamt strcat(nmib, tmp);
2287 1.190.2.2 yamt strcat(smib, d->sysctl_name);
2288 1.190.2.2 yamt printf("%s -> %s (%d)\n", &nmib[1], &smib[1],
2289 1.190.2.2 yamt SYSCTL_TYPE(d->sysctl_flags));
2290 1.190.2.2 yamt }
2291 1.190.2.2 yamt
2292 1.190.2.2 yamt if (1) {
2293 1.190.2.2 yamt printf("%*s%p:\tsysctl_name [%s]\n", indent, "",
2294 1.190.2.2 yamt d, d->sysctl_name);
2295 1.190.2.2 yamt printf("%*s\t\tsysctl_num %d\n", indent, "",
2296 1.190.2.2 yamt d->sysctl_num);
2297 1.190.2.2 yamt printf("%*s\t\tsysctl_flags %x (flags=%x<%s> type=%d<%s> "
2298 1.190.2.2 yamt "size=%zu)\n",
2299 1.190.2.2 yamt indent, "", d->sysctl_flags,
2300 1.190.2.2 yamt SYSCTL_FLAGS(d->sysctl_flags),
2301 1.190.2.2 yamt sf(SYSCTL_FLAGS(d->sysctl_flags)),
2302 1.190.2.2 yamt SYSCTL_TYPE(d->sysctl_flags),
2303 1.190.2.2 yamt st(SYSCTL_TYPE(d->sysctl_flags)),
2304 1.190.2.2 yamt d->sysctl_size);
2305 1.190.2.2 yamt if (SYSCTL_TYPE(d->sysctl_flags) == CTLTYPE_NODE) {
2306 1.190.2.2 yamt printf("%*s\t\tsysctl_csize %d\n", indent, "",
2307 1.190.2.2 yamt d->sysctl_csize);
2308 1.190.2.2 yamt printf("%*s\t\tsysctl_clen %d\n", indent, "",
2309 1.190.2.2 yamt d->sysctl_clen);
2310 1.190.2.2 yamt printf("%*s\t\tsysctl_child %p\n", indent, "",
2311 1.190.2.2 yamt d->sysctl_child);
2312 1.190.2.2 yamt } else
2313 1.190.2.2 yamt printf("%*s\t\tsysctl_data %p\n", indent, "",
2314 1.190.2.2 yamt d->sysctl_data);
2315 1.190.2.2 yamt printf("%*s\t\tsysctl_func %p\n", indent, "",
2316 1.190.2.2 yamt d->sysctl_func);
2317 1.190.2.2 yamt printf("%*s\t\tsysctl_parent %p\n", indent, "",
2318 1.190.2.2 yamt d->sysctl_parent);
2319 1.190.2.2 yamt printf("%*s\t\tsysctl_ver %d\n", indent, "",
2320 1.190.2.2 yamt d->sysctl_ver);
2321 1.190.2.2 yamt }
2322 1.190.2.2 yamt
2323 1.190.2.2 yamt if (SYSCTL_TYPE(d->sysctl_flags) == CTLTYPE_NODE) {
2324 1.190.2.2 yamt indent += 8;
2325 1.190.2.2 yamt n = d->sysctl_child;
2326 1.190.2.2 yamt for (i = 0; i < d->sysctl_clen; i++) {
2327 1.190.2.2 yamt sysctl_dump(&n[i]);
2328 1.190.2.2 yamt }
2329 1.190.2.2 yamt indent -= 8;
2330 1.190.2.2 yamt }
2331 1.190.2.2 yamt
2332 1.190.2.2 yamt np[0] = '\0';
2333 1.190.2.2 yamt sp[0] = '\0';
2334 1.190.2.2 yamt }
2335 1.190.2.2 yamt #endif /* 0 */
2336 1.190.2.2 yamt
2337 1.190.2.2 yamt /*
2338 1.190.2.2 yamt * ********************************************************************
2339 1.190.2.2 yamt * Deletes an entire n-ary tree. Not recommended unless you know why
2340 1.190.2.2 yamt * you're doing it. Personally, I don't know why you'd even think
2341 1.190.2.2 yamt * about it.
2342 1.190.2.2 yamt * ********************************************************************
2343 1.190.2.2 yamt */
2344 1.190.2.2 yamt void
2345 1.190.2.2 yamt sysctl_free(struct sysctlnode *rnode)
2346 1.190.2.2 yamt {
2347 1.190.2.2 yamt struct sysctlnode *node, *pnode;
2348 1.190.2.2 yamt
2349 1.190.2.2 yamt if (rnode == NULL)
2350 1.190.2.2 yamt rnode = &sysctl_root;
2351 1.190.2.2 yamt
2352 1.190.2.2 yamt if (SYSCTL_VERS(rnode->sysctl_flags) != SYSCTL_VERSION) {
2353 1.190.2.2 yamt printf("sysctl_free: rnode %p wrong version\n", rnode);
2354 1.190.2.2 yamt return;
2355 1.190.2.2 yamt }
2356 1.190.2.2 yamt
2357 1.190.2.2 yamt pnode = rnode;
2358 1.190.2.2 yamt
2359 1.190.2.2 yamt node = pnode->sysctl_child;
2360 1.190.2.2 yamt do {
2361 1.190.2.2 yamt while (node != NULL && pnode->sysctl_csize > 0) {
2362 1.190.2.2 yamt while (node <
2363 1.190.2.2 yamt &pnode->sysctl_child[pnode->sysctl_clen] &&
2364 1.190.2.2 yamt (SYSCTL_TYPE(node->sysctl_flags) !=
2365 1.190.2.2 yamt CTLTYPE_NODE ||
2366 1.190.2.2 yamt node->sysctl_csize == 0)) {
2367 1.190.2.2 yamt if (SYSCTL_FLAGS(node->sysctl_flags) &
2368 1.190.2.2 yamt CTLFLAG_OWNDATA) {
2369 1.190.2.2 yamt if (node->sysctl_data != NULL) {
2370 1.190.2.2 yamt free(node->sysctl_data,
2371 1.190.2.2 yamt M_SYSCTLDATA);
2372 1.190.2.2 yamt node->sysctl_data = NULL;
2373 1.190.2.2 yamt }
2374 1.190.2.2 yamt }
2375 1.190.2.2 yamt if (SYSCTL_FLAGS(node->sysctl_flags) &
2376 1.190.2.2 yamt CTLFLAG_OWNDESC) {
2377 1.190.2.2 yamt if (node->sysctl_desc != NULL) {
2378 1.190.2.2 yamt /*XXXUNCONST*/
2379 1.190.2.2 yamt free(__UNCONST(node->sysctl_desc),
2380 1.190.2.2 yamt M_SYSCTLDATA);
2381 1.190.2.2 yamt node->sysctl_desc = NULL;
2382 1.190.2.2 yamt }
2383 1.190.2.2 yamt }
2384 1.190.2.2 yamt node++;
2385 1.190.2.2 yamt }
2386 1.190.2.2 yamt if (node < &pnode->sysctl_child[pnode->sysctl_clen]) {
2387 1.190.2.2 yamt pnode = node;
2388 1.190.2.2 yamt node = node->sysctl_child;
2389 1.190.2.2 yamt } else
2390 1.190.2.2 yamt break;
2391 1.190.2.2 yamt }
2392 1.190.2.2 yamt if (pnode->sysctl_child != NULL)
2393 1.190.2.2 yamt free(pnode->sysctl_child, M_SYSCTLNODE);
2394 1.190.2.2 yamt pnode->sysctl_clen = 0;
2395 1.190.2.2 yamt pnode->sysctl_csize = 0;
2396 1.190.2.2 yamt pnode->sysctl_child = NULL;
2397 1.190.2.2 yamt node = pnode;
2398 1.190.2.2 yamt pnode = node->sysctl_parent;
2399 1.190.2.2 yamt } while (pnode != NULL && node != rnode);
2400 1.190.2.2 yamt }
2401 1.190.2.2 yamt
2402 1.190.2.2 yamt int
2403 1.190.2.2 yamt sysctl_log_add(struct sysctllog **logp, const struct sysctlnode *node)
2404 1.190.2.2 yamt {
2405 1.190.2.2 yamt int name[CTL_MAXNAME], namelen, i;
2406 1.190.2.2 yamt const struct sysctlnode *pnode;
2407 1.190.2.2 yamt struct sysctllog *log;
2408 1.190.2.2 yamt
2409 1.190.2.2 yamt if (node->sysctl_flags & CTLFLAG_PERMANENT)
2410 1.190.2.2 yamt return (0);
2411 1.190.2.2 yamt
2412 1.190.2.2 yamt if (logp == NULL)
2413 1.190.2.2 yamt return (0);
2414 1.190.2.2 yamt
2415 1.190.2.2 yamt if (*logp == NULL) {
2416 1.190.2.2 yamt log = malloc(sizeof(struct sysctllog),
2417 1.190.2.2 yamt M_SYSCTLDATA, M_WAITOK|M_CANFAIL);
2418 1.190.2.2 yamt if (log == NULL) {
2419 1.190.2.2 yamt /* XXX print error message? */
2420 1.190.2.2 yamt return (-1);
2421 1.190.2.2 yamt }
2422 1.190.2.2 yamt log->log_num = malloc(16 * sizeof(int),
2423 1.190.2.2 yamt M_SYSCTLDATA, M_WAITOK|M_CANFAIL);
2424 1.190.2.2 yamt if (log->log_num == NULL) {
2425 1.190.2.2 yamt /* XXX print error message? */
2426 1.190.2.2 yamt free(log, M_SYSCTLDATA);
2427 1.190.2.2 yamt return (-1);
2428 1.190.2.2 yamt }
2429 1.190.2.2 yamt memset(log->log_num, 0, 16 * sizeof(int));
2430 1.190.2.2 yamt log->log_root = NULL;
2431 1.190.2.2 yamt log->log_size = 16;
2432 1.190.2.2 yamt log->log_left = 16;
2433 1.190.2.2 yamt *logp = log;
2434 1.190.2.2 yamt } else
2435 1.190.2.2 yamt log = *logp;
2436 1.190.2.2 yamt
2437 1.190.2.2 yamt /*
2438 1.190.2.2 yamt * check that the root is proper. it's okay to record the
2439 1.190.2.2 yamt * address of the root of a tree. it's the only thing that's
2440 1.190.2.2 yamt * guaranteed not to shift around as nodes come and go.
2441 1.190.2.2 yamt */
2442 1.190.2.2 yamt if (log->log_root == NULL)
2443 1.190.2.2 yamt log->log_root = sysctl_rootof(node);
2444 1.190.2.2 yamt else if (log->log_root != sysctl_rootof(node)) {
2445 1.190.2.2 yamt printf("sysctl: log %p root mismatch (%p)\n",
2446 1.190.2.2 yamt log->log_root, sysctl_rootof(node));
2447 1.190.2.2 yamt return (-1);
2448 1.190.2.2 yamt }
2449 1.190.2.2 yamt
2450 1.190.2.2 yamt /*
2451 1.190.2.2 yamt * we will copy out name in reverse order
2452 1.190.2.2 yamt */
2453 1.190.2.2 yamt for (pnode = node, namelen = 0;
2454 1.190.2.2 yamt pnode != NULL && !(pnode->sysctl_flags & CTLFLAG_ROOT);
2455 1.190.2.2 yamt pnode = pnode->sysctl_parent)
2456 1.190.2.2 yamt name[namelen++] = pnode->sysctl_num;
2457 1.190.2.2 yamt
2458 1.190.2.2 yamt /*
2459 1.190.2.2 yamt * do we have space?
2460 1.190.2.2 yamt */
2461 1.190.2.2 yamt if (log->log_left < (namelen + 3))
2462 1.190.2.2 yamt sysctl_log_realloc(log);
2463 1.190.2.2 yamt if (log->log_left < (namelen + 3))
2464 1.190.2.2 yamt return (-1);
2465 1.190.2.2 yamt
2466 1.190.2.2 yamt /*
2467 1.190.2.2 yamt * stuff name in, then namelen, then node type, and finally,
2468 1.190.2.2 yamt * the version for non-node nodes.
2469 1.190.2.2 yamt */
2470 1.190.2.2 yamt for (i = 0; i < namelen; i++)
2471 1.190.2.2 yamt log->log_num[--log->log_left] = name[i];
2472 1.190.2.2 yamt log->log_num[--log->log_left] = namelen;
2473 1.190.2.2 yamt log->log_num[--log->log_left] = SYSCTL_TYPE(node->sysctl_flags);
2474 1.190.2.2 yamt if (log->log_num[log->log_left] != CTLTYPE_NODE)
2475 1.190.2.2 yamt log->log_num[--log->log_left] = node->sysctl_ver;
2476 1.190.2.2 yamt else
2477 1.190.2.2 yamt log->log_num[--log->log_left] = 0;
2478 1.190.2.2 yamt
2479 1.190.2.2 yamt return (0);
2480 1.190.2.2 yamt }
2481 1.190.2.2 yamt
2482 1.190.2.2 yamt void
2483 1.190.2.2 yamt sysctl_teardown(struct sysctllog **logp)
2484 1.190.2.2 yamt {
2485 1.190.2.2 yamt const struct sysctlnode *rnode;
2486 1.190.2.2 yamt struct sysctlnode node;
2487 1.190.2.2 yamt struct sysctllog *log;
2488 1.190.2.2 yamt uint namelen;
2489 1.190.2.2 yamt int *name, t, v, error, ni;
2490 1.190.2.2 yamt size_t sz;
2491 1.190.2.2 yamt
2492 1.190.2.2 yamt if (logp == NULL || *logp == NULL)
2493 1.190.2.2 yamt return;
2494 1.190.2.2 yamt log = *logp;
2495 1.190.2.2 yamt
2496 1.190.2.2 yamt error = sysctl_lock(NULL, NULL, 0);
2497 1.190.2.2 yamt if (error)
2498 1.190.2.2 yamt return;
2499 1.190.2.2 yamt
2500 1.190.2.2 yamt memset(&node, 0, sizeof(node));
2501 1.190.2.2 yamt
2502 1.190.2.2 yamt while (log->log_left < log->log_size) {
2503 1.190.2.2 yamt KASSERT((log->log_left + 3 < log->log_size) &&
2504 1.190.2.2 yamt (log->log_left + log->log_num[log->log_left + 2] <=
2505 1.190.2.2 yamt log->log_size));
2506 1.190.2.2 yamt v = log->log_num[log->log_left++];
2507 1.190.2.2 yamt t = log->log_num[log->log_left++];
2508 1.190.2.2 yamt namelen = log->log_num[log->log_left++];
2509 1.190.2.2 yamt name = &log->log_num[log->log_left];
2510 1.190.2.2 yamt
2511 1.190.2.2 yamt node.sysctl_num = name[namelen - 1];
2512 1.190.2.2 yamt node.sysctl_flags = SYSCTL_VERSION|t;
2513 1.190.2.2 yamt node.sysctl_ver = v;
2514 1.190.2.2 yamt
2515 1.190.2.2 yamt rnode = log->log_root;
2516 1.190.2.2 yamt error = sysctl_locate(NULL, &name[0], namelen, &rnode, &ni);
2517 1.190.2.2 yamt if (error == 0) {
2518 1.190.2.2 yamt name[namelen - 1] = CTL_DESTROY;
2519 1.190.2.2 yamt rnode = rnode->sysctl_parent;
2520 1.190.2.2 yamt sz = 0;
2521 1.190.2.2 yamt (void)sysctl_destroy(&name[namelen - 1], 1, NULL,
2522 1.190.2.2 yamt &sz, &node, sizeof(node),
2523 1.190.2.2 yamt &name[0], NULL, rnode);
2524 1.190.2.2 yamt }
2525 1.190.2.2 yamt
2526 1.190.2.2 yamt log->log_left += namelen;
2527 1.190.2.2 yamt }
2528 1.190.2.2 yamt
2529 1.190.2.2 yamt KASSERT(log->log_size == log->log_left);
2530 1.190.2.2 yamt free(log->log_num, M_SYSCTLDATA);
2531 1.190.2.2 yamt free(log, M_SYSCTLDATA);
2532 1.190.2.2 yamt *logp = NULL;
2533 1.190.2.2 yamt
2534 1.190.2.2 yamt sysctl_unlock(NULL);
2535 1.190.2.2 yamt }
2536 1.190.2.2 yamt
2537 1.190.2.2 yamt /*
2538 1.190.2.2 yamt * ********************************************************************
2539 1.190.2.2 yamt * old_sysctl -- A routine to bridge old-style internal calls to the
2540 1.190.2.2 yamt * new infrastructure.
2541 1.190.2.2 yamt * ********************************************************************
2542 1.190.2.2 yamt */
2543 1.190.2.2 yamt int
2544 1.190.2.2 yamt old_sysctl(int *name, u_int namelen, void *oldp, size_t *oldlenp,
2545 1.190.2.2 yamt void *newp, size_t newlen, struct lwp *l)
2546 1.190.2.2 yamt {
2547 1.190.2.2 yamt int error;
2548 1.190.2.2 yamt size_t oldlen = 0;
2549 1.190.2.2 yamt size_t savelen;
2550 1.190.2.2 yamt
2551 1.190.2.2 yamt if (oldlenp) {
2552 1.190.2.2 yamt oldlen = *oldlenp;
2553 1.190.2.2 yamt }
2554 1.190.2.2 yamt savelen = oldlen;
2555 1.190.2.2 yamt
2556 1.190.2.2 yamt error = sysctl_lock(l, oldp, savelen);
2557 1.190.2.2 yamt if (error)
2558 1.190.2.2 yamt return (error);
2559 1.190.2.2 yamt error = sysctl_dispatch(name, namelen, oldp, &oldlen,
2560 1.190.2.2 yamt newp, newlen, name, l, NULL);
2561 1.190.2.2 yamt sysctl_unlock(l);
2562 1.190.2.2 yamt if (error == 0 && oldp != NULL && savelen < oldlen)
2563 1.190.2.2 yamt error = ENOMEM;
2564 1.190.2.2 yamt
2565 1.190.2.2 yamt if (oldlenp) {
2566 1.190.2.2 yamt *oldlenp = oldlen;
2567 1.190.2.2 yamt }
2568 1.190.2.2 yamt
2569 1.190.2.2 yamt return (error);
2570 1.190.2.2 yamt }
2571 1.190.2.2 yamt
2572 1.190.2.2 yamt /*
2573 1.190.2.2 yamt * ********************************************************************
2574 1.190.2.2 yamt * Section 4: Generic helper routines
2575 1.190.2.2 yamt * ********************************************************************
2576 1.190.2.2 yamt * "helper" routines that can do more finely grained access control,
2577 1.190.2.2 yamt * construct structures from disparate information, create the
2578 1.190.2.2 yamt * appearance of more nodes and sub-trees, etc. for example, if
2579 1.190.2.2 yamt * CTL_PROC wanted a helper function, it could respond to a CTL_QUERY
2580 1.190.2.2 yamt * with a dynamically created list of nodes that represented the
2581 1.190.2.2 yamt * currently running processes at that instant.
2582 1.190.2.2 yamt * ********************************************************************
2583 1.190.2.2 yamt */
2584 1.190.2.2 yamt
2585 1.190.2.2 yamt /*
2586 1.190.2.2 yamt * first, a few generic helpers that provide:
2587 1.190.2.2 yamt *
2588 1.190.2.2 yamt * sysctl_needfunc() a readonly interface that emits a warning
2589 1.190.2.2 yamt * sysctl_notavail() returns EOPNOTSUPP (generic error)
2590 1.190.2.2 yamt * sysctl_null() an empty return buffer with no error
2591 1.190.2.2 yamt */
2592 1.190.2.2 yamt int
2593 1.190.2.2 yamt sysctl_needfunc(SYSCTLFN_ARGS)
2594 1.190.2.2 yamt {
2595 1.190.2.2 yamt int error;
2596 1.190.2.2 yamt
2597 1.190.2.2 yamt printf("!!SYSCTL_NEEDFUNC!!\n");
2598 1.190.2.2 yamt
2599 1.190.2.2 yamt if (newp != NULL || namelen != 0)
2600 1.190.2.2 yamt return (EOPNOTSUPP);
2601 1.190.2.2 yamt
2602 1.190.2.2 yamt error = 0;
2603 1.190.2.2 yamt if (oldp != NULL)
2604 1.190.2.2 yamt error = sysctl_copyout(l, rnode->sysctl_data, oldp,
2605 1.190.2.2 yamt MIN(rnode->sysctl_size, *oldlenp));
2606 1.190.2.2 yamt *oldlenp = rnode->sysctl_size;
2607 1.190.2.2 yamt
2608 1.190.2.2 yamt return (error);
2609 1.190.2.2 yamt }
2610 1.190.2.2 yamt
2611 1.190.2.2 yamt int
2612 1.190.2.2 yamt sysctl_notavail(SYSCTLFN_ARGS)
2613 1.190.2.2 yamt {
2614 1.190.2.2 yamt
2615 1.190.2.2 yamt if (namelen == 1 && name[0] == CTL_QUERY)
2616 1.190.2.2 yamt return (sysctl_query(SYSCTLFN_CALL(rnode)));
2617 1.190.2.2 yamt
2618 1.190.2.2 yamt return (EOPNOTSUPP);
2619 1.190.2.2 yamt }
2620 1.190.2.2 yamt
2621 1.190.2.2 yamt int
2622 1.190.2.2 yamt sysctl_null(SYSCTLFN_ARGS)
2623 1.190.2.2 yamt {
2624 1.190.2.2 yamt
2625 1.190.2.2 yamt *oldlenp = 0;
2626 1.190.2.2 yamt
2627 1.190.2.2 yamt return (0);
2628 1.190.2.2 yamt }
2629 1.190.2.2 yamt
2630 1.190.2.2 yamt /*
2631 1.190.2.2 yamt * ********************************************************************
2632 1.190.2.2 yamt * Section 5: The machinery that makes it all go
2633 1.190.2.2 yamt * ********************************************************************
2634 1.190.2.2 yamt * Memory "manglement" routines. Not much to this, eh?
2635 1.190.2.2 yamt * ********************************************************************
2636 1.190.2.2 yamt */
2637 1.190.2.2 yamt static int
2638 1.190.2.2 yamt sysctl_alloc(struct sysctlnode *p, int x)
2639 1.190.2.2 yamt {
2640 1.190.2.2 yamt int i;
2641 1.190.2.2 yamt struct sysctlnode *n;
2642 1.190.2.2 yamt
2643 1.190.2.2 yamt assert(p->sysctl_child == NULL);
2644 1.190.2.2 yamt
2645 1.190.2.2 yamt if (x == 1)
2646 1.190.2.2 yamt n = malloc(sizeof(struct sysctlnode),
2647 1.190.2.2 yamt M_SYSCTLNODE, M_WAITOK|M_CANFAIL);
2648 1.190.2.2 yamt else
2649 1.190.2.2 yamt n = malloc(SYSCTL_DEFSIZE * sizeof(struct sysctlnode),
2650 1.190.2.2 yamt M_SYSCTLNODE, M_WAITOK|M_CANFAIL);
2651 1.190.2.2 yamt if (n == NULL)
2652 1.190.2.2 yamt return (ENOMEM);
2653 1.190.2.2 yamt
2654 1.190.2.2 yamt if (x == 1) {
2655 1.190.2.2 yamt memset(n, 0, sizeof(struct sysctlnode));
2656 1.190.2.2 yamt p->sysctl_csize = 1;
2657 1.190.2.2 yamt } else {
2658 1.190.2.2 yamt memset(n, 0, SYSCTL_DEFSIZE * sizeof(struct sysctlnode));
2659 1.190.2.2 yamt p->sysctl_csize = SYSCTL_DEFSIZE;
2660 1.190.2.2 yamt }
2661 1.190.2.2 yamt p->sysctl_clen = 0;
2662 1.190.2.2 yamt
2663 1.190.2.2 yamt for (i = 0; i < p->sysctl_csize; i++)
2664 1.190.2.2 yamt n[i].sysctl_parent = p;
2665 1.190.2.2 yamt
2666 1.190.2.2 yamt p->sysctl_child = n;
2667 1.190.2.2 yamt return (0);
2668 1.190.2.2 yamt }
2669 1.190.2.2 yamt
2670 1.190.2.2 yamt static int
2671 1.190.2.2 yamt sysctl_realloc(struct sysctlnode *p)
2672 1.190.2.2 yamt {
2673 1.190.2.2 yamt int i, j;
2674 1.190.2.2 yamt struct sysctlnode *n;
2675 1.190.2.2 yamt
2676 1.190.2.2 yamt assert(p->sysctl_csize == p->sysctl_clen);
2677 1.190.2.2 yamt
2678 1.190.2.2 yamt /*
2679 1.190.2.2 yamt * how many do we have...how many should we make?
2680 1.190.2.2 yamt */
2681 1.190.2.2 yamt i = p->sysctl_clen;
2682 1.190.2.2 yamt n = malloc(2 * i * sizeof(struct sysctlnode), M_SYSCTLNODE,
2683 1.190.2.2 yamt M_WAITOK|M_CANFAIL);
2684 1.190.2.2 yamt if (n == NULL)
2685 1.190.2.2 yamt return (ENOMEM);
2686 1.190.2.2 yamt
2687 1.190.2.2 yamt /*
2688 1.190.2.2 yamt * move old children over...initialize new children
2689 1.190.2.2 yamt */
2690 1.190.2.2 yamt memcpy(n, p->sysctl_child, i * sizeof(struct sysctlnode));
2691 1.190.2.2 yamt memset(&n[i], 0, i * sizeof(struct sysctlnode));
2692 1.190.2.2 yamt p->sysctl_csize = 2 * i;
2693 1.190.2.2 yamt
2694 1.190.2.2 yamt /*
2695 1.190.2.2 yamt * reattach moved (and new) children to parent; if a moved
2696 1.190.2.2 yamt * child node has children, reattach the parent pointers of
2697 1.190.2.2 yamt * grandchildren
2698 1.190.2.2 yamt */
2699 1.190.2.2 yamt for (i = 0; i < p->sysctl_csize; i++) {
2700 1.190.2.2 yamt n[i].sysctl_parent = p;
2701 1.190.2.2 yamt if (n[i].sysctl_child != NULL) {
2702 1.190.2.2 yamt for (j = 0; j < n[i].sysctl_csize; j++)
2703 1.190.2.2 yamt n[i].sysctl_child[j].sysctl_parent = &n[i];
2704 1.190.2.2 yamt }
2705 1.190.2.2 yamt }
2706 1.190.2.2 yamt
2707 1.190.2.2 yamt /*
2708 1.190.2.2 yamt * get out with the old and in with the new
2709 1.190.2.2 yamt */
2710 1.190.2.2 yamt free(p->sysctl_child, M_SYSCTLNODE);
2711 1.190.2.2 yamt p->sysctl_child = n;
2712 1.190.2.2 yamt
2713 1.190.2.2 yamt return (0);
2714 1.190.2.2 yamt }
2715 1.190.2.2 yamt
2716 1.190.2.2 yamt static int
2717 1.190.2.2 yamt sysctl_log_realloc(struct sysctllog *log)
2718 1.190.2.2 yamt {
2719 1.190.2.2 yamt int *n, s, d;
2720 1.190.2.2 yamt
2721 1.190.2.2 yamt s = log->log_size * 2;
2722 1.190.2.2 yamt d = log->log_size;
2723 1.190.2.2 yamt
2724 1.190.2.2 yamt n = malloc(s * sizeof(int), M_SYSCTLDATA, M_WAITOK|M_CANFAIL);
2725 1.190.2.2 yamt if (n == NULL)
2726 1.190.2.2 yamt return (-1);
2727 1.190.2.2 yamt
2728 1.190.2.2 yamt memset(n, 0, s * sizeof(int));
2729 1.190.2.2 yamt memcpy(&n[d], log->log_num, d * sizeof(int));
2730 1.190.2.2 yamt free(log->log_num, M_SYSCTLDATA);
2731 1.190.2.2 yamt log->log_num = n;
2732 1.190.2.2 yamt if (d)
2733 1.190.2.2 yamt log->log_left += d;
2734 1.190.2.2 yamt else
2735 1.190.2.2 yamt log->log_left = s;
2736 1.190.2.2 yamt log->log_size = s;
2737 1.190.2.2 yamt
2738 1.190.2.2 yamt return (0);
2739 1.190.2.2 yamt }
2740 1.190.2.2 yamt
2741 1.190.2.2 yamt /*
2742 1.190.2.2 yamt * ********************************************************************
2743 1.190.2.2 yamt * Section 6: Conversion between API versions wrt the sysctlnode
2744 1.190.2.2 yamt * ********************************************************************
2745 1.190.2.2 yamt */
2746 1.190.2.2 yamt static int
2747 1.190.2.2 yamt sysctl_cvt_in(struct lwp *l, int *vp, const void *i, size_t sz,
2748 1.190.2.2 yamt struct sysctlnode *node)
2749 1.190.2.2 yamt {
2750 1.190.2.2 yamt int error, flags;
2751 1.190.2.2 yamt
2752 1.190.2.2 yamt if (i == NULL || sz < sizeof(flags))
2753 1.190.2.2 yamt return (EINVAL);
2754 1.190.2.2 yamt
2755 1.190.2.2 yamt error = sysctl_copyin(l, i, &flags, sizeof(flags));
2756 1.190.2.2 yamt if (error)
2757 1.190.2.2 yamt return (error);
2758 1.190.2.2 yamt
2759 1.190.2.2 yamt #if (SYSCTL_VERSION != SYSCTL_VERS_1)
2760 1.190.2.2 yamt #error sysctl_cvt_in: no support for SYSCTL_VERSION
2761 1.190.2.2 yamt #endif /* (SYSCTL_VERSION != SYSCTL_VERS_1) */
2762 1.190.2.2 yamt
2763 1.190.2.2 yamt if (sz == sizeof(*node) &&
2764 1.190.2.2 yamt SYSCTL_VERS(flags) == SYSCTL_VERSION) {
2765 1.190.2.2 yamt error = sysctl_copyin(l, i, node, sizeof(*node));
2766 1.190.2.2 yamt if (error)
2767 1.190.2.2 yamt return (error);
2768 1.190.2.2 yamt *vp = SYSCTL_VERSION;
2769 1.190.2.2 yamt return (0);
2770 1.190.2.2 yamt }
2771 1.190.2.2 yamt
2772 1.190.2.2 yamt return (EINVAL);
2773 1.190.2.2 yamt }
2774 1.190.2.2 yamt
2775 1.190.2.2 yamt static int
2776 1.190.2.2 yamt sysctl_cvt_out(struct lwp *l, int v, const struct sysctlnode *i,
2777 1.190.2.2 yamt void *ovp, size_t left, size_t *szp)
2778 1.190.2.2 yamt {
2779 1.190.2.2 yamt size_t sz = sizeof(*i);
2780 1.190.2.2 yamt const void *src = i;
2781 1.190.2.2 yamt int error;
2782 1.190.2.2 yamt
2783 1.190.2.2 yamt switch (v) {
2784 1.190.2.2 yamt case SYSCTL_VERS_0:
2785 1.190.2.2 yamt return (EINVAL);
2786 1.190.2.2 yamt
2787 1.190.2.2 yamt #if (SYSCTL_VERSION != SYSCTL_VERS_1)
2788 1.190.2.2 yamt #error sysctl_cvt_out: no support for SYSCTL_VERSION
2789 1.190.2.2 yamt #endif /* (SYSCTL_VERSION != SYSCTL_VERS_1) */
2790 1.190.2.2 yamt
2791 1.190.2.2 yamt case SYSCTL_VERSION:
2792 1.190.2.2 yamt /* nothing more to do here */
2793 1.190.2.2 yamt break;
2794 1.190.2.2 yamt }
2795 1.190.2.2 yamt
2796 1.190.2.2 yamt if (ovp != NULL && left >= sz) {
2797 1.190.2.2 yamt error = sysctl_copyout(l, src, ovp, sz);
2798 1.190.2.2 yamt if (error)
2799 1.190.2.2 yamt return (error);
2800 1.190.2.2 yamt }
2801 1.190.2.2 yamt
2802 1.190.2.2 yamt if (szp != NULL)
2803 1.190.2.2 yamt *szp = sz;
2804 1.190.2.2 yamt
2805 1.190.2.2 yamt return (0);
2806 1.190.2.2 yamt }
2807