Ivan Grokhotkov / hmac_md5

A simple CyaSSL-based HMAC-MD5 implementation. Licensed under GPL v2.

Dependents:   RFrec_full RFtrans_full

The output will be base64-encoded, with trailing "==", like this:

j62o/jZsAZD9i9m+32lIuQ==

Example

#include "mbed.h"
#include "hmac_md5.h"

Serial pc(USBTX, USBRX); // tx, rx

void main(void)
{
    
    const char * key = "MySecretKey";
    
    const char * text = "message to be signed";
    
    char output[26];
    
    HMAC_MD5(key, text, output);

    printf("result = %s\n", output);

    while(true){}
}

misc.c@0:83f3dcfa5c8f, 2013-02-06 (annotated)

Committer:
igrokhotkov
Date:
Wed Feb 06 20:35:03 2013 +0000
Revision:
0:83f3dcfa5c8f
initial revision

Who changed what in which revision?

UserRevisionLine numberNew contents of line
igrokhotkov 0:83f3dcfa5c8f 1 /* misc.c
igrokhotkov 0:83f3dcfa5c8f 2 *
igrokhotkov 0:83f3dcfa5c8f 3 * Copyright (C) 2006-2012 Sawtooth Consulting Ltd.
igrokhotkov 0:83f3dcfa5c8f 4 *
igrokhotkov 0:83f3dcfa5c8f 5 * This file is part of CyaSSL.
igrokhotkov 0:83f3dcfa5c8f 6 *
igrokhotkov 0:83f3dcfa5c8f 7 * CyaSSL is free software; you can redistribute it and/or modify
igrokhotkov 0:83f3dcfa5c8f 8 * it under the terms of the GNU General Public License as published by
igrokhotkov 0:83f3dcfa5c8f 9 * the Free Software Foundation; either version 2 of the License, or
igrokhotkov 0:83f3dcfa5c8f 10 * (at your option) any later version.
igrokhotkov 0:83f3dcfa5c8f 11 *
igrokhotkov 0:83f3dcfa5c8f 12 * CyaSSL is distributed in the hope that it will be useful,
igrokhotkov 0:83f3dcfa5c8f 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
igrokhotkov 0:83f3dcfa5c8f 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
igrokhotkov 0:83f3dcfa5c8f 15 * GNU General Public License for more details.
igrokhotkov 0:83f3dcfa5c8f 16 *
igrokhotkov 0:83f3dcfa5c8f 17 * You should have received a copy of the GNU General Public License
igrokhotkov 0:83f3dcfa5c8f 18 * along with this program; if not, write to the Free Software
igrokhotkov 0:83f3dcfa5c8f 19 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
igrokhotkov 0:83f3dcfa5c8f 20 */
igrokhotkov 0:83f3dcfa5c8f 21
igrokhotkov 0:83f3dcfa5c8f 22 #ifdef HAVE_CONFIG_H
igrokhotkov 0:83f3dcfa5c8f 23 #include <config.h>
igrokhotkov 0:83f3dcfa5c8f 24 #endif
igrokhotkov 0:83f3dcfa5c8f 25
igrokhotkov 0:83f3dcfa5c8f 26 #include "misc.h"
igrokhotkov 0:83f3dcfa5c8f 27
igrokhotkov 0:83f3dcfa5c8f 28 /* inlining these functions is a huge speed increase and a small size decrease,
igrokhotkov 0:83f3dcfa5c8f 29 because the functions are smaller than function call setup/cleanup, e.g.,
igrokhotkov 0:83f3dcfa5c8f 30 md5 benchmark is twice as fast with inline. If you don't want it, then
igrokhotkov 0:83f3dcfa5c8f 31 define NO_INLINE and compile this file into cyassl, otherwise it's used as
igrokhotkov 0:83f3dcfa5c8f 32 a source header
igrokhotkov 0:83f3dcfa5c8f 33 */
igrokhotkov 0:83f3dcfa5c8f 34
igrokhotkov 0:83f3dcfa5c8f 35 #ifdef NO_INLINE
igrokhotkov 0:83f3dcfa5c8f 36 #define STATIC
igrokhotkov 0:83f3dcfa5c8f 37 #else
igrokhotkov 0:83f3dcfa5c8f 38 #define STATIC static
igrokhotkov 0:83f3dcfa5c8f 39 #endif
igrokhotkov 0:83f3dcfa5c8f 40
igrokhotkov 0:83f3dcfa5c8f 41
igrokhotkov 0:83f3dcfa5c8f 42 #ifdef INTEL_INTRINSICS
igrokhotkov 0:83f3dcfa5c8f 43
igrokhotkov 0:83f3dcfa5c8f 44 #include <stdlib.h> /* get intrinsic definitions */
igrokhotkov 0:83f3dcfa5c8f 45
igrokhotkov 0:83f3dcfa5c8f 46 #pragma intrinsic(_lrotl, _lrotr)
igrokhotkov 0:83f3dcfa5c8f 47
igrokhotkov 0:83f3dcfa5c8f 48 STATIC INLINE word32 rotlFixed(word32 x, word32 y)
igrokhotkov 0:83f3dcfa5c8f 49 {
igrokhotkov 0:83f3dcfa5c8f 50 return y ? _lrotl(x, y) : x;
igrokhotkov 0:83f3dcfa5c8f 51 }
igrokhotkov 0:83f3dcfa5c8f 52
igrokhotkov 0:83f3dcfa5c8f 53 STATIC INLINE word32 rotrFixed(word32 x, word32 y)
igrokhotkov 0:83f3dcfa5c8f 54 {
igrokhotkov 0:83f3dcfa5c8f 55 return y ? _lrotr(x, y) : x;
igrokhotkov 0:83f3dcfa5c8f 56 }
igrokhotkov 0:83f3dcfa5c8f 57
igrokhotkov 0:83f3dcfa5c8f 58 #else /* generic */
igrokhotkov 0:83f3dcfa5c8f 59
igrokhotkov 0:83f3dcfa5c8f 60 STATIC INLINE word32 rotlFixed(word32 x, word32 y)
igrokhotkov 0:83f3dcfa5c8f 61 {
igrokhotkov 0:83f3dcfa5c8f 62 return (x << y) | (x >> (sizeof(y) * 8 - y));
igrokhotkov 0:83f3dcfa5c8f 63 }
igrokhotkov 0:83f3dcfa5c8f 64
igrokhotkov 0:83f3dcfa5c8f 65
igrokhotkov 0:83f3dcfa5c8f 66 STATIC INLINE word32 rotrFixed(word32 x, word32 y)
igrokhotkov 0:83f3dcfa5c8f 67 {
igrokhotkov 0:83f3dcfa5c8f 68 return (x >> y) | (x << (sizeof(y) * 8 - y));
igrokhotkov 0:83f3dcfa5c8f 69 }
igrokhotkov 0:83f3dcfa5c8f 70
igrokhotkov 0:83f3dcfa5c8f 71 #endif
igrokhotkov 0:83f3dcfa5c8f 72
igrokhotkov 0:83f3dcfa5c8f 73
igrokhotkov 0:83f3dcfa5c8f 74 STATIC INLINE word32 ByteReverseWord32(word32 value)
igrokhotkov 0:83f3dcfa5c8f 75 {
igrokhotkov 0:83f3dcfa5c8f 76 #ifdef PPC_INTRINSICS
igrokhotkov 0:83f3dcfa5c8f 77 /* PPC: load reverse indexed instruction */
igrokhotkov 0:83f3dcfa5c8f 78 return (word32)__lwbrx(&value,0);
igrokhotkov 0:83f3dcfa5c8f 79 #elif defined(KEIL_INTRINSICS)
igrokhotkov 0:83f3dcfa5c8f 80 return (word32)__rev(value);
igrokhotkov 0:83f3dcfa5c8f 81 #elif defined(FAST_ROTATE)
igrokhotkov 0:83f3dcfa5c8f 82 /* 5 instructions with rotate instruction, 9 without */
igrokhotkov 0:83f3dcfa5c8f 83 return (rotrFixed(value, 8U) & 0xff00ff00) |
igrokhotkov 0:83f3dcfa5c8f 84 (rotlFixed(value, 8U) & 0x00ff00ff);
igrokhotkov 0:83f3dcfa5c8f 85 #else
igrokhotkov 0:83f3dcfa5c8f 86 /* 6 instructions with rotate instruction, 8 without */
igrokhotkov 0:83f3dcfa5c8f 87 value = ((value & 0xFF00FF00) >> 8) | ((value & 0x00FF00FF) << 8);
igrokhotkov 0:83f3dcfa5c8f 88 return rotlFixed(value, 16U);
igrokhotkov 0:83f3dcfa5c8f 89 #endif
igrokhotkov 0:83f3dcfa5c8f 90 }
igrokhotkov 0:83f3dcfa5c8f 91
igrokhotkov 0:83f3dcfa5c8f 92
igrokhotkov 0:83f3dcfa5c8f 93 STATIC INLINE void ByteReverseWords(word32* out, const word32* in,
igrokhotkov 0:83f3dcfa5c8f 94 word32 byteCount)
igrokhotkov 0:83f3dcfa5c8f 95 {
igrokhotkov 0:83f3dcfa5c8f 96 word32 count = byteCount/(word32)sizeof(word32), i;
igrokhotkov 0:83f3dcfa5c8f 97
igrokhotkov 0:83f3dcfa5c8f 98 for (i = 0; i < count; i++)
igrokhotkov 0:83f3dcfa5c8f 99 out[i] = ByteReverseWord32(in[i]);
igrokhotkov 0:83f3dcfa5c8f 100
igrokhotkov 0:83f3dcfa5c8f 101 }
igrokhotkov 0:83f3dcfa5c8f 102
igrokhotkov 0:83f3dcfa5c8f 103
igrokhotkov 0:83f3dcfa5c8f 104 #ifdef WORD64_AVAILABLE
igrokhotkov 0:83f3dcfa5c8f 105
igrokhotkov 0:83f3dcfa5c8f 106
igrokhotkov 0:83f3dcfa5c8f 107 STATIC INLINE word64 rotlFixed64(word64 x, word64 y)
igrokhotkov 0:83f3dcfa5c8f 108 {
igrokhotkov 0:83f3dcfa5c8f 109 return (x << y) | (x >> (sizeof(y) * 8 - y));
igrokhotkov 0:83f3dcfa5c8f 110 }
igrokhotkov 0:83f3dcfa5c8f 111
igrokhotkov 0:83f3dcfa5c8f 112
igrokhotkov 0:83f3dcfa5c8f 113 STATIC INLINE word64 rotrFixed64(word64 x, word64 y)
igrokhotkov 0:83f3dcfa5c8f 114 {
igrokhotkov 0:83f3dcfa5c8f 115 return (x >> y) | (x << (sizeof(y) * 8 - y));
igrokhotkov 0:83f3dcfa5c8f 116 }
igrokhotkov 0:83f3dcfa5c8f 117
igrokhotkov 0:83f3dcfa5c8f 118
igrokhotkov 0:83f3dcfa5c8f 119 STATIC INLINE word64 ByteReverseWord64(word64 value)
igrokhotkov 0:83f3dcfa5c8f 120 {
igrokhotkov 0:83f3dcfa5c8f 121 #ifdef CTAOCRYPT_SLOW_WORD64
igrokhotkov 0:83f3dcfa5c8f 122 return (word64)(ByteReverseWord32((word32)value)) << 32 |
igrokhotkov 0:83f3dcfa5c8f 123 ByteReverseWord32((word32)(value>>32));
igrokhotkov 0:83f3dcfa5c8f 124 #else
igrokhotkov 0:83f3dcfa5c8f 125 value = ((value & W64LIT(0xFF00FF00FF00FF00)) >> 8) |
igrokhotkov 0:83f3dcfa5c8f 126 ((value & W64LIT(0x00FF00FF00FF00FF)) << 8);
igrokhotkov 0:83f3dcfa5c8f 127 value = ((value & W64LIT(0xFFFF0000FFFF0000)) >> 16) |
igrokhotkov 0:83f3dcfa5c8f 128 ((value & W64LIT(0x0000FFFF0000FFFF)) << 16);
igrokhotkov 0:83f3dcfa5c8f 129 return rotlFixed64(value, 32U);
igrokhotkov 0:83f3dcfa5c8f 130 #endif
igrokhotkov 0:83f3dcfa5c8f 131 }
igrokhotkov 0:83f3dcfa5c8f 132
igrokhotkov 0:83f3dcfa5c8f 133
igrokhotkov 0:83f3dcfa5c8f 134 STATIC INLINE void ByteReverseWords64(word64* out, const word64* in,
igrokhotkov 0:83f3dcfa5c8f 135 word32 byteCount)
igrokhotkov 0:83f3dcfa5c8f 136 {
igrokhotkov 0:83f3dcfa5c8f 137 word32 count = byteCount/(word32)sizeof(word64), i;
igrokhotkov 0:83f3dcfa5c8f 138
igrokhotkov 0:83f3dcfa5c8f 139 for (i = 0; i < count; i++)
igrokhotkov 0:83f3dcfa5c8f 140 out[i] = ByteReverseWord64(in[i]);
igrokhotkov 0:83f3dcfa5c8f 141
igrokhotkov 0:83f3dcfa5c8f 142 }
igrokhotkov 0:83f3dcfa5c8f 143
igrokhotkov 0:83f3dcfa5c8f 144 #endif /* WORD64_AVAILABLE */
igrokhotkov 0:83f3dcfa5c8f 145
igrokhotkov 0:83f3dcfa5c8f 146
igrokhotkov 0:83f3dcfa5c8f 147 STATIC INLINE void ByteReverseBytes(byte* out, const byte* in, word32 byteCount)
igrokhotkov 0:83f3dcfa5c8f 148 {
igrokhotkov 0:83f3dcfa5c8f 149 word32* op = (word32*)out;
igrokhotkov 0:83f3dcfa5c8f 150 const word32* ip = (const word32*)in;
igrokhotkov 0:83f3dcfa5c8f 151
igrokhotkov 0:83f3dcfa5c8f 152 ByteReverseWords(op, ip, byteCount);
igrokhotkov 0:83f3dcfa5c8f 153 }
igrokhotkov 0:83f3dcfa5c8f 154
igrokhotkov 0:83f3dcfa5c8f 155
igrokhotkov 0:83f3dcfa5c8f 156 STATIC INLINE void XorWords(word* r, const word* a, word32 n)
igrokhotkov 0:83f3dcfa5c8f 157 {
igrokhotkov 0:83f3dcfa5c8f 158 word32 i;
igrokhotkov 0:83f3dcfa5c8f 159
igrokhotkov 0:83f3dcfa5c8f 160 for (i = 0; i < n; i++) r[i] ^= a[i];
igrokhotkov 0:83f3dcfa5c8f 161 }
igrokhotkov 0:83f3dcfa5c8f 162
igrokhotkov 0:83f3dcfa5c8f 163
igrokhotkov 0:83f3dcfa5c8f 164 STATIC INLINE void xorbuf(byte* buf, const byte* mask, word32 count)
igrokhotkov 0:83f3dcfa5c8f 165 {
igrokhotkov 0:83f3dcfa5c8f 166 if (((word)buf | (word)mask | count) % WORD_SIZE == 0)
igrokhotkov 0:83f3dcfa5c8f 167 XorWords( (word*)buf, (const word*)mask, count / WORD_SIZE);
igrokhotkov 0:83f3dcfa5c8f 168 else {
igrokhotkov 0:83f3dcfa5c8f 169 word32 i;
igrokhotkov 0:83f3dcfa5c8f 170 for (i = 0; i < count; i++) buf[i] ^= mask[i];
igrokhotkov 0:83f3dcfa5c8f 171 }
igrokhotkov 0:83f3dcfa5c8f 172 }
igrokhotkov 0:83f3dcfa5c8f 173
igrokhotkov 0:83f3dcfa5c8f 174
igrokhotkov 0:83f3dcfa5c8f 175 #undef STATIC
igrokhotkov 0:83f3dcfa5c8f 176