diff options
author | <> | 2003-09-22 02:07:49 +0000 |
---|---|---|
committer | <> | 2003-09-22 02:07:49 +0000 |
commit | 29de1e65e784b67e635616b2f4edf2a8a12e0a9e (patch) | |
tree | a62e374ceb5dad32cf92b11f84426345ec031586 /bin/show_qfiles | |
parent | a2a6085f338386ab1e4f34579a884e15b6639075 (diff) | |
download | mailman2-29de1e65e784b67e635616b2f4edf2a8a12e0a9e.tar.gz mailman2-29de1e65e784b67e635616b2f4edf2a8a12e0a9e.tar.xz mailman2-29de1e65e784b67e635616b2f4edf2a8a12e0a9e.zip |
This commit was manufactured by cvs2svn to create branch
'Release_2_1-maint'.
Diffstat (limited to '')
-rw-r--r-- | bin/show_qfiles | 74 |
1 files changed, 74 insertions, 0 deletions
diff --git a/bin/show_qfiles b/bin/show_qfiles new file mode 100644 index 00000000..dba22cd6 --- /dev/null +++ b/bin/show_qfiles @@ -0,0 +1,74 @@ +#! @PYTHON@ + +"""Show the contents of one or more Mailman queue files. + +Usage: show_qfiles [options] qfile ... + +Options: + + -q / --quiet + Don't print `helpful' message delimiters. + + -h / --help + Print this text and exit. + +Example: show_qfiles qfiles/shunt/*.pck +""" + +import sys +import getopt +from cPickle import load + +import paths +from Mailman.i18n import _ + +try: + True, False +except NameError: + True = 1 + False = 0 + + + +def usage(code, msg=''): + if code: + fd = sys.stderr + else: + fd = sys.stdout + print >> fd, _(__doc__) + if msg: + print >> fd, msg + sys.exit(code) + + + +def main(): + try: + opts, args = getopt.getopt(sys.argv[1:], 'hq', ['help', 'quiet']) + except getopt.error, msg: + usage(1, msg) + + quiet = False + for opt, arg in opts: + if opt in ('-h', '--help'): + usage(0) + elif opt in ('-q', '--quiet'): + quiet = True + + if not args: + usage(1, "Not enough arguments") + + for filename in args: + if not quiet: + print '====================>', filename + fp = open(filename) + if filename.endswith(".pck"): + msg = load(fp) + sys.stdout.write(msg.as_string()) + else: + sys.stdout.write(fp.read()) + + + +if __name__ == '__main__': + main() |