Branch Coverage

blib/lib/Net/XMPP/Protocol.pm
Criterion Covered Total %
branch 3 304 0.9


line true false branch
1113 0 0 exists $$self{'ERRORCODE'} && $$self{'ERRORCODE'} ne '' ? :
1156 0 0 if (not ref($object) =~ /^Net::XMPP/) { }
1158 0 0 if ($$self{'DEBUG'}->GetLevel >= 1 or exists $$self{'CB'}{'receive'})
1162 0 0 if exists $$self{'CB'}{'receive'}
1167 0 0 if defined $object->get_attrib('id')
1179 0 0 if $id ne ''
1182 0 0 unless exists $$self{'CB'}{$tag} or exists $$self{'CB'}{'XPath'} or exists $$self{'CB'}{'DirectXPath'} or $self->CheckID($tag, $id)
1189 0 0 if ($pass) { }
1193 0 0 if (exists $$self{'CB'}{'DirectXPath'})
1202 0 0 if ($object->XPathCheck($xpath))
1213 0 0 if $direct_pass
1217 0 0 if (not ref($object) =~ /^Net::XMPP/) { }
1226 0 0 if ($NXObject == -1) { }
1232 0 0 if ($self->CheckID($tag, $id)) { }
1236 0 0 if ($self->TimedOutID($id)) { }
1251 0 0 if (exists $$self{'CB'}{'XPath'})
1257 0 0 if ($NXObject->GetTree->XPathCheck($xpath))
1268 0 0 if (exists $$self{'CB'}{$tag}) { }
1299 0 0 if (exists $Net::XMPP::Protocol::NEWOBJECT{$tag})
1325 33 0 if (defined $func) { }
1333 0 33 if $tag eq 'update'
1356 0 0 if (defined $$hash{$type}) { }
1383 44 0 if (defined $types{$type}) { }
1409 0 0 if (defined $types{$type}) { }
1454 0 0 if scalar keys %{$$self{'CB'}{'XPath'}{$xpath};} == 0
1456 0 0 if scalar keys %{$$self{'CB'}{'XPath'};} == 0
1494 0 0 if scalar keys %{$$self{'CB'}{'DirectXPath'}{$xpath};} == 0
1496 0 0 if scalar keys %{$$self{'CB'}{'DirectXPath'};} == 0
1512 0 0 unless defined $ignoreActivity
1514 0 0 if (ref $object eq '') { }
1535 0 0 unless defined $ignoreActivity
1538 0 0 if exists $$self{'CB'}{'send'}
1565 0 0 if (ref $object eq '') { }
1623 0 0 if exists $$self{'CB'}{'startwait'}
1628 0 0 if exists $$self{'CB'}{'endwait'}
1645 0 0 if exists $$self{'RCVDB'}{$id}
1663 0 0 if $self->ReceivedID($id)
1694 0 0 unless defined $timeout
1701 0 0 unless defined $self->Process(1)
1702 0 0 if exists $$self{'CB'}{'update'}
1704 0 0 if (not $self->ReceivedID($id)) { }
1746 0 0 unless defined $id
1749 0 0 if $id eq ''
1874 0 0 unless defined $type
1875 0 0 unless $type eq '' or $type eq 'available' or $type eq 'unavailable'
1881 0 0 unless defined $fromID
1883 0 0 unless $resource ne ''
1885 0 0 unless defined $priority
1890 0 0 if (exists $$self{'PRESENCEDB'}{$fromID})
1893 0 0 unless defined $oldPriority
1898 0 0 if $$self{'PRESENCEDB'}{$fromID}{'priorities'}{$oldPriority}[$index]{'resource'} eq $resource
1905 0 0 if exists $$self{'PRESENCEDB'}{$fromID}{'priorities'}{$oldPriority} and $#{$$self{'PRESENCEDB'}{$fromID}{'priorities'}{$oldPriority};} == -1
1907 0 0 if scalar keys %{$$self{'PRESENCEDB'}{$fromID};} == 0
1912 0 0 if ($type eq '' or $type eq 'available')
1916 0 0 if $$self{'PRESENCEDB'}{$fromID}{'priorities'}{$priority}[$index]{'resource'} eq $resource
1919 0 0 if $loc == -1
1931 0 0 defined $currentPresence ? :
1946 0 0 if ref $jid and $jid->isa('Net::XMPP::JID')
1948 0 0 unless exists $$self{'PRESENCEDB'}{$indexJID}
1985 0 0 if ref $jid and $jid->isa('Net::XMPP::JID')
1987 0 0 unless exists $$self{'PRESENCEDB'}{$indexJID}
1988 0 0 if scalar keys %{$$self{'PRESENCEDB'}{$indexJID}{'priorities'};} == 0
2009 0 0 if ref $jid and $jid->isa('Net::XMPP::JID')
2013 0 0 unless exists $$self{'PRESENCEDB'}{$indexJID}
2019 0 0 if $$self{'PRESENCEDB'}{$indexJID}{'priorities'}{$priority}[$index]{'resource'} eq ' '
2038 0 0 unless exists $args{'ignoreactivity'}
2097 0 0 unless exists $args{'username'}
2099 0 0 unless exists $args{'password'}
2102 0 0 if ($$self{'STREAM'}->GetStreamFeature($self->GetStreamID, 'xmpp-sasl'))
2125 0 0 unless exists $args{'resource'}
2142 0 0 unless defined $iqAuth
2143 0 0 if $iqAuth->GetType eq 'error'
2146 0 0 if ($iqAuth->GetType eq 'error') { }
2153 0 0 if $iqAuthQuery->DefinedPassword
2154 0 0 if $iqAuthQuery->DefinedDigest
2155 0 0 if $iqAuthQuery->DefinedSequence and $iqAuthQuery->DefinedToken
2157 0 0 if $authType eq 'zerok'
2158 0 0 if $authType eq 'zerok'
2176 0 0 if ($authType eq 'zerok')
2195 0 0 if ($authType eq 'digest')
2219 0 0 unless defined $iqLogin
2220 0 0 if $iqLogin->GetType eq 'error'
2242 0 0 unless exists $args{'username'}
2244 0 0 unless exists $args{'password'}
2247 0 0 unless exists $args{'resource'}
2259 0 0 unless exists $args{'timeout'}
2268 0 0 unless defined $self->Process(1)
2269 0 0 if exists $$self{'CB'}{'update'}
2275 0 0 unless ($$self{'STREAM'}->SASLClientDone($sid))
2284 0 0 unless ($$self{'STREAM'}->SASLClientAuthed($sid))
2304 0 0 if ($bind)
2315 0 0 if ($session)
2341 0 0 if (defined $resource and $resource ne '')
2399 0 0 if (exists $args{'list'})
2405 0 0 unless defined $iq
2428 0 0 if (exists $args{'list'})
2463 0 0 unless defined $iq
2465 0 0 if $iq->DefinedError
2487 0 0 exists $args{'timeout'} ? :
2493 0 0 if exists $args{'to'}
2501 0 0 if ($args{'mode'} eq 'passthru')
2509 0 0 if $args{'mode'} eq 'nonblock'
2516 0 0 unless defined $iq
2517 0 0 if ($iq->GetType eq 'error')
2552 0 0 if exists $args{'to'}
2567 0 0 unless defined $iq
2568 0 0 if $iq->GetType eq 'error'
2633 0 0 if (defined $query)
2667 0 0 unless defined $iq
2766 0 0 if (ref $jid and $jid->isa('Net::XMPP::JID'))
2771 0 0 unless exists $$self{'ROSTERDB'}
2772 0 0 unless exists $$self{'ROSTERDB'}{'JIDS'}
2773 0 0 unless exists $$self{'ROSTERDB'}{'JIDS'}{$jid}
2789 0 0 unless exists $$self{'ROSTERDB'}
2790 0 0 unless exists $$self{'ROSTERDB'}{'GROUPS'}
2791 0 0 unless exists $$self{'ROSTERDB'}{'GROUPS'}{$group}
2806 0 0 unless $self->RosterDBGroupExists($group)
2825 0 0 unless exists $$self{'ROSTERDB'}{'GROUPS'}
2826 0 0 if scalar keys %{$$self{'ROSTERDB'}{'GROUPS'};} == 0
2843 0 0 unless exists $$self{'ROSTERDB'}
2844 0 0 unless exists $$self{'ROSTERDB'}{'JIDS'}
2865 0 0 unless exists $$self{'ROSTERDB'}
2866 0 0 unless exists $$self{'ROSTERDB'}{'JIDS'}
2870 0 0 if exists $$self{'ROSTERDB'}{'JIDS'}{$jid}{'groups'} and $#{$$self{'ROSTERDB'}{'JIDS'}{$jid}{'groups'};} > -1
2892 0 0 unless $type eq 'set' or $type eq 'result'
2914 0 0 if ($roster{$jid}{'subscription'} ne 'remove')
2934 0 0 if (ref $jid and $jid->isa('Net::XMPP::JID'))
2939 0 0 unless $self->RosterDBExists($jid)
2940 0 0 if (defined $key)
2942 0 0 unless exists $$self{'ROSTERDB'}{'JIDS'}{$jid}{$key}
2959 0 0 if ($self->RosterDBExists($jid))
2961 0 0 if (defined $self->RosterDBQuery($jid, 'groups'))
2967 0 0 if scalar keys %{$$self{'ROSTERDB'}{'GROUPS'}{$group};} == 0
2969 0 0 if scalar keys %{$$self{'ROSTERDB'}{'GROUPS'};} == 0
3015 0 0 if ($tag eq 'failure')
3020 0 0 if ($tag eq 'proceed')
3036 0 0 unless defined $timeout
3037 0 0 if $timeout eq ''
3047 0 0 unless ($self->TLSClientSecure)
3068 0 0 if ($status) { }
3203 0 0 if ($tag eq 'challenge')
3208 0 0 if ($tag eq 'failure')
3213 0 0 if ($tag eq 'success')
3255 0 0 unless defined $mechanisms
3468 0 0 if $message->DefinedType
3472 0 0 if (exists $$self{'CB'}{'Mess'}{$type}) { }
3497 0 0 if $presence->DefinedType
3501 0 0 if (exists $$self{'CB'}{'Pres'}{$type})
3523 0 0 unless $iq->DefinedChild
3525 0 0 unless defined $query
3532 0 0 if (exists $$self{'CB'}{'IQns'}{$ns} and ref $$self{'CB'}{'IQns'}{$ns} eq 'HASH') { }
0 0 elsif (exists $$self{'CB'}{'IQns'}{$ns}{$type}) { }