// SMESH SMESH_I : idl implementation based on 'SMESH' unit's calsses // // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN, // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS // // This library is free software; you can redistribute it and/or // modify it under the terms of the GNU Lesser General Public // License as published by the Free Software Foundation; either // version 2.1 of the License. // // This library is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU // Lesser General Public License for more details. // // You should have received a copy of the GNU Lesser General Public // License along with this library; if not, write to the Free Software // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA // // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org // // // // File : SMESH_Gen_i.cxx // Author : Paul RASCLE, EDF // Module : SMESH // $Header$ using namespace std; #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "SMESH_Gen_i.hxx" #include "SMESH_Mesh_i.hxx" #include "SMESH_LocalLength_i.hxx" #include "SMESH_NumberOfSegments_i.hxx" #include "SMESH_MaxElementArea_i.hxx" #include "SMESHDS_Document.hxx" #include "Document_Reader.h" #include "DriverMED_W_SMESHDS_Mesh.h" #include "DriverMED_R_SMESHDS_Mesh.h" #include "DriverMED_R_SMESHDS_Document.h" #include "DriverUNV_R_SMESHDS_Document.h" #include "DriverDAT_R_SMESHDS_Document.h" #include "Utils_CorbaException.hxx" #include "utilities.h" #include "SALOMEDS_Tool.hxx" #include "SALOME_NamingService.hxx" #include "SALOME_LifeCycleCORBA.hxx" #include "Utils_SINGLETON.hxx" #include "OpUtil.hxx" //#include #include "GEOM_Client.hxx" #include #define NUM_TMP_FILES 4 // Tags definition long Tag_HypothesisRoot = 1; long Tag_AlgorithmsRoot = 2; long Tag_RefOnShape = 1; long Tag_RefOnAppliedHypothesis = 2; long Tag_RefOnAppliedAlgorithms = 3; long Tag_SubMeshOnVertex = 4; long Tag_SubMeshOnEdge = 5; long Tag_SubMeshOnFace = 6; long Tag_SubMeshOnSolid = 7; long Tag_SubMeshOnCompound = 8; //============================================================================= /*! * default constructor: not for use */ //============================================================================= SMESH_Gen_i::SMESH_Gen_i() { MESSAGE("SMESH_Gen_i default constructor"); // **** } //============================================================================= /*! * Standard constructor, used with Container. */ //============================================================================= SMESH_Gen_i::SMESH_Gen_i(CORBA::ORB_ptr orb, PortableServer::POA_ptr poa, PortableServer::ObjectId * contId, const char *instanceName, const char *interfaceName) : Engines_Component_i(orb, poa, contId, instanceName, interfaceName) { MESSAGE("activate object"); _thisObj = this ; _id = _poa->activate_object(_thisObj); _ShapeReader = NULL; _localId = 0; // number of created objects & local id } //============================================================================= /*! * Standard destructor */ //============================================================================= SMESH_Gen_i::~SMESH_Gen_i() { MESSAGE("~SMESH_Gen_i"); // **** } //============================================================================= /*! * */ //============================================================================= SMESH::SMESH_Hypothesis_ptr SMESH_Gen_i::CreateHypothesis(const char* anHyp, CORBA::Long studyId) throw (SALOME::SALOME_Exception) { MESSAGE("CreateHypothesis"); // create a new hypothesis object servant SMESH_Hypothesis_i* myHypothesis_i = 0; try { myHypothesis_i = _hypothesisFactory_i.Create(anHyp, studyId, &_impl); } catch (SALOME_Exception& S_ex) { THROW_SALOME_CORBA_EXCEPTION(S_ex.what(), SALOME::BAD_PARAM); } // activate the CORBA servant of hypothesis SMESH::SMESH_Hypothesis_var hypothesis_i = SMESH::SMESH_Hypothesis::_narrow(myHypothesis_i->_this()); return SMESH::SMESH_Hypothesis::_duplicate(hypothesis_i); } //============================================================================= /*! * */ //============================================================================= SMESH::SMESH_Mesh_ptr SMESH_Gen_i::Init(GEOM::GEOM_Gen_ptr geomEngine, CORBA::Long studyId, GEOM::GEOM_Shape_ptr aShape) throw (SALOME::SALOME_Exception) { MESSAGE("Init"); // _narrow() duplicates the reference and checks the type GEOM::GEOM_Gen_var geom = GEOM::GEOM_Gen::_narrow(geomEngine); GEOM::GEOM_Shape_var myShape = GEOM::GEOM_Shape::_narrow(aShape); if (CORBA::is_nil(geom)) THROW_SALOME_CORBA_EXCEPTION("bad geom reference", \ SALOME::BAD_PARAM); if (CORBA::is_nil(myShape)) THROW_SALOME_CORBA_EXCEPTION("bad shape reference", \ SALOME::BAD_PARAM); // Get or create the GEOM_Client instance SMESH_Mesh_i* meshServant = 0; try { if (! _ShapeReader) _ShapeReader = new GEOM_Client(); ASSERT(_ShapeReader); // explore main Shape, get local TopoDS_Shapes of all subShapes // SMESH_topo* myTopo = ExploreMainShape(geom, studyId, myShape); // Get studyContext_i, create it if it does'nt exist if (_mapStudyContext_i.find(studyId) == _mapStudyContext_i.end()) { _mapStudyContext_i[studyId] = new StudyContext_iStruct; } StudyContext_iStruct* myStudyContext = _mapStudyContext_i[studyId]; // create a new mesh object servant, store it in a map in study context meshServant = new SMESH_Mesh_i(this, geom, studyId, _localId); myStudyContext->mapMesh_i[_localId] = meshServant; _localId++; // create a new mesh object TopoDS_Shape myLocShape = _ShapeReader->GetShape(geom,myShape); meshServant->SetImpl(_impl.Init(studyId, myLocShape)); } catch (SALOME_Exception& S_ex) { THROW_SALOME_CORBA_EXCEPTION(S_ex.what(), SALOME::BAD_PARAM); } // activate the CORBA servant of Mesh SMESH::SMESH_Mesh_var mesh = SMESH::SMESH_Mesh::_narrow(meshServant->_this()); meshServant->SetIor(mesh); return SMESH::SMESH_Mesh::_duplicate(mesh); } //============================================================================= /*! * */ //============================================================================= CORBA::Boolean SMESH_Gen_i::IsReadyToCompute(SMESH::SMESH_Mesh_ptr aMesh, GEOM::GEOM_Shape_ptr aShape) throw (SALOME::SALOME_Exception) { MESSAGE("SMESH_Gen_i::IsReadyToCompute"); return true; } //============================================================================= /*! * */ //============================================================================= SMESH::long_array* SMESH_Gen_i::GetSubShapesId(GEOM::GEOM_Gen_ptr geomEngine, CORBA::Long studyId, GEOM::GEOM_Shape_ptr mainShape, const SMESH::shape_array& listOfSubShape) throw (SALOME::SALOME_Exception) { MESSAGE("SMESH_Gen_i::GetSubShapesId"); SMESH::long_array_var shapesId = new SMESH::long_array; set setId; GEOM::GEOM_Gen_var geom = GEOM::GEOM_Gen::_narrow(geomEngine); GEOM::GEOM_Shape_var myShape = GEOM::GEOM_Shape::_narrow(mainShape); if (CORBA::is_nil(geom)) THROW_SALOME_CORBA_EXCEPTION("bad geom reference", \ SALOME::BAD_PARAM); if (CORBA::is_nil(myShape)) THROW_SALOME_CORBA_EXCEPTION("bad shape reference", \ SALOME::BAD_PARAM); try { if (! _ShapeReader) _ShapeReader = new GEOM_Client(); ASSERT(_ShapeReader); TopoDS_Shape myMainShape = _ShapeReader->GetShape(geom,myShape); TopTools_IndexedMapOfShape myIndexToShape; TopExp::MapShapes(myMainShape,myIndexToShape); for (int i=0; iGetShape(geom,aShape); for (TopExp_Explorer exp(locShape,TopAbs_FACE); exp.More(); exp.Next()) { const TopoDS_Face& F = TopoDS::Face(exp.Current()); setId.insert(myIndexToShape.FindIndex(F)); SCRUTE(myIndexToShape.FindIndex(F)); } for (TopExp_Explorer exp(locShape,TopAbs_EDGE); exp.More(); exp.Next()) { const TopoDS_Edge& E = TopoDS::Edge(exp.Current()); setId.insert(myIndexToShape.FindIndex(E)); SCRUTE(myIndexToShape.FindIndex(E)); } for (TopExp_Explorer exp(locShape,TopAbs_VERTEX); exp.More(); exp.Next()) { const TopoDS_Vertex& V = TopoDS::Vertex(exp.Current()); setId.insert(myIndexToShape.FindIndex(V)); SCRUTE(myIndexToShape.FindIndex(V)); } } shapesId->length(setId.size()); set::iterator iind; int i=0; for (iind = setId.begin(); iind != setId.end(); iind++) { SCRUTE((*iind)); shapesId[i] = (*iind); SCRUTE(shapesId[i]); i++; } } catch (SALOME_Exception& S_ex) { THROW_SALOME_CORBA_EXCEPTION(S_ex.what(), SALOME::BAD_PARAM); } return shapesId._retn(); } //============================================================================= /*! * */ //============================================================================= CORBA::Boolean SMESH_Gen_i::Compute(SMESH::SMESH_Mesh_ptr aMesh, GEOM::GEOM_Shape_ptr aShape) throw (SALOME::SALOME_Exception) { MESSAGE("SMESH_Gen_i::Compute"); GEOM::GEOM_Shape_var myShape = GEOM::GEOM_Shape::_narrow(aShape); if (CORBA::is_nil(myShape)) THROW_SALOME_CORBA_EXCEPTION("bad shape reference", \ SALOME::BAD_PARAM); SMESH::SMESH_Mesh_var myMesh = SMESH::SMESH_Mesh::_narrow(aMesh); if (CORBA::is_nil(myMesh)) THROW_SALOME_CORBA_EXCEPTION("bad Mesh reference", \ SALOME::BAD_PARAM); bool ret = false; try { // get study context from studyId given by CORBA mesh object int studyId = myMesh->GetStudyId(); ASSERT(_mapStudyContext_i.find(studyId) != _mapStudyContext_i.end()); StudyContext_iStruct* myStudyContext = _mapStudyContext_i[studyId]; // get local Mesh_i object with Id and study context int meshId = myMesh->GetId(); ASSERT(myStudyContext->mapMesh_i.find(meshId) != myStudyContext->mapMesh_i.end()); SMESH_Mesh_i* meshServant = myStudyContext->mapMesh_i[meshId]; ASSERT(meshServant); // get local TopoDS_Shape GEOM::GEOM_Gen_var geom = meshServant->GetGeomEngine(); TopoDS_Shape myLocShape = _ShapeReader->GetShape(geom,myShape); // implementation compute ::SMESH_Mesh& myLocMesh = meshServant->GetImpl(); ret = _impl.Compute(myLocMesh, myLocShape); } catch (SALOME_Exception& S_ex) { MESSAGE("catch exception "<< S_ex.what()); return false; // THROW_SALOME_CORBA_EXCEPTION(S_ex.what(), SALOME::BAD_PARAM); } return ret; } //============================================================================= /*! * */ //============================================================================= SALOMEDS::TMPFile* SMESH_Gen_i::Save(SALOMEDS::SComponent_ptr theComponent, const char* theURL, bool isMultiFile) { MESSAGE("SMESH_Gen_i::SAVE"); SALOMEDS::Study_var Study = theComponent->GetStudy(); int studyId; // Declare a byte stream SALOMEDS::TMPFile_var aStreamFile; // Obtain a temporary dir TCollection_AsciiString tmpDir = (isMultiFile)?TCollection_AsciiString((char*)theURL):SALOMEDS_Tool::GetTmpDir(); // Create a sequence of files processed SALOMEDS::ListOfFileNames_var aFileSeq = new SALOMEDS::ListOfFileNames; aFileSeq->length(NUM_TMP_FILES); TCollection_AsciiString aStudyName(SALOMEDS_Tool::GetNameFromPath(theComponent->GetStudy()->URL())); // Set names of temporary files TCollection_AsciiString filename = aStudyName + TCollection_AsciiString("SMESH.hdf"); TCollection_AsciiString hypofile = aStudyName + TCollection_AsciiString("SMESH_Hypo.txt"); TCollection_AsciiString algofile = aStudyName + TCollection_AsciiString("SMESH_Algo.txt"); TCollection_AsciiString meshfile = aStudyName + TCollection_AsciiString("SMESH_Mesh.med"); aFileSeq[0] = CORBA::string_dup(filename.ToCString()); aFileSeq[1] = CORBA::string_dup(hypofile.ToCString()); aFileSeq[2] = CORBA::string_dup(algofile.ToCString()); aFileSeq[3] = CORBA::string_dup(meshfile.ToCString()); filename = tmpDir + filename; hypofile = tmpDir + hypofile; algofile = tmpDir + algofile; meshfile = tmpDir + meshfile; HDFfile * hdf_file; map hdf_group, hdf_subgroup; map hdf_dataset; FILE* destFile; SALOMEDS::ChildIterator_var itBig,it,itSM; SALOMEDS::SObject_var mySObject,myBranch,mySObjectChild; hdf_size size[1]; int longueur,cmpt_ds = 0,cmpt_it; char *name_group,name_dataset[30],name_meshgroup[30]; bool ok,_found; int cmpt_sm = 0, myTag; //************* HDF file creation hdf_file = new HDFfile(filename.ToCString()); hdf_file->CreateOnDisk(); //**************************** itBig = Study->NewChildIterator(theComponent); for (; itBig->More();itBig->Next()) { SALOMEDS::SObject_var gotBranch = itBig->Value(); //************branch 1 : hypothesis if (gotBranch->Tag()==Tag_HypothesisRoot) { //hypothesis = tag 1 double length,maxElementsArea; int numberOfSegments; destFile = fopen( hypofile.ToCString() ,"w"); it = Study->NewChildIterator(gotBranch); for (; it->More();it->Next()) { mySObject = it->Value(); SALOMEDS::GenericAttribute_var anAttr; SALOMEDS::AttributeIOR_var anIOR; if ( mySObject->FindAttribute(anAttr, "AttributeIOR")) { anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); SMESH::SMESH_Hypothesis_var myHyp = SMESH::SMESH_Hypothesis::_narrow(_orb->string_to_object(anIOR->Value())); fprintf(destFile,"%s\n",myHyp->GetName()); if (strcmp(myHyp->GetName(),"LocalLength")==0) { SMESH::SMESH_LocalLength_var LL = SMESH::SMESH_LocalLength::_narrow( myHyp ); length = LL->GetLength(); fprintf(destFile,"%f\n",length); } else if (strcmp(myHyp->GetName(),"NumberOfSegments")==0) { SMESH::SMESH_NumberOfSegments_var NOS = SMESH::SMESH_NumberOfSegments::_narrow( myHyp ); numberOfSegments = NOS->GetNumberOfSegments(); fprintf(destFile,"%d\n",numberOfSegments); } else if (strcmp(myHyp->GetName(),"MaxElementArea")==0) { SMESH::SMESH_MaxElementArea_var MEA = SMESH::SMESH_MaxElementArea::_narrow( myHyp ); maxElementsArea = MEA->GetMaxElementArea(); fprintf(destFile,"%f\n",maxElementsArea); } } } fclose(destFile); //writes the file name in the hdf file longueur = hypofile.Length() +1; name_group="Hypothesis"; //SCRUTE(name_group); size[0]=longueur; hdf_group[1] = new HDFgroup(name_group,hdf_file); hdf_group[1]->CreateOnDisk(); hdf_dataset[cmpt_ds]=new HDFdataset(name_group,hdf_group[1],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(hypofile.ToCString()); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; hdf_group[1]->CloseOnDisk(); MESSAGE("End of Hypothesis Save"); } //************branch 2 : algorithms else if (gotBranch->Tag()==Tag_AlgorithmsRoot) {//algos = tag 2 destFile = fopen( algofile.ToCString() ,"w"); it = Study->NewChildIterator(gotBranch); for (; it->More();it->Next()) { mySObject = it->Value(); SALOMEDS::GenericAttribute_var anAttr; SALOMEDS::AttributeIOR_var anIOR; if (mySObject->FindAttribute(anAttr, "AttributeIOR")) { anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); SMESH::SMESH_Algo_var myAlgo = SMESH::SMESH_Algo::_narrow(_orb->string_to_object(anIOR->Value())); fprintf(destFile,"%s\n",myAlgo->GetName()); } } fclose(destFile); //writes the file name in the hdf file longueur = algofile.Length() +1; name_group="Algorithms"; //SCRUTE(name_group); size[0]=longueur; hdf_group[2] = new HDFgroup(name_group,hdf_file); hdf_group[2]->CreateOnDisk(); hdf_dataset[cmpt_ds]=new HDFdataset(name_group,hdf_group[2],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(algofile.ToCString()); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; hdf_group[2]->CloseOnDisk(); MESSAGE("End of Algos Save"); } //************branch 3 : meshes else if (gotBranch->Tag()>=3) {//meshes = tag > 3 SALOMEDS::GenericAttribute_var anAttr; SALOMEDS::AttributeIOR_var anIOR; if (gotBranch->FindAttribute(anAttr, "AttributeIOR")) { anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); SMESH::SMESH_Mesh_var myMesh = SMESH::SMESH_Mesh::_narrow(_orb->string_to_object(anIOR->Value())) ; studyId = myMesh->GetStudyId(); SCRUTE(studyId); StudyContext_iStruct* myStudyContext = _mapStudyContext_i[studyId]; int meshId = myMesh->GetId(); SMESH_Mesh_i* meshServant = myStudyContext->mapMesh_i[meshId]; ::SMESH_Mesh& myLocMesh = meshServant->GetImpl(); Handle(SMESHDS_Mesh) mySMESHDSMesh = myLocMesh.GetMeshDS(); SCRUTE(mySMESHDSMesh->NbNodes()); if (mySMESHDSMesh->NbNodes()>0) {//checks if the mesh is not empty DriverMED_W_SMESHDS_Mesh* myWriter = new DriverMED_W_SMESHDS_Mesh; myWriter->SetFile(meshfile.ToCString()); myWriter->SetMesh(mySMESHDSMesh); myWriter->SetMeshId(gotBranch->Tag()); myWriter->Add(); } else meshfile = "No data"; //********** opening of the HDF group sprintf(name_meshgroup,"Mesh %d",gotBranch->Tag()); SCRUTE(name_meshgroup); hdf_group[gotBranch->Tag()] = new HDFgroup(name_meshgroup,hdf_file); hdf_group[gotBranch->Tag()]->CreateOnDisk(); //********** //********** file where the data are stored longueur = strlen(meshfile.ToCString()) +1; size[0]=longueur; strcpy(name_dataset,"Mesh data"); hdf_dataset[cmpt_ds]=new HDFdataset(name_dataset,hdf_group[gotBranch->Tag()],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(meshfile.ToCString()); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; //********** //********** ref on shape Standard_CString myRefOnObject="" ; SALOMEDS::SObject_var myRef,myShape; _found = gotBranch->FindSubObject(Tag_RefOnShape,myRef); if (_found) { ok = myRef->ReferencedObject(myShape); myRefOnObject = myShape->GetID(); SCRUTE(myRefOnObject); longueur = strlen(myRefOnObject) +1; if (longueur>1) { size[0]=longueur; strcpy(name_dataset,"Ref on shape"); hdf_dataset[cmpt_ds]=new HDFdataset(name_dataset,hdf_group[gotBranch->Tag()],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(myRefOnObject); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; } } //********** //********** ref on applied hypothesis _found = gotBranch->FindSubObject(Tag_RefOnAppliedHypothesis,myBranch); if (_found) { strcpy(name_meshgroup,"Applied Hypothesis"); hdf_subgroup[Tag_RefOnAppliedHypothesis] = new HDFgroup(name_meshgroup,hdf_group[gotBranch->Tag()]); hdf_subgroup[Tag_RefOnAppliedHypothesis]->CreateOnDisk(); it = Study->NewChildIterator(myBranch); cmpt_it = 0; for (; it->More();it->Next()) { mySObject = it->Value(); ok = mySObject->ReferencedObject(myRef); myRefOnObject = myRef->GetID(); longueur = strlen(myRefOnObject) +1; if (longueur>1) { size[0]=longueur; sprintf(name_dataset,"Hyp %d",cmpt_it); hdf_dataset[cmpt_ds]=new HDFdataset(name_dataset,hdf_subgroup[Tag_RefOnAppliedHypothesis],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(myRefOnObject); hdf_dataset[cmpt_ds]->CloseOnDisk(); } cmpt_ds++; cmpt_it++; } hdf_subgroup[Tag_RefOnAppliedHypothesis]->CloseOnDisk(); } //********** //********** ref on applied algorithms _found = gotBranch->FindSubObject(Tag_RefOnAppliedAlgorithms,myBranch); if (_found) { strcpy(name_meshgroup,"Applied Algorithms"); hdf_subgroup[Tag_RefOnAppliedAlgorithms] = new HDFgroup(name_meshgroup,hdf_group[gotBranch->Tag()]); hdf_subgroup[Tag_RefOnAppliedAlgorithms]->CreateOnDisk(); it = Study->NewChildIterator(myBranch); cmpt_it = 0; for (; it->More();it->Next()) { mySObject = it->Value(); ok = mySObject->ReferencedObject(myRef); myRefOnObject = myRef->GetID(); longueur = strlen(myRefOnObject) +1; if (longueur>1) { size[0]=longueur; sprintf(name_dataset,"Algo %d",cmpt_it); hdf_dataset[cmpt_ds]=new HDFdataset(name_dataset,hdf_subgroup[Tag_RefOnAppliedAlgorithms],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(myRefOnObject); hdf_dataset[cmpt_ds]->CloseOnDisk(); } cmpt_ds++; cmpt_it++; } hdf_subgroup[Tag_RefOnAppliedAlgorithms]->CloseOnDisk(); } MESSAGE("end of algo applied"); //********** //********** submeshes on subshapes int myLevel1Tag; for (int i=Tag_SubMeshOnVertex;i<=Tag_SubMeshOnCompound;i++) { _found = gotBranch->FindSubObject(i,myBranch); if (_found) { if (i==Tag_SubMeshOnVertex) strcpy(name_meshgroup,"SubMeshes On Vertex"); else if (i==Tag_SubMeshOnEdge) strcpy(name_meshgroup,"SubMeshes On Edge"); else if (i==Tag_SubMeshOnFace) strcpy(name_meshgroup,"SubMeshes On Face"); else if (i==Tag_SubMeshOnSolid) strcpy(name_meshgroup,"SubMeshes On Solid"); else if (i==Tag_SubMeshOnCompound) strcpy(name_meshgroup,"SubMeshes On Compound"); cmpt_sm++; myLevel1Tag = 10+cmpt_sm; hdf_subgroup[myLevel1Tag] = new HDFgroup(name_meshgroup,hdf_group[gotBranch->Tag()]); hdf_subgroup[myLevel1Tag]->CreateOnDisk(); itSM = Study->NewChildIterator(myBranch); for (; itSM->More();itSM->Next()) {//Loop on all submeshes mySObject = itSM->Value(); cmpt_sm++; myTag = 10+cmpt_sm; mySObject->FindAttribute(anAttr, "AttributeIOR"); anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); SMESH::SMESH_subMesh_var mySubMesh = SMESH::SMESH_subMesh::_narrow(_orb->string_to_object(anIOR->Value())) ; //sprintf(name_meshgroup,"SubMesh %d",myTag); sprintf(name_meshgroup,"SubMesh %d",mySubMesh->GetId()); SCRUTE(name_meshgroup); hdf_subgroup[myTag] = new HDFgroup(name_meshgroup,hdf_subgroup[myLevel1Tag]); hdf_subgroup[myTag]->CreateOnDisk(); //********** ref on shape Standard_CString myRefOnObject="" ; SALOMEDS::SObject_var myRef,myShape; bool _found2; _found2 = mySObject->FindSubObject(Tag_RefOnShape,myRef); if (_found2) { ok = myRef->ReferencedObject(myShape); myRefOnObject = myShape->GetID(); SCRUTE(myRefOnObject); longueur = strlen(myRefOnObject) +1; if (longueur>1) { size[0]=longueur; strcpy(name_dataset,"Ref on shape"); hdf_dataset[cmpt_ds]=new HDFdataset(name_dataset,hdf_subgroup[myTag],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(myRefOnObject); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; } } //********** //********** ref on applied hypothesis _found2 = mySObject->FindSubObject(Tag_RefOnAppliedHypothesis,myBranch); if (_found2) { strcpy(name_meshgroup,"Applied Hypothesis"); cmpt_sm++; hdf_subgroup[10+cmpt_sm] = new HDFgroup(name_meshgroup,hdf_subgroup[myTag]); hdf_subgroup[10+cmpt_sm]->CreateOnDisk(); it = Study->NewChildIterator(myBranch); cmpt_it = 0; for (; it->More();it->Next()) { mySObjectChild = it->Value(); ok = mySObjectChild->ReferencedObject(myRef); myRefOnObject = myRef->GetID(); longueur = strlen(myRefOnObject) +1; if (longueur>1) { size[0]=longueur; sprintf(name_dataset,"Hyp %d",cmpt_it); SCRUTE(cmpt_it); hdf_dataset[cmpt_ds]=new HDFdataset(name_dataset,hdf_subgroup[10+cmpt_sm],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(myRefOnObject); hdf_dataset[cmpt_ds]->CloseOnDisk(); } cmpt_ds++; cmpt_it++; } hdf_subgroup[10+cmpt_sm]->CloseOnDisk(); } //********** //********** ref on applied algorithms _found2 = mySObject->FindSubObject(Tag_RefOnAppliedAlgorithms,myBranch); SCRUTE(_found2); if (_found2) { strcpy(name_meshgroup,"Applied Algorithms"); cmpt_sm++; hdf_subgroup[10+cmpt_sm] = new HDFgroup(name_meshgroup,hdf_subgroup[myTag]); hdf_subgroup[10+cmpt_sm]->CreateOnDisk(); it = Study->NewChildIterator(myBranch); cmpt_it = 0; for (; it->More();it->Next()) { mySObjectChild = it->Value(); ok = mySObjectChild->ReferencedObject(myRef); myRefOnObject = myRef->GetID(); longueur = strlen(myRefOnObject) +1; if (longueur>1) { size[0]=longueur; sprintf(name_dataset,"Algo %d",cmpt_it); hdf_dataset[cmpt_ds]=new HDFdataset(name_dataset,hdf_subgroup[10+cmpt_sm],HDF_STRING,size,1); hdf_dataset[cmpt_ds]->CreateOnDisk(); hdf_dataset[cmpt_ds]->WriteOnDisk(myRefOnObject); hdf_dataset[cmpt_ds]->CloseOnDisk(); } cmpt_ds++; cmpt_it++; } hdf_subgroup[10+cmpt_sm]->CloseOnDisk(); } //MESSAGE("end of algo applied"); //********** hdf_subgroup[myTag]->CloseOnDisk(); } hdf_subgroup[myLevel1Tag]->CloseOnDisk(); } } //********** //********** closing of the HDF group hdf_group[gotBranch->Tag()]->CloseOnDisk(); MESSAGE("End of Mesh Save"); //********** } } MESSAGE("End of Meshes Save"); } hdf_file->CloseOnDisk(); delete hdf_file; hdf_file = 0; // Convert temporary files to stream aStreamFile = SALOMEDS_Tool::PutFilesToStream(tmpDir.ToCString(), aFileSeq.in(), isMultiFile); // Remove temporary files and directory if (isMultiFile) SALOMEDS_Tool::RemoveTemporaryFiles(tmpDir.ToCString(), aFileSeq.in(), true); MESSAGE("End SMESH_Gen_i::Save"); return aStreamFile._retn(); } SALOMEDS::TMPFile* SMESH_Gen_i::SaveASCII(SALOMEDS::SComponent_ptr theComponent, const char* theURL, bool isMultiFile) { SALOMEDS::TMPFile_var aStreamFile = Save(theComponent, theURL, isMultiFile); return aStreamFile._retn(); } //============================================================================= /*! * */ //============================================================================= bool SMESH_Gen_i::Load(SALOMEDS::SComponent_ptr theComponent, const SALOMEDS::TMPFile& theStream, const char* theURL, bool isMultiFile) { MESSAGE("SMESH_Gen_i::Load\n"); // Get temporary files location TCollection_AsciiString tmpDir = isMultiFile?TCollection_AsciiString((char*)theURL):SALOMEDS_Tool::GetTmpDir(); // Convert the stream into sequence of files to process SALOMEDS::ListOfFileNames_var aFileSeq = SALOMEDS_Tool::PutStreamToFiles(theStream, tmpDir.ToCString(), isMultiFile); // Set names of temporary files TCollection_AsciiString filename = tmpDir + aFileSeq[0];//"SMESH.hdf"; TCollection_AsciiString hypofile = tmpDir + aFileSeq[1];//"SMESH_Hypo.txt"; TCollection_AsciiString algofile = tmpDir + aFileSeq[2];//"SMESH_Algo.txt"; TCollection_AsciiString meshfile = tmpDir + aFileSeq[3];//"SMESH_Mesh.med"; SALOMEDS::Study_var Study = theComponent->GetStudy(); int studyId = Study->StudyId(); SCRUTE(studyId); SALOMEDS::GenericAttribute_var anAttr; SALOMEDS::AttributeName_var aName; SALOMEDS::AttributeIOR_var anIOR; SALOMEDS::SComponent_var fathergeom = Study->FindComponent("GEOM"); SALOMEDS::SComponent_var myGeomSComp = SALOMEDS::SComponent::_narrow( fathergeom ); SCRUTE(fathergeom); //to get the geom engine !!! //useful to define our new mesh SALOME_NamingService* _NS = SINGLETON_::Instance() ; ASSERT(SINGLETON_::IsAlreadyExisting()) ; _NS->init_orb( _orb ) ; SALOME_LifeCycleCORBA* myEnginesLifeCycle = new SALOME_LifeCycleCORBA(_NS); Engines::Component_var geomEngine = myEnginesLifeCycle->FindOrLoad_Component("FactoryServer","GEOM"); GEOM::GEOM_Gen_var myGeomEngine = GEOM::GEOM_Gen::_narrow(geomEngine); char* aLine; bool ok; char objectId[10],name_dataset[10]; int nb_datasets,size,cmpt_ds=0; int cmpt_sm = 0; char name[HDF_NAME_MAX_LEN+1]; char sgname[HDF_NAME_MAX_LEN+1]; char msgname[HDF_NAME_MAX_LEN+1]; char name_of_group[HDF_NAME_MAX_LEN+1]; char *name_meshgroup; map hdf_group, hdf_subgroup; map hdf_dataset; FILE *loadedFile; //************* HDF file opening HDFfile * hdf_file = new HDFfile(filename.ToCString()); try { hdf_file->OpenOnDisk(HDF_RDONLY); } catch (HDFexception) { MESSAGE("Load(): " << filename << " not found!"); return false; } //**************************** int nb_group = hdf_file->nInternalObjects(); SCRUTE(nb_group); for (int i=0;iInternalObjectIndentify(i,name); //SCRUTE(name); //*************** // Loading of the Hypothesis Branch //*************** if (strcmp(name,"Hypothesis")==0) { double length,maxElementsArea; int numberOfSegments; hdf_group[Tag_HypothesisRoot] = new HDFgroup(name,hdf_file); hdf_group[Tag_HypothesisRoot]->OpenOnDisk(); hdf_group[Tag_HypothesisRoot]->InternalObjectIndentify(0,name_of_group); hdf_dataset[cmpt_ds]=new HDFdataset(name_of_group,hdf_group[Tag_HypothesisRoot]); hdf_dataset[cmpt_ds]->OpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * name_of_file =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(name_of_file); SCRUTE(name_of_file); hdf_dataset[cmpt_ds]->CloseOnDisk(); hdf_group[Tag_HypothesisRoot]->CloseOnDisk(); cmpt_ds++; delete[] name_of_file; name_of_file = 0; aLine = new char[100]; loadedFile = fopen( hypofile.ToCString() ,"r"); while (!feof(loadedFile)) { fscanf(loadedFile,"%s",aLine); //SCRUTE(aLine); if (strcmp(aLine,"LocalLength")==0) { SMESH::SMESH_Hypothesis_var myHyp = this->CreateHypothesis(aLine,studyId); SMESH::SMESH_LocalLength_var LL = SMESH::SMESH_LocalLength::_narrow( myHyp ); fscanf(loadedFile,"%s",aLine); length = atof(aLine); LL->SetLength(length); string iorString = _orb->object_to_string(LL); sprintf(objectId,"%d",LL->GetId()); _SMESHCorbaObj[string("Hypo_")+string(objectId)] = iorString; } else if (strcmp(aLine,"NumberOfSegments")==0) { SMESH::SMESH_Hypothesis_var myHyp = this->CreateHypothesis(aLine,studyId); SMESH::SMESH_NumberOfSegments_var NOS = SMESH::SMESH_NumberOfSegments::_narrow( myHyp ); fscanf(loadedFile,"%s",aLine); numberOfSegments = atoi(aLine); NOS->SetNumberOfSegments(numberOfSegments); string iorString = _orb->object_to_string(NOS); sprintf(objectId,"%d",NOS->GetId()); _SMESHCorbaObj[string("Hypo_")+string(objectId)] = iorString; } else if (strcmp(aLine,"MaxElementArea")==0) { SMESH::SMESH_Hypothesis_var myHyp = this->CreateHypothesis(aLine,studyId); SMESH::SMESH_MaxElementArea_var MEA = SMESH::SMESH_MaxElementArea::_narrow( myHyp ); fscanf(loadedFile,"%s",aLine); maxElementsArea = atof(aLine); MEA->SetMaxElementArea(maxElementsArea); string iorString = _orb->object_to_string(MEA); sprintf(objectId,"%d",MEA->GetId()); _SMESHCorbaObj[string("Hypo_")+string(objectId)] = iorString; } } fclose(loadedFile); delete[] aLine; aLine = 0; MESSAGE("End of Hypos Load"); } //*************** // Loading of the Algorithms Branch //*************** else if (strcmp(name,"Algorithms")==0) { hdf_group[Tag_AlgorithmsRoot] = new HDFgroup(name,hdf_file); hdf_group[Tag_AlgorithmsRoot]->OpenOnDisk(); hdf_group[Tag_AlgorithmsRoot]->InternalObjectIndentify(0,name_of_group); hdf_dataset[cmpt_ds] = new HDFdataset(name_of_group,hdf_group[Tag_AlgorithmsRoot]); hdf_dataset[cmpt_ds]->OpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * name_of_file =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(name_of_file); hdf_dataset[cmpt_ds]->CloseOnDisk(); hdf_group[Tag_AlgorithmsRoot]->CloseOnDisk(); cmpt_ds++; delete[] name_of_file; name_of_file = 0; aLine = new char[100]; loadedFile = fopen( algofile.ToCString(),"r"); while (!feof(loadedFile)) { fscanf(loadedFile,"%s\n",aLine); //SCRUTE(aLine); if (strcmp(aLine,"")!=0) { SMESH::SMESH_Hypothesis_var myHyp = this->CreateHypothesis(aLine,studyId); SMESH::SMESH_Algo_var myAlgo = SMESH::SMESH_Algo::_narrow(myHyp); string iorString = _orb->object_to_string(myAlgo); sprintf(objectId,"%d",myAlgo->GetId()); _SMESHCorbaObj[string("Hypo_")+string(objectId)] = iorString; } } fclose(loadedFile); delete[] aLine; aLine = 0; MESSAGE("End of Algos Load"); } //*************** // Loading of the Mesh Branch //*************** else if (string(name).substr(0,4)==string("Mesh")) { MESSAGE("in mesh load"); Standard_Integer myMeshId = atoi((string(name).substr(5,5)).c_str()); SCRUTE(myMeshId); hdf_group[myMeshId] = new HDFgroup(name,hdf_file); hdf_group[myMeshId]->OpenOnDisk(); int nb_meshsubgroup = hdf_group[myMeshId]->nInternalObjects(); SCRUTE(nb_meshsubgroup); //********** Loading of the file name where the data are stored MESSAGE("Mesh data file"); strcpy(name_of_group,"Mesh data"); hdf_dataset[cmpt_ds]=new HDFdataset(name_of_group,hdf_group[myMeshId]); hdf_dataset[cmpt_ds]->OpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * datafilename =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(datafilename); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; //********** //} //else if (strcmp(msgname,"Ref on shape")==0) { //********** Loading of the reference on the shape //********** and mesh initialization MESSAGE("Ref on shape"); strcpy(name_of_group,"Ref on shape"); hdf_dataset[cmpt_ds] = new HDFdataset(name_of_group,hdf_group[myMeshId]); hdf_dataset[cmpt_ds]->OpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * refFromFile =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(refFromFile); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; Standard_CString myRefOnShape=""; //look for ref on shape bool _found = false; SALOMEDS::SObject_var CSO = Study->FindObjectID(refFromFile); SMESH::SMESH_Mesh_var myNewMesh; GEOM::GEOM_Shape_var aShape; if (!CORBA::is_nil(CSO)) { _found = true; CSO->FindAttribute(anAttr, "AttributeIOR"); anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); char* ShapeIOR = anIOR->Value(); aShape = GEOM::GEOM_Shape::_narrow(_orb->string_to_object(ShapeIOR)); myNewMesh = this->Init(myGeomEngine,studyId,aShape); string iorString = _orb->object_to_string(myNewMesh); sprintf(objectId,"%d",myNewMesh->GetId()); _SMESHCorbaObj[string("Mesh_")+string(objectId)] = iorString; //********** //********** Loading of mesh data if (strcmp(datafilename,"No data")!=0) { med_idt fid; int ret; //**************************************************************************** //* OUVERTURE DU FICHIER EN LECTURE * //**************************************************************************** fid = MEDouvrir(datafilename,MED_LECT); if (fid < 0) { printf(">> ERREUR : ouverture du fichier %s \n",datafilename); exit(EXIT_FAILURE); } else { StudyContext_iStruct* myStudyContext = _mapStudyContext_i[studyId]; int meshId = myNewMesh->GetId(); SMESH_Mesh_i* meshServant = myStudyContext->mapMesh_i[meshId]; ::SMESH_Mesh& myLocMesh = meshServant->GetImpl(); Handle(SMESHDS_Mesh) mySMESHDSMesh = myLocMesh.GetMeshDS(); DriverMED_R_SMESHDS_Mesh* myReader = new DriverMED_R_SMESHDS_Mesh; myReader->SetMesh(mySMESHDSMesh); myReader->SetMeshId(myMeshId); myReader->SetFileId(fid); myReader->ReadMySelf(); //SCRUTE(mySMESHDSMesh->NbNodes()); //myNewMesh->ExportUNV("/tmp/test.unv");//only to check out //**************************************************************************** //* FERMETURE DU FICHIER * //**************************************************************************** ret = MEDfermer(fid); if (ret != 0) printf(">> ERREUR : erreur a la fermeture du fichier %s\n",datafilename); } } } //********** //} //else if (strcmp(msgname,"Applied Hypothesis")==0) { for (int ii=0;iiInternalObjectIndentify(ii,msgname); if (strcmp(msgname,"Mesh data")==0) { //nothing } else if (strcmp(msgname,"Ref on shape")==0) { //nothing } else if (strcmp(msgname,"Applied Hypothesis")==0) { //********** Loading of the applied hypothesis strcpy(name_of_group,"Applied Hypothesis"); hdf_subgroup[Tag_RefOnAppliedHypothesis] = new HDFgroup(name_of_group,hdf_group[myMeshId]); hdf_subgroup[Tag_RefOnAppliedHypothesis]->OpenOnDisk(); nb_datasets = hdf_subgroup[Tag_RefOnAppliedHypothesis]->nInternalObjects(); SCRUTE(nb_datasets); for (int j=0;jOpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * refFromFile =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(refFromFile); //SCRUTE(refFromFile); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; if (_found) { SALOMEDS::SObject_var HypSO = Study->FindObjectID(refFromFile); if (!CORBA::is_nil(HypSO)) { HypSO->FindAttribute(anAttr, "AttributeIOR"); anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); if (!CORBA::is_nil(anIOR)) { char* HypIOR = anIOR->Value(); SMESH::SMESH_Hypothesis_var anHyp = SMESH::SMESH_Hypothesis::_narrow(_orb->string_to_object(HypIOR)); if (!CORBA::is_nil(anHyp)) { myNewMesh->AddHypothesis(aShape,anHyp); MESSAGE("Hypothesis added ..."); } } } } } hdf_subgroup[Tag_RefOnAppliedHypothesis]->CloseOnDisk(); //********** } else if (strcmp(msgname,"Applied Algorithms")==0) { //********** Loading of the applied algorithms strcpy(name_of_group,"Applied Algorithms"); hdf_subgroup[Tag_RefOnAppliedAlgorithms] = new HDFgroup(name_of_group,hdf_group[myMeshId]); hdf_subgroup[Tag_RefOnAppliedAlgorithms]->OpenOnDisk(); nb_datasets = hdf_subgroup[Tag_RefOnAppliedAlgorithms]->nInternalObjects(); SCRUTE(nb_datasets); for (int j=0;jOpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * refFromFile =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(refFromFile); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; if (_found) { SALOMEDS::SObject_var AlgoSO = Study->FindObjectID(refFromFile); if (!CORBA::is_nil(AlgoSO)) { AlgoSO->FindAttribute(anAttr, "AttributeIOR"); anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); if (!CORBA::is_nil(anIOR)) { char* AlgoIOR = anIOR->Value(); //SCRUTE(AlgoIOR); SMESH::SMESH_Hypothesis_var myHyp = SMESH::SMESH_Hypothesis::_narrow(_orb->string_to_object(AlgoIOR)); SMESH::SMESH_Algo_var anAlgo = SMESH::SMESH_Algo::_narrow(myHyp); //SMESH::SMESH_Algo_var anAlgo = SMESH::SMESH_Algo::_narrow(_orb->string_to_object(AlgoIOR)); if (!CORBA::is_nil(anAlgo)) { myNewMesh->AddHypothesis(aShape,anAlgo);//essayer avec _SMESHCorbaObj MESSAGE("Algorithms added ..."); } } } } } hdf_subgroup[Tag_RefOnAppliedAlgorithms]->CloseOnDisk(); //********** } else if (string(msgname).substr(0,9)==string("SubMeshes")) { //********** Loading of the submeshes on subshapes int myLevel1Tag, myTag; SCRUTE(msgname); cmpt_sm++; myLevel1Tag = 10+cmpt_sm; hdf_subgroup[myLevel1Tag] = new HDFgroup(name_of_group,hdf_group[myMeshId]); hdf_subgroup[myLevel1Tag] = new HDFgroup(msgname,hdf_group[myMeshId]); hdf_subgroup[myLevel1Tag]->OpenOnDisk(); int nb_submeshes = hdf_subgroup[myLevel1Tag]->nInternalObjects(); SCRUTE(nb_submeshes); for (int j=0;jInternalObjectIndentify(j,name_meshgroup); SCRUTE(name_meshgroup); hdf_subgroup[myTag] = new HDFgroup(name_meshgroup,hdf_subgroup[myLevel1Tag]); hdf_subgroup[myTag]->OpenOnDisk(); int subMeshId = atoi((string(name_meshgroup).substr(8,18)).c_str()); MESSAGE("Ref on shape"); //********** ref on shape sprintf(name_dataset,"Ref on shape"); hdf_dataset[cmpt_ds] = new HDFdataset(name_dataset,hdf_subgroup[myTag]); hdf_dataset[cmpt_ds]->OpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * refFromFile =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(refFromFile); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; bool _found3 = false; SALOMEDS::SObject_var GSO = Study->FindObjectID(refFromFile); SMESH::SMESH_subMesh_var aSubMesh; GEOM::GEOM_Shape_var aSubShape; if (!CORBA::is_nil(GSO)) { GSO->FindAttribute(anAttr, "AttributeIOR"); anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); char* SubShapeIOR = anIOR->Value(); aSubShape = GEOM::GEOM_Shape::_narrow(_orb->string_to_object(SubShapeIOR)); if (!CORBA::is_nil(aSubShape)) { aSubMesh = myNewMesh->GetElementsOnShape(aSubShape); string iorString = _orb->object_to_string(aSubMesh); sprintf(objectId,"%d",subMeshId); _SMESHCorbaObj[string("SubMesh_")+string(objectId)] = iorString; _found3 = true; //SCRUTE(aSubMesh->GetNumberOfNodes()); //MESSAGE("yes"); //SCRUTE(aSubMesh->GetNumberOfElements()); } } int nb_subgroup = hdf_subgroup[myTag]->nInternalObjects(); SCRUTE(nb_subgroup); for (int k=0;kInternalObjectIndentify(k,sgname); if (strcmp(sgname,"Ref on shape")==0) { //nothing } else if (strcmp(sgname,"Applied Hypothesis")==0) { //********** ref on applied hypothesis MESSAGE("Applied Hypothesis"); strcpy(name_meshgroup,"Applied Hypothesis"); cmpt_sm++; hdf_subgroup[10+cmpt_sm] = new HDFgroup(name_meshgroup,hdf_subgroup[myTag]); hdf_subgroup[10+cmpt_sm]->OpenOnDisk(); nb_datasets = hdf_subgroup[10+cmpt_sm]->nInternalObjects(); SCRUTE(nb_datasets); for (int l=0;lOpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * refFromFile =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(refFromFile); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; if (_found3) { SALOMEDS::SObject_var HypSO = Study->FindObjectID(refFromFile); if (!CORBA::is_nil(HypSO)) { HypSO->FindAttribute(anAttr, "AttributeIOR"); anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); if (!CORBA::is_nil(anIOR)) { char* HypIOR = anIOR->Value(); SMESH::SMESH_Hypothesis_var anHyp = SMESH::SMESH_Hypothesis::_narrow(_orb->string_to_object(HypIOR)); if (!CORBA::is_nil(anHyp)) { SMESH::SMESH_Mesh_var aMesh = aSubMesh->GetFather(); aMesh->AddHypothesis(aSubShape,anHyp);//essayer avec _SMESHCorbaObj MESSAGE("Hypothesis added ..."); } } } } } } else if (strcmp(sgname,"Applied Algorithms")==0) { //********** ref on applied algorithms MESSAGE("Applied Algorithms"); strcpy(name_meshgroup,"Applied Algorithms"); cmpt_sm++; hdf_subgroup[10+cmpt_sm] = new HDFgroup(name_meshgroup,hdf_subgroup[myTag]); hdf_subgroup[10+cmpt_sm]->OpenOnDisk(); nb_datasets = hdf_subgroup[10+cmpt_sm]->nInternalObjects(); SCRUTE(nb_datasets); for (int l=0;lOpenOnDisk(); size=hdf_dataset[cmpt_ds]->GetSize(); char * refFromFile =new char[size]; hdf_dataset[cmpt_ds]->ReadFromDisk(refFromFile); hdf_dataset[cmpt_ds]->CloseOnDisk(); cmpt_ds++; if (_found3) { SALOMEDS::SObject_var AlgoSO = Study->FindObjectID(refFromFile); if (!CORBA::is_nil(AlgoSO)) { AlgoSO->FindAttribute(anAttr, "AttributeIOR"); anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); if (!CORBA::is_nil(anIOR)) { char* AlgoIOR = anIOR->Value(); //SCRUTE(AlgoIOR); SMESH::SMESH_Hypothesis_var myHyp = SMESH::SMESH_Hypothesis::_narrow(_orb->string_to_object(AlgoIOR)); SMESH::SMESH_Algo_var anAlgo = SMESH::SMESH_Algo::_narrow(myHyp); //SMESH::SMESH_Algo_var anAlgo = SMESH::SMESH_Algo::_narrow(_orb->string_to_object(AlgoIOR)); if (!CORBA::is_nil(anAlgo)) { SMESH::SMESH_Mesh_var aMesh = aSubMesh->GetFather(); aMesh->AddHypothesis(aSubShape,anAlgo);//essayer avec _SMESHCorbaObj MESSAGE("Algorithms added ..."); } } } } } } } hdf_subgroup[myTag]->CloseOnDisk(); } hdf_subgroup[myLevel1Tag]->CloseOnDisk(); } } hdf_group[myMeshId]->CloseOnDisk(); MESSAGE("End of Meshes Load"); } } MESSAGE("End of SMESH_Gen::Load"); hdf_file->CloseOnDisk(); delete hdf_file; hdf_file=0; // Remove temporary files created from the stream if (isMultiFile) SALOMEDS_Tool::RemoveTemporaryFiles(tmpDir.ToCString(), aFileSeq.in(), true); return true; } bool SMESH_Gen_i::LoadASCII(SALOMEDS::SComponent_ptr theComponent, const SALOMEDS::TMPFile& theStream, const char* theURL, bool isMultiFile) { return Load(theComponent, theStream, theURL, isMultiFile); } //============================================================================= /*! * */ //============================================================================= void SMESH_Gen_i::Close(SALOMEDS::SComponent_ptr theComponent) { MESSAGE("Close"); SALOMEDS::Study_var aStudy = theComponent->GetStudy(); SALOMEDS::ChildIterator_var itBig = aStudy->NewChildIterator(theComponent); for (; itBig->More();itBig->Next()) { SALOMEDS::SObject_var gotBranch = itBig->Value(); // branch 1 : hypothesis if (gotBranch->Tag()==Tag_HypothesisRoot || gotBranch->Tag()==Tag_AlgorithmsRoot) { SALOMEDS::ChildIterator_var it = aStudy->NewChildIterator(gotBranch); for (; it->More();it->Next()) { SALOMEDS::SObject_var mySObject = it->Value(); SALOMEDS::GenericAttribute_var anAttr; SALOMEDS::AttributeIOR_var anIOR; if ( mySObject->FindAttribute(anAttr, "AttributeIOR")) { anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); SMESH::SMESH_Hypothesis_var myHyp = SMESH::SMESH_Hypothesis::_narrow(_orb->string_to_object(anIOR->Value())); char objectId[10]; sprintf(objectId,"%d",myHyp->GetId()); // cout<<"********** delete Hyp "<string_to_object(anIOR->Value())); } } } // branch 2 : algorithms else if (gotBranch->Tag()>=3) { SALOMEDS::ChildIterator_var it = aStudy->NewChildIterator(gotBranch); for (; it->More();it->Next()) { SALOMEDS::SObject_var mySObject = it->Value(); SALOMEDS::GenericAttribute_var anAttr; SALOMEDS::AttributeIOR_var anIOR; if ( mySObject->FindAttribute(anAttr, "AttributeIOR")) { anIOR = SALOMEDS::AttributeIOR::_narrow(anAttr); SMESH::SMESH_Mesh_var myMesh = SMESH::SMESH_Mesh::_narrow(_orb->string_to_object(anIOR->Value())); if (!myMesh->_is_nil()) { char objectId[10]; sprintf(objectId,"%d",myMesh->GetId()); // cout<<"********** delete Mesh "<string_to_object(anIOR->Value())); if (!mySubMesh->_is_nil()) { char objectId[10]; sprintf(objectId,"%d",mySubMesh->GetId()); // cout<<"********** delete SubMesh "<string_to_object(IORString)); if (! CORBA::is_nil(myAlgo)) { string prefix = "Hypo_"; sprintf(objectId,"%d",myAlgo->GetId()); string lpID = prefix + string(objectId); return CORBA::string_dup(lpID.c_str()); } else { SMESH::SMESH_Hypothesis_var myHypo = SMESH::SMESH_Hypothesis::_narrow(_orb->string_to_object(IORString)); if (! CORBA::is_nil(myHypo)) { string prefix = "Hypo_"; sprintf(objectId,"%d",myHypo->GetId()); string lpID = prefix + string(objectId); return CORBA::string_dup(lpID.c_str()); } else { SMESH::SMESH_Mesh_var myMesh = SMESH::SMESH_Mesh::_narrow(_orb->string_to_object(IORString)); if (! CORBA::is_nil(myMesh)) { string prefix = "Mesh_"; sprintf(objectId,"%d",myMesh->GetId()); string lpID = prefix + string(objectId); return CORBA::string_dup(lpID.c_str()); } else { SMESH::SMESH_subMesh_var mySubMesh = SMESH::SMESH_subMesh::_narrow(_orb->string_to_object(IORString)); if (! CORBA::is_nil(mySubMesh)) { string prefix = "SubMesh_"; sprintf(objectId,"%d",mySubMesh->GetId()); string lpID = prefix + string(objectId); return CORBA::string_dup(lpID.c_str()); } else return (strdup("no object")); } } } } //============================================================================= /*! * */ //============================================================================= char* SMESH_Gen_i::LocalPersistentIDToIOR(SALOMEDS::SObject_ptr theSObject, const char* aLocalPersistentID, CORBA::Boolean isMultiFile, CORBA::Boolean isASCII) { MESSAGE("SMESH_Gen_i::LocalPersistentIDToIOR"); SCRUTE(aLocalPersistentID); string clef = string(aLocalPersistentID); SCRUTE(_SMESHCorbaObj[clef].c_str()); return CORBA::string_dup(_SMESHCorbaObj[clef].c_str()); } //============================================================================= /*! * */ //============================================================================= SMESH_topo* SMESH_Gen_i::ExploreMainShape(GEOM::GEOM_Gen_ptr geomEngine, CORBA::Long studyId, GEOM::GEOM_Shape_ptr aShape) { MESSAGE("SMESH_Mesh_i::ExploreMainShape"); // _narrow() duplicates the reference and check the type GEOM::GEOM_Gen_var geom = GEOM::GEOM_Gen::_narrow(geomEngine); GEOM::GEOM_Shape_var myShape = GEOM::GEOM_Shape::_narrow(aShape); if (CORBA::is_nil(geom)) THROW_SALOME_CORBA_EXCEPTION("bad geom reference", \ SALOME::BAD_PARAM); if (CORBA::is_nil(myShape)) THROW_SALOME_CORBA_EXCEPTION("bad shape reference", \ SALOME::BAD_PARAM); MESSAGE("---"); SCRUTE(myShape->Name()); geom->GetCurrentStudy(studyId); SCRUTE(studyId); TopoDS_Shape mainShape = _ShapeReader->GetShape(geom,myShape); MESSAGE("---"); // create an SMESH_topo object for the mainShape SMESH_topo* myTopo = new SMESH_topo(); MESSAGE("---"); // explore local TopoDS_Shape, store reference of local TopoDS subShapes for (TopExp_Explorer exp(mainShape,TopAbs_COMPOUND); exp.More(); exp.Next()) { const TopoDS_Compound& E = TopoDS::Compound(exp.Current()); int i = myTopo->_myShapes[TopAbs_COMPOUND].Add(E); SCRUTE(i); } for (TopExp_Explorer exp(mainShape,TopAbs_COMPSOLID); exp.More(); exp.Next()) { const TopoDS_CompSolid& E = TopoDS::CompSolid(exp.Current()); int i = myTopo->_myShapes[TopAbs_COMPSOLID].Add(E); SCRUTE(i); } for (TopExp_Explorer exp(mainShape,TopAbs_SOLID); exp.More(); exp.Next()) { const TopoDS_Solid& E = TopoDS::Solid(exp.Current()); int i = myTopo->_myShapes[TopAbs_SOLID].Add(E); SCRUTE(i); } for (TopExp_Explorer exp(mainShape,TopAbs_SHELL); exp.More(); exp.Next()) { const TopoDS_Shell& E = TopoDS::Shell(exp.Current()); int i = myTopo->_myShapes[TopAbs_SHELL].Add(E); SCRUTE(i); } for (TopExp_Explorer exp(mainShape,TopAbs_FACE); exp.More(); exp.Next()) { const TopoDS_Face& E = TopoDS::Face(exp.Current()); int i = myTopo->_myShapes[TopAbs_FACE].Add(E); SCRUTE(i); } for (TopExp_Explorer exp(mainShape,TopAbs_WIRE); exp.More(); exp.Next()) { const TopoDS_Wire& E = TopoDS::Wire(exp.Current()); int i = myTopo->_myShapes[TopAbs_WIRE].Add(E); SCRUTE(i); } for (TopExp_Explorer exp(mainShape,TopAbs_EDGE); exp.More(); exp.Next()) { const TopoDS_Edge& E = TopoDS::Edge(exp.Current()); int i = myTopo->_myShapes[TopAbs_EDGE].Add(E); SCRUTE(i); } for (TopExp_Explorer exp(mainShape,TopAbs_VERTEX); exp.More(); exp.Next()) { const TopoDS_Vertex& E = TopoDS::Vertex(exp.Current()); int i = myTopo->_myShapes[TopAbs_VERTEX].Add(E); SCRUTE(i); } // explore subShapes of distant CORBA object, // associate distant CORBA subShape references // with local reference to local TopoDS subShape string filenode = "toposhape.txt"; ofstream fic(filenode.c_str()); for (int shapeType = TopAbs_COMPOUND; shapeType < TopAbs_SHAPE; shapeType++) { fic << "shape type : " << SMESH_shapeTypeNames[shapeType]; GEOM::GEOM_Gen::ListOfGeomShapes_var subShapes = geom->SubShapeAll(myShape,shapeType); int nbSubShapes = subShapes->length(); int nbLocal = myTopo->_myShapes[shapeType].Extent(); fic << " - number of elements: " << nbSubShapes << endl; ASSERT(nbSubShapes == nbLocal); for (int i=0; i< nbSubShapes; i++) { GEOM::GEOM_Shape_var aSubShape = subShapes[i]; string idShape = SMESH_topo::GetShapeLocalId(aSubShape); fic << " " << idShape; SCRUTE(idShape); TopoDS_Shape aLocShape = _ShapeReader->GetShape(geom,aSubShape); for (int j=1; j <= nbLocal; j++) if (aLocShape.IsSame(myTopo->_myShapes[shapeType].FindKey(j))) { MESSAGE(" --- trouve = " << j); myTopo->_mapIndShapes[shapeType][idShape] = j; fic << " --- trouve = " << j; break; } fic << endl; } } fic.close(); return myTopo; } //============================================================================= /*! * C factory, accessible with dlsym, after dlopen */ //============================================================================= extern "C" { PortableServer::ObjectId * SMESHEngine_factory( CORBA::ORB_ptr orb, PortableServer::POA_ptr poa, PortableServer::ObjectId * contId, const char *instanceName, const char *interfaceName) { MESSAGE("PortableServer::ObjectId * SMESHEngine_factory()"); SCRUTE(interfaceName); SMESH_Gen_i * mySMESH_Gen = new SMESH_Gen_i(orb, poa, contId, instanceName, interfaceName); return mySMESH_Gen->getId() ; } }