#!/usr/bin/env python
# -*- coding: utf-8 -*-
#
# Author: Jonathan Cervidae <jonathan.cervidae@gmail.com>
# PGP Fingerprint: 2DC0 0A44 123E 6CC2 EB55 EAFB B780 421F BF4C 4CB4
# Last changed: $LastEdit: 2009-05-16 18:53:50 BST$
#
# After creating this program, googling for the tag names it found located me
# this document:
#
# http://cpansearch.perl.org/src/RJRAY/Perl-RPM-1.51/RPM/Constants.pm
#
# Which nicely describes what each of these tags are for.
import rpm
import pprint
def is_a_key(string):
for character in string:
ordinal = ord(character)
if ordinal is not 95 and ( ordinal < 65 or ordinal > 90 ):
return False
return True
header_keys = []
transaction_set = rpm.TransactionSet()
match_iterator = transaction_set.dbMatch()
# Map RPM key names to numbers
numbers_to_names = {}
for attribute_name in dir(rpm):
if not is_a_key(attribute_name):
continue
if not isinstance(rpm.__dict__[attribute_name], int):
continue
numbers_to_names[rpm.__dict__[attribute_name]] = attribute_name
header = None
while match_iterator:
try:
header = match_iterator.next()
except StopIteration:
raise RuntimeError, "Not any headers"
break
header_metadata = {}
for key in header.keys():
header_metadata[numbers_to_names[key]] = header[key]
pprint.pprint(header_metadata)
