| line |
true |
false |
branch |
|
85
|
0 |
4 |
unless $endpoint
|
|
88
|
0 |
4 |
$endpoint =~ /\?/ ? :
|
|
103
|
5 |
0 |
unless ($endpoint)
|
|
114
|
1 |
11 |
unless ($uri =~ m[^https?://])
|
|
121
|
0 |
12 |
unless 'OpenID::Login::URI'->is_uri($uri)
|
|
124
|
12 |
0 |
if $u->port == 80 or $u->port == 443
|
|
132
|
0 |
4 |
unless $self->return_to
|
|
135
|
0 |
4 |
if (my $realm = $self->realm)
|
|
140
|
3 |
1 |
if ($extensions and %$extensions)
|
|
151
|
0 |
1 |
if $self->_get_param('openid.mode') eq 'cancel'
|
|
155
|
0 |
1 |
unless $return_to
|
|
156
|
0 |
1 |
unless $param_return_to eq $return_to
|
|
160
|
1 |
0 |
if (not $claimed_id) { }
|
|
|
0 |
0 |
elsif ($claimed_id ne $param_claimed_id) { }
|
|
168
|
0 |
1 |
$verify_endpoint =~ /\?/ ? :
|
|
175
|
1 |
9 |
if $param eq 'openid.mode'
|
|
184
|
0 |
1 |
unless $$response_data{'ns'} eq 'http://specs.openid.net/auth/2.0'
|
|
186
|
0 |
1 |
unless $$response_data{'is_valid'} eq 'true'
|
|
207
|
3 |
1 |
if ($extensions)
|
|
211
|
1 |
3 |
unless ($extension)
|
|
213
|
1 |
0 |
if $extension
|
|
232
|
0 |
14 |
if (my $cgi = $self->cgi) { }
|
|
|
14 |
0 |
elsif (my $cgi_params = $self->cgi_params) { }
|
|
233
|
0 |
0 |
if ($param) { }
|
|
239
|
13 |
1 |
if ($param) { }
|