SecCAIssuerRequest.c [plain text]
#include "SecCAIssuerRequest.h"
#include "SecCAIssuerCache.h"
#include <Security/SecInternal.h>
#include <CoreFoundation/CFURL.h>
#include <CFNetwork/CFHTTPMessage.h>
#include <security_utilities/debugging.h>
#include <Security/SecCertificateInternal.h>
#include <securityd/asynchttp.h>
#include <stdlib.h>
typedef struct SecCAIssuerRequest *SecCAIssuerRequestRef;
struct SecCAIssuerRequest {
asynchttp_t http;
SecCertificateRef certificate;
CFArrayRef issuers;
CFIndex issuerIX;
void *context;
void (*callback)(void *, CFArrayRef);
};
static void SecCAIssuerRequestRelease(SecCAIssuerRequestRef request) {
CFRelease(request->certificate);
asynchttp_free(&request->http);
free(request);
}
static bool SecCAIssuerRequestIssue(SecCAIssuerRequestRef request) {
while (request->issuerIX < CFArrayGetCount(request->issuers)) {
CFURLRef issuer = CFArrayGetValueAtIndex(request->issuers,
request->issuerIX++);
CFStringRef scheme = CFURLCopyScheme(issuer);
if (scheme) {
if (CFEqual(CFSTR("http"), scheme)) {
CFHTTPMessageRef msg = CFHTTPMessageCreateRequest(kCFAllocatorDefault,
CFSTR("GET"), issuer, kCFHTTPVersion1_1);
if (msg) {
secdebug("caissuer", "%@", msg);
bool done = asynchttp_request(msg, &request->http);
CFRelease(msg);
if (done == false)
return done;
}
secdebug("caissuer", "failed to get %@", issuer);
} else {
secdebug("caissuer", "skipping unsupported uri %@", issuer);
}
CFRelease(scheme);
}
}
secdebug("caissuer", "no request issued");
request->callback(request->context, NULL);
SecCAIssuerRequestRelease(request);
return true;
}
static CFArrayRef SecCAIssuerConvertToParents(SecCertificateRef certificate,
SecCertificateRef parent) {
CFDataRef nic = SecCertificateGetNormalizedIssuerContent(certificate);
CFArrayRef parents = NULL;
if (parent) {
if (CFEqual(nic, SecCertificateGetNormalizedSubjectContent(parent))) {
const void *ventry = parent;
parents = CFArrayCreate(NULL, &ventry, 1, &kCFTypeArrayCallBacks);
}
CFRelease(parent);
}
return parents;
}
#define SECONDS_PER_DAY (86400.0)
static void SecCAIssuerRequestCompleted(asynchttp_t *http,
CFTimeInterval maxAge) {
SecCAIssuerRequestRef request = (SecCAIssuerRequestRef)http;
CFDataRef data = (request->http.response ?
CFHTTPMessageCopyBody(request->http.response) : NULL);
if (data) {
SecCertificateRef parent = SecCertificateCreateWithData(NULL, data);
CFRelease(data);
if (parent) {
if (maxAge < SECONDS_PER_DAY * 7)
maxAge = SECONDS_PER_DAY * 7;
CFAbsoluteTime expires = CFAbsoluteTimeGetCurrent() + maxAge;
CFURLRef issuer = CFArrayGetValueAtIndex(request->issuers,
request->issuerIX - 1);
SecCAIssuerCacheAddCertificate(parent, issuer, expires);
CFArrayRef parents = SecCAIssuerConvertToParents(
request->certificate, parent);
if (parents) {
secdebug("caissuer", "response: %@ good", http->response);
request->callback(request->context, parents);
CFRelease(parents);
SecCAIssuerRequestRelease(request);
return;
}
}
}
secdebug("caissuer", "response: %@ not parent, trying next caissuer",
http->response);
SecCAIssuerRequestIssue(request);
}
static CFArrayRef SecCAIssuerRequestCacheCopyParents(SecCertificateRef cert,
CFArrayRef issuers) {
CFIndex ix = 0, ex = CFArrayGetCount(issuers);
for (;ix < ex; ++ix) {
CFURLRef issuer = CFArrayGetValueAtIndex(issuers, ix);
CFStringRef scheme = CFURLCopyScheme(issuer);
if (scheme) {
if (CFEqual(CFSTR("http"), scheme)) {
CFArrayRef parents = SecCAIssuerConvertToParents(cert,
SecCAIssuerCacheCopyMatching(issuer));
if (parents) {
secdebug("caissuer", "cache hit, for %@ no request issued", issuer);
return parents;
}
}
CFRelease(scheme);
}
}
return NULL;
}
bool SecCAIssuerCopyParents(SecCertificateRef certificate,
void *context, void (*callback)(void *, CFArrayRef)) {
CFArrayRef issuers = SecCertificateGetCAIssuers(certificate);
if (!issuers) {
callback(context, NULL);
return true;
}
CFArrayRef parents = SecCAIssuerRequestCacheCopyParents(certificate, issuers);
if (parents) {
callback(context, parents);
CFReleaseSafe(parents);
return true;
}
SecCAIssuerRequestRef request =
(SecCAIssuerRequestRef)calloc(1, sizeof(*request));
request->http.completed = SecCAIssuerRequestCompleted;
CFRetain(certificate);
request->certificate = certificate;
request->issuers = issuers;
request->issuerIX = 0;
request->context = context;
request->callback = callback;
return SecCAIssuerRequestIssue(request);
}