os/ossrv/ssl/tsrc/topenssl/src/winrand.c
changeset 0 bde4ae8d615e
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/os/ossrv/ssl/tsrc/topenssl/src/winrand.c	Fri Jun 15 03:10:57 2012 +0200
     1.3 @@ -0,0 +1,148 @@
     1.4 +/* apps/winrand.c */
     1.5 +/* ====================================================================
     1.6 + * Copyright (c) 1998-2000 The OpenSSL Project.  All rights reserved.
     1.7 + *
     1.8 + * Redistribution and use in source and binary forms, with or without
     1.9 + * modification, are permitted provided that the following conditions
    1.10 + * are met:
    1.11 + *
    1.12 + * 1. Redistributions of source code must retain the above copyright
    1.13 + *    notice, this list of conditions and the following disclaimer. 
    1.14 + *
    1.15 + * 2. Redistributions in binary form must reproduce the above copyright
    1.16 + *    notice, this list of conditions and the following disclaimer in
    1.17 + *    the documentation and/or other materials provided with the
    1.18 + *    distribution.
    1.19 + *
    1.20 + * 3. All advertising materials mentioning features or use of this
    1.21 + *    software must display the following acknowledgment:
    1.22 + *    "This product includes software developed by the OpenSSL Project
    1.23 + *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
    1.24 + *
    1.25 + * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
    1.26 + *    endorse or promote products derived from this software without
    1.27 + *    prior written permission. For written permission, please contact
    1.28 + *    openssl-core@openssl.org.
    1.29 + *
    1.30 + * 5. Products derived from this software may not be called "OpenSSL"
    1.31 + *    nor may "OpenSSL" appear in their names without prior written
    1.32 + *    permission of the OpenSSL Project.
    1.33 + *
    1.34 + * 6. Redistributions of any form whatsoever must retain the following
    1.35 + *    acknowledgment:
    1.36 + *    "This product includes software developed by the OpenSSL Project
    1.37 + *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"
    1.38 + *
    1.39 + * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
    1.40 + * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
    1.41 + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
    1.42 + * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
    1.43 + * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
    1.44 + * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
    1.45 + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
    1.46 + * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
    1.47 + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
    1.48 + * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
    1.49 + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
    1.50 + * OF THE POSSIBILITY OF SUCH DAMAGE.
    1.51 + * ====================================================================
    1.52 + *
    1.53 + * This product includes cryptographic software written by Eric Young
    1.54 + * (eay@cryptsoft.com).  This product includes software written by Tim
    1.55 + * Hudson (tjh@cryptsoft.com).
    1.56 + *
    1.57 + */
    1.58 +
    1.59 +/* Usage: winrand [filename]
    1.60 + *
    1.61 + * Collects entropy from mouse movements and other events and writes
    1.62 + * random data to filename or .rnd
    1.63 + */
    1.64 +
    1.65 +#include <windows.h>
    1.66 +#include <openssl/opensslv.h>
    1.67 +#include <openssl/rand.h>
    1.68 +
    1.69 +LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
    1.70 +const char *filename;
    1.71 +
    1.72 +int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
    1.73 +        PSTR cmdline, int iCmdShow)
    1.74 +	{
    1.75 +	static char appname[] = "OpenSSL";
    1.76 +	HWND hwnd;
    1.77 +	MSG msg;
    1.78 +	WNDCLASSEX wndclass;
    1.79 +        char buffer[200];
    1.80 +
    1.81 +        if (cmdline[0] == '\0')
    1.82 +                filename = RAND_file_name(buffer, sizeof buffer);
    1.83 +        else
    1.84 +                filename = cmdline;
    1.85 +
    1.86 +        RAND_load_file(filename, -1);
    1.87 +
    1.88 +	wndclass.cbSize = sizeof(wndclass);
    1.89 +	wndclass.style = CS_HREDRAW | CS_VREDRAW;
    1.90 +	wndclass.lpfnWndProc = WndProc;
    1.91 +	wndclass.cbClsExtra = 0;
    1.92 +	wndclass.cbWndExtra = 0;
    1.93 +	wndclass.hInstance = hInstance;
    1.94 +	wndclass.hIcon = LoadIcon(NULL, IDI_APPLICATION);
    1.95 +	wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
    1.96 +	wndclass.hbrBackground = (HBRUSH) GetStockObject(WHITE_BRUSH);
    1.97 +	wndclass.lpszMenuName = NULL;
    1.98 +        wndclass.lpszClassName = appname;
    1.99 +	wndclass.hIconSm = LoadIcon(NULL, IDI_APPLICATION);
   1.100 +	RegisterClassEx(&wndclass);
   1.101 +
   1.102 +        hwnd = CreateWindow(appname, OPENSSL_VERSION_TEXT,
   1.103 +		WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT,
   1.104 +		CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInstance, NULL);
   1.105 +
   1.106 +	ShowWindow(hwnd, iCmdShow);
   1.107 +	UpdateWindow(hwnd);
   1.108 +
   1.109 +
   1.110 +	while (GetMessage(&msg, NULL, 0, 0))
   1.111 +		{
   1.112 +		TranslateMessage(&msg);
   1.113 +		DispatchMessage(&msg);
   1.114 +		}
   1.115 +
   1.116 +	return msg.wParam;
   1.117 +	}
   1.118 +
   1.119 +LRESULT CALLBACK WndProc(HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam)
   1.120 +	{
   1.121 +        HDC hdc;
   1.122 +	PAINTSTRUCT ps;
   1.123 +        RECT rect;
   1.124 +        static int seeded = 0;
   1.125 +
   1.126 +	switch (iMsg)
   1.127 +		{
   1.128 +	case WM_PAINT:
   1.129 +		hdc = BeginPaint(hwnd, &ps);
   1.130 +		GetClientRect(hwnd, &rect);
   1.131 +                DrawText(hdc, "Seeding the PRNG. Please move the mouse!", -1,
   1.132 +			&rect, DT_SINGLELINE | DT_CENTER | DT_VCENTER);
   1.133 +		EndPaint(hwnd, &ps);
   1.134 +		return 0;
   1.135 +		
   1.136 +        case WM_DESTROY:
   1.137 +                PostQuitMessage(0);
   1.138 +                return 0;
   1.139 +                }
   1.140 +
   1.141 +        if (RAND_event(iMsg, wParam, lParam) == 1 && seeded == 0)
   1.142 +                {
   1.143 +                seeded = 1;
   1.144 +                if (RAND_write_file(filename) <= 0)
   1.145 +                        MessageBox(hwnd, "Couldn't write random file!",
   1.146 +				"OpenSSL", MB_OK | MB_ICONERROR);
   1.147 +                PostQuitMessage(0);
   1.148 +                }
   1.149 +
   1.150 +	return DefWindowProc(hwnd, iMsg, wParam, lParam);
   1.151 +	}