mono/metadata/rand.c

   1 /**
   2  * \file
   3  * System.Security.Cryptography.RNGCryptoServiceProvider support
   4  *
   5  * Authors:
   6  *      Mark Crichton (crichton@gimp.org)
   7  *      Patrik Torstensson (p@rxc.se)
   8  *      Sebastien Pouliot (sebastien@ximian.com)
   9  *
  10  * Copyright 2001-2003 Ximian, Inc (http://www.ximian.com)
  11  * Copyright 2004-2009 Novell, Inc (http://www.novell.com)
  12  * Licensed under the MIT license. See LICENSE file in the project root for full license information.
  13  */
  14
  15 #include <glib.h>
  16
  17 #include "object.h"
  18 #include "object-internals.h"
  19 #include "rand.h"
  20 #include "utils/mono-rand.h"
  21
  22 MonoBoolean
  23 ves_icall_System_Security_Cryptography_RNGCryptoServiceProvider_RngOpen (void)
  24 {
  25         return (MonoBoolean) mono_rand_open ();
  26 }
  27
  28 gpointer
  29 ves_icall_System_Security_Cryptography_RNGCryptoServiceProvider_RngInitialize (MonoArray *seed)
  30 {
  31
  32         return mono_rand_init (seed ? mono_array_addr (seed, guchar, 0) : NULL, seed ? mono_array_length (seed) : 0);
  33 }
  34
  35 gpointer
  36 ves_icall_System_Security_Cryptography_RNGCryptoServiceProvider_RngGetBytes (gpointer handle, MonoArray *arry)
  37 {
  38         MonoError error;
  39         g_assert (arry);
  40         mono_rand_try_get_bytes (&handle, mono_array_addr (arry, guchar, 0), mono_array_length (arry), &error);
  41         mono_error_set_pending_exception (&error);
  42         return handle;
  43 }
  44
  45 void
  46 ves_icall_System_Security_Cryptography_RNGCryptoServiceProvider_RngClose (gpointer handle)
  47 {
  48         mono_rand_close (handle);
  49 }