# $Id$

provide mage

help_mage_update()
{
	mecho "get mage.update"
	mecho " show possible updates missing on this system."
	mecho "or"
	mecho "set mage.update"
	mecho " fetches updates of the package database."
}

set_mage_update()
{
	mage update && mecho "done" || mecho "failed"
}

get_mage_update()
{
	mage uppretend && mecho "done" || mecho "failed"
}

help_mage_upgrade()
{
	mecho "set mage.upgrade"
	mecho " upgrades the whole system."
}

set_mage_upgrade()
{
	mage upgrade && mecho "done" || mecho "failed"
}

help_mage_package()
{
	mecho "set mage.package [method] [package]"
	mecho " package install operations on this system"
	mecho " methods:"
	mecho "   install   - installs given package"
	mecho "   uninstall - uninstalls given package"
	mecho "   update    - updates the package database"
	mecho "   upgrade   - upgrades the whole system"
	mecho "or"
	mecho "get mage.package [method] [package]"
	mecho " package information operations"
	mecho " methods:"
	mecho "   pretend   - pretend dependencies of given package"
	mecho "   search    - searches the database for matching packages"
}

set_mage_package()
{
	local method="$1"
	local package="$2"
	[[ -z ${method} ]] && help_mage_package && return 1

	case ${method} in
		install|uninstall)
			[[ -z ${package} ]] && help_mage_package && return 
			mage "${method}" "${package}" && mecho "done" || mecho "failed"
			;;
		update|upgrade)
			mage "${method}" && mecho "done" || mecho "failed"
			;;
		*) help_mage_package && return 1 ;;
	esac
}

get_mage_package()
{
	local method="$1"
	local package="$2"
	[[ -z ${method} ]] && help_mage_package && return 1
	[[ -z ${package} ]] && help_mage_package && return 1

	case ${method} in
		pretend|search) mage "${method}" "${package}" && mecho "done" || mecho "failed" ;;
		*) help_mage_package && return 1 ;;
	esac
}

help_mage_clean()
{
	mecho "set mage.clean"
	mecho " deletes all downloaded packages from the system"
}

set_mage_clean()
{
	mage clean && mecho "done" || mecho "failed"
}