Integration of OCCT 6.5.0 from SVN

src/BinMDataStd/BinMDataStd_ExtStringArrayDriver.cxx

@@ -0,0 +1,102 @@
+// File:      BinMDataStd_ExtStringArrayDriver.cxx
+// Created:   24.08.04 17:22:25
+// Author:    Pavel TELKOV
+// Copyright: Open CASCADE 2004
+
+#include <BinMDataStd_ExtStringArrayDriver.ixx>
+#include <TDataStd_ExtStringArray.hxx>
+#include <BinObjMgt_Persistent.hxx>
+#include <TColStd_Array1OfExtendedString.hxx>
+#include <TColStd_HArray1OfExtendedString.hxx>
+#include <BinMDataStd.hxx>
+//=======================================================================
+//function : BinMDataStd_ExtStringArrayDriver
+//purpose  : Constructor
+//=======================================================================
+
+BinMDataStd_ExtStringArrayDriver::BinMDataStd_ExtStringArrayDriver
+                        (const Handle(CDM_MessageDriver)& theMsgDriver)
+     : BinMDF_ADriver (theMsgDriver, STANDARD_TYPE(TDataStd_ExtStringArray)->Name())
+{
+}
+
+//=======================================================================
+//function : NewEmpty
+//purpose  : 
+//=======================================================================
+
+Handle(TDF_Attribute) BinMDataStd_ExtStringArrayDriver::NewEmpty() const
+{
+  return new TDataStd_ExtStringArray();
+}
+
+//=======================================================================
+//function : Paste
+//purpose  : persistent -> transient (retrieve)
+//=======================================================================
+
+Standard_Boolean BinMDataStd_ExtStringArrayDriver::Paste
+                                (const BinObjMgt_Persistent&  theSource,
+                                 const Handle(TDF_Attribute)& theTarget,
+                                 BinObjMgt_RRelocationTable&  ) const
+{
+  Standard_Integer aFirstInd, aLastInd;
+  if (! (theSource >> aFirstInd >> aLastInd))
+    return Standard_False;
+  const Standard_Integer aLength = aLastInd - aFirstInd + 1;
+  if (aLength <= 0)
+    return Standard_False;
+
+  Handle(TDataStd_ExtStringArray) anAtt =
+    Handle(TDataStd_ExtStringArray)::DownCast(theTarget);
+  anAtt->Init(aFirstInd, aLastInd);
+  TColStd_Array1OfExtendedString& aTargetArray = anAtt->Array()->ChangeArray1();
+  Standard_Boolean ok = Standard_True;
+  for (Standard_Integer i = aFirstInd; i <= aLastInd; i ++)
+  {
+    TCollection_ExtendedString aStr;
+    if ( !(theSource >> aStr) )
+    {
+      ok = Standard_False;
+      break;
+    }
+    aTargetArray.SetValue( i, aStr );
+  }
+
+  if(ok) {
+#ifdef DEB
+  //cout << "CurDocVersion = " << BinMDataStd::DocumentVersion() <<endl;
+#endif
+    Standard_Boolean aDelta(Standard_False);
+    if(BinMDataStd::DocumentVersion() > 2) {
+      Standard_Byte aDeltaValue;
+      if (! (theSource >> aDeltaValue))
+	return Standard_False;
+      else
+	aDelta = (Standard_Boolean)aDeltaValue;
+    }
+    anAtt->SetDelta(aDelta);
+  }
+  return ok;
+}
+
+//=======================================================================
+//function : Paste
+//purpose  : transient -> persistent (store)
+//=======================================================================
+
+void BinMDataStd_ExtStringArrayDriver::Paste
+                                (const Handle(TDF_Attribute)& theSource,
+                                 BinObjMgt_Persistent&        theTarget,
+                                 BinObjMgt_SRelocationTable&  ) const
+{
+  Handle(TDataStd_ExtStringArray) anAtt =
+    Handle(TDataStd_ExtStringArray)::DownCast(theSource);
+  const TColStd_Array1OfExtendedString& aSourceArray = anAtt->Array()->Array1();
+  const Standard_Integer aFirstInd = aSourceArray.Lower();
+  const Standard_Integer aLastInd  = aSourceArray.Upper();
+  const Standard_Integer aLength   = aLastInd - aFirstInd + 1;
+  theTarget << aFirstInd << aLastInd;
+  for (Standard_Integer i = aFirstInd; i <= aLastInd; i ++)
+    theTarget << anAtt->Value( i );
+}