0028446: Could not retrieve just kept document with Integer attribute
[occt.git] / src / TDataStd / TDataStd_Integer.cxx
1 // Created on: 1997-03-06
2 // Created by: Denis PASCAL
3 // Copyright (c) 1997-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
5 //
6 // This file is part of Open CASCADE Technology software library.
7 //
8 // This library is free software; you can redistribute it and/or modify it under
9 // the terms of the GNU Lesser General Public License version 2.1 as published
10 // by the Free Software Foundation, with special exception defined in the file
11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 // distribution for complete text of the license and disclaimer of any warranty.
13 //
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
16
17
18 #include <Standard_GUID.hxx>
19 #include <Standard_Type.hxx>
20 #include <TDataStd_Integer.hxx>
21 #include <TDF_Attribute.hxx>
22 #include <TDF_Label.hxx>
23 #include <TDF_Reference.hxx>
24 #include <TDF_RelocationTable.hxx>
25
26 IMPLEMENT_STANDARD_RTTIEXT(TDataStd_Integer,TDF_Attribute)
27
28 //=======================================================================
29 //function : GetID
30 //purpose  : 
31 //=======================================================================
32 const Standard_GUID& TDataStd_Integer::GetID() 
33
34   static Standard_GUID TDataStd_IntegerID ("2a96b606-ec8b-11d0-bee7-080009dc3333");
35   return TDataStd_IntegerID; 
36 }
37
38 //=======================================================================
39 //function : SetAttr
40 //purpose  : Implements Set functionality
41 //=======================================================================
42 static Handle(TDataStd_Integer) SetAttr(const TDF_Label&     label,
43                                         const Standard_Integer  V,
44                                         const Standard_GUID& theGuid)
45 {
46   Handle(TDataStd_Integer) A;
47   if (!label.FindAttribute(theGuid, A)) {
48     A = new TDataStd_Integer ();
49     A->SetID(theGuid);
50     label.AddAttribute(A);
51   }
52   A->Set (V); 
53   return A;
54 }
55
56 //=======================================================================
57 //function : Set
58 //purpose  : 
59 //=======================================================================
60
61 Handle(TDataStd_Integer) TDataStd_Integer::Set (const TDF_Label&        L,
62                                                 const Standard_Integer  V) 
63
64 {
65   return SetAttr(L, V, GetID());
66 }
67
68 //=======================================================================
69 //function : Set
70 //purpose  : Set user defined attribute
71 //=======================================================================
72
73 Handle(TDataStd_Integer) TDataStd_Integer::Set (const TDF_Label&    L,
74                                                 const Standard_GUID& theGuid,
75                                                 const Standard_Integer V) 
76 {
77   return SetAttr(L, V, theGuid);
78 }
79 //=======================================================================
80 //function : TDataStd_Integer
81 //purpose  : Empty Constructor
82 //=======================================================================
83
84 TDataStd_Integer::TDataStd_Integer ()
85      : myValue (-1)
86  { }
87
88
89 //=======================================================================
90 //function : Set
91 //purpose  : 
92 //=======================================================================
93
94 void TDataStd_Integer::Set(const Standard_Integer v) 
95 {
96   // OCC2932 correction
97   if(myValue == v) return;
98
99   Backup();
100   myValue = v;
101 }
102
103
104 //=======================================================================
105 //function : Get
106 //purpose  : 
107 //=======================================================================
108
109 Standard_Integer TDataStd_Integer::Get () const { return myValue; }
110
111
112 //=======================================================================
113 //function : IsCaptured
114 //purpose  : 
115 //=======================================================================
116
117 Standard_Boolean TDataStd_Integer::IsCaptured() const
118 {
119   Handle(TDF_Reference) R;
120   return (Label().FindAttribute(TDF_Reference::GetID(),R));
121 }
122
123 //=======================================================================
124 //function : ID
125 //purpose  : 
126 //=======================================================================
127
128 const Standard_GUID& TDataStd_Integer::ID () const { return myID; }
129
130 //=======================================================================
131 //function : SetID
132 //purpose  :
133 //=======================================================================
134
135 void TDataStd_Integer::SetID( const Standard_GUID&  theGuid)
136 {  
137   if(myID == theGuid) return;
138
139   Backup();
140   myID = theGuid;
141 }
142
143 //=======================================================================
144 //function : SetID
145 //purpose  : sets default ID
146 //=======================================================================
147 void TDataStd_Integer::SetID()
148 {
149   Backup();
150   myID = GetID();
151 }
152
153 //=======================================================================
154 //function : NewEmpty
155 //purpose  : 
156 //=======================================================================
157
158 Handle(TDF_Attribute) TDataStd_Integer::NewEmpty () const
159 {
160   return new TDataStd_Integer();
161 }
162
163 //=======================================================================
164 //function : Restore
165 //purpose  : 
166 //=======================================================================
167
168 void TDataStd_Integer::Restore(const Handle(TDF_Attribute)& With) 
169 {
170   Handle(TDataStd_Integer) anInt = Handle(TDataStd_Integer)::DownCast (With);
171   myValue = anInt->Get();
172   myID = anInt->ID();
173 }
174
175 //=======================================================================
176 //function : Paste
177 //purpose  : 
178 //=======================================================================
179
180 void TDataStd_Integer::Paste (const Handle(TDF_Attribute)& Into,
181                               const Handle(TDF_RelocationTable)& /*RT*/) const
182 {
183   Handle(TDataStd_Integer) anInt = Handle(TDataStd_Integer)::DownCast (Into);
184   anInt->Set(myValue);
185   anInt->SetID(myID);
186 }
187
188 //=======================================================================
189 //function : Dump
190 //purpose  : 
191 //=======================================================================
192
193 Standard_OStream& TDataStd_Integer::Dump (Standard_OStream& anOS) const
194 {  
195   anOS << "Integer:: "<< this <<" : ";
196   anOS << myValue; 
197   Standard_Character sguid[Standard_GUID_SIZE_ALLOC];
198   myID.ToCString(sguid);
199   anOS << sguid;
200 //
201   anOS <<"\nAttribute fields: ";
202   TDF_Attribute::Dump(anOS);
203   return anOS;
204 }
205