Codec.Archive.Tar.Entry

tar-0.6.4.0: Reading, writing and manipulating ".tar" archive files.

Copyright | (c) 2007 Bjorn Bringert 2008 Andrea Vezzosi 2008-2009 Duncan Coutts
License | BSD3
Maintainer | duncan@community.haskell.org
Portability | portable
Safe Haskell | None
Language | Haskell2010

Codec.Archive.Tar.Entry

Contents

- Tar entry and associated types
- Constructing simple entry values
- Standard file permissions
- Constructing entries from disk files
- TarPath type
- LinkTarget type

Description

Types and functions to manipulate tar entries.

While the Codec.Archive.Tar module provides only the simple high level API, this module provides full access to the details of tar entries. This lets you inspect all the meta-data, construct entries and handle error cases more precisely.

This module uses common names and so is designed to be imported qualified:

    import qualified Codec.Archive.Tar       as Tar
    import qualified Codec.Archive.Tar.Entry as Tar

Synopsis

- data GenEntry tarPath linkTarget = Entry {
  - entryTarPath :: !tarPath
  - entryContent :: !(GenEntryContent linkTarget)
  - entryPermissions :: !Permissions
  - entryOwnership :: !Ownership
  - entryTime :: !EpochTime
  - entryFormat :: !Format
  }
- type Entry = GenEntry TarPath LinkTarget
- entryPath :: GenEntry TarPath linkTarget -> FilePath
- data GenEntryContent linkTarget
  - = NormalFile ByteString !FileSize
  - | Directory
  - | SymbolicLink !linkTarget
  - | HardLink !linkTarget
  - | CharacterDevice !DevMajor !DevMinor
  - | BlockDevice !DevMajor !DevMinor
  - | NamedPipe
  - | OtherEntryType !TypeCode ByteString !FileSize
- type EntryContent = GenEntryContent LinkTarget
- data Ownership = Ownership {
  - ownerName :: String
  - groupName :: String
  - ownerId :: !Int
  - groupId :: !Int
  }
- type FileSize = Int64
- type Permissions = FileMode
- type EpochTime = Int64
- type DevMajor = Int
- type DevMinor = Int
- type TypeCode = Char
- data Format
  - = V7Format
  - | UstarFormat
  - | GnuFormat
- simpleEntry :: tarPath -> GenEntryContent linkTarget -> GenEntry tarPath linkTarget
- fileEntry :: tarPath -> ByteString -> GenEntry tarPath linkTarget
- directoryEntry :: tarPath -> GenEntry tarPath linkTarget
- longLinkEntry :: FilePath -> GenEntry TarPath linkTarget
- longSymLinkEntry :: FilePath -> GenEntry TarPath linkTarget
- ordinaryFilePermissions :: Permissions
- executableFilePermissions :: Permissions
- directoryPermissions :: Permissions
- packFileEntry :: FilePath -> tarPath -> IO (GenEntry tarPath linkTarget)
- packDirectoryEntry :: FilePath -> tarPath -> IO (GenEntry tarPath linkTarget)
- packSymlinkEntry :: FilePath -> tarPath -> IO (GenEntry tarPath FilePath)
- getDirectoryContentsRecursive :: OsPath -> IO [(OsPath, FileType)]
- data TarPath
- toTarPath :: Bool -> FilePath -> Either String TarPath
- fromTarPath :: TarPath -> FilePath
- fromTarPathToPosixPath :: TarPath -> FilePath
- fromTarPathToWindowsPath :: TarPath -> FilePath
- data LinkTarget
- toLinkTarget :: FilePath -> Maybe LinkTarget
- fromLinkTarget :: LinkTarget -> FilePath
- fromLinkTargetToPosixPath :: LinkTarget -> FilePath
- fromLinkTargetToWindowsPath :: LinkTarget -> FilePath

# Tar entry and associated types

data GenEntry tarPath linkTarget #

Polymorphic tar archive entry. High-level interfaces commonly work with `GenEntry` `FilePath` `FilePath`, while low-level ones use `GenEntry` `TarPath` `LinkTarget`.

Since: 0.6.0.0

Constructors

Entry |
Fields entryTarPath :: !tarPath The path of the file or directory within the archive. entryContent :: !(GenEntryContent linkTarget) The real content of the entry. For `NormalFile` this includes the file data. An entry usually contains a `NormalFile` or a `Directory`. entryPermissions :: !Permissions File permissions (Unix style file mode). entryOwnership :: !Ownership The user and group to which this file belongs. entryTime :: !EpochTime The time the file was last modified. entryFormat :: !Format The tar format the archive is using.

#### Instances

Instances details

Bifunctor GenEntry # | Since: 0.6.4.0
Instance details Defined in Codec.Archive.Tar.Types Methods bimap :: (a -> b) -> (c -> d) -> GenEntry a c -> GenEntry b d # first :: (a -> b) -> GenEntry a c -> GenEntry b c # second :: (b -> c) -> GenEntry a b -> GenEntry a c #
Functor (GenEntry tarPath) # | Since: 0.6.4.0
Instance details Defined in Codec.Archive.Tar.Types Methods fmap :: (a -> b) -> GenEntry tarPath a -> GenEntry tarPath b # (<$) :: a -> GenEntry tarPath b -> GenEntry tarPath a #
(NFData tarPath, NFData linkTarget) => NFData (GenEntry tarPath linkTarget) # |
Instance details Defined in Codec.Archive.Tar.Types Methods rnf :: GenEntry tarPath linkTarget -> () #
(Show tarPath, Show linkTarget) => Show (GenEntry tarPath linkTarget) # |
Instance details Defined in Codec.Archive.Tar.Types Methods showsPrec :: Int -> GenEntry tarPath linkTarget -> ShowS # show :: GenEntry tarPath linkTarget -> String # showList :: [GenEntry tarPath linkTarget] -> ShowS #
(Eq tarPath, Eq linkTarget) => Eq (GenEntry tarPath linkTarget) # |
Instance details Defined in Codec.Archive.Tar.Types Methods (==) :: GenEntry tarPath linkTarget -> GenEntry tarPath linkTarget -> Bool # (/=) :: GenEntry tarPath linkTarget -> GenEntry tarPath linkTarget -> Bool #

type Entry = GenEntry TarPath LinkTarget #

Monomorphic tar archive entry, ready for serialization / deserialization.

entryPath :: GenEntry TarPath linkTarget -> FilePath #

Low-level function to get a native `FilePath` of the file or directory within the archive, not accounting for long names. It's likely that you want to apply `decodeLongNames` and use `entryTarPath` afterwards instead of `entryPath`.

data GenEntryContent linkTarget #

Polymorphic content of a tar archive entry. High-level interfaces commonly work with `GenEntryContent` `FilePath`, while low-level ones use `GenEntryContent` `LinkTarget`.

Portable archives should contain only `NormalFile` and `Directory`.

Since: 0.6.0.0

Constructors

NormalFile ByteString !FileSize |
Directory |
SymbolicLink !linkTarget |
HardLink !linkTarget |
CharacterDevice !DevMajor !DevMinor |
BlockDevice !DevMajor !DevMinor |
NamedPipe |
OtherEntryType !TypeCode ByteString !FileSize |

#### Instances

Instances details

Functor GenEntryContent # | Since: 0.6.4.0
Instance details Defined in Codec.Archive.Tar.Types Methods fmap :: (a -> b) -> GenEntryContent a -> GenEntryContent b # (<$) :: a -> GenEntryContent b -> GenEntryContent a #
NFData linkTarget => NFData (GenEntryContent linkTarget) # |
Instance details Defined in Codec.Archive.Tar.Types Methods rnf :: GenEntryContent linkTarget -> () #
Show linkTarget => Show (GenEntryContent linkTarget) # |
Instance details Defined in Codec.Archive.Tar.Types Methods showsPrec :: Int -> GenEntryContent linkTarget -> ShowS # show :: GenEntryContent linkTarget -> String # showList :: [GenEntryContent linkTarget] -> ShowS #
Eq linkTarget => Eq (GenEntryContent linkTarget) # |
Instance details Defined in Codec.Archive.Tar.Types Methods (==) :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> Bool # (/=) :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> Bool #
Ord linkTarget => Ord (GenEntryContent linkTarget) # |
Instance details Defined in Codec.Archive.Tar.Types Methods compare :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> Ordering # (<) :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> Bool # (<=) :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> Bool # (>) :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> Bool # (>=) :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> Bool # max :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> GenEntryContent linkTarget # min :: GenEntryContent linkTarget -> GenEntryContent linkTarget -> GenEntryContent linkTarget #

type EntryContent = GenEntryContent LinkTarget #

Monomorphic content of a tar archive entry, ready for serialization / deserialization.

data Ownership #

Ownership information for `GenEntry`.

Constructors

Ownership |
Fields ownerName :: String The owner user name. Should be set to `""` if unknown. Must not contain non-ASCII characters. groupName :: String The owner group name. Should be set to `""` if unknown. Must not contain non-ASCII characters. ownerId :: !Int Numeric owner user id. Should be set to `0` if unknown. groupId :: !Int Numeric owner group id. Should be set to `0` if unknown.

#### Instances

Instances details

NFData Ownership # |
Instance details Defined in Codec.Archive.Tar.Types Methods rnf :: Ownership -> () #
Show Ownership # |
Instance details Defined in Codec.Archive.Tar.Types Methods showsPrec :: Int -> Ownership -> ShowS # show :: Ownership -> String # showList :: [Ownership] -> ShowS #
Eq Ownership # |
Instance details Defined in Codec.Archive.Tar.Types Methods (==) :: Ownership -> Ownership -> Bool # (/=) :: Ownership -> Ownership -> Bool #
Ord Ownership # |
Instance details Defined in Codec.Archive.Tar.Types Methods compare :: Ownership -> Ownership -> Ordering # (<) :: Ownership -> Ownership -> Bool # (<=) :: Ownership -> Ownership -> Bool # (>) :: Ownership -> Ownership -> Bool # (>=) :: Ownership -> Ownership -> Bool # max :: Ownership -> Ownership -> Ownership # min :: Ownership -> Ownership -> Ownership #

type FileSize = Int64 #

File size in bytes.

type Permissions = FileMode #

Permissions information for `GenEntry`.

type EpochTime = Int64 #

The number of seconds since the UNIX epoch.

type DevMajor = Int #

Major device number.

type DevMinor = Int #

Minor device number.

type TypeCode = Char #

User-defined tar format expansion.

data Format #

There have been a number of extensions to the tar file format over the years. They all share the basic entry fields and put more meta-data in different extended headers.

Constructors

V7Format | This is the classic Unix V7 tar format. It does not support owner and group names, just numeric Ids. It also does not support device numbers.
UstarFormat | The "USTAR" format is an extension of the classic V7 format. It was later standardised by POSIX. It has some restrictions but is the most portable format.
GnuFormat | The GNU tar implementation also extends the classic V7 format, though in a slightly different way from the USTAR format. This is the only format supporting long file names.

#### Instances

Instances details

Show Format # |
Instance details Defined in Codec.Archive.Tar.Types Methods showsPrec :: Int -> Format -> ShowS # show :: Format -> String # showList :: [Format] -> ShowS #
Eq Format # |
Instance details Defined in Codec.Archive.Tar.Types Methods (==) :: Format -> Format -> Bool # (/=) :: Format -> Format -> Bool #
Ord Format # |
Instance details Defined in Codec.Archive.Tar.Types Methods compare :: Format -> Format -> Ordering # (<) :: Format -> Format -> Bool # (<=) :: Format -> Format -> Bool # (>) :: Format -> Format -> Bool # (>=) :: Format -> Format -> Bool # max :: Format -> Format -> Format # min :: Format -> Format -> Format #

# Constructing simple entry values

simpleEntry :: tarPath -> GenEntryContent linkTarget -> GenEntry tarPath linkTarget #

An entry with all default values except for the file name and type. It uses the portable USTAR/POSIX format (see `UstarFormat`).

You can use this as a basis and override specific fields, eg:

    (emptyEntry name HardLink) { linkTarget = target }

fileEntry :: tarPath -> ByteString -> GenEntry tarPath linkTarget #

A tar entry for a file.

Entry fields such as file permissions and ownership have default values.

You can use this as a basis and override specific fields. For example if you need an executable file you could use:

    (fileEntry name content) { fileMode = executableFileMode }

directoryEntry :: tarPath -> GenEntry tarPath linkTarget #

A tar entry for a directory.

Entry fields such as file permissions and ownership have default values.

longLinkEntry :: FilePath -> GenEntry TarPath linkTarget #

GNU extension to store a filepath too long to fit into `entryTarPath` as `OtherEntryType` `'L'` with the full filepath as `entryContent`. The next entry must contain the actual data with truncated `entryTarPath`.

See What exactly is the GNU tar ..@LongLink "trick"?

Since: 0.6.0.0

longSymLinkEntry :: FilePath -> GenEntry TarPath linkTarget #

GNU extension to store a link target too long to fit into `entryTarPath` as `OtherEntryType` `'K'` with the full filepath as `entryContent`. The next entry must contain the actual data with truncated `entryTarPath`.

Since: 0.6.0.0

# Standard file permissions

For maximum portability when constructing archives use only these file permissions.

ordinaryFilePermissions :: Permissions #

`rw-r--r--` for normal files

executableFilePermissions :: Permissions #

`rwxr-xr-x` for executable files

directoryPermissions :: Permissions #

`rwxr-xr-x` for directories

# Constructing entries from disk files

packFileEntry #

Arguments

:: FilePath | Full path to find the file on the local disk
-> tarPath | Path to use for the tar `GenEntry` in the archive
-> IO (GenEntry tarPath linkTarget) |

Construct a tar entry based on a local file.

This sets the entry size, the data contained in the file and the file's modification time. If the file is executable then that information is also preserved. File ownership and detailed permissions are not preserved.

- The file contents is read lazily.

packDirectoryEntry #

Arguments

:: FilePath | Full path to find the file on the local disk
-> tarPath | Path to use for the tar `GenEntry` in the archive
-> IO (GenEntry tarPath linkTarget) |

Construct a tar entry based on a local directory (but not its contents).

The only attribute of the directory that is used is its modification time. Directory ownership and detailed permissions are not preserved.

packSymlinkEntry #

Arguments

:: FilePath | Full path to find the file on the local disk
-> tarPath | Path to use for the tar `GenEntry` in the archive
-> IO (GenEntry tarPath FilePath) |

Construct a tar entry based on a local symlink.

Since: 0.6.0.0

getDirectoryContentsRecursive :: OsPath -> IO [(OsPath, FileType)] #

Recursively list all the files and directories in a directory and all subdirectories.

The directory structure is traversed depth-first.

The result is generated lazily so is not well defined if the source directory structure changes before the list is fully consumed.

Symlinks within directory structure may cause result to be infinitely long.

# TarPath type

data TarPath #

The classic tar format allowed just 100 characters for the file name. The USTAR format extended this with an extra 155 characters, however it uses a complex method of splitting the name between the two sections.

Instead of just putting any overflow into the extended area, it uses the extended area as a prefix. The aggravating insane bit however is that the prefix (if any) must only contain a directory prefix. That is the split between the two areas must be on a directory separator boundary. So there is no simple calculation to work out if a file name is too long. Instead we have to try to find a valid split that makes the name fit in the two areas.

The rationale presumably was to make it a bit more compatible with old tar programs that only understand the classic format. A classic tar would be able to extract the file name and possibly some dir prefix, but not the full dir prefix. So the files would end up in the wrong place, but that's probably better than ending up with the wrong names too.

So it's understandable but rather annoying.

- Tar paths use Posix format (ie `'/'` directory separators), irrespective of the local path conventions.
- The directory separator between the prefix and name is not stored.

#### Instances

Instances details

NFData TarPath # |
Instance details Defined in Codec.Archive.Tar.Types Methods rnf :: TarPath -> () #
Show TarPath # |
Instance details Defined in Codec.Archive.Tar.Types Methods showsPrec :: Int -> TarPath -> ShowS # show :: TarPath -> String # showList :: [TarPath] -> ShowS #
Eq TarPath # |
Instance details Defined in Codec.Archive.Tar.Types Methods (==) :: TarPath -> TarPath -> Bool # (/=) :: TarPath -> TarPath -> Bool #
Ord TarPath # |
Instance details Defined in Codec.Archive.Tar.Types Methods compare :: TarPath -> TarPath -> Ordering # (<) :: TarPath -> TarPath -> Bool # (<=) :: TarPath -> TarPath -> Bool # (>) :: TarPath -> TarPath -> Bool # (>=) :: TarPath -> TarPath -> Bool # max :: TarPath -> TarPath -> TarPath # min :: TarPath -> TarPath -> TarPath #

toTarPath #

Arguments

:: Bool | Is the path for a directory? This is needed because for directories a `TarPath` must always use a trailing `/`.
-> FilePath |
-> Either String TarPath |

Convert a native `FilePath` to a `TarPath`.

The conversion may fail if the `FilePath` is empty or too long.

fromTarPath :: TarPath -> FilePath #

Convert a `TarPath` to a native `FilePath`.

The native `FilePath` will use the native directory separator but it is not otherwise checked for validity or sanity. In particular:

- The tar path may be invalid as a native path, eg the file name `"nul"` is not valid on Windows.
- The tar path may be an absolute path or may contain `".."` components. For security reasons this should not usually be allowed, but it is your responsibility to check for these conditions (e.g., using `checkEntrySecurity`).

fromTarPathToPosixPath :: TarPath -> FilePath #

Convert a `TarPath` to a Unix/Posix `FilePath`.

The difference compared to `fromTarPath` is that it always returns a Unix style path irrespective of the current operating system.

This is useful to check how a `TarPath` would be interpreted on a specific operating system, eg to perform portability checks.

fromTarPathToWindowsPath :: TarPath -> FilePath #

Convert a `TarPath` to a Windows `FilePath`.

The only difference compared to `fromTarPath` is that it always returns a Windows style path irrespective of the current operating system.

This is useful to check how a `TarPath` would be interpreted on a specific operating system, eg to perform portability checks.

# LinkTarget type

data LinkTarget #

The tar format allows just 100 ASCII characters for the `SymbolicLink` and `HardLink` entry types.

#### Instances

Instances details

NFData LinkTarget # |
Instance details Defined in Codec.Archive.Tar.Types Methods rnf :: LinkTarget -> () #
Show LinkTarget # |
Instance details Defined in Codec.Archive.Tar.Types Methods showsPrec :: Int -> LinkTarget -> ShowS # show :: LinkTarget -> String # showList :: [LinkTarget] -> ShowS #
Eq LinkTarget # |
Instance details Defined in Codec.Archive.Tar.Types Methods (==) :: LinkTarget -> LinkTarget -> Bool # (/=) :: LinkTarget -> LinkTarget -> Bool #
Ord LinkTarget # |
Instance details Defined in Codec.Archive.Tar.Types Methods compare :: LinkTarget -> LinkTarget -> Ordering # (<) :: LinkTarget -> LinkTarget -> Bool # (<=) :: LinkTarget -> LinkTarget -> Bool # (>) :: LinkTarget -> LinkTarget -> Bool # (>=) :: LinkTarget -> LinkTarget -> Bool # max :: LinkTarget -> LinkTarget -> LinkTarget # min :: LinkTarget -> LinkTarget -> LinkTarget #

toLinkTarget :: FilePath -> Maybe LinkTarget #

Convert a native `FilePath` to a tar `LinkTarget`. string is longer than 100 characters or if it contains non-portable characters.

fromLinkTarget :: LinkTarget -> FilePath #

Convert a tar `LinkTarget` to a native `FilePath`.

fromLinkTargetToPosixPath :: LinkTarget -> FilePath #

Convert a tar `LinkTarget` to a Unix/POSIX `FilePath` (`'/'` path separators).

fromLinkTargetToWindowsPath :: LinkTarget -> FilePath #

Convert a tar `LinkTarget` to a Windows `FilePath` (`'\\'` path separators).