summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2021-10-10 21:20:38 +0200
committerDaniel Friesel <derf@finalrewind.org>2021-10-10 21:20:38 +0200
commit754aae61fa9335d7d75967e7929ee07d1b69d9f8 (patch)
tree188d7e3bf06ed808e04daadb0ce9bbfd140e87c5
parent0cb54323624ef4bd2e0013764114c0cd317296ef (diff)
Explicitly specify key size for new Crypt::CBC / Eksblowfish versions
-rw-r--r--lib/App/Raps2/Password.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/App/Raps2/Password.pm b/lib/App/Raps2/Password.pm
index 47de634..f98192c 100644
--- a/lib/App/Raps2/Password.pm
+++ b/lib/App/Raps2/Password.pm
@@ -66,7 +66,7 @@ sub encrypt {
my $eksblowfish
= Crypt::Eksblowfish->new( $opt{cost}, $opt{salt}, $self->{passphrase}, );
- my $cbc = Crypt::CBC->new( -cipher => $eksblowfish );
+ my $cbc = Crypt::CBC->new( -cipher => $eksblowfish, -keysize => 56 );
return $cbc->encrypt_hex( $opt{data} );
}
@@ -79,7 +79,7 @@ sub decrypt {
my $eksblowfish
= Crypt::Eksblowfish->new( $opt{cost}, $opt{salt}, $self->{passphrase}, );
- my $cbc = Crypt::CBC->new( -cipher => $eksblowfish );
+ my $cbc = Crypt::CBC->new( -cipher => $eksblowfish, -keysize => 56 );
return $cbc->decrypt_hex( $opt{data} );
}