mirror of
https://gitlab.gnome.org/GNOME/libxslt
synced 2025-08-08 21:42:07 +03:00
Copying testplugin.c to the right place really, Daniel
This commit is contained in:
Daniel Veillard
329
tests/plugins/testplugin.c
Normal file
329
tests/plugins/testplugin.c
Normal file
@@ -0,0 +1,329 @@
|
||||
/*
|
||||
* extensions.c: Implemetation of the extensions support
|
||||
*
|
||||
* Reference:
|
||||
* http://www.w3.org/TR/1999/REC-xslt-19991116
|
||||
*
|
||||
* See Copyright for the status of this software.
|
||||
*
|
||||
* daniel@veillard.com
|
||||
*/
|
||||
|
||||
#define IN_LIBXSLT
|
||||
#include "libxslt.h"
|
||||
|
||||
#ifdef WITH_MODULES
|
||||
|
||||
#include <string.h>
|
||||
#include <limits.h>
|
||||
|
||||
#include <libxml/xmlmemory.h>
|
||||
#include <libxml/tree.h>
|
||||
#include <libxml/hash.h>
|
||||
#include <libxml/xmlerror.h>
|
||||
#include <libxml/parserInternals.h>
|
||||
#include <libxml/xpathInternals.h>
|
||||
#include <libxml/list.h>
|
||||
#include <libxml/xmlIO.h>
|
||||
#include "xslt.h"
|
||||
#include "xsltInternals.h"
|
||||
#include "xsltutils.h"
|
||||
#include "imports.h"
|
||||
#include "extensions.h"
|
||||
|
||||
#define XSLT_TESTPLUGIN_URL "http://xmlsoft.org/xslt/testplugin"
|
||||
|
||||
/************************************************************************
|
||||
* *
|
||||
* Test plugin module http://xmlsoft.org/xslt/testplugin *
|
||||
* *
|
||||
************************************************************************/
|
||||
|
||||
/************************************************************************
|
||||
* *
|
||||
* Test of the extension module API *
|
||||
* *
|
||||
************************************************************************/
|
||||
|
||||
static xmlChar *testData = NULL;
|
||||
static xmlChar *testStyleData = NULL;
|
||||
|
||||
/**
|
||||
* xsltExtFunctionTest:
|
||||
* @ctxt: the XPath Parser context
|
||||
* @nargs: the number of arguments
|
||||
*
|
||||
* function libxslt:test() for testing the extensions support.
|
||||
*/
|
||||
static void
|
||||
xsltExtFunctionTest(xmlXPathParserContextPtr ctxt,
|
||||
int nargs ATTRIBUTE_UNUSED)
|
||||
{
|
||||
xsltTransformContextPtr tctxt;
|
||||
void *data = NULL;
|
||||
|
||||
tctxt = xsltXPathGetTransformContext(ctxt);
|
||||
|
||||
if (testData == NULL) {
|
||||
xsltGenericDebug(xsltGenericDebugContext,
|
||||
"xsltExtFunctionTest: not initialized,"
|
||||
" calling xsltGetExtData\n");
|
||||
data = xsltGetExtData(tctxt, (const xmlChar *) XSLT_TESTPLUGIN_URL);
|
||||
if (data == NULL) {
|
||||
xsltTransformError(tctxt, NULL, NULL,
|
||||
"xsltExtElementTest: not initialized\n");
|
||||
return;
|
||||
}
|
||||
}
|
||||
if (tctxt == NULL) {
|
||||
xsltTransformError(xsltXPathGetTransformContext(ctxt), NULL, NULL,
|
||||
"xsltExtFunctionTest: failed to get the transformation context\n");
|
||||
return;
|
||||
}
|
||||
if (data == NULL)
|
||||
data = xsltGetExtData(tctxt, (const xmlChar *) XSLT_TESTPLUGIN_URL);
|
||||
if (data == NULL) {
|
||||
xsltTransformError(xsltXPathGetTransformContext(ctxt), NULL, NULL,
|
||||
"xsltExtFunctionTest: failed to get module data\n");
|
||||
return;
|
||||
}
|
||||
if (data != testData) {
|
||||
xsltTransformError(xsltXPathGetTransformContext(ctxt), NULL, NULL,
|
||||
"xsltExtFunctionTest: got wrong module data\n");
|
||||
return;
|
||||
}
|
||||
#ifdef WITH_XSLT_DEBUG_FUNCTION
|
||||
xsltGenericDebug(xsltGenericDebugContext,
|
||||
"libxslt:test() called with %d args\n", nargs);
|
||||
#endif
|
||||
}
|
||||
|
||||
/**
|
||||
* xsltExtElementPreCompTest:
|
||||
* @style: the stylesheet
|
||||
* @inst: the instruction in the stylesheet
|
||||
*
|
||||
* Process a libxslt:test node
|
||||
*/
|
||||
static xsltElemPreCompPtr
|
||||
xsltExtElementPreCompTest(xsltStylesheetPtr style, xmlNodePtr inst,
|
||||
xsltTransformFunction function)
|
||||
{
|
||||
xsltElemPreCompPtr ret;
|
||||
|
||||
if (style == NULL) {
|
||||
xsltTransformError(NULL, NULL, inst,
|
||||
"xsltExtElementTest: no transformation context\n");
|
||||
return (NULL);
|
||||
}
|
||||
if (testStyleData == NULL) {
|
||||
xsltGenericDebug(xsltGenericDebugContext,
|
||||
"xsltExtElementPreCompTest: not initialized,"
|
||||
" calling xsltStyleGetExtData\n");
|
||||
xsltStyleGetExtData(style, (const xmlChar *) XSLT_TESTPLUGIN_URL);
|
||||
if (testStyleData == NULL) {
|
||||
xsltTransformError(NULL, style, inst,
|
||||
"xsltExtElementPreCompTest: not initialized\n");
|
||||
if (style != NULL)
|
||||
style->errors++;
|
||||
return (NULL);
|
||||
}
|
||||
}
|
||||
if (inst == NULL) {
|
||||
xsltTransformError(NULL, style, inst,
|
||||
"xsltExtElementPreCompTest: no instruction\n");
|
||||
if (style != NULL)
|
||||
style->errors++;
|
||||
return (NULL);
|
||||
}
|
||||
ret = xsltNewElemPreComp(style, inst, function);
|
||||
return (ret);
|
||||
}
|
||||
|
||||
/**
|
||||
* xsltExtElementTest:
|
||||
* @ctxt: an XSLT processing context
|
||||
* @node: The current node
|
||||
* @inst: the instruction in the stylesheet
|
||||
* @comp: precomputed informations
|
||||
*
|
||||
* Process a libxslt:test node
|
||||
*/
|
||||
static void
|
||||
xsltExtElementTest(xsltTransformContextPtr ctxt, xmlNodePtr node,
|
||||
xmlNodePtr inst,
|
||||
xsltElemPreCompPtr comp ATTRIBUTE_UNUSED)
|
||||
{
|
||||
xmlNodePtr commentNode;
|
||||
|
||||
if (testData == NULL) {
|
||||
xsltGenericDebug(xsltGenericDebugContext,
|
||||
"xsltExtElementTest: not initialized,"
|
||||
" calling xsltGetExtData\n");
|
||||
xsltGetExtData(ctxt, (const xmlChar *) XSLT_TESTPLUGIN_URL);
|
||||
if (testData == NULL) {
|
||||
xsltTransformError(ctxt, NULL, inst,
|
||||
"xsltExtElementTest: not initialized\n");
|
||||
return;
|
||||
}
|
||||
}
|
||||
if (ctxt == NULL) {
|
||||
xsltTransformError(ctxt, NULL, inst,
|
||||
"xsltExtElementTest: no transformation context\n");
|
||||
return;
|
||||
}
|
||||
if (node == NULL) {
|
||||
xsltTransformError(ctxt, NULL, inst,
|
||||
"xsltExtElementTest: no current node\n");
|
||||
return;
|
||||
}
|
||||
if (inst == NULL) {
|
||||
xsltTransformError(ctxt, NULL, inst,
|
||||
"xsltExtElementTest: no instruction\n");
|
||||
return;
|
||||
}
|
||||
if (ctxt->insert == NULL) {
|
||||
xsltTransformError(ctxt, NULL, inst,
|
||||
"xsltExtElementTest: no insertion point\n");
|
||||
return;
|
||||
}
|
||||
commentNode = xmlNewComment((const xmlChar *)
|
||||
"libxslt:testplugin element test worked");
|
||||
xmlAddChild(ctxt->insert, commentNode);
|
||||
}
|
||||
|
||||
/**
|
||||
* xsltExtInitTest:
|
||||
* @ctxt: an XSLT transformation context
|
||||
* @URI: the namespace URI for the extension
|
||||
*
|
||||
* A function called at initialization time of an XSLT extension module
|
||||
*
|
||||
* Returns a pointer to the module specific data for this transformation
|
||||
*/
|
||||
static void *
|
||||
xsltExtInitTest(xsltTransformContextPtr ctxt, const xmlChar * URI)
|
||||
{
|
||||
if (testStyleData == NULL) {
|
||||
xsltGenericDebug(xsltGenericErrorContext,
|
||||
"xsltExtInitTest: not initialized,"
|
||||
" calling xsltStyleGetExtData\n");
|
||||
xsltStyleGetExtData(ctxt->style, URI);
|
||||
if (testStyleData == NULL) {
|
||||
xsltTransformError(ctxt, NULL, NULL,
|
||||
"xsltExtInitTest: not initialized\n");
|
||||
return (NULL);
|
||||
}
|
||||
}
|
||||
if (testData != NULL) {
|
||||
xsltTransformError(ctxt, NULL, NULL,
|
||||
"xsltExtInitTest: already initialized\n");
|
||||
return (NULL);
|
||||
}
|
||||
testData = (void *) "test data";
|
||||
xsltGenericDebug(xsltGenericDebugContext,
|
||||
"Registered test plugin module : %s\n", URI);
|
||||
return (testData);
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* xsltExtShutdownTest:
|
||||
* @ctxt: an XSLT transformation context
|
||||
* @URI: the namespace URI for the extension
|
||||
* @data: the data associated to this module
|
||||
*
|
||||
* A function called at shutdown time of an XSLT extension module
|
||||
*/
|
||||
static void
|
||||
xsltExtShutdownTest(xsltTransformContextPtr ctxt,
|
||||
const xmlChar * URI, void *data)
|
||||
{
|
||||
if (testData == NULL) {
|
||||
xsltTransformError(ctxt, NULL, NULL,
|
||||
"xsltExtShutdownTest: not initialized\n");
|
||||
return;
|
||||
}
|
||||
if (data != testData) {
|
||||
xsltTransformError(ctxt, NULL, NULL,
|
||||
"xsltExtShutdownTest: wrong data\n");
|
||||
}
|
||||
testData = NULL;
|
||||
xsltGenericDebug(xsltGenericDebugContext,
|
||||
"Unregistered test plugin module : %s\n", URI);
|
||||
}
|
||||
|
||||
/**
|
||||
* xsltExtStyleInitTest:
|
||||
* @style: an XSLT stylesheet
|
||||
* @URI: the namespace URI for the extension
|
||||
*
|
||||
* A function called at initialization time of an XSLT extension module
|
||||
*
|
||||
* Returns a pointer to the module specific data for this transformation
|
||||
*/
|
||||
static void *
|
||||
xsltExtStyleInitTest(xsltStylesheetPtr style ATTRIBUTE_UNUSED,
|
||||
const xmlChar * URI)
|
||||
{
|
||||
if (testStyleData != NULL) {
|
||||
xsltTransformError(NULL, NULL, NULL,
|
||||
"xsltExtInitTest: already initialized\n");
|
||||
return (NULL);
|
||||
}
|
||||
testStyleData = (void *) "test data";
|
||||
xsltGenericDebug(xsltGenericDebugContext,
|
||||
"Registered test plugin module : %s\n", URI);
|
||||
return (testStyleData);
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* xsltExtStyleShutdownTest:
|
||||
* @style: an XSLT stylesheet
|
||||
* @URI: the namespace URI for the extension
|
||||
* @data: the data associated to this module
|
||||
*
|
||||
* A function called at shutdown time of an XSLT extension module
|
||||
*/
|
||||
static void
|
||||
xsltExtStyleShutdownTest(xsltStylesheetPtr style ATTRIBUTE_UNUSED,
|
||||
const xmlChar * URI, void *data)
|
||||
{
|
||||
if (testStyleData == NULL) {
|
||||
xsltGenericError(xsltGenericErrorContext,
|
||||
"xsltExtShutdownTest: not initialized\n");
|
||||
return;
|
||||
}
|
||||
if (data != testStyleData) {
|
||||
xsltTransformError(NULL, NULL, NULL,
|
||||
"xsltExtShutdownTest: wrong data\n");
|
||||
}
|
||||
testStyleData = NULL;
|
||||
xsltGenericDebug(xsltGenericDebugContext,
|
||||
"Unregistered test plugin module : %s\n", URI);
|
||||
}
|
||||
|
||||
/**
|
||||
* xmlsoft_org_xslt_testplugin_init:
|
||||
*
|
||||
* Registers the test plugin module
|
||||
*/
|
||||
|
||||
void
|
||||
xmlsoft_org_xslt_testplugin_init(void)
|
||||
{
|
||||
xsltRegisterExtModuleFull((const xmlChar *) XSLT_TESTPLUGIN_URL,
|
||||
xsltExtInitTest, xsltExtShutdownTest,
|
||||
xsltExtStyleInitTest,
|
||||
xsltExtStyleShutdownTest);
|
||||
xsltRegisterExtModuleFunction((const xmlChar *) "testplugin",
|
||||
(const xmlChar *) XSLT_TESTPLUGIN_URL,
|
||||
xsltExtFunctionTest);
|
||||
xsltRegisterExtModuleElement((const xmlChar *) "testplugin",
|
||||
(const xmlChar *) XSLT_TESTPLUGIN_URL,
|
||||
xsltExtElementPreCompTest,
|
||||
xsltExtElementTest);
|
||||
}
|
||||
|
||||
#endif /*WITH_MODULES*/
|
||||
Reference in New Issue
Block a user