lib/libc/gen/__xuname.c

   1 /*-
   2  * Copyright (c) 1994
   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
  34 #if defined(LIBC_SCCS) && !defined(lint)
  35 /*static char sccsid[] = "From: @(#)uname.c     8.1 (Berkeley) 1/4/94";*/
  36 #endif /* LIBC_SCCS and not lint */
  37 #include <sys/cdefs.h>
  38 __FBSDID("$FreeBSD$");
  39
  40 #include <sys/param.h>
  41 #include <sys/sysctl.h>
  42 #include <sys/utsname.h>
  43 #include <errno.h>
  44 #include <stdlib.h>
  45 #include <string.h>
  46
  47 int
  48 __xuname(int namesize, void *namebuf)
  49 {
  50         int mib[2], rval;
  51         size_t len;
  52         char *p;
  53         int oerrno;
  54         struct xutsname {
  55                 char    sysname[namesize];      /* Name of this OS. */
  56                 char    nodename[namesize];     /* Name of this network node. */
  57                 char    release[namesize];      /* Release level. */
  58                 char    version[namesize];      /* Version level. */
  59                 char    machine[namesize];      /* Hardware type. */
  60         } *name;
  61
  62         name = (struct xutsname *)namebuf;
  63         rval = 0;
  64
  65         mib[0] = CTL_KERN;
  66         mib[1] = KERN_OSTYPE;
  67         len = sizeof(name->sysname);
  68         oerrno = errno;
  69         if (sysctl(mib, 2, &name->sysname, &len, NULL, 0) == -1) {
  70                 if(errno == ENOMEM)
  71                         errno = oerrno;
  72                 else
  73                         rval = -1;
  74         }
  75         name->sysname[sizeof(name->sysname) - 1] = '\0';
  76         if ((p = getenv("UNAME_s")))
  77                 strlcpy(name->sysname, p, sizeof(name->sysname));
  78
  79         mib[0] = CTL_KERN;
  80         mib[1] = KERN_HOSTNAME;
  81         len = sizeof(name->nodename);
  82         oerrno = errno;
  83         if (sysctl(mib, 2, &name->nodename, &len, NULL, 0) == -1) {
  84                 if(errno == ENOMEM)
  85                         errno = oerrno;
  86                 else
  87                         rval = -1;
  88         }
  89         name->nodename[sizeof(name->nodename) - 1] = '\0';
  90
  91         mib[0] = CTL_KERN;
  92         mib[1] = KERN_OSRELEASE;
  93         len = sizeof(name->release);
  94         oerrno = errno;
  95         if (sysctl(mib, 2, &name->release, &len, NULL, 0) == -1) {
  96                 if(errno == ENOMEM)
  97                         errno = oerrno;
  98                 else
  99                         rval = -1;
 100         }
 101         name->release[sizeof(name->release) - 1] = '\0';
 102         if ((p = getenv("UNAME_r")))
 103                 strlcpy(name->release, p, sizeof(name->release));
 104
 105         /* The version may have newlines in it, turn them into spaces. */
 106         mib[0] = CTL_KERN;
 107         mib[1] = KERN_VERSION;
 108         len = sizeof(name->version);
 109         oerrno = errno;
 110         if (sysctl(mib, 2, &name->version, &len, NULL, 0) == -1) {
 111                 if (errno == ENOMEM)
 112                         errno = oerrno;
 113                 else
 114                         rval = -1;
 115         }
 116         name->version[sizeof(name->version) - 1] = '\0';
 117         for (p = name->version; len--; ++p) {
 118                 if (*p == '\n' || *p == '\t') {
 119                         if (len > 1)
 120                                 *p = ' ';
 121                         else
 122                                 *p = '\0';
 123                 }
 124         }
 125         if ((p = getenv("UNAME_v")))
 126                 strlcpy(name->version, p, sizeof(name->version));
 127
 128         mib[0] = CTL_HW;
 129         mib[1] = HW_MACHINE;
 130         len = sizeof(name->machine);
 131         oerrno = errno;
 132         if (sysctl(mib, 2, &name->machine, &len, NULL, 0) == -1) {
 133                 if (errno == ENOMEM)
 134                         errno = oerrno;
 135                 else
 136                         rval = -1;
 137         }
 138         name->machine[sizeof(name->machine) - 1] = '\0';
 139         if ((p = getenv("UNAME_m")))
 140                 strlcpy(name->machine, p, sizeof(name->machine));
 141         return (rval);
 142 }