0026576: Wrong result obtained by intersection algorithm.
[occt.git] / src / DDF / DDF_IOStream.cxx
CommitLineData
b311480e 1// Created by: DAUTRY Philippe
2// Copyright (c) 1997-1999 Matra Datavision
973c2be1 3// Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e 4//
973c2be1 5// This file is part of Open CASCADE Technology software library.
b311480e 6//
d5f74e42 7// This library is free software; you can redistribute it and/or modify it under
8// the terms of the GNU Lesser General Public License version 2.1 as published
973c2be1 9// by the Free Software Foundation, with special exception defined in the file
10// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11// distribution for complete text of the license and disclaimer of any warranty.
b311480e 12//
973c2be1 13// Alternatively, this file may be used under the terms of Open CASCADE
14// commercial license or contractual agreement.
b311480e 15
7fd59977 16// ----------------
7fd59977 17
18// Version: 0.0
b311480e 19//Version Date Purpose
7fd59977 20// 0.0 Aug 22 1997 Creation
21
22#include <Standard_Stream.hxx>
23
24#include <DDF_IOStream.hxx>
25
26// This file has been written using FSD_File.cxx as template.
27// This is a specific adaptation for Draw use (save & restore commands).
28// It is not sure at all this code is portable on any other plateform than
29// SUN OS. Don't use it anywhere else.
30// Thanks for comprehension. (22 august 97)
31
32
33#include <Storage_StreamTypeMismatchError.hxx>
34#include <Storage_StreamFormatError.hxx>
35#include <Storage_StreamWriteError.hxx>
36#include <Storage_StreamExtCharParityError.hxx>
37
38#include <TCollection_AsciiString.hxx>
39#include <TCollection_ExtendedString.hxx>
40
41#include <TColStd_SequenceOfAsciiString.hxx>
42#include <TColStd_SequenceOfExtendedString.hxx>
43
44const Standard_CString MAGICNUMBER = "FSDFILE";
45
46
47//=======================================================================
48//function : DDF_IOStream
49//purpose :
50//=======================================================================
51
c24d4017 52DDF_IOStream::DDF_IOStream() :
53 myIStream(NULL),
54 myOStream(NULL)
7fd59977 55{}
56
57//=======================================================================
58//function : Open
59//purpose :
60//=======================================================================
61
62Storage_Error DDF_IOStream::Open(const TCollection_AsciiString& aName,const Storage_OpenMode aMode)
63{
64 //myIStream = NULL;
65 //myOStream = NULL;
66 //return Storage_VSOk;
67
68 Storage_Error result = Storage_VSOk;
69
70 SetName(aName);
71
72 if (OpenMode() == Storage_VSNone) {
73 if (aMode == Storage_VSRead) {
74 if (myIStream != NULL) delete myIStream;
75 myIStream = new ifstream(aName.ToCString(),ios::in); // ios::nocreate is not portable
76 if (myIStream->fail()) {
77 result = Storage_VSOpenError;
78 }
79 else {
80 myIStream->precision(17);
91322f44 81 myIStream->imbue (std::locale::classic()); // always use C locale
7fd59977 82 SetOpenMode(aMode);
83 }
84 }
85 else if (aMode == Storage_VSWrite) {
86 if (myOStream != NULL) delete myOStream;
87 myOStream = new ofstream(aName.ToCString(),ios::out);
88 if (myOStream->fail()) {
89 result = Storage_VSOpenError;
90 }
91 else {
92 myOStream->precision(17);
91322f44 93 myOStream->imbue (std::locale::classic()); // make sure to always use C locale
7fd59977 94 SetOpenMode(aMode);
95 }
96 }
97 }
98 else {
99 result = Storage_VSAlreadyOpen;
100 }
101
102 return result;
103}
104
105//=======================================================================
106//function : Open
107//purpose : "Opens" an istream.
108//=======================================================================
109
110Storage_Error DDF_IOStream::Open(istream* anIStream)
111{
112 myOStream = NULL;
113 SetOpenMode(Storage_VSRead);
114 myIStream = anIStream;
115 myIStream->precision(17);
91322f44 116 myIStream->imbue (std::locale::classic()); // use always C locale
7fd59977 117 SetName("DDF_IOStream");
118 return Storage_VSOk; // ou Storage_VSAlreadyOpen ?
119}
120
121//=======================================================================
122//function : Open
123//purpose : "Opens" an ostream.
124//=======================================================================
125
126Storage_Error DDF_IOStream::Open(ostream* anOStream)
127{
128 myIStream = NULL;
129 SetOpenMode(Storage_VSWrite);
130 myOStream = anOStream;
131 myOStream->precision(17);
91322f44 132 myOStream->imbue (std::locale::classic()); // use always C locale
7fd59977 133 SetName("DDF_IOStream");
134 return Storage_VSOk; // ou Storage_VSAlreadyOpen ?
135}
136
137//=======================================================================
138//function : IsEnd
139//purpose :
140//=======================================================================
141
142Standard_Boolean DDF_IOStream::IsEnd()
143{
144 if (OpenMode() == Storage_VSRead) return myIStream->eof();
145 else return myOStream->eof();
146}
147
148//=======================================================================
149//function : Close
150//purpose :
151//=======================================================================
152
153Storage_Error DDF_IOStream::Close()
154{ return Storage_VSOk; }
155
156
157// ------------------ PROTECTED
158
159
160//=======================================================================
161//function : MagicNumber
162//purpose :
163//=======================================================================
164
487bf1ce 165Standard_CString DDF_IOStream::MagicNumber()
7fd59977 166{ return MAGICNUMBER; }
167
168//=======================================================================
169//function : FlushEndOfLine
170//purpose :
171//=======================================================================
172
173void DDF_IOStream::FlushEndOfLine()
174{
175 static char Buffer[8192];
176 char c;
177 Standard_Boolean IsEnd = Standard_False;
178
179 while (!IsEnd && !DDF_IOStream::IsEnd()) {
180 Buffer[0] = '\0';
181 myIStream->get(Buffer,8192,'\n');
182
183 if (myIStream->get(c) && c != '\n') {
184 }
185 else {
186 IsEnd = Standard_True;
187 }
188 }
189}
190
191//=======================================================================
192//function : ReadLine
193//purpose :
194//=======================================================================
195
196void DDF_IOStream::ReadLine(TCollection_AsciiString& buffer)
197{
198 static char Buffer[8193];
199 char c;
200 Standard_Boolean IsEnd = Standard_False;
201
202 buffer.Clear();
203
204 while (!IsEnd && !DDF_IOStream::IsEnd()) {
205 Buffer[0] = '\0';
206 myIStream->get(Buffer,8192,'\n');
207
208 if (myIStream->get(c) && c != '\n') {
209 buffer += Buffer;
210 buffer += c;
211 }
212 else {
213 buffer += Buffer;
214 IsEnd = Standard_True;
215 }
216 }
217}
218
219
220//=======================================================================
221//function : WriteExtendedLine
222//purpose :
223//=======================================================================
224
225void DDF_IOStream::WriteExtendedLine(const TCollection_ExtendedString& buffer)
226{
227 Standard_ExtString extBuffer;
228 Standard_Integer i,c,d;
229
230 extBuffer = buffer.ToExtString();
231
232 for (i = 0; i < buffer.Length(); i++) {
233 c = (extBuffer[i] & 0x0000FF00 ) >> 8 ;
234 d = extBuffer[i] & 0x000000FF;
235
236 *myOStream << (char)c << (char)d;
237 }
238
239 *myOStream << (char)0 << "\n";
240}
241
242//=======================================================================
243//function : ReadExtendedLine
244//purpose :
245//=======================================================================
246
247void DDF_IOStream::ReadExtendedLine(TCollection_ExtendedString& buffer)
248{
249 char c = '\0';
250 Standard_ExtCharacter i = 0,j,check = 0;
251 Standard_Boolean fin = Standard_False;
252
253 buffer.Clear();
254
255 while (!fin && !IsEnd()) {
256 myIStream->get(c);
257 check++;
258// if (!(check % 2)) Storage_StreamExtCharParityError::Raise();
008aef40 259 i = (Standard_ExtCharacter)c;
7fd59977 260 if (c == '\0') fin = Standard_True;
261 i = (i << 8);
262
263 myIStream->get(c);
264 check++;
265// if ((check % 2) != 0) Storage_StreamExtCharParityError::Raise();
266// cout << check << endl;
008aef40 267 j = (Standard_ExtCharacter)c;
7fd59977 268 if (c != '\n') fin = Standard_False;
269 i |= (0x00FF & j);
270 buffer += (Standard_ExtCharacter)i;
271 }
272
273// if ((check % 2) != 0) Storage_StreamExtCharParityError::Raise();
274// cout << check << endl;
275}
276
277//=======================================================================
278//function : ReadChar
279//purpose :
280//=======================================================================
281
282void DDF_IOStream::ReadChar(TCollection_AsciiString& buffer, const Standard_Integer rsize)
283{
284 char c;
285 Standard_Integer ccount = 0;
286
287 buffer.Clear();
288
289 while (!IsEnd() && (ccount < rsize)) {
290 myIStream->get(c);
291 buffer += c;
292 ccount++;
293 }
294}
295
296//=======================================================================
297//function : ReadString
298//purpose :
299//=======================================================================
300
301void DDF_IOStream::ReadString(TCollection_AsciiString& buffer)
302{
1d47d8d0 303 char c = '\0';
7fd59977 304 Standard_Boolean IsEnd = Standard_False;
305
306 buffer.Clear();
307
308 while (!IsEnd && !DDF_IOStream::IsEnd()) {
309 myIStream->get(c);
310 if ((c != ' ') && (c != '\n')) IsEnd = Standard_True;
311 }
312
313 IsEnd = Standard_False;
314
315 while (!IsEnd && !DDF_IOStream::IsEnd()) {
316 buffer += c;
317 myIStream->get(c);
318 if (c == '\n') IsEnd = Standard_True;
319 }
320}
321
322//=======================================================================
323//function : ReadWord
324//purpose :
325//=======================================================================
326
327void DDF_IOStream::ReadWord(TCollection_AsciiString& buffer)
328{
1d47d8d0 329 char c = '\0';
7fd59977 330 Standard_Boolean IsEnd = Standard_False;
331
332 buffer.Clear();
333
334 while (!IsEnd && !DDF_IOStream::IsEnd()) {
335 myIStream->get(c);
336 if ((c != ' ') && (c != '\n')) IsEnd = Standard_True;
337 }
338
339 IsEnd = Standard_False;
340
341 while (!IsEnd && !DDF_IOStream::IsEnd()) {
342 buffer += c;
343 myIStream->get(c);
344 if ((c == '\n') || (c == ' ')) IsEnd = Standard_True;
345 }
346}
347
348//=======================================================================
349//function : FindTag
350//purpose :
351//=======================================================================
352
353Storage_Error DDF_IOStream::FindTag(const Standard_CString aTag)
354{
355 TCollection_AsciiString l;
356
357 ReadString(l);
358
359 while ((strcmp(l.ToCString(),aTag) != 0) && !IsEnd()) {
360 ReadString(l);
361 }
362
363 if (IsEnd()) {
364 return Storage_VSSectionNotFound;
365 }
366 else {
367 return Storage_VSOk;
368 }
369}
370
371//=======================================================================
372//function : SkipObject
373//purpose :
374//=======================================================================
375
376void DDF_IOStream::SkipObject()
377{
378 FlushEndOfLine();
379}
380
381
382// ---------------------- PUBLIC : PUT
383
384
385//=======================================================================
386//function : PutReference
387//purpose :
388//=======================================================================
389
390Storage_BaseDriver& DDF_IOStream::PutReference(const Standard_Integer aValue)
391{
392 *myOStream << aValue << " ";
393 if (myOStream->bad()) Storage_StreamWriteError::Raise("PutReference");
394 return *this;
395}
396
397//=======================================================================
398//function : PutCharacter
399//purpose :
400//=======================================================================
401
402Storage_BaseDriver& DDF_IOStream::PutCharacter(const Standard_Character aValue)
403{
404 *myOStream << aValue << " ";
405 if (myOStream->bad()) Storage_StreamWriteError::Raise("PutCharacter");
406 return *this;
407}
408
409//=======================================================================
410//function : PutExtCharacter
411//purpose :
412//=======================================================================
413
414Storage_BaseDriver& DDF_IOStream::PutExtCharacter(const Standard_ExtCharacter aValue)
415{
416 *myOStream << aValue << " ";
417 if (myOStream->bad()) Storage_StreamWriteError::Raise("PutExtCharacter");
418 return *this;
419}
420
421//=======================================================================
422//function : PutInteger
423//purpose :
424//=======================================================================
425
426Storage_BaseDriver& DDF_IOStream::PutInteger(const Standard_Integer aValue)
427{
428 *myOStream << aValue << " ";
429 if (myOStream->bad()) Storage_StreamWriteError::Raise("PutInteger");
430 return *this;
431}
432
433//=======================================================================
434//function : PutBoolean
435//purpose :
436//=======================================================================
437
438Storage_BaseDriver& DDF_IOStream::PutBoolean(const Standard_Boolean aValue)
439{
440 *myOStream << ((Standard_Integer)aValue) << " ";
441 if (myOStream->bad()) Storage_StreamWriteError::Raise("PutBoolean");
442 return *this;
443}
444
445//=======================================================================
446//function : PutReal
447//purpose :
448//=======================================================================
449
450Storage_BaseDriver& DDF_IOStream::PutReal(const Standard_Real aValue)
451{
452 *myOStream << ((Standard_Real)aValue) << " ";
453 if (myOStream->bad()) Storage_StreamWriteError::Raise("PutReal");
454 return *this;
455}
456
457//=======================================================================
458//function : PutShortReal
459//purpose :
460//=======================================================================
461
462Storage_BaseDriver& DDF_IOStream::PutShortReal(const Standard_ShortReal aValue)
463{
464 *myOStream << aValue << " ";
465 if (myOStream->bad()) Storage_StreamWriteError::Raise("PutShortReal");
466 return *this;
467}
468
469
470// ----------------- PUBLIC : GET
471
472
473//=======================================================================
474//function : GetReference
475//purpose :
476//=======================================================================
477
478Storage_BaseDriver& DDF_IOStream::GetReference(Standard_Integer& aValue)
479{
480 if (!(*myIStream >> aValue)) Storage_StreamTypeMismatchError::Raise("GetReference");
481 return *this;
482}
483
484//=======================================================================
485//function : GetCharacter
486//purpose :
487//=======================================================================
488
489Storage_BaseDriver& DDF_IOStream::GetCharacter(Standard_Character& aValue)
490{
491 if (!(*myIStream >> aValue)) Storage_StreamTypeMismatchError::Raise("GetCharacter");
492 return *this;
493}
494
495//=======================================================================
496//function : GetExtCharacter
497//purpose :
498//=======================================================================
499
500Storage_BaseDriver& DDF_IOStream::GetExtCharacter(Standard_ExtCharacter& aValue)
501{
502 if (!(*myIStream >> aValue)) Storage_StreamTypeMismatchError::Raise("GetExtCharacter");
503 return *this;
504}
505
506//=======================================================================
507//function : GetInteger
508//purpose :
509//=======================================================================
510
511Storage_BaseDriver& DDF_IOStream::GetInteger(Standard_Integer& aValue)
512{
513 if (!(*myIStream >> aValue)) Storage_StreamTypeMismatchError::Raise("GetInteger");
514 return *this;
515}
516
517//=======================================================================
518//function : GetBoolean
519//purpose :
520//=======================================================================
521
522Storage_BaseDriver& DDF_IOStream::GetBoolean(Standard_Boolean& aValue)
523{
524 if (!(*myIStream >> aValue)) Storage_StreamTypeMismatchError::Raise("GetBoolean");
525 return *this;
526}
527
528//=======================================================================
529//function : GetReal
530//purpose :
531//=======================================================================
532
533Storage_BaseDriver& DDF_IOStream::GetReal(Standard_Real& aValue)
534{
535 if (!(*myIStream >> aValue)) Storage_StreamTypeMismatchError::Raise("GetReal");
536 return *this;
537}
538
539//=======================================================================
540//function : GetShortReal
541//purpose :
542//=======================================================================
543
544Storage_BaseDriver& DDF_IOStream::GetShortReal(Standard_ShortReal& aValue)
545{
546 if (!(*myIStream >> aValue)) Storage_StreamTypeMismatchError::Raise("GetShortReal");
547 return *this;
548}
549
550// -------------------------- DESTROY
551
552//=======================================================================
553//function : Destroy
554//purpose :
555//=======================================================================
556
557void DDF_IOStream::Destroy()
558{
559 if (OpenMode() != Storage_VSNone) Close();
560}
561
562
563// -------------------------- INFO : WRITE
564
565
566//=======================================================================
567//function : BeginWriteInfoSection
568//purpose :
569//=======================================================================
570
571Storage_Error DDF_IOStream::BeginWriteInfoSection()
572{
573 *myOStream << DDF_IOStream::MagicNumber() << '\n';
574 *myOStream << "BEGIN_INFO_SECTION\n";
575 if (myOStream->bad()) Storage_StreamWriteError::Raise();
576
577 return Storage_VSOk;
578}
579
580//=======================================================================
581//function : WriteInfo
582//purpose :
583//=======================================================================
584
585void DDF_IOStream::WriteInfo(const Standard_Integer nbObj,
586 const TCollection_AsciiString& dbVersion,
587 const TCollection_AsciiString& date,
588 const TCollection_AsciiString& schemaName,
589 const TCollection_AsciiString& schemaVersion,
590 const TCollection_ExtendedString& appName,
591 const TCollection_AsciiString& appVersion,
592 const TCollection_ExtendedString& dataType,
593 const TColStd_SequenceOfAsciiString& userInfo)
594{
595 Standard_Integer i;
596// char *extBuffer;
597
598 *myOStream << nbObj;
599 *myOStream << "\n";
600 *myOStream << dbVersion.ToCString() << "\n";
601 *myOStream << date.ToCString() << "\n";
602 *myOStream << schemaName.ToCString() << "\n";
603 *myOStream << schemaVersion.ToCString() << "\n";
604 WriteExtendedLine(appName);
605 *myOStream << appVersion.ToCString() << "\n";
606 WriteExtendedLine(dataType);
607 *myOStream << userInfo.Length() << "\n";
608
609 if (myOStream->bad()) Storage_StreamWriteError::Raise();
610
611 for (i = 1; i <= userInfo.Length(); i++) {
612 *myOStream << userInfo.Value(i).ToCString() << "\n";
613 if (myOStream->bad()) Storage_StreamWriteError::Raise();
614 }
615}
616
617
618//=======================================================================
619//function : EndWriteInfoSection
620//purpose :
621//=======================================================================
622
623Storage_Error DDF_IOStream::EndWriteInfoSection()
624{
625 *myOStream << "END_INFO_SECTION\n";
626 if (myOStream->bad()) Storage_StreamWriteError::Raise();
627 return Storage_VSOk;
628}
629
630//=======================================================================
631//function : BeginReadInfoSection
632//purpose :
633//=======================================================================
634
635Storage_Error DDF_IOStream::BeginReadInfoSection()
636{
637 Storage_Error s;
638 TCollection_AsciiString l;
60be1f9b 639 Standard_Integer len = (Standard_Integer) strlen(DDF_IOStream::MagicNumber());
7fd59977 640
641 // Added because of Draw:
642 // It don't go to next line after reading its own header line information!
643 FlushEndOfLine();
644 ReadChar(l,len);
645
646 if (strncmp(DDF_IOStream::MagicNumber(),l.ToCString(),len) != 0) {
0797d9d3 647#ifdef OCCT_DEBUG
7fd59977 648 cout<<"BeginReadInfoSection: format error"<<endl;
649#endif
650 s = Storage_VSFormatError;
651 }
652 else {
653 s = FindTag("BEGIN_INFO_SECTION");
654 }
655
656 return s;
657}
658
659
660// ------------------- INFO : READ
661
662
663//=======================================================================
664//function : ReadInfo
665//purpose :
666//=======================================================================
667
668void DDF_IOStream::ReadInfo(Standard_Integer& nbObj,
669 TCollection_AsciiString& dbVersion,
670 TCollection_AsciiString& date,
671 TCollection_AsciiString& schemaName,
672 TCollection_AsciiString& schemaVersion,
673 TCollection_ExtendedString& appName,
674 TCollection_AsciiString& appVersion,
675 TCollection_ExtendedString& dataType,
676 TColStd_SequenceOfAsciiString& userInfo)
677{
678 if (!(*myIStream >> nbObj)) Storage_StreamTypeMismatchError::Raise("ReadInfo 1");
679
680 FlushEndOfLine();
681
682 ReadLine(dbVersion);
683 ReadLine(date);
684 ReadLine(schemaName);
685 ReadLine(schemaVersion);
686 ReadExtendedLine(appName);
687 ReadLine(appVersion);
688 ReadExtendedLine(dataType);
689
690 Standard_Integer i,len = 0;
691
692 if (!(*myIStream >> len)) Storage_StreamTypeMismatchError::Raise("ReadInfo 2");
693
694 FlushEndOfLine();
695
696 TCollection_AsciiString line;
697
698 for (i = 1; i <= len && !IsEnd(); i++) {
699 ReadLine(line);
700 userInfo.Append(line);
701 line.Clear();
702 }
703}
704
705//=======================================================================
706//function : EndReadInfoSection
707//purpose :
708//=======================================================================
709
710Storage_Error DDF_IOStream::EndReadInfoSection()
711{ return FindTag("END_INFO_SECTION"); }
712
713
714// ---------------- COMMENTS : WRITE
715
716
717//=======================================================================
718//function : BeginWriteCommentSection
719//purpose :
720//=======================================================================
721
722Storage_Error DDF_IOStream::BeginWriteCommentSection()
723{
724 *myOStream << "BEGIN_COMMENT_SECTION\n";
725 if (myOStream->bad()) Storage_StreamWriteError::Raise();
726 return Storage_VSOk;
727}
728
729//=======================================================================
730//function : WriteComment
731//purpose :
732//=======================================================================
733
734void DDF_IOStream::WriteComment(const TColStd_SequenceOfExtendedString& aCom)
735{
736 Standard_Integer i,aSize;
737
738 aSize = aCom.Length();
739 *myOStream << aSize << "\n";
740 if (myOStream->bad()) Storage_StreamWriteError::Raise();
741
742 for (i = 1; i <= aSize; i++) {
743 WriteExtendedLine(aCom.Value(i));
744 if (myOStream->bad()) Storage_StreamWriteError::Raise();
745 }
746}
747
748//=======================================================================
749//function : EndWriteCommentSection
750//purpose :
751//=======================================================================
752
753Storage_Error DDF_IOStream::EndWriteCommentSection()
754{
755 *myOStream << "END_COMMENT_SECTION\n";
756 if (myOStream->bad()) Storage_StreamWriteError::Raise();
757 return Storage_VSOk;
758}
759
760
761// ---------------- COMMENTS : READ
762
763
764//=======================================================================
765//function : BeginReadCommentSection
766//purpose :
767//=======================================================================
768
769Storage_Error DDF_IOStream::BeginReadCommentSection()
770{
771 return FindTag("BEGIN_COMMENT_SECTION");
772}
773
774//=======================================================================
775//function : ReadComment
776//purpose :
777//=======================================================================
778
779void DDF_IOStream::ReadComment(TColStd_SequenceOfExtendedString& aCom)
780{
781 TCollection_ExtendedString line;
782 Standard_Integer len,i;
783
784 if (!(*myIStream >> len)) Storage_StreamTypeMismatchError::Raise("ReadComment");
785
786 FlushEndOfLine();
787
788 for (i = 1; i <= len && !IsEnd(); i++) {
789 ReadExtendedLine(line);
790 aCom.Append(line);
791 line.Clear();
792 }
793}
794
795//=======================================================================
796//function : EndReadCommentSection
797//purpose :
798//=======================================================================
799
800Storage_Error DDF_IOStream::EndReadCommentSection()
801{ return FindTag("END_COMMENT_SECTION"); }
802
803
804// --------------- TYPE : WRITE
805
806
807//=======================================================================
808//function : BeginWriteTypeSection
809//purpose :
810//=======================================================================
811
812Storage_Error DDF_IOStream::BeginWriteTypeSection()
813{
814 *myOStream << "BEGIN_TYPE_SECTION\n";
815 if (myOStream->bad()) Storage_StreamWriteError::Raise();
816 return Storage_VSOk;
817}
818
819//=======================================================================
820//function : SetTypeSectionSize
821//purpose :
822//=======================================================================
823
824void DDF_IOStream::SetTypeSectionSize(const Standard_Integer aSize)
825{
826 *myOStream << aSize << "\n";
827 if (myOStream->bad()) Storage_StreamWriteError::Raise();
828}
829
830//=======================================================================
831//function : WriteTypeInformations
832//purpose :
833//=======================================================================
834
835void DDF_IOStream::WriteTypeInformations(const Standard_Integer typeNum,
836 const TCollection_AsciiString& typeName)
837{
838 *myOStream << typeNum << " " << typeName.ToCString() << "\n";
839 if (myOStream->bad()) Storage_StreamWriteError::Raise();
840}
841
842//=======================================================================
843//function : EndWriteTypeSection
844//purpose :
845//=======================================================================
846
847Storage_Error DDF_IOStream::EndWriteTypeSection()
848{
849 *myOStream << "END_TYPE_SECTION\n";
850 if (myOStream->bad()) Storage_StreamWriteError::Raise();
851 return Storage_VSOk;
852}
853
854
855// ------------------- TYPE : READ
856
857
858//=======================================================================
859//function : BeginReadTypeSection
860//purpose :
861//=======================================================================
862
863Storage_Error DDF_IOStream::BeginReadTypeSection()
864{ return FindTag("BEGIN_TYPE_SECTION"); }
865
866//=======================================================================
867//function : TypeSectionSize
868//purpose :
869//=======================================================================
870
871Standard_Integer DDF_IOStream::TypeSectionSize()
872{
873 Standard_Integer i;
874
875 if (!(*myIStream >> i)) Storage_StreamTypeMismatchError::Raise("TypeSectionSize");
876
877 FlushEndOfLine();
878
879 return i;
880}
881
882//=======================================================================
883//function : ReadTypeInformations
884//purpose :
885//=======================================================================
886
887void DDF_IOStream::ReadTypeInformations(Standard_Integer& typeNum,
888 TCollection_AsciiString& typeName)
889{
890 if (!(*myIStream >> typeNum)) Storage_StreamTypeMismatchError::Raise("ReadTypeInformations 1");
891 if (!(*myIStream >> typeName)) Storage_StreamTypeMismatchError::Raise("ReadTypeInformations 2");
892 FlushEndOfLine();
893}
894
895//=======================================================================
896//function : EndReadTypeSection
897//purpose :
898//=======================================================================
899
900Storage_Error DDF_IOStream::EndReadTypeSection()
901{
902 return FindTag("END_TYPE_SECTION");
903}
904
905
906// -------------------- ROOT : WRITE
907
908
909//=======================================================================
910//function : BeginWriteRootSection
911//purpose :
912//=======================================================================
913
914Storage_Error DDF_IOStream::BeginWriteRootSection()
915{
916 *myOStream << "BEGIN_ROOT_SECTION\n";
917 if (myOStream->bad()) Storage_StreamWriteError::Raise();
918 return Storage_VSOk;
919}
920
921//=======================================================================
922//function : SetRootSectionSize
923//purpose :
924//=======================================================================
925
926void DDF_IOStream::SetRootSectionSize(const Standard_Integer aSize)
927{
928 *myOStream << aSize << "\n";
929 if (myOStream->bad()) Storage_StreamWriteError::Raise();
930}
931
932//=======================================================================
933//function : WriteRoot
934//purpose :
935//=======================================================================
936
937void DDF_IOStream::WriteRoot(const TCollection_AsciiString& rootName, const Standard_Integer aRef, const TCollection_AsciiString& rootType)
938{
939 *myOStream << aRef << " " << rootName.ToCString() << " " << rootType.ToCString() << "\n";
940 if (myOStream->bad()) Storage_StreamWriteError::Raise();
941}
942
943//=======================================================================
944//function : EndWriteRootSection
945//purpose :
946//=======================================================================
947
948Storage_Error DDF_IOStream::EndWriteRootSection()
949{
950 *myOStream << "END_ROOT_SECTION\n";
951 if (myOStream->bad()) Storage_StreamWriteError::Raise();
952 return Storage_VSOk;
953}
954
955
956// ----------------------- ROOT : READ
957
958
959//=======================================================================
960//function : BeginReadRootSection
961//purpose :
962//=======================================================================
963
964Storage_Error DDF_IOStream::BeginReadRootSection()
965{ return FindTag("BEGIN_ROOT_SECTION"); }
966
967//=======================================================================
968//function : RootSectionSize
969//purpose :
970//=======================================================================
971
972Standard_Integer DDF_IOStream::RootSectionSize()
973{
974 Standard_Integer i;
975
976 if (!(*myIStream >> i)) Storage_StreamTypeMismatchError::Raise("RootSectionSize");
977
978 FlushEndOfLine();
979
980 return i;
981}
982
983//=======================================================================
984//function : ReadRoot
985//purpose :
986//=======================================================================
987
988void DDF_IOStream::ReadRoot(TCollection_AsciiString& rootName, Standard_Integer& aRef,TCollection_AsciiString& rootType)
989{
990 if (!(*myIStream >> aRef)) Storage_StreamTypeMismatchError::Raise("ReadRoot");
991 ReadWord(rootName);
992 ReadWord(rootType);
993}
994
995//=======================================================================
996//function : EndReadRootSection
997//purpose :
998//=======================================================================
999
1000Storage_Error DDF_IOStream::EndReadRootSection()
1001{ return FindTag("END_ROOT_SECTION"); }
1002
1003
1004// -------------------------- REF : WRITE
1005
1006
1007//=======================================================================
1008//function : BeginWriteRefSection
1009//purpose :
1010//=======================================================================
1011
1012Storage_Error DDF_IOStream::BeginWriteRefSection()
1013{
1014 *myOStream << "BEGIN_REF_SECTION\n";
1015 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1016 return Storage_VSOk;
1017}
1018
1019//=======================================================================
1020//function : SetRefSectionSize
1021//purpose :
1022//=======================================================================
1023
1024void DDF_IOStream::SetRefSectionSize(const Standard_Integer aSize)
1025{
1026 *myOStream << aSize << "\n";
1027 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1028}
1029
1030//=======================================================================
1031//function : WriteReferenceType
1032//purpose :
1033//=======================================================================
1034
1035void DDF_IOStream::WriteReferenceType(const Standard_Integer reference,
1036 const Standard_Integer typeNum)
1037{
1038 *myOStream << reference << " " << typeNum << "\n";
1039 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1040}
1041
1042//=======================================================================
1043//function : EndWriteRefSection
1044//purpose :
1045//=======================================================================
1046
1047Storage_Error DDF_IOStream::EndWriteRefSection()
1048{
1049 *myOStream << "END_REF_SECTION\n";
1050 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1051 return Storage_VSOk;
1052}
1053
1054
1055// ----------------------- REF : READ
1056
1057
1058//=======================================================================
1059//function : BeginReadRefSection
1060//purpose :
1061//=======================================================================
1062
1063Storage_Error DDF_IOStream::BeginReadRefSection()
1064{ return FindTag("BEGIN_REF_SECTION"); }
1065
1066//=======================================================================
1067//function : RefSectionSize
1068//purpose :
1069//=======================================================================
1070
1071Standard_Integer DDF_IOStream::RefSectionSize()
1072{
1073 Standard_Integer i;
1074
1075 if (!(*myIStream >> i)) Storage_StreamTypeMismatchError::Raise("RefSectionSize");
1076 FlushEndOfLine();
1077
1078 return i;
1079}
1080
1081//=======================================================================
1082//function : ReadReferenceType
1083//purpose :
1084//=======================================================================
1085
1086void DDF_IOStream::ReadReferenceType(Standard_Integer& reference,
1087 Standard_Integer& typeNum)
1088{
1089 if (!(*myIStream >> reference)) Storage_StreamTypeMismatchError::Raise("ReadReferenceType 1");
1090 if (!(*myIStream >> typeNum)) Storage_StreamTypeMismatchError::Raise("ReadReferenceType 2");
1091 FlushEndOfLine();
1092}
1093
1094//=======================================================================
1095//function : EndReadRefSection
1096//purpose :
1097//=======================================================================
1098
1099Storage_Error DDF_IOStream::EndReadRefSection()
1100{
1101 return FindTag("END_REF_SECTION");
1102}
1103
1104
1105// -------------------- DATA : WRITE
1106
1107
1108//=======================================================================
1109//function : BeginWriteDataSection
1110//purpose :
1111//=======================================================================
1112
1113Storage_Error DDF_IOStream::BeginWriteDataSection()
1114{
1115 *myOStream << "BEGIN_DATA_SECTION";
1116 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1117 return Storage_VSOk;
1118}
1119
1120//=======================================================================
1121//function : WritePersistentObjectHeader
1122//purpose :
1123//=======================================================================
1124
1125void DDF_IOStream::WritePersistentObjectHeader(const Standard_Integer aRef,
1126 const Standard_Integer aType)
1127{
1128 *myOStream << "\n#" << aRef << "=%" << aType;
1129 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1130}
1131
1132//=======================================================================
1133//function : BeginWritePersistentObjectData
1134//purpose :
1135//=======================================================================
1136
1137void DDF_IOStream::BeginWritePersistentObjectData()
1138{
1139 *myOStream << "( ";
1140 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1141}
1142
1143//=======================================================================
1144//function : BeginWriteObjectData
1145//purpose :
1146//=======================================================================
1147
1148void DDF_IOStream::BeginWriteObjectData()
1149{
1150 *myOStream << "( ";
1151 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1152}
1153
1154//=======================================================================
1155//function : EndWriteObjectData
1156//purpose :
1157//=======================================================================
1158
1159void DDF_IOStream::EndWriteObjectData()
1160{
1161 *myOStream << ") ";
1162 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1163}
1164
1165//=======================================================================
1166//function : EndWritePersistentObjectData
1167//purpose :
1168//=======================================================================
1169
1170void DDF_IOStream::EndWritePersistentObjectData()
1171{
1172 *myOStream << ")";
1173 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1174}
1175
1176//=======================================================================
1177//function : EndWriteDataSection
1178//purpose :
1179//=======================================================================
1180
1181Storage_Error DDF_IOStream::EndWriteDataSection()
1182{
1183 *myOStream << "\nEND_DATA_SECTION\n";
1184 if (myOStream->bad()) Storage_StreamWriteError::Raise();
1185 return Storage_VSOk;
1186}
1187
1188
1189// ---------------------- DATA : READ
1190
1191
1192//=======================================================================
1193//function : BeginReadDataSection
1194//purpose :
1195//=======================================================================
1196
1197Storage_Error DDF_IOStream::BeginReadDataSection()
1198{ return FindTag("BEGIN_DATA_SECTION"); }
1199
1200//=======================================================================
1201//function : ReadPersistentObjectHeader
1202//purpose :
1203//=======================================================================
1204
1205void DDF_IOStream::ReadPersistentObjectHeader(Standard_Integer& aRef,
1206 Standard_Integer& aType)
1207{
1208 char c;
1209
1210 myIStream->get(c);
1211
1212 while (c != '#') {
1213 if (IsEnd() || (c != ' ') || (c == '\n')) {
1214 Storage_StreamFormatError::Raise();
1215 }
1216 myIStream->get(c);
1217 }
1218
1219 if (!(*myIStream >> aRef)) Storage_StreamTypeMismatchError::Raise("ReadPersistentObjectHeader 1");
1220 myIStream->get(c);
1221
1222 while (c != '=') {
1223 if (IsEnd() || (c != ' ') || (c == '\n')) {
1224 Storage_StreamFormatError::Raise();
1225 }
1226 myIStream->get(c);
1227 }
1228
1229 myIStream->get(c);
1230
1231 while (c != '%') {
1232 if (IsEnd() || (c != ' ') || (c == '\n')) {
1233 Storage_StreamFormatError::Raise();
1234 }
1235 myIStream->get(c);
1236 }
1237
1238 if (!(*myIStream >> aType)) Storage_StreamTypeMismatchError::Raise("ReadPersistentObjectHeader 2");
1239}
1240
1241//=======================================================================
1242//function : BeginReadPersistentObjectData
1243//purpose :
1244//=======================================================================
1245
1246void DDF_IOStream::BeginReadPersistentObjectData()
1247{
1248 char c;
1249 myIStream->get(c);
1250 while (c != '(') {
1251 if (IsEnd() || (c != ' ') || (c == '\n')) {
1252 Storage_StreamFormatError::Raise();
1253 }
1254 myIStream->get(c);
1255 }
1256}
1257
1258//=======================================================================
1259//function : BeginReadObjectData
1260//purpose :
1261//=======================================================================
1262
1263void DDF_IOStream::BeginReadObjectData()
1264{
1265 char c;
1266 myIStream->get(c);
1267 while (c != '(') {
1268 if (IsEnd() || (c != ' ') || (c == '\n')) {
1269 Storage_StreamFormatError::Raise("BeginReadObjectData");
1270 }
1271 myIStream->get(c);
1272 }
1273}
1274
1275//=======================================================================
1276//function : EndReadObjectData
1277//purpose :
1278//=======================================================================
1279
1280void DDF_IOStream::EndReadObjectData()
1281{
1282 char c;
1283 myIStream->get(c);
1284 while (c != ')') {
1285 if (IsEnd() || (c != ' ') || (c == '\n')) {
1286 Storage_StreamFormatError::Raise("EndReadObjectData");
1287 }
1288 myIStream->get(c);
1289 }
1290}
1291
1292//=======================================================================
1293//function : EndReadPersistentObjectData
1294//purpose :
1295//=======================================================================
1296
1297void DDF_IOStream::EndReadPersistentObjectData()
1298{
1299 char c;
1300
1301 myIStream->get(c);
1302 while (c != ')') {
1303 if (IsEnd() || (c != ' ') || (c == '\n')) {
1304 Storage_StreamFormatError::Raise("EndReadPersistentObjectData");
1305 }
1306 myIStream->get(c);
1307 }
1308
1309 myIStream->get(c);
1310 while (c != '\n') {
1311 if (IsEnd() || (c != ' ')) {
1312 Storage_StreamFormatError::Raise();
1313 }
1314 myIStream->get(c);
1315 }
1316}
1317
1318//=======================================================================
1319//function : EndReadDataSection
1320//purpose :
1321//=======================================================================
1322
1323Storage_Error DDF_IOStream::EndReadDataSection()
1324{ return FindTag("END_DATA_SECTION"); }
1325
1326//=======================================================================
1327//function : IsGoodFileType
1328//purpose :
1329//=======================================================================
1330
1331Storage_Error DDF_IOStream::IsGoodFileType(istream* anIStream)
1332{
1333 DDF_IOStream f;
1334 Storage_Error s;
1335
1336 s = f.Open(anIStream);
1337
1338 if (s == Storage_VSOk) {
1339 TCollection_AsciiString l;
60be1f9b 1340 Standard_Integer len = (Standard_Integer) strlen(DDF_IOStream::MagicNumber());
7fd59977 1341
1342 f.ReadChar(l,len);
1343
1344 f.Close();
1345
1346 if (strncmp(DDF_IOStream::MagicNumber(),l.ToCString(),len) != 0) {
0797d9d3 1347#ifdef OCCT_DEBUG
7fd59977 1348 cout<<"IsGoodFileType: format error"<<endl;
1349#endif
1350 s = Storage_VSFormatError;
1351 }
1352 }
1353
1354 return s;
1355}
1356