File Coverage

blib/lib/Apache2/AuthAny/MapToStorageHandler.pm
Criterion Covered Total %
statement 4 6 66.6
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 6 8 75.0


line stmt bran cond sub pod time code
1             package Apache2::AuthAny::MapToStorageHandler;
2              
3 1     1   1327 use strict;
  1         2  
  1         38  
4              
5 1     1   371 use Apache2::Const -compile => qw(DECLINED OK);
  0            
  0            
6             our $VERSION = '0.201';
7              
8             sub handler {
9             my $r = shift;
10              
11             my $uri = $r->uri;
12              
13             # Using PHP OpenId library for google auth.
14             # The PHP library supports Attribute Exchange (AX)
15             if ($uri =~ m{/aa_auth/google/([^/]+)\.php}) {
16             my $script = $1;
17             $r->filename("$ENV{AUTH_ANY_ROOT}/google/$script.php");
18             }
19              
20             if ($uri =~ m{/aa_auth/(?!google)}) {
21             return Apache2::Const::OK;
22             } else {
23             return Apache2::Const::DECLINED;
24             }
25             }
26              
27             1;