xref: /openssl/crypto/asn1/asn_moid.c (revision a552c23c)
1 /*
2  * Copyright 2002-2020 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the Apache License 2.0 (the "License").  You may not use
5  * this file except in compliance with the License.  You can obtain a copy
6  * in the file LICENSE in the source distribution or at
7  * https://www.openssl.org/source/license.html
8  */
9 
10 #include <stdio.h>
11 #include "crypto/ctype.h"
12 #include <openssl/crypto.h>
13 #include "internal/cryptlib.h"
14 #include <openssl/conf.h>
15 #include <openssl/x509.h>
16 #include "crypto/asn1.h"
17 #include "crypto/objects.h"
18 
19 /* Simple ASN1 OID module: add all objects in a given section */
20 
21 static int do_create(const char *value, const char *name);
22 
oid_module_init(CONF_IMODULE * md,const CONF * cnf)23 static int oid_module_init(CONF_IMODULE *md, const CONF *cnf)
24 {
25     int i;
26     const char *oid_section;
27     STACK_OF(CONF_VALUE) *sktmp;
28     CONF_VALUE *oval;
29 
30     oid_section = CONF_imodule_get_value(md);
31     if ((sktmp = NCONF_get_section(cnf, oid_section)) == NULL) {
32         ERR_raise(ERR_LIB_ASN1, ASN1_R_ERROR_LOADING_SECTION);
33         return 0;
34     }
35     for (i = 0; i < sk_CONF_VALUE_num(sktmp); i++) {
36         oval = sk_CONF_VALUE_value(sktmp, i);
37         if (!do_create(oval->value, oval->name)) {
38             ERR_raise(ERR_LIB_ASN1, ASN1_R_ADDING_OBJECT);
39             return 0;
40         }
41     }
42     return 1;
43 }
44 
oid_module_finish(CONF_IMODULE * md)45 static void oid_module_finish(CONF_IMODULE *md)
46 {
47 }
48 
ASN1_add_oid_module(void)49 void ASN1_add_oid_module(void)
50 {
51     CONF_module_add("oid_section", oid_module_init, oid_module_finish);
52 }
53 
54 /*-
55  * Create an OID based on a name value pair. Accept two formats.
56  * shortname = 1.2.3.4
57  * shortname = some long name, 1.2.3.4
58  */
59 
do_create(const char * value,const char * name)60 static int do_create(const char *value, const char *name)
61 {
62     int nid;
63     const char *ln, *ostr, *p;
64     char *lntmp = NULL;
65 
66     p = strrchr(value, ',');
67     if (p == NULL) {
68         ln = name;
69         ostr = value;
70     } else if (p == value) {
71         /* we started with a leading comma */
72         ln = name;
73         ostr = p + 1;
74     } else {
75         ln = value;
76         ostr = p + 1;
77         if (*ostr == '\0')
78             return 0;
79         while (ossl_isspace(*ostr))
80             ostr++;
81         while (ossl_isspace(*ln))
82             ln++;
83         p--;
84         while (ossl_isspace(*p)) {
85             if (p == ln)
86                 return 0;
87             p--;
88         }
89         p++;
90         if ((lntmp = OPENSSL_malloc((p - ln) + 1)) == NULL)
91             return 0;
92         memcpy(lntmp, ln, p - ln);
93         lntmp[p - ln] = '\0';
94         ln = lntmp;
95     }
96 
97     nid = OBJ_create(ostr, name, ln);
98 
99     OPENSSL_free(lntmp);
100 
101     return nid != NID_undef;
102 }
103