Salome HOME
0022098: EDF 2036 SMESH: Create groups from none conected parts of a mesh
[modules/smesh.git] / src / SMESH / SMESH_Algo.cxx
1 // Copyright (C) 2007-2013  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_Algo.cxx
25 //  Author : Paul RASCLE, EDF
26 //  Module : SMESH
27
28 #include "SMESH_Algo.hxx"
29
30 #include "SMDS_EdgePosition.hxx"
31 #include "SMDS_FacePosition.hxx"
32 #include "SMDS_MeshElement.hxx"
33 #include "SMDS_MeshNode.hxx"
34 #include "SMDS_VolumeTool.hxx"
35 #include "SMESHDS_Mesh.hxx"
36 #include "SMESHDS_SubMesh.hxx"
37 #include "SMESH_Comment.hxx"
38 #include "SMESH_Gen.hxx"
39 #include "SMESH_HypoFilter.hxx"
40 #include "SMESH_Mesh.hxx"
41 #include "SMESH_TypeDefs.hxx"
42 #include "SMESH_subMesh.hxx"
43
44 #include <Basics_OCCTVersion.hxx>
45
46 #include <BRepAdaptor_Curve.hxx>
47 #include <BRepLProp.hxx>
48 #include <BRep_Tool.hxx>
49 #include <GCPnts_AbscissaPoint.hxx>
50 #include <GeomAdaptor_Curve.hxx>
51 #include <Geom_Surface.hxx>
52 #include <LDOMParser.hxx>
53 #include <TopExp.hxx>
54 #include <TopExp_Explorer.hxx>
55 #include <TopLoc_Location.hxx>
56 #include <TopTools_ListIteratorOfListOfShape.hxx>
57 #include <TopTools_ListOfShape.hxx>
58 #include <TopoDS.hxx>
59 #include <TopoDS_Edge.hxx>
60 #include <TopoDS_Face.hxx>
61 #include <TopoDS_Vertex.hxx>
62 #include <TopoDS_Wire.hxx>
63 #include <gp_Pnt.hxx>
64 #include <gp_Pnt2d.hxx>
65 #include <gp_Vec.hxx>
66
67 #include <Standard_ErrorHandler.hxx>
68 #include <Standard_Failure.hxx>
69
70 #include "utilities.h"
71
72 #include <algorithm>
73 #include <limits>
74
75 using namespace std;
76
77 //================================================================================
78 /*!
79  * \brief Returns \a true if two algorithms (described by \a this and the given
80  *        algo data) are compatible by their output and input types of elements.
81  */
82 //================================================================================
83
84 bool SMESH_Algo::Features::IsCompatible( const SMESH_Algo::Features& algo2 ) const
85 {
86   if ( _dim > algo2._dim ) return algo2.IsCompatible( *this );
87   // algo2 is of highter dimension
88   if ( _outElemTypes.empty() || algo2._inElemTypes.empty() )
89     return false;
90   bool compatible = true;
91   set<SMDSAbs_GeometryType>::const_iterator myOutType = _outElemTypes.begin();
92   for ( ; myOutType != _outElemTypes.end() && compatible; ++myOutType )
93     compatible = algo2._inElemTypes.count( *myOutType );
94   return compatible;
95 }
96
97 //================================================================================
98 /*!
99  * \brief Return Data of the algorithm
100  */
101 //================================================================================
102
103 const SMESH_Algo::Features& SMESH_Algo::GetFeatures( const std::string& algoType )
104 {
105   static map< string, SMESH_Algo::Features > theFeaturesByName;
106   if ( theFeaturesByName.empty() )
107   {
108     // Read Plugin.xml files
109     vector< string > xmlPaths = SMESH_Gen::GetPluginXMLPaths();
110     LDOMParser xmlParser;
111     for ( size_t iXML = 0; iXML < xmlPaths.size(); ++iXML )
112     {
113       bool error = xmlParser.parse( xmlPaths[iXML].c_str() );
114       if ( error )
115       {
116         TCollection_AsciiString data;
117         INFOS( xmlParser.GetError(data) );
118         continue;
119       }
120       // <algorithm type="Regular_1D"
121       //            ...
122       //            input="EDGE"
123       //            output="QUAD,TRIA">
124       //
125       LDOM_Document xmlDoc = xmlParser.getDocument();
126       LDOM_NodeList algoNodeList = xmlDoc.getElementsByTagName( "algorithm" );
127       for ( int i = 0; i < algoNodeList.getLength(); ++i )
128       {
129         LDOM_Node     algoNode           = algoNodeList.item( i );
130         LDOM_Element& algoElem           = (LDOM_Element&) algoNode;
131         TCollection_AsciiString algoType = algoElem.getAttribute("type");
132         TCollection_AsciiString input    = algoElem.getAttribute("input");
133         TCollection_AsciiString output   = algoElem.getAttribute("output");
134         TCollection_AsciiString dim      = algoElem.getAttribute("dim");
135         TCollection_AsciiString label    = algoElem.getAttribute("label-id");
136         if ( algoType.IsEmpty() ) continue;
137
138         Features & data = theFeaturesByName[ algoType.ToCString() ];
139         data._dim   = dim.IntegerValue();
140         data._label = label.ToCString();
141         for ( int isInput = 0; isInput < 2; ++isInput )
142         {
143           TCollection_AsciiString&   typeStr = isInput ? input : output;
144           set<SMDSAbs_GeometryType>& typeSet = isInput ? data._inElemTypes : data._outElemTypes;
145           int beg = 1, end;
146           while ( beg <= typeStr.Length() )
147           {
148             while ( beg < typeStr.Length() && !isalpha( typeStr.Value( beg ) ))
149               ++beg;
150             end = beg;
151             while ( end < typeStr.Length() && isalpha( typeStr.Value( end + 1 ) ))
152               ++end;
153             if ( end > beg )
154             {
155               TCollection_AsciiString typeName = typeStr.SubString( beg, end );
156               if      ( typeName == "EDGE" ) typeSet.insert( SMDSGeom_EDGE );
157               else if ( typeName == "TRIA" ) typeSet.insert( SMDSGeom_TRIANGLE );
158               else if ( typeName == "QUAD" ) typeSet.insert( SMDSGeom_QUADRANGLE );
159             }
160             beg = end + 1;
161           }
162         }
163       }
164     }
165   }
166   return theFeaturesByName[ algoType ];
167 }
168
169 //=============================================================================
170 /*!
171  *  
172  */
173 //=============================================================================
174
175 SMESH_Algo::SMESH_Algo (int hypId, int studyId, SMESH_Gen * gen)
176   : SMESH_Hypothesis(hypId, studyId, gen)
177 {
178   gen->_mapAlgo[hypId] = this;
179
180   _onlyUnaryInput = _requireDiscreteBoundary = _requireShape = true;
181   _quadraticMesh = _supportSubmeshes = false;
182   _error = COMPERR_OK;
183   for ( int i = 0; i < 4; ++i )
184     _neededLowerHyps[ i ] = false;
185 }
186
187 //=============================================================================
188 /*!
189  *  
190  */
191 //=============================================================================
192
193 SMESH_Algo::~SMESH_Algo()
194 {
195 }
196
197 //=============================================================================
198 /*!
199  *  
200  */
201 //=============================================================================
202
203 SMESH_0D_Algo::SMESH_0D_Algo(int hypId, int studyId, SMESH_Gen* gen)
204   : SMESH_Algo(hypId, studyId, gen)
205 {
206   _shapeType = (1 << TopAbs_VERTEX);
207   _type = ALGO_0D;
208   gen->_map0D_Algo[hypId] = this;
209 }
210 SMESH_1D_Algo::SMESH_1D_Algo(int hypId, int studyId, SMESH_Gen* gen)
211   : SMESH_Algo(hypId, studyId, gen)
212 {
213   _shapeType = (1 << TopAbs_EDGE);
214   _type = ALGO_1D;
215   gen->_map1D_Algo[hypId] = this;
216 }
217 SMESH_2D_Algo::SMESH_2D_Algo(int hypId, int studyId, SMESH_Gen* gen)
218   : SMESH_Algo(hypId, studyId, gen)
219 {
220   _shapeType = (1 << TopAbs_FACE);
221   _type = ALGO_2D;
222   gen->_map2D_Algo[hypId] = this;
223 }
224 SMESH_3D_Algo::SMESH_3D_Algo(int hypId, int studyId, SMESH_Gen* gen)
225   : SMESH_Algo(hypId, studyId, gen)
226 {
227   _shapeType = (1 << TopAbs_SOLID);
228   _type = ALGO_3D;
229   gen->_map3D_Algo[hypId] = this;
230 }
231
232 //=============================================================================
233 /*!
234  * Usually an algoritm has nothing to save
235  */
236 //=============================================================================
237
238 ostream & SMESH_Algo::SaveTo(ostream & save) { return save; }
239 istream & SMESH_Algo::LoadFrom(istream & load) { return load; }
240
241 //=============================================================================
242 /*!
243  *  
244  */
245 //=============================================================================
246
247 const vector < string > &SMESH_Algo::GetCompatibleHypothesis()
248 {
249   return _compatibleHypothesis;
250 }
251
252 //=============================================================================
253 /*!
254  *  List the hypothesis used by the algorithm associated to the shape.
255  *  Hypothesis associated to father shape -are- taken into account (see
256  *  GetAppliedHypothesis). Relevant hypothesis have a name (type) listed in
257  *  the algorithm. This method could be surcharged by specific algorithms, in 
258  *  case of several hypothesis simultaneously applicable.
259  */
260 //=============================================================================
261
262 const list <const SMESHDS_Hypothesis *> &
263 SMESH_Algo::GetUsedHypothesis(SMESH_Mesh &         aMesh,
264                               const TopoDS_Shape & aShape,
265                               const bool           ignoreAuxiliary)
266 {
267   _usedHypList.clear();
268   SMESH_HypoFilter filter;
269   if ( InitCompatibleHypoFilter( filter, ignoreAuxiliary ))
270   {
271     aMesh.GetHypotheses( aShape, filter, _usedHypList, true );
272     if ( ignoreAuxiliary && _usedHypList.size() > 1 )
273       _usedHypList.clear(); //only one compatible hypothesis allowed
274   }
275   return _usedHypList;
276 }
277
278 //=============================================================================
279 /*!
280  *  List the relevant hypothesis associated to the shape. Relevant hypothesis
281  *  have a name (type) listed in the algorithm. Hypothesis associated to
282  *  father shape -are not- taken into account (see GetUsedHypothesis)
283  */
284 //=============================================================================
285
286 const list<const SMESHDS_Hypothesis *> &
287 SMESH_Algo::GetAppliedHypothesis(SMESH_Mesh &         aMesh,
288                                  const TopoDS_Shape & aShape,
289                                  const bool           ignoreAuxiliary)
290 {
291   _appliedHypList.clear();
292   SMESH_HypoFilter filter;
293   if ( InitCompatibleHypoFilter( filter, ignoreAuxiliary ))
294     aMesh.GetHypotheses( aShape, filter, _appliedHypList, false );
295
296   return _appliedHypList;
297 }
298
299 //=============================================================================
300 /*!
301  *  Compute length of an edge
302  */
303 //=============================================================================
304
305 double SMESH_Algo::EdgeLength(const TopoDS_Edge & E)
306 {
307   double UMin = 0, UMax = 0;
308   if (BRep_Tool::Degenerated(E))
309     return 0;
310   TopLoc_Location L;
311   Handle(Geom_Curve) C = BRep_Tool::Curve(E, L, UMin, UMax);
312   GeomAdaptor_Curve AdaptCurve(C, UMin, UMax); //range is important for periodic curves
313   double length = GCPnts_AbscissaPoint::Length(AdaptCurve, UMin, UMax);
314   return length;
315 }
316
317 //================================================================================
318 /*!
319  * \brief Just return false as the algorithm does not hold parameters values
320  */
321 //================================================================================
322
323 bool SMESH_Algo::SetParametersByMesh(const SMESH_Mesh* /*theMesh*/,
324                                      const TopoDS_Shape& /*theShape*/)
325 {
326   return false;
327 }
328 bool SMESH_Algo::SetParametersByDefaults(const TDefaults& , const SMESH_Mesh*)
329 {
330   return false;
331 }
332 //================================================================================
333 /*!
334  * \brief Fill vector of node parameters on geometrical edge, including vertex nodes
335  * \param theMesh - The mesh containing nodes
336  * \param theEdge - The geometrical edge of interest
337  * \param theParams - The resulting vector of sorted node parameters
338  * \retval bool - false if not all parameters are OK
339  */
340 //================================================================================
341
342 bool SMESH_Algo::GetNodeParamOnEdge(const SMESHDS_Mesh* theMesh,
343                                     const TopoDS_Edge&  theEdge,
344                                     vector< double > &  theParams)
345 {
346   theParams.clear();
347
348   if ( !theMesh || theEdge.IsNull() )
349     return false;
350
351   SMESHDS_SubMesh * eSubMesh = theMesh->MeshElements( theEdge );
352   if ( !eSubMesh || !eSubMesh->GetElements()->more() )
353     return false; // edge is not meshed
354
355   //int nbEdgeNodes = 0;
356   set < double > paramSet;
357   if ( eSubMesh )
358   {
359     // loop on nodes of an edge: sort them by param on edge
360     SMDS_NodeIteratorPtr nIt = eSubMesh->GetNodes();
361     while ( nIt->more() )
362     {
363       const SMDS_MeshNode* node = nIt->next();
364       const SMDS_PositionPtr& pos = node->GetPosition();
365       if ( pos->GetTypeOfPosition() != SMDS_TOP_EDGE )
366         return false;
367       const SMDS_EdgePosition* epos =
368         static_cast<const SMDS_EdgePosition*>(node->GetPosition());
369       if ( !paramSet.insert( epos->GetUParameter() ).second )
370         return false; // equal parameters
371     }
372   }
373   // add vertex nodes params
374   TopoDS_Vertex V1,V2;
375   TopExp::Vertices( theEdge, V1, V2);
376   if ( VertexNode( V1, theMesh ) &&
377        !paramSet.insert( BRep_Tool::Parameter(V1,theEdge) ).second )
378     return false; // there are equal parameters
379   if ( VertexNode( V2, theMesh ) &&
380        !paramSet.insert( BRep_Tool::Parameter(V2,theEdge) ).second )
381     return false; // there are equal parameters
382
383   // fill the vector
384   theParams.resize( paramSet.size() );
385   set < double >::iterator   par    = paramSet.begin();
386   vector< double >::iterator vecPar = theParams.begin();
387   for ( ; par != paramSet.end(); ++par, ++vecPar )
388     *vecPar = *par;
389
390   return theParams.size() > 1;
391 }
392
393 //================================================================================
394 /*!
395  * \brief Fill vector of node parameters on geometrical edge, including vertex nodes
396  * \param theMesh - The mesh containing nodes
397  * \param theEdge - The geometrical edge of interest
398  * \param theParams - The resulting vector of sorted node parameters
399  * \retval bool - false if not all parameters are OK
400  */
401 //================================================================================
402
403 bool SMESH_Algo::GetSortedNodesOnEdge(const SMESHDS_Mesh*                   theMesh,
404                                       const TopoDS_Edge&                    theEdge,
405                                       const bool                            ignoreMediumNodes,
406                                       map< double, const SMDS_MeshNode* > & theNodes)
407 {
408   theNodes.clear();
409
410   if ( !theMesh || theEdge.IsNull() )
411     return false;
412
413   SMESHDS_SubMesh * eSubMesh = theMesh->MeshElements( theEdge );
414   if ( !eSubMesh || !eSubMesh->GetElements()->more() )
415     return false; // edge is not meshed
416
417   int nbNodes = 0;
418   set < double > paramSet;
419   if ( eSubMesh )
420   {
421     // loop on nodes of an edge: sort them by param on edge
422     SMDS_NodeIteratorPtr nIt = eSubMesh->GetNodes();
423     while ( nIt->more() )
424     {
425       const SMDS_MeshNode* node = nIt->next();
426       if ( ignoreMediumNodes ) {
427         SMDS_ElemIteratorPtr elemIt = node->GetInverseElementIterator();
428         if ( elemIt->more() && elemIt->next()->IsMediumNode( node ))
429           continue;
430       }
431       const SMDS_PositionPtr& pos = node->GetPosition();
432       if ( pos->GetTypeOfPosition() != SMDS_TOP_EDGE )
433         return false;
434       const SMDS_EdgePosition* epos =
435         static_cast<const SMDS_EdgePosition*>(node->GetPosition());
436       theNodes.insert( theNodes.end(), make_pair( epos->GetUParameter(), node ));
437       //MESSAGE("U " << epos->GetUParameter() << " ID " << node->GetID());
438       ++nbNodes;
439     }
440   }
441   // add vertex nodes
442   TopoDS_Vertex v1, v2;
443   TopExp::Vertices(theEdge, v1, v2);
444   const SMDS_MeshNode* n1 = VertexNode( v1, (SMESHDS_Mesh*) theMesh );
445   const SMDS_MeshNode* n2 = VertexNode( v2, (SMESHDS_Mesh*) theMesh );
446   //MESSAGE("Vertices ID " << n1->GetID() << " " << n2->GetID());
447   Standard_Real f, l;
448   BRep_Tool::Range(theEdge, f, l);
449   if ( v1.Orientation() != TopAbs_FORWARD )
450     std::swap( f, l );
451   if ( n1 && ++nbNodes )
452     theNodes.insert( make_pair( f, n1 ));
453   if ( n2 && ++nbNodes )
454     theNodes.insert( make_pair( l, n2 ));
455
456   return theNodes.size() == nbNodes;
457 }
458
459 //================================================================================
460 /*!
461  * \brief Make filter recognize only compatible hypotheses
462  * \param theFilter - the filter to initialize
463  * \param ignoreAuxiliary - make filter ignore compatible auxiliary hypotheses
464  */
465 //================================================================================
466
467 bool SMESH_Algo::InitCompatibleHypoFilter( SMESH_HypoFilter & theFilter,
468                                            const bool         ignoreAuxiliary) const
469 {
470   if ( !_compatibleHypothesis.empty() )
471   {
472     theFilter.Init( theFilter.HasName( _compatibleHypothesis[0] ));
473     for ( int i = 1; i < _compatibleHypothesis.size(); ++i )
474       theFilter.Or( theFilter.HasName( _compatibleHypothesis[ i ] ));
475
476     if ( ignoreAuxiliary )
477       theFilter.AndNot( theFilter.IsAuxiliary() );
478
479     return true;
480   }
481   return false;
482 }
483
484 //================================================================================
485 /*!
486  * \brief Return continuity of two edges
487  * \param E1 - the 1st edge
488  * \param E2 - the 2nd edge
489  * \retval GeomAbs_Shape - regularity at the junction between E1 and E2
490  */
491 //================================================================================
492
493 GeomAbs_Shape SMESH_Algo::Continuity(TopoDS_Edge E1,
494                                      TopoDS_Edge E2)
495 {
496   //E1.Orientation(TopAbs_FORWARD), E2.Orientation(TopAbs_FORWARD); // avoid pb with internal edges
497   if (E1.Orientation() > TopAbs_REVERSED) // INTERNAL
498     E1.Orientation( TopAbs_FORWARD );
499   if (E2.Orientation() > TopAbs_REVERSED) // INTERNAL
500     E2.Orientation( TopAbs_FORWARD );
501
502   TopoDS_Vertex V, VV1[2], VV2[2];
503   TopExp::Vertices( E1, VV1[0], VV1[1], true );
504   TopExp::Vertices( E2, VV2[0], VV2[1], true );
505   if      ( VV1[1].IsSame( VV2[0] ))  { V = VV1[1]; }
506   else if ( VV1[0].IsSame( VV2[1] ))  { V = VV1[0]; }
507   else if ( VV1[1].IsSame( VV2[1] ))  { V = VV1[1]; E1.Reverse(); }
508   else if ( VV1[0].IsSame( VV2[0] ))  { V = VV1[0]; E1.Reverse(); }
509   else { return GeomAbs_C0; }
510
511   Standard_Real u1 = BRep_Tool::Parameter( V, E1 );
512   Standard_Real u2 = BRep_Tool::Parameter( V, E2 );
513   BRepAdaptor_Curve C1( E1 ), C2( E2 );
514   Standard_Real tol = BRep_Tool::Tolerance( V );
515   Standard_Real angTol = 2e-3;
516   try {
517 #if OCC_VERSION_LARGE > 0x06010000
518     OCC_CATCH_SIGNALS;
519 #endif
520     return BRepLProp::Continuity(C1, C2, u1, u2, tol, angTol);
521   }
522   catch (Standard_Failure) {
523   }
524   return GeomAbs_C0;
525 }
526
527 //================================================================================
528 /*!
529  * \brief Return the node built on a vertex
530  * \param V - the vertex
531  * \param meshDS - mesh
532  * \retval const SMDS_MeshNode* - found node or NULL
533  */
534 //================================================================================
535
536 const SMDS_MeshNode* SMESH_Algo::VertexNode(const TopoDS_Vertex& V,
537                                             const SMESHDS_Mesh*  meshDS)
538 {
539   if ( SMESHDS_SubMesh* sm = meshDS->MeshElements(V) ) {
540     SMDS_NodeIteratorPtr nIt= sm->GetNodes();
541     if (nIt->more())
542       return nIt->next();
543   }
544   return 0;
545 }
546
547 //=======================================================================
548 //function : GetMeshError
549 //purpose  : Finds topological errors of a sub-mesh
550 //WARNING  : 1D check is NOT implemented so far
551 //=======================================================================
552
553 SMESH_Algo::EMeshError SMESH_Algo::GetMeshError(SMESH_subMesh* subMesh)
554 {
555   EMeshError err = MEr_OK;
556
557   SMESHDS_SubMesh* smDS = subMesh->GetSubMeshDS();
558   if ( !smDS )
559     return MEr_EMPTY;
560
561   switch ( subMesh->GetSubShape().ShapeType() )
562   {
563   case TopAbs_FACE: { // ====================== 2D =====================
564
565     SMDS_ElemIteratorPtr fIt = smDS->GetElements();
566     if ( !fIt->more() )
567       return MEr_EMPTY;
568
569     // We check that olny links on EDGEs encouter once, the rest links, twice
570     set< SMESH_TLink > links;
571     while ( fIt->more() )
572     {
573       const SMDS_MeshElement* f = fIt->next();
574       int nbNodes = f->NbCornerNodes(); // ignore medium nodes
575       for ( int i = 0; i < nbNodes; ++i )
576       {
577         const SMDS_MeshNode* n1 = f->GetNode( i );
578         const SMDS_MeshNode* n2 = f->GetNode(( i+1 ) % nbNodes);
579         std::pair< set< SMESH_TLink >::iterator, bool > it_added =
580           links.insert( SMESH_TLink( n1, n2 ));
581         if ( !it_added.second )
582           // As we do NOT(!) check if mesh is manifold, we believe that a link can
583           // encounter once or twice only (not three times), we erase a link as soon
584           // as it encounters twice to speed up search in the <links> map.
585           links.erase( it_added.first );
586       }
587     }
588     // the links remaining in the <links> should all be on EDGE
589     set< SMESH_TLink >::iterator linkIt = links.begin();
590     for ( ; linkIt != links.end(); ++linkIt )
591     {
592       const SMESH_TLink& link = *linkIt;
593       if ( link.node1()->GetPosition()->GetTypeOfPosition() > SMDS_TOP_EDGE ||
594            link.node2()->GetPosition()->GetTypeOfPosition() > SMDS_TOP_EDGE )
595         return MEr_HOLES;
596     }
597     // TODO: to check orientation
598     break;
599   }
600   case TopAbs_SOLID: { // ====================== 3D =====================
601
602     SMDS_ElemIteratorPtr vIt = smDS->GetElements();
603     if ( !vIt->more() )
604       return MEr_EMPTY;
605
606     SMDS_VolumeTool vTool;
607     while ( !vIt->more() )
608     {
609       if (!vTool.Set( vIt->next() ))
610         continue; // strange
611
612       for ( int iF = 0; iF < vTool.NbFaces(); ++iF )
613         if ( vTool.IsFreeFace( iF ))
614         {
615           int nbN = vTool.NbFaceNodes( iF );
616           const SMDS_MeshNode** nodes =  vTool.GetFaceNodes( iF );
617           for ( int i = 0; i < nbN; ++i )
618             if ( nodes[i]->GetPosition()->GetTypeOfPosition() > SMDS_TOP_FACE )
619               return MEr_HOLES;
620         }
621     }
622     break;
623   }
624   default:;
625   }
626   return err;
627 }
628
629 //================================================================================
630 /*!
631  * \brief Sets event listener to submeshes if necessary
632  * \param subMesh - submesh where algo is set
633  * 
634  * After being set, event listener is notified on each event of a submesh.
635  * By default non listener is set
636  */
637 //================================================================================
638
639 void SMESH_Algo::SetEventListener(SMESH_subMesh* /*subMesh*/)
640 {
641 }
642
643 //================================================================================
644 /*!
645  * \brief Allow algo to do something after persistent restoration
646  * \param subMesh - restored submesh
647  *
648  * This method is called only if a submesh has HYP_OK algo_state.
649  */
650 //================================================================================
651
652 void SMESH_Algo::SubmeshRestored(SMESH_subMesh* /*subMesh*/)
653 {
654 }
655
656 //================================================================================
657 /*!
658  * \brief Computes mesh without geometry
659  * \param aMesh - the mesh
660  * \param aHelper - helper that must be used for adding elements to \aaMesh
661  * \retval bool - is a success
662  */
663 //================================================================================
664
665 bool SMESH_Algo::Compute(SMESH_Mesh & /*aMesh*/, SMESH_MesherHelper* /*aHelper*/)
666 {
667   return error( COMPERR_BAD_INPUT_MESH, "Mesh built on shape expected");
668 }
669
670 //=======================================================================
671 //function : CancelCompute
672 //purpose  : Sets _computeCanceled to true. It's usage depends on
673 //  *        implementation of a particular mesher.
674 //=======================================================================
675
676 void SMESH_Algo::CancelCompute()
677 {
678   _computeCanceled = true;
679   _error = COMPERR_CANCELED;
680 }
681
682 //================================================================================
683 /*!
684  * \brief store error and comment and then return ( error == COMPERR_OK )
685  */
686 //================================================================================
687
688 bool SMESH_Algo::error(int error, const SMESH_Comment& comment)
689 {
690   _error   = error;
691   _comment = comment;
692   return ( error == COMPERR_OK );
693 }
694
695 //================================================================================
696 /*!
697  * \brief store error and return ( error == COMPERR_OK )
698  */
699 //================================================================================
700
701 bool SMESH_Algo::error(SMESH_ComputeErrorPtr error)
702 {
703   if ( error ) {
704     _error   = error->myName;
705     _comment = error->myComment;
706     _badInputElements = error->myBadElements;
707     return error->IsOK();
708   }
709   return true;
710 }
711
712 //================================================================================
713 /*!
714  * \brief return compute error
715  */
716 //================================================================================
717
718 SMESH_ComputeErrorPtr SMESH_Algo::GetComputeError() const
719 {
720   SMESH_ComputeErrorPtr err = SMESH_ComputeError::New( _error, _comment, this );
721   // hope this method is called by only SMESH_subMesh after this->Compute()
722   err->myBadElements.splice( err->myBadElements.end(),
723                              (list<const SMDS_MeshElement*>&) _badInputElements );
724   return err;
725 }
726
727 //================================================================================
728 /*!
729  * \brief initialize compute error
730  */
731 //================================================================================
732
733 void SMESH_Algo::InitComputeError()
734 {
735   _error = COMPERR_OK;
736   _comment.clear();
737   list<const SMDS_MeshElement*>::iterator elem = _badInputElements.begin();
738   for ( ; elem != _badInputElements.end(); ++elem )
739     if ( (*elem)->GetID() < 1 )
740       delete *elem;
741   _badInputElements.clear();
742
743   _computeCanceled = false;
744 }
745
746 //================================================================================
747 /*!
748  * \brief store a bad input element preventing computation,
749  *        which may be a temporary one i.e. not residing the mesh,
750  *        then it will be deleted by InitComputeError()
751  */
752 //================================================================================
753
754 void SMESH_Algo::addBadInputElement(const SMDS_MeshElement* elem)
755 {
756   if ( elem )
757     _badInputElements.push_back( elem );
758 }
759
760 //=======================================================================
761 //function : addBadInputElements
762 //purpose  : store a bad input elements or nodes preventing computation
763 //=======================================================================
764
765 void SMESH_Algo::addBadInputElements(const SMESHDS_SubMesh* sm,
766                                      const bool             addNodes)
767 {
768   if ( sm )
769   {
770     if ( addNodes )
771     {
772       SMDS_NodeIteratorPtr nIt = sm->GetNodes();
773       while ( nIt->more() ) addBadInputElement( nIt->next() );
774     }
775     else
776     {
777       SMDS_ElemIteratorPtr eIt = sm->GetElements();
778       while ( eIt->more() ) addBadInputElement( eIt->next() );
779     }
780   }
781 }
782
783 //=============================================================================
784 /*!
785  *  
786  */
787 //=============================================================================
788
789 // int SMESH_Algo::NumberOfWires(const TopoDS_Shape& S)
790 // {
791 //   int i = 0;
792 //   for (TopExp_Explorer exp(S,TopAbs_WIRE); exp.More(); exp.Next())
793 //     i++;
794 //   return i;
795 // }
796
797 //=============================================================================
798 /*!
799  *  
800  */
801 //=============================================================================
802
803 int SMESH_Algo::NumberOfPoints(SMESH_Mesh& aMesh, const TopoDS_Wire& W)
804 {
805   int nbPoints = 0;
806   for (TopExp_Explorer exp(W,TopAbs_EDGE); exp.More(); exp.Next()) {
807     const TopoDS_Edge& E = TopoDS::Edge(exp.Current());
808     int nb = aMesh.GetSubMesh(E)->GetSubMeshDS()->NbNodes();
809     if(_quadraticMesh)
810       nb = nb/2;
811     nbPoints += nb + 1; // internal points plus 1 vertex of 2 (last point ?)
812   }
813   return nbPoints;
814 }
815
816