#! /bin/bash

IFS=$'\n'

all_provides() {
    nm "$@" \
    | sed -r -ne 's:^0*([0-9a-f]+) A __crc_(.+):\1\t\2:p' \
    | sort -k2 -u
}

all_requires() {
    for module in "$@"; do
        set -- $(/sbin/modinfo -F vermagic "$module" | sed -e 's: .*::' -e q)
        /sbin/modprobe --dump-modversions "$module" \
        | sed -r -e 's:^0x0*::' -e 's:$:\t'"$1"':'
    done \
    | sort -k2 -u
}

if ! [ -e /sbin/modinfo -a -e /sbin/modprobe ]; then
    cat > /dev/null
    exit 0
fi

modules=($(grep -E '/lib/modules/.+\.ko$'))
if [ ${#modules[@]} -gt 0 ]; then
    symset_table=$(mktemp -t ${0##*/}.XXXXX)
    /usr/lib/rpm/redhat/symset-table | sort > $symset_table

    join -t $'\t' -j 1 -a 2 $symset_table <(
        # Filter out requirements that we fulfill ourself.
        join -t $'\t' -j 2 -v 1 \
            <(all_requires "${modules[@]}") \
            <(all_provides "${modules[@]}") \
        | awk '
        BEGIN { FS = "\t" ; OFS = "\t" }
        { print $3 "/" $2 "/" $1 }
        ' \
        | sort -u) \
    | sort -u \
    | awk '
    { FS = "\t" ; OFS = "\t" }
    NF == 3 { print "kernel(" $2 ") = " $3
              next }
            { split($1, arr, "/")
              print "ksym(" arr[3] ") = " arr[2] }
    '
fi