Salome HOME
23514: EDF 16031 - SMESH freezes
[modules/smesh.git] / src / SMESHGUI / SMESHGUI_GEOMGenUtils.cxx
1 // Copyright (C) 2007-2016  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 // Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
5 //
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License, or (at your option) any later version.
10 //
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 // Lesser General Public License for more details.
15 //
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
19 //
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 //
22
23 // SMESH SMESHGUI : GUI for SMESH component
24 // File   : SMESHGUI_GEOMGenUtils.cxx
25 // Author : Open CASCADE S.A.S.
26 // SMESH includes
27 //
28 #include "SMESHGUI_GEOMGenUtils.h"
29 #include "SMESHGUI_Utils.h"
30 #include "SMESHGUI.h"
31
32 // SALOME GEOM includes
33 #include <GeometryGUI.h>
34 #include <GEOM_wrap.hxx>
35
36 // SALOME KERNEL includes
37 #include <SALOMEDS_SObject.hxx>
38
39 // IDL includes
40 #include <SALOMEconfig.h>
41 #include CORBA_CLIENT_HEADER(SMESH_Mesh)
42
43 #include <QString>
44
45 namespace SMESH
46 {
47   GEOM::GEOM_Gen_var GetGEOMGen()
48   {
49     static GEOM::GEOM_Gen_var aGEOMGen;
50
51     if(CORBA::is_nil(aGEOMGen)) {
52       if ( GeometryGUI::GetGeomGen()->_is_nil() )
53         GeometryGUI::InitGeomGen();
54       aGEOMGen = GeometryGUI::GetGeomGen();
55     }
56     return aGEOMGen;
57   }
58
59   GEOM::GEOM_Object_var GetShapeOnMeshOrSubMesh(_PTR(SObject) theMeshOrSubmesh,
60                                                 bool*         isMesh)
61   {
62     SALOMEDS_SObject* aMeshOrSubmesh = _CAST(SObject,theMeshOrSubmesh);
63     if(aMeshOrSubmesh) {
64       CORBA::Object_var Obj = aMeshOrSubmesh->GetObject();
65       if ( !CORBA::is_nil( Obj ) ) {
66         SMESH::SMESH_Mesh_var aMesh =
67           SObjectToInterface<SMESH::SMESH_Mesh>( theMeshOrSubmesh );
68         if ( !aMesh->_is_nil() )
69         {
70           if ( isMesh ) *isMesh = true;
71           return aMesh->GetShapeToMesh();
72         }
73         SMESH::SMESH_subMesh_var aSubmesh =
74           SObjectToInterface<SMESH::SMESH_subMesh>( theMeshOrSubmesh );
75         if ( !aSubmesh->_is_nil() )
76         {
77           if ( isMesh ) *isMesh = false;
78           return aSubmesh->GetSubShape();
79         }
80       }
81     }
82     return GEOM::GEOM_Object::_nil();
83   }
84
85   GEOM::GEOM_Object_var GetGeom (_PTR(SObject) theSO)
86   {
87     GEOM::GEOM_Object_var aMeshShape;
88     if (!theSO)
89       return aMeshShape;
90
91     CORBA::Object_var obj = _CAST( SObject,theSO )->GetObject();
92     aMeshShape = GEOM::GEOM_Object::_narrow( obj );
93     if ( !aMeshShape->_is_nil() )
94       return aMeshShape;
95
96     _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
97     if (!aStudy)
98       return aMeshShape;
99
100     _PTR(ChildIterator) anIter (aStudy->NewChildIterator(theSO));
101     for ( ; anIter->More(); anIter->Next()) {
102       _PTR(SObject) aSObject = anIter->Value();
103       _PTR(SObject) aRefSOClient;
104
105       if (aSObject->ReferencedObject(aRefSOClient)) {
106         SALOMEDS_SObject* aRefSO = _CAST(SObject,aRefSOClient);
107         aMeshShape = GEOM::GEOM_Object::_narrow(aRefSO->GetObject());
108       } else {
109         SALOMEDS_SObject* aSO = _CAST(SObject,aSObject);
110         aMeshShape = GEOM::GEOM_Object::_narrow(aSO->GetObject());
111       }
112       if ( !aMeshShape->_is_nil() )
113         return aMeshShape;
114     }
115     return aMeshShape;
116   }
117
118   SMESHGUI_EXPORT char* GetGeomName( _PTR(SObject) smeshSO )
119   {
120     if (!smeshSO)
121       return 0;
122
123     _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
124     if (!aStudy)
125       return 0;
126
127     _PTR(ChildIterator) anIter (aStudy->NewChildIterator( smeshSO ));
128     for ( ; anIter->More(); anIter->Next()) {
129       _PTR(SObject) aSObject = anIter->Value();
130       _PTR(SObject) aRefSOClient;
131       GEOM::GEOM_Object_var aMeshShape;
132
133       if (aSObject->ReferencedObject(aRefSOClient)) {
134         SALOMEDS_SObject* aRefSO = _CAST(SObject,aRefSOClient);
135         aMeshShape = GEOM::GEOM_Object::_narrow(aRefSO->GetObject());
136         aSObject = aRefSOClient;
137       }
138       else {
139         SALOMEDS_SObject* aSO = _CAST(SObject,aSObject);
140         aMeshShape = GEOM::GEOM_Object::_narrow(aSO->GetObject());
141       }
142
143       if (!aMeshShape->_is_nil())
144       {
145         std::string name = aSObject->GetName();
146         return CORBA::string_dup( name.c_str() );
147       }
148     }
149     return 0;
150   }
151
152   GEOM::GEOM_Object_ptr GetSubShape (GEOM::GEOM_Object_ptr theMainShape,
153                                      long                  theID)
154   {
155     GEOM::GEOM_Gen_var geomGen = SMESH::GetGEOMGen();
156     _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
157     if (!aStudy || geomGen->_is_nil())
158       return GEOM::GEOM_Object::_nil();
159     GEOM::GEOM_IShapesOperations_wrap aShapesOp =
160       geomGen->GetIShapesOperations(aStudy->StudyId());
161     if (aShapesOp->_is_nil())
162       return GEOM::GEOM_Object::_nil();
163     GEOM::GEOM_Object_wrap subShape = aShapesOp->GetSubShape (theMainShape,theID);
164     return subShape._retn();
165   }
166
167   //================================================================================
168   /*!
169    * \brief Return entries of sub-mesh geometry and mesh geometry by an IO of assigned
170    *        hypothesis
171    *  \param [in] hypIO - IO of hyp which is a reference SO to a hyp SO
172    *  \param [out] subGeom - found entry of a sub-mesh if any
173    *  \param [out] meshGeom - found entry of a mesh
174    *  \return bool - \c true if any geometry has been found
175    */
176   //================================================================================
177
178   bool GetGeomEntries( Handle(SALOME_InteractiveObject)& hypIO,
179                        QString&                          subGeom,
180                        QString&                          meshGeom )
181   {
182     subGeom.clear();
183     meshGeom.clear();
184     if ( hypIO.IsNull() ) return false;
185
186     _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
187     if ( !aStudy ) return false;
188
189     _PTR(SObject) hypSO = aStudy->FindObjectID( hypIO->getEntry() );
190     if ( !hypSO ) return false;
191
192     // Depth() is a number of fathers
193     if ( hypSO->Depth() == 4 ) // hypSO is not a reference to a hyp but a hyp it-self
194     {
195       SMESH::SMESH_Hypothesis_var hyp =
196         SMESH::SObjectToInterface< SMESH::SMESH_Hypothesis >( hypSO );
197       SMESH::SMESH_Mesh_var mesh;
198       GEOM::GEOM_Object_var geom;
199       SMESH::SMESH_Gen_var  gen = SMESHGUI::GetSMESHGUI()->GetSMESHGen();
200       if ( !gen || !gen->GetSoleSubMeshUsingHyp( hyp, mesh.out(), geom.out() ))
201         return false;
202
203       subGeom = toQStr( geom->GetStudyEntry() );
204
205       geom  = mesh->GetShapeToMesh();
206       if ( geom->_is_nil() )
207         return false;
208       meshGeom = toQStr( geom->GetStudyEntry() );
209     }
210     else
211     {
212       _PTR(SObject) appliedSO = hypSO->GetFather(); // "Applied hypotheses" folder
213       if ( !appliedSO ) return false;
214
215       _PTR(SObject) subOrMeshSO = appliedSO->GetFather(); // mesh or sub-mesh SO
216       if ( !subOrMeshSO ) return false;
217
218       bool isMesh;
219       GEOM::GEOM_Object_var geom = GetShapeOnMeshOrSubMesh( subOrMeshSO, &isMesh );
220       if ( geom->_is_nil() )
221         return false;
222
223       if ( isMesh )
224       {
225         meshGeom = toQStr( geom->GetStudyEntry() );
226         return !meshGeom.isEmpty();
227       }
228
229       subGeom = toQStr( geom->GetStudyEntry() );
230
231       _PTR(SObject) subFolderSO = subOrMeshSO->GetFather(); // "SubMeshes on ..." folder
232       if ( !subFolderSO ) return false;
233
234       _PTR(SObject) meshSO = subFolderSO->GetFather(); // mesh SO
235       if ( !meshSO ) return false;
236
237       geom = GetShapeOnMeshOrSubMesh( meshSO );
238       if ( geom->_is_nil() )
239         return false;
240
241       meshGeom = toQStr( geom->GetStudyEntry() );
242     }
243
244     return !meshGeom.isEmpty() && !subGeom.isEmpty();
245   }
246
247
248 } // end of namespace SMESH