1 /* crypto/asn1/asn1_lib.c */
2 /* Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com)
5 * This package is an SSL implementation written
6 * by Eric Young (eay@cryptsoft.com).
7 * The implementation was written so as to conform with Netscapes SSL.
9 * This library is free for commercial and non-commercial use as long as
10 * the following conditions are aheared to. The following conditions
11 * apply to all code found in this distribution, be it the RC4, RSA,
12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 * included with this distribution is covered by the same copyright terms
14 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
16 * Copyright remains Eric Young's, and as such any Copyright notices in
17 * the code are not to be removed.
18 * If this package is used in a product, Eric Young should be given attribution
19 * as the author of the parts of the library used.
20 * This can be in the form of a textual message at program startup or
21 * in documentation (online or textual) provided with the package.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
26 * 1. Redistributions of source code must retain the copyright
27 * notice, this list of conditions and the following disclaimer.
28 * 2. Redistributions in binary form must reproduce the above copyright
29 * notice, this list of conditions and the following disclaimer in the
30 * documentation and/or other materials provided with the distribution.
31 * 3. All advertising materials mentioning features or use of this software
32 * must display the following acknowledgement:
33 * "This product includes cryptographic software written by
34 * Eric Young (eay@cryptsoft.com)"
35 * The word 'cryptographic' can be left out if the rouines from the library
36 * being used are not cryptographic related :-).
37 * 4. If you include any Windows specific code (or a derivative thereof) from
38 * the apps directory (application code) you must include an acknowledgement:
39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
53 * The licence and distribution terms for any publically available version or
54 * derivative of this code cannot be changed. i.e. this code cannot simply be
55 * copied and put under another distribution licence
56 * [including the GNU Public Licence.]
65 static int asn1_get_length(unsigned char **pp
,int *inf
,long *rl
,int max
);
66 static void asn1_put_length(unsigned char **pp
, int length
);
68 static int asn1_get_length();
69 static void asn1_put_length();
72 char *ASN1_version
="ASN1 part of SSLeay 0.8.1b 29-Jun-1998";
74 int ASN1_check_infinite_end(p
,len
)
78 /* If there is 0 or 1 byte left, the length check should pick
82 else if ((len
>= 2) && ((*p
)[0] == 0) && ((*p
)[1] == 0))
91 int ASN1_get_object(pp
, plength
, ptag
, pclass
, omax
)
100 unsigned char *p
= *pp
;
105 ret
=(*p
&V_ASN1_CONSTRUCTED
);
106 xclass
=(*p
&V_ASN1_PRIVATE
);
107 i
= *p
&V_ASN1_PRIMATIVE_TAG
;
108 if (i
== V_ASN1_PRIMATIVE_TAG
)
111 if (--max
== 0) goto err
;
117 if (--max
== 0) goto err
;
127 if (--max
== 0) goto err
;
131 if (!asn1_get_length(&p
,&inf
,plength
,(int)max
)) goto err
;
134 fprintf(stderr
,"p=%d + *plength=%d > omax=%d + *pp=%d (%d > %d)\n",
135 p
,*plength
,omax
,*pp
,(p
+ *plength
),omax
+ *pp
);
138 if ((p
+ *plength
) > (omax
+ *pp
))
140 ASN1err(ASN1_F_ASN1_GET_OBJECT
,ASN1_R_TOO_LONG
);
141 /* Set this so that even if things are not long enough
142 * the values are set correctly */
148 ASN1err(ASN1_F_ASN1_GET_OBJECT
,ASN1_R_HEADER_TOO_LONG
);
152 static int asn1_get_length(pp
,inf
,rl
,max
)
158 unsigned char *p
= *pp
;
162 if (max
-- < 1) return(0);
175 if (max
-- == 0) return(0);
180 if (max
-- == 0) return(0);
191 /* class 0 is constructed
192 * constructed == 2 for indefinitle length constructed */
193 void ASN1_put_object(pp
,constructed
,length
,tag
,xclass
)
200 unsigned char *p
= *pp
;
203 i
=(constructed
)?V_ASN1_CONSTRUCTED
:0;
204 i
|=(xclass
&V_ASN1_PRIVATE
);
206 *(p
++)=i
|(tag
&V_ASN1_PRIMATIVE_TAG
);
209 *(p
++)=i
|V_ASN1_PRIMATIVE_TAG
;
212 *(p
++)=(tag
&0x7f)|0x80;
217 if ((constructed
== 2) && (length
== 0))
218 *(p
++)=0x80; /* der_put_length would output 0 instead */
220 asn1_put_length(&p
,length
);
224 static void asn1_put_length(pp
, length
)
228 unsigned char *p
= *pp
;
231 *(p
++)=(unsigned char)length
;
235 for (i
=0; l
> 0; i
++)
249 int ASN1_object_size(constructed
, length
, tag
)
266 if ((length
== 0) && (constructed
== 2))
283 if ((c
->inf
== (1|V_ASN1_CONSTRUCTED
)) && (!c
->eos
))
285 if (!ASN1_check_infinite_end(&c
->p
,c
->slen
))
287 c
->error
=ASN1_R_MISSING_EOS
;
291 if ( ((c
->slen
!= 0) && !(c
->inf
& 1)) ||
292 ((c
->slen
< 0) && (c
->inf
& 1)))
294 c
->error
=ASN1_R_LENGTH_MISMATCH
;
300 int asn1_GetSequence(c
,length
)
307 c
->inf
=ASN1_get_object(&(c
->p
),&(c
->slen
),&(c
->tag
),&(c
->xclass
),
311 c
->error
=ASN1_R_BAD_GET_OBJECT
;
314 if (c
->tag
!= V_ASN1_SEQUENCE
)
316 c
->error
=ASN1_R_EXPECTING_A_SEQUENCE
;
320 if (c
->max
&& (*length
< 0))
322 c
->error
=ASN1_R_LENGTH_MISMATCH
;
325 if (c
->inf
== (1|V_ASN1_CONSTRUCTED
))
326 c
->slen
= *length
+ *(c
->pp
)-c
->p
;
331 ASN1_STRING
*ASN1_STRING_dup(str
)
336 if (str
== NULL
) return(NULL
);
337 if ((ret
=ASN1_STRING_type_new(str
->type
)) == NULL
)
339 if (!ASN1_STRING_set(ret
,str
->data
,str
->length
))
341 ASN1_STRING_free(ret
);
347 int ASN1_STRING_set(str
,data
,len
)
359 len
=strlen((char *)data
);
361 if ((str
->length
< len
) || (str
->data
== NULL
))
365 str
->data
=(unsigned char *)Malloc(len
+1);
367 str
->data
=(unsigned char *)Realloc(c
,len
+1);
369 if (str
->data
== NULL
)
371 str
->data
=(unsigned char *)c
;
378 memcpy(str
->data
,data
,len
);
379 /* an alowance for strings :-) */
385 ASN1_STRING
*ASN1_STRING_new()
387 return(ASN1_STRING_type_new(V_ASN1_OCTET_STRING
));
391 ASN1_STRING
*ASN1_STRING_type_new(type
)
396 ret
=(ASN1_STRING
*)Malloc(sizeof(ASN1_STRING
));
399 ASN1err(ASN1_F_ASN1_STRING_TYPE_NEW
,ERR_R_MALLOC_FAILURE
);
408 void ASN1_STRING_free(a
)
411 if (a
== NULL
) return;
412 if (a
->data
!= NULL
) Free((char *)a
->data
);
416 int ASN1_STRING_cmp(a
,b
)
421 i
=(a
->length
-b
->length
);
424 i
=memcmp(a
->data
,b
->data
,a
->length
);
426 return(a
->type
-b
->type
);