1 /* $Id: dom1.c,v 1.2 2007-03-05 13:02:11 marc 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
26 ZebraHandle index_some(ZebraService zs,
27 const char *filter, const char *file)
30 char profile_path[256];
32 ZebraHandle zh = zebra_open(zs, 0);
34 tl_check_filter(zs, "dom");
36 YAZ_CHECK(zebra_select_database(zh, "Default") == ZEBRA_OK);
40 sprintf(profile_path, "%.80s:%.80s/../../tab",
41 tl_get_srcdir(), tl_get_srcdir());
42 zebra_set_resource(zh, "profilePath", profile_path);
44 zebra_set_resource(zh, "recordType", filter);
46 YAZ_CHECK(zebra_begin_trans(zh, 1) == ZEBRA_OK);
47 sprintf(path, "%.80s/%.80s", tl_get_srcdir(), file);
49 YAZ_CHECK(zebra_repository_update(zh, path) == ZEBRA_OK);
50 YAZ_CHECK(zebra_end_trans(zh) == ZEBRA_OK);
55 void tst(int argc, char **argv)
59 ZebraService zs = tl_start_up(0, argc, argv);
61 zh = index_some(zs, "dom.bad.xml", "marc-col.xml");
64 /* testing XMLREADER input with PI stylesheet */
65 zh = index_some(zs, "dom.dom-config-col.xml", "marc-col.xml");
66 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 3));
67 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
68 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
69 YAZ_CHECK(tl_query_x(zh, "@attr 1=4 computer", 0, 121));
72 /* testing XMLREADER input with ELEMENT stylesheet */
73 zh = index_some(zs, "dom.dom-config-one.xml", "marc-one.xml");
74 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 1));
75 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
76 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
77 YAZ_CHECK(tl_query_x(zh, "@attr 1=4 computer", 0, 121));
80 /* testing MARC input with ELEMENT stylesheet */
81 zh = index_some(zs, "dom.dom-config-marc.xml", "marc-col.mrc");
82 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 3));
83 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
84 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
85 YAZ_CHECK(tl_query_x(zh, "@attr 1=4 computer", 0, 121));
88 /* testing XMLREADER input with ELEMENT stylesheet and skipped records */
89 zh = index_some(zs, "dom.dom-config-skipped.xml", "marc-col.xml");
90 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 1));
91 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 0));
92 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224467", 1));
93 YAZ_CHECK(tl_query(zh, "@attr 1=control 73090924", 0));
98 YAZ_CHECK(tl_close_down(0, zs));
106 * indent-tabs-mode: nil
108 * vim: shiftwidth=4 tabstop=8 expandtab