# Copyright 1999-2021 Gentoo Authors
# Distributed under the terms of the GNU General Public License v2

EAPI=7

inherit desktop optfeature xdg-utils

DESCRIPTION="General purpose, multi-paradigm Lisp-Scheme programming language"
HOMEPAGE="https://racket-lang.org/"
SRC_URI="
	minimal? ( https://download.racket-lang.org/installers/${PV}/${PN}-minimal-${PV}-src-builtpkgs.tgz )
	!minimal? ( https://download.racket-lang.org/installers/${PV}/${P}-src-builtpkgs.tgz )
"
S="${WORKDIR}/${P}/src"

# See https://blog.racket-lang.org/2019/11/completing-racket-s-relicensing-effort.html
LICENSE="
	|| ( MIT Apache-2.0 )
	chez? ( Apache-2.0 )
	!chez? ( LGPL-3 )
"
# Bytecode generated by Racket is not compatible between versions
SLOT="0/${PV}"
KEYWORDS="~amd64 ~arm ~ppc ~ppc64 ~x86"
IUSE="X +chez +doc +futures +jit minimal +places +readline +threads"
REQUIRED_USE="futures? ( jit )"

DEPEND="
	!dev-tex/slatex
	dev-db/sqlite:3
	dev-libs/libffi:=
	X? (
		dev-util/desktop-file-utils
		media-libs/libpng:0
		virtual/jpeg:0
		x11-libs/cairo[X]
		x11-libs/gtk+:3[X]
		x11-libs/pango[X]
		x11-misc/shared-mime-info
	)
	readline? ( dev-libs/libedit )
"
RDEPEND="${DEPEND}"

# "mred" and "mzscheme" are binaries generated by Racket, not CC
QA_FLAGS_IGNORED="usr/bin/mred usr/bin/mzscheme"

# Backports that will be probably available in 8.3 release
PATCHES=(
	# Prevent "libracket3m" from being stripped
	# https://github.com/racket/racket/commit/92d202060201f569fafc348c4f64a2965b55287f
	"${FILESDIR}/Makefile-nostrip.patch"
	# Fix "starter" LDFLAGS
	# https://github.com/racket/racket/commit/4f0e1703979d704c4f91b009945c324450acec7a
	"${FILESDIR}/Makefile-starter.patch"
)

# Package database files
PKGDB=(
	/usr/share/racket/info-cache.rktd
	/usr/share/racket/links.rktd
	/usr/share/racket/pkgs/pkgs.rktd
)

post_X_update() {
	if use X && ! use minimal; then
		xdg_desktop_database_update
		xdg_icon_cache_update
	fi
}

src_prepare() {
	# Prepare environment
	unset PLTADDONDIR PLTCOLLECTS PLTCONFIGDIR PLTUSERHOME
	xdg_environment_reset

	default

	# Remove bundled libffi
	rm -r ./bc/foreign/libffi || die "failed to remove bundled libffi"
}

src_configure() {
	# According to vapier, we should use the bundled libtool
	#   such that we don't preclude cross-compile.
	#   Thus don't use --enable-lt=/usr/bin/libtool
	# --enable-bc builds Racket w/o chez backend
	local myconf=(
		--disable-libs
		--disable-strip
		--docdir="${EPREFIX}/usr/share/doc/${PF}"
		--enable-float
		--enable-foreign
		--enable-libffi
		--enable-shared
		$(usex chez "--enable-cs --enable-csonly" "--enable-bc --enable-bconly")
		$(use_enable X gracket)
		$(use_enable doc docs)
		$(use_enable futures)
		$(use_enable jit)
		$(use_enable places)
		$(use_enable threads pthread)
	)
	econf "${myconf[@]}"
}

src_install() {
	default

	# raco needs decompressed files for packages doc installation bug 662424
	if use doc; then
		docompress -x /usr/share/doc/${PF}
	fi

	# Remove unneeded "*.a" and "*.la" files
	find "${ED}" \( -name "*.a" -o -name "*.la" \) -delete || die

	# Create missing desktop files and icon
	if use X && ! use minimal; then
		newicon "${ED}/usr/share/racket/drracket-exe-icon.png" "racket.png"
		make_desktop_entry "gracket" "GRacket" "racket" "Development;Education;"
		make_desktop_entry "plt-games" "PLT Games" "racket" "Education;Game;"
	fi
}

pkg_preinst() {
	# If we are merging the same version (NOT revision!)
	# check if pkg database files exist and do not overwrite them
	local pvr rel
	for pvr in ${REPLACING_VERSIONS}; do
		rel="${pvr%-r*}"
		if [[ "${rel}" == "${PV}" ]]; then
			echo "We are installing the same version: ${rel}"
			local rktd
			for rktd in "${PKGDB[@]}"; do
				if [[ -f "${EROOT}/${rktd}" ]]; then
					einfo "Keeping old file: ${rktd}"
					mv "${ED}"/${rktd} "${ED}"/${rktd}.bak ||
						die "failed to create a backup of ${rktd}"
					cp "${EROOT}"/${rktd} "${ED}"/${rktd} ||
						die "failed to create a copy of ${rktd}"
				fi
			done
		fi
	done
}

pkg_postinst() {
	post_X_update

	optfeature "generating PDF files using Scribble" dev-texlive/texlive-fontsextra
}

pkg_postrm() {
	post_X_update
}

pkg_config() {
	einfo "Swapping package database backup files"

	for rktd in "${PKGDB[@]}"; do
		mv "${EROOT}"/${rktd} "${EROOT}"/${rktd}.pkg_config || die
		mv "${EROOT}"/${rktd}.bak "${EROOT}"/${rktd} || die
		mv "${EROOT}"/${rktd}.pkg_config "${EROOT}"/${rktd}.bak || die
	done
}