# HG changeset patch
# User Mychaela Falconia <falcon@freecalypso.org>
# Date 1517696475 0
# Node ID d29b45c4c8dbb1ebed105e8a0e2bee5c58725c0a
# Parent  18c692984549f3a60f07d8aaac26ea9f49b17511
uptools/libcoding: 7-bit decoding implemented

diff -r 18c692984549 -r d29b45c4c8db uptools/libcoding/Makefile
--- a/uptools/libcoding/Makefile	Sat Feb 03 20:37:14 2018 +0000
+++ b/uptools/libcoding/Makefile	Sat Feb 03 22:21:15 2018 +0000
@@ -1,7 +1,7 @@
 CC=	gcc
 CFLAGS=	-O2
-OBJS=	decode_helpers.o gsm7_decode.o gsm7_decode_tables.o hexdecode.o \
-	ucs2_decode.o
+OBJS=	decode_helpers.o gsm7_decode.o gsm7_decode_tables.o gsm7_unpack.o \
+	hexdecode.o ucs2_decode.o
 LIB=	libcoding.a
 
 all:	${LIB}
diff -r 18c692984549 -r d29b45c4c8db uptools/libcoding/gsm7_unpack.c
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/uptools/libcoding/gsm7_unpack.c	Sat Feb 03 22:21:15 2018 +0000
@@ -0,0 +1,22 @@
+/*
+ * This library module implements unpacking of GSM 7-bit data
+ * from packed octets.
+ */
+
+#include <sys/types.h>
+
+static u_char shift[8] = {0, 7, 6, 5, 4, 3, 2, 1};
+
+gsm7_unpack(inbuf, outbuf, nseptets)
+	u_char *inbuf, *outbuf;
+	unsigned nseptets;
+{
+	u_char *inp = inbuf, *outp = outbuf;
+	unsigned n;
+
+	for (n = 0; n < nseptets; n++) {
+		*outp++ = (((inp[1] << 8) | inp[0]) >> shift[n&7]) & 0x7F;
+		if (n & 7)
+			inp++;
+	}
+}