Porting to SunOS 5.8:
[tinc] / lib / utils.c
1 /*
2     utils.c -- gathering of some stupid small functions
3     Copyright (C) 1999,2000 Ivo Timmermans <zarq@iname.com>
4                        2000 Guus Sliepen <guus@sliepen.warande.net>
5
6     This program is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.
10
11     This program is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.
15
16     You should have received a copy of the GNU General Public License
17     along with this program; if not, write to the Free Software
18     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
20
21 #include <sys/types.h>
22 #include <ctype.h>
23 #include <string.h>
24 #include <stdarg.h>
25
26 #include "config.h"
27
28 #include <utils.h>
29 #include <syslog.h>
30 #include <xalloc.h>
31
32 volatile int (cp_line[]) = {0, 0, 0, 0, 0, 0, 0, 0};
33 volatile char (*cp_file[]) = {"?", "?", "?", "?", "?", "?", "?", "?"};
34 volatile int cp_index = 0;
35
36 char *hexadecimals = "0123456789ABCDEF";
37
38 int charhex2bin(char c)
39 {
40   if(isdigit(c))
41     return c - '0';
42   else
43     return toupper(c) - 'A' + 10;
44 }
45
46
47 void hex2bin(char *src, char *dst, int length)
48 {
49   int i;
50   for(i=0; i<length; i++)
51     dst[i] = charhex2bin(src[i*2])*16 + charhex2bin(src[i*2+1]);
52 }
53
54 void bin2hex(char *src, char *dst, int length)
55 {
56   int i;
57   for(i=length-1; i>=0; i--)
58     {
59       dst[i*2+1] = hexadecimals[(unsigned char)src[i] & 15];
60       dst[i*2] = hexadecimals[(unsigned char)src[i]>>4];
61     }
62 }
63
64 void cp_trace()
65 {
66   syslog(LOG_DEBUG, "Checkpoint trace: %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d ...",
67            cp_file[(cp_index+7)%8], cp_line[(cp_index+7)%8],
68            cp_file[(cp_index+6)%8], cp_line[(cp_index+6)%8],
69            cp_file[(cp_index+5)%8], cp_line[(cp_index+5)%8],
70            cp_file[(cp_index+4)%8], cp_line[(cp_index+4)%8],
71            cp_file[(cp_index+3)%8], cp_line[(cp_index+3)%8],
72            cp_file[(cp_index+2)%8], cp_line[(cp_index+2)%8],
73            cp_file[(cp_index+1)%8], cp_line[(cp_index+1)%8],
74            cp_file[cp_index], cp_line[cp_index]
75         );
76 }
77
78 #ifndef HAVE_ASPRINTF
79 int asprintf(char **buf, const char *fmt, ...)
80 {
81   int status;
82   va_list ap;
83   int len;
84   
85   len = 4096;
86   *buf = xmalloc(len);
87
88   va_start(ap, fmt);
89   status = vsnprintf (*buf, len, fmt, ap);
90   va_end (ap);
91
92   if(status >= 0)
93     *buf = xrealloc(*buf, status);
94
95   if(status > len-1)
96     {
97       len = status;
98       va_start(ap, fmt);
99       status = vsnprintf (*buf, len, fmt, ap);
100       va_end (ap);
101     }
102
103   return status;
104 }
105 #endif