# HG changeset patch
# User Mychaela Falconia <falcon@freecalypso.org>
# Date 1668905066 0
# Node ID f88817a233fb689b456822411c129938d7626e9c
# Parent  a3aa152c46532105573541f78a14b4c2e1627fea
gsmfr-decode test program written

diff -r a3aa152c4653 -r f88817a233fb .hgignore
--- a/.hgignore	Sun Nov 20 00:31:42 2022 +0000
+++ b/.hgignore	Sun Nov 20 00:44:26 2022 +0000
@@ -4,3 +4,5 @@
 
 ^dev/gsm0611-silence-fr$
 ^dev/gsm0611-silence-fr\.out$
+
+^frtest/gsmfr-decode$
diff -r a3aa152c4653 -r f88817a233fb Makefile
--- a/Makefile	Sun Nov 20 00:31:42 2022 +0000
+++ b/Makefile	Sun Nov 20 00:44:26 2022 +0000
@@ -1,9 +1,11 @@
 CC=	gcc
 CFLAGS=	-O2
-SUBDIR=	dev libgsmfrp libtest
+SUBDIR=	dev frtest libgsmfrp libtest
 
 all:	${SUBDIR}
 
+frtest:	libgsmfrp libtest
+
 ${SUBDIR}: FRC
 	cd $@; ${MAKE} ${MFLAGS} CC=${CC} CFLAGS="${CFLAGS}"
 
diff -r a3aa152c4653 -r f88817a233fb frtest/Makefile
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/frtest/Makefile	Sun Nov 20 00:44:26 2022 +0000
@@ -0,0 +1,12 @@
+CC=	gcc
+CFLAGS=	-O2
+PROGS=	gsmfr-decode
+LIBS=	../libtest/libtest.a ../libgsmfrp/libgsmfrp.a
+
+all:	${PROGS}
+
+gsmfr-decode:	decode.o ${LIBS}
+	${CC} ${CFLAGS} -o $@ decode.o ${LIBS} -lgsm
+
+clean:
+	rm -f *.o *.out ${PROGS}
diff -r a3aa152c4653 -r f88817a233fb frtest/decode.c
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/frtest/decode.c	Sun Nov 20 00:44:26 2022 +0000
@@ -0,0 +1,76 @@
+/*
+ * This file is the main module for gsmfr-decode utility.
+ */
+
+#include <stdio.h>
+#include <stdint.h>
+#include <stdlib.h>
+#include <gsm.h>
+#include "../libgsmfrp/gsm_fr_preproc.h"
+#include "../libtest/binreader.h"
+#include "../libtest/wavwriter.h"
+#include "../libtest/pcmwrite.h"
+
+main(argc, argv)
+	char **argv;
+{
+	FILE *binf;
+	void *wav;
+	gsm dec_state;
+	struct gsmfr_preproc_state *pp_state;
+	uint8_t frame[BINFILE_MAX_FRAME];
+	int16_t pcm[160];
+	int rc, bfi, taf;
+
+	if (argc != 3) {
+		fprintf(stderr, "usage: %s input.gsm output.wav\n", argv[0]);
+		exit(1);
+	}
+	binf = fopen(argv[1], "r");
+	if (!binf) {
+		perror(argv[1]);
+		exit(1);
+	}
+	wav = wav_write_open(argv[2], 8000, 16, 1);
+	if (!wav) {
+		perror(argv[2]);
+		exit(1);
+	}
+	dec_state = gsm_create();
+	if (!dec_state) {
+		fprintf(stderr, "gsm_create() failed!\n");
+		exit(1);
+	}
+	pp_state = gsmfr_preproc_create();
+	if (!pp_state) {
+		fprintf(stderr, "gsmfr_preproc_create() failed!\n");
+		exit(1);
+	}
+	for (;;) {
+		rc = binfile_read_frame(binf, frame);
+		if (rc < 0) {
+			fprintf(stderr, "error: garbage in %s\n", argv[1]);
+			exit(1);
+		}
+		if (!rc)
+			break;
+		if (frame[0] == 0xBF) {
+			bfi = 1;
+			taf = frame[1] & 1;
+		} else if ((frame[0] & 0xF0) == 0xD)
+			bfi = 0;
+		else {
+			fprintf(stderr, "error: %s is not in FR codec format\n",
+				argv[1]);
+			exit(1);
+		}
+		if (bfi)
+			gsmfr_preproc_bfi(pp_state, taf, frame);
+		else
+			gsmfr_preproc_good_frame(pp_state, frame);
+		gsm_decode(dec_state, frame, pcm);
+		write_pcm_to_wav(wav, pcm);
+	}
+	wav_write_close(wav);
+	exit(0);
+}