fix to crack real hashes

This commit is contained in:
Gabriele Gristina
2021-07-26 22:45:02 +02:00
parent 7683ca19a3
commit d62fa617fb
3 changed files with 24 additions and 17 deletions

View File

@@ -11,14 +11,14 @@ use warnings;
use Digest::SHA qw (sha224 sha224_hex);
use Digest::HMAC qw (hmac hmac_hex);
sub module_constraints { [[1, 256], [32, 3000], [-1, -1], [-1, -1], [-1, -1]] }
sub module_constraints { [[8, 256], [32, 3000], [-1, -1], [-1, -1], [-1, -1]] }
sub module_generate_hash
{
my $word = shift;
my $salt = shift;
my $pkt_num = shift // int(rand(99999999));
my $engineID = shift // random_hex_string(6);
my $pkt_num = shift // int(rand(100000000));
my $engineID = shift // random_hex_string(26, 34);
# make even if needed