1 // Copyright (c) 2015 OPEN CASCADE SAS
3 // This file is part of Open CASCADE Technology software library.
5 // This library is free software; you can redistribute it and/or modify it under
6 // the terms of the GNU Lesser General Public License version 2.1 as published
7 // by the Free Software Foundation, with special exception defined in the file
8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
9 // distribution for complete text of the license and disclaimer of any warranty.
11 // Alternatively, this file may be used under the terms of Open CASCADE
12 // commercial license or contractual agreement.
15 #ifndef _StdLPersistent_HArray1_HeaderFile
16 #define _StdLPersistent_HArray1_HeaderFile
18 #include <StdObjMgt_Persistent.hxx>
19 #include <StdObjMgt_ReadData.hxx>
21 #include <NCollection_DefineHArray1.hxx>
23 #include <TColStd_HArray1OfInteger.hxx>
24 #include <TColStd_HArray1OfReal.hxx>
25 #include <TColStd_HArray1OfByte.hxx>
27 class TCollection_HExtendedString;
32 DEFINE_HARRAY1 (StdLPersistent_HArray1OfPersistent,
33 NCollection_Array1<Handle(StdObjMgt_Persistent)>)
36 class StdLPersistent_HArray1
38 class base : public StdObjMgt_Persistent
41 //! Read persistent data from a file.
42 Standard_EXPORT virtual void Read (StdObjMgt_ReadData& theReadData);
45 virtual void createArray (const Standard_Integer theLowerBound,
46 const Standard_Integer theUpperBound) = 0;
48 virtual void readValue (StdObjMgt_ReadData& theReadData,
49 const Standard_Integer theIndex) = 0;
53 template <class ArrayClass>
54 class instance : public base
57 typedef Handle(ArrayClass) ArrayHandle;
58 typedef typename ArrayClass::value_type ValueType;
59 typedef typename ArrayClass::Iterator Iterator;
63 const Handle(ArrayClass)& Array() const { return myArray; }
66 virtual void createArray (const Standard_Integer theLowerBound,
67 const Standard_Integer theUpperBound)
68 { myArray = new ArrayClass (theLowerBound, theUpperBound); }
70 virtual void readValue (StdObjMgt_ReadData& theReadData,
71 const Standard_Integer theIndex)
72 { theReadData >> myArray->ChangeValue (theIndex); }
75 Handle(ArrayClass) myArray;
79 typedef instance<TColStd_HArray1OfInteger> Integer;
80 typedef instance<TColStd_HArray1OfReal> Real;
81 typedef instance<TColStd_HArray1OfByte> Byte;
82 typedef instance<StdLPersistent_HArray1OfPersistent> Persistent;
85 inline StdObjMgt_ReadData& operator >>
86 (StdObjMgt_ReadData& theReadData, Standard_Byte& theByte)
87 { return theReadData >> reinterpret_cast<Standard_Character&> (theByte); }