summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSergei Trofimovich <slyfox@gentoo.org>2011-03-27 19:44:17 +0000
committerSergei Trofimovich <slyfox@gentoo.org>2011-03-27 19:44:17 +0000
commitec03af9d49b8bc3a73d6ebf7d4a121a20ffdc844 (patch)
tree7f9c4ad95b609246b4f5f467a54e6d66ba99bbd2 /dev-lang
parentstable ppc, bug 358681 (diff)
downloadhistorical-ec03af9d49b8bc3a73d6ebf7d4a121a20ffdc844.tar.gz
historical-ec03af9d49b8bc3a73d6ebf7d4a121a20ffdc844.tar.bz2
historical-ec03af9d49b8bc3a73d6ebf7d4a121a20ffdc844.zip
Migrated to EAPI=3: initial PREFIX support (based on work of grobian); USE=unicode for ncurses is a required depend (bug #326237 by Josh Cartwright and others). Added linker script support to workaround bug #311361 by Maciej Piechotka.
Package-Manager: portage-2.1.9.42/cvs/Linux x86_64
Diffstat (limited to 'dev-lang')
-rw-r--r--dev-lang/ghc/ChangeLog11
-rw-r--r--dev-lang/ghc/Manifest14
-rw-r--r--dev-lang/ghc/files/ghc-6.12.3-ticket-2615-linker-script.patch278
-rw-r--r--dev-lang/ghc/ghc-6.12.3-r1.ebuild485
4 files changed, 786 insertions, 2 deletions
diff --git a/dev-lang/ghc/ChangeLog b/dev-lang/ghc/ChangeLog
index fa827950bc9c..1c307a436bbc 100644
--- a/dev-lang/ghc/ChangeLog
+++ b/dev-lang/ghc/ChangeLog
@@ -1,6 +1,15 @@
# ChangeLog for dev-lang/ghc
# Copyright 1999-2011 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lang/ghc/ChangeLog,v 1.202 2011/02/25 12:36:04 xarthisius Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-lang/ghc/ChangeLog,v 1.203 2011/03/27 19:44:17 slyfox Exp $
+
+*ghc-6.12.3-r1 (27 Mar 2011)
+
+ 27 Mar 2011; Sergei Trofimovich <slyfox@gentoo.org> +ghc-6.12.3-r1.ebuild,
+ +files/ghc-6.12.3-ticket-2615-linker-script.patch:
+ Migrated to EAPI=3: initial PREFIX support (based on work of grobian);
+ USE=unicode for ncurses is a required depend (bug #326237 by Josh
+ Cartwright and others). Added linker script support to workaround bug
+ #311361 by Maciej Piechotka.
25 Feb 2011; Kacper Kowalik <xarthisius@gentoo.org> ghc-6.12.3.ebuild:
ppc/ppc64 stable wrt #338652
diff --git a/dev-lang/ghc/Manifest b/dev-lang/ghc/Manifest
index cd50c7b7ea49..18ae3df39d72 100644
--- a/dev-lang/ghc/Manifest
+++ b/dev-lang/ghc/Manifest
@@ -1,3 +1,6 @@
+-----BEGIN PGP SIGNED MESSAGE-----
+Hash: SHA1
+
AUX 10ghc 40 RMD160 1c9e367fa4ea2fa2d3a046986b066b157964390a SHA1 33486a4907e8140f4d919813df4ef4e6203d6b20 SHA256 86c80e876343456b1a1407365bfc2a441bf4c6ca23d3549d67bd800abd617e2f
AUX depsort.py 1958 RMD160 4192ad9ed14064a9da42ce1faedcf28996094da3 SHA1 2c900abeb6cfcc4327f0e9418b5abd7761ce5879 SHA256 7406f639d17b8acab6a1db7e398e74379b44950d4821bc36901abd3455d63b3d
AUX ghc-6.10.2-readline.patch 8612 RMD160 cf3c1539a55225439c7f16c698e622c5f6f0cd47 SHA1 82318ea6285fc9dd3ed31a023e0a349a4950473c SHA256 9be6fe23aed177c6dd16fcea4eb9ba39406ee365cb923b33d084dec451005464
@@ -19,6 +22,7 @@ AUX ghc-6.12.3-ia64-storage-manager-fix.patch 3035 RMD160 067caf41e1ba60b5215b16
AUX ghc-6.12.3-ia64-use-libffi-for-foreign-import-wrapper.patch 683 RMD160 4361e22211960ef347a49e5d0fa53d6337d2c7a6 SHA1 6caf69a755034794f470c3f1e5f48e7453d4e949 SHA256 82f48006c95fb9d01c8618f7457cd2744d7a1fada8c70d25544eefa23cbfde2b
AUX ghc-6.12.3-libffi-incorrect-detection-of-selinux.patch 2228 RMD160 a2104ee651e7f751db4ca7e460b3b4816b1358cc SHA1 d9a5d631b46d510715182890fbd91b962d75aa21 SHA256 97410ae73b0e1cc127d5f07b39c3a6e0a3fdaf36491af17c7b7eb0c9c8d716b1
AUX ghc-6.12.3-ppc-use-libffi-for-foreign-import-wrapper.patch 609 RMD160 a26c8a5c7fde2188639484d5cc622de669e5f427 SHA1 03615e6b6428dd693b57d16420f3853ce3d51f47 SHA256 537a96473cec66739534da7cc88bbde37d7f5f0ab158a9921e666985c18fc1b5
+AUX ghc-6.12.3-ticket-2615-linker-script.patch 8956 RMD160 f843756077a767a9ec59f114676bd06102259302 SHA1 ce5e2b90fc8a99ae37d2ade07d75e611514bb389 SHA256 e670eafd89bcbf7842eedb16af6f538e11c9644c56af6eaa8a3f87b8d0c794aa
AUX ghc-6.4.2-sparc32plus.patch 526 RMD160 970d062362284659c2570394c8f9328d8096ea8e SHA1 40d25c25a3cd6a228f3757b8e298fd8c72710544 SHA256 a05bd16c9308ec9f608aeabe0ea35e2dff6826f262108d1ccb16c4f93a2d3a44
AUX ghc-6.4.2-sparcmangler.patch 837 RMD160 7e3a2a94bb62c3c0da09f08096481cace2b1bb96 SHA1 5faccb311239c4c4d07a2c6dc507d51a18c2bc96 SHA256 3987724420c6d4b552c6fbb3b3ca10fca8aaa73573735aa3de824d3dc65f94af
AUX ghc-6.5-norelax.patch 613 RMD160 71012d8615e164c72d0db75c8cc606ccf8e3ddd9 SHA1 4bab0e904d9950ba92e16b3932635e5a1c3edee1 SHA256 0da9630bbd28edee7538d857dbeefd6d4cdddafd198499e61513f2f4d44c2fc0
@@ -87,6 +91,7 @@ DIST ghc-bundled-readline-5.2_p13-amd64.tbz2 976677 RMD160 f0543aa3f404d45aad436
DIST ghc-bundled-readline-5.2_p13-x86.tbz2 940742 RMD160 5f9470a99047f004bd0917c62253bff9b663c9a5 SHA1 f5463a8929d2ba792b91085f78d6763cb50ef14e SHA256 bb9766235ed0d6e3c2f3ffe1625ecbe8e4d2e0254f7060e845be3a404835cd2a
DIST ghc-testsuite-6.4.2.tar.gz 1181389 RMD160 1eea6a19a9fca6b3d56a6f29b69289cb88af8173 SHA1 7ada60fe2abb9208d841787781d522d5a1110dc2 SHA256 1a864243e922c233049585fa3bf4a86a0ca3e7b3ffebf26245eb037f15dd4d12
EBUILD ghc-6.10.4-r1.ebuild 13011 RMD160 4feb3ad764af5ad16b3dd5a000d49755c8b91c2a SHA1 c8eb3181598c05053e1f27b5fdb2a3a4264377b1 SHA256 f8c163192a9c5a62158bbb5698cef9872fa0e64956689aeafb3f90c8c9670b0a
+EBUILD ghc-6.12.3-r1.ebuild 16641 RMD160 7d4d41912c87490900cd46c55919dd23eb981206 SHA1 02cda3a639ecbdcf00c98af46a559dd423bcef65 SHA256 98a1c06eb59197cd3927cb8c70c3388a759d8344e8979e2b5afc7734a44f385b
EBUILD ghc-6.12.3.ebuild 14839 RMD160 6ec6a88c9d4f616b32e8073610f051f0e86d7357 SHA1 b8c1b5c5bf6fe3db063e66f4997b7ab34c78d73e SHA256 cacb480c299072e2a004599682e8b4b04038997bde27ed47c7799398ca1cac0a
EBUILD ghc-6.2.2.ebuild 10613 RMD160 32eb80c657fcea0c99e683b313643e063fa67f30 SHA1 e35b8257c2e2d7b8ed9e62835a0b76994f0e91a8 SHA256 570e1f68ec3965ab8aab15ea946e96c6f7be7e037e60a1b9afd26cd479122cca
EBUILD ghc-6.4.2.ebuild 13718 RMD160 9cee26621e31ee8ed3e59cfd27cdf1f0689b054c SHA1 62f98f4ed6f74f770810b27d4772c4947129020e SHA256 b6fe46438045cc54225f20b4f4bdd4f33dfd18c303348e68d27626875de28368
@@ -94,5 +99,12 @@ EBUILD ghc-6.6.1.ebuild 12333 RMD160 76cd8b4fe72842cfcd0e2bf20f5c11e788472bd9 SH
EBUILD ghc-6.6.ebuild 10978 RMD160 f67c1aa1d68f5a277d5d6db6004269f576b95d80 SHA1 7c18bc6d59b1c948651fad042a8928af8aa07a81 SHA256 8e3efaf74dd46ca2bcf3a0f5e75700b7ad4e8083795c3604cc247a0fa6e6d8bf
EBUILD ghc-6.8.2-r1.ebuild 9147 RMD160 48d75d1fb56e58c4f87e95c6e1664bdabbb3eba4 SHA1 b8510681b9f2535a87f0cbef3768a771071ea1c5 SHA256 90eef3470c0ae305c0248ce2248333e703039a2c16ce6d567a88f9601b28690d
EBUILD ghc-6.8.2.ebuild 9201 RMD160 0b0685249c09afbb3a03f8c54e458eabf6e0a90f SHA1 9dc6947b948770e710aae71ed2ccb301609b8ffb SHA256 724109ab0e94f8919bb0ea92a96f48be2a10bea5ee339e2b750bf81669e96231
-MISC ChangeLog 36433 RMD160 e218c65fbd318912689286bf8458b030ac4d302e SHA1 ace63c05debbfe7583f42b908fc7a2c6bb81d0f5 SHA256 2423611fd224e561a1663556c82f744069645dfb3d06cf0eef4d228745138dfb
+MISC ChangeLog 36834 RMD160 7516d849891d4f5a76b90344b2c1c19195493d76 SHA1 753fddc1419b28b70f1065cccc9ec317e433885d SHA256 51679ec74e06a390ac714f0372469826f3e2a7e8027484b8625d85f8790c82b8
MISC metadata.xml 442 RMD160 9cfa0af9084477c8a70ecf0ac3fb3093ae0cd602 SHA1 be2833090f093ac1c8fc2f5c6f3f253bdbdd6b96 SHA256 2bacbdfcaea11289949a687626f59f99af8fda9ec495b2c349ce5898d9f0dcd4
+-----BEGIN PGP SIGNATURE-----
+Version: GnuPG v2.0.17 (GNU/Linux)
+
+iEYEARECAAYFAk2PlD4ACgkQcaHudmEf86o8iQCbBpQUGFjZVc1uV5MZffj7wf/y
+C1sAnRYoXPuMZXWY/jHK19cBOWnibCIk
+=4L8m
+-----END PGP SIGNATURE-----
diff --git a/dev-lang/ghc/files/ghc-6.12.3-ticket-2615-linker-script.patch b/dev-lang/ghc/files/ghc-6.12.3-ticket-2615-linker-script.patch
new file mode 100644
index 000000000000..96fdcb6a8091
--- /dev/null
+++ b/dev-lang/ghc/files/ghc-6.12.3-ticket-2615-linker-script.patch
@@ -0,0 +1,278 @@
+Wed Dec 16 19:51:55 CET 2009 howard_b_golden@yahoo.com
+ * FIX #2615 (linker scripts in .so files)
+ This patch does not apply to Windows. It only applies to systems with
+ ELF binaries.
+
+ This is a patch to rts/Linker.c to recognize linker scripts in .so
+ files and find the real target .so shared library for loading.
+diff -rN -u old-ghc/rts/Linker.c new-ghc/rts/Linker.c
+--- old-ghc/rts/Linker.c 2010-07-28 22:59:33.532759118 +0200
++++ new-ghc/rts/Linker.c 2010-07-28 22:59:34.853759052 +0200
+@@ -39,6 +39,8 @@
+
+ #include <stdlib.h>
+ #include <string.h>
++#include <stdio.h>
++#include <assert.h>
+
+ #ifdef HAVE_SYS_STAT_H
+ #include <sys/stat.h>
+@@ -79,6 +81,8 @@
+
+ #if defined(linux_HOST_OS) || defined(solaris2_HOST_OS) || defined(freebsd_HOST_OS) || defined(dragonfly_HOST_OS) || defined(netbsd_HOST_OS) || defined(openbsd_HOST_OS)
+ # define OBJFORMAT_ELF
++# include <regex.h> // regex is already used by dlopen() so this is OK
++ // to use here without requiring an additional lib
+ #elif defined(cygwin32_HOST_OS) || defined (mingw32_HOST_OS)
+ # define OBJFORMAT_PEi386
+ # include <windows.h>
+@@ -1095,12 +1099,19 @@
+
+ #if defined(OBJFORMAT_ELF) || defined(OBJFORMAT_MACHO)
+ static void *dl_prog_handle;
++static regex_t re_invalid;
++static regex_t re_realso;
++static void initLinkerCleanup( void );
++#ifdef THREADED_RTS
++static Mutex dl_mutex; // mutex to protect dlopen/dlerror critical section
++#endif
+ #endif
+
+ void
+ initLinker( void )
+ {
+ RtsSymbolVal *sym;
++ int compileResult;
+
+ /* Make initLinker idempotent, so we can call it
+ before evey relevant operation; that means we
+@@ -1109,6 +1120,9 @@
+ linker_init_done = 1;
+ }
+
++#ifdef THREADED_RTS
++ initMutex(&dl_mutex);
++#endif
+ stablehash = allocStrHashTable();
+ symhash = allocStrHashTable();
+
+@@ -1127,6 +1141,15 @@
+ # else
+ dl_prog_handle = dlopen(NULL, RTLD_LAZY);
+ # endif /* RTLD_DEFAULT */
++
++ compileResult = regcomp(&re_invalid,
++ "(([^ \t()])+\\.so([^ \t:()])*):([ \t])*invalid ELF header",
++ REG_EXTENDED);
++ ASSERT( compileResult == 0 );
++ compileResult = regcomp(&re_realso,
++ "GROUP *\\( *(([^ )])+)",
++ REG_EXTENDED);
++ ASSERT( compileResult == 0 );
+ # endif
+
+ #if defined(x86_64_HOST_ARCH)
+@@ -1147,6 +1170,19 @@
+ #endif
+ }
+
++void
++exitLinker( void ) {
++#if defined(OBJFORMAT_ELF) || defined(OBJFORMAT_MACHO)
++ if (linker_init_done == 1) {
++ regfree(&re_invalid);
++ regfree(&re_realso);
++#ifdef THREADED_RTS
++ closeMutex(&dl_mutex);
++#endif
++ }
++#endif
++}
++
+ /* -----------------------------------------------------------------------------
+ * Loading DLL or .so dynamic libraries
+ * -----------------------------------------------------------------------------
+@@ -1182,29 +1218,112 @@
+ static OpenedDLL* opened_dlls = NULL;
+ #endif
+
+-const char *
+-addDLL( char *dll_name )
+-{
+ # if defined(OBJFORMAT_ELF) || defined(OBJFORMAT_MACHO)
+- /* ------------------- ELF DLL loader ------------------- */
+- void *hdl;
+- const char *errmsg;
+
+- initLinker();
++static char *
++internal_dlopen(const char *dll_name)
++{
++ void *hdl;
++ char *errmsg, *errmsg_copy;
+
+ // omitted: RTLD_NOW
+ // see http://www.haskell.org/pipermail/cvs-ghc/2007-September/038570.html
+- hdl= dlopen(dll_name, RTLD_LAZY | RTLD_GLOBAL);
++ IF_DEBUG(linker,
++ debugBelch("internal_dlopen: dll_name = '%s'\n", dll_name));
+
++ //-------------- Begin critical section ------------------
++ // This critical section is necessary because dlerror() is not
++ // required to be reentrant (see POSIX -- IEEE Std 1003.1-2008)
++ // Also, the error message returned must be copied to preserve it
++ // (see POSIX also)
++
++ ACQUIRE_LOCK(&dl_mutex);
++ hdl = dlopen(dll_name, RTLD_LAZY | RTLD_GLOBAL);
++
++ errmsg = NULL;
+ if (hdl == NULL) {
+ /* dlopen failed; return a ptr to the error msg. */
+ errmsg = dlerror();
+ if (errmsg == NULL) errmsg = "addDLL: unknown error";
+- return errmsg;
+- } else {
++ errmsg_copy = stgMallocBytes(strlen(errmsg)+1, "addDLL");
++ strcpy(errmsg_copy, errmsg);
++ errmsg = errmsg_copy;
++ }
++ RELEASE_LOCK(&dl_mutex);
++ //--------------- End critical section -------------------
++
++ return errmsg;
++}
++# endif
++
++const char *
++addDLL( char *dll_name )
++{
++# if defined(OBJFORMAT_ELF) || defined(OBJFORMAT_MACHO)
++ /* ------------------- ELF DLL loader ------------------- */
++
++#define NMATCH 5
++ regmatch_t match[NMATCH];
++ char *errmsg;
++ FILE* fp;
++ size_t match_length;
++#define MAXLINE 1000
++ char line[MAXLINE];
++ int result;
++
++ initLinker();
++
++ IF_DEBUG(linker, debugBelch("addDLL: dll_name = '%s'\n", dll_name));
++ errmsg = internal_dlopen(dll_name);
++
++ if (errmsg == NULL) {
+ return NULL;
+ }
+- /*NOTREACHED*/
++
++ // GHC Trac ticket #2615
++ // On some systems (e.g., Gentoo Linux) dynamic files (e.g. libc.so)
++ // contain linker scripts rather than ELF-format object code. This
++ // code handles the situation by recognizing the real object code
++ // file name given in the linker script.
++ //
++ // If an "invalid ELF header" error occurs, it is assumed that the
++ // .so file contains a linker script instead of ELF object code.
++ // In this case, the code looks for the GROUP ( ... ) linker
++ // directive. If one is found, the first file name inside the
++ // parentheses is treated as the name of a dynamic library and the
++ // code attempts to dlopen that file. If this is also unsuccessful,
++ // an error message is returned.
++
++ // see if the error message is due to an invalid ELF header
++ IF_DEBUG(linker, debugBelch("errmsg = '%s'\n", errmsg));
++ result = regexec(&re_invalid, errmsg, (size_t) NMATCH, match, 0);
++ IF_DEBUG(linker, debugBelch("result = %i\n", result));
++ if (result == 0) {
++ // success -- try to read the named file as a linker script
++ match_length = (size_t) stg_min((match[1].rm_eo - match[1].rm_so),
++ MAXLINE-1);
++ strncpy(line, (errmsg+(match[1].rm_so)),match_length);
++ line[match_length] = '\0'; // make sure string is null-terminated
++ IF_DEBUG(linker, debugBelch ("file name = '%s'\n", line));
++ if ((fp = fopen(line, "r")) == NULL) {
++ return errmsg; // return original error if open fails
++ }
++ // try to find a GROUP ( ... ) command
++ while (fgets(line, MAXLINE, fp) != NULL) {
++ IF_DEBUG(linker, debugBelch("input line = %s", line));
++ if (regexec(&re_realso, line, (size_t) NMATCH, match, 0) == 0) {
++ // success -- try to dlopen the first named file
++ IF_DEBUG(linker, debugBelch("match%s\n",""));
++ line[match[1].rm_eo] = '\0';
++ errmsg = internal_dlopen(line+match[1].rm_so);
++ break;
++ }
++ // if control reaches here, no GROUP ( ... ) directive was found
++ // and the original error message is returned to the caller
++ }
++ fclose(fp);
++ }
++ return errmsg;
+
+ # elif defined(OBJFORMAT_PEi386)
+ /* ------------------- Win32 DLL loader ------------------- */
+@@ -4195,7 +4314,7 @@
+ i++;
+ }
+ #endif
+- else
++ else
+ {
+ barf ("Don't know how to handle this Mach-O "
+ "scattered relocation entry: "
+@@ -4204,7 +4323,7 @@
+ oc->fileName, scat->r_type, scat->r_address);
+ return 0;
+ }
+-
++
+ #ifdef powerpc_HOST_ARCH
+ if(scat->r_type == GENERIC_RELOC_VANILLA
+ || scat->r_type == PPC_RELOC_SECTDIFF)
+@@ -4250,8 +4369,8 @@
+ "object file %s; entry type %ld; address %#lx\n",
+ oc->fileName, scat->r_type, scat->r_address);
+ return 0;
+- }
+-
++ }
++
+ }
+ else /* !(relocs[i].r_address & R_SCATTERED) */
+ {
+diff -rN -u old-ghc/rts/LinkerInternals.h new-ghc/rts/LinkerInternals.h
+--- old-ghc/rts/LinkerInternals.h 2010-07-28 22:59:33.532759118 +0200
++++ new-ghc/rts/LinkerInternals.h 2010-07-28 22:59:34.854758341 +0200
+@@ -109,4 +109,6 @@
+
+ extern ObjectCode *objects;
+
++void exitLinker( void );
++
+ #endif /* LINKERINTERNALS_H */
+diff -rN -u old-ghc/rts/RtsStartup.c new-ghc/rts/RtsStartup.c
+--- old-ghc/rts/RtsStartup.c 2010-07-28 22:59:33.537758009 +0200
++++ new-ghc/rts/RtsStartup.c 2010-07-28 22:59:34.859758558 +0200
+@@ -34,6 +34,7 @@
+ #include "Profiling.h"
+ #include "Timer.h"
+ #include "Globals.h"
++void exitLinker( void ); // there is no Linker.h file to include
+
+ #if defined(RTS_GTK_FRONTPANEL)
+ #include "FrontPanel.h"
+@@ -388,6 +389,9 @@
+ /* free shared Typeable store */
+ exitGlobalStore();
+
++ /* free linker data */
++ exitLinker();
++
+ /* free file locking tables, if necessary */
+ #if !defined(mingw32_HOST_OS)
+ freeFileLocking();
diff --git a/dev-lang/ghc/ghc-6.12.3-r1.ebuild b/dev-lang/ghc/ghc-6.12.3-r1.ebuild
new file mode 100644
index 000000000000..238ff4fd138f
--- /dev/null
+++ b/dev-lang/ghc/ghc-6.12.3-r1.ebuild
@@ -0,0 +1,485 @@
+# Copyright 1999-2011 Gentoo Foundation
+# Distributed under the terms of the GNU General Public License v2
+# $Header: /var/cvsroot/gentoo-x86/dev-lang/ghc/ghc-6.12.3-r1.ebuild,v 1.1 2011/03/27 19:44:17 slyfox Exp $
+
+# Brief explanation of the bootstrap logic:
+#
+# Previous ghc ebuilds have been split into two: ghc and ghc-bin,
+# where ghc-bin was primarily used for bootstrapping purposes.
+# From now on, these two ebuilds have been combined, with the
+# binary USE flag used to determine whether or not the pre-built
+# binary package should be emerged or whether ghc should be compiled
+# from source. If the latter, then the relevant ghc-bin for the
+# arch in question will be used in the working directory to compile
+# ghc from source.
+#
+# This solution has the advantage of allowing us to retain the one
+# ebuild for both packages, and thus phase out virtual/ghc.
+
+# Note to users of hardened gcc-3.x:
+#
+# If you emerge ghc with hardened gcc it should work fine (because we
+# turn off the hardened features that would otherwise break ghc).
+# However, emerging ghc while using a vanilla gcc and then switching to
+# hardened gcc (using gcc-config) will leave you with a broken ghc. To
+# fix it you would need to either switch back to vanilla gcc or re-emerge
+# ghc (or ghc-bin). Note that also if you are using hardened gcc-3.x and
+# you switch to gcc-4.x that this will also break ghc and you'll need to
+# re-emerge ghc (or ghc-bin). People using vanilla gcc can switch between
+# gcc-3.x and 4.x with no problems.
+
+EAPI="3"
+
+inherit base autotools bash-completion eutils flag-o-matic multilib toolchain-funcs ghc-package versionator pax-utils
+
+DESCRIPTION="The Glasgow Haskell Compiler"
+HOMEPAGE="http://www.haskell.org/ghc/"
+
+arch_binaries=""
+
+arch_binaries="$arch_binaries alpha? ( http://code.haskell.org/~slyfox/ghc-alpha/ghc-bin-${PV}-alpha-haddock.tbz2 )"
+arch_binaries="$arch_binaries x86? ( mirror://gentoo/ghc-bin-${PV}-x86.tbz2 )"
+arch_binaries="$arch_binaries amd64? ( mirror://gentoo/ghc-bin-${PV}-amd64.tbz2 )"
+arch_binaries="$arch_binaries ia64? ( http://code.haskell.org/~slyfox/ghc-ia64/ghc-bin-${PV}-ia64-haddock.tbz2 )"
+arch_binaries="$arch_binaries sparc? ( http://code.haskell.org/~slyfox/ghc-sparc/ghc-bin-${PV}-sparc.tbz2 )"
+arch_binaries="$arch_binaries ppc64? ( mirror://gentoo/ghc-bin-${PV}-ppc64.tbz2 )"
+arch_binaries="$arch_binaries ppc? ( mirror://gentoo/ghc-bin-${PV}-ppc.tbz2 )"
+
+# various ports:
+arch_binaries="$arch_binaries x86-fbsd? ( http://code.haskell.org/~slyfox/ghc-x86-fbsd/ghc-bin-${PV}-x86-fbsd.tbz2 )"
+
+SRC_URI="!binary? ( http://darcs.haskell.org/download/dist/${PV}/${P}-src.tar.bz2 )
+ !ghcbootstrap? ( $arch_binaries )"
+LICENSE="BSD"
+SLOT="0"
+KEYWORDS="~alpha ~amd64 ~ia64 ~ppc ~ppc64 ~sparc ~x86 ~x86-fbsd"
+IUSE="binary doc ghcbootstrap"
+
+RDEPEND="
+ !dev-lang/ghc-bin
+ >=sys-devel/gcc-2.95.3
+ >=sys-devel/binutils-2.17
+ >=dev-lang/perl-5.6.1
+ >=dev-libs/gmp-4.1
+ !<dev-haskell/haddock-2.4.2
+ sys-libs/ncurses[unicode]"
+# earlier versions than 2.4.2 of haddock only works with older ghc releases
+
+DEPEND="${RDEPEND}
+ ghcbootstrap? ( doc? ( ~app-text/docbook-xml-dtd-4.2
+ app-text/docbook-xsl-stylesheets
+ >=dev-libs/libxslt-1.1.2 ) )"
+# In the ghcbootstrap case we rely on the developer having
+# >=ghc-5.04.3 on their $PATH already
+
+PDEPEND="!ghcbootstrap? ( || ( =app-admin/haskell-updater-1.2* =app-admin/haskell-updater-1.1* ) )"
+
+# use undocumented feature STRIP_MASK to fix this issue:
+# http://hackage.haskell.org/trac/ghc/ticket/3580
+STRIP_MASK="*/HSffi.o"
+
+append-ghc-cflags() {
+ local flag compile assemble link
+ for flag in $*; do
+ case ${flag} in
+ compile) compile="yes";;
+ assemble) assemble="yes";;
+ link) link="yes";;
+ *)
+ [[ ${compile} ]] && GHC_CFLAGS="${GHC_CFLAGS} -optc${flag}"
+ [[ ${assemble} ]] && GHC_CFLAGS="${GHC_CFLAGS} -opta${flag}"
+ [[ ${link} ]] && GHC_CFLAGS="${GHC_CFLAGS} -optl${flag}";;
+ esac
+ done
+}
+
+ghc_setup_cflags() {
+ # We need to be very careful with the CFLAGS we ask ghc to pass through to
+ # gcc. There are plenty of flags which will make gcc produce output that
+ # breaks ghc in various ways. The main ones we want to pass through are
+ # -mcpu / -march flags. These are important for arches like alpha & sparc.
+ # We also use these CFLAGS for building the C parts of ghc, ie the rts.
+ strip-flags
+ strip-unsupported-flags
+
+ GHC_CFLAGS=""
+ for flag in ${CFLAGS}; do
+ case ${flag} in
+
+ # Ignore extra optimisation (ghc passes -O to gcc anyway)
+ # -O2 and above break on too many systems
+ -O*) ;;
+
+ # Arch and ABI flags are what we're really after
+ -m*) append-ghc-cflags compile assemble ${flag};;
+
+ # Debugging flags don't help either. You can't debug Haskell code
+ # at the C source level and the mangler discards the debug info.
+ -g*) ;;
+
+ # Ignore all other flags, including all -f* flags
+ esac
+ done
+
+ # hardened-gcc needs to be disabled, because the mangler doesn't accept
+ # its output.
+ gcc-specs-pie && append-ghc-cflags compile link -nopie
+ gcc-specs-ssp && append-ghc-cflags compile -fno-stack-protector
+
+ # prevent from failind building unregisterised ghc:
+ # http://www.mail-archive.com/debian-bugs-dist@lists.debian.org/msg171602.html
+ use ppc64 && append-ghc-cflags compile -mminimal-toc
+ # fix the similar issue as ppc64 TOC on ia64. ia64 has limited size of small data
+ # currently ghc fails to build haddock
+ # http://osdir.com/ml/gnu.binutils.bugs/2004-10/msg00050.html
+ use ia64 && append-ghc-cflags compile -G0
+}
+
+# substitutes string $1 to $2 in files $3 $4 ...
+relocate_path() {
+ local from=$1
+ local to=$2
+ shift 2
+ local file=
+ for file in "$@"
+ do
+ sed -i -e "s|$from|$to|g" \
+ "$file" || die "path relocation failed for '$file'"
+ done
+}
+
+# changes hardcoded ghc paths and updates package index
+# $1 - new absolute root path
+relocate_ghc() {
+ local to=$1
+
+ # backup original script to use it later after relocation
+ local gp_back="${T}/ghc-pkg-${PV}-orig"
+ cp "${WORKDIR}/usr/bin/ghc-pkg-${PV}" "$gp_back" || die "unable to backup ghc-pkg wrapper"
+
+ # Relocate from /usr to ${EPREFIX}/usr
+ relocate_path "/usr" "${to}/usr" \
+ "${WORKDIR}/usr/bin/ghc-${PV}" \
+ "${WORKDIR}/usr/bin/ghci-${PV}" \
+ "${WORKDIR}/usr/bin/ghc-pkg-${PV}" \
+ "${WORKDIR}/usr/bin/hsc2hs" \
+ "${WORKDIR}/usr/$(get_libdir)/${P}/package.conf.d/"*
+
+ # this one we will use to regenerate cache
+ # so it shoult point to current tree location
+ relocate_path "/usr" "${WORKDIR}/usr" "$gp_back"
+
+ if use prefix; then
+ # and insert LD_LIBRARY_PATH entry to EPREFIX dir tree
+ # TODO: add the same for darwin's CHOST and it's DYLD_
+ local new_ldpath='LD_LIBRARY_PATH="'${EPREFIX}/$(get_libdir):${EPREFIX}/usr/$(get_libdir)'${LD_LIBRARY_PATH:+:}${LD_LIBRARY_PATH}"\nexport LD_LIBRARY_PATH'
+ sed -i -e '2i'"$new_ldpath" \
+ "${WORKDIR}/usr/bin/ghc-${PV}" \
+ "${WORKDIR}/usr/bin/ghci-${PV}" \
+ "${WORKDIR}/usr/bin/ghc-pkg-${PV}" \
+ "$gp_back" \
+ "${WORKDIR}/usr/bin/hsc2hs" \
+ || die "Adding LD_LIBRARY_PATH for wrappers failed"
+ fi
+
+ # regenerate the binary package cache
+ "$gp_back" recache || die "failed to update cache after relocation"
+ rm "$gp_back"
+}
+
+pkg_setup() {
+ if use ghcbootstrap; then
+ ewarn "You requested ghc bootstrapping, this is usually only used"
+ ewarn "by Gentoo developers to make binary .tbz2 packages for"
+ ewarn "use with the ghc ebuild's USE=\"binary\" feature."
+ use binary && \
+ die "USE=\"ghcbootstrap binary\" is not a valid combination."
+ [[ -z $(type -P ghc) ]] && \
+ die "Could not find a ghc to bootstrap with."
+ fi
+}
+
+src_unpack() {
+ # Create the ${S} dir if we're using the binary version
+ use binary && mkdir "${S}"
+
+ base_src_unpack
+}
+
+src_prepare() {
+ source "${FILESDIR}/ghc-apply-gmp-hack" "$(get_libdir)"
+
+ ghc_setup_cflags
+
+ if ! use ghcbootstrap; then
+ # Modify the wrapper script from the binary tarball to use GHC_CFLAGS.
+ # See bug #313635.
+ sed -i -e "s|\"\$topdir\"|\"\$topdir\" ${GHC_CFLAGS}|" \
+ "${WORKDIR}/usr/bin/ghc-${PV}"
+
+ # allow hardened users use vanilla binary to bootstrap ghc
+ # ghci uses mmap with rwx protection at it implements dynamic
+ # linking on it's own (bug #299709)
+ pax-mark -m "${WORKDIR}/usr/$(get_libdir)/${P}/ghc"
+ fi
+
+ if use binary; then
+ if use prefix; then
+ relocate_ghc "${EPREFIX}"
+ fi
+
+ # Move unpacked files to the expected place
+ mv "${WORKDIR}/usr" "${S}"
+ else
+ if ! use ghcbootstrap; then
+ relocate_ghc "${WORKDIR}"
+ fi
+
+ sed -i -e "s|\"\$topdir\"|\"\$topdir\" ${GHC_CFLAGS}|" \
+ "${S}/ghc/ghc.wrapper"
+
+ # Since GHC 6.12.2 the GHC wrappers store which GCC version GHC was
+ # compiled with, by saving the path to it. The purpose is to make sure
+ # that GHC will use the very same gcc version when it compiles haskell
+ # sources, as the extra-gcc-opts files contains extra gcc options which
+ # match only this GCC version.
+ # However, this is not required in Gentoo, as only modern GCCs are used
+ # (>4).
+ # Instead, this causes trouble when for example ccache is used during
+ # compilation, but we don't want the wrappers to point to ccache.
+ # Due to the above, we simply remove GCC from the wrappers, which forces
+ # GHC to use GCC from the users path, like previous GHC versions did.
+
+ # Remove path to gcc
+ sed -i -e '/pgmgcc/d' \
+ "${S}/rules/shell-wrapper.mk"
+
+ # Remove usage of the path to gcc
+ sed -i -e 's/-pgmc "$pgmgcc"//' \
+ "${S}/ghc/ghc.wrapper"
+
+ cd "${S}" # otherwise epatch will break
+
+ epatch "${FILESDIR}/ghc-6.12.1-configure-CHOST.patch"
+ epatch "${FILESDIR}/ghc-6.12.2-configure-CHOST-part2.patch"
+ epatch "${FILESDIR}/ghc-6.12.3-configure-CHOST-freebsd.patch"
+
+ # -r and --relax are incompatible
+ epatch "${FILESDIR}/ghc-6.12.3-ia64-fixed-relax.patch"
+
+ # prevent from wiping upper address bits used in cache lookup
+ epatch "${FILESDIR}/ghc-6.12.3-ia64-storage-manager-fix.patch"
+
+ # fixes build failure of adjustor code
+ epatch "${FILESDIR}/ghc-6.12.3-alpha-use-libffi-for-foreign-import-wrapper.patch"
+
+ # native adjustor (NA) code is broken: interactive darcs-2.4 coredumps on NA
+ epatch "${FILESDIR}/ghc-6.12.3-ia64-use-libffi-for-foreign-import-wrapper.patch"
+
+ # same with NA on ppc
+ epatch "${FILESDIR}/ghc-6.12.3-ppc-use-libffi-for-foreign-import-wrapper.patch"
+
+ # substitute outdated macros
+ epatch "${FILESDIR}/ghc-6.12.3-autoconf-2.66-4252.patch"
+
+ # ticket 2615, linker scripts
+ epatch "${FILESDIR}/ghc-6.12.3-ticket-2615-linker-script.patch"
+
+ # export typechecker internals even if ghci is disabled
+ # http://hackage.haskell.org/trac/ghc/ticket/3558
+ epatch "${FILESDIR}/ghc-6.12.3-ghciless-haddock-3558.patch"
+
+ # This patch unbreaks ghci on GRSEC kernels hardened with
+ # TPE (Trusted Path Execution) protection.
+ epatch "${FILESDIR}/ghc-6.12.3-libffi-incorrect-detection-of-selinux.patch"
+
+ if use prefix; then
+ # Make configure find docbook-xsl-stylesheets from Prefix
+ sed -i -e '/^FP_DIR_DOCBOOK_XSL/s:\[.*\]:['"${EPREFIX}"'/usr/share/sgml/docbook/xsl-stylesheets/]:' configure.ac || die
+ fi
+
+ # as we have changed the build system
+ eautoreconf
+ fi
+}
+
+src_configure() {
+ if ! use binary; then
+
+ # initialize build.mk
+ echo '# Gentoo changes' > mk/build.mk
+
+ # Put docs into the right place, ie /usr/share/doc/ghc-${PV}
+ echo "docdir = ${EPREFIX}/usr/share/doc/${P}" >> mk/build.mk
+ echo "htmldir = ${EPREFIX}/usr/share/doc/${P}" >> mk/build.mk
+
+ # We also need to use the GHC_CFLAGS flags when building ghc itself
+ echo "SRC_HC_OPTS+=${GHC_CFLAGS}" >> mk/build.mk
+ echo "SRC_CC_OPTS+=${CFLAGS} -Wa,--noexecstack" >> mk/build.mk
+
+ # We can't depend on haddock except when bootstrapping when we
+ # must build docs and include them into the binary .tbz2 package
+ if use ghcbootstrap && use doc; then
+ echo XMLDocWays="html" >> mk/build.mk
+ echo HADDOCK_DOCS=YES >> mk/build.mk
+ else
+ echo XMLDocWays="" >> mk/build.mk
+ echo HADDOCK_DOCS=NO >> mk/build.mk
+ fi
+
+ sed -e "s|utils/haddock_dist_INSTALL_SHELL_WRAPPER = YES|utils/haddock_dist_INSTALL_SHELL_WRAPPER = NO|" \
+ -i utils/haddock/ghc.mk
+
+ # circumvent a very strange bug that seems related with ghc producing
+ # too much output while being filtered through tee (e.g. due to
+ # portage logging) reported as bug #111183
+ echo "SRC_HC_OPTS+=-w" >> mk/build.mk
+
+ # some arches do not support ELF parsing for ghci module loading
+ # PPC64: never worked (should be easy to implement)
+ # alpha: never worked
+ if use alpha || use ppc64; then
+ echo "GhcWithInterpreter=NO" >> mk/build.mk
+ fi
+
+ # we have to tell it to build unregisterised on some arches
+ # ppc64: EvilMangler currently does not understand some TOCs
+ # ia64: EvilMangler bitrot
+ if use alpha || use ia64 || use ppc64; then
+ echo "GhcUnregisterised=YES" >> mk/build.mk
+ echo "GhcWithNativeCodeGen=NO" >> mk/build.mk
+ echo "SplitObjs=NO" >> mk/build.mk
+ echo "GhcRTSWays := debug" >> mk/build.mk
+ echo "GhcNotThreaded=YES" >> mk/build.mk
+ fi
+
+ # Have "ld -r --relax" problem with split-objs on sparc:
+ if use sparc; then
+ echo "SplitObjs=NO" >> mk/build.mk
+ fi
+
+ # Get ghc from the unpacked binary .tbz2
+ # except when bootstrapping we just pick ghc up off the path
+ if ! use ghcbootstrap; then
+ export PATH="${WORKDIR}/usr/bin:${PATH}"
+ fi
+
+ econf || die "econf failed"
+ fi # ! use binary
+}
+
+src_compile() {
+ if ! use binary; then
+ # LC_ALL needs to workaround ghc's ParseCmm failure on some (es) locales
+ # bug #202212 / http://hackage.haskell.org/trac/ghc/ticket/4207
+ LC_ALL=C emake all || die "make failed"
+ fi # ! use binary
+}
+
+src_install() {
+ if use binary; then
+ mkdir -p "${ED}"
+ mv "${S}/usr" "${ED}"
+
+ # Remove the docs if not requested
+ if ! use doc; then
+ rm -rf "${ED}/usr/share/doc/${P}/*/" \
+ "${ED}/usr/share/doc/${P}/*.html" \
+ || die "could not remove docs (P vs PF revision mismatch?)"
+ fi
+ else
+ local insttarget="install"
+
+ # We only built docs if we were bootstrapping, otherwise
+ # we copy them out of the unpacked binary .tbz2
+ if use doc; then
+ if ! use ghcbootstrap; then
+ mkdir -p "${ED}/usr/share/doc"
+ mv "${WORKDIR}/usr/share/doc/${P}" "${ED}/usr/share/doc" \
+ || die "failed to copy docs"
+ fi
+ fi
+
+ emake -j1 ${insttarget} \
+ DESTDIR="${D}" \
+ || die "make ${insttarget} failed"
+
+ # ghci uses mmap with rwx protection at it implements dynamic
+ # linking on it's own (bug #299709)
+ # so mark resulting binary
+ pax-mark -m "${ED}/usr/$(get_libdir)/${P}/ghc"
+
+ dodoc "${S}/README" "${S}/ANNOUNCE" "${S}/LICENSE" "${S}/VERSION"
+
+ dobashcompletion "${FILESDIR}/ghc-bash-completion"
+
+ fi
+
+ # path to the package.cache
+ PKGCACHE="${ED}/usr/$(get_libdir)/${P}/package.conf.d/package.cache"
+
+ # copy the package.conf, including timestamp, save it so we later can put it
+ # back before uninstalling, or when upgrading.
+ cp -p "${PKGCACHE}"{,.shipped} \
+ || die "failed to copy package.conf.d/package.cache"
+}
+
+pkg_preinst() {
+ # have we got an earlier version of ghc installed?
+ if has_version "<${CATEGORY}/${PF}"; then
+ haskell_updater_warn="1"
+ fi
+}
+
+pkg_postinst() {
+ ghc-reregister
+
+ # path to the package.cache
+ PKGCACHE="${EROOT}/usr/$(get_libdir)/${P}/package.conf.d/package.cache"
+
+ # give the cache a new timestamp, it must be as recent as
+ # the package.conf.d directory.
+ touch "${PKGCACHE}"
+
+ if [[ "${haskell_updater_warn}" == "1" ]]; then
+ ewarn
+ ewarn "\e[1;31m************************************************************************\e[0m"
+ ewarn
+ ewarn "You have just upgraded from an older version of GHC."
+ ewarn "You may have to run"
+ ewarn " 'haskell-updater --upgrade'"
+ ewarn "to rebuild all ghc-based Haskell libraries."
+ ewarn
+ ewarn "\e[1;31m************************************************************************\e[0m"
+ ewarn
+ fi
+
+ bash-completion_pkg_postinst
+}
+
+pkg_prerm() {
+ # Be very careful here... Call order when upgrading is (according to PMS):
+ # * src_install for new package
+ # * pkg_preinst for new package
+ # * pkg_postinst for new package
+ # * pkg_prerm for the package being replaced
+ # * pkg_postrm for the package being replaced
+ # so you'll actually be touching the new packages files, not the one you
+ # uninstall, due to that or installation directory ${P} will be the same for
+ # both packages.
+
+ # Call order for reinstalling is (according to PMS):
+ # * src_install
+ # * pkg_preinst
+ # * pkg_prerm for the package being replaced
+ # * pkg_postrm for the package being replaced
+ # * pkg_postinst
+
+ # Overwrite the modified package.cache with a copy of the
+ # original one, so that it will be removed during uninstall.
+
+ PKGCACHE="${EROOT}/usr/$(get_libdir)/${P}/package.conf.d/package.cache"
+ rm -rf "${PKGCACHE}"
+
+ cp -p "${PKGCACHE}"{.shipped,}
+}