/* This file is part of Pazpar2.
- Copyright (C) 2006-2010 Index Data
+ Copyright (C) Index Data
Pazpar2 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
#include "normalize_record.h"
#include "pazpar2_config.h"
-
+#include "service_xslt.h"
#include "marcmap.h"
#include <libxslt/xslt.h>
#include <libxslt/transform.h>
struct normalize_step {
struct normalize_step *next;
- xsltStylesheet *stylesheet;
+ xsltStylesheet *stylesheet; /* created by normalize_record */
+ xsltStylesheet *stylesheet2; /* external stylesheet (service) */
struct marcmap *marcmap;
};
NMEM nmem;
};
-normalize_record_t normalize_record_create(struct conf_config *conf,
+normalize_record_t normalize_record_create(struct conf_service *service,
const char *spec)
{
NMEM nmem = nmem_create();
normalize_record_t nt = nmem_malloc(nmem, sizeof(*nt));
struct normalize_step **m = &nt->steps;
- int i, num;
int no_errors = 0;
- char **stylesheets;
+ int embed = 0;
+
+ if (*spec == '<')
+ embed = 1;
nt->nmem = nmem;
- nmem_strsplit(nt->nmem, ",", spec, &stylesheets, &num);
- for (i = 0; i < num; i++)
+ if (embed)
{
- WRBUF fname = conf_get_fname(conf, stylesheets[i]);
-
- *m = nmem_malloc(nt->nmem, sizeof(**m));
- (*m)->marcmap = NULL;
- (*m)->stylesheet = NULL;
-
- // XSLT
- if (!strcmp(&stylesheets[i][strlen(stylesheets[i])-4], ".xsl"))
- {
- if (!((*m)->stylesheet =
- xsltParseStylesheetFile((xmlChar *) wrbuf_cstr(fname))))
- {
- yaz_log(YLOG_FATAL|YLOG_ERRNO, "Unable to load stylesheet: %s",
- stylesheets[i]);
+ xmlDoc *xsp_doc = xmlParseMemory(spec, strlen(spec));
+
+ if (!xsp_doc)
+ no_errors++;
+ {
+ *m = nmem_malloc(nt->nmem, sizeof(**m));
+ (*m)->marcmap = NULL;
+ (*m)->stylesheet = NULL;
+ (*m)->stylesheet2 = NULL;
+
+
+ (*m)->stylesheet = xsltParseStylesheetDoc(xsp_doc);
+ if (!(*m)->stylesheet)
no_errors++;
- }
+ m = &(*m)->next;
}
- // marcmap
- else if (!strcmp(&stylesheets[i][strlen(stylesheets[i])-5], ".mmap"))
+ }
+ else
+ {
+ struct conf_config *conf = service->server->config;
+ int i, num;
+ char **stylesheets;
+ nmem_strsplit(nt->nmem, ",", spec, &stylesheets, &num);
+
+ for (i = 0; i < num; i++)
{
- if (!((*m)->marcmap = marcmap_load(wrbuf_cstr(fname), nt->nmem)))
+ WRBUF fname = conf_get_fname(conf, stylesheets[i]);
+
+ *m = nmem_malloc(nt->nmem, sizeof(**m));
+ (*m)->marcmap = NULL;
+ (*m)->stylesheet = NULL;
+
+ (*m)->stylesheet2 = service_xslt_get(service, stylesheets[i]);
+ if ((*m)->stylesheet2)
+ ;
+ else if (!strcmp(&stylesheets[i][strlen(stylesheets[i])-4], ".xsl"))
+ {
+ if (!((*m)->stylesheet =
+ xsltParseStylesheetFile((xmlChar *) wrbuf_cstr(fname))))
+ {
+ yaz_log(YLOG_FATAL|YLOG_ERRNO, "Unable to load stylesheet: %s",
+ stylesheets[i]);
+ no_errors++;
+ }
+ }
+ else if (!strcmp(&stylesheets[i][strlen(stylesheets[i])-5], ".mmap"))
{
- yaz_log(YLOG_FATAL|YLOG_ERRNO, "Unable to load marcmap: %s",
- stylesheets[i]);
+ if (!((*m)->marcmap = marcmap_load(wrbuf_cstr(fname), nt->nmem)))
+ {
+ yaz_log(YLOG_FATAL|YLOG_ERRNO, "Unable to load marcmap: %s",
+ stylesheets[i]);
+ no_errors++;
+ }
+ }
+ else
+ {
+ yaz_log(YLOG_FATAL, "Cannot handle stylesheet: %s", stylesheets[i]);
no_errors++;
}
- }
- else
- {
- yaz_log(YLOG_FATAL, "Cannot handle stylesheet: %s", stylesheets[i]);
- no_errors++;
- }
- wrbuf_destroy(fname);
- m = &(*m)->next;
+ wrbuf_destroy(fname);
+ m = &(*m)->next;
+ }
}
*m = 0; /* terminate list of steps */
}
int normalize_record_transform(normalize_record_t nt, xmlDoc **doc,
- const char **parms)
+ const char **parms)
{
- struct normalize_step *m;
- if (nt) {
+ if (nt)
+ {
+ struct normalize_step *m;
for (m = nt->steps; m; m = m->next)
{
xmlNodePtr root = 0;
- xmlDoc *new;
+ xmlDoc *ndoc;
if (m->stylesheet)
- {
- new = xsltApplyStylesheet(m->stylesheet, *doc, parms);
- }
+ ndoc = xsltApplyStylesheet(m->stylesheet, *doc, parms);
+ else if (m->stylesheet2)
+ ndoc = xsltApplyStylesheet(m->stylesheet2, *doc, parms);
else if (m->marcmap)
- {
- new = marcmap_apply(m->marcmap, *doc);
- }
-
- root = xmlDocGetRootElement(new);
-
+ ndoc = marcmap_apply(m->marcmap, *doc);
+ else
+ ndoc = 0;
xmlFreeDoc(*doc);
- if (!new || !root || !root->children)
+ *doc = 0;
+
+ if (ndoc)
+ root = xmlDocGetRootElement(ndoc);
+
+ if (ndoc && root && root->children)
+ *doc = ndoc;
+ else
{
- if (new)
- xmlFreeDoc(new);
- *doc = 0;
+ if (!ndoc)
+ yaz_log(YLOG_WARN, "XSLT produced no document");
+ else if (!root)
+ yaz_log(YLOG_WARN, "XSLT produced XML with no root node");
+ else if (!root->children)
+ yaz_log(YLOG_WARN, "XSLT produced XML with no root children nodes");
+ if (ndoc)
+ xmlFreeDoc(ndoc);
return -1;
}
- *doc = new;
}
}
return 0;