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()'