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/md5/md5init.c b/trunk/ext/digest/md5/md5init.c
new file mode 100644
index 0000000000..17658f4fce
--- /dev/null
+++ b/trunk/ext/digest/md5/md5init.c
@@ -0,0 +1,40 @@
+/* $RoughId: md5init.c,v 1.2 2001/07/13 19:49:10 knu Exp $ */
+/* $Id$ */
+
+#include "digest.h"
+#if defined(HAVE_OPENSSL_MD5_H)
+#include "md5ossl.h"
+#else
+#include "md5.h"
+#endif
+
+static rb_digest_metadata_t md5 = {
+    RUBY_DIGEST_API_VERSION,
+    MD5_DIGEST_LENGTH,
+    MD5_BLOCK_LENGTH,
+    sizeof(MD5_CTX),
+    (rb_digest_hash_init_func_t)MD5_Init,
+    (rb_digest_hash_update_func_t)MD5_Update,
+    (rb_digest_hash_finish_func_t)MD5_Finish,
+};
+
+/*
+ * A class for calculating message digests using the MD5
+ * Message-Digest Algorithm by RSA Data Security, Inc., described in
+ * RFC1321.
+ */
+void
+Init_md5()
+{
+    VALUE mDigest, cDigest_Base, cDigest_MD5;
+
+    rb_require("digest");
+
+    mDigest = rb_path2class("Digest");
+    cDigest_Base = rb_path2class("Digest::Base");
+
+    cDigest_MD5 = rb_define_class_under(mDigest, "MD5", cDigest_Base);
+
+    rb_ivar_set(cDigest_MD5, rb_intern("metadata"),
+      Data_Wrap_Struct(rb_cObject, 0, 0, &md5));
+}