Script for generating overview of open GHC tickets by component

ghc-tickets.py

#!/usr/bin/env python

# Script for generating 
# https://ghc.haskell.org/trac/ghc/wiki/Status/Tickets

columns = (
    ('!', 'open tickets'),
    ('bug', 'bugs'),
    ('feature request', 'feature requests'),
    ('task', 'tasks'),
    )

components = '''
Build System
Code Coverage
Compiler
Compiler (CodeGen)
Compiler (FFI)
Compiler (LLVM)
Compiler (NCG)
Compiler (Parser)
Compiler (Type checker)
Data Parallel Haskell
Documentation
Driver
External Core
GHC API
GHCi
NoFib benchmark suite
None
Package system
Prelude
Profiling
Runtime System
Template Haskell
Test Suite
Trac \& Git
Visual Haskell
ghc-pkg
hsc2hs
libraries (other)
libraries/base
libraries/directory
libraries/haskell2010
libraries/haskell98
libraries/hoopl
libraries/old-time
libraries/pretty
libraries/process
libraries/random
libraries/unix
'''.strip().split('\n')

query = '''[[query:
status=!closed
&type={type}
&component={comp}
&group=priority
&col=id
&col=summary
&col=status
&col=type
&col=owner
&col=priority
&col=time
&col=changetime
&col=os
&col=architecture
&col=difficulty
&col=keywords
&order=id
|{text}]]
'''.replace('\n', '')

count = '[[TicketQuery(status!=closed&type={type}&component={comp}, count)]]'

cell = query + ' ' + count

lines = ['||'.join([comp] + [cell.format(type=type, text=text, comp=comp)
                             for type, text in columns])
         for comp in components]

print '||=Component=||' + ' ||' * len(columns)
print '\n'.join('||' + line + '||' for line in lines)