| line |
true |
false |
branch |
|
369
|
0 |
0 |
if $self->{'fh'} |
|
373
|
0 |
0 |
if $self->{'mpv'} ne $mpv_path |
|
377
|
0 |
0 |
unless my($fh, $slave) = &AnyEvent::Util::portable_socketpair() |
|
384
|
0 |
0 |
if ($self->{'pid'} eq 0) |
|
388
|
0 |
0 |
$options =~ /\s--input-ipc-client\s/u ? : |
|
394
|
0 |
0 |
$self->{'trace'} ? : |
|
403
|
0 |
0 |
if $trace and not ref $trace |
|
410
|
0 |
0 |
if (sysread $fh, $buf, 8192, length $buf) { } |
|
414
|
0 |
0 |
if ('{' eq substr($1, 0, 1)) { } |
|
418
|
0 |
0 |
if (defined(my $event = delete $reply->{'event'})) { } |
|
|
0 |
0 |
elsif (exists $reply->{'request_id'}) { } |
|
419
|
0 |
0 |
if ($event eq 'client-message' and $reply->{'args'}[0] eq 'AnyEvent::MPV') { } |
|
|
0 |
0 |
elsif ($event eq 'property-change' and 4503599627370496 <= $reply->{'id'}) { } |
|
423
|
0 |
0 |
if ($reply->{'args'}[1] eq "key") |
|
431
|
0 |
0 |
if (my $cb = $self->{'obscb'}{$reply->{'id'}}) |
|
435
|
0 |
0 |
if (my $cbs = $self->{'evtcb'}{$event}) |
|
437
|
0 |
0 |
unless my $cb = $cbs->{$evtid} |
|
448
|
0 |
0 |
unless ($cv) |
|
453
|
0 |
0 |
if (exists $reply->{'data'}) { } |
|
|
0 |
0 |
elsif ($reply->{'error'} eq 'success') { } |
|
465
|
0 |
0 |
if $@ |
|
484
|
0 |
0 |
ref $_[0] ? : |
|
496
|
0 |
0 |
unless length $wbuf |
|
500
|
0 |
0 |
if length $wbuf |
|
525
|
0 |
0 |
if ($self->{'pid'}) |
|
555
|
0 |
0 |
if $self->{'on_eof'} |
|
577
|
0 |
0 |
if $self->{'on_event'} |
|
596
|
0 |
0 |
if $self->{'on_key'} |
|
735
|
0 |
0 |
if defined wantarray |
|
794
|
0 |
0 |
if ($obscb == $mpv->{'obscb'}) |
|
806
|
0 |
0 |
if (defined wantarray) |