See ChangeLog: Sat Jan 16 09:27:30 CET 1999 Werner Koch
[libgcrypt.git] / cipher / random.c
index 6f8a20a..b0bc832 100644 (file)
@@ -122,13 +122,9 @@ initialize()
   #elif USE_RNDUNIX
     rndunix_constructor();
   #elif USE_RNDW32
-    rndw32_constructor();
   #elif USE_RNDOS2
-    rndos2_constructor();
   #elif USE_RNDATARI
-    rndatari_constructor();
   #elif USE_RNDMVS
-    rndmvs_constructor();
   #endif
 }
 
@@ -166,6 +162,13 @@ randomize_buffer( byte *buffer, size_t length, int level )
 }
 
 
+int
+random_is_faked()
+{
+    if( !is_initialized )
+       initialize();
+    return faked_rng || quick_test;
+}
 
 /****************
  * Return a pointer to a randomized buffer of level 0 and LENGTH bits
@@ -381,9 +384,6 @@ read_random_source( int requester, size_t length, int level )
 {
     static int (*fnc)(void (*)(const void*, size_t, int), int,
                                                    size_t, int) = NULL;
-    int nbytes;
-    int goodness;
-
     if( !fnc ) {
        if( !is_initialized )
            initialize();