Ports -> pkgsrc
[dragonfly.git] / sys / emulation / linux / linux_sysctl.c
1 /*-
2  * Copyright (c) 2001 Marcel Moolenaar
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer 
10  *    in this position and unchanged.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. The name of the author may not be used to endorse or promote products
15  *    derived from this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  *
28  * $FreeBSD: src/sys/compat/linux/linux_sysctl.c,v 1.2.2.1 2001/10/21 03:57:35 marcel Exp $
29  * $DragonFly: src/sys/emulation/linux/linux_sysctl.c,v 1.7 2006/06/05 07:26:09 dillon Exp $
30  */
31
32 #include "opt_compat.h"
33
34 #include <sys/param.h>
35 #include <sys/systm.h>
36 #include <sys/proc.h>
37 #include <sys/sysproto.h>
38
39 #include <arch_linux/linux.h>
40 #include <arch_linux/linux_proto.h>
41 #include "linux_util.h"
42
43 #define LINUX_CTL_KERN          1
44 #define LINUX_CTL_VM            2
45 #define LINUX_CTL_NET           3
46 #define LINUX_CTL_PROC          4
47 #define LINUX_CTL_FS            5
48 #define LINUX_CTL_DEBUG         6
49 #define LINUX_CTL_DEV           7
50 #define LINUX_CTL_BUS           8
51
52 /* CTL_KERN names */
53 #define LINUX_KERN_OSTYPE       1
54 #define LINUX_KERN_OSRELEASE    2
55 #define LINUX_KERN_OSREV        3
56 #define LINUX_KERN_VERSION      4
57
58 static int
59 handle_string(struct l___sysctl_args *la, char *value)
60 {
61         int error;
62
63         if (la->oldval != NULL) {
64                 l_int len = strlen(value);
65                 error = copyout(value, la->oldval, len + 1);
66                 if (!error && la->oldlenp != NULL)
67                         error = copyout(&len, la->oldlenp, sizeof(len));
68                 if (error)
69                         return (error);
70         }
71
72         if (la->newval != NULL)
73                 return (ENOTDIR);
74
75         return (0);
76 }
77
78 int
79 sys_linux_sysctl(struct linux_sysctl_args *args)
80 {
81         struct l___sysctl_args la;
82         l_int *mib;
83         int error, i;
84
85         error = copyin((caddr_t)args->args, &la, sizeof(la));
86         if (error)
87                 return (error);
88
89         if (la.nlen <= 0 || la.nlen > LINUX_CTL_MAXNAME)
90                 return (ENOTDIR);
91
92         mib = malloc(la.nlen * sizeof(l_int), M_TEMP, M_WAITOK);
93         error = copyin(la.name, mib, la.nlen * sizeof(l_int));
94         if (error) {
95                 free(mib, M_TEMP);
96                 return (error);
97         }
98
99         switch (mib[0]) {
100         case LINUX_CTL_KERN:
101                 if (la.nlen < 2)
102                         break;
103
104                 switch (mib[1]) {
105                 case LINUX_KERN_VERSION:
106                         free(mib, M_TEMP);
107                         return (handle_string(&la, version));
108                 default:
109                         break;
110                 }
111                 break;
112         default:
113                 break;
114         }
115
116         printf("linux: sysctl: unhandled name=");
117         for (i = 0; i < la.nlen; i++)
118                 printf("%c%d", (i) ? ',' : '{', mib[i]);
119         printf("}\n");
120
121         free(mib, M_TEMP);
122         return (ENOTDIR);
123 }