/*
 * This program reads an HRv1 *.dec file in ETSI test sequence format
 * (decoder input format) and converts it into TW-TS-005 Annex B
 * hexadecimal format.
 */

#include <stdio.h>
#include <stdint.h>
#include <stdlib.h>
#include <string.h>
#include <strings.h>
#include <unistd.h>
#include "../libgsmhr1/tw_gsmhr.h"
#include "../libtest/tw5writer.h"
#include "../libtest/local_endian.h"

static int
convert_ft(bfi, sid)
{
	switch (sid) {
	case 0:
		switch (bfi) {
		case 0:
			return 0;
		case 1:
			return 6;
		case 2:
			return 7;
		}
		break;
	case 1:
		return 1;
	case 2:
		switch (bfi) {
		case 0:
			return 2;
		case 1:
		case 2:
			return 1;
		}
	}
	abort();
}

main(argc, argv)
	char **argv;
{
	char *infname, *outfname;
	FILE *inf, *outf;
	int opt, rc, big_endian, ft;
	unsigned frame_no;
	int16_t params[GSMHR_NUM_PARAMS_DEC];
	uint8_t frame_out[GSMHR_FRAME_LEN_5993];
	extern int optind;

	big_endian = is_native_big_endian();
	while ((opt = getopt(argc, argv, "bl")) != EOF) {
		switch (opt) {
		case 'b':
			big_endian = 1;
			continue;
		case 'l':
			big_endian = 0;
			continue;
		default:
		usage:
			fprintf(stderr,
				"usage: %s [-b|-l] input.dec output.hex\n",
				argv[0]);
			exit(1);
		}
	}
	if (argc != optind + 2)
		goto usage;
	infname = argv[optind];
	outfname = argv[optind+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_dec_frame(inf, big_endian, params, infname, frame_no);
		if (!rc)
			break;
		ft = convert_ft(params[18], params[20]);
		frame_out[0] = ft << 4;
		if (params[19])
			frame_out[0] |= 0x02;
		if (params[21])
			frame_out[0] |= 0x01;
		switch (ft) {
		case 0:
		case 2:
		case 6:
			gsmhr_pack_ts101318(params, frame_out + 1);
			emit_hex_frame(outf, frame_out, GSMHR_FRAME_LEN_5993);
			break;
		case 1:
		case 7:
			emit_hex_frame(outf, frame_out, 1);
			break;
		default:
			abort();
		}
	}
	exit(0);
}