1 /* gc-gl-common.c --- Common gnulib internal crypto interface functions
2 * Copyright (C) 2002, 2003, 2004, 2005 Simon Josefsson
4 * This file is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published
6 * by the Free Software Foundation; either version 2, or (at your
7 * option) any later version.
9 * This file is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this file; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21 /* Note: This file is only built if GC uses internal functions. */
35 #include <sys/types.h>
50 #ifdef GC_USE_HMAC_MD5
58 #ifdef GC_USE_RIJNDAEL
59 # include "rijndael-api-fst.h"
77 randomize (int level, char *data, size_t datalen)
87 device = NAME_OF_NONCE_DEVICE;
91 device = NAME_OF_PSEUDO_RANDOM_DEVICE;
95 device = NAME_OF_RANDOM_DEVICE;
99 fd = open (device, O_RDONLY);
101 return GC_RANDOM_ERROR;
107 tmp = read (fd, data, datalen);
111 int save_errno = errno;
114 return GC_RANDOM_ERROR;
119 while (len < datalen);
123 return GC_RANDOM_ERROR;
129 gc_nonce (char *data, size_t datalen)
131 return randomize (0, data, datalen);
135 gc_pseudo_random (char *data, size_t datalen)
137 return randomize (1, data, datalen);
141 gc_random (char *data, size_t datalen)
143 return randomize (2, data, datalen);
146 /* Memory allocation. */
149 gc_set_allocators (gc_malloc_t func_malloc,
150 gc_malloc_t secure_malloc,
151 gc_secure_check_t secure_check,
152 gc_realloc_t func_realloc, gc_free_t func_free)
158 typedef struct _gc_cipher_ctx {
161 #ifdef GC_USE_ARCFOUR
162 arcfour_context arcfourContext;
164 #ifdef GC_USE_RIJNDAEL
165 rijndaelKeyInstance aesEncKey;
166 rijndaelKeyInstance aesDecKey;
167 rijndaelCipherInstance aesContext;
172 gc_cipher_open (Gc_cipher alg, Gc_cipher_mode mode,
173 gc_cipher_handle * outhandle)
178 ctx = calloc (sizeof (*ctx), 1);
185 #ifdef GC_USE_ARCFOUR
194 rc = GC_INVALID_CIPHER;
199 #ifdef GC_USE_RIJNDAEL
210 rc = GC_INVALID_CIPHER;
216 rc = GC_INVALID_CIPHER;
228 gc_cipher_setkey (gc_cipher_handle handle, size_t keylen, const char *key)
230 _gc_cipher_ctx *ctx = handle;
234 #ifdef GC_USE_ARCFOUR
237 arcfour_setkey (&ctx->arcfourContext, key, keylen);
241 #ifdef GC_USE_RIJNDAEL
248 char keyMaterial[RIJNDAEL_MAX_KEY_SIZE + 1];
250 for (i = 0; i < keylen; i++)
251 sprintf (&keyMaterial[2*i], "%02x", key[i] & 0xFF);
253 rc = rijndaelMakeKey (&ctx->aesEncKey, RIJNDAEL_DIR_ENCRYPT,
254 keylen * 8, keyMaterial);
256 return GC_INVALID_CIPHER;
258 rc = rijndaelMakeKey (&ctx->aesDecKey, RIJNDAEL_DIR_DECRYPT,
259 keylen * 8, keyMaterial);
261 return GC_INVALID_CIPHER;
263 rc = rijndaelCipherInit (&ctx->aesContext, RIJNDAEL_MODE_ECB, NULL);
265 return GC_INVALID_CIPHER;
271 return GC_INVALID_CIPHER;
278 gc_cipher_setiv (gc_cipher_handle handle, size_t ivlen, const char *iv)
280 _gc_cipher_ctx *ctx = handle;
284 #ifdef GC_USE_RIJNDAEL
291 /* Doesn't use IV. */
298 char ivMaterial[2 * RIJNDAEL_MAX_IV_SIZE + 1];
300 for (i = 0; i < ivlen; i++)
301 sprintf (&ivMaterial[2*i], "%02x", iv[i] & 0xFF);
303 rc = rijndaelCipherInit (&ctx->aesContext, RIJNDAEL_MODE_CBC,
306 return GC_INVALID_CIPHER;
311 return GC_INVALID_CIPHER;
317 return GC_INVALID_CIPHER;
324 gc_cipher_encrypt_inline (gc_cipher_handle handle, size_t len, char *data)
326 _gc_cipher_ctx *ctx = handle;
330 #ifdef GC_USE_ARCFOUR
333 arcfour_stream (&ctx->arcfourContext, data, data, len);
337 #ifdef GC_USE_RIJNDAEL
344 nblocks = rijndaelBlockEncrypt (&ctx->aesContext, &ctx->aesEncKey,
345 data, 8 * len, data);
347 return GC_INVALID_CIPHER;
353 return GC_INVALID_CIPHER;
360 gc_cipher_decrypt_inline (gc_cipher_handle handle, size_t len, char *data)
362 _gc_cipher_ctx *ctx = handle;
366 #ifdef GC_USE_ARCFOUR
369 arcfour_stream (&ctx->arcfourContext, data, data, len);
373 #ifdef GC_USE_RIJNDAEL
380 nblocks = rijndaelBlockDecrypt (&ctx->aesContext, &ctx->aesDecKey,
381 data, 8 * len, data);
383 return GC_INVALID_CIPHER;
389 return GC_INVALID_CIPHER;
396 gc_cipher_close (gc_cipher_handle handle)
398 _gc_cipher_ctx *ctx = handle;
409 gc_hash_buffer (Gc_hash hash, const void *in, size_t inlen, char *resbuf)
415 md4_buffer (in, inlen, resbuf);
421 md5_buffer (in, inlen, resbuf);
427 sha1_buffer (in, inlen, resbuf);
432 return GC_INVALID_HASH;
440 gc_md4 (const void *in, size_t inlen, void *resbuf)
442 md4_buffer (in, inlen, resbuf);
449 gc_md5 (const void *in, size_t inlen, void *resbuf)
451 md5_buffer (in, inlen, resbuf);
458 gc_sha1 (const void *in, size_t inlen, void *resbuf)
460 sha1_buffer (in, inlen, resbuf);
465 #ifdef GC_USE_HMAC_MD5
467 gc_hmac_md5 (const void *key, size_t keylen,
468 const void *in, size_t inlen, char *resbuf)
470 hmac_md5 (key, keylen, in, inlen, resbuf);
475 #ifdef GC_USE_HMAC_SHA1
477 gc_hmac_sha1 (const void *key, size_t keylen,
478 const void *in, size_t inlen, char *resbuf)
480 hmac_sha1 (key, keylen, in, inlen, resbuf);