]> git.ipfire.org Git - thirdparty/openssl.git/blame - crypto/asn1/f_int.c
Convert all {NAME}err() in crypto/ to their corresponding ERR_raise() call
[thirdparty/openssl.git] / crypto / asn1 / f_int.c
CommitLineData
b1322259 1/*
a1df06b3 2 * Copyright 1995-2017 The OpenSSL Project Authors. All Rights Reserved.
d02b48c6 3 *
365a2d99 4 * Licensed under the Apache License 2.0 (the "License"). You may not use
b1322259
RS
5 * this file except in compliance with the License. You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
d02b48c6
RE
8 */
9
10#include <stdio.h>
25f2138b 11#include "crypto/ctype.h"
b39fc560 12#include "internal/cryptlib.h"
ec577822 13#include <openssl/buffer.h>
f66c3032 14#include <openssl/asn1.h>
d02b48c6 15
604f6eff 16int i2a_ASN1_INTEGER(BIO *bp, const ASN1_INTEGER *a)
0f113f3e
MC
17{
18 int i, n = 0;
19 static const char *h = "0123456789ABCDEF";
20 char buf[2];
d02b48c6 21
0f113f3e 22 if (a == NULL)
26a7d938 23 return 0;
d02b48c6 24
0f113f3e
MC
25 if (a->type & V_ASN1_NEG) {
26 if (BIO_write(bp, "-", 1) != 1)
27 goto err;
28 n = 1;
29 }
8e8972bb 30
0f113f3e
MC
31 if (a->length == 0) {
32 if (BIO_write(bp, "00", 2) != 2)
33 goto err;
34 n += 2;
35 } else {
36 for (i = 0; i < a->length; i++) {
37 if ((i != 0) && (i % 35 == 0)) {
38 if (BIO_write(bp, "\\\n", 2) != 2)
39 goto err;
40 n += 2;
41 }
42 buf[0] = h[((unsigned char)a->data[i] >> 4) & 0x0f];
43 buf[1] = h[((unsigned char)a->data[i]) & 0x0f];
44 if (BIO_write(bp, buf, 2) != 2)
45 goto err;
46 n += 2;
47 }
48 }
26a7d938 49 return n;
0f113f3e 50 err:
26a7d938 51 return -1;
0f113f3e 52}
d02b48c6 53
6b691a5c 54int a2i_ASN1_INTEGER(BIO *bp, ASN1_INTEGER *bs, char *buf, int size)
0f113f3e 55{
0f113f3e
MC
56 int i, j, k, m, n, again, bufsize;
57 unsigned char *s = NULL, *sp;
58 unsigned char *bufp;
59 int num = 0, slen = 0, first = 1;
d02b48c6 60
0f113f3e 61 bs->type = V_ASN1_INTEGER;
d02b48c6 62
0f113f3e
MC
63 bufsize = BIO_gets(bp, buf, size);
64 for (;;) {
65 if (bufsize < 1)
66696478 66 goto err;
0f113f3e
MC
67 i = bufsize;
68 if (buf[i - 1] == '\n')
69 buf[--i] = '\0';
70 if (i == 0)
66696478 71 goto err;
0f113f3e
MC
72 if (buf[i - 1] == '\r')
73 buf[--i] = '\0';
74 if (i == 0)
66696478 75 goto err;
0f113f3e 76 again = (buf[i - 1] == '\\');
d02b48c6 77
0f113f3e 78 for (j = 0; j < i; j++) {
a1df06b3 79 if (!ossl_isxdigit(buf[j]))
0f113f3e
MC
80 {
81 i = j;
82 break;
83 }
84 }
85 buf[i] = '\0';
86 /*
87 * We have now cleared all the crap off the end of the line
88 */
89 if (i < 2)
66696478 90 goto err;
d02b48c6 91
0f113f3e
MC
92 bufp = (unsigned char *)buf;
93 if (first) {
94 first = 0;
aa402e2b 95 if ((bufp[0] == '0') && (bufp[1] == '0')) {
0f113f3e
MC
96 bufp += 2;
97 i -= 2;
98 }
99 }
100 k = 0;
101 i -= again;
102 if (i % 2 != 0) {
9311d0c4 103 ERR_raise(ERR_LIB_ASN1, ASN1_R_ODD_NUMBER_OF_CHARS);
3dc87806 104 OPENSSL_free(s);
66696478 105 return 0;
0f113f3e
MC
106 }
107 i /= 2;
108 if (num + i > slen) {
c99de053 109 sp = OPENSSL_clear_realloc(s, slen, num + i * 2);
0f113f3e 110 if (sp == NULL) {
9311d0c4 111 ERR_raise(ERR_LIB_ASN1, ERR_R_MALLOC_FAILURE);
b548a1f1 112 OPENSSL_free(s);
66696478 113 return 0;
0f113f3e
MC
114 }
115 s = sp;
116 slen = num + i * 2;
117 }
118 for (j = 0; j < i; j++, k += 2) {
119 for (n = 0; n < 2; n++) {
49445f21
RS
120 m = OPENSSL_hexchar2int(bufp[k + n]);
121 if (m < 0) {
9311d0c4 122 ERR_raise(ERR_LIB_ASN1, ASN1_R_NON_HEX_CHARACTERS);
0f113f3e
MC
123 goto err;
124 }
125 s[num + j] <<= 4;
126 s[num + j] |= m;
127 }
128 }
129 num += i;
130 if (again)
131 bufsize = BIO_gets(bp, buf, size);
132 else
133 break;
134 }
135 bs->length = num;
136 bs->data = s;
66696478 137 return 1;
0f113f3e 138 err:
9311d0c4 139 ERR_raise(ERR_LIB_ASN1, ASN1_R_SHORT_LINE);
b0cb22b0 140 OPENSSL_free(s);
66696478 141 return 0;
0f113f3e 142}
6c5b6cb0 143
095d2f0f 144int i2a_ASN1_ENUMERATED(BIO *bp, const ASN1_ENUMERATED *a)
6c5b6cb0
DSH
145{
146 return i2a_ASN1_INTEGER(bp, a);
147}
148
149int a2i_ASN1_ENUMERATED(BIO *bp, ASN1_ENUMERATED *bs, char *buf, int size)
150{
151 int rv = a2i_ASN1_INTEGER(bp, bs, buf, size);
152 if (rv == 1)
153 bs->type = V_ASN1_INTEGER | (bs->type & V_ASN1_NEG);
154 return rv;
155}