src/MEDLoader/MEDFileJoint.cxx

   1 // Copyright (C) 2007-2019  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 extern med_geometry_type                 typmai[MED_N_CELL_FIXED_GEO];
  30 extern INTERP_KERNEL::NormalizedCellType typmai2[MED_N_CELL_FIXED_GEO];
  31 extern med_geometry_type                 typmai3[34];
  32
  33 using namespace MEDCoupling;
  34
  35 std::size_t MEDFileJointCorrespondence::getHeapMemorySizeWithoutChildren() const
  36 {
  37   return sizeof(MCAuto<DataArrayIdType>);
  38 }
  39
  40 std::vector<const BigMemoryObject *> MEDFileJointCorrespondence::getDirectChildrenWithNull() const
  41 {
  42   return std::vector<const BigMemoryObject *>();
  43 }
  44
  45 MEDFileJointCorrespondence::MEDFileJointCorrespondence():
  46   _is_nodal( true ),
  47   _loc_geo_type( INTERP_KERNEL::NORM_ERROR ),
  48   _rem_geo_type( INTERP_KERNEL::NORM_ERROR )
  49 {
  50 }
  51
  52 /*!
  53  * Constructor.
  54  *  \param [in] correspondence - correspondence.
  55  *  \param [in] is_nodal - is the correspondence of cells or nodes.
  56  *  \param [in] loc_geo_type - the local geometry type of correspondence.
  57  *  \param [in] rem_geo_type - the remote geometry type of correspondence.
  58  */
  59 MEDFileJointCorrespondence::MEDFileJointCorrespondence(DataArrayIdType* correspondence,
  60                                                        bool          isNodal,
  61                                                        INTERP_KERNEL::NormalizedCellType loc_geo_type,
  62                                                        INTERP_KERNEL::NormalizedCellType rem_geo_type):
  63   _is_nodal( isNodal ),
  64   _loc_geo_type( loc_geo_type ),
  65   _rem_geo_type( rem_geo_type )
  66 {
  67   MEDFileJointCorrespondence::setCorrespondence( correspondence );
  68 }
  69
  70 MEDFileJointCorrespondence* MEDFileJointCorrespondence::New(DataArrayIdType* correspondence,
  71                                                             INTERP_KERNEL::NormalizedCellType loc_geo_type,
  72                                                             INTERP_KERNEL::NormalizedCellType rem_geo_type)
  73 {
  74   return new MEDFileJointCorrespondence(correspondence, /*isNodal=*/false, loc_geo_type, rem_geo_type );
  75 }
  76
  77 /*!
  78  * Returns a new MEDFileJointCorrespondence of nodes
  79  */
  80 MEDFileJointCorrespondence *MEDFileJointCorrespondence::New(DataArrayIdType* correspondence)
  81 {
  82   return new MEDFileJointCorrespondence(correspondence);
  83 }
  84
  85 /*!
  86  * Returns a new undefined MEDFileJointCorrespondence
  87  */
  88
  89 MEDFileJointCorrespondence *MEDFileJointCorrespondence::New()
  90 {
  91   return new MEDFileJointCorrespondence();
  92 }
  93
  94 /*!
  95  * Writes \a this joint into a MED file specified by its name.
  96  *  \param [in] fileName - the MED file name.
  97  *  \param [in] mode - the writing mode. For more on \a mode, see \ref AdvMEDLoaderBasics.
  98  *          - 2 - erase; an existing file is removed.
  99  *          - 1 - append; same data should not be present in an existing file.
 100  *          - 0 - overwrite; same data present in an existing file is overwritten.
 101  *  \param [in] order - order.
 102  *  \param [in] iteration - iteration.
 103  *  \throw If the mesh name is not set.
 104  *  \throw If \a mode == 1 and the same data is present in an existing file.
 105  */
 106 void MEDFileJointCorrespondence::write(const std::string& fileName, int mode, const std::string& localMeshName, const std::string& jointName, int order, int iteration) const
 107 {
 108   med_access_mode medmod=MEDFileUtilities::TraduceWriteMode(mode);
 109   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(),medmod);
 110
 111   std::ostringstream oss; oss << "MEDFileJointCorrespondence : error on attempt to write in file : \"" << fileName << "\"";
 112   MEDFileUtilities::CheckMEDCode((int)fid,fid,oss.str());
 113
 114   if (( !_is_nodal ) &&
 115       ( _loc_geo_type == INTERP_KERNEL::NORM_ERROR ||
 116         _rem_geo_type == INTERP_KERNEL::NORM_ERROR ))
 117     {
 118       throw INTERP_KERNEL::Exception( "Geometric type not specified for a cell Joint" );
 119     }
 120
 121   if ( (const DataArrayIdType *)_correspondence )
 122     {
 123       writeLL(fid, localMeshName, jointName, order, iteration);
 124     }
 125   else
 126     {
 127       throw INTERP_KERNEL::Exception("MEDFileJointCorrespondence::write : correspondence array not defined");
 128     }
 129 }
 130
 131 void MEDFileJointCorrespondence::writeLL(med_idt fid, const std::string& localMeshName, const std::string& jointName, int order, int iteration) const
 132 {
 133   if ( _is_nodal )
 134     {
 135       MEDFILESAFECALLERWR0(MEDsubdomainCorrespondenceWr,(fid, localMeshName.c_str(), jointName.c_str(),
 136                                                          order, iteration,
 137                                                          MED_NODE, MED_NONE,
 138                                                          MED_NODE, MED_NONE,
 139                                                          ToMedInt(_correspondence->getNbOfElems()/2),
 140                                                          ToMedIntArray(_correspondence)->getConstPointer()));
 141     }
 142   else
 143     {
 144       MEDFILESAFECALLERWR0(MEDsubdomainCorrespondenceWr,(fid, localMeshName.c_str(), jointName.c_str(),
 145                                                          order, iteration,
 146                                                          MED_CELL, typmai3[ _loc_geo_type ],
 147                                                          MED_CELL, typmai3[ _rem_geo_type ],
 148                                                          ToMedInt(_correspondence->getNbOfElems()/2),
 149                                                          ToMedIntArray(_correspondence)->getConstPointer()));
 150     }
 151 }
 152
 153 void MEDFileJointCorrespondence::setCorrespondence(DataArrayIdType *corr)
 154 {
 155   _correspondence=corr;
 156   if ( corr )
 157     corr->incrRef();
 158 }
 159
 160 /*!
 161  * Checks if \a this and another mesh are equal.
 162  *  \param [in] other - the mesh to compare with.
 163  *  \return bool - \c true if the meshes are equal, \c false, else.
 164  */
 165 bool MEDFileJointCorrespondence::isEqual(const MEDFileJointCorrespondence *other) const
 166 {
 167   if(_is_nodal!=other->_is_nodal)
 168     return false;
 169   if(_loc_geo_type!=other->_loc_geo_type)
 170     return false;
 171   if(_rem_geo_type!=other->_rem_geo_type)
 172     return false;
 173   if(!_correspondence->isEqual(*other->_correspondence))
 174     return false;
 175   return true;
 176 }
 177
 178 MEDFileJointCorrespondence *MEDFileJointCorrespondence::deepCopy() const
 179 {
 180   MCAuto<MEDFileJointCorrespondence> ret=new MEDFileJointCorrespondence(*this);
 181   return ret.retn();
 182 }
 183
 184 MEDFileJointCorrespondence *MEDFileJointCorrespondence::shallowCpy() const
 185 {
 186   MCAuto<MEDFileJointCorrespondence> ret=new MEDFileJointCorrespondence(*this);
 187   return ret.retn();
 188 }
 189
 190 /*!
 191  * Returns a string describing \a this mesh. This description includes the correspondence and
 192  * the number correspondence.
 193  *  \return std::string - the joint information string.
 194  */
 195 std::string MEDFileJointCorrespondence::simpleRepr() const
 196 {
 197   std::ostringstream oss;
 198   oss << "(*************************************)\n(* JOINT_CORRESPOND INFORMATION: *)\n(*************************************)\n";
 199   oss << "- entity type of the correspondence : " << ( getIsNodal() ? "NODE" : "CELL" ) << "\n";
 200   oss << "- Local geometry type of the correspondence : " << INTERP_KERNEL::CellModel::GetCellModel( _loc_geo_type ).getRepr() << "\n";
 201   oss << "- Remote geometry type of the correspondence : " << INTERP_KERNEL::CellModel::GetCellModel( _rem_geo_type ).getRepr() << "\n";
 202   if ( (const DataArrayIdType *)_correspondence )
 203     {
 204       oss << "- Number entity of the correspondence : " << getCorrespondence()->getNumberOfTuples() << "\n";
 205
 206       const DataArrayIdType* tmp=getCorrespondence();
 207       oss << "- Correspondence : <<";
 208       for(const mcIdType *it=tmp->begin();it!=tmp->end();it++)
 209         oss<< *it << " ";
 210     }
 211   else
 212     {
 213       oss << "- Number entity of the correspondence : 0\n";
 214     }
 215   oss << std::endl;
 216   return oss.str();
 217 }
 218
 219
 220 MEDFileJointOneStep::MEDFileJointOneStep():_order(-1),_iteration(-1)
 221 {
 222 }
 223
 224 std::size_t MEDFileJointOneStep::getHeapMemorySizeWithoutChildren() const
 225 {
 226   return _correspondences.capacity()*sizeof(MCAuto<DataArrayIdType>);
 227 }
 228
 229 std::vector<const BigMemoryObject *> MEDFileJointOneStep::getDirectChildrenWithNull() const
 230 {
 231   return std::vector<const BigMemoryObject *>();
 232 }
 233
 234 MEDFileJointOneStep *MEDFileJointOneStep::New(int dt, int it)
 235 {
 236   MEDFileJointOneStep* j = new MEDFileJointOneStep();
 237   j->setOrder( dt );
 238   j->setIteration( it );
 239   return j;
 240 }
 241
 242 /*!
 243  * Returns a new MEDFileJointOneStep.
 244  *  \param [in] fileName - the name of MED file to read.
 245  *  \param [in] mName - the name of the mesh to read.
 246  *  \param [in] jointName - the joint name.
 247  *  \param [in] num - the number of an iteration.
 248  *  \return MEDFileMesh * - a new instance of MEDFileJointOneStep.
 249  *  \throw If the file is not readable.
 250  *  \throw If there is no mesh with given attributes in the file.
 251  */
 252 MEDFileJointOneStep *MEDFileJointOneStep::New(const std::string& fileName, const std::string& mName, const std::string& jointName, int num)
 253 {
 254   MEDFileUtilities::CheckFileForRead(fileName);
 255   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(), MED_ACC_RDONLY);
 256   return new MEDFileJointOneStep(fid, mName, jointName, num);
 257 }
 258
 259 MEDFileJointOneStep* MEDFileJointOneStep::New(med_idt fid, const std::string& mName, const std::string& jointName, int num)
 260 {
 261   return new MEDFileJointOneStep( fid, mName, jointName, num);
 262 }
 263
 264 MEDFileJointOneStep::MEDFileJointOneStep(med_idt fid, const std::string& mName, const std::string& jointName, int num)
 265 {
 266   med_int order, iteration, ncorrespondence;
 267   MEDFILESAFECALLERRD0(MEDsubdomainComputingStepInfo,(fid, mName.c_str(), jointName.c_str(), num, &order, &iteration, &ncorrespondence));
 268   MEDFileJointOneStep::setOrder(FromMedInt<int>(order));
 269   MEDFileJointOneStep::setIteration(FromMedInt<int>(iteration));
 270   for ( int cur_it = 1; cur_it <= ncorrespondence; ++cur_it )
 271     {
 272       med_int num_entity;
 273       med_entity_type loc_ent_type, rem_ent_type;
 274       med_geometry_type loc_geo_type, rem_geo_type;
 275       MEDFILESAFECALLERRD0(MEDsubdomainCorrespondenceSizeInfo,(fid, mName.c_str(), jointName.c_str(), order, iteration, cur_it,
 276                                                                &loc_ent_type, &loc_geo_type, &rem_ent_type, &rem_geo_type, &num_entity));
 277       if ( num_entity > 0 )
 278         {
 279           MCAuto<DataArrayMedInt> correspondence=DataArrayMedInt::New();
 280           correspondence->alloc(num_entity*2, 1);
 281           MEDFILESAFECALLERRD0(MEDsubdomainCorrespondenceRd,(fid, mName.c_str(), jointName.c_str(), order, iteration, loc_ent_type,
 282                                                              loc_geo_type, rem_ent_type, rem_geo_type, correspondence->getPointer()));
 283           MEDFileJointCorrespondence *cor=MEDFileJointCorrespondence::New();
 284           cor->setIsNodal( loc_ent_type == MED_NODE );
 285           cor->setLocalGeometryType ( convertGeometryType( loc_geo_type ));
 286           cor->setRemoteGeometryType( convertGeometryType( rem_geo_type ));
 287           cor->setCorrespondence( FromMedIntArray<mcIdType>(correspondence ));
 288           _correspondences.push_back(cor);
 289         }
 290     }
 291 }
 292
 293 /*!
 294  * Writes \a this joint into a MED file specified by its name.
 295  *  \param [in] fileName - the MED file name.
 296  *  \param [in] mode - the writing mode. For more on \a mode, see \ref AdvMEDLoaderBasics.
 297  * - 2 - erase; an existing file is removed.
 298  * - 1 - append; same data should not be present in an existing file.
 299  * - 0 - overwrite; same data present in an existing file is overwritten.
 300  *  \throw If the mesh name is not set.
 301  *  \throw If \a mode == 1 and the same data is present in an existing file.
 302  */
 303 void MEDFileJointOneStep::write(const std::string& fileName, int mode, const std::string& localMeshName, const std::string& jointName) const
 304 {
 305   med_access_mode medmod=MEDFileUtilities::TraduceWriteMode(mode);
 306   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(),medmod);
 307   std::ostringstream oss; oss << "MEDFileJointOneStep : error on attempt to write in file : \"" << fileName << "\"";
 308   MEDFileUtilities::CheckMEDCode((int)fid,fid,oss.str());
 309   if ( _correspondences.empty() )
 310     throw INTERP_KERNEL::Exception("MEDFileJointOneStep::write : no correspondences defined !");
 311   writeLL(fid, localMeshName, jointName);
 312 }
 313
 314 void MEDFileJointOneStep::writeLL(med_idt fid, const std::string& localMeshName, const std::string& jointName) const
 315 {
 316   for(std::vector< MCAuto<MEDFileJointCorrespondence> >::const_iterator it=_correspondences.begin();it!=_correspondences.end();it++)
 317     {
 318       (*it)->writeLL(fid, localMeshName, jointName, getOrder(), getIteration());
 319     }
 320 }
 321
 322 void MEDFileJointOneStep::pushCorrespondence(MEDFileJointCorrespondence* correspondence)
 323 {
 324   if(!correspondence)
 325     throw INTERP_KERNEL::Exception("MEDFileJointCorrespondence::pushCorrespondence : invalid input pointer ! should be different from 0 !");
 326   _correspondences.push_back(correspondence);
 327   correspondence->incrRef();
 328 }
 329
 330 int MEDFileJointOneStep::getNumberOfCorrespondences() const
 331 {
 332   return (int)_correspondences.size();
 333 }
 334
 335 /** Return a borrowed reference (caller is not responsible) */
 336 MEDFileJointCorrespondence *MEDFileJointOneStep::getCorrespondenceAtPos(int i) const
 337 {
 338   if(i<0 || i>=(int)_correspondences.size())
 339     {
 340       std::ostringstream oss; oss << "MEDFileJointOneStep::getCorrespondenceAtPos : invalid correspondence id given in parameter ! Should be in [0;" << _correspondences.size() << ") !";
 341       throw INTERP_KERNEL::Exception(oss.str().c_str());
 342     }
 343   const MEDFileJointCorrespondence* ret = _correspondences[i];
 344   return const_cast<MEDFileJointCorrespondence *>( ret );
 345 }
 346
 347 /*!
 348  * Checks if \a this and another Joint are equal.
 349  *  \param [in] other - the Joint to compare with.
 350  *  \return bool - \c true if the Joints are equal, \c false, else.
 351  */
 352 bool MEDFileJointOneStep::isEqual(const MEDFileJointOneStep *other) const
 353 {
 354   if(_order!=other->_order)
 355     return false;
 356   if(_iteration!=other->_iteration)
 357     return false;
 358   if ( getNumberOfCorrespondences() != other->getNumberOfCorrespondences() )
 359     return false;
 360
 361   std::vector<bool> found( getNumberOfCorrespondences(), false );
 362   for(int i=0; i<getNumberOfCorrespondences(); i++)
 363     {
 364       int j;
 365       for(j=0; j<getNumberOfCorrespondences(); j++)
 366         {
 367           if ( !found[ j ] &&
 368                getCorrespondenceAtPos(i)->isEqual(other->getCorrespondenceAtPos(j)))
 369             {
 370               found[ j ] = true;
 371               break;
 372             }
 373         }
 374       if ( j == getNumberOfCorrespondences() )
 375         return false;
 376     }
 377   return true;
 378 }
 379
 380 MEDFileJointOneStep *MEDFileJointOneStep::deepCopy() const
 381 {
 382   std::vector< MCAuto<MEDFileJointCorrespondence> > correspondences(_correspondences.size());
 383   std::size_t i=0;
 384   for(std::vector< MCAuto<MEDFileJointCorrespondence> >::const_iterator it=_correspondences.begin();it!=_correspondences.end();it++,i++)
 385     if((const MEDFileJointCorrespondence *)*it)
 386       correspondences[i]=(*it)->deepCopy();
 387   MCAuto<MEDFileJointOneStep> ret= new MEDFileJointOneStep;
 388   ret->_correspondences=correspondences;
 389   return ret.retn();
 390 }
 391
 392 MEDFileJointOneStep *MEDFileJointOneStep::shallowCpy() const
 393 {
 394   MCAuto<MEDFileJointOneStep> ret=new MEDFileJointOneStep(*this);
 395   return ret.retn();
 396 }
 397
 398 /*!
 399  * Returns a string describing \a this Joint. This description includes the correspondence and
 400  * the number of correspondences.
 401  *  \return std::string - the joint information string.
 402  */
 403 std::string MEDFileJointOneStep::simpleRepr() const
 404 {
 405   std::ostringstream oss;
 406   oss << "(*************************************)\n(* JOINT_ONE_STEP INFORMATION: *)\n(*************************************)\n";
 407   oss << "- Number of the correspondences : <<" << _correspondences.size() << ">>\n";
 408   for(std::vector< MCAuto<MEDFileJointCorrespondence> >::const_iterator it=_correspondences.begin();it!=_correspondences.end();it++)
 409     {
 410       oss << (*it)->simpleRepr();
 411     }
 412   return oss.str();
 413 }
 414
 415 INTERP_KERNEL::NormalizedCellType MEDFileJointOneStep::convertGeometryType(med_geometry_type geotype)
 416 {
 417   INTERP_KERNEL::NormalizedCellType result=INTERP_KERNEL::NORM_ERROR;
 418   for(int i=0; i<MED_N_CELL_FIXED_GEO; i++)
 419     {
 420       if (typmai[i]==geotype)
 421         {
 422           result=typmai2[i];
 423           break;
 424         }
 425     }
 426   return result;
 427 }
 428
 429 std::size_t MEDFileJoint::getHeapMemorySizeWithoutChildren() const
 430 {
 431   return _joint.capacity()*sizeof(MCAuto<MEDFileJointOneStep>);
 432 }
 433
 434 std::vector<const BigMemoryObject *> MEDFileJoint::getDirectChildrenWithNull() const
 435 {
 436   return std::vector<const BigMemoryObject *>();
 437 }
 438
 439 MEDFileJoint *MEDFileJoint::New()
 440 {
 441   return new MEDFileJoint();
 442 }
 443
 444 MEDFileJoint *MEDFileJoint::New(const std::string& fileName, const std::string& mName, int curJoint)
 445 {
 446   MEDFileUtilities::CheckFileForRead(fileName);
 447   MEDFileUtilities::AutoFid fid=MEDfileOpen(fileName.c_str(), MED_ACC_RDONLY);
 448   return new MEDFileJoint(fid,mName,curJoint);
 449 }
 450
 451 MEDFileJoint *MEDFileJoint::New(med_idt fid, const std::string& mName, int curJoint)
 452 {
 453   return new MEDFileJoint(fid,mName,curJoint);
 454 }
 455
 456 MEDFileJoint *MEDFileJoint::New(const std::string& jointName, const std::string& locMeshName, const std::string& remoteMeshName, int remoteMeshNum)
 457 {
 458   MEDFileJoint* j = new MEDFileJoint();
 459   j->setJointName( jointName );
 460   j->setLocalMeshName( locMeshName );
 461   j->setRemoteMeshName( remoteMeshName );
 462   j->setDomainNumber( remoteMeshNum );
 463   return j;
 464 }
 465
 466 MEDFileJoint::MEDFileJoint()
 467 {
 468 }
 469
 470 /*!
 471  * Returns a new MEDFileJoint holding the mesh data that has been read from a given MED
 472  * file. The Joint to load is specified by mesh name and a Joint iteration.
 473  *  \param [in] fileName - the name of MED file to read.
 474  *  \param [in] mName - the name of the mesh to read.
 475  *  \param [in] curJoint - the iteration number of current joint.
 476  *  \return MEDFileJoint * - a new instance of MEDFileJoint.
 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 }