static void
print_everstyle(tnode_t *node)
{
char buf[PATH_MAX], numbuf[64];
nvlist_t *fmri, **hcl;
int i, err;
uint_t n;
if (topo_prop_get_fmri(node, TOPO_PGROUP_PROTOCOL,
TOPO_PROP_RESOURCE, &fmri, &err) < 0) {
(void) fprintf(stderr, "%s: failed to get fmri for %s=%d: %s\n",
g_pname, topo_node_name(node),
topo_node_instance(node), topo_strerror(err));
return;
}
if (nvlist_lookup_nvlist_array(fmri, FM_FMRI_HC_LIST, &hcl, &n) != 0) {
(void) fprintf(stderr, "%s: failed to find %s for %s=%d\n",
g_pname, FM_FMRI_HC_LIST, topo_node_name(node),
topo_node_instance(node));
nvlist_free(fmri);
return;
}
buf[0] = '\0';
for (i = 0; i < n; i++) {
char *name, *inst, *estr;
ulong_t ul;
if (nvlist_lookup_string(hcl[i], FM_FMRI_HC_NAME, &name) != 0 ||
nvlist_lookup_string(hcl[i], FM_FMRI_HC_ID, &inst) != 0) {
(void) fprintf(stderr, "%s: failed to get "
"name-instance for %s=%d\n", g_pname,
topo_node_name(node), topo_node_instance(node));
nvlist_free(fmri);
return;
}
errno = 0;
ul = strtoul(inst, &estr, 10);
if (errno != 0 || estr == inst) {
(void) fprintf(stderr, "%s: instance %s does not "
"convert to an unsigned integer\n", g_pname, inst);
}
(void) strlcat(buf, "/", sizeof (buf));
(void) strlcat(buf, name, sizeof (buf));
(void) snprintf(numbuf, sizeof (numbuf), "%u", ul);
(void) strlcat(buf, numbuf, sizeof (buf));
}
nvlist_free(fmri);
(void) printf("%s\n", buf);
}
int
topo_method_register(topo_mod_t *mod, tnode_t *node, const topo_method_t *mp)
{
topo_imethod_t *imp;
const topo_method_t *meth;
/*
* Initialize module methods
*/
for (meth = &mp[0]; meth->tm_name != NULL; meth++) {
topo_node_lock(node);
if (topo_method_lookup(node, meth->tm_name) != NULL) {
topo_node_unlock(node);
continue;
}
if (meth->tm_stability < TOPO_STABILITY_INTERNAL ||
meth->tm_stability > TOPO_STABILITY_MAX ||
meth->tm_func == NULL)
return (set_methregister_error(mod, node, NULL,
ETOPO_METHOD_INVAL));
imp = topo_mod_zalloc(mod, sizeof (topo_imethod_t));
if (imp == NULL)
return (set_methregister_error(mod, node, imp,
ETOPO_METHOD_NOMEM));
if ((imp->tim_name = topo_mod_strdup(mod, meth->tm_name))
== NULL)
return (set_methregister_error(mod, node, imp,
ETOPO_METHOD_NOMEM));
if ((imp->tim_desc = topo_mod_strdup(mod, meth->tm_desc))
== NULL)
return (set_methregister_error(mod, node, imp,
ETOPO_METHOD_NOMEM));
imp->tim_stability = meth->tm_stability;
imp->tim_version = meth->tm_version;
imp->tim_func = meth->tm_func;
imp->tim_mod = mod;
topo_list_append(&node->tn_methods, imp);
topo_node_unlock(node);
topo_dprintf(mod->tm_hdl, TOPO_DBG_MODSVC,
"registered module %s method "
"%s for %s=%d\n", mod->tm_name, imp->tim_name,
topo_node_name(node), topo_node_instance(node));
}
return (0);
}
static tnode_t *
iob_tnode_create(tnode_t *parent,
const char *name, topo_instance_t i, void *priv, topo_mod_t *mod)
{
topo_hdl_t *thp;
nvlist_t *args, *fmri, *pfmri;
tnode_t *ntn;
int err;
thp = topo_mod_handle(mod);
if (topo_node_resource(parent, &pfmri, &err) < 0) {
topo_mod_seterrno(mod, err);
topo_mod_dprintf(mod,
"Unable to retrieve parent resource.\n");
return (NULL);
}
if (topo_mod_nvalloc(mod, &args, NV_UNIQUE_NAME) != 0) {
(void) topo_mod_seterrno(mod, EMOD_FMRI_NVL);
nvlist_free(pfmri);
return (NULL);
}
err = nvlist_add_nvlist(args, TOPO_METH_FMRI_ARG_PARENT, pfmri);
if (err != 0) {
nvlist_free(pfmri);
nvlist_free(args);
(void) topo_mod_seterrno(mod, EMOD_FMRI_NVL);
return (NULL);
}
fmri = topo_fmri_create(thp, FM_FMRI_SCHEME_HC, name, i, args, &err);
if (fmri == NULL) {
topo_mod_dprintf(mod,
"Unable to make nvlist for %s bind.\n", name);
return (NULL);
}
ntn = topo_node_bind(mod, parent, name, i, fmri, priv);
if (ntn == NULL) {
topo_mod_dprintf(mod,
"topo_node_bind (%s%d/%s%d) failed: %s\n",
topo_node_name(parent), topo_node_instance(parent),
name, i,
topo_strerror(topo_mod_errno(mod)));
nvlist_free(fmri);
return (NULL);
}
nvlist_free(fmri);
if (topo_method_register(mod, ntn, Iob_methods) < 0) {
topo_mod_dprintf(mod, "topo_method_register failed: %s\n",
topo_strerror(topo_mod_errno(mod)));
topo_node_unbind(ntn);
return (NULL);
}
return (ntn);
}
static tnode_t *
hb_tnode_create(topo_mod_t *mod, tnode_t *parent,
const char *name, topo_instance_t i, void *priv)
{
int err;
nvlist_t *fmri;
tnode_t *ntn;
nvlist_t *auth = topo_mod_auth(mod, parent);
fmri = topo_mod_hcfmri(mod, parent, FM_HC_SCHEME_VERSION, name, i,
NULL, auth, NULL, NULL, NULL);
nvlist_free(auth);
if (fmri == NULL) {
topo_mod_dprintf(mod,
"Unable to make nvlist for %s bind: %s.\n",
name, topo_mod_errmsg(mod));
return (NULL);
}
ntn = topo_node_bind(mod, parent, name, i, fmri);
if (ntn == NULL) {
topo_mod_dprintf(mod,
"topo_node_bind (%s%d/%s%d) failed: %s\n",
topo_node_name(parent), topo_node_instance(parent),
name, i,
topo_strerror(topo_mod_errno(mod)));
nvlist_free(fmri);
return (NULL);
}
nvlist_free(fmri);
topo_node_setspecific(ntn, priv);
if (topo_pgroup_create(ntn, &hb_auth_pgroup, &err) == 0) {
(void) topo_prop_inherit(ntn, FM_FMRI_AUTHORITY,
FM_FMRI_AUTH_PRODUCT, &err);
(void) topo_prop_inherit(ntn, FM_FMRI_AUTHORITY,
FM_FMRI_AUTH_PRODUCT_SN, &err);
(void) topo_prop_inherit(ntn, FM_FMRI_AUTHORITY,
FM_FMRI_AUTH_CHASSIS, &err);
(void) topo_prop_inherit(ntn, FM_FMRI_AUTHORITY,
FM_FMRI_AUTH_SERVER, &err);
}
if (topo_method_register(mod, ntn, Hb_methods) < 0) {
topo_mod_dprintf(mod, "topo_method_register failed: %s\n",
topo_strerror(topo_mod_errno(mod)));
topo_node_unbind(ntn);
return (NULL);
}
return (ntn);
}
/*ARGSUSED*/
int
platform_iob_label(topo_mod_t *mod, tnode_t *node, nvlist_t *ignored,
nvlist_t **out)
{
/*
* For E15K, the label is simply IOXX where XX is the
* instance number of the ioboard.
*/
char buf[10]; /* up to a million I/O boards :-) */
*out = NULL;
(void) snprintf(buf, 10, "IO%d", topo_node_instance(node));
if (topo_mod_nvalloc(mod, out, NV_UNIQUE_NAME) == 0 &&
nvlist_add_string(*out, TOPO_METH_LABEL_RET_STR, buf) == 0)
return (0);
nvlist_free(*out);
*out = NULL;
return (-1);
}
static tnode_t *
niu_tnode_create(topo_mod_t *mod, tnode_t *parent,
const char *name, topo_instance_t i, void *priv)
{
int err;
nvlist_t *fmri;
tnode_t *ntn;
nvlist_t *auth = topo_mod_auth(mod, parent);
fmri = topo_mod_hcfmri(mod, parent, FM_HC_SCHEME_VERSION, name, i,
NULL, auth, NULL, NULL, NULL);
nvlist_free(auth);
if (fmri == NULL) {
topo_mod_dprintf(mod,
"Unable to make nvlist for %s bind: %s.\n",
name, topo_mod_errmsg(mod));
return (NULL);
}
ntn = topo_node_bind(mod, parent, name, i, fmri);
if (ntn == NULL) {
topo_mod_dprintf(mod,
"topo_node_bind (%s%d/%s%d) failed: %s\n",
topo_node_name(parent), topo_node_instance(parent),
name, i,
topo_strerror(topo_mod_errno(mod)));
nvlist_free(fmri);
return (NULL);
}
nvlist_free(fmri);
topo_node_setspecific(ntn, priv);
if (topo_pgroup_create(ntn, &io_pgroup, &err) == 0) {
(void) devprop_set(ntn, priv, TOPO_PGROUP_IO, TOPO_IO_DEV, mod);
(void) driverprop_set(ntn, priv, TOPO_PGROUP_IO, TOPO_IO_DRIVER,
mod);
(void) moduleprop_set(ntn, priv, TOPO_PGROUP_IO, TOPO_IO_MODULE,
mod);
}
return (ntn);
}
/*ARGSUSED*/
static int
fac_walker(topo_hdl_t *thp, tnode_t *node, void *arg)
{
int err;
nvlist_t *out;
if (topo_method_supported(node, TOPO_METH_FAC_ENUM, 0)) {
/*
* If the facility enumeration method fails, note the failure,
* but continue on with the walk.
*/
if (topo_method_invoke(node, TOPO_METH_FAC_ENUM, 0, NULL, &out,
&err) != 0) {
topo_dprintf(thp, TOPO_DBG_ERR,
"facility enumeration method failed on node %s=%d "
"(%s)\n", topo_node_name(node),
topo_node_instance(node), topo_strerror(err));
}
}
return (TOPO_WALK_NEXT);
}
/* create the disk topo node */
static int
disk_tnode_create(topo_mod_t *mod, tnode_t *parent,
dev_di_node_t *dnode, const char *name, topo_instance_t i, tnode_t **rval)
{
int len;
nvlist_t *fmri;
tnode_t *dtn;
char *part = NULL;
nvlist_t *auth;
char *mfg, *model, *firm, *serial;
*rval = NULL;
if (dnode != NULL) {
mfg = topo_mod_clean_str(mod, dnode->ddn_mfg);
model = topo_mod_clean_str(mod, dnode->ddn_model);
firm = topo_mod_clean_str(mod, dnode->ddn_firm);
serial = topo_mod_clean_str(mod, dnode->ddn_serial);
} else {
mfg = model = firm = serial = NULL;
}
/* form 'part=' of fmri as "<mfg>-<model>" */
if (mfg != NULL && model != NULL) {
len = strlen(mfg) + 1 + strlen(model) + 1;
if ((part = topo_mod_alloc(mod, len)) != NULL)
(void) snprintf(part, len, "%s-%s",
mfg, model);
}
auth = topo_mod_auth(mod, parent);
fmri = topo_mod_hcfmri(mod, parent, FM_HC_SCHEME_VERSION, name, i, NULL,
auth, part ? part : model, firm, serial);
nvlist_free(auth);
topo_mod_strfree(mod, part);
topo_mod_strfree(mod, mfg);
topo_mod_strfree(mod, model);
topo_mod_strfree(mod, firm);
topo_mod_strfree(mod, serial);
if (fmri == NULL) {
topo_mod_dprintf(mod, "disk_tnode_create: "
"hcfmri (%s%d/%s%d) error %s\n",
topo_node_name(parent), topo_node_instance(parent),
name, i, topo_strerror(topo_mod_errno(mod)));
return (-1);
}
if ((dtn = topo_node_bind(mod, parent, name, i, fmri)) == NULL) {
if (topo_mod_errno(mod) == EMOD_NODE_BOUND) {
/*
* if disk 0 is already there then we're done
*/
nvlist_free(fmri);
return (0);
}
topo_mod_dprintf(mod, "disk_tnode_create: "
"bind (%s%d/%s%d) error %s\n",
topo_node_name(parent), topo_node_instance(parent),
name, i, topo_strerror(topo_mod_errno(mod)));
nvlist_free(fmri);
return (-1);
}
nvlist_free(fmri);
/* add the properties of the disk */
if (disk_set_props(mod, parent, dtn, dnode) != 0) {
topo_mod_dprintf(mod, "disk_tnode_create: "
"disk_set_props (%s%d/%s%d) error %s\n",
topo_node_name(parent), topo_node_instance(parent),
name, i, topo_strerror(topo_mod_errno(mod)));
topo_node_unbind(dtn);
return (-1);
}
if (dnode->ddn_devid != NULL &&
disk_add_temp_sensor(mod, dtn, dnode->ddn_devid) != 0) {
topo_mod_dprintf(mod, "disk_tnode_create: failed to create "
"temperature sensor node on bay=%d/disk=0",
topo_node_instance(parent));
}
*rval = dtn;
return (0);
}
void
amd_mc_create(topo_mod_t *mod, uint16_t smbid, tnode_t *pnode,
const char *name, nvlist_t *auth, int32_t procnodeid,
int32_t procnodes_per_pkg, int family,
int model, int *nerrp)
{
tnode_t *mcnode;
nvlist_t *rfmri, *fmri;
nvpair_t *nvp;
nvlist_t *mc = NULL;
int i, err;
int mcnum = procnodeid % procnodes_per_pkg;
char *serial = NULL;
char *part = NULL;
char *rev = NULL;
/*
* Return with no error for anything before AMD family 0xf - we
* won't generate even a generic memory topology for earlier
* families.
*/
if (family < 0xf)
return;
if (topo_node_lookup(pnode, name, mcnum) != NULL)
return;
if (FM_AWARE_SMBIOS(mod)) {
(void) topo_node_resource(pnode, &rfmri, &err);
(void) nvlist_lookup_string(rfmri, "serial", &serial);
(void) nvlist_lookup_string(rfmri, "part", &part);
(void) nvlist_lookup_string(rfmri, "revision", &rev);
}
if (mkrsrc(mod, pnode, name, mcnum, auth, &fmri) != 0) {
if (FM_AWARE_SMBIOS(mod))
nvlist_free(rfmri);
whinge(mod, nerrp, "mc_create: mkrsrc failed\n");
return;
}
if (FM_AWARE_SMBIOS(mod)) {
(void) nvlist_add_string(fmri, "serial", serial);
(void) nvlist_add_string(fmri, "part", part);
(void) nvlist_add_string(fmri, "revision", rev);
nvlist_free(rfmri);
}
if ((mcnode = topo_node_bind(mod, pnode, name, mcnum,
fmri)) == NULL) {
nvlist_free(fmri);
whinge(mod, nerrp, "mc_create: mc bind failed\n");
return;
}
if (topo_node_fru_set(mcnode, NULL, 0, &err) < 0)
whinge(mod, nerrp, "mc_create: topo_node_fru_set failed\n");
if (FM_AWARE_SMBIOS(mod)) {
if (topo_node_label_set(mcnode, NULL, &err) == -1)
topo_mod_dprintf(mod, "Failed to set label\n");
}
nvlist_free(fmri);
if (topo_pgroup_create(mcnode, &mc_pgroup, &err) < 0)
whinge(mod, nerrp, "mc_create: topo_pgroup_create failed\n");
if (topo_prop_set_int32(mcnode, PGNAME(MCT), MCT_PROCNODE_ID,
TOPO_PROP_IMMUTABLE, procnodeid, nerrp) != 0)
whinge(mod, nerrp, "mc_create: topo_prop_set_int32 failed to"
"add node id\n");
if ((mc = amd_lookup_by_mcid(mod, topo_node_instance(pnode))) == NULL) {
/*
* If a memory-controller driver exists for this chip model
* it has not attached or has otherwise malfunctioned;
* alternatively no memory-controller driver exists for this
* (presumably newly-released) cpu model. We fallback to
* creating a generic maximal topology.
*/
if (amd_generic_mc_create(mod, smbid, pnode, mcnode,
family, model, auth) != 0)
whinge(mod, nerrp,
"mc_create: amd_generic_mc_create failed\n");
return;
}
/*
* Add memory controller properties
*/
for (nvp = nvlist_next_nvpair(mc, NULL); nvp != NULL;
nvp = nvlist_next_nvpair(mc, nvp)) {
char *name = nvpair_name(nvp);
data_type_t type = nvpair_type(nvp);
if (type == DATA_TYPE_NVLIST_ARRAY &&
(strcmp(name, "cslist") == 0 ||
strcmp(name, "dimmlist") == 0)) {
continue;
} else if (type == DATA_TYPE_UINT8 &&
strcmp(name, MC_NVLIST_VERSTR) == 0) {
continue;
} else if (type == DATA_TYPE_NVLIST &&
strcmp(name, "htconfig") == 0) {
nvlist_t *htnvl;
(void) nvpair_value_nvlist(nvp, &htnvl);
if (amd_htconfig(mod, pnode, htnvl) != 0)
whinge(mod, nerrp,
"mc_create: amd_htconfig failed\n");
} else {
if (nvprop_add(mod, nvp, PGNAME(MCT), mcnode) != 0)
whinge(mod, nerrp,
"mc_create: nvprop_add failed\n");
}
}
if (amd_dramchan_create(mod, mcnode, CHAN_NODE_NAME, auth) != 0 ||
amd_cs_create(mod, mcnode, CS_NODE_NAME, mc, auth) != 0 ||
amd_dimm_create(mod, smbid, mcnode, DIMM_NODE_NAME, mc, auth) != 0)
whinge(mod, nerrp, "mc_create: create children failed\n");
/*
* Free the fmris for the chip-selects allocated in amd_cs_create
*/
for (i = 0; i < MC_CHIP_NCS; i++) {
if (cs_fmri[i] != NULL) {
nvlist_free(cs_fmri[i]);
cs_fmri[i] = NULL;
}
}
nvlist_free(mc);
}
/*ARGSUSED*/
static int
walk_node(topo_hdl_t *thp, tnode_t *node, void *arg)
{
int err;
nvlist_t *nvl;
nvlist_t *rsrc, *out;
char *s;
if (opt_e && strcmp(opt_s, FM_FMRI_SCHEME_HC) == 0) {
print_everstyle(node);
return (TOPO_WALK_NEXT);
}
if (topo_node_resource(node, &rsrc, &err) < 0) {
(void) fprintf(stderr, "%s: failed to get resource: "
"%s", g_pname, topo_strerror(err));
return (TOPO_WALK_NEXT);
}
if (topo_fmri_nvl2str(thp, rsrc, &s, &err) < 0) {
(void) fprintf(stderr, "%s: failed to convert "
"resource to FMRI string: %s", g_pname,
topo_strerror(err));
nvlist_free(rsrc);
return (TOPO_WALK_NEXT);
}
if (g_fmri != NULL && fnmatch(g_fmri, s, 0) != 0) {
nvlist_free(rsrc);
topo_hdl_strfree(thp, s);
return (TOPO_WALK_NEXT);
}
print_node(thp, node, rsrc, s);
topo_hdl_strfree(thp, s);
nvlist_free(rsrc);
if (opt_m != NULL) {
if (topo_method_invoke(node, opt_m, 0, NULL, &out, &err) == 0) {
nvlist_print(stdout, out);
nvlist_free(out);
} else if (err != ETOPO_METHOD_NOTSUP)
(void) fprintf(stderr, "%s: method failed unexpectedly "
"on %s=%d (%s)\n", g_pname, topo_node_name(node),
topo_node_instance(node), topo_strerror(err));
}
if (opt_V || opt_all) {
if ((nvl = topo_prop_getprops(node, &err)) == NULL) {
(void) fprintf(stderr, "%s: failed to get "
"properties for %s=%d: %s\n", g_pname,
topo_node_name(node), topo_node_instance(node),
topo_strerror(err));
} else {
print_all_props(thp, node, nvl, ALL);
nvlist_free(nvl);
}
} else if (pcnt > 0)
print_props(thp, node);
(void) printf("\n");
return (TOPO_WALK_NEXT);
}
static tnode_t *
mb_tnode_create(topo_mod_t *mod, tnode_t *parent,
const char *name, topo_instance_t i, void *priv)
{
nvlist_t *fmri;
tnode_t *ntn;
char *serial = NULL, *part = NULL;
char *psn = NULL, *csn = NULL, *pstr = NULL;
nvlist_t *auth = topo_mod_auth(mod, parent);
/*
* Get Product Serial Number, Chassis ID, MB Serial Number and
* Part Number from PRI.
*/
(void) mb_get_pri_info(mod, &serial, &part, &csn, &psn);
if (nvlist_lookup_string(auth, FM_FMRI_AUTH_CHASSIS, &pstr) != 0 &&
csn != NULL) {
if (nvlist_add_string(auth, FM_FMRI_AUTH_CHASSIS, csn) != 0) {
topo_mod_dprintf(mod,
"failed to add chassis to auth");
nvlist_free(auth);
return (NULL);
}
}
if (nvlist_lookup_string(auth, FM_FMRI_AUTH_PRODUCT_SN, &pstr) != 0 &&
psn != NULL) {
if (nvlist_add_string(auth, FM_FMRI_AUTH_PRODUCT_SN, psn)
!= 0) {
topo_mod_dprintf(mod,
"failed to add product-sn to auth");
nvlist_free(auth);
return (NULL);
}
}
fmri = topo_mod_hcfmri(mod, NULL, FM_HC_SCHEME_VERSION, name, i,
NULL, auth, part, NULL, serial);
topo_mod_strfree(mod, serial);
topo_mod_strfree(mod, part);
topo_mod_strfree(mod, csn);
topo_mod_strfree(mod, psn);
if (fmri == NULL) {
topo_mod_dprintf(mod,
"Unable to make nvlist for %s bind: %s.\n",
name, topo_mod_errmsg(mod));
nvlist_free(auth);
return (NULL);
}
ntn = topo_node_bind(mod, parent, name, i, fmri);
if (ntn == NULL) {
topo_mod_dprintf(mod,
"topo_node_bind (%s%d/%s%d) failed: %s\n",
topo_node_name(parent), topo_node_instance(parent),
name, i,
topo_strerror(topo_mod_errno(mod)));
nvlist_free(auth);
nvlist_free(fmri);
return (NULL);
}
mb_prop_set(ntn, auth);
nvlist_free(auth);
nvlist_free(fmri);
topo_node_setspecific(ntn, priv);
return (ntn);
}
