]> SALOME platform Git repositories - modules/smesh.git/blob - src/SMESH/SMESH_subMesh.cxx
Salome HOME
Revert "Adding Multinode method for smesh parallelism + cleanup and doc"
[modules/smesh.git] / src / SMESH / SMESH_subMesh.cxx
1 // Copyright (C) 2007-2023  CEA, EDF, 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 SMESH : implementation of SMESH idl descriptions
24 //  File   : SMESH_subMesh.cxx
25 //  Author : Paul RASCLE, EDF
26 //  Module : SMESH
27
28 #include "SMESH_subMesh.hxx"
29
30 #include "SMDS_SetIterator.hxx"
31 #include "SMESHDS_Mesh.hxx"
32 #include "SMESH_Algo.hxx"
33 #include "SMESH_Comment.hxx"
34 #include "SMESH_Gen.hxx"
35 #include "SMESH_HypoFilter.hxx"
36 #include "SMESH_Hypothesis.hxx"
37 #include "SMESH_Mesh.hxx"
38 #include "SMESH_MesherHelper.hxx"
39 #include "SMESH_subMeshEventListener.hxx"
40 #include "SMESH_MeshLocker.hxx"
41
42 #include "utilities.h"
43 #include "Basics_Utils.hxx"
44
45 #include <BRep_Builder.hxx>
46 #include <BRep_Tool.hxx>
47 #include <TopExp.hxx>
48 #include <TopExp_Explorer.hxx>
49 #include <TopTools_IndexedMapOfShape.hxx>
50 #include <TopTools_ListIteratorOfListOfShape.hxx>
51 #include <TopTools_ListOfShape.hxx>
52 #include <TopoDS.hxx>
53 #include <TopoDS_Compound.hxx>
54 #include <TopoDS_Iterator.hxx>
55 #include <gp_Pnt.hxx>
56
57 #include <Standard_OutOfMemory.hxx>
58 #include <Standard_ErrorHandler.hxx>
59
60 #include <numeric>
61
62 using namespace std;
63
64 #ifdef _DEBUG_
65 // enable printing algo + shape id + hypo used while meshing
66 #define PRINT_WHO_COMPUTE_WHAT
67 #endif
68
69 //=============================================================================
70 /*!
71  * \brief Allocate some memory at construction and release it at destruction.
72  * Is used to be able to continue working after mesh generation breaks due to
73  * lack of memory
74  */
75 //=============================================================================
76
77 struct MemoryReserve
78 {
79   char* myBuf;
80   MemoryReserve(): myBuf( new char[1024*1024*2] ){}
81   ~MemoryReserve() { delete [] myBuf; }
82 };
83
84 //=============================================================================
85 /*!
86  *  default constructor:
87  */
88 //=============================================================================
89
90 SMESH_subMesh::SMESH_subMesh(int                  Id,
91                              SMESH_Mesh *         father,
92                              SMESHDS_Mesh *       meshDS,
93                              const TopoDS_Shape & aSubShape)
94 {
95   _subShape           = aSubShape;
96   _subMeshDS          = meshDS->MeshElements(_subShape);   // may be null ...
97   _father             = father;
98   _Id                 = Id;
99   _dependenceAnalysed = _alwaysComputed = false;
100   _algo               = 0;
101   if (_subShape.ShapeType() == TopAbs_VERTEX)
102   {
103     _algoState = HYP_OK;
104     _computeState = READY_TO_COMPUTE;
105   }
106   else
107   {
108     _algoState = NO_ALGO;
109     _computeState = NOT_READY;
110   }
111   _computeCost = 0; // how costly is to compute this sub-mesh
112   _realComputeCost = 0;
113   _allowedSubShapes = nullptr;
114 }
115
116 //=============================================================================
117 /*!
118  *
119  */
120 //=============================================================================
121
122 SMESH_subMesh::~SMESH_subMesh()
123 {
124   deleteOwnListeners();
125 }
126
127 //=============================================================================
128 /*!
129  *
130  */
131 //=============================================================================
132
133 int SMESH_subMesh::GetId() const
134 {
135   //MESSAGE("SMESH_subMesh::GetId");
136   return _Id;
137 }
138
139 //=============================================================================
140 /*!
141  *
142  */
143 //=============================================================================
144
145 SMESHDS_SubMesh * SMESH_subMesh::GetSubMeshDS()
146 {
147   // submesh appears in DS only when a mesher set nodes and elements on a shape
148   return _subMeshDS ? _subMeshDS : _subMeshDS = _father->GetMeshDS()->MeshElements(_subShape); // may be null
149 }
150
151 //=============================================================================
152 /*!
153  *
154  */
155 //=============================================================================
156
157 const SMESHDS_SubMesh * SMESH_subMesh::GetSubMeshDS() const
158 {
159   return ((SMESH_subMesh*) this )->GetSubMeshDS();
160 }
161
162 //=============================================================================
163 /*!
164  *
165  */
166 //=============================================================================
167
168 SMESHDS_SubMesh* SMESH_subMesh::CreateSubMeshDS()
169 {
170   if ( !GetSubMeshDS() ) {
171     SMESHDS_Mesh* meshDS = _father->GetMeshDS();
172     meshDS->NewSubMesh( meshDS->ShapeToIndex( _subShape ) );
173   }
174   return GetSubMeshDS();
175 }
176
177 //=============================================================================
178 /*!
179  *
180  */
181 //=============================================================================
182
183 SMESH_subMesh *SMESH_subMesh::GetFirstToCompute()
184 {
185   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(true,false);
186   while ( smIt->more() ) {
187     SMESH_subMesh *sm = smIt->next();
188     if ( sm->GetComputeState() == READY_TO_COMPUTE )
189       return sm;
190   }
191   return 0;                     // nothing to compute
192 }
193
194 //================================================================================
195 /*!
196  * \brief Returns a current algorithm
197  */
198 //================================================================================
199
200 SMESH_Algo* SMESH_subMesh::GetAlgo() const
201 {
202   if ( !_algo )
203   {
204     SMESH_subMesh* me = const_cast< SMESH_subMesh* >( this );
205     me->_algo = _father->GetGen()->GetAlgo( me, & me->_algoShape );
206   }
207   return _algo;
208 }
209
210 //================================================================================
211 /*!
212  * \brief Allow algo->Compute() if a sub-shape of lower dim is meshed but
213  *        none mesh entity is bound to it (PAL13615, 2nd part)
214  */
215 //================================================================================
216
217 void SMESH_subMesh::SetIsAlwaysComputed(bool isAlCo)
218 {
219   _alwaysComputed = isAlCo;
220   if ( _alwaysComputed )
221     _computeState = COMPUTE_OK;
222   else
223     ComputeStateEngine( CHECK_COMPUTE_STATE );
224 }
225
226 //=======================================================================
227 /*!
228  * \brief Return true if no mesh entities is bound to the submesh
229  */
230 //=======================================================================
231
232 bool SMESH_subMesh::IsEmpty() const
233 {
234   if (SMESHDS_SubMesh * subMeshDS = ((SMESH_subMesh*)this)->GetSubMeshDS())
235     return (!subMeshDS->NbElements() && !subMeshDS->NbNodes());
236   return true;
237 }
238
239 //=======================================================================
240 //function : IsMeshComputed
241 //purpose  : check if _subMeshDS contains mesh elements
242 //=======================================================================
243
244 bool SMESH_subMesh::IsMeshComputed() const
245 {
246   if ( _alwaysComputed )
247     return true;
248   // algo may bind a sub-mesh not to _subShape, eg 3D algo
249   // sets nodes on SHELL while _subShape may be SOLID
250
251   SMESHDS_Mesh* meshDS = _father->GetMeshDS();
252   int dim = SMESH_Gen::GetShapeDim( _subShape );
253   int type = _subShape.ShapeType();
254   for ( ; type <= TopAbs_VERTEX; type++) {
255     if ( dim == SMESH_Gen::GetShapeDim( (TopAbs_ShapeEnum) type ))
256     {
257       TopExp_Explorer exp( _subShape, (TopAbs_ShapeEnum) type );
258       for ( ; exp.More(); exp.Next() )
259       {
260         if ( SMESHDS_SubMesh * smDS = meshDS->MeshElements( exp.Current() ) )
261         {
262           bool computed = (dim > 0) ? smDS->NbElements() : smDS->NbNodes();
263           if ( computed )
264             return true;
265         }
266       }
267     }
268     else
269       break;
270   }
271
272   return false;
273 }
274
275 //================================================================================
276 /*!
277  * \brief Check if any upper level sub-shape is not computed.
278  *        Used to update a sub-mesh icon
279  */
280 //================================================================================
281
282 bool SMESH_subMesh::IsComputedPartially() const
283 {
284   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(/*includeSelf=*/true,
285                                                        /*SolidFirst=*/true);
286   bool allComputed = true;
287   TopAbs_ShapeEnum readyType = TopAbs_VERTEX; // max value
288   while ( smIt->more() && allComputed )
289   {
290     SMESH_subMesh* sm = smIt->next();
291
292     if ( sm->GetSubShape().ShapeType() > readyType )
293       break; // lower dimension -> stop
294     if ( sm->GetComputeState() != SMESH_subMesh::NOT_READY )
295       readyType = sm->GetSubShape().ShapeType();
296
297     switch ( sm->GetComputeState() )
298     {
299     case SMESH_subMesh::READY_TO_COMPUTE:
300     case SMESH_subMesh::FAILED_TO_COMPUTE:
301       allComputed = false;// sm->IsMeshComputed();
302       break;
303     case SMESH_subMesh::NOT_READY:
304     case SMESH_subMesh::COMPUTE_OK:
305       continue;
306     }
307   }
308   return !allComputed;
309 }
310
311 //=============================================================================
312 /*!
313  * Return true if all sub-meshes have been meshed
314  */
315 //=============================================================================
316
317 bool SMESH_subMesh::SubMeshesComputed(bool * isFailedToCompute/*=0*/) const
318 {
319   int myDim = SMESH_Gen::GetShapeDim( _subShape );
320   int dimToCheck = myDim - 1;
321   bool subMeshesComputed = true;
322   if ( isFailedToCompute ) *isFailedToCompute = false;
323   // check sub-meshes with upper dimension => reverse iteration
324   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,true);
325   while ( smIt->more() )
326   {
327     SMESH_subMesh *sm = smIt->next();
328     if ( sm->_alwaysComputed )
329       continue;
330     const TopoDS_Shape & ss = sm->GetSubShape();
331
332     // MSV 07.04.2006: restrict checking to myDim-1 only. Ex., there is no sense
333     // in checking of existence of edges if the algo needs only faces. Moreover,
334     // degenerated edges may have no sub-mesh, as after computing NETGEN_2D.
335     if ( !_algo || _algo->NeedDiscreteBoundary() ) {
336       int dim = SMESH_Gen::GetShapeDim( ss );
337       if (dim < dimToCheck)
338         break; // the rest sub-meshes are all of less dimension
339     }
340     SMESHDS_SubMesh * ds = sm->GetSubMeshDS();
341     bool computeOk = ((sm->GetComputeState() == COMPUTE_OK ) ||
342                       (ds && ( dimToCheck ? ds->NbElements() : ds->NbNodes() )));
343     if (!computeOk)
344     {
345       subMeshesComputed = false;
346
347       if ( isFailedToCompute && !(*isFailedToCompute) )
348         *isFailedToCompute = ( sm->GetComputeState() == FAILED_TO_COMPUTE );
349
350       if ( !isFailedToCompute )
351         break;
352     }
353   }
354   return subMeshesComputed;
355 }
356
357 //================================================================================
358 /*!
359  * \brief Return cost of computing this sub-mesh. If hypotheses are not well defined,
360  *        zero is returned
361  *  \return int - the computation cost in abstract units.
362  */
363 //================================================================================
364
365 int SMESH_subMesh::GetComputeCost() const
366 {
367   return _realComputeCost;
368 }
369
370 //================================================================================
371 /*!
372  * \brief Return cost of computing this sub-mesh. The cost depends on the shape type
373  *        and number of sub-meshes this one DependsOn().
374  *  \return int - the computation cost in abstract units.
375  */
376 //================================================================================
377
378 int SMESH_subMesh::computeCost() const
379 {
380   if ( !_computeCost )
381   {
382     int computeCost;
383     switch ( _subShape.ShapeType() ) {
384     case TopAbs_SOLID:
385     case TopAbs_SHELL: computeCost = 5000; break;
386     case TopAbs_FACE:  computeCost = 500; break;
387     case TopAbs_EDGE:  computeCost = 2; break;
388     default:           computeCost = 1;
389     }
390     SMESH_subMeshIteratorPtr childIt = getDependsOnIterator(/*includeSelf=*/false);
391     while ( childIt->more() )
392       computeCost += childIt->next()->computeCost();
393
394     ((SMESH_subMesh*)this)->_computeCost = computeCost;
395   }
396   return _computeCost;
397 }
398
399 //=============================================================================
400 /*!
401  * Returns all sub-meshes this one depend on
402  */
403 //=============================================================================
404
405 const std::map < int, SMESH_subMesh * >& SMESH_subMesh::DependsOn()
406 {
407   if ( _dependenceAnalysed || !_father->HasShapeToMesh() )
408     return _mapDepend;
409
410   int type = _subShape.ShapeType();
411   switch (type)
412   {
413   case TopAbs_COMPOUND:
414   {
415     list< TopoDS_Shape > compounds( 1, _subShape );
416     list< TopoDS_Shape >::iterator comp = compounds.begin();
417     for ( ; comp != compounds.end(); ++comp )
418     {
419       for ( TopoDS_Iterator sub( *comp ); sub.More(); sub.Next() )
420         switch ( sub.Value().ShapeType() )
421         {
422         case TopAbs_COMPOUND:  compounds.push_back( sub.Value() ); break;
423         case TopAbs_COMPSOLID: insertDependence( sub.Value(), TopAbs_SOLID ); break;
424         case TopAbs_SOLID:     insertDependence( sub.Value(), TopAbs_SOLID ); break;
425         case TopAbs_SHELL:     insertDependence( sub.Value(), TopAbs_FACE ); break;
426         case TopAbs_FACE:      insertDependence( sub.Value(), TopAbs_FACE ); break;
427         case TopAbs_WIRE:      insertDependence( sub.Value(), TopAbs_EDGE ); break;
428         case TopAbs_EDGE:      insertDependence( sub.Value(), TopAbs_EDGE ); break;
429         case TopAbs_VERTEX:    insertDependence( sub.Value(), TopAbs_VERTEX ); break;
430         default:;
431         }
432     }
433   }
434   break;
435   case TopAbs_COMPSOLID: insertDependence( _subShape, TopAbs_SOLID ); break;
436   case TopAbs_SOLID:     insertDependence( _subShape, TopAbs_FACE );
437   { /*internal EDGE*/    insertDependence( _subShape, TopAbs_EDGE, TopAbs_WIRE ); break; }
438   case TopAbs_SHELL:     insertDependence( _subShape, TopAbs_FACE ); break;
439   case TopAbs_FACE:      insertDependence( _subShape, TopAbs_EDGE ); break;
440   case TopAbs_WIRE:      insertDependence( _subShape, TopAbs_EDGE ); break;
441   case TopAbs_EDGE:      insertDependence( _subShape, TopAbs_VERTEX ); break;
442   default:;
443   }
444   _dependenceAnalysed = true;
445   return _mapDepend;
446 }
447
448 //================================================================================
449 /*!
450  * \brief Return a key for SMESH_subMesh::_mapDepend map
451  */
452 //================================================================================
453
454 namespace
455 {
456   int dependsOnMapKey( TopAbs_ShapeEnum type, int shapeID )
457   {
458     int ordType = 9 - int(type);               // 2 = Vertex, 8 = CompSolid
459     int     cle = shapeID;
460     cle += 10000000 * ordType;    // sort map by ordType then index
461     return cle;
462   }
463   int dependsOnMapKey( const SMESH_subMesh* sm )
464   {
465     return dependsOnMapKey( sm->GetSubShape().ShapeType(), sm->GetId() );
466   }
467 }
468
469 //=============================================================================
470 /*!
471  * Add sub-meshes on sub-shapes of a given type into the dependence map.
472  */
473 //=============================================================================
474
475 void SMESH_subMesh::insertDependence(const TopoDS_Shape aShape,
476                                      TopAbs_ShapeEnum   aSubType,
477                                      TopAbs_ShapeEnum   avoidType)
478 {
479   TopExp_Explorer sub( aShape, aSubType, avoidType );
480   for ( ; sub.More(); sub.Next() )
481   {
482     SMESH_subMesh *aSubMesh = _father->GetSubMesh( sub.Current() );
483     if ( aSubMesh->GetId() == 0 )
484       continue;  // not a sub-shape of the shape to mesh
485     int cle = dependsOnMapKey( aSubMesh );
486     if ( _mapDepend.find( cle ) == _mapDepend.end())
487     {
488       _mapDepend[cle] = aSubMesh;
489       const map < int, SMESH_subMesh * > & subMap = aSubMesh->DependsOn();
490       _mapDepend.insert( subMap.begin(), subMap.end() );
491     }
492   }
493 }
494
495 //================================================================================
496 /*!
497  * \brief Return \c true if \a this sub-mesh depends on \a other
498  */
499 //================================================================================
500
501 bool SMESH_subMesh::DependsOn( const SMESH_subMesh* other ) const
502 {
503   return other ? _mapDepend.count( dependsOnMapKey( other )) : false;
504 }
505
506 //================================================================================
507 /*!
508  * \brief Return \c true if \a this sub-mesh depends on a \a shape
509  */
510 //================================================================================
511
512 bool SMESH_subMesh::DependsOn( const int shapeID ) const
513 {
514   return DependsOn( _father->GetSubMeshContaining( shapeID ));
515 }
516
517 //=============================================================================
518 /*!
519  * Return a shape of \a this sub-mesh
520  */
521 //=============================================================================
522
523 const TopoDS_Shape & SMESH_subMesh::GetSubShape() const
524 {
525   return _subShape;
526 }
527
528 //=======================================================================
529 //function : CanAddHypothesis
530 //purpose  : return true if theHypothesis can be attached to me:
531 //           its dimension is checked
532 //=======================================================================
533
534 bool SMESH_subMesh::CanAddHypothesis(const SMESH_Hypothesis* theHypothesis) const
535 {
536   int aHypDim   = theHypothesis->GetDim();
537   int aShapeDim = SMESH_Gen::GetShapeDim(_subShape);
538   // issue 21106. Forbid 3D mesh on the SHELL
539   // if (aHypDim == 3 && aShapeDim == 3) {
540   //   // check case of open shell
541   //   //if (_subShape.ShapeType() == TopAbs_SHELL && !_subShape.Closed())
542   //   if (_subShape.ShapeType() == TopAbs_SHELL && !BRep_Tool::IsClosed(_subShape))
543   //     return false;
544   // }
545   if ( aHypDim <= aShapeDim )
546     return true;
547
548   return false;
549 }
550
551 //=======================================================================
552 //function : IsApplicableHypothesis
553 //purpose  : check if this sub-mesh can be computed using a hypothesis
554 //=======================================================================
555
556 bool SMESH_subMesh::IsApplicableHypothesis(const SMESH_Hypothesis* theHypothesis) const
557 {
558   if ( !_father->HasShapeToMesh() && _subShape.ShapeType() == TopAbs_SOLID )
559     return true; // true for the PseudoShape
560
561   return IsApplicableHypothesis( theHypothesis, _subShape.ShapeType() );
562 }
563
564 //=======================================================================
565 //function : IsApplicableHypothesis
566 //purpose  : compare shape type and hypothesis type
567 //=======================================================================
568
569 bool SMESH_subMesh::IsApplicableHypothesis(const SMESH_Hypothesis* theHypothesis,
570                                            const TopAbs_ShapeEnum  theShapeType)
571 {
572   if ( theHypothesis->GetType() > SMESHDS_Hypothesis::PARAM_ALGO)
573   {
574     // algorithm
575     if ( theHypothesis->GetShapeType() & (1<< theShapeType))
576       // issue 21106. Forbid 3D mesh on the SHELL
577       return !( theHypothesis->GetDim() == 3 && theShapeType == TopAbs_SHELL );
578     else
579       return false;
580   }
581
582   // hypothesis
583   switch ( theShapeType ) {
584   case TopAbs_VERTEX:
585   case TopAbs_EDGE:
586   case TopAbs_FACE:
587   case TopAbs_SOLID:
588     return SMESH_Gen::GetShapeDim( theShapeType ) == theHypothesis->GetDim();
589
590   case TopAbs_SHELL:
591     // Special case for algorithms, building 2D mesh on a whole shell.
592     // Before this fix there was a problem after restoring from study,
593     // because in that case algorithm is assigned before hypothesis
594     // (on shell in problem case) and hypothesis is checked on faces
595     // (because it is 2D), where we have NO_ALGO state.
596     // Now 2D hypothesis is also applicable to shells.
597     return (theHypothesis->GetDim() == 2 || theHypothesis->GetDim() == 3);
598
599 //   case TopAbs_WIRE:
600 //   case TopAbs_COMPSOLID:
601 //   case TopAbs_COMPOUND:
602   default:;
603   }
604   return false;
605 }
606
607 //================================================================================
608 /*!
609  * \brief Treats modification of hypotheses definition
610  *  \param [in] event - what happens
611  *  \param [in] anHyp - a hypothesis
612  *  \return SMESH_Hypothesis::Hypothesis_Status - a treatment result.
613  *
614  * Optional description of a problematic situation (if any) can be retrieved
615  * via GetComputeError().
616  */
617 //================================================================================
618
619 SMESH_Hypothesis::Hypothesis_Status
620   SMESH_subMesh::AlgoStateEngine(algo_event event, SMESH_Hypothesis * anHyp)
621 {
622   // **** les retour des evenement shape sont significatifs
623   // (add ou remove fait ou non)
624   // le retour des evenement father n'indiquent pas que add ou remove fait
625
626   SMESH_Hypothesis::Hypothesis_Status aux_ret, ret = SMESH_Hypothesis::HYP_OK;
627   if ( _Id == 0 ) return ret; // not a sub-shape of the shape to mesh
628
629   SMESHDS_Mesh* meshDS =_father->GetMeshDS();
630   SMESH_Algo*   algo   = 0;
631   _algo = 0;
632
633   if (_subShape.ShapeType() == TopAbs_VERTEX )
634   {
635     if ( anHyp->GetDim() != 0) {
636       if (event == ADD_HYP || event == ADD_ALGO)
637         return SMESH_Hypothesis::HYP_BAD_DIM;
638       else
639         return SMESH_Hypothesis::HYP_OK;
640     }
641     // 0D hypothesis
642     else if ( _algoState == HYP_OK ) {
643       // update default _algoState
644       if ( event != REMOVE_FATHER_ALGO )
645       {
646         _algoState = NO_ALGO;
647         algo = GetAlgo();
648         if ( algo ) {
649           _algoState = MISSING_HYP;
650           if ( event == REMOVE_FATHER_HYP ||
651                algo->CheckHypothesis(*_father,_subShape, aux_ret))
652             _algoState = HYP_OK;
653         }
654       }
655     }
656   }
657
658   int oldAlgoState = _algoState;
659   bool modifiedHyp = (event == MODIF_HYP);  // if set to true, force event MODIF_ALGO_STATE
660   SMESH_Algo* algoRequiringCleaning = 0;
661
662   bool isApplicableHyp = IsApplicableHypothesis( anHyp );
663
664   if (event == ADD_ALGO || event == ADD_FATHER_ALGO)
665   {
666     // -------------------------------------------
667     // check if a shape needed by algo is present
668     // -------------------------------------------
669     algo = static_cast< SMESH_Algo* >( anHyp );
670     if ( !_father->HasShapeToMesh() && algo->NeedShape() )
671       return SMESH_Hypothesis::HYP_NEED_SHAPE;
672     // ----------------------
673     // check mesh conformity
674     // ----------------------
675     if (isApplicableHyp && !_father->IsNotConformAllowed() && !IsConform( algo ))
676       return SMESH_Hypothesis::HYP_NOTCONFORM;
677
678     // check if all-dimensional algo is hidden by other local one
679     if ( event == ADD_ALGO ) {
680       SMESH_HypoFilter filter( SMESH_HypoFilter::HasType( algo->GetType() ));
681       filter.Or( SMESH_HypoFilter::HasType( algo->GetType()+1 ));
682       filter.Or( SMESH_HypoFilter::HasType( algo->GetType()+2 ));
683       if ( SMESH_Algo * curAlgo = (SMESH_Algo*)_father->GetHypothesis( this, filter, true ))
684         if ( !curAlgo->NeedDiscreteBoundary() && curAlgo != anHyp )
685           algoRequiringCleaning = curAlgo;
686     }
687   }
688
689   // ----------------------------------
690   // add a hypothesis to DS if possible
691   // ----------------------------------
692   if (event == ADD_HYP || event == ADD_ALGO)
693   {
694     if ( ! CanAddHypothesis( anHyp )) // check dimension
695       return SMESH_Hypothesis::HYP_BAD_DIM;
696
697     if ( !anHyp->IsAuxiliary() && getSimilarAttached( _subShape, anHyp ) )
698       return SMESH_Hypothesis::HYP_ALREADY_EXIST;
699
700     if ( !meshDS->AddHypothesis(_subShape, anHyp))
701       return SMESH_Hypothesis::HYP_ALREADY_EXIST;
702   }
703
704   // --------------------------
705   // remove a hypothesis from DS
706   // --------------------------
707   if (event == REMOVE_HYP || event == REMOVE_ALGO)
708   {
709     if (!meshDS->RemoveHypothesis(_subShape, anHyp))
710       return SMESH_Hypothesis::HYP_OK; // nothing changes
711
712     if (event == REMOVE_ALGO)
713     {
714       algo = dynamic_cast<SMESH_Algo*> (anHyp);
715       if (!algo->NeedDiscreteBoundary())
716         algoRequiringCleaning = algo;
717     }
718   }
719
720   // ------------------
721   // analyse algo state
722   // ------------------
723   if (!isApplicableHyp)
724     return ret; // not applicable hypotheses do not change algo state
725
726   if (( algo = GetAlgo()))
727     algo->InitComputeError();
728
729   switch (_algoState)
730   {
731
732     // ----------------------------------------------------------------------
733
734   case NO_ALGO:
735     switch (event) {
736     case ADD_HYP:
737       break;
738     case ADD_ALGO: {
739       algo = GetAlgo();
740       ASSERT(algo);
741       if (algo->CheckHypothesis((*_father),_subShape, aux_ret))
742         setAlgoState(HYP_OK);
743       else if ( algo->IsStatusFatal( aux_ret )) {
744         meshDS->RemoveHypothesis(_subShape, anHyp);
745         ret = aux_ret;
746       }
747       else
748         setAlgoState(MISSING_HYP);
749       break;
750     }
751     case REMOVE_HYP:
752     case REMOVE_ALGO:
753     case ADD_FATHER_HYP:
754       break;
755     case ADD_FATHER_ALGO: {    // Algo just added in father
756       algo = GetAlgo();
757       ASSERT(algo);
758       if ( algo == anHyp ) {
759         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret))
760           setAlgoState(HYP_OK);
761         else
762           setAlgoState(MISSING_HYP);
763       }
764       break;
765     }
766     case REMOVE_FATHER_HYP:
767       break;
768     case REMOVE_FATHER_ALGO: {
769       algo = GetAlgo();
770       if (algo)
771       {
772         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
773             setAlgoState(HYP_OK);
774         else
775           setAlgoState(MISSING_HYP);
776       }
777       break;
778     }
779     case MODIF_HYP: break;
780     default:
781       ASSERT(0);
782       break;
783     }
784     break;
785
786     // ----------------------------------------------------------------------
787
788   case MISSING_HYP:
789     switch (event)
790     {
791     case ADD_HYP: {
792       algo = GetAlgo();
793       ASSERT(algo);
794       if ( algo->CheckHypothesis((*_father),_subShape, ret ))
795         setAlgoState(HYP_OK);
796       if (SMESH_Hypothesis::IsStatusFatal( ret ))
797         meshDS->RemoveHypothesis(_subShape, anHyp);
798       else if (!_father->IsUsedHypothesis( anHyp, this ))
799       {
800         meshDS->RemoveHypothesis(_subShape, anHyp);
801         ret = SMESH_Hypothesis::HYP_INCOMPATIBLE;
802       }
803       break;
804     }
805     case ADD_ALGO: {           //already existing algo : on father ?
806       algo = GetAlgo();
807       ASSERT(algo);
808       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))// ignore hyp status
809         setAlgoState(HYP_OK);
810       else if ( algo->IsStatusFatal( aux_ret )) {
811         meshDS->RemoveHypothesis(_subShape, anHyp);
812         ret = aux_ret;
813       }
814       else
815         setAlgoState(MISSING_HYP);
816       break;
817     }
818     case REMOVE_HYP:
819       break;
820     case REMOVE_ALGO: {        // perhaps a father algo applies ?
821       algo = GetAlgo();
822       if (algo == NULL)  // no more algo applying on sub-shape...
823       {
824         setAlgoState(NO_ALGO);
825       }
826       else
827       {
828         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
829           setAlgoState(HYP_OK);
830         else
831           setAlgoState(MISSING_HYP);
832       }
833       break;
834     }
835     case MODIF_HYP: // assigned hypothesis value may become good
836     case ADD_FATHER_HYP: {
837       algo = GetAlgo();
838       ASSERT(algo);
839       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
840         setAlgoState(HYP_OK);
841       else
842         setAlgoState(MISSING_HYP);
843       break;
844     }
845     case ADD_FATHER_ALGO: { // new father algo
846       algo = GetAlgo();
847       ASSERT( algo );
848       if ( algo == anHyp ) {
849         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
850           setAlgoState(HYP_OK);
851         else
852           setAlgoState(MISSING_HYP);
853       }
854       break;
855     }
856     case REMOVE_FATHER_HYP:    // nothing to do
857       break;
858     case REMOVE_FATHER_ALGO: {
859       algo = GetAlgo();
860       if (algo == NULL)  // no more applying algo on father
861       {
862         setAlgoState(NO_ALGO);
863       }
864       else
865       {
866         if ( algo->CheckHypothesis((*_father),_subShape , aux_ret ))
867           setAlgoState(HYP_OK);
868         else
869           setAlgoState(MISSING_HYP);
870       }
871       break;
872     }
873     default:
874       ASSERT(0);
875       break;
876     }
877     break;
878
879     // ----------------------------------------------------------------------
880
881   case HYP_OK:
882     switch (event)
883     {
884     case ADD_HYP: {
885       algo = GetAlgo();
886       ASSERT(algo);
887       if (!algo->CheckHypothesis((*_father),_subShape, ret ))
888       {
889         if ( !SMESH_Hypothesis::IsStatusFatal( ret ))
890           // ret should be fatal: anHyp was not added
891           ret = SMESH_Hypothesis::HYP_INCOMPATIBLE;
892       }
893       else if (!_father->IsUsedHypothesis( anHyp, this ))
894         ret = SMESH_Hypothesis::HYP_INCOMPATIBLE;
895
896       if (SMESH_Hypothesis::IsStatusFatal( ret ))
897       {
898         MESSAGE("do not add extra hypothesis");
899         meshDS->RemoveHypothesis(_subShape, anHyp);
900       }
901       else
902       {
903         modifiedHyp = true;
904       }
905       break;
906     }
907     case ADD_ALGO: {           //already existing algo : on father ?
908       algo = GetAlgo();
909       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
910         // check if algo changes
911         SMESH_HypoFilter f;
912         f.Init(   SMESH_HypoFilter::IsAlgo() );
913         f.And(    SMESH_HypoFilter::IsApplicableTo( _subShape ));
914         f.AndNot( SMESH_HypoFilter::Is( algo ));
915         const SMESH_Hypothesis * prevAlgo = _father->GetHypothesis( this, f, true );
916         if (prevAlgo &&
917             string( algo->GetName()) != prevAlgo->GetName())
918         {
919           oldAlgoState = NO_ALGO; // force setting event listener (#16648)
920           modifiedHyp  = true;
921         }
922       }
923       else
924         setAlgoState(MISSING_HYP);
925       break;
926     }
927     case REMOVE_HYP: {
928       algo = GetAlgo();
929       ASSERT(algo);
930       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
931         setAlgoState(HYP_OK);
932       else
933         setAlgoState(MISSING_HYP);
934       modifiedHyp = true;
935       break;
936     }
937     case REMOVE_ALGO: {         // perhaps a father algo applies ?
938       algo = GetAlgo();
939       if (algo == NULL)   // no more algo applying on sub-shape...
940       {
941         setAlgoState(NO_ALGO);
942       }
943       else
944       {
945         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
946           // check if algo remains
947           if ( anHyp != algo && strcmp( anHyp->GetName(), algo->GetName()) )
948             modifiedHyp = true;
949         }
950         else
951           setAlgoState(MISSING_HYP);
952       }
953       break;
954     }
955     case MODIF_HYP: // hypothesis value may become bad
956     case ADD_FATHER_HYP: {  // new father hypothesis ?
957       algo = GetAlgo();
958       ASSERT(algo);
959       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
960       {
961         if (_father->IsUsedHypothesis( anHyp, this )) // new Hyp
962           modifiedHyp = true;
963       }
964       else
965         setAlgoState(MISSING_HYP);
966       break;
967     }
968     case ADD_FATHER_ALGO: {
969       algo = GetAlgo();
970       if ( algo == anHyp ) { // a new algo on father
971         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
972           // check if algo changes
973           SMESH_HypoFilter f;
974           f.Init(   SMESH_HypoFilter::IsAlgo() );
975           f.And(    SMESH_HypoFilter::IsApplicableTo( _subShape ));
976           f.AndNot( SMESH_HypoFilter::Is( algo ));
977           const SMESH_Hypothesis* prevAlgo = _father->GetHypothesis( this, f, true );
978           if (prevAlgo &&
979               string(algo->GetName()) != string(prevAlgo->GetName()) )
980             modifiedHyp = true;
981         }
982         else
983           setAlgoState(MISSING_HYP);
984       }
985       break;
986     }
987     case REMOVE_FATHER_HYP: {
988       algo = GetAlgo();
989       ASSERT(algo);
990       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
991         // is there the same local hyp or maybe a new father algo applied?
992         if ( !getSimilarAttached( _subShape, anHyp ) )
993           modifiedHyp = true;
994       }
995       else
996         setAlgoState(MISSING_HYP);
997       break;
998     }
999     case REMOVE_FATHER_ALGO: {
1000       // IPAL21346. Edges not removed when Netgen 1d-2d is removed from a SOLID.
1001       // CLEAN was not called at event REMOVE_ALGO because the algo is not applicable to SOLID.
1002       algo = dynamic_cast<SMESH_Algo*> (anHyp);
1003       if (!algo->NeedDiscreteBoundary())
1004         algoRequiringCleaning = algo;
1005       algo = GetAlgo();
1006       if (algo == NULL)  // no more applying algo on father
1007       {
1008         setAlgoState(NO_ALGO);
1009       }
1010       else
1011       {
1012         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
1013           // check if algo changes
1014           if ( string(algo->GetName()) != string( anHyp->GetName()) )
1015             modifiedHyp = true;
1016         }
1017         else
1018           setAlgoState(MISSING_HYP);
1019       }
1020       break;
1021     }
1022     default:
1023       ASSERT(0);
1024       break;
1025     }
1026     break;
1027
1028     // ----------------------------------------------------------------------
1029
1030   default:
1031     ASSERT(0);
1032     break;
1033   }
1034
1035   // detect algorithm hiding
1036   //
1037   if ( ret == SMESH_Hypothesis::HYP_OK &&
1038        ( event == ADD_ALGO || event == ADD_FATHER_ALGO ) && algo &&
1039        algo->GetName() == anHyp->GetName() )
1040   {
1041     // is algo hidden?
1042     SMESH_Gen* gen = _father->GetGen();
1043     const std::vector< SMESH_subMesh * > & ancestors = GetAncestors();
1044     for ( size_t iA = 0; ( ret == SMESH_Hypothesis::HYP_OK && iA < ancestors.size()); ++iA ) {
1045       if ( SMESH_Algo* upperAlgo = ancestors[ iA ]->GetAlgo() )
1046         if ( !upperAlgo->NeedDiscreteBoundary() && !upperAlgo->SupportSubmeshes())
1047           ret = SMESH_Hypothesis::HYP_HIDDEN_ALGO;
1048     }
1049     // is algo hiding?
1050     if ( ret == SMESH_Hypothesis::HYP_OK &&
1051          !algo->NeedDiscreteBoundary()    &&
1052          !algo->SupportSubmeshes())
1053     {
1054       TopoDS_Shape algoAssignedTo, otherAssignedTo;
1055       gen->GetAlgo( this, &algoAssignedTo );
1056       map<int, SMESH_subMesh*>::reverse_iterator i_sm = _mapDepend.rbegin();
1057       for ( ; ( ret == SMESH_Hypothesis::HYP_OK && i_sm != _mapDepend.rend()) ; ++i_sm )
1058         if ( gen->GetAlgo( i_sm->second, &otherAssignedTo ) &&
1059              SMESH_MesherHelper::IsSubShape( /*sub=*/otherAssignedTo, /*main=*/algoAssignedTo ))
1060           ret = SMESH_Hypothesis::HYP_HIDING_ALGO;
1061     }
1062   }
1063
1064   if ( _algo ) { // get an error description set by _algo->CheckHypothesis()
1065     _computeError = _algo->GetComputeError();
1066     _algo->InitComputeError();
1067   }
1068
1069   bool stateChange = ( _algoState != oldAlgoState );
1070
1071   if ( stateChange && _algoState == HYP_OK ) // hyp becomes OK
1072     algo->SetEventListener( this );
1073
1074   if ( event == REMOVE_ALGO || event == REMOVE_FATHER_ALGO )
1075     _algo = 0;
1076
1077   notifyListenersOnEvent( event, ALGO_EVENT, anHyp );
1078
1079   if ( stateChange && oldAlgoState == HYP_OK ) { // hyp becomes KO
1080     deleteOwnListeners();
1081     SetIsAlwaysComputed( false );
1082     if (_subShape.ShapeType() == TopAbs_VERTEX ) {
1083       // restore default states
1084       _algoState = HYP_OK;
1085       _computeState = READY_TO_COMPUTE;
1086     }
1087   }
1088
1089   if ( algoRequiringCleaning ) {
1090     // added or removed algo is all-dimensional
1091     ComputeStateEngine( CLEAN );
1092     cleanDependsOn( algoRequiringCleaning );
1093     ComputeSubMeshStateEngine( CHECK_COMPUTE_STATE );
1094   }
1095
1096   if ( stateChange || modifiedHyp )
1097     ComputeStateEngine( MODIF_ALGO_STATE );
1098
1099   _realComputeCost = ( _algoState == HYP_OK ) ? computeCost() : 0;
1100
1101   return ret;
1102 }
1103
1104 //=======================================================================
1105 //function : IsConform
1106 //purpose  : check if a conform mesh will be produced by the Algo
1107 //=======================================================================
1108
1109 bool SMESH_subMesh::IsConform(const SMESH_Algo* theAlgo)
1110 {
1111 //  MESSAGE( "SMESH_subMesh::IsConform" );
1112   if ( !theAlgo ) return false;
1113
1114   // Suppose that theAlgo is applicable to _subShape, do not check it here
1115   //if ( !IsApplicableHypothesis( theAlgo )) return false;
1116
1117   // check only algo that doesn't NeedDiscreteBoundary(): because mesh made
1118   // on a sub-shape will be ignored by theAlgo
1119   if ( theAlgo->NeedDiscreteBoundary() ||
1120        !theAlgo->OnlyUnaryInput() ) // all adjacent shapes will be meshed by this algo?
1121     return true;
1122
1123   // only local algo is to be checked
1124   //if ( gen->IsGlobalHypothesis( theAlgo, *_father ))
1125   if ( _subShape.ShapeType() == _father->GetMeshDS()->ShapeToMesh().ShapeType() )
1126     return true;
1127
1128   // check algo attached to adjacent shapes
1129
1130   // loop on one level down sub-meshes
1131   TopoDS_Iterator itsub( _subShape );
1132   for (; itsub.More(); itsub.Next())
1133   {
1134     // loop on adjacent subShapes
1135     const std::vector< SMESH_subMesh * > & ancestors = GetAncestors();
1136     for ( size_t iA = 0; iA < ancestors.size(); ++iA )
1137     {
1138       const TopoDS_Shape& adjacent = ancestors[ iA ]->GetSubShape();
1139       if ( _subShape.IsSame( adjacent )) continue;
1140       if ( adjacent.ShapeType() != _subShape.ShapeType())
1141         break;
1142
1143       // check algo attached to smAdjacent
1144       SMESH_Algo * algo = ancestors[ iA ]->GetAlgo();
1145       if (algo &&
1146           !algo->NeedDiscreteBoundary() &&
1147           algo->OnlyUnaryInput())
1148         return false; // NOT CONFORM MESH WILL BE PRODUCED
1149     }
1150   }
1151
1152   return true;
1153 }
1154
1155 //=============================================================================
1156 /*!
1157  *
1158  */
1159 //=============================================================================
1160
1161 void SMESH_subMesh::setAlgoState(algo_state state)
1162 {
1163   _algoState = state;
1164 }
1165
1166 //================================================================================
1167 /*!
1168  * \brief Send an event to sub-meshes
1169  *  \param [in] event - the event
1170  *  \param [in] anHyp - an hypothesis
1171  *  \param [in] exitOnFatal - to stop iteration on sub-meshes if a sub-mesh
1172  *              reports a fatal result
1173  *  \return SMESH_Hypothesis::Hypothesis_Status - the worst result
1174  *
1175  * Optional description of a problematic situation (if any) can be retrieved
1176  * via GetComputeError().
1177  */
1178 //================================================================================
1179
1180 SMESH_Hypothesis::Hypothesis_Status
1181   SMESH_subMesh::SubMeshesAlgoStateEngine(algo_event         event,
1182                                           SMESH_Hypothesis * anHyp,
1183                                           bool               exitOnFatal)
1184 {
1185   SMESH_Hypothesis::Hypothesis_Status ret = SMESH_Hypothesis::HYP_OK;
1186   //EAP: a wire (dim==1) should notify edges (dim==1)
1187   //EAP: int dim = SMESH_Gen::GetShapeDim(_subShape);
1188   //if (_subShape.ShapeType() < TopAbs_EDGE ) // wire,face etc
1189   {
1190     SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,false);
1191     while ( smIt->more() ) {
1192       SMESH_subMesh* sm = smIt->next();
1193       SMESH_Hypothesis::Hypothesis_Status ret2 = sm->AlgoStateEngine(event, anHyp);
1194       if ( ret2 > ret )
1195       {
1196         ret = ret2;
1197         _computeError = sm->_computeError;
1198         sm->_computeError.reset();
1199         if ( exitOnFatal && SMESH_Hypothesis::IsStatusFatal( ret ))
1200           break;
1201       }
1202     }
1203   }
1204   return ret;
1205 }
1206
1207 //================================================================================
1208 /*!
1209  * \brief Remove elements from sub-meshes.
1210  *  \param algoRequiringCleaning - an all-dimensional algorithm whose presence
1211  *         causes the cleaning.
1212  */
1213 //================================================================================
1214
1215 void SMESH_subMesh::cleanDependsOn( SMESH_Algo* algoRequiringCleaning/*=0*/ )
1216 {
1217   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,
1218                                                        /*complexShapeFirst=*/true);
1219   if ( _father->NbNodes() == 0 )
1220   {
1221     while ( smIt->more() )
1222       smIt->next()->ComputeStateEngine(CHECK_COMPUTE_STATE);
1223   }
1224   else if ( !algoRequiringCleaning || !algoRequiringCleaning->SupportSubmeshes() )
1225   {
1226     while ( smIt->more() )
1227       smIt->next()->ComputeStateEngine(CLEAN);
1228   }
1229   else if ( algoRequiringCleaning && algoRequiringCleaning->SupportSubmeshes() )
1230   {
1231     // find sub-meshes to keep elements on
1232     set< SMESH_subMesh* > smToKeep;
1233     TopAbs_ShapeEnum prevShapeType = TopAbs_SHAPE;
1234     bool toKeepPrevShapeType = false;
1235     while ( smIt->more() )
1236     {
1237       SMESH_subMesh* sm = smIt->next();
1238       sm->ComputeStateEngine(CHECK_COMPUTE_STATE);
1239       if ( !sm->IsEmpty() )
1240       {
1241         const bool sameShapeType = ( prevShapeType == sm->GetSubShape().ShapeType() );
1242         bool       keepSubMeshes = ( sameShapeType && toKeepPrevShapeType );
1243         if ( !sameShapeType )
1244         {
1245           // check if the algo allows presence of global algos of dimension the algo
1246           // can generate it-self;
1247           // always keep a node on VERTEX, as this node can be shared by segments
1248           // lying on EDGEs not shared by the VERTEX of sm, due to MergeNodes (PAL23068)
1249           int  shapeDim = SMESH_Gen::GetShapeDim( sm->GetSubShape() );
1250           keepSubMeshes = ( algoRequiringCleaning->NeedLowerHyps( shapeDim ) || shapeDim == 0 );
1251           prevShapeType = sm->GetSubShape().ShapeType();
1252           toKeepPrevShapeType = keepSubMeshes;
1253         }
1254         if ( !keepSubMeshes )
1255         {
1256           // look for a local algo used to mesh sm
1257           TopoDS_Shape algoShape = SMESH_MesherHelper::GetShapeOfHypothesis
1258             ( algoRequiringCleaning, _subShape, _father );
1259           SMESH_HypoFilter moreLocalAlgo;
1260           moreLocalAlgo.Init( SMESH_HypoFilter::IsMoreLocalThan( algoShape, *_father ));
1261           moreLocalAlgo.And ( SMESH_HypoFilter::IsAlgo() );
1262           bool localAlgoFound = _father->GetHypothesis( sm->_subShape, moreLocalAlgo, true );
1263           keepSubMeshes = localAlgoFound;
1264         }
1265         // remember all sub-meshes of sm
1266         if ( keepSubMeshes )
1267         {
1268           SMESH_subMeshIteratorPtr smIt2 = sm->getDependsOnIterator(true);
1269           while ( smIt2->more() )
1270             smToKeep.insert( smIt2->next() );
1271         }
1272       }
1273     }
1274     // remove elements
1275     SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,true);
1276     while ( smIt->more() )
1277     {
1278       SMESH_subMesh* sm = smIt->next();
1279       if ( !smToKeep.count( sm ))
1280         sm->ComputeStateEngine(CLEAN);
1281     }
1282   }
1283 }
1284
1285 //=============================================================================
1286 /*!
1287  *
1288  */
1289 //=============================================================================
1290
1291 void SMESH_subMesh::DumpAlgoState(bool isMain)
1292 {
1293   if (isMain)
1294   {
1295     const map < int, SMESH_subMesh * >&subMeshes = DependsOn();
1296
1297     map < int, SMESH_subMesh * >::const_iterator itsub;
1298     for (itsub = subMeshes.begin(); itsub != subMeshes.end(); itsub++)
1299     {
1300       SMESH_subMesh *sm = (*itsub).second;
1301       sm->DumpAlgoState(false);
1302     }
1303   }
1304   MESSAGE("dim = " << SMESH_Gen::GetShapeDim(_subShape) <<
1305           " type of shape " << _subShape.ShapeType());
1306   switch (_algoState)
1307   {
1308   case NO_ALGO          : MESSAGE(" AlgoState = NO_ALGO"); break;
1309   case MISSING_HYP      : MESSAGE(" AlgoState = MISSING_HYP"); break;
1310   case HYP_OK           : MESSAGE(" AlgoState = HYP_OK");break;
1311   }
1312   switch (_computeState)
1313   {
1314   case NOT_READY        : MESSAGE(" ComputeState = NOT_READY");break;
1315   case READY_TO_COMPUTE : MESSAGE(" ComputeState = READY_TO_COMPUTE");break;
1316   case COMPUTE_OK       : MESSAGE(" ComputeState = COMPUTE_OK");break;
1317   case FAILED_TO_COMPUTE: MESSAGE(" ComputeState = FAILED_TO_COMPUTE");break;
1318   }
1319 }
1320
1321 //================================================================================
1322 /*!
1323  * \brief Remove nodes and elements bound to submesh
1324   * \param subMesh - submesh containing nodes and elements
1325  */
1326 //================================================================================
1327
1328 static void cleanSubMesh( SMESH_subMesh * subMesh )
1329 {
1330   if (subMesh) {
1331     if (SMESHDS_SubMesh * subMeshDS = subMesh->GetSubMeshDS())
1332     {
1333       SMESHDS_Mesh * meshDS = subMesh->GetFather()->GetMeshDS();
1334       smIdType nbElems = subMeshDS->NbElements();
1335       if ( nbElems > 0 )
1336         for ( SMDS_ElemIteratorPtr ite = subMeshDS->GetElements(); ite->more(); )
1337           meshDS->RemoveFreeElement( ite->next(), subMeshDS );
1338
1339       smIdType nbNodes = subMeshDS->NbNodes();
1340       if ( nbNodes > 0 )
1341         for ( SMDS_NodeIteratorPtr itn = subMeshDS->GetNodes(); itn->more() ; )
1342         {
1343           const SMDS_MeshNode * node = itn->next();
1344           if ( node->NbInverseElements() == 0 )
1345             meshDS->RemoveFreeNode( node, subMeshDS );
1346           else // for StdMeshers_CompositeSegment_1D: node in one submesh, edge in another
1347             meshDS->RemoveNode( node );
1348         }
1349       subMeshDS->Clear();
1350     }
1351   }
1352 }
1353
1354 //=============================================================================
1355 /*!
1356  *
1357  */
1358 //=============================================================================
1359
1360 bool SMESH_subMesh::ComputeStateEngine(compute_event event)
1361 {
1362   switch ( event ) {
1363   case MODIF_ALGO_STATE:
1364   case COMPUTE:
1365   case COMPUTE_SUBMESH:
1366     //case COMPUTE_CANCELED:
1367   case CLEAN:
1368     //case SUBMESH_COMPUTED:
1369     //case SUBMESH_RESTORED:
1370     //case SUBMESH_LOADED:
1371     //case MESH_ENTITY_REMOVED:
1372     //case CHECK_COMPUTE_STATE:
1373     _computeError.reset(); break;
1374   default:;
1375   }
1376
1377   if ( event == CLEAN )
1378     _alwaysComputed = false; // Unset 'true' set by MergeNodes() (issue 0022182)
1379
1380   if (_subShape.ShapeType() == TopAbs_VERTEX)
1381   {
1382     _computeState = READY_TO_COMPUTE;
1383     SMESHDS_SubMesh* smDS = GetSubMeshDS();
1384     if ( smDS && smDS->NbNodes() )
1385     {
1386       if ( event == CLEAN ) {
1387         cleanDependants();
1388         cleanSubMesh( this );
1389       }
1390       else
1391         _computeState = COMPUTE_OK;
1392     }
1393     else if (( event == COMPUTE || event == COMPUTE_SUBMESH )
1394              && !_alwaysComputed )
1395     {
1396       SMESH_MeshLocker myLocker(_father);
1397       const TopoDS_Vertex & V = TopoDS::Vertex( _subShape );
1398       gp_Pnt P = BRep_Tool::Pnt(V);
1399       if ( SMDS_MeshNode * n = _father->GetMeshDS()->AddNode(P.X(), P.Y(), P.Z()) ) {
1400         _father->GetMeshDS()->SetNodeOnVertex(n,_Id);
1401         _computeState = COMPUTE_OK;
1402       }
1403     }
1404     if ( event == MODIF_ALGO_STATE )
1405       cleanDependants();
1406     return true;
1407   }
1408   SMESH_Gen *gen = _father->GetGen();
1409   SMESH_Algo *algo = 0;
1410   bool ret = true;
1411   SMESH_Hypothesis::Hypothesis_Status hyp_status;
1412   //algo_state oldAlgoState = (algo_state) GetAlgoState();
1413
1414   switch (_computeState)
1415   {
1416
1417     // ----------------------------------------------------------------------
1418
1419   case NOT_READY:
1420     switch (event)
1421     {
1422     case MODIF_ALGO_STATE:
1423       algo = GetAlgo();
1424       if (algo && !algo->NeedDiscreteBoundary())
1425         cleanDependsOn( algo ); // clean sub-meshes with event CLEAN
1426       if ( _algoState == HYP_OK )
1427         _computeState = READY_TO_COMPUTE;
1428       break;
1429     case COMPUTE:               // nothing to do
1430     case COMPUTE_SUBMESH:
1431       break;
1432     case COMPUTE_CANCELED:      // nothing to do
1433       break;
1434     case CLEAN:
1435       cleanDependants();
1436       removeSubMeshElementsAndNodes();
1437       break;
1438     case SUBMESH_COMPUTED:      // nothing to do
1439       break;
1440     case SUBMESH_RESTORED:
1441       ComputeSubMeshStateEngine( SUBMESH_RESTORED );
1442       break;
1443     case MESH_ENTITY_REMOVED:
1444       break;
1445     case SUBMESH_LOADED:
1446       loadDependentMeshes();
1447       ComputeSubMeshStateEngine( SUBMESH_LOADED );
1448       //break;
1449       // fall through
1450     case CHECK_COMPUTE_STATE:
1451       if ( IsMeshComputed() )
1452         _computeState = COMPUTE_OK;
1453       break;
1454     default:
1455       ASSERT(0);
1456       break;
1457     }
1458     break;
1459
1460     // ----------------------------------------------------------------------
1461
1462   case READY_TO_COMPUTE:
1463     switch (event)
1464     {
1465     case MODIF_ALGO_STATE:
1466       _computeState = NOT_READY;
1467       algo = GetAlgo();
1468       if (algo)
1469       {
1470         if (!algo->NeedDiscreteBoundary())
1471           cleanDependsOn( algo ); // clean sub-meshes with event CLEAN
1472         if ( _algoState == HYP_OK )
1473           _computeState = READY_TO_COMPUTE;
1474       }
1475       break;
1476
1477     case COMPUTE_NOGEOM:  // no geometry; can be several algos
1478       if ( !_father->HasShapeToMesh() )
1479       {
1480         algo = GetAlgo(); // current algo
1481         if ( algo )
1482         {
1483           // apply algos in the order of increasing dimension
1484           std::list< const SMESHDS_Hypothesis * > algos = _father->GetHypothesisList( _subShape );
1485           for ( int t = SMESHDS_Hypothesis::ALGO_1D; t <= SMESHDS_Hypothesis::ALGO_3D; ++t )
1486           {
1487             std::list<const SMESHDS_Hypothesis *>::iterator al = algos.begin();
1488             for ( ; al != algos.end(); ++al )
1489               if ( (*al)->GetType() == t )
1490               {
1491                 _algo = (SMESH_Algo*) *al;
1492                 _computeState = READY_TO_COMPUTE;
1493                 if ( !ComputeStateEngine( COMPUTE ))
1494                   break;
1495               }
1496           }
1497           _algo = algo; // restore
1498         }
1499         break;
1500       }
1501       // fall through
1502     case COMPUTE:
1503     case COMPUTE_SUBMESH:
1504       {
1505         algo = GetAlgo();
1506         ASSERT(algo);
1507         ret = algo->CheckHypothesis((*_father), _subShape, hyp_status);
1508         if (!ret)
1509         {
1510           MESSAGE("***** verify compute state *****");
1511           _computeState = NOT_READY;
1512           setAlgoState(MISSING_HYP);
1513           break;
1514         }
1515         TopoDS_Shape shape = _subShape;
1516         algo->setSubMeshesToCompute(this);
1517         // check submeshes needed
1518         // When computing in parallel mode we do not have a additional layer of submesh
1519         // The check should not be done in parallel as that check is not thread-safe
1520         if (_father->HasShapeToMesh() && !_father->IsParallel()) {
1521           bool subComputed = false, subFailed = false;
1522           if (!algo->OnlyUnaryInput()) {
1523             //  --- commented for bos#22320 to compute all sub-shapes at once if possible;
1524             //  --- in case COMPUTE_SUBMESH, set of sub-shapes is limited
1525             //  --- by calling SetAllowedSubShapes()
1526             // if ( event == COMPUTE )
1527             //   shape = getCollection( gen, algo, subComputed, subFailed, algo->SubMeshesToComput;
1528             // else
1529             //   subComputed = SubMeshesComputed( & subFailed );
1530             shape = getCollection( gen, algo, subComputed, subFailed, algo->SubMeshesToCompute());
1531           }
1532           else {
1533             subComputed = SubMeshesComputed();
1534           }
1535           ret = ( algo->NeedDiscreteBoundary() ? subComputed :
1536                   algo->SupportSubmeshes() ? !subFailed :
1537                   ( !subComputed || _father->IsNotConformAllowed() ));
1538           if (!ret)
1539           {
1540             _computeState = FAILED_TO_COMPUTE;
1541             if ( !algo->NeedDiscreteBoundary() && !subFailed )
1542               _computeError =
1543                 SMESH_ComputeError::New(COMPERR_BAD_INPUT_MESH,
1544                                         "Unexpected computed sub-mesh",algo);
1545             break; // goto exit
1546           }
1547         }
1548         // Compute
1549
1550         // to restore cout that may be redirected by algo
1551         std::streambuf* coutBuffer = std::cout.rdbuf();
1552
1553         //cleanDependants(); for "UseExisting_*D" algos
1554         //removeSubMeshElementsAndNodes();
1555         loadDependentMeshes();
1556         ret = false;
1557         _computeState = FAILED_TO_COMPUTE;
1558         _computeError = SMESH_ComputeError::New(COMPERR_OK,"",algo);
1559         try {
1560           OCC_CATCH_SIGNALS;
1561
1562           algo->InitComputeError();
1563
1564           MemoryReserve aMemoryReserve;
1565           SMDS_Mesh::CheckMemory();
1566           Kernel_Utils::Localizer loc;
1567           if ( !_father->HasShapeToMesh() ) // no shape
1568           {
1569             SMESH_MesherHelper helper( *_father );
1570             helper.SetSubShape( shape );
1571             helper.SetElementsOnShape( true );
1572             ret = algo->Compute(*_father, &helper );
1573           }
1574           else
1575           {
1576             ret = algo->Compute((*_father), shape);
1577           }
1578           // algo can set _computeError of submesh
1579           _computeError = SMESH_ComputeError::Worst( _computeError, algo->GetComputeError() );
1580         }
1581         catch ( ::SMESH_ComputeError& comperr ) {
1582           MESSAGE(" SMESH_ComputeError caught");
1583           if ( !_computeError ) _computeError = SMESH_ComputeError::New();
1584           *_computeError = comperr;
1585         }
1586         catch ( std::bad_alloc& exc ) {
1587           MESSAGE("std::bad_alloc thrown inside algo->Compute()");
1588           if ( _computeError ) {
1589             _computeError->myName = COMPERR_MEMORY_PB;
1590           }
1591           cleanSubMesh( this );
1592           throw exc;
1593         }
1594         catch ( Standard_OutOfMemory& exc ) {
1595           MESSAGE("Standard_OutOfMemory thrown inside algo->Compute()");
1596           if ( _computeError ) {
1597             _computeError->myName = COMPERR_MEMORY_PB;
1598           }
1599           cleanSubMesh( this );
1600           throw std::bad_alloc();
1601         }
1602         catch (Standard_Failure& ex) {
1603           if ( !_computeError ) _computeError = SMESH_ComputeError::New();
1604           _computeError->myName    = COMPERR_OCC_EXCEPTION;
1605           _computeError->myComment += ex.DynamicType()->Name();
1606           if ( ex.GetMessageString() && strlen( ex.GetMessageString() )) {
1607             _computeError->myComment += ": ";
1608             _computeError->myComment += ex.GetMessageString();
1609           }
1610         }
1611         catch ( SALOME_Exception& S_ex ) {
1612           const int skipSalomeShift = 7; /* to skip "Salome " of
1613                                             "Salome Exception" prefix returned
1614                                             by SALOME_Exception::what() */
1615           if ( !_computeError ) _computeError = SMESH_ComputeError::New();
1616           _computeError->myName    = COMPERR_SLM_EXCEPTION;
1617           _computeError->myComment = S_ex.what() + skipSalomeShift;
1618         }
1619         catch ( std::exception& exc ) {
1620           if ( !_computeError ) _computeError = SMESH_ComputeError::New();
1621           _computeError->myName    = COMPERR_STD_EXCEPTION;
1622           _computeError->myComment = exc.what();
1623         }
1624         catch ( ... ) {
1625           if ( _computeError )
1626             _computeError->myName = COMPERR_EXCEPTION;
1627           else
1628             ret = false;
1629         }
1630         std::cout.rdbuf( coutBuffer ); // restore cout that could be redirected by algo
1631
1632         // check if an error reported on any sub-shape
1633         bool isComputeErrorSet = !checkComputeError( algo, ret, shape );
1634         if ( isComputeErrorSet )
1635           ret = false;
1636         // check if anything was built
1637         TopExp_Explorer subS(shape, _subShape.ShapeType());
1638         if ( ret )
1639         {
1640           for (; ret && subS.More(); subS.Next())
1641             if ( !_father->GetSubMesh( subS.Current() )->IsMeshComputed() &&
1642                  ( _subShape.ShapeType() != TopAbs_EDGE ||
1643                    !algo->isDegenerated( TopoDS::Edge( subS.Current() ))))
1644               ret = false;
1645         }
1646 #ifdef PRINT_WHO_COMPUTE_WHAT
1647         for (subS.ReInit(); subS.More(); subS.Next())
1648         {
1649           SMESH_MeshLocker myLocker(_father);
1650           const std::list <const SMESHDS_Hypothesis *> & hyps =
1651               _algo->GetUsedHypothesis( *_father, _subShape );
1652           SMESH_Comment hypStr;
1653           if ( !hyps.empty() )
1654           {
1655             hypStr << hyps.front()->GetName() << " ";
1656             ((SMESHDS_Hypothesis*)hyps.front())->SaveTo( hypStr.Stream() );
1657             hypStr << " ";
1658           }
1659           cout << _father->GetSubMesh( subS.Current() )->GetId()
1660                << " " << ( ret ? "OK" : "FAIL" )
1661                << " " << _algo->GetName()
1662                << " " << hypStr << endl;
1663         }
1664 #endif
1665         // Set _computeError
1666         if ( !ret && !isComputeErrorSet )
1667         {
1668           for ( subS.ReInit(); subS.More(); subS.Next() )
1669           {
1670             SMESH_subMesh* sm = _father->GetSubMesh( subS.Current() );
1671             if ( !sm->IsMeshComputed() )
1672             {
1673               if ( !sm->_computeError )
1674                 sm->_computeError = SMESH_ComputeError::New();
1675               if ( sm->_computeError->IsOK() )
1676                 sm->_computeError->myName = COMPERR_ALGO_FAILED;
1677               sm->_computeState = FAILED_TO_COMPUTE;
1678               sm->_computeError->myAlgo = algo;
1679             }
1680           }
1681         }
1682         if ( ret && _computeError && _computeError->myName != COMPERR_WARNING )
1683         {
1684           _computeError.reset();
1685         }
1686
1687         // transform errors into warnings if it is caused by mesh edition (imp 0023068)
1688         if (!ret && _father->GetIsModified() )
1689         {
1690           for (subS.ReInit(); subS.More(); subS.Next())
1691           {
1692             SMESH_subMesh* sm = _father->GetSubMesh( subS.Current() );
1693             if ( !sm->IsMeshComputed() && sm->_computeError )
1694             {
1695               // check if there is a VERTEX w/o nodes
1696               // with READY_TO_COMPUTE state (after MergeNodes())
1697               SMESH_subMeshIteratorPtr smIt = sm->getDependsOnIterator(false,false);
1698               while ( smIt->more() )
1699               {
1700                 SMESH_subMesh * vertSM = smIt->next();
1701                 if ( vertSM->_subShape.ShapeType() != TopAbs_VERTEX ) break;
1702                 if ( vertSM->GetComputeState() == READY_TO_COMPUTE )
1703                 {
1704                   SMESHDS_SubMesh * ds = vertSM->GetSubMeshDS();
1705                   if ( !ds || ds->NbNodes() == 0 )
1706                   {
1707                     sm->_computeState = READY_TO_COMPUTE;
1708                     sm->_computeError->myName = COMPERR_WARNING;
1709                     break;
1710                   }
1711                 }
1712               }
1713             }
1714           }
1715         }
1716
1717         // send event SUBMESH_COMPUTED
1718         if ( ret ) {
1719           if ( !algo->NeedDiscreteBoundary() )
1720             // send SUBMESH_COMPUTED to dependants of all sub-meshes of shape
1721             for (subS.ReInit(); subS.More(); subS.Next())
1722             {
1723               SMESH_subMesh* sm = _father->GetSubMesh( subS.Current() );
1724               SMESH_subMeshIteratorPtr smIt = sm->getDependsOnIterator(false,false);
1725               while ( smIt->more() ) {
1726                 sm = smIt->next();
1727                 if ( sm->GetSubShape().ShapeType() == TopAbs_VERTEX )
1728                   sm->updateDependantsState( SUBMESH_COMPUTED );
1729                 else
1730                   break;
1731               }
1732             }
1733           else
1734             updateDependantsState( SUBMESH_COMPUTED );
1735         }
1736         // let algo clear its data gathered while algo->Compute()
1737         algo->CheckHypothesis((*_father), _subShape, hyp_status);
1738       }
1739       break;
1740     case COMPUTE_CANCELED:               // nothing to do
1741       break;
1742     case CLEAN:
1743       cleanDependants();
1744       removeSubMeshElementsAndNodes();
1745       _computeState = NOT_READY;
1746       algo = GetAlgo();
1747       if (algo)
1748       {
1749         ret = algo->CheckHypothesis((*_father), _subShape, hyp_status);
1750         if (ret)
1751           _computeState = READY_TO_COMPUTE;
1752         else
1753           setAlgoState(MISSING_HYP);
1754       }
1755       break;
1756     case SUBMESH_COMPUTED:      // nothing to do
1757       break;
1758     case SUBMESH_RESTORED:
1759       // check if a mesh is already computed that may
1760       // happen after retrieval from a file
1761       ComputeStateEngine( CHECK_COMPUTE_STATE );
1762       ComputeSubMeshStateEngine( SUBMESH_RESTORED );
1763       algo = GetAlgo();
1764       if (algo) algo->SubmeshRestored( this );
1765       break;
1766     case MESH_ENTITY_REMOVED:
1767       break;
1768     case SUBMESH_LOADED:
1769       loadDependentMeshes();
1770       ComputeSubMeshStateEngine( SUBMESH_LOADED );
1771       //break;
1772       // fall through
1773     case CHECK_COMPUTE_STATE:
1774       if ( IsMeshComputed() )
1775         _computeState = COMPUTE_OK;
1776       else if ( _computeError && _computeError->IsKO() )
1777         _computeState = FAILED_TO_COMPUTE;
1778       break;
1779     default:
1780       ASSERT(0);
1781       break;
1782     }
1783     break;
1784
1785     // ----------------------------------------------------------------------
1786
1787   case COMPUTE_OK:
1788     switch (event)
1789     {
1790     case MODIF_ALGO_STATE:
1791       ComputeStateEngine( CLEAN );
1792       algo = GetAlgo();
1793       if (algo && !algo->NeedDiscreteBoundary())
1794         cleanDependsOn( algo ); // clean sub-meshes with event CLEAN
1795       break;
1796     case COMPUTE:               // nothing to do
1797       break;
1798     case COMPUTE_SUBMESH:       // nothing to do
1799       break;
1800     case COMPUTE_CANCELED:      // nothing to do
1801       break;
1802     case CLEAN:
1803       cleanDependants();  // clean sub-meshes, dependent on this one, with event CLEAN
1804       removeSubMeshElementsAndNodes();
1805       _computeState = NOT_READY;
1806       if ( _algoState == HYP_OK )
1807         _computeState = READY_TO_COMPUTE;
1808       break;
1809     case SUBMESH_COMPUTED:      // nothing to do
1810       break;
1811     case SUBMESH_RESTORED:
1812       ComputeStateEngine( CHECK_COMPUTE_STATE );
1813       ComputeSubMeshStateEngine( SUBMESH_RESTORED );
1814       algo = GetAlgo();
1815       if (algo) algo->SubmeshRestored( this );
1816       break;
1817     case MESH_ENTITY_REMOVED:
1818       updateDependantsState    ( CHECK_COMPUTE_STATE );
1819       ComputeStateEngine       ( CHECK_COMPUTE_STATE );
1820       ComputeSubMeshStateEngine( CHECK_COMPUTE_STATE );
1821       break;
1822     case CHECK_COMPUTE_STATE:
1823       if ( !IsMeshComputed() ) {
1824         if (_algoState == HYP_OK)
1825           _computeState = READY_TO_COMPUTE;
1826         else
1827           _computeState = NOT_READY;
1828       }
1829       break;
1830     case SUBMESH_LOADED:
1831       // already treated event, thanks to which _computeState == COMPUTE_OK
1832       break;
1833     default:
1834       ASSERT(0);
1835       break;
1836     }
1837     break;
1838
1839     // ----------------------------------------------------------------------
1840
1841   case FAILED_TO_COMPUTE:
1842     switch (event)
1843     {
1844     case MODIF_ALGO_STATE:
1845       if ( !IsEmpty() )
1846         ComputeStateEngine( CLEAN );
1847       algo = GetAlgo();
1848       if (algo && !algo->NeedDiscreteBoundary())
1849         cleanDependsOn( algo ); // clean sub-meshes with event CLEAN
1850       if (_algoState == HYP_OK)
1851         _computeState = READY_TO_COMPUTE;
1852       else
1853         _computeState = NOT_READY;
1854       break;
1855     case COMPUTE:        // nothing to do
1856     case COMPUTE_SUBMESH:
1857       break;
1858     case COMPUTE_CANCELED:
1859       {
1860         algo = GetAlgo();
1861         algo->CancelCompute();
1862       }
1863       break;
1864     case CLEAN:
1865       cleanDependants(); // submeshes dependent on me should be cleaned as well
1866       removeSubMeshElementsAndNodes();
1867       break;
1868     case SUBMESH_COMPUTED:      // allow retry compute
1869       if ( IsEmpty() ) // 23061
1870       {
1871         if (_algoState == HYP_OK)
1872           _computeState = READY_TO_COMPUTE;
1873         else
1874           _computeState = NOT_READY;
1875       }
1876       break;
1877     case SUBMESH_RESTORED:
1878       ComputeSubMeshStateEngine( SUBMESH_RESTORED );
1879       break;
1880     case MESH_ENTITY_REMOVED:
1881       break;
1882     case CHECK_COMPUTE_STATE:
1883       if ( IsMeshComputed() )
1884         _computeState = COMPUTE_OK;
1885       else
1886         if (_algoState == HYP_OK)
1887           _computeState = READY_TO_COMPUTE;
1888         else
1889           _computeState = NOT_READY;
1890       break;
1891     // case SUBMESH_LOADED:
1892     //   break;
1893     default:
1894       ASSERT(0);
1895       break;
1896     }
1897     break;
1898
1899     // ----------------------------------------------------------------------
1900   default:
1901     ASSERT(0);
1902     break;
1903   }
1904
1905   notifyListenersOnEvent( event, COMPUTE_EVENT );
1906
1907   return ret;
1908 }
1909
1910
1911 //=============================================================================
1912 /*!
1913  *
1914  */
1915 //=============================================================================
1916
1917 bool SMESH_subMesh::Evaluate(MapShapeNbElems& aResMap)
1918 {
1919   _computeError.reset();
1920
1921   bool ret = true;
1922
1923   if (_subShape.ShapeType() == TopAbs_VERTEX) {
1924     vector<smIdType> aVec(SMDSEntity_Last,0);
1925     aVec[SMDSEntity_Node] = 1;
1926     aResMap.insert(make_pair(this,aVec));
1927     return ret;
1928   }
1929
1930   //SMESH_Gen *gen = _father->GetGen();
1931   SMESH_Algo *algo = 0;
1932   SMESH_Hypothesis::Hypothesis_Status hyp_status;
1933
1934   algo = GetAlgo();
1935   if( algo && !aResMap.count( this ))
1936   {
1937     ret = algo->CheckHypothesis((*_father), _subShape, hyp_status);
1938     if (!ret) return false;
1939
1940     if (_father->HasShapeToMesh() && algo->NeedDiscreteBoundary() )
1941     {
1942       // check submeshes needed
1943       bool subMeshEvaluated = true;
1944       int dimToCheck = SMESH_Gen::GetShapeDim( _subShape ) - 1;
1945       SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,/*complexShapeFirst=*/true);
1946       while ( smIt->more() && subMeshEvaluated )
1947       {
1948         SMESH_subMesh* sm = smIt->next();
1949         int dim = SMESH_Gen::GetShapeDim( sm->GetSubShape() );
1950         if (dim < dimToCheck) break; // the rest subMeshes are all of less dimension
1951         const vector<smIdType> & nbs = aResMap[ sm ];
1952         subMeshEvaluated = (std::accumulate( nbs.begin(), nbs.end(), 0 ) > 0 );
1953       }
1954       if ( !subMeshEvaluated )
1955         return false;
1956     }
1957     _computeError = SMESH_ComputeError::New(COMPERR_OK,"",algo);
1958
1959     if ( IsMeshComputed() )
1960     {
1961       vector<smIdType> & nbEntities = aResMap[ this ];
1962       nbEntities.resize( SMDSEntity_Last, 0 );
1963       if ( SMESHDS_SubMesh* sm = GetSubMeshDS() )
1964       {
1965         nbEntities[ SMDSEntity_Node ] = sm->NbNodes();
1966         SMDS_ElemIteratorPtr   elemIt = sm->GetElements();
1967         while ( elemIt->more() )
1968           nbEntities[ elemIt->next()->GetEntityType() ]++;
1969       }
1970     }
1971     else
1972     {
1973       ret = algo->Evaluate((*_father), _subShape, aResMap);
1974     }
1975     aResMap.insert( make_pair( this,vector<smIdType>(0)));
1976   }
1977
1978   return ret;
1979 }
1980
1981
1982 //=======================================================================
1983 /*!
1984  * \brief Update compute_state by _computeError and send proper events to
1985  * dependent submeshes
1986   * \retval bool - true if _computeError is NOT set
1987  */
1988 //=======================================================================
1989
1990 bool SMESH_subMesh::checkComputeError(SMESH_Algo*         theAlgo,
1991                                       const bool          theComputeOK,
1992                                       const TopoDS_Shape& theShape)
1993 {
1994   bool noErrors = true;
1995
1996   if ( !theShape.IsNull() )
1997   {
1998     // Check state of submeshes
1999     if ( !theAlgo->NeedDiscreteBoundary())
2000     {
2001       SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,false);
2002       while ( smIt->more() )
2003         if ( !smIt->next()->checkComputeError( theAlgo, theComputeOK ))
2004           noErrors = false;
2005     }
2006
2007     // Check state of neighbours
2008     if ( !theAlgo->OnlyUnaryInput() &&
2009          theShape.ShapeType() == TopAbs_COMPOUND &&
2010          !theShape.IsSame( _subShape ))
2011     {
2012       for (TopoDS_Iterator subIt( theShape ); subIt.More(); subIt.Next()) {
2013         SMESH_subMesh* sm = _father->GetSubMesh( subIt.Value() );
2014         if ( sm != this ) {
2015           if ( !sm->checkComputeError( theAlgo, theComputeOK, sm->GetSubShape() ))
2016             noErrors = false;
2017           updateDependantsState( SUBMESH_COMPUTED ); // send event SUBMESH_COMPUTED
2018         }
2019       }
2020     }
2021   }
2022   {
2023
2024     // Set my _computeState
2025
2026     if ( !_computeError || _computeError->IsOK() )
2027     {
2028       // no error description is set to this sub-mesh, check if any mesh is computed
2029       _computeState = IsMeshComputed() ? COMPUTE_OK : FAILED_TO_COMPUTE;
2030       if ( _computeState != COMPUTE_OK )
2031       {
2032         if ( _subShape.ShapeType() == TopAbs_EDGE &&
2033              SMESH_Algo::isDegenerated( TopoDS::Edge( _subShape )) )
2034           _computeState = COMPUTE_OK;
2035         else if ( theComputeOK )
2036           _computeError = SMESH_ComputeError::New(COMPERR_NO_MESH_ON_SHAPE,"",theAlgo);
2037       }
2038     }
2039
2040     if ( _computeError && !_computeError->IsOK() )
2041     {
2042       if ( !_computeError->myAlgo )
2043         _computeError->myAlgo = theAlgo;
2044
2045       // Show error
2046       SMESH_Comment text;
2047       text << theAlgo->GetName() << " failed on sub-shape #" << _Id << " with error ";
2048       if (_computeError->IsCommon() )
2049         text << _computeError->CommonName();
2050       else
2051         text << _computeError->myName;
2052       if ( _computeError->myComment.size() > 0 )
2053         text << " \"" << _computeError->myComment << "\"";
2054
2055       INFOS( text );
2056
2057       _computeState = _computeError->IsKO() ? FAILED_TO_COMPUTE : COMPUTE_OK;
2058
2059       noErrors = false;
2060     }
2061   }
2062   return noErrors;
2063 }
2064
2065 //=======================================================================
2066 //function : updateSubMeshState
2067 //purpose  :
2068 //=======================================================================
2069
2070 void SMESH_subMesh::updateSubMeshState(const compute_state theState)
2071 {
2072   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,false);
2073   while ( smIt->more() )
2074     smIt->next()->_computeState = theState;
2075 }
2076
2077 //=======================================================================
2078 //function : ComputeSubMeshStateEngine
2079 //purpose  :
2080 //=======================================================================
2081
2082 void SMESH_subMesh::ComputeSubMeshStateEngine(compute_event event, const bool includeSelf)
2083 {
2084   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(includeSelf,false);
2085   while ( smIt->more() )
2086     smIt->next()->ComputeStateEngine(event);
2087 }
2088
2089 //=======================================================================
2090 //function : updateDependantsState
2091 //purpose  :
2092 //=======================================================================
2093
2094 void SMESH_subMesh::updateDependantsState(const compute_event theEvent)
2095 {
2096   const std::vector< SMESH_subMesh * > & ancestors = GetAncestors();
2097   for ( size_t iA = 0; iA < ancestors.size(); ++iA )
2098   {
2099     ancestors[ iA ]->ComputeStateEngine( theEvent );
2100   }
2101 }
2102
2103 //=======================================================================
2104 //function : cleanDependants
2105 //purpose  :
2106 //=======================================================================
2107
2108 void SMESH_subMesh::cleanDependants()
2109 {
2110   int dimToClean = SMESH_Gen::GetShapeDim( _subShape ) + 1;
2111
2112   const std::vector< SMESH_subMesh * > & ancestors = GetAncestors();
2113   for ( size_t iA = 0; iA < ancestors.size(); ++iA )
2114   {
2115     const TopoDS_Shape& ancestor = ancestors[ iA ]->GetSubShape();
2116     if ( SMESH_Gen::GetShapeDim( ancestor ) == dimToClean )
2117     {
2118       // PAL8021. do not go upper than SOLID, else ComputeStateEngine(CLEAN)
2119       // will erase mesh on other shapes in a compound
2120       if ( ancestor.ShapeType() >= TopAbs_SOLID &&
2121            !ancestors[ iA ]->IsEmpty() )  // prevent infinite CLEAN via event lesteners
2122         ancestors[ iA ]->ComputeStateEngine(CLEAN);
2123     }
2124   }
2125 }
2126
2127 //=======================================================================
2128 //function : removeSubMeshElementsAndNodes
2129 //purpose  :
2130 //=======================================================================
2131
2132 void SMESH_subMesh::removeSubMeshElementsAndNodes()
2133 {
2134   cleanSubMesh( this );
2135
2136   // algo may bind a submesh not to _subShape, eg 3D algo
2137   // sets nodes on SHELL while _subShape may be SOLID
2138
2139   int dim = SMESH_Gen::GetShapeDim( _subShape );
2140   int type = _subShape.ShapeType() + 1;
2141   for ( ; type <= TopAbs_EDGE; type++) {
2142     if ( dim == SMESH_Gen::GetShapeDim( (TopAbs_ShapeEnum) type ))
2143     {
2144       TopExp_Explorer exp( _subShape, (TopAbs_ShapeEnum) type );
2145       for ( ; exp.More(); exp.Next() )
2146         cleanSubMesh( _father->GetSubMeshContaining( exp.Current() ));
2147     }
2148     else
2149       break;
2150   }
2151 }
2152
2153 //=======================================================================
2154 //function : getCollection
2155 //purpose  : return a shape containing all sub-shapes of the MainShape that can be
2156 //           meshed at once along with _subShape
2157 //=======================================================================
2158
2159 TopoDS_Shape SMESH_subMesh::getCollection(SMESH_Gen * /*theGen*/,
2160                                           SMESH_Algo* theAlgo,
2161                                           bool &      theSubComputed,
2162                                           bool &      theSubFailed,
2163                                           std::vector<SMESH_subMesh*>& theSubs)
2164 {
2165   theSubComputed = SubMeshesComputed( & theSubFailed );
2166
2167   TopoDS_Shape mainShape = _father->GetMeshDS()->ShapeToMesh();
2168
2169   if ( mainShape.IsSame( _subShape ))
2170     return _subShape;
2171
2172   const bool skipAuxHyps = false;
2173   list<const SMESHDS_Hypothesis*> usedHyps =
2174     theAlgo->GetUsedHypothesis( *_father, _subShape, skipAuxHyps ); // copy
2175   std::list < TopoDS_Shape >  assiShapes = theAlgo->GetAssignedShapes();
2176
2177   // put in a compound all shapes with the same hypothesis assigned
2178   // and a good ComputeState
2179
2180   TopoDS_Compound aCompound;
2181   BRep_Builder aBuilder;
2182   aBuilder.MakeCompound( aCompound );
2183
2184   theSubs.clear();
2185
2186   SMESH_subMeshIteratorPtr smIt = _father->GetSubMesh( mainShape )->getDependsOnIterator(false);
2187   while ( smIt->more() )
2188   {
2189     SMESH_subMesh* subMesh = smIt->next();
2190     const TopoDS_Shape&  S = subMesh->_subShape;
2191     if ( S.ShapeType() != this->_subShape.ShapeType() )
2192       continue;
2193     if ( _allowedSubShapes && !_allowedSubShapes->IsEmpty() && !_allowedSubShapes->Contains( S ))
2194       continue;
2195     if ( subMesh == this )
2196     {
2197       aBuilder.Add( aCompound, S );
2198       theSubs.push_back( subMesh );
2199     }
2200     else if ( subMesh->GetComputeState() == READY_TO_COMPUTE )
2201     {
2202       SMESH_Algo* anAlgo = subMesh->GetAlgo();
2203       if (( anAlgo->IsSameName( *theAlgo )) && // same algo
2204           ( anAlgo->GetUsedHypothesis( *_father, S, skipAuxHyps ) == usedHyps ) && // same hyps
2205           ( anAlgo->GetAssignedShapes() == assiShapes ) && // on same sub-shapes
2206           ( _algoShape == subMesh->_algoShape ))
2207       {
2208         aBuilder.Add( aCompound, S );
2209         if ( !subMesh->SubMeshesComputed() )
2210           theSubComputed = false;
2211         theSubs.push_back( subMesh );
2212       }
2213     }
2214   }
2215
2216   return theSubs.size() == 1 ? theSubs[0]->GetSubShape() : aCompound;
2217 }
2218
2219 //=======================================================================
2220 //function : getSimilarAttached
2221 //purpose  : return a hypothesis attached to theShape.
2222 //           If theHyp is provided, similar but not same hypotheses
2223 //           is returned; else only applicable ones having theHypType
2224 //           is returned
2225 //=======================================================================
2226
2227 const SMESH_Hypothesis* SMESH_subMesh::getSimilarAttached(const TopoDS_Shape&      theShape,
2228                                                           const SMESH_Hypothesis * theHyp,
2229                                                           const int                theHypType)
2230 {
2231   SMESH_HypoFilter hypoKind;
2232   hypoKind.Init( hypoKind.HasType( theHyp ? theHyp->GetType() : theHypType ));
2233   if ( theHyp ) {
2234     hypoKind.And   ( hypoKind.HasDim( theHyp->GetDim() ));
2235     hypoKind.AndNot( hypoKind.Is( theHyp ));
2236     if ( theHyp->IsAuxiliary() )
2237       hypoKind.And( hypoKind.HasName( theHyp->GetName() ));
2238     else
2239       hypoKind.AndNot( hypoKind.IsAuxiliary());
2240   }
2241   else {
2242     hypoKind.And( hypoKind.IsApplicableTo( theShape ));
2243   }
2244
2245   return _father->GetHypothesis( theShape, hypoKind, false );
2246 }
2247
2248 //=======================================================================
2249 //function : CheckConcurrentHypothesis
2250 //purpose  : check if there are several applicable hypothesis attached to
2251 //           ancestors
2252 //=======================================================================
2253
2254 SMESH_Hypothesis::Hypothesis_Status
2255   SMESH_subMesh::CheckConcurrentHypothesis( SMESH_Hypothesis* theHypothesis)
2256 {
2257   // is there local hypothesis on me?
2258   if ( getSimilarAttached( _subShape, theHypothesis ) )
2259     return SMESH_Hypothesis::HYP_OK;
2260
2261
2262   TopoDS_Shape aPrevWithHyp;
2263   const SMESH_Hypothesis* aPrevHyp = 0;
2264   TopTools_ListIteratorOfListOfShape it( _father->GetAncestors( _subShape ));
2265   for (; it.More(); it.Next())
2266   {
2267     const TopoDS_Shape& ancestor = it.Value();
2268     const SMESH_Hypothesis* hyp = getSimilarAttached( ancestor, theHypothesis );
2269     if ( hyp )
2270     {
2271       if ( aPrevWithHyp.IsNull() || aPrevWithHyp.IsSame( ancestor ))
2272       {
2273         aPrevWithHyp = ancestor;
2274         aPrevHyp     = hyp;
2275       }
2276       else if ( aPrevWithHyp.ShapeType() == ancestor.ShapeType() && aPrevHyp != hyp )
2277         return SMESH_Hypothesis::HYP_CONCURRENT;
2278       else
2279         return SMESH_Hypothesis::HYP_OK;
2280     }
2281   }
2282   return SMESH_Hypothesis::HYP_OK;
2283 }
2284
2285 //================================================================================
2286 /*!
2287  * \brief Constructor of OwnListenerData
2288  */
2289 //================================================================================
2290
2291 SMESH_subMesh::OwnListenerData::OwnListenerData( SMESH_subMesh* sm, EventListener* el):
2292   mySubMesh( sm ),
2293   myMeshID( sm ? sm->GetFather()->GetId() : -1 ),
2294   mySubMeshID( sm ? sm->GetId() : -1 ),
2295   myListener( el )
2296 {
2297 }
2298
2299 //================================================================================
2300 /*!
2301  * \brief Sets an event listener and its data to a submesh
2302  * \param listener - the listener to store
2303  * \param data - the listener data to store
2304  * \param where - the submesh to store the listener and it's data
2305  *
2306  * It remembers the submesh where it puts the listener in order to delete
2307  * them when HYP_OK algo_state is lost
2308  * After being set, event listener is notified on each event of where submesh.
2309  */
2310 //================================================================================
2311
2312 void SMESH_subMesh::SetEventListener(EventListener*     listener,
2313                                      EventListenerData* data,
2314                                      SMESH_subMesh*     where)
2315 {
2316   if ( listener && where ) {
2317     where->setEventListener( listener, data );
2318     _ownListeners.push_back( OwnListenerData( where, listener ));
2319   }
2320 }
2321
2322 //================================================================================
2323 /*!
2324  * \brief Sets an event listener and its data to a submesh
2325  * \param listener - the listener to store
2326  * \param data - the listener data to store
2327  *
2328  * After being set, event listener is notified on each event of a submesh.
2329  */
2330 //================================================================================
2331
2332 void SMESH_subMesh::setEventListener(EventListener*     listener,
2333                                      EventListenerData* data)
2334 {
2335   map< EventListener*, EventListenerData* >::iterator l_d =
2336     _eventListeners.find( listener );
2337   if ( l_d != _eventListeners.end() ) {
2338     EventListenerData* curData = l_d->second;
2339     l_d->second = data;
2340     if ( curData && curData != data && curData->IsDeletable() )
2341       delete curData;
2342   }
2343   else
2344   {
2345     for ( l_d = _eventListeners.begin(); l_d != _eventListeners.end(); ++l_d )
2346       if ( listener->GetName() == l_d->first->GetName() )
2347       {
2348         EventListenerData* curData = l_d->second;
2349         l_d->second = 0;
2350         if ( curData && curData != data && curData->IsDeletable() )
2351           delete curData;
2352         if ( l_d->first != listener && l_d->first->IsDeletable() )
2353           delete l_d->first;
2354         _eventListeners.erase( l_d );
2355         break;
2356       }
2357     _eventListeners.insert( make_pair( listener, data ));
2358   }
2359 }
2360
2361 //================================================================================
2362 /*!
2363  * \brief Return an event listener data
2364  * \param listener - the listener whose data is
2365  * \param myOwn - if \c true, returns a listener set by this sub-mesh,
2366  *        else returns a listener listening to events of this sub-mesh
2367  * \retval EventListenerData* - found data, maybe NULL
2368  */
2369 //================================================================================
2370
2371 EventListenerData* SMESH_subMesh::GetEventListenerData(EventListener* listener,
2372                                                        const bool     myOwn) const
2373 {
2374   if ( myOwn )
2375   {
2376     list< OwnListenerData >::const_iterator d;
2377     for ( d = _ownListeners.begin(); d != _ownListeners.end(); ++d )
2378     {
2379       if ( d->myListener == listener && _father->MeshExists( d->myMeshID ))
2380         return d->mySubMesh->GetEventListenerData( listener, !myOwn );
2381     }
2382   }
2383   else
2384   {
2385     map< EventListener*, EventListenerData* >::const_iterator l_d =
2386       _eventListeners.find( listener );
2387     if ( l_d != _eventListeners.end() )
2388       return l_d->second;
2389   }
2390   return 0;
2391 }
2392
2393 //================================================================================
2394 /*!
2395  * \brief Return an event listener data
2396  * \param listenerName - the listener name
2397  * \param myOwn - if \c true, returns a listener set by this sub-mesh,
2398  *        else returns a listener listening to events of this sub-mesh
2399  * \retval EventListenerData* - found data, maybe NULL
2400  */
2401 //================================================================================
2402
2403 EventListenerData* SMESH_subMesh::GetEventListenerData(const string& listenerName,
2404                                                        const bool    myOwn) const
2405 {
2406   if ( myOwn )
2407   {
2408     list< OwnListenerData >::const_iterator d;
2409     for ( d = _ownListeners.begin(); d != _ownListeners.end(); ++d )
2410     {
2411       if ( _father->MeshExists( d->myMeshID ) && listenerName == d->myListener->GetName())
2412         return d->mySubMesh->GetEventListenerData( listenerName, !myOwn );
2413     }
2414   }
2415   else
2416   {
2417     map< EventListener*, EventListenerData* >::const_iterator l_d = _eventListeners.begin();
2418     for ( ; l_d != _eventListeners.end(); ++l_d )
2419       if ( listenerName == l_d->first->GetName() )
2420         return l_d->second;
2421   }
2422   return 0;
2423 }
2424
2425 //================================================================================
2426 /*!
2427  * \brief Notify stored event listeners on the occurred event
2428  * \param event - algo_event or compute_event itself
2429  * \param eventType - algo_event or compute_event
2430  * \param hyp - hypothesis, if eventType is algo_event
2431  */
2432 //================================================================================
2433
2434 void SMESH_subMesh::notifyListenersOnEvent( const int         event,
2435                                             const event_type  eventType,
2436                                             SMESH_Hypothesis* hyp)
2437 {
2438   list< pair< EventListener*, EventListenerData* > > eventListeners( _eventListeners.begin(),
2439                                                                      _eventListeners.end());
2440   list< pair< EventListener*, EventListenerData* > >::iterator l_d = eventListeners.begin();
2441   for ( ; l_d != eventListeners.end(); ++l_d )
2442   {
2443     std::pair< EventListener*, EventListenerData* > li_da = *l_d;
2444     if ( !_eventListeners.count( li_da.first )) continue;
2445
2446     if ( li_da.first->myBusySM.insert( this ).second )
2447     {
2448       const bool isDeletable = li_da.first->IsDeletable();
2449
2450       li_da.first->ProcessEvent( event, eventType, this, li_da.second, hyp );
2451
2452       if ( !isDeletable || _eventListeners.count( li_da.first ))
2453         li_da.first->myBusySM.erase( this ); // a listener is hopefully not dead
2454     }
2455   }
2456 }
2457
2458 //================================================================================
2459 /*!
2460  * \brief Unregister the listener and delete listener's data
2461  * \param listener - the event listener
2462  */
2463 //================================================================================
2464
2465 void SMESH_subMesh::DeleteEventListener(EventListener* listener)
2466 {
2467   map< EventListener*, EventListenerData* >::iterator l_d =
2468     _eventListeners.find( listener );
2469   if ( l_d != _eventListeners.end() && l_d->first )
2470   {
2471     if ( l_d->second && l_d->second->IsDeletable() )
2472     {
2473       delete l_d->second;
2474     }
2475     l_d->first->myBusySM.erase( this );
2476     if ( l_d->first->IsDeletable() )
2477     {
2478       l_d->first->BeforeDelete( this, l_d->second );
2479       delete l_d->first;
2480     }
2481     _eventListeners.erase( l_d );
2482   }
2483 }
2484
2485 //================================================================================
2486 /*!
2487  * \brief Delete event listeners depending on algo of this submesh
2488  */
2489 //================================================================================
2490
2491 void SMESH_subMesh::deleteOwnListeners()
2492 {
2493   list< OwnListenerData >::iterator d;
2494   for ( d = _ownListeners.begin(); d != _ownListeners.end(); ++d )
2495   {
2496     SMESH_Mesh* mesh = _father->FindMesh( d->myMeshID );
2497     if ( !mesh || !mesh->GetSubMeshContaining( d->mySubMeshID ))
2498       continue;
2499     d->mySubMesh->DeleteEventListener( d->myListener );
2500   }
2501   _ownListeners.clear();
2502 }
2503
2504 //=======================================================================
2505 //function : loadDependentMeshes
2506 //purpose  : loads dependent meshes on SUBMESH_LOADED event
2507 //=======================================================================
2508
2509 void SMESH_subMesh::loadDependentMeshes()
2510 {
2511   list< OwnListenerData >::iterator d;
2512   for ( d = _ownListeners.begin(); d != _ownListeners.end(); ++d )
2513     if ( _father != d->mySubMesh->_father &&
2514          _father->FindMesh( d->myMeshID ))
2515       d->mySubMesh->_father->Load();
2516
2517   // map< EventListener*, EventListenerData* >::iterator l_d = _eventListeners.begin();
2518   // for ( ; l_d != _eventListeners.end(); ++l_d )
2519   //   if ( l_d->second )
2520   //   {
2521   //     const list<SMESH_subMesh*>& smList = l_d->second->mySubMeshes;
2522   //     list<SMESH_subMesh*>::const_iterator sm = smList.begin();
2523   //     for ( ; sm != smList.end(); ++sm )
2524   //       if ( _father != (*sm)->_father )
2525   //         (*sm)->_father->Load();
2526   //   }
2527 }
2528
2529 //================================================================================
2530 /*!
2531  * \brief Do something on a certain event
2532  * \param event - algo_event or compute_event itself
2533  * \param eventType - algo_event or compute_event
2534  * \param subMesh - the submesh where the event occurs
2535  * \param data - listener data stored in the subMesh
2536  * \param hyp - hypothesis, if eventType is algo_event
2537  *
2538  * The base implementation translates CLEAN event to the subMesh
2539  * stored in listener data. Also it sends SUBMESH_COMPUTED event in case of
2540  * successful COMPUTE event.
2541  */
2542 //================================================================================
2543
2544 void SMESH_subMeshEventListener::ProcessEvent(const int          event,
2545                                               const int          eventType,
2546                                               SMESH_subMesh*     subMesh,
2547                                               EventListenerData* data,
2548                                               const SMESH_Hypothesis*  /*hyp*/)
2549 {
2550   if ( data && !data->mySubMeshes.empty() &&
2551        eventType == SMESH_subMesh::COMPUTE_EVENT)
2552   {
2553     ASSERT( data->mySubMeshes.front() != subMesh );
2554     list<SMESH_subMesh*>::iterator smIt = data->mySubMeshes.begin();
2555     list<SMESH_subMesh*>::iterator smEnd = data->mySubMeshes.end();
2556     switch ( event ) {
2557     case SMESH_subMesh::CLEAN:
2558       for ( ; smIt != smEnd; ++ smIt)
2559         (*smIt)->ComputeStateEngine( SMESH_subMesh::compute_event( event ));
2560       break;
2561     case SMESH_subMesh::COMPUTE:
2562     case SMESH_subMesh::COMPUTE_SUBMESH:
2563       if ( subMesh->GetComputeState() == SMESH_subMesh::COMPUTE_OK )
2564         for ( ; smIt != smEnd; ++ smIt)
2565           (*smIt)->ComputeStateEngine( SMESH_subMesh::SUBMESH_COMPUTED );
2566       break;
2567     default:;
2568     }
2569   }
2570 }
2571
2572 namespace {
2573
2574   //================================================================================
2575   /*!
2576    * \brief Iterator over submeshes and optionally prepended or appended one
2577    */
2578   //================================================================================
2579
2580   struct _Iterator : public SMDS_Iterator<SMESH_subMesh*>
2581   {
2582     _Iterator(SMDS_Iterator<SMESH_subMesh*>* subIt,
2583               SMESH_subMesh*                 prepend,
2584               SMESH_subMesh*                 append): myAppend(append), myIt(subIt)
2585     {
2586       myCur = prepend ? prepend : myIt->more() ? myIt->next() : append;
2587       if ( myCur == append ) append = 0;
2588     }
2589     /// Return true if and only if there are other object in this iterator
2590     virtual bool more()
2591     {
2592       return myCur;
2593     }
2594     /// Return the current object and step to the next one
2595     virtual SMESH_subMesh* next()
2596     {
2597       SMESH_subMesh* res = myCur;
2598       if ( myIt->more() ) { myCur = myIt->next(); }
2599       else                { myCur = myAppend; myAppend = 0; }
2600       return res;
2601     }
2602     /// ~
2603     ~_Iterator()
2604     { delete myIt; }
2605     ///
2606     SMESH_subMesh                 *myAppend, *myCur;
2607     SMDS_Iterator<SMESH_subMesh*> *myIt;
2608   };
2609 }
2610
2611 //================================================================================
2612 /*!
2613  * \brief Return iterator on the submeshes this one depends on
2614  *  \param includeSelf - this submesh to be returned also
2615  *  \param reverse - if true, complex shape submeshes go first
2616  */
2617 //================================================================================
2618
2619 SMESH_subMeshIteratorPtr SMESH_subMesh::getDependsOnIterator(const bool includeSelf,
2620                                                              const bool reverse) const
2621 {
2622   SMESH_subMesh *me = (SMESH_subMesh*) this;
2623   SMESH_subMesh *prepend=0, *append=0;
2624   if ( includeSelf ) {
2625     if ( reverse ) prepend = me;
2626     else            append = me;
2627   }
2628   typedef map < int, SMESH_subMesh * > TMap;
2629   if ( reverse )
2630   {
2631     return SMESH_subMeshIteratorPtr
2632       ( new _Iterator( new SMDS_mapReverseIterator<TMap>( me->DependsOn() ), prepend, append ));
2633   }
2634   {
2635     return SMESH_subMeshIteratorPtr
2636       ( new _Iterator( new SMDS_mapIterator<TMap>( me->DependsOn() ), prepend, append ));
2637   }
2638 }
2639
2640 //================================================================================
2641 /*!
2642  * \brief Returns ancestor sub-meshes. Finds them if not yet found.
2643  */
2644 //================================================================================
2645
2646 const std::vector< SMESH_subMesh * > & SMESH_subMesh::GetAncestors() const
2647 {
2648   if ( _ancestors.empty() &&
2649        !_subShape.IsSame( _father->GetShapeToMesh() ))
2650   {
2651     const TopTools_ListOfShape& ancShapes = _father->GetAncestors( _subShape );
2652
2653     SMESH_subMesh* me = const_cast< SMESH_subMesh* >( this );
2654     me->_ancestors.reserve( ancShapes.Extent() );
2655
2656     // assure that all sub-meshes exist
2657     TopoDS_Shape mainShape = _father->GetShapeToMesh();
2658     if ( !mainShape.IsNull() )
2659       _father->GetSubMesh( mainShape )->DependsOn();
2660
2661     TopTools_MapOfShape map;
2662
2663     for ( TopTools_ListIteratorOfListOfShape it( ancShapes ); it.More(); it.Next() )
2664       if ( SMESH_subMesh* sm = _father->GetSubMeshContaining( it.Value() ))
2665         if ( map.Add( it.Value() ))
2666           me->_ancestors.push_back( sm );
2667   }
2668
2669   return _ancestors;
2670 }
2671
2672 //================================================================================
2673 /*!
2674  * \brief Clears the vector of ancestor sub-meshes
2675  */
2676 //================================================================================
2677
2678 void SMESH_subMesh::ClearAncestors()
2679 {
2680   _ancestors.clear();
2681 }
2682
2683 //================================================================================
2684 /*!
2685  * \brief  Find common submeshes (based on shared sub-shapes with other
2686   * \param theOther submesh to check
2687   * \param theSetOfCommon set of common submesh
2688  */
2689 //================================================================================
2690
2691 bool SMESH_subMesh::FindIntersection(const SMESH_subMesh*            theOther,
2692                                      std::set<const SMESH_subMesh*>& theSetOfCommon ) const
2693 {
2694   size_t oldNb = theSetOfCommon.size();
2695
2696   // check main submeshes
2697   const map <int, SMESH_subMesh*>::const_iterator otherEnd = theOther->_mapDepend.end();
2698   if ( theOther->_mapDepend.find(this->GetId()) != otherEnd )
2699     theSetOfCommon.insert( this );
2700   if ( _mapDepend.find(theOther->GetId()) != _mapDepend.end() )
2701     theSetOfCommon.insert( theOther );
2702
2703   // check common submeshes
2704   map <int, SMESH_subMesh*>::const_iterator mapIt = _mapDepend.begin();
2705   for( ; mapIt != _mapDepend.end(); mapIt++ )
2706     if ( theOther->_mapDepend.find((*mapIt).first) != otherEnd )
2707       theSetOfCommon.insert( (*mapIt).second );
2708   return oldNb < theSetOfCommon.size();
2709 }