Export new ABIs. Doc fixes for new APIs.
[gnutls.git] / lib / rnd-libgcrypt.c
blob3e75100aed7016e7165ef38cae097b52f1729b17
1 /*
2 * Copyright (C) 2008, 2010 Free Software Foundation, Inc.
4 * Author: Nikos Mavrogiannopoulos
6 * This file is part of GNUTLS.
8 * The GNUTLS library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public License
10 * as published by the Free Software Foundation; either version 2.1 of
11 * the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful, but
14 * WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
21 * USA
25 /* Here is the libgcrypt random generator layer.
28 #include <gnutls_int.h>
29 #include <gnutls_errors.h>
30 #include <gnutls_num.h>
31 #include <gnutls_mpi.h>
32 #include <gcrypt.h>
34 static int
35 wrap_gcry_rnd_init (void **ctx)
37 char c;
39 gcry_create_nonce (&c, 1);
40 gcry_randomize (&c, 1, GCRY_STRONG_RANDOM);
42 return 0;
45 static int
46 wrap_gcry_rnd (void *ctx, int level, void *data, size_t datasize)
48 if (level == GNUTLS_RND_NONCE)
49 gcry_create_nonce (data, datasize);
50 else
51 gcry_randomize (data, datasize, level);
53 return 0;
56 int crypto_rnd_prio = INT_MAX;
58 gnutls_crypto_rnd_st _gnutls_rnd_ops = {
59 .init = wrap_gcry_rnd_init,
60 .deinit = NULL,
61 .rnd = wrap_gcry_rnd,