The data contained in this repository can be downloaded to your computer using one of several clients.
Please see the documentation of your version control software client for more information.
Please select the desired protocol below to get the URL.
This URL has Read-Only access.
main_repo / deps / libev / ev_select.c @ c5183738
History | View | Annotate | Download (8.42 KB)
1 |
/*
|
---|---|
2 |
* libev select fd activity backend
|
3 |
*
|
4 |
* Copyright (c) 2007,2008,2009 Marc Alexander Lehmann <libev@schmorp.de>
|
5 |
* All rights reserved.
|
6 |
*
|
7 |
* Redistribution and use in source and binary forms, with or without modifica-
|
8 |
* tion, are permitted provided that the following conditions are met:
|
9 |
*
|
10 |
* 1. Redistributions of source code must retain the above copyright notice,
|
11 |
* 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 the
|
15 |
* documentation and/or other materials provided with the distribution.
|
16 |
*
|
17 |
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
|
18 |
* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MER-
|
19 |
* CHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
|
20 |
* EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPE-
|
21 |
* CIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
22 |
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
|
23 |
* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
|
24 |
* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH-
|
25 |
* ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
|
26 |
* OF THE POSSIBILITY OF SUCH DAMAGE.
|
27 |
*
|
28 |
* Alternatively, the contents of this file may be used under the terms of
|
29 |
* the GNU General Public License ("GPL") version 2 or any later version,
|
30 |
* in which case the provisions of the GPL are applicable instead of
|
31 |
* the above. If you wish to allow the use of your version of this file
|
32 |
* only under the terms of the GPL and not to allow others to use your
|
33 |
* version of this file under the BSD license, indicate your decision
|
34 |
* by deleting the provisions above and replace them with the notice
|
35 |
* and other provisions required by the GPL. If you do not delete the
|
36 |
* provisions above, a recipient may use your version of this file under
|
37 |
* either the BSD or the GPL.
|
38 |
*/
|
39 |
|
40 |
#ifndef _WIN32
|
41 |
/* for unix systems */
|
42 |
# include <sys/select.h> |
43 |
# include <inttypes.h> |
44 |
#endif
|
45 |
|
46 |
#ifndef EV_SELECT_USE_FD_SET
|
47 |
# ifdef NFDBITS
|
48 |
# define EV_SELECT_USE_FD_SET 0 |
49 |
# else
|
50 |
# define EV_SELECT_USE_FD_SET 1 |
51 |
# endif
|
52 |
#endif
|
53 |
|
54 |
#if EV_SELECT_IS_WINSOCKET
|
55 |
# undef EV_SELECT_USE_FD_SET
|
56 |
# define EV_SELECT_USE_FD_SET 1 |
57 |
# undef NFDBITS
|
58 |
# define NFDBITS 0 |
59 |
#endif
|
60 |
|
61 |
#if !EV_SELECT_USE_FD_SET
|
62 |
# define NFDBYTES (NFDBITS / 8) |
63 |
#endif
|
64 |
|
65 |
#include <string.h> |
66 |
|
67 |
static void |
68 |
select_modify (EV_P_ int fd, int oev, int nev) |
69 |
{ |
70 |
if (oev == nev)
|
71 |
return;
|
72 |
|
73 |
{ |
74 |
#if EV_SELECT_USE_FD_SET
|
75 |
|
76 |
#if EV_SELECT_IS_WINSOCKET
|
77 |
SOCKET handle = anfds [fd].handle; |
78 |
#else
|
79 |
int handle = fd;
|
80 |
#endif
|
81 |
|
82 |
assert (("libev: fd >= FD_SETSIZE passed to fd_set-based select backend", fd < FD_SETSIZE));
|
83 |
|
84 |
/* FD_SET is broken on windows (it adds the fd to a set twice or more,
|
85 |
* which eventually leads to overflows). Need to call it only on changes.
|
86 |
*/
|
87 |
#if EV_SELECT_IS_WINSOCKET
|
88 |
if ((oev ^ nev) & EV_READ)
|
89 |
#endif
|
90 |
if (nev & EV_READ)
|
91 |
FD_SET (handle, (fd_set *)vec_ri); |
92 |
else
|
93 |
FD_CLR (handle, (fd_set *)vec_ri); |
94 |
|
95 |
#if EV_SELECT_IS_WINSOCKET
|
96 |
if ((oev ^ nev) & EV_WRITE)
|
97 |
#endif
|
98 |
if (nev & EV_WRITE)
|
99 |
FD_SET (handle, (fd_set *)vec_wi); |
100 |
else
|
101 |
FD_CLR (handle, (fd_set *)vec_wi); |
102 |
|
103 |
#else
|
104 |
|
105 |
int word = fd / NFDBITS;
|
106 |
fd_mask mask = 1UL << (fd % NFDBITS);
|
107 |
|
108 |
if (expect_false (vec_max <= word))
|
109 |
{ |
110 |
int new_max = word + 1; |
111 |
|
112 |
vec_ri = ev_realloc (vec_ri, new_max * NFDBYTES); |
113 |
vec_ro = ev_realloc (vec_ro, new_max * NFDBYTES); /* could free/malloc */
|
114 |
vec_wi = ev_realloc (vec_wi, new_max * NFDBYTES); |
115 |
vec_wo = ev_realloc (vec_wo, new_max * NFDBYTES); /* could free/malloc */
|
116 |
#ifdef _WIN32
|
117 |
vec_eo = ev_realloc (vec_eo, new_max * NFDBYTES); /* could free/malloc */
|
118 |
#endif
|
119 |
|
120 |
for (; vec_max < new_max; ++vec_max)
|
121 |
((fd_mask *)vec_ri) [vec_max] = |
122 |
((fd_mask *)vec_wi) [vec_max] = 0;
|
123 |
} |
124 |
|
125 |
((fd_mask *)vec_ri) [word] |= mask; |
126 |
if (!(nev & EV_READ))
|
127 |
((fd_mask *)vec_ri) [word] &= ~mask; |
128 |
|
129 |
((fd_mask *)vec_wi) [word] |= mask; |
130 |
if (!(nev & EV_WRITE))
|
131 |
((fd_mask *)vec_wi) [word] &= ~mask; |
132 |
#endif
|
133 |
} |
134 |
} |
135 |
|
136 |
static void |
137 |
select_poll (EV_P_ ev_tstamp timeout) |
138 |
{ |
139 |
struct timeval tv;
|
140 |
int res;
|
141 |
int fd_setsize;
|
142 |
|
143 |
tv.tv_sec = (long)timeout;
|
144 |
tv.tv_usec = (long)((timeout - (ev_tstamp)tv.tv_sec) * 1e6); |
145 |
|
146 |
#if EV_SELECT_USE_FD_SET
|
147 |
fd_setsize = sizeof (fd_set);
|
148 |
#else
|
149 |
fd_setsize = vec_max * NFDBYTES; |
150 |
#endif
|
151 |
|
152 |
memcpy (vec_ro, vec_ri, fd_setsize); |
153 |
memcpy (vec_wo, vec_wi, fd_setsize); |
154 |
|
155 |
#ifdef _WIN32
|
156 |
/* pass in the write set as except set.
|
157 |
* the idea behind this is to work around a windows bug that causes
|
158 |
* errors to be reported as an exception and not by setting
|
159 |
* the writable bit. this is so uncontrollably lame.
|
160 |
*/
|
161 |
memcpy (vec_eo, vec_wi, fd_setsize); |
162 |
res = select (vec_max * NFDBITS, (fd_set *)vec_ro, (fd_set *)vec_wo, (fd_set *)vec_eo, &tv); |
163 |
#elif EV_SELECT_USE_FD_SET
|
164 |
fd_setsize = anfdmax < FD_SETSIZE ? anfdmax : FD_SETSIZE; |
165 |
res = select (fd_setsize, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv);
|
166 |
#else
|
167 |
res = select (vec_max * NFDBITS, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv);
|
168 |
#endif
|
169 |
|
170 |
if (expect_false (res < 0)) |
171 |
{ |
172 |
#if EV_SELECT_IS_WINSOCKET
|
173 |
errno = WSAGetLastError (); |
174 |
#endif
|
175 |
#ifdef WSABASEERR
|
176 |
/* on windows, select returns incompatible error codes, fix this */
|
177 |
if (errno >= WSABASEERR && errno < WSABASEERR + 1000) |
178 |
if (errno == WSAENOTSOCK)
|
179 |
errno = EBADF; |
180 |
else
|
181 |
errno -= WSABASEERR; |
182 |
#endif
|
183 |
|
184 |
#ifdef _WIN32
|
185 |
/* select on windows errornously returns EINVAL when no fd sets have been
|
186 |
* provided (this is documented). what microsoft doesn't tell you that this bug
|
187 |
* exists even when the fd sets _are_ provided, so we have to check for this bug
|
188 |
* here and emulate by sleeping manually.
|
189 |
* we also get EINVAL when the timeout is invalid, but we ignore this case here
|
190 |
* and assume that EINVAL always means: you have to wait manually.
|
191 |
*/
|
192 |
if (errno == EINVAL)
|
193 |
{ |
194 |
ev_sleep (timeout); |
195 |
return;
|
196 |
} |
197 |
#endif
|
198 |
|
199 |
if (errno == EBADF)
|
200 |
fd_ebadf (EV_A); |
201 |
else if (errno == ENOMEM && !syserr_cb) |
202 |
fd_enomem (EV_A); |
203 |
else if (errno != EINTR) |
204 |
ev_syserr ("(libev) select");
|
205 |
|
206 |
return;
|
207 |
} |
208 |
|
209 |
#if EV_SELECT_USE_FD_SET
|
210 |
|
211 |
{ |
212 |
int fd;
|
213 |
|
214 |
for (fd = 0; fd < anfdmax; ++fd) |
215 |
if (anfds [fd].events)
|
216 |
{ |
217 |
int events = 0; |
218 |
#if EV_SELECT_IS_WINSOCKET
|
219 |
SOCKET handle = anfds [fd].handle; |
220 |
#else
|
221 |
int handle = fd;
|
222 |
#endif
|
223 |
|
224 |
if (FD_ISSET (handle, (fd_set *)vec_ro)) events |= EV_READ;
|
225 |
if (FD_ISSET (handle, (fd_set *)vec_wo)) events |= EV_WRITE;
|
226 |
#ifdef _WIN32
|
227 |
if (FD_ISSET (handle, (fd_set *)vec_eo)) events |= EV_WRITE;
|
228 |
#endif
|
229 |
|
230 |
if (expect_true (events))
|
231 |
fd_event (EV_A_ fd, events); |
232 |
} |
233 |
} |
234 |
|
235 |
#else
|
236 |
|
237 |
{ |
238 |
int word, bit;
|
239 |
for (word = vec_max; word--; )
|
240 |
{ |
241 |
fd_mask word_r = ((fd_mask *)vec_ro) [word]; |
242 |
fd_mask word_w = ((fd_mask *)vec_wo) [word]; |
243 |
#ifdef _WIN32
|
244 |
word_w |= ((fd_mask *)vec_eo) [word]; |
245 |
#endif
|
246 |
|
247 |
if (word_r || word_w)
|
248 |
for (bit = NFDBITS; bit--; )
|
249 |
{ |
250 |
fd_mask mask = 1UL << bit;
|
251 |
int events = 0; |
252 |
|
253 |
events |= word_r & mask ? EV_READ : 0;
|
254 |
events |= word_w & mask ? EV_WRITE : 0;
|
255 |
|
256 |
if (expect_true (events))
|
257 |
fd_event (EV_A_ word * NFDBITS + bit, events); |
258 |
} |
259 |
} |
260 |
} |
261 |
|
262 |
#endif
|
263 |
} |
264 |
|
265 |
int inline_size
|
266 |
select_init (EV_P_ int flags)
|
267 |
{ |
268 |
backend_fudge = 0.; /* posix says this is zero */ |
269 |
backend_modify = select_modify; |
270 |
backend_poll = select_poll; |
271 |
|
272 |
#if EV_SELECT_USE_FD_SET
|
273 |
vec_ri = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_ri);
|
274 |
vec_ro = ev_malloc (sizeof (fd_set));
|
275 |
vec_wi = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_wi);
|
276 |
vec_wo = ev_malloc (sizeof (fd_set));
|
277 |
#ifdef _WIN32
|
278 |
vec_eo = ev_malloc (sizeof (fd_set));
|
279 |
#endif
|
280 |
#else
|
281 |
vec_max = 0;
|
282 |
vec_ri = 0;
|
283 |
vec_ri = 0;
|
284 |
vec_wo = 0;
|
285 |
vec_wo = 0;
|
286 |
#endif
|
287 |
|
288 |
return EVBACKEND_SELECT;
|
289 |
} |
290 |
|
291 |
void inline_size
|
292 |
select_destroy (EV_P) |
293 |
{ |
294 |
ev_free (vec_ri); |
295 |
ev_free (vec_ro); |
296 |
ev_free (vec_wi); |
297 |
ev_free (vec_wo); |
298 |
} |
299 |
|
300 |
|