Move CharmBoard::Model::Crypt into CharmBoard::Util namespace
This commit is contained in:
parent
9c16cd0da5
commit
35e7648226
|
@ -7,8 +7,8 @@ use experimental qw(try);
|
||||||
use feature ':5.20';
|
use feature ':5.20';
|
||||||
|
|
||||||
use Mojo::Base 'Mojolicious::Controller', -signatures;
|
use Mojo::Base 'Mojolicious::Controller', -signatures;
|
||||||
use CharmBoard::Model::Crypt::Password;
|
use CharmBoard::Util::Crypt::Password;
|
||||||
use CharmBoard::Model::Crypt::Seasoning;
|
use CharmBoard::Util::Crypt::Seasoning;
|
||||||
|
|
||||||
sub login {
|
sub login {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
|
|
|
@ -7,7 +7,7 @@ use experimental qw(try);
|
||||||
use feature ':5.20';
|
use feature ':5.20';
|
||||||
|
|
||||||
use Mojo::Base 'Mojolicious::Controller', -signatures;
|
use Mojo::Base 'Mojolicious::Controller', -signatures;
|
||||||
use CharmBoard::Model::Crypt::Password;
|
use CharmBoard::Util::Crypt::Password;
|
||||||
|
|
||||||
# initial registration page
|
# initial registration page
|
||||||
sub register {
|
sub register {
|
||||||
|
|
|
@ -1,4 +1,4 @@
|
||||||
package CharmBoard::Model::Crypt::Password;
|
package CharmBoard::Util::Crypt::Password;
|
||||||
|
|
||||||
use utf8;
|
use utf8;
|
||||||
use strict;
|
use strict;
|
||||||
|
@ -7,7 +7,7 @@ use experimental qw(try);
|
||||||
use feature ':5.20';
|
use feature ':5.20';
|
||||||
|
|
||||||
use Authen::Passphrase::Argon2;
|
use Authen::Passphrase::Argon2;
|
||||||
use CharmBoard::Model::Crypt::Seasoning;
|
use CharmBoard::Util::Crypt::Seasoning;
|
||||||
|
|
||||||
use Exporter qw(import);
|
use Exporter qw(import);
|
||||||
our @EXPORT = qw(passgen passchk);
|
our @EXPORT = qw(passgen passchk);
|
||||||
|
@ -43,16 +43,16 @@ sub passchk {
|
||||||
__END__
|
__END__
|
||||||
=pod
|
=pod
|
||||||
=head1 NAME
|
=head1 NAME
|
||||||
CharmBoard::Model::Crypt::Password - password processing module
|
CharmBoard::Util::Crypt::Password - password processing module
|
||||||
=head1 SYNOPSIS
|
=head1 SYNOPSIS
|
||||||
=begin perl
|
=begin perl
|
||||||
use CharmBoard::Model::Crypt::Password;
|
use CharmBoard::Util::Crypt::Password;
|
||||||
|
|
||||||
($salt, $hash) = passgen($plaintextPassword);
|
($salt, $hash) = passgen($plaintextPassword);
|
||||||
$passwordVerification = passchk($salt, $hash, $plaintextPassword)
|
$passwordVerification = passchk($salt, $hash, $plaintextPassword)
|
||||||
=end perl
|
=end perl
|
||||||
=head1 DESCRIPTION
|
=head1 DESCRIPTION
|
||||||
CharmBoard::Model::Crypt::Password processes passwords, either processing
|
CharmBoard::Util::Crypt::Password processes passwords, either processing
|
||||||
new passwords for database storage, or checking passwords entered
|
new passwords for database storage, or checking passwords entered
|
||||||
when logging in to make sure they're correct.
|
when logging in to make sure they're correct.
|
||||||
|
|
|
@ -1,4 +1,4 @@
|
||||||
package CharmBoard::Model::Crypt::Seasoning;
|
package CharmBoard::Util::Crypt::Seasoning;
|
||||||
|
|
||||||
use utf8;
|
use utf8;
|
||||||
use strict;
|
use strict;
|
Loading…
Reference in New Issue