From bdc95e2d741b95172eaaf119fbb111a3d500809d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Joshua=20Ismael=20Haase=20Hern=C3=A1ndez?=
 <hahj87@gmail.com>
Date: Sat, 16 Apr 2011 11:57:47 -0700
Subject: Dbscripts on stable too

---
 db-repo-remove | 36 ++++++++++++++++++++++++++++++++++++
 1 file changed, 36 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..b01910f
--- /dev/null
+++ b/db-repo-remove
@@ -0,0 +1,36 @@
+#!/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
+	arch_repo_remove "${repo}" "${tarch}" ${pkgname}
+	repo_unlock $repo $tarch
+done
-- 
cgit v1.2.3