| line |
true |
false |
branch |
|
30
|
2 |
0 |
if (ref $jwkset eq 'HASH') |
|
33
|
0 |
2 |
if (ref $jwkset eq 'ARRAY') |
|
56
|
0 |
16 |
unless my $algo = $self->algorithm(delete $header->{'alg'})->algorithm |
|
61
|
0 |
16 |
if $peek |
|
65
|
1 |
15 |
if ($algo eq 'none') { } |
|
|
7 |
8 |
elsif ($algo =~ /$re_rs/u) { } |
|
|
8 |
0 |
elsif ($algo =~ /$re_hs/u) { } |
|
66
|
0 |
1 |
unless $self->allow_none |
|
69
|
1 |
4 |
unless $self->verify_rsa($1, $payload, $signature) |
|
72
|
1 |
6 |
unless $signature eq $self->sign_hmac($1, $payload) |
|
80
|
0 |
11 |
if (defined(my $exp = $claims->{'exp'})) |
|
81
|
0 |
0 |
if $now > $exp |
|
84
|
0 |
11 |
if (defined(my $nbf = $claims->{'nbf'})) |
|
85
|
0 |
0 |
if $now < $nbf |
|
94
|
12 |
4 |
unless @{$self->jwks;} and $header->{'kid'} |
|
97
|
4 |
0 |
if exists $header->{'kid'} |
|
98
|
1 |
3 |
unless $jwk |
|
100
|
3 |
0 |
if ($algo =~ /^RS/u) { } |
|
|
0 |
0 |
elsif ($algo =~ /^HS/u) { } |
|
118
|
1 |
10 |
if ($self->set_iat) |
|
119
|
0 |
11 |
if (defined(my $exp = $self->expires)) |
|
120
|
0 |
11 |
if (defined(my $nbf = $self->not_before)) |
|
128
|
1 |
10 |
if ($algo eq 'none') { } |
|
|
2 |
8 |
elsif ($algo =~ /$re_rs/u) { } |
|
|
8 |
0 |
elsif ($algo =~ /$re_hs/u) { } |
|
145
|
1 |
15 |
unless my $secret = $self->secret |
|
165
|
2 |
5 |
unless my $public = $self->public |
|
166
|
3 |
2 |
$public->$isa('Crypt::OpenSSL::RSA') ? : |