List management and manipulation routines.
[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};
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 ...",
70            cp_file[(cp_index+7)%8], cp_line[(cp_index+7)%8],
71            cp_file[(cp_index+6)%8], cp_line[(cp_index+6)%8],
72            cp_file[(cp_index+5)%8], cp_line[(cp_index+5)%8],
73            cp_file[(cp_index+4)%8], cp_line[(cp_index+4)%8],
74            cp_file[(cp_index+3)%8], cp_line[(cp_index+3)%8],
75            cp_file[(cp_index+2)%8], cp_line[(cp_index+2)%8],
76            cp_file[(cp_index+1)%8], cp_line[(cp_index+1)%8],
77            cp_file[cp_index], cp_line[cp_index]
78         );
79 }
80 #endif
81
82 #ifndef HAVE_ASPRINTF
83 int asprintf(char **buf, const char *fmt, ...)
84 {
85   int status;
86   va_list ap;
87   int len;
88   
89   len = 4096;
90   *buf = xmalloc(len);
91
92   va_start(ap, fmt);
93   status = vsnprintf (*buf, len, fmt, ap);
94   va_end (ap);
95
96   if(status >= 0)
97     *buf = xrealloc(*buf, status);
98
99   if(status > len-1)
100     {
101       len = status;
102       va_start(ap, fmt);
103       status = vsnprintf (*buf, len, fmt, ap);
104       va_end (ap);
105     }
106
107   return status;
108 }
109 #endif