Various fixes needed for Solaris.
[oweals/tinc.git] / lib / utils.c
1 /*
2     utils.c -- gathering of some stupid small functions
3     Copyright (C) 1999-2001 Ivo Timmermans <zarq@iname.com>
4                   2000,2001 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 <stdio.h>
25 #include <stdarg.h>
26
27 #include "config.h"
28
29 #include <utils.h>
30 #include <syslog.h>
31 #include <xalloc.h>
32
33 #ifdef ENABLE_TRACING
34 volatile int (cp_line[]) = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
35 volatile char (*cp_file[]) = {"?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?", "?"};
36 volatile int cp_index = 0;
37 #endif
38
39 char *hexadecimals = "0123456789ABCDEF";
40
41 int charhex2bin(char c)
42 {
43   if(isdigit(c))
44     return c - '0';
45   else
46     return toupper(c) - 'A' + 10;
47 }
48
49
50 void hex2bin(char *src, char *dst, int length)
51 {
52   int i;
53   for(i=0; i<length; i++)
54     dst[i] = charhex2bin(src[i*2])*16 + charhex2bin(src[i*2+1]);
55 }
56
57 void bin2hex(char *src, char *dst, int length)
58 {
59   int i;
60   for(i=length-1; i>=0; i--)
61     {
62       dst[i*2+1] = hexadecimals[(unsigned char)src[i] & 15];
63       dst[i*2] = hexadecimals[(unsigned char)src[i]>>4];
64     }
65 }
66
67 #ifdef ENABLE_TRACING
68 void cp_trace()
69 {
70   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...",
71            cp_file[(cp_index+15)%16], cp_line[(cp_index+15)%16],
72            cp_file[(cp_index+14)%16], cp_line[(cp_index+14)%16],
73            cp_file[(cp_index+13)%16], cp_line[(cp_index+13)%16],
74            cp_file[(cp_index+12)%16], cp_line[(cp_index+12)%16],
75            cp_file[(cp_index+11)%16], cp_line[(cp_index+11)%16],
76            cp_file[(cp_index+10)%16], cp_line[(cp_index+10)%16],
77            cp_file[(cp_index+9)%16], cp_line[(cp_index+9)%16],
78            cp_file[(cp_index+8)%16], cp_line[(cp_index+8)%16],
79            cp_file[(cp_index+7)%16], cp_line[(cp_index+7)%16],
80            cp_file[(cp_index+6)%16], cp_line[(cp_index+6)%16],
81            cp_file[(cp_index+5)%16], cp_line[(cp_index+5)%16],
82            cp_file[(cp_index+4)%16], cp_line[(cp_index+4)%16],
83            cp_file[(cp_index+3)%16], cp_line[(cp_index+3)%16],
84            cp_file[(cp_index+2)%16], cp_line[(cp_index+2)%16],
85            cp_file[(cp_index+1)%16], cp_line[(cp_index+1)%16],
86            cp_file[cp_index], cp_line[cp_index]
87         );
88 }
89 #endif