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