+++ /dev/null
-//
-// OTRMath.c
-// libsecurity_libSecOTR
-//
-// Created by Mitch Adler on 1/28/11.
-// Copyright 2011 Apple Inc. All rights reserved.
-//
-
-#include "SecOTRMath.h"
-#include "SecOTRMathPrivate.h"
-
-#include "SecOTRPacketData.h"
-
-#include <AssertMacros.h>
-
-#include <pthread.h>
-
-#include <Security/SecRandom.h>
-
-#include <corecrypto/ccsha2.h>
-#include <corecrypto/cczp.h>
-
-#include <limits.h>
-
-static inline
-void cczp_init_from_bytes(cc_size n, cczp_t zp, size_t pSize, const void *p, size_t rSize, const void* r)
-{
- CCZP_N(zp) = n;
- zp.zp->mod_prime = cczp_mod;
- ccn_read_uint(n, CCZP_PRIME(zp), pSize, p);
- ccn_read_uint(n+1, CCZP_RECIP(zp), rSize, r);
-
-}
-
-static pthread_once_t kOTRImportGroupData = PTHREAD_ONCE_INIT;
-
-static cc_unit sOTRGenerator[kOTRDHGroupUnits];
-static cczp_decl_n(kOTRDHGroupUnits, sOTRGroup_zp);
-
-static void setupGroupValues()
-{
- __Check( kExponentiationUnits == kOTRDHGroupUnits );
-
- cczp_init_from_bytes(kOTRDHGroupUnits, sOTRGroup_zp,
- sizeof(kOTRDHGroup), kOTRDHGroup,
- sizeof(kOTRDHGroup_Recip), kOTRDHGroup_Recip);
-
- ccn_seti(kOTRDHGroupUnits, sOTRGenerator, kOTRGeneratorValue);
-}
-
-void OTRExponentiate(cc_unit* res, const cc_unit* base, const cc_unit* exponent)
-{
- pthread_once(&kOTRImportGroupData, setupGroupValues);
-
- cczp_power(sOTRGroup_zp, res, base, exponent);
-}
-
-void OTRGroupExponentiate(cc_unit* res, const cc_unit* exponent)
-{
- pthread_once(&kOTRImportGroupData, setupGroupValues);
-
- OTRExponentiate(res, sOTRGenerator, exponent);
-}
-
-//
-// Random Number Generation
-//
-
-OSStatus GetRandomBytesInLSBs(size_t bytesOfRandomness, size_t n, cc_unit* place)
-{
- OSStatus result = errSecParam;
- require(bytesOfRandomness * 8 <= ccn_bitsof_n(n), fail);
- {
- uint8_t randomBytes[bytesOfRandomness];
-
- result = SecRandomCopyBytes(kSecRandomDefault, sizeof(randomBytes), randomBytes);
-
- require_noerr(result, fail);
-
- ccn_read_uint(n, place, sizeof(randomBytes), randomBytes);
-
- bzero(randomBytes, bytesOfRandomness);
- }
-fail:
- return result;
-}
-
-OSStatus FillWithRandomBytes(size_t n, cc_unit* place)
-{
- return GetRandomBytesInLSBs(ccn_sizeof(n), n, place);
-}
-
-
-static const uint8_t kIVZero[16] = { };
-
-static void AES_CTR_Transform(size_t keySize, const uint8_t* key,
- const uint8_t iv[16],
- size_t howMuch, const uint8_t* from, uint8_t* to)
-{
- const struct ccmode_ctr* ctr_encrypt = ccaes_ctr_crypt_mode();
- ccctr_ctx_decl(ctr_encrypt->size, ctr_ctx);
- ctr_encrypt->init(ctr_encrypt, ctr_ctx, keySize, key, iv);
-
- ctr_encrypt->ctr(ctr_ctx, howMuch, from, to);
-}
-
-void AES_CTR_HighHalf_Transform(size_t keySize, const uint8_t* key,
- uint64_t highHalf,
- size_t howMuch, const uint8_t* from, uint8_t* to)
-{
- uint8_t iv[16] = { highHalf >> 56, highHalf >> 48, highHalf >> 40, highHalf >> 32,
- highHalf >> 24, highHalf >> 16, highHalf >> 8 , highHalf >> 0,
- 0, 0, 0, 0,
- 0, 0, 0, 0 };
- AES_CTR_Transform(keySize, key, iv, howMuch, from, to);
-}
-
-void AES_CTR_IV0_Transform(size_t keySize, const uint8_t* key,
- size_t howMuch, const uint8_t* from, uint8_t* to)
-{
- AES_CTR_Transform(keySize, key, kIVZero, howMuch, from, to);
-}
-
-
-//
-// Key Derivation
-//
-
-static void HashMPIWithPrefix(uint8_t byte, cc_size sN, const cc_unit* s, uint8_t* buffer)
-{
- CFMutableDataRef dataToHash = CFDataCreateMutable(kCFAllocatorDefault, 0);
- CFDataAppendBytes(dataToHash, &byte, 1);
-
- AppendMPI(dataToHash, sN, s);
-
- uint8_t *bytesToHash = CFDataGetMutableBytePtr(dataToHash);
- CFIndex amountToHash = CFDataGetLength(dataToHash);
-
- /* 64 bits cast: amountToHash is the size of an identity +1 , which is currently hardcoded and never more than 2^32 bytes */
- assert((unsigned long)amountToHash<UINT32_MAX); /* Debug check, Correct as long as CFIndex is a signed long and CC_LONG is a uint32_t */
-
- (void) CC_SHA256(bytesToHash, (CC_LONG)amountToHash, buffer);
-
- bzero(bytesToHash, (size_t)amountToHash);
- CFReleaseNull(dataToHash);
-}
-
-void DeriveOTR256BitsFromS(KeyType whichKey, cc_size sN, const cc_unit* s, size_t keySize, uint8_t* key)
-{
- HashMPIWithPrefix(whichKey, sN, s, key);
-}
-
-void DeriveOTR128BitPairFromS(KeyType whichKey, size_t sSize, const cc_unit* s,
- size_t firstKeySize, uint8_t* firstKey,
- size_t secondKeySize, uint8_t* secondKey)
-{
- uint8_t hashBuffer[CCSHA256_OUTPUT_SIZE];
-
- HashMPIWithPrefix(whichKey, sSize, s, hashBuffer);
-
- if (firstKey) {
- firstKeySize = firstKeySize > CCSHA256_OUTPUT_SIZE/2 ? CCSHA256_OUTPUT_SIZE/2 : firstKeySize;
- memcpy(firstKey, hashBuffer, firstKeySize);
- }
- if (secondKey) {
- secondKeySize = secondKeySize > CCSHA256_OUTPUT_SIZE/2 ? CCSHA256_OUTPUT_SIZE/2 : secondKeySize;
- memcpy(secondKey, hashBuffer, secondKeySize);
- }
-
- bzero(hashBuffer, CCSHA256_OUTPUT_SIZE);
-
-}
-
-void DeriveOTR64BitsFromS(KeyType whichKey, size_t sn, const cc_unit* s,
- size_t topKeySize, uint8_t* topKey)
-{
- uint8_t hashBuffer[CCSHA256_OUTPUT_SIZE];
-
- HashMPIWithPrefix(whichKey, sn, s, hashBuffer);
-
- topKeySize = topKeySize > CCSHA256_OUTPUT_SIZE/2 ? CCSHA256_OUTPUT_SIZE/2 : topKeySize;
- memcpy(topKey, hashBuffer, topKeySize);
-
- bzero(hashBuffer, CCSHA256_OUTPUT_SIZE);
-}
-