Condition Coverage

blib/lib/Dancer2/Plugin/OAuth2/Server/Simple.pm
Criterion Covered Total %
condition 21 50 42.0


and 3 conditions

line !l l&&!r l&&r condition
107 7 1 0 $is_refresh_token and exists $REFRESH_TOKENS{$access_token}
114 0 0 0 exists $REFRESH_TOKENS{$access_token}{'scope'}{$scope} and $REFRESH_TOKENS{$access_token}{'scope'}{$scope}
135 2 5 0 exists $ACCESS_TOKENS{$access_token}{'scope'}{$scope} and $ACCESS_TOKENS{$access_token}{'scope'}{$scope}
165 0 0 5 exists $AUTH_CODES{$auth_code} && exists $self->_get_clients($dsl, $settings)->{$client_id}
0 4 0 $uri and $AUTH_CODES{$auth_code}{'redirect_uri'} ne $uri
183 0 0 1 $client_secret && $self->_get_clients($dsl, $settings)->{$client_id}
187 0 1 0 $uri and $AUTH_CODES{$auth_code}{'redirect_uri'} ne $uri
216 4 0 1 not defined $auth_code and $old_refresh_token

or 2 conditions

line l !l condition
14 33 0 $settings->{'clients'} // {}
34 6 0 $scopes // []
113 1 0 $scopes_ref // []
134 7 0 $scopes_ref // []

or 3 conditions

line l !l&&r !l&&!r condition
165 0 0 5 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'}
0 0 5 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'}
1 0 4 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
0 0 4 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
183 0 0 1 not $client_secret && $self->_get_clients($dsl, $settings)->{$client_id} or $client_secret ne $self->_get_clients($dsl, $settings)->{$client_id}{'client_secret'}
227 0 1 0 $scope //= $REFRESH_TOKENS{$old_refresh_token}{'scope'}