1 // Copyright (C) 2005 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
2 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
4 // This library is free software; you can redistribute it and/or
5 // modify it under the terms of the GNU Lesser General Public
6 // License as published by the Free Software Foundation; either
7 // version 2.1 of the License.
9 // This library is distributed in the hope that it will be useful
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 // Lesser General Public License for more details.
14 // You should have received a copy of the GNU Lesser General Public
15 // License along with this library; if not, write to the Free Software
16 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 #include <Standard_Stream.hxx>
23 #include <GEOMImpl_ChamferDriver.hxx>
24 #include <GEOMImpl_IChamfer.hxx>
25 #include <GEOMImpl_Types.hxx>
26 #include <GEOMImpl_ILocalOperations.hxx>
27 #include <GEOM_Function.hxx>
28 #include <GEOMImpl_Block6Explorer.hxx>
30 #include <BRep_Tool.hxx>
31 #include <BRepTools.hxx>
32 #include <BRepFilletAPI_MakeChamfer.hxx>
36 #include <TopoDS_Edge.hxx>
37 #include <TopoDS_Face.hxx>
38 #include <TopoDS_Shape.hxx>
39 #include <TopoDS_Iterator.hxx>
41 #include <TopExp_Explorer.hxx>
42 #include <TopTools_MapOfShape.hxx>
43 #include <TopTools_IndexedDataMapOfShapeListOfShape.hxx>
45 #include <Precision.hxx>
47 #include <StdFail_NotDone.hxx>
49 //=======================================================================
52 //=======================================================================
53 const Standard_GUID& GEOMImpl_ChamferDriver::GetID()
55 static Standard_GUID aChamferDriver("FF1BBB42-5D14-4df2-980B-3A668264EA16");
56 return aChamferDriver;
60 //=======================================================================
61 //function : GEOMImpl_ChamferDriver
63 //=======================================================================
64 GEOMImpl_ChamferDriver::GEOMImpl_ChamferDriver()
68 //=======================================================================
69 //function : isGoodForChamfer
71 //=======================================================================
72 static Standard_Boolean isGoodForChamfer (const TopoDS_Shape& theShape)
74 if (theShape.ShapeType() == TopAbs_SHELL ||
75 theShape.ShapeType() == TopAbs_SOLID ||
76 theShape.ShapeType() == TopAbs_COMPSOLID) {
80 if (theShape.ShapeType() == TopAbs_COMPOUND) {
81 TopTools_MapOfShape mapShape;
82 TopoDS_Iterator It (theShape, Standard_False, Standard_False);
83 for (; It.More(); It.Next()) {
84 if (mapShape.Add(It.Value())) {
85 if (!isGoodForChamfer(It.Value())) {
86 return Standard_False;
93 return Standard_False;
96 //=======================================================================
99 //=======================================================================
100 Standard_Integer GEOMImpl_ChamferDriver::Execute(TFunction_Logbook& log) const
102 if (Label().IsNull()) return 0;
103 Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
105 GEOMImpl_IChamfer aCI (aFunction);
106 Standard_Integer aType = aFunction->GetType();
110 Handle(GEOM_Function) aRefShape = aCI.GetShape();
111 TopoDS_Shape aShapeBase = aRefShape->GetValue();
113 // Check the shape type. It have to be shell
114 // or solid, or compsolid, or compound of these shapes.
115 if (!isGoodForChamfer(aShapeBase)) {
116 StdFail_NotDone::Raise
117 ("Wrong shape. Must be shell or solid, or compsolid or compound of these shapes");
120 BRepFilletAPI_MakeChamfer fill (aShapeBase);
122 if (aType == CHAMFER_SHAPE_ALL) {
123 // symmetric chamfer on all edges
124 double aD = aCI.GetD();
125 TopTools_IndexedDataMapOfShapeListOfShape M;
126 GEOMImpl_Block6Explorer::MapShapesAndAncestors(aShapeBase, TopAbs_EDGE, TopAbs_FACE, M);
127 for (int i = 1; i <= M.Extent(); i++) {
128 TopoDS_Edge E = TopoDS::Edge(M.FindKey(i));
129 TopoDS_Face F = TopoDS::Face(M.FindFromIndex(i).First());
130 if (!BRepTools::IsReallyClosed(E, F) &&
131 !BRep_Tool::Degenerated(E) &&
132 M.FindFromIndex(i).Extent() == 2)
135 } else if (aType == CHAMFER_SHAPE_EDGE) {
136 // chamfer on edges, common to two faces, with D1 on the first face
137 double aD1 = aCI.GetD1();
138 double aD2 = aCI.GetD2();
139 TopoDS_Shape aFace1, aFace2;
140 if (GEOMImpl_ILocalOperations::GetSubShape(aShapeBase, aCI.GetFace1(), aFace1) &&
141 GEOMImpl_ILocalOperations::GetSubShape(aShapeBase, aCI.GetFace2(), aFace2)) {
142 TopoDS_Face F = TopoDS::Face(aFace1);
144 // fill map of edges of the second face
145 TopTools_MapOfShape aMap;
146 TopExp_Explorer Exp2 (aFace2, TopAbs_EDGE);
147 for (; Exp2.More(); Exp2.Next()) {
148 aMap.Add(Exp2.Current());
151 // find edges of the first face, common with the second face
152 TopExp_Explorer Exp (aFace1, TopAbs_EDGE);
153 for (; Exp.More(); Exp.Next()) {
154 if (aMap.Contains(Exp.Current())) {
155 TopoDS_Edge E = TopoDS::Edge(Exp.Current());
156 if (!BRepTools::IsReallyClosed(E, F) && !BRep_Tool::Degenerated(E))
157 fill.Add(aD1, aD2, E, F);
161 } else if (aType == CHAMFER_SHAPE_FACES) {
162 // chamfer on all edges of the selected faces, with D1 on the selected face
163 // (on first selected face, if the edge belongs to two selected faces)
164 double aD1 = aCI.GetD1();
165 double aD2 = aCI.GetD2();
166 int aLen = aCI.GetLength();
168 TopTools_MapOfShape aMap;
169 TopTools_IndexedDataMapOfShapeListOfShape M;
170 GEOMImpl_Block6Explorer::MapShapesAndAncestors(aShapeBase, TopAbs_EDGE, TopAbs_FACE, M);
171 for (; ind <= aLen; ind++)
173 TopoDS_Shape aShapeFace;
174 if (GEOMImpl_ILocalOperations::GetSubShape
175 (aShapeBase, aCI.GetFace(ind), aShapeFace)) {
176 TopoDS_Face F = TopoDS::Face(aShapeFace);
177 TopExp_Explorer Exp (F, TopAbs_EDGE);
178 for (; Exp.More(); Exp.Next()) {
179 if (!aMap.Contains(Exp.Current())) {
180 TopoDS_Edge E = TopoDS::Edge(Exp.Current());
181 if (!BRepTools::IsReallyClosed(E, F) &&
182 !BRep_Tool::Degenerated(E) &&
183 M.FindFromKey(E).Extent() == 2)
184 fill.Add(aD1, aD2, E, F);
193 if (!fill.IsDone()) {
194 StdFail_NotDone::Raise("Chamfer can not be computed on the given shape with the given parameters");
196 aShape = fill.Shape();
198 if (aShape.IsNull()) return 0;
200 aFunction->SetValue(aShape);
202 log.SetTouched(Label());
208 //=======================================================================
209 //function : GEOMImpl_ChamferDriver_Type_
211 //=======================================================================
212 Standard_EXPORT Handle_Standard_Type& GEOMImpl_ChamferDriver_Type_()
215 static Handle_Standard_Type aType1 = STANDARD_TYPE(TFunction_Driver);
216 if ( aType1.IsNull()) aType1 = STANDARD_TYPE(TFunction_Driver);
217 static Handle_Standard_Type aType2 = STANDARD_TYPE(MMgt_TShared);
218 if ( aType2.IsNull()) aType2 = STANDARD_TYPE(MMgt_TShared);
219 static Handle_Standard_Type aType3 = STANDARD_TYPE(Standard_Transient);
220 if ( aType3.IsNull()) aType3 = STANDARD_TYPE(Standard_Transient);
223 static Handle_Standard_Transient _Ancestors[]= {aType1,aType2,aType3,NULL};
224 static Handle_Standard_Type _aType = new Standard_Type("GEOMImpl_ChamferDriver",
225 sizeof(GEOMImpl_ChamferDriver),
227 (Standard_Address)_Ancestors,
228 (Standard_Address)NULL);
233 //=======================================================================
234 //function : DownCast
236 //=======================================================================
237 const Handle(GEOMImpl_ChamferDriver) Handle(GEOMImpl_ChamferDriver)::DownCast(const Handle(Standard_Transient)& AnObject)
239 Handle(GEOMImpl_ChamferDriver) _anOtherObject;
241 if (!AnObject.IsNull()) {
242 if (AnObject->IsKind(STANDARD_TYPE(GEOMImpl_ChamferDriver))) {
243 _anOtherObject = Handle(GEOMImpl_ChamferDriver)((Handle(GEOMImpl_ChamferDriver)&)AnObject);
247 return _anOtherObject ;