]>
git.ipfire.org Git - thirdparty/openssl.git/blob - crypto/ocsp/ocsp_lib.c
2 /* Written by Tom Titchener <Tom_Titchener@groove.net> for the OpenSSL
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
10 /* ====================================================================
11 * Copyright (c) 1998-2000 The OpenSSL Project. All rights reserved.
13 * Redistribution and use in source and binary forms, with or without
14 * modification, are permitted provided that the following conditions
17 * 1. Redistributions of source code must retain the above copyright
18 * notice, this list of conditions and the following disclaimer.
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
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/)"
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.
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.
39 * 6. Redistributions of any form whatsoever must retain the following
41 * "This product includes software developed by the OpenSSL Project
42 * for use in the OpenSSL Toolkit (http://www.openssl.org/)"
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 * ====================================================================
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).
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>
73 /* Convert a certificate and its issuer to an OCSP_CERTID */
75 OCSP_CERTID
*OCSP_cert_to_id(const EVP_MD
*dgst
, X509
*subject
, X509
*issuer
)
79 ASN1_BIT_STRING
*ikey
;
81 if(!dgst
) dgst
= EVP_sha1();
83 iname
= X509_get_issuer_name(subject
);
84 serial
= X509_get_serialNumber(subject
);
85 ikey
= X509_get0_pubkey_bitstr(issuer
);
86 return OCSP_cert_id_new(dgst
, iname
, ikey
, serial
);
90 OCSP_CERTID
*OCSP_cert_id_new(const EVP_MD
*dgst
,
91 X509_NAME
*issuerName
,
92 ASN1_BIT_STRING
* issuerKey
,
93 ASN1_INTEGER
*serialNumber
)
98 OCSP_CERTID
*cid
= NULL
;
99 unsigned char md
[EVP_MAX_MD_SIZE
];
101 if (!(cid
= OCSP_CERTID_new())) goto err
;
103 alg
= cid
->hashAlgorithm
;
104 if (alg
->algorithm
!= NULL
) ASN1_OBJECT_free(alg
->algorithm
);
105 if ((nid
= EVP_MD_type(dgst
)) == NID_undef
)
107 OCSPerr(OCSP_F_CERT_ID_NEW
,OCSP_R_UNKNOWN_NID
);
110 if (!(alg
->algorithm
=OBJ_nid2obj(nid
))) goto err
;
111 if ((alg
->parameter
=ASN1_TYPE_new()) == NULL
) goto err
;
112 alg
->parameter
->type
=V_ASN1_NULL
;
114 if (!X509_NAME_digest(issuerName
, dgst
, md
, &i
)) goto digerr
;
115 if (!(ASN1_OCTET_STRING_set(cid
->issuerNameHash
, md
, i
))) goto err
;
117 /* Calculate the issuerKey hash, excluding tag and length */
118 EVP_Digest(issuerKey
->data
, issuerKey
->length
, md
, &i
, dgst
);
120 if (!(ASN1_OCTET_STRING_set(cid
->issuerKeyHash
, md
, i
))) goto err
;
122 if (cid
->serialNumber
!= NULL
) ASN1_INTEGER_free(cid
->serialNumber
);
123 if (!(cid
->serialNumber
= ASN1_INTEGER_dup(serialNumber
))) goto err
;
126 OCSPerr(OCSP_F_CERT_ID_NEW
,OCSP_R_DIGEST_ERR
);
128 if (cid
) OCSP_CERTID_free(cid
);
132 int OCSP_id_issuer_cmp(OCSP_CERTID
*a
, OCSP_CERTID
*b
)
135 ret
= OBJ_cmp(a
->hashAlgorithm
->algorithm
, b
->hashAlgorithm
->algorithm
);
137 ret
= ASN1_OCTET_STRING_cmp(a
->issuerNameHash
, b
->issuerNameHash
);
139 return ASN1_OCTET_STRING_cmp(a
->issuerKeyHash
, b
->issuerKeyHash
);
142 int OCSP_id_cmp(OCSP_CERTID
*a
, OCSP_CERTID
*b
)
145 ret
= OCSP_id_issuer_cmp(a
, b
);
147 return ASN1_INTEGER_cmp(a
->serialNumber
, b
->serialNumber
);
150 /* XXX assumes certs in signature are sorted root to leaf XXX */
151 int OCSP_request_verify(OCSP_REQUEST
*req
, EVP_PKEY
*pkey
)
155 if (!req
->optionalSignature
) return 0;
158 if (!(sk
= req
->optionalSignature
->certs
)) return 0;
159 if (!(pkey
=X509_get_pubkey(sk_X509_value(sk
, sk_X509_num(sk
)-1))))
161 OCSPerr(OCSP_F_REQUEST_VERIFY
,OCSP_R_NO_PUBLIC_KEY
);
165 return OCSP_REQUEST_verify(req
, pkey
);