1 // Created on: 1997-01-24
2 // Created by: Yves FRICAUD
3 // Copyright (c) 1997-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
6 // This file is part of Open CASCADE Technology software library.
8 // This library is free software; you can redistribute it and/or modify it under
9 // the terms of the GNU Lesser General Public License version 2.1 as published
10 // by the Free Software Foundation, with special exception defined in the file
11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 // distribution for complete text of the license and disclaimer of any warranty.
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
18 #include <TNaming_Iterator.hxx>
19 #include <TNaming_IteratorOnShapesSet.hxx>
20 #include <TNaming_ShapesSet.hxx>
21 #include <TopExp_Explorer.hxx>
22 #include <TopoDS_Iterator.hxx>
23 #include <TopoDS_Shape.hxx>
25 //#define MDTV_DEB_INT
26 //=======================================================================
27 //function : TNaming_ShapesSet
29 //=======================================================================
30 TNaming_ShapesSet::TNaming_ShapesSet (const TopoDS_Shape& CS,
31 const TopAbs_ShapeEnum Type)
33 if (CS.IsNull()) return;
35 cout << "ShapeSet: CS TShape = " <<CS.TShape() << " Type = " << Type <<endl;
37 if (Type == TopAbs_SHAPE) {
38 if (CS.ShapeType() == TopAbs_SOLID ||
39 CS.ShapeType() == TopAbs_FACE ||
40 CS.ShapeType() == TopAbs_EDGE ||
41 CS.ShapeType() == TopAbs_VERTEX ) {
45 for (TopoDS_Iterator it(CS) ; it.More(); it.Next()) {
52 // corrected by vro 13.09.00:
53 if (Type > CS.ShapeType()) {
54 for (TopExp_Explorer exp(CS,Type) ; exp.More(); exp.Next()) {
57 cout << "ShapeSet: sub-shape TShape = " <<exp.Current().TShape() <<endl;
61 // for (TopoDS_Iterator it(CS) ; it.More(); it.Next()) {
66 // end of correction by vro.
71 //=======================================================================
74 //=======================================================================
76 void TNaming_ShapesSet::Add(const TNaming_ShapesSet& Shapes)
78 TNaming_IteratorOnShapesSet it(Shapes);
79 for (; it.More(); it.Next()) {
80 myMap.Add(it.Value());
85 //=======================================================================
88 //=======================================================================
90 void TNaming_ShapesSet::Filter(const TNaming_ShapesSet& Shapes)
93 TNaming_ShapesSet ToRemove;
94 TNaming_IteratorOnShapesSet it(*this);
95 for (; it.More(); it.Next()) {
96 const TopoDS_Shape& S = it.Value();
97 if (!Shapes.Contains(S)) {
104 //=======================================================================
107 //=======================================================================
109 void TNaming_ShapesSet::Remove(const TNaming_ShapesSet& Shapes)
111 TNaming_IteratorOnShapesSet it(Shapes);
112 for (; it.More(); it.Next()) {
113 myMap.Remove(it.Value());