2012-08-20 13:48:33 +02:00
|
|
|
<?php
|
|
|
|
/**
|
2014-02-15 19:57:49 +01:00
|
|
|
* @author Andreas Fischer <bantu@phpbb.com>
|
2014-12-10 00:02:44 +01:00
|
|
|
* @copyright 2012 Andreas Fischer
|
2014-02-15 19:57:49 +01:00
|
|
|
* @license http://www.opensource.org/licenses/mit-license.html MIT License
|
2012-08-20 13:48:33 +02:00
|
|
|
*/
|
|
|
|
|
2014-02-15 19:57:49 +01:00
|
|
|
require_once 'Crypt/Hash.php';
|
|
|
|
|
2014-06-01 21:13:20 +02:00
|
|
|
abstract class Unit_Crypt_Hash_TestCase extends PhpseclibTestCase
|
2012-08-20 13:48:33 +02:00
|
|
|
{
|
2014-02-15 19:57:49 +01:00
|
|
|
static public function setUpBeforeClass()
|
|
|
|
{
|
|
|
|
if (!defined('CRYPT_HASH_MODE')) {
|
2014-12-09 19:46:30 +01:00
|
|
|
define('CRYPT_HASH_MODE', Crypt_Hash::MODE_INTERNAL);
|
2014-02-15 19:57:49 +01:00
|
|
|
}
|
|
|
|
}
|
2012-08-20 13:48:33 +02:00
|
|
|
|
2014-02-15 19:57:49 +01:00
|
|
|
public function setUp()
|
|
|
|
{
|
2014-12-09 19:46:30 +01:00
|
|
|
if (defined('CRYPT_HASH_MODE') && CRYPT_HASH_MODE !== Crypt_Hash::MODE_INTERNAL) {
|
2014-02-15 19:57:49 +01:00
|
|
|
$this->markTestSkipped(
|
2014-12-09 19:46:30 +01:00
|
|
|
'Skipping test because CRYPT_HASH_MODE is not defined as Crypt_Hash::MODE_INTERNAL.'
|
2014-02-15 19:57:49 +01:00
|
|
|
);
|
|
|
|
}
|
|
|
|
}
|
2012-08-20 13:48:33 +02:00
|
|
|
|
2014-02-15 19:57:49 +01:00
|
|
|
protected function assertHashesTo(Crypt_Hash $hash, $message, $expected)
|
|
|
|
{
|
|
|
|
$this->assertEquals(
|
|
|
|
strtolower($expected),
|
|
|
|
bin2hex($hash->hash($message)),
|
|
|
|
sprintf("Failed asserting that '%s' hashes to '%s'.", $message, $expected)
|
|
|
|
);
|
|
|
|
}
|
2012-08-20 13:48:33 +02:00
|
|
|
|
2014-02-15 19:57:49 +01:00
|
|
|
protected function assertHMACsTo(Crypt_Hash $hash, $key, $message, $expected)
|
|
|
|
{
|
|
|
|
$hash->setKey($key);
|
2012-08-20 13:48:33 +02:00
|
|
|
|
2014-02-15 19:57:49 +01:00
|
|
|
$this->assertEquals(
|
|
|
|
strtolower($expected),
|
|
|
|
bin2hex($hash->hash($message)),
|
|
|
|
sprintf(
|
|
|
|
"Failed asserting that '%s' HMACs to '%s' with key '%s'.",
|
|
|
|
$message,
|
|
|
|
$expected,
|
|
|
|
$key
|
|
|
|
)
|
|
|
|
);
|
|
|
|
}
|
2012-08-20 13:48:33 +02:00
|
|
|
}
|