xref: /src/lib/libc/gen/devname.c

/*	$NetBSD: devname.c,v 1.12 2004/11/11 03:22:30 christos Exp $	*/

/*-
 * Copyright (c) 2000 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Simon Burge.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *        This product includes software developed by the NetBSD
 *        Foundation, Inc. and its contributors.
 * 4. Neither the name of The NetBSD Foundation nor the names of its
 *    contributors may be used to endorse or promote products derived
 *    from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

/*-
 * Copyright (c) 1992 Keith Muller.
 * Copyright (c) 1989, 1993
 *	The Regents of the University of California.  All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * Keith Muller of the University of California, San Diego.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#include <sys/cdefs.h>
#if defined(LIBC_SCCS) && !defined(lint)
#if 0
static char sccsid[] = "@(#)devname.c	8.2 (Berkeley) 4/29/95";
#else
__RCSID("$NetBSD: devname.c,v 1.12 2004/11/11 03:22:30 christos Exp $");
#endif
#endif /* LIBC_SCCS and not lint */

#include "namespace.h"
#include <sys/types.h>
#include <sys/param.h>

#include <db.h>
#include <dirent.h>
#include <fcntl.h>
#include <paths.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <err.h>
#include <sys/stat.h>

#ifdef __weak_alias
__weak_alias(devname,_devname)
#endif

#define	DEV_SZ		317	/* show be prime for best results */
#define	VALID		1	/* entry and devname are valid */
#define	INVALID		2	/* entry valid, devname NOT valid */

typedef struct devc {
	int valid;		/* entry valid? */
	dev_t dev;		/* cached device */
	mode_t type;		/* cached file type */
	char name[NAME_MAX];	/* device name */
} DEVC;

static mode_t getptsmajor(void);

static mode_t
getptsmajor(void)
{
	DIR *dirp = opendir(_PATH_DEV_PTS);
	struct dirent *dp;
	struct stat st;
	char buf[MAXPATHLEN];

	while ((dp = readdir(dirp)) != NULL) {
		if (dp->d_name[0] == '.')
			continue;
		(void)snprintf(buf, sizeof(buf), "%s%s", _PATH_DEV_PTS,
		    dp->d_name);
		if (stat(buf, &st) == -1)
			continue;
		(void)closedir(dirp);
		return major(st.st_rdev);
	}
	(void)closedir(dirp);
	return (mode_t)~0;
}


char *
devname(dev, type)
	dev_t dev;
	mode_t type;
{
	struct {
		mode_t type;
		dev_t dev;
	} bkey;
	static DB *db;
	static int failure;
	DBT data, key;
	DEVC *ptr, **pptr;
	static DEVC **devtb = NULL;
	static mode_t pts = 0;


	if (!db && !failure &&
	    !(db = dbopen(_PATH_DEVDB, O_RDONLY, 0, DB_HASH, NULL))) {
		warn("warning: %s", _PATH_DEVDB);
		failure = 1;
	}
	/* initialise dev cache */
	if (!failure && devtb == NULL) {
		devtb = (DEVC **)calloc(DEV_SZ, sizeof(DEVC *));
		if (devtb == NULL)
			failure= 1;
	}
	if (failure)
		return (NULL);

	/* see if we have this dev/type cached */
	pptr = devtb + ((dev + type) % DEV_SZ);
	ptr = *pptr;

	if (ptr && ptr->valid > 0 && ptr->dev == dev && ptr->type == type) {
		if (ptr->valid == VALID)
			return (ptr->name);
		return (NULL);
	}

	if (ptr == NULL)
		*pptr = ptr = (DEVC *)malloc(sizeof(DEVC));

	/*
	 * Keys are a mode_t followed by a dev_t.  The former is the type of
	 * the file (mode & S_IFMT), the latter is the st_rdev field.  Be
	 * sure to clear any padding that may be found in bkey.
	 */
	memset(&bkey, 0, sizeof(bkey));
	bkey.dev = dev;
	bkey.type = type;
	key.data = &bkey;
	key.size = sizeof(bkey);
	if ((db->get)(db, &key, &data, 0) == 0) {
		if (ptr == NULL)
			return (char *)data.data;
		ptr->dev = dev;
		ptr->type = type;
		strncpy(ptr->name, (char *)data.data, NAME_MAX);
		ptr->name[NAME_MAX - 1] = '\0';
		ptr->valid = VALID;
		return (ptr->name);
	} else {
		if (ptr == NULL)
			return (NULL);
		ptr->valid = INVALID;
		if (type == S_IFCHR) {
			if (pts == 0)
				pts = getptsmajor();
			if (pts != (mode_t)~0 && major(dev) == pts) {
				(void)snprintf(ptr->name, sizeof(ptr->name),
				    "%s%d", _PATH_DEV_PTS +
				    sizeof(_PATH_DEV) - 1, minor(dev));
				ptr->valid = VALID;
			}
		}
		ptr->dev = dev;
		ptr->type = type;
		return (NULL);
	}
}