1 // Created on: 2004-09-27
2 // Created by: Pavel TELKOV
3 // Copyright (c) 2004-2014 OPEN CASCADE SAS
5 // This file is part of Open CASCADE Technology software library.
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
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.
13 // Alternatively, this file may be used under the terms of Open CASCADE
14 // commercial license or contractual agreement.
16 #include <MDataStd_ExtStringArrayStorageDriver.ixx>
18 #include <CDM_MessageDriver.hxx>
19 #include <MDataStd.hxx>
20 #include <PCollection_HExtendedString.hxx>
21 #include <PDataStd_ExtStringArray.hxx>
22 #include <PDataStd_ExtStringArray_1.hxx>
23 #include <TDataStd_ExtStringArray.hxx>
25 //=======================================================================
26 //function : MDataStd_ExtStringArrayStorageDriver
27 //purpose : Constructor
28 //=======================================================================
30 MDataStd_ExtStringArrayStorageDriver::MDataStd_ExtStringArrayStorageDriver
31 ( const Handle(CDM_MessageDriver)& theMsgDriver )
32 :MDF_ASDriver(theMsgDriver)
35 //=======================================================================
36 //function : VersionNumber
38 //=======================================================================
40 Standard_Integer MDataStd_ExtStringArrayStorageDriver::VersionNumber() const
44 //=======================================================================
45 //function : SourceType
47 //=======================================================================
49 Handle(Standard_Type) MDataStd_ExtStringArrayStorageDriver::SourceType() const
51 static Handle(Standard_Type) sourceType = STANDARD_TYPE(TDataStd_ExtStringArray);
56 //=======================================================================
59 //=======================================================================
61 Handle(PDF_Attribute) MDataStd_ExtStringArrayStorageDriver::NewEmpty() const
63 return new PDataStd_ExtStringArray_1 ();
67 //=======================================================================
70 //=======================================================================
72 void MDataStd_ExtStringArrayStorageDriver::Paste (
73 const Handle(TDF_Attribute)& Source,
74 const Handle(PDF_Attribute)& Target,
75 const Handle(MDF_SRelocationTable)& ) const
77 Handle(TDataStd_ExtStringArray) S =
78 Handle(TDataStd_ExtStringArray)::DownCast (Source);
79 Handle(PDataStd_ExtStringArray_1) T =
80 Handle(PDataStd_ExtStringArray_1)::DownCast (Target);
82 Standard_Integer i, lower = S->Lower(), upper = S->Upper();
83 T->Init(lower, upper);
85 for(i = lower; i<=upper; i++)
87 Handle(PCollection_HExtendedString) aPExtStr =
88 new PCollection_HExtendedString( S->Value( i ) );
89 T->SetValue( i, aPExtStr );
91 T->SetDelta(S->GetDelta());