From 53ecffc2f30b2678709105892b60073f7c9c0847 Mon Sep 17 00:00:00 2001
From: Pierre Schmitz <pierre@archlinux.de>
Date: Mon, 22 Nov 2010 14:36:09 +0100
Subject: Add wrappers for repo-add and repo-remove

---
 db-repo-remove | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100755 db-repo-remove

(limited to 'db-repo-remove')

diff --git a/db-repo-remove b/db-repo-remove
new file mode 100755
index 0000000..6fa0e05
--- /dev/null
+++ b/db-repo-remove
@@ -0,0 +1,41 @@
+#!/bin/bash
+
+. "$(dirname $0)/db-functions"
+. "$(dirname $0)/config"
+
+if [ $# -ne 3 ]; then
+	msg "usage: $(basename $0) <pkgname> <repo> <arch>"
+	exit 1
+fi
+
+pkgname="$1"
+repo="$2"
+arch="$3"
+
+ftppath="$FTP_BASE/$repo/os"
+
+if ! check_repo_permission $repo; then
+	die "You don't have permission to remove packages from ${repo}"
+fi
+
+if [ "$arch" == "any" ]; then
+	tarches=(${ARCHES[@]})
+else
+	tarches=("$arch")
+fi
+
+for tarch in ${tarches[@]}; do
+	repo_lock $repo $tarch || exit 1
+done
+
+msg "Removing $pkgname from [$repo]..."
+
+for tarch in ${tarches[@]}; do
+	if [ ! -f "$ftppath/$tarch/$repo$DBEXT" ]; then
+		die "No database found at '$ftppath/$tarch', nothing more to do"
+	fi
+
+	/usr/bin/repo-remove -q "$ftppath/$tarch/$repo$DBEXT" ${pkgname} >/dev/null
+	set_repo_permission "${repo}" "${tarch}"
+	repo_unlock $repo $tarch
+done
-- 
cgit v1.2.3-24-g4f1b