2010-07-05 13:26:35 +00:00
|
|
|
/*
|
|
|
|
* Copyright (C) 2010 Martin Willi
|
|
|
|
* Copyright (C) 2010 revosec AG
|
|
|
|
* Copyright (C) 2009 Andreas Steffen
|
|
|
|
* Hochschule fuer Technik Rapperswil
|
|
|
|
*
|
|
|
|
* This program is free software; you can redistribute it and/or modify it
|
|
|
|
* under the terms of the GNU General Public License as published by the
|
|
|
|
* Free Software Foundation; either version 2 of the License, or (at your
|
|
|
|
* option) any later version. See <http://www.fsf.org/copyleft/gpl.txt>.
|
|
|
|
*
|
|
|
|
* This program is distributed in the hope that it will be useful, but
|
|
|
|
* WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
|
|
|
|
* or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
|
|
* for more details.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "revocation_validator.h"
|
|
|
|
|
|
|
|
#include <debug.h>
|
|
|
|
#include <credentials/certificates/x509.h>
|
|
|
|
#include <credentials/certificates/crl.h>
|
|
|
|
#include <credentials/certificates/ocsp_request.h>
|
|
|
|
#include <credentials/certificates/ocsp_response.h>
|
|
|
|
#include <credentials/sets/ocsp_response_wrapper.h>
|
|
|
|
#include <selectors/traffic_selector.h>
|
|
|
|
|
|
|
|
typedef struct private_revocation_validator_t private_revocation_validator_t;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Private data of an revocation_validator_t object.
|
|
|
|
*/
|
|
|
|
struct private_revocation_validator_t {
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Public revocation_validator_t interface.
|
|
|
|
*/
|
|
|
|
revocation_validator_t public;
|
|
|
|
};
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Do an OCSP request
|
|
|
|
*/
|
|
|
|
static certificate_t *fetch_ocsp(char *url, certificate_t *subject,
|
|
|
|
certificate_t *issuer)
|
|
|
|
{
|
|
|
|
certificate_t *request, *response;
|
|
|
|
chunk_t send, receive;
|
|
|
|
|
|
|
|
/* TODO: requestor name, signature */
|
|
|
|
request = lib->creds->create(lib->creds,
|
|
|
|
CRED_CERTIFICATE, CERT_X509_OCSP_REQUEST,
|
|
|
|
BUILD_CA_CERT, issuer,
|
|
|
|
BUILD_CERT, subject, BUILD_END);
|
|
|
|
if (!request)
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "generating ocsp request failed");
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
2010-07-13 11:34:04 +00:00
|
|
|
if (!request->get_encoding(request, CERT_ASN1_DER, &send))
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "encoding ocsp request failed");
|
|
|
|
request->destroy(request);
|
|
|
|
return NULL;
|
|
|
|
}
|
2010-07-05 13:26:35 +00:00
|
|
|
request->destroy(request);
|
|
|
|
|
|
|
|
DBG1(DBG_CFG, " requesting ocsp status from '%s' ...", url);
|
|
|
|
if (lib->fetcher->fetch(lib->fetcher, url, &receive,
|
|
|
|
FETCH_REQUEST_DATA, send,
|
|
|
|
FETCH_REQUEST_TYPE, "application/ocsp-request",
|
|
|
|
FETCH_END) != SUCCESS)
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "ocsp request to %s failed", url);
|
|
|
|
chunk_free(&send);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
chunk_free(&send);
|
|
|
|
|
|
|
|
response = lib->creds->create(lib->creds,
|
|
|
|
CRED_CERTIFICATE, CERT_X509_OCSP_RESPONSE,
|
|
|
|
BUILD_BLOB_ASN1_DER, receive, BUILD_END);
|
|
|
|
chunk_free(&receive);
|
|
|
|
if (!response)
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "parsing ocsp response failed");
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
return response;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* check the signature of an OCSP response
|
|
|
|
*/
|
2010-12-07 16:53:13 +00:00
|
|
|
static bool verify_ocsp(ocsp_response_t *response, auth_cfg_t *auth)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
certificate_t *issuer, *subject;
|
|
|
|
identification_t *responder;
|
|
|
|
ocsp_response_wrapper_t *wrapper;
|
|
|
|
enumerator_t *enumerator;
|
2010-12-07 16:53:13 +00:00
|
|
|
auth_cfg_t *current;
|
2010-07-05 13:26:35 +00:00
|
|
|
bool verified = FALSE;
|
|
|
|
|
|
|
|
wrapper = ocsp_response_wrapper_create((ocsp_response_t*)response);
|
|
|
|
lib->credmgr->add_local_set(lib->credmgr, &wrapper->set);
|
|
|
|
|
|
|
|
subject = &response->certificate;
|
|
|
|
responder = subject->get_issuer(subject);
|
|
|
|
enumerator = lib->credmgr->create_trusted_enumerator(lib->credmgr,
|
|
|
|
KEY_ANY, responder, FALSE);
|
2010-12-07 16:53:13 +00:00
|
|
|
while (enumerator->enumerate(enumerator, &issuer, ¤t))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
if (lib->credmgr->issued_by(lib->credmgr, subject, issuer))
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, " ocsp response correctly signed by \"%Y\"",
|
|
|
|
issuer->get_subject(issuer));
|
2010-12-07 16:53:13 +00:00
|
|
|
if (auth)
|
|
|
|
{
|
|
|
|
auth->merge(auth, current, FALSE);
|
|
|
|
}
|
2010-07-05 13:26:35 +00:00
|
|
|
verified = TRUE;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
|
|
|
|
|
|
|
lib->credmgr->remove_local_set(lib->credmgr, &wrapper->set);
|
|
|
|
wrapper->destroy(wrapper);
|
|
|
|
return verified;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Get the better of two OCSP responses, and check for usable OCSP info
|
|
|
|
*/
|
|
|
|
static certificate_t *get_better_ocsp(certificate_t *cand, certificate_t *best,
|
2010-12-07 16:53:13 +00:00
|
|
|
x509_t *subject, x509_t *issuer, cert_validation_t *valid,
|
|
|
|
auth_cfg_t *auth, bool cache)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
ocsp_response_t *response;
|
|
|
|
time_t revocation, this_update, next_update, valid_until;
|
|
|
|
crl_reason_t reason;
|
|
|
|
bool revoked = FALSE;
|
|
|
|
|
|
|
|
response = (ocsp_response_t*)cand;
|
|
|
|
|
|
|
|
/* check ocsp signature */
|
2010-12-07 16:53:13 +00:00
|
|
|
if (!verify_ocsp(response, auth))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "ocsp response verification failed");
|
|
|
|
cand->destroy(cand);
|
|
|
|
return best;
|
|
|
|
}
|
|
|
|
/* check if response contains our certificate */
|
|
|
|
switch (response->get_status(response, subject, issuer, &revocation, &reason,
|
|
|
|
&this_update, &next_update))
|
|
|
|
{
|
|
|
|
case VALIDATION_REVOKED:
|
|
|
|
/* subject has been revoked by a valid OCSP response */
|
|
|
|
DBG1(DBG_CFG, "certificate was revoked on %T, reason: %N",
|
|
|
|
&revocation, TRUE, crl_reason_names, reason);
|
|
|
|
revoked = TRUE;
|
|
|
|
break;
|
|
|
|
case VALIDATION_GOOD:
|
|
|
|
/* results in either good or stale */
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
case VALIDATION_FAILED:
|
|
|
|
/* candidate unusable, does not contain our cert */
|
|
|
|
DBG1(DBG_CFG, " ocsp response contains no status on our certificate");
|
|
|
|
cand->destroy(cand);
|
|
|
|
return best;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* select the better of the two responses */
|
|
|
|
if (best == NULL || certificate_is_newer(cand, best))
|
|
|
|
{
|
|
|
|
DESTROY_IF(best);
|
|
|
|
best = cand;
|
|
|
|
if (best->get_validity(best, NULL, NULL, &valid_until))
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, " ocsp response is valid: until %T",
|
|
|
|
&valid_until, FALSE);
|
|
|
|
*valid = VALIDATION_GOOD;
|
|
|
|
if (cache)
|
|
|
|
{ /* cache non-stale only, stale certs get refetched */
|
|
|
|
lib->credmgr->cache_cert(lib->credmgr, best);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, " ocsp response is stale: since %T",
|
|
|
|
&valid_until, FALSE);
|
|
|
|
*valid = VALIDATION_STALE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
*valid = VALIDATION_STALE;
|
|
|
|
cand->destroy(cand);
|
|
|
|
}
|
|
|
|
if (revoked)
|
|
|
|
{ /* revoked always counts, even if stale */
|
|
|
|
*valid = VALIDATION_REVOKED;
|
|
|
|
}
|
|
|
|
return best;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* validate a x509 certificate using OCSP
|
|
|
|
*/
|
|
|
|
static cert_validation_t check_ocsp(x509_t *subject, x509_t *issuer,
|
|
|
|
auth_cfg_t *auth)
|
|
|
|
{
|
|
|
|
enumerator_t *enumerator;
|
|
|
|
cert_validation_t valid = VALIDATION_SKIPPED;
|
|
|
|
certificate_t *best = NULL, *current;
|
|
|
|
identification_t *keyid = NULL;
|
|
|
|
public_key_t *public;
|
|
|
|
chunk_t chunk;
|
|
|
|
char *uri = NULL;
|
|
|
|
|
|
|
|
/** lookup cache for valid OCSP responses */
|
|
|
|
enumerator = lib->credmgr->create_cert_enumerator(lib->credmgr,
|
|
|
|
CERT_X509_OCSP_RESPONSE, KEY_ANY, NULL, FALSE);
|
|
|
|
while (enumerator->enumerate(enumerator, ¤t))
|
|
|
|
{
|
|
|
|
current->get_ref(current);
|
2010-12-07 16:53:13 +00:00
|
|
|
best = get_better_ocsp(current, best, subject, issuer,
|
|
|
|
&valid, auth, FALSE);
|
2010-07-05 13:26:35 +00:00
|
|
|
if (best && valid != VALIDATION_STALE)
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, " using cached ocsp response");
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
|
|
|
|
|
|
|
/* derive the authorityKeyIdentifier from the issuer's public key */
|
|
|
|
current = &issuer->interface;
|
|
|
|
public = current->get_public_key(current);
|
2010-07-13 09:28:04 +00:00
|
|
|
if (public && public->get_fingerprint(public, KEYID_PUBKEY_SHA1, &chunk))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
keyid = identification_create_from_encoding(ID_KEY_ID, chunk);
|
|
|
|
}
|
|
|
|
/** fetch from configured OCSP responder URLs */
|
|
|
|
if (keyid && valid != VALIDATION_GOOD && valid != VALIDATION_REVOKED)
|
|
|
|
{
|
|
|
|
enumerator = lib->credmgr->create_cdp_enumerator(lib->credmgr,
|
|
|
|
CERT_X509_OCSP_RESPONSE, keyid);
|
|
|
|
while (enumerator->enumerate(enumerator, &uri))
|
|
|
|
{
|
|
|
|
current = fetch_ocsp(uri, &subject->interface, &issuer->interface);
|
|
|
|
if (current)
|
|
|
|
{
|
|
|
|
best = get_better_ocsp(current, best, subject, issuer,
|
2010-12-07 16:53:13 +00:00
|
|
|
&valid, auth, TRUE);
|
2010-07-05 13:26:35 +00:00
|
|
|
if (best && valid != VALIDATION_STALE)
|
|
|
|
{
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
|
|
|
}
|
|
|
|
DESTROY_IF(public);
|
|
|
|
DESTROY_IF(keyid);
|
|
|
|
|
|
|
|
/* fallback to URL fetching from subject certificate's URIs */
|
|
|
|
if (valid != VALIDATION_GOOD && valid != VALIDATION_REVOKED)
|
|
|
|
{
|
|
|
|
enumerator = subject->create_ocsp_uri_enumerator(subject);
|
|
|
|
while (enumerator->enumerate(enumerator, &uri))
|
|
|
|
{
|
|
|
|
current = fetch_ocsp(uri, &subject->interface, &issuer->interface);
|
|
|
|
if (current)
|
|
|
|
{
|
|
|
|
best = get_better_ocsp(current, best, subject, issuer,
|
2010-12-07 16:53:13 +00:00
|
|
|
&valid, auth, TRUE);
|
2010-07-05 13:26:35 +00:00
|
|
|
if (best && valid != VALIDATION_STALE)
|
|
|
|
{
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
|
|
|
}
|
|
|
|
/* an uri was found, but no result. switch validation state to failed */
|
|
|
|
if (valid == VALIDATION_SKIPPED && uri)
|
|
|
|
{
|
|
|
|
valid = VALIDATION_FAILED;
|
|
|
|
}
|
|
|
|
if (auth)
|
|
|
|
{
|
|
|
|
auth->add(auth, AUTH_RULE_OCSP_VALIDATION, valid);
|
|
|
|
if (valid == VALIDATION_GOOD)
|
|
|
|
{ /* successful OCSP check fulfills also CRL constraint */
|
|
|
|
auth->add(auth, AUTH_RULE_CRL_VALIDATION, VALIDATION_GOOD);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
DESTROY_IF(best);
|
|
|
|
return valid;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* fetch a CRL from an URL
|
|
|
|
*/
|
|
|
|
static certificate_t* fetch_crl(char *url)
|
|
|
|
{
|
|
|
|
certificate_t *crl;
|
|
|
|
chunk_t chunk;
|
|
|
|
|
|
|
|
DBG1(DBG_CFG, " fetching crl from '%s' ...", url);
|
|
|
|
if (lib->fetcher->fetch(lib->fetcher, url, &chunk, FETCH_END) != SUCCESS)
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "crl fetching failed");
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
crl = lib->creds->create(lib->creds, CRED_CERTIFICATE, CERT_X509_CRL,
|
|
|
|
BUILD_BLOB_ASN1_DER, chunk, BUILD_END);
|
|
|
|
chunk_free(&chunk);
|
|
|
|
if (!crl)
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "crl fetched successfully but parsing failed");
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
return crl;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* check the signature of an CRL
|
|
|
|
*/
|
2010-12-07 16:53:13 +00:00
|
|
|
static bool verify_crl(certificate_t *crl, auth_cfg_t *auth)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
certificate_t *issuer;
|
|
|
|
enumerator_t *enumerator;
|
|
|
|
bool verified = FALSE;
|
2010-12-07 16:53:13 +00:00
|
|
|
auth_cfg_t *current;
|
2010-07-05 13:26:35 +00:00
|
|
|
|
|
|
|
enumerator = lib->credmgr->create_trusted_enumerator(lib->credmgr,
|
|
|
|
KEY_ANY, crl->get_issuer(crl), FALSE);
|
2010-12-07 16:53:13 +00:00
|
|
|
while (enumerator->enumerate(enumerator, &issuer, ¤t))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
if (lib->credmgr->issued_by(lib->credmgr, crl, issuer))
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, " crl correctly signed by \"%Y\"",
|
|
|
|
issuer->get_subject(issuer));
|
2010-12-07 16:53:13 +00:00
|
|
|
if (auth)
|
|
|
|
{
|
|
|
|
auth->merge(auth, current, FALSE);
|
|
|
|
}
|
2010-07-05 13:26:35 +00:00
|
|
|
verified = TRUE;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
|
|
|
|
|
|
|
return verified;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Get the better of two CRLs, and check for usable CRL info
|
|
|
|
*/
|
|
|
|
static certificate_t *get_better_crl(certificate_t *cand, certificate_t *best,
|
2010-12-07 16:53:13 +00:00
|
|
|
x509_t *subject, cert_validation_t *valid, auth_cfg_t *auth, bool cache)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
enumerator_t *enumerator;
|
|
|
|
time_t revocation, valid_until;
|
|
|
|
crl_reason_t reason;
|
|
|
|
chunk_t serial;
|
|
|
|
crl_t *crl;
|
|
|
|
|
|
|
|
/* check CRL signature */
|
2010-12-07 16:53:13 +00:00
|
|
|
if (!verify_crl(cand, auth))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "crl response verification failed");
|
|
|
|
cand->destroy(cand);
|
|
|
|
return best;
|
|
|
|
}
|
|
|
|
|
|
|
|
crl = (crl_t*)cand;
|
|
|
|
enumerator = crl->create_enumerator(crl);
|
|
|
|
while (enumerator->enumerate(enumerator, &serial, &revocation, &reason))
|
|
|
|
{
|
|
|
|
if (chunk_equals(serial, subject->get_serial(subject)))
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "certificate was revoked on %T, reason: %N",
|
|
|
|
&revocation, TRUE, crl_reason_names, reason);
|
|
|
|
*valid = VALIDATION_REVOKED;
|
|
|
|
enumerator->destroy(enumerator);
|
|
|
|
DESTROY_IF(best);
|
|
|
|
return cand;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
|
|
|
|
|
|
|
/* select the better of the two CRLs */
|
|
|
|
if (best == NULL || crl_is_newer(crl, (crl_t*)best))
|
|
|
|
{
|
|
|
|
DESTROY_IF(best);
|
|
|
|
best = cand;
|
|
|
|
if (best->get_validity(best, NULL, NULL, &valid_until))
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, " crl is valid: until %T", &valid_until, FALSE);
|
|
|
|
*valid = VALIDATION_GOOD;
|
|
|
|
if (cache)
|
|
|
|
{ /* we cache non-stale crls only, as a stale crls are refetched */
|
|
|
|
lib->credmgr->cache_cert(lib->credmgr, best);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, " crl is stale: since %T", &valid_until, FALSE);
|
|
|
|
*valid = VALIDATION_STALE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
*valid = VALIDATION_STALE;
|
|
|
|
cand->destroy(cand);
|
|
|
|
}
|
|
|
|
return best;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
2010-12-02 14:38:44 +00:00
|
|
|
* Find or fetch a certificate for a given crlIssuer
|
2010-07-05 13:26:35 +00:00
|
|
|
*/
|
2010-12-02 14:38:44 +00:00
|
|
|
static cert_validation_t find_crl(x509_t *subject, identification_t *issuer,
|
2010-12-07 16:53:13 +00:00
|
|
|
auth_cfg_t *auth, certificate_t **best, bool *uri_found)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
cert_validation_t valid = VALIDATION_SKIPPED;
|
|
|
|
enumerator_t *enumerator;
|
2010-12-02 14:38:44 +00:00
|
|
|
certificate_t *current;
|
|
|
|
char *uri;
|
2010-07-05 13:26:35 +00:00
|
|
|
|
2010-12-02 14:38:44 +00:00
|
|
|
/* find a cached crl */
|
|
|
|
enumerator = lib->credmgr->create_cert_enumerator(lib->credmgr,
|
|
|
|
CERT_X509_CRL, KEY_ANY, issuer, FALSE);
|
|
|
|
while (enumerator->enumerate(enumerator, ¤t))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
2010-12-02 14:38:44 +00:00
|
|
|
current->get_ref(current);
|
2010-12-07 16:53:13 +00:00
|
|
|
*best = get_better_crl(current, *best, subject, &valid, auth, FALSE);
|
2010-12-02 14:38:44 +00:00
|
|
|
if (*best && valid != VALIDATION_STALE)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
2010-12-02 14:38:44 +00:00
|
|
|
DBG1(DBG_CFG, " using cached crl");
|
|
|
|
break;
|
2010-07-05 13:26:35 +00:00
|
|
|
}
|
2010-12-02 14:38:44 +00:00
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
2010-07-05 13:26:35 +00:00
|
|
|
|
2010-12-02 14:38:44 +00:00
|
|
|
/* fallback to fetching crls from credential sets cdps */
|
|
|
|
if (valid != VALIDATION_GOOD && valid != VALIDATION_REVOKED)
|
|
|
|
{
|
|
|
|
enumerator = lib->credmgr->create_cdp_enumerator(lib->credmgr,
|
|
|
|
CERT_X509_CRL, issuer);
|
|
|
|
while (enumerator->enumerate(enumerator, &uri))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
2010-12-02 14:38:44 +00:00
|
|
|
*uri_found = TRUE;
|
|
|
|
current = fetch_crl(uri);
|
|
|
|
if (!current->has_issuer(current, issuer))
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "issuer of fetched CRL '%Y' does not match CRL "
|
|
|
|
"issuer '%Y'", current->get_issuer(current), issuer);
|
|
|
|
current->destroy(current);
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
if (current)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
2010-12-07 16:53:13 +00:00
|
|
|
*best = get_better_crl(current, *best, subject,
|
|
|
|
&valid, auth, TRUE);
|
2010-12-02 14:38:44 +00:00
|
|
|
if (*best && valid != VALIDATION_STALE)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
2010-12-02 14:38:44 +00:00
|
|
|
break;
|
2010-07-05 13:26:35 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2010-12-02 14:38:44 +00:00
|
|
|
enumerator->destroy(enumerator);
|
2010-07-05 13:26:35 +00:00
|
|
|
}
|
2010-12-02 14:38:44 +00:00
|
|
|
return valid;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* validate a x509 certificate using CRL
|
|
|
|
*/
|
|
|
|
static cert_validation_t check_crl(x509_t *subject, x509_t *issuer,
|
|
|
|
auth_cfg_t *auth)
|
|
|
|
{
|
|
|
|
cert_validation_t valid = VALIDATION_SKIPPED;
|
|
|
|
certificate_t *best = NULL;
|
2010-12-17 14:52:15 +00:00
|
|
|
identification_t *id;
|
|
|
|
x509_cdp_t *cdp;
|
2010-12-02 14:38:44 +00:00
|
|
|
bool uri_found = FALSE;
|
|
|
|
certificate_t *current;
|
|
|
|
enumerator_t *enumerator;
|
|
|
|
chunk_t chunk;
|
|
|
|
|
|
|
|
/* use issuers subjectKeyIdentifier to find a cached CRL / fetch from CDP */
|
|
|
|
chunk = issuer->get_subjectKeyIdentifier(issuer);
|
|
|
|
if (chunk.len)
|
|
|
|
{
|
|
|
|
id = identification_create_from_encoding(ID_KEY_ID, chunk);
|
2010-12-07 16:53:13 +00:00
|
|
|
valid = find_crl(subject, id, auth, &best, &uri_found);
|
2010-12-02 14:38:44 +00:00
|
|
|
id->destroy(id);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* find a cached CRL or fetch via configured CDP via CRLIssuer */
|
|
|
|
enumerator = subject->create_crl_uri_enumerator(subject);
|
|
|
|
while (valid != VALIDATION_GOOD && valid != VALIDATION_REVOKED &&
|
2010-12-17 14:52:15 +00:00
|
|
|
enumerator->enumerate(enumerator, &cdp))
|
2010-12-02 14:38:44 +00:00
|
|
|
{
|
|
|
|
if (id)
|
|
|
|
{
|
2010-12-17 14:52:15 +00:00
|
|
|
valid = find_crl(subject, cdp->issuer, auth, &best, &uri_found);
|
2010-12-02 14:38:44 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
2010-07-05 13:26:35 +00:00
|
|
|
|
2010-12-02 14:38:44 +00:00
|
|
|
/* fallback to fetching CRLs from CDPs found in subjects certificate */
|
2010-07-05 13:26:35 +00:00
|
|
|
if (valid != VALIDATION_GOOD && valid != VALIDATION_REVOKED)
|
|
|
|
{
|
|
|
|
enumerator = subject->create_crl_uri_enumerator(subject);
|
2010-12-17 14:52:15 +00:00
|
|
|
while (enumerator->enumerate(enumerator, &cdp))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
2010-12-02 14:38:44 +00:00
|
|
|
uri_found = TRUE;
|
2010-12-17 14:52:15 +00:00
|
|
|
current = fetch_crl(cdp->uri);
|
2010-07-05 13:26:35 +00:00
|
|
|
if (current)
|
|
|
|
{
|
2010-12-17 14:52:15 +00:00
|
|
|
if (cdp->issuer && !current->has_issuer(current, cdp->issuer))
|
2010-12-02 14:38:44 +00:00
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "issuer of fetched CRL '%Y' does not match "
|
|
|
|
"certificates CRL issuer '%Y'",
|
2010-12-17 14:52:15 +00:00
|
|
|
current->get_issuer(current), cdp->issuer);
|
2010-12-02 14:38:44 +00:00
|
|
|
current->destroy(current);
|
|
|
|
continue;
|
|
|
|
}
|
2010-12-07 16:53:13 +00:00
|
|
|
best = get_better_crl(current, best, subject, &valid,
|
|
|
|
auth, TRUE);
|
2010-07-05 13:26:35 +00:00
|
|
|
if (best && valid != VALIDATION_STALE)
|
|
|
|
{
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
enumerator->destroy(enumerator);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* an uri was found, but no result. switch validation state to failed */
|
2010-12-02 14:38:44 +00:00
|
|
|
if (valid == VALIDATION_SKIPPED && uri_found)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
valid = VALIDATION_FAILED;
|
|
|
|
}
|
|
|
|
if (auth)
|
|
|
|
{
|
|
|
|
if (valid == VALIDATION_SKIPPED)
|
|
|
|
{ /* if we skipped CRL validation, we use the result of OCSP for
|
|
|
|
* constraint checking */
|
|
|
|
auth->add(auth, AUTH_RULE_CRL_VALIDATION,
|
|
|
|
auth->get(auth, AUTH_RULE_OCSP_VALIDATION));
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
auth->add(auth, AUTH_RULE_CRL_VALIDATION, valid);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
DESTROY_IF(best);
|
|
|
|
return valid;
|
|
|
|
}
|
|
|
|
|
|
|
|
METHOD(cert_validator_t, validate, bool,
|
|
|
|
private_revocation_validator_t *this, certificate_t *subject,
|
2010-12-22 09:43:06 +00:00
|
|
|
certificate_t *issuer, bool online, int pathlen, bool anchor,
|
|
|
|
auth_cfg_t *auth)
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
if (subject->get_type(subject) == CERT_X509 &&
|
|
|
|
issuer->get_type(issuer) == CERT_X509 &&
|
|
|
|
online)
|
|
|
|
{
|
|
|
|
DBG1(DBG_CFG, "checking certificate status of \"%Y\"",
|
|
|
|
subject->get_subject(subject));
|
2010-12-22 09:34:58 +00:00
|
|
|
switch (check_ocsp((x509_t*)subject, (x509_t*)issuer,
|
|
|
|
pathlen ? NULL : auth))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
case VALIDATION_GOOD:
|
|
|
|
DBG1(DBG_CFG, "certificate status is good");
|
|
|
|
return TRUE;
|
|
|
|
case VALIDATION_REVOKED:
|
|
|
|
/* has already been logged */
|
|
|
|
return FALSE;
|
|
|
|
case VALIDATION_SKIPPED:
|
|
|
|
DBG2(DBG_CFG, "ocsp check skipped, no ocsp found");
|
|
|
|
break;
|
|
|
|
case VALIDATION_STALE:
|
|
|
|
DBG1(DBG_CFG, "ocsp information stale, fallback to crl");
|
|
|
|
break;
|
|
|
|
case VALIDATION_FAILED:
|
|
|
|
DBG1(DBG_CFG, "ocsp check failed, fallback to crl");
|
|
|
|
break;
|
|
|
|
}
|
2010-12-22 09:34:58 +00:00
|
|
|
switch (check_crl((x509_t*)subject, (x509_t*)issuer,
|
|
|
|
pathlen ? NULL : auth))
|
2010-07-05 13:26:35 +00:00
|
|
|
{
|
|
|
|
case VALIDATION_GOOD:
|
|
|
|
DBG1(DBG_CFG, "certificate status is good");
|
|
|
|
return TRUE;
|
|
|
|
case VALIDATION_REVOKED:
|
|
|
|
/* has already been logged */
|
|
|
|
return FALSE;
|
|
|
|
case VALIDATION_FAILED:
|
|
|
|
case VALIDATION_SKIPPED:
|
|
|
|
DBG1(DBG_CFG, "certificate status is not available");
|
|
|
|
break;
|
|
|
|
case VALIDATION_STALE:
|
|
|
|
DBG1(DBG_CFG, "certificate status is unknown, crl is stale");
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
METHOD(revocation_validator_t, destroy, void,
|
|
|
|
private_revocation_validator_t *this)
|
|
|
|
{
|
|
|
|
free(this);
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* See header
|
|
|
|
*/
|
|
|
|
revocation_validator_t *revocation_validator_create()
|
|
|
|
{
|
|
|
|
private_revocation_validator_t *this;
|
|
|
|
|
|
|
|
INIT(this,
|
|
|
|
.public = {
|
|
|
|
.validator.validate = _validate,
|
|
|
|
.destroy = _destroy,
|
|
|
|
},
|
|
|
|
);
|
|
|
|
|
|
|
|
return &this->public;
|
|
|
|
}
|