-/* $Id: t7.c,v 1.8 2005-03-09 12:14:42 adam Exp $
- Copyright (C) 1995-2005
+/* $Id: t7.c,v 1.15 2007-01-15 15:10:20 adam Exp $
+ Copyright (C) 1995-2007
Index Data ApS
This file is part of the Zebra server.
for more details.
You should have received a copy of the GNU General Public License
-along with Zebra; see the file LICENSE.zebra. If not, write to the
-Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
-02111-1307, USA.
+along with this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+
*/
/** t7.c sorting */
"</gils>\n",
0};
-
-int main(int argc, char **argv)
+static void tst(int argc, char **argv)
{
- ZebraService zs = start_up(0, argc, argv);
- ZebraHandle zh = zebra_open (zs);
-
- const char *setname1="set1";
- const char *setname2="set2";
- const char *setname3="set3";
+ const char *setname1 = "set1";
+ const char *setname2 = "set2";
+ const char *setname3 = "set3";
int status;
- int rc;
+ ZebraService zs = tl_start_up(0, argc, argv);
+ ZebraHandle zh = zebra_open (zs, 0);
ODR odr_input = odr_createmem (ODR_DECODE);
ODR odr_output = odr_createmem (ODR_ENCODE);
YAZ_PQF_Parser parser = yaz_pqf_create();
- Z_RPNQuery *query = yaz_pqf_parse(parser, odr_input,
- "@attr 1=4 my");
- Z_SortKeySpecList *spec =
- yaz_sort_spec (odr_output, "@attr 1=4 id");
+ Z_RPNQuery *query = yaz_pqf_parse(parser, odr_input, "@attr 1=4 my");
+ Z_SortKeySpecList *spec = yaz_sort_spec (odr_output, "1=4 <!");
zint hits;
- init_data(zh, recs);
+ YAZ_CHECK(tl_init_data(zh, recs));
- zebra_begin_trans(zh, 0);
+ YAZ_CHECK(zebra_begin_trans(zh, 0) == ZEBRA_OK);
- zebra_search_RPN(zh, odr_input, query, setname1, &hits);
-
- rc=zebra_sort(zh, odr_output, 1, &setname1, setname2, spec, &status);
- if (rc)
- {
- printf("sort A returned %d %d \n",rc,status);
- exit(1);
- }
-
- rc=zebra_sort(zh, odr_output, 1, &setname2, setname3, spec, &status);
- if (rc)
- {
- printf("sort B returned %d %d \n",rc,status);
- exit(1);
- }
-
- zebra_end_trans(zh);
+ YAZ_CHECK(zebra_search_RPN(zh, odr_input, query, setname1, &hits) ==
+ ZEBRA_OK);
+
+ YAZ_CHECK(zebra_sort(zh, odr_output, 1, &setname1, setname2, spec,
+ &status)
+ == ZEBRA_OK);
+ YAZ_CHECK(zebra_sort(zh, odr_output, 1, &setname2, setname3, spec,
+ &status) == ZEBRA_OK);
+
+ spec = yaz_sort_spec(odr_output, "1=5 <!"); /* invalid sort spec */
+
+ YAZ_CHECK(zebra_sort(zh, odr_output, 1, &setname1, setname2, spec,
+ &status) == ZEBRA_FAIL);
+
+ YAZ_CHECK(zebra_end_trans(zh) == ZEBRA_OK);
+
yaz_pqf_destroy(parser);
/*
zebra_commit(zh);
- return close_down(zh, zs, 0);
+ YAZ_CHECK(tl_close_down(zh, zs));
}
+
+TL_MAIN
+/*
+ * Local variables:
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * End:
+ * vim: shiftwidth=4 tabstop=8 expandtab
+ */
+