# Copyright 1999-2009 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2
# $Header: $
#
# Copyright 2008 Leonardo Valeri Manera <l.valerimanera@gmail.com>
#
# @ECLASS: eggs.eclass
# @MAINTAINER:
# @BLURB: Eclass for Chicken-Scheme Egg packages
# @DESCRIPTION:
#
# This eclass provides generalized functions to compile, test and
# install eggs, as well as setting a number of variables to default
# or autogenerated values.

# @ECLASS-VARIABLE: NEED_CHICKEN
# @DESCRIPTION:
# If you need anything different from chicken 3.0.5, use the
# NEED_CHICKEN variable before inheriting elisp.eclass.  Set it to the
# major version the egg needs and the dependency will be adjusted.

# @ECLASS-VARIABLE: EGG_TESTABLE
# @DESCRIPTION:
# Enables egg test-phase if set to 'yes'.

# @ECLASS-VARIABLE: EGG_NAME
# @DESCRIPTION:
# Override egg name autogeneration by settting this before importing
# this eclass.

RESTRICT="primaryuri"

inherit flag-o-matic

VERSION="${NEED_CHICKEN:-3.1.0}"
DEPEND=">=dev-scheme/chicken-${VERSION}"
RDEPEND=">=dev-scheme/chicken-${VERSION}"
SLOT="0"
IUSE=""

case ${PN} in
	srfi*)
		EGG_NAME=${PN/#srfi/srfi-}
		;;
	*)
		EGG_NAME=${EGG_NAME:-${PN}}
		;;
esac

EGGDOC_DIR="/usr/share/doc/chicken-eggs/${PN}"

SRC_URI="http://cleo.uwindsor.ca/cgi-bin/gentoo-eggs/${EGG_NAME}-3-${PV}.tar.gz"

if [[ -n "${OLD_EGGPAGE}" ]]; then
	HOMEPAGE="http://www.call-with-current-continuation.org/eggs/${EGG_NAME}"
else
	HOMEPAGE="http://chicken.wiki.br/${EGG_NAME}"
fi

# @FUNCTION: eggs-install_binaries
# @USAGE:
# @DESCRIPTION:
# INstall egg binaries/scripts/wrappers into /usr/bin
eggs-install_binaries() {
	if [[ -d "${S}/install/${PROGRAM_PATH}" ]]; then
		pushd "${S}/install/${PROGRAM_PATH}" >/dev/null
		local file
		for file in $(ls); do
			einfo "  => /usr/bin/${file}"
			dobin "${file}" || die "failed installing ${file}"
			eend $?
		done
		popd >/dev/null
	fi
}

# @FUNCTION: eggs-install_files
# @USAGE:
# @DESCRIPTION:
# Install egg files into the correct locations.
eggs-install_files() {
	local destination=${1:-${CHICKEN_REPOSITORY}}
	local real_destination
	local file
	for file in $(ls); do
		case "${file}" in
			*.html|*.css)
				# Hackish, but working, way of displaying real destinations
				# in info messages. Feel free to improve on it.
				real_destination=${EGGDOC_DIR}
				insinto "${EGGDOC_DIR}"
				insopts -m644
				;;
			*.so)
				real_destination=${destination}
				insinto "${destination}"
				insopts -m755
				;;
			*)
				real_destination=${destination}
				insinto "${destination}"
				insopts -m644
				;;
		esac
		if [[ -d "${file}" ]];then
			# To iterate is human, to recurse, divine.
			( cd "${file}"; eggs-install_files "${destination}/${file}" )
		else
			einfo "  => ${real_destination}/${file}"
			doins "${file}" || die "failed installing ${file}"
			eend $?
		fi
	done
}

# @FUNCTION: eggs-set_paths
# @USAGE:
# @DESCRIPTION:
# Modify the .setup-info file(s) to reflect true documentation
# installation paths.
eggs-set_paths() {
	ebegin "Processing setup files"
	for setup_file in $(ls *.setup-info); do
		einfo "  ${setup_file}"
		sed -e "s:${PROGRAM_PATH}:/usr/bin:g" \
			-e "s:${CHICKEN_REPOSITORY}/\(.*\).html:${EGGDOC_DIR}/\1.html:g" \
			-i "${setup_file}" || die "failed processing ${setup_file}"
		eend $?
	done
	einfo "Done processing setup files."
}

#
# Ebuild function redefintions
#

eggs_src_unpack() {
	mkdir "${S}"
	cd "${S}"
	unpack "${A}" || die
}

eggs_src_compile() {
	strip-flags || die
	filter-ldflags -Wl,--as-needed
	CSC_OPTIONS="-C '$CFLAGS $LDFLAGS'"

	CHICKEN_SETUP_OPTIONS="-v -k -build-prefix ${S}/build -install-prefix ${S}/install"

	chicken-setup ${CHICKEN_SETUP_OPTIONS} || die "egg compilation failed"
}

eggs_src_test() {
	if [[ "${EGG_TESTABLE}" == "yes" ]]; then
		chicken-setup -n -t ${CHICKEN_SETUP_OPTIONS} || die "egg test phase failed"
	fi
}

eggs_src_install() {
	CHICKEN_REPOSITORY=$(chicken-setup -R) || die
	PROGRAM_PATH=$(chicken-setup -P) || die

	pushd "${S}/install/${CHICKEN_REPOSITORY}" >/dev/null

	[[ -f index.html ]] && rm index.html
	eggs-set_paths

	ebegin "Installing files"
	eggs-install_binaries
	eggs-install_files
	einfo "Done with installation."

	popd >/dev/null
}

EXPORT_FUNCTIONS src_unpack src_compile src_test src_install