util/iso2709dump.c

   1 /*
   2  * Iso2709 record management
   3  *
   4  * Europagate, 1994-1995.
   5  *
   6  * $Log: iso2709dump.c,v $
   7  * Revision 1.5  1995/02/22 21:32:36  adam
   8  * Changed header.
   9  *
  10  * Revision 1.3  1995/02/10  17:05:18  adam
  11  * New function iso2709_display to display MARC records in a
  12  * line-by-line format. The iso2709_cvt function no longer
  13  * prints the record to stderr.
  14  *
  15  * Revision 1.2  1995/02/10  16:50:33  adam
  16  * Indicator field moved to 'struct iso2709_dir' from 'struct
  17  * iso2709_field'.
  18  * Function iso2709_rm implemented - to delete a MARC record.
  19  *
  20  * Revision 1.1.1.1  1995/02/09  17:27:11  adam
  21  * Initial version of email gateway under CVS control.
  22  *
  23  */
  24
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27
  28 #include <iso2709.h>
  29
  30 int main (int argc, char **argv)
  31 {
  32     char *buf;
  33     Iso2709Rec rec;
  34
  35     while ((buf = iso2709_read (stdin)))
  36     {
  37         rec = iso2709_cvt (buf);
  38         iso2709_display (rec, stderr);
  39         free (buf);
  40         iso2709_rm (rec);
  41     }
  42     return 0;
  43 }