Branch Coverage

blib/lib/Test/Smoke/Database/Graph.pm
Criterion Covered Total %
branch 0 104 0.0


line true false branch
87 0 0 unless (-e $$self{'DIR'})
88 0 0 unless (mkdir $$self{'DIR'}, 493)
104 0 0 if $$self{'LIMIT'}
108 0 0 unless $st->execute
109 0 0 if $l[2]
120 0 0 if $#l2 < 2
125 0 0 unless $my_graph->set('title', '% of successful make test for ' . $os . ' each month', 'y_max_value', 100, 'y_tick_number', 10, 'x_label_skip', $#l2 / 8, 'legend_spacing', 40, 'axis_space', 20, 't_margin', 40, 'b_margin', 10, 'box_axis', 0, 'dclrs', ['dpurple'], 'transparent', 0)
150 0 0 if $$self{'LIMIT'}
155 0 0 unless $my_graph->set('title', '% of successful make test each month', 'y_max_value', 100, 'y_tick_number', 10, 'x_label_skip', 3, 'legend_spacing', 40, 'axis_space', 20, 't_margin', 40, 'b_margin', 10, 'box_axis', 0, 'dclrs', ['black'], 'transparent', 0)
180 0 0 if $$self{'LIMIT'}
185 0 0 unless $my_graph->set('y_label', 'make test run', 'title', 'make test run/pass all tests each month', 'y_max_value', 40000, 'y_tick_number', 10, 'x_label_skip', 3, 'types', ['lines', 'area'], 'shadowclr', 'dred', 'transparent', 0, 'legend_spacing', 30, 'dclrs', ['red', 'dblue'], 'axis_space', 20, 't_margin', 50, 'b_margin', 20, 'box_axis', 0)
212 0 0 if $$self{'LIMIT'}
216 0 0 if (not ref $$ref[1] or ref($$ref[1] ne 'ARRAY'))
224 0 0 unless $my_graph->set('title', 'Number of configure run by os', 'y_max_value', $my, 'y_tick_number', 5, 'show_values', 1, 'x_label_skip', 1, 'y_label_position', 0, 'axis_space', 20, 'shadowclr', 'dred', 'shadow_depth', 4, 'transparent', 0, 'bar_spacing', 10, 'legend_spacing', 40, 't_margin', 35, 'box_axis', 0)
250 0 0 if $$self{'LIMIT'}
254 0 0 if (not ref $$ref[1] or ref($$ref[1] ne 'ARRAY'))
262 0 0 unless $my_graph->set('title', 'Number of smoke run by os', 'y_max_value', $my, 'y_tick_number', 10, 'show_values', 1, 'x_label_skip', 1, 'y_label_position', 0, 'axis_space', 20, 'shadowclr', 'dred', 'shadow_depth', 4, 'transparent', 0, 'bar_spacing', 10, 'legend_spacing', 40, 't_margin', 35, 'box_axis', 0)
288 0 0 if $$self{'LIMIT'}
293 0 0 unless $my_graph->set('title', 'Number of distinct smoke machine each month', 'y_max_value', 50, 'y_tick_number', 10, 'x_label_skip', 3, 'y_label_position', 0, 'axis_space', 20, 'shadowclr', 'dred', 'shadow_depth', 4, 'transparent', 0, 'bar_spacing', 10, 'legend_spacing', 40, 't_margin', 35, 'box_axis', 0)
319 0 0 if $$self{'LIMIT'}
324 0 0 unless $my_graph->set('title', 'Average % of successful make test by os', 'y_max_value', 100, 'y_tick_number', 10, 'show_values', 1, 'x_label_skip', 1, 'y_label_position', 0, 'axis_space', 20, 'shadowclr', 'dred', 'shadow_depth', 4, 'transparent', 0, 'bar_spacing', 10, 'legend_spacing', 40, 't_margin', 35, 'box_axis', 0)
351 0 0 if $debug
354 0 0 if $ref2 != 0
357 0 0 unless $ok
358 0 0 unless $data = 'GD::Graph::Data'->new($data)
364 0 0 unless $my_graph->plot($data)
365 0 0 if $debug
373 0 0 unless my $chart = shift()
374 0 0 unless my $name = shift()
375 0 0 unless $name and $chart
377 0 0 unless open OUT, ">$name.png"
391 0 0 if $debug
393 0 0 if $debug
395 0 0 if $limit and $$_[1] < $limit or not $$_[1] || $$_[0]
400 0 0 if $debug
410 0 0 if $$self{'opts'}{'debug'}
411 0 0 unless open STATS, ">$mt.html"
432 0 0 unless my $content = get('http://testers.cpan.org/search?request=by-config')
440 0 0 if $i == 0
442 0 0 if --$i == $#content2
444 0 0 if (m[]*>(.*).*(\d*)])
448 0 0 if ($i == 4 and $val) { }
0 0 elsif ($i == 3 and $val) { }
0 0 elsif ($i == 2 and $val) { }
0 0 elsif ($i == 1 and $val) { }
453 0 0 if $i == 1
455 0 0 unless $perl and $os and $osver and $archi and $num
464 0 0 if ($$ref[0] eq '5.008') { }
0 0 elsif ($$ref[0] eq '5.006_01') { }
0 0 elsif ($$ref[0] eq '5.005_03') { }
492 0 0 if ($perl{$r} < 2)
504 0 0 unless $my_graph->set('title', $title, 'show_values', 1, 'axis_space', 20, 't_margin', 40, 'b_margin', 20, 'box_axis', 0, 'transparent', 0, 'shadowclr', 'dred', 'legend_spacing', 40, 'shadow_depth', 4, 'transparent', 0, 'bar_spacing', 20, 'values_format', '%2.1f %%')