Changeset 37641 in project

Timestamp:

06/02/19 19:08:52 (7 weeks ago)

Author:

kon

Message:

update len is not size_t but uint32, test not unsafe

Location:

release/5/sha1/trunk

Files:

• sha1-base.c (modified) (2 diffs)
• sha1.h (modified) (1 diff)
• tests/run.scm (modified) (1 diff)

release/5/sha1/trunk/sha1-base.c

@@ -128 +128 @@
  */
 static void
-SHA1Update(SHA1_CTX *context, const uint8_t *data, size_t len)
+SHA1Update(SHA1_CTX *context, const uint8_t *data, uint32_t len)
 {
-    unsigned int i;
+    uint32_t i;
     uint32_t j;
 
@@ -163 +163 @@
     for (i = 0; i < 8; i++) {
         finalcount[i] = (uint8_t)((context->count[(i >= 4 ? 0 : 1)]
-         >> ((3-(i & 3)) * 8) ) & 255);  /* Endian independent */
+                >> ((3-(i & 3)) * 8) ) & 255);   /* Endian independent */
     }
     SHA1Update(context, (const uint8_t *)"\200", 1);

release/5/sha1/trunk/sha1.h

@@ -10 +10 @@
 typedef struct {
         uint32_t state[5];
-        uint32_t count[2];  
+        uint32_t count[2];
         uint8_t buffer[SHA1_BLOCK_LENGTH];
 } SHA1_CTX;
-  
+
 static void     SHA1Transform(uint32_t state[5], const uint8_t buffer[SHA1_BLOCK_LENGTH]);
 static void     SHA1Init(SHA1_CTX *context);
-static void     SHA1Update(SHA1_CTX *context, const uint8_t *data, size_t len);
+static void     SHA1Update(SHA1_CTX *context, const uint8_t *data, uint32_t len);
 static void     SHA1Final(SHA1_CTX *context, uint8_t digest[SHA1_DIGEST_LENGTH]);

release/5/sha1/trunk/tests/run.scm

@@ -15 +15 @@
 (define *csc-options* "-inline-global \
   -specialize -optimize-leaf-routines -clustering -lfa2 \
-  -local -inline \
-  -no-trace -no-lambda-info \
-  -unsafe")
+  -local -inline")
 
 (define (test-name #!optional (eggnam EGG-NAME))