1 /* Copyright (C) 1995-1998 Eric Young (eay (at) cryptsoft.com) 2 * All rights reserved. 3 * 4 * This package is an SSL implementation written 5 * by Eric Young (eay (at) 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 (at) 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 (at) 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 (at) 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 <limits.h> 60 #include <string.h> 61 62 #include <openssl/err.h> 63 #include <openssl/mem.h> 64 #include <openssl/obj.h> 65 66 #include "../internal.h" 67 68 69 int i2d_ASN1_OBJECT(ASN1_OBJECT *a, unsigned char **pp) 70 { 71 unsigned char *p; 72 int objsize; 73 74 if ((a == NULL) || (a->data == NULL)) 75 return (0); 76 77 objsize = ASN1_object_size(0, a->length, V_ASN1_OBJECT); 78 if (pp == NULL || objsize == -1) 79 return objsize; 80 81 p = *pp; 82 ASN1_put_object(&p, 0, a->length, V_ASN1_OBJECT, V_ASN1_UNIVERSAL); 83 OPENSSL_memcpy(p, a->data, a->length); 84 p += a->length; 85 86 *pp = p; 87 return (objsize); 88 } 89 90 int i2t_ASN1_OBJECT(char *buf, int buf_len, ASN1_OBJECT *a) 91 { 92 return OBJ_obj2txt(buf, buf_len, a, 0); 93 } 94 95 int i2a_ASN1_OBJECT(BIO *bp, ASN1_OBJECT *a) 96 { 97 char buf[80], *p = buf; 98 int i; 99 100 if ((a == NULL) || (a->data == NULL)) 101 return (BIO_write(bp, "NULL", 4)); 102 i = i2t_ASN1_OBJECT(buf, sizeof buf, a); 103 if (i > (int)(sizeof(buf) - 1)) { 104 p = OPENSSL_malloc(i + 1); 105 if (!p) 106 return -1; 107 i2t_ASN1_OBJECT(p, i + 1, a); 108 } 109 if (i <= 0) 110 return BIO_write(bp, "<INVALID>", 9); 111 BIO_write(bp, p, i); 112 if (p != buf) 113 OPENSSL_free(p); 114 return (i); 115 } 116 117 ASN1_OBJECT *d2i_ASN1_OBJECT(ASN1_OBJECT **a, const unsigned char **pp, 118 long length) 119 { 120 const unsigned char *p; 121 long len; 122 int tag, xclass; 123 int inf, i; 124 ASN1_OBJECT *ret = NULL; 125 p = *pp; 126 inf = ASN1_get_object(&p, &len, &tag, &xclass, length); 127 if (inf & 0x80) { 128 i = ASN1_R_BAD_OBJECT_HEADER; 129 goto err; 130 } 131 132 if (tag != V_ASN1_OBJECT) { 133 i = ASN1_R_EXPECTING_AN_OBJECT; 134 goto err; 135 } 136 ret = c2i_ASN1_OBJECT(a, &p, len); 137 if (ret) 138 *pp = p; 139 return ret; 140 err: 141 OPENSSL_PUT_ERROR(ASN1, i); 142 return (NULL); 143 } 144 145 ASN1_OBJECT *c2i_ASN1_OBJECT(ASN1_OBJECT **a, const unsigned char **pp, 146 long len) 147 { 148 ASN1_OBJECT *ret = NULL; 149 const unsigned char *p; 150 unsigned char *data; 151 int i, length; 152 153 /* 154 * Sanity check OID encoding. Need at least one content octet. MSB must 155 * be clear in the last octet. can't have leading 0x80 in subidentifiers, 156 * see: X.690 8.19.2 157 */ 158 if (len <= 0 || len > INT_MAX || pp == NULL || (p = *pp) == NULL || 159 p[len - 1] & 0x80) { 160 OPENSSL_PUT_ERROR(ASN1, ASN1_R_INVALID_OBJECT_ENCODING); 161 return NULL; 162 } 163 /* Now 0 < len <= INT_MAX, so the cast is safe. */ 164 length = (int)len; 165 for (i = 0; i < length; i++, p++) { 166 if (*p == 0x80 && (!i || !(p[-1] & 0x80))) { 167 OPENSSL_PUT_ERROR(ASN1, ASN1_R_INVALID_OBJECT_ENCODING); 168 return NULL; 169 } 170 } 171 172 /* 173 * only the ASN1_OBJECTs from the 'table' will have values for ->sn or 174 * ->ln 175 */ 176 if ((a == NULL) || ((*a) == NULL) || 177 !((*a)->flags & ASN1_OBJECT_FLAG_DYNAMIC)) { 178 if ((ret = ASN1_OBJECT_new()) == NULL) 179 return (NULL); 180 } else 181 ret = (*a); 182 183 p = *pp; 184 /* detach data from object */ 185 data = (unsigned char *)ret->data; 186 ret->data = NULL; 187 /* once detached we can change it */ 188 if ((data == NULL) || (ret->length < length)) { 189 ret->length = 0; 190 if (data != NULL) 191 OPENSSL_free(data); 192 data = (unsigned char *)OPENSSL_malloc(length); 193 if (data == NULL) { 194 i = ERR_R_MALLOC_FAILURE; 195 goto err; 196 } 197 ret->flags |= ASN1_OBJECT_FLAG_DYNAMIC_DATA; 198 } 199 OPENSSL_memcpy(data, p, length); 200 /* reattach data to object, after which it remains const */ 201 ret->data = data; 202 ret->length = length; 203 ret->sn = NULL; 204 ret->ln = NULL; 205 /* ret->flags=ASN1_OBJECT_FLAG_DYNAMIC; we know it is dynamic */ 206 p += length; 207 208 if (a != NULL) 209 (*a) = ret; 210 *pp = p; 211 return (ret); 212 err: 213 OPENSSL_PUT_ERROR(ASN1, i); 214 if ((ret != NULL) && ((a == NULL) || (*a != ret))) 215 ASN1_OBJECT_free(ret); 216 return (NULL); 217 } 218 219 ASN1_OBJECT *ASN1_OBJECT_new(void) 220 { 221 ASN1_OBJECT *ret; 222 223 ret = (ASN1_OBJECT *)OPENSSL_malloc(sizeof(ASN1_OBJECT)); 224 if (ret == NULL) { 225 OPENSSL_PUT_ERROR(ASN1, ERR_R_MALLOC_FAILURE); 226 return (NULL); 227 } 228 ret->length = 0; 229 ret->data = NULL; 230 ret->nid = 0; 231 ret->sn = NULL; 232 ret->ln = NULL; 233 ret->flags = ASN1_OBJECT_FLAG_DYNAMIC; 234 return (ret); 235 } 236 237 void ASN1_OBJECT_free(ASN1_OBJECT *a) 238 { 239 if (a == NULL) 240 return; 241 if (a->flags & ASN1_OBJECT_FLAG_DYNAMIC_STRINGS) { 242 #ifndef CONST_STRICT /* disable purely for compile-time strict 243 * const checking. Doing this on a "real" 244 * compile will cause memory leaks */ 245 if (a->sn != NULL) 246 OPENSSL_free((void *)a->sn); 247 if (a->ln != NULL) 248 OPENSSL_free((void *)a->ln); 249 #endif 250 a->sn = a->ln = NULL; 251 } 252 if (a->flags & ASN1_OBJECT_FLAG_DYNAMIC_DATA) { 253 if (a->data != NULL) 254 OPENSSL_free((void *)a->data); 255 a->data = NULL; 256 a->length = 0; 257 } 258 if (a->flags & ASN1_OBJECT_FLAG_DYNAMIC) 259 OPENSSL_free(a); 260 } 261 262 ASN1_OBJECT *ASN1_OBJECT_create(int nid, unsigned char *data, int len, 263 const char *sn, const char *ln) 264 { 265 ASN1_OBJECT o; 266 267 o.sn = sn; 268 o.ln = ln; 269 o.data = data; 270 o.nid = nid; 271 o.length = len; 272 o.flags = ASN1_OBJECT_FLAG_DYNAMIC | ASN1_OBJECT_FLAG_DYNAMIC_STRINGS | 273 ASN1_OBJECT_FLAG_DYNAMIC_DATA; 274 return (OBJ_dup(&o)); 275 } 276