proc->thread stage 2: MAJOR revamping of system calls, ucred, jail API,
[dragonfly.git] / sys / kern / kern_xxx.c
1 /*
2  * Copyright (c) 1982, 1986, 1989, 1993
3  *      The Regents of the University of California.  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  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by the University of
16  *      California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  *      @(#)kern_xxx.c  8.2 (Berkeley) 11/14/93
34  * $FreeBSD: src/sys/kern/kern_xxx.c,v 1.31 1999/08/28 00:46:15 peter Exp $
35  * $DragonFly: src/sys/kern/kern_xxx.c,v 1.3 2003/06/23 17:55:41 dillon Exp $
36  */
37
38 #include "opt_compat.h"
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/sysproto.h>
43 #include <sys/kernel.h>
44 #include <sys/proc.h>
45 #include <sys/sysctl.h>
46 #include <sys/utsname.h>
47
48
49 #if defined(COMPAT_43) || defined(COMPAT_SUNOS)
50
51 #ifndef _SYS_SYSPROTO_H_
52 struct gethostname_args {
53         char    *hostname;
54         u_int   len;
55 };
56 #endif
57 /* ARGSUSED */
58 int
59 ogethostname(struct gethostname_args *uap)
60 {
61         int name[2];
62         size_t len = uap->len;
63
64         name[0] = CTL_KERN;
65         name[1] = KERN_HOSTNAME;
66         return (userland_sysctl(name, 2, uap->hostname, &len, 
67                 1, 0, 0, 0));
68 }
69
70 #ifndef _SYS_SYSPROTO_H_
71 struct sethostname_args {
72         char    *hostname;
73         u_int   len;
74 };
75 #endif
76 /* ARGSUSED */
77 int
78 osethostname(struct sethostname_args *uap)
79 {
80         int name[2];
81         int error;
82
83         name[0] = CTL_KERN;
84         name[1] = KERN_HOSTNAME;
85         if ((error = suser_xxx(0, PRISON_ROOT)))
86                 return (error);
87         return (userland_sysctl(name, 2, 0, 0, 0,
88                 uap->hostname, uap->len, 0));
89 }
90
91 #ifndef _SYS_SYSPROTO_H_
92 struct ogethostid_args {
93         int     dummy;
94 };
95 #endif
96 /* ARGSUSED */
97 int
98 ogethostid(struct ogethostid_args *uap)
99 {
100         struct proc *p = curproc;
101
102         *(long *)(p->p_retval) = hostid;
103         return (0);
104 }
105 #endif /* COMPAT_43 || COMPAT_SUNOS */
106
107 #ifdef COMPAT_43
108 #ifndef _SYS_SYSPROTO_H_
109 struct osethostid_args {
110         long    hostid;
111 };
112 #endif
113 /* ARGSUSED */
114 int
115 osethostid(struct osethostid_args *uap)
116 {
117         int error;
118
119         if ((error = suser()))
120                 return (error);
121         hostid = uap->hostid;
122         return (0);
123 }
124
125 int
126 oquota(struct oquota_args *uap)
127 {
128         return (ENOSYS);
129 }
130 #endif /* COMPAT_43 */
131
132 #ifndef _SYS_SYSPROTO_H_
133 struct uname_args {
134         struct utsname  *name;
135 };
136 #endif
137
138 /* ARGSUSED */
139 int
140 uname(struct uname_args *uap)
141 {
142         int name[2], rtval;
143         size_t len;
144         char *s, *us;
145
146         name[0] = CTL_KERN;
147         name[1] = KERN_OSTYPE;
148         len = sizeof uap->name->sysname;
149         rtval = userland_sysctl(name, 2, uap->name->sysname, &len, 
150                 1, 0, 0, 0);
151         if( rtval) return rtval;
152         subyte( uap->name->sysname + sizeof(uap->name->sysname) - 1, 0);
153
154         name[1] = KERN_HOSTNAME;
155         len = sizeof uap->name->nodename;
156         rtval = userland_sysctl(name, 2, uap->name->nodename, &len, 
157                 1, 0, 0, 0);
158         if( rtval) return rtval;
159         subyte( uap->name->nodename + sizeof(uap->name->nodename) - 1, 0);
160
161         name[1] = KERN_OSRELEASE;
162         len = sizeof uap->name->release;
163         rtval = userland_sysctl(name, 2, uap->name->release, &len, 
164                 1, 0, 0, 0);
165         if( rtval) return rtval;
166         subyte( uap->name->release + sizeof(uap->name->release) - 1, 0);
167
168 /*
169         name = KERN_VERSION;
170         len = sizeof uap->name->version;
171         rtval = userland_sysctl(name, 2, uap->name->version, &len, 
172                 1, 0, 0, 0);
173         if( rtval) return rtval;
174         subyte( uap->name->version + sizeof(uap->name->version) - 1, 0);
175 */
176
177 /*
178  * this stupid hackery to make the version field look like FreeBSD 1.1
179  */
180         for(s = version; *s && *s != '#'; s++);
181
182         for(us = uap->name->version; *s && *s != ':'; s++) {
183                 rtval = subyte( us++, *s);
184                 if( rtval)
185                         return rtval;
186         }
187         rtval = subyte( us++, 0);
188         if( rtval)
189                 return rtval;
190
191         name[0] = CTL_HW;
192         name[1] = HW_MACHINE;
193         len = sizeof uap->name->machine;
194         rtval = userland_sysctl(name, 2, uap->name->machine, &len, 
195                 1, 0, 0, 0);
196         if( rtval) return rtval;
197         subyte( uap->name->machine + sizeof(uap->name->machine) - 1, 0);
198
199         return 0;
200 }
201
202 #ifndef _SYS_SYSPROTO_H_
203 struct getdomainname_args {
204         char    *domainname;
205         int     len;
206 };
207 #endif
208
209 /* ARGSUSED */
210 int
211 getdomainname(struct getdomainname_args *uap)
212 {
213         int domainnamelen = strlen(domainname) + 1;
214         if ((u_int)uap->len > domainnamelen + 1)
215                 uap->len = domainnamelen + 1;
216         return (copyout((caddr_t)domainname, (caddr_t)uap->domainname, uap->len));
217 }
218
219 #ifndef _SYS_SYSPROTO_H_
220 struct setdomainname_args {
221         char    *domainname;
222         int     len;
223 };
224 #endif
225
226 /* ARGSUSED */
227 int
228 setdomainname(struct setdomainname_args *uap)
229 {
230         int error, domainnamelen;
231
232         if ((error = suser()))
233                 return (error);
234         if ((u_int)uap->len > sizeof (domainname) - 1)
235                 return EINVAL;
236         domainnamelen = uap->len;
237         error = copyin((caddr_t)uap->domainname, domainname, uap->len);
238         domainname[domainnamelen] = 0;
239         return (error);
240 }
241