diff --git a/contrib/block_time.pl b/contrib/block_time.pl new file mode 100755 index 000000000..784d05b12 --- /dev/null +++ b/contrib/block_time.pl @@ -0,0 +1,23 @@ +#!/usr/bin/perl +# Copyright 2019 The Hush developers +# Released under the GPLv3 +use warnings; +use strict; + +# Given a block time, estimate when it will happen +my $block = shift || die "Usage: $0 123"; +my $hush = "./src/hush-cli"; +my $blockcount = qx{$hush getblockcount}; + +if ($block <= $blockcount) { + die "That block has already happened!"; +} else { + my $diff = $block - $blockcount; + my $minutes = $diff*2.5; + my $seconds = $minutes*60; + my $now = time; + my $then = $now + $seconds; + my $date = localtime($then); + print "Hush Block $block will happen at roughly:\n"; + print "$date # $then\n"; +}