1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
occt/src/XmlMDataStd/XmlMDataStd_IntPackedMapDriver.cxx
abv 0797d9d30a 0025418: Debug output to be limited to OCC development environment
Macros ending on "DEB" are replaced by OCCT_DEBUG across OCCT code; new macros described in documentation.
Macros starting with DEB are changed to start with "OCCT_DEBUG_".
Some code cleaned.
2014-11-05 16:55:24 +03:00

167 lines
6.2 KiB
C++

// Created on: 2007-08-22
// Created by: Sergey ZARITCHNY
// Copyright (c) 2007-2014 OPEN CASCADE SAS
//
// This file is part of Open CASCADE Technology software library.
//
// This library is free software; you can redistribute it and/or modify it under
// the terms of the GNU Lesser General Public License version 2.1 as published
// by the Free Software Foundation, with special exception defined in the file
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
// distribution for complete text of the license and disclaimer of any warranty.
//
// Alternatively, this file may be used under the terms of Open CASCADE
// commercial license or contractual agreement.
#include <XmlMDataStd_IntPackedMapDriver.ixx>
#include <XmlObjMgt.hxx>
#include <XmlObjMgt_RRelocationTable.hxx>
#include <XmlObjMgt_SRelocationTable.hxx>
#include <CDM_MessageDriver.hxx>
#include <TColStd_PackedMapOfInteger.hxx>
#include <TColStd_HPackedMapOfInteger.hxx>
#include <TColStd_MapIteratorOfPackedMapOfInteger.hxx>
#include <XmlMDF_ADriver.hxx>
#include <TDF_Attribute.hxx>
#include <TDataStd_IntPackedMap.hxx>
#include <NCollection_LocalArray.hxx>
#include <XmlMDataStd.hxx>
IMPLEMENT_DOMSTRING (IntPackedMapSize, "mapsize")
IMPLEMENT_DOMSTRING (IsDeltaOn, "delta")
//=======================================================================
//function : XmlMDataStd_IntPackedMapDriver
//purpose : Constructor
//=======================================================================
XmlMDataStd_IntPackedMapDriver::XmlMDataStd_IntPackedMapDriver
(const Handle(CDM_MessageDriver)& theMsgDriver)
: XmlMDF_ADriver (theMsgDriver, STANDARD_TYPE(TDataStd_IntPackedMap)->Name())
{}
//=======================================================================
//function : NewEmpty()
//purpose :
//=======================================================================
Handle(TDF_Attribute) XmlMDataStd_IntPackedMapDriver::NewEmpty () const
{
return (new TDataStd_IntPackedMap());
}
//=======================================================================
//function : Paste()
//purpose : persistent -> transient (retrieve)
//=======================================================================
Standard_Boolean XmlMDataStd_IntPackedMapDriver::Paste
(const XmlObjMgt_Persistent& theSource,
const Handle(TDF_Attribute)& theTarget,
XmlObjMgt_RRelocationTable& ) const
{
Handle(TDataStd_IntPackedMap) aPackedMap =
Handle(TDataStd_IntPackedMap)::DownCast(theTarget);
if(!aPackedMap.IsNull()) {
Standard_Integer aSize;
const XmlObjMgt_Element& anElement = theSource;
XmlObjMgt_DOMString aSizeDStr = anElement.getAttribute(::IntPackedMapSize());
if(aSizeDStr == NULL)
aSize = 0;
else if (!aSizeDStr.GetInteger(aSize)) {
TCollection_ExtendedString aMessageString =
TCollection_ExtendedString("Cannot retrieve the Map size"
" for IntPackedMap attribute as \"")
+ aSize + "\"";
WriteMessage (aMessageString);
return Standard_False;
}
Handle(TColStd_HPackedMapOfInteger) aHMap = new TColStd_HPackedMapOfInteger ();
Standard_Boolean Ok = Standard_True;
if(aSize) {
Standard_CString aValueString =
Standard_CString(XmlObjMgt::GetStringValue(anElement).GetString());
// Handle(TColStd_HPackedMapOfInteger) aHMap = new TColStd_HPackedMapOfInteger ();
for (Standard_Integer i = 1; i <= aSize; i++) {
Standard_Integer aValue;
if (!XmlObjMgt::GetInteger(aValueString, aValue)) {
Ok = Standard_False; break;
}
if(!aHMap->ChangeMap().Add( aValue )) {
Ok = Standard_False; break;
}
}
if(!Ok) {
TCollection_ExtendedString aMessageString =
TCollection_ExtendedString("Cannot retrieve integer member"
" for IntPackedMap attribute as \"")
+ aValueString + "\"";
WriteMessage (aMessageString);
return Standard_False;
}
if(aPackedMap->ChangeMap(aHMap))
Ok = Standard_True;
}
if(Ok) {
Standard_Boolean aDelta(Standard_False);
if(XmlMDataStd::DocumentVersion() > 2) {
Standard_Integer aDeltaValue;
if (!anElement.getAttribute(::IsDeltaOn()).GetInteger(aDeltaValue))
{
TCollection_ExtendedString aMessageString =
TCollection_ExtendedString("Cannot retrieve the isDelta value"
" for IntPackedMap attribute as \"")
+ aDeltaValue + "\"";
WriteMessage (aMessageString);
return Standard_False;
}
else
aDelta = (Standard_Boolean)aDeltaValue;
}
#ifdef OCCT_DEBUG
else if(XmlMDataStd::DocumentVersion() == -1)
cout << "Current DocVersion field is not initialized. " <<endl;
#endif
aPackedMap->SetDelta(aDelta);
return Standard_True;
}
}
WriteMessage("error retrieving Map for type TDataStd_IntPackedMap");
return Standard_False;
}
//=======================================================================
//function : Paste()
//purpose : transient -> persistent (store)
//=======================================================================
void XmlMDataStd_IntPackedMapDriver::Paste (const Handle(TDF_Attribute)& theSource,
XmlObjMgt_Persistent& theTarget,
XmlObjMgt_SRelocationTable& ) const
{
Handle(TDataStd_IntPackedMap) aS = Handle(TDataStd_IntPackedMap)::DownCast(theSource);
if (aS.IsNull()) {
WriteMessage ("IntPackedMapDriver:: The source attribute is Null.");
return;
}
Standard_Integer aSize = (aS->IsEmpty()) ? 0 : aS->Extent();
theTarget.Element().setAttribute(::IntPackedMapSize(), aSize);
theTarget.Element().setAttribute(::IsDeltaOn(),aS->GetDelta());
if(aSize)
{
// Allocation of 12 chars for each integer including the space.
// An example: -2 147 483 648
Standard_Integer iChar = 0;
NCollection_LocalArray<Standard_Character> str(12 * aSize + 1);
TColStd_MapIteratorOfPackedMapOfInteger anIt(aS->GetMap());
for(;anIt.More();anIt.Next())
{
const Standard_Integer intValue = anIt.Key();
iChar += Sprintf(&(str[iChar]), "%d ", intValue);
}
// No occurrence of '&', '<' and other irregular XML characters
XmlObjMgt::SetStringValue (theTarget, (Standard_Character*)str, Standard_True);
}
}