4 files changed, 206 insertions, 0 deletions
diff --git a/src/xbs-abs/.gitignore b/src/xbs-abs/.gitignore
new file mode 100644
index 0000000..41ee0f5
--- /dev/null
+++ b/src/xbs-abs/.gitignore
@@ -0,0 +1 @@
+archrelease*
diff --git a/src/xbs-abs/Makefile b/src/xbs-abs/Makefile
new file mode 100644
index 0000000..7582592
--- /dev/null
+++ b/src/xbs-abs/Makefile
@@ -0,0 +1,12 @@
+pkgconfdir = $(sysconfdir)/xbs
+bindir = $(libexecdir)/xbs
+pkglibexecdir = $(libexecdir)/xbs/helper-abs.d
+copy_files = archrelease.in
+libs = archrelease
+include ../../common.mk
+
+archrelease: %: %.in
+	@echo "GEN $@"
+	@$(edit) <"$<" >"$@" || { rm -f -- '$@'; false; }
+	@sed -i '/valid-tags\.sh/d' '$@' || { rm -f -- '$@'; false; }
+	@chmod 755 "$@" || { rm -f -- '$@'; false; }
diff --git a/src/xbs-abs/helper-abs b/src/xbs-abs/helper-abs
new file mode 100755
index 0000000..d2baf42
--- /dev/null
+++ b/src/xbs-abs/helper-abs
@@ -0,0 +1,183 @@
+#!/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>
+#
+# License: GNU GPLv2+
+#
+# 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
+	# SVNUSER is optional
+	check_vars SVNDIR SVNREPOS 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
+}
+
+pac2svn() {
+	local pacrepo=$1
+
+	# Figure out which svn repo we need
+	local svnrepoStr
+	for svnrepoStr in "${SVNREPOS[@]}"; do
+		local svnrepoAry=($svnrepoStr)
+		local svnrepo=${svnrepoAry[0]}
+		local svnurl=${svnrepoAry[1]}
+		local pacrepos=("${svnrepoAry[@]:2}")
+
+		if in_array "$pacrepo" "${pacrepos[@]}"; then
+			echo "$svnrepo"
+			return 0
+		fi
+	done
+	return 1
+}
+
+status() {
+	load_config
+	[[ -z $(arch_svn status -q) ]]
+}
+
+download() {
+	load_config
+
+	local svnrepoStr
+	for svnrepoStr in "${SVNREPOS[@]}"; do
+		local svnrepoAry=($svnrepoStr)
+		local svnrepo=${svnrepoAry[0]}
+		local svnurl=${svnrepoAry[1]}
+		local pacrepos=("${svnrepoAry[@]:2}")
+
+		if [[ -d "$SVNDIR/$svnrepo/.svn" ]]; then
+			arch_svn -q up "$SVNDIR/$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" "$SVNDIR/$svnrepo"
+		fi
+	done
+}
+
+release() {
+	local repo=$1
+	local arch=$2
+
+	local tmpdir="$(mktemp -dt "xbs-abs-release.XXXXXXXXXX")"
+	trap "$(printf 'rm -rf -- %q' "$tmpdir")" EXIT
+
+	printf '%s\n' \
+		'#!/bin/bash' \
+		"$(declare -f arch_svn)" \
+		'arch_svn "$@"' \
+		> "$tmpdir/svn"
+	chmod 755 "$tmpdir/svn"
+
+	PATH="$tmpdir:$PATH" "${0}.d/archrelease" -f "${repo}-${arch}"
+}
+
+unrelease() {
+	local pkgbase=$1
+	local repo=$2
+	local arch=$3
+
+	local tag="$repo-$arch"
+
+	load_config
+	local svndir="${SVNDIR}/$(pac2svn "$repo")/${pkgbase}"
+	arch_svn up -q "$svndir"
+
+	# This is based off code from dbscripts:db-remove
+	arch_svn rm --force -q "${svndir}/repos/${tag}"
+	arch_svn commit -q "${svndir}" -m "${0##*/}: $pkgbase removed by $(id -un)"
+}
+
+move() {
+	local repo_from=$1
+	local repo_to=$2
+	local pkgbase=$3
+
+	load_config
+	local svndir="${SVNDIR}/$(pac2svn "$repo")/${pkgbase}"
+	arch_svn up -q "$svndir"
+
+	local tag_list=""
+	local pkgarch
+	local arches=()
+	# this is based off code from dbscripts:db-move
+	for pkgarch in "${ARCHES[@]}" 'any'; do
+		dir_from="${svndir}/repos/${repo_from}-${pkgarch}"
+		dir_to="${svndir}/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 "${svndir}" -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
+	local svndir="${SVNDIR}/$(pac2svn "$repo")/${pkgbase}"
+	arch_svn up -q "${svndir}"
+	echo "${svndir}/repos/${repo}-${arch}"
+}
+
+case "$1" in
+	status|download|release|unrelease|move|releasepath) "$@";;
+	*) exit 127;;
+esac
diff --git a/src/xbs-abs/xbs-abs.conf b/src/xbs-abs/xbs-abs.conf
new file mode 100644
index 0000000..3ceba6a
--- /dev/null
+++ b/src/xbs-abs/xbs-abs.conf
@@ -0,0 +1,10 @@
+SVNDIR=/var/lib/xbs-abs
+#SVNUSER=
+
+# name url repos...
+SVNREPOS=(
+  'packages svn://svn.archlinux.org/packages core extra testing'
+  'commuity svn://svn.archlinux.org/community community community-testing multilib multilib-testing'
+)
+
+ARCHES=(i686 x86_64)