Add test case for rendering of UTF-8 MARC record

[yaz-moved-to-github.git] / test / test_embed_record.c

diff --git a/test/test_embed_record.c b/test/test_embed_record.c
index aac2987..ebb8a6a 100644 (file)
--- a/test/test_embed_record.c
+++ b/test/test_embed_record.c
@@ -13,18 +13,40 @@
 #include <yaz/log.h>
 #include <yaz/record_render.h>
 
-#if YAZ_HAVE_XML2
-
 #include <yaz/base64.h>
 #include <yaz/marcdisp.h>
 #include <yaz/proto.h>
 #include <yaz/prt-ext.h>
 
+#if YAZ_HAVE_XML2
+
 #include <libxml/parser.h>
 #include <libxml/tree.h>
+#endif
 
 void test1(void)
 {
+    int buflen;
+    for (buflen = 0; buflen < 256; buflen++)
+    {
+        char buf[256];
+        char buf_a[1024];
+        char buf_b[1024];
+        int i;
+        for (i = 0; i < buflen; i++)
+            buf[i] = 1 + i;
+        buf[i] = 0;
+
+        yaz_base64encode(buf, buf_a);
+
+        YAZ_CHECK(yaz_base64decode(buf_a, buf_b) == 0);
+
+        YAZ_CHECK(strcmp(buf, buf_b) == 0);
+    }
+}
+
+void test2(void)
+{
   char base_enc[] = 
     "MDA3NjZuYW0gIDIyMDAyNjU4YSA0NTAwMDAxMDAxMjAwMDAwMDAzMDAwNjAwMDEyMDA1MDAx"
     "NzAwMDE4MDA4MDA0MTAwMDM1MDEwMDAxNzAwMDc2MDIwMDAxNTAwMDkzMDM1MDAxODAwMTA4"
@@ -61,7 +83,6 @@ void test1(void)
     wrbuf_destroy(buf);
 
 }
-#endif
 
 static int test_render(const char *type_spec, int is_marc, const char *input,
                     const char *expected_output)
@@ -115,8 +136,9 @@ int main(int argc, char **argv)
 {
     YAZ_CHECK_INIT(argc, argv);
     YAZ_CHECK_LOG();
-#if YAZ_HAVE_XML2
     test1();
+    test2();
+#if YAZ_HAVE_XML2
     YAZ_CHECK(test_render("xml", 0, "<my/>", "<my/>"));
 
     YAZ_CHECK(test_render(
@@ -145,7 +167,7 @@ int main(int argc, char **argv)
     YAZ_CHECK(test_render("xml", 0, "<my/>", "<my/>"));
 
     YAZ_CHECK(test_render(
-                  "xml; base64(/my/text(),xml)", 0,
+                  "xml; base64=/my/text()", 0,
                   "<my>"
                   "MDAxMzhuYW0gIDIyMDAwNzM4YSA0NTAwMDAxMDAxMzAwMDAwMDAzMDAwNDAwMDEzMTAwMDAxNzAw"
                   "MDE3MjQ1MDAzMDAwMDM0HiAgIDExMjI0NDY2IB5ETEMeMTAfYUphY2sgQ29sbGlucx4xMB9hSG93"
@@ -165,7 +187,7 @@ int main(int argc, char **argv)
                   "</record></my>\n"));
 
     YAZ_CHECK(test_render(
-                  "xml; charset=utf-8; base64(/my/text(),xml)", 0,
+                  "xml; charset=utf-8; base64=/my/text()", 0,
                   "<my>"
                   "MDAxMzhuYW0gIDIyMDAwNzM4YSA0NTAwMDAxMDAxMzAwMDAwMDAzMDAwNDAwMDEzMTAwMDAxNzAw"
                   "MDE3MjQ1MDAzMDAwMDM0HiAgIDExMjI0NDY2IB5ETEMeMTAfYUphY2sgQ29sbGlucx4xMB9hSG93"
@@ -185,7 +207,7 @@ int main(int argc, char **argv)
                   "</record></my>\n"));
 
     YAZ_CHECK(test_render(
-                  "xml; base64(/my/text(),xml);charset=utf-8", 0,
+                  "xml; base64=/my/text();charset=utf-8", 0,
                   "<my>"
                   "MDAxMzhuYW0gIDIyMDAwNzM4YSA0NTAwMDAxMDAxMzAwMDAwMDAzMDAwNDAwMDEzMTAwMDAxNzAw"
                   "MDE3MjQ1MDAzMDAwMDM0HiAgIDExMjI0NDY2IB5ETEMeMTAfYUphY2sgQ29sbGlucx4xMB9hSG93"
@@ -205,7 +227,7 @@ int main(int argc, char **argv)
                   "</record></my>\n"));
 
     YAZ_CHECK(test_render(
-                  "xml; base64(/my/text(),txml;charset=utf-8)", 0,
+                  "txml;base64=/my/text();charset=utf-8", 0,
                   "<my>"
                   "MDAxMzhuYW0gIDIyMDAwNzM4YSA0NTAwMDAxMDAxMzAwMDAwMDAzMDAwNDAwMDEzMTAwMDAxNzAw"
                   "MDE3MjQ1MDAzMDAwMDM0HiAgIDExMjI0NDY2IB5ETEMeMTAfYUphY2sgQ29sbGlucx4xMB9hSG93"
@@ -223,6 +245,54 @@ int main(int argc, char **argv)
                   "    <sa>How to program a computer</sa>\n"
                   "  </d245>\n"
                   "</r></my>\n"));
+
+    YAZ_CHECK(test_render(
+                  "xml; charset=utf-8; base64=/my/text()", 0,
+                  "<my>"
+"MDA0OTJuYW0gYTIyMDAxNDU1YSA0NTAwMDAxMDAxMDAwMDAwMDA1MDAxNzAwMDEwMDA4MDA0MTAw"
+"MDI3MTAwMDA1MjAwMDY4MjQ1MDEwNDAwMTIwMjUwMDAxNDAwMjI0MjYwMDAyMzAwMjM4MzAwMDAx"
+"NjAwMjYxNjUwMDA1MTAwMjc3NjUwMDAxODAwMzI4HjAwMDI3NzQ4NR4yMDA1MTAyNjExMTQzNi4w"
+"HjA1MDQxM3MxODk0ICAgIGdyICAgICAgICAgICAgMDAwIDAgZ3JlIGQeMSAfYc6czrHPgc6/z43O"
+"tM63z4IsIM6az4nOvc+Dz4TOsc69z4TOr869zr/PgiDOmc+JHjEwH2HOlc67zrvOt869zrnOus+M"
+"zr0gzrrPgc+Fz4DPhM6/zrPPgc6xz4bOuc66z4zOvSDOu861zr7Ouc66z4zOvSAvH2POms+Jzr3P"
+"g8+ELiDOmS4gzpzOsc+Bzr/Pjc60zrfPgi4eICAyzrcgzrXOus60Lh4gIB9hzpHOuM6uzr3OsSwf"
+"YzE4OTQuHiAgH2EyNDggz4POtc67Lh4gMB9hR3JlZWsgbGFuZ3VhZ2UsIE1vZGVybh94RGlhbGVj"
+"dHMfdkRpY3Rpb25hcmllcx4gMB9hQ3J5cHRvZ3JhcGh5Lh4d"
+                  "</my>",
+"<?xml version=\"1.0\"?>\n"
+"<my><record xmlns=\"http://www.loc.gov/MARC21/slim\">\n"
+"  <leader>00492nam a22001455a 4500</leader>\n"
+"  <controlfield tag=\"001\">000277485</controlfield>\n"
+"  <controlfield tag=\"005\">20051026111436.0</controlfield>\n"
+"  <controlfield tag=\"008\">050413s1894    gr            000 0 gre d</controlfield>\n"
+"  <datafield tag=\"100\" ind1=\"1\" ind2=\" \">\n"
+"    <subfield code=\"a\">&#x39C;&#x3B1;&#x3C1;&#x3BF;&#x3CD;&#x3B4;&#x3B7;&#x3C2;, &#x39A;&#x3C9;&#x3BD;&#x3C3;&#x3C4;&#x3B1;&#x3BD;&#x3C4;&#x3AF;&#x3BD;&#x3BF;&#x3C2; &#x399;&#x3C9;</subfield>\n"
+"  </datafield>\n"
+"  <datafield tag=\"245\" ind1=\"1\" ind2=\"0\">\n"
+"    <subfield code=\"a\">&#x395;&#x3BB;&#x3BB;&#x3B7;&#x3BD;&#x3B9;&#x3BA;&#x3CC;&#x3BD; &#x3BA;&#x3C1;&#x3C5;&#x3C0;&#x3C4;&#x3BF;&#x3B3;&#x3C1;&#x3B1;&#x3C6;&#x3B9;&#x3BA;&#x3CC;&#x3BD; &#x3BB;&#x3B5;&#x3BE;&#x3B9;&#x3BA;&#x3CC;&#x3BD; /</subfield>\n"
+"    <subfield code=\"c\">&#x39A;&#x3C9;&#x3BD;&#x3C3;&#x3C4;. &#x399;. &#x39C;&#x3B1;&#x3C1;&#x3BF;&#x3CD;&#x3B4;&#x3B7;&#x3C2;.</subfield>\n"
+"  </datafield>\n"
+"  <datafield tag=\"250\" ind1=\" \" ind2=\" \">\n"
+"    <subfield code=\"&#x3B7;\"> &#x3B5;&#x3BA;&#x3B4;.</subfield>\n"
+"  </datafield>\n"
+"  <datafield tag=\"260\" ind1=\" \" ind2=\" \">\n"
+"    <subfield code=\"a\">&#x391;&#x3B8;&#x3AE;&#x3BD;&#x3B1;,</subfield>\n"
+"    <subfield code=\"c\">1894.</subfield>\n"
+"  </datafield>\n"
+"  <datafield tag=\"300\" ind1=\" \" ind2=\" \">\n"
+"    <subfield code=\"a\">248 &#x3C3;&#x3B5;&#x3BB;.</subfield>\n"
+"  </datafield>\n"
+"  <datafield tag=\"650\" ind1=\" \" ind2=\"0\">\n"
+"    <subfield code=\"a\">Greek language, Modern</subfield>\n"
+"    <subfield code=\"x\">Dialects</subfield>\n"
+"    <subfield code=\"v\">Dictionaries</subfield>\n"
+"  </datafield>\n"
+"  <datafield tag=\"650\" ind1=\" \" ind2=\"0\">\n"
+"    <subfield code=\"a\">Cryptography.</subfield>\n"
+"  </datafield>\n"
+"</record></my>\n"));
+
+
 #endif
     YAZ_CHECK_TERM;
 }