Truncate 2F device name (#1386)
This commit is contained in:
parent
e2effb46a1
commit
5bd5920b0f
|
@ -67,8 +67,11 @@ sub run {
|
||||||
my $TOTPName = $req->param('TOTPName');
|
my $TOTPName = $req->param('TOTPName');
|
||||||
my $epoch = time();
|
my $epoch = time();
|
||||||
|
|
||||||
# Set default name if empty
|
# Set default name if empty and troncate name if too long
|
||||||
$TOTPName ||= $epoch;
|
$TOTPName ||= $epoch;
|
||||||
|
$TOTPName =
|
||||||
|
substr( $TOTPName, 0, $self->conf->{max2FDevicesNameLength} );
|
||||||
|
$self->logger->debug("TOTP name : $TOTPName");
|
||||||
|
|
||||||
unless ($code) {
|
unless ($code) {
|
||||||
$self->logger->userInfo('TOTP registration: empty validation form');
|
$self->logger->userInfo('TOTP registration: empty validation form');
|
||||||
|
|
|
@ -104,8 +104,10 @@ sub run {
|
||||||
my $keyName = $req->param('keyName');
|
my $keyName = $req->param('keyName');
|
||||||
my $epoch = time();
|
my $epoch = time();
|
||||||
|
|
||||||
# Set default name if empty
|
# Set default name if empty and troncate name if too long
|
||||||
$keyName ||= $epoch;
|
$keyName ||= $epoch;
|
||||||
|
$keyName =
|
||||||
|
substr( $keyName, 0, $self->conf->{max2FDevicesNameLength} );
|
||||||
$self->logger->debug("Key name : $keyName");
|
$self->logger->debug("Key name : $keyName");
|
||||||
|
|
||||||
push @{$_2FDevices},
|
push @{$_2FDevices},
|
||||||
|
|
|
@ -23,7 +23,8 @@ has logo => ( is => 'rw', default => 'yubikey.png' );
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
my ($self) = @_;
|
my ($self) = @_;
|
||||||
$self->conf->{yubikey2fPublicIDSize} ||= 12;
|
|
||||||
|
#$self->conf->{yubikey2fPublicIDSize} ||= 12;
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -37,8 +38,11 @@ sub run {
|
||||||
my $UBKName = $req->param('UBKName');
|
my $UBKName = $req->param('UBKName');
|
||||||
my $epoch = time();
|
my $epoch = time();
|
||||||
|
|
||||||
# Set default name if empty
|
# Set default name if empty and troncate name if too long
|
||||||
$UBKName ||= $epoch;
|
$UBKName ||= $epoch;
|
||||||
|
$UBKName = substr( $UBKName, 0, $self->conf->{max2FDevicesNameLength} );
|
||||||
|
$self->logger->debug("Yubikey name : $UBKName");
|
||||||
|
|
||||||
if ( $otp
|
if ( $otp
|
||||||
and length($otp) > $self->conf->{yubikey2fPublicIDSize} )
|
and length($otp) > $self->conf->{yubikey2fPublicIDSize} )
|
||||||
{
|
{
|
||||||
|
|
Loading…
Reference in New Issue
Block a user