/**
* do_remove
*
* Removes nodes associated a PCI slot from the Open Firmware
* device tree and isolates and powers off the PCI slot.
*
* A remove may be specified by the location code of the PCI slot.
* Unless the user specifies the -I flag, the slot is identified
* the user. Nodes representing the device(s) are removed from the
* Open Firmware device tree. The slot is isolated and powered off,
* and the LED is turned off.
*
* If there are any errors from the RTAS routines,
* the slot is powered off, isolated, and the LED is turned off. No
* unconfiguration is completed.
* If the OF tree cannot be updated, the slot is powered
* off, isolated, and the LED is turned off.
*/
static int
do_remove(struct options *opts, struct dr_node *all_nodes)
{
struct dr_node *node;
/* Remove the specified slot and update the device-tree */
node = remove_work(opts, all_nodes);
if (node == NULL)
return -1;
/* Prompt user to remove card and to press
* Enter to continue. Can't exit out of here.
*/
if (0 == opts->noprompt) {
if (process_led(node, LED_ACTION))
return -1;
printf("The visual indicator for the specified PCI slot "
"has\nbeen set to the action state. Remove the PCI "
"card\nfrom the identified slot and press Enter to "
"continue.\n");
getchar();
if (process_led(node, LED_OFF))
return -1;
}
return 0;
}
/**
* do_identify
* @brief Main processor for the drslot_chrp_pci -i command
*
* Validate the user input, a slot name. Call the routine which actually
* does the call to set the LED. When we're done identifying, reset the
* LED based on whether or not there's an OF node representing an adapter
* connected to the slot. If an adapter node exists, turn the LED on,
* else turn if off.
*/
static int
do_identify(struct options *opts, struct dr_node *all_nodes)
{
struct dr_node *node;
int usr_key;
int led_state;
node = find_slot(opts->usr_drc_name, all_nodes);
if (node == NULL)
return -1;
usr_key = identify_slot(node);
/* when we're done with identify, put the LED back
* where we think it ought to be. ON if an adapter is
* connected, OFF if not
*/
if (node->children == NULL)
led_state = LED_OFF;
else
led_state = LED_ON;
if (process_led(node, led_state))
return -1;
if (usr_key == USER_QUIT)
return -1;
return 0; /* don't return anything on identify */
}
/**
* identify_slot
*
* Given a slot structure, set the led of the slot to the identify
* state and print a message to the user. Read the user input and return it.
*
* @param islot pointer to slot to be set
* @returns USER_CONT if user pushes enter key, USER_QUIT otherwise
*/
static int
identify_slot(struct dr_node *node)
{
if (process_led(node, LED_ID))
return USER_QUIT;
printf("The visual indicator for the specified PCI slot has\n"
"been set to the identify state. Press Enter to continue\n"
"or enter x to exit.\n");
if (getchar() == '\n')
return (USER_CONT);
else
return (USER_QUIT);
}
static int
process_sensors(int level, picl_nodehdl_t nodeh)
{
picl_nodehdl_t childh;
picl_nodehdl_t nexth;
char propname[PICL_PROPNAMELEN_MAX];
char propclass[PICL_CLASSNAMELEN_MAX];
picl_errno_t error_code;
level++;
DEBUGMSGTL(("ucd-snmp/lmSensors","in process_sensors() level %d\n",level));
/* look up first child node */
error_code = picl_get_propval_by_name(nodeh, PICL_PROP_CHILD, &childh,
sizeof (picl_nodehdl_t));
if (error_code != PICL_SUCCESS) {
DEBUGMSGTL(("ucd-snmp/lmSensors",
"picl_get_propval_by_name(%s) %d\n",
PICL_PROP_CHILD, error_code));
return (error_code);
}
/* step through child nodes, get the name first */
while (error_code == PICL_SUCCESS) {
error_code = picl_get_propval_by_name(childh, PICL_PROP_NAME,
propname, (PICL_PROPNAMELEN_MAX - 1));
if (error_code != PICL_SUCCESS) { /*we found a node with no name. Impossible.! */
DEBUGMSGTL(("ucd-snmp/lmSensors",
"picl_get_propval_by_name(%s) = %d\n",
PICL_PROP_NAME, error_code));
return (error_code);
}
error_code = picl_get_propval_by_name(childh, PICL_PROP_CLASSNAME,
propclass, sizeof (propclass));
if (error_code != PICL_SUCCESS) { /*we found a node with no class. Impossible.! */
DEBUGMSGTL(("ucd-snmp/lmSensors",
"picl_get_propval_by_name(%s) = %d\n",
PICL_PROP_CLASSNAME, error_code));
return (error_code);
}
DEBUGMSGTL(("ucd-snmp/lmSensors","found %s of class %s\n",propname,propclass));
if (strstr(propclass,"fan-tachometer"))
process_individual_fan(childh,propname);
else if (strstr(propclass,"fan"))
process_newtype_fan(childh,propname);
else if (strstr(propclass,"temperature-sensor"))
process_temperature_sensor(childh,propname);
else if (strstr(propclass,"voltage-sensor"))
process_voltage_sensor(childh,propname);
else if (strstr(propclass,"digital-sensor"))
process_digital_sensor(childh,propname);
else if (strstr(propclass,"switch"))
process_switch(childh,propname);
else if (strstr(propclass,"led"))
process_led(childh,propname);
else if (strstr(propclass,"i2c"))
process_i2c(childh,propname);
/*
else if (strstr(propclass,"gpio"))
process_gpio(childh,propname);
*/
/* look for children of children (note, this is recursive) */
if (!(strstr(propclass,"picl") &&
(strstr(propname,"frutree") || strstr(propname,"obp")))) {
error_code = process_sensors(level,childh);
DEBUGMSGTL(("ucd-snmp/lmSensors",
"process_sensors(%s) returned %d\n",
propname, error_code));
}
/* get next child node at this level*/
error_code = picl_get_propval_by_name(childh, PICL_PROP_PEER,
&nexth, sizeof (picl_nodehdl_t));
if (error_code != PICL_SUCCESS) {/* no more children - buh bye*/
DEBUGMSGTL(("ucd-snmp/lmSensors","Process sensors is out of children! Returning...\n"));
return (error_code);
}
childh = nexth;
} /* while */
return (error_code);
} /* process sensors */
static int
process_sensors(picl_nodehdl_t nodeh)
{
picl_nodehdl_t childh;
picl_nodehdl_t nexth;
char propname[PICL_PROPNAMELEN_MAX];
char propclass[PICL_CLASSNAMELEN_MAX];
picl_errno_t error_code;
/* look up first child node */
error_code = picl_get_propval_by_name(nodeh, PICL_PROP_CHILD, &childh,
sizeof (picl_nodehdl_t));
if (error_code != PICL_SUCCESS) {
return (error_code);
}
/* step through child nodes, get the name first */
while (error_code == PICL_SUCCESS) {
error_code = picl_get_propval_by_name(childh, PICL_PROP_NAME,
propname, (PICL_PROPNAMELEN_MAX - 1));
if (error_code != PICL_SUCCESS) { /*we found a node with no name. Impossible.! */
return (error_code);
}
if (strcmp(propname,PICL_NODE_PLATFORM)==0){ /*end of the chain*/
return (255);
}
error_code = picl_get_propval_by_name(childh, PICL_PROP_CLASSNAME,
propclass, sizeof (propclass));
if (error_code != PICL_SUCCESS) { /*we found a node with no class. Impossible.! */
return (error_code);
}
/* DEBUGMSGTL(("ucd-snmp/lmSensors","found %s of class %s\n",propname,propclass)); */
if (strstr(propclass,"fan-tachometer"))
process_individual_fan(childh,propname);
if (strstr(propclass,"temperature-sensor"))
process_temperature_sensor(childh,propname);
if (strstr(propclass,"digital-sensor"))
process_digital_sensor(childh,propname);
if (strstr(propclass,"switch"))
process_switch(childh,propname);
if (strstr(propclass,"led"))
process_led(childh,propname);
if (strstr(propclass,"i2c"))
process_i2c(childh,propname);
/*
if (strstr(propclass,"gpio"))
process_gpio(childh,propname);
*/
/* look for children of children (note, this is recursive) */
if (process_sensors(childh) == PICL_SUCCESS) {
return (PICL_SUCCESS);
}
/* get next child node at this level*/
error_code = picl_get_propval_by_name(childh, PICL_PROP_PEER,
&nexth, sizeof (picl_nodehdl_t));
if (error_code != PICL_SUCCESS) {/* no more children - buh bye*/
return (error_code);
}
childh = nexth;
} /* while */
return (error_code);
} /* process sensors */
/**
* do_replace
* @brief Allows the replacement of an adapter connected to a
* PCI hot plug slot
*
* A replace may be specified by the location code of the PCI slot.
* Unless the user specifies the -I flag, the slot is identified to
* the user.
* Nodes representing the old device(s) are removed from the
* Open Firmware device tree. The slot is isolated and powered off,
* and the LED is set to the ACTION state. The user is prompted to replace
* the adpater. The slot is powered on and unisolated and configure
* connector is executed.
*
* If there are any errors from the RTAS routines,
* the slot is powered off, isolated, and the LED is turned off. If the
* original adapter has been removed, it is left in that state.
* If the OF tree cannot be updated, the slot is powered
* off, isolated, and the LED is turned off.
*/
static int
do_replace(struct options *opts, struct dr_node *all_nodes)
{
struct dr_node *repl_node;
int rc;
/* Call the routine which does the work of getting the node info,
* then removing it from the OF device tree.
*/
repl_node = remove_work(opts, all_nodes);
if (repl_node == NULL)
return -1;
if (!repl_node->children) {
say(ERROR, "Bad node struct.\n");
return -1;
}
say(DEBUG, "repl_node:path=%s node:path=%s\n",
repl_node->ofdt_path, repl_node->children->ofdt_path);
/* Prompt user to replace card and to press
* Enter to continue or x to exit. Exiting here
* means the original card has been removed.
*/
if (0 == opts->noprompt) {
if (process_led(repl_node, LED_ACTION))
return -1;
printf("The visual indicator for the specified PCI slot "
"has\nbeen set to the action state. Replace the PCI "
"card\nin the identified slot and press Enter to "
"continue.\nEnter x to exit. Exiting now leaves the "
"PCI slot\nin the removed state.\n");
if (!(getchar() == '\n')) {
process_led(repl_node, LED_OFF);
return 0;
}
}
rc = add_work(opts, repl_node);
if (rc)
return rc;
say(DEBUG, "CONFIGURING the card in node[name=%s, path=%s]\n",
repl_node->drc_name, repl_node->ofdt_path);
set_hp_adapter_status(PHP_CONFIG_ADAPTER, repl_node->drc_name);
if (repl_node->post_replace_processing) {
int prompt_save = opts->noprompt;
say(DEBUG, "Doing post replacement processing...\n");
/* disable prompting for post-processing */
opts->noprompt = 1;
repl_node = remove_work(opts, repl_node);
rc = add_work(opts, repl_node);
if (!rc)
set_hp_adapter_status(PHP_CONFIG_ADAPTER,
repl_node->drc_name);
opts->noprompt = prompt_save;
}
return rc;
}
/**
* remove_work
*
* Removes nodes associated a PCI slot from the
* Open Firmware device tree and isolates and powers off the PCI slot.
*
* A remove may be specified by the location code of the PCI slot.
* Unless the user specifies the -I flag, the slot is identified to
* the user.
* Nodes representing the device(s) are removed from the
* Open Firmware device tree. The slot is isolated and powered off,
* and the LED is turned off.
*
* @returns pointer slot on success, NULL on failure
*/
static struct dr_node *
remove_work(struct options *opts, struct dr_node *all_nodes)
{
struct dr_node *node;
struct dr_node *child;
int rc;
int usr_key = USER_CONT;
node = find_slot(opts->usr_drc_name, all_nodes);
if (node == NULL)
return NULL;
say(DEBUG, "found node: drc name=%s, index=0x%x, path=%s\n",
node->drc_name, node->drc_index, node->ofdt_path);
/* Prompt user only if not in noprompt mode */
if (0 == opts->noprompt) {
if (!opts->no_ident)
usr_key = identify_slot(node);
if (usr_key == USER_QUIT) {
if (node->children == NULL)
process_led(node, LED_OFF);
else
process_led(node, LED_ON);
return NULL;
}
}
/* Turn on the LED while we go do some work. */
if (process_led(node, LED_ON))
return NULL;
/* Make sure there's something there to remove. */
if (node->children == NULL) {
process_led(node, LED_OFF);
say(ERROR, "There is no configured card to remove from the "
"specified PCI slot.\n");
return NULL;
}
/* Make sure all the devices are
* not configured before proceeding
*/
if (get_hp_adapter_status(node->drc_name) == CONFIG) {
say(DEBUG, "unconfiguring adapter in slot[%s]\n",
node->drc_name);
set_hp_adapter_status(PHP_UNCONFIG_ADAPTER, node->drc_name);
int rc = get_hp_adapter_status(node->drc_name);
if (rc != NOT_CONFIG) {
say(ERROR, "Unconfig adapter failed.\n");
return NULL;
}
} else {
/* In certain cases such as a complete failure of the
* adapter there may not have been the possibility to clean
* up everything. Mark these adapaters for additional
* processing later.
*/
node->post_replace_processing = 1;
}
/* Call subroutine to remove node(s) from
* the device tree.
*/
for (child = node->children; child; child = child->next) {
rc = remove_device_tree_nodes(child->ofdt_path);
if (rc) {
say(ERROR, "%s", sw_error);
rtas_set_indicator(ISOLATION_STATE, node->drc_index,
ISOLATE);
set_power(node->drc_power, POWER_OFF);
return NULL;
}
}
/* We have to isolate and power off before
* allowing the user to physically remove
* the card.
*/
say(DEBUG, "is calling rtas_set_indicator(ISOLATE index 0x%x)\n",
node->drc_index);
rc = rtas_set_indicator(ISOLATION_STATE, node->drc_index, ISOLATE);
if (rc) {
if (rc == HW_ERROR)
say(ERROR, "%s", hw_error);
else
say(ERROR, "%s", sw_error);
set_power(node->drc_power, POWER_OFF);
return NULL;
}
say(DEBUG, "is calling set_power(POWER_OFF index 0x%x, power_domain "
"0x%x)\n", node->drc_index, node->drc_power);
rc = set_power(node->drc_power, POWER_OFF);
if (rc) {
if (rc == HW_ERROR)
say(ERROR, "%s", hw_error);
else
say(ERROR, "%s", sw_error);
set_power(node->drc_power, POWER_OFF);
return NULL;
}
return node;
}
/**
* do_add
*
* Prepares a PCI hot plug slot for adding an adapter, then
* configures the adapter and any PCI adapters below into
* the Open Firmware device tree.
*
* Verifies that a given hot plug PCI slot does not have an adapter
* already connected, identifies the slot to the user unless requested not
* to with the -i flag, prompts the user to connect the adapter, powers
* the slot on, and calls configure connector. When configure connector
* completes and returns the new node(s) for the new PCI adapter and any
* attached devices then the Open Firmware device tree is
* updated to reflect the new devices.
*/
static int
do_add(struct options *opts, struct dr_node *all_nodes)
{
struct dr_node *node;
int usr_key = USER_CONT;
int rc;
node = find_slot(opts->usr_drc_name, all_nodes);
if (node == NULL)
return -1;
/* Prompt user only if in interactive mode. */
if (0 == opts->noprompt) {
if (!opts->no_ident)
usr_key = identify_slot(node);
if (usr_key == USER_QUIT) {
if (node->children == NULL)
process_led(node, LED_OFF);
else
process_led(node, LED_ON);
return 0;
}
}
if (node->children != NULL) {
/* If there's already something here, turn the
* LED on and exit with user error.
*/
process_led(node, LED_ON);
say(ERROR, "The specified PCI slot is already occupied.\n");
return -1;
}
/* Now it's time to isolate, power off, set the
* action LED, and prompt the user to put the
* card in.
*/
say(DEBUG, "is calling rtas_set_indicator(ISOLATE index 0x%x)\n",
node->drc_index);
rc = rtas_set_indicator(ISOLATION_STATE, node->drc_index, ISOLATE);
if (rc) {
if (rc == HW_ERROR)
say(ERROR, "%s", hw_error);
else
say(ERROR, "%s", sw_error);
set_power(node->drc_power, POWER_OFF);
return -1;
}
say(DEBUG, "is calling set_power(POWER_OFF index 0x%x, "
"power_domain 0x%x) \n", node->drc_index, node->drc_power);
rc = set_power(node->drc_power, POWER_OFF);
if (rc) {
if (rc == HW_ERROR)
say(ERROR, "%s", hw_error);
else
say(ERROR, "%s", sw_error);
return -1;
}
if (0 == opts->noprompt) {
/* Prompt user to put in card and to press
* Enter to continue or other key to exit.
*/
if (process_led(node, LED_ACTION))
return -1;
printf("The visual indicator for the specified PCI slot has\n"
"been set to the action state. Insert the PCI card\n"
"into the identified slot, connect any devices to be\n"
"configured and press Enter to continue. Enter x to "
"exit.\n");
if (!(getchar() == '\n')) {
process_led(node, LED_OFF);
return 0;
}
}
/* Call the routine which determines
* what the user wants and does it.
*/
rc = add_work(opts, node);
if (rc)
return rc;
say(DEBUG, "is calling enable_slot to config adapter\n");
/* Try to config the adapter */
set_hp_adapter_status(PHP_CONFIG_ADAPTER, node->drc_name);
return 0;
}
/**
* add_work
*
* Prepares a PCI hot plug slot for adding an adapter, then
* configures the adapter and any PCI adapters below into the
* kernel's and /proc's Open Firmware device tree.
*
* If there are any errors from the RTAS routines,
* the slot is powered off, isolated, and the LED is turned off. No
* configuration is completed.
* If the OF tree cannot be updated, the slot is powered
* off, isolated, and the LED is turned off.
*
* @param opts
* @param slot
* @returns 0 on success, !0 on failure
*/
static int
add_work(struct options *opts, struct dr_node *node)
{
int pow_state; /* Tells us if power was turned on when */
int iso_state; /* Tells us isolation state after */
int rc;
struct of_node *new_nodes;/* nodes returned from configure_connector */
/* if we're continuing, set LED_ON and see if a card is really there. */
if (process_led(node, LED_ON))
return -1;
say(DEBUG, "is calling card_present\n");
rc = card_present(opts, node, &pow_state, &iso_state);
if (!rc) {
say(ERROR, "No PCI card was detected in the specified "
"PCI slot.\n");
rtas_set_indicator(ISOLATION_STATE, node->drc_index, ISOLATE);
set_power(node->drc_power, POWER_OFF);
return -1;
}
if (!pow_state) {
say(DEBUG, "is calling set_power(POWER_ON index 0x%x, "
"power_domain 0x%x\n", node->drc_index, node->drc_power);
rc = set_power(node->drc_power, POWER_ON);
if (rc) {
if (rc == HW_ERROR)
say(ERROR, "%s", hw_error);
else if (rc == SPEED_ERROR)
say(ERROR, "%s", speed_error);
else
say(ERROR, "%s", sw_error);
rtas_set_indicator(ISOLATION_STATE, node->drc_index,
ISOLATE);
set_power(node->drc_power, POWER_OFF);
return -1;
}
}
if (!iso_state) {
say(DEBUG, "calling rtas_set_indicator(UNISOLATE index 0x%x)\n",
node->drc_index);
rc = rtas_set_indicator(ISOLATION_STATE, node->drc_index,
UNISOLATE);
if (rc) {
if (rc == HW_ERROR)
say(ERROR, "%s", hw_error);
else
say(ERROR, "%s", sw_error);
rtas_set_indicator(ISOLATION_STATE, node->drc_index,
ISOLATE);
set_power(node->drc_power, POWER_OFF);
return -1;
}
}
/* Now go get all the new nodes for this adapter. If
* the return status requires a message, print it out
* and exit, otherwise, add the nodes to the OF tree.
*/
new_nodes = configure_connector(node->drc_index);
if (new_nodes == NULL) {
rtas_set_indicator(ISOLATION_STATE, node->drc_index, ISOLATE);
set_power(node->drc_power, POWER_OFF);
return -1;
}
say(DEBUG, "Adding %s to %s\n", new_nodes->name, node->ofdt_path);
rc = add_device_tree_nodes(node->ofdt_path, new_nodes);
if (rc) {
say(DEBUG, "add_device_tree_nodes failed at %s\n",
node->ofdt_path);
say(ERROR, "%s", sw_error);
rtas_set_indicator(ISOLATION_STATE, node->drc_index, ISOLATE);
set_power(node->drc_power, POWER_OFF);
return -1;
}
return 0;
}