+++ /dev/null
-/*
- * Copyright (c) 2000,2002,2011-2012,2014 Apple Inc. All Rights Reserved.
- *
- * @APPLE_LICENSE_HEADER_START@
- *
- * This file contains Original Code and/or Modifications of Original Code
- * as defined in and that are subject to the Apple Public Source License
- * Version 2.0 (the 'License'). You may not use this file except in
- * compliance with the License. Please obtain a copy of the License at
- * http://www.opensource.apple.com/apsl/ and read it before using this
- * file.
- *
- * The Original Code and all software distributed under the License are
- * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
- * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
- * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
- * Please see the License for the specific language governing rights and
- * limitations under the License.
- *
- * @APPLE_LICENSE_HEADER_END@
- */
-
-/*
- * ocspUtils.cpp - common utilities for OCSPD
- */
-
-#include "ocspdUtils.h"
-#include "ocspdDebug.h"
-#include <Security/cssmerr.h>
-#include <Security/keyTemplates.h>
-#include <CoreFoundation/CoreFoundation.h>
-
-/*
- * Compare two CSSM_DATAs, return CSSM_TRUE if identical.
- */
-CSSM_BOOL ocspdCompareCssmData(
- const CSSM_DATA *data1,
- const CSSM_DATA *data2)
-{
- if((data1 == NULL) || (data1->Data == NULL) ||
- (data2 == NULL) || (data2->Data == NULL) ||
- (data1->Length != data2->Length)) {
- return CSSM_FALSE;
- }
- if(data1->Length != data2->Length) {
- return CSSM_FALSE;
- }
- if(memcmp(data1->Data, data2->Data, data1->Length) == 0) {
- return CSSM_TRUE;
- }
- else {
- return CSSM_FALSE;
- }
-}
-
-/*
- * Convert a generalized time string, with a 4-digit year and no trailing
- * fractional seconds or time zone info, to a CFAbsoluteTime. Returns
- * NULL_TIME (0.0) on error.
- */
-static CFAbsoluteTime parseGenTime(
- const uint8 *str,
- uint32 len)
-{
- if((str == NULL) || (len == 0)) {
- return NULL_TIME;
- }
-
- /* tolerate NULL terminated or not */
- if(str[len - 1] == '\0') {
- len--;
- }
- if(len < 4) {
- return NULL_TIME;
- }
- char szTemp[5];
- CFGregorianDate greg;
- memset(&greg, 0, sizeof(greg));
- const uint8 *cp = str;
-
- /* YEAR */
- szTemp[0] = *cp++;
- szTemp[1] = *cp++;
- szTemp[2] = *cp++;
- szTemp[3] = *cp++;
- szTemp[4] = '\0';
- len -= 4;
- greg.year = atoi(szTemp);
-
- /* MONTH - CFGregorianDate ranges 1..12, just like the string */
- if(len < 2) {
- return NULL_TIME;
- }
- szTemp[0] = *cp++;
- szTemp[1] = *cp++;
- szTemp[2] = '\0';
- len -= 2;
- greg.month = atoi( szTemp );
-
- /* DAY - 1..31 */
- if(len < 2) {
- return NULL_TIME;
- }
- szTemp[0] = *cp++;
- szTemp[1] = *cp++;
- szTemp[2] = '\0';
- greg.day = atoi( szTemp );
- len -= 2;
-
- if(len >= 2) {
- /* HOUR 0..23 */
- szTemp[0] = *cp++;
- szTemp[1] = *cp++;
- szTemp[2] = '\0';
- greg.hour = atoi( szTemp );
- len -= 2;
- }
- if(len >= 2) {
- /* MINUTE 0..59 */
- szTemp[0] = *cp++;
- szTemp[1] = *cp++;
- szTemp[2] = '\0';
- greg.minute = atoi( szTemp );
- len -= 2;
- }
- if(len >= 2) {
- /* SECOND 0..59 */
- szTemp[0] = *cp++;
- szTemp[1] = *cp++;
- szTemp[2] = '\0';
- greg.second = atoi( szTemp );
- len -= 2;
- }
- return CFGregorianDateGetAbsoluteTime(greg, NULL);
-}
-
-/*
- * Parse a GeneralizedTime string into a CFAbsoluteTime. Returns NULL on parse error.
- * Fractional parts of a second are discarded.
- */
-CFAbsoluteTime genTimeToCFAbsTime(
- const CSSM_DATA *strData)
-{
- if((strData == NULL) || (strData->Data == NULL) || (strData->Length == 0)) {
- return NULL_TIME;
- }
-
- uint8 *timeStr = strData->Data;
- size_t timeStrLen = strData->Length;
-
- /* tolerate NULL terminated or not */
- if(timeStr[timeStrLen - 1] == '\0') {
- timeStrLen--;
- }
-
- /* start with a fresh editable copy */
- uint8 *str = (uint8 *)malloc(timeStrLen);
- uint32 strLen = 0;
-
- /*
- * If there is a decimal point, strip it and all trailing digits off
- */
- const uint8 *inCp = timeStr;
- uint8 *outCp = str;
- int foundDecimal = 0;
- int minutesOffset = 0;
- int hoursOffset = 0;
- bool minusOffset = false;
- bool isGMT = false;
- size_t toGo = timeStrLen;
-
- do {
- if(*inCp == '.') {
- if(foundDecimal) {
- /* only legal once */ {
- free(str);
- return NULL_TIME;
- }
- }
- foundDecimal++;
-
- /* skip the decimal point... */
- inCp++;
- toGo--;
- if(toGo == 0) {
- /* all done */
- break;
- }
- /* then all subsequent contiguous digits */
- while(isdigit(*inCp) && (toGo != 0)) {
- inCp++;
- toGo--;
- }
- } /* decimal point processing */
- else if((*inCp == '+') || (*inCp == '-')) {
- /* Time zone offset - handle 2 or 4 chars */
- if((toGo != 2) & (toGo != 4)) {
- free(str);
- return NULL_TIME;
- }
- if(*inCp == '-') {
- minusOffset = true;
- }
- inCp++;
- hoursOffset = (10 * (inCp[0] - '0')) + (inCp[1] - '0');
- toGo -= 2;
- if(toGo) {
- minutesOffset = (10 * (inCp[0] - '0')) + (inCp[1] - '0');
- toGo -= 2;
- }
- }
- else {
- *outCp++ = *inCp++;
- strLen++;
- toGo--;
- }
- } while(toGo != 0);
-
- if(str[strLen - 1] == 'Z') {
- isGMT = true;
- strLen--;
- }
-
- CFAbsoluteTime absTime;
- absTime = parseGenTime(str, strLen);
- free(str);
- if(absTime == NULL_TIME) {
- return NULL_TIME;
- }
-
- /* post processing needed? */
- if(isGMT) {
- /* Nope, string was in GMT */
- return absTime;
- }
- if((minutesOffset != 0) || (hoursOffset != 0)) {
- /* string contained explicit offset from GMT */
- if(minusOffset) {
- absTime -= (minutesOffset * 60);
- absTime -= (hoursOffset * 3600);
- }
- else {
- absTime += (minutesOffset * 60);
- absTime += (hoursOffset * 3600);
- }
- }
- else {
- /* implciit offset = local */
- CFTimeInterval tzDelta;
- CFTimeZoneRef localZone = CFTimeZoneCopySystem();
- tzDelta = CFTimeZoneGetSecondsFromGMT (localZone, CFAbsoluteTimeGetCurrent());
- CFRelease(localZone);
- absTime += tzDelta;
- }
- return absTime;
-}
-
-/*
- * Convert CFAbsoluteTime to generalized time string, GMT format (4 digit year,
- * trailing 'Z'). Caller allocated the output which is GENERAL_TIME_STRLEN+1 bytes.
- */
-void cfAbsTimeToGgenTime(
- CFAbsoluteTime absTime,
- char *genTime)
-{
- /* time zone = GMT */
- CFTimeZoneRef tz = CFTimeZoneCreateWithTimeIntervalFromGMT(NULL, 0.0);
- CFGregorianDate greg = CFAbsoluteTimeGetGregorianDate(absTime, tz);
- int seconds = (int)greg.second;
- sprintf(genTime, "%04d%02d%02d%02d%02d%02dZ",
- (int)greg.year, greg.month, greg.day, greg.hour,
- greg.minute, seconds);
-}
-
-void ocspdSha1(
- const void *data,
- CC_LONG len,
- unsigned char *md) // allocd by caller, CC_SHA1_DIGEST_LENGTH bytes
-{
- CC_SHA1_CTX ctx;
- CC_SHA1_Init(&ctx);
- CC_SHA1_Update(&ctx, data, len);
- CC_SHA1_Final(md, &ctx);
-}
-
-void ocspdMD5(
- const void *data,
- CC_LONG len,
- unsigned char *md) // allocd by caller, CC_MD5_DIGEST_LENGTH bytes
-{
- CC_MD5_CTX ctx;
- CC_MD5_Init(&ctx);
- CC_MD5_Update(&ctx, data, len);
- CC_MD5_Final(md, &ctx);
-}
-
-void ocspdMD4(
- const void *data,
- CC_LONG len,
- unsigned char *md) // allocd by caller, CC_MD4_DIGEST_LENGTH bytes
-{
- CC_MD4_CTX ctx;
- CC_MD4_Init(&ctx);
- CC_MD4_Update(&ctx, data, len);
- CC_MD4_Final(md, &ctx);
-}
-
-void ocspdSHA256(
- const void *data,
- CC_LONG len,
- unsigned char *md) // allocd by caller, CC_SHA256_DIGEST_LENGTH bytes
-{
- CC_SHA256_CTX ctx;
- CC_SHA256_Init(&ctx);
- CC_SHA256_Update(&ctx, data, len);
- CC_SHA256_Final(md, &ctx);
-}
-
-/*
- * How many items in a NULL-terminated array of pointers?
- */
-unsigned ocspdArraySize(
- const void **array)
-{
- unsigned count = 0;
- if (array) {
- while (*array++) {
- count++;
- }
- }
- return count;
-}
-
-/* Fill out a CSSM_DATA with the subset of public key bytes from the given
- * CSSM_KEY_PTR which should be hashed to produce the issuerKeyHash field
- * of a CertID in an OCSP request.
- *
- * For RSA keys, this simply copies the input key pointer and length.
- * For EC keys, we need to further deconstruct the SubjectPublicKeyInfo
- * to obtain the key bytes (i.e. curve point) for hashing.
- *
- * Returns CSSM_OK on success, or non-zero error if the bytes could not
- * be retrieved.
- */
-CSSM_RETURN ocspdGetPublicKeyBytes(
- SecAsn1CoderRef coder, // optional
- CSSM_KEY_PTR publicKey, // input public key
- CSSM_DATA &publicKeyBytes) // filled in by this function
-{
- CSSM_RETURN crtn = CSSM_OK;
- SecAsn1CoderRef _coder = NULL;
-
- if(publicKey == NULL) {
- crtn = CSSMERR_CSP_INVALID_KEY_POINTER;
- goto exit;
- }
-
- if(coder == NULL) {
- crtn = SecAsn1CoderCreate(&_coder);
- if(crtn) {
- goto exit;
- }
- coder = _coder;
- }
-
- publicKeyBytes.Length = publicKey->KeyData.Length;
- publicKeyBytes.Data = publicKey->KeyData.Data;
-
- if(publicKey->KeyHeader.AlgorithmId == CSSM_ALGID_ECDSA) {
- /*
- * For an EC key, publicKey->KeyData is a SubjectPublicKeyInfo
- * ASN.1 sequence that includes the algorithm identifier.
- * We only want to return the bit string portion of the key here.
- */
- SecAsn1PubKeyInfo pkinfo;
- memset(&pkinfo, 0, sizeof(pkinfo));
- if(SecAsn1Decode(coder,
- publicKey->KeyData.Data,
- publicKey->KeyData.Length,
- kSecAsn1SubjectPublicKeyInfoTemplate,
- &pkinfo) == 0) {
- if(pkinfo.subjectPublicKey.Length &&
- pkinfo.subjectPublicKey.Data) {
- publicKeyBytes.Length = pkinfo.subjectPublicKey.Length >> 3;
- publicKeyBytes.Data = pkinfo.subjectPublicKey.Data;
- /*
- * Important: if we allocated the SecAsn1Coder, the memory
- * being pointed to by pkinfo.subjectPublicKey.Data will be
- * deallocated when the coder is released below. We want to
- * point to the identical data inside the caller's public key,
- * now that the decoder has identified it for us.
- */
- if(publicKeyBytes.Length <= publicKey->KeyData.Length) {
- publicKeyBytes.Data = (uint8*)((uintptr_t)publicKey->KeyData.Data +
- (publicKey->KeyData.Length - publicKeyBytes.Length));
- goto exit;
- }
- /* intentional fallthrough to error exit */
- }
- ocspdErrorLog("ocspdGetPublicKeyBytes: invalid SecAsn1PubKeyInfo\n");
- crtn = CSSMERR_CSP_INVALID_KEY_POINTER;
- }
- else {
- /* Unable to decode using kSecAsn1SubjectPublicKeyInfoTemplate.
- * This may or may not be an error; just return the unchanged key.
- */
- ocspdErrorLog("ocspdGetPublicKeyBytes: unable to decode SubjectPublicKeyInfo\n");
- }
- }
-
-exit:
- if(_coder) {
- SecAsn1CoderRelease(_coder);
- }
- return crtn;
-}