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