diff options
Diffstat (limited to 'plugins/variables/parse_xml.cpp')
| -rw-r--r-- | plugins/variables/parse_xml.cpp | 293 |
1 files changed, 0 insertions, 293 deletions
diff --git a/plugins/variables/parse_xml.cpp b/plugins/variables/parse_xml.cpp deleted file mode 100644 index 5d3b5778a0..0000000000 --- a/plugins/variables/parse_xml.cpp +++ /dev/null @@ -1,293 +0,0 @@ -/*
- Variables Plugin for Miranda-IM (www.miranda-im.org)
- Copyright 2003-2006 P. Boon
-
- 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 of the License, 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
-*/
-#include "variables.h"
-#include "parse_xml.h"
-
-#include <string.h>
-#include <libxml/xmlmemory.h>
-#include <libxml/debugXML.h>
-#include <libxml/HTMLtree.h>
-#include <libxml/xmlIO.h>
-#include <libxml/DOCBparser.h>
-#include <libxml/xinclude.h>
-#include <libxml/catalog.h>
-#include <libxslt/xslt.h>
-#include <libxslt/xsltInternals.h>
-#include <libxslt/transform.h>
-#include <libxslt/xsltutils.h>
-
-xsltStylesheetPtr (*pXsltParseStylesheetDoc)(xmlDocPtr doc);
-xmlDocPtr (*pXmlParseMemory)(const char * buffer, int size);
-
-void (*pXmlFree)(void *mem);
-xmlDocPtr (*pXmlParseFile)(const char * filename);
-void (*pXmlFreeDoc)(xmlDocPtr cur);
-void (*pXmlInitParser)(void);
-void (*pXmlCleanupParser)(void);
-int (*pXmlSubstituteEntitiesDefault)(int val);
-
-xsltStylesheetPtr (*pXsltParseStylesheetFile)(const xmlChar * filename);
-int (*pXsltSaveResultToString)(xmlChar ** doc_txt_ptr, int * doc_txt_len, xmlDocPtr result, xsltStylesheetPtr style);
-void (*pXsltFreeStylesheet)(xsltStylesheetPtr sheet);
-xmlDocPtr (*pXsltApplyStylesheet)(xsltStylesheetPtr style, xmlDocPtr doc, const char ** params);
-void (*pXsltCleanupGlobals)(void);
-
-/*
- pattern, subject
-*/
-static TCHAR *parseXslts(ARGUMENTSINFO *ai) {
-
- char *szStyleSheet, *szDoc;
- TCHAR *tszRes;
- xsltStylesheetPtr cur = NULL;
- xmlDocPtr doc, res, sdoc;
- xmlChar *xmlChRes = NULL;
- int resLen;
-
- if (ai->argc != 3) {
- return NULL;
- }
-#ifdef UNICODE
- szStyleSheet = u2a(ai->targv[1]);
- szDoc = u2a(ai->targv[2]);
-#else
- szStyleSheet = _strdup(ai->argv[1]);
- szDoc = _strdup(ai->argv[2]);
-#endif
-
- log_debugA("calling xsltParseMemory");
- sdoc = pXmlParseMemory(szStyleSheet, strlen(szStyleSheet));
- if (sdoc == NULL) {
-
- return NULL;
- }
-
- log_debugA("calling xsltParseStylesheetDoc");
- cur = pXsltParseStylesheetDoc(sdoc);
- if (cur == NULL) {
- log_debugA("calling xsltFreeDoc");
- pXmlFreeDoc(sdoc);
-
- return NULL;
- }
-
- log_debugA("calling xsltParseMemory");
- doc = pXmlParseMemory(szDoc, strlen(szDoc));
- if (doc == NULL) {
- log_debugA("calling xsltFreeDoc");
- pXmlFreeDoc(sdoc);
- log_debugA("calling xsltFreeStylesheet");
- pXsltFreeStylesheet(cur);
-
- return NULL;
- }
-
- log_debugA("calling xsltApplyStylesheet");
- res = pXsltApplyStylesheet(cur, doc, NULL);
- if (res == NULL) {
- log_debugA("calling xsltFreeStylesheet");
- pXsltFreeStylesheet(cur);
- log_debugA("calling xsltFreeDoc");
- pXmlFreeDoc(doc);
- log_debugA("calling xsltFreeDoc");
- pXmlFreeDoc(sdoc);
-
- return NULL;
- }
-
- log_debugA("calling xsltSaveResultToString");
- pXsltSaveResultToString(&xmlChRes, &resLen, res, cur);
- log_debugA("calling xsltFreeStylesheet");
- pXsltFreeStylesheet(cur);
- log_debugA("calling xsltFreeDoc");
- pXmlFreeDoc(res);
- log_debugA("calling xsltFreeDoc");
- pXmlFreeDoc(doc);
- log_debugA("calling free");
- free(szStyleSheet);
- log_debugA("calling free");
- free(szDoc);
-#ifdef UNICODE
- tszRes = a2u((char *)xmlChRes);
-#else
- tszRes = _strdup((const char *)xmlChRes);
-#endif
- log_debugA("calling xmlFree");
- pXmlFree(xmlChRes);
-
- return tszRes;
-}
-
-/*
- files
-*/
-static TCHAR *parseXsltf(ARGUMENTSINFO *ai) {
-
- char *szStyleSheet, *szDoc;
- TCHAR *tszRes;
- xsltStylesheetPtr cur = NULL;
- xmlDocPtr doc, res;
- xmlChar *xmlChRes = NULL;
- int resLen;
-
- if (ai->argc != 3) {
- return NULL;
- }
-#ifdef UNICODE
- szStyleSheet = u2a(ai->targv[1]);
- szDoc = u2a(ai->targv[2]);
-#else
- szStyleSheet = _strdup(ai->argv[1]);
- szDoc = _strdup(ai->argv[2]);
-#endif
-
- log_debugA("xslt with %s and %s", szStyleSheet, szDoc);
-
- log_debugA("calling xsltParseStylesheetFile");
- cur = pXsltParseStylesheetFile((const xmlChar *)szStyleSheet);
- if (cur == NULL) {
-
- return NULL;
- }
- log_debugA("result: %x", cur);
-
- log_debugA("calling xmlParseFile");
- doc = pXmlParseFile(szDoc);
- if (doc == NULL) {
- pXsltFreeStylesheet(cur);
-
- return NULL;
- }
- log_debugA("result: %x", doc);
-
- log_debugA("calling xsltApplyStylesheet");
- res = pXsltApplyStylesheet(cur, doc, NULL);
- if (res == NULL) {
- pXsltFreeStylesheet(cur);
- pXmlFreeDoc(doc);
-
- return NULL;
- }
- log_debugA("result: %x", res);
-
- log_debugA("calling xsltSaveResultToString");
- pXsltSaveResultToString(&xmlChRes, &resLen, res, cur);
-
- log_debugA("calling xsltFreeStylesheet(cur)");
- pXsltFreeStylesheet(cur);
-
- log_debugA("calling xmlFreeDoc(res)");
- pXmlFreeDoc(res);
-
- log_debugA("calling xmlFreeDoc(doc)");
- pXmlFreeDoc(doc);
-
- //log_debug("calling xsltCleanupGlobals");
- //pXsltCleanupGlobals();
-
- //log_debug("calling xmlCleanupParser");
- //pXmlCleanupParser();
-
- free(szStyleSheet);
- free(szDoc);
-#ifdef UNICODE
- tszRes = a2u((char *)xmlChRes);
-#else
- tszRes = _strdup((const char *)xmlChRes);
-#endif
- log_debugA("calling xmlFree");
- pXmlFree(xmlChRes);
-
- return tszRes;
-}
-
-int initXslt() {
-
- HMODULE hModule;
-
- hModule = LoadLibraryA("libxml2.dll");
- if (hModule == NULL) {
- char path[MAX_PATH];
- char *cur;
-
- GetModuleFileNameA(NULL, path, sizeof(path));
- cur = strrchr(path, '\\');
- if (cur != NULL)
- strcpy(cur+1, "libxml2.dll");
- else
- strcpy(path, "libxml2.dll");
- hModule = LoadLibraryA(path);
- }
- if (hModule == NULL) {
- return -1;
- }
-
- pXmlParseFile = (struct _xmlDoc *(__cdecl *)(const char *))GetProcAddress(hModule, "xmlParseFile");
- pXmlFreeDoc = (void (__cdecl *)(struct _xmlDoc *))GetProcAddress(hModule, "xmlFreeDoc");
- pXmlCleanupParser = (void (__cdecl *)(void ))GetProcAddress(hModule, "xmlCleanupParser");
- pXmlInitParser = (void (__cdecl *)(void ))GetProcAddress(hModule, "xmlInitParser");
- pXmlParseMemory = (struct _xmlDoc *(__cdecl *)(const char *,int ))GetProcAddress(hModule, "xmlParseMemory");
- pXmlFree = (void (__cdecl *)(void *))*((void (__cdecl **)(void *))GetProcAddress(hModule, "xmlFree"));
- pXmlSubstituteEntitiesDefault = (int (__cdecl *)(int ))GetProcAddress(hModule, "xmlSubstituteEntitiesDefault");
-
- hModule = LoadLibraryA("libxslt.dll");
- if (hModule == NULL) {
- char path[MAX_PATH];
- char *cur;
-
- GetModuleFileNameA(NULL, path, sizeof(path));
- cur = strrchr(path, '\\');
- if (cur != NULL)
- strcpy(cur+1, "libxslt.dll");
- else
- strcpy(path, "libxslt.dll");
- hModule = LoadLibraryA(path);
- }
- if (hModule == NULL) {
- return -1;
- }
-
- /* xmlFree !!! pthreads? */
-
- pXsltParseStylesheetFile = (struct _xsltStylesheet *(__cdecl *)(const unsigned char *))GetProcAddress(hModule, "xsltParseStylesheetFile");
- pXsltFreeStylesheet = (void (__cdecl *)(struct _xsltStylesheet *))GetProcAddress(hModule, "xsltFreeStylesheet");
- pXsltApplyStylesheet = (struct _xmlDoc *(__cdecl *)(struct _xsltStylesheet *,struct _xmlDoc *,const char ** ))GetProcAddress(hModule, "xsltApplyStylesheet");
- pXsltSaveResultToString = (int (__cdecl *)(unsigned char ** ,int *,struct _xmlDoc *,struct _xsltStylesheet *))GetProcAddress(hModule, "xsltSaveResultToString");
- pXsltCleanupGlobals = (void (__cdecl *)(void ))GetProcAddress(hModule, "xsltCleanupGlobals");
- pXsltParseStylesheetDoc = (struct _xsltStylesheet *(__cdecl *)(struct _xmlDoc *))GetProcAddress(hModule, "xsltParseStylesheetDoc");
-
- /* init */
- pXmlInitParser();
- pXmlSubstituteEntitiesDefault(1);
-
- return 0;
-}
-
-int registerXsltTokens() {
-
- if (initXslt() != 0) {
- log_infoA("Variables: XSLT library not initialized");
- return -1;
- }
-
- registerIntToken(_T(XSLTF), parseXsltf, TRF_FUNCTION, "XML\t(x,y)\tapply stylesheet file x to document file y");
- registerIntToken(_T(XSLTS), parseXslts, TRF_FUNCTION, "XML\t(x,y)\tapply stylesheet x to document y");
-
- return 0;
-}
|