be3126dc03a60e0889877266643edb2a6b212b0c
[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 #ifdef ENABLE_TRACING
33 volatile int (cp_line[]) = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
34 volatile char (*cp_file[]) = {"?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?"};
35 volatile int cp_index = 0;
36 #endif
37
38 char *hexadecimals = "0123456789ABCDEF";
39
40 int charhex2bin(char c)
41 {
42   if(isdigit(c))
43     return c - '0';
44   else
45     return toupper(c) - 'A' + 10;
46 }
47
48
49 void hex2bin(char *src, char *dst, int length)
50 {
51   int i;
52   for(i=0; i<length; i++)
53     dst[i] = charhex2bin(src[i*2])*16 + charhex2bin(src[i*2+1]);
54 }
55
56 void bin2hex(char *src, char *dst, int length)
57 {
58   int i;
59   for(i=length-1; i>=0; i--)
60     {
61       dst[i*2+1] = hexadecimals[(unsigned char)src[i] & 15];
62       dst[i*2] = hexadecimals[(unsigned char)src[i]>>4];
63     }
64 }
65
66 #ifdef ENABLE_TRACING
67 void cp_trace()
68 {
69   syslog(LOG_DEBUG, "Checkpoint trace: %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d <- %s:%d...",
70            cp_file[(cp_index+15)%16], cp_line[(cp_index+15)%16],
71            cp_file[(cp_index+14)%16], cp_line[(cp_index+14)%16],
72            cp_file[(cp_index+13)%16], cp_line[(cp_index+13)%16],
73            cp_file[(cp_index+12)%16], cp_line[(cp_index+12)%16],
74            cp_file[(cp_index+11)%16], cp_line[(cp_index+11)%16],
75            cp_file[(cp_index+10)%16], cp_line[(cp_index+10)%16],
76            cp_file[(cp_index+9)%16], cp_line[(cp_index+9)%16],
77            cp_file[(cp_index+8)%16], cp_line[(cp_index+8)%16],
78            cp_file[(cp_index+7)%16], cp_line[(cp_index+7)%16],
79            cp_file[(cp_index+6)%16], cp_line[(cp_index+6)%16],
80            cp_file[(cp_index+5)%16], cp_line[(cp_index+5)%16],
81            cp_file[(cp_index+4)%16], cp_line[(cp_index+4)%16],
82            cp_file[(cp_index+3)%16], cp_line[(cp_index+3)%16],
83            cp_file[(cp_index+2)%16], cp_line[(cp_index+2)%16],
84            cp_file[(cp_index+1)%16], cp_line[(cp_index+1)%16],
85            cp_file[cp_index], cp_line[cp_index]
86         );
87 }
88 #endif
89
90 #ifndef HAVE_ASPRINTF
91 int asprintf(char **buf, const char *fmt, ...)
92 {
93   int status;
94   va_list ap;
95   int len;
96   
97   len = 4096;
98   *buf = xmalloc(len);
99
100   va_start(ap, fmt);
101   status = vsnprintf (*buf, len, fmt, ap);
102   va_end (ap);
103
104   if(status >= 0)
105     *buf = xrealloc(*buf, status);
106
107   if(status > len-1)
108     {
109       len = status;
110       va_start(ap, fmt);
111       status = vsnprintf (*buf, len, fmt, ap);
112       va_end (ap);
113     }
114
115   return status;
116 }
117 #endif