Salome HOME
OCC functionality moving out from the widget
[modules/hydro.git] / src / HYDROCurveCreator / CurveCreator_Utils.cxx
1 // Copyright (C) 2013  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19
20 #include "CurveCreator_Utils.h"
21
22 #include <GEOMUtils.hxx>
23
24 #include <gp_Pln.hxx>
25
26 #include <TopoDS.hxx>
27 #include <TopoDS_Vertex.hxx>
28 #include <TopoDS_Wire.hxx>
29 #include <TopoDS_Edge.hxx>
30
31 #include <AIS_ListOfInteractive.hxx>
32 #include <AIS_ListIteratorOfListOfInteractive.hxx>
33 #include <AIS_Shape.hxx>
34 #include <AIS_Point.hxx>
35 #include <AIS_Line.hxx>
36 #include <AIS_Trihedron.hxx>
37
38 #include <Geom_Point.hxx>
39 #include <Geom_BSplineCurve.hxx>
40 #include <Geom_Line.hxx>
41
42 #include <TopExp_Explorer.hxx>
43 #include <BRep_Tool.hxx>
44 #include <GeomAPI_ProjectPointOnCurve.hxx>
45 #include <SelectMgr_EntityOwner.hxx>
46
47 #include <ProjLib.hxx>
48 #include <ElSLib.hxx>
49
50 const double LOCAL_SELECTION_TOLERANCE = 0.0001;
51 const int    SCENE_PIXEL_TOLERANCE = 10;
52
53 //=======================================================================
54 // function : ConvertClickToPoint()
55 // purpose  : Returns the point clicked in 3D view
56 //=======================================================================
57 void CurveCreator_Utils::ConvertPointToClick( const gp_Pnt& thePoint,
58                                               Handle(V3d_View) theView,
59                                               int& x, int& y )
60 {
61   theView->Convert(thePoint.X(), thePoint.Y(), thePoint.Z(), x, y );
62 }
63
64
65 //=======================================================================
66 // function : ConvertClickToPoint()
67 // purpose  : Returns the point clicked in 3D view
68 //=======================================================================
69 gp_Pnt CurveCreator_Utils::ConvertClickToPoint( int x, int y, Handle(V3d_View) aView )
70 {
71   return GEOMUtils::ConvertClickToPoint( x, y, aView );
72 }
73
74 std::list<float> CurveCreator_Utils::getSelectedPoints( Handle(AIS_InteractiveContext) theContext )
75 {
76   std::list<float> aSelectedPoints;
77
78   gp_Pnt aPnt;
79   for ( theContext->InitSelected(); theContext->MoreSelected(); theContext->NextSelected() ) {
80     TopoDS_Vertex aVertex;
81     TopoDS_Shape aShape = theContext->SelectedShape();
82     if ( !aShape.IsNull() && aShape.ShapeType() == TopAbs_VERTEX )
83       aVertex = TopoDS::Vertex( theContext->SelectedShape() );
84     else {
85       Handle(SelectMgr_EntityOwner) anOwner = theContext->SelectedOwner();
86       if ( !anOwner.IsNull() ) {
87         Handle(AIS_InteractiveObject) anAIS = Handle(AIS_InteractiveObject)::DownCast( anOwner->Selectable() );
88         if ( !anAIS.IsNull() ) {
89           Handle(AIS_Point) aPoint = Handle(AIS_Point)::DownCast( anAIS);
90           if ( !aPoint.IsNull() )
91             aVertex = TopoDS::Vertex( aPoint->Vertex() );
92         }
93         if ( aVertex.IsNull() ) {
94           // the following happens if there are no points in the current curve, there is only a shape
95           /*Handle(StdSelect_BRepOwner) aBrepOwner = Handle(StdSelect_BRepOwner)::DownCast(anOwner);
96           if ( aBrepOwner.IsNull() )
97             continue;
98           if ( aBrepOwner->HasShape() ) {
99             const TopoDS_Shape& aShape = aBrepOwner->Shape();
100             if ( !aShape.IsNull() && aShape.ShapeType() == TopAbs_VERTEX )
101             {
102               aVertex = TopoDS::Vertex( aShape );
103             }
104           }*/
105         }
106       }
107     }
108     if ( aVertex.IsNull() )
109       continue;
110     aPnt = BRep_Tool::Pnt( aVertex );
111     aSelectedPoints.push_back( aPnt.X() );
112     aSelectedPoints.push_back( aPnt.Y() );
113     aSelectedPoints.push_back( aPnt.Z() );
114   }
115
116   return aSelectedPoints;
117 }
118 //=======================================================================
119 // function : setLocalPointContext
120 // purpose  : Open/close the viewer local context
121 //=======================================================================
122 void CurveCreator_Utils::setLocalPointContext(
123                                               Handle(AIS_InteractiveContext) theContext,
124                                               const bool theOpen )
125 {
126   if ( !theContext )
127     return;
128
129   if ( theOpen ) {
130     // Open local context if there is no one
131     if ( !theContext->HasOpenedContext() ) {
132       theContext->ClearCurrents( false );
133       theContext->OpenLocalContext( false/*use displayed objects*/, true/*allow shape decomposition*/ );
134     }
135     AIS_ListOfInteractive aList;
136     theContext->DisplayedObjects( aList );
137     int aLSize = 0;
138     for ( AIS_ListIteratorOfListOfInteractive it( aList ); it.More(); it.Next() )
139       aLSize++;
140
141     for ( AIS_ListIteratorOfListOfInteractive it( aList ); it.More(); it.Next() )
142     {
143       Handle(AIS_InteractiveObject) anAIS = it.Value();
144       if ( !anAIS.IsNull() )
145       {
146         if ( anAIS->IsKind( STANDARD_TYPE( AIS_Shape ) ) )
147         {
148           theContext->Load( anAIS, -1/*selection mode*/, true/*allow decomposition*/ );
149           theContext->Activate( anAIS, AIS_Shape::SelectionMode( (TopAbs_ShapeEnum)TopAbs_WIRE ) );
150           //theContext->Activate( anAIS, AIS_Shape::SelectionMode( (TopAbs_ShapeEnum)TopAbs_VERTEX ) );
151         }
152         else if ( anAIS->DynamicType() != STANDARD_TYPE(AIS_Trihedron) )
153         {
154           theContext->Load( anAIS, -1/*selection mode*/, false/*allow decomposition*/ );
155           theContext->Activate( anAIS, TopAbs_VERTEX );
156         }
157       }
158       continue;
159     }
160   }
161   else {
162     if ( theContext->HasOpenedContext() )
163       theContext->CloseAllContexts();
164   }
165 }
166
167 bool CurveCreator_Utils::getNeighbourPoints( Handle(AIS_InteractiveContext) theContext,
168                                              Handle(V3d_View) theView,
169                                              const int theX, const int theY,
170                                              gp_Pnt& thePoint, gp_Pnt& thePoint1,
171                                              gp_Pnt& thePoint2 )
172 {
173   bool isFoundPoint = false;
174   if ( theContext.IsNull() )
175     return isFoundPoint;
176
177   for ( theContext->InitSelected(); theContext->MoreSelected() && !isFoundPoint;
178         theContext->NextSelected() ) {
179     TopoDS_Shape aTShape = theContext->SelectedShape();
180     if ( !aTShape.IsNull() && aTShape.ShapeType() == TopAbs_VERTEX )
181       continue;
182     else {
183       Handle(SelectMgr_EntityOwner) anOwner = theContext->SelectedOwner();
184       if ( anOwner.IsNull() )
185         continue;
186       const TopLoc_Location& aLocation = anOwner->Location();
187       Handle(AIS_InteractiveObject) anAIS =
188                         Handle(AIS_InteractiveObject)::DownCast( anOwner->Selectable() );
189       isFoundPoint = CurveCreator_Utils::pointOnObject( theView, anAIS, theX, theY, thePoint,
190                                                         thePoint1, thePoint2 );
191     }
192   }
193   return isFoundPoint;
194 }
195
196 bool CurveCreator_Utils::pointOnObject( Handle(V3d_View) theView,
197                                         Handle(AIS_InteractiveObject) theObject,
198                                         const int theX, const int theY,
199                                         gp_Pnt& thePoint,
200                                         gp_Pnt& thePoint1, gp_Pnt& thePoint2 )
201 {
202   bool isFound = false;
203
204   if ( theObject.IsNull() || theView.IsNull() )
205     return isFound;
206
207   gp_Pnt aPoint;
208   Standard_Real aParameter;
209   gp_Pnt aPnt1, aPnt2;
210   Handle(AIS_Line) aLine = Handle(AIS_Line)::DownCast( theObject );
211   if ( !aLine.IsNull() ) {
212     const Handle(Geom_Line) aGLine = aLine->Line();
213     isFound = hasProjectPointOnCurve( theView, theX, theY, aGLine, aParameter );
214     if ( isFound ) {
215       aPoint = aGLine->Value( aParameter );
216
217       Handle(Geom_Point) aPStart;
218       Handle(Geom_Point) aPEnd;
219       aLine->Points( aPStart, aPEnd );
220       aPnt1 = aPStart->Pnt();
221       aPnt2 = aPEnd->Pnt();
222
223       // in case of Geom line a projection is performed to the infinite line,
224       // so it is necessary to bound it by the line size
225       Bnd_Box aLineBox;
226       aLineBox.Set( aPnt1, gp_Vec( aPnt1, aPnt2 ) );
227       isFound = !aLineBox.IsOut( aPoint );
228     }
229   }
230   else {
231     Handle(AIS_Shape) aShape = Handle(AIS_Shape)::DownCast( theObject );
232     if ( !aShape.IsNull() ) {
233       const TopoDS_Wire& aWire = TopoDS::Wire( aShape->Shape() );
234       if ( !aWire.IsNull() ) {
235         TopExp_Explorer anExp( aWire, TopAbs_EDGE );
236         for ( ; anExp.More(); anExp.Next())
237         {
238           const TopoDS_Edge& anEdge = TopoDS::Edge(anExp.Current());
239           if ( !anEdge.IsNull() ) {
240             Standard_Real aFirst, aLast;
241             Handle(Geom_Curve) aCurve = BRep_Tool::Curve( anEdge, aFirst, aLast );
242
243             if ( aCurve->IsKind( STANDARD_TYPE(Geom_BSplineCurve) ) ) {
244               Handle(Geom_BSplineCurve) aBSplineCurve = Handle(Geom_BSplineCurve)::DownCast( aCurve );
245               if ( !aBSplineCurve.IsNull() ) {
246                 isFound = hasProjectPointOnCurve( theView, theX, theY, aCurve, aParameter );
247                 if ( isFound ) {
248                   aPoint = aBSplineCurve->Value( aParameter );
249                   Standard_Integer anI1, anI2;
250                   aBSplineCurve->LocateU( aParameter, LOCAL_SELECTION_TOLERANCE, anI1, anI2 );
251
252                   aPnt1 = aBSplineCurve->Value( aBSplineCurve->Knot( anI1 ) );
253                   aPnt2 = aBSplineCurve->Value( aBSplineCurve->Knot( anI2 ) );
254                 }
255               }
256             }
257           }
258         }
259       }
260     }
261   }
262   if ( isFound ) {
263     thePoint = aPoint;
264     thePoint1 = aPnt1;
265     thePoint2 = aPnt2;
266   }
267   return isFound;
268 }
269
270 bool CurveCreator_Utils::hasProjectPointOnCurve( Handle(V3d_View) theView,
271                                                  const int theX, const int theY,
272                                                  const Handle(Geom_Curve)& theCurve,
273                                                  Standard_Real& theParameter )
274 {
275   bool isFound = false;
276   if ( theView.IsNull() )
277     return isFound;
278
279   gp_Pnt aPoint = CurveCreator_Utils::ConvertClickToPoint( theX, theY, theView );
280
281   GeomAPI_ProjectPointOnCurve aProj( aPoint, theCurve );
282   Standard_Integer aNbPoint = aProj.NbPoints();
283   if (aNbPoint > 0) {
284     for (Standard_Integer j = 1; j <= aNbPoint && !isFound; j++) {
285       gp_Pnt aNewPoint = aProj.Point( j );
286       theParameter = aProj.Parameter( j );
287
288       int aX, anY;
289       CurveCreator_Utils::ConvertPointToClick( aNewPoint, theView, aX, anY );
290
291       int aXDelta = abs( aX - theX );
292       int anYDelta = abs( anY - theY );
293       isFound = aXDelta < SCENE_PIXEL_TOLERANCE && anYDelta < SCENE_PIXEL_TOLERANCE;
294     }
295   }
296   return isFound;
297 }