Salome HOME
Copyrights update
[modules/geom.git] / src / GEOMImpl / GEOMImpl_ChamferDriver.cxx
1 // Copyright (C) 2005  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
2 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
3 // 
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.
8 // 
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.
13 //
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
17 //
18 // See http://www.salome-platform.org/
19 //
20
21 #include <Standard_Stream.hxx>
22
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>
29
30 #include <BRep_Tool.hxx>
31 #include <BRepTools.hxx>
32 #include <BRepFilletAPI_MakeChamfer.hxx>
33
34 #include <TopAbs.hxx>
35 #include <TopoDS.hxx>
36 #include <TopoDS_Edge.hxx>
37 #include <TopoDS_Face.hxx>
38 #include <TopoDS_Shape.hxx>
39 #include <TopoDS_Iterator.hxx>
40 #include <TopExp.hxx>
41 #include <TopExp_Explorer.hxx>
42 #include <TopTools_MapOfShape.hxx>
43 #include <TopTools_IndexedDataMapOfShapeListOfShape.hxx>
44
45 #include <Precision.hxx>
46 #include <gp_Pnt.hxx>
47 #include <StdFail_NotDone.hxx>
48
49 //=======================================================================
50 //function : GetID
51 //purpose  :
52 //=======================================================================
53 const Standard_GUID& GEOMImpl_ChamferDriver::GetID()
54 {
55   static Standard_GUID aChamferDriver("FF1BBB42-5D14-4df2-980B-3A668264EA16");
56   return aChamferDriver;
57 }
58
59
60 //=======================================================================
61 //function : GEOMImpl_ChamferDriver
62 //purpose  :
63 //=======================================================================
64 GEOMImpl_ChamferDriver::GEOMImpl_ChamferDriver()
65 {
66 }
67
68 //=======================================================================
69 //function : isGoodForChamfer
70 //purpose  :
71 //=======================================================================
72 static Standard_Boolean isGoodForChamfer (const TopoDS_Shape& theShape)
73 {
74   if (theShape.ShapeType() == TopAbs_SHELL ||
75       theShape.ShapeType() == TopAbs_SOLID ||
76       theShape.ShapeType() == TopAbs_COMPSOLID) {
77     return Standard_True;
78   }
79
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;
87         }
88       }
89     }
90     return Standard_True;
91   }
92
93   return Standard_False;
94 }
95
96 //=======================================================================
97 //function : Execute
98 //purpose  :
99 //=======================================================================
100 Standard_Integer GEOMImpl_ChamferDriver::Execute(TFunction_Logbook& log) const
101 {
102   if (Label().IsNull()) return 0;
103   Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
104
105   GEOMImpl_IChamfer aCI (aFunction);
106   Standard_Integer aType = aFunction->GetType();
107
108   TopoDS_Shape aShape;
109
110   Handle(GEOM_Function) aRefShape = aCI.GetShape();
111   TopoDS_Shape aShapeBase = aRefShape->GetValue();
112
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");
118   }
119
120   BRepFilletAPI_MakeChamfer fill (aShapeBase);
121
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)
133         fill.Add(aD, E, F);
134     }
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);
143
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());
149       }
150
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);
158         }
159       }
160     }
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();
167     int ind = 1;
168     TopTools_MapOfShape aMap;
169     TopTools_IndexedDataMapOfShapeListOfShape M;
170     GEOMImpl_Block6Explorer::MapShapesAndAncestors(aShapeBase, TopAbs_EDGE, TopAbs_FACE, M);
171     for (; ind <= aLen; ind++)
172     {
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);
185           }
186         }
187       }
188     }
189   } else {
190   }
191
192   fill.Build();
193   if (!fill.IsDone()) {
194     StdFail_NotDone::Raise("Chamfer can not be computed on the given shape with the given parameters");
195   }
196   aShape = fill.Shape();
197
198   if (aShape.IsNull()) return 0;
199
200   aFunction->SetValue(aShape);
201
202   log.SetTouched(Label());
203
204   return 1;
205 }
206
207
208 //=======================================================================
209 //function :  GEOMImpl_ChamferDriver_Type_
210 //purpose  :
211 //=======================================================================
212 Standard_EXPORT Handle_Standard_Type& GEOMImpl_ChamferDriver_Type_()
213 {
214
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);
221
222
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),
226                                                          1,
227                                                          (Standard_Address)_Ancestors,
228                                                          (Standard_Address)NULL);
229
230   return _aType;
231 }
232
233 //=======================================================================
234 //function : DownCast
235 //purpose  :
236 //=======================================================================
237 const Handle(GEOMImpl_ChamferDriver) Handle(GEOMImpl_ChamferDriver)::DownCast(const Handle(Standard_Transient)& AnObject)
238 {
239   Handle(GEOMImpl_ChamferDriver) _anOtherObject;
240
241   if (!AnObject.IsNull()) {
242      if (AnObject->IsKind(STANDARD_TYPE(GEOMImpl_ChamferDriver))) {
243        _anOtherObject = Handle(GEOMImpl_ChamferDriver)((Handle(GEOMImpl_ChamferDriver)&)AnObject);
244      }
245   }
246
247   return _anOtherObject ;
248 }