root/vtcross/trunk/src/service_management_layer/ServiceManagementLayer.cpp @ 316

/* Virginia Tech Cognitive Radio Open Source Systems
 * Virginia Tech, 2009
 *
 * LICENSE INFORMATION GOES HERE
 */

/* Inter-component communication handled by sockets and FD's.  
 * Server support has been completely implemented and tested.
 *
 * Services are stored in a SQLite DB by the ID of the CE that registered them.  Service
 * support has been completely implemented and tested.
 *
 * Missions are loaded from an XML file, connected with services provided by components,
 * and run.  See the documentation for the "PerformActiveMission" below for important 
 * info.  
 */


#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include <cstring>
#include <stdint.h>

#include "vtcross/common.h"

#include "components.h"
#include "vtcross/containers.h"
#include "vtcross/debug.h"
#include "vtcross/error.h"
#include "vtcross/socketcomm.h"
#include <cstring>
#include <stdint.h>
#include <math.h>

#include <arpa/inet.h>
#include <iostream>
#include <netinet/in.h>
#include <netdb.h>
#include <fcntl.h>
#include <sys/ioctl.h>
#include <sys/mman.h>
#include <sys/socket.h>
#include <sys/types.h>
#include <sys/wait.h>

#include "tinyxml/tinyxml.h"
#include "tinyxml/tinystr.h"

#include "sqlite3.h"

typedef struct services_s *services_DB;
typedef struct data_s *data_DB;

using namespace std;

struct services_s {
    char filename[64];
    char tablename[64];
    char command[2048];
    sqlite3 *db; 
    unsigned int num_columns;
};

struct data_s {
    char filename[64];
    char tablename[64];
    char command[2048];
    sqlite3 *db; 
    unsigned int num_columns;
};

services_DB _services_DB;
data_DB _data_DB;
const char *_SML_Config;
bool shellFound;

//Callback function used internally by some of the SQLite3 commands
int callback(void *notUsed, int argc, char **argv, char **azColName){
    int i;
    for(i=0; i<argc; i++){
        printf("%s = %s\n", azColName[i], argv[i] ? argv[i] : "NULL");
    }
    printf("\n");
    return 0;
}



ServiceManagementLayer::ServiceManagementLayer()
{
    LOG("Creating Service Management Layer.\n");
    shellSocketFD = -1;
    numberOfCognitiveEngines = 0;
    CE_Present = false;
    cogEngSrv = 1;
}

//Free and clear the DB's associated with this SML in the destructor
//Note that exiting with an error condition will cause SML to not be destructed,
// resulting in the DB's staying in memory until the destructor is encountered in future executions
ServiceManagementLayer::~ServiceManagementLayer()
{
    char *errorMsg;
    strcpy(_services_DB->command, "drop table ");
    strcat(_services_DB->command, _services_DB->tablename);
    int rc = sqlite3_exec(_services_DB->db, _services_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "ServiceManagementLayer::Destructor services 'drop table' error: %s\n", errorMsg);
    strcpy(_services_DB->command, "vacuum");
    rc = sqlite3_exec(_services_DB->db, _services_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "ServiceManagementLayer::Destructor services 'vacuum' error: %s\n", errorMsg);
    free(_services_DB);

    strcpy(_data_DB->command, "drop table ");
    strcat(_data_DB->command, _data_DB->tablename);
    rc = sqlite3_exec(_data_DB->db, _data_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "ServiceManagementLayer::Destructor data 'drop table' error: %s\n", errorMsg);
    strcpy(_data_DB->command, "vacuum");
    rc = sqlite3_exec(_data_DB->db, _data_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "ServiceManagementLayer::Destructor data 'vacuum' error: %s\n", errorMsg);
    free(_data_DB);
}

//Note that sizes of CE_List, miss, and service are hardcoded for now.
//Also, their sizes are hardcoded into the code in various places; a fix for a future version.
ServiceManagementLayer::ServiceManagementLayer(const char* SML_Config, \
        const char* serverName, const char* serverPort, int16_t clientPort)
{
    LOG("Creating Service Management Layer.\n");
    _SML_Config = SML_Config;
    SMLport = clientPort;

    ConnectToShell(serverName, serverPort);
    CE_List = (CE_Reg *) malloc(10*sizeof(struct CE_Reg));
    CE_List = new CE_Reg[10];

    miss = new Mission[10];
    for(int i = 0; i < 10; i++)
        miss[i].services = new Service[30];

    Current_ID = 0;

    LoadConfiguration(SML_Config, miss);
    CreateServicesDB();
    CreateDataDB();
}

/* CALLED BY: constructor
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Create and initialize a DB to hold the services registered by components
 */
void
ServiceManagementLayer::CreateServicesDB()
{


  sqlite3_stmt *ppStmt;  /* OUT: Statement handle */
  const char *pzTail;     /* OUT: Pointer to unused portion of zSql */


    _services_DB = (services_DB) malloc(sizeof(struct services_s));
   // char *errorMsg;

    // create database

    // copy filename
    strcpy(_services_DB->filename, "Services_Table");

    // execute create database command
    // database handle
    //_services_DB->db = NULL;
    sqlite3_open(_services_DB->filename, &(_services_DB->db));
    char* cols[] = {(char *)"ID_Num", (char *)"Service_Name"};


    // copy tablename
    strcpy(_services_DB->tablename, "Services");

    //If program execution ends in anything other than a ordered shutdown, DB's will still be there for next run
    //Need to get rid of it so that old data isn't inadvertantly used in the next execution cycle
    sprintf(_services_DB->command, "DROP TABLE IF EXISTS Services;");     

    int rc = sqlite3_prepare_v2(_services_DB->db, _services_DB->command, 128, &ppStmt, &pzTail);
    if( rc!=SQLITE_OK && rc!=101 )
        printf("ServiceManagementLayer::CreateServicesDB 'prepare_stmt' error %d\n", rc);
    rc = sqlite3_step(ppStmt);
    if( rc!=SQLITE_OK && rc!=101 )
        printf("ServiceManagementLayer::CreateServicesDB 'step' error\n");

    // number of columns in the table
    _services_DB->num_columns = 2;

    // generate command
    strcpy(_services_DB->command, "CREATE TABLE ");
    strcat(_services_DB->command, _services_DB->tablename);
    strcat(_services_DB->command, "(");
    strcat(_services_DB->command, cols[0]);
    strcat(_services_DB->command, " INT, ");
    strcat(_services_DB->command, cols[1]);
    strcat(_services_DB->command, " TEXT");
    strcat(_services_DB->command, ");");

    // execute create table command

    rc = sqlite3_prepare_v2(_services_DB->db, _services_DB->command, 128, &ppStmt, &pzTail);
    if( rc!=SQLITE_OK && rc!=101 )
        printf("ServiceManagementLayer::CreateServicesDB 'prepare_stmt' error %d\n", rc);
    rc = sqlite3_step(ppStmt);
    if( rc!=SQLITE_OK && rc!=101 )
        printf("ServiceManagementLayer::CreateServicesDB 'step' error\n");
}

/* CALLED BY: constructor
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Create and initialize a DB to hold the data sent by components
 */
void
ServiceManagementLayer::CreateDataDB()
{
    _data_DB = (data_DB) malloc(sizeof(struct data_s));
    //char *errorMsg;
  sqlite3_stmt *ppStmt;  /* OUT: Statement handle */
  const char *pzTail;     /* OUT: Pointer to unused portion of zSql */

    // create database

    // copy filename
    strcpy(_data_DB->filename, "Data_Table");
    // execute create database command
    // database handle
    //_services_DB->db = NULL;
    sqlite3_open(_data_DB->filename, &(_data_DB->db));
    char* cols[] = {(char *)"Tag", (char *)"Data"};

    // create table

    // copy tablename
    strcpy(_data_DB->tablename, "Data");
    sprintf(_data_DB->command, "DROP TABLE IF EXISTS Data;");     

    int rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, 128, &ppStmt, &pzTail);
    if( rc!=SQLITE_OK && rc!=101 )
        printf("ServiceManagementLayer::CreateServicesDB 'prepare_stmt' error %d\n", rc);
    rc = sqlite3_step(ppStmt);
    if( rc!=SQLITE_OK && rc!=101 )
        printf("ServiceManagementLayer::CreateServicesDB 'step' error\n");


    // number of columns in the table
    _data_DB->num_columns = 2;

    // generate command
    strcpy(_data_DB->command, "CREATE TABLE ");
    strcat(_data_DB->command, _data_DB->tablename);
    strcat(_data_DB->command, "(");
    strcat(_data_DB->command, cols[0]);
    //First column is the name of the data (coresponding to the name of the output/input pair)
    //It is the primary key so any subsequent data with the same name will replace the row
    strcat(_data_DB->command, " TEXT PRIMARY KEY ON CONFLICT REPLACE, ");
    strcat(_data_DB->command, cols[1]);
    strcat(_data_DB->command, " TEXT");
    strcat(_data_DB->command, ");");

    // execute create table command

    rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, 128, &ppStmt, &pzTail);
    if( rc!=SQLITE_OK && rc!=101 )
        printf("ServiceManagementLayer::CreateDataDB 'prepare_stmt' error %d\n", rc);
    rc = sqlite3_step(ppStmt);
    if( rc!=SQLITE_OK && rc!=101 )
        printf("ServiceManagementLayer::CreateDataDB 'step' error\n");
}

/* CALLED BY: MessageHandler
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Sends a message identifying this component as an SML to the Shell
 */
void 
ServiceManagementLayer::SendComponentType()
{
    SendMessage(shellSocketFD, "response_sml");
    LOG("SML responded to GetRemoteComponentType query.\n");
}

/* CALLED BY: constructor
 * INPUTS: |serverName| the IPv4 name of the server (127.0.0.1 for localhost)
 *         |serverPort| the port on the server to connect to
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Connecting to the shell takes 2 steps
 * 1) Establish a client socket for communication
 * 2) Run the initial Registration/handshake routine
 */
void 
ServiceManagementLayer::ConnectToShell(const char* serverName, \
        const char* serverPort)
{
    shellSocketFD = ClientSocket(serverName, serverPort);
    RegisterComponent();
}

/* CALLED BY: StartSMLServer
 * INPUTS: |ID| The ID number of the CE that has a message wating
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Called whenever a socket is identified as being ready for communication
 *              This funciton reads the message and calls the appropriate helper
 */ 
void
ServiceManagementLayer::MessageHandler(int32_t ID)
{
    char buffer[256];   
    memset(buffer, 0, 256);  
    int32_t _FD;  
    
    if(ID != -1)
        _FD = CE_List[ID].FD;
    else 
        _FD = shellSocketFD;
    ReadMessage(_FD, buffer);
    //printf("MH_buffer = %s\n", buffer);
    
    //--------Policy Engine Stuff - no policy engine support in this version-------//

    //printf("********* %s **********\n", buffer);
    // TODO
    // If we send integer op codes rather than strings, this process will be
    // MUCH faster since instead of donig string compares we can simply
    // switch on the integer value...
    /*if(strcmp(buffer, "register_service") == 0) {
        if(strcmp(buffer, "policy_geo") == 0) {
        }
        else if(strcmp(buffer, "policy_time") == 0) {
        }
        else if(strcmp(buffer, "policy_spectrum") == 0) {
        }
        else if(strcmp(buffer, "policy_spacial") == 0) {
        }
    }
    else if(strcmp(buffer, "deregister_service") == 0) {
        if(strcmp(buffer, "policy_geo") == 0) {
        }
        else if(strcmp(buffer, "policy_time") == 0) {
        }
        else if(strcmp(buffer, "policy_spectrum") == 0) {
        }
        else if(strcmp(buffer, "policy_spacial") == 0) {
        }
    }*/

    //Go down the list to call the appropriate function
    if(strcmp(buffer, "query_component_type") == 0) {
        SendComponentType();
    }
    else if(strcmp(buffer, "reset_sml") == 0) {
        Reset();
    }
    else if(strcmp(buffer, "shutdown_sml") == 0) {
        Shutdown();
    }
    else if(strcmp(buffer, "register_engine_cognitive") == 0) {
        RegisterCognitiveEngine(ID);
    }
    else if(strcmp(buffer, "register_service") == 0) {
        ReceiveServices(ID);
    }
    else if(strcmp(buffer, "send_component_type") == 0) {
        SendComponentType();
    }
    else if(strcmp(buffer, "list_services") == 0) {
        ListServices();
    }
    else if(strcmp(buffer, "set_active_mission") == 0) {
        SetActiveMission();
    }
    else if(strcmp(buffer, "request_optimization") == 0) {
        PerformActiveMission();
    }
    else if(strcmp(buffer, "deregister_engine_cognitive") == 0) {
        DeregisterCognitiveEngine(ID);
    }
    else if(strcmp(buffer, "deregister_service") == 0) {
        DeregisterServices(ID);
    }
}

//TODO Finish
/* CALLED BY: MessageHandler
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Deregisters the component from the Shell.
 */ 
void 
ServiceManagementLayer::Shutdown()
{
    DeregisterComponent();
}

//TODO Finish
/* CALLED BY: MessageHandler
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Deregisters the component from the Shell
 */
void 
ServiceManagementLayer::Reset()
{
    DeregisterComponent();
    ReloadConfiguration();
}

/* CALLED BY: ConnectToShell
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Sends the registration message to the Shell
 */
void 
ServiceManagementLayer::RegisterComponent()
{
    SendMessage(shellSocketFD, "register_sml");
    LOG("ServiceManagementLayer:: Registration message sent.\n");
    //printf("SSFD = %d\n", shellSocketFD);
}

/* CALLED BY: Shutdown
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Closes the client socket with the shell, sends a deregstration message
 */
void 
ServiceManagementLayer::DeregisterComponent()
{
    SendMessage(shellSocketFD, "deregister_sml");
    LOG("ServiceManagementLayer:: Deregistration message sent.\n");

    shutdown(shellSocketFD, 2);
    close(shellSocketFD);
    shellSocketFD = -1;
    LOG("ServiceManagementLayer:: Shell socket closed.\n");
}


/* CALLED BY: RegisterCognitiveEngine
 * INPUTS: |ID| The ID number of the component where the data is to be transfered to
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Streams config data directly from the shell to the CE, and checks
 * for an "ack" message from the CE after every sent message 
 * to know when to stop communication.
 */

//Modified to check the incoming message buffer rather than the outgoing message buffer to avoid a portion of the delay
//May change this again to handle data more inteligently, taking advantage of it's properties.
void 
ServiceManagementLayer::TransferRadioConfiguration(int32_t ID)
{
    //printf("transRadConfig\n");
    struct timeval selTimeout;
    fd_set sockSet;
    int32_t rc = 1;
    char buffer[256];
    //Send data until the CE sends an ACK message back
    while(rc!=0){
        memset(buffer, 0, 256);
        //Receive data from Shell
        ReadMessage(shellSocketFD, buffer);
        //printf("buffer = %s\n", buffer);
        //Send data to CE
        SendMessage(CE_List[ID].FD, buffer);
        FD_ZERO(&sockSet);
        FD_SET(shellSocketFD, &sockSet);
        selTimeout.tv_sec = 0;
        selTimeout.tv_usec = 5000;
        //Check if there is a message on the shell ready to be processed
        rc=select(shellSocketFD + 1, &sockSet, NULL, NULL, &selTimeout);
    }
    memset(buffer, 0, 256);
    ReadMessage(CE_List[ID].FD, buffer);
    SendMessage(shellSocketFD, buffer);
    //printf("transfer done!\n");
}


/* CALLED BY: RegisterCognitiveEngine
 * INPUTS: |ID| The ID number of the component where the data is to be transfered to
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Simmilar to TransferRadioConfig, just with Experience data
 */

//Modified to check the incoming message buffer rather than the outgoing message buffer to avoid a portion of the delay
//May change this again to handle data more inteligently, taking advantage of it's properties.
void 
ServiceManagementLayer::TransferExperience(int32_t ID)
{
    struct timeval selTimeout;
    fd_set sockSet;
    int32_t rc = 1;
    char buffer[256];
    //Send data until the CE sends an ACK message back
    while(rc!=0){
        //printf("transfering...\n");
        memset(buffer, 0, 256);
        //Receive data from Shell
        ReadMessage(shellSocketFD, buffer);
        //printf("buffer = %s\n", buffer);
        //Send data to CE
        SendMessage(CE_List[ID].FD, buffer);
        FD_ZERO(&sockSet);
        FD_SET(shellSocketFD, &sockSet);
        selTimeout.tv_sec = 0;
        selTimeout.tv_usec = 5000;
        //Check if there is a message on the shell ready to be processed
        rc=select(shellSocketFD + 1, &sockSet, NULL, NULL, &selTimeout);
    }
    memset(buffer, 0, 256);
    //printf("done trans exp!\n");
    ReadMessage(CE_List[ID].FD, buffer);
    SendMessage(shellSocketFD, buffer);
}

/* CALLED BY: MessageHandler
 * INPUTS: |ID| The ID number of the component where service is located
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Inserts a service into the DB with the ID of the component where it exists
 */
void 
ServiceManagementLayer::ReceiveServices(int32_t ID)
{
    char buffer[256];
    memset(buffer, 0, 256);
    ReadMessage(CE_List[ID].FD, buffer);
    char* cols[] = {(char *)"ID_Num", (char *)"Service_Name"};
    //printf("RS_buffer = %s\n", buffer);
    // generate command
    strcpy(_services_DB->command, "insert into ");
    strcat(_services_DB->command, _services_DB->tablename); 
    strcat(_services_DB->command, " (");
    strcat(_services_DB->command, cols[0]);
    strcat(_services_DB->command, ", ");
    strcat(_services_DB->command, cols[1]);
    strcat(_services_DB->command, ") ");
    strcat(_services_DB->command, " values(");
    sprintf(_services_DB->command, "%s%d", _services_DB->command, ID);
    strcat(_services_DB->command, ", '");
    strcat(_services_DB->command, buffer);
    strcat(_services_DB->command, "');");
    
    //printf("search command: %s\n", _services_DB->command);
    // execute add command
    char *errorMsg;
    int rc = sqlite3_exec(_services_DB->db, _services_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "ServiceManagementLayer::RecieveServices DB Error %s\n", errorMsg);
    /*sprintf(outBuffer, "SML: Registering service '%s' from component number '%d'", buffer, ID);
    LOG(outBuffer);*/
}

/* CALLED BY: MessageHandler
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: This method associates the services that components provide with the services that are requested in the mission
 * Each service in the mission is given the ID and FD of a component that has registered to provide that service 
 * Deregistration is okay until this method is called without a reload, but if deregistration occurs after this
 * method is called it needs to be called again even if other engines also provide the services
 */
void 
ServiceManagementLayer::SetActiveMission()
{
    char buffer[256];
    memset(buffer, 0, 256);
    ReadMessage(shellSocketFD, buffer);
    uint32_t missID = atoi(buffer);
    for(activeMission = 0; activeMission < 10; activeMission++)
    {
        //Find the active mission by comparing mission ID's
        if(miss[activeMission].missionID == missID)
            break;
    }

    LOG("ServiceManagementLayer:: Received Set Active Mission command: %i.\n",missID);
    //For each service in the mission
    for(uint16_t i = 0; i < miss[activeMission].numServices; i++)
    {   
        //Check whether the current service is an actual service or a conditional
        if(miss[activeMission].services[i].name.compare("if") && miss[activeMission].services[i].name.compare("dowhile") && \
           miss[activeMission].services[i].name.compare("shell")){
            //If it is a service, search the database of registered services to find the ID of the component that registered it
            strcpy(_services_DB->command, "select ");
            strcat(_services_DB->command, _services_DB->tablename);
            strcat(_services_DB->command, ".* from ");
            strcat(_services_DB->command, _services_DB->tablename);
            strcat(_services_DB->command, " where Service_Name==");
            sprintf(_services_DB->command, "%s'%s';", _services_DB->command, miss[activeMission].services[i].name.c_str());
        
            sqlite3_stmt * pStatement;
            int rc = sqlite3_prepare_v2(_services_DB->db, _services_DB->command, -1, &pStatement, NULL);
            if (rc == SQLITE_OK){ 
                if (sqlite3_step(pStatement) == SQLITE_ROW)
                     miss[activeMission].services[i].componentID =  sqlite3_column_int(pStatement, 0); 
                else {
                    printf("services_DB:: Mission requires service %s not provided by any connected component.\n",miss[activeMission].services[i].name.c_str());
                    rc=31337;
                }
             } else {
                printf("services_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_services_DB->command);
            }
                //printf("s_name=%s\n",miss[activeMission].services[i].name.c_str());
            sqlite3_finalize(pStatement);
            miss[activeMission].services[i].socketFD = CE_List[miss[activeMission].services[i].componentID].FD;
            //Set the FD and ID of the service to refer to the component where the service exists
        }
        //Nothing to be done for conditionals at this stage
    }
 
    SendMessage(shellSocketFD, "ack");
    LOG("ServiceManagementLayer:: Done setting active mission.\n");
    //printf("\nhere ---%d, %d---\n", miss[activeMission].services[0].componentID, miss[activeMission].services[1].componentID);
}

/* CALLED BY: PerformActiveMission
 * INPUTS: |sourceID| ID of the service that is being processed
 * OUTPUTS: <none>
 *
 * DESCRIPTION: This is a helper method for the "PerformActiveMission" function
 * NOTE: This function has changed durrastically from the previous implementation
 * Takes an ID of a service
 * For that service, finds inputs in DB and forwords those on to the engine after sending comm-starting messages
 * Afterwords, listenes for the outputs so that it can store those in the database for future services or the overall output
 */
void
ServiceManagementLayer::TransactData(int32_t sourceID)
{
   // LOG("ServiceManagementLayer:: Data transaction occuring.\n");
    char buffer[256];
    std::string data;
    char* cols[] = {(char *)"Tag", (char *)"Data"};
    int i = 0;
    char *token;

   //Send a message directly to the shell
   if(miss[activeMission].services[sourceID].name.find("shell")!=string::npos)
   { 
        int k = 0;
        shellFound=true;
        while(k<10 && !miss[activeMission].input[k].empty()){
            k++;
        }
        sprintf(buffer, "%d", k);
        SendMessage(shellSocketFD, buffer);
        for(int t = 0; t < k; t++){
            memset(buffer, 0 , 256);
            strcpy(_data_DB->command, "select ");
            strcat(_data_DB->command, _data_DB->tablename);
            strcat(_data_DB->command, ".* from ");
            strcat(_data_DB->command, _data_DB->tablename);
            strcat(_data_DB->command, " where Tag==");
            sprintf(_data_DB->command, "%s'%s';", _data_DB->command, miss[activeMission].input[t].c_str());
            sqlite3_stmt * pStatement;
            int rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
            if (rc == SQLITE_OK){ 
                if (sqlite3_step(pStatement) == SQLITE_ROW)
                    data=((const char*) sqlite3_column_text(pStatement, 1)); 
                else {
                    printf("data_DB:: Data not yet in DB.\n");
                    rc=31337;
                }
            } 
            else {
                printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
            }
            sqlite3_finalize(pStatement);
            token = strtok((char *)data.c_str(), "@");
            token = strtok(NULL, "@");
            SendMessage(shellSocketFD, token);
            token = strtok(NULL, "@");
            SendMessage(shellSocketFD, token);
        }
        return;
   } 

    //If this is a service command and not a shell command...
    //Transmission starting messages
    SendMessage(miss[activeMission].services[sourceID].socketFD, "request_optimization_service");
    SendMessage(miss[activeMission].services[sourceID].socketFD, miss[activeMission].services[sourceID].name.c_str());

   //If the service takes a parameter, feed that parameter in
   if(!miss[activeMission].services[sourceID].parameter.empty()){
        //printf("sending parameter!\n");
        SendMessage(miss[activeMission].services[sourceID].socketFD, "1");
        SendMessage(miss[activeMission].services[sourceID].socketFD, "parameter");
        SendMessage(miss[activeMission].services[sourceID].socketFD, miss[activeMission].services[sourceID].parameter.c_str());
    }


    //Load and transmit the input data
    while(i < 10 && !miss[activeMission].services[sourceID].input[i].empty()){
        strcpy(_data_DB->command, "select ");
        strcat(_data_DB->command, _data_DB->tablename);
        strcat(_data_DB->command, ".* from ");
        strcat(_data_DB->command, _data_DB->tablename);
        strcat(_data_DB->command, " where Tag==");
        sprintf(_data_DB->command, "%s'%s';", _data_DB->command, miss[activeMission].services[sourceID].input[i].c_str());
        sqlite3_stmt * pStatement;
        int rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
        if (rc == SQLITE_OK){ 
            if (sqlite3_step(pStatement) == SQLITE_ROW)
                 data.append((const char*) sqlite3_column_text(pStatement, 1)); 
            else {
                    printf("data_DB:: Data not yet in DB.\n");
                    rc=31337;
            }
        } 
        else {
            printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
        }
        sqlite3_finalize(pStatement);

            token = strtok((char *)data.c_str(), "@");
        while(token){
            SendMessage(miss[activeMission].services[sourceID].socketFD, token);
            token = strtok(NULL, "@");
        }
        i++;
        data.clear();
    }
    int32_t j = 0;
    
    //Receive and store the output data
    while(j < 10 && !miss[activeMission].services[sourceID].output[j].empty()){
        int rc;
        memset(buffer, 0, 256);
        //Read the number of datapairs for this output
        ReadMessage(miss[activeMission].services[sourceID].socketFD, buffer);
        data.append(buffer);
        data.append("@");
        int t = atoi(buffer);
        for(int k = 0; k < t; k++){
            //Read the datapairs incrementally and deliminate it with the "@" symbol
            memset(buffer, 0, 256);
            ReadMessage(miss[activeMission].services[sourceID].socketFD, buffer);
            data.append(buffer);
            data.append("@");
            memset(buffer, 0, 256);
            ReadMessage(miss[activeMission].services[sourceID].socketFD, buffer);
            data.append(buffer);
            data.append("@");
        }

        strcpy(_data_DB->command, "insert or replace into ");
        strcat(_data_DB->command, _data_DB->tablename); 
        strcat(_data_DB->command, " (");
        strcat(_data_DB->command, cols[0]);
        strcat(_data_DB->command, ", ");
        strcat(_data_DB->command, cols[1]);
        strcat(_data_DB->command, ") ");
        strcat(_data_DB->command, " values('"); 
        strcat(_data_DB->command, miss[activeMission].services[sourceID].output[j].c_str());
        strcat(_data_DB->command, "', '");
        strcat(_data_DB->command, data.c_str());
        strcat(_data_DB->command, "');");
        char *errorMsg;
        rc = sqlite3_exec(_data_DB->db, _data_DB->command, callback, 0, &errorMsg);
        if( rc!=SQLITE_OK && rc!=101 )
            fprintf(stderr, "SQL error: %s\n", errorMsg);
        //printf("S: done putting ouptut data into DB for ID#='%d', data=%s\n", sourceID, data.c_str());
        j++;
        data.clear();
    }
    //printf("done transact data!\n");
   // LOG("ServiceManagementLayer:: Finished with data transaction.\n");


    /*printf("\n\n\n");
    // generate commandi
    strcpy(_data_DB->command, "select ");
    strcat(_data_DB->command, _data_DB->tablename);
    strcat(_data_DB->command, ".* from ");
    strcat(_data_DB->command, _data_DB->tablename);
    strcat(_data_DB->command, ";");

    // execute print (select all)  command    
    char *errorMsg;
    int rc = sqlite3_exec(_data_DB->db, _data_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "SQL error: %s\n", errorMsg);
    printf("database %s, table %s:\n", _data_DB->filename, _data_DB->tablename);
    printf("\n\n\n");*/
}



/* CALLED BY: MessageHandler
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: This function works by first sending the inputs from the shell to the appropriate components
 * The first service should begin immeadiately, as should any others who have all of their input parameters
 * When they complete, the output path is found and the data is transfered as it becomes available
 * Presumably at this point the second function has all of it's parameters, so it begins to compute, and the cycle repeats
 *  
 * 
 * Rules for active missions (currently)
 * -Five inputs/outputs per service and per mission
 * -All ordering constraints have been relaxed in this version; all data is stored locally and only sent when requested
 * -If and while support fully implemented - up to three levels (if's can be nested, but dowhiles cannot)
 * -For dowhiles, assumes loop condition determined on last line
 * -IMPORTANT: DB uses '@' to seperate individual statements; using '@' in the data stream will result in incorrect behavior
 */

//WHILE
void
ServiceManagementLayer::PerformActiveMission()
{
    //printf("start PAM\n");
    uint16_t i = 0, t;
    shellFound = false;
    std::string data_param, data_obsv, data;
    std::string input;
    std::string check;
    char buffer[256];
    char buffer1[256];
    char *token, *token2;
    std::string data2;
    int rc;
    char *errorMsg;
    char* cols[] = {(char *)"Tag", (char *)"Data"};

    LOG("ServiceManagementLayer:: Received PerformActiveMission command.\n");

    //Get the inputs
    memset(buffer, 0, 256);
    //Needed to read the zero passed in by GOP as the number of observables
    ReadMessage(shellSocketFD, buffer);


    /* Receive Set of Parameters */
    memset(buffer, 0, 256);
    ReadMessage(shellSocketFD, buffer);
    t=atoi(buffer);
    for(int m = 0; m < t; m++) {
        //printf("data=%s\n", data_obsv.c_str());
        memset(buffer1, 0, 256);
        ReadMessage(shellSocketFD, buffer1);
        strcpy(_data_DB->command, "insert into ");
        strcat(_data_DB->command, _data_DB->tablename); 
        strcat(_data_DB->command, " (");
        strcat(_data_DB->command, cols[0]);
        strcat(_data_DB->command, ", ");
        strcat(_data_DB->command, cols[1]);
        strcat(_data_DB->command, ") ");
        memset(buffer, 0, 256);
        ReadMessage(shellSocketFD, buffer);
        sprintf(_data_DB->command, "%s values('%s', '1@%s@%s');", _data_DB->command, buffer1, buffer1, buffer);
        rc = sqlite3_exec(_data_DB->db, _data_DB->command, callback, 0, &errorMsg);
        if( rc!=SQLITE_OK && rc!=101 )
            fprintf(stderr, "SQL error: %s\n", errorMsg);
    }

    //Useful for spotchecking what's in the database
    /*printf("\n\n\n");
    // generate commandi
    strcpy(_data_DB->command, "select ");
    strcat(_data_DB->command, _data_DB->tablename);
    strcat(_data_DB->command, ".* from ");
    strcat(_data_DB->command, _data_DB->tablename);
    strcat(_data_DB->command, ";");

    // execute print (select all)  command  
    rc = sqlite3_exec(_data_DB->db, _data_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "SQL error: %s\n", errorMsg);
    printf("database %s, table %s:\n", _data_DB->filename, _data_DB->tablename);
    printf("\n\n\n");*/


    i=0; 
    int32_t numstatements[3] = {0,0,0};
    while(i < miss[activeMission].numServices)
    {
        if(miss[activeMission].services[i].name.compare("if")==0)
        {
           //printf("L0:if detected\n");
            input.clear();
            check.clear();
            int t;
            for(t = 0; t < 10; t++){
                if(!miss[activeMission].services[i].output[t].empty()){
                    //printf("i-numstmts-1 = %d\n", i-numstatements[0]-1);
                    input=miss[activeMission].services[i-numstatements[0]-1].output[t];
                    strcpy(_data_DB->command, "SELECT ");
                    strcat(_data_DB->command, _data_DB->tablename);
                    strcat(_data_DB->command, ".* from ");
                    strcat(_data_DB->command, _data_DB->tablename);
                    strcat(_data_DB->command, " where Tag==");
                    sprintf(_data_DB->command, "%s'%s';", _data_DB->command, input.c_str());
                    sqlite3_stmt * pStatement;
                    rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                    if (rc == SQLITE_OK){ 
                        if (sqlite3_step(pStatement) == SQLITE_ROW)
                             data = (const char *) sqlite3_column_text(pStatement, 1); 
                        else {
                                printf("1 data_DB:: Data not yet in DB.\n");
                                rc=31337;
                        }
                    } else {
                        printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                    }
                    sqlite3_finalize(pStatement);
                    //printf("data=%s\n", data.c_str());
                    token = strtok((char *)data.c_str(), "@");
                    token = strtok(NULL, "@");
                    token = strtok(NULL, "@");
                    //printf("data=%s\n", token);
                data.clear();
                    break;
                }
            }
            //printf("L0:--- %s  %s---\n", miss[activeMission].services[i].output[t].c_str(), token);
            bool doit = false;
            if(miss[activeMission].services[i].output[t].find(">") != string::npos){
                    std::string data2;
                    strcpy(_data_DB->command, "SELECT ");
                    strcat(_data_DB->command, _data_DB->tablename);
                    strcat(_data_DB->command, ".* from ");
                    strcat(_data_DB->command, _data_DB->tablename);
                strcat(_data_DB->command, " where Tag==");
                    miss[activeMission].services[i].output[t].erase(0, 1);
            //printf("here! %s\n", miss[activeMission].services[i].output[t].c_str());
                    sprintf(_data_DB->command, "%s'%s';", _data_DB->command, miss[activeMission].services[i].output[t].c_str());
                    sqlite3_stmt * pStatement;
                    rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                    if (rc == SQLITE_OK){ 
                        if (sqlite3_step(pStatement) == SQLITE_ROW)
                             data2 = (const char *) sqlite3_column_text(pStatement, 1); 
                        else {
                                printf("1 data_DB:: Data not yet in DB.\n");
                                rc=31337;
                        }
                    } else {
                        printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                    }
                            sqlite3_finalize(pStatement);
                    char* token2 = strtok((char *)data2.c_str(), "@");
                    token2 = strtok(NULL, "@");
                    token2 = strtok(NULL, "@");
                    if(atof(token) > atof(token2))
                        doit=true;
                    //printf("%s %s\n", buffer, token);
            }
            else if (strstr(miss[activeMission].services[i].output[t].c_str(), token))
                doit=true;
            if(doit){
            //if(strstr(miss[activeMission].services[i].output[t].c_str(), token)){
                //printf("L0:if taken\n");
                for(uint16_t k = i+1; k <= i+miss[activeMission].services[i].num_conds; k++){ 
                        //printf("transacting data for k=%d\n", k);
                    //printf("%s---%d\n", miss[activeMission].services[k].name.c_str(), k);
                    if(miss[activeMission].services[k].name.compare("if")==0){
                        //printf("L1:if detected\n");
                            input.clear();
                            check.clear();
                            for(t = 0; t < 10; t++){
                                if(!miss[activeMission].services[k].output[t].empty()){
                                    //printf("i-numstmts = %d\n", i-numstatements-1);
                                    input=miss[activeMission].services[k-numstatements[1]-1].output[t];
                                    strcpy(_data_DB->command, "SELECT ");
                                    strcat(_data_DB->command, _data_DB->tablename);
                                    strcat(_data_DB->command, ".* from ");
                                    strcat(_data_DB->command, _data_DB->tablename);
                                    strcat(_data_DB->command, " where Tag==");
                                    sprintf(_data_DB->command, "%s'%s';", _data_DB->command, input.c_str());
                                    sqlite3_stmt * pStatement;
                                    rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                                    if (rc == SQLITE_OK){ 
                                        if (sqlite3_step(pStatement) == SQLITE_ROW)
                                             data = (const char *) sqlite3_column_text(pStatement, 1); 
                                        else {
                                                printf("1 data_DB:: Data not yet in DB.\n");
                                                rc=31337;
                                        }
                                    } else {
                                        printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                                    }
                                    sqlite3_finalize(pStatement);
                                    //printf("data=%s\n", data.c_str());
                                    token = strtok((char *)data.c_str(), "@");
                                    token = strtok(NULL, "@");
                                    token = strtok(NULL, "@");
                                    //printf("data=%s\n", token);
                                    break;
                                }
                            }
                            //printf("L1:--- %s  %s---\n", miss[activeMission].services[k].output[t].c_str(), token);
                            bool doit = false;
                                //printf("here! %s\n", miss[activeMission].services[k].output[t].c_str());
                            if(miss[activeMission].services[k].output[t].find(">") != string::npos){
                                    std::string data2;
                                    strcpy(_data_DB->command, "SELECT ");
                                    strcat(_data_DB->command, _data_DB->tablename);
                                    strcat(_data_DB->command, ".* from ");
                                    strcat(_data_DB->command, _data_DB->tablename);
                                    strcat(_data_DB->command, " where Tag==");
                                    miss[activeMission].services[k].output[t].erase(0, 1);
                                    sprintf(_data_DB->command, "%s'%s';", _data_DB->command, miss[activeMission].services[k].output[t].c_str());
                                    sqlite3_stmt * pStatement;
                                    rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                                    if (rc == SQLITE_OK){ 
                                        if (sqlite3_step(pStatement) == SQLITE_ROW)
                                             data2 = (const char *) sqlite3_column_text(pStatement, 1); 
                                        else {
                                                printf("1 data_DB:: Data not yet in DB.\n");
                                                rc=31337;
                                        }
                                    } else {
                                        printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                                    }
                                    sqlite3_finalize(pStatement);
                                //printf("data=%s token=%s\n", data2.c_str(), token);
                                    token2 = strtok((char *)data2.c_str(), "@");
                                    token2 = strtok(NULL, "@");
                                    token2 = strtok(NULL, "@");
                                //printf("token2 %s token %s\n", token2, token);
                                if(atof(token) > atof(token2))
                                    doit=true;
                            }
                            else if (strstr(miss[activeMission].services[k].output[t].c_str(), token))
                                doit=true;
                            if(doit){
                                //printf("L1:if taken\n");
                                for(uint16_t j = k+1; j <= k+miss[activeMission].services[k].num_conds; j++){ 
                                    //printf("transacting data for k=%d\n", k);
                                    //printf("%s---%d\n", miss[activeMission].services[j].name.c_str(), j);
                                    if(miss[activeMission].services[j].name.compare("if")==0){
                                        //printf("L2:if detected\n");
                                            input.clear();
                                            check.clear();
                                            for(t = 0; t < 10; t++){
                                                if(!miss[activeMission].services[j].output[t].empty()){
                                                    //printf("i-numstmts = %d\n", i-numstatements-1);
                                                    input=miss[activeMission].services[j-numstatements[2]-1].output[t];
                                                    strcpy(_data_DB->command, "SELECT ");
                                                    strcat(_data_DB->command, _data_DB->tablename);
                                                    strcat(_data_DB->command, ".* from ");
                                                    strcat(_data_DB->command, _data_DB->tablename);
                                                    strcat(_data_DB->command, " where Tag==");
                                                    sprintf(_data_DB->command, "%s'%s';", _data_DB->command, input.c_str());
                                                    sqlite3_stmt * pStatement;
                                                    rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                                                    if (rc == SQLITE_OK){ 
                                                        if (sqlite3_step(pStatement) == SQLITE_ROW)
                                                             data = (const char *) sqlite3_column_text(pStatement, 1); 
                                                        else {
                                                                printf("1 data_DB:: Data not yet in DB.\n");
                                                                rc=31337;
                                                        }
                                                    } else {
                                                        printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                                                    }
                                                    sqlite3_finalize(pStatement);
                                                    //printf("data=%s\n", data.c_str());
                                                    token = strtok((char *)data.c_str(), "@");
                                                    token = strtok(NULL, "@");
                                                    token = strtok(NULL, "@");
                                                    //printf("data=%s\n", token);
                                                    data.clear();
                                                    break;
                                                }
                                            }
                                            //printf("L2:---%s||%s---\n", miss[activeMission].services[j].output[t].c_str(), token);
                                            bool doit = false;
                                                //printf("here! %s\n", miss[activeMission].services[j].output[t].c_str());
                                            if(miss[activeMission].services[j].output[t].find(">") != string::npos){
                                                    strcpy(_data_DB->command, "SELECT ");
                                                    strcat(_data_DB->command, _data_DB->tablename);
                                                    strcat(_data_DB->command, ".* from ");
                                                    strcat(_data_DB->command, _data_DB->tablename);
                                                    strcat(_data_DB->command, " where Tag==");
                                                    miss[activeMission].services[k].output[t].erase(0, 1);
                                        sprintf(_data_DB->command, "%s'%s';", _data_DB->command, miss[activeMission].services[j].output[t].c_str());
                                                    sqlite3_stmt * pStatement;
                                                    rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                                                    if (rc == SQLITE_OK){ 
                                                        if (sqlite3_step(pStatement) == SQLITE_ROW)
                                                             data2 = (const char *) sqlite3_column_text(pStatement, 1); 
                                                        else {
                                                                printf("1 data_DB:: Data not yet in DB.\n");
                                                                rc=31337;
                                                        }
                                                    } else {
                                                        printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                                                    }
                                                    sqlite3_finalize(pStatement);
                                                    token2 = strtok((char *)data2.c_str(), "@");
                                                    token2 = strtok(NULL, "@");
                                                    token2 = strtok(NULL, "@");
                                                if(atof(token) > atof(token2))
                                                    doit=true;
                                                data.clear();
                                            }
                                            else if (strstr(miss[activeMission].services[j].output[t].c_str(), token))
                                                doit=true;
                                            if(doit){
                                                //printf("L1:if taken\n");
                                                for(uint16_t l = j+1; l <= j+miss[activeMission].services[j].num_conds; l++){ 
                                                    //printf("transacting data for k=%d\n", k);
                                                    TransactData(l);
                                                }
                                            }
                                            else
                                                //printf("L2: if not taken\n");
                                                numstatements[2] +=miss[activeMission].services[j].num_conds+1;
                                                j+=miss[activeMission].services[j].num_conds;
                                            //printf("doneif %d, %d, %d\n", numstatements, miss[activeMission].services[i].num_conds, i);
                                        }else if(miss[activeMission].services[j].name.compare("dowhile")==0){
                                            numstatements[0]=0;
                                            //printf("L2 while detected\n");
                                            while(true){
                                                uint16_t l;
                                                    for(l = j+1; l <= j+miss[activeMission].services[j].num_conds; l++){ 
                                                        TransactData(l);
                                                        //printf("l=%d\n", l);
                                                    }
                                                    data.clear();
                                                    //printf("L2:while detected %d, %d\n", k, miss[activeMission].services[i].num_conds);
                                                    input.clear();
                                                    check.clear();
                                                    int t;
                                                    for(t = 0; t < 10; t++){
                                                        if(!miss[activeMission].services[j].output[t].empty()){
                                                            input=miss[activeMission].services[l-1].output[t];
                                                            strcpy(_data_DB->command, "SELECT ");
                                                            strcat(_data_DB->command, _data_DB->tablename);
                                                            strcat(_data_DB->command, ".* from ");
                                                            strcat(_data_DB->command, _data_DB->tablename);
                                                            strcat(_data_DB->command, " where Tag==");
                                                            sprintf(_data_DB->command, "%s'%s';", _data_DB->command, input.c_str());
                                                            sqlite3_stmt * pStatement;
                                                            rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                                                            if (rc == SQLITE_OK){ 
                                                                if (sqlite3_step(pStatement) == SQLITE_ROW)
                                                                     data = (const char *) sqlite3_column_text(pStatement, 1); 
                                                                else {
                                                                        printf("1 data_DB:: Data not yet in DB.\n");
                                                                        rc=31337;
                                                                }
                                                            } else {
                                                                printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                                                            }
                                                            sqlite3_finalize(pStatement);
                                                            //printf("data=%s\n", data.c_str());
                                                            token = strtok((char *)data.c_str(), "@");
                                                            token = strtok(NULL, "@");
                                                            token = strtok(NULL, "@");
                                                            //printf("data=%s\n", token);
                                                            break;
                                                        }
                                                    }
                                                    //printf("L2:--- %s  %s---\n", miss[activeMission].services[j].output[t].c_str(), token);
                                                    if(strstr(miss[activeMission].services[j].output[t].c_str(), token)){
                                                        //printf("L2:while taken again!\n");
                                                    }
                                                    else {
                                                        //printf("no more while\n");
                                                        break;}
                                            }
                                            j+=miss[activeMission].services[j].num_conds;
                                            //printf("doneif\n");
                                        }
                                        else{
                                            //printf("NO L2 COND!\n");
                                            numstatements[2]=0;
                                            TransactData(j);
                                        }
                                }
                            }
                            else{
                                //printf("L1: if not taken\n");
                            }
                                numstatements[1] +=miss[activeMission].services[k].num_conds+1;
                                k+=miss[activeMission].services[k].num_conds;
                            //printf("doneif %d, %d, %d\n", numstatements, miss[activeMission].services[i].num_conds, i);
                        }else if(miss[activeMission].services[k].name.compare("dowhile")==0){
                            numstatements[0]=0;
                            //printf("L1 while detected\n");
                            while(true){
                                uint16_t j;
                                    for(j = k+1; j <= k+miss[activeMission].services[k].num_conds; j++){ 
                                        TransactData(j);
                                    }
                                    data.clear();
                                    //printf("L1:while detected %d, %d\n", k, miss[activeMission].services[i].num_conds);
                                    input.clear();
                                    check.clear();
                                    int t;
                                    for(t = 0; t < 10; t++){
                                        if(!miss[activeMission].services[k].output[t].empty()){
                                            input=miss[activeMission].services[j-1].output[t];
                                            //printf("input=%s\n", input.c_str());
                                            strcpy(_data_DB->command, "SELECT ");
                                            strcat(_data_DB->command, _data_DB->tablename);
                                            strcat(_data_DB->command, ".* from ");
                                            strcat(_data_DB->command, _data_DB->tablename);
                                            strcat(_data_DB->command, " where Tag==");
                                            sprintf(_data_DB->command, "%s'%s';", _data_DB->command, input.c_str());
                                            sqlite3_stmt * pStatement;
                                            rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                                            if (rc == SQLITE_OK){ 
                                                if (sqlite3_step(pStatement) == SQLITE_ROW)
                                                     data = (const char *) sqlite3_column_text(pStatement, 1); 
                                                else {
                                                        printf("1 data_DB:: Data not yet in DB.\n");
                                                        rc=31337;
                                                }
                                            } else {
                                                printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                                            }
                                            sqlite3_finalize(pStatement);
                                            //printf("data=%s\n", data.c_str());
                                            token = strtok((char *)data.c_str(), "@");
                                            token = strtok(NULL, "@");
                                            token = strtok(NULL, "@");
                                            //printf("data=%s\n", token);
                                            break;
                                        }
                                    }
                                    //printf("L1:--- %s  %s---\n", miss[activeMission].services[k].output[t].c_str(), token);
                                    if(strstr(miss[activeMission].services[k].output[t].c_str(), token)){
                                        //printf("L1:while taken again!\n");
                                    }
                                    else {
                                        //printf("no more while\n");
                                        break;}
                            }
                            k+=miss[activeMission].services[k].num_conds;
                            //printf("doneif\n");
                        }
                        else{
                            //printf("NO L1 COND!\n");
                            numstatements[1]=0;
                            TransactData(k);
                        }
                
                        //numstatements[0] +=miss[activeMission].services[i].num_conds+1;
                        //i+=miss[activeMission].services[i].num_conds;
            //printf("doneif %d, %d, %d\n", numstatements, miss[activeMission].services[i].num_conds, i);
                }
            }
           // else
                //printf("LO if not taken\n");
            numstatements[0] +=miss[activeMission].services[i].num_conds+1;
            i+=miss[activeMission].services[i].num_conds;
            //printf("doneif %d, %d, %d\n", numstatements, miss[activeMission].services[i].num_conds, i);
        }
        else if(miss[activeMission].services[i].name.compare("dowhile")==0)
        {
            numstatements[0]=0;
            //printf("L0 while detected\n");
            while(true){
                uint16_t k;
                    for(k = i+1; k <= i+miss[activeMission].services[i].num_conds; k++){ 
                        TransactData(k);
                    }
                    data.clear();
                    input.clear();
                    check.clear();
                    int t;
                    for(t = 0; t < 10; t++){
                        if(!miss[activeMission].services[i].output[t].empty()){
                            input=miss[activeMission].services[k-1].output[t];
                            //printf("input=%s\n", input.c_str());
                            strcpy(_data_DB->command, "SELECT ");
                            strcat(_data_DB->command, _data_DB->tablename);
                            strcat(_data_DB->command, ".* from ");
                            strcat(_data_DB->command, _data_DB->tablename);
                            strcat(_data_DB->command, " where Tag==");
                            sprintf(_data_DB->command, "%s'%s';", _data_DB->command, input.c_str());
                            sqlite3_stmt * pStatement;
                            rc = sqlite3_prepare_v2(_data_DB->db, _data_DB->command, -1, &pStatement, NULL);
                            if (rc == SQLITE_OK){ 
                                if (sqlite3_step(pStatement) == SQLITE_ROW)
                                     data = (const char *) sqlite3_column_text(pStatement, 1); 
                                else {
                                        printf("1 data_DB:: Data not yet in DB.\n");
                                        rc=31337;
                                }
                            } else {
                                printf("data_DB:: Error executing SQL statement. rc = %i\n%s\n",rc,_data_DB->command);
                            }
                            sqlite3_finalize(pStatement);
                            token = strtok((char *)data.c_str(), "@");
                            token = strtok(NULL, "@");
                            token = strtok(NULL, "@");
                            break;
                        }
                    }
                    //printf("L0:--- %s  %s---\n", miss[activeMission].services[i].output[t].c_str(), token);
                    if(strstr(miss[activeMission].services[i].output[t].c_str(), token)){
                        //printf("L0:while taken again!\n");
                    }
                    else {
                        //printf("no more while\n");
                        break;}
            }
            i+=miss[activeMission].services[i].num_conds;
            //printf("doneif\n");
        }
        else{
            numstatements[0]=0;
            //printf("L0 Neither if nor while\n");
            TransactData(i);}
        i++;
    }
    i=0;
    data.clear();



    if(!shellFound)
    {
        int k = 0;
        while(k<10 && !miss[activeMission].input[k].empty()){
            k++;
        }
        sprintf(buffer, "%d", k);
        SendMessage(shellSocketFD, buffer);
        for(int t = 0; t < k; t++){
            //printf("---%s---\n", miss[activeMission].input[t].c_str());
            SendMessage(shellSocketFD, miss[activeMission].input[t].c_str()); 
            SendMessage(shellSocketFD, "0");
        }
    }


    LOG("ServiceManagementLayer:: Done performing active mission.\n");
    /*
    strcpy(_data_DB->command, "select ");
    strcat(_data_DB->command, _data_DB->tablename);
    strcat(_data_DB->command, ".* from ");
    strcat(_data_DB->command, _data_DB->tablename);
    strcat(_data_DB->command, ";");

    // execute print (select all)  command  
    rc = sqlite3_exec(_data_DB->db, _data_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "SQL error: %s\n", errorMsg);
    printf("database %s, table %s:\n", _data_DB->filename, _data_DB->tablename);
    printf("\n\n\n");*/
}


/* CALLED BY: MessageHandler
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Print a list of the services currently registered and the ID's of the components that registered them
 */
void 
ServiceManagementLayer::ListServices()
{
    strcpy(_services_DB->command, "select ");
    strcat(_services_DB->command, _services_DB->tablename);
    strcat(_services_DB->command, ".* from ");
    strcat(_services_DB->command, _services_DB->tablename);
    strcat(_services_DB->command, ";");

    // execute print (select all)  command    
    char *errorMsg;
    int rc = sqlite3_exec(_services_DB->db, _services_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "SQL error: %s\n", errorMsg);
    printf("database %s, table %s:\n", _services_DB->filename, _services_DB->tablename);
}

/* CALLED BY: Reset
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Clear and reinitialize the mission array, then reload the configuration file
 */
void 
ServiceManagementLayer::ReloadConfiguration()
{
    LOG("ServiceManagementLayer:: Reloading Configuration.\n");
    free(miss);
    miss = new Mission[10];
    for(int i = 0; i < 10; i++)
        miss[i].services = new Service[30];
    LoadConfiguration(_SML_Config, miss);
}

/* CALLED BY: constructor
 * INPUTS: |SML_Config| Address (either relitive or full) of the XML file containing mission data
 *         |mList| Mission array to be modified 
 * OUTPUTS: <none>
 *
 * DESCRIPTION: IMPORTANT - See formatting instructions for correct parsing of data
 * Can currently handle 10 inputs and 10 outputs per service, but easily expandable
 * Also, can handle two layer of nested conditional statements, but could
 * be expanded to meet additional needs.
 * 
 * Components assigned to mission during "set active mission" stage so that
 * components can still continue to register after the configuration is loaded
 */
void 
ServiceManagementLayer::LoadConfiguration(const char *SML_Config, Mission* &mList)
{
    TiXmlElement *pMission;
    TiXmlElement *pService;
    TiXmlElement *pChild0, *pChild1, *pChild2, *pChild3, *pChild4;
    TiXmlHandle hRoot(0);
    printf("ServiceManagementLayer:: Loading Configuration.\n");
    TiXmlDocument doc(".");
    doc.LoadFile(SML_Config);
    bool loadOkay = doc.LoadFile();
    if(!loadOkay)
        printf("Loading SML configuration failed: %s\n", SML_Config);

    TiXmlHandle hDoc(&doc);
    
    pMission = hDoc.FirstChildElement().Element();

    if(!pMission) 
        printf("No valid root!");

    hRoot = TiXmlHandle(pMission);
    pService = pMission->FirstChildElement();
    int32_t mission_num = 0;
    //Iterate through the missions
    for(pChild0 = pMission->FirstChildElement(); pChild0 ; \
        pChild0 = pChild0->NextSiblingElement()) 
    {
        int32_t service_num = 0;
        uint16_t cond_array[] = {0, 0, 0};
        
        for(pChild1  = (pChild0->FirstChildElement())->FirstChildElement(); pChild1; \
            pChild1  = pChild1->NextSiblingElement()) 
        {
            int32_t conditional_0 = service_num;
            for(pChild2 = pChild1->FirstChildElement(); \
                pChild2; pChild2 = pChild2->NextSiblingElement())
            {
                service_num++;
                int32_t conditional_1 = service_num;
                for(pChild3 = pChild2->FirstChildElement(); \
                    pChild3; pChild3 = pChild3->NextSiblingElement())
                {
                    service_num++;
                    int32_t conditional_2 = service_num;
                        for(pChild4 = pChild3->FirstChildElement(); \
                            pChild4; pChild4 = pChild4->NextSiblingElement())
                        {
                            service_num++;
                            if(pChild4->Attribute("name"))
                                mList[mission_num].services[service_num].name = pChild4->Attribute("name");
                            else
                                mList[mission_num].services[service_num].name = pChild4->Value();
                            for(int i = 1; i <= 10; i++) {
                                char buffer[9]="input";
                                sprintf(buffer, "%s%d", buffer, i); 
                                //printf("buffer=%s\n", buffer);
                                if(pChild4->Attribute(buffer))
                                    mList[mission_num].services[service_num].input[i-1] = pChild4->Attribute(buffer);
                                char buffer2[9]="output";
                                sprintf(buffer2, "%s%d", buffer2, i); 
                                if(pChild4->Attribute(buffer2))
                                    mList[mission_num].services[service_num].output[i-1] = pChild4->Attribute(buffer2);
                            }
                            if(pChild4->Attribute("parameter"))
                                mList[mission_num].services[service_num].parameter = pChild4->Attribute("parameter");
                            cond_array[2]++;
                        }
                        if(!strcmp(pChild3->Value(), "shell") || conditional_2 != service_num) {
                            mList[mission_num].services[conditional_2].name = pChild3->Value();
                        }
                        else{
                            mList[mission_num].services[service_num].name = pChild3->Attribute("name");
                        }
                        for(int i = 1; i <= 10; i++) {
                            char buffer[9]="input";
                            sprintf(buffer, "%s%d", buffer, i); 
                            if(pChild3->Attribute(buffer))
                                mList[mission_num].services[conditional_2].input[i-1] = pChild3->Attribute(buffer);
                            char buffer2[9]="output";
                            sprintf(buffer2, "%s%d", buffer2, i); 
                            if(pChild3->Attribute(buffer2))
                                mList[mission_num].services[conditional_2].output[i-1] = pChild3->Attribute(buffer2);
                        }
                            if(pChild3->Attribute("parameter"))
                                mList[mission_num].services[conditional_2].parameter = pChild3->Attribute("parameter");
                        mList[mission_num].services[conditional_2].num_conds = cond_array[2];
                        cond_array[1]+=cond_array[2]+1;
                        cond_array[2] = 0;


                }
                if(!strcmp(pChild2->Value(), "shell") || conditional_1 != service_num) {
                    mList[mission_num].services[conditional_1].name = pChild2->Value();
                }
                else{
                    mList[mission_num].services[service_num].name = pChild2->Attribute("name");
                }
                for(int i = 1; i <= 10; i++) {
                    char buffer[9]="input";
                    sprintf(buffer, "%s%d", buffer, i); 
                    if(pChild2->Attribute(buffer))
                        mList[mission_num].services[conditional_1].input[i-1] = pChild2->Attribute(buffer);
                    char buffer2[9]="output";
                    sprintf(buffer2, "%s%d", buffer2, i); 
                    if(pChild2->Attribute(buffer2))
                        mList[mission_num].services[conditional_1].output[i-1] = pChild2->Attribute(buffer2);
                }
                    if(pChild2->Attribute("parameter"))
                        mList[mission_num].services[conditional_1].parameter = pChild2->Attribute("parameter");

                mList[mission_num].services[conditional_1].num_conds = cond_array[1];
                cond_array[0]+=cond_array[1]+1;
                cond_array[1] = 0;
            }
            
            if(!strcmp(pChild1->Value(), "shell") || conditional_0 != service_num) {
                mList[mission_num].services[conditional_0].name = pChild1->Value();
            }
            else{
                mList[mission_num].services[conditional_0].name = pChild1->Attribute("name");
            }
                for(int i = 1; i <= 10; i++) {
                    char buffer[9]="input";
                    sprintf(buffer, "%s%d", buffer, i); 
                    if(pChild1->Attribute(buffer))
                        mList[mission_num].services[conditional_0].input[i-1] = pChild1->Attribute(buffer);
                    char buffer2[9]="output";
                    sprintf(buffer2, "%s%d", buffer2, i); 
                    if(pChild1->Attribute(buffer2))
                        mList[mission_num].services[conditional_0].output[i-1] = pChild1->Attribute(buffer2);
                }
                if(pChild1->Attribute("parameter"))
                    mList[mission_num].services[conditional_0].parameter = pChild1->Attribute("parameter");
            mList[mission_num].services[conditional_0].num_conds = cond_array[0];
            cond_array[0] = 0;
            service_num++;
        }
        
        mList[mission_num].numServices = service_num;
        mList[mission_num].name = pChild0->Attribute("name");
        mList[mission_num].missionID = atoi(pChild0->Attribute("id"));
        for(int i = 1; i <= 10; i++) {
            char buffer[9]="param";
            sprintf(buffer, "%s%d", buffer, i); 
            if(pChild0->Attribute(buffer)){
                mList[mission_num].input[i-1] = pChild0->Attribute(buffer);
            }
        }
        mission_num++;
    }
    LOG("ServiceManagementLayer:: Done Loading Configuration\n");
}

/* CALLED BY: MessageHandler
 * INPUTS: |ID| The ID number of the engine to be registered
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Sends a registration message onto the shell and sends the ACK back to the component
 */
void
ServiceManagementLayer::RegisterCognitiveEngine(int32_t ID)
{
    SendMessage(shellSocketFD, "register_engine_cognitive");

    LOG("ServiceManagementLayer:: CE registration message forwarded to shell.\n");
    char buffer[256];
    memset(buffer, 0, 256);
    ReadMessage(shellSocketFD, buffer);
    SendMessage(CE_List[ID].FD, buffer);

    TransferRadioConfiguration(ID);
    memset(buffer, 0, 256);
    TransferExperience(ID);
    memset(buffer, 0, 256);
    numberOfCognitiveEngines++;
    CE_Present = true;
}

/* CALLED BY: MessageHandler
 * INPUTS: |ID| The ID number of the engine to have it's services deregistered
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Deletes individual services from the DB
 * NOTE THAT this function only needs to be called if service deregistration is going
 * to be done at a different time than component deregistration; it is handled
 * more efficiently and directly during that deregistration process.
 */
void 
ServiceManagementLayer::DeregisterServices(int32_t ID)
{
    char buffer[256];
    memset(buffer, 0, 256);
    ReadMessage(CE_List[ID].FD, buffer); 
    strcpy(_services_DB->command, "DELETE FROM ");
    strcat(_services_DB->command, _services_DB->tablename);
    strcat(_services_DB->command, " WHERE ID_Num IN (SELECT");
    sprintf(_services_DB->command, " %s %d",_services_DB->command, ID);
    strcat(_services_DB->command, " FROM ");
    strcat(_services_DB->command, _services_DB->tablename);
    strcat(_services_DB->command, " WHERE Service_Name");
    strcat(_services_DB->command, "==");
    sprintf(_services_DB->command, "%s'%s');", _services_DB->command, buffer);
    char *errorMsg;
    int rc = sqlite3_exec(_services_DB->db, _services_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "SQL error: %s\n", errorMsg);
}

/* CALLED BY: MessageHandler
 * INPUTS: |ID| The ID number of the engine to have it's services deregistered
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Deletes the contact info for the cognitive engine, forwards a deregistration message to the shell
 * Also, deletes the services from the DB
 */
void 
ServiceManagementLayer::DeregisterCognitiveEngine(int32_t ID)
{
    LOG("ServiceManagementLayer:: CE deregistration message forwarded to shell.\n");

    numberOfCognitiveEngines--;
    if(numberOfCognitiveEngines == 0)
        CE_Present = false;

    SendMessage(shellSocketFD, "deregister_engine_cognitive");
    char buffer[256];
    memset(buffer, 0, 256);
    ReadMessage(shellSocketFD, buffer);
    SendMessage(CE_List[ID].FD, buffer);
    if(strcmp("deregister_ack", buffer) != 0) {
        ERROR(1, "SML:: Failed to close CE socket\n");
    }

    //Deregister the services
    strcpy(_services_DB->command, "DELETE FROM ");
    strcat(_services_DB->command, _services_DB->tablename);
    strcat(_services_DB->command, " WHERE ");
    strcat(_services_DB->command, "ID_Num");
    strcat(_services_DB->command, "==");
    sprintf(_services_DB->command, "%s%d;", _services_DB->command, ID);
    char *errorMsg;
    int rc = sqlite3_exec(_services_DB->db, _services_DB->command, callback, 0, &errorMsg);
    if( rc!=SQLITE_OK && rc!=101 )
        fprintf(stderr, "SQL error: %s\n", errorMsg);


    CE_List[ID].FD = -1;
    CE_List[ID].ID_num = -1;

    LOG("Cognitive Radio Shell:: CE Socket closed for engine #%d.\n", ID);
}


/* CALLED BY: test class
 * INPUTS: <none>
 * OUTPUTS: <none>
 *
 * DESCRIPTION: Sets up a server socket and listens for communication on either that or the shell socket
 */
void
ServiceManagementLayer::StartSMLServer()
{
    //printf("Ready for CE Signal! (registration done)\n");
    struct timeval selTimeout;
    int32_t running = 1;
    int32_t port, rc, new_sd = 1;
    int32_t desc_ready = 1;
                //If there is, call the MessageHandler with the Shell_Msg code of -1
    fd_set sockSet, shellSet;

    cogEngSrv = CreateTCPServerSocket(SMLport);
    int32_t maxDescriptor = cogEngSrv;

    if(InitializeTCPServerPort(cogEngSrv) == -1)
        ERROR(1,"Error initializing primary port\n");

    while (running) {
        /* Zero socket descriptor vector and set for server sockets */
        /* This must be reset every time select() is called */
        FD_ZERO(&sockSet);
        FD_SET(cogEngSrv, &sockSet);
        for(uint16_t k = 0; k < Current_ID; k++){
            if(CE_List[k].ID_num != -1)
                FD_SET(CE_List[k].FD, &sockSet);
        }
            //printf("k=%d, CID=%d\n", k, CE_List[k].FD);

        /* Timeout specification */
        /* This must be reset every time select() is called */
        selTimeout.tv_sec = 0;       /* timeout (secs.) */
        selTimeout.tv_usec = 0;            /* 0 microseconds */
        //Changed both to zero so that select will check messages from the shell instead of blocking
        //when there is no command from the CE's to be processed

        //Check if there is a message on the socket waiting to be read
        rc = select(maxDescriptor + 1, &sockSet, NULL, NULL, &selTimeout); 
        //printf("rc=%d\n", rc);
        if(rc == 0){
            //LOG("No echo requests for %i secs...Server still alive\n", timeout);
        
            FD_ZERO(&shellSet);
            FD_SET(shellSocketFD, &shellSet);
            selTimeout.tv_sec = 0;
            selTimeout.tv_usec = 0;
            //Check if there is a message on the shell socket ready to be processed
            select(shellSocketFD + 1, &shellSet, NULL, NULL, &selTimeout);
            //printf("rc2=%d\n", rc2);
                //If there is, call the MessageHandler with the Shell_Msg code of -1
            if(FD_ISSET(shellSocketFD, &shellSet)){
                //printf("shell_msg, %d\n", rc2);
                MessageHandler(-1);}
        }
        else { 
            desc_ready = rc;
            for(port = 0; port <= maxDescriptor && desc_ready > 0; port++) {
                if(FD_ISSET(port, &sockSet)) {
                    desc_ready -= 1;

                    //Check if request is new or on an existing open descriptor
                    if(port == cogEngSrv) { 
                        //If new, assign it a descriptor and give it an ID
                        new_sd = AcceptTCPConnection(port);
                         
                        if(new_sd < 0) 
                            break;

                        CE_List[Current_ID].FD = new_sd;
                        CE_List[Current_ID].ID_num = Current_ID;
                        MessageHandler(Current_ID);
                        Current_ID++;
        
                        FD_SET(new_sd,&sockSet);
                        if(new_sd > maxDescriptor) 
                           maxDescriptor = new_sd;
                    } 
                    else {
                        //If old, figure out which ID it coresponds to and handle it accordingly
                        for(uint16_t z = 0; z < Current_ID; z++)
                        {
                                if(CE_List[z].FD == port){
                                        MessageHandler(z);}
                        }
                    }
                }
            }
        }
    }        

    /* Close sockets */
    close(cogEngSrv);

    //delete &cogEngSrv;
    return;
}