2N/A/*
2N/A * CDDL HEADER START
2N/A *
2N/A * The contents of this file are subject to the terms of the
2N/A * Common Development and Distribution License (the "License").
2N/A * You may not use this file except in compliance with the License.
2N/A *
2N/A * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
2N/A * or http://www.opensolaris.org/os/licensing.
2N/A * See the License for the specific language governing permissions
2N/A * and limitations under the License.
2N/A *
2N/A * When distributing Covered Code, include this CDDL HEADER in each
2N/A * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
2N/A * If applicable, add the following below this CDDL HEADER, with the
2N/A * fields enclosed by brackets "[]" replaced with your own identifying
2N/A * information: Portions Copyright [yyyy] [name of copyright owner]
2N/A *
2N/A * CDDL HEADER END
2N/A */
2N/A
2N/A/*
2N/A * Copyright (c) 2008, 2012, Oracle and/or its affiliates. All rights reserved.
2N/A */
2N/A
2N/A/*
2N/A * Facility node support for SES enclosures. We support the following facility
2N/A * nodes, based on the node type:
2N/A *
2N/A * bay
2N/A * indicator=ident
2N/A * indicator=fail
2N/A * indicator=ok2rm
2N/A * sensor=fault
2N/A *
2N/A * controller
2N/A * indicator=ident
2N/A * indicator=fail
2N/A *
2N/A * fan
2N/A * indicator=ident
2N/A * indicator=fail
2N/A * sensor=speed
2N/A * sensor=fault
2N/A *
2N/A * fanmodule
2N/A * indicator=ident
2N/A * indicator=fail
2N/A * sensor=fault
2N/A *
2N/A * psu
2N/A * indicator=ident
2N/A * indicator=fail
2N/A * sensor=status
2N/A *
2N/A * ses-enclosure
2N/A * indicator=ident
2N/A * indicator=fail
2N/A * sensor=fault
2N/A * sensor=<name> (temperature)
2N/A * sensor=<name> (voltage)
2N/A * sensor=<name> (current)
2N/A *
2N/A * Most of these are handled by a single method that supports getting and
2N/A * setting boolean properties on the node. The fan speed sensor requires a
2N/A * special handler, while the analog enclosure sensors all have similar
2N/A * behavior and can be grouped together using a common method.
2N/A */
2N/A
2N/A#include "ses.h"
2N/A#include "disk.h"
2N/A
2N/A#include <string.h>
2N/A#include <scsi/plugins/ses/vendor/sun.h>
2N/A
2N/Astatic int ses_indicator_mode(topo_mod_t *, tnode_t *, topo_version_t,
2N/A nvlist_t *, nvlist_t **);
2N/Astatic int ses_sensor_reading(topo_mod_t *, tnode_t *, topo_version_t,
2N/A nvlist_t *, nvlist_t **);
2N/Astatic int ses_sensor_state(topo_mod_t *, tnode_t *, topo_version_t,
2N/A nvlist_t *, nvlist_t **);
2N/Astatic int ses_psu_state(topo_mod_t *, tnode_t *, topo_version_t,
2N/A nvlist_t *, nvlist_t **);
2N/A
2N/A#define SES_SUPP_WARN_UNDER 0x01
2N/A#define SES_SUPP_WARN_OVER 0x02
2N/A#define SES_SUPP_CRIT_UNDER 0x04
2N/A#define SES_SUPP_CRIT_OVER 0x08
2N/A
2N/Atypedef struct ses_sensor_desc {
2N/A int sd_type;
2N/A int sd_units;
2N/A const char *sd_propname;
2N/A double sd_multiplier;
2N/A} ses_sensor_desc_t;
2N/A
2N/A#define TOPO_METH_SES_MODE_VERSION 0
2N/A#define TOPO_METH_SES_READING_VERSION 0
2N/A#define TOPO_METH_SES_STATE_VERSION 0
2N/A#define TOPO_METH_SES_PSU_VERSION 0
2N/A
2N/A#define TOPO_METH_SES_READING_PROP "propname"
2N/A#define TOPO_METH_SES_READING_MULT "multiplier"
2N/A
2N/A#define TOPO_METH_SES_STATE_PROP "propname"
2N/A
2N/A#define TOPO_METH_SES_MODE_PROP "property-name"
2N/A#define TOPO_METH_SES_MODE_ALTPROP "alternate-property"
2N/A
2N/Astatic const topo_method_t ses_indicator_methods[] = {
2N/A { "ses_indicator_mode", TOPO_PROP_METH_DESC,
2N/A TOPO_METH_SES_MODE_VERSION, TOPO_STABILITY_INTERNAL,
2N/A ses_indicator_mode }
2N/A};
2N/A
2N/Astatic const topo_method_t ses_sensor_methods[] = {
2N/A { "ses_sensor_reading", TOPO_PROP_METH_DESC,
2N/A TOPO_METH_SES_READING_VERSION, TOPO_STABILITY_INTERNAL,
2N/A ses_sensor_reading },
2N/A { "ses_sensor_state", TOPO_PROP_METH_DESC,
2N/A TOPO_METH_SES_STATE_VERSION, TOPO_STABILITY_INTERNAL,
2N/A ses_sensor_state },
2N/A { "ses_psu_state", TOPO_PROP_METH_DESC,
2N/A TOPO_METH_SES_PSU_VERSION, TOPO_STABILITY_INTERNAL,
2N/A ses_psu_state },
2N/A};
2N/A
2N/A/*
2N/A * Get or set an indicator. This method is invoked with arguments indicating
2N/A * the property to query to retrieve the value. Some elements (enclosures and
2N/A * devices) support a request property that is distinct from an array-detected
2N/A * property. Either of these conditions will result in the indicator being
2N/A * lit, so we have to check both properties.
2N/A */
2N/Astatic int
2N/Ases_indicator_mode(topo_mod_t *mod, tnode_t *tn, topo_version_t vers,
2N/A nvlist_t *in, nvlist_t **out)
2N/A{
2N/A ses_node_t *np;
2N/A nvlist_t *args, *pargs, *props;
2N/A char *propname, *altprop;
2N/A uint32_t mode;
2N/A boolean_t current, altcurrent;
2N/A nvlist_t *nvl;
2N/A ses_enum_target_t *tp = topo_node_getspecific(tn);
2N/A
2N/A if (vers > TOPO_METH_SES_MODE_VERSION)
2N/A return (topo_mod_seterrno(mod, ETOPO_METHOD_VERNEW));
2N/A
2N/A if (nvlist_lookup_nvlist(in, TOPO_PROP_ARGS, &args) != 0 ||
2N/A nvlist_lookup_string(args, TOPO_METH_SES_MODE_PROP,
2N/A &propname) != 0) {
2N/A topo_mod_dprintf(mod, "invalid arguments to 'mode' method\n");
2N/A return (topo_mod_seterrno(mod, EMOD_NVL_INVAL));
2N/A }
2N/A
2N/A if (nvlist_lookup_string(args, TOPO_METH_SES_MODE_ALTPROP,
2N/A &altprop) != 0)
2N/A altprop = NULL;
2N/A
2N/A if ((np = ses_node_lock(mod, tn)) == NULL) {
2N/A topo_mod_dprintf(mod, "failed to lookup ses node in 'mode' "
2N/A "method\n");
2N/A return (-1);
2N/A }
2N/A verify((props = ses_node_props(np)) != NULL);
2N/A
2N/A if (nvlist_lookup_nvlist(in, TOPO_PROP_PARGS, &pargs) == 0 &&
2N/A nvlist_exists(pargs, TOPO_PROP_VAL_VAL)) {
2N/A /* set operation */
2N/A if (nvlist_lookup_uint32(pargs, TOPO_PROP_VAL_VAL,
2N/A &mode) != 0) {
2N/A topo_mod_dprintf(mod, "invalid type for indicator "
2N/A "mode property");
2N/A (void) topo_mod_seterrno(mod, EMOD_NVL_INVAL);
2N/A goto error;
2N/A }
2N/A
2N/A if (mode != TOPO_LED_STATE_OFF && mode != TOPO_LED_STATE_ON) {
2N/A topo_mod_dprintf(mod, "invalid indicator mode %d\n",
2N/A mode);
2N/A (void) topo_mod_seterrno(mod, EMOD_NVL_INVAL);
2N/A goto error;
2N/A }
2N/A
2N/A nvl = NULL;
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0 ||
2N/A nvlist_add_boolean_value(nvl, propname,
2N/A mode == TOPO_LED_STATE_ON ? B_TRUE : B_FALSE) != 0) {
2N/A nvlist_free(nvl);
2N/A (void) topo_mod_seterrno(mod, EMOD_NOMEM);
2N/A goto error;
2N/A }
2N/A
2N/A if (ses_node_ctl(np, SES_CTL_OP_SETPROP, nvl) != 0) {
2N/A topo_mod_dprintf(mod, "failed to set indicator: %s\n",
2N/A ses_errmsg());
2N/A nvlist_free(nvl);
2N/A goto error;
2N/A }
2N/A
2N/A tp->set_snaptime = 0;
2N/A nvlist_free(nvl);
2N/A } else {
2N/A /* get operation */
2N/A if (nvlist_lookup_boolean_value(props,
2N/A propname, &current) != 0) {
2N/A topo_mod_dprintf(mod, "failed to lookup %s in node "
2N/A "properties\n", propname);
2N/A (void) topo_mod_seterrno(mod, EMOD_METHOD_NOTSUP);
2N/A goto error;
2N/A }
2N/A
2N/A if (altprop != NULL && nvlist_lookup_boolean_value(props,
2N/A altprop, &altcurrent) == 0)
2N/A current |= altcurrent;
2N/A
2N/A mode = current ? TOPO_LED_STATE_ON : TOPO_LED_STATE_OFF;
2N/A }
2N/A
2N/A nvl = NULL;
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0 ||
2N/A nvlist_add_string(nvl, TOPO_PROP_VAL_NAME,
2N/A TOPO_LED_MODE) != 0 ||
2N/A nvlist_add_uint32(nvl, TOPO_PROP_VAL_TYPE, TOPO_TYPE_UINT32) != 0 ||
2N/A nvlist_add_uint32(nvl, TOPO_PROP_VAL_VAL, mode) != 0) {
2N/A nvlist_free(nvl);
2N/A (void) topo_mod_seterrno(mod, EMOD_NOMEM);
2N/A goto error;
2N/A }
2N/A
2N/A ses_node_unlock(mod, tn);
2N/A *out = nvl;
2N/A return (0);
2N/A
2N/Aerror:
2N/A ses_node_unlock(mod, tn);
2N/A return (-1);
2N/A}
2N/A
2N/A/*
2N/A * Read the given sensor value. This just looks up the value in the node
2N/A * properties, and multiplies by a fixed value (determined when the method is
2N/A * instantiated).
2N/A */
2N/Astatic int
2N/Ases_sensor_reading(topo_mod_t *mod, tnode_t *tn, topo_version_t vers,
2N/A nvlist_t *in, nvlist_t **out)
2N/A{
2N/A ses_node_t *np;
2N/A nvlist_t *args, *props;
2N/A char *prop;
2N/A double raw, multiplier;
2N/A uint64_t current;
2N/A int64_t scurrent;
2N/A nvlist_t *nvl;
2N/A
2N/A if (vers > TOPO_METH_SES_MODE_VERSION)
2N/A return (topo_mod_seterrno(mod, ETOPO_METHOD_VERNEW));
2N/A
2N/A if (nvlist_lookup_nvlist(in, TOPO_PROP_ARGS, &args) != 0 ||
2N/A nvlist_lookup_string(args, TOPO_METH_SES_READING_PROP,
2N/A &prop) != 0) {
2N/A topo_mod_dprintf(mod,
2N/A "invalid arguments to 'reading' method\n");
2N/A return (topo_mod_seterrno(mod, EMOD_NVL_INVAL));
2N/A }
2N/A
2N/A if (nvlist_lookup_double(args, TOPO_METH_SES_READING_MULT,
2N/A &multiplier) != 0)
2N/A multiplier = 1;
2N/A
2N/A if ((np = ses_node_lock(mod, tn)) == NULL) {
2N/A topo_mod_dprintf(mod, "failed to lookup ses node in 'mode' "
2N/A "method\n");
2N/A return (-1);
2N/A }
2N/A verify((props = ses_node_props(np)) != NULL);
2N/A
2N/A if (nvlist_lookup_uint64(props, prop, &current) == 0) {
2N/A raw = (double)current;
2N/A } else if (nvlist_lookup_int64(props, prop, &scurrent) == 0) {
2N/A raw = (double)scurrent;
2N/A } else {
2N/A topo_mod_dprintf(mod, "failed to lookup %s in node "
2N/A "properties\n", prop);
2N/A ses_node_unlock(mod, tn);
2N/A return (topo_mod_seterrno(mod, EMOD_METHOD_NOTSUP));
2N/A }
2N/A
2N/A ses_node_unlock(mod, tn);
2N/A
2N/A nvl = NULL;
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0 ||
2N/A nvlist_add_string(nvl, TOPO_PROP_VAL_NAME,
2N/A TOPO_SENSOR_READING) != 0 ||
2N/A nvlist_add_uint32(nvl, TOPO_PROP_VAL_TYPE, TOPO_TYPE_DOUBLE) != 0 ||
2N/A nvlist_add_double(nvl, TOPO_PROP_VAL_VAL, raw * multiplier) != 0) {
2N/A nvlist_free(nvl);
2N/A return (topo_mod_seterrno(mod, EMOD_NOMEM));
2N/A }
2N/A
2N/A *out = nvl;
2N/A return (0);
2N/A}
2N/A
2N/A/*
2N/A * Returns the current sensor state. This can be invoked for one of two
2N/A * different types of sensors: threshold or discrete sensors. For discrete
2N/A * sensors, we expect a name of a boolean property and indicate
2N/A * asserted/deasserted based on that. For threshold sensors, we check for the
2N/A * standard warning/critical properties and translate that into the appropriate
2N/A * topo state.
2N/A */
2N/A/*ARGSUSED*/
2N/Astatic int
2N/Ases_sensor_state(topo_mod_t *mod, tnode_t *tn, topo_version_t vers,
2N/A nvlist_t *in, nvlist_t **out)
2N/A{
2N/A nvlist_t *nvl, *args, *props;
2N/A boolean_t value;
2N/A uint64_t status;
2N/A uint32_t state;
2N/A ses_node_t *np;
2N/A char *prop;
2N/A
2N/A if (nvlist_lookup_nvlist(in, TOPO_PROP_ARGS, &args) != 0) {
2N/A topo_mod_dprintf(mod,
2N/A "invalid arguments to 'state' method\n");
2N/A return (topo_mod_seterrno(mod, EMOD_NVL_INVAL));
2N/A }
2N/A
2N/A if ((np = ses_node_lock(mod, tn)) == NULL) {
2N/A topo_mod_dprintf(mod, "failed to lookup ses node in 'mode' "
2N/A "method\n");
2N/A return (-1);
2N/A }
2N/A verify((props = ses_node_props(np)) != NULL);
2N/A
2N/A if (nvlist_lookup_uint64(props, SES_PROP_STATUS_CODE, &status) != 0)
2N/A status = SES_ESC_UNSUPPORTED;
2N/A
2N/A state = 0;
2N/A if (nvlist_lookup_string(args, TOPO_METH_SES_STATE_PROP,
2N/A &prop) == 0) {
2N/A /* discrete (fault) sensor */
2N/A
2N/A if (status == SES_ESC_UNRECOVERABLE)
2N/A state |= TOPO_SENSOR_STATE_GENERIC_FAIL_NONRECOV;
2N/A else if (status == SES_ESC_CRITICAL)
2N/A state |= TOPO_SENSOR_STATE_GENERIC_FAIL_CRITICAL;
2N/A else if (nvlist_lookup_boolean_value(props, prop,
2N/A &value) == 0 && value)
2N/A state |= TOPO_SENSOR_STATE_GENERIC_FAIL_NONRECOV;
2N/A else
2N/A state |= TOPO_SENSOR_STATE_GENERIC_FAIL_DEASSERTED;
2N/A } else {
2N/A /* threshold sensor */
2N/A if (nvlist_lookup_boolean_value(props,
2N/A SES_PROP_WARN_UNDER, &value) == 0 && value)
2N/A state |= TOPO_SENSOR_STATE_THRESH_LOWER_NONCRIT;
2N/A if (nvlist_lookup_boolean_value(props,
2N/A SES_PROP_WARN_OVER, &value) == 0 && value)
2N/A state |= TOPO_SENSOR_STATE_THRESH_UPPER_NONCRIT;
2N/A if (nvlist_lookup_boolean_value(props,
2N/A SES_PROP_CRIT_UNDER, &value) == 0 && value)
2N/A state |= TOPO_SENSOR_STATE_THRESH_LOWER_CRIT;
2N/A if (nvlist_lookup_boolean_value(props,
2N/A SES_PROP_CRIT_OVER, &value) == 0 && value)
2N/A state |= TOPO_SENSOR_STATE_THRESH_UPPER_CRIT;
2N/A }
2N/A
2N/A ses_node_unlock(mod, tn);
2N/A
2N/A nvl = NULL;
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0 ||
2N/A nvlist_add_string(nvl, TOPO_PROP_VAL_NAME,
2N/A TOPO_SENSOR_STATE) != 0 ||
2N/A nvlist_add_uint32(nvl, TOPO_PROP_VAL_TYPE, TOPO_TYPE_UINT32) != 0 ||
2N/A nvlist_add_uint32(nvl, TOPO_PROP_VAL_VAL, state) != 0) {
2N/A nvlist_free(nvl);
2N/A return (topo_mod_seterrno(mod, EMOD_NOMEM));
2N/A }
2N/A
2N/A *out = nvl;
2N/A return (0);
2N/A}
2N/A
2N/A/*
2N/A * Read the status of a PSU. This is such a specialized operation that it has
2N/A * its own method instead of trying to piggyback on ses_sensor_state(). We
2N/A * use the following mapping to get to the standard topo power supply states:
2N/A *
2N/A * acfail -> INPUT_LOST
2N/A * dcfail -> INPUT_LOST
2N/A * undervoltage -> INPUT_RANGE
2N/A * overvoltage -> INPUT_RANGE_PRES
2N/A * overcurrent -> INPUT_RANGE_PRES
2N/A * overtemp -> (none)
2N/A *
2N/A * If we ever have a need for reading overtemp, we can expand the topo
2N/A * representation for power supplies, but at the moment this seems unnecessary.
2N/A */
2N/A/*ARGSUSED*/
2N/Astatic int
2N/Ases_psu_state(topo_mod_t *mod, tnode_t *tn, topo_version_t vers,
2N/A nvlist_t *in, nvlist_t **out)
2N/A{
2N/A nvlist_t *nvl, *props;
2N/A boolean_t value;
2N/A uint32_t state;
2N/A ses_node_t *np;
2N/A
2N/A if ((np = ses_node_lock(mod, tn)) == NULL) {
2N/A topo_mod_dprintf(mod, "failed to lookup ses node in 'mode' "
2N/A "method\n");
2N/A return (-1);
2N/A }
2N/A verify((props = ses_node_props(np)) != NULL);
2N/A
2N/A state = 0;
2N/A if ((nvlist_lookup_boolean_value(props, SES_PSU_PROP_DC_FAIL,
2N/A &value) == 0 && value) ||
2N/A (nvlist_lookup_boolean_value(props, SES_PSU_PROP_AC_FAIL,
2N/A &value) == 0 && value))
2N/A state |= TOPO_SENSOR_STATE_POWER_SUPPLY_INPUT_LOST;
2N/A
2N/A if (nvlist_lookup_boolean_value(props, SES_PSU_PROP_DC_UNDER_VOLTAGE,
2N/A &value) == 0 && value)
2N/A state |= TOPO_SENSOR_STATE_POWER_SUPPLY_INPUT_RANGE;
2N/A
2N/A if ((nvlist_lookup_boolean_value(props, SES_PSU_PROP_DC_OVER_VOLTAGE,
2N/A &value) == 0 && value) ||
2N/A (nvlist_lookup_boolean_value(props, SES_PSU_PROP_DC_OVER_CURRENT,
2N/A &value) == 0 && value))
2N/A state |= TOPO_SENSOR_STATE_POWER_SUPPLY_INPUT_RANGE_PRES;
2N/A
2N/A ses_node_unlock(mod, tn);
2N/A
2N/A nvl = NULL;
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0 ||
2N/A nvlist_add_string(nvl, TOPO_PROP_VAL_NAME,
2N/A TOPO_SENSOR_STATE) != 0 ||
2N/A nvlist_add_uint32(nvl, TOPO_PROP_VAL_TYPE, TOPO_TYPE_UINT32) != 0 ||
2N/A nvlist_add_uint32(nvl, TOPO_PROP_VAL_VAL, state) != 0) {
2N/A nvlist_free(nvl);
2N/A return (topo_mod_seterrno(mod, EMOD_NOMEM));
2N/A }
2N/A
2N/A *out = nvl;
2N/A return (0);
2N/A}
2N/A
2N/A/*
2N/A * Create a facility node, either a sensor or an indicator.
2N/A */
2N/Astatic tnode_t *
2N/Ases_add_fac_common(topo_mod_t *mod, tnode_t *pnode, const char *name,
2N/A const char *type, uint64_t nodeid)
2N/A{
2N/A tnode_t *tn;
2N/A topo_pgroup_info_t pgi;
2N/A int err;
2N/A ses_enum_target_t *stp = topo_node_getspecific(pnode);
2N/A
2N/A if ((tn = topo_node_facbind(mod, pnode, name, type)) == NULL) {
2N/A topo_mod_dprintf(mod, "failed to bind facility node %s\n",
2N/A name);
2N/A return (NULL);
2N/A }
2N/A
2N/A stp->set_refcount++;
2N/A topo_node_setspecific(tn, stp);
2N/A
2N/A pgi.tpi_name = TOPO_PGROUP_FACILITY;
2N/A pgi.tpi_namestab = TOPO_STABILITY_PRIVATE;
2N/A pgi.tpi_datastab = TOPO_STABILITY_PRIVATE;
2N/A pgi.tpi_version = 1;
2N/A
2N/A if (topo_pgroup_create(tn, &pgi, &err) != 0) {
2N/A topo_mod_dprintf(mod, "failed to create facility property "
2N/A "group: %s\n", topo_strerror(err));
2N/A topo_node_unbind(tn);
2N/A return (NULL);
2N/A }
2N/A
2N/A /*
2N/A * We need the node-id property for each facility node.
2N/A */
2N/A pgi.tpi_name = TOPO_PGROUP_SES;
2N/A pgi.tpi_namestab = TOPO_STABILITY_PRIVATE;
2N/A pgi.tpi_datastab = TOPO_STABILITY_PRIVATE;
2N/A pgi.tpi_version = TOPO_VERSION;
2N/A
2N/A if (topo_pgroup_create(tn, &pgi, &err) != 0) {
2N/A topo_mod_dprintf(mod, "failed to create ses property "
2N/A "group: %s\n", topo_strerror(err));
2N/A topo_node_unbind(tn);
2N/A return (NULL);
2N/A }
2N/A
2N/A if (topo_prop_set_uint64(tn, TOPO_PGROUP_SES,
2N/A TOPO_PROP_NODE_ID, TOPO_PROP_IMMUTABLE,
2N/A nodeid, &err) != 0) {
2N/A topo_mod_dprintf(mod,
2N/A "failed to create property %s: %s\n",
2N/A TOPO_PROP_NODE_ID, topo_strerror(err));
2N/A topo_node_unbind(tn);
2N/A return (NULL);
2N/A }
2N/A
2N/A return (tn);
2N/A}
2N/A
2N/A/*
2N/A * Add an indicator. This can be represented by a single property, or by the
2N/A * union of two elements when SES is capable of distinguishing between
2N/A * requested failure and detected failure.
2N/A */
2N/Astatic int
2N/Ases_add_indicator(topo_mod_t *mod, tnode_t *pnode, uint64_t nodeid,
2N/A int type, const char *name, const char *propname, const char *altprop)
2N/A{
2N/A tnode_t *tn;
2N/A int err;
2N/A nvlist_t *nvl;
2N/A
2N/A /* create facility node and add methods */
2N/A if ((tn = ses_add_fac_common(mod, pnode, name,
2N/A TOPO_FAC_TYPE_INDICATOR, nodeid)) == NULL)
2N/A return (-1);
2N/A
2N/A if (topo_method_register(mod, tn, ses_indicator_methods) < 0) {
2N/A topo_mod_dprintf(mod, "failed to register facility methods\n");
2N/A topo_node_unbind(tn);
2N/A return (-1);
2N/A }
2N/A
2N/A /* set standard properties */
2N/A if (topo_prop_set_uint32(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_FACILITY_TYPE, TOPO_PROP_IMMUTABLE, type, &err) != 0) {
2N/A topo_mod_dprintf(mod,
2N/A "failed to set facility node properties: %s\n",
2N/A topo_strerror(err));
2N/A topo_node_unbind(tn);
2N/A return (-1);
2N/A }
2N/A
2N/A /* 'mode' property */
2N/A nvl = NULL;
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0 ||
2N/A nvlist_add_string(nvl, TOPO_METH_SES_MODE_PROP,
2N/A propname) != 0 ||
2N/A (altprop != NULL && nvlist_add_string(nvl,
2N/A TOPO_METH_SES_MODE_ALTPROP, altprop) != 0)) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to setup method arguments\n");
2N/A topo_node_unbind(tn);
2N/A return (topo_mod_seterrno(mod, EMOD_NOMEM));
2N/A }
2N/A
2N/A if (topo_prop_method_register(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_LED_MODE, TOPO_TYPE_UINT32, "ses_indicator_mode",
2N/A nvl, &err) != 0) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to register reading method: %s\n",
2N/A topo_strerror(err));
2N/A return (-1);
2N/A }
2N/A
2N/A if (topo_prop_setmutable(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_LED_MODE, &err) != 0) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to set property as mutable: %s\n",
2N/A topo_strerror(err));
2N/A return (-1);
2N/A }
2N/A
2N/A nvlist_free(nvl);
2N/A return (0);
2N/A}
2N/A
2N/Astatic tnode_t *
2N/Ases_add_sensor_common(topo_mod_t *mod, tnode_t *pnode, uint64_t nodeid,
2N/A const char *name, const char *class, int type)
2N/A{
2N/A tnode_t *tn;
2N/A int err;
2N/A
2N/A /* create facility node and add methods */
2N/A if ((tn = ses_add_fac_common(mod, pnode, name,
2N/A TOPO_FAC_TYPE_SENSOR, nodeid)) == NULL)
2N/A return (NULL);
2N/A
2N/A if (topo_method_register(mod, tn, ses_sensor_methods) < 0) {
2N/A topo_mod_dprintf(mod, "failed to register facility methods\n");
2N/A topo_node_unbind(tn);
2N/A return (NULL);
2N/A }
2N/A
2N/A /* set standard properties */
2N/A if (topo_prop_set_string(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_SENSOR_CLASS, TOPO_PROP_IMMUTABLE,
2N/A class, &err) != 0 ||
2N/A topo_prop_set_uint32(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_FACILITY_TYPE, TOPO_PROP_IMMUTABLE,
2N/A type, &err) != 0) {
2N/A topo_mod_dprintf(mod,
2N/A "failed to set facility node properties: %s\n",
2N/A topo_strerror(err));
2N/A topo_node_unbind(tn);
2N/A return (NULL);
2N/A }
2N/A
2N/A return (tn);
2N/A}
2N/A
2N/A/*
2N/A * Add an analog (threshold) sensor to the enclosure. This is used for fan
2N/A * speed, voltage, current, and temperature sensors.
2N/A */
2N/Astatic int
2N/Ases_add_sensor(topo_mod_t *mod, tnode_t *pnode, uint64_t nodeid,
2N/A const char *name, const ses_sensor_desc_t *sdp)
2N/A{
2N/A tnode_t *tn;
2N/A int err;
2N/A nvlist_t *nvl;
2N/A
2N/A if ((tn = ses_add_sensor_common(mod, pnode, nodeid, name,
2N/A TOPO_SENSOR_CLASS_THRESHOLD, sdp->sd_type)) == NULL)
2N/A return (-1);
2N/A
2N/A if (topo_prop_set_uint32(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_SENSOR_UNITS, TOPO_PROP_IMMUTABLE, sdp->sd_units, &err) != 0) {
2N/A topo_mod_dprintf(mod,
2N/A "failed to set facility node properties: %s\n",
2N/A topo_strerror(err));
2N/A topo_node_unbind(tn);
2N/A return (-1);
2N/A }
2N/A
2N/A /* 'reading' property */
2N/A nvl = NULL;
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0 ||
2N/A nvlist_add_string(nvl, TOPO_METH_SES_READING_PROP,
2N/A sdp->sd_propname) != 0 ||
2N/A (sdp->sd_multiplier != 0 &&
2N/A nvlist_add_double(nvl, TOPO_METH_SES_READING_MULT,
2N/A sdp->sd_multiplier) != 0)) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to setup method arguments\n");
2N/A topo_node_unbind(tn);
2N/A return (-1);
2N/A }
2N/A
2N/A if (topo_prop_method_register(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_SENSOR_READING, TOPO_TYPE_DOUBLE, "ses_sensor_reading",
2N/A nvl, &err) != 0) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to register reading method: %s\n",
2N/A topo_strerror(err));
2N/A return (-1);
2N/A }
2N/A
2N/A nvlist_free(nvl);
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0) {
2N/A topo_mod_dprintf(mod, "failed to setup method arguments\n");
2N/A topo_node_unbind(tn);
2N/A return (-1);
2N/A }
2N/A
2N/A /* 'state' property */
2N/A if (topo_prop_method_register(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_SENSOR_STATE, TOPO_TYPE_UINT32, "ses_sensor_state",
2N/A nvl, &err) != 0) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to register state method: %s\n",
2N/A topo_strerror(err));
2N/A return (-1);
2N/A }
2N/A
2N/A nvlist_free(nvl);
2N/A return (0);
2N/A}
2N/A
2N/A/*
2N/A * Add a discrete sensor for simple boolean values. This is used to indicate
2N/A * externally-detected failures for fans, bays, and enclosures.
2N/A */
2N/Astatic int
2N/Ases_add_discrete(topo_mod_t *mod, tnode_t *pnode, uint64_t nodeid,
2N/A const char *name, const char *prop)
2N/A{
2N/A tnode_t *tn;
2N/A int err;
2N/A nvlist_t *nvl;
2N/A
2N/A if ((tn = ses_add_sensor_common(mod, pnode, nodeid, name,
2N/A TOPO_SENSOR_CLASS_DISCRETE,
2N/A TOPO_SENSOR_TYPE_GENERIC_FAILURE)) == NULL)
2N/A return (-1);
2N/A
2N/A nvl = NULL;
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0 ||
2N/A nvlist_add_string(nvl, TOPO_METH_SES_STATE_PROP, prop) != 0) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to setup method arguments\n");
2N/A topo_node_unbind(tn);
2N/A return (-1);
2N/A }
2N/A
2N/A /* 'state' property */
2N/A if (topo_prop_method_register(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_SENSOR_STATE, TOPO_TYPE_UINT32, "ses_sensor_state",
2N/A nvl, &err) != 0) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to register state method: %s\n",
2N/A topo_strerror(err));
2N/A return (-1);
2N/A }
2N/A
2N/A nvlist_free(nvl);
2N/A return (0);
2N/A}
2N/A
2N/A/*ARGSUSED*/
2N/Astatic int
2N/Ases_add_psu_status(topo_mod_t *mod, tnode_t *pnode, uint64_t nodeid)
2N/A{
2N/A tnode_t *tn;
2N/A int err;
2N/A nvlist_t *nvl;
2N/A
2N/A /* create facility node and add methods */
2N/A if ((tn = ses_add_sensor_common(mod, pnode, nodeid, "status",
2N/A TOPO_SENSOR_CLASS_DISCRETE,
2N/A TOPO_SENSOR_TYPE_POWER_SUPPLY)) == NULL)
2N/A return (-1);
2N/A
2N/A if (topo_mod_nvalloc(mod, &nvl, NV_UNIQUE_NAME) != 0) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to setup method arguments\n");
2N/A topo_node_unbind(tn);
2N/A return (-1);
2N/A }
2N/A
2N/A /* 'state' property */
2N/A if (topo_prop_method_register(tn, TOPO_PGROUP_FACILITY,
2N/A TOPO_SENSOR_STATE, TOPO_TYPE_UINT32, "ses_psu_state",
2N/A nvl, &err) != 0) {
2N/A nvlist_free(nvl);
2N/A topo_mod_dprintf(mod, "failed to register state method: %s\n",
2N/A topo_strerror(err));
2N/A return (-1);
2N/A }
2N/A
2N/A nvlist_free(nvl);
2N/A return (0);
2N/A}
2N/A
2N/A/*ARGSUSED*/
2N/Aint
2N/Ases_node_enum_facility(topo_mod_t *mod, tnode_t *tn, topo_version_t vers,
2N/A nvlist_t *in, nvlist_t **out)
2N/A{
2N/A ses_node_t *np;
2N/A nvlist_t *props;
2N/A uint64_t type, nodeid;
2N/A ses_sensor_desc_t sd = { 0 };
2N/A
2N/A if ((np = ses_node_lock(mod, tn)) == NULL)
2N/A return (-1);
2N/A
2N/A assert(ses_node_type(np) == SES_NODE_ELEMENT);
2N/A nodeid = ses_node_id(np);
2N/A verify((props = ses_node_props(np)) != NULL);
2N/A verify(nvlist_lookup_uint64(props, SES_PROP_ELEMENT_TYPE, &type) == 0);
2N/A
2N/A if (type != SES_ET_DEVICE && type != SES_ET_ARRAY_DEVICE &&
2N/A type != SES_ET_COOLING && type != SES_ET_POWER_SUPPLY &&
2N/A type != SES_ET_ESC_ELECTRONICS && type != SES_ET_SUNW_FANMODULE) {
2N/A ses_node_unlock(mod, tn);
2N/A return (0);
2N/A }
2N/A
2N/A /*
2N/A * Every element supports an 'ident' indicator. All elements also
2N/A * support a 'fail' indicator, but the properties used to represent
2N/A * this condition differs between elements.
2N/A */
2N/A if (ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_LOCATE, "ident",
2N/A SES_PROP_IDENT, NULL) != 0)
2N/A goto error;
2N/A
2N/A switch (type) {
2N/A case SES_ET_DEVICE:
2N/A case SES_ET_ARRAY_DEVICE:
2N/A /*
2N/A * Disks support an additional 'ok2rm' indicator, as well as
2N/A * externally detected 'fail' sensor.
2N/A */
2N/A if (ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_SERVICE,
2N/A "fail", SES_DEV_PROP_FAULT_RQSTD,
2N/A SES_DEV_PROP_FAULT_SENSED) != 0 ||
2N/A ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_OK2RM,
2N/A "ok2rm", SES_PROP_RMV, SES_PROP_RMV) != 0 ||
2N/A ses_add_discrete(mod, tn, nodeid, "fault",
2N/A SES_DEV_PROP_FAULT_SENSED) != 0)
2N/A goto error;
2N/A break;
2N/A
2N/A case SES_ET_COOLING:
2N/A /*
2N/A * Add the fan speed sensor, and a discrete sensor for
2N/A * detecting failure.
2N/A */
2N/A sd.sd_type = TOPO_SENSOR_TYPE_THRESHOLD_STATE;
2N/A sd.sd_units = TOPO_SENSOR_UNITS_RPM;
2N/A sd.sd_propname = SES_COOLING_PROP_FAN_SPEED;
2N/A if (ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_SERVICE,
2N/A "fail", SES_PROP_FAIL, NULL) != 0 ||
2N/A ses_add_sensor(mod, tn, nodeid, "speed", &sd) != 0 ||
2N/A ses_add_discrete(mod, tn, nodeid, "fault",
2N/A SES_PROP_OFF) != 0)
2N/A goto error;
2N/A break;
2N/A
2N/A case SES_ET_POWER_SUPPLY:
2N/A /*
2N/A * For power supplies, we have a number of different sensors:
2N/A * acfail, dcfail, overtemp, undervoltate, overvoltage,
2N/A * and overcurrent. Rather than expose these all as individual
2N/A * sensors, we lump them together into a 'status' sensor of
2N/A * type TOPO_SENSOR_TYPE_POWER_SUPPLY and export the
2N/A * appropriate status flags as defined by the libtopo standard.
2N/A */
2N/A if (ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_SERVICE,
2N/A "fail", SES_PROP_FAIL, NULL) != 0)
2N/A goto error;
2N/A
2N/A if (ses_add_psu_status(mod, tn, nodeid) != 0)
2N/A goto error;
2N/A break;
2N/A
2N/A case SES_ET_ESC_ELECTRONICS:
2N/A if (ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_SERVICE,
2N/A "fail", SES_PROP_FAIL, NULL) != 0)
2N/A goto error;
2N/A break;
2N/A
2N/A case SES_ET_SUNW_FANMODULE:
2N/A if (ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_SERVICE,
2N/A "fail", SES_PROP_FAIL, NULL) != 0 ||
2N/A ses_add_discrete(mod, tn, nodeid, "fault",
2N/A SES_PROP_OFF) != 0)
2N/A goto error;
2N/A break;
2N/A
2N/A default:
2N/A return (0);
2N/A }
2N/A
2N/A ses_node_unlock(mod, tn);
2N/A return (0);
2N/A
2N/Aerror:
2N/A ses_node_unlock(mod, tn);
2N/A return (-1);
2N/A}
2N/A
2N/A/*
2N/A * Add enclosure-wide sensors (temperature, voltage, and current) beneath the
2N/A * given aggregate.
2N/A */
2N/Astatic int
2N/Ases_add_enclosure_sensors(topo_mod_t *mod, tnode_t *tn, ses_node_t *agg,
2N/A uint64_t type)
2N/A{
2N/A ses_node_t *child;
2N/A const char *defaultname;
2N/A char *desc, *name;
2N/A char rawname[64];
2N/A nvlist_t *props, *aprops;
2N/A uint64_t index, nodeid;
2N/A ses_sensor_desc_t sd = { 0 };
2N/A size_t len;
2N/A
2N/A switch (type) {
2N/A case SES_ET_TEMPERATURE_SENSOR:
2N/A sd.sd_type = TOPO_SENSOR_TYPE_TEMP;
2N/A sd.sd_units = TOPO_SENSOR_UNITS_DEGREES_C;
2N/A sd.sd_propname = SES_TEMP_PROP_TEMP;
2N/A defaultname = "temperature";
2N/A break;
2N/A
2N/A case SES_ET_VOLTAGE_SENSOR:
2N/A sd.sd_type = TOPO_SENSOR_TYPE_VOLTAGE;
2N/A sd.sd_units = TOPO_SENSOR_UNITS_VOLTS;
2N/A sd.sd_propname = SES_VS_PROP_VOLTAGE_MV;
2N/A sd.sd_multiplier = 0.001;
2N/A defaultname = "voltage";
2N/A break;
2N/A
2N/A case SES_ET_CURRENT_SENSOR:
2N/A sd.sd_type = TOPO_SENSOR_TYPE_CURRENT;
2N/A sd.sd_units = TOPO_SENSOR_UNITS_AMPS;
2N/A sd.sd_propname = SES_CS_PROP_CURRENT_MA;
2N/A sd.sd_multiplier = 0.001;
2N/A defaultname = "current";
2N/A break;
2N/A
2N/A default:
2N/A return (0);
2N/A }
2N/A
2N/A aprops = ses_node_props(agg);
2N/A
2N/A for (child = ses_node_child(agg); child != NULL;
2N/A child = ses_node_sibling(child)) {
2N/A /*
2N/A * The only tricky part here is getting the name for the
2N/A * sensor, where we follow the algorithm of the standard
2N/A * elements.
2N/A */
2N/A props = ses_node_props(child);
2N/A nodeid = ses_node_id(child);
2N/A if (nvlist_lookup_uint64(props, SES_PROP_ELEMENT_CLASS_INDEX,
2N/A &index) != 0)
2N/A continue;
2N/A
2N/A if (nvlist_lookup_string(props, SES_PROP_DESCRIPTION,
2N/A &desc) == 0 && desc[0] != '\0') {
2N/A (void) strlcpy(rawname, desc, sizeof (rawname));
2N/A } else {
2N/A if (nvlist_lookup_string(aprops,
2N/A SES_PROP_CLASS_DESCRIPTION, &desc) != 0 ||
2N/A desc[0] == '\0')
2N/A desc = (char *)defaultname;
2N/A
2N/A len = strlen(desc);
2N/A while (len > 0 && desc[len - 1] == ' ')
2N/A len--;
2N/A
2N/A (void) snprintf(rawname, sizeof (rawname),
2N/A "%.*s %llu", len, desc, index);
2N/A }
2N/A
2N/A if ((name = ses_auth_clean(mod, rawname)) == NULL)
2N/A return (-1);
2N/A
2N/A if (ses_add_sensor(mod, tn, nodeid, name, &sd) != 0) {
2N/A topo_mod_strfree(mod, name);
2N/A return (-1);
2N/A }
2N/A
2N/A topo_mod_strfree(mod, name);
2N/A }
2N/A
2N/A return (0);
2N/A}
2N/A
2N/A/*ARGSUSED*/
2N/Aint
2N/Ases_enc_enum_facility(topo_mod_t *mod, tnode_t *tn, topo_version_t vers,
2N/A nvlist_t *in, nvlist_t **out)
2N/A{
2N/A ses_node_t *np, *agg;
2N/A nvlist_t *aprops;
2N/A uint64_t type, nodeid;
2N/A
2N/A if ((np = ses_node_lock(mod, tn)) == NULL)
2N/A return (-1);
2N/A
2N/A assert(ses_node_type(np) == SES_NODE_ENCLOSURE);
2N/A nodeid = ses_node_id(np);
2N/A
2N/A /*
2N/A * 'ident' and 'fail' LEDs, and 'fault' sensor.
2N/A */
2N/A if (ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_LOCATE, "ident",
2N/A SES_PROP_IDENT, NULL) != 0 ||
2N/A ses_add_indicator(mod, tn, nodeid, TOPO_LED_TYPE_SERVICE, "fail",
2N/A SES_PROP_FAIL_REQ, SES_PROP_FAIL) != 0 ||
2N/A ses_add_discrete(mod, tn, nodeid, "fault", SES_PROP_FAIL) != 0)
2N/A goto error;
2N/A
2N/A /*
2N/A * Environmental sensors (temperature, voltage, current). We have no
2N/A * way of knowing if any of these sensors correspond to a particular
2N/A * element, so we just attach them to the enclosure as a whole. In the
2N/A * future, some vendor-specific libses plugin knowledge could let us
2N/A * make this correlation clearer.
2N/A */
2N/A for (agg = ses_node_child(np); agg != NULL;
2N/A agg = ses_node_sibling(agg)) {
2N/A if (ses_node_type(agg) != SES_NODE_AGGREGATE)
2N/A continue;
2N/A
2N/A verify((aprops = ses_node_props(agg)) != NULL);
2N/A if (nvlist_lookup_uint64(aprops, SES_PROP_ELEMENT_TYPE,
2N/A &type) != 0)
2N/A continue;
2N/A
2N/A if (ses_add_enclosure_sensors(mod, tn, agg, type) != 0)
2N/A goto error;
2N/A }
2N/A
2N/A ses_node_unlock(mod, tn);
2N/A return (0);
2N/A
2N/Aerror:
2N/A ses_node_unlock(mod, tn);
2N/A return (-1);
2N/A}