int
main(int argc, char *argv[])
{
topo_hdl_t *thp = NULL;
char *uuid = NULL;
int c, err = 0;
g_pname = argv[0];
while (optind < argc) {
while ((c = getopt(argc, argv, optstr)) != -1) {
switch (c) {
case 'b':
opt_b++;
break;
case 'C':
(void) atexit(abort);
break;
case 'd':
opt_d++;
break;
case 'e':
opt_e++;
break;
case 'm':
opt_m = optarg;
break;
case 'P':
pcnt++;
break;
case 'p':
opt_p++;
break;
case 'V':
opt_V++;
break;
case 'R':
opt_R = optarg;
break;
case 's':
opt_s = optarg;
break;
case 'S':
opt_S++;
break;
case 't':
opt_t++;
break;
case 'x':
opt_x++;
break;
default:
return (usage(stderr));
}
}
if (optind < argc) {
if (g_fmri != NULL) {
(void) fprintf(stderr, "%s: illegal argument "
"-- %s\n", g_pname, argv[optind]);
return (FMTOPO_EXIT_USAGE);
} else {
g_fmri = argv[optind++];
}
}
}
if (pcnt > 0)
get_pargs(argc, argv);
if ((thp = topo_open(TOPO_VERSION, opt_R, &err)) == NULL) {
(void) fprintf(stderr, "%s: failed to open topology tree: %s\n",
g_pname, topo_strerror(err));
return (fmtopo_exit(thp, uuid, FMTOPO_EXIT_ERROR));
}
if (opt_d)
topo_debug_set(thp, "module", "stderr");
if ((uuid = topo_snap_hold(thp, NULL, &err)) == NULL) {
(void) fprintf(stderr, "%s: failed to snapshot topology: %s\n",
g_pname, topo_strerror(err));
return (fmtopo_exit(thp, uuid, FMTOPO_EXIT_ERROR));
} else if (err != 0) {
(void) fprintf(stderr, "%s: topology snapshot incomplete\n",
g_pname);
}
if (opt_x) {
if (opt_b) {
(void) fprintf(stderr,
"%s: -b and -x cannot be specified together\n",
g_pname);
return (fmtopo_exit(thp, uuid, FMTOPO_EXIT_USAGE));
}
err = 0;
if (topo_xml_print(thp, stdout, opt_s, &err) < 0)
(void) fprintf(stderr, "%s: failed to print xml "
"formatted topology:%s", g_pname,
topo_strerror(err));
return (fmtopo_exit(thp, uuid, err ? FMTOPO_EXIT_ERROR :
FMTOPO_EXIT_SUCCESS));
}
if (opt_t || walk_topo(thp, uuid) < 0) {
if (g_fmri != NULL)
/*
* Try getting some useful information
*/
print_fmri(thp, uuid);
return (fmtopo_exit(thp, uuid, FMTOPO_EXIT_ERROR));
}
return (fmtopo_exit(thp, uuid, FMTOPO_EXIT_SUCCESS));
}
topo_hdl_t *
topo_open(int version, const char *rootdir, int *errp)
{
topo_hdl_t *thp = NULL;
topo_alloc_t *tap;
char platform[MAXNAMELEN];
char isa[MAXNAMELEN];
struct utsname uts;
struct stat st;
smbios_hdl_t *shp;
smbios_system_t s1;
smbios_info_t s2;
id_t id;
char *dbflags, *dbout;
if (version != TOPO_VERSION)
return (set_open_errno(thp, errp, ETOPO_HDL_ABIVER));
if (rootdir != NULL && stat(rootdir, &st) < 0)
return (set_open_errno(thp, errp, ETOPO_HDL_INVAL));
if ((thp = topo_zalloc(sizeof (topo_hdl_t), 0)) == NULL)
return (set_open_errno(thp, errp, ETOPO_NOMEM));
(void) pthread_mutex_init(&thp->th_lock, NULL);
if ((tap = topo_zalloc(sizeof (topo_alloc_t), 0)) == NULL)
return (set_open_errno(thp, errp, ETOPO_NOMEM));
/*
* Install default allocators
*/
tap->ta_flags = 0;
tap->ta_alloc = topo_alloc;
tap->ta_zalloc = topo_zalloc;
tap->ta_free = topo_free;
tap->ta_nvops.nv_ao_alloc = topo_nv_alloc;
tap->ta_nvops.nv_ao_free = topo_nv_free;
(void) nv_alloc_init(&tap->ta_nva, &tap->ta_nvops);
thp->th_alloc = tap;
if ((thp->th_modhash = topo_modhash_create(thp)) == NULL)
return (set_open_errno(thp, errp, ETOPO_NOMEM));
/*
* Set-up system information and search paths for modules
* and topology map files
*/
if (rootdir == NULL) {
rootdir = topo_hdl_strdup(thp, "/");
thp->th_rootdir = (char *)rootdir;
} else {
int len;
char *rpath;
len = strlen(rootdir);
if (len >= PATH_MAX)
return (set_open_errno(thp, errp, EINVAL));
if (rootdir[len - 1] != '/') {
rpath = alloca(len + 2);
(void) snprintf(rpath, len + 2, "%s/", rootdir);
} else {
rpath = (char *)rootdir;
}
thp->th_rootdir = topo_hdl_strdup(thp, rpath);
}
platform[0] = '\0';
isa[0] = '\0';
(void) sysinfo(SI_PLATFORM, platform, sizeof (platform));
(void) sysinfo(SI_ARCHITECTURE, isa, sizeof (isa));
(void) uname(&uts);
thp->th_platform = topo_hdl_strdup(thp, platform);
thp->th_isa = topo_hdl_strdup(thp, isa);
thp->th_machine = topo_hdl_strdup(thp, uts.machine);
if ((shp = smbios_open(NULL, SMB_VERSION, 0, NULL)) != NULL) {
if ((id = smbios_info_system(shp, &s1)) != SMB_ERR &&
smbios_info_common(shp, id, &s2) != SMB_ERR) {
if (strcmp(s2.smbi_product, SMB_DEFAULT1) != 0 &&
strcmp(s2.smbi_product, SMB_DEFAULT2) != 0) {
thp->th_product = topo_cleanup_auth_str(thp,
(char *)s2.smbi_product);
}
}
smbios_close(shp);
} else {
thp->th_product = topo_hdl_strdup(thp, thp->th_platform);
}
if (thp->th_rootdir == NULL || thp->th_platform == NULL ||
thp->th_machine == NULL)
return (set_open_errno(thp, errp, ETOPO_NOMEM));
dbflags = getenv("TOPO_DEBUG");
dbout = getenv("TOPO_DEBUG_OUT");
if (dbflags != NULL)
topo_debug_set(thp, dbflags, dbout);
if (topo_builtin_create(thp, thp->th_rootdir) != 0) {
topo_dprintf(thp, TOPO_DBG_ERR,
"failed to load builtin modules: %s\n",
topo_hdl_errmsg(thp));
return (set_open_errno(thp, errp, topo_hdl_errno(thp)));
}
return (thp);
}
