1 /*
2 * Copyright 1995-2021 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 * RC5 low level APIs are deprecated for public use, but still ok for internal
12 * use.
13 */
14 #include "internal/deprecated.h"
15
16 #include <stdio.h>
17 #include "internal/cryptlib.h"
18
19 #ifndef OPENSSL_NO_RC5
20
21 # include <openssl/evp.h>
22 # include "crypto/evp.h"
23 # include <openssl/objects.h>
24 # include "evp_local.h"
25 # include <openssl/rc5.h>
26
27 static int r_32_12_16_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
28 const unsigned char *iv, int enc);
29 static int rc5_ctrl(EVP_CIPHER_CTX *c, int type, int arg, void *ptr);
30
31 typedef struct {
32 int rounds; /* number of rounds */
33 RC5_32_KEY ks; /* key schedule */
34 } EVP_RC5_KEY;
35
36 # define data(ctx) EVP_C_DATA(EVP_RC5_KEY,ctx)
37
38 IMPLEMENT_BLOCK_CIPHER(rc5_32_12_16, ks, RC5_32, EVP_RC5_KEY, NID_rc5,
39 8, RC5_32_KEY_LENGTH, 8, 64,
40 EVP_CIPH_VARIABLE_LENGTH | EVP_CIPH_CTRL_INIT,
41 r_32_12_16_init_key, NULL, NULL, NULL, rc5_ctrl)
42
rc5_ctrl(EVP_CIPHER_CTX * c,int type,int arg,void * ptr)43 static int rc5_ctrl(EVP_CIPHER_CTX *c, int type, int arg, void *ptr)
44 {
45 switch (type) {
46 case EVP_CTRL_INIT:
47 data(c)->rounds = RC5_12_ROUNDS;
48 return 1;
49
50 case EVP_CTRL_GET_RC5_ROUNDS:
51 *(int *)ptr = data(c)->rounds;
52 return 1;
53
54 case EVP_CTRL_SET_RC5_ROUNDS:
55 switch (arg) {
56 case RC5_8_ROUNDS:
57 case RC5_12_ROUNDS:
58 case RC5_16_ROUNDS:
59 data(c)->rounds = arg;
60 return 1;
61
62 default:
63 ERR_raise(ERR_LIB_EVP, EVP_R_UNSUPPORTED_NUMBER_OF_ROUNDS);
64 return 0;
65 }
66
67 default:
68 return -1;
69 }
70 }
71
r_32_12_16_init_key(EVP_CIPHER_CTX * ctx,const unsigned char * key,const unsigned char * iv,int enc)72 static int r_32_12_16_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
73 const unsigned char *iv, int enc)
74 {
75 const int key_len = EVP_CIPHER_CTX_get_key_length(ctx);
76
77 if (key_len > 255 || key_len < 0) {
78 ERR_raise(ERR_LIB_EVP, EVP_R_BAD_KEY_LENGTH);
79 return 0;
80 }
81 return RC5_32_set_key(&data(ctx)->ks, key_len, key, data(ctx)->rounds);
82 }
83
84 #endif
85
