Branch Coverage

blib/lib/Webqq/Client.pm
Criterion Covered Total %
branch 0 302 0.0


line true false branch
69 0 0 defined $p{'security'} ? :
165 0 0 if ($$self{'debug'})
259 0 0 if ($$self{'is_first_login'} == -1) { }
0 0 elsif ($$self{'is_first_login'} == 1) { }
268 0 0 if defined $p{'security'}
270 0 0 if defined $p{'state'} and first sub { $_ eq $p{'state'}; } , 'online', 'away', 'busy', 'silent', 'hidden', 'offline'
277 0 0 if ($self->_prepare_for_login and $self->_check_verify_code and $self->_get_img_verify_code)
285 0 0 if ($ret == -1) { }
0 0 elsif ($ret == 1) { }
290 0 0 if $self->_report and $self->_check_sig and $self->_get_vfwebqq
303 0 0 if ($$self{'login_state'} ne 'success') { }
323 0 0 if (ref $$self{'on_login'} eq 'CODE')
327 0 0 if $@
388 0 0 if (@_ == 1 and ref $_[0] eq 'Webqq::Message::Message::Send') { }
400 0 0 if (@_ == 1 and ref $_[0] eq 'Webqq::Message::SessMessage::Send') { }
412 0 0 if (@_ == 1 and ref $_[0] eq 'Webqq::Message::DiscussMessage::Send') { }
425 0 0 if (@_ == 1 and ref $_[0] eq 'Webqq::Message::GroupMessage::Send') { }
438 0 0 $$w{'single_long_nick'} ? :
447 0 0 if $$self{'is_stop'}
449 0 0 if ($$msg{'type'} eq 'message') { }
0 0 elsif ($$msg{'type'} eq 'group_message') { }
0 0 elsif ($$msg{'type'} eq 'discuss_message') { }
0 0 elsif ($$msg{'type'} eq 'buddies_status_change') { }
450 0 0 if (ref $$self{'on_receive_offpic'} eq 'CODE')
452 0 0 if ($$_{'type'} eq 'offpic')
469 0 0 if (defined $who and ref $$self{'on_friend_change_state'} eq 'CODE')
473 0 0 if $@
478 0 0 if (ref $$self{'on_receive_message'} eq 'CODE')
482 0 0 if $@
489 0 0 if $$self{'is_stop'}
491 0 0 if ($$msg{'ttl'} <= 0)
493 0 0 if (ref $$msg{'cb'} eq 'CODE')
500 0 0 if (ref $$self{'on_send_message'} eq 'CODE')
515 0 0 if (defined $LAST_DISPATCH_TIME)
516 0 0 $now < $LAST_DISPATCH_TIME + $SEND_INTERVAL ? :
523 0 0 $$msg{'type'} eq 'discuss_message' ? :
0 0 $$msg{'type'} eq 'sess_message' ? :
0 0 $$msg{'type'} eq 'group_message' ? :
0 0 $$msg{'type'} eq 'message' ? :
550 0 0 if (ref $$self{'on_ready'} eq 'CODE')
554 0 0 if $@
562 0 0 if ($CLIENT_COUNT > 1) { }
585 0 0 if (ref $$self{'on_run'} eq 'CODE')
589 0 0 if $@
605 0 0 if ($key eq $cookie)
628 0 0 if defined $cache_data
631 0 0 if (defined $f)
652 0 0 if defined $cache_data
656 0 0 if ($$g{'ginfo'}{'code'} eq $gcode)
659 0 0 if (exists $$g{'minfo'} and ref $$g{'minfo'} eq 'ARRAY') { }
661 0 0 if (defined $m)
673 0 0 if (defined $group_info and ref $$group_info{'minfo'} eq 'ARRAY') { }
678 0 0 if (defined $m)
700 0 0 if defined $cache_data
704 0 0 if ($$d{'dinfo'}{'did'} eq $did)
707 0 0 if (exists $$d{'minfo'} and ref $$d{'minfo'} eq 'ARRAY') { }
709 0 0 if (defined $m)
721 0 0 if (defined $discuss_info and ref $$discuss_info{'minfo'} eq 'ARRAY') { }
726 0 0 if (defined $m)
749 0 0 if defined $cache_data
751 0 0 if (defined $d)
762 0 0 if defined $cache_data
765 0 0 if ($$m{'uin'} eq $tuin)
773 0 0 unless $self->_get_stranger_info($tuin)
779 0 0 if defined $cache_data
782 0 0 if (defined $g)
794 0 0 if (defined $user_info) { }
796 0 0 if ($key eq 'birthday') { }
805 0 0 if (defined $single_long_nick)
814 0 0 if (defined $friend)
816 0 0 if ($$_{'uin'} eq $$friend{'uin'})
826 0 0 if (defined $friends_info) { }
836 0 0 if @{$$self{'qq_database'}{'discuss'};} == 0
837 0 0 if (defined $discuss)
839 0 0 if ($$_{'dinfo'}{'did'} eq $$discuss{'dinfo'}{'did'})
847 0 0 if (not $is_init and ref $$self{'on_new_discuss'} eq 'CODE')
851 0 0 if $@
859 0 0 if (defined $discuss_info) { }
860 0 0 if (ref $$discuss_info{'minfo'} ne 'ARRAY')
865 0 0 if ($$_{'dinfo'}{'did'} eq $$discuss_info{'dinfo'}{'did'})
868 0 0 if ref $$discuss_info{'minfo'} eq 'ARRAY'
873 0 0 if ($flag == 0)
875 0 0 if (not $is_init and ref $$self{'on_new_discuss'} eq 'CODE')
879 0 0 if $@
891 0 0 if (defined $discuss)
893 0 0 if ($$_{'did'} eq $$discuss{'did'})
903 0 0 if (defined $discuss_list_info) { }
913 0 0 if @{$$self{'qq_database'}{'group'};} == 0
914 0 0 if (defined $group)
916 0 0 if ($$_{'ginfo'}{'code'} eq $$group{'ginfo'}{'code'})
924 0 0 if (not $is_init and ref $$self{'on_new_group'} eq 'CODE')
928 0 0 if $@
936 0 0 if (defined $group_info) { }
937 0 0 if (ref $$group_info{'minfo'} ne 'ARRAY')
942 0 0 if ($$_{'ginfo'}{'code'} eq $$group_info{'ginfo'}{'code'})
945 0 0 if ref $$group_info{'minfo'} eq 'ARRAY'
950 0 0 if ($flag == 0)
952 0 0 if (not $is_init and ref $$self{'on_new_group'} eq 'CODE')
956 0 0 if $@
967 0 0 if defined $recent
972 0 0 if (defined $group)
974 0 0 if ($$_{'code'} eq $$group{'code'})
984 0 0 if (defined $group_list_info)
1002 0 0 if (defined $f)
1014 0 0 defined $group ? :
1020 0 0 if defined $self->search_friend($uin)
1023 0 0 if (defined $friend) { }
1026 0 0 if (ref $$self{'on_new_friend'} eq 'CODE')
1030 0 0 if $@
1050 0 0 if defined $self->search_group($gcode)
1052 0 0 if (defined $group_info) { }
1059 0 0 if (ref $$self{'on_new_group'} eq 'CODE')
1063 0 0 if $@
1087 0 0 unless defined $group
1089 0 0 if (exists $$group{'minfo'}) { }
1090 0 0 if defined $self->search_member_in_group($gcode, $member_uin)
1095 0 0 if (defined $group_info and ref $$group_info{'minfo'} eq 'ARRAY') { }
1098 0 0 if (defined $m) { }
1112 0 0 if (ref $$self{'on_new_group_member'} eq 'CODE')
1116 0 0 if $@
1128 0 0 if ref $$group_old{'minfo'} ne 'ARRAY'
1129 0 0 if ref $$group_new{'minfo'} ne 'ARRAY'
1133 0 0 unless (exists $e{$$new{'uin'}})
1134 0 0 if (ref $$self{'on_new_group_member'} eq 'CODE')
1138 0 0 if $@
1148 0 0 if ref $$group_old{'minfo'} ne 'ARRAY'
1149 0 0 if ref $$group_new{'minfo'} ne 'ARRAY'
1153 0 0 unless (exists $e{$$old{'uin'}})
1154 0 0 if (ref $$self{'on_loss_group_member'} eq 'CODE')
1158 0 0 if $@
1169 0 0 if defined $self->search_discuss($did)
1171 0 0 if (defined $discuss_info) { }
1177 0 0 if (ref $$self{'on_new_discuss'} eq 'CODE')
1181 0 0 if $@
1192 0 0 if ref $$discuss_old{'minfo'} ne 'ARRAY'
1193 0 0 if ref $$discuss_new{'minfo'} ne 'ARRAY'
1197 0 0 unless (exists $e{$$old{'uin'}})
1198 0 0 if (ref $$self{'on_loss_discuss_member'} eq 'CODE')
1202 0 0 if $@
1218 0 0 unless defined $discuss
1220 0 0 if (exists $$discuss{'minfo'}) { }
1221 0 0 if defined $self->search_member_in_discuss($did, $member_uin)
1226 0 0 if (defined $discuss_info and ref $$discuss_info{'minfo'} eq 'ARRAY') { }
1229 0 0 if (defined $m) { }
1244 0 0 if (ref $$self{'on_new_discuss_member'} eq 'CODE')
1248 0 0 if $@
1259 0 0 if ref $$discuss_old{'minfo'} ne 'ARRAY'
1260 0 0 if ref $$discuss_new{'minfo'} ne 'ARRAY'
1264 0 0 unless (exists $e{$$new{'uin'}})
1265 0 0 if (ref $$self{'on_new_discuss_member'} eq 'CODE')
1269 0 0 if $@