Integration of OCCT 6.5.0 from SVN

src/XmlXCAFDrivers/FILES

@@ -0,0 +1,2 @@
+FILES
+GUID.txt

src/XmlXCAFDrivers/GUID.txt

@@ -0,0 +1,5 @@
+GUIDs defined here:
+
+ed8793f8-3142-11d4-b9b5-0060b0ee281b: DECAF storage driver
+ed8793f9-3142-11d4-b9b5-0060b0ee281b: DECAF retrieval driver
+ed8793fa-3142-11d4-b9b5-0060b0ee281b: XS schema

src/XmlXCAFDrivers/XmlXCAFDrivers.cdl

@@ -0,0 +1,42 @@
+-- File:      XmlXCAFDrivers.cdl
+-- Created:   11.09.01 11:50:20
+-- Author:    Julia DOROVSKIKH
+-- Copyright: Open Cascade 2001
+
+
+package XmlXCAFDrivers 
+
+        ---Purpose: 
+
+uses
+    TCollection,
+    CDM,
+    XmlDrivers,
+    XmlMDF
+    
+is
+    class DocumentRetrievalDriver;
+    
+    class DocumentStorageDriver;
+
+    ---Category: Factory methods
+    --           ==============================================================
+
+    Factory (aGUID: GUID from Standard)
+    returns Transient from Standard;
+        ---Purpose: Depending from the  ID, returns a list of  storage
+        --          or retrieval attribute drivers. Used for plugin.
+        --          
+        --          Standard data model drivers
+        --          ===========================
+        --          47b0b826-d931-11d1-b5da-00a0c9064368 Transient-Persistent 
+        --          47b0b827-d931-11d1-b5da-00a0c9064368 Persistent-Transient
+        --          
+        --          XCAF data model drivers
+        --          =================================
+        --          ed8793f8-3142-11d4-b9b5-0060b0ee281b Transient-Persistent 
+        --          ed8793f9-3142-11d4-b9b5-0060b0ee281b Persistent-Transient
+        --          ed8793fa-3142-11d4-b9b5-0060b0ee281b XCAFSchema
+
+
+end XmlXCAFDrivers;

src/XmlXCAFDrivers/XmlXCAFDrivers.cxx

@@ -0,0 +1,45 @@
+// File:      XmlXCAFDrivers.cxx
+// Created:   11.09.01 11:50:20
+// Author:    Julia DOROVSKIKH
+// Copyright: Open Cascade 2001
+// History:
+
+#include <XmlXCAFDrivers.ixx>
+#include <XmlXCAFDrivers_DocumentStorageDriver.hxx>
+#include <XmlXCAFDrivers_DocumentRetrievalDriver.hxx>
+
+#include <Standard_Failure.hxx>
+#include <Standard_GUID.hxx>
+#include <XmlDrivers.hxx>
+#include <Plugin_Macro.hxx>
+
+// avoid warnings on 'extern "C"' functions returning C++ classes
+#ifdef WNT
+#pragma warning(4:4190)
+#endif
+
+static Standard_GUID XSStorageDriver  ("f78ff496-a779-11d5-aab4-0050044b1af1");
+static Standard_GUID XSRetrievalDriver("f78ff497-a779-11d5-aab4-0050044b1af1");
+
+Handle(Standard_Transient) XmlXCAFDrivers::Factory(const Standard_GUID& aGUID)
+{
+  if(aGUID == XSStorageDriver)  
+  {
+    cout << "XmlXCAFDrivers : Storage Plugin" << endl;
+    static Handle(XmlXCAFDrivers_DocumentStorageDriver) model_sd 
+      = new XmlXCAFDrivers_DocumentStorageDriver
+        ("Copyright: Open Cascade, 2001-2002"); // default copyright
+    return model_sd;
+  }
+  if(aGUID == XSRetrievalDriver) 
+  {  
+    cout << "XmlXCAFDrivers : Retrieval Plugin" << endl;
+    static Handle (XmlXCAFDrivers_DocumentRetrievalDriver) model_rd 
+      = new XmlXCAFDrivers_DocumentRetrievalDriver;
+    return model_rd;
+  }
+  
+  return XmlDrivers::Factory (aGUID);
+}
+
+PLUGIN(XmlXCAFDrivers)

src/XmlXCAFDrivers/XmlXCAFDrivers_DocumentRetrievalDriver.cdl

@@ -0,0 +1,22 @@
+-- File:      XmlXCAFDrivers_DocumentRetrievalDriver.cdl
+-- Created:   11.09.01 11:50:20
+-- Author:    Julia DOROVSKIKH
+-- Copyright: Open Cascade 2001
+
+
+class DocumentRetrievalDriver from XmlXCAFDrivers 
+inherits DocumentRetrievalDriver from XmlDrivers
+
+        ---Purpose: retrieval driver of a XS document
+
+uses
+    ADriverTable  from XmlMDF,
+    MessageDriver from CDM
+
+is
+    Create returns mutable DocumentRetrievalDriver from XmlXCAFDrivers;    
+
+    AttributeDrivers(me : mutable; theMsgDriver: MessageDriver from CDM)
+    returns ADriverTable from XmlMDF is redefined;
+
+end DocumentRetrievalDriver;

src/XmlXCAFDrivers/XmlXCAFDrivers_DocumentRetrievalDriver.cxx

@@ -0,0 +1,35 @@
+// File:      XmlXCAFDrivers_DocumentRetrievalDriver.cxx
+// Created:   11.09.01 11:50:20
+// Author:    Julia DOROVSKIKH
+// Copyright: Open Cascade 2001
+// History:
+
+#include <XmlXCAFDrivers_DocumentRetrievalDriver.ixx>
+
+#include <XmlDrivers.hxx>
+#include <XmlMXCAFDoc.hxx>
+
+//=======================================================================
+//function : XmlXCAFDrivers_DocumentRetrievalDriver
+//purpose  : 
+//=======================================================================
+XmlXCAFDrivers_DocumentRetrievalDriver::XmlXCAFDrivers_DocumentRetrievalDriver()
+{
+}
+
+//=======================================================================
+//function : AttributeDrivers
+//purpose  : 
+//=======================================================================
+Handle(XmlMDF_ADriverTable)
+        XmlXCAFDrivers_DocumentRetrievalDriver::AttributeDrivers
+                        (const Handle(CDM_MessageDriver)& theMsgDrv) 
+{ 
+  // Standard drivers
+  Handle(XmlMDF_ADriverTable) aTable = XmlDrivers::AttributeDrivers (theMsgDrv);
+
+  // Native drivers
+  XmlMXCAFDoc::AddDrivers(aTable, theMsgDrv);
+
+  return aTable;
+}

src/XmlXCAFDrivers/XmlXCAFDrivers_DocumentStorageDriver.cdl

@@ -0,0 +1,24 @@
+-- File:      XmlXCAFDrivers_DocumentStorageDriver.cdl
+-- Created:   11.09.01 11:50:20
+-- Author:    Julia DOROVSKIKH
+-- Copyright: Open Cascade 2001
+
+
+class DocumentStorageDriver from XmlXCAFDrivers 
+inherits DocumentStorageDriver from XmlDrivers
+                    
+        ---Purpose: storage driver of a  XS document
+                    
+uses
+    ExtendedString from TCollection,
+    ADriverTable    from XmlMDF,
+    MessageDriver   from CDM
+
+is
+    Create (theCopyright: ExtendedString from TCollection)
+        returns mutable DocumentStorageDriver from XmlXCAFDrivers;
+
+    AttributeDrivers(me : mutable; theMsgDriver: MessageDriver from CDM)
+    returns ADriverTable from XmlMDF is redefined;
+
+end DocumentStorageDriver;

src/XmlXCAFDrivers/XmlXCAFDrivers_DocumentStorageDriver.cxx

@@ -0,0 +1,38 @@
+// File:      XmlXCAFDrivers_DocumentStorageDriver.cxx
+// Created:   11.09.01 11:50:20
+// Author:    Julia DOROVSKIKH
+// Copyright: Open Cascade 2001
+// History:
+
+#include <XmlXCAFDrivers_DocumentStorageDriver.ixx>
+
+#include <XmlDrivers.hxx>
+#include <XmlMXCAFDoc.hxx>
+
+//=======================================================================
+//function : XmlXCAFDrivers_DocumentStorageDriver
+//purpose  : 
+//=======================================================================
+XmlXCAFDrivers_DocumentStorageDriver::XmlXCAFDrivers_DocumentStorageDriver
+                                (const TCollection_ExtendedString& theCopyright)
+     : XmlDrivers_DocumentStorageDriver (theCopyright)
+{
+  AddNamespace ("xcaf","http://www.opencascade.org/OCAF/XML/XCAF");
+}
+
+//=======================================================================
+//function : AttributeDrivers
+//purpose  : 
+//=======================================================================
+Handle(XmlMDF_ADriverTable)
+        XmlXCAFDrivers_DocumentStorageDriver::AttributeDrivers
+                        (const Handle(CDM_MessageDriver)& theMsgDrv) 
+{
+  // Standard drivers
+  Handle(XmlMDF_ADriverTable) aTable = XmlDrivers::AttributeDrivers (theMsgDrv);
+
+  // Native drivers
+  XmlMXCAFDoc::AddDrivers(aTable, theMsgDrv);
+
+  return aTable;
+}