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