added tag v1_9_0_4

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_9_0_4@18845 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 40 insertions, 0 deletions

diff --git a/trunk/ext/digest/sha1/sha1init.c b/trunk/ext/digest/sha1/sha1init.c
new file mode 100644
index 0000000000..b2146f05a9
--- /dev/null
+++ b/trunk/ext/digest/sha1/sha1init.c
@@ -0,0 +1,40 @@
+/* $RoughId: sha1init.c,v 1.2 2001/07/13 19:49:10 knu Exp $ */
+/* $Id$ */
+
+#include "digest.h"
+#if defined(HAVE_OPENSSL_SHA_H)
+#include "sha1ossl.h"
+#else
+#include "sha1.h"
+#endif
+
+static rb_digest_metadata_t sha1 = {
+    RUBY_DIGEST_API_VERSION,
+    SHA1_DIGEST_LENGTH,
+    SHA1_BLOCK_LENGTH,
+    sizeof(SHA1_CTX),
+    (rb_digest_hash_init_func_t)SHA1_Init,
+    (rb_digest_hash_update_func_t)SHA1_Update,
+    (rb_digest_hash_finish_func_t)SHA1_Finish,
+};
+
+/*
+ * A class for calculating message digests using the SHA-1 Secure Hash
+ * Algorithm by NIST (the US' National Institute of Standards and
+ * Technology), described in FIPS PUB 180-1.
+ */
+void
+Init_sha1()
+{
+    VALUE mDigest, cDigest_Base, cDigest_SHA1;
+ 
+    rb_require("digest");
+ 
+    mDigest = rb_path2class("Digest");
+    cDigest_Base = rb_path2class("Digest::Base");
+
+    cDigest_SHA1 = rb_define_class_under(mDigest, "SHA1", cDigest_Base);
+
+    rb_ivar_set(cDigest_SHA1, rb_intern("metadata"),
+      Data_Wrap_Struct(rb_cObject, 0, 0, &sha1));
+}