diff options
Diffstat (limited to 'src/lib/libcrypto/ocsp/ocsp_lib.c')
-rw-r--r-- | src/lib/libcrypto/ocsp/ocsp_lib.c | 265 |
1 files changed, 0 insertions, 265 deletions
diff --git a/src/lib/libcrypto/ocsp/ocsp_lib.c b/src/lib/libcrypto/ocsp/ocsp_lib.c deleted file mode 100644 index e92b86c060..0000000000 --- a/src/lib/libcrypto/ocsp/ocsp_lib.c +++ /dev/null | |||
@@ -1,265 +0,0 @@ | |||
1 | /* ocsp_lib.c */ | ||
2 | /* Written by Tom Titchener <Tom_Titchener@groove.net> for the OpenSSL | ||
3 | * project. */ | ||
4 | |||
5 | /* History: | ||
6 | This file was transfered to Richard Levitte from CertCo by Kathy | ||
7 | Weinhold in mid-spring 2000 to be included in OpenSSL or released | ||
8 | as a patch kit. */ | ||
9 | |||
10 | /* ==================================================================== | ||
11 | * Copyright (c) 1998-2000 The OpenSSL Project. All rights reserved. | ||
12 | * | ||
13 | * Redistribution and use in source and binary forms, with or without | ||
14 | * modification, are permitted provided that the following conditions | ||
15 | * are met: | ||
16 | * | ||
17 | * 1. Redistributions of source code must retain the above copyright | ||
18 | * notice, this list of conditions and the following disclaimer. | ||
19 | * | ||
20 | * 2. Redistributions in binary form must reproduce the above copyright | ||
21 | * notice, this list of conditions and the following disclaimer in | ||
22 | * the documentation and/or other materials provided with the | ||
23 | * distribution. | ||
24 | * | ||
25 | * 3. All advertising materials mentioning features or use of this | ||
26 | * software must display the following acknowledgment: | ||
27 | * "This product includes software developed by the OpenSSL Project | ||
28 | * for use in the OpenSSL Toolkit. (http://www.openssl.org/)" | ||
29 | * | ||
30 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | ||
31 | * endorse or promote products derived from this software without | ||
32 | * prior written permission. For written permission, please contact | ||
33 | * openssl-core@openssl.org. | ||
34 | * | ||
35 | * 5. Products derived from this software may not be called "OpenSSL" | ||
36 | * nor may "OpenSSL" appear in their names without prior written | ||
37 | * permission of the OpenSSL Project. | ||
38 | * | ||
39 | * 6. Redistributions of any form whatsoever must retain the following | ||
40 | * acknowledgment: | ||
41 | * "This product includes software developed by the OpenSSL Project | ||
42 | * for use in the OpenSSL Toolkit (http://www.openssl.org/)" | ||
43 | * | ||
44 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | ||
45 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
46 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | ||
47 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | ||
48 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | ||
49 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | ||
50 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | ||
51 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
52 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | ||
53 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||
54 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | ||
55 | * OF THE POSSIBILITY OF SUCH DAMAGE. | ||
56 | * ==================================================================== | ||
57 | * | ||
58 | * This product includes cryptographic software written by Eric Young | ||
59 | * (eay@cryptsoft.com). This product includes software written by Tim | ||
60 | * Hudson (tjh@cryptsoft.com). | ||
61 | * | ||
62 | */ | ||
63 | |||
64 | #include <stdio.h> | ||
65 | #include <cryptlib.h> | ||
66 | #include <openssl/objects.h> | ||
67 | #include <openssl/rand.h> | ||
68 | #include <openssl/x509.h> | ||
69 | #include <openssl/pem.h> | ||
70 | #include <openssl/x509v3.h> | ||
71 | #include <openssl/ocsp.h> | ||
72 | #include <openssl/asn1t.h> | ||
73 | |||
74 | /* Convert a certificate and its issuer to an OCSP_CERTID */ | ||
75 | |||
76 | OCSP_CERTID *OCSP_cert_to_id(const EVP_MD *dgst, X509 *subject, X509 *issuer) | ||
77 | { | ||
78 | X509_NAME *iname; | ||
79 | ASN1_INTEGER *serial; | ||
80 | ASN1_BIT_STRING *ikey; | ||
81 | #ifndef OPENSSL_NO_SHA1 | ||
82 | if(!dgst) dgst = EVP_sha1(); | ||
83 | #endif | ||
84 | if (subject) | ||
85 | { | ||
86 | iname = X509_get_issuer_name(subject); | ||
87 | serial = X509_get_serialNumber(subject); | ||
88 | } | ||
89 | else | ||
90 | { | ||
91 | iname = X509_get_subject_name(issuer); | ||
92 | serial = NULL; | ||
93 | } | ||
94 | ikey = X509_get0_pubkey_bitstr(issuer); | ||
95 | return OCSP_cert_id_new(dgst, iname, ikey, serial); | ||
96 | } | ||
97 | |||
98 | |||
99 | OCSP_CERTID *OCSP_cert_id_new(const EVP_MD *dgst, | ||
100 | X509_NAME *issuerName, | ||
101 | ASN1_BIT_STRING* issuerKey, | ||
102 | ASN1_INTEGER *serialNumber) | ||
103 | { | ||
104 | int nid; | ||
105 | unsigned int i; | ||
106 | X509_ALGOR *alg; | ||
107 | OCSP_CERTID *cid = NULL; | ||
108 | unsigned char md[EVP_MAX_MD_SIZE]; | ||
109 | |||
110 | if (!(cid = OCSP_CERTID_new())) goto err; | ||
111 | |||
112 | alg = cid->hashAlgorithm; | ||
113 | if (alg->algorithm != NULL) ASN1_OBJECT_free(alg->algorithm); | ||
114 | if ((nid = EVP_MD_type(dgst)) == NID_undef) | ||
115 | { | ||
116 | OCSPerr(OCSP_F_OCSP_CERT_ID_NEW,OCSP_R_UNKNOWN_NID); | ||
117 | goto err; | ||
118 | } | ||
119 | if (!(alg->algorithm=OBJ_nid2obj(nid))) goto err; | ||
120 | if ((alg->parameter=ASN1_TYPE_new()) == NULL) goto err; | ||
121 | alg->parameter->type=V_ASN1_NULL; | ||
122 | |||
123 | if (!X509_NAME_digest(issuerName, dgst, md, &i)) goto digerr; | ||
124 | if (!(ASN1_OCTET_STRING_set(cid->issuerNameHash, md, i))) goto err; | ||
125 | |||
126 | /* Calculate the issuerKey hash, excluding tag and length */ | ||
127 | EVP_Digest(issuerKey->data, issuerKey->length, md, &i, dgst, NULL); | ||
128 | |||
129 | if (!(ASN1_OCTET_STRING_set(cid->issuerKeyHash, md, i))) goto err; | ||
130 | |||
131 | if (serialNumber) | ||
132 | { | ||
133 | ASN1_INTEGER_free(cid->serialNumber); | ||
134 | if (!(cid->serialNumber = ASN1_INTEGER_dup(serialNumber))) goto err; | ||
135 | } | ||
136 | return cid; | ||
137 | digerr: | ||
138 | OCSPerr(OCSP_F_OCSP_CERT_ID_NEW,OCSP_R_DIGEST_ERR); | ||
139 | err: | ||
140 | if (cid) OCSP_CERTID_free(cid); | ||
141 | return NULL; | ||
142 | } | ||
143 | |||
144 | int OCSP_id_issuer_cmp(OCSP_CERTID *a, OCSP_CERTID *b) | ||
145 | { | ||
146 | int ret; | ||
147 | ret = OBJ_cmp(a->hashAlgorithm->algorithm, b->hashAlgorithm->algorithm); | ||
148 | if (ret) return ret; | ||
149 | ret = ASN1_OCTET_STRING_cmp(a->issuerNameHash, b->issuerNameHash); | ||
150 | if (ret) return ret; | ||
151 | return ASN1_OCTET_STRING_cmp(a->issuerKeyHash, b->issuerKeyHash); | ||
152 | } | ||
153 | |||
154 | int OCSP_id_cmp(OCSP_CERTID *a, OCSP_CERTID *b) | ||
155 | { | ||
156 | int ret; | ||
157 | ret = OCSP_id_issuer_cmp(a, b); | ||
158 | if (ret) return ret; | ||
159 | return ASN1_INTEGER_cmp(a->serialNumber, b->serialNumber); | ||
160 | } | ||
161 | |||
162 | |||
163 | /* Parse a URL and split it up into host, port and path components and whether | ||
164 | * it is SSL. | ||
165 | */ | ||
166 | |||
167 | int OCSP_parse_url(char *url, char **phost, char **pport, char **ppath, int *pssl) | ||
168 | { | ||
169 | char *p, *buf; | ||
170 | |||
171 | char *host, *port; | ||
172 | |||
173 | *phost = NULL; | ||
174 | *pport = NULL; | ||
175 | *ppath = NULL; | ||
176 | |||
177 | /* dup the buffer since we are going to mess with it */ | ||
178 | buf = BUF_strdup(url); | ||
179 | if (!buf) goto mem_err; | ||
180 | |||
181 | /* Check for initial colon */ | ||
182 | p = strchr(buf, ':'); | ||
183 | |||
184 | if (!p) goto parse_err; | ||
185 | |||
186 | *(p++) = '\0'; | ||
187 | |||
188 | if (!strcmp(buf, "http")) | ||
189 | { | ||
190 | *pssl = 0; | ||
191 | port = "80"; | ||
192 | } | ||
193 | else if (!strcmp(buf, "https")) | ||
194 | { | ||
195 | *pssl = 1; | ||
196 | port = "443"; | ||
197 | } | ||
198 | else | ||
199 | goto parse_err; | ||
200 | |||
201 | /* Check for double slash */ | ||
202 | if ((p[0] != '/') || (p[1] != '/')) | ||
203 | goto parse_err; | ||
204 | |||
205 | p += 2; | ||
206 | |||
207 | host = p; | ||
208 | |||
209 | /* Check for trailing part of path */ | ||
210 | |||
211 | p = strchr(p, '/'); | ||
212 | |||
213 | if (!p) | ||
214 | *ppath = BUF_strdup("/"); | ||
215 | else | ||
216 | { | ||
217 | *ppath = BUF_strdup(p); | ||
218 | /* Set start of path to 0 so hostname is valid */ | ||
219 | *p = '\0'; | ||
220 | } | ||
221 | |||
222 | if (!*ppath) goto mem_err; | ||
223 | |||
224 | /* Look for optional ':' for port number */ | ||
225 | if ((p = strchr(host, ':'))) | ||
226 | { | ||
227 | *p = 0; | ||
228 | port = p + 1; | ||
229 | } | ||
230 | else | ||
231 | { | ||
232 | /* Not found: set default port */ | ||
233 | if (*pssl) port = "443"; | ||
234 | else port = "80"; | ||
235 | } | ||
236 | |||
237 | *pport = BUF_strdup(port); | ||
238 | if (!*pport) goto mem_err; | ||
239 | |||
240 | *phost = BUF_strdup(host); | ||
241 | |||
242 | if (!*phost) goto mem_err; | ||
243 | |||
244 | OPENSSL_free(buf); | ||
245 | |||
246 | return 1; | ||
247 | |||
248 | mem_err: | ||
249 | OCSPerr(OCSP_F_OCSP_PARSE_URL, ERR_R_MALLOC_FAILURE); | ||
250 | goto err; | ||
251 | |||
252 | parse_err: | ||
253 | OCSPerr(OCSP_F_OCSP_PARSE_URL, OCSP_R_ERROR_PARSING_URL); | ||
254 | |||
255 | |||
256 | err: | ||
257 | if (buf) OPENSSL_free(buf); | ||
258 | if (*ppath) OPENSSL_free(*ppath); | ||
259 | if (*pport) OPENSSL_free(*pport); | ||
260 | if (*phost) OPENSSL_free(*phost); | ||
261 | return 0; | ||
262 | |||
263 | } | ||
264 | |||
265 | IMPLEMENT_ASN1_DUP_FUNCTION(OCSP_CERTID) | ||