+static int convert_xslt(void *vinfo, WRBUF record, WRBUF wr_error)
+{
+ int ret = 0;
+ struct xslt_info *info = vinfo;
+
+ xmlDocPtr doc = xmlParseMemory(wrbuf_buf(record),
+ wrbuf_len(record));
+ if (!doc)
+ {
+ wrbuf_printf(wr_error, "xmlParseMemory failed");
+ ret = -1;
+ }
+ else
+ {
+ xmlDocPtr xsp_doc = xmlCopyDoc(info->xsp_doc, 1);
+ xsltStylesheetPtr xsp = xsltParseStylesheetDoc(xsp_doc);
+ xmlDocPtr res = xsltApplyStylesheet(xsp, doc, info->xsl_parms);
+ if (res)
+ {
+ xmlChar *out_buf = 0;
+ int out_len;
+
+#if HAVE_XSLTSAVERESULTTOSTRING
+ xsltSaveResultToString(&out_buf, &out_len, res, xsp);
+#else
+ xmlDocDumpFormatMemory (res, &out_buf, &out_len, 1);
+#endif
+ if (!out_buf)
+ {
+ wrbuf_printf(wr_error,
+ "xsltSaveResultToString failed");
+ ret = -1;
+ }
+ else
+ {
+ wrbuf_rewind(record);
+ wrbuf_write(record, (const char *) out_buf, out_len);
+
+ xmlFree(out_buf);
+ }
+ xmlFreeDoc(res);
+ }
+ else
+ {
+ wrbuf_printf(wr_error, "xsltApplyStylesheet failed");
+ ret = -1;
+ }
+ xmlFreeDoc(doc);
+ xsltFreeStylesheet(xsp); /* frees xsp_doc too */
+ }
+ return ret;
+}
+
+static void destroy_xslt(void *vinfo)
+{
+ struct xslt_info *info = vinfo;
+
+ if (info)
+ {
+ xmlFreeDoc(info->xsp_doc);
+ nmem_destroy(info->nmem);
+ }
+}
+
+/* YAZ_HAVE_XSLT */
+#endif
+
+
+static void *construct_marc(const xmlNode *ptr,
+ const char *path, WRBUF wr_error)