Improve diagnostics for invalid arguments in asn1parse -strparse
[openssl.git] / crypto / hmac / hm_ameth.c
1 /*
2  * Copyright 2007-2018 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (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 #include <stdio.h>
11 #include "internal/cryptlib.h"
12 #include <openssl/evp.h>
13 #include "internal/asn1_int.h"
14 #include "internal/evp_int.h"
15
16 /*
17  * HMAC "ASN1" method. This is just here to indicate the maximum HMAC output
18  * length and to free up an HMAC key.
19  */
20
21 static int hmac_size(const EVP_PKEY *pkey)
22 {
23     return EVP_MAX_MD_SIZE;
24 }
25
26 static void hmac_key_free(EVP_PKEY *pkey)
27 {
28     ASN1_OCTET_STRING *os = EVP_PKEY_get0(pkey);
29     if (os) {
30         if (os->data)
31             OPENSSL_cleanse(os->data, os->length);
32         ASN1_OCTET_STRING_free(os);
33     }
34 }
35
36 static int hmac_pkey_ctrl(EVP_PKEY *pkey, int op, long arg1, void *arg2)
37 {
38     switch (op) {
39     case ASN1_PKEY_CTRL_DEFAULT_MD_NID:
40         *(int *)arg2 = NID_sha256;
41         return 1;
42
43     default:
44         return -2;
45     }
46 }
47
48 static int hmac_pkey_public_cmp(const EVP_PKEY *a, const EVP_PKEY *b)
49 {
50     return ASN1_OCTET_STRING_cmp(EVP_PKEY_get0(a), EVP_PKEY_get0(b));
51 }
52
53 static int hmac_set_priv_key(EVP_PKEY *pkey, const unsigned char *priv,
54                              size_t len)
55 {
56     ASN1_OCTET_STRING *os;
57
58     if (pkey->pkey.ptr != NULL)
59         return 0;
60
61     os = ASN1_OCTET_STRING_new();
62     if (os == NULL)
63         return 0;
64
65
66     if (!ASN1_OCTET_STRING_set(os, priv, len)) {
67         ASN1_OCTET_STRING_free(os);
68         return 0;
69     }
70
71     pkey->pkey.ptr = os;
72     return 1;
73 }
74
75 const EVP_PKEY_ASN1_METHOD hmac_asn1_meth = {
76     EVP_PKEY_HMAC,
77     EVP_PKEY_HMAC,
78     0,
79
80     "HMAC",
81     "OpenSSL HMAC method",
82
83     0, 0, hmac_pkey_public_cmp, 0,
84
85     0, 0, 0,
86
87     hmac_size,
88     0, 0,
89     0, 0, 0, 0, 0, 0, 0,
90
91     hmac_key_free,
92     hmac_pkey_ctrl,
93     NULL,
94     NULL,
95
96     NULL,
97     NULL,
98     NULL,
99
100     NULL,
101     NULL,
102     NULL,
103
104     hmac_set_priv_key,
105     NULL,
106 };