Copyright | Duncan Coutts 2007-2008 |
---|---|
Maintainer | cabal-devel@haskell.org |
Portability | portable |
Safe Haskell | None |
Language | Haskell2010 |
Cabal often needs to do slightly different things on specific platforms. You
probably know about the os
however using that is very
inconvenient because it is a string and different Haskell implementations
do not agree on using the same strings for the same platforms! (In
particular see the controversy over "windows" vs "mingw32"). So to make it
more consistent and easy to use we have an OS
enumeration.
Synopsis
- data OS
- buildOS :: OS
- data Arch
- buildArch :: Arch
- data Platform = Platform Arch OS
- buildPlatform :: Platform
- platformFromTriple :: String -> Maybe Platform
- knownOSs :: [OS]
- knownArches :: [Arch]
- data ClassificationStrictness
- = Permissive
- | Compat
- | Strict
- classifyOS :: ClassificationStrictness -> String -> OS
- classifyArch :: ClassificationStrictness -> String -> Arch
Operating System
These are the known OS names: Linux, Windows, OSX ,FreeBSD, OpenBSD, NetBSD, DragonFly ,Solaris, AIX, HPUX, IRIX ,HaLVM ,Hurd ,IOS, Android,Ghcjs
The following aliases can also be used:, * Windows aliases: mingw32, win32, cygwin32 * OSX alias: darwin * Hurd alias: gnu * FreeBSD alias: kfreebsdgnu * Solaris alias: solaris2
Linux | |
Windows | |
OSX | |
FreeBSD | |
OpenBSD | |
NetBSD | |
DragonFly | |
Solaris | |
AIX | |
HPUX | |
IRIX | |
HaLVM | |
Hurd | |
IOS | |
Android | |
Ghcjs | |
OtherOS String |
Instances
Eq OS # | |
Data OS # | |
Defined in Distribution.System gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> OS -> c OS # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c OS # dataTypeOf :: OS -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c OS) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c OS) # gmapT :: (forall b. Data b => b -> b) -> OS -> OS # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> OS -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> OS -> r # gmapQ :: (forall d. Data d => d -> u) -> OS -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> OS -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> OS -> m OS # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> OS -> m OS # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> OS -> m OS # | |
Ord OS # | |
Read OS # | |
Show OS # | |
Generic OS # | |
Binary OS # | |
NFData OS # | |
Defined in Distribution.System | |
Pretty OS # | |
Defined in Distribution.System | |
Parsec OS # | |
Defined in Distribution.System parsec :: CabalParsing m => m OS # | |
Text OS # | |
type Rep OS # | |
Defined in Distribution.System type Rep OS = D1 (MetaData "OS" "Distribution.System" "Cabal-2.4.1.0-ALhzvdqe44A7vLWPOxSupv" False) ((((C1 (MetaCons "Linux" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "Windows" PrefixI False) (U1 :: * -> *)) :+: (C1 (MetaCons "OSX" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "FreeBSD" PrefixI False) (U1 :: * -> *))) :+: ((C1 (MetaCons "OpenBSD" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "NetBSD" PrefixI False) (U1 :: * -> *)) :+: (C1 (MetaCons "DragonFly" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "Solaris" PrefixI False) (U1 :: * -> *)))) :+: (((C1 (MetaCons "AIX" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "HPUX" PrefixI False) (U1 :: * -> *)) :+: (C1 (MetaCons "IRIX" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "HaLVM" PrefixI False) (U1 :: * -> *))) :+: ((C1 (MetaCons "Hurd" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "IOS" PrefixI False) (U1 :: * -> *)) :+: (C1 (MetaCons "Android" PrefixI False) (U1 :: * -> *) :+: (C1 (MetaCons "Ghcjs" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "OtherOS" PrefixI False) (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 String))))))) |
Machine Architecture
These are the known Arches: I386, X86_64, PPC, PPC64, Sparc, Arm, AArch64, Mips, SH, IA64, S39, Alpha, Hppa, Rs6000, M68k, Vax, and JavaScript.
The following aliases can also be used: * PPC alias: powerpc * PPC64 alias : powerpc64, powerpc64le * Sparc aliases: sparc64, sun4 * Mips aliases: mipsel, mipseb * Arm aliases: armeb, armel * AArch64 aliases: arm64
I386 | |
X86_64 | |
PPC | |
PPC64 | |
Sparc | |
Arm | |
AArch64 | |
Mips | |
SH | |
IA64 | |
S390 | |
Alpha | |
Hppa | |
Rs6000 | |
M68k | |
Vax | |
JavaScript | |
OtherArch String |
Instances
Eq Arch # | |
Data Arch # | |
Defined in Distribution.System gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Arch -> c Arch # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Arch # dataTypeOf :: Arch -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Arch) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Arch) # gmapT :: (forall b. Data b => b -> b) -> Arch -> Arch # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Arch -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Arch -> r # gmapQ :: (forall d. Data d => d -> u) -> Arch -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Arch -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Arch -> m Arch # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Arch -> m Arch # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Arch -> m Arch # | |
Ord Arch # | |
Read Arch # | |
Show Arch # | |
Generic Arch # | |
Binary Arch # | |
NFData Arch # | |
Defined in Distribution.System | |
Pretty Arch # | |
Defined in Distribution.System | |
Parsec Arch # | |
Defined in Distribution.System parsec :: CabalParsing m => m Arch # | |
Text Arch # | |
type Rep Arch # | |
Defined in Distribution.System type Rep Arch = D1 (MetaData "Arch" "Distribution.System" "Cabal-2.4.1.0-ALhzvdqe44A7vLWPOxSupv" False) ((((C1 (MetaCons "I386" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "X86_64" PrefixI False) (U1 :: * -> *)) :+: (C1 (MetaCons "PPC" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "PPC64" PrefixI False) (U1 :: * -> *))) :+: ((C1 (MetaCons "Sparc" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "Arm" PrefixI False) (U1 :: * -> *)) :+: (C1 (MetaCons "AArch64" PrefixI False) (U1 :: * -> *) :+: (C1 (MetaCons "Mips" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "SH" PrefixI False) (U1 :: * -> *))))) :+: (((C1 (MetaCons "IA64" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "S390" PrefixI False) (U1 :: * -> *)) :+: (C1 (MetaCons "Alpha" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "Hppa" PrefixI False) (U1 :: * -> *))) :+: ((C1 (MetaCons "Rs6000" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "M68k" PrefixI False) (U1 :: * -> *)) :+: (C1 (MetaCons "Vax" PrefixI False) (U1 :: * -> *) :+: (C1 (MetaCons "JavaScript" PrefixI False) (U1 :: * -> *) :+: C1 (MetaCons "OtherArch" PrefixI False) (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 String))))))) |
Platform is a pair of arch and OS
Instances
Eq Platform # | |
Data Platform # | |
Defined in Distribution.System gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Platform -> c Platform # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Platform # toConstr :: Platform -> Constr # dataTypeOf :: Platform -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Platform) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Platform) # gmapT :: (forall b. Data b => b -> b) -> Platform -> Platform # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Platform -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Platform -> r # gmapQ :: (forall d. Data d => d -> u) -> Platform -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Platform -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Platform -> m Platform # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Platform -> m Platform # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Platform -> m Platform # | |
Ord Platform # | |
Defined in Distribution.System | |
Read Platform # | |
Show Platform # | |
Generic Platform # | |
Binary Platform # | |
NFData Platform # | |
Defined in Distribution.System | |
Pretty Platform # | |
Defined in Distribution.System | |
Parsec Platform # | |
Defined in Distribution.System parsec :: CabalParsing m => m Platform # | |
Text Platform # | |
type Rep Platform # | |
Defined in Distribution.System type Rep Platform = D1 (MetaData "Platform" "Distribution.System" "Cabal-2.4.1.0-ALhzvdqe44A7vLWPOxSupv" False) (C1 (MetaCons "Platform" PrefixI False) (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Arch) :*: S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 OS))) |
The platform Cabal was compiled on. In most cases,
LocalBuildInfo.hostPlatform
should be used instead (the platform we're
targeting).
platformFromTriple :: String -> Maybe Platform #
Internal
knownArches :: [Arch] #
Classification
data ClassificationStrictness #
How strict to be when classifying strings into the OS
and Arch
enums.
The reason we have multiple ways to do the classification is because there are two situations where we need to do it.
For parsing OS and arch names in .cabal files we really want everyone to be referring to the same or or arch by the same name. Variety is not a virtue in this case. We don't mind about case though.
For the System.Info.os/arch different Haskell implementations use different names for the same or/arch. Also they tend to distinguish versions of an OS/arch which we just don't care about.
The Compat
classification allows us to recognise aliases that are already
in common use but it allows us to distinguish them from the canonical name
which enables us to warn about such deprecated aliases.
classifyOS :: ClassificationStrictness -> String -> OS #
classifyArch :: ClassificationStrictness -> String -> Arch #