Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 540c0b5e

Von Moritz Bunkus vor mehr als 12 Jahren hinzugefügt

User-Login auf Controller umgestellt

Unterschiede anzeigen:

SL/Dispatcher/AuthHandler.pm
5 5
use parent qw(Rose::Object);
6 6

  
7 7
use SL::Dispatcher::AuthHandler::Admin;
8
use SL::Dispatcher::AuthHandler::None;
8 9
use SL::Dispatcher::AuthHandler::User;
9 10

  
11
my %valid_auth_levels = map { ($_ => 1) } qw(user admin none);
12

  
10 13
sub handle {
11 14
  my ($self, %param) = @_;
12 15

  
......
16 19
  $self->{handlers}->{$handler_name} ||= $handler_name->new;
17 20
  $self->{handlers}->{$handler_name}->handle;
18 21

  
19
  return $auth_level;
22
  return (
23
    auth_level     => $auth_level,
24
    keep_auth_vars => $self->get_keep_auth_vars(%param),
25
  );
20 26
}
21 27

  
22 28
sub get_auth_level {
......
26 32
                 : $param{routing_type} eq 'controller' ? "SL::Controller::$param{controller}"->get_auth_level($param{action})
27 33
                 :                                        'user';
28 34

  
29
  return $auth_level eq 'user' ? 'user' : 'admin';
35
  return $valid_auth_levels{$auth_level} ? $auth_level : 'user';
36
}
37

  
38
sub get_keep_auth_vars {
39
  my ($self, %param) = @_;
40

  
41
  return $param{routing_type} eq 'controller' ? "SL::Controller::$param{controller}"->keep_auth_vars_in_form : 0;
30 42
}
31 43

  
32 44
1;

Auch abrufbar als: Unified diff