2 #include <HYDROData_Document.h>
3 #include <HYDROData_Application.h>
4 #include <HYDROData_Iterator.h>
5 #include <HYDROData_Tool.h>
7 #include <TDataStd_Integer.hxx>
9 #include <TDF_Delta.hxx>
12 #include <QStringList>
13 #include <QTextStream>
15 IMPLEMENT_STANDARD_HANDLE(HYDROData_Document,MMgt_TShared)
16 IMPLEMENT_STANDARD_RTTIEXT(HYDROData_Document,MMgt_TShared)
18 #define PYTHON_DOC_NAME "doc"
20 static const int UNDO_LIMIT = 10; // number of possible undo operations in the module
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)
29 Handle(HYDROData_Document) HYDROData_Document::Document(const int theStudyID)
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);
40 Handle(HYDROData_Document) HYDROData_Document::Document(
41 const Handle(HYDROData_Object)& theObject )
43 Handle(HYDROData_Document) aResDoc;
44 if ( theObject.IsNull() )
47 Handle(TDocStd_Document) anObjDoc;
50 anObjDoc = TDocStd_Document::Get( theObject->Label() );
56 if ( anObjDoc.IsNull() )
59 HYDROData_Application* anApp = HYDROData_Application::GetApplication();
61 DataMapOfStudyIDDocument::Iterator aMapIt( anApp->myDocuments );
62 for ( ; aMapIt.More(); aMapIt.Next() )
64 Handle(HYDROData_Document) anAppDoc = aMapIt.Value();
65 if ( anAppDoc.IsNull() || anAppDoc->myDoc != anObjDoc )
75 bool HYDROData_Document::HasDocument(const int theStudyID)
77 Handle(HYDROData_Document) aResult =
78 HYDROData_Application::GetApplication()->GetDocument(theStudyID);
79 return !aResult.IsNull();
82 bool HYDROData_Document::DocumentId(const Handle(HYDROData_Document)& theDocument,
85 return HYDROData_Application::GetApplication()->GetDocumentId(theDocument, theDocId);
88 Data_DocError HYDROData_Document::Load(const char* theFileName, const int theStudyID)
90 Handle(TDocStd_Document) aResult;
91 TCollection_ExtendedString aPath ((const Standard_CString)theFileName);
92 PCDM_ReaderStatus aStatus = (PCDM_ReaderStatus) -1;
95 aStatus = HYDROData_Application::GetApplication()->Open (aPath, aResult);
97 catch (Standard_Failure)
99 if (!aResult.IsNull()) {
100 aResult->SetUndoLimit(UNDO_LIMIT);
101 HYDROData_Application::GetApplication()->AddDocument(theStudyID, new HYDROData_Document(aResult));
104 Data_DocError anError;
107 anError = DocError_OK;
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;
116 case PCDM_RS_OpenError:
117 case PCDM_RS_NoDocument:
118 case PCDM_RS_WrongStreamMode:
119 case PCDM_RS_PermissionDenied:
120 anError = DocError_CanNotOpen;
122 case PCDM_RS_NoVersion:
123 anError = DocError_InvalidVersion;
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;
132 case PCDM_RS_MakeFailure:
134 anError = DocError_UnknownProblem;
140 Data_DocError HYDROData_Document::Save(const char* theFileName)
142 TCollection_ExtendedString aPath ((const Standard_CString)theFileName);
143 PCDM_StoreStatus aStatus;
145 aStatus = HYDROData_Application::GetApplication()->SaveAs (myDoc, aPath);
147 catch (Standard_Failure) {}
148 myTransactionsAfterSave = 0;
149 Standard::Purge(); // Release free memory
152 Data_DocError anError;
155 anError = DocError_OK;
157 case PCDM_SS_DriverFailure:
158 anError = DocError_ResourcesProblem;
160 case PCDM_SS_WriteFailure:
161 case PCDM_SS_DiskWritingFailure:
162 case PCDM_SS_UserRightsFailure:
163 anError = DocError_CanNotOpen;
166 anError = DocError_UnknownProblem;
172 void HYDROData_Document::Close()
175 HYDROData_Application::GetApplication()->RemoveDocument(this);
178 bool HYDROData_Document::DumpToPython( const QString& theFileName ) const
180 // Try to open the file
181 QFile aFile( theFileName );
182 if ( !aFile.open( QIODevice::WriteOnly ) )
185 MapOfTreatedObjects aTreatedObjects;
187 // Dump header for python script
188 QStringList aHeaderDump = DumpToPython( aTreatedObjects );
189 if ( aHeaderDump.isEmpty() )
192 HYDROData_Tool::WriteStringsToFile( aFile, aHeaderDump );
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 );
204 QString HYDROData_Document::GetDocPyName() const
206 QString aDocName = PYTHON_DOC_NAME;
209 if ( DocumentId( this, aDocId ) )
210 aDocName += "_" + QString::number( aDocId );
215 QStringList HYDROData_Document::DumpToPython( MapOfTreatedObjects& theTreatedObjects ) const
217 QString aDocName = GetDocPyName();
219 // Append document in to the map of treated objects to prevent names overlaping
220 theTreatedObjects.insert( aDocName, this );
223 if ( !DocumentId( this, aDocId ) )
226 QStringList aResScript;
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 );
237 bool HYDROData_Document::dumpPartitionToPython( QFile& theFile,
238 MapOfTreatedObjects& theTreatedObjects,
239 const ObjectKind& theObjectKind ) const
241 if ( !theFile.isOpen() )
244 QTextStream anOutStream( &theFile );
248 HYDROData_Iterator anIterator( this, theObjectKind );
249 for( ; anIterator.More(); anIterator.Next() )
251 Handle(HYDROData_Object) anObject = anIterator.Current();
252 if ( anObject.IsNull() )
255 QString anObjName = anObject->GetName();
256 if ( theTreatedObjects.contains( anObjName ) )
259 theTreatedObjects.insert( anObjName, anObject );
261 QStringList anObjDump = anObject->DumpToPython( theTreatedObjects );
263 HYDROData_Tool::WriteStringsToFile( theFile, anObjDump );
269 void HYDROData_Document::StartOperation()
274 void HYDROData_Document::CommitOperation(const TCollection_ExtendedString& theName)
276 if( !myDoc->CommitCommand() ) // it means that there were no modifications done
279 NewID(); // workaround: do something just to modify the document
280 myDoc->CommitCommand();
282 myTransactionsAfterSave++;
284 if( theName.Length() != 0 )
286 const TDF_DeltaList& aList = GetUndos();
287 if( !aList.IsEmpty() )
289 Handle(TDF_Delta) aDelta = aList.Last();
290 if( !aDelta.IsNull() )
291 aDelta->SetName( theName );
296 void HYDROData_Document::AbortOperation()
298 myDoc->AbortCommand();
301 bool HYDROData_Document::IsOperation()
303 return myDoc->HasOpenCommand() != 0;
306 bool HYDROData_Document::IsModified()
308 return myTransactionsAfterSave != 0;
311 bool HYDROData_Document::CanUndo()
313 return myDoc->GetAvailableUndos() > 0;
316 const TDF_DeltaList& HYDROData_Document::GetUndos()
318 return myDoc->GetUndos();
321 void HYDROData_Document::ClearUndos()
323 return myDoc->ClearUndos();
326 void HYDROData_Document::Undo()
329 myTransactionsAfterSave--;
332 bool HYDROData_Document::CanRedo()
334 return myDoc->GetAvailableRedos() > 0;
337 const TDF_DeltaList& HYDROData_Document::GetRedos()
339 return myDoc->GetRedos();
342 void HYDROData_Document::ClearRedos()
344 return myDoc->ClearRedos();
347 void HYDROData_Document::Redo()
350 myTransactionsAfterSave++;
353 Handle_HYDROData_Object HYDROData_Document::CreateObject(const ObjectKind theKind)
355 return HYDROData_Iterator::CreateObject(this, theKind);
358 HYDROData_Document::HYDROData_Document()
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;
366 HYDROData_Document::HYDROData_Document(const Handle(TDocStd_Document)& theDoc)
369 myTransactionsAfterSave = 0;
372 HYDROData_Document::~HYDROData_Document()
376 int HYDROData_Document::NewID()
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);
384 // just increment value and return
385 anInt->Set(anInt->Get() + 1);
389 TDF_Label HYDROData_Document::LabelOfObjects()
391 return myDoc->Main().FindChild(TAG_OBJECTS);