2 #include "HYDROData_StreamAltitude.h"
4 #include "HYDROData_Document.h"
5 #include "HYDROData_Profile.h"
6 #include "HYDROData_Stream.h"
7 #include "HYDROData_ShapesTool.h"
9 #include <BRep_Tool.hxx>
11 #include <BRepTopAdaptor_FClass2d.hxx>
13 #include <BRepBuilderAPI_MakeEdge.hxx>
14 #include <BRepBuilderAPI_MakeFace.hxx>
15 #include <BRepBuilderAPI_MakeWire.hxx>
17 #include <Extrema_ExtElC.hxx>
19 #include <GeomAPI_ProjectPointOnCurve.hxx>
23 #include <Precision.hxx>
25 #include <TopExp_Explorer.hxx>
28 #include <TopoDS_Wire.hxx>
29 #include <TopoDS_Edge.hxx>
31 #include <TopTools_SequenceOfShape.hxx>
33 #include <QStringList>
35 IMPLEMENT_STANDARD_HANDLE(HYDROData_StreamAltitude, HYDROData_IAltitudeObject)
36 IMPLEMENT_STANDARD_RTTIEXT(HYDROData_StreamAltitude, HYDROData_IAltitudeObject)
38 HYDROData_StreamAltitude::HYDROData_StreamAltitude()
39 : HYDROData_IAltitudeObject()
43 HYDROData_StreamAltitude::~HYDROData_StreamAltitude()
47 QStringList HYDROData_StreamAltitude::DumpToPython( MapOfTreatedObjects& theTreatedObjects ) const
49 QStringList aResList = dumpObjectCreation( theTreatedObjects );
56 Standard_Real getAltitudeFromProfile( const Handle(HYDROData_Profile)& theProfile,
57 const Standard_Real& theLeftDist,
58 const Standard_Real& theRightDist )
60 Standard_Real aResAlt = 0.0;
62 gp_XY aFirstPoint, aLastPoint;
63 if ( !theProfile->GetLeftPoint( aFirstPoint ) ||
64 !theProfile->GetRightPoint( aLastPoint ) )
67 gp_Pnt aPnt1( aFirstPoint.X(), aFirstPoint.Y(), 0 );
68 gp_Pnt aPnt2( aLastPoint.X(), aLastPoint.Y(), 0 );
70 Standard_Real aProfileDist = aPnt1.Distance( aPnt2 );
72 Standard_Real aCoeff = aProfileDist / ( theLeftDist + theRightDist );
74 gp_Pnt anIntPoint( aPnt1.XYZ() + ( aCoeff * theLeftDist ) * gp_Dir( gp_Vec( aPnt1, aPnt2 ) ).XYZ() );
76 gp_Lin aPointLine( anIntPoint, gp::DZ() );
80 HYDROData_Profile::ProfilePoints aProfilePoints = theProfile->GetProfilePoints();
81 for ( int i = 1, n = aProfilePoints.Length(); i <= n; ++i )
83 gp_Pnt aProfPoint( aProfilePoints.Value( i ) );
85 Standard_Real aDist = aPointLine.Distance( aProfPoint );
86 if ( aDist <= gp::Resolution() )
88 // We found the intersected point
89 aResAlt = aProfPoint.Z();
93 gp_Lin aNormal = aPointLine.Normal( aProfPoint );
96 aPrevNormal = aNormal;
97 aPrevPoint = aProfPoint;
101 if ( aPrevNormal.Direction().Dot( aNormal.Direction() ) < 0 )
103 // We found the intersected edge
104 gp_Lin anEdgeLine( aPrevPoint, gp_Dir( gp_Vec( aPrevPoint, aProfPoint ) ) );
106 Extrema_ExtElC anExtrema( aPointLine, anEdgeLine, Precision::Angular() );
107 if ( !anExtrema.IsParallel() )
109 Extrema_POnCurv aFirstPnt, aSecPnt;
110 anExtrema.Points( 1, aFirstPnt, aSecPnt );
112 const gp_Pnt& anIntPnt = aSecPnt.Value();
113 aResAlt = anIntPnt.Z();
119 aPrevNormal = aNormal;
120 aPrevPoint = aProfPoint;
126 bool HYDROData_StreamAltitude::getBoundaryProfilesForPoint(
127 const gp_XY& thePoint,
128 Handle(HYDROData_Profile)& theLeftProfile,
129 Handle(HYDROData_Profile)& theRightProfile ) const
131 Handle(HYDROData_Stream) aStream =
132 Handle(HYDROData_Stream)::DownCast( GetFatherObject() );
133 if ( aStream.IsNull() )
136 HYDROData_SequenceOfObjects aStreamProfiles = aStream->GetProfiles();
137 if ( aStreamProfiles.Length() < 2 )
140 Handle(HYDROData_Profile) aPrevProfile;
141 gp_Pnt aPrevPnt1, aPrevPnt2;
142 for ( int i = 1, n = aStreamProfiles.Length(); i <= n; ++i )
144 Handle(HYDROData_Profile) aProfile =
145 Handle(HYDROData_Profile)::DownCast( aStreamProfiles.Value( i ) );
146 if ( aProfile.IsNull() )
149 gp_XY aFirstPoint, aLastPoint;
150 if ( !aProfile->GetLeftPoint( aFirstPoint ) || !aProfile->GetRightPoint( aLastPoint ) )
153 gp_Pnt aPnt1( aFirstPoint.X(), aFirstPoint.Y(), 0 );
154 gp_Pnt aPnt2( aLastPoint.X(), aLastPoint.Y(), 0 );
156 if ( !aPrevProfile.IsNull() )
158 BRepBuilderAPI_MakeEdge aLeftMakeEdge( aPrevPnt1, aPrevPnt2 );
159 BRepBuilderAPI_MakeEdge aBotMakeEdge( aPrevPnt2, aPnt2 );
160 BRepBuilderAPI_MakeEdge aRightMakeEdge( aPnt2, aPnt1 );
161 BRepBuilderAPI_MakeEdge aTopMakeEdge( aPnt1, aPrevPnt1 );
163 BRepBuilderAPI_MakeWire aMakeWire( aLeftMakeEdge.Edge(), aBotMakeEdge.Edge(),
164 aRightMakeEdge.Edge(), aTopMakeEdge.Edge() );
166 BRepBuilderAPI_MakeFace aMakeFace( aMakeWire.Wire() );
168 TopoDS_Face aProfilesFace = aMakeFace.Face();
170 BRepTopAdaptor_FClass2d aClassifier( aProfilesFace, Precision::Confusion() );
171 TopAbs_State aPointState = aClassifier.Perform( gp_Pnt2d( thePoint ), Standard_False );
172 if ( aPointState != TopAbs_OUT )
174 theLeftProfile = aPrevProfile;
175 theRightProfile = aProfile;
180 aPrevProfile = aProfile;
185 return !theLeftProfile.IsNull() && !theRightProfile.IsNull();
188 double HYDROData_StreamAltitude::GetAltitudeForPoint( const gp_XY& thePoint ) const
190 double aResAltitude = GetInvalidAltitude();
192 Handle(HYDROData_Stream) aStream =
193 Handle(HYDROData_Stream)::DownCast( GetFatherObject() );
194 if ( aStream.IsNull() )
197 TopoDS_Shape aStreamShape = aStream->GetTopShape();
198 if ( aStreamShape.IsNull() )
201 TopExp_Explorer aStreamFaceExp( aStreamShape, TopAbs_FACE );
202 if ( !aStreamFaceExp.More() )
205 // Get only face because of 2d profile wires is in compound
206 TopoDS_Face aStreamFace = TopoDS::Face( aStreamFaceExp.Current() );
208 // Check if point is inside of stream presentation
209 BRepTopAdaptor_FClass2d aClassifier( aStreamFace, Precision::Confusion() );
210 TopAbs_State aPointState = aClassifier.Perform( gp_Pnt2d( thePoint ), Standard_False );
211 if ( aPointState == TopAbs_OUT )
214 // Find the two profiles between which the point is lies
215 Handle(HYDROData_Profile) aLeftProfile, aRightProfile;
216 if ( !getBoundaryProfilesForPoint( thePoint, aLeftProfile, aRightProfile ) )
219 // Find the projections of point to borders of stream
220 gp_XYZ aPointToTest( thePoint.X(), thePoint.Y(), 0.0 );
222 TopoDS_Edge aStreamLeftEdge = TopoDS::Edge( aStream->GetLeftShape() );
223 TopoDS_Edge aStreamRightEdge = TopoDS::Edge( aStream->GetRightShape() );
225 Standard_Real aFirst = 0.0, aLast = 0.0;
226 Handle(Geom_Curve) anEdgeLeftCurve = BRep_Tool::Curve( aStreamLeftEdge, aFirst, aLast );
227 Handle(Geom_Curve) anEdgeRightCurve = BRep_Tool::Curve( aStreamRightEdge, aFirst, aLast );
229 GeomAPI_ProjectPointOnCurve aLeftProject( aPointToTest, anEdgeLeftCurve );
230 GeomAPI_ProjectPointOnCurve aRightProject( aPointToTest, anEdgeRightCurve );
232 Standard_Real aLeftDist = aLeftProject.LowerDistance();
233 Standard_Real aRightDist = aRightProject.LowerDistance();
235 // Find the altitude in profiles
236 Standard_Real aLeftAlt = getAltitudeFromProfile( aLeftProfile, aLeftDist, aRightDist );
237 Standard_Real aRightAlt = getAltitudeFromProfile( aRightProfile, aLeftDist, aRightDist );
239 // Interpolate altitudes
240 Standard_Real aFirstCoeff = aLeftDist / ( aLeftDist + aRightDist );
241 Standard_Real aSecCoeff = aRightDist / ( aLeftDist + aRightDist );
243 aResAltitude = aLeftAlt * aFirstCoeff + aRightAlt * aSecCoeff;