X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;ds=sidebyside;f=util%2Fiso2709.c;h=812f8da51228f69b8fde1575715f086a065e57dd;hb=39d29539fcda6555089fe3a581953829af06ac7e;hp=7de97f265535cb091c631cfa2009e9393a3b56cf;hpb=3f6af0f3aa9f114cf562c28f2ed0b954e4c5d659;p=egate.git

diff --git a/util/iso2709.c b/util/iso2709.c
index 7de97f2..812f8da 100644
--- a/util/iso2709.c
+++ b/util/iso2709.c
@@ -1,9 +1,22 @@
 /*
-   Iso2709 record management
-
-   Europagate, 1994-1995.
-
-   iso2709.c,v
+ * Iso2709 record management
+ *
+ * Europagate, 1994-1995.
+ *
+ * $Log: iso2709.c,v $
+ * Revision 1.10  1995/03/10 09:10:56  adam
+ * Removed dbc2709_cvt function. Makes heuristic guess for DBC2709 records.
+ *
+ * Revision 1.9  1995/03/08  12:36:39  adam
+ * New function: dbc2709_cvt.
+ *
+ * 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.
@@ -86,6 +99,7 @@ char *iso2709_read (FILE *inf)
     return buf;
 }
 
+
 Iso2709Rec iso2709_cvt (const char *buf)
 {
     struct iso2709_dir **dpp, *dp;
@@ -120,6 +134,7 @@ Iso2709Rec iso2709_cvt (const char *buf)
     while (buf[pos] != ISO2709_FS)
     {
         *dpp = malloc (sizeof(**dpp));
+        assert (*dpp);
         (*dpp)->next = NULL;
         strncpyx ((*dpp)->tag, buf+pos, 3);
         pos += 3;
@@ -134,46 +149,60 @@ Iso2709Rec iso2709_cvt (const char *buf)
     /* deal with datafields */
     for (dp = p->directory; dp; dp = dp->next)
     {
-        int tag00;
+        int identifier_flag;
         struct iso2709_field **fpp;
         int dpos = pos+dp->offset;
 
         fpp = &dp->fields;
 
         *fpp = malloc (sizeof(**fpp));
+        assert (*fpp);
         (*fpp)->next = NULL;
-        if (p->indicator_length && memcmp (dp->tag, "00", 2))
+
+        identifier_flag = 1;
+        if (p->indicator_length)
+        {
+#if STUPID_ISO_DBC
+            if (buf[dpos+p->indicator_length] != ISO2709_IDFS)
+                identifier_flag = 0;
+#else
+            if (!memcmp (dp->tag, "00", 2))
+                identifier_flag = 0;
+#endif
+        }
+        else if (!memcmp (dp->tag, "00", 2))
+                identifier_flag = 0;
+        if (identifier_flag && p->indicator_length)
         {
             dp->indicator = malloc (p->indicator_length+1);
+            assert (dp->indicator);
             strncpyx (dp->indicator, buf+dpos, p->indicator_length);
             dpos += p->indicator_length;
         }
         else
             dp->indicator = NULL;
-
-        if (memcmp (dp->tag, "00", 2))
-            tag00 = 0;
-        else
-            tag00 = 1;
         while (1)
         {
             int dpos_n;
-            if (p->identifier_length && !tag00)
+            if (p->identifier_length && identifier_flag)
             {
                 (*fpp)->identifier = malloc (p->identifier_length+1);
                 strncpyx ((*fpp)->identifier, buf+dpos+1,
                           p->identifier_length-1);
-                dpos += p->identifier_length;
+                dpos_n = dpos += p->identifier_length;
+                while (buf[dpos_n] != ISO2709_FS && buf[dpos_n] != ISO2709_RS
+                       && buf[dpos_n] != ISO2709_IDFS)
+                    dpos_n++;
             }
             else
+            {
                 (*fpp)->identifier = NULL;
-
-            dpos_n = dpos;
-            while (buf[dpos_n] != ISO2709_FS && buf[dpos_n] != ISO2709_IDFS &&
-                   buf[dpos_n] != ISO2709_RS)
-                dpos_n++;
-
+                dpos_n = dpos;
+                while (buf[dpos_n] != ISO2709_FS && buf[dpos_n] != ISO2709_RS)
+                    dpos_n++;
+            }
             (*fpp)->data = malloc (dpos_n - dpos + 1);
+            assert ((*fpp)->data);
             strncpyx ((*fpp)->data, buf+dpos, dpos_n - dpos);
             dpos = dpos_n;
             
@@ -182,6 +211,7 @@ Iso2709Rec iso2709_cvt (const char *buf)
             
             fpp = &(*fpp)->next;
             *fpp = malloc (sizeof(**fpp));
+            assert (*fpp);
             (*fpp)->next = NULL;
         }
     }