Salome HOME
a92695f82fd47b95615a1ad4a9c7240badefbb11
[modules/hydro.git] / src / HYDROData / HYDROData_Document.cxx
1
2 #include <HYDROData_Document.h>
3 #include <HYDROData_Application.h>
4 #include <HYDROData_Iterator.h>
5 #include <HYDROData_Tool.h>
6
7 #include <TDataStd_Integer.hxx>
8
9 #include <TDF_Delta.hxx>
10
11 #include <QFile>
12 #include <QStringList>
13 #include <QTextStream>
14
15 IMPLEMENT_STANDARD_HANDLE(HYDROData_Document,MMgt_TShared)
16 IMPLEMENT_STANDARD_RTTIEXT(HYDROData_Document,MMgt_TShared)
17
18 #define PYTHON_DOC_NAME "doc"
19
20 static const int UNDO_LIMIT = 10; // number of possible undo operations in the module
21
22 static const int TAG_PROPS = 1; // general properties tag
23 static const int TAG_PROPS_NEW_ID = 1; // general properties: tag for storage of the new object ID
24 static const int TAG_OBJECTS = 2; // tag of the objects sub-tree
25 static const int TAG_HISTORY = 3; // tag of the history sub-tree (Root for History)
26
27 using namespace std;
28
29 Handle(HYDROData_Document) HYDROData_Document::Document(const int theStudyID)
30 {
31   Handle(HYDROData_Document) aResult = 
32     HYDROData_Application::GetApplication()->GetDocument(theStudyID);
33   if (aResult.IsNull()) {
34     aResult = new HYDROData_Document();
35     HYDROData_Application::GetApplication()->AddDocument(theStudyID, aResult);
36   }
37   return aResult;
38 }
39
40 Handle(HYDROData_Document) HYDROData_Document::Document(
41   const Handle(HYDROData_Object)& theObject )
42 {
43   Handle(HYDROData_Document) aResDoc;
44   if ( theObject.IsNull() )
45     return aResDoc;
46
47   Handle(TDocStd_Document) anObjDoc;
48   try
49   {
50     anObjDoc = TDocStd_Document::Get( theObject->Label() );
51   }
52   catch( ... )
53   {
54   }
55
56   if ( anObjDoc.IsNull() )
57     return aResDoc;
58
59   HYDROData_Application* anApp = HYDROData_Application::GetApplication();
60
61   DataMapOfStudyIDDocument::Iterator aMapIt( anApp->myDocuments );
62   for ( ; aMapIt.More(); aMapIt.Next() )
63   {
64     Handle(HYDROData_Document) anAppDoc = aMapIt.Value();
65     if ( anAppDoc.IsNull() || anAppDoc->myDoc != anObjDoc )
66       continue;
67
68     aResDoc = anAppDoc;
69     break;
70   }
71
72   return aResDoc;
73 }
74
75 bool HYDROData_Document::HasDocument(const int theStudyID)
76 {
77   Handle(HYDROData_Document) aResult = 
78     HYDROData_Application::GetApplication()->GetDocument(theStudyID);
79   return !aResult.IsNull();
80 }
81
82 bool HYDROData_Document::DocumentId(const Handle(HYDROData_Document)& theDocument,
83                                     int&                              theDocId )
84 {
85   return HYDROData_Application::GetApplication()->GetDocumentId(theDocument, theDocId);
86 }
87
88 Data_DocError HYDROData_Document::Load(const char* theFileName, const int theStudyID)
89 {
90   Handle(TDocStd_Document) aResult;
91   TCollection_ExtendedString aPath ((const Standard_CString)theFileName);
92   PCDM_ReaderStatus aStatus = (PCDM_ReaderStatus) -1;
93   try
94   {
95     aStatus = HYDROData_Application::GetApplication()->Open (aPath, aResult);
96   }
97   catch (Standard_Failure)
98   {}
99   if (!aResult.IsNull()) {
100     aResult->SetUndoLimit(UNDO_LIMIT);
101     HYDROData_Application::GetApplication()->AddDocument(theStudyID, new HYDROData_Document(aResult));
102   }
103   // recognize error
104   Data_DocError anError;
105   switch(aStatus) {
106   case PCDM_RS_OK:
107     anError = DocError_OK;
108     break;
109   case PCDM_RS_NoDriver:
110   case PCDM_RS_UnknownFileDriver:
111   case PCDM_RS_NoSchema:
112   case PCDM_RS_DriverFailure:
113   case PCDM_RS_WrongResource:
114     anError = DocError_ResourcesProblem;
115     break;
116   case PCDM_RS_OpenError:
117   case PCDM_RS_NoDocument:
118   case PCDM_RS_WrongStreamMode:
119   case PCDM_RS_PermissionDenied:
120     anError = DocError_CanNotOpen;
121     break;
122   case PCDM_RS_NoVersion:
123     anError = DocError_InvalidVersion;
124     break;
125   case PCDM_RS_ExtensionFailure:
126   case PCDM_RS_FormatFailure:
127   case PCDM_RS_TypeFailure:
128   case PCDM_RS_TypeNotFoundInSchema:
129   case PCDM_RS_UnrecognizedFileFormat:
130     anError = DocError_InvalidFormat;
131     break;
132   case PCDM_RS_MakeFailure:
133   default:
134     anError = DocError_UnknownProblem;
135     break;
136   }
137   return anError;
138 }
139
140 Data_DocError HYDROData_Document::Save(const char* theFileName)
141 {
142   TCollection_ExtendedString aPath ((const Standard_CString)theFileName);
143   PCDM_StoreStatus aStatus;
144   try {
145     aStatus = HYDROData_Application::GetApplication()->SaveAs (myDoc, aPath);
146   }
147   catch (Standard_Failure) {}
148   myTransactionsAfterSave = 0;
149   Standard::Purge(); // Release free memory
150
151   // recognize error
152   Data_DocError anError;
153   switch(aStatus) {
154   case PCDM_SS_OK:
155     anError = DocError_OK;
156     break;
157   case PCDM_SS_DriverFailure:
158     anError = DocError_ResourcesProblem;
159     break;
160   case PCDM_SS_WriteFailure:
161   case PCDM_SS_DiskWritingFailure:
162   case PCDM_SS_UserRightsFailure:
163     anError = DocError_CanNotOpen;
164     break;
165   default:
166     anError = DocError_UnknownProblem;
167     break;
168   }
169   return anError;
170 }
171
172 void HYDROData_Document::Close()
173 {
174   myDoc->Close();
175   HYDROData_Application::GetApplication()->RemoveDocument(this);
176 }
177
178 bool HYDROData_Document::DumpToPython( const QString& theFileName ) const
179 {
180   // Try to open the file
181   QFile aFile( theFileName );
182   if ( !aFile.open( QIODevice::WriteOnly ) )
183     return false;
184
185   MapOfTreatedObjects aTreatedObjects;
186
187   // Dump header for python script
188   QStringList aHeaderDump = DumpToPython( aTreatedObjects );
189   if ( aHeaderDump.isEmpty() )
190     return false;
191
192   HYDROData_Tool::WriteStringsToFile( aFile, aHeaderDump );
193
194   bool aRes = true;
195
196   // Dump all model objects to Python script
197   aRes = aRes && dumpPartitionToPython( aFile, aTreatedObjects, KIND_IMAGE      );
198   aRes = aRes && dumpPartitionToPython( aFile, aTreatedObjects, KIND_POLYLINE   );
199   aRes = aRes && dumpPartitionToPython( aFile, aTreatedObjects, KIND_BATHYMETRY );
200
201   return aRes;
202 }
203
204 QString HYDROData_Document::GetDocPyName() const
205 {
206   QString aDocName = PYTHON_DOC_NAME;
207   
208   int aDocId = 1;
209   if ( DocumentId( this, aDocId ) )
210     aDocName += "_" + QString::number( aDocId );
211   
212   return aDocName;
213 }
214
215 QStringList HYDROData_Document::DumpToPython( MapOfTreatedObjects& theTreatedObjects ) const
216 {
217   QString aDocName = GetDocPyName();
218
219   // Append document in to the map of treated objects to prevent names overlaping
220   theTreatedObjects.insert( aDocName, this );
221
222   int aDocId = 1;
223   if ( !DocumentId( this, aDocId ) )
224     aDocId = 1;
225
226   QStringList aResScript;
227
228   aResScript << QString( "from HYDROData import *" );
229   aResScript << QString( "from PyQt4.QtCore import *" );
230   aResScript << QString( "from PyQt4.QtGui import *" );
231   aResScript << QString( "" );
232   aResScript << QString( "%1 = HYDROData_Document.Document( %2 );" ).arg( aDocName ).arg( aDocId );
233
234   return aResScript;
235 }
236
237 bool HYDROData_Document::dumpPartitionToPython( QFile&               theFile,
238                                                 MapOfTreatedObjects& theTreatedObjects,
239                                                 const ObjectKind&    theObjectKind ) const
240 {
241   if ( !theFile.isOpen() )
242     return false;
243
244   QTextStream anOutStream( &theFile );
245
246   bool aRes = true;
247
248   HYDROData_Iterator anIterator( this, theObjectKind );
249   for( ; anIterator.More(); anIterator.Next() )
250   {
251     Handle(HYDROData_Object) anObject = anIterator.Current();
252     if ( anObject.IsNull() )
253       continue;
254
255     QString anObjName = anObject->GetName();
256     if ( theTreatedObjects.contains( anObjName ) )
257       continue;
258
259     theTreatedObjects.insert( anObjName, anObject );
260
261     QStringList anObjDump = anObject->DumpToPython( theTreatedObjects );
262     
263     HYDROData_Tool::WriteStringsToFile( theFile, anObjDump );
264   }
265   
266   return aRes;
267 }
268
269 void HYDROData_Document::StartOperation()
270 {
271   myDoc->NewCommand();
272 }
273
274 void HYDROData_Document::CommitOperation(const TCollection_ExtendedString& theName)
275 {
276   if( !myDoc->CommitCommand() ) // it means that there were no modifications done
277   {
278     myDoc->NewCommand();
279     NewID(); // workaround: do something just to modify the document
280     myDoc->CommitCommand();
281   }
282   myTransactionsAfterSave++;
283
284   if( theName.Length() != 0 )
285   {
286     const TDF_DeltaList& aList = GetUndos();
287     if( !aList.IsEmpty() )
288     {
289       Handle(TDF_Delta) aDelta = aList.Last();
290       if( !aDelta.IsNull() )
291         aDelta->SetName( theName );
292     }
293   }
294 }
295
296 void HYDROData_Document::AbortOperation()
297 {
298   myDoc->AbortCommand();
299 }
300
301 bool HYDROData_Document::IsOperation()
302 {
303   return myDoc->HasOpenCommand() != 0;
304 }
305
306 bool HYDROData_Document::IsModified()
307 {
308   return myTransactionsAfterSave != 0;
309 }
310
311 bool HYDROData_Document::CanUndo()
312 {
313   return myDoc->GetAvailableUndos() > 0;
314 }
315
316 const TDF_DeltaList& HYDROData_Document::GetUndos()
317 {
318   return myDoc->GetUndos();
319 }
320
321 void HYDROData_Document::ClearUndos()
322 {
323   return myDoc->ClearUndos();
324 }
325
326 void HYDROData_Document::Undo()
327 {
328   myDoc->Undo();
329   myTransactionsAfterSave--;
330 }
331
332 bool HYDROData_Document::CanRedo()
333 {
334   return myDoc->GetAvailableRedos() > 0;
335 }
336
337 const TDF_DeltaList& HYDROData_Document::GetRedos()
338 {
339   return myDoc->GetRedos();
340 }
341
342 void HYDROData_Document::ClearRedos()
343 {
344   return myDoc->ClearRedos();
345 }
346
347 void HYDROData_Document::Redo()
348 {
349   myDoc->Redo();
350   myTransactionsAfterSave++;
351 }
352
353 Handle_HYDROData_Object HYDROData_Document::CreateObject(const ObjectKind theKind)
354 {
355   return HYDROData_Iterator::CreateObject(this, theKind);
356 }
357
358 HYDROData_Document::HYDROData_Document()
359 {
360   HYDROData_Application::GetApplication()->NewDocument("BinOcaf", myDoc);
361   myDoc->SetUndoLimit(UNDO_LIMIT);
362   NewID(); // needed to have at least one attribute in initial document to avoid errors
363   myTransactionsAfterSave = 0;
364 }
365
366 HYDROData_Document::HYDROData_Document(const Handle(TDocStd_Document)& theDoc)
367 {
368   myDoc = theDoc;
369   myTransactionsAfterSave = 0;
370 }
371
372 HYDROData_Document::~HYDROData_Document()
373 {
374 }
375
376 int HYDROData_Document::NewID()
377 {
378   TDF_Label anIDLab = myDoc->Main().FindChild(TAG_PROPS).
379     FindChild(TAG_PROPS_NEW_ID);
380   Handle(TDataStd_Integer) anInt;
381   if (!anIDLab.FindAttribute(TDataStd_Integer::GetID(), anInt)) {
382     anInt = TDataStd_Integer::Set(anIDLab, 0);
383   }
384   // just increment value and return
385   anInt->Set(anInt->Get() + 1);
386   return anInt->Get();
387 }
388
389 TDF_Label HYDROData_Document::LabelOfObjects()
390 {
391   return myDoc->Main().FindChild(TAG_OBJECTS);
392 }