gambas-source-code/gb.libxml/src/CXMLDocument.c
Benoît Minisini de083e583d [GB.LIBXML]
* NEW: Rename the gb.xml component as gb.libxml.

[GB.LIBXML.XSLT]
* NEW: Rename the gb.xml.xslt component as gb.libxml.xslt

[GB.LIBXML.RPC]
* NEW: Rename the gb.xml.rpc component as gb.libxml.rpc


git-svn-id: svn://localhost/gambas/trunk@4640 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-04-20 01:01:48 +00:00

174 lines
3.6 KiB
C

/***************************************************************************
CXMLDocument.c
(c) 2004 Daniel Campos Fernández <danielcampos@netcourrier.com>
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
MA 02110-1301, USA.
***************************************************************************/
#define __CXMLDOCUMENT_C
#include <stdio.h>
#include <libxml/parser.h>
#include <libxml/tree.h>
#include <libxml/HTMLparser.h>
#include "main.h"
#include "CXMLDocument.h"
CXMLNODE *XML_CreateNode(CXMLDOCUMENT *doc, xmlNode *node)
{
CXMLNODE *p;
if (!node)
return NULL;
p = GB.New(GB.FindClass("XmlNode"), NULL, NULL);
p->node = node;
p->doc = doc;
GB.Ref(doc);
return p;
}
static void free_document(CXMLDOCUMENT *_object)
{
if (THIS->doc)
{
xmlFreeDoc(THIS->doc);
THIS->doc = NULL;
}
}
void XML_InitDocument(CXMLDOCUMENT *_object, xmlDoc *doc, const char *err)
{
if (!doc)
{
GB.Error(err ? err : "Unable to parse XML file");
return;
}
free_document(THIS);
THIS->doc = doc;
}
BEGIN_METHOD_VOID (CXMLDocument_Free)
free_document(THIS);
END_METHOD
BEGIN_METHOD (CXMLDocument_Open,GB_STRING FileName;)
const char *path;
path = GB.RealFileName(STRING(FileName), LENGTH(FileName));
XML_InitDocument(THIS, xmlParseFile(path), NULL);
END_METHOD
BEGIN_METHOD (CXMLDocument_FromString,GB_STRING Data;)
XML_InitDocument(THIS, xmlParseDoc((xmlChar *)GB.ToZeroString(ARG(Data))), NULL);
END_METHOD
BEGIN_METHOD (CXMLDocument_HtmlFromString,GB_STRING Data;)
XML_InitDocument(THIS, htmlParseDoc((xmlChar *)GB.ToZeroString(ARG(Data)),NULL), NULL);
END_METHOD
BEGIN_METHOD (CXMLDocument_Write,GB_STRING FileName; GB_STRING Encoding;)
char *enc;
if (!THIS->doc)
{
GB.Error("Unable to write NULL document");
return;
}
if (MISSING(Encoding))
enc="UTF-8";
else
enc=GB.ToZeroString(ARG(Encoding));
xmlSaveFormatFileEnc(GB.ToZeroString(ARG(FileName)), THIS->doc,enc , 1);
END_METHOD
BEGIN_METHOD(CXMLDocument_ToString, GB_STRING Encoding)
xmlChar *mem;
int size;
char *encoding;
if (!THIS->doc)
{
GB.ReturnVoidString();
return;
}
if (MISSING(Encoding))
encoding = "UTF-8";
else
encoding = GB.ToZeroString(ARG(Encoding));
xmlDocDumpFormatMemoryEnc(THIS->doc, &mem, &size, encoding, 1);
GB.ReturnNewString((char*)mem,size);
xmlFree(mem);
END_METHOD
BEGIN_PROPERTY (CXMLDocument_Root)
GB.ReturnObject(XML_CreateNode(THIS, xmlDocGetRootElement(THIS->doc)));
END_PROPERTY
GB_DESC CXmlDocumentDesc[] =
{
GB_DECLARE("XmlDocument", sizeof(CXMLDOCUMENT)),
GB_PROPERTY_READ("Root","XmlNode",CXMLDocument_Root),
GB_METHOD("_free",NULL,CXMLDocument_Free,NULL),
GB_METHOD("Open", NULL, CXMLDocument_Open, "(FileName)s"),
GB_METHOD("FromString", NULL, CXMLDocument_FromString, "(Data)s"),
GB_METHOD("HtmlFromString", NULL, CXMLDocument_HtmlFromString, "(Data)s"),
GB_METHOD("Write", NULL, CXMLDocument_Write, "(FileName)s[(Encoding)s]"),
//GB_METHOD("Write",NULL,CXMLDocument_Write,"(FileName)s[(Encoding)s]"),
GB_METHOD("ToString", "s", CXMLDocument_ToString, "[(Encoding)s]"),
GB_END_DECLARE
};