[packages/rpm-build-tools.git] / builder.sh

#!/bin/sh
# -----------
# $Id$
# Exit codes:
#	  0 - succesful
#	  1 - help displayed
#	  2 - no spec file name in cmdl parameters
#	  3 - spec file not stored in repo
#	  4 - some source, patch or icon files not stored in repo
#	  5 - package build failed
#	  6 - spec file with errors
#	  7 - wrong source in /etc/poldek.conf
#	  8 - Failed installing buildrequirements and subrequirements
#	  9 - Requested tag already exist
#	 10 - Refused to build fractional release
#	100 - Unknown error (should not happen)

# Notes (todo):
#	- builder -u fetches current version first (well that's okay, how you compare versions if you have no old spec?)
#	- when Icon: field is present, -5 and -a5 doesn't work
#	- builder -R skips installing BR if spec is not present before builder invocation (need to run builder twice)

VERSION="\
Build package utility from PLD Linux CVS repository
V 0.13 (C) 1999-2005 Free Penguins".
PATH="/bin:/usr/bin:/usr/sbin:/sbin:/usr/X11R6/bin"

COMMAND="build"
TARGET=""

SPECFILE=""
BE_VERBOSE=""
QUIET=""
CLEAN=""
DEBUG=""
NOURLS=""
NOCVS=""
NOCVSSPEC=""
NODIST=""
UPDATE=""
UPDATE5=""
ADD5=""
NO5=""
ALWAYS_CVSUP=${ALWAYS_CVSUP:-"yes"}
CVSROOT=""

# It can be used i.e. in log file naming.
# See LOGFILE example.
DATE=`date +%Y-%m-%d_%H-%M-%S`

# Example: LOGFILE='../log.$PACKAGE_NAME'
# Example: LOGFILE='../LOGS/log.$PACKAGE_NAME.$DATE'
# Yes, you can use variable name! Note _single_ quotes!
LOGFILE=''

LOGDIR=""
LOGDIROK=""
LOGDIRFAIL=""
LASTLOG_FILE=""

CHMOD="no"
CHMOD_MODE="0444"
RPMOPTS=""
BCOND=""
GROUP_BCONDS="no"
CVSIGNORE_DF="no"

PATCHES=""
SOURCES=""
ICONS=""
PACKAGE_RELEASE=""
PACKAGE_VERSION=""
PACKAGE_NAME=""
PROTOCOL="ftp"
WGET_RETRIES=${MAX_WGET_RETRIES:-0}
CVS_RETRIES=${MAX_CVS_RETRIES:-1000}

CVSTAG=""
RES_FILE=""

CVS_SERVER="cvs.pld-linux.org"
DISTFILES_SERVER="://distfiles.pld-linux.org"
ATTICDISTFILES_SERVER="://attic-distfiles.pld-linux.org"

DEF_NICE_LEVEL=19

FAIL_IF_NO_SOURCES="yes"

# let get_files skip over files which are present to get those damn files fetched
SKIP_EXISTING_FILES="no"

if [ -x /usr/bin/rpm-getdeps ]; then
	 FETCH_BUILD_REQUIRES_RPMGETDEPS="yes"
else
	 FETCH_BUILD_REQUIRES_RPMGETDEPS="no"
fi

# Here we load saved user environment used to
# predefine options set above, or passed to builder
# in command line.
# This one reads global system environment settings:
if [ -f ~/etc/builderrc ]; then
	. ~/etc/builderrc
fi
# And this one cascades settings using user personal
# builder settings.
# Example of ~/.builderrc:
#
#UPDATE_POLDEK_INDEXES="yes"
#FETCH_BUILD_REQUIRES="yes"
#REMOVE_BUILD_REQUIRES="force"
#GROUP_BCONDS="yes"
#LOGFILE='../LOGS/log.$PACKAGE_NAME.$DATE'
#
SU_SUDO=""
if [ -n "$HOME_ETC" ]; then
	USER_CFG="$HOME_ETC/.builderrc"
else
	USER_CFG=~/.builderrc
fi

[ -f "$USER_CFG" ] && . "$USER_CFG"

wget --help 2>&1 | grep -q ' \-\-no-check\-certificate ' && WGET_OPTS="$WGET_OPTS --no-check-certificate"

if [ -n "$USE_PROZILLA" ]; then
	GETURI="proz --no-getch -r -P ./ -t$WGET_RETRIES $PROZILLA_OPTS"
	GETURI2="$GETURI"
	OUTFILEOPT="-O"
elif [ -n "$USE_AXEL" ]; then
	GETURI="axel -a $AXEL_OPTS"
	GETURI2="$GETURI"
	OUTFILEOPT="-o"
else
	wget --help 2>&1 | grep -q ' \-\-inet ' && WGET_OPTS="$WGET_OPTS --inet"
	wget --help 2>&1 | grep -q ' \-\-retry\-connrefused ' && WGET_OPTS="$WGET_OPTS --retry-connrefused"

	GETURI="wget --passive-ftp -c -nd -t$WGET_RETRIES $WGET_OPTS"
	GETURI2="wget -c -nd -t$WGET_RETRIES $WGET_OPTS"
	OUTFILEOPT="-O"
fi

GETLOCAL="cp -a"

if (rpm --version 2>&1 | grep -q '4.0.[0-2]'); then
	RPM="rpm"
	RPMBUILD="rpm"
else
	RPM="rpm"
	RPMBUILD="rpmbuild"
fi

POLDEK_INDEX_DIR="`$RPM --eval %_rpmdir`/"
POLDEK_CMD="$SU_SUDO /usr/bin/poldek --noask"

run_poldek()
{
	RES_FILE=~/tmp/poldek-exit-status.$RANDOM
	if [ -n "$LOGFILE" ]; then
		LOG=`eval echo $LOGFILE`
		if [ -n "$LASTLOG_FILE" ]; then
			echo "LASTLOG=$LOG" > $LASTLOG_FILE
		fi
		(nice -n ${DEF_NICE_LEVEL} ${POLDEK_CMD} `while test $# -gt 0; do echo "$1 ";shift;done` ; echo $? > ${RES_FILE})|tee -a $LOG
		return $exit_pldk
	else
		(nice -n ${DEF_NICE_LEVEL} ${POLDEK_CMD} `while test $# -gt 0; do echo "$1 ";shift;done` ; echo $? > ${RES_FILE}) 1>&2 >/dev/null
		return `cat ${RES_FILE}`
		rm -rf ${RES_FILE}
	fi
}

#---------------------------------------------
# functions

usage()
{
	if [ -n "$DEBUG" ]; then set -xv; fi
	echo "\
Usage: builder [-D|--debug] [-V|--version] [-a|--as_anon] [-b|-ba|--build]

[-bb|--build-binary] [-bs|--build-source] [-u|--try-upgrade]
[{-B|--branch} <branch>] [{-d|--cvsroot} <cvsroot>] [-g|--get]
[-h|--help] [--http] [{-l,--logtofile} <logfile>] [-m|--mr-proper]
[-q|--quiet] [--date <yyyy-mm-dd> [-r <cvstag>] [{-T--tag <cvstag>]
[-Tvs|--tag-version-stable] [-Tvn|--tag-version-nest]
[-Ts|--tag-stable] [-Tn|--tag-nest] [-Tv|--tag-version]
[{-Tp|--tag-prefix} <prefix>] [{-tt|--test-tag}]
[-nu|--no-urls] [-v|--verbose] [--opts <rpm opts>] [--show-bconds]
[--with/--without <feature>] [--define <macro> <value>] <package>[.spec]

-5, --update-md5    - update md5 comments in spec, implies -nd -ncs
-a5, --add-md5      - add md5 comments to URL sources, implies -nc -nd -ncs
-n5, --no-md5       - ignore md5 comments in spec
-D, --debug         - enable builder script debugging mode,
-debug              - produce rpm debug package (same as --opts -debug)
-V, --version       - output builder version
-a, --as_anon       - get files via pserver as cvs@$CVS_SERVER,
-b, -ba, --build    - get all files from CVS repo or HTTP/FTP and build package
                      from <package>.spec,
-bb, --build-binary - get all files from CVS repo or HTTP/FTP and build binary
                      only package from <package>.spec,
-bp, --build-prep   - execute the %prep phase of <package>.spec,
-bc                 - reserved (not implemented)
-bi                   reserved (not implemented)
-bs, --build-source - get all files from CVS repo or HTTP/FTP and only pack
                      them into src.rpm,
--short-circuit     - reserved (not implemented)
-B, --branch        - add branch
-c, --clean         - clean all temporarily created files (in BUILD, SOURCES,
                      SPECS and \$RPM_BUILD_ROOT),
-d <cvsroot>, --cvsroot <cvsroot>
                    - setup \$CVSROOT,
--define <macro> <value>
                    - define a macro <macro> with value <value>,
--nodeps            - rpm won't check any dependences
-g, --get           - get <package>.spec and all related files from CVS repo
                      or HTTP/FTP,
-h, --help          - this message,
--http              - use http instead of ftp,
-l <logfile>, --logtofile <logfile>
                    - log all to file,
-m, --mr-proper     - only remove all files related to spec file and all work
                      resources,
-nc, --no-cvs       - don't download sources from CVS, if source URL is given,
-ncs, --no-cvs-specs
                    - don't check specs in CVS
-nd, --no-distfiles - don't download from distfiles
-nm, --no-mirrors   - don't download from mirror, if source URL is given,
-nu, --no-urls      - don't try to download from FTP/HTTP location,
-ns, --no-srcs      - don't download Sources
-ns0, --no-source0  - don't download Source0
-nn, --no-net       - don't download anything from the net
-ske,
--skip-existing-files - skip existing files in get_files
--opts <rpm opts>   - additional options for rpm
-q, --quiet         - be quiet,
--date yyyy-mm-dd   - build package using resources from specified CVS date,
-r <cvstag>, --cvstag <cvstag>
                    - build package using resources from specified CVS tag,
-R, --fetch-build-requires
                    - fetch what is BuildRequired,
-RB, --remove-build-requires
                    - remove all you fetched with -R or --fetch-build-requires
                      remember, this option requires confirmation,
-FRB, --force-remove-build-requires
                    - remove all you fetched with -R or --fetch-build-requires
                      remember, this option works without confirmation,
-sf, --source-files - list sources - bare filenames (intended for offline
                      operations; does not work when Icon field is present
							 but icon file is absent),
-sp, --source-paths - list sources - filenames with full local paths (intended for
                      offline operations; does not work when Icon field is present
							 but icon file is absent),
-su, --source-urls  - list urls - urls to sources and patches
                      intended for copying urls with spec with lots of macros in urls
-T <cvstag> , --tag <cvstag>
                    - add cvs tag <cvstag> for files,
-Tvs, --tag-version-stable
                    - add cvs tags STABLE and NAME-VERSION-RELEASE for files,
-Tvn, --tag-version-nest
                    - add cvs tags NEST and NAME-VERSION-RELEASE for files,
-Ts, --tag-stable
                    - add cvs tag STABLE for files,
-Tn, --tag-nest
                    - add cvs tag NEST for files,
-Tv, --tag-version
                    - add cvs tag NAME-VERSION-RELEASE for files,
-Tp, --tag-prefix <prefix>
                    - add <prefix> to NAME-VERSION-RELEASE tags,
-tt, --test-tag <prefix>
                    - fail if tag is already present,
-ir, --integer-release-only
                    - allow only integer and snapshot releases
-v, --verbose       - be verbose,
-u, --try-upgrade   - check version, and try to upgrade package
-un, --try-upgrade-with-float-version
                    - as above, but allow float version
-U, --update        - refetch sources, don't use distfiles, and update md5 comments
-Upi, --update-poldek-indexes
                    - refresh or make poldek package index files.
-np, --nopatch <patchnumber>
                    - don't apply <patchnumber>
--show-bconds       - show available conditional builds, which can be used
                    - with --with and/or --without switches.
--with/--without <feature>
                    - conditional build package depending on %_with_<feature>/
                      %_without_<feature> macro switch.  You may now use
                      --with feat1 feat2 feat3 --without feat4 feat5 --with feat6
                      constructions. Set GROUP_BCONDS to yes to make use of it.
--target <platform>, --target=<platform>
		    - build for platform <platform>.
"
}

update_shell_title() {
	[ -t 1 ] || return
	local len=${COLUMNS:-80}
	local msg=$(echo "$*" | cut -c-$len)

	msg="builder[$SPECFILE] ${SHELL_TITLE_PREFIX:+$SHELL_TITLE_PREFIX }$msg"
	case "$TERM" in
		cygwin|xterm*)
		echo >&2 -ne "\033]1;$msg\007\033]2;$msg\007"
	;;
		screen*)
		echo >&2 -ne "\033]0;$msg\007"
	;;
	esac
}

# set TARGET from BuildArch: from SPECFILE
set_spec_target() {
	 if [ -n "$SPECFILE" ] && [ -z "$TARGET" ]; then
		  tmp=$(awk '/^BuildArch:/ { print $NF}' $SPECFILE)
		  if [ "$tmp" ]; then
				TARGET="$tmp"
				case "$RPMBUILD" in
				"rpmbuild")
					 TARGET_SWITCH="--target $TARGET" ;;
				"rpm")
					 TARGET_SWITCH="--target=$TARGET" ;;
				esac
		  fi
	 fi
}

cache_rpm_dump () {
	 if [ -n "$DEBUG" ]; then
		  set -x;
		  set -v;
	 fi

rpm_dump_cache=`
	case "$RPMBUILD" in
		rpm )
			rpm -bp --nodeps --define 'prep %dump' $BCOND $TARGET_SWITCH $SPECFILE 2>&1
			;;
		rpmbuild )
			rpmbuild --nodigest --nosignature --define 'prep %dump' $BCOND $TARGET_SWITCH $SPECFILE 2>&1
			;;
	esac`
}

rpm_dump () {
	if [ -z "$rpm_dump_cache" ] ; then
		echo "internal error: cache_rpm_dump not called!" 1>&2
	fi
	echo "$rpm_dump_cache"
}

parse_spec()
{
	update_shell_title "parsing specfile"
	if [ -n "$DEBUG" ]; then
		set -x;
		set -v;
	fi

	cd $SPECS_DIR

	cache_rpm_dump

	if [ "$NOSRCS" != "yes" ]; then
		SOURCES="`rpm_dump | awk '/SOURCEURL[0-9]+/ {print $3}'`"
	fi
	if (rpm_dump | grep -qEi ":.*nosource.*1"); then
		FAIL_IF_NO_SOURCES="no"
	fi

	PATCHES="`rpm_dump | awk '/PATCHURL[0-9]+/ {print $3}'`"
	ICONS="`awk '/^Icon:/ {print $2}' ${SPECFILE}`"
	PACKAGE_NAME="`$RPM -q --qf '%{NAME}\n' --specfile ${SPECFILE} 2> /dev/null | head -n 1`"
	PACKAGE_VERSION="`$RPM -q --qf '%{VERSION}\n' --specfile ${SPECFILE} 2> /dev/null| head -n 1`"
	PACKAGE_RELEASE="`$RPM -q --qf '%{RELEASE}\n' --specfile ${SPECFILE} 2> /dev/null | head -n 1`"

# These variables may be unset after first cache_rpm_dump call
# (because of not-yet-retrieved icon file)
#
#	if [ -z "$PACKAGE_NAME" -o -z "$PACKAGE_VERSION" -o -z "$PACKAGE_RELEASE" ]; then
#		 Exit_error err_no_package_data;
#	fi

	if [ -n "$BE_VERBOSE" ]; then
		echo "- Sources :  `nourl $SOURCES`"
		if [ -n "$PATCHES" ]; then
			echo "- Patches :  `nourl $PATCHES`"
		else
			echo "- Patches :  *no patches needed*"
		fi
		if [ -n "$ICONS" ]; then
			echo "- Icon    :  `nourl $ICONS`"
		else
			echo "- Icon    :  *no package icon*"
		fi
		echo "- Name    : $PACKAGE_NAME"
		echo "- Version : $PACKAGE_VERSION"
		echo "- Release : $PACKAGE_RELEASE"
	fi
}

Exit_error()
{
	if [ -n "$DEBUG" ]; then
		set -x;
		set -v;
	fi

	cd "$__PWD"

	case "$1" in
		"err_no_spec_in_cmdl" )
			remove_build_requires
			echo "ERROR: spec file name not specified.";
			exit 2 ;;
		"err_no_spec_in_repo" )
			remove_build_requires
			echo "Error: spec file not stored in CVS repo.";
			exit 3 ;;
		"err_no_source_in_repo" )
			remove_build_requires
			echo "Error: some source, patch or icon files not stored in CVS repo. ($2)";
			exit 4 ;;
		"err_build_fail" )
			remove_build_requires
			echo "Error: package build failed. (${2:-no more info})";
			exit 5 ;;
		"err_no_package_data" )
			remove_build_requires
			echo "Error: couldn't get out package name/version/release from spec file."
			exit 6 ;;
	   "err_tag_exists" )
			remove_build_requires
			echo "Tag ${2} already exists (spec release: ${3}).";
			exit 9 ;;
	   "err_fract_rel" )
			remove_build_requires
			echo "Release ${2} not integer and not a snapshot.";
			exit 10 ;;
		"err_branch_exists" )
			remove_build_requires
			echo "Tree branch already exists (${2}).";
			exit 11 ;;

	esac
   echo "Unknown error."
   exit 100
}

init_builder()
{
	if [ -n "$DEBUG" ]; then
		set -x;
		set -v;
	fi

	SOURCE_DIR="`$RPM --eval '%{_sourcedir}'`"
	SPECS_DIR="`$RPM --eval '%{_specdir}'`"

	__PWD="`pwd`"
}

get_spec()
{

	update_shell_title "get_spec"

	if [ -n "$DEBUG" ]; then
		set -x;
		set -v;
	fi

	cd "$SPECS_DIR"
	if [ \! -f "$SPECFILE" ]; then
		SPECFILE="`basename $SPECFILE .spec`.spec";
	fi
	if [ "$NOCVSSPEC" != "yes" ]; then
		OPTIONS="up "

		if [ -n "$CVSROOT" ]; then
			OPTIONS="-d $CVSROOT $OPTIONS"
		else
			if [ ! -s CVS/Root -a "$NOCVSSPEC" != "yes" ]; then
				echo "warning: No cvs access defined - using local .spec file"
				NOCVSSPEC="yes"
			fi
		fi

		if [ -z "$CVSDATE" -a -z "$CVSTAG" ]; then
			OPTIONS="$OPTIONS -A"
		else
			if [ -n "$CVSDATE" ]; then
				OPTIONS="$OPTIONS -D $CVSDATE"
			fi
			if [ -n "$CVSTAG" ]; then
				OPTIONS="$OPTIONS -r $CVSTAG"
			fi
		fi

		result=1
		retries_counter=0
		while [ "$result" != "0" -a "$retries_counter" -le "$CVS_RETRIES" ]
		do
			retries_counter=$(( $retries_counter + 1 ))
			output=$(LC_ALL=C cvs $OPTIONS $SPECFILE 2>&1)
			result=$?
			[ -n "$output" ] && echo "$output"
			if [ "$result" -ne "0" ]; then
				if (echo "$output" | grep -qE "(Cannot connect to|connect to .* failed|Connection reset by peer|Connection timed out|Unknown host)") && [ "$retries_counter" -le "$CVS_RETRIES" ]; then
					echo "Trying again [$SPECFILE]... ($retries_counter)"
					sleep 2
					continue
				fi
				Exit_error err_no_spec_in_repo;
			fi
		done
	fi
	if [ ! -f "$SPECFILE" ]; then
		Exit_error err_no_spec_in_repo;
	fi

	if [ "$CHMOD" = "yes" -a -n "$SPECFILE" ]; then
		chmod $CHMOD_MODE $SPECFILE
	fi
	unset OPTIONS
	[ -n "$DONT_PRINT_REVISION" ] || grep -E -m 1 "^#.*Revision:.*Date" $SPECFILE

	 set_spec_target
}

find_mirror()
{
	cd "$SPECS_DIR"
	url="$1"
	if [ ! -f "mirrors" -a "$NOCVSSPEC" != "yes" ] ; then
		cvs update mirrors >&2
	fi

	IFS="|"
	while read origin mirror name rest
	do
		ol=`echo -n "$origin"|wc -c`
		prefix="`echo -n "$url" | head -c $ol`"
		if [ "$prefix" = "$origin" ] ; then
			suffix="`echo "$url"|cut -b $ol-`"
			echo -n "$mirror$suffix"
			return 0
		fi
	done < mirrors
	echo "$url"
}

src_no ()
{
	cd $SPECS_DIR
	rpm_dump | \
	grep "SOURCEURL[0-9]*[ 	]*$1""[ 	]*$" | \
	sed -e 's/.*SOURCEURL\([0-9][0-9]*\).*/\1/' | \
	head -n 1 | xargs
}

src_md5 ()
{
	[ X"$NO5" = X"yes" ] && return
	no=$(src_no "$1")
	[ -z "$no" ] && return
	cd $SPECS_DIR
	spec_rev=$(grep $SPECFILE CVS/Entries 2>/dev/null | sed -e s:/$SPECFILE/:: -e s:/.*::)
	if [ -z "$spec_rev" ]; then
		spec_rev="$(head -n 1 $SPECFILE | sed -e 's/.*\$Revision: \([0-9.]*\).*/\1/')"
	fi
	spec="$SPECFILE[0-9.,]*,$(echo $spec_rev | sed 's/\./\\./g')"
	md5=$(grep -s -v '^#' additional-md5sums | \
	grep -E "[ 	]$(basename "$1")[ 	]+${spec}([ 	,]|\$)" | \
	sed -e 's/^\([0-9a-f]\{32\}\).*/\1/' | \
	grep -E '^[0-9a-f]{32}$')
	if [ X"$md5" = X"" ] ; then
		source_md5=`grep -i "#[ 	]*Source$no-md5[ 	]*:" $SPECFILE | sed -e 's/.*://'`
		if [ ! -z "$source_md5" ] ; then
			echo $source_md5;
		else
			# we have empty SourceX-md5, but it is still possible
			# that we have NoSourceX-md5 AND NoSource: X
			nosource_md5=`grep -i "#[	 ]*NoSource$no-md5[	 ]*:" $SPECFILE | sed -e 's/.*://'`
			if [ ! -z "$nosource_md5" -a ! X"`grep -i "^NoSource:[	 ]*$no$" $SPECFILE`" = X"" ] ; then
				echo $nosource_md5;
			fi;
		fi;
	else
		if [ $(echo "$md5" | wc -l) != 1 ] ; then
			echo "$SPECFILE: more then one entry in additional-md5sums for $1" 1>&2
		fi
		echo "$md5" | tail -n 1
	fi
}

distfiles_url ()
{
	echo "$PROTOCOL$DISTFILES_SERVER/distfiles/by-md5/$(src_md5 "$1" | sed -e 's|^\(.\)\(.\)|\1/\2/&|')/$(basename "$1")"
}

distfiles_attic_url ()
{
	echo "$PROTOCOL$ATTICDISTFILES_SERVER/distfiles/Attic/by-md5/$(src_md5 "$1" | sed -e 's|^\(.\)\(.\)|\1/\2/&|')/$(basename "$1")"
}

good_md5 ()
{
	md5=$(src_md5 "$1")
	[ "$md5" = "" ] || \
	[ "$md5" = "$(md5sum $(nourl "$1") 2> /dev/null | sed -e 's/ .*//')" ]
}

good_size ()
{
	 size="$(find $(nourl "$1") -printf "%s" 2>/dev/null)"
	 [ -n "$size" -a "$size" -gt 0 ]
}

cvsignore_df ()
{
	if [ "$CVSIGNORE_DF" != "yes" ]; then
		return
	fi
	cvsignore=${SOURCE_DIR}/.cvsignore
	if ! grep -q "^$1\$" $cvsignore 2> /dev/null; then
		echo "$1" >> $cvsignore
	fi
}

cvsup()
{
	 update_shell_title "cvsup"
	 local OPTIONS="up "
	 if [ -n "$CVSROOT" ]; then
		  OPTIONS="-d $CVSROOT $OPTIONS"
	 else
		  if [ ! -s CVS/Root -a "$NOCVS" != "yes" ]; then
				echo "warning: No cvs access defined for SOURCES"
				NOCVS="yes"
		  fi
	 fi
	 if [ -z "$CVSDATE" -a -z "$CVSTAG" ]; then
		  OPTIONS="$OPTIONS -A"
	 else
		  if [ -n "$CVSDATE" ]; then
				OPTIONS="$OPTIONS -D $CVSDATE"
		  fi
		  if [ -n "$CVSTAG" ]; then
				OPTIONS="$OPTIONS -r $CVSTAG"
		  fi
	 fi

	 local result=1
	 local retries_counter=0
	 update_shell_title "cvsup: $# files"
	 while [ "$result" != "0" -a "$retries_counter" -le "$CVS_RETRIES" ]; do
		  retries_counter=$(( $retries_counter + 1 ))
		  output=$(LC_ALL=C cvs $OPTIONS "$@" 2>&1)
		  result=$?
		  [ -n "$output" ] && echo "$output"
		  if (echo "$output" | grep -qE "(Cannot connect to|connect to .* failed|Connection reset by peer|Connection timed out|Unknown host)") && [ "$result" -ne "0" -a "$retries_counter" -le "$CVS_RETRIES" ]; then
				echo "Trying again [$*]... ($retries_counter)"
				update_shell_title "cvsup: retry #$retries_counter"
				sleep 2
				continue
		  else
				break
		  fi
	 done
	 update_shell_title "cvsup: done!"
}

get_files()
{
	GET_FILES="$@"
	update_shell_title "fetching sources"

	if [ -n "$DEBUG" ]; then
		set -x;
		set -v;
	fi

	if [ $# -gt 0 ]; then
		cd "$SOURCE_DIR"

		local nf=$(echo "$GET_FILES" | wc -w)
		local nc=0
		local get_files_cvs=""
		for i in $GET_FILES; do
			nc=$((nc + 1))
			SHELL_TITLE_PREFIX="get_files[$nc/$nf]"
			update_shell_title "$i"
			local fp=`nourl "$i"`
			if [ -f "$fp" ] && [ "$SKIP_EXISTING_FILES" = "yes" ]; then
				 continue
			fi
			if [ -n "$UPDATE5" ]; then
				if [ -n "$ADD5" ]; then
					[ "$fp" = "$i" ] && continue
					grep -qiE '^#[ 	]*Source'$(src_no $i)'-md5[ 	]*:' $SPECS_DIR/$SPECFILE && continue
				else
					grep -qiE '^#[ 	]*Source'$(src_no $i)'-md5[ 	]*:' $SPECS_DIR/$SPECFILE || continue
				fi
			fi
			FROM_DISTFILES=0
			if [ ! -f "$fp" ] || [ $ALWAYS_CVSUP = "yes" ]; then
				if echo $i | grep -vE '(http|ftp|https|cvs|svn)://' | grep -qE '\.(gz|bz2)$']; then
					echo "Warning: no URL given for $i"
				fi

				if [ -n "$(src_md5 "$i")" ] && [ -z "$NODIST" ]; then
					if good_md5 "$i" && good_size "$i"; then
						echo "$(nourl "$i") having proper md5sum already exists"
						continue
					fi
					target=$(nourl "$i")
					url=$(distfiles_url "$i")
					url_attic=$(distfiles_attic_url "$i")
					FROM_DISTFILES=1
					if [ "`echo $url | grep -E '^(\.|/)'`" ]; then
						update_shell_title "${GETLOCAL%% *}: $url"
						${GETLOCAL} $url $target
					else
						if [ -z "$NOMIRRORS" ]; then
							url="`find_mirror "$url"`"
						fi
						update_shell_title "${GETURI%% *}: $url"
						${GETURI} ${OUTFILEOPT} "$target" "$url" || \
						if [ "`echo $url | grep -E 'ftp://'`" ]; then
							update_shell_title "${GETURI2%% *}: $url"
							${GETURI2} ${OUTFILEOPT} "$target" "$url"
						fi
					fi
					if ! test -s "$target"; then
						rm -f "$target"
						if [ `echo $url_attic | grep -E '^(\.|/)'` ]; then
							update_shell_title "${GETLOCAL%% *}: $url_attic"
							${GETLOCAL} $url_attic $target
						else
							if [ -z "$NOMIRRORS" ]; then
								url_attic="`find_mirror "$url_attic"`"
							fi
							update_shell_title "${GETURI%% *}: $url_attic"
							${GETURI} ${OUTFILEOPT} "$target" "$url_attic" || \
							if [ "`echo $url_attic | grep -E 'ftp://'`" ]; then
								 update_shell_title "${GETURI2%% *}: $url_attic"
								${GETURI2} ${OUTFILEOPT} "$target" "$url_attic"
							fi
						fi
					fi
					if test -s "$target"; then
						cvsignore_df $target
					else
						rm -f "$target"
						FROM_DISTFILES=0
					fi
				elif [ -z "$(src_md5 "$i")" -a "$NOCVS" != "yes" ]; then
				   get_files_cvs="$get_files_cvs $fp"
					continue
				fi

				if [ -z "$NOURLS" ] && [ ! -f "$fp" -o -n "$UPDATE" ] && [ "`echo $i | grep -E 'ftp://|http://|https://'`" ]; then
					if [ -z "$NOMIRRORS" ]; then
						im="`find_mirror "$i"`"
					else
						im="$i"
					fi
				 	update_shell_title "${GETURI%% *}: $im"
					${GETURI} "$im" || \
					if [ "`echo $im | grep -E 'ftp://'`" ]; then
						 update_shell_title "${GETURI2%% *}: $im"
						${GETURI2} "$im"
					fi
				fi

			fi
			srcno=$(src_no $i)
			if [ ! -f "$fp" -a "$FAIL_IF_NO_SOURCES" != "no" ]; then
				Exit_error err_no_source_in_repo $i;
			elif [ -n "$UPDATE5" ] && \
				( ( [ -n "$ADD5" ] && echo $i | grep -q -E 'ftp://|http://|https://' && \
				[ -z "$(grep -E -i '^NoSource[ 	]*:[ 	]*'$i'([ 	]|$)' $SPECS_DIR/$SPECFILE)" ] ) || \
				grep -q -i -E '^#[ 	]*source'$(src_no $i)'-md5[ 	]*:' $SPECS_DIR/$SPECFILE )
			then
				echo "Updating source-$srcno md5."
				md5=$(md5sum "$fp" | cut -f1 -d' ')
				perl -i -ne '
				print unless /^\s*#\s*Source'$srcno'-md5\s*:/i;
				print "# Source'$srcno'-md5:\t'$md5'\n"
				if /^Source'$srcno'\s*:\s+/;
				' \
				$SPECS_DIR/$SPECFILE
			fi

			if good_md5 "$i" && good_size "$i"; then
				:
			elif [ "$FROM_DISTFILES" = 1 ]; then
				# wrong md5 from distfiles: remove the file and try again
				# but only once ...
				echo "MD5 sum mismatch. Trying full fetch."
				FROM_DISTFILES=2
				rm -f $target
				update_shell_title "${GETURI%% *}: $url"
				${GETURI} ${OUTFILEOPT} "$target" "$url" || \
				if [ "`echo $url | grep -E 'ftp://'`" ]; then
					 update_shell_title "${GETURI2%% *}: $url"
					${GETURI2} ${OUTFILEOPT} "$target" "$url"
				fi
				if ! test -s "$target"; then
					rm -f "$target"
					update_shell_title "${GETURI%% *}: $url_attic"
					${GETURI} ${OUTFILEOPT} "$target" "$url_attic" || \
					if [ "`echo $url_attic | grep -E 'ftp://'`" ]; then
						 update_shell_title "${GETURI2%% *}: $url_attic"
						${GETURI2} ${OUTFILEOPT} "$target" "$url_attic"
					fi
				fi
				test -s "$target" || rm -f "$target"
			fi

			if good_md5 "$i" && good_size "$i" ; then
				:
			else
				echo "MD5 sum mismatch or 0 size.  Use -U to refetch sources,"
				echo "or -5 to update md5 sums, if you're sure files are correct."
				Exit_error err_no_source_in_repo $i
			fi
		done
		SHELL_TITLE_PREFIX=""

		if [ "$get_files_cvs" ]; then
			 cvsup $get_files_cvs
		fi

		if [ "$CHMOD" = "yes" ]; then
			CHMOD_FILES="`nourl $GET_FILES`"
			if [ -n "$CHMOD_FILES" ]; then
				chmod $CHMOD_MODE $CHMOD_FILES
			fi
		fi
	fi
}

make_tagver() {

		if [ -n "$DEBUG" ]; then
			 set -x;
			 set -v;
		fi

		# Check whether first character of PACKAGE_NAME is legal for tag name
		if [ -z "${PACKAGE_NAME##[_0-9]*}" -a -z "$TAG_PREFIX" ]; then
			TAG_PREFIX=tag_
		fi
		TAGVER=$TAG_PREFIX$PACKAGE_NAME-`echo $PACKAGE_VERSION | sed -e "s/\./\_/g" -e "s/@/#/g"`-`echo $PACKAGE_RELEASE | sed -e "s/\./\_/g" -e "s/@/#/g"`
		# Remove #kernel.version_release from TAGVER because tagging sources
		# could occur with different kernel-headers than kernel-headers used at build time.
		TAGVER=$(echo "$TAGVER" | sed -e 's/#.*//g')
		echo -n "$TAGVER"
}

tag_files()
{
	TAG_FILES="$@"

	if [ -n "$DEBUG" ]; then
		set -x;
		set -v;
	fi

	if [ -n "$1$2$3$4$5$6$7$8$9${10}" ]; then
		echo "Version: $PACKAGE_VERSION"
		echo "Release: $PACKAGE_RELEASE"

		TAGVER=`make_tagver`

		if [ "$TAG_VERSION" = "yes" ]; then
			echo "CVS tag: $TAGVER"
		fi
		if [ -n "$TAG" ]; then
			echo "CVS tag: $TAG"
		fi

		OPTIONS="tag -F"
		if [ -n "$CVSROOT" ]; then
			OPTIONS="-d $CVSROOT $OPTIONS"
		fi

		cd "$SOURCE_DIR"
		for i in $TAG_FILES
		do
			# don't tag files stored on distfiles
			[ -n "`src_md5 $i`" ] && continue
			if [ -f "`nourl $i`" ]; then
				if [ "$TAG_VERSION" = "yes" ]; then
					cvs $OPTIONS $TAGVER `nourl $i`
				fi
				if [ -n "$TAG" ]; then
					cvs $OPTIONS $TAG `nourl $i`
				fi
			else
				Exit_error err_no_source_in_repo $i
			fi
		done

		cd "$SPECS_DIR"
		if [ "$TAG_VERSION" = "yes" ]; then
			cvs $OPTIONS $TAGVER $SPECFILE
		fi
		if [ -n "$TAG" ]; then
			cvs $OPTIONS $TAG $SPECFILE
		fi

		unset OPTIONS
	fi
}

branch_files()
{
	TAG=$1
	echo "CVS branch tag: $TAG"
	shift;

	TAG_FILES="$@"

	if [ -n "$DEBUG" ]; then
		set -x;
		set -v;
	fi

	if [ -n "$1$2$3$4$5$6$7$8$9${10}" ]; then

		OPTIONS="tag -b"
		if [ -n "$CVSROOT" ]; then
			OPTIONS="-d $CVSROOT $OPTIONS"
		fi
		cd "$SOURCE_DIR"
		for i in $TAG_FILES
		do
			if [ -f `nourl $i` ]; then
				cvs $OPTIONS $TAG `nourl $i`
			else
				Exit_error err_no_source_in_repo $i
			fi
		done
		cd "$SPECS_DIR"
		cvs $OPTIONS $TAG $SPECFILE

		unset OPTIONS
	fi
}


build_package()
{
	update_shell_title "build_package"
	if [ -n "$DEBUG" ]; then
		set -x;
		set -v;
	fi

	cd "$SPECS_DIR"

	if [ -n "$TRY_UPGRADE" ]; then
		  update_shell_title "build_package: try_upgrade"
		if [ -n "$FLOAT_VERSION" ]; then
			TNOTIFY=`./pldnotify.awk $SPECFILE -n` || exit 1
		else
			TNOTIFY=`./pldnotify.awk $SPECFILE` || exit 1
		fi

		TNEWVER=`echo $TNOTIFY | awk '{ match($4,/\[NEW\]/); print $5 }'`

		if [ -n "$TNEWVER" ]; then
			TOLDVER=`echo $TNOTIFY | awk '{ print $3; }'`
			echo "New version found, updating spec file to version " $TNEWVER
			cp -f $SPECFILE $SPECFILE.bak
			chmod +w $SPECFILE
			eval "perl -pi -e 's/Version:\t"$TOLDVER"/Version:\t"$TNEWVER"/gs' $SPECFILE"
			eval "perl -pi -e 's/Release:\t[1-9]{0,4}/Release:\t0.1/' $SPECFILE"
			parse_spec;
			if [ -n "$ICONS" ]; then
				get_files $ICONS;
				parse_spec;
			fi
			NODIST="yes" UPDATE5="yes" get_files "$SOURCES $PATCHES";
			unset TOLDVER TNEWVER TNOTIFY
		fi
	fi
	cd "$SPECS_DIR"

	case "$COMMAND" in
		build )
			BUILD_SWITCH="-ba" ;;
		build-binary )
			BUILD_SWITCH="-bb" ;;
		build-source )
			BUILD_SWITCH="-bs --nodeps" ;;
		build-prep )
			BUILD_SWITCH="-bp --nodeps" ;;
	esac

	update_shell_title "build_package: $COMMAND"
	if [ -n "$LOGFILE" ]; then
		LOG=`eval echo $LOGFILE`
		if [ -d "$LOG" ]; then
			echo "Log file $LOG is a directory."
			echo "Parse error in the spec?"
			Exit_error err_build_fail;
		fi
		if [ -n "$LASTLOG_FILE" ]; then
			echo "LASTLOG=$LOG" > $LASTLOG_FILE
		fi
		RES_FILE=~/tmp/$RPMBUILD-exit-status.$RANDOM
		(time eval nice -n ${DEF_NICE_LEVEL} $RPMBUILD $BUILD_SWITCH -v $QUIET $CLEAN $RPMOPTS $BCOND $TARGET_SWITCH $SPECFILE; echo $? > $RES_FILE) 2>&1 |tee $LOG
		RETVAL=`cat $RES_FILE`
		rm $RES_FILE
		if [ -n "$LOGDIROK" ] && [ -n "$LOGDIRFAIL" ]; then
			if [ "$RETVAL" -eq "0" ]; then
				mv $LOG $LOGDIROK
			else
				mv $LOG $LOGDIRFAIL
			fi
		fi
	else
		eval nice -n ${DEF_NICE_LEVEL} $RPMBUILD $BUILD_SWITCH -v $QUIET $CLEAN $RPMOPTS $BCOND $TARGET_SWITCH $SPECFILE
		RETVAL=$?
	fi
	if [ "$RETVAL" -ne "0" ]; then
		if [ -n "$TRY_UPGRADE" ]; then
			echo "\n!!! Package with new version cannot be build automagically\n"
			mv -f $SPECFILE.bak $SPECFILE
		fi
		Exit_error err_build_fail;
	fi
	unset BUILD_SWITCH
}

nourl()
{
	echo "$@" | sed 's#\<\(ftp\|http\|https\|cvs\|svn\)://[^ ]*/##g'
}

install_required_packages()
{
	run_poldek -vi $1
	return $?
}

set_bconds_values()
{
	update_shell_title "set bcond values"

	AVAIL_BCONDS_WITHOUT=""
	AVAIL_BCONDS_WITH=""
	if `grep -q ^%bcond ${SPECFILE}`; then
		BCOND_VERSION="NEW"
	elif `egrep -q ^#\ *_with ${SPECFILE}`; then
		BCOND_VERSION="OLD"
	else
		BCOND_VERSION="NONE"
	fi

	# expand bconds from ~/.bcondrc
	# The file structure is like gentoo's package.use:
	# ---
	# * -selinux
	# samba -mysql -pgsql
	# w32codec-installer license_agreement
	# php +mysqli
	# ---
	if [ "${BCOND_VERSION}" != "NONE" ] && ( [ -f $HOME/.bcondrc ] || ( [ -n $HOME_ETC ] && [ -f $HOME_ETC/.bcondrc ] ) ) ; then
		# This takes package name, first defined in spec.
		# so consider that when defining flags for package.
		PN=`$RPM -q --qf '%{NAME}\n' --specfile $SPECFILE | head -n 1`
		SN=${SPECFILE%%\.spec}
		AVAIL=`$RPMBUILD --bcond $SPECFILE`

		BCONDRC=$HOME/.bcondrc
		[ -n $HOME_ETC ] && [ -f $HOME_ETC/.bcondrc ] && BCONDRC=$HOME_ETC/.bcondrc

		while read pkg flags; do
			# ignore comments
			[[ "$pkg" == \#* ]] && continue

			# any package or current package?
			if [ "$pkg" = "*" ] || [ "$pkg" = "$PN" ] || [ "$pkg" = "$SN" ]; then
				for flag in $flags; do
					opt=${flag#[+-]}

					# use only flags which are in this package.
					if [[ $AVAIL = *${opt}* ]]; then
						if [[ $flag = -* ]]; then
							BCOND="$BCOND --without $opt"
						else
							BCOND="$BCOND --with $opt"
						fi
					fi
				done
			fi
		done < $BCONDRC
	fi

	case "${BCOND_VERSION}" in
		 NONE)
			:
			;;
		OLD)
			echo "Warning: This spec has old style bconds. Fix it || die."
			for opt in `$RPMBUILD --bcond $SPECFILE |grep ^_without_`
			do
				AVAIL_BCOND_WITHOUT=`echo $opt|sed -e "s/^_without_//g"`
				if `echo $BCOND|grep -q -- "--without $AVAIL_BCOND_WITHOUT"`;then
					AVAIL_BCONDS_WITHOUT="$AVAIL_BCONDS_WITHOUT <$AVAIL_BCOND_WITHOUT>"
				else
					AVAIL_BCONDS_WITHOUT="$AVAIL_BCONDS_WITHOUT $AVAIL_BCOND_WITHOUT"
				fi
			done

			for opt in `$RPMBUILD --bcond $SPECFILE |grep ^_with_`
			do
				AVAIL_BCOND_WITH=`echo $opt|sed -e "s/^_with_//g"`
				if `echo $BCOND|grep -q -- "--with $AVAIL_BCOND_WITH"`;then
					AVAIL_BCONDS_WITH="$AVAIL_BCONDS_WITH <$AVAIL_BCOND_WITH>"
				else
					AVAIL_BCONDS_WITH="$AVAIL_BCONDS_WITH $AVAIL_BCOND_WITH"
				fi
			done
			;;
		NEW)
			cond_type="" # with || without
			for opt in `$RPMBUILD --bcond $SPECFILE`
			do
				case "$opt" in
					_without)
						cond_type="without"
						;;
					_with)
						cond_type="with"
						;;
					_without_*)
						AVAIL_BCOND_WITHOUT="`echo $opt | sed 's/^_without_//g'`"
						if `echo $BCOND|grep -q -- "--without $AVAIL_BCOND_WITHOUT"`;then
							AVAIL_BCONDS_WITHOUT="$AVAIL_BCONDS_WITHOUT <$AVAIL_BCOND_WITHOUT>"
						else
							AVAIL_BCONDS_WITHOUT="$AVAIL_BCONDS_WITHOUT $AVAIL_BCOND_WITHOUT"
						fi
						;;
					_with_*)
						AVAIL_BCOND_WITH="`echo $opt | sed 's/^_with_//g'`"
						if `echo $BCOND|grep -q -- "--with $AVAIL_BCOND_WITH"`;then
							AVAIL_BCONDS_WITH="$AVAIL_BCONDS_WITH <$AVAIL_BCOND_WITH>"
						else
							AVAIL_BCONDS_WITH="$AVAIL_BCONDS_WITH $AVAIL_BCOND_WITH"
						fi
						;;
					*)
						case "$cond_type" in
							with)
								cond_type=''
								AVAIL_BCOND_WITH="$opt"
								if `echo $BCOND|grep -q -- "--with $AVAIL_BCOND_WITH"`;then
									AVAIL_BCONDS_WITH="$AVAIL_BCONDS_WITH <$AVAIL_BCOND_WITH>"
								else
									AVAIL_BCONDS_WITH="$AVAIL_BCONDS_WITH $AVAIL_BCOND_WITH"
								fi
								;;
							without)
								cond_type=''
								AVAIL_BCOND_WITHOUT="$opt"
								if `echo $BCOND|grep -q -- "--without $AVAIL_BCOND_WITHOUT"`;then
									AVAIL_BCONDS_WITHOUT="$AVAIL_BCONDS_WITHOUT <$AVAIL_BCOND_WITHOUT>"
								else
									AVAIL_BCONDS_WITHOUT="$AVAIL_BCONDS_WITHOUT $AVAIL_BCOND_WITHOUT"
								fi
								;;
						esac
						;;
				esac
			done
			;;
	esac
}

run_sub_builder()
{
	package_name="${1}"
	update_shell_title "run_sub_builder $package_name"
	#