sl@0: /* apps/winrand.c */ sl@0: /* ==================================================================== sl@0: * Copyright (c) 1998-2000 The OpenSSL Project. All rights reserved. sl@0: * sl@0: * Redistribution and use in source and binary forms, with or without sl@0: * modification, are permitted provided that the following conditions sl@0: * are met: sl@0: * sl@0: * 1. Redistributions of source code must retain the above copyright sl@0: * notice, this list of conditions and the following disclaimer. sl@0: * sl@0: * 2. Redistributions in binary form must reproduce the above copyright sl@0: * notice, this list of conditions and the following disclaimer in sl@0: * the documentation and/or other materials provided with the sl@0: * distribution. sl@0: * sl@0: * 3. All advertising materials mentioning features or use of this sl@0: * software must display the following acknowledgment: sl@0: * "This product includes software developed by the OpenSSL Project sl@0: * for use in the OpenSSL Toolkit. (http://www.openssl.org/)" sl@0: * sl@0: * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to sl@0: * endorse or promote products derived from this software without sl@0: * prior written permission. For written permission, please contact sl@0: * openssl-core@openssl.org. sl@0: * sl@0: * 5. Products derived from this software may not be called "OpenSSL" sl@0: * nor may "OpenSSL" appear in their names without prior written sl@0: * permission of the OpenSSL Project. sl@0: * sl@0: * 6. Redistributions of any form whatsoever must retain the following sl@0: * acknowledgment: sl@0: * "This product includes software developed by the OpenSSL Project sl@0: * for use in the OpenSSL Toolkit (http://www.openssl.org/)" sl@0: * sl@0: * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY sl@0: * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE sl@0: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR sl@0: * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR sl@0: * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, sl@0: * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT sl@0: * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; sl@0: * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) sl@0: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, sl@0: * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) sl@0: * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED sl@0: * OF THE POSSIBILITY OF SUCH DAMAGE. sl@0: * ==================================================================== sl@0: * sl@0: * This product includes cryptographic software written by Eric Young sl@0: * (eay@cryptsoft.com). This product includes software written by Tim sl@0: * Hudson (tjh@cryptsoft.com). sl@0: * sl@0: */ sl@0: sl@0: /* Usage: winrand [filename] sl@0: * sl@0: * Collects entropy from mouse movements and other events and writes sl@0: * random data to filename or .rnd sl@0: */ sl@0: sl@0: #include sl@0: #include sl@0: #include sl@0: sl@0: LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM); sl@0: const char *filename; sl@0: sl@0: int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, sl@0: PSTR cmdline, int iCmdShow) sl@0: { sl@0: static char appname[] = "OpenSSL"; sl@0: HWND hwnd; sl@0: MSG msg; sl@0: WNDCLASSEX wndclass; sl@0: char buffer[200]; sl@0: sl@0: if (cmdline[0] == '\0') sl@0: filename = RAND_file_name(buffer, sizeof buffer); sl@0: else sl@0: filename = cmdline; sl@0: sl@0: RAND_load_file(filename, -1); sl@0: sl@0: wndclass.cbSize = sizeof(wndclass); sl@0: wndclass.style = CS_HREDRAW | CS_VREDRAW; sl@0: wndclass.lpfnWndProc = WndProc; sl@0: wndclass.cbClsExtra = 0; sl@0: wndclass.cbWndExtra = 0; sl@0: wndclass.hInstance = hInstance; sl@0: wndclass.hIcon = LoadIcon(NULL, IDI_APPLICATION); sl@0: wndclass.hCursor = LoadCursor(NULL, IDC_ARROW); sl@0: wndclass.hbrBackground = (HBRUSH) GetStockObject(WHITE_BRUSH); sl@0: wndclass.lpszMenuName = NULL; sl@0: wndclass.lpszClassName = appname; sl@0: wndclass.hIconSm = LoadIcon(NULL, IDI_APPLICATION); sl@0: RegisterClassEx(&wndclass); sl@0: sl@0: hwnd = CreateWindow(appname, OPENSSL_VERSION_TEXT, sl@0: WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, sl@0: CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInstance, NULL); sl@0: sl@0: ShowWindow(hwnd, iCmdShow); sl@0: UpdateWindow(hwnd); sl@0: sl@0: sl@0: while (GetMessage(&msg, NULL, 0, 0)) sl@0: { sl@0: TranslateMessage(&msg); sl@0: DispatchMessage(&msg); sl@0: } sl@0: sl@0: return msg.wParam; sl@0: } sl@0: sl@0: LRESULT CALLBACK WndProc(HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam) sl@0: { sl@0: HDC hdc; sl@0: PAINTSTRUCT ps; sl@0: RECT rect; sl@0: static int seeded = 0; sl@0: sl@0: switch (iMsg) sl@0: { sl@0: case WM_PAINT: sl@0: hdc = BeginPaint(hwnd, &ps); sl@0: GetClientRect(hwnd, &rect); sl@0: DrawText(hdc, "Seeding the PRNG. Please move the mouse!", -1, sl@0: &rect, DT_SINGLELINE | DT_CENTER | DT_VCENTER); sl@0: EndPaint(hwnd, &ps); sl@0: return 0; sl@0: sl@0: case WM_DESTROY: sl@0: PostQuitMessage(0); sl@0: return 0; sl@0: } sl@0: sl@0: if (RAND_event(iMsg, wParam, lParam) == 1 && seeded == 0) sl@0: { sl@0: seeded = 1; sl@0: if (RAND_write_file(filename) <= 0) sl@0: MessageBox(hwnd, "Couldn't write random file!", sl@0: "OpenSSL", MB_OK | MB_ICONERROR); sl@0: PostQuitMessage(0); sl@0: } sl@0: sl@0: return DefWindowProc(hwnd, iMsg, wParam, lParam); sl@0: }