Foodloop-Server/lib/Pear/LocalLoop/Controller/Admin.pm

package Pear::LocalLoop::Controller::Admin;
use Mojo::Base 'Mojolicious::Controller';

sub under {
    my $c = shift;

    if ( $c->is_user_authenticated ) {
        return 1 if $c->current_user->is_admin;
    }
    $c->redirect_to('/admin');
    return 0;
}

sub home {
    my $c = shift;

    my $user_rs  = $c->schema->resultset('User');
    my $token_rs = $c->schema->resultset('AccountToken');
    my $pending_orgs_rs =
      $c->schema->resultset('Organisation')->search( { pending => 1 } );
    my $pending_transaction_rs = $pending_orgs_rs->entity->sales;
    my $feedback_rs            = $c->schema->resultset('Feedback');
    my $pending_feedback_rs    = $feedback_rs->search( { actioned => 0 } );
    $c->stash(
        user_count => $user_rs->count,
        tokens     => {
            total  => $token_rs->count,
            unused => $token_rs->search( { used => 0 } )->count,
        },
        pending_orgs  => $pending_orgs_rs->count,
        pending_trans => $pending_transaction_rs->count,
        feedback      => {
            total   => $feedback_rs->count,
            pending => $pending_feedback_rs->count,
        },
    );

    return 1;
}

sub auth_login {
    my $c = shift;

    $c->app->log->debug(
        __PACKAGE__ . " admin login attempt for [" . $c->param('email') . "]" );

    if ( $c->authenticate( $c->param('email'), $c->param('password') ) ) {
        $c->redirect_to('/admin/home');
    }
    else {
        $c->app->log->info( __PACKAGE__
              . " failed admin login for ["
              . $c->param('email')
              . "]" );
        $c->redirect_to('/admin');
    }

    return 1;
}

sub auth_logout {
    my $c = shift;

    $c->logout;
    $c->redirect_to('/admin');

    return 1;
}

1;