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 <stdlib.h>
  37 #include <string.h>
  38 #include <errno.h>
  39
  40 int
  41 uname(struct utsname *name)
  42 {
  43         int mib[2], rval;
  44         size_t len;
  45         char *p;
  46         int oerrno;
  47
  48         rval = 0;
  49
  50         if ((p = getenv("UNAME_s"))) {
  51                 strlcpy(name->sysname, p, sizeof(name->sysname));
  52         } else {
  53                 mib[0] = CTL_KERN;
  54                 mib[1] = KERN_OSTYPE;
  55                 len = sizeof(name->sysname);
  56                 oerrno = errno;
  57                 if (sysctl(mib, 2, &name->sysname, &len, NULL, 0) == -1) {
  58                         if(errno == ENOMEM)
  59                                 errno = oerrno;
  60                         else
  61                                 rval = -1;
  62                 }
  63                 name->sysname[sizeof(name->sysname) - 1] = '\0';
  64         }
  65
  66         mib[0] = CTL_KERN;
  67         mib[1] = KERN_HOSTNAME;
  68         len = sizeof(name->nodename);
  69         oerrno = errno;
  70         if (sysctl(mib, 2, &name->nodename, &len, NULL, 0) == -1) {
  71                 if(errno == ENOMEM)
  72                         errno = oerrno;
  73                 else
  74                         rval = -1;
  75         }
  76         name->nodename[sizeof(name->nodename) - 1] = '\0';
  77
  78         if ((p = getenv("UNAME_r"))) {
  79                 strlcpy(name->release, p, sizeof(name->release));
  80         } else {
  81                 mib[0] = CTL_KERN;
  82                 mib[1] = KERN_OSRELEASE;
  83                 len = sizeof(name->release);
  84                 oerrno = errno;
  85                 if (sysctl(mib, 2, &name->release, &len, NULL, 0) == -1) {
  86                         if(errno == ENOMEM)
  87                                 errno = oerrno;
  88                         else
  89                                 rval = -1;
  90                 }
  91                 name->release[sizeof(name->release) - 1] = '\0';
  92         }
  93
  94         if ((p = getenv("UNAME_v"))) {
  95                 strlcpy(name->version, p, sizeof(name->version));
  96         } else {
  97                 /* The version may contain newlines, turn them into spaces. */
  98                 mib[0] = CTL_KERN;
  99                 mib[1] = KERN_VERSION;
 100                 len = sizeof(name->version);
 101                 oerrno = errno;
 102                 if (sysctl(mib, 2, &name->version, &len, NULL, 0) == -1) {
 103                         if (errno == ENOMEM)
 104                                 errno = oerrno;
 105                         else
 106                                 rval = -1;
 107                 }
 108                 name->version[sizeof(name->version) - 1] = '\0';
 109                 for (p = name->version; len--; ++p) {
 110                         if (*p == '\n' || *p == '\t') {
 111                                 if (len > 1)
 112                                         *p = ' ';
 113                                 else
 114                                         *p = '\0';
 115                         }
 116                 }
 117         }
 118
 119         if ((p = getenv("UNAME_m"))) {
 120                 strlcpy(name->machine, p, sizeof(name->machine));
 121         }
 122         else {
 123                 oerrno = errno;
 124                 mib[1] = HW_MACHINE;
 125                 mib[0] = CTL_HW;
 126                 len = sizeof(name->machine);
 127                 if (sysctl(mib, 2, &name->machine, &len, NULL, 0) == -1) {
 128                         if (errno == ENOMEM) {
 129                                 errno = oerrno;
 130                         } else {
 131                                 rval = -1;
 132                         }
 133                 }
 134                 name->machine[sizeof(name->machine) - 1] = '\0';
 135         }
 136         return (rval);
 137 }