Fix "ls: not found" problem during buildworld. mdate.sh script
[dragonfly.git] / sys / kern / kern_xxx.c
blob9b68d669faba156f95e4b16703a73123cbdc4582
1 /*
2 * Copyright (c) 1982, 1986, 1989, 1993
3 * The Regents of the University of California. All rights reserved.
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.
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.
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.8 2003/11/14 01:53:55 daver Exp $
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/sysproto.h>
41 #include <sys/kernel.h>
42 #include <sys/proc.h>
43 #include <sys/sysctl.h>
44 #include <sys/utsname.h>
46 /* ARGSUSED */
47 int
48 uname(struct uname_args *uap)
50 int name[2], rtval;
51 size_t len;
52 char *s, *us;
54 name[0] = CTL_KERN;
55 name[1] = KERN_OSTYPE;
56 len = sizeof uap->name->sysname;
57 rtval = userland_sysctl(name, 2, uap->name->sysname, &len,
58 1, 0, 0, 0);
59 if( rtval) return rtval;
60 subyte( uap->name->sysname + sizeof(uap->name->sysname) - 1, 0);
62 name[1] = KERN_HOSTNAME;
63 len = sizeof uap->name->nodename;
64 rtval = userland_sysctl(name, 2, uap->name->nodename, &len,
65 1, 0, 0, 0);
66 if( rtval) return rtval;
67 subyte( uap->name->nodename + sizeof(uap->name->nodename) - 1, 0);
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) return rtval;
74 subyte( uap->name->release + sizeof(uap->name->release) - 1, 0);
77 name = KERN_VERSION;
78 len = sizeof uap->name->version;
79 rtval = userland_sysctl(name, 2, uap->name->version, &len,
80 1, 0, 0, 0);
81 if( rtval) return rtval;
82 subyte( uap->name->version + sizeof(uap->name->version) - 1, 0);
86 * this stupid hackery to make the version field look like FreeBSD 1.1
88 for(s = version; *s && *s != '#'; s++);
90 for(us = uap->name->version; *s && *s != ':'; s++) {
91 rtval = subyte( us++, *s);
92 if( rtval)
93 return rtval;
95 rtval = subyte( us++, 0);
96 if( rtval)
97 return rtval;
99 name[0] = CTL_HW;
100 name[1] = HW_MACHINE;
101 len = sizeof uap->name->machine;
102 rtval = userland_sysctl(name, 2, uap->name->machine, &len,
103 1, 0, 0, 0);
104 if( rtval) return rtval;
105 subyte( uap->name->machine + sizeof(uap->name->machine) - 1, 0);
107 return 0;
110 /* ARGSUSED */
112 getdomainname(struct getdomainname_args *uap)
114 int domainnamelen = strlen(domainname) + 1;
115 if ((u_int)uap->len > domainnamelen + 1)
116 uap->len = domainnamelen + 1;
117 return (copyout((caddr_t)domainname, (caddr_t)uap->domainname, uap->len));
120 /* ARGSUSED */
122 setdomainname(struct setdomainname_args *uap)
124 struct thread *td = curthread;
125 int error, domainnamelen;
127 if ((error = suser(td)))
128 return (error);
129 if ((u_int)uap->len > sizeof (domainname) - 1)
130 return EINVAL;
131 domainnamelen = uap->len;
132 error = copyin((caddr_t)uap->domainname, domainname, uap->len);
133 domainname[domainnamelen] = 0;
134 return (error);