FreeCalypso > hg > freecalypso-tools
view loadtools/audump.c @ 877:2fe0f7fe1f86
ringtools/fc-meltest-e1: parallel to fc-meltest-pwt
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Wed, 30 Mar 2022 20:30:32 +0000 |
parents | 8a89a42baa70 |
children |
line wrap: on
line source
/* * This module implements the tfc139-audio-dump command in fc-loadtool, * which is a special hack for reverse engineering of Compal audio configs. * This hack command is named so because it will only produce interesting * output if fc-loadtool has been entered via tfc139, i.e., breaking into * a running Compal firmware. */ #include <sys/types.h> #include <stdio.h> #include <stdint.h> #include <stdlib.h> #include <string.h> #include <strings.h> extern char target_response_line[]; do_abbr(page, reg, retptr) unsigned page, reg; uint16_t *retptr; { char page_arg[8], reg_arg[8], *argv[4]; int stat; char *strtoul_endp; sprintf(page_arg, "%u", page); sprintf(reg_arg, "%u", reg); argv[0] = "abbr"; argv[1] = page_arg; argv[2] = reg_arg; argv[3] = 0; tpinterf_make_cmd(argv); if (tpinterf_send_cmd() < 0) return(-1); stat = tpinterf_capture_output_oneline(1); if (stat != 1) { errout: fprintf(stderr, "error: malformed response to abbr command\n"); return(-1); } if (strlen(target_response_line) != 3) goto errout; *retptr = strtoul(target_response_line, &strtoul_endp, 16); if (strtoul_endp != target_response_line + 3) goto errout; return(0); } cmd_tfc139_audio_dump(argc, argv) char **argv; { uint16_t data[31]; int i, stat; FILE *of; if (argv[1]) { of = fopen(argv[1], "w"); if (!of) { perror(argv[1]); return(-1); } } else of = stdout; /* read d_aec_ctrl */ stat = do_r16(0xFFD00238, data); if (stat) { bad_read: if (argv[1]) fclose(of); return(stat); } fprintf(of, "d_aec_ctrl: 0x%04X\n", (int) data[0]); /* read new AEC parameter words */ for (i = 0; i < 8; i++) { stat = do_r16(0xFFD0084A + (i << 1), data + i); if (stat) goto bad_read; } fputs("New AEC params:", of); for (i = 0; i < 8; i++) fprintf(of, " 0x%04X", (int) data[i]); putc('\n', of); putc('\n', of); /* read UL FIR coeffs */ for (i = 0; i < 31; i++) { stat = do_r16(0xFFD00908 + (i << 1), data + i); if (stat) goto bad_read; } fputs("Uplink FIR coefficients:\n", of); for (i = 0; i < 31; i++) { if (i == 0 || i == 8 || i == 16 || i == 24) putc('\n', of); else putc(' ', of); fprintf(of, "0x%04X", (int) data[i]); } putc('\n', of); putc('\n', of); /* read DL FIR coeffs */ for (i = 0; i < 31; i++) { stat = do_r16(0xFFD00946 + (i << 1), data + i); if (stat) goto bad_read; } fputs("Downlink FIR coefficients:\n", of); for (i = 0; i < 31; i++) { if (i == 0 || i == 8 || i == 16 || i == 24) putc('\n', of); else putc(' ', of); fprintf(of, "0x%04X", (int) data[i]); } putc('\n', of); putc('\n', of); /* read ABB VBC registers */ stat = do_abbr(1, 8, data); if (stat) goto bad_read; fprintf(of, "VBCTRL1: 0x%03X\n", (int) data[0]); stat = do_abbr(1, 11, data); if (stat) goto bad_read; fprintf(of, "VBCTRL2: 0x%03X\n", (int) data[0]); stat = do_abbr(1, 10, data); if (stat) goto bad_read; fprintf(of, "VBPOP: 0x%03X\n", (int) data[0]); stat = do_abbr(1, 7, data); if (stat) goto bad_read; fprintf(of, "VBUCTRL: 0x%03X\n", (int) data[0]); stat = do_abbr(0, 6, data); if (stat) goto bad_read; fprintf(of, "VBDCTRL: 0x%03X\n", (int) data[0]); /* done */ if (argv[1]) fclose(of); return(0); }