b311480e |
1 | // Created on: 2001-08-24 |
2 | // Created by: Alexnder GRIGORIEV |
973c2be1 |
3 | // Copyright (c) 2001-2014 OPEN CASCADE SAS |
b311480e |
4 | // |
973c2be1 |
5 | // This file is part of Open CASCADE Technology software library. |
b311480e |
6 | // |
d5f74e42 |
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 |
973c2be1 |
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. |
b311480e |
12 | // |
973c2be1 |
13 | // Alternatively, this file may be used under the terms of Open CASCADE |
14 | // commercial license or contractual agreement. |
b311480e |
15 | |
16 | //AGV 150202: Changed prototype XmlObjMgt::SetStringValue() |
7fd59977 |
17 | |
7fd59977 |
18 | # include <stdio.h> |
19 | #include <XmlMDataStd_RealArrayDriver.ixx> |
20 | #include <TDataStd_RealArray.hxx> |
21 | #include <XmlObjMgt.hxx> |
22 | #include <XmlMDataStd.hxx> |
f7b4312f |
23 | #include <TColStd_HArray1OfReal.hxx> |
24 | #include <NCollection_LocalArray.hxx> |
7fd59977 |
25 | |
26 | IMPLEMENT_DOMSTRING (FirstIndexString, "first") |
27 | IMPLEMENT_DOMSTRING (LastIndexString, "last") |
28 | IMPLEMENT_DOMSTRING (IsDeltaOn, "delta") |
29 | |
30 | //======================================================================= |
31 | //function : XmlMDataStd_RealArrayDriver |
32 | //purpose : Constructor |
33 | //======================================================================= |
34 | |
35 | XmlMDataStd_RealArrayDriver::XmlMDataStd_RealArrayDriver |
36 | (const Handle(CDM_MessageDriver)& theMsgDriver) |
37 | : XmlMDF_ADriver (theMsgDriver, NULL) |
38 | {} |
39 | |
40 | //======================================================================= |
41 | //function : NewEmpty |
42 | //purpose : |
43 | //======================================================================= |
44 | Handle(TDF_Attribute) XmlMDataStd_RealArrayDriver::NewEmpty() const |
45 | { |
46 | return (new TDataStd_RealArray()); |
47 | } |
48 | |
49 | //======================================================================= |
50 | //function : Paste |
51 | //purpose : persistent -> transient (retrieve) |
52 | //======================================================================= |
53 | Standard_Boolean XmlMDataStd_RealArrayDriver::Paste |
54 | (const XmlObjMgt_Persistent& theSource, |
55 | const Handle(TDF_Attribute)& theTarget, |
56 | XmlObjMgt_RRelocationTable& ) const |
57 | { |
58 | Standard_Integer aFirstInd, aLastInd, ind; |
59 | Standard_Real aValue; |
60 | const XmlObjMgt_Element& anElement = theSource; |
61 | |
62 | // Read the FirstIndex; if the attribute is absent initialize to 1 |
63 | XmlObjMgt_DOMString aFirstIndex= anElement.getAttribute(::FirstIndexString()); |
64 | if (aFirstIndex == NULL) |
65 | aFirstInd = 1; |
66 | else if (!aFirstIndex.GetInteger(aFirstInd)) { |
67 | TCollection_ExtendedString aMessageString = |
68 | TCollection_ExtendedString("Cannot retrieve the first index" |
69 | " for RealArray attribute as \"") |
70 | + aFirstIndex + "\""; |
71 | WriteMessage (aMessageString); |
72 | return Standard_False; |
73 | } |
74 | |
75 | // Read LastIndex; the attribute should be present |
76 | if (!anElement.getAttribute(::LastIndexString()).GetInteger(aLastInd)) { |
77 | TCollection_ExtendedString aMessageString = |
78 | TCollection_ExtendedString("Cannot retrieve the last index" |
79 | " for RealArray attribute as \"") |
80 | + aFirstIndex + "\""; |
81 | WriteMessage (aMessageString); |
82 | return Standard_False; |
83 | } |
84 | |
85 | Handle(TDataStd_RealArray) aRealArray = |
86 | Handle(TDataStd_RealArray)::DownCast(theTarget); |
87 | aRealArray->Init(aFirstInd, aLastInd); |
88 | |
89 | // Check the type of LDOMString |
90 | const XmlObjMgt_DOMString& aString = XmlObjMgt::GetStringValue(anElement); |
91 | if (aString.Type() == LDOMBasicString::LDOM_Integer) { |
92 | if (aFirstInd == aLastInd) { |
93 | Standard_Integer anIntValue; |
94 | if (aString.GetInteger(anIntValue)) |
95 | aRealArray -> SetValue (aFirstInd, Standard_Real(anIntValue)); |
96 | } else { |
97 | TCollection_ExtendedString aMessageString = |
98 | TCollection_ExtendedString("Cannot retrieve array of real members" |
99 | " for RealArray attribute from Integer \"") |
100 | + aString + "\""; |
101 | WriteMessage (aMessageString); |
102 | return Standard_False; |
103 | } |
104 | } else { |
105 | Standard_CString aValueStr = Standard_CString(aString.GetString()); |
106 | for (ind = aFirstInd; ind <= aLastInd; ind++) |
107 | { |
108 | if (!XmlObjMgt::GetReal(aValueStr, aValue)) { |
109 | TCollection_ExtendedString aMessageString = |
110 | TCollection_ExtendedString("Cannot retrieve real member" |
111 | " for RealArray attribute as \"") |
112 | + aValueStr + "\""; |
113 | WriteMessage (aMessageString); |
114 | return Standard_False; |
115 | } |
116 | aRealArray->SetValue(ind, aValue); |
117 | } |
118 | } |
119 | #ifdef DEB |
120 | //cout << "CurDocVersion = " << XmlMDataStd::DocumentVersion() <<endl; |
121 | #endif |
122 | Standard_Boolean aDelta(Standard_False); |
123 | |
124 | if(XmlMDataStd::DocumentVersion() > 2) { |
125 | Standard_Integer aDeltaValue; |
126 | if (!anElement.getAttribute(::IsDeltaOn()).GetInteger(aDeltaValue)) |
127 | { |
128 | TCollection_ExtendedString aMessageString = |
129 | TCollection_ExtendedString("Cannot retrieve the isDelta value" |
130 | " for RealArray attribute as \"") |
131 | + aDeltaValue + "\""; |
132 | WriteMessage (aMessageString); |
133 | return Standard_False; |
134 | } |
135 | else |
136 | aDelta = (Standard_Boolean)aDeltaValue; |
137 | } |
138 | #ifdef DEB |
139 | else if(XmlMDataStd::DocumentVersion() == -1) |
140 | cout << "Current DocVersion field is not initialized. " <<endl; |
141 | #endif |
142 | aRealArray->SetDelta(aDelta); |
143 | |
144 | return Standard_True; |
145 | } |
146 | |
147 | //======================================================================= |
148 | //function : Paste |
149 | //purpose : transient -> persistent (store) |
150 | //======================================================================= |
151 | void XmlMDataStd_RealArrayDriver::Paste (const Handle(TDF_Attribute)& theSource, |
152 | XmlObjMgt_Persistent& theTarget, |
153 | XmlObjMgt_SRelocationTable& ) const |
154 | { |
155 | Handle(TDataStd_RealArray) aRealArray = |
156 | Handle(TDataStd_RealArray)::DownCast(theSource); |
f7b4312f |
157 | const Handle(TColStd_HArray1OfReal)& hRealArray = aRealArray->Array(); |
158 | const TColStd_Array1OfReal& realArray = hRealArray->Array1(); |
159 | Standard_Integer aL = realArray.Lower(), anU = realArray.Upper(); |
7fd59977 |
160 | |
161 | if (aL != 1) theTarget.Element().setAttribute(::FirstIndexString(), aL); |
162 | theTarget.Element().setAttribute(::LastIndexString(), anU); |
163 | theTarget.Element().setAttribute(::IsDeltaOn(), aRealArray->GetDelta()); |
164 | |
f7b4312f |
165 | // Allocation of 25 chars for each double value including the space: |
166 | // An example: -3.1512678732195273e+020 |
167 | Standard_Integer iChar = 0; |
168 | NCollection_LocalArray<Standard_Character> str; |
169 | if (realArray.Length()) |
170 | str.Allocate(25 * realArray.Length() + 1); |
171 | |
7fd59977 |
172 | Standard_Integer i = aL; |
302f96fb |
173 | for (;;) |
f7b4312f |
174 | { |
302f96fb |
175 | iChar += Sprintf(&(str[iChar]), "%.17g ", realArray.Value(i)); |
f7b4312f |
176 | if (i >= anU) |
177 | break; |
7fd59977 |
178 | ++i; |
179 | } |
f7b4312f |
180 | |
7fd59977 |
181 | // No occurrence of '&', '<' and other irregular XML characters |
f7b4312f |
182 | if (realArray.Length()) |
183 | { |
184 | str[iChar - 1] = '\0'; |
185 | XmlObjMgt::SetStringValue (theTarget, (Standard_Character*)str, Standard_True); |
186 | } |
7fd59977 |
187 | } |