src/TestContainer/SALOME_TestComponent_i.cxx

   1 //  SALOME TestContainer : test of container creation and its life cycle
   2 //
   3 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
   4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
   5 //
   6 //  This library is free software; you can redistribute it and/or
   7 //  modify it under the terms of the GNU Lesser General Public
   8 //  License as published by the Free Software Foundation; either
   9 //  version 2.1 of the License.
  10 //
  11 //  This library is distributed in the hope that it will be useful,
  12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 //  Lesser General Public License for more details.
  15 //
  16 //  You should have received a copy of the GNU Lesser General Public
  17 //  License along with this library; if not, write to the Free Software
  18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  19 //
  20 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
  21 //
  22 //
  23 //
  24 //  File   : SALOME_TestComponent_i.cxx
  25 //  Author : Paul RASCLE, EDF - MARC TAJCHMAN, CEA
  26 //  Module : SALOME
  27 //  $Header$
  28
  29 #define private protected
  30 #include "utilities.h"
  31 #include "SALOME_TestComponent_i.hxx"
  32 #include <stdio.h>
  33 #include <cstdlib>
  34 #include <map>
  35 using namespace std;
  36
  37 Engines_TestComponent_i::Engines_TestComponent_i(CORBA::ORB_ptr orb,
  38                                                  PortableServer::POA_ptr poa,
  39                                                  PortableServer::ObjectId * contId,
  40                                                  const char *instanceName,
  41                                                  const char *interfaceName) :
  42   Engines_Component_i(orb, poa, contId, instanceName, interfaceName)
  43 {
  44   MESSAGE("activate object");
  45   _thisObj = this ;
  46   _id = _poa->activate_object(_thisObj);
  47   SCRUTE(pd_refCount);
  48 }
  49
  50 Engines_TestComponent_i::Engines_TestComponent_i()
  51 {
  52 }
  53
  54 Engines_TestComponent_i::~Engines_TestComponent_i()
  55 {
  56   MESSAGE("~Engines_TestComponent_i()");
  57 }
  58
  59 char* Engines_TestComponent_i::Coucou(CORBA::Long L)
  60 {
  61   char s[100];
  62   sprintf(s, "TestComponent_i : L = %ld", (long) L);
  63   SCRUTE(pd_refCount);
  64
  65   return CORBA::string_dup(s);
  66 }
  67
  68 void Engines_TestComponent_i::Setenv()
  69 {
  70   bool overwrite = true;
  71   map<std::string,CORBA::Any>::iterator it;
  72   MESSAGE("set environment associated with keys in map _fieldsDict");
  73   for (it = _fieldsDict.begin(); it != _fieldsDict.end(); it++)
  74     {
  75       std::string cle((*it).first);
  76       if ((*it).second.type()->kind() == CORBA::tk_string)
  77         {
  78           const char* value;
  79           (*it).second >>= value;
  80           //CCRT porting : setenv not defined in stdlib.h
  81           std::string s(cle);
  82           s+='=';
  83           s+=value;
  84           //char* cast because 1st arg of linux putenv function is not a const char* !!!
  85           int ret=putenv((char *)s.c_str());
  86           //End of CCRT porting
  87           //int ret = setenv(cle.c_str(), value, overwrite);
  88           MESSAGE("--- setenv: "<<cle<<" = "<< value);
  89         }
  90     }
  91   MESSAGE("read environment associated with keys in map _fieldsDict");
  92   for (it = _fieldsDict.begin(); it != _fieldsDict.end(); it++)
  93     {
  94       std::string cle((*it).first);
  95       char* valenv= getenv(cle.c_str());
  96       if (valenv)
  97         MESSAGE("--- getenv: "<<cle<<" = "<< valenv);
  98     }
  99 }
 100
 101 extern "C"
 102 {
 103   PortableServer::ObjectId * SalomeTestComponentEngine_factory(
 104                                  CORBA::ORB_ptr orb,
 105                                  PortableServer::POA_ptr poa,
 106                                  PortableServer::ObjectId * contId,
 107                                  const char *instanceName,
 108                                  const char *interfaceName)
 109   {
 110     MESSAGE("PortableServer::ObjectId * TestComponent_factory()");
 111     SCRUTE(interfaceName);
 112     Engines_TestComponent_i * myTestComponent
 113       = new Engines_TestComponent_i(orb, poa, contId, instanceName, interfaceName);
 114     return myTestComponent->getId() ;
 115   }
 116 }
 117