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