krypt-core 0.0.1 → 0.0.2.rc1

data/ext/krypt/core/Makefile

@@ -1,221 +0,0 @@
-
-SHELL = /bin/sh
-
-# V=0 quiet, V=1 verbose.  other values don't work.
-V = 0
-Q1 = $(V:1=)
-Q = $(Q1:0=@)
-ECHO1 = $(V:1=@:)
-ECHO = $(ECHO1:0=@echo)
-
-#### Start of system configuration section. ####
-
-srcdir = .
-topdir = $(includedir)/$(RUBY_BASE_NAME)-$(ruby_version)
-hdrdir = $(includedir)/$(RUBY_BASE_NAME)-$(ruby_version)
-arch_hdrdir = $(hdrdir)/$(arch)
-VPATH = $(srcdir):$(topdir):$(arch_hdrdir)/ruby:$(hdrdir)/ruby
-prefix = $(DESTDIR)/home/martin/ruby
-rubylibprefix = $(libdir)/$(RUBY_BASE_NAME)
-exec_prefix = $(prefix)
-vendorhdrdir = $(rubyhdrdir)/vendor_ruby
-sitehdrdir = $(rubyhdrdir)/site_ruby
-rubyhdrdir = $(includedir)/$(RUBY_BASE_NAME)-$(ruby_version)
-vendordir = $(rubylibprefix)/vendor_ruby
-sitedir = $(rubylibprefix)/site_ruby
-ridir = $(datarootdir)/$(RI_BASE_NAME)
-mandir = $(datarootdir)/man
-localedir = $(datarootdir)/locale
-libdir = $(exec_prefix)/lib
-psdir = $(docdir)
-pdfdir = $(docdir)
-dvidir = $(docdir)
-htmldir = $(docdir)
-infodir = $(datarootdir)/info
-docdir = $(datarootdir)/doc/$(PACKAGE)
-oldincludedir = $(DESTDIR)/usr/include
-includedir = $(prefix)/include
-localstatedir = $(prefix)/var
-sharedstatedir = $(prefix)/com
-sysconfdir = $(prefix)/etc
-datadir = $(datarootdir)
-datarootdir = $(prefix)/share
-libexecdir = $(exec_prefix)/libexec
-sbindir = $(exec_prefix)/sbin
-bindir = $(exec_prefix)/bin
-rubylibdir = $(rubylibprefix)/$(ruby_version)
-archdir = $(rubylibdir)/$(arch)
-sitelibdir = $(sitedir)/$(ruby_version)
-sitearchdir = $(sitelibdir)/$(sitearch)
-vendorlibdir = $(vendordir)/$(ruby_version)
-vendorarchdir = $(vendorlibdir)/$(sitearch)
-
-
-CC = gcc
-CXX = g++
-LIBRUBY = $(LIBRUBY_A)
-LIBRUBY_A = lib$(RUBY_SO_NAME)-static.a
-LIBRUBYARG_SHARED = -Wl,-R -Wl,$(libdir) -L$(libdir) 
-LIBRUBYARG_STATIC = -Wl,-R -Wl,$(libdir) -L$(libdir) -l$(RUBY_SO_NAME)-static
-empty =
-OUTFLAG = -o $(empty)
-COUTFLAG = -o $(empty)
-
-RUBY_EXTCONF_H = extconf.h
-cflags   =  $(optflags) $(debugflags) $(warnflags)
-optflags = -O3 -fno-fast-math
-debugflags = -ggdb3
-warnflags = -Wall -Wextra -Wno-unused-parameter -Wno-parentheses -Wno-long-long -Wno-missing-field-initializers -Wunused-variable -Wpointer-arith -Wwrite-strings -Wdeclaration-after-statement -Wimplicit-function-declaration
-CFLAGS   = -fPIC $(cflags) $(ARCH_FLAG)
-INCFLAGS = -I. -I$(arch_hdrdir) -I$(hdrdir)/ruby/backward -I$(hdrdir) -I$(srcdir)
-DEFS     = 
-CPPFLAGS = -DRUBY_EXTCONF_H=\"$(RUBY_EXTCONF_H)\"  $(DEFS) $(cppflags)
-CXXFLAGS = $(CFLAGS) $(cxxflags)
-ldflags  = -L. -fstack-protector -rdynamic -Wl,-export-dynamic
-dldflags =  
-ARCH_FLAG = 
-DLDFLAGS = $(ldflags) $(dldflags) $(ARCH_FLAG)
-LDSHARED = $(CC) -shared
-LDSHAREDXX = $(CXX) -shared
-AR = ar
-EXEEXT = 
-
-RUBY_BASE_NAME = ruby
-RUBY_INSTALL_NAME = ruby
-RUBY_SO_NAME = ruby
-arch = x86_64-linux
-sitearch = $(arch)
-ruby_version = 2.0.0
-ruby = $(bindir)/ruby
-RUBY = $(ruby)
-ruby_headers = $(hdrdir)/ruby.h $(hdrdir)/ruby/defines.h $(arch_hdrdir)/ruby/config.h $(RUBY_EXTCONF_H)
-
-RM = rm -f
-RM_RF = $(RUBY) -run -e rm -- -rf
-RMDIRS = rmdir --ignore-fail-on-non-empty -p
-MAKEDIRS = /bin/mkdir -p
-INSTALL = /usr/bin/install -c
-INSTALL_PROG = $(INSTALL) -m 0755
-INSTALL_DATA = $(INSTALL) -m 644
-COPY = cp
-TOUCH = exit >
-
-#### End of system configuration section. ####
-
-preload = 
-
-libpath = . $(libdir)
-LIBPATH =  -L. -L$(libdir) -Wl,-R$(libdir)
-DEFFILE = 
-
-CLEANFILES = mkmf.log
-DISTCLEANFILES = 
-DISTCLEANDIRS = 
-
-extout = 
-extout_prefix = 
-target_prefix = 
-LOCAL_LIBS = 
-LIBS =   -lpthread -lrt -ldl -lcrypt -lm   -lc
-ORIG_SRCS = krypt_asn1_in_adapter.c krypt_asn1_in_definite.c krypt_io_in_pem.c krypt_hex.c krypt_provider.c krypt_asn1-internal.c krypt_error.c krypt_asn1_template_encoder.c krypt_asn1_parser.c krypt-core.c krypt_io.c krypt_digest.c krypt_missing.c krypt_asn1_template_parser.c krypt_asn1_template.c krypt_pem.c krypt_asn1_codec.c krypt_b64.c krypt_asn1_in_chunked.c krypt_asn1.c
-SRCS = $(ORIG_SRCS) 
-OBJS = krypt_asn1_in_adapter.o krypt_asn1_in_definite.o krypt_io_in_pem.o krypt_hex.o krypt_provider.o krypt_asn1-internal.o krypt_error.o krypt_asn1_template_encoder.o krypt_asn1_parser.o krypt-core.o krypt_io.o krypt_digest.o krypt_missing.o krypt_asn1_template_parser.o krypt_asn1_template.o krypt_pem.o krypt_asn1_codec.o krypt_b64.o krypt_asn1_in_chunked.o krypt_asn1.o
-HDRS = $(srcdir)/krypt_io.h $(srcdir)/krypt_missing.h $(srcdir)/krypt-core.h $(srcdir)/binyo-io-buffer.h $(srcdir)/krypt_asn1.h $(srcdir)/krypt_asn1_template-internal.h $(srcdir)/binyo-error.h $(srcdir)/krypt_hex.h $(srcdir)/krypt_digest.h $(srcdir)/binyo-io.h $(srcdir)/krypt_b64.h $(srcdir)/krypt_asn1-internal.h $(srcdir)/krypt_b64-internal.h $(srcdir)/extconf.h $(srcdir)/krypt_error.h $(srcdir)/krypt_hex-internal.h $(srcdir)/krypt-provider.h $(srcdir)/krypt_provider-internal.h $(srcdir)/krypt_asn1_template.h
-TARGET = kryptcore
-TARGET_NAME = kryptcore
-TARGET_ENTRY = Init_$(TARGET_NAME)
-DLLIB = $(TARGET).so
-EXTSTATIC = 
-STATIC_LIB = 
-
-BINDIR        = $(bindir)
-RUBYCOMMONDIR = $(sitedir)$(target_prefix)
-RUBYLIBDIR = /home/martin/Projekte/krypt/emboss/krypt-core-c/lib$(target_prefix)
-RUBYARCHDIR = /home/martin/Projekte/krypt/emboss/krypt-core-c/lib$(target_prefix)
-HDRDIR        = $(rubyhdrdir)/ruby$(target_prefix)
-ARCHHDRDIR    = $(rubyhdrdir)/$(arch)/ruby$(target_prefix)
-
-TARGET_SO     = $(DLLIB)
-CLEANLIBS     = $(TARGET).so 
-CLEANOBJS     = *.o  *.bak
-
-all:    $(DLLIB)
-static: $(STATIC_LIB)
-.PHONY: all install static install-so install-rb
-.PHONY: clean clean-so clean-static clean-rb
-
-clean-static::
-clean-rb-default::
-clean-rb::
-clean-so::
-clean: clean-so clean-static clean-rb-default clean-rb
-		-$(Q)$(RM) $(CLEANLIBS) $(CLEANOBJS) $(CLEANFILES)
-
-distclean-rb-default::
-distclean-rb::
-distclean-so::
-distclean-static::
-distclean: clean distclean-so distclean-static distclean-rb-default distclean-rb
-		-$(Q)$(RM) Makefile $(RUBY_EXTCONF_H) conftest.* mkmf.log
-		-$(Q)$(RM) core ruby$(EXEEXT) *~ $(DISTCLEANFILES)
-		-$(Q)$(RMDIRS) $(DISTCLEANDIRS) 2> /dev/null || true
-
-realclean: distclean
-install: install-so install-rb
-
-install-so: $(DLLIB)
-	$(INSTALL_PROG) $(DLLIB) $(RUBYARCHDIR)
-clean-static::
-	-$(Q)$(RM) $(STATIC_LIB)
-install-rb: pre-install-rb install-rb-default
-install-rb-default: pre-install-rb-default
-pre-install-rb: Makefile
-pre-install-rb-default: Makefile
-pre-install-rb-default:
-	$(ECHO) installing default kryptcore libraries
-./.RUBYARCHDIR.time:
-	$(Q) $(MAKEDIRS) $(RUBYARCHDIR)
-	$(Q) $(TOUCH) $@
-
-site-install: site-install-so site-install-rb
-site-install-so: install-so
-site-install-rb: install-rb
-
-.SUFFIXES: .c .m .cc .mm .cxx .cpp .C .o
-
-.cc.o:
-	$(ECHO) compiling $(<)
-	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
-
-.mm.o:
-	$(ECHO) compiling $(<)
-	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
-
-.cxx.o:
-	$(ECHO) compiling $(<)
-	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
-
-.cpp.o:
-	$(ECHO) compiling $(<)
-	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
-
-.C.o:
-	$(ECHO) compiling $(<)
-	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
-
-.c.o:
-	$(ECHO) compiling $(<)
-	$(Q) $(CC) $(INCFLAGS) $(CPPFLAGS) $(CFLAGS) $(COUTFLAG)$@ -c $<
-
-.m.o:
-	$(ECHO) compiling $(<)
-	$(Q) $(CC) $(INCFLAGS) $(CPPFLAGS) $(CFLAGS) $(COUTFLAG)$@ -c $<
-
-$(DLLIB): $(OBJS) Makefile
-	$(ECHO) linking shared-object $(DLLIB)
-	-$(Q)$(RM) $(@)
-	$(Q) $(LDSHARED) -o $@ $(OBJS) $(LIBPATH) $(DLDFLAGS) $(LOCAL_LIBS) $(LIBS)
-
-
-
-$(OBJS): $(HDRS) $(ruby_headers)

data/ext/krypt/core/extconf.h

@@ -1,8 +0,0 @@
-#ifndef EXTCONF_H
-#define EXTCONF_H
-#define HAVE_RUBY_IO_H 1
-#define HAVE_RB_BIG_PACK 1
-#define HAVE_RB_ENUMERATORIZE 1
-#define HAVE_RB_STR_ENCODE 1
-#define HAVE_GMTIME_R 1
-#endif

data/ext/krypt/core/krypt-provider.h

@@ -1,86 +0,0 @@
-/*
- * krypt-core API - C implementation
- *
- * Copyright (c) 2011-2013
- * Hiroshi Nakamura <nahi@ruby-lang.org>
- * Martin Bosslet <martin.bosslet@gmail.com>
- * All rights reserved.
- *
- * Permission is hereby granted, free of charge, to any person obtaining
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
- * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
- * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
- * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
- */
-
-#ifndef _KRYPT_PROVIDER_H_
-#define _KRYPT_PROVIDER_H_
-
-
-#ifndef _RSTRING_NOT_MODIFIED
-#define RSTRING_NOT_MODIFIED 1
-#endif
-
-#ifndef RUBY_READONLY_STRING
-#define RUBY_READONLY_STRING 1
-#endif
-
-#include <ruby.h>
-
-#ifndef KRYPT_OK
-#define KRYPT_OK 1
-#endif
-#ifndef KRYPT_ERR
-#define KRYPT_ERR -1
-#endif
-
-typedef struct krypt_provider_st krypt_provider;
-
-/* Message digest */
-typedef struct krypt_interface_md_st krypt_interface_md;
-
-typedef struct krypt_md_st {
-    krypt_provider *provider;
-    krypt_interface_md *methods;
-} krypt_md;
-
-struct krypt_interface_md_st {
-    int (*md_reset)(krypt_md *md);
-    int (*md_update)(krypt_md *md, const void *data, size_t len);
-    int (*md_final)(krypt_md *md, uint8_t ** digest, size_t *len);
-    int (*md_digest)(krypt_md *md, const uint8_t *data, size_t len, uint8_t **digest, size_t *digest_len);
-    int (*md_digest_length)(krypt_md *md, size_t *len);
-    int (*md_block_length)(krypt_md *md, size_t *block_len);
-    int (*md_name)(krypt_md *md, const char **name);
-    void (*mark)(krypt_md *md);
-    void (*free)(krypt_md *md);
-};
-
-/* Provider */
-struct krypt_provider_st {
-    const char *name;
-    krypt_md *(*md_new_oid)(krypt_provider *provider, const char *oid);
-    krypt_md *(*md_new_name)(krypt_provider *provider, const char *name);
-};
-
-/* Can be called from within a provider implementation to indicate errors */
-void krypt_error_add(const char * format, ...);
-
-/* May be used to register a singleton provider upon initialization */
-void krypt_provider_register(krypt_provider *provider);
-
-#endif /* _KRYPT_PROVIDER_H_ */
-

data/ext/krypt/core/krypt_digest.c

@@ -1,391 +0,0 @@
-/*
- * krypt-core API - C implementation
- *
- * Copyright (c) 2011-2013
- * Hiroshi Nakamura <nahi@ruby-lang.org>
- * Martin Bosslet <martin.bosslet@gmail.com>
- * All rights reserved.
- *
- * Permission is hereby granted, free of charge, to any person obtaining
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
- * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
- * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
- * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
- */
-
-#include "krypt-core.h"
-
-VALUE mKryptDigest;
-VALUE eKryptDigestError;
-
-VALUE cKryptNativeDigest;
-
-/** public internal digest API **/
-
-#define int_check_provider_has(p, m) 		if (!(p) || !(p)->m) return NULL;
-#define int_check_digest_has(d, m) 		if (!(d) || !(d)->methods || !(d)->methods->m) return KRYPT_ERR;
-
-krypt_md *
-krypt_md_oid_new(krypt_provider *provider, const char *oid)
-{
-    int_check_provider_has(provider, md_new_oid);
-    return provider->md_new_oid(provider, oid);
-}
-
-krypt_md *
-krypt_md_name_new(krypt_provider *provider, const char *name)
-{
-    int_check_provider_has(provider, md_new_name);
-    return provider->md_new_name(provider, name);
-}
-
-krypt_md *
-krypt_md_new(krypt_provider *provider, const char *name_or_oid)
-{
-    krypt_md *ret = NULL;
-    if ((ret = krypt_md_name_new(provider, name_or_oid)))
-	return ret;
-    return krypt_md_oid_new(provider, name_or_oid);
-}
-
-int
-krypt_md_reset(krypt_md *md)
-{
-    int_check_digest_has(md, md_reset);
-    return md->methods->md_reset(md);
-}
-
-int
-krypt_md_update(krypt_md *md, const void *data, size_t len)
-{
-    int_check_digest_has(md, md_update);
-    return md->methods->md_update(md, data, len);
-}
-
-int
-krypt_md_final(krypt_md *md, uint8_t **digest, size_t *len)
-{
-    int_check_digest_has(md, md_final);
-    if (md->methods->md_final(md, digest, len) == KRYPT_ERR) return KRYPT_ERR;
-    return krypt_md_reset(md);
-}
-
-int
-krypt_md_digest(krypt_md *md, const uint8_t *data, size_t len, uint8_t **digest, size_t *digest_len)
-{
-    int_check_digest_has(md, md_digest);
-    if(md->methods->md_digest(md, data, len, digest, digest_len) == KRYPT_ERR) return KRYPT_ERR;
-    return krypt_md_reset(md);
-}
-
-int
-krypt_md_digest_length(krypt_md *md, size_t *len)
-{
-    int_check_digest_has(md, md_digest_length);
-    return md->methods->md_digest_length(md, len);
-}
-
-int
-krypt_md_block_length(krypt_md *md, size_t *len)
-{
-    int_check_digest_has(md, md_block_length);
-    return md->methods->md_block_length(md, len);
-}
-
-int
-krypt_md_name(krypt_md *md, const char **name)
-{
-    int_check_digest_has(md, md_name);
-    return md->methods->md_name(md, name);
-}
-
-void
-krypt_md_mark(krypt_md *md)
-{
-    if (!md) return; 
-    if (md->methods->mark)
-	md->methods->mark(md);
-}
-
-void
-krypt_md_free(krypt_md *md)
-{
-    if (!md) return; 
-    md->methods->free(md);
-}
-
-/** Digest class implementation **/
-
-VALUE
-krypt_digest_new(krypt_md *md)
-{
-    VALUE obj;
-
-    obj = Data_Wrap_Struct(cKryptNativeDigest, krypt_md_mark, krypt_md_free, md);
-    return obj;
-}
-
-#define int_md_get(obj, md)					\
-do { 								\
-    Data_Get_Struct((obj), krypt_md, (md));			\
-    if (!(md)) { 						\
-	rb_raise(eKryptError, "Uninitialized krypt_md");	\
-    } 								\
-} while (0)
-
-/*
- *  call-seq:
- *     digest.reset -> self
- *
- * Resets the Digest in the sense that any Digest#update that has been
- * performed is abandoned and the Digest is set to its initial state again.
- *
- */
-static VALUE
-krypt_digest_reset(VALUE self)
-{
-    krypt_md *md;
-
-    int_md_get(self, md);
-    if (krypt_md_reset(md) == KRYPT_ERR) {
-	rb_raise(eKryptDigestError, "Error while resetting digest");
-    }
-    return self;
-}
-
-/*
- *  call-seq:
- *     digest.update(string) -> aString
- *
- * Not every message digest can be computed in one single pass. If a message
- * digest is to be computed from several subsequent sources, then each may
- * be passed individually to the Digest instance.
- *
- * === Example
- *   digest = Krypt::Digest::SHA256.new
- *   digest.update('First input')
- *   digest << 'Second input' # equivalent to digest.update('Second input')
- *   result = digest.digest
- *
- */
-static VALUE
-krypt_digest_update(VALUE self, VALUE data)
-{
-    krypt_md *md;
-    uint8_t *bytes;
-    size_t len;
-
-    int_md_get(self, md);
-    StringValue(data);
-    bytes = (uint8_t *) RSTRING_PTR(data);
-    len = (size_t) RSTRING_LEN(data);
-    if (krypt_md_update(md, bytes, len) == KRYPT_ERR) {
-	rb_raise(eKryptDigestError, "Error while updating digest");
-    }
-    return self;
-}
-
-static VALUE
-int_digest_data(krypt_md *md, VALUE data)
-{
-    uint8_t *bytes;
-    size_t len;
-    uint8_t *digest;
-    size_t digest_len;
-    VALUE ret;
-
-    StringValue(data);
-    bytes = (uint8_t *) RSTRING_PTR(data);
-    len = (size_t) RSTRING_LEN(data);
-    if (krypt_md_digest(md, bytes, len, &digest, &digest_len) == KRYPT_ERR) {
-	rb_raise(eKryptDigestError, "Error while computing digest");
-    }
-    ret = rb_str_new((const char *) digest, digest_len);
-    xfree(digest);
-    return ret;
-}
-
-static VALUE
-int_digest_final(krypt_md *md)
-{
-    uint8_t *digest;
-    size_t len;
-    VALUE ret;
-    if (krypt_md_final(md, &digest, &len) == KRYPT_ERR) {
-	rb_raise(eKryptDigestError, "Error while finalizing digest");
-    }
-    ret = rb_str_new((const char *) digest, len);
-    xfree(digest);
-    return ret;
-}
-
-/*
- *  call-seq:
- *     digest.digest([string]) -> String
- *
- * When called with no arguments, the result will be the hash of the data that
- * has been fed to this Digest instance so far. If called with a String
- * argument, the hash of that argument will be computed.
- *
- * === Example
- *   digest = Krypt::Digest::SHA256.new
- *   result = digest.digest('First input')
- *
- * is equivalent to
- *   
- *   digest = Krypt::Digest::SHA256.new
- *   digest << 'First input' # equivalent to digest.update('Second input')
- *   result = digest.digest
- *
- */
-static VALUE
-krypt_digest_digest(int argc, VALUE *args, VALUE self)
-{
-    krypt_md *md;
-    VALUE data;
-
-    rb_scan_args(argc, args, "01", &data);
-    int_md_get(self, md);
-    if (!(NIL_P(data)))
-	return int_digest_data(md, data);
-    else
-	return int_digest_final(md);
-}
-
-/*
- *  call-seq:
- *     digest.hexdigest([string]) -> String
- *
- * Works the with the same semantics as Digest#digest with the difference that
- * instead of the raw bytes the hex-encoded form of the raw representation is
- * returned.
- */
-static VALUE
-krypt_digest_hexdigest(int argc, VALUE *args, VALUE self)
-{
-    VALUE digest, ret;
-    uint8_t *bytes;
-    size_t len;
-
-    digest = krypt_digest_digest(argc, args, self);
-    if (krypt_hex_encode((uint8_t *) RSTRING_PTR(digest), RSTRING_LEN(digest), &bytes, &len) == KRYPT_ERR)
-	rb_raise(eKryptDigestError, "Error while hex-encoding digest");
-    ret = rb_str_new((const char *) bytes, len);
-    xfree(bytes);
-    return ret;
-}
-
-/*
- *  call-seq:
- *      digest.digest_length -> integer
- *
- * Returns the output size of the digest, i.e. the length in bytes of the
- * final message digest result.
- *
- * === Example
- *   digest = Krypt::Digest::SHA1.new
- *   puts digest.digest_length # => 20
- *
- */
-static VALUE
-krypt_digest_digest_length(VALUE self)
-{
-    krypt_md *md;
-    size_t len;
-
-    int_md_get(self, md);
-    if (krypt_md_digest_length(md, &len) == KRYPT_ERR) {
-	rb_raise(eKryptDigestError, "Error while getting digest length");
-    }
-    return INT2NUM(len);
-}
-
-/*
- *  call-seq:
- *      digest.block_length -> integer
- *
- * Returns the block length of the digest algorithm, i.e. the length in bytes
- * of an individual block. Most modern algorithms partition a message to be
- * digested into a sequence of fix-sized blocks that are processed
- * consecutively.
- *
- * === Example
- *   digest = Krypt::Digest::SHA1.new
- *   puts digest.block_length # => 64
- */
-static VALUE
-krypt_digest_block_length(VALUE self)
-{
-    krypt_md *md;
-    size_t len;
-
-    int_md_get(self, md);
-    if (krypt_md_block_length(md, &len) == KRYPT_ERR) {
-	rb_raise(eKryptDigestError, "Error while getting digest block length");
-    }
-    return INT2NUM(len);
-}
-
-/*
- *  call-seq:
- *      digest.name -> string
- *
- * Returns the sn of this Digest instance.
- *
- * === Example
- *   digest = Krypt::Digest::SHA512.new
- *   puts digest.name # => SHA512
- *
- */
-static VALUE
-krypt_digest_name(VALUE self)
-{
-    krypt_md *md;
-    const char *name;
-
-    int_md_get(self, md);
-    if (krypt_md_name(md, &name) == KRYPT_ERR) {
-	rb_raise(eKryptDigestError, "Error while getting digest name");
-    }
-    return rb_str_new2(name);
-}
-
-void
-Init_krypt_digest(void)
-{
-#if 0
-    mKrypt = rb_define_module("Krypt"); /* Let RDoc know */
-#endif
-
-    mKryptDigest = rb_path2class("Krypt::Digest");
-    eKryptDigestError = rb_path2class("Krypt::Digest::DigestError");
-
-    /* Document-class: Krypt::Digest::NativeDigest
-     * Native C implementation of the Krypt::Digest interface. 
-     */
-    cKryptNativeDigest = rb_define_class_under(mKryptDigest, "NativeDigest", rb_cObject);
-
-    rb_define_method(cKryptNativeDigest, "reset", krypt_digest_reset, 0);
-    rb_define_method(cKryptNativeDigest, "update", krypt_digest_update, 1);
-    rb_define_alias(cKryptNativeDigest, "<<", "update");
-    rb_define_method(cKryptNativeDigest, "digest", krypt_digest_digest, -1);
-    rb_define_method(cKryptNativeDigest, "hexdigest", krypt_digest_hexdigest, -1);
-    rb_define_method(cKryptNativeDigest, "digest_length", krypt_digest_digest_length, 0);
-    rb_define_method(cKryptNativeDigest, "block_length", krypt_digest_block_length, 0);
-    rb_define_method(cKryptNativeDigest, "name", krypt_digest_name, 0);
-    rb_undef_method(CLASS_OF(cKryptNativeDigest), "new"); /* private constructor */	
-}
-