max80_fw/fw/testdata.pl

#!/usr/bin/perl

use bigint;
use strict;

my $x = 0x00001111;
for (my $i = 0; $i < 128*1024; $i++) {
    print pack("V", $x);
    $x = (($x * 0x89abcdef) + (($x * 0x89abcdef) >> 32) + ($i * 0x76543210))
	& 0xffffffff;
}