libedit: Add bapt patches to improve unicode
[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. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  *      @(#)kern_xxx.c  8.2 (Berkeley) 11/14/93
30  * $FreeBSD: src/sys/kern/kern_xxx.c,v 1.31 1999/08/28 00:46:15 peter Exp $
31  * $DragonFly: src/sys/kern/kern_xxx.c,v 1.10 2006/06/05 07:26:10 dillon Exp $
32  */
33
34 #include <sys/param.h>
35 #include <sys/systm.h>
36 #include <sys/sysproto.h>
37 #include <sys/kernel.h>
38 #include <sys/proc.h>
39 #include <sys/priv.h>
40 #include <sys/sysctl.h>
41 #include <sys/utsname.h>
42
43 struct lwkt_token domain_token = LWKT_TOKEN_INITIALIZER(domain_token);
44
45 int
46 sys_uname(struct uname_args *uap)
47 {
48         int name[2], rtval;
49         size_t len;
50         char *s, *us;
51
52         name[0] = CTL_KERN;
53         name[1] = KERN_OSTYPE;
54         len = sizeof uap->name->sysname;
55         rtval = userland_sysctl(name, 2, uap->name->sysname, &len, 
56                                 1, 0, 0, 0);
57         if (rtval)
58                 goto done;
59         subyte(uap->name->sysname + sizeof(uap->name->sysname) - 1, 0);
60
61         name[1] = KERN_HOSTNAME;
62         len = sizeof uap->name->nodename;
63         rtval = userland_sysctl(name, 2, uap->name->nodename, &len, 
64                                 1, 0, 0, 0);
65         if (rtval)
66                 goto done;
67         subyte(uap->name->nodename + sizeof(uap->name->nodename) - 1, 0);
68
69         name[1] = KERN_OSRELEASE;
70         len = sizeof uap->name->release;
71         rtval = userland_sysctl(name, 2, uap->name->release, &len, 
72                                 1, 0, 0, 0);
73         if (rtval)
74                 goto done;
75         subyte(uap->name->release + sizeof(uap->name->release) - 1, 0);
76
77 /*
78         name = KERN_VERSION;
79         len = sizeof uap->name->version;
80         rtval = userland_sysctl(name, 2, uap->name->version, &len, 
81                                 1, 0, 0, 0);
82         if (rtval)
83                 goto done;
84         subyte(uap->name->version + sizeof(uap->name->version) - 1, 0);
85 */
86
87 /*
88  * this stupid hackery to make the version field look like FreeBSD 1.1
89  */
90         for(s = version; *s && *s != '#'; s++);
91
92         for(us = uap->name->version; *s && *s != ':'; s++) {
93                 rtval = subyte( us++, *s);
94                 if (rtval)
95                         goto done;
96         }
97         rtval = subyte( us++, 0);
98         if (rtval)
99                 goto done;
100
101         name[0] = CTL_HW;
102         name[1] = HW_MACHINE;
103         len = sizeof uap->name->machine;
104         rtval = userland_sysctl(name, 2, uap->name->machine, &len, 
105                                 1, 0, 0, 0);
106         if (rtval)
107                 goto done;
108         rtval = subyte(uap->name->machine + sizeof(uap->name->machine) - 1, 0);
109 done:
110         return rtval;
111 }
112
113 int
114 sys_getdomainname(struct getdomainname_args *uap)
115 {
116         int domainnamelen;
117         int error;
118
119         lwkt_gettoken_shared(&domain_token);
120         domainnamelen = strlen(domainname) + 1;
121         if ((u_int)uap->len > domainnamelen + 1)
122                 uap->len = domainnamelen + 1;
123         error = copyout(domainname, uap->domainname, uap->len);
124         lwkt_reltoken(&domain_token);
125         return (error);
126 }
127
128 int
129 sys_setdomainname(struct setdomainname_args *uap)
130 {
131         struct thread *td = curthread;
132         int error, domainnamelen;
133
134         if ((error = priv_check(td, PRIV_SETDOMAINNAME)))
135                 return (error);
136         if ((u_int)uap->len > sizeof(domainname) - 1)
137                 return EINVAL;
138         lwkt_gettoken(&domain_token);
139
140         domainnamelen = uap->len;
141         error = copyin(uap->domainname, domainname, uap->len);
142         domainname[domainnamelen] = 0;
143
144         lwkt_reltoken(&domain_token);
145         return (error);
146 }