#!/bin/bash

#   Copyright (c) 2013 Luke Shumaker <lukeshu@sbcglobal.net>
#   For code from db-functions (arch_svn):
#     Copyright (c) 2012 Pierre Schmitz <pierre@archlinux.de>
#   For code from db-move+db-remove (move+unrelease):
#     Copyright (c) 2008-2009 Aaron Griffin <aaronmgriffin@gmail.com>
#     Copyright (c) 2009 Abhishek Dasgupta <abhidg@gmail.com>
#     Copyright (c) 2009, 2011 Dan McGee <dan@archlinux.org>
#     Copyright (c) 2009-2012 Pierre Schmitz <pierre@archlinux.de>
#   For code just from db-move (move):
#     Copyright (c) 2011 Rémy Oudompheng <remyoudompheng@gmail.com>
#     Copyright (c) 2012 Florian Pritz <bluewind@xinu.at>
#   For code just from db-remove (unrelease):
#     Copyright (c) 2009 Eric Bélanger <snowmaniscool@gmail.com>
#     Copyright (c) 2011 Florian Pritz <bluewind@xinu.at>
#
#   This program is free software; you can redistribute it and/or modify
#   it under the terms of the GNU General Public License as published by
#   the Free Software Foundation; either version 2 of the License, or
#   (at your option) any later version.
#
#   This program is distributed in the hope that it will be useful,
#   but WITHOUT ANY WARRANTY; without even the implied warranty of
#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#   GNU General Public License for more details.
#
#   You should have received a copy of the GNU General Public License
#   along with this program.  If not, see <http://www.gnu.org/licenses/>.

load_config() {
	. $(librelib conf.sh)
	load_files xbs-abs
	check_vars SVNURL SVNREPO ARCHES || exit 1
}

# This is taken from dbscripts:db-fuctions
arch_svn() {
	if [[ -z "${SVNUSER}" ]]; then
		/usr/bin/svn "${@}"
	else
		sudo -u "${SVNUSER}" -- /usr/bin/svn --username "${USER}" "${@}"
	fi
}

status() {
	load_config
	[[ -z $(arch_svn status -q) ]]
}

download() {
	load_config
	if [[ -d "$SVNREPO/.svn" ]]; then
		arch_svn -q up "$SVNREPO"/*
	else
		# checkout non-recursive, then lazy load
		# nescessary because:
		#  > DO NOT CHECK OUT THE ENTIRE SVN REPO. Your address may be blocked.
		arch_svn -q checkout -N "$SVNURL" "$SVNREPO"
	fi
}

release() {
	local repo=$1
	local arch=$2

	"${0}.d/archrelease" -f "${repo}-${arch}"
}

unrelease() {
	local pkgbase=$1
	local repo=$2
	local arch=$3

	local svnrepo="$repo-$arch"
	load_config

	arch_svn up -q "${SVNREPO}/${pkgbase}"

	# This is based off code from dbscripts:db-remove
	remove_pkgs=$(. "${SVNREPO}/$pkgbase/repos/$svnrepo/PKGBUILD"; echo ${pkgname[@]})
	arch_svn rm --force -q "${SVNREPO}/$pkgbase/repos/$svnrepo"
	arch_svn commit -q "${SVNREPO}/$pkgbase" -m "${0##*/}: $pkgbase removed by $(id -un)"
}

move() {
	local repo_from=$1
	local repo_to=$2
	local pkgbase=$3

	load_config
	arch_svn up -q "${SVNREPO}/${pkgbase}"

	local tag_list=""
	local pkgarch
	local arches=()
	# this is based off code from dbscripts:db-move
	for pkgarch in "${ARCHES[@]}" 'any'; do
		dir_from="${SVNREPO}/${pkgbase}/repos/${repo_from}-${pkgarch}"
		dir_to="${SVNREPO}/${pkgbase}/repos/${repo_to}-${pkgarch}"

		if [ -f "${dir_from}/PKGBUILD" ]; then
			if [ -d "${dir_to}" ]; then
				for file in $(arch_svn ls "${dir_to}"); do
					arch_svn rm -q "${dir_to}/$file@"
				done
			else
				mkdir "${dir_to}"
				arch_svn add -q "${dir_to}"
			fi

			for file in $(arch_svn ls "${dir_from}"); do
				arch_svn mv -q -r HEAD "${dir_from}/$file@" "${dir_to}/"
			done
			arch_svn rm --force -q "${dir_from}"
			tag_list="$tag_list, $pkgarch"
			arches+=("$pkgarch")
		fi
	done
	tag_list="${tag_list#, }"
	arch_svn commit -q "${SVNREPO}/${pkgbase}" -m "${0##*/}: moved ${pkgbase} from [${repo_from}] to [${repo_to}] (${tag_list})"
	echo "${arches[*]}"
}

releasepath() {
	local pkgbase=$1
	local repo=$2
	local arch=$3

	load_config
	arch_svn up -q "${SVNREPO}/${pkgbase}"
	echo "${SVNREPO}/${pkgbase}/repos/${repo}-${arch}"
}

case "$1" in
	status|download|release|unrelease|move|releasepath) "$@";;
	*) exit 127;;
esac