0031431: Visualization, PrsMgr_PresentableObject - simplify HLR computing interface
[occt.git] / src / AIS / AIS_MaxRadiusDimension.cxx
1 // Created on: 1998-01-23
2 // Created by: Sergey ZARITCHNY
3 // Copyright (c) 1998-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
5 //
6 // This file is part of Open CASCADE Technology software library.
7 //
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.
13 //
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
16
17
18 #include <AIS.hxx>
19 #include <AIS_EllipseRadiusDimension.hxx>
20 #include <AIS_MaxRadiusDimension.hxx>
21 #include <BRepAdaptor_Curve.hxx>
22 #include <BRepAdaptor_Surface.hxx>
23 #include <DsgPrs_EllipseRadiusPresentation.hxx>
24 #include <ElCLib.hxx>
25 #include <ElSLib.hxx>
26 #include <Geom_CylindricalSurface.hxx>
27 #include <Geom_Ellipse.hxx>
28 #include <Geom_OffsetCurve.hxx>
29 #include <Geom_Plane.hxx>
30 #include <Geom_Surface.hxx>
31 #include <Geom_SurfaceOfLinearExtrusion.hxx>
32 #include <Geom_SurfaceOfRevolution.hxx>
33 #include <Geom_Transformation.hxx>
34 #include <Geom_TrimmedCurve.hxx>
35 #include <gp_Ax1.hxx>
36 #include <gp_Dir.hxx>
37 #include <gp_Lin.hxx>
38 #include <gp_Pln.hxx>
39 #include <gp_Pnt.hxx>
40 #include <gp_Vec.hxx>
41 #include <Precision.hxx>
42 #include <Prs3d_ArrowAspect.hxx>
43 #include <Prs3d_DimensionAspect.hxx>
44 #include <Prs3d_Drawer.hxx>
45 #include <Prs3d_Presentation.hxx>
46 #include <Prs3d_Text.hxx>
47 #include <Prs3d_TextAspect.hxx>
48 #include <Select3D_SensitiveBox.hxx>
49 #include <Select3D_SensitiveCurve.hxx>
50 #include <Select3D_SensitiveSegment.hxx>
51 #include <SelectMgr_EntityOwner.hxx>
52 #include <SelectMgr_Selection.hxx>
53 #include <Standard_ConstructionError.hxx>
54 #include <Standard_NotImplemented.hxx>
55 #include <Standard_Type.hxx>
56 #include <TCollection_ExtendedString.hxx>
57 #include <TopoDS.hxx>
58 #include <TopoDS_Shape.hxx>
59
60 IMPLEMENT_STANDARD_RTTIEXT(AIS_MaxRadiusDimension,AIS_EllipseRadiusDimension)
61
62 //=======================================================================
63 //function : AIS_MaxRadiusDimension
64 //purpose  : 
65 //=======================================================================
66 AIS_MaxRadiusDimension::AIS_MaxRadiusDimension(const TopoDS_Shape& aShape, 
67                                                const Standard_Real aVal, 
68                                                const TCollection_ExtendedString& aText)
69 :AIS_EllipseRadiusDimension(aShape, aText)
70 {
71   myVal = aVal;
72   mySymbolPrs = DsgPrs_AS_LASTAR;
73   myAutomaticPosition = Standard_True;
74   myArrowSize = myVal / 100.;
75 }
76
77 //=======================================================================
78 //function : AIS_MaxRadiusDimension
79 //purpose  : 
80 //=======================================================================
81
82 AIS_MaxRadiusDimension::AIS_MaxRadiusDimension(const TopoDS_Shape& aShape, 
83                                                const Standard_Real aVal, 
84                                                const TCollection_ExtendedString& aText,
85                                                const gp_Pnt& aPosition, 
86                                                const DsgPrs_ArrowSide aSymbolPrs,
87                                                const Standard_Real anArrowSize)
88 :AIS_EllipseRadiusDimension(aShape, aText)
89 {
90   myVal = aVal;
91   mySymbolPrs = aSymbolPrs;
92   myPosition = aPosition;
93   myAutomaticPosition = Standard_False;
94   SetArrowSize( anArrowSize );
95 }
96
97 //=======================================================================
98 //function : Compute
99 //purpose  : 
100 //=======================================================================
101
102 void AIS_MaxRadiusDimension::Compute(const Handle(PrsMgr_PresentationManager3d)& /*aPresentationManager*/,
103                                      const Handle(Prs3d_Presentation)& aPresentation, 
104                                      const Standard_Integer /*aMode*/)
105 {
106 //  if( myAutomaticPosition )
107     {//ota : recompute in any case 
108       ComputeGeometry();
109       myEllipse.SetMajorRadius(myVal);
110       gp_Vec v1(myEllipse.XAxis().Direction());
111       v1 *=myVal;
112       myApexP = myEllipse.Location().Translated(v1); 
113       myApexN = myEllipse.Location().Translated(-v1); 
114     }
115   if(myIsAnArc) ComputeArcOfEllipse(aPresentation);
116   else 
117     ComputeEllipse(aPresentation);
118 }
119
120 //=======================================================================
121 //function : ComputeEllipse
122 //purpose  : 
123 //=======================================================================
124
125 void AIS_MaxRadiusDimension::ComputeEllipse(const Handle(Prs3d_Presentation)& aPresentation)
126 {
127
128   Handle(Prs3d_DimensionAspect) la = myDrawer->DimensionAspect();
129   Handle(Prs3d_ArrowAspect) arr = la->ArrowAspect();
130   
131   // size
132   if( !myArrowSizeIsDefined ) {
133     myArrowSize = Min(myArrowSize,myVal / 5.);
134   }
135   arr->SetLength(myArrowSize);
136
137   Standard_Real U;//,V;
138   gp_Pnt curPos, Center;
139   Center = myEllipse.Location();
140   if( myAutomaticPosition )
141     {
142       myPosition = Center;
143       myEndOfArrow = myApexP;
144       myAutomaticPosition = Standard_True;   
145       
146       if ( myIsSetBndBox )
147         myPosition = AIS::TranslatePointToBound(myPosition, gp_Dir(gp_Vec( Center, myPosition )),
148                                                 myBndBox );        
149       curPos = myPosition;  
150     }
151   else //!AutomaticPosition
152     {
153       curPos = myPosition;
154       gp_Lin L1(myEllipse.XAxis());
155       U = ElCLib::Parameter ( L1, curPos );
156       curPos = ElCLib::Value (U, L1);
157       if (curPos.Distance(myApexP) < curPos.Distance(myApexN)) 
158         myEndOfArrow = myApexP ;
159       else
160         myEndOfArrow = myApexN ;
161     }
162  
163   // Presenatation  
164   DsgPrs_EllipseRadiusPresentation::Add(aPresentation, myDrawer, myVal, myText, curPos,
165                                         myEndOfArrow, Center, Standard_True, mySymbolPrs);
166
167 }
168
169 //=======================================================================
170 //function : ComputeArcOfEllipse
171 //purpose  : 
172 //=======================================================================
173
174 void AIS_MaxRadiusDimension::ComputeArcOfEllipse(const Handle(Prs3d_Presentation)& aPresentation)
175 {
176
177   Handle(Prs3d_DimensionAspect) la = myDrawer->DimensionAspect();
178   Handle(Prs3d_ArrowAspect) arr = la->ArrowAspect();
179   
180   // size
181   if( !myArrowSizeIsDefined ) {
182     myArrowSize = Min(myArrowSize,myVal / 5.);
183   }
184   arr->SetLength(myArrowSize);
185   
186   Standard_Real par;
187   gp_Pnt curPos, Center;
188   Center = myEllipse.Location();
189   Standard_Boolean IsInDomain = Standard_True;
190   if( myAutomaticPosition )
191     {
192       myEndOfArrow = AIS::NearestApex(myEllipse, myApexP, myApexN,
193                                       myFirstPar, myLastPar, IsInDomain);
194       myPosition = Center;
195       myAutomaticPosition = Standard_True;
196       if ( myIsSetBndBox )
197         myPosition = AIS::TranslatePointToBound(myPosition, gp_Dir(gp_Vec( Center, myPosition )),
198                                                 myBndBox );
199       curPos = myPosition;  
200     }
201   else //!AutomaticPosition
202     {
203       curPos = myPosition;
204 //      ElSLib::Parameters ( myPlane->Pln(), curPos, U, V );
205 //      curPos = ElSLib::Value (U, V, myPlane->Pln());
206       gp_Lin L1(myEllipse.XAxis());
207       par = ElCLib::Parameter ( L1, curPos );
208       curPos = ElCLib::Value (par, L1);
209       if (curPos.Distance(myApexP) < curPos.Distance(myApexN)) 
210         myEndOfArrow = myApexP ;
211       else
212         myEndOfArrow = myApexN ;
213       par = ElCLib::Parameter ( myEllipse, myEndOfArrow );
214       IsInDomain = AIS::InDomain( myFirstPar, myLastPar, par );
215       myPosition = curPos;
216     }
217
218 //  Standard_Real parEnd = ElCLib::Parameter ( myEllipse, myEndOfArrow );
219   Standard_Real parStart = 0.;
220   if( !IsInDomain )
221     {
222       if(AIS::DistanceFromApex (myEllipse, myEndOfArrow, myFirstPar) <
223          AIS::DistanceFromApex (myEllipse, myEndOfArrow, myLastPar))
224         parStart = myFirstPar;
225       else
226         parStart = myLastPar;
227     }
228   if(!myIsOffset)
229     DsgPrs_EllipseRadiusPresentation::Add(aPresentation, myDrawer, myVal, myText, myEllipse,
230                                           curPos, myEndOfArrow, Center, parStart, IsInDomain,
231                                           Standard_True, mySymbolPrs);
232   else 
233     DsgPrs_EllipseRadiusPresentation::Add(aPresentation, myDrawer, myVal, myText, myOffsetCurve,
234                                           curPos, myEndOfArrow, Center, parStart, IsInDomain,
235                                           Standard_True, mySymbolPrs);
236 }
237
238 //=======================================================================
239 //function : ComputeSelection
240 //purpose  : 
241 //=======================================================================
242
243 void AIS_MaxRadiusDimension::ComputeSelection(const Handle(SelectMgr_Selection)& aSelection, 
244                                               const Standard_Integer /*aMode*/)
245 {
246
247     gp_Pnt        center  = myEllipse.Location();
248     gp_Pnt AttachmentPoint = myPosition;
249     Standard_Real dist    = center.Distance(AttachmentPoint);
250     Standard_Real aRadius = myVal;
251     //Standard_Real inside  = Standard_False;
252     gp_Pnt pt1;
253     if (dist > aRadius) pt1 = AttachmentPoint; 
254     else 
255       pt1 = myEndOfArrow;
256     Handle(SelectMgr_EntityOwner) own = new SelectMgr_EntityOwner(this,7);
257     Handle(Select3D_SensitiveSegment) 
258       seg = new Select3D_SensitiveSegment(own, center , pt1);
259     aSelection->Add(seg);
260
261     // Text
262     Standard_Real size(Min(myVal/100.+1.e-6,myArrowSize+1.e-6));
263     Handle( Select3D_SensitiveBox ) box = new Select3D_SensitiveBox( own,
264                                                                      AttachmentPoint.X(),
265                                                                      AttachmentPoint.Y(),
266                                                                      AttachmentPoint.Z(),
267                                                                      AttachmentPoint.X()+size,
268                                                                      AttachmentPoint.Y()+size,
269                                                                      AttachmentPoint.Z()+size);
270   aSelection->Add(box);
271
272   // Arc of Ellipse
273     if(myIsAnArc)
274       {
275         
276         Standard_Real parEnd = ElCLib::Parameter ( myEllipse, myEndOfArrow );
277         if(!AIS::InDomain(myFirstPar, myLastPar, parEnd))
278           {
279             Standard_Real parStart, par;
280             if(AIS::DistanceFromApex (myEllipse, myEndOfArrow, myFirstPar) <
281                AIS::DistanceFromApex (myEllipse, myEndOfArrow, myLastPar))
282               par = myFirstPar;
283             else
284               par = myLastPar;
285             gp_Vec Vapex(center, ElCLib::Value( parEnd, myEllipse )) ;
286             gp_Vec Vpnt (center, ElCLib::Value( par, myEllipse )) ;
287             gp_Dir dir(Vpnt ^ Vapex);
288             if(myEllipse.Position().Direction().IsOpposite( dir, Precision::Angular())) {
289               parStart = parEnd;
290               parEnd   = par;
291             }
292             else 
293               parStart = par;
294
295             Handle(Geom_Curve)TrimCurve;
296             if(myIsOffset)
297               {
298                 Handle(Geom_Curve) aCurve = myOffsetCurve;
299                 TrimCurve = new Geom_TrimmedCurve( aCurve,  parStart, parEnd );
300               }
301             else
302               {
303                 Handle(Geom_Ellipse) Ellipse = new Geom_Ellipse( myEllipse );
304                 TrimCurve = new Geom_TrimmedCurve( Ellipse,  parStart, parEnd );
305               }
306             Handle( Select3D_SensitiveCurve ) SensArc;
307             SensArc = new Select3D_SensitiveCurve( own, TrimCurve );
308             aSelection->Add( SensArc );
309           }
310     }
311
312 }