Added postcode validation and test for validators
This commit is contained in:
parent
0a32b05b6c
commit
704f429fa5
4 changed files with 50 additions and 8 deletions
|
@ -12,16 +12,17 @@ sub index {
|
|||
sub register {
|
||||
my $c = shift;
|
||||
my $validation = $c->validation;
|
||||
$validation->required('token')->in_resultset(
|
||||
'accounttokenname',
|
||||
$c->schema->resultset('AccountToken')->search_rs({used => 0}),
|
||||
);
|
||||
|
||||
$validation->required('name', 'trim');
|
||||
$validation->required('email')->email;
|
||||
$validation->required('agerange')->in_resultset(
|
||||
'agerangeid',
|
||||
$c->schema->resultset('AgeRange'),
|
||||
);
|
||||
$validation->required('password')->equal_to('password2');
|
||||
$validation->required('postcode')->postcode;
|
||||
|
||||
my $token_rs = $c->schema->resultset('AccountToken')->search_rs({used => 0});
|
||||
$validation->required('token')->in_resultset('accounttokenname', $token_rs);
|
||||
|
||||
my $age_rs = $c->schema->resultset('AgeRange');
|
||||
$validation->required('agerange')->in_resultset('agerangeid', $age_rs);
|
||||
|
||||
use Devel::Dwarn;
|
||||
Dwarn $validation;
|
||||
|
|
|
@ -2,6 +2,7 @@ package Pear::LocalLoop::Plugin::Validators;
|
|||
use Mojo::Base 'Mojolicious::Plugin';
|
||||
|
||||
use Email::Valid;
|
||||
use Geo::UK::Postcode;
|
||||
|
||||
sub register {
|
||||
my ( $plugin, $app, $conf ) = @_;
|
||||
|
@ -10,10 +11,16 @@ sub register {
|
|||
my ( $validation, $name, $email ) = @_;
|
||||
return Email::Valid->address( $email ) ? undef : 1;
|
||||
});
|
||||
|
||||
$app->validator->add_check( in_resultset => sub {
|
||||
my ( $validation, $name, $value, $key, $rs ) = @_;
|
||||
return $rs->search({ $key => $value })->count ? undef : 1;
|
||||
});
|
||||
|
||||
$app->validator->add_check( postcode => sub {
|
||||
my ( $validation, $name, $value ) = @_;
|
||||
return Geo::UK::Postcode->new( $value )->valid ? undef : 1;
|
||||
});
|
||||
}
|
||||
|
||||
1;
|
||||
|
|
Reference in a new issue