--- trunk/src/io/Globals.cpp 2005/01/12 22:41:40 246 +++ trunk/src/io/Globals.cpp 2005/09/07 20:46:46 586 @@ -1,4 +1,4 @@ - /* +/* * Copyright (c) 2005 The University of Notre Dame. All Rights Reserved. * * The University of Notre Dame grants you ("Licensee") a @@ -51,7 +51,7 @@ /* * The following section lists all of the defined tokens for the - * gloabal assignment statements. All are prefixed with a G_ to avoid + * global assignment statements. All are prefixed with a G_ to avoid * stepping on any previously defined enumerations. * * NOTE: tokens start at 1, 0 is a resrved token number @@ -112,6 +112,15 @@ #define G_THERM_INT_LAMBDA 50 #define G_THERM_INT_K 51 #define G_FORCEFIELD_VARIANT 52 +#define G_FORCEFIELD_FILENAME 53 +#define G_THERM_INT_DIST_SPRING 54 +#define G_THERM_INT_THETA_SPRING 55 +#define G_THERM_INT_OMEGA_SPRING 56 +#define G_SURFACETENSION 57 +#define G_PRINTPREESURETENSOR 58 +#define G_USE_UNDAMPED_WOLF 59 +#define G_USE_DAMPED_WOLF 60 +#define G_CUTOFFPOLICY 61 Globals::Globals(){ initalize(); @@ -119,12 +128,6 @@ Globals::~Globals(){ Globals::~Globals(){ int i; - - for( i=0; imatch( lhs ); + + CommandMapType::iterator iter; + std::string keyword(lhs); + iter = command_table.find(keyword); + if (iter != command_table.end()) { + token = iter->second; + } if( token ){ @@ -1246,14 +1261,14 @@ int Globals::globalAssign( event* the_event ){ switch( the_type ){ case STRING: - strcpy(zconsForcePolicy, the_event->evt.asmt.rhs.sval); + strcpy(zconsForcePolicy, the_event->evt.asmt.rhs.sval); - for(int i = 0; zconsForcePolicy[i] != '\0'; i++) - { - zconsForcePolicy[i] = toupper(zconsForcePolicy[i]); - } + for(int i = 0; zconsForcePolicy[i] != '\0'; i++) + { + zconsForcePolicy[i] = toupper(zconsForcePolicy[i]); + } have_zcons_force_policy = 1; - return 1; + return 1; break; case DOUBLE: @@ -1604,21 +1619,21 @@ int Globals::globalAssign( event* the_event ){ switch( the_type ){ case STRING: - the_event->err_msg = + the_event->err_msg = strdup( "Error in parsing meta-data file!\n\tseed is not a string.\n" ); return 0; - return 0; + return 0; break; case DOUBLE: - have_seed = 1; - seed = (int)the_event->evt.asmt.rhs.dval; + have_seed = 1; + seed = (int)the_event->evt.asmt.rhs.dval; return 1; break; case INT: - have_seed = 1; - seed = the_event->evt.asmt.rhs.ival ; + have_seed = 1; + seed = the_event->evt.asmt.rhs.ival ; return 1; break; @@ -1722,7 +1737,8 @@ int Globals::globalAssign( event* the_event ){ return 0; break; } - break; + break; + case G_FORCEFIELD_VARIANT: if( the_type == STRING ){ strcpy( forcefield_variant, the_event->evt.asmt.rhs.sval ); @@ -1734,6 +1750,229 @@ int Globals::globalAssign( event* the_event ){ strdup( "Error in parsing meta-data file!\n\tforceFieldVariant was not a string assignment.\n" ); return 0; break; + // add more token cases here. + + case G_FORCEFIELD_FILENAME: + if( the_type == STRING ){ + strcpy( forcefield_filename, the_event->evt.asmt.rhs.sval ); + have_forcefield_filename = 1; + return 1; + } + + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tforceFieldFileName was not a string assignment.\n" ); + return 0; + break; + + case G_THERM_INT_DIST_SPRING: + switch( the_type ){ + + case STRING: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tthermIntDistSpringConst is not a double or int.\n" ); + return 1; + break; + + case DOUBLE: + therm_int_dist_spring = the_event->evt.asmt.rhs.dval; + have_dist_spring_constant = 1; + return 1; + break; + + case INT: + therm_int_dist_spring = (double)the_event->evt.asmt.rhs.dval; + have_dist_spring_constant = 1; + return 1; + break; + + default: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tthermIntDistSpringConst unrecognized.\n" ); + return 0; + break; + } + break; + + case G_THERM_INT_THETA_SPRING: + switch( the_type ){ + + case STRING: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tthermIntThetaSpringConst is not a double or int.\n" ); + return 1; + break; + + case DOUBLE: + therm_int_theta_spring = the_event->evt.asmt.rhs.dval; + have_theta_spring_constant = 1; + return 1; + break; + + case INT: + therm_int_theta_spring = (double)the_event->evt.asmt.rhs.dval; + have_theta_spring_constant = 1; + return 1; + break; + + default: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tthermIntThetaSpringConst unrecognized.\n" ); + return 0; + break; + } + break; + + case G_THERM_INT_OMEGA_SPRING: + switch( the_type ){ + + case STRING: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tthermIntOmegaSpringConst is not a double or int.\n" ); + return 1; + break; + + case DOUBLE: + therm_int_omega_spring = the_event->evt.asmt.rhs.dval; + have_omega_spring_constant = 1; + return 1; + break; + + case INT: + therm_int_omega_spring = (double)the_event->evt.asmt.rhs.dval; + have_omega_spring_constant = 1; + return 1; + break; + + default: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tthermIntOmegaSpringConst unrecognized.\n" ); + return 0; + break; + } + break; + + case G_SURFACETENSION: + switch( the_type ){ + + case STRING: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tsurfaceTension is not a double or int.\n" ); + return 1; + break; + + case DOUBLE: + surface_tension= the_event->evt.asmt.rhs.dval; + have_surface_tension = 1; + return 1; + break; + + case INT: + surface_tension = (double)the_event->evt.asmt.rhs.dval; + have_surface_tension = 1; + return 1; + break; + + default: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tsurfaceTension unrecognized.\n" ); + return 0; + break; + } + break; + + case G_PRINTPREESURETENSOR: + if( the_type == STRING ){ + + if( !strcasecmp( "true", the_event->evt.asmt.rhs.sval )) { + have_print_pressure_tensor= 1; + print_pressure_tensor = 1; + } else if( !strcasecmp( "false", the_event->evt.asmt.rhs.sval )) { + have_print_pressure_tensor= 1; + print_pressure_tensor = 0; + } else{ + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tprintPressureTensor was not \"true\" or \"false\".\n" ); + return 0; + } + return 1; + } + + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tprintPressureTensor was not \"true\" or \"false\".\n" ); + return 0; + break; + + case G_USE_UNDAMPED_WOLF: + if( the_type == STRING ){ + + if( !strcasecmp( "true", the_event->evt.asmt.rhs.sval )) useUndampedWolf = 1; + else if( !strcasecmp( "false", the_event->evt.asmt.rhs.sval )) useUndampedWolf = 0; + else{ + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tuseUndampedWolf was not \"true\" or \"false\".\n" ); + return 0; + } + return 1; + } + + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tuseUndampedWolf was not \"true\" or \"false\".\n" ); + return 0; + break; + + case G_USE_DAMPED_WOLF: + if( the_type == STRING ){ + + if( !strcasecmp( "true", the_event->evt.asmt.rhs.sval )) useDampedWolf = 1; + else if( !strcasecmp( "false", the_event->evt.asmt.rhs.sval )) useDampedWolf = 0; + else{ + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tuseDampedWolf was not \"true\" or \"false\".\n" ); + return 0; + } + return 1; + } + + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tuseDampedWolf was not \"true\" or \"false\".\n" ); + return 0; + break; + + case G_CUTOFFPOLICY: + switch( the_type ){ + + case STRING: + strcpy(cutoffPolicy, the_event->evt.asmt.rhs.sval); + + for(int i = 0; cutoffPolicy[i] != '\0'; i++) + { + cutoffPolicy[i] = toupper(cutoffPolicy[i]); + } + have_cutoff_policy = 1; + return 1; + break; + + case DOUBLE: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tcutoffPolicy should be a string!\n" ); + return 0; + break; + + case INT: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tcutoffPolicy should be a string!\n" ); + return 0; + break; + + default: + the_event->err_msg = + strdup( "Error in parsing meta-data file!\n\tcutoffPolicy unrecognized.\n" ); + return 0; + break; + } + break; + + // add more token cases here. } } @@ -1825,46 +2064,3 @@ int Globals::globalEnd( event* the_event ){ return 1; } -int Globals::hash( char* text ){ - - register unsigned short int i = 0; // loop counter - int key = 0; // the hash key - - while( text[i] != '\0' ){ - - key = ( ( key << hash_shift ) + text[i] ) % hash_size; - - i++; - } - - if( key < 0 ){ - - // if the key is less than zero, we've had an overflow error - - sprintf( painCave.errMsg, - "There has been an overflow error in the Globals' hash key."); - painCave.isFatal = 1; - simError(); -#ifdef IS_MPI - if( painCave.isEventLoop ){ - if( worldRank == 0 ) mpiInterfaceExit(); - } -#endif //is_mpi - } - - return key; -} - -void Globals::addHash( char* text, int token ){ - - int key; - LinkedCommand* the_element; - - the_element = new LinkedCommand; - the_element->setValues( text, token ); - - key = hash( text ); - - the_element->setNext( command_table[key] ); - command_table[key] = the_element; -}