1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 22 /* 23 * Copyright (c) 1990, 2010, Oracle and/or its affiliates. All rights reserved. 24 */ 25 26 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */ 27 /* All Rights Reserved */ 28 29 #include <stdio.h> 30 #include <stdarg.h> 31 #include <stdlib.h> 32 #include <unistd.h> 33 #include <strings.h> 34 #include <sys/systeminfo.h> 35 #include <sys/types.h> 36 #include <sys/stat.h> 37 #include "prtconf.h" 38 39 struct prt_opts opts; 40 struct prt_dbg dbg; 41 static char new_path[MAXPATHLEN]; 42 43 #define INDENT_LENGTH 4 44 45 #ifdef __x86 46 static const char *usage = "%s [ -V | -x | -abcdvpPD ] [ <device_path > ]\n"; 47 #else 48 static const char *usage = 49 "%s [ -F | -V | -x | -abcdvpPD ][ <device_path > ]\n"; 50 #endif /* __x86 */ 51 52 static void 53 setpname(const char *name) 54 { 55 char *p; 56 57 if (name == NULL) 58 opts.o_progname = "prtconf"; 59 else if (p = strrchr(name, '/')) 60 opts.o_progname = (const char *) p + 1; 61 else 62 opts.o_progname = name; 63 } 64 65 /*PRINTFLIKE1*/ 66 void 67 dprintf(const char *fmt, ...) 68 { 69 if (dbg.d_debug) { 70 va_list ap; 71 va_start(ap, fmt); 72 (void) vfprintf(stderr, fmt, ap); 73 va_end(ap); 74 } 75 } 76 77 void 78 indent_to_level(int ilev) 79 { 80 (void) printf("%*s", INDENT_LENGTH * ilev, ""); 81 } 82 83 static void 84 cleanup_path(const char *input_path, char *path) 85 { 86 char *ptr, *ptr2; 87 size_t len; 88 89 if ((input_path == NULL) || (path == NULL)) 90 return; 91 92 (void) strcpy(path, input_path); 93 94 /*LINTED*/ 95 while (1) { 96 len = strlen(path); 97 if (len == 0) 98 break; 99 100 /* change substring "//" into "/" */ 101 if (ptr = strstr(path, "//")) { 102 len = strlen(ptr + 1); 103 (void) memmove(ptr, ptr + 1, len + 1); 104 continue; 105 } 106 /* change substring "/./" into "/" */ 107 if (ptr = strstr(path, "/./")) { 108 len = strlen(ptr + 2); 109 (void) memmove(ptr, ptr + 2, len + 1); 110 continue; 111 } 112 113 /* change substring "/<foo>/../" into "/" */ 114 if (ptr = strstr(path, "/../")) { 115 len = strlen(ptr + 3); 116 *ptr = '\0'; 117 ptr2 = strrchr(path, (int)'/'); 118 if (ptr2 == NULL) { 119 /* path had a leading "/../" */ 120 ptr2 = path; 121 } 122 (void) memmove(ptr2, ptr + 3, len + 1); 123 continue; 124 } 125 126 /* change trailing "/<foo>/.." into "/" */ 127 if ((len >= 3) && 128 (path[len - 3] == '/') && 129 (path[len - 2] == '.') && 130 (path[len - 1] == '.')) { 131 path[len - 3] = '\0'; 132 ptr2 = strrchr(path, (int)'/'); 133 if (ptr2 != NULL) { 134 ptr2[1] = '\0'; 135 } else { 136 /* path was "/.." */ 137 path[0] = '/'; 138 path[1] = '\0'; 139 } 140 continue; 141 } 142 143 /* change trailing "/." into "/" */ 144 if ((len >= 2) && 145 (path[len - 2] == '/') && 146 (path[len - 1] == '.')) { 147 path[len - 1] = '\0'; 148 continue; 149 } 150 151 /* remove trailing "/" unless it's the root */ 152 if ((len > 1) && (path[len - 1] == '/')) { 153 path[len - 1] = '\0'; 154 continue; 155 } 156 157 break; 158 } 159 } 160 161 162 /* 163 * debug version has two more flags: 164 * -L force load driver 165 * -M: print per driver list 166 */ 167 168 #ifdef DEBUG 169 static const char *optstring = "abcdDvVxpPFf:M:dLuC"; 170 #else 171 static const char *optstring = "abcdDvVxpPFf:uC"; 172 #endif /* DEBUG */ 173 174 int 175 main(int argc, char *argv[]) 176 { 177 long pagesize, npages; 178 int c, ret; 179 char hw_provider[SYS_NMLN]; 180 181 setpname(argv[0]); 182 opts.o_promdev = "/dev/openprom"; 183 184 while ((c = getopt(argc, argv, optstring)) != -1) { 185 switch (c) { 186 case 'a': 187 ++opts.o_ancestors; 188 break; 189 case 'b': 190 ++opts.o_productinfo; 191 break; 192 case 'c': 193 ++opts.o_children; 194 break; 195 case 'd': 196 ++opts.o_pciid; 197 break; 198 case 'D': 199 ++opts.o_drv_name; 200 break; 201 case 'v': 202 ++opts.o_verbose; 203 break; 204 case 'p': 205 ++opts.o_prominfo; 206 break; 207 case 'f': 208 opts.o_promdev = optarg; 209 break; 210 case 'V': 211 ++opts.o_promversion; 212 break; 213 case 'x': 214 ++opts.o_prom_ready64; 215 break; 216 case 'F': 217 ++opts.o_fbname; 218 ++opts.o_noheader; 219 break; 220 case 'P': 221 ++opts.o_pseudodevs; 222 break; 223 case 'C': 224 ++opts.o_forcecache; 225 break; 226 #ifdef DEBUG 227 case 'M': 228 dbg.d_drivername = optarg; 229 ++dbg.d_bydriver; 230 break; 231 case 'L': 232 ++dbg.d_forceload; 233 break; 234 #endif /* DEBUG */ 235 236 default: 237 (void) fprintf(stderr, usage, opts.o_progname); 238 return (1); 239 } 240 } 241 242 (void) uname(&opts.o_uts); 243 244 if (opts.o_fbname) 245 return (do_fbname()); 246 247 if (opts.o_promversion) 248 return (do_promversion()); 249 250 if (opts.o_prom_ready64) 251 return (do_prom_version64()); 252 253 if (opts.o_productinfo) 254 return (do_productinfo()); 255 256 opts.o_devices_path = NULL; 257 opts.o_devt = DDI_DEV_T_NONE; 258 opts.o_target = 0; 259 if (optind < argc) { 260 struct stat sinfo; 261 char *path = argv[optind]; 262 int error; 263 264 if (opts.o_prominfo) { 265 /* PROM tree cannot be used with path */ 266 (void) fprintf(stderr, "%s: path and -p option are " 267 "mutually exclusive\n", opts.o_progname); 268 return (1); 269 } 270 271 if (strlen(path) >= MAXPATHLEN) { 272 (void) fprintf(stderr, "%s: " 273 "path specified is too long\n", opts.o_progname); 274 return (1); 275 } 276 277 if (error = stat(path, &sinfo)) { 278 279 /* an invalid path was specified */ 280 (void) fprintf(stderr, "%s: invalid path specified\n", 281 opts.o_progname); 282 return (1); 283 284 } else if (((sinfo.st_mode & S_IFMT) == S_IFCHR) || 285 ((sinfo.st_mode & S_IFMT) == S_IFBLK)) { 286 287 opts.o_devt = sinfo.st_rdev; 288 error = 0; 289 290 } else if ((sinfo.st_mode & S_IFMT) == S_IFDIR) { 291 size_t len, plen; 292 293 /* clean up the path */ 294 cleanup_path(path, new_path); 295 296 len = strlen(new_path); 297 plen = strlen("/devices"); 298 if (len < plen) { 299 /* This is not a valid /devices path */ 300 error = 1; 301 } else if ((len == plen) && 302 (strcmp(new_path, "/devices") == 0)) { 303 /* /devices is the root nexus */ 304 opts.o_devices_path = "/"; 305 error = 0; 306 } else if (strncmp(new_path, "/devices/", plen + 1)) { 307 /* This is not a valid /devices path */ 308 error = 1; 309 } else { 310 /* a /devices/ path was specified */ 311 opts.o_devices_path = new_path + plen; 312 error = 0; 313 } 314 315 } else { 316 /* an invalid device path was specified */ 317 error = 1; 318 } 319 320 if (error) { 321 (void) fprintf(stderr, "%s: " 322 "invalid device path specified\n", 323 opts.o_progname); 324 return (1); 325 } 326 327 opts.o_target = 1; 328 } 329 330 if ((opts.o_ancestors || opts.o_children) && (!opts.o_target)) { 331 (void) fprintf(stderr, "%s: options require a device path\n", 332 opts.o_progname); 333 return (1); 334 } 335 336 if (opts.o_target) { 337 prtconf_devinfo(); 338 return (0); 339 } 340 341 ret = sysinfo(SI_HW_PROVIDER, hw_provider, sizeof (hw_provider)); 342 /* 343 * If 0 bytes are returned (the system returns '1', for the \0), 344 * we're probably on x86, and there has been no si-hw-provider 345 * set in /etc/bootrc, default to Oracle. 346 */ 347 if (ret <= 1) { 348 (void) strncpy(hw_provider, "Oracle Corporation", 349 sizeof (hw_provider)); 350 } 351 (void) printf("System Configuration: %s %s\n", hw_provider, 352 opts.o_uts.machine); 353 354 pagesize = sysconf(_SC_PAGESIZE); 355 npages = sysconf(_SC_PHYS_PAGES); 356 (void) printf("Memory size: "); 357 if (pagesize == -1 || npages == -1) 358 (void) printf("unable to determine\n"); 359 else { 360 const int64_t kbyte = 1024; 361 const int64_t mbyte = 1024 * 1024; 362 int64_t ii = (int64_t)pagesize * npages; 363 364 if (ii >= mbyte) 365 (void) printf("%ld Megabytes\n", 366 (long)((ii+mbyte-1) / mbyte)); 367 else 368 (void) printf("%ld Kilobytes\n", 369 (long)((ii+kbyte-1) / kbyte)); 370 } 371 372 if (opts.o_prominfo) { 373 (void) printf("System Peripherals (PROM Nodes):\n\n"); 374 if (do_prominfo() == 0) 375 return (0); 376 (void) fprintf(stderr, "%s: Defaulting to non-PROM mode...\n", 377 opts.o_progname); 378 } 379 380 (void) printf("System Peripherals (Software Nodes):\n\n"); 381 382 (void) prtconf_devinfo(); 383 384 return (0); 385 } 386