/*
- * $Id: zoomsh.c,v 1.13 2003-02-14 18:49:24 adam Exp $
+ * $Id: zoomsh.c,v 1.19 2003-04-23 20:39:25 adam Exp $
*
* ZOOM-C Shell
*/
#include <yaz/xmalloc.h>
+#include <yaz/log.h>
+#include <yaz/nmem.h>
#include <yaz/zoom.h>
#define MAX_CON 100
const char *cp = *cpp;
while (*cp == ' ')
cp++;
- *t_start = cp;
- while (*cp && *cp != ' ' && *cp != '\r' && *cp != '\n')
+ if (*cp == '"')
{
- cp++;
- len++;
+ cp++;
+ *t_start = cp;
+ while (*cp && *cp != '"')
+ {
+ cp++;
+ len++;
+ }
+ if (*cp)
+ cp++;
+ }
+ else
+ {
+ *t_start = cp;
+ while (*cp && *cp != ' ' && *cp != '\r' && *cp != '\n')
+ {
+ cp++;
+ len++;
+ }
+ if (len == 0)
+ len = -1;
}
*cpp = cp;
- return len;
+ return len; /* return -1 if no token was read .. */
}
static int next_token_copy (const char **cpp, char *buf_out, int buf_max)
{
const char *start;
int len = next_token (cpp, &start);
- if (!len)
+ if (len < 0)
{
*buf_out = 0;
- return 0;
+ return len;
}
if (len >= buf_max)
len = buf_max-1;
{
char key[40], val[80];
- if (!next_token_copy (args, key, sizeof(key)))
+ if (next_token_copy (args, key, sizeof(key)) < 0)
{
printf ("missing argument for set\n");
return ;
}
- if (!next_token_copy (args, val, sizeof(val)))
+ if (next_token_copy (args, val, sizeof(val)) < 0)
ZOOM_options_set(options, key, 0);
else
ZOOM_options_set(options, key, val);
const char **args)
{
char key[40];
- if (!next_token_copy (args, key, sizeof(key)))
+ if (next_token_copy (args, key, sizeof(key)) < 0)
{
printf ("missing argument for get\n");
}
int i;
char start_str[10], count_str[10];
- if (next_token_copy (args, start_str, sizeof(start_str)))
+ if (next_token_copy (args, start_str, sizeof(start_str)) >= 0)
ZOOM_options_set (options, "start", start_str);
- if (next_token_copy (args, count_str, sizeof(count_str)))
+ if (next_token_copy (args, count_str, sizeof(count_str)) >= 0)
ZOOM_options_set (options, "count", count_str);
for (i = 0; i<MAX_CON; i++)
if (!c[i])
continue;
if ((error = ZOOM_connection_error_x(c[i], &errmsg, &addinfo, &dset)))
- fprintf (stderr, "%s error: %s (%s:%d) %s\n",
+ printf ("%s error: %s (%s:%d) %s\n",
ZOOM_connection_option_get(c[i], "host"), errmsg,
dset, error, addinfo);
else if (r[i])
display_records (c[i], r[i], start, count);
}
}
+ ZOOM_options_set (options, "count", "0");
+ ZOOM_options_set (options, "start", "0");
}
static void cmd_ext (ZOOM_connection *c, ZOOM_resultset *r,
if (!p[i])
continue;
if ((error = ZOOM_connection_error_x(c[i], &errmsg, &addinfo, &dset)))
- fprintf (stderr, "%s error: %s (%s:%d) %s\n",
+ printf ("%s error: %s (%s:%d) %s\n",
ZOOM_connection_option_get(c[i], "host"), errmsg,
dset, error, addinfo);
else if (p[i])
}
}
+static void cmd_debug (ZOOM_connection *c, ZOOM_resultset *r,
+ ZOOM_options options,
+ const char **args)
+{
+ yaz_log_init_level(LOG_ALL);
+}
+
static void cmd_search (ZOOM_connection *c, ZOOM_resultset *r,
ZOOM_options options,
const char **args)
}
else if (ZOOM_query_prefix (s, query_str))
{
- fprintf (stderr, "Bad PQF: %s\n", query_str);
+ printf ("Bad PQF: %s\n", query_str);
return;
}
for (i = 0; i<MAX_CON; i++)
if (!c[i])
continue;
if ((error = ZOOM_connection_error_x(c[i], &errmsg, &addinfo, &dset)))
- fprintf (stderr, "%s error: %s (%s:%d) %s\n",
- ZOOM_connection_option_get(c[i], "host"), errmsg,
- dset, error, addinfo);
+ printf ("%s error: %s (%s:%d) %s\n",
+ ZOOM_connection_option_get(c[i], "host"), errmsg,
+ dset, error, addinfo);
else if (r[i])
{
/* OK, no major errors. Look at the result count */
ZOOM_query_destroy (s);
}
+static void cmd_scan (ZOOM_connection *c, ZOOM_resultset *r,
+ ZOOM_options options,
+ const char **args)
+{
+ const char *start_term = *args;
+ int i;
+ ZOOM_scanset s[MAX_CON];
+
+ while (*start_term == ' ')
+ start_term++;
+
+ for (i = 0; i<MAX_CON; i++)
+ {
+ if (c[i])
+ s[i] = ZOOM_connection_scan(c[i], start_term);
+ else
+ s[i] = 0;
+ }
+ while (ZOOM_event(MAX_CON, c))
+ ;
+ for (i = 0; i<MAX_CON; i++)
+ {
+ if (s[i]) {
+ size_t p, sz = ZOOM_scanset_size(s[i]);
+ for (p = 0; p < sz; p++)
+ {
+ int occ = 0;
+ size_t len = 0;
+ const char *term = ZOOM_scanset_term(s[i], p, &occ, &len);
+ fwrite(term, 1, len, stdout);
+ printf (" %d\n", occ);
+ }
+ ZOOM_scanset_destroy(s[i]);
+ }
+ }
+}
+
static void cmd_help (ZOOM_connection *c, ZOOM_resultset *r,
ZOOM_options options,
const char **args)
printf ("connect <zurl>\n");
printf ("search <pqf>\n");
printf ("show [<start> [<count>]\n");
+ printf ("scan <term>\n");
printf ("quit\n");
printf ("close <zurl>\n");
printf ("set <option> [<value>]\n");
const char **args)
{
int error;
- const char *errmsg, *addinfo;
+ const char *errmsg, *addinfo, *dset;
char host[60];
int j, i;
- if (!next_token_copy (args, host, sizeof(host)))
+ if (next_token_copy (args, host, sizeof(host)) < 0)
{
printf ("missing host after connect\n");
return ;
}
c[i] = ZOOM_connection_create (options);
ZOOM_connection_connect (c[i], host, 0);
-
- if ((error = ZOOM_connection_error(c[i], &errmsg, &addinfo)))
- printf ("%s error: %s (%d) %s\n",
- ZOOM_connection_option_get(c[i], "host"),
- errmsg, error, addinfo);
-
+
+ if ((error = ZOOM_connection_error_x(c[i], &errmsg, &addinfo, &dset)))
+ printf ("%s error: %s (%s:%d) %s\n",
+ ZOOM_connection_option_get(c[i], "host"), errmsg,
+ dset, error, addinfo);
}
static int cmd_parse (ZOOM_connection *c, ZOOM_resultset *r,
const char *cmd_str;
cmd_len = next_token (buf, &cmd_str);
- if (!cmd_len)
+ if (cmd_len < 0)
return 1;
if (is_command ("quit", cmd_str, cmd_len))
return 0;
cmd_help(c, r, options, buf);
else if (is_command ("ext", cmd_str, cmd_len))
cmd_ext(c, r, options, buf);
+ else if (is_command ("debug", cmd_str, cmd_len))
+ cmd_debug(c, r, options, buf);
+ else if (is_command ("scan", cmd_str, cmd_len))
+ cmd_scan(c, r, options, buf);
else
printf ("unknown command %.*s\n", cmd_len, cmd_str);
return 2;
add_history(line_in);
#endif
if(strlen(line_in) > 999) {
- fprintf(stderr,"Input line too long\n");
+ printf("Input line too long\n");
break;
};
strcpy(buf,line_in);
ZOOM_connection z39_con[MAX_CON];
ZOOM_resultset z39_res[MAX_CON];
+ nmem_init();
for (i = 0; i<MAX_CON; i++)
{
z39_con[i] = 0;
ZOOM_connection_destroy(z39_con[i]);
ZOOM_resultset_destroy(z39_res[i]);
}
+ nmem_exit();
exit (0);
}