66 static int asn1_print_info(BIO *bp, int tag, int xclass,int constructed,
68 static int asn1_parse2(BIO *bp, const unsigned char **pp, long length,
70 static int asn1_print_info(BIO *bp, int tag, int xclass, int constructed,  in asn1_print_info()  argument
81 	if (BIO_write(bp,p,6) < 6) goto err;  in asn1_print_info()
82 	BIO_indent(bp,indent,128);  in asn1_print_info()
96 	if (BIO_printf(bp,fmt,p) <= 0)  in asn1_print_info()
103 int ASN1_parse(BIO *bp, const unsigned char *pp, long len, int indent)  in ASN1_parse()  argument
105 	return(asn1_parse2(bp,&pp,len,0,0,indent,0));  in ASN1_parse()
108 int ASN1_parse_dump(BIO *bp, const unsigned char *pp, long len, int indent, int dump)  in ASN1_parse_dump()  argument
110 	return(asn1_parse2(bp,&pp,len,0,0,indent,dump));  in ASN1_parse_dump()
113 static int asn1_parse2(BIO *bp, const unsigned char **pp, long length, int offset,  in asn1_parse2()  argument
133 		BIO_puts(bp, "BAD RECURSION DEPTH\n");  in asn1_parse2()
149 			if (BIO_puts(bp, "Error in encoding\n") <= 0)  in asn1_parse2()
157 		if (BIO_printf(bp,"%5ld:",(long)offset+(long)(op- *pp))  in asn1_parse2()
162 			if (BIO_printf(bp,"d=%-2d hl=%ld l=%4ld ",  in asn1_parse2()
168 			if (BIO_printf(bp,"d=%-2d hl=%ld l=inf  ",  in asn1_parse2()
172 		if (!asn1_print_info(bp,tag,xclass,j,(indent)?depth:0))  in asn1_parse2()
177 			if (BIO_puts(bp, "\n") <= 0) goto end;  in asn1_parse2()
180 				BIO_printf(bp,  in asn1_parse2()
189 					r=asn1_parse2(bp,&p,(long)(tot-p),  in asn1_parse2()
199 					r=asn1_parse2(bp,&p,(long)len,  in asn1_parse2()
208 			if (BIO_puts(bp, "\n") <= 0) goto end;  in asn1_parse2()
222 				if (BIO_puts(bp, ":") <= 0) goto end;  in asn1_parse2()
224 					BIO_write(bp,(const char *)p,(int)len)  in asn1_parse2()
233 					if (BIO_puts(bp, ":") <= 0) goto end;  in asn1_parse2()
234 					i2a_ASN1_OBJECT(bp,o);  in asn1_parse2()
238 					if (BIO_puts(bp, ":BAD OBJECT") <= 0)  in asn1_parse2()
250 					if (BIO_puts(bp, "Bad boolean\n") <= 0)  in asn1_parse2()
253 				BIO_printf(bp,":%d",ii);  in asn1_parse2()
285 						if (BIO_puts(bp, ":") <= 0)  in asn1_parse2()
287 						if (BIO_write(bp,(const char *)opp,  in asn1_parse2()
295 						if (BIO_puts(bp, "[HEX DUMP]:") <= 0)  in asn1_parse2()
299 							if (BIO_printf(bp,"%02X"  in asn1_parse2()
309 							if (BIO_puts(bp, "\n") <= 0)  in asn1_parse2()
312 						if (!BIO_hexdump(bp, opp,  in asn1_parse2()
335 					if (BIO_puts(bp, ":") <= 0) goto end;  in asn1_parse2()
337 						if (BIO_puts(bp, "-") <= 0)  in asn1_parse2()
341 						if (BIO_printf(bp,"%02X",  in asn1_parse2()
347 						if (BIO_puts(bp, "00") <= 0)  in asn1_parse2()
353 					if (BIO_puts(bp, "BAD INTEGER") <= 0)  in asn1_parse2()
367 					if (BIO_puts(bp, ":") <= 0) goto end;  in asn1_parse2()
369 						if (BIO_puts(bp, "-") <= 0)  in asn1_parse2()
373 						if (BIO_printf(bp,"%02X",  in asn1_parse2()
379 						if (BIO_puts(bp, "00") <= 0)  in asn1_parse2()
385 					if (BIO_puts(bp, "BAD ENUMERATED") <= 0)  in asn1_parse2()
394 					if (BIO_puts(bp, "\n") <= 0)  in asn1_parse2()
397 				if (!BIO_hexdump(bp,p,  in asn1_parse2()
406 				if (BIO_puts(bp, "\n") <= 0) goto end;  in asn1_parse2()