2 * Copyright 2018 The OpenSSL Project Authors. All Rights Reserved.
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
12 #include <openssl/evp.h>
13 #include <openssl/err.h>
14 #include <openssl/ossl_typ.h>
15 #include "internal/nelem.h"
16 #include "internal/evp_int.h"
19 EVP_MAC_CTX *EVP_MAC_CTX_new_id(int id)
21 const EVP_MAC *mac = EVP_get_macbynid(id);
25 return EVP_MAC_CTX_new(mac);
28 EVP_MAC_CTX *EVP_MAC_CTX_new(const EVP_MAC *mac)
30 EVP_MAC_CTX *ctx = OPENSSL_zalloc(sizeof(EVP_MAC_CTX));
32 if (ctx == NULL || (ctx->data = mac->new()) == NULL) {
33 EVPerr(EVP_F_EVP_MAC_CTX_NEW, ERR_R_MALLOC_FAILURE);
42 void EVP_MAC_CTX_free(EVP_MAC_CTX *ctx)
44 if (ctx != NULL && ctx->data != NULL) {
45 ctx->meth->free(ctx->data);
51 EVP_MAC_CTX *EVP_MAC_CTX_dup(const EVP_MAC_CTX *src)
53 EVP_MAC_CTX *dst = EVP_MAC_CTX_new(src->meth);
58 dst = OPENSSL_malloc(sizeof(*dst));
60 EVPerr(EVP_F_EVP_MAC_CTX_DUP, ERR_R_MALLOC_FAILURE);
66 dst->data = src->meth->dup(src->data);
67 if (dst->data == NULL) {
68 EVP_MAC_CTX_free(dst);
75 const EVP_MAC *EVP_MAC_CTX_mac(EVP_MAC_CTX *ctx)
80 size_t EVP_MAC_size(EVP_MAC_CTX *ctx)
82 if (ctx->data != NULL)
83 return ctx->meth->size(ctx->data);
84 /* If the MAC hasn't been initialized yet, we return zero */
88 int EVP_MAC_init(EVP_MAC_CTX *ctx)
90 return ctx->meth->init(ctx->data);
93 int EVP_MAC_update(EVP_MAC_CTX *ctx, const unsigned char *data, size_t datalen)
97 return ctx->meth->update(ctx->data, data, datalen);
100 int EVP_MAC_final(EVP_MAC_CTX *ctx, unsigned char *out, size_t *poutlen)
102 int l = ctx->meth->size(ctx->data);
110 return ctx->meth->final(ctx->data, out);
113 int EVP_MAC_ctrl(EVP_MAC_CTX *ctx, int cmd, ...)
119 ok = EVP_MAC_vctrl(ctx, cmd, args);
123 EVPerr(EVP_F_EVP_MAC_CTRL, EVP_R_COMMAND_NOT_SUPPORTED);
128 int EVP_MAC_vctrl(EVP_MAC_CTX *ctx, int cmd, va_list args)
132 if (ctx == NULL || ctx->meth == NULL)
143 if (ctx->meth->ctrl != NULL)
144 ok = ctx->meth->ctrl(ctx->data, cmd, args);
153 int EVP_MAC_ctrl_str(EVP_MAC_CTX *ctx, const char *type, const char *value)
157 if (ctx == NULL || ctx->meth == NULL || ctx->meth->ctrl_str == NULL) {
158 EVPerr(EVP_F_EVP_MAC_CTRL_STR, EVP_R_COMMAND_NOT_SUPPORTED);
162 ok = ctx->meth->ctrl_str(ctx->data, type, value);
165 EVPerr(EVP_F_EVP_MAC_CTRL_STR, EVP_R_COMMAND_NOT_SUPPORTED);
169 int EVP_MAC_str2ctrl(EVP_MAC_CTX *ctx, int cmd, const char *value)
176 return EVP_MAC_ctrl(ctx, cmd, value, len);
179 int EVP_MAC_hex2ctrl(EVP_MAC_CTX *ctx, int cmd, const char *hex)
185 bin = OPENSSL_hexstr2buf(hex, &binlen);
188 if (binlen <= INT_MAX)
189 rv = EVP_MAC_ctrl(ctx, cmd, bin, (size_t)binlen);
194 int EVP_MAC_nid(const EVP_MAC *mac)