From: Dmitry Eremin-Solenikov <dmitry.ereminsoleni...@linaro.org>

Per idea of Janne Peltonen, do not allocate/free crypto contexts for
each operation, providing significant speed increase. Each thread
on startup allocates hmac+cipher contexts pair for each crypto session.
Then they are initialized on demand, when session is first
executed using this thread.

Signed-off-by: Dmitry Eremin-Solenikov <dmitry.ereminsoleni...@linaro.org>
---
/** Email created from pull request 344 (lumag:openssl-ctx-api-next)
 ** https://github.com/Linaro/odp/pull/344
 ** Patch: https://github.com/Linaro/odp/pull/344.patch
 ** Base sha: 0588040068a50d0d15a641d091fce23214b15594
 ** Merge commit sha: fde19b74656cbc43d72178bc7744278abc48a80c
 **/
 platform/linux-generic/include/odp_internal.h |   2 +
 platform/linux-generic/odp_crypto.c           | 242 ++++++++++++++++----------
 platform/linux-generic/odp_init.c             |  13 ++
 3 files changed, 167 insertions(+), 90 deletions(-)

diff --git a/platform/linux-generic/include/odp_internal.h 
b/platform/linux-generic/include/odp_internal.h
index d01b4f155..7ce8d351b 100644
--- a/platform/linux-generic/include/odp_internal.h
+++ b/platform/linux-generic/include/odp_internal.h
@@ -113,6 +113,8 @@ int odp_queue_term_global(void);
 
 int odp_crypto_init_global(void);
 int odp_crypto_term_global(void);
+int _odp_crypto_init_local(void);
+int _odp_crypto_term_local(void);
 
 int odp_timer_init_global(const odp_init_t *params);
 int odp_timer_term_global(void);
diff --git a/platform/linux-generic/odp_crypto.c 
b/platform/linux-generic/odp_crypto.c
index 811d3fc03..f9ee20d55 100644
--- a/platform/linux-generic/odp_crypto.c
+++ b/platform/linux-generic/odp_crypto.c
@@ -99,6 +99,9 @@ odp_crypto_alg_err_t (*crypto_func_t)(odp_packet_t pkt,
                                      const odp_crypto_packet_op_param_t *param,
                                      odp_crypto_generic_session_t *session);
 
+typedef uint32_t crypto_valid;
+#define CV_SIZE sizeof(crypto_valid)
+
 /**
  * Per crypto session data structure
  */
@@ -129,8 +132,22 @@ struct odp_crypto_generic_session_t {
                };
                crypto_func_t func;
        } auth;
+
+       /* These bitfields are cleared at odp_crypto_session_destroy()
+        * together with the rest of data */
+       crypto_valid cipher_valid[(ODP_THREAD_COUNT_MAX + CV_SIZE - 1) /
+                               CV_SIZE];
+       crypto_valid hmac_valid[(ODP_THREAD_COUNT_MAX + CV_SIZE - 1) /
+                               CV_SIZE];
+       unsigned idx;
 };
 
+#define IS_VALID(session, type, id)    \
+       (session->type ## _valid[id / CV_SIZE] & (1 << (id % CV_SIZE)))
+
+#define SET_VALID(session, type, id)   \
+       session->type ## _valid[id / CV_SIZE] |= (1 << (id % CV_SIZE))
+
 typedef struct odp_crypto_global_s odp_crypto_global_t;
 
 struct odp_crypto_global_s {
@@ -142,6 +159,16 @@ struct odp_crypto_global_s {
 
 static odp_crypto_global_t *global;
 
+typedef struct crypto_local_t {
+       struct {
+               HMAC_CTX *hmac;
+               EVP_CIPHER_CTX *cipher;
+       } ctx[MAX_SESSIONS];
+       int id;
+} crypto_local_t;
+
+static __thread crypto_local_t local;
+
 static
 odp_crypto_generic_session_t *alloc_session(void)
 {
@@ -155,6 +182,8 @@ odp_crypto_generic_session_t *alloc_session(void)
        }
        odp_spinlock_unlock(&global->lock);
 
+       session->idx = (session - global->sessions) / sizeof(*session);
+
        return session;
 }
 
@@ -175,24 +204,52 @@ null_crypto_routine(odp_packet_t pkt ODP_UNUSED,
        return ODP_CRYPTO_ALG_ERR_NONE;
 }
 
+/* Mimic new OpenSSL 1.1.y API */
+#if OPENSSL_VERSION_NUMBER < 0x10100000L
+static HMAC_CTX *HMAC_CTX_new(void)
+{
+       HMAC_CTX *ctx = malloc(sizeof(*ctx));
+
+       HMAC_CTX_init(ctx);
+       return ctx;
+}
+
+static void HMAC_CTX_free(HMAC_CTX *ctx)
+{
+       HMAC_CTX_cleanup(ctx);
+       free(ctx);
+}
+#endif
+
 static
-void packet_hmac_calculate(HMAC_CTX *ctx,
-                          odp_packet_t pkt,
-                          const odp_crypto_packet_op_param_t *param,
-                          odp_crypto_generic_session_t *session,
-                          uint8_t *hash)
+void packet_hmac(odp_packet_t pkt,
+                const odp_crypto_packet_op_param_t *param,
+                odp_crypto_generic_session_t *session,
+                uint8_t *hash)
 {
+       HMAC_CTX *ctx = local.ctx[session->idx].hmac;
        uint32_t offset = param->auth_range.offset;
        uint32_t len   = param->auth_range.length;
 
        ODP_ASSERT(offset + len <= odp_packet_len(pkt));
 
-       HMAC_Init_ex(ctx,
-                    session->auth.key,
-                    session->auth.key_length,
-                    session->auth.evp_md,
-                    NULL);
+       if (!IS_VALID(session, hmac, local.id)) {
+               SET_VALID(session, hmac, local.id);
+               HMAC_Init_ex(ctx,
+                            session->auth.key,
+                            session->auth.key_length,
+                            session->auth.evp_md,
+                            NULL);
+       } else {
+               /* Reinitialize HMAC calculation without resetting the key */
+               HMAC_Init_ex(ctx,
+                            NULL,
+                            session->auth.key_length,
+                            NULL,
+                            NULL);
+       }
 
+       /* Hash it */
        while (len > 0) {
                uint32_t seglen = 0; /* GCC */
                void *mapaddr = odp_packet_offset(pkt, offset, &seglen, NULL);
@@ -206,36 +263,6 @@ void packet_hmac_calculate(HMAC_CTX *ctx,
        HMAC_Final(ctx, hash, NULL);
 }
 
-#if OPENSSL_VERSION_NUMBER < 0x10100000L
-static
-void packet_hmac(odp_packet_t pkt,
-                const odp_crypto_packet_op_param_t *param,
-                odp_crypto_generic_session_t *session,
-                uint8_t *hash)
-{
-       HMAC_CTX ctx;
-
-       /* Hash it */
-       HMAC_CTX_init(&ctx);
-       packet_hmac_calculate(&ctx, pkt, param, session, hash);
-       HMAC_CTX_cleanup(&ctx);
-}
-#else
-static
-void packet_hmac(odp_packet_t pkt,
-                const odp_crypto_packet_op_param_t *param,
-                odp_crypto_generic_session_t *session,
-                uint8_t *hash)
-{
-       HMAC_CTX *ctx;
-
-       /* Hash it */
-       ctx = HMAC_CTX_new();
-       packet_hmac_calculate(ctx, pkt, param, session, hash);
-       HMAC_CTX_free(ctx);
-}
-#endif
-
 static
 odp_crypto_alg_err_t auth_gen(odp_packet_t pkt,
                              const odp_crypto_packet_op_param_t *param,
@@ -430,7 +457,7 @@ odp_crypto_alg_err_t cipher_encrypt(odp_packet_t pkt,
                                    const odp_crypto_packet_op_param_t *param,
                                    odp_crypto_generic_session_t *session)
 {
-       EVP_CIPHER_CTX *ctx;
+       EVP_CIPHER_CTX *ctx = local.ctx[session->idx].cipher;
        void *iv_ptr;
        int ret;
 
@@ -442,16 +469,16 @@ odp_crypto_alg_err_t cipher_encrypt(odp_packet_t pkt,
                return ODP_CRYPTO_ALG_ERR_IV_INVALID;
 
        /* Encrypt it */
-       ctx = EVP_CIPHER_CTX_new();
-       EVP_EncryptInit_ex(ctx, session->cipher.evp_cipher, NULL,
-                          session->cipher.key_data, NULL);
+       if (!IS_VALID(session, cipher, local.id)) {
+               SET_VALID(session, cipher, local.id);
+               EVP_EncryptInit_ex(ctx, session->cipher.evp_cipher, NULL,
+                                  session->cipher.key_data, NULL);
+               EVP_CIPHER_CTX_set_padding(ctx, 0);
+       }
        EVP_EncryptInit_ex(ctx, NULL, NULL, NULL, iv_ptr);
-       EVP_CIPHER_CTX_set_padding(ctx, 0);
 
        ret = internal_encrypt(ctx, pkt, param);
 
-       EVP_CIPHER_CTX_free(ctx);
-
        return ret <= 0 ? ODP_CRYPTO_ALG_ERR_DATA_SIZE :
                          ODP_CRYPTO_ALG_ERR_NONE;
 }
@@ -461,7 +488,7 @@ odp_crypto_alg_err_t cipher_decrypt(odp_packet_t pkt,
                                    const odp_crypto_packet_op_param_t *param,
                                    odp_crypto_generic_session_t *session)
 {
-       EVP_CIPHER_CTX *ctx;
+       EVP_CIPHER_CTX *ctx = local.ctx[session->idx].cipher;
        void *iv_ptr;
        int ret;
 
@@ -473,16 +500,16 @@ odp_crypto_alg_err_t cipher_decrypt(odp_packet_t pkt,
                return ODP_CRYPTO_ALG_ERR_IV_INVALID;
 
        /* Decrypt it */
-       ctx = EVP_CIPHER_CTX_new();
-       EVP_DecryptInit_ex(ctx, session->cipher.evp_cipher, NULL,
-                          session->cipher.key_data, NULL);
+       if (!IS_VALID(session, cipher, local.id)) {
+               SET_VALID(session, cipher, local.id);
+               EVP_DecryptInit_ex(ctx, session->cipher.evp_cipher, NULL,
+                                  session->cipher.key_data, NULL);
+               EVP_CIPHER_CTX_set_padding(ctx, 0);
+       }
        EVP_DecryptInit_ex(ctx, NULL, NULL, NULL, iv_ptr);
-       EVP_CIPHER_CTX_set_padding(ctx, 0);
 
        ret = internal_decrypt(ctx, pkt, param);
 
-       EVP_CIPHER_CTX_free(ctx);
-
        return ret <= 0 ? ODP_CRYPTO_ALG_ERR_DATA_SIZE :
                          ODP_CRYPTO_ALG_ERR_NONE;
 }
@@ -519,7 +546,7 @@ odp_crypto_alg_err_t aes_gcm_encrypt(odp_packet_t pkt,
                                     const odp_crypto_packet_op_param_t *param,
                                     odp_crypto_generic_session_t *session)
 {
-       EVP_CIPHER_CTX *ctx;
+       EVP_CIPHER_CTX *ctx = local.ctx[session->idx].cipher;
        const uint8_t *aad_head = param->aad.ptr;
        uint32_t aad_len = session->p.auth_aad_len;
        void *iv_ptr;
@@ -535,13 +562,15 @@ odp_crypto_alg_err_t aes_gcm_encrypt(odp_packet_t pkt,
                return ODP_CRYPTO_ALG_ERR_IV_INVALID;
 
        /* Encrypt it */
-       ctx = EVP_CIPHER_CTX_new();
-       EVP_EncryptInit_ex(ctx, session->cipher.evp_cipher, NULL,
-                          session->cipher.key_data, NULL);
-       EVP_CIPHER_CTX_ctrl(ctx, EVP_CTRL_GCM_SET_IVLEN,
-                           session->p.iv.length, NULL);
+       if (!IS_VALID(session, cipher, local.id)) {
+               SET_VALID(session, cipher, local.id);
+               EVP_EncryptInit_ex(ctx, session->cipher.evp_cipher, NULL,
+                                  session->cipher.key_data, NULL);
+               EVP_CIPHER_CTX_ctrl(ctx, EVP_CTRL_GCM_SET_IVLEN,
+                                   session->p.iv.length, NULL);
+               EVP_CIPHER_CTX_set_padding(ctx, 0);
+       }
        EVP_EncryptInit_ex(ctx, NULL, NULL, NULL, iv_ptr);
-       EVP_CIPHER_CTX_set_padding(ctx, 0);
 
        /* Authenticate header data (if any) without encrypting them */
        if (aad_len > 0)
@@ -555,8 +584,6 @@ odp_crypto_alg_err_t aes_gcm_encrypt(odp_packet_t pkt,
        odp_packet_copy_from_mem(pkt, param->hash_result_offset,
                                 session->p.auth_digest_len, block);
 
-       EVP_CIPHER_CTX_free(ctx);
-
        return ret <= 0 ? ODP_CRYPTO_ALG_ERR_DATA_SIZE :
                          ODP_CRYPTO_ALG_ERR_NONE;
 }
@@ -566,7 +593,7 @@ odp_crypto_alg_err_t aes_gcm_decrypt(odp_packet_t pkt,
                                     const odp_crypto_packet_op_param_t *param,
                                     odp_crypto_generic_session_t *session)
 {
-       EVP_CIPHER_CTX *ctx;
+       EVP_CIPHER_CTX *ctx = local.ctx[session->idx].cipher;
        const uint8_t *aad_head = param->aad.ptr;
        uint32_t aad_len = session->p.auth_aad_len;
        int dummy_len = 0;
@@ -582,13 +609,15 @@ odp_crypto_alg_err_t aes_gcm_decrypt(odp_packet_t pkt,
                return ODP_CRYPTO_ALG_ERR_IV_INVALID;
 
        /* Decrypt it */
-       ctx = EVP_CIPHER_CTX_new();
-       EVP_DecryptInit_ex(ctx, session->cipher.evp_cipher, NULL,
-                          session->cipher.key_data, NULL);
-       EVP_CIPHER_CTX_ctrl(ctx, EVP_CTRL_GCM_SET_IVLEN,
-                           session->p.iv.length, NULL);
+       if (!IS_VALID(session, cipher, local.id)) {
+               SET_VALID(session, cipher, local.id);
+               EVP_DecryptInit_ex(ctx, session->cipher.evp_cipher, NULL,
+                                  session->cipher.key_data, NULL);
+               EVP_CIPHER_CTX_ctrl(ctx, EVP_CTRL_GCM_SET_IVLEN,
+                                   session->p.iv.length, NULL);
+               EVP_CIPHER_CTX_set_padding(ctx, 0);
+       }
        EVP_DecryptInit_ex(ctx, NULL, NULL, NULL, iv_ptr);
-       EVP_CIPHER_CTX_set_padding(ctx, 0);
 
        odp_packet_copy_to_mem(pkt, param->hash_result_offset,
                               session->p.auth_digest_len, block);
@@ -602,8 +631,6 @@ odp_crypto_alg_err_t aes_gcm_decrypt(odp_packet_t pkt,
 
        ret = internal_decrypt(ctx, pkt, param);
 
-       EVP_CIPHER_CTX_free(ctx);
-
        return ret <= 0 ? ODP_CRYPTO_ALG_ERR_ICV_CHECK :
                          ODP_CRYPTO_ALG_ERR_NONE;
 }
@@ -635,7 +662,7 @@ odp_crypto_alg_err_t aes_gmac_gen(odp_packet_t pkt,
                                  const odp_crypto_packet_op_param_t *param,
                                  odp_crypto_generic_session_t *session)
 {
-       EVP_CIPHER_CTX *ctx;
+       EVP_CIPHER_CTX *ctx = local.ctx[session->idx].cipher;
        void *iv_ptr;
        uint8_t block[EVP_MAX_MD_SIZE];
        int ret;
@@ -648,13 +675,15 @@ odp_crypto_alg_err_t aes_gmac_gen(odp_packet_t pkt,
                return ODP_CRYPTO_ALG_ERR_IV_INVALID;
 
        /* Encrypt it */
-       ctx = EVP_CIPHER_CTX_new();
-       EVP_EncryptInit_ex(ctx, session->auth.evp_cipher, NULL,
-                          session->auth.key, NULL);
-       EVP_CIPHER_CTX_ctrl(ctx, EVP_CTRL_GCM_SET_IVLEN,
-                           session->p.iv.length, NULL);
+       if (!IS_VALID(session, cipher, local.id)) {
+               SET_VALID(session, cipher, local.id);
+               EVP_EncryptInit_ex(ctx, session->auth.evp_cipher, NULL,
+                                  session->auth.key, NULL);
+               EVP_CIPHER_CTX_ctrl(ctx, EVP_CTRL_GCM_SET_IVLEN,
+                                   session->p.iv.length, NULL);
+               EVP_CIPHER_CTX_set_padding(ctx, 0);
+       }
        EVP_EncryptInit_ex(ctx, NULL, NULL, NULL, iv_ptr);
-       EVP_CIPHER_CTX_set_padding(ctx, 0);
 
        ret = internal_aad(ctx, pkt, param);
 
@@ -663,8 +692,6 @@ odp_crypto_alg_err_t aes_gmac_gen(odp_packet_t pkt,
        odp_packet_copy_from_mem(pkt, param->hash_result_offset,
                                 session->p.auth_digest_len, block);
 
-       EVP_CIPHER_CTX_free(ctx);
-
        return ret <= 0 ? ODP_CRYPTO_ALG_ERR_DATA_SIZE :
                          ODP_CRYPTO_ALG_ERR_NONE;
 }
@@ -674,7 +701,7 @@ odp_crypto_alg_err_t aes_gmac_check(odp_packet_t pkt,
                                    const odp_crypto_packet_op_param_t *param,
                                    odp_crypto_generic_session_t *session)
 {
-       EVP_CIPHER_CTX *ctx;
+       EVP_CIPHER_CTX *ctx = local.ctx[session->idx].cipher;
        void *iv_ptr;
        uint8_t block[EVP_MAX_MD_SIZE];
        int ret;
@@ -687,13 +714,15 @@ odp_crypto_alg_err_t aes_gmac_check(odp_packet_t pkt,
                return ODP_CRYPTO_ALG_ERR_IV_INVALID;
 
        /* Decrypt it */
-       ctx = EVP_CIPHER_CTX_new();
-       EVP_DecryptInit_ex(ctx, session->auth.evp_cipher, NULL,
-                          session->auth.key, NULL);
-       EVP_CIPHER_CTX_ctrl(ctx, EVP_CTRL_GCM_SET_IVLEN,
-                           session->p.iv.length, NULL);
+       if (!IS_VALID(session, cipher, local.id)) {
+               SET_VALID(session, cipher, local.id);
+               EVP_DecryptInit_ex(ctx, session->auth.evp_cipher, NULL,
+                                  session->auth.key, NULL);
+               EVP_CIPHER_CTX_ctrl(ctx, EVP_CTRL_GCM_SET_IVLEN,
+                                   session->p.iv.length, NULL);
+               EVP_CIPHER_CTX_set_padding(ctx, 0);
+       }
        EVP_DecryptInit_ex(ctx, NULL, NULL, NULL, iv_ptr);
-       EVP_CIPHER_CTX_set_padding(ctx, 0);
 
        odp_packet_copy_to_mem(pkt, param->hash_result_offset,
                               session->p.auth_digest_len, block);
@@ -704,8 +733,6 @@ odp_crypto_alg_err_t aes_gmac_check(odp_packet_t pkt,
 
        ret = internal_aad(ctx, pkt, param);
 
-       EVP_CIPHER_CTX_free(ctx);
-
        return ret <= 0 ? ODP_CRYPTO_ALG_ERR_ICV_CHECK :
                          ODP_CRYPTO_ALG_ERR_NONE;
 }
@@ -1213,6 +1240,41 @@ int odp_crypto_term_global(void)
        return rc;
 }
 
+int _odp_crypto_init_local(void)
+{
+       unsigned i;
+
+       memset(&local, 0, sizeof(local));
+
+       for (i = 0; i < MAX_SESSIONS; i++) {
+               local.ctx[i].hmac = HMAC_CTX_new();
+               local.ctx[i].cipher = EVP_CIPHER_CTX_new();
+
+               if (local.ctx[i].hmac == NULL || local.ctx[i].cipher == NULL) {
+                       _odp_crypto_term_local();
+                       return -1;
+               }
+       }
+
+       local.id = odp_thread_id();
+
+       return 0;
+}
+
+int _odp_crypto_term_local(void)
+{
+       unsigned i;
+
+       for (i = 0; i < MAX_SESSIONS; i++) {
+               if (local.ctx[i].hmac != NULL)
+                       HMAC_CTX_free(local.ctx[i].hmac);
+               if (local.ctx[i].cipher != NULL)
+                       EVP_CIPHER_CTX_free(local.ctx[i].cipher);
+       }
+
+       return 0;
+}
+
 odp_random_kind_t odp_random_max_kind(void)
 {
        return ODP_RANDOM_CRYPTO;
diff --git a/platform/linux-generic/odp_init.c 
b/platform/linux-generic/odp_init.c
index 1412c03a0..eb74437b2 100644
--- a/platform/linux-generic/odp_init.c
+++ b/platform/linux-generic/odp_init.c
@@ -418,6 +418,12 @@ int odp_init_local(odp_instance_t instance, 
odp_thread_type_t thr_type)
        }
        stage = PKTIO_INIT;
 
+       if (_odp_crypto_init_local()) {
+               ODP_ERR("ODP crypto local init failed.\n");
+               goto init_fail;
+       }
+       stage = CRYPTO_INIT;
+
        if (odp_pool_init_local()) {
                ODP_ERR("ODP pool local init failed.\n");
                goto init_fail;
@@ -470,6 +476,13 @@ int _odp_term_local(enum init_stage stage)
                }
                /* Fall through */
 
+       case CRYPTO_INIT:
+               if (_odp_crypto_term_local()) {
+                       ODP_ERR("ODP crypto local term failed.\n");
+                       rc = -1;
+               }
+               /* Fall through */
+
        case POOL_INIT:
                if (odp_pool_term_local()) {
                        ODP_ERR("ODP buffer pool local term failed.\n");

Reply via email to