Hush Full Node software. We were censored from Github, this is where all development happens now.
https://hush.is
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
20 lines
441 B
20 lines
441 B
5 years ago
|
#!/usr/bin/perl
|
||
|
|
use warnings;
|
||
|
|
use strict;
|
||
|
|
# Generate checkpoint data for use in src/main.cpp
|
||
|
|
|
||
|
|
my $hush = "./src/hush-cli";
|
||
|
|
my $gethash = "$hush getblockhash";
|
||
|
|
my $stride = shift || 1000;
|
||
|
|
my $count = 0;
|
||
|
|
my $blocks = qx{$hush getblockcount};
|
||
|
|
|
||
|
|
while (1) {
|
||
|
|
$count++;
|
||
|
|
my $block = $stride*$count;
|
||
|
|
last if ($block > $blocks);
|
||
|
|
my $blockhash = qx{$gethash $block};
|
||
|
|
chomp $blockhash;
|
||
|
|
print qq{($block, uint256S("0x$blockhash"))\n};
|
||
|
|
}
|