1ffd12a3d31293beb2b0c67604032e4ad8024b28
[idzebra-moved-to-github.git] / test / api / safari1.c
1 /* $Id: safari1.c,v 1.18 2007-11-30 10:08:01 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 /* safari1 - insert a few Safari records */
24
25 #include "testlib.h"
26
27 const char *myrec[] = 
28 {
29     "1234\n"  /* ID first record */
30     /* chunk owner seq idx term */
31     "00024338 125060 0 1 any the\n"
32     "00024338 125060 0 2 any art\n"
33     "00024338 125060 0 3 any mand\n"
34     ,
35     "5678\n"  /* other record - same owner id */
36     "00024339 125060 0 1 any den\n"
37     "00024339 125060 0 2 any gamle\n"
38     "00024339 125060 0 3 any mand\n"
39     ,
40     "5678\n"  /* same record chunk id as before .. */
41     "00024339 125060 0 1 any the\n"
42     "00024339 125060 0 2 any gamle\n"
43     "00024339 125060 0 3 any mand\n"
44     ,
45     "1000\n"  /* separate record */
46     "00024339 125061 0 1 any the\n"
47     "00024339 125061 0 2 any gamle\n"
48     "00024339 125061 0 3 any mand\n"
49     "w 00024339 125661 0 4 any Hello\n"
50     ,
51     "1001\n"  /* separate record */
52     "00024340 125062 0 1 any the\n"
53     "00024340 125062 0 1 any the\n" /* DUP KEY, bug #432 */
54     "00024340 125062 0 2 any old\n"
55     "00024340 125062 0 3 any mand\n"
56     ,
57     "1002\n"  /* segment testing record */
58     "00024341 125062 0 1 title a\n"
59     "00024341 125062 0 2 title b\n"
60
61     "00024341 125062 1 1024 title b\n"
62     "00024341 125062 1 1025 title c\n"
63     "00024341 125062 1 1026 title d\n"
64     "00024341 125062 1 1027 title e\n"
65     "00024341 125062 1 1028 title f\n"
66
67     "00024341 125062 2 2048 title g\n"
68     "00024341 125062 2 2049 title c\n"
69     ,
70
71     0
72 };
73
74 static void tst(int argc, char **argv)
75 {
76     zint ids[3];
77     zint limits[3];
78     ZebraService zs = tl_start_up("safari.cfg", argc, argv);
79     
80     ZebraHandle zh = zebra_open(zs, 0);
81
82     YAZ_CHECK(tl_init_data(zh, myrec));
83
84     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=any the", 3));
85     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=any den", 0));
86     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=any @and the art", 1));
87     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=any @and den gamle", 0));
88     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=any @and the gamle", 1));
89     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=any @and the of", 0));
90
91     YAZ_CHECK(tl_query(zh, "@attr 1=any hello", 1));
92
93     /* verify that we get these records exactly */
94     ids[0] = 24338;
95     ids[1] = 24339;
96     ids[2] = 24340;
97     YAZ_CHECK(tl_meta_query(zh, "@attr 4=3 @attr 1=any mand", 3, ids));
98     
99 #if 0
100     {
101         zint sysnos[10];
102         int no_sysnos = 10;
103         YAZ_CHECK_EQ(zebra_recid_to_sysno(zh, "Default", 24338, sysnos,
104                                           &no_sysnos), ZEBRA_OK);
105         YAZ_CHECK_EQ(no_sysnos, 1);
106     }
107 #endif
108
109     /* limit to 125061 */
110     limits[0] = 125061;
111     limits[1] = 0;
112     zebra_set_limit(zh, 0, limits);
113     ids[0] = 24339;
114     YAZ_CHECK(tl_meta_query(zh, "@attr 4=3 @attr 1=any mand", 1, ids));
115
116     /* limit to 125060, 125061 */
117     limits[0] = 125061;
118     limits[1] = 125060;
119     limits[2] = 0;
120     zebra_set_limit(zh, 0, limits);
121     ids[0] = 24338;
122     ids[1] = 24339;
123     YAZ_CHECK(tl_meta_query(zh, "@attr 4=3 @attr 1=any mand", 2, ids));
124
125     /* all except 125062 */
126     limits[0] = 125062;
127     limits[1] = 0;
128     zebra_set_limit(zh, 1, limits);
129
130     ids[0] = 24338;
131     ids[1] = 24339;
132     YAZ_CHECK(tl_meta_query(zh, "@attr 4=3 @attr 1=any mand", 2, ids));
133
134     /* no limit */
135     zebra_set_limit(zh, 1, 0);
136     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=any mand", 3));
137
138     /* test segments */
139     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title a", 1));
140     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title b", 1));
141     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title c", 1));
142
143     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and a b", 1));
144     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and a c", 1));
145     
146     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and c d", 1));
147     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and b f", 1));
148     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and f g", 0));
149     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and g f", 0));
150     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and d g", 0));
151     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and g c", 0));
152     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and c g", 0));
153     YAZ_CHECK(tl_query(zh, "@attr 4=3 @attr 1=title @and c c", 1));
154
155     YAZ_CHECK(tl_close_down(zh, zs));
156 }
157
158 TL_MAIN
159 /*
160  * Local variables:
161  * c-basic-offset: 4
162  * indent-tabs-mode: nil
163  * End:
164  * vim: shiftwidth=4 tabstop=8 expandtab
165  */
166