Remove assignment to variables not in use.

[yaz-moved-to-github.git] / src / dumpber.c

diff --git a/src/dumpber.c b/src/dumpber.c
index deb81b5..d249c0d 100644 (file)
--- a/src/dumpber.c
+++ b/src/dumpber.c
@@ -1,8 +1,6 @@
-/*
- * Copyright (C) 1995-2005, Index Data ApS
+/* This file is part of the YAZ toolkit.
+ * Copyright (C) 1995-2011 Index Data
  * See the file LICENSE for details.
- *
- * $Id: dumpber.c,v 1.3 2005-01-15 19:47:13 adam Exp $
  */
 
 /**
@@ -20,90 +18,89 @@
 static int do_dumpBER(FILE *f, const char *buf, int len, int level, int offset)
 {
     int res, ll, zclass, tag, cons, lenlen, taglen;
-    const char *b = buf, *bp = buf;
+    const char *b = buf;
     
     if (!len)
-       return 0;
+        return 0;
     if (!buf[0] && !buf[1])
-       return 0;
+        return 0;
     if ((res = ber_dectag((unsigned char*)b, &zclass, &tag, &cons, len)) <= 0)
-       return 0;
+        return 0;
     if (res > len)
     {
-       fprintf(stderr, "Unexpected end of buffer\n");
-       return 0;
+        fprintf(stderr, "Unexpected end of buffer\n");
+        return 0;
     }
     fprintf(f, "%5d: %*s", offset, level * 4, "");
     if (zclass == ODR_UNIVERSAL)
     {
-       static char *nl[] =
-       {
-           "[Univ 0]", "BOOLEAN", "INTEGER", "BIT STRING", "OCTET STRING",
-           "NULL", "OID", "OBJECT DESCIPTOR", "EXTERNAL", "REAL",
-           "ENUM", "[UNIV 11]", "[UNIV 12]", "[UNIV 13]", "[UNIV 14]",
-           "[UNIV 15]", "SEQUENCE", "SET", "NUMERICSTRING", "PRINTABLESTRING",
-           "[UNIV 20]", "[UNIV 21]", "[UNIV 22]", "[UNIV 23]", "[UNIV 24]",
-           "GRAPHICSTRING", "VISIBLESTRING", "GENERALSTRING", "[UNIV 28]"
-       };
+        static char *nl[] =
+        {
+            "[Univ 0]", "BOOLEAN", "INTEGER", "BIT STRING", "OCTET STRING",
+            "NULL", "OID", "OBJECT DESCIPTOR", "EXTERNAL", "REAL",
+            "ENUM", "[UNIV 11]", "[UNIV 12]", "[UNIV 13]", "[UNIV 14]",
+            "[UNIV 15]", "SEQUENCE", "SET", "NUMERICSTRING", "PRINTABLESTRING",
+            "[UNIV 20]", "[UNIV 21]", "[UNIV 22]", "[UNIV 23]", "[UNIV 24]",
+            "GRAPHICSTRING", "VISIBLESTRING", "GENERALSTRING", "[UNIV 28]"
+        };
 
-       if (tag >= 0 && tag < 28)
-           fprintf(f, "%s", nl[tag]);
-       else
-           fprintf(f, "[UNIV %d]", tag);
+        if (tag >= 0 && tag < 28)
+            fprintf(f, "%s", nl[tag]);
+        else
+            fprintf(f, "[UNIV %d]", tag);
     }
     else if (zclass == ODR_CONTEXT)
-       fprintf(f, "[%d]", tag);
+        fprintf(f, "[%d]", tag);
     else
-       fprintf(f, "[%d:%d]", zclass, tag);
+        fprintf(f, "[%d:%d]", zclass, tag);
     b += res;
     taglen = res;
     len -= res;
-    bp = b;
     if ((res = ber_declen((unsigned char*)b, &ll, len)) <= 0)
     {
-       fprintf(f, "\n%*sBad length\n", level*4+5, "");
-       return 0;
+        fprintf(f, "\n%*sBad length\n", level*4+5, "");
+        return 0;
     }
     lenlen = res;
     b += res;
     len -= res;
     if (ll >= 0)
-       fprintf(f, " len=%d", ll);
+        fprintf(f, " len=%d", ll);
     else
-       fprintf(f, " len=?");
+        fprintf(f, " len=?");
     fprintf(f, "       tl=%d, ll=%d cons=%d\n", taglen, lenlen, cons);
     if (!cons)
     {
-       if (ll < 0 || ll > len)
-       {
-           fprintf(f, "%*sBad length on primitive type. ll=%d len=%d\n",
+        if (ll < 0 || ll > len)
+        {
+            fprintf(f, "%*sBad length on primitive type. ll=%d len=%d\n",
                     level*4+5, "", ll, len);
-           return 0;
-       }
-       return ll + (b - buf);
+            return 0;
+        }
+        return ll + (b - buf);
     }
     if (ll >= 0)
     {
         if (ll > len)
         {
-           fprintf(f, "%*sBad length of constructed type ll=%d len=%d.\n",
+            fprintf(f, "%*sBad length of constructed type ll=%d len=%d.\n",
                     level*4+5, "", ll, len);
-           return 0;
+            return 0;
         }
-       len = ll;
+        len = ll;
     }
     /* constructed - cycle through children */
     while ((ll == -1 && len >= 2) || (ll >= 0 && len))
     {
-       if (ll == -1 && *b == 0 && *(b + 1) == 0)
-           break;
-       if (!(res = do_dumpBER(f, b, len, level + 1, offset + (b - buf))))
-       {
-           fprintf(f, "%*sDump of content element failed.\n", level*4+5, "");
-           return 0;
-       }
-       b += res;
-       len -= res;
+        if (ll == -1 && *b == 0 && *(b + 1) == 0)
+            break;
+        if (!(res = do_dumpBER(f, b, len, level + 1, offset + (b - buf))))
+        {
+            fprintf(f, "%*sDump of content element failed.\n", level*4+5, "");
+            return 0;
+        }
+        b += res;
+        len -= res;
         if (len < 0)
         {
             fprintf(f, "%*sBad length\n", level*4+5, "");
@@ -112,13 +109,13 @@ static int do_dumpBER(FILE *f, const char *buf, int len, int level, int offset)
     }
     if (ll == -1)
     {
-       if (len < 2)
-       {
-           fprintf(f, "%*sBuffer too short in indefinite length.\n",
+        if (len < 2)
+        {
+            fprintf(f, "%*sBuffer too short in indefinite length.\n",
                     level*4+5, "");
-           return 0;
-       }
-       return (b - buf) + 2;
+            return 0;
+        }
+        return (b - buf) + 2;
     }
     return b - buf;
 }
@@ -127,3 +124,12 @@ int odr_dumpBER(FILE *f, const char *buf, int len)
 {
     return do_dumpBER(f, buf, len, 0, 0);
 }
+/*
+ * Local variables:
+ * c-basic-offset: 4
+ * c-file-style: "Stroustrup"
+ * indent-tabs-mode: nil
+ * End:
+ * vim: shiftwidth=4 tabstop=8 expandtab
+ */
+