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

#!/bin/bash

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

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"

if ! check_repo_permission $repo; then
	die "You don't have permission to remove packages from ${repo}"
fi

if [ "$arch" == "all" ]; 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]..."
	# TODO: detect split packages; do we even want them to be removed automatically?
	remove_pkgs[${#remove_pkgs[*]}]=$pkgbase
done

for tarch in ${tarches[@]}; do
	arch_repo_remove "${repo}" "${tarch}" ${remove_pkgs[@]}
	repo_unlock $repo $tarch
done