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?
User | Revision | Line number | New 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 |