FreeCalypso > hg > fc-rfcal-tools
changeset 76:5c3574f8c8c1
fc-rfcal-txband: reading of basis & targets setting files implemented
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 15 Jul 2017 20:08:55 +0000 |
parents | 93653fe9b4ef |
children | 3f63e71b6422 |
files | autocal/Makefile autocal/txbandmain.c autocal/txcalconf.c |
diffstat | 3 files changed, 148 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/autocal/Makefile Sat Jul 15 19:22:30 2017 +0000 +++ b/autocal/Makefile Sat Jul 15 20:08:55 2017 +0000 @@ -11,7 +11,7 @@ rxupload.o sockopts.o tsidsock.o TXBAND_OBJS= l1tmops.o rvinterf.o sockopts.o tsidsock.o txbandmain.o \ - txpwrmeas.o + txcalconf.o txpwrmeas.o TXBASIS_OBJS= l1tmops.o rvinterf.o tsidsock.o txpwrmeas.o txstandbas.o
--- a/autocal/txbandmain.c Sat Jul 15 19:22:30 2017 +0000 +++ b/autocal/txbandmain.c Sat Jul 15 20:08:55 2017 +0000 @@ -100,6 +100,7 @@ { socket_pathname_options(argc, argv); finish_cmdline(argc, argv); + read_tx_cal_profile(); connect_rvinterf_socket(); connect_tsid_socket(); setlinebuf(stdout); /* to allow logging with tee */
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/autocal/txcalconf.c Sat Jul 15 20:08:55 2017 +0000 @@ -0,0 +1,146 @@ +/* + * The code that reads and parses Tx calibration profiles lives here. + */ + +#include <sys/param.h> +#include <ctype.h> +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <strings.h> +#include <rvinterf/exitcodes.h> +#include "txband.h" + +char txlevels_directory[] = "/opt/freecalypso/rfcal/txlevels"; + +extern struct txcal_band *txcal_band; +extern char *txlevels_profile; + +extern struct tx_basis_point tx_basis[MAX_BASIS_POINTS]; +extern unsigned num_basis_points; + +extern struct tx_level tx_levels[MAX_TX_LEVELS]; + +static basis_set, targets_set; + +static void +do_basis_line(cp, filename_for_errs, lineno) + char *cp, *filename_for_errs; +{ + unsigned n; + + for (n = 0; ; n++) { + while (isspace(*cp)) + cp++; + if (*cp == '\0' || *cp == '#') + break; + if (!isdigit(*cp)) { + fprintf(stderr, + "%s line %d: non-numeric content not allowed\n", + filename_for_errs, lineno); + exit(ERROR_USAGE); + } + if (n >= MAX_BASIS_POINTS) { + fprintf(stderr, + "%s line %d: MAX_BASIS_POINTS exceeded\n", + filename_for_errs, lineno); + exit(ERROR_USAGE); + } + tx_basis[n].apc = atoi(cp); + while (isdigit(*cp)) + cp++; + } + if (n < 2) { + fprintf(stderr, + "%s line %d: a minimum of 2 basis points must be given\n", + filename_for_errs, lineno); + exit(ERROR_USAGE); + } + num_basis_points = n; + basis_set = 1; +} + +static void +do_targets_line(cp, filename_for_errs, lineno) + char *cp, *filename_for_errs; +{ + unsigned expect_num, n; + + expect_num = txcal_band->end_plnum - txcal_band->start_plnum + 1; + for (n = 0; ; n++) { + while (isspace(*cp)) + cp++; + if (*cp == '\0' || *cp == '#') + break; + if (!isdigit(*cp)) { + fprintf(stderr, + "%s line %d: non-numeric content not allowed\n", + filename_for_errs, lineno); + exit(ERROR_USAGE); + } + if (n >= expect_num) { +wrong_num: fprintf(stderr, + "%s line %d: exactly %u target numbers expected\n", + filename_for_errs, lineno, expect_num); + exit(ERROR_USAGE); + } + tx_levels[txcal_band->start_plnum + n].target = atof(cp); + while (isdigit(*cp) || *cp == '.') + cp++; + } + if (n != expect_num) + goto wrong_num; + targets_set = 1; +} + +static void +process_line(linebuf, filename_for_errs, lineno) + char *linebuf, *filename_for_errs; +{ + char *cp, *np; + + for (cp = linebuf; isspace(*cp); cp++) + ; + if (*cp == '\0' || *cp == '#') + return; + for (np = cp; *cp && !isspace(*cp); cp++) + ; + if (*cp) + *cp++ = '\0'; + if (!strcmp(np, "basis")) + do_basis_line(cp, filename_for_errs, lineno); + else if (!strcmp(np, "targets")) + do_targets_line(cp, filename_for_errs, lineno); + else { + fprintf(stderr, "%s line %d: unknown keyword \"%s\"\n", + filename_for_errs, lineno, np); + exit(ERROR_USAGE); + } +} + +read_tx_cal_profile() +{ + char pathname[MAXPATHLEN]; + FILE *inf; + int lineno; + char linebuf[512]; + + sprintf(pathname, "%s/%s-%s", txlevels_directory, txlevels_profile, + txcal_band->name); + inf = fopen(pathname, "r"); + if (!inf) { + perror(pathname); + exit(ERROR_USAGE); + } + for (lineno = 1; fgets(linebuf, sizeof linebuf, inf); lineno++) + process_line(linebuf, pathname, lineno); + fclose(inf); + if (!basis_set) { + fprintf(stderr, "error: basis not set in %s\n", pathname); + exit(ERROR_USAGE); + } + if (!targets_set) { + fprintf(stderr, "error: targets not set in %s\n", pathname); + exit(ERROR_USAGE); + } +}