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 * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
2N/A * Use is subject to license terms.
2N/A */
2N/A
2N/A
2N/A/*LINTLIBRARY*/
2N/A
2N/A
2N/A/*
2N/A * This module is part of the photon library
2N/A */
2N/A
2N/A/*
2N/A * I18N message number ranges
2N/A * This file: 8500 - 8999
2N/A * Shared common messages: 1 - 1999
2N/A */
2N/A
2N/A/* #define _POSIX_SOURCE 1 */
2N/A
2N/A/* Includes */
2N/A#include <stdlib.h>
2N/A#include <stdio.h>
2N/A#include <sys/file.h>
2N/A#include <sys/types.h>
2N/A#include <sys/stat.h>
2N/A#include <sys/param.h>
2N/A#include <fcntl.h>
2N/A#include <unistd.h>
2N/A#include <errno.h>
2N/A#include <string.h>
2N/A#include <time.h>
2N/A#include <sys/scsi/scsi.h>
2N/A#include <sys/vtoc.h>
2N/A#include <nl_types.h>
2N/A#include <strings.h>
2N/A#include <sys/ddi.h> /* for max */
2N/A#include <l_common.h>
2N/A#include <stgcom.h>
2N/A#include <l_error.h>
2N/A#include <rom.h>
2N/A#include <a_state.h>
2N/A#include <a5k.h>
2N/A
2N/A
2N/A/* Global variables */
2N/Aextern uchar_t g_switch_to_alpa[];
2N/Aextern uchar_t g_sf_alpa_to_switch[];
2N/A
2N/A
2N/A/*
2N/A * This function checks if the passed char pointer has WWN_SIZE nulls (zeroes).
2N/A *
2N/A * This is only a convenience function.
2N/A *
2N/A * INPUT:
2N/A * wwn_ptr - pointer to a character string of length WWN_SIZE
2N/A * It is expected to be holding the WWN
2N/A * Ex: A WWN like 508002000000ddc1 is expected to be stored as
2N/A * the following 8 bytes -
2N/A * 0x50, 0x80, 0x00, 0x20, ... etc
2N/A *
2N/A * RETURNS:
2N/A * 0 - if there is atleast one of WWN_SIZE bytes is != '\0'
2N/A * non-zero - if all WWN_SIZE bytes are '\0'
2N/A */
2N/Aint
2N/Ais_null_wwn(uchar_t *wwn_ptr)
2N/A{
2N/A int i;
2N/A
2N/A for (i = 0; i < WWN_SIZE; i++) {
2N/A if (wwn_ptr[i] != '\0' || wwn_ptr[i] != '0')
2N/A return (0);
2N/A }
2N/A return (1);
2N/A}
2N/A
2N/A
2N/A/*
2N/A * This functions constructs a device path of the device/enclosure with the
2N/A * given tid and, for public/fabric cases, on the same area and domain as
2N/A * the given ses_path.
2N/A *
2N/A * INPUT:
2N/A * ses_path - pointer to the ses_path
2N/A * tid - tid of the device/enclosure whose path is to be constructed
2N/A * map - pointer to the map
2N/A * dtype - dtype of the device whose path is to be constructed
2N/A *
2N/A * OUTPUT:
2N/A * dev_path - pointer to the device path of type dtype and with tid
2N/A * - Caller has to free this after use
2N/A *
2N/A * RETURNS:
2N/A * 0 - on success
2N/A * non-zero - otherwise
2N/A */
2N/Aint
2N/Al_make_node(char *ses_path, int tid, char *dev_path,
2N/A gfc_map_t *map, int dtype)
2N/A{
2N/Aint len, i, err;
2N/Aint this_pid, ses_pid;
2N/Achar ssd[40], wwn[20];
2N/Agfc_port_dev_info_t *dev_addr_ptr;
2N/Astruct stat stat_buf;
2N/AWWN_list *wwnlp, *wwn_list;
2N/Aint found = 0;
2N/A
2N/A if ((ses_path == NULL) || (dev_path == NULL) || (map == NULL)) {
2N/A return (L_INVALID_PATH_FORMAT);
2N/A }
2N/A
2N/A switch (map->hba_addr.port_topology) {
2N/A case FC_TOP_PRIVATE_LOOP:
2N/A for (i = 0, dev_addr_ptr = map->dev_addr;
2N/A i < map->count; i++, dev_addr_ptr++) {
2N/A if (dev_addr_ptr->gfc_port_dev.priv_port.
2N/A sf_al_pa == g_switch_to_alpa[tid])
2N/A break;
2N/A }
2N/A if (i >= map->count) {
2N/A *dev_path = '\0';
2N/A return (L_INVALID_LOOP_MAP);
2N/A }
2N/A
2N/A /* Make sure that the port WWN is valid */
2N/A if (is_null_wwn(dev_addr_ptr->gfc_port_dev.
2N/A priv_port.sf_port_wwn)) {
2N/A *dev_path = '\0';
2N/A return (L_INVLD_WWN_FORMAT);
2N/A }
2N/A
2N/A (void) g_ll_to_str(dev_addr_ptr->gfc_port_dev.
2N/A priv_port.sf_port_wwn, wwn);
2N/A
2N/A if (strstr(ses_path, SCSI_VHCI) != NULL) {
2N/A if (err = g_get_wwn_list(&wwn_list, 0)) {
2N/A return (err);
2N/A }
2N/A for (wwnlp = wwn_list, found = 0;
2N/A wwnlp != NULL;
2N/A wwnlp = wwnlp->wwn_next) {
2N/A if (strcmp(wwnlp->port_wwn_s,
2N/A wwn) == 0) {
2N/A found = 1;
2N/A break;
2N/A }
2N/A }
2N/A if (found) {
2N/A (void) strcpy(dev_path,
2N/A wwnlp->physical_path);
2N/A } else {
2N/A return (L_INVALID_PATH);
2N/A }
2N/A } else {
2N/A
2N/A len = strlen(ses_path) -
2N/A strlen(strrchr(ses_path, '/'));
2N/A
2N/A if (dtype != DTYPE_ESI) {
2N/A (void) sprintf(ssd,
2N/A "/ssd@w%s,0:c", wwn);
2N/A } else {
2N/A (void) sprintf(ssd,
2N/A "/ses@w%s,0:c", wwn);
2N/A }
2N/A
2N/A /* TBD: Must find path, not just use :c */
2N/A (void) strncpy(dev_path, ses_path, len);
2N/A dev_path[len] = '\0';
2N/A (void) strcat(dev_path, ssd);
2N/A }
2N/A break;
2N/A case FC_TOP_FABRIC:
2N/A case FC_TOP_PUBLIC_LOOP:
2N/A /* First lets get the PA from the ses path passed in */
2N/A if (err = l_get_pid_from_path(ses_path, map, &ses_pid)) {
2N/A return (err);
2N/A }
2N/A
2N/A /*
2N/A * Now we go through every entry in the map and match the
2N/A * area and domain ids with the PA of the passed ses path.
2N/A * If we find a match, we then match the low order byte
2N/A */
2N/A for (i = 0, dev_addr_ptr = map->dev_addr; i < map->count;
2N/A i++, dev_addr_ptr++) {
2N/A this_pid = dev_addr_ptr->gfc_port_dev.pub_port.
2N/A dev_did.port_id;
2N/A if ((this_pid & AREA_DOMAIN_ID) ==
2N/A (ses_pid & AREA_DOMAIN_ID)) {
2N/A if ((uchar_t)(this_pid & 0xFF) ==
2N/A g_switch_to_alpa[tid])
2N/A break;
2N/A }
2N/A }
2N/A if (i >= map->count) {
2N/A *dev_path = '\0';
2N/A return (L_INVALID_LOOP_MAP);
2N/A }
2N/A /* Make sure that the port WWN is valid */
2N/A if (is_null_wwn(dev_addr_ptr->gfc_port_dev.pub_port.
2N/A dev_pwwn.raw_wwn)) {
2N/A *dev_path = '\0';
2N/A return (L_INVLD_WWN_FORMAT);
2N/A }
2N/A (void) g_ll_to_str(dev_addr_ptr->gfc_port_dev.
2N/A pub_port.dev_pwwn.raw_wwn, wwn);
2N/A
2N/A
2N/A
2N/A if (strstr(ses_path, SCSI_VHCI) != NULL) {
2N/A if (err = g_get_wwn_list(&wwn_list, 0)) {
2N/A return (err);
2N/A }
2N/A for (wwnlp = wwn_list, found = 0; wwnlp != NULL;
2N/A wwnlp = wwnlp->wwn_next) {
2N/A if (strcmp(wwnlp->port_wwn_s,
2N/A wwn) == 0) {
2N/A found = 1;
2N/A }
2N/A }
2N/A if (found) {
2N/A (void) strcpy(dev_path,
2N/A wwnlp->physical_path);
2N/A } else {
2N/A return (L_INVALID_PATH);
2N/A }
2N/A } else {
2N/A len = strlen(ses_path) -
2N/A strlen(strrchr(ses_path, '/'));
2N/A
2N/A if (dtype != DTYPE_ESI) {
2N/A (void) sprintf(ssd, "/ssd@w%s,0:c", wwn);
2N/A } else {
2N/A (void) sprintf(ssd, "/ses@w%s,0:c", wwn);
2N/A }
2N/A
2N/A /* TBD: Must find path, not just use :c */
2N/A (void) strncpy(dev_path, ses_path, len);
2N/A dev_path[len] = '\0';
2N/A (void) strcat(dev_path, ssd);
2N/A }
2N/A
2N/A if (stat(dev_path, &stat_buf) == -1) {
2N/A return (errno);
2N/A }
2N/A
2N/A break;
2N/A case FC_TOP_PT_PT:
2N/A return (L_PT_PT_FC_TOP_NOT_SUPPORTED);
2N/A default:
2N/A return (L_UNEXPECTED_FC_TOPOLOGY);
2N/A } /* End of switch on port_topology */
2N/A return (0);
2N/A}
2N/A
2N/A
2N/A
2N/A/*
2N/A * checks for null wwn to a disk.
2N/A * and returns -1 if found, 0
2N/A * otherwise.
2N/A *
2N/A * OUTPUT:
2N/A * char *ses_path
2N/A *
2N/A * RETURNS:
2N/A * 0 if OK
2N/A * non-zero otherwise
2N/A */
2N/Aint
2N/Al_chk_null_wwn(Path_struct *path_struct, char *ses_path,
2N/A L_state *l_state, int verbose)
2N/A{
2N/Achar *ptr, boxname[MAXPATHLEN];
2N/Achar node_wwn_s[WWN_SIZE * 2 + 1];
2N/ABox_list *boxlist;
2N/A
2N/A
2N/A if ((path_struct == NULL) || (ses_path == NULL) ||
2N/A (l_state == NULL)) {
2N/A return (L_INVALID_PATH_FORMAT);
2N/A }
2N/A
2N/A /*
2N/A * verify and continue only if the argv
2N/A * has a format like box,{f/r}<slot #>.
2N/A * Otherwise, return to the caller.
2N/A * The only way to address null wwn disk
2N/A * is using the box,{f/r}<slot#> format.
2N/A */
2N/A/* add support for new {f/r/s}<slot#> support for DPM */
2N/A (void) strcpy(boxname, path_struct->argv);
2N/A if (((ptr = strstr(boxname, ",")) != NULL) &&
2N/A ((*(ptr + 1) == 'f') || (*(ptr + 1) == 'r') ||
2N/A (*(ptr + 1) == 's'))) {
2N/A *ptr = NULL;
2N/A } else {
2N/A return (0);
2N/A }
2N/A
2N/A
2N/A /*
2N/A * Get the list of enclosures
2N/A * connected to the system.
2N/A */
2N/A if (l_get_box_list(&boxlist, verbose) != 0) {
2N/A return (L_NO_ENCL_LIST_FOUND);
2N/A }
2N/A
2N/A *ses_path = NULL;
2N/A
2N/A /*
2N/A * The following method is safer to get an ses path
2N/A * to the enclosure than calling l_get_ses_path(),
2N/A * with physical path to null WWN disk.
2N/A * Because, l_get_ses_path uses the disk's
2N/A * al_pa to get the box id and then ses path
2N/A * to the box. When a disk has null wwn, it may
2N/A * not have a valid al_pa, and hard address.
2N/A * There is a possibility that l_get_ses_path()
2N/A * not returning ses path to the correct enclosure.
2N/A */
2N/A while (boxlist != NULL) {
2N/A if ((strcmp(boxname, (char *)boxlist->b_name) == 0)) {
2N/A (void) strcpy(ses_path, boxlist->b_physical_path);
2N/A break;
2N/A }
2N/A boxlist = boxlist->box_next;
2N/A }
2N/A
2N/A /* free the box list */
2N/A (void) l_free_box_list(&boxlist);
2N/A
2N/A if ((ses_path != NULL) && (strstr(ses_path, "ses") != NULL)) {
2N/A if (l_get_status(ses_path, l_state,
2N/A verbose) != 0) {
2N/A return (L_GET_STATUS_FAILED);
2N/A }
2N/A if (path_struct->f_flag) {
2N/A (void) strcpy(node_wwn_s,
2N/A l_state->drv_front[path_struct->slot].g_disk_state.node_wwn_s);
2N/A } else {
2N/A (void) strcpy(node_wwn_s,
2N/A l_state->drv_rear[path_struct->slot].g_disk_state.node_wwn_s);
2N/A }
2N/A
2N/A W_DPRINTF("Found ses path: %s\n"
2N/A "and Node WWN: %s\n", ses_path, node_wwn_s);
2N/A
2N/A /* check for null WWN */
2N/A if (is_null_wwn((uchar_t *)node_wwn_s) == 0) {
2N/A return (0); /* Non-null wwn */
2N/A }
2N/A W_DPRINTF("Found NULL WWN: %s\n", node_wwn_s);
2N/A return (1);
2N/A }
2N/A
2N/A return (0);
2N/A
2N/A}
2N/A
2N/A
2N/A
2N/A/*
2N/A * If OVERALL_STATUS is sent as the "func",
2N/A * the code pointer must be valid (non NULL).
2N/A * Otherwise NULL is a valid input for the code pointer.
2N/A *
2N/A * RETURNS:
2N/A * 0 if OK
2N/A * non-zero otherwise
2N/A */
2N/Aint
2N/Al_encl_status_page_funcs(int func, char *code, int todo, char *ses_path,
2N/A struct l_state_struct *l_state,
2N/A int f_flag, int slot, int verbose_flag)
2N/A{
2N/Auchar_t *page_buf;
2N/Aint fd, front_index, rear_index, offset, err;
2N/Aunsigned short page_len;
2N/Astruct device_element *elem;
2N/A
2N/A if ((ses_path == NULL) || (l_state == NULL)) {
2N/A return (L_INVALID_PATH_FORMAT);
2N/A }
2N/A
2N/A if ((page_buf = (uchar_t *)g_zalloc(MAX_REC_DIAG_LENGTH)) == NULL) {
2N/A return (L_MALLOC_FAILED);
2N/A }
2N/A
2N/A if ((fd = g_object_open(ses_path, O_NDELAY | O_RDWR)) == -1) {
2N/A (void) g_destroy_data(page_buf);
2N/A return (L_OPEN_PATH_FAIL);
2N/A }
2N/A
2N/A if ((err = l_get_envsen_page(fd, page_buf, MAX_REC_DIAG_LENGTH,
2N/A L_PAGE_2, verbose_flag)) != 0) {
2N/A (void) g_destroy_data(page_buf);
2N/A (void) close(fd);
2N/A return (err);
2N/A }
2N/A
2N/A page_len = (page_buf[2] << 8 | page_buf[3]) + HEADER_LEN;
2N/A
2N/A if ((err = l_get_disk_element_index(l_state, &front_index,
2N/A &rear_index)) != 0) {
2N/A (void) g_destroy_data(page_buf);
2N/A (void) close(fd);
2N/A return (err);
2N/A }
2N/A /* Skip global element */
2N/A front_index++;
2N/A if ((strncmp((char *)l_state->ib_tbl.config.prod_id, DAK_OFF_NAME,
2N/A strlen(DAK_OFF_NAME)) == 0) ||
2N/A (strncmp((char *)l_state->ib_tbl.config.prod_id, DAK_PROD_STR,
2N/A strlen(DAK_OFF_NAME)) == 0)) {
2N/A rear_index += l_state->total_num_drv/2 + 1;
2N/A } else
2N/A rear_index++;
2N/A
2N/A if (f_flag) {
2N/A offset = (8 + (front_index + slot)*4);
2N/A } else {
2N/A offset = (8 + (rear_index + slot)*4);
2N/A }
2N/A
2N/A elem = (struct device_element *)(page_buf + offset);
2N/A
2N/A switch (func) {
2N/A case OVERALL_STATUS:
2N/A if (code == NULL) {
2N/A return (L_INVALID_ARG);
2N/A }
2N/A switch (todo) {
2N/A case INSERT_DEVICE:
2N/A *code = (elem->code != S_OK) ? elem->code : 0;
2N/A (void) g_destroy_data(page_buf);
2N/A (void) close(fd);
2N/A return (0);
2N/A case REMOVE_DEVICE:
2N/A *code = (elem->code != S_NOT_INSTALLED) ?
2N/A elem->code : 0;
2N/A (void) g_destroy_data(page_buf);
2N/A (void) close(fd);
2N/A return (0);
2N/A }
2N/A /* NOTREACHED */
2N/A case SET_RQST_INSRT:
2N/A bzero(elem, sizeof (struct device_element));
2N/A elem->select = 1;
2N/A elem->rdy_to_ins = 1;
2N/A break;
2N/A case SET_RQST_RMV:
2N/A bzero(elem, sizeof (struct device_element));
2N/A elem->select = 1;
2N/A elem->rmv = 1;
2N/A elem->dev_off = 1;
2N/A elem->en_bypass_a = 1;
2N/A elem->en_bypass_b = 1;
2N/A break;
2N/A case SET_FAULT:
2N/A bzero(elem, sizeof (struct device_element));
2N/A elem->select = 1;
2N/A elem->fault_req = 1;
2N/A elem->dev_off = 1;
2N/A elem->en_bypass_a = 1;
2N/A elem->en_bypass_b = 1;
2N/A break;
2N/A case SET_DRV_ON:
2N/A bzero(elem, sizeof (struct device_element));
2N/A elem->select = 1;
2N/A break;
2N/A }
2N/A
2N/A err = g_scsi_send_diag_cmd(fd, (uchar_t *)page_buf, page_len);
2N/A (void) g_destroy_data(page_buf);
2N/A (void) close(fd);
2N/A return (err);
2N/A}
2N/A
2N/A
2N/A
2N/A/*
2N/A * Finds whether device id (tid) exists in the
2N/A * Arbitrated loop map or not.
2N/A *
2N/A * INPUT:
2N/A * ses_path - pointer to a ses path
2N/A * tid - the target id of the device we want to check on
2N/A * - only the low order 8 bits has the tid
2N/A * map - pointer to a map of the system
2N/A * verbose_flag - self explanatory
2N/A *
2N/A * OUTPUT:
2N/A * dev_path - the device path of the device with "tid".
2N/A * Caller is responsible for freeing it
2N/A *
2N/A * RETURNS:
2N/A * 1 if device present
2N/A * 0 otherwise
2N/A */
2N/Aint
2N/Al_device_present(char *ses_path, int tid, gfc_map_t *map,
2N/A int verbose_flag, char **dev_path)
2N/A{
2N/Achar sf_path[MAXPATHLEN];
2N/Auchar_t wwn[40], c;
2N/Aint len, i, j, k, fnib, snib, this_pid;
2N/Aint fd, ses_pid, al_pa, err;
2N/Achar ssd[30];
2N/Agfc_port_dev_info_t *dev_addr_ptr;
2N/AWWN_list *wwnlp, *wwn_list;
2N/A
2N/A
2N/A if (dev_path == NULL)
2N/A return (0);
2N/A
2N/A if ((ses_path == NULL) || (map == NULL)) {
2N/A return (L_NO_SES_PATH);
2N/A }
2N/A
2N/A *dev_path = NULL;
2N/A
2N/A switch (map->hba_addr.port_topology) {
2N/A case FC_TOP_PRIVATE_LOOP:
2N/A for (i = 0, dev_addr_ptr = map->dev_addr; i < map->count;
2N/A i++, dev_addr_ptr++) {
2N/A if (dev_addr_ptr->gfc_port_dev.
2N/A priv_port.sf_inq_dtype != DTYPE_ESI) {
2N/A al_pa = dev_addr_ptr->gfc_port_dev.
2N/A priv_port.sf_al_pa;
2N/A if (tid == g_sf_alpa_to_switch[al_pa]) {
2N/A break;
2N/A }
2N/A }
2N/A }
2N/A if (i >= map->count)
2N/A return (0);
2N/A /*
2N/A * Make sure that the port WWN is valid
2N/A */
2N/A if (is_null_wwn(dev_addr_ptr->gfc_port_dev.
2N/A priv_port.sf_port_wwn)) {
2N/A return (0);
2N/A }
2N/A for (j = 0, k = 0; j < WWN_SIZE; j++) {
2N/A c = dev_addr_ptr->gfc_port_dev.priv_port.sf_port_wwn[j];
2N/A fnib = (((int)(c & 0xf0)) >> 4);
2N/A snib = (c & 0x0f);
2N/A if (fnib >= 0 && fnib <= 9)
2N/A wwn[k++] = '0' + fnib;
2N/A else if (fnib >= 10 && fnib <= 15)
2N/A wwn[k++] = 'a' + fnib - 10;
2N/A if (snib >= 0 && snib <= 9)
2N/A wwn[k++] = '0' + snib;
2N/A else if (snib >= 10 && snib <= 15)
2N/A wwn[k++] = 'a' + snib - 10;
2N/A }
2N/A wwn[k] = '\0';
2N/A break;
2N/A case FC_TOP_PUBLIC_LOOP:
2N/A case FC_TOP_FABRIC:
2N/A /*
2N/A * Get the phys address (port id) of this ses device
2N/A */
2N/A if (err = l_get_pid_from_path(ses_path, map, &ses_pid))
2N/A return (err);
2N/A
2N/A for (i = 0, dev_addr_ptr = map->dev_addr; i < map->count;
2N/A i++, dev_addr_ptr++) {
2N/A if (dev_addr_ptr->gfc_port_dev.pub_port.dev_dtype !=
2N/A DTYPE_ESI) {
2N/A /*
2N/A * We have a device. First match the area and
2N/A * domain ids and if they match, then see if
2N/A * the 8bit tid matches the last 8 bits of
2N/A * 'this_pid'
2N/A */
2N/A this_pid = dev_addr_ptr->gfc_port_dev.
2N/A pub_port.dev_did.port_id;
2N/A if ((this_pid & AREA_DOMAIN_ID) ==
2N/A (ses_pid & AREA_DOMAIN_ID)) {
2N/A if (tid == g_sf_alpa_to_switch[
2N/A this_pid & 0xFF])
2N/A break;
2N/A }
2N/A }
2N/A }
2N/A
2N/A if (i >= map->count)
2N/A return (0);
2N/A /*
2N/A * Make sure that the port WWN is valid
2N/A */
2N/A if (is_null_wwn(dev_addr_ptr->gfc_port_dev.
2N/A pub_port.dev_pwwn.raw_wwn)) {
2N/A return (0);
2N/A }
2N/A for (j = 0, k = 0; j < WWN_SIZE; j++) {
2N/A c = dev_addr_ptr->gfc_port_dev.pub_port.
2N/A dev_pwwn.raw_wwn[j];
2N/A fnib = (((int)(c & 0xf0)) >> 4);
2N/A snib = (c & 0x0f);
2N/A if (fnib >= 0 && fnib <= 9)
2N/A wwn[k++] = '0' + fnib;
2N/A else if (fnib >= 10 && fnib <= 15)
2N/A wwn[k++] = 'a' + fnib - 10;
2N/A if (snib >= 0 && snib <= 9)
2N/A wwn[k++] = '0' + snib;
2N/A else if (snib >= 10 && snib <= 15)
2N/A wwn[k++] = 'a' + snib - 10;
2N/A }
2N/A wwn[k] = '\0';
2N/A break;
2N/A case FC_TOP_PT_PT:
2N/A return (L_PT_PT_FC_TOP_NOT_SUPPORTED);
2N/A default:
2N/A return (L_UNEXPECTED_FC_TOPOLOGY);
2N/A } /* End of switch on port_topology */
2N/A
2N/A if (strstr(ses_path, SCSI_VHCI) != NULL) {
2N/A if (err = g_get_wwn_list(&wwn_list, 0)) {
2N/A return (err);
2N/A }
2N/A for (wwnlp = wwn_list; wwnlp != NULL;
2N/A wwnlp = wwnlp->wwn_next) {
2N/A if (memcmp(wwnlp->port_wwn_s, wwn, WWN_S_LEN) == 0) {
2N/A break;
2N/A }
2N/A }
2N/A if (wwnlp != NULL) {
2N/A if ((*dev_path = g_zalloc(MAXPATHLEN)) == NULL) {
2N/A g_free_wwn_list(&wwn_list);
2N/A return (L_MALLOC_FAILED);
2N/A }
2N/A (void) strcpy(*dev_path, wwnlp->physical_path);
2N/A } else {
2N/A g_free_wwn_list(&wwn_list);
2N/A return (0);
2N/A }
2N/A } else {
2N/A
2N/A len = strlen(ses_path) - strlen(strrchr(ses_path, '/'));
2N/A
2N/A (void) sprintf(ssd, "ssd@w%s,0", wwn);
2N/A
2N/A (void) strncpy(sf_path, ses_path, len);
2N/A sf_path[len] = '\0';
2N/A P_DPRINTF(" l_device_present: wwn=%s, sf_path=%s\n",
2N/A wwn, sf_path);
2N/A
2N/A if ((*dev_path = g_zalloc(MAXPATHLEN)) == NULL) {
2N/A return (L_MALLOC_FAILED);
2N/A }
2N/A (void) sprintf(*dev_path, "%s/%s", sf_path, ssd);
2N/A P_DPRINTF(" l_device_present: dev_path=%s\n", *dev_path);
2N/A
2N/A (void) strcat(*dev_path, ":c");
2N/A }
2N/A if ((fd = open(*dev_path, O_RDONLY)) == -1) {
2N/A free(*dev_path);
2N/A *dev_path = NULL;
2N/A return (0);
2N/A }
2N/A (void) close(fd);
2N/A return (1);
2N/A}
2N/A
2N/A
2N/A
2N/A/*
2N/A * onlines the given list of devices
2N/A * and free up the allocated memory.
2N/A *
2N/A * RETURNS:
2N/A * N/A
2N/A */
2N/Astatic void
2N/Aonline_dev(struct dlist *dl_head, int force_flag)
2N/A{
2N/Astruct dlist *dl, *dl1;
2N/A
2N/A for (dl = dl_head; dl != NULL; ) {
2N/A (void) g_online_drive(dl->multipath, force_flag);
2N/A (void) g_free_multipath(dl->multipath);
2N/A dl1 = dl;
2N/A dl = dl->next;
2N/A (void) g_destroy_data(dl1);
2N/A }
2N/A}
2N/A
2N/A
2N/A
2N/A/*
2N/A * offlines all the disks in a
2N/A * SENA enclosure.
2N/A *
2N/A * RETURNS:
2N/A * 0 if O.K.
2N/A * non-zero otherwise
2N/A */
2N/Aint
2N/Al_offline_photon(struct hotplug_disk_list *hotplug_sena,
2N/A struct wwn_list_struct *wwn_list,
2N/A int force_flag, int verbose_flag)
2N/A{
2N/Aint i, err;
2N/Astruct dlist *dl_head, *dl_tail, *dl, *dl_ses;
2N/Achar *dev_path, ses_path[MAXPATHLEN];
2N/AL_state *l_state = NULL;
2N/A
2N/A if (hotplug_sena == NULL) {
2N/A return (L_INVALID_PATH_FORMAT);
2N/A }
2N/A
2N/A dl_head = dl_tail = NULL;
2N/A if ((l_state = (L_state *)calloc(1, sizeof (L_state))) == NULL) {
2N/A return (L_MALLOC_FAILED);
2N/A }
2N/A
2N/A /* Get global status for this Photon */
2N/A dl_ses = hotplug_sena->seslist;
2N/A while (dl_ses) {
2N/A (void) strcpy(ses_path, dl_ses->dev_path);
2N/A if (l_get_status(ses_path, l_state, verbose_flag) == 0)
2N/A break;
2N/A dl_ses = dl_ses->next;
2N/A }
2N/A
2N/A if (dl_ses == NULL) {
2N/A (void) l_free_lstate(&l_state);
2N/A return (L_ENCL_INVALID_PATH);
2N/A }
2N/A
2N/A for (i = 0; i < l_state->total_num_drv/2; i++) {
2N/A if (*l_state->drv_front[i].g_disk_state.physical_path) {
2N/A if ((dev_path = g_zalloc(MAXPATHLEN)) == NULL) {
2N/A (void) online_dev(dl_head, force_flag);
2N/A (void) l_free_lstate(&l_state);
2N/A return (L_MALLOC_FAILED);
2N/A }
2N/A (void) strcpy(dev_path,
2N/A (char *)&l_state->drv_front[i].g_disk_state.physical_path);
2N/A if ((dl = g_zalloc(sizeof (struct dlist))) == NULL) {
2N/A (void) g_destroy_data(dev_path);
2N/A (void) online_dev(dl_head, force_flag);
2N/A (void) l_free_lstate(&l_state);
2N/A return (L_MALLOC_FAILED);
2N/A }
2N/A dl->dev_path = dev_path;
2N/A if ((err = g_get_multipath(dev_path,
2N/A &(dl->multipath), wwn_list, 0)) != 0) {
2N/A (void) g_destroy_data(dev_path);
2N/A if (dl->multipath != NULL) {
2N/A (void) g_free_multipath(dl->multipath);
2N/A }
2N/A (void) g_destroy_data(dl);
2N/A (void) online_dev(dl_head, force_flag);
2N/A (void) l_free_lstate(&l_state);
2N/A return (err);
2N/A }
2N/A if ((err = g_offline_drive(dl->multipath,
2N/A force_flag)) != 0) {
2N/A (void) g_destroy_data(dev_path);
2N/A (void) g_free_multipath(dl->multipath);
2N/A (void) g_destroy_data(dl);
2N/A (void) online_dev(dl_head, force_flag);
2N/A (void) l_free_lstate(&l_state);
2N/A return (err);
2N/A }
2N/A if (dl_head == NULL) {
2N/A dl_head = dl_tail = dl;
2N/A } else {
2N/A dl_tail->next = dl;
2N/A dl->prev = dl_tail;
2N/A dl_tail = dl;
2N/A }
2N/A (void) g_destroy_data(dev_path);
2N/A }
2N/A if (*l_state->drv_rear[i].g_disk_state.physical_path) {
2N/A if ((dev_path = g_zalloc(MAXPATHLEN)) == NULL) {
2N/A (void) online_dev(dl_head, force_flag);
2N/A (void) l_free_lstate(&l_state);
2N/A return (L_MALLOC_FAILED);
2N/A }
2N/A (void) strcpy(dev_path,
2N/A (char *)&l_state->drv_rear[i].g_disk_state.physical_path);
2N/A if ((dl = g_zalloc(sizeof (struct dlist))) == NULL) {
2N/A (void) g_destroy_data(dev_path);
2N/A (void) online_dev(dl_head, force_flag);
2N/A (void) l_free_lstate(&l_state);
2N/A return (L_MALLOC_FAILED);
2N/A }
2N/A dl->dev_path = dev_path;
2N/A if ((err = g_get_multipath(dev_path,
2N/A &(dl->multipath), wwn_list, 0)) != 0) {
2N/A (void) g_destroy_data(dev_path);
2N/A if (dl->multipath != NULL) {
2N/A (void) g_free_multipath(dl->multipath);
2N/A }
2N/A (void) g_destroy_data(dl);
2N/A (void) online_dev(dl_head, force_flag);
2N/A (void) l_free_lstate(&l_state);
2N/A return (err);
2N/A }
2N/A if ((err = g_offline_drive(dl->multipath,
2N/A force_flag)) != 0) {
2N/A (void) g_destroy_data(dev_path);
2N/A (void) g_free_multipath(dl->multipath);
2N/A (void) g_destroy_data(dl);
2N/A (void) online_dev(dl_head, force_flag);
2N/A (void) l_free_lstate(&l_state);
2N/A return (err);
2N/A }
2N/A if (dl_head == NULL) {
2N/A dl_head = dl_tail = dl;
2N/A } else {
2N/A dl_tail->next = dl;
2N/A dl->prev = dl_tail;
2N/A dl_tail = dl;
2N/A }
2N/A (void) g_destroy_data(dev_path);
2N/A }
2N/A }
2N/A hotplug_sena->dlhead = dl_head;
2N/A (void) l_free_lstate(&l_state);
2N/A return (0);
2N/A
2N/A}
2N/A
2N/A
2N/A
2N/A/*
2N/A * prepares a char string
2N/A * containing the name of the
2N/A * device which will be hotplugged.
2N/A *
2N/A * RETURNS:
2N/A * N/A
2N/A */
2N/Avoid
2N/Al_get_drive_name(char *drive_name, int slot, int f_flag, char *box_name)
2N/A{
2N/Aint enc_type = 0;
2N/AL_inquiry inq;
2N/Achar *physpath;
2N/APath_struct *p_pathstruct;
2N/A
2N/A if ((drive_name == NULL) || (box_name == NULL)) {
2N/A return;
2N/A }
2N/A
2N/A if (!l_convert_name(box_name, &physpath, &p_pathstruct, 0)) {
2N/A if (!g_get_inquiry(physpath, &inq)) {
2N/A enc_type = l_get_enc_type(inq);
2N/A }
2N/A }
2N/A /* If either of the above fail, we use the default value of 0 */
2N/A free(physpath);
2N/A free(p_pathstruct);
2N/A switch (enc_type) {
2N/A case DAK_ENC_TYPE:
2N/A if (f_flag != NULL) {
2N/A (void) sprintf(drive_name, MSGSTR(8502,
2N/A "Drive in \"%s\" slot %d"), box_name, slot);
2N/A } else {
2N/A (void) sprintf(drive_name, MSGSTR(8502,
2N/A "Drive in \"%s\" slot %d"), box_name,
2N/A slot + (MAX_DRIVES_DAK/2));
2N/A }
2N/A break;
2N/A default:
2N/A if (f_flag != NULL) {
2N/A (void) sprintf(drive_name, MSGSTR(8500,
2N/A "Drive in \"%s\" front slot %d"), box_name, slot);
2N/A } else {
2N/A (void) sprintf(drive_name, MSGSTR(8501,
2N/A "Drive in \"%s\" rear slot %d"), box_name, slot);
2N/A }
2N/A break;
2N/A }
2N/A}