lib/libc/gen/uname.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. 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.
  16  *
  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.
  28  *
  29  * @(#)uname.c  8.1 (Berkeley) 1/4/94
  30  * $FreeBSD: src/lib/libc/gen/uname.c,v 1.7 1999/08/27 23:59:06 peter Exp $
  31  */
  32
  33 #include <sys/param.h>
  34 #include <sys/sysctl.h>
  35 #include <sys/utsname.h>
  36 #include <sys/varsym.h>
  37
  38 #include <errno.h>
  39 #include <stdlib.h>
  40 #include <string.h>
  41 #include <unistd.h>
  42
  43 int
  44 uname(struct utsname *name)
  45 {
  46         int mib[2], rval;
  47         size_t len;
  48         char *p;
  49         char buf[MAXVARSYM_DATA];
  50         int oerrno;
  51
  52         rval = 0;
  53
  54         if ((p = getenv("UNAME_s"))) {
  55                 strlcpy(name->sysname, p, sizeof(name->sysname));
  56         } else if (varsym_get(VARSYM_ALL_MASK, "UNAME_s", buf, sizeof(buf)) == 0) {
  57                 strlcpy(name->sysname, buf, sizeof(name->sysname));
  58         } else {
  59                 mib[0] = CTL_KERN;
  60                 mib[1] = KERN_OSTYPE;
  61                 len = sizeof(name->sysname);
  62                 oerrno = errno;
  63                 if (sysctl(mib, 2, &name->sysname, &len, NULL, 0) == -1) {
  64                         if(errno == ENOMEM)
  65                                 errno = oerrno;
  66                         else
  67                                 rval = -1;
  68                 }
  69                 name->sysname[sizeof(name->sysname) - 1] = '\0';
  70         }
  71
  72         mib[0] = CTL_KERN;
  73         mib[1] = KERN_HOSTNAME;
  74         len = sizeof(name->nodename);
  75         oerrno = errno;
  76         if (sysctl(mib, 2, &name->nodename, &len, NULL, 0) == -1) {
  77                 if(errno == ENOMEM)
  78                         errno = oerrno;
  79                 else
  80                         rval = -1;
  81         }
  82         name->nodename[sizeof(name->nodename) - 1] = '\0';
  83
  84         if ((p = getenv("UNAME_r"))) {
  85                 strlcpy(name->release, p, sizeof(name->release));
  86         } else if (varsym_get(VARSYM_ALL_MASK, "UNAME_r", buf, sizeof(buf)) == 0) {
  87                 strlcpy(name->release, buf, sizeof(name->sysname));
  88         } else {
  89                 mib[0] = CTL_KERN;
  90                 mib[1] = KERN_OSRELEASE;
  91                 len = sizeof(name->release);
  92                 oerrno = errno;
  93                 if (sysctl(mib, 2, &name->release, &len, NULL, 0) == -1) {
  94                         if(errno == ENOMEM)
  95                                 errno = oerrno;
  96                         else
  97                                 rval = -1;
  98                 }
  99                 name->release[sizeof(name->release) - 1] = '\0';
 100         }
 101
 102         if ((p = getenv("UNAME_v"))) {
 103                 strlcpy(name->version, p, sizeof(name->version));
 104         } else if (varsym_get(VARSYM_ALL_MASK, "UNAME_v", buf, sizeof(buf)) == 0) {
 105                 strlcpy(name->version, buf, sizeof(name->sysname));
 106         } else {
 107                 /* The version may contain newlines, turn them into spaces. */
 108                 mib[0] = CTL_KERN;
 109                 mib[1] = KERN_VERSION;
 110                 len = sizeof(name->version);
 111                 oerrno = errno;
 112                 if (sysctl(mib, 2, &name->version, &len, NULL, 0) == -1) {
 113                         if (errno == ENOMEM)
 114                                 errno = oerrno;
 115                         else
 116                                 rval = -1;
 117                 }
 118                 name->version[sizeof(name->version) - 1] = '\0';
 119                 for (p = name->version; len--; ++p) {
 120                         if (*p == '\n' || *p == '\t') {
 121                                 if (len > 1)
 122                                         *p = ' ';
 123                                 else
 124                                         *p = '\0';
 125                         }
 126                 }
 127         }
 128
 129         if ((p = getenv("UNAME_m"))) {
 130                 strlcpy(name->machine, p, sizeof(name->machine));
 131         } else if (varsym_get(VARSYM_ALL_MASK, "UNAME_m", buf, sizeof(buf)) == 0) {
 132                 strlcpy(name->machine, buf, sizeof(name->sysname));
 133         } else {
 134                 oerrno = errno;
 135                 mib[1] = HW_MACHINE;
 136                 mib[0] = CTL_HW;
 137                 len = sizeof(name->machine);
 138                 if (sysctl(mib, 2, &name->machine, &len, NULL, 0) == -1) {
 139                         if (errno == ENOMEM) {
 140                                 errno = oerrno;
 141                         } else {
 142                                 rval = -1;
 143                         }
 144                 }
 145                 name->machine[sizeof(name->machine) - 1] = '\0';
 146         }
 147         return (rval);
 148 }