crypto/cms/cms_sd.c

   1 /* crypto/cms/cms_sd.c */
   2 /* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
   3  * project.
   4  */
   5 /* ====================================================================
   6  * Copyright (c) 2008 The OpenSSL Project.  All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  *
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  *
  15  * 2. Redistributions in binary form must reproduce the above copyright
  16  *    notice, this list of conditions and the following disclaimer in
  17  *    the documentation and/or other materials provided with the
  18  *    distribution.
  19  *
  20  * 3. All advertising materials mentioning features or use of this
  21  *    software must display the following acknowledgment:
  22  *    "This product includes software developed by the OpenSSL Project
  23  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
  24  *
  25  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
  26  *    endorse or promote products derived from this software without
  27  *    prior written permission. For written permission, please contact
  28  *    licensing@OpenSSL.org.
  29  *
  30  * 5. Products derived from this software may not be called "OpenSSL"
  31  *    nor may "OpenSSL" appear in their names without prior written
  32  *    permission of the OpenSSL Project.
  33  *
  34  * 6. Redistributions of any form whatsoever must retain the following
  35  *    acknowledgment:
  36  *    "This product includes software developed by the OpenSSL Project
  37  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
  38  *
  39  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
  40  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  41  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  42  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
  43  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  44  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  45  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  46  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  48  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  49  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  50  * OF THE POSSIBILITY OF SUCH DAMAGE.
  51  * ====================================================================
  52  */
  53
  54 #include "cryptlib.h"
  55 #include <openssl/asn1t.h>
  56 #include <openssl/pem.h>
  57 #include <openssl/x509v3.h>
  58 #include <openssl/err.h>
  59 #include <openssl/cms.h>
  60 #include "cms_lcl.h"
  61 #include "asn1_locl.h"
  62
  63 /* CMS SignedData Utilities */
  64
  65 DECLARE_ASN1_ITEM(CMS_SignedData)
  66
  67 static CMS_SignedData *cms_get0_signed(CMS_ContentInfo *cms)
  68         {
  69         if (OBJ_obj2nid(cms->contentType) != NID_pkcs7_signed)
  70                 {
  71                 CMSerr(CMS_F_CMS_GET0_SIGNED, CMS_R_CONTENT_TYPE_NOT_SIGNED_DATA);
  72                 return NULL;
  73                 }
  74         return cms->d.signedData;
  75         }
  76
  77 static CMS_SignedData *cms_signed_data_init(CMS_ContentInfo *cms)
  78         {
  79         if (cms->d.other == NULL)
  80                 {
  81                 cms->d.signedData = M_ASN1_new_of(CMS_SignedData);
  82                 if (!cms->d.signedData)
  83                         {
  84                         CMSerr(CMS_F_CMS_SIGNED_DATA_INIT, ERR_R_MALLOC_FAILURE);
  85                         return NULL;
  86                         }
  87                 cms->d.signedData->version = 1;
  88                 cms->d.signedData->encapContentInfo->eContentType =
  89                                                 OBJ_nid2obj(NID_pkcs7_data);
  90                 cms->d.signedData->encapContentInfo->partial = 1;
  91                 ASN1_OBJECT_free(cms->contentType);
  92                 cms->contentType = OBJ_nid2obj(NID_pkcs7_signed);
  93                 return cms->d.signedData;
  94                 }
  95         return cms_get0_signed(cms);
  96         }
  97
  98 /* Just initialize SignedData e.g. for certs only structure */
  99
 100 int CMS_SignedData_init(CMS_ContentInfo *cms)
 101         {
 102         if (cms_signed_data_init(cms))
 103                 return 1;
 104         else
 105                 return 0;
 106         }
 107
 108 /* Check structures and fixup version numbers (if necessary) */
 109
 110 static void cms_sd_set_version(CMS_SignedData *sd)
 111         {
 112         int i;
 113         CMS_CertificateChoices *cch;
 114         CMS_RevocationInfoChoice *rch;
 115         CMS_SignerInfo *si;
 116
 117         for (i = 0; i < sk_CMS_CertificateChoices_num(sd->certificates); i++)
 118                 {
 119                 cch = sk_CMS_CertificateChoices_value(sd->certificates, i);
 120                 if (cch->type == CMS_CERTCHOICE_OTHER)
 121                         {
 122                         if (sd->version < 5)
 123                                 sd->version = 5;
 124                         }
 125                 else if (cch->type == CMS_CERTCHOICE_V2ACERT)
 126                         {
 127                         if (sd->version < 4)
 128                                 sd->version = 4;
 129                         }
 130                 else if (cch->type == CMS_CERTCHOICE_V1ACERT)
 131                         {
 132                         if (sd->version < 3)
 133                                 sd->version = 3;
 134                         }
 135                 }
 136
 137         for (i = 0; i < sk_CMS_RevocationInfoChoice_num(sd->crls); i++)
 138                 {
 139                 rch = sk_CMS_RevocationInfoChoice_value(sd->crls, i);
 140                 if (rch->type == CMS_REVCHOICE_OTHER)
 141                         {
 142                         if (sd->version < 5)
 143                                 sd->version = 5;
 144                         }
 145                 }
 146
 147         if ((OBJ_obj2nid(sd->encapContentInfo->eContentType) != NID_pkcs7_data)
 148                         && (sd->version < 3))
 149                 sd->version = 3;
 150
 151         for (i = 0; i < sk_CMS_SignerInfo_num(sd->signerInfos); i++)
 152                 {
 153                 si = sk_CMS_SignerInfo_value(sd->signerInfos, i);
 154                 if (si->sid->type == CMS_SIGNERINFO_KEYIDENTIFIER)
 155                         {
 156                         if (si->version < 3)
 157                                 si->version = 3;
 158                         if (sd->version < 3)
 159                                 sd->version = 3;
 160                         }
 161                 else
 162                         sd->version = 1;
 163                 }
 164
 165         if (sd->version < 1)
 166                 sd->version = 1;
 167
 168         }
 169
 170 /* Copy an existing messageDigest value */
 171
 172 static int cms_copy_messageDigest(CMS_ContentInfo *cms, CMS_SignerInfo *si)
 173         {
 174         STACK_OF(CMS_SignerInfo) *sinfos;
 175         CMS_SignerInfo *sitmp;
 176         int i;
 177         sinfos = CMS_get0_SignerInfos(cms);
 178         for (i = 0; i < sk_CMS_SignerInfo_num(sinfos); i++)
 179                 {
 180                 ASN1_OCTET_STRING *messageDigest;
 181                 sitmp = sk_CMS_SignerInfo_value(sinfos, i);
 182                 if (sitmp == si)
 183                         continue;
 184                 if (CMS_signed_get_attr_count(sitmp) < 0)
 185                         continue;
 186                 if (OBJ_cmp(si->digestAlgorithm->algorithm,
 187                                 sitmp->digestAlgorithm->algorithm))
 188                         continue;
 189                 messageDigest = CMS_signed_get0_data_by_OBJ(sitmp,
 190                                         OBJ_nid2obj(NID_pkcs9_messageDigest),
 191                                         -3, V_ASN1_OCTET_STRING);
 192                 if (!messageDigest)
 193                         {
 194                         CMSerr(CMS_F_CMS_COPY_MESSAGEDIGEST,
 195                                 CMS_R_ERROR_READING_MESSAGEDIGEST_ATTRIBUTE);
 196                         return 0;
 197                         }
 198
 199                 if (CMS_signed_add1_attr_by_NID(si, NID_pkcs9_messageDigest,
 200                                                 V_ASN1_OCTET_STRING,
 201                                                 messageDigest, -1))
 202                         return 1;
 203                 else
 204                         return 0;
 205                 }
 206                 CMSerr(CMS_F_CMS_COPY_MESSAGEDIGEST, CMS_R_NO_MATCHING_DIGEST);
 207                 return 0;
 208         }
 209
 210 int cms_set1_SignerIdentifier(CMS_SignerIdentifier *sid, X509 *cert, int type)
 211         {
 212         switch(type)
 213                 {
 214                 case CMS_SIGNERINFO_ISSUER_SERIAL:
 215                 sid->d.issuerAndSerialNumber =
 216                         M_ASN1_new_of(CMS_IssuerAndSerialNumber);
 217                 if (!sid->d.issuerAndSerialNumber)
 218                         goto merr;
 219                 if (!X509_NAME_set(&sid->d.issuerAndSerialNumber->issuer,
 220                                         X509_get_issuer_name(cert)))
 221                         goto merr;
 222                 if (!ASN1_STRING_copy(
 223                         sid->d.issuerAndSerialNumber->serialNumber,
 224                                 X509_get_serialNumber(cert)))
 225                         goto merr;
 226                 break;
 227
 228                 case CMS_SIGNERINFO_KEYIDENTIFIER:
 229                 if (!cert->skid)
 230                         {
 231                         CMSerr(CMS_F_CMS_SET1_SIGNERIDENTIFIER,
 232                                         CMS_R_CERTIFICATE_HAS_NO_KEYID);
 233                         return 0;
 234                         }
 235                 sid->d.subjectKeyIdentifier = ASN1_STRING_dup(cert->skid);
 236                 if (!sid->d.subjectKeyIdentifier)
 237                         goto merr;
 238                 break;
 239
 240                 default:
 241                 CMSerr(CMS_F_CMS_SET1_SIGNERIDENTIFIER, CMS_R_UNKNOWN_ID);
 242                 return 0;
 243                 }
 244
 245         sid->type = type;
 246
 247         return 1;
 248
 249         merr:
 250         CMSerr(CMS_F_CMS_SET1_SIGNERIDENTIFIER, ERR_R_MALLOC_FAILURE);
 251         return 0;
 252
 253         }
 254
 255 int cms_SignerIdentifier_get0_signer_id(CMS_SignerIdentifier *sid,
 256                                         ASN1_OCTET_STRING **keyid,
 257                                         X509_NAME **issuer, ASN1_INTEGER **sno)
 258         {
 259         if (sid->type == CMS_SIGNERINFO_ISSUER_SERIAL)
 260                 {
 261                 if (issuer)
 262                         *issuer = sid->d.issuerAndSerialNumber->issuer;
 263                 if (sno)
 264                         *sno = sid->d.issuerAndSerialNumber->serialNumber;
 265                 }
 266         else if (sid->type == CMS_SIGNERINFO_KEYIDENTIFIER)
 267                 {
 268                 if (keyid)
 269                         *keyid = sid->d.subjectKeyIdentifier;
 270                 }
 271         else
 272                 return 0;
 273         return 1;
 274         }
 275
 276 int cms_SignerIdentifier_cert_cmp(CMS_SignerIdentifier *sid, X509 *cert)
 277         {
 278         int ret;
 279         if (sid->type == CMS_SIGNERINFO_ISSUER_SERIAL)
 280                 {
 281                 ret = X509_NAME_cmp(sid->d.issuerAndSerialNumber->issuer,
 282                                         X509_get_issuer_name(cert));
 283                 if (ret)
 284                         return ret;
 285                 return ASN1_INTEGER_cmp(sid->d.issuerAndSerialNumber->serialNumber,
 286                                         X509_get_serialNumber(cert));
 287                 }
 288         else if (sid->type == CMS_SIGNERINFO_KEYIDENTIFIER)
 289                 {
 290                 X509_check_purpose(cert, -1, -1);
 291                 if (!cert->skid)
 292                         return -1;
 293                 return ASN1_OCTET_STRING_cmp(sid->d.subjectKeyIdentifier,
 294                                                         cert->skid);
 295                 }
 296         else
 297                 return -1;
 298         }
 299
 300 CMS_SignerInfo *CMS_add1_signer(CMS_ContentInfo *cms,
 301                         X509 *signer, EVP_PKEY *pk, const EVP_MD *md,
 302                         unsigned int flags)
 303         {
 304         CMS_SignedData *sd;
 305         CMS_SignerInfo *si = NULL;
 306         X509_ALGOR *alg;
 307         int i, type;
 308         if(!X509_check_private_key(signer, pk))
 309                 {
 310                 CMSerr(CMS_F_CMS_ADD1_SIGNER,
 311                         CMS_R_PRIVATE_KEY_DOES_NOT_MATCH_CERTIFICATE);
 312                 return NULL;
 313                 }
 314         sd = cms_signed_data_init(cms);
 315         if (!sd)
 316                 goto err;
 317         si = M_ASN1_new_of(CMS_SignerInfo);
 318         if (!si)
 319                 goto merr;
 320         X509_check_purpose(signer, -1, -1);
 321
 322         CRYPTO_add(&pk->references, 1, CRYPTO_LOCK_EVP_PKEY);
 323         CRYPTO_add(&signer->references, 1, CRYPTO_LOCK_X509);
 324
 325         si->pkey = pk;
 326         si->signer = signer;
 327
 328         if (flags & CMS_USE_KEYID)
 329                 {
 330                 si->version = 3;
 331                 if (sd->version < 3)
 332                         sd->version = 3;
 333                 type = CMS_SIGNERINFO_KEYIDENTIFIER;
 334                 }
 335         else
 336                 {
 337                 type = CMS_SIGNERINFO_ISSUER_SERIAL;
 338                 si->version = 1;
 339                 }
 340
 341         if (!cms_set1_SignerIdentifier(si->sid, signer, type))
 342                 goto err;
 343
 344         if (md == NULL)
 345                 {
 346                 int def_nid;
 347                 if (EVP_PKEY_get_default_digest_nid(pk, &def_nid) <= 0)
 348                         goto err;
 349                 md = EVP_get_digestbynid(def_nid);
 350                 if (md == NULL)
 351                         {
 352                         CMSerr(CMS_F_CMS_ADD1_SIGNER, CMS_R_NO_DEFAULT_DIGEST);
 353                         goto err;
 354                         }
 355                 }
 356
 357         if (!md)
 358                 {
 359                 CMSerr(CMS_F_CMS_ADD1_SIGNER, CMS_R_NO_DIGEST_SET);
 360                 goto err;
 361                 }
 362
 363         cms_DigestAlgorithm_set(si->digestAlgorithm, md);
 364
 365         /* See if digest is present in digestAlgorithms */
 366         for (i = 0; i < sk_X509_ALGOR_num(sd->digestAlgorithms); i++)
 367                 {
 368                 ASN1_OBJECT *aoid;
 369                 alg = sk_X509_ALGOR_value(sd->digestAlgorithms, i);
 370                 X509_ALGOR_get0(&aoid, NULL, NULL, alg);
 371                 if (OBJ_obj2nid(aoid) == EVP_MD_type(md))
 372                         break;
 373                 }
 374
 375         if (i == sk_X509_ALGOR_num(sd->digestAlgorithms))
 376                 {
 377                 alg = X509_ALGOR_new();
 378                 if (!alg)
 379                         goto merr;
 380                 cms_DigestAlgorithm_set(alg, md);
 381                 if (!sk_X509_ALGOR_push(sd->digestAlgorithms, alg))
 382                         {
 383                         X509_ALGOR_free(alg);
 384                         goto merr;
 385                         }
 386                 }
 387
 388         if (pk->ameth && pk->ameth->pkey_ctrl)
 389                 {
 390                 i = pk->ameth->pkey_ctrl(pk, ASN1_PKEY_CTRL_CMS_SIGN,
 391                                                 0, si);
 392                 if (i == -2)
 393                         {
 394                         CMSerr(CMS_F_CMS_ADD1_SIGNER,
 395                                 CMS_R_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
 396                         goto err;
 397                         }
 398                 if (i <= 0)
 399                         {
 400                         CMSerr(CMS_F_CMS_ADD1_SIGNER, CMS_R_CTRL_FAILURE);
 401                         goto err;
 402                         }
 403                 }
 404
 405         if (!(flags & CMS_NOATTR))
 406                 {
 407                 /* Copy content type across */
 408                 ASN1_OBJECT *ctype =
 409                                 OBJ_dup(sd->encapContentInfo->eContentType);
 410                 if (!ctype)
 411                         goto merr;
 412                 i = CMS_signed_add1_attr_by_NID(si, NID_pkcs9_contentType,
 413                                                 V_ASN1_OBJECT, ctype, -1);
 414                 ASN1_OBJECT_free(ctype);
 415                 if (i <= 0)
 416                         goto merr;
 417                 if (!(flags & CMS_NOSMIMECAP))
 418                         {
 419                         STACK_OF(X509_ALGOR) *smcap = NULL;
 420                         i = CMS_add_standard_smimecap(&smcap);
 421                         if (i)
 422                                 i = CMS_add_smimecap(si, smcap);
 423                         sk_X509_ALGOR_pop_free(smcap, X509_ALGOR_free);
 424                         if (!i)
 425                                 goto merr;
 426                         }
 427                 if (flags & CMS_REUSE_DIGEST)
 428                         {
 429                         if (!cms_copy_messageDigest(cms, si))
 430                                 goto err;
 431                         if (!(flags & CMS_PARTIAL) &&
 432                                         !CMS_SignerInfo_sign(si))
 433                                 goto err;
 434                         }
 435                 }
 436
 437         if (!(flags & CMS_NOCERTS))
 438                 {
 439                 /* NB ignore -1 return for duplicate cert */
 440                 if (!CMS_add1_cert(cms, signer))
 441                         goto merr;
 442                 }
 443
 444         if (!sd->signerInfos)
 445                 sd->signerInfos = sk_CMS_SignerInfo_new_null();
 446         if (!sd->signerInfos ||
 447                 !sk_CMS_SignerInfo_push(sd->signerInfos, si))
 448                 goto merr;
 449
 450         return si;
 451
 452         merr:
 453         CMSerr(CMS_F_CMS_ADD1_SIGNER, ERR_R_MALLOC_FAILURE);
 454         err:
 455         if (si)
 456                 M_ASN1_free_of(si, CMS_SignerInfo);
 457         return NULL;
 458
 459         }
 460
 461 static int cms_add1_signingTime(CMS_SignerInfo *si, ASN1_TIME *t)
 462         {
 463         ASN1_TIME *tt;
 464         int r = 0;
 465         if (t)
 466                 tt = t;
 467         else
 468                 tt = X509_gmtime_adj(NULL, 0);
 469
 470         if (!tt)
 471                 goto merr;
 472
 473         if (CMS_signed_add1_attr_by_NID(si, NID_pkcs9_signingTime,
 474                                                 tt->type, tt, -1) <= 0)
 475                 goto merr;
 476
 477         r = 1;
 478
 479         merr:
 480
 481         if (!t)
 482                 ASN1_TIME_free(tt);
 483
 484         if (!r)
 485                 CMSerr(CMS_F_CMS_ADD1_SIGNINGTIME, ERR_R_MALLOC_FAILURE);
 486
 487         return r;
 488
 489         }
 490
 491 STACK_OF(CMS_SignerInfo) *CMS_get0_SignerInfos(CMS_ContentInfo *cms)
 492         {
 493         CMS_SignedData *sd;
 494         sd = cms_get0_signed(cms);
 495         if (!sd)
 496                 return NULL;
 497         return sd->signerInfos;
 498         }
 499
 500 STACK_OF(X509) *CMS_get0_signers(CMS_ContentInfo *cms)
 501         {
 502         STACK_OF(X509) *signers = NULL;
 503         STACK_OF(CMS_SignerInfo) *sinfos;
 504         CMS_SignerInfo *si;
 505         int i;
 506         sinfos = CMS_get0_SignerInfos(cms);
 507         for (i = 0; i < sk_CMS_SignerInfo_num(sinfos); i++)
 508                 {
 509                 si = sk_CMS_SignerInfo_value(sinfos, i);
 510                 if (si->signer)
 511                         {
 512                         if (!signers)
 513                                 {
 514                                 signers = sk_X509_new_null();
 515                                 if (!signers)
 516                                         return NULL;
 517                                 }
 518                         if (!sk_X509_push(signers, si->signer))
 519                                 {
 520                                 sk_X509_free(signers);
 521                                 return NULL;
 522                                 }
 523                         }
 524                 }
 525         return signers;
 526         }
 527
 528 void CMS_SignerInfo_set1_signer_cert(CMS_SignerInfo *si, X509 *signer)
 529         {
 530         if (signer)
 531                 {
 532                 CRYPTO_add(&signer->references, 1, CRYPTO_LOCK_X509);
 533                 if (si->pkey)
 534                         EVP_PKEY_free(si->pkey);
 535                 si->pkey = X509_get_pubkey(signer);
 536                 }
 537         if (si->signer)
 538                 X509_free(si->signer);
 539         si->signer = signer;
 540         }
 541
 542 int CMS_SignerInfo_get0_signer_id(CMS_SignerInfo *si,
 543                                         ASN1_OCTET_STRING **keyid,
 544                                         X509_NAME **issuer, ASN1_INTEGER **sno)
 545         {
 546         return cms_SignerIdentifier_get0_signer_id(si->sid, keyid, issuer, sno);
 547         }
 548
 549 int CMS_SignerInfo_cert_cmp(CMS_SignerInfo *si, X509 *cert)
 550         {
 551         return cms_SignerIdentifier_cert_cmp(si->sid, cert);
 552         }
 553
 554 int CMS_set1_signers_certs(CMS_ContentInfo *cms, STACK_OF(X509) *scerts,
 555                                 unsigned int flags)
 556         {
 557         CMS_SignedData *sd;
 558         CMS_SignerInfo *si;
 559         CMS_CertificateChoices *cch;
 560         STACK_OF(CMS_CertificateChoices) *certs;
 561         X509 *x;
 562         int i, j;
 563         int ret = 0;
 564         sd = cms_get0_signed(cms);
 565         if (!sd)
 566                 return -1;
 567         certs = sd->certificates;
 568         for (i = 0; i < sk_CMS_SignerInfo_num(sd->signerInfos); i++)
 569                 {
 570                 si = sk_CMS_SignerInfo_value(sd->signerInfos, i);
 571                 if (si->signer)
 572                         continue;
 573
 574                 for (j = 0; j < sk_X509_num(scerts); j++)
 575                         {
 576                         x = sk_X509_value(scerts, j);
 577                         if (CMS_SignerInfo_cert_cmp(si, x) == 0)
 578                                 {
 579                                 CMS_SignerInfo_set1_signer_cert(si, x);
 580                                 ret++;
 581                                 break;
 582                                 }
 583                         }
 584
 585                 if (si->signer || (flags & CMS_NOINTERN))
 586                         continue;
 587
 588                 for (j = 0; j < sk_CMS_CertificateChoices_num(certs); j++)
 589                         {
 590                         cch = sk_CMS_CertificateChoices_value(certs, j);
 591                         if (cch->type != 0)
 592                                 continue;
 593                         x = cch->d.certificate;
 594                         if (CMS_SignerInfo_cert_cmp(si, x) == 0)
 595                                 {
 596                                 CMS_SignerInfo_set1_signer_cert(si, x);
 597                                 ret++;
 598                                 break;
 599                                 }
 600                         }
 601                 }
 602         return ret;
 603         }
 604
 605 void CMS_SignerInfo_get0_algs(CMS_SignerInfo *si, EVP_PKEY **pk, X509 **signer,
 606                                         X509_ALGOR **pdig, X509_ALGOR **psig)
 607         {
 608         if (pk)
 609                 *pk = si->pkey;
 610         if (signer)
 611                 *signer = si->signer;
 612         if (pdig)
 613                 *pdig = si->digestAlgorithm;
 614         if (psig)
 615                 *psig = si->signatureAlgorithm;
 616         }
 617
 618 static int cms_SignerInfo_content_sign(CMS_SignerInfo *si, BIO *chain)
 619         {
 620         EVP_MD_CTX mctx;
 621         int r = 0;
 622         EVP_MD_CTX_init(&mctx);
 623
 624
 625         if (!si->pkey)
 626                 {
 627                 CMSerr(CMS_F_CMS_SIGNERINFO_CONTENT_SIGN, CMS_R_NO_PRIVATE_KEY);
 628                 return 0;
 629                 }
 630
 631         if (!cms_DigestAlgorithm_find_ctx(&mctx, chain, si->digestAlgorithm))
 632                 goto err;
 633
 634         /* If any signed attributes calculate and add messageDigest attribute */
 635
 636         if (CMS_signed_get_attr_count(si) >= 0)
 637                 {
 638                 unsigned char md[EVP_MAX_MD_SIZE];
 639                 unsigned int mdlen;
 640                 EVP_DigestFinal_ex(&mctx, md, &mdlen);
 641                 if (!CMS_signed_add1_attr_by_NID(si, NID_pkcs9_messageDigest,
 642                                                 V_ASN1_OCTET_STRING,
 643                                                 md, mdlen))
 644                         goto err;
 645                 if (!CMS_SignerInfo_sign(si))
 646                         goto err;
 647                 }
 648         else
 649                 {
 650                 unsigned char *sig;
 651                 unsigned int siglen;
 652                 sig = OPENSSL_malloc(EVP_PKEY_size(si->pkey));
 653                 if (!sig)
 654                         {
 655                         CMSerr(CMS_F_CMS_SIGNERINFO_CONTENT_SIGN,
 656                                         ERR_R_MALLOC_FAILURE);
 657                         goto err;
 658                         }
 659                 if (!EVP_SignFinal(&mctx, sig, &siglen, si->pkey))
 660                         {
 661                         CMSerr(CMS_F_CMS_SIGNERINFO_CONTENT_SIGN,
 662                                         CMS_R_SIGNFINAL_ERROR);
 663                         OPENSSL_free(sig);
 664                         goto err;
 665                         }
 666                 ASN1_STRING_set0(si->signature, sig, siglen);
 667                 }
 668
 669         r = 1;
 670
 671         err:
 672         EVP_MD_CTX_cleanup(&mctx);
 673         return r;
 674
 675         }
 676
 677 int cms_SignedData_final(CMS_ContentInfo *cms, BIO *chain)
 678         {
 679         STACK_OF(CMS_SignerInfo) *sinfos;
 680         CMS_SignerInfo *si;
 681         int i;
 682         sinfos = CMS_get0_SignerInfos(cms);
 683         for (i = 0; i < sk_CMS_SignerInfo_num(sinfos); i++)
 684                 {
 685                 si = sk_CMS_SignerInfo_value(sinfos, i);
 686                 if (!cms_SignerInfo_content_sign(si, chain))
 687                         return 0;
 688                 }
 689         cms->d.signedData->encapContentInfo->partial = 0;
 690         return 1;
 691         }
 692
 693 int CMS_SignerInfo_sign(CMS_SignerInfo *si)
 694         {
 695         EVP_MD_CTX mctx;
 696         EVP_PKEY_CTX *pctx;
 697         unsigned char *abuf = NULL;
 698         int alen;
 699         size_t siglen;
 700         const EVP_MD *md = NULL;
 701
 702         md = EVP_get_digestbyobj(si->digestAlgorithm->algorithm);
 703         if (md == NULL)
 704                 return 0;
 705
 706         EVP_MD_CTX_init(&mctx);
 707
 708         if (CMS_signed_get_attr_by_NID(si, NID_pkcs9_signingTime, -1) < 0)
 709                 {
 710                 if (!cms_add1_signingTime(si, NULL))
 711                         goto err;
 712                 }
 713
 714         if (EVP_DigestSignInit(&mctx, &pctx, md, NULL, si->pkey) <= 0)
 715                 goto err;
 716
 717         if (EVP_PKEY_CTX_ctrl(pctx, -1, EVP_PKEY_OP_SIGN,
 718                                 EVP_PKEY_CTRL_CMS_SIGN, 0, si) <= 0)
 719                 {
 720                 CMSerr(CMS_F_CMS_SIGNERINFO_SIGN, CMS_R_CTRL_ERROR);
 721                 goto err;
 722                 }
 723
 724         alen = ASN1_item_i2d((ASN1_VALUE *)si->signedAttrs,&abuf,
 725                                 ASN1_ITEM_rptr(CMS_Attributes_Sign));
 726         if(!abuf)
 727                 goto err;
 728         if (EVP_DigestSignUpdate(&mctx, abuf, alen) <= 0)
 729                 goto err;
 730         if (EVP_DigestSignFinal(&mctx, NULL, &siglen) <= 0)
 731                 goto err;
 732         OPENSSL_free(abuf);
 733         abuf = OPENSSL_malloc(siglen);
 734         if(!abuf)
 735                 goto err;
 736         if (EVP_DigestSignFinal(&mctx, abuf, &siglen) <= 0)
 737                 goto err;
 738
 739         if (EVP_PKEY_CTX_ctrl(pctx, -1, EVP_PKEY_OP_SIGN,
 740                                 EVP_PKEY_CTRL_CMS_SIGN, 1, si) <= 0)
 741                 {
 742                 CMSerr(CMS_F_CMS_SIGNERINFO_SIGN, CMS_R_CTRL_ERROR);
 743                 goto err;
 744                 }
 745
 746         EVP_MD_CTX_cleanup(&mctx);
 747
 748         ASN1_STRING_set0(si->signature, abuf, siglen);
 749
 750         return 1;
 751
 752         err:
 753         if (abuf)
 754                 OPENSSL_free(abuf);
 755         EVP_MD_CTX_cleanup(&mctx);
 756         return 0;
 757
 758         }
 759
 760 int CMS_SignerInfo_verify(CMS_SignerInfo *si)
 761         {
 762         EVP_MD_CTX mctx;
 763         EVP_PKEY_CTX *pctx;
 764         unsigned char *abuf = NULL;
 765         int alen, r = -1;
 766         const EVP_MD *md = NULL;
 767
 768         if (!si->pkey)
 769                 {
 770                 CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY, CMS_R_NO_PUBLIC_KEY);
 771                 return -1;
 772                 }
 773
 774         md = EVP_get_digestbyobj(si->digestAlgorithm->algorithm);
 775         if (md == NULL)
 776                 return -1;
 777         EVP_MD_CTX_init(&mctx);
 778         if (EVP_DigestVerifyInit(&mctx, &pctx, md, NULL, si->pkey) <= 0)
 779                 goto err;
 780
 781         alen = ASN1_item_i2d((ASN1_VALUE *)si->signedAttrs,&abuf,
 782                                 ASN1_ITEM_rptr(CMS_Attributes_Verify));
 783         if(!abuf)
 784                 goto err;
 785         r = EVP_DigestVerifyUpdate(&mctx, abuf, alen);
 786         OPENSSL_free(abuf);
 787         if (r <= 0)
 788                 {
 789                 r = -1;
 790                 goto err;
 791                 }
 792         r = EVP_DigestVerifyFinal(&mctx,
 793                         si->signature->data, si->signature->length);
 794         if (!r)
 795                 CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY, CMS_R_VERIFICATION_FAILURE);
 796         err:
 797         EVP_MD_CTX_cleanup(&mctx);
 798         return r;
 799         }
 800
 801 /* Create a chain of digest BIOs from a CMS ContentInfo */
 802
 803 BIO *cms_SignedData_init_bio(CMS_ContentInfo *cms)
 804         {
 805         int i;
 806         CMS_SignedData *sd;
 807         BIO *chain = NULL;
 808         sd = cms_get0_signed(cms);
 809         if (!sd)
 810                 return NULL;
 811         if (cms->d.signedData->encapContentInfo->partial)
 812                 cms_sd_set_version(sd);
 813         for (i = 0; i < sk_X509_ALGOR_num(sd->digestAlgorithms); i++)
 814                 {
 815                 X509_ALGOR *digestAlgorithm;
 816                 BIO *mdbio;
 817                 digestAlgorithm = sk_X509_ALGOR_value(sd->digestAlgorithms, i);
 818                 mdbio = cms_DigestAlgorithm_init_bio(digestAlgorithm);
 819                 if (!mdbio)
 820                         goto err;
 821                 if (chain)
 822                          BIO_push(chain, mdbio);
 823                 else
 824                         chain = mdbio;
 825                 }
 826         return chain;
 827         err:
 828         if (chain)
 829                 BIO_free_all(chain);
 830         return NULL;
 831         }
 832
 833 int CMS_SignerInfo_verify_content(CMS_SignerInfo *si, BIO *chain)
 834         {
 835         ASN1_OCTET_STRING *os = NULL;
 836         EVP_MD_CTX mctx;
 837         int r = -1;
 838         EVP_MD_CTX_init(&mctx);
 839         /* If we have any signed attributes look for messageDigest value */
 840         if (CMS_signed_get_attr_count(si) >= 0)
 841                 {
 842                 os = CMS_signed_get0_data_by_OBJ(si,
 843                                         OBJ_nid2obj(NID_pkcs9_messageDigest),
 844                                         -3, V_ASN1_OCTET_STRING);
 845                 if (!os)
 846                         {
 847                         CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
 848                                 CMS_R_ERROR_READING_MESSAGEDIGEST_ATTRIBUTE);
 849                         goto err;
 850                         }
 851                 }
 852
 853         if (!cms_DigestAlgorithm_find_ctx(&mctx, chain, si->digestAlgorithm))
 854                 goto err;
 855
 856         /* If messageDigest found compare it */
 857
 858         if (os)
 859                 {
 860                 unsigned char mval[EVP_MAX_MD_SIZE];
 861                 unsigned int mlen;
 862                 if (EVP_DigestFinal_ex(&mctx, mval, &mlen) <= 0)
 863                         {
 864                         CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
 865                                 CMS_R_UNABLE_TO_FINALIZE_CONTEXT);
 866                         goto err;
 867                         }
 868                 if (mlen != (unsigned int)os->length)
 869                         {
 870                         CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
 871                                 CMS_R_MESSAGEDIGEST_ATTRIBUTE_WRONG_LENGTH);
 872                         goto err;
 873                         }
 874
 875                 if (memcmp(mval, os->data, mlen))
 876                         {
 877                         CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
 878                                 CMS_R_VERIFICATION_FAILURE);
 879                         r = 0;
 880                         }
 881                 else
 882                         r = 1;
 883                 }
 884         else
 885                 {
 886                 r = EVP_VerifyFinal(&mctx, si->signature->data,
 887                                         si->signature->length, si->pkey);
 888                 if (r <= 0)
 889                         {
 890                         CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
 891                                 CMS_R_VERIFICATION_FAILURE);
 892                         r = 0;
 893                         }
 894                 }
 895
 896         err:
 897         EVP_MD_CTX_cleanup(&mctx);
 898         return r;
 899
 900         }
 901
 902 int CMS_add_smimecap(CMS_SignerInfo *si, STACK_OF(X509_ALGOR) *algs)
 903         {
 904         unsigned char *smder = NULL;
 905         int smderlen, r;
 906         smderlen = i2d_X509_ALGORS(algs, &smder);
 907         if (smderlen <= 0)
 908                 return 0;
 909         r = CMS_signed_add1_attr_by_NID(si, NID_SMIMECapabilities,
 910                                         V_ASN1_SEQUENCE, smder, smderlen);
 911         OPENSSL_free(smder);
 912         return r;
 913         }
 914
 915 int CMS_add_simple_smimecap(STACK_OF(X509_ALGOR) **algs,
 916                                 int algnid, int keysize)
 917         {
 918         X509_ALGOR *alg;
 919         ASN1_INTEGER *key = NULL;
 920         if (keysize > 0)
 921                 {
 922                 key = ASN1_INTEGER_new();
 923                 if (!key || !ASN1_INTEGER_set(key, keysize))
 924                         return 0;
 925                 }
 926         alg = X509_ALGOR_new();
 927         if (!alg)
 928                 {
 929                 if (key)
 930                         ASN1_INTEGER_free(key);
 931                 return 0;
 932                 }
 933
 934         X509_ALGOR_set0(alg, OBJ_nid2obj(algnid),
 935                                 key ? V_ASN1_INTEGER : V_ASN1_UNDEF, key);
 936         if (!*algs)
 937                 *algs = sk_X509_ALGOR_new_null();
 938         if (!*algs || !sk_X509_ALGOR_push(*algs, alg))
 939                 {
 940                 X509_ALGOR_free(alg);
 941                 return 0;
 942                 }
 943         return 1;
 944         }
 945
 946 /* Check to see if a cipher exists and if so add S/MIME capabilities */
 947
 948 static int cms_add_cipher_smcap(STACK_OF(X509_ALGOR) **sk, int nid, int arg)
 949         {
 950         if (EVP_get_cipherbynid(nid))
 951                 return CMS_add_simple_smimecap(sk, nid, arg);
 952         return 1;
 953         }
 954
 955 static int cms_add_digest_smcap(STACK_OF(X509_ALGOR) **sk, int nid, int arg)
 956         {
 957         if (EVP_get_digestbynid(nid))
 958                 return CMS_add_simple_smimecap(sk, nid, arg);
 959         return 1;
 960         }
 961
 962 int CMS_add_standard_smimecap(STACK_OF(X509_ALGOR) **smcap)
 963         {
 964         if (!cms_add_cipher_smcap(smcap, NID_aes_256_cbc, -1)
 965                 || !cms_add_digest_smcap(smcap, NID_id_GostR3411_94, -1)
 966                 || !cms_add_cipher_smcap(smcap, NID_id_Gost28147_89, -1)
 967                 || !cms_add_cipher_smcap(smcap, NID_aes_192_cbc, -1)
 968                 || !cms_add_cipher_smcap(smcap, NID_aes_128_cbc, -1)
 969                 || !cms_add_cipher_smcap(smcap, NID_des_ede3_cbc, -1)
 970                 || !cms_add_cipher_smcap(smcap, NID_rc2_cbc, 128)
 971                 || !cms_add_cipher_smcap(smcap, NID_rc2_cbc, 64)
 972                 || !cms_add_cipher_smcap(smcap, NID_des_cbc, -1)
 973                 || !cms_add_cipher_smcap(smcap, NID_rc2_cbc, 40))
 974                 return 0;
 975         return 1;
 976         }