1 // Created on: 2001-08-24
2 // Created by: Alexnder GRIGORIEV
3 // Copyright (c) 2001-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.
17 #include <Message_Messenger.hxx>
18 #include <NCollection_LocalArray.hxx>
19 #include <Standard_Type.hxx>
20 #include <TDataStd_TreeNode.hxx>
21 #include <TDF_Attribute.hxx>
22 #include <TDocStd_FormatVersion.hxx>
23 #include <XmlMDataStd_TreeNodeDriver.hxx>
24 #include <XmlObjMgt.hxx>
25 #include <XmlObjMgt_Persistent.hxx>
26 #include <XmlLDrivers.hxx>
28 IMPLEMENT_STANDARD_RTTIEXT(XmlMDataStd_TreeNodeDriver,XmlMDF_ADriver)
29 IMPLEMENT_DOMSTRING (TreeIdString, "treeid")
30 IMPLEMENT_DOMSTRING (ChildrenString, "children")
32 //=======================================================================
33 //function : XmlMDataStd_TreeNodeDriver
34 //purpose : Constructor
35 //=======================================================================
37 XmlMDataStd_TreeNodeDriver::XmlMDataStd_TreeNodeDriver
38 (const Handle(Message_Messenger)& theMsgDriver)
39 : XmlMDF_ADriver (theMsgDriver, NULL)
42 //=======================================================================
45 //=======================================================================
46 Handle(TDF_Attribute) XmlMDataStd_TreeNodeDriver::NewEmpty() const
48 return (new TDataStd_TreeNode());
51 //=======================================================================
54 //=======================================================================
55 Standard_Boolean XmlMDataStd_TreeNodeDriver::Paste
56 (const XmlObjMgt_Persistent& theSource,
57 const Handle(TDF_Attribute)& theTarget,
58 XmlObjMgt_RRelocationTable& theRelocTable) const
60 Handle(TDataStd_TreeNode) aT = Handle(TDataStd_TreeNode)::DownCast(theTarget);
61 const XmlObjMgt_Element& anElement = theSource;
65 XmlObjMgt_DOMString aGUIDStr = anElement.getAttribute(::TreeIdString());
66 if (aGUIDStr.Type() == XmlObjMgt_DOMString::LDOM_NULL)
67 aGUID = TDataStd_TreeNode::GetDefaultTreeID();
69 aGUID = Standard_GUID(Standard_CString(aGUIDStr.GetString()));
73 Handle(TDataStd_TreeNode) aTChild;
75 XmlObjMgt_DOMString aChildrenStr = anElement.getAttribute(::ChildrenString());
76 if (aChildrenStr != NULL) // void list is allowed
78 Standard_CString aChildren = Standard_CString(aChildrenStr.GetString());
79 Standard_Integer aNb = 0;
80 if (!XmlObjMgt::GetInteger(aChildren, aNb)) return Standard_False;
84 // Find or create TreeNode attribute with the given ID
85 if (theRelocTable.IsBound(aNb))
87 aTChild = Handle(TDataStd_TreeNode)::DownCast(theRelocTable.Find(aNb));
89 return Standard_False;
93 aTChild = new TDataStd_TreeNode;
94 theRelocTable.Bind(aNb, aTChild);
97 // Add the child to the current tree
98 aTChild->SetTreeID(aGUID);
102 if (!XmlObjMgt::GetInteger(aChildren, aNb)) aNb = 0;
105 return Standard_True;
108 //=======================================================================
111 //=======================================================================
112 void XmlMDataStd_TreeNodeDriver::Paste
113 (const Handle(TDF_Attribute)& theSource,
114 XmlObjMgt_Persistent& theTarget,
115 XmlObjMgt_SRelocationTable& theRelocTable) const
117 Handle(TDataStd_TreeNode) aS = Handle(TDataStd_TreeNode)::DownCast(theSource);
120 // A not default ID is skipped for storage version 8 and newer.
121 if (aS->ID() != TDataStd_TreeNode::GetDefaultTreeID() ||
122 theRelocTable.GetHeaderData()->StorageVersion().IntegerValue() < TDocStd_FormatVersion_VERSION_8)
124 Standard_Character aGuidStr [40];
125 Standard_PCharacter pGuidStr=aGuidStr;
126 aS->ID().ToCString (pGuidStr);
127 theTarget.Element().setAttribute(::TreeIdString(), aGuidStr);
130 // Find number of children.
131 int nbChildren = aS->NbChildren();
133 // Allocate 11 digits for each ID (an integer) of the child + a space.
134 Standard_Integer iChar = 0;
135 NCollection_LocalArray<Standard_Character> str;
137 str.Allocate(11 * nbChildren + 1);
139 // form the string of numbers for the list of children
140 Handle(TDataStd_TreeNode) aF = aS->First();
143 Standard_Integer aNb = theRelocTable.FindIndex(aF);
146 aNb = theRelocTable.Add(aF);
149 // Add number to the long string.
150 iChar += Sprintf(&(str[iChar]), "%d ", aNb);
158 theTarget.Element().setAttribute(::ChildrenString(), (Standard_Character*)str);