Add leaderboard stats endpoint and trends

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

@@ -1,6 +1,17 @@
 package Pear::LocalLoop::Controller::Api::Stats;
 use Mojo::Base 'Mojolicious::Controller';
 
+use List::Util qw/ first /;
+
+has error_messages => sub {
+  return {
+    type => {
+      required => { message => 'Type of Leaderboard Required', status => 400 },
+      in_resultset => { message => 'Unrecognised Leaderboard Type', status => 400 },
+    },
+  };
+};
+
 sub post_index {
   my $c = shift;
 
@@ -41,4 +52,49 @@ sub post_index {
   });
 }
 
+sub post_leaderboards {
+  my $c = shift;
+
+  my $validation = $c->validation;
+  $validation->input( $c->stash->{api_json} );
+
+  my $leaderboard_rs = $c->schema->resultset('Leaderboard');
+
+  $validation->required('type')->in_resultset( 'type', $leaderboard_rs );
+
+  return $c->api_validation_error if $validation->has_error;
+
+  my $today_board = $leaderboard_rs->get_latest( $validation->param('type') );
+
+  my $today_values = $today_board->values->search(
+    {},
+    {
+      order_by => { -desc => 'me.value' },
+      columns => [
+        qw/
+          me.value
+          me.trend
+          me.user_id
+        /,
+        { display_name => 'customer.display_name' },
+      ],
+      join => { user => 'customer' },
+    },
+  );
+  $today_values->result_class( 'DBIx::Class::ResultClass::HashRefInflator' );
+
+  my @leaderboard_array = $today_values->all;
+
+  my $current_user_index = first { $leaderboard_array[$_]->{user_id} == $c->stash->{api_user}->id } 0..$#leaderboard_array;
+
+  # Dont leak user id's
+  map { delete $_->{user_id} } @leaderboard_array;
+
+  return $c->render( json => {
+    success => Mojo::JSON->true,
+    leaderboard => [ @leaderboard_array ],
+    user_position => $current_user_index,
+  });
+}
+
 1;