--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/miscutil/efr2amr.c	Sun Nov 27 05:41:13 2022 +0000
@@ -0,0 +1,77 @@
+/*
+ * Our gsm-efr2amr utility reads in an EFR speech recording in our
+ * extended-libgsm file format and converts it to AMR, inserting
+ * an AMR NO_DATA frame in the place of every BFI in the input
+ * but NOT performing any special handling or even detection of
+ * EFR SID frames.
+ */
+
+#include <stdio.h>
+#include <stdint.h>
+#include <stdlib.h>
+#include <string.h>
+#include <strings.h>
+#include "../libtest/binreader.h"
+
+extern const uint8_t amr_122_bit_order[244];
+
+static const char amr_file_hdr[] = "#!AMR\n";
+
+main(argc, argv)
+	char **argv;
+{
+	FILE *inf, *outf;
+	uint8_t frm_in[BINFILE_MAX_FRAME], frm_out[32];
+	unsigned bit_a, bit_n, outlen;
+	int rc, bfi;
+
+	if (argc != 3) {
+		fprintf(stderr, "usage: %s input.gsmx output.amr\n", argv[0]);
+		exit(1);
+	}
+	inf = fopen(argv[1], "r");
+	if (!inf) {
+		perror(argv[1]);
+		exit(1);
+	}
+	outf = fopen(argv[2], "w");
+	if (!outf) {
+		perror(argv[2]);
+		exit(1);
+	}
+	for (;;) {
+		rc = binfile_read_frame(inf, frm_in);
+		if (rc < 0) {
+			fprintf(stderr, "error: garbage in %s\n", argv[1]);
+			exit(1);
+		}
+		if (!rc)
+			break;
+		if (frm_in[0] == 0xBF)
+			bfi = 1;
+		else if ((frm_in[0] & 0xF0) == 0xC0)
+			bfi = 0;
+		else {
+			fprintf(stderr,
+				"error: %s is not in EFR codec format\n",
+				argv[1]);
+			exit(1);
+		}
+		if (bfi) {
+			frm_out[0] = 0x78;
+			outlen = 1;
+		} else {
+			frm_out[0] = 0x3C;
+			bzero(frm_out + 1, 31);
+			for (bit_a = 0; bit_a < 244; bit_a++) {
+				bit_n = amr_122_bit_order[bit_a];
+				msb_set_bit(frm_out + 1, bit_a,
+					    msb_get_bit(frm_in, 4 + bit_n));
+			}
+			outlen = 32;
+		}
+		fwrite(frm_out, 1, outlen, outf);
+	}
+	fclose(outf);
+	exit(0);
+}