view frtest/decode.c @ 475:e512f0d25409 default tip

doc/Calypso-TCH-downlink: document gsm[e]fr-dlcap-sync
author Mychaela Falconia <falcon@freecalypso.org>
date Sat, 18 May 2024 00:13:26 +0000
parents 8d3cfa65a6c2
children
line wrap: on
line source

/*
 * This file is the main module for gsmfr-decode utility.
 */

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

main(argc, argv)
	char **argv;
{
	FILE *binf;
	void *wav;
	struct gsmfr_fulldec_state *fd_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);
	}
	fd_state = gsmfr_fulldec_create();
	if (!fd_state) {
		fprintf(stderr, "gsmfr_fulldec_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) == 0xD0)
			bfi = 0;
		else {
			fprintf(stderr, "error: %s is not in FR codec format\n",
				argv[1]);
			exit(1);
		}
		if (bfi)
			gsmfr_fulldec_bfi(fd_state, taf, pcm);
		else
			gsmfr_fulldec_good_frame(fd_state, frame, pcm);
		write_pcm_to_wav(wav, pcm);
	}
	wav_write_close(wav);
	exit(0);
}