#pragma once

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


namespace nix {


typedef enum { htUnknown, htMD5, htSHA1, htSHA256, htSHA512 } HashType;


const int md5HashSize = 16;
const int sha1HashSize = 20;
const int sha256HashSize = 32;
const int sha512HashSize = 64;

extern const string base32Chars;


struct Hash
{
    static const unsigned int maxHashSize = 64;
    unsigned int hashSize;
    unsigned char hash[maxHashSize];

    HashType type;

    /* Create an unusable hash object. */
    Hash();

    /* Create a zero-filled hash object. */
    Hash(HashType type);

    /* Check whether two hash are equal. */
    bool operator == (const Hash & h2) const;

    /* Check whether two hash are not equal. */
    bool operator != (const Hash & h2) const;

    /* For sorting. */
    bool operator < (const Hash & h) const;
};


/* Convert a hash to a hexadecimal representation. */
string printHash(const Hash & hash);

/* Parse a hexadecimal representation of a hash code. */
Hash parseHash(HashType ht, const string & s);

/* Returns the length of a base-32 hash representation. */
unsigned int hashLength32(const Hash & hash);

/* Convert a hash to a base-32 representation. */
string printHash32(const Hash & hash);

/* Print a hash in base-16 if it's MD5, or base-32 otherwise. */
string printHash16or32(const Hash & hash);

/* Parse a base-32 representation of a hash code. */
Hash parseHash32(HashType ht, const string & s);

/* Parse a base-16 or base-32 representation of a hash code. */
Hash parseHash16or32(HashType ht, const string & s);

/* Verify that the given string is a valid hash code. */
bool isHash(const string & s);

/* Compute the hash of the given string. */
Hash hashString(HashType ht, const string & s);

/* Compute the hash of the given file. */
Hash hashFile(HashType ht, const Path & path);

/* Compute the hash of the given path.  The hash is defined as
   (essentially) hashString(ht, dumpPath(path)). */
struct PathFilter;
extern PathFilter defaultPathFilter;
typedef std::pair<Hash, unsigned long long> HashResult;
HashResult hashPath(HashType ht, const Path & path,
    PathFilter & filter = defaultPathFilter);

/* Compress a hash to the specified number of bytes by cyclically
   XORing bytes together. */
Hash compressHash(const Hash & hash, unsigned int newSize);

/* Parse a string representing a hash type. */
HashType parseHashType(const string & s);

/* And the reverse. */
string printHashType(HashType ht);


struct Ctx;

class HashSink : public BufferedSink
{
private:
    HashType ht;
    Ctx * ctx;
    unsigned long long bytes;

public:
    HashSink(HashType ht);
    HashSink(const HashSink & h);
    ~HashSink();
    void write(const unsigned char * data, size_t len);
    HashResult finish();
    HashResult currentHash();
};


}
n></td><td>Andy Wingo</td></tr>
<tr><td><span title='2017-05-16 14:41:01 +0200'>2017-05-16</span></td><td><a href='/guix/commit/gnu/tests.scm?id=b09a8da4a2e50845a297e041762f3ff9e649c047'>bootloader: Add extlinux support.</a><span class='msg-avail'>...</span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2017-05-04 18:05:05 +0200'>2017-05-04</span></td><td><a href='/guix/commit/gnu/tests.scm?id=67d84d6335ae84ac7c217061570e6b968060073c'>tests: Use 'fold-module-public-variables' for discovery.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-05-03 23:50:15 +0200'>2017-05-03</span></td><td><a href='/guix/commit/gnu/tests.scm?id=cd903ef7871170d3c4eced45418459d293ef48a7'>Add (guix discovery).</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-04-01 00:45:18 +0200'>2017-04-01</span></td><td><a href='/guix/commit/gnu/tests.scm?id=892d9089a88abaa2ef1127f16308d03f4f08a4ce'>tests: Introduce 'simple-operating-system' and use it.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2016-07-12 22:47:08 +0200'>2016-07-12</span></td><td><a href='/guix/commit/gnu/tests.scm?id=a91c3fc727ba90d8c9b91f67fb672da2e6b877ad'>services: &lt;shepherd-service&gt; no longer has an 'imported-modules' field.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2016-06-27 21:41:38 +0200'>2016-06-27</span></td><td><a href='/guix/commit/gnu/tests.scm?id=037f9e07cd03d6894a6b5fc9a252c34d3b163962'>tests: 'marionette-service-type' nows takes a &lt;marionette-configuration&gt;.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2016-06-20 23:50:46 +0200'>2016-06-20</span></td><td><a href='/guix/commit/gnu/tests.scm?id=98b65b5ff6b1dea0ad58b0f47dd163c32d0cbf6e'>tests: Add a mechanism to describe and discover system tests.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2016-06-20 23:50:46 +0200'>2016-06-20</span></td><td><a href='/guix/commit/gnu/tests.scm?id=94b4274d0dc5768bac255980c7e785bd3dff261f'>tests: Add system installation test.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2016-06-20 00:52:53 +0200'>2016-06-20</span></td><td><a href='/guix/commit/gnu/tests.scm?id=ca7a68ebeb5039883cd43b6165ba1915b0974a41'>tests: Fix list of exports in (gnu tests).</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2016-05-04 23:35:55 +0200'>2016-05-04</span></td><td><a href='/guix/commit/gnu/tests.scm?id=957afcae3cded622f4260385f69b40dbdcaade9f'>Add (gnu tests) and (gnu build marionette).</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>