Preliminary syscall messaging work. Adjust all <syscall>_args structures
[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.5 2003/07/24 01:41:25 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 /* ARGSUSED */
52 int
53 ogethostname(struct gethostname_args *uap)
54 {
55         int name[2];
56         size_t len = uap->len;
57
58         name[0] = CTL_KERN;
59         name[1] = KERN_HOSTNAME;
60         return (userland_sysctl(name, 2, uap->hostname, &len, 
61                 1, 0, 0, 0));
62 }
63
64 /* ARGSUSED */
65 int
66 osethostname(struct sethostname_args *uap)
67 {
68         struct thread *td = curthread;
69         struct proc *p = td->td_proc;
70         int name[2];
71         int error;
72
73         KKASSERT(p);
74         name[0] = CTL_KERN;
75         name[1] = KERN_HOSTNAME;
76         if ((error = suser_cred(p->p_ucred, PRISON_ROOT)))
77                 return (error);
78         return (userland_sysctl(name, 2, 0, 0, 0, uap->hostname, uap->len, 0));
79 }
80
81 /* ARGSUSED */
82 int
83 ogethostid(struct ogethostid_args *uap)
84 {
85         struct proc *p = curproc;
86
87         *(long *)(p->p_retval) = hostid;
88         return (0);
89 }
90 #endif /* COMPAT_43 || COMPAT_SUNOS */
91
92 #ifdef COMPAT_43
93 /* ARGSUSED */
94 int
95 osethostid(struct osethostid_args *uap)
96 {
97         struct thread *td = curthread;
98         int error;
99
100         if ((error = suser(td)))
101                 return (error);
102         hostid = uap->hostid;
103         return (0);
104 }
105
106 int
107 oquota(struct oquota_args *uap)
108 {
109         return (ENOSYS);
110 }
111 #endif /* COMPAT_43 */
112
113 /* ARGSUSED */
114 int
115 uname(struct uname_args *uap)
116 {
117         int name[2], rtval;
118         size_t len;
119         char *s, *us;
120
121         name[0] = CTL_KERN;
122         name[1] = KERN_OSTYPE;
123         len = sizeof uap->name->sysname;
124         rtval = userland_sysctl(name, 2, uap->name->sysname, &len, 
125                 1, 0, 0, 0);
126         if( rtval) return rtval;
127         subyte( uap->name->sysname + sizeof(uap->name->sysname) - 1, 0);
128
129         name[1] = KERN_HOSTNAME;
130         len = sizeof uap->name->nodename;
131         rtval = userland_sysctl(name, 2, uap->name->nodename, &len, 
132                 1, 0, 0, 0);
133         if( rtval) return rtval;
134         subyte( uap->name->nodename + sizeof(uap->name->nodename) - 1, 0);
135
136         name[1] = KERN_OSRELEASE;
137         len = sizeof uap->name->release;
138         rtval = userland_sysctl(name, 2, uap->name->release, &len, 
139                 1, 0, 0, 0);
140         if( rtval) return rtval;
141         subyte( uap->name->release + sizeof(uap->name->release) - 1, 0);
142
143 /*
144         name = KERN_VERSION;
145         len = sizeof uap->name->version;
146         rtval = userland_sysctl(name, 2, uap->name->version, &len, 
147                 1, 0, 0, 0);
148         if( rtval) return rtval;
149         subyte( uap->name->version + sizeof(uap->name->version) - 1, 0);
150 */
151
152 /*
153  * this stupid hackery to make the version field look like FreeBSD 1.1
154  */
155         for(s = version; *s && *s != '#'; s++);
156
157         for(us = uap->name->version; *s && *s != ':'; s++) {
158                 rtval = subyte( us++, *s);
159                 if( rtval)
160                         return rtval;
161         }
162         rtval = subyte( us++, 0);
163         if( rtval)
164                 return rtval;
165
166         name[0] = CTL_HW;
167         name[1] = HW_MACHINE;
168         len = sizeof uap->name->machine;
169         rtval = userland_sysctl(name, 2, uap->name->machine, &len, 
170                 1, 0, 0, 0);
171         if( rtval) return rtval;
172         subyte( uap->name->machine + sizeof(uap->name->machine) - 1, 0);
173
174         return 0;
175 }
176
177 /* ARGSUSED */
178 int
179 getdomainname(struct getdomainname_args *uap)
180 {
181         int domainnamelen = strlen(domainname) + 1;
182         if ((u_int)uap->len > domainnamelen + 1)
183                 uap->len = domainnamelen + 1;
184         return (copyout((caddr_t)domainname, (caddr_t)uap->domainname, uap->len));
185 }
186
187 /* ARGSUSED */
188 int
189 setdomainname(struct setdomainname_args *uap)
190 {
191         struct thread *td = curthread;
192         int error, domainnamelen;
193
194         if ((error = suser(td)))
195                 return (error);
196         if ((u_int)uap->len > sizeof (domainname) - 1)
197                 return EINVAL;
198         domainnamelen = uap->len;
199         error = copyin((caddr_t)uap->domainname, domainname, uap->len);
200         domainname[domainnamelen] = 0;
201         return (error);
202 }
203