src/MEDLoader/MEDFileJoint.cxx

   1 // Copyright (C) 2007-2021  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, 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 "MEDFileJoint.hxx"
  21 #include "MEDFileBasis.hxx"
  22 #include "MEDLoader.hxx"
  23 #include "MEDLoaderBase.hxx"
  24 #include "MEDFileSafeCaller.txx"
  25
  26 #include "CellModel.hxx"
  27 #include "InterpKernelAutoPtr.hxx"
  28
  29 // From MEDLOader.cxx TU
  30 extern med_geometry_type                 typmai[MED_N_CELL_FIXED_GEO];
  31 extern INTERP_KERNEL::NormalizedCellType typmai2[MED_N_CELL_FIXED_GEO];
  32 extern med_geometry_type                 typmai3[INTERP_KERNEL::NORM_MAXTYPE];
  33
  34 using namespace MEDCoupling;
  35
  36 std::size_t MEDFileJointCorrespondence::getHeapMemorySizeWithoutChildren() const
  37 {
  38   return sizeof(MCAuto<DataArrayIdType>);
  39 }
  40
  41 std::vector<const BigMemoryObject *> MEDFileJointCorrespondence::getDirectChildrenWithNull() const
  42 {
  43   return std::vector<const BigMemoryObject *>();
  44 }
  45
  46 MEDFileJointCorrespondence::MEDFileJointCorrespondence():
  47   _is_nodal( true ),
  48   _loc_geo_type( INTERP_KERNEL::NORM_ERROR ),
  49   _rem_geo_type( INTERP_KERNEL::NORM_ERROR )
  50 {
  51 }
  52
  53 /*!
  54  * Constructor.
  55  *  \param [in] correspondence - correspondence.
  56  *  \param [in] isNodal - is the correspondence of cells or nodes.
  57  *  \param [in] loc_geo_type - the local geometry type of correspondence.
  58  *  \param [in] rem_geo_type - the remote geometry type of correspondence.
  59  */
  60 MEDFileJointCorrespondence::MEDFileJointCorrespondence(DataArrayIdType* correspondence,
  61                                                        bool          isNodal,
  62                                                        INTERP_KERNEL::NormalizedCellType loc_geo_type,
  63                                                        INTERP_KERNEL::NormalizedCellType rem_geo_type):
  64   _is_nodal( isNodal ),
  65   _loc_geo_type( loc_geo_type ),
  66   _rem_geo_type( rem_geo_type )
  67 {
  68   MEDFileJointCorrespondence::setCorrespondence( correspondence );
  69 }
  70
  71 MEDFileJointCorrespondence* MEDFileJointCorrespondence::New(DataArrayIdType* correspondence,
  72                                                             INTERP_KERNEL::NormalizedCellType loc_geo_type,
  73                                                             INTERP_KERNEL::NormalizedCellType rem_geo_type)
  74 {
  75   return new MEDFileJointCorrespondence(correspondence, /*isNodal=*/false, loc_geo_type, rem_geo_type );
  76 }
  77
  78 /*!
  79  * Returns a new MEDFileJointCorrespondence of nodes
  80  */
  81 MEDFileJointCorrespondence *MEDFileJointCorrespondence::New(DataArrayIdType* correspondence)
  82 {
  83   return new MEDFileJointCorrespondence(correspondence);
  84 }
  85
  86 /*!
  87  * Returns a new undefined MEDFileJointCorrespondence
  88  */
  89
  90 MEDFileJointCorrespondence *MEDFileJointCorrespondence::New()
  91 {
  92   return new MEDFileJointCorrespondence();
  93 }
  94
  95 /*!
  96  * Writes \a this joint into a MED file specified by its name.
  97  *  \param [in] fileName - the MED file name.
  98  *  \param [in] mode - the writing mode. For more on \a mode, see \ref AdvMEDLoaderBasics.
  99  *          - 2 - erase; an existing file is removed.
 100  *          - 1 - append; same data should not be present in an existing file.
 101  *          - 0 - overwrite; same data present in an existing file is overwritten.
 102  *  \param [in] order - order.
 103  *  \param [in] iteration - iteration.
 104  *  \throw If the mesh name is not set.
 105  *  \throw If \a mode == 1 and the same data is present in an existing file.
 106  */
 107 void MEDFileJointCorrespondence::write(const std::string& fileName, int mode, const std::string& localMeshName, const std::string& jointName, int order, int iteration) const
 108 {
 109   med_access_mode medmod=MEDFileUtilities::TraduceWriteMode(mode);
 110   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(),medmod);
 111
 112   std::ostringstream oss; oss << "MEDFileJointCorrespondence : error on attempt to write in file : \"" << fileName << "\"";
 113   MEDFileUtilities::CheckMEDCode((int)fid,fid,oss.str());
 114
 115   if (( !_is_nodal ) &&
 116       ( _loc_geo_type == INTERP_KERNEL::NORM_ERROR ||
 117         _rem_geo_type == INTERP_KERNEL::NORM_ERROR ))
 118     {
 119       throw INTERP_KERNEL::Exception( "Geometric type not specified for a cell Joint" );
 120     }
 121
 122   if ( (const DataArrayIdType *)_correspondence )
 123     {
 124       writeLL(fid, localMeshName, jointName, order, iteration);
 125     }
 126   else
 127     {
 128       throw INTERP_KERNEL::Exception("MEDFileJointCorrespondence::write : correspondence array not defined");
 129     }
 130 }
 131
 132 void MEDFileJointCorrespondence::writeLL(med_idt fid, const std::string& localMeshName, const std::string& jointName, int order, int iteration) const
 133 {
 134   if ( _is_nodal )
 135     {
 136       MEDFILESAFECALLERWR0(MEDsubdomainCorrespondenceWr,(fid, localMeshName.c_str(), jointName.c_str(),
 137                                                          order, iteration,
 138                                                          MED_NODE, MED_NONE,
 139                                                          MED_NODE, MED_NONE,
 140                                                          ToMedInt(_correspondence->getNbOfElems()/2),
 141                                                          ToMedIntArray(_correspondence)->getConstPointer()));
 142     }
 143   else
 144     {
 145       MEDFILESAFECALLERWR0(MEDsubdomainCorrespondenceWr,(fid, localMeshName.c_str(), jointName.c_str(),
 146                                                          order, iteration,
 147                                                          MED_CELL, typmai3[ _loc_geo_type ],
 148                                                          MED_CELL, typmai3[ _rem_geo_type ],
 149                                                          ToMedInt(_correspondence->getNbOfElems()/2),
 150                                                          ToMedIntArray(_correspondence)->getConstPointer()));
 151     }
 152 }
 153
 154 void MEDFileJointCorrespondence::setCorrespondence(DataArrayIdType *corr)
 155 {
 156   _correspondence=corr;
 157   if ( corr )
 158     corr->incrRef();
 159 }
 160
 161 /*!
 162  * Checks if \a this and another mesh are equal.
 163  *  \param [in] other - the mesh to compare with.
 164  *  \return bool - \c true if the meshes are equal, \c false, else.
 165  */
 166 bool MEDFileJointCorrespondence::isEqual(const MEDFileJointCorrespondence *other) const
 167 {
 168   if(_is_nodal!=other->_is_nodal)
 169     return false;
 170   if(_loc_geo_type!=other->_loc_geo_type)
 171     return false;
 172   if(_rem_geo_type!=other->_rem_geo_type)
 173     return false;
 174   if(!_correspondence->isEqual(*other->_correspondence))
 175     return false;
 176   return true;
 177 }
 178
 179 MEDFileJointCorrespondence *MEDFileJointCorrespondence::deepCopy() const
 180 {
 181   MCAuto<MEDFileJointCorrespondence> ret=new MEDFileJointCorrespondence(*this);
 182   return ret.retn();
 183 }
 184
 185 MEDFileJointCorrespondence *MEDFileJointCorrespondence::shallowCpy() const
 186 {
 187   MCAuto<MEDFileJointCorrespondence> ret=new MEDFileJointCorrespondence(*this);
 188   return ret.retn();
 189 }
 190
 191 /*!
 192  * Returns a string describing \a this mesh. This description includes the correspondence and
 193  * the number correspondence.
 194  *  \return std::string - the joint information string.
 195  */
 196 std::string MEDFileJointCorrespondence::simpleRepr() const
 197 {
 198   std::ostringstream oss;
 199   oss << "(*************************************)\n(* JOINT_CORRESPOND INFORMATION: *)\n(*************************************)\n";
 200   oss << "- entity type of the correspondence : " << ( getIsNodal() ? "NODE" : "CELL" ) << "\n";
 201   oss << "- Local geometry type of the correspondence : " << INTERP_KERNEL::CellModel::GetCellModel( _loc_geo_type ).getRepr() << "\n";
 202   oss << "- Remote geometry type of the correspondence : " << INTERP_KERNEL::CellModel::GetCellModel( _rem_geo_type ).getRepr() << "\n";
 203   if ( (const DataArrayIdType *)_correspondence )
 204     {
 205       oss << "- Number entity of the correspondence : " << getCorrespondence()->getNumberOfTuples() << "\n";
 206
 207       const DataArrayIdType* tmp=getCorrespondence();
 208       oss << "- Correspondence : <<";
 209       for(const mcIdType *it=tmp->begin();it!=tmp->end();it++)
 210         oss<< *it << " ";
 211     }
 212   else
 213     {
 214       oss << "- Number entity of the correspondence : 0\n";
 215     }
 216   oss << std::endl;
 217   return oss.str();
 218 }
 219
 220
 221 MEDFileJointOneStep::MEDFileJointOneStep():_order(-1),_iteration(-1)
 222 {
 223 }
 224
 225 std::size_t MEDFileJointOneStep::getHeapMemorySizeWithoutChildren() const
 226 {
 227   return _correspondences.capacity()*sizeof(MCAuto<DataArrayIdType>);
 228 }
 229
 230 std::vector<const BigMemoryObject *> MEDFileJointOneStep::getDirectChildrenWithNull() const
 231 {
 232   return std::vector<const BigMemoryObject *>();
 233 }
 234
 235 MEDFileJointOneStep *MEDFileJointOneStep::New(int dt, int it)
 236 {
 237   MEDFileJointOneStep* j = new MEDFileJointOneStep();
 238   j->setOrder( dt );
 239   j->setIteration( it );
 240   return j;
 241 }
 242
 243 /*!
 244  * Returns a new MEDFileJointOneStep.
 245  *  \param [in] fileName - the name of MED file to read.
 246  *  \param [in] mName - the name of the mesh to read.
 247  *  \param [in] jointName - the joint name.
 248  *  \param [in] num - the number of an iteration.
 249  *  \return MEDFileMesh * - a new instance of MEDFileJointOneStep.
 250  *  \throw If the file is not readable.
 251  *  \throw If there is no mesh with given attributes in the file.
 252  */
 253 MEDFileJointOneStep *MEDFileJointOneStep::New(const std::string& fileName, const std::string& mName, const std::string& jointName, int num)
 254 {
 255   MEDFileUtilities::CheckFileForRead(fileName);
 256   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(), MED_ACC_RDONLY);
 257   return new MEDFileJointOneStep(fid, mName, jointName, num);
 258 }
 259
 260 MEDFileJointOneStep* MEDFileJointOneStep::New(med_idt fid, const std::string& mName, const std::string& jointName, int num)
 261 {
 262   return new MEDFileJointOneStep( fid, mName, jointName, num);
 263 }
 264
 265 MEDFileJointOneStep::MEDFileJointOneStep(med_idt fid, const std::string& mName, const std::string& jointName, int num)
 266 {
 267   med_int order, iteration, ncorrespondence;
 268   MEDFILESAFECALLERRD0(MEDsubdomainComputingStepInfo,(fid, mName.c_str(), jointName.c_str(), num, &order, &iteration, &ncorrespondence));
 269   MEDFileJointOneStep::setOrder(FromMedInt<int>(order));
 270   MEDFileJointOneStep::setIteration(FromMedInt<int>(iteration));
 271   for ( int cur_it = 1; cur_it <= ncorrespondence; ++cur_it )
 272     {
 273       med_int num_entity;
 274       med_entity_type loc_ent_type, rem_ent_type;
 275       med_geometry_type loc_geo_type, rem_geo_type;
 276       MEDFILESAFECALLERRD0(MEDsubdomainCorrespondenceSizeInfo,(fid, mName.c_str(), jointName.c_str(), order, iteration, cur_it,
 277                                                                &loc_ent_type, &loc_geo_type, &rem_ent_type, &rem_geo_type, &num_entity));
 278       if ( num_entity > 0 )
 279         {
 280           MCAuto<DataArrayMedInt> correspondence=DataArrayMedInt::New();
 281           correspondence->alloc(num_entity*2, 1);
 282           MEDFILESAFECALLERRD0(MEDsubdomainCorrespondenceRd,(fid, mName.c_str(), jointName.c_str(), order, iteration, loc_ent_type,
 283                                                              loc_geo_type, rem_ent_type, rem_geo_type, correspondence->getPointer()));
 284           MEDFileJointCorrespondence *cor=MEDFileJointCorrespondence::New();
 285           cor->setIsNodal( loc_ent_type == MED_NODE );
 286           cor->setLocalGeometryType ( convertGeometryType( loc_geo_type ));
 287           cor->setRemoteGeometryType( convertGeometryType( rem_geo_type ));
 288           cor->setCorrespondence( FromMedIntArray<mcIdType>(correspondence ));
 289           _correspondences.push_back(cor);
 290         }
 291     }
 292 }
 293
 294 /*!
 295  * Writes \a this joint into a MED file specified by its name.
 296  *  \param [in] fileName - the MED file name.
 297  *  \param [in] mode - the writing mode. For more on \a mode, see \ref AdvMEDLoaderBasics.
 298  * - 2 - erase; an existing file is removed.
 299  * - 1 - append; same data should not be present in an existing file.
 300  * - 0 - overwrite; same data present in an existing file is overwritten.
 301  *  \throw If the mesh name is not set.
 302  *  \throw If \a mode == 1 and the same data is present in an existing file.
 303  */
 304 void MEDFileJointOneStep::write(const std::string& fileName, int mode, const std::string& localMeshName, const std::string& jointName) const
 305 {
 306   med_access_mode medmod=MEDFileUtilities::TraduceWriteMode(mode);
 307   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(),medmod);
 308   std::ostringstream oss; oss << "MEDFileJointOneStep : error on attempt to write in file : \"" << fileName << "\"";
 309   MEDFileUtilities::CheckMEDCode((int)fid,fid,oss.str());
 310   if ( _correspondences.empty() )
 311     throw INTERP_KERNEL::Exception("MEDFileJointOneStep::write : no correspondences defined !");
 312   writeLL(fid, localMeshName, jointName);
 313 }
 314
 315 void MEDFileJointOneStep::writeLL(med_idt fid, const std::string& localMeshName, const std::string& jointName) const
 316 {
 317   for(std::vector< MCAuto<MEDFileJointCorrespondence> >::const_iterator it=_correspondences.begin();it!=_correspondences.end();it++)
 318     {
 319       (*it)->writeLL(fid, localMeshName, jointName, getOrder(), getIteration());
 320     }
 321 }
 322
 323 void MEDFileJointOneStep::pushCorrespondence(MEDFileJointCorrespondence* correspondence)
 324 {
 325   if(!correspondence)
 326     throw INTERP_KERNEL::Exception("MEDFileJointCorrespondence::pushCorrespondence : invalid input pointer ! should be different from 0 !");
 327   _correspondences.push_back(correspondence);
 328   correspondence->incrRef();
 329 }
 330
 331 int MEDFileJointOneStep::getNumberOfCorrespondences() const
 332 {
 333   return (int)_correspondences.size();
 334 }
 335
 336 /** Return a borrowed reference (caller is not responsible) */
 337 MEDFileJointCorrespondence *MEDFileJointOneStep::getCorrespondenceAtPos(int i) const
 338 {
 339   if(i<0 || i>=(int)_correspondences.size())
 340     {
 341       std::ostringstream oss; oss << "MEDFileJointOneStep::getCorrespondenceAtPos : invalid correspondence id given in parameter ! Should be in [0;" << _correspondences.size() << ") !";
 342       throw INTERP_KERNEL::Exception(oss.str().c_str());
 343     }
 344   const MEDFileJointCorrespondence* ret = _correspondences[i];
 345   return const_cast<MEDFileJointCorrespondence *>( ret );
 346 }
 347
 348 /*!
 349  * Checks if \a this and another Joint are equal.
 350  *  \param [in] other - the Joint to compare with.
 351  *  \return bool - \c true if the Joints are equal, \c false, else.
 352  */
 353 bool MEDFileJointOneStep::isEqual(const MEDFileJointOneStep *other) const
 354 {
 355   if(_order!=other->_order)
 356     return false;
 357   if(_iteration!=other->_iteration)
 358     return false;
 359   if ( getNumberOfCorrespondences() != other->getNumberOfCorrespondences() )
 360     return false;
 361
 362   std::vector<bool> found( getNumberOfCorrespondences(), false );
 363   for(int i=0; i<getNumberOfCorrespondences(); i++)
 364     {
 365       int j;
 366       for(j=0; j<getNumberOfCorrespondences(); j++)
 367         {
 368           if ( !found[ j ] &&
 369                getCorrespondenceAtPos(i)->isEqual(other->getCorrespondenceAtPos(j)))
 370             {
 371               found[ j ] = true;
 372               break;
 373             }
 374         }
 375       if ( j == getNumberOfCorrespondences() )
 376         return false;
 377     }
 378   return true;
 379 }
 380
 381 MEDFileJointOneStep *MEDFileJointOneStep::deepCopy() const
 382 {
 383   std::vector< MCAuto<MEDFileJointCorrespondence> > correspondences(_correspondences.size());
 384   std::size_t i=0;
 385   for(std::vector< MCAuto<MEDFileJointCorrespondence> >::const_iterator it=_correspondences.begin();it!=_correspondences.end();it++,i++)
 386     if((const MEDFileJointCorrespondence *)*it)
 387       correspondences[i]=(*it)->deepCopy();
 388   MCAuto<MEDFileJointOneStep> ret= new MEDFileJointOneStep;
 389   ret->_correspondences=correspondences;
 390   return ret.retn();
 391 }
 392
 393 MEDFileJointOneStep *MEDFileJointOneStep::shallowCpy() const
 394 {
 395   MCAuto<MEDFileJointOneStep> ret=new MEDFileJointOneStep(*this);
 396   return ret.retn();
 397 }
 398
 399 /*!
 400  * Returns a string describing \a this Joint. This description includes the correspondence and
 401  * the number of correspondences.
 402  *  \return std::string - the joint information string.
 403  */
 404 std::string MEDFileJointOneStep::simpleRepr() const
 405 {
 406   std::ostringstream oss;
 407   oss << "(*************************************)\n(* JOINT_ONE_STEP INFORMATION: *)\n(*************************************)\n";
 408   oss << "- Number of the correspondences : <<" << _correspondences.size() << ">>\n";
 409   for(std::vector< MCAuto<MEDFileJointCorrespondence> >::const_iterator it=_correspondences.begin();it!=_correspondences.end();it++)
 410     {
 411       oss << (*it)->simpleRepr();
 412     }
 413   return oss.str();
 414 }
 415
 416 INTERP_KERNEL::NormalizedCellType MEDFileJointOneStep::convertGeometryType(med_geometry_type geotype)
 417 {
 418   INTERP_KERNEL::NormalizedCellType result=INTERP_KERNEL::NORM_ERROR;
 419   for(int i=0; i<MED_N_CELL_FIXED_GEO; i++)
 420     {
 421       if (typmai[i]==geotype)
 422         {
 423           result=typmai2[i];
 424           break;
 425         }
 426     }
 427   return result;
 428 }
 429
 430 std::size_t MEDFileJoint::getHeapMemorySizeWithoutChildren() const
 431 {
 432   return _joint.capacity()*sizeof(MCAuto<MEDFileJointOneStep>);
 433 }
 434
 435 std::vector<const BigMemoryObject *> MEDFileJoint::getDirectChildrenWithNull() const
 436 {
 437   return std::vector<const BigMemoryObject *>();
 438 }
 439
 440 MEDFileJoint *MEDFileJoint::New()
 441 {
 442   return new MEDFileJoint();
 443 }
 444
 445 MEDFileJoint *MEDFileJoint::New(const std::string& fileName, const std::string& mName, int curJoint)
 446 {
 447   MEDFileUtilities::CheckFileForRead(fileName);
 448   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(), MED_ACC_RDONLY);
 449   return new MEDFileJoint(fid,mName,curJoint);
 450 }
 451
 452 MEDFileJoint *MEDFileJoint::New(med_idt fid, const std::string& mName, int curJoint)
 453 {
 454   return new MEDFileJoint(fid,mName,curJoint);
 455 }
 456
 457 MEDFileJoint *MEDFileJoint::New(const std::string& jointName, const std::string& locMeshName, const std::string& remoteMeshName, int remoteMeshNum)
 458 {
 459   MEDFileJoint* j = new MEDFileJoint();
 460   j->setJointName( jointName );
 461   j->setLocalMeshName( locMeshName );
 462   j->setRemoteMeshName( remoteMeshName );
 463   j->setDomainNumber( remoteMeshNum );
 464   return j;
 465 }
 466
 467 MEDFileJoint::MEDFileJoint()
 468 {
 469 }
 470
 471 /*!
 472  * Returns a new MEDFileJoint holding the mesh data that has been read from a given MED
 473  * file. The Joint to load is specified by mesh name and a Joint iteration.
 474  *  \param [in] fid - the handler ID of MED file to read.
 475  *  \param [in] mName - the name of the mesh to read.
 476  *  \param [in] curJoint - the iteration number of current joint.
 477  *  \throw If the file is not readable.
 478  *  \throw If there is no mesh with given attributes in the file.
 479  */
 480 MEDFileJoint::MEDFileJoint(med_idt fid, const std::string& mName, int curJoint)
 481 {
 482   INTERP_KERNEL::AutoPtr<char> joint_name=MEDLoaderBase::buildEmptyString(MED_NAME_SIZE);
 483   INTERP_KERNEL::AutoPtr<char> desc_name=MEDLoaderBase::buildEmptyString(MED_COMMENT_SIZE);
 484   INTERP_KERNEL::AutoPtr<char> rem_mesh_name=MEDLoaderBase::buildEmptyString(MED_NAME_SIZE);
 485   med_int domain_number=0, nstep=0, nocstpncorrespondence=0;
 486   MEDFILESAFECALLERRD0(MEDsubdomainJointInfo,(fid,mName.c_str(), curJoint, joint_name, desc_name, &domain_number,rem_mesh_name,
 487                                               &nstep, &nocstpncorrespondence));
 488   setLocalMeshName(mName);
 489   setRemoteMeshName(MEDLoaderBase::buildStringFromFortran(rem_mesh_name,MED_NAME_SIZE));
 490   setDescription(MEDLoaderBase::buildStringFromFortran(desc_name,MED_COMMENT_SIZE));
 491   setJointName(MEDLoaderBase::buildStringFromFortran(joint_name,MED_NAME_SIZE));
 492   setDomainNumber(FromMedInt<int>(domain_number));
 493   for(int cur_step=1; cur_step <= nstep; ++cur_step)
 494     {
 495       MEDFileJointOneStep *cor=MEDFileJointOneStep::New(fid, mName.c_str(), getJointName(), cur_step);
 496       _joint.push_back(cor);
 497     }
 498 }
 499
 500 void MEDFileJoint::writeLL(med_idt fid) const
 501 {
 502   // if ( _loc_mesh_name.empty() )
 503   //   throw INTERP_KERNEL::Exception("MEDFileJoint::write : name of a local mesh not defined!");
 504   MEDFILESAFECALLERWR0(MEDsubdomainJointCr,(fid,getLocalMeshName().c_str(),getJointName().c_str(),getDescription().c_str(),getDomainNumber(),getRemoteMeshName().c_str()));
 505   for(std::vector< MCAuto<MEDFileJointOneStep> >::const_iterator it=_joint.begin();it!=_joint.end();it++)
 506     (*it)->writeLL(fid, getLocalMeshName(),getJointName());
 507 }
 508
 509 void MEDFileJoint::pushStep(MEDFileJointOneStep* step)
 510 {
 511   if(!step)
 512     throw INTERP_KERNEL::Exception("MEDFileJoint::pushStep : invalid input pointer ! should be different from 0 !");
 513   _joint.push_back(step);
 514   step->incrRef();
 515 }
 516
 517 int MEDFileJoint::getNumberOfSteps() const
 518 {
 519   return (int)_joint.size();
 520 }
 521
 522 /** Return a borrowed reference (caller is not responsible) */
 523 MEDFileJointOneStep *MEDFileJoint::getStepAtPos(int i) const
 524 {
 525   if(i<0 || i>=(int)_joint.size())
 526     {
 527       std::ostringstream oss; oss << "MEDFileJoint::getStepAtPos : invalid step id given in parameter ! Should be in [0;" << _joint.size() << ") !";
 528       throw INTERP_KERNEL::Exception(oss.str().c_str());
 529     }
 530   const MEDFileJointOneStep* ret = _joint[i];
 531   return const_cast<MEDFileJointOneStep *>( ret );
 532 }
 533
 534 /*!
 535  * Checks if \a this and another Joint are equal.
 536  *  \param [in] other - the Joint to compare with.
 537  *  \return bool - \c true if the Joints are equal, \c false, else.
 538  */
 539 bool MEDFileJoint::isEqual(const MEDFileJoint *other) const
 540 {
 541   if(_loc_mesh_name!=other->_loc_mesh_name)
 542     return false;
 543   if(_joint_name!=other->_joint_name)
 544     return false;
 545   if(_desc_name!=other->_desc_name)
 546       return false;
 547   if(_rem_mesh_name!=other->_rem_mesh_name)
 548     return false;
 549   if(_domain_number!=other->_domain_number)
 550     return false;
 551   int nbTS(getNumberOfSteps());
 552   if(nbTS!=other->getNumberOfSteps())
 553     return false;
 554   std::vector<bool> found(nbTS,false);
 555   for(int i=0;i<nbTS;i++)
 556     {
 557       int j;
 558       for(j=0;j<nbTS;j++)
 559         {
 560           if(!found[j] && getStepAtPos(i)->isEqual(other->getStepAtPos(j)))
 561             {
 562               found[j]=true;
 563               break;
 564             }
 565         }
 566       if(j==nbTS)
 567         return false;
 568     }
 569   return true;
 570 }
 571
 572 MEDFileJoint *MEDFileJoint::deepCopy() const
 573 {
 574   std::vector< MCAuto<MEDFileJointOneStep> > joint(_joint.size());
 575   std::size_t i=0;
 576   for(std::vector< MCAuto<MEDFileJointOneStep> >::const_iterator it=_joint.begin();it!=_joint.end();it++,i++)
 577     if((const MEDFileJointOneStep *)*it)
 578       joint[i]=(*it)->deepCopy();
 579   MCAuto<MEDFileJoint> ret=MEDFileJoint::New();
 580   ret->_joint=joint;
 581   return ret.retn();
 582 }
 583
 584 MEDFileJoint *MEDFileJoint::shallowCpy() const
 585 {
 586   MCAuto<MEDFileJoint> ret=new MEDFileJoint(*this);
 587   return ret.retn();
 588 }
 589
 590 bool MEDFileJoint::changeJointNames(const std::vector< std::pair<std::string,std::string> >& modifTab)
 591 {
 592   for(std::vector< std::pair<std::string,std::string> >::const_iterator it=modifTab.begin();it!=modifTab.end();it++)
 593     {
 594       if((*it).first==_joint_name)
 595         {
 596           _joint_name=(*it).second;
 597           return true;
 598         }
 599     }
 600   return false;
 601 }
 602
 603 /*!
 604  * Returns a string describing \a this mesh. This description includes the correspondence and
 605  * the number correspondence.
 606  *  \return std::string - the joint information string.
 607  */
 608 std::string MEDFileJoint::simpleRepr() const
 609 {
 610   std::ostringstream oss;
 611   oss << "(*************************************)\n(* JOINT INFORMATION: *)\n(*************************************)\n";
 612   oss << "- Local Mesh name : <<" << getLocalMeshName() << ">>\n";
 613   oss << "- Remote Mesh name : <<" << getRemoteMeshName() << ">>\n";
 614   oss << "- Description : <<" << getDescription() << ">>\n";
 615   oss << "- Joint name : <<" << getJointName() << ">>\n";
 616   oss << "- Domain number : " << getDomainNumber() << "\n";
 617   for(std::vector< MCAuto<MEDFileJointOneStep> >::const_iterator it=_joint.begin();it!=_joint.end();it++)
 618     {
 619       oss << (*it)->simpleRepr();
 620     }
 621   return oss.str();
 622 }
 623
 624 MEDFileJoints *MEDFileJoints::New()
 625 {
 626   return new MEDFileJoints;
 627 }
 628
 629 MEDFileJoints *MEDFileJoints::New(const std::string& fileName, const std::string& meshName)
 630 {
 631   MEDFileUtilities::CheckFileForRead(fileName);
 632   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(), MED_ACC_RDONLY);
 633   return new MEDFileJoints( fid, meshName );
 634 }
 635
 636 MEDFileJoints *MEDFileJoints::New(med_idt fid, const std::string& meshName)
 637 {
 638   return new MEDFileJoints( fid, meshName );
 639 }
 640
 641 void MEDFileJoints::writeLL(med_idt fid) const
 642 {
 643   for(std::vector< MCAuto<MEDFileJoint> >::const_iterator it=_joints.begin();it!=_joints.end();it++)
 644     (*it)->writeLL(fid);
 645 }
 646
 647 std::string MEDFileJoints::getMeshName() const
 648 {
 649   for ( size_t i = 0; i <= _joints.size(); ++i )
 650     if ( (const MEDFileJoint*) _joints[i] )
 651       return _joints[i]->getLocalMeshName();
 652
 653   return "";
 654 }
 655
 656 int MEDFileJoints::getNumberOfJoints() const
 657 {
 658   return (int)_joints.size();
 659 }
 660
 661 /** Return a borrowed reference (caller is not responsible) */
 662 MEDFileJoint *MEDFileJoints::getJointAtPos(int i) const
 663 {
 664   if(i<0 || i>=(int)_joints.size())
 665     {
 666       std::ostringstream oss; oss << "MEDFileJoints::getJointAtPos : invalid joint id given in parameter ! Should be in [0;" << _joints.size() << ") !";
 667       throw INTERP_KERNEL::Exception(oss.str().c_str());
 668     }
 669   const MEDFileJoint* ret = _joints[i];
 670   return const_cast<MEDFileJoint *>( ret );
 671 }
 672
 673
 674 /** Return a borrowed reference (caller is not responsible) */
 675 MEDFileJoint *MEDFileJoints::getJointWithName(const std::string& jname) const
 676 {
 677   std::vector<std::string> js=getJointsNames();
 678   std::vector<std::string>::iterator it=std::find(js.begin(),js.end(),jname);
 679   if(it==js.end())
 680     {
 681       std::ostringstream oss; oss << "MEDFileJoints::getJointWithName : Joint  \"" << jname << "\" does not exist in this ! Existing are : ";
 682       std::copy(js.begin(),js.end(),std::ostream_iterator<std::string>(oss," "));
 683       throw INTERP_KERNEL::Exception(oss.str().c_str());
 684     }
 685   return getJointAtPos((int)std::distance(js.begin(),it));
 686 }
 687
 688 std::vector<std::string> MEDFileJoints::getJointsNames() const
 689 {
 690   std::vector<std::string> ret(_joints.size());
 691   int i=0;
 692   for(std::vector< MCAuto<MEDFileJoint> >::const_iterator it=_joints.begin();it!=_joints.end();it++,i++)
 693     {
 694       const MEDFileJoint *f=(*it);
 695       if(f)
 696         {
 697           ret[i]=f->getJointName();
 698         }
 699       else
 700         {
 701           std::ostringstream oss; oss << "MEDFileJoints::getJointsNames : At rank #" << i << " joint is not defined !";
 702           throw INTERP_KERNEL::Exception(oss.str().c_str());
 703         }
 704     }
 705   return ret;
 706 }
 707
 708 bool MEDFileJoints::changeJointNames(const std::vector< std::pair<std::string,std::string> >& modifTab)
 709 {
 710   bool ret=false;
 711   for(std::vector< MCAuto<MEDFileJoint> >::iterator it=_joints.begin();it!=_joints.end();it++)
 712     {
 713       MEDFileJoint *cur(*it);
 714       if(cur)
 715         ret=cur->changeJointNames(modifTab) || ret;
 716     }
 717   return ret;
 718 }
 719
 720 void MEDFileJoints::resize(int newSize)
 721 {
 722   _joints.resize(newSize);
 723 }
 724
 725 void MEDFileJoints::pushJoint(MEDFileJoint *joint)
 726 {
 727   if(!joint)
 728     throw INTERP_KERNEL::Exception("MEDFileJoints::pushJoint() : invalid input pointer ! should be different from 0 !");
 729   if ( !_joints.empty() &&
 730        _joints[0]->getLocalMeshName() != joint->getLocalMeshName() )
 731     throw INTERP_KERNEL::Exception("MEDFileJoints::pushJoint() : different names of local meshes ! should be equal !");
 732
 733   _joints.push_back(joint);
 734   joint->incrRef();
 735 }
 736
 737 void MEDFileJoints::setJointAtPos(int i, MEDFileJoint *joint)
 738 {
 739   if(!joint)
 740     throw INTERP_KERNEL::Exception("MEDFileJoints::setJointAtPos : invalid input pointer ! should be different from 0 !");
 741   if(i>=(int)_joints.size())
 742     _joints.resize(i+1);
 743   _joints[i]=joint;
 744   joint->incrRef();
 745 }
 746
 747 void MEDFileJoints::destroyJointAtPos(int i)
 748 {
 749   if(i<0 || i>=(int)_joints.size())
 750     {
 751       std::ostringstream oss; oss << "MEDFileJoints::destroyJointAtPos : Invalid given id in input (" << i << ") should be in [0," << _joints.size() << ") !";
 752       throw INTERP_KERNEL::Exception(oss.str().c_str());
 753     }
 754   _joints.erase(_joints.begin()+i);
 755 }
 756
 757 MEDFileJoints::MEDFileJoints()
 758 {
 759 }
 760
 761 MEDFileJoints::MEDFileJoints(med_idt fid, const std::string& meshName)
 762 {
 763   med_int num_joint=MEDnSubdomainJoint(fid, meshName.c_str() );
 764   for(int i = 1; i <= num_joint; i++)
 765     _joints.push_back(MEDFileJoint::New(fid,meshName,i));
 766 }
 767
 768 MEDFileJoints *MEDFileJoints::deepCopy() const
 769 {
 770   std::vector< MCAuto<MEDFileJoint> > joints(_joints.size());
 771   std::size_t i=0;
 772   for(std::vector< MCAuto<MEDFileJoint> >::const_iterator it=_joints.begin();it!=_joints.end();it++,i++)
 773     if((const MEDFileJoint *)*it)
 774       joints[i]=(*it)->deepCopy();
 775   MCAuto<MEDFileJoints> ret=MEDFileJoints::New();
 776   ret->_joints=joints;
 777   return ret.retn();
 778 }
 779
 780 std::size_t MEDFileJoints::getHeapMemorySizeWithoutChildren() const
 781 {
 782   return _joints.capacity()*(sizeof(MCAuto<MEDFileJoint>));
 783 }
 784
 785 std::vector<const BigMemoryObject *> MEDFileJoints::getDirectChildrenWithNull() const
 786 {
 787   std::vector<const BigMemoryObject *> ret;
 788   for(std::vector< MCAuto<MEDFileJoint> >::const_iterator it=_joints.begin();it!=_joints.end();it++)
 789     ret.push_back((const MEDFileJoint *)*it);
 790   return ret;
 791 }
 792
 793 std::string MEDFileJoints::simpleRepr() const
 794 {
 795   std::ostringstream oss;
 796   oss << "(*****************)\n(* MEDFileJoints *)\n(*****************)\n\n";
 797   simpleReprWithoutHeader(oss);
 798   return oss.str();
 799 }
 800
 801 void MEDFileJoints::simpleReprWithoutHeader(std::ostream& oss) const
 802 {
 803   int nbOfJoints=getNumberOfJoints();
 804   oss << "There are " << nbOfJoints << " joints with the following names : \n";
 805   std::vector<std::string> jns=getJointsNames();
 806   for(int i=0;i<nbOfJoints;i++)
 807     oss << "  - #" << i << " \"" << jns[i] << "\"\n";
 808   for(std::vector< MCAuto<MEDFileJoint> >::const_iterator it=_joints.begin();it!=_joints.end();it++)
 809     {
 810       oss << (*it)->simpleRepr();
 811     }
 812 }