1 /* $Id: xslt2.c,v 1.8 2006-04-26 13:27:16 marc 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-col.xml");
52 sprintf(path, "%.200s/marc-col.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 /* for now only the first of the records in the collection is
70 indexed. That can be seen as a bug */
71 YAZ_CHECK(tl_init_data(zh, records_array));
73 /* only get hits from first record .. */
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));
78 YAZ_CHECK(tl_close_down(zh, zs));