1 /* $Id: dom1.c,v 1.3 2007-03-14 14:16:14 adam Exp $
2 Copyright (C) 1995-2007
5 This file is part of the Zebra server.
7 Zebra is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2, or (at your option) any later
12 Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
27 void index_more(ZebraHandle zh, const char *filter, const char *file)
30 char profile_path[256];
32 sprintf(profile_path, "%.80s:%.80s/../../tab",
33 tl_get_srcdir(), tl_get_srcdir());
34 zebra_set_resource(zh, "profilePath", profile_path);
36 zebra_set_resource(zh, "recordType", filter);
38 YAZ_CHECK(zebra_begin_trans(zh, 1) == ZEBRA_OK);
39 sprintf(path, "%.80s/%.80s", tl_get_srcdir(), file);
41 YAZ_CHECK(zebra_repository_update(zh, path) == ZEBRA_OK);
42 YAZ_CHECK(zebra_end_trans(zh) == ZEBRA_OK);
46 ZebraHandle index_some(ZebraService zs,
47 const char *filter, const char *file)
49 ZebraHandle zh = zebra_open(zs, 0);
51 tl_check_filter(zs, "dom");
53 YAZ_CHECK(zebra_select_database(zh, "Default") == ZEBRA_OK);
57 index_more(zh, filter, file);
61 void tst(int argc, char **argv)
65 ZebraService zs = tl_start_up(0, argc, argv);
67 zh = index_some(zs, "dom.bad.xml", "marc-col.xml");
71 /* testing XMLREADER input with PI stylesheet */
72 zh = index_some(zs, "dom.dom-config-col.xml", "marc-col.xml");
73 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 3));
74 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
75 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
76 YAZ_CHECK(tl_query_x(zh, "@attr 1=4 computer", 0, 121));
79 /* testing XMLREADER input with ELEMENT stylesheet */
80 zh = index_some(zs, "dom.dom-config-one.xml", "marc-one.xml");
81 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 1));
82 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
83 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
84 YAZ_CHECK(tl_query_x(zh, "@attr 1=4 computer", 0, 121));
87 /* testing MARC input with ELEMENT stylesheet */
88 zh = index_some(zs, "dom.dom-config-marc.xml", "marc-col.mrc");
89 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 3));
90 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
91 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
92 YAZ_CHECK(tl_query_x(zh, "@attr 1=4 computer", 0, 121));
95 /* testing XMLREADER input with ELEMENT stylesheet and skipped records */
96 zh = index_some(zs, "dom.dom-config-skipped.xml", "marc-col.xml");
97 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 1));
98 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 0));
99 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224467", 1));
100 YAZ_CHECK(tl_query(zh, "@attr 1=control 73090924", 0));
102 /* testing XMLREADER input with type attributes (insert,delete,..) */
103 zh = index_some(zs, "dom.dom-config-del.xml", "del-col.xml");
104 YAZ_CHECK(tl_query(zh, "@attr 1=title a", 1));
105 YAZ_CHECK(tl_query(zh, "@attr 1=title 1", 0));
106 YAZ_CHECK(tl_query(zh, "@attr 1=title 2", 0));
107 YAZ_CHECK(tl_query(zh, "@attr 1=title 3", 1));
108 YAZ_CHECK(tl_query(zh, "@attr 1=title b", 1));
113 YAZ_CHECK(tl_close_down(0, zs));
121 * indent-tabs-mode: nil
123 * vim: shiftwidth=4 tabstop=8 expandtab