1 // Copyright (C) 2007-2008 CEA/DEN, EDF R&D, OPEN CASCADE
3 // Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
22 #include <Standard_Stream.hxx>
24 #include <GEOMImpl_DividedDiskDriver.hxx>
25 #include <GEOMImpl_IDividedDisk.hxx>
26 #include <GEOMImpl_Types.hxx>
27 #include <GEOM_Function.hxx>
33 #include <gp_Circ.hxx>
37 #include <BRep_Builder.hxx>
38 #include <BRepBuilderAPI_MakeFace.hxx>
39 #include <BRepBuilderAPI_MakeEdge.hxx>
40 #include <BRepBuilderAPI_MakeVertex.hxx>
41 #include <BRepBuilderAPI_MakeWire.hxx>
42 #include <BRepBuilderAPI_Transform.hxx>
44 #include <Geom_Plane.hxx>
47 #include <TopoDS_Shape.hxx>
48 #include <TopoDS_Edge.hxx>
50 #include <TFunction_Logbook.hxx>
51 #include <StdFail_NotDone.hxx>
55 #include <utilities.h>
56 //@@ include required header files here @@//
63 //=======================================================================
66 //=======================================================================
67 const Standard_GUID& GEOMImpl_DividedDiskDriver::GetID()
69 static Standard_GUID aGUID("0b01da9a-c5da-11e1-8d80-78e7d1879630");
73 //=======================================================================
74 //function : GEOMImpl_DividedDiskDriver
76 //=======================================================================
77 GEOMImpl_DividedDiskDriver::GEOMImpl_DividedDiskDriver()
81 //=======================================================================
84 //=======================================================================
85 Standard_Integer GEOMImpl_DividedDiskDriver::Execute(TFunction_Logbook& log) const
87 if (Label().IsNull()) return 0;
88 Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
90 GEOMImpl_IDividedDisk aData (aFunction);
91 Standard_Integer aType = aFunction->GetType();
96 double R = aData.GetR();
97 double Ratio = aData.GetRatio();
98 int Pattern = aData.GetType();
100 // Build reference disk (in the global coordinate system)
103 if (Pattern == SQUARE)
104 aDisk = MakeDiskSquare( R, Ratio );
105 else if (Pattern == HEXAGON)
106 aDisk = MakeDiskHexagon( R, Ratio );
108 if (aType == DIVIDEDDISK_R_RATIO)
110 int theOrientation = aData.GetOrientation();
111 aShape = TransformShape(aDisk, theOrientation);
113 else if (aType == DIVIDEDDISK_R_VECTOR_PNT)
115 Handle(GEOM_Function) aRefPoint = aData.GetCenter();
116 Handle(GEOM_Function) aRefVector = aData.GetVector();
117 TopoDS_Shape aShapePnt = aRefPoint->GetValue();
118 TopoDS_Shape aShapeVec = aRefVector->GetValue();
120 if (aShapePnt.ShapeType() == TopAbs_VERTEX &&
121 aShapeVec.ShapeType() == TopAbs_EDGE)
123 gp_Pnt aPnt = BRep_Tool::Pnt(TopoDS::Vertex(aShapePnt));
124 TopoDS_Edge anE = TopoDS::Edge(aShapeVec);
125 TopoDS_Vertex V1, V2;
126 TopExp::Vertices(anE, V1, V2, Standard_True);
127 if (!V1.IsNull() && !V2.IsNull())
129 gp_Vec aVec (BRep_Tool::Pnt(V1), BRep_Tool::Pnt(V2));
131 aShape = TransformShape(aDisk, aPnt, aDir);
136 if (aShape.IsNull()) return 0;
138 aFunction->SetValue(aShape);
140 log.SetTouched(Label());
146 //=======================================================================
147 //function : MakeDiskHexagon
149 //=======================================================================
150 TopoDS_Shell GEOMImpl_DividedDiskDriver::MakeDiskHexagon(double R, double Ratio) const
158 gp_Ax1 Ax1(Orig,ZDir);
159 gp_Ax2 Ax(Orig,ZDir,XDir);
160 gp_Circ aCircle(Ax, R);
163 // gp_Pnt P4(0.01*Ratio*R,0,0);
165 // gp_Pnt P2 = P3.Rotated(Ax1,-M_PI/6.0);
167 // P4.X()/sqrt(3.0),0);
168 gp_Pnt P1(0.01*Ratio*R*sqrt(3.0)/2,0,0);
170 gp_Pnt P3 = P2.Rotated(Ax1,M_PI/6.0);
176 gp_Ax2 anAx (gp::XOY());
177 Handle(Geom_Plane) aPlane = new Geom_Plane (anAx);
182 TopoDS_Vertex O = BRepBuilderAPI_MakeVertex(Orig);
183 TopoDS_Vertex V1_init = BRepBuilderAPI_MakeVertex(P1);
184 TopoDS_Vertex V2_init = BRepBuilderAPI_MakeVertex(P2);
185 TopoDS_Vertex V3 = BRepBuilderAPI_MakeVertex(P3);
186 TopoDS_Vertex V4 = BRepBuilderAPI_MakeVertex(P4);
188 TopoDS_Vertex V1 = V1_init;
189 TopoDS_Vertex V2 = V2_init;
193 myTrsf.SetRotation(Ax1, M_PI/3.0);
195 BRepBuilderAPI_Transform xform(myTrsf);
196 xform.Perform(V1,Standard_True);
197 TopoDS_Vertex V1_60 = TopoDS::Vertex(xform.Shape());
198 xform.Perform(V2,Standard_True);
199 TopoDS_Vertex V2_60 = TopoDS::Vertex(xform.Shape());
201 // Declaration of shapes (used in the loop)
202 TopoDS_Edge E1, E2, E3, E4, E5, E6, E7, E8, E9;
203 TopoDS_Wire W1, W2, W3;
204 TopoDS_Face F1, F2, F3;
207 BRep_Builder aBuilder;
208 aBuilder.MakeShell(S);
210 // Initialisation of edges
211 TopoDS_Edge E1_init = BRepBuilderAPI_MakeEdge(V1,TopoDS::Vertex(V2.Reversed()));
213 TopoDS_Edge E8_init = BRepBuilderAPI_MakeEdge(O,TopoDS::Vertex(V1.Reversed()));
216 for (int i=1;i<=6;i++)
221 E2 = BRepBuilderAPI_MakeEdge(aCircle, V2, TopoDS::Vertex(V3.Reversed()));
222 E3 = BRepBuilderAPI_MakeEdge(V3,TopoDS::Vertex(V4.Reversed()));
223 E4 = BRepBuilderAPI_MakeEdge(V4,TopoDS::Vertex(V1.Reversed()));
228 E5 = BRepBuilderAPI_MakeEdge(aCircle, V3, TopoDS::Vertex(V2_init.Reversed()));
229 E7 = BRepBuilderAPI_MakeEdge(V1_init,TopoDS::Vertex(V4.Reversed()));
233 E5 = BRepBuilderAPI_MakeEdge(aCircle, V3, TopoDS::Vertex(V2_60.Reversed()));
234 E7 = BRepBuilderAPI_MakeEdge(V1_60,TopoDS::Vertex(V4.Reversed()));
236 E6 = BRepBuilderAPI_MakeEdge(V2_60,TopoDS::Vertex(V1_60.Reversed()));
239 E9 = BRepBuilderAPI_MakeEdge(V1_60,TopoDS::Vertex(O.Reversed()));
245 aBuilder.MakeWire(W1);
249 aBuilder.Add(W1,TopoDS::Edge(E1.Reversed()));
255 aBuilder.MakeWire(W2);
256 aBuilder.Add(W2,TopoDS::Edge(E3.Reversed()));
259 aBuilder.Add(W2,TopoDS::Edge(E1_init.Reversed()));
265 aBuilder.MakeWire(W3);
269 aBuilder.Add(W3,TopoDS::Edge(E8.Reversed()));
270 aBuilder.Add(W3,TopoDS::Edge(E4.Reversed()));
271 aBuilder.Add(W3,TopoDS::Edge(E7.Reversed()));
273 aBuilder.Add(W3,TopoDS::Edge(E8_init.Reversed()));
278 F1 = BRepBuilderAPI_MakeFace(aPlane,W1);
279 F2 = BRepBuilderAPI_MakeFace(aPlane,W2);
280 F3 = BRepBuilderAPI_MakeFace(aPlane,W3);
291 xform.Perform(V1_60,Standard_True);
292 V1_60 = TopoDS::Vertex(xform.Shape());
293 xform.Perform(V2_60,Standard_True);
294 V2_60 = TopoDS::Vertex(xform.Shape());
295 xform.Perform(V3,Standard_True);
296 V3 = TopoDS::Vertex(xform.Shape());
297 xform.Perform(V4,Standard_True);
298 V4 = TopoDS::Vertex(xform.Shape());
300 // "Increment" of edges
308 //=======================================================================
309 //function : MakeDiskSquare
311 //=======================================================================
312 TopoDS_Shape GEOMImpl_DividedDiskDriver::MakeDiskSquare(double R, double Ratio) const
320 gp_Ax1 Ax1(Orig,ZDir);
321 gp_Ax2 Ax(Orig,ZDir,XDir);
322 gp_Circ aCircle(Ax, R);
325 gp_Pnt P1(0.01*Ratio*R,0,0);
329 gp_Ax2 anAx (gp::XOY());
330 Handle(Geom_Plane) aPlane = new Geom_Plane (anAx);
335 TopoDS_Vertex V1_init = BRepBuilderAPI_MakeVertex(P1);
336 TopoDS_Vertex V2_init = BRepBuilderAPI_MakeVertex(P2);
338 TopoDS_Vertex V1 = V1_init;
339 TopoDS_Vertex V2 = V2_init;
343 myTrsf.SetRotation(Ax1, M_PI/2);
345 BRepBuilderAPI_Transform xform(myTrsf);
346 xform.Perform(V1,Standard_True);
347 TopoDS_Vertex V1_rotated = TopoDS::Vertex(xform.Shape());
348 xform.Perform(V2,Standard_True);
349 TopoDS_Vertex V2_rotated = TopoDS::Vertex(xform.Shape());
351 // Declaration of shapes (used in the loop)
352 TopoDS_Edge E1, E2, E3, E4;
357 BRep_Builder aBuilder;
358 aBuilder.MakeWire(W2); // Central Wire
359 aBuilder.MakeShell(S); // Shell
361 // Initialisation of edges
362 TopoDS_Edge E1_init = BRepBuilderAPI_MakeEdge(V1,TopoDS::Vertex(V2.Reversed()));
365 for (int i=1;i<=4;i++)
370 E3 = BRepBuilderAPI_MakeEdge(V2_rotated,TopoDS::Vertex(V1_rotated.Reversed()));
373 E2 = BRepBuilderAPI_MakeEdge(aCircle, V2, TopoDS::Vertex(V2_init.Reversed()));
374 E4 = BRepBuilderAPI_MakeEdge(V1_init,TopoDS::Vertex(V1.Reversed()));
378 E2 = BRepBuilderAPI_MakeEdge(aCircle, V2, TopoDS::Vertex(V2_rotated.Reversed()));
379 E4 = BRepBuilderAPI_MakeEdge(V1_rotated,TopoDS::Vertex(V1.Reversed()));
384 aBuilder.MakeWire(W1);
388 aBuilder.Add(W1,TopoDS::Edge(E1.Reversed()));
391 aBuilder.Add(W1,TopoDS::Edge(E1_init.Reversed()));
397 aBuilder.Add(W2,TopoDS::Edge(E4.Reversed()));
400 F1 = BRepBuilderAPI_MakeFace(aPlane,W1);
409 xform.Perform(V1_rotated,Standard_True);
410 V1_rotated = TopoDS::Vertex(xform.Shape());
411 xform.Perform(V2_rotated,Standard_True);
412 V2_rotated = TopoDS::Vertex(xform.Shape());
414 // "Increment" of edges
417 // Central square Face
418 F2 = BRepBuilderAPI_MakeFace(aPlane,W2);
425 //=======================================================================
426 //function : TrasformShape(TopoDS_Shape aShape,int theOrientation)
427 //purpose : Perform shape transformation accordingly with specified
429 //=======================================================================
430 TopoDS_Shape GEOMImpl_DividedDiskDriver::TransformShape(TopoDS_Shape theShape, int theOrientation) const
433 gp_Pnt theOrigin = gp::Origin();
435 switch(theOrientation)
457 gp_Ax3 aWPlane = gp_Ax3(theOrigin, N, Vx);
459 return WPlaneTransform(theShape, aWPlane);
462 //=======================================================================
463 //function : TrasformShape(TopoDS_Shape aShape, gp_Dir V, gp_Pnt P)
464 //purpose : Perform shape transformation accordingly with specified
466 //=======================================================================
467 TopoDS_Shape GEOMImpl_DividedDiskDriver::TransformShape(TopoDS_Shape theShape, gp_Pnt P, gp_Dir V) const
469 gp_Ax3 aWPlane( P, V );
470 return WPlaneTransform(theShape, aWPlane);
473 //=======================================================================
474 //function : WPlaneTransform
475 //purpose : Perform shape transformation accordingly with the given
477 //=======================================================================
478 TopoDS_Shape GEOMImpl_DividedDiskDriver::WPlaneTransform(TopoDS_Shape theShape, gp_Ax3 theWPlane) const
481 aTrans.SetTransformation(theWPlane);
483 BRepBuilderAPI_Transform aTransformation (theShape, aTrans, Standard_False);
484 return aTransformation.Shape();
487 //=======================================================================
488 //function : GEOMImpl_DividedDiskDriver_Type_
490 //=======================================================================
491 Standard_EXPORT Handle_Standard_Type& GEOMImpl_DividedDiskDriver_Type_()
493 static Handle_Standard_Type aType1 = STANDARD_TYPE(TFunction_Driver);
494 if ( aType1.IsNull()) aType1 = STANDARD_TYPE(TFunction_Driver);
495 static Handle_Standard_Type aType2 = STANDARD_TYPE(MMgt_TShared);
496 if ( aType2.IsNull()) aType2 = STANDARD_TYPE(MMgt_TShared);
497 static Handle_Standard_Type aType3 = STANDARD_TYPE(Standard_Transient);
498 if ( aType3.IsNull()) aType3 = STANDARD_TYPE(Standard_Transient);
500 static Handle_Standard_Transient _Ancestors[]= {aType1,aType2,aType3,NULL};
501 static Handle_Standard_Type _aType = new Standard_Type("GEOMImpl_DividedDiskDriver",
502 sizeof(GEOMImpl_DividedDiskDriver),
504 (Standard_Address)_Ancestors,
505 (Standard_Address)NULL);
509 //=======================================================================
510 //function : DownCast
512 //=======================================================================
513 const Handle(GEOMImpl_DividedDiskDriver) Handle(GEOMImpl_DividedDiskDriver)::DownCast(const Handle(Standard_Transient)& AnObject)
515 Handle(GEOMImpl_DividedDiskDriver) _anOtherObject;
517 if (!AnObject.IsNull()) {
518 if (AnObject->IsKind(STANDARD_TYPE(GEOMImpl_DividedDiskDriver))) {
519 _anOtherObject = Handle(GEOMImpl_DividedDiskDriver)((Handle(GEOMImpl_DividedDiskDriver)&)AnObject);
523 return _anOtherObject;