]> SALOME platform Git repositories - modules/smesh.git/blob - src/SMESH/SMESH_subMesh.cxx
Salome HOME
Rever incorrect integration!!! from 13.09.2009 into the V5_1_main
[modules/smesh.git] / src / SMESH / SMESH_subMesh.cxx
1 //  Copyright (C) 2007-2010  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 //  Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
5 //
6 //  This library is free software; you can redistribute it and/or
7 //  modify it under the terms of the GNU Lesser General Public
8 //  License as published by the Free Software Foundation; either
9 //  version 2.1 of the License.
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 : implementaion 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 "SMESH_Algo.hxx"
31 #include "SMESH_Gen.hxx"
32 #include "SMESH_HypoFilter.hxx"
33 #include "SMESH_Hypothesis.hxx"
34 #include "SMESH_Mesh.hxx"
35 #include "SMESH_MesherHelper.hxx"
36 #include "SMESH_subMeshEventListener.hxx"
37 #include "SMESH_Comment.hxx"
38 #include "SMDS_SetIterator.hxx"
39 #include "SMDSAbs_ElementType.hxx"
40
41 #include "utilities.h"
42 #include "OpUtil.hxx"
43 #include "Basics_Utils.hxx"
44
45 #include <BRep_Builder.hxx>
46 #include <BRep_Tool.hxx>
47 #include <TopExp.hxx>
48 #include <TopTools_IndexedMapOfShape.hxx>
49 #include <TopTools_ListIteratorOfListOfShape.hxx>
50 #include <TopoDS.hxx>
51 #include <TopoDS_Compound.hxx>
52 #include <gp_Pnt.hxx>
53 #include <TopExp_Explorer.hxx>
54 #include <TopoDS_Iterator.hxx>
55
56 #include <Standard_OutOfMemory.hxx>
57 #include <Standard_ErrorHandler.hxx>
58
59 #include <numeric>
60
61 using namespace std;
62
63 //=============================================================================
64 /*!
65  * \brief Allocate some memory at construction and release it at destruction.
66  * Is used to be able to continue working after mesh generation breaks due to
67  * lack of memory
68  */
69 //=============================================================================
70
71 struct MemoryReserve
72 {
73   char* myBuf;
74   MemoryReserve(): myBuf( new char[1024*1024*2] ){}
75   ~MemoryReserve() { delete [] myBuf; }
76 };
77
78 //=============================================================================
79 /*!
80  *  default constructor:
81  */
82 //=============================================================================
83
84 SMESH_subMesh::SMESH_subMesh(int                  Id,
85                              SMESH_Mesh *         father,
86                              SMESHDS_Mesh *       meshDS,
87                              const TopoDS_Shape & aSubShape)
88 {
89         _subShape = aSubShape;
90         _subMeshDS = meshDS->MeshElements(_subShape);   // may be null ...
91         _father = father;
92         _Id = Id;
93         _dependenceAnalysed = _alwaysComputed = false;
94
95         if (_subShape.ShapeType() == TopAbs_VERTEX)
96         {
97                 _algoState = HYP_OK;
98                 _computeState = READY_TO_COMPUTE;
99         }
100         else
101         {
102           _algoState = NO_ALGO;
103           _computeState = NOT_READY;
104         }
105 }
106
107 //=============================================================================
108 /*!
109  *
110  */
111 //=============================================================================
112
113 SMESH_subMesh::~SMESH_subMesh()
114 {
115   MESSAGE("SMESH_subMesh::~SMESH_subMesh");
116   // ****
117   DeleteOwnListeners();
118 }
119
120 //=============================================================================
121 /*!
122  *
123  */
124 //=============================================================================
125
126 int SMESH_subMesh::GetId() const
127 {
128   //MESSAGE("SMESH_subMesh::GetId");
129   return _Id;
130 }
131
132 //=============================================================================
133 /*!
134  *
135  */
136 //=============================================================================
137
138 SMESHDS_SubMesh * SMESH_subMesh::GetSubMeshDS()
139 {
140   // submesh appears in DS only when a mesher set nodes and elements on a shape
141   return _subMeshDS ? _subMeshDS : _subMeshDS = _father->GetMeshDS()->MeshElements(_subShape); // may be null
142 }
143
144 //=============================================================================
145 /*!
146  *
147  */
148 //=============================================================================
149
150 SMESHDS_SubMesh* SMESH_subMesh::CreateSubMeshDS()
151 {
152   if ( !GetSubMeshDS() ) {
153     SMESHDS_Mesh* meshDS = _father->GetMeshDS();
154     meshDS->NewSubMesh( meshDS->ShapeToIndex( _subShape ) );
155   }
156   return GetSubMeshDS();
157 }
158
159 //=============================================================================
160 /*!
161  *
162  */
163 //=============================================================================
164
165 SMESH_subMesh *SMESH_subMesh::GetFirstToCompute()
166 {
167   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(true,false);
168   while ( smIt->more() ) {
169     SMESH_subMesh *sm = smIt->next();
170     if ( sm->GetComputeState() == READY_TO_COMPUTE )
171       return sm;
172   }
173   return 0;                     // nothing to compute
174 }
175
176 //================================================================================
177 /*!
178  * \brief Allow algo->Compute() if a subshape of lower dim is meshed but
179  *        none mesh entity is bound to it (PAL13615, 2nd part)
180  */
181 //================================================================================
182
183 void SMESH_subMesh::SetIsAlwaysComputed(bool isAlCo)
184 {
185   _alwaysComputed = isAlCo;
186   if ( _alwaysComputed )
187     _computeState = COMPUTE_OK;
188   else
189     ComputeStateEngine( CHECK_COMPUTE_STATE );
190 }
191
192 //=======================================================================
193 /*!
194  * \brief Return true if no mesh entities is bound to the submesh
195  */
196 //=======================================================================
197
198 bool SMESH_subMesh::IsEmpty() const
199 {
200   if (SMESHDS_SubMesh * subMeshDS = ((SMESH_subMesh*)this)->GetSubMeshDS())
201     return (!subMeshDS->NbElements() && !subMeshDS->NbNodes());
202   return true;
203 }
204
205 //=======================================================================
206 //function : IsMeshComputed
207 //purpose  : check if _subMeshDS contains mesh elements
208 //=======================================================================
209
210 bool SMESH_subMesh::IsMeshComputed() const
211 {
212   if ( _alwaysComputed )
213     return true;
214   // algo may bind a submesh not to _subShape, eg 3D algo
215   // sets nodes on SHELL while _subShape may be SOLID
216
217   SMESHDS_Mesh* meshDS = _father->GetMeshDS();
218   int dim = SMESH_Gen::GetShapeDim( _subShape );
219   int type = _subShape.ShapeType();
220   for ( ; type <= TopAbs_VERTEX; type++) {
221     if ( dim == SMESH_Gen::GetShapeDim( (TopAbs_ShapeEnum) type ))
222     {
223       TopExp_Explorer exp( _subShape, (TopAbs_ShapeEnum) type );
224       for ( ; exp.More(); exp.Next() )
225       {
226         if ( SMESHDS_SubMesh * smDS = meshDS->MeshElements( exp.Current() ))
227         {
228           bool computed = (dim > 0) ? smDS->NbElements() : smDS->NbNodes();
229           if ( computed )
230             return true;
231         }
232       }
233     }
234     else
235       break;
236   }
237
238   return false;
239 }
240
241 //=============================================================================
242 /*!
243  *
244  */
245 //=============================================================================
246
247 bool SMESH_subMesh::SubMeshesComputed()
248 {
249   int myDim = SMESH_Gen::GetShapeDim( _subShape );
250   int dimToCheck = myDim - 1;
251   bool subMeshesComputed = true;
252   // check subMeshes with upper dimension => reverse iteration
253   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,true);
254   while ( smIt->more() )
255   {
256     SMESH_subMesh *sm = smIt->next();
257     if ( sm->_alwaysComputed )
258       continue;
259     const TopoDS_Shape & ss = sm->GetSubShape();
260     // MSV 07.04.2006: restrict checking to myDim-1 only. Ex., there is no sense
261     // in checking of existence of edges if the algo needs only faces. Moreover,
262     // degenerated edges may have no submesh, as after computing NETGEN_2D.
263     int dim = SMESH_Gen::GetShapeDim( ss );
264     if (dim < dimToCheck)
265       break; // the rest subMeshes are all of less dimension
266     SMESHDS_SubMesh * ds = sm->GetSubMeshDS();
267     bool computeOk = (sm->GetComputeState() == COMPUTE_OK ||
268                       (ds && ( dimToCheck ? ds->NbElements() : ds->NbNodes()  )));
269     if (!computeOk)
270     {
271       int type = ss.ShapeType();
272
273       subMeshesComputed = false;
274
275       switch (type)
276       {
277       case TopAbs_COMPOUND:
278         {
279           MESSAGE("The not computed sub mesh is a COMPOUND");
280           break;
281         }
282       case TopAbs_COMPSOLID:
283         {
284           MESSAGE("The not computed sub mesh is a COMPSOLID");
285           break;
286         }
287       case TopAbs_SHELL:
288         {
289           MESSAGE("The not computed sub mesh is a SHEL");
290           break;
291         }
292       case TopAbs_WIRE:
293         {
294           MESSAGE("The not computed sub mesh is a WIRE");
295           break;
296         }
297       case TopAbs_SOLID:
298         {
299           MESSAGE("The not computed sub mesh is a SOLID");
300           break;
301         }
302       case TopAbs_FACE:
303         {
304           MESSAGE("The not computed sub mesh is a FACE");
305           break;
306         }
307       case TopAbs_EDGE:
308         {
309           MESSAGE("The not computed sub mesh is a EDGE");
310           break;
311         }
312       default:
313         {
314           MESSAGE("The not computed sub mesh is of unknown type");
315           break;
316         }
317       }
318
319       break;
320     }
321   }
322   return subMeshesComputed;
323 }
324
325 //=============================================================================
326 /*!
327  *
328  */
329 //=============================================================================
330
331 bool SMESH_subMesh::SubMeshesReady()
332 {
333   bool subMeshesReady = true;
334   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,true);
335   while ( smIt->more() ) {
336     SMESH_subMesh *sm = smIt->next();
337     bool computeOk = (sm->GetComputeState() == COMPUTE_OK ||
338                       sm->GetComputeState() == READY_TO_COMPUTE);
339     if (!computeOk)
340     {
341       subMeshesReady = false;
342       SCRUTE(sm->GetId());
343       break;
344     }
345   }
346   return subMeshesReady;
347 }
348
349 //=============================================================================
350 /*!
351  * Construct dependence on first level subMeshes. complex shapes (compsolid,
352  * shell, wire) are not analysed the same way as simple shapes (solid, face,
353  * edge).
354  * For collection shapes (compsolid, shell, wire) prepare a list of submeshes
355  * with possible multiples occurences. Multiples occurences corresponds to
356  * internal frontiers within shapes of the collection and must not be keeped.
357  * See FinalizeDependence.
358  */
359 //=============================================================================
360
361 const map < int, SMESH_subMesh * >& SMESH_subMesh::DependsOn()
362 {
363   if (_dependenceAnalysed)
364     return _mapDepend;
365
366   //MESSAGE("SMESH_subMesh::DependsOn");
367
368   int type = _subShape.ShapeType();
369   //SCRUTE(type);
370   switch (type)
371   {
372   case TopAbs_COMPOUND:
373     {
374       //MESSAGE("compound");
375       for (TopExp_Explorer exp(_subShape, TopAbs_SOLID); exp.More();exp.Next())
376       {
377         InsertDependence(exp.Current());
378       }
379       for (TopExp_Explorer exp(_subShape, TopAbs_SHELL, TopAbs_SOLID); exp.More(); exp.Next())
380       {
381         if ( BRep_Tool::IsClosed(exp.Current() ))
382           InsertDependence(exp.Current());      //only shell not in solid
383         else
384           for (TopExp_Explorer expF(exp.Current(), TopAbs_FACE); expF.More();expF.Next())
385             InsertDependence(expF.Current());    // issue 0020959: HEXA_3D fails on shell
386
387       }
388       for (TopExp_Explorer exp(_subShape, TopAbs_FACE, TopAbs_SHELL); exp.More();exp.Next())
389       {
390         InsertDependence(exp.Current());
391       }
392       for (TopExp_Explorer exp(_subShape, TopAbs_EDGE, TopAbs_FACE); exp.More();exp.Next())
393       {
394         InsertDependence(exp.Current());
395       }
396       break;
397     }
398   case TopAbs_COMPSOLID:
399     {
400       //MESSAGE("compsolid");
401       for (TopExp_Explorer exp(_subShape, TopAbs_SOLID); exp.More(); exp.Next())
402       {
403         InsertDependence(exp.Current());
404       }
405       break;
406     }
407   case TopAbs_SHELL:
408     {
409       //MESSAGE("shell");
410       for (TopExp_Explorer exp(_subShape, TopAbs_FACE); exp.More(); exp.Next())
411       {
412         InsertDependence(exp.Current());
413       }
414       break;
415     }
416   case TopAbs_WIRE:
417     {
418       //MESSAGE("wire");
419       for (TopExp_Explorer exp(_subShape, TopAbs_EDGE); exp.More(); exp.Next())
420       {
421         InsertDependence(exp.Current());
422       }
423       break;
424     }
425   case TopAbs_SOLID:
426     {
427       //MESSAGE("solid");
428       if(_father->HasShapeToMesh()) {
429         for (TopExp_Explorer exp(_subShape, TopAbs_FACE); exp.More();exp.Next())
430         {
431           InsertDependence(exp.Current());
432         }
433       }
434       break;
435     }
436   case TopAbs_FACE:
437     {
438       //MESSAGE("face");
439       for (TopExp_Explorer exp(_subShape, TopAbs_EDGE); exp.More();exp.Next())
440       {
441         InsertDependence(exp.Current());
442       }
443       break;
444     }
445   case TopAbs_EDGE:
446     {
447       //MESSAGE("edge");
448       for (TopExp_Explorer exp(_subShape, TopAbs_VERTEX); exp.More(); exp.Next())
449       {
450         InsertDependence(exp.Current());
451       }
452       break;
453     }
454   case TopAbs_VERTEX:
455     {
456       break;
457     }
458   default:
459     {
460       break;
461     }
462   }
463   _dependenceAnalysed = true;
464   return _mapDepend;
465 }
466
467 //=============================================================================
468 /*!
469  * For simple Shapes (solid, face, edge): add subMesh into dependence list.
470  */
471 //=============================================================================
472
473 void SMESH_subMesh::InsertDependence(const TopoDS_Shape aSubShape)
474 {
475   //MESSAGE("SMESH_subMesh::InsertDependence");
476   SMESH_subMesh *aSubMesh = _father->GetSubMesh(aSubShape);
477   int type = aSubShape.ShapeType();
478   int ordType = 9 - type;               // 2 = Vertex, 8 = CompSolid
479   int cle = aSubMesh->GetId();
480   cle += 10000000 * ordType;    // sort map by ordType then index
481   if ( _mapDepend.find( cle ) == _mapDepend.end())
482   {
483     _mapDepend[cle] = aSubMesh;
484     const map < int, SMESH_subMesh * > & subMap = aSubMesh->DependsOn();
485     _mapDepend.insert( subMap.begin(), subMap.end() );
486   }
487 }
488
489 //=============================================================================
490 /*!
491  *
492  */
493 //=============================================================================
494
495 const TopoDS_Shape & SMESH_subMesh::GetSubShape() const
496 {
497         //MESSAGE("SMESH_subMesh::GetSubShape");
498         return _subShape;
499 }
500
501
502 //=======================================================================
503 //function : CanAddHypothesis
504 //purpose  : return true if theHypothesis can be attached to me:
505 //           its dimention is checked
506 //=======================================================================
507
508 bool SMESH_subMesh::CanAddHypothesis(const SMESH_Hypothesis* theHypothesis) const
509 {
510   int aHypDim   = theHypothesis->GetDim();
511   int aShapeDim = SMESH_Gen::GetShapeDim(_subShape);
512   if (aHypDim == 3 && aShapeDim == 3) {
513     // check case of open shell
514     //if (_subShape.ShapeType() == TopAbs_SHELL && !_subShape.Closed())
515     if (_subShape.ShapeType() == TopAbs_SHELL && !BRep_Tool::IsClosed(_subShape))
516       return false;
517   }
518   if ( aHypDim <= aShapeDim )
519     return true;
520
521   return false;
522 }
523
524 //=======================================================================
525 //function : IsApplicableHypotesis
526 //purpose  :
527 //=======================================================================
528
529 bool SMESH_subMesh::IsApplicableHypotesis(const SMESH_Hypothesis* theHypothesis,
530                                           const TopAbs_ShapeEnum  theShapeType)
531 {
532   if ( theHypothesis->GetType() > SMESHDS_Hypothesis::PARAM_ALGO)
533     // algorithm
534     return ( theHypothesis->GetShapeType() & (1<< theShapeType));
535
536   // hypothesis
537   switch ( theShapeType ) {
538   case TopAbs_VERTEX:
539   case TopAbs_EDGE:
540   case TopAbs_FACE:
541   case TopAbs_SOLID:
542     return SMESH_Gen::GetShapeDim( theShapeType ) == theHypothesis->GetDim();
543
544   case TopAbs_SHELL:
545     // Special case for algorithms, building 2D mesh on a whole shell.
546     // Before this fix there was a problem after restoring from study,
547     // because in that case algorithm is assigned before hypothesis
548     // (on shell in problem case) and hypothesis is checked on faces
549     // (because it is 2D), where we have NO_ALGO state.
550     // Now 2D hypothesis is also applicable to shells.
551     return (theHypothesis->GetDim() == 2 || theHypothesis->GetDim() == 3);
552
553 //   case TopAbs_WIRE:
554 //   case TopAbs_COMPSOLID:
555 //   case TopAbs_COMPOUND:
556   default:;
557   }
558   return false;
559 }
560
561 //=============================================================================
562 /*!
563  *
564  */
565 //=============================================================================
566
567 SMESH_Hypothesis::Hypothesis_Status
568   SMESH_subMesh::AlgoStateEngine(int event, SMESH_Hypothesis * anHyp)
569 {
570   //  MESSAGE("SMESH_subMesh::AlgoStateEngine");
571   //SCRUTE(_algoState);
572   //SCRUTE(event);
573
574   // **** les retour des evenement shape sont significatifs
575   // (add ou remove fait ou non)
576   // le retour des evenement father n'indiquent pas que add ou remove fait
577
578   SMESH_Hypothesis::Hypothesis_Status aux_ret, ret = SMESH_Hypothesis::HYP_OK;
579
580   SMESHDS_Mesh* meshDS =_father->GetMeshDS();
581   SMESH_Gen*    gen    =_father->GetGen();
582   SMESH_Algo*   algo   = 0;
583
584   if (_subShape.ShapeType() == TopAbs_VERTEX )
585   {
586     if ( anHyp->GetDim() != 0) {
587       if (event == ADD_HYP || event == ADD_ALGO)
588         return SMESH_Hypothesis::HYP_BAD_DIM;
589       else
590         return SMESH_Hypothesis::HYP_OK;
591     }
592     // 0D hypothesis
593     else if ( _algoState == HYP_OK ) {
594       // update default _algoState
595       if ( event != REMOVE_FATHER_ALGO )
596       {
597         _algoState = NO_ALGO;
598         algo = gen->GetAlgo(*_father, _subShape);
599         if ( algo ) {
600           _algoState = MISSING_HYP;
601           if ( event == REMOVE_FATHER_HYP ||
602                algo->CheckHypothesis(*_father,_subShape, aux_ret))
603             _algoState = HYP_OK;
604         }
605       }
606     }
607   }
608
609   int oldAlgoState = _algoState;
610   bool modifiedHyp = (event == MODIF_HYP);  // if set to true, force event MODIF_ALGO_STATE
611   bool needFullClean = false;
612
613   bool isApplicableHyp = IsApplicableHypotesis( anHyp );
614
615   if (event == ADD_ALGO || event == ADD_FATHER_ALGO)
616   {
617     // -------------------------------------------
618     // check if a shape needed by algo is present
619     // -------------------------------------------
620     algo = static_cast< SMESH_Algo* >( anHyp );
621     if ( !_father->HasShapeToMesh() && algo->NeedShape() )
622       return SMESH_Hypothesis::HYP_NEED_SHAPE;
623     // ----------------------
624     // check mesh conformity
625     // ----------------------
626     if (isApplicableHyp && !_father->IsNotConformAllowed() && !IsConform( algo ))
627       return SMESH_Hypothesis::HYP_NOTCONFORM;
628
629     // check if all-dimensional algo is hidden by other local one
630     if ( event == ADD_ALGO ) {
631       SMESH_HypoFilter filter( SMESH_HypoFilter::HasType( algo->GetType() ));
632       filter.Or( SMESH_HypoFilter::HasType( algo->GetType()+1 ));
633       filter.Or( SMESH_HypoFilter::HasType( algo->GetType()+2 ));
634       if ( SMESH_Algo * curAlgo = (SMESH_Algo*) _father->GetHypothesis( _subShape, filter, true ))
635         needFullClean = ( !curAlgo->NeedDescretBoundary() );
636     }
637   }
638
639   // ----------------------------------
640   // add a hypothesis to DS if possible
641   // ----------------------------------
642   if (event == ADD_HYP || event == ADD_ALGO)
643   {
644     if ( ! CanAddHypothesis( anHyp )) // check dimension
645       return SMESH_Hypothesis::HYP_BAD_DIM;
646
647     if ( /*!anHyp->IsAuxiliary() &&*/ GetSimilarAttached( _subShape, anHyp ) )
648       return SMESH_Hypothesis::HYP_ALREADY_EXIST;
649
650     if ( !meshDS->AddHypothesis(_subShape, anHyp))
651       return SMESH_Hypothesis::HYP_ALREADY_EXIST;
652   }
653
654   // --------------------------
655   // remove a hypothesis from DS
656   // --------------------------
657   if (event == REMOVE_HYP || event == REMOVE_ALGO)
658   {
659     if (!meshDS->RemoveHypothesis(_subShape, anHyp))
660       return SMESH_Hypothesis::HYP_OK; // nothing changes
661
662     if (event == REMOVE_ALGO)
663     {
664       algo = dynamic_cast<SMESH_Algo*> (anHyp);
665       if (!algo->NeedDescretBoundary())
666       {
667         // clean all mesh in the tree of the current submesh;
668         // we must perform it now because later
669         // we will have no information about the type of the removed algo
670         needFullClean = true;
671       }
672     }
673   }
674
675   // ------------------
676   // analyse algo state
677   // ------------------
678   if (!isApplicableHyp)
679     return ret; // not applicable hypotheses do not change algo state
680
681   switch (_algoState)
682   {
683
684     // ----------------------------------------------------------------------
685
686   case NO_ALGO:
687     switch (event) {
688     case ADD_HYP:
689       break;
690     case ADD_ALGO: {
691       algo = gen->GetAlgo((*_father), _subShape);
692       ASSERT(algo);
693       if (algo->CheckHypothesis((*_father),_subShape, aux_ret))
694         SetAlgoState(HYP_OK);
695       else if ( algo->IsStatusFatal( aux_ret )) {
696         meshDS->RemoveHypothesis(_subShape, anHyp);
697         ret = aux_ret;
698       }
699       else
700         SetAlgoState(MISSING_HYP);
701       break;
702     }
703     case REMOVE_HYP:
704     case REMOVE_ALGO:
705     case ADD_FATHER_HYP:
706       break;
707     case ADD_FATHER_ALGO: {    // Algo just added in father
708       algo = gen->GetAlgo((*_father), _subShape);
709       ASSERT(algo);
710       if ( algo == anHyp ) {
711         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret))
712           SetAlgoState(HYP_OK);
713         else
714           SetAlgoState(MISSING_HYP);
715       }
716       break;
717     }
718     case REMOVE_FATHER_HYP:
719       break;
720     case REMOVE_FATHER_ALGO: {
721       algo = gen->GetAlgo((*_father), _subShape);
722       if (algo)
723       {
724         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
725             SetAlgoState(HYP_OK);
726         else
727           SetAlgoState(MISSING_HYP);
728       }
729       break;
730     }
731     case MODIF_HYP: break;
732     default:
733       ASSERT(0);
734       break;
735     }
736     break;
737
738     // ----------------------------------------------------------------------
739
740   case MISSING_HYP:
741     switch (event)
742     {
743     case ADD_HYP: {
744       algo = gen->GetAlgo((*_father), _subShape);
745       ASSERT(algo);
746       if ( algo->CheckHypothesis((*_father),_subShape, ret ))
747         SetAlgoState(HYP_OK);
748       if (SMESH_Hypothesis::IsStatusFatal( ret ))
749         meshDS->RemoveHypothesis(_subShape, anHyp);
750       else if (!_father->IsUsedHypothesis( anHyp, this ))
751       {
752         meshDS->RemoveHypothesis(_subShape, anHyp);
753         ret = SMESH_Hypothesis::HYP_INCOMPATIBLE;
754       }
755       break;
756     }
757     case ADD_ALGO: {           //already existing algo : on father ?
758       algo = gen->GetAlgo((*_father), _subShape);
759       ASSERT(algo);
760       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))// ignore hyp status
761         SetAlgoState(HYP_OK);
762       else if ( algo->IsStatusFatal( aux_ret )) {
763         meshDS->RemoveHypothesis(_subShape, anHyp);
764         ret = aux_ret;
765       }
766       else
767         SetAlgoState(MISSING_HYP);
768       break;
769     }
770     case REMOVE_HYP:
771       break;
772     case REMOVE_ALGO: {        // perhaps a father algo applies ?
773       algo = gen->GetAlgo((*_father), _subShape);
774       if (algo == NULL)  // no more algo applying on subShape...
775       {
776         SetAlgoState(NO_ALGO);
777       }
778       else
779       {
780         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
781           SetAlgoState(HYP_OK);
782         else
783           SetAlgoState(MISSING_HYP);
784       }
785       break;
786     }
787     case MODIF_HYP: // assigned hypothesis value may become good
788     case ADD_FATHER_HYP: {
789       algo = gen->GetAlgo((*_father), _subShape);
790       ASSERT(algo);
791       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
792         SetAlgoState(HYP_OK);
793       else
794         SetAlgoState(MISSING_HYP);
795       break;
796     }
797     case ADD_FATHER_ALGO: { // new father algo
798       algo = gen->GetAlgo((*_father), _subShape);
799       ASSERT( algo );
800       if ( algo == anHyp ) {
801         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
802           SetAlgoState(HYP_OK);
803         else
804           SetAlgoState(MISSING_HYP);
805       }
806       break;
807     }
808     case REMOVE_FATHER_HYP:    // nothing to do
809       break;
810     case REMOVE_FATHER_ALGO: {
811       algo = gen->GetAlgo((*_father), _subShape);
812       if (algo == NULL)  // no more applying algo on father
813       {
814         SetAlgoState(NO_ALGO);
815       }
816       else
817       {
818         if ( algo->CheckHypothesis((*_father),_subShape , aux_ret ))
819           SetAlgoState(HYP_OK);
820         else
821           SetAlgoState(MISSING_HYP);
822       }
823       break;
824     }
825     default:
826       ASSERT(0);
827       break;
828     }
829     break;
830
831     // ----------------------------------------------------------------------
832
833   case HYP_OK:
834     switch (event)
835     {
836     case ADD_HYP: {
837       algo = gen->GetAlgo((*_father), _subShape);
838       ASSERT(algo);
839       if (!algo->CheckHypothesis((*_father),_subShape, ret ))
840       {
841         if ( !SMESH_Hypothesis::IsStatusFatal( ret ))
842           // ret should be fatal: anHyp was not added
843           ret = SMESH_Hypothesis::HYP_INCOMPATIBLE;
844       }
845       else if (!_father->IsUsedHypothesis(  anHyp, this ))
846         ret = SMESH_Hypothesis::HYP_INCOMPATIBLE;
847
848       if (SMESH_Hypothesis::IsStatusFatal( ret ))
849       {
850         MESSAGE("do not add extra hypothesis");
851         meshDS->RemoveHypothesis(_subShape, anHyp);
852       }
853       else
854       {
855         modifiedHyp = true;
856       }
857       break;
858     }
859     case ADD_ALGO: {           //already existing algo : on father ?
860       algo = gen->GetAlgo((*_father), _subShape);
861       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
862         // check if algo changes
863         SMESH_HypoFilter f;
864         f.Init(   SMESH_HypoFilter::IsAlgo() );
865         f.And(    SMESH_HypoFilter::IsApplicableTo( _subShape ));
866         f.AndNot( SMESH_HypoFilter::Is( algo ));
867         const SMESH_Hypothesis * prevAlgo = _father->GetHypothesis( _subShape, f, true );
868         if (prevAlgo &&
869             string(algo->GetName()) != string(prevAlgo->GetName()) )
870           modifiedHyp = true;
871       }
872       else
873         SetAlgoState(MISSING_HYP);
874       break;
875     }
876     case REMOVE_HYP: {
877       algo = gen->GetAlgo((*_father), _subShape);
878       ASSERT(algo);
879       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
880         SetAlgoState(HYP_OK);
881       else
882         SetAlgoState(MISSING_HYP);
883       modifiedHyp = true;
884       break;
885     }
886     case REMOVE_ALGO: {         // perhaps a father algo applies ?
887       algo = gen->GetAlgo((*_father), _subShape);
888       if (algo == NULL)   // no more algo applying on subShape...
889       {
890         SetAlgoState(NO_ALGO);
891       }
892       else
893       {
894         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
895           // check if algo remains
896           if ( anHyp != algo && strcmp( anHyp->GetName(), algo->GetName()) )
897             modifiedHyp = true;
898         }
899         else
900           SetAlgoState(MISSING_HYP);
901       }
902       break;
903     }
904     case MODIF_HYP: // hypothesis value may become bad
905     case ADD_FATHER_HYP: {  // new father hypothesis ?
906       algo = gen->GetAlgo((*_father), _subShape);
907       ASSERT(algo);
908       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret ))
909       {
910         if (_father->IsUsedHypothesis( anHyp, this )) // new Hyp
911           modifiedHyp = true;
912       }
913       else
914         SetAlgoState(MISSING_HYP);
915       break;
916     }
917     case ADD_FATHER_ALGO: {
918       algo = gen->GetAlgo((*_father), _subShape);
919       if ( algo == anHyp ) { // a new algo on father
920         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
921           // check if algo changes
922           SMESH_HypoFilter f;
923           f.Init(   SMESH_HypoFilter::IsAlgo() );
924           f.And(    SMESH_HypoFilter::IsApplicableTo( _subShape ));
925           f.AndNot( SMESH_HypoFilter::Is( algo ));
926           const SMESH_Hypothesis* prevAlgo = _father->GetHypothesis( _subShape, f, true );
927           if (prevAlgo &&
928               string(algo->GetName()) != string(prevAlgo->GetName()) )
929             modifiedHyp = true;
930         }
931         else
932           SetAlgoState(MISSING_HYP);
933       }
934       break;
935     }
936     case REMOVE_FATHER_HYP: {
937       algo = gen->GetAlgo((*_father), _subShape);
938       ASSERT(algo);
939       if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
940         // is there the same local hyp or maybe a new father algo applied?
941         if ( !GetSimilarAttached( _subShape, anHyp ) )
942           modifiedHyp = true;
943       }
944       else
945         SetAlgoState(MISSING_HYP);
946       break;
947     }
948     case REMOVE_FATHER_ALGO: {
949       // IPAL21346. Edges not removed when Netgen 1d-2d is removed from a SOLID.
950       // CLEAN was not called at event REMOVE_ALGO because the algo is not applicable to SOLID.
951       algo = dynamic_cast<SMESH_Algo*> (anHyp);
952       if (!algo->NeedDescretBoundary())
953         needFullClean = true;
954
955       algo = gen->GetAlgo((*_father), _subShape);
956       if (algo == NULL)  // no more applying algo on father
957       {
958         SetAlgoState(NO_ALGO);
959       }
960       else
961       {
962         if ( algo->CheckHypothesis((*_father),_subShape, aux_ret )) {
963           // check if algo changes
964           if ( string(algo->GetName()) != string( anHyp->GetName()) )
965             modifiedHyp = true;
966         }
967         else
968           SetAlgoState(MISSING_HYP);
969       }
970       break;
971     }
972     default:
973       ASSERT(0);
974       break;
975     }
976     break;
977
978     // ----------------------------------------------------------------------
979
980   default:
981     ASSERT(0);
982     break;
983   }
984
985   // detect algorithm hiding
986   //
987   if ( ret == SMESH_Hypothesis::HYP_OK &&
988        ( event == ADD_ALGO || event == ADD_FATHER_ALGO ) &&
989        algo->GetName() == anHyp->GetName() )
990   {
991     // is algo hidden?
992     SMESH_Gen* gen = _father->GetGen();
993     TopTools_ListIteratorOfListOfShape it( _father->GetAncestors( _subShape ));
994     for ( ; ( ret == SMESH_Hypothesis::HYP_OK && it.More()); it.Next() ) {
995       if ( SMESH_Algo* upperAlgo = gen->GetAlgo( *_father, it.Value() ))
996         if ( !upperAlgo->NeedDescretBoundary() && !upperAlgo->SupportSubmeshes())
997           ret = SMESH_Hypothesis::HYP_HIDDEN_ALGO;
998     }
999     // is algo hiding?
1000     if ( ret == SMESH_Hypothesis::HYP_OK &&
1001          !algo->NeedDescretBoundary()    &&
1002          !algo->SupportSubmeshes()) {
1003       map<int, SMESH_subMesh*>::reverse_iterator i_sm = _mapDepend.rbegin();
1004       for ( ; ( ret == SMESH_Hypothesis::HYP_OK && i_sm != _mapDepend.rend()) ; ++i_sm )
1005         if ( gen->GetAlgo( *_father, i_sm->second->_subShape ))
1006           ret = SMESH_Hypothesis::HYP_HIDING_ALGO;
1007     }
1008   }
1009
1010   bool stateChange = ( _algoState != oldAlgoState );
1011
1012   if ( stateChange && _algoState == HYP_OK ) // hyp becomes OK
1013     algo->SetEventListener( this );
1014
1015   NotifyListenersOnEvent( event, ALGO_EVENT, anHyp );
1016
1017   if ( stateChange && oldAlgoState == HYP_OK ) { // hyp becomes KO
1018     DeleteOwnListeners();
1019     SetIsAlwaysComputed( false );
1020     if (_subShape.ShapeType() == TopAbs_VERTEX ) {
1021       // restore default states
1022       _algoState = HYP_OK;
1023       _computeState = READY_TO_COMPUTE;
1024     }
1025   }
1026
1027   if ( needFullClean ) {
1028     // added or removed algo is all-dimensional
1029     ComputeStateEngine( CLEAN );
1030     CleanDependsOn();
1031     ComputeSubMeshStateEngine( CHECK_COMPUTE_STATE );
1032   }
1033
1034   if (stateChange || modifiedHyp)
1035     ComputeStateEngine(MODIF_ALGO_STATE);
1036
1037   return ret;
1038 }
1039
1040 //=======================================================================
1041 //function : IsConform
1042 //purpose  : check if a conform mesh will be produced by the Algo
1043 //=======================================================================
1044
1045 bool SMESH_subMesh::IsConform(const SMESH_Algo* theAlgo)
1046 {
1047 //  MESSAGE( "SMESH_subMesh::IsConform" );
1048   if ( !theAlgo ) return false;
1049
1050   // Suppose that theAlgo is applicable to _subShape, do not check it here
1051   //if ( !IsApplicableHypotesis( theAlgo )) return false;
1052
1053   // check only algo that doesn't NeedDescretBoundary(): because mesh made
1054   // on a sub-shape will be ignored by theAlgo
1055   if ( theAlgo->NeedDescretBoundary() ||
1056        !theAlgo->OnlyUnaryInput() ) // all adjacent shapes will be meshed by this algo?
1057     return true;
1058
1059   SMESH_Gen* gen =_father->GetGen();
1060
1061   // only local algo is to be checked
1062   //if ( gen->IsGlobalHypothesis( theAlgo, *_father ))
1063   if ( _subShape.ShapeType() == _father->GetMeshDS()->ShapeToMesh().ShapeType() )
1064     return true;
1065
1066   // check algo attached to adjacent shapes
1067
1068   // loop on one level down sub-meshes
1069   TopoDS_Iterator itsub( _subShape );
1070   for (; itsub.More(); itsub.Next())
1071   {
1072     // loop on adjacent subShapes
1073     TopTools_ListIteratorOfListOfShape it( _father->GetAncestors( itsub.Value() ));
1074     for (; it.More(); it.Next())
1075     {
1076       const TopoDS_Shape& adjacent = it.Value();
1077       if ( _subShape.IsSame( adjacent )) continue;
1078       if ( adjacent.ShapeType() != _subShape.ShapeType())
1079         break;
1080
1081       // check algo attached to smAdjacent
1082       SMESH_Algo * algo = gen->GetAlgo((*_father), adjacent);
1083       if (algo &&
1084           !algo->NeedDescretBoundary() &&
1085           algo->OnlyUnaryInput())
1086         return false; // NOT CONFORM MESH WILL BE PRODUCED
1087     }
1088   }
1089
1090   return true;
1091 }
1092
1093 //=============================================================================
1094 /*!
1095  *
1096  */
1097 //=============================================================================
1098
1099 void SMESH_subMesh::SetAlgoState(int state)
1100 {
1101   _algoState = state;
1102 }
1103
1104 //=============================================================================
1105 /*!
1106  *
1107  */
1108 //=============================================================================
1109 SMESH_Hypothesis::Hypothesis_Status
1110   SMESH_subMesh::SubMeshesAlgoStateEngine(int event,
1111                                           SMESH_Hypothesis * anHyp)
1112 {
1113   SMESH_Hypothesis::Hypothesis_Status ret = SMESH_Hypothesis::HYP_OK;
1114   //EAP: a wire (dim==1) should notify edges (dim==1)
1115   //EAP: int dim = SMESH_Gen::GetShapeDim(_subShape);
1116   //if (_subShape.ShapeType() < TopAbs_EDGE ) // wire,face etc
1117   {
1118     SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,false);
1119     while ( smIt->more() ) {
1120       SMESH_Hypothesis::Hypothesis_Status ret2 =
1121         smIt->next()->AlgoStateEngine(event, anHyp);
1122       if ( ret2 > ret )
1123         ret = ret2;
1124     }
1125   }
1126   return ret;
1127 }
1128
1129 //=============================================================================
1130 /*!
1131  *
1132  */
1133 //=============================================================================
1134
1135 void SMESH_subMesh::CleanDependsOn()
1136 {
1137   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,false);
1138   while ( smIt->more() )
1139     smIt->next()->ComputeStateEngine(CLEAN);
1140 }
1141
1142 //=============================================================================
1143 /*!
1144  *
1145  */
1146 //=============================================================================
1147
1148 void SMESH_subMesh::DumpAlgoState(bool isMain)
1149 {
1150         int dim = SMESH_Gen::GetShapeDim(_subShape);
1151 //   if (dim < 1) return;
1152         if (isMain)
1153         {
1154                 const map < int, SMESH_subMesh * >&subMeshes = DependsOn();
1155
1156                 map < int, SMESH_subMesh * >::const_iterator itsub;
1157                 for (itsub = subMeshes.begin(); itsub != subMeshes.end(); itsub++)
1158                 {
1159                         SMESH_subMesh *sm = (*itsub).second;
1160                         sm->DumpAlgoState(false);
1161                 }
1162         }
1163         int type = _subShape.ShapeType();
1164         MESSAGE("dim = " << dim << " type of shape " << type);
1165         switch (_algoState)
1166         {
1167         case NO_ALGO:
1168                 MESSAGE(" AlgoState = NO_ALGO");
1169                 break;
1170         case MISSING_HYP:
1171                 MESSAGE(" AlgoState = MISSING_HYP");
1172                 break;
1173         case HYP_OK:
1174                 MESSAGE(" AlgoState = HYP_OK");
1175                 break;
1176         }
1177         switch (_computeState)
1178         {
1179         case NOT_READY:
1180                 MESSAGE(" ComputeState = NOT_READY");
1181                 break;
1182         case READY_TO_COMPUTE:
1183                 MESSAGE(" ComputeState = READY_TO_COMPUTE");
1184                 break;
1185         case COMPUTE_OK:
1186                 MESSAGE(" ComputeState = COMPUTE_OK");
1187                 break;
1188         case FAILED_TO_COMPUTE:
1189                 MESSAGE(" ComputeState = FAILED_TO_COMPUTE");
1190                 break;
1191         }
1192 }
1193
1194 //================================================================================
1195 /*!
1196  * \brief Remove nodes and elements bound to submesh
1197   * \param subMesh - submesh containing nodes and elements
1198  */
1199 //================================================================================
1200
1201 static void cleanSubMesh( SMESH_subMesh * subMesh )
1202 {
1203   if (subMesh) {
1204     if (SMESHDS_SubMesh * subMeshDS = subMesh->GetSubMeshDS()) {
1205       SMESHDS_Mesh * meshDS = subMesh->GetFather()->GetMeshDS();
1206       SMDS_ElemIteratorPtr ite = subMeshDS->GetElements();
1207       while (ite->more()) {
1208         const SMDS_MeshElement * elt = ite->next();
1209         //MESSAGE( " RM elt: "<<elt->GetID()<<" ( "<<elt->NbNodes()<<" )" );
1210         //meshDS->RemoveElement(elt);
1211         meshDS->RemoveFreeElement(elt, subMeshDS);
1212       }
1213
1214       SMDS_NodeIteratorPtr itn = subMeshDS->GetNodes();
1215       while (itn->more()) {
1216         const SMDS_MeshNode * node = itn->next();
1217         //MESSAGE( " RM node: "<<node->GetID());
1218         if ( node->NbInverseElements() == 0 )
1219           meshDS->RemoveFreeNode(node, subMeshDS);
1220         else // for StdMeshers_CompositeSegment_1D: node in one submesh, edge in another
1221           meshDS->RemoveNode(node);
1222       }
1223     }
1224   }
1225 }
1226
1227 //=============================================================================
1228 /*!
1229  *
1230  */
1231 //=============================================================================
1232
1233 bool SMESH_subMesh::ComputeStateEngine(int event)
1234 {
1235   _computeError.reset();
1236
1237   //MESSAGE("SMESH_subMesh::ComputeStateEngine");
1238   //SCRUTE(_computeState);
1239   //SCRUTE(event);
1240
1241   if (_subShape.ShapeType() == TopAbs_VERTEX)
1242   {
1243     _computeState = READY_TO_COMPUTE;
1244     SMESHDS_SubMesh* smDS = GetSubMeshDS();
1245     if ( smDS && smDS->NbNodes() ) {
1246       if ( event == CLEAN ) {
1247         CleanDependants();
1248         cleanSubMesh( this );
1249       }
1250       else
1251         _computeState = COMPUTE_OK;
1252     }
1253     else if ( event == COMPUTE && !_alwaysComputed ) {
1254       const TopoDS_Vertex & V = TopoDS::Vertex( _subShape );
1255       gp_Pnt P = BRep_Tool::Pnt(V);
1256       if ( SMDS_MeshNode * n = _father->GetMeshDS()->AddNode(P.X(), P.Y(), P.Z()) ) {
1257         _father->GetMeshDS()->SetNodeOnVertex(n,_Id);
1258         _computeState = COMPUTE_OK;
1259       }
1260     }
1261     if ( event == MODIF_ALGO_STATE )
1262       CleanDependants();
1263     return true;
1264   }
1265   SMESH_Gen *gen = _father->GetGen();
1266   SMESH_Algo *algo = 0;
1267   bool ret = true;
1268   SMESH_Hypothesis::Hypothesis_Status hyp_status;
1269   //algo_state oldAlgoState = (algo_state) GetAlgoState();
1270
1271   switch (_computeState)
1272   {
1273
1274     // ----------------------------------------------------------------------
1275
1276   case NOT_READY:
1277     switch (event)
1278     {
1279     case MODIF_ALGO_STATE:
1280       algo = gen->GetAlgo((*_father), _subShape);
1281       if (algo && !algo->NeedDescretBoundary())
1282         CleanDependsOn(); // clean sub-meshes with event CLEAN
1283       if ( _algoState == HYP_OK )
1284         _computeState = READY_TO_COMPUTE;
1285       break;
1286     case COMPUTE:               // nothing to do
1287       break;
1288     case CLEAN:
1289       CleanDependants();
1290       RemoveSubMeshElementsAndNodes();
1291       break;
1292     case SUBMESH_COMPUTED:      // nothing to do
1293       break;
1294     case SUBMESH_RESTORED:
1295       ComputeSubMeshStateEngine( SUBMESH_RESTORED );
1296       break;
1297     case MESH_ENTITY_REMOVED:
1298       break;
1299     case CHECK_COMPUTE_STATE:
1300       if ( IsMeshComputed() )
1301         _computeState = COMPUTE_OK;
1302       break;
1303     default:
1304       ASSERT(0);
1305       break;
1306     }
1307     break;
1308
1309     // ----------------------------------------------------------------------
1310
1311   case READY_TO_COMPUTE:
1312     switch (event)
1313     {
1314     case MODIF_ALGO_STATE:
1315       _computeState = NOT_READY;
1316       algo = gen->GetAlgo((*_father), _subShape);
1317       if (algo)
1318       {
1319         if (!algo->NeedDescretBoundary())
1320           CleanDependsOn(); // clean sub-meshes with event CLEAN
1321         if ( _algoState == HYP_OK )
1322           _computeState = READY_TO_COMPUTE;
1323       }
1324       break;
1325     case COMPUTE:
1326       {
1327         algo = gen->GetAlgo((*_father), _subShape);
1328         ASSERT(algo);
1329         ret = algo->CheckHypothesis((*_father), _subShape, hyp_status);
1330         if (!ret)
1331         {
1332           MESSAGE("***** verify compute state *****");
1333           _computeState = NOT_READY;
1334           SetAlgoState(MISSING_HYP);
1335           break;
1336         }
1337         TopoDS_Shape shape = _subShape;
1338         // check submeshes needed
1339         if (_father->HasShapeToMesh() ) {
1340           bool subComputed = false;
1341           if (!algo->OnlyUnaryInput())
1342             shape = GetCollection( gen, algo, subComputed );
1343           else
1344             subComputed = SubMeshesComputed();
1345           ret = ( algo->NeedDescretBoundary() ? subComputed :
1346                   algo->SupportSubmeshes() ? true :
1347                   ( !subComputed || _father->IsNotConformAllowed() ));
1348           if (!ret) {
1349             _computeState = FAILED_TO_COMPUTE;
1350             if ( !algo->NeedDescretBoundary() )
1351               _computeError =
1352                 SMESH_ComputeError::New(COMPERR_BAD_INPUT_MESH,
1353                                         "Unexpected computed submesh",algo);
1354             break;
1355           }
1356         }
1357         // compute
1358 //         CleanDependants(); for "UseExisting_*D" algos
1359 //         RemoveSubMeshElementsAndNodes();
1360         ret = false;
1361         _computeState = FAILED_TO_COMPUTE;
1362         _computeError = SMESH_ComputeError::New(COMPERR_OK,"",algo);
1363         try {
1364 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1365           OCC_CATCH_SIGNALS;
1366 #endif
1367           algo->InitComputeError();
1368           MemoryReserve aMemoryReserve;
1369           SMDS_Mesh::CheckMemory();
1370           Kernel_Utils::Localizer loc;
1371           if ( !_father->HasShapeToMesh() ) // no shape
1372           {
1373             SMESH_MesherHelper helper( *_father );
1374             helper.SetSubShape( shape );
1375             helper.SetElementsOnShape( true );
1376             ret = algo->Compute(*_father, &helper );
1377           }
1378           else
1379           {
1380             ret = algo->Compute((*_father), shape);
1381           }
1382           if ( !_computeError || ( !ret && _computeError->IsOK() ) ) // algo can set _computeError of submesh
1383             _computeError = algo->GetComputeError();
1384         }
1385         catch ( std::bad_alloc& exc ) {
1386           MESSAGE("std::bad_alloc thrown inside algo->Compute()");
1387           if ( _computeError ) {
1388             _computeError->myName = COMPERR_MEMORY_PB;
1389             //_computeError->myComment = exc.what();
1390           }
1391           cleanSubMesh( this );
1392           throw exc;
1393         }
1394         catch ( Standard_OutOfMemory& exc ) {
1395           MESSAGE("Standard_OutOfMemory thrown inside algo->Compute()");
1396           if ( _computeError ) {
1397             _computeError->myName = COMPERR_MEMORY_PB;
1398             //_computeError->myComment = exc.what();
1399           }
1400           cleanSubMesh( this );
1401           throw std::bad_alloc();
1402         }
1403         catch (Standard_Failure& ex) {
1404           if ( !_computeError ) _computeError = SMESH_ComputeError::New();
1405           _computeError->myName    = COMPERR_OCC_EXCEPTION;
1406           _computeError->myComment += ex.DynamicType()->Name();
1407           if ( ex.GetMessageString() && strlen( ex.GetMessageString() )) {
1408             _computeError->myComment += ": ";
1409             _computeError->myComment += ex.GetMessageString();
1410           }
1411         }
1412         catch ( SALOME_Exception& S_ex ) {
1413           if ( !_computeError ) _computeError = SMESH_ComputeError::New();
1414           _computeError->myName    = COMPERR_SLM_EXCEPTION;
1415           _computeError->myComment = S_ex.what();
1416         }
1417         catch ( std::exception& exc ) {
1418           if ( !_computeError ) _computeError = SMESH_ComputeError::New();
1419           _computeError->myName    = COMPERR_STD_EXCEPTION;
1420           _computeError->myComment = exc.what();
1421         }
1422         catch ( ... ) {
1423           if ( _computeError )
1424             _computeError->myName = COMPERR_EXCEPTION;
1425           else
1426             ret = false;
1427         }
1428         TopExp_Explorer subS(shape, _subShape.ShapeType());
1429         if (ret) // check if anything was built
1430         {
1431           for (; ret && subS.More(); subS.Next())
1432             ret = _father->GetSubMesh( subS.Current() )->IsMeshComputed();
1433         }
1434         bool isComputeErrorSet = !CheckComputeError( algo, shape );
1435         if (!ret && !isComputeErrorSet)
1436         {
1437           // Set _computeError
1438           for (subS.ReInit(); subS.More(); subS.Next())
1439           {
1440             SMESH_subMesh* sm = _father->GetSubMesh( subS.Current() );
1441             if ( !sm->IsMeshComputed() )
1442             {
1443               if ( !sm->_computeError )
1444                 sm->_computeError = SMESH_ComputeError::New();
1445               if ( sm->_computeError->IsOK() )
1446                 sm->_computeError->myName = COMPERR_ALGO_FAILED;
1447               sm->_computeState = FAILED_TO_COMPUTE;
1448               sm->_computeError->myAlgo = algo;
1449             }
1450           }
1451         }
1452         if (ret)
1453         {
1454           _computeError.reset();
1455         }
1456         UpdateDependantsState( SUBMESH_COMPUTED ); // send event SUBMESH_COMPUTED
1457       }
1458       break;
1459     case CLEAN:
1460       CleanDependants();
1461       RemoveSubMeshElementsAndNodes();
1462       _computeState = NOT_READY;
1463       algo = gen->GetAlgo((*_father), _subShape);
1464       if (algo)
1465       {
1466         ret = algo->CheckHypothesis((*_father), _subShape, hyp_status);
1467         if (ret)
1468           _computeState = READY_TO_COMPUTE;
1469         else
1470           SetAlgoState(MISSING_HYP);
1471       }
1472       break;
1473     case SUBMESH_COMPUTED:      // nothing to do
1474       break;
1475     case SUBMESH_RESTORED:
1476       // check if a mesh is already computed that may
1477       // happen after retrieval from a file
1478       ComputeStateEngine( CHECK_COMPUTE_STATE );
1479       ComputeSubMeshStateEngine( SUBMESH_RESTORED );
1480       algo = gen->GetAlgo(*_father, _subShape);
1481       if (algo) algo->SubmeshRestored( this );
1482       break;
1483     case MESH_ENTITY_REMOVED:
1484       break;
1485     case CHECK_COMPUTE_STATE:
1486       if ( IsMeshComputed() )
1487         _computeState = COMPUTE_OK;
1488       break;
1489     default:
1490       ASSERT(0);
1491       break;
1492     }
1493     break;
1494
1495     // ----------------------------------------------------------------------
1496
1497   case COMPUTE_OK:
1498     switch (event)
1499     {
1500     case MODIF_ALGO_STATE:
1501       ComputeStateEngine( CLEAN );
1502       algo = gen->GetAlgo((*_father), _subShape);
1503       if (algo && !algo->NeedDescretBoundary())
1504         CleanDependsOn(); // clean sub-meshes with event CLEAN
1505       break;
1506     case COMPUTE:               // nothing to do
1507       break;
1508     case CLEAN:
1509       CleanDependants();  // clean sub-meshes, dependant on this one, with event CLEAN
1510       RemoveSubMeshElementsAndNodes();
1511       _computeState = NOT_READY;
1512       if ( _algoState == HYP_OK )
1513         _computeState = READY_TO_COMPUTE;
1514       break;
1515     case SUBMESH_COMPUTED:      // nothing to do
1516       break;
1517     case SUBMESH_RESTORED:
1518       ComputeStateEngine( CHECK_COMPUTE_STATE );
1519       ComputeSubMeshStateEngine( SUBMESH_RESTORED );
1520       algo = gen->GetAlgo(*_father, _subShape);
1521       if (algo) algo->SubmeshRestored( this );
1522       break;
1523     case MESH_ENTITY_REMOVED:
1524       UpdateDependantsState( CHECK_COMPUTE_STATE );
1525       ComputeStateEngine( CHECK_COMPUTE_STATE );
1526       ComputeSubMeshStateEngine( CHECK_COMPUTE_STATE );
1527       break;
1528     case CHECK_COMPUTE_STATE:
1529       if ( !IsMeshComputed() )
1530         if (_algoState == HYP_OK)
1531           _computeState = READY_TO_COMPUTE;
1532         else
1533           _computeState = NOT_READY;
1534       break;
1535     default:
1536       ASSERT(0);
1537       break;
1538     }
1539     break;
1540
1541     // ----------------------------------------------------------------------
1542
1543   case FAILED_TO_COMPUTE:
1544     switch (event)
1545     {
1546     case MODIF_ALGO_STATE:
1547       algo = gen->GetAlgo((*_father), _subShape);
1548       if (algo && !algo->NeedDescretBoundary())
1549         CleanDependsOn(); // clean sub-meshes with event CLEAN
1550       if (_algoState == HYP_OK)
1551         _computeState = READY_TO_COMPUTE;
1552       else
1553         _computeState = NOT_READY;
1554       break;
1555     case COMPUTE:      // nothing to do
1556       break;
1557     case CLEAN:
1558       CleanDependants(); // submeshes dependent on me should be cleaned as well
1559       RemoveSubMeshElementsAndNodes();
1560       break;
1561     case SUBMESH_COMPUTED:      // allow retry compute
1562       if (_algoState == HYP_OK)
1563         _computeState = READY_TO_COMPUTE;
1564       else
1565         _computeState = NOT_READY;
1566       break;
1567     case SUBMESH_RESTORED:
1568       ComputeSubMeshStateEngine( SUBMESH_RESTORED );
1569       break;
1570     case MESH_ENTITY_REMOVED:
1571       break;
1572     case CHECK_COMPUTE_STATE:
1573       if ( IsMeshComputed() )
1574         _computeState = COMPUTE_OK;
1575       else
1576         if (_algoState == HYP_OK)
1577           _computeState = READY_TO_COMPUTE;
1578         else
1579           _computeState = NOT_READY;
1580       break;
1581     default:
1582       ASSERT(0);
1583       break;
1584     }
1585     break;
1586
1587     // ----------------------------------------------------------------------
1588   default:
1589     ASSERT(0);
1590     break;
1591   }
1592
1593   NotifyListenersOnEvent( event, COMPUTE_EVENT );
1594
1595   return ret;
1596 }
1597
1598
1599 //=============================================================================
1600 /*!
1601  *
1602  */
1603 //=============================================================================
1604
1605 bool SMESH_subMesh::Evaluate(MapShapeNbElems& aResMap)
1606 {
1607   _computeError.reset();
1608
1609   bool ret = true;
1610
1611   if (_subShape.ShapeType() == TopAbs_VERTEX) {
1612     vector<int> aVec(SMDSEntity_Last,0);
1613     aVec[SMDSEntity_Node] = 1;
1614     aResMap.insert(make_pair(this,aVec));
1615     return ret;
1616   }
1617
1618   SMESH_Gen *gen = _father->GetGen();
1619   SMESH_Algo *algo = 0;
1620   SMESH_Hypothesis::Hypothesis_Status hyp_status;
1621
1622   algo = gen->GetAlgo((*_father), _subShape);
1623   if(algo && !aResMap.count(this) )
1624   {
1625     ret = algo->CheckHypothesis((*_father), _subShape, hyp_status);
1626     if (!ret) return false;
1627
1628     if (_father->HasShapeToMesh() && algo->NeedDescretBoundary())
1629     {
1630       // check submeshes needed
1631       bool subMeshEvaluated = true;
1632       int dimToCheck = SMESH_Gen::GetShapeDim( _subShape ) - 1;
1633       SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,/*complexShapeFirst=*/true);
1634       while ( smIt->more() && subMeshEvaluated )
1635       {
1636         SMESH_subMesh* sm = smIt->next();
1637         int dim = SMESH_Gen::GetShapeDim( sm->GetSubShape() );
1638         if (dim < dimToCheck) break; // the rest subMeshes are all of less dimension
1639         const vector<int> & nbs = aResMap[ sm ];
1640         subMeshEvaluated = (std::accumulate( nbs.begin(), nbs.end(), 0 ) > 0 );
1641       }
1642       if ( !subMeshEvaluated )
1643         return false;
1644     }
1645     _computeError = SMESH_ComputeError::New(COMPERR_OK,"",algo);
1646     ret = algo->Evaluate((*_father), _subShape, aResMap);
1647
1648     aResMap.insert( make_pair( this,vector<int>(0)));
1649   }
1650
1651   return ret;
1652 }
1653
1654
1655 //=======================================================================
1656 /*!
1657  * \brief Update compute_state by _computeError and send proper events to
1658  * dependent submeshes
1659   * \retval bool - true if _computeError is NOT set
1660  */
1661 //=======================================================================
1662
1663 bool SMESH_subMesh::CheckComputeError(SMESH_Algo* theAlgo, const TopoDS_Shape& theShape)
1664 {
1665   bool noErrors = true;
1666
1667   if ( !theShape.IsNull() )
1668   {
1669     // Check state of submeshes
1670     if ( !theAlgo->NeedDescretBoundary())
1671     {
1672       SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,false);
1673       while ( smIt->more() )
1674         if ( !smIt->next()->CheckComputeError( theAlgo ))
1675           noErrors = false;
1676     }
1677
1678     // Check state of neighbours
1679     if ( !theAlgo->OnlyUnaryInput() &&
1680          theShape.ShapeType() == TopAbs_COMPOUND &&
1681          !theShape.IsSame( _subShape ))
1682     {
1683       for (TopoDS_Iterator subIt( theShape ); subIt.More(); subIt.Next()) {
1684         SMESH_subMesh* sm = _father->GetSubMesh( subIt.Value() );
1685         if ( sm != this ) {
1686           if ( !sm->CheckComputeError( theAlgo, sm->GetSubShape() ))
1687             noErrors = false;
1688           UpdateDependantsState( SUBMESH_COMPUTED ); // send event SUBMESH_COMPUTED
1689         }
1690       }
1691     }
1692   }
1693   {
1694     // Check my state
1695     if ( !_computeError || _computeError->IsOK() )
1696     {
1697       _computeState = COMPUTE_OK;
1698     }
1699     else
1700     {
1701       if ( !_computeError->myAlgo )
1702         _computeError->myAlgo = theAlgo;
1703
1704       // Show error
1705       SMESH_Comment text;
1706       text << theAlgo->GetName() << " failed on subshape #" << _Id << " with error ";
1707       if (_computeError->IsCommon() )
1708         text << _computeError->CommonName();
1709       else
1710         text << _computeError->myName;
1711       if ( _computeError->myComment.size() > 0 )
1712         text << " \"" << _computeError->myComment << "\"";
1713
1714 #ifdef _DEBUG_
1715       MESSAGE_BEGIN ( text );
1716       // Show vertices location of a failed shape
1717       TopTools_IndexedMapOfShape vMap;
1718       TopExp::MapShapes( _subShape, TopAbs_VERTEX, vMap );
1719       MESSAGE_ADD ( "Subshape vertices " << ( vMap.Extent()>10 ? "(first 10):" : ":") );
1720       for ( int iv = 1; iv <= vMap.Extent() && iv < 11; ++iv ) {
1721         gp_Pnt P( BRep_Tool::Pnt( TopoDS::Vertex( vMap( iv ) )));
1722         MESSAGE_ADD ( "#" << _father->GetMeshDS()->ShapeToIndex( vMap( iv )) << " "
1723                    << P.X() << " " << P.Y() << " " << P.Z() << " " );
1724       }
1725 #else
1726       INFOS( text );
1727 #endif
1728       _computeState = FAILED_TO_COMPUTE;
1729       noErrors = false;
1730     }
1731   }
1732   return noErrors;
1733 }
1734
1735 //=======================================================================
1736 //function : ApplyToCollection
1737 //purpose  : Apply theAlgo to all subshapes in theCollection
1738 //=======================================================================
1739
1740 bool SMESH_subMesh::ApplyToCollection (SMESH_Algo*         theAlgo,
1741                                        const TopoDS_Shape& theCollection)
1742 {
1743   MESSAGE("SMESH_subMesh::ApplyToCollection");
1744   ASSERT ( !theAlgo->NeedDescretBoundary() );
1745
1746   if ( _computeError )
1747     _computeError->myName = COMPERR_OK;
1748
1749   bool ok = theAlgo->Compute( *_father, theCollection );
1750
1751   // set _computeState of subshapes
1752   TopExp_Explorer anExplorer( theCollection, _subShape.ShapeType() );
1753   for ( ; anExplorer.More(); anExplorer.Next() )
1754   {
1755     if ( SMESH_subMesh* subMesh = _father->GetSubMeshContaining( anExplorer.Current() ))
1756     {
1757       bool localOK = subMesh->CheckComputeError( theAlgo );
1758       if ( !ok && localOK && !subMesh->IsMeshComputed() )
1759       {
1760         subMesh->_computeError = theAlgo->GetComputeError();
1761         if ( subMesh->_computeError->IsOK() )
1762           _computeError = SMESH_ComputeError::New(COMPERR_ALGO_FAILED);
1763         localOK = CheckComputeError( theAlgo );
1764       }
1765       if ( localOK )
1766         subMesh->UpdateDependantsState( SUBMESH_COMPUTED );
1767       subMesh->UpdateSubMeshState( localOK ? COMPUTE_OK : FAILED_TO_COMPUTE );
1768     }
1769   }
1770
1771   return true;
1772 }
1773
1774
1775 //=======================================================================
1776 //function : UpdateSubMeshState
1777 //purpose  :
1778 //=======================================================================
1779
1780 void SMESH_subMesh::UpdateSubMeshState(const compute_state theState)
1781 {
1782   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,false);
1783   while ( smIt->more() )
1784     smIt->next()->_computeState = theState;
1785 }
1786
1787 //=======================================================================
1788 //function : ComputeSubMeshStateEngine
1789 //purpose  :
1790 //=======================================================================
1791
1792 void SMESH_subMesh::ComputeSubMeshStateEngine(int event)
1793 {
1794   SMESH_subMeshIteratorPtr smIt = getDependsOnIterator(false,false);
1795   while ( smIt->more() )
1796     smIt->next()->ComputeStateEngine(event);
1797 }
1798
1799 //=======================================================================
1800 //function : UpdateDependantsState
1801 //purpose  :
1802 //=======================================================================
1803
1804 void SMESH_subMesh::UpdateDependantsState(const compute_event theEvent)
1805 {
1806   //MESSAGE("SMESH_subMesh::UpdateDependantsState");
1807   TopTools_ListIteratorOfListOfShape it( _father->GetAncestors( _subShape ));
1808   for (; it.More(); it.Next())
1809   {
1810     const TopoDS_Shape& ancestor = it.Value();
1811     SMESH_subMesh *aSubMesh =
1812       _father->GetSubMeshContaining(ancestor);
1813     if (aSubMesh)
1814       aSubMesh->ComputeStateEngine( theEvent );
1815   }
1816 }
1817
1818 //=============================================================================
1819 /*!
1820  *
1821  */
1822 //=============================================================================
1823
1824 void SMESH_subMesh::CleanDependants()
1825 {
1826   int dimToClean = SMESH_Gen::GetShapeDim( _subShape ) + 1;
1827
1828   TopTools_ListIteratorOfListOfShape it( _father->GetAncestors( _subShape ));
1829   for (; it.More(); it.Next())
1830   {
1831     const TopoDS_Shape& ancestor = it.Value();
1832     if ( SMESH_Gen::GetShapeDim( ancestor ) == dimToClean ) {
1833       // PAL8021. do not go upper than SOLID, else ComputeStateEngine(CLEAN)
1834       // will erase mesh on other shapes in a compound
1835       if ( ancestor.ShapeType() >= TopAbs_SOLID ) {
1836         SMESH_subMesh *aSubMesh = _father->GetSubMeshContaining(ancestor);
1837         if (aSubMesh)
1838           aSubMesh->ComputeStateEngine(CLEAN);
1839       }
1840     }
1841   }
1842 }
1843
1844 //=============================================================================
1845 /*!
1846  *
1847  */
1848 //=============================================================================
1849
1850 void SMESH_subMesh::RemoveSubMeshElementsAndNodes()
1851 {
1852   //SCRUTE(_subShape.ShapeType());
1853
1854   cleanSubMesh( this );
1855
1856   // algo may bind a submesh not to _subShape, eg 3D algo
1857   // sets nodes on SHELL while _subShape may be SOLID
1858
1859   int dim = SMESH_Gen::GetShapeDim( _subShape );
1860   int type = _subShape.ShapeType() + 1;
1861   for ( ; type <= TopAbs_EDGE; type++) {
1862     if ( dim == SMESH_Gen::GetShapeDim( (TopAbs_ShapeEnum) type ))
1863     {
1864       TopExp_Explorer exp( _subShape, (TopAbs_ShapeEnum) type );
1865       for ( ; exp.More(); exp.Next() )
1866         cleanSubMesh( _father->GetSubMeshContaining( exp.Current() ));
1867     }
1868     else
1869       break;
1870   }
1871 }
1872
1873 //=======================================================================
1874 //function : GetCollection
1875 //purpose  : return a shape containing all sub-shapes of the MainShape that can be
1876 //           meshed at once along with _subShape
1877 //=======================================================================
1878
1879 TopoDS_Shape SMESH_subMesh::GetCollection(SMESH_Gen * theGen,
1880                                           SMESH_Algo* theAlgo,
1881                                           bool &      theSubComputed)
1882 {
1883   MESSAGE("SMESH_subMesh::GetCollection");
1884
1885   theSubComputed = SubMeshesComputed();
1886
1887   TopoDS_Shape mainShape = _father->GetMeshDS()->ShapeToMesh();
1888
1889   if ( mainShape.IsSame( _subShape ))
1890     return _subShape;
1891
1892   const bool ignoreAuxiliaryHyps = false;
1893   list<const SMESHDS_Hypothesis*> aUsedHyp =
1894     theAlgo->GetUsedHypothesis( *_father, _subShape, ignoreAuxiliaryHyps ); // copy
1895
1896   // put in a compound all shapes with the same hypothesis assigned
1897   // and a good ComputState
1898
1899   TopoDS_Compound aCompound;
1900   BRep_Builder aBuilder;
1901   aBuilder.MakeCompound( aCompound );
1902
1903   TopExp_Explorer anExplorer( mainShape, _subShape.ShapeType() );
1904   for ( ; anExplorer.More(); anExplorer.Next() )
1905   {
1906     const TopoDS_Shape& S = anExplorer.Current();
1907     SMESH_subMesh* subMesh = _father->GetSubMesh( S );
1908     if ( subMesh == this )
1909     {
1910       aBuilder.Add( aCompound, S );
1911     }
1912     else if ( subMesh->GetComputeState() == READY_TO_COMPUTE )
1913     {
1914       SMESH_Algo* anAlgo = theGen->GetAlgo( *_father, S );
1915       if (strcmp( anAlgo->GetName(), theAlgo->GetName()) == 0 && // same algo
1916           anAlgo->GetUsedHypothesis( *_father, S, ignoreAuxiliaryHyps ) == aUsedHyp) // same hyps
1917         aBuilder.Add( aCompound, S );
1918       if ( !subMesh->SubMeshesComputed() )
1919         theSubComputed = false;
1920     }
1921   }
1922
1923   return aCompound;
1924 }
1925
1926 //=======================================================================
1927 //function : GetSimilarAttached
1928 //purpose  : return a hypothesis attached to theShape.
1929 //           If theHyp is provided, similar but not same hypotheses
1930 //           is returned; else only applicable ones having theHypType
1931 //           is returned
1932 //=======================================================================
1933
1934 const SMESH_Hypothesis* SMESH_subMesh::GetSimilarAttached(const TopoDS_Shape&      theShape,
1935                                                           const SMESH_Hypothesis * theHyp,
1936                                                           const int                theHypType)
1937 {
1938   SMESH_HypoFilter hypoKind;
1939   hypoKind.Init( hypoKind.HasType( theHyp ? theHyp->GetType() : theHypType ));
1940   if ( theHyp ) {
1941     hypoKind.And   ( hypoKind.HasDim( theHyp->GetDim() ));
1942     hypoKind.AndNot( hypoKind.Is( theHyp ));
1943     if ( theHyp->IsAuxiliary() )
1944       hypoKind.And( hypoKind.HasName( theHyp->GetName() ));
1945     else
1946       hypoKind.AndNot( hypoKind.IsAuxiliary());
1947   }
1948   else {
1949     hypoKind.And( hypoKind.IsApplicableTo( theShape ));
1950   }
1951
1952   return _father->GetHypothesis( theShape, hypoKind, false );
1953 }
1954
1955 //=======================================================================
1956 //function : CheckConcurentHypothesis
1957 //purpose  : check if there are several applicable hypothesis attached to
1958 //           ancestors
1959 //=======================================================================
1960
1961 SMESH_Hypothesis::Hypothesis_Status
1962   SMESH_subMesh::CheckConcurentHypothesis (const int theHypType)
1963 {
1964   MESSAGE ("SMESH_subMesh::CheckConcurentHypothesis");
1965
1966   // is there local hypothesis on me?
1967   if ( GetSimilarAttached( _subShape, 0, theHypType ) )
1968     return SMESH_Hypothesis::HYP_OK;
1969
1970
1971   TopoDS_Shape aPrevWithHyp;
1972   const SMESH_Hypothesis* aPrevHyp = 0;
1973   TopTools_ListIteratorOfListOfShape it( _father->GetAncestors( _subShape ));
1974   for (; it.More(); it.Next())
1975   {
1976     const TopoDS_Shape& ancestor = it.Value();
1977     const SMESH_Hypothesis* hyp = GetSimilarAttached( ancestor, 0, theHypType );
1978     if ( hyp )
1979     {
1980       if ( aPrevWithHyp.IsNull() || aPrevWithHyp.IsSame( ancestor ))
1981       {
1982         aPrevWithHyp = ancestor;
1983         aPrevHyp     = hyp;
1984       }
1985       else if ( aPrevWithHyp.ShapeType() == ancestor.ShapeType() && aPrevHyp != hyp )
1986         return SMESH_Hypothesis::HYP_CONCURENT;
1987       else
1988         return SMESH_Hypothesis::HYP_OK;
1989     }
1990   }
1991   return SMESH_Hypothesis::HYP_OK;
1992 }
1993
1994 //================================================================================
1995 /*!
1996  * \brief Sets an event listener and its data to a submesh
1997  * \param listener - the listener to store
1998  * \param data - the listener data to store
1999  * \param where - the submesh to store the listener and it's data
2000  * \param deleteListener - if true then the listener will be deleted as
2001  *        it is removed from where submesh
2002  * 
2003  * It remembers the submesh where it puts the listener in order to delete
2004  * them when HYP_OK algo_state is lost
2005  * After being set, event listener is notified on each event of where submesh.
2006  */
2007 //================================================================================
2008
2009 void SMESH_subMesh::SetEventListener(EventListener*     listener,
2010                                      EventListenerData* data,
2011                                      SMESH_subMesh*     where)
2012 {
2013   if ( listener && where ) {
2014     where->SetEventListener( listener, data );
2015     myOwnListeners.push_back( make_pair( where, listener ));
2016   }
2017 }
2018
2019 //================================================================================
2020 /*!
2021  * \brief Sets an event listener and its data to a submesh
2022  * \param listener - the listener to store
2023  * \param data - the listener data to store
2024  * 
2025  * After being set, event listener is notified on each event of a submesh.
2026  */
2027 //================================================================================
2028
2029 void SMESH_subMesh::SetEventListener(EventListener* listener, EventListenerData* data)
2030 {
2031   map< EventListener*, EventListenerData* >::iterator l_d =
2032     myEventListeners.find( listener );
2033   if ( l_d != myEventListeners.end() ) {
2034     EventListenerData* curData = l_d->second;
2035     if ( curData && curData != data && curData->IsDeletable() )
2036       delete curData;
2037     l_d->second = data;
2038   }
2039   else 
2040     myEventListeners.insert( make_pair( listener, data ));
2041 }
2042
2043 //================================================================================
2044 /*!
2045  * \brief Return an event listener data
2046  * \param listener - the listener whose data is
2047  * \retval EventListenerData* - found data, maybe NULL
2048  */
2049 //================================================================================
2050
2051 EventListenerData* SMESH_subMesh::GetEventListenerData(EventListener* listener) const
2052 {
2053   map< EventListener*, EventListenerData* >::const_iterator l_d =
2054     myEventListeners.find( listener );
2055   if ( l_d != myEventListeners.end() )
2056     return l_d->second;
2057   return 0;
2058 }
2059
2060 //================================================================================
2061 /*!
2062  * \brief Notify stored event listeners on the occured event
2063  * \param event - algo_event or compute_event itself
2064  * \param eventType - algo_event or compute_event
2065  * \param subMesh - the submesh where the event occures
2066  * \param data - listener data stored in the subMesh
2067  * \param hyp - hypothesis, if eventType is algo_event
2068  */
2069 //================================================================================
2070
2071 void SMESH_subMesh::NotifyListenersOnEvent( const int         event,
2072                                             const event_type  eventType,
2073                                             SMESH_Hypothesis* hyp)
2074 {
2075   map< EventListener*, EventListenerData* >::iterator l_d = myEventListeners.begin();
2076   for ( ; l_d != myEventListeners.end(); ++l_d )
2077     l_d->first->ProcessEvent( event, eventType, this, l_d->second, hyp );
2078 }
2079
2080 //================================================================================
2081 /*!
2082  * \brief Unregister the listener and delete listener's data
2083  * \param listener - the event listener
2084  */
2085 //================================================================================
2086
2087 void SMESH_subMesh::DeleteEventListener(EventListener* listener)
2088 {
2089   map< EventListener*, EventListenerData* >::iterator l_d =
2090     myEventListeners.find( listener );
2091   if ( l_d != myEventListeners.end() ) {
2092     if ( l_d->first  && l_d->first->IsDeletable() )  delete l_d->first;
2093     if ( l_d->second && l_d->second->IsDeletable() ) delete l_d->second;
2094     myEventListeners.erase( l_d );
2095   }
2096 }
2097
2098 //================================================================================
2099 /*!
2100  * \brief Delete event listeners depending on algo of this submesh
2101  */
2102 //================================================================================
2103
2104 void SMESH_subMesh::DeleteOwnListeners()
2105 {
2106   list< pair< SMESH_subMesh*, EventListener* > >::iterator sm_l;
2107   for ( sm_l = myOwnListeners.begin(); sm_l != myOwnListeners.end(); ++sm_l)
2108     sm_l->first->DeleteEventListener( sm_l->second );
2109   myOwnListeners.clear();
2110 }
2111
2112 //================================================================================
2113 /*!
2114  * \brief Do something on a certain event
2115  * \param event - algo_event or compute_event itself
2116  * \param eventType - algo_event or compute_event
2117  * \param subMesh - the submesh where the event occures
2118  * \param data - listener data stored in the subMesh
2119  * \param hyp - hypothesis, if eventType is algo_event
2120  * 
2121  * The base implementation translates CLEAN event to the subMesh
2122  * stored in listener data. Also it sends SUBMESH_COMPUTED event in case of
2123  * successful COMPUTE event.
2124  */
2125 //================================================================================
2126
2127 void SMESH_subMeshEventListener::ProcessEvent(const int          event,
2128                                               const int          eventType,
2129                                               SMESH_subMesh*     subMesh,
2130                                               EventListenerData* data,
2131                                               const SMESH_Hypothesis*  /*hyp*/)
2132 {
2133   if ( data && !data->mySubMeshes.empty() &&
2134        eventType == SMESH_subMesh::COMPUTE_EVENT)
2135   {
2136     ASSERT( data->mySubMeshes.front() != subMesh );
2137     list<SMESH_subMesh*>::iterator smIt = data->mySubMeshes.begin();
2138     list<SMESH_subMesh*>::iterator smEnd = data->mySubMeshes.end();
2139     switch ( event ) {
2140     case SMESH_subMesh::CLEAN:
2141       for ( ; smIt != smEnd; ++ smIt)
2142         (*smIt)->ComputeStateEngine( event );
2143       break;
2144     case SMESH_subMesh::COMPUTE:
2145       if ( subMesh->GetComputeState() == SMESH_subMesh::COMPUTE_OK )
2146         for ( ; smIt != smEnd; ++ smIt)
2147           (*smIt)->ComputeStateEngine( SMESH_subMesh::SUBMESH_COMPUTED );
2148       break;
2149     default:;
2150     }
2151   }
2152 }
2153
2154 namespace {
2155
2156   //================================================================================
2157   /*!
2158    * \brief Iterator over submeshes and optionally prepended or appended one
2159    */
2160   //================================================================================
2161
2162   struct _Iterator : public SMDS_Iterator<SMESH_subMesh*>
2163   {
2164     _Iterator(SMDS_Iterator<SMESH_subMesh*>* subIt,
2165               SMESH_subMesh*                 prepend,
2166               SMESH_subMesh*                 append): myIt(subIt),myAppend(append)
2167     {
2168       myCur = prepend ? prepend : myIt->more() ? myIt->next() : append;
2169       if ( myCur == append ) append = 0;
2170     }
2171     /// Return true if and only if there are other object in this iterator
2172     virtual bool more()
2173     {
2174       return myCur;
2175     }
2176     /// Return the current object and step to the next one
2177     virtual SMESH_subMesh* next()
2178     {
2179       SMESH_subMesh* res = myCur;
2180       if ( myIt->more() ) { myCur = myIt->next(); }
2181       else                { myCur = myAppend; myAppend = 0; }
2182       return res;
2183     }
2184     /// ~
2185     ~_Iterator()
2186     { delete myIt; }
2187     ///
2188     SMESH_subMesh                 *myAppend, *myCur;
2189     SMDS_Iterator<SMESH_subMesh*> *myIt;
2190   };
2191 }
2192
2193 //================================================================================
2194 /*!
2195  * \brief  Return iterator on the submeshes this one depends on
2196   * \param includeSelf - this submesh to be returned also
2197   * \param reverse - if true, complex shape submeshes go first
2198  */
2199 //================================================================================
2200
2201 SMESH_subMeshIteratorPtr SMESH_subMesh::getDependsOnIterator(const bool includeSelf,
2202                                                              const bool reverse)
2203 {
2204   SMESH_subMesh *prepend=0, *append=0;
2205   if ( includeSelf ) {
2206     if ( reverse ) prepend = this;
2207     else            append = this;
2208   }
2209   typedef map < int, SMESH_subMesh * > TMap;
2210   if ( reverse )
2211   {
2212     return SMESH_subMeshIteratorPtr
2213       ( new _Iterator( new SMDS_mapReverseIterator<TMap>( DependsOn() ), prepend, append ));
2214   }
2215   {
2216     return SMESH_subMeshIteratorPtr
2217       ( new _Iterator( new SMDS_mapIterator<TMap>( DependsOn() ), prepend, append ));
2218   }
2219 }
2220
2221 //================================================================================
2222 /*!
2223  * \brief  Find common submeshes (based on shared subshapes with other
2224   * \param theOther submesh to check
2225   * \param theSetOfCommon set of common submesh
2226  */
2227 //================================================================================
2228
2229 bool SMESH_subMesh::FindIntersection(const SMESH_subMesh* theOther,
2230                                      std::set<const SMESH_subMesh*>& theSetOfCommon ) const
2231 {
2232   int oldNb = theSetOfCommon.size();
2233   // check main submeshes
2234   const map <int, SMESH_subMesh*>::const_iterator otherEnd = theOther->_mapDepend.end();
2235   if ( theOther->_mapDepend.find(this->GetId()) != otherEnd )
2236     theSetOfCommon.insert( this );
2237   if ( _mapDepend.find(theOther->GetId()) != _mapDepend.end() )
2238     theSetOfCommon.insert( theOther );
2239   // check common submeshes
2240   map <int, SMESH_subMesh*>::const_iterator mapIt = _mapDepend.begin();
2241   for( ; mapIt != _mapDepend.end(); mapIt++ )
2242     if ( theOther->_mapDepend.find((*mapIt).first) != otherEnd )
2243       theSetOfCommon.insert( (*mapIt).second );
2244   return oldNb < theSetOfCommon.size();
2245 }