/*
 * 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 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include "libdevinfo.h"
#include <strings.h>
#include <sys/modctl.h>

/*
 *
 * This file contains interfaces to translate <driver><instance><minorname>
 * information into /devices and /dev paths.  It does this using interfaces to
 * the kernel instance tree so that it can provide translations for devices
 * which are no longer present. An example consumer of these interfaces is
 * iostat(8) - which shows, in its first iteration, activity since reboot.
 * With persistant kstats, a device which was busy a long time ago can still
 * have a decaying presence in iostat output, and that output, when '-n' is
 * used, should show the public name.
 */

typedef	struct {
	di_devlink_handle_t	i_devlink_hdl;
} *idim_t;

di_dim_t
di_dim_init()
{
	idim_t		idim;

	if ((idim = (idim_t)malloc(sizeof (*idim))) == NULL)
		return (NULL);
	idim->i_devlink_hdl = di_devlink_init(NULL, 0);
	if (idim->i_devlink_hdl == NULL) {
		free(idim);
		return (NULL);
	}
	return ((di_dim_t)idim);
}

void
di_dim_fini(di_dim_t dim)
{
	idim_t	idim = (idim_t)dim;

	if (idim->i_devlink_hdl) {
		(void) di_devlink_fini(&idim->i_devlink_hdl);
	}
	free(idim);
}

/*ARGSUSED*/
char *
di_dim_path_devices(di_dim_t dim, char *drv_name, int instance,
    char *minor_name)
{
	major_t	major;
	int	len;
	int	mlen;
	char	*devices;

	/* convert drv_name to major_t */
	if (modctl(MODGETMAJBIND, drv_name, strlen(drv_name) + 1, &major) < 0)
		return (NULL);

	/* find the length of the devices path given major,instance */
	if (modctl(MODGETDEVFSPATH_MI_LEN, major, instance, &len) != 0)
		return (NULL);

	/*
	 * MODGETDEVFSPATH_MI_LEN result includes '\0' termination, but we
	 * may need to add space for ":<minor_name>"
	 */
	if (minor_name)
		mlen = len + 1 + strlen(minor_name);
	else
		mlen = len;
	if ((devices = (char *)malloc(mlen)) == NULL)
		return (NULL);

	if (modctl(MODGETDEVFSPATH_MI, major, instance, len, devices) != 0) {
		free(devices);
		return (NULL);
	}

	if (minor_name) {
		/* add ':<minot_name>' to the end of /devices path */
		(void) strcat(devices, ":");
		(void) strcat(devices, minor_name);
	}
	return (devices);
}

/* di_dim_path_dev di_devlink callback */
static int
di_dim_path_dev_callback(di_devlink_t dl, void *arg)
{
	char		**devp = (char **)arg;
	char		*devpath = (char *)di_devlink_path(dl);

	if (devpath)
		*devp = strdup(devpath);
	return (DI_WALK_TERMINATE);
}

char *
di_dim_path_dev(di_dim_t dim, char *drv_name, int instance, char *minor_name)
{
	idim_t	idim = (idim_t)dim;
	char	*devices;
	char	*dev = NULL;

	/* we must have a minor_name to resolve to a public name */
	if (minor_name == NULL)
		return (NULL);

	/* convert <driver><instance><minor_name> to /devices path */
	devices = di_dim_path_devices(dim, drv_name, instance, minor_name);
	if (devices == NULL)
		return (NULL);

	/* convert /devices path to /dev path */
	(void) di_devlink_walk(idim->i_devlink_hdl, NULL,
	    devices, DI_PRIMARY_LINK, (void *)&dev, di_dim_path_dev_callback);
	free(devices);
	return (dev);
}