X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=src%2Fxml_to_opac.c;h=236bf8a48966ea6ebc06284c9923e7c76514b144;hp=004f308f9ee605fcb4400f7f9d208fae6a2b0f3c;hb=f720562471a064dba92a465d999aa833e59d69b1;hpb=c7737ca64f706b92bf37ad107b92d8c73ff82932

diff --git a/src/xml_to_opac.c b/src/xml_to_opac.c
index 004f308..236bf8a 100644
--- a/src/xml_to_opac.c
+++ b/src/xml_to_opac.c
@@ -20,51 +20,55 @@
 #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)
@@ -72,8 +76,9 @@ static int bibliographicRecord(yaz_marc_t mt, xmlNode *ptr, Z_External **ext,
         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);
@@ -100,7 +105,9 @@ static int volumes(xmlNode *ptr, Z_Volume ***volp, int *num, NMEM nmem)
     {
         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;
     }
@@ -111,7 +118,9 @@ static int volumes(xmlNode *ptr, Z_Volume ***volp, int *num, NMEM nmem)
     {
         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;
@@ -119,10 +128,57 @@ static int volumes(xmlNode *ptr, Z_Volume ***volp, int *num, NMEM nmem)
     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)
@@ -157,7 +213,7 @@ 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;
@@ -167,7 +223,7 @@ static int holdingsRecord(xmlNode *ptr, Z_HoldingsRecord **r, NMEM nmem)
     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);
@@ -176,8 +232,10 @@ static int holdingsRecord(xmlNode *ptr, Z_HoldingsRecord **r, NMEM 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;
@@ -186,23 +244,24 @@ int yaz_xml_to_opac(yaz_marc_t mt, xmlNode *ptr, Z_OPACRecord **dst,
 
     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;
@@ -214,7 +273,7 @@ int yaz_xml_to_opac(yaz_marc_t mt, xmlNode *ptr, Z_OPACRecord **dst,
             ptr = ptr->next;
         if (!ptr)
             break;
-        if (!match_element(ptr, "holding"))
+        if (!yaz_match_xsd_element(ptr, "holding"))
             return 0;
         ptr = ptr->next;
     }
@@ -228,7 +287,7 @@ int yaz_xml_to_opac(yaz_marc_t mt, xmlNode *ptr, Z_OPACRecord **dst,
             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;
@@ -236,6 +295,23 @@ int yaz_xml_to_opac(yaz_marc_t mt, xmlNode *ptr, Z_OPACRecord **dst,
     }
     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
 
 /*