21 #include <libxml/xpath.h>
22 #include <libxml/tree.h>
23 #include <libxml/xmlmemory.h>
27 #include <libxslt/xslt.h>
28 #include <libxslt/xsltInternals.h>
29 #include <libxslt/security.h>
30 #include <libxslt/transform.h>
31 #include <libxslt/xsltutils.h>
41 static const char **parse_params(
text *paramstr);
58 volatile xsltStylesheetPtr stylesheet = NULL;
59 volatile xmlDocPtr doctree = NULL;
60 volatile xmlDocPtr restree = NULL;
61 volatile xsltSecurityPrefsPtr xslt_sec_prefs = NULL;
62 volatile xsltTransformContextPtr xslt_ctxt = NULL;
63 volatile int resstat = -1;
64 xmlChar *resstr = NULL;
67 if (fcinfo->nargs == 3)
70 params = parse_params(paramstr);
75 params = (
const char **)
palloc(
sizeof(
char *));
85 bool xslt_sec_prefs_error;
88 doctree = xmlParseMemory((
char *)
VARDATA_ANY(doct),
93 "error parsing XML document");
96 ssdoc = xmlParseMemory((
char *)
VARDATA_ANY(ssheet),
101 "error parsing stylesheet as XML document");
104 stylesheet = xsltParseStylesheetDoc(ssdoc);
106 if (stylesheet == NULL)
108 "failed to parse stylesheet");
110 xslt_ctxt = xsltNewTransformContext(stylesheet, doctree);
112 xslt_sec_prefs_error =
false;
113 if ((xslt_sec_prefs = xsltNewSecurityPrefs()) == NULL)
114 xslt_sec_prefs_error =
true;
116 if (xsltSetSecurityPrefs(xslt_sec_prefs, XSLT_SECPREF_READ_FILE,
117 xsltSecurityForbid) != 0)
118 xslt_sec_prefs_error =
true;
119 if (xsltSetSecurityPrefs(xslt_sec_prefs, XSLT_SECPREF_WRITE_FILE,
120 xsltSecurityForbid) != 0)
121 xslt_sec_prefs_error =
true;
122 if (xsltSetSecurityPrefs(xslt_sec_prefs, XSLT_SECPREF_CREATE_DIRECTORY,
123 xsltSecurityForbid) != 0)
124 xslt_sec_prefs_error =
true;
125 if (xsltSetSecurityPrefs(xslt_sec_prefs, XSLT_SECPREF_READ_NETWORK,
126 xsltSecurityForbid) != 0)
127 xslt_sec_prefs_error =
true;
128 if (xsltSetSecurityPrefs(xslt_sec_prefs, XSLT_SECPREF_WRITE_NETWORK,
129 xsltSecurityForbid) != 0)
130 xslt_sec_prefs_error =
true;
131 if (xsltSetCtxtSecurityPrefs(xslt_sec_prefs, xslt_ctxt) != 0)
132 xslt_sec_prefs_error =
true;
134 if (xslt_sec_prefs_error)
136 (
errmsg(
"could not set libxslt security preferences")));
138 restree = xsltApplyStylesheetUser(stylesheet, doctree, params,
139 NULL, NULL, xslt_ctxt);
143 "failed to apply stylesheet");
145 resstat = xsltSaveResultToString(&resstr, &reslen, restree, stylesheet);
151 if (xslt_ctxt != NULL)
152 xsltFreeTransformContext(xslt_ctxt);
153 if (xslt_sec_prefs != NULL)
154 xsltFreeSecurityPrefs(xslt_sec_prefs);
155 if (stylesheet != NULL)
156 xsltFreeStylesheet(stylesheet);
159 xsltCleanupGlobals();
168 xsltFreeTransformContext(xslt_ctxt);
169 xsltFreeSecurityPrefs(xslt_sec_prefs);
170 xsltFreeStylesheet(stylesheet);
172 xsltCleanupGlobals();
189 (
errcode(ERRCODE_FEATURE_NOT_SUPPORTED),
190 errmsg(
"xslt_process() is not available without libxslt")));
198 parse_params(
text *paramstr)
211 params = (
const char **)
palloc((max_params + 1) *
sizeof(
char *));
218 if (nparams >= max_params)
221 params = (
const char **)
repalloc(params,
222 (max_params + 1) *
sizeof(
char *));
224 params[nparams++] = pos;
225 pos = strstr(pos, nvsep);
239 params[nparams++] = pos;
240 pos = strstr(pos, itsep);
251 params[nparams] = NULL;
int errcode(int sqlerrcode)
int errmsg(const char *fmt,...)
#define ereport(elevel,...)
#define PG_GETARG_TEXT_PP(n)
#define PG_RETURN_TEXT_P(x)
void * repalloc(void *pointer, Size size)
#define VARSIZE_ANY_EXHDR(PTR)
char * text_to_cstring(const text *t)
text * cstring_to_text_with_len(const char *s, int len)
struct PgXmlErrorContext PgXmlErrorContext
void xml_ereport(PgXmlErrorContext *errcxt, int level, int sqlcode, const char *msg)
void pg_xml_done(PgXmlErrorContext *errcxt, bool isError)
@ PG_XML_STRICTNESS_LEGACY
PgXmlErrorContext * pgxml_parser_init(PgXmlStrictness strictness)
PG_FUNCTION_INFO_V1(xslt_process)
Datum xslt_process(PG_FUNCTION_ARGS)