providers/implementations/ciphers/ciphercommon.c

   1 /*
   2  * Copyright 2019-2020 The OpenSSL Project Authors. All Rights Reserved.
   3  *
   4  * Licensed under the Apache License 2.0 (the "License").  You may not use
   5  * this file except in compliance with the License.  You can obtain a copy
   6  * in the file LICENSE in the source distribution or at
   7  * https://www.openssl.org/source/license.html
   8  */
   9
  10 /*
  11  * Generic dispatch table functions for ciphers.
  12  */
  13
  14 /* For SSL3_VERSION */
  15 #include <openssl/ssl.h>
  16 #include "ciphercommon_local.h"
  17 #include "prov/provider_ctx.h"
  18 #include "prov/providercommon.h"
  19 #include "prov/providercommonerr.h"
  20
  21 /*-
  22  * Generic cipher functions for OSSL_PARAM gettables and settables
  23  */
  24 static const OSSL_PARAM cipher_known_gettable_params[] = {
  25     OSSL_PARAM_uint(OSSL_CIPHER_PARAM_MODE, NULL),
  26     OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_KEYLEN, NULL),
  27     OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_IVLEN, NULL),
  28     OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_BLOCK_SIZE, NULL),
  29     OSSL_PARAM_ulong(OSSL_CIPHER_PARAM_FLAGS, NULL),
  30     { OSSL_CIPHER_PARAM_TLS_MAC, OSSL_PARAM_OCTET_PTR, NULL, 0, OSSL_PARAM_UNMODIFIED },
  31     OSSL_PARAM_END
  32 };
  33 const OSSL_PARAM *ossl_cipher_generic_gettable_params(void *provctx)
  34 {
  35     return cipher_known_gettable_params;
  36 }
  37
  38 int ossl_cipher_generic_get_params(OSSL_PARAM params[], unsigned int md,
  39                                    unsigned long flags,
  40                                    size_t kbits, size_t blkbits, size_t ivbits)
  41 {
  42     OSSL_PARAM *p;
  43
  44     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_MODE);
  45     if (p != NULL && !OSSL_PARAM_set_uint(p, md)) {
  46         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
  47         return 0;
  48     }
  49     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_FLAGS);
  50     if (p != NULL && !OSSL_PARAM_set_ulong(p, flags)) {
  51         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
  52         return 0;
  53     }
  54     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_KEYLEN);
  55     if (p != NULL && !OSSL_PARAM_set_size_t(p, kbits / 8)) {
  56         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
  57         return 0;
  58     }
  59     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_BLOCK_SIZE);
  60     if (p != NULL && !OSSL_PARAM_set_size_t(p, blkbits / 8)) {
  61         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
  62         return 0;
  63     }
  64     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_IVLEN);
  65     if (p != NULL && !OSSL_PARAM_set_size_t(p, ivbits / 8)) {
  66         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
  67         return 0;
  68     }
  69     return 1;
  70 }
  71
  72 CIPHER_DEFAULT_GETTABLE_CTX_PARAMS_START(ossl_cipher_generic)
  73 CIPHER_DEFAULT_GETTABLE_CTX_PARAMS_END(ossl_cipher_generic)
  74
  75 CIPHER_DEFAULT_SETTABLE_CTX_PARAMS_START(ossl_cipher_generic)
  76 OSSL_PARAM_uint(OSSL_CIPHER_PARAM_TLS_VERSION, NULL),
  77 OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_TLS_MAC_SIZE, NULL),
  78 CIPHER_DEFAULT_SETTABLE_CTX_PARAMS_END(ossl_cipher_generic)
  79
  80 /*
  81  * Variable key length cipher functions for OSSL_PARAM settables
  82  */
  83
  84 int ossl_cipher_var_keylen_set_ctx_params(void *vctx, const OSSL_PARAM params[])
  85 {
  86     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
  87     const OSSL_PARAM *p;
  88
  89     if (!ossl_cipher_generic_set_ctx_params(vctx, params))
  90         return 0;
  91     p = OSSL_PARAM_locate_const(params, OSSL_CIPHER_PARAM_KEYLEN);
  92     if (p != NULL) {
  93         size_t keylen;
  94
  95         if (!OSSL_PARAM_get_size_t(p, &keylen)) {
  96             ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_GET_PARAMETER);
  97             return 0;
  98         }
  99         ctx->keylen = keylen;
 100     }
 101     return 1;
 102 }
 103
 104 CIPHER_DEFAULT_SETTABLE_CTX_PARAMS_START(ossl_cipher_var_keylen)
 105 OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_KEYLEN, NULL),
 106 CIPHER_DEFAULT_SETTABLE_CTX_PARAMS_END(ossl_cipher_var_keylen)
 107
 108 /*-
 109  * AEAD cipher functions for OSSL_PARAM gettables and settables
 110  */
 111 static const OSSL_PARAM cipher_aead_known_gettable_ctx_params[] = {
 112     OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_KEYLEN, NULL),
 113     OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_IVLEN, NULL),
 114     OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_AEAD_TAGLEN, NULL),
 115     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_IV, NULL, 0),
 116     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_IV_STATE, NULL, 0),
 117     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_AEAD_TAG, NULL, 0),
 118     OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_AEAD_TLS1_AAD_PAD, NULL),
 119     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_AEAD_TLS1_GET_IV_GEN, NULL, 0),
 120     OSSL_PARAM_END
 121 };
 122 const OSSL_PARAM *ossl_cipher_aead_gettable_ctx_params(
 123         ossl_unused void *provctx
 124     )
 125 {
 126     return cipher_aead_known_gettable_ctx_params;
 127 }
 128
 129 static const OSSL_PARAM cipher_aead_known_settable_ctx_params[] = {
 130     OSSL_PARAM_size_t(OSSL_CIPHER_PARAM_AEAD_IVLEN, NULL),
 131     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_AEAD_TAG, NULL, 0),
 132     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_AEAD_TLS1_AAD, NULL, 0),
 133     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_AEAD_TLS1_IV_FIXED, NULL, 0),
 134     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_AEAD_TLS1_SET_IV_INV, NULL, 0),
 135     OSSL_PARAM_END
 136 };
 137 const OSSL_PARAM *ossl_cipher_aead_settable_ctx_params(
 138         ossl_unused void *provctx
 139     )
 140 {
 141     return cipher_aead_known_settable_ctx_params;
 142 }
 143
 144 void ossl_cipher_generic_reset_ctx(PROV_CIPHER_CTX *ctx)
 145 {
 146     if (ctx != NULL && ctx->alloced) {
 147         OPENSSL_free(ctx->tlsmac);
 148         ctx->alloced = 0;
 149         ctx->tlsmac = NULL;
 150     }
 151 }
 152
 153 static int cipher_generic_init_internal(PROV_CIPHER_CTX *ctx,
 154                                         const unsigned char *key, size_t keylen,
 155                                         const unsigned char *iv, size_t ivlen,
 156                                         int enc)
 157 {
 158     ctx->num = 0;
 159     ctx->bufsz = 0;
 160     ctx->updated = 0;
 161     ctx->enc = enc ? 1 : 0;
 162
 163     if (!ossl_prov_is_running())
 164         return 0;
 165
 166     if (iv != NULL && ctx->mode != EVP_CIPH_ECB_MODE) {
 167         if (!ossl_cipher_generic_initiv(ctx, iv, ivlen))
 168             return 0;
 169     }
 170     if (key != NULL) {
 171         if ((ctx->flags & EVP_CIPH_VARIABLE_LENGTH) == 0) {
 172             if (keylen != ctx->keylen) {
 173                 ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_KEYLEN);
 174                 return 0;
 175             }
 176         } else {
 177             ctx->keylen = keylen;
 178         }
 179         return ctx->hw->init(ctx, key, ctx->keylen);
 180     }
 181     return 1;
 182 }
 183
 184 int ossl_cipher_generic_einit(void *vctx, const unsigned char *key,
 185                               size_t keylen, const unsigned char *iv,
 186                               size_t ivlen)
 187 {
 188     return cipher_generic_init_internal((PROV_CIPHER_CTX *)vctx, key, keylen,
 189                                         iv, ivlen, 1);
 190 }
 191
 192 int ossl_cipher_generic_dinit(void *vctx, const unsigned char *key,
 193                               size_t keylen, const unsigned char *iv,
 194                               size_t ivlen)
 195 {
 196     return cipher_generic_init_internal((PROV_CIPHER_CTX *)vctx, key, keylen,
 197                                         iv, ivlen, 0);
 198 }
 199
 200 /* Max padding including padding length byte */
 201 #define MAX_PADDING 256
 202
 203 int ossl_cipher_generic_block_update(void *vctx, unsigned char *out,
 204                                      size_t *outl, size_t outsize,
 205                                      const unsigned char *in, size_t inl)
 206 {
 207     size_t outlint = 0;
 208     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
 209     size_t blksz = ctx->blocksize;
 210     size_t nextblocks;
 211
 212     if (ctx->tlsversion > 0) {
 213         /*
 214          * Each update call corresponds to a TLS record and is individually
 215          * padded
 216          */
 217
 218         /* Sanity check inputs */
 219         if (in == NULL
 220                 || in != out
 221                 || outsize < inl
 222                 || !ctx->pad) {
 223             ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 224             return 0;
 225         }
 226
 227         if (ctx->enc) {
 228             unsigned char padval;
 229             size_t padnum, loop;
 230
 231             /* Add padding */
 232
 233             padnum = blksz - (inl % blksz);
 234
 235             if (outsize < inl + padnum) {
 236                 ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 237                 return 0;
 238             }
 239
 240             if (padnum > MAX_PADDING) {
 241                 ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 242                 return 0;
 243             }
 244             padval = (unsigned char)(padnum - 1);
 245             if (ctx->tlsversion == SSL3_VERSION) {
 246                 if (padnum > 1)
 247                     memset(out + inl, 0, padnum - 1);
 248                 *(out + inl + padnum - 1) = padval;
 249             } else {
 250                 /* we need to add 'padnum' padding bytes of value padval */
 251                 for (loop = inl; loop < inl + padnum; loop++)
 252                     out[loop] = padval;
 253             }
 254             inl += padnum;
 255         }
 256
 257         if ((inl % blksz) != 0) {
 258             ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 259             return 0;
 260         }
 261
 262
 263         /* Shouldn't normally fail */
 264         if (!ctx->hw->cipher(ctx, out, in, inl)) {
 265             ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 266             return 0;
 267         }
 268
 269         if (ctx->alloced) {
 270             OPENSSL_free(ctx->tlsmac);
 271             ctx->alloced = 0;
 272             ctx->tlsmac = NULL;
 273         }
 274
 275         /* This only fails if padding is publicly invalid */
 276         *outl = inl;
 277         if (!ctx->enc
 278                 && !tlsunpadblock(ctx->libctx, ctx->tlsversion, out, outl,
 279                                   blksz, &ctx->tlsmac, &ctx->alloced,
 280                                   ctx->tlsmacsize, 0)) {
 281             ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 282             return 0;
 283         }
 284         return 1;
 285     }
 286
 287     if (ctx->bufsz != 0)
 288         nextblocks = fillblock(ctx->buf, &ctx->bufsz, blksz, &in, &inl);
 289     else
 290         nextblocks = inl & ~(blksz-1);
 291
 292     /*
 293      * If we're decrypting and we end an update on a block boundary we hold
 294      * the last block back in case this is the last update call and the last
 295      * block is padded.
 296      */
 297     if (ctx->bufsz == blksz && (ctx->enc || inl > 0 || !ctx->pad)) {
 298         if (outsize < blksz) {
 299             ERR_raise(ERR_LIB_PROV, PROV_R_OUTPUT_BUFFER_TOO_SMALL);
 300             return 0;
 301         }
 302         if (!ctx->hw->cipher(ctx, out, ctx->buf, blksz)) {
 303             ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 304             return 0;
 305         }
 306         ctx->bufsz = 0;
 307         outlint = blksz;
 308         out += blksz;
 309     }
 310     if (nextblocks > 0) {
 311         if (!ctx->enc && ctx->pad && nextblocks == inl) {
 312             if (!ossl_assert(inl >= blksz)) {
 313                 ERR_raise(ERR_LIB_PROV, PROV_R_OUTPUT_BUFFER_TOO_SMALL);
 314                 return 0;
 315             }
 316             nextblocks -= blksz;
 317         }
 318         outlint += nextblocks;
 319         if (outsize < outlint) {
 320             ERR_raise(ERR_LIB_PROV, PROV_R_OUTPUT_BUFFER_TOO_SMALL);
 321             return 0;
 322         }
 323     }
 324     if (nextblocks > 0) {
 325         if (!ctx->hw->cipher(ctx, out, in, nextblocks)) {
 326             ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 327             return 0;
 328         }
 329         in += nextblocks;
 330         inl -= nextblocks;
 331     }
 332     if (inl != 0 && !trailingdata(ctx->buf, &ctx->bufsz, blksz, &in, &inl)) {
 333         /* ERR_raise already called */
 334         return 0;
 335     }
 336
 337     *outl = outlint;
 338     return inl == 0;
 339 }
 340
 341 int ossl_cipher_generic_block_final(void *vctx, unsigned char *out,
 342                                     size_t *outl, size_t outsize)
 343 {
 344     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
 345     size_t blksz = ctx->blocksize;
 346
 347     if (!ossl_prov_is_running())
 348         return 0;
 349
 350     if (ctx->tlsversion > 0) {
 351         /* We never finalize TLS, so this is an error */
 352         ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 353         return 0;
 354     }
 355
 356     if (ctx->enc) {
 357         if (ctx->pad) {
 358             padblock(ctx->buf, &ctx->bufsz, blksz);
 359         } else if (ctx->bufsz == 0) {
 360             *outl = 0;
 361             return 1;
 362         } else if (ctx->bufsz != blksz) {
 363             ERR_raise(ERR_LIB_PROV, PROV_R_WRONG_FINAL_BLOCK_LENGTH);
 364             return 0;
 365         }
 366
 367         if (outsize < blksz) {
 368             ERR_raise(ERR_LIB_PROV, PROV_R_OUTPUT_BUFFER_TOO_SMALL);
 369             return 0;
 370         }
 371         if (!ctx->hw->cipher(ctx, out, ctx->buf, blksz)) {
 372             ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 373             return 0;
 374         }
 375         ctx->bufsz = 0;
 376         *outl = blksz;
 377         return 1;
 378     }
 379
 380     /* Decrypting */
 381     if (ctx->bufsz != blksz) {
 382         if (ctx->bufsz == 0 && !ctx->pad) {
 383             *outl = 0;
 384             return 1;
 385         }
 386         ERR_raise(ERR_LIB_PROV, PROV_R_WRONG_FINAL_BLOCK_LENGTH);
 387         return 0;
 388     }
 389
 390     if (!ctx->hw->cipher(ctx, ctx->buf, ctx->buf, blksz)) {
 391         ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 392         return 0;
 393     }
 394
 395     if (ctx->pad && !unpadblock(ctx->buf, &ctx->bufsz, blksz)) {
 396         /* ERR_raise already called */
 397         return 0;
 398     }
 399
 400     if (outsize < ctx->bufsz) {
 401         ERR_raise(ERR_LIB_PROV, PROV_R_OUTPUT_BUFFER_TOO_SMALL);
 402         return 0;
 403     }
 404     memcpy(out, ctx->buf, ctx->bufsz);
 405     *outl = ctx->bufsz;
 406     ctx->bufsz = 0;
 407     return 1;
 408 }
 409
 410 int ossl_cipher_generic_stream_update(void *vctx, unsigned char *out,
 411                                       size_t *outl, size_t outsize,
 412                                       const unsigned char *in, size_t inl)
 413 {
 414     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
 415
 416     if (inl == 0) {
 417         *outl = 0;
 418         return 1;
 419     }
 420
 421     if (outsize < inl) {
 422         ERR_raise(ERR_LIB_PROV, PROV_R_OUTPUT_BUFFER_TOO_SMALL);
 423         return 0;
 424     }
 425
 426     if (!ctx->hw->cipher(ctx, out, in, inl)) {
 427         ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 428         return 0;
 429     }
 430
 431     *outl = inl;
 432     if (!ctx->enc) {
 433         /*
 434         * Remove any TLS padding. Only used by cipher_aes_cbc_hmac_sha1_hw.c and
 435         * cipher_aes_cbc_hmac_sha256_hw.c
 436         */
 437         if (ctx->removetlspad) {
 438             /*
 439              * We should have already failed in the cipher() call above if this
 440              * isn't true.
 441              */
 442             if (!ossl_assert(*outl >= (size_t)(out[inl - 1] + 1)))
 443                 return 0;
 444             /* The actual padding length */
 445             *outl -= out[inl - 1] + 1;
 446         }
 447
 448         /* TLS MAC and explicit IV if relevant. We should have already failed
 449          * in the cipher() call above if *outl is too short.
 450          */
 451         if (!ossl_assert(*outl >= ctx->removetlsfixed))
 452             return 0;
 453         *outl -= ctx->removetlsfixed;
 454
 455         /* Extract the MAC if there is one */
 456         if (ctx->tlsmacsize > 0) {
 457             if (*outl < ctx->tlsmacsize)
 458                 return 0;
 459
 460             ctx->tlsmac = out + *outl - ctx->tlsmacsize;
 461             *outl -= ctx->tlsmacsize;
 462         }
 463     }
 464
 465     return 1;
 466 }
 467 int ossl_cipher_generic_stream_final(void *vctx, unsigned char *out,
 468                                      size_t *outl, size_t outsize)
 469 {
 470     if (!ossl_prov_is_running())
 471         return 0;
 472
 473     *outl = 0;
 474     return 1;
 475 }
 476
 477 int ossl_cipher_generic_cipher(void *vctx, unsigned char *out, size_t *outl,
 478                                size_t outsize, const unsigned char *in,
 479                                size_t inl)
 480 {
 481     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
 482
 483     if (!ossl_prov_is_running())
 484         return 0;
 485
 486     if (outsize < inl) {
 487         ERR_raise(ERR_LIB_PROV, PROV_R_OUTPUT_BUFFER_TOO_SMALL);
 488         return 0;
 489     }
 490
 491     if (!ctx->hw->cipher(ctx, out, in, inl)) {
 492         ERR_raise(ERR_LIB_PROV, PROV_R_CIPHER_OPERATION_FAILED);
 493         return 0;
 494     }
 495
 496     *outl = inl;
 497     return 1;
 498 }
 499
 500 int ossl_cipher_generic_get_ctx_params(void *vctx, OSSL_PARAM params[])
 501 {
 502     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
 503     OSSL_PARAM *p;
 504
 505     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_IVLEN);
 506     if (p != NULL && !OSSL_PARAM_set_size_t(p, ctx->ivlen)) {
 507         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
 508         return 0;
 509     }
 510     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_PADDING);
 511     if (p != NULL && !OSSL_PARAM_set_uint(p, ctx->pad)) {
 512         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
 513         return 0;
 514     }
 515     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_IV);
 516     if (p != NULL
 517         && !OSSL_PARAM_set_octet_ptr(p, &ctx->oiv, ctx->ivlen)
 518         && !OSSL_PARAM_set_octet_string(p, &ctx->oiv, ctx->ivlen)) {
 519         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
 520         return 0;
 521     }
 522     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_IV_STATE);
 523     if (p != NULL
 524         && !OSSL_PARAM_set_octet_ptr(p, &ctx->iv, ctx->ivlen)
 525         && !OSSL_PARAM_set_octet_string(p, &ctx->iv, ctx->ivlen)) {
 526         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
 527         return 0;
 528     }
 529     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_NUM);
 530     if (p != NULL && !OSSL_PARAM_set_uint(p, ctx->num)) {
 531         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
 532         return 0;
 533     }
 534     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_KEYLEN);
 535     if (p != NULL && !OSSL_PARAM_set_size_t(p, ctx->keylen)) {
 536         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
 537         return 0;
 538     }
 539     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_TLS_MAC);
 540     if (p != NULL
 541         && !OSSL_PARAM_set_octet_ptr(p, ctx->tlsmac, ctx->tlsmacsize)) {
 542         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_SET_PARAMETER);
 543         return 0;
 544     }
 545     return 1;
 546 }
 547
 548 int ossl_cipher_generic_set_ctx_params(void *vctx, const OSSL_PARAM params[])
 549 {
 550     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
 551     const OSSL_PARAM *p;
 552
 553     p = OSSL_PARAM_locate_const(params, OSSL_CIPHER_PARAM_PADDING);
 554     if (p != NULL) {
 555         unsigned int pad;
 556
 557         if (!OSSL_PARAM_get_uint(p, &pad)) {
 558             ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_GET_PARAMETER);
 559             return 0;
 560         }
 561         ctx->pad = pad ? 1 : 0;
 562     }
 563     p = OSSL_PARAM_locate_const(params, OSSL_CIPHER_PARAM_TLS_VERSION);
 564     if (p != NULL) {
 565         if (!OSSL_PARAM_get_uint(p, &ctx->tlsversion)) {
 566             ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_GET_PARAMETER);
 567             return 0;
 568         }
 569     }
 570     p = OSSL_PARAM_locate_const(params, OSSL_CIPHER_PARAM_TLS_MAC_SIZE);
 571     if (p != NULL) {
 572         if (!OSSL_PARAM_get_size_t(p, &ctx->tlsmacsize)) {
 573             ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_GET_PARAMETER);
 574             return 0;
 575         }
 576     }
 577     p = OSSL_PARAM_locate_const(params, OSSL_CIPHER_PARAM_NUM);
 578     if (p != NULL) {
 579         unsigned int num;
 580
 581         if (!OSSL_PARAM_get_uint(p, &num)) {
 582             ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_GET_PARAMETER);
 583             return 0;
 584         }
 585         ctx->num = num;
 586     }
 587     return 1;
 588 }
 589
 590 int ossl_cipher_generic_initiv(PROV_CIPHER_CTX *ctx, const unsigned char *iv,
 591                                size_t ivlen)
 592 {
 593     if (ivlen != ctx->ivlen
 594         || ivlen > sizeof(ctx->iv)) {
 595         ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_IVLEN);
 596         return 0;
 597     }
 598     ctx->iv_set = 1;
 599     memcpy(ctx->iv, iv, ivlen);
 600     memcpy(ctx->oiv, iv, ivlen);
 601     return 1;
 602 }
 603
 604 void ossl_cipher_generic_initkey(void *vctx, size_t kbits, size_t blkbits,
 605                                  size_t ivbits, unsigned int mode,
 606                                  uint64_t flags, const PROV_CIPHER_HW *hw,
 607                                  void *provctx)
 608 {
 609     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
 610
 611     ctx->flags = flags;
 612     ctx->pad = 1;
 613     ctx->keylen = ((kbits) / 8);
 614     ctx->ivlen = ((ivbits) / 8);
 615     ctx->hw = hw;
 616     ctx->mode = mode;
 617     ctx->blocksize = blkbits / 8;
 618     if (provctx != NULL)
 619         ctx->libctx = PROV_LIBCTX_OF(provctx); /* used for rand */
 620 }