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.8 1994/10/02 17:35:21 phk Exp $ 35 */ 36 37 #include <sys/param.h> 38 #include <sys/systm.h> 39 #include <sys/kernel.h> 40 #include <sys/proc.h> 41 #include <sys/reboot.h> 42 #include <vm/vm.h> 43 #include <sys/sysctl.h> 44 #include <sys/utsname.h> 45 #include <sys/signalvar.h> 46 47 /* This implements a "TEXT_SET" for cleanup functions */ 48 49 static void 50 dummy_cleanup() {} 51 TEXT_SET(cleanup_set, dummy_cleanup); 52 53 typedef void (*cleanup_func_t)(void); 54 extern const struct linker_set cleanup_set; 55 static const cleanup_func_t *cleanups = 56 (const cleanup_func_t *)&cleanup_set.ls_items[0]; 57 58 struct reboot_args { 59 int opt; 60 }; 61 /* ARGSUSED */ 62 int 63 reboot(p, uap, retval) 64 struct proc *p; 65 struct reboot_args *uap; 66 int *retval; 67 { 68 int error; 69 70 if ((error = suser(p->p_ucred, &p->p_acflag))) 71 return (error); 72 73 if (!uap->opt & RB_NOSYNC) { 74 printf("\ncleaning up... "); 75 while(*cleanups) { 76 (**cleanups++)(); 77 } 78 } 79 80 boot(uap->opt); 81 return (0); 82 } 83 84 #if defined(COMPAT_43) || defined(COMPAT_SUNOS) 85 86 struct gethostname_args { 87 char *hostname; 88 u_int len; 89 }; 90 /* ARGSUSED */ 91 int 92 ogethostname(p, uap, retval) 93 struct proc *p; 94 struct gethostname_args *uap; 95 int *retval; 96 { 97 int name; 98 99 name = KERN_HOSTNAME; 100 return (kern_sysctl(&name, 1, uap->hostname, &uap->len, 0, 0, p)); 101 } 102 103 struct sethostname_args { 104 char *hostname; 105 u_int len; 106 }; 107 /* ARGSUSED */ 108 int 109 osethostname(p, uap, retval) 110 struct proc *p; 111 register struct sethostname_args *uap; 112 int *retval; 113 { 114 int name; 115 int error; 116 117 if ((error = suser(p->p_ucred, &p->p_acflag))) 118 return (error); 119 name = KERN_HOSTNAME; 120 return (kern_sysctl(&name, 1, 0, 0, uap->hostname, uap->len, p)); 121 } 122 123 struct gethostid_args { 124 int dummy; 125 }; 126 /* ARGSUSED */ 127 int 128 ogethostid(p, uap, retval) 129 struct proc *p; 130 struct gethostid_args *uap; 131 int *retval; 132 { 133 134 *(long *)retval = hostid; 135 return (0); 136 } 137 #endif /* COMPAT_43 || COMPAT_SUNOS */ 138 139 #ifdef COMPAT_43 140 struct sethostid_args { 141 long hostid; 142 }; 143 /* ARGSUSED */ 144 int 145 osethostid(p, uap, retval) 146 struct proc *p; 147 struct sethostid_args *uap; 148 int *retval; 149 { 150 int error; 151 152 if ((error = suser(p->p_ucred, &p->p_acflag))) 153 return (error); 154 hostid = uap->hostid; 155 return (0); 156 } 157 158 int 159 oquota() 160 { 161 162 return (ENOSYS); 163 } 164 #endif /* COMPAT_43 */ 165 166 void 167 shutdown_nice(void) 168 { 169 register struct proc *p; 170 171 /* Send a signal to init(8) and have it shutdown the world */ 172 p = pfind(1); 173 psignal(p, SIGINT); 174 175 return; 176 } 177 178 179 struct uname_args { 180 struct utsname *name; 181 }; 182 183 /* ARGSUSED */ 184 int 185 uname(p, uap, retval) 186 struct proc *p; 187 struct uname_args *uap; 188 int *retval; 189 { 190 int name; 191 int len; 192 int rtval; 193 char *s, *us; 194 195 name = KERN_OSTYPE; 196 len = sizeof uap->name->sysname; 197 rtval = kern_sysctl(&name, 1, uap->name->sysname, &len, 0, 0, p); 198 if( rtval) return rtval; 199 subyte( uap->name->sysname + sizeof(uap->name->sysname) - 1, 0); 200 201 name = KERN_HOSTNAME; 202 len = sizeof uap->name->nodename; 203 rtval = kern_sysctl(&name, 1, uap->name->nodename, &len, 0, 0, p); 204 if( rtval) return rtval; 205 subyte( uap->name->nodename + sizeof(uap->name->nodename) - 1, 0); 206 207 name = KERN_OSRELEASE; 208 len = sizeof uap->name->release; 209 rtval = kern_sysctl(&name, 1, uap->name->release, &len, 0, 0, p); 210 if( rtval) return rtval; 211 subyte( uap->name->release + sizeof(uap->name->release) - 1, 0); 212 213 /* 214 name = KERN_VERSION; 215 len = sizeof uap->name->version; 216 rtval = kern_sysctl(&name, 1, uap->name->version, &len, 0, 0, p); 217 if( rtval) return rtval; 218 subyte( uap->name->version + sizeof(uap->name->version) - 1, 0); 219 */ 220 221 /* 222 * this stupid hackery to make the version field look like FreeBSD 1.1 223 */ 224 for(s = version; *s && *s != '#'; s++); 225 226 for(us = uap->name->version; *s && *s != ':'; s++) { 227 rtval = subyte( us++, *s); 228 if( rtval) 229 return rtval; 230 } 231 rtval = subyte( us++, 0); 232 if( rtval) 233 return rtval; 234 235 name = HW_MACHINE; 236 len = sizeof uap->name->machine; 237 rtval = hw_sysctl(&name, 1, uap->name->machine, &len, 0, 0, p); 238 if( rtval) return rtval; 239 subyte( uap->name->machine + sizeof(uap->name->machine) - 1, 0); 240 241 return 0; 242 } 243 244 struct getdomainname_args { 245 char *domainname; 246 u_int len; 247 }; 248 249 /* ARGSUSED */ 250 int 251 getdomainname(p, uap, retval) 252 struct proc *p; 253 struct getdomainname_args *uap; 254 int *retval; 255 { 256 if (uap->len > domainnamelen + 1) 257 uap->len = domainnamelen + 1; 258 return (copyout((caddr_t)domainname, (caddr_t)uap->domainname, uap->len)); 259 } 260 261 struct setdomainname_args { 262 char *domainname; 263 u_int len; 264 }; 265 266 /* ARGSUSED */ 267 int 268 setdomainname(p, uap, retval) 269 struct proc *p; 270 struct setdomainname_args *uap; 271 int *retval; 272 { 273 int error; 274 275 if ((error = suser(p->p_ucred, &p->p_acflag))) 276 return (error); 277 if (uap->len > sizeof (domainname) - 1) 278 return EINVAL; 279 domainnamelen = uap->len; 280 error = copyin((caddr_t)uap->domainname, domainname, uap->len); 281 domainname[domainnamelen] = 0; 282 return (error); 283 } 284 285