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( "" );
 230   aResScript << QString( "%1 = HYDROData_Document.Document( %2 );" ).arg( aDocName ).arg( aDocId );
 231
 232   return aResScript;
 233 }
 234
 235 bool HYDROData_Document::dumpPartitionToPython( QFile&               theFile,
 236                                                 MapOfTreatedObjects& theTreatedObjects,
 237                                                 const ObjectKind&    theObjectKind ) const
 238 {
 239   if ( !theFile.isOpen() )
 240     return false;
 241
 242   QTextStream anOutStream( &theFile );
 243
 244   bool aRes = true;
 245
 246   HYDROData_Iterator anIterator( this, theObjectKind );
 247   for( ; anIterator.More(); anIterator.Next() )
 248   {
 249     Handle(HYDROData_Object) anObject = anIterator.Current();
 250     if ( anObject.IsNull() )
 251       continue;
 252
 253     QString anObjName = anObject->GetName();
 254     if ( theTreatedObjects.contains( anObjName ) )
 255       continue;
 256
 257     theTreatedObjects.insert( anObjName, anObject );
 258
 259     QStringList anObjDump = anObject->DumpToPython( theTreatedObjects );
 260
 261     HYDROData_Tool::WriteStringsToFile( theFile, anObjDump );
 262   }
 263
 264   return aRes;
 265 }
 266
 267 void HYDROData_Document::StartOperation()
 268 {
 269   myDoc->NewCommand();
 270 }
 271
 272 void HYDROData_Document::CommitOperation(const TCollection_ExtendedString& theName)
 273 {
 274   if( !myDoc->CommitCommand() ) // it means that there were no modifications done
 275   {
 276     myDoc->NewCommand();
 277     NewID(); // workaround: do something just to modify the document
 278     myDoc->CommitCommand();
 279   }
 280   myTransactionsAfterSave++;
 281
 282   if( theName.Length() != 0 )
 283   {
 284     const TDF_DeltaList& aList = GetUndos();
 285     if( !aList.IsEmpty() )
 286     {
 287       Handle(TDF_Delta) aDelta = aList.Last();
 288       if( !aDelta.IsNull() )
 289         aDelta->SetName( theName );
 290     }
 291   }
 292 }
 293
 294 void HYDROData_Document::AbortOperation()
 295 {
 296   myDoc->AbortCommand();
 297 }
 298
 299 bool HYDROData_Document::IsOperation()
 300 {
 301   return myDoc->HasOpenCommand() != 0;
 302 }
 303
 304 bool HYDROData_Document::IsModified()
 305 {
 306   return myTransactionsAfterSave != 0;
 307 }
 308
 309 bool HYDROData_Document::CanUndo()
 310 {
 311   return myDoc->GetAvailableUndos() > 0;
 312 }
 313
 314 const TDF_DeltaList& HYDROData_Document::GetUndos()
 315 {
 316   return myDoc->GetUndos();
 317 }
 318
 319 void HYDROData_Document::ClearUndos()
 320 {
 321   return myDoc->ClearUndos();
 322 }
 323
 324 void HYDROData_Document::Undo()
 325 {
 326   myDoc->Undo();
 327   myTransactionsAfterSave--;
 328 }
 329
 330 bool HYDROData_Document::CanRedo()
 331 {
 332   return myDoc->GetAvailableRedos() > 0;
 333 }
 334
 335 const TDF_DeltaList& HYDROData_Document::GetRedos()
 336 {
 337   return myDoc->GetRedos();
 338 }
 339
 340 void HYDROData_Document::ClearRedos()
 341 {
 342   return myDoc->ClearRedos();
 343 }
 344
 345 void HYDROData_Document::Redo()
 346 {
 347   myDoc->Redo();
 348   myTransactionsAfterSave++;
 349 }
 350
 351 Handle_HYDROData_Object HYDROData_Document::CreateObject(const ObjectKind theKind)
 352 {
 353   return HYDROData_Iterator::CreateObject(this, theKind);
 354 }
 355
 356 HYDROData_Document::HYDROData_Document()
 357 {
 358   HYDROData_Application::GetApplication()->NewDocument("BinOcaf", myDoc);
 359   myDoc->SetUndoLimit(UNDO_LIMIT);
 360   NewID(); // needed to have at least one attribute in initial document to avoid errors
 361   myTransactionsAfterSave = 0;
 362 }
 363
 364 HYDROData_Document::HYDROData_Document(const Handle(TDocStd_Document)& theDoc)
 365 {
 366   myDoc = theDoc;
 367   myTransactionsAfterSave = 0;
 368 }
 369
 370 HYDROData_Document::~HYDROData_Document()
 371 {
 372 }
 373
 374 int HYDROData_Document::NewID()
 375 {
 376   TDF_Label anIDLab = myDoc->Main().FindChild(TAG_PROPS).
 377     FindChild(TAG_PROPS_NEW_ID);
 378   Handle(TDataStd_Integer) anInt;
 379   if (!anIDLab.FindAttribute(TDataStd_Integer::GetID(), anInt)) {
 380     anInt = TDataStd_Integer::Set(anIDLab, 0);
 381   }
 382   // just increment value and return
 383   anInt->Set(anInt->Get() + 1);
 384   return anInt->Get();
 385 }
 386
 387 TDF_Label HYDROData_Document::LabelOfObjects()
 388 {
 389   return myDoc->Main().FindChild(TAG_OBJECTS);
 390 }