X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=odr%2Fdumpber.c;h=b52cabdb3e391feb32084f82da6a0fceea1cb5e2;hb=8ad9b2411f30d2a306bcf9b8a0cb0f03576e2a36;hp=5b9724569d06dcc9113c0cabbcdf6cb8447d6b2e;hpb=657fb99115b87a5244e9a33bbe4ca3d9d18849c4;p=yaz-moved-to-github.git diff --git a/odr/dumpber.c b/odr/dumpber.c index 5b97245..b52cabd 100644 --- a/odr/dumpber.c +++ b/odr/dumpber.c @@ -4,7 +4,13 @@ * Sebastian Hammer, Adam Dickmeiss * * $Log: dumpber.c,v $ - * Revision 1.3 1995-09-27 15:02:57 quinn + * Revision 1.5 1995-10-18 16:12:55 quinn + * Better diagnostics. Added special case in NULL to handle WAIS server. + * + * Revision 1.4 1995/09/29 17:12:21 quinn + * Smallish + * + * Revision 1.3 1995/09/27 15:02:57 quinn * Modified function heads & prototypes. * * Revision 1.2 1995/06/27 13:20:51 quinn @@ -19,7 +25,7 @@ #include #include -static int do_dumpBER(FILE *f, char *buf, int len, int level) +static int do_dumpBER(FILE *f, char *buf, int len, int level, int offset) { int res, ll, class, tag, cons; char *b = buf; @@ -35,7 +41,7 @@ static int do_dumpBER(FILE *f, char *buf, int len, int level) fprintf(stderr, "Unexpected end of buffer\n"); return 0; } - fprintf(stderr, "%*s", level * 4, ""); + fprintf(stderr, "%5d: %*s", offset, level * 4, ""); if (class == ODR_UNIVERSAL) { static char *nl[] = @@ -91,7 +97,7 @@ static int do_dumpBER(FILE *f, char *buf, int len, int level) { if (ll == -1 && *b == 0 && *(b + 1) == 0) break; - if (!(res = do_dumpBER(f, b, len, level + 1))) + if (!(res = do_dumpBER(f, b, len, level + 1, offset + (b - buf)))) { fprintf(stderr, "Dump of content element failed.\n"); return 0; @@ -111,7 +117,7 @@ static int do_dumpBER(FILE *f, char *buf, int len, int level) return b - buf; } -int MDF odr_dumpBER(FILE *f, char *buf, int len) +int odr_dumpBER(FILE *f, char *buf, int len) { - return do_dumpBER(f, buf, len, 0); + return do_dumpBER(f, buf, len, 0, 0); }