| line |
true |
false |
branch |
|
328
|
0 |
6 |
unless ref $HR_params eq 'HASH' |
|
331
|
0 |
2 |
unless defined $$HR_params{'CLIENT_ID'} or $$HR_params{'CLIENT_NAME'} or $$HR_params{'CLIENT_DOMAIN'} |
|
379
|
0 |
0 |
unless blessed $self |
|
383
|
0 |
0 |
unless ref $HR_params eq 'HASH' |
|
388
|
0 |
0 |
if $debug |
|
390
|
0 |
0 |
unless ($$HR_params{'USERNAME'}) |
|
395
|
0 |
0 |
unless ($$HR_params{'PASSWORD'}) |
|
405
|
0 |
0 |
if $dbh->err |
|
407
|
0 |
0 |
unless ($$HR_user{'User'}) |
|
413
|
0 |
0 |
if ($$HR_user{'Disabled'} eq 'Yes') |
|
421
|
0 |
0 |
if $debug > 1 |
|
422
|
0 |
0 |
unless ($$HR_user{'Password'} eq crypt($$HR_params{'PASSWORD'}, $$HR_user{'Password'})) |
|
429
|
0 |
0 |
if $debug |
|
439
|
0 |
0 |
if $dbh->err |
|
492
|
0 |
0 |
unless blessed $self |
|
496
|
0 |
0 |
unless ref $HR_params eq 'HASH' |
|
501
|
0 |
0 |
if $debug |
|
503
|
0 |
0 |
unless ($self->client->{'ID'}) |
|
508
|
0 |
0 |
unless ($$HR_params{'RESOURCE'}) |
|
515
|
0 |
0 |
unless (defined $session and $session =~ /^\S{32}$/) |
|
525
|
0 |
0 |
if $dbh->err |
|
529
|
0 |
0 |
if ($logged_ip and $logged_ip ne $$HR_params{'IP'}) |
|
538
|
0 |
0 |
unless ($timeout) |
|
546
|
0 |
0 |
if $dbh->err |
|
550
|
0 |
0 |
if $dbh->err |
|
554
|
0 |
0 |
if $dbh->err |
|
557
|
0 |
0 |
if $debug |
|
560
|
0 |
0 |
if (not defined $timediff) { } |
|
|
0 |
0 |
elsif ($timediff == 0) { } |
|
|
0 |
0 |
elsif ($timediff > $timeout) { } |
|
570
|
0 |
0 |
if $dbh->err |
|
574
|
0 |
0 |
if $dbh->err |
|
577
|
0 |
0 |
if $try++ == 8 |
|
580
|
0 |
0 |
unless ($timediff) |
|
595
|
0 |
0 |
unless ($dbh->allowed($HR_params)) |
|
604
|
0 |
0 |
if $dbh->err |
|
620
|
0 |
0 |
unless blessed $self |
|
624
|
0 |
0 |
unless (defined $session and $session =~ /^\S{32}$/) |
|
630
|
0 |
0 |
if ($$self{'_users'}{$session}) |
|
639
|
0 |
0 |
if $dbh->err |
|
646
|
0 |
0 |
unless (defined $user and $user->response_is(201)) |
|
661
|
0 |
0 |
if $AUTOLOAD =~ /DESTROY/ |
|
663
|
0 |
0 |
unless $class |
|
669
|
0 |
0 |
unless (exists $$self{'_permitted'}{$name}) |
|
673
|
0 |
0 |
if (@_) { } |
|
674
|
0 |
0 |
unless $$self{'_permitted'}{$name} & 2 |
|
682
|
0 |
0 |
unless $$self{'_permitted'}{$name} & 1 |