source: libcfa/src/parseconfig.cfa@ 50dcfad

#include <fstream.hfa>
#include "parseconfig.hfa"

bool comments( ifstream & in, char * name ) {
        while () {
                in | name;
          if ( fail( in ) ) return true;
          if ( name[0] != '#' ) break;
                in | nl;        // ignore remainder of line
        } // for
        return false;
} // comments

// Process the configuration file to set the simulation parameters.
void parseConfig( const char * configFile, ConfigParms & cparms ) {
        enum { Parmnum = 11 };
        struct {
                const char * name;                                                              // configuration name
                bool used;                                                                              // already supplied ?
                unsigned int & value;                                                   // location to put configuration value
        } parms[Parmnum] = {
                { "StopCost", false, cparms.stopCost },
                { "NumStudents", false, cparms.numStudents },
                { "NumStops", false, cparms.numStops },
                { "MaxNumStudents", false, cparms.maxNumStudents },
                { "TimerDelay", false, cparms.timerDelay },
                { "MaxStudentDelay", false, cparms.maxStudentDelay },
                { "MaxStudentTrips", false, cparms.maxStudentTrips },
                { "GroupoffDelay", false, cparms.groupoffDelay },
                { "ConductorDelay", false, cparms.conductorDelay },
                { "ParentalDelay", false, cparms.parentalDelay },
                { "NumCouriers", false, cparms.numCouriers },
        };
        char * name;
        int value;
        unsigned int cnt, posn, numOfParm = 0;

                ifstream in;
        try {
                open( in, configFile );                                                 // open the configuration file for input

                for ( cnt; Parmnum ) {                                                  // parameter names can appear in any order
                  if ( comments( in, name ) ) break;                    // eof ?
                        for ( posn; posn < Parmnum && name != parms[posn].name; ++posn ); // linear search
                  if ( posn == Parmnum ) break;                                 // configuration not found ?
                  if ( parms[posn].used ) break;                                // duplicate configuration ?
                        in | value;
                        if ( value < 0 ) {
                                close( in );
                                exit | "Error: file \"" | configFile | "\" parameter " | name
                                         | " value " | value | " must be non-negative."; // *** DOES THIS PRINT TO STDERR??? IT MUST!!! *** //
                        } // if
                  if ( fail( in ) ) break;
                        in | nl; // ignore remainder of line
                        ++numOfParm;
                        parms[posn].used = true;
                        parms[posn].value = value;
                } // for
        } catch( Open_Failure * ex; ex->istream == &in ) {
                exit | "Error: could not open input file \"" | configFile | "\""; // *** DOES THIS PRINT TO STDERR??? IT MUST!!! *** //
        } // try

                close( in );

        if ( cparms.numStops < 2 ) {
                exit | "Error: file \"" | configFile | "\" parameter NumStops value "
                         | cparms.numStops | " must be at least 2."; // *** DOES THIS PRINT TO STDERR??? IT MUST!!! *** //
        }
        if ( cparms.numStudents < 1 ) {
                exit | "Error: file \"" | configFile | "\" parameter NumStudents value "
                         | cparms.numStudents | " must be at least 1."; // *** DOES THIS PRINT TO STDERR??? IT MUST!!! *** //
        }
        if ( cparms.numCouriers < 1 ) {
                exit | "Error: file \"" | configFile | "\" parameter NumCouriers value "
                         | cparms.numCouriers | " must be at least 1."; // *** DOES THIS PRINT TO STDERR??? IT MUST!!! *** //
        }
} // processConfigFile

// Local Variables: //
// tab-width: 4 //
// compile-command: "cfa parseconfig.cfa" //
// End: //