on c766873 help sign in
stackage/Stackage/Config.hs
475 lines 18 kB history raw
1{-# LANGUAGE CPP #-}
2module Stackage.Config where
4import Control.Monad (when)
5import Control.Monad.Trans.Writer (execWriter, tell)
6import Data.Char (toLower)
7import qualified Data.Map as Map
8import Data.Maybe (fromMaybe)
9import Data.Set (fromList, singleton)
10import Distribution.Text (simpleParse)
11import Stackage.Types
13-- | Packages which are shipped with GHC but are not included in the
14-- Haskell Platform list of core packages.
15defaultExtraCore :: GhcMajorVersion -> Set PackageName
16defaultExtraCore _ = fromList $ map PackageName $ words
17 "binary Win32 ghc-prim integer-gmp"
19-- | Test suites which are expected to fail for some reason. The test suite
20-- will still be run and logs kept, but a failure will not indicate an
21-- error in our package combination.
22defaultExpectedFailures :: GhcMajorVersion
23 -> Set PackageName
24defaultExpectedFailures ghcVer = execWriter $ do
25 -- Requires an old version of WAI and Warp for tests
26 add "HTTP"
28 -- text and setenv have recursive dependencies in their tests, which
29 -- cabal can't (yet) handle
30 add "text"
31 add "setenv"
33 -- The version of GLUT included with the HP does not generate
34 -- documentation correctly.
35 add "GLUT"
37 -- https://github.com/bos/statistics/issues/42
38 add "statistics"
40 -- https://github.com/kazu-yamamoto/simple-sendfile/pull/10
41 add "simple-sendfile"
43 -- http://hackage.haskell.org/trac/hackage/ticket/954
44 add "diagrams"
46 -- https://github.com/fpco/stackage/issues/24
47 add "unix-time"
49 -- With transformers 0.3, it doesn't provide any modules
50 add "transformers-compat"
52 -- Tests require shell script and are incompatible with sandboxed package
53 -- databases
54 add "HTF"
56 -- https://github.com/simonmar/monad-par/issues/28
57 add "monad-par"
59 -- Unfortunately network failures seem to happen haphazardly
60 add "network"
62 -- https://github.com/ekmett/hyphenation/issues/1
63 add "hyphenation"
65 -- Test suite takes too long to run on some systems
66 add "punycode"
68 -- http://hub.darcs.net/stepcut/happstack/issue/1
69 add "happstack-server"
71 -- Requires a Facebook app.
72 add "fb"
74 -- https://github.com/tibbe/hashable/issues/64
75 add "hashable"
77 -- https://github.com/vincenthz/language-java/issues/10
78 add "language-java"
80 add "threads"
81 add "crypto-conduit"
82 add "pandoc"
83 add "language-ecmascript"
84 add "hspec"
85 add "alex"
87 -- https://github.com/basvandijk/concurrent-extra/issues/
88 add "concurrent-extra"
90 -- https://github.com/skogsbaer/xmlgen/issues/2
91 add "xmlgen"
93 -- Something very strange going on with the test suite, I can't figure
94 -- out how to fix it
95 add "bson"
97 -- Requires a locally running PostgreSQL server with appropriate users
98 add "postgresql-simple"
100 -- Missing files
101 add "websockets"
103 -- Some kind of Cabal bug when trying to run tests
104 add "thyme"
106 when (ghcVer < GhcMajorVersion 7 6) $ do
107 -- https://github.com/haskell-suite/haskell-names/issues/39
108 add "haskell-names"
110 add "shake"
112 -- https://github.com/jgm/pandoc-citeproc/issues/5
113 add "pandoc-citeproc"
115 -- Problems with doctest and sandboxing
116 add "warp"
117 add "wai-logger"
119 -- https://github.com/fpco/stackage/issues/163
120 add "hTalos"
121 add "seqloc"
123 -- FIXME the test suite fails fairly regularly in builds, though I haven't
124 -- discovered why yet
125 add "crypto-numbers"
127 -- Test suite is currently failing regularly, needs to be worked out still.
128 add "lens"
130 -- Requires too old a version of test-framework
131 add "time"
133 -- No code included any more, therefore Haddock fails
134 mapM_ add $ words =<<
135 [ "comonad-transformers comonads-fd groupoids"
136 , "profunctor-extras semigroupoid-extras"
137 , "hamlet shakespeare-css shakespeare-i18n"
138 , "shakespeare-js shakespeare-text"
139 , "attoparsec-conduit blaze-builder-conduit http-client-conduit"
140 , "network-conduit zlib-conduit http-client-multipart"
141 , "wai-eventsource wai-test"
142 ]
144 -- Cloud Haskell tests seem to be unreliable
145 mapM_ add $ words =<<
146 [ "distributed-process lockfree-queue network-transport-tcp"
147 ]
149 -- Pulls in monad-peel which does not compile
150 when (ghcVer >= GhcMajorVersion 7 8) $ add "monad-control"
152 -- issues with pthread
153 mapM_ add $ words "hlibgit2 gitlib-s3 gitlib-libgit2"
155 -- https://github.com/fpco/stackage/issues/226
156 add "options"
158 -- Requires too high a bytestring
159 when (ghcVer <= GhcMajorVersion 7 4) $ add "scientific"
161 -- https://github.com/gtk2hs/gtk2hs/issues/36
162 add "glib"
163 add "pango"
165 where
166 add = tell . singleton . PackageName
168-- | List of packages for our stable Hackage. All dependencies will be
169-- included as well. Please indicate who will be maintaining the package
170-- via comments.
171defaultStablePackages :: GhcMajorVersion
172 -> Bool -- ^ using haskell platform?
173 -> Map PackageName (VersionRange, Maintainer)
174defaultStablePackages ghcVer requireHP = unPackageMap $ execWriter $ do
175 mapM_ (add "michael@snoyman.com") $ words =<<
176 [ "yesod yesod-newsfeed yesod-sitemap yesod-static yesod-test yesod-bin"
177 , "markdown mime-mail-ses"
178 , "persistent persistent-template persistent-sqlite"
179 , "network-conduit-tls yackage warp-tls keter"
180 , "process-conduit stm-conduit"
181 , "classy-prelude-yesod yesod-fay yesod-eventsource wai-websockets"
182 , "random-shuffle hebrew-time"
183 , "bzlib-conduit case-insensitive"
184 , "conduit-extra conduit-combinators yesod-websockets"
185 ]
186 when (ghcVer >= GhcMajorVersion 7 6) $ add "michael@snoyman.com" "cabal-src"
187#if !defined(mingw32_HOST_OS) && !defined(__MINGW32__)
188 -- Does not compile on Windows
189 mapM_ (add "michael@snoyman.com") $ words "judy"
190#endif
192 mapM_ (add "FP Complete <michael@fpcomplete.com>") $ words =<<
193 [ "web-fpco th-expand-syns configurator smtLib"
194 , "fixed-list indents language-c pretty-class"
195 , "aws csv-conduit cassava"
196 , "async shelly thyme"
197 , "hxt hxt-relaxng dimensional"
198 , "cairo diagrams-cairo"
199 , "persistent-mongoDB fpco-api"
200 , "base16-bytestring convertible"
201 , "compdata"
202 ]
203 when (ghcVer < GhcMajorVersion 7 8) $ do -- No GHC 7.8 support
204 mapM_ (add "FP Complete <michael@fpcomplete.com>") $ words =<<
205 [ "" -- too unreliable for the moment "distributed-process distributed-process-simplelocalnet"
206 , "threepenny-gui unification-fd"
207 ]
208 addRange "FP Complete <michael@fpcomplete.com>" "compdata" "< 0.8"
210 -- Deprecated version
211 addRange "FP Complete <michael@fpcomplete.com>" "persistent-mongoDB" "< 1.3.1 || > 1.3.1"
212 when (ghcVer < GhcMajorVersion 7 6) $ do
213 when requireHP $ do
214 addRange "FP Complete <michael@fpcomplete.com>" "hxt" "<= 9.3.0.1"
215 addRange "FP Complete <michael@fpcomplete.com>" "shelly" "<= 1.0"
216 addRange "FP Complete <michael@fpcomplete.com>" "lockfree-queue" "== 0.2"
217 -- when (ghcVer == GhcMajorVersion 7 6) $ do -- No GHC 7.8 support
218 -- add "FP Complete <michael@fpcomplete.com>" "repa-devil"
219 addRange "FP Complete <michael@fpcomplete.com>" "kure" "<= 2.4.10"
221 mapM_ (add "Neil Mitchell") $ words
222 "hlint hoogle shake derive"
224 mapM_ (add "Alan Zimmerman") $ words
225 "hjsmin language-javascript"
226 -- Requires newer alex than provided with HP
227 when (ghcVer == GhcMajorVersion 7 4 && requireHP) $
228 addRange "Alan Zimmerman" "language-javascript" "== 0.5.9"
230 mapM_ (add "Jasper Van der Jeugt") $ words
231 "blaze-html blaze-markup stylish-haskell"
233 mapM_ (add "Antoine Latter") $ words
234 "uuid byteorder"
236 mapM_ (add "Stefan Wehr <wehr@factisresearch.com>") $ words
237 "HTF xmlgen stm-stats"
238 when (ghcVer < GhcMajorVersion 7 8) $ add "Stefan Wehr <wehr@factisresearch.com>" "hscurses"
240 mapM_ (add "Bart Massey <bart.massey+stackage@gmail.com>") $ words
241 "parseargs"
243 mapM_ (add "Vincent Hanquez") $ words =<<
244 [ "bytedump certificate cipher-aes cipher-rc4 connection"
245 , "cprng-aes cpu crypto-pubkey-types crypto-random-api cryptocipher"
246 , "cryptohash hit language-java libgit pem siphash socks tls"
247 , "tls-debug vhd language-java"
248 ]
250 mapM_ (add "Chris Done") $ words
251 "statistics-linreg"
253#if !defined(mingw32_HOST_OS) && !defined(__MINGW32__)
254 -- Does not compile on Windows
255 mapM_ (add "Vincent Hanquez") $ words "udbus xenstore"
256#endif
258 when (ghcVer < GhcMajorVersion 7 8) $
259 mapM_ (add "Alberto G. Corona <agocorona@gmail.com>") $ words
260 "RefSerialize TCache Workflow MFlow"
262 mapM_ (add "Edward Kmett <ekmett@gmail.com>") $ words =<<
263 [ "ad adjunctions bifunctors bound charset comonad comonad-transformers"
264 , "comonads-fd compressed concurrent-supply constraints contravariant"
265 , "distributive either eq free groupoids heaps hyphenation"
266 , "integration intervals kan-extensions lca lens linear monadic-arrays machines"
267 , "mtl profunctors profunctor-extras reducers reflection"
268 , "semigroups semigroupoids semigroupoid-extras speculation tagged void"
269 , "graphs monad-products monad-st wl-pprint-extras wl-pprint-terminfo"
270 , "numeric-extras parsers pointed prelude-extras reducers"
271 , "streams vector-instances"
272 ]
273 when (ghcVer < GhcMajorVersion 7 8) $
274 mapM_ (add "Edward Kmett <ekmett@gmail.com>") $ words =<<
275 [ "categories comonad-extras recursion-schemes syb-extras"
276 ]
278 when (ghcVer >= GhcMajorVersion 7 6) $
279 mapM_ (add "Andrew Farmer <afarmer@ittc.ku.edu>") $ words
280 "scotty wai-middleware-static"
282 mapM_ (add "Simon Hengel <sol@typeful.net>") $ words
283 "hspec doctest base-compat"
285 mapM_ (add "Mario Blazevic <blamario@yahoo.com>") $ words
286 "monad-parallel monad-coroutine"
287 -- https://github.com/blamario/monoid-subclasses/issues/3
288 when (ghcVer >= GhcMajorVersion 7 6) $ do
289 mapM_ (add "Mario Blazevic <blamario@yahoo.com>") $ words
290 "incremental-parser monoid-subclasses"
292 mapM_ (add "Brent Yorgey <byorgey@gmail.com>") $ words =<<
293 [ "monoid-extras dual-tree vector-space-points active force-layout"
294 , "diagrams diagrams-contrib diagrams-core diagrams-lib diagrams-svg"
295 , "diagrams-postscript diagrams-builder diagrams-haddock haxr"
296 , "BlogLiterately BlogLiterately-diagrams"
297 , "MonadRandom"
298 ]
299 mapM_ (add "Vincent Berthoux <vincent.berthoux@gmail.com>") $ words
300 "JuicyPixels"
302 mapM_ (add "Patrick Brisbin") $ words "gravatar"
304 mapM_ (add "Felipe Lessa <felipe.lessa@gmail.com>") $ words
305 "esqueleto fb fb-persistent yesod-fb yesod-auth-fb"
307 mapM_ (add "Alexander Altman <alexanderaltman@me.com>") $ words
308 "base-unicode-symbols containers-unicode-symbols"
310 -- NOTE: accelerate not yet supported on GHC 7.8
311 when (ghcVer == GhcMajorVersion 7 6) $ do
312 mapM_ (add "Ryan Newton <ryan.newton@alum.mit.edu>") $ words
313 "accelerate"
314 when (ghcVer < GhcMajorVersion 7 6) $ do
315 addRange "Ryan Newton <ryan.newton@alum.mit.edu>" "accelerate" "< 0.14"
316 addRange "Ryan Newton <ryan.newton@alum.mit.edu>" "fclabels" "< 2.0"
318 mapM_ (add "Dan Burton <danburton.email@gmail.com>") $ words =<<
319 [ "basic-prelude composition io-memoize numbers rev-state runmemo"
320 , "tardis lens-family-th"
321 ]
323 mapM_ (add "Daniel Díaz <dhelta.diaz@gmail.com>") $ words
324 "HaTeX matrix"
326 mapM_ (add "Gabriel Gonzalez <Gabriel439@gmail.com>")
327 ["pipes", "pipes-parse", "pipes-concurrency"]
329 mapM_ (add "Adam Bergmark <adam@bergmark.nl>") $ words
330 "fay fay-base fay-dom fay-jquery fay-text fay-uri snaplet-fay"
332 mapM_ (add "Boris Lykah <lykahb@gmail.com>") $ words
333 "groundhog groundhog-th groundhog-sqlite groundhog-postgresql groundhog-mysql"
335 mapM_ (add "Janne Hellsten <jjhellst@gmail.com>") $ words
336 "sqlite-simple"
338 mapM_ (add "Michal J. Gajda") $ words
339 "iterable Octree FenwickTree hPDB"
340 when (ghcVer == GhcMajorVersion 7 6) $ do -- No GHC 7.8 support
341 mapM_ (add "Michal J. Gajda") $ words
342 "hPDB-examples"
344 mapM_ (add "Roman Cheplyaka <roma@ro-che.info>") $ words =<<
345 [ "smallcheck tasty tasty-smallcheck tasty-quickcheck tasty-hunit tasty-golden"
346 , "traverse-with-class regex-applicative time-lens"
347 , "haskell-names haskell-packages hse-cpp"
348 ]
350 mapM_ (add "George Giorgidze <giorgidze@gmail.com>") $ words
351 "HCodecs YampaSynth"
353 when (ghcVer >= GhcMajorVersion 7 6) $ do -- No GHC 7.4 support
354 mapM_ (add "Phil Hargett <phil@haphazardhouse.net>") $ words
355 "courier"
357#if !defined(mingw32_HOST_OS) && !defined(__MINGW32__)
358 mapM_ (add "Aycan iRiCAN <iricanaycan@gmail.com>") $ words
359 "hdaemonize hsyslog hweblib"
360#else
361 mapM_ (add "Aycan iRiCAN <iricanaycan@gmail.com>") $ words
362 "hweblib"
363#endif
365 when (ghcVer < GhcMajorVersion 7 8) $
366 mapM_ (add "John Wiegley") $ words =<<
367 -- Removed these: bad semigroups upper bound
368 [ "bindings-DSL github monad-extras numbers hlibgit2"
369 , "gitlib gitlib-cmdline gitlib-test"
370 , "gitlib-libgit2 gitlib-s3"
371 ]
373 mapM_ (add "Ben Ford <ben@dlstartup.com") $ words
374 "HandsomeSoup"
376 -- https://github.com/fpco/stackage/issues/160
377 when (ghcVer >= GhcMajorVersion 7 6) $ do
378 mapM_ (add "Ketil Malde") $ words =<<
379 [ "biocore biofasta biofastq biosff"
380 , "blastxml bioace biophd"
381 , "biopsl" -- https://github.com/ingolia/SamTools/issues/3 samtools
382 , "seqloc bioalign BlastHTTP"
383 -- The following have out-of-date dependencies currently
384 -- biostockholm memexml RNAwolf
385 -- , "Biobase BiobaseDotP BiobaseFR3D BiobaseInfernal BiobaseMAF"
386 -- , "BiobaseTrainingData BiobaseTurner BiobaseXNA BiobaseVienna"
387 -- , "BiobaseTypes BiobaseFasta"
388 -- MC-Fold-DP
389 ]
390 -- https://github.com/fpco/stackage/issues/163
391 addRange "Michael Snoyman" "biophd" "< 0.0.6 || > 0.0.6"
392 when (ghcVer == GhcMajorVersion 7 6) $ do
393 mapM_ (add "Ketil Malde") $ words =<<
394 -- RNAFold
395 [ "hTalos parsestar"
396 ]
398 -- Newest hxt requires network 2.4 or newest
399 when (ghcVer == GhcMajorVersion 7 4 && requireHP) $ do
400 addRange "Michael Snoyman" "hxt" "< 9.3.1"
401 addRange "Michael Snoyman" "network" "< 2.4"
403 -- https://github.com/fpco/stackage/issues/189
404 addRange "Michael Snoyman" "statistics" "< 0.11"
406 -- https://github.com/fpco/stackage/issues/197
407 when (ghcVer == GhcMajorVersion 7 6 && requireHP) $
408 addRange "Michael Snoyman" "parsers" "< 0.11"
410 -- https://github.com/fpco/stackage/issues/216
411 -- QuickCheck constraint
412 -- when (ghcVer == GhcMajorVersion 7 6) $
413 -- addRange "Michael Snoyman" "repa" "< 3.2.5.1"
415 -- https://github.com/fpco/stackage/issues/217
416 addRange "Michael Snoyman" "transformers" "< 0.4"
417 addRange "Michael Snoyman" "mtl" "< 2.2"
418 addRange "Michael Snoyman" "lifted-base" "< 0.2.2.2"
420 -- https://github.com/fpco/stackage/issues/224
421 when (ghcVer <= GhcMajorVersion 7 6) $ do
422 addRange "Michael Snoyman" "zip-archive" "== 0.2.2.1"
424 -- https://github.com/fpco/stackage/issues/231
425 addRange "Michael Snoyman" "optparse-applicative" "< 0.9"
427 -- https://github.com/fpco/stackage/issues/236
428 addRange "Michael Snoyman" "attoparsec" "< 0.12"
430 -- https://github.com/fpco/stackage/issues/237
431 addRange "Michael Snoyman" "lens" "< 4.2"
433 -- https://github.com/fpco/stackage/issues/242
434 addRange "Michael Snoyman" "mongoDB" "< 1.5"
436 -- Requires too new a version of text
437 when (ghcVer == GhcMajorVersion 7 4 && requireHP) $ do
438 addRange "Michael Snoyman" "attoparsec" "< 0.11.2.1"
439 addRange "Michael Snoyman" "parsers" "< 0.11"
441 -- local patch
442 addRange "Michael Snoyman" "bson" "== 0.2.4"
444 -- Depends on a newer version of happy
445 when (ghcVer < GhcMajorVersion 7 8) $
446 addRange "Roman Cheplyaka <roma@ro-che.info>" "pretty-show" "<= 1.6.1"
448 -- 0.16.2 fixes dependency issues with different version of GHC
449 -- and Haskell Platform. Now builds on GHC 7.4-7.8. Version 1.0 is
450 -- guaranteed to break the API. See
451 -- https://travis-ci.org/jswebtools/language-ecmascript for
452 -- current build status.
453 addRange "Andrey Chudnov <oss@chudnov.com>" "language-ecmascript" ">= 0.16.2 && < 1.0"
454 where
455 add maintainer package = addRange maintainer package "-any"
456 addRange maintainer package range =
457 case simpleParse range of
458 Nothing -> error $ "Invalid range " ++ show range ++ " for " ++ package
459 Just range' -> tell $ PackageMap $ Map.singleton (PackageName package) (range', Maintainer maintainer)
461-- | Replacement Github users. This is useful when a project is owned by an
462-- organization, and you'd like to ping either an individual or a team in that
463-- organization. See:
464--
465-- https://github.com/fpco/stackage/issues/226#issuecomment-45644142
466convertGithubUser :: String -> String
467convertGithubUser x =
468 fromMaybe x $ Map.lookup (map toLower x) pairs
469 where
470 pairs = Map.fromList
471 [ ("diagrams", "byorgey")
472 , ("yesodweb", "snoyberg")
473 , ("fpco", "snoyberg")
474 , ("faylang", "bergmark")
475 ]