#pragma once

#include "types.hh"
#include "serialise.hh"


namespace nix {


/* dumpPath creates a Nix archive of the specified path.  The format
   is as follows:

   IF path points to a REGULAR FILE:
     dump(path) = attrs(
       [ ("type", "regular")
       , ("contents", contents(path))
       ])

   IF path points to a DIRECTORY:
     dump(path) = attrs(
       [ ("type", "directory")
       , ("entries", concat(map(f, sort(entries(path)))))
       ])
       where f(fn) = attrs(
         [ ("name", fn)
         , ("file", dump(path + "/" + fn))
         ])

   where:

     attrs(as) = concat(map(attr, as)) + encN(0)
     attrs((a, b)) = encS(a) + encS(b)

     encS(s) = encN(len(s)) + s + (padding until next 64-bit boundary)

     encN(n) = 64-bit little-endian encoding of n.

     contents(path) = the contents of a regular file.

     sort(strings) = lexicographic sort by 8-bit value (strcmp).

     entries(path) = the entries of a directory, without `.' and
     `..'.

     `+' denotes string concatenation. */

struct PathFilter
{
    virtual ~PathFilter() { }
    virtual bool operator () (const Path & path) { return true; }
};

extern PathFilter defaultPathFilter;

void dumpPath(const Path & path, Sink & sink,
    PathFilter & filter = defaultPathFilter);

struct ParseSink
{
    virtual void createDirectory(const Path & path) { };

    virtual void createRegularFile(const Path & path) { };
    virtual void isExecutable() { };
    virtual void preallocateContents(unsigned long long size) { };
    virtual void receiveContents(unsigned char * data, unsigned int len) { };

    virtual void createSymlink(const Path & path, const string & target) { };
};

void parseDump(ParseSink & sink, Source & source);

void restorePath(const Path & path, Source & source);

}
tion>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=1b858b122a11fd7a33a1c35fd6b341d27b03375c'>root</a>/<a href='/guix/log/gnu?id=1b858b122a11fd7a33a1c35fd6b341d27b03375c'>gnu</a>/<a href='/guix/log/gnu/packages?id=1b858b122a11fd7a33a1c35fd6b341d27b03375c'>packages</a>/<a href='/guix/log/gnu/packages/bdw-gc.scm?id=1b858b122a11fd7a33a1c35fd6b341d27b03375c'>bdw-gc.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/bdw-gc.scm?id=1b858b122a11fd7a33a1c35fd6b341d27b03375c&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2021-07-14 15:38:03 +0200'>2021-07-14</span></td><td><a href='/guix/commit/gnu/packages/bdw-gc.scm?id=637a1e7dcce4d1a2c4f2f9c478df4a640ae1f230'>utils: Define 'target-hurd?' predicate.</a><span class='msg-avail'>...<span class='msg-tooltip'>It behaves similarily to the other target-...? procedures.
The usage of hurd-triplet? / target-hurd? in libgc appears
incorrect to me, as (%current-system) is normally never false.

* gnu/packages/hurd.scm (hurd-triplet?): Move to ...
* guix/util.scm (target-hurd?): ... here, let its argument
  default to (%current-target-system) or (%current-system),
  and write a docstring.
* gnu/packages/hurd.scm
  (hurd-target?, hurd-system?): Use target-hurd? instead of
  hurd-triplet?.
* gnu/packages/bdw-gc.scm (libgc): Likewise.
* gnu/packages/cross-base.scm
  (cross-libc)[arguments]&lt;#:configure-flags&gt;: Likewise.
  (cross-libc)[arguments]&lt;#:phases&gt;: Likewise.
  (cross-libc)[arguments]&lt;#:native-inputs&gt;: Likewise.
* gnu/packages/make-boostrap.scm
  (%glibc-stripped)[inputs]: Likewise.

Signed-off-by: Mathieu Othacehe &lt;othacehe@gnu.org&gt;
</span></span></td><td>Maxime Devos</td></tr>
<tr><td><span title='2021-05-16 00:23:20 +0200'>2021-05-16</span></td><td><a href='/guix/commit/gnu/packages/bdw-gc.scm?id=20c122a4b0798a87c44edbc37229f9c38e44386c'>gnu: libgc: Remove 'libgc/disable-munmap'.</a><span class='msg-avail'>...<span class='msg-tooltip'>This variant is already the default on this branch.

* gnu/packages/bdw-gc.scm (libgc/disable-munmap): Remove.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-05-15 22:55:24 +0200'>2021-05-15</span></td><td><a href='/guix/commit/gnu/packages/bdw-gc.scm?id=25487c3fe6a41dd62f6e53f256392224a3be2a08'>Merge branch 'master' into core-updates</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-05-13 00:19:58 +0200'>2021-05-13</span></td><td><a href='/guix/commit/gnu/packages/bdw-gc.scm?id=3320b70f4dbb9bd8d4f782975111f32d0d045edb'>gnu: libgc: Add variant with '--disable-munmap'.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/bdw-gc.scm (libgc/disable-munmap): New variable.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-05-08 11:48:01 +0200'>2021-05-08</span></td><td><a href='/guix/commit/gnu/packages/bdw-gc.scm?id=a605ef3ce9dbd6b79dd9322f89d9facaf875b487'>gnu: libgc@8: Build with '--disable-munmap'.</a><span class='msg-avail'>...<span class='msg-tooltip'>Partially fixes &lt;https://bugs.gnu.org/40525&gt;.

* gnu/packages/bdw-gc.scm (libgc)[arguments]: Configure with
'--disable-munmap'.
* gnu/packages/guile.scm (guile-3.0/libgc-7): Remove.
* gnu/packages/ci.scm (cuirass)[inputs]: Refer to GUILE-3.0-LATEST
instead of GUILE-3.0/LIBGC-7.
* guix/self.scm (specification-&gt;package): Likewise.
</span></span></td><td>Ludovic Courtès</td></tr>