1 // Created on: 2016-04-07
2 // Copyright (c) 2016 OPEN CASCADE SAS
3 // Created by: Oleg AGASHIN
5 // This file is part of Open CASCADE Technology software library.
7 // This library is free software; you can redistribute it and/or modify it under
8 // the terms of the GNU Lesser General Public License version 2.1 as published
9 // by the Free Software Foundation, with special exception defined in the file
10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 // distribution for complete text of the license and disclaimer of any warranty.
13 // Alternatively, this file may be used under the terms of Open CASCADE
14 // commercial license or contractual agreement.
16 #include <IMeshTools_ShapeExplorer.hxx>
18 #include <TopExp_Explorer.hxx>
20 #include <TopoDS_Face.hxx>
21 #include <TopoDS_Edge.hxx>
22 #include <TopTools_ListOfShape.hxx>
23 #include <BRepLib.hxx>
24 #include <BRep_Tool.hxx>
25 #include <TopTools_MapOfShape.hxx>
26 #include <Geom_Surface.hxx>
30 //=======================================================================
31 // Function: visitEdges
32 // Purpose : Explodes the given shape on edges according to the specified
33 // criteria and visits each one in order to add it to data model.
34 //=======================================================================
35 void visitEdges (const Handle (IMeshTools_ShapeVisitor)& theVisitor,
36 const TopoDS_Shape& theShape,
37 const Standard_Boolean isResetLocation,
38 const TopAbs_ShapeEnum theToFind,
39 const TopAbs_ShapeEnum theToAvoid = TopAbs_SHAPE)
41 TopExp_Explorer aEdgesIt (theShape, theToFind, theToAvoid);
42 for (; aEdgesIt.More (); aEdgesIt.Next ())
44 const TopoDS_Edge& aEdge = TopoDS::Edge (aEdgesIt.Current ());
45 if (!BRep_Tool::IsGeometric (aEdge))
50 theVisitor->Visit (isResetLocation ?
51 TopoDS::Edge (aEdge.Located (TopLoc_Location ())) :
57 //=======================================================================
58 // Function: Constructor
60 //=======================================================================
61 IMeshTools_ShapeExplorer::IMeshTools_ShapeExplorer (
62 const TopoDS_Shape& theShape)
63 : IMeshData_Shape (theShape)
67 //=======================================================================
68 // Function: Destructor
70 //=======================================================================
71 IMeshTools_ShapeExplorer::~IMeshTools_ShapeExplorer ()
75 //=======================================================================
78 //=======================================================================
79 void IMeshTools_ShapeExplorer::Accept (
80 const Handle (IMeshTools_ShapeVisitor)& theVisitor)
82 // Explore all free edges in shape.
83 visitEdges (theVisitor, GetShape (), Standard_True, TopAbs_EDGE, TopAbs_FACE);
85 // Explore all related to some face edges in shape.
86 // make array of faces suitable for processing (excluding faces without surface)
87 TopTools_ListOfShape aFaceList;
88 BRepLib::ReverseSortFaces (GetShape (), aFaceList);
89 TopTools_MapOfShape aFaceMap;
91 TopLoc_Location aDummyLoc;
92 const TopLoc_Location aEmptyLoc;
93 TopTools_ListIteratorOfListOfShape aFaceIter (aFaceList);
94 for (; aFaceIter.More (); aFaceIter.Next ())
96 TopoDS_Shape aFaceNoLoc = aFaceIter.Value ();
97 aFaceNoLoc.Location (aEmptyLoc);
98 if (!aFaceMap.Add(aFaceNoLoc))
100 continue; // already processed
103 const TopoDS_Face& aFace = TopoDS::Face (aFaceIter.Value ());
104 const Handle (Geom_Surface)& aSurf = BRep_Tool::Surface (aFace, aDummyLoc);
110 // Explore all edges in face.
111 visitEdges (theVisitor, aFace, Standard_False, TopAbs_EDGE);
113 // Store only forward faces in order to prevent inverse issue.
114 theVisitor->Visit (TopoDS::Face (aFace.Oriented (TopAbs_FORWARD)));