#!/bin/bash
#
#   repo-remove - remove a package entry from a given repo database file
#   @configure_input@
#
#   Copyright (c) 2002-2007 by Judd Vinet <jvinet@zeroflux.org>
#
#   This program is free software; you can redistribute it and/or modify
#   it under the terms of the GNU General Public License as published by
#   the Free Software Foundation; either version 2 of the License, or
#   (at your option) any later version.
#
#   This program is distributed in the hope that it will be useful,
#   but WITHOUT ANY WARRANTY; without even the implied warranty of
#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#   GNU General Public License for more details.
#
#   You should have received a copy of the GNU General Public License
#   along with this program; if not, write to the Free Software
#   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
#   USA.

# gettext initialization
export TEXTDOMAIN='pacman'
export TEXTDOMAINDIR='@localedir@'

myver='@PACKAGE_VERSION@'

FORCE=0
REPO_DB_FILE=""

# print usage instructions
usage() {
	printf "$(gettext "repo-remove %s\n\n")" $myver
	printf "$(gettext "usage: %s <path-to-db> <packagename> ...\n\n")" "$0"
	printf "$(gettext "\
repo-remove will update a package database by removing the package name\n\
specified on the command line from the given repo database. Multiple\n\
packages to remove can be specified on the command line.\n\n")"
	echo "$(gettext "Example:  repo-remove /path/to/repo.db.tar.gz kernel26")"
}

version() {
	printf "repo-remove (pacman) %s\n" "$myver"
	printf "$(gettext "\
Copyright (C) 2002-2007 Judd Vinet <jvinet@zeroflux.org>.\n\n\
This is free software; see the source for copying conditions.\n\
There is NO WARRANTY, to the extent permitted by law.\n")"
}

# test if a file is a repository DB
test_repo_db_file () {
	if [ -f "$REPO_DB_FILE" ]; then
		[ "$(bsdtar -tf "$REPO_DB_FILE" | grep -c "/desc")" -gt 0 ] || return 1
	else
		true
	fi
}

# remove existing entries from the DB
db_remove_entry()
{
	cd $gstmpdir

	# remove any other package in the DB with same name
	for existing in *; do
		if [ "${existing%-*-*}" = "$1" ]; then
			printf "$(gettext ":: removing existing package '%s'")\n" "$existing"
			rm -rf $existing
		fi
	done
} # end db_remove_entry

# PROGRAM START

# check for help flags
if [ "$1" = "-h" -o "$1" = "--help" ]; then
	usage
	exit 0
fi

# check for version flags
if [ "$1" = "-V" -o "$1" = "--version" ]; then
	version
	exit 0
fi

# check for correct number of args
if [ $# -lt 2 ]; then
	usage
	exit 1
fi

# source system and user makepkg.conf
if [ -r @sysconfdir@/makepkg.conf ]; then
	source @sysconfdir@/makepkg.conf
else
	printf "$(gettext "ERROR: /etc/makepkg.conf not found. Can not continue.")\n" >&2
	exit 1 # $E_CONFIG_ERROR
fi

if [ -r ~/.makepkg.conf ]; then
	source ~/.makepkg.conf
fi

# main routine
if [ $# -gt 1 ]; then
	gstmpdir=$(mktemp -d /tmp/gensync.XXXXXXXXXX) || (\
	printf "$(gettext "cannot create temp directory for database building")\n"; \
	exit 1)

	success=0
	# parse arguements
	for arg in $@; do
		if [ -z "$REPO_DB_FILE" ]; then
			REPO_DB_FILE="$(readlink -f $arg)"
			if ! test_repo_db_file; then
				printf "$(gettext "error: repository file '%s' is not a proper pacman db")\n" "$REPO_DB_FILE"
				exit 1
			elif [ -f "$REPO_DB_FILE" ]; then
				printf "$(gettext ":: extracting database to a temporary location")\n"
				bsdtar -xf "$REPO_DB_FILE" -C "$gstmpdir"
			fi
		else
			printf "$(gettext ":: searching for package '%s'")\n"

			this_dir="$(pwd)"
			if db_remove_entry "$arg"; then
				success=1
			else
				printf "$(gettext "error: package matching '%s' not found")\n" "$arg"
			fi
			cd $this_dir
		fi
	done

	# if all operations were a success, rezip database
	if [ "$success" = "1" ]; then
		printf "$(gettext ":: creating updated database file %s")\n" "$REPO_DB_FILE"
		cd $gstmpdir
		if [ -n "$(ls)" ]; then
			[ -f "${REPO_DB_FILE}.old" ] && rm "${REPO_DB_FILE}.old"
			[ -f "$REPO_DB_FILE" ] && mv "$REPO_DB_FILE" "${REPO_DB_FILE}.old"
			case "$DB_COMPRESSION" in
				gz) bsdtar -c * | gzip -9 >$REPO_DB_FILE ;;
				bz2) bsdtar -c * | bzip2 -9 >$REPO_DB_FILE ;;
				*) printf "$(gettext "warning: no compression set")\n"
				bsdtar -c * >$REPO_DB_FILE;;
			esac
		fi
	else
		printf "$(gettext ":: no packages modified, nothing to do")\n"
	fi
fi

# remove the temp directory used to unzip
[ -d "$gstmpdir" ] && rm -rf $gstmpdir

# vim: set ts=2 sw=2 noet: