fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2009-01-20 23:04 UTC+0100 Viktor Szakats (harbour.01 syenar hu)

Browse Source 
* contrib/hbcrypt/sha1.c
    ! Fixed some BCC warnings.
This commit is contained in:
Viktor Szakats
2009-01-20 22:04:39 +00:00
parent 5f057a4265
commit 4ba2c27af5
2 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -8,6 +8,10 @@
2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
*/
2009-01-20 23:04 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
* contrib/hbcrypt/sha1.c
! Fixed some BCC warnings.
2009-01-20 23:00 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
* contrib/hbcrypt/sha1.c
! Added #include <string.h> for mem*().

6
harbour/contrib/hbcrypt/sha1.c
View File

@@ -98,7 +98,7 @@ void SHA1_Transform(sha1_quadbyte state[5], sha1_byte buffer[64]) {
state[3] += d;
state[4] += e;
/* Wipe variables */
a = b = c = d = e = 0;
/* a = b = c = d = e = 0; */
}
@@ -135,7 +135,7 @@ void SHA1_Update(SHA_CTX *context, sha1_byte *data, unsigned int len) {
/* Add padding and return the message digest. */
void SHA1_Final(sha1_byte digest[SHA1_DIGEST_LENGTH], SHA_CTX *context) {
sha1_quadbyte i, j;
sha1_quadbyte i;
sha1_byte finalcount[8];
for (i = 0; i < 8; i++) {
@@ -153,7 +153,7 @@ void SHA1_Final(sha1_byte digest[SHA1_DIGEST_LENGTH], SHA_CTX *context) {
((context->state[i>>2] >> ((3-(i & 3)) * 8) ) & 255);
}
/* Wipe variables */
i = j = 0;
/* i = 0; */
memset(context->buffer, 0, SHA1_BLOCK_LENGTH);
memset(context->state, 0, SHA1_DIGEST_LENGTH);
memset(context->count, 0, 8);