libldap4/sec/secutil.c

0Sstevel@tonic-gate/*
0Sstevel@tonic-gate *
*3857Sstevel * Copyright 1998 Sun Microsystems, Inc.  All rights reserved.
*3857Sstevel * Use is subject to license terms.
0Sstevel@tonic-gate *
0Sstevel@tonic-gate *
0Sstevel@tonic-gate * Comments:
0Sstevel@tonic-gate *
0Sstevel@tonic-gate */
0Sstevel@tonic-gate
0Sstevel@tonic-gate#pragma ident	"%Z%%M%	%I%	%E% SMI"
0Sstevel@tonic-gate
0Sstevel@tonic-gate#include <stdlib.h>
0Sstevel@tonic-gate#include <string.h>
0Sstevel@tonic-gate#include <ctype.h>
0Sstevel@tonic-gate
0Sstevel@tonic-gatestatic char	hexdig[] = "0123456789abcdef";
0Sstevel@tonic-gate
0Sstevel@tonic-gatechar* hexa_print(char *aString, int aLen)
0Sstevel@tonic-gate{
0Sstevel@tonic-gate	char *res;
0Sstevel@tonic-gate	int i =0;
0Sstevel@tonic-gate
0Sstevel@tonic-gate	if ((res = (char *)calloc (aLen*2 + 1, 1 )) == NULL){
0Sstevel@tonic-gate		return (NULL);
0Sstevel@tonic-gate	}
0Sstevel@tonic-gate	for (;;){
0Sstevel@tonic-gate		if (aLen < 1)
0Sstevel@tonic-gate			break;
0Sstevel@tonic-gate		res[i] = hexdig[ ( *aString & 0xf0 ) >> 4 ];
0Sstevel@tonic-gate		res[i + 1] = hexdig[ *aString & 0x0f ];
0Sstevel@tonic-gate		i+= 2;
0Sstevel@tonic-gate		aLen--;
0Sstevel@tonic-gate		aString++;
0Sstevel@tonic-gate	}
0Sstevel@tonic-gate	return (res);
0Sstevel@tonic-gate}
0Sstevel@tonic-gate
0Sstevel@tonic-gate
0Sstevel@tonic-gatestatic int
0Sstevel@tonic-gateunhex( char c )
0Sstevel@tonic-gate{
0Sstevel@tonic-gate        return( c >= '0' && c <= '9' ? c - '0'
0Sstevel@tonic-gate            : c >= 'A' && c <= 'F' ? c - 'A' + 10
0Sstevel@tonic-gate            : c - 'a' + 10 );
0Sstevel@tonic-gate}
0Sstevel@tonic-gate
0Sstevel@tonic-gatechar * hexa2str(char *anHexaStr, int *aResLen) {
0Sstevel@tonic-gate	int theLen = 0;
0Sstevel@tonic-gate	char *theRes = malloc(strlen(anHexaStr) /2 + 1);
0Sstevel@tonic-gate
0Sstevel@tonic-gate	while (isxdigit(*anHexaStr)){
0Sstevel@tonic-gate		theRes[theLen] = unhex(*anHexaStr) << 4;
0Sstevel@tonic-gate		if (++anHexaStr != '\0'){
0Sstevel@tonic-gate			theRes[theLen] += unhex(*anHexaStr);
0Sstevel@tonic-gate			anHexaStr++;
0Sstevel@tonic-gate		}
0Sstevel@tonic-gate		theLen++;
0Sstevel@tonic-gate	}
0Sstevel@tonic-gate	theRes[theLen] = '\0';
0Sstevel@tonic-gate	* aResLen = theLen;
0Sstevel@tonic-gate	return (theRes);
0Sstevel@tonic-gate}