1*0Sstevel@tonic-gate /* apps/winrand.c */
2*0Sstevel@tonic-gate /* ====================================================================
3*0Sstevel@tonic-gate * Copyright (c) 1998-2000 The OpenSSL Project. All rights reserved.
4*0Sstevel@tonic-gate *
5*0Sstevel@tonic-gate * Redistribution and use in source and binary forms, with or without
6*0Sstevel@tonic-gate * modification, are permitted provided that the following conditions
7*0Sstevel@tonic-gate * are met:
8*0Sstevel@tonic-gate *
9*0Sstevel@tonic-gate * 1. Redistributions of source code must retain the above copyright
10*0Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer.
11*0Sstevel@tonic-gate *
12*0Sstevel@tonic-gate * 2. Redistributions in binary form must reproduce the above copyright
13*0Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer in
14*0Sstevel@tonic-gate * the documentation and/or other materials provided with the
15*0Sstevel@tonic-gate * distribution.
16*0Sstevel@tonic-gate *
17*0Sstevel@tonic-gate * 3. All advertising materials mentioning features or use of this
18*0Sstevel@tonic-gate * software must display the following acknowledgment:
19*0Sstevel@tonic-gate * "This product includes software developed by the OpenSSL Project
20*0Sstevel@tonic-gate * for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
21*0Sstevel@tonic-gate *
22*0Sstevel@tonic-gate * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
23*0Sstevel@tonic-gate * endorse or promote products derived from this software without
24*0Sstevel@tonic-gate * prior written permission. For written permission, please contact
25*0Sstevel@tonic-gate * openssl-core@openssl.org.
26*0Sstevel@tonic-gate *
27*0Sstevel@tonic-gate * 5. Products derived from this software may not be called "OpenSSL"
28*0Sstevel@tonic-gate * nor may "OpenSSL" appear in their names without prior written
29*0Sstevel@tonic-gate * permission of the OpenSSL Project.
30*0Sstevel@tonic-gate *
31*0Sstevel@tonic-gate * 6. Redistributions of any form whatsoever must retain the following
32*0Sstevel@tonic-gate * acknowledgment:
33*0Sstevel@tonic-gate * "This product includes software developed by the OpenSSL Project
34*0Sstevel@tonic-gate * for use in the OpenSSL Toolkit (http://www.openssl.org/)"
35*0Sstevel@tonic-gate *
36*0Sstevel@tonic-gate * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
37*0Sstevel@tonic-gate * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
38*0Sstevel@tonic-gate * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
39*0Sstevel@tonic-gate * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
40*0Sstevel@tonic-gate * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
41*0Sstevel@tonic-gate * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
42*0Sstevel@tonic-gate * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
43*0Sstevel@tonic-gate * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
44*0Sstevel@tonic-gate * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
45*0Sstevel@tonic-gate * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
46*0Sstevel@tonic-gate * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
47*0Sstevel@tonic-gate * OF THE POSSIBILITY OF SUCH DAMAGE.
48*0Sstevel@tonic-gate * ====================================================================
49*0Sstevel@tonic-gate *
50*0Sstevel@tonic-gate * This product includes cryptographic software written by Eric Young
51*0Sstevel@tonic-gate * (eay@cryptsoft.com). This product includes software written by Tim
52*0Sstevel@tonic-gate * Hudson (tjh@cryptsoft.com).
53*0Sstevel@tonic-gate *
54*0Sstevel@tonic-gate */
55*0Sstevel@tonic-gate
56*0Sstevel@tonic-gate /* Usage: winrand [filename]
57*0Sstevel@tonic-gate *
58*0Sstevel@tonic-gate * Collects entropy from mouse movements and other events and writes
59*0Sstevel@tonic-gate * random data to filename or .rnd
60*0Sstevel@tonic-gate */
61*0Sstevel@tonic-gate
62*0Sstevel@tonic-gate #include <windows.h>
63*0Sstevel@tonic-gate #include <openssl/opensslv.h>
64*0Sstevel@tonic-gate #include <openssl/rand.h>
65*0Sstevel@tonic-gate
66*0Sstevel@tonic-gate LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
67*0Sstevel@tonic-gate const char *filename;
68*0Sstevel@tonic-gate
WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,PSTR cmdline,int iCmdShow)69*0Sstevel@tonic-gate int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
70*0Sstevel@tonic-gate PSTR cmdline, int iCmdShow)
71*0Sstevel@tonic-gate {
72*0Sstevel@tonic-gate static char appname[] = "OpenSSL";
73*0Sstevel@tonic-gate HWND hwnd;
74*0Sstevel@tonic-gate MSG msg;
75*0Sstevel@tonic-gate WNDCLASSEX wndclass;
76*0Sstevel@tonic-gate char buffer[200];
77*0Sstevel@tonic-gate
78*0Sstevel@tonic-gate if (cmdline[0] == '\0')
79*0Sstevel@tonic-gate filename = RAND_file_name(buffer, sizeof buffer);
80*0Sstevel@tonic-gate else
81*0Sstevel@tonic-gate filename = cmdline;
82*0Sstevel@tonic-gate
83*0Sstevel@tonic-gate RAND_load_file(filename, -1);
84*0Sstevel@tonic-gate
85*0Sstevel@tonic-gate wndclass.cbSize = sizeof(wndclass);
86*0Sstevel@tonic-gate wndclass.style = CS_HREDRAW | CS_VREDRAW;
87*0Sstevel@tonic-gate wndclass.lpfnWndProc = WndProc;
88*0Sstevel@tonic-gate wndclass.cbClsExtra = 0;
89*0Sstevel@tonic-gate wndclass.cbWndExtra = 0;
90*0Sstevel@tonic-gate wndclass.hInstance = hInstance;
91*0Sstevel@tonic-gate wndclass.hIcon = LoadIcon(NULL, IDI_APPLICATION);
92*0Sstevel@tonic-gate wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
93*0Sstevel@tonic-gate wndclass.hbrBackground = (HBRUSH) GetStockObject(WHITE_BRUSH);
94*0Sstevel@tonic-gate wndclass.lpszMenuName = NULL;
95*0Sstevel@tonic-gate wndclass.lpszClassName = appname;
96*0Sstevel@tonic-gate wndclass.hIconSm = LoadIcon(NULL, IDI_APPLICATION);
97*0Sstevel@tonic-gate RegisterClassEx(&wndclass);
98*0Sstevel@tonic-gate
99*0Sstevel@tonic-gate hwnd = CreateWindow(appname, OPENSSL_VERSION_TEXT,
100*0Sstevel@tonic-gate WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT,
101*0Sstevel@tonic-gate CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInstance, NULL);
102*0Sstevel@tonic-gate
103*0Sstevel@tonic-gate ShowWindow(hwnd, iCmdShow);
104*0Sstevel@tonic-gate UpdateWindow(hwnd);
105*0Sstevel@tonic-gate
106*0Sstevel@tonic-gate
107*0Sstevel@tonic-gate while (GetMessage(&msg, NULL, 0, 0))
108*0Sstevel@tonic-gate {
109*0Sstevel@tonic-gate TranslateMessage(&msg);
110*0Sstevel@tonic-gate DispatchMessage(&msg);
111*0Sstevel@tonic-gate }
112*0Sstevel@tonic-gate
113*0Sstevel@tonic-gate return msg.wParam;
114*0Sstevel@tonic-gate }
115*0Sstevel@tonic-gate
WndProc(HWND hwnd,UINT iMsg,WPARAM wParam,LPARAM lParam)116*0Sstevel@tonic-gate LRESULT CALLBACK WndProc(HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam)
117*0Sstevel@tonic-gate {
118*0Sstevel@tonic-gate HDC hdc;
119*0Sstevel@tonic-gate PAINTSTRUCT ps;
120*0Sstevel@tonic-gate RECT rect;
121*0Sstevel@tonic-gate static int seeded = 0;
122*0Sstevel@tonic-gate
123*0Sstevel@tonic-gate switch (iMsg)
124*0Sstevel@tonic-gate {
125*0Sstevel@tonic-gate case WM_PAINT:
126*0Sstevel@tonic-gate hdc = BeginPaint(hwnd, &ps);
127*0Sstevel@tonic-gate GetClientRect(hwnd, &rect);
128*0Sstevel@tonic-gate DrawText(hdc, "Seeding the PRNG. Please move the mouse!", -1,
129*0Sstevel@tonic-gate &rect, DT_SINGLELINE | DT_CENTER | DT_VCENTER);
130*0Sstevel@tonic-gate EndPaint(hwnd, &ps);
131*0Sstevel@tonic-gate return 0;
132*0Sstevel@tonic-gate
133*0Sstevel@tonic-gate case WM_DESTROY:
134*0Sstevel@tonic-gate PostQuitMessage(0);
135*0Sstevel@tonic-gate return 0;
136*0Sstevel@tonic-gate }
137*0Sstevel@tonic-gate
138*0Sstevel@tonic-gate if (RAND_event(iMsg, wParam, lParam) == 1 && seeded == 0)
139*0Sstevel@tonic-gate {
140*0Sstevel@tonic-gate seeded = 1;
141*0Sstevel@tonic-gate if (RAND_write_file(filename) <= 0)
142*0Sstevel@tonic-gate MessageBox(hwnd, "Couldn't write random file!",
143*0Sstevel@tonic-gate "OpenSSL", MB_OK | MB_ICONERROR);
144*0Sstevel@tonic-gate PostQuitMessage(0);
145*0Sstevel@tonic-gate }
146*0Sstevel@tonic-gate
147*0Sstevel@tonic-gate return DefWindowProc(hwnd, iMsg, wParam, lParam);
148*0Sstevel@tonic-gate }
149