(PHP ActiveX) Generating Repeatable Random Data for Testing/Debugging

Demonstrates how to use the Fortuna PRNG to generate random-looking but repeatable non-random data for the purpose of testing and debugging.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows Note: The php_com_dotnet.dll may need to be enabled inside of php.ini.

<?php

// All Chilkat classes can be unlocked at once at the beginning of a program
// by calling UnlockBundle.  It requires a Bundle unlock code.
// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.Global')
$chilkatGlob = new COM("Chilkat.Global");
$success = $chilkatGlob->UnlockBundle('Anything for 30-day trial.');
if ($success != 1) {
    print $chilkatGlob->LastErrorText . "\n";
    exit;
}

// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.Prng')
$fortuna = new COM("Chilkat.Prng");

// Normally an application would seed the PRNG with entropy from
// some real random source.  However, sometimes we want the same
// random sequence of bytes for testing and debugging purposes.
// This a reason why GetEntropy and AddEntropy are two different methods.
// An application could omit the call to GetEntropy, and instead pass
// non-random data to AddEntropy. For example:

// Seed the PRNG with non-entropy, so we get a repeatable sequence.
// Note: AddEntropy can be called any number of times.
$success = $fortuna->AddEntropy('01020304','hex');
$success = $fortuna->AddEntropy('hello world','ascii');

// Generate some random data:
$strRandHex = $fortuna->genRandom(16,'hex');
$strRandBase64 = $fortuna->genRandom(22,'base64');
$strRandBase58 = $fortuna->genRandom(32,'base58');

print 'hex random bytes: ' . $strRandHex . "\n";
print 'base64 random bytes: ' . $strRandBase64 . "\n";
print 'base58 random bytes: ' . $strRandBase58 . "\n";

// Try it again with a different object to verify that the same results are obtained:
// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.Prng')
$fortuna2 = new COM("Chilkat.Prng");

$success = $fortuna2->AddEntropy('01020304','hex');
$success = $fortuna2->AddEntropy('hello world','ascii');

$strRandHex = $fortuna2->genRandom(16,'hex');
$strRandBase64 = $fortuna2->genRandom(22,'base64');
$strRandBase58 = $fortuna2->genRandom(32,'base58');

print 'hex random bytes: ' . $strRandHex . "\n";
print 'base64 random bytes: ' . $strRandBase64 . "\n";
print 'base58 random bytes: ' . $strRandBase58 . "\n";

?>