| 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 | 
| Dave Rodgman | 16799db | 2023-11-02 19:47:20 +0000 | [diff] [blame] | 23 | *  SPDX-License-Identifier: Apache-2.0 OR GPL-2.0-or-later | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 24 | */ | 
|  | 25 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 26 | /* First include Mbed TLS headers to get the Mbed TLS configuration and | 
|  | 27 | * platform definitions that we'll use in this program. Also include | 
|  | 28 | * standard C headers for functions we'll use here. */ | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 29 | #include "mbedtls/build_info.h" | 
|  | 30 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 31 | #include "psa/crypto.h" | 
|  | 32 |  | 
| Manuel Pégourié-Gonnard | 6349794 | 2022-01-31 12:23:37 +0100 | [diff] [blame] | 33 | #include "mbedtls/platform_util.h" // for mbedtls_platform_zeroize | 
|  | 34 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 35 | #include <stdlib.h> | 
|  | 36 | #include <stdio.h> | 
|  | 37 |  | 
|  | 38 | /* 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] | 39 | #if !defined(MBEDTLS_PSA_CRYPTO_C) || \ | 
| Manuel Pégourié-Gonnard | 9efbf53 | 2022-01-17 11:57:44 +0100 | [diff] [blame] | 40 | defined(MBEDTLS_PSA_CRYPTO_KEY_ID_ENCODES_OWNER) | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 41 | int main(void) | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 42 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 43 | printf("MBEDTLS_PSA_CRYPTO_C not defined, " | 
|  | 44 | "and/or MBEDTLS_PSA_CRYPTO_KEY_ID_ENCODES_OWNER defined\r\n"); | 
|  | 45 | return 0; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 46 | } | 
| Manuel Pégourié-Gonnard | edf6e83 | 2022-01-27 12:36:39 +0100 | [diff] [blame] | 47 | #else | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 48 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 49 | /* The real program starts here. */ | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 50 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 51 | /* Dummy inputs for HMAC */ | 
| Manuel Pégourié-Gonnard | beef9c2 | 2022-01-27 11:42:47 +0100 | [diff] [blame] | 52 | const unsigned char msg1_part1[] = { 0x01, 0x02 }; | 
|  | 53 | const unsigned char msg1_part2[] = { 0x03, 0x04 }; | 
|  | 54 | const unsigned char msg2_part1[] = { 0x05, 0x05 }; | 
|  | 55 | const unsigned char msg2_part2[] = { 0x06, 0x06 }; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 56 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 57 | /* Dummy key material - never do this in production! | 
|  | 58 | * 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] | 59 | const unsigned char key_bytes[32] = { 0 }; | 
|  | 60 |  | 
| Michael Schuster | 9bf1875 | 2024-07-21 00:44:33 +0200 | [diff] [blame] | 61 | /* Print the contents of a buffer in hex */ | 
| Michael Schuster | 5830505 | 2024-07-21 00:46:10 +0200 | [diff] [blame] | 62 | static void print_buf(const char *title, uint8_t *buf, size_t len) | 
| Michael Schuster | 9bf1875 | 2024-07-21 00:44:33 +0200 | [diff] [blame] | 63 | { | 
|  | 64 | printf("%s:", title); | 
|  | 65 | for (size_t i = 0; i < len; i++) { | 
|  | 66 | printf(" %02x", buf[i]); | 
|  | 67 | } | 
|  | 68 | printf("\n"); | 
|  | 69 | } | 
|  | 70 |  | 
| Manuel Pégourié-Gonnard | 340808c | 2022-02-08 11:15:26 +0100 | [diff] [blame] | 71 | /* Run a PSA function and bail out if it fails. | 
|  | 72 | * The symbolic name of the error code can be recovered using: | 
| Tom Cosgrove | 1797b05 | 2022-12-04 17:19:59 +0000 | [diff] [blame] | 73 | * programs/psa/psa_constant_name status <value> */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 74 | #define PSA_CHECK(expr)                                       \ | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 75 | do                                                          \ | 
|  | 76 | {                                                           \ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 77 | status = (expr);                                      \ | 
|  | 78 | if (status != PSA_SUCCESS)                             \ | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 79 | {                                                       \ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 80 | printf("Error %d at line %d: %s\n",                \ | 
|  | 81 | (int) status,                               \ | 
|  | 82 | __LINE__,                                   \ | 
|  | 83 | #expr);                                    \ | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 84 | goto exit;                                          \ | 
|  | 85 | }                                                       \ | 
|  | 86 | }                                                           \ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 87 | while (0) | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 88 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 89 | /* | 
|  | 90 | * This function demonstrates computation of the HMAC of two messages using | 
|  | 91 | * the multipart API. | 
|  | 92 | */ | 
| Michael Schuster | 6fa32fd | 2024-06-01 21:15:02 +0200 | [diff] [blame] | 93 | static psa_status_t hmac_demo(void) | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 94 | { | 
|  | 95 | psa_status_t status; | 
| Manuel Pégourié-Gonnard | f6ea19c | 2022-02-01 13:08:21 +0100 | [diff] [blame] | 96 | const psa_algorithm_t alg = PSA_ALG_HMAC(PSA_ALG_SHA_256); | 
|  | 97 | uint8_t out[PSA_MAC_MAX_SIZE]; // safe but not optimal | 
|  | 98 | /* PSA_MAC_LENGTH(PSA_KEY_TYPE_HMAC, 8 * sizeof( key_bytes ), alg) | 
| Dave Rodgman | 017a199 | 2022-03-31 14:07:01 +0100 | [diff] [blame] | 99 | * 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] | 100 |  | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 101 | psa_key_attributes_t attributes = PSA_KEY_ATTRIBUTES_INIT; | 
|  | 102 | psa_key_id_t key = 0; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 103 |  | 
|  | 104 | /* prepare key */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 105 | psa_set_key_usage_flags(&attributes, PSA_KEY_USAGE_SIGN_MESSAGE); | 
|  | 106 | psa_set_key_algorithm(&attributes, alg); | 
|  | 107 | psa_set_key_type(&attributes, PSA_KEY_TYPE_HMAC); | 
|  | 108 | psa_set_key_bits(&attributes, 8 * sizeof(key_bytes));     // optional | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 109 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 110 | status = psa_import_key(&attributes, | 
|  | 111 | key_bytes, sizeof(key_bytes), &key); | 
|  | 112 | if (status != PSA_SUCCESS) { | 
|  | 113 | return status; | 
|  | 114 | } | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 115 |  | 
|  | 116 | /* prepare operation */ | 
|  | 117 | psa_mac_operation_t op = PSA_MAC_OPERATION_INIT; | 
|  | 118 | size_t out_len = 0; | 
|  | 119 |  | 
| Manuel Pégourié-Gonnard | beef9c2 | 2022-01-27 11:42:47 +0100 | [diff] [blame] | 120 | /* compute HMAC(key, msg1_part1 | msg1_part2) */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 121 | PSA_CHECK(psa_mac_sign_setup(&op, key, alg)); | 
|  | 122 | PSA_CHECK(psa_mac_update(&op, msg1_part1, sizeof(msg1_part1))); | 
|  | 123 | PSA_CHECK(psa_mac_update(&op, msg1_part2, sizeof(msg1_part2))); | 
|  | 124 | PSA_CHECK(psa_mac_sign_finish(&op, out, sizeof(out), &out_len)); | 
| Michael Schuster | 9bf1875 | 2024-07-21 00:44:33 +0200 | [diff] [blame] | 125 | print_buf("msg1", out, out_len); | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 126 |  | 
| Manuel Pégourié-Gonnard | beef9c2 | 2022-01-27 11:42:47 +0100 | [diff] [blame] | 127 | /* compute HMAC(key, msg2_part1 | msg2_part2) */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 128 | PSA_CHECK(psa_mac_sign_setup(&op, key, alg)); | 
|  | 129 | PSA_CHECK(psa_mac_update(&op, msg2_part1, sizeof(msg2_part1))); | 
|  | 130 | PSA_CHECK(psa_mac_update(&op, msg2_part2, sizeof(msg2_part2))); | 
|  | 131 | PSA_CHECK(psa_mac_sign_finish(&op, out, sizeof(out), &out_len)); | 
| Michael Schuster | 9bf1875 | 2024-07-21 00:44:33 +0200 | [diff] [blame] | 132 | print_buf("msg2", out, out_len); | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 133 |  | 
|  | 134 | exit: | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 135 | psa_mac_abort(&op);   // needed on error, harmless on success | 
|  | 136 | psa_destroy_key(key); | 
|  | 137 | mbedtls_platform_zeroize(out, sizeof(out)); | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 138 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 139 | return status; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 140 | } | 
|  | 141 |  | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 142 | int main(void) | 
|  | 143 | { | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 144 | psa_status_t status = PSA_SUCCESS; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 145 |  | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 146 | /* Initialize the PSA crypto library. */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 147 | PSA_CHECK(psa_crypto_init()); | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 148 |  | 
|  | 149 | /* Run the demo */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 150 | PSA_CHECK(hmac_demo()); | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 151 |  | 
|  | 152 | /* Deinitialize the PSA crypto library. */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 153 | mbedtls_psa_crypto_free(); | 
| Manuel Pégourié-Gonnard | f392a02 | 2022-01-31 12:06:07 +0100 | [diff] [blame] | 154 |  | 
|  | 155 | exit: | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 156 | return status == PSA_SUCCESS ? EXIT_SUCCESS : EXIT_FAILURE; | 
| Manuel Pégourié-Gonnard | 667b556 | 2021-11-22 13:00:17 +0100 | [diff] [blame] | 157 | } | 
|  | 158 |  | 
| Manuel Pégourié-Gonnard | edf6e83 | 2022-01-27 12:36:39 +0100 | [diff] [blame] | 159 | #endif |