diff options
| author | Tamar Christina <tamar@zhox.com> | 2018-03-29 14:22:09 +0100 |
|---|---|---|
| committer | Tamar Christina <tamar@zhox.com> | 2018-03-31 10:11:53 +0100 |
| commit | 4de585a5c1ac3edc2914cebcac1753b514051a89 (patch) | |
| tree | 09bfb4251808007bb4ad79c6f10f3e4fbe3e9312 /rts/Linker.c | |
| parent | afb686a88901d7d0c93627806d7e4d0444aa17e8 (diff) | |
| download | haskell-4de585a5c1ac3edc2914cebcac1753b514051a89.tar.gz | |
Remove MAX_PATH restrictions from RTS, I/O manager and various utilities
Summary:
This shims out fopen and sopen so that they use modern APIs under the hood
along with namespaced paths.
This lifts the MAX_PATH restrictions from Haskell programs and makes the new
limit ~32k.
There are only some slight caveats that have been documented.
Some utilities have not been upgraded such as lndir, since all these things are
different cabal packages I have been forced to copy the source in different places
which is less than ideal. But it's the only way to keep sdist working.
Test Plan: ./validate
Reviewers: hvr, bgamari, erikd, simonmar
Reviewed By: bgamari
Subscribers: rwbarton, thomie, carter
GHC Trac Issues: #10822
Differential Revision: https://phabricator.haskell.org/D4416
Diffstat (limited to 'rts/Linker.c')
| -rw-r--r-- | rts/Linker.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index 8f55c296a6..aa6ec7fe7a 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -48,6 +48,7 @@ #include <string.h> #include <stdio.h> #include <assert.h> +#include <fs_rts.h> #if defined(HAVE_SYS_STAT_H) #include <sys/stat.h> @@ -711,7 +712,7 @@ addDLL( pathchar *dll_name ) 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) { + if ((fp = __rts_fopen(line, "r")) == NULL) { return errmsg; // return original error if open fails } // try to find a GROUP or INPUT ( ... ) command |