egroupware_official/api/src/Mail/hash_pbkdf2.php

26 lines
768 B
PHP
Raw Normal View History

<?php
/**
* Symfony polyfill for php < 5.5
*
* @author Sebastiaan Stok <s.stok@rollerscapes.net>
* @link https://github.com/symfony/polyfill-php55/blob/master/Php55.php
*/
function hash_pbkdf2($algorithm, $password, $salt, $iterations, $length = 0, $rawOutput = false)
{
// Number of blocks needed to create the derived key
$blocks = ceil($length / strlen(hash($algorithm, null, true)));
$digest = '';
for ($i = 1; $i <= $blocks; ++$i) {
$ib = $block = hash_hmac($algorithm, $salt.pack('N', $i), $password, true);
// Iterations
for ($j = 1; $j < $iterations; ++$j) {
$ib ^= ($block = hash_hmac($algorithm, $block, $password, true));
}
$digest .= $ib;
}
if (!$rawOutput) {
$digest = bin2hex($digest);
}
return substr($digest, 0, $length);
}