src/HYDRO_tests/test_HYDROData_LandCoverMap.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 <test_HYDROData_LandCoverMap.h>
  20 #include <HYDROData_CalculationCase.h>
  21 #include <HYDROData_Document.h>
  22 #include <HYDROData_LandCoverMap.h>
  23 #include <HYDROData_ImmersibleZone.h>
  24 #include <HYDROData_PolylineXY.h>
  25 #include <HYDROData_StricklerTable.h>
  26 #include <HYDROData_Tool.h>
  27 #include <HYDROData_ShapeFile.h>
  28 #include <HYDROGUI_LandCoverMapPrs.h>
  29 #include <TopoDS_Edge.hxx>
  30 #include <TopoDS_Wire.hxx>
  31 #include <TopoDS_Face.hxx>
  32 #include <TopoDS.hxx>
  33 #include <TestViewer.h>
  34 #include <TestShape.h>
  35 #include <TopTools_ListOfShape.hxx>
  36 #include <AIS_DisplayMode.hxx>
  37 #include <Aspect_ColorScale.hxx>
  38 #include <QString>
  39 #include <QColor>
  40 #include <QMap>
  41 #include <QDir>
  42 #include <BRepTools.hxx>
  43 #include <BRep_Builder.hxx>
  44 #include <BRepCheck_Analyzer.hxx>
  45
  46 const QString REF_DATA_PATH = qgetenv( "HYDRO_REFERENCE_DATA" );
  47 const QString DEF_STR_PATH = qgetenv( "HYDRO_SRC_DIR" ) + "/src/HYDROGUI/resources/def_strickler_table.txt";
  48
  49 void test_HYDROData_LandCoverMap::test_add_2_objects()
  50 {
  51   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
  52
  53   Handle(HYDROData_LandCoverMap) aMap =
  54     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
  55
  56   CPPUNIT_ASSERT_EQUAL( KIND_LAND_COVER_MAP, aMap->GetKind() );
  57
  58   TopoDS_Face aLC1 = Face( QList<double>() << 10 << 10 << 50 << 20 << 30 << 50 << 15 << 30 );
  59   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "test1" ) );
  60
  61   TopoDS_Face aLC2 = Face( QList<double>() << 30 << 20 << 60 << 10 << 70 << 35 << 40 << 40 );
  62   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC2, "test2" ) );
  63
  64   TestViewer::show( aMap->GetShape(), AIS_Shaded, true, "LandCoverMap_Add_2_Objects" );
  65   CPPUNIT_ASSERT_IMAGES
  66
  67   HYDROData_LandCoverMap::Explorer anIt( aMap );
  68   CPPUNIT_ASSERT_EQUAL( true, anIt.More() );
  69   CPPUNIT_ASSERT_EQUAL( QString( "test1" ), anIt.StricklerType() );
  70   anIt.Next();
  71   CPPUNIT_ASSERT_EQUAL( true, anIt.More() );
  72   CPPUNIT_ASSERT_EQUAL( QString( "test2" ), anIt.StricklerType() );
  73   anIt.Next();
  74   CPPUNIT_ASSERT_EQUAL( false, anIt.More() );
  75
  76   aDoc->Close();
  77 }
  78
  79 void test_HYDROData_LandCoverMap::test_split()
  80 {
  81   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
  82
  83   Handle(HYDROData_LandCoverMap) aMap =
  84     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
  85
  86   CPPUNIT_ASSERT_EQUAL( KIND_LAND_COVER_MAP, aMap->GetKind() );
  87
  88   TopoDS_Face aLC = Face( QList<double>() << 10 << 10 << 50 << 20 << 30 << 50 << 15 << 30 );
  89   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC, "test1" ) );
  90
  91   Handle(HYDROData_PolylineXY) aPolyline =
  92     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
  93   TopoDS_Wire aWire = Wire( QList<double>() << 10 << 40 << 30 << 10 << 40 << 10 << 60 << 10, false );
  94   aPolyline->SetShape( aWire );
  95
  96   CPPUNIT_ASSERT_EQUAL( true, aMap->Split( aPolyline ) );
  97
  98   TestViewer::show( aMap->GetShape(), AIS_Shaded, true, "LandCoverMap_Split_1" );
  99   TestViewer::show( aWire, 0, true, Qt::blue );
 100   CPPUNIT_ASSERT_IMAGES
 101
 102   HYDROData_LandCoverMap::Explorer anIt( aMap );
 103   CPPUNIT_ASSERT_EQUAL( true, anIt.More() );
 104   CPPUNIT_ASSERT_EQUAL( QString( "test1" ), anIt.StricklerType() );
 105   anIt.Next();
 106   CPPUNIT_ASSERT_EQUAL( true, anIt.More() );
 107   CPPUNIT_ASSERT_EQUAL( QString( "test1" ), anIt.StricklerType() );
 108   anIt.Next();
 109   CPPUNIT_ASSERT_EQUAL( false, anIt.More() );
 110
 111   aDoc->Close();
 112 }
 113
 114 void test_HYDROData_LandCoverMap::test_incomplete_split()
 115 {
 116   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 117
 118   Handle(HYDROData_LandCoverMap) aMap =
 119     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 120
 121   CPPUNIT_ASSERT_EQUAL( KIND_LAND_COVER_MAP, aMap->GetKind() );
 122
 123   TopoDS_Face aLC = Face( QList<double>() << 10 << 10 << 50 << 20 << 30 << 50 << 15 << 30 );
 124   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC, "test1" ) );
 125
 126   Handle(HYDROData_PolylineXY) aPolyline =
 127     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 128   TopoDS_Wire aWire = Wire( QList<double>() << 10 << 40 << 30 << 10 << 40 << 10, false );
 129   aPolyline->SetShape( aWire );
 130
 131   CPPUNIT_ASSERT_EQUAL( true, aMap->Split( aPolyline ) );
 132
 133   TestViewer::show( aMap->GetShape(), AIS_Shaded, true, "LandCoverMap_Split_2" );
 134   TestViewer::show( aWire, 0, true, Qt::green );
 135   CPPUNIT_ASSERT_IMAGES
 136
 137   HYDROData_LandCoverMap::Explorer anIt( aMap );
 138   CPPUNIT_ASSERT_EQUAL( true, anIt.More() );
 139   CPPUNIT_ASSERT_EQUAL( QString( "test1" ), anIt.StricklerType() );
 140   anIt.Next();
 141   CPPUNIT_ASSERT_EQUAL( false, anIt.More() );
 142
 143   aDoc->Close();
 144 }
 145
 146 void test_HYDROData_LandCoverMap::test_merge()
 147 {
 148   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 149
 150   Handle(HYDROData_LandCoverMap) aMap =
 151     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 152
 153   CPPUNIT_ASSERT_EQUAL( KIND_LAND_COVER_MAP, aMap->GetKind() );
 154
 155   TopoDS_Face aLC1 = Face( QList<double>() << 12 << 19 << 82 << 9 << 126 << 53 << 107 << 80 << 29 << 75 );
 156
 157   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "test1" ) );
 158
 159   TopoDS_Face aLC2 = Face( QList<double>() << 21 << 34 << 24 << 25 << 37   << 37 << 40  << 61 <<
 160                                               44 << 95 << 85 << 100 << 104 << 66 << 107 << 33 <<
 161                                              128 << 18 << 140 << 50 << 131 << 89 << 104 << 111 <<
 162                                               31 << 114 );
 163   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC2, "test2" ) );
 164
 165   TopoDS_Face aLC3 = Face( QList<double>() << 4 << 54 << 1   << 47 << 51  << 45 <<
 166                                             127 << 42 << 145 << 43 << 148 << 60 << 90 << 65 );
 167   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC3, "test3" ) );
 168
 169   //TestViewer::show( aMap->GetShape(), AIS_Shaded, true );
 170   //TestViewer::AssertEqual( "LandCoverMap_Before_Merge" );
 171
 172   //BRepTools::Write( aMap->GetShape(), "c:\\map.brep" );
 173
 174   QString aType1, aType2;
 175   gp_Pnt2d aPnt1( 25, 35 );
 176   gp_Pnt2d aPnt2( 45, 55 );
 177   //gp_Pnt2d aPnt3( 45, 10 );
 178   //gp_Pnt2d aPnt4( 45, 80 );
 179   TopTools_ListOfShape aList;
 180   aList.Append( aMap->FindByPoint( aPnt1, aType1 ) );
 181   aList.Append( aMap->FindByPoint( aPnt2, aType2 ) );
 182   CPPUNIT_ASSERT_EQUAL( true, aMap->Merge( aList, "new" ) );
 183
 184   TestViewer::show( aMap->GetShape(), AIS_Shaded, true, "LandCoverMap_Merge_1" );
 185   //TestViewer::show( BRepBuilderAPI_MakeEdge( gp_Pnt(aPnt1.X(), aPnt1.Y(), 0), gp_Pnt(aPnt2.X(), aPnt2.Y(), 0) ).Edge(), QColor( Qt::blue ), AIS_Shaded );
 186   CPPUNIT_ASSERT_IMAGES
 187
 188   aDoc->Close();
 189 }
 190
 191 void test_HYDROData_LandCoverMap::test_remove()
 192 {
 193   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 194
 195   Handle(HYDROData_LandCoverMap) aMap =
 196     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 197
 198   CPPUNIT_ASSERT_EQUAL( KIND_LAND_COVER_MAP, aMap->GetKind() );
 199
 200   TopoDS_Face aLC1 = Face( QList<double>() << 12 << 19 << 82 << 9 << 126 << 53 << 107 << 80 << 29 << 75 );
 201
 202   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "test1" ) );
 203
 204   TopoDS_Face aLC2 = Face( QList<double>() << 21 << 34 << 24 << 25 << 37   << 37 << 40  << 61 <<
 205                                               44 << 95 << 85 << 100 << 104 << 66 << 107 << 33 <<
 206                                              128 << 18 << 140 << 50 << 131 << 89 << 104 << 111 <<
 207                                               31 << 114 );
 208   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC2, "test2" ) );
 209
 210   TopoDS_Face aLC3 = Face( QList<double>() << 4 << 54 << 1   << 47 << 51  << 45 <<
 211                                             127 << 42 << 145 << 43 << 148 << 60 << 90 << 65 );
 212   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC3, "test3" ) );
 213
 214   QString aType1, aType2;
 215   gp_Pnt2d aPnt1( 25, 35 );
 216   gp_Pnt2d aPnt2( 45, 55 );
 217   TopTools_ListOfShape aList;
 218   aList.Append( aMap->FindByPoint( aPnt1, aType1 ) );
 219   aList.Append( aMap->FindByPoint( aPnt2, aType2 ) );
 220   CPPUNIT_ASSERT_EQUAL( true, aMap->Remove( aList ) );
 221
 222   TestViewer::show( aMap->GetShape(), AIS_Shaded, true, "LandCoverMap_Remove_1" );
 223   CPPUNIT_ASSERT_IMAGES
 224
 225   aDoc->Close();
 226 }
 227
 228 void test_HYDROData_LandCoverMap::test_merge_faces_boxes()
 229 {
 230   TopoDS_Shape pp1, pp2, pp3, pp4;
 231   BRep_Builder BB;
 232   BRepTools::Read(pp1, (REF_DATA_PATH + "/pp1.brep").toStdString().c_str(), BB);
 233   BRepTools::Read(pp2, (REF_DATA_PATH + "/pp2.brep").toStdString().c_str(), BB);
 234   BRepTools::Read(pp3, (REF_DATA_PATH + "/pp3.brep").toStdString().c_str(), BB);
 235   BRepTools::Read(pp4, (REF_DATA_PATH + "/pp4.brep").toStdString().c_str(), BB);
 236
 237   CPPUNIT_ASSERT(!pp1.IsNull());
 238   CPPUNIT_ASSERT(!pp2.IsNull());
 239   CPPUNIT_ASSERT(!pp3.IsNull());
 240   CPPUNIT_ASSERT(!pp4.IsNull());
 241
 242   //Test mergeFaces() func // boxes // USD == true
 243   {
 244     TopTools_ListOfShape Faces;
 245     Faces.Append(pp1);
 246     Faces.Append(pp2);
 247     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, true );
 248     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_boxes_11" );
 249     CPPUNIT_ASSERT_IMAGES
 250     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_FACE);
 251     BRepCheck_Analyzer aBCA(aMergedFace);
 252     CPPUNIT_ASSERT(aBCA.IsValid());
 253   }
 254   {
 255     TopTools_ListOfShape Faces;
 256     Faces.Append(pp1);
 257     Faces.Append(pp3);
 258     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, true );
 259     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_boxes_12" );
 260     CPPUNIT_ASSERT_IMAGES
 261     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 262     BRepCheck_Analyzer aBCA(aMergedFace);
 263     CPPUNIT_ASSERT(aBCA.IsValid());
 264   }
 265   {
 266     TopTools_ListOfShape Faces;
 267     Faces.Append(pp1);
 268     Faces.Append(pp2);
 269     Faces.Append(pp4);
 270     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, true );
 271     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_boxes_13" );
 272     CPPUNIT_ASSERT_IMAGES
 273     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 274     BRepCheck_Analyzer aBCA(aMergedFace);
 275     CPPUNIT_ASSERT(aBCA.IsValid());
 276   }
 277   {
 278     TopTools_ListOfShape Faces;
 279     Faces.Append(pp1);
 280     Faces.Append(pp3);
 281     Faces.Append(pp4);
 282     Faces.Append(pp2);
 283     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, true );
 284     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_boxes_14" );
 285     CPPUNIT_ASSERT_IMAGES
 286     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_FACE);
 287     BRepCheck_Analyzer aBCA(aMergedFace);
 288     CPPUNIT_ASSERT(aBCA.IsValid());
 289   }
 290   //
 291
 292   //Test mergeFaces() func // boxes // USD == false
 293   {
 294     TopTools_ListOfShape Faces;
 295     Faces.Append(pp1);
 296     Faces.Append(pp2);
 297     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, false );
 298     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_boxes_21" );
 299     CPPUNIT_ASSERT_IMAGES
 300     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_SHELL);
 301     BRepCheck_Analyzer aBCA(aMergedFace);
 302     CPPUNIT_ASSERT(aBCA.IsValid());
 303   }
 304   {
 305     TopTools_ListOfShape Faces;
 306     Faces.Append(pp1);
 307     Faces.Append(pp3);
 308     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, false );
 309     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_boxes_22" );
 310     CPPUNIT_ASSERT_IMAGES
 311     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 312     BRepCheck_Analyzer aBCA(aMergedFace);
 313     CPPUNIT_ASSERT(aBCA.IsValid());
 314   }
 315   {
 316     TopTools_ListOfShape Faces;
 317     Faces.Append(pp1);
 318     Faces.Append(pp2);
 319     Faces.Append(pp4);
 320     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, false );
 321     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_boxes_23" );
 322     CPPUNIT_ASSERT_IMAGES
 323     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 324     BRepCheck_Analyzer aBCA(aMergedFace);
 325     CPPUNIT_ASSERT(aBCA.IsValid());
 326   }
 327   {
 328     TopTools_ListOfShape Faces;
 329     Faces.Append(pp1);
 330     Faces.Append(pp3);
 331     Faces.Append(pp4);
 332     Faces.Append(pp2);
 333     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, false );
 334     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_boxes_24" );
 335     CPPUNIT_ASSERT_IMAGES
 336     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_SHELL);
 337     BRepCheck_Analyzer aBCA(aMergedFace);
 338     CPPUNIT_ASSERT(aBCA.IsValid());
 339   }
 340 }
 341
 342
 343 void test_HYDROData_LandCoverMap::test_merge_faces_circles()
 344 {
 345   TopoDS_Shape ff1, ff2, ff3;
 346   BRep_Builder BB;
 347   BRepTools::Read(ff1, (REF_DATA_PATH + "/ff1.brep").toStdString().c_str(), BB);
 348   BRepTools::Read(ff2, (REF_DATA_PATH + "/ff2.brep").toStdString().c_str(), BB);
 349   BRepTools::Read(ff3, (REF_DATA_PATH + "/ff3.brep").toStdString().c_str(), BB);
 350
 351   CPPUNIT_ASSERT(!ff1.IsNull());
 352   CPPUNIT_ASSERT(!ff2.IsNull());
 353   CPPUNIT_ASSERT(!ff3.IsNull());
 354
 355   //Test mergeFaces() func // circles // USD == true
 356   {
 357     TopTools_ListOfShape Faces;
 358     Faces.Append(ff1);
 359     Faces.Append(ff2);
 360     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, true );
 361     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_circles_11" );
 362     CPPUNIT_ASSERT_IMAGES
 363     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_FACE);
 364     BRepCheck_Analyzer aBCA(aMergedFace);
 365     CPPUNIT_ASSERT(aBCA.IsValid());
 366   }
 367   {
 368     TopTools_ListOfShape Faces;
 369     Faces.Append(ff1);
 370     Faces.Append(ff3);
 371     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, true );
 372     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_circles_12" );
 373     CPPUNIT_ASSERT_IMAGES
 374     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 375     BRepCheck_Analyzer aBCA(aMergedFace);
 376     CPPUNIT_ASSERT(aBCA.IsValid());
 377   }
 378   {
 379     TopTools_ListOfShape Faces;
 380     Faces.Append(ff1);
 381     Faces.Append(ff2);
 382     Faces.Append(ff3);
 383     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, true );
 384     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_circles_13" );
 385     CPPUNIT_ASSERT_IMAGES
 386     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 387     BRepCheck_Analyzer aBCA(aMergedFace);
 388     CPPUNIT_ASSERT(aBCA.IsValid());
 389   }
 390   {
 391     TopTools_ListOfShape Faces;
 392     Faces.Append(ff1);
 393     Faces.Append(ff3);
 394     Faces.Append(ff2);
 395     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, true );
 396     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_circles_14" );
 397     CPPUNIT_ASSERT_IMAGES
 398     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 399     BRepCheck_Analyzer aBCA(aMergedFace);
 400     CPPUNIT_ASSERT(aBCA.IsValid());
 401   }
 402   //
 403
 404   //Test mergeFaces() func // circles // USD == false
 405   {
 406     TopTools_ListOfShape Faces;
 407     Faces.Append(ff1);
 408     Faces.Append(ff2);
 409     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, false );
 410     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_circles_21" );
 411     CPPUNIT_ASSERT_IMAGES
 412     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_SHELL);
 413     BRepCheck_Analyzer aBCA(aMergedFace);
 414     CPPUNIT_ASSERT(aBCA.IsValid());
 415   }
 416   {
 417     TopTools_ListOfShape Faces;
 418     Faces.Append(ff1);
 419     Faces.Append(ff3);
 420     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, false );
 421     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_circles_22" );
 422     CPPUNIT_ASSERT_IMAGES
 423     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 424     BRepCheck_Analyzer aBCA(aMergedFace);
 425     CPPUNIT_ASSERT(aBCA.IsValid());
 426   }
 427   {
 428     TopTools_ListOfShape Faces;
 429     Faces.Append(ff1);
 430     Faces.Append(ff2);
 431     Faces.Append(ff3);
 432     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, false );
 433     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_circles_23" );
 434     CPPUNIT_ASSERT_IMAGES
 435     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 436     BRepCheck_Analyzer aBCA(aMergedFace);
 437     CPPUNIT_ASSERT(aBCA.IsValid());
 438   }
 439   {
 440     TopTools_ListOfShape Faces;
 441     Faces.Append(ff1);
 442     Faces.Append(ff3);
 443     Faces.Append(ff2);
 444     TopoDS_Shape aMergedFace = HYDROData_LandCoverMap::MergeFaces( Faces, false );
 445     TestViewer::show( aMergedFace, AIS_Shaded, true, "merge_faces_circles_24" );
 446     CPPUNIT_ASSERT_IMAGES
 447     CPPUNIT_ASSERT(aMergedFace.ShapeType() == TopAbs_COMPOUND);
 448     BRepCheck_Analyzer aBCA(aMergedFace);
 449     CPPUNIT_ASSERT(aBCA.IsValid());
 450   }
 451 }
 452
 453 void test_HYDROData_LandCoverMap::test_import_dbf()
 454 {
 455   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 456
 457   Handle(HYDROData_LandCoverMap) aMap =
 458     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 459
 460   CPPUNIT_ASSERT_EQUAL( KIND_LAND_COVER_MAP, aMap->GetKind() );
 461   QString aFileName = REF_DATA_PATH + "/t1.dbf";
 462   QStringList aDBFV;
 463   QStringList aST;
 464   aDBFV.append("100");
 465   aDBFV.append("200");
 466   aDBFV.append("300");
 467   aST.append("water");
 468   aST.append("forest");
 469   aST.append("road");
 470   // aST.size() == aDBFV.size()!!
 471   Handle(HYDROData_PolylineXY) aPolyline =
 472     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 473   TopoDS_Wire aWire = Wire( QList<double>() << 10 << 40 << 30 << 10 << 40 << 10 << 60 << 10 );
 474   aPolyline->SetShape( aWire );
 475   for (int i = 0; i < 3; i++)
 476     aMap->Add(aPolyline, "");
 477   TopoDS_Face aLC1 = Face( QList<double>() << 10 << 10 << 50 << 20 << 30 << 50 << 15 << 30 );
 478   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "test1" ) );
 479
 480   CPPUNIT_ASSERT_EQUAL( true, aMap->Split( aPolyline ) );
 481   QList<int> Inds = QList<int>() << 1 << 2 << 3;
 482   aMap->ImportDBF(aFileName, "TESTFIELD1", aDBFV, aST, Inds);
 483   HYDROData_LandCoverMap::Explorer anIt( aMap );
 484
 485   CPPUNIT_ASSERT_EQUAL( QString( "forest" ), anIt.StricklerType() );
 486   anIt.Next();
 487   CPPUNIT_ASSERT_EQUAL( QString( "road" ), anIt.StricklerType() );
 488
 489   aDoc->Close();
 490 }
 491
 492 void test_HYDROData_LandCoverMap::test_land_cover_prs_by_types()
 493 {
 494   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 495
 496   Handle(HYDROData_StricklerTable) aTable =
 497     Handle(HYDROData_StricklerTable)::DownCast( aDoc->CreateObject( KIND_STRICKLER_TABLE ) );
 498   CPPUNIT_ASSERT_EQUAL( true, aTable->Import( DEF_STR_PATH ) );
 499
 500   Handle(HYDROData_LandCoverMap) aMap =
 501     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 502
 503   TopoDS_Face aLC1 = Face( QList<double>() << 12 << 19 << 82 << 9 << 126 << 53 << 107 << 80 << 29 << 75 );
 504   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "Zones de champs cultivé à végétation basse" ) );
 505
 506   TopoDS_Face aLC2 = Face( QList<double>() << 21 << 34 << 24 << 25 << 37   << 37 << 40  << 61 <<
 507                                               44 << 95 << 85 << 100 << 104 << 66 << 107 << 33 <<
 508                                              128 << 18 << 140 << 50 << 131 << 89 << 104 << 111 <<
 509                                               31 << 114 );
 510   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC2, "Zones de champs cultivé à végétation haute" ) );
 511
 512   TopoDS_Face aLC3 = Face( QList<double>() << 4 << 54 << 1   << 47 << 51  << 45 <<
 513                                             127 << 42 << 145 << 43 << 148 << 60 << 90 << 65 );
 514   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC3, "Zones de champs, prairies, sans cultures" ) );
 515
 516   // build presentation object
 517   Handle(HYDROGUI_LandCoverMapPrs) aPrs = new HYDROGUI_LandCoverMapPrs( aMap );
 518   aPrs->SetTable( aTable );
 519   // show presentation in viewer
 520   TestViewer::show( aPrs, AIS_Shaded, 4, true, "LandCoverMap_PrsByTypes" );
 521   // select one of faces (first)
 522   TestViewer::select( 200, 300 );
 523   CPPUNIT_ASSERT_IMAGES
 524
 525   aDoc->Close();
 526 }
 527
 528 void test_HYDROData_LandCoverMap::test_land_cover_prs_by_coeff()
 529 {
 530   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 531
 532   Handle(HYDROData_StricklerTable) aTable =
 533     Handle(HYDROData_StricklerTable)::DownCast( aDoc->CreateObject( KIND_STRICKLER_TABLE ) );
 534   CPPUNIT_ASSERT_EQUAL( true, aTable->Import( DEF_STR_PATH ) );
 535
 536   Handle(HYDROData_LandCoverMap) aMap =
 537     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 538
 539   TopoDS_Face aLC1 = Face( QList<double>() << 12 << 19 << 82 << 9 << 126 << 53 << 107 << 80 << 29 << 75 );
 540   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "Zones de champs cultivé à végétation basse" ) );
 541
 542   TopoDS_Face aLC2 = Face( QList<double>() << 21 << 34 << 24 << 25 << 37   << 37 << 40  << 61 <<
 543                                               44 << 95 << 85 << 100 << 104 << 66 << 107 << 33 <<
 544                                              128 << 18 << 140 << 50 << 131 << 89 << 104 << 111 <<
 545                                               31 << 114 );
 546   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC2, "Zones de champs cultivé à végétation haute" ) );
 547
 548   TopoDS_Face aLC3 = Face( QList<double>() << 4 << 54 << 1   << 47 << 51  << 45 <<
 549                                             127 << 42 << 145 << 43 << 148 << 60 << 90 << 65 );
 550   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC3, "Zones de champs, prairies, sans cultures" ) );
 551
 552   Handle(HYDROGUI_LandCoverMapPrs) aPrs = new HYDROGUI_LandCoverMapPrs( aMap );
 553   aPrs->SetTable( aTable );
 554   TestViewer::showColorScale( true );
 555   aPrs->SetColorScale( TestViewer::colorScale() );
 556   TestViewer::show( aPrs, AIS_Shaded, 4, true, "LandCoverMap_PrsByCoeff" );
 557   CPPUNIT_ASSERT_IMAGES
 558
 559   TestViewer::showColorScale( false );
 560   aDoc->Close();
 561 }
 562
 563 void test_HYDROData_LandCoverMap::test_dump_python()
 564 {
 565   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 566
 567   Handle(HYDROData_StricklerTable) aTable =
 568     Handle(HYDROData_StricklerTable)::DownCast( aDoc->CreateObject( KIND_STRICKLER_TABLE ) );
 569   CPPUNIT_ASSERT_EQUAL( true, aTable->Import( DEF_STR_PATH ) );
 570   aTable->SetName( "DefStr" );
 571
 572   Handle(HYDROData_LandCoverMap) aMap =
 573     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 574   aMap->SetName( "test_LCM" );
 575
 576   CPPUNIT_ASSERT_EQUAL( KIND_LAND_COVER_MAP, aMap->GetKind() );
 577
 578   TopoDS_Face aLC1 = Face( QList<double>() << 12 << 19 << 82 << 9 << 126 << 53 << 107 << 80 << 29 << 75 );
 579
 580   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "test1" ) );
 581
 582   TopoDS_Face aLC2 = Face( QList<double>() << 21 << 34 << 24 << 25 << 37   << 37 << 40  << 61 <<
 583                                               44 << 95 << 85 << 100 << 104 << 66 << 107 << 33 <<
 584                                              128 << 18 << 140 << 50 << 131 << 89 << 104 << 111 <<
 585                                               31 << 114 );
 586   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC2, "test2" ) );
 587
 588   TopoDS_Face aLC3 = Face( QList<double>() << 4 << 54 << 1   << 47 << 51  << 45 <<
 589                                             127 << 42 << 145 << 43 << 148 << 60 << 90 << 65 );
 590   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC3, "test3" ) );
 591
 592   QString aBaseName = "lc_dump.py";
 593   QString aBaseShp = "lc_dump.shp";
 594   QString aBaseDbf = "lc_dump.dbf";
 595   QString aTmpPath = QDir::tempPath() + "/" + aBaseName;
 596   CPPUNIT_ASSERT_EQUAL( true, aDoc->DumpToPython( aTmpPath, false ) );
 597
 598   //TODO: CPPUNIT_ASSERT_SCRIPTS_EQUAL( aBaseName, true, false, 20 );
 599   //TODO: CPPUNIT_ASSERT_FILES_EQUAL( aBaseShp );
 600   //TODO: CPPUNIT_ASSERT_FILES_EQUAL( aBaseDbf );
 601
 602   aDoc->Close();
 603 }
 604
 605 void test_HYDROData_LandCoverMap::test_transparent_prs()
 606 {
 607   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 608
 609   Handle(HYDROData_StricklerTable) aTable =
 610     Handle(HYDROData_StricklerTable)::DownCast( aDoc->CreateObject( KIND_STRICKLER_TABLE ) );
 611   CPPUNIT_ASSERT_EQUAL( true, aTable->Import( DEF_STR_PATH ) );
 612
 613   Handle(HYDROData_PolylineXY) aPoly =
 614     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 615   aPoly->AddSection( "", HYDROData_PolylineXY::SECTION_SPLINE, true );
 616   aPoly->AddPoint( 0, gp_XY( 0, 0 ) );
 617   aPoly->AddPoint( 0, gp_XY( 20, 0 ) );
 618   aPoly->AddPoint( 0, gp_XY( 10, 10 ) );
 619   aPoly->Update();
 620
 621   Handle(HYDROData_ImmersibleZone) aZone =
 622     Handle(HYDROData_ImmersibleZone)::DownCast( aDoc->CreateObject( KIND_IMMERSIBLE_ZONE ) );
 623   aZone->SetPolyline( aPoly );
 624   aZone->Update();
 625
 626   Handle(HYDROData_LandCoverMap) aMap =
 627     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 628   aMap->LocalPartition( Face( QList<double>() << 1 << 1 << 10 << 10 << 10 << 20 ), "Zones de champs cultivé à végétation haute" );
 629   aMap->LocalPartition( Face( QList<double>() << 5 << 5 << 10 << 5 << 10 << 8 << 5 << 12 << 5 << 8 ), "Zones de champs cultivé à végétation haute" );
 630   aMap->SetName( "test_LCM" );
 631
 632   TestViewer::show( aZone->GetTopShape(), AIS_Shaded, true, "LandCoverMap_TransparentPrs" );
 633
 634   aMap->SetTransparency( 0.5 );
 635   CPPUNIT_ASSERT_DOUBLES_EQUAL( 0.5, aMap->GetTransparency(), 1E-6 );
 636
 637   Handle(HYDROGUI_LandCoverMapPrs) aPrs = new HYDROGUI_LandCoverMapPrs( aMap );
 638   aPrs->SetTable( aTable );
 639   TestViewer::show( aPrs, AIS_Shaded, 0, true, "" );
 640
 641   CPPUNIT_ASSERT_IMAGES
 642   aDoc->Close();
 643 }
 644
 645 void test_HYDROData_LandCoverMap::test_add_triangles()
 646 {
 647   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 648
 649   Handle(HYDROData_PolylineXY) Polyline_1 =
 650     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 651
 652   Polyline_1->SetName( "Polyline_1" );
 653   Polyline_1->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 654   Polyline_1->AddPoint( 0, gp_XY( -264.84, 323.44 ) );
 655   Polyline_1->AddPoint( 0, gp_XY( 254.45, 301.19 ) );
 656   Polyline_1->AddPoint( 0, gp_XY( -291.54, -47.48 ) );
 657   Polyline_1->Update();
 658
 659   Handle(HYDROData_PolylineXY) Polyline_2 =
 660     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 661   Polyline_2->SetName( "Polyline_2" );
 662   Polyline_2->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, false );
 663   Polyline_2->AddPoint( 0, gp_XY( -42.28, -351.63 ) );
 664   Polyline_2->AddPoint( 0, gp_XY( 218.84, -146.88 ) );
 665   Polyline_2->AddPoint( 0, gp_XY( 413.20, -235.91 ) );
 666   Polyline_2->AddPoint( 0, gp_XY( 466.62, -388.72 ) );
 667   Polyline_2->Update();
 668
 669   Handle(HYDROData_PolylineXY) Polyline_3 =
 670     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 671   Polyline_3->SetName( "Polyline_3" );
 672   Polyline_3->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 673   Polyline_3->AddPoint( 0, gp_XY( -108.31, 213.65 ) );
 674   Polyline_3->AddPoint( 0, gp_XY( 127.60, 382.79 ) );
 675   Polyline_3->AddPoint( 0, gp_XY( 192.88, -91.99 ) );
 676   Polyline_3->Update();
 677
 678   Handle(HYDROData_PolylineXY) Polyline_4 =
 679     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 680   Polyline_4->SetName( "Polyline_4" );
 681   Polyline_4->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 682   Polyline_4->AddPoint( 0, gp_XY( 215.52, 344.61 ) );
 683   Polyline_4->AddPoint( 0, gp_XY( 68.25, 258.52 ) );
 684   Polyline_4->AddPoint( 0, gp_XY( 200.58, 154.65 ) );
 685   Polyline_4->Update();
 686
 687   Handle(HYDROData_PolylineXY) Polyline_5 =
 688     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 689   Polyline_5->SetName( "Polyline_5" );
 690   Polyline_5->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, false );
 691   Polyline_5->AddPoint( 0, gp_XY( 16.15, -58.08 ) );
 692   Polyline_5->AddPoint( 0, gp_XY( 116.47, 84.21 ) );
 693   Polyline_5->AddPoint( 0, gp_XY( 266.59, 29.43 ) );
 694   Polyline_5->Update();
 695
 696   Handle(HYDROData_LandCoverMap) aMap =
 697     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 698
 699   CPPUNIT_ASSERT_EQUAL( true, aMap->Add( Polyline_1, "" ) );
 700   CPPUNIT_ASSERT_EQUAL( true, aMap->Add( Polyline_3, "" ) );
 701   CPPUNIT_ASSERT_EQUAL( true, aMap->Add( Polyline_4, "" ) );
 702
 703   Handle(HYDROGUI_LandCoverMapPrs) aPrs = new HYDROGUI_LandCoverMapPrs( aMap );
 704   TopoDS_Shape aSh = aMap->GetShape();
 705   TestViewer::show( aPrs, AIS_Shaded, 0, true, "LandCover_Triangles" );
 706   CPPUNIT_ASSERT_IMAGES
 707
 708   CPPUNIT_ASSERT_EQUAL( true, aMap->Split( Polyline_5 ) );
 709   Handle(HYDROGUI_LandCoverMapPrs) aPrs2 = new HYDROGUI_LandCoverMapPrs( aMap );
 710   TestViewer::show( aPrs2, AIS_Shaded, 0, true, "LandCover_Triangles_Split" );
 711   CPPUNIT_ASSERT_IMAGES
 712
 713   aDoc->Close();
 714 }
 715
 716 void test_HYDROData_LandCoverMap::test_assign_to_calc_case()
 717 {
 718   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 719
 720   Handle(HYDROData_LandCoverMap) aMap =
 721     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 722   Handle(HYDROData_CalculationCase) aCalcCase =
 723     Handle(HYDROData_CalculationCase)::DownCast( aDoc->CreateObject( KIND_CALCULATION ) );
 724
 725   aCalcCase->SetLandCoverMap( aMap );
 726   CPPUNIT_ASSERT_EQUAL( aMap->myLab, aCalcCase->GetLandCoverMap()->myLab );
 727
 728   aDoc->Close();
 729 }
 730
 731 void test_HYDROData_LandCoverMap::test_shp_import_cyp()
 732 {
 733   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 734   QString aFileName = REF_DATA_PATH + "/cyprus_natural.shp";
 735   HYDROData_ShapeFile anImporter;
 736   QStringList PolygonList;
 737   TopTools_SequenceOfShape PolygonFaces;
 738   int Type = -1;
 739   int aStat = anImporter.ImportPolygons(aFileName, PolygonList, PolygonFaces, Type);
 740   CPPUNIT_ASSERT(aStat == 1);
 741   CPPUNIT_ASSERT_EQUAL(5, Type);
 742   CPPUNIT_ASSERT_EQUAL(268, PolygonFaces.Length());
 743
 744   Handle(HYDROData_LandCoverMap) LCM = Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 745   HYDROData_MapOfFaceToStricklerType aMapFace2ST;
 746
 747   for ( int i = 1; i <= PolygonFaces.Length(); i++ )
 748   {
 749     TopoDS_Shape aShape = PolygonFaces(i);
 750     if ( aShape.IsNull() )
 751       continue;
 752     aMapFace2ST.Add( TopoDS::Face( aShape ), "" );
 753   }
 754
 755   LCM->StoreLandCovers(aMapFace2ST);
 756   TestViewer::show( LCM->GetShape(), AIS_Shaded, true, "cyprus_natural_all" );
 757   CPPUNIT_ASSERT_IMAGES
 758   aDoc->Close();
 759 }
 760
 761 void test_HYDROData_LandCoverMap::test_shp_import_clc_dec()
 762 {
 763   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 764   QString aFileName = REF_DATA_PATH + "/CLC_decoupe.shp";
 765   HYDROData_ShapeFile anImporter;
 766   QStringList PolygonList;
 767   TopTools_SequenceOfShape PolygonFaces;
 768   int Type = -1;
 769   int aStat = anImporter.ImportPolygons(aFileName, PolygonList, PolygonFaces, Type);
 770   CPPUNIT_ASSERT(aStat == 1);
 771   CPPUNIT_ASSERT_EQUAL(5, Type);
 772   CPPUNIT_ASSERT_EQUAL(625, PolygonFaces.Length());
 773
 774   Handle(HYDROData_LandCoverMap) LCM = Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 775   HYDROData_MapOfFaceToStricklerType aMapFace2ST;
 776
 777   for ( int i = 150; i <= 350; i++ )
 778   {
 779     TopoDS_Shape aShape = PolygonFaces(i);
 780     if ( aShape.IsNull() )
 781       continue;
 782     aMapFace2ST.Add( TopoDS::Face( aShape ), "" );
 783   }
 784
 785   LCM->StoreLandCovers(aMapFace2ST);
 786   TestViewer::show( LCM->GetShape(), AIS_Shaded, true, "clc_dec_150_350" );
 787   CPPUNIT_ASSERT_IMAGES
 788   aDoc->Close();
 789 }
 790
 791 void test_HYDROData_LandCoverMap::test_shp_import_nld_areas()
 792 {
 793   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 794   QString aFileName = REF_DATA_PATH + "/NLD_water_areas_dcw.shp";
 795   HYDROData_ShapeFile anImporter;
 796   QStringList PolygonList;
 797   TopTools_SequenceOfShape PolygonFaces;
 798   int Type = -1;
 799   int aStat = anImporter.ImportPolygons(aFileName, PolygonList, PolygonFaces, Type);
 800   CPPUNIT_ASSERT(aStat == 1);
 801   CPPUNIT_ASSERT_EQUAL(5, Type);
 802   CPPUNIT_ASSERT_EQUAL(127, PolygonFaces.Length());
 803
 804   Handle(HYDROData_LandCoverMap) LCM = Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 805   HYDROData_MapOfFaceToStricklerType aMapFace2ST;
 806
 807   for ( int i = 1; i <= PolygonFaces.Length(); i++ )
 808   {
 809     TopoDS_Shape aShape = PolygonFaces(i);
 810     if ( aShape.IsNull() )
 811       continue;
 812     aMapFace2ST.Add( TopoDS::Face( aShape ), "" );
 813   }
 814
 815   LCM->StoreLandCovers(aMapFace2ST);
 816   TestViewer::show( LCM->GetShape(), AIS_Shaded, true, "NLD_water_areas_dcw" );
 817   CPPUNIT_ASSERT_IMAGES
 818   aDoc->Close();
 819 }
 820
 821 void test_HYDROData_LandCoverMap::test_shp_loop_back()
 822 {
 823   QString aFFileName = REF_DATA_PATH + "/CLC06-cut_1.shp";
 824   QString aSFileName = REF_DATA_PATH + "/CLC06-cut_1_res.shp";
 825   //This test verify only some geom data (shp+shx) without any dbf reading/writing
 826   {
 827     Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 828     HYDROData_ShapeFile anImporter;
 829     QStringList PolygonList;
 830     TopTools_SequenceOfShape PolygonFaces;
 831     int Type = -1;
 832
 833     //import LCM from file (#2-4; #12-14 polygons)
 834     CPPUNIT_ASSERT( anImporter.ImportPolygons(aFFileName, PolygonList, PolygonFaces, Type));
 835     Handle(HYDROData_LandCoverMap) LCM = Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 836     HYDROData_MapOfFaceToStricklerType aMapFace2ST;
 837
 838     aMapFace2ST.Add( TopoDS::Face( PolygonFaces(2) ), "" );
 839     aMapFace2ST.Add( TopoDS::Face( PolygonFaces(3) ), "" );
 840     aMapFace2ST.Add( TopoDS::Face( PolygonFaces(4) ), "" );
 841     aMapFace2ST.Add( TopoDS::Face( PolygonFaces(12) ), "" );
 842     aMapFace2ST.Add( TopoDS::Face( PolygonFaces(13) ), "" );
 843     aMapFace2ST.Add( TopoDS::Face( PolygonFaces(14) ), "" );
 844
 845     LCM->StoreLandCovers(aMapFace2ST);
 846     LCM->SetName("lcm_1");
 847
 848     TopoDS_Shape aSh = LCM->GetShape();
 849     BRepCheck_Analyzer aBCA(aSh);
 850     CPPUNIT_ASSERT(aBCA.IsValid());
 851
 852     //export lcm
 853     HYDROData_ShapeFile anExporter;
 854     QStringList aNonExpList;
 855     anExporter.Export(aSFileName, LCM, aNonExpList);
 856     CPPUNIT_ASSERT (aNonExpList.empty());
 857
 858     aDoc->Close();
 859   }
 860   {
 861     Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 862     HYDROData_ShapeFile anImporter;
 863     QStringList PolygonList;
 864     TopTools_SequenceOfShape PolygonFaces;
 865     int Type = -1;
 866
 867     //import all
 868     CPPUNIT_ASSERT( anImporter.ImportPolygons(aSFileName, PolygonList, PolygonFaces, Type));
 869     Handle(HYDROData_LandCoverMap) LCM = Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 870     HYDROData_MapOfFaceToStricklerType aMapFace2ST;
 871     CPPUNIT_ASSERT_EQUAL(PolygonFaces.Length(), 6);
 872     for ( int i = 1; i <= PolygonFaces.Length(); i++ )
 873       aMapFace2ST.Add( TopoDS::Face( PolygonFaces(i) ), "" );
 874
 875     LCM->StoreLandCovers(aMapFace2ST);
 876     LCM->SetName("lcm_2");
 877
 878     TopoDS_Shape OutSh = LCM->GetShape();
 879     BRepCheck_Analyzer aBCA(OutSh);
 880     CPPUNIT_ASSERT(aBCA.IsValid());
 881
 882     TestViewer::show( OutSh, AIS_Shaded, true, "CLC06-cut_1_res" );
 883     CPPUNIT_ASSERT_IMAGES
 884
 885     aDoc->Close();
 886   }
 887   CPPUNIT_ASSERT_EQUAL(0, remove(aSFileName.toStdString().c_str()));
 888 }
 889
 890 void test_HYDROData_LandCoverMap::test_add_2_section_poly()
 891 {
 892   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document( 1 );
 893
 894   Handle(HYDROData_PolylineXY) Polyline_12 =
 895     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 896   Polyline_12->SetName( "Polyline_12" );
 897
 898   Polyline_12->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 899   Polyline_12->AddPoint( 0, gp_XY( -148.70, 145.68 ) );
 900   Polyline_12->AddPoint( 0, gp_XY( -81.71, 210.97 ) );
 901   Polyline_12->AddPoint( 0, gp_XY( -21.09, 122.79 ) );
 902   Polyline_12->AddPoint( 0, gp_XY( -106.30, 102.44 ) );
 903   Polyline_12->AddSection( "Section_2", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 904   Polyline_12->AddPoint( 1, gp_XY( -7.09, 227.08 ) );
 905   Polyline_12->AddPoint( 1, gp_XY( 46.32, 228.78 ) );
 906   Polyline_12->AddPoint( 1, gp_XY( 69.64, 165.61 ) );
 907   Polyline_12->AddPoint( 1, gp_XY( 13.68, 156.28 ) );
 908
 909   Polyline_12->Update();
 910
 911   Handle(HYDROData_LandCoverMap) LCM = Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 912   CPPUNIT_ASSERT_EQUAL( true, LCM->Add( Polyline_12, "" ) );
 913
 914   TestViewer::show( LCM->GetShape(), AIS_Shaded, true, "lcm_poly_2_sections" );
 915   CPPUNIT_ASSERT_IMAGES
 916
 917   aDoc->Close();
 918 }
 919
 920 void test_HYDROData_LandCoverMap::test_split_2()
 921 {
 922   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document( 1 );
 923
 924   Handle(HYDROData_PolylineXY) Polyline_1 =
 925     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 926   Polyline_1->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 927   Polyline_1->AddPoint( 0, gp_XY( -264.84, 323.44 ) );
 928   Polyline_1->AddPoint( 0, gp_XY( 254.45, 301.19 ) );
 929   Polyline_1->AddPoint( 0, gp_XY( -291.54, -47.48 ) );
 930   Polyline_1->Update();
 931
 932   Handle(HYDROData_PolylineXY) Polyline_6 =
 933     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 934   Polyline_6->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 935   Polyline_6->AddPoint( 0, gp_XY( -155.15, 199.47 ) );
 936   Polyline_6->AddPoint( 0, gp_XY( -71.19, 289.12 ) );
 937   Polyline_6->AddPoint( 0, gp_XY( 22.01, 211.57 ) );
 938   Polyline_6->AddPoint( 0, gp_XY( -84.00, 134.73 ) );
 939   Polyline_6->Update();
 940
 941   Handle(HYDROData_PolylineXY) Polyline_7 =
 942     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 943   Polyline_7->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 944   Polyline_7->AddPoint( 0, gp_XY( -50.56, 232.20 ) );
 945   Polyline_7->AddPoint( 0, gp_XY( 40.51, 286.98 ) );
 946   Polyline_7->AddPoint( 0, gp_XY( 118.77, 256.39 ) );
 947   Polyline_7->AddPoint( 0, gp_XY( 72.52, 114.10 ) );
 948   Polyline_7->Update();
 949
 950   Handle(HYDROData_PolylineXY) Polyline_8 =
 951     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 952   Polyline_8->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, true );
 953   Polyline_8->AddPoint( 0, gp_XY( -44.16, 190.93 ) );
 954   Polyline_8->AddPoint( 0, gp_XY( 9.91, 226.51 ) );
 955   Polyline_8->AddPoint( 0, gp_XY( 35.53, 175.99 ) );
 956   Polyline_8->AddPoint( 0, gp_XY( -9.30, 157.50 ) );
 957   Polyline_8->Update();
 958
 959   Handle(HYDROData_PolylineXY) Polyline_9 =
 960     Handle(HYDROData_PolylineXY)::DownCast( aDoc->CreateObject( KIND_POLYLINEXY ) );
 961   Polyline_9->AddSection( "Section_1", HYDROData_PolylineXY::SECTION_POLYLINE, false );
 962   Polyline_9->AddPoint( 0, gp_XY( -103.92, 288.40 ) );
 963   Polyline_9->AddPoint( 0, gp_XY( -100.09, 285.22 ) );
 964   Polyline_9->AddPoint( 0, gp_XY( -96.10, 281.90 ) );
 965   Polyline_9->AddPoint( 0, gp_XY( -90.43, 277.19 ) );
 966   Polyline_9->AddPoint( 0, gp_XY( -53.41, 246.43 ) );
 967   Polyline_9->AddPoint( 0, gp_XY( 10.62, 245.01 ) );
 968
 969
 970   Polyline_9->Update();
 971
 972
 973   Handle(HYDROData_LandCoverMap) LCM = Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
 974   CPPUNIT_ASSERT_EQUAL( true, LCM->Add( Polyline_1, "" ) );
 975   CPPUNIT_ASSERT_EQUAL( true, LCM->Add( Polyline_6, "" ) );
 976   CPPUNIT_ASSERT_EQUAL( true, LCM->Add( Polyline_7, "" ) );
 977
 978   CPPUNIT_ASSERT_EQUAL( true, LCM->Split( Polyline_9 ) );
 979
 980   //Handle(HYDROGUI_LandCoverMapPrs) aPrs1 = new HYDROGUI_LandCoverMapPrs( LCM );
 981   TestViewer::show( LCM->GetShape(), AIS_Shaded, /*0,*/ true, "LCM_split_2a" );
 982   CPPUNIT_ASSERT_IMAGES
 983
 984   CPPUNIT_ASSERT_EQUAL( true, LCM->Split( Polyline_8 ) );
 985
 986   // Handle(HYDROGUI_LandCoverMapPrs) aPrs2 = new HYDROGUI_LandCoverMapPrs( LCM );
 987   TestViewer::show( LCM->GetShape(), AIS_Shaded, /*0,*/ true, "LCM_split_2b" );
 988   CPPUNIT_ASSERT_IMAGES
 989
 990   aDoc->Close();
 991 }
 992
 993 void test_HYDROData_LandCoverMap::test_export_telemac()
 994 {
 995   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
 996
 997   Handle(HYDROData_StricklerTable) aTable =
 998     Handle(HYDROData_StricklerTable)::DownCast( aDoc->CreateObject( KIND_STRICKLER_TABLE ) );
 999   CPPUNIT_ASSERT_EQUAL( true, aTable->Import( DEF_STR_PATH ) );
1000
1001   Handle(HYDROData_LandCoverMap) aMap =
1002     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
1003
1004   TopoDS_Face aLC1 = Face( QList<double>() << 12 << 19 << 82 << 9 << 126 << 53 << 107 << 80 << 29 << 75 );
1005   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "Zones de champs cultivé à végétation basse" ) );
1006
1007   TopoDS_Face aLC2 = Face( QList<double>() << 21 << 34 << 24 << 25 << 37   << 37 << 40  << 61 <<
1008                                               44 << 95 << 85 << 100 << 104 << 66 << 107 << 33 <<
1009                                              128 << 18 << 140 << 50 << 131 << 89 << 104 << 111 <<
1010                                               31 << 114 );
1011   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC2, "Zones de champs cultivé à végétation haute" ) );
1012
1013   TopoDS_Face aLC3 = Face( QList<double>() << 4 << 54 << 1   << 47 << 51  << 45 <<
1014                                             127 << 42 << 145 << 43 << 148 << 60 << 90 << 65 );
1015   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC3, "Zones de champs, prairies, sans cultures" ) );
1016
1017   QString aTmpFileName = "test.telemac";
1018   QString aTmpPath = QDir::tempPath() + "/" + aTmpFileName;
1019   CPPUNIT_ASSERT_EQUAL( true, aMap->ExportTelemac( aTmpPath, 1E-4, aTable ) );
1020   CPPUNIT_ASSERT_SCRIPTS_EQUAL( aTmpFileName, true, true, 0 );
1021
1022   aDoc->Close();
1023 }
1024
1025 void test_HYDROData_LandCoverMap::test_copy()
1026 {
1027   Handle(HYDROData_Document) aDoc = HYDROData_Document::Document(1);
1028
1029   Handle(HYDROData_LandCoverMap) aMap =
1030     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
1031   aMap->SetName( "map_1" );
1032
1033   TopoDS_Face aLC1 = Face( QList<double>() << 10 << 10 << 30 << 10 << 20 << 20 );
1034   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC1, "Zones de champs cultivé à végétation basse" ) );
1035
1036   TopoDS_Face aLC2 = Face( QList<double>() << 110 << 10 << 130 << 10 << 120 << 20 );
1037   CPPUNIT_ASSERT_EQUAL( true, aMap->LocalPartition( aLC2, "Zones de champs cultivé à végétation haute" ) );
1038
1039   Handle(HYDROData_LandCoverMap) aMap2 =
1040     Handle(HYDROData_LandCoverMap)::DownCast( aDoc->CreateObject( KIND_LAND_COVER_MAP ) );
1041   aMap->CopyTo( aMap2, true );
1042
1043   CPPUNIT_ASSERT_EQUAL( QString( "map_2" ), aMap2->GetName() );
1044   HYDROData_LandCoverMap::Explorer anIt( aMap2 );
1045   CPPUNIT_ASSERT_EQUAL( true, anIt.More() );
1046   CPPUNIT_ASSERT_EQUAL( QString( "Zones de champs cultivé à végétation basse" ), anIt.StricklerType() );
1047   CPPUNIT_ASSERT( anIt.Face().TShape()!=aLC1.TShape() );
1048   anIt.Next();
1049   CPPUNIT_ASSERT_EQUAL( true, anIt.More() );
1050   CPPUNIT_ASSERT_EQUAL( QString( "Zones de champs cultivé à végétation haute" ), anIt.StricklerType() );
1051   CPPUNIT_ASSERT( anIt.Face().TShape()!=aLC2.TShape() );
1052   anIt.Next();
1053   CPPUNIT_ASSERT_EQUAL( false, anIt.More() );
1054
1055   TopoDS_Shape aShape1 = aMap->GetShape();
1056   TopoDS_Shape aShape2 = aMap2->GetShape();
1057   gp_Trsf aTr;
1058   aTr.SetTranslation( gp_Vec( 0, 50, 0 ) );
1059   aShape2.Move( TopLoc_Location( aTr ) );
1060   TestViewer::show( aShape1, AIS_Shaded, /*0,*/ true, "LCM_copied" );
1061   TestViewer::show( aShape2, AIS_Shaded, /*0,*/ true, "" );
1062   CPPUNIT_ASSERT_IMAGES
1063
1064   aDoc->Close();
1065 }