Copyright | (c) The University of Glasgow 2009 Duncan Coutts 2014 |
---|---|
Maintainer | ghc-devs@haskell.org |
Portability | portable |
Safe Haskell | None |
Language | Haskell2010 |
This module provides the view of GHC's database of registered packages that is shared between GHC the compiler/library, and the ghc-pkg program. It defines the database format that is shared between GHC and ghc-pkg.
The database format, and this library are constructed so that GHC does not have to depend on the Cabal library. The ghc-pkg program acts as the gateway between the external package format (which is defined by Cabal) and the internal package format which is specialised just for GHC.
GHC the compiler only needs some of the information which is kept about registerd packages, such as module names, various paths etc. On the other hand ghc-pkg has to keep all the information from Cabal packages and be able to regurgitate it for users and other tools.
The first trick is that we duplicate some of the information in the package
database. We essentially keep two versions of the datbase in one file, one
version used only by ghc-pkg which keeps the full information (using the
serialised form of the InstalledPackageInfo
type defined by the Cabal
library); and a second version written by ghc-pkg and read by GHC which has
just the subset of information that GHC needs.
The second trick is that this module only defines in detail the format of the second version -- the bit GHC uses -- and the part managed by ghc-pkg is kept in the file but here we treat it as an opaque blob of data. That way this library avoids depending on Cabal.
Synopsis
- data InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod = InstalledPackageInfo {
- unitId :: instunitid
- componentId :: compid
- instantiatedWith :: [(modulename, mod)]
- sourcePackageId :: srcpkgid
- packageName :: srcpkgname
- packageVersion :: Version
- sourceLibName :: Maybe srcpkgname
- abiHash :: String
- depends :: [instunitid]
- abiDepends :: [(instunitid, String)]
- importDirs :: [FilePath]
- hsLibraries :: [String]
- extraLibraries :: [String]
- extraGHCiLibraries :: [String]
- libraryDirs :: [FilePath]
- libraryDynDirs :: [FilePath]
- frameworks :: [String]
- frameworkDirs :: [FilePath]
- ldOptions :: [String]
- ccOptions :: [String]
- includes :: [String]
- includeDirs :: [FilePath]
- haddockInterfaces :: [FilePath]
- haddockHTMLs :: [FilePath]
- exposedModules :: [(modulename, Maybe mod)]
- hiddenModules :: [modulename]
- indefinite :: Bool
- exposed :: Bool
- trusted :: Bool
- data DbModule instunitid compid unitid modulename mod
- = DbModule {
- dbModuleUnitId :: unitid
- dbModuleName :: modulename
- | DbModuleVar {
- dbModuleVarName :: modulename
- = DbModule {
- data DbUnitId instunitid compid unitid modulename mod
- = DbUnitId compid [(modulename, mod)]
- | DbInstalledUnitId instunitid
- class BinaryStringRep a where
- fromStringRep :: ByteString -> a
- toStringRep :: a -> ByteString
- class DbUnitIdModuleRep instunitid compid unitid modulename mod | mod -> unitid, unitid -> mod, mod -> modulename, unitid -> compid, unitid -> instunitid where
- fromDbModule :: DbModule instunitid compid unitid modulename mod -> mod
- toDbModule :: mod -> DbModule instunitid compid unitid modulename mod
- fromDbUnitId :: DbUnitId instunitid compid unitid modulename mod -> unitid
- toDbUnitId :: unitid -> DbUnitId instunitid compid unitid modulename mod
- emptyInstalledPackageInfo :: RepInstalledPackageInfo a b c d e f g => InstalledPackageInfo a b c d e f g
- data PackageDbLock
- lockPackageDb :: FilePath -> IO PackageDbLock
- unlockPackageDb :: PackageDbLock -> IO ()
- data DbMode
- data DbOpenMode (mode :: DbMode) t where
- DbOpenReadOnly :: DbOpenMode 'DbReadOnly t
- DbOpenReadWrite :: t -> DbOpenMode 'DbReadWrite t
- isDbOpenReadMode :: DbOpenMode mode t -> Bool
- readPackageDbForGhc :: RepInstalledPackageInfo a b c d e f g => FilePath -> IO [InstalledPackageInfo a b c d e f g]
- readPackageDbForGhcPkg :: Binary pkgs => FilePath -> DbOpenMode mode t -> IO (pkgs, DbOpenMode mode PackageDbLock)
- writePackageDb :: (Binary pkgs, RepInstalledPackageInfo a b c d e f g) => FilePath -> [InstalledPackageInfo a b c d e f g] -> pkgs -> IO ()
Documentation
data InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod Source #
This is a subset of Cabal's InstalledPackageInfo
, with just the bits
that GHC is interested in. See Cabal's documentation for a more detailed
description of all of the fields.
InstalledPackageInfo | |
|
Instances
(Eq instunitid, Eq compid, Eq modulename, Eq mod, Eq srcpkgid, Eq srcpkgname) => Eq (InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod) Source # | |
Defined in GHC.PackageDb (==) :: InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod -> InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod -> Bool # (/=) :: InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod -> InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod -> Bool # | |
(Show instunitid, Show compid, Show modulename, Show mod, Show srcpkgid, Show srcpkgname) => Show (InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod) Source # | |
Defined in GHC.PackageDb showsPrec :: Int -> InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod -> ShowS Source # show :: InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod -> String Source # showList :: [InstalledPackageInfo compid srcpkgid srcpkgname instunitid unitid modulename mod] -> ShowS Source # | |
RepInstalledPackageInfo a b c d e f g => Binary (InstalledPackageInfo a b c d e f g) Source # | |
Defined in GHC.PackageDb put :: InstalledPackageInfo a b c d e f g -> Put Source # get :: Get (InstalledPackageInfo a b c d e f g) Source # putList :: [InstalledPackageInfo a b c d e f g] -> Put Source # |
data DbModule instunitid compid unitid modulename mod Source #
ghc-boot
's copy of Module
, i.e. what is serialized to the database.
Use DbUnitIdModuleRep
to convert it into an actual Module
.
It has phantom type parameters as this is the most convenient way
to avoid undecidable instances.
DbModule | |
| |
DbModuleVar | |
|
Instances
(Eq unitid, Eq modulename) => Eq (DbModule instunitid compid unitid modulename mod) Source # | |
(Show unitid, Show modulename) => Show (DbModule instunitid compid unitid modulename mod) Source # | |
(BinaryStringRep modulename, BinaryStringRep compid, BinaryStringRep instunitid, DbUnitIdModuleRep instunitid compid unitid modulename mod) => Binary (DbModule instunitid compid unitid modulename mod) Source # | |
data DbUnitId instunitid compid unitid modulename mod Source #
ghc-boot
's copy of UnitId
, i.e. what is serialized to the database.
Use DbUnitIdModuleRep
to convert it into an actual UnitId
.
It has phantom type parameters as this is the most convenient way
to avoid undecidable instances.
DbUnitId compid [(modulename, mod)] | |
DbInstalledUnitId instunitid |
Instances
(Eq compid, Eq modulename, Eq mod, Eq instunitid) => Eq (DbUnitId instunitid compid unitid modulename mod) Source # | |
(Show compid, Show modulename, Show mod, Show instunitid) => Show (DbUnitId instunitid compid unitid modulename mod) Source # | |
(BinaryStringRep modulename, BinaryStringRep compid, BinaryStringRep instunitid, DbUnitIdModuleRep instunitid compid unitid modulename mod) => Binary (DbUnitId instunitid compid unitid modulename mod) Source # | |
class BinaryStringRep a where Source #
fromStringRep :: ByteString -> a Source #
toStringRep :: a -> ByteString Source #
class DbUnitIdModuleRep instunitid compid unitid modulename mod | mod -> unitid, unitid -> mod, mod -> modulename, unitid -> compid, unitid -> instunitid where Source #
A type-class for the types which can be converted into DbModule
/DbUnitId
.
There is only one type class because these types are mutually recursive.
NB: The functional dependency helps out type inference in cases
where types would be ambiguous.
fromDbModule :: DbModule instunitid compid unitid modulename mod -> mod Source #
toDbModule :: mod -> DbModule instunitid compid unitid modulename mod Source #
fromDbUnitId :: DbUnitId instunitid compid unitid modulename mod -> unitid Source #
toDbUnitId :: unitid -> DbUnitId instunitid compid unitid modulename mod Source #
emptyInstalledPackageInfo :: RepInstalledPackageInfo a b c d e f g => InstalledPackageInfo a b c d e f g Source #
data PackageDbLock Source #
Represents a lock of a package db.
lockPackageDb :: FilePath -> IO PackageDbLock Source #
Acquire an exclusive lock related to package DB under given location.
unlockPackageDb :: PackageDbLock -> IO () Source #
Release the lock related to package DB.
data DbOpenMode (mode :: DbMode) t where Source #
DbOpenMode
holds a value of type t
but only in DbReadWrite
mode. So
it is like Maybe
but with a type argument for the mode to enforce that the
mode is used consistently.
DbOpenReadOnly :: DbOpenMode 'DbReadOnly t | |
DbOpenReadWrite :: t -> DbOpenMode 'DbReadWrite t |
Instances
Functor (DbOpenMode mode) Source # | |
Defined in GHC.PackageDb fmap :: (a -> b) -> DbOpenMode mode a -> DbOpenMode mode b Source # (<$) :: a -> DbOpenMode mode b -> DbOpenMode mode a Source # | |
Foldable (DbOpenMode mode) Source # | |
Defined in GHC.PackageDb fold :: Monoid m => DbOpenMode mode m -> m Source # foldMap :: Monoid m => (a -> m) -> DbOpenMode mode a -> m Source # foldMap' :: Monoid m => (a -> m) -> DbOpenMode mode a -> m Source # foldr :: (a -> b -> b) -> b -> DbOpenMode mode a -> b Source # foldr' :: (a -> b -> b) -> b -> DbOpenMode mode a -> b Source # foldl :: (b -> a -> b) -> b -> DbOpenMode mode a -> b Source # foldl' :: (b -> a -> b) -> b -> DbOpenMode mode a -> b Source # foldr1 :: (a -> a -> a) -> DbOpenMode mode a -> a Source # foldl1 :: (a -> a -> a) -> DbOpenMode mode a -> a Source # toList :: DbOpenMode mode a -> [a] Source # null :: DbOpenMode mode a -> Bool Source # length :: DbOpenMode mode a -> Int Source # elem :: Eq a => a -> DbOpenMode mode a -> Bool Source # maximum :: Ord a => DbOpenMode mode a -> a Source # minimum :: Ord a => DbOpenMode mode a -> a Source # sum :: Num a => DbOpenMode mode a -> a Source # product :: Num a => DbOpenMode mode a -> a Source # | |
Traversable (DbOpenMode mode) Source # | |
Defined in GHC.PackageDb traverse :: Applicative f => (a -> f b) -> DbOpenMode mode a -> f (DbOpenMode mode b) Source # sequenceA :: Applicative f => DbOpenMode mode (f a) -> f (DbOpenMode mode a) Source # mapM :: Monad m => (a -> m b) -> DbOpenMode mode a -> m (DbOpenMode mode b) Source # sequence :: Monad m => DbOpenMode mode (m a) -> m (DbOpenMode mode a) Source # |
isDbOpenReadMode :: DbOpenMode mode t -> Bool Source #
readPackageDbForGhc :: RepInstalledPackageInfo a b c d e f g => FilePath -> IO [InstalledPackageInfo a b c d e f g] Source #
Read the part of the package DB that GHC is interested in.
readPackageDbForGhcPkg :: Binary pkgs => FilePath -> DbOpenMode mode t -> IO (pkgs, DbOpenMode mode PackageDbLock) Source #
Read the part of the package DB that ghc-pkg is interested in
Note that the Binary instance for ghc-pkg's representation of packages is not defined in this package. This is because ghc-pkg uses Cabal types (and Binary instances for these) which this package does not depend on.
If we open the package db in read only mode, we get its contents. Otherwise we additionally receive a PackageDbLock that represents a lock on the database, so that we can safely update it later.
writePackageDb :: (Binary pkgs, RepInstalledPackageInfo a b c d e f g) => FilePath -> [InstalledPackageInfo a b c d e f g] -> pkgs -> IO () Source #
Write the whole of the package DB, both parts.