src/MEDCouplingCorba/Client/MEDCouplingFieldOverTimeClient.cxx

   1 // Copyright (C) 2007-2012  CEA/DEN, EDF R&D
   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.
   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 "MEDCouplingFieldOverTimeClient.hxx"
  21 #include "MEDCouplingMultiFieldsClient.hxx"
  22 #include "MEDCouplingFieldTemplate.hxx"
  23 #include "MEDCouplingDefinitionTime.hxx"
  24 #include "MEDCouplingMeshClient.hxx"
  25 #include "DataArrayDoubleClient.hxx"
  26 #include "MEDCouplingMemArray.hxx"
  27 #include "MEDCouplingMesh.hxx"
  28
  29 #include <vector>
  30
  31 using namespace ParaMEDMEM;
  32
  33 MEDCouplingFieldOverTimeClient::MEDCouplingFieldOverTimeClient(SALOME_MED::MEDCouplingFieldOverTimeCorbaInterface_ptr field):_df(0)
  34 {
  35   _field_ptr=SALOME_MED::MEDCouplingFieldOverTimeCorbaInterface::_duplicate(field);
  36   _field_ptr->Register();
  37 }
  38
  39 MEDCouplingFieldOverTimeClient::~MEDCouplingFieldOverTimeClient()
  40 {
  41   _field_ptr->UnRegister();
  42   delete _df;
  43 }
  44
  45 MEDCouplingFieldOverTimeClient *MEDCouplingFieldOverTimeClient::New(SALOME_MED::MEDCouplingFieldOverTimeCorbaInterface_ptr fieldPtr)
  46 {
  47   MEDCouplingFieldOverTimeClient *ret=new MEDCouplingFieldOverTimeClient(fieldPtr);
  48   MEDCouplingMultiFieldsClient::BuildFullMultiFieldsCorbaFetch(ret,fieldPtr);
  49   return ret;
  50 }
  51
  52 void MEDCouplingFieldOverTimeClient::retrieveFieldTemplates()
  53 {
  54   SALOME_TYPES::ListOfLong *tinyL=0;
  55   SALOME_TYPES::ListOfDouble *tinyD=0;
  56   SALOME_TYPES::ListOfString *tinyS=0;
  57   //
  58   CORBA::Long nbOfArrays;
  59   CORBA::Long nbOfFields;
  60   CORBA::Long nbOfMeshes=_field_ptr->getMainTinyInfo(tinyL,tinyD,nbOfArrays,nbOfFields);
  61   int tinyLgth=tinyL->length();
  62   std::vector<int> mainI(tinyLgth);
  63   for(int i=0;i<tinyLgth;i++)
  64     mainI[i]=(*tinyL)[i];
  65   delete tinyL; tinyL=0;
  66   tinyLgth=tinyD->length();
  67   std::vector<double> mainD(tinyLgth);
  68   for(int i=0;i<tinyLgth;i++)
  69     mainD[i]=(*tinyD)[i];
  70   delete tinyD; tinyD=0;
  71   //
  72   std::vector<MEDCouplingMesh *> cppms(nbOfMeshes);
  73   //
  74   std::vector<DataArrayDouble *> cppdas(nbOfArrays);
  75   //
  76   std::vector<MEDCouplingFieldTemplate *> fts(nbOfFields);
  77   for(CORBA::Long i=0;i<nbOfFields;i++)
  78     {
  79       _field_ptr->getTinyInfo(i,tinyL,tinyD,tinyS);
  80       int tinyLgth=tinyL->length();
  81       std::vector<int> tinyLV(tinyLgth);
  82       for(int j=0;j<tinyLgth;j++)
  83         tinyLV[j]=(*tinyL)[j];
  84       delete tinyL; tinyL=0;
  85       //
  86       tinyLgth=tinyD->length();
  87       std::vector<double> tinyLD(tinyLgth);
  88       for(int j=0;j<tinyLgth;j++)
  89         tinyLD[j]=(*tinyD)[j];
  90       delete tinyD; tinyD=0;
  91       //
  92       tinyLgth=tinyS->length();
  93       std::vector<std::string> tinyLS(tinyLgth);
  94       for(int j=0;j<tinyLgth;j++)
  95         tinyLS[j]=(*tinyS)[j];
  96       delete tinyS; tinyS=0;
  97       TypeOfField type=(TypeOfField) tinyLV[0];
  98       MEDCouplingFieldTemplate *f1=MEDCouplingFieldTemplate::New(type);
  99       //
 100       DataArrayInt *array0;
 101       f1->resizeForUnserialization(tinyLV,array0);
 102       if(array0)
 103         {
 104           _field_ptr->getSerialisationData(i,tinyL);
 105           tinyLgth=tinyL->length();
 106           int *ptr=array0->getPointer();
 107           for(int j=0;j<tinyLgth;j++)
 108             ptr[j]=(*tinyL)[j];
 109           delete tinyL; tinyL=0;
 110         }
 111       f1->finishUnserialization(tinyLV,tinyLD,tinyLS);
 112       fts[i]=f1;
 113     }
 114   //last step
 115   finishUnserialization(mainI,mainD,fts,cppms,cppdas);
 116   // clean-up
 117   for(std::vector<MEDCouplingFieldTemplate *>::iterator it=fts.begin();it!=fts.end();it++)
 118     (*it)->decrRef();
 119 }
 120
 121 std::vector<double> MEDCouplingFieldOverTimeClient::getTimeSteps() const
 122 {
 123   fetchDefTimeIfNeeded();
 124   return _df->getHotSpotsTime();
 125 }
 126
 127 void MEDCouplingFieldOverTimeClient::fetchDefTimeIfNeeded() const
 128 {
 129   if(!_df)
 130     {
 131       SALOME_TYPES::ListOfLong *tinyL=0;
 132       SALOME_TYPES::ListOfDouble *tinyD=0;
 133       _field_ptr->getTinyInfoAboutTimeDefinition(tinyL,tinyD);
 134       int tinyLgth=tinyL->length();
 135       std::vector<int> mainI(tinyLgth);
 136       for(int i=0;i<tinyLgth;i++)
 137         mainI[i]=(*tinyL)[i];
 138       delete tinyL; tinyL=0;
 139       tinyLgth=tinyD->length();
 140       std::vector<double> mainD(tinyLgth);
 141       for(int i=0;i<tinyLgth;i++)
 142         mainD[i]=(*tinyD)[i];
 143       delete tinyD; tinyD=0;
 144       //
 145       _df=new MEDCouplingDefinitionTime;
 146       _df->unserialize(mainI,mainD);
 147     }
 148 }