mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-04 13:13:25 +03:00
0029452: Application Framework - Failed to read an Ocaf XML document with 1.#QNAN value.
Method XmlObjMgt::GetReal() is improved to (a) recognize NAN and infinity written by old MSVC runtime (like 1.#QNAN and 1.#INF) and (b) detect situation when there are some trailing non-space symbols after the real value, returning False in such case. Reading of real-valued attributes (single real, array, list) from OCAF XML format is improved to create valid attribute even if parsing of (some) members fails; warning is generated instead of error in such case. Added test bugs caf bug29452
This commit is contained in:
@@ -62,10 +62,21 @@ Standard_Boolean XmlMDataStd_RealArrayDriver::Paste
|
||||
const Handle(TDF_Attribute)& theTarget,
|
||||
XmlObjMgt_RRelocationTable& ) const
|
||||
{
|
||||
Standard_Integer aFirstInd, aLastInd, ind;
|
||||
Standard_Real aValue;
|
||||
|
||||
Handle(TDataStd_RealArray) aRealArray = Handle(TDataStd_RealArray)::DownCast(theTarget);
|
||||
const XmlObjMgt_Element& anElement = theSource;
|
||||
|
||||
// attribute id
|
||||
Standard_GUID aGUID;
|
||||
XmlObjMgt_DOMString aGUIDStr = anElement.getAttribute(::AttributeIDString());
|
||||
if (aGUIDStr.Type() == XmlObjMgt_DOMString::LDOM_NULL)
|
||||
aGUID = TDataStd_RealArray::GetID(); //default case
|
||||
else
|
||||
aGUID = Standard_GUID(Standard_CString(aGUIDStr.GetString())); // user defined case
|
||||
aRealArray->SetID(aGUID);
|
||||
|
||||
Standard_Integer aFirstInd, aLastInd, ind;
|
||||
|
||||
// Read the FirstIndex; if the attribute is absent initialize to 1
|
||||
XmlObjMgt_DOMString aFirstIndex= anElement.getAttribute(::FirstIndexString());
|
||||
if (aFirstIndex == NULL)
|
||||
@@ -89,8 +100,6 @@ Standard_Boolean XmlMDataStd_RealArrayDriver::Paste
|
||||
return Standard_False;
|
||||
}
|
||||
|
||||
Handle(TDataStd_RealArray) aRealArray =
|
||||
Handle(TDataStd_RealArray)::DownCast(theTarget);
|
||||
aRealArray->Init(aFirstInd, aLastInd);
|
||||
|
||||
// Check the type of LDOMString
|
||||
@@ -109,6 +118,7 @@ Standard_Boolean XmlMDataStd_RealArrayDriver::Paste
|
||||
return Standard_False;
|
||||
}
|
||||
} else {
|
||||
Standard_Real aValue;
|
||||
Standard_CString aValueStr = Standard_CString(aString.GetString());
|
||||
for (ind = aFirstInd; ind <= aLastInd; ind++)
|
||||
{
|
||||
@@ -117,8 +127,9 @@ Standard_Boolean XmlMDataStd_RealArrayDriver::Paste
|
||||
TCollection_ExtendedString("Cannot retrieve real member"
|
||||
" for RealArray attribute as \"")
|
||||
+ aValueStr + "\"";
|
||||
myMessageDriver->Send (aMessageString, Message_Fail);
|
||||
return Standard_False;
|
||||
myMessageDriver->Send (aMessageString, Message_Warning);
|
||||
// skip to the next space separator
|
||||
while (*aValueStr != 0 && ! IsSpace (*aValueStr)) ++aValueStr;
|
||||
}
|
||||
aRealArray->SetValue(ind, aValue);
|
||||
}
|
||||
@@ -145,15 +156,6 @@ Standard_Boolean XmlMDataStd_RealArrayDriver::Paste
|
||||
#endif
|
||||
aRealArray->SetDelta(aDelta);
|
||||
|
||||
// attribute id
|
||||
Standard_GUID aGUID;
|
||||
XmlObjMgt_DOMString aGUIDStr = anElement.getAttribute(::AttributeIDString());
|
||||
if (aGUIDStr.Type() == XmlObjMgt_DOMString::LDOM_NULL)
|
||||
aGUID = TDataStd_RealArray::GetID(); //default case
|
||||
else
|
||||
aGUID = Standard_GUID(Standard_CString(aGUIDStr.GetString())); // user defined case
|
||||
|
||||
aRealArray->SetID(aGUID);
|
||||
return Standard_True;
|
||||
}
|
||||
|
||||
|
@@ -53,20 +53,6 @@ Standard_Boolean XmlMDataStd_RealDriver::Paste
|
||||
const Handle(TDF_Attribute)& theTarget,
|
||||
XmlObjMgt_RRelocationTable& ) const
|
||||
{
|
||||
Standard_Real aValue;
|
||||
XmlObjMgt_DOMString aRealStr= XmlObjMgt::GetStringValue (theSource);
|
||||
|
||||
if (XmlObjMgt::GetReal(aRealStr, aValue) == Standard_False) {
|
||||
TCollection_ExtendedString aMessageString =
|
||||
TCollection_ExtendedString("Cannot retrieve Real attribute from \"")
|
||||
+ aRealStr + "\"";
|
||||
myMessageDriver->Send (aMessageString, Message_Fail);
|
||||
return Standard_False;
|
||||
}
|
||||
|
||||
Handle(TDataStd_Real) anAtt = Handle(TDataStd_Real)::DownCast(theTarget);
|
||||
anAtt->Set(aValue);
|
||||
|
||||
// attribute id
|
||||
Standard_GUID aGUID;
|
||||
const XmlObjMgt_Element& anElement = theSource;
|
||||
@@ -78,6 +64,18 @@ Standard_Boolean XmlMDataStd_RealDriver::Paste
|
||||
|
||||
Handle(TDataStd_Real)::DownCast(theTarget)->SetID(aGUID);
|
||||
|
||||
Standard_Real aValue(0.);
|
||||
const XmlObjMgt_DOMString& aRealStr= XmlObjMgt::GetStringValue (theSource);
|
||||
Standard_CString aValueStr = Standard_CString (aRealStr.GetString());
|
||||
if(XmlObjMgt::GetReal(aRealStr, aValue) == Standard_False) {
|
||||
TCollection_ExtendedString aMessageString =
|
||||
TCollection_ExtendedString("Cannot retrieve Real attribute from \"")
|
||||
+ aValueStr + "\"";
|
||||
myMessageDriver->Send (aMessageString, Message_Warning);
|
||||
}
|
||||
Handle(TDataStd_Real) anAtt = Handle(TDataStd_Real)::DownCast(theTarget);
|
||||
anAtt->Set(aValue);
|
||||
|
||||
return Standard_True;
|
||||
}
|
||||
|
||||
|
@@ -55,11 +55,20 @@ Standard_Boolean XmlMDataStd_RealListDriver::Paste(const XmlObjMgt_Persistent&
|
||||
const Handle(TDF_Attribute)& theTarget,
|
||||
XmlObjMgt_RRelocationTable& ) const
|
||||
{
|
||||
Standard_Real aValue;
|
||||
Standard_Integer aFirstInd, aLastInd, ind;
|
||||
const Handle(TDataStd_RealList) aRealList = Handle(TDataStd_RealList)::DownCast(theTarget);
|
||||
const XmlObjMgt_Element& anElement = theSource;
|
||||
|
||||
// attribute id
|
||||
Standard_GUID aGUID;
|
||||
XmlObjMgt_DOMString aGUIDStr = anElement.getAttribute(::AttributeIDString());
|
||||
if (aGUIDStr.Type() == XmlObjMgt_DOMString::LDOM_NULL)
|
||||
aGUID = TDataStd_RealList::GetID(); //default case
|
||||
else
|
||||
aGUID = Standard_GUID(Standard_CString(aGUIDStr.GetString())); // user defined case
|
||||
aRealList->SetID(aGUID);
|
||||
|
||||
// Read the FirstIndex; if the attribute is absent initialize to 1
|
||||
Standard_Integer aFirstInd, aLastInd, ind;
|
||||
XmlObjMgt_DOMString aFirstIndex= anElement.getAttribute(::FirstIndexString());
|
||||
if (aFirstIndex == NULL)
|
||||
aFirstInd = 1;
|
||||
@@ -84,7 +93,6 @@ Standard_Boolean XmlMDataStd_RealListDriver::Paste(const XmlObjMgt_Persistent&
|
||||
return Standard_False;
|
||||
}
|
||||
|
||||
const Handle(TDataStd_RealList) aRealList = Handle(TDataStd_RealList)::DownCast(theTarget);
|
||||
// Check the type of LDOMString
|
||||
const XmlObjMgt_DOMString& aString = XmlObjMgt::GetStringValue(anElement);
|
||||
if(aLastInd == 0) aFirstInd = 0;
|
||||
@@ -111,28 +119,20 @@ Standard_Boolean XmlMDataStd_RealListDriver::Paste(const XmlObjMgt_Persistent&
|
||||
Standard_CString aValueStr = Standard_CString(aString.GetString());
|
||||
for (ind = aFirstInd; ind <= aLastInd; ind++)
|
||||
{
|
||||
Standard_Real aValue;
|
||||
if (!XmlObjMgt::GetReal(aValueStr, aValue)) {
|
||||
TCollection_ExtendedString aMessageString =
|
||||
TCollection_ExtendedString("Cannot retrieve real member"
|
||||
" for RealList attribute as \"")
|
||||
+ aValueStr + "\"";
|
||||
myMessageDriver->Send (aMessageString, Message_Fail);
|
||||
return Standard_False;
|
||||
myMessageDriver->Send(aMessageString, Message_Warning);
|
||||
// skip to the next space separator
|
||||
while (*aValueStr != 0 && ! IsSpace (*aValueStr)) ++aValueStr;
|
||||
}
|
||||
aRealList->Append(aValue);
|
||||
}
|
||||
}
|
||||
|
||||
// attribute id
|
||||
Standard_GUID aGUID;
|
||||
XmlObjMgt_DOMString aGUIDStr = anElement.getAttribute(::AttributeIDString());
|
||||
if (aGUIDStr.Type() == XmlObjMgt_DOMString::LDOM_NULL)
|
||||
aGUID = TDataStd_RealList::GetID(); //default case
|
||||
else
|
||||
aGUID = Standard_GUID(Standard_CString(aGUIDStr.GetString())); // user defined case
|
||||
|
||||
aRealList->SetID(aGUID);
|
||||
|
||||
return Standard_True;
|
||||
}
|
||||
|
||||
|
Reference in New Issue
Block a user