db-remove


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53

#!/bin/bash

. "$(dirname $0)/db-functions"
. "$(dirname $0)/config"

if [ $# -ne 3 ]; then
	msg "usage: $(basename $0) <pkgname|pkgbase> <repo> <arch>"
	exit 1
fi

pkgbase="$1"
repo="$2"
arch="$3"

ftppath="$FTP_BASE/$repo/os"
svnrepo="$repo-$arch"

if ! check_repo_permission $repo; then
	die "You don't have permission to remove packages from ${reponam}"
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 $pkgbase from [$repo]..."
/usr/bin/svn checkout -q "${SVNREPO}/${pkgbase}" "${WORKDIR}/svn/${pkgbase}" >/dev/null

if [ -d "${WORKDIR}/svn/$pkgbase/repos/$svnrepo" ]; then
	pkgnames=($(. "${WORKDIR}/svn/$pkgbase/repos/$svnrepo/PKGBUILD"; echo ${pkgname[@]}))
	/usr/bin/svn rm --force -q "${WORKDIR}/svn/$pkgbase/repos/$svnrepo"
	/usr/bin/svn commit -q "${WORKDIR}/svn/$pkgbase" -m "$(basename $0): $pkgbase removed by $(id -un)"
else
	die "$pkgbase not found in $svnrepo"
fi


# copy the db file into our working area
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" ${pkgnames[@]} >/dev/null
	set_repo_permission "${repo}" "${tarch}"
	repo_unlock $repo $tarch
done