1 /*- 2 * Copyright (c) 2002 Juli Mallett. 3 * Copyright (c) 1993 4 * The Regents of the University of California. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. Neither the name of the University nor the names of its contributors 15 * may be used to endorse or promote products derived from this software 16 * without specific prior written permission. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28 * SUCH DAMAGE. 29 * 30 * @(#) Copyright (c) 1993 The Regents of the University of California. All rights reserved. 31 * @(#)uname.c 8.2 (Berkeley) 5/4/95 32 * $FreeBSD: src/usr.bin/uname/uname.c,v 1.4.6.2 2002/10/17 07:47:29 jmallett Exp $ 33 */ 34 35 #include <sys/param.h> 36 #include <sys/sysctl.h> 37 #include <sys/varsym.h> 38 39 #include <err.h> 40 #include <stdio.h> 41 #include <stdlib.h> 42 #include <unistd.h> 43 #include <string.h> 44 45 #define MFLAG 0x0001 46 #define NFLAG 0x0002 47 #define PFLAG 0x0004 48 #define RFLAG 0x0008 49 #define SFLAG 0x0010 50 #define VFLAG 0x0020 51 #define IFLAG 0x0040 52 #define GFLAG 0x0080 53 #define GFLAG2 0x0100 54 55 typedef void (*get_t)(void); 56 get_t get_ident, get_machine, get_hostname, get_arch; 57 get_t get_release, get_sysname, get_version, get_pkgabi; 58 59 void native_ident(void); 60 void native_machine(void); 61 void native_hostname(void); 62 void native_arch(void); 63 void native_release(void); 64 void native_sysname(void); 65 void native_version(void); 66 void native_pkgabi(void); 67 void print_uname(void); 68 void setup_get(void); 69 void usage(void); 70 71 static char *ident, *machine, *hostname, *arch; 72 static char *release, *sysname, *version, *pkgabi; 73 static int space; 74 static u_int flags; 75 76 int 77 main(int argc, char *argv[]) 78 { 79 int ch; 80 81 setup_get(); 82 83 while ((ch = getopt(argc, argv, "aimnprsvP")) != -1) { 84 switch(ch) { 85 case 'a': 86 flags |= (MFLAG | NFLAG | RFLAG | SFLAG | VFLAG); 87 break; 88 case 'i': 89 flags |= IFLAG; 90 break; 91 case 'm': 92 flags |= MFLAG; 93 break; 94 case 'n': 95 flags |= NFLAG; 96 break; 97 case 'p': 98 flags |= PFLAG; 99 break; 100 case 'r': 101 flags |= RFLAG; 102 break; 103 case 's': 104 flags |= SFLAG; 105 break; 106 case 'v': 107 flags |= VFLAG; 108 break; 109 case 'P': 110 if (flags & GFLAG) /* don't adjust odd numbers */ 111 flags |= GFLAG2; 112 flags |= GFLAG; 113 break; 114 case '?': 115 default: 116 usage(); 117 } 118 } 119 120 argc -= optind; 121 argv += optind; 122 123 if (argc) 124 usage(); 125 126 if (!flags) 127 flags |= SFLAG; 128 129 print_uname(); 130 exit(0); 131 } 132 133 /* 134 * Overrides. 135 * 136 * UNAME_x env variables have the highest priority 137 * UNAME_x varsyms have the next highest priority 138 * values retrieved from sysctls have the lowest priority 139 */ 140 static 141 void 142 CHECK_ENV(const char *envname, get_t *getp, get_t nativep, char **varp) 143 { 144 char buf[1024]; 145 146 if ((*varp = getenv(envname)) == NULL) { 147 if (varsym_get(VARSYM_ALL_MASK, envname, 148 buf, sizeof(buf)) < 0) { 149 *getp = nativep; 150 return; 151 } 152 *varp = strdup(buf); 153 } 154 *getp = NULL; 155 } 156 157 void 158 setup_get(void) 159 { 160 CHECK_ENV("UNAME_s", &get_sysname, native_sysname, &sysname); 161 CHECK_ENV("UNAME_n", &get_hostname, native_hostname, &hostname); 162 CHECK_ENV("UNAME_r", &get_release, native_release, &release); 163 CHECK_ENV("UNAME_v", &get_version, native_version, &version); 164 CHECK_ENV("UNAME_m", &get_machine, native_machine, &machine); 165 CHECK_ENV("UNAME_p", &get_arch, native_arch, &arch); 166 CHECK_ENV("UNAME_i", &get_ident, native_ident, &ident); 167 CHECK_ENV("UNAME_G", &get_pkgabi, native_pkgabi, &pkgabi); 168 } 169 170 #define PRINT_FLAG(flags,flag,var) \ 171 if ((flags & flag) == flag) { \ 172 if (space) \ 173 printf(" "); \ 174 else \ 175 space++; \ 176 if (get_##var != NULL) \ 177 (*get_##var)(); \ 178 printf("%s", var); \ 179 } 180 181 void 182 print_uname(void) 183 { 184 PRINT_FLAG(flags, SFLAG, sysname); 185 PRINT_FLAG(flags, NFLAG, hostname); 186 PRINT_FLAG(flags, RFLAG, release); 187 PRINT_FLAG(flags, VFLAG, version); 188 PRINT_FLAG(flags, MFLAG, machine); 189 PRINT_FLAG(flags, PFLAG, arch); 190 PRINT_FLAG(flags, IFLAG, ident); 191 PRINT_FLAG(flags, GFLAG, pkgabi); 192 printf("\n"); 193 } 194 195 #define NATIVE_SYSCTL2_GET(var,mib0,mib1) \ 196 void \ 197 native_##var(void) \ 198 { \ 199 int mib[] = { (mib0), (mib1) }; \ 200 size_t len; \ 201 static char buf[1024]; \ 202 char **varp = &(var); \ 203 \ 204 len = sizeof buf; \ 205 if (sysctl(mib, sizeof mib / sizeof mib[0], \ 206 &buf, &len, NULL, 0) == -1) \ 207 err(1, "sysctl"); 208 209 #define NATIVE_SYSCTLNAME_GET(var,name) \ 210 void \ 211 native_##var(void) \ 212 { \ 213 size_t len; \ 214 static char buf[1024]; \ 215 char **varp = &(var); \ 216 \ 217 len = sizeof buf; \ 218 if (sysctlbyname(name, &buf, &len, NULL,\ 219 0) == -1) \ 220 err(1, "sysctlbyname"); 221 222 #define NATIVE_SET \ 223 *varp = buf; \ 224 return; \ 225 } struct __hack 226 227 #define NATIVE_BUFFER (buf) 228 #define NATIVE_LENGTH (len) 229 230 NATIVE_SYSCTL2_GET(sysname, CTL_KERN, KERN_OSTYPE) { 231 } NATIVE_SET; 232 233 NATIVE_SYSCTL2_GET(hostname, CTL_KERN, KERN_HOSTNAME) { 234 } NATIVE_SET; 235 236 NATIVE_SYSCTL2_GET(release, CTL_KERN, KERN_OSRELEASE) { 237 } NATIVE_SET; 238 239 NATIVE_SYSCTL2_GET(version, CTL_KERN, KERN_VERSION) { 240 size_t n; 241 char *p; 242 243 p = NATIVE_BUFFER; 244 n = NATIVE_LENGTH; 245 for (; n--; ++p) 246 if (*p == '\n' || *p == '\t') 247 *p = ' '; 248 } NATIVE_SET; 249 250 NATIVE_SYSCTL2_GET(machine, CTL_HW, HW_MACHINE) { 251 } NATIVE_SET; 252 253 NATIVE_SYSCTL2_GET(arch, CTL_HW, HW_MACHINE_ARCH) { 254 } NATIVE_SET; 255 256 NATIVE_SYSCTLNAME_GET(ident, "kern.ident") { 257 } NATIVE_SET; 258 259 void \ 260 native_pkgabi(void) \ 261 { 262 char osrel[64]; 263 char mach[64]; 264 size_t len; 265 double d; 266 267 len = sizeof(osrel); 268 if (sysctlbyname("kern.osrelease", osrel, &len, NULL, 0) == -1) 269 err(1, "sysctlbyname"); 270 len = sizeof(mach); 271 if (sysctlbyname("hw.machine", mach, &len, NULL, 0) == -1) 272 err(1, "sysctlbyname"); 273 274 /* 275 * Current convention is to adjust odd release numbers to even. 276 */ 277 d = strtod(osrel, NULL); 278 if ((flags & GFLAG2) == 0) { 279 if ((int)(d * 10) & 1) 280 d = d + 0.1; /* force to nearest even release */ 281 } 282 283 /* 284 * pkgng expects the ABI in a different form 285 */ 286 if (strcmp(mach, "x86_64") == 0) 287 snprintf(mach, sizeof(mach), "x86:64"); 288 else if (strcmp(mach, "i386") == 0) 289 snprintf(mach, sizeof(mach), "x86:32"); 290 291 asprintf(&pkgabi, "dragonfly:%3.1f:%s", d, mach); 292 } 293 294 void 295 usage(void) 296 { 297 fprintf(stderr, "usage: uname [-aimnprsv]\n"); 298 exit(1); 299 } 300