1、SHA1算法源代碼2009-10-16 17336951Sha1.h=#ifndef _SHA1_H_#define _SHA1_H_/* * */* sha1 . h */#ifndef _SHA_enum_#define _SHA_enum_Enum。ShaSuccess=0，Shanull、/* */* null pointerparameter */Shainputtoolong，/* */* inputdata too long */shastateerror/* */* called input after result */#endif# define sha1 hasshsiz

2、e 20Typedef struct SHA1Context。dword intermediate _ hashsha1 hashsize/4；/Message DigestDWORD Length _ Low/Message length in bitsDWORD Length _ High/Message length in bitsInt Message _ Block _ Index/Index into message block arrayunsigned char Message _ Block64；/512-bit message blocksInt Computed/Is t

3、he digest computed？Int Corrupted/Is the message digest corrupted？ SHA1Context/function protoypesc string get sha1 string(c string s source)；int sha 1 reset(sha 1 context *)；Int sha1 input (sha1 context *、const unsigned char *、unsigned int)；Int sha1 result (sha1context *，unsigned char message _ diges

4、tsha1 hasized)；cstring sha1 to base 32(const unsigned char *)；#endif=# include“sha1 . h”/define the sha1 circular left shift macro# define sha1 circularshift (bits，word)(word)(bits)|(word)(32-(bits)/local function prototales */void sha1 pad message(sha1 context *)；void sha1 process message block(sha

5、1 context *)；Int SHA1Reset(SHA1Context *c)。If(！c)Return shaNullc-Length _ Low=0；c-Length _ High=0；c-Message _ Block _ Index=0；c-Intermediate _ Hash0=0x；c-intermediate _ hash1=0 xefc dab 89；c-intermediate _ hash2=0x 98 badcfe；c-Intermediate _ Hash3=0x；c-intermediate _ hash4=0x c3d 2 E1 f 0；c-Computed

6、=0；c-Corrupted=0；Return shaSuccessInt sha1 result (sha1context * c，unsigned char message _ digestsha1 hasshsize)。int I；If(！C |！Message_Digest)Return shaNullc-Corrupted(if)return c-Corrupted；If(！C-已計(jì)算)。sha1 pad message(c)；for(I=0)；I64C-Message_Block i=0)c-Length _ Low=0；/* * */*和clear length */c-Leng

7、th _ High=0；c-Computed=1；for(I=0)；I SHA1HashSizeI)message _ digestI=c-intermediate _ hashI28 *(3-(I0x 03)；Return shaSuccessint sha1 input(sha1 context * context，const unsigned char * message _ array，unsigned length)。If(！長度)Return shaSuccessIf(！Context |！Message_array)Return shaNull內(nèi)容計(jì)算(If)。context-c

8、orrupted=shastate error；Return shaStateError內(nèi)容已修正(If)return context-Corrupted；While(length -！Context-Corrupted)。context-message _ blockcontext-message _ block _ index=(* message _ array0x ff)；context-Length _ Low=8；If (context-Length_Low=0)。context-Length _ High；If (context-Length_High=0)。/* * */* M

9、essage is too long */context-Corrupted=1；if(context-message _ block _ index=64)sha1 processmessageblock(context)；Message _ arrayReturn shaSuccessvoid sha1 process message block(sha1 context * context)。Const dword k =.0x5a，0x6ed 9e1，0x8x1bbcdc，0 xca 62 C1 D6 ；int t；DWORD tempDWORD W80；DWORD A、B、C、D、E

10、；/* */* initialize the first 16 words in the array w*/for(t=0)；T 16t)。wt=context-message _ blockt * 424；wt|=context-message _ blockt * 4 116；wt|=context-message _ blockt * 4 28；wt|=context-message _ blockt * 4 3；for(t=16)；T 80t)W t=sha1 circularshift (1，wt-3wt-8wt-14wt-16)；a=context-Intermediate _ H

11、ash0；b=context-Intermediate _ Hash1；c=context-Intermediate _ Hash2；d=context-Intermediate _ Hash3；e=context-Intermediate _ Hash4；for(t=0)；T 20t)。Temp=SHA1CircularShift(5，A)(b c)|( b)d)e wtk0；e=D；d=C；C=SHA1CircularShift(30，B)；b=A；A=tempfor(t=20)；T 40t)。Temp=sha1 circularshift (5，a)(b c d)e wtk1；e=D；d

12、=C；C=SHA1CircularShift(30，B)；b=A；A=tempfor(t=40)；T 60t).Temp=SHA1CircularShift(5，A)(B C)|(B D)|(C D)E WtK2；e=D；d=C；C=SHA1CircularShift(30，B)；b=A；A=tempfor(t=60)；T 80t).Temp=sha1 circularshift (5，a)(b c d)e wtk3；e=D；d=C；C=SHA1CircularShift(30，B)；b=A；A=tempcontext-Intermediate _ Hash0=A；context-Interm

13、ediate _ Hash1=B；context-Intermediate _ Hash2=C；context-Intermediate _ Hash3=D；context-Intermediate _ Hash4=E；context-Message _ Block _ Index=0；void sha1 pad message(sha1 context * context)。if(context-message _ block _ index 55)。context-message _ blockcontext-message _ block _ index=0x 80；while(cont

14、ext-message _ block _ index 64)context-message _ blockcontext-message _ block _ index=0；sha1 processmessageblock(context)；while(context-message _ block _ index 56)context-message _ blockcontext-message _ block _ index=0；Else.context-message _ blockcontext-message _ block _ index=0x 80；while(context-message _ block _ index 56)context-message _ blockcontext-message _ block _ index=0；/* */* store the message length as the last 8 octets*/context-message _ block56=context-length _ high 24；context-message _ block57=context-length _ high 16；context-message _ block58=context-length _ h