[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi (r1.58) removed --- Log message: force testers to switch --- Diffs of the changes: (+0 -0) 0 files changed ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.57 - 1.58 --- Log message: revert to old until security issues are addressed --- Diffs of the changes: (+49 -2) NightlyTestAccept.cgi | 51 -- 1 files changed, 49 insertions(+), 2 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.57 nightlytest-serverside/NightlyTestAccept.cgi:1.58 --- nightlytest-serverside/NightlyTestAccept.cgi:1.57 Fri Sep 8 19:26:26 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiSat Sep 9 14:28:15 2006 @@ -792,6 +792,39 @@ $program_hash{$key}=1; } +my ($num_removed, $num_added, $num_new_passing, $num_new_failing)=0; +my ($removed, $added, $passing, $failing) = ; +my $j = $dbh-prepare(SELECT program, measure, result FROM tests WHERE . + night=$prev_night); +$j-execute; +while(my @row=$j-fetchrow_array){ +my $key = $row[1]. - .$row[0]; +if($result_hash{$key} and $result_hash{$key} ne $row[2] and + $row[2] eq PASS){ + $failing .= changed: from $row[2] to $result_hash{$key} - $key\n; + $num_new_failing++; +} +if($result_hash{$key} and $result_hash{$key} ne $row[2] and + $result_hash{$key} eq PASS ){ +$passing .= changed: from $row[2] to $result_hash{$key} - $key\n; +$num_new_passing++; +} + +if(!$program_hash{$key}){ +$removed .= REMOVED: $key\n; +$num_removed++; +} +else{ +$program_hash{$key}++; +} +} +foreach $x(keys(%program_hash)){ +if($program_hash{$x}==1){ +$added .= ADDED: $x\n; +$num_added++; +} +} + # # Sending email to nightly test email archive @@ -804,9 +837,23 @@ $email .= Nickname: $nickname\n; $email .= Buildstatus: $buildstatus\n; - if($buildstatus eq OK) { - $email .= `php -q Emailreport.php $machine_id $night_id`; + if ($passing eq ) { +$passing = None; + } + $email .= \nNew Test Passes: $passing\n; + if ($failing eq ) { +$failing = None; + } + $email .= \nNew Test Failures: $failing\n; + if ($added eq ) { +$added = None; + } + $email .= \nAdded Tests: $added\n; + if ($removed eq ) { +$removed= None; + } + $email .= \nRemoved Tests: $removed\n; $email .= \nSignificant changes in test results:\n; foreach my $meas(keys(%output_big_changes)){ ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi test.php
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.55 - 1.56 test.php updated: 1.25 - 1.26 --- Log message: reuse code for e-mail report #13 --- Diffs of the changes: (+3 -50) NightlyTestAccept.cgi | 51 +- test.php |2 - 2 files changed, 3 insertions(+), 50 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.55 nightlytest-serverside/NightlyTestAccept.cgi:1.56 --- nightlytest-serverside/NightlyTestAccept.cgi:1.55 Fri Sep 8 14:45:37 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Sep 8 18:54:52 2006 @@ -792,39 +792,6 @@ $program_hash{$key}=1; } -my ($num_removed, $num_added, $num_new_passing, $num_new_failing)=0; -my ($removed, $added, $passing, $failing) = ; -my $j = $dbh-prepare(SELECT program, measure, result FROM tests WHERE . - night=$prev_night); -$j-execute; -while(my @row=$j-fetchrow_array){ -my $key = $row[1]. - .$row[0]; -if($result_hash{$key} and $result_hash{$key} ne $row[2] and - $row[2] eq PASS){ - $failing .= changed: from $row[2] to $result_hash{$key} - $key\n; - $num_new_failing++; -} -if($result_hash{$key} and $result_hash{$key} ne $row[2] and - $result_hash{$key} eq PASS ){ -$passing .= changed: from $row[2] to $result_hash{$key} - $key\n; -$num_new_passing++; -} - -if(!$program_hash{$key}){ -$removed .= REMOVED: $key\n; -$num_removed++; -} -else{ -$program_hash{$key}++; -} -} -foreach $x(keys(%program_hash)){ -if($program_hash{$x}==1){ -$added .= ADDED: $x\n; -$num_added++; -} -} - # # Sending email to nightly test email archive @@ -837,23 +804,9 @@ $email .= Nickname: $nickname\n; $email .= Buildstatus: $buildstatus\n; + if($buildstatus eq OK) { - if ($passing eq ) { -$passing = None; - } - $email .= \nNew Test Passes: $passing\n; - if ($failing eq ) { -$failing = None; - } - $email .= \nNew Test Failures: $failing\n; - if ($added eq ) { -$added = None; - } - $email .= \nAdded Tests: $added\n; - if ($removed eq ) { -$removed= None; - } - $email .= \nRemoved Tests: $removed\n; + $email .= `php Emailreport.php $machine_id $night_id`; $email .= \nSignificant changes in test results:\n; foreach my $meas(keys(%output_big_changes)){ Index: nightlytest-serverside/test.php diff -u nightlytest-serverside/test.php:1.25 nightlytest-serverside/test.php:1.26 --- nightlytest-serverside/test.php:1.25Fri Sep 8 17:56:22 2006 +++ nightlytest-serverside/test.php Fri Sep 8 18:54:52 2006 @@ -218,7 +218,7 @@ if($delta_exppass==0 $delta_expfail==0 $delta_unexpfail==0 strcmp($unexpected_failures,)===0){ $disp=none; -$sign=(-); + $sign=(-); } else{ $disp=; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.56 - 1.57 --- Log message: reuse code for e-mail report #17 --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.56 nightlytest-serverside/NightlyTestAccept.cgi:1.57 --- nightlytest-serverside/NightlyTestAccept.cgi:1.56 Fri Sep 8 18:54:52 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Sep 8 19:26:26 2006 @@ -806,7 +806,7 @@ if($buildstatus eq OK) { - $email .= `php Emailreport.php $machine_id $night_id`; + $email .= `php -q Emailreport.php $machine_id $night_id`; $email .= \nSignificant changes in test results:\n; foreach my $meas(keys(%output_big_changes)){ ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.52 - 1.53 --- Log message: Changed the nightly test accept script to send out emails with new/removed/ fixed/broken tests listed. --- Diffs of the changes: (+35 -27) NightlyTestAccept.cgi | 62 -- 1 files changed, 35 insertions(+), 27 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.52 nightlytest-serverside/NightlyTestAccept.cgi:1.53 --- nightlytest-serverside/NightlyTestAccept.cgi:1.52 Fri Aug 18 16:40:04 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiTue Aug 22 12:31:26 2006 @@ -655,8 +655,9 @@ @ALL_TESTS= split \n, $all_tests; foreach my $x (@ALL_TESTS){ - if($x =~ m/(TEST-)?(PASS|XFAIL|FAIL):\s(.+?)\s(.+)/){ -$query=INSERT INTO tests ( program, result, measure, night) VALUES(\$4\, \'$2\', \$3\, $night_id); + if($x =~ m/(TEST-)?(XPASS|PASS|XFAIL|FAIL):\s(.+?)\s(.+)/){ +$query=INSERT INTO tests ( program, result, measure, night) . + VALUES(\$4\, \'$2\', \$3\, $night_id); my $d = $dbh-prepare($query); $d-execute; } @@ -666,8 +667,9 @@ } foreach my $x (@DEJAGNUTESTS_RESULTS){ - if($x =~ m/^(PASS|XFAIL|FAIL):\s(.+)/){ - $query=INSERT INTO tests ( program, result, measure, night) VALUES(\$2\, \'$1\', \dejagnu\, $night_id); + if($x =~ m/^(XPASS|PASS|XFAIL|FAIL):\s(.+):?/){ + $query=INSERT INTO tests ( program, result, measure, night) . + VALUES(\$2\, \'$1\', \dejagnu\, $night_id); my $d = $dbh-prepare($query); $d-execute; } @@ -685,7 +687,8 @@ @nights = GetMachineNights $machine_id; $length = @nights; print DB date : $db_date\n; -print Machine $machine_id now has ids [EMAIL PROTECTED] associated with it in the database\n; +print Machine $machine_id now has ids [EMAIL PROTECTED] . + associated with it in the database\n; # @@ -694,7 +697,8 @@ # adds very useful information to the nightly test email. # -$query = select id from night where id$night_id and machine=$machine_id and buildstatus=\OK\ order by id desc; +$query = select id from night where id$night_id and machine=$machine_id and . + buildstatus=\OK\ order by id desc; my $g = $dbh-prepare($query); $g-execute; $row = $g-fetchrow_hashref; @@ -751,11 +755,13 @@ if($perc 5 || $perc -5){ if( ! exists $output_big_changes{$x} ){ my $rounded_perc = sprintf(%1.2f, $perc); -$output_big_changes{$x}[0]=$prog: $rounded_perc\% ($value_old = $value_new)\n; +$output_big_changes{$x}[0]= + $prog: $rounded_perc\% ($value_old = $value_new)\n; } else{ my $rounded_perc = sprintf(%1.2f, $perc); -push(@{ $output_big_changes{$x} },$prog ($x) changed \%$rounded_perc ($value_old = $value_new)\n); +push(@{ $output_big_changes{$x} }, + $prog ($x) changed \%$rounded_perc ($value_old = $value_new)\n); } #end else }# end if $perc is acceptable }# end foreach measure taken @@ -766,14 +772,16 @@ # Determining changes in new tests and old tests # -my $d = $dbh-prepare(SELECT id FROM night WHERE machine=38 and buildstatus=\OK\ order by added desc); +my $d = $dbh-prepare(SELECT id FROM night WHERE machine=38 and . + buildstatus=\OK\ order by added desc); $d-execute; my @row=$d-fetchrow_array; $cur_night=$row[0]; @row=$d-fetchrow_array; $prev_night=$row[0]; -my $c = $dbh-prepare(SELECT program, measure, result FROM tests WHERE night=$cur_night); +my $c = $dbh-prepare(SELECT program, measure, result FROM tests WHERE . + night=$cur_night); $c-execute; %result_hash=(); @@ -786,15 +794,18 @@ my ($num_removed, $num_added, $num_new_passing, $num_new_failing)=0; my ($removed, $added, $passing, $failing) = ; -my $j = $dbh-prepare(SELECT program, measure, result FROM tests WHERE night=$prev_night); +my $j = $dbh-prepare(SELECT program, measure, result FROM tests WHERE . + night=$prev_night); $j-execute; while(my @row=$j-fetchrow_array){ my $key = $row[1]. - .$row[0]; -if($result_hash{$key} and $result_hash{$key} ne $row[2] and $row[2] eq PASS){ +if($result_hash{$key} and $result_hash{$key} ne $row[2] and + $row[2] eq PASS){ $failing .= changed: from $row[2] to $result_hash{$key} - $key\n; $num_new_failing++; } -if($result_hash{$key} and $result_hash{$key} ne $row[2] and $result_hash{$key} eq PASS ){ +if($result_hash{$key} and $result_hash{$key} ne $row[2] and + $result_hash{$key} eq PASS ){
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.48 - 1.49 --- Log message: These changes correctly place dejagnu test results into the database. --- Diffs of the changes: (+12 -15) NightlyTestAccept.cgi | 27 --- 1 files changed, 12 insertions(+), 15 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.48 nightlytest-serverside/NightlyTestAccept.cgi:1.49 --- nightlytest-serverside/NightlyTestAccept.cgi:1.48 Thu Aug 17 17:14:05 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Aug 18 13:02:45 2006 @@ -448,15 +448,14 @@ $build_log= unless $build_log; my @BUILD_LOG = split $spliton, $build_log; +my $dejagnutests_results=param('dejagnutests_results'); + $dejagnutests_results= unless $dejagnutests_results; +my @DEJAGNUTESTS_RESULTS = split $spliton, $dejagnutests_results; + my $dejagnutests_log=param('dejagnutests_log'); $dejagnutests_log= unless $dejagnutests_log; my @DEJAGNUTESTS_LOG = split $spliton, $dejagnutests_log; - -my $dejagnutests_sum=param('dejagnutests_sum'); - $dejagnutests_sum= unless $dejagnutests_sum; -my @DEJAGNUTESTS_SUM = split $spliton, $dejagnutests_sum; - my $singlesource_tests = param('singlesource_programstable'); $singlesource_tests= unless $singlesource_tests; my @SINGLESOURCE_TESTS =split $spliton, $singlesource_tests; @@ -655,7 +654,7 @@ # @ALL_TESTS= split \n, $all_tests; -foreach $x (@ALL_TESTS){ +foreach my $x (@ALL_TESTS){ if($x =~ m/(TEST-)?(PASS|XFAIL|FAIL):\s(.+?)\s(.+)/){ $query=INSERT INTO tests ( program, result, measure, night) VALUES(\$4\, \'$2\', \$3\, $night_id); my $d = $dbh-prepare($query); @@ -666,6 +665,13 @@ } } +foreach my $x (@DEJAGNUTESTS_RESULTS){ + if($x =~ m/^(PASS|XFAIL|FAIL):\s(.+?)/){ + $query=INSERT INTO tests ( program, result, measure, night) VALUES(\$2\, \'$1\', \dejagnu\, $night_id); +my $d = $dbh-prepare($query); +$d-execute; + } +} # @@ -883,15 +889,6 @@ my $build_file = $db_date-Build-Log.txt; my $o_file= $db_date-O-files.txt; my $a_file= $db_date-A-files.txt; -#my $dejagnu_testrun_log_file = Dejagnu-testrun.log; -#my $dejagnu_testrun_sum_file = Dejagnu-testrun.sum; -#my $dejagnu_tests_file = DejagnuTests-Log.txt; -#my $warnings_fie = Warnings.txt; - - WriteFile $build_file, $build_log; WriteFile $o_file, $o_file_size; WriteFile $a_file, $a_file_size; -#WriteFile $this_days_logs/$dejagnu_testrun_log_file,$dejagnutests_log; -#WriteFile $this_days_logs/$dejagnu_testrun_sum_file,$dejagnutests_sum; -#WriteFile $this_days_logs/$warnings_file,$buildwarnings; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.49 - 1.50 --- Log message: Tacked on 8 lines at the end to print out and keep a record of what test machines are sending us. this will be useful in diagnosing what is happing on their ends. --- Diffs of the changes: (+9 -0) NightlyTestAccept.cgi |9 + 1 files changed, 9 insertions(+) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.49 nightlytest-serverside/NightlyTestAccept.cgi:1.50 --- nightlytest-serverside/NightlyTestAccept.cgi:1.49 Fri Aug 18 13:02:45 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Aug 18 16:28:37 2006 @@ -892,3 +892,12 @@ WriteFile $build_file, $build_log; WriteFile $o_file, $o_file_size; WriteFile $a_file, $a_file_size; + +$sentdata=; [EMAIL PROTECTED] = param(); +foreach my $x (@param_names){ + my $value=param($x); + $sentdata.=$x = $value}\n; +} +my $sent_file = $db_date-senddata.txt; +WriteFile $sentdata, $sent_file; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.50 - 1.51 --- Log message: Changed the regular expression that parses the dejagnu test results. --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.50 nightlytest-serverside/NightlyTestAccept.cgi:1.51 --- nightlytest-serverside/NightlyTestAccept.cgi:1.50 Fri Aug 18 16:28:37 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Aug 18 16:33:10 2006 @@ -666,7 +666,7 @@ } foreach my $x (@DEJAGNUTESTS_RESULTS){ - if($x =~ m/^(PASS|XFAIL|FAIL):\s(.+?)/){ + if($x =~ m/^(PASS|XFAIL|FAIL):\s(.+)/){ $query=INSERT INTO tests ( program, result, measure, night) VALUES(\$2\, \'$1\', \dejagnu\, $night_id); my $d = $dbh-prepare($query); $d-execute; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.51 - 1.52 --- Log message: Fixed the call to function WriteFile for writing out what test machines submit. --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.51 nightlytest-serverside/NightlyTestAccept.cgi:1.52 --- nightlytest-serverside/NightlyTestAccept.cgi:1.51 Fri Aug 18 16:33:10 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Aug 18 16:40:04 2006 @@ -900,4 +900,4 @@ $sentdata.=$x = $value}\n; } my $sent_file = $db_date-senddata.txt; -WriteFile $sentdata, $sent_file; +WriteFile $sent_file, $sentdata; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.47 - 1.48 --- Log message: This commit reflects the changes made in the database in the way we store dejagnu test results. Before we stored them as a string in the night table. Now they have their own table where each row is a result. Furthermore, this should now send emails with the correct changes in test information. --- Diffs of the changes: (+303 -265) NightlyTestAccept.cgi | 568 ++ 1 files changed, 303 insertions(+), 265 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.47 nightlytest-serverside/NightlyTestAccept.cgi:1.48 --- nightlytest-serverside/NightlyTestAccept.cgi:1.47 Tue Aug 15 13:04:33 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiThu Aug 17 17:14:05 2006 @@ -88,28 +88,28 @@ # #~~ sub Difference{ - $one = $_[0]; - $two = $_[1]; - - @ONE = split \n, $one; - @TWO = split \n, $two; - - $value=1; - - my %hash_of_diff=(); - foreach $x (@TWO){ - $hash_of_diff{$x}=$value; - } - - $result=; - foreach $x (@ONE){ - if($hash_of_diff{$x}!=$value){ - $result.=$x\n; - } - } - - chomp $result; - return $result; + $one = $_[0]; + $two = $_[1]; + + @ONE = split \n, $one; + @TWO = split \n, $two; + + $value=1; + + my %hash_of_diff=(); + foreach $x (@TWO){ +$hash_of_diff{$x}=$value; + } + + $result=; + foreach $x (@ONE){ +if($hash_of_diff{$x}!=$value){ + $result.=$x\n; +} + } + + chomp $result; + return $result; } #~~ @@ -213,101 +213,100 @@ #$new_tests, $removed_tests, #$cvsaddedfiles, $cvsremovedfiles, $cvsmodifiedfiles, #$cvsusercommitlist, $cvsuserupdatelist, -# $a_file_size, $o_file_size; +# $a_file_size, $o_file_size; # #~~ sub CreateNight{ + for($x=0; $x@_; $x++){ +$_[$x]= unless $_[$x]; + } + + $y=0; + $machine_id=$_[$y]; + $y++; + $db_date=$_[$y]; + $y++; + $buildstatus=$_[$y]; + $y++; + $configtime_cpu=$_[$y]; + $y++; + $configtime_wall=$_[$y]; + $y++; + $cvscheckouttime_cpu=$_[$y]; + $y++; + $cvscheckouttime_wall=$_[$y]; + $y++; + $buildtime_cpu=$_[$y]; + $y++; + $buildtime_wall=$_[$y]; + $y++; + $dejagnutime_cpu=$_[$y]; + $y++; + $dejagnutime_wall=$_[$y]; + $y++; + $warnings=$_[$y]; + $y++; + $warnings_added=$_[$y]; + $y++; + $warnings_removed=$_[$y]; + $y++; + $dejagnu_exp_passes=$_[$y]; + $y++; + $dejagnu_unexp_failures=$_[$y]; + $y++; + $dejagnu_exp_failures=$_[$y]; + $y++; + $all_tests=$_[$y]; + $y++; + $passing_tests=$_[$y]; + $y++; + $unexpfail_tests=$_[$y]; + $y++; + $expfail_tests=$_[$y]; + $y++; + $newly_passing_tests=$_[$y]; + $y++; + $newly_failing_tests=$_[$y]; + $y++; + $new_tests=$_[$y]; + $y++; + $removed_tests=$_[$y]; + $y++; + $cvsaddedfiles=$_[$y]; + $y++; + $cvsremovedfiles=$_[$y]; + $y++; + $cvsmodifiedfiles=$_[$y]; + $y++; + $cvsusercommitlist=$_[$y]; + $y++; + $cvsuserupdatelist=$_[$y]; + $y++; -for($x=0; $x@_; $x++){ - $_[$x]= unless $_[$x]; -} - - $y=0; - $machine_id=$_[$y]; - $y++; - $db_date=$_[$y]; - $y++; - $buildstatus=$_[$y]; - $y++; - $configtime_cpu=$_[$y]; - $y++; - $configtime_wall=$_[$y]; - $y++; - $cvscheckouttime_cpu=$_[$y]; - $y++; - $cvscheckouttime_wall=$_[$y]; - $y++; - $buildtime_cpu=$_[$y]; - $y++; - $buildtime_wall=$_[$y]; - $y++; - $dejagnutime_cpu=$_[$y]; - $y++; - $dejagnutime_wall=$_[$y]; - $y++; - $warnings=$_[$y]; - $y++; - $warnings_added=$_[$y]; - $y++; - $warnings_removed=$_[$y]; - $y++; - $dejagnu_exp_passes=$_[$y]; - $y++; - $dejagnu_unexp_failures=$_[$y]; - $y++; - $dejagnu_exp_failures=$_[$y]; - $y++; - $all_tests=$_[$y]; - $y++; - $passing_tests=$_[$y]; - $y++; - $unexpfail_tests=$_[$y]; - $y++; - $expfail_tests=$_[$y]; - $y++; - $newly_passing_tests=$_[$y]; - $y++; - $newly_failing_tests=$_[$y]; - $y++; - $new_tests=$_[$y]; - $y++; - $removed_tests=$_[$y]; - $y++; - $cvsaddedfiles=$_[$y]; - $y++; - $cvsremovedfiles=$_[$y]; - $y++; - $cvsmodifiedfiles=$_[$y]; - $y++; - $cvsusercommitlist=$_[$y]; - $y++; - $cvsuserupdatelist=$_[$y]; - $y++; - - + -
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.46 - 1.47 --- Log message: We now only consider previous tests with a buildstatus that is OK. --- Diffs of the changes: (+3 -2) NightlyTestAccept.cgi |5 +++-- 1 files changed, 3 insertions(+), 2 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.46 nightlytest-serverside/NightlyTestAccept.cgi:1.47 --- nightlytest-serverside/NightlyTestAccept.cgi:1.46 Mon Aug 14 14:20:30 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiTue Aug 15 13:04:33 2006 @@ -589,7 +589,8 @@ # or their equivalent. # -my $d = $dbh-prepare(select * from night where machine = $machine_id ORDER BY added DESC); +my $d = $dbh-prepare(select * from night where machine = $machine_id . + and buildstatus=\OK\ ORDER BY added DESC); $d-execute; my $row=$d-fetchrow_hashref; $yesterdays_tests = $row-{'all_tests'}; @@ -697,7 +698,7 @@ # adds very useful information to the nightly test email. # -$query = select id from night where id$night_id and machine=$machine_id order by id desc; +$query = select id from night where id$night_id and machine=$machine_id and buildstatus=\OK\ order by id desc; my $g = $dbh-prepare($query); $g-execute; $row = $g-fetchrow_hashref; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.44 - 1.45 --- Log message: When a test program changes status from pass to fail or vice versa it will no longer incorreclty be adeded to the list of new tests and removed tests --- Diffs of the changes: (+19 -5) NightlyTestAccept.cgi | 24 +++- 1 files changed, 19 insertions(+), 5 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.44 nightlytest-serverside/NightlyTestAccept.cgi:1.45 --- nightlytest-serverside/NightlyTestAccept.cgi:1.44 Fri Aug 11 12:13:35 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiMon Aug 14 01:56:59 2006 @@ -597,20 +597,34 @@ $yesterdays_fails = $row-{'unexpfail_tests'}; $yesterdays_xfails = $row-{'expfail_tests'}; if($yesterdays_passes ne ){ - $newly_passing_tests = Difference $passing_tests, $yesterdays_passes; + $newly_passing_tests = Difference $passing_tests, $yesterdays_passes; } else{ $newly_passing_tests=; } if($yesterdays_xfails ne and $yesterdays_fails ne ){ - $newly_failing_tests = Difference $expfail_tests.\n.$unexpfail_tests, - $yesterdays_xfails.\n.$yesterdays_fails; + $newly_failing_tests = Difference $expfail_tests.\n.$unexpfail_tests, +$yesterdays_xfails.\n.$yesterdays_fails; } else{ $newly_failing_tests=; } +# The tests are stored in the database as a string with each test being +# seperated by a newline. Each test is prefixed with either PASS, +# FAIL, and XFAIL. If a test changes from pass to fail, this will +# cause us to think its a new test because its entry no longer matches +# the corresponding entry from the previous day. Therefore, we create a +# different list that does not contain these words. +$temp_test_list_today = $all_tests; +$temp_test_list_today =~ s/PASS//g; +$temp_test_list_today =~ s/FAIL//g; +$temp_test_list_today =~ s/XFAIL//g; +$temp_test_list_yesterday = $yesterdays_tests; +$temp_test_list_yesterday = s/PASS//g; +$temp_test_list_yesterday = s/FAIL//g; +$temp_test_list_yesterday = s/XFAIL//g; if($yesterdays_tests ne ){ - $new_tests = Difference $all_tests, $yesterdays_tests; + $new_tests = Difference $temp_test_list_today, $temp_test_list_yesterday; } else{ $new_tests=; } if($all_tests ne ){ - $removed_tests = Difference $yesterdays_tests, $all_tests; + $removed_tests = Difference $temp_test_list_yesterday, $temp_test_list_today; } else{ $removed_tests=; } ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.45 - 1.46 --- Log message: Changed around how lists of added and removed tests are created. --- Diffs of the changes: (+6 -6) NightlyTestAccept.cgi | 12 ++-- 1 files changed, 6 insertions(+), 6 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.45 nightlytest-serverside/NightlyTestAccept.cgi:1.46 --- nightlytest-serverside/NightlyTestAccept.cgi:1.45 Mon Aug 14 01:56:59 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiMon Aug 14 14:20:30 2006 @@ -612,13 +612,13 @@ # the corresponding entry from the previous day. Therefore, we create a # different list that does not contain these words. $temp_test_list_today = $all_tests; -$temp_test_list_today =~ s/PASS//g; -$temp_test_list_today =~ s/FAIL//g; -$temp_test_list_today =~ s/XFAIL//g; +$temp_test_list_today =~ s/PASS\://g; +$temp_test_list_today =~ s/XFAIL\://g; +$temp_test_list_today =~ s/FAIL\://g; $temp_test_list_yesterday = $yesterdays_tests; -$temp_test_list_yesterday = s/PASS//g; -$temp_test_list_yesterday = s/FAIL//g; -$temp_test_list_yesterday = s/XFAIL//g; +$temp_test_list_yesterday = s/PASS\://g; +$temp_test_list_yesterday = s/XFAIL\://g; +$temp_test_list_yesterday = s/FAIL\://g; if($yesterdays_tests ne ){ $new_tests = Difference $temp_test_list_today, $temp_test_list_yesterday; } ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.43 - 1.44 --- Log message: Changed the format of significant changes in the nightly emails --- Diffs of the changes: (+2 -2) NightlyTestAccept.cgi |4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.43 nightlytest-serverside/NightlyTestAccept.cgi:1.44 --- nightlytest-serverside/NightlyTestAccept.cgi:1.43 Thu Aug 10 17:30:29 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Aug 11 12:13:35 2006 @@ -742,7 +742,7 @@ if($perc 5 || $perc -5){ if( ! exists $output_big_changes{$x} ){ my $rounded_perc = sprintf(%1.2f, $perc); -$output_big_changes{$x}[0]=$prog ($x) changed \%$rounded_perc ($value_old = $value_new)\n; +$output_big_changes{$x}[0]=$prog: $rounded_perc\% ($value_old = $value_new)\n; } else{ my $rounded_perc = sprintf(%1.2f, $perc); @@ -793,7 +793,7 @@ foreach my $meas(keys(%output_big_changes)){ $email.= $meas:\n; foreach my $x(@{ $output_big_changes{$meas} } ){ - $email.= --- $x; + $email.= $x; } } } ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.41 - 1.42 --- Log message: The nightly test results emails sent to the testresults email list should now contain a list of tests with significant changes. --- Diffs of the changes: (+85 -1) NightlyTestAccept.cgi | 86 +- 1 files changed, 85 insertions(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.41 nightlytest-serverside/NightlyTestAccept.cgi:1.42 --- nightlytest-serverside/NightlyTestAccept.cgi:1.41 Fri Aug 4 12:33:24 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiThu Aug 10 13:26:13 2006 @@ -664,7 +664,7 @@ # -# Adding lines of code +# Adding lines of code to the database # UpdateCodeInfo $db_date, $loc, $filesincvs, $dirsincvs; @@ -678,6 +678,82 @@ # +# building hash of arrays of signifigant changes to place into the nightly +# test results email. This is ugly code and is somewhat of a hack. However, it +# adds very useful information to the nightly test email. +# + +$query = select id from night where id$night_id and machine=$machine_id order by id desc; +my $g = $dbh-prepare($query); +$g-execute; +$row = $g-fetchrow_hashref; +$prev_night=$row-{'id'}; + +$query = select * from program where night=$night_id; +my $e = $dbh-prepare($query); +$e-execute; +%prog_hash_new=(); +while ($row=$e-fetchrow_hashref){ +$prog_hash_new{$row-{'program'}}=$row-{'result'}; +} + +$query = select * from program where night=$prev_night; +my $f = $dbh-prepare($query); +$f-execute; +%prog_hash_old=(); +while ($row=$f-fetchrow_hashref){ +$prog_hash_old{$row-{'program'}}=$row-{'result'}; +} + +%output_big_changes=(); +foreach my $prog(keys(%prog_hash_new)){ +#get data from server +my @vals_new = split(,, $prog_hash_new{$prog}); +my @vals_old = split(,, $prog_hash_old{'$prog'}); + +#get list of values measured from newest test +my @measures={}; +foreach my $x(@vals_new){ +$x =~ s/\,//g; +$x =~ s/\.//g; +$x =~ s/\://g; +$x =~ s/\d//g; +$x =~ s/\-//g; +$x =~ s/ //g; +if($x !~ m/\//){ +push @measures, $x; +} +} + +#put measures into hash of arrays +foreach my $x(@measures){ +$prog_hash_new{$prog} =~ m/$x:.*?(\d*\.*\d+)/; +my $value_new = $1; +$value_old=0; + if(exists $prog_hash_old{$prog}){ +$prog_hash_old{$prog} =~ m/$x:.*?(\d*\.*\d+)/; +$value_old = $1; +} +my $diff = ($value_old - $value_new); +my $perc=0; +if( $value_old!=0 ($diff .2 || $diff -.2) ){ +$perc=($diff/$value_old) * 100; +} +if($perc 5 || $perc -5){ +if( ! exists $output_big_changes{$x} ){ +my $rounded_perc = sprintf(%1.2f, $perc); +$output_big_changes{$x}[0]=$prog ($x) changed \%$rounded_perc ($value_old = $value_new)\n; +} +else{ +my $rounded_perc = sprintf(%1.2f, $perc); +push(@{ $output_big_changes{$x} },$prog ($x) changed \%$rounded_perc ($value_old = $value_new)\n); +} #end else +}# end if $perc is acceptable +}# end foreach measure taken +} #end for each program we have measurements for + + +# # Sending email to nightly test email archive # @@ -712,6 +788,14 @@ $removed_tests = None; } $email .= \nRemoved Tests: $removed_tests\n; + + print \nSignificant changes in test results:\n; + foreach my $meas(keys(%output_big_changes)){ + print $meas:\n; + foreach my $x(@{ $output_big_changes{$meas} } ){ + print --- $x; + } + } } else{ $temp_date = $db_date; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.42 - 1.43 --- Log message: When i added significant changes to the email i made them print to the console rather than adding them to the email --- Diffs of the changes: (+3 -3) NightlyTestAccept.cgi |6 +++--- 1 files changed, 3 insertions(+), 3 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.42 nightlytest-serverside/NightlyTestAccept.cgi:1.43 --- nightlytest-serverside/NightlyTestAccept.cgi:1.42 Thu Aug 10 13:26:13 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiThu Aug 10 17:30:29 2006 @@ -789,11 +789,11 @@ } $email .= \nRemoved Tests: $removed_tests\n; - print \nSignificant changes in test results:\n; + $email .= \nSignificant changes in test results:\n; foreach my $meas(keys(%output_big_changes)){ - print $meas:\n; + $email.= $meas:\n; foreach my $x(@{ $output_big_changes{$meas} } ){ - print --- $x; + $email.= --- $x; } } } ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.40 - 1.41 --- Log message: The link sent in the email to the llvm-testresults mailing list now directs the user to the night's test page the email is for rather than to the machine page. --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.40 nightlytest-serverside/NightlyTestAccept.cgi:1.41 --- nightlytest-serverside/NightlyTestAccept.cgi:1.40 Wed Aug 2 13:16:15 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Aug 4 12:33:24 2006 @@ -681,7 +681,7 @@ # Sending email to nightly test email archive # -$link_to_page=http://llvm.org/nightlytest/machine.php?machine=$machine_id;; +$link_to_page=http://llvm.org/nightlytest/test.php?machine=$machine_idnight=$night_id;; $email = $link_to_page\n; $email .= Name: $name\n; $email .= Nickname: $nickname\n; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.39 - 1.40 --- Log message: Added a check to see if the dejagnu output includes unexpected failures, expected failures, and expected passes. Evidently if there was no unexpected failures it would not print out 0, it would just print out nothing. Now we will capture this and record it as 0. --- Diffs of the changes: (+14 -6) NightlyTestAccept.cgi | 20 ++-- 1 files changed, 14 insertions(+), 6 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.39 nightlytest-serverside/NightlyTestAccept.cgi:1.40 --- nightlytest-serverside/NightlyTestAccept.cgi:1.39 Tue Aug 1 12:26:33 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiWed Aug 2 13:16:15 2006 @@ -509,12 +509,20 @@ print content-type: text/text\r\n\r\n; -$dejagnutests_log =~ m/\# of expected passes\s*([0-9]+)/; -$dejagnu_exp_passes=$1; -$dejagnutests_log =~ m/unexpected failures\s*([0-9]+)/; -$dejagnu_unexp_failures=$1; -$dejagnutests_log =~ m/\# of expected failures\s*([0-9]+)/; -$dejagnu_exp_failures=$1; +my $dejagnu_exp_passes=0; +if( ($dejagnutests_log =~ m/\# of expected passes\s*([0-9]+)/) ){ + $dejagnu_exp_passes=$1; +} + +my $dejagnu_unexp_failures=0; +if( ($dejagnutests_log =~ m/unexpected failures\s*([0-9]+)/) ){ + $dejagnu_unexp_failures=$1; +} + +my $dejagnu_exp_failures=0; +if( ($dejagnutests_log =~ m/\# of expected failures\s*([0-9]+)/) ){ + $dejagnu_exp_failures=$1; +} # ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.38 - 1.39 --- Log message: fixed a misnamed variable --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.38 nightlytest-serverside/NightlyTestAccept.cgi:1.39 --- nightlytest-serverside/NightlyTestAccept.cgi:1.38 Sun Jul 30 13:02:07 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiTue Aug 1 12:26:33 2006 @@ -453,7 +453,7 @@ chomp($o_file_size); my @O_FILE_SIZE = split $spliton, $o_file_size; my $a_file_size = param('a_file_sizes'); - $a_file_size= unless $o_file_size; + $a_file_size= unless $a_file_size; chomp($a_file_size); my @A_FILE_SIZE = split $spliton, $a_file_size; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.36 - 1.37 --- Log message: Fixed errors were .o file sizes were not being entered into the databaes --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.36 nightlytest-serverside/NightlyTestAccept.cgi:1.37 --- nightlytest-serverside/NightlyTestAccept.cgi:1.36 Thu Jul 27 19:54:48 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Jul 28 18:03:57 2006 @@ -638,7 +638,7 @@ AddProgram $x, $external_processed{$x}, external, $night_id; } [EMAIL PROTECTED]; [EMAIL PROTECTED]; if($len1){ foreach $x (@O_FILE_SIZE){ $x =~ m/(.+)\s+(.+)\s+(.+)/; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.34 - 1.35 --- Log message: the file size information shoudl be submitted to the database successfully --- Diffs of the changes: (+3 -7) NightlyTestAccept.cgi | 10 +++--- 1 files changed, 3 insertions(+), 7 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.34 nightlytest-serverside/NightlyTestAccept.cgi:1.35 --- nightlytest-serverside/NightlyTestAccept.cgi:1.34 Wed Jul 26 20:22:51 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiThu Jul 27 16:12:36 2006 @@ -373,7 +373,7 @@ #~~ sub AddFile{ #$file, $size, $night, $type $query = INSERT INTO file (file, size, night, type) VALUES (\$_[0]\, . -\$_[1]\, \$_[2]\, $_[3]); +\$_[1]\, \$_[2]\, \$_[3]\); my $d = $dbh-prepare($query); $d-execute; } @@ -448,10 +448,6 @@ $external_tests = unless $external_tests; my @EXTERNAL_TESTS = split $spliton, $external_tests; -my $olden_tests=param('olden_tests'); - $olden_tests= unless $olden_tests; -my @OLDEN_TESTS = split $spliton, $singlesource_tests; - my $o_file_size = param('o_file_sizes'); $o_file_size= unless $o_file_size; chomp($o_file_size); @@ -643,12 +639,12 @@ } foreach $x (@O_FILE_SIZE){ - $x =~ m/(.+)\s+(.+)\s+(.+)/gi; + $x =~ m/(.+)\s+(.+)\s+(.+)/; AddFile $2, $1, $night_id, $3; } foreach $x (@A_FILE_SIZE){ - $x =~ m/(.+)\s+(.+)\s+(.+)/gi; + $x =~ m/(.+)\s+(.+)\s+(.+)/; AddFile $2, $1, $night_id, $3; } ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.35 - 1.36 --- Log message: Modified the search through the dejagnu logs for the number of unexpected failures --- Diffs of the changes: (+13 -8) NightlyTestAccept.cgi | 21 + 1 files changed, 13 insertions(+), 8 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.35 nightlytest-serverside/NightlyTestAccept.cgi:1.36 --- nightlytest-serverside/NightlyTestAccept.cgi:1.35 Thu Jul 27 16:12:36 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiThu Jul 27 19:54:48 2006 @@ -511,7 +511,7 @@ $dejagnutests_log =~ m/\# of expected passes\s*([0-9]+)/; $dejagnu_exp_passes=$1; -$dejagnutests_log =~ m/\# of unexpected failures\s*([0-9]+)/; +$dejagnutests_log =~ m/unexpected failures\s*([0-9]+)/; $dejagnu_unexp_failures=$1; $dejagnutests_log =~ m/\# of expected failures\s*([0-9]+)/; $dejagnu_exp_failures=$1; @@ -638,17 +638,22 @@ AddProgram $x, $external_processed{$x}, external, $night_id; } -foreach $x (@O_FILE_SIZE){ - $x =~ m/(.+)\s+(.+)\s+(.+)/; - AddFile $2, $1, $night_id, $3; [EMAIL PROTECTED]; +if($len1){ + foreach $x (@O_FILE_SIZE){ + $x =~ m/(.+)\s+(.+)\s+(.+)/; + AddFile $2, $1, $night_id, $3; + } } -foreach $x (@A_FILE_SIZE){ - $x =~ m/(.+)\s+(.+)\s+(.+)/; - AddFile $2, $1, $night_id, $3; [EMAIL PROTECTED]; +if($len1){ + foreach $x (@A_FILE_SIZE){ + $x =~ m/(.+)\s+(.+)\s+(.+)/; + AddFile $2, $1, $night_id, $3; + } } - # # Adding lines of code ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.30 - 1.31 --- Log message: Added a check so that if the previous nights build failed, all of the tests wont be reported as newly passing --- Diffs of the changes: (+16 -4) NightlyTestAccept.cgi | 20 1 files changed, 16 insertions(+), 4 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.30 nightlytest-serverside/NightlyTestAccept.cgi:1.31 --- nightlytest-serverside/NightlyTestAccept.cgi:1.30 Tue Jul 25 19:15:04 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiWed Jul 26 12:45:48 2006 @@ -561,11 +561,23 @@ $yesterdays_passes = $row-{'passing_tests'}; $yesterdays_fails = $row-{'unexpfail_tests'}; $yesterdays_xfails = $row-{'expfail_tests'}; -$newly_passing_tests = Difference $passing_tests, $yesterdays_passes; -$newly_failing_tests = Difference $expfail_tests.\n.$unexpfail_tests, +if($yesterdays_passes ne ){ + $newly_passing_tests = Difference $passing_tests, $yesterdays_passes; +} +else{ $newly_passing_tests=; } +if($yesterdays_xfails ne and $yesterdays_fails ne ){ + $newly_failing_tests = Difference $expfail_tests.\n.$unexpfail_tests, $yesterdays_xfails.\n.$yesterdays_fails; -$new_tests = Difference $all_tests, $yesterdays_tests; -$removed_tests = Difference $yesterdays_tests, $all_tests; +} +else{ $newly_failing_tests=; } +if($yesterdays_tests ne ){ + $new_tests = Difference $all_tests, $yesterdays_tests; +} +else{ $new_tests=; } +if($all_tests ne ){ + $removed_tests = Difference $yesterdays_tests, $all_tests; +} +else{ $removed_tests=; } #$db_date = $date. .$time; $db_date = `date +20%y-%m-%d %H:%M:%S`; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.31 - 1.32 --- Log message: Added some comments to hopefully explain some ambiguous code --- Diffs of the changes: (+9 -0) NightlyTestAccept.cgi |9 + 1 files changed, 9 insertions(+) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.31 nightlytest-serverside/NightlyTestAccept.cgi:1.32 --- nightlytest-serverside/NightlyTestAccept.cgi:1.31 Wed Jul 26 12:45:48 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiWed Jul 26 12:48:44 2006 @@ -552,6 +552,10 @@ # # Creating test lists +# All of these if-else statements are to ensure that if the previous +# night's test had a build failure and reported all tests as not passing, +# all failing, etc, etc then we dont report all the tests as newly passing +# or their equivalent. # my $d = $dbh-prepare(select * from night where machine = $machine_id ORDER BY added DESC); @@ -579,6 +583,11 @@ } else{ $removed_tests=; } + +# +# Submitting information to database +# + #$db_date = $date. .$time; $db_date = `date +20%y-%m-%d %H:%M:%S`; chomp($db_date); ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.32 - 1.33 --- Log message: Some reformatting of the nightly test results email along with a change to accomodate the new database schema for file sizes. --- Diffs of the changes: (+54 -14) NightlyTestAccept.cgi | 68 +++--- 1 files changed, 54 insertions(+), 14 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.32 nightlytest-serverside/NightlyTestAccept.cgi:1.33 --- nightlytest-serverside/NightlyTestAccept.cgi:1.32 Wed Jul 26 12:48:44 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiWed Jul 26 19:42:06 2006 @@ -284,9 +284,7 @@ $y++; $cvsuserupdatelist=$_[$y]; $y++; -$a_file_size=$_[$y]; -$y++; -$o_file_size=$_[$y]; + @@ -298,7 +296,7 @@ passing_tests, unexpfail_tests, expfail_tests,. newly_passing_tests, newly_failing_tests, new_tests,. removed_tests, cvs_added, cvs_removed, cvs_modified,. - cvs_usersadd, cvs_usersco, a_file_size, o_file_size) values (. + cvs_usersadd, cvs_usersco) values (. \$machine_id\, \$db_date\, \$buildstatus\,. \$configtime_cpu\, \$configtime_wall\, \$cvscheckouttime_cpu\,. \$cvscheckouttime_wall\, \$buildtime_cpu\, \$buildtime_wall\,. @@ -309,8 +307,7 @@ \$expfail_tests\, \$newly_passing_tests\, \$newly_failing_tests\,. \$new_tests\, \$removed_tests\,. \$cvsaddedfiles\, \$cvsremovedfiles\, \$cvsmodifiedfiles\,. - \$cvsusercommitlist\, \$cvsuserupdatelist\,. - \$a_file_size\, \$o_file_size\)); + \$cvsusercommitlist\, \$cvsuserupdatelist\)); $d-execute; @@ -354,7 +351,30 @@ # #~~ sub AddProgram{ #$program, $result, $type, $night -my $d = $dbh-prepare(INSERT INTO program (program, result, type, night) VALUES (\$_[0]\, \$_[1]\, \$_[2]\, $_[3])); + $query = INSERT INTO program (program, result, type, night) VALUES. + (\$_[0]\, \$_[1]\, \$_[2]\, $_[3]); +my $d = $dbh-prepare($query); +$d-execute; +} + +#~~ +# +# mysql describe file; +# +---+-+--+-+-+---+ +# | Field | Type| Null | Key | Default | Extra | +# +---+-+--+-+-+---+ +# | file | text| | | | | +# | size | int(11) | | | 0 | | +# | night | int(11) | | | 0 | | +# | type | text| YES | | NULL| | +# +---+-+--+-+-+---+ +# 4 rows in set (0.00 sec) +# +#~~ +sub AddFile{ #$file, $size, $night, $type + $query = INSERT INTO file (file, size, night, type) VALUES (\$_[0]\, . +\$_[1]\, \$_[2]\, $_[3]); +my $d = $dbh-prepare($query); $d-execute; } @@ -432,6 +452,15 @@ $olden_tests= unless $olden_tests; my @OLDEN_TESTS = split $spliton, $singlesource_tests; +my $o_file_size = param('o_file_sizes'); +$o_file_size= unless $o_file_size; +chomp($o_file_size); +my @O_FILE_SIZE = split $spliton, $o_file_size; +my $a_file_size = param('a_file_sizes'); + $a_file_size= unless $o_file_size; + chomp($a_file_size); +my @A_FILE_SIZE = split $spliton, $a_file_size; + my $filesincvs = param('cvs_file_count'); my $dirsincvs = param('cvs_dir_count'); my $loc = param('lines_of_code'); @@ -463,9 +492,7 @@ my $removed_tests=param('removed_tests'); my $gcc_version = param('gcc_version'); my $warnings = param('warnings'); -my $lines_of_code = param('lines_of_code'); -my $o_file_size = param('o_file_sizes'); -my $a_file_size = param('a_file_sizes'); +my $lines_of_code = param('lines_of_code'); # @@ -601,8 +628,7 @@ $expfail_tests, $newly_passing_tests, $newly_failing_tests, $new_tests, $removed_tests, $cvsaddedfiles, $cvsremovedfiles, $cvsmodifiedfiles, -$cvsusercommitlist, $cvsuserupdatelist, $a_file_size, -$o_file_size; +$cvsusercommitlist, $cvsuserupdatelist; foreach $x(keys %singlesource_processed){ AddProgram $x, $singlesource_processed{$x}, singlesource, $night_id; @@ -616,6 +642,17 @@ AddProgram $x, $external_processed{$x}, external, $night_id;
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.33 - 1.34 --- Log message: Some more formatting changes to the nightly test results email. This time we dont print test changes if build fail and instead link to the build log. --- Diffs of the changes: (+17 -8) NightlyTestAccept.cgi | 25 + 1 files changed, 17 insertions(+), 8 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.33 nightlytest-serverside/NightlyTestAccept.cgi:1.34 --- nightlytest-serverside/NightlyTestAccept.cgi:1.33 Wed Jul 26 19:42:06 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiWed Jul 26 20:22:51 2006 @@ -677,14 +677,23 @@ $email .= Name: $name\n; $email .= Nickname: $nickname\n; $email .= Buildstatus: $buildstatus\n; -$newly_passing_tests=None unless $newly_passing_tests ne ; -$email .= \nNew Test Passes:\n$newly_passing_tests\n; -$newly_failing_tests=None unless $newly_failing_tests ne ; -$email .= \nNew Test Failures:\n$newly_failing_tests\n; -$newtests=None unless $new_tests ne ; -$email .= \nAdded Tests:\n$new_tests\n; -$removed_tests=None unless $removed_tests ne ; -$email .= \nRemoved Tests:\n$removed_tests\n; + +if($buildstatus eq OK){ + $newly_passing_tests=None unless $newly_passing_tests ne ; + $email .= \nNew Test Passes:\n$newly_passing_tests\n; + $newly_failing_tests=None unless $newly_failing_tests ne ; + $email .= \nNew Test Failures:\n$newly_failing_tests\n; + $new_tests=None unless $new_tests ne ; + $email .= \nAdded Tests:\n$new_tests\n; + $removed_tests=None unless $removed_tests ne ; + $email .= \nRemoved Tests:\n$removed_tests\n; +} +else{ + $temp_date = $db_date; + $temp_date =~s/ /\_/g; + $email .= \nBuildlog available at http://llvm.org/nightlytest/;. + machines/$machine_id/$temp_date-Build-Log.txt; +} $email_addr = [EMAIL PROTECTED]; `echo $email | mail -s '$nickname $hardware nightly tester results' $email_addr`; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.29 - 1.30 --- Log message: Fixed some syntax errors --- Diffs of the changes: (+6 -5) NightlyTestAccept.cgi | 11 ++- 1 files changed, 6 insertions(+), 5 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.29 nightlytest-serverside/NightlyTestAccept.cgi:1.30 --- nightlytest-serverside/NightlyTestAccept.cgi:1.29 Sun Jul 23 18:12:30 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiTue Jul 25 19:15:04 2006 @@ -94,14 +94,16 @@ @ONE = split \n, $one; @TWO = split \n, $two; + $value=1; + my %hash_of_diff=(); foreach $x (@TWO){ - $hash_of_diff{$x}=1; + $hash_of_diff{$x}=$value; } $result=; foreach $x (@ONE){ - if($hash_of_diff{$x}!=1){ + if($hash_of_diff{$x}!=$value){ $result.=$x\n; } } @@ -381,8 +383,7 @@ if(%$row ($row-{'loc'} != $_[1] || $row-{'files'} != $_[2] || $row-{'dirs'} != $_[3])){ - my $e = $dbh-prepare(insert into code (added, loc, files, dirs) . - values (\$_[0]\, $_[1], $_[2], $_[3])); + my $e = $dbh-prepare(insert into code (added, loc, files, dirs) values (\$_[0]\, \$_[1]\, \$_[2]\, \$_[3]\)); $e-execute; } } @@ -431,7 +432,7 @@ $olden_tests= unless $olden_tests; my @OLDEN_TESTS = split $spliton, $singlesource_tests; -my $filesincvs = param('cvs_files_count'); +my $filesincvs = param('cvs_file_count'); my $dirsincvs = param('cvs_dir_count'); my $loc = param('lines_of_code'); my $nickname = param('nickname'); ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.28 - 1.29 --- Log message: We now add .a and .o file sizes to the database. Also fixed an issue where the number of files and number of directories in cvs were being switched when being placed into the database. --- Diffs of the changes: (+90 -81) NightlyTestAccept.cgi | 171 ++ 1 files changed, 90 insertions(+), 81 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.28 nightlytest-serverside/NightlyTestAccept.cgi:1.29 --- nightlytest-serverside/NightlyTestAccept.cgi:1.28 Sat Jul 22 15:11:36 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiSun Jul 23 18:12:30 2006 @@ -1,8 +1,9 @@ #!/usr/bin/perl -w # -# Background: Written on June 1st 2006 by Patrick Jenkins [EMAIL PROTECTED] to accept test results -# from the llvm NightlyTest.pl script. It is just a CGI script that takes input by the -# POST method. After this it parses the information and places it into the database. +# Background: Written on June 1st 2006 by Patrick Jenkins [EMAIL PROTECTED] +# to accept test results from the llvm NightlyTest.pl script. It is just a CGI +# script that takes input by the POST method. After this it parses the +# information and places it into the database. # use CGI qw(:standard); @@ -108,6 +109,7 @@ chomp $result; return $result; } + #~~ # # mysql describe machine; @@ -194,88 +196,95 @@ # | cvs_modified| text | YES | | NULL|| # | cvs_usersadd| text | YES | | NULL|| # | cvs_usersco | text | YES | | NULL|| +# | a_file_size | text | YES | | NULL|| +# | o_file_size | text | YES | | NULL|| # +-++--+-+-++ # -# -#CreateNight $machine_id, $db_date, $buildstatus, +#$night_id= CreateNight $machine_id, $db_date, $buildstatus, #$configtime_cpu, $configtime_wall, $cvscheckouttime_cpu, #$cvscheckouttime_wall, $buildtime_cpu, $buildtime_wall, #$dejagnutime_cpu, $dejagnutime_wall, $warnings, #$warnings_added, $warnings_removed, #$dejagnu_exp_passes, $dejagnu_unexp_failures, $dejagnu_exp_failures, #expected pass, unexp fails, exp fails -#$unexpfail_tests, $newly_passing_tests, $newly_failing_tests, +#$all_tests, $passing_tests, $unexpfail_tests, +#$expfail_tests, $newly_passing_tests, $newly_failing_tests, #$new_tests, $removed_tests, #$cvsaddedfiles, $cvsremovedfiles, $cvsmodifiedfiles, -#$cvsusercommitlist, $cvsuserupdatelist; +#$cvsusercommitlist, $cvsuserupdatelist, +# $a_file_size, $o_file_size; +# #~~ sub CreateNight{ for($x=0; $x@_; $x++){ - $_[$x]= unless $_[$x]; + $_[$x]= unless $_[$x]; } -$y=0; -$machine_id=$_[$y]; -$y++; -$db_date=$_[$y]; -$y++; -$buildstatus=$_[$y]; -$y++; -$configtime_cpu=$_[$y]; -$y++; -$configtime_wall=$_[$y]; -$y++; -$cvscheckouttime_cpu=$_[$y]; -$y++; -$cvscheckouttime_wall=$_[$y]; -$y++; -$buildtime_cpu=$_[$y]; -$y++; -$buildtime_wall=$_[$y]; -$y++; -$dejagnutime_cpu=$_[$y]; -$y++; -$dejagnutime_wall=$_[$y]; -$y++; -$warnings=$_[$y]; -$y++; -$warnings_added=$_[$y]; -$y++; -$warnings_removed=$_[$y]; -$y++; -$dejagnu_exp_passes=$_[$y]; -$y++; -$dejagnu_unexp_failures=$_[$y]; -$y++; -$dejagnu_exp_failures=$_[$y]; -$y++; -$all_tests=$_[$y]; -$y++; -$passing_tests=$_[$y]; -$y++; -$unexpfail_tests=$_[$y]; -$y++; -$expfail_tests=$_[$y]; -$y++; -$newly_passing_tests=$_[$y]; -$y++; -$newly_failing_tests=$_[$y]; -$y++; -$new_tests=$_[$y]; -$y++; -$removed_tests=$_[$y]; -$y++; -$cvsaddedfiles=$_[$y]; -$y++; -$cvsremovedfiles=$_[$y]; -$y++; -$cvsmodifiedfiles=$_[$y]; -$y++; -$cvsusercommitlist=$_[$y]; -$y++; -$cvsuserupdatelist=$_[$y]; -$y++; + $y=0; + $machine_id=$_[$y]; + $y++; + $db_date=$_[$y]; + $y++; + $buildstatus=$_[$y]; + $y++; + $configtime_cpu=$_[$y]; + $y++; + $configtime_wall=$_[$y]; + $y++; + $cvscheckouttime_cpu=$_[$y]; + $y++; + $cvscheckouttime_wall=$_[$y]; + $y++; + $buildtime_cpu=$_[$y]; + $y++; + $buildtime_wall=$_[$y]; + $y++; + $dejagnutime_cpu=$_[$y]; + $y++; + $dejagnutime_wall=$_[$y]; + $y++; + $warnings=$_[$y]; + $y++; + $warnings_added=$_[$y]; + $y++; +
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.26 - 1.27 --- Log message: We were looking for wrongly named variables passed via the post method in nightly test results submissions. --- Diffs of the changes: (+9 -11) NightlyTestAccept.cgi | 20 +--- 1 files changed, 9 insertions(+), 11 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.26 nightlytest-serverside/NightlyTestAccept.cgi:1.27 --- nightlytest-serverside/NightlyTestAccept.cgi:1.26 Fri Jul 21 19:48:11 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiSat Jul 22 14:55:21 2006 @@ -421,9 +421,9 @@ $olden_tests= unless $olden_tests; my @OLDEN_TESTS = split $spliton, $singlesource_tests; -my $filesincvs = param('filesincvs'); -my $dirsincvs = param('dirsindvs'); -my $loc = param('loc'); +my $filesincvs = param('cvs_dir_count'); +my $dirsincvs = param('cvs_file_count'); +my $loc = param('lines_of_code'); my $nickname = param('nickname'); my $cvscheckouttime_cpu=param('cvscheckouttime_cpu'); my $cvscheckouttime_wall=param('cvscheckouttime_wall'); @@ -458,7 +458,6 @@ my $o_file_sizes = param('o_file_sizes'); my $a_file_sizes = param('a_file_sizes'); - # # Extracting the machine information @@ -473,12 +472,6 @@ # -# Adding lines of code -# - - - -# # Extracting the dejagnu test numbers # @@ -568,7 +561,7 @@ #$db_date = $date. .$time; $db_date = `date +20%y-%m-%d %H:%M:%S`; -chomp(+$db_date); +chomp($db_date); $night_id= CreateNight $machine_id, $db_date, $buildstatus, $configtime_cpu, $configtime_wall, $cvscheckouttime_cpu, $cvscheckouttime_wall, $buildtime_cpu, $buildtime_wall, @@ -593,6 +586,11 @@ AddProgram $x, $external_processed{$x}, external, $night_id; } + +# +# Adding lines of code +# + UpdateCodeInfo $db_date, $loc, $filesincvs, $dirsincvs; print received $ENV{CONTENT_LENGTH} bytes\n; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.27 - 1.28 --- Log message: removed dupilicate mysql query during nightly test results acceptance --- Diffs of the changes: (+0 -1) NightlyTestAccept.cgi |1 - 1 files changed, 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.27 nightlytest-serverside/NightlyTestAccept.cgi:1.28 --- nightlytest-serverside/NightlyTestAccept.cgi:1.27 Sat Jul 22 14:55:21 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiSat Jul 22 15:11:36 2006 @@ -545,7 +545,6 @@ # Creating test lists # -$machine_id = GetMachineId $uname, $hardware, $os, $name, $nickname, $gcc_version; my $d = $dbh-prepare(select * from night where machine = $machine_id ORDER BY added DESC); $d-execute; my $row=$d-fetchrow_hashref; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.22 - 1.23 --- Log message: We never actually executed the mysql query to insert the new lines of code, file, and directory counts into the database. --- Diffs of the changes: (+1 -0) NightlyTestAccept.cgi |1 + 1 files changed, 1 insertion(+) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.22 nightlytest-serverside/NightlyTestAccept.cgi:1.23 --- nightlytest-serverside/NightlyTestAccept.cgi:1.22 Thu Jul 20 17:31:16 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Jul 21 12:23:57 2006 @@ -64,6 +64,7 @@ $row-{'dirs'} != $_[3])){ my $e = $dbh-prepare(insert into code (added, loc, files, dirs) . values (\$_[0]\, $_[1], $_[2], $_[3])); +$e-execute; } } ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.23 - 1.24 --- Log message: Changed the way buildlogs are written to the server Added support for .o and .a file sizes and now creates a logfile of them on the server --- Diffs of the changes: (+17 -4) NightlyTestAccept.cgi | 21 + 1 files changed, 17 insertions(+), 4 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.23 nightlytest-serverside/NightlyTestAccept.cgi:1.24 --- nightlytest-serverside/NightlyTestAccept.cgi:1.23 Fri Jul 21 12:23:57 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Jul 21 14:49:48 2006 @@ -30,6 +30,11 @@ # #~ +# +# Changes directory to specified directory, the second +# paramater used to be printed out if verbose was turned on. PJ +# found that annoying so he deleted it. +# #~ sub ChangeDir { # directory, logical name my ($dir,$name) = @_; @@ -468,6 +473,8 @@ my $lines_of_code = param('lines_of_code'); my $cvs_dir_count = param('cvs_file_count'); my $cvs_file_count = param('cvs_dir_count'); +my $o_file_sizes = param('o_file_sizes'); +my $a_file_sizes = param('a_file_sizes'); @@ -639,16 +646,20 @@ chomp($curr); if(! -d machines){ -mkdir $curr/machines, 0777 or print(couldnt create directory $base); - } +`mkdir machines -m 777`; +#mkdir $curr/machines, 0777 or print(couldnt create directory $base); +} ChangeDir($curr/machines, Moving into machines directory); if(! -d $machine_id){ -mkdir $curr/machines/$machine_id, 0777 or print(couldnt create directory $machine_id because $!); - } +`mkdir $machine_id -m 777`; +#mkdir $curr/machines/$machine_id, 777 or print(couldnt create directory $machine_id because $!); +} ChangeDir($curr/machines/$machine_id, Moving into machine $machine_id 's directory); $db_date =~ s/ /\_/g; my $build_file = $db_date-Build-Log.txt; +my $o_file= $db_date-O-files.txt; +my $a_file= $db_date-A-files.txt; #my $dejagnu_testrun_log_file = Dejagnu-testrun.log; #my $dejagnu_testrun_sum_file = Dejagnu-testrun.sum; #my $dejagnu_tests_file = DejagnuTests-Log.txt; @@ -656,6 +667,8 @@ WriteFile $build_file, $build_log; +WriteFile $o_file, $o_file_sizes; +WriteFile $a_file, $a_file_sizes; #WriteFile $this_days_logs/$dejagnu_testrun_log_file,$dejagnutests_log; #WriteFile $this_days_logs/$dejagnu_testrun_sum_file,$dejagnutests_sum; #WriteFile $this_days_logs/$warnings_file,$buildwarnings; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.25 - 1.26 --- Log message: Changed the call to the function that updates teh lines of code in the databaes to be the correct function --- Diffs of the changes: (+9 -26) NightlyTestAccept.cgi | 35 +-- 1 files changed, 9 insertions(+), 26 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.25 nightlytest-serverside/NightlyTestAccept.cgi:1.26 --- nightlytest-serverside/NightlyTestAccept.cgi:1.25 Fri Jul 21 17:00:17 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Jul 21 19:48:11 2006 @@ -56,25 +56,6 @@ #~~ # -# Checks to see if our information about the llvm code base is different -# from the last update and if so, adds the information to the database -# -#~~ -sub CheckCodeBase{ #(added, lines of code, files, directories) -my $d = $dbh-prepare(SELECT * FROM code ORDER BY added DESC); -$d-execute; -$row=$d-fetchrow_hashref; -if(%$row ($row-{'loc'} != $_[1] || -$row-{'files'} != $_[2] || -$row-{'dirs'} != $_[3])){ - my $e = $dbh-prepare(insert into code (added, loc, files, dirs) . - values (\$_[0]\, $_[1], $_[2], $_[3])); -$e-execute; -} -} - -#~~ -# # Queries database to see if there is a machine with the same uname as # the value passed in # @@ -384,15 +365,16 @@ # #~~ sub UpdateCodeInfo{ #date, loc, files, dirs - -my $d = $dbh-prepare(select * from code ORDER BY added DESC); +my $d = $dbh-prepare(SELECT * FROM code ORDER BY added DESC); $d-execute; -$row = $d-fetchrow_hashref; -if(!$row || ($row-{'loc'} != $_[1] || $row-{'files'} != $_[2] || $row-{'dirs'} != $_[3])){ - my $e = $dbh-prepare(insert into code (added, loc, files, dirs) values (\$_[0]\, $_[1], $_[2], $_[3])); - $e-execute; +$row=$d-fetchrow_hashref; +if(%$row ($row-{'loc'} != $_[1] || +$row-{'files'} != $_[2] || +$row-{'dirs'} != $_[3])){ + my $e = $dbh-prepare(insert into code (added, loc, files, dirs) . + values (\$_[0]\, $_[1], $_[2], $_[3])); +$e-execute; } - } @@ -586,6 +568,7 @@ #$db_date = $date. .$time; $db_date = `date +20%y-%m-%d %H:%M:%S`; +chomp(+$db_date); $night_id= CreateNight $machine_id, $db_date, $buildstatus, $configtime_cpu, $configtime_wall, $cvscheckouttime_cpu, $cvscheckouttime_wall, $buildtime_cpu, $buildtime_wall, ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.21 - 1.22 --- Log message: Fixing a syntax issue --- Diffs of the changes: (+3 -3) NightlyTestAccept.cgi |6 +++--- 1 files changed, 3 insertions(+), 3 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.21 nightlytest-serverside/NightlyTestAccept.cgi:1.22 --- nightlytest-serverside/NightlyTestAccept.cgi:1.21 Thu Jul 20 16:44:05 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiThu Jul 20 17:31:16 2006 @@ -297,7 +297,7 @@ buildtime_wall, dejagnutime_cpu, dejagnutime_wall, warnings,. warnings_added, warnings_removed, teststats_exppass,. teststats_unexpfail, teststats_expfail, all_tests,. - passing_tests, unexpfail_tests, expfail_tests. + passing_tests, unexpfail_tests, expfail_tests,. newly_passing_tests, newly_failing_tests, new_tests,. removed_tests, cvs_added, cvs_removed, cvs_modified,. cvs_usersadd, cvs_usersco) values (. @@ -381,8 +381,8 @@ my $d = $dbh-prepare(select * from code ORDER BY added DESC); $d-execute; -@row = $d-fetchrow_hashref; -if([EMAIL PROTECTED] || ($row-{'loc'} != $_[1] || $row-{'files'} != $_[2] || $row-{'dirs'} != $_[3])){ +$row = $d-fetchrow_hashref; +if(!$row || ($row-{'loc'} != $_[1] || $row-{'files'} != $_[2] || $row-{'dirs'} != $_[3])){ my $e = $dbh-prepare(insert into code (added, loc, files, dirs) values (\$_[0]\, $_[1], $_[2], $_[3])); $e-execute; } ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.18 - 1.19 --- Log message: Added mysql describe table printouts to the top of functions that use those tables. Changed the format of the test result email to reflect what Chris asked for. This is not complete but is a start. Made changes to how passing tests and failing tests are organized in the database. --- Diffs of the changes: (+85 -37) NightlyTestAccept.cgi | 122 ++ 1 files changed, 85 insertions(+), 37 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.18 nightlytest-serverside/NightlyTestAccept.cgi:1.19 --- nightlytest-serverside/NightlyTestAccept.cgi:1.18 Tue Jul 18 12:13:44 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiWed Jul 19 12:54:32 2006 @@ -95,6 +95,22 @@ #~~ # +# mysql describe machine; +# +---+--+--+-+-++ +# | Field | Type | Null | Key | Default | Extra | +# +---+--+--+-+-++ +# | id| int(11) | | PRI | NULL| auto_increment | +# | uname | text | | | || +# | hardware | text | | | || +# | os| text | | | || +# | name | text | | | || +# | nickname | tinytext | YES | | NULL|| +# | gcc | text | YES | | NULL|| +# | directory | text | YES | | NULL|| +# +---+--+--+-+-++ +# 8 rows in set (0.00 sec) +# +# # Creates an entry in the machine table in the database # #~~ @@ -129,38 +145,41 @@ #~~ #Since this is ugly, iv included an example call and a view of the table. # -#+-++--+-+-++ -#| Field | Type | Null | Key | Default | Extra | -#+-++--+-+-++ -#| id | int(11)| NO | PRI | NULL| auto_increment | -#| machine | int(11)| NO | | || -#| added | datetime | YES | | NULL|| -#| buildstatus | tinytext | YES | | NULL|| -#| configuretime_cpu | double | YES | | NULL|| -#| configuretime_wall | double | YES | | NULL|| -#| getcvstime_cpu | double | YES | | NULL|| -#| getcvstime_wall | double | YES | | NULL|| -#| buildtime_cpu | double | YES | | NULL|| -#| buildtime_wall | double | YES | | NULL|| -#| dejagnutime_cpu | double | YES | | NULL|| -#| dejagnutime_wall| double | YES | | NULL|| -#| warnings| mediumtext | YES | | NULL|| -#| warnings_added | text | YES | | NULL|| -#| warnings_removed| text | YES | | NULL|| -#| teststats_exppass | int(11)| YES | | NULL|| -#| teststats_unexpfail | int(11)| YES | | NULL|| -#| teststats_expfail | int(11)| YES | | NULL|| -#| unexpfail_tests | text | YES | | NULL|| -#| newly_passing_tests | text | YES | | NULL|| -#| newly_failing_tests | text | YES | | NULL|| -#| new_tests | text | YES | | NULL|| -#| removed_tests | text | YES | | NULL|| -#| cvs_added | text | YES | | NULL|| -#| cvs_removed | text | YES | | NULL|| -#| cvs_modified| text | YES | | NULL|| -#| cvs_usersadd| text | YES | | NULL|| -#| cvs_usersco | text | YES | | NULL|| -#+-++--+-+-++ +# +-++--+-+-++ +# | Field | Type | Null | Key | Default | Extra | +# +-++--+-+-++ +# | id | int(11)|
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.13 - 1.14 --- Log message: Changed the email portion to output a file, then pipe that file to mail, then remove the file. Hopefully this hack will allow mail to be sent. --- Diffs of the changes: (+4 -2) NightlyTestAccept.cgi |6 -- 1 files changed, 4 insertions(+), 2 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.13 nightlytest-serverside/NightlyTestAccept.cgi:1.14 --- nightlytest-serverside/NightlyTestAccept.cgi:1.13 Fri Jul 14 16:13:25 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiMon Jul 17 14:02:46 2006 @@ -1,4 +1,4 @@ -#!/usr/bin/perl -w +7#!/usr/bin/perl -w # # Background: Written on June 1st 2006 by Patrick Jenkins [EMAIL PROTECTED] to accept test results # from the llvm NightlyTest.pl script. It is just a CGI script that takes input by the @@ -484,5 +484,7 @@ $email = $machine_data\n\n$dejagnutests_log\n\ncvs user commit list:\n$cvsusercommitlist\n\ncvs user . update list:\n$cvsuserupdatelist\n\ncvs changed files:\n$cvsmodifiedfiles\n; +WriteFile email.txt, $email; $email_addr = [EMAIL PROTECTED]; -`mail -s '$nickname $hardware nightly tester results' $email_addr $email`; +`mail -s '$nickname $hardware nightly tester results' $email_addr email.txt`; +`rm -f email.txt;` ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.14 - 1.15 --- Log message: fixed a stupid typo --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.14 nightlytest-serverside/NightlyTestAccept.cgi:1.15 --- nightlytest-serverside/NightlyTestAccept.cgi:1.14 Mon Jul 17 14:02:46 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiMon Jul 17 14:09:12 2006 @@ -1,4 +1,4 @@ -7#!/usr/bin/perl -w +#!/usr/bin/perl -w # # Background: Written on June 1st 2006 by Patrick Jenkins [EMAIL PROTECTED] to accept test results # from the llvm NightlyTest.pl script. It is just a CGI script that takes input by the ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.15 - 1.16 --- Log message: Moved email to llvm test results email archive ahead of writing to log files --- Diffs of the changes: (+12 -13) NightlyTestAccept.cgi | 25 - 1 files changed, 12 insertions(+), 13 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.15 nightlytest-serverside/NightlyTestAccept.cgi:1.16 --- nightlytest-serverside/NightlyTestAccept.cgi:1.15 Mon Jul 17 14:09:12 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiMon Jul 17 16:37:27 2006 @@ -445,6 +445,18 @@ print DB date : $db_date\n; print Machine $machine_id now has ids [EMAIL PROTECTED] associated with it in the database\n; +## +# +# Sending email to nightly test email archive +# +## + +$email = $machine_data\n\n$dejagnutests_log\n\ncvs user commit list:\n$cvsusercommitlist\n\ncvs user . + update list:\n$cvsuserupdatelist\n\ncvs changed files:\n$cvsmodifiedfiles\n; +WriteFile email.txt, $email; +$email_addr = [EMAIL PROTECTED]; +`mail -s '$nickname $hardware nightly tester results' $email_addr email.txt`; +`rm -f email.txt;` ## # @@ -475,16 +487,3 @@ #WriteFile $this_days_logs/$dejagnu_testrun_log_file,$dejagnutests_log; #WriteFile $this_days_logs/$dejagnu_testrun_sum_file,$dejagnutests_sum; #WriteFile $this_days_logs/$warnings_file,$buildwarnings; - -## -# -# Sending email to nightly test email archive -# -## - -$email = $machine_data\n\n$dejagnutests_log\n\ncvs user commit list:\n$cvsusercommitlist\n\ncvs user . - update list:\n$cvsuserupdatelist\n\ncvs changed files:\n$cvsmodifiedfiles\n; -WriteFile email.txt, $email; -$email_addr = [EMAIL PROTECTED]; -`mail -s '$nickname $hardware nightly tester results' $email_addr email.txt`; -`rm -f email.txt;` ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.16 - 1.17 --- Log message: Fixed a silly syntax error :-( --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.16 nightlytest-serverside/NightlyTestAccept.cgi:1.17 --- nightlytest-serverside/NightlyTestAccept.cgi:1.16 Mon Jul 17 16:37:27 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiMon Jul 17 16:51:02 2006 @@ -456,7 +456,7 @@ WriteFile email.txt, $email; $email_addr = [EMAIL PROTECTED]; `mail -s '$nickname $hardware nightly tester results' $email_addr email.txt`; -`rm -f email.txt;` +`rm -f email.txt`; ## # ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.11 - 1.12 --- Log message: We will now send out an email to the nightly test email archive about submitted tests --- Diffs of the changes: (+11 -0) NightlyTestAccept.cgi | 11 +++ 1 files changed, 11 insertions(+) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.11 nightlytest-serverside/NightlyTestAccept.cgi:1.12 --- nightlytest-serverside/NightlyTestAccept.cgi:1.11 Mon Jul 10 17:25:32 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Jul 14 16:11:41 2006 @@ -475,3 +475,14 @@ #WriteFile $this_days_logs/$dejagnu_testrun_log_file,$dejagnutests_log; #WriteFile $this_days_logs/$dejagnu_testrun_sum_file,$dejagnutests_sum; #WriteFile $this_days_logs/$warnings_file,$buildwarnings; + +## +# +# Sending email to nightly test email archive +# +## + +$email = $machine_data\n\n$dejagnutests_log\n\ncvs user commit list:\n$cvsusercommitlist\n\ncvs user . + update list:\n$cvsuserupdatelist\n\ncvs changed files:\n$cvsmodifiedfiles\n; +$email_addr = [EMAIL PROTECTED]; +$themail = `mail -s 'X86 nightly tester results' $email_addr $email`; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.12 - 1.13 --- Log message: made the title of the email to the nightly test email archive more descriptive --- Diffs of the changes: (+1 -1) NightlyTestAccept.cgi |2 +- 1 files changed, 1 insertion(+), 1 deletion(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.12 nightlytest-serverside/NightlyTestAccept.cgi:1.13 --- nightlytest-serverside/NightlyTestAccept.cgi:1.12 Fri Jul 14 16:11:41 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiFri Jul 14 16:13:25 2006 @@ -485,4 +485,4 @@ $email = $machine_data\n\n$dejagnutests_log\n\ncvs user commit list:\n$cvsusercommitlist\n\ncvs user . update list:\n$cvsuserupdatelist\n\ncvs changed files:\n$cvsmodifiedfiles\n; $email_addr = [EMAIL PROTECTED]; -$themail = `mail -s 'X86 nightly tester results' $email_addr $email`; +`mail -s '$nickname $hardware nightly tester results' $email_addr $email`; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
[llvm-commits] CVS: nightlytest-serverside/NightlyTestAccept.cgi
Changes in directory nightlytest-serverside: NightlyTestAccept.cgi updated: 1.10 - 1.11 --- Log message: Hopefully fixed the code that creates a file of the buildlog for each nightly test --- Diffs of the changes: (+9 -7) NightlyTestAccept.cgi | 16 +--- 1 files changed, 9 insertions(+), 7 deletions(-) Index: nightlytest-serverside/NightlyTestAccept.cgi diff -u nightlytest-serverside/NightlyTestAccept.cgi:1.10 nightlytest-serverside/NightlyTestAccept.cgi:1.11 --- nightlytest-serverside/NightlyTestAccept.cgi:1.10 Fri Jul 7 13:36:01 2006 +++ nightlytest-serverside/NightlyTestAccept.cgiMon Jul 10 17:25:32 2006 @@ -451,15 +451,17 @@ # writing logs to directory # ## +$curr=`pwd`; +chomp($curr); + if(! -d machines){ -mkdir machines, 0777 or print(couldnt create directory $base); -} -ChangeDir(machines, Moving into machines directory); +mkdir $curr/machines, 0777 or print(couldnt create directory $base); + } +ChangeDir($curr/machines, Moving into machines directory); if(! -d $machine_id){ -mkdir $machine_id, 0777 or print(couldnt create directory $machine_id because $!); -} -ChangeDir($machine_id, Moving into machine $machine_id 's directory); - +mkdir $curr/machines/$machine_id, 0777 or print(couldnt create directory $machine_id because $!); + } +ChangeDir($curr/machines/$machine_id, Moving into machine $machine_id 's directory); $db_date =~ s/ /\_/g; my $build_file = $db_date-Build-Log.txt; ___ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits