Condition Coverage

blib/lib/DeltaX/Database.pm
Criterion Covered Total %
condition 0 241 0.0


and 3 conditions

line !l l&&!r l&&r condition
144 0 0 0 not $self->{'conn'} and $self->{'trace'}
287 0 0 0 scalar @ret_array and grep {$self->{'driver'} eq $_;} 'Oracle', 'Informix', 'mssql', 'DB2', 'Solid'
288 0 0 0 $#ret_array < 0 and grep {$self->{'driver'} eq $_;} 'mssql', 'DB2', 'Solid'
0 0 0 $#ret_array < 0 and grep {$self->{'driver'} eq $_;} 'mssql', 'DB2', 'Solid' and not $statement->err
290 0 0 0 $#ret_array < 0 and $statement->err || $ret_rows
305 0 0 0 $self->{'driver'} eq 'Informix' and $self->{'imix_number_correct'}
353 0 0 0 not $self->{'statements'}{$statement_name}[2] and $self->{'statements'}{$statement_name}[1]
416 0 0 0 grep {$self->{'driver'} eq $_;} 'mssql', 'DB2', 'Solid' and not $DeltaX::Database::Derror_message
0 0 0 grep {$self->{'driver'} eq $_;} 'mssql', 'DB2', 'Solid' and not $DeltaX::Database::Derror_message and $result eq '-1'
432 0 0 0 $self->{'driver'} eq 'Oracle' and not $ret_rows
435 0 0 0 grep {$self->{'driver'} eq $_;} 'mssql', 'DB2', 'Solid' and $ret_rows < 0
444 0 0 0 not $cur_ref and $statement->err || $ret_rows
459 0 0 0 $self->{'driver'} eq 'Informix' and not $ret_rows
490 0 0 0 exists $self->{'cursors'}{$cursor_name} and defined $self->{'cursors'}{$cursor_name}
538 0 0 0 $self->{'driver'} eq 'Informix' and $self->{'imix_number_correct'}
584 0 0 0 exists $self->{'cursors'}{$cursor_name} and defined $self->{'cursors'}{$cursor_name}
696 0 0 0 exists $self->{'statements'}{$statement_name} and defined $self->{'statements'}{$statement_name}
706 0 0 0 not $self->{'statements'}{$statement_name}[2] and $self->{'statements'}{$statement_name}[1]
755 0 0 0 $#ret_array < 0 and $statement->err || $num_rows
796 0 0 0 $self->{'driver'} eq 'Informix' and $self->{'imix_number_correct'}
921 0 0 0 $self->{'driver'} eq 'mysql' and $result eq '0E0'
962 0 0 0 $self->{'driver'} eq 'mysql' and $result eq '0E0'
1027 0 0 0 $self->{'trace'} and not $result
1065 0 0 0 $self->{'use_sequences'} and $self->{'driver'} eq 'Informix'
1161 0 0 0 defined $idatetime and $idatetime eq '?' || $idatetime eq '??'
1191 0 0 0 defined $idatetime and not $idatetime =~ /!/
1255 0 0 0 not $year % 100 and $year % 1000
1290 0 0 0 $t and $hour < 0 || $hour > 23 || $min < 0 || $min > 59 || $sec < 0 || $sec > 59
1460 0 0 0 grep(('Sybase' eq $_), @drv_arr) and $driver eq 'mssql'
1472 0 0 0 $driver and get_driver($driver)
1475 0 0 0 $driver ne 'Oracle' and $driver ne 'mssql'
0 0 0 $driver ne 'Oracle' and $driver ne 'mssql' and $driver ne 'Solid'
1477 0 0 0 $driver eq 'Informix' and not $source =~ /@/
1747 0 0 0 $DeltaX::Database::Dsqlstatus eq '7' and $DeltaX::Database::Derror_message =~ /(Relation|relation|table) .* does not exist/
0 0 0 $DeltaX::Database::Dsqlstatus eq '7' and $DeltaX::Database::Derror_message =~ /(R|r)elation .* already exists/
0 0 0 $DeltaX::Database::Dsqlstatus eq '7' and $DeltaX::Database::Derror_message =~ /duplicate key/
0 0 0 $DeltaX::Database::Dsqlstatus eq '7' and $DeltaX::Database::Derror_message =~ /(Namespace|Schema|schema) .* does not exist/
0 0 0 $DeltaX::Database::Dsqlstatus eq '7' and $DeltaX::Database::Derror_message =~ /(namespace|schema) .* already exists/
1764 0 0 0 $DeltaX::Database::Dsqlstatus eq '-204' and $DeltaX::Database::Derror_message =~ /"[^\.]+\.[^\.]+"/
0 0 0 $DeltaX::Database::Dsqlstatus eq '-99999' and $DeltaX::Database::Derror_message =~ /CLI0125E/
0 0 0 $DeltaX::Database::Dsqlstatus eq '-601' and $DeltaX::Database::Derror_message =~ /type "TABLE"/
0 0 0 $DeltaX::Database::Dsqlstatus eq '-204' and $DeltaX::Database::Derror_message =~ /"[^\.]+"/
0 0 0 $DeltaX::Database::Dsqlstatus eq '-601' and $DeltaX::Database::Derror_message =~ /type "SCHEMA"/

or 2 conditions

line l !l condition
1389 0 0 shift() || (return wantarray ? () : undef)
1641 0 0 $name || ''
1717 0 0 $self->{'stat_all'}{'total_time'} || 0
1718 0 0 $self->{'stat_all'}{'total_comm'} || 0
1719 0 0 $self->{'stat_all'}{'total_err'} || 0

or 3 conditions

line l !l&&r !l&&!r condition
215 0 0 0 not $self->{'autocommit'} or $self->{'transaction'}
216 0 0 0 $type_f or not $self->{'transaction'}
290 0 0 0 $statement->err || $ret_rows
444 0 0 0 $statement->err || $ret_rows
655 0 0 0 $sqlc_tmp[$i] eq '!' or uc $sqlc_tmp[$i] eq '?B'
755 0 0 0 $statement->err || $num_rows
1161 0 0 0 $idatetime eq '?' || $idatetime eq '??'
1204 0 0 0 not defined $idatetime or $idatetime ne '!'
1251 0 0 0 $mon == 0 or $year < 1000
1255 0 0 0 $mon == 1 or $mon == 3
0 0 0 $mon == 1 or $mon == 3 or $mon == 5
0 0 0 $mon == 1 or $mon == 3 or $mon == 5 or $mon == 7
0 0 0 $mon == 1 or $mon == 3 or $mon == 5 or $mon == 7 or $mon == 8
0 0 0 $mon == 1 or $mon == 3 or $mon == 5 or $mon == 7 or $mon == 8 or $mon == 10
0 0 0 $mon == 1 or $mon == 3 or $mon == 5 or $mon == 7 or $mon == 8 or $mon == 10 or $mon == 12
0 0 0 $mon == 4 or $mon == 6
0 0 0 $mon == 4 or $mon == 6 or $mon == 9
0 0 0 $mon == 4 or $mon == 6 or $mon == 9 or $mon == 11
0 0 0 $year % 4 or not $year % 100 and $year % 1000
1289 0 0 0 $mon < 1 or $mon > 12
0 0 0 $mon < 1 or $mon > 12 or $day < 1
1290 0 0 0 $hour < 0 || $hour > 23 || $min < 0 || $min > 59 || $sec < 0 || $sec > 59
1685 0 0 0 not $self->{'stat_all'}{'all'} or scalar @{$self->{'stat_all'}{'all'};} < $self->{'stat_max_all'}
1737 0 0 0 $teste eq 'TABLE_NOTEXIST' or $teste eq '1'
0 0 0 $teste eq 'TABLE_EXIST' or $teste eq '2'
0 0 0 $teste eq 'REC_EXIST' or $teste eq '3'
0 0 0 $teste eq 'SCHEMA_NOTEXIST' or $teste eq '4'
0 0 0 $teste eq 'SCHEMA_EXIST' or $teste eq '5'
1754 0 0 0 $DeltaX::Database::Dsqlstatus eq '942' or $DeltaX::Database::Dsqlstatus eq '4043'
1764 0 0 0 $DeltaX::Database::Dsqlstatus eq '-204' and $DeltaX::Database::Derror_message =~ /"[^\.]+\.[^\.]+"/ or $DeltaX::Database::Dsqlstatus eq '-99999' and $DeltaX::Database::Derror_message =~ /CLI0125E/
1772 0 0 0 $DeltaX::Database::Dsqlstatus eq '1051' or $DeltaX::Database::Dsqlstatus eq '1146'
1777 0 0 0 $DeltaX::Database::Dsqlstatus eq '3701' or $DeltaX::Database::Dsqlstatus eq '208'
1782 0 0 0 $DeltaX::Database::Dsqlstatus eq '10005' or $DeltaX::Database::Dsqlstatus eq '10033'
0 0 0 $DeltaX::Database::Dsqlstatus eq '13141' or $DeltaX::Database::Dsqlstatus eq '13046'