- for protocol version >= 27, mdfour_tail() is called when the block size
[rsync/rsync.git] / lib / mdfour.c
index c7aec27..d8e8632 100644 (file)
 
 static struct mdfour *m;
 
-static inline uint32 F(uint32 X, uint32 Y, uint32 Z)
-{
-       return (X&Y) | ((~X)&Z);
-}
-
-static inline uint32 G(uint32 X, uint32 Y, uint32 Z)
-{
-       return (X&Y) | (X&Z) | (Y&Z); 
-}
-
-static inline uint32 H(uint32 X, uint32 Y, uint32 Z)
-{
-       return X^Y^Z;
-}
+#define MASK32 (0xffffffff)
 
-static inline uint32 lshift(uint32 x, int s)
-{
-#ifdef LARGE_INT32
-       x &= 0xFFFFFFFF;
-       return ((x<<s)&0xFFFFFFFF) | (x>>(32-s));
-#else
-       return ((x<<s) | (x>>(32-s)));
-#endif
-}
+#define F(X,Y,Z) ((((X)&(Y)) | ((~(X))&(Z))))
+#define G(X,Y,Z) ((((X)&(Y)) | ((X)&(Z)) | ((Y)&(Z))))
+#define H(X,Y,Z) (((X)^(Y)^(Z)))
+#define lshift(x,s) (((((x)<<(s))&MASK32) | (((x)>>(32-(s)))&MASK32)))
 
-#define ROUND1(a,b,c,d,k,s) a = lshift(a + F(b,c,d) + X[k], s)
-#define ROUND2(a,b,c,d,k,s) a = lshift(a + G(b,c,d) + X[k] + 0x5A827999,s)
-#define ROUND3(a,b,c,d,k,s) a = lshift(a + H(b,c,d) + X[k] + 0x6ED9EBA1,s)
+#define ROUND1(a,b,c,d,k,s) a = lshift((a + F(b,c,d) + M[k])&MASK32, s)
+#define ROUND2(a,b,c,d,k,s) a = lshift((a + G(b,c,d) + M[k] + 0x5A827999)&MASK32,s)
+#define ROUND3(a,b,c,d,k,s) a = lshift((a + H(b,c,d) + M[k] + 0x6ED9EBA1)&MASK32,s)
 
 /* this applies md4 to 64 byte chunks */
 static void mdfour64(uint32 *M)
 {
-       int j;
        uint32 AA, BB, CC, DD;
-       uint32 X[16];
        uint32 A,B,C,D;
 
-       for (j=0;j<16;j++)
-               X[j] = M[j];
-
        A = m->A; B = m->B; C = m->C; D = m->D; 
        AA = A; BB = B; CC = C; DD = D;
 
@@ -80,6 +57,7 @@ static void mdfour64(uint32 *M)
         ROUND1(A,B,C,D, 12,  3);  ROUND1(D,A,B,C, 13,  7);  
        ROUND1(C,D,A,B, 14, 11);  ROUND1(B,C,D,A, 15, 19);      
 
+
         ROUND2(A,B,C,D,  0,  3);  ROUND2(D,A,B,C,  4,  5);  
        ROUND2(C,D,A,B,  8,  9);  ROUND2(B,C,D,A, 12, 13);
         ROUND2(A,B,C,D,  1,  3);  ROUND2(D,A,B,C,  5,  5);  
@@ -98,15 +76,11 @@ static void mdfour64(uint32 *M)
         ROUND3(A,B,C,D,  3,  3);  ROUND3(D,A,B,C, 11,  9);  
        ROUND3(C,D,A,B,  7, 11);  ROUND3(B,C,D,A, 15, 15);
 
-       A += AA; B += BB; C += CC; D += DD;
+       A += AA; B += BB; 
+       C += CC; D += DD;
        
-#ifdef LARGE_INT32
-       A &= 0xFFFFFFFF; B &= 0xFFFFFFFF;
-       C &= 0xFFFFFFFF; D &= 0xFFFFFFFF;
-#endif
-
-       for (j=0;j<16;j++)
-               X[j] = 0;
+       A &= MASK32; B &= MASK32; 
+       C &= MASK32; D &= MASK32;
 
        m->A = A; m->B = B; m->C = C; m->D = D;
 }
@@ -135,29 +109,53 @@ void mdfour_begin(struct mdfour *md)
        md->C = 0x98badcfe;
        md->D = 0x10325476;
        md->totalN = 0;
+       md->totalN2 = 0;
 }
 
 
-static void mdfour_tail(unsigned char *in, int n)
+static void mdfour_tail(unsigned char *in, uint32 n)
 {
        unsigned char buf[128];
        uint32 M[16];
-       uint32 b;
-
-       m->totalN += n;
-
-       b = m->totalN * 8;
+       extern int remote_version;
+
+       /*
+        * Count total number of bits, modulo 2^64
+        */
+       m->totalN += n << 3;
+       if (m->totalN < (n << 3)) {
+               m->totalN2++;
+       }
+       m->totalN2 += n >> 29;
 
        memset(buf, 0, 128);
        if (n) memcpy(buf, in, n);
        buf[n] = 0x80;
 
        if (n <= 55) {
-               copy4(buf+56, b);
+               copy4(buf+56, m->totalN);
+               /*
+                * Prior to protocol version 27 only the number of bits
+                * modulo 2^32 was included.  MD4 requires the number
+                * of bits modulo 2^64, which was fixed starting with
+                * protocol version 27.
+                */
+               if (remote_version >= 27) {
+                       copy4(buf+60, m->totalN2);
+               }
                copy64(M, buf);
                mdfour64(M);
        } else {
-               copy4(buf+120, b); 
+               copy4(buf+120, m->totalN); 
+               /*
+                * Prior to protocol version 27 only the number of bits
+                * modulo 2^32 was included.  MD4 requires the number
+                * of bits modulo 2^64, which was fixed starting with
+                * protocol version 27.
+                */
+               if (remote_version >= 27) {
+                       copy4(buf+124, m->totalN2); 
+               }
                copy64(M, buf);
                mdfour64(M);
                copy64(M, buf+64);
@@ -165,20 +163,23 @@ static void mdfour_tail(unsigned char *in, int n)
        }
 }
 
-void mdfour_update(struct mdfour *md, unsigned char *in, int n)
+void mdfour_update(struct mdfour *md, unsigned char *in, uint32 n)
 {
        uint32 M[16];
 
-       if (n == 0) mdfour_tail(in, n);
-
        m = md;
 
+       if (n == 0) mdfour_tail(in, n);
+
        while (n >= 64) {
                copy64(M, in);
                mdfour64(M);
                in += 64;
                n -= 64;
-               m->totalN += 64;
+               m->totalN += 64 << 3;
+               if (m->totalN < 64 << 3) {
+                       m->totalN2++;
+               }
        }
 
        if (n) mdfour_tail(in, n);
@@ -209,8 +210,8 @@ static void file_checksum1(char *fname)
 {
        int fd, i;
        struct mdfour md;
-       unsigned char buf[64], sum[16];
-
+       unsigned char buf[64*1024], sum[16];
+       
        fd = open(fname,O_RDONLY);
        if (fd == -1) {
                perror("fname");
@@ -234,6 +235,7 @@ static void file_checksum1(char *fname)
        printf("\n");
 }
 
+#if 0
 #include "../md4.h"
 
 static void file_checksum2(char *fname)
@@ -268,11 +270,14 @@ static void file_checksum2(char *fname)
                printf("%02X", sum[i]);
        printf("\n");
 }
+#endif
 
  int main(int argc, char *argv[])
 {
        file_checksum1(argv[1]);
+#if 0
        file_checksum2(argv[1]);
+#endif
        return 0;
 }
 #endif