2001-07-13 16:06:14 -04:00
|
|
|
/* $RoughId: sha2init.c,v 1.3 2001/07/13 20:00:43 knu Exp $ */
|
|
|
|
/* $Id$ */
|
|
|
|
|
|
|
|
#include "digest.h"
|
2010-02-22 07:36:11 -05:00
|
|
|
#if defined(HAVE_OPENSSL_SHA_H) && defined(HAVE_SHA256_TRANSFORM) && defined(HAVE_SHA512_TRANSFORM)
|
2010-02-21 21:21:22 -05:00
|
|
|
#include "sha2ossl.h"
|
|
|
|
#else
|
2001-07-13 16:06:14 -04:00
|
|
|
#include "sha2.h"
|
2010-02-21 21:21:22 -05:00
|
|
|
#endif
|
2001-07-13 16:06:14 -04:00
|
|
|
|
|
|
|
#define FOREACH_BITLEN(func) func(256) func(384) func(512)
|
|
|
|
|
|
|
|
#define DEFINE_ALGO_METADATA(bitlen) \
|
2008-09-01 03:48:53 -04:00
|
|
|
static const rb_digest_metadata_t sha##bitlen = { \
|
2006-10-20 08:48:35 -04:00
|
|
|
RUBY_DIGEST_API_VERSION, \
|
2001-07-13 16:06:14 -04:00
|
|
|
SHA##bitlen##_DIGEST_LENGTH, \
|
* ext/digest/digest.c, ext/digest/digest.h,
ext/digest/md5/md5init.c, ext/digest/rmd160/rmd160init.c,
ext/digest/sha1/sha1init.c, ext/digest/sha2/sha2init.c:
Introduce API versioning.
* ext/digest/digest.c, ext/digest/digest.h,
ext/digest/md5/md5init.c, ext/digest/rmd160/rmd160init.c,
ext/digest/sha1/sha1init.c, ext/digest/sha2/sha2init.c: Remove
the constants DIGEST_LENGTH and BLOCK_LENGTH and turn them into
instance methods digest_length() and block_length(). Class
methods with the same names are also provided, which take extra
parameters for a digest method.
* ext/digest/lib/digest/hmac.rb: Completely redesign the API which
is similar to Perl's, now that Digest classes can take hashing
parameters.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11166 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2006-10-13 19:23:18 -04:00
|
|
|
SHA##bitlen##_BLOCK_LENGTH, \
|
2001-07-13 16:06:14 -04:00
|
|
|
sizeof(SHA##bitlen##_CTX), \
|
2006-10-20 08:48:35 -04:00
|
|
|
(rb_digest_hash_init_func_t)SHA##bitlen##_Init, \
|
|
|
|
(rb_digest_hash_update_func_t)SHA##bitlen##_Update, \
|
|
|
|
(rb_digest_hash_finish_func_t)SHA##bitlen##_Finish, \
|
2001-07-13 16:06:14 -04:00
|
|
|
};
|
|
|
|
|
|
|
|
FOREACH_BITLEN(DEFINE_ALGO_METADATA)
|
|
|
|
|
2006-10-13 07:52:18 -04:00
|
|
|
/*
|
|
|
|
* Classes for calculating message digests using the SHA-256/384/512
|
|
|
|
* Secure Hash Algorithm(s) by NIST (the US' National Institute of
|
|
|
|
* Standards and Technology), described in FIPS PUB 180-2.
|
|
|
|
*/
|
2001-07-13 16:06:14 -04:00
|
|
|
void
|
|
|
|
Init_sha2()
|
|
|
|
{
|
|
|
|
VALUE mDigest, cDigest_Base;
|
|
|
|
ID id_metadata;
|
|
|
|
|
|
|
|
#define DECLARE_ALGO_CLASS(bitlen) \
|
|
|
|
VALUE cDigest_SHA##bitlen;
|
|
|
|
|
|
|
|
FOREACH_BITLEN(DECLARE_ALGO_CLASS)
|
|
|
|
|
2006-09-27 10:34:49 -04:00
|
|
|
rb_require("digest");
|
2001-07-13 16:06:14 -04:00
|
|
|
|
|
|
|
id_metadata = rb_intern("metadata");
|
|
|
|
|
|
|
|
mDigest = rb_path2class("Digest");
|
|
|
|
cDigest_Base = rb_path2class("Digest::Base");
|
|
|
|
|
|
|
|
#define DEFINE_ALGO_CLASS(bitlen) \
|
|
|
|
cDigest_SHA##bitlen = rb_define_class_under(mDigest, "SHA" #bitlen, cDigest_Base); \
|
|
|
|
\
|
2006-10-11 13:14:54 -04:00
|
|
|
rb_ivar_set(cDigest_SHA##bitlen, id_metadata, \
|
2008-09-01 03:48:53 -04:00
|
|
|
Data_Wrap_Struct(rb_cObject, 0, 0, (void *)&sha##bitlen));
|
2001-07-13 16:06:14 -04:00
|
|
|
|
|
|
|
FOREACH_BITLEN(DEFINE_ALGO_CLASS)
|
|
|
|
}
|