test/xslt/xslt2.c

   1 /* This file is part of the Zebra server.
   2    Copyright (C) 1994-2009 Index Data
   3
   4 Zebra is free software; you can redistribute it and/or modify it under
   5 the terms of the GNU General Public License as published by the Free
   6 Software Foundation; either version 2, or (at your option) any later
   7 version.
   8
   9 Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
  10 WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12 for more details.
  13
  14 You should have received a copy of the GNU General Public License
  15 along with this program; if not, write to the Free Software
  16 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  17
  18 */
  19
  20 #include <stdio.h>
  21 #include "testlib.h"
  22
  23 static void tst(int argc, char **argv)
  24 {
  25     char path[256];
  26     char profile_path[256];
  27     char record_buf[20000];
  28     const char *records_array[] = {
  29         record_buf, 0
  30     };
  31     FILE *f;
  32     size_t r;
  33
  34     ZebraService zs = tl_start_up(0, argc, argv);
  35     ZebraHandle  zh = zebra_open(zs, 0);
  36
  37     tl_check_filter(zs, "alvis");
  38
  39     YAZ_CHECK(zebra_select_database(zh, "Default") == ZEBRA_OK);
  40
  41     zebra_init(zh);
  42
  43     sprintf(profile_path, "%s:%s/../../tab",
  44             tl_get_srcdir(), tl_get_srcdir());
  45     zebra_set_resource(zh, "profilePath", profile_path);
  46
  47     zebra_set_resource(zh, "recordType", "alvis.marcschema-col.xml");
  48
  49     sprintf(path, "%.200s/marc-col.xml", tl_get_srcdir());
  50     f = fopen(path, "rb");
  51     if (!f)
  52     {
  53         yaz_log(YLOG_FATAL|YLOG_ERRNO, "Cannot open %s", path);
  54         exit(1);
  55     }
  56     r = fread(record_buf, 1, sizeof(record_buf)-1, f);
  57     if (r < 2 || r == sizeof(record_buf)-1)
  58     {
  59         yaz_log(YLOG_FATAL, "Bad size of %s", path);
  60         exit(1);
  61     }
  62     fclose(f);
  63
  64     record_buf[r] = '\0';
  65
  66     /* for now only the first of the records in the collection is
  67        indexed. That can be seen as a bug */
  68     YAZ_CHECK(tl_init_data(zh, records_array));
  69
  70     /* only get hits from first record .. */
  71     YAZ_CHECK(tl_query(zh, "@attr 1=title computer", 3));
  72     YAZ_CHECK(tl_query(zh, "@attr 1=control 11224466", 1));
  73     YAZ_CHECK(tl_query_x(zh, "@attr 1=titl computer", 0, 114));
  74
  75     YAZ_CHECK(tl_close_down(zh, zs));
  76 }
  77
  78 TL_MAIN
  79 /*
  80  * Local variables:
  81  * c-basic-offset: 4
  82  * c-file-style: "Stroustrup"
  83  * indent-tabs-mode: nil
  84  * End:
  85  * vim: shiftwidth=4 tabstop=8 expandtab
  86  */
  87