Absolute File Name: | /home/opencoverage/opencoverage/guest-scripts/libressl/src/crypto/asn1/x_long.c |
Source code | Switch to Preprocessed file |
Line | Source | Count | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
1 | /* $OpenBSD: x_long.c,v 1.11 2017/01/29 17:49:22 beck Exp $ */ | - | ||||||||||||
2 | /* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL | - | ||||||||||||
3 | * project 2000. | - | ||||||||||||
4 | */ | - | ||||||||||||
5 | /* ==================================================================== | - | ||||||||||||
6 | * Copyright (c) 2000 The OpenSSL Project. All rights reserved. | - | ||||||||||||
7 | * | - | ||||||||||||
8 | * Redistribution and use in source and binary forms, with or without | - | ||||||||||||
9 | * modification, are permitted provided that the following conditions | - | ||||||||||||
10 | * are met: | - | ||||||||||||
11 | * | - | ||||||||||||
12 | * 1. Redistributions of source code must retain the above copyright | - | ||||||||||||
13 | * notice, this list of conditions and the following disclaimer. | - | ||||||||||||
14 | * | - | ||||||||||||
15 | * 2. Redistributions in binary form must reproduce the above copyright | - | ||||||||||||
16 | * notice, this list of conditions and the following disclaimer in | - | ||||||||||||
17 | * the documentation and/or other materials provided with the | - | ||||||||||||
18 | * distribution. | - | ||||||||||||
19 | * | - | ||||||||||||
20 | * 3. All advertising materials mentioning features or use of this | - | ||||||||||||
21 | * software must display the following acknowledgment: | - | ||||||||||||
22 | * "This product includes software developed by the OpenSSL Project | - | ||||||||||||
23 | * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" | - | ||||||||||||
24 | * | - | ||||||||||||
25 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | - | ||||||||||||
26 | * endorse or promote products derived from this software without | - | ||||||||||||
27 | * prior written permission. For written permission, please contact | - | ||||||||||||
28 | * licensing@OpenSSL.org. | - | ||||||||||||
29 | * | - | ||||||||||||
30 | * 5. Products derived from this software may not be called "OpenSSL" | - | ||||||||||||
31 | * nor may "OpenSSL" appear in their names without prior written | - | ||||||||||||
32 | * permission of the OpenSSL Project. | - | ||||||||||||
33 | * | - | ||||||||||||
34 | * 6. Redistributions of any form whatsoever must retain the following | - | ||||||||||||
35 | * acknowledgment: | - | ||||||||||||
36 | * "This product includes software developed by the OpenSSL Project | - | ||||||||||||
37 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | - | ||||||||||||
38 | * | - | ||||||||||||
39 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | - | ||||||||||||
40 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | - | ||||||||||||
41 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | - | ||||||||||||
42 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | - | ||||||||||||
43 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | - | ||||||||||||
44 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | - | ||||||||||||
45 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | - | ||||||||||||
46 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | - | ||||||||||||
47 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | - | ||||||||||||
48 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | - | ||||||||||||
49 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | - | ||||||||||||
50 | * OF THE POSSIBILITY OF SUCH DAMAGE. | - | ||||||||||||
51 | * ==================================================================== | - | ||||||||||||
52 | * | - | ||||||||||||
53 | * This product includes cryptographic software written by Eric Young | - | ||||||||||||
54 | * (eay@cryptsoft.com). This product includes software written by Tim | - | ||||||||||||
55 | * Hudson (tjh@cryptsoft.com). | - | ||||||||||||
56 | * | - | ||||||||||||
57 | */ | - | ||||||||||||
58 | - | |||||||||||||
59 | #include <stdio.h> | - | ||||||||||||
60 | #include <string.h> | - | ||||||||||||
61 | - | |||||||||||||
62 | #include <openssl/asn1t.h> | - | ||||||||||||
63 | #include <openssl/bn.h> | - | ||||||||||||
64 | #include <openssl/err.h> | - | ||||||||||||
65 | - | |||||||||||||
66 | /* Custom primitive type for long handling. This converts between an ASN1_INTEGER | - | ||||||||||||
67 | * and a long directly. | - | ||||||||||||
68 | */ | - | ||||||||||||
69 | - | |||||||||||||
70 | - | |||||||||||||
71 | static int long_new(ASN1_VALUE **pval, const ASN1_ITEM *it); | - | ||||||||||||
72 | static void long_free(ASN1_VALUE **pval, const ASN1_ITEM *it); | - | ||||||||||||
73 | - | |||||||||||||
74 | static int long_i2c(ASN1_VALUE **pval, unsigned char *cont, int *putype, const ASN1_ITEM *it); | - | ||||||||||||
75 | static int long_c2i(ASN1_VALUE **pval, const unsigned char *cont, int len, int utype, char *free_cont, const ASN1_ITEM *it); | - | ||||||||||||
76 | static int long_print(BIO *out, ASN1_VALUE **pval, const ASN1_ITEM *it, int indent, const ASN1_PCTX *pctx); | - | ||||||||||||
77 | - | |||||||||||||
78 | static ASN1_PRIMITIVE_FUNCS long_pf = { | - | ||||||||||||
79 | NULL, 0, | - | ||||||||||||
80 | long_new, | - | ||||||||||||
81 | long_free, | - | ||||||||||||
82 | long_free, /* Clear should set to initial value */ | - | ||||||||||||
83 | long_c2i, | - | ||||||||||||
84 | long_i2c, | - | ||||||||||||
85 | long_print | - | ||||||||||||
86 | }; | - | ||||||||||||
87 | - | |||||||||||||
88 | const ASN1_ITEM LONG_it = { | - | ||||||||||||
89 | .itype = ASN1_ITYPE_PRIMITIVE, | - | ||||||||||||
90 | .utype = V_ASN1_INTEGER, | - | ||||||||||||
91 | .templates = NULL, | - | ||||||||||||
92 | .tcount = 0, | - | ||||||||||||
93 | .funcs = &long_pf, | - | ||||||||||||
94 | .size = ASN1_LONG_UNDEF, | - | ||||||||||||
95 | .sname = "LONG", | - | ||||||||||||
96 | }; | - | ||||||||||||
97 | - | |||||||||||||
98 | const ASN1_ITEM ZLONG_it = { | - | ||||||||||||
99 | .itype = ASN1_ITYPE_PRIMITIVE, | - | ||||||||||||
100 | .utype = V_ASN1_INTEGER, | - | ||||||||||||
101 | .templates = NULL, | - | ||||||||||||
102 | .tcount = 0, | - | ||||||||||||
103 | .funcs = &long_pf, | - | ||||||||||||
104 | .size = 0, | - | ||||||||||||
105 | .sname = "ZLONG", | - | ||||||||||||
106 | }; | - | ||||||||||||
107 | - | |||||||||||||
108 | static int | - | ||||||||||||
109 | long_new(ASN1_VALUE **pval, const ASN1_ITEM *it) | - | ||||||||||||
110 | { | - | ||||||||||||
111 | *(long *)pval = it->size; | - | ||||||||||||
112 | return 1; never executed: return 1; | 0 | ||||||||||||
113 | } | - | ||||||||||||
114 | - | |||||||||||||
115 | static void | - | ||||||||||||
116 | long_free(ASN1_VALUE **pval, const ASN1_ITEM *it) | - | ||||||||||||
117 | { | - | ||||||||||||
118 | *(long *)pval = it->size; | - | ||||||||||||
119 | } executed 126 times by 1 test: end of block Executed by:
| 126 | ||||||||||||
120 | - | |||||||||||||
121 | static int | - | ||||||||||||
122 | long_i2c(ASN1_VALUE **pval, unsigned char *cont, int *putype, | - | ||||||||||||
123 | const ASN1_ITEM *it) | - | ||||||||||||
124 | { | - | ||||||||||||
125 | long ltmp; | - | ||||||||||||
126 | unsigned long utmp; | - | ||||||||||||
127 | int clen, pad, i; | - | ||||||||||||
128 | /* this exists to bypass broken gcc optimization */ | - | ||||||||||||
129 | char *cp = (char *)pval; | - | ||||||||||||
130 | - | |||||||||||||
131 | /* use memcpy, because we may not be long aligned */ | - | ||||||||||||
132 | memcpy(<mp, cp, sizeof(long)); | - | ||||||||||||
133 | - | |||||||||||||
134 | if (ltmp == it->size)
| 60-378 | ||||||||||||
135 | return -1; executed 378 times by 1 test: return -1; Executed by:
| 378 | ||||||||||||
136 | /* Convert the long to positive: we subtract one if negative so | - | ||||||||||||
137 | * we can cleanly handle the padding if only the MSB of the leading | - | ||||||||||||
138 | * octet is set. | - | ||||||||||||
139 | */ | - | ||||||||||||
140 | if (ltmp < 0)
| 0-60 | ||||||||||||
141 | utmp = -ltmp - 1; never executed: utmp = -ltmp - 1; | 0 | ||||||||||||
142 | else | - | ||||||||||||
143 | utmp = ltmp; executed 60 times by 2 tests: utmp = ltmp; Executed by:
| 60 | ||||||||||||
144 | clen = BN_num_bits_word(utmp); | - | ||||||||||||
145 | /* If MSB of leading octet set we need to pad */ | - | ||||||||||||
146 | if (!(clen & 0x7))
| 0-60 | ||||||||||||
147 | pad = 1; executed 60 times by 2 tests: pad = 1; Executed by:
| 60 | ||||||||||||
148 | else | - | ||||||||||||
149 | pad = 0; never executed: pad = 0; | 0 | ||||||||||||
150 | - | |||||||||||||
151 | /* Convert number of bits to number of octets */ | - | ||||||||||||
152 | clen = (clen + 7) >> 3; | - | ||||||||||||
153 | - | |||||||||||||
154 | if (cont) {
| 15-45 | ||||||||||||
155 | if (pad)
| 0-15 | ||||||||||||
156 | *cont++ = (ltmp < 0) ? 0xff : 0; executed 15 times by 2 tests: *cont++ = (ltmp < 0) ? 0xff : 0; Executed by:
| 0-15 | ||||||||||||
157 | for (i = clen - 1; i >= 0; i--) {
| 14-15 | ||||||||||||
158 | cont[i] = (unsigned char)(utmp & 0xff); | - | ||||||||||||
159 | if (ltmp < 0)
| 0-14 | ||||||||||||
160 | cont[i] ^= 0xff; never executed: cont[i] ^= 0xff; | 0 | ||||||||||||
161 | utmp >>= 8; | - | ||||||||||||
162 | } executed 14 times by 1 test: end of block Executed by:
| 14 | ||||||||||||
163 | } executed 15 times by 2 tests: end of block Executed by:
| 15 | ||||||||||||
164 | return clen + pad; executed 60 times by 2 tests: return clen + pad; Executed by:
| 60 | ||||||||||||
165 | } | - | ||||||||||||
166 | - | |||||||||||||
167 | static int | - | ||||||||||||
168 | long_c2i(ASN1_VALUE **pval, const unsigned char *cont, int len, int utype, | - | ||||||||||||
169 | char *free_cont, const ASN1_ITEM *it) | - | ||||||||||||
170 | { | - | ||||||||||||
171 | int neg, i; | - | ||||||||||||
172 | long ltmp; | - | ||||||||||||
173 | unsigned long utmp = 0; | - | ||||||||||||
174 | char *cp = (char *)pval; | - | ||||||||||||
175 | if (len > (int)sizeof(long)) {
| 0-79 | ||||||||||||
176 | ASN1error(ASN1_R_INTEGER_TOO_LARGE_FOR_LONG); | - | ||||||||||||
177 | return 0; never executed: return 0; | 0 | ||||||||||||
178 | } | - | ||||||||||||
179 | /* Is it negative? */ | - | ||||||||||||
180 | if (len && (cont[0] & 0x80))
| 0-79 | ||||||||||||
181 | neg = 1; never executed: neg = 1; | 0 | ||||||||||||
182 | else | - | ||||||||||||
183 | neg = 0; executed 79 times by 5 tests: neg = 0; Executed by:
| 79 | ||||||||||||
184 | utmp = 0; | - | ||||||||||||
185 | for (i = 0; i < len; i++) {
| 79-93 | ||||||||||||
186 | utmp <<= 8; | - | ||||||||||||
187 | if (neg)
| 0-93 | ||||||||||||
188 | utmp |= cont[i] ^ 0xff; never executed: utmp |= cont[i] ^ 0xff; | 0 | ||||||||||||
189 | else | - | ||||||||||||
190 | utmp |= cont[i]; executed 93 times by 5 tests: utmp |= cont[i]; Executed by:
| 93 | ||||||||||||
191 | } | - | ||||||||||||
192 | ltmp = (long)utmp; | - | ||||||||||||
193 | if (neg) {
| 0-79 | ||||||||||||
194 | ltmp++; | - | ||||||||||||
195 | ltmp = -ltmp; | - | ||||||||||||
196 | } never executed: end of block | 0 | ||||||||||||
197 | if (ltmp == it->size) {
| 0-79 | ||||||||||||
198 | ASN1error(ASN1_R_INTEGER_TOO_LARGE_FOR_LONG); | - | ||||||||||||
199 | return 0; never executed: return 0; | 0 | ||||||||||||
200 | } | - | ||||||||||||
201 | memcpy(cp, <mp, sizeof(long)); | - | ||||||||||||
202 | return 1; executed 79 times by 5 tests: return 1; Executed by:
| 79 | ||||||||||||
203 | } | - | ||||||||||||
204 | - | |||||||||||||
205 | static int | - | ||||||||||||
206 | long_print(BIO *out, ASN1_VALUE **pval, const ASN1_ITEM *it, int indent, | - | ||||||||||||
207 | const ASN1_PCTX *pctx) | - | ||||||||||||
208 | { | - | ||||||||||||
209 | return BIO_printf(out, "%ld\n", *(long *)pval); never executed: return BIO_printf(out, "%ld\n", *(long *)pval); | 0 | ||||||||||||
210 | } | - | ||||||||||||
Source code | Switch to Preprocessed file |