/* TextLib WWW javascript + tluser javascript (vegen) */
/* - books.google.com ; konyvnet.hu - hasznalatahoz */
/* - Vissza/Bezar gombhoz - ha van olyan */
/* - aktualis mezo beallitasa - ha van 'startfield' id-ju mezo */

var teszt       = false;
var TlwwwCgiUrl = '/cgi-bin/tlwww.cgi';
var BelepPar    = 'userstat=1&belepes=1';
var KilepvePar  = 'userstat=1&kilepve=1';
var KilepPar    = 'userstat=1&tlkillsess=';
var CheckPar    = 'userstat=1&tlchksession=';
var HosszPar    = 'hossz=';
var ElojegyzPar = 'elojegyz=';
var ElojegyzPar2= '&kvt=';
var ElojegyzPar3= '&fiok=';
var OlvAllPar   = 'userstat=1&tlmysession=';
var OlvModPar   = 'usermod=1';
var KolcsPar    = 'userstat=1&kolcsonzesek=1';

//
function TlwwwOnload()
{
    SetGomb();       // vissza gomb beallitasa, ha van a lapon
    SetLoginFlds();  // azon: jelszo: beallitas, ha ...
    SetOlvAll();     // tlsession beallitasa
    SetBelep();      // belepes, olvallapot gomb beallitasa, ha ...
    SetCurrFld('startfield'); // Ez legyen az aktualis mezo
}

// DbName van?
function DbName()
{
    var dbn = document.getElementById('db');    // dbname beallitva?
    if( dbn && dbn.value!='' )
      { var str = 'db=' + dbn.value + '&' ;
        return str;
      }
    else
        return "";
}

// mytlsess-bol a tlsession beallitasa
function SetOlvAll()
{
    var os = document.getElementById('mytlsess');    // eredeti session
    if( os )
      {
        // SetSessionId(os.value); - ne rontsuk el az aktualist...
        // majd a CheckreValasz beallitja, ha van ilyen session
        makePOSTRequest(TlwwwCgiUrl,CheckPar+os.value,CheckreValasz);
      }
}

// Hosszabbitas
function Hosszabbit( KolcsDref )
{
    makePOSTRequest(TlwwwCgiUrl,HosszPar+KolcsDref, HosszraValasz );
}

// Elojegyzes
function Elojegyzes( DokDref, KvtDref, FiokDref )
{
    var par = ElojegyzPar+DokDref+ElojegyzPar2+KvtDref+ElojegyzPar3+FiokDref;
    if( teszt ) alert( par );
    makePOSTRequest(TlwwwCgiUrl,par,ElojegyzValasz );
}

//
function SetCurrFld(fldname)
{
   var x=document.getElementById(fldname);
   if(x) { x.select(); x.focus(); }
}

/* Linkek kitoltesehez */
function TlCall( db, dref, html )
{
   if( db=='err' )
       { alert(html+':'+db+':'+dref);
         if( db=='err' ) return;
       }  // hibauzenet megjelenites
   var x  = document.getElementById(db+dref);
   if( x )
     { x.innerHTML = html;
     }
   else
      alert('Nincs:' + db + dref);
}

/* books.google.hu-hoz kell */
function MyCall(booksInfo)
{
   for (isbn in booksInfo)
     { var bookInfo = booksInfo[isbn];
       if( bookInfo )
        { var lapozz = document.getElementById('l'+isbn);
          var ilink  = document.getElementById('a'+isbn);
          var tlink  = document.getElementById('t'+isbn);
          var timg   = document.getElementById('i'+isbn);
          if( ilink )
            { ilink.href = bookInfo.info_url;
              ilink.innerHTML = 'adatok';
            }
          if( lapozz &&
              (bookInfo.preview == "full" || bookInfo.preview == "partial") )
               { lapozz.href = bookInfo.preview_url;
                 lapozz.style.display = '';
                 if( bookInfo.preview == "full" )
                     lapozz.innerHTML = "olvasd el";
                 else
                     lapozz.innerHTML = "lapozz bele";
               }
          if( bookInfo.thumbnail_url )
            {
              if(timg)
                {timg.src = bookInfo.thumbnail_url; timg.style.display = '';}
              if(tlink)
                {tlink.href=bookInfo.preview_url; tlink.style.display = '';}
            }
        }
     }
}

/* konyvnet.hu */
function SetupImage(konyvid,url)
{
  var blink  = document.getElementById('blink'+konyvid);
  var hatso  = document.getElementById('xnet'+konyvid);
  var borito = document.getElementById('knet'+konyvid);
  if( blink )   { blink.href = url; }
  if( borito )  { borito.src = url; }
  if( hatso )   { hatso.src = url; }
}

/* gomb lathato / nem */
function HideButton(view,txt)
{
   var v = document.getElementById(view);
   if( v )
     { v.disabled = true;
       v.title = txt;
     }
}

function SetButtonNum(view,num)
{
   var v = document.getElementById(view);
   if( v )
     { v.disabled = false;
       v.title = v.title + ' (' + num + ' dokumentum)' ;
     }
}

/* Vissza/Bezar gomb */
function zar() { window.opener=self; window.close(); return false; }
function SetGomb()
{
     var ooo = document.getElementById('visszagomb');
     if( ooo && history.length<1 )
      { ooo.value="Bezár";
        ooo.onclick=zar;
      }
}

// TextLib / tlwww / user ki-belepes kezeles
// Mezo ID-k a lapokon:
//   unam/pnam,ups/pps - login nev,jelszo
//   namemlek, pwdemlek - login/jelszo megjegyzendo?
//   belepes - 'Belepes' gomb
//   olvall  - 'Olv.Allapot' gomb
//   olvmod  - 'Adatmodositas' gomb
//   belepform - belepest intezo form neve
//   mytlsess - eredeti session id (olvallapot)

// Belepes gomb, olv.allapot gomb
function SetBelep()
{
    var bg = document.getElementById('belepes');  // gomb
    var og = document.getElementById('olvall');   // gomb
    var um = document.getElementById('usermod');  // input hidden
    var tlsess = get_cookie('tlsession');         // akt. session
    var os = document.getElementById('mytlsess')  // eredeti session?
    if( bg ) // Van 'Belepes' gomb
      { bg.disabled=false;
        if( tlsess )
          { bg.value='Kilépés'; bg.onclick=Kilepes;
            bg.title=' Be van jelentkezve. Ezzel kiléphet ';
          }
        else
          { bg.value='Belépés'; bg.onclick=Belepes;
            bg.title=' Nincs belépve. Ezzel a gombbal megteheti ';
          }
      }
    if( og && !os ) // Van 'olv.allapot' gomb, es nem olv.all ablak ez
      { if( tlsess && tlsess!='no' )
          { og.disabled = false; og.onclick=OlvAllapot;
            og.title=' Megnézheti olvasói állapotát ';
          }
        else
          { og.disabled = true;
            og.title=' Jelenleg nincs belépve ';
          }
      }
}

//
function SetSessionId( sid )
{
    if( sid )   // beallitas
        set_cookie('tlsession',sid);
    else        // torles
        set_cookie('tlsession','no',2000,2,2); // nincs mar a sess.
}

//
function KillOlvData( kereses )
{   var spage, par =  TlwwwCgiUrl + '?' + DbName() + KilepvePar;
    if( kereses )
      { spage = document.getElementById('searchpage'); // itt elrakva
        if( spage )                               // abban van az URL!
            par = spage.value;
      }
    window.location.replace( par );
}

//
function Belepes()
{
    var burl = TlwwwCgiUrl + '?' + DbName() + BelepPar;
    if( teszt )
        alert( burl );
    window.location.href=burl;
}

//
function OlvAllapot()
{
    var os = get_cookie('tlsession');
    if( os )
      { var str = TlwwwCgiUrl + '?' + DbName() + OlvAllPar + os;
        if( teszt ) alert(str);
        window.location.href = str;
      }
}

function OlvModosit()
{   var str = TlwwwCgiUrl + '?' + DbName() + OlvModPar;
    if( teszt ) alert(str);
    window.location.href = str;
}

function Kolcsonzeseim()
{   var str = TlwwwCgiUrl + '?' + DbName() + KolcsPar;
    if( teszt ) alert(str);
    window.location.href = str;
}

//
function KillSession()
{   var os=get_cookie('tlsession');
    SetSessionId(false);
    if( os )  // kuldjuk el POST-al a kilepest
        makePOSTRequest(TlwwwCgiUrl,KilepPar + os,KilepesreValasz);
}

// Kilepest csinal, szervernek is uzen, meg is jegyzi, mibol leptem ki
function Kilepes()
{
    kilep = confirm('Biztosan ki akar jelentkezni?');
    if( kilep )
      { var os = document.getElementById('mytlsess')  // eredeti session?
        var um = document.getElementById('usermod');  // input hidden
        KillSession();
        if( os || um )       // Ha olv.allapot ablak || adatmodositas
            KillOlvData(1);  // lecsereli kereses ablakra...
        SetBelep();
      }
}

//
function SetFields( mezo, emlek )
{
   var ret=0;
   var ln = get_cookie(mezo);
   var emstr = get_cookie(emlek);
   var em = (emstr=='true');
   var onam = document.getElementById(mezo);
   var oeml = document.getElementById(emlek);
   if( !onam )
     { return ret; }
   if( ln && em )  // van, es emlekezni is kellett ra...
     { onam.value=ln; ret=1; }
   else
       onam.value='';
   if( oeml )
       oeml.checked = em;
   return ret;
}

// Cookie-bol kitolti a username, passwordot
function SetLoginFlds()
{  var ret = 0;
   // user dolgok
   ret += SetFields('unam','namemlek');
   ret += SetFields('ups','pwdemlek');
   // partner dolgok
   ret += SetFields('pnam','pnamemlek');
   ret += SetFields('pps','ppdemlek');
}

//
function SetCookie(mezo,emlek,jelszo)
{
    var onam = document.getElementById(mezo);
    var oeml = document.getElementById(emlek);
    var titokjelszo='TiTkOs';
    var xmezo = 'x' + mezo;
    var xval;
    if( !onam ) return;
    var oval = onam.value;
    if( jelszo )
      {
        if( oval != titokjelszo )   // meg nem allitottam at?
          { xval = MD5(onam.value);
            onam.value=oval=titokjelszo;
            if(teszt) alert('xval van: ' + xval);
          }
        else // be kellett legyen allitva
          {
            xval=get_cookie(xmezo);
            if( teszt && !xval ) alert('titok jelszo, de nincs xval');
          }
      }
    if( xval ) AddFldToForm('xups',xval);  // mindenkepp beallitjuk kuldeshez
    if( oeml && oeml.checked )  // ha emlekezni is kell ra
      { if( jelszo )
           set_cookie(xmezo,xval,2025,2,2);   // hash jelszo mentese
        set_cookie(mezo,oval,2025,2,2);       // siman elmentjuk
      }
    else                        // nem kell emlekezni - toroljuk, ha volt
      { set_cookie(mezo,'',2000,2,2);
        set_cookie(xmezo,'',2000,2,2);
      }
    if( oeml && oeml.checked ) // van es kell emlekezni
        set_cookie(emlek,'true',2025,2,2);
    else
        set_cookie(emlek,'',2000,2,2);
}

// Sajat kuldom
function SetCookies()
{
    // user
    SetCookie('unam','namemlek',false);
    SetCookie('ups','pwdemlek',true);
    // partner
    SetCookie('pnam','pnamemlek',false);
    SetCookie('pps','ppdemlek',true);
}

//
function TlSubmit()
{
    KillSession();   // elozo session torlese
    SetCookies();    // Cookie beallitas
    SetBelep();      // Gombok valtoztatasa
    return true;
}

//
function set_cookie( name, value, exp_y, exp_m, exp_d, path, domain, secure )
{
  var cookie_string = name + "=" + escape ( value );
  if ( exp_y )
  { var expires = new Date ( exp_y, exp_m, exp_d );
    cookie_string += "; expires=" + expires.toGMTString();
  }
  if ( !path )  path="/";                          // ez a default!!!
  cookie_string += "; path=" + escape ( path );
  if ( domain )
        cookie_string += "; domain=" + escape ( domain );
  if ( secure )
        cookie_string += "; secure";
  document.cookie = cookie_string;
  //alert(cookie_string);
}

function get_cookie( cookie_name )
{
  var results = document.cookie.match ( '(^|;) ?' + cookie_name + '=([^;]*)(;|$)' );
  if ( results )
    return ( unescape ( results[2] ) );
  else
    return null;
}

//
function del_cookie(name)
{
  document.cookie=name+'='+'; expires=Thu, 01-Jan-70 00:00:01 GMT; path=/';
}

//
function AddFldToForm(name,value)
{
  var formElement=document.getElementById('belepform');
  if( formElement )
    { newField = document.createElement("input");
      newField.type = "hidden";
      newField.name = name;
      newField.value = value;
      formElement.appendChild(newField);
      //alert(name + ' = ' + value);
    }
  else
     if(teszt) alert('AddFld sikertelen');
}

// http request ----------------------------------------------------
var http_request = false;
function CheckreValasz()   // olv.allapot - session letezes ellenorzes
{
  if( !http_request ) return;
  if( http_request.readyState == 4 )
    { var os = document.getElementById('mytlsess')     // eredeti session
      var ts = get_cookie('tlsession');                // akt. session
      var result = http_request.responseText;
      if(teszt)alert('sesscheck err:'+http_request.status+':'+result+':');
      if( http_request.status == 200 && result.substr(0,2) == "OK" )
         {
           if( os )
               SetSessionId(os.value);
           SetBelep();
         }
      else
        {  if( os && ts && os.value!=ts )
               OlvAllapot();   // akt. olv. allapot lekerdezese
           else
               KillOlvData(0); // lecsereli belepes ablakra
        }
    }
}

// HosszraValasz
function HosszraValasz()
{
   if( !http_request ) return;
   if( http_request.readyState == 4 )
     {
      var result = http_request.responseText;
      var res = result.split(" ");
      if( http_request.status == 200 && res[0]=="OK" )
        {
          var hido = document.getElementById('hatarido_'+res[1]);
          if( hido )
            { var ujido = res[2].substr(0,4) + '-' +
                          res[2].substr(4,2) + '-' + res[2].substr(6,2);
              hido.innerHTML = '==> ' + ujido;
              hido.style.backgroundColor = 'yellow';
              hido.title = ' határidő módosítva ';
            }
          // alert(' Hosszabbítás megtörtént ' );
          return;
        }
      else
          alert(' Hosszabbítás sikertelen: ' + result );
     }
}

// ElojegyzValasz
function ElojegyzValasz()
{
   if( !http_request ) return;
   if( http_request.readyState == 4 )
     {
      var result = http_request.responseText;
      var res = result.split(" ");
      if( http_request.status == 200 )
        {
          var hido = document.getElementById('elojegyz_'+res[1]);
          if( hido )
            { var siker = ( res[0]=="OK" );
              var color = ( siker ? 'yellow' : 'red' );
              var txt   = ( siker ? 'Előjegyzés megtörtént' :
                                    'Előjegyzés sikertelen' ) ;
              res[0] = res[1] = '';
              hido.innerHTML = txt;
              hido.style.backgroundColor = color;
              hido.title = res.join(' ');
              if( !siker ) alert(txt+':'+hido.title);
            }
          return;
        }
      else
          alert(' Előjegyzés sikertelen: ' + result );
     }
}

function KilepesreValasz()
{
   if( !http_request ) return;
   if( http_request.readyState == 4 )
     {
      if( http_request.status == 200 )
        {
          if(teszt)alert('kilepes OK');
          return;
        }
      if(teszt)alert('Kilepes:' + http_request.readyState+ '/' + http_request.status);
     }
}

//
function makePOSTRequest(url, parameters, fv)
{
   http_request = false;
   if (window.XMLHttpRequest) { // Mozilla, Safari,...
      http_request = new XMLHttpRequest();
      if (http_request.overrideMimeType)
            http_request.overrideMimeType('text/html');
      } else if (window.ActiveXObject) { // IE
         try {
            http_request = new ActiveXObject("Msxml2.XMLHTTP");
         } catch (e) {
            try {
               http_request = new ActiveXObject("Microsoft.XMLHTTP");
            } catch (e) {}
         }
      }
      if (!http_request)
        { alert('HTTP kuldes nem megy'); return false; }
      pars = DbName() + parameters;
      if( teszt )
          alert('http: ' + url + '?' + pars );

      http_request.onreadystatechange = fv;
      http_request.open('POST', url, true);
      http_request.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
      http_request.setRequestHeader("Content-length", parameters.length);
      http_request.setRequestHeader("Connection", "close");
      http_request.send(pars);
}

// MD5 --------------------------------------------------------
var MD5 = function (string) {

        function RotateLeft(lValue, iShiftBits) {
                return (lValue<<iShiftBits) | (lValue>>>(32-iShiftBits));
        }

        function AddUnsigned(lX,lY) {
                var lX4,lY4,lX8,lY8,lResult;
                lX8 = (lX & 0x80000000);
                lY8 = (lY & 0x80000000);
                lX4 = (lX & 0x40000000);
                lY4 = (lY & 0x40000000);
                lResult = (lX & 0x3FFFFFFF)+(lY & 0x3FFFFFFF);
                if (lX4 & lY4) {
                        return (lResult ^ 0x80000000 ^ lX8 ^ lY8);
                }
                if (lX4 | lY4) {
                        if (lResult & 0x40000000) {
                                return (lResult ^ 0xC0000000 ^ lX8 ^ lY8);
                        } else {
                                return (lResult ^ 0x40000000 ^ lX8 ^ lY8);
                        }
                } else {
                        return (lResult ^ lX8 ^ lY8);
                }
        }

        function F(x,y,z) { return (x & y) | ((~x) & z); }
        function G(x,y,z) { return (x & z) | (y & (~z)); }
        function H(x,y,z) { return (x ^ y ^ z); }
        function I(x,y,z) { return (y ^ (x | (~z))); }

        function FF(a,b,c,d,x,s,ac) {
                a = AddUnsigned(a, AddUnsigned(AddUnsigned(F(b, c, d), x), ac));
                return AddUnsigned(RotateLeft(a, s), b);
        };

        function GG(a,b,c,d,x,s,ac) {
                a = AddUnsigned(a, AddUnsigned(AddUnsigned(G(b, c, d), x), ac));
                return AddUnsigned(RotateLeft(a, s), b);
        };

        function HH(a,b,c,d,x,s,ac) {
                a = AddUnsigned(a, AddUnsigned(AddUnsigned(H(b, c, d), x), ac));
                return AddUnsigned(RotateLeft(a, s), b);
        };

        function II(a,b,c,d,x,s,ac) {
                a = AddUnsigned(a, AddUnsigned(AddUnsigned(I(b, c, d), x), ac));
                return AddUnsigned(RotateLeft(a, s), b);
        };

        function ConvertToWordArray(string) {
                var lWordCount;
                var lMessageLength = string.length;
                var lNumberOfWords_temp1=lMessageLength + 8;
                var lNumberOfWords_temp2=(lNumberOfWords_temp1-(lNumberOfWords_temp1 % 64))/64;
                var lNumberOfWords = (lNumberOfWords_temp2+1)*16;
                var lWordArray=Array(lNumberOfWords-1);
                var lBytePosition = 0;
                var lByteCount = 0;
                while ( lByteCount < lMessageLength ) {
                        lWordCount = (lByteCount-(lByteCount % 4))/4;
                        lBytePosition = (lByteCount % 4)*8;
                        lWordArray[lWordCount] = (lWordArray[lWordCount] | (string.charCodeAt(lByteCount)<<lBytePosition));
                        lByteCount++;
                }
                lWordCount = (lByteCount-(lByteCount % 4))/4;
                lBytePosition = (lByteCount % 4)*8;
                lWordArray[lWordCount] = lWordArray[lWordCount] | (0x80<<lBytePosition);
                lWordArray[lNumberOfWords-2] = lMessageLength<<3;
                lWordArray[lNumberOfWords-1] = lMessageLength>>>29;
                return lWordArray;
        };

        function WordToHex(lValue) {
                var WordToHexValue="",WordToHexValue_temp="",lByte,lCount;
                for (lCount = 0;lCount<=3;lCount++) {
                        lByte = (lValue>>>(lCount*8)) & 255;
                        WordToHexValue_temp = "0" + lByte.toString(16);
                        WordToHexValue = WordToHexValue + WordToHexValue_temp.substr(WordToHexValue_temp.length-2,2);
                }
                return WordToHexValue;
        };

        var x=Array();
        var k,AA,BB,CC,DD,a,b,c,d;
        var S11=7, S12=12, S13=17, S14=22;
        var S21=5, S22=9 , S23=14, S24=20;
        var S31=4, S32=11, S33=16, S34=23;
        var S41=6, S42=10, S43=15, S44=21;

        x = ConvertToWordArray(string);
        a = 0x67452301; b = 0xEFCDAB89; c = 0x98BADCFE; d = 0x10325476;
        for (k=0;k<x.length;k+=16) {
                AA=a; BB=b; CC=c; DD=d;
                a=FF(a,b,c,d,x[k+0], S11,0xD76AA478);
                d=FF(d,a,b,c,x[k+1], S12,0xE8C7B756);
                c=FF(c,d,a,b,x[k+2], S13,0x242070DB);
                b=FF(b,c,d,a,x[k+3], S14,0xC1BDCEEE);
                a=FF(a,b,c,d,x[k+4], S11,0xF57C0FAF);
                d=FF(d,a,b,c,x[k+5], S12,0x4787C62A);
                c=FF(c,d,a,b,x[k+6], S13,0xA8304613);
                b=FF(b,c,d,a,x[k+7], S14,0xFD469501);
                a=FF(a,b,c,d,x[k+8], S11,0x698098D8);
                d=FF(d,a,b,c,x[k+9], S12,0x8B44F7AF);
                c=FF(c,d,a,b,x[k+10],S13,0xFFFF5BB1);
                b=FF(b,c,d,a,x[k+11],S14,0x895CD7BE);
                a=FF(a,b,c,d,x[k+12],S11,0x6B901122);
                d=FF(d,a,b,c,x[k+13],S12,0xFD987193);
                c=FF(c,d,a,b,x[k+14],S13,0xA679438E);
                b=FF(b,c,d,a,x[k+15],S14,0x49B40821);
                a=GG(a,b,c,d,x[k+1], S21,0xF61E2562);
                d=GG(d,a,b,c,x[k+6], S22,0xC040B340);
                c=GG(c,d,a,b,x[k+11],S23,0x265E5A51);
                b=GG(b,c,d,a,x[k+0], S24,0xE9B6C7AA);
                a=GG(a,b,c,d,x[k+5], S21,0xD62F105D);
                d=GG(d,a,b,c,x[k+10],S22,0x2441453);
                c=GG(c,d,a,b,x[k+15],S23,0xD8A1E681);
                b=GG(b,c,d,a,x[k+4], S24,0xE7D3FBC8);
                a=GG(a,b,c,d,x[k+9], S21,0x21E1CDE6);
                d=GG(d,a,b,c,x[k+14],S22,0xC33707D6);
                c=GG(c,d,a,b,x[k+3], S23,0xF4D50D87);
                b=GG(b,c,d,a,x[k+8], S24,0x455A14ED);
                a=GG(a,b,c,d,x[k+13],S21,0xA9E3E905);
                d=GG(d,a,b,c,x[k+2], S22,0xFCEFA3F8);
                c=GG(c,d,a,b,x[k+7], S23,0x676F02D9);
                b=GG(b,c,d,a,x[k+12],S24,0x8D2A4C8A);
                a=HH(a,b,c,d,x[k+5], S31,0xFFFA3942);
                d=HH(d,a,b,c,x[k+8], S32,0x8771F681);
                c=HH(c,d,a,b,x[k+11],S33,0x6D9D6122);
                b=HH(b,c,d,a,x[k+14],S34,0xFDE5380C);
                a=HH(a,b,c,d,x[k+1], S31,0xA4BEEA44);
                d=HH(d,a,b,c,x[k+4], S32,0x4BDECFA9);
                c=HH(c,d,a,b,x[k+7], S33,0xF6BB4B60);
                b=HH(b,c,d,a,x[k+10],S34,0xBEBFBC70);
                a=HH(a,b,c,d,x[k+13],S31,0x289B7EC6);
                d=HH(d,a,b,c,x[k+0], S32,0xEAA127FA);
                c=HH(c,d,a,b,x[k+3], S33,0xD4EF3085);
                b=HH(b,c,d,a,x[k+6], S34,0x4881D05);
                a=HH(a,b,c,d,x[k+9], S31,0xD9D4D039);
                d=HH(d,a,b,c,x[k+12],S32,0xE6DB99E5);
                c=HH(c,d,a,b,x[k+15],S33,0x1FA27CF8);
                b=HH(b,c,d,a,x[k+2], S34,0xC4AC5665);
                a=II(a,b,c,d,x[k+0], S41,0xF4292244);
                d=II(d,a,b,c,x[k+7], S42,0x432AFF97);
                c=II(c,d,a,b,x[k+14],S43,0xAB9423A7);
                b=II(b,c,d,a,x[k+5], S44,0xFC93A039);
                a=II(a,b,c,d,x[k+12],S41,0x655B59C3);
                d=II(d,a,b,c,x[k+3], S42,0x8F0CCC92);
                c=II(c,d,a,b,x[k+10],S43,0xFFEFF47D);
                b=II(b,c,d,a,x[k+1], S44,0x85845DD1);
                a=II(a,b,c,d,x[k+8], S41,0x6FA87E4F);
                d=II(d,a,b,c,x[k+15],S42,0xFE2CE6E0);
                c=II(c,d,a,b,x[k+6], S43,0xA3014314);
                b=II(b,c,d,a,x[k+13],S44,0x4E0811A1);
                a=II(a,b,c,d,x[k+4], S41,0xF7537E82);
                d=II(d,a,b,c,x[k+11],S42,0xBD3AF235);
                c=II(c,d,a,b,x[k+2], S43,0x2AD7D2BB);
                b=II(b,c,d,a,x[k+9], S44,0xEB86D391);
                a=AddUnsigned(a,AA);
                b=AddUnsigned(b,BB);
                c=AddUnsigned(c,CC);
                d=AddUnsigned(d,DD);
        }
        var temp = WordToHex(a)+WordToHex(b)+WordToHex(c)+WordToHex(d);
        return temp.toLowerCase();
}