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 int EVP_MAC_CTX_copy(EVP_MAC_CTX
*dst
, const EVP_MAC_CTX
*src
)
53 EVP_MAC_IMPL
*macdata
;
55 if (src
->data
!= NULL
&& !dst
->meth
->copy(dst
->data
, src
->data
))
65 const EVP_MAC
*EVP_MAC_CTX_mac(EVP_MAC_CTX
*ctx
)
70 size_t EVP_MAC_size(EVP_MAC_CTX
*ctx
)
72 if (ctx
->data
!= NULL
)
73 return ctx
->meth
->size(ctx
->data
);
74 /* If the MAC hasn't been initialized yet, we return zero */
78 int EVP_MAC_init(EVP_MAC_CTX
*ctx
)
80 return ctx
->meth
->init(ctx
->data
);
83 int EVP_MAC_update(EVP_MAC_CTX
*ctx
, const unsigned char *data
, size_t datalen
)
87 return ctx
->meth
->update(ctx
->data
, data
, datalen
);
90 int EVP_MAC_final(EVP_MAC_CTX
*ctx
, unsigned char *out
, size_t *poutlen
)
92 int l
= ctx
->meth
->size(ctx
->data
);
100 return ctx
->meth
->final(ctx
->data
, out
);
103 int EVP_MAC_ctrl(EVP_MAC_CTX
*ctx
, int cmd
, ...)
109 ok
= EVP_MAC_vctrl(ctx
, cmd
, args
);
113 EVPerr(EVP_F_EVP_MAC_CTRL
, EVP_R_COMMAND_NOT_SUPPORTED
);
118 int EVP_MAC_vctrl(EVP_MAC_CTX
*ctx
, int cmd
, va_list args
)
122 if (ctx
== NULL
|| ctx
->meth
== NULL
)
133 if (ctx
->meth
->ctrl
!= NULL
)
134 ok
= ctx
->meth
->ctrl(ctx
->data
, cmd
, args
);
143 int EVP_MAC_ctrl_str(EVP_MAC_CTX
*ctx
, const char *type
, const char *value
)
147 if (ctx
== NULL
|| ctx
->meth
== NULL
|| ctx
->meth
->ctrl_str
== NULL
) {
148 EVPerr(EVP_F_EVP_MAC_CTRL_STR
, EVP_R_COMMAND_NOT_SUPPORTED
);
152 ok
= ctx
->meth
->ctrl_str(ctx
->data
, type
, value
);
155 EVPerr(EVP_F_EVP_MAC_CTRL_STR
, EVP_R_COMMAND_NOT_SUPPORTED
);
159 int EVP_MAC_str2ctrl(EVP_MAC_CTX
*ctx
, int cmd
, const char *value
)
166 return EVP_MAC_ctrl(ctx
, cmd
, value
, len
);
169 int EVP_MAC_hex2ctrl(EVP_MAC_CTX
*ctx
, int cmd
, const char *hex
)
175 bin
= OPENSSL_hexstr2buf(hex
, &binlen
);
178 if (binlen
<= INT_MAX
)
179 rv
= EVP_MAC_ctrl(ctx
, cmd
, bin
, (size_t)binlen
);
184 int EVP_MAC_nid(const EVP_MAC
*mac
)