97 lines
		
	
	
		
			3.0 KiB
		
	
	
	
		
			PHP
		
	
	
			
		
		
	
	
			97 lines
		
	
	
		
			3.0 KiB
		
	
	
	
		
			PHP
		
	
	
<?php
 | 
						|
declare(strict_types = 1);
 | 
						|
 | 
						|
namespace BaconQrCodeTest\Common;
 | 
						|
 | 
						|
use BaconQrCode\Common\ReedSolomonCodec;
 | 
						|
use PHPUnit\Framework\TestCase;
 | 
						|
use SplFixedArray;
 | 
						|
 | 
						|
class ReedSolomonTest extends TestCase
 | 
						|
{
 | 
						|
    public function tabs() : array
 | 
						|
    {
 | 
						|
        return [
 | 
						|
            [2, 0x7, 1, 1, 1],
 | 
						|
            [3, 0xb, 1, 1, 2],
 | 
						|
            [4, 0x13, 1, 1, 4],
 | 
						|
            [5, 0x25, 1, 1, 6],
 | 
						|
            [6, 0x43, 1, 1, 8],
 | 
						|
            [7, 0x89, 1, 1, 10],
 | 
						|
            [8, 0x11d, 1, 1, 32],
 | 
						|
        ];
 | 
						|
    }
 | 
						|
 | 
						|
    /**
 | 
						|
     * @dataProvider tabs
 | 
						|
     */
 | 
						|
    public function testCodec(int $symbolSize, int $generatorPoly, int $firstRoot, int $primitive, int $numRoots) : void
 | 
						|
    {
 | 
						|
        mt_srand(0xdeadbeef, MT_RAND_PHP);
 | 
						|
 | 
						|
        $blockSize = (1 << $symbolSize) - 1;
 | 
						|
        $dataSize  = $blockSize - $numRoots;
 | 
						|
        $codec     = new ReedSolomonCodec($symbolSize, $generatorPoly, $firstRoot, $primitive, $numRoots, 0);
 | 
						|
 | 
						|
        for ($errors = 0; $errors <= $numRoots / 2; ++$errors) {
 | 
						|
            // Load block with random data and encode
 | 
						|
            $block = SplFixedArray::fromArray(array_fill(0, $blockSize, 0), false);
 | 
						|
 | 
						|
            for ($i = 0; $i < $dataSize; ++$i) {
 | 
						|
                $block[$i] = mt_rand(0, $blockSize);
 | 
						|
            }
 | 
						|
 | 
						|
            // Make temporary copy
 | 
						|
            $tBlock = clone $block;
 | 
						|
            $parity = SplFixedArray::fromArray(array_fill(0, $numRoots, 0), false);
 | 
						|
            $errorLocations = SplFixedArray::fromArray(array_fill(0, $blockSize, 0), false);
 | 
						|
            $erasures = [];
 | 
						|
 | 
						|
            // Create parity
 | 
						|
            $codec->encode($block, $parity);
 | 
						|
 | 
						|
            // Copy parity into test blocks
 | 
						|
            for ($i = 0; $i < $numRoots; ++$i) {
 | 
						|
                $block[$i + $dataSize] = $parity[$i];
 | 
						|
                $tBlock[$i + $dataSize] = $parity[$i];
 | 
						|
            }
 | 
						|
 | 
						|
            // Seed with errors
 | 
						|
            for ($i = 0; $i < $errors; ++$i) {
 | 
						|
                $errorValue = mt_rand(1, $blockSize);
 | 
						|
 | 
						|
                do {
 | 
						|
                    $errorLocation = mt_rand(0, $blockSize);
 | 
						|
                } while (0 !== $errorLocations[$errorLocation]);
 | 
						|
 | 
						|
                $errorLocations[$errorLocation] = 1;
 | 
						|
 | 
						|
                if (mt_rand(0, 1)) {
 | 
						|
                    $erasures[] = $errorLocation;
 | 
						|
                }
 | 
						|
 | 
						|
                $tBlock[$errorLocation] ^= $errorValue;
 | 
						|
            }
 | 
						|
 | 
						|
            $erasures = SplFixedArray::fromArray($erasures, false);
 | 
						|
 | 
						|
            // Decode the errored block
 | 
						|
            $foundErrors = $codec->decode($tBlock, $erasures);
 | 
						|
 | 
						|
            if ($errors > 0 && null === $foundErrors) {
 | 
						|
                $this->assertSame($block, $tBlock, 'Decoder failed to correct errors');
 | 
						|
            }
 | 
						|
 | 
						|
            $this->assertSame($errors, $foundErrors, 'Found errors do not equal expected errors');
 | 
						|
 | 
						|
            for ($i = 0; $i < $foundErrors; ++$i) {
 | 
						|
                if (0 === $errorLocations[$erasures[$i]]) {
 | 
						|
                    $this->fail(sprintf('Decoder indicates error in location %d without error', $erasures[$i]));
 | 
						|
                }
 | 
						|
            }
 | 
						|
 | 
						|
            $this->assertEquals($block, $tBlock, 'Decoder did not correct errors');
 | 
						|
        }
 | 
						|
    }
 | 
						|
}
 |