1 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
2  * All rights reserved.
3  *
4  * This package is an SSL implementation written
5  * by Eric Young (eay@cryptsoft.com).
6  * The implementation was written so as to conform with Netscapes SSL.
7  *
8  * This library is free for commercial and non-commercial use as long as
9  * the following conditions are aheared to.  The following conditions
10  * apply to all code found in this distribution, be it the RC4, RSA,
11  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
12  * included with this distribution is covered by the same copyright terms
13  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
14  *
15  * Copyright remains Eric Young's, and as such any Copyright notices in
16  * the code are not to be removed.
17  * If this package is used in a product, Eric Young should be given attribution
18  * as the author of the parts of the library used.
19  * This can be in the form of a textual message at program startup or
20  * in documentation (online or textual) provided with the package.
21  *
22  * Redistribution and use in source and binary forms, with or without
23  * modification, are permitted provided that the following conditions
24  * are met:
25  * 1. Redistributions of source code must retain the copyright
26  *    notice, this list of conditions and the following disclaimer.
27  * 2. Redistributions in binary form must reproduce the above copyright
28  *    notice, this list of conditions and the following disclaimer in the
29  *    documentation and/or other materials provided with the distribution.
30  * 3. All advertising materials mentioning features or use of this software
31  *    must display the following acknowledgement:
32  *    "This product includes cryptographic software written by
33  *     Eric Young (eay@cryptsoft.com)"
34  *    The word 'cryptographic' can be left out if the rouines from the library
35  *    being used are not cryptographic related :-).
36  * 4. If you include any Windows specific code (or a derivative thereof) from
37  *    the apps directory (application code) you must include an acknowledgement:
38  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
39  *
40  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
41  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
44  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
50  * SUCH DAMAGE.
51  *
52  * The licence and distribution terms for any publically available version or
53  * derivative of this code cannot be changed.  i.e. this code cannot simply be
54  * copied and put under another distribution licence
55  * [including the GNU Public Licence.] */
56 
57 #include <openssl/asn1.h>
58 
59 #include <openssl/err.h>
60 #include <openssl/mem.h>
61 
62 /* Based on a_int.c: equivalent ENUMERATED functions */
63 
i2a_ASN1_ENUMERATED(BIO * bp,ASN1_ENUMERATED * a)64 int i2a_ASN1_ENUMERATED(BIO *bp, ASN1_ENUMERATED *a)
65 	{
66 	int i,n=0;
67 	static const char *h="0123456789ABCDEF";
68 	char buf[2];
69 
70 	if (a == NULL) return(0);
71 
72 	if (a->length == 0)
73 		{
74 		if (BIO_write(bp,"00",2) != 2) goto err;
75 		n=2;
76 		}
77 	else
78 		{
79 		for (i=0; i<a->length; i++)
80 			{
81 			if ((i != 0) && (i%35 == 0))
82 				{
83 				if (BIO_write(bp,"\\\n",2) != 2) goto err;
84 				n+=2;
85 				}
86 			buf[0]=h[((unsigned char)a->data[i]>>4)&0x0f];
87 			buf[1]=h[((unsigned char)a->data[i]   )&0x0f];
88 			if (BIO_write(bp,buf,2) != 2) goto err;
89 			n+=2;
90 			}
91 		}
92 	return(n);
93 err:
94 	return(-1);
95 	}
96 
a2i_ASN1_ENUMERATED(BIO * bp,ASN1_ENUMERATED * bs,char * buf,int size)97 int a2i_ASN1_ENUMERATED(BIO *bp, ASN1_ENUMERATED *bs, char *buf, int size)
98 	{
99 	int ret=0;
100 	int i,j,k,m,n,again,bufsize;
101 	unsigned char *s=NULL,*sp;
102 	unsigned char *bufp;
103 	int num=0,slen=0,first=1;
104 
105 	bs->type=V_ASN1_ENUMERATED;
106 
107 	bufsize=BIO_gets(bp,buf,size);
108 	for (;;)
109 		{
110 		if (bufsize < 1) goto err_sl;
111 		i=bufsize;
112 		if (buf[i-1] == '\n') buf[--i]='\0';
113 		if (i == 0) goto err_sl;
114 		if (buf[i-1] == '\r') buf[--i]='\0';
115 		if (i == 0) goto err_sl;
116 		again=(buf[i-1] == '\\');
117 
118 		for (j=0; j<i; j++)
119 			{
120 			if (!(	((buf[j] >= '0') && (buf[j] <= '9')) ||
121 				((buf[j] >= 'a') && (buf[j] <= 'f')) ||
122 				((buf[j] >= 'A') && (buf[j] <= 'F'))))
123 				{
124 				i=j;
125 				break;
126 				}
127 			}
128 		buf[i]='\0';
129 		/* We have now cleared all the crap off the end of the
130 		 * line */
131 		if (i < 2) goto err_sl;
132 
133 		bufp=(unsigned char *)buf;
134 		if (first)
135 			{
136 			first=0;
137 			if ((bufp[0] == '0') && (buf[1] == '0'))
138 				{
139 				bufp+=2;
140 				i-=2;
141 				}
142 			}
143 		k=0;
144 		i-=again;
145 		if (i%2 != 0)
146 			{
147 			OPENSSL_PUT_ERROR(ASN1, ASN1_R_ODD_NUMBER_OF_CHARS);
148 			goto err;
149 			}
150 		i/=2;
151 		if (num+i > slen)
152 			{
153 			if (s == NULL)
154 				sp=(unsigned char *)OPENSSL_malloc(
155 					(unsigned int)num+i*2);
156 			else
157 				sp=(unsigned char *)OPENSSL_realloc(s,
158 					(unsigned int)num+i*2);
159 			if (sp == NULL)
160 				{
161 				OPENSSL_PUT_ERROR(ASN1, ERR_R_MALLOC_FAILURE);
162 				goto err;
163 				}
164 			s=sp;
165 			slen=num+i*2;
166 			}
167 		for (j=0; j<i; j++,k+=2)
168 			{
169 			for (n=0; n<2; n++)
170 				{
171 				m=bufp[k+n];
172 				if ((m >= '0') && (m <= '9'))
173 					m-='0';
174 				else if ((m >= 'a') && (m <= 'f'))
175 					m=m-'a'+10;
176 				else if ((m >= 'A') && (m <= 'F'))
177 					m=m-'A'+10;
178 				else
179 					{
180 					OPENSSL_PUT_ERROR(ASN1, ASN1_R_NON_HEX_CHARACTERS);
181 					goto err;
182 					}
183 				s[num+j]<<=4;
184 				s[num+j]|=m;
185 				}
186 			}
187 		num+=i;
188 		if (again)
189 			bufsize=BIO_gets(bp,buf,size);
190 		else
191 			break;
192 		}
193 	bs->length=num;
194 	bs->data=s;
195 	ret=1;
196 err:
197 	if (0)
198 		{
199 err_sl:
200 		OPENSSL_PUT_ERROR(ASN1, ASN1_R_SHORT_LINE);
201 		}
202 	if (s != NULL)
203 		OPENSSL_free(s);
204 	return(ret);
205 	}
206 
207