about summary refs log tree commit diff
path: root/src
diff options
context:
space:
mode:
authorRich Felker <dalias@aerifal.cx>2012-03-01 23:43:31 -0500
committerRich Felker <dalias@aerifal.cx>2012-03-01 23:43:31 -0500
commitca19774c913739ef2bea9586a847d8719f19840f (patch)
tree5a82d2687e4d2dad5163039565f1fe90c9d1272a /src
parente0614f7cd418afedd06c9bcd5abb965608bc52f8 (diff)
downloadmusl-ca19774c913739ef2bea9586a847d8719f19840f.tar.gz
musl-ca19774c913739ef2bea9586a847d8719f19840f.tar.xz
musl-ca19774c913739ef2bea9586a847d8719f19840f.zip
implement a64l and l64a (legacy xsi stuff)
Diffstat (limited to 'src')
-rw-r--r--src/misc/a64l.c26
1 files changed, 26 insertions, 0 deletions
diff --git a/src/misc/a64l.c b/src/misc/a64l.c
new file mode 100644
index 00000000..86aeefe0
--- /dev/null
+++ b/src/misc/a64l.c
@@ -0,0 +1,26 @@
+#include <stdlib.h>
+#include <string.h>
+#include <stdint.h>
+
+static const char digits[] =
+	"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
+
+long a64l(const char *s)
+{
+	int e;
+	uint32_t x = 0;
+	for (e=0; e<36 && *s; e+=6, s++)
+		x |= (strchr(digits, *s)-digits)<<e;
+	return x;
+}
+
+char *l64a(long x0)
+{
+	static char s[7];
+	char *p;
+	uint32_t x = x0;
+	for (p=s; x; p++, x>>=6)
+		*p = digits[x&63];
+	*p = 0;
+	return s;
+}