test/xslt/xslt3.c

   1 /* $Id: xslt3.c,v 1.11 2007-01-15 15:10:26 adam Exp $
   2    Copyright (C) 1995-2007
   3    Index Data ApS
   4
   5 This file is part of the Zebra server.
   6
   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
  10 version.
  11
  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
  15 for more details.
  16
  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
  20
  21 */
  22
  23 #include <stdio.h>
  24 #include "testlib.h"
  25
  26 static void tst(int argc, char **argv)
  27 {
  28     char path[256];
  29     char profile_path[256];
  30     char record_buf[20000];
  31     const char *records_array[] = {
  32         record_buf, 0
  33     };
  34     FILE *f;
  35     size_t r;
  36
  37     ZebraService zs = tl_start_up(0, argc, argv);
  38     ZebraHandle  zh = zebra_open(zs, 0);
  39
  40     tl_check_filter(zs, "alvis");
  41
  42     YAZ_CHECK(zebra_select_database(zh, "Default") == ZEBRA_OK);
  43
  44     zebra_init(zh);
  45
  46     sprintf(profile_path, "%s:%s/../../tab",
  47             tl_get_srcdir(), tl_get_srcdir());
  48     zebra_set_resource(zh, "profilePath", profile_path);
  49
  50     zebra_set_resource(zh, "recordType", "alvis.marcschema-one.xml");
  51
  52     sprintf(path, "%.200s/marc-one.xml", tl_get_srcdir());
  53     f = fopen(path, "rb");
  54     if (!f)
  55     {
  56         yaz_log(YLOG_FATAL|YLOG_ERRNO, "Cannot open %s", path);
  57         exit(1);
  58     }
  59     r = fread(record_buf, 1, sizeof(record_buf)-1, f);
  60     if (r < 2 || r == sizeof(record_buf)-1)
  61     {
  62         yaz_log(YLOG_FATAL, "Bad size of %s", path);
  63         exit(1);
  64     }
  65     fclose(f);
  66
  67     record_buf[r] = '\0';
  68
  69     /* index this one record */
  70     YAZ_CHECK(tl_init_data(zh, records_array));
  71
  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));
  76
  77
  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));
  81
  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));
  86
  87     YAZ_CHECK(tl_close_down(zh, zs));
  88 }
  89
  90 TL_MAIN
  91
  92 /*
  93  * Local variables:
  94  * c-basic-offset: 4
  95  * indent-tabs-mode: nil
  96  * End:
  97  * vim: shiftwidth=4 tabstop=8 expandtab
  98  */
  99