mirror of
https://codeberg.org/scip/Crypt--PWSafe3.git
synced 2025-12-16 20:21:01 +01:00
nx
This commit is contained in:
@@ -28,7 +28,7 @@ use Data::Dumper;
|
|||||||
use Exporter ();
|
use Exporter ();
|
||||||
use vars qw(@ISA @EXPORT);
|
use vars qw(@ISA @EXPORT);
|
||||||
|
|
||||||
$Crypt::PWSafe3::VERSION = '1.17';
|
$Crypt::PWSafe3::VERSION = '1.18';
|
||||||
|
|
||||||
use Crypt::PWSafe3::Field;
|
use Crypt::PWSafe3::Field;
|
||||||
use Crypt::PWSafe3::HeaderField;
|
use Crypt::PWSafe3::HeaderField;
|
||||||
@@ -298,7 +298,7 @@ sub read {
|
|||||||
$this->hmac( $this->readbytes(32) );
|
$this->hmac( $this->readbytes(32) );
|
||||||
my $calcmac = $this->{hmacer}->digest();
|
my $calcmac = $this->{hmacer}->digest();
|
||||||
if ($calcmac ne $this->hmac) {
|
if ($calcmac ne $this->hmac) {
|
||||||
croak "File integrity check failed";
|
croak "File integrity check failed, invalid HMAC";
|
||||||
}
|
}
|
||||||
|
|
||||||
$this->{fd}->close();
|
$this->{fd}->close();
|
||||||
|
|||||||
Reference in New Issue
Block a user