]>
Commit | Line | Data |
---|---|---|
4ec2d4d2 | 1 | /* crypto/rand/rand_egd.c */ |
a8ebe469 | 2 | /* Written by Ulf Moeller and Lutz Jaenicke for the OpenSSL project. */ |
4ec2d4d2 UM |
3 | /* ==================================================================== |
4 | * Copyright (c) 1998-2000 The OpenSSL Project. All rights reserved. | |
5 | * | |
6 | * Redistribution and use in source and binary forms, with or without | |
7 | * modification, are permitted provided that the following conditions | |
8 | * are met: | |
9 | * | |
10 | * 1. Redistributions of source code must retain the above copyright | |
11 | * notice, this list of conditions and the following disclaimer. | |
12 | * | |
13 | * 2. Redistributions in binary form must reproduce the above copyright | |
14 | * notice, this list of conditions and the following disclaimer in | |
15 | * the documentation and/or other materials provided with the | |
16 | * distribution. | |
17 | * | |
18 | * 3. All advertising materials mentioning features or use of this | |
19 | * software must display the following acknowledgment: | |
20 | * "This product includes software developed by the OpenSSL Project | |
21 | * for use in the OpenSSL Toolkit. (http://www.openssl.org/)" | |
22 | * | |
23 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | |
24 | * endorse or promote products derived from this software without | |
25 | * prior written permission. For written permission, please contact | |
26 | * openssl-core@openssl.org. | |
27 | * | |
28 | * 5. Products derived from this software may not be called "OpenSSL" | |
29 | * nor may "OpenSSL" appear in their names without prior written | |
30 | * permission of the OpenSSL Project. | |
31 | * | |
32 | * 6. Redistributions of any form whatsoever must retain the following | |
33 | * acknowledgment: | |
34 | * "This product includes software developed by the OpenSSL Project | |
35 | * for use in the OpenSSL Toolkit (http://www.openssl.org/)" | |
36 | * | |
37 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | |
38 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
39 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | |
40 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | |
41 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | |
42 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | |
43 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | |
44 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
45 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | |
46 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | |
47 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | |
48 | * OF THE POSSIBILITY OF SUCH DAMAGE. | |
49 | * ==================================================================== | |
50 | * | |
51 | * This product includes cryptographic software written by Eric Young | |
52 | * (eay@cryptsoft.com). This product includes software written by Tim | |
53 | * Hudson (tjh@cryptsoft.com). | |
54 | * | |
55 | */ | |
56 | ||
a95d2c51 | 57 | #include <openssl/e_os2.h> |
4ec2d4d2 | 58 | #include <openssl/rand.h> |
d420ac2c | 59 | #include <openssl/buffer.h> |
4ec2d4d2 | 60 | |
1d97c843 | 61 | /*- |
a8ebe469 LJ |
62 | * Query the EGD <URL: http://www.lothar.com/tech/crypto/>. |
63 | * | |
64 | * This module supplies three routines: | |
65 | * | |
66 | * RAND_query_egd_bytes(path, buf, bytes) | |
67 | * will actually query "bytes" bytes of entropy form the egd-socket located | |
68 | * at path and will write them to buf (if supplied) or will directly feed | |
69 | * it to RAND_seed() if buf==NULL. | |
70 | * The number of bytes is not limited by the maximum chunk size of EGD, | |
71 | * which is 255 bytes. If more than 255 bytes are wanted, several chunks | |
72 | * of entropy bytes are requested. The connection is left open until the | |
73 | * query is competed. | |
74 | * RAND_query_egd_bytes() returns with | |
478b50cf | 75 | * -1 if an error occurred during connection or communication. |
a8ebe469 LJ |
76 | * num the number of bytes read from the EGD socket. This number is either |
77 | * the number of bytes requested or smaller, if the EGD pool is | |
78 | * drained and the daemon signals that the pool is empty. | |
79 | * This routine does not touch any RAND_status(). This is necessary, since | |
80 | * PRNG functions may call it during initialization. | |
81 | * | |
82 | * RAND_egd_bytes(path, bytes) will query "bytes" bytes and have them | |
83 | * used to seed the PRNG. | |
84 | * RAND_egd_bytes() is a wrapper for RAND_query_egd_bytes() with buf=NULL. | |
85 | * Unlike RAND_query_egd_bytes(), RAND_status() is used to test the | |
86 | * seed status so that the return value can reflect the seed state: | |
478b50cf | 87 | * -1 if an error occurred during connection or communication _or_ |
a8ebe469 LJ |
88 | * if the PRNG has still not received the required seeding. |
89 | * num the number of bytes read from the EGD socket. This number is either | |
90 | * the number of bytes requested or smaller, if the EGD pool is | |
91 | * drained and the daemon signals that the pool is empty. | |
92 | * | |
93 | * RAND_egd(path) will query 255 bytes and use the bytes retreived to seed | |
94 | * the PRNG. | |
95 | * RAND_egd() is a wrapper for RAND_egd_bytes() with numbytes=255. | |
4ec2d4d2 UM |
96 | */ |
97 | ||
b317819b | 98 | #if defined(OPENSSL_SYS_WIN32) || defined(OPENSSL_SYS_VMS) || defined(OPENSSL_SYS_MSDOS) || defined(OPENSSL_SYS_VXWORKS) || defined(OPENSSL_SYS_NETWARE) || defined(OPENSSL_SYS_VOS) |
2fbc8a2a | 99 | int RAND_query_egd_bytes(const char *path, unsigned char *buf, int bytes) |
599c0353 LJ |
100 | { |
101 | return(-1); | |
102 | } | |
4ec2d4d2 UM |
103 | int RAND_egd(const char *path) |
104 | { | |
105 | return(-1); | |
106 | } | |
1921eaad | 107 | |
2fbc8a2a | 108 | int RAND_egd_bytes(const char *path,int bytes) |
1921eaad BL |
109 | { |
110 | return(-1); | |
111 | } | |
4ec2d4d2 UM |
112 | #else |
113 | #include <openssl/opensslconf.h> | |
114 | #include OPENSSL_UNISTD | |
115 | #include <sys/types.h> | |
116 | #include <sys/socket.h> | |
8bf49ea1 | 117 | #ifndef NO_SYS_UN_H |
6a89a25c | 118 | # ifdef OPENSSL_SYS_VXWORKS |
3e83e686 RL |
119 | # include <streams/un.h> |
120 | # else | |
121 | # include <sys/un.h> | |
122 | # endif | |
8bf49ea1 RL |
123 | #else |
124 | struct sockaddr_un { | |
125 | short sun_family; /* AF_UNIX */ | |
126 | char sun_path[108]; /* path name (gag) */ | |
127 | }; | |
128 | #endif /* NO_SYS_UN_H */ | |
fd74679a | 129 | #include <string.h> |
a8ebe469 | 130 | #include <errno.h> |
4ec2d4d2 UM |
131 | |
132 | #ifndef offsetof | |
133 | # define offsetof(TYPE, MEMBER) ((size_t) &((TYPE *)0)->MEMBER) | |
134 | #endif | |
135 | ||
6343829a | 136 | int RAND_query_egd_bytes(const char *path, unsigned char *buf, int bytes) |
4ec2d4d2 | 137 | { |
599c0353 | 138 | int ret = 0; |
4ec2d4d2 | 139 | struct sockaddr_un addr; |
6343829a | 140 | int len, num, numbytes; |
4ec2d4d2 | 141 | int fd = -1; |
a8ebe469 LJ |
142 | int success; |
143 | unsigned char egdbuf[2], tempbuf[255], *retrievebuf; | |
4ec2d4d2 UM |
144 | |
145 | memset(&addr, 0, sizeof(addr)); | |
146 | addr.sun_family = AF_UNIX; | |
54a656ef | 147 | if (strlen(path) >= sizeof(addr.sun_path)) |
4ec2d4d2 | 148 | return (-1); |
d420ac2c | 149 | BUF_strlcpy(addr.sun_path,path,sizeof addr.sun_path); |
4ec2d4d2 UM |
150 | len = offsetof(struct sockaddr_un, sun_path) + strlen(path); |
151 | fd = socket(AF_UNIX, SOCK_STREAM, 0); | |
152 | if (fd == -1) return (-1); | |
a8ebe469 LJ |
153 | success = 0; |
154 | while (!success) | |
155 | { | |
156 | if (connect(fd, (struct sockaddr *)&addr, len) == 0) | |
157 | success = 1; | |
158 | else | |
159 | { | |
160 | switch (errno) | |
161 | { | |
162 | #ifdef EINTR | |
163 | case EINTR: | |
164 | #endif | |
165 | #ifdef EAGAIN | |
166 | case EAGAIN: | |
167 | #endif | |
168 | #ifdef EINPROGRESS | |
169 | case EINPROGRESS: | |
170 | #endif | |
171 | #ifdef EALREADY | |
172 | case EALREADY: | |
173 | #endif | |
174 | /* No error, try again */ | |
175 | break; | |
176 | #ifdef EISCONN | |
177 | case EISCONN: | |
178 | success = 1; | |
179 | break; | |
180 | #endif | |
181 | default: | |
182 | goto err; /* failure */ | |
183 | } | |
184 | } | |
185 | } | |
599c0353 LJ |
186 | |
187 | while(bytes > 0) | |
188 | { | |
189 | egdbuf[0] = 1; | |
190 | egdbuf[1] = bytes < 255 ? bytes : 255; | |
a8ebe469 LJ |
191 | numbytes = 0; |
192 | while (numbytes != 2) | |
599c0353 | 193 | { |
a8ebe469 LJ |
194 | num = write(fd, egdbuf + numbytes, 2 - numbytes); |
195 | if (num >= 0) | |
196 | numbytes += num; | |
197 | else | |
198 | { | |
199 | switch (errno) | |
200 | { | |
201 | #ifdef EINTR | |
202 | case EINTR: | |
203 | #endif | |
204 | #ifdef EAGAIN | |
205 | case EAGAIN: | |
206 | #endif | |
207 | /* No error, try again */ | |
208 | break; | |
209 | default: | |
210 | ret = -1; | |
211 | goto err; /* failure */ | |
212 | } | |
213 | } | |
214 | } | |
215 | numbytes = 0; | |
216 | while (numbytes != 1) | |
217 | { | |
218 | num = read(fd, egdbuf, 1); | |
f69a8aeb LJ |
219 | if (num == 0) |
220 | goto err; /* descriptor closed */ | |
221 | else if (num > 0) | |
a8ebe469 LJ |
222 | numbytes += num; |
223 | else | |
224 | { | |
225 | switch (errno) | |
226 | { | |
227 | #ifdef EINTR | |
228 | case EINTR: | |
229 | #endif | |
230 | #ifdef EAGAIN | |
231 | case EAGAIN: | |
232 | #endif | |
233 | /* No error, try again */ | |
234 | break; | |
235 | default: | |
236 | ret = -1; | |
237 | goto err; /* failure */ | |
238 | } | |
239 | } | |
599c0353 LJ |
240 | } |
241 | if(egdbuf[0] == 0) | |
242 | goto err; | |
a8ebe469 LJ |
243 | if (buf) |
244 | retrievebuf = buf + ret; | |
245 | else | |
246 | retrievebuf = tempbuf; | |
247 | numbytes = 0; | |
248 | while (numbytes != egdbuf[0]) | |
599c0353 | 249 | { |
a8ebe469 | 250 | num = read(fd, retrievebuf + numbytes, egdbuf[0] - numbytes); |
f69a8aeb LJ |
251 | if (num == 0) |
252 | goto err; /* descriptor closed */ | |
253 | else if (num > 0) | |
a8ebe469 LJ |
254 | numbytes += num; |
255 | else | |
256 | { | |
257 | switch (errno) | |
258 | { | |
259 | #ifdef EINTR | |
260 | case EINTR: | |
261 | #endif | |
262 | #ifdef EAGAIN | |
263 | case EAGAIN: | |
264 | #endif | |
265 | /* No error, try again */ | |
266 | break; | |
267 | default: | |
268 | ret = -1; | |
269 | goto err; /* failure */ | |
270 | } | |
271 | } | |
599c0353 | 272 | } |
a8ebe469 LJ |
273 | ret += egdbuf[0]; |
274 | bytes -= egdbuf[0]; | |
275 | if (!buf) | |
276 | RAND_seed(tempbuf, egdbuf[0]); | |
599c0353 LJ |
277 | } |
278 | err: | |
279 | if (fd != -1) close(fd); | |
280 | return(ret); | |
281 | } | |
282 | ||
a8ebe469 | 283 | |
6343829a | 284 | int RAND_egd_bytes(const char *path, int bytes) |
599c0353 | 285 | { |
9b4dc830 | 286 | int num, ret = 0; |
599c0353 | 287 | |
a8ebe469 | 288 | num = RAND_query_egd_bytes(path, NULL, bytes); |
4ec2d4d2 | 289 | if (num < 1) goto err; |
4ec2d4d2 | 290 | if (RAND_status() == 1) |
a8ebe469 | 291 | ret = num; |
4ec2d4d2 | 292 | err: |
4ec2d4d2 UM |
293 | return(ret); |
294 | } | |
1921eaad | 295 | |
1921eaad | 296 | |
a8ebe469 LJ |
297 | int RAND_egd(const char *path) |
298 | { | |
299 | return (RAND_egd_bytes(path, 255)); | |
1921eaad BL |
300 | } |
301 | ||
302 | ||
4ec2d4d2 | 303 | #endif |