Remove AgeRange table and first pass of fixing tests

lib/Pear/LocalLoop/Controller/Api/Register.pm

@@ -33,10 +33,11 @@ has error_messages => sub {
       required => { message => 'No usertype sent.', status => 400 },
       in => { message => '"usertype" is invalid.', status => 400 },
     },
-    age_range => {
-      required => { message => 'No age_range sent.', status => 400 },
-      number => { message => 'age_range is invalid', status => 400 },
-      in_resultset => { message => 'age_range is invalid.', status => 400 },
+    year_of_birth => {
+      required => { message => 'No year_of_birth sent.', status => 400 },
+      number => { message => 'year_of_birth is invalid', status => 400 },
+      gt_num => { message => 'year_of_birth must be within last 150 years', status => 400 },
+      lt_num => { message => 'year_of_birth must be atleast 10 years ago', status => 400 },
     },
     street_name => {
       required => { message => 'No street_name sent.', status => 400 },
@@ -68,8 +69,8 @@ sub post_register{
   if ( $usertype eq 'customer' ) {
     $validation->required('display_name');
     $validation->required('full_name');
-    my $age_rs = $c->schema->resultset('AgeRange');
-    $validation->required('age_range')->number->in_resultset('id', $age_rs);
+    my $year = DateTime->now->year;
+    $validation->required('year_of_birth')->number->gt_num($year - 150)->lt_num($year - 10);
   } elsif ( $usertype eq 'organisation' ) {
     $validation->required('name');
     $validation->required('street_name');
@@ -85,13 +86,15 @@ sub post_register{
         name => $validation->param('token'),
         used => 0,
       })->update({ used => 1 });
+      # Create customer as a seperate step, so we dont leak data
+      my $customer = $c->schema->resultset('Customer')->create({
+        full_name     => $validation->param('full_name'),
+        display_name  => $validation->param('display_name'),
+        year_of_birth => $validation->param('year_of_birth'),
+        postcode      => $validation->param('postcode'),
+      });
       $c->schema->resultset('User')->create({
-        customer => {
-          full_name    => $validation->param('full_name'),
-          display_name => $validation->param('display_name'),
-          age_range_id => $validation->param('age_range'),
-          postcode     => $validation->param('postcode'),
-        },
+        customer => $customer,
         email    => $validation->param('email'),
         password => $validation->param('password'),
       });
@@ -106,15 +109,16 @@ sub post_register{
         name => $validation->param('token'),
         used => 0,
       })->update({ used => 1 });
+      my $organisation = $c->schema->resultset('Organisation')->create({
+        name        => $validation->param('name'),
+        street_name => $validation->param('street_name'),
+        town        => $validation->param('town'),
+        postcode    => $validation->param('postcode'),
+      });
       $c->schema->resultset('User')->create({
-        organisation => {
-          name        => $validation->param('name'),
-          street_name => $validation->param('street_name'),
-          town        => $validation->param('town'),
-          postcode    => $validation->param('postcode'),
-        },
-        email    => $validation->param('email'),
-        password => $validation->param('password'),
+        organisation => $organisation,
+        email        => $validation->param('email'),
+        password     => $validation->param('password'),
       });
     });
   }

lib/Pear/LocalLoop/Plugin/Validators.pm

@@ -48,6 +48,11 @@ sub register {
     return $value > $check ? undef : 1;
   });
 
+  $app->validator->add_check( lt_num => sub {
+    my ( $validation, $name, $value, $check ) = @_;
+    return $value < $check ? undef : 1;
+  });
+
   $app->validator->add_check( filetype => sub {
     my ( $validation, $name, $value, $filetype ) = @_;
     my ( undef, undef, $extension ) = fileparse $value->filename, qr/\.[^.]*/;

lib/Pear/LocalLoop/Schema/Result/AgeRange.pm

@@ -1,37 +0,0 @@
-package Pear::LocalLoop::Schema::Result::AgeRange;
-
-use strict;
-use warnings;
-
-use base 'DBIx::Class::Core';
-
-__PACKAGE__->table("age_ranges");
-
-__PACKAGE__->add_columns(
-  "id",
-  { data_type => "integer", is_auto_increment => 1, is_nullable => 0 },
-  "string",
-  { data_type => "text", is_nullable => 0 },
-);
-
-__PACKAGE__->set_primary_key("id");
-
-__PACKAGE__->add_unique_constraint(["string"]);
-
-__PACKAGE__->has_many(
-  "customers",
-  "Pear::LocalLoop::Schema::Result::Customer",
-  { "foreign.age_range_id" => "self.id" },
-  { cascade_copy => 0, cascade_delete => 0 },
-);
-
-sub TO_JSON {
-  my $self = shift;
-
-  return {
-    id => $self->id,
-    string => $self->string,
-  };
-}
-
-1;

lib/Pear/LocalLoop/Schema/Result/Customer.pm

@@ -23,9 +23,8 @@ __PACKAGE__->add_columns(
     size => 255,
     is_nullable => 0,
   },
-  "age_range_id" => {
+  "year_of_birth" => {
     data_type => "integer",
-    is_foreign_key => 1,
     is_nullable => 0,
   },
   "postcode" => {
@@ -37,13 +36,6 @@ __PACKAGE__->add_columns(
 
 __PACKAGE__->set_primary_key("id");
 
-__PACKAGE__->belongs_to(
-  "age_range",
-  "Pear::LocalLoop::Schema::Result::AgeRange",
-  { id => "age_range_id" },
-  { is_deferrable => 0, on_delete => "NO ACTION", on_update => "NO ACTION" },
-);
-
 __PACKAGE__->might_have(
   "user",
   "Pear::LocalLoop::Schema::Result::User",