scip/Crypt--PWSafe3
1
0
Fork 0
mirror of https://codeberg.org/scip/Crypt--PWSafe3.git synced 2025-12-16 20:21:01 +01:00
Code Issues Packages Projects Releases Wiki Activity

re-licensed to artistic2

Browse Source
This commit is contained in:
git@daemon.de
2015-02-12 15:18:18 +01:00
parent 2bd22cfca6
commit 6597804217
10 changed files with 78 additions and 58 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
CHANGELOG
View File

@@ -1,3 +1,7 @@
1.16
re-licensed from artistic1 to artistic2 in order to be
compatible to fedora packaging. no code changes otherwise
1.15 1.15
fixed github#8, using File::Temp instead of self baked fixed github#8, using File::Temp instead of self baked
File::Spec. File::Spec.

9
Makefile.PL
View File

@@ -1,7 +1,8 @@
# #
# Copyright (c) 2011-2015 T.Linden <tlinden |AT| cpan.org>. # Copyright (c) 2011-2015 T.v.Dein <tlinden |AT| cpan.org>.
# All Rights Reserved. Std. disclaimer applies. #
# Artistic License, same as perl itself. Have fun. # Licensed under the terms of the Artistic License 2.0
# see: http://www.perlfoundation.org/artistic_license_2_0
# #
require 5.004; require 5.004;
@@ -32,7 +33,7 @@ WriteMakefile(
'Shell' => 0.5, 'Shell' => 0.5,
'File::Temp' => 0, 'File::Temp' => 0,
}, },
'AUTHOR' => 'Thomas Linden <tlinden@cpan.org>', 'AUTHOR' => 'T.v.Dein <tlinden@cpan.org>',
'clean' => { 'clean' => {
FILES => 't/*.out *~ */*~ */*/*~ */*/*/*~' FILES => 't/*.out *~ */*~ */*/*~ */*/*/*~'
}, },

13
README
View File

@@ -32,10 +32,13 @@ INSTALLATION
COPYRIGHT COPYRIGHT
Crypt::PWSafe3 Crypt::PWSafe3
Copyright (c) 2011-2012 by T. Linden <tlinden@cpan.org> Copyright (c) 2011-2015 by T.v.Dein <tlinden@cpan.org>
This library is free software; you can redistribute it LICENSE
and/or modify it under the same terms as Perl itself.
This program is free software; you can redistribute it
and/or modify it under the same terms of the Artistic
License 2.0, see: L<http://www.perlfoundation.org/artistic_license_2_0>
HOMEPAGE HOMEPAGE
@@ -45,9 +48,9 @@ HOMEPAGE
AUTHOR AUTHOR
T. Linden <tlinden |AT| cpan.org> T.v.Dein <tlinden |AT| cpan.org>
VERSION VERSION
1.15 1.16

19
lib/Crypt/PWSafe3.pm
View File

@@ -1,7 +1,8 @@
# #
# Copyright (c) 2011-2015 T.Linden <tlinden |AT| cpan.org>. # Copyright (c) 2011-2015 T.v.Dein <tlinden |AT| cpan.org>.
# All Rights Reserved. Std. disclaimer applies. #
# Artistic License, same as perl itself. Have fun. # Licensed under the terms of the Artistic License 2.0
# see: http://www.perlfoundation.org/artistic_license_2_0
# #
# Implements: # Implements:
# http://passwordsafe.svn.sourceforge.net/viewvc/passwordsafe/trunk/pwsafe/pwsafe/docs/formatV3.txt?revision=2139 # http://passwordsafe.svn.sourceforge.net/viewvc/passwordsafe/trunk/pwsafe/pwsafe/docs/formatV3.txt?revision=2139
@@ -28,7 +29,7 @@ use Data::Dumper;
use Exporter (); use Exporter ();
use vars qw(@ISA @EXPORT); use vars qw(@ISA @EXPORT);
$Crypt::PWSafe3::VERSION = '1.15'; $Crypt::PWSafe3::VERSION = '1.16';
use Crypt::PWSafe3::Field; use Crypt::PWSafe3::Field;
use Crypt::PWSafe3::HeaderField; use Crypt::PWSafe3::HeaderField;
@@ -929,7 +930,7 @@ how to create new ones
=head1 AUTHOR =head1 AUTHOR
T. Linden <tlinden@cpan.org> T.v.Dein <tlinden@cpan.org>
=head1 BUGS =head1 BUGS
@@ -959,17 +960,17 @@ in this module are his ideas ported to perl.
=head1 COPYRIGHT =head1 COPYRIGHT
Copyright (c) 2011-2015 by T.Linden <tlinden@cpan.org>. Copyright (c) 2011-2015 by T.v.Dein <tlinden@cpan.org>.
All rights reserved.
=head1 LICENSE =head1 LICENSE
This program is free software; you can redistribute it This program is free software; you can redistribute it
and/or modify it under the same terms as Perl itself. and/or modify it under the same terms of the Artistic
License 2.0, see: L<http://www.perlfoundation.org/artistic_license_2_0>
=head1 VERSION =head1 VERSION
Crypt::PWSafe3 Version 1.15. Crypt::PWSafe3 Version 1.16.
=cut =cut

17
lib/Crypt/PWSafe3/Field.pm
View File

@@ -1,7 +1,8 @@
# #
# Copyright (c) 2011-2015 T.Linden <tlinden |AT| cpan.org>. # Copyright (c) 2011-2015 T.v.Dein <tlinden |AT| cpan.org>.
# All Rights Reserved. Std. disclaimer applies. #
# Artistic License, same as perl itself. Have fun. # Licensed under the terms of the Artistic License 2.0
# see: http://www.perlfoundation.org/artistic_license_2_0
# #
package Crypt::PWSafe3::Field; package Crypt::PWSafe3::Field;
@@ -12,7 +13,7 @@ use Exporter ();
use vars qw(@ISA @EXPORT); use vars qw(@ISA @EXPORT);
use utf8; use utf8;
$Crypt::PWSafe3::Field::VERSION = '1.04'; $Crypt::PWSafe3::Field::VERSION = '1.05';
%Crypt::PWSafe3::Field::map2type = ( %Crypt::PWSafe3::Field::map2type = (
uuid => 0x01, uuid => 0x01,
@@ -171,18 +172,18 @@ L<Crypt::PWSafe3::Record>
=head1 AUTHOR =head1 AUTHOR
T. Linden <tlinden@cpan.org> T.v.Dein <tlinden@cpan.org>
=head1 COPYRIGHT =head1 COPYRIGHT
Copyright (c) 2011-2015 by T.Linden <tlinden@cpan.org>. Copyright (c) 2011-2015 by T.v.Dein <tlinden@cpan.org>.
All rights reserved. All rights reserved.
=head1 LICENSE =head1 LICENSE
This program is free software; you can redistribute it This program is free software; you can redistribute it
and/or modify it under the same terms as Perl itself. and/or modify it under the same terms of the Artistic
License 2.0, see: L<http://www.perlfoundation.org/artistic_license_2_0>
=cut =cut

18
lib/Crypt/PWSafe3/HeaderField.pm
View File

@@ -1,7 +1,9 @@
# #
# Copyright (c) 2011-2015 T.Linden <tlinden |AT| cpan.org>. # Copyright (c) 2011-2015 T.v.Dein <tlinden |AT| cpan.org>.
# All Rights Reserved. Std. disclaimer applies. #
# Artistic License, same as perl itself. Have fun. # Licensed under the terms of the Artistic License 2.0
# see: http://www.perlfoundation.org/artistic_license_2_0
#
# #
package Crypt::PWSafe3::HeaderField; package Crypt::PWSafe3::HeaderField;
@@ -11,7 +13,7 @@ use Exporter ();
use vars qw(@ISA @EXPORT); use vars qw(@ISA @EXPORT);
use utf8; use utf8;
$Crypt::PWSafe3::HeaderField::VERSION = '1.03'; $Crypt::PWSafe3::HeaderField::VERSION = '1.04';
%Crypt::PWSafe3::HeaderField::map2name = ( %Crypt::PWSafe3::HeaderField::map2name = (
0x00 => "version", 0x00 => "version",
@@ -196,18 +198,18 @@ L<Crypt::PWSafe3>
=head1 AUTHOR =head1 AUTHOR
T. Linden <tlinden@cpan.org> T.v.Dein <tlinden@cpan.org>
=head1 COPYRIGHT =head1 COPYRIGHT
Copyright (c) 2011-2015 by T.Linden <tlinden@cpan.org>. Copyright (c) 2011-2015 by T.v.Dein <tlinden@cpan.org>.
All rights reserved. All rights reserved.
=head1 LICENSE =head1 LICENSE
This program is free software; you can redistribute it This program is free software; you can redistribute it
and/or modify it under the same terms as Perl itself. and/or modify it under the same terms of the Artistic
License 2.0, see: L<http://www.perlfoundation.org/artistic_license_2_0>
=cut =cut

16
lib/Crypt/PWSafe3/PasswordPolicy.pm
View File

@@ -1,7 +1,8 @@
# #
# Copyright (c) 2011-2015 T.Linden <tlinden |AT| cpan.org>. # Copyright (c) 2011-2015 T.v.Dein <tlinden |AT| cpan.org>.
# All Rights Reserved. Std. disclaimer applies. #
# Artistic License, same as perl itself. Have fun. # Licensed under the terms of the Artistic License 2.0
# see: http://www.perlfoundation.org/artistic_license_2_0
# #
package Crypt::PWSafe3::PasswordPolicy; package Crypt::PWSafe3::PasswordPolicy;
@@ -12,7 +13,7 @@ use Exporter ();
use vars qw(@ISA @EXPORT); use vars qw(@ISA @EXPORT);
use utf8; use utf8;
$Crypt::PWSafe3::PasswordPolicy::VERSION = '1.00'; $Crypt::PWSafe3::PasswordPolicy::VERSION = '1.01';
my %flagbits = ( my %flagbits = (
UseLowercase => 0x8000, UseLowercase => 0x8000,
@@ -191,17 +192,18 @@ L<Crypt::PWSafe3::Record>
=head1 AUTHOR =head1 AUTHOR
T. Linden <tlinden@cpan.org> T.v.Dein <tlinden@cpan.org>
=head1 COPYRIGHT =head1 COPYRIGHT
Copyright (c) 2011-2015 by T.Linden <tlinden@cpan.org>. Copyright (c) 2011-2015 by T.v.Dein <tlinden@cpan.org>.
All rights reserved. All rights reserved.
=head1 LICENSE =head1 LICENSE
This program is free software; you can redistribute it This program is free software; you can redistribute it
and/or modify it under the same terms as Perl itself. and/or modify it under the same terms of the Artistic
License 2.0, see: L<http://www.perlfoundation.org/artistic_license_2_0>
=cut =cut

16
lib/Crypt/PWSafe3/Record.pm
View File

@@ -1,7 +1,8 @@
# #
# Copyright (c) 2011-2015 T.Linden <tlinden |AT| cpan.org>. # Copyright (c) 2011-2015 T.v.Dein <tlinden |AT| cpan.org>.
# All Rights Reserved. Std. disclaimer applies. #
# Artistic License, same as perl itself. Have fun. # Licensed under the terms of the Artistic License 2.0
# see: http://www.perlfoundation.org/artistic_license_2_0
# #
package Crypt::PWSafe3::Record; package Crypt::PWSafe3::Record;
@@ -14,7 +15,7 @@ my %map2type = %Crypt::PWSafe3::Field::map2type;
my %map2name = %Crypt::PWSafe3::Field::map2name; my %map2name = %Crypt::PWSafe3::Field::map2name;
$Crypt::PWSafe3::Record::VERSION = '1.07'; $Crypt::PWSafe3::Record::VERSION = '1.08';
foreach my $field (keys %map2type ) { foreach my $field (keys %map2type ) {
eval qq( eval qq(
@@ -326,17 +327,18 @@ L<Crypt::PWSafe3>
=head1 AUTHOR =head1 AUTHOR
T. Linden <tlinden@cpan.org> T.v.Dein <tlinden@cpan.org>
=head1 COPYRIGHT =head1 COPYRIGHT
Copyright (c) 2011-2015 by T.Linden <tlinden@cpan.org>. Copyright (c) 2011-2015 by T.v.Dein <tlinden@cpan.org>.
All rights reserved. All rights reserved.
=head1 LICENSE =head1 LICENSE
This program is free software; you can redistribute it This program is free software; you can redistribute it
and/or modify it under the same terms as Perl itself. and/or modify it under the same terms of the Artistic
License 2.0, see: L<http://www.perlfoundation.org/artistic_license_2_0>
=cut =cut

17
lib/Crypt/PWSafe3/SHA256.pm
View File

@@ -1,13 +1,14 @@
# #
# Copyright (c) 2011-2015 T.Linden <tlinden |AT| cpan.org>. # Copyright (c) 2011-2015 T.v.Dein <tlinden |AT| cpan.org>.
# All Rights Reserved. Std. disclaimer applies. #
# Artistic License, same as perl itself. Have fun. # Licensed under the terms of the Artistic License 2.0
# see: http://www.perlfoundation.org/artistic_license_2_0
# #
# helper class to provide SHA-256 to HMAC class # helper class to provide SHA-256 to HMAC class
package Crypt::PWSafe3::SHA256; package Crypt::PWSafe3::SHA256;
$Crypt::PWSafe3::SHA256::VERSION = '1.01'; $Crypt::PWSafe3::SHA256::VERSION = '1.02';
use Digest::SHA; use Digest::SHA;
@@ -38,7 +39,7 @@ instead.
=head1 AUTHOR =head1 AUTHOR
T. Linden <tlinden@cpan.org> T.v.Dein <tlinden@cpan.org>
=head1 SEE ALSO =head1 SEE ALSO
@@ -48,13 +49,13 @@ L<Digest::HMAC>
=head1 COPYRIGHT =head1 COPYRIGHT
Copyright (c) 2011-2015 by T.Linden <tlinden@cpan.org>. Copyright (c) 2011-2015 by T.v.Dein <tlinden@cpan.org>.
All rights reserved.
=head1 LICENSE =head1 LICENSE
This program is free software; you can redistribute it This program is free software; you can redistribute it
and/or modify it under the same terms as Perl itself. and/or modify it under the same terms of the Artistic
License 2.0, see: L<http://www.perlfoundation.org/artistic_license_2_0>
=cut =cut

7
t/run.t
View File

@@ -1,12 +1,15 @@
#!perl -T #!perl -T
# #
# testscript for Crypt::PWSafe3 Classes by Thomas Linden # testscript for Crypt::PWSafe3 Classes by T.v.Dein
# #
# needs to be invoked using the command "make test" from # needs to be invoked using the command "make test" from
# the Crypt::PWSafe3 source directory. # the Crypt::PWSafe3 source directory.
# #
# Under normal circumstances every test should succeed. # Under normal circumstances every test should succeed.
#
# Licensed under the terms of the Artistic License 2.0
# see: http://www.perlfoundation.org/artistic_license_2_0
#
use Data::Dumper; use Data::Dumper;
#use Test::More tests => 57; #use Test::More tests => 57;