# HG changeset patch
# User Mychaela Falconia <falcon@freecalypso.org>
# Date 1671059898 0
# Node ID 01ce75ea1c8e379a89e88ab952effee122092f39
# Parent  14b627682458a15ee4bb46cefb123fc0e563e865
gsmefr-decode-r utility put together

diff -r 14b627682458 -r 01ce75ea1c8e .hgignore
--- a/.hgignore	Wed Dec 14 23:11:20 2022 +0000
+++ b/.hgignore	Wed Dec 14 23:18:18 2022 +0000
@@ -14,6 +14,7 @@
 ^efrtest/gsmefr-cod-parse$
 ^efrtest/gsmefr-dec-parse$
 ^efrtest/gsmefr-decode$
+^efrtest/gsmefr-decode-r$
 ^efrtest/gsmefr-dlcap-gsmx$
 ^efrtest/gsmefr-encode$
 ^efrtest/gsmefr-etsi-dec$
diff -r 14b627682458 -r 01ce75ea1c8e efrtest/Makefile
--- a/efrtest/Makefile	Wed Dec 14 23:11:20 2022 +0000
+++ b/efrtest/Makefile	Wed Dec 14 23:18:18 2022 +0000
@@ -1,7 +1,8 @@
 CC=	gcc
 CFLAGS=	-O2
-PROGS=	gsmefr-cod-parse gsmefr-dec-parse gsmefr-decode gsmefr-dlcap-gsmx \
-	gsmefr-encode gsmefr-etsi-dec gsmefr-etsi-enc gsmefr-rec2etsi
+PROGS=	gsmefr-cod-parse gsmefr-dec-parse gsmefr-decode gsmefr-decode-r \
+	gsmefr-dlcap-gsmx gsmefr-encode gsmefr-etsi-dec gsmefr-etsi-enc \
+	gsmefr-rec2etsi
 LIBEFR=	../libgsmefr/libgsmefr.a
 LIBTEST=../libtest/libtest.a
 INSTBIN=/opt/freecalypso/bin
@@ -17,6 +18,9 @@
 gsmefr-decode:	decode.o ${LIBTEST} ${LIBEFR}
 	${CC} ${CFLAGS} -o $@ decode.o ${LIBTEST} ${LIBEFR}
 
+gsmefr-decode-r:	decode-r.o ${LIBTEST} ${LIBEFR}
+	${CC} ${CFLAGS} -o $@ decode-r.o ${LIBTEST} ${LIBEFR}
+
 gsmefr-dlcap-gsmx:	dlcap-gsmx.o tidsp.o ${LIBTEST}
 	${CC} ${CFLAGS} -o $@ dlcap-gsmx.o tidsp.o ${LIBTEST}
 
diff -r 14b627682458 -r 01ce75ea1c8e efrtest/decode-r.c
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/efrtest/decode-r.c	Wed Dec 14 23:18:18 2022 +0000
@@ -0,0 +1,68 @@
+/*
+ * gsmefr-decode-r is like gsmefr-decode, but writes the decoded PCM
+ * output in our "robe" format instead of WAV.
+ */
+
+#include <stdio.h>
+#include <stdint.h>
+#include <stdlib.h>
+#include "../libgsmefr/gsm_efr.h"
+#include "../libtest/binreader.h"
+#include "../libtest/robewrite.h"
+
+main(argc, argv)
+	char **argv;
+{
+	FILE *binf, *outf;
+	struct EFR_decoder_state *state;
+	uint8_t frame[BINFILE_MAX_FRAME];
+	int16_t pcm[160];
+	int rc, bfi, taf;
+
+	if (argc != 3) {
+		fprintf(stderr, "usage: %s input.gsmx output.robe\n", argv[0]);
+		exit(1);
+	}
+	binf = fopen(argv[1], "r");
+	if (!binf) {
+		perror(argv[1]);
+		exit(1);
+	}
+	outf = fopen(argv[2], "w");
+	if (!outf) {
+		perror(argv[2]);
+		exit(1);
+	}
+	state = EFR_decoder_create();
+	if (!state) {
+		perror("EFR_decoder_create()");
+		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) == 0xC0)
+			bfi = 0;
+		else {
+			fprintf(stderr,
+				"error: %s is not in EFR codec format\n",
+				argv[1]);
+			exit(1);
+		}
+		if (bfi)
+			EFR_decode_bfi_nodata(state, taf, pcm);
+		else
+			EFR_decode_frame(state, frame, 0, 0, pcm);
+		write_pcm_to_robe(outf, pcm);
+	}
+	fclose(outf);
+	exit(0);
+}