src/HYDROData/HYDROData_ChannelAltitude.cxx

   1 // Copyright (C) 2014-2015  EDF-R&D
   2 // This library is free software; you can redistribute it and/or
   3 // modify it under the terms of the GNU Lesser General Public
   4 // License as published by the Free Software Foundation; either
   5 // version 2.1 of the License, or (at your option) any later version.
   6 //
   7 // This library is distributed in the hope that it will be useful,
   8 // but WITHOUT ANY WARRANTY; without even the implied warranty of
   9 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  10 // Lesser General Public License for more details.
  11 //
  12 // You should have received a copy of the GNU Lesser General Public
  13 // License along with this library; if not, write to the Free Software
  14 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  15 //
  16 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
  17 //
  18
  19 #include "HYDROData_ChannelAltitude.h"
  20
  21 #include "HYDROData_Document.h"
  22 #include "HYDROData_Object.h"
  23 #include "HYDROData_Channel.h"
  24 #include "HYDROData_Projection.h"
  25 #include "HYDROData_Polyline3D.h"
  26 #include "HYDROData_PolylineXY.h"
  27 #include "HYDROData_ProfileUZ.h"
  28 #include "HYDROData_Profile.h"
  29
  30 #define _DEVDEBUG_
  31 #include "HYDRO_trace.hxx"
  32 #include <QString>
  33
  34 #include <BRepBuilderAPI_MakeVertex.hxx>
  35 #include <BRepExtrema_DistShapeShape.hxx>
  36
  37 #include <Precision.hxx>
  38 #include <TopAbs.hxx>
  39 #include <TopExp.hxx>
  40 #include <TopoDS.hxx>
  41 #include <TopoDS_Shape.hxx>
  42 #include <TopoDS_Edge.hxx>
  43 #include <TopoDS_Face.hxx>
  44 #include <TopoDS_Vertex.hxx>
  45 #include <TopoDS_Wire.hxx>
  46 #include <TopExp_Explorer.hxx>
  47 #include <TopAbs_ShapeEnum.hxx>
  48 #include <BRep_Tool.hxx>
  49 #include <BRepTools.hxx>
  50 #include <Geom_Curve.hxx>
  51
  52 #include <gp_Trsf.hxx>
  53 #include <gp_Pnt.hxx>
  54 #include <gp_Vec.hxx>
  55
  56 IMPLEMENT_STANDARD_HANDLE(HYDROData_ChannelAltitude, HYDROData_IAltitudeObject)
  57 IMPLEMENT_STANDARD_RTTIEXT(HYDROData_ChannelAltitude, HYDROData_IAltitudeObject)
  58
  59 HYDROData_ChannelAltitude::HYDROData_ChannelAltitude()
  60 : HYDROData_IAltitudeObject()
  61 {
  62 }
  63
  64 HYDROData_ChannelAltitude::~HYDROData_ChannelAltitude()
  65 {
  66 }
  67
  68 double HYDROData_ChannelAltitude::GetAltitudeForPoint( const gp_XY& thePoint ) const
  69 {
  70   DEBTRACE("HYDROData_ChannelAltitude::GetAltitudeForPoint");
  71   double aResAltitude = GetInvalidAltitude();
  72
  73   Handle(HYDROData_Channel) aChannel =
  74   Handle(HYDROData_Channel)::DownCast(GetFatherObject());
  75   if (aChannel.IsNull())
  76     {
  77       DEBTRACE("aChannel.IsNull()");
  78       return aResAltitude;
  79     }
  80   DEBTRACE("aChannel: " << aChannel->GetName().toStdString());
  81
  82   Handle(HYDROData_Polyline3D) aGuideLine = aChannel->GetGuideLine();
  83   if (aGuideLine.IsNull())
  84     {
  85       DEBTRACE("aGuideLine.IsNull()");
  86       return aResAltitude;
  87     }
  88   DEBTRACE("aGuideLine: " << aGuideLine->GetName().toStdString());
  89
  90   Handle(HYDROData_PolylineXY) aGuideXY = aGuideLine->GetPolylineXY();
  91   if (aGuideXY.IsNull())
  92     {
  93       DEBTRACE("aGuideXY.IsNull()");
  94       return aResAltitude;
  95     }
  96   DEBTRACE("aGuideXY: " << aGuideXY->GetName().toStdString());
  97
  98   Handle(HYDROData_ProfileUZ) aGuideUZ = aGuideLine->GetProfileUZ();
  99   if (aGuideUZ.IsNull())
 100     {
 101       aGuideUZ = aGuideLine->GetChildProfileUZ(); // profile obtained from bathymetry
 102     }
 103   if (aGuideUZ.IsNull())
 104     {
 105       DEBTRACE("aGuideUZ.IsNull()");
 106       return aResAltitude;
 107     }
 108   DEBTRACE("aGuideUZ: " << aGuideUZ->GetName().toStdString());
 109
 110   Handle (HYDROData_Profile) aProfile = aChannel->GetProfile();
 111   if (aProfile.IsNull())
 112     {
 113       return aResAltitude;
 114     }
 115   DEBTRACE("aProfile: " << aProfile->GetName().toStdString());
 116
 117   // --- See GEOMImpl_ProjectionDriver.cxx
 118
 119 //  TopoDS_Shape aShape = aGuideLine->GetShape3D();
 120 //  double middleZ = -9999;
 121 //  aGuideLine->GetMiddleZ(middleZ); // use the middle Z value of the 3d line to help the projection.
 122 //  if (middleZ < -9000)
 123 //    {
 124 //      DEBTRACE("the middle Z value of the 3d line is incorrect");
 125 //    }
 126 //  gp_Pnt P1(thePoint.X(), thePoint.Y(), middleZ);
 127
 128   TopoDS_Shape aShape =  aGuideXY->GetShape();
 129   gp_Pnt P1(thePoint.X(), thePoint.Y(), 0);
 130   TopoDS_Shape aPoint = BRepBuilderAPI_MakeVertex(P1).Shape();
 131
 132   if (aPoint.IsNull() || aShape.IsNull())
 133     {
 134       DEBTRACE("aPoint.IsNull() || aShape.IsNull()");
 135       return aResAltitude;
 136     }
 137
 138   if (aShape.ShapeType() != TopAbs_EDGE && aShape.ShapeType() != TopAbs_WIRE)
 139     {
 140       DEBTRACE("Projection aborted : the shape is neither an edge nor a wire");
 141       return aResAltitude;
 142     }
 143
 144   // Perform projection.
 145   BRepExtrema_DistShapeShape aDistShSh(aPoint, aShape, Extrema_ExtFlag_MIN);
 146
 147   if (aDistShSh.IsDone() == Standard_False)
 148     {
 149       DEBTRACE("Projection not done");
 150       return aResAltitude;
 151     }
 152
 153   Standard_Boolean hasValidSolution = Standard_False;
 154   Standard_Integer aNbSolutions = aDistShSh.NbSolution();
 155   Standard_Integer i;
 156   double aParam = 0.;
 157   Standard_Real aTolConf = BRep_Tool::Tolerance(TopoDS::Vertex(aPoint));
 158   Standard_Real aTolAng = 1.e-4;
 159
 160   for (i = 1; i <= aNbSolutions; i++)
 161     {
 162       Standard_Boolean isValid = Standard_False;
 163       BRepExtrema_SupportType aSupportType = aDistShSh.SupportTypeShape2(i);
 164       TopoDS_Shape aSupportShape = aDistShSh.SupportOnShape2(i);
 165
 166       if (aSupportType == BRepExtrema_IsOnEdge)
 167         {
 168           // Minimal distance inside edge is really a projection.
 169           isValid = Standard_True;
 170           aDistShSh.ParOnEdgeS2(i, aParam);
 171         }
 172       else if (aSupportType == BRepExtrema_IsVertex)
 173         {
 174           TopExp_Explorer anExp(aShape, TopAbs_EDGE);
 175
 176           if (aDistShSh.Value() <= aTolConf)
 177             {
 178               // The point lies on the shape. This means this point
 179               // is really a projection.
 180               for (; anExp.More() && !isValid; anExp.Next())
 181                 {
 182                   TopoDS_Edge aCurEdge = TopoDS::Edge(anExp.Current());
 183
 184                   if (aCurEdge.IsNull() == Standard_False)
 185                     {
 186                       TopoDS_Vertex aVtx[2];
 187
 188                       TopExp::Vertices(aCurEdge, aVtx[0], aVtx[1]);
 189
 190                       for (int j = 0; j < 2; j++)
 191                         {
 192                           if (aSupportShape.IsSame(aVtx[j]))
 193                             {
 194                               // The current edge is a projection edge.
 195                               isValid = Standard_True;
 196                               aSupportShape = aCurEdge;
 197                               aParam = BRep_Tool::Parameter(aVtx[j], aCurEdge);
 198                               break;
 199                             }
 200                         }
 201                     }
 202                 }
 203             }
 204           else
 205             {
 206               // Minimal distance to vertex is not always a real projection.
 207               gp_Pnt aPnt = BRep_Tool::Pnt(TopoDS::Vertex(aPoint));
 208               gp_Pnt aPrjPnt = BRep_Tool::Pnt(TopoDS::Vertex(aSupportShape));
 209               gp_Vec aDProjP(aPrjPnt, aPnt);
 210
 211               for (; anExp.More() && !isValid; anExp.Next())
 212                 {
 213                   TopoDS_Edge aCurEdge = TopoDS::Edge(anExp.Current());
 214
 215                   if (aCurEdge.IsNull() == Standard_False)
 216                     {
 217                       TopoDS_Vertex aVtx[2];
 218
 219                       TopExp::Vertices(aCurEdge, aVtx[0], aVtx[1]);
 220
 221                       for (int j = 0; j < 2; j++)
 222                         {
 223                           if (aSupportShape.IsSame(aVtx[j]))
 224                             {
 225                               // Check if the point is a projection to the current edge.
 226                               Standard_Real anEdgePars[2];
 227                               Handle(Geom_Curve) aCurve = BRep_Tool::Curve(aCurEdge, anEdgePars[0], anEdgePars[1]);
 228                               gp_Pnt aVal;
 229                               gp_Vec aD1;
 230
 231                               aParam = BRep_Tool::Parameter(aVtx[j], aCurEdge);
 232                               aCurve->D1(aParam, aVal, aD1);
 233
 234                               if (Abs(aD1.Dot(aDProjP)) <= aTolAng)
 235                                 {
 236                                   // The current edge is a projection edge.
 237                                   isValid = Standard_True;
 238                                   aSupportShape = aCurEdge;
 239                                   break;
 240                                 }
 241                             }
 242                         }
 243                     }
 244                 }
 245             }
 246         }
 247
 248       if (isValid)
 249         {
 250           if (hasValidSolution)
 251             {
 252               DEBTRACE("Projection aborted : multiple solutions");
 253               return aResAltitude;
 254             }
 255
 256           // Store the valid solution.
 257           hasValidSolution = Standard_True;
 258
 259           DEBTRACE("distance XY: "<< aParam);
 260 //          // Normalize parameter.
 261 //          TopoDS_Edge aSupportEdge = TopoDS::Edge(aSupportShape);
 262 //          Standard_Real aF, aL;
 263 //          BRep_Tool::Range(aSupportEdge, aF, aL);
 264 //          if (Abs(aL - aF) <= aTolConf)
 265 //            {
 266 //              DEBTRACE("Projection aborted : degenerated projection edge");
 267 //              return aResAltitude;
 268 //            }
 269 //          aParam = (aParam - aF)/(aL - aF);
 270
 271           // profile altitude at projection point
 272           HYDROData_IPolyline::PointsList aProfilePoints = aGuideUZ->GetPoints();
 273           if ( aProfilePoints.IsEmpty() )
 274             {
 275               DEBTRACE("empty profile UZ");
 276               return aResAltitude;
 277             }
 278           double aDepth = HYDROData_ProfileUZ::GetDepthFromDistance( aProfilePoints, aParam );
 279           DEBTRACE("profile altitude: " << aDepth);
 280
 281           // Compute edge index.
 282           TopExp_Explorer anExp(aShape, TopAbs_EDGE);
 283           int anIndex = 0;
 284           for (; anExp.More(); anExp.Next(), anIndex++)
 285             {
 286               if (aSupportShape.IsSame(anExp.Current()))
 287                 {
 288                   break;
 289                 }
 290             }
 291
 292           // get the XY distance from point to guideline
 293           const gp_Pnt &aPntProj = aDistShSh.PointOnShape2(i);
 294           DEBTRACE("projection: (" << aPntProj.X() << ", " << aPntProj.Y() << ", " << aPntProj.Z() << ")");
 295           gp_XY aProjXY = gp_XY(aPntProj.X(), aPntProj.Y());
 296           aProjXY.Subtract(thePoint);
 297           double distance = aProjXY.Modulus();
 298           DEBTRACE("distance to guideline " << distance);
 299
 300           // get delta altitude on section (supposed symmetric) from guideline distance
 301           double delta = 0;
 302           int i1 = 0;
 303           gp_XY pt1 = gp_XY();
 304           gp_XY pt2 = gp_XY();
 305           HYDROData_ProfileUZ::PointsList aSectionPoints = aProfile->GetParametricPoints();
 306           for ( int i = 1, aNbPoints = aSectionPoints.Size(); i <= aNbPoints; ++i )
 307             {
 308               const HYDROData_IPolyline::Point& aPolylinePoint = aSectionPoints.Value( i );
 309               DEBTRACE("  profile point: " << aPolylinePoint.X() << " " << aPolylinePoint.Y());
 310               if (aPolylinePoint.X() < distance)
 311                 {
 312                   i1 = i;
 313                   pt1 = aPolylinePoint;
 314                 }
 315               if (aPolylinePoint.X() >= distance)
 316                 {
 317                   pt2 = aPolylinePoint;
 318                   break;
 319                 }
 320             }
 321           if ((i1 == 0) && (distance > 0))
 322             {
 323               DEBTRACE("Projection aborted : non centered profile");
 324               return aResAltitude;
 325             }
 326           if (i1 == aProfilePoints.Size()) // distance >= profile width
 327             {
 328               delta = pt1.Y();
 329             }
 330           else
 331             {
 332               delta = pt1.Y() + (pt2.Y() - pt1.Y())*(distance -pt1.X())/(pt2.X()-pt1.X());
 333             }
 334           aResAltitude = delta + aDepth;
 335           DEBTRACE("final altitude: " << aResAltitude << " delta: " << delta);
 336           return aResAltitude;
 337         }
 338     }
 339
 340   if (!hasValidSolution)
 341     {
 342       DEBTRACE("Projection aborted : no projection");
 343       return aResAltitude;
 344     }
 345
 346   return aResAltitude;
 347 }
 348
 349
 350
 351