/* GNU Guix --- Functional package management for GNU
   Copyright (C) 2012, 2013  Ludovic Courtès <ludo@gnu.org>

   This file is part of GNU Guix.

   GNU Guix is free software; you can redistribute it and/or modify it
   under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3 of the License, or (at
   your option) any later version.

   GNU Guix is distributed in the hope that it will be useful, but
   WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.  */

/* An OpenSSL-like interface to GNU libgcrypt cryptographic hash
   functions.  */

#pragma once
#include <gcrypt.h>
#include <unistd.h>

struct guix_hash_context
{
  /* This copy constructor is needed in 'HashSink::currentHash()' where we
     expect the copy of a 'Ctx' object to yield a truly different context.  */
  guix_hash_context (guix_hash_context &ref)
  {
    if (ref.md_handle == NULL)
      md_handle = NULL;
    else
      gcry_md_copy (&md_handle, ref.md_handle);
  }

  /* Make sure 'md_handle' is always initialized.  */
  guix_hash_context (): md_handle (NULL) { };

  gcry_md_hd_t md_handle;
};

extern "C" {
extern void guix_hash_init (struct guix_hash_context *ctx, int algo);
extern void guix_hash_update (struct guix_hash_context *ctx, const void *buffer,
			      size_t len);
extern void guix_hash_final (void *resbuf, struct guix_hash_context *ctx,
			     int algo);
}
4622df8972f80f9a5bfaf06dd'/><select name='qt'>
<option value='grep'>log msg</option>
<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=1380be3c73bb8734622df8972f80f9a5bfaf06dd'>root</a>/<a href='/guix/log/gnu?id=1380be3c73bb8734622df8972f80f9a5bfaf06dd'>gnu</a>/<a href='/guix/log/gnu/packages?id=1380be3c73bb8734622df8972f80f9a5bfaf06dd'>packages</a>/<a href='/guix/log/gnu/packages/gd.scm?id=1380be3c73bb8734622df8972f80f9a5bfaf06dd'>gd.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/gd.scm?id=1380be3c73bb8734622df8972f80f9a5bfaf06dd&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2019-03-23 23:16:55 +0100'>2019-03-23</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=8c14f7f8a7ab0722bf4c9f92fd28ae85514d564f'>Merge branch 'staging' into core-updates</a></td><td>Marius Bakke</td></tr>
<tr><td><span title='2019-03-14 23:51:49 +0100'>2019-03-14</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=832e7be42d4c9ae4abada36a6d61473da8574ec1'>gnu: perl-gd-securityimage: Update to 1.75.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2019-03-14 23:51:48 +0100'>2019-03-14</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=06900d90e7177f98d325e3e34491986b441e5980'>gnu: perl-gd: Update to 2.71.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2019-02-23 20:44:35 +0100'>2019-02-23</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=db91596a78cf463056b7304b4fc9e2b19ba042fb'>gnu: gd: Incorporate grafted changes.</a><span class='msg-avail'>...</span></td><td>Marius Bakke</td></tr>
<tr><td><span title='2019-02-19 15:47:35 -0500'>2019-02-19</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=c12b23469576fb1c3920120ef06b696daa30b855'>gnu: libgd: Fix CVE-2019-{6977,6978}.</a><span class='msg-avail'>...</span></td><td>Leo Famulari</td></tr>
<tr><td><span title='2018-11-14 23:44:02 -0500'>2018-11-14</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=4851af9ebe3949354a2d22ca932bbecb072c5024'>gnu: perl: Return #t from all phases.</a><span class='msg-avail'>...</span></td><td>Mark H Weaver</td></tr>
<tr><td><span title='2018-09-10 01:39:01 +0200'>2018-09-10</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=68a08dfbe53301fb5c15470b52185e0578b5293e'>gnu: libgd: Incorporate grafted changes.</a><span class='msg-avail'>...</span></td><td>Marius Bakke</td></tr>
<tr><td><span title='2018-09-09 18:13:19 -0400'>2018-09-09</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=ced98c7e89a22c551dd23acd7a1b4f861958d876'>gnu: libgd: Fix CVE-2018-{5711,1000222}.</a><span class='msg-avail'>...</span></td><td>Leo Famulari</td></tr>
<tr><td><span title='2018-08-30 04:42:51 +0200'>2018-08-30</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=ad3306f62fc607fe553fca7c4b01f87a46499e03'>gnu: perl-gd: Update to 2.69.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2018-08-11 17:22:31 +0200'>2018-08-11</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=9aba9b127840a116c806a2cbac901cf8077abcd0'>Migrate search.cpan.org home pages to metacpan.org.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2018-02-27 16:49:58 +0100'>2018-02-27</span></td><td><a href='/guix/commit/gnu/packages/gd.scm?id=d5d7d26df7c424a9cffee27f1210b59ef8682d5c'>gnu: perl-gd: Update to 2.68.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>