/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include <unistd.h>
#include <stdlib.h>
#include <ctype.h>
#include <errno.h>
#include <printAttrs.h>
#include <smhbaapi.h>

#define	TABLEN	2
typedef struct inputArgs {
	int 		wwnCount;
	char 		**wwn_argv;
	uint64_t 	portWWN;
	char		*hbaName;
	int		pflag;
	int		*wwn_flag;
} inputArg_t;

typedef struct tgt_mapping {
	SMHBA_SCSIENTRY	tgtentry;
	uchar_t		inq_vid[8];
	uchar_t		inq_pid[16];
	uchar_t		inq_dtype;
	struct tgt_mapping *next;
}tgt_mapping;

/*
 * Remote port tree node structure.
 */
typedef struct smhba_rp_tree {
	SMHBA_PORTATTRIBUTES	portattr;
	SMHBA_SAS_PORT		sasattr;
	tgt_mapping		*first_entry;
	int			printed;
	struct smhba_rp_tree	*parent;
	struct smhba_rp_tree	*child;
	struct smhba_rp_tree	*sibling;
}rp_tree_t;

/*
 * Report LUN data structure.
 */
struct lun {
	uchar_t	val[8];
};

typedef struct rep_luns_rsp {
	uint32_t    length;
	uint32_t    rsrvd;
	struct lun  lun[1];
} rep_luns_rsp_t;

/*
 * The following flag is used for printing HBA header on-demand.
 */
static int g_printHBA = 0;

/*
 * The following structure is for sorted output of HBA and HBA Port.
 */
typedef struct _sas_elem {
	char	name[256];
	int	index;
}sas_elem_t;

/*
 * The following two functions are for generating hierachy of expander
 * subcommand.
 */
static int
sas_rp_tree_insert(rp_tree_t **rproot, rp_tree_t *rpnode);
static int
sas_rp_tree_print(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    rp_tree_t *rpnode, inputArg_t *input, int gident,
    int *printPort);
static int
sas_rp_tree_print_desc(HBA_HANDLE handle, HBA_UINT32 portIndex,
    SMHBA_PORTATTRIBUTES *port, rp_tree_t *desc,
    inputArg_t *input, int lident, int gident);
static int
sas_print_rpnode(inputArg_t *input,
    rp_tree_t *rpnode, int lident, int gident);
static void sas_rp_tree_free(rp_tree_t *rproot);

typedef int (*processPortFunc)(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input);

static int processHBA(inputArg_t *input,
    processPortFunc processPort);

static int isPortWWNInArgv(inputArg_t *input, PHBA_WWN pWWN);
static int isStringInArgv(inputArg_t *input, const char *adapterName);
static boolean_t compareLUName(char *cmdArg, char *osName);
static discoveredDevice *LUList = NULL;
static targetPortList_t *gTargetPortList = NULL;

/* processes for hanlding local HBA info */
static int handleHBA(SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input,
    int numberOfPorts, const char *adapterName);
static int handleHBAPort(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input);
static int processHBAPortPhyInfo(HBA_HANDLE handle, HBA_UINT32 portIndex,
    SMHBA_PORTATTRIBUTES *port, int pflag);
static int processHBAPortPhyStat(HBA_HANDLE handle, HBA_UINT32 portIndex,
    int phyIndex, PSMHBA_SAS_PHY phyattrs, int pflag);

/* process for handling expander info */
static int handleExpander(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input);

/* process for handling target port info */
static int handleTargetPort(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input);

/* process for handling logical unit info */
static int handleLogicalUnit(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input);

/* process for target port SCSI processing */
static int
searchTargetPortMappingData(HBA_HANDLE handle, HBA_UINT32 portIndex,
    SMHBA_PORTATTRIBUTES *port, SMHBA_SAS_PORT *sasattr,
    struct targetPortConfig *configData);

/* process for target port config processing */
static int searchTargetPort(HBA_HANDLE handle, HBA_UINT32 portIndex,
    SMHBA_PORTATTRIBUTES *port, SMHBA_PORTATTRIBUTES *targetattr,
    SMHBA_SAS_PORT *sasattr, int pflag);

/* process for logical-unit config processing */
static int
searchDevice(PSMHBA_SCSIENTRY entryP, HBA_HANDLE handle, HBA_WWN hbaPortWWN,
    HBA_WWN domainPortWWN, char *portName, int pflag);

/* get domain port out of hba-port phy attr. */
HBA_STATUS get_domainPort(HBA_HANDLE handle,
    int portindex, PSMHBA_PORTATTRIBUTES port,
    HBA_WWN *pdomainPort);

static int
sas_name_comp(const char *name1, const char *name2);
static void
sas_elem_sort(sas_elem_t *array, int nelem);

/*
 * function for hba subcommand
 *
 * Arguments:
 *	wwnCount - count of the number of WWNs in wwn_argv
 *	    if wwnCount > 0, then we will only print information for
 *		the hba ports listed in wwn_argv
 *	    if wwnCount == 0, then we will print information on all hba ports
 *	wwn_argv - argument array of hba port WWNs
 *	options - any options specified by the caller
 *
 * returns:
 *	0	if successful
 *	>0	otherwise
 */
int
sas_util_list_hba(int hbaCount, char **hba_argv, cmdOptions_t *options)
{
	HBA_STATUS		status;
	int			processHBA_flags = 0;
	inputArg_t		input;
	int 			err_cnt = 0;

	/* process each of the options */
	for (; options->optval; options++) {
		switch (options->optval) {
		case 'v':
			processHBA_flags |= PRINT_VERBOSE;
			break;
		default:
			break;
		}
	}

	if ((status = HBA_LoadLibrary()) != HBA_STATUS_OK) {
		(void *) fprintf(stderr, "%s %s\n",
		    gettext("Failed to load SM-HBA libraries."
		    "Reason:"), getHBAStatus(status));
		err_cnt++;
		return (err_cnt);
	}

	(void *) memset(&input, 0, sizeof (input));
	/* utilize wwnCount and wwn_argv for hbaCount and hba_argv */
	input.wwnCount = hbaCount;
	input.wwn_argv = hba_argv;
	input.pflag = processHBA_flags;

	/*
	 * Process and filter for every local hba,
	 * when the hba is not specificed, print all hba(s).
	 */
	err_cnt += processHBA(&input, NULL);

	(void) HBA_FreeLibrary();

	return (err_cnt);
}

/*
 * function for hba-port subcommand
 *
 * Arguments:
 *	wwnCount - count of the number of WWNs in wwn_argv
 *	    if wwnCount > 0, then we will only print information for
 *		the hba ports listed in wwn_argv
 *	    if wwnCount == 0, then we will print information on all hba ports
 *	wwn_argv - argument array of hba port WWNs
 *	options - any options specified by the caller
 *
 * returns:
 *	0	if successful
 *	>0	otherwise
 */
int
sas_util_list_hbaport(int wwnCount, char **wwn_argv, cmdOptions_t *options)
{
	HBA_STATUS		status;
	int			processHBA_flags = 0;
	inputArg_t		input;
	int 			err_cnt = 0;
	char			hbaName[256] = {'\0'};

	/* process each of the options */
	for (; options->optval; options++) {
		switch (options->optval) {
		case 'a':
			(void *) strlcpy(hbaName,
			    options->optarg, sizeof (hbaName));
			break;
		case 'y':
			processHBA_flags |= PRINT_PHY;
			break;
		case 'l':
			processHBA_flags |= PRINT_PHY_LINKSTAT;
			break;
		case 'v':
			processHBA_flags |= PRINT_VERBOSE;
			break;
		default:
			break;
		}
	}

	if ((status = HBA_LoadLibrary()) != HBA_STATUS_OK) {
		(void *) fprintf(stderr, "%s %s\n",
		    gettext("Failed to load SM-HBA libraries."
		    "Reason:"), getHBAStatus(status));
		err_cnt++;
		return (err_cnt);
	}

	(void *) memset(&input, 0, sizeof (input));
	input.wwnCount = wwnCount;
	input.wwn_argv = wwn_argv;
	input.hbaName = hbaName;
	input.pflag = processHBA_flags;

	/*
	 * Process and filter for every local hba-port,
	 * when the hba-port is not specificed, print all hba-port(s).
	 */
	err_cnt += processHBA(&input, handleHBAPort);

	(void) HBA_FreeLibrary();

	return (err_cnt);
}

/*
 * function for expander subcommand
 *
 * Arguments:
 *	wwnCount - the number of Remote Port SAS Address in wwn_argv
 *	    if wwnCount == 0, then print information on all
 *		expander devices.
 *	    if wwnCount > 0, then print information for the exapnders
 *		given in wwn_argv.
 *	wwn_argv - array of WWNs
 *	options - options specified by the caller
 *
 * returns:
 *	0	if successful
 *	>0	otherwise
 */
int
sas_util_list_expander(int wwnCount, char **wwn_argv, cmdOptions_t *options)
{
	HBA_STATUS		status;
	int			processHBA_flags = 0;
	char			hbaPort[MAXPATHLEN + 1] = {0};
	inputArg_t		input;
	int			err_cnt = 0;

	/* process each of the options */
	for (; options->optval; options++) {
		switch (options->optval) {
		case 'p':
			(void) strlcpy(hbaPort, options->optarg,
			    sizeof (hbaPort));
			break;
		case 't':
			processHBA_flags |= PRINT_TARGET_PORT;
			break;
		case 'v':
			processHBA_flags |= PRINT_VERBOSE;
			break;
		default:
			break;
		}
	}

	if ((status = HBA_LoadLibrary()) != HBA_STATUS_OK) {
		(void *) fprintf(stderr, "%s %s\n",
		    gettext("Failed to load SM-HBA libraries."
		    "Reason:"), getHBAStatus(status));
		err_cnt++;
		return (err_cnt);
	}

	(void *) memset(&input, 0, sizeof (input));
	input.wwnCount = wwnCount;
	input.wwn_argv = wwn_argv;
	input.pflag = processHBA_flags;
	input.hbaName = hbaPort;

	/*
	 * Process and filter for every hba-port,
	 * when the hba-port is not specificed, print all hba-port(s).
	 */
	err_cnt += processHBA(&input, handleExpander);

	(void) HBA_FreeLibrary();

	return (err_cnt);
}

/*
 * function for target-port subcommand
 *
 * Arguments:
 *	wwnCount - the number of Remote Port SAS Address in wwn_argv
 *	    if wwnCount == 0, then print information on all
 *		target ports.
 *	    if wwnCount > 0, then print information for the target ports
 *		given in wwn_argv.
 *	wwn_argv - array of WWNs
 *	options - options specified by the caller
 *
 * returns:
 *	0	if successful
 *	>0	otherwise
 */
int
sas_util_list_targetport(int tpCount, char **tpArgv, cmdOptions_t *options)
{
	HBA_STATUS		status;
	int			processHBA_flags = 0;
	int			tp, tpFound;
	inputArg_t		input;
	targetPortList_t	*tpListWalk;
	int			err_cnt = 0;
	uint64_t		tmpAddr;

	/* process each of the options */
	for (; options->optval; options++) {
		switch (options->optval) {
		case 's':
			processHBA_flags |= PRINT_TARGET_SCSI;
			break;
		case 'v':
			processHBA_flags |= PRINT_VERBOSE;
			break;
		default:
			break;
		}
	}

	if ((status = HBA_LoadLibrary()) != HBA_STATUS_OK) {
		(void *) fprintf(stderr, "%s %s\n",
		    gettext("Failed to load SM-HBA libraries."
		    "Reason:"), getHBAStatus(status));
		err_cnt++;
		return (err_cnt);
	}

	(void *) memset(&input, 0, sizeof (input));
	input.wwnCount = tpCount;
	input.wwn_argv = tpArgv;
	input.pflag = processHBA_flags;

	/*
	 * Process and filter for every hba-port,
	 * when the hba-port is not specificed, print all hba-port(s).
	 */
	err_cnt += processHBA(&input, handleTargetPort);

	if (tpCount == 0) {
		/* list all target port */
		for (tpListWalk = gTargetPortList; tpListWalk != NULL;
		    tpListWalk = tpListWalk->next) {
			err_cnt += printTargetPortInfo(tpListWalk, input.pflag);
		}
	} else {
		/*
		 * When operands provided, we should set the error code
		 * only if there are issues related with the operands.
		 */
		err_cnt = 0;
		/*
		 * list any paths not found first
		 * this gives the user cleaner output
		 */
		for (tp = 0; tp < tpCount; tp++) {
			errno = 0;
			tmpAddr = strtoull(tpArgv[tp], NULL, 16);
			if ((tmpAddr == 0) && (errno != 0)) {
				err_cnt++;
				continue;
			}
			for (tpListWalk = gTargetPortList, tpFound = B_FALSE;
			    tpListWalk != NULL;
			    tpListWalk = tpListWalk->next) {
				if (wwnConversion(tpListWalk->sasattr.
				    LocalSASAddress.wwn) == tmpAddr) {
					tpFound = B_TRUE;
					break;
				}
			}
			if (tpFound == B_FALSE) {
				(void *) fprintf(stderr,
				    "Error: Target Port %s Not Found \n",
				    tpArgv[tp]);
				err_cnt++;
			}
		}
		/* list all paths requested in order requested */
		for (tp = 0; tp < tpCount; tp++) {
			errno = 0;
			tmpAddr = strtoull(tpArgv[tp], NULL, 16);
			if ((tmpAddr == 0) && (errno != 0)) {
				continue;
			}
			for (tpListWalk = gTargetPortList, tpFound = B_FALSE;
			    tpListWalk != NULL;
			    tpListWalk = tpListWalk->next) {
				if (wwnConversion(tpListWalk->sasattr.
				    LocalSASAddress.wwn) == tmpAddr) {
					err_cnt += printTargetPortInfo(
					    tpListWalk,
					    processHBA_flags);
				}
			}
		}
	}
	(void) HBA_FreeLibrary();
	return (err_cnt);
}
/*
 * This function will enumerate all the hba and hba ports,
 * call the callback function to proceed with futher process.
 *
 * Arguments:
 *	input - contains all the input parameters.
 *	processPort - a callback function when handling each port.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
static int
processHBA(inputArg_t *input, processPortFunc processPort)
{
	int			numAdapters = 0;
	int			matchedHBAs = 0;
	int			matchedHBAPorts = 0;
	int			hbaPortExist = 0;
	HBA_STATUS		status;
	HBA_HANDLE		handle;
	HBA_UINT32		numberOfPorts = 0;
	int			portIndex = 0;
	HBA_PORTTYPE		porttype;
	SMHBA_LIBRARYATTRIBUTES libattrs;
	SMHBA_ADAPTERATTRIBUTES	attrs;
	SMHBA_PORTATTRIBUTES	port;
	SMHBA_SAS_PORT		sasattrs;
	int			i, sum, ret = 0;
	int			remote_avail = 0;
	int			local_avail = 0;
	sas_elem_t		*adpt_array = NULL;
	sas_elem_t		*port_array = NULL;

	numAdapters = HBA_GetNumberOfAdapters();
	if (numAdapters == 0) {
		(void *) fprintf(stderr, "%s\n",
		    gettext("Error: No Adapters Found."));
		return (++ret);
	}

	/*
	 * To deal with mismatching HBA/HBA Port/Expander Port, we need an
	 * array of flags for each operands.
	 */
	if (input->wwnCount && (processPort != handleTargetPort) &&
	    (processPort != handleLogicalUnit)) {
		input->wwn_flag = calloc(input->wwnCount, sizeof (int));
		if (input->wwn_flag == NULL) {
			(void *) fprintf(stderr, "%s\n",
			    gettext("No enough memory on heap"));
			return (++ret);
		}
	}

	adpt_array = calloc(numAdapters, sizeof (sas_elem_t));
	if (adpt_array == NULL) {
		(void *) fprintf(stderr, "%s\n",
		    gettext("No enough memory on heap"));
		if (input->wwn_flag) {
			free(input->wwn_flag);
			input->wwn_flag = NULL;
		}
		return (++ret);
	}
	for (i = 0; i < numAdapters; i++) {
		status =
		    SMHBA_GetVendorLibraryAttributes(i, &libattrs);
		/*
		 * If we get SAS incompatible library warning here,
		 * just skip the following steps.
		 */
		if (status != 1) {
			continue;
		}
		status = HBA_GetAdapterName(i, adpt_array[i].name);
		if (status != HBA_STATUS_OK) {
			(void *) fprintf(stderr, "%s %d %s %s\n",
			    gettext("Error: Failed to get the name for"
			    " HBA index"),
			    i, gettext("Reason:"),
			    getHBAStatus(status));
			ret++;
			continue;
		}
		adpt_array[i].index = i;
	}
	/* Sort the HBA Name in place. */
	sas_elem_sort(adpt_array, numAdapters);

	for (i = 0; i < numAdapters; i++) {
		int times = 0;
		if (adpt_array[i].name[0] != '\0') {
			if ((handle = HBA_OpenAdapter(adpt_array[i].name))
			    == 0) {
				(void *) fprintf(stderr, "%s %s.\n",
				    gettext("Error: Failed to open adapter"),
				    adpt_array[i].name);
				ret++;
				continue;
			}
		} else {
			continue;
		}

		/*
		 * We need to support an adapter without hba port.
		 * So get attributes anyway.
		 */
		(void *) memset(&attrs, 0, sizeof (attrs));
		status = SMHBA_GetAdapterAttributes(handle, &attrs);
		while ((status == HBA_STATUS_ERROR_TRY_AGAIN ||
		    status == HBA_STATUS_ERROR_BUSY) &&
		    times++ < HBA_MAX_RETRIES) {
			(void) sleep(1);
			status = SMHBA_GetAdapterAttributes(handle,
			    &attrs);
		}
		if (status != HBA_STATUS_OK) {
			(void *) fprintf(stderr, "%s %s %s %s\n",
			    gettext("Error: Failed to get attributes"
			    " for HBA "), adpt_array[i].name,
			    gettext("Reason:"),
			    getHBAStatus(status));

			HBA_CloseAdapter(handle);
			ret++;
			continue;
		}

		status = SMHBA_GetNumberOfPorts(handle, &numberOfPorts);
		if (status != HBA_STATUS_OK) {
			(void *) fprintf(stderr, "%s %s %s %s\n",
			    gettext("Error: Failed to get number of ports "
			    "for HBA"), adpt_array[i].name,
			    gettext("Reason:"),
			    getHBAStatus(status));
			HBA_CloseAdapter(handle);
			ret++;
			continue;
		}

		/*
		 * Deal with each subcommand for hba filter here,
		 * processPort is NULL for hba subcommand.
		 */
		if (processPort == NULL) {
			matchedHBAs += handleHBA(&attrs, input,
			    numberOfPorts, adpt_array[i].name);
			HBA_CloseAdapter(handle);
			continue;
		} else if (processPort == handleHBAPort) {
			if (input->hbaName[0] != '\0') {
				if (strcmp(input->hbaName,
				    adpt_array[i].name) == 0) {
					matchedHBAs++;
				} else {
					continue;
				}
			} else {
				matchedHBAs++;
			}
		} else {
			matchedHBAs++;
		}

		/*
		 * In order to have a sorted output for HBA Port, we should
		 * do the sorting before moving on.
		 */
		if (numberOfPorts) {
			port_array = calloc(numberOfPorts, sizeof (sas_elem_t));
		}
		for (portIndex = 0; portIndex < numberOfPorts; portIndex++) {
			if ((status = SMHBA_GetPortType(handle,
			    portIndex, &porttype)) != HBA_STATUS_OK) {
				(void *) fprintf(stderr, "%s %s %s %s\n",
				    gettext("Failed to get adapter port type "
				    "for HBA"), adpt_array[i].name,
				    gettext("Reason:"),
				    getHBAStatus(status));
				ret++;
				continue;
			}
			if (porttype != HBA_PORTTYPE_SASDEVICE) {
				/* skip any non-sas hba port */
				continue;
			}
			(void *) memset(&port, 0, sizeof (port));
			(void *) memset(&sasattrs, 0, sizeof (sasattrs));
			port.PortSpecificAttribute.SASPort = &sasattrs;
			if ((status = SMHBA_GetAdapterPortAttributes(
			    handle, portIndex, &port)) != HBA_STATUS_OK) {
				/*
				 * Not able to get port attributes.
				 * print out error message and
				 * move on to the next port
				 */
				(void *) fprintf(stderr, "%s %s %s %d %s %s\n",
				    gettext("Error: Failed to get port "
				    "attributes for HBA"), adpt_array[i].name,
				    gettext("port index"), portIndex,
				    gettext("Reason:"),
				    getHBAStatus(status));
				ret++;
				continue;
			}
			(void) strlcpy(port_array[portIndex].name,
			    port.OSDeviceName,
			    sizeof (port_array[portIndex].name));
			port_array[portIndex].index = portIndex;
		}
		/* Sort the HBA Port Name here. */
		if (port_array) {
			sas_elem_sort(port_array, numberOfPorts);
		}
		/*
		 * Sum up the local hba ports available.
		 */
		local_avail += numberOfPorts;

		/*
		 * Clear g_printHBA flag for expander subcommand.
		 */
		g_printHBA = 0;

		/* process each port on the given adapter */
		for (portIndex = 0;
		    portIndex < numberOfPorts;
		    portIndex++) {
			/*
			 * We only handle the port which is valid.
			 */
			if (port_array[portIndex].name[0] == '\0') {
				continue;
			}
			(void *) memset(&port, 0, sizeof (port));
			(void *) memset(&sasattrs, 0, sizeof (sasattrs));
			port.PortSpecificAttribute.SASPort = &sasattrs;

			(void) SMHBA_GetAdapterPortAttributes(handle,
			    port_array[portIndex].index, &port);

			/*
			 * We have different things to do for the three
			 * sub-commands here.
			 */
			if (processPort == handleHBAPort) {
				/*
				 * For hba-port, we will check whether the
				 * specified hba port exist first.
				 * But if no hba port specified, we should
				 * by pass this check(just let hbaPortExist
				 * be 1).
				 */
				if (input->wwnCount > 0) {
					if (isStringInArgv(input,
					    port.OSDeviceName)) {
						hbaPortExist = 1;
						if (g_printHBA == 0) {
							(void *) fprintf(stdout,
							    "%s %s\n",
							    "HBA Name:",
							    adpt_array[i].name);
							g_printHBA = 1;
						}
					}
				} else {
					hbaPortExist = 1;
					if (g_printHBA == 0) {
						(void *) fprintf(stdout,
						    "%s %s\n",
						    "HBA Name:",
						    adpt_array[i].name);
						g_printHBA = 1;
					}
				}
			}

			if (processPort == handleExpander) {
				/*
				 * For expander device, input->hbaName is
				 * the hba port name specified on the
				 * command line(with -p option).
				 */
				if (input->hbaName[0] != '\0') {
					if (strcmp(input->hbaName,
					    port.OSDeviceName) == 0)
						hbaPortExist = 1;
				} else
					hbaPortExist = 1;
			}

			if (processPort == handleTargetPort) {
				/*
				 * For target port, we don't need to check the
				 * hba port address, so let it go here.
				 */
				hbaPortExist = 1;
			}

			if (processPort == handleLogicalUnit) {
				/*
				 * For lu, we don't need to check the hba
				 * port address, so let it go here.
				 */
				hbaPortExist = 1;
			}

			if (hbaPortExist) {
				if (port.PortSpecificAttribute.SASPort->
				    NumberofDiscoveredPorts) {
					remote_avail++;
				}
				ret += (*processPort)(handle,
				    adpt_array[i].name,
				    port_array[portIndex].index, &port,
				    &attrs, input);
				/*
				 * We should reset the hbaPortExist flag
				 * here for next round of check and count
				 * for the machedHBAPorts.
				 */
				hbaPortExist = 0;
				matchedHBAPorts++;
			}
		}
		if (port_array) {
			free(port_array);
			port_array = NULL;
		}
		HBA_CloseAdapter(handle);
	}
	if (adpt_array) {
		free(adpt_array);
		adpt_array = NULL;
	}

	/*
	 * When we are here, we have traversed all the hba and hba ports.
	 */
	if (matchedHBAs == 0) {
		(void *) fprintf(stderr, "%s\n",
		    gettext("Error: Matching HBA not found."));
		if (input->wwn_flag) {
			free(input->wwn_flag);
			input->wwn_flag = NULL;
		}
		return (++ret);
	} else if (processPort == NULL) {
		/*
		 * processPort == NULL signifies hba subcommand.
		 * If enter here, it means we have at least one matching
		 * hba, we need to check if there are mismatching ones.
		 */
		for (i = 0; i < input->wwnCount; i++) {
			if (input->wwn_flag[i] == 0) {
				(void *) fprintf(stderr, "%s %s %s\n",
				    gettext("Error: HBA"),
				    input->wwn_argv[i],
				    gettext("not found."));
				ret++;
			}
		}
	} else {
		if (local_avail > 0 && matchedHBAPorts == 0) {
			(void *) fprintf(stderr, "%s\n",
			    gettext("Error: Matching HBA Port "
			    "not found."));
			if (input->wwn_flag) {
				free(input->wwn_flag);
				input->wwn_flag = NULL;
			}
			return (++ret);
		} else if (local_avail == 0) {
			(void *) fprintf(stderr, "%s\n",
			    gettext("Error: No HBA Port Configured."));
			if (input->wwn_flag) {
				free(input->wwn_flag);
				input->wwn_flag = NULL;
			}
			return (++ret);
		} else if (processPort == handleHBAPort) {
			/*
			 * If enter here, we have at least one HBA port
			 * matched. For hba-port subcommand, we shall check
			 * whether there are operands mismatching.
			 */
			for (i = 0; i < input->wwnCount; i++) {
				if (input->wwn_flag[i] == 0) {
					(void *) fprintf(stderr, "%s %s %s\n",
					    gettext("Error: HBA Port"),
					    input->wwn_argv[i],
					    gettext("not found."));
					ret++;
				}
			}
		}
	}

	/*
	 * For expander subcommand, we need to check if the
	 * specified sas address(ese) exist (none/partial/all).
	 */
	if (processPort == handleExpander) {
		if (input->wwnCount > 0) {
			sum = 0;
			for (i = 0; i < input->wwnCount; i++) {
				sum += input->wwn_flag[i];
			}
			/*
			 * If sum is zero, it means that for all the given
			 * operands matching count is zero. So none of the
			 * specified SAS address exist actually.
			 */
			if (sum == 0) {
				(void *) fprintf(stderr, gettext("Error: "
				    "Matching SAS Address not found.\n"));
				free(input->wwn_flag);
				input->wwn_flag = NULL;
				return (++ret);
			}

			/*
			 * If we get here, it means that some of the specified
			 * sas address exist, we will know through looping the
			 * wwn_flag array.
			 */
			for (i = 0; i < input->wwnCount; i++) {
				if (input->wwn_flag[i] == 0) {
					(void *) fprintf(stderr, "%s %s %s\n",
					    gettext("Error: SAS Address"),
					    input->wwn_argv[i],
					    gettext("not found."));
					ret++;
				}
			}
		}
		/* even if no remote port is found it is not an error. */
	}
	if (input->wwn_flag) {
		free(input->wwn_flag);
		input->wwn_flag = NULL;
	}
	return (ret);
}

/*
 * This function will handle the phy stuff for hba-port subcommand.
 *
 * Arguments:
 *      handle - handle to hba port.
 *      portIndex - the index of hba port currently being processed.
 *      port - pointer to hba port attributes.
 *      pflag - options user specified.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
static int
processHBAPortPhyInfo(HBA_HANDLE handle, HBA_UINT32 portIndex,
    SMHBA_PORTATTRIBUTES *port, int pflag)
{
	int 		phyIndex = 0, err_cnt = 0;
	HBA_UINT32	numphys = 0;
	HBA_STATUS	status = 0;
	SMHBA_SAS_PHY	phyattrs;

	if (port == NULL)
		return (++err_cnt);

	numphys = port->PortSpecificAttribute.SASPort->NumberofPhys;
	if (numphys == 0)
		return (0);

	if ((pflag & PRINT_PHY) || (pflag & PRINT_PHY_LINKSTAT))
		(void *) fprintf(stdout, "%s\n", "    Phy Information:");
	else
		return (0);


	for (phyIndex = 0; phyIndex < numphys; phyIndex++) {
		(void *) memset(&phyattrs, 0, sizeof (phyattrs));
		status = SMHBA_GetSASPhyAttributes(
		    handle, portIndex, phyIndex, &phyattrs);
		if (status != HBA_STATUS_OK) {
			(void *) fprintf(stderr, "%s %d %s %s\n",
			    gettext("Failed to get SAS Phy attributes"
			    "phyIndex"), phyIndex,
			    gettext("Reason:"),
			    getHBAStatus(status));
			err_cnt++;
			continue;
		}
		if (pflag & PRINT_PHY)
			printHBAPortPhyInfo(&phyattrs);
		if (pflag & PRINT_PHY_LINKSTAT)
			err_cnt += processHBAPortPhyStat(handle,
			    portIndex, phyIndex, &phyattrs, pflag);
	}
	return (err_cnt);
}

/*
 * This function will handle the phy stuff for hba-port subcommand.
 *
 * Arguments:
 *      handle - handle to hba port.
 *      portIndex - the index of hba port currently being processed.
 *      port - pointer to hba port attributes.
 *      pflag - options user specified.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
static int
processHBAPortPhyStat(HBA_HANDLE handle, HBA_UINT32 portIndex, int phyIndex,
    PSMHBA_SAS_PHY phyattrs, int pflag)
{
	HBA_STATUS		status = 0;
	SMHBA_PHYSTATISTICS	phystat;
	SMHBA_SASPHYSTATISTICS	sasphystat;

	if ((pflag & PRINT_PHY) == 0) {
		(void *) fprintf(stdout, "%s %d\n",
		    "      Identifier:", phyattrs->PhyIdentifier);
	}

	(void *) memset(&phystat, 0, sizeof (phystat));
	(void *) memset(&sasphystat, 0, sizeof (sasphystat));
	phystat.SASPhyStatistics = &sasphystat;
	status = SMHBA_GetPhyStatistics(handle, portIndex, phyIndex, &phystat);
	if (status != HBA_STATUS_OK) {
		(void *) fprintf(stdout, "%s\n",
		    "        Link Error Statistics:");
		(void *) fprintf(stderr, "%s\n",
		    gettext("            Failed to retrieve Link "
		    "Error Statistics!"));
		return (1);
	}
	printHBAPortPhyStatistics(phystat.SASPhyStatistics);
	return (0);
}

/*
 * Check whether the pWWN exist in the WWNs list which specified by user.
 *
 * Arguments:
 *	input - contains all the input parameters.
 *	pWWN - pointer to the hba port sas address.
 *
 *  Return Value:
 *	    1		true, the pWWN exist in the sas address list specified.
 *	    0		false.
 */
static int
isPortWWNInArgv(inputArg_t *input, PHBA_WWN pWWN)
{
	int 		port_wwn_counter = 0;
	int		portfound = 0;
	uint64_t	hbaWWN;

	/* list only ports given in wwn_argv */
	for (port_wwn_counter = 0;
	    port_wwn_counter < input->wwnCount;
	    port_wwn_counter++) {
		hbaWWN = strtoull(input->wwn_argv[port_wwn_counter], NULL,
		    16);
		if (hbaWWN == 0 && errno != 0)
			continue;
		if (wwnConversion(pWWN->wwn) == hbaWWN) {
			if (input->wwn_flag) {
				input->wwn_flag[port_wwn_counter]++;
			}
			portfound = 1;
		}
	}
	return (portfound);
}

/*
 * Check whether the string value exists in the input list,
 * which specified by user.
 *
 * Arguments:
 *	input - contains all the input parameters.
 *	stringName - could be hba adapter name
 *	                      hba-port name.
 *
 *  Return Value:
 *	    1		true, the HBA exists in the list specified.
 *	    0		false.
 */
static int
isStringInArgv(inputArg_t *input, const char *stringName)
{
	int 		counter = 0;
	int		found = 0;

	/* list only hba(s) given in wwn_argv */
	for (counter = 0;
	    counter < input->wwnCount;
	    counter++) {
		if (strcmp(input->wwn_argv[counter],
		    stringName) == 0) {
			if (input->wwn_flag)
				input->wwn_flag[counter]++;
			found = 1;
		}
	}
	return (found);
}

/*
 * Callback function for hba subcommand.
 *
 * Arguments:
 *      attrs - pointer to adapter attributes currently being processed.
 *	input - contains all the input parameters.
 *	numberOfPorts - number of ports of this HBA.
 *
 *  Return Value:
 *  	matching number
 */
static int handleHBA(SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input,
    int numberOfPorts, const char *adapterName)
{
	int matchingHBA = 1;

	if (input->wwnCount == 0) {
		printHBAInfo(attrs, input->pflag, numberOfPorts, adapterName);
	} else {
		if (isStringInArgv(input, adapterName)) {
			printHBAInfo(attrs,
			    input->pflag, numberOfPorts, adapterName);
		} else {
			matchingHBA = 0;
		}
	}

	return (matchingHBA);
}

/*
 * Callback function for hba-port subcommand.
 *
 * Arguments:
 *      handle - handle to hba port.
 *      portIndex - the index of hba port currently being processed.
 *      port - pointer to hba port attributes.
 *      attrs - pointer to adapter attributes currently being processed.
 *	input - contains all the input parameters.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
/*ARGSUSED*/
static int handleHBAPort(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input)
{
	int ret = 0;
	printHBAPortInfo(port, attrs, input->pflag);
	ret = processHBAPortPhyInfo(handle, portIndex, port, input->pflag);
	return (ret);
}

/*
 * Callback function for expander subcommand.
 *
 * Arguments:
 *      handle - handle to hba port.
 *      portIndex - the index of hba port currently being processed.
 *      port - pointer to hba port attributes.
 *      attrs - pointer to adapter attributes currently being processed.
 *	input - contains all the input parameters.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
/*ARGSUSED*/
static int handleExpander(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input)
{
	SMHBA_PORTATTRIBUTES	attr;
	SMHBA_SAS_PORT		sasport;
	HBA_STATUS		status;
	int			ret = 0;
	int			i, numberOfRP;
	rp_tree_t		*rpnode;
	rp_tree_t		*rproot = NULL;
	rp_tree_t		*unsolved_head = NULL;
	rp_tree_t		*unsolved_tail = NULL;
	rp_tree_t		*unsolved_sentinel = NULL;
	int			printPort = 0;
	int			numberOfEXP = 0;
	int			unsolved_inserted = 0;
	int			unsolved_left = 0;
	int			disco_port_fail = 0;
	boolean_t		firstPrinted = B_FALSE;

	(void *) memset(&attr, 0, sizeof (attr));
	(void *) memset(&sasport, 0, sizeof (sasport));
	attr.PortSpecificAttribute.SASPort = &sasport;

	/*
	 * Retrive all expander device from this hba port first.
	 */
	if ((numberOfRP = port->PortSpecificAttribute.SASPort->
	    NumberofDiscoveredPorts) == 0) {
		/* no remote port. just return 0. */
		return (ret);
	}

	for (i = 0; i < numberOfRP; i++) {
		rpnode = calloc(1, sizeof (rp_tree_t));
		rpnode->portattr.PortSpecificAttribute.SASPort =
		    &rpnode->sasattr;
		status = SMHBA_GetDiscoveredPortAttributes(handle,
		    portIndex, i, &rpnode->portattr);
		if (status != HBA_STATUS_OK) {
			disco_port_fail++;
			free(rpnode);
			ret++;
			continue;
		}

		if (rpnode->portattr.PortType == HBA_PORTTYPE_SASEXPANDER) {
			numberOfEXP++;
		}
		/*
		 * We will try to insert this expander device and target
		 * ports into the topology tree. If we failed, we can chain
		 * them together and try again when we have all the
		 * discovered port information in hands.
		 */
		if (rproot == NULL && memcmp(port->
		    PortSpecificAttribute.SASPort->LocalSASAddress.wwn,
		    rpnode->sasattr.AttachedSASAddress.wwn,
		    sizeof (HBA_WWN)) == 0) {
			/*
			 * The root node of tree should
			 * be set up first.
			 */
			rproot = rpnode;
		} else {
			/*
			 * If we can not set up the root node of
			 * the tree or we failed to insert
			 * the disocvered port node, queue it up then.
			 */
			if (rproot == NULL ||
			    sas_rp_tree_insert(&rproot, rpnode) != 0) {
				if (unsolved_head == NULL) {
					unsolved_head = rpnode;
					unsolved_tail = rpnode;
				} else {
					rpnode->sibling = unsolved_head;
					unsolved_head = rpnode;
				}
			}
		}
	}

	if (disco_port_fail) {
		(void *) fprintf(stderr, "%s %d %s %s\n",
		    gettext("Error: Failed to get attributes for"),
		    disco_port_fail,
		    gettext("connected ports of HBA port"),
		    port->OSDeviceName);
	}

	/* no expander found.  No need further processing. */
	if (numberOfEXP == 0) {
		while (unsolved_head) {
			unsolved_tail =
			    unsolved_head->sibling;
			free(unsolved_head);
			unsolved_head = unsolved_tail;
		}
		if (rproot) sas_rp_tree_free(rproot);
		return (ret);
	}

	/*
	 * When we're here, we should already have all information,
	 * now we try again to insert them into the topology tree.
	 * unsolved_head is the pointer which point to the head of
	 * unsolved rpnode linked list.
	 * unsolved_tail is the pointer which point to the tail of
	 * unsolved rpnode linked list.
	 * unsolved_sentinel is for insertion failure detection.
	 * When we're trying to insert the rpnodes from unsolved
	 * linked list, it may happen that some of the rpnodes can
	 * not be inserted no matter how many times we loop through
	 * this linked list. So we use unsolved_sentinel to identify
	 * the tail of last round of scanning, and unsolved_inserted
	 * which is a counter will be used to count how many rpnodes
	 * have been inserted from last round, if it is zero, which
	 * means that we can not insert rpnodes into rptree any more,
	 * and we should stop and deallocate the memory they occupied.
	 */
	unsolved_sentinel = unsolved_tail;
	while (unsolved_head) {
		rpnode = unsolved_head;
		unsolved_head = unsolved_head->sibling;
		if (unsolved_head == NULL)
			unsolved_tail = NULL;
		rpnode->sibling = NULL;
		if (sas_rp_tree_insert(&rproot, rpnode) != 0) {
			unsolved_tail->sibling = rpnode;
			unsolved_tail = rpnode;
			if (rpnode == unsolved_sentinel) {
				/*
				 * We just scanned one round for the
				 * unsolved list. Check to see whether we
				 * have nodes inserted, if none, we should
				 * break in case of an indefinite loop.
				 */
				if (unsolved_inserted == 0) {
					/*
					 * Indicate there is unhandled node.
					 * Chain free the whole unsolved
					 * list here.
					 */
					unsolved_left++;
					break;
				} else {
					unsolved_inserted = 0;
					unsolved_sentinel = unsolved_tail;
				}
			}
		} else {
			/*
			 * We just inserted one rpnode, increment the
			 * unsolved_inserted counter. We will utilize this
			 * counter to detect an indefinite insertion loop.
			 */
			unsolved_inserted++;
		}
	}

	/* check if there is left out discovered ports. */
	if (unsolved_left) {
		ret++;
		(void *) fprintf(stderr, "%s %s\n",
		    gettext("Error: Failed to establish expander topology on"),
		    port->OSDeviceName);
		(void *) fprintf(stderr, "%s\n",
		    gettext("       Folowing port(s) are unresolved."));
		while (unsolved_head) {
			unsolved_tail =
			    unsolved_head->sibling;
			(void *) fprintf(stderr, "%s%016llx ",
			    firstPrinted ? "" : "\t",
			    wwnConversion(unsolved_head->sasattr.
			    LocalSASAddress.wwn));
			if (firstPrinted == B_FALSE) firstPrinted = B_TRUE;
			free(unsolved_head);
			unsolved_head = unsolved_tail;
		}
		(void *) fprintf(stderr, "\n");
		/* still print what we have */
		ret += sas_rp_tree_print(handle, adapterName, portIndex,
		    port, rproot, input, 2 * TABLEN, &printPort);
	} else {
		ret += sas_rp_tree_print(handle, adapterName, portIndex,
		    port, rproot, input, 2 * TABLEN, &printPort);
	}

	if (rproot) sas_rp_tree_free(rproot);

	return (ret);
}

/*
 * Callback function for target-port subcommand.
 *
 * Arguments:
 *      handle - handle to hba port.
 *      portIndex - the index of hba port currently being processed.
 *      port - pointer to hba port attributes.
 *      attrs - pointer to adapter attributes currently being processed.
 *	input - contains all the input parameters.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
/*ARGSUSED*/
static int handleTargetPort(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input)
{
	HBA_STATUS		status;
	SMHBA_PORTATTRIBUTES	targetattr;
	SMHBA_SAS_PORT		sasattr;
	int			i;
	int			ret = 0;
	int			disco_port_fail = 0;

	targetattr.PortSpecificAttribute.SASPort = &sasattr;

	for (i = 0; i < port->PortSpecificAttribute.SASPort->
	    NumberofDiscoveredPorts; i++) {
		status = SMHBA_GetDiscoveredPortAttributes(handle,
		    portIndex, i, &targetattr);
		if (status != HBA_STATUS_OK) {
			disco_port_fail++;
		} else {
			/* skip expander device */
			if (targetattr.PortType != HBA_PORTTYPE_SASEXPANDER) {
				ret += searchTargetPort(handle, portIndex, port,
				    &targetattr, &sasattr, input->pflag);
			}
		}
	}

	if (disco_port_fail) {
		ret++;
		(void *) fprintf(stderr, "%s %d %s %s\n",
		    gettext("Error: Failed to get attributes for"),
		    disco_port_fail,
		    gettext("connected ports of HBA port"),
		    port->OSDeviceName);
	}
	return (ret);
}

/*
 * ****************************************************************************
 *
 * compareLUName -
 * 	compare names directly and also check if disk namees match with
 *	different slice number or /devices path are speicified and matches.
 *
 * cmdArg	- first string to compare
 * osName	- os name from attributes
 *
 * returns 	B_TRUE if the strings match either directly or via devid
 *		B_FALSE otherwise
 *
 * ****************************************************************************
 */
static boolean_t
compareLUName(char *cmdArg, char *osName)
{

	boolean_t	isSame = B_FALSE;
	char		dev1[MAXPATHLEN], dev2[MAXPATHLEN];
	char		*ch1, *ch2;

	if (strcmp(cmdArg, osName) == 0) {
		isSame = B_TRUE;
	} else {
		/* user input didn't match, try to  match the core of args. */
		(void) strlcpy(dev1, cmdArg, MAXPATHLEN);
		(void) strlcpy(dev2, osName, MAXPATHLEN);
		/* is this /devices path */
		if (((ch1 = strrchr(dev1, ',')) != NULL) &&
		    ((ch2 = strrchr(dev2, ',')) != NULL)) {
			*ch1 = *ch2 = '\0';
			if (strcmp(dev1, dev2) == 0) {
				isSame = B_TRUE;
			}
		/* is this a /dev link */
		} else if ((strncmp(dev1, "/dev/", 5) == 0) &&
		    (strncmp(dev2, "/dev/", 5) == 0)) {
			if ((strstr(dev1, "dsk") != NULL) &&
			    ((strstr(dev2, "dsk") != NULL))) {
				/* if it is disk link */
				if (((ch1 = strrchr(dev1, 's')) != NULL) &&
				    ((ch2 = strrchr(dev2, 's')) != NULL)) {
					*ch1 = *ch2 = '\0';
					if (strcmp(dev1, dev2) == 0) {
						isSame = B_TRUE;
					}
				}
			} else {
				/* other dev links */
				if (strcmp(dev1, dev2) == 0) {
					isSame = B_TRUE;
				}
			}
		}
	} /* compare */

	return (isSame);
}

/*
 * Process logical-unit(lu) subcommand.
 *
 * Arguments:
 *      luCount - number of OS device name(s) specified by user.
 *      luArgv - array of OS device name(s) specified by user.
 *      options - all the options specified by user.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
int
sas_util_list_logicalunit(int luCount, char **luArgv, cmdOptions_t *options)
{
	HBA_STATUS		status;
	int			processHBA_flags = 0;
	int			lu;
	boolean_t		pathFound;
	boolean_t		verbose;
	inputArg_t		input;
	discoveredDevice	*LUListWalk = NULL;
	int			err_cnt = 0;

	for (; options->optval; options++) {
		if (options->optval == 'v') {
			processHBA_flags |= PRINT_VERBOSE;
		}
	}

	/* HBA_LoadLibrary() */
	if ((status = HBA_LoadLibrary()) != HBA_STATUS_OK) {
		(void *) fprintf(stderr, "%s %s\n",
		    gettext("Failed to load SM-HBA libraries."
		    "Reason:"), getHBAStatus(status));
		err_cnt++;
		return (err_cnt);
	}

	(void *) memset(&input, 0, sizeof (input));
	input.pflag = processHBA_flags;
	input.wwnCount = luCount;
	input.wwn_argv = luArgv;

	err_cnt += processHBA(&input, handleLogicalUnit);
	verbose = (input.pflag & PRINT_VERBOSE) ? B_TRUE : B_FALSE;

	if (luCount == 0) {
		/* list all paths */
		for (LUListWalk = LUList; LUListWalk != NULL;
		    LUListWalk = LUListWalk->next) {
			err_cnt += printOSDeviceNameInfo(LUListWalk, verbose);
		}
	} else {
		/*
		 * When operands provided, we should set the error code
		 * only if there are issues related with the operands.
		 */
		err_cnt = 0;
		/*
		 * list any paths not found first
		 * this gives the user cleaner output
		 */
		for (lu = 0; lu < luCount; lu++) {
			for (LUListWalk = LUList, pathFound = B_FALSE;
			    LUListWalk != NULL;
			    LUListWalk = LUListWalk->next) {
				if (compareLUName(luArgv[lu],
				    LUListWalk->OSDeviceName)) {
					pathFound = B_TRUE;
					break;
				}
			}
			if (pathFound == B_FALSE) {
				(void *) fprintf(stderr,
				    "Error: Logical Unit %s Not Found \n",
				    luArgv[lu]);
				err_cnt++;
			}
		}
		/* list all paths requested in order requested */
		for (lu = 0; lu < luCount; lu++) {
			for (LUListWalk = LUList; LUListWalk != NULL;
			    LUListWalk = LUListWalk->next) {
				if (compareLUName(luArgv[lu],
				    LUListWalk->OSDeviceName)) {
					err_cnt += printOSDeviceNameInfo(
					    LUListWalk,
					    verbose);
				}
			}
		}
	}
	(void) HBA_FreeLibrary();
	return (err_cnt);
}

/*
 * Callback function for logical-unit(lu) subcommand.
 *
 * Arguments:
 *      handle - handle to hba port.
 *      portIndex - the index of hba port currently being processed.
 *      port - pointer to hba port attributes.
 *      attrs - pointer to adapter attributes currently being processed.
 *	input - contains all the input parameters.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
/*ARGSUSED*/
static int handleLogicalUnit(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    SMHBA_ADAPTERATTRIBUTES *attrs, inputArg_t *input)
{
	HBA_STATUS		status;
	SMHBA_TARGETMAPPING	*map;
	HBA_WWN			hbaPortWWN, domainPortWWN;
	char			*portName = NULL;
	int			numentries;
	int			count = 0;
	int			ret = 0;

	hbaPortWWN = port->PortSpecificAttribute.SASPort->LocalSASAddress;
	portName = port->OSDeviceName;

	status = get_domainPort(handle, portIndex, port, &domainPortWWN);
	switch (status) {
		case HBA_STATUS_OK:
			break;
		case HBA_STATUS_ERROR_NOT_SUPPORTED:
			/* don't increase error flag for no phy configuration */
			return (ret);
		case HBA_STATUS_ERROR:
		default:
			return (++ret);
	}

	if ((map = calloc(1, sizeof (*map))) == NULL) {
		(void *) fprintf(stderr, "%s\n",
		    gettext("No enough memory on heap."));
		return (++ret);
	}
	map->NumberOfEntries = 1;

	/*
	 * First, we need to get the target mapping data from this hba
	 * port.
	 */
	status = SMHBA_GetTargetMapping(handle,
	    hbaPortWWN, domainPortWWN, map);

	if (status == HBA_STATUS_ERROR_MORE_DATA) {
		numentries = map->NumberOfEntries;
		free(map);
		map = calloc(1, sizeof (HBA_UINT32) +
		    (numentries * sizeof (SMHBA_SCSIENTRY)));
		if (map == NULL) {
			(void *) fprintf(stderr, "%s\n",
			    gettext("No enough memory on heap."));
			return (++ret);
		}
		map->NumberOfEntries = numentries;
		status = SMHBA_GetTargetMapping(handle,
		    hbaPortWWN, domainPortWWN, map);
	}

	if (status != HBA_STATUS_OK) {
		(void *) fprintf(stderr, "%s %016llx %s %s\n",
		    gettext("Error: Failed to get SCSI mapping data for "
		    "the HBA port"), wwnConversion(hbaPortWWN.wwn),
		    gettext("Reason:"),
		    getHBAStatus(status));
		free(map);
		return (++ret);
	}

	/*
	 * By iterating each entry of the targetmapping data, we will
	 * construct a global list of logical unit.
	 */
	for (count = 0; count < map->NumberOfEntries; count++) {
		ret += searchDevice(
		    &(map->entry[count]), handle, hbaPortWWN, domainPortWWN,
		    portName, input->pflag);
	}
	free(map);
	return (ret);
}

/*
 * Search the matching targetmapping data for given target port and SAM LUN
 *	and return target mapping data if found.
 *
 * Arguments:
 *      handle - handle to hba port.
 *      portIndex - hba port index
 *      port - hba port attributes.
 *      targetportWWN - target port SAS address.
 *      domainportWWN - domain port SAS address.
 *      domainportttr - target port SAS attributes.
 *      samLUN - samLUN from report LUNs data.
 *      data - matching target mapping data.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
static int
searchTargetPortMappingData(HBA_HANDLE handle, HBA_UINT32 portIndex,
    SMHBA_PORTATTRIBUTES *port, SMHBA_SAS_PORT *sasattr,
    struct targetPortConfig *configData)
{
	int			ret = 0;
	HBA_STATUS		status;
	SMHBA_TARGETMAPPING	*map = NULL;
	HBA_WWN			hbaPortWWN, domainPortWWN;
	int			numentries, count;
	targetPortMappingData_t	*TPMapData;
	struct scsi_inquiry	inq;
	struct scsi_extended_sense  sense;
	HBA_UINT32		responseSize, senseSize = 0;
	uchar_t			rawLUNs[DEFAULT_LUN_LENGTH], *lun_string;
	HBA_UINT8		scsiStatus;
	rep_luns_rsp_t		*lun_resp;
	int			lunNum, numberOfLun, lunCount;
	uint32_t		lunlength, tmp_lunlength;
	uint64_t		sasLUN;
	SMHBA_SCSILUN		smhbaLUN;

	hbaPortWWN = port->PortSpecificAttribute.SASPort->
	    LocalSASAddress;

	status = get_domainPort(handle, portIndex, port, &domainPortWWN);
	if (status == HBA_STATUS_OK) {
		if ((map = calloc(1, sizeof (*map))) == NULL) {
			(void *) fprintf(stderr, "%s\n",
			gettext("No enough memory on heap."));
			return (++ret);
		}
		map->NumberOfEntries = 1;

		status = SMHBA_GetTargetMapping(handle, hbaPortWWN,
		    domainPortWWN, map);

		if (status == HBA_STATUS_ERROR_MORE_DATA) {
			numentries = map->NumberOfEntries;
			free(map);
			map = calloc(1, sizeof (HBA_UINT32) +
			    (numentries * sizeof (SMHBA_SCSIENTRY)));
			if (map == NULL) {
				(void *) fprintf(stderr, "%s\n",
				    gettext("No enough memory on heap."));
				return (++ret);
			}
			map->NumberOfEntries = numentries;
			status = SMHBA_GetTargetMapping(handle,
			    hbaPortWWN, domainPortWWN, map);
		}

		if (status != HBA_STATUS_OK) {
			/* continue to build mapping data based SCSI info */
			ret++;
			free(map);
			map = NULL;
		}
	}

	/*
	 * Get report lun data.
	 */
	responseSize = DEFAULT_LUN_LENGTH;
	senseSize = sizeof (struct scsi_extended_sense);
	(void) memset(&sense, 0, sizeof (sense));
	status = SMHBA_ScsiReportLUNs(
	    handle,
	    hbaPortWWN,
	    sasattr->LocalSASAddress,
	    domainPortWWN,
	    (void *)rawLUNs,
	    &responseSize,
	    &scsiStatus,
	    (void *) &sense, &senseSize);

	/*
	 * if HBA_STATUS_ERROR_NOT_A_TARGET is return, we can assume this is
	 * a remote HBA and move on
	 */
	if (status != HBA_STATUS_OK) {
		configData->reportLUNsFailed = B_TRUE;
		if (map != NULL) {
			/*
			 * Let's search mapping data and indicate that Report
			 * LUNs failed.
			 */
			for (count = 0; count < map->NumberOfEntries; count++) {
				if (memcmp(map->entry[count].PortLun.
				    PortWWN.wwn, sasattr->LocalSASAddress.wwn,
				    sizeof (HBA_WWN)) == 0) {
					/* allocate mapping data for each LUN */
					TPMapData = calloc(1,
					    sizeof (targetPortMappingData_t));
					if (TPMapData == NULL) {
						(void *) fprintf(stderr, "%s\n",
						    gettext("No enough "
						    "memory."));
						free(map);
						return (++ret);
					}
					TPMapData->mappingExist = B_TRUE;
					TPMapData->osLUN =
					    map->entry[count].ScsiId.ScsiOSLun;
					(void) strlcpy(TPMapData->osDeviceName,
					    map->entry[count].ScsiId.
					    OSDeviceName,
					    sizeof (TPMapData->osDeviceName));
					TPMapData->inq_vid[0] = '\0';
					TPMapData->inq_pid[0] = '\0';
					TPMapData->inq_dtype = DTYPE_UNKNOWN;
					if (configData->map == NULL) {
						configData->map = TPMapData;
					} else {
						TPMapData->next =
						    configData->map->next;
						configData->map = TPMapData;
					}
				}
			}
		}
		(void) free(map);
		return (++ret);
	}
	lun_resp = (rep_luns_rsp_t *)((void *)rawLUNs);
	(void) memcpy(&tmp_lunlength, &(lun_resp->length),
	    sizeof (tmp_lunlength));
	lunlength = ntohl(tmp_lunlength);
	(void) memcpy(&numberOfLun, &lunlength, sizeof (numberOfLun));
	for (lunCount = 0; lunCount < (numberOfLun / 8); lunCount++) {
		/* allocate mapping data for each LUN */
		TPMapData = calloc(1,
		    sizeof (targetPortMappingData_t));
		if (TPMapData == NULL) {
			(void *) fprintf(stderr, "%s\n",
			    gettext("No enough memory."));
			free(map);
			return (++ret);
		}

		(void) memcpy(&TPMapData->reportLUN, lun_resp->
		    lun[lunCount].val, sizeof (SMHBA_SCSILUN));

		/*
		 * now issue standard inquiry to get Vendor
		 * and product information
		 */
		responseSize = sizeof (struct scsi_inquiry);
		senseSize = sizeof (struct scsi_extended_sense);
		(void) memset(&inq, 0, sizeof (struct scsi_inquiry));
		(void) memset(&sense, 0, sizeof (sense));
		sasLUN = ntohll(wwnConversion(lun_resp->lun[lunCount].val));
		(void) memcpy(&smhbaLUN, &sasLUN, sizeof (SMHBA_SCSILUN));
		status = SMHBA_ScsiInquiry(
		    handle,
		    hbaPortWWN,
		    sasattr->LocalSASAddress,
		    domainPortWWN,
		    smhbaLUN,
		    0,
		    0,
		    (void *) &inq, &responseSize,
		    &scsiStatus,
		    (void *) &sense, &senseSize);
		if (status != HBA_STATUS_OK) {
			TPMapData->inq_vid[0] = '\0';
			TPMapData->inq_pid[0] = '\0';
			TPMapData->inq_dtype = DTYPE_UNKNOWN;
			/* indicate that inquiry for this lun is failed */
			TPMapData->inquiryFailed = B_TRUE;
		} else {
			(void *) memcpy(TPMapData->inq_vid, inq.inq_vid,
			    sizeof (TPMapData->inq_vid));
			(void *) memcpy(TPMapData->inq_pid, inq.inq_pid,
			    sizeof (TPMapData->inq_pid));
			TPMapData->inq_dtype = inq.inq_dtype;
		}

		if (map != NULL) {
			for (count = 0; count < map->NumberOfEntries; count++) {
				if ((memcmp(map->entry[count].PortLun.
				    PortWWN.wwn, sasattr->LocalSASAddress.wwn,
				    sizeof (HBA_WWN)) == 0) &&
				    (memcmp(&(map->entry[count].PortLun.
				    TargetLun), &smhbaLUN,
				    sizeof (SMHBA_SCSILUN))
				    == 0)) {
					TPMapData->mappingExist = B_TRUE;
					TPMapData->osLUN =
					    map->entry[count].ScsiId.ScsiOSLun;
					(void) strlcpy(TPMapData->osDeviceName,
					    map->entry[count].ScsiId.
					    OSDeviceName,
					    sizeof (TPMapData->osDeviceName));
					break;
				}
			}
			if (count == map->NumberOfEntries) {
				TPMapData->osDeviceName[0] = '\0';
				lun_string = lun_resp->lun[lunCount].val;
				lunNum = ((lun_string[0] & 0x3F) << 8) |
				    lun_string[1];
				TPMapData->osLUN = lunNum;
			}
		} else {
		/* Not able to get any target mapping information */
			TPMapData->osDeviceName[0] = '\0';
			lun_string = lun_resp->lun[lunCount].val;
			lunNum = ((lun_string[0] & 0x3F) << 8) |
			    lun_string[1];
			TPMapData->osLUN = lunNum;
		}

		if (configData->map == NULL) {
			configData->map = TPMapData;
		} else {
			TPMapData->next = configData->map->next;
			configData->map = TPMapData;
		}
	}
	free(map);
	return (ret);
}

/*
 * Search the discovered LUs and construct the global LU list.
 *
 * Arguments:
 *      handle - handle to hba port.
 *      portIndex - hba port index
 *      port - hba port attributes.
 *      targetattr - target port attributes.
 *      sasattr - target port SAS attributes.
 *      pflag - options the user specified.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
static int
searchTargetPort(HBA_HANDLE handle, HBA_UINT32 portIndex,
    SMHBA_PORTATTRIBUTES *port, SMHBA_PORTATTRIBUTES *targetattr,
    SMHBA_SAS_PORT *sasattr, int pflag)
{
	int			ret = 0;
	HBA_WWN			expander;
	HBA_WWN			domainPortWWN;
	targetPortList_t 	*discoveredTP, *newTP;
	targetPortConfig_t	*TPConfig, *newConfig, *prevConfig;
	boolean_t		foundTP = B_FALSE;
	boolean_t		foundConfig = B_FALSE;
	int			status;
	SMHBA_PORTATTRIBUTES	tgtattr;
	SMHBA_SAS_PORT		tgtsasport;
	int			expanderValid = 0;

	status = get_domainPort(handle, portIndex, port, &domainPortWWN);
	switch (status) {
		case HBA_STATUS_OK:
			break;
		case HBA_STATUS_ERROR_NOT_SUPPORTED:
			/* don't increase error flag for no phy configuration */
			return (ret);
		case HBA_STATUS_ERROR:
		default:
			return (++ret);
	}

	/*
	 * First, we will iterate the already constructed target port
	 * list to see whether there is a target port already exist with
	 * matching target port SAS address.
	 */
	for (discoveredTP = gTargetPortList; discoveredTP != NULL;
	    discoveredTP = discoveredTP->next) {
		if (memcmp((void *)sasattr->LocalSASAddress.wwn,
		    (void *)discoveredTP->sasattr.LocalSASAddress.wwn,
		    sizeof (HBA_WWN)) == 0) {
			/*
			 * if the target port exist and
			 * verbose is not set, just return
			 */
			if (((pflag & PRINT_VERBOSE) == 0) &&
			    ((pflag & PRINT_TARGET_SCSI) == 0)) {
				return (ret);
			}
			foundTP = B_TRUE;
			break;
		}
	}

	if (foundTP == B_TRUE) {
		/*
		 * If there is a target port already exist, we should
		 * add more information on the target port to construct the
		 * whole topology.
		 * Here we will check whether the current hba port name
		 * has already been added.
		 */
		/* first get the expander SAS address compare */
		if (memcmp((void *)port->PortSpecificAttribute.SASPort->
		    LocalSASAddress.wwn, (void *)sasattr->
		    AttachedSASAddress.wwn, sizeof (HBA_WWN)) == 0) {
			/* NO expander */
			(void) memset((void *)expander.wwn, 0,
			    sizeof (HBA_WWN));
			expanderValid = 1;
		} else {
			if (wwnConversion(sasattr->AttachedSASAddress.wwn)
			    != 0) {
				/* expander exist.  We should verify it.  */
				(void) memcpy((void *)expander.wwn,
				    (void *)sasattr->AttachedSASAddress.wwn,
				    sizeof (HBA_WWN));

				(void *) memset(&tgtattr, 0, sizeof (tgtattr));
				(void *) memset(&tgtsasport, 0,
				    sizeof (tgtsasport));
				tgtattr.PortSpecificAttribute.SASPort
				    = &tgtsasport;
				status = SMHBA_GetPortAttributesByWWN(handle,
				    sasattr->AttachedSASAddress, domainPortWWN,
				    &tgtattr);
				if (status == HBA_STATUS_OK && tgtattr.PortType
				    == HBA_PORTTYPE_SASEXPANDER) {
					expanderValid = 1;
				}
			}
		}

		for (TPConfig = discoveredTP->configEntry,
		    foundConfig = B_FALSE; TPConfig != NULL;
		    TPConfig = TPConfig->next) {
			if ((strcmp(TPConfig->hbaPortName,
			    port->OSDeviceName) == 0) &&
			    (memcmp((void *)expander.wwn, (void *)TPConfig->
			    expanderSASAddr.wwn,
			    sizeof (HBA_WWN)) == 0)) {
				foundConfig = B_TRUE;
				break;
			}
		}

		/*
		 * If we get here, it means that it is a new hba port/exapnder
		 * sas address for this discovered target port.
		 */
		if (foundConfig == B_FALSE) {
			newConfig = (targetPortConfig_t *)calloc(1,
			    sizeof (targetPortConfig_t));
			if (newConfig == NULL) {
				(void *) fprintf(stderr,
				    "%s\n", strerror(errno));
				return (++ret);
			}

			(void) strlcpy(newConfig->hbaPortName, port->
			    OSDeviceName, sizeof (newConfig->hbaPortName));
			(void) memcpy((void *)newConfig->expanderSASAddr.wwn,
			    (void *)expander.wwn, sizeof (HBA_WWN));
			newConfig->expanderValid = expanderValid;
			if (discoveredTP->configEntry == NULL) {
				discoveredTP->configEntry = newConfig;
			} else {
				TPConfig = discoveredTP->configEntry;
				prevConfig = TPConfig;
				while (TPConfig != NULL &&
				    sas_name_comp(newConfig->hbaPortName,
				    TPConfig->hbaPortName) > 0) {
					prevConfig = TPConfig;
					TPConfig = TPConfig->next;
				}
				if (TPConfig == prevConfig) {
					/* Should be inserted in the head. */
					newConfig->next = TPConfig;
					discoveredTP->configEntry = newConfig;
				} else {
					newConfig->next = TPConfig;
					prevConfig->next = newConfig;
				}
			}
			/* if scsi option is not set return */
			if ((pflag & PRINT_TARGET_SCSI) == 0) {
				return (0);
			} else {
				return (searchTargetPortMappingData(
				    handle, portIndex, port,
				    sasattr, newConfig));
			}
		}
	} else {
		/*
		 * Here we got a new target port which has not ever exist
		 * in our global target port list. So add it to the list.
		 * list.
		 */
		newTP = (targetPortList_t *)calloc(1,
		    sizeof (targetPortList_t));

		if (newTP == NULL) {
			(void *) fprintf(stderr, "%s\n", strerror(errno));
			return (++ret);
		}

		(void) memcpy((void *)&newTP->targetattr, (void *)targetattr,
		    sizeof (SMHBA_PORTATTRIBUTES));
		(void) memcpy((void *)&newTP->sasattr, (void *)sasattr,
		    sizeof (SMHBA_SAS_PORT));

		newConfig = (targetPortConfig_t *)calloc(1,
		    sizeof (targetPortConfig_t));

		if (newConfig == NULL) {
			(void *) fprintf(stderr, "%s\n", strerror(errno));
			free(newTP);
			return (++ret);
		}

		(void) strlcpy(newConfig->hbaPortName, port->OSDeviceName,
		    sizeof (newConfig->hbaPortName));
		if (memcmp((void *)port->PortSpecificAttribute.SASPort->
		    LocalSASAddress.wwn, (void *)sasattr->
		    AttachedSASAddress.wwn, sizeof (HBA_WWN)) == 0) {
			/* NO expander */
			(void) memset((void *)newConfig->expanderSASAddr.wwn,
			    0, sizeof (HBA_WWN));
		} else {
			/* expander exist.  We should verify it. */
			(void) memcpy((void *)newConfig->expanderSASAddr.wwn,
			    (void *)sasattr->AttachedSASAddress.wwn,
			    sizeof (HBA_WWN));

			(void *) memset(&tgtattr, 0, sizeof (tgtattr));
			(void *) memset(&tgtsasport, 0, sizeof (tgtsasport));
			tgtattr.PortSpecificAttribute.SASPort = &tgtsasport;
			status = SMHBA_GetPortAttributesByWWN(handle,
			    sasattr->AttachedSASAddress, domainPortWWN,
			    &tgtattr);
			if (status == HBA_STATUS_OK && tgtattr.PortType ==
			    HBA_PORTTYPE_SASEXPANDER) {
				expanderValid = 1;
			}
			newConfig->expanderValid = expanderValid;
		}

		newTP->configEntry = newConfig;

		newTP->next = gTargetPortList; /* insert at head */
		gTargetPortList = newTP; /* set new head */

		/* if scsi option is not set return */
		if ((pflag & PRINT_TARGET_SCSI) == 0) {
			return (0);
		} else {
			return (searchTargetPortMappingData(
			    handle, portIndex, port, sasattr, newConfig));
		}
	}
	return (ret);
}

/*
 * Search the discovered LUs and construct the global LU list.
 *
 * Arguments:
 *      entryP - one of the target mapping data.
 *      handle - handle to hba port.
 *      hbaPortWWN - hba port sas address.
 *      domainPortWWN - domain port WWN for this sas domain.
 *      portName - HBA port OS Device Name.
 *      pflag - options the user specified.
 *
 *  Return Value:
 *	    0		sucessfully processed handle
 *	    >0		error has occured
 */
static int
searchDevice(PSMHBA_SCSIENTRY entryP,
    HBA_HANDLE handle, HBA_WWN hbaPortWWN, HBA_WWN domainPortWWN,
    char *portName, int pflag)
{
	HBA_STATUS		status;
	int			ret = 0;
	discoveredDevice 	*discoveredLU, *newDevice;
	portList		*portElem, *newPort, *prevElem;
	tgtPortWWNList 		*newTgtWWN, *TgtWWNList;
	boolean_t		foundDevice = B_FALSE;
	boolean_t		foundPort = B_FALSE;
	struct scsi_inquiry	inq;
	HBA_UINT32		responseSize, senseSize = 0;
	HBA_UINT8		inq_status;
	SMHBA_SCSILUN		smhbaLUN;
	struct scsi_extended_sense sense;

	/* if OSDeviceName is not set, we don't need to search */
	if (entryP->ScsiId.OSDeviceName[0] == '\0') {
		return (ret);
	}

	/*
	 * First, we will iterate the already constructed discovered LU
	 * list to see whether there is a LU already exist with the same OS
	 * device name as current target mapping data entry.
	 */
	for (discoveredLU = LUList; discoveredLU != NULL;
	    discoveredLU = discoveredLU->next) {
		if (strcmp(entryP->ScsiId.OSDeviceName,
		    discoveredLU->OSDeviceName) == 0) {
			/*
			 * if there is existing OS Device Name and
			 * verbose is not set, just return
			 */
			if ((pflag & PRINT_VERBOSE) == 0) {
				return (ret);
			}
			foundDevice = B_TRUE;
			break;
		}
	}

	if (foundDevice == B_TRUE) {
		/*
		 * If there is a discovered LU already exist, we should
		 * add more information on this LU to construct the whole
		 * topology.
		 * Here we will check whether the current hba port has
		 * already been added.
		 */
		for (portElem = discoveredLU->HBAPortList,
		    foundPort = B_FALSE;  portElem != NULL;
		    portElem = portElem->next) {
			if (strcmp(portElem->portName,
			    portName) == 0) {
				foundPort = B_TRUE;
				break;
			}
		}

		/*
		 * If we get here, it means that it is a new hba port name
		 * for this discovered LU.
		 */
		if (foundPort == B_FALSE) {
			newPort = (portList *)calloc(1, sizeof (portList));
			if (newPort == NULL) {
				(void *) fprintf(stderr,
				    "%s\n", strerror(errno));
				return (++ret);
			}
			(void) strlcpy(newPort->portName, portName,
			    sizeof (newPort->portName));

			portElem = discoveredLU->HBAPortList;
			prevElem = portElem;
			while (portElem != NULL &&
			    sas_name_comp(newPort->portName, portElem->portName)
			    > 0) {
				prevElem = portElem;
				portElem = portElem->next;
			}
			if (portElem == prevElem) {
				/* Insert in the head of list. */
				newPort->next = portElem;
				discoveredLU->HBAPortList = newPort;
			} else {
				newPort->next = portElem;
				prevElem->next = newPort;
			}
			/* add Target Port */
			newPort->tgtPortWWN = (tgtPortWWNList *)calloc(1,
			    sizeof (tgtPortWWNList));
			if (newPort->tgtPortWWN == NULL) {
				(void *) fprintf(stderr,
				    "%s\n", strerror(errno));
				return (++ret);
			}
			(void *) memcpy((void *)&(newPort->tgtPortWWN->portWWN),
			    (void *)&(entryP->PortLun.PortWWN),
			    sizeof (HBA_WWN));
			/* Set LUN data */
			newPort->tgtPortWWN->scsiOSLun =
			    entryP->ScsiId.ScsiOSLun;
		} else {
			/*
			 * Otherwise, we just need to add the target port
			 * sas address information.
			 */
			for (TgtWWNList = portElem->tgtPortWWN;
			    TgtWWNList != NULL;
			    TgtWWNList = TgtWWNList->next) {
				if (memcmp(&TgtWWNList->portWWN,
				    &entryP->PortLun.PortWWN,
				    sizeof (HBA_WWN)) == 0)
					return (0);
			}
			/* add it to existing */
			newTgtWWN = (tgtPortWWNList *)calloc(1,
			    sizeof (tgtPortWWNList));
			if (newTgtWWN == NULL) {
				(void *) fprintf(stderr,
				    "%s\n", strerror(errno));
				return (++ret);
			}
			/* insert at head */
			newTgtWWN->next = portElem->tgtPortWWN;
			portElem->tgtPortWWN = newTgtWWN;
			(void *) memcpy((void *)&(newTgtWWN->portWWN),
			    (void *)&(entryP->PortLun.PortWWN),
			    sizeof (HBA_WWN));
			/* Set LUN data */
			newTgtWWN->scsiOSLun =
			    entryP->ScsiId.ScsiOSLun;
		}
	} else {
		/*
		 * Here we got a new discovered LU which has not ever exist
		 * in our global LU list. So add it into our global LU
		 * list.
		 */
		newDevice = (discoveredDevice *)calloc(1,
		    sizeof (discoveredDevice));

		if (newDevice == NULL) {
			(void *) fprintf(stderr, "%s\n", strerror(errno));
			return (++ret);
		}
		newDevice->next = LUList; /* insert at head */
		LUList = newDevice; /* set new head */

		/* copy device name */
		(void *) strlcpy(newDevice->OSDeviceName,
		    entryP->ScsiId.OSDeviceName,
		    sizeof (newDevice->OSDeviceName));

		/* if verbose is not set return */
		if ((pflag & PRINT_VERBOSE) == 0) {
			return (0);
		}

		/* copy WWN data */
		newDevice->HBAPortList = (portList *)calloc(1,
		    sizeof (portList));
		if (newDevice->HBAPortList == NULL) {
			(void *) fprintf(stderr, "%s\n", strerror(errno));
			return (++ret);
		}
		(void) strlcpy(newDevice->HBAPortList->portName,
		    portName, sizeof (newDevice->HBAPortList->portName));

		newDevice->HBAPortList->tgtPortWWN =
		    (tgtPortWWNList *)calloc(1, sizeof (tgtPortWWNList));
		if (newDevice->HBAPortList->tgtPortWWN == NULL) {
			(void *) fprintf(stderr, "%s\n", strerror(errno));
			return (++ret);
		}

		(void *) memcpy((void *)&(newDevice->HBAPortList->\
		    tgtPortWWN->portWWN),
		    (void *)&(entryP->PortLun.PortWWN),
		    sizeof (HBA_WWN));
		newDevice->HBAPortList->tgtPortWWN->scsiOSLun =
		    entryP->ScsiId.ScsiOSLun;

		responseSize = sizeof (struct scsi_inquiry);
		senseSize = sizeof (struct scsi_extended_sense);
		(void *) memset(&inq, 0, sizeof (struct scsi_inquiry));
		(void *) memset(&sense, 0, sizeof (sense));
		(void *) memcpy(&smhbaLUN, &entryP->PortLun.TargetLun,
		    sizeof (smhbaLUN));

		/*
		 * Retrieve the VPD data for the newly found discovered LU.
		 */
		status = SMHBA_ScsiInquiry(
		    handle,
		    hbaPortWWN,
		    entryP->PortLun.PortWWN,
		    domainPortWWN,
		    smhbaLUN,
		    0,
		    0,
		    (void *) &inq, &responseSize,
		    &inq_status,
		    (void *) &sense, &senseSize);

		if (status != HBA_STATUS_OK) {
			/* init VID/PID/dType as '\0' */
			newDevice->VID[0] = '\0';
			newDevice->PID[0] = '\0';
			newDevice->dType = DTYPE_UNKNOWN;
			/* initialize inq status */
			newDevice->inquiryFailed = B_TRUE;
			ret++;
		} else {
			(void *) memcpy(newDevice->VID, inq.inq_vid,
			    sizeof (newDevice->VID));
			(void *) memcpy(newDevice->PID, inq.inq_pid,
			    sizeof (newDevice->PID));
			newDevice->dType = inq.inq_dtype;
			/* initialize inq status */
			newDevice->inquiryFailed = B_FALSE;
		}
	}
	return (ret);
}

/*
 * Function we use to insert a newly discovered port.
 * Return:
 * 	0 - success
 * 	>0 - failed
 */
static int
sas_rp_tree_insert(rp_tree_t **rproot,
    rp_tree_t *rpnode)
{
	HBA_UINT8 *wwn1, *wwn2, *wwn3;
	rp_tree_t *node_ptr;
	int ret = 0;

	if (rproot == NULL) {
		(void *) fprintf(stderr, "%s\n",
		    gettext("Error: NULL rproot"));
		return (1);
	}

	if (rpnode == NULL) {
		(void *) fprintf(stderr, "%s\n",
		    gettext("Error: NULL rpnode"));
		return (1);
	}

	if (*rproot == NULL) {
		*rproot = rpnode;
		return (0);
	}

	wwn1 = (*rproot)->sasattr.LocalSASAddress.wwn;
	wwn2 = (*rproot)->sasattr.AttachedSASAddress.wwn;
	wwn3 = rpnode->sasattr.AttachedSASAddress.wwn;

	/*
	 * If the attched sas address is equal to the local sas address,
	 * then this should be a child node of current root node.
	 */
	if (memcmp(wwn1, wwn3, sizeof (HBA_WWN)) == 0) {
		(void) sas_rp_tree_insert(&(*rproot)->child, rpnode);
		rpnode->parent = *rproot;
	} else if (memcmp(wwn2, wwn3, sizeof (HBA_WWN)) == 0) {
		/*
		 * If the attached sas address is equal to the attached sas
		 * address of current root node, then this should be a
		 * sibling node.
		 * Insert the SAS/SATA Device at the head of sibling list.
		 */
		if (rpnode->portattr.PortType != HBA_PORTTYPE_SASEXPANDER) {
			rpnode->sibling = *rproot;
			*rproot = rpnode;
		} else {
			/*
			 * Insert the SAS Expander at the tail of sibling
			 * list.
			 */
			node_ptr = *rproot;
			while (node_ptr->sibling != NULL)
				node_ptr = node_ptr->sibling;
			node_ptr->sibling = rpnode;
		}
		rpnode->parent = (*rproot)->parent;
	} else {
		/*
		 * If enter here, we should first try to insert the discovered
		 * port node into the child sub-tree, then try to insert to the
		 * sibling sub-trees. If we failed to insert the discovered
		 * port node, return 1. The caller will queue this node
		 * up and retry insertion later.
		 */
		if ((*rproot)->child) {
			ret = sas_rp_tree_insert(&(*rproot)->child, rpnode);
		}
		if ((*rproot)->child == NULL || ret != 0) {
			if ((*rproot)->sibling) {
				ret = sas_rp_tree_insert(&(*rproot)->sibling,
				    rpnode);
			} else
				ret = 1;
		}
		return (ret);
	}
	return (0);
}

/*
 * Function which will print out the whole disocvered port topology.
 * Here we use the Preorder Traversal algorithm.
 * The indentation rules are:
 * 	1 * TABLEN - for attributes
 * 	2 * TABLEN - for next tier target port/expander
 */
static int
sas_rp_tree_print(HBA_HANDLE handle, char *adapterName,
    HBA_UINT32 portIndex, SMHBA_PORTATTRIBUTES *port,
    rp_tree_t *rpnode, inputArg_t *input,
    int gident, int *printPort)
{
	int ret = 0, lident;

	if (rpnode == NULL)
		return (ret);
	lident = gident;

	/*
	 * We assume that all the nodes are disocvered ports(sas device or
	 * expander).
	 */
	if (input->wwnCount > 0) {
		/* Adjust local indentation if a discovered port specified. */
		lident = 2 * TABLEN;
		/*
		 * Check whether current node match one of the specified
		 * SAS addresses.
		 */
		if ((rpnode->portattr.PortType != HBA_PORTTYPE_SASEXPANDER) ||
		    !isPortWWNInArgv(input,
		    &rpnode->sasattr.LocalSASAddress)) {
			/*
			 * Step down to child tree first.
			 */
			ret += sas_rp_tree_print(handle, adapterName,
			    portIndex, port, rpnode->child, input,
			    gident + 2 * TABLEN, printPort);
			/*
			 * Then check the sibling tree.
			 */
			ret += sas_rp_tree_print(handle, adapterName,
			    portIndex, port, rpnode->sibling, input,
			    gident, printPort);
			return (ret);
		}
	}

	if ((rpnode->portattr.PortType == HBA_PORTTYPE_SASEXPANDER) ||
	    (input->pflag & PRINT_TARGET_PORT)) {
		/*
		 * We should print the header(HBA Name + HBA Port Name)
		 * on-demand. It means that, if we have expander device
		 * address specified on the command line, we should print
		 * the header once we find a matching one. Or we will
		 * print the header from the beginning of the output.
		 */
		if (g_printHBA == 0) {
			(void *) fprintf(stdout, "%s %s\n",
			    "HBA Name:", adapterName);
			g_printHBA = 1;
		}

		if (*printPort == 0) {
			(void *) fprintf(stdout, "%s%s %s\n",
			    getIndentSpaces(TABLEN),
			    "HBA Port Name:", port->OSDeviceName);
			*printPort = 1;
		}
		ret += sas_print_rpnode(input, rpnode, lident, gident);
	}

	/*
	 * If operands provided with "-t" option specified, we will print
	 * the immediate child nodes information under the expander.
	 */
	if (input->pflag & PRINT_TARGET_PORT) {
		/* no operand. ignore the option. */
		if (input->wwnCount > 0) {
			if (rpnode->portattr.PortType ==
			    HBA_PORTTYPE_SASEXPANDER) {
				ret += sas_rp_tree_print_desc(handle,
				    portIndex, port, rpnode->child,
				    input,
				    lident + 2 * TABLEN,
				    gident + 2 * TABLEN);
			}
		}
	}

	/*
	 * Here we use DFS(Depth First Search) algorithm to traverse the
	 * whole tree.
	 */
	ret += sas_rp_tree_print(handle, adapterName,
	    portIndex, port, rpnode->child, input,
	    gident + 2 * TABLEN, printPort);
	ret += sas_rp_tree_print(handle, adapterName,
	    portIndex, port, rpnode->sibling, input,
	    gident, printPort);
	return (ret);
}

/*
 * Function which will destroy the whole discovered port tree.
 * Here we use the Postorder Traversal algorithm.
 */
static void sas_rp_tree_free(rp_tree_t *rproot)
{
	tgt_mapping *cur, *next;

	if (rproot == NULL)
		return;

	/*
	 * Free child tree first.
	 */
	if (rproot->child) {
		sas_rp_tree_free(rproot->child);
	}

	/*
	 * Free sibling trees then.
	 */
	if (rproot->sibling) {
		sas_rp_tree_free(rproot->sibling);
	}

	/*
	 * Free root node at last.
	 */
	cur = rproot->first_entry;
	while (cur != NULL) {
		next = cur->next;
		free(cur);
		cur = next;
	}
	free(rproot);
}

/*
 * Function used to print out all the descendant nodes.
 * handle - handle to HBA.
 * port - port attributes of current HBA port.
 * desc - the root node of a subtree which will be processed.
 * input - input argument.
 * lident - local indentation for shifting indentation.
 * gident - global indentation, can also be used to obtain Tier number.
 */
/*ARGSUSED*/
static int
sas_rp_tree_print_desc(HBA_HANDLE handle, HBA_UINT32 portIndex,
    SMHBA_PORTATTRIBUTES *port, rp_tree_t *desc,
    inputArg_t *input, int lident, int gident)
{
	int ret = 0;
	rp_tree_t   *rp_node;

	if (desc == NULL)
		return (ret);
	/*
	 * Walk through the subtree of desc by Pre-Order Traversal Algo.
	 */
	for (rp_node = desc; rp_node !=	NULL; rp_node = rp_node->sibling) {
		ret += sas_print_rpnode(input, rp_node, lident, gident);
	}

	return (ret);
}

/*
 * Function used to print the information of specified SAS address.
 * handle - handle to a HBA.
 * port - port attributes of a HBA port.
 * rpnode - discovered port which will be processed.
 * lident - local indentation used for shifting indentation.
 * gident - global indentation used for calculating "Tier" number.
 */
static int
sas_print_rpnode(inputArg_t *input,
    rp_tree_t *rpnode, int lident, int gident)
{
	int ret = 0;

	if (rpnode->portattr.PortType == HBA_PORTTYPE_SASEXPANDER) {
		(void *) fprintf(stdout, "%s%s(Tier %d): %016llx\n",
		    getIndentSpaces(lident),
		    "Expander SAS Address",
		    gident / (2 * TABLEN),
		    wwnConversion(rpnode->sasattr.LocalSASAddress.wwn));
	} else {
		(void *) fprintf(stdout, "%s%s %016llx\n",
		    getIndentSpaces(lident),
		    "Target Port SAS Address:",
		    wwnConversion(rpnode->sasattr.LocalSASAddress.wwn));
	}
	if (input->pflag & PRINT_VERBOSE) {
		if (rpnode->portattr.PortType != HBA_PORTTYPE_SASEXPANDER) {
			(void *) fprintf(stdout, "%s%s %s\n",
			    getIndentSpaces(TABLEN + lident),
			    "Type:",
			    getStateString(rpnode->portattr.PortType,
			    porttype_string));
		} else {
			(void *) fprintf(stdout, "%s%s %s\n",
			    getIndentSpaces(TABLEN + lident),
			    "OS Device Name:",
			    rpnode->portattr.OSDeviceName);
			(void *) fprintf(stdout, "%s%s %s\n",
			    getIndentSpaces(TABLEN + lident),
			    "State: ",
			    getStateString(rpnode->portattr.PortState,
			    portstate_string));
		}
	}
	rpnode->printed = 1;
	return (ret);
}

/*
 * Function used to get the correct domainPortWWN as needed by some of the
 * SMHBA APIs.
 * handle - handle to a HBA.
 * portIndex - index to locate the port.
 * port - pointer to the structure holding port attributes.
 * pdomainPort - pointer to the buffer holding domainPortWWN.
 */
HBA_STATUS
get_domainPort(HBA_HANDLE handle,
    int portIndex, PSMHBA_PORTATTRIBUTES port,
    HBA_WWN *pdomainPort)
{
	HBA_STATUS status;
	PSMHBA_SAS_PORT sasport;
	SMHBA_SAS_PHY phyattr;

	sasport = port->PortSpecificAttribute.SASPort;
	(void *) memset(pdomainPort, 0, sizeof (HBA_WWN));
	/*
	 * Since iport can exist without any phys,
	 * sasinfo hba-port -v has indicated numberOfPhys;
	 * if there is no phys within the hba, just return OK.
	 */
	if (sasport->NumberofPhys > 0) {
		status = SMHBA_GetSASPhyAttributes(handle, portIndex,
		    0, &phyattr);
		if (status != HBA_STATUS_OK)
			return (status);
		(void *) memcpy(pdomainPort, &phyattr.domainPortWWN,
		    sizeof (HBA_WWN));
	} else {
		/* return not supported for no phy configured */
		return (HBA_STATUS_ERROR_NOT_SUPPORTED);
	}
	return (HBA_STATUS_OK);
}

/*
 * Comparison function for comparing names possibly ending with digits.
 * Return:
 * 	<0 - name1 is less than name2.
 * 	0 - name1 is equal with name2.
 * 	>0 - name1 is more than name2.
 */
static int
sas_name_comp(const char *name1, const char *name2)
{
	int i = 0;

	if (name1 == name2)
		return (0);

	while ((name1[i] == name2[i]) && (name1[i] != '\0'))
		i++;

	/* If neither of name1[i] and name2[i] is '\0'. */
	if (isdigit(name1[i]) && isdigit(name2[i]))
		return (atoi(&name1[i]) - atoi(&name2[i]));

	/* One of name1[i] and name2[i] is not digit. */
	return (name1[i] - name2[i]);
}
/*
 * Comparison function for sorting HBA/HBA Port.
 * arg1 - first argument of type sas_elem_t.
 * arg2 - second argument of type sas_elem_t.
 * Return:
 * 	<0 - arg1 is less than arg2.
 * 	0 - arg1 is equal with arg2.
 * 	>0 - arg1 is more than arg2.
 */
static int
sas_elem_compare(const void *arg1, const void *arg2)
{
	sas_elem_t *p1, *p2;
	p1 = (sas_elem_t *)arg1;
	p2 = (sas_elem_t *)arg2;
	return (sas_name_comp(p1->name, p2->name));
}

/*
 * Sorting function for HBA/HBA Port output.
 * array - elements array of type sas_elem_t.
 * nelem - number of elements in array of type sas_elem_t.
 */
static void
sas_elem_sort(sas_elem_t *array, int nelem)
{
	qsort((void *)array, nelem, sizeof (sas_elem_t), sas_elem_compare);
}