Here, unpolished, is a script I used to use to determine what changes I had made to an rpm-based system. It requires a least light editing (line 45, 49, and 52 at a minimum) to run on CentOS; probably won't hurt anything.

#! /bin/bash # Charles Polisher 2003-10-05

# # Summarize the key facts about the currently installed packages # in a form useful for building a host with the same complement # of packages. Creates 3 lists: # - the original install package list, # - packages that have been (upgraded/downgraded/added) # but are from the same distributor # - packages that have been added from another distribution # or from free-standing rpm's

# TODO: identify packages built from tarballs, and either # - installed a new program not available in the distro, or # avail from the distro but not sourced from it. # - installed a program that was available from the distro, # but was (upgraded/downgraded/patched/built-from-source) # nonetheless. # Maybe build a list of all libraries / executables in # /bin, /sbin, /usr/bin, /usr/sbin, /usr/local/bin, # /lib, /usr/lib, /usr/local/lib, (etc?), then run through # rpm's official list (rpm -qal) using it to delete from # the first list. Anything remaining is unaccounted for by # the rpmdb, and may represent an "outboard" package. # Note that the file versions/dates will need to be checked, # and the possibility of multiple versions of the same # program should be handled.

# DISTRO value ( matches key used in "DISTRIBUTION" field of RPMs) export DISTRO=SuSE

# Package installed later than this are designated as upgrades, # not part of the original installation. Format: YYYY-MM-DD export INSTALL_FINAL="2002-09-03"

# Reports directory, omit trailing / export OUTDIR=/home/chas/ADMIN/LOGS/rpm

export DATE=/bin/date export GREP=/usr/bin/egrep export SORT=/usr/bin/sort export RPM=/bin/rpm export TEE=/usr/bin/tee export AWK=/usr/bin/awk export CAT=/bin/cat export RM=/bin/rm

# --------- no changes below this line -------------------

export L_DATE=`${DATE} +%Y-%m-%d-%H%M` export EVENT=`date +%s --date="${INSTALL_FINAL}"` export TMPFILE=`mktemp /tmp/awkscript.XXXXXX`

# # RPM formatted output fields are in this order: # # Installtime Cookie Name Epoch Ver Fstate Packager Distribution # ------------ -------------- ---- ------ --- ------ --------- ------------ # 1054517704 rags.suse 1018 rpm none) 3.0 0 k@suse.de SuSE Linux 8 # ------------ -------------- ---- ------ --- ------ --------- ------------ # Field 1 Field 3 F 5 F7 F9 F11 Field 13 Field 15 # export FORMAT='%-30{INSTALLTIME} %-30{COOKIE} %-30{NAME} %-5{EPOCH} %-30{VERSION} %-30{FILESTATES} %-30{PACKAGER} %-30{DISTRIBUTION}\n'

cat << "EOS" > ${TMPFILE} BEGIN { FIELDWIDTHS="30 1 30 1 30 1 5 1 30 1 30 1 30 1 30"; } { # FIXME: SuSE -> ${DISTRO} a = match($15, /SuSE /) == 0 ? 0 : 1 if ( a != filter ) { printf("name: %-20s version: %-10s epoch: %-8s installed: %s packager: %-20s distro: %-15s\n", \ substr( $5,1,20), \ substr( $9,1,10), \ substr( $7,1, 6), \ strftime("%Y-%m-%d %H:%M",$1), \ substr($13,1,20), \ substr($15,1,15) \ ); } } EOS

${RPM} -qa --queryformat "${FORMAT}" \ | ${AWK} -f ${TMPFILE} filter=0 \ | ${SORT} \

${OUTDIR}/packages-installed-all-${DISTRO}-${L_DATE}.out

${RPM} -qa --queryformat "${FORMAT}" \ | ${AWK} -f ${TMPFILE} filter=1 \ | ${SORT} \

${OUTDIR}/packages-installed-non-${DISTRO}-${L_DATE}.out

${RM} ${TMPFILE}

cat << "EOS" > ${TMPFILE} BEGIN { FIELDWIDTHS="30 1 30 1 30 1 5 1 30 1 30 1 30 1 30"; print "Packages installed after " eventdate ":" ; } { if ( ( $1 > eventdate ) && ( match($15, /SuSE /) > 0 ) ) { printf("name: %-20s version: %-10s epoch: %-8s installed: %s packager: %-20s distro: %-15s\n", \ substr( $5,1,20), \ substr( $9,1,10), \ substr( $7,1, 6), \ strftime("%Y-%m-%d %H:%M",$1), \ substr($13,1,20), \ substr($15,1,15) \ ); } } EOS

${RPM} -qa --queryformat "${FORMAT}" \ | ${AWK} -f ${TMPFILE} eventdate=${EVENT} \ | ${SORT} \

${OUTDIR}/packages-upgraded------${DISTRO}-${L_DATE}.out

${RM} ${TMPFILE}