libsecurity_smime/lib/cmsutil.c

   1 /*
   2  * The contents of this file are subject to the Mozilla Public
   3  * License Version 1.1 (the "License"); you may not use this file
   4  * except in compliance with the License. You may obtain a copy of
   5  * the License at http://www.mozilla.org/MPL/
   6  *
   7  * Software distributed under the License is distributed on an "AS
   8  * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
   9  * implied. See the License for the specific language governing
  10  * rights and limitations under the License.
  11  *
  12  * The Original Code is the Netscape security libraries.
  13  *
  14  * The Initial Developer of the Original Code is Netscape
  15  * Communications Corporation.  Portions created by Netscape are
  16  * Copyright (C) 1994-2000 Netscape Communications Corporation.  All
  17  * Rights Reserved.
  18  *
  19  * Contributor(s):
  20  *
  21  * Alternatively, the contents of this file may be used under the
  22  * terms of the GNU General Public License Version 2 or later (the
  23  * "GPL"), in which case the provisions of the GPL are applicable
  24  * instead of those above.  If you wish to allow use of your
  25  * version of this file only under the terms of the GPL and not to
  26  * allow others to use your version of this file under the MPL,
  27  * indicate your decision by deleting the provisions above and
  28  * replace them with the notice and other provisions required by
  29  * the GPL.  If you do not delete the provisions above, a recipient
  30  * may use your version of this file under either the MPL or the
  31  * GPL.
  32  */
  33
  34 /*
  35  * CMS miscellaneous utility functions.
  36  */
  37
  38 #include <Security/SecCmsEncoder.h> /* @@@ Remove this when we move the Encoder method. */
  39 #include <Security/SecCmsSignerInfo.h>
  40
  41 #include "cmslocal.h"
  42
  43 #include "SecAsn1Item.h"
  44 #include "secoid.h"
  45 #include "cryptohi.h"
  46
  47 #include <security_asn1/secasn1.h>
  48 #include <security_asn1/secerr.h>
  49 #include <security_asn1/secport.h>
  50
  51 #if USE_CDSA_CRYPTO
  52 #include <Security/cssmapi.h>
  53 #include <Security/cssmapple.h>
  54 #include <Security/SecBase.h>
  55
  56 #else
  57 #include <CommonCrypto/CommonDigest.h>
  58 #include <Security/SecBase.h>
  59
  60 #endif
  61
  62
  63 /*
  64  * SecCmsArraySortByDER - sort array of objects by objects' DER encoding
  65  *
  66  * make sure that the order of the objects guarantees valid DER (which must be
  67  * in lexigraphically ascending order for a SET OF); if reordering is necessary it
  68  * will be done in place (in objs).
  69  */
  70 OSStatus
  71 SecCmsArraySortByDER(void **objs, const SecAsn1Template *objtemplate, void **objs2)
  72 {
  73     PRArenaPool *poolp;
  74     int num_objs;
  75     SecAsn1Item **enc_objs;
  76     OSStatus rv = SECFailure;
  77     int i;
  78
  79     if (objs == NULL)                                   /* already sorted */
  80         return SECSuccess;
  81
  82     num_objs = SecCmsArrayCount((void **)objs);
  83     if (num_objs == 0 || num_objs == 1)         /* already sorted. */
  84         return SECSuccess;
  85
  86     poolp = PORT_NewArena (1024);       /* arena for temporaries */
  87     if (poolp == NULL)
  88         return SECFailure;              /* no memory; nothing we can do... */
  89
  90     /*
  91      * Allocate arrays to hold the individual encodings which we will use
  92      * for comparisons and the reordered attributes as they are sorted.
  93      */
  94     // Security check to prevent under-allocation
  95     if (num_objs<0 || num_objs>=(int)((INT_MAX/sizeof(SecAsn1Item *))-1)) {
  96         goto loser;
  97     }
  98     enc_objs = (SecAsn1Item **)PORT_ArenaZAlloc(poolp, (num_objs + 1) * sizeof(SecAsn1Item *));
  99     if (enc_objs == NULL)
 100         goto loser;
 101
 102     /* DER encode each individual object. */
 103     for (i = 0; i < num_objs; i++) {
 104         enc_objs[i] = SEC_ASN1EncodeItem(poolp, NULL, objs[i], objtemplate);
 105         if (enc_objs[i] == NULL)
 106             goto loser;
 107     }
 108     enc_objs[num_objs] = NULL;
 109
 110     /* now compare and sort objs by the order of enc_objs */
 111     SecCmsArraySort((void **)enc_objs, SecCmsUtilDERCompare, objs, objs2);
 112
 113     rv = SECSuccess;
 114
 115 loser:
 116     PORT_FreeArena (poolp, PR_FALSE);
 117     return rv;
 118 }
 119
 120 /*
 121  * SecCmsUtilDERCompare - for use with SecCmsArraySort to
 122  *  sort arrays of SecAsn1Items containing DER
 123  */
 124 int
 125 SecCmsUtilDERCompare(void *a, void *b)
 126 {
 127     SecAsn1Item * der1 = (SecAsn1Item *)a;
 128     SecAsn1Item * der2 = (SecAsn1Item *)b;
 129
 130     /*
 131      * Find the lowest (lexigraphically) encoding.  One that is
 132      * shorter than all the rest is known to be "less" because each
 133      * attribute is of the same type (a SEQUENCE) and so thus the
 134      * first octet of each is the same, and the second octet is
 135      * the length (or the length of the length with the high bit
 136      * set, followed by the length, which also works out to always
 137      * order the shorter first).  Two (or more) that have the
 138      * same length need to be compared byte by byte until a mismatch
 139      * is found.
 140      */
 141     if (der1->Length != der2->Length)
 142         return (der1->Length < der2->Length) ? -1 : 1;
 143
 144 #if 1
 145     return memcmp(der1->Data, der2->Data, der1->Length);
 146 #else
 147     size_t j;
 148     for (j = 0; j < der1->Length; j++) {
 149         if (der1->Data[j] == der2->Data[j])
 150             continue;
 151         return (der1->Data[j] < der2->Data[j]) ? -1 : 1;
 152     }
 153     return 0;
 154 #endif
 155 }
 156
 157 /*
 158  * SecCmsAlgArrayGetIndexByAlgID - find a specific algorithm in an array of
 159  * algorithms.
 160  *
 161  * algorithmArray - array of algorithm IDs
 162  * algid - algorithmid of algorithm to pick
 163  *
 164  * Returns:
 165  *  An integer containing the index of the algorithm in the array or -1 if
 166  *  algorithm was not found.
 167  */
 168 int
 169 SecCmsAlgArrayGetIndexByAlgID(SECAlgorithmID **algorithmArray, SECAlgorithmID *algid)
 170 {
 171     int i;
 172
 173     if (algorithmArray == NULL || algorithmArray[0] == NULL)
 174         return -1;
 175
 176     for (i = 0; algorithmArray[i] != NULL; i++) {
 177         if (SECOID_CompareAlgorithmID(algorithmArray[i], algid) == SECEqual)
 178             break;      /* bingo */
 179     }
 180
 181     if (algorithmArray[i] == NULL)
 182         return -1;      /* not found */
 183
 184     return i;
 185 }
 186
 187 /*
 188  * SecCmsAlgArrayGetIndexByAlgTag - find a specific algorithm in an array of
 189  * algorithms.
 190  *
 191  * algorithmArray - array of algorithm IDs
 192  * algtag - algorithm tag of algorithm to pick
 193  *
 194  * Returns:
 195  *  An integer containing the index of the algorithm in the array or -1 if
 196  *  algorithm was not found.
 197  */
 198 int
 199 SecCmsAlgArrayGetIndexByAlgTag(SECAlgorithmID **algorithmArray,
 200                                  SECOidTag algtag)
 201 {
 202     SECOidData *algid;
 203     int i = -1;
 204
 205     if (algorithmArray == NULL || algorithmArray[0] == NULL)
 206         return i;
 207
 208 #ifdef ORDER_N_SQUARED
 209     for (i = 0; algorithmArray[i] != NULL; i++) {
 210         algid = SECOID_FindOID(&(algorithmArray[i]->algorithm));
 211         if (algid->offset == algtag)
 212             break;      /* bingo */
 213     }
 214 #else
 215     algid = SECOID_FindOIDByTag(algtag);
 216     if (!algid)
 217         return i;
 218     for (i = 0; algorithmArray[i] != NULL; i++) {
 219         if (SECITEM_ItemsAreEqual(&algorithmArray[i]->algorithm, &algid->oid))
 220             break;      /* bingo */
 221     }
 222 #endif
 223
 224     if (algorithmArray[i] == NULL)
 225         return -1;      /* not found */
 226
 227     return i;
 228 }
 229
 230 #if USE_CDSA_CRYPTO
 231 CSSM_CC_HANDLE
 232 #else
 233 void *
 234 #endif
 235 SecCmsUtilGetHashObjByAlgID(SECAlgorithmID *algid)
 236 {
 237     SECOidData *oidData = SECOID_FindOID(&(algid->algorithm));
 238     if (oidData)
 239     {
 240 #if USE_CDSA_CRYPTO
 241         CSSM_ALGORITHMS alg = oidData->cssmAlgorithm;
 242         if (alg)
 243         {
 244             CSSM_CC_HANDLE digobj;
 245             CSSM_CSP_HANDLE cspHandle = SecCspHandleForAlgorithm(alg);
 246
 247             if (!CSSM_CSP_CreateDigestContext(cspHandle, alg, &digobj))
 248                 return digobj;
 249         }
 250 #else
 251         void *digobj = NULL;
 252         switch (oidData->offset) {
 253         case SEC_OID_SHA1:
 254             digobj = calloc(1, sizeof(CC_SHA1_CTX));
 255             CC_SHA1_Init(digobj);
 256             break;
 257         case SEC_OID_MD5:
 258             digobj = calloc(1, sizeof(CC_MD5_CTX));
 259             CC_MD5_Init(digobj);
 260             break;
 261         case SEC_OID_SHA224:
 262             digobj = calloc(1, sizeof(CC_SHA256_CTX));
 263             CC_SHA224_Init(digobj);
 264             break;
 265         case SEC_OID_SHA256:
 266             digobj = calloc(1, sizeof(CC_SHA256_CTX));
 267             CC_SHA256_Init(digobj);
 268             break;
 269         case SEC_OID_SHA384:
 270             digobj = calloc(1, sizeof(CC_SHA512_CTX));
 271             CC_SHA384_Init(digobj);
 272             break;
 273         case SEC_OID_SHA512:
 274             digobj = calloc(1, sizeof(CC_SHA512_CTX));
 275             CC_SHA512_Init(digobj);
 276             break;
 277         default:
 278             break;
 279         }
 280         return digobj;
 281 #endif
 282     }
 283
 284     return 0;
 285 }
 286
 287 /*
 288  * XXX I would *really* like to not have to do this, but the current
 289  * signing interface gives me little choice.
 290  */
 291 SECOidTag
 292 SecCmsUtilMakeSignatureAlgorithm(SECOidTag hashalg, SECOidTag encalg)
 293 {
 294     switch (encalg) {
 295       case SEC_OID_PKCS1_RSA_ENCRYPTION:
 296         switch (hashalg) {
 297           case SEC_OID_MD2:
 298             return SEC_OID_PKCS1_MD2_WITH_RSA_ENCRYPTION;
 299           case SEC_OID_MD5:
 300             return SEC_OID_PKCS1_MD5_WITH_RSA_ENCRYPTION;
 301           case SEC_OID_SHA1:
 302             return SEC_OID_PKCS1_SHA1_WITH_RSA_ENCRYPTION;
 303           case SEC_OID_SHA256:
 304             return SEC_OID_PKCS1_SHA256_WITH_RSA_ENCRYPTION;
 305           case SEC_OID_SHA384:
 306             return SEC_OID_PKCS1_SHA384_WITH_RSA_ENCRYPTION;
 307           case SEC_OID_SHA512:
 308             return SEC_OID_PKCS1_SHA512_WITH_RSA_ENCRYPTION;
 309           default:
 310             return SEC_OID_UNKNOWN;
 311         }
 312       case SEC_OID_ANSIX9_DSA_SIGNATURE:
 313       case SEC_OID_MISSI_KEA_DSS:
 314       case SEC_OID_MISSI_DSS:
 315         switch (hashalg) {
 316           case SEC_OID_SHA1:
 317             return SEC_OID_ANSIX9_DSA_SIGNATURE_WITH_SHA1_DIGEST;
 318           default:
 319             return SEC_OID_UNKNOWN;
 320         }
 321       default:
 322         break;
 323     }
 324
 325     return encalg;              /* maybe it is already the right algid */
 326 }
 327
 328 const SecAsn1Template *
 329 SecCmsUtilGetTemplateByTypeTag(SECOidTag type)
 330 {
 331     const SecAsn1Template *template;
 332     extern const SecAsn1Template SecCmsSignedDataTemplate[];
 333     extern const SecAsn1Template SecCmsEnvelopedDataTemplate[];
 334     extern const SecAsn1Template SecCmsEncryptedDataTemplate[];
 335     extern const SecAsn1Template SecCmsDigestedDataTemplate[];
 336
 337     switch (type) {
 338     case SEC_OID_PKCS7_SIGNED_DATA:
 339         template = SecCmsSignedDataTemplate;
 340         break;
 341     case SEC_OID_PKCS7_ENVELOPED_DATA:
 342         template = SecCmsEnvelopedDataTemplate;
 343         break;
 344     case SEC_OID_PKCS7_ENCRYPTED_DATA:
 345         template = SecCmsEncryptedDataTemplate;
 346         break;
 347     case SEC_OID_PKCS7_DIGESTED_DATA:
 348         template = SecCmsDigestedDataTemplate;
 349         break;
 350     default:
 351     case SEC_OID_PKCS7_DATA:
 352         template = NULL;
 353         break;
 354     }
 355     return template;
 356 }
 357
 358 size_t
 359 SecCmsUtilGetSizeByTypeTag(SECOidTag type)
 360 {
 361     size_t size;
 362
 363     switch (type) {
 364     case SEC_OID_PKCS7_SIGNED_DATA:
 365         size = sizeof(SecCmsSignedData);
 366         break;
 367     case SEC_OID_PKCS7_ENVELOPED_DATA:
 368         size = sizeof(SecCmsEnvelopedData);
 369         break;
 370     case SEC_OID_PKCS7_ENCRYPTED_DATA:
 371         size = sizeof(SecCmsEncryptedData);
 372         break;
 373     case SEC_OID_PKCS7_DIGESTED_DATA:
 374         size = sizeof(SecCmsDigestedData);
 375         break;
 376     default:
 377     case SEC_OID_PKCS7_DATA:
 378         size = 0;
 379         break;
 380     }
 381     return size;
 382 }
 383
 384 SecCmsContentInfoRef
 385 SecCmsContentGetContentInfo(void *msg, SECOidTag type)
 386 {
 387     SecCmsContent c;
 388     SecCmsContentInfoRef cinfo;
 389
 390     if (!msg)
 391         return NULL;
 392     c.pointer = msg;
 393     switch (type) {
 394     case SEC_OID_PKCS7_SIGNED_DATA:
 395         cinfo = &(c.signedData->contentInfo);
 396         break;
 397     case SEC_OID_PKCS7_ENVELOPED_DATA:
 398         cinfo = &(c.envelopedData->contentInfo);
 399         break;
 400     case SEC_OID_PKCS7_ENCRYPTED_DATA:
 401         cinfo = &(c.encryptedData->contentInfo);
 402         break;
 403     case SEC_OID_PKCS7_DIGESTED_DATA:
 404         cinfo = &(c.digestedData->contentInfo);
 405         break;
 406     default:
 407         cinfo = NULL;
 408     }
 409     return cinfo;
 410 }
 411
 412 // @@@ Return CFStringRef and do localization.
 413 const char *
 414 SecCmsUtilVerificationStatusToString(SecCmsVerificationStatus vs)
 415 {
 416     switch (vs) {
 417     case SecCmsVSUnverified:                    return "Unverified";
 418     case SecCmsVSGoodSignature:                 return "GoodSignature";
 419     case SecCmsVSBadSignature:                  return "BadSignature";
 420     case SecCmsVSDigestMismatch:                return "DigestMismatch";
 421     case SecCmsVSSigningCertNotFound:           return "SigningCertNotFound";
 422     case SecCmsVSSigningCertNotTrusted:         return "SigningCertNotTrusted";
 423     case SecCmsVSSignatureAlgorithmUnknown:     return "SignatureAlgorithmUnknown";
 424     case SecCmsVSSignatureAlgorithmUnsupported: return "SignatureAlgorithmUnsupported";
 425     case SecCmsVSMalformedSignature:            return "MalformedSignature";
 426     case SecCmsVSProcessingError:               return "ProcessingError";
 427     default:                                    return "Unknown";
 428     }
 429 }