root/ossieparser/trunk/orb_wrap.cpp @ 10

#include "ORB_WRAP.h"

ORB_WRAP::ORB_WRAP() 
{
        if( CORBA::is_nil( ORB_WRAP::orb ) )
                ORB_WRAP::orb = CORBA::ORB_init( ORB_WRAP::vars, NULL );
        init();
}

ORB_WRAP::ORB_WRAP( int argc, char** argv ) 
{
        if( CORBA::is_nil( ORB_WRAP::orb ) )
                ORB_WRAP::orb = CORBA::ORB_init( argc, argv );
        init();
}

void ORB_WRAP::init()
{
        try
        {
                CORBAOBJ _poaObj = CORBA::Object::_nil();

                while( CORBA::is_nil( _poaObj ) )
                        _poaObj = orb->resolve_initial_references("RootPOA");

                root_poa = PortableServer::POA::_narrow( _poaObj.in() );
                assert(!CORBA::is_nil(root_poa));
                mgr = root_poa->the_POAManager();
                mgr->activate();                

                //CORBA::PolicyList policy_list;

                CORBAOBJ _nameObj = CORBA::Object::_nil();
                
                while( CORBA::is_nil( _nameObj ) )
                        _nameObj = orb->resolve_initial_references( "NameService" );
                nc = CosNaming::NamingContext::_narrow( _nameObj.in());
                assert(!CORBA::is_nil(nc));
                
                ACE_OS::printf( "ORB Initialization Successful\n" );
                vars += 1;
        } catch( CORBA::Exception & ) {
                ACE_OS::printf( "[ORB_DEV::CTOR] ORB Initialization Failed\n" );
        }
}

CORBAOBJ ORB_WRAP::lookup( const char* _name )
{
        CosNaming::Name cosName;

        getCosName( cosName, _name );

        try
        {
                return nc->resolve( cosName );
        } catch( CORBA::Exception& ) {
                ACE_OS::printf( "[ORB_WRAP::lookup] Lookup for *s failed\n", _name );
        }

        return NULL;
}

void ORB_WRAP::bindObj( CORBAOBJ & _obj, const char* _name )
{
        CosNaming::Name cosName;

        getCosName( cosName, _name );

        try
        {
                nc->rebind( cosName, _obj.in() );
        } catch( CORBA::Exception& ) {
                ACE_OS::printf( "[ORB_WRAP::bindObj] Bind for *s failed\n", _name );
        }
}

PortableServer::POA_var ORB_WRAP::getPOA() const { return this->root_poa; }

CosNaming::NamingContext_var ORB_WRAP::getNamingContext() const { return this->nc; }

void ORB_WRAP::anyType( const char* _type, const char* _value, CORBA::Any &myRtn )
{
        CORBA::Any toRtn;
        char* ptr;

//              int argc = 0;
//              CORBA::ORB_var tmp = CORBA::ORB_init( argc, NULL );

        if( strcmp( _type, "double" ) == 0 ) {
                CORBA::Double val = strtod( _value, NULL );
                myRtn <<= val;
        } else if( strcmp( _type, "ulong" ) == 0 ) {
                CORBA::ULong val = strtoul( _value, &ptr, 0 );
                myRtn <<= val;
        } else if( strcmp( _type, "long" ) == 0 ) {
                CORBA::Long val = strtol( _value, &ptr, 0 );
                myRtn <<= val;
        } else if( strcmp( _type, "short" ) == 0 ) {
                CORBA::Short val = (short)atoi( _value );
                myRtn <<= val;
        } else if( strcmp( _type, "string" ) == 0 ) {
                myRtn <<= CORBA::string_dup( _value );
        } else { }

        //return toRtn;
        return;
}

bool ORB_WRAP::isValidType( CORBA::Any _val1, CORBA::Any _val2 )
{
        CORBA::TypeCode_var tc1 = _val1.type();
        CORBA::TypeCode_var tc2 = _val2.type();

        if( tc1->equal( tc2 ) )
                return true;
        else return false;
}

void ORB_WRAP::getCosName( CosNaming::Name& cosName, const char* _name )
{
        int _cnt = 0;

        string _context;

        char delim = '/';

        istringstream CNT( _name );

        getline( CNT, _context, delim );

        while( getline( CNT, _context, delim ) )
                _cnt++;

//              if( _cnt == 0 )
//                      throw;

        // reset the streams get pointer to the beginning
        istringstream NAME( _name );

//      CosNaming::Name cosName;

        cosName.length(_cnt);

        getline( NAME, _context, delim );

        for( int i = 0; i < _cnt; i++ )
        {
                getline( NAME, _context, delim );

                if( _context != "" )
                        cosName[ i ].id = CORBA::string_dup( _context.c_str() );
        }
}

bool ORB_WRAP::orbIsWorking = false;

int ORB_WRAP::vars = 0;

CORBA::ORB_var ORB_WRAP::orb = CORBA::ORB::_nil();