/*

www.sourceforge.net/projects/tinyxml

Original code (2.0 and earlier )copyright (c) 2000-2006 Lee Thomason (www.grinninglizard.com)

This software is provided 'as-is', without any express or implied

warranty. In no event will the authors be held liable for any

damages arising from the use of this software.

Permission is granted to anyone to use this software for any

purpose, including commercial applications, and to alter it and

redistribute it freely, subject to the following restrictions:

1. The origin of this software must not be misrepresented; you must

not claim that you wrote the original software. If you use this

software in a product, an acknowledgment in the product documentation

would be appreciated but is not required.

2. Altered source versions must be plainly marked as such, and

must not be misrepresented as being the original software.

3. This notice may not be removed or altered from any source

distribution.

*/

#include <ctype.h>

#ifdef TIXML_USE_STL

#include <sstream>

#include <iostream>

#endif

#include "tinyxml.h"

bool TiXmlBase::condenseWhiteSpace = true;

// Microsoft compiler security

OSFILE* TiXmlFOpen( const char* filename, const char* mode )

{

return OSBasics::open( filename, mode );

}

void TiXmlBase::EncodeString( const TIXML_STRING& str, TIXML_STRING* outString )

{

int i=0;

while( i<(int)str.length() )

{

unsigned char c = (unsigned char) str[i];

if ( c == '&'

&& i < ( (int)str.length() - 2 )

&& str[i+1] == '#'

&& str[i+2] == 'x' )

{

// Hexadecimal character reference.

// Pass through unchanged.

// &#xA9; -- copyright symbol, for example.

//

// The -1 is a bug fix from Rob Laveaux. It keeps

// an overflow from happening if there is no ';'.

// There are actually 2 ways to exit this loop -

// while fails (error case) and break (semicolon found).

// However, there is no mechanism (currently) for

// this function to return an error.

while ( i<(int)str.length()-1 )

{

outString->append( str.c_str() + i, 1 );

++i;

if ( str[i] == ';' )

break;

}

}

else if ( c == '&' )

{

outString->append( entity[0].str, entity[0].strLength );

++i;

}

else if ( c == '<' )

{

outString->append( entity[1].str, entity[1].strLength );

++i;

}

else if ( c == '>' )

{

outString->append( entity[2].str, entity[2].strLength );

++i;

}

else if ( c == '\"' )

{

outString->append( entity[3].str, entity[3].strLength );

++i;

}

else if ( c == '\'' )

{

outString->append( entity[4].str, entity[4].strLength );

++i;

}

else if ( c < 32 )

{

// Easy pass at non-alpha/numeric/symbol

// Below 32 is symbolic.

char buf[ 32 ];

#if defined(TIXML_SNPRINTF)

TIXML_SNPRINTF( buf, sizeof(buf), "&#x%02X;", (unsigned) ( c & 0xff ) );

#else

sprintf( buf, "&#x%02X;", (unsigned) ( c & 0xff ) );

#endif

//*ME: warning C4267: convert 'size_t' to 'int'

//*ME: Int-Cast to make compiler happy ...

outString->append( buf, (int)strlen( buf ) );

++i;

}

else

{

//char realc = (char) c;

//outString->append( &realc, 1 );

*outString += (char) c; // somewhat more efficient function call.

++i;

}

}

}

TiXmlNode::TiXmlNode( NodeType _type ) : TiXmlBase()

{

parent = 0;

type = _type;

firstChild = 0;

lastChild = 0;

prev = 0;

next = 0;

}

TiXmlNode::~TiXmlNode()

{

TiXmlNode* node = firstChild;

TiXmlNode* temp = 0;

while ( node )

{

temp = node;

node = node->next;

delete temp;

}

}

void TiXmlNode::CopyTo( TiXmlNode* target ) const

{

target->SetValue (value.c_str() );

target->userData = userData;

}

void TiXmlNode::Clear()

{

TiXmlNode* node = firstChild;

TiXmlNode* temp = 0;

while ( node )

{

temp = node;

node = node->next;

delete temp;

}

firstChild = 0;

lastChild = 0;

}

TiXmlNode* TiXmlNode::LinkEndChild( TiXmlNode* node )

{

assert( node->parent == 0 || node->parent == this );

assert( node->GetDocument() == 0 || node->GetDocument() == this->GetDocument() );

if ( node->Type() == TiXmlNode::DOCUMENT )

{

delete node;

if ( GetDocument() ) GetDocument()->SetError( TIXML_ERROR_DOCUMENT_TOP_ONLY, 0, 0, TIXML_ENCODING_UNKNOWN );

return 0;

}

node->parent = this;

node->prev = lastChild;

node->next = 0;

if ( lastChild )

lastChild->next = node;

else

firstChild = node; // it was an empty list.

lastChild = node;

return node;

}

TiXmlNode* TiXmlNode::InsertEndChild( const TiXmlNode& addThis )

{

if ( addThis.Type() == TiXmlNode::DOCUMENT )

{

if ( GetDocument() ) GetDocument()->SetError( TIXML_ERROR_DOCUMENT_TOP_ONLY, 0, 0, TIXML_ENCODING_UNKNOWN );

return 0;

}

TiXmlNode* node = addThis.Clone();

if ( !node )

return 0;

return LinkEndChild( node );

}

TiXmlNode* TiXmlNode::InsertBeforeChild( TiXmlNode* beforeThis, const TiXmlNode& addThis )

{

if ( !beforeThis || beforeThis->parent != this ) {

return 0;

}

if ( addThis.Type() == TiXmlNode::DOCUMENT )

{

if ( GetDocument() ) GetDocument()->SetError( TIXML_ERROR_DOCUMENT_TOP_ONLY, 0, 0, TIXML_ENCODING_UNKNOWN );

return 0;

}

TiXmlNode* node = addThis.Clone();

if ( !node )

return 0;

node->parent = this;

node->next = beforeThis;

node->prev = beforeThis->prev;

if ( beforeThis->prev )

{

beforeThis->prev->next = node;

}

else

{

assert( firstChild == beforeThis );

firstChild = node;

}

beforeThis->prev = node;

return node;

}

TiXmlNode* TiXmlNode::InsertAfterChild( TiXmlNode* afterThis, const TiXmlNode& addThis )

{

if ( !afterThis || afterThis->parent != this ) {

return 0;

}

if ( addThis.Type() == TiXmlNode::DOCUMENT )

{

if ( GetDocument() ) GetDocument()->SetError( TIXML_ERROR_DOCUMENT_TOP_ONLY, 0, 0, TIXML_ENCODING_UNKNOWN );

return 0;

}

TiXmlNode* node = addThis.Clone();

if ( !node )

return 0;

node->parent = this;

node->prev = afterThis;

node->next = afterThis->next;

if ( afterThis->next )

{

afterThis->next->prev = node;

}

else

{

assert( lastChild == afterThis );

lastChild = node;

}

afterThis->next = node;

return node;

}

TiXmlNode* TiXmlNode::ReplaceChild( TiXmlNode* replaceThis, const TiXmlNode& withThis )

{

if ( replaceThis->parent != this )

return 0;

TiXmlNode* node = withThis.Clone();

if ( !node )

return 0;

node->next = replaceThis->next;

node->prev = replaceThis->prev;

if ( replaceThis->next )

replaceThis->next->prev = node;

else

lastChild = node;

if ( replaceThis->prev )

replaceThis->prev->next = node;

else

firstChild = node;

delete replaceThis;

node->parent = this;

return node;

}

bool TiXmlNode::RemoveChild( TiXmlNode* removeThis )

{

if ( removeThis->parent != this )

{

assert( 0 );

return false;

}

if ( removeThis->next )

removeThis->next->prev = removeThis->prev;

else

lastChild = removeThis->prev;

if ( removeThis->prev )

removeThis->prev->next = removeThis->next;

else

firstChild = removeThis->next;

delete removeThis;

return true;

}

const TiXmlNode* TiXmlNode::FirstChild( const char * _value ) const

{

const TiXmlNode* node;

for ( node = firstChild; node; node = node->next )

{

if ( strcmp( node->Value(), _value ) == 0 )

return node;

}

return 0;

}

const TiXmlNode* TiXmlNode::LastChild( const char * _value ) const

{

const TiXmlNode* node;

for ( node = lastChild; node; node = node->prev )

{

if ( strcmp( node->Value(), _value ) == 0 )

return node;

}

return 0;

}

const TiXmlNode* TiXmlNode::IterateChildren( const TiXmlNode* previous ) const

{

if ( !previous )

{

return FirstChild();

}

else

{

assert( previous->parent == this );

return previous->NextSibling();

}

}

const TiXmlNode* TiXmlNode::IterateChildren( const char * val, const TiXmlNode* previous ) const

{

if ( !previous )

{

return FirstChild( val );

}

else

{

assert( previous->parent == this );

return previous->NextSibling( val );

}

}

const TiXmlNode* TiXmlNode::NextSibling( const char * _value ) const

{

const TiXmlNode* node;

for ( node = next; node; node = node->next )

{

if ( strcmp( node->Value(), _value ) == 0 )

return node;

}

return 0;

}

const TiXmlNode* TiXmlNode::PreviousSibling( const char * _value ) const

{

const TiXmlNode* node;

for ( node = prev; node; node = node->prev )

{

if ( strcmp( node->Value(), _value ) == 0 )

return node;

}

return 0;

}

void TiXmlElement::RemoveAttribute( const char * name )

{

#ifdef TIXML_USE_STL

TIXML_STRING str( name );

TiXmlAttribute* node = attributeSet.Find( str );

#else

TiXmlAttribute* node = attributeSet.Find( name );

#endif

if ( node )

{

attributeSet.Remove( node );

delete node;

}

}

const TiXmlElement* TiXmlNode::FirstChildElement() const

{

const TiXmlNode* node;

for ( node = FirstChild();

node;

node = node->NextSibling() )

{

if ( node->ToElement() )

return node->ToElement();

}

return 0;

}

const TiXmlElement* TiXmlNode::FirstChildElement( const char * _value ) const

{

const TiXmlNode* node;

for ( node = FirstChild( _value );

node;

node = node->NextSibling( _value ) )

{

if ( node->ToElement() )

return node->ToElement();

}

return 0;

}

const TiXmlElement* TiXmlNode::NextSiblingElement() const

{

const TiXmlNode* node;

for ( node = NextSibling();

node;

node = node->NextSibling() )

{

if ( node->ToElement() )

return node->ToElement();

}

return 0;

}

const TiXmlElement* TiXmlNode::NextSiblingElement( const char * _value ) const

{

const TiXmlNode* node;

for ( node = NextSibling( _value );

node;

node = node->NextSibling( _value ) )

{

if ( node->ToElement() )

return node->ToElement();

}

return 0;

}

const TiXmlDocument* TiXmlNode::GetDocument() const

{

const TiXmlNode* node;

for( node = this; node; node = node->parent )

{

if ( node->ToDocument() )

return node->ToDocument();

}

return 0;

}

TiXmlElement::TiXmlElement (const char * _value)

: TiXmlNode( TiXmlNode::ELEMENT )

{

firstChild = lastChild = 0;

value = _value;

}

#ifdef TIXML_USE_STL

TiXmlElement::TiXmlElement( const std::string& _value )

: TiXmlNode( TiXmlNode::ELEMENT )

{

firstChild = lastChild = 0;

value = _value;

}

#endif

TiXmlElement::TiXmlElement( const TiXmlElement& copy)

: TiXmlNode( TiXmlNode::ELEMENT )

{

firstChild = lastChild = 0;

copy.CopyTo( this );

}

void TiXmlElement::operator=( const TiXmlElement& base )

{

ClearThis();

base.CopyTo( this );

}

TiXmlElement::~TiXmlElement()

{

ClearThis();

}

void TiXmlElement::ClearThis()

{

Clear();

while( attributeSet.First() )

{

TiXmlAttribute* node = attributeSet.First();

attributeSet.Remove( node );

delete node;

}

}

const char* TiXmlElement::Attribute( const char* name ) const

{

const TiXmlAttribute* node = attributeSet.Find( name );

if ( node )

return node->Value();

return 0;

}

#ifdef TIXML_USE_STL

const std::string* TiXmlElement::Attribute( const std::string& name ) const

{

const TiXmlAttribute* node = attributeSet.Find( name );

if ( node )

return &node->ValueStr();

return 0;

}

#endif

const char* TiXmlElement::Attribute( const char* name, int* i ) const

{

const char* s = Attribute( name );

if ( i )

{

if ( s ) {

*i = atoi( s );

}

else {

*i = 0;

}

}

return s;

}

#ifdef TIXML_USE_STL

const std::string* TiXmlElement::Attribute( const std::string& name, int* i ) const

{

const std::string* s = Attribute( name );

if ( i )

{

if ( s ) {

*i = atoi( s->c_str() );

}

else {

*i = 0;

}

}

return s;

}

#endif

const char* TiXmlElement::Attribute( const char* name, double* d ) const

{

const char* s = Attribute( name );

if ( d )

{

if ( s ) {

*d = atof( s );

}

else {

*d = 0;

}

}

return s;

}

#ifdef TIXML_USE_STL

const std::string* TiXmlElement::Attribute( const std::string& name, double* d ) const

{

const std::string* s = Attribute( name );

if ( d )

{

if ( s ) {

*d = atof( s->c_str() );

}

else {

*d = 0;

}

}

return s;

}

#endif

int TiXmlElement::QueryIntAttribute( const char* name, int* ival ) const

{

const TiXmlAttribute* node = attributeSet.Find( name );

if ( !node )

return TIXML_NO_ATTRIBUTE;

return node->QueryIntValue( ival );

}

#ifdef TIXML_USE_STL

int TiXmlElement::QueryIntAttribute( const std::string& name, int* ival ) const

{

const TiXmlAttribute* node = attributeSet.Find( name );

if ( !node )

return TIXML_NO_ATTRIBUTE;

return node->QueryIntValue( ival );

}

#endif

int TiXmlElement::QueryDoubleAttribute( const char* name, double* dval ) const

{

const TiXmlAttribute* node = attributeSet.Find( name );

if ( !node )

return TIXML_NO_ATTRIBUTE;

return node->QueryDoubleValue( dval );

}

#ifdef TIXML_USE_STL

int TiXmlElement::QueryDoubleAttribute( const std::string& name, double* dval ) const

{

const TiXmlAttribute* node = attributeSet.Find( name );

if ( !node )

return TIXML_NO_ATTRIBUTE;

return node->QueryDoubleValue( dval );

}

#endif

void TiXmlElement::SetAttribute( const char * name, int val )

{

char buf[64];

#if defined(TIXML_SNPRINTF)

TIXML_SNPRINTF( buf, sizeof(buf), "%d", val );

#else

sprintf( buf, "%d", val );

#endif

SetAttribute( name, buf );

}

#ifdef TIXML_USE_STL

void TiXmlElement::SetAttribute( const std::string& name, int val )

{

std::ostringstream oss;

oss << val;

SetAttribute( name, oss.str() );

}

#endif

void TiXmlElement::SetDoubleAttribute( const char * name, double val )

{

char buf[256];

#if defined(TIXML_SNPRINTF)

TIXML_SNPRINTF( buf, sizeof(buf), "%f", val );

#else

sprintf( buf, "%f", val );

#endif

SetAttribute( name, buf );

}

void TiXmlElement::SetAttribute( const char * cname, const char * cvalue )

{

#ifdef TIXML_USE_STL

TIXML_STRING _name( cname );

TIXML_STRING _value( cvalue );

#else

const char* _name = cname;

const char* _value = cvalue;

#endif

TiXmlAttribute* node = attributeSet.Find( _name );

if ( node )

{

node->SetValue( _value );

return;

}

TiXmlAttribute* attrib = new TiXmlAttribute( cname, cvalue );

if ( attrib )

{

attributeSet.Add( attrib );

}

else

{

TiXmlDocument* document = GetDocument();

if ( document ) document->SetError( TIXML_ERROR_OUT_OF_MEMORY, 0, 0, TIXML_ENCODING_UNKNOWN );

}

}

#ifdef TIXML_USE_STL

void TiXmlElement::SetAttribute( const std::string& name, const std::string& _value )

{

TiXmlAttribute* node = attributeSet.Find( name );

if ( node )

{

node->SetValue( _value );

return;

}

TiXmlAttribute* attrib = new TiXmlAttribute( name, _value );

if ( attrib )

{

attributeSet.Add( attrib );

}

else

{

TiXmlDocument* document = GetDocument();

if ( document ) document->SetError( TIXML_ERROR_OUT_OF_MEMORY, 0, 0, TIXML_ENCODING_UNKNOWN );

}

}

#endif

void TiXmlElement::Print( FILE* cfile, int depth ) const

{

int i;

assert( cfile );

for ( i=0; i<depth; i++ ) {

fprintf( cfile, " " );

}

fprintf( cfile, "<%s", value.c_str() );

const TiXmlAttribute* attrib;

for ( attrib = attributeSet.First(); attrib; attrib = attrib->Next() )

{

fprintf( cfile, " " );

attrib->Print( cfile, depth );

}

// There are 3 different formatting approaches:

// 1) An element without children is printed as a <foo /> node

// 2) An element with only a text child is printed as <foo> text </foo>

// 3) An element with children is printed on multiple lines.

TiXmlNode* node;

if ( !firstChild )

{

fprintf( cfile, " />" );

}

else if ( firstChild == lastChild && firstChild->ToText() )

{

fprintf( cfile, ">" );

firstChild->Print( cfile, depth + 1 );

fprintf( cfile, "</%s>", value.c_str() );

}

else

{

fprintf( cfile, ">" );

for ( node = firstChild; node; node=node->NextSibling() )

{

if ( !node->ToText() )

{

fprintf( cfile, "\n" );

}

node->Print( cfile, depth+1 );

}

fprintf( cfile, "\n" );

for( i=0; i<depth; ++i ) {

fprintf( cfile, " " );

}

fprintf( cfile, "</%s>", value.c_str() );

}

}

void TiXmlElement::CopyTo( TiXmlElement* target ) const

{

// superclass:

TiXmlNode::CopyTo( target );

// Element class:

// Clone the attributes, then clone the children.

const TiXmlAttribute* attribute = 0;

for( attribute = attributeSet.First();

attribute;

attribute = attribute->Next() )

{

target->SetAttribute( attribute->Name(), attribute->Value() );

}

TiXmlNode* node = 0;

for ( node = firstChild; node; node = node->NextSibling() )

{

target->LinkEndChild( node->Clone() );

}

}

bool TiXmlElement::Accept( TiXmlVisitor* visitor ) const

{

if ( visitor->VisitEnter( *this, attributeSet.First() ) )

{

for ( const TiXmlNode* node=FirstChild(); node; node=node->NextSibling() )

{

if ( !node->Accept( visitor ) )

break;

}

}

return visitor->VisitExit( *this );

}

TiXmlNode* TiXmlElement::Clone() const

{

TiXmlElement* clone = new TiXmlElement( Value() );

if ( !clone )

return 0;

CopyTo( clone );

return clone;

}

const char* TiXmlElement::GetText() const

{

const TiXmlNode* child = this->FirstChild();

if ( child ) {

const TiXmlText* childText = child->ToText();

if ( childText ) {

return childText->Value();

}

}

return 0;

}

TiXmlDocument::TiXmlDocument() : TiXmlNode( TiXmlNode::DOCUMENT )

{

tabsize = 4;

useMicrosoftBOM = false;

ClearError();

}

TiXmlDocument::TiXmlDocument( const char * documentName ) : TiXmlNode( TiXmlNode::DOCUMENT )

{

tabsize = 4;

useMicrosoftBOM = false;

value = documentName;

ClearError();

}

#ifdef TIXML_USE_STL

TiXmlDocument::TiXmlDocument( const std::string& documentName ) : TiXmlNode( TiXmlNode::DOCUMENT )

{

tabsize = 4;

useMicrosoftBOM = false;

value = documentName;

ClearError();

}

#endif

TiXmlDocument::TiXmlDocument( const TiXmlDocument& copy ) : TiXmlNode( TiXmlNode::DOCUMENT )

{

copy.CopyTo( this );

}

void TiXmlDocument::operator=( const TiXmlDocument& copy )

{

Clear();

copy.CopyTo( this );

}

bool TiXmlDocument::LoadFile( TiXmlEncoding encoding )

{

// See STL_STRING_BUG below.

//StringToBuffer buf( value );

return LoadFile( Value(), encoding );

}

bool TiXmlDocument::SaveFile() const

{

// See STL_STRING_BUG below.

// StringToBuffer buf( value );

//

// if ( buf.buffer && SaveFile( buf.buffer ) )

// return true;

//

// return false;

return SaveFile( Value() );

}

bool TiXmlDocument::LoadFile( const char* _filename, TiXmlEncoding encoding )

{

// There was a really terrifying little bug here. The code:

// value = filename

// in the STL case, cause the assignment method of the std::string to

// be called. What is strange, is that the std::string had the same

// address as it's c_str() method, and so bad things happen. Looks

// like a bug in the Microsoft STL implementation.

// Add an extra string to avoid the crash.

printf("Reading xml from %s\n", _filename);

TIXML_STRING filename( _filename );

value = filename;

// reading in binary mode so that tinyxml can normalize the EOL

OSFILE* file = TiXmlFOpen( value.c_str (), "rb" );

if ( file )

{

bool result = LoadFile( file, encoding );

OSBasics::close( file );

return result;

}

else

{

SetError( TIXML_ERROR_OPENING_FILE, 0, 0, TIXML_ENCODING_UNKNOWN );

return false;

}

}

bool TiXmlDocument::LoadFile( OSFILE* file, TiXmlEncoding encoding )

{

if ( !file )

{

SetError( TIXML_ERROR_OPENING_FILE, 0, 0, TIXML_ENCODING_UNKNOWN );

return false;

}

// Delete the existing data:

Clear();

location.Clear();

// Get the file size, so we can pre-allocate the string. HUGE speed impact.

long length = 0;

OSBasics::seek( file, 0, SEEK_END );

length = OSBasics::tell( file );

OSBasics::seek( file, 0, SEEK_SET );

// Strange case, but good to handle up front.

if ( length <= 0 )

{

SetError( TIXML_ERROR_DOCUMENT_EMPTY, 0, 0, TIXML_ENCODING_UNKNOWN );

return false;

}

// If we have a file, assume it is all one big XML file, and read it in.

// The document parser may decide the document ends sooner than the entire file, however.

TIXML_STRING data;

data.reserve( length );

// Subtle bug here. TinyXml did use fgets. But from the XML spec:

// 2.11 End-of-Line Handling

// <snip>