X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;f=util%2Fiso2709.c;h=9df6e2508002fa0f722fef503b044a80aa72e851;hb=6f97971ea2f3d82a406e011a4aaf797368c553be;hp=7de97f265535cb091c631cfa2009e9393a3b56cf;hpb=3f6af0f3aa9f114cf562c28f2ed0b954e4c5d659;p=egate.git

diff --git a/util/iso2709.c b/util/iso2709.c
index 7de97f2..9df6e25 100644
--- a/util/iso2709.c
+++ b/util/iso2709.c
@@ -1,9 +1,16 @@
 /*
-   Iso2709 record management
-
-   Europagate, 1994-1995.
-
-   iso2709.c,v
+ * Iso2709 record management
+ *
+ * Europagate, 1994-1995.
+ *
+ * $Log: iso2709.c,v $
+ * Revision 1.8  1995/03/08 12:03:15  adam
+ * Hack: When tags 00? are used, every separator (DC[1-3]) marks
+ * the end of the data field.
+ *
+ * Revision 1.7  1995/02/22  21:28:03  adam
+ * Changed header.
+ *
  * Revision 1.5  1995/02/22  15:24:14  adam
  * Function iso2709_cvt makes a litte check for the format. It returns
  * NULL if the buffer parameter can never be a MARC record.
@@ -150,7 +157,7 @@ Iso2709Rec iso2709_cvt (const char *buf)
         }
         else
             dp->indicator = NULL;
-
+        printf ("tag=%.3s, dpos = %d, (0%o)\n", dp->tag, dpos, dpos);
         if (memcmp (dp->tag, "00", 2))
             tag00 = 0;
         else
@@ -177,7 +184,7 @@ Iso2709Rec iso2709_cvt (const char *buf)
             strncpyx ((*fpp)->data, buf+dpos, dpos_n - dpos);
             dpos = dpos_n;
             
-            if (buf[dpos] == ISO2709_FS || buf[dpos] == ISO2709_RS)
+            if (buf[dpos] == ISO2709_FS || buf[dpos] == ISO2709_RS || tag00)
                 break;
             
             fpp = &(*fpp)->next;