package Dojo; use Mojo::Base 'Mojolicious'; use Dojo::Conf; use Dojo::Model::Vuelo; use Dojo::Model::Users; # This method will run once at server start sub startup { my $self = shift; my $config = $self->plugin('Config'); #Config hash dojo.conf # $self->plugin('PODRenderer') if $config->{perldoc}; #doc $self->secrets(['Mojojojo jojo']); #cookies $self->helper(dbv => sub { state $dbv = Dojo::Model::Vuelo->new }); $self->helper(dbg => sub { state $dbg = Dojo::Model::Users->new }); $self->defaults({%Dojo::Conf::def}); my $r = $self->routes; #router # user ======================================================================== $r->any('/')->to('home#home_'); $r->any('/home')->to('home#home'); $r->any('/cal')->to('home#cal'); $r->any('/event/:id'=> [id => qr/\d+/])->to('home#event'); $r->any('/pod')->to('home#podcast'); $r->any('/store')->to('home#store'); $r->any('/tv')->to('home#tv'); $r->any('/contact')->to('home#contact'); $r->any('/contact2')->to('home#contact2'); $r->any('/pang')->to('home#pang'); $r->any('/storep')->to('home#storep'); $r->any('/storep/:id' => [id => qr/\d+/])->to('home#storep'); # ============================================================================= # candy ======================================================================= $r->any('/json/candy/:command')->to('data#candy'); $r->any('/candy')->to('home#candy'); # ============================================================================= # json ======================================================================== $r->any('/json/*dreq')->to('data#simple'); # ============================================================================= # register user =============================================================== $r->any('/reg')->to('users#reg'); # ============================================================================= # login guest ================================================================= $r->any('/login')->to('users#login'); $r->any('/logout')->to('users#logout'); my $logged_in = $r->under('/')->to('users#is_logged'); $logged_in->get('/radio')->to('home#radio'); # ============================================================================= # login user grulla =========================================================== # common grulla user my $user = $r->under('/')->to('users#is_grulla'); $user->any('/ccast')->to('home#bcast'); # personal my $guest = $r->under('/')->to('users#is_grulla_tmp'); $guest->any('/bcast')->to('home#bcast'); # ============================================================================= # admin ======================================================================= my $admin = $r->under('/admin')->to('users#is_admin'); $admin->any('')->to('home#admin'); $admin->any('home')->to('home#admin_home'); $admin->any('radio')->to('home#admin_radio'); $admin->any('eventos')->to('home#admin_eventos'); $admin->any('eventos/:type'=> [type=>['e','p','c']])->to('home#admin_eventos'); $admin->any('mensajes')->to('home#admin_mensajes'); $admin->any('tienda')->to('home#admin_tienda'); $admin->any('json/:dreq/:id')->to('home#admin_json'); # ============================================================================= $r->any('/*whatever' => {whatever => ''} => sub { my $c = shift; my $whatever = $c->param('whatever'); $c->stash(layout=>'clean'); $c->render(template=>'home/not_found', status=>404); }); } 1;