summaryrefslogtreecommitdiff
path: root/lgl/hmac-sha1.c
diff options
context:
space:
mode:
Diffstat (limited to 'lgl/hmac-sha1.c')
-rw-r--r--lgl/hmac-sha1.c81
1 files changed, 0 insertions, 81 deletions
diff --git a/lgl/hmac-sha1.c b/lgl/hmac-sha1.c
deleted file mode 100644
index 93d0aba907..0000000000
--- a/lgl/hmac-sha1.c
+++ /dev/null
@@ -1,81 +0,0 @@
-/* hmac-sha1.c -- hashed message authentication codes
- Copyright (C) 2005, 2006 Free Software Foundation, Inc.
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU Lesser General Public License as published by
- the Free Software Foundation; either version 2.1, 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 Lesser General Public License for more details.
-
- You should have received a copy of the GNU Lesser General Public License
- along with this program; if not, write to the Free Software Foundation,
- Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
-
-/* Written by Simon Josefsson. */
-
-#include <config.h>
-
-#include "hmac.h"
-
-#include "memxor.h"
-#include "sha1.h"
-
-#include <string.h>
-
-#define IPAD 0x36
-#define OPAD 0x5c
-
-int
-hmac_sha1 (const void *key, size_t keylen,
- const void *in, size_t inlen, void *resbuf)
-{
- struct sha1_ctx inner;
- struct sha1_ctx outer;
- char optkeybuf[20];
- char block[64];
- char innerhash[20];
-
- /* Reduce the key's size, so that it becomes <= 64 bytes large. */
-
- if (keylen > 64)
- {
- struct sha1_ctx keyhash;
-
- sha1_init_ctx (&keyhash);
- sha1_process_bytes (key, keylen, &keyhash);
- sha1_finish_ctx (&keyhash, optkeybuf);
-
- key = optkeybuf;
- keylen = 20;
- }
-
- /* Compute INNERHASH from KEY and IN. */
-
- sha1_init_ctx (&inner);
-
- memset (block, IPAD, sizeof (block));
- memxor (block, key, keylen);
-
- sha1_process_block (block, 64, &inner);
- sha1_process_bytes (in, inlen, &inner);
-
- sha1_finish_ctx (&inner, innerhash);
-
- /* Compute result from KEY and INNERHASH. */
-
- sha1_init_ctx (&outer);
-
- memset (block, OPAD, sizeof (block));
- memxor (block, key, keylen);
-
- sha1_process_block (block, 64, &outer);
- sha1_process_bytes (innerhash, 20, &outer);
-
- sha1_finish_ctx (&outer, resbuf);
-
- return 0;
-}