| line |
true |
false |
branch |
|
182
|
0 |
6 |
unless my $private_key_file = $args{'privatekey'} |
|
183
|
0 |
6 |
unless -r $private_key_file |
|
186
|
0 |
6 |
unless my $keytype = $args{'keytype'} |
|
187
|
0 |
6 |
unless $keytype eq 'dsa' or $keytype eq 'rsa' |
|
190
|
0 |
6 |
unless my $user_id = $args{'userid'} |
|
192
|
0 |
6 |
unless my $valid_until = $args{'validuntil'} |
|
193
|
0 |
6 |
unless $valid_until =~ /^\d+$/ |
|
197
|
0 |
6 |
unless $grace_period eq '' or $grace_period =~ /^\d+$/ |
|
202
|
0 |
6 |
unless $client_ip eq '' or $client_ip =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ |
|
210
|
6 |
0 |
if $client_ip |
|
212
|
6 |
0 |
if $grace_period |
|
216
|
2 |
4 |
$keytype eq 'dsa' ? : |
|
229
|
0 |
6 |
if ($exitcode != 0) |
|
271
|
0 |
204 |
unless my $public_key_file = $args{'publickey'} |
|
272
|
0 |
204 |
unless -r $public_key_file |
|
275
|
0 |
204 |
unless my $keytype = $args{'keytype'} |
|
276
|
0 |
204 |
unless $keytype eq 'dsa' or $keytype eq 'rsa' |
|
278
|
101 |
103 |
$keytype eq 'dsa' ? : |
|
280
|
0 |
204 |
unless my $ticket_str = $args{'ticket'} |
|
284
|
7 |
197 |
unless $sig_base64 |
|
285
|
7 |
197 |
unless $sig_base64 |
|
289
|
0 |
197 |
unless length $sig_bin > 0 |
|
292
|
0 |
197 |
unless print $fh $sig_bin |
|
293
|
0 |
197 |
unless close $fh |
|
304
|
194 |
3 |
unless $exitcode == 0 |
|
306
|
3 |
0 |
if $stdout eq "Verified OK\n" |
|
320
|
0 |
0 |
unless my $tkt = shift() |