-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/
-- | Modules for working with the Debian package system
--
-- This library includes modules covering some basic data types defined
-- by the Debian policy manual - version numbers, control file syntax,
-- etc.
@package debian
@version 3.64
-- | A module for parsing, comparing, and (eventually) modifying debian
-- version numbers.
-- http://www.debian.org/doc/debian-policy/ch-controlfields.html#s-f-Version
module Debian.Version.Common
data DebianVersion
prettyDebianVersion :: DebianVersion -> Doc
class ParseDebianVersion a
parseDebianVersion :: ParseDebianVersion a => a -> DebianVersion
-- | Split a DebianVersion into its three components: epoch, version,
-- revision. It is not safe to use the parsed version number for this
-- because you will lose information, such as leading zeros.
evr :: DebianVersion -> (Maybe Int, String, Maybe String)
epoch :: DebianVersion -> Maybe Int
version :: DebianVersion -> String
revision :: DebianVersion -> Maybe String
buildDebianVersion :: Maybe Int -> String -> Maybe String -> DebianVersion
-- | Convert a string to a debian version number. May throw an exception if
-- the string is unparsable -- but I am not sure if that can currently
-- happen. Are there any invalid version strings? Perhaps ones with
-- underscore, or something?
parseDV :: CharParser () (Found Int, NonNumeric, Found NonNumeric)
instance Ord Numeric
instance Eq Numeric
instance Ord NonNumeric
instance Eq NonNumeric
instance Ord DebianVersion
instance Eq DebianVersion
module Debian.Version.String
class ParseDebianVersion a
parseDebianVersion :: ParseDebianVersion a => a -> DebianVersion
instance ParseDebianVersion String
module Debian.Version.ByteString
class ParseDebianVersion a
parseDebianVersion :: ParseDebianVersion a => a -> DebianVersion
instance ParseDebianVersion ByteString
-- | Domain independent functions used by the haskell-debian package.
module Debian.Extra.Files
withTemporaryFile :: MonadIO m => (FilePath -> m a) -> String -> m a
module Debian.Time
rfc822DateFormat :: String
epochTimeToUTCTime :: EpochTime -> UTCTime
formatTimeRFC822 :: FormatTime t => t -> String
parseTimeRFC822 :: ParseTime t => String -> Maybe t
getCurrentLocalRFC822Time :: IO String
module Debian.URI
-- | If the URI type could be read and showed this wouldn't be necessary.
type URIString = String
uriToString' :: URI -> String
fileFromURI :: URI -> IO (Either SomeException ByteString)
fileFromURIStrict :: URI -> IO (Either SomeException ByteString)
dirFromURI :: URI -> IO (Either SomeException [String])
instance Ord URI
module Debian.Release
-- | A distribution (aka release) name. This type is expected to refer to a
-- subdirectory of the dists directory which is at the top level of a
-- repository.
data ReleaseName
ReleaseName :: String -> ReleaseName
relName :: ReleaseName -> String
parseReleaseName :: String -> ReleaseName
releaseName' :: ReleaseName -> String
-- | The types of architecture that a package can have, either Source or
-- some type of binary architecture.
data Arch
Source :: Arch
Binary :: String -> Arch
archName :: Arch -> String
-- | A section of a repository such as main, contrib, non-free, restricted.
-- The indexes for a section are located below the distribution
-- directory.
newtype Section
Section :: String -> Section
-- | A package's subsection is only evident in its control information,
-- packages from different subsections all reside in the same index.
data SubSection
SubSection :: Section -> String -> SubSection
section :: SubSection -> Section
subSectionName :: SubSection -> String
sectionName :: SubSection -> String
sectionName' :: Section -> String
sectionNameOfSubSection :: SubSection -> String
-- | Parse the value that appears in the Section field of a
-- .changes file. (Does this need to be unesacped?)
parseSection :: String -> SubSection
parseSection' :: String -> Section
instance Typeable ReleaseName
instance Typeable Arch
instance Eq ReleaseName
instance Ord ReleaseName
instance Read ReleaseName
instance Show ReleaseName
instance Data ReleaseName
instance Read Arch
instance Show Arch
instance Eq Arch
instance Ord Arch
instance Data Arch
instance Read Section
instance Show Section
instance Eq Section
instance Ord Section
instance Read SubSection
instance Show SubSection
instance Eq SubSection
instance Ord SubSection
module Debian.Sources
data SourceType
Deb :: SourceType
DebSrc :: SourceType
data DebSource
DebSource :: SourceType -> URI -> Either String (ReleaseName, [Section]) -> DebSource
sourceType :: DebSource -> SourceType
sourceUri :: DebSource -> URI
sourceDist :: DebSource -> Either String (ReleaseName, [Section])
-- | This is a name given to a combination of parts of one or more releases
-- that can be specified by a sources.list file.
data SliceName
SliceName :: String -> SliceName
sliceName :: SliceName -> String
-- | quoteWords - similar to words, but with special handling of
-- double-quotes and brackets.
--
-- The handling double quotes and [] is supposed to match:
-- apt-0.6.44.2/apt-pkg/contrib/strutl.cc:ParseQuoteWord()
--
-- The behaviour can be defined as:
--
-- Break the string into space seperated words ignoring spaces that
-- appear between "" or []. Strip trailing and leading white space around
-- words. Strip out double quotes, but leave the square brackets intact.
quoteWords :: String -> [String]
stripLine :: String -> String
sourceLines :: String -> [String]
-- | parseSourceLine -- parses a source line the argument must be a
-- non-empty, valid source line with comments stripped see:
-- sourceLines
parseSourceLine :: String -> DebSource
parseSourceLine' :: String -> Maybe DebSource
parseSourcesList :: String -> [DebSource]
instance Eq SourceType
instance Ord SourceType
instance Eq DebSource
instance Ord DebSource
instance Eq SliceName
instance Ord SliceName
instance Show SliceName
instance Show DebSource
instance Show SourceType
module Debian.Control.Common
newtype Control' a
Control :: [Paragraph' a] -> Control' a
unControl :: Control' a -> [Paragraph' a]
newtype Paragraph' a
Paragraph :: [Field' a] -> Paragraph' a
-- | NOTE: we do not strip the leading or trailing whitespace in the name
-- or value
data Field' a
Field :: (a, a) -> Field' a
Comment :: a -> Field' a
class ControlFunctions a
parseControlFromFile :: ControlFunctions a => FilePath -> IO (Either ParseError (Control' a))
parseControlFromHandle :: ControlFunctions a => String -> Handle -> IO (Either ParseError (Control' a))
parseControl :: ControlFunctions a => String -> a -> (Either ParseError (Control' a))
lookupP :: ControlFunctions a => String -> (Paragraph' a) -> Maybe (Field' a)
stripWS :: ControlFunctions a => a -> a
asString :: ControlFunctions a => a -> String
mergeControls :: [Control' a] -> Control' a
fieldValue :: ControlFunctions a => String -> Paragraph' a -> Maybe a
removeField :: Eq a => a -> Paragraph' a -> Paragraph' a
prependFields :: [Field' a] -> Paragraph' a -> Paragraph' a
appendFields :: [Field' a] -> Paragraph' a -> Paragraph' a
renameField :: Eq a => a -> a -> Paragraph' a -> Paragraph' a
modifyField :: Eq a => a -> (a -> a) -> Paragraph' a -> Paragraph' a
-- | Move selected fields to the beginning of a paragraph.
raiseFields :: Eq a => (a -> Bool) -> Paragraph' a -> Paragraph' a
-- | Run a command and parse its output as a control file.
parseControlFromCmd :: ControlFunctions a => String -> IO (Either String (Control' a))
-- | look up the md5sum file in a paragraph Tries several different
-- variations: MD5Sum: Md5Sum: MD5sum:
md5sumField :: ControlFunctions a => Paragraph' a -> Maybe a
instance Eq a => Eq (Field' a)
instance Eq a => Eq (Paragraph' a)
module Debian.Control.String
newtype Control' a
Control :: [Paragraph' a] -> Control' a
unControl :: Control' a -> [Paragraph' a]
newtype Paragraph' a
Paragraph :: [Field' a] -> Paragraph' a
-- | NOTE: we do not strip the leading or trailing whitespace in the name
-- or value
data Field' a
Field :: (a, a) -> Field' a
Comment :: a -> Field' a
type Control = Control' String
type Paragraph = Paragraph' String
type Field = Field' String
type ControlParser a = CharParser () a
class ControlFunctions a
parseControlFromFile :: ControlFunctions a => FilePath -> IO (Either ParseError (Control' a))
parseControlFromHandle :: ControlFunctions a => String -> Handle -> IO (Either ParseError (Control' a))
parseControl :: ControlFunctions a => String -> a -> (Either ParseError (Control' a))
lookupP :: ControlFunctions a => String -> (Paragraph' a) -> Maybe (Field' a)
stripWS :: ControlFunctions a => a -> a
asString :: ControlFunctions a => a -> String
-- | A parser for debian control file. This parser handles control files
-- that end without a newline as well as ones that have several blank
-- lines at the end. It is very liberal and does not attempt validate the
-- fields in any way. All trailing, leading, and folded whitespace is
-- preserved in the field values. See stripWS.
pControl :: ControlParser Control
mergeControls :: [Control' a] -> Control' a
fieldValue :: ControlFunctions a => String -> Paragraph' a -> Maybe a
removeField :: Eq a => a -> Paragraph' a -> Paragraph' a
prependFields :: [Field' a] -> Paragraph' a -> Paragraph' a
appendFields :: [Field' a] -> Paragraph' a -> Paragraph' a
renameField :: Eq a => a -> a -> Paragraph' a -> Paragraph' a
modifyField :: Eq a => a -> (a -> a) -> Paragraph' a -> Paragraph' a
-- | Move selected fields to the beginning of a paragraph.
raiseFields :: Eq a => (a -> Bool) -> Paragraph' a -> Paragraph' a
instance ControlFunctions String
instance Show (Field' String)
instance Show (Paragraph' String)
instance Show (Control' String)
module Debian.Control.PrettyPrint
ppControl :: ToText a => Control' a -> Doc
ppParagraph :: ToText a => Paragraph' a -> Doc
ppField :: ToText a => Field' a -> Doc
class ToText a
totext :: ToText a => a -> Doc
instance ToText ByteString
instance ToText String
module Debian.Deb
fields :: ControlFunctions a => FilePath -> IO (Control' a)
-- | an interface for using the methods in varlibaptmethods
module Debian.Apt.Methods
-- | withMethod - run |methodPath| bracketed with openMethod/closeMethod.
-- |f| gets the open handle.
withMethodPath :: FilePath -> (MethodHandle -> IO a) -> IO a
withMethodURI :: URI -> (MethodHandle -> IO a) -> IO a
-- | whichMethodBinary - find the method executable associated with a URI
-- throws an exception on failure
whichMethodPath :: URI -> IO (Maybe FilePath)
openMethod :: FilePath -> IO MethodHandle
closeMethod :: MethodHandle -> IO ExitCode
recvStatus :: MethodHandle -> IO Status
sendCommand :: MethodHandle -> Command -> IO ()
getLastModified :: FilePath -> IO (Maybe UTCTime)
simpleFetch :: [ConfigItem] -> URI -> FilePath -> Maybe UTCTime -> IO Bool
-- | fetch a single item, show console output see also: getLastModified
fetch :: FetchCallbacks -> [ConfigItem] -> URI -> FilePath -> Maybe UTCTime -> IO Bool
data FetchCallbacks
FetchCallbacks :: (Message -> IO ()) -> (URI -> Message -> IO ()) -> (URI -> Maybe Integer -> Maybe UTCTime -> Maybe Integer -> IO ()) -> (URI -> Maybe Integer -> Maybe UTCTime -> Maybe Integer -> Maybe FilePath -> Hashes -> Bool -> IO ()) -> (URI -> Message -> IO ()) -> (Message -> IO ()) -> (Site -> IO (Maybe (User, Password))) -> (Media -> Drive -> IO ()) -> (String -> IO ()) -> FetchCallbacks
logCB :: FetchCallbacks -> Message -> IO ()
statusCB :: FetchCallbacks -> URI -> Message -> IO ()
uriStartCB :: FetchCallbacks -> URI -> Maybe Integer -> Maybe UTCTime -> Maybe Integer -> IO ()
uriDoneCB :: FetchCallbacks -> URI -> Maybe Integer -> Maybe UTCTime -> Maybe Integer -> Maybe FilePath -> Hashes -> Bool -> IO ()
uriFailureCB :: FetchCallbacks -> URI -> Message -> IO ()
generalFailureCB :: FetchCallbacks -> Message -> IO ()
authorizationRequiredCB :: FetchCallbacks -> Site -> IO (Maybe (User, Password))
mediaFailureCB :: FetchCallbacks -> Media -> Drive -> IO ()
debugCB :: FetchCallbacks -> String -> IO ()
-- | set of callbacks which do nothing. suitable for non-interactive usage.
-- In the case authorization is required, no credentials will be supplied
-- and the download should abort.
emptyFetchCallbacks :: FetchCallbacks
cliFetchCallbacks :: FetchCallbacks
data Command
URIAcquire :: URI -> FilePath -> (Maybe UTCTime) -> Command
Configuration :: [ConfigItem] -> Command
AuthorizationCredentials :: Site -> User -> Password -> Command
MediaChanged :: Media -> (Maybe Bool) -> Command
data Status
Capabilities :: String -> Bool -> Bool -> Bool -> Bool -> Bool -> Bool -> Status
version :: Status -> String
singleInstance :: Status -> Bool
preScan :: Status -> Bool
pipeline :: Status -> Bool
sendConfig :: Status -> Bool
needsCleanup :: Status -> Bool
localOnly :: Status -> Bool
LogMsg :: Message -> Status
Status :: URI -> Message -> Status
URIStart :: URI -> Maybe Integer -> Maybe UTCTime -> Maybe Integer -> Status
uri :: Status -> URI
size :: Status -> Maybe Integer
lastModified :: Status -> Maybe UTCTime
resumePoint :: Status -> Maybe Integer
URIDone :: URI -> Maybe Integer -> Maybe UTCTime -> Maybe Integer -> Maybe FilePath -> Hashes -> Bool -> Status
uri :: Status -> URI
size :: Status -> Maybe Integer
lastModified :: Status -> Maybe UTCTime
resumePoint :: Status -> Maybe Integer
filename :: Status -> Maybe FilePath
hashes :: Status -> Hashes
imsHit :: Status -> Bool
URIFailure :: URI -> Message -> Status
uri :: Status -> URI
message :: Status -> Message
GeneralFailure :: Message -> Status
AuthorizationRequired :: Site -> Status
MediaFailure :: Media -> Drive -> Status
type Message = String
type Site = String
type User = String
type Password = String
type Media = String
type Drive = String
type Header = (String, String)
type ConfigItem = (String, String)
instance Show Hashes
instance Eq Hashes
instance Show Status
instance Eq Status
instance Show Command
instance Eq Command
-- | A module for parsing, comparing, and (eventually) modifying debian
-- version numbers.
-- http://www.debian.org/doc/debian-policy/ch-controlfields.html#s-f-Version
module Debian.Version
data DebianVersion
prettyDebianVersion :: DebianVersion -> Doc
parseDebianVersion :: ParseDebianVersion a => a -> DebianVersion
epoch :: DebianVersion -> Maybe Int
version :: DebianVersion -> String
revision :: DebianVersion -> Maybe String
buildDebianVersion :: Maybe Int -> String -> Maybe String -> DebianVersion
-- | Split a DebianVersion into its three components: epoch, version,
-- revision. It is not safe to use the parsed version number for this
-- because you will lose information, such as leading zeros.
evr :: DebianVersion -> (Maybe Int, String, Maybe String)
-- | Changelog and changes file support.
module Debian.Changes
-- | A file generated by dpkg-buildpackage describing the result of a
-- package build
data ChangesFile
Changes :: FilePath -> String -> DebianVersion -> ReleaseName -> Arch -> Paragraph -> ChangeLogEntry -> [ChangedFileSpec] -> ChangesFile
-- | The full pathname of the directory holding the .changes file.
changeDir :: ChangesFile -> FilePath
-- | The package name parsed from the .changes file name
changePackage :: ChangesFile -> String
-- | The version number parsed from the .changes file name
changeVersion :: ChangesFile -> DebianVersion
-- | The Distribution field of the .changes file
changeRelease :: ChangesFile -> ReleaseName
-- | The architecture parsed from the .changes file name
changeArch :: ChangesFile -> Arch
-- | The contents of the .changes file
changeInfo :: ChangesFile -> Paragraph
-- | The value of the Changes field of the .changes file
changeEntry :: ChangesFile -> ChangeLogEntry
-- | The parsed value of the Files attribute
changeFiles :: ChangesFile -> [ChangedFileSpec]
-- | An entry in the list of files generated by the build.
data ChangedFileSpec
ChangedFileSpec :: String -> String -> String -> FileOffset -> SubSection -> String -> FilePath -> ChangedFileSpec
changedFileMD5sum :: ChangedFileSpec -> String
changedFileSHA1sum :: ChangedFileSpec -> String
changedFileSHA256sum :: ChangedFileSpec -> String
changedFileSize :: ChangedFileSpec -> FileOffset
changedFileSection :: ChangedFileSpec -> SubSection
changedFilePriority :: ChangedFileSpec -> String
changedFileName :: ChangedFileSpec -> FilePath
changesFileName :: ChangesFile -> String
-- | A changelog is a series of ChangeLogEntries
data ChangeLogEntry
Entry :: String -> DebianVersion -> [ReleaseName] -> String -> String -> String -> String -> ChangeLogEntry
logPackage :: ChangeLogEntry -> String
logVersion :: ChangeLogEntry -> DebianVersion
logDists :: ChangeLogEntry -> [ReleaseName]
logUrgency :: ChangeLogEntry -> String
logComments :: ChangeLogEntry -> String
logWho :: ChangeLogEntry -> String
logDate :: ChangeLogEntry -> String
WhiteSpace :: String -> ChangeLogEntry
-- | Parse a Debian Changelog and return a lazy list of entries
parseLog :: String -> [Either [String] ChangeLogEntry]
-- | Parse a single changelog entry, returning the entry and the remaining
-- text.
parseEntry :: String -> Either [String] (ChangeLogEntry, String)
-- | Parse the changelog information that shows up in the .changes file,
-- i.e. a changelog entry with no signature.
parseChanges :: String -> Maybe ChangeLogEntry
prettyChanges :: ChangedFileSpec -> Doc
prettyChangesFile :: ChangesFile -> Doc
prettyEntry :: ChangeLogEntry -> Doc
instance Eq ChangedFileSpec
instance Show ChangedFileSpec
instance Eq ChangeLogEntry
instance Eq ChangesFile
module Debian.Relation.Common
type Relations = AndRelation
type AndRelation = [OrRelation]
type OrRelation = [Relation]
data Relation
Rel :: BinPkgName -> (Maybe VersionReq) -> (Maybe ArchitectureReq) -> Relation
newtype PkgName
PkgName :: String -> PkgName
unPkgName :: PkgName -> String
newtype SrcPkgName
SrcPkgName :: PkgName -> SrcPkgName
unSrcPkgName :: SrcPkgName -> PkgName
newtype BinPkgName
BinPkgName :: PkgName -> BinPkgName
unBinPkgName :: BinPkgName -> PkgName
prettySrcPkgName :: SrcPkgName -> Doc
prettyBinPkgName :: BinPkgName -> Doc
prettyPkgName :: PkgName -> Doc
class ParseRelations a
parseRelations :: ParseRelations a => a -> Either ParseError Relations
prettyRelation :: Relation -> Doc
data ArchitectureReq
ArchOnly :: [String] -> ArchitectureReq
ArchExcept :: [String] -> ArchitectureReq
prettyArchitectureReq :: ArchitectureReq -> Doc
data VersionReq
SLT :: DebianVersion -> VersionReq
LTE :: DebianVersion -> VersionReq
EEQ :: DebianVersion -> VersionReq
GRE :: DebianVersion -> VersionReq
SGR :: DebianVersion -> VersionReq
prettyVersionReq :: VersionReq -> Doc
-- | Check if a version number satisfies a version requirement.
checkVersionReq :: Maybe VersionReq -> Maybe DebianVersion -> Bool
instance Show PkgName
instance Eq PkgName
instance Ord PkgName
instance Show SrcPkgName
instance Eq SrcPkgName
instance Ord SrcPkgName
instance Show BinPkgName
instance Eq BinPkgName
instance Ord BinPkgName
instance Eq ArchitectureReq
instance Eq VersionReq
instance Eq Relation
instance Ord VersionReq
instance Ord Relation
-- | A module for working with debian relationships
-- http://www.debian.org/doc/debian-policy/ch-relationships.html
module Debian.Relation.String
data PkgName
type AndRelation = [OrRelation]
type OrRelation = [Relation]
type Relations = AndRelation
data Relation
Rel :: BinPkgName -> (Maybe VersionReq) -> (Maybe ArchitectureReq) -> Relation
data ArchitectureReq
ArchOnly :: [String] -> ArchitectureReq
ArchExcept :: [String] -> ArchitectureReq
data VersionReq
SLT :: DebianVersion -> VersionReq
LTE :: DebianVersion -> VersionReq
EEQ :: DebianVersion -> VersionReq
GRE :: DebianVersion -> VersionReq
SGR :: DebianVersion -> VersionReq
-- | Check if a version number satisfies a version requirement.
checkVersionReq :: Maybe VersionReq -> Maybe DebianVersion -> Bool
type RelParser a = CharParser () a
class ParseRelations a
parseRelations :: ParseRelations a => a -> Either ParseError Relations
pRelations :: RelParser Relations
instance ParseRelations String
-- | A module for working with debian relationships
-- http://www.debian.org/doc/debian-policy/ch-relationships.html
module Debian.Relation.ByteString
data PkgName
type AndRelation = [OrRelation]
type OrRelation = [Relation]
type Relations = AndRelation
data Relation
Rel :: BinPkgName -> (Maybe VersionReq) -> (Maybe ArchitectureReq) -> Relation
data ArchitectureReq
ArchOnly :: [String] -> ArchitectureReq
ArchExcept :: [String] -> ArchitectureReq
data VersionReq
SLT :: DebianVersion -> VersionReq
LTE :: DebianVersion -> VersionReq
EEQ :: DebianVersion -> VersionReq
GRE :: DebianVersion -> VersionReq
SGR :: DebianVersion -> VersionReq
-- | Check if a version number satisfies a version requirement.
checkVersionReq :: Maybe VersionReq -> Maybe DebianVersion -> Bool
type RelParser a = CharParser () a
class ParseRelations a
parseRelations :: ParseRelations a => a -> Either ParseError Relations
instance ParseRelations ByteString
-- | A module for working with debian relationships
-- http://www.debian.org/doc/debian-policy/ch-relationships.html
module Debian.Relation
newtype PkgName
PkgName :: String -> PkgName
unPkgName :: PkgName -> String
newtype SrcPkgName
SrcPkgName :: PkgName -> SrcPkgName
unSrcPkgName :: SrcPkgName -> PkgName
newtype BinPkgName
BinPkgName :: PkgName -> BinPkgName
unBinPkgName :: BinPkgName -> PkgName
prettyPkgName :: PkgName -> Doc
prettySrcPkgName :: SrcPkgName -> Doc
prettyBinPkgName :: BinPkgName -> Doc
type AndRelation = [OrRelation]
type OrRelation = [Relation]
type Relations = AndRelation
data Relation
Rel :: BinPkgName -> (Maybe VersionReq) -> (Maybe ArchitectureReq) -> Relation
prettyRelation :: Relation -> Doc
data ArchitectureReq
ArchOnly :: [String] -> ArchitectureReq
ArchExcept :: [String] -> ArchitectureReq
data VersionReq
SLT :: DebianVersion -> VersionReq
LTE :: DebianVersion -> VersionReq
EEQ :: DebianVersion -> VersionReq
GRE :: DebianVersion -> VersionReq
SGR :: DebianVersion -> VersionReq
-- | Check if a version number satisfies a version requirement.
checkVersionReq :: Maybe VersionReq -> Maybe DebianVersion -> Bool
type RelParser a = CharParser () a
class ParseRelations a
parseRelations :: ParseRelations a => a -> Either ParseError Relations
module Debian.Control.ByteString
newtype Control' a
Control :: [Paragraph' a] -> Control' a
unControl :: Control' a -> [Paragraph' a]
newtype Paragraph' a
Paragraph :: [Field' a] -> Paragraph' a
-- | NOTE: we do not strip the leading or trailing whitespace in the name
-- or value
data Field' a
Field :: (a, a) -> Field' a
Comment :: a -> Field' a
type Control = Control' ByteString
type Paragraph = Paragraph' ByteString
type Field = Field' ByteString
class ControlFunctions a
parseControlFromFile :: ControlFunctions a => FilePath -> IO (Either ParseError (Control' a))
parseControlFromHandle :: ControlFunctions a => String -> Handle -> IO (Either ParseError (Control' a))
parseControl :: ControlFunctions a => String -> a -> (Either ParseError (Control' a))
lookupP :: ControlFunctions a => String -> (Paragraph' a) -> Maybe (Field' a)
stripWS :: ControlFunctions a => a -> a
asString :: ControlFunctions a => a -> String
mergeControls :: [Control' a] -> Control' a
fieldValue :: ControlFunctions a => String -> Paragraph' a -> Maybe a
removeField :: Eq a => a -> Paragraph' a -> Paragraph' a
prependFields :: [Field' a] -> Paragraph' a -> Paragraph' a
appendFields :: [Field' a] -> Paragraph' a -> Paragraph' a
renameField :: Eq a => a -> a -> Paragraph' a -> Paragraph' a
modifyField :: Eq a => a -> (a -> a) -> Paragraph' a -> Paragraph' a
-- | Move selected fields to the beginning of a paragraph.
raiseFields :: Eq a => (a -> Bool) -> Paragraph' a -> Paragraph' a
instance Show a => Show (Result a)
instance MonadPlus (Parser state)
instance Monad (Parser state)
instance ControlFunctions ByteString
-- | A module for working with Debian control files
-- http://www.debian.org/doc/debian-policy/ch-controlfields.html
module Debian.Control
newtype Control' a
Control :: [Paragraph' a] -> Control' a
unControl :: Control' a -> [Paragraph' a]
newtype Paragraph' a
Paragraph :: [Field' a] -> Paragraph' a
-- | NOTE: we do not strip the leading or trailing whitespace in the name
-- or value
data Field' a
Field :: (a, a) -> Field' a
Comment :: a -> Field' a
type Control = Control' String
type Paragraph = Paragraph' String
type Field = Field' String
type ControlParser a = CharParser () a
class ControlFunctions a
parseControlFromFile :: ControlFunctions a => FilePath -> IO (Either ParseError (Control' a))
parseControlFromHandle :: ControlFunctions a => String -> Handle -> IO (Either ParseError (Control' a))
parseControl :: ControlFunctions a => String -> a -> (Either ParseError (Control' a))
lookupP :: ControlFunctions a => String -> (Paragraph' a) -> Maybe (Field' a)
stripWS :: ControlFunctions a => a -> a
asString :: ControlFunctions a => a -> String
-- | A parser for debian control file. This parser handles control files
-- that end without a newline as well as ones that have several blank
-- lines at the end. It is very liberal and does not attempt validate the
-- fields in any way. All trailing, leading, and folded whitespace is
-- preserved in the field values. See stripWS.
pControl :: ControlParser Control
mergeControls :: [Control' a] -> Control' a
fieldValue :: ControlFunctions a => String -> Paragraph' a -> Maybe a
removeField :: Eq a => a -> Paragraph' a -> Paragraph' a
prependFields :: [Field' a] -> Paragraph' a -> Paragraph' a
appendFields :: [Field' a] -> Paragraph' a -> Paragraph' a
renameField :: Eq a => a -> a -> Paragraph' a -> Paragraph' a
modifyField :: Eq a => a -> (a -> a) -> Paragraph' a -> Paragraph' a
-- | Move selected fields to the beginning of a paragraph.
raiseFields :: Eq a => (a -> Bool) -> Paragraph' a -> Paragraph' a
packParagraph :: Paragraph -> Paragraph
packField :: Field' String -> Field' ByteString
formatControl :: Control' ByteString -> [ByteString]
formatParagraph :: Paragraph' ByteString -> ByteString
formatField :: Field' ByteString -> ByteString
module Debian.Apt.Index
-- | update - similar to apt-get update
update :: Fetcher -> FilePath -> String -> [DebSource] -> IO [Maybe (FilePath, Compression)]
-- | function-type for a function that downloads a file The timestamp is
-- optional. If the local file is as new or newer than the remote copy,
-- the download may be skipped.
--
-- A good choice might be a partially parameterized call to fetch
type Fetcher = URI -> FilePath -> Maybe UTCTime -> IO Bool
data CheckSums
CheckSums :: Maybe String -> Maybe String -> Maybe String -> CheckSums
md5sum :: CheckSums -> Maybe String
sha1 :: CheckSums -> Maybe String
sha256 :: CheckSums -> Maybe String
-- | Package indexes on the server are uncompressed or compressed with gzip
-- or bzip2. We do not know what will exist on the server until we
-- actually look. This type is used to mark the compression status of
-- what was actually found.
data Compression
BZ2 :: Compression
GZ :: Compression
Uncompressed :: Compression
type FileTuple = (CheckSums, Size, FilePath)
type Size = Integer
-- | Parse a possibly compressed index file.
controlFromIndex :: Compression -> FilePath -> ByteString -> Either ParseError (Control' ByteString)
-- | parse an index possibly compressed file
controlFromIndex' :: Compression -> FilePath -> IO (Either ParseError (Control' ByteString))
-- | find the Contents-* files. These are not listed in the Release file
findContentsFiles :: (FilePath -> Bool) -> FilePath -> IO [FilePath]
findIndexes :: FilePath -> String -> [FileTuple] -> IO [(FileTuple, Compression)]
indexesInRelease :: (FilePath -> Bool) -> Control -> [(CheckSums, Integer, FilePath)]
-- | make a FileTuple for a file found on the local disk returns
-- Nothing if the file does not exist.
tupleFromFilePath :: FilePath -> FilePath -> IO (Maybe FileTuple)
instance Read Compression
instance Show Compression
instance Eq Compression
instance Ord Compression
instance Enum Compression
instance Bounded Compression
instance Read CheckSums
instance Show CheckSums
instance Eq CheckSums
module Debian.Report
-- | create a map of (package name, extracted field) from a list of index
-- files
--
-- NOTE: we could merge all the files into a single control and then run
-- packageMap over that. We currently do it one control file at a time to
-- avoid having all the control files loaded in memory at once. However,
-- I am not sure that property is actually occuring anyway. So, this
-- should be revisited.
makePackageMap :: (Paragraph -> a) -> (a -> a -> a) -> [(FilePath, Compression)] -> IO (Map ByteString a)
-- | create a map of (package name, max version) from a single control file
packageMap :: (Paragraph -> a) -> (a -> a -> a) -> Control -> Map ByteString a
-- | extract the version number from a control paragraph
extractVersion :: Paragraph -> Maybe DebianVersion
-- | compare two sources.list and find all the packages in the second that
-- trump packages in the first see also: |trumpedMap|
trumped :: Fetcher -> FilePath -> String -> [DebSource] -> [DebSource] -> IO (Map ByteString (DebianVersion, DebianVersion))
-- | calculate all the trumped packages
trumpedMap :: Map ByteString DebianVersion -> Map ByteString DebianVersion -> Map ByteString (DebianVersion, DebianVersion)
-- | create trumped / XML element and children from a trumped Map
trumpedXML :: Map ByteString (DebianVersion, DebianVersion) -> CFilter Posn
-- | Figure out the dependency relation between debianized source
-- directories. The code to actually solve these dependency relations for
-- a particular set of binary packages is in Debian.Repo.Dependency.
module Debian.GenBuildDeps
-- | This type describes the build dependencies of a source package.
data DepInfo
DepInfo :: SrcPkgName -> Relations -> [BinPkgName] -> DepInfo
-- | source package name
sourceName :: DepInfo -> SrcPkgName
-- | dependency relations
relations :: DepInfo -> Relations
-- | binary dependency names (is this a function of relations?)
binaryNames :: DepInfo -> [BinPkgName]
-- | Return the dependency info for a source package with the given
-- dependency relaxation. |According to debian policy, only the first
-- paragraph in debian/control can be a source package
-- http://www.debian.org/doc/debian-policy/ch-controlfields.html#s-sourcecontrolfiles
buildDependencies :: Control -> Either String DepInfo
-- | Given a source package name and a binary package name, return False if
-- the binary package should be ignored hwen deciding whether to build
-- the source package. This is used to prevent build dependency cycles
-- from triggering unnecessary rebuilds. (This is a replacement for the
-- RelaxInfo type, which we temporarily rename OldRelaxInfo.)
type RelaxInfo = SrcPkgName -> BinPkgName -> Bool
-- | Remove any dependencies that are designated "relaxed" by relaxInfo.
relaxDeps :: RelaxInfo -> [DepInfo] -> [DepInfo]
-- | Specifies build dependencies that should be ignored during the build
-- decision. If the pair is (BINARY, Nothing) it means the binary package
-- BINARY should always be ignored when deciding whether to build. If the
-- pair is (BINARY, Just SOURCE) it means that binary package BINARY
-- should be ignored when deiciding whether to build package SOURCE.
newtype OldRelaxInfo
RelaxInfo :: [(BinPkgName, Maybe SrcPkgName)] -> OldRelaxInfo
-- | Remove any dependencies that are designated "relaxed" by relaxInfo.
oldRelaxDeps :: OldRelaxInfo -> [DepInfo] -> [DepInfo]
data BuildableInfo a
BuildableInfo :: [(a, [a], [a])] -> [a] -> BuildableInfo a
readyTriples :: BuildableInfo a -> [(a, [a], [a])]
allBlocked :: BuildableInfo a -> [a]
CycleInfo :: [(a, a)] -> BuildableInfo a
depPairs :: BuildableInfo a -> [(a, a)]
-- | Given an ordering function representing the dependencies on a list of
-- packages, return a triple: One ready package, the packages that depend
-- on the ready package directly or indirectly, and all the other
-- packages.
buildable :: (a -> a -> Ordering) -> [a] -> BuildableInfo a
-- | This is a nice start. It ignores circular build depends and takes a
-- pretty simplistic approach to or build depends. However, I
-- think this should work pretty nicely in practice.
compareSource :: DepInfo -> DepInfo -> Ordering
-- | Given a list of packages, sort them according to their apparant build
-- dependencies so that the first element doesn't depend on any of the
-- other packages.
orderSource :: (a -> a -> Ordering) -> [a] -> [a]
-- | Return the dependency info for a list of control files.
genDeps :: [FilePath] -> IO (Either String [DepInfo])
-- | Remove any packages which can't be built given that a package has
-- failed.
failPackage :: Eq a => (a -> a -> Ordering) -> a -> [a] -> ([a], [a])
-- | One example of how to tie the below functions together. In this case
-- fp is the path to a directory that contains a bunch of
-- checked out source packages. The code will automatically look for
-- debian/control. It returns a list with the packages in the order they
-- should be built.
getSourceOrder :: FilePath -> IO (Either String [SrcPkgName])
instance Show OldRelaxInfo
module Debian.Util.FakeChanges
fakeChanges :: [FilePath] -> IO (FilePath, String)
instance Typeable Error
instance Read Error
instance Show Error
instance Eq Error
instance Data Error
instance Show Files
-- | Functions for dealing with source and binary packages in an
-- abstract-way
module Debian.Apt.Package
type PackageNameMap a = Map BinPkgName [a]
-- | packageNameMap creates a map from a package name to all the
-- versions of that package NOTE: Provides are not included in the map
-- NOTE: the sort order is random -- this is perhaps a bug see also:
-- addProvides
packageNameMap :: (a -> BinPkgName) -> [a] -> PackageNameMap a
-- | addProvides finds packages that Provide other packages and adds
-- them to the PackageNameMap. They will be adde to the end of the list,
-- so that real packages have 'higher priority' than virtual packages.
-- NOTE: Does not check for duplication or multiple use
addProvides :: (p -> [BinPkgName]) -> [p] -> PackageNameMap p -> PackageNameMap p
-- | findProvides
findProvides :: (p -> [BinPkgName]) -> [p] -> [(BinPkgName, p)]
-- | lookupPackageByRel returns all the packages that satisfy the
-- specified relation TODO: Add architecture check
lookupPackageByRel :: PackageNameMap a -> (a -> (BinPkgName, DebianVersion)) -> Relation -> [a]
module Debian.Apt.Dependencies
data Status
Remaining :: AndRelation -> Status
MissingDep :: Relation -> Status
Complete :: Status
type State a = (Status, [a])
complete :: State a -> Bool
data CSP a
CSP :: PackageNameMap a -> Relations -> (a -> Relations) -> (a -> Relations) -> (a -> (BinPkgName, DebianVersion)) -> CSP a
pnm :: CSP a -> PackageNameMap a
relations :: CSP a -> Relations
depFunction :: CSP a -> (a -> Relations)
conflicts :: CSP a -> a -> Relations
packageVersion :: CSP a -> a -> (BinPkgName, DebianVersion)
-- | TODO addProvides -- see DQL.Exec
controlCSP :: Control -> Relations -> (Paragraph -> Relations) -> CSP Paragraph
testCSP :: FilePath -> (Paragraph -> Relations) -> String -> (CSP Paragraph -> IO a) -> IO a
depF :: Paragraph -> Relations
sidPackages :: [Char]
gutsyPackages :: [Char]
test :: FilePath -> String -> Labeler Paragraph -> IO ()
packageVersionParagraph :: Paragraph -> (BinPkgName, DebianVersion)
conflict :: CSP p -> p -> p -> Bool
-- | JAS: deal with Provides (can a package provide more than one
-- package?)
conflict' :: (BinPkgName, DebianVersion) -> Relation -> Bool
mkTree :: a -> [Tree a] -> Tree a
label :: Tree a -> a
initTree :: (a -> [a]) -> a -> Tree a
mapTree :: (a -> b) -> Tree a -> Tree b
foldTree :: (a -> [b] -> b) -> Tree a -> b
zipTreesWith :: (a -> b -> c) -> Tree a -> Tree b -> Tree c
prune :: (a -> Bool) -> Tree a -> Tree a
leaves :: Tree a -> [a]
inhTree :: (b -> a -> b) -> b -> Tree a -> Tree b
distrTree :: (a -> [b]) -> b -> Tree a -> Tree b
mkSearchTree :: CSP a -> Tree (State a)
-- | earliestInconsistency does what it sounds like the 'reverse as' is
-- because the vars are order high to low, but we want to find the lowest
-- numbered (aka, eariest) inconsistency ??
earliestInconsistency :: CSP a -> State a -> Maybe ((BinPkgName, DebianVersion), (BinPkgName, DebianVersion))
-- | conflicting packages and relations that require non-existant packages
type ConflictSet = ([(BinPkgName, DebianVersion)], [Relation])
isConflict :: ConflictSet -> Bool
solutions :: Tree (State a, ConflictSet) -> [State a]
type Labeler a = CSP a -> Tree (State a) -> Tree (State a, ConflictSet)
search :: Labeler a -> CSP a -> [State a]
bt :: Labeler a
-- | bj - backjumping labeler
--
-- If the node already has a conflict set, then leave it alone.
--
-- Otherwise, the conflictset for the node is the combination of the
-- conflict sets of its direct children.
bj :: CSP p -> Tree (State p, ConflictSet) -> Tree (State p, ConflictSet)
unionCS :: [ConflictSet] -> ConflictSet
combine :: CSP p -> [(State p, ConflictSet)] -> [ConflictSet] -> ConflictSet
instance Eq Status