You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
57 lines
1.6 KiB
57 lines
1.6 KiB
package LDV; |
|
|
|
use strict; |
|
use warnings; |
|
use utf8; |
|
|
|
use Mojo::Base 'Mojolicious'; |
|
|
|
sub startup { |
|
my ($self) = @_; |
|
|
|
$self->plugin(I18N => {default => 'ru'}); |
|
my $config = $self->app->home->rel_file('conf/ldv.conf'); |
|
$self->plugin(Config => {file => $config}); |
|
|
|
$self->app->mode('production'); |
|
$self->app->secret($self->app->config->{secret}); |
|
|
|
$self->app->attr(email => sub { |
|
require LDV::Email; |
|
my $email = LDV::Email->new($self->app->config->{email} // {}); |
|
return $email; |
|
}); |
|
|
|
$self->app->attr(ldap => sub { |
|
require LDV::LDAP; |
|
my $ldap = LDV::LDAP->new($self->app->config->{ldap}); |
|
return $ldap; |
|
}); |
|
|
|
my $r = $self->routes; |
|
|
|
# /user |
|
my $user = $r->route('/user') -> to(controller => 'user'); |
|
$user->get('/') ->to(cb => sub { shift->redirect_to('/user/login'); }); |
|
$user->get('/login') ->to(action => 'login'); |
|
$user->get('/register') ->to(action => 'register'); |
|
$user->get('/profile') ->to(action => 'profile'); |
|
|
|
$user->post('/auth') ->to(action => 'auth'); |
|
$user->get ('/logout') ->to(action => 'logout'); |
|
$user->post('/create') ->to(action => 'create'); |
|
$user->post('/update') ->to(action => 'update'); |
|
|
|
# /zerobin |
|
my $zb = $r->route('/zerobin2') -> to(controller => 'zerobin'); |
|
$zb->post('/') -> to(action => 'save'); |
|
$zb->get ('/') -> to(action => 'create'); |
|
$zb->route('/:time', time => qr/\d+/) |
|
->via('GET') -> to(action => 'view'); |
|
$zb->get('/prune') -> to(action => 'prune'); |
|
|
|
my $root = $self->app->config->{zerobin}->{root}; |
|
mkdir $self->app->home->rel_dir($root); |
|
} |
|
|
|
1;
|
|
|