2 utils.c -- gathering of some stupid small functions
3 Copyright (C) 1999-2005 Ivo Timmermans
4 2000-2013 Guus Sliepen <guus@tinc-vpn.org>
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.
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.
16 You should have received a copy of the GNU General Public License along
17 with this program; if not, write to the Free Software Foundation, Inc.,
18 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
24 #include "../src/logger.h"
27 static const char hexadecimals[] = "0123456789ABCDEF";
28 static const char base64_original[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
29 static const char base64_urlsafe[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_";
30 static const char base64_decode[256] = {
31 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
32 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
33 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 62, -1, 62, -1, 63,
34 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, -1, -1, -1, -1, -1, -1,
35 -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14,
36 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, -1, -1, -1, -1, 63,
37 -1, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
38 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, -1, -1, -1, -1, -1,
39 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
40 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
41 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
42 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
43 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
44 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
45 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
46 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
49 static int charhex2bin(char c) {
53 return toupper(c) - 'A' + 10;
56 int hex2bin(const char *src, void *vdst, int length) {
59 for(i = 0; i < length && isxdigit(src[i * 2]) && isxdigit(src[i * 2 + 1]); i++)
60 dst[i] = charhex2bin(src[i * 2]) * 16 + charhex2bin(src[i * 2 + 1]);
64 int bin2hex(const void *vsrc, char *dst, int length) {
65 const char *src = vsrc;
66 for(int i = length - 1; i >= 0; i--) {
67 dst[i * 2 + 1] = hexadecimals[(unsigned char) src[i] & 15];
68 dst[i * 2] = hexadecimals[(unsigned char) src[i] >> 4];
74 int b64decode(const char *src, void *dst, int length) {
77 unsigned char *udst = (unsigned char *)dst;
79 for(i = 0; i < length && src[i]; i++) {
80 triplet |= base64_decode[src[i] & 0xff] << (6 * (i & 3));
82 if(triplet & 0xff000000U)
84 udst[0] = triplet & 0xff; triplet >>= 8;
85 udst[1] = triplet & 0xff; triplet >>= 8;
91 if(triplet & 0xff000000U)
94 udst[0] = triplet & 0xff; triplet >>= 8;
95 udst[1] = triplet & 0xff;
97 } else if((i & 3) == 2) {
98 udst[0] = triplet & 0xff;
105 static int b64encode_internal(const void *src, char *dst, int length, const char *alphabet) {
107 const unsigned char *usrc = (unsigned char *)src;
108 int si = length / 3 * 3;
109 int di = length / 3 * 4;
113 triplet = usrc[si] | usrc[si + 1] << 8;
114 dst[di] = alphabet[triplet & 63]; triplet >>= 6;
115 dst[di + 1] = alphabet[triplet & 63]; triplet >>= 6;
116 dst[di + 2] = alphabet[triplet];
122 dst[di] = alphabet[triplet & 63]; triplet >>= 6;
123 dst[di + 1] = alphabet[triplet];
136 triplet = usrc[si] | usrc[si + 1] << 8 | usrc[si + 2] << 16;
137 dst[di] = alphabet[triplet & 63]; triplet >>= 6;
138 dst[di + 1] = alphabet[triplet & 63]; triplet >>= 6;
139 dst[di + 2] = alphabet[triplet & 63]; triplet >>= 6;
140 dst[di + 3] = alphabet[triplet];
146 int b64encode(const void *src, char *dst, int length) {
147 return b64encode_internal(src, dst, length, base64_original);
150 int b64encode_urlsafe(const void *src, char *dst, int length) {
151 return b64encode_internal(src, dst, length, base64_urlsafe);
154 #if defined(HAVE_MINGW) || defined(HAVE_CYGWIN)
156 #include <w32api/windows.h>
159 const char *winerror(int err) {
160 static char buf[1024], *ptr;
162 ptr = buf + sprintf(buf, "(%d) ", err);
164 if (!FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS,
165 NULL, err, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), ptr, sizeof(buf) - (ptr - buf), NULL)) {
166 strncpy(buf, "(unable to format errormessage)", sizeof(buf));
169 if((ptr = strchr(buf, '\r')))
176 unsigned int bitfield_to_int(const void *bitfield, size_t size) {
177 unsigned int value = 0;
178 if(size > sizeof value)
180 memcpy(&value, bitfield, size);
184 char *replace_name(const char *name) {
187 if (name[0] == '$') {
188 char *envname = getenv(name + 1);
189 char hostname[HOST_NAME_MAX+1];
191 if (strcmp(name + 1, "HOST")) {
192 logger(DEBUG_ALWAYS, LOG_ERR, "Invalid Name: environment variable %s does not exist\n", name + 1);
195 if (gethostname(hostname, sizeof hostname) || !*hostname) {
196 logger(DEBUG_ALWAYS, LOG_ERR, "Could not get hostname: %s\n", sockstrerror(sockerrno));
199 hostname[HOST_NAME_MAX] = 0;
202 ret_name = xstrdup(envname);
203 for (char *c = ret_name; *c; c++)
207 ret_name = xstrdup(name);
210 if (!check_id(ret_name)) {
211 logger(DEBUG_ALWAYS, LOG_ERR, "Invalid name for myself!");