1/*	$NetBSD: misc.c,v 1.6 2008/07/15 00:47:09 mgrooms Exp $	*/
2
3/*	$KAME: misc.c,v 1.23 2001/08/16 14:37:29 itojun Exp $	*/
4
5/*
6 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
7 * All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 *    notice, this list of conditions and the following disclaimer in the
16 *    documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the project nor the names of its contributors
18 *    may be used to endorse or promote products derived from this software
19 *    without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 */
33
34#include "config.h"
35
36#include <sys/types.h>
37#include <sys/param.h>
38#include <sys/stat.h>
39#include <sys/time.h>
40
41#include <stdlib.h>
42#include <stdio.h>
43#include <string.h>
44#include <errno.h>
45#include <syslog.h>
46#include <ctype.h>
47#include <fcntl.h>
48
49#include "var.h"
50#include "misc.h"
51#include "debug.h"
52
53#if 0
54static int bindump __P((void *, size_t));
55
56static int
57bindump(buf0, len)
58        void *buf0;
59        size_t len;
60{
61	unsigned char *buf = (unsigned char *)buf0;
62	size_t i;
63
64	for (i = 0; i < len; i++) {
65		if ((buf[i] & 0x80) || !isprint(buf[i]))
66			printf("\\x%x", buf[i]);
67		else
68			printf("%c", buf[i]);
69	}
70	printf("\n");
71
72	return 0;
73}
74#endif
75
76int
77racoon_hexdump(buf0, len)
78	void *buf0;
79	size_t len;
80{
81	caddr_t buf = (caddr_t)buf0;
82	size_t i;
83
84	for (i = 0; i < len; i++) {
85		if (i != 0 && i % 32 == 0)
86			printf("\n");
87		if (i % 4 == 0)
88			printf(" ");
89		printf("%02x", (unsigned char)buf[i]);
90	}
91	printf("\n");
92
93	return 0;
94}
95
96char *
97bit2str(n, bl)
98	int n, bl;
99{
100#define MAXBITLEN 128
101	static char b[MAXBITLEN + 1];
102	int i;
103
104	if (bl > MAXBITLEN)
105		return "Failed to convert.";	/* NG */
106	memset(b, '0', bl);
107	b[bl] = '\0';
108
109	for (i = 0; i < bl; i++) {
110		if (n & (1 << i))
111			b[bl - 1 - i] = '1';
112	}
113
114	return b;
115}
116
117const char *
118debug_location(file, line, func)
119	const char *file;
120	int line;
121	const char *func;
122{
123	static char buf[1024];
124	const char *p;
125
126	/* truncate pathname */
127	p = strrchr(file, '/');
128	if (p)
129		p++;
130	else
131		p = file;
132
133	if (func)
134		snprintf(buf, sizeof(buf), "%s:%d:%s()", p, line, func);
135	else
136		snprintf(buf, sizeof(buf), "%s:%d", p, line);
137
138	return buf;
139}
140
141/*
142 * get file size.
143 * -1: error occured.
144 */
145int
146getfsize(path)
147	char *path;
148{
149        struct stat st;
150
151        if (stat(path, &st) != 0)
152                return -1;
153        else
154                return st.st_size;
155}
156
157/*
158 * set the close-on-exec flag for file descriptor fd.
159 */
160void
161close_on_exec(fd)
162	int fd;
163{
164	fcntl(fd, F_SETFD, FD_CLOEXEC);
165}
166
167/*
168 * calculate the difference between two times.
169 * t1: start
170 * t2: end
171 */
172double
173timedelta(t1, t2)
174	struct timeval *t1, *t2;
175{
176	if (t2->tv_usec >= t1->tv_usec)
177		return t2->tv_sec - t1->tv_sec +
178			(double)(t2->tv_usec - t1->tv_usec) / 1000000;
179
180	return t2->tv_sec - t1->tv_sec - 1 +
181		(double)(1000000 + t2->tv_usec - t1->tv_usec) / 1000000;
182}
183