+ while(outlen) {
+ size_t len = read(random_fd, out, outlen);
+
+ if(len <= 0) {
+ if(errno == EAGAIN || errno == EINTR) {
+ continue;
+ }
+
+ fprintf(stderr, "Could not read random numbers: %s\n", strerror(errno));
+ abort();
+ }
+
+ out += len;
+ outlen -= len;
+ }
+}
+
+#else
+
+#include <wincrypt.h>
+HCRYPTPROV prov;
+
+void random_init(void) {
+ if(!CryptAcquireContext(&prov, NULL, NULL, PROV_RSA_FULL, CRYPT_VERIFYCONTEXT)) {
+ fprintf(stderr, "CryptAcquireContext() failed!\n");
+ abort();
+ }
+}
+
+void random_exit(void) {
+ CryptReleaseContext(prov, 0);
+}
+
+void randomize(void *out, size_t outlen) {
+ if(!CryptGenRandom(prov, outlen, out)) {
+ fprintf(stderr, "CryptGenRandom() failed\n");
+ abort();
+ }
+}
+
+#endif
+
+void crypto_init(void) {
+ random_init();
+
+ ENGINE_load_builtin_engines();
+ ENGINE_register_all_complete();
+
+ ERR_load_crypto_strings();
+ OpenSSL_add_all_algorithms();
+
+ if(!RAND_status()) {
+ fprintf(stderr, "Not enough entropy for the PRNG!\n");
+ abort();
+ }
+}
+
+void crypto_exit(void) {
+ EVP_cleanup();
+ ERR_free_strings();
+ ENGINE_cleanup();
+ random_exit();