From 58b1837132acdc0f4683fef187b6a5b06534fa85 Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Fri, 10 Nov 2006 13:10:31 +0000
Subject: [PATCH] Test for bug #730.

---
 test/xslt/Makefile.am         |    7 ++--
 test/xslt/marc-missing-ns.xml |   34 +++++++++++++++++++
 test/xslt/xslt5.c             |   74 +++++++++++++++++++++++++++++++++++++++++
 test/xslt/zebra.cfg           |    6 +++-
 4 files changed, 117 insertions(+), 4 deletions(-)
 create mode 100644 test/xslt/marc-missing-ns.xml
 create mode 100644 test/xslt/xslt5.c

diff --git a/test/xslt/Makefile.am b/test/xslt/Makefile.am
index 7cd4bb2..9589079 100644
--- a/test/xslt/Makefile.am
+++ b/test/xslt/Makefile.am
@@ -1,16 +1,17 @@
-# $Id: Makefile.am,v 1.9 2006-07-03 14:27:35 adam Exp $
+# $Id: Makefile.am,v 1.10 2006-11-10 13:10:31 adam Exp $
 
-check_PROGRAMS = xslt1 xslt2 xslt3 xslt4
+check_PROGRAMS = xslt1 xslt2 xslt3 xslt4 xslt5
 TESTS = $(check_PROGRAMS)
 
 EXTRA_DIST=zebra.cfg zebrastaticrank.cfg \
- marc-col.xml marc-one.xml index.xsl id.xsl \
+ marc-col.xml marc-one.xml marc-missing-ns.xml index.xsl id.xsl \
  marcschema-col.xml marcschema-one.xml snippet.xsl
 
 xslt1_SOURCES = xslt1.c
 xslt2_SOURCES = xslt2.c
 xslt3_SOURCES = xslt3.c
 xslt4_SOURCES = xslt4.c
+xslt5_SOURCES = xslt5.c
 
 AM_CPPFLAGS = -I$(srcdir)/../api -I$(top_srcdir)/include $(YAZINC)
 
diff --git a/test/xslt/marc-missing-ns.xml b/test/xslt/marc-missing-ns.xml
new file mode 100644
index 0000000..560a121
--- /dev/null
+++ b/test/xslt/marc-missing-ns.xml
@@ -0,0 +1,34 @@
+<record xmlns="http://www.loc.gov/MARC21/slim">
+  <rank>42</rank>
+  <leader>00366nam  22001698a 4500</leader>
+  <controlfield tag="001">   11224466   </controlfield>
+  <controlfield tag="003">DLC  </controlfield>
+  <controlfield tag="005">00000000000000.0  </controlfield>
+  <controlfield tag="008">910710c19910701nju           00010 eng    </controlfield>
+  <datafield tag="010" ind1=" " ind2=" ">
+    <subfield code="a">   11224466 </subfield>
+  </datafield>
+  <datafield tag="040" ind1=" " ind2=" ">
+    <subfield code="a">DLC</subfield>
+    <subfield code="c">DLC</subfield>
+  </datafield>
+  <datafield tag="050" ind1="0" ind2="0">
+    <subfield code="a">123-xyz</subfield>
+  </datafield>
+  <datafield tag="100" ind1="1" ind2="0">
+    <subfield code="a">Jack Collins</subfield>
+  </datafield>
+  <datafield tag="245" ind1="1" ind2="0">
+    <subfield code="a">How to program a computer</subfield>
+  </datafield>
+  <datafield tag="260" ind1="1" ind2=" ">
+    <subfield code="a">Penguin</subfield>
+  </datafield>
+  <datafield tag="263" ind1=" " ind2=" ">
+    <subfield code="a">8710</subfield>
+  </datafield>
+  <datafield tag="300" ind1=" " ind2=" ">
+    <subfield code="a">p. cm.</subfield>
+    <e:extension/>
+  </datafield>
+</record>
diff --git a/test/xslt/xslt5.c b/test/xslt/xslt5.c
new file mode 100644
index 0000000..2d041c9
--- /dev/null
+++ b/test/xslt/xslt5.c
@@ -0,0 +1,74 @@
+/* $Id: xslt5.c,v 1.1 2006-11-10 13:10:31 adam Exp $
+   Copyright (C) 1995-2006
+   Index Data ApS
+
+This file is part of the Zebra server.
+
+Zebra 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
+Software Foundation; either version 2, or (at your option) any later
+version.
+
+Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+
+*/
+
+#include <stdio.h>
+#include "testlib.h"
+
+static void tst(int argc, char **argv)
+{
+    char path[256];
+    char profile_path[256];
+    char record_buf[20000];
+    FILE *f;
+    size_t r;
+
+    ZebraService zs = tl_start_up(0, argc, argv);
+    ZebraHandle  zh = zebra_open(zs, 0);
+
+    tl_check_filter(zs, "alvis");
+
+    YAZ_CHECK(zebra_select_database(zh, "Default") == ZEBRA_OK);
+    
+    zebra_init(zh);
+
+    sprintf(profile_path, "%s:%s/../../tab", 
+            tl_get_srcdir(), tl_get_srcdir());
+    zebra_set_resource(zh, "profilePath", profile_path);
+
+    zebra_set_resource(zh, "recordType", "alvis.marcschema-one.xml");
+
+    sprintf(path, "%.200s/marc-missing-ns.xml", tl_get_srcdir());
+    f = fopen(path, "rb");
+    YAZ_CHECK(f);
+    if (f)
+    {
+        r = fread(record_buf, 1, sizeof(record_buf)-1, f);
+        fclose(f);
+        YAZ_CHECK(r > 2);
+        record_buf[r] = '\0';
+        
+        YAZ_CHECK_EQ(zebra_add_record(zh, record_buf, strlen(record_buf)),
+                     ZEBRA_FAIL);
+    }
+    YAZ_CHECK(tl_close_down(zh, zs));
+}
+
+TL_MAIN
+
+/*
+ * Local variables:
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * End:
+ * vim: shiftwidth=4 tabstop=8 expandtab
+ */
+
diff --git a/test/xslt/zebra.cfg b/test/xslt/zebra.cfg
index c5f114b..05f8c2b 100644
--- a/test/xslt/zebra.cfg
+++ b/test/xslt/zebra.cfg
@@ -1,5 +1,9 @@
-profilePath: ${srcdir:-.}/../../tab
+profilePath: ${srcdir:-.}:${srcdir:-.}/../../tab
 
 modulePath: ../../index/.libs
 
+recordType: alvis.marcschema-one.xml
+
+perm.anonymous: rw
+
 
-- 
1.7.10.4