2 * Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
4 * Licensed under the OpenSSL license (the "License"). You may not use
5 * this file except in compliance with the License. You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
10 #include "internal/cryptlib.h"
11 #include <openssl/rand.h>
14 #if defined(OPENSSL_SYS_WINDOWS) || defined(OPENSSL_SYS_WIN32)
17 # define _WIN32_WINNT 0x0400
19 # include <wincrypt.h>
22 * Intel hardware RNG CSP -- available from
23 * http://developer.intel.com/design/security/rng/redist_license.htm
25 # define PROV_INTEL_SEC 22
26 # define INTEL_DEF_PROV L"Intel Hardware Cryptographic Service Provider"
28 static void readtimer(void);
33 HCRYPTPROV hProvider = 0;
37 /* poll the CryptoAPI PRNG */
38 /* The CryptoAPI returns sizeof(buf) bytes of randomness */
39 if (CryptAcquireContextW(&hProvider, NULL, NULL, PROV_RSA_FULL, CRYPT_VERIFYCONTEXT | CRYPT_SILENT)) {
40 if (CryptGenRandom(hProvider, sizeof(buf), buf) != 0) {
41 RAND_add(buf, sizeof(buf), sizeof(buf));
43 CryptReleaseContext(hProvider, 0);
46 /* poll the Pentium PRG with CryptoAPI */
47 if (CryptAcquireContextW(&hProvider, NULL, INTEL_DEF_PROV, PROV_INTEL_SEC, CRYPT_VERIFYCONTEXT | CRYPT_SILENT)) {
48 if (CryptGenRandom(hProvider, sizeof(buf), buf) != 0) {
49 RAND_add(buf, sizeof(buf), sizeof(buf));
51 CryptReleaseContext(hProvider, 0);
57 /* memory usage statistics */
58 GlobalMemoryStatus(&mst);
59 RAND_add(&mst, sizeof(mst), 1);
62 w = GetCurrentProcessId();
63 RAND_add(&w, sizeof(w), 1);
68 #if OPENSSL_API_COMPAT < 0x00101000L
69 int RAND_event(UINT iMsg, WPARAM wParam, LPARAM lParam)
75 void RAND_screen(void)
81 /* feed timing information to the PRNG */
82 static void readtimer(void)
86 static int have_perfc = 1;
87 # if defined(_MSC_VER) && defined(_M_X86)
88 static int have_tsc = 1;
94 _emit 0x0f _emit 0x31 mov cyclecount, eax}
95 RAND_add(&cyclecount, sizeof(cyclecount), 1);
97 __except(EXCEPTION_EXECUTE_HANDLER) {
106 if (QueryPerformanceCounter(&l) == 0)
109 RAND_add(&l, sizeof(l), 0);
112 if (!have_tsc && !have_perfc) {
114 RAND_add(&w, sizeof(w), 0);