/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (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 1996-2002 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/* LINTLIBRARY */

#if !defined(_BOOT) && !defined(_KERNEL)
#include <stdio.h>
#include <ctype.h>
#include <stdlib.h>
#endif	/* _BOOT && _KERNEL */
#include <sys/types.h>
#include <sys/null.h>
#include <sys/errno.h>

#if	defined(_BOOT) || defined(_KERNEL)
#define	isdigit(c)	((c) >= '0' && c <= '9')
#define	isxdigit(c)	(isdigit(c) || (((c) >= 'a') && ((c) <= 'f')) || \
			(((c) >= 'A') && ((c) <= 'F')))
#endif	/* _BOOT || _KERNEL */

/*
 * Converts an octet string into an ASCII string. The string returned is
 * NULL-terminated, and the length recorded in blen does *not* include the
 * null terminator (in other words, octet_to_hexascii() returns the length a'la
 * strlen()).
 *
 * Returns 0 for Success, errno otherwise.
 */
int
octet_to_hexascii(const void *nump, uint_t nlen, char *bufp, uint_t *blen)
{
	int		i;
	char		*bp;
	const uchar_t	*np;
	static char	ascii_conv[] = "0123456789ABCDEF";

	if (nump == NULL || bufp == NULL || blen == NULL)
		return (EINVAL);

	if ((nlen * 2) >= *blen) {
		*blen = 0;
		return (E2BIG);
	}
	for (i = 0, bp = bufp, np = (const uchar_t *)nump; i < nlen; i++) {
		*bp++ = ascii_conv[(np[i] >> 4) & 0x0f];
		*bp++ = ascii_conv[np[i] & 0x0f];
	}
	*bp = '\0';
	*blen = i * 2;
	return (0);
}

/*
 * Converts an ASCII string into an octet string.
 *
 * Returns 0 for success, errno otherwise.
 */
int
hexascii_to_octet(const char *asp, uint_t alen, void *bufp, uint_t *blen)
{
	int		i, j, k;
	const char	*tp;
	uchar_t		*u_tp;

	if (asp == NULL || bufp == NULL || blen == NULL)
		return (EINVAL);

	if (alen > (*blen * 2))
		return (E2BIG);

	k = ((alen % 2) == 0) ? alen / 2 : (alen / 2) + 1;
	for (tp = asp, u_tp = (uchar_t *)bufp, i = 0; i < k; i++, u_tp++) {
		/* one nibble at a time */
		for (*u_tp = 0, j = 0; j < 2; j++, tp++) {
			if (isdigit(*tp))
				*u_tp |= *tp - '0';
			else if (isxdigit(*tp))
				*u_tp |= (*tp & ~0x20) + 10 - 'A';
			else
				return (EINVAL);
			if ((j % 2) == 0)
				*u_tp <<= 4;
		}
	}
	*blen = k;
	return (0);
}