- add get-buildlog()

Changed files:
    rpm-build.sh -> 1.50

diff --git a/rpm-build.sh b/rpm-build.sh
index c6abbfc10d5a028d45ddea1ed54aa0b5aea4ef18..a1ae7bf0fe1e4a5b63a4de2dd650b5ac69be29e9 100644 (file)
--- a/rpm-build.sh
+++ b/rpm-build.sh
@@ -111,6 +111,42 @@ autotag() {
        done
 }
 
+get-buildlog() {
+       local p=$1
+       if [ -z "$p" ]; then
+               echo >&2 "Usage: get-buildlog PACKAGE"
+               echo >&2 ""
+               echo >&2 "Grabs buildlogs from pld builder for all arch."
+               return
+       fi
+
+       local al
+       case "$dist" in
+       ac)
+               al='i686,i586,i386,athlon,alpha,sparc,amd64,ppc'
+               ;;
+       th)
+               al='x86_64,athlon,i486,i686,ppc'
+               ;;
+       *)
+               echo >&2 "get-buildlog: $dist buildlogs are /dev/null"
+               return
+       esac
+
+       local u a s=ftp://buildlogs.pld-linux.org
+       for u in `eval echo $s/$dist/{$al}/{OK,FAIL}/$p.bz2`; do
+               a=${u#$s/$dist/}; a=${a%%/*}
+               echo -n "Fetching $u... "
+               if wget -q $u -O .$p~; then
+                       echo "OK"
+                       mv -f .$p~ $p.$a.bz2
+               else
+                       echo "SKIP"
+                       rm -f .$p~
+               fi
+       done
+}
+
 fi # no $dist set
 
 alias cv='cvs status -v'
@@ -207,7 +243,8 @@ sed -e '
        s,^@@ ,\e[33m&,;
        s,^-,\e[35m&,;
        s,^+,\e[36m&,;
-       s,\r,\e[44m^M\e[49m,g;
+       s,
+,\e[44m^M\e[49m,g;
        s,      ,    ,g;
        s,\([^[:space:]]\)\([[:space:]]\+\)$,\1\e[41m\2\e[49m,g;
        s,$,\e[0m,