--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/efrtest/cod2gsmx.c	Mon May 08 07:19:26 2023 +0000
@@ -0,0 +1,57 @@
+/*
+ * This program reads an EFR *.cod file in ETSI test sequence format
+ * and converts it into Themyscira gsmx format.
+ */
+
+#include <stdio.h>
+#include <stdint.h>
+#include <stdlib.h>
+#include <string.h>
+#include <strings.h>
+#include "../libgsmefr/gsm_efr.h"
+#include "etsi.h"
+
+main(argc, argv)
+	char **argv;
+{
+	char *infname, *outfname;
+	FILE *inf, *outf;
+	int big_endian;
+	unsigned frame_no;
+	uint8_t input_bits[ETSI_ENC_NWORDS], frame[EFR_RTP_FRAME_LEN];
+	int rc;
+
+	if (argc == 3 && argv[1][0] != '-') {
+		big_endian = 0;
+		infname = argv[1];
+		outfname = argv[2];
+	} else if (argc == 4 && !strcmp(argv[1], "-b")) {
+		big_endian = 1;
+		infname = argv[2];
+		outfname = argv[3];
+	} else {
+		fprintf(stderr, "usage: %s [-b] input.cod output.gsmx\n",
+			argv[0]);
+		exit(1);
+	}
+	inf = fopen(infname, "r");
+	if (!inf) {
+		perror(infname);
+		exit(1);
+	}
+	outf = fopen(outfname, "w");
+	if (!outf) {
+		perror(outfname);
+		exit(1);
+	}
+	for (frame_no = 0; ; frame_no++) {
+		rc = read_etsi_bits(inf, big_endian, input_bits,
+				    ETSI_ENC_NWORDS, infname);
+		if (!rc)
+			break;
+		bits2frame(input_bits, frame, infname, frame_no);
+		fwrite(frame, 1, sizeof frame, outf);
+	}
+	fclose(outf);
+	exit(0);
+}