1 // Copyright (C) 2007-2015 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, or (at your option) any later version.
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
23 #include <HYDROData_ShapeFile.h>
24 #include <HYDROData_PolylineXY.h>
25 #include <HYDROData_Polyline3D.h>
26 #include <HYDROData_Bathymetry.h>
27 #include <HYDROData_LandCover.h>
28 #include <HYDROData_Profile.h>
29 #include <HYDROData_Iterator.h>
34 #include <TopExp_Explorer.hxx>
35 #include <TopoDS_Wire.hxx>
36 #include <TopoDS_Vertex.hxx>
37 #include <TopoDS_Edge.hxx>
38 #include <TopoDS_Face.hxx>
39 #include <BRep_Tool.hxx>
40 #include <Precision.hxx>
41 #include <Handle_Geom_Curve.hxx>
42 #include <Handle_Geom_Line.hxx>
43 #include <Handle_Geom_TrimmedCurve.hxx>
44 #include <Geom_TrimmedCurve.hxx>
45 #include <BRepBuilderAPI_MakeEdge.hxx>
46 #include <BRepBuilderAPI_MakeWire.hxx>
47 #include <BRepBuilderAPI_MakeFace.hxx>
49 #include <BRepLib.hxx>
50 #include <ShapeFix_Shape.hxx>
51 #include <TopTools_SequenceOfShape.hxx>
53 #include <BRepTopAdaptor_FClass2d.hxx>
55 HYDROData_ShapeFile::HYDROData_ShapeFile() : myHSHP(NULL)
59 HYDROData_ShapeFile::~HYDROData_ShapeFile()
64 void HYDROData_ShapeFile::Export(const QString& aFileName,
65 NCollection_Sequence<Handle_HYDROData_PolylineXY> aPolyXYSeq,
66 NCollection_Sequence<Handle_HYDROData_Polyline3D> aPoly3DSeq,
67 NCollection_Sequence<Handle_HYDROData_LandCover> aLCSeq,
68 QStringList& aNonExpList)
71 if (!aPolyXYSeq.IsEmpty() && aPoly3DSeq.IsEmpty())
73 hSHPHandle = SHPCreate( aFileName.toAscii().data(), SHPT_ARC );
74 for (int i = 1; i <= aPolyXYSeq.Size(); i++)
75 if (WriteObjectPolyXY(hSHPHandle, aPolyXYSeq(i)) != 1)
76 aNonExpList.append(aPolyXYSeq(i)->GetName());
79 else if (aPolyXYSeq.IsEmpty() && !aPoly3DSeq.IsEmpty())
81 hSHPHandle = SHPCreate( aFileName.toAscii().data(), SHPT_ARCZ );
82 for (int i = 1; i <= aPoly3DSeq.Size(); i++)
83 if (WriteObjectPoly3D(hSHPHandle, aPoly3DSeq(i)) != 1)
84 aNonExpList.append(aPoly3DSeq(i)->GetName());
86 else if (aPolyXYSeq.IsEmpty() && aPoly3DSeq.IsEmpty() && !aLCSeq.IsEmpty())
88 hSHPHandle = SHPCreate( aFileName.toAscii().data(), SHPT_POLYGON );
89 for (int i = 1; i <= aLCSeq.Size(); i++)
90 if (WriteObjectLC(hSHPHandle, aLCSeq(i)) != 1)
91 aNonExpList.append(aLCSeq(i)->GetName());
93 if (hSHPHandle->nRecords > 0)
94 SHPClose( hSHPHandle );
97 SHPClose( hSHPHandle );
98 remove (aFileName.toStdString().c_str());
102 int HYDROData_ShapeFile::WriteObjectPolyXY(SHPHandle theShpHandle, Handle_HYDROData_PolylineXY thePoly )
105 std::vector<double> x, y;
106 std::vector<int> anPartStart;
108 for (int i = 0; i < thePoly->NbSections(); i++)
109 if (thePoly->GetSectionType(i) == HYDROData_IPolyline::SECTION_SPLINE)
112 for (int i = 0; i < thePoly->NbSections(); i++)
114 anPartStart.push_back(x.size());
115 HYDROData_PolylineXY::PointsList aPointList = thePoly->GetPoints(i);
116 for (int j = 1; j <= aPointList.Size(); j++)
118 x.push_back( aPointList(j).X());
119 y.push_back( aPointList(j).Y());
121 if (thePoly->IsClosedSection(i))
123 x.push_back( aPointList(1).X());
124 y.push_back( aPointList(1).Y());
128 aSHPObj = SHPCreateObject( SHPT_ARC, -1, thePoly->NbSections(), &anPartStart[0], NULL, x.size(), &x[0], &y[0], NULL, NULL );
129 SHPWriteObject( theShpHandle, -1, aSHPObj );
130 SHPDestroyObject( aSHPObj );
134 int HYDROData_ShapeFile::WriteObjectPoly3D(SHPHandle theShpHandle, Handle_HYDROData_Polyline3D thePoly )
137 std::vector<double> x, y, z;
138 std::vector<int> anPartStart;
140 for (int i = 0; i < thePoly->GetPolylineXY()->NbSections(); i++)
141 if (thePoly->GetPolylineXY()->GetSectionType(i) == HYDROData_IPolyline::SECTION_SPLINE)
144 for (int i = 0; i < thePoly->GetPolylineXY()->NbSections(); i++)
146 anPartStart.push_back(x.size());
147 HYDROData_PolylineXY::PointsList aPointList = thePoly->GetPolylineXY()->GetPoints(i);
148 for (int j = 1; j <= aPointList.Size(); j++)
150 x.push_back( aPointList(j).X());
151 y.push_back( aPointList(j).Y());
152 z.push_back(thePoly->GetAltitudeObject()->GetAltitudeForPoint(gp_XY (aPointList(j).X(), aPointList(j).Y())));
154 if ( thePoly->GetPolylineXY()->IsClosedSection(i))
156 x.push_back( aPointList(1).X());
157 y.push_back( aPointList(1).Y());
158 z.push_back(thePoly->GetAltitudeObject()->GetAltitudeForPoint(gp_XY (aPointList(1).X(), aPointList(1).Y())));
163 aSHPObj = SHPCreateObject( SHPT_ARCZ, -1, thePoly->GetPolylineXY()->NbSections(), &anPartStart[0], NULL, x.size(), &x[0], &y[0], &z[0], NULL );
164 SHPWriteObject( theShpHandle, -1, aSHPObj );
165 SHPDestroyObject( aSHPObj );
169 int HYDROData_ShapeFile::WriteObjectLC(SHPHandle theShpHandle, Handle_HYDROData_LandCover theLC )
171 TopoDS_Shape aSh = theLC->GetShape();
174 TopExp_Explorer anEdgeEx(aSh, TopAbs_EDGE);
175 for (; anEdgeEx.More(); anEdgeEx.Next())
177 TopoDS_Edge E = TopoDS::Edge(anEdgeEx.Current());
179 Handle_Geom_Curve aCur = BRep_Tool::Curve(E, aFP, aLP);
180 Handle(Geom_Line) aLine = Handle(Geom_Line)::DownCast(aCur);
183 Handle(Geom_TrimmedCurve) aTC = Handle(Geom_TrimmedCurve)::DownCast(aCur);
186 Handle(Geom_Line) aLine = Handle(Geom_Line)::DownCast(aTC->BasisCurve());
195 if (aSh.ShapeType() == TopAbs_FACE)
197 ProcessFace(TopoDS::Face(aSh), theShpHandle);
199 else if (aSh.ShapeType() == TopAbs_COMPOUND)
201 TopExp_Explorer Ex(aSh, TopAbs_FACE);
202 for (; Ex.More(); Ex.Next())
204 TopoDS_Face aF = TopoDS::Face(Ex.Current());
207 ProcessFace(aF, theShpHandle);
217 void HYDROData_ShapeFile::ProcessFace(TopoDS_Face theFace, SHPHandle theShpHandle)
220 std::vector<double> x, y;
221 std::vector<int> anPartStart;
222 if (theFace.ShapeType() == TopAbs_FACE)
224 TopExp_Explorer Ex(theFace, TopAbs_WIRE);
226 for (; Ex.More(); Ex.Next())
228 TopoDS_Wire aW = TopoDS::Wire(Ex.Current());
232 anPartStart.push_back(x.size());
233 TopExp_Explorer aVEx(aW, TopAbs_VERTEX);
234 NCollection_Sequence<gp_Pnt2d> aPnts;
235 for (; aVEx.More(); aVEx.Next())
237 TopoDS_Vertex aV = TopoDS::Vertex(aVEx.Current());
240 gp_Pnt P = BRep_Tool::Pnt(aV);
241 aPnts.Append(gp_Pnt2d(P.X(), P.Y()));
243 NCollection_Sequence<gp_Pnt2d> aNPnts;
244 aNPnts.Append(aPnts.First());
245 for (int j = 1; j <= aPnts.Size() - 1; j++)
247 if (!aPnts(j).IsEqual(aPnts(j + 1), Precision::Confusion()))
248 aNPnts.Append(aPnts(j + 1));
251 for (int j = 1; j <= aNPnts.Size(); j++)
253 x.push_back( aNPnts(j).X());
254 y.push_back( aNPnts(j).Y());
256 //x.push_back( aNPnts(1).X());
257 //y.push_back( aNPnts(1).Y());
261 aSHPObj = SHPCreateObject( SHPT_POLYGON, -1, NbWires, &anPartStart[0], NULL, x.size(), &x[0], &y[0], NULL, NULL );
262 SHPWriteObject( theShpHandle, -1, aSHPObj );
263 SHPDestroyObject( aSHPObj );
269 bool HYDROData_ShapeFile::Parse(SHPHandle theHandle, ShapeType theType)
272 mySHPObjects.clear();
273 SHPGetInfo( theHandle, NULL, &aShapeType, NULL, NULL );
274 bool ToRead = (theType == ShapeType_Polyline && (aShapeType == 3 || aShapeType == 13 || aShapeType == 23)) ||
275 (theType == ShapeType_Polygon && aShapeType == 5);
278 for (int i = 0; i < theHandle->nRecords; i++)
279 mySHPObjects.push_back(SHPReadObject(theHandle, i));
286 void HYDROData_ShapeFile::ReadSHPPolygon(SHPObject* anObj, int i, TopoDS_Face& F)
290 int nParts = anObj->nParts;
291 gp_Pln pln(gp_Pnt(0,0,0), gp_Dir(0,0,1));
293 //Handle(ShapeFix_Shape) sfs = new ShapeFix_Shape;
294 //sfs->FixFaceTool()->FixOrientationMode() = 1;
295 TopTools_SequenceOfShape aWires;
296 for ( int i = 0 ; i < nParts ; i++ )
298 BRepBuilderAPI_MakeWire aBuilder;
299 int StartIndex = anObj->panPartStart[i];
302 EndIndex = anObj->panPartStart[i + 1];
304 EndIndex = anObj->nVertices;
306 for ( int k = StartIndex; k < EndIndex - 1 ; k++ )
308 gp_Pnt P1 (anObj->padfX[k], anObj->padfY[k], 0);
309 gp_Pnt P2 (anObj->padfX[k+1], anObj->padfY[k+1], 0);
310 if (P1.Distance(P2) < Precision::Confusion())
312 BRepBuilderAPI_MakeEdge aMakeEdge(P1, P2);
313 aBuilder.Add(TopoDS::Edge(aMakeEdge.Shape()));
317 W = TopoDS::Wire(aBuilder.Shape());
318 W.Orientation(TopAbs_FORWARD);
319 BRepBuilderAPI_MakeFace aDB(pln, W);
320 TopoDS_Face aDummyFace = TopoDS::Face(aDB.Shape());
321 BRepTopAdaptor_FClass2d FClass(aDummyFace, Precision::PConfusion());
322 if ( i == 0 && FClass.PerformInfinitePoint() == TopAbs_OUT)
324 if ( i > 0 && FClass.PerformInfinitePoint() != TopAbs_IN)
330 BRepBuilderAPI_MakeFace aFBuilder(pln, TopoDS::Wire(aWires(1)));
331 for (int i = 2; i <= aWires.Length(); i++)
332 aFBuilder.Add(TopoDS::Wire(aWires(i)));
333 TopoDS_Face DF = TopoDS::Face(aFBuilder.Shape());
335 BRepLib::BuildCurves3d(DF);
340 F = DF; //TopoDS::Face(sfs->Shape());
344 bool HYDROData_ShapeFile::ImportLandCovers(const QString theFileName, QStringList& thePolygonsList, TopTools_SequenceOfShape& theFaces)
347 myHSHP = SHPOpen( theFileName.toAscii().data(), "rb" );
348 if (!Parse(myHSHP, HYDROData_ShapeFile::ShapeType_Polygon))
350 for (size_t i = 0; i < mySHPObjects.size(); i++)
351 thePolygonsList.append("polygon_" + QString::number(i + 1));
354 if (myHSHP->nShapeType == 5)
356 for (size_t i = 0; i < mySHPObjects.size(); i++)
358 ReadSHPPolygon(mySHPObjects[i], i, aF);
367 void HYDROData_ShapeFile::Free()
369 for (size_t i = 0; i < mySHPObjects.size(); i++ )
370 free (mySHPObjects[i]);
372 mySHPObjects.clear();
381 void HYDROData_ShapeFile::ReadSHPPolyXY(Handle(HYDROData_Document) theDocument, SHPObject* anObj, QString theFileName,
382 int theInd, NCollection_Sequence<Handle_HYDROData_Entity>& theEntities)
385 Handle(HYDROData_PolylineXY) aPolylineXY = Handle(HYDROData_PolylineXY)::DownCast( theDocument->CreateObject( KIND_POLYLINEXY ) );
387 int nParts = anObj->nParts;
388 for ( int i = 0 ; i < nParts ; i++ )
390 int StartIndex = anObj->panPartStart[i];
393 EndIndex = anObj->panPartStart[i + 1];
395 EndIndex = anObj->nVertices;
397 bool IsClosed = false;
398 HYDROData_PolylineXY::SectionType aSectType = HYDROData_PolylineXY::SECTION_POLYLINE;
399 if (anObj->padfX[StartIndex] == anObj->padfX[EndIndex - 1] &&
400 anObj->padfY[StartIndex] == anObj->padfY[EndIndex - 1] )
403 aPolylineXY->AddSection( TCollection_AsciiString( ("poly_section_" + QString::number(i)).data()->toAscii()), aSectType, true);
406 aPolylineXY->AddSection( TCollection_AsciiString( ("poly_section_" + QString::number(i)).data()->toAscii()), aSectType, false);
410 for ( int k = StartIndex; k < EndIndex ; k++ )
412 HYDROData_PolylineXY::Point aSectPoint;
413 aSectPoint.SetX( anObj->padfX[k] );
414 aSectPoint.SetY( anObj->padfY[k] );
415 aPolylineXY->AddPoint( i, aSectPoint );
420 aPolylineXY->SetWireColor( HYDROData_PolylineXY::DefaultWireColor() );
421 aPolylineXY->SetName( theFileName + "_PolyXY_" + QString::number(theInd) );
423 aPolylineXY->Update();
424 theEntities.Append(aPolylineXY);
428 void HYDROData_ShapeFile::ReadSHPPoly3D(Handle(HYDROData_Document) theDocument, SHPObject* anObj, QString theFileName,
429 int theInd, NCollection_Sequence<Handle_HYDROData_Entity>& theEntities)
431 Handle(HYDROData_PolylineXY) aPolylineXY = Handle(HYDROData_PolylineXY)::DownCast( theDocument->CreateObject( KIND_POLYLINEXY ) );
433 Handle(HYDROData_Polyline3D) aPolylineObj = Handle(HYDROData_Polyline3D)::DownCast( theDocument->CreateObject( KIND_POLYLINE ) );
435 Handle(HYDROData_Bathymetry) aBath = Handle(HYDROData_Bathymetry)::DownCast( theDocument->CreateObject( KIND_BATHYMETRY ) );
436 HYDROData_Bathymetry::AltitudePoints aAPoints;
438 int nParts = anObj->nParts;
439 for ( int i = 0 ; i < nParts ; i++ )
441 //bool aSectClosure = true;
442 int StartIndex = anObj->panPartStart[i];
445 EndIndex = anObj->panPartStart[i + 1];
447 EndIndex = anObj->nVertices;
449 bool IsClosed = false;
450 HYDROData_PolylineXY::SectionType aSectType = HYDROData_PolylineXY::SECTION_POLYLINE;
451 if (anObj->padfX[StartIndex] == anObj->padfX[EndIndex - 1] &&
452 anObj->padfY[StartIndex] == anObj->padfY[EndIndex - 1] &&
453 anObj->padfZ[StartIndex] == anObj->padfZ[EndIndex - 1])
456 aPolylineXY->AddSection( TCollection_AsciiString( ("poly_section_" + QString::number(i)).data()->toAscii()), aSectType, true );
459 aPolylineXY->AddSection( TCollection_AsciiString( ("poly_section_" + QString::number(i)).data()->toAscii()), aSectType, false );
463 for ( int k = StartIndex ; k < EndIndex ; k++ )
465 HYDROData_PolylineXY::Point aSectPoint;
466 aSectPoint.SetX( anObj->padfX[k] );
467 aSectPoint.SetY( anObj->padfY[k] );
468 aPolylineXY->AddPoint( i, aSectPoint );
469 aAPoints.Append(gp_XYZ (anObj->padfX[k], anObj->padfY[k], anObj->padfZ[k]));
474 QString aBathName = theFileName + "_bath_" + QString::number(theInd);
475 QString aPolyXYName = theFileName + "_polyXY_" + QString::number(theInd);
476 QString aPoly3DName = theFileName + "_poly3D_" + QString::number(theInd);
478 aPolylineXY->SetName( aPolyXYName );
479 aPolylineXY->SetWireColor(HYDROData_PolylineXY::DefaultWireColor());
480 aPolylineXY->Update();
482 aBath->SetAltitudePoints(aAPoints);
483 aBath->SetName( aBathName );
485 aPolylineObj->SetPolylineXY (aPolylineXY, false);
486 aPolylineObj->SetAltitudeObject(aBath);
488 aPolylineObj->SetBorderColor( HYDROData_Polyline3D::DefaultBorderColor() );
489 aPolylineObj->SetName( aPoly3DName );
491 aPolylineObj->Update();
492 theEntities.Append(aPolylineXY);
493 theEntities.Append(aPolylineObj);
499 bool HYDROData_ShapeFile::ImportPolylines(Handle(HYDROData_Document) theDocument, const QString& theFileName, NCollection_Sequence<Handle_HYDROData_Entity>& theEntities)
501 HYDROData_Iterator anIter( theDocument );
503 QStringList anExistingNames;
504 std::vector<int> anAllowedIndexes;
505 for( ; anIter.More(); anIter.Next() )
506 anExistingNames.push_back(anIter.Current()->GetName());
509 aHSHP = SHPOpen( theFileName.toAscii().data(), "rb" );
511 QFileInfo aFileInfo(theFileName);
512 QString aBaseFileName = aFileInfo.baseName();
514 if (!Parse(aHSHP, HYDROData_ShapeFile::ShapeType_Polyline))
517 if (aHSHP->nShapeType == 3 || aHSHP->nShapeType == 23)
520 for (;anAllowedIndexes.size() < mySHPObjects.size();)
522 if (!anExistingNames.contains(aBaseFileName + "_PolyXY_" + QString::number(anInd)))
524 anAllowedIndexes.push_back(anInd);
531 for (size_t i = 0; i < mySHPObjects.size(); i++ )
533 ReadSHPPolyXY(theDocument, mySHPObjects[i], aBaseFileName, anAllowedIndexes[i], theEntities);
537 else if (aHSHP->nShapeType == 13)
540 for (;anAllowedIndexes.size() < mySHPObjects.size();)
542 if (!anExistingNames.contains(aBaseFileName + "_PolyXY_" + QString::number(anInd)) &&
543 !anExistingNames.contains(aBaseFileName + "_Poly3D_" + QString::number(anInd)) &&
544 !anExistingNames.contains(aBaseFileName + "_Bath_" + QString::number(anInd)))
546 anAllowedIndexes.push_back(anInd);
552 for (size_t i = 0; i < mySHPObjects.size(); i++ )
553 ReadSHPPoly3D(theDocument, mySHPObjects[i], aBaseFileName, anAllowedIndexes[i], theEntities);
561 for (size_t i = 0; i < mySHPObjects.size(); i++ )
562 free (mySHPObjects[i]);
564 mySHPObjects.clear();