diff options
Diffstat (limited to 'devel/tcl-trf/files/patch-sha1')
-rw-r--r-- | devel/tcl-trf/files/patch-sha1 | 141 |
1 files changed, 0 insertions, 141 deletions
diff --git a/devel/tcl-trf/files/patch-sha1 b/devel/tcl-trf/files/patch-sha1 deleted file mode 100644 index b812c3ee0ea4..000000000000 --- a/devel/tcl-trf/files/patch-sha1 +++ /dev/null @@ -1,141 +0,0 @@ ---- generic/sha1.c Wed Aug 9 15:13:18 2000 -+++ generic/sha1.c Sat Jul 10 18:00:47 2004 -@@ -28,5 +28,6 @@ - */ - - #include "loadman.h" -+#include <openssl/sha.h> - - /* -@@ -49,9 +50,6 @@ - */ - --static void MDsha1_Start _ANSI_ARGS_ ((VOID* context)); - static void MDsha1_Update _ANSI_ARGS_ ((VOID* context, unsigned int character)); --static void MDsha1_UpdateBuf _ANSI_ARGS_ ((VOID* context, unsigned char* buffer, int bufLen)); - static void MDsha1_Final _ANSI_ARGS_ ((VOID* context, VOID* digest)); --static int MDsha1_Check _ANSI_ARGS_ ((Tcl_Interp* interp)); - - /* -@@ -67,9 +65,9 @@ - sizeof (CTX_TYPE), - DIGEST_SIZE, -- MDsha1_Start, -+ (Trf_MDStart *)SHA1_Init, - MDsha1_Update, -- MDsha1_UpdateBuf, -+ (Trf_MDUpdateBuf *)SHA1_Update, - MDsha1_Final, -- MDsha1_Check -+ NULL - }; - -@@ -106,30 +104,4 @@ - *------------------------------------------------------* - * -- * MDsha1_Start -- -- * -- * ------------------------------------------------* -- * Initialize the internal state of the message -- * digest generator. -- * ------------------------------------------------* -- * -- * Sideeffects: -- * As of the called procedure. -- * -- * Result: -- * None. -- * -- *------------------------------------------------------* -- */ -- --static void --MDsha1_Start (context) --VOID* context; --{ -- sha1f.init ((SHA_CTX*) context); --} -- --/* -- *------------------------------------------------------* -- * - * MDsha1_Update -- - * -@@ -155,33 +127,5 @@ - unsigned char buf = character; - -- sha1f.update ((SHA_CTX*) context, &buf, 1); --} -- --/* -- *------------------------------------------------------* -- * -- * MDsha1_UpdateBuf -- -- * -- * ------------------------------------------------* -- * Update the internal state of the message digest -- * generator for a character buffer. -- * ------------------------------------------------* -- * -- * Sideeffects: -- * As of the called procedure. -- * -- * Result: -- * None. -- * -- *------------------------------------------------------* -- */ -- --static void --MDsha1_UpdateBuf (context, buffer, bufLen) --VOID* context; --unsigned char* buffer; --int bufLen; --{ -- sha1f.update ((SHA_CTX*) context, (unsigned char*) buffer, bufLen); -+ SHA1_Update ((SHA_CTX*) context, &buf, 1); - } - -@@ -211,9 +155,9 @@ - { - #ifndef OTP -- sha1f.final ((unsigned char*) digest, (SHA_CTX*) context); -+ SHA1_Final ((unsigned char*) digest, (SHA_CTX*) context); - #else - unsigned int result[SHA_DIGEST_LENGTH / sizeof (char)]; - -- sha1f.final ((unsigned char*) result, (SHA_CTX*) context); -+ SHA1_Final ((unsigned char*) result, (SHA_CTX*) context); - - result[0] ^= result[2]; -@@ -224,30 +168,3 @@ - memcpy ((VOID *) digest, (VOID *) result, DIGEST_SIZE); - #endif --} -- --/* -- *------------------------------------------------------* -- * -- * MDsha1_Check -- -- * -- * ------------------------------------------------* -- * Do global one-time initializations of the message -- * digest generator. -- * ------------------------------------------------* -- * -- * Sideeffects: -- * Loads the shared library containing the -- * SHA1 functionality -- * -- * Result: -- * A standard Tcl error code. -- * -- *------------------------------------------------------* -- */ -- --static int --MDsha1_Check (interp) --Tcl_Interp* interp; --{ -- return TrfLoadSHA1 (interp); - } |