Changeset 888 for LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller

Timestamp:

01/26/12 16:14:06 (12 years ago)

Author:

nanardon

Message:

• allow ssl login, match user using email address, this still allow basic authentication

File:

• LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Root.pm (modified) (2 diffs)

LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Root.pm

@@ -4 +4 @@
 use warnings;
 use base 'Catalyst::Controller';
-use MIME::Base64;
 
 #
@@ -37 +36 @@
     my ( $self, $c ) = @_;
 
+    require Data::Dumper;
     if ($c->user_exists) {
         # Set login user:
-        warn $c->model('Accounts')->db->{_user} = $c->user->{username};
+        $c->model('Accounts')->db->{_user} = $c->user->{username};
     } else {
         # No need to login for About section
-        if ($c->namespace ne 'about') {
-            if ($c->authenticate({}, 'remote')) {
-                # Set login user:
-                $c->model('Accounts')->db->{_user} = $c->user->{username};
-            } elsif (my $authheader = $c->req->headers->header('Authorization')) {
-                # TODO check auth type
-                my ($type, $base64) = $authheader =~ /(\w+) (\S+)/;
-                my ($login, $pass) = decode_base64($base64) =~ /^([^:]+):(.*)/;
-                if (!$c->authenticate({ 
-                            username => $login,
-                            password => $pass }, 'la')) {
-                    $c->forward('auth_required');
-                    return;
-                }
-            } else {
-                $c->forward('auth_required');
-                return;
-            }
+        if (!$c->authenticate({}, 'la')) {
+            $c->forward('auth_required');
+            return;
         }
     }