bool Debugger::Cmd_LineTest(int argc, const char **argv) {
if (argc != 3) {
DebugPrintf("Usage: %s value1 value2\n", argv[0]);
return true;
}
// Automatically do "s 33" to run the text/speech testing start script
_vm->runStart(33);
// Same as typing "VAR 1230 <value>" at the console
varSet(1230, atoi(argv[1]));
// Same as typing "VAR 1264 <value>" at the console
varSet(1264, atoi(argv[2]));
_displayTextNumbers = true;
DebugPrintf("Setting flag 'system_testing_text'\n");
DebugPrintf("Setting flag 'system_test_line_no'\n");
DebugPrintf("Text numbers on\n");
return true;
}
bool Debugger::Cmd_Var(int argc, const char **argv) {
switch (argc) {
case 2:
varGet(atoi(argv[1]));
break;
case 3:
varSet(atoi(argv[1]), atoi(argv[2]));
break;
default:
DebugPrintf("Usage: %s number value\n", argv[0]);
break;
}
return true;
}
bool Debugger::Cmd_AnimTest(int argc, const char **argv) {
if (argc != 2) {
DebugPrintf("Usage: %s value\n", argv[0]);
return true;
}
// Automatically do "s 32" to run the animation testing start script
_vm->runStart(32);
// Same as typing "VAR 912 <value>" at the console
varSet(912, atoi(argv[1]));
DebugPrintf("Setting flag 'system_testing_anims'\n");
return true;
}
/**
* cgiInit
*
* Load the available CGI variables and create the PHP style _SERVER and _GET
* dynamic variables. Both variables are created as associative arrays.
**/
int cgiInit()
{
METHOD *pMethod;
DATA *ptContent,
*ptQuery,
*ptArgs,
*ptSERVER,
*ptCBTREE,
*ptGET,
*ptPOST;
char cProperty[MAX_BUF_SIZE],
cValue[MAX_BUF_SIZE],
cArgm[MAX_BUF_SIZE],
*pcAllowed,
*pcSrc,
*pcArgm;
int iArgCount,
iSep,
i;
phResp = stdout;
cgiEnvironment = newArray(NULL);
// Setup a PHP style '$_SERVER' variable.
if( (ptSERVER = newArray( "_SERVER" )) )
{
for( i=0; cgiVarNames[i]; i++)
{
varNewProperty( cgiVarNames[i], getenv(cgiVarNames[i]), ptSERVER );
}
varPush( cgiEnvironment, ptSERVER );
}
/**
* Setup a PHP style '$_CBTREE' variable.
*
* NOTE: On Apache HTTP servers any non CGI variables must be passed explicitly
* using the 'SetEnv' or 'PassEnv' directive. For example in httpd.conf
* add:
*
* PassEnv CBTREE_METHODS
**/
if( (ptCBTREE = newArray( "_CBTREE" )) )
{
for( i=0; cgiCbtreeNames[i]; i++)
{
varNewProperty( cgiCbtreeNames[i], getenv(cgiCbtreeNames[i]), ptCBTREE );
}
varPush( cgiEnvironment, ptCBTREE );
}
#ifdef _DEBUG
varSet( cgiGetProperty("QUERY_STRING"), cDbgQS );
#endif
switch( cgiGetMethodId() )
{
case HTTP_V_DELETE:
case HTTP_V_GET:
if( (ptGET = newArray( "_GET" )) )
{
if( (ptQuery = cgiGetProperty("QUERY_STRING")) )
{
// Get the list of HTTP query arguments as a new array.
ptArgs = varSplit( ptQuery, "&", false );
ptGET = newArray( "_GET" );
if( (iArgCount = varCount( ptArgs )) )
{
for( i=0; i < iArgCount; i++ )
{
if( (pcArgm = varGet(varGetByIndex( i, ptArgs ))) )
{
// Decode special characters and treat each argument as a new property.
pcSrc = decodeURI( pcArgm, cArgm, sizeof(cArgm)-1 );
iSep = strcspn( pcSrc, "=" );
strncpyz( cProperty, pcSrc, iSep );
pcSrc += pcSrc[iSep] ? iSep + 1: iSep;
strcpy( cValue, pcSrc );
varNewProperty( cProperty, cValue, ptGET );
}
}
}
destroy( ptArgs );
}
varPush( cgiEnvironment, ptGET );
}
break;
case HTTP_V_POST:
if( (ptPOST = newArray( "_POST" )) )
{
// Read the content from stdin
if( fgets(cArgm, sizeof(cArgm)-1, stdin) )
{
ptContent = newString( "CONTENT", cArgm );
ptArgs = varSplit( ptContent, "&", false );
if( (iArgCount = varCount( ptArgs )) )
{
for( i=0; i < iArgCount; i++ )
{
if( (pcArgm = varGet(varGetByIndex( i, ptArgs ))) )
{
// Decode special characters and treat each argument as a new property.
pcSrc = decodeURI( pcArgm, cArgm, sizeof(cArgm)-1 );
iSep = strcspn( pcSrc, "=" );
strncpyz( cProperty, pcSrc, iSep );
pcSrc += pcSrc[iSep] ? iSep + 1: iSep;
strcpy( cValue, pcSrc );
varNewProperty( cProperty, cValue, ptPOST );
}
}
}
destroy( ptArgs );
}
varPush( cgiEnvironment, ptPOST );
}
break;
}
// Define which HTTP methods are allowed.
if( ptCBTREE )
{
pcAllowed = varGet(varGetProperty("CBTREE_METHODS", ptCBTREE));
snprintf( cProperty, sizeof(cProperty)-1,"GET,%s", (pcAllowed ? pcAllowed : "") );
pcArgm = strtok( cProperty, ", " );
while( pcArgm )
{
strtrim( pcArgm, TRIM_M_WSP );
if( *pcArgm )
{
if( (pMethod = _cgiGetMethodByName( pcArgm )) )
{
pMethod->bAllowed = true;
}
}
pcArgm = strtok( NULL, ", " );
}
}
return 1;
}
// Prepare set of current unknowns and list of current equations
VariableSet EquationSystem::prepareCurrentUnknownsAndEquations(
gnssDataMap& gdsMap )
{
// Let's clear the current equations list
currentEquationsList.clear();
// Let's create 'currentUnkSet' set
VariableSet currentUnkSet;
// Get "currentSatSet" and "currentSourceSet"
// and stored in currentSourceSet and currentSatSet
prepareCurrentSourceSat( gdsMap );
// Visit each "Equation" in "equationDescriptionList"
for( std::list<Equation>::const_iterator itEq =
equationDescriptionList.begin();
itEq != equationDescriptionList.end();
++itEq )
{
// First, get the SourceID set for this equation description
SourceIDSet equSourceSet;
// Check if current equation description is valid for all sources
if ( (*itEq).getEquationSource() == Variable::allSources )
{
equSourceSet = currentSourceSet;
}
else
{
// Check if equation description is valid for some sources
if ( (*itEq).getEquationSource() == Variable::someSources )
{
// We have to find the intersection between equation
// description SourceID's and available SourceID's.
SourceIDSet tempSourceSet( (*itEq).getSourceSet() );
// Declare an 'insert_iterator' to be used by
// 'set_intersection' algorithm (provided by STL)
std::insert_iterator< SourceIDSet >
itOut( equSourceSet, equSourceSet.begin() );
// Let's intersect both sets
set_intersection( tempSourceSet.begin(), tempSourceSet.end(),
currentSourceSet.begin(), currentSourceSet.end(),
itOut );
}
else
{
// In this case, we take directly the source into the
// equation source set
equSourceSet.insert( (*itEq).getEquationSource() );
}
} // End of 'if ( (*itEq).getEquationSource() == ...'
// Second, get the SatID set for this equation description
SatIDSet equSatSet = (*itEq).getSatSet();
// We have the SourceID set that is applicable to this
// equation description.
// Now we must get the satellites visible from each
// particular SourceID
for( SourceIDSet::const_iterator itSource = equSourceSet.begin();
itSource != equSourceSet.end();
++itSource )
{
// Get visible satellites from this SourceID
SatIDSet visibleSatSet;
// Iterate through all items in the gnssDataMap
for( gnssDataMap::const_iterator it = gdsMap.begin();
it != gdsMap.end();
++it )
{
// Look for current SourceID
sourceDataMap::const_iterator sdmIter(
(*it).second.find( (*itSource) ) );
// If SourceID was found, then look for satellites
if( sdmIter != (*it).second.end() )
{
// Iterate through corresponding 'satTypeValueMap'
for( satTypeValueMap::const_iterator stvmIter =
(*sdmIter).second.begin();
stvmIter != (*sdmIter).second.end();
stvmIter++ )
{
// for some sat
if((equSatSet.size() > 0) &&
(equSatSet.find((*stvmIter).first) == equSatSet.end()))
{
continue;
}
// Add current SatID to 'visibleSatSet'
visibleSatSet.insert( (*stvmIter).first );
} // End of 'for( satTypeValueMap::const_iterator ...'
} // End of 'for( sourceDataMap::const_iterator sdmIter = ...'
} // End of 'for( gnssDataMap::const_iterator it = ...'
// We have the satellites visible from this SourceID
// We need a copy of current Equation object description
Equation tempEquation( (*itEq) );
// Remove all variables from current equation
tempEquation.clear();
// Update equation independent term with SourceID information
tempEquation.header.equationSource = (*itSource);
// Now, let's visit all Variables in this equation description
for( VariableSet::const_iterator itVar = (*itEq).body.begin();
itVar != (*itEq).body.end();
++itVar )
{
// We will work with a copy of current Variable
Variable var( (*itVar) );
// Check what type of variable we are working on
// If variable is source-indexed, set SourceID
if( var.getSourceIndexed() )
{
var.setSource( (*itSource) );
}
// Add this variable to current equation description. Please
// be aware that satellite-indexed variables inside current
// equations will be handled later
tempEquation.addVariable(var);
// If variable is not satellite-indexed, we just need to
// add it to "currentUnkSet
if( !var.getSatIndexed() )
{
// Insert the result in "currentUnkSet" and
// current equation
currentUnkSet.insert(var);
//tempEquation.addVariable(var);
}
else
{
// If variable IS satellite-indexed, we have to visit all
// visible satellites (from current SourceID) and set the
// satellite before adding variable to "currentUnkSet
for( SatIDSet::const_iterator itSat = visibleSatSet.begin();
itSat != visibleSatSet.end();
++itSat )
{
// Set satellite
var.setSatellite( (*itSat) );
// Insert the result in "currentUnkSet" and
// current equation
currentUnkSet.insert(var);
}
} // End of 'if( !var.getSatIndexed() )...'
} // End of 'for( VariableSet::const_iterator itVar = ...'
// Let's generate the current equations starting from this
// equation description. Therefore, we update equation
// independent term with SatID information and add each instance
// to 'currentEquationsList'.
for( SatIDSet::const_iterator itSat = visibleSatSet.begin();
itSat != visibleSatSet.end();
++itSat )
{
tempEquation.header.equationSat = (*itSat);
// New equation is complete: Add it to 'currentEquationsList'
currentEquationsList.push_back( tempEquation );
}
} // End of 'for( SourceIDSet::const_iterator itSource = ...'
} // End of 'for( std::list<Equation>::const_iterator itEq = ...'
// Now we will take care of satellite-indexed variables inside each
// specific "Equation" in "currentEquationsList"
const size_t eqListSize( currentEquationsList.size() );
for( size_t i = 0; i < eqListSize; ++i )
{
// Get a copy of first equation on 'currentEquationsList'
Equation tempEqu( currentEquationsList.front() );
// Remove the original equation at the beginning of the list.
currentEquationsList.pop_front();
// Get a copy of variables inside this equation
VariableSet varSet( tempEqu.body );
// Clear the variables from this equation
tempEqu.clear();
// Visit each variable inside 'varSet', check if it is
// satellite-indexed, and add it to equation
for( VariableSet::iterator itVar = varSet.begin();
itVar != varSet.end();
++itVar )
{
// Check if it is satellite-indexed
if( !(*itVar).getSatIndexed() )
{
// If not satellite-indexed, just add it back
tempEqu.addVariable( (*itVar) );
}
else
{
// If 'itVar' is satellite-indexed, let's index a copy of it
// and add it to equation
Variable var( (*itVar) );
var.setSatellite( tempEqu.header.equationSat );
tempEqu.addVariable( var );
}
} // End of 'for( VariableSet::iterator itVar = varSet.begin(); ...'
// Our equation is ready, let's add it to the end of the list
currentEquationsList.push_back( tempEqu );
} // End of 'for( int i = 0; i < eqListSize; ++i ) ...'
// Return set of current unknowns
return currentUnkSet;
} // End of method 'EquationSystem::prepareCurrentUnknownsAndEquations()'
