/[collab-qa]/udd/web/bugs.cgi
ViewVC logotype

Diff of /udd/web/bugs.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

udd/web/cgi-bin/bugs.cgi revision 1787 by lucas, Mon Sep 13 13:32:51 2010 UTC udd/web/bugs.cgi revision 1838 by lucas, Mon Nov 1 10:25:17 2010 UTC
# Line 9  puts "Content-type: text/html\n\n" Line 9  puts "Content-type: text/html\n\n"
9  RELEASE_RESTRICT = [  RELEASE_RESTRICT = [
10    ['squeeze', 'squeeze', 'id in (select id from bugs_rt_affects_testing)'],    ['squeeze', 'squeeze', 'id in (select id from bugs_rt_affects_testing)'],
11    ['sid', 'sid', 'id in (select id from bugs_rt_affects_unstable)'],    ['sid', 'sid', 'id in (select id from bugs_rt_affects_unstable)'],
12    ['squeeze_and_sid', 'squeeze and sid', 'id in (select id from bugs_rt_affects_testing_and_unstable)'],    ['squeeze_and_sid', 'squeeze and sid', 'id in (select id from bugs_rt_affects_testing) and id in (select id from bugs_rt_affects_unstable)'],
13    ['squeeze_or_sid', 'squeeze or sid', 'id in (select id from bugs_rt_affects_testing union select id from bugs_rt_affects_unstable)'],    ['squeeze_or_sid', 'squeeze or sid', 'id in (select id from bugs_rt_affects_testing union select id from bugs_rt_affects_unstable)'],
14    ['squeeze_not_sid', 'squeeze, not sid', 'id in (select id from bugs_rt_affects_testing) and id not in (select id from bugs_rt_affects_unstable)'],    ['squeeze_not_sid', 'squeeze, not sid', 'id in (select id from bugs_rt_affects_testing) and id not in (select id from bugs_rt_affects_unstable)'],
15    ['sid_not_squeeze', 'sid, not squeeze', 'id in (select id from bugs_rt_affects_unstable) and id not in (select id from bugs_rt_affects_testing)']    ['sid_not_squeeze', 'sid, not squeeze', 'id in (select id from bugs_rt_affects_unstable) and id not in (select id from bugs_rt_affects_testing)'],
16      ['lenny', 'lenny', 'id in (select id from bugs_rt_affects_stable)'],
17      ['any', 'any', 'id in (select id from bugs where status!=\'done\')'],
18  ]  ]
19    
20  FILTERS = [  FILTERS = [
21   ['patch', 'tagged patch', 'id in (select id from bugs_tags where tag=\'patch\')'],   ['patch', 'tagged patch', 'id in (select id from bugs_tags where tag=\'patch\')'],
22   ['pending', 'tagged pending', 'id in (select id from bugs_tags where tag=\'pending\')'],   ['pending', 'tagged pending', 'id in (select id from bugs_tags where tag=\'pending\')'],
23   ['security', 'tagged security', 'id in (select id from bugs_tags where tag=\'security\')'],   ['security', 'tagged security', 'id in (select id from bugs_tags where tag=\'security\')'],
24     ['claimed', 'claimed bugs', "id in (select id from bugs_usertags where email='bugsquash@qa.debian.org')"],
25     ['deferred', 'fixed in deferred/delayed', "id in (select id from deferred_closes)"],
26   ['notmain', 'packages not in main', 'id not in (select id from bugs_packages, sources where bugs_packages.source = sources.source and component=\'main\')'],   ['notmain', 'packages not in main', 'id not in (select id from bugs_packages, sources where bugs_packages.source = sources.source and component=\'main\')'],
27   ['notsqueeze', 'packages not in squeeze', 'id not in (select id from bugs_packages, sources where bugs_packages.source = sources.source and release=\'squeeze\')'],   ['notsqueeze', 'packages not in squeeze', 'id not in (select id from bugs_packages, sources where bugs_packages.source = sources.source and release=\'squeeze\')'],
28     ['base', 'packages in base system', 'bugs.source in (select source from sources where priority=\'required\' or priority=\'important\')'],
29     ['standard', 'packages in standard installation', 'bugs.source in (select source from sources where priority=\'standard\')'],
30   ['merged', 'merged bugs', 'id in (select id from bugs_merged_with where id > merged_with)'],   ['merged', 'merged bugs', 'id in (select id from bugs_merged_with where id > merged_with)'],
31   ['done', 'marked as done', 'status = \'done\''],   ['done', 'marked as done', 'status = \'done\''],
32     ['outdatedsqueeze', 'outdated binaries in squeeze', "bugs.source in (select distinct p1.source from packages_summary p1, packages_summary p2 where p1.source = p2.source and p1.release='squeeze' and p2.release='squeeze' and p1.source_version != p2.source_version)"],
33     ['outdatedsid', 'outdated binaries in sid', "bugs.source in (select distinct p1.source from packages_summary p1, packages_summary p2 where p1.source = p2.source and p1.release='sid' and p2.release='sid' and p1.source_version != p2.source_version)"],
34     ['needmig', 'different versions in squeeze and sid', "bugs.source in (select s1.source from sources s1, sources s2 where s1.source = s2.source and s1.release = 'squeeze' and s2.release='sid' and s1.version != s2.version)"],
35     ['newerubuntu', 'newer in Ubuntu than in sid', "bugs.source in (select s1.source from sources_uniq s1, ubuntu_sources s2 where s1.source = s2.source and s1.release = 'sid' and s2.release='natty' and s1.version < s2.version)"],
36  ]  ]
37    
38  TYPES = [  TYPES = [
# Line 31  TYPES = [ Line 41  TYPES = [
41    ['lfs', 'release goal: Large File Support', 'id in (select id from bugs_tags where tag=\'lfs\')', false ],    ['lfs', 'release goal: Large File Support', 'id in (select id from bugs_tags where tag=\'lfs\')', false ],
42    ['boot', 'release goal: boot performance (init.d dependencies)', 'id in (select id from bugs_usertags where email = \'initscripts-ng-devel@lists.alioth.debian.org\')', false],    ['boot', 'release goal: boot performance (init.d dependencies)', 'id in (select id from bugs_usertags where email = \'initscripts-ng-devel@lists.alioth.debian.org\')', false],
43    ['oldgnome', 'release goal: remove obsolete GNOME libraries', 'id in (select id from bugs_usertags where email = \'pkg-gnome-maintainers@lists.alioth.debian.org\' and tag=\'oldlibs\')', false],    ['oldgnome', 'release goal: remove obsolete GNOME libraries', 'id in (select id from bugs_usertags where email = \'pkg-gnome-maintainers@lists.alioth.debian.org\' and tag=\'oldlibs\')', false],
44      ['ruby', 'Ruby bugs', "bugs.source in (select source from sources where maintainer ~ 'ruby' or uploaders ~ 'ruby')\nOR bugs.package in (select source from packages where (package ~ 'ruby' or depends ~ 'ruby') and source != 'subversion')\nOR title ~ 'ruby'"],
45      ['l10n', 'Localisation bugs', 'id in (select id from bugs_tags where tag=\'l10n\')', false],
46      ['allbugs', 'All bugs', 'true', false],
47  ]  ]
48    
49  SORTS = [  SORTS = [
50    ['id', 'bug#'],    ['id', 'bug#'],
51    ['source', 'source package'],    ['source', 'source package'],
52    ['package', 'binary package'],    ['package', 'binary package'],
53    ['last_modified', 'last modified']    ['last_modified', 'last modified'],
54      ['severity', 'severity'],
55      ['popcon', 'popularity contest'],
56    ]
57    
58    COLUMNS = [
59      ['cpopcon', 'popularity contest'],
60      ['chints', 'release team hints'],
61      ['cseverity', 'severity'],
62      ['ctags', 'tags'],
63      ['cclaimed', 'claimed by'],
64      ['cdeferred', 'deferred/delayed'],
65  ]  ]
66    
67  cgi = CGI::new  cgi = CGI::new
# Line 47  if RELEASE_RESTRICT.map { |r| r[0] }.inc Line 71  if RELEASE_RESTRICT.map { |r| r[0] }.inc
71  else  else
72    release = 'squeeze'    release = 'squeeze'
73  end  end
74    # columns
75    cols = {}
76    COLUMNS.map { |r| r[0] }.each do |r|
77      if cgi.params[r][0]
78        cols[r] = true
79      else
80        cols[r] = false
81      end
82    end
83  # sorts  # sorts
84  if SORTS.map { |r| r[0] }.include?(cgi.params['sortby'][0])  if SORTS.map { |r| r[0] }.include?(cgi.params['sortby'][0])
85    sortby = cgi.params['sortby'][0]    sortby = cgi.params['sortby'][0]
# Line 58  if ['asc', 'desc'].include?(cgi.params[' Line 91  if ['asc', 'desc'].include?(cgi.params['
91  else  else
92    sorto = 'asc'    sorto = 'asc'
93  end  end
94    # hack to enable popcon column if sortby = popcon
95    cols['cpopcon'] = true if sortby == 'popcon'
96    cols['cseverity'] = true if sortby == 'severity'
97  # filters  # filters
98  filters = {}  filters = {}
99  FILTERS.map { |r| r[0] }.each do |e|  FILTERS.map { |r| r[0] }.each do |e|
100    if ['notconsidered', 'only', 'ign'].include?(cgi.params[e][0])    if ['', 'only', 'ign'].include?(cgi.params[e][0])
101      filters[e] = cgi.params[e][0]      filters[e] = cgi.params[e][0]
102    else    else
103      filters[e] = (e == 'merged' ? 'ign' : 'notconsidered')      filters[e] = (e == 'merged' ? 'ign' : '')
104    end    end
105  end  end
106  # filter: newer than X days  # filter: newer than X days
107  if ['notconsidered', 'only', 'ign'].include?(cgi.params['fnewer'][0])  if ['', 'only', 'ign'].include?(cgi.params['fnewer'][0])
108    fnewer = cgi.params['fnewer'][0]    fnewer = cgi.params['fnewer'][0]
109  else  else
110    fnewer = 'notconsidered'    fnewer = ''
111  end  end
112  if cgi.params['fnewerval'][0] =~ /^[0-9]+$/  if cgi.params['fnewerval'][0] =~ /^[0-9]+$/
113    fnewerval = cgi.params['fnewerval'][0].to_i    fnewerval = cgi.params['fnewerval'][0].to_i
# Line 96  puts <<-EOF Line 132  puts <<-EOF
132  <html>  <html>
133  <head>  <head>
134  <style type="text/css">  <style type="text/css">
135    
136      body {
137        font-family : "DejaVu Sans", "Bitstream Vera Sans", sans-serif;"
138      }
139    
140    table.buglist td, table.buglist th {    table.buglist td, table.buglist th {
141      border: 1px solid gray;      border: 1px solid gray;
142      padding-left: 3px;      padding-left: 3px;
# Line 108  puts <<-EOF Line 149  puts <<-EOF
149      border-collapse: collapse;      border-collapse: collapse;
150    }    }
151    
152    div#body {
153      border-top: 2px solid #d70751;
154    }
155    
156    div.footer {
157        padding: 0.3em 0;
158        background-color: #fff;
159        text-align: center;
160        border-top: 2px solid #d70751;
161        margin: 0 0 0 0;
162        border-bottom: 0;
163        font-size: 85%;
164    }
165  </style>  </style>
166  <title>RC Bugs List @ UDD</title>  <title>Debian Bugs Search @ UDD</title>
167    <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
168  </head>  </head>
169  <body>  <body>
170  <h1>Release Critical Bugs List</h1>  <h1 style="margin-bottom : 5px"><img src="http://qa.debian.org/debian.png" alt="Debian logo" width="188" height="52" style="vertical-align : -13px; ">Bugs Search <span style="color :#c70036">@</span> UDD</h1>
171    <div id="body">
172    
173  <form action="bugs.cgi" method="get">  <form action="bugs.cgi" method="get">
174  <p><b>Bugs affecting:</b>  <p><b>Bugs affecting:</b>
# Line 123  RELEASE_RESTRICT.each do |r| Line 179  RELEASE_RESTRICT.each do |r|
179    puts "<input type='radio' name='release' value='#{r[0]}' #{checked}/>#{r[1]}&nbsp;&nbsp;"    puts "<input type='radio' name='release' value='#{r[0]}' #{checked}/>#{r[1]}&nbsp;&nbsp;"
180  end  end
181  puts <<-EOF  puts <<-EOF
182  </p>  <br/>(also uses release tags and xxx-ignore information)</p>
183  <table class="invisible"><tr><td>  <table class="invisible"><tr><td>
184  <table class="buglist">  <table class="buglist">
185  <tr><th colspan='4'>FILTERS</th></tr>  <tr><th colspan='4'>FILTERS</th></tr>
# Line 132  EOF Line 188  EOF
188  FILTERS.each do |r|  FILTERS.each do |r|
189    puts <<-EOF    puts <<-EOF
190    <tr>    <tr>
191    <td style='text-align: center;'><input type='radio' name='#{r[0]}' value='' #{filters[r[0]]=='notconsidered'?'CHECKED=\'1\'':''}/></td>    <td style='text-align: center;'><input type='radio' name='#{r[0]}' value='' #{filters[r[0]]==''?'CHECKED=\'1\'':''}/></td>
192    <td style='text-align: center;'><input type='radio' name='#{r[0]}' value='only' #{filters[r[0]]=='only'?'CHECKED=\'1\'':''}/></td>    <td style='text-align: center;'><input type='radio' name='#{r[0]}' value='only' #{filters[r[0]]=='only'?'CHECKED=\'1\'':''}/></td>
193    <td style='text-align: center;'><input type='radio' name='#{r[0]}' value='ign' #{filters[r[0]]=='ign'?'CHECKED=\'1\'':''}'/></td>    <td style='text-align: center;'><input type='radio' name='#{r[0]}' value='ign' #{filters[r[0]]=='ign'?'CHECKED=\'1\'':''}/></td>
194    <td>#{r[1]}</td>    <td>#{r[1]}</td>
195    </tr>    </tr>
196    EOF    EOF
# Line 142  end Line 198  end
198  # newer than  # newer than
199  puts <<-EOF  puts <<-EOF
200    <tr>    <tr>
201    <td style='text-align: center;'><input type='radio' name='fnewer' value='' #{fnewer=='notconsidered'?'CHECKED=\'1\'':''}/></td>    <td style='text-align: center;'><input type='radio' name='fnewer' value='' #{fnewer==''?'CHECKED=\'1\'':''}/></td>
202    <td style='text-align: center;'><input type='radio' name='fnewer' value='only' #{fnewer=='only'?'CHECKED=\'1\'':''}/></td>    <td style='text-align: center;'><input type='radio' name='fnewer' value='only' #{fnewer=='only'?'CHECKED=\'1\'':''}/></td>
203    <td style='text-align: center;'><input type='radio' name='fnewer' value='ign' #{fnewer=='ign'?'CHECKED=\'1\'':''}'/></td>    <td style='text-align: center;'><input type='radio' name='fnewer' value='ign' #{fnewer=='ign'?'CHECKED=\'1\'':''}/></td>
204    <td>newer than <input type='text' size='3' name='fnewerval' value='#{fnewerval}'/> days</td>    <td>newer than <input type='text' size='3' name='fnewerval' value='#{fnewerval}'/> days</td>
205    </tr>    </tr>
206  EOF  EOF
# Line 165  puts "<b> -- </b>" Line 221  puts "<b> -- </b>"
221    checked = (sorto == r[0] ? 'CHECKED=\'1\'':'')    checked = (sorto == r[0] ? 'CHECKED=\'1\'':'')
222    puts "<input type='radio' name='sorto' value='#{r[0]}' #{checked}/>#{r[1]}&nbsp;&nbsp;"    puts "<input type='radio' name='sorto' value='#{r[0]}' #{checked}/>#{r[1]}&nbsp;&nbsp;"
223  end  end
224    puts "<br/>\n<b>Additional information:</b> "
225    COLUMNS.each do |r|
226      checked = cols[r[0]] ? 'checked':''
227      puts "<input type='checkbox' name='#{r[0]}' value='1' #{checked}/>#{r[1]}&nbsp;&nbsp;"
228    end
229  puts <<-EOF  puts <<-EOF
230  </p><input type='submit' value='Update'/>  <br/>\n<input type='submit' value='Search'/></p>
231  </form>  </form>
232  EOF  EOF
233  if cgi.params != {}  if cgi.params != {}
# Line 174  if cgi.params != {} Line 235  if cgi.params != {}
235  # Generate and execute query  # Generate and execute query
236  tstart = Time::now  tstart = Time::now
237  dbh = DBI::connect('DBI:Pg:dbname=udd;port=5441;host=localhost', 'guest')  dbh = DBI::connect('DBI:Pg:dbname=udd;port=5441;host=localhost', 'guest')
238  q = "select id, bugs.package, bugs.source, title, last_modified from bugs \n"  if cols['cpopcon']
239      q = "select id, bugs.package, bugs.source, severity, title, last_modified, coalesce(popcon_src.insts, 0) as popcon\nfrom bugs left join popcon_src on (bugs.source = popcon_src.source) \n"
240    else
241      q = "select id, bugs.package, bugs.source, severity, title, last_modified from bugs \n"
242    end
243  q += "where #{RELEASE_RESTRICT.select { |r| r[0] == release }[0][2]} \n"  q += "where #{RELEASE_RESTRICT.select { |r| r[0] == release }[0][2]} \n"
244  FILTERS.each do |f|  FILTERS.each do |f|
245    if filters[f[0]] == 'only'    if filters[f[0]] == 'only'
# Line 188  if fnewer == 'only' Line 253  if fnewer == 'only'
253  elsif fnewer == 'ign'  elsif fnewer == 'ign'
254    q += "and (current_timestamp - interval '#{fnewerval} days' > arrival) \n"    q += "and (current_timestamp - interval '#{fnewerval} days' > arrival) \n"
255  end  end
256  q += "AND ("  q2 = TYPES.select { |t| types[t[0]] }.map { |t| t[2] }.join("\n OR ")
257  q += TYPES.select { |t| types[t[0]] }.map { |t| t[2] }.join("\n OR ")  if q2 != ""
258  q += ")\n "    q += "AND (#{q2})\n"
259    else
260      puts "<p><b>Must select at least one bug type!</b></p>"
261      q += "AND FALSE\n"
262    end
263  q += "order by #{sortby} #{sorto}"  q += "order by #{sortby} #{sorto}"
264  sth = dbh.prepare(q)  begin
265  sth.execute    sth = dbh.prepare(q)
266  rows = sth.fetch_all    sth.execute
267      rows = sth.fetch_all
268    rescue DBI::ProgrammingError => e
269      puts "<p>The query generated an error, please report it to lucas@debian.org: #{e.message}</p>"
270      puts "<pre>#{q}</pre>"
271      exit(0)
272    end
273    
274    if cols['chints']
275      sthh = dbh.prepare("select distinct source, type, argument, version, file, comment from relevant_hints order by type")
276      sthh.execute
277      rowsh = sthh.fetch_all
278      hints = {}
279      rowsh.each do |r|
280        hints[r['source']] ||= []
281        hints[r['source']] << r
282      end
283    end
284    
285  puts "<p><b>#{rows.length} bugs found.</b></p>"  if cols['ctags']
286  puts <<-EOF    ids = rows.map { |r| r['id'] }.join(',')
287  <table class="buglist">    stht = dbh.prepare("select id, tag from bugs_tags where id in (#{ids})")
288  <tr><th>bug#</th><th>source pkg</th><th>binary pkg</th><th>title</th><th>last&nbsp;modified</th></tr>    stht.execute
289  EOF    rowst = stht.fetch_all
290  rows.each do |r|    tags = {}
291    puts "<tr><td style='text-align: center;'><a href=\"http://bugs.debian.org/#{r['id']}\">##{r['id']}</a></td>"    rowst.each do |r|
292    puts "<td style='text-align: center;'>"      tags[r['id']] ||= []
293    puts r['source'].split(/,\s*/).map { |pkg| "<a href=\"http://packages.qa.debian.org/#{pkg}\">#{pkg}</a>" }.join(', ')      tags[r['id']] << r['tag']
294    puts "</td>"    end
   puts <<-EOF  
   <td style='text-align: center;'>#{r['package']}</td>  
   <td>#{r['title']}</td>  
   <td style='text-align: center;'>#{r['last_modified'].to_date}</td>  
   </tr>  
   EOF  
295  end  end
 =begin  
 release goals:  
 all  
 include / only  
   
 columns:  
 id  
 source  
 package  
 title  
296    
297  time  if cols['cclaimed']
298  data last refreshed    ids = rows.map { |r| r['id'] }.join(',')
299  EOF    stht = dbh.prepare("select id, tag from bugs_usertags where email='bugsquash@qa.debian.org' and id in (#{ids})")
300  =end    stht.execute
301      rowst = stht.fetch_all
302      claimedbugs = {}
303      rowst.each do |r|
304        claimedbugs[r['id']] ||= []
305        claimedbugs[r['id']] << r['tag']
306      end
307    end
308    
309  =begin  if cols['cdeferred']
310  sth = dbh.prepare("select id, bugs.package, bugs.source, insts, title from bugs, popcon_src where bugs.source = popcon_src.source and id in (select id from bugs_rt_affects_testing_and_unstable) and id in (select id from bugs_tags where tag='patch') and id not in (select id from bugs_tags where tag='pending') and severity >= 'serious' order by id")    ids = rows.map { |r| r['id'] }.join(',')
311  sth.execute ; rows = sth.fetch_all    sthd = dbh.prepare("select id, deferred.source, deferred.version, extract (day from delayed_until) as du from deferred, deferred_closes where deferred.source = deferred_closes.source and deferred.version = deferred_closes.version and deferred_closes.id in (#{ids})")
312      sthd.execute
313  puts "<h2>RC bugs tagged patch (and not pending)</h2>"    rowsd = sthd.fetch_all
314  puts "<table>"    deferredbugs = {}
315  puts "<tr><th>bug</th><th>package</th><th>source</th><th>popcon</th><th>title</th></tr>"    rowsd.each do |r|
316  rows.each do |r|      d = r['du'].to_i
317     puts "<tr><td><a href=\"http://bugs.debian.org/#{r['id']}\">#{r['id']}</a></td>"      deferredbugs[r['id']] = "#{r['version']} (#{d}&nbsp;day#{d==1?'':'s'})"
318     puts "<td>#{r['package']}</td>"    end
    puts "<td><a href=\"http://packages.qa.debian.org/#{r['source']}\">#{r['source']}</a></td>"  
    puts "<td>#{r['insts']}</td>"  
    puts "<td>#{r['title']}</td>"  
319  end  end
 puts "</table>"  
 sth.finish  
320    
321  puts "<h2>RC bugs on packages with a newer version in Ubuntu (possible patches), not tagged patch nor pending</h2>"  puts "<p><b>#{rows.length} bugs found.</b></p>"
322  puts "<table>"  puts '<table class="buglist">'
323  puts "<tr><th>bug</th><th>package</th><th>source</th><th>versions (D/U)</th><th>popcon</th><th>title</th></tr>"  puts '<tr><th>bug#</th><th>package</th><th>title</th>'
324    puts '<th>popcon</th>' if cols['cpopcon']
325  sth = dbh.prepare("WITH ubudeb AS (select distinct on (d.source, u.source) d.source as dsource, u.source as usource, d.version as dversion, u.version as uversion from sources_uniq d, ubuntu_sources u where d.release = 'sid' and d.distribution = 'debian' and u.release = '#{URELEASE}' and u.distribution = 'ubuntu' and u.source = d.source and u.version > d.version order by d.source asc, u.source asc, d.version desc)  puts '<th>severity</th>' if cols['cseverity']
326  select id, bugs.package, bugs.source, title, dversion, uversion, insts from bugs, ubudeb, popcon_src where popcon_src.source = bugs.source and id in (select id from bugs_rt_affects_testing_and_unstable) and id not in (select id from bugs_tags where tag='patch') and id not in (select id from bugs_tags where tag='pending') and severity >= 'serious' and ubudeb.dsource = bugs.source order by id")  puts '<th>hints</th>' if cols['chints']
327  sth.execute ; rows = sth.fetch_all  puts '<th>claimed by</th>' if cols['cclaimed']
328  rows.each do |r|  puts '<th>deferred</th>' if cols['cdeferred']
329     puts "<tr><td><a href=\"http://bugs.debian.org/#{r['id']}\">#{r['id']}</a></td>"  puts '<th>last&nbsp;modified</th></tr>'
330     puts "<td>#{r['package']}</td>"  
331     puts "<td><a href=\"http://packages.qa.debian.org/#{r['source']}\">#{r['source']}</a> <a href=\"https://launchpad.net/ubuntu/#{URELEASE}/+source/#{r['source']}/+changelog\">UbCh</a></td>"  def genhints(source, hints)
332     puts "<td>#{r['dversion']} / #{r['uversion']}</td>"    return '' if hints.nil?
333     puts "<td>#{r['insts']}</td>"    s = ''
334     puts "<td>#{r['title']}</td>"    hints.each do |h|
335        v = h['version'] ? h['version'] + ' ' : ''
336        t = h['type'] == 'age-days' ? "age/#{h['argument']}" : h['type']
337        s += "<a href=\"http://release.debian.org/britney/hints/#{h['file']}\" title=\"#{v}#{h['file']} #{h['comment']}\">#{t}</a> "
338      end
339      s
340  end  end
 puts "</table>"  
 sth.finish  
341    
342  sth = dbh.prepare("select id, bugs.package, bugs.source, insts, title from bugs, popcon_src where bugs.source = popcon_src.source and id in (select id from bugs_rt_affects_testing) and id not in (select id from bugs_rt_affects_unstable) and severity >= 'serious' order by package")  # copied from /org/bugs.debian.org/etc/config
343  sth.execute ; rows = sth.fetch_all  $TagsSingleLetter = {
344      'patch' => '+',
345      'wontfix' => '☹',
346      'moreinfo' => 'M',
347      'unreproducible' => 'R',
348      'security' => 'S',
349      'pending' => 'P',
350      'fixed'   => 'F',
351      'help'    => 'H',
352      'fixed-upstream' => 'U',
353      'upstream' => 'u',
354    # Added tags
355      'confirmed' => 'C',
356      'etch-ignore' => 'etc-i',
357      'lenny-ignore' => 'len-i',
358      'sarge-ignore' => 'sar-i',
359      'squeeze-ignore' => 'squ-i',
360      'woody' => 'wod',
361      'sarge' => 'sar',
362      'etch' => 'etc',
363      'lenny' => 'len',
364      'squeeze' => 'squ',
365      'sid' => 'sid',
366      'experimental' => 'exp',
367      'l10n' => 'l10n',
368      'd-i' => 'd-i',
369      'ipv6' => 'ipv6',
370      'lfs' => 'lfs',
371      'fixed-in-experimental' => 'fie',
372    }
373    
374    def gentags(tags)
375      return '' if tags.nil?
376      tags.sort!
377      texttags = tags.map do |tag|
378        puts "unknowntag: #{tag}" if $TagsSingleLetter[tag].nil?
379        "<abbr title='#{tag}'>#{$TagsSingleLetter[tag]}</abbr>"
380      end
381      return '&nbsp;[' + texttags.join('|') + ']'
382    end
383    
 puts "<h2>RC bugs affecting only testing (not unstable, and not pending)</h2>"  
 puts "<table>"  
 puts "<tr><th>bug</th><th>package</th><th>source</th><th>popcon</th><th>title</th></tr>"  
384  rows.each do |r|  rows.each do |r|
385     puts "<tr><td><a href=\"http://bugs.debian.org/#{r['id']}\">#{r['id']}</a></td>"    print "<tr><td style='text-align: left;'><a href=\"http://bugs.debian.org/#{r['id']}\">##{r['id']}</a>"
386     puts "<td>#{r['package']}</td>"    puts "#{gentags(tags[r['id']])}" if cols['ctags']
387     puts "<td><a href=\"http://packages.qa.debian.org/#{r['source']}\">#{r['source']}</a></td>"    puts "</td>"
388     puts "<td>#{r['insts']}</td>"    puts "<td style='text-align: center;'>"
389     puts "<td>#{r['title']}</td>"    srcs = r['source'].split(/,\s*/)
390      bins = r['package'].split(/,\s*/)
391      puts (0...bins.length).map { |i| "<a href=\"http://packages.qa.debian.org/#{srcs[i]}\">#{bins[i]}</a>" }.join(', ')
392      puts "</td>"
393      puts "<td>#{CGI::escapeHTML(r['title'])}</td>"
394      puts "<td>#{r['popcon']}</td>" if cols['cpopcon']
395      puts "<td>#{r['severity']}</td>" if cols['cseverity']
396      puts "<td>#{genhints(r['source'], hints[r['source']])}</td>" if cols['chints']
397      puts "<td>#{claimedbugs[r['id']]}</td>" if cols['cclaimed']
398      puts "<td>#{deferredbugs[r['id']]}</td>" if cols['cdeferred']
399      puts "<td style='text-align: center;'>#{r['last_modified'].to_date}</td></tr>"
400  end  end
 puts "</table>"  
 sth.finish  
401    
 =end  
402  puts "</table>"  puts "</table>"
403  sth2 = dbh.prepare("select max(start_time) from timestamps where source = 'bugs' and command = 'run'")  sth2 = dbh.prepare("select max(start_time) from timestamps where source = 'bugs' and command = 'run'")
404  sth2.execute ; r2 = sth2.fetch_all  sth2.execute ; r2 = sth2.fetch_all
405  puts "<p><b>Generated in #{Time::now - tstart} seconds. Last data update: #{r2[0][0]}</b></p>"  puts "<p><b>Generated in #{Time::now - tstart} seconds. Last data update: #{r2[0][0]}"
406    puts " (%.1f hours ago)</b></p>" % ((Time::now - r2[0][0].to_time) / 3600)
407  puts "<pre>#{q}</pre>"  puts "<pre>#{q}</pre>"
408  end # if cgi.params != {}  end # if cgi.params != {}
409  puts <<-EOF  puts <<-EOF
410  <hr/>  </div>
411  <small>Suggestions / comments / patches to lucas at debian dot org. <a href="http://svn.debian.org/wsvn/collab-qa/udd/web/cgi-bin/bugs.cgi">source code</a>.</small>  <div class="footer">
412    <small>Suggestions / comments / patches to lucas@debian.org. <a href="http://svn.debian.org/wsvn/collab-qa/udd/web/bugs.cgi">source code</a>.</small>
413    </div>
414  </body>  </body>
415  </html>  </html>
416  EOF  EOF

Legend:
Removed from v.1787  
changed lines
  Added in v.1838

  ViewVC Help
Powered by ViewVC 1.1.5