| line |
true |
false |
branch |
|
48
|
0 |
0 |
unless ref $ra eq 'ARRAY' |
|
51
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($c, 1, 255) |
|
60
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'service_provider') |
|
61
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'otp') |
|
62
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'credentials') |
|
63
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$rp{'service_provider'}, 3, 10) |
|
64
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$rp{'otp'}, 5, 20) |
|
78
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'service_provider') |
|
79
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'credential') |
|
80
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'crDate') |
|
81
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'exDate') |
|
82
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$rp{'service_provider'}, 3, 10) |
|
83
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$rp{'credential'}, 1, 255) |
|
84
|
0 |
0 |
unless Net::DRI::Util::check_isa($$rp{'crDate'}, 'DateTime') |
|
85
|
0 |
0 |
unless Net::DRI::Util::check_isa($$rp{'exDate'}, 'DateTime') |
|
112
|
0 |
0 |
unless $mes->is_success |
|
115
|
0 |
0 |
unless defined $data |
|
121
|
0 |
0 |
if ($name eq 'token') { } |
|
|
0 |
0 |
elsif ($name eq 'signature') { } |
|
126
|
0 |
0 |
if ($subname =~ /^(serviceProvider|credentialId)$/) { } |
|
|
0 |
0 |
elsif ($subname =~ /^(crDate|exDate)$/) { } |
|
148
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'token_provider') |
|
149
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'token') xor Net::DRI::Util::has_key($rp, 'generic_token') |
|
150
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'signature') |
|
151
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$rp{'token_provider'}, 3, 10) |
|
155
|
0 |
0 |
if (Net::DRI::Util::has_key($rp, 'generic_token')) |
|
157
|
0 |
0 |
unless Net::DRI::Util::is_string($$rp{'generic_token'}) |
|
160
|
0 |
0 |
if (Net::DRI::Util::has_key($rp, 'token')) |
|
165
|
0 |
0 |
unless Net::DRI::Util::verify_base64($$rp{'signature'}) |
|
181
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'auth') and ref $$rp{'auth'} eq 'HASH' and grep {Net::DRI::Util::has_key($$rp{'auth'}, $_);} 'validate', 'bind', 'unbind' |
|
186
|
0 |
0 |
if (Net::DRI::Util::has_key($$rp{'auth'}, 'validate')) |
|
190
|
0 |
0 |
if (Net::DRI::Util::has_key($$rp{'auth'}{'validate'}, 'token_provider')) { } |
|
|
0 |
0 |
elsif (Net::DRI::Util::has_key($$rp{'auth'}{'validate'}, 'service_provider')) { } |
|
203
|
0 |
0 |
if (Net::DRI::Util::has_key($$rp{'auth'}, 'bind')) |
|
205
|
0 |
0 |
ref $$rp{'auth'}{'bind'} eq 'ARRAY' ? : |
|
206
|
0 |
0 |
if grep {ref $_ ne 'HASH';} @data |
|
209
|
0 |
0 |
if $istoken and $isotp |
|
212
|
0 |
0 |
if ($istoken) { } |
|
|
0 |
0 |
elsif ($isotp) { } |
|
225
|
0 |
0 |
if (Net::DRI::Util::has_key($$rp{'auth'}, 'unbind')) |