src/ATOMSOLV/ATOMSOLV.cxx

   1 // Copyright (C) 2007-2016  CEA/DEN, EDF R&D, OPEN CASCADE
   2 //
   3 // This library is free software; you can redistribute it and/or
   4 // modify it under the terms of the GNU Lesser General Public
   5 // License as published by the Free Software Foundation; either
   6 // version 2.1 of the License, or (at your option) any later version.
   7 //
   8 // This library is distributed in the hope that it will be useful,
   9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11 // Lesser General Public License for more details.
  12 //
  13 // You should have received a copy of the GNU Lesser General Public
  14 // License along with this library; if not, write to the Free Software
  15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  16 //
  17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
  18 //
  19
  20 #include "ATOMSOLV.hxx"
  21 #include "ATOMSOLV_version.h"
  22 #include "utilities.h"
  23
  24 #include <string>
  25
  26 using namespace std;
  27
  28
  29 ATOMSOLV::ATOMSOLV(CORBA::ORB_ptr orb,
  30         PortableServer::POA_ptr poa,
  31         PortableServer::ObjectId * contId,
  32         const char *instanceName,
  33         const char *interfaceName) :
  34   Engines_Component_i(orb, poa, contId, instanceName, interfaceName)
  35 {
  36   MESSAGE("activate object");
  37   _thisObj = this ;
  38   _id = _poa->activate_object(_thisObj);
  39 }
  40
  41 ATOMSOLV::~ATOMSOLV()
  42 {
  43 }
  44
  45 CORBA::Boolean ATOMSOLV::setData( const ATOMSOLV_ORB::TMoleculeList& theData )
  46 {
  47   const int n = theData.length();
  48   ATOMSOLV_ORB::TMoleculeList_var data = new ATOMSOLV_ORB::TMoleculeList();
  49   data->length( n );
  50   for ( int i = 0; i < n; i++ )
  51     data[ i ] = theData[ i ];
  52
  53   //  printf( " -- ATOMSOLV::setData() length = %d\n", data->length() );
  54   myData = data._retn();
  55
  56   return (bool)n;
  57 }
  58
  59 CORBA::Boolean ATOMSOLV::getData( ATOMSOLV_ORB::TMoleculeList_out outData )
  60 {
  61   ATOMSOLV_ORB::TMoleculeList* data = myData;
  62   //    printf( " -- ATOMSOLV::getData() length = %d\n", data->length() );
  63   const int n = data->length();
  64   outData = new ATOMSOLV_ORB::TMoleculeList();
  65   outData->length( n );
  66   for ( int i = 0; i < n; i++ )
  67     (*outData)[ i ] = (*data)[ i ];
  68   return true;
  69 }
  70
  71 CORBA::Boolean ATOMSOLV::processData()
  72 {
  73   ATOMSOLV_ORB::TMoleculeList* data = myData;
  74   for ( int i = 0, n = data->length(); i < n; i++ )
  75     (*data)[i].temperature = rand();
  76   return true;
  77 }
  78
  79 char* ATOMSOLV::getVersion()
  80 {
  81 #if defined(ATOMSOLV_DEVELOPMENT)
  82   return CORBA::string_dup(ATOMSOLV_VERSION_STR"dev");
  83 #else
  84   return CORBA::string_dup(ATOMSOLV_VERSION_STR);
  85 #endif
  86 }
  87
  88 extern "C"
  89 {
  90   PortableServer::ObjectId * ATOMSOLVEngine_factory(
  91                                CORBA::ORB_ptr orb,
  92                                PortableServer::POA_ptr poa,
  93                                PortableServer::ObjectId * contId,
  94                                const char *instanceName,
  95                                const char *interfaceName)
  96   {
  97     MESSAGE("PortableServer::ObjectId * ATOMSOLVEngine_factory()");
  98     SCRUTE(interfaceName);
  99     ATOMSOLV * myATOMSOLV
 100       = new ATOMSOLV(orb, poa, contId, instanceName, interfaceName);
 101     return myATOMSOLV->getId() ;
 102   }
 103 }