harmony-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From smish...@apache.org
Subject svn commit: r617065 - /harmony/enhanced/buildtest/branches/2.0/tools/snapshot/snapshots-table/snapshots.pl
Date Thu, 31 Jan 2008 08:32:58 GMT
Author: smishura
Date: Thu Jan 31 00:32:56 2008
New Revision: 617065

URL: http://svn.apache.org/viewvc?rev=617065&view=rev
Log:
Add percent number for API completeness report

Modified:
    harmony/enhanced/buildtest/branches/2.0/tools/snapshot/snapshots-table/snapshots.pl

Modified: harmony/enhanced/buildtest/branches/2.0/tools/snapshot/snapshots-table/snapshots.pl
URL: http://svn.apache.org/viewvc/harmony/enhanced/buildtest/branches/2.0/tools/snapshot/snapshots-table/snapshots.pl?rev=617065&r1=617064&r2=617065&view=diff
==============================================================================
--- harmony/enhanced/buildtest/branches/2.0/tools/snapshot/snapshots-table/snapshots.pl (original)
+++ harmony/enhanced/buildtest/branches/2.0/tools/snapshot/snapshots-table/snapshots.pl Thu
Jan 31 00:32:56 2008
@@ -288,6 +288,10 @@
         if ($response->is_success) {
             $api_report = "$test_results_links{$test_results_links_list[$i]}/$api_report_path";
             $api_report =~ s/\{SNAPSHOT\}/$rev/g;
+            
+            $response->content =~ m/="Total good">([^%]+)%<\/td>/sm;
+            $api_percent = $1;
+            
             $data_updated = 1;
             return;
         }
@@ -383,8 +387,9 @@
             $snapshots{$snapshot} = $1;
         }
         #Find API completeness report
-        if (($snapshot_cache_data =~ /API_REPORT\:\s*(.*?)\;/g) && $1) {
+        if (($snapshot_cache_data =~ /API_REPORT\:\s*([^:]*)\:\(.*\)\;/g) && $1)
{
             $api_report = $1;
+            $api_percent = $2;
         }
         #Parse cachefile data if cache is older than $cache_lag
         if ($cache_timestamp && (($cur_timestamp - $cache_timestamp) > $cache_lag))
{
@@ -466,8 +471,8 @@
             }
         }
         if (defined($api_report)) {
-            $testsuites_table =~ s/\{API_REPORT\}/<i><small><a href=\"$api_report\">API
completeness report<a> (without endorsed packages)<small><i>/g;
-            $snapshot_cache_data .= "API_REPORT:$api_report;\n";
+            $testsuites_table =~ s/\{API_REPORT\}/<br><i><small><a href=\"$api_report\">API
completeness report<a> (without endorsed packages): $api_percent%<small><i>/g;
+            $snapshot_cache_data .= "API_REPORT:$api_report:$api_percent;\n";
         } else {
             $testsuites_table =~ s/\{API_REPORT\}//g;
         }



Mime
View raw message