md52.txt

信息加密原码

//md5.h   
  #ifndef   HEADER_MD5_H   
  #define   HEADER_MD5_H   
    
  #ifdef     __cplusplus   
  extern   "C"   {   
  #endif   
    
  #define   MD5_CBLOCK 64   
  #define   MD5_LBLOCK 16   
  #define   MD5_BLOCK 16   
  #define   MD5_LAST_BLOCK     56   
  #define   MD5_LENGTH_BLOCK   8   
  #define   MD5_DIGEST_LENGTH   16   
    
  typedef   struct   MD5state_st   
  {   
  unsigned   long   A,B,C,D;   
  unsigned   long   Nl,Nh;   
  unsigned   long   data[MD5_LBLOCK];   
  int   num;   
  }   MD5_CTX;   
    
  #ifndef   NOPROTO   
  void   MD5_Init(MD5_CTX   *c);   
  void   MD5_Update(MD5_CTX   *c,   unsigned   char   *data,   unsigned   long   len);   
  void   MD5_Final(unsigned   char   *md,   MD5_CTX   *c);   
  unsigned   char   *MD5(unsigned   char   *d,   unsigned   long   n,   unsigned   char   *md);   
  void   MD5_Transform(MD5_CTX   *c,   unsigned   char   *b);   
  #else   
  void   MD5_Init();   
  void   MD5_Update();   
  void   MD5_Final();   
  unsigned   char   *MD5();   
  void   MD5_Transform();   
  #endif   
    
  #ifdef     __cplusplus   
  }   
  #endif   
    
  #endif   
  //end   of   md5.h   
    
  //md5_locl.h   
  /*   On   sparc,   this   actually   slows   things   down   :-(   */   
  #if   defined(sun)   
  #undef   B_ENDIAN   
  #endif   
    
  #include   <stdlib.h>   
  #include   <string.h>   
  #include   "md5.h"   
    
  #define   ULONG unsigned   long   
  #define   UCHAR unsigned   char   
  #define   UINT unsigned   int   
    
  #if   defined(NOCONST)   
  #define   const   
  #endif   
    
  #undef   c2l   
  #define   c2l(c,l) (l   =   ((unsigned   long)(*((c)++)))           ,   \   
    l|=(((unsigned   long)(*((c)++)))<<   8),   \   
    l|=(((unsigned   long)(*((c)++)))<<16),   \   
    l|=(((unsigned   long)(*((c)++)))<<24))   
    
  #undef   p_c2l   
  #define   p_c2l(c,l,n) {   \   
  switch   (n)   {   \   
  case   0:   l   =((unsigned   long)(*((c)++)));   \   
  case   1:   l|=((unsigned   long)(*((c)++)))<<   8;   \   
  case   2:   l|=((unsigned   long)(*((c)++)))<<16;   \   
  case   3:   l|=((unsigned   long)(*((c)++)))<<24;   \   
  }   \   
  }   
    
  /*   NOTE   the   pointer   is   not   incremented   at   the   end   of   this   */   
  #undef   c2l_p   
  #define   c2l_p(c,l,n) {   \   
  l=0;   \   
  (c)+=n;   \   
  switch   (n)   {   \   
  case   3:   l   =((unsigned   long)(*(--(c))))<<16;   \   
  case   2:   l|=((unsigned   long)(*(--(c))))<<   8;   \   
  case   1:   l|=((unsigned   long)(*(--(c))))         ;   \   
  }   \   
  }   
    
  #undef   p_c2l_p   
  #define   p_c2l_p(c,l,sc,len)   {   \   
  switch   (sc)   \   
  {   \   
  case   0:   l   =((unsigned   long)(*((c)++)));   \   
  if   (--len   ==   0)   break;   \   
  case   1:   l|=((unsigned   long)(*((c)++)))<<   8;   \   
  if   (--len   ==   0)   break;   \   
  case   2:   l|=((unsigned   long)(*((c)++)))<<16;   \   
  }   \   
  }   
    
  #undef   l2c   
  #define   l2c(l,c) (*((c)++)=(unsigned   char)(((l)         )&0xff),   \   
    *((c)++)=(unsigned   char)(((l)>>   8)&0xff),   \   
    *((c)++)=(unsigned   char)(((l)>>16)&0xff),   \   
    *((c)++)=(unsigned   char)(((l)>>24)&0xff))   
    
  /*   NOTE   -   c   is   not   incremented   as   per   l2c   */   
  #undef   l2cn   
  #define   l2cn(l1,l2,c,n) {   \   
  c+=n;   \   
  switch   (n)   {   \   
  case   8:   *(--(c))=(unsigned   char)(((l2)>>24)&0xff);   \   
  case   7:   *(--(c))=(unsigned   char)(((l2)>>16)&0xff);   \   
  case   6:   *(--(c))=(unsigned   char)(((l2)>>   8)&0xff);   \   
  case   5:   *(--(c))=(unsigned   char)(((l2)         )&0xff);   \   
  case   4:   *(--(c))=(unsigned   char)(((l1)>>24)&0xff);   \   
  case   3:   *(--(c))=(unsigned   char)(((l1)>>16)&0xff);   \   
  case   2:   *(--(c))=(unsigned   char)(((l1)>>   8)&0xff);   \   
  case   1:   *(--(c))=(unsigned   char)(((l1)         )&0xff);   \   
  }   \   
  }   
    
  /*   A   nice   byte   order   reversal   from   Wei   Dai   <[e-mail]>   */   
  #if   defined(WIN32)   
  /*   5   instructions   with   rotate   instruction,   else   9   */   
  #define   Endian_Reverse32(a)   \   
  {   \   
  unsigned   long   l=(a);   \   
  (a)=((ROTATE(l,8)&0x00FF00FF)|(ROTATE(l,24)&0xFF00FF00));   \   
  }   
  #else   
  /*   6   instructions   with   rotate   instruction,   else   8   */   
  #define   Endian_Reverse32(a)   \   
  {   \   
  unsigned   long   l=(a);   \   
  l=(((l&0xFF00FF00)>>8L)|((l&0x00FF00FF)<<8L));   \   
  (a)=ROTATE(l,16L);   \   
  }   
  #endif   
  /*   
  #define F(x,y,z) (((x)   &   (y))     |     ((~(x))   &   (z)))   
  #define G(x,y,z) (((x)   &   (z))     |     ((y)   &   (~(z))))   
  */   
    
  /*   As   pointed   out   by   Wei   Dai   <[e-mail]>,   the   above   can   be   
    *   simplified   to   the   code   below.     Wei   attributes   these   optimisations   
    *   to   Peter   Gutmann's   SHS   code,   and   he   attributes   it   to   Rich   Schroeppel.   
    */   
  #define F(b,c,d) ((((c)   ^   (d))   &   (b))   ^   (d))   
  #define G(b,c,d) ((((b)   ^   (c))   &   (d))   ^   (c))   
  #define H(b,c,d) ((b)   ^   (c)   ^   (d))   
  #define I(b,c,d) (((~(d))   |   (b))   ^   (c))   
    
  #undef   ROTATE   
  #if   defined(WIN32)   
  #define   ROTATE(a,n)           _lrotl(a,n)   
  #else   
  #define   ROTATE(a,n)           (((a)<<(n))|(((a)&0xffffffff)>>(32-(n))))   
  #endif   
    
    
  #define   R0(a,b,c,d,k,s,t)   {   \   
  a+=((k)+(t)+F((b),(c),(d)));   \   
  a=ROTATE(a,s);   \   
  a+=b;   };\   
    
  #define   R1(a,b,c,d,k,s,t)   {   \   
  a+=((k)+(t)+G((b),(c),(d)));   \   
  a=ROTATE(a,s);   \   
  a+=b;   };   
    
  #define   R2(a,b,c,d,k,s,t)   {   \   
  a+=((k)+(t)+H((b),(c),(d)));   \   
  a=ROTATE(a,s);   \   
  a+=b;   };   
    
  #define   R3(a,b,c,d,k,s,t)   {   \   
  a+=((k)+(t)+I((b),(c),(d)));   \   
  a=ROTATE(a,s);   \   
  a+=b;   };   
  //end   of   md5_locl.h