| line |
true |
false |
branch |
|
276
|
8 |
0 |
unless ($ua) |
|
292
|
0 |
8 |
exists $args{'signature_method'} ? : |
|
298
|
0 |
8 |
unless $signature_method_class->require |
|
309
|
0 |
8 |
unless ('OAuth::Lite::AuthMethod'->validate_method($self->{'auth_method'})) |
|
322
|
0 |
8 |
$args{'use_request_body_hash'} ? : |
|
335
|
1 |
2 |
$self->{'request_token_path'} =~ m[^http(?:s)?\://] ? : |
|
347
|
1 |
2 |
$self->{'access_token_path'} =~ m[^http(?:s)?\://] ? : |
|
358
|
7 |
1 |
$self->{'authorize_path'} =~ m[^http(?:s)?\://] ? : |
|
390
|
0 |
5 |
unless my $url = $args{'url'} |
|
392
|
3 |
2 |
if (defined $args{'token'}) |
|
394
|
2 |
1 |
eval {
do {
$token->isa('OAuth::Lite::Token')
}
} ? : |
|
413
|
0 |
0 |
unless ($res->is_success) |
|
417
|
0 |
0 |
unless $resp and $resp->token and $resp->token->callback_confirmed |
|
460
|
0 |
0 |
unless ($res->is_success) |
|
464
|
0 |
0 |
unless $token and $token->callback_confirmed |
|
474
|
0 |
0 |
unless my $request_token_url = delete $args{'url'} |
|
536
|
0 |
0 |
unless my $access_token_url = $args{'url'} |
|
539
|
0 |
0 |
defined $args{'token'} ? : |
|
548
|
0 |
0 |
unless ($res->is_success) |
|
601
|
0 |
0 |
unless my $access_token_url = $args{'url'} |
|
602
|
0 |
0 |
defined $args{'token'} ? : |
|
603
|
0 |
0 |
unless defined $token |
|
606
|
0 |
0 |
unless my $verifier = $args{'verifier'} |
|
613
|
0 |
0 |
unless ($res->is_success) |
|
651
|
1 |
1 |
if (ref $extra eq 'ARRAY') |
|
663
|
0 |
2 |
if (defined $headers) { } |
|
664
|
0 |
0 |
if (ref $headers eq 'ARRAY') { } |
|
679
|
0 |
2 |
if not $is_send_data_method and $auth_method eq 'post_body' |
|
682
|
0 |
2 |
if ($auth_method eq 'url_query') { } |
|
|
0 |
2 |
elsif ($auth_method eq 'post_body') { } |
|
683
|
0 |
0 |
if ($is_send_data_method and not $content) { } |
|
687
|
0 |
0 |
if ($is_send_data_method) |
|
688
|
0 |
0 |
if (my $hash = $self->build_body_hash($content)) |
|
703
|
1 |
4 |
if $param_key =~ /^x?oauth_/ |
|
706
|
1 |
1 |
if (keys %$copied_params > 0) |
|
708
|
0 |
1 |
if ($is_send_data_method and not $content) { } |
|
714
|
1 |
1 |
if ($is_send_data_method) |
|
715
|
0 |
1 |
if (my $hash = $self->build_body_hash($content)) |
|
723
|
1 |
1 |
if ($is_send_data_method) |
|
724
|
1 |
0 |
unless $headers->header('Content-Type') |
|
937
|
2 |
0 |
unless $self->oauth_response |
|
939
|
0 |
0 |
unless $authenticate and $authenticate =~ /^\s*OAuth/ |
|
1022
|
4 |
6 |
if (defined $token) |
|
1023
|
3 |
1 |
if (eval {
do {
$token->isa('OAuth::Lite::Token')
}
}) { } |
|
1032
|
0 |
10 |
if ($params->{'oauth_signature_method'} eq 'PLAINTEXT' and not lc($url) =~ /^https/) |
|
1091
|
0 |
1 |
if ($self->{'use_request_body_hash'}) |