-// Copyright (C) 2007-2015 CEA/DEN, EDF R&D, OPEN CASCADE
-//
-// Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
-// CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
-//
+// Copyright (C) 2014-2015 EDF-R&D
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
#include <HYDROData_PolylineXY.h>
#include <HYDROData_Polyline3D.h>
#include <HYDROData_Bathymetry.h>
-#include <HYDROData_LandCover.h>
#include <HYDROData_Profile.h>
#include <HYDROData_Iterator.h>
+#include <HYDROData_LandCoverMap.h>
#include <QFile>
#include <QFileInfo>
#include <TopoDS_Edge.hxx>
#include <TopoDS_Face.hxx>
#include <BRep_Tool.hxx>
+#include <BRepTools.hxx>
#include <Precision.hxx>
#include <Handle_Geom_Curve.hxx>
#include <Handle_Geom_Line.hxx>
#include <TopTools_SequenceOfShape.hxx>
#include <QColor>
#include <BRepTopAdaptor_FClass2d.hxx>
+#include <TopExp.hxx>
+#include <OSD_Timer.hxx>
+#include <BRepLib_MakeVertex.hxx>
+#include <NCollection_List.hxx>
+#include <GC_MakeSegment.hxx>
+#include <BRep_Builder.hxx>
+#include <BRepAdaptor_Curve.hxx>
+#include <GCPnts_QuasiUniformDeflection.hxx>
+#include <TopLoc_Location.hxx>
+#include <Geom_Plane.hxx>
+#include <NCollection_Array1.hxx>
+
+#ifdef WIN32
+ #pragma warning( disable: 4996 )
+#endif
+
+//SHP->TFaces (Import)
+#define OSD_TIMER
HYDROData_ShapeFile::HYDROData_ShapeFile() : myHSHP(NULL)
{
void HYDROData_ShapeFile::Export(const QString& aFileName,
NCollection_Sequence<Handle_HYDROData_PolylineXY> aPolyXYSeq,
NCollection_Sequence<Handle_HYDROData_Polyline3D> aPoly3DSeq,
- NCollection_Sequence<Handle_HYDROData_LandCover> aLCSeq,
QStringList& aNonExpList)
{
SHPHandle hSHPHandle;
for (int i = 1; i <= aPolyXYSeq.Size(); i++)
if (WriteObjectPolyXY(hSHPHandle, aPolyXYSeq(i)) != 1)
aNonExpList.append(aPolyXYSeq(i)->GetName());
-
}
else if (aPolyXYSeq.IsEmpty() && !aPoly3DSeq.IsEmpty())
{
if (WriteObjectPoly3D(hSHPHandle, aPoly3DSeq(i)) != 1)
aNonExpList.append(aPoly3DSeq(i)->GetName());
}
- else if (aPolyXYSeq.IsEmpty() && aPoly3DSeq.IsEmpty() && !aLCSeq.IsEmpty())
+ if (hSHPHandle->nRecords > 0)
+ SHPClose( hSHPHandle );
+ else
+ {
+ SHPClose( hSHPHandle );
+ QString aFN = aFileName.simplified();
+ remove (aFN.toStdString().c_str());
+ remove ((aFN.simplified().replace( aFN.simplified().size() - 4, 4, ".shx")).toStdString().c_str());
+ }
+}
+
+void HYDROData_ShapeFile::Export(const QString& aFileName, const Handle_HYDROData_LandCoverMap& aLCM,
+ QStringList& aNonExpList, bool bCheckLinear, bool bUseDiscr, double theDefl)
+{
+ if (bCheckLinear && !aLCM->CheckLinear())
+ return;
+ //
+ SHPHandle hSHPHandle;
+ if ( !aLCM.IsNull() && !aLCM->IsEmpty())
{
hSHPHandle = SHPCreate( aFileName.toAscii().data(), SHPT_POLYGON );
- for (int i = 1; i <= aLCSeq.Size(); i++)
- if (WriteObjectLC(hSHPHandle, aLCSeq(i)) != 1)
- aNonExpList.append(aLCSeq(i)->GetName());
+ HYDROData_LandCoverMap::Explorer It( aLCM );
+ for( ; It.More(); It.Next())
+ {
+ TopoDS_Face aFace = It.Face();
+ if (WriteObjectPolygon(hSHPHandle, aFace, bUseDiscr, theDefl) != 1)
+ aNonExpList.append(aLCM->GetName() + "_" + QString::number(It.Index()));
+ }
}
if (hSHPHandle->nRecords > 0)
SHPClose( hSHPHandle );
SHPClose( hSHPHandle );
QString aFN = aFileName.simplified();
remove (aFN.toStdString().c_str());
- remove (aFN.replace( ".shp", ".shx", Qt::CaseInsensitive).toStdString().c_str());
+ remove ((aFN.simplified().replace( aFN.simplified().size() - 4, 4, ".shx")).toStdString().c_str());
}
}
+
int HYDROData_ShapeFile::WriteObjectPolyXY(SHPHandle theShpHandle, Handle_HYDROData_PolylineXY thePoly )
{
SHPObject *aSHPObj;
return 1;
}
-int HYDROData_ShapeFile::WriteObjectLC(SHPHandle theShpHandle, Handle_HYDROData_LandCover theLC )
+int HYDROData_ShapeFile::WriteObjectPolygon(SHPHandle theShpHandle, const TopoDS_Shape& theInputShape,
+ bool bUseDiscr, double theDefl)
{
- TopoDS_Shape aSh = theLC->GetShape();
- if (aSh.IsNull())
+ if (theInputShape.IsNull())
return 0;
- TopExp_Explorer anEdgeEx(aSh, TopAbs_EDGE);
- for (; anEdgeEx.More(); anEdgeEx.Next())
- {
- TopoDS_Edge E = TopoDS::Edge(anEdgeEx.Current());
- double aFP, aLP;
- Handle_Geom_Curve aCur = BRep_Tool::Curve(E, aFP, aLP);
- Handle(Geom_Line) aLine = Handle(Geom_Line)::DownCast(aCur);
- if (aLine.IsNull())
- {
- Handle(Geom_TrimmedCurve) aTC = Handle(Geom_TrimmedCurve)::DownCast(aCur);
- if (!aTC.IsNull())
- {
- Handle(Geom_Line) aLine = Handle(Geom_Line)::DownCast(aTC->BasisCurve());
- if (aLine.IsNull())
- return -1;
- }
- else
- return -1;
- }
- }
- if (aSh.ShapeType() == TopAbs_FACE)
+ if (theInputShape.ShapeType() == TopAbs_FACE)
{
- ProcessFace(TopoDS::Face(aSh), theShpHandle);
+ ProcessFace(TopoDS::Face(theInputShape), theShpHandle, bUseDiscr, theDefl);
}
- else if (aSh.ShapeType() == TopAbs_COMPOUND)
+ else if (theInputShape.ShapeType() == TopAbs_COMPOUND)
{
- TopExp_Explorer Ex(aSh, TopAbs_FACE);
+ TopExp_Explorer Ex(theInputShape, TopAbs_FACE);
for (; Ex.More(); Ex.Next())
{
TopoDS_Face aF = TopoDS::Face(Ex.Current());
if (aF.IsNull())
continue;
- ProcessFace(aF, theShpHandle);
+ ProcessFace(aF, theShpHandle, bUseDiscr, theDefl);
}
}
else
}
-void HYDROData_ShapeFile::ProcessFace(TopoDS_Face theFace, SHPHandle theShpHandle)
+void HYDROData_ShapeFile::ProcessFace(const TopoDS_Face& theFace, SHPHandle theShpHandle,
+ bool bUseDiscr, double theDefl )
{
+ if (theFace.ShapeType() != TopAbs_FACE)
+ return;
SHPObject *aSHPObj;
std::vector<double> x, y;
std::vector<int> anPartStart;
- if (theFace.ShapeType() == TopAbs_FACE)
+ TopoDS_Wire OuterW = BRepTools::OuterWire(theFace);
+ NCollection_Sequence<TopoDS_Wire> aWires;
+
+ //write an outer wire first
+ aWires.Append(OuterW);
+ TopExp_Explorer Ex(theFace, TopAbs_WIRE);
+ for (; Ex.More(); Ex.Next())
{
- TopExp_Explorer Ex(theFace, TopAbs_WIRE);
- int NbWires = 0;
- for (; Ex.More(); Ex.Next())
+ TopoDS_Wire aW = TopoDS::Wire(Ex.Current());
+ if (aW.IsEqual(OuterW))
+ continue;
+ aWires.Append(aW);
+ }
+
+ int NbWires = 0;
+ for (int k = 1; k <= aWires.Length(); k++)
+ {
+ TopoDS_Wire aW = aWires(k);
+ if (aW.IsNull())
+ continue;
+ NbWires++;
+ if (aW.Orientation() == TopAbs_INTERNAL)
+ //cant write internal wires/edges
+ continue;
+ // Try to reorder edges
+ Handle(ShapeFix_Wire) aSFW = new ShapeFix_Wire( aW, theFace, Precision::Confusion() );
+ aSFW->ModifyTopologyMode() = Standard_False;
+ aSFW->ModifyGeometryMode() = Standard_False;
+ aSFW->FixReorder();
+ Handle(ShapeExtend_WireData) aSEWD = aSFW->WireData();
+ Standard_Integer nbE = aSEWD->NbEdges();
+ if (nbE == 0)
+ continue;
+ //
+ anPartStart.push_back(x.size());
+ NCollection_Sequence<gp_Pnt2d> aPnts;
+ for (Standard_Integer i = 1; i <= nbE; i++)
{
- TopoDS_Wire aW = TopoDS::Wire(Ex.Current());
- if (aW.IsNull())
- continue;
- NbWires++;
- anPartStart.push_back(x.size());
- TopExp_Explorer aVEx(aW, TopAbs_VERTEX);
- NCollection_Sequence<gp_Pnt2d> aPnts;
- for (; aVEx.More(); aVEx.Next())
+ TopoDS_Edge E = aSEWD->Edge(i);
+ if (!bUseDiscr)
{
- TopoDS_Vertex aV = TopoDS::Vertex(aVEx.Current());
+ TopoDS_Vertex aV = TopExp::LastVertex(E, 1);
if (aV.IsNull())
continue;
gp_Pnt P = BRep_Tool::Pnt(aV);
aPnts.Append(gp_Pnt2d(P.X(), P.Y()));
}
- NCollection_Sequence<gp_Pnt2d> aNPnts;
- aNPnts.Append(aPnts.First());
- for (int j = 1; j <= aPnts.Size() - 1; j++)
+ else
{
- if (!aPnts(j).IsEqual(aPnts(j + 1), Precision::Confusion()))
- aNPnts.Append(aPnts(j + 1));
- }
-
- for (int j = 1; j <= aNPnts.Size(); j++)
- {
- x.push_back( aNPnts(j).X());
- y.push_back( aNPnts(j).Y());
+ BRepAdaptor_Curve Cur( E );
+ GCPnts_QuasiUniformDeflection Discr( Cur, theDefl );
+ if( !Discr.IsDone() )
+ continue; //skip edge?
+ double NewDefl = theDefl/2.0;
+ while (Discr.NbPoints() < 2)
+ {
+ Discr.Initialize(Cur, NewDefl);
+ NewDefl = NewDefl/2.0;
+ }
+ //
+ if (E.Orientation() == TopAbs_FORWARD)
+ {
+ for( int i = 1; i <= Discr.NbPoints(); i++ )
+ {
+ gp_Pnt P = Discr.Value( i );
+ aPnts.Append(gp_Pnt2d(P.X(), P.Y()));
+ }
+ }
+ else
+ {
+ for( int i = Discr.NbPoints(); i > 0; i-- )
+ {
+ gp_Pnt P = Discr.Value( i );
+ aPnts.Append(gp_Pnt2d(P.X(), P.Y()));
+ }
+ }
}
- //x.push_back( aNPnts(1).X());
- //y.push_back( aNPnts(1).Y());
+ }
+ NCollection_Sequence<gp_Pnt2d> aNPnts;
+ aNPnts.Append(aPnts.First());
+ for (int j = 1; j <= aPnts.Size() - 1; j++)
+ {
+ if (!aPnts(j).IsEqual(aPnts(j + 1), Precision::Confusion()))
+ aNPnts.Append(aPnts(j + 1));
+ }
+ //assume that the orientation of external wire & internal wires is correct
+ //so just write all points "as-is"
+ //External wire will be written in clockwise direction
+ //any other wires (holes) - in anticlockwise direction
+ for (int j = aNPnts.Size(); j >= 1; j--)
+ {
+ x.push_back( aNPnts(j).X());
+ y.push_back( aNPnts(j).Y());
}
-
- aSHPObj = SHPCreateObject( SHPT_POLYGON, -1, NbWires, &anPartStart[0], NULL, x.size(), &x[0], &y[0], NULL, NULL );
- SHPWriteObject( theShpHandle, -1, aSHPObj );
- SHPDestroyObject( aSHPObj );
+ //first point is same as the last one => closed polygon
+ x.push_back( aNPnts.Last().X());
+ y.push_back( aNPnts.Last().Y());
+
}
- else
- return;
+
+ aSHPObj = SHPCreateObject( SHPT_POLYGON, -1, NbWires, &anPartStart[0], NULL, x.size(), &x[0], &y[0], NULL, NULL );
+ SHPWriteObject( theShpHandle, -1, aSHPObj );
+ SHPDestroyObject( aSHPObj );
+
}
bool HYDROData_ShapeFile::Parse(SHPHandle theHandle, ShapeType theType, int& theShapeTypeOfFile)
void HYDROData_ShapeFile::ReadSHPPolygon(SHPObject* anObj, int i, TopoDS_Face& F)
{
- TopoDS_Wire W;
+ if (!anObj)
+ return;
TopoDS_Edge E;
int nParts = anObj->nParts;
- gp_Pln pln(gp_Pnt(0,0,0), gp_Dir(0,0,1));
+ Handle_Geom_Plane aPlaneSur = new Geom_Plane(gp_Pnt(0,0,0), gp_Dir(0,0,1));
+
+ BRep_Builder BB;
+ BB.MakeFace(F);
- //Handle(ShapeFix_Shape) sfs = new ShapeFix_Shape;
- //sfs->FixFaceTool()->FixOrientationMode() = 1;
TopTools_SequenceOfShape aWires;
for ( int i = 0 ; i < nParts ; i++ )
{
EndIndex = anObj->panPartStart[i + 1];
else
EndIndex = anObj->nVertices;
-
- for ( int k = StartIndex; k < EndIndex - 1 ; k++ )
+
+ TopoDS_Wire W;
+ BB.MakeWire(W);
+
+ //First point is same as the last point
+ int NbPnts = EndIndex - StartIndex - 1;
+ NCollection_Array1<TopoDS_Vertex> VPoints(0, NbPnts);
+ int j = NbPnts;
+ for ( int k = StartIndex; k < EndIndex; k++ )
{
- gp_Pnt P1 (anObj->padfX[k], anObj->padfY[k], 0);
- gp_Pnt P2 (anObj->padfX[k+1], anObj->padfY[k+1], 0);
+ gp_Pnt P (anObj->padfX[k], anObj->padfY[k], 0);
+ VPoints.ChangeValue(j) = BRepLib_MakeVertex(P).Vertex();
+ j--;
+ }
+
+ for ( int k = 0; k < VPoints.Size() - 1; k++ )
+ {
+ gp_Pnt P1 = BRep_Tool::Pnt(VPoints(k));
+ gp_Pnt P2 = BRep_Tool::Pnt(VPoints(k + 1));
if (P1.Distance(P2) < Precision::Confusion())
continue;
- BRepBuilderAPI_MakeEdge aMakeEdge(P1, P2);
- aBuilder.Add(TopoDS::Edge(aMakeEdge.Shape()));
+ Handle_Geom_TrimmedCurve aTC = GC_MakeSegment(P1, P2).Value();
+ TopoDS_Edge E;
+ if ( k != VPoints.Size() - 2)
+ E = BRepLib_MakeEdge(aTC, VPoints(k), VPoints(k + 1)).Edge();
+ else
+ //the last edge => use first and last vertices
+ E = BRepLib_MakeEdge(aTC, VPoints.First(), VPoints.Value(VPoints.Upper() - 1)).Edge();
+ //Add edge to wire
+ //If SHP file is correct then the outer wire and the holes will have the correct orientations
+ BB.Add(W, E);
}
-
- aBuilder.Build();
- W = TopoDS::Wire(aBuilder.Shape());
+ //Wire must be closed anyway
+ W.Closed (BRep_Tool::IsClosed (W));
W.Orientation(TopAbs_FORWARD);
- BRepBuilderAPI_MakeFace aDB(pln, W);
- TopoDS_Face aDummyFace = TopoDS::Face(aDB.Shape());
- BRepTopAdaptor_FClass2d FClass(aDummyFace, Precision::PConfusion());
- if ( i == 0 && FClass.PerformInfinitePoint() == TopAbs_OUT)
- W.Reverse();
- if ( i > 0 && FClass.PerformInfinitePoint() != TopAbs_IN)
- W.Reverse();
-
- aWires.Append(W);
+ BB.Add(F, W);
}
- BRepBuilderAPI_MakeFace aFBuilder(pln, TopoDS::Wire(aWires(1)));
- for (int i = 2; i <= aWires.Length(); i++)
- aFBuilder.Add(TopoDS::Wire(aWires(i)));
- TopoDS_Face DF = TopoDS::Face(aFBuilder.Shape());
-
- BRepLib::BuildCurves3d(DF);
- if(!DF.IsNull())
- {
- //sfs->Init ( DF );
- //sfs->Perform();
- F = DF; //TopoDS::Face(sfs->Shape());
- }
+ //Add surface to the face
+ BB.UpdateFace(F, aPlaneSur, TopLoc_Location(), Precision::Confusion());
+ F.Closed(Standard_True);
}
-int HYDROData_ShapeFile::ImportLandCovers(const QString theFileName, QStringList& thePolygonsList, TopTools_SequenceOfShape& theFaces, int& theShapeTypeOfFile)
+int HYDROData_ShapeFile::ImportPolygons(const QString theFileName, QStringList& thePolygonsList, TopTools_SequenceOfShape& theFaces, int& theShapeTypeOfFile)
{
Free();
int Stat = TryOpenShapeFile(theFileName);
TopoDS_Face aF;
if (myHSHP->nShapeType == 5)
{
+#ifdef OSD_TIMER
+ OSD_Timer timer;
+ timer.Start();
+#endif
for (size_t i = 0; i < mySHPObjects.size(); i++)
{
ReadSHPPolygon(mySHPObjects[i], i, aF);
theFaces.Append(aF);
}
+#ifdef OSD_TIMER
+ timer.Stop();
+ timer.Show();
+#endif
return 1;
}
else
int HYDROData_ShapeFile::TryOpenShapeFile(QString theFileName)
{
QString aSHPfile = theFileName.simplified();
- QString aSHXfile = theFileName.simplified().replace( ".shp", ".shx", Qt::CaseInsensitive);
+ QString aSHXfile = theFileName.simplified().replace( theFileName.simplified().size() - 4, 4, ".shx");
+
+ QString anExt = theFileName.split('.', QString::SkipEmptyParts).back();
+ if (anExt.toLower() != "shp")
+ return -3;
+
FILE* pFileSHP = NULL;
pFileSHP = fopen (aSHPfile.toAscii().data(), "r");
FILE* pFileSHX = NULL;
bool HYDROData_ShapeFile::CheckDBFFileExisting(const QString& theSHPFilePath, QString& thePathToDBFFile)
{
QString aSHPfile = theSHPFilePath.simplified();
- QString aDBFfile = theSHPFilePath.simplified().replace( ".shp", ".dbf", Qt::CaseInsensitive);
+ QString aDBFfile = theSHPFilePath.simplified().replace( theSHPFilePath.simplified().size() - 4, 4, ".dbf");
FILE* pFileDBF = NULL;
pFileDBF = fopen (aDBFfile.toAscii().data(), "r");
if( DBFIsAttributeNULL( myHDBF, i, theIndexOfField ) )
{
anAttr.myIsNull = true;
+ DBF_FieldType FT = DBF_FieldType_None;
+ if( eType == FTString )
+ FT = DBF_FieldType_String;
+ else if( eType == FTInteger )
+ FT = DBF_FieldType_Integer;
+ else if( eType == FTDouble )
+ FT = DBF_FieldType_Double;
+ else if( eType == FTInvalid )
+ FT = DBF_FieldType_Invalid;
+ anAttr.myFieldType = FT;
}
else
{
anAttr.myIsNull = false;
anAttr.myFieldType = DBF_FieldType_Integer;
anAttr.myRawValue = DBFReadStringAttribute( myHDBF, i, theIndexOfField );
- anAttr.myStrVal = QString::number(iAttr);
+ anAttr.myIntVal = iAttr;
break;
}
anAttr.myIsNull = false;
anAttr.myFieldType = DBF_FieldType_Double;
anAttr.myRawValue = DBFReadStringAttribute( myHDBF, i, theIndexOfField );
- anAttr.myStrVal = QString::number(dAttr, 'g', 20);
+ anAttr.myDoubleVal = dAttr;
break;
}
default:
theAttrV.push_back(anAttr);
}
-}
\ No newline at end of file
+}
+
+bool HYDROData_ShapeFile::DBF_WriteFieldAndValues(const QString& theFileName, const QString& theFieldName, DBF_FieldType theType, const std::vector<DBF_AttrValue>& theAttrV, bool bUseRawValue)
+{
+ // Check that given field type is equal to field types of attributes values
+ for (size_t i = 0; i < theAttrV.size(); i++)
+ {
+ if (theAttrV[i].myFieldType != theType)
+ return false;
+ }
+
+ DBFHandle hDBF;
+ hDBF = DBFCreate( theFileName.toStdString().c_str() );
+ if( hDBF == NULL )
+ return false;
+
+ if (theType != DBF_FieldType_String && theType != DBF_FieldType_Integer && theType != DBF_FieldType_Double)
+ {
+ DBFClose( hDBF );
+ return false; //cant handle any other cases
+ }
+
+ int nWidth = 20;
+ switch( theType )
+ {
+ case DBF_FieldType_String:
+ {
+ DBFAddField (hDBF, theFieldName.toStdString().c_str(), FTString, nWidth, 0);
+ break;
+ }
+
+ case DBF_FieldType_Integer:
+ {
+ DBFAddField (hDBF, theFieldName.toStdString().c_str(), FTInteger, nWidth, 0);
+ break;
+ }
+
+ case DBF_FieldType_Double:
+ {
+ DBFAddField (hDBF, theFieldName.toStdString().c_str(), FTDouble, nWidth, 0);
+ break;
+ }
+ default:
+ break;
+ }
+
+ if (DBFGetFieldCount( hDBF ) != 1)
+ {
+ DBFClose( hDBF );
+ return false;
+ }
+ if (DBFGetRecordCount( hDBF ) != 0)
+ {
+ DBFClose( hDBF );
+ return false;
+ }
+ int stat = -1;
+
+ if (bUseRawValue)
+ {
+ for (size_t i = 0; i < theAttrV.size(); i++)
+ {
+ if (!theAttrV[i].myIsNull)
+ stat = DBFWriteStringAttribute(hDBF, (int)i, 0, theAttrV[i].myRawValue.c_str());
+ else
+ stat = DBFWriteNULLAttribute(hDBF, (int)i, 0 );
+
+ if (stat != 1)
+ {
+ DBFClose( hDBF );
+ return false;
+ }
+ }
+ }
+ else
+ {
+ for (size_t i = 0; i < theAttrV.size(); i++)
+ {
+ if (!theAttrV[i].myIsNull)
+ switch( theType )
+ {
+ case DBF_FieldType_String:
+ {
+ stat = DBFWriteStringAttribute(hDBF, (int)i, 0, theAttrV[i].myStrVal.toStdString().c_str());
+ break;
+ }
+
+ case DBF_FieldType_Integer:
+ {
+ stat = DBFWriteIntegerAttribute(hDBF, (int)i, 0, theAttrV[i].myIntVal);
+ break;
+ }
+
+ case DBF_FieldType_Double:
+ {
+ stat = DBFWriteDoubleAttribute(hDBF, (int)i, 0, theAttrV[i].myDoubleVal);
+ break;
+ }
+ default:
+ break;
+ }
+ else
+ stat = DBFWriteNULLAttribute(hDBF, (int)i, 0 );
+
+ if (stat != 1)
+ {
+ DBFClose( hDBF );
+ return false;
+ }
+ }
+ }
+
+ DBFClose( hDBF );
+ return true;
+
+}
+