| line |
true |
false |
branch |
|
32
|
9 |
1 |
if (my $client = $self->_get_clients($dsl, $settings)->{$client_id})
|
|
36
|
1 |
9 |
if (not exists $self->_get_clients($dsl, $settings)->{$client_id}{'scopes'}{$scope}) { }
|
|
|
1 |
8 |
elsif (not $self->_get_clients($dsl, $settings)->{$client_id}{'scopes'}{$scope}) { }
|
|
45
|
3 |
4 |
if (exists $self->_get_clients($dsl, $settings)->{$client_id}{'redirect_uri'})
|
|
47
|
1 |
2 |
if (not grep({$_ eq $uri;} @$whitelisted_uris)) { }
|
|
117
|
1 |
7 |
if ($is_refresh_token and exists $REFRESH_TOKENS{$access_token}) { }
|
|
|
7 |
0 |
elsif (exists $ACCESS_TOKENS{$access_token}) { }
|
|
122
|
1 |
0 |
if ($scopes_ref)
|
|
124
|
0 |
0 |
unless (exists $REFRESH_TOKENS{$access_token}{'scope'}{$scope} and $REFRESH_TOKENS{$access_token}{'scope'}{$scope})
|
|
138
|
0 |
7 |
if ($ACCESS_TOKENS{$access_token}{'expires'} <= time) { }
|
|
|
7 |
0 |
elsif ($scopes_ref) { }
|
|
145
|
2 |
5 |
unless (exists $ACCESS_TOKENS{$access_token}{'scope'}{$scope} and $ACCESS_TOKENS{$access_token}{'scope'}{$scope})
|
|
175
|
1 |
4 |
if (not exists $AUTH_CODES{$auth_code} && exists $self->_get_clients($dsl, $settings)->{$client_id} or $client_secret ne $self->_get_clients($dsl, $settings)->{$client_id}{'client_secret'} or $AUTH_CODES{$auth_code}{'access_token'} or $uri and $AUTH_CODES{$auth_code}{'redirect_uri'} ne $uri or $AUTH_CODES{$auth_code}{'expires'} <= time) { }
|
|
185
|
0 |
1 |
unless exists $AUTH_CODES{$auth_code}
|
|
187
|
0 |
1 |
unless exists $self->_get_clients($dsl, $settings)->{$client_id}
|
|
193
|
0 |
1 |
if not $client_secret && $self->_get_clients($dsl, $settings)->{$client_id} or $client_secret ne $self->_get_clients($dsl, $settings)->{$client_id}{'client_secret'}
|
|
195
|
1 |
0 |
if ($AUTH_CODES{$auth_code})
|
|
197
|
0 |
1 |
if $uri and $AUTH_CODES{$auth_code}{'redirect_uri'} ne $uri
|
|
199
|
0 |
1 |
if $AUTH_CODES{$auth_code}{'expires'} <= time
|
|
202
|
1 |
0 |
if (my $access_token = $AUTH_CODES{$auth_code}{'access_token'})
|
|
226
|
1 |
4 |
if (not defined $auth_code and $old_refresh_token)
|
|
243
|
1 |
4 |
if $old_refresh_token
|