/*
 * This program reads a binary file in our extended-libgsm format
 * and dumps all frames in human-readable form.
 */

#include <stdio.h>
#include <stdint.h>
#include <stdlib.h>
#include "../libgsmfr2/tw_gsmfr.h"
#include "../libgsmefr/gsm_efr.h"
#include "../libtest/binreader.h"

main(argc, argv)
	char **argv;
{
	FILE *binf;
	unsigned frame_index;
	uint8_t frame[BINFILE_MAX_FRAME];
	int16_t params[GSMFR_NUM_PARAMS];
	int rc, i, j, n;

	if (argc != 2) {
		fprintf(stderr, "usage: %s bin-stream-file\n", argv[0]);
		exit(1);
	}
	binf = fopen(argv[1], "r");
	if (!binf) {
		perror(argv[1]);
		exit(1);
	}
	for (frame_index = 0; ; frame_index++) {
		rc = binfile_read_frame(binf, frame);
		if (rc < 0) {
			fprintf(stderr, "error: garbage in %s\n", argv[1]);
			exit(1);
		}
		if (!rc)
			break;
		printf("#%u: ", frame_index);
		switch (frame[0] & 0xF0) {
		case 0xB0:
			printf("BFI TAF=%u\n", frame[1] & 1);
			break;
		case 0xC0:
			printf("EFR SID=%d LPC", EFR_sid_classify(frame));
			EFR_frame2params(frame, params);
			n = 0;
			for (i = 0; i < 5; i++)
				printf(" %d", params[n++]);
			putchar('\n');
			for (i = 0; i < 4; i++) {
				putchar(' ');
				for (j = 0; j < 13; j++)
					printf(" %d", params[n++]);
				putchar('\n');
			}
			break;
		case 0xD0:
			fputs("FR", stdout);
			gsmfr_unpack_to_array(frame, params);
			n = 0;
			for (i = 0; i < 8; i++)
				printf(" %d", params[n++]);
			putchar('\n');
			for (i = 0; i < 4; i++) {
				putchar(' ');
				for (j = 0; j < 17; j++)
					printf(" %d", params[n++]);
				putchar('\n');
			}
			break;
		}
	}
	exit(0);
}