/*
utils.c -- gathering of some stupid small functions
- Copyright (C) 1999-2005 Ivo Timmermans
- 2000-2009 Guus Sliepen <guus@tinc-vpn.org>
+ Copyright (C) 2014 Guus Sliepen <guus@meshlink.io>
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
#include "utils.h"
static const char hexadecimals[] = "0123456789ABCDEF";
-static const char base64imals[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
+static const char base64_original[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
+static const char base64_urlsafe[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_";
+static const char base64_decode[256] = {
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 62, -1, 62, -1, 63,
+ 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, -1, -1, -1, -1, -1, -1,
+ -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14,
+ 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, -1, -1, -1, -1, 63,
+ -1, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
+ 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+};
static int charhex2bin(char c) {
if(isdigit(c))
return toupper(c) - 'A' + 10;
}
-static int charb64decode(char c) {
- if(c > 'a')
- return c - 'a' + 26;
- else if(c > 'A')
- return c - 'A';
- else
- return c - '0';
-}
-
-void hex2bin(char *src, char *dst, int length) {
+int hex2bin(const char *src, void *vdst, int length) {
+ uint8_t *dst = vdst;
int i;
- for(i = 0; i < length; i++)
+ for(i = 0; i < length && isxdigit(src[i * 2]) && isxdigit(src[i * 2 + 1]); i++)
dst[i] = charhex2bin(src[i * 2]) * 16 + charhex2bin(src[i * 2 + 1]);
+ return i;
}
-void bin2hex(char *src, char *dst, int length) {
- int i;
- for(i = length - 1; i >= 0; i--) {
+int bin2hex(const void *vsrc, char *dst, int length) {
+ const uint8_t *src = vsrc;
+ for(int i = length - 1; i >= 0; i--) {
dst[i * 2 + 1] = hexadecimals[(unsigned char) src[i] & 15];
dst[i * 2] = hexadecimals[(unsigned char) src[i] >> 4];
}
+ dst[length * 2] = 0;
+ return length * 2;
}
-int b64decode(const char *src, char *dst, int length) {
+int b64decode(const char *src, void *dst, int length) {
+ int i;
uint32_t triplet = 0;
- unsigned char *udst;
+ unsigned char *udst = dst;
- for(int i = 0; i < length; i++) {
- triplet |= charb64decode(src[i]) << (6 * (i % 4));
- if((i % 4) == 3) {
+ for(i = 0; i < length / 3 * 4 && src[i]; i++) {
+ triplet |= base64_decode[src[i] & 0xff] << (6 * (i & 3));
+ if((i & 3) == 3) {
+ if(triplet & 0xff000000U)
+ return 0;
udst[0] = triplet & 0xff; triplet >>= 8;
udst[1] = triplet & 0xff; triplet >>= 8;
udst[2] = triplet;
udst += 3;
}
}
- if((length % 4) == 3) {
+ if(triplet & 0xff000000U)
+ return 0;
+ if((i & 3) == 3) {
udst[0] = triplet & 0xff; triplet >>= 8;
udst[1] = triplet & 0xff;
- return length / 4 * 3 + 2;
- } else if((length % 4) == 2) {
+ return i / 4 * 3 + 2;
+ } else if((i & 3) == 2) {
udst[0] = triplet & 0xff;
- return length / 4 * 3 + 1;
+ return i / 4 * 3 + 1;
} else {
- return length / 4 * 3;
+ return i / 4 * 3;
}
}
-int b64encode(const char *src, char *dst, int length) {
+static int b64encode_internal(const void *src, char *dst, int length, const char *alphabet) {
uint32_t triplet;
const unsigned char *usrc = src;
- int origlen = length;
-
- while(length > 0) {
- if(length >= 3) {
- triplet = usrc[0] | usrc[1] << 8 | usrc[2] << 16;
- dst[0] = base64imals[triplet & 63]; triplet >>= 6;
- dst[1] = base64imals[triplet & 63]; triplet >>= 6;
- dst[2] = base64imals[triplet & 63]; triplet >>= 6;
- dst[3] = base64imals[triplet];
- dst += 4; usrc += 3; length -= 3;
- } else if(length >=2) {
- triplet = usrc[0] | usrc[1] << 8;
- dst[0] = base64imals[triplet & 63]; triplet >>= 6;
- dst[1] = base64imals[triplet & 63]; triplet >>= 6;
- dst[2] = base64imals[triplet];
- dst[3] = 0;
- return origlen / 3 * 4 + 3;
- } else {
- triplet = usrc[0];
- dst[0] = base64imals[triplet & 63]; triplet >>= 6;
- dst[1] = base64imals[triplet];
- dst[2] = 0;
- return origlen / 3 * 4 + 2;
- }
+ int si = length / 3 * 3;
+ int di = length / 3 * 4;
+
+ switch(length % 3) {
+ case 2:
+ triplet = usrc[si] | usrc[si + 1] << 8;
+ dst[di] = alphabet[triplet & 63]; triplet >>= 6;
+ dst[di + 1] = alphabet[triplet & 63]; triplet >>= 6;
+ dst[di + 2] = alphabet[triplet];
+ dst[di + 3] = 0;
+ length = di + 2;
+ break;
+ case 1:
+ triplet = usrc[si];
+ dst[di] = alphabet[triplet & 63]; triplet >>= 6;
+ dst[di + 1] = alphabet[triplet];
+ dst[di + 2] = 0;
+ length = di + 1;
+ break;
+ default:
+ dst[di] = 0;
+ length = di;
+ break;
}
- *dst = 0;
- return origlen / 4 * 3;
+ while(si > 0) {
+ di -= 4;
+ si -= 3;
+ triplet = usrc[si] | usrc[si + 1] << 8 | usrc[si + 2] << 16;
+ dst[di] = alphabet[triplet & 63]; triplet >>= 6;
+ dst[di + 1] = alphabet[triplet & 63]; triplet >>= 6;
+ dst[di + 2] = alphabet[triplet & 63]; triplet >>= 6;
+ dst[di + 3] = alphabet[triplet];
+ }
+
+ return length;
+}
+
+int b64encode(const void *src, char *dst, int length) {
+ return b64encode_internal(src, dst, length, base64_original);
+}
+
+int b64encode_urlsafe(const void *src, char *dst, int length) {
+ return b64encode_internal(src, dst, length, base64_urlsafe);
}
#if defined(HAVE_MINGW) || defined(HAVE_CYGWIN)
#endif
const char *winerror(int err) {
- static char buf[1024], *newline;
+ static char buf[1024], *ptr;
+
+ ptr = buf + sprintf(buf, "(%d) ", err);
if (!FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS,
- NULL, err, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), buf, sizeof(buf), NULL)) {
+ NULL, err, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), ptr, sizeof(buf) - (ptr - buf), NULL)) {
strncpy(buf, "(unable to format errormessage)", sizeof(buf));
};
- if((newline = strchr(buf, '\r')))
- *newline = '\0';
+ if((ptr = strchr(buf, '\r')))
+ *ptr = '\0';
return buf;
}