|
|
|
|
@ -519,6 +519,14 @@ sub login_jwt :Chained('/') :PathPart('login_jwt') :Args(0) :Method('POST') {
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if ($pass =~ /[^[:ascii:]]/) {
|
|
|
|
|
$c->response->status(HTTP_UNPROCESSABLE_ENTITY);
|
|
|
|
|
$c->response->body(encode_json({ code => HTTP_UNPROCESSABLE_ENTITY,
|
|
|
|
|
message => "'password' contains invalid characters" })."\n");
|
|
|
|
|
$c->log->error("'password' contains invalid characters");
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
my ($u, $d, $t) = split(/\@/, $user, 3);
|
|
|
|
|
if(defined $t) {
|
|
|
|
|
# in case username is an email address
|
|
|
|
|
@ -642,6 +650,14 @@ sub admin_login_jwt :Chained('/') :PathPart('admin_login_jwt') :Args(0) :Method(
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if ($pass =~ /[^[:ascii:]]/) {
|
|
|
|
|
$c->response->status(HTTP_UNPROCESSABLE_ENTITY);
|
|
|
|
|
$c->response->body(encode_json({ code => HTTP_UNPROCESSABLE_ENTITY,
|
|
|
|
|
message => "'password' contains invalid characters" })."\n");
|
|
|
|
|
$c->log->error("'password' contains invalid characters");
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
my $authrs = $c->model('DB')->resultset('admins')->search({
|
|
|
|
|
login => $user,
|
|
|
|
|
is_active => 1,
|
|
|
|
|
|