1 /* $Id: xslt2.c,v 1.7 2006-03-31 15:58:10 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 record_buf[20000];
30 const char *records_array[] = {
36 ZebraService zs = tl_start_up(0, argc, argv);
37 ZebraHandle zh = zebra_open(zs, 0);
39 tl_check_filter(zs, "xslt");
41 YAZ_CHECK(zebra_select_database(zh, "Default") == ZEBRA_OK);
45 zebra_set_resource(zh, "recordType", "xslt.marcschema-col.xml");
47 sprintf(path, "%.200s/marc-col.xml", tl_get_srcdir());
48 f = fopen(path, "rb");
51 yaz_log(YLOG_FATAL|YLOG_ERRNO, "Cannot open %s", path);
54 r = fread(record_buf, 1, sizeof(record_buf)-1, f);
55 if (r < 2 || r == sizeof(record_buf)-1)
57 yaz_log(YLOG_FATAL, "Bad size of %s", path);
64 /* for now only the first of the records in the collection is
65 indexed. That can be seen as a bug */
66 YAZ_CHECK(tl_init_data(zh, records_array));
68 /* only get hits from first record .. */
69 YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 1));
70 YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
71 YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
73 YAZ_CHECK(tl_close_down(zh, zs));