+function sumlog { find "$@" ! -name config.log -name "*.log" -o -name "*.sum"; }
+function sourcewarecvscheckout {(set -ex
+ ! test -d src
+ ! test -d $1-cvs
+ (set +x;cvs -z3 -d :pserver:anoncvs:@sourceware.org:/cvs/src checkout $1)
+ mv src $1-cvs
+ cd $1-cvs
+ (set +x;cvs update)
+ #(set +x;cvsignoresall)
+ (set +x;ignoresall)
+ );}
+function gdbgitclone { git clone git://sourceware.org/git/gdb.git gdb-git; }
+function binutilsgitclone { git clone git://sourceware.org/git/binutils.git binutils-git; }
+function gdbcvscheckout { sourcewarecvscheckout gdb; }
+function binutilscvscheckout { sourcewarecvscheckout binutils; }
+function uri_escape { perl -MURI::Escape -le '$_=<>;chomp;print uri_escape $_;'; };
+function uri_unescape { perl -MURI::Escape -le '$_=<>;chomp;print uri_unescape $_;'; };
+alias fetchmail='n fetchmail'
+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&.rpm#"; \
+ else \
+ base="$(echo "$1"|sed 's/^\(.*\)-[^-]*-[^-]*$/\1/')"; \
+ sed "s#^.*-\([^-]*\)-\([^-]*\)\.\([^.]*\)\$#http://kojipkgs.fedoraproject.org/packages/$base/\1/\2/\3/&.rpm#"; \
+ fi; \
+ fi \
+ | sort -u
+ fi
+}
+function valgrind {(set -e;unset valgrind;s=~/.python.valgrind;rm -f $s;cp -p /usr/share/doc/python-devel-2.*/valgrind-python.supp $s;patch $s <$s.patch;perl -i -e 'undef $/;$_=<>;1 while s/^(?:###)?({\n)(?:###)?( *ADDRESS_IN_RANGE.*\n(?:[^}#].*\n)*)###/$1$2/gm;print;' $s;valgrind --num-callers=50 --suppressions=$s "$@";);}
+function yumupdate {(ulimit -v unlimited;yum makecache;yum -y --skip-broken update "$@";);}