~ubuntu-branches/ubuntu/quantal/gnutls28/quantal

« back to all changes in this revision

Viewing changes to lib/gcrypt/rnd.c

  • Committer: Package Import Robot
  • Author(s): Andreas Metzler
  • Date: 2011-11-12 17:05:25 UTC
  • mfrom: (1.1.6)
  • Revision ID: package-import@ubuntu.com-20111112170525-kja1ffsqi68s1kwk
Tags: 3.0.8-1
* Build gnutls with --disable-largefile on armel, armhf and mipsel to fix
  guile related FTBFS on these architectures.
  See http://lists.gnu.org/archive/html/gnutls-devel/2011-10/msg00075.html
* New upstream version.
  + Bump shlibs.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/*
2
 
 * Copyright (C) 2008-2011 Free Software Foundation, Inc.
3
 
 *
4
 
 * Author: Nikos Mavrogiannopoulos
5
 
 *
6
 
 * This file is part of GnuTLS.
7
 
 *
8
 
 * The GnuTLS 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 3 of
11
 
 * the License, or (at your option) any later version.
12
 
 *
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.
17
 
 *
18
 
 * You should have received a copy of the GNU Lesser General Public License
19
 
 * along with this program.  If not, see <http://www.gnu.org/licenses/>
20
 
 *
21
 
 */
22
 
 
23
 
/* Here is the libgcrypt random generator layer.
24
 
 */
25
 
 
26
 
#include <gnutls_int.h>
27
 
#include <gnutls_errors.h>
28
 
#include <gnutls_num.h>
29
 
#include <gnutls_mpi.h>
30
 
#include <gcrypt.h>
31
 
 
32
 
static int
33
 
wrap_gcry_rnd_init (void **ctx)
34
 
{
35
 
  char c;
36
 
 
37
 
  gcry_create_nonce (&c, 1);
38
 
  gcry_randomize (&c, 1, GCRY_STRONG_RANDOM);
39
 
 
40
 
  return 0;
41
 
}
42
 
 
43
 
static int
44
 
wrap_gcry_rnd (void *ctx, int level, void *data, size_t datasize)
45
 
{
46
 
  if (level == GNUTLS_RND_NONCE)
47
 
    gcry_create_nonce (data, datasize);
48
 
  else
49
 
    gcry_randomize (data, datasize, level);
50
 
 
51
 
  return 0;
52
 
}
53
 
 
54
 
int crypto_rnd_prio = INT_MAX;
55
 
 
56
 
gnutls_crypto_rnd_st _gnutls_rnd_ops = {
57
 
  .init = wrap_gcry_rnd_init,
58
 
  .deinit = NULL,
59
 
  .rnd = wrap_gcry_rnd,
60
 
};