| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 1 | /** | 
|  | 2 | * PSA API multi-part HMAC demonstration. | 
| Manuel Pégourié-Gonnard | 0e725c3 | 2022-01-27 11:15:33 +0100 | [diff] [blame] | 3 | * | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 4 | * This programs computes the HMAC of two messages using the multi-part API. | 
|  | 5 | * | 
| Manuel Pégourié-Gonnard | 29088a4 | 2022-02-01 09:38:26 +0100 | [diff] [blame] | 6 | * It comes with a companion program hash/md_hmac_demo.c, which does the same | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 7 | * operations with the legacy MD API. The goal is that comparing the two | 
|  | 8 | * programs will help people migrating to the PSA Crypto API. | 
|  | 9 | * | 
|  | 10 | * When it comes to multi-part HMAC operations, the `mbedtls_md_context` | 
|  | 11 | * serves a dual purpose (1) hold the key, and (2) save progress information | 
|  | 12 | * for the current operation. With PSA those roles are held by two disinct | 
|  | 13 | * objects: (1) a psa_key_id_t to hold the key, and (2) a psa_operation_t for | 
|  | 14 | * multi-part progress. | 
|  | 15 | * | 
| Manuel Pégourié-Gonnard | 64754e1 | 2022-02-08 11:21:14 +0100 | [diff] [blame] | 16 | * This program and its companion hash/md_hmac_demo.c illustrate this by doing | 
|  | 17 | * the same sequence of multi-part HMAC computation with both APIs; looking at | 
|  | 18 | * the two side by side should make the differences and similarities clear. | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 19 | */ | 
|  | 20 |  | 
|  | 21 | /* | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 22 | *  Copyright The Mbed TLS Contributors | 
|  | 23 | *  SPDX-License-Identifier: Apache-2.0 | 
|  | 24 | * | 
|  | 25 | *  Licensed under the Apache License, Version 2.0 (the "License"); you may | 
|  | 26 | *  not use this file except in compliance with the License. | 
|  | 27 | *  You may obtain a copy of the License at | 
|  | 28 | * | 
|  | 29 | *  http://www.apache.org/licenses/LICENSE-2.0 | 
|  | 30 | * | 
|  | 31 | *  Unless required by applicable law or agreed to in writing, software | 
|  | 32 | *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT | 
|  | 33 | *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | 
|  | 34 | *  See the License for the specific language governing permissions and | 
|  | 35 | *  limitations under the License. | 
|  | 36 | */ | 
|  | 37 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 38 | /* First include Mbed TLS headers to get the Mbed TLS configuration and | 
|  | 39 | * platform definitions that we'll use in this program. Also include | 
|  | 40 | * standard C headers for functions we'll use here. */ | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 41 | #include "mbedtls/build_info.h" | 
|  | 42 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 43 | #include "psa/crypto.h" | 
|  | 44 |  | 
| Manuel Pégourié-Gonnard | 6349794 | 2022-01-31 12:23:37 +0100 | [diff] [blame] | 45 | #include "mbedtls/platform_util.h" // for mbedtls_platform_zeroize | 
|  | 46 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 47 | #include <stdlib.h> | 
|  | 48 | #include <stdio.h> | 
|  | 49 |  | 
|  | 50 | /* If the build options we need are not enabled, compile a placeholder. */ | 
| Manuel Pégourié-Gonnard | edf6e83 | 2022-01-27 12:36:39 +0100 | [diff] [blame] | 51 | #if !defined(MBEDTLS_PSA_CRYPTO_C) || \ | 
| Manuel Pégourié-Gonnard | 9efbf53 | 2022-01-17 11:57:44 +0100 | [diff] [blame] | 52 | defined(MBEDTLS_PSA_CRYPTO_KEY_ID_ENCODES_OWNER) | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 53 | int main(void) | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 54 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 55 | printf("MBEDTLS_PSA_CRYPTO_C not defined, " | 
|  | 56 | "and/or MBEDTLS_PSA_CRYPTO_KEY_ID_ENCODES_OWNER defined\r\n"); | 
|  | 57 | return 0; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 58 | } | 
| Manuel Pégourié-Gonnard | edf6e83 | 2022-01-27 12:36:39 +0100 | [diff] [blame] | 59 | #else | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 60 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 61 | /* The real program starts here. */ | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 62 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 63 | /* Dummy inputs for HMAC */ | 
| Manuel Pégourié-Gonnard | beef9c2 | 2022-01-27 11:42:47 +0100 | [diff] [blame] | 64 | const unsigned char msg1_part1[] = { 0x01, 0x02 }; | 
|  | 65 | const unsigned char msg1_part2[] = { 0x03, 0x04 }; | 
|  | 66 | const unsigned char msg2_part1[] = { 0x05, 0x05 }; | 
|  | 67 | const unsigned char msg2_part2[] = { 0x06, 0x06 }; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 68 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 69 | /* Dummy key material - never do this in production! | 
|  | 70 | * This example program uses SHA-256, so a 32-byte key makes sense. */ | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 71 | const unsigned char key_bytes[32] = { 0 }; | 
|  | 72 |  | 
| Manuel Pégourié-Gonnard | 6349794 | 2022-01-31 12:23:37 +0100 | [diff] [blame] | 73 | /* Print the contents of a buffer in hex */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 74 | void print_buf(const char *title, uint8_t *buf, size_t len) | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 75 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 76 | printf("%s:", title); | 
|  | 77 | for (size_t i = 0; i < len; i++) { | 
|  | 78 | printf(" %02x", buf[i]); | 
|  | 79 | } | 
|  | 80 | printf("\n"); | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 81 | } | 
|  | 82 |  | 
| Manuel Pégourié-Gonnard | 340808c | 2022-02-08 11:15:26 +0100 | [diff] [blame] | 83 | /* Run a PSA function and bail out if it fails. | 
|  | 84 | * The symbolic name of the error code can be recovered using: | 
| Tom Cosgrove | 1797b05 | 2022-12-04 17:19:59 +0000 | [diff] [blame] | 85 | * programs/psa/psa_constant_name status <value> */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 86 | #define PSA_CHECK(expr)                                       \ | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 87 | do                                                          \ | 
|  | 88 | {                                                           \ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 89 | status = (expr);                                      \ | 
|  | 90 | if (status != PSA_SUCCESS)                             \ | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 91 | {                                                       \ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 92 | printf("Error %d at line %d: %s\n",                \ | 
|  | 93 | (int) status,                               \ | 
|  | 94 | __LINE__,                                   \ | 
|  | 95 | #expr);                                    \ | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 96 | goto exit;                                          \ | 
|  | 97 | }                                                       \ | 
|  | 98 | }                                                           \ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 99 | while (0) | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 100 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 101 | /* | 
|  | 102 | * This function demonstrates computation of the HMAC of two messages using | 
|  | 103 | * the multipart API. | 
|  | 104 | */ | 
| Manuel Pégourié-Gonnard | edf6e83 | 2022-01-27 12:36:39 +0100 | [diff] [blame] | 105 | psa_status_t hmac_demo(void) | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 106 | { | 
|  | 107 | psa_status_t status; | 
| Manuel Pégourié-Gonnard | f6ea19c | 2022-02-01 13:08:21 +0100 | [diff] [blame] | 108 | const psa_algorithm_t alg = PSA_ALG_HMAC(PSA_ALG_SHA_256); | 
|  | 109 | uint8_t out[PSA_MAC_MAX_SIZE]; // safe but not optimal | 
|  | 110 | /* PSA_MAC_LENGTH(PSA_KEY_TYPE_HMAC, 8 * sizeof( key_bytes ), alg) | 
| Dave Rodgman | 017a199 | 2022-03-31 14:07:01 +0100 | [diff] [blame] | 111 | * should work but see https://github.com/Mbed-TLS/mbedtls/issues/4320 */ | 
| Manuel Pégourié-Gonnard | 6349794 | 2022-01-31 12:23:37 +0100 | [diff] [blame] | 112 |  | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 113 | psa_key_attributes_t attributes = PSA_KEY_ATTRIBUTES_INIT; | 
|  | 114 | psa_key_id_t key = 0; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 115 |  | 
|  | 116 | /* prepare key */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 117 | psa_set_key_usage_flags(&attributes, PSA_KEY_USAGE_SIGN_MESSAGE); | 
|  | 118 | psa_set_key_algorithm(&attributes, alg); | 
|  | 119 | psa_set_key_type(&attributes, PSA_KEY_TYPE_HMAC); | 
|  | 120 | psa_set_key_bits(&attributes, 8 * sizeof(key_bytes));     // optional | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 121 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 122 | status = psa_import_key(&attributes, | 
|  | 123 | key_bytes, sizeof(key_bytes), &key); | 
|  | 124 | if (status != PSA_SUCCESS) { | 
|  | 125 | return status; | 
|  | 126 | } | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 127 |  | 
|  | 128 | /* prepare operation */ | 
|  | 129 | psa_mac_operation_t op = PSA_MAC_OPERATION_INIT; | 
|  | 130 | size_t out_len = 0; | 
|  | 131 |  | 
| Manuel Pégourié-Gonnard | beef9c2 | 2022-01-27 11:42:47 +0100 | [diff] [blame] | 132 | /* compute HMAC(key, msg1_part1 | msg1_part2) */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 133 | PSA_CHECK(psa_mac_sign_setup(&op, key, alg)); | 
|  | 134 | PSA_CHECK(psa_mac_update(&op, msg1_part1, sizeof(msg1_part1))); | 
|  | 135 | PSA_CHECK(psa_mac_update(&op, msg1_part2, sizeof(msg1_part2))); | 
|  | 136 | PSA_CHECK(psa_mac_sign_finish(&op, out, sizeof(out), &out_len)); | 
|  | 137 | print_buf("msg1", out, out_len); | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 138 |  | 
| Manuel Pégourié-Gonnard | beef9c2 | 2022-01-27 11:42:47 +0100 | [diff] [blame] | 139 | /* compute HMAC(key, msg2_part1 | msg2_part2) */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 140 | PSA_CHECK(psa_mac_sign_setup(&op, key, alg)); | 
|  | 141 | PSA_CHECK(psa_mac_update(&op, msg2_part1, sizeof(msg2_part1))); | 
|  | 142 | PSA_CHECK(psa_mac_update(&op, msg2_part2, sizeof(msg2_part2))); | 
|  | 143 | PSA_CHECK(psa_mac_sign_finish(&op, out, sizeof(out), &out_len)); | 
|  | 144 | print_buf("msg2", out, out_len); | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 145 |  | 
|  | 146 | exit: | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 147 | psa_mac_abort(&op);   // needed on error, harmless on success | 
|  | 148 | psa_destroy_key(key); | 
|  | 149 | mbedtls_platform_zeroize(out, sizeof(out)); | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 150 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 151 | return status; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 152 | } | 
|  | 153 |  | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 154 | int main(void) | 
|  | 155 | { | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 156 | psa_status_t status = PSA_SUCCESS; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 157 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 158 | /* Initialize the PSA crypto library. */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 159 | PSA_CHECK(psa_crypto_init()); | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 160 |  | 
|  | 161 | /* Run the demo */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 162 | PSA_CHECK(hmac_demo()); | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 163 |  | 
|  | 164 | /* Deinitialize the PSA crypto library. */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 165 | mbedtls_psa_crypto_free(); | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 166 |  | 
|  | 167 | exit: | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 168 | return status == PSA_SUCCESS ? EXIT_SUCCESS : EXIT_FAILURE; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 169 | } | 
|  | 170 |  | 
| Manuel Pégourié-Gonnard | edf6e83 | 2022-01-27 12:36:39 +0100 | [diff] [blame] | 171 | #endif |