/*
 * Copyright (c) 2004 Teodor Sigaev <teodor@sigaev.ru>
 * All rights reserved.
 *
 * 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 author nor the names of any co-contributors
 *        may be used to endorse or promote products derived from this software
 *        without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY 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 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 <ctype.h>
#include <sys/types.h>

#include "tmalloc.h"
#include "tlog.h"
#include "tools.h"

#define isXdigit(c) ( ((c)>='0' && (c)<='9') || ((c)>='A' && (c)<='F') || ((c)>='a' && (c)<='f') )

static u_int8_t str2hex[] = {
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  1,  2,  3,  4,  5,  6,  7,  8,  9,  0,  0,  0,  0,  0,  0,
          0, 10, 11, 12, 13, 14, 15,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0, 10, 11, 12, 13, 14, 15,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
          0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0
}; 

u_int32_t 
strtox(char *src, char **end) {
	u_int32_t res=0, i=0;
	
	while(src && *src && isXdigit(*src) && i<8) {
		res = res << 4;
		res |= str2hex[ *(unsigned char*)src ];
		src++;
		i++;
	}

	if ( end )
		*end=src;
	return res;
}

u_int64_t 
strtox64(char *src, char **end) {
	u_int32_t res=0, i=0;
	
	while(src && *src && isXdigit(*src) && i<16) {
		res = res << 4;
		res |= str2hex[ *(unsigned char*)src ];
		src++;
		i++;
	}

	if ( end )
		*end=src;
	return res;
}

static char buf[32];
static char hex2str[]={'0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F'};

char*     
xtostr(u_int32_t x) {
	char *ptr=buf;
	int i,wast=0;
	for(i=28;i>=0;i-=4) {
		*ptr = hex2str[  (x>>i) & 0x0f ];
		if ( wast || *ptr!='0' || i==0 ) {
			ptr++;
			wast=1;
		}	
	}
	*ptr='\0';
	return buf;
}

char*     
x64tostr(u_int64_t x) {
	char *ptr=buf;
	int i,wast=0;
	for(i=60;i>=0;i-=4) {
		*ptr = hex2str[  (x>>i) & 0x0f ];
		if ( wast || *ptr!='0' || i==0 ) {
			ptr++;
			wast=1;
		}	
	}
	*ptr='\0';
	return buf;
}

double 
timediff(struct timeval *begin, struct timeval *end) {
	return ((double)( end->tv_sec - begin->tv_sec )) + ( (double)( end->tv_usec-begin->tv_usec ) ) / 1.0e+6; 
}

double 
elapsedtime(struct timeval *begin) {
	struct timeval end;
	gettimeofday(&end,NULL);
	return timediff(begin,&end);
}