0025748: Parallel version of progress indicator
[occt.git] / src / PCDM / PCDM_StorageDriver.cxx
1 // Created on: 1997-08-07
2 // Created by: Jean-Louis Frenkel
3 // Copyright (c) 1997-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
5 //
6 // This file is part of Open CASCADE Technology software library.
7 //
8 // This library is free software; you can redistribute it and/or modify it under
9 // the terms of the GNU Lesser General Public License version 2.1 as published
10 // by the Free Software Foundation, with special exception defined in the file
11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 // distribution for complete text of the license and disclaimer of any warranty.
13 //
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
16
17
18 #include <CDM_Document.hxx>
19 #include <FSD_CmpFile.hxx>
20 #include <PCDM.hxx>
21 #include <PCDM_Document.hxx>
22 #include <PCDM_DriverError.hxx>
23 #include <PCDM_ReadWriter.hxx>
24 #include <PCDM_SequenceOfDocument.hxx>
25 #include <PCDM_StorageDriver.hxx>
26 #include <Resource_Manager.hxx>
27 #include <Standard_ErrorHandler.hxx>
28 #include <Standard_NoSuchObject.hxx>
29 #include <Standard_NotImplemented.hxx>
30 #include <Standard_Type.hxx>
31 #include <Storage_Data.hxx>
32 #include <Storage_OpenMode.hxx>
33 #include <Storage_Schema.hxx>
34 #include <TCollection_AsciiString.hxx>
35 #include <TCollection_ExtendedString.hxx>
36 #include <TColStd_SequenceOfExtendedString.hxx>
37
38 #include <locale.h>
39 IMPLEMENT_STANDARD_RTTIEXT(PCDM_StorageDriver,PCDM_Writer)
40
41 #define STORAGE_VERSION "STORAGE_VERSION:"
42
43
44
45 void PCDM_StorageDriver::Write (const Handle(CDM_Document)& aDocument,
46                                 const TCollection_ExtendedString&  aFileName, 
47                                 const Message_ProgressRange &/*theRange*/) 
48 {
49   Handle(Storage_Schema) theSchema = new Storage_Schema;
50
51   Handle(Storage_Data) theData = new Storage_Data;
52
53   Standard_Boolean Failure(Standard_False);
54   Standard_SStream aMsg; aMsg << "error during Make:";
55   PCDM_SequenceOfDocument thePersistentDocuments;
56   {
57     try { OCC_CATCH_SIGNALS Make(aDocument,thePersistentDocuments);}
58     catch (Standard_Failure const& anException) {
59       aMsg << anException<<(char)0;
60       Failure=Standard_True;
61     }
62   }
63
64   if(Failure) throw PCDM_DriverError(aMsg.str().c_str());
65
66   if(thePersistentDocuments.IsEmpty()) {
67     aMsg << "the storage driver: " << DynamicType()->Name() << "returned no documents to store" << (char) 0;
68     throw PCDM_DriverError(aMsg.str().c_str());
69   }
70
71   Standard_Integer i=1;
72   for(; i<=thePersistentDocuments.Length(); i++) {
73     theData->AddRoot(thePersistentDocuments(i));
74   }
75
76   TCollection_AsciiString ligne(STORAGE_VERSION);
77   ligne+=PCDM_ReadWriter::Writer()->Version();
78   theData->AddToUserInfo(ligne);
79
80   PCDM_ReadWriter::WriteFileFormat(theData,aDocument);
81   PCDM_ReadWriter::Writer()->WriteReferenceCounter(theData,aDocument);
82   PCDM_ReadWriter::Writer()->WriteReferences(theData,aDocument,aFileName);
83   PCDM_ReadWriter::Writer()->WriteExtensions(theData,aDocument);
84   PCDM_ReadWriter::Writer()->WriteVersion(theData,aDocument);
85
86   // add document comments
87   TColStd_SequenceOfExtendedString aComments;
88   aDocument->Comments(aComments);
89   Standard_Integer aLen = aComments.Length();
90   for (i = 1; i <= aLen; i++)
91   {
92     theData->AddToComments(aComments(i));
93   }
94
95   Handle(FSD_CmpFile) theFile = new FSD_CmpFile;
96   PCDM_ReadWriter::Open(theFile,aFileName,Storage_VSWrite);
97   theSchema->Write(theFile,theData);
98   theFile->Close();
99
100   if ( theData->ErrorStatus() != Storage_VSOk )
101     throw PCDM_DriverError(theData->ErrorStatusExtension().ToCString());
102 }
103
104
105 //=======================================================================
106 //function : Write
107 //purpose  : 
108 //=======================================================================
109 void PCDM_StorageDriver::Write (const Handle(CDM_Document)&              /*aDocument*/, 
110                                 Standard_OStream&                        /*theOStream*/, 
111                                 const Message_ProgressRange&             /*theRange*/)
112 {
113   
114 }
115
116 //Handle(PCDM_Document) PCDM_StorageDriver::Make(const Handle(CDM_Document)& aDocument) {
117 Handle(PCDM_Document) PCDM_StorageDriver::Make(const Handle(CDM_Document)& ) {
118   Handle(PCDM_Document) voidDocument;
119   Standard_SStream aMsg;
120   aMsg << "No Make method were implemented in this Driver" << DynamicType()->Name() << (char) 0;
121   throw Standard_NotImplemented(aMsg.str().c_str());
122 }
123
124 void PCDM_StorageDriver::Make(const Handle(CDM_Document)& aDocument, PCDM_SequenceOfDocument& Documents) {
125   Documents.Append(Make(aDocument));
126 }
127
128 //=======================================================================
129 //function : SetFormat
130 //purpose  : 
131 //=======================================================================
132
133 void PCDM_StorageDriver::SetFormat (const TCollection_ExtendedString& aformat)
134 {
135   myFormat = aformat;
136 }
137
138
139 //=======================================================================
140 //function : GetFormat
141 //purpose  : 
142 //=======================================================================
143
144 TCollection_ExtendedString PCDM_StorageDriver::GetFormat () const
145 {
146   return myFormat;
147 }
148
149 //=======================================================================
150 //function : IsError
151 //purpose  :
152 //=======================================================================
153
154 Standard_Boolean PCDM_StorageDriver::IsError () const 
155 {
156   return myIsError;
157 }
158
159 //=======================================================================
160 //function : SetIsError
161 //purpose  :
162 //=======================================================================
163 void PCDM_StorageDriver::SetIsError(const Standard_Boolean theIsError)
164 {
165     myIsError = theIsError;
166 }
167
168 //=======================================================================
169 //function : GetStoreStatus
170 //purpose  :
171 //=======================================================================
172
173 PCDM_StoreStatus PCDM_StorageDriver::GetStoreStatus () const 
174 {
175   return myStoreStatus;
176 }
177 //=======================================================================
178 //function : SetStoreStatus
179 //purpose  :
180 //=======================================================================
181 void PCDM_StorageDriver::SetStoreStatus(const PCDM_StoreStatus theStoreStatus)
182 {
183     myStoreStatus = theStoreStatus;
184 }