/* This file is part of the YAZ toolkit.
- * Copyright (C) 1995-2013 Index Data
+ * Copyright (C) Index Data
* See the file LICENSE for details.
*/
/**
#include <yaz/oid_db.h>
#if YAZ_HAVE_XML2
-#include <libxml/parser.h>
-#include <libxml/tree.h>
+#include "sru-p.h"
-static int match_element(xmlNode *ptr, const char *elem)
+static int match_element_next(xmlNode **ptr, const char *elem, NMEM nmem,
+ char **val)
{
- if (ptr->type == XML_ELEMENT_NODE && !xmlStrcmp(ptr->name, BAD_CAST elem))
+ while (*ptr && (*ptr)->type != XML_ELEMENT_NODE)
+ (*ptr) = (*ptr)->next;
+ if (*ptr && yaz_match_xsd_string_n_nmem(*ptr, elem, nmem, val, 0))
{
+ *ptr = (*ptr)->next;
return 1;
}
+ *val = 0;
return 0;
}
-static int match_xsd_string_n(xmlNodePtr ptr, const char *elem, NMEM nmem,
- char **val, int *len)
-{
- if (!match_element(ptr, elem))
- return 0;
- ptr = ptr->children;
- if (!ptr || ptr->type != XML_TEXT_NODE)
- {
- *val = "";
- return 1;
- }
- *val = nmem_strdup(nmem, (const char *) ptr->content);
- if (len)
- *len = xmlStrlen(ptr->content);
- return 1;
-}
-
-static int match_element_next(xmlNode **ptr, const char *elem, NMEM nmem,
- char **val)
+static int match_v_next(xmlNode **ptr, const char *elem, NMEM nmem,
+ Odr_bool **val)
{
while (*ptr && (*ptr)->type != XML_ELEMENT_NODE)
(*ptr) = (*ptr)->next;
- if (*ptr && match_xsd_string_n(*ptr, elem, nmem, val, 0))
+ *val = nmem_booldup(nmem, 0);
+ if (*ptr && yaz_match_xsd_element(*ptr, elem))
{
+ struct _xmlAttr *attr = (*ptr)->properties;
+
*ptr = (*ptr)->next;
- return 1;
+ for (; attr; attr = attr->next)
+ {
+ if (!strcmp((const char *) attr->name, "value"))
+ {
+ if (attr->children->type == XML_TEXT_NODE)
+ {
+ if (attr->children->content[0] == '0')
+ return 1;
+ else if (attr->children->content[0] == '1')
+ {
+ **val = 1;
+ return 1;
+ }
+ }
+ }
+ }
}
- *val = 0;
return 0;
}
static int bibliographicRecord(yaz_marc_t mt, xmlNode *ptr, Z_External **ext,
- yaz_iconv_t cd, NMEM nmem)
+ yaz_iconv_t cd, NMEM nmem, const Odr_oid *syntax)
{
int ret = 0;
if (yaz_marc_read_xml(mt, ptr) == 0)
WRBUF wr = wrbuf_alloc();
if (yaz_marc_write_iso2709(mt, wr) == 0)
{
- *ext = z_ext_record_oid_nmem(nmem, yaz_oid_recsyn_usmarc,
- wrbuf_buf(wr), wrbuf_len(wr));
+ *ext = z_ext_record_oid_nmem(
+ nmem, syntax ? syntax : yaz_oid_recsyn_usmarc,
+ wrbuf_buf(wr), wrbuf_len(wr));
ret = 1;
}
wrbuf_destroy(wr);
{
while (ptr && ptr->type != XML_ELEMENT_NODE)
ptr = ptr->next;
- if (!match_element(ptr, "volume"))
+ if (!ptr)
+ break;
+ if (!yaz_match_xsd_element(ptr, "volume"))
return 0;
ptr = ptr->next;
}
{
while (ptr && ptr->type != XML_ELEMENT_NODE)
ptr = ptr->next;
- if (!match_element(ptr, "volume"))
+ if (!ptr)
+ break;
+ if (!yaz_match_xsd_element(ptr, "volume"))
return 0;
volume(ptr->children, (*volp) + i, nmem);
ptr = ptr->next;
return 1;
}
-static void circulations(xmlNode *ptr, Z_CircRecord ***circp,
- int *num, NMEM nmem)
+static int circulation(xmlNode *ptr, Z_CircRecord **circp, NMEM nmem)
{
+ *circp = (Z_CircRecord *) nmem_malloc(nmem, sizeof(Z_CircRecord));
+ match_v_next(&ptr, "availableNow", nmem, &(*circp)->availableNow);
+ /* note the spelling of the ASN.1 member below */
+ match_element_next(&ptr, "availabilityDate", nmem,
+ &(*circp)->availablityDate);
+ match_element_next(&ptr, "availableThru", nmem, &(*circp)->availableThru);
+ match_element_next(&ptr, "restrictions", nmem, &(*circp)->restrictions);
+ match_element_next(&ptr, "itemId", nmem, &(*circp)->itemId);
+ match_v_next(&ptr, "renewable", nmem, &(*circp)->renewable);
+ match_v_next(&ptr, "onHold", nmem, &(*circp)->onHold);
+ match_element_next(&ptr, "enumAndChron", nmem, &(*circp)->enumAndChron);
+ match_element_next(&ptr, "midspine", nmem, &(*circp)->midspine);
+ match_element_next(&ptr, "temporaryLocation", nmem,
+ &(*circp)->temporaryLocation);
+ return 1;
+}
+
+static int circulations(xmlNode *ptr, Z_CircRecord ***circp,
+ int *num, NMEM nmem)
+{
+ int i;
+ xmlNode *ptr0 = ptr;
+
+ for (i = 0; ptr; i++)
+ {
+ while (ptr && ptr->type != XML_ELEMENT_NODE)
+ ptr = ptr->next;
+ if (!ptr)
+ break;
+ if (!yaz_match_xsd_element(ptr, "circulation"))
+ return 0;
+ ptr = ptr->next;
+ }
+ *num = i;
+ *circp = (Z_CircRecord **) nmem_malloc(nmem, sizeof(**circp) * i);
+ ptr = ptr0;
+ for (i = 0; ptr; i++)
+ {
+ while (ptr && ptr->type != XML_ELEMENT_NODE)
+ ptr = ptr->next;
+ if (!ptr)
+ break;
+ if (!yaz_match_xsd_element(ptr, "circulation"))
+ return 0;
+ circulation(ptr->children, (*circp) + i, nmem);
+ ptr = ptr->next;
+ }
+ return 1;
}
static int holdingsRecord(xmlNode *ptr, Z_HoldingsRecord **r, NMEM nmem)
h->volumes = 0;
while (ptr && ptr->type != XML_ELEMENT_NODE)
ptr = ptr->next;
- if (match_element(ptr, "volumes"))
+ if (yaz_match_xsd_element(ptr, "volumes"))
{
volumes(ptr->children, &h->volumes, &h->num_volumes, nmem);
ptr = ptr->next;
h->circulationData = 0;
while (ptr && ptr->type != XML_ELEMENT_NODE)
ptr = ptr->next;
- if (match_element(ptr, "circulations"))
+ if (yaz_match_xsd_element(ptr, "circulations"))
{
circulations(ptr->children, &h->circulationData,
&h->num_circulationData, nmem);
return 1;
}
-int yaz_xml_to_opac(yaz_marc_t mt, xmlNode *ptr, Z_OPACRecord **dst,
- yaz_iconv_t cd, NMEM nmem)
+static int yaz_xml_to_opac_ptr(yaz_marc_t mt, xmlNode *ptr,
+ Z_OPACRecord **dst,
+ yaz_iconv_t cd, NMEM nmem,
+ const Odr_oid *syntax)
{
int i;
Z_External *ext = 0;
if (!nmem)
nmem = yaz_marc_get_nmem(mt);
- if (!match_element(ptr, "opacRecord"))
+ if (!yaz_match_xsd_element(ptr, "opacRecord"))
return 0;
ptr = ptr->children;
while (ptr && ptr->type != XML_ELEMENT_NODE)
ptr = ptr->next;
- if (!match_element(ptr, "bibliographicRecord"))
+ if (!yaz_match_xsd_element(ptr, "bibliographicRecord"))
return 0;
- if (!bibliographicRecord(mt, ptr->children, &ext, cd, nmem))
+ if (!bibliographicRecord(mt, ptr->children, &ext, cd, nmem, syntax))
return 0;
*dst = opac = (Z_OPACRecord *) nmem_malloc(nmem, sizeof(*opac));
opac->num_holdingsData = 0;
opac->holdingsData = 0;
opac->bibliographicRecord = ext;
+ ptr = ptr->next;
while (ptr && ptr->type != XML_ELEMENT_NODE)
ptr = ptr->next;
- if (!match_element(ptr, "holdings"))
+ if (!yaz_match_xsd_element(ptr, "holdings"))
return 0;
ptr = ptr->children;
ptr = ptr->next;
if (!ptr)
break;
- if (!match_element(ptr, "holding"))
+ if (!yaz_match_xsd_element(ptr, "holding"))
return 0;
ptr = ptr->next;
}
ptr = ptr->next;
if (!ptr)
break;
- if (!match_element(ptr, "holding"))
+ if (!yaz_match_xsd_element(ptr, "holding"))
return 0;
if (!holdingsRecord(ptr->children, opac->holdingsData + i, nmem))
return 0;
}
return 1;
}
+
+int yaz_xml_to_opac(yaz_marc_t mt, const char *buf_in, size_t size_in,
+ Z_OPACRecord **dst, yaz_iconv_t cd, NMEM nmem,
+ const Odr_oid *syntax)
+{
+ xmlDocPtr doc = xmlParseMemory(buf_in, size_in);
+ int r = 0;
+ if (doc)
+ {
+ r = yaz_xml_to_opac_ptr(mt, xmlDocGetRootElement(doc), dst, cd, nmem,
+ syntax);
+ xmlFreeDoc(doc);
+ }
+ return r;
+}
+
+
#endif
/*