X-Git-Url: http://git.indexdata.com/?p=idzebra-moved-to-github.git;a=blobdiff_plain;f=index%2Fzebrash.c;h=5914feec7dd25c459c30bb9813eae91160e2a86f;hp=2bf9c134fcf21399f62b9c3ef128cdd6576c6810;hb=e4c6861efeeea654bfb00c5f0239ee258629d77f;hpb=2d31b0942f5ff2191e1e5d7634c85745988738bf diff --git a/index/zebrash.c b/index/zebrash.c index 2bf9c13..5914fee 100644 --- a/index/zebrash.c +++ b/index/zebrash.c @@ -1,30 +1,60 @@ -/* zebrash.c - command-line interface to zebra API - * $Id: zebrash.c,v 1.8 2003-06-02 13:13:59 adam Exp $ - * - * Copyrigth 2003 Index Data Aps - * - */ - +/* This file is part of the Zebra server. + Copyright (C) 2004-2013 Index Data + +Zebra is free software; you can redistribute it and/or modify it under +the terms of the GNU General Public License as published by the Free +Software Foundation; either version 2, or (at your option) any later +version. + +Zebra is distributed in the hope that it will be useful, but WITHOUT ANY +WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +You should have received a copy of the GNU General Public License +along with this program; if not, write to the Free Software +Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + +*/ + +/* + zebrash.c - command-line interface to zebra API +*/ + +#if HAVE_CONFIG_H +#include +#endif #include #include -#include +#include #include +#if HAVE_UNISTD_H +#include +#endif #if HAVE_READLINE_READLINE_H -#include +#include #endif #if HAVE_READLINE_HISTORY_H #include #endif -#include "zebraapi.h" +#include #include +#include +#include +#include +#include +#include #define MAX_NO_ARGS 32 #define MAX_OUT_BUFF 4096 #define MAX_ARG_LEN 1024 #define PROMPT "ZebraSh>" #define DEFAULTCONFIG "./zebra.cfg" +#define DEFAULTDATABASE "Default" +#define DEFAULTRESULTSET "MyResultSet" + /************************************** * Global variables (yuck!) @@ -33,14 +63,18 @@ ZebraService zs=0; /* our global handle to zebra */ ZebraHandle zh=0; /* the current session */ /* time being, only one session works */ +int nextrecno=1; /* record number to show next */ +static char *default_config = DEFAULTCONFIG; +static int log_level=0; + /************************************** * Help functions */ - + static int split_args( char *line, char** args ) -{ /* splits line into individual null-terminated strings, +{ /* splits line into individual null-terminated strings, * returns pointers to them in args */ /* FIXME - do we need to handle quoted args ?? */ char *p=line; @@ -48,13 +82,13 @@ static int split_args( char *line, char** args ) int n=0; args[0]=0; /* by default */ while (*p==' ' || *p=='\t' || *p=='\n') - p++; + p++; while (*p) { while (*p==' ' || *p=='\t' || *p=='\n') p++; if (*p=='#') /* skip comments */ - break; + break; args[i++]=p; args[i]=0; while (*p && *p!=' ' && *p!='\t' && *p!='\n' && *p!='#') @@ -84,176 +118,185 @@ static int defargint( char *arg, int def ) return v; } -int onecommand( char *line, char *outbuff); - +static char *restargs( char *args[], int n) +{ /* Returns the rest of the arguments, starting at the nth, */ + /* to the end of the command line. Assumes args[0] contains */ + /* the original line, minus the command itself */ + int skiplen= args[n]-args[1]; + if (skiplen > strlen(args[0])) + return ""; + return args[0]+skiplen; +} + +int onecommand( char *line, WRBUF outbuff, const char *prevout); + /************************************** * Simple support commands */ -int cmd_echo( char *args[], char *outbuff) +int cmd_echo( char *args[], WRBUF outbuff) { - strcpy(outbuff, args[0]); + wrbuf_printf(outbuff,"%s\n",restargs(args,1)); return 0; } - -int cmd_quit( char *args[], char *outbuff) + +int cmd_quit( char *args[], WRBUF outbuff) { - strcpy(outbuff, "bye"); + if (zs) + { + onecommand("zebra_close",outbuff,""); + zs=0; + } + if (zh) + { + onecommand("zebra_stop",outbuff,""); + zh=0; + } + wrbuf_puts(outbuff, "bye"); return -99; /* special stop signal */ } /************************************** * Tests for starting and stopping zebra, etc */ - -static int cmd_help( char *args[], char *outbuff); - -static int cmd_zebra_start( char *args[], char *outbuff) + +static int cmd_help( char *args[], WRBUF outbuff); + +static int cmd_zebra_start( char *args[], WRBUF outbuff) { char *conf=args[1]; if (!conf || !*conf) { - strcat(outbuff,"no config file specified, using " - DEFAULTCONFIG "\n" ); - conf=DEFAULTCONFIG; + wrbuf_puts(outbuff,"no config file specified, using "); + wrbuf_puts(outbuff, default_config); + wrbuf_puts(outbuff, "\n"); + conf=default_config; } zs=zebra_start(conf); if (!zs) { - strcpy(outbuff, "zebra_start failed" ); + wrbuf_puts(outbuff, "zebra_start failed" ); return 2; } return 0; /* ok */ } - -static int cmd_zebra_stop( char *args[], char *outbuff) + +static int cmd_zebra_stop( char *args[], WRBUF outbuff) { if (!zs) - strcat(outbuff,"zebra seems not to have been started, " - "stopping anyway\n"); + wrbuf_puts(outbuff,"zebra seems not to have been started, " + "stopping anyway\n"); zebra_stop(zs); zs=0; return 0; /* ok */ } -static int cmd_zebra_open( char *args[], char *outbuff) +static int cmd_zebra_open( char *args[], WRBUF outbuff) { if (!zs) - strcat(outbuff,"zebra seems not to have been started, " - "trying anyway\n"); - zh=zebra_open(zs); + wrbuf_puts(outbuff,"zebra seems not to have been started, " + "trying anyway\n"); + zh = zebra_open(zs, 0); return 0; /* ok */ } -static int cmd_zebra_close( char *args[], char *outbuff) +static int cmd_zebra_close( char *args[], WRBUF outbuff) { if (!zh) - strcat(outbuff,"Seems like you have not called zebra_open," - "trying anyway\n"); + wrbuf_puts(outbuff,"Seems like you have not called zebra_open," + "trying anyway\n"); zebra_close(zh); return 0; /* ok */ } -static int cmd_quickstart( char *args[], char *outbuff) +static int cmd_quickstart( char *args[], WRBUF outbuff) { char tmp[128]; - onecommand("yaz_log_file zebrash.log",outbuff); - onecommand("yaz_log_prefix ZebraSh", outbuff); - sprintf(tmp, "yaz_log_level 0x%x", LOG_DEFAULT_LEVEL | LOG_APP); - onecommand(tmp,outbuff); - logf(LOG_APP,"quickstart"); - onecommand("zebra_start",outbuff); - onecommand("zebra_open",outbuff); - onecommand("select_database Default",outbuff); - strcat(outbuff,"ok\n"); - return 0; + int rc=0; + if (!rc) + rc=onecommand("yaz_log_file zebrash.log",outbuff,""); + if (!rc) + rc=onecommand("yaz_log_prefix ZebraSh", outbuff,""); + sprintf(tmp, "yaz_log_level 0x%x", YLOG_DEFAULT_LEVEL | log_level ); + if (!rc) + rc=onecommand(tmp,outbuff,""); + yaz_log(log_level,"quickstart"); + if (!zs) + if (!rc) + rc=onecommand("zebra_start",outbuff,""); + if (!zh) + if (!rc) + rc=onecommand("zebra_open",outbuff,""); + if (!rc) + rc=onecommand("select_database Default",outbuff,""); + return rc; } /************************************** * Log file handling */ -static int cmd_yaz_log_file( char *args[], char *outbuff) +static int cmd_yaz_log_file( char *args[], WRBUF outbuff) { char *fn = defarg(args[1],0); - char tmp[255]; - sprintf(tmp, "sending yaz-log to %s\n",fn); - strcat(outbuff, tmp); + wrbuf_printf(outbuff, "sending yaz-log to %s\n",fn); yaz_log_init_file(fn); return 0; /* ok */ } -static int cmd_yaz_log_level( char *args[], char *outbuff) +static int cmd_yaz_log_level( char *args[], WRBUF outbuff) { - int lev = defargint(args[1],LOG_DEFAULT_LEVEL); - char tmp[255]; - sprintf(tmp, "setting yaz-log to level %d (ox%x)\n",lev,lev); - strcat(outbuff, tmp); + int lev = defargint(args[1],YLOG_DEFAULT_LEVEL); + wrbuf_printf(outbuff, "setting yaz-log to level %d (ox%x)\n",lev,lev); yaz_log_init_level(lev); return 0; /* ok */ } -static int cmd_yaz_log_prefix( char *args[], char *outbuff) +static int cmd_yaz_log_prefix( char *args[], WRBUF outbuff) { char *pref = defarg(args[1],"ZebraSh"); - char tmp[255]; - sprintf(tmp, "setting yaz-log prefix to %s\n",pref); - strcat(outbuff, tmp); + wrbuf_printf(outbuff, "setting yaz-log prefix to %s\n",pref); yaz_log_init_prefix(pref); return 0; /* ok */ } -static int cmd_logf( char *args[], char *outbuff) +static int cmd_logf( char *args[], WRBUF outbuff) { int lev = defargint(args[1],0); - char tmp[MAX_OUT_BUFF]=""; int i=1; if (lev) i=2; else - lev=LOG_LOG; /* this is in the default set!*/ - while (args[i]) - { - strcat(tmp, args[i++]); - strcat(tmp, " "); - } - logf(lev,tmp); + lev=YLOG_LOG; /* this is in the default set!*/ + yaz_log( lev, "%s", restargs(args,i)); return 0; /* ok */ } - + /**************** - * Error handling + * Error handling */ -static int cmd_err ( char *args[], char *outbuff) -{ - char tmp[MAX_OUT_BUFF]; - sprintf(tmp, "errCode: %d \nerrStr: %s\nerrAdd: %s \n", - zebra_errCode (zh), - zebra_errString (zh), - zebra_errAdd (zh) ); - strcat(outbuff, tmp); +static int cmd_err ( char *args[], WRBUF outbuff) +{ + wrbuf_printf(outbuff, "errCode: %d \nerrStr: %s\nerrAdd: %s \n", + zebra_errCode (zh), + zebra_errString (zh), + zebra_errAdd (zh) ); return 0; /* ok */ } -static int cmd_errcode ( char *args[], char *outbuff) +static int cmd_errcode ( char *args[], WRBUF outbuff) { - char tmp[MAX_OUT_BUFF]; - sprintf(tmp, "errCode: %d \n", - zebra_errCode (zh)); - strcat(outbuff, tmp); + wrbuf_printf(outbuff, "errCode: %d \n", + zebra_errCode (zh)); return 0; /* ok */ } -static int cmd_errstr ( char *args[], char *outbuff) +static int cmd_errstr ( char *args[], WRBUF outbuff) { - char tmp[MAX_OUT_BUFF]; - sprintf(tmp, "errStr: %s\n", - zebra_errString (zh)); - strcat(outbuff, tmp); + wrbuf_printf(outbuff, "errStr: %s\n", + zebra_errString (zh)); return 0; /* ok */ } -static int cmd_erradd ( char *args[], char *outbuff) +static int cmd_erradd ( char *args[], WRBUF outbuff) { - char tmp[MAX_OUT_BUFF]; - sprintf(tmp, "errAdd: %s \n", - zebra_errAdd (zh) ); - strcat(outbuff, tmp); + wrbuf_printf(outbuff, "errAdd: %s \n", + zebra_errAdd (zh) ); return 0; /* ok */ } @@ -261,272 +304,573 @@ static int cmd_erradd ( char *args[], char *outbuff) * Admin commands */ -static int cmd_init ( char *args[], char *outbuff) +static int cmd_init ( char *args[], WRBUF outbuff) { zebra_init(zh); return 0; /* ok */ } -static int cmd_select_database ( char *args[], char *outbuff) +static int cmd_select_database ( char *args[], WRBUF outbuff) +{ + char *db=defarg(args[1],DEFAULTDATABASE); + wrbuf_printf(outbuff,"Selecting database '%s'\n",db); + return zebra_select_database(zh, db); +} + +static int cmd_create_database( char *args[], WRBUF outbuff) +{ + char *db=defarg(args[1],DEFAULTDATABASE); + wrbuf_printf(outbuff,"Creating database '%s'\n",db); + + return zebra_create_database(zh, db); +} + +static int cmd_drop_database( char *args[], WRBUF outbuff) { char *db=args[1]; if (!db) - db="Default"; - return zebra_select_database(zh, args[1]); + db="Default"; + wrbuf_printf(outbuff,"Dropping database '%s'\n",db); + return zebra_drop_database(zh, db); } - -/************************************** - * Command table, parser, and help + +static int cmd_begin_trans( char *args[], WRBUF outbuff) +{ + int rw=0; + if (args[1] && ( (args[1][0]=='1') || (args[1][0]=='w') )) + rw=1; + return zebra_begin_trans(zh,rw); +} + +static int cmd_end_trans( char *args[], WRBUF outbuff) +{ + return zebra_end_trans(zh); +} +/************************************* + * Inserting and deleting + */ + +static int cmd_record_insert( char *args[], WRBUF outbuff) +{ + zint sysno = 0; + int rc; + char *rec=restargs(args,1); + + rc = zebra_update_record(zh, + action_insert, + 0, /* record type */ + &sysno, + 0, /* match */ + 0, /* fname */ + rec, + strlen(rec)); + if (0==rc) + { + wrbuf_printf(outbuff,"ok sysno=" ZINT_FORMAT "\n",sysno); + } + return rc; +} + + +static int cmd_exchange_record( char *args[], WRBUF outbuff) +{ + char *id = args[1]; + char *action = args[2]; + int rc; + char *rec=restargs(args,3); + if (!(id && action && args[4] )) + { + wrbuf_puts(outbuff,"Missing arguments!\n"); + onecommand("help exchange_record", outbuff, ""); + return -90; + } + + rc = zebra_update_record(zh, action_update, 0 /* record_type */, + 0 /* sysno */, + id /* match */, + 0 /* fname */, + rec, strlen(rec)); + return rc; +} + +/********************************** + * Searching and retrieving + */ + +static int cmd_search_pqf(char *args[], WRBUF outbuff) +{ + zint hits = 0; + char *set = args[1]; + char *qry = restargs(args,2); + int rc; + rc = zebra_search_PQF(zh, qry, set, &hits); + if (0==rc) + wrbuf_printf(outbuff, ZINT_FORMAT " hits found\n", hits); + return rc; +} + +static int cmd_find( char *args[], WRBUF outbuff) +{ + char *setname=DEFAULTRESULTSET; + int rc; + zint hits = 0; + WRBUF qry = wrbuf_alloc(); + if (0==strstr(args[0],"@attr")) + wrbuf_puts(qry, "@attr 1=/ "); + wrbuf_puts(qry,restargs(args,1)); + if (!zh) + onecommand("quickstart", outbuff, ""); + wrbuf_printf(outbuff, "find %s\n",wrbuf_cstr(qry)); + rc = zebra_search_PQF(zh, wrbuf_cstr(qry), setname, &hits); + if (0==rc) + { + wrbuf_printf(outbuff, ZINT_FORMAT " hits found\n", hits); + nextrecno = 1; + } + wrbuf_destroy(qry); + return rc; +} + +static int cmd_show( char *args[], WRBUF outbuff) +{ + int start=defargint(args[1], nextrecno); + int nrecs=defargint(args[2],1); + char *setname=defarg(args[3],DEFAULTRESULTSET); + int rc=0; + ZebraRetrievalRecord *recs; + ODR odr; + Z_RecordComposition *pcomp=0; + int i; + + odr = odr_createmem(ODR_ENCODE); + recs= odr_malloc(odr,sizeof(ZebraRetrievalRecord)*nrecs); + rc =z_RecordComposition(odr, &pcomp, 0,"recordComposition"); + + for (i=0;istream, + * rr->num_input_setnames, (const char **) + * rr->input_setnames, + * rr->output_setname, + * rr->sort_sequence, + * &rr->sort_status); + * zebra_result (zh, &rr->errcode, + * &rr->errstring); + * return 0; + * } + * + */ + +/**************************************) + * Command table, parser, and help */ struct cmdstruct { - char * cmd; - char * args; - char * explanation; - int (*testfunc)(char *args[], char *outbuff); + char *cmd; + char *args; + char *explanation; + int (*testfunc)(char *args[], WRBUF outbuff); } ; - + struct cmdstruct cmds[] = { /* special cases: * if text is 0, does not list the command * if cmd is "", adds the args (and newline) in command listing */ { "", "Starting and stopping:", "", 0 }, - { "zebra_start", - "[configfile]", + { "zebra_start", + "[configfile]", "starts the zebra service. You need to call this first\n" - "if no configfile is given, assumes " DEFAULTCONFIG, + "if no configfile is given, assumes " DEFAULTCONFIG, cmd_zebra_start }, - { "zebra_stop", "", - "stops the zebra service", + { "zebra_stop", "", + "stops the zebra service", cmd_zebra_stop }, - { "zebra_open", "", + { "zebra_open", "", "starts a zebra session. Once you have called zebra_start\n" - "you can call zebra_open to start working", + "you can call zebra_open to start working", cmd_zebra_open }, - { "zebra_close", "", - "closes a zebra session", - cmd_zebra_close }, - { "quickstart", "[configfile]", - "Does a zebra_start, zebra_open, and sets up the log", - cmd_quickstart }, - - { "", "Log file:","", 0}, - { "yaz_log_file", + { "zebra_close", "", + "closes a zebra session", + cmd_zebra_close }, + { "quickstart", "[configfile]", + "Does a zebra_start, zebra_open, and sets up the log", + cmd_quickstart }, + + { "", "Log file:","", 0}, + { "yaz_log_file", "[filename]", "Directs the log to filename (or stderr)", cmd_yaz_log_file }, - { "yaz_log_level", + { "yaz_log_level", "[level]", "Sets the logging level (or returns to default)", cmd_yaz_log_level }, - { "yaz_log_prefix", + { "yaz_log_prefix", "[prefix]", "Sets the log prefix", - cmd_yaz_log_prefix}, - { "logf", + cmd_yaz_log_prefix}, + { "yaz_log", "[level] text...", "writes an entry in the log", - cmd_logf}, + cmd_logf}, { "", "Error handling:","", 0}, { "err", "", "Displays zebra's error status (code, str, add)", - cmd_err}, + cmd_err}, { "errcode", "", "Displays zebra's error code", - cmd_errcode}, + cmd_errcode}, { "errstr", "", "Displays zebra's error string", - cmd_errstr}, + cmd_errstr}, { "erradd", "", "Displays zebra's additional error message", - cmd_erradd}, - - { "", "Admin:","", 0}, + cmd_erradd}, + + { "", "Admin:","", 0}, { "init", "", "Initializes the zebra database, destroying all data in it", - cmd_init}, + cmd_init}, { "select_database", "basename", "Selects a database", - cmd_select_database}, - - { "", "Misc:","", 0}, - { "echo", "string", - "ouputs the string", + cmd_select_database}, + { "create_database", "basename", + "Create database", + cmd_create_database}, + { "drop_database", "basename", + "Drop database", + cmd_drop_database}, + { "begin_trans", "[rw]", + "Begins a transaction. rw=1 means write, otherwise read-only", + cmd_begin_trans}, + { "end_trans","", + "Ends a transaction", + cmd_end_trans}, + + { "","Updating:","",0}, + { "record_insert","record", + "inserts an sgml record into Default", + cmd_record_insert}, + { "exchange_record","database record-id action record", + "inserts (1), updates (2), or deletes (3) a record \n" + "record-id must be a unique identifier for the record", + cmd_exchange_record}, + + { "","Searching and retrieving:","",0}, + { "search_pqf","setname query", + "search ", + cmd_search_pqf}, + { "find","query", + "simplified search", + cmd_find}, + { "f","query", + "simplified search", + cmd_find}, + { "show","[start] [numrecs] [resultset]", + "shows a result", + cmd_show}, + { "s","[start] [numrecs] [resultset]", + "shows a result", + cmd_show}, + { "sort","sortspec", + "sorts a result set. (example spec: 1=4 >)", + cmd_sort}, + + { "", "Misc:","", 0}, + { "echo", "string", + "ouputs the string", cmd_echo }, - { "quit", "", - "exits the program", + { "q", "", + "exits the program", cmd_quit }, - { "help", "[command]", - "Gives help on command, or lists them all", + { "quit", "", + "exits the program", + cmd_quit }, + { "help", "[command]", + "Gives help on command, or lists them all", cmd_help }, - { "", "help [command] gives more info on command", "",0 }, - + { "", "help [command] gives more info on command", "",0 }, + {0,0,0,0} /* end marker */ }; - -int onecommand( char *line, char *outbuff) + +int onecommand( + char *line, /* input line */ + WRBUF outbuff, /* output goes here */ + const char *prevout) /* prev output, for 'expect' */ { int i; char *args[MAX_NO_ARGS]; - int n; + int nargs; char argbuf[MAX_ARG_LEN]; - logf(LOG_APP,"%s",line); + yaz_log(log_level,"%s",line); strncpy(argbuf,line, MAX_ARG_LEN-1); argbuf[MAX_ARG_LEN-1]='\0'; /* just to be sure */ - n=split_args(argbuf, args); - if (0==n) - return -1; /* no command on line, too bad */ + /*memset(args,'\0',MAX_NO_ARGS*sizeof(char *));*/ + nargs=split_args(argbuf, args); + +#if 0 + for (i = 0; i <= n; i++) + { + const char *cp = args[i]; + printf ("args %d :%s:\n", i, cp ? cp : ""); + } +#endif + if (0==nargs) + return -90; /* no command on line, too bad */ + + if (0==strcmp(args[0],"expect")) + { + char *rest; + if (nargs>1) /* args[0] is not yet set, can't use restargs */ + rest= line + (args[1]-argbuf); /* rest of the line */ + else + return -1; /* need something to expect */ + if (0==strstr(prevout,rest)) + { + printf( "Failed expectation, '%s' not found\n", rest); + exit(9); + } + return 0; + } for (i=0;cmds[i].cmd;i++) - if (0==strcmp(cmds[i].cmd, args[0])) + if (0==strcmp(cmds[i].cmd, args[0])) { - if (n>1) + if (nargs>1) args[0]= line + (args[1]-argbuf); /* rest of the line */ else - args[0]=""; + args[0]=""; return ((cmds[i].testfunc)(args,outbuff)); } - strcat(outbuff, "Unknown command '"); - strcat(outbuff,args[0] ); - strcat(outbuff,"'. Try help"); - logf(LOG_APP,"Unknown command"); - return -2; -} - -static int cmd_help( char *args[], char *outbuff) -{ + wrbuf_printf(outbuff, "Unknown command '%s'. Try help\n",args[0]); + yaz_log(log_level,"Unknown command"); + return -90; +} + +static int cmd_help( char *args[], WRBUF outbuff) +{ int i; - char tmp[MAX_ARG_LEN]; - if (args[1]) - { /* help for a single command */ + int linelen; + if (args[1]) + { /* help for a single command */ for (i=0;cmds[i].cmd;i++) - if (0==strcmp(cmds[i].cmd, args[1])) + if (0==strcmp(cmds[i].cmd, args[1])) { - strcat(outbuff,cmds[i].cmd); - strcat(outbuff," "); - strcat(outbuff,cmds[i].args); - strcat(outbuff,"\n"); - strcat(outbuff,cmds[i].explanation); - strcat(outbuff,"\n"); + wrbuf_printf(outbuff,"%s %s\n%s\n", + cmds[i].cmd, cmds[i].args, + cmds[i].explanation); return 0; } - strcat(outbuff, "Unknown command "); - strcat(outbuff, args[1] ); + wrbuf_printf(outbuff, "Unknown command '%s'", args[1]); } - else + else { /* list all commands */ - strcpy(tmp," "); + linelen=9999; for (i=0;cmds[i].cmd;i++) - if (cmds[i].explanation) - { - /* sprintf(tmp, "%s %s %s\n", - cmds[i].cmd, cmds[i].args, cmds[i].explanation); - */ - strcat(tmp, cmds[i].cmd); - strcat(tmp," "); - if (!*cmds[i].cmd) - { - strcat(outbuff, tmp); - strcat(outbuff,"\n"); - strcpy(tmp," "); - if (*cmds[i].args) - { - strcat(outbuff, cmds[i].args); - strcat(outbuff,"\n"); - } - } - if (strlen(tmp)>50) - { - strcat(outbuff,tmp); - strcat(outbuff,"\n"); - strcpy(tmp," "); - } - } - strcat(outbuff,tmp); + { + if (*cmds[i].cmd) + { /* ordinary command */ + if (linelen>50) + { + wrbuf_puts(outbuff,"\n "); + linelen=0; + } + linelen += strlen(cmds[i].cmd) + 2; + wrbuf_printf(outbuff,"%s ", cmds[i].cmd); + } else + { /* section head */ + wrbuf_printf(outbuff,"\n%s\n ",cmds[i].args); + linelen=0; + } + } /* for */ + wrbuf_puts(outbuff,"\n"); } return 0; } - + /* If Zebra reports an error after an operation, * append it to the outbuff and log it */ -static void Zerrors ( char *outbuff) +static void Zerrors (WRBUF outbuff) { int ec; - char tmp[MAX_OUT_BUFF]; if (!zh) return ; ec=zebra_errCode (zh); if (ec) { - sprintf(tmp, "Zebra error %d: %s, (%s)", - ec, zebra_errString (zh), - zebra_errAdd (zh) ); - strcat(outbuff, tmp); - strcat(outbuff, "\n"); - logf(LOG_APP, tmp); + yaz_log(log_level, " Zebra error %d: %s, (%s)", + ec, zebra_errString (zh), + zebra_errAdd (zh) ); + wrbuf_printf(outbuff, " Zebra error %d: %s, (%s)\n", + ec, zebra_errString (zh), + zebra_errAdd (zh) ); } } - -/************************************** + +/************************************** * The shell */ - -void shell() + +void shell(void) { int rc=0; - char tmp[MAX_ARG_LEN]; + WRBUF outbuff=wrbuf_alloc(); + char prevout[MAX_OUT_BUFF]=""; /* previous output for 'expect' */ + wrbuf_puts(outbuff,"Zebrash at your service"); while (rc!=-99) { + char *nl_cp; char buf[MAX_ARG_LEN]; - char outbuff[MAX_OUT_BUFF]; + char* line_in = 0; #if HAVE_READLINE_READLINE_H - char* line_in; - line_in=readline(PROMPT); - if (!line_in) - break; + if (isatty(0)) { + line_in=readline(PROMPT); + if (!line_in) + break; #if HAVE_READLINE_HISTORY_H - if (*line_in) - add_history(line_in); + if (*line_in) + add_history(line_in); #endif - if(strlen(line_in) > MAX_ARG_LEN-1) { - fprintf(stderr,"Input line too long\n"); - break; - }; - strcpy(buf,line_in); - free (line_in); -#else - printf (PROMPT); + } +#endif + /* line_in != NULL if readine is present and input is a tty */ + + printf (PROMPT); fflush (stdout); - if (!fgets (buf, MAX_ARG_LEN-1, stdin)) - break; -#endif - outbuff[0]='\0'; - rc=onecommand(buf, outbuff); + if (line_in) + { + if(strlen(line_in) > MAX_ARG_LEN-1) { + fprintf(stderr,"Input line too long\n"); + break; + } + strcpy(buf,line_in); + free (line_in); + } + else + { + if (!fgets (buf, MAX_ARG_LEN-1, stdin)) + break; + } + + /* get rid of \n in line */ + if ((nl_cp = strchr(buf, '\n'))) + *nl_cp = '\0'; + strncpy(prevout, wrbuf_cstr(outbuff), MAX_OUT_BUFF); + wrbuf_rewind(outbuff); + rc=onecommand(buf, outbuff, prevout); if (rc==0) { - strcat(outbuff, "OK\n"); - logf(LOG_APP, "OK"); + wrbuf_puts(outbuff, " OK\n"); + yaz_log(log_level, "OK"); } - else if (rc > 0) + else if (rc>-90) { - sprintf(tmp, "command returned %d\n",rc); - strcat(outbuff,tmp); - } + wrbuf_printf(outbuff, " command returned %d\n",rc); + } Zerrors(outbuff); - printf("%s\n", outbuff); + printf("%s\n", wrbuf_cstr(outbuff)); } /* while */ + wrbuf_destroy(outbuff); } /* shell() */ - - + + +static void usage(void) +{ + printf ("usage:\n"); + printf ("zebrash [-c config]\n"); + exit(1); +} /************************************** - * Main + * Main */ - -int main (int argc, char ** args) + +int main (int argc, char ** argv) { + int ret; + char *arg = 0; + while ((ret = options ("c:h", argv, argc, &arg)) != -2) + { + switch(ret) + { + case 'c': + default_config = arg; + break; + case 'h': + usage(); + /* FIXME - handle -v */ + default: + fprintf(stderr, "bad option %s\n", arg); + usage(); + } + } + log_level=yaz_log_module_level("zebrash"); + shell(); return 0; } /* main */ +/* + * Local variables: + * c-basic-offset: 4 + * c-file-style: "Stroustrup" + * indent-tabs-mode: nil + * End: + * vim: shiftwidth=4 tabstop=8 expandtab + */ +