WD Traduire un code php en Wlanguage

Bonjour,
J'ai ce code ou mieux, cette fonction, en php
public function login($username, $password)
{
//Makes sure we are ready for the next request.
$this->prepare();

/*
* Note how the router wants the password to be the following:
* 1) Hashed by SHA256, then the raw output base64 encoded.
* 2) The username is appended with the result of the above,
* AND the current token. Yes, the password changes everytime
* depending on what token we got. This really fucks with scrapers.
* The string from above (point 2) is then hashed by SHA256 again,
* and the raw output is once again base64 encoded.
*
* This is how the router login process works. So the password being sent
* changes everytime depending on the current user session/token.
* Not bad actually.
*/
$loginXml = '<?xml version="1.0" encoding="UTF-8"?><request>
<Username>'.$username.'</Username>
<password_type>4</password_type>
<Password>'.base64_encode(hash('sha256', $username.base64_encode(hash('sha256', $password, false)).$this->http->getToken(), false)).'</Password>
</request>
';
$xml = $this->http->postXml($this->getUrl('api/user/login'), $loginXml);
$obj = new \SimpleXMLElement($xml);
//Simple check if login is OK.
return ((string)$obj == 'OK');
}




Sur la base des indications précédentes, j'aimerais avoir la même fonction en Wlanguage pour les habitués
Merci