2015-04-12 01:20:31 +00:00
|
|
|
<?php
|
|
|
|
/*
|
2016-02-02 21:04:15 +00:00
|
|
|
* Password Hashing With PBKDF2 (https://defuse.ca/php-pbkdf2.htm).
|
2015-04-12 01:20:31 +00:00
|
|
|
* Copyright (c) 2013, Taylor Hornby
|
|
|
|
* All rights reserved.
|
2015-09-05 16:11:04 +00:00
|
|
|
*
|
|
|
|
* Redistribution and use in source and binary forms, with or without
|
2015-04-12 01:20:31 +00:00
|
|
|
* modification, are permitted provided that the following conditions are met:
|
2015-09-05 16:11:04 +00:00
|
|
|
*
|
|
|
|
* 1. Redistributions of source code must retain the above copyright notice,
|
2015-04-12 01:20:31 +00:00
|
|
|
* this list of conditions and the following disclaimer.
|
2015-09-05 16:11:04 +00:00
|
|
|
*
|
2015-04-12 01:20:31 +00:00
|
|
|
* 2. Redistributions in binary form must reproduce the above copyright notice,
|
2015-09-05 16:11:04 +00:00
|
|
|
* this list of conditions and the following disclaimer in the documentation
|
2015-04-12 01:20:31 +00:00
|
|
|
* and/or other materials provided with the distribution.
|
2015-09-05 16:11:04 +00:00
|
|
|
*
|
|
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
|
|
|
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
|
|
|
|
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
2015-04-12 01:20:31 +00:00
|
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
namespace Sakura;
|
|
|
|
|
2015-10-18 19:06:30 +00:00
|
|
|
/**
|
2016-02-02 21:04:15 +00:00
|
|
|
* PBKDF2 password hashing implementation.
|
|
|
|
*
|
2015-10-18 19:06:30 +00:00
|
|
|
* @package Sakura
|
2016-02-02 21:04:15 +00:00
|
|
|
* @author Taylor Hornby <havoc@defuse.ca>
|
|
|
|
* @author Julian van de Groep <me@flash.moe>
|
2015-10-18 19:06:30 +00:00
|
|
|
*/
|
2015-09-14 20:51:23 +00:00
|
|
|
class Hashing
|
|
|
|
{
|
2016-02-02 21:04:15 +00:00
|
|
|
/**
|
|
|
|
* Hashing algorithm that should be used.
|
|
|
|
*
|
|
|
|
* @var string
|
|
|
|
*/
|
2015-09-14 21:41:43 +00:00
|
|
|
private static $hashAlgorithm = 'sha256';
|
2016-02-02 21:04:15 +00:00
|
|
|
|
|
|
|
/**
|
|
|
|
* Iterations.
|
|
|
|
*
|
|
|
|
* @var int
|
|
|
|
*/
|
2015-09-14 21:41:43 +00:00
|
|
|
private static $iterations = 1000;
|
2016-02-02 21:04:15 +00:00
|
|
|
|
|
|
|
/**
|
|
|
|
* The amount of bytes the salt should be.
|
|
|
|
*
|
|
|
|
* @var int
|
|
|
|
*/
|
2015-09-14 21:41:43 +00:00
|
|
|
private static $saltBytes = 24;
|
2016-02-02 21:04:15 +00:00
|
|
|
|
|
|
|
/**
|
|
|
|
* The amount of bytes the hash should be.
|
|
|
|
*
|
|
|
|
* @var int
|
|
|
|
*/
|
2015-09-14 21:41:43 +00:00
|
|
|
private static $hashBytes = 24;
|
2015-04-12 01:20:31 +00:00
|
|
|
|
2016-02-02 21:04:15 +00:00
|
|
|
/**
|
|
|
|
* Creates a hash.
|
|
|
|
*
|
|
|
|
* @param string $pass The password that should be hashed.
|
|
|
|
*
|
|
|
|
* @return array An array containing the algorithm, iterations, salt and hash.
|
|
|
|
*/
|
2015-09-14 21:41:43 +00:00
|
|
|
public static function createHash($pass)
|
2015-09-14 20:51:23 +00:00
|
|
|
{
|
2015-04-12 01:20:31 +00:00
|
|
|
$salt = base64_encode(
|
|
|
|
\mcrypt_create_iv(
|
2015-09-14 21:41:43 +00:00
|
|
|
self::$saltBytes,
|
2015-04-12 01:20:31 +00:00
|
|
|
MCRYPT_DEV_URANDOM
|
|
|
|
)
|
|
|
|
);
|
|
|
|
|
|
|
|
$hash = base64_encode(
|
|
|
|
self::pbkdf2(
|
2015-09-14 21:41:43 +00:00
|
|
|
self::$hashAlgorithm,
|
2015-04-12 01:20:31 +00:00
|
|
|
$pass,
|
|
|
|
$salt,
|
2015-09-14 21:41:43 +00:00
|
|
|
self::$iterations,
|
|
|
|
self::$hashBytes,
|
2015-04-12 01:20:31 +00:00
|
|
|
true
|
|
|
|
)
|
|
|
|
);
|
|
|
|
|
2015-10-18 19:06:30 +00:00
|
|
|
$passwordData = [
|
2015-09-14 21:41:43 +00:00
|
|
|
self::$hashAlgorithm,
|
|
|
|
self::$iterations,
|
2015-04-12 01:20:31 +00:00
|
|
|
$salt,
|
2015-09-14 20:51:23 +00:00
|
|
|
$hash,
|
2015-10-18 19:06:30 +00:00
|
|
|
];
|
2015-04-12 01:20:31 +00:00
|
|
|
|
|
|
|
return $passwordData;
|
|
|
|
}
|
|
|
|
|
2016-02-02 21:04:15 +00:00
|
|
|
/**
|
|
|
|
* Validate a password.
|
|
|
|
*
|
|
|
|
* @param string $password The password that is being validated.
|
|
|
|
* @param array $params The parametres in the order of algorithm, iterations, salt and hash.
|
|
|
|
*
|
|
|
|
* @return bool Correct?
|
|
|
|
*/
|
2015-09-14 21:41:43 +00:00
|
|
|
public static function validatePassword($password, $params)
|
2015-09-14 20:51:23 +00:00
|
|
|
{
|
2015-09-14 21:41:43 +00:00
|
|
|
if (count($params) < 4) {
|
2015-04-12 01:20:31 +00:00
|
|
|
return false;
|
2015-09-14 20:51:23 +00:00
|
|
|
}
|
2015-04-12 01:20:31 +00:00
|
|
|
|
2015-09-14 21:41:43 +00:00
|
|
|
$pbkdf2 = base64_decode($params[3]);
|
2015-04-12 01:20:31 +00:00
|
|
|
|
2015-09-14 21:41:43 +00:00
|
|
|
$validate = self::slowEquals(
|
2015-04-12 01:20:31 +00:00
|
|
|
$pbkdf2,
|
2016-01-02 17:55:31 +00:00
|
|
|
self::pbkdf2(
|
2015-09-14 21:41:43 +00:00
|
|
|
$params[0],
|
2015-04-12 01:20:31 +00:00
|
|
|
$password,
|
2015-09-14 21:41:43 +00:00
|
|
|
$params[2],
|
|
|
|
(int) $params[1],
|
2015-04-12 01:20:31 +00:00
|
|
|
strlen($pbkdf2),
|
|
|
|
true
|
|
|
|
)
|
|
|
|
);
|
|
|
|
|
|
|
|
return $validate;
|
|
|
|
}
|
|
|
|
|
2016-02-02 21:04:15 +00:00
|
|
|
/**
|
|
|
|
* Compares two strings $a and $b in length-constant time.
|
|
|
|
*
|
|
|
|
* @param string $a String A.
|
|
|
|
* @param string $b String B.
|
|
|
|
*
|
|
|
|
* @return bool Boolean indicating difference.
|
|
|
|
*/
|
2015-09-14 21:41:43 +00:00
|
|
|
public static function slowEquals($a, $b)
|
2015-09-14 20:51:23 +00:00
|
|
|
{
|
2015-04-12 01:20:31 +00:00
|
|
|
$diff = strlen($a) ^ strlen($b);
|
|
|
|
|
2015-09-14 20:51:23 +00:00
|
|
|
for ($i = 0; $i < strlen($a) && $i < strlen($b); $i++) {
|
2015-04-12 01:20:31 +00:00
|
|
|
$diff |= ord($a[$i]) ^ ord($b[$i]);
|
2015-09-14 20:51:23 +00:00
|
|
|
}
|
2015-04-12 01:20:31 +00:00
|
|
|
|
|
|
|
return $diff === 0;
|
|
|
|
}
|
|
|
|
|
2016-02-02 21:04:15 +00:00
|
|
|
/**
|
2015-04-12 01:20:31 +00:00
|
|
|
* PBKDF2 key derivation function as defined by RSA's PKCS #5: https://www.ietf.org/rfc/rfc2898.txt
|
2016-02-02 21:04:15 +00:00
|
|
|
*
|
2015-04-12 01:20:31 +00:00
|
|
|
* This implementation of PBKDF2 was originally created by https://defuse.ca
|
|
|
|
* With improvements by http://www.variations-of-shadow.com
|
2016-02-02 21:04:15 +00:00
|
|
|
*
|
|
|
|
* @param mixed $algorithm The hash algorithm to use. Recommended: SHA256.
|
|
|
|
* @param mixed $password The password.
|
|
|
|
* @param mixed $salt A salt that is unique to the password.
|
|
|
|
* @param mixed $count Iteration count. Higher is better, but slower. Recommended: At least 1000.
|
|
|
|
* @param mixed $key_length The length of the derived key in bytes.
|
|
|
|
* @param mixed $raw_output A $key_length-byte key derived from the password and salt.
|
|
|
|
*
|
|
|
|
* @return string The PBKDF2 derivation.
|
2015-04-12 01:20:31 +00:00
|
|
|
*/
|
2015-09-14 20:51:23 +00:00
|
|
|
private static function pbkdf2($algorithm, $password, $salt, $count, $key_length, $raw_output = false)
|
|
|
|
{
|
2015-04-12 01:20:31 +00:00
|
|
|
$algorithm = strtolower($algorithm);
|
|
|
|
|
2015-09-14 20:51:23 +00:00
|
|
|
if (!in_array($algorithm, hash_algos(), true)) {
|
2015-09-14 21:41:43 +00:00
|
|
|
trigger_error(
|
|
|
|
'PBKDF2 ERROR: Invalid hash algorithm.',
|
|
|
|
E_USER_ERROR
|
|
|
|
);
|
2015-09-14 20:51:23 +00:00
|
|
|
}
|
2015-04-12 01:20:31 +00:00
|
|
|
|
2015-09-14 20:51:23 +00:00
|
|
|
if ($count <= 0 || $key_length <= 0) {
|
2015-09-14 21:41:43 +00:00
|
|
|
trigger_error(
|
|
|
|
'PBKDF2 ERROR: Invalid parameters.',
|
|
|
|
E_USER_ERROR
|
|
|
|
);
|
2015-09-14 20:51:23 +00:00
|
|
|
}
|
2015-04-12 01:20:31 +00:00
|
|
|
|
2015-09-14 20:51:23 +00:00
|
|
|
if (function_exists('hash_pbkdf2')) {
|
2015-04-12 01:20:31 +00:00
|
|
|
// The output length is in NIBBLES (4-bits) if $raw_output is false!
|
2015-09-14 20:51:23 +00:00
|
|
|
if (!$raw_output) {
|
2015-04-12 01:20:31 +00:00
|
|
|
$key_length = $key_length * 2;
|
2015-09-14 20:51:23 +00:00
|
|
|
}
|
2015-04-12 01:20:31 +00:00
|
|
|
|
|
|
|
return hash_pbkdf2($algorithm, $password, $salt, $count, $key_length, $raw_output);
|
|
|
|
}
|
|
|
|
|
|
|
|
$hash_length = strlen(hash($algorithm, '', true));
|
|
|
|
$block_count = ceil($key_length / $hash_length);
|
|
|
|
|
|
|
|
$output = '';
|
|
|
|
|
2015-09-14 20:51:23 +00:00
|
|
|
for ($i = 1; $i <= $block_count; $i++) {
|
2015-04-12 01:20:31 +00:00
|
|
|
// $i encoded as 4 bytes, big endian.
|
|
|
|
$last = $salt . pack('N', $i);
|
|
|
|
|
|
|
|
// First iteration
|
|
|
|
$last = $xorsum = hash_hmac($algorithm, $last, $password, true);
|
|
|
|
|
|
|
|
// Perform the other $count - 1 interations
|
2015-09-14 20:51:23 +00:00
|
|
|
for ($j = 1; $j < $count; $j++) {
|
2015-04-12 01:20:31 +00:00
|
|
|
$xorsum ^= ($last = hash_hmac($algorithm, $last, $password, true));
|
2015-09-14 20:51:23 +00:00
|
|
|
}
|
2015-04-12 01:20:31 +00:00
|
|
|
|
|
|
|
$output .= $xorsum;
|
|
|
|
|
2015-09-14 20:51:23 +00:00
|
|
|
if ($raw_output) {
|
2015-04-12 01:20:31 +00:00
|
|
|
return substr($output, 0, $key_length);
|
2015-09-14 20:51:23 +00:00
|
|
|
}
|
2015-04-12 01:20:31 +00:00
|
|
|
|
2015-09-14 20:51:23 +00:00
|
|
|
return bin2hex(substr($output, 0, $key_length));
|
2015-04-12 01:20:31 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|