New test
[idzebra-moved-to-github.git] / test / api / t4.c
1 /* $Id: t4.c,v 1.6 2004-06-14 21:43:44 adam Exp $
2    Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004
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 Zebra; see the file LICENSE.zebra.  If not, write to the
19 Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
20 02111-1307, USA.
21 */
22
23 #include <yaz/log.h>
24 #include <yaz/pquery.h>
25 #include <zebraapi.h>
26
27 int main(int argc, char **argv)
28 {
29     int i;
30     ZebraService zs;
31     ZebraHandle zh;
32     const char *myrec =
33         "<gils>\n"
34         "  <title>My title</title>\n"
35         "</gils>\n";
36
37     yaz_log_init_file("t4.log");
38
39     nmem_init ();
40     
41     zs = zebra_start("zebra.cfg", 0, 0);
42     zh = zebra_open (zs);
43     zebra_init(zh);
44     zebra_select_database(zh, "Default");
45
46     zebra_begin_trans (zh, 1);
47     for (i = 0; i<1200; i++)
48         zebra_add_record (zh, myrec, strlen(myrec));
49     zebra_end_trans (zh);
50     zebra_close(zh);
51     zebra_stop(zs);
52
53     zs = zebra_start("zebra.cfg", 0, 0);
54     zh = zebra_open (zs);
55     zebra_select_database(zh, "Default");
56
57     for (i = 0; i<2; i++)
58     {
59         ZebraRetrievalRecord retrievalRecord[1001];
60         char setname[20];
61         int j;
62         ODR odr_input = odr_createmem (ODR_DECODE);    
63         ODR odr_output = odr_createmem (ODR_DECODE);    
64         YAZ_PQF_Parser parser = yaz_pqf_create();
65         Z_RPNQuery *query = yaz_pqf_parse(parser, odr_input, 
66                                           "@attr 1=4 my");
67         int hits;
68         
69         sprintf(setname, "s%d", i+1);
70         zebra_search_RPN (zh, odr_input, query, setname, &hits);
71
72         yaz_pqf_destroy(parser);
73
74         odr_destroy (odr_input);
75
76         zebra_begin_trans (zh, 1);
77
78         for (j = 0; j<1001; j++)
79             retrievalRecord[j].position = j+1;
80
81         zebra_records_retrieve (zh, odr_output, setname, 0,
82                                 VAL_TEXT_XML, 1001, retrievalRecord);
83
84
85         odr_destroy (odr_output);
86
87         zebra_end_trans (zh);
88
89     }
90     zebra_commit (zh);
91     zebra_close (zh);
92     zebra_stop (zs);
93
94     nmem_exit ();
95     xmalloc_trav ("x");
96     exit (0);
97 }