[wxWidgets.git] / contrib / src / xml / xmlpars.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        xmlpars.cpp
// Purpose:     wxXmlDocument - XML parser 
// Author:      Vaclav Slavik
// Created:     2000/03/05
// RCS-ID:      $Id$
// Copyright:   (c) 2000 Vaclav Slavik
// Licence:     wxWindows licence
/////////////////////////////////////////////////////////////////////////////
 
#ifdef __GNUG__
// nothing - already in xml.cpp
#endif

// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"

#ifdef __BORLANDC__
    #pragma hdrstop
#endif

#include "wx/wfstream.h"
#include "wx/intl.h"
#include "wx/log.h"
#include "wx/dynlib.h"
#include "wx/xml/xmlio.h"

#include <libxml/parser.h>
#include <libxml/SAX.h>


// wxWindows SAX handlers for bugs reporting:

static void wxXmlParserError(void *ctx, const char *msg, ...)
{
    wxString text;
    xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
    if (ctxt->input)
       text.Printf( _("XML parser error at line %d: "), ctxt->input->line );
    va_list args;
    wxString tmp;
    va_start(args, msg);
    tmp.PrintfV( msg, args );
    va_end(args);
    text += tmp;
    wxLogError( text.c_str() );
}

static void wxXmlParserWarning(void *ctx, const char *msg, ...)
{
    wxString text;
    xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
    if (ctxt->input)
       text.Printf( _("XML parser warning at line %d: "), ctxt->input->line );
    va_list args;
    wxString tmp;
    va_start(args, msg);
    tmp.PrintfV( msg, args );
    va_end(args);
    text += tmp;
    wxLogWarning( text.c_str() );
}

static xmlSAXHandler gs_wxXmlSAXHandler;


// dynamically loaded functions from libxml:
typedef xmlParserCtxtPtr (*type_xmlCreatePushParserCtxt)
             (xmlSAXHandlerPtr sax, void *, const char *, int, const char *);
typedef xmlNodePtr (*type_xmlNewText)(const xmlChar *);
typedef xmlAttrPtr (*type_xmlSetProp)(xmlNodePtr, const xmlChar *, const xmlChar *);
typedef int (*type_xmlParseChunk)(xmlParserCtxtPtr, const char *, int, int);
typedef void (*type_xmlFreeParserCtxt)(xmlParserCtxtPtr);
typedef xmlDocPtr (*type_xmlNewDoc)(const xmlChar *);
typedef void (*type_xmlFreeDoc)(xmlDocPtr);
typedef xmlNodePtr (*type_xmlNewDocNode)(xmlDocPtr, xmlNsPtr, const xmlChar *, const xmlChar *);
typedef void (*type_xmlDocDumpMemory)(xmlDocPtr, xmlChar**, int *);
typedef xmlNodePtr (*type_xmlAddChild)(xmlNodePtr, xmlNodePtr);
typedef xmlNodePtr (*type_xmlNewChild)(xmlNodePtr, xmlNsPtr, const xmlChar *, const xmlChar *);
typedef xmlChar * (*type_xmlNodeListGetString)(xmlDocPtr, xmlNodePtr, int);
typedef xmlNodePtr (*type_xmlDocGetRootElement)(xmlDocPtr);
typedef xmlNodePtr (*type_xmlDocSetRootElement)(xmlDocPtr doc, xmlNodePtr root);
typedef void (*(*type_xmlFree))(void *);
typedef int (*type_xmlKeepBlanksDefault)(int);
typedef void (*type_xmlInitParser)(void);
typedef void (*type_xmlCleanupParser)(void);
typedef xmlSAXHandler *type_xmlDefaultSAXHandler;

static struct
{
    wxDllType Handle;

    type_xmlCreatePushParserCtxt xmlCreatePushParserCtxt;
    type_xmlNewText xmlNewText;
    type_xmlSetProp xmlSetProp;
    type_xmlParseChunk xmlParseChunk;
    type_xmlFreeParserCtxt xmlFreeParserCtxt;
    type_xmlNewDoc xmlNewDoc;
    type_xmlFreeDoc xmlFreeDoc;
    type_xmlNewDocNode xmlNewDocNode;
    type_xmlDocDumpMemory xmlDocDumpMemory;
    type_xmlAddChild xmlAddChild;
    type_xmlNewChild xmlNewChild;
    type_xmlNodeListGetString xmlNodeListGetString;
    type_xmlDocGetRootElement xmlDocGetRootElement;
    type_xmlDocSetRootElement xmlDocSetRootElement;
    type_xmlFree xmlFree;
    type_xmlKeepBlanksDefault xmlKeepBlanksDefault;
    type_xmlInitParser xmlInitParser;
    type_xmlCleanupParser xmlCleanupParser;
    type_xmlDefaultSAXHandler xmlDefaultSAXHandler;
} gs_libxmlDLL;

static bool gs_libxmlLoaded = FALSE;
static bool gs_libxmlLoadFailed = FALSE;


static void ReleaseLibxml()
{
    if (gs_libxmlLoaded)
    {
        // Check for CleanupParser ..may have failed before initialised 
        // during LOAD_SYMBOL in LoadLibxml()
        if (gs_libxmlDLL.xmlCleanupParser) 
            gs_libxmlDLL.xmlCleanupParser();
        wxDllLoader::UnloadLibrary(gs_libxmlDLL.Handle);
    }
    gs_libxmlLoaded = FALSE;
    gs_libxmlLoadFailed = FALSE;
}


static bool LoadLibxml()
{
    if (gs_libxmlLoaded) return TRUE;
    if (gs_libxmlLoadFailed) return FALSE;
    gs_libxmlLoadFailed = TRUE;

    {
    wxLogNull lg;
#ifdef __UNIX__
    gs_libxmlDLL.Handle = 
        wxDllLoader::LoadLibrary(_T("wxlibxml.so.2"), &gs_libxmlLoaded);
    if (!gs_libxmlLoaded) gs_libxmlDLL.Handle = 
        wxDllLoader::LoadLibrary(_T("libxml.so.2"), &gs_libxmlLoaded);
#endif
#ifdef __WXMSW__
    gs_libxmlDLL.Handle = 
        wxDllLoader::LoadLibrary(_T("wxlibxml2.dll"), &gs_libxmlLoaded);
    if (!gs_libxmlLoaded) gs_libxmlDLL.Handle = 
        wxDllLoader::LoadLibrary(_T("libxml2.dll"), &gs_libxmlLoaded);
#endif
    }
    
    if (!gs_libxmlLoaded) 
    {
        wxLogError(_("Failed to load libxml shared library."));
        return FALSE;
    }
    
#define LOAD_SYMBOL(sym) \
    gs_libxmlDLL.sym = \
        (type_##sym)wxDllLoader::GetSymbol(gs_libxmlDLL.Handle, _T(#sym)); \
    if (!gs_libxmlDLL.sym) \
    { \
        ReleaseLibxml(); \
        wxLogError(_("Failed to load libxml shared library.")); \
        return FALSE; \
    }

    LOAD_SYMBOL(xmlCreatePushParserCtxt)
    LOAD_SYMBOL(xmlNewText)
    LOAD_SYMBOL(xmlSetProp)
    LOAD_SYMBOL(xmlParseChunk)
    LOAD_SYMBOL(xmlFreeParserCtxt)
    LOAD_SYMBOL(xmlNewDoc)
    LOAD_SYMBOL(xmlFreeDoc)
    LOAD_SYMBOL(xmlNewDocNode)
    LOAD_SYMBOL(xmlDocDumpMemory)
    LOAD_SYMBOL(xmlAddChild)
    LOAD_SYMBOL(xmlNewChild)
    LOAD_SYMBOL(xmlNodeListGetString)
    LOAD_SYMBOL(xmlDocGetRootElement)
    LOAD_SYMBOL(xmlDocSetRootElement)
    LOAD_SYMBOL(xmlFree)
    LOAD_SYMBOL(xmlKeepBlanksDefault)
    LOAD_SYMBOL(xmlInitParser)
    LOAD_SYMBOL(xmlCleanupParser)
    LOAD_SYMBOL(xmlDefaultSAXHandler)

#undef LOAD_SYMBOL    

    gs_libxmlLoadFailed = FALSE;
    
    gs_libxmlDLL.xmlInitParser();
    memcpy(&gs_wxXmlSAXHandler, gs_libxmlDLL.xmlDefaultSAXHandler,
           sizeof(xmlSAXHandler));
    gs_wxXmlSAXHandler.error = wxXmlParserError;
    gs_wxXmlSAXHandler.fatalError = wxXmlParserError;
    gs_wxXmlSAXHandler.warning = wxXmlParserWarning;

    return TRUE;
}


bool wxXmlIOHandlerLibxml::CanLoad(wxInputStream& stream)
{
    if (!LoadLibxml()) return FALSE;
    char cheader[7];
    cheader[6] = 0;
    stream.Read(cheader, 6);
    stream.SeekI(-6, wxFromCurrent);
    return strcmp(cheader, "<?xml ") == 0;
}


bool wxXmlIOHandlerLibxml::CanSave()
{
    return LoadLibxml();
}


static wxXmlProperty *CreateWXProperty(xmlDocPtr doc, xmlAttrPtr attr)
{
    if (attr == NULL) return NULL;
    
    unsigned char *val = 
        gs_libxmlDLL.xmlNodeListGetString(doc, attr->children, 1);
    wxXmlProperty *prop = 
        new wxXmlProperty(attr->name, val, CreateWXProperty(doc, attr->next));
    (*gs_libxmlDLL.xmlFree)(val);
    return prop;
}


static wxXmlNode *CreateWXNode(xmlDocPtr doc, wxXmlNode *parent, xmlNodePtr node)
{
    if (node == NULL) return NULL;
    
    wxXmlNode *nd = new wxXmlNode(parent, (wxXmlNodeType)node->type,
                          node->name, node->content, 
                          CreateWXProperty(doc, node->properties),
                          CreateWXNode(doc, parent, node->next));
    CreateWXNode(doc, nd, node->children);
    return nd;
}


bool wxXmlIOHandlerLibxml::Load(wxInputStream& stream, wxXmlDocument& doc)
{
    if (!LoadLibxml()) return FALSE;

    xmlDocPtr dc;
    xmlParserCtxtPtr ctxt;
    
    char buffer[1024];
    int  res;
    
    res = stream.Read(buffer, 4).LastRead();
    if (res > 0)
    {
        bool okay = TRUE;
        gs_libxmlDLL.xmlKeepBlanksDefault(0);
        ctxt = gs_libxmlDLL.xmlCreatePushParserCtxt(&gs_wxXmlSAXHandler, 
                                          NULL, buffer, res, ""/*docname*/);
        while ((res = stream.Read(buffer, 1024).LastRead()) > 0) 
            if (gs_libxmlDLL.xmlParseChunk(ctxt, buffer, res, 0) != 0) 
               okay = FALSE;
        if (gs_libxmlDLL.xmlParseChunk(ctxt, buffer, 0, 1) != 0) okay = FALSE;
        dc = ctxt->myDoc;
        gs_libxmlDLL.xmlFreeParserCtxt(ctxt);

        doc.SetVersion(dc->version);
        doc.SetEncoding(dc->encoding);
        doc.SetRoot(CreateWXNode(dc, NULL, gs_libxmlDLL.xmlDocGetRootElement(dc)));

        gs_libxmlDLL.xmlFreeDoc(dc);
        
        return okay;
    }
    else return FALSE;
}


static void CreateLibxmlNode(xmlNodePtr node, wxXmlNode *wxnode)
{
    node->type = (xmlElementType)wxnode->GetType();

    wxXmlProperty *prop = wxnode->GetProperties();  
    while (prop)
    {
        gs_libxmlDLL.xmlSetProp(node, (xmlChar*)prop->GetName().mb_str(), 
                         (xmlChar*)prop->GetValue().mb_str());
        prop = prop->GetNext();
    }
    
    wxXmlNode *child = wxnode->GetChildren();
    xmlNodePtr n;
    xmlChar *content, *name;
    
    while (child)
    {
        name = (xmlChar*)child->GetName().mb_str();
        if (!child->GetContent()) content = NULL;
        else content = (xmlChar*)child->GetContent().mb_str();
        if (child->GetType() == wxXML_TEXT_NODE)
            gs_libxmlDLL.xmlAddChild(node, n = gs_libxmlDLL.xmlNewText(content));
        else
            n = gs_libxmlDLL.xmlNewChild(node, NULL, name, content);
        CreateLibxmlNode(n, child);
        child = child->GetNext();
    }
}


bool wxXmlIOHandlerLibxml::Save(wxOutputStream& stream, const wxXmlDocument& doc)
{
    if (!LoadLibxml()) return FALSE;

    xmlDocPtr dc;

    wxASSERT_MSG(doc.GetRoot() != NULL, _("Trying to save empty document!"));
    
    gs_libxmlDLL.xmlKeepBlanksDefault(0);
    dc = gs_libxmlDLL.xmlNewDoc((xmlChar*)doc.GetVersion().mb_str());
    
    gs_libxmlDLL.xmlDocSetRootElement(dc, 
         gs_libxmlDLL.xmlNewDocNode(dc, NULL, 
                        (xmlChar*)doc.GetRoot()->GetName().mb_str(), NULL));
    CreateLibxmlNode(gs_libxmlDLL.xmlDocGetRootElement(dc), doc.GetRoot());

    xmlChar *buffer;
    int size;

    gs_libxmlDLL.xmlDocDumpMemory(dc, &buffer, &size);
    gs_libxmlDLL.xmlFreeDoc(dc);
    stream.Write(buffer, size);
    (*gs_libxmlDLL.xmlFree)(buffer);
    return stream.LastWrite() == (unsigned)size;
}


#include "wx/module.h"

class wxXmlLibxmlModule: public wxModule
{
    DECLARE_DYNAMIC_CLASS(wxXmlLibxmlModule)
    public:
        wxXmlLibxmlModule() {}
        bool OnInit() { return TRUE; }
        void OnExit() { ReleaseLibxml(); }
};

IMPLEMENT_DYNAMIC_CLASS(wxXmlLibxmlModule, wxModule)
Commit	Line	Data
56d2f750 VS	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: xmlpars.cpp
	3	// Purpose: wxXmlDocument - XML parser
	4	// Author: Vaclav Slavik
	5	// Created: 2000/03/05
	6	// RCS-ID: $Id$
	7	// Copyright: (c) 2000 Vaclav Slavik
	8	// Licence: wxWindows licence
	9	/////////////////////////////////////////////////////////////////////////////
	10
	11	#ifdef __GNUG__
	12	// nothing - already in xml.cpp
	13	#endif
	14
	15	// For compilers that support precompilation, includes "wx.h".
	16	#include "wx/wxprec.h"
	17
	18	#ifdef __BORLANDC__
	19	#pragma hdrstop
	20	#endif
	21
	22	#include "wx/wfstream.h"
	23	#include "wx/intl.h"
	24	#include "wx/log.h"
	25	#include "wx/dynlib.h"
	26	#include "wx/xml/xmlio.h"
	27
	28	#include <libxml/parser.h>
2dc1ca84 VS	29	#include <libxml/SAX.h>
	30
	31
	32	// wxWindows SAX handlers for bugs reporting:
	33
	34	static void wxXmlParserError(void ctx, const char msg, ...)
	35	{
	36	wxString text;
	37	xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
	38	if (ctxt->input)
	39	text.Printf( _("XML parser error at line %d: "), ctxt->input->line );
	40	va_list args;
	41	wxString tmp;
	42	va_start(args, msg);
	43	tmp.PrintfV( msg, args );
	44	va_end(args);
	45	text += tmp;
	46	wxLogError( text.c_str() );
	47	}
	48
	49	static void wxXmlParserWarning(void ctx, const char msg, ...)
	50	{
	51	wxString text;
	52	xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
	53	if (ctxt->input)
	54	text.Printf( _("XML parser warning at line %d: "), ctxt->input->line );
	55	va_list args;
	56	wxString tmp;
	57	va_start(args, msg);
	58	tmp.PrintfV( msg, args );
	59	va_end(args);
	60	text += tmp;
	61	wxLogWarning( text.c_str() );
	62	}
	63
	64	static xmlSAXHandler gs_wxXmlSAXHandler;
	65
	66
56d2f750 VS	67
	68	// dynamically loaded functions from libxml:
	69	typedef xmlParserCtxtPtr (*type_xmlCreatePushParserCtxt)
	70	(xmlSAXHandlerPtr sax, void , const char , int, const char *);
	71	typedef xmlNodePtr (type_xmlNewText)(const xmlChar );
	72	typedef xmlAttrPtr (type_xmlSetProp)(xmlNodePtr, const xmlChar , const xmlChar *);
	73	typedef int (type_xmlParseChunk)(xmlParserCtxtPtr, const char , int, int);
	74	typedef void (*type_xmlFreeParserCtxt)(xmlParserCtxtPtr);
	75	typedef xmlDocPtr (type_xmlNewDoc)(const xmlChar );
	76	typedef void (*type_xmlFreeDoc)(xmlDocPtr);
	77	typedef xmlNodePtr (type_xmlNewDocNode)(xmlDocPtr, xmlNsPtr, const xmlChar , const xmlChar *);
	78	typedef void (type_xmlDocDumpMemory)(xmlDocPtr, xmlChar, int );
	79	typedef xmlNodePtr (*type_xmlAddChild)(xmlNodePtr, xmlNodePtr);
	80	typedef xmlNodePtr (type_xmlNewChild)(xmlNodePtr, xmlNsPtr, const xmlChar , const xmlChar *);
	81	typedef xmlChar * (*type_xmlNodeListGetString)(xmlDocPtr, xmlNodePtr, int);
	82	typedef xmlNodePtr (*type_xmlDocGetRootElement)(xmlDocPtr);
	83	typedef xmlNodePtr (*type_xmlDocSetRootElement)(xmlDocPtr doc, xmlNodePtr root);
dfc0e3fb VS	84	typedef void ((type_xmlFree))(void *);
dfc0e3fb VS	85	typedef int (*type_xmlKeepBlanksDefault)(int);
2dc1ca84 VS	86	typedef void (*type_xmlInitParser)(void);
	87	typedef void (*type_xmlCleanupParser)(void);
	88	typedef xmlSAXHandler *type_xmlDefaultSAXHandler;
56d2f750 VS	89
	90	static struct
	91	{
	92	wxDllType Handle;
	93
	94	type_xmlCreatePushParserCtxt xmlCreatePushParserCtxt;
	95	type_xmlNewText xmlNewText;
	96	type_xmlSetProp xmlSetProp;
	97	type_xmlParseChunk xmlParseChunk;
	98	type_xmlFreeParserCtxt xmlFreeParserCtxt;
	99	type_xmlNewDoc xmlNewDoc;
	100	type_xmlFreeDoc xmlFreeDoc;
	101	type_xmlNewDocNode xmlNewDocNode;
	102	type_xmlDocDumpMemory xmlDocDumpMemory;
	103	type_xmlAddChild xmlAddChild;
	104	type_xmlNewChild xmlNewChild;
	105	type_xmlNodeListGetString xmlNodeListGetString;
	106	type_xmlDocGetRootElement xmlDocGetRootElement;
	107	type_xmlDocSetRootElement xmlDocSetRootElement;
dfc0e3fb VS	108	type_xmlFree xmlFree;
dfc0e3fb VS	109	type_xmlKeepBlanksDefault xmlKeepBlanksDefault;
2dc1ca84 VS	110	type_xmlInitParser xmlInitParser;
	111	type_xmlCleanupParser xmlCleanupParser;
	112	type_xmlDefaultSAXHandler xmlDefaultSAXHandler;
56d2f750 VS	113	} gs_libxmlDLL;
	114
	115	static bool gs_libxmlLoaded = FALSE;
	116	static bool gs_libxmlLoadFailed = FALSE;
	117
	118
	119
	120	static void ReleaseLibxml()
	121	{
	122	if (gs_libxmlLoaded)
	123	{
7981795a VS	124	// Check for CleanupParser ..may have failed before initialised
	125	// during LOAD_SYMBOL in LoadLibxml()
	126	if (gs_libxmlDLL.xmlCleanupParser)
	127	gs_libxmlDLL.xmlCleanupParser();
56d2f750 VS	128	wxDllLoader::UnloadLibrary(gs_libxmlDLL.Handle);
	129	}
	130	gs_libxmlLoaded = FALSE;
	131	gs_libxmlLoadFailed = FALSE;
	132	}
	133
	134
	135	static bool LoadLibxml()
	136	{
	137	if (gs_libxmlLoaded) return TRUE;
	138	if (gs_libxmlLoadFailed) return FALSE;
	139	gs_libxmlLoadFailed = TRUE;
	140
dfc0e3fb VS	141	{
dfc0e3fb VS	142	wxLogNull lg;
56d2f750 VS	143	#ifdef __UNIX__
56d2f750 VS	144	gs_libxmlDLL.Handle =
dfc0e3fb VS	145	wxDllLoader::LoadLibrary(_T("wxlibxml.so.2"), &gs_libxmlLoaded);
dfc0e3fb VS	146	if (!gs_libxmlLoaded) gs_libxmlDLL.Handle =
56d2f750 VS	147	wxDllLoader::LoadLibrary(_T("libxml.so.2"), &gs_libxmlLoaded);
56d2f750 VS	148	#endif
dfc0e3fb VS	149	#ifdef __WXMSW__
	150	gs_libxmlDLL.Handle =
	151	wxDllLoader::LoadLibrary(_T("wxlibxml2.dll"), &gs_libxmlLoaded);
	152	if (!gs_libxmlLoaded) gs_libxmlDLL.Handle =
	153	wxDllLoader::LoadLibrary(_T("libxml2.dll"), &gs_libxmlLoaded);
	154	#endif
	155	}
56d2f750	156
dfc0e3fb VS	157	if (!gs_libxmlLoaded)
	158	{
	159	wxLogError(_("Failed to load libxml shared library."));
	160	return FALSE;
	161	}
56d2f750 VS	162
	163	#define LOAD_SYMBOL(sym) \
	164	gs_libxmlDLL.sym = \
	165	(type_##sym)wxDllLoader::GetSymbol(gs_libxmlDLL.Handle, _T(#sym)); \
dfc0e3fb VS	166	if (!gs_libxmlDLL.sym) \
	167	{ \
	168	ReleaseLibxml(); \
	169	wxLogError(_("Failed to load libxml shared library.")); \
	170	return FALSE; \
	171	}
56d2f750 VS	172
	173	LOAD_SYMBOL(xmlCreatePushParserCtxt)
	174	LOAD_SYMBOL(xmlNewText)
	175	LOAD_SYMBOL(xmlSetProp)
	176	LOAD_SYMBOL(xmlParseChunk)
	177	LOAD_SYMBOL(xmlFreeParserCtxt)
	178	LOAD_SYMBOL(xmlNewDoc)
	179	LOAD_SYMBOL(xmlFreeDoc)
	180	LOAD_SYMBOL(xmlNewDocNode)
	181	LOAD_SYMBOL(xmlDocDumpMemory)
	182	LOAD_SYMBOL(xmlAddChild)
	183	LOAD_SYMBOL(xmlNewChild)
	184	LOAD_SYMBOL(xmlNodeListGetString)
	185	LOAD_SYMBOL(xmlDocGetRootElement)
	186	LOAD_SYMBOL(xmlDocSetRootElement)
dfc0e3fb VS	187	LOAD_SYMBOL(xmlFree)
dfc0e3fb VS	188	LOAD_SYMBOL(xmlKeepBlanksDefault)
2dc1ca84 VS	189	LOAD_SYMBOL(xmlInitParser)
	190	LOAD_SYMBOL(xmlCleanupParser)
	191	LOAD_SYMBOL(xmlDefaultSAXHandler)
56d2f750 VS	192
	193	#undef LOAD_SYMBOL
	194
	195	gs_libxmlLoadFailed = FALSE;
2dc1ca84 VS	196
	197	gs_libxmlDLL.xmlInitParser();
	198	memcpy(&gs_wxXmlSAXHandler, gs_libxmlDLL.xmlDefaultSAXHandler,
	199	sizeof(xmlSAXHandler));
	200	gs_wxXmlSAXHandler.error = wxXmlParserError;
	201	gs_wxXmlSAXHandler.fatalError = wxXmlParserError;
	202	gs_wxXmlSAXHandler.warning = wxXmlParserWarning;
56d2f750	203
56d2f750 VS	204	return TRUE;
	205	}
	206
	207
	208
	209
	210	bool wxXmlIOHandlerLibxml::CanLoad(wxInputStream& stream)
	211	{
	212	if (!LoadLibxml()) return FALSE;
	213	char cheader[7];
	214	cheader[6] = 0;
	215	stream.Read(cheader, 6);
	216	stream.SeekI(-6, wxFromCurrent);
	217	return strcmp(cheader, "<?xml ") == 0;
	218	}
	219
	220
	221
	222	bool wxXmlIOHandlerLibxml::CanSave()
	223	{
	224	return LoadLibxml();
	225	}
	226
	227
	228
	229	static wxXmlProperty *CreateWXProperty(xmlDocPtr doc, xmlAttrPtr attr)
	230	{
	231	if (attr == NULL) return NULL;
	232
	233	unsigned char *val =
	234	gs_libxmlDLL.xmlNodeListGetString(doc, attr->children, 1);
	235	wxXmlProperty *prop =
	236	new wxXmlProperty(attr->name, val, CreateWXProperty(doc, attr->next));
dfc0e3fb	237	(*gs_libxmlDLL.xmlFree)(val);
56d2f750 VS	238	return prop;
	239	}
	240
	241
	242
	243	static wxXmlNode CreateWXNode(xmlDocPtr doc, wxXmlNode parent, xmlNodePtr node)
	244	{
	245	if (node == NULL) return NULL;
	246
	247	wxXmlNode *nd = new wxXmlNode(parent, (wxXmlNodeType)node->type,
	248	node->name, node->content,
	249	CreateWXProperty(doc, node->properties),
	250	CreateWXNode(doc, parent, node->next));
	251	CreateWXNode(doc, nd, node->children);
	252	return nd;
	253	}
	254
	255
	256
	257	bool wxXmlIOHandlerLibxml::Load(wxInputStream& stream, wxXmlDocument& doc)
	258	{
	259	if (!LoadLibxml()) return FALSE;
	260
	261	xmlDocPtr dc;
	262	xmlParserCtxtPtr ctxt;
	263
	264	char buffer[1024];
	265	int res;
	266
	267	res = stream.Read(buffer, 4).LastRead();
	268	if (res > 0)
	269	{
	270	bool okay = TRUE;
dfc0e3fb	271	gs_libxmlDLL.xmlKeepBlanksDefault(0);
2dc1ca84 VS	272	ctxt = gs_libxmlDLL.xmlCreatePushParserCtxt(&gs_wxXmlSAXHandler,
2dc1ca84 VS	273	NULL, buffer, res, ""/docname/);
56d2f750 VS	274	while ((res = stream.Read(buffer, 1024).LastRead()) > 0)
	275	if (gs_libxmlDLL.xmlParseChunk(ctxt, buffer, res, 0) != 0)
	276	okay = FALSE;
	277	if (gs_libxmlDLL.xmlParseChunk(ctxt, buffer, 0, 1) != 0) okay = FALSE;
	278	dc = ctxt->myDoc;
	279	gs_libxmlDLL.xmlFreeParserCtxt(ctxt);
	280
	281	doc.SetVersion(dc->version);
	282	doc.SetEncoding(dc->encoding);
	283	doc.SetRoot(CreateWXNode(dc, NULL, gs_libxmlDLL.xmlDocGetRootElement(dc)));
	284
	285	gs_libxmlDLL.xmlFreeDoc(dc);
	286
	287	return okay;
	288	}
	289	else return FALSE;
	290	}
	291
	292
	293
	294	static void CreateLibxmlNode(xmlNodePtr node, wxXmlNode *wxnode)
	295	{
	296	node->type = (xmlElementType)wxnode->GetType();
	297
	298	wxXmlProperty *prop = wxnode->GetProperties();
	299	while (prop)
	300	{
	301	gs_libxmlDLL.xmlSetProp(node, (xmlChar*)prop->GetName().mb_str(),
	302	(xmlChar*)prop->GetValue().mb_str());
	303	prop = prop->GetNext();
	304	}
	305
	306	wxXmlNode *child = wxnode->GetChildren();
	307	xmlNodePtr n;
	308	xmlChar content, name;
	309
	310	while (child)
	311	{
	312	name = (xmlChar*)child->GetName().mb_str();
	313	if (!child->GetContent()) content = NULL;
	314	else content = (xmlChar*)child->GetContent().mb_str();
	315	if (child->GetType() == wxXML_TEXT_NODE)
	316	gs_libxmlDLL.xmlAddChild(node, n = gs_libxmlDLL.xmlNewText(content));
	317	else
	318	n = gs_libxmlDLL.xmlNewChild(node, NULL, name, content);
	319	CreateLibxmlNode(n, child);
	320	child = child->GetNext();
	321	}
	322	}
	323
	324
	325
	326	bool wxXmlIOHandlerLibxml::Save(wxOutputStream& stream, const wxXmlDocument& doc)
	327	{
	328	if (!LoadLibxml()) return FALSE;
	329
	330	xmlDocPtr dc;
	331
	332	wxASSERT_MSG(doc.GetRoot() != NULL, _("Trying to save empty document!"));
	333
dfc0e3fb	334	gs_libxmlDLL.xmlKeepBlanksDefault(0);
56d2f750 VS	335	dc = gs_libxmlDLL.xmlNewDoc((xmlChar*)doc.GetVersion().mb_str());
	336
	337	gs_libxmlDLL.xmlDocSetRootElement(dc,
	338	gs_libxmlDLL.xmlNewDocNode(dc, NULL,
	339	(xmlChar*)doc.GetRoot()->GetName().mb_str(), NULL));
	340	CreateLibxmlNode(gs_libxmlDLL.xmlDocGetRootElement(dc), doc.GetRoot());
	341
	342	xmlChar *buffer;
	343	int size;
	344
	345	gs_libxmlDLL.xmlDocDumpMemory(dc, &buffer, &size);
	346	gs_libxmlDLL.xmlFreeDoc(dc);
	347	stream.Write(buffer, size);
dfc0e3fb	348	(*gs_libxmlDLL.xmlFree)(buffer);
56d2f750 VS	349	return stream.LastWrite() == (unsigned)size;
	350	}
	351
	352
	353
	354
	355	#include "wx/module.h"
	356
	357	class wxXmlLibxmlModule: public wxModule
	358	{
	359	DECLARE_DYNAMIC_CLASS(wxXmlLibxmlModule)
	360	public:
	361	wxXmlLibxmlModule() {}
	362	bool OnInit() { return TRUE; }
	363	void OnExit() { ReleaseLibxml(); }
	364	};
	365
	366	IMPLEMENT_DYNAMIC_CLASS(wxXmlLibxmlModule, wxModule)