Slightly improved diagnostics.
[openssl.git] / crypto / x509v3 / v3_ku.c
1 /* crypto/x509v3/v3_ku.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3  * All rights reserved.
4  *
5  * This package is an SSL implementation written
6  * by Eric Young (eay@cryptsoft.com).
7  * The implementation was written so as to conform with Netscapes SSL.
8  * 
9  * This library is free for commercial and non-commercial use as long as
10  * the following conditions are aheared to.  The following conditions
11  * apply to all code found in this distribution, be it the RC4, RSA,
12  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
13  * included with this distribution is covered by the same copyright terms
14  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15  * 
16  * Copyright remains Eric Young's, and as such any Copyright notices in
17  * the code are not to be removed.
18  * If this package is used in a product, Eric Young should be given attribution
19  * as the author of the parts of the library used.
20  * This can be in the form of a textual message at program startup or
21  * in documentation (online or textual) provided with the package.
22  * 
23  * Redistribution and use in source and binary forms, with or without
24  * modification, are permitted provided that the following conditions
25  * are met:
26  * 1. Redistributions of source code must retain the copyright
27  *    notice, this list of conditions and the following disclaimer.
28  * 2. Redistributions in binary form must reproduce the above copyright
29  *    notice, this list of conditions and the following disclaimer in the
30  *    documentation and/or other materials provided with the distribution.
31  * 3. All advertising materials mentioning features or use of this software
32  *    must display the following acknowledgement:
33  *    "This product includes cryptographic software written by
34  *     Eric Young (eay@cryptsoft.com)"
35  *    The word 'cryptographic' can be left out if the rouines from the library
36  *    being used are not cryptographic related :-).
37  * 4. If you include any Windows specific code (or a derivative thereof) from 
38  *    the apps directory (application code) you must include an acknowledgement:
39  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40  * 
41  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51  * SUCH DAMAGE.
52  * 
53  * The licence and distribution terms for any publically available version or
54  * derivative of this code cannot be changed.  i.e. this code cannot simply be
55  * copied and put under another distribution licence
56  * [including the GNU Public Licence.]
57  */
58
59 #include <stdio.h>
60 #include <ctype.h>
61 #include "stack.h"
62 #include "cryptlib.h"
63 #include "bio.h"
64 #include "asn1.h"
65 #include "objects.h"
66 #include "x509.h"
67
68 X509_EXTENSION_METHOD X509v3_key_usage_method=
69         {
70         NID_key_usage,
71         ku_clear,
72         ex_get_bool,
73         ex_set_bool,
74         NULL,
75         NULL,
76         NULL,
77         NULL,
78         ku_a2i,
79         ku_i2a,
80         };
81
82 static void ku_clear(a)
83 X509_EXTENSION *a;
84         {
85         }
86
87 static int ku_expand(a)
88 X509_EXTENSION *a;
89         {
90         ASN1_BIT_STRING *bs;
91
92         if (a->argp == NULL)
93                 {
94                 bs=X509v3_unpack_string(NULL,V_ASN1_BIT_STRING,value);
95                 if (bs == NULL) return(0);
96                 a->argp=(char *)bs;
97                 a->ex_free=ASN1_STRING_free;
98                 }
99         return(1);
100         }
101
102 static int ku_get_bool(a,num)
103 X509_EXTENSION *a;
104 int num;
105         {
106         int ret;
107         ASN1_BIT_STRING *bs;
108
109         if ((a->argp == NULL) && !ku_expand(a))
110                 return(-1);
111         bs=(ASN1_BIT_STRING *)a->argp;
112         ret=ASN1_BIT_STRING_get_bit(bs,num);
113         return(ret);
114         }
115
116 static int ku_set_bool(a,num,value)
117 X509_EXTENSION *a;
118 int num;
119 int value;
120         {
121         ASN1_BIT_STRING *a;
122
123         if ((a->argp == NULL) && !ku_expand(a))
124                 return(0);
125         bs=(ASN1_BIT_STRING *)a->argp;
126         ret=ASN1_BIT_STRING_set_bit(bs,num,value);
127         }
128
129 static int ku_a2i(bio,a,buf,len)
130 BIO *bio;
131 X509_EXTENSION *a;
132 char *buf;
133 int len;
134         {
135         get token
136         }
137
138 static char ku_names[X509v3_N_KU_NUM]={
139         X509v3_S_KU_digitalSignature,
140         X509v3_S_KU_nonRepudiation,
141         X509v3_S_KU_keyEncipherment,
142         X509v3_S_KU_dataEncipherment,
143         X509v3_S_KU_keyAgreement,
144         X509v3_S_KU_keyCertSign,
145         X509v3_S_KU_cRLSign,
146         X509v3_S_KU_encipherOnly,
147         X509v3_S_KU_decipherOnly,
148         };
149
150 static int ku_i2a(bio,a);
151 BIO *bio;
152 X509_EXTENSION *a;
153         {
154         int i,first=1;
155         char *c;
156
157         for (i=0; i<X509v3_N_KU_NUM; i++)
158                 {
159                 if (ku_get_bool(a,i) > 0)
160                         {
161                         BIO_printf(bio,"%s%s",((first)?"":" "),ku_names[i]);
162                         first=0;
163                         }
164                 }
165         }
166
167 /***********************/
168
169 int X509v3_get_key_usage(x,ret)
170 STACK *x;
171 unsigned long *ret;
172         {
173         X509_EXTENSION *ext;
174         ASN1_STRING *st;
175         char *p;
176         int i;
177
178         i=X509_get_ext_by_NID(x,NID_key_usage,-1);
179         if (i < 0) return(X509v3_KU_UNDEF);
180         ext=X509_get_ext(x,i);
181         st=X509v3_unpack_string(NULL,V_ASN1_BIT_STRING,
182                 X509_EXTENSION_get_data(X509_get_ext(x,i)));
183
184         p=ASN1_STRING_data(st);
185         if (ASN1_STRING_length(st) == 1)
186                 i=p[0];
187         else if (ASN1_STRING_length(st) == 2)
188                 i=p[0]|(p[1]<<8);
189         else
190                 i=0;
191         return(i);
192         }
193
194 static struct
195         {
196         char *name;
197         unsigned int value;
198         } key_usage_data[] ={
199         {"digitalSignature",    X509v3_KU_DIGITAL_SIGNATURE},
200         {"nonRepudiation",      X509v3_KU_NON_REPUDIATION},
201         {"keyEncipherment",     X509v3_KU_KEY_ENCIPHERMENT},
202         {"dataEncipherment",    X509v3_KU_DATA_ENCIPHERMENT},
203         {"keyAgreement",        X509v3_KU_KEY_AGREEMENT},
204         {"keyCertSign",         X509v3_KU_KEY_CERT_SIGN},
205         {"cRLSign",             X509v3_KU_CRL_SIGN},
206         {"encipherOnly",        X509v3_KU_ENCIPHER_ONLY},
207         {"decipherOnly",        X509v3_KU_DECIPHER_ONLY},
208         {NULL,0},
209         };
210
211 #if 0
212 static int a2i_key_usage(x,str,len)
213 X509 *x;
214 char *str;
215 int len;
216         {
217         return(X509v3_set_key_usage(x,a2i_X509v3_key_usage(str)));
218         }
219
220 static int i2a_key_usage(bp,x)
221 BIO *bp;
222 X509 *x;
223         {
224         return(i2a_X509v3_key_usage(bp,X509v3_get_key_usage(x)));
225         }
226 #endif
227
228 int i2a_X509v3_key_usage(bp,use)
229 BIO *bp;
230 unsigned int use;
231         {
232         int i=0,first=1;
233
234         for (;;)
235                 {
236                 if (use | key_usage_data[i].value)
237                         {
238                         BIO_printf(bp,"%s%s",((first)?"":" "),
239                                 key_usage_data[i].name);
240                         first=0;
241                         }
242                 }
243         return(1);
244         }
245
246 unsigned int a2i_X509v3_key_usage(p)
247 char *p;
248         {
249         unsigned int ret=0;
250         char *q,*s;
251         int i,n;
252
253         q=p;
254         for (;;)
255                 {
256                 while ((*q != '\0') && isalnum(*q))
257                         q++;
258                 if (*q == '\0') break;
259                 s=q++;
260                 while (isalnum(*q))
261                         q++;
262                 n=q-s;
263                 i=0;
264                 for (;;)
265                         {
266                         if (strncmp(key_usage_data[i].name,s,n) == 0)
267                                 {
268                                 ret|=key_usage_data[i].value;
269                                 break;
270                                 }
271                         i++;
272                         if (key_usage_data[i].name == NULL)
273                                 return(X509v3_KU_UNDEF);
274                         }
275                 }
276         return(ret);
277         }
278
279 int X509v3_set_key_usage(x,use)
280 X509 *x;
281 unsigned int use;
282         {
283         ASN1_OCTET_STRING *os;
284         X509_EXTENSION *ext;
285         int i;
286         unsigned char data[4];
287
288         i=X509_get_ext_by_NID(x,NID_key_usage,-1);
289         if (i < 0)
290                 {
291                 i=X509_get_ext_count(x)+1;
292                 if ((ext=X509_EXTENSION_new()) == NULL) return(0);
293                 if (!X509_add_ext(x,ext,i))
294                         {
295                         X509_EXTENSION_free(ext);
296                         return(0);
297                         }
298                 }
299         else
300                 ext=X509_get_ext(x,i);
301
302         /* fill in 'ext' */
303         os=X509_EXTENSION_get_data(ext);
304
305         i=0;
306         if (use > 0)
307                 {
308                 i=1;
309                 data[0]=use&0xff;
310                 }
311         if (use > 0xff)
312                 {
313                 i=2;
314                 data[1]=(use>>8)&0xff;
315                 }
316         return((X509v3_pack_string(&os,V_ASN1_BIT_STRING,data,i) == NULL)?0:1);
317         }
318