Line data Source code
1 : /* crypto/asn1/f_int.c */
2 : /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3 : * All rights reserved.
4 : *
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.
8 : *
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).
15 : *
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.
22 : *
23 : * Redistribution and use in source and binary forms, with or without
24 : * modification, are permitted provided that the following conditions
25 : * are met:
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)"
40 : *
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
51 : * SUCH DAMAGE.
52 : *
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.]
57 : */
58 :
59 : #include <stdio.h>
60 : #include "cryptlib.h"
61 : #include <openssl/buffer.h>
62 : #include <openssl/asn1.h>
63 :
64 0 : int i2a_ASN1_INTEGER(BIO *bp, ASN1_INTEGER *a)
65 : {
66 : int i, n = 0;
67 : static const char *h = "0123456789ABCDEF";
68 : char buf[2];
69 :
70 0 : if (a == NULL)
71 : return (0);
72 :
73 0 : if (a->type & V_ASN1_NEG) {
74 0 : if (BIO_write(bp, "-", 1) != 1)
75 : goto err;
76 : n = 1;
77 : }
78 :
79 0 : if (a->length == 0) {
80 0 : if (BIO_write(bp, "00", 2) != 2)
81 : goto err;
82 0 : n += 2;
83 : } else {
84 0 : for (i = 0; i < a->length; i++) {
85 0 : if ((i != 0) && (i % 35 == 0)) {
86 0 : if (BIO_write(bp, "\\\n", 2) != 2)
87 : goto err;
88 0 : n += 2;
89 : }
90 0 : buf[0] = h[((unsigned char)a->data[i] >> 4) & 0x0f];
91 0 : buf[1] = h[((unsigned char)a->data[i]) & 0x0f];
92 0 : if (BIO_write(bp, buf, 2) != 2)
93 : goto err;
94 0 : n += 2;
95 : }
96 : }
97 0 : return (n);
98 : err:
99 : return (-1);
100 : }
101 :
102 0 : int a2i_ASN1_INTEGER(BIO *bp, ASN1_INTEGER *bs, char *buf, int size)
103 : {
104 : int ret = 0;
105 : int i, j, k, m, n, again, bufsize;
106 : unsigned char *s = NULL, *sp;
107 : unsigned char *bufp;
108 : int num = 0, slen = 0, first = 1;
109 :
110 0 : bs->type = V_ASN1_INTEGER;
111 :
112 0 : bufsize = BIO_gets(bp, buf, size);
113 : for (;;) {
114 0 : if (bufsize < 1)
115 : goto err_sl;
116 : i = bufsize;
117 0 : if (buf[i - 1] == '\n')
118 0 : buf[--i] = '\0';
119 0 : if (i == 0)
120 : goto err_sl;
121 0 : if (buf[i - 1] == '\r')
122 0 : buf[--i] = '\0';
123 0 : if (i == 0)
124 : goto err_sl;
125 0 : again = (buf[i - 1] == '\\');
126 :
127 0 : for (j = 0; j < i; j++) {
128 : #ifndef CHARSET_EBCDIC
129 0 : if (!(((buf[j] >= '0') && (buf[j] <= '9')) ||
130 : ((buf[j] >= 'a') && (buf[j] <= 'f')) ||
131 0 : ((buf[j] >= 'A') && (buf[j] <= 'F'))))
132 : #else
133 : /*
134 : * This #ifdef is not strictly necessary, since the characters
135 : * A...F a...f 0...9 are contiguous (yes, even in EBCDIC - but
136 : * not the whole alphabet). Nevertheless, isxdigit() is faster.
137 : */
138 : if (!isxdigit(buf[j]))
139 : #endif
140 : {
141 : i = j;
142 : break;
143 : }
144 : }
145 0 : buf[i] = '\0';
146 : /*
147 : * We have now cleared all the crap off the end of the line
148 : */
149 0 : if (i < 2)
150 : goto err_sl;
151 :
152 : bufp = (unsigned char *)buf;
153 0 : if (first) {
154 : first = 0;
155 0 : if ((bufp[0] == '0') && (buf[1] == '0')) {
156 0 : bufp += 2;
157 0 : i -= 2;
158 : }
159 : }
160 : k = 0;
161 0 : i -= again;
162 0 : if (i % 2 != 0) {
163 0 : ASN1err(ASN1_F_A2I_ASN1_INTEGER, ASN1_R_ODD_NUMBER_OF_CHARS);
164 0 : goto err;
165 : }
166 0 : i /= 2;
167 0 : if (num + i > slen) {
168 0 : if (s == NULL)
169 0 : sp = (unsigned char *)OPENSSL_malloc((unsigned int)num +
170 : i * 2);
171 : else
172 0 : sp = OPENSSL_realloc_clean(s, slen, num + i * 2);
173 0 : if (sp == NULL) {
174 0 : ASN1err(ASN1_F_A2I_ASN1_INTEGER, ERR_R_MALLOC_FAILURE);
175 0 : if (s != NULL)
176 0 : OPENSSL_free(s);
177 : goto err;
178 : }
179 : s = sp;
180 0 : slen = num + i * 2;
181 : }
182 0 : for (j = 0; j < i; j++, k += 2) {
183 0 : for (n = 0; n < 2; n++) {
184 0 : m = bufp[k + n];
185 0 : if ((m >= '0') && (m <= '9'))
186 0 : m -= '0';
187 0 : else if ((m >= 'a') && (m <= 'f'))
188 0 : m = m - 'a' + 10;
189 0 : else if ((m >= 'A') && (m <= 'F'))
190 0 : m = m - 'A' + 10;
191 : else {
192 0 : ASN1err(ASN1_F_A2I_ASN1_INTEGER,
193 : ASN1_R_NON_HEX_CHARACTERS);
194 0 : goto err;
195 : }
196 0 : s[num + j] <<= 4;
197 0 : s[num + j] |= m;
198 : }
199 : }
200 : num += i;
201 0 : if (again)
202 0 : bufsize = BIO_gets(bp, buf, size);
203 : else
204 : break;
205 0 : }
206 0 : bs->length = num;
207 0 : bs->data = s;
208 : ret = 1;
209 : err:
210 : if (0) {
211 : err_sl:
212 0 : ASN1err(ASN1_F_A2I_ASN1_INTEGER, ASN1_R_SHORT_LINE);
213 : }
214 0 : return (ret);
215 : }
|