1 // Created on: 2000-08-30
2 // Created by: data exchange team
3 // Copyright (c) 2000-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 <XCAFDoc_DocumentTool.ixx>
17 #include <TDataStd_Name.hxx>
18 #include <TDF_Data.hxx>
19 #include <TDF_Tool.hxx>
20 #include <TDataStd_TreeNode.hxx>
22 //=======================================================================
25 //=======================================================================
27 const Standard_GUID& XCAFDoc_DocumentTool::GetID()
29 static Standard_GUID DocumentToolID ("efd212ec-6dfd-11d4-b9c8-0060b0ee281b");
30 return DocumentToolID;
34 //=======================================================================
36 //purpose : Returns a reference id to find a tree node attribute at the root
38 //=======================================================================
40 static const Standard_GUID& GetDocumentToolRefID()
42 static Standard_GUID DocumentToolRefID ("efd212eb-6dfd-11d4-b9c8-0060b0ee281b");
43 return DocumentToolRefID;
48 //=======================================================================
51 //=======================================================================
53 Handle(XCAFDoc_DocumentTool) XCAFDoc_DocumentTool::Set(const TDF_Label& L,
54 const Standard_Boolean IsAcces)
56 Handle(XCAFDoc_DocumentTool) A;
57 TDF_Label aL = DocLabel (L);
58 if (!aL.FindAttribute (XCAFDoc_DocumentTool::GetID(), A)) {
62 A = new XCAFDoc_DocumentTool;
65 // set ShapeTool, ColorTool and LayerTool attributes
66 XCAFDoc_ShapeTool::Set(ShapesLabel(L));
67 XCAFDoc_ColorTool::Set(ColorsLabel(L));
68 XCAFDoc_LayerTool::Set(LayersLabel(L));
69 XCAFDoc_DimTolTool::Set(DGTsLabel(L));
70 XCAFDoc_MaterialTool::Set(MaterialsLabel(L));
76 //=======================================================================
79 //=======================================================================
81 TDF_Label XCAFDoc_DocumentTool::DocLabel(const TDF_Label& acces)
83 TDF_Label DocL, RootL = acces.Root();
84 const Standard_GUID& aRefGuid = GetDocumentToolRefID();
85 Handle(TDataStd_TreeNode) aRootNode, aLabNode;
87 if (RootL.FindAttribute (aRefGuid, aRootNode)) {
88 aLabNode = aRootNode->First();
89 DocL = aLabNode->Label();
93 DocL = RootL.FindChild(1);
98 //=======================================================================
99 //function : Constructor
101 //=======================================================================
103 XCAFDoc_DocumentTool::XCAFDoc_DocumentTool()
108 //=======================================================================
109 //function : ShapesLabel
111 //=======================================================================
113 TDF_Label XCAFDoc_DocumentTool::ShapesLabel(const TDF_Label& acces)
115 TDF_Label L = DocLabel(acces).FindChild(1,Standard_True);
116 TDataStd_Name::Set(L, "Shapes");
121 //=======================================================================
122 //function : ColorsLabel
124 //=======================================================================
126 TDF_Label XCAFDoc_DocumentTool::ColorsLabel(const TDF_Label& acces)
128 TDF_Label L = DocLabel(acces).FindChild(2,Standard_True);
129 TDataStd_Name::Set(L, "Colors");
134 //=======================================================================
135 //function : LayersLabel
137 //=======================================================================
139 TDF_Label XCAFDoc_DocumentTool::LayersLabel(const TDF_Label& acces)
141 TDF_Label L = DocLabel(acces).FindChild(3,Standard_True);
142 TDataStd_Name::Set(L, "Layers");
147 //=======================================================================
148 //function : DGTsLabel
150 //=======================================================================
152 TDF_Label XCAFDoc_DocumentTool::DGTsLabel(const TDF_Label& acces)
154 TDF_Label L = DocLabel(acces).FindChild(4,Standard_True);
155 TDataStd_Name::Set(L, "D>s");
160 //=======================================================================
161 //function : MaterialsLabel
163 //=======================================================================
165 TDF_Label XCAFDoc_DocumentTool::MaterialsLabel(const TDF_Label& acces)
167 TDF_Label L = DocLabel(acces).FindChild(5,Standard_True);
168 TDataStd_Name::Set(L, "Materials");
173 //=======================================================================
174 //function : ShapeTool
176 //=======================================================================
178 Handle(XCAFDoc_ShapeTool) XCAFDoc_DocumentTool::ShapeTool(const TDF_Label& acces)
180 return XCAFDoc_ShapeTool::Set(ShapesLabel(acces));
184 //=======================================================================
185 //function : ColorTool
187 //=======================================================================
189 Handle(XCAFDoc_ColorTool) XCAFDoc_DocumentTool::ColorTool (const TDF_Label& acces)
191 return XCAFDoc_ColorTool::Set(ColorsLabel(acces));
195 //=======================================================================
196 //function : LayerTool
198 //=======================================================================
200 Handle(XCAFDoc_LayerTool) XCAFDoc_DocumentTool::LayerTool (const TDF_Label& acces)
202 return XCAFDoc_LayerTool::Set(LayersLabel(acces));
206 //=======================================================================
207 //function : DimTolTool
209 //=======================================================================
211 Handle(XCAFDoc_DimTolTool) XCAFDoc_DocumentTool::DimTolTool(const TDF_Label& acces)
213 return XCAFDoc_DimTolTool::Set(DGTsLabel(acces));
217 //=======================================================================
218 //function : MaterialTool
220 //=======================================================================
222 Handle(XCAFDoc_MaterialTool) XCAFDoc_DocumentTool::MaterialTool(const TDF_Label& acces)
224 return XCAFDoc_MaterialTool::Set(MaterialsLabel(acces));
228 //=======================================================================
231 //=======================================================================
233 const Standard_GUID& XCAFDoc_DocumentTool::ID() const
239 //=======================================================================
242 //=======================================================================
244 void XCAFDoc_DocumentTool::Restore(const Handle(TDF_Attribute)& /* with */)
249 //=======================================================================
250 //function : NewEmpty
252 //=======================================================================
254 Handle(TDF_Attribute) XCAFDoc_DocumentTool::NewEmpty() const
256 return new XCAFDoc_DocumentTool;
260 //=======================================================================
263 //=======================================================================
265 void XCAFDoc_DocumentTool::Paste (const Handle(TDF_Attribute)& /* into */,
266 const Handle(TDF_RelocationTable)& /* RT */) const
271 //=======================================================================
274 //=======================================================================
276 void XCAFDoc_DocumentTool::Init() const
278 TDF_Label DocL = Label(), RootL = DocL.Root();
279 const Standard_GUID& aRefGuid = GetDocumentToolRefID();
280 Handle(TDataStd_TreeNode) aRootNode, aLabNode;
282 if (!RootL.FindAttribute (aRefGuid, aRootNode)) {
283 Handle(TDataStd_TreeNode) aRootNode = TDataStd_TreeNode::Set (RootL, aRefGuid);
284 Handle(TDataStd_TreeNode) aLNode = TDataStd_TreeNode::Set (DocL, aRefGuid);
285 aLNode->SetFather (aRootNode);
286 aRootNode->SetFirst (aLNode);
291 //=======================================================================
292 //function : IsXCAFDocument
294 //=======================================================================
296 Standard_Boolean XCAFDoc_DocumentTool::IsXCAFDocument(const Handle(TDocStd_Document)& D)
298 TDF_Label RootL = D->Main().Root();
299 const Standard_GUID& aRefGuid = GetDocumentToolRefID();
300 Handle(TDataStd_TreeNode) aRootNode;
301 return RootL.FindAttribute (aRefGuid, aRootNode);
305 //=======================================================================
307 //purpose : No longer required. Kept for binary compatibility only.
308 //=======================================================================
310 void XCAFDoc_DocumentTool::Destroy()