blob: 512ce5139aaf03790873dcb6cf189730b1be64ae (
plain)
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
|
#!/bin/bash
. "$(dirname $0)/db-functions"
. "$(dirname $0)/config"
if [ $# -lt 3 ]; then
msg "usage: ${0##*/} <repo> <arch> <pkgname|pkgbase> ..."
exit 1
fi
repo="$1"
arch="$2"
pkgbases=(${@: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 ${repo}"
fi
if [ "$arch" == "any" ]; then
tarches=(${ARCHES[@]})
else
tarches=("$arch")
fi
for tarch in ${tarches[@]}; do
repo_lock $repo $tarch || exit 1
done
remove_pkgs=()
for pkgbase in ${pkgbases[@]}; do
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
remove_pkgs=(${remove_pkgs[@]} $(. "${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 "${0##*/}: $pkgbase removed by $(id -un)"
else
warning "$pkgbase not found in $svnrepo"
warning "Removing only $pkgbase from the repo"
warning "If it was a split package you have to remove the others yourself!"
remove_pkgs[${#remove_pkgs[*]}]=$pkgbase
fi
done
for tarch in ${tarches[@]}; do
arch_repo_remove "${repo}" "${tarch}" ${remove_pkgs[@]}
repo_unlock $repo $tarch
done
|