FreeCalypso > hg > gsm-net-reveng
diff trau-ul-prep/gsmx2tsrc.c @ 19:4ab8762be333
trau-ul-prep: starting with gsmx2tsrc program
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sun, 23 Jun 2024 21:55:03 +0000 |
parents | |
children | 7cd046ffefe7 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/trau-ul-prep/gsmx2tsrc.c Sun Jun 23 21:55:03 2024 +0000 @@ -0,0 +1,92 @@ +/* + * This program reads a binary file in ThemWi gsmx format + * and converts it into ASCII source for TRAU-UL construction. + */ + +#include <stdio.h> +#include <stdint.h> +#include <stdlib.h> +#include <string.h> +#include <strings.h> +#include <tw_gsmfr.h> +#include <gsm_efr.h> +#include "binreader.h" + +main(argc, argv) + char **argv; +{ + FILE *binf, *outf; + unsigned frame_index; + uint8_t frame[BINFILE_MAX_FRAME]; + int16_t params[GSMFR_NUM_PARAMS]; + int rc, i, j, n; + + if (argc < 2 || argc > 3) { + fprintf(stderr, "usage: %s input.gsmx [output.tsrc]\n", + argv[0]); + exit(1); + } + binf = fopen(argv[1], "r"); + if (!binf) { + perror(argv[1]); + exit(1); + } + if (argc > 2) { + outf = fopen(argv[2], "w"); + if (!outf) { + perror(argv[2]); + exit(1); + } + } else + outf = stdout; + 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; + switch (frame[0] & 0xF0) { + case 0xB0: + fprintf(outf, "# input frame %u is BFI\n\n", + frame_index); + break; + case 0xC0: + fprintf(outf, "Frame_EFR {\t# input frame %u\n", + frame_index); + EFR_frame2params(frame, params); + n = 0; + fputs("\tLPC", outf); + for (i = 0; i < 5; i++) + fprintf(outf, " %d", params[n++]); + putc('\n', outf); + for (i = 0; i < 4; i++) { + fputs("\tsf", outf); + for (j = 0; j < 13; j++) + fprintf(outf, " %d", params[n++]); + putc('\n', outf); + } + fputs("}\n\n", outf); + break; + case 0xD0: + fprintf(outf, "Frame_FR {\t# input frame %u\n", + frame_index); + gsmfr_unpack_to_array(frame, params); + n = 0; + fputs("\tLARc", outf); + for (i = 0; i < 8; i++) + fprintf(outf, " %d", params[n++]); + putc('\n', outf); + for (i = 0; i < 4; i++) { + fputs("\tsf", outf); + for (j = 0; j < 17; j++) + fprintf(outf, " %d", params[n++]); + putc('\n', outf); + } + fputs("}\n\n", outf); + break; + } + } + exit(0); +}