source: issm/trunk/src/c/Container/Options.cpp@ 13975

/*
 * \file Options.c
 * \brief: implementation of the Options class, derived from DataSet class
 */

/*Headers: {{{*/
#ifdef HAVE_CONFIG_H
        #include <config.h>
#else
#error "Cannot compile with HAVE_CONFIG_H symbol! run configure first!"
#endif

#include <vector>
#include <algorithm>
#include <cstring>

#include "./DataSet.h"
#include "../shared/shared.h"
#include "../io/io.h"
#include "../include/include.h"
#include "../classes/classes.h"
#include "../shared/shared.h"
#include "../EnumDefinitions/EnumDefinitions.h"
#include "../io/io.h"
/*}}}*/

/*Object constructors and destructor*/
/*FUNCTION Options::Options(){{{*/
Options::Options(){
        return;
}
/*}}}*/
/*FUNCTION Options::~Options(){{{*/
Options::~Options(){
        return;
}
/*}}}*/

/*Object management*/
/*FUNCTION Options::AddOption{{{*/
int  Options::AddOption(Option* in_option){

        char* name=NULL;

        vector<Object*>::iterator object;
        Option* option=NULL;

        /*In debugging mode, check that the option is not a NULL pointer*/
        _assert_(in_option);

        /*Also, check the option name*/
        name=in_option->Name();

        if(!name) _error_("input option has an empty name");
        if(strchr(name,'.')) _error_("Option \"" << name << "\" has a protected character \".\"");
        if(strchr(name,'[')) _error_("Option \"" << name << "\" has a protected character \"[\"");
        if(strchr(name,']')) _error_("Option \"" << name << "\" has a protected character \"]\"");

        /*Finally, check that no option of the same name already exists in the dataset*/
        for(object=objects.begin();object<objects.end();object++){

                option=dynamic_cast<Option*>(*object);
                if (!strcmp(option->Name(),name)){
                        _error_("Options \"" << name << "\" found multiple times");
                        break;
                }
        }

        /*OK, all checks went well, add option to dataset*/
        this->AddObject(in_option);

        return 1;
}
/*}}}*/
/*FUNCTION Options::GetOption{{{*/
Option* Options::GetOption(const char* name){

        vector<Object*>::iterator object;
        Option* option=NULL;

        /*Go through options and find option: */
        for ( object=objects.begin() ; object < objects.end(); object++ ){

                option=dynamic_cast<Option*>(*object);
                if (!strncmp(name,option->Name(),strlen(option->Name()))){

                        /*OK, now do we have a complete name? If not, it is a cell or a structure, we need to go further*/
                        if(!strcmp(name,option->Name())){
                                return option;
                        }
                        else{
                                /*If the object is a Cell, recursive call to its options*/ 
                                if(option->ObjectEnum()==OptionCellEnum){
                                        GenericOption<Options*>* celloption=(GenericOption<Options*>*)option;
                                        return celloption->value->GetOption(name);
                                }
                                /*If the object is a Struct loop over its size and recursive call*/
                                else if(option->ObjectEnum()==OptionStructEnum){
                                        for(int i=0;i<option->NumEl();i++){
                                                GenericOption<Options**>* structoption=(GenericOption<Options**>*)option;
                                                _assert_(structoption->value[i]);
                                                return structoption->value[i]->GetOption(name);
                                        }
                                }
                                /*Else: not supported*/
                                else{
                                        _error_("Cannot recover field \"" << name << "\" for an option of type " << EnumToStringx(option->ObjectEnum()));
                                }
                        }
                }
        }

        /*Option not found return NULL pointer*/
        return NULL;
}
/*}}}*/