hyperv: Implement Hyper-V reference TSC cputimer.
[dragonfly.git] / sys / kern / kern_xxx.c
blobffc4d186f4a40302d4e1453e2f5da04d46136704
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. 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.
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.
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 $
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>
43 struct lwkt_token domain_token = LWKT_TOKEN_INITIALIZER(domain_token);
45 int
46 sys_uname(struct uname_args *uap)
48 int name[2], rtval;
49 size_t len;
50 char *s, *us;
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);
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);
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);
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);
88 * this stupid hackery to make the version field look like FreeBSD 1.1
90 for(s = version; *s && *s != '#'; s++);
92 for(us = uap->name->version; *s && *s != ':'; s++) {
93 rtval = subyte( us++, *s);
94 if (rtval)
95 goto done;
97 rtval = subyte( us++, 0);
98 if (rtval)
99 goto done;
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;
114 sys_getdomainname(struct getdomainname_args *uap)
116 int domainnamelen;
117 int error;
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);
129 sys_setdomainname(struct setdomainname_args *uap)
131 struct thread *td = curthread;
132 int error, domainnamelen;
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);
140 domainnamelen = uap->len;
141 error = copyin(uap->domainname, domainname, uap->len);
142 domainname[domainnamelen] = 0;
144 lwkt_reltoken(&domain_token);
145 return (error);