1 /* $Id: xslt3.c,v 1.8 2006-05-10 08:13:42 adam Exp $
2 Copyright (C) 1995-2005
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 Zebra; see the file LICENSE.zebra. If not, write to the
19 Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
26 static void tst(int argc, char **argv)
29 char profile_path[256];
30 char record_buf[20000];
31 const char *records_array[] = {
37 ZebraService zs = tl_start_up(0, argc, argv);
38 ZebraHandle zh = zebra_open(zs, 0);
40 tl_check_filter(zs, "xslt");
42 YAZ_CHECK(zebra_select_database(zh, "Default") == ZEBRA_OK);
46 sprintf(profile_path, "%s:%s/../../tab",
47 tl_get_srcdir(), tl_get_srcdir());
48 zebra_set_resource(zh, "profilePath", profile_path);
50 zebra_set_resource(zh, "recordType", "xslt.marcschema-one.xml");
52 sprintf(path, "%.200s/marc-one.xml", tl_get_srcdir());
53 f = fopen(path, "rb");
56 yaz_log(YLOG_FATAL|YLOG_ERRNO, "Cannot open %s", path);
59 r = fread(record_buf, 1, sizeof(record_buf)-1, f);
60 if (r < 2 || r == sizeof(record_buf)-1)
62 yaz_log(YLOG_FATAL, "Bad size of %s", path);
69 /* index this one record */
70 YAZ_CHECK(tl_init_data(zh, records_array));
72 /* only get hits from first record .. */
73 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 1));
74 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
75 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
78 /* index one more time to see that we don't get dups, since
79 index.xsl has a record ID associated with them */
80 zebra_add_record(zh, record_buf, strlen(record_buf));
82 /* only get hits from first record .. */
83 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 1));
84 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
85 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
87 YAZ_CHECK(tl_close_down(zh, zs));
95 * indent-tabs-mode: nil
97 * vim: shiftwidth=4 tabstop=8 expandtab