/src/boringssl/crypto/asn1/tasn_fre.c
Line | Count | Source (jump to first uncovered line) |
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 <assert.h> |
60 | | |
61 | | #include <openssl/asn1t.h> |
62 | | #include <openssl/mem.h> |
63 | | |
64 | | #include "internal.h" |
65 | | |
66 | | // Free up an ASN1 structure |
67 | | |
68 | 0 | void ASN1_item_free(ASN1_VALUE *val, const ASN1_ITEM *it) { |
69 | 0 | ASN1_item_ex_free(&val, it); |
70 | 0 | } |
71 | | |
72 | 0 | void ASN1_item_ex_free(ASN1_VALUE **pval, const ASN1_ITEM *it) { |
73 | 0 | const ASN1_TEMPLATE *tt = NULL, *seqtt; |
74 | 0 | const ASN1_EXTERN_FUNCS *ef; |
75 | 0 | int i; |
76 | 0 | if (!pval) { |
77 | 0 | return; |
78 | 0 | } |
79 | 0 | if ((it->itype != ASN1_ITYPE_PRIMITIVE) && !*pval) { |
80 | 0 | return; |
81 | 0 | } |
82 | | |
83 | 0 | switch (it->itype) { |
84 | 0 | case ASN1_ITYPE_PRIMITIVE: |
85 | 0 | if (it->templates) { |
86 | 0 | ASN1_template_free(pval, it->templates); |
87 | 0 | } else { |
88 | 0 | ASN1_primitive_free(pval, it); |
89 | 0 | } |
90 | 0 | break; |
91 | | |
92 | 0 | case ASN1_ITYPE_MSTRING: |
93 | 0 | ASN1_primitive_free(pval, it); |
94 | 0 | break; |
95 | | |
96 | 0 | case ASN1_ITYPE_CHOICE: { |
97 | 0 | const ASN1_AUX *aux = it->funcs; |
98 | 0 | ASN1_aux_cb *asn1_cb = aux != NULL ? aux->asn1_cb : NULL; |
99 | 0 | if (asn1_cb) { |
100 | 0 | i = asn1_cb(ASN1_OP_FREE_PRE, pval, it, NULL); |
101 | 0 | if (i == 2) { |
102 | 0 | return; |
103 | 0 | } |
104 | 0 | } |
105 | 0 | i = asn1_get_choice_selector(pval, it); |
106 | 0 | if ((i >= 0) && (i < it->tcount)) { |
107 | 0 | ASN1_VALUE **pchval; |
108 | 0 | tt = it->templates + i; |
109 | 0 | pchval = asn1_get_field_ptr(pval, tt); |
110 | 0 | ASN1_template_free(pchval, tt); |
111 | 0 | } |
112 | 0 | if (asn1_cb) { |
113 | 0 | asn1_cb(ASN1_OP_FREE_POST, pval, it, NULL); |
114 | 0 | } |
115 | 0 | OPENSSL_free(*pval); |
116 | 0 | *pval = NULL; |
117 | 0 | break; |
118 | 0 | } |
119 | | |
120 | 0 | case ASN1_ITYPE_EXTERN: |
121 | 0 | ef = it->funcs; |
122 | 0 | if (ef && ef->asn1_ex_free) { |
123 | 0 | ef->asn1_ex_free(pval, it); |
124 | 0 | } |
125 | 0 | break; |
126 | | |
127 | 0 | case ASN1_ITYPE_SEQUENCE: { |
128 | 0 | if (!asn1_refcount_dec_and_test_zero(pval, it)) { |
129 | 0 | return; |
130 | 0 | } |
131 | 0 | const ASN1_AUX *aux = it->funcs; |
132 | 0 | ASN1_aux_cb *asn1_cb = aux != NULL ? aux->asn1_cb : NULL; |
133 | 0 | if (asn1_cb) { |
134 | 0 | i = asn1_cb(ASN1_OP_FREE_PRE, pval, it, NULL); |
135 | 0 | if (i == 2) { |
136 | 0 | return; |
137 | 0 | } |
138 | 0 | } |
139 | 0 | asn1_enc_free(pval, it); |
140 | | // If we free up as normal we will invalidate any ANY DEFINED BY |
141 | | // field and we wont be able to determine the type of the field it |
142 | | // defines. So free up in reverse order. |
143 | 0 | tt = it->templates + it->tcount - 1; |
144 | 0 | for (i = 0; i < it->tcount; tt--, i++) { |
145 | 0 | ASN1_VALUE **pseqval; |
146 | 0 | seqtt = asn1_do_adb(pval, tt, 0); |
147 | 0 | if (!seqtt) { |
148 | 0 | continue; |
149 | 0 | } |
150 | 0 | pseqval = asn1_get_field_ptr(pval, seqtt); |
151 | 0 | ASN1_template_free(pseqval, seqtt); |
152 | 0 | } |
153 | 0 | if (asn1_cb) { |
154 | 0 | asn1_cb(ASN1_OP_FREE_POST, pval, it, NULL); |
155 | 0 | } |
156 | 0 | OPENSSL_free(*pval); |
157 | 0 | *pval = NULL; |
158 | 0 | break; |
159 | 0 | } |
160 | 0 | } |
161 | 0 | } |
162 | | |
163 | 0 | void ASN1_template_free(ASN1_VALUE **pval, const ASN1_TEMPLATE *tt) { |
164 | 0 | if (tt->flags & ASN1_TFLG_SK_MASK) { |
165 | 0 | STACK_OF(ASN1_VALUE) *sk = (STACK_OF(ASN1_VALUE) *)*pval; |
166 | 0 | for (size_t i = 0; i < sk_ASN1_VALUE_num(sk); i++) { |
167 | 0 | ASN1_VALUE *vtmp = sk_ASN1_VALUE_value(sk, i); |
168 | 0 | ASN1_item_ex_free(&vtmp, ASN1_ITEM_ptr(tt->item)); |
169 | 0 | } |
170 | 0 | sk_ASN1_VALUE_free(sk); |
171 | 0 | *pval = NULL; |
172 | 0 | } else { |
173 | 0 | ASN1_item_ex_free(pval, ASN1_ITEM_ptr(tt->item)); |
174 | 0 | } |
175 | 0 | } |
176 | | |
177 | 0 | void ASN1_primitive_free(ASN1_VALUE **pval, const ASN1_ITEM *it) { |
178 | | // Historically, |it->funcs| for primitive types contained an |
179 | | // |ASN1_PRIMITIVE_FUNCS| table of calbacks. |
180 | 0 | assert(it->funcs == NULL); |
181 | | |
182 | 0 | int utype = it->itype == ASN1_ITYPE_MSTRING ? -1 : it->utype; |
183 | 0 | switch (utype) { |
184 | 0 | case V_ASN1_OBJECT: |
185 | 0 | ASN1_OBJECT_free((ASN1_OBJECT *)*pval); |
186 | 0 | break; |
187 | | |
188 | 0 | case V_ASN1_BOOLEAN: |
189 | 0 | if (it) { |
190 | 0 | *(ASN1_BOOLEAN *)pval = (ASN1_BOOLEAN)it->size; |
191 | 0 | } else { |
192 | 0 | *(ASN1_BOOLEAN *)pval = ASN1_BOOLEAN_NONE; |
193 | 0 | } |
194 | 0 | return; |
195 | | |
196 | 0 | case V_ASN1_NULL: |
197 | 0 | break; |
198 | | |
199 | 0 | case V_ASN1_ANY: |
200 | 0 | if (*pval != NULL) { |
201 | 0 | asn1_type_cleanup((ASN1_TYPE *)*pval); |
202 | 0 | OPENSSL_free(*pval); |
203 | 0 | } |
204 | 0 | break; |
205 | | |
206 | 0 | default: |
207 | 0 | ASN1_STRING_free((ASN1_STRING *)*pval); |
208 | 0 | *pval = NULL; |
209 | 0 | break; |
210 | 0 | } |
211 | 0 | *pval = NULL; |
212 | 0 | } |