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 <stdlib.h> /* For bsearch */
60 #include <string.h>
61
62 #include <openssl/err.h>
63 #include <openssl/mem.h>
64 #include <openssl/obj.h>
65 #include <openssl/stack.h>
66
67 DEFINE_STACK_OF(ASN1_STRING_TABLE)
68
69 static STACK_OF(ASN1_STRING_TABLE) *stable = NULL;
70 static void st_free(ASN1_STRING_TABLE *tbl);
71
ASN1_STRING_set_default_mask(unsigned long mask)72 void ASN1_STRING_set_default_mask(unsigned long mask)
73 {
74 }
75
ASN1_STRING_get_default_mask(void)76 unsigned long ASN1_STRING_get_default_mask(void)
77 {
78 return B_ASN1_UTF8STRING;
79 }
80
ASN1_STRING_set_default_mask_asc(const char * p)81 int ASN1_STRING_set_default_mask_asc(const char *p)
82 {
83 return 1;
84 }
85
86 /*
87 * The following function generates an ASN1_STRING based on limits in a
88 * table. Frequently the types and length of an ASN1_STRING are restricted by
89 * a corresponding OID. For example certificates and certificate requests.
90 */
91
ASN1_STRING_set_by_NID(ASN1_STRING ** out,const unsigned char * in,int inlen,int inform,int nid)92 ASN1_STRING *ASN1_STRING_set_by_NID(ASN1_STRING **out,
93 const unsigned char *in, int inlen,
94 int inform, int nid)
95 {
96 ASN1_STRING_TABLE *tbl;
97 ASN1_STRING *str = NULL;
98 unsigned long mask;
99 int ret;
100 if (!out)
101 out = &str;
102 tbl = ASN1_STRING_TABLE_get(nid);
103 if (tbl) {
104 mask = tbl->mask;
105 if (!(tbl->flags & STABLE_NO_MASK))
106 mask &= B_ASN1_UTF8STRING;
107 ret = ASN1_mbstring_ncopy(out, in, inlen, inform, mask,
108 tbl->minsize, tbl->maxsize);
109 } else {
110 ret = ASN1_mbstring_copy(out, in, inlen, inform, B_ASN1_UTF8STRING);
111 }
112 if (ret <= 0)
113 return NULL;
114 return *out;
115 }
116
117 /*
118 * Now the tables and helper functions for the string table:
119 */
120
121 /* size limits: this stuff is taken straight from RFC 3280 */
122
123 #define ub_name 32768
124 #define ub_common_name 64
125 #define ub_locality_name 128
126 #define ub_state_name 128
127 #define ub_organization_name 64
128 #define ub_organization_unit_name 64
129 #define ub_title 64
130 #define ub_email_address 128
131 #define ub_serial_number 64
132
133 /* This table must be kept in NID order */
134
135 static const ASN1_STRING_TABLE tbl_standard[] = {
136 {NID_commonName, 1, ub_common_name, DIRSTRING_TYPE, 0},
137 {NID_countryName, 2, 2, B_ASN1_PRINTABLESTRING, STABLE_NO_MASK},
138 {NID_localityName, 1, ub_locality_name, DIRSTRING_TYPE, 0},
139 {NID_stateOrProvinceName, 1, ub_state_name, DIRSTRING_TYPE, 0},
140 {NID_organizationName, 1, ub_organization_name, DIRSTRING_TYPE, 0},
141 {NID_organizationalUnitName, 1, ub_organization_unit_name, DIRSTRING_TYPE,
142 0},
143 {NID_pkcs9_emailAddress, 1, ub_email_address, B_ASN1_IA5STRING,
144 STABLE_NO_MASK},
145 {NID_pkcs9_unstructuredName, 1, -1, PKCS9STRING_TYPE, 0},
146 {NID_pkcs9_challengePassword, 1, -1, PKCS9STRING_TYPE, 0},
147 {NID_pkcs9_unstructuredAddress, 1, -1, DIRSTRING_TYPE, 0},
148 {NID_givenName, 1, ub_name, DIRSTRING_TYPE, 0},
149 {NID_surname, 1, ub_name, DIRSTRING_TYPE, 0},
150 {NID_initials, 1, ub_name, DIRSTRING_TYPE, 0},
151 {NID_serialNumber, 1, ub_serial_number, B_ASN1_PRINTABLESTRING,
152 STABLE_NO_MASK},
153 {NID_friendlyName, -1, -1, B_ASN1_BMPSTRING, STABLE_NO_MASK},
154 {NID_name, 1, ub_name, DIRSTRING_TYPE, 0},
155 {NID_dnQualifier, -1, -1, B_ASN1_PRINTABLESTRING, STABLE_NO_MASK},
156 {NID_domainComponent, 1, -1, B_ASN1_IA5STRING, STABLE_NO_MASK},
157 {NID_ms_csp_name, -1, -1, B_ASN1_BMPSTRING, STABLE_NO_MASK}
158 };
159
sk_table_cmp(const ASN1_STRING_TABLE ** a,const ASN1_STRING_TABLE ** b)160 static int sk_table_cmp(const ASN1_STRING_TABLE **a,
161 const ASN1_STRING_TABLE **b)
162 {
163 return (*a)->nid - (*b)->nid;
164 }
165
table_cmp(const void * in_a,const void * in_b)166 static int table_cmp(const void *in_a, const void *in_b)
167 {
168 const ASN1_STRING_TABLE *a = in_a;
169 const ASN1_STRING_TABLE *b = in_b;
170 return a->nid - b->nid;
171 }
172
ASN1_STRING_TABLE_get(int nid)173 ASN1_STRING_TABLE *ASN1_STRING_TABLE_get(int nid)
174 {
175 int found;
176 size_t idx;
177 ASN1_STRING_TABLE *ttmp;
178 ASN1_STRING_TABLE fnd;
179 fnd.nid = nid;
180
181 ttmp =
182 bsearch(&fnd, tbl_standard,
183 sizeof(tbl_standard) / sizeof(ASN1_STRING_TABLE),
184 sizeof(ASN1_STRING_TABLE), table_cmp);
185 if (ttmp)
186 return ttmp;
187 if (!stable)
188 return NULL;
189 sk_ASN1_STRING_TABLE_sort(stable);
190 found = sk_ASN1_STRING_TABLE_find(stable, &idx, &fnd);
191 if (!found)
192 return NULL;
193 return sk_ASN1_STRING_TABLE_value(stable, idx);
194 }
195
ASN1_STRING_TABLE_add(int nid,long minsize,long maxsize,unsigned long mask,unsigned long flags)196 int ASN1_STRING_TABLE_add(int nid,
197 long minsize, long maxsize, unsigned long mask,
198 unsigned long flags)
199 {
200 ASN1_STRING_TABLE *tmp;
201 char new_nid = 0;
202 flags &= ~STABLE_FLAGS_MALLOC;
203 if (!stable)
204 stable = sk_ASN1_STRING_TABLE_new(sk_table_cmp);
205 if (!stable) {
206 OPENSSL_PUT_ERROR(ASN1, ERR_R_MALLOC_FAILURE);
207 return 0;
208 }
209 if (!(tmp = ASN1_STRING_TABLE_get(nid))) {
210 tmp = OPENSSL_malloc(sizeof(ASN1_STRING_TABLE));
211 if (!tmp) {
212 OPENSSL_PUT_ERROR(ASN1, ERR_R_MALLOC_FAILURE);
213 return 0;
214 }
215 tmp->flags = flags | STABLE_FLAGS_MALLOC;
216 tmp->nid = nid;
217 tmp->minsize = tmp->maxsize = -1;
218 new_nid = 1;
219 } else
220 tmp->flags = (tmp->flags & STABLE_FLAGS_MALLOC) | flags;
221 if (minsize != -1)
222 tmp->minsize = minsize;
223 if (maxsize != -1)
224 tmp->maxsize = maxsize;
225 tmp->mask = mask;
226 if (new_nid)
227 sk_ASN1_STRING_TABLE_push(stable, tmp);
228 return 1;
229 }
230
ASN1_STRING_TABLE_cleanup(void)231 void ASN1_STRING_TABLE_cleanup(void)
232 {
233 STACK_OF(ASN1_STRING_TABLE) *tmp;
234 tmp = stable;
235 if (!tmp)
236 return;
237 stable = NULL;
238 sk_ASN1_STRING_TABLE_pop_free(tmp, st_free);
239 }
240
st_free(ASN1_STRING_TABLE * tbl)241 static void st_free(ASN1_STRING_TABLE *tbl)
242 {
243 if (tbl->flags & STABLE_FLAGS_MALLOC)
244 OPENSSL_free(tbl);
245 }
246
247 #ifdef STRING_TABLE_TEST
248
main(void)249 int main(void)
250 {
251 ASN1_STRING_TABLE *tmp;
252 int i, last_nid = -1;
253
254 for (tmp = tbl_standard, i = 0;
255 i < sizeof(tbl_standard) / sizeof(ASN1_STRING_TABLE); i++, tmp++) {
256 if (tmp->nid < last_nid) {
257 last_nid = 0;
258 break;
259 }
260 last_nid = tmp->nid;
261 }
262
263 if (last_nid != 0) {
264 printf("Table order OK\n");
265 exit(0);
266 }
267
268 for (tmp = tbl_standard, i = 0;
269 i < sizeof(tbl_standard) / sizeof(ASN1_STRING_TABLE); i++, tmp++)
270 printf("Index %d, NID %d, Name=%s\n", i, tmp->nid,
271 OBJ_nid2ln(tmp->nid));
272
273 return 0;
274 }
275
276 #endif
277