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 54 static int bindump __P((void *, size_t)); 55 56 static int 57 bindump(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 76 int 77 racoon_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 96 char * 97 bit2str(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 117 const char * 118 debug_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 */ 145 int 146 getfsize(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 */ 160 void 161 close_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 */ 172 double 173 timedelta(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