X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=util%2Fmarcdump.c;h=bd71b7df281d3c4b5fb64f115388261703bc56a5;hb=4b3d1e197d75fcb2607be8d86d244f20c4180000;hp=7cc154ec62ace766fcd34b9bed7b368ca634b151;hpb=aabf1ddf38ac10199480c78045c09456c86524a8;p=yaz-moved-to-github.git diff --git a/util/marcdump.c b/util/marcdump.c index 7cc154e..bd71b7d 100644 --- a/util/marcdump.c +++ b/util/marcdump.c @@ -1,49 +1,9 @@ /* - * Copyright (c) 1995-2001, Index Data + * Copyright (c) 1995-2003, Index Data * See the file LICENSE for details. * Sebastian Hammer, Adam Dickmeiss * - * $Log: marcdump.c,v $ - * Revision 1.13 2001-02-10 01:21:59 adam - * Dumper only keeps one record at a time in memory. - * - * Revision 1.12 2000/10/02 11:07:45 adam - * Added peer_name member for bend_init handler. Changed the YAZ - * client so that tcp: can be avoided in target spec. - * - * Revision 1.11 2000/07/04 08:53:22 adam - * Fixed bug. - * - * Revision 1.10 2000/02/29 13:44:55 adam - * Check for config.h (currently not generated). - * - * Revision 1.9 1999/11/30 13:47:12 adam - * Improved installation. Moved header files to include/yaz. - * - * Revision 1.8 1999/05/26 07:49:35 adam - * C++ compilation. - * - * Revision 1.7 1998/02/11 11:53:36 adam - * Changed code so that it compiles as C++. - * - * Revision 1.6 1997/12/12 06:32:33 adam - * Added include of string.h. - * - * Revision 1.5 1997/09/24 13:29:40 adam - * Added verbose option -v to marcdump utility. - * - * Revision 1.4 1995/11/01 13:55:05 quinn - * Minor adjustments - * - * Revision 1.3 1995/05/16 08:51:12 quinn - * License, documentation, and memory fixes - * - * Revision 1.2 1995/05/15 11:56:56 quinn - * Debuggng & adjustments. - * - * Revision 1.1 1995/04/10 10:28:47 quinn - * Added copy of CCL and MARC display - * + * $Id: marcdump.c,v 1.22 2003-02-25 18:35:49 adam Exp $ */ #if HAVE_CONFIG_H @@ -54,6 +14,14 @@ #include #include #include + +#if HAVE_LOCALE_H +#include +#endif +#if HAVE_LANGINFO_H +#include +#endif + #include #include #include @@ -65,7 +33,13 @@ #ifndef SEEK_END #define SEEK_END 2 #endif - + +static void usage(const char *prog) +{ + fprintf (stderr, "Usage: %s [-c cfile] [-f from] [-t to] [-x] [-O] [-X] [-v] file...\n", + prog); +} + int main (int argc, char **argv) { int r; @@ -75,19 +49,46 @@ int main (int argc, char **argv) char buf[100001]; char *prog = *argv; int no = 0; + int xml = 0; FILE *cfile = 0; + char *from = 0, *to = 0; + + +#if HAVE_LOCALE_H + setlocale(LC_CTYPE, ""); +#endif +#if HAVE_LANGINFO_H +#ifdef CODESET + to = nl_langinfo(CODESET); +#endif +#endif - while ((r = options("vc:", argv, argc, &arg)) != -2) + while ((r = options("vc:xOXf:t:", argv, argc, &arg)) != -2) { int count; no++; switch (r) { + case 'f': + from = arg; + break; + case 't': + to = arg; + break; case 'c': if (cfile) fclose (cfile); cfile = fopen (arg, "w"); break; + case 'x': + xml = YAZ_MARC_SIMPLEXML; + break; + case 'O': + xml = YAZ_MARC_OAIMARC; + break; + case 'X': + xml = YAZ_MARC_MARCXML; + break; case 0: inf = fopen (arg, "r"); count = 0; @@ -95,47 +96,94 @@ int main (int argc, char **argv) { fprintf (stderr, "%s: cannot open %s:%s\n", prog, arg, strerror (errno)); - exit (1); + exit(1); } if (cfile) fprintf (cfile, "char *marc_records[] = {\n"); - while (1) - { - int len; - - r = fread (buf, 1, 5, inf); - if (r < 5) - break; - len = atoi_n(buf, 5); - if (len < 25 || len > 100000) - break; - len = len - 5; - r = fread (buf + 5, 1, len, inf); - if (r < len) - break; - r = marc_display_ex (buf, stdout, verbose); - if (r <= 0) - break; - if (cfile) - { - char *p = buf; - int i; - if (count) - fprintf (cfile, ","); - fprintf (cfile, "{\n"); - for (i = 0; i < r; i++) - { - if ((i & 15) == 0) - fprintf (cfile, " \""); - fprintf (cfile, "\\x%02X", p[i] & 255); - - if (i < r - 1 && (i & 15) == 15) - fprintf (cfile, "\"\n"); - + if (1) + { + yaz_marc_t mt = yaz_marc_create(); + yaz_iconv_t cd = 0; + + if (from && to) + { + cd = yaz_iconv_open(to, from); + if (!cd) + { + fprintf(stderr, "conversion from %s to %s " + "unsupported\n", from, to); + exit(2); + } + } + yaz_marc_xml(mt, xml); + yaz_marc_debug(mt, verbose); + while (1) + { + int len; + char *result; + int rlen; + + r = fread (buf, 1, 5, inf); + if (r < 5) + break; + len = atoi_n(buf, 5); + if (len < 25 || len > 100000) + break; + len = len - 5; + r = fread (buf + 5, 1, len, inf); + if (r < len) + break; + r = yaz_marc_decode_buf (mt, buf, -1, &result, &rlen); + if (r <= 0) + break; + if (!cd) + fwrite (result, rlen, 1, stdout); + else + { + char outbuf[12]; + size_t inbytesleft = rlen; + const char *inp = result; + + while (inbytesleft) + { + size_t outbytesleft = sizeof(outbuf); + char *outp = outbuf; + size_t r = yaz_iconv (cd, (char**) &inp, + &inbytesleft, + &outp, &outbytesleft); + if (r == (size_t) (-1)) + { + int e = yaz_iconv_error(cd); + if (e != YAZ_ICONV_E2BIG) + break; + } + fwrite (outbuf, outp - outbuf, 1, stdout); + } + } + + if (cfile) + { + char *p = buf; + int i; + if (count) + fprintf (cfile, ","); + fprintf (cfile, "\n"); + for (i = 0; i < r; i++) + { + if ((i & 15) == 0) + fprintf (cfile, " \""); + fprintf (cfile, "\\x%02X", p[i] & 255); + + if (i < r - 1 && (i & 15) == 15) + fprintf (cfile, "\"\n"); + } - fprintf (cfile, "\"\n}"); - } - count++; + fprintf (cfile, "\"\n"); + } + } + count++; + if (cd) + yaz_iconv_close(cd); } if (cfile) fprintf (cfile, "};\n"); @@ -144,7 +192,7 @@ int main (int argc, char **argv) verbose++; break; default: - fprintf (stderr, "Usage: %s [-c cfile] [-v] file...\n", prog); + usage(prog); exit (1); } } @@ -152,7 +200,7 @@ int main (int argc, char **argv) fclose (cfile); if (!no) { - fprintf (stderr, "Usage: %s [-v] file...\n", prog); + usage(prog); exit (1); } exit (0);