1 /* $Id: kdump.c,v 1.24 2004-01-22 11:27:21 adam Exp $
2 Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002
5 This file is part of the Zebra server.
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
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
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
40 int key_file_decode (FILE *f)
51 d = ((c&63) << 8) + (getc (f) & 0xff);
54 d = ((c&63) << 8) + (getc (f) & 0xff);
55 d = (d << 8) + (getc (f) & 0xff);
58 d = ((c&63) << 8) + (getc (f) & 0xff);
59 d = (d << 8) + (getc (f) & 0xff);
60 d = (d << 8) + (getc (f) & 0xff);
70 static int read_one (FILE *inf, char *name, char *key, struct it_key *prevk)
77 if ((c=getc(inf)) == EOF)
83 c = key_file_decode (inf);
86 itkey.sysno = c + prevk->sysno;
89 prevk->sysno = itkey.sysno;
92 c = key_file_decode (inf);
93 itkey.seqno = c + prevk->seqno;
94 prevk->seqno = itkey.seqno;
96 memcpy (key+1, &itkey, sizeof(itkey));
100 int main (int argc, char **argv)
104 char *key_fname = NULL;
105 char key_string[IT_MAX_WORD];
116 while ((ret = options ("c:v:", argv, argc, &arg)) != -2)
124 yaz_log_init (yaz_log_mask_str(arg), prog, NULL);
128 if (!(res = res_open (arg, 0, 0)))
130 logf(LOG_FATAL, "Failed to open resource file %s", arg);
136 logf (LOG_FATAL, "Unknown option '-%s'", arg);
142 fprintf (stderr, "kdump [-c config] [-v log] file\n");
146 res = res_open ("zebra.cfg", 0, 0);
147 zm = zebra_maps_open (res, 0);
148 if (!(inf = fopen (key_fname, "r")))
150 logf (LOG_FATAL|LOG_ERRNO, "fopen %s", key_fname);
153 printf ("t rg op sysno seqno txt\n");
154 while (read_one (inf, key_string, key_info, &prevk))
158 char keybuf[IT_MAX_WORD+1];
160 const char *from = key_string;
161 int usedb_type = from[0];
162 int reg_type = from[1];
165 memcpy (&k, 1+key_info, sizeof(k));
170 const char *res = zebra_maps_output (zm, reg_type, &from);
178 printf ("%c %3d %c %7d %5d %s\n", reg_type, usedb_type, op ? 'i':'d',
179 k.sysno, k.seqno, keybuf);
181 zebra_maps_close (zm);
184 logf (LOG_FATAL|LOG_ERRNO, "fclose %s", key_fname);