139 lines
3.4 KiB
C
139 lines
3.4 KiB
C
|
/* hmac-sha1.c */
|
||
|
/*
|
||
|
This file is part of the Crypto-avr-lib/microcrypt-lib.
|
||
|
Copyright (C) 2008 Daniel Otte (daniel.otte@rub.de)
|
||
|
|
||
|
This program is free software: you can redistribute it and/or modify
|
||
|
it under the terms of the GNU General Public License as published by
|
||
|
the Free Software Foundation, either version 3 of the License, or
|
||
|
(at your option) any later version.
|
||
|
|
||
|
This program is distributed in the hope that it will be useful,
|
||
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
GNU General Public License for more details.
|
||
|
|
||
|
You should have received a copy of the GNU General Public License
|
||
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||
|
*/
|
||
|
/**
|
||
|
*
|
||
|
* implementation of HMAC as described in RFC2104
|
||
|
* Author: Daniel Otte
|
||
|
* email: daniel.otte@rub.de
|
||
|
* License: GPLv3 or later
|
||
|
**/
|
||
|
|
||
|
/*
|
||
|
* hmac = hash ( k^opad , hash( k^ipad , msg))
|
||
|
*/
|
||
|
|
||
|
#include <stdint.h>
|
||
|
#include <string.h>
|
||
|
#include "config.h"
|
||
|
#include "sha1.h"
|
||
|
|
||
|
#define IPAD 0x36
|
||
|
#define OPAD 0x5C
|
||
|
|
||
|
typedef sha1_ctx_t hmac_sha1_ctx_t;
|
||
|
|
||
|
#ifndef HMAC_SHORTONLY
|
||
|
|
||
|
void hmac_sha1_init(hmac_sha1_ctx_t *s, void* key, uint16_t keylength_b){
|
||
|
uint8_t buffer[SHA1_BLOCK_BYTES];
|
||
|
uint8_t i;
|
||
|
|
||
|
memset(buffer, 0, SHA1_BLOCK_BYTES);
|
||
|
if (keylength_b > SHA1_BLOCK_BITS){
|
||
|
sha1((void*)buffer, key, keylength_b);
|
||
|
} else {
|
||
|
memcpy(buffer, key, (keylength_b+7)/8);
|
||
|
}
|
||
|
|
||
|
for (i=0; i<SHA1_BLOCK_BYTES; ++i){
|
||
|
buffer[i] ^= IPAD;
|
||
|
}
|
||
|
|
||
|
sha1_init(s);
|
||
|
sha1_nextBlock(s, buffer);
|
||
|
#if defined SECURE_WIPE_BUFFER
|
||
|
memset(buffer, 0, SHA256_BLOCK_BITS/8);
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
void hmac_sha1_final(hmac_sha1_ctx_t *s, void* key, uint16_t keylength_b){
|
||
|
uint8_t buffer[SHA1_BLOCK_BYTES];
|
||
|
uint8_t i;
|
||
|
sha1_ctx_t a;
|
||
|
|
||
|
memset(buffer, 0, SHA1_BLOCK_BYTES);
|
||
|
if (keylength_b > SHA1_BLOCK_BITS){
|
||
|
sha1((void*)buffer, key, keylength_b);
|
||
|
} else {
|
||
|
memcpy(buffer, key, (keylength_b+7)/8);
|
||
|
}
|
||
|
|
||
|
for (i=0; i<SHA1_BLOCK_BYTES; ++i){
|
||
|
buffer[i] ^= OPAD;
|
||
|
}
|
||
|
|
||
|
sha1_init(&a);
|
||
|
sha1_nextBlock(&a, buffer); /* hash key ^ opad */
|
||
|
sha1_ctx2hash((void*)buffer, s); /* copy hash(key ^ ipad, msg) to buffer */
|
||
|
sha1_lastBlock(&a, buffer, SHA1_HASH_BITS);
|
||
|
memcpy(s, &a, sizeof(sha1_ctx_t));
|
||
|
#if defined SECURE_WIPE_BUFFER
|
||
|
memset(buffer, 0, SHA1_BLOCK_BYTES);
|
||
|
memset(a.h, 0, 20);
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
#endif
|
||
|
|
||
|
/*
|
||
|
void hmac_sha1_nextBlock()
|
||
|
void hmac_sha1_lastBlock()
|
||
|
*/
|
||
|
|
||
|
/*
|
||
|
* keylength in bits!
|
||
|
* message length in bits!
|
||
|
*/
|
||
|
void hmac_sha1(void* dest, void* key, uint16_t keylength_b, void* msg, uint64_t msglength_b){ /* a one-shot*/
|
||
|
sha1_ctx_t s;
|
||
|
uint8_t i;
|
||
|
uint8_t buffer[SHA1_BLOCK_BYTES];
|
||
|
|
||
|
memset(buffer, 0, SHA1_BLOCK_BYTES);
|
||
|
|
||
|
/* if key is larger than a block we have to hash it*/
|
||
|
if (keylength_b > SHA1_BLOCK_BITS){
|
||
|
sha1((void*)buffer, key, keylength_b);
|
||
|
} else {
|
||
|
memcpy(buffer, key, (keylength_b+7)/8);
|
||
|
}
|
||
|
|
||
|
for (i=0; i<SHA1_BLOCK_BYTES; ++i){
|
||
|
buffer[i] ^= IPAD;
|
||
|
}
|
||
|
sha1_init(&s);
|
||
|
sha1_nextBlock(&s, buffer);
|
||
|
while (msglength_b >= SHA1_BLOCK_BITS){
|
||
|
sha1_nextBlock(&s, msg);
|
||
|
msg = (uint8_t*)msg + SHA1_BLOCK_BYTES;
|
||
|
msglength_b -= SHA1_BLOCK_BITS;
|
||
|
}
|
||
|
sha1_lastBlock(&s, msg, msglength_b);
|
||
|
/* since buffer still contains key xor ipad we can do ... */
|
||
|
for (i=0; i<SHA1_BLOCK_BYTES; ++i){
|
||
|
buffer[i] ^= IPAD ^ OPAD;
|
||
|
}
|
||
|
sha1_ctx2hash(dest, &s); /* save inner hash temporary to dest */
|
||
|
sha1_init(&s);
|
||
|
sha1_nextBlock(&s, buffer);
|
||
|
sha1_lastBlock(&s, dest, SHA1_HASH_BITS);
|
||
|
sha1_ctx2hash(dest, &s);
|
||
|
}
|
||
|
|