Projekt

Allgemein

Profil

Herunterladen (794 Bytes) Statistiken
| Zweig: | Markierung: | Revision:
package SL::Dispatcher::AuthHandler::Admin;

use strict;
use parent qw(Rose::Object);

use SL::Layout::Dispatcher;

sub handle {
my ($self, %params) = @_;

%::myconfig = ();

return 1 if $::auth->get_api_token_cookie;
return 1 if $::form->{'{AUTH}admin_password'} && ($::auth->authenticate_root($::form->{'{AUTH}admin_password'}) == $::auth->OK());
return 1 if !$::form->{'{AUTH}admin_password'} && ($::auth->authenticate_root($::auth->get_session_value('admin_password')) == $::auth->OK());
return 1 if $params{action} eq 'login';

$::request->{layout} = SL::Layout::Dispatcher->new(style => 'admin');

$::auth->punish_wrong_login;
$::auth->delete_session_value('admin_password');
SL::Dispatcher::show_error('admin/adminlogin', 'password');

return 0;
}

1;
(1-1/3)