|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
68
 | 
 0  | 
 2  | 
 if ($INC{'Danga/Socket.pm'})  | 
 
| 
114
 | 
 2  | 
 0  | 
 $^O eq 'linux' ? :  | 
 
| 
189
 | 
 0  | 
 0  | 
 if ($opt_bsd_resource)  | 
 
| 
235
 | 
 0  | 
 0  | 
 if (@_)  | 
 
| 
243
 | 
 0  | 
 0  | 
 wantarray ? :  | 
 
| 
342
 | 
 0  | 
 0  | 
 wantarray ? :  | 
 
| 
358
 | 
 0  | 
 1  | 
 if ($LoopTimeout and $LoopTimeout != -1)  | 
 
| 
413
 | 
 0  | 
 0  | 
 if (ref $class) { }  | 
 
| 
416
 | 
 0  | 
 0  | 
 if (defined $ref and ref $ref eq 'CODE') { }  | 
 
| 
423
 | 
 0  | 
 0  | 
 defined $ref && ref $ref eq 'CODE' ? :  | 
 
| 
442
 | 
 0  | 
 0  | 
 unless $pob  | 
 
| 
444
 | 
 0  | 
 0  | 
 unless @{$$pob{'read_push_back'};}  | 
 
| 
445
 | 
 0  | 
 0  | 
 unless not $$pob{'closed'} and $$pob{'event_watch'} & 1  | 
 
| 
477
 | 
 0  | 
 0  | 
 if (defined $PostLoopCallback)  | 
 
| 
495
 | 
 0  | 
 0  | 
 unless $keep_running  | 
 
| 
520
 | 
 0  | 
 2  | 
 unless ref $self  | 
 
| 
527
 | 
 0  | 
 2  | 
 unless $sock and $fd  | 
 
| 
544
 | 
 0  | 
 2  | 
 if $DescriptorMap{$fd}  | 
 
| 
566
 | 
 0  | 
 1  | 
 unless $$self{'sock'}  | 
 
| 
567
 | 
 1  | 
 0  | 
 if $val == $$self{'corked'}  | 
 
| 
571
 | 
 0  | 
 0  | 
 $val ? :  | 
 
| 
579
 | 
 0  | 
 0  | 
 if ($rv) { }  | 
 
| 
582
 | 
 0  | 
 0  | 
 if ($! == 9 or $! == 88) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($! == 92 or $!{'ENOTSOCK'} or $!{'EOPNOTSUPP'}) { }  | 
 
| 
608
 | 
 0  | 
 0  | 
 if $$self{'closed'}  | 
 
| 
626
 | 
 9  | 
 1  | 
 if $$self{'closed'}  | 
 
| 
640
 | 
 1  | 
 0  | 
 if ($$self{'sock'})  | 
 
| 
702
 | 
 0  | 
 0  | 
 unless not defined $wtr or UNIVERSAL::isa($wtr, 'CODE')  | 
 
| 
726
 | 
 0  | 
 0  | 
 if $$self{'closed'}  | 
 
| 
733
 | 
 0  | 
 0  | 
 if (defined $data)  | 
 
| 
734
 | 
 0  | 
 0  | 
 ref $data ? :  | 
 
| 
735
 | 
 0  | 
 0  | 
 if ($$self{'write_buf_size'})  | 
 
| 
737
 | 
 0  | 
 0  | 
 ref $bref eq 'SCALAR' ? :  | 
 
| 
749
 | 
 0  | 
 0  | 
 unless $bref ||= $$self{'write_buf'}[0]  | 
 
| 
755
 | 
 0  | 
 0  | 
 if ($@)  | 
 
| 
756
 | 
 0  | 
 0  | 
 if (UNIVERSAL::isa($bref, 'CODE'))  | 
 
| 
757
 | 
 0  | 
 0  | 
 unless ($need_queue)  | 
 
| 
776
 | 
 0  | 
 0  | 
 if (my $wtr = $$self{'writer_func'}) { }  | 
 
| 
782
 | 
 0  | 
 0  | 
 if (not defined $written) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($written != $to_write) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($written == $to_write) { }  | 
 
| 
783
 | 
 0  | 
 0  | 
 if ($! == 32) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($! == 11) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($! == 104) { }  | 
 
| 
788
 | 
 0  | 
 0  | 
 if ($need_queue)  | 
 
| 
792
 | 
 0  | 
 0  | 
 unless $$self{'event_watch'} & 4  | 
 
| 
805
 | 
 0  | 
 0  | 
 if ($need_queue)  | 
 
| 
820
 | 
 0  | 
 0  | 
 if ($$self{'write_set_watch'})  | 
 
| 
829
 | 
 0  | 
 0  | 
 if $need_queue  | 
 
| 
841
 | 
 0  | 
 0  | 
 unless $$self{'event_watch'} & 4  | 
 
| 
854
 | 
 0  | 
 0  | 
 ref $buf ? :  | 
 
| 
867
 | 
 0  | 
 0  | 
 if $$self{'closed'}  | 
 
| 
872
 | 
 0  | 
 0  | 
 if (@{$$self{'read_push_back'};})  | 
 
| 
876
 | 
 0  | 
 0  | 
 if ($len <= $bytes) { }  | 
 
| 
877
 | 
 0  | 
 0  | 
 unless @{$$self{'read_push_back'};}  | 
 
| 
892
 | 
 0  | 
 0  | 
 $bytes > 1048576 ? :  | 
 
| 
897
 | 
 0  | 
 0  | 
 if (not $res and $! != 11)  | 
 
| 
952
 | 
 0  | 
 2  | 
 if $$self{'closed'} or not $$self{'sock'}  | 
 
| 
957
 | 
 2  | 
 0  | 
 if ($val) { }  | 
 
| 
962
 | 
 0  | 
 0  | 
 unless $$self{'closed'}  | 
 
| 
965
 | 
 0  | 
 2  | 
 if ($PushBackSet{$fd})  | 
 
| 
971
 | 
 0  | 
 0  | 
 if ($PushBackSet{$fd})  | 
 
| 
984
 | 
 0  | 
 2  | 
 if $$self{'closed'} or not $$self{'sock'}  | 
 
| 
989
 | 
 2  | 
 0  | 
 if ($val and caller ne 'Danga::Socket')  | 
 
| 
995
 | 
 2  | 
 0  | 
 if ($val) { }  | 
 
| 
1000
 | 
 11  | 
 0  | 
 unless $$self{'closed'}  | 
 
| 
1035
 | 
 0  | 
 0  | 
 unless ref $self  | 
 
| 
1049
 | 
 0  | 
 0  | 
 unless $$self{'sock'}  | 
 
| 
1050
 | 
 0  | 
 0  | 
 if defined $$self{'peer_ip'}  | 
 
| 
1053
 | 
 0  | 
 0  | 
 unless $pn  | 
 
| 
1056
 | 
 0  | 
 0  | 
 if (length $pn >= 28) { }  | 
 
| 
1063
 | 
 0  | 
 0  | 
 if ($@)  | 
 
| 
1070
 | 
 0  | 
 0  | 
 if (length $iaddr == 4) { }  | 
 
| 
1087
 | 
 0  | 
 0  | 
 unless my $ip = $self->peer_ip_string  | 
 
| 
1089
 | 
 0  | 
 0  | 
 $$self{'peer_v6'} ? :  | 
 
| 
1101
 | 
 0  | 
 0  | 
 unless $$self{'sock'}  | 
 
| 
1102
 | 
 0  | 
 0  | 
 if defined $$self{'local_ip'}  | 
 
| 
1105
 | 
 0  | 
 0  | 
 unless $pn  | 
 
| 
1122
 | 
 0  | 
 0  | 
 $ip ? :  | 
 
| 
1133
 | 
 0  | 
 0  | 
 $$self{'event_watch'} & 1 ? :  | 
 
| 
 | 
 0  | 
 0  | 
 $$self{'event_watch'} & 4 ? :  | 
 
| 
1135
 | 
 0  | 
 0  | 
 $$self{'closed'} ? :  | 
 
| 
1137
 | 
 0  | 
 0  | 
 if ($peer)  | 
 
| 
1144
 | 
 0  | 
 0  | 
 unless $ENV{'DS_DEBUG'}  |