view frtest/decode-tw5.c @ 556:18aca50d68df default tip

doc/Calypso-TCH-downlink: update for FR1 BFI-with-data
author Mychaela Falconia <falcon@freecalypso.org>
date Fri, 11 Oct 2024 01:54:00 +0000
parents f9eefb61fb2f
children
line wrap: on
line source

/*
 * This file is the main module for gsmfr-decode-tw5 utility.  It is just
 * like the original gsmfr-decode, but reads the GSM-FR speech recording
 * from TW-TS-005 Annex A hexadecimal format instead of the old gsmx
 * binary format.
 */

#include <stdio.h>
#include <stdint.h>
#include <stdlib.h>
#include "../libgsmfr2/tw_gsmfr.h"
#include "../libtest/tw5reader.h"
#include "../libtest/wavwriter.h"
#include "../libtest/pcmwrite.h"

main(argc, argv)
	char **argv;
{
	FILE *hexf;
	void *wav;
	unsigned lineno;
	struct gsmfr_fulldec_state *fd_state;
	uint8_t frame[TWTS005_MAX_FRAME];
	unsigned frame_len;
	int16_t pcm[160];
	int rc;

	if (argc != 3) {
		fprintf(stderr, "usage: %s input.hex output.wav\n", argv[0]);
		exit(1);
	}
	hexf = fopen(argv[1], "r");
	if (!hexf) {
		perror(argv[1]);
		exit(1);
	}
	lineno = 0;
	wav = wav_write_open(argv[2], 8000, 16, 1);
	if (!wav) {
		perror(argv[2]);
		exit(1);
	}
	fd_state = gsmfr_fulldec_create();
	if (!fd_state) {
		fprintf(stderr, "gsmfr_fulldec_create() failed!\n");
		exit(1);
	}
	for (;;) {
		rc = twts005_read_frame(hexf, &lineno, frame, &frame_len);
		if (rc < 0) {
			fprintf(stderr, "%s line %u: not valid TW-TS-005\n",
				argv[1], lineno);
			exit(1);
		}
		if (!rc)
			break;
		rc = gsmfr_fulldec_rtp_in(fd_state, frame, frame_len, pcm);
		if (rc < 0) {
			fprintf(stderr,
				"%s line %u: not a valid GSM-FR frame\n",
				argv[1], lineno);
			exit(1);
		}
		write_pcm_to_wav(wav, pcm);
	}
	wav_write_close(wav);
	exit(0);
}