Branch Coverage

blib/lib/DBIx/BatchChunker.pm
Criterion Covered Total %
branch 154 190 81.0


line true false branch
248 521 165 unless ($self->_has_dbic_retry_opts)
249 76 445 if $method eq "txn"
261 46 119 $method eq 'txn' ? :
487 34 12 if not $id_name or $id_name =~ /\./ or not defined $self->rs
704 80 624 if $self->_use_bignums
711 161 428 unless defined $val
712 0 428 if &blessed($val) or not &PerlSafeInt()->check($val)
718 122 1750 unless defined $val
719 2 1748 if &blessed($val) or not &PerlSafeInt()->check($val)
723 535 89 if (my $ls = $self->loop_state)
726 535 3210 unless defined $val
727 4 3206 if &blessed($val) or not &PerlSafeInt()->check($val)
731 4 620 if $set_bignums
737 0 4 unless $is_on
742 4 8 unless defined $val
743 2 6 if &blessed($val)
749 2 2 unless $ls
752 2 12 unless defined $val
753 0 12 if &blessed($val)
979 15 14 if ($self->rsc) { }
5 9 elsif ($self->dbic_storage) { }
1021 0 29 unless defined $min_id and defined $max_id
1025 2 27 if ($self->_check_bignums($min_id, $max_id)) { }
1092 30 1 if (defined $self->min_id and defined $self->max_id)
1104 1 30 unless ($count)
1109 1 29 if ($self->verbose)
1126 475 130 unless defined $ls->start
1135 0 605 unless $self->_process_past_max_checker
1138 103 502 unless $self->_process_block
1144 502 0 if $self->sleep
1156 0 30 unless ($progress->silent)
1183 93 512 if ($count_stmt and defined $self->dbic_storage) { }
109 403 elsif ($count_stmt) { }
242 161 elsif (defined $rs) { }
1185 28 65 @$count_stmt == 1 ? :
1194 72 37 @$count_stmt == 1 ? :
1211 76 529 if $self->_check_bignums($chunk_count)
1214 103 502 unless $self->_chunk_count_checker
1220 211 291 if (my $stmt = $self->stmt) { }
230 61 elsif (defined $rs and $coderef) { }
1222 60 151 @$stmt > 2 ? :
1223 60 151 @$stmt > 2 ? :
1228 67 144 if ($self->single_rows and $coderef) { }
1230 44 23 if ($self->dbic_storage) { }
1253 51 93 if ($self->dbic_storage) { }
1260 5 46 if $self->coderef
1270 10 83 if $self->coderef
1278 78 152 if ($self->single_rows) { }
1322 525 80 unless $self->process_past_max
1323 74 6 unless $ls->end >= $self->max_id
1326 0 6 unless (defined $self->rsc or $self->max_stmt)
1333 0 6 if $self->verbose
1335 6 0 if (defined(my $rsc = $self->rsc)) { }
0 0 elsif ($self->dbic_storage) { }
1353 2 4 if $self->_check_bignums($new_max_id)
1355 0 6 if (not $new_max_id or $new_max_id eq '0E0') { }
2 4 elsif ($new_max_id > $self->max_id) { }
4 0 elsif ($new_max_id == $self->max_id) { }
1357 0 0 if $self->verbose
1365 0 2 if $self->verbose
1372 0 4 if $self->verbose
1376 0 0 if $self->verbose
1404 429 176 if ($self->min_chunk_percent <= 0 or not defined $ls->chunk_count)
1412 3 173 if ($ls->chunk_count == 0 and $self->min_chunk_percent > 0) { }
12 161 elsif ($ls->end - $ls->start <= 0) { }
25 136 elsif ($chunk_percent > 1 + $self->min_chunk_percent) { }
0 136 elsif ($ls->checked_count > 10) { }
8 128 elsif ($ls->end >= $self->max_id) { }
75 53 elsif ($chunk_percent < $self->min_chunk_percent) { }
1430 9 3 if ($ls->chunk_count > 1)
1447 25 0 if not defined $lr->{'max'} or $ls->multiplier_range < $lr->{'max'}
1450 6 19 defined $lr->{'min'} ? :
1480 75 0 if not defined $lr->{'min'} or $ls->multiplier_range > $lr->{'min'}
1482 0 75 defined $lr->{'max'} ? :
1505 392 110 unless $self->target_time
1506 0 110 unless $ls->chunk_size and $ls->prev_runtime
1521 76 34 if @$timings > 5
1530 24 86 if ($adjust_factor > 1.05) { }
86 0 elsif ($adjust_factor < 0.95) { }
1533 20 4 unless $ttl >= 5
1534 0 4 if &any(sub { $_->{'runtime'} >= $self->target_time; } , @$timings)
1542 21 65 unless $ls->prev_runtime > $self->target_time
1544 0 65 $ls->prev_runtime < $self->target_time * 3 ? :
1549 65 0 if $new_target_chunk_size < 1
1554 64 5 if $new_target_chunk_size == $ls->chunk_size
1555 0 5 if $new_target_chunk_size < 1
1558 0 5 if ($self->verbose)
1574 4 1 if $adjective eq "fast"
1590 0 505 if $ls->end > $self->max_id
1604 591 14 unless $self->verbose
1618 14 0 if ($ls->start < 1000000000 and $ls->end < 1000000000) { }
1633 14 0 if $ls->chunk_count
1638 5 9 if ($action eq "processed")
1639 5 0 $sleep ? :
1653 0 14 if ($ls->start > 1000000000 or $ls->end > 1000000000)