1 // Copyright (C) 2007-2010 CEA/DEN, EDF R&D, OPEN CASCADE
3 // Copyright (C) 2003-2007 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.salome-platform.org/ or email : webmaster.salome@opencascade.com
23 // SALOME TestContainer : test of container creation and its life cycle
24 // File : SALOME_TestComponent_i.cxx
25 // Author : Paul RASCLE, EDF - MARC TAJCHMAN, CEA
30 # define private protected
32 #include "utilities.h"
33 #include "SALOME_TestComponent_i.hxx"
38 Engines_TestComponent_i::Engines_TestComponent_i(CORBA::ORB_ptr orb,
39 PortableServer::POA_ptr poa,
40 PortableServer::ObjectId * contId,
41 const char *instanceName,
42 const char *interfaceName) :
43 Engines_Component_i(orb, poa, contId, instanceName, interfaceName)
45 MESSAGE("activate object");
47 _id = _poa->activate_object(_thisObj);
48 //does not work with 4.0.6 (too bad)
49 //SCRUTE(_pd_refCount);
50 //SCRUTE(_refcount_value());
53 Engines_TestComponent_i::Engines_TestComponent_i()
57 Engines_TestComponent_i::~Engines_TestComponent_i()
59 MESSAGE("~Engines_TestComponent_i()");
62 char* Engines_TestComponent_i::Coucou(CORBA::Long L)
65 sprintf(s, "TestComponent_i : L = %ld", (long) L);
66 //does not work with 4.0.6 (too bad)
67 //SCRUTE(_pd_refCount);
68 //SCRUTE(_refcount_value());
70 return CORBA::string_dup(s);
73 void Engines_TestComponent_i::Setenv()
75 // bool overwrite = true;
76 std::map<std::string,CORBA::Any>::iterator it;
77 MESSAGE("set environment associated with keys in map _fieldsDict");
78 for (it = _fieldsDict.begin(); it != _fieldsDict.end(); it++)
80 std::string cle((*it).first);
81 if ((*it).second.type()->kind() == CORBA::tk_string)
84 (*it).second >>= value;
85 //CCRT porting : setenv not defined in stdlib.h
89 //char* cast because 1st arg of linux putenv function is not a const char* !!!
90 putenv((char *)s.c_str());
92 //int ret = setenv(cle.c_str(), value, overwrite);
93 MESSAGE("--- setenv: "<<cle<<" = "<< value);
96 MESSAGE("read environment associated with keys in map _fieldsDict");
97 for (it = _fieldsDict.begin(); it != _fieldsDict.end(); it++)
99 std::string cle((*it).first);
100 char* valenv= getenv(cle.c_str());
102 MESSAGE("--- getenv: "<<cle<<" = "<< valenv);
108 PortableServer::ObjectId * SalomeTestComponentEngine_factory(
110 PortableServer::POA_ptr poa,
111 PortableServer::ObjectId * contId,
112 const char *instanceName,
113 const char *interfaceName)
115 MESSAGE("PortableServer::ObjectId * TestComponent_factory()");
116 SCRUTE(interfaceName);
117 Engines_TestComponent_i * myTestComponent
118 = new Engines_TestComponent_i(orb, poa, contId, instanceName, interfaceName);
119 return myTestComponent->getId() ;