Salome HOME
c6655fa58abc42fb8b13a8c46cad6fffed55b021
[modules/geom.git] / src / GEOMImpl / GEOMImpl_RotateDriver.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/ or email : webmaster.salome@opencascade.com
19 //
20
21 #include <Standard_Stream.hxx>
22
23 #include <GEOMImpl_RotateDriver.hxx>
24 #include <GEOMImpl_IRotate.hxx>
25 #include <GEOMImpl_Types.hxx>
26 #include <GEOM_Function.hxx>
27 #include <gp_Trsf.hxx>
28 #include <gp_Pnt.hxx>
29 #include <gp_Vec.hxx>
30 #include <gp_Dir.hxx>
31 #include <gp_Ax1.hxx>
32 #include <BRepBuilderAPI_Transform.hxx>
33 #include <TopoDS.hxx>
34 #include <TopoDS_Vertex.hxx>
35 #include <TopoDS_Shape.hxx>
36 #include <TopoDS_Compound.hxx>
37 #include <TopAbs.hxx>
38 #include <TopExp.hxx>
39 #include <TopoDS_Vertex.hxx>
40 #include <TopoDS_Edge.hxx>
41 #include <BRep_Tool.hxx>
42 #include <BRep_Builder.hxx>
43 #include <GeomAPI_ProjectPointOnCurve.hxx>
44 #include <Geom_Line.hxx>
45 #include <GProp_GProps.hxx>
46 #include <BRepGProp.hxx>
47 #include <Precision.hxx>
48
49 //=======================================================================
50 //function : GetID
51 //purpose  :
52 //=======================================================================
53 const Standard_GUID& GEOMImpl_RotateDriver::GetID()
54 {
55   static Standard_GUID aRotateDriver("FF1BBB56-5D14-4df2-980B-3A668264EA16");
56   return aRotateDriver;
57 }
58
59
60 //=======================================================================
61 //function : GEOMImpl_RotateDriver
62 //purpose  :
63 //=======================================================================
64
65 GEOMImpl_RotateDriver::GEOMImpl_RotateDriver()
66 {
67 }
68
69 //=======================================================================
70 //function : Execute
71 //purpose  :
72 //=======================================================================
73 Standard_Integer GEOMImpl_RotateDriver::Execute(TFunction_Logbook& log) const
74 {
75   if (Label().IsNull()) return 0;
76   Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
77
78   if (aFunction.IsNull()) return 0;
79
80   GEOMImpl_IRotate RI(aFunction);
81   gp_Trsf aTrsf;
82   gp_Pnt aCP, aP1, aP2;
83   Standard_Integer aType = aFunction->GetType();
84   Handle(GEOM_Function) anOriginalFunction = RI.GetOriginal();
85   if (anOriginalFunction.IsNull()) return 0;
86   TopoDS_Shape aShape, anOriginal = anOriginalFunction->GetValue();
87   if (anOriginal.IsNull()) return 0;
88
89   if (aType == ROTATE || aType == ROTATE_COPY) {
90     Handle(GEOM_Function) anAxis = RI.GetAxis();
91     if (anAxis.IsNull()) return 0;
92     TopoDS_Shape A = anAxis->GetValue();
93     if (A.IsNull() || A.ShapeType() != TopAbs_EDGE) return 0;
94     TopoDS_Edge anEdge = TopoDS::Edge(A);
95
96     gp_Pnt aP1 = BRep_Tool::Pnt(TopExp::FirstVertex(anEdge));
97     gp_Pnt aP2 = BRep_Tool::Pnt(TopExp::LastVertex(anEdge));
98     gp_Dir aDir(gp_Vec(aP1, aP2));
99     gp_Ax1 anAx1(aP1, aDir);
100     Standard_Real anAngle = RI.GetAngle();
101     aTrsf.SetRotation(anAx1, anAngle);
102
103     //NPAL18620: performance problem: multiple locations are accumulated
104     //           in shape and need a great time to process
105     //BRepBuilderAPI_Transform aTransformation(anOriginal, aTrsf, Standard_False);
106     //aShape = aTransformation.Shape();
107     TopLoc_Location aLocOrig = anOriginal.Location();
108     gp_Trsf aTrsfOrig = aLocOrig.Transformation();
109     TopLoc_Location aLocRes (aTrsf * aTrsfOrig);
110     aShape = anOriginal.Located(aLocRes);
111   }
112   else if (aType ==  ROTATE_THREE_POINTS || aType == ROTATE_THREE_POINTS_COPY) {
113     Handle(GEOM_Function) aCentPoint = RI.GetCentPoint();
114     Handle(GEOM_Function) aPoint1 = RI.GetPoint1();
115     Handle(GEOM_Function) aPoint2 = RI.GetPoint2();
116     if(aCentPoint.IsNull() || aPoint1.IsNull() || aPoint2.IsNull()) return 0;
117     TopoDS_Shape aCV = aCentPoint->GetValue();
118     TopoDS_Shape aV1 = aPoint1->GetValue();
119     TopoDS_Shape aV2 = aPoint2->GetValue();
120     if(aCV.IsNull() || aCV.ShapeType() != TopAbs_VERTEX) return 0;
121     if(aV1.IsNull() || aV1.ShapeType() != TopAbs_VERTEX) return 0;
122     if(aV2.IsNull() || aV2.ShapeType() != TopAbs_VERTEX) return 0;
123
124     aCP = BRep_Tool::Pnt(TopoDS::Vertex(aCV));
125     aP1 = BRep_Tool::Pnt(TopoDS::Vertex(aV1));
126     aP2 = BRep_Tool::Pnt(TopoDS::Vertex(aV2));
127
128     gp_Vec aVec1(aCP, aP1);
129     gp_Vec aVec2(aCP, aP2);
130     gp_Dir aDir(aVec1 ^ aVec2);
131     gp_Ax1 anAx1(aCP, aDir);
132     Standard_Real anAngle = aVec1.Angle(aVec2);
133     aTrsf.SetRotation(anAx1, anAngle);
134     //NPAL18620: performance problem: multiple locations are accumulated
135     //           in shape and need a great time to process
136     //BRepBuilderAPI_Transform aTransformation(anOriginal, aTrsf, Standard_False);
137     //aShape = aTransformation.Shape();
138     TopLoc_Location aLocOrig = anOriginal.Location();
139     gp_Trsf aTrsfOrig = aLocOrig.Transformation();
140     TopLoc_Location aLocRes (aTrsf * aTrsfOrig);
141     aShape = anOriginal.Located(aLocRes);
142   }
143   else if (aType == ROTATE_1D) {
144     //Get direction
145     Handle(GEOM_Function) anAxis = RI.GetAxis();
146     if(anAxis.IsNull()) return 0;
147     TopoDS_Shape A = anAxis->GetValue();
148     if(A.IsNull() || A.ShapeType() != TopAbs_EDGE) return 0;
149     TopoDS_Edge anEdge = TopoDS::Edge(A);
150
151     gp_Pnt aP1 = BRep_Tool::Pnt(TopExp::FirstVertex(anEdge));
152     gp_Pnt aP2 = BRep_Tool::Pnt(TopExp::LastVertex(anEdge));
153     gp_Dir D(gp_Vec(aP1, aP2));
154
155     gp_Ax1 AX1(aP1, D);
156
157     Standard_Integer nbtimes = RI.GetNbIter1();
158     Standard_Real angle = 360.0/nbtimes;
159
160     TopoDS_Compound aCompound;
161     BRep_Builder B;
162     B.MakeCompound( aCompound );
163
164     TopLoc_Location aLocOrig = anOriginal.Location();
165     gp_Trsf aTrsfOrig = aLocOrig.Transformation();
166
167     for (int i = 0; i < nbtimes; i++ ) {
168       aTrsf.SetRotation(AX1, i*angle*PI180);
169       //NPAL18620: performance problem: multiple locations are accumulated
170       //           in shape and need a great time to process
171       //BRepBuilderAPI_Transform aBRepTransformation(anOriginal, aTrsf, Standard_False);
172       //B.Add(aCompound, aBRepTransformation.Shape());
173       TopLoc_Location aLocRes (aTrsf * aTrsfOrig);
174       B.Add(aCompound, anOriginal.Located(aLocRes));
175     }
176
177     aShape = aCompound;
178   }
179   else if (aType == ROTATE_2D) {
180     Standard_Real DX, DY, DZ;
181
182     //Get direction
183     Handle(GEOM_Function) anAxis = RI.GetAxis();
184     if(anAxis.IsNull()) return 0;
185     TopoDS_Shape A = anAxis->GetValue();
186     if(A.IsNull() || A.ShapeType() != TopAbs_EDGE) return 0;
187     TopoDS_Edge anEdge = TopoDS::Edge(A);
188     gp_Pnt aP1 = BRep_Tool::Pnt(TopExp::FirstVertex(anEdge));
189     gp_Pnt aP2 = BRep_Tool::Pnt(TopExp::LastVertex(anEdge));
190     gp_Dir D(gp_Vec(aP1, aP2));
191
192     gp_Ax1 AX1(aP1, D);
193
194
195     gp_Trsf aTrsf1;
196     gp_Trsf aTrsf2;
197     gp_Pnt P1;
198     GProp_GProps System;
199
200     if (anOriginal.ShapeType() == TopAbs_VERTEX) {
201       P1 = BRep_Tool::Pnt(TopoDS::Vertex( anOriginal ));
202     }
203     else if ( anOriginal.ShapeType() == TopAbs_EDGE || anOriginal.ShapeType() == TopAbs_WIRE ) {
204       BRepGProp::LinearProperties(anOriginal, System);
205       P1 = System.CentreOfMass();
206     }
207     else if ( anOriginal.ShapeType() == TopAbs_FACE || anOriginal.ShapeType() == TopAbs_SHELL ) {
208       BRepGProp::SurfaceProperties(anOriginal, System);
209       P1 = System.CentreOfMass();
210     }
211     else {
212       BRepGProp::VolumeProperties(anOriginal, System);
213       P1 = System.CentreOfMass();
214     }
215
216     Handle(Geom_Line) Line = new Geom_Line(AX1);
217     GeomAPI_ProjectPointOnCurve aPrjTool( P1, Line );
218     gp_Pnt P2 = aPrjTool.NearestPoint();
219
220     if ( P1.IsEqual(P2, Precision::Confusion() ) ) return 0;
221
222     gp_Vec Vec(P1.X()-P2.X(), P1.Y()-P2.Y(), P1.Z()-P2.Z());
223     Vec.Normalize();
224
225     Standard_Integer nbtimes2 = RI.GetNbIter2();
226     Standard_Integer nbtimes1 = RI.GetNbIter1();
227     Standard_Real step = RI.GetStep();
228     Standard_Real ang = RI.GetAngle();
229
230     TopLoc_Location aLocOrig = anOriginal.Location();
231     gp_Trsf aTrsfOrig = aLocOrig.Transformation();
232
233     gp_Vec aVec;
234     TopoDS_Compound aCompound;
235     BRep_Builder B;
236     B.MakeCompound( aCompound );
237     for (int i = 0; i < nbtimes2; i++ ) {
238       for (int j = 0; j < nbtimes1; j++ ) {
239         DX = i * step * Vec.X();
240         DY = i * step * Vec.Y();
241         DZ = i * step * Vec.Z();
242         aVec.SetCoord( DX, DY, DZ );
243         aTrsf1.SetTranslation(aVec);
244         aTrsf2.SetRotation(AX1, j*ang*PI180);
245         //NPAL18620: performance problem: multiple locations are accumulated
246         //           in shape and need a great time to process
247         //BRepBuilderAPI_Transform aBRepTrsf1 (anOriginal, aTrsf1, Standard_False);
248         //BRepBuilderAPI_Transform aBRepTrsf2 (aBRepTrsf1.Shape(), aTrsf2, Standard_False);
249         //B.Add(aCompound, aBRepTrsf2.Shape());
250         TopLoc_Location aLocRes (aTrsf2 * aTrsf1 * aTrsfOrig);
251         B.Add(aCompound, anOriginal.Located(aLocRes));
252       }
253     }
254
255     aShape = aCompound;
256   }
257   else return 0;
258
259
260   if (aShape.IsNull()) return 0;
261
262   aFunction->SetValue(aShape);
263
264   log.SetTouched(Label());
265
266   return 1;
267 }
268
269
270 //=======================================================================
271 //function :  GEOMImpl_RotateDriver_Type_
272 //purpose  :
273 //=======================================================================
274 Standard_EXPORT Handle_Standard_Type& GEOMImpl_RotateDriver_Type_()
275 {
276   static Handle_Standard_Type aType1 = STANDARD_TYPE(TFunction_Driver);
277   if ( aType1.IsNull()) aType1 = STANDARD_TYPE(TFunction_Driver);
278   static Handle_Standard_Type aType2 = STANDARD_TYPE(MMgt_TShared);
279   if ( aType2.IsNull()) aType2 = STANDARD_TYPE(MMgt_TShared);
280   static Handle_Standard_Type aType3 = STANDARD_TYPE(Standard_Transient);
281   if ( aType3.IsNull()) aType3 = STANDARD_TYPE(Standard_Transient);
282
283   static Handle_Standard_Transient _Ancestors[]= {aType1,aType2,aType3,NULL};
284   static Handle_Standard_Type _aType = new Standard_Type("GEOMImpl_RotateDriver",
285                                                          sizeof(GEOMImpl_RotateDriver),
286                                                          1,
287                                                          (Standard_Address)_Ancestors,
288                                                          (Standard_Address)NULL);
289
290   return _aType;
291 }
292
293 //=======================================================================
294 //function : DownCast
295 //purpose  :
296 //=======================================================================
297 const Handle(GEOMImpl_RotateDriver) Handle(GEOMImpl_RotateDriver)::DownCast(const Handle(Standard_Transient)& AnObject)
298 {
299   Handle(GEOMImpl_RotateDriver) _anOtherObject;
300
301   if (!AnObject.IsNull()) {
302      if (AnObject->IsKind(STANDARD_TYPE(GEOMImpl_RotateDriver))) {
303        _anOtherObject = Handle(GEOMImpl_RotateDriver)((Handle(GEOMImpl_RotateDriver)&)AnObject);
304      }
305   }
306
307   return _anOtherObject;
308 }