/* md5.jvs 1.0b 27/06/96 * Javascript implementation of the RSA Data Security, Inc. MD5 * Message-Digest Algorithm. * Copyright (c) 1996 Henri Torgemane. All Rights Reserved. Permission to use, copy, modify, and distribute this software and its documentation for any purposes and without fee is hereby granted provided that this copyright notice appears in all copies. * Some basic logical functions had to be rewritten because of a bug in Javascript.. Just try to compute 0xffffffff >> 4 with it.. Of course, these functions are slower than the original would be, but at least, they work! */ function array(n){for(i=0;i=0){a=a%0x80000000;a>>=b;a+=0x40000000>>(b-1)}else a>>=b;return a} function shl1(a){a=a%0x80000000;if(a&0x40000000==0x40000000){a-=0x40000000;a*=2;a+=0x80000000}else a*=2;return a} function shl(a,b){a=integer(a);b=integer(b);for(var i=0;i=0)if(t2>=0)return((t1&t2)+0x80000000);else return(t1&b);else if(t2>=0)return(a&t2);else return(a&b)} function or(a,b){a=integer(a);b=integer(b);var t1=(a-0x80000000);var t2=(b-0x80000000);if(t1>=0)if(t2>=0)return((t1|t2)+0x80000000);else return((t1|b)+0x80000000);else if(t2>=0)return((a|t2)+0x80000000);else return(a|b)} function xor(a,b){a=integer(a);b=integer(b);var t1=(a-0x80000000);var t2=(b-0x80000000);if(t1>=0)if(t2>=0)return(t1^t2);else return((t1^b)+0x80000000);else if(t2>=0)return((a^t2)+0x80000000);else return(a^b)} function not(a){a=integer(a);return(0xffffffff-a)} /* Here begin the real algorithm */ var state=new array(4);var count=new array(2);count[0]=0;count[1]=0;var buffer=new array(64); var transformBuffer=new array(16);var digestBits=new array(16); var S11=7,S12=12,S13=17,S14=22,S21=5,S22=9,S23=14,S24=20,S31=4,S32=11,S33=16,S34=23,S41=6,S42=10,S43=15,S44=21; function F(x,y,z){return or(and(x,y),and(not(x),z))} function G(x,y,z){return or(and(x,z),and(y,not(z)))} function H(x,y,z){return xor(xor(x,y),z)} function I(x,y,z){return xor(y,or(x,not(z)))} function rotateLeft(a,n){return or(shl(a,n),(shr(a,(32-n))))} function FF(a,b,c,d,x,s,ac){a=a+F(b,c,d)+x+ac;a=rotateLeft(a,s);a=a+b;return a} function GG(a,b,c,d,x,s,ac){a=a+G(b,c,d)+x+ac;a=rotateLeft(a,s);a=a+b;return a} function HH(a,b,c,d,x,s,ac){a=a+H(b,c,d)+x+ac;a=rotateLeft(a,s);a=a+b;return a} function II(a,b,c,d,x,s,ac){a=a+I(b,c,d)+x+ac;a=rotateLeft(a,s);a=a+b;return a} function transform(buf,offset){var a=0,b=0,c=0,d=0;var x=transformBuffer;a=state[0];b=state[1];c=state[2];d=state[3];for(i=0;i<16;i++){x[i]=and(buf[i*4+offset],0xff);for(j=1;j<4;j++){x[i]+=shl(and(buf[i*4+j+offset],0xff),j*8)}} a=FF(a,b,c,d,x[ 0],S11,0xd76aa478);d=FF(d,a,b,c,x[ 1],S12,0xe8c7b756);c=FF(c,d,a,b,x[ 2],S13,0x242070db);b=FF(b,c,d,a,x[ 3],S14,0xc1bdceee);a=FF(a,b,c,d,x[ 4],S11,0xf57c0faf);d=FF(d,a,b,c,x[ 5],S12,0x4787c62a);c=FF(c,d,a,b,x[ 6],S13,0xa8304613);b=FF(b,c,d,a,x[ 7],S14,0xfd469501);a=FF(a,b,c,d,x[ 8],S11,0x698098d8);d=FF(d,a,b,c,x[ 9],S12,0x8b44f7af);c=FF(c,d,a,b,x[10],S13,0xffff5bb1);b=FF(b,c,d,a,x[11],S14,0x895cd7be);a=FF(a,b,c,d,x[12],S11,0x6b901122);d=FF(d,a,b,c,x[13],S12,0xfd987193);c=FF(c,d,a,b,x[14],S13,0xa679438e);b=FF(b,c,d,a,x[15],S14,0x49b40821); a=GG(a,b,c,d,x[ 1],S21,0xf61e2562);d=GG(d,a,b,c,x[ 6],S22,0xc040b340);c=GG(c,d,a,b,x[11],S23,0x265e5a51);b=GG(b,c,d,a,x[ 0],S24,0xe9b6c7aa);a=GG(a,b,c,d,x[ 5],S21,0xd62f105d);d=GG(d,a,b,c,x[10],S22,0x2441453);c=GG(c,d,a,b,x[15],S23,0xd8a1e681);b=GG(b,c,d,a,x[ 4],S24,0xe7d3fbc8);a=GG(a,b,c,d,x[ 9],S21,0x21e1cde6);d=GG(d,a,b,c,x[14],S22,0xc33707d6);c=GG(c,d,a,b,x[ 3],S23,0xf4d50d87);b=GG(b,c,d,a,x[ 8],S24,0x455a14ed);a=GG(a,b,c,d,x[13],S21,0xa9e3e905);d=GG(d,a,b,c,x[ 2],S22,0xfcefa3f8);c=GG(c,d,a,b,x[ 7],S23,0x676f02d9);b=GG(b,c,d,a,x[12],S24,0x8d2a4c8a); a=HH(a,b,c,d,x[ 5],S31,0xfffa3942);d=HH(d,a,b,c,x[ 8],S32,0x8771f681);c=HH(c,d,a,b,x[11],S33,0x6d9d6122);b=HH(b,c,d,a,x[14],S34,0xfde5380c);a=HH(a,b,c,d,x[ 1],S31,0xa4beea44);d=HH(d,a,b,c,x[ 4],S32,0x4bdecfa9);c=HH(c,d,a,b,x[ 7],S33,0xf6bb4b60);b=HH(b,c,d,a,x[10],S34,0xbebfbc70);a=HH(a,b,c,d,x[13],S31,0x289b7ec6);d=HH(d,a,b,c,x[ 0],S32,0xeaa127fa);c=HH(c,d,a,b,x[ 3],S33,0xd4ef3085);b=HH(b,c,d,a,x[ 6],S34,0x4881d05);a=HH(a,b,c,d,x[ 9],S31,0xd9d4d039);d=HH(d,a,b,c,x[12],S32,0xe6db99e5);c=HH(c,d,a,b,x[15],S33,0x1fa27cf8);b=HH(b,c,d,a,x[ 2],S34,0xc4ac5665); a=II(a,b,c,d,x[ 0],S41,0xf4292244);d=II(d,a,b,c,x[ 7],S42,0x432aff97);c=II(c,d,a,b,x[14],S43,0xab9423a7);b=II(b,c,d,a,x[ 5],S44,0xfc93a039);a=II(a,b,c,d,x[12],S41,0x655b59c3);d=II(d,a,b,c,x[ 3],S42,0x8f0ccc92);c=II(c,d,a,b,x[10],S43,0xffeff47d);b=II(b,c,d,a,x[ 1],S44,0x85845dd1);a=II(a,b,c,d,x[ 8],S41,0x6fa87e4f);d=II(d,a,b,c,x[15],S42,0xfe2ce6e0);c=II(c,d,a,b,x[ 6],S43,0xa3014314);b=II(b,c,d,a,x[13],S44,0x4e0811a1);a=II(a,b,c,d,x[ 4],S41,0xf7537e82);d=II(d,a,b,c,x[11],S42,0xbd3af235);c=II(c,d,a,b,x[ 2],S43,0x2ad7d2bb);b=II(b,c,d,a,x[ 9],S44,0xeb86d391); state[0]+=a;state[1]+=b;state[2]+=c;state[3]+=d} function init(){count[0]=count[1]=0;state[0]=0x67452301;state[1]=0xefcdab89;state[2]=0x98badcfe;state[3]=0x10325476;for(i=0;i=63){transform(buffer,0)}} function finish(){var bits=new array(8);var padding;var i=0,index=0,padLen=0;for(i=0;i<4;i++){bits[i]=and(shr(count[0],(i*8)),0xff)}for(i=0;i<4;i++){bits[i+4]=and(shr(count[1],(i*8)),0xff)}index=and(shr(count[0],3),0x3f);padLen=(index<56)?(56-index):(120-index);padding=new array(64);padding[0]=0x80;for(i=0;i?@ABCDEFGHIJKLMNOPQRSTUVWXYZ"+"[\\]^_`abcdefghijklmnopqrstuvwxyz{|}~"; function MD5(entree){var l,s,k,ka,kb,kc,kd;init();for(k=0;k