Salome HOME
garder les noms tels que à l'import SinusX
[modules/hydro.git] / src / HYDROData / HYDROData_SinusX.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_SinusX.h"
20
21 #include <HYDROData_PolylineXY.h>
22 #include <HYDROData_Bathymetry.h>
23 #include <HYDROData_Entity.h>
24 #include <HYDROData_Document.h>
25 #include <HYDROData_Profile.h>
26 #include <HYDROData_Iterator.h>
27
28 #include <gp_XYZ.hxx>
29 #include <gp_XY.hxx>
30
31 #include <QFile>
32 #include <QFileInfo>
33 #include <QString>
34 #include <QStringList>
35 #include <QTextStream>
36 #include <QColor>
37
38 HYDROData_SinusX::HYDROData_SinusX( ) 
39 {
40 }
41
42 HYDROData_SinusX::~HYDROData_SinusX()
43 {
44 }
45
46 void HYDROData_SinusX::CollectExistingNames(Handle_HYDROData_Document theDocument)
47 {
48   HYDROData_Iterator anIter( theDocument );
49   int anInd = 0;
50   myExistingNames.clear();
51   std::vector<int> anAllowedIndexes;
52   for( ; anIter.More(); anIter.Next() )
53     myExistingNames.push_back(anIter.Current()->GetName());
54 }
55
56 QString HYDROData_SinusX::GetName(const QString& theName)
57 {
58   if (myExistingNames.contains(theName))
59   { 
60     QString aName = theName; 
61     while (myExistingNames.contains(aName)) 
62     {
63       QStringList aList = aName.split("_");
64       int aLastInd = aName.lastIndexOf("_");
65       bool IsNum = false; 
66       int anInd = -1;
67       anInd = aList.last().toInt(&IsNum);
68       if (IsNum)
69       {
70         aName = aName.left(aLastInd) + "_";
71         aName+= QString::number(++anInd);
72       }
73       else
74         aName = theName + "_0";
75     }
76
77     myExistingNames.push_back(aName);
78     return aName;
79   }
80   else
81   {
82     myExistingNames.push_back(theName);
83     return theName;
84   }
85
86 }
87
88
89 bool HYDROData_SinusX::Import(const QString& theFilePath, Handle(HYDROData_Document) theDocument, NCollection_Sequence<Handle_HYDROData_Entity>& theEntities)
90 {
91   if ( theFilePath.isEmpty() )
92   { 
93     return false;
94   }
95
96   QString anExt = theFilePath.split('.', QString::SkipEmptyParts).back();
97
98   if (anExt == "sx")
99   {
100     QFile aFile (theFilePath);
101     
102     aFile.open(QIODevice::ReadOnly);
103
104     Parse(aFile);
105    
106     CollectExistingNames(theDocument);
107     SXToHydro(theDocument, theEntities);
108     
109     aFile.close();
110     
111     return true;
112   }
113   else
114     return false;
115
116 }
117
118 void HYDROData_SinusX::SXToHydro(Handle(HYDROData_Document) theDocument, NCollection_Sequence<Handle_HYDROData_Entity>& theEntities)
119
120   for ( size_t i = 0; i < myCurveBlocks.size(); i++ )
121   {
122     if (myCurveBlocks[i].myType == 4) ///  scatter plot -> to bathy
123     {
124       Handle(HYDROData_Bathymetry) aBath = Handle(HYDROData_Bathymetry)::DownCast( theDocument->CreateObject( KIND_BATHYMETRY ) );
125       HYDROData_Bathymetry::AltitudePoints aAPoints;
126       for (size_t j = 0; j < myCurveBlocks[i].myXYZPoints.size(); j++)
127       {
128         gp_XYZ aLocalPoint = gp_XYZ (myCurveBlocks[i].myXYZPoints[j]);
129         theDocument->Transform(aLocalPoint, true);
130         aAPoints.Append(aLocalPoint);
131       }
132
133       aBath->SetAltitudePoints(aAPoints);
134       aBath->SetName(GetName(myCurveBlocks[i].myName));
135       theEntities.Append(aBath);
136     }
137     if (myCurveBlocks[i].myType == 1 || myCurveBlocks[i].myType == 3) // XYZ curve or isocontour
138     {
139       NCollection_Sequence<gp_XYZ> aPoints;
140       for (size_t j = 0; j < myCurveBlocks[i].myXYZPoints.size(); j++)
141       {
142         gp_XYZ aLocalPoint = gp_XYZ (myCurveBlocks[i].myXYZPoints[j]);
143         theDocument->Transform(aLocalPoint, true);
144         aPoints.Append(aLocalPoint);
145       }
146       /*if (myCurveBlocks[i].myIsClosed)
147         aPoints.Append(gp_XYZ (myCurveBlocks[i].myXYZPoints[0]));*/
148       Handle(HYDROData_ProfileUZ) aProfileUZ = Handle(HYDROData_ProfileUZ)::DownCast( theDocument->CreateObject( KIND_PROFILEUZ ) );
149       Handle(HYDROData_PolylineXY) aPolyXY = Handle(HYDROData_PolylineXY)::DownCast( theDocument->CreateObject( KIND_POLYLINEXY ) );
150       aPolyXY->AddSection( "",  
151         myCurveBlocks[i].myIsSpline ? HYDROData_PolylineXY::SECTION_SPLINE : HYDROData_PolylineXY::SECTION_POLYLINE, 
152         myCurveBlocks[i].myIsClosed ? true : false); 
153       aProfileUZ->CalculateAndAddPoints(aPoints, aPolyXY);
154       Handle(HYDROData_Profile) aProfile = Handle(HYDROData_Profile)::DownCast( theDocument->CreateObject( KIND_PROFILE ) );
155       aProfile->SetParametricPoints(aProfileUZ->GetPoints());
156       aPolyXY->SetName(GetName(myCurveBlocks[i].myName));
157       aProfileUZ->SetName(GetName(myCurveBlocks[i].myName));
158       aProfile->SetName(GetName(myCurveBlocks[i].myName));
159       aPolyXY->SetWireColor(HYDROData_PolylineXY::DefaultWireColor());
160       theEntities.Append(aPolyXY);
161       theEntities.Append(aProfileUZ);
162       theEntities.Append(aProfile);
163     }
164     if (myCurveBlocks[i].myType == 2) // XYZ profile
165     {
166       if (myCurveBlocks[i].myCurvePlane == 2) // plane XoZ
167       {
168         if (myCurveBlocks[i].myAdditionalCurveInfo.size() == 4)
169         {
170           Handle(HYDROData_Profile) aProfile = Handle(HYDROData_Profile)::DownCast( theDocument->CreateObject( KIND_PROFILE ) );
171           HYDROData_ProfileUZ::PointsList aPointList;
172           for (size_t j = 0; j < myCurveBlocks[i].myXYZPoints.size(); j++)
173             aPointList.Append(gp_XY (myCurveBlocks[i].myXYZPoints[j].X(), myCurveBlocks[i].myXYZPoints[j].Z()));
174           aProfile->GetProfileUZ()->SetSectionType(0,  myCurveBlocks[i].myIsSpline ? HYDROData_PolylineXY::SECTION_SPLINE : HYDROData_PolylineXY::SECTION_POLYLINE);
175           aProfile->GetProfileUZ()->SetSectionClosed(0, myCurveBlocks[i].myIsClosed ? true : false);
176           aProfile->SetParametricPoints(aPointList);
177           if ( ! (myCurveBlocks[i].myAdditionalCurveInfo[0] == 0 &&  myCurveBlocks[i].myAdditionalCurveInfo[1] == 0 && 
178             myCurveBlocks[i].myAdditionalCurveInfo[2] == 0 && myCurveBlocks[i].myAdditionalCurveInfo[3] == 0) )
179           { // georeferenced profile
180             double xl = myCurveBlocks[i].myAdditionalCurveInfo[0];
181             double yl = myCurveBlocks[i].myAdditionalCurveInfo[1];
182             double xr = myCurveBlocks[i].myAdditionalCurveInfo[2];
183             double yr = myCurveBlocks[i].myAdditionalCurveInfo[3];
184             theDocument->Transform(xl, yl , true);
185             theDocument->Transform(xr, yr , true);
186             aProfile->SetLeftPoint(gp_XY(xl, yl));
187             aProfile->SetRightPoint(gp_XY(xr, yr));
188             aProfile->Update();
189           }
190           aProfile->SetName(GetName(myCurveBlocks[i].myName));
191           theEntities.Append(aProfile);
192         }
193       }
194       if (myCurveBlocks[i].myCurvePlane == 0) // plane XoY
195       {
196         Handle(HYDROData_Profile) aProfile = Handle(HYDROData_Profile)::DownCast( theDocument->CreateObject( KIND_PROFILE ) );
197         HYDROData_Profile::ProfilePoints aPointList;
198         for (size_t j = 0; j < myCurveBlocks[i].myXYZPoints.size(); j++)
199         {
200           gp_XYZ aLocalPoint = gp_XYZ (myCurveBlocks[i].myXYZPoints[j]);
201           theDocument->Transform(aLocalPoint, true);
202           aPointList.Append(aLocalPoint);
203         }
204         aProfile->GetProfileUZ()->SetSectionType(0,  myCurveBlocks[i].myIsSpline ? HYDROData_PolylineXY::SECTION_SPLINE : HYDROData_PolylineXY::SECTION_POLYLINE);
205         aProfile->GetProfileUZ()->SetSectionClosed(0, myCurveBlocks[i].myIsClosed ? true : false);
206         aProfile->SetProfilePoints(aPointList);
207         aProfile->SetName(GetName(myCurveBlocks[i].myName));
208         theEntities.Append(aProfile);
209       }
210     }
211   }
212
213 }
214  
215
216 bool HYDROData_SinusX::Parse(QFile& theFile)
217 {
218   if ( !theFile.isOpen() )
219     return false;
220
221   QString aLine;
222   QString aBLine;
223   QStringList aList;
224   QStringList aBList;
225   myCurveBlocks.clear();
226   bool aTotStat = true;
227
228   aLine = theFile.readLine().simplified();
229   aList = aLine.split( ' ', QString::SkipEmptyParts );
230
231   for (;!theFile.atEnd();) 
232   {
233     if (aList[0] == "B" && (aList[1] == "C" || aList[1] == "P" || aList[1] == "N" || aList[1] == "S" ))
234     {  
235       HYDROGUI_CurveBlock aCurveBlockInfo;
236       if (aList[1] == "C")
237         aCurveBlockInfo.myType = 1; // XYZ curve
238       else if (aList[1] == "P")
239         aCurveBlockInfo.myType = 2; // XYZ profile
240       else if (aList[1] == "N")
241         aCurveBlockInfo.myType = 3; // isocontour
242       else if (aList[1] == "S")
243         aCurveBlockInfo.myType = 4; // Scatter plot
244
245       if (aList.size() == 9)
246       {
247         for (int j = 2; j < 8; j++)
248           aCurveBlockInfo.myRefCoords.push_back(aList[j].toDouble());
249         aCurveBlockInfo.myRefRatio = aList[8].toDouble();
250       }
251
252       QString Name;
253       do
254       {
255         aBLine = theFile.readLine().simplified();
256         aBList = aBLine.split( ' ', QString::SkipEmptyParts );
257          
258         if (aBList[0] == "CP")
259         {
260           if (aBList.size() == 2 && (aBList[1] == "0" || aBList[1] == "1" || aBList[1] == "2"))
261             aCurveBlockInfo.myCurvePlane = aBList[1].toInt();
262           else if (aBList.size() == 3 && (aBList[1] == "0" || aBList[1] == "1") && (aBList[2] == "0" || aBList[2] == "1"))
263           {
264             aCurveBlockInfo.myIsClosed = aBList[1].toInt();
265             aCurveBlockInfo.myIsSpline = aBList[2].toInt();
266           }
267           else
268           {
269             for (int j = 1; j < aBList.size(); j++)
270               aCurveBlockInfo.myAdditionalCurveInfo.push_back(aBList[j].toDouble());
271           }
272         }
273         if (aBList[0] == "CN")
274         {
275            for (int i = 1; i < aBList.size(); i++)
276              Name += aBList[i] + "_";
277            if (Name.size() <= 1)
278              Name = "noname_";
279            Name.remove(Name.size() - 1, 1);
280            aCurveBlockInfo.myName = Name;
281         }
282       } while (!theFile.atEnd() && aBLine[0] == 'C' );
283
284       bool aStat;
285       aTotStat = true;
286       do
287       {
288         if (aBList.size() >= 3 && aBLine[0] != 'B' && aBLine[0] != 'C') {
289           gp_XYZ anXYZ;
290           anXYZ.SetX (aBList[0].toDouble(&aStat));  
291           aTotStat = aTotStat && aStat;
292           anXYZ.SetY (aBList[1].toDouble(&aStat));
293           aTotStat = aTotStat && aStat;
294           anXYZ.SetZ (aBList[2].toDouble(&aStat));
295           aTotStat = aTotStat && aStat;
296
297           aCurveBlockInfo.myXYZPoints.push_back(anXYZ);
298           
299           aBLine = theFile.readLine().simplified();
300           aBList = aBLine.split( ' ', QString::SkipEmptyParts );
301         }
302         else 
303           break;
304     
305       } while (!theFile.atEnd() || !aBLine.isEmpty());
306       if (aTotStat)
307         myCurveBlocks.push_back(aCurveBlockInfo);
308
309       aLine = aBLine;
310       aList = aBList;
311
312     }
313     else
314     {
315       aLine = theFile.readLine().simplified();
316       aList = aLine.split( ' ', QString::SkipEmptyParts );
317     }
318
319   }
320
321   return true;
322
323 }
324
325 bool HYDROData_SinusX::Export(const QString& theFilePath, const NCollection_Sequence<Handle_HYDROData_Entity>& theEntities)
326 {
327   if ( theFilePath.isEmpty() )
328   { 
329     return false;
330   }
331
332   QString anExt = theFilePath.split('.', QString::SkipEmptyParts).back();
333
334   if (anExt == "sx")
335   {
336     QFile aFile (theFilePath);
337     
338     aFile.open(QIODevice::WriteOnly | QIODevice::Truncate | QIODevice::Text);
339
340     HydroToSX(aFile, theEntities);
341     
342     aFile.close();
343     
344     return true;
345   }
346   else
347     return false;
348
349 }
350
351 void HYDROData_SinusX::HydroToSX(QFile& theFile, const NCollection_Sequence<Handle_HYDROData_Entity>& theEntities)
352 {
353   QTextStream aTextStream(&theFile);
354   aTextStream << "C  Generated by HYDRO Module\n";
355   aTextStream << "C\n";
356
357   for (int i = 1; i <= theEntities.Size(); i++)
358   {
359     Handle_HYDROData_Entity anEnt = theEntities.Value(i);
360     if (anEnt->IsKind( STANDARD_TYPE(HYDROData_Bathymetry) ))
361     {
362       Handle(HYDROData_Bathymetry) aBathy = Handle(HYDROData_Bathymetry)::DownCast( anEnt );
363       HYDROData_Bathymetry::AltitudePoints anXYZPoints = aBathy->GetAltitudePoints(true);
364       //Write to stream
365       aTextStream << "B S\n";
366       aTextStream << "CN " << aBathy->GetName() << "\n";
367       aTextStream << "CP 0 0\n";
368       aTextStream << "CP 0\n";
369       for (int j = anXYZPoints.Lower(); j <= anXYZPoints.Upper(); j++)
370         aTextStream << " " << QString::number(anXYZPoints(j).X(), 'f', 3)  
371                     << " " << QString::number(anXYZPoints(j).Y(), 'f', 3)  
372                     << " " << QString::number(anXYZPoints(j).Z(), 'f', 3) << "\n"; 
373     }
374     else if (anEnt->IsKind( STANDARD_TYPE(HYDROData_PolylineXY) ))
375     {
376       Handle(HYDROData_PolylineXY) aPolyXY = Handle(HYDROData_PolylineXY)::DownCast( anEnt );
377       for (int j = 0; j < aPolyXY->NbSections(); j++)
378       { 
379         //Collect data
380         bool IsClosed = aPolyXY->IsClosedSection(j);
381         bool IsSpline = false;
382         if (aPolyXY->GetSectionType(j) == HYDROData_PolylineXY::SECTION_SPLINE)
383           IsSpline = true;
384         HYDROData_PolylineXY::PointsList anXYPoints = aPolyXY->GetPoints(j, true);
385         //Write to stream
386         aTextStream << "B N\n";
387         aTextStream << "CN " << aPolyXY->GetName() << "\n";
388         aTextStream << "CP " << IsClosed << " " << IsSpline << "\n";
389         aTextStream << "CP 0.0\n";
390         aTextStream << "CP 0\n";
391         if (aPolyXY->NbSections() > 1)
392           aTextStream << "C " << aPolyXY->GetName() << "_section_" << QString::number(j) << "\n";
393         for (int k = anXYPoints.Lower(); k <= anXYPoints.Upper(); k++)
394          aTextStream << " " << QString::number(anXYPoints(k).X(), 'f', 3)  
395                      << " " << QString::number(anXYPoints(k).Y(), 'f', 3)  
396                      << " 0.000\n"; 
397       }
398     }
399     else if (anEnt->IsKind( STANDARD_TYPE(HYDROData_Profile) ))
400     {
401       //Collect data
402       Handle(HYDROData_Profile) aProfile = Handle(HYDROData_Profile)::DownCast( anEnt );
403       HYDROData_ProfileUZ::PointsList aPointList = aProfile->GetParametricPoints();
404       bool IsClosed = aProfile->GetProfileUZ(false)->IsClosedSection(0);;
405       bool IsSpline = false;
406       if (aProfile->GetProfileUZ(false)->GetSectionType(0) == HYDROData_PolylineXY::SECTION_SPLINE)
407         IsSpline = true;
408       //Write to stream
409       aTextStream << "B P\n";
410       aTextStream << "CN " << aProfile->GetName() << "\n";
411       aTextStream << "CP " << IsClosed << " " << IsSpline << "\n";
412       gp_XY aLeftPoint(0.0, 0.0);
413       gp_XY aRightPoint(0.0, 0.0);
414       if (aProfile->GetLeftPoint(aLeftPoint, true) && aProfile->GetRightPoint(aRightPoint, true))
415         aTextStream << "CP " << QString::number(aLeftPoint.X(), 'f', 3) << " " <<
416                                 QString::number(aLeftPoint.Y(), 'f', 3) << " " <<
417                                 QString::number(aRightPoint.X(), 'f', 3) << " " <<
418                                 QString::number(aRightPoint.Y(), 'f', 3) << "\n";
419       else
420         aTextStream << "CP 0.0 0.0 0.0 0.0\n";
421       aTextStream << "CP 2\n";
422       for (int k = aPointList.Lower(); k <= aPointList.Upper(); k++)
423          aTextStream << " " << QString::number(aPointList(k).X(), 'f', 3)  
424                      << " 0.000 "
425                      << QString::number(aPointList(k).Y(), 'f', 3) << "\n";  
426     }
427   }
428 }