From 4d03b759513f08e3b14b2839eaa94d174d9f120f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Cl=C3=A9ment=20Oudot?= Date: Fri, 11 Oct 2013 12:21:18 +0000 Subject: [PATCH] Catch Facebook error_code to avoid infinite redirection loop (#619) --- .../lib/Lemonldap/NG/Portal/AuthFacebook.pm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/AuthFacebook.pm b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/AuthFacebook.pm index 965d3b399..5337d7484 100644 --- a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/AuthFacebook.pm +++ b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/AuthFacebook.pm @@ -141,6 +141,13 @@ sub extractFormInfo { return PE_BADCREDENTIALS; } + if ( my $error_code = $self->param('error_code') ) { + my $error_message = $self->param('error_message'); + $self->lmLog( "Facebook error code $error_code: $error_message", + 'error' ); + return PE_ERROR; + } + # 2. Else redirect user to Facebook login page: # Build Facebook redirection