X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=odr%2Fber_tag.c;h=c5ec9ebbae83ab047a70e7e123d74e356826cc19;hb=bf3c907b04a3a1dd708f90ce08328014775758af;hp=fd23a966c0962ebca8912e4fd0739d5ea6f066cf;hpb=10981b2f116449523a9f628c20a78212ce91553e;p=yaz-moved-to-github.git

diff --git a/odr/ber_tag.c b/odr/ber_tag.c
index fd23a96..c5ec9eb 100644
--- a/odr/ber_tag.c
+++ b/odr/ber_tag.c
@@ -4,7 +4,16 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: ber_tag.c,v $
- * Revision 1.3  1995-02-09 15:51:46  quinn
+ * Revision 1.6  1995-02-14 11:54:33  quinn
+ * Adjustments.
+ *
+ * Revision 1.5  1995/02/10  18:57:24  quinn
+ * More in the way of error-checking.
+ *
+ * Revision 1.4  1995/02/10  15:55:28  quinn
+ * Bug fixes, mostly.
+ *
+ * Revision 1.3  1995/02/09  15:51:46  quinn
  * Works better now.
  *
  * Revision 1.2  1995/02/07  17:52:59  quinn
@@ -25,20 +34,28 @@
  * On decoding:
  *      if tag && class match up, advance pointer and return 1. set cons.
  *      else leave pointer unchanged. Return 0.
+ *
+ * Should perhaps be odr_tag?
 */
-int ber_tag(ODR o, const void *p, int class, int tag, int *constructed)
+int ber_tag(ODR o, void *p, int class, int tag, int *constructed)
 {
     static int lclass = -1, ltag, br, lcons; /* save t&c rather than
 						decoding twice */
     int rd;
+    char **pp = p;
 
+    if (o->direction == ODR_DECODE)
+    	*pp = 0;
     o->t_class = -1;
-    if (o->buf == o->bp)   /* This is insurance. It shouldn't be necessary */
+    if (o->stackp < 0)
+    {
+    	o->bp = o->buf;
     	lclass = -1;
+    }
     switch (o->direction)
     {
     	case ODR_ENCODE:
-	    if (!p)
+	    if (!*pp)
 	    	return 0;
 	    if ((rd = ber_enctag(o->bp, class, tag, *constructed, o->left))
 		<=0)
@@ -51,10 +68,12 @@ int ber_tag(ODR o, const void *p, int class, int tag, int *constructed)
 #endif
 	    return 1;
     	case ODR_DECODE:
+	    if (o->stackp > -1 && !odr_constructed_more(o))
+	    	return 0;
 	    if (lclass < 0)
 	    {
 	    	if ((br = ber_dectag(o->bp, &lclass, &ltag, &lcons)) <= 0)
-		    return -1;
+		    return 0;
 #ifdef ODR_DEBUG
 		fprintf(stderr, "\n[class=%d,tag=%d,cons=%d]", lclass, ltag,
 		    lcons);
@@ -70,7 +89,7 @@ int ber_tag(ODR o, const void *p, int class, int tag, int *constructed)
 	    }
 	    else
 	    	return 0;
-    	case ODR_PRINT: return p != 0;
+    	case ODR_PRINT: return *pp != 0;
     	default: return 0;
     }
 }