Foodloop-Server/t/api/stats.t

use Mojo::Base -strict;

use Test::More;
use Mojo::JSON;
use Test::Pear::LocalLoop;
use DateTime;

my $framework = Test::Pear::LocalLoop->new;
my $t = $framework->framework;
my $schema = $t->app->schema;
my $dtf = $schema->storage->datetime_parser;

my $user = {
  token        => 'a',
  full_name    => 'Test User',
  display_name => 'Test User',
  email        => 'test@example.com',
  postcode     => 'LA1 1AA',
  password     => 'abc123',
  year_of_birth => 2006,
};

my $org = {
  token       => 'b',
  email       => 'test2@example.com',
  name        => 'Test Org',
  street_name => 'Test Street',
  town        => 'Lancaster',
  postcode    => 'LA1 1AA',
  password    => 'abc123',
  sector      => 'A',
};

$schema->resultset('AccountToken')->create({ name => $user->{token} });
$schema->resultset('AccountToken')->create({ name => $org->{token} });

$framework->register_customer($user);
$framework->register_organisation($org);

my $org_result = $schema->resultset('Organisation')->find({ name => $org->{name} });
my $user_result = $schema->resultset('User')->find({ email => $user->{email} });

my $session_key = $framework->login({
  email    => $user->{email},
  password => $user->{password},
});

$t->app->schema->resultset('Leaderboard')->create_new( 'monthly_total', DateTime->now->truncate(to => 'month' )->subtract( months => 1) );

$t->post_ok('/api/stats' => json => { session_key => $session_key } )
  ->status_is(200)
  ->json_is('/success', Mojo::JSON->true)
  ->json_is('/today_sum', 0)
  ->json_is('/today_count', 0)
  ->json_is('/week_sum', 0)
  ->json_is('/week_count', 0)
  ->json_is('/month_sum', 0)
  ->json_is('/month_count', 0)
  ->json_is('/user_sum', 0)
  ->json_is('/user_count', 0)
  ->json_is('/global_sum', 0)
  ->json_is('/global_count', 0);

for ( 1 .. 10 ) {
  $user_result->create_related( 'transactions', {
    seller_id => $org_result->id,
    value => $_,
    proof_image => 'a',
  });
}

for ( 11 .. 20 ) {
  $user_result->create_related( 'transactions', {
    seller_id => $org_result->id,
    value => $_,
    proof_image => 'a',
    purchase_time => $dtf->format_datetime(DateTime->today()->subtract( days => 5 )),
  });
}

for ( 21 .. 30 ) {
  $user_result->create_related( 'transactions', {
    seller_id => $org_result->id,
    value => $_,
    proof_image => 'a',
    purchase_time => $dtf->format_datetime(DateTime->today()->subtract( days => 25 )),
  });
}

for ( 31 .. 40 ) {
  $user_result->create_related( 'transactions', {
    seller_id => $org_result->id,
    value => $_,
    proof_image => 'a',
    purchase_time => $dtf->format_datetime(DateTime->today()->subtract( days => 50 )),
  });
}

for ( 41 .. 50 ) {
  $org_result->user->create_related( 'transactions', {
    seller_id => $org_result->id,
    value => $_,
    proof_image => 'a',
    purchase_time => $dtf->format_datetime(DateTime->today()->subtract( days => 50 )),
  });
}

is $user_result->transactions->search({
  purchase_time => {
    -between => [
      $dtf->format_datetime(DateTime->today()),
      $dtf->format_datetime(DateTime->today()->add( days => 1 )),
    ],
  },
})->get_column('value')->sum, 55, 'Got correct sum';
is $user_result->transactions->today_rs->get_column('value')->sum, 55, 'Got correct sum through rs';

$t->post_ok('/api/stats' => json => { session_key => $session_key } )
  ->status_is(200)
  ->json_is('/success', Mojo::JSON->true)
  ->json_is('/today_sum', 55)
  ->json_is('/today_count', 10)
  ->json_is('/week_sum', 155)
  ->json_is('/week_count', 10)
  ->json_is('/month_sum', 410)
  ->json_is('/month_count', 20)
  ->json_is('/user_sum', 820)
  ->json_is('/user_count', 40)
  ->json_is('/global_sum', 1275)
  ->json_is('/global_count', 50);

done_testing;