afrt_input.cpp

Go to the documentation of this file.

#include <afrt_input.h>
 
#include <assert.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
 
 
// should the par file processing descend into other par files
static int enableFileDescending = 1;
 
void par_option_cb(struct clo_option_t *option) {
    if (enableFileDescending)
        clo_readFile((clo_optionList_t*) option->cb_data, option->valStr);
}
 
void afrt_init_options(clo_optionList_t* list, const char* softwareVersion) {
    char tmpStr[2048];
    clo_option_t* option;
 
    clo_setVersion2("afrt", softwareVersion);
 
    sprintf(tmpStr, "Usage: afrt argument-list [par file]\n\n");
 
    strcat(tmpStr, "  This program generates a T-Matrix product.\n\n");
 
    strcat(tmpStr, "  The argument-list is a set of keyword=value pairs. The arguments can\n");
    strcat(tmpStr, "  be specified on the command line, or put into a parameter file, or the\n");
    strcat(tmpStr, "  two methods can be used together, with command line over-riding.\n\n");
    strcat(tmpStr, "The list of valid keywords follows:\n");
    clo_setHelpStr(tmpStr);
 
    option = clo_addOption(list, "verbose", CLO_TYPE_BOOL, "false", "turn on verbose output");
    clo_addOptionAlias(option, "v");
        
    afrt_add_options(list);
 
}
 
 
/* 
   Read the command line option and all of the default parameter files.
 
   This is the order for loading the options:
    - load the main program defaults file
    - load the command line (including specified par files)
    - re-load the command line disabling file descending so command
       line arguments will over ride
 
 */
void afrt_read_options(clo_optionList_t* list, int argc, char* argv[]) {
    char *dataRoot;
    char tmpStr[FILENAME_MAX];
 
    assert(list);
 
    if ((dataRoot = getenv("OCDATAROOT")) == NULL) {
        fprintf(stderr, "-E- OCDATAROOT environment variable is not defined.\n");
        exit(EXIT_FAILURE);
    }
 
    // disable the dump option until we have read all of the files
    clo_setEnableDumpOptions(0);
 
    enableFileDescending = 1;
 
    // load program defaults
    sprintf(tmpStr, "%s/common/afrt_defaults.par", dataRoot);
    clo_readFile(list, tmpStr);
 
    // read all arguments including descending par files
    clo_readArgs(list, argc, argv);
 
    // handle PCF file on command line
    if(clo_getPositionNumOptions(list) > 1) {
        fprintf(stderr, "-E- Too many command line parameters.  Only one par file name allowed.\n");
        exit(EXIT_FAILURE);
    }
 
    if(clo_getPositionNumOptions(list) == 1) {
        clo_readFile(list, clo_getPositionString(list, 0));
    }
 
    // if a file was descended, make sure the command args over-rides
    enableFileDescending = 0;
    clo_readArgs(list, argc, argv);
 
    // read all arguments including descending par files
    clo_readArgs(list, argc, argv);
 
    // enable the dump option
    clo_setEnableDumpOptions(1);
 
    // if a file was descended, make sure the command args over-rides
    enableFileDescending = 0;
    clo_readArgs(list, argc, argv);
    enableFileDescending = 1;
 
    //afrt_copy_options();
}