| line |
true |
false |
branch |
|
252
|
0 |
0 |
if ($var = shift @_) |
|
258
|
0 |
0 |
unless (defined $args{'username'} and defined $args{'password'} and defined $args{'callback'}) |
|
264
|
0 |
0 |
unless defined $args{'allow_srv_settings'} |
|
344
|
0 |
0 |
unless ($$imsg{'pause'}) |
|
347
|
0 |
0 |
unless $$im_socket = 'IO::Socket::INET'->new('PeerAddr', $$imsg{'server'}, 'PeerPort', $$imsg{'port'}, 'Proto', 'tcp', 'Type', 1) |
|
373
|
0 |
0 |
unless defined($so_srv_sflap_signon = $imsg->read_sflap_packet) |
|
380
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_SIGNON, $so_sflap_signon, 1, 1) |
|
384
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $so_toc_ascii, 0, 0) |
|
388
|
0 |
0 |
if (scalar @ready > 0) { } |
|
390
|
0 |
0 |
unless defined($so_toc_srv_so = $imsg->read_sflap_packet) |
|
398
|
0 |
0 |
unless ($so_toc_srv_so =~ /SIGN_ON/) |
|
401
|
0 |
0 |
if ($so_toc_srv_so =~ /ERROR:(.*)/) { } |
|
419
|
0 |
0 |
unless defined $imsg->toc_set_config |
|
425
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $so_init_done, 0, 0) |
|
465
|
0 |
0 |
unless (defined sysread($$im_socket, $rsp_header, $SFLAP_HEADER_LEN, 0) and length $rsp_header == $SFLAP_HEADER_LEN) |
|
478
|
0 |
0 |
unless (defined sysread($$im_socket, $rsp_recv_packet, $rsp_dlen, 0) and length $rsp_recv_packet == $rsp_dlen) |
|
485
|
0 |
0 |
if ($rsp_type == $SFLAP_TYPE_SIGNON and $rsp_dlen == 4) { } |
|
563
|
0 |
0 |
unless (defined $sflap_type and defined $sflap_data and defined $already_formatted and defined $no_null_terminate) |
|
572
|
0 |
0 |
if ($already_formatted) { } |
|
582
|
0 |
0 |
unless ($no_null_terminate) |
|
599
|
0 |
0 |
if (length $ssp_packet >= $SFLAP_MAX_LENGTH) |
|
606
|
0 |
0 |
if (syswrite $$im_socket, $ssp_packet) |
|
687
|
0 |
0 |
unless (defined $pr_password) |
|
734
|
0 |
0 |
unless (defined $nu_username) |
|
773
|
0 |
0 |
unless (defined $toc_command) |
|
779
|
0 |
0 |
if (@_) { } |
|
829
|
0 |
0 |
unless (defined $toc_command) |
|
835
|
0 |
0 |
if (@_) { } |
|
892
|
0 |
0 |
unless (defined $imsg and defined $tsi_uname and defined $tsi_msg) |
|
900
|
0 |
0 |
if ($tsi_auto) |
|
906
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tsi_full_msg, 0, 0) |
|
944
|
0 |
0 |
unless (defined $ib_group and defined $_[0]) |
|
950
|
0 |
0 |
unless scalar @{${$$imsg{'buddies'};}{$ib_group};} |
|
981
|
0 |
0 |
unless (defined $_[0]) |
|
1004
|
0 |
0 |
unless (scalar @{${$$imsg{'buddies'};}{$group};}) |
|
1040
|
0 |
0 |
unless defined $imsg->add_buddies(@_) |
|
1068
|
0 |
0 |
unless defined $imsg->remove_buddies(@_) |
|
1073
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $rob_message, 0, 0) |
|
1075
|
0 |
0 |
if ($$imsg{'allow_srv_settings'}) |
|
1092
|
0 |
0 |
unless $$imsg{'allow_srv_settings'} |
|
1096
|
0 |
0 |
unless @srv_buddies = split(/\n/, $srv_buddy_list, 0) |
|
1100
|
0 |
0 |
if ($srv_buddies[$i] =~ /^g\s*(.*)/) |
|
1110
|
0 |
0 |
if ($srv_buddies[$i] =~ /^b\s*(.*)/) { } |
|
1160
|
0 |
0 |
unless (defined $buddyhash) |
|
1244
|
0 |
0 |
unless (defined $_[0]) |
|
1296
|
0 |
0 |
unless (defined $_[0]) |
|
1345
|
0 |
0 |
unless defined $imsg->im_permit(@_) |
|
1375
|
0 |
0 |
unless defined $imsg->im_deny(@_) |
|
1455
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $aida_message, 0, 0) |
|
1457
|
0 |
0 |
if ($$imsg{'allow_srv_settings'}) |
|
1491
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $aipa_message, 0, 0) |
|
1493
|
0 |
0 |
if ($$imsg{'allow_srv_settings'}) |
|
1526
|
0 |
0 |
if (scalar keys %{$$imsg{'buddies'};}) { } |
|
1532
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $aob_message, 0, 0) |
|
1534
|
0 |
0 |
if ($$imsg{'allow_srv_settings'}) |
|
1548
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $aob_message, 0, 0) |
|
1551
|
0 |
0 |
if (scalar @{$$imsg{'permit'};}) |
|
1555
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $aip_message, 0, 0) |
|
1557
|
0 |
0 |
if ($$imsg{'allow_srv_settings'}) |
|
1566
|
0 |
0 |
if (scalar @{$$imsg{'deny'};}) |
|
1571
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $aid_message, 0, 0) |
|
1573
|
0 |
0 |
if ($$imsg{'allow_srv_settings'}) |
|
1582
|
0 |
0 |
if ($$imsg{'allow_srv_settings'}) |
|
1589
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tsc_packet, 1, 1) |
|
1617
|
0 |
0 |
$_[1] ? : |
|
1619
|
0 |
0 |
unless (defined $te_user and defined $te_anon) |
|
1628
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $te_evil_msg, 0, 0) |
|
1665
|
0 |
0 |
unless (defined $tcj_exchange and defined $tcj_room_name) |
|
1675
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tcj_message, 0, 0) |
|
1708
|
0 |
0 |
unless (defined $tcs_roomid and defined $tcs_msgtext) |
|
1717
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tcs_message, 0, 0) |
|
1750
|
0 |
0 |
unless (defined $tcw_roomid and defined $tcw_dstuser and defined $tcw_msgtext) |
|
1759
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tcs_message, 0, 0) |
|
1790
|
0 |
0 |
$_[2] ? : |
|
1792
|
0 |
0 |
unless (defined $tce_roomid and defined $tce_dstuser and defined $tce_anon) |
|
1801
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tce_message, 0, 0) |
|
1830
|
0 |
0 |
unless (defined $tci_roomid and defined $tci_msgtext and @tci_buddies) |
|
1844
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tci_message, 0, 0) |
|
1867
|
0 |
0 |
unless (defined $tcl_roomid) |
|
1875
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tcl_message, 0, 0) |
|
1900
|
0 |
0 |
unless (defined $tca_roomid) |
|
1908
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tcl_message, 0, 0) |
|
1932
|
0 |
0 |
unless (defined $tgi_username) |
|
1940
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tgi_message, 0, 0) |
|
1964
|
0 |
0 |
unless (defined $tsi_info) |
|
1972
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tsi_message, 0, 0) |
|
1996
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tsa_message, 0, 0) |
|
2018
|
0 |
0 |
unless (defined $tgd_username) |
|
2026
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tgd_message, 0, 0) |
|
2050
|
0 |
0 |
unless (defined $tsd_userinfo) |
|
2058
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tsd_message, 0, 0) |
|
2081
|
0 |
0 |
unless (defined $tds_searchstr) |
|
2089
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tds_message, 0, 0) |
|
2118
|
0 |
0 |
unless (defined $tsi_seconds) |
|
2125
|
0 |
0 |
unless defined $imsg->send_sflap_packet($SFLAP_TYPE_DATA, $tsi_message, 0, 0) |
|
2171
|
0 |
0 |
unless (defined $fh and defined $cb) |
|
2203
|
0 |
0 |
unless (defined $fh) |
|
2288
|
0 |
0 |
unless (defined $callback) |
|
2320
|
0 |
0 |
if (defined $fh) { } |
|
2384
|
0 |
0 |
if ($rfh == $$im_socket) { } |
|
2386
|
0 |
0 |
unless defined($recv_buffer = $imsg->read_sflap_packet) |
|
2390
|
0 |
0 |
if ($tp_type eq 'PAUSE') { } |
|
|
0 |
0 |
elsif ($tp_type eq 'SIGN_ON') { } |
|
|
0 |
0 |
elsif ($tp_type eq 'CONFIG') { } |
|
2410
|
0 |
0 |
unless &{${$$imsg{'callbacks'};}{$rfh};} |