Branch Coverage

/root/.cpan/build/File-RsyncP-0.76-0/blib/lib/File/RsyncP.pm

Criterion	Covered	Total	%
branch	0	472	0.0

line	true	false	branch
90	0	0	if $rs->{'rsyncArgs'}[$i] eq '--devices'
113	0	0	unless $p->getoptions('exclude=s', sub { optExclude($rs, @_); } , 'exclude-from=s', sub { optExclude($rs, @_); } , 'include=s', sub { optExclude($rs, @_); } , 'include-from=s', sub { optExclude($rs, @_); } , 'cvs-exclude|C', sub { optExclude($rs, @_); } )
126	0	0	unless $p->getoptions($rs->{'rsyncOpts'}, 'block-size=i', 'devices|D', 'from0|0', 'group|g', 'hard-links|H', 'ignore-times|I', 'links|l', 'numeric-ids', 'owner|o', 'perms|p', 'protocol=i', 'recursive|r', 'relative|R', 'timeout', 'verbose|v+')
145	0	0	if defined $rs->{'rsyncOpts'}{'protocol'}
147	0	0	if (not defined $rs->{'fio'}) { }
163	0	0	if ($rs->{'fio_version'} >= 2) { }
170	0	0	if $rs->{'protocol_version'} > 26
229	0	0	if $rs->{'timeout'}
230	0	0	unless socket FH, 2, 1, $proto
232	0	0	unless connect FH, $paddr
236	0	0	if $rs->{'timeout'}
237	0	0	unless ($line =~ /\@RSYNCD:\s*(\d+)/)
241	0	0	if ($rs->{'remote_protocol'} < 20 or $rs->{'remote_protocol'} > 40)
245	0	0	if $rs->{'logLevel'} >= 1
247	0	0	if $rs->{'protocol_version'} > $rs->{'remote_protocol'}
249	0	0	if $rs->{'fio_version'} >= 2
251	0	0	if $rs->{'logLevel'} >= 1
260	0	0	unless defined $rs->{'fh'}
264	0	0	if $rs->{'logLevel'} >= 2
265	0	0	if $line eq '@RSYNCD: EXIT'
276	0	0	unless defined $rs->{'fh'}
279	0	0	if $line =~ /\@ERROR: (.*)/
280	0	0	if ($line =~ /\@RSYNCD: AUTHREQD (.{22})/) { }
	0	0	elsif ($authRequired) { }
288	0	0	if $rs->{'logLevel'} >= 2
290	0	0	if $rs->{'logLevel'} >= 5
293	0	0	if $rs->{'logLevel'} >= 2
298	0	0	if $line =~ /\@ERROR: (.*)/
299	0	0	if ($line ne '@RSYNCD: OK')
302	0	0	if $rs->{'logLevel'} >= 1
311	0	0	if $remoteSend
316	0	0	if $rs->{'logLevel'} >= 1
334	0	0	unless socketpair RSYNC, FH, 1, 1, 0
336	0	0	unless socketpair RSYNC_STDERR, FH_STDERR, 1, 1, 0
343	0	0	if ref $rs->{'rsyncCmd'} ne 'ARRAY' and ref $rs->{'rsyncCmd'} ne 'CODE'
344	0	0	if ($rs->{'rsyncCmdType'} eq 'full' or ref $rs->{'rsyncCmd'} ne 'ARRAY') { }
348	0	0	if $remoteSend
350	0	0	if ($rs->{'rsyncCmdType'} eq 'shell')
360	0	0	if ($remoteSend) { }
367	0	0	if ref $cmd eq 'ARRAY' and $rs->{'logLevel'} >= 1
368	0	0	unless ($pid = fork)
380	0	0	if (ref $cmd eq 'CODE') { }
395	0	0	if defined $rs->{'pidHandler'}
400	0	0	if $rs->{'logLevel'} >= 3
401	0	0	if $rs->{'logLevel'} >= 5
402	0	0	if $rs->getData(4) < 0
407	0	0	if $rs->{'logLevel'} >= 1
409	0	0	if $rs->{'protocol_version'} > $rs->{'remote_protocol'}
411	0	0	if $rs->{'fio_version'} >= 2
412	0	0	if ($version < 20 or $version > 40)
417	0	0	if $rs->{'logLevel'} >= 1
425	0	0	unless defined $rs->{'fh'}
428	0	0	if defined $rs->{'fh_stderr'}
437	0	0	if $rs->getData(4) < 0
443	0	0	if $rs->{'logLevel'} >= 2
445	0	0	if ($rs->{'remoteSend'}) { }
449	0	0	if ($rs->fileListReceive < 0)
457	0	0	if ($rs->{'rsyncOpts'}{'hard-links'})
466	0	0	if ($rs->{'logLevel'} >= 2)
480	0	0	if $rs->getChunk(4) < 0
487	0	0	if $rs->{'doPartial'}
506	0	0	unless ($pid = fork)
535	0	0	if $rs->{'logLevel'} >= 5
537	0	0	unless $rs->{'abort'}
547	0	0	if $rs->{'abort'}
561	0	0	if (fcntl $rs->{'fh'}, 3, $flags) { }
563	0	0	unless (fcntl $rs->{'fh'}, 4, $flags)
572	0	0	if $rs->{'logLevel'} >= 2
574	0	0	if defined $rs->{'pidHandler'}
591	0	0	if ($rs->{'abort'})
597	0	0	if $rs->{'childDone'} >= 3 or $rs->pollChild(1) < 0
600	0	0	unless defined $rs->{'fatalErrorMsg'}
608	0	0	if defined $rs->{'fatalErrorMsg'}
616	0	0	if $rs->{'fatalError'}
622	0	0	if $rs->{'fatalError'}
628	0	0	if $rs->{'fatalError'}
634	0	0	if $rs->{'abort'}
653	0	0	unless defined $f
655	0	0	if $rs->{'clientCharset'} ne ''
662	0	0	if (not $thisIgnoreAttr and $f->{'size'} == $attr->{'size'} and $f->{'mtime'} == $attr->{'mtime'} and !$rs->{'rsyncOpts'}{'perms'} || $f->{'mode'} == $attr->{'mode'} and !$rs->{'rsyncOpts'}{'group'} || $f->{'gid'} == $attr->{'gid'} and !$rs->{'rsyncOpts'}{'owner'} || $f->{'uid'} == $attr->{'uid'} and !$rs->{'rsyncOpts'}{'hard-links'} || $f->{'hlink_self'} == $attr->{'hlink_self'})
697	0	0	if ($arg->{'name'} eq 'exclude') { }
	0	0	elsif ($arg->{'name'} eq 'include') { }
	0	0	elsif ($arg->{'name'} eq 'exclude-from') { }
	0	0	elsif ($arg->{'name'} eq 'include-from') { }
	0	0	elsif ($arg->{'name'} eq 'cvs-exclude') { }
714	0	0	if ($rs->{'logLevel'} >= 1)
717	0	0	if $rs->{'clientCharset'} ne ''
718	0	0	if ($exc->{'flags'} & 16) { }
731	0	0	if $rs->{'chunkData'} eq '' and $rs->getChunk(1) < 0
733	0	0	if $rs->{'fileList'}->fatalError
734	0	0	if ($rs->{'logLevel'} >= 4)
738	0	0	unless defined $f
740	0	0	if $rs->{'clientCharset'} ne ''
745	0	0	if ($cnt > 0)
748	0	0	if not $rs->{'fileList'}->decodeDone and $rs->getChunk(length($rs->{'chunkData'}) + 1) < 0
766	0	0	unless defined $end
769	0	0	unless defined $f
771	0	0	if $rs->{'clientCharset'} ne ''
774	0	0	if ($rs->{'doPartial'} and $rs->{'fileList'}->flagGet($n))
781	0	0	if (($f->{'mode'} & 61440) != 32768) { }
	0	0	elsif (defined $f->{'hlink'} and not $f->{'hlink_self'}) { }
785	0	0	if (($f->{'mode'} & 61440) == 16384) { }
786	0	0	if ($rs->{'fio'}->makePath($f))
791	0	0	if ($rs->{'fio'}->makeSpecial($f))
797	0	0	if ($rs->{'fio'}->makeHardLink($f, 0))
807	0	0	$phase == 0 ? :
812	0	0	if $phase == 0
814	0	0	if ($rs->{'logLevel'} >= 2)
819	0	0	if (@{$rs->{'doList'};})
822	0	0	unless defined $f
824	0	0	if $rs->{'clientCharset'} ne ''
826	0	0	if ($rs->{'doPartial'} and $rs->{'fileList'}->flagGet($n))
829	0	0	if $rs->{'logLevel'} >= 3 and ($f->{'mode'} & 61440) == 32768
838	0	0	if (not $ignoreAttr and $phase == 0 and $f->{'size'} == $attr->{'size'} and $f->{'mtime'} == $attr->{'mtime'} and !$rs->{'rsyncOpts'}{'perms'} || $f->{'mode'} == $attr->{'mode'} and !$rs->{'rsyncOpts'}{'group'} || $f->{'gid'} == $attr->{'gid'} and !$rs->{'rsyncOpts'}{'owner'} || $f->{'uid'} == $attr->{'uid'} and !$rs->{'rsyncOpts'}{'hard-links'} || $f->{'hlink_self'} == $attr->{'hlink_self'})
849	0	0	if $rs->{'logLevel'} >= 3 and ($f->{'mode'} & 61440) == 32768
854	0	0	if (($f->{'mode'} & 61440) != 32768) { }
	0	0	elsif ($rs->{'rsyncOpts'}{'hard-links'} and defined $f->{'hlink'} and not $f->{'hlink_self'}) { }
	0	0	elsif (not defined $attr->{'mode'} or ($attr->{'mode'} & 61440) != 32768) { }
	0	0	elsif (($blkSize = $rs->{'fio'}->csumStart($f, 0, $rs->{'blockSize'}, $phase)) < 0) { }
873	0	0	if defined $attr->{'mode'}
875	0	0	if $rs->{'logLevel'} >= 5
883	0	0	if $rs->{'logLevel'} >= 5
895	0	0	if ($blkSize <= 0)
898	0	0	if $blkSize < $rs->{'blockSize'}
899	0	0	if $blkSize > 16384
904	0	0	if $rs->{'logLevel'} >= 5
908	0	0	$blkCnt > 0 ? :
911	0	0	$blkCnt > 256 ? :
917	0	0	if $rs->{'abort'}
924	0	0	if ($nWrite > 0 and not $rs->{'abort'})
930	0	0	if (not @{$rs->{'doList'};} and $phase == 1 and $rs->{'childDone'} == 1)
944	0	0	if $rs->{'abort'}
945	0	0	$phase == 1 && !@{$rs->{'doList'};} ? :
947	0	0	if ($phase == 0)
965	0	0	unless defined $rs->{'childFh'}
966	0	0	if $rs->{'logLevel'} >= 12
972	0	0	unless vec $rout, fileno $rs->{'childFh'}, 1
976	0	0	if $nbytes > 0
977	0	0	if ($nbytes <= 0)
981	0	0	if $rs->{'logLevel'} >= 1
1001	0	0	if $rs->{'logLevel'} >= 20
1002	0	0	if ($mesg =~ /^done$/) { }
	0	0	elsif ($mesg =~ /^stats (\d+) (\d+) (\d+) (\d+) (.*)/) { }
	0	0	elsif ($mesg =~ /^exit/) { }
	0	0	elsif ($mesg =~ /^redo (\d+)/) { }
	0	0	elsif ($mesg =~ /^log (.*)/) { }
1004	0	0	if $rs->{'logLevel'} >= 4
1013	0	0	if $rs->{'logLevel'} >= 4
1017	0	0	if $rs->{'logLevel'} >= 4
1020	0	0	if ($rs->{'phase'} == 1) { }
1025	0	0	if $rs->{'logLevel'} >= 4
1038	0	0	$phase == 0 ? :
1045	0	0	if $rs->getChunk(4) < 0
1048	0	0	if ($fileNum == 4294967295)
1050	0	0	if $rs->{'logLevel'} >= 2
1054	0	0	unless defined $f
1056	0	0	if $rs->{'clientCharset'} ne ''
1057	0	0	if ($rs->{'protocol_version'} >= 27) { }
1058	0	0	if $rs->getChunk(16) < 0
1064	0	0	if $rs->getChunk(12) < 0
1070	0	0	if $rs->{'logLevel'} >= 5
1079	0	0	if ($f->{'mode'} & 61440) != 32768
1082	0	0	$blkCnt > 0 ? :
1087	0	0	$cnt > 256 ? :
1089	0	0	if $fileSame
1094	0	0	if $csum ne $csumRem
1097	0	0	if $rs->{'logLevel'} >= 8
1110	0	0	if ($fileSame) { }
1111	0	0	if $rs->{'logLevel'} >= 3
1125	0	0	if not defined $dataR or length $$dataR == 0
1150	0	0	if $rs->getChunk(4) < 0
1153	0	0	if $fileNum == 4294967295
1158	0	0	if $phase == 0
1162	0	0	unless defined $f
1164	0	0	if $rs->{'clientCharset'} ne ''
1165	0	0	if ($rs->{'protocol_version'} >= 27) { }
1166	0	0	if $rs->getChunk(16) < 0
1172	0	0	if $rs->getChunk(12) < 0
1178	0	0	if $rs->{'logLevel'} >= 5
1182	0	0	if $rs->getChunk(4) < 0
1185	0	0	if ($len == 0) { }
	0	0	elsif ($len > 2147483648) { }
1186	0	0	if $rs->getChunk(16) < 0
1191	0	0	if ($ret == 1)
1192	0	0	if ($phase == 1)
1197	0	0	if $rs->{'logLevel'} >= 2
1205	0	0	if $rs->getChunk($len) < 0
1215	0	0	if $phase == 1
1220	0	0	if $phase == 0
1222	0	0	if $rs->{'logLevel'} >= 2
1227	0	0	if ($phase == 1 and $rs->{'rsyncOpts'}{'hard-links'})
1231	0	0	unless defined $f
1232	0	0	if not defined $f->{'hlink'} or $f->{'hlink_self'}
1233	0	0	if ($rs->{'clientCharset'} ne '')
1237	0	0	if ($rs->{'fio'}->makeHardLink($f, 1))
1258	0	0	if ($rs->{'rsyncOpts'}{'hard-links'})
1284	0	0	if ($rs->{'logLevel'} >= 4)
1289	0	0	unless defined $f
1291	0	0	if $rs->{'clientCharset'} ne ''
1301	0	0	if ($rs->{'protocol_version'} >= 27) { }
1326	0	0	if defined $timeout
1329	0	0	if defined $rs->{'childPID'}
1330	0	0	if $rs->{'timeout'}
1339	0	0	if ($rs->getChunk(12) >= 0)
1344	0	0	if (defined $fh) { }
1378	0	0	if $rs->{'abort'}
1379	0	0	if $rs->{'timeout'}
1381	0	0	if $rs->{'abort'}
1384	0	0	if defined $rs->{'fh_stderr'}
1386	0	0	if (defined $rs->{'fh_stderr'} and vec $rout, fileno $rs->{'fh_stderr'}, 1)
1390	0	0	if $rs->{'abort'}
1392	0	0	if (length $data == 0)
1393	0	0	if $rs->{'logLevel'} >= 1
1394	0	0	if $rs->{'abort'}
1397	0	0	if $rs->{'logLevel'} >= 1
1403	0	0	if ($rs->{'logLevel'} >= 10)
1416	0	0	if $rs->getData(4) < 0
1421	0	0	if $rs->getData($len) < 0
1424	0	0	if ($code == 0) { }
1429	0	0	if $rs->{'clientCharset'} ne ''
1431	0	0	if ($code == 1 or $d =~ /^file has vanished: /)
1445	0	0	if ($rs->{'readData'} =~ /(.*?)[\n\r]+(.*)/s)
1449	0	0	if $rs->getData(length($rs->{'readData'}) + 1) < 0
1458	0	0	if $flush or length $rs->{'writeBuf'} > 32768
1466	0	0	unless defined $rs->{'stats'}{'parentStats'}
1476	0	0	if $rs->{'abort'}
1477	0	0	if $rs->{'timeout'}
1481	0	0	if defined $rs->{'childFh'}
1482	0	0	if defined $rs->{'fh_stderr'}
1487	0	0	if (defined $rs->{'childFh'} and vec $rout, fileno $rs->{'childFh'}, 1)
1491	0	0	if (defined $rs->{'fh_stderr'} and vec $rout, fileno $rs->{'fh_stderr'}, 1)
1495	0	0	if $rs->{'abort'}
1496	0	0	if (vec $rwrite, fileno $rs->{'fh'}, 1)
1498	0	0	if ($n <= 0)
1502	0	0	if ($rs->{'logLevel'} >= 10)
1526	0	0	if $str eq ''