xref: /freebsd/lib/libc/gen/__xuname.c (revision e796cc77c586c2955b2f3940dbf4991b31e8d289)
1 /*-
2  * SPDX-License-Identifier: BSD-3-Clause
3  *
4  * Copyright (c) 1994
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #if defined(LIBC_SCCS) && !defined(lint)
33 /*static char sccsid[] = "From: @(#)uname.c	8.1 (Berkeley) 1/4/94";*/
34 #endif /* LIBC_SCCS and not lint */
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD$");
37 
38 #include <sys/param.h>
39 #include <sys/sysctl.h>
40 #include <sys/utsname.h>
41 #include <errno.h>
42 #include <stdlib.h>
43 #include <string.h>
44 
45 int
46 __xuname(int namesize, void *namebuf)
47 {
48 	int mib[2], rval;
49 	size_t len;
50 	char *p, *q;
51 	int oerrno;
52 
53 	rval = 0;
54 	q = (char *)namebuf;
55 
56 	mib[0] = CTL_KERN;
57 
58 	if ((p = getenv("UNAME_s")))
59 		strlcpy(q, p, namesize);
60 	else {
61 		mib[1] = KERN_OSTYPE;
62 		len = namesize;
63 		oerrno = errno;
64 		if (sysctl(mib, 2, q, &len, NULL, 0) == -1) {
65 			if (errno == ENOMEM)
66 				errno = oerrno;
67 			else
68 				rval = -1;
69 		}
70 		q[namesize - 1] = '\0';
71 	}
72 	q += namesize;
73 
74 	mib[1] = KERN_HOSTNAME;
75 	len = namesize;
76 	oerrno = errno;
77 	if (sysctl(mib, 2, q, &len, NULL, 0) == -1) {
78 		if (errno == ENOMEM)
79 			errno = oerrno;
80 		else
81 			rval = -1;
82 	}
83 	q[namesize - 1] = '\0';
84 	q += namesize;
85 
86 	if ((p = getenv("UNAME_r")))
87 		strlcpy(q, p, namesize);
88 	else {
89 		mib[1] = KERN_OSRELEASE;
90 		len = namesize;
91 		oerrno = errno;
92 		if (sysctl(mib, 2, q, &len, NULL, 0) == -1) {
93 			if (errno == ENOMEM)
94 				errno = oerrno;
95 			else
96 				rval = -1;
97 		}
98 		q[namesize - 1] = '\0';
99 	}
100 	q += namesize;
101 
102 	if ((p = getenv("UNAME_v")))
103 		strlcpy(q, p, namesize);
104 	else {
105 
106 		/*
107 		 * The version may have newlines in it, turn them into
108 		 * spaces.
109 		 */
110 		mib[1] = KERN_VERSION;
111 		len = namesize;
112 		oerrno = errno;
113 		if (sysctl(mib, 2, q, &len, NULL, 0) == -1) {
114 			if (errno == ENOMEM)
115 				errno = oerrno;
116 			else
117 				rval = -1;
118 		}
119 		q[namesize - 1] = '\0';
120 		for (p = q; len--; ++p) {
121 			if (*p == '\n' || *p == '\t') {
122 				if (len > 1)
123 					*p = ' ';
124 				else
125 					*p = '\0';
126 			}
127 		}
128 	}
129 	q += namesize;
130 
131 	if ((p = getenv("UNAME_m")))
132 		strlcpy(q, p, namesize);
133 	else {
134 		mib[0] = CTL_HW;
135 		mib[1] = HW_MACHINE;
136 		len = namesize;
137 		oerrno = errno;
138 		if (sysctl(mib, 2, q, &len, NULL, 0) == -1) {
139 			if (errno == ENOMEM)
140 				errno = oerrno;
141 			else
142 				rval = -1;
143 		}
144 		q[namesize - 1] = '\0';
145 	}
146 
147 	return (rval);
148 }
149