1 // SALOME TestContainer : test of container creation and its life cycle
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
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.
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.
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
20 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : SALOME_TestComponent_i.cxx
25 // Author : Paul RASCLE, EDF - MARC TAJCHMAN, CEA
29 #define private protected
30 #include "utilities.h"
31 #include "SALOME_TestComponent_i.hxx"
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)
44 MESSAGE("activate object");
46 _id = _poa->activate_object(_thisObj);
50 Engines_TestComponent_i::Engines_TestComponent_i()
54 Engines_TestComponent_i::~Engines_TestComponent_i()
56 MESSAGE("~Engines_TestComponent_i()");
59 char* Engines_TestComponent_i::Coucou(CORBA::Long L)
62 sprintf(s, "TestComponent_i : L = %ld", (long) L);
65 return CORBA::string_dup(s);
68 void Engines_TestComponent_i::Setenv()
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++)
75 std::string cle((*it).first);
76 if ((*it).second.type()->kind() == CORBA::tk_string)
79 (*it).second >>= value;
80 //CCRT porting : setenv not defined in stdlib.h
84 //char* cast because 1st arg of linux putenv function is not a const char* !!!
85 int ret=putenv((char *)s.c_str());
87 //int ret = setenv(cle.c_str(), value, overwrite);
88 MESSAGE("--- setenv: "<<cle<<" = "<< value);
91 MESSAGE("read environment associated with keys in map _fieldsDict");
92 for (it = _fieldsDict.begin(); it != _fieldsDict.end(); it++)
94 std::string cle((*it).first);
95 char* valenv= getenv(cle.c_str());
97 MESSAGE("--- getenv: "<<cle<<" = "<< valenv);
103 PortableServer::ObjectId * SalomeTestComponentEngine_factory(
105 PortableServer::POA_ptr poa,
106 PortableServer::ObjectId * contId,
107 const char *instanceName,
108 const char *interfaceName)
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() ;