[Collab-qa-commits] r911 - / buildd-failures

[lucas at alioth.debian.org]

Author: lucas
Date: 2008-07-12 09:42:48 +0000 (Sat, 12 Jul 2008)
New Revision: 911

Added:
   buildd-failures/
   buildd-failures/cqa-fetchbugs
   buildd-failures/fetch
   buildd-failures/stats.rb
Log:
add script to gather stats about build failures on buildds

Added: buildd-failures/cqa-fetchbugs
===================================================================
--- buildd-failures/cqa-fetchbugs	                        (rev 0)
+++ buildd-failures/cqa-fetchbugs	2008-07-12 09:42:48 UTC (rev 911)
@@ -0,0 +1,27 @@
+#! /usr/bin/ruby1.8 -w
+# Parse log files and extract info about packages that failed to build
+# because of dependancies problems.
+
+require 'collab-qa'
+require 'optparse'
+require 'soap/rpc/driver'
+
+bts = SOAP::RPC::Driver::new('http://bugs.debian.org/cgi-bin/soap.cgi', '/Debbugs/SOAP')
+bts.add_method('get_status', 'bugs')
+bts.add_method('get_bugs', 'params')
+bts.add_method('get_bug_log', 'params')
+bts.add_method('get_usertag', 'email', 'tag')
+bts.add_method('newest_bugs', 'num')
+
+IO::read('ood_excuses.txt').each_line do |l|
+  pkg = l.split(' ')[0]
+  bugs = bts.get_bugs(['src', pkg])
+  status = bts.get_status(bugs)
+  if bugs.length > 0
+    status.each_pair do |k,v|
+      next if v.done != ''
+      next if v.subject !~ /ftbfs/i and v.subject !~ /piuparts/i and v.subject != /installation/i and v.subject != /(post|pre)(rm|inst)/i
+      puts "#{pkg} #{k} #{v.severity} #{v.subject}"
+    end
+  end
+end


Property changes on: buildd-failures/cqa-fetchbugs
___________________________________________________________________
Name: svn:executable
   + *

Added: buildd-failures/fetch
===================================================================
--- buildd-failures/fetch	                        (rev 0)
+++ buildd-failures/fetch	2008-07-12 09:42:48 UTC (rev 911)
@@ -0,0 +1 @@
+wget http://qa.debian.org/~lucas/ood_excuses.txt


Property changes on: buildd-failures/fetch
___________________________________________________________________
Name: svn:executable
   + *

Added: buildd-failures/stats.rb
===================================================================
--- buildd-failures/stats.rb	                        (rev 0)
+++ buildd-failures/stats.rb	2008-07-12 09:42:48 UTC (rev 911)
@@ -0,0 +1,36 @@
+#!/usr/bin/ruby -w
+
+
+oods = {}
+IO::read('ood_excuses.txt').each_line do |l|
+  pkg, ver, archs = l.chomp.split(' ')
+  oods[pkg] = archs.split(/,/)
+end
+
+archs = []
+oods.each_pair do |k, v| 
+  archs += v
+end
+archs.sort!
+archs.uniq!
+
+bugs = {}
+IO::read('bugs').each_line do |l|
+  pkg, bug, rest = l.split(' ')
+  bugs[pkg] = bug
+end
+
+archs.each do |arch|
+  nfail = 0
+  nbug = 0
+  oods.each_pair do |k,v|
+    next if not v.include?(arch)
+    nfail += 1
+    if bugs.include?(k)
+      nbug += 1
+    else
+      puts "# #{k} #{arch} #{oods[k].length - 1}"
+    end
+  end
+  puts "#{arch}: #{nbug}/#{nfail} #{nbug*100/nfail}%"
+end


Property changes on: buildd-failures/stats.rb
___________________________________________________________________
Name: svn:executable
   + *