Salome HOME
bos #20256: [CEA 18523] Porting SMESH to int 64 bits
[modules/smesh.git] / src / SMESH_I / SMESH_Gen_i_1.cxx
1 // Copyright (C) 2007-2021  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 //  File      : SMESH_Gen_i_1.cxx
23 //  Created   : Thu Oct 21 17:24:06 2004
24 //  Author    : Edward AGAPOV (eap)
25 //  Module    : SMESH
26
27 #include "SMESH_Gen_i.hxx"
28
29 #include "SMESHDS_Mesh.hxx"
30 #include "SMESH_Algo_i.hxx"
31 #include "SMESH_Comment.hxx"
32 #include "SMESH_Group_i.hxx"
33 #include "SMESH_Hypothesis_i.hxx"
34 #include "SMESH_Mesh_i.hxx"
35 #include "SMESH_subMesh_i.hxx"
36
37 #include <utilities.h>
38 #include <Utils_ExceptHandlers.hxx>
39 #include <SALOMEDS_wrap.hxx>
40 #include <SALOMEDS_Attributes_wrap.hxx>
41 #include "SALOME_KernelServices.hxx"
42 #include "SALOME_ModuleCatalog_impl.hxx"
43
44 #include <TCollection_AsciiString.hxx>
45 #include <TopoDS_Solid.hxx>
46
47 #include <cctype>
48
49 #ifdef _DEBUG_
50 static int MYDEBUG = 0;
51 #else
52 static int MYDEBUG = 0;
53 #endif
54
55 using namespace std;
56
57 //=============================================================================
58 /*!
59  *  Get...Tag [ static ]
60  *
61  *  Methods which determine SMESH data model structure
62  */
63 //=============================================================================
64
65 long SMESH_Gen_i::GetHypothesisRootTag()
66 {
67   return SMESH::Tag_HypothesisRoot;
68 }
69
70 long SMESH_Gen_i::GetAlgorithmsRootTag()
71 {
72   return SMESH::Tag_AlgorithmsRoot;
73 }
74
75 long SMESH_Gen_i::GetRefOnShapeTag()
76 {
77   return SMESH::Tag_RefOnShape;
78 }
79
80 long SMESH_Gen_i::GetRefOnAppliedHypothesisTag()
81 {
82   return SMESH::Tag_RefOnAppliedHypothesis;
83 }
84
85 long SMESH_Gen_i::GetRefOnAppliedAlgorithmsTag()
86 {
87   return SMESH::Tag_RefOnAppliedAlgorithms;
88 }
89
90 long SMESH_Gen_i::GetSubMeshOnVertexTag()
91 {
92   return SMESH::Tag_SubMeshOnVertex;
93 }
94
95 long SMESH_Gen_i::GetSubMeshOnEdgeTag()
96 {
97   return SMESH::Tag_SubMeshOnEdge;
98 }
99
100 long SMESH_Gen_i::GetSubMeshOnFaceTag()
101 {
102   return SMESH::Tag_SubMeshOnFace;
103 }
104
105 long SMESH_Gen_i::GetSubMeshOnSolidTag()
106 {
107   return SMESH::Tag_SubMeshOnSolid;
108 }
109
110 long SMESH_Gen_i::GetSubMeshOnCompoundTag()
111 {
112   return SMESH::Tag_SubMeshOnCompound;
113 }
114
115 long SMESH_Gen_i::GetSubMeshOnWireTag()
116 {
117   return SMESH::Tag_SubMeshOnWire;
118 }
119
120 long SMESH_Gen_i::GetSubMeshOnShellTag()
121 {
122   return SMESH::Tag_SubMeshOnShell;
123 }
124
125 long SMESH_Gen_i::GetNodeGroupsTag()
126 {
127   return SMESH::Tag_NodeGroups;
128 }
129
130 long SMESH_Gen_i::GetEdgeGroupsTag()
131 {
132   return SMESH::Tag_EdgeGroups;
133 }
134
135 long SMESH_Gen_i::GetFaceGroupsTag()
136 {
137   return SMESH::Tag_FaceGroups;
138 }
139
140 long SMESH_Gen_i::GetVolumeGroupsTag()
141 {
142   return SMESH::Tag_VolumeGroups;
143 }
144
145 long SMESH_Gen_i::Get0DElementsGroupsTag()
146 {
147   return SMESH::Tag_0DElementsGroups;
148 }
149
150 long SMESH_Gen_i::GetBallElementsGroupsTag()
151 {
152   return SMESH::Tag_BallElementsGroups;
153 }
154
155 //=============================================================================
156 /*!
157  *  SMESH_Gen_i::CanPublishInStudy
158  *
159  *  Returns true if object can be published in the study
160  */
161 //=============================================================================
162
163 bool SMESH_Gen_i::CanPublishInStudy(CORBA::Object_ptr theIOR)
164 {
165   if(MYDEBUG) MESSAGE("CanPublishInStudy - "<<!CORBA::is_nil(getStudyServant()));
166   
167   if ( !myIsEnablePublish )
168     return false;
169
170   SMESH::SMESH_Mesh_var aMesh       = SMESH::SMESH_Mesh::_narrow(theIOR);
171   if( !aMesh->_is_nil() )
172     return true;
173
174   SMESH::SMESH_subMesh_var aSubMesh = SMESH::SMESH_subMesh::_narrow(theIOR);
175   if( !aSubMesh->_is_nil() )
176     return true;
177
178   SMESH::SMESH_Hypothesis_var aHyp  = SMESH::SMESH_Hypothesis::_narrow(theIOR);
179   if( !aHyp->_is_nil() )
180     return true;
181
182   SMESH::SMESH_GroupBase_var aGroup = SMESH::SMESH_GroupBase::_narrow(theIOR);
183   if( !aGroup->_is_nil() )
184     return true;
185
186   if(MYDEBUG) MESSAGE("CanPublishInStudy--CANT");
187   return false;
188 }
189
190 //=======================================================================
191 //function : ObjectToSObject
192 //purpose  : Put a result into a SALOMEDS::SObject_wrap or call UnRegister()!
193 //=======================================================================
194
195 SALOMEDS::SObject_ptr SMESH_Gen_i::ObjectToSObject(CORBA::Object_ptr theObject)
196 {
197   SALOMEDS::SObject_wrap aSO;
198   try {
199     if ( !CORBA::is_nil( theObject ))
200     {
201       CORBA::String_var objStr = SMESH_Gen_i::GetORB()->object_to_string( theObject );
202       aSO = getStudyServant()->FindObjectIOR( objStr.in() );
203     }
204   }
205   catch (...)
206   {
207   }
208   return aSO._retn();
209 }
210
211 //=======================================================================
212 //function : objectToServant
213 //purpose  : 
214 //=======================================================================
215
216 template<typename T> static inline T* objectToServant( CORBA::Object_ptr theIOR )
217 {
218   return dynamic_cast<T*>( SMESH_Gen_i::GetServant( theIOR ).in() );
219 }
220
221 //=======================================================================
222 //function : ShapeToGeomObject
223 //purpose  : 
224 //=======================================================================
225
226 GEOM::GEOM_Object_ptr SMESH_Gen_i::ShapeToGeomObject (const TopoDS_Shape& theShape )
227 {
228   GEOM::GEOM_Object_var aShapeObj;
229   if ( !theShape.IsNull() && mySMESHGen ) {
230     GEOM_Client* aClient = mySMESHGen->GetShapeReader();
231     TCollection_AsciiString IOR;
232     if ( aClient && aClient->Find( theShape, IOR ))
233     {
234       CORBA::Object_var obj = GetORB()->string_to_object( IOR.ToCString() );
235       if ( !obj->_non_existent() )
236         aShapeObj = GEOM::GEOM_Object::_narrow ( obj );
237     }
238   }
239   return aShapeObj._retn();
240 }
241
242 //=======================================================================
243 //function : GeomObjectToShape
244 //purpose  : 
245 //=======================================================================
246
247 TopoDS_Shape SMESH_Gen_i::GeomObjectToShape(GEOM::GEOM_Object_ptr theGeomObject)
248 {
249   TopoDS_Shape S;
250   if ( mySMESHGen && !theGeomObject->_is_nil() && !theGeomObject->_non_existent() )
251   {
252     GEOM_Client*           aClient = mySMESHGen->GetShapeReader();
253     GEOM::GEOM_Gen_var aGeomEngine = GetGeomEngine( theGeomObject );
254     if ( aClient && !aGeomEngine->_is_nil () )
255       S = aClient->GetShape( aGeomEngine, theGeomObject );
256   }
257   return S;
258 }
259
260 //================================================================================
261 /*!
262  * \brief Get GEOM Object by its study entry
263  */
264 //================================================================================
265
266 GEOM::GEOM_Object_ptr SMESH_Gen_i::GetGeomObjectByEntry( const std::string& entry )
267 {
268   GEOM::GEOM_Object_var go;
269   if ( !entry.empty() && mySMESHGen )
270   {
271     SALOMEDS::SObject_wrap so = mySMESHGen->getStudyServant()->FindObjectID( entry.c_str() );
272     CORBA::Object_var     obj = SObjectToObject( so );
273     go = GEOM::GEOM_Object::_narrow( obj );
274   }
275   return go._retn();
276 }
277
278
279 //=======================================================================
280 //function : publish
281 //purpose  :
282 //=======================================================================
283
284 SALOMEDS::SObject_ptr SMESH_Gen_i::publish(CORBA::Object_ptr     theIOR,
285                                      SALOMEDS::SObject_ptr theFatherObject,
286                                      const int             theTag,
287                                      const char*           thePixMap,
288                                      const bool            theSelectable)
289 {
290   SALOMEDS::Study_var theStudy = getStudyServant();
291   SALOMEDS::SObject_wrap SO = ObjectToSObject( theIOR );
292   SALOMEDS::StudyBuilder_var     aStudyBuilder = theStudy->NewBuilder();
293   SALOMEDS::UseCaseBuilder_wrap useCaseBuilder = theStudy->GetUseCaseBuilder();
294   bool isNewSO = false, isInUseCaseTree = false;
295   if ( SO->_is_nil() )
296   {
297     if ( theTag == 0 ) {
298       SO = aStudyBuilder->NewObject( theFatherObject );
299       isNewSO = true;
300     }
301     else if ( !theFatherObject->FindSubObject( theTag, SO.inout() ))
302     {
303       SO = aStudyBuilder->NewObjectToTag( theFatherObject, theTag );
304       isNewSO = true;
305     }
306     else
307     {
308       isInUseCaseTree = useCaseBuilder->IsUseCaseNode( SO );
309     }
310   }
311   else
312   {
313     isInUseCaseTree = useCaseBuilder->IsUseCaseNode( SO );
314   }
315
316   SALOMEDS::GenericAttribute_wrap anAttr;
317   if ( !CORBA::is_nil( theIOR ))
318   {
319     anAttr = aStudyBuilder->FindOrCreateAttribute( SO, "AttributeIOR" );
320     CORBA::String_var objStr = SMESH_Gen_i::GetORB()->object_to_string( theIOR );
321     SALOMEDS::AttributeIOR_wrap iorAttr = anAttr;
322     CORBA::String_var objStrCur = iorAttr->Value();
323     bool sameIOR = ( objStrCur.in() && strcmp( objStr.in(), objStrCur.in() ) == 0 );
324     if ( !sameIOR )
325     {
326       iorAttr->SetValue( objStr.in() );
327       // UnRegister() !!! --> random problems when meshing in parallel (yacs foreach) in
328       // distributed python scripts, because simultaneously created meshes are
329       // published into the same SO; as a result the mesh published first dies
330       SALOME::GenericObj_var genObj = SALOME::GenericObj::_narrow( theIOR );
331       if ( !genObj->_is_nil() )
332         genObj->UnRegister();
333     }
334   }
335
336   if ( thePixMap ) {
337     anAttr  = aStudyBuilder->FindOrCreateAttribute( SO, "AttributePixMap" );
338     SALOMEDS::AttributePixMap_wrap pm = anAttr;
339     pm->SetPixMap( thePixMap );
340   }
341
342   if ( !theSelectable ) {
343     anAttr = aStudyBuilder->FindOrCreateAttribute( SO, "AttributeSelectable" );
344     SALOMEDS::AttributeSelectable_wrap selAttr = anAttr;
345     selAttr->SetSelectable( false );
346   }
347
348   if ( !isNewSO )
349     aStudyBuilder->RemoveReference( SO );// remove garbage reference (23336)
350
351   // add object to the use case tree
352   // (to support tree representation customization and drag-n-drop)
353   if ( isNewSO || !isInUseCaseTree )
354   {
355     // define the next tag after given one in the data tree to insert SObject
356     SALOMEDS::SObject_wrap curObj, objAfter;
357     if ( theFatherObject->GetLastChildTag() > theTag && theTag > 0 )
358     {
359       SALOMEDS::UseCaseIterator_wrap
360         anUseCaseIter = useCaseBuilder->GetUseCaseIterator(theFatherObject);
361       for ( ; anUseCaseIter->More(); anUseCaseIter->Next() ) {
362         curObj = anUseCaseIter->Value();
363         if ( curObj->Tag() > theTag  ) {
364           objAfter = curObj;
365           break;
366         }
367       }
368     }
369     if ( !CORBA::is_nil( objAfter ))
370       useCaseBuilder->InsertBefore( SO, objAfter );    // insert at given tag
371     else if ( !isInUseCaseTree )
372       useCaseBuilder->AppendTo( theFatherObject, SO ); // append to the end of list
373   }
374   return SO._retn();
375 }
376
377 //=======================================================================
378 //function : setName
379 //purpose  :
380 //=======================================================================
381
382 void SMESH_Gen_i::SetName(SALOMEDS::SObject_ptr theSObject,
383                           const char*           theName,
384                           const char*           theDefaultName)
385 {
386   if ( !theSObject->_is_nil() ) {
387     SALOMEDS::StudyBuilder_var aStudyBuilder = getStudyServant()->NewBuilder();
388     SALOMEDS::GenericAttribute_wrap   anAttr =
389       aStudyBuilder->FindOrCreateAttribute( theSObject, "AttributeName" );
390     SALOMEDS::AttributeName_wrap aNameAttr = anAttr;
391     if ( theName && theName[0] ) {
392       std::string name( theName ); // trim trailing white spaces
393       for ( size_t i = name.size()-1; i > 0; --i )
394         if ( isspace( name[i] )) name[i] = '\0';
395         else                     break;
396       aNameAttr->SetValue( name.c_str() );
397     }
398     else
399     {
400       CORBA::String_var curName = aNameAttr->Value();
401       if ( strlen( curName.in() ) == 0 ) {
402         SMESH_Comment aName(theDefaultName);
403         aNameAttr->SetValue( ( aName<< "_" << theSObject->Tag()).c_str() );
404       }
405     }
406   }
407 }
408
409 //=======================================================================
410 //function : SetPixMap
411 //purpose  :
412 //=======================================================================
413
414 void SMESH_Gen_i::SetPixMap(SALOMEDS::SObject_ptr theSObject,
415                             const char*           thePixMap)
416 {
417   if ( !theSObject->_is_nil() && thePixMap && thePixMap && thePixMap[0] )
418   {
419     SALOMEDS::StudyBuilder_var aStudyBuilder = getStudyServant()->NewBuilder();
420     SALOMEDS::GenericAttribute_wrap anAttr =
421       aStudyBuilder->FindOrCreateAttribute( theSObject, "AttributePixMap" );
422     SALOMEDS::AttributePixMap_wrap aPMAttr = anAttr;
423     aPMAttr->SetPixMap( thePixMap );
424   }
425 }
426
427 //=======================================================================
428 //function : addReference
429 //purpose  : 
430 //=======================================================================
431
432 void SMESH_Gen_i::addReference (SALOMEDS::SObject_ptr theSObject, CORBA::Object_ptr theToObject, int theTag)
433 {
434   SALOMEDS::Study_var aStudy = SMESH_Gen_i::getStudyServant();
435   SALOMEDS::SObject_wrap aToObjSO = SMESH_Gen_i::ObjectToSObject( theToObject );
436   if ( !aToObjSO->_is_nil() && !theSObject->_is_nil() ) {
437     SALOMEDS::StudyBuilder_var aStudyBuilder = aStudy->NewBuilder();
438     SALOMEDS::SObject_wrap aReferenceSO;
439     if ( !theTag ) {
440       // check if the reference to theToObject already exists
441       // and find a free label for the reference object
442       bool isReferred = false;
443       int tag = 1;
444       SALOMEDS::ChildIterator_wrap anIter = aStudy->NewChildIterator( theSObject );
445       for ( ; !isReferred && anIter->More(); anIter->Next(), ++tag ) {
446         SALOMEDS::SObject_wrap curSO = anIter->Value();
447         if ( curSO->ReferencedObject( aReferenceSO.inout() )) {
448           CORBA::String_var refEntry = aReferenceSO->GetID();
449           CORBA::String_var  toEntry = aToObjSO->GetID();
450           if ( strcmp( refEntry, toEntry ) == 0 )
451             isReferred = true;
452         }
453         else if ( !theTag ) {
454           SALOMEDS::GenericAttribute_wrap anAttr;
455           if ( !curSO->FindAttribute( anAttr.inout(), "AttributeIOR" ))
456             theTag = tag;
457         }
458       }
459       if ( isReferred )
460         return;
461       if ( !theTag )
462         theTag = tag;
463     }
464     if ( !theSObject->FindSubObject( theTag, aReferenceSO.inout() ))
465       aReferenceSO = aStudyBuilder->NewObjectToTag( theSObject, theTag );
466
467     aStudyBuilder->Addreference( aReferenceSO, aToObjSO );
468
469     // make the reference visible (invisible ref is created by createInvalidSubMesh())
470     aStudyBuilder->RemoveAttribute( aReferenceSO, "AttributeDrawable" );
471
472     // add reference to the use case tree
473     // (to support tree representation customization and drag-n-drop)
474     SALOMEDS::UseCaseBuilder_wrap  useCaseBuilder = aStudy->GetUseCaseBuilder();
475     SALOMEDS::UseCaseIterator_wrap    useCaseIter = useCaseBuilder->GetUseCaseIterator(theSObject);
476     for ( ; useCaseIter->More(); useCaseIter->Next() )
477     {
478       SALOMEDS::SObject_wrap curSO = useCaseIter->Value();
479       if ( curSO->Tag() == theTag )
480         return;
481     }
482     useCaseBuilder->AppendTo( theSObject, aReferenceSO );
483   }
484 }
485
486 //=============================================================================
487 /*!
488  *  SMESH_Gen_i::PublishInStudy
489  *
490  *  Publish object in the study
491  */
492 //=============================================================================
493
494 SALOMEDS::SObject_ptr SMESH_Gen_i::PublishInStudy(SALOMEDS::SObject_ptr /*theSObject*/,
495                                                   CORBA::Object_ptr     theIOR,
496                                                   const char*           theName)
497 {
498   Unexpect aCatch(SALOME_SalomeException);
499   SALOMEDS::SObject_wrap aSO;
500   if ( !myIsEnablePublish )
501     return aSO._retn();
502   if ( CORBA::is_nil( theIOR ))
503     return aSO._retn();
504   if(MYDEBUG) MESSAGE("PublishInStudy");
505
506   // Publishing a mesh
507   SMESH::SMESH_Mesh_var aMesh = SMESH::SMESH_Mesh::_narrow( theIOR );
508   if( !aMesh->_is_nil() )
509     aSO = PublishMesh( aMesh, theName );
510
511   // Publishing a sub-mesh
512   SMESH::SMESH_subMesh_var aSubMesh = SMESH::SMESH_subMesh::_narrow( theIOR );
513   if( aSO->_is_nil() && !aSubMesh->_is_nil() ) {
514     GEOM::GEOM_Object_var aShapeObject = aSubMesh->GetSubShape();
515     aMesh = aSubMesh->GetFather();
516     aSO = PublishSubMesh( aMesh, aSubMesh, aShapeObject, theName );
517   }
518
519   // Publishing a hypothesis or algorithm
520   SMESH::SMESH_Hypothesis_var aHyp = SMESH::SMESH_Hypothesis::_narrow( theIOR );
521   if ( aSO->_is_nil() && !aHyp->_is_nil() )
522     aSO = PublishHypothesis( aHyp, theName );
523
524   // Publishing a group
525   SMESH::SMESH_GroupBase_var aGroup = SMESH::SMESH_GroupBase::_narrow(theIOR);
526   if ( aSO->_is_nil() && !aGroup->_is_nil() ) {
527     GEOM::GEOM_Object_var aShapeObject;
528     aMesh = aGroup->GetMesh();
529     aSO = PublishGroup( aMesh, aGroup, aShapeObject, theName );
530   }
531   if(MYDEBUG) MESSAGE("PublishInStudy_END");
532
533   return aSO._retn();
534 }
535
536 //=======================================================================
537 //function : PublishComponent
538 //purpose  : 
539 //=======================================================================
540
541 SALOMEDS::SComponent_ptr SMESH_Gen_i::PublishComponent()
542 {
543   if(MYDEBUG) MESSAGE("PublishComponent");
544   if ( !myIsEnablePublish )
545     return SALOMEDS::SComponent::_nil();
546
547   SALOMEDS::StudyBuilder_var    aStudyBuilder  = getStudyServant()->NewBuilder();
548   SALOMEDS::UseCaseBuilder_wrap useCaseBuilder = getStudyServant()->GetUseCaseBuilder();
549
550   std::string compDataType = ComponentDataType(); // SMESH module's data type
551   std::string ior = SMESH_Gen_i::GetORB()->object_to_string( SMESH_Gen::_this() ); // IOR of this SMESH engine
552
553   // Find study component which corresponds to this SMESH engine
554
555   SALOMEDS::SComponent_wrap father;
556   SALOMEDS::SComponentIterator_wrap citer = getStudyServant()->NewComponentIterator();
557   for ( ; citer->More(); citer->Next()) {
558     SALOMEDS::SComponent_wrap f_i = citer->Value();
559     CORBA::String_var ior_i;
560     bool ok = f_i->ComponentIOR(ior_i.out());
561     if ( ok && compDataType == f_i->ComponentDataType() && ior == ior_i.in()) {
562       father = f_i;
563       break;
564     }
565   }
566   
567   if ( !CORBA::is_nil( father ) ) {
568     // check that the component is added to the use case browser
569     if ( !useCaseBuilder->IsUseCaseNode( father ) ) {
570       useCaseBuilder->SetRootCurrent();
571       useCaseBuilder->Append( father ); // component object is added as the top level item
572     }
573     return father._retn();
574   }
575
576   // If component for this SMESH engine does not exist in the study, create it
577
578   SALOME_ModuleCatalog::ModuleCatalog_var aCat = this->getModuleCatalog();
579   if ( CORBA::is_nil( aCat ) )
580     return father._retn();
581
582   SALOME_ModuleCatalog::Acomponent_var aComp = aCat->GetComponent( compDataType.c_str() );
583   if ( CORBA::is_nil( aComp ) )
584     return father._retn();
585
586   SALOMEDS::GenericAttribute_wrap anAttr;
587   SALOMEDS::AttributePixMap_wrap  aPixmap;
588
589   father  = aStudyBuilder->NewComponent( compDataType.c_str() );
590   aStudyBuilder->DefineComponentInstance( father, SMESH_Gen::_this() );
591   anAttr  = aStudyBuilder->FindOrCreateAttribute( father, "AttributePixMap" );
592   aPixmap = anAttr;
593   aPixmap->SetPixMap( "ICON_OBJBROWSER_SMESH" );
594   CORBA::String_var userName = aComp->componentusername();
595   SetName( father, userName.in(), "MESH" );
596   // add component to the use case tree
597   // (to support tree representation customization and drag-n-drop)
598   useCaseBuilder->SetRootCurrent();
599   useCaseBuilder->Append( father ); // component object is added as the top level item
600   if(MYDEBUG) MESSAGE("PublishComponent--END");
601
602   return father._retn();
603 }
604
605 //=======================================================================
606 //function : PublishMesh
607 //purpose  : 
608 //=======================================================================
609
610 SALOMEDS::SObject_ptr SMESH_Gen_i::PublishMesh (SMESH::SMESH_Mesh_ptr theMesh,
611                                                 const char*           theName)
612 {
613   if ( !myIsEnablePublish )
614     return SALOMEDS::SObject::_nil();
615   if ( CORBA::is_nil( theMesh ))
616     return SALOMEDS::SObject::_nil();
617   if(MYDEBUG) MESSAGE("PublishMesh--IN");
618
619   // find or publish a mesh
620
621   SALOMEDS::SObject_wrap aMeshSO = ObjectToSObject( theMesh );
622   if ( aMeshSO->_is_nil() )
623   {
624     SALOMEDS::SComponent_wrap father = PublishComponent();
625     if ( father->_is_nil() )
626       return aMeshSO._retn();
627
628     // Find correct free tag
629     long aTag = father->GetLastChildTag();
630     if ( aTag <= GetAlgorithmsRootTag() )
631       aTag = GetAlgorithmsRootTag() + 1;
632     else
633       aTag++;
634
635     aMeshSO = publish( theMesh, father, aTag, "ICON_SMESH_TREE_MESH_WARN" );
636     if ( aMeshSO->_is_nil() )
637       return aMeshSO._retn();
638   }
639   SetName( aMeshSO, theName, "Mesh" );
640
641   // Add shape reference
642
643   GEOM::GEOM_Object_var aShapeObject = theMesh->GetShapeToMesh();
644   if ( !CORBA::is_nil( aShapeObject )) {
645     addReference( aMeshSO, aShapeObject, GetRefOnShapeTag() );
646
647     // Publish global hypotheses
648
649     SMESH::ListOfHypothesis_var hypList = theMesh->GetHypothesisList( aShapeObject );
650     for ( CORBA::ULong i = 0; i < hypList->length(); i++ )
651     {
652       SMESH::SMESH_Hypothesis_var aHyp = SMESH::SMESH_Hypothesis::_narrow( hypList[ i ]);
653       SALOMEDS::SObject_wrap so = PublishHypothesis( aHyp );
654       AddHypothesisToShape( theMesh, aShapeObject, aHyp );
655     }
656   }
657
658   // Publish submeshes
659
660   SMESH_Mesh_i* mesh_i = objectToServant<SMESH_Mesh_i>( theMesh );
661   if ( !mesh_i )
662     return aMeshSO._retn();
663   map<int, SMESH_subMesh_i*>& subMap = mesh_i->_mapSubMesh_i;
664   map<int, SMESH_subMesh_i*>::iterator subIt = subMap.begin();
665   for ( ; subIt != subMap.end(); subIt++ ) {
666     SMESH::SMESH_subMesh_ptr aSubMesh = (*subIt).second->_this();
667     if ( !CORBA::is_nil( aSubMesh )) {
668       aShapeObject = aSubMesh->GetSubShape();
669       SALOMEDS::SObject_wrap( PublishSubMesh( theMesh, aSubMesh, aShapeObject ));
670     }
671   }
672
673   // Publish groups
674   const map<int, SMESH::SMESH_GroupBase_ptr>& grMap = mesh_i->getGroups();
675   map<int, SMESH::SMESH_GroupBase_ptr>::const_iterator it = grMap.begin();
676   for ( ; it != grMap.end(); it++ )
677   {
678     SMESH::SMESH_GroupBase_ptr aGroup = (*it).second;
679     if ( !aGroup->_is_nil() ) {
680       GEOM::GEOM_Object_var aShapeObj;
681       SMESH::SMESH_GroupOnGeom_var aGeomGroup = SMESH::SMESH_GroupOnGeom::_narrow( aGroup );
682       if ( !aGeomGroup->_is_nil() )
683         aShapeObj = aGeomGroup->GetShape();
684       SALOMEDS::SObject_wrap( PublishGroup( theMesh, aGroup, aShapeObj ));
685     }
686   }
687
688   if(MYDEBUG) MESSAGE("PublishMesh_END");
689   return aMeshSO._retn();
690 }
691
692 //=======================================================================
693 //function : PublishSubMesh
694 //purpose  : 
695 //=======================================================================
696
697 SALOMEDS::SObject_ptr SMESH_Gen_i::PublishSubMesh (SMESH::SMESH_Mesh_ptr    theMesh,
698                                                    SMESH::SMESH_subMesh_ptr theSubMesh,
699                                                    GEOM::GEOM_Object_ptr    theShapeObject,
700                                                    const char*              theName)
701 {
702   if ( !myIsEnablePublish )
703     return SALOMEDS::SObject::_nil();
704   if ( theMesh->_is_nil() || theSubMesh->_is_nil() || theShapeObject->_is_nil() )
705     return SALOMEDS::SObject::_nil();
706
707   std::string newName( theName ? theName : "" );
708
709   SALOMEDS::SObject_wrap aSubMeshSO = ObjectToSObject( theSubMesh );
710   if ( aSubMeshSO->_is_nil() )
711   {
712     SALOMEDS::SObject_wrap aMeshSO = ObjectToSObject( theMesh );
713     if ( aMeshSO->_is_nil() ) {
714       aMeshSO = PublishMesh( theMesh );
715       if ( aMeshSO->_is_nil())
716         return SALOMEDS::SObject::_nil();
717     }
718     // Find submesh sub-tree tag
719     long aRootTag;
720     const char* aRootName = "";
721     switch ( theShapeObject->GetShapeType() ) {
722     case GEOM::VERTEX:
723       aRootTag  = GetSubMeshOnVertexTag();
724       aRootName = "SubMeshes on Vertex";
725       break;
726     case GEOM::EDGE:
727       aRootTag  = GetSubMeshOnEdgeTag();
728       aRootName = "SubMeshes on Edge";
729       break;
730     case GEOM::WIRE:
731       aRootTag  = GetSubMeshOnWireTag();
732       aRootName = "SubMeshes on Wire";
733       break;
734     case GEOM::FACE:
735       aRootTag  = GetSubMeshOnFaceTag();
736       aRootName = "SubMeshes on Face";    
737       break;
738     case GEOM::SHELL:
739       aRootTag  = GetSubMeshOnShellTag();
740       aRootName = "SubMeshes on Shell";   
741       break;
742     case GEOM::SOLID:
743       aRootTag  = GetSubMeshOnSolidTag();
744       aRootName = "SubMeshes on Solid";
745       break;
746     default:
747       aRootTag  = GetSubMeshOnCompoundTag();
748       aRootName = "SubMeshes on Compound";
749       break;
750     }
751
752     // Find or create submesh root
753     SALOMEDS::SObject_wrap aRootSO = publish ( CORBA::Object::_nil(),
754                                                aMeshSO, aRootTag, 0, false );
755     if ( aRootSO->_is_nil() )
756       return aSubMeshSO._retn();
757
758     SetName( aRootSO, aRootName );
759
760     // Add new sub-mesh to corresponding sub-tree
761     int tag = 0; // to use a new SObject
762     if ( theName && theName[0] == '0' )
763     {
764       // theName can be an entry of an invalid sub-mesh which theSubMesh should replace
765       SALOMEDS::SObject_wrap aSObj = getStudyServant()->FindObjectID( theName );
766       if ( aSObj )
767       {
768         CORBA::String_var oldName = aSObj->GetName();
769         newName = oldName.in();
770         SALOMEDS::SObject_wrap aRootSO2 = aSObj->GetFather();
771         if ( aRootSO->Tag() == aRootSO2->Tag() ) // same parent
772           tag = aSObj->Tag(); // to use the same SObject
773         else
774         {
775           CORBA::Object_var anObj = SObjectToObject( aSObj );
776           SMESH::SMESH_subMesh_var sm = SMESH::SMESH_subMesh::_narrow( anObj );
777           theMesh->RemoveSubMesh( sm );
778         }
779       }
780     }
781     SMESH::array_of_ElementType_var elemTypes = theSubMesh->GetTypes();
782     const int isEmpty = ( elemTypes->length() == 0 );
783     const char* pm[2] = { "ICON_SMESH_TREE_MESH", "ICON_SMESH_TREE_MESH_WARN" };
784     aSubMeshSO = publish ( theSubMesh, aRootSO, tag, pm[isEmpty] );
785     if ( aSubMeshSO->_is_nil() )
786       return aSubMeshSO._retn();
787
788     highLightInvalid( aSubMeshSO, false ); // now it is valid
789   }
790   SetName( aSubMeshSO, newName.c_str(), "SubMesh" );
791
792   // Add reference to theShapeObject
793
794   addReference( aSubMeshSO, theShapeObject, GetRefOnShapeTag() );
795
796   // Publish hypothesis
797
798   SMESH::ListOfHypothesis_var hypList = theMesh->GetHypothesisList( theShapeObject );
799   for ( CORBA::ULong i = 0; i < hypList->length(); i++ )
800   {
801     SMESH::SMESH_Hypothesis_var aHyp = SMESH::SMESH_Hypothesis::_narrow( hypList[ i ]);
802     SALOMEDS::SObject_wrap so = PublishHypothesis( aHyp );
803     AddHypothesisToShape( theMesh, theShapeObject, aHyp );
804   }
805
806   return aSubMeshSO._retn();
807 }
808
809 //=======================================================================
810 //function : PublishGroup
811 //purpose  : 
812 //=======================================================================
813
814 SALOMEDS::SObject_ptr SMESH_Gen_i::PublishGroup (SMESH::SMESH_Mesh_ptr  theMesh,
815                                                  SMESH::SMESH_GroupBase_ptr theGroup,
816                                                  GEOM::GEOM_Object_ptr  theShapeObject,
817                                                  const char*            theName)
818 {
819   if ( !myIsEnablePublish )
820     return SALOMEDS::SObject::_nil();
821   if (theMesh->_is_nil() || theGroup->_is_nil() )
822     return SALOMEDS::SObject::_nil();
823
824   SALOMEDS::SObject_wrap aGroupSO = ObjectToSObject( theGroup );
825   if ( aGroupSO->_is_nil() )
826   {
827     SALOMEDS::SObject_wrap aMeshSO = ObjectToSObject( theMesh );
828     if ( aMeshSO->_is_nil() ) {
829       aMeshSO = PublishInStudy( SALOMEDS::SObject::_nil(), theMesh, "");
830       if ( aMeshSO->_is_nil())
831         return SALOMEDS::SObject::_nil();
832     }
833     size_t aType = (int)theGroup->GetType();
834     const char* aRootNames[] = {
835       "Compound Groups", "Groups of Nodes", "Groups of Edges",
836       "Groups of Faces", "Groups of Volumes", "Groups of 0D Elements",
837       "Groups of Balls" };
838
839     // Currently, groups with heterogeneous content are not supported
840     if ( aType != SMESH::ALL )
841     {
842       long aRootTag = GetNodeGroupsTag() + aType - 1;
843
844       // Find or create groups root
845       SALOMEDS::SObject_wrap aRootSO = publish ( CORBA::Object::_nil(),
846                                                  aMeshSO, aRootTag, 0, false );
847       if ( aRootSO->_is_nil() ) return SALOMEDS::SObject::_nil();
848
849       if ( aType < sizeof(aRootNames)/sizeof(char*) )
850         SetName( aRootSO, aRootNames[aType] );
851
852       // Add new group to corresponding sub-tree
853       int isEmpty = ( theMesh->NbNodes() == 0 );
854       std::string pm[2] = { "ICON_SMESH_TREE_GROUP", "ICON_SMESH_TREE_MESH_WARN" };
855       if ( !isEmpty )
856       {
857         if ( SMESH::DownCast< SMESH_GroupOnFilter_i* > ( theGroup )) // on filter
858         {
859           pm[0] = "ICON_SMESH_TREE_GROUP_ON_FILTER";
860
861           if ( theGroup->GetType() != SMESH::NODE )
862           {
863             isEmpty = true;
864             SMESH::array_of_ElementType_var allElemTypes = theMesh->GetTypes();
865             for ( size_t i =0; i < allElemTypes->length() && isEmpty; ++i )
866               isEmpty = ( allElemTypes[i] != theGroup->GetType() );
867           }
868         }
869         else // standalone or on geometry
870         {
871           isEmpty = ( theGroup->Size() == 0 );
872         }
873       }
874       aGroupSO = publish ( theGroup, aRootSO, 0, pm[isEmpty].c_str() );
875     }
876     if ( aGroupSO->_is_nil() )
877       return aGroupSO._retn();
878   }
879
880   SetName( aGroupSO, theName, "Group" );
881
882   //Add reference to geometry
883   if ( !theShapeObject->_is_nil() )
884     addReference( aGroupSO, theShapeObject, GetRefOnShapeTag() );
885
886   return aGroupSO._retn();
887 }
888
889 //=======================================================================
890 //function : PublishHypothesis
891 //purpose  :
892 //=======================================================================
893
894 SALOMEDS::SObject_ptr
895 SMESH_Gen_i::PublishHypothesis (SMESH::SMESH_Hypothesis_ptr theHyp,
896                                 const char*                 theName)
897 {
898   if(MYDEBUG) MESSAGE("PublishHypothesis");
899   if ( !myIsEnablePublish )
900     return SALOMEDS::SObject::_nil();
901   if (theHyp->_is_nil())
902     return SALOMEDS::SObject::_nil();
903
904   CORBA::String_var hypType = theHyp->GetName();
905
906   SALOMEDS::SObject_wrap aHypSO = ObjectToSObject( theHyp );
907   if ( aHypSO->_is_nil() )
908   {
909     SALOMEDS::SComponent_wrap father = PublishComponent();
910     if ( father->_is_nil() )
911       return aHypSO._retn();
912
913     //Find or Create Hypothesis root
914     bool isAlgo = ( !SMESH::SMESH_Algo::_narrow( theHyp )->_is_nil() );
915     int aRootTag = isAlgo ? GetAlgorithmsRootTag() : GetHypothesisRootTag();
916     SALOMEDS::SObject_wrap aRootSO =
917       publish (CORBA::Object::_nil(),father, aRootTag,
918                isAlgo ? "ICON_SMESH_TREE_ALGO" : "ICON_SMESH_TREE_HYPO", false);
919     SetName( aRootSO, isAlgo ?  "Algorithms" : "Hypotheses" );
920
921     // Add New Hypothesis
922     string aPmName = isAlgo ? "ICON_SMESH_TREE_ALGO_" : "ICON_SMESH_TREE_HYPO_";
923     aPmName += hypType.in();
924     // prepend plugin name to pixmap name
925     string pluginName = myHypCreatorMap[ hypType.in() ]->GetModuleName();
926     if ( pluginName != "StdMeshers" )
927       aPmName = pluginName + "::" + aPmName;
928     aHypSO = publish( theHyp, aRootSO, 0, aPmName.c_str() );
929   }
930
931   SetName( aHypSO, theName, hypType.in() );
932
933   if(MYDEBUG) MESSAGE("PublishHypothesis--END")
934   return aHypSO._retn();
935 }
936
937 //=======================================================================
938 //function : UpdateIcons
939 //purpose  : update icons of a mesh and its children upon mesh modification
940 //=======================================================================
941
942 void SMESH_Gen_i::UpdateIcons( SMESH::SMESH_Mesh_ptr theMesh )
943 {
944   SMESH_Mesh_i* mesh_i = SMESH::DownCast< SMESH_Mesh_i* >( theMesh );
945   if ( ! mesh_i )
946     return;
947
948   SALOMEDS::SObject_wrap so = ObjectToSObject( theMesh );
949   if ( so->_is_nil() )
950     return;
951
952   // set icon of the mesh
953   if ( mesh_i->NbNodes() == 0 )
954     SetPixMap( so, "ICON_SMESH_TREE_MESH_WARN" );
955   else if ( mesh_i->IsComputedOK() )
956     SetPixMap( so, "ICON_SMESH_TREE_MESH" );
957   else if ( mesh_i->HasShapeToMesh() )
958     SetPixMap( so, "ICON_SMESH_TREE_MESH_PARTIAL" );
959   else
960     SetPixMap( so, "ICON_SMESH_TREE_MESH_IMPORTED" );
961
962   // set icons of sub-objects
963   SALOMEDS::Study_var         study = getStudyServant();
964   SALOMEDS::ChildIterator_wrap iter = study->NewChildIterator( so );
965   for ( ; iter->More(); iter->Next() )
966   {
967     so = iter->Value(); // 1st level child - root of algos, hyps, sub-meshes or groups
968     if ( so->Tag() < SMESH::Tag_FirstSubMesh )
969       continue;
970
971     SALOMEDS::ChildIterator_wrap subIter = study->NewChildIterator( so );
972     for ( ; subIter->More(); subIter->Next() )
973     {
974       so = subIter->Value(); // 2nd level child - a sub-mesh or group
975
976       CORBA::Object_var           obj = SObjectToObject( so );
977       SMESH::SMESH_IDSource_var idSrc = SMESH::SMESH_IDSource::_narrow( obj );
978       if ( idSrc->_is_nil() )
979         continue;
980
981       SMESH::SMESH_GroupBase_var     grp = SMESH::SMESH_GroupBase::_narrow( obj );
982       SMESH::SMESH_GroupOnFilter_var gof = SMESH::SMESH_GroupOnFilter::_narrow( obj );
983       const bool         isGroup = !grp->_is_nil();
984       const bool isGroupOnFilter = !gof->_is_nil();
985
986       bool isEmpty = ( mesh_i->NbNodes() == 0 );
987       if ( !isEmpty )
988       {
989         if ( isGroupOnFilter ) // GetTypes() can be very long on GroupOnFilter!
990         {
991           SMESH::smIdType_array_var nbByType = mesh_i->GetNbElementsByType();
992           isEmpty = ( nbByType[ grp->GetType() ] == 0 );
993         }
994         else
995         {
996           SMESH::array_of_ElementType_var elemTypes = idSrc->GetTypes();
997           isEmpty = ( elemTypes->length() == 0 );
998
999           if ( !isEmpty )
1000           {
1001             // check if all sub-shapes of sub-mesh on group are computed
1002             // (pb: "Compute sub-mesh" menu is missing if a sub-mesh is partially computed)
1003             SMESH::SMESH_subMesh_var subMesh = SMESH::SMESH_subMesh::_narrow( obj );
1004             if ( !subMesh->_is_nil() )
1005               if ( SMESH_subMesh* sm = mesh_i->GetImpl().GetSubMeshContaining( subMesh->GetId() ))
1006                 if ( sm->IsComputedPartially() )
1007                 {
1008                   SetPixMap( so, "ICON_SMESH_TREE_MESH_PARTIAL" );
1009                   continue;
1010                 }
1011           }
1012         }
1013       }
1014
1015       if ( isEmpty )
1016         SetPixMap( so, "ICON_SMESH_TREE_MESH_WARN");
1017       else if ( !isGroup )
1018         SetPixMap( so, "ICON_SMESH_TREE_MESH" );
1019       else if ( isGroupOnFilter )
1020         SetPixMap( so, "ICON_SMESH_TREE_GROUP_ON_FILTER" );
1021       else
1022         SetPixMap( so, "ICON_SMESH_TREE_GROUP" );
1023
1024     } // loop on sub-meshes or groups
1025   } // loop on roots
1026 }
1027
1028 //=======================================================================
1029 //function : HighLightInvalid
1030 //purpose  : change font color of a object in the Object Browser
1031 //=======================================================================
1032
1033 void SMESH_Gen_i::HighLightInvalid( CORBA::Object_ptr theObject, bool isInvalid )
1034 {
1035   SALOMEDS::SObject_wrap so = ObjectToSObject(theObject);
1036   highLightInvalid( so.in(), isInvalid );
1037 }
1038
1039 //=======================================================================
1040 //function : highLightInvalid
1041 //purpose  : change font color of a object in the Object Browser
1042 //=======================================================================
1043
1044 void SMESH_Gen_i::highLightInvalid( SALOMEDS::SObject_ptr theSObject, bool isInvalid )
1045 {
1046   if ( !theSObject->_is_nil() )
1047   {
1048     SALOMEDS::StudyBuilder_var studyBuilder = getStudyServant()->NewBuilder();
1049     if ( isInvalid )
1050     {
1051       SALOMEDS::Color red = { 178,34,34 }; // to differ from reference color
1052       SALOMEDS::GenericAttribute_wrap attr =
1053         studyBuilder->FindOrCreateAttribute( theSObject, "AttributeTextColor" );
1054       SALOMEDS::AttributeTextColor_wrap colorAttr = attr;
1055       colorAttr->SetTextColor( red );
1056     }
1057     else
1058     {
1059       studyBuilder->RemoveAttribute( theSObject, "AttributeTextColor" );
1060     }
1061   }
1062 }
1063
1064 //=======================================================================
1065 //function : IsInvalid
1066 //purpose  : Check object validity == absence of AttributeTextColor=(178,34,34)
1067 //=======================================================================
1068
1069 bool SMESH_Gen_i::IsInvalid( SALOMEDS::SObject_ptr theSObject )
1070 {
1071   bool isValid = true;
1072   if ( !theSObject->_is_nil() )
1073   {
1074     SALOMEDS::GenericAttribute_wrap attr;
1075     SALOMEDS::StudyBuilder_var studyBuilder = getStudyServant()->NewBuilder();
1076     if ( studyBuilder->FindAttribute( theSObject, attr.inout(), "AttributeTextColor" ))
1077     {
1078       SALOMEDS::AttributeTextColor_wrap colorAttr = attr;
1079       SALOMEDS::Color color = colorAttr->TextColor();
1080       isValid = ( color.R != 178 || color.G != 34 || color.B != 34 );
1081     }
1082   }
1083   return isValid;
1084 }
1085
1086 //=======================================================================
1087 //function : GetMeshOrSubmeshByShape
1088 //purpose  : 
1089 //=======================================================================
1090
1091 SALOMEDS::SObject_ptr
1092 SMESH_Gen_i::GetMeshOrSubmeshByShape (SMESH::SMESH_Mesh_ptr theMesh,
1093                                       GEOM::GEOM_Object_ptr theShape)
1094 {
1095   if(MYDEBUG) MESSAGE("GetMeshOrSubmeshByShape")
1096   SALOMEDS::SObject_wrap aMeshOrSubMesh;
1097   if (theMesh->_is_nil() || ( theShape->_is_nil() && theMesh->HasShapeToMesh()))
1098     return aMeshOrSubMesh._retn();
1099   
1100   TopoDS_Shape aShape;
1101   if(theMesh->HasShapeToMesh())
1102     aShape = GeomObjectToShape( theShape );
1103   else
1104     aShape = SMESH_Mesh::PseudoShape();
1105
1106   SMESH_Mesh_i* mesh_i = objectToServant<SMESH_Mesh_i>( theMesh );
1107
1108   if ( !aShape.IsNull() && mesh_i && mesh_i->GetImpl().GetMeshDS() ) {
1109     SMESHDS_Mesh* meshDS = mesh_i->GetImpl().GetMeshDS();
1110     if ( aShape.IsSame( meshDS->ShapeToMesh() ))
1111       aMeshOrSubMesh = ObjectToSObject( theMesh );
1112     else {
1113       int shapeID = meshDS->ShapeToIndex( aShape );
1114       SMESH::SMESH_subMesh_var aSubMesh = mesh_i->getSubMesh(shapeID);
1115       if ( !aSubMesh->_is_nil() )
1116         aMeshOrSubMesh = ObjectToSObject( aSubMesh );
1117     }
1118   }
1119   if(MYDEBUG) MESSAGE("GetMeshOrSubmeshByShape--END")
1120   return aMeshOrSubMesh._retn();
1121 }
1122
1123 //=======================================================================
1124 //function : AddHypothesisToShape
1125 //purpose  : 
1126 //=======================================================================
1127
1128 bool SMESH_Gen_i::AddHypothesisToShape(SMESH::SMESH_Mesh_ptr       theMesh,
1129                                        GEOM::GEOM_Object_ptr       theShape,
1130                                        SMESH::SMESH_Hypothesis_ptr theHyp)
1131 {
1132   if(MYDEBUG) MESSAGE("AddHypothesisToShape")
1133   if (theMesh->_is_nil() ||
1134       theHyp->_is_nil() || (theShape->_is_nil()
1135                             && theMesh->HasShapeToMesh()) )
1136     return false;
1137
1138   SALOMEDS::SObject_wrap aMeshSO = ObjectToSObject( theMesh );
1139   if ( aMeshSO->_is_nil() )
1140     aMeshSO = PublishMesh( theMesh );
1141   SALOMEDS::SObject_wrap aHypSO = PublishHypothesis( theHyp );
1142   if ( aMeshSO->_is_nil() || aHypSO->_is_nil())
1143     return false;
1144
1145   // Find a mesh or submesh referring to theShape
1146   SALOMEDS::SObject_wrap aMeshOrSubMesh =
1147     GetMeshOrSubmeshByShape( theMesh, theShape );
1148   if ( aMeshOrSubMesh->_is_nil() )
1149   {
1150     // publish submesh
1151     TopoDS_Shape aShape = GeomObjectToShape( theShape );
1152     SMESH_Mesh_i* mesh_i = objectToServant<SMESH_Mesh_i>( theMesh );
1153     if ( !aShape.IsNull() && mesh_i && mesh_i->GetImpl().GetMeshDS() ) {
1154       SMESHDS_Mesh* meshDS = mesh_i->GetImpl().GetMeshDS();
1155       int shapeID = meshDS->ShapeToIndex( aShape );
1156       SMESH::SMESH_subMesh_var aSubMesh = mesh_i->getSubMesh(shapeID);
1157       aMeshOrSubMesh = PublishSubMesh( theMesh, aSubMesh, theShape );
1158     }
1159     if ( aMeshOrSubMesh->_is_nil() )
1160       return false;
1161   }
1162
1163   //Find or Create Applied Hypothesis root
1164   bool aIsAlgo = !SMESH::SMESH_Algo::_narrow( theHyp )->_is_nil();
1165   SALOMEDS::SObject_wrap AHR =
1166     publish (CORBA::Object::_nil(), aMeshOrSubMesh,
1167              aIsAlgo ? GetRefOnAppliedAlgorithmsTag() : GetRefOnAppliedHypothesisTag(),
1168              aIsAlgo ? "ICON_SMESH_TREE_ALGO" : "ICON_SMESH_TREE_HYPO", false);
1169   SetName( AHR, aIsAlgo ? "Applied algorithms" : "Applied hypotheses" );
1170
1171   addReference( AHR, theHyp );
1172
1173   if(MYDEBUG) MESSAGE("AddHypothesisToShape--END")
1174   return true;
1175 }
1176
1177 //=======================================================================
1178 //function : RemoveHypothesisFromShape
1179 //purpose  : 
1180 //=======================================================================
1181
1182 bool SMESH_Gen_i::RemoveHypothesisFromShape(SMESH::SMESH_Mesh_ptr       theMesh,
1183                                             GEOM::GEOM_Object_ptr       theShape,
1184                                             SMESH::SMESH_Hypothesis_ptr theHyp)
1185 {
1186   if (theMesh->_is_nil() ||
1187       theHyp->_is_nil() || (theShape->_is_nil()
1188                             && theMesh->HasShapeToMesh()))
1189     return false;
1190
1191   SALOMEDS::SObject_wrap aHypSO = ObjectToSObject( theHyp );
1192   if ( aHypSO->_is_nil() )
1193     return false;
1194
1195   CORBA::String_var hypEntry = aHypSO->GetID();
1196
1197   // Find a mesh or sub-mesh referring to theShape
1198   SALOMEDS::SObject_wrap aMeshOrSubMesh =
1199     GetMeshOrSubmeshByShape( theMesh, theShape );
1200   if ( aMeshOrSubMesh->_is_nil() )
1201     return false;
1202
1203   // Find and remove a reference to aHypSO
1204   SALOMEDS::SObject_wrap aRef, anObj;
1205   SALOMEDS::ChildIterator_wrap it = getStudyServant()->NewChildIterator( aMeshOrSubMesh );
1206   bool found = false;
1207   for ( it->InitEx( true ); ( it->More() && !found ); it->Next() ) {
1208     anObj = it->Value();
1209     if (anObj->ReferencedObject( aRef.inout() ))
1210     {
1211       CORBA::String_var refEntry = aRef->GetID();
1212       found = ( strcmp( refEntry, hypEntry ) == 0 );
1213     }
1214     if ( found )
1215     {
1216       SALOMEDS::StudyBuilder_var builder = getStudyServant()->NewBuilder();
1217       builder->RemoveObject( anObj );
1218     }
1219   }
1220
1221   return true;
1222 }
1223
1224 //================================================================================
1225 /*!
1226  * \brief Stores names of variables that WILL be passes as parameters when calling
1227  *        some method of a given object.
1228  *  \param [in] theObject - the object whose a method WILL be called with \a theParameters.
1229  *  \param [in] theParameters - a string containing parameters separated by ':'.
1230  */
1231 //================================================================================
1232
1233 void SMESH_Gen_i::UpdateParameters(CORBA::Object_ptr theObject, const char* theParameters)
1234 {
1235   // find variable names within theParameters
1236
1237   myLastObj.clear();
1238   myLastParameters.clear();
1239   myLastParamIndex.clear(); /* vector holding indices of virables within the string
1240                                of all variables used for theObject */ 
1241   int nbVars = 0;
1242   int pos = 0, prevPos = 0, len = strlen( theParameters );
1243   if ( len == 0 ) return;
1244   while ( pos <= len )
1245   {
1246     if ( pos == len || theParameters[pos] == ':' )
1247     {
1248       if ( prevPos < pos )
1249       {
1250         string val( theParameters + prevPos, theParameters + pos );
1251         if ( !getStudyServant()->IsVariable( val.c_str() ))
1252           val.clear();
1253         myLastParameters.push_back( val );
1254         nbVars += (! myLastParameters.back().empty() );
1255       }
1256       else
1257       {
1258         myLastParameters.push_back("");
1259       }
1260       prevPos = pos+1;
1261     }
1262     ++pos;
1263   }
1264
1265   if ( nbVars < 1 )
1266     return;
1267
1268   // store
1269   // (1) variable names in the string of all variables used for theObject and
1270   // (2) indices of found variables in myLastParamIndex.
1271
1272   // remember theObject
1273   SALOMEDS::SObject_wrap aSObj =  ObjectToSObject(theObject);
1274   if ( aSObj->_is_nil() )
1275     return;
1276   CORBA::String_var anObjEntry = aSObj->GetID();
1277   myLastObj = anObjEntry.in();
1278
1279   // get a string of variable names
1280   SALOMEDS::StudyBuilder_var   aStudyBuilder = getStudyServant()->NewBuilder();
1281   SALOMEDS::GenericAttribute_wrap     anAttr =
1282     aStudyBuilder->FindOrCreateAttribute( aSObj, "AttributeString" );
1283   SALOMEDS::AttributeString_wrap aStringAttr = anAttr;
1284   CORBA::String_var                  oldVars = aStringAttr->Value();
1285   std::string                         varStr = oldVars.in();
1286
1287   // add new variables and find indices of variables
1288   for ( size_t i = 0; i < myLastParameters.size(); ++i )
1289   {
1290     int varIndex = -1;
1291     if ( !myLastParameters[i].empty() )
1292     {
1293       // find index of myLastParameters[i] in varStr
1294       int curIndex  = 0;
1295       bool varFound = false;
1296       size_t pos    = 0;
1297       // varStr can be "A|B::C;*=2|D"
1298       const std::string separators(":|;*=");
1299       while ( pos < varStr.size() && !varFound )
1300       {
1301         // skip separators
1302         while ( separators.find( varStr[ pos ]) != std::string::npos )
1303           if ( ++pos >= varStr.size() )
1304             break;
1305         // skip repetition number following '='
1306         if ( varStr[ pos-1 ] == '=' )
1307         {
1308           while ( '0' <= varStr[ pos ] && varStr[ pos ] <= '9' )
1309             ++pos;
1310           continue; // to skip next separator
1311         }
1312         // compare variable name
1313         if ( pos < varStr.size() )
1314         {
1315           varFound = ( varStr.compare( pos, myLastParameters[i].size(), myLastParameters[i] ) == 0 &&
1316                        // same string beginning but is length same?
1317                        ( pos + myLastParameters[i].size() >= varStr.size() ||
1318                          separators.find( varStr[ pos+1 ]) != std::string::npos ));
1319           if ( varFound )
1320             varIndex = curIndex;
1321           else
1322             pos = varStr.find_first_of( separators, pos ); // goto the next separator
1323           ++curIndex;
1324         }
1325       }
1326       // add new variable
1327       if ( !varFound )
1328       {
1329         varStr += ":" + myLastParameters[i];
1330         varIndex = curIndex;
1331       }
1332     }
1333     myLastParamIndex.push_back( varIndex );
1334   }
1335   aStringAttr->SetValue( varStr.c_str() );
1336 }
1337
1338 //================================================================================
1339 /*!
1340  * \brief Return all variables used to create an object
1341  *  \param [in] theObjectEntry - an object entry in the current study
1342  *  \return std::vector< std::string > - all variable names (or values of removed variables)
1343  */
1344 //================================================================================
1345
1346 std::vector< std::string > SMESH_Gen_i::GetAllParameters(const std::string& theObjectEntry) const
1347 {
1348   std::vector< std::string > varNames;
1349
1350   SALOMEDS::SObject_wrap aSObj = getStudyServant()->FindObjectID( theObjectEntry.c_str() );
1351
1352   // get a string of variable names
1353   SALOMEDS::StudyBuilder_var   aStudyBuilder = getStudyServant()->NewBuilder();
1354   SALOMEDS::GenericAttribute_wrap     anAttr =
1355     aStudyBuilder->FindOrCreateAttribute( aSObj, "AttributeString" );
1356   SALOMEDS::AttributeString_wrap aStringAttr = anAttr;
1357   CORBA::String_var                  oldVars = aStringAttr->Value();
1358   std::string                         varStr = oldVars.in();
1359
1360   // separate variables within varStr;
1361   // varStr can be "A|B::C;*=2|D"
1362   size_t pos = 0;
1363   const std::string separators(":|;*=");
1364   while ( pos < varStr.size() )
1365   {
1366     // skip separators
1367     pos = varStr.find_first_not_of( separators, pos );
1368     // while ( separators.find( varStr[ pos ]) != std::string::npos )
1369     //   if ( ++pos >= varStr.size() )
1370     //     break;
1371     // skip repetition number following '='
1372     if ( varStr[ pos-1 ] == '=' )
1373     {
1374       while ( '0' <= varStr[ pos ] && varStr[ pos ] <= '9' )
1375         ++pos;
1376       continue; // to skip next separator
1377     }
1378     // store variable name
1379     if ( pos < varStr.size() )
1380     {
1381       size_t pos2 = varStr.find_first_of( separators, pos );
1382       varNames.push_back( varStr.substr( pos, pos2 - pos));
1383       pos = pos2;
1384     }
1385   }
1386   return varNames;
1387 }
1388
1389 //=======================================================================
1390 //function : ParseParameters
1391 //purpose  : Replace variables by their values
1392 //=======================================================================
1393 // char* SMESH_Gen_i::ParseParameters(const char* theParameters)
1394 // {
1395 //   //const char* aParameters = theParameters;
1396 // //   const char* aParameters = CORBA::string_dup(theParameters);
1397 //   TCollection_AsciiString anInputParams;
1398 //   SALOMEDS::Study_var aStudy = getStudyServant();
1399 //   if( !aStudy->_is_nil() ) {
1400 // //     SALOMEDS::ListOfListOfStrings_var aSections = aStudy->ParseVariables(theParameters);
1401 // //     for(int j=0;j<aSections->length();j++) {
1402 // //       SALOMEDS::ListOfStrings aVars= aSections[j];
1403 // //       for(int i=0;i<aVars.length();i++ ) {
1404 // //         anInputParams += aStudy->IsVariable(aVars[i].in()) ? 
1405 // //           TCollection_AsciiString(aVars[i].in()) : TCollection_AsciiString("");
1406 // //         if(i != aVars.length()-1)
1407 // //           anInputParams+=":";
1408 // //       }
1409 // //       if(j!=aSections->length()-1)
1410 // //         anInputParams+="|";
1411 // //     }
1412 //     TCollection_AsciiString paramStr( theParameters );
1413 //     int beg = 0, end;
1414 //     char sep, *pParams = (char*)paramStr.ToCString();
1415 //     while ( beg < paramStr.Length() )
1416 //     {
1417 //       end = beg-1;
1418 //       while ( ++end < paramStr.Length() )
1419 //         if ( pParams[end] == ':' || pParams[end] == '|')
1420 //           break;
1421 //       if ( end < paramStr.Length())
1422 //       {
1423 //         sep = pParams[end];
1424 //         pParams[end] = '\0';
1425 //       }
1426 //       if ( aStudy->IsVariable( pParams+beg ))
1427 //         anInputParams += pParams+beg;
1428 //       if ( end < paramStr.Length() )
1429 //         anInputParams += sep;
1430 //       else
1431 //         break;
1432 //       beg = end + 1;
1433 //     }
1434 //   }
1435 //   return CORBA::string_dup(anInputParams.ToCString());
1436 // }
1437
1438 //=======================================================================
1439 //function : GetParameters
1440 //purpose  : 
1441 //=======================================================================
1442
1443 char* SMESH_Gen_i::GetParameters(CORBA::Object_ptr theObject)
1444 {
1445   CORBA::String_var aResult("");
1446
1447   SALOMEDS::SObject_wrap aSObj = ObjectToSObject( theObject );
1448   if ( !aSObj->_is_nil() )
1449   {
1450     SALOMEDS::GenericAttribute_wrap attr;
1451     if ( aSObj->FindAttribute( attr.inout(), "AttributeString"))
1452     {
1453       SALOMEDS::AttributeString_wrap strAttr = attr;
1454       aResult = strAttr->Value();
1455     }
1456   }
1457   return aResult._retn();
1458 }
1459
1460 //================================================================================
1461 /*!
1462  * \brief Create a sub-mesh on a geometry that is not a sub-shape of the main shape
1463  * for the case where a valid sub-shape not found by CopyMeshWithGeom().
1464  * The invalid sub-mesh has GetId() < 0.
1465  */
1466 //================================================================================
1467
1468 SMESH::SMESH_subMesh_ptr
1469 SMESH_Gen_i::createInvalidSubMesh(SMESH::SMESH_Mesh_ptr theMesh,
1470                                   GEOM::GEOM_Object_ptr theStrangerGeom,
1471                                   const char*           theName)
1472 {
1473   SMESH::SMESH_subMesh_var subMesh;
1474
1475   try
1476   {
1477     SMESH_Mesh_i* mesh_i = SMESH::DownCast<SMESH_Mesh_i*>( theMesh );
1478     subMesh = mesh_i->createSubMesh( theStrangerGeom );
1479
1480     if ( !subMesh->_is_nil() && CanPublishInStudy( subMesh ))
1481     {
1482       SALOMEDS::SObject_wrap so = PublishSubMesh( theMesh, subMesh, theStrangerGeom, theName );
1483
1484       // hide a reference to geometry
1485       if ( !so->_is_nil() )
1486       {
1487         SALOMEDS::SObject_wrap refSO;
1488         if ( so->FindSubObject( GetRefOnShapeTag(), refSO.inout() ))
1489         {
1490           SALOMEDS::StudyBuilder_var studyBuilder = getStudyServant()->NewBuilder();
1491           SALOMEDS::GenericAttribute_wrap attr =
1492             studyBuilder->FindOrCreateAttribute( refSO, "AttributeDrawable" );
1493           SALOMEDS::AttributeDrawable_wrap ga = attr;
1494           ga->SetDrawable( false );
1495         }
1496       }
1497     }
1498   }
1499   catch (...) {
1500   }
1501
1502   return subMesh._retn();
1503 }
1504
1505
1506 // ==============
1507 // Study context
1508 // ==============
1509
1510 //=======================================================================
1511 //function : addObject
1512 //purpose  : register object in the internal map and return its id
1513 //=======================================================================
1514
1515 int StudyContext::addObject( const std::string& theIOR )
1516 {
1517   int nextId = getNextId();
1518   mapIdToIOR.Bind( nextId, theIOR );
1519   return nextId;
1520 }
1521
1522 //=======================================================================
1523 //function : findId
1524 //purpose  : find the object id in the internal map by the IOR
1525 //=======================================================================
1526
1527 int StudyContext::findId( const std::string& theIOR )
1528 {
1529   TInt2StringMap::iterator imap;
1530   for ( imap = mapIdToIOR.begin(); imap != mapIdToIOR.end(); ++imap ) {
1531     if ( *imap == theIOR )
1532       return imap.Iterator().Key();
1533   }
1534   return 0;
1535 }
1536
1537 //=======================================================================
1538 //function : getIORbyId
1539 //purpose  : get object's IOR by id
1540 //=======================================================================
1541
1542 std::string StudyContext::getIORbyId( const int theId )
1543 {
1544   if ( mapIdToIOR.IsBound( theId ) )
1545     return mapIdToIOR( theId );
1546   return std::string();
1547 }
1548
1549 //=======================================================================
1550 //function : getIORbyOldId
1551 //purpose  : get object's IOR by old id
1552 //=======================================================================
1553
1554 std::string StudyContext::getIORbyOldId( const int theOldId )
1555 {
1556   if ( mapIdToId.IsBound( theOldId ) )
1557     return getIORbyId( mapIdToId( theOldId ));
1558   return std::string();
1559 }
1560
1561 //=======================================================================
1562 //function : mapOldToNew
1563 //purpose  : maps old object id to the new one (used when restoring data)
1564 //=======================================================================
1565
1566 void StudyContext::mapOldToNew( const int oldId, const int newId )
1567 {
1568   mapIdToId.Bind( oldId, newId );
1569 }
1570
1571 //=======================================================================
1572 //function : getOldId
1573 //purpose  : get old id by a new one
1574 //=======================================================================
1575
1576 int StudyContext::getOldId( const int newId )
1577 {
1578   TInt2IntMap::iterator imap;
1579   for ( imap = mapIdToId.begin(); imap != mapIdToId.end(); ++imap ) {
1580     if ( *imap == newId )
1581       return imap.Iterator().Key();
1582   }
1583   return 0;
1584 }
1585
1586 //=======================================================================
1587 //function : Clear
1588 //purpose  : clear data
1589 //=======================================================================
1590
1591 void StudyContext::Clear()
1592 {
1593   mapIdToIOR.Clear();
1594   mapIdToId.Clear();
1595 }