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');
 | |
|         }
 | |
|     }
 | |
| }
 |