+function rpmsrclist
+{
+ if [ -z "$*" ]; then
+ echo >&2 "rpmsrclist gcc-4.3.2-7 [4.4.0-0.25 [-|http://kojipkgs.fedoraproject.org/packages/gcc/4.4.0/0.25/]]"
+ else
+ rpm -q --qf '%{SOURCERPM} %{name}-%{version}-%{release}.%{arch}\n' -a \
+ | grep "^$1.src.rpm " | sed 's/^[^ ]* //' \
+ | \
+ if [ -z "$2" ]; then \
+ cat; \
+ else \
+ sed "s/-$(echo "$1"|sed 's/^.*-\([^-]*-[^-]*\)$/\1/')/-$2/"
+ fi \
+ | \
+ if [ -z "$3" ]; then \
+ cat; \
+ else \
+ if [ "$3" != - ]; then
+ sed "s#.*#$3/&#"; \
+ else \
+ base="$(echo "$1"|sed 's/^\(.*\)-[^-]*-[^-]*$/\1/')"; \
+ sed "s#^.*-\([^-]*\)-\([^-]*\)\.\([^.]*\)\$#http://kojipkgs.fedoraproject.org/packages/$base/\1/\2/\3/&#"; \
+ fi; \
+ fi \
+ | sort -u
+ fi
+}