kern_xxx.c revision 38517 
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 * $Id: kern_xxx.c,v 1.27 1997/12/16 17:40:21 eivind Exp $
35 */
36
37#include "opt_compat.h"
38
39#include <sys/param.h>
40#include <sys/systm.h>
41#include <sys/sysproto.h>
42#include <sys/kernel.h>
43#include <sys/proc.h>
44#include <sys/sysctl.h>
45#include <sys/utsname.h>
46
47
48#if defined(COMPAT_43) || defined(COMPAT_SUNOS)
49
50#ifndef _SYS_SYSPROTO_H_
51struct gethostname_args {
52	char	*hostname;
53	u_int	len;
54};
55#endif
56/* ARGSUSED */
57int
58ogethostname(p, uap)
59	struct proc *p;
60	struct gethostname_args *uap;
61{
62	int name[2];
63	size_t len = uap->len;
64
65	name[0] = CTL_KERN;
66	name[1] = KERN_HOSTNAME;
67	return (userland_sysctl(p, name, 2, uap->hostname, &len,
68		1, 0, 0, 0));
69}
70
71#ifndef _SYS_SYSPROTO_H_
72struct sethostname_args {
73	char	*hostname;
74	u_int	len;
75};
76#endif
77/* ARGSUSED */
78int
79osethostname(p, uap)
80	struct proc *p;
81	register struct sethostname_args *uap;
82{
83	int name[2];
84	int error;
85
86	name[0] = CTL_KERN;
87	name[1] = KERN_HOSTNAME;
88	if ((error = suser(p->p_ucred, &p->p_acflag)))
89		return (error);
90	return (userland_sysctl(p, name, 2, 0, 0, 0,
91		uap->hostname, uap->len, 0));
92}
93
94#ifndef _SYS_SYSPROTO_H_
95struct ogethostid_args {
96	int	dummy;
97};
98#endif
99/* ARGSUSED */
100int
101ogethostid(p, uap)
102	struct proc *p;
103	struct ogethostid_args *uap;
104{
105
106	*(long *)(p->p_retval) = hostid;
107	return (0);
108}
109#endif /* COMPAT_43 || COMPAT_SUNOS */
110
111#ifdef COMPAT_43
112#ifndef _SYS_SYSPROTO_H_
113struct osethostid_args {
114	long	hostid;
115};
116#endif
117/* ARGSUSED */
118int
119osethostid(p, uap)
120	struct proc *p;
121	struct osethostid_args *uap;
122{
123	int error;
124
125	if ((error = suser(p->p_ucred, &p->p_acflag)))
126		return (error);
127	hostid = uap->hostid;
128	return (0);
129}
130
131int
132oquota(p, uap)
133	struct proc *p;
134	struct oquota_args *uap;
135{
136
137	return (ENOSYS);
138}
139#endif /* COMPAT_43 */
140
141#ifndef _SYS_SYSPROTO_H_
142struct uname_args {
143        struct utsname  *name;
144};
145#endif
146
147/* ARGSUSED */
148int
149uname(p, uap)
150	struct proc *p;
151	struct uname_args *uap;
152{
153	int name[2], rtval;
154	size_t len;
155	char *s, *us;
156
157	name[0] = CTL_KERN;
158	name[1] = KERN_OSTYPE;
159	len = sizeof uap->name->sysname;
160	rtval = userland_sysctl(p, name, 2, uap->name->sysname, &len,
161		1, 0, 0, 0);
162	if( rtval) return rtval;
163	subyte( uap->name->sysname + sizeof(uap->name->sysname) - 1, 0);
164
165	name[1] = KERN_HOSTNAME;
166	len = sizeof uap->name->nodename;
167	rtval = userland_sysctl(p, name, 2, uap->name->nodename, &len,
168		1, 0, 0, 0);
169	if( rtval) return rtval;
170	subyte( uap->name->nodename + sizeof(uap->name->nodename) - 1, 0);
171
172	name[1] = KERN_OSRELEASE;
173	len = sizeof uap->name->release;
174	rtval = userland_sysctl(p, name, 2, uap->name->release, &len,
175		1, 0, 0, 0);
176	if( rtval) return rtval;
177	subyte( uap->name->release + sizeof(uap->name->release) - 1, 0);
178
179/*
180	name = KERN_VERSION;
181	len = sizeof uap->name->version;
182	rtval = userland_sysctl(p, name, 2, uap->name->version, &len,
183		1, 0, 0, 0);
184	if( rtval) return rtval;
185	subyte( uap->name->version + sizeof(uap->name->version) - 1, 0);
186*/
187
188/*
189 * this stupid hackery to make the version field look like FreeBSD 1.1
190 */
191	for(s = version; *s && *s != '#'; s++);
192
193	for(us = uap->name->version; *s && *s != ':'; s++) {
194		rtval = subyte( us++, *s);
195		if( rtval)
196			return rtval;
197	}
198	rtval = subyte( us++, 0);
199	if( rtval)
200		return rtval;
201
202	name[0] = CTL_HW;
203	name[1] = HW_MACHINE;
204	len = sizeof uap->name->machine;
205	rtval = userland_sysctl(p, name, 2, uap->name->machine, &len,
206		1, 0, 0, 0);
207	if( rtval) return rtval;
208	subyte( uap->name->machine + sizeof(uap->name->machine) - 1, 0);
209
210	return 0;
211}
212
213#ifndef _SYS_SYSPROTO_H_
214struct getdomainname_args {
215        char    *domainname;
216        int     len;
217};
218#endif
219
220/* ARGSUSED */
221int
222getdomainname(p, uap)
223        struct proc *p;
224        struct getdomainname_args *uap;
225{
226	int domainnamelen = strlen(domainname) + 1;
227	if ((u_int)uap->len > domainnamelen + 1)
228		uap->len = domainnamelen + 1;
229	return (copyout((caddr_t)domainname, (caddr_t)uap->domainname, uap->len));
230}
231
232#ifndef _SYS_SYSPROTO_H_
233struct setdomainname_args {
234        char    *domainname;
235        int     len;
236};
237#endif
238
239/* ARGSUSED */
240int
241setdomainname(p, uap)
242        struct proc *p;
243        struct setdomainname_args *uap;
244{
245        int error, domainnamelen;
246
247        if ((error = suser(p->p_ucred, &p->p_acflag)))
248                return (error);
249        if ((u_int)uap->len > sizeof (domainname) - 1)
250                return EINVAL;
251        domainnamelen = uap->len;
252        error = copyin((caddr_t)uap->domainname, domainname, uap->len);
253        domainname[domainnamelen] = 0;
254        return (error);
255}
256
257