ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/libev/ev_select.c
(Generate patch)

Comparing libev/ev_select.c (file contents):
Revision 1.28 by root, Sun Mar 16 16:38:23 2008 UTC vs.
Revision 1.44 by root, Fri Jul 10 00:36:21 2009 UTC

1/* 1/*
2 * libev select fd activity backend 2 * libev select fd activity backend
3 * 3 *
4 * Copyright (c) 2007 Marc Alexander Lehmann <libev@schmorp.de> 4 * Copyright (c) 2007,2008,2009 Marc Alexander Lehmann <libev@schmorp.de>
5 * All rights reserved. 5 * All rights reserved.
6 * 6 *
7 * Redistribution and use in source and binary forms, with or without modifica- 7 * Redistribution and use in source and binary forms, with or without modifica-
8 * tion, are permitted provided that the following conditions are met: 8 * tion, are permitted provided that the following conditions are met:
9 * 9 *
52#endif 52#endif
53 53
54#if EV_SELECT_IS_WINSOCKET 54#if EV_SELECT_IS_WINSOCKET
55# undef EV_SELECT_USE_FD_SET 55# undef EV_SELECT_USE_FD_SET
56# define EV_SELECT_USE_FD_SET 1 56# define EV_SELECT_USE_FD_SET 1
57# undef EINTR 57# undef NFDBITS
58# define EINTR WSAEINTR 58# define NFDBITS 0
59# undef EBADF
60# define EBADF WSAENOTSOCK
61# undef ENOMEM
62# define ENOMEM (errno + 1)
63#endif 59#endif
64 60
65#if !EV_SELECT_USE_FD_SET 61#if !EV_SELECT_USE_FD_SET
66# define NFDBYTES (NFDBITS / 8) 62# define NFDBYTES (NFDBITS / 8)
67#endif 63#endif
81 SOCKET handle = anfds [fd].handle; 77 SOCKET handle = anfds [fd].handle;
82 #else 78 #else
83 int handle = fd; 79 int handle = fd;
84 #endif 80 #endif
85 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
86 if (nev & EV_READ) 90 if (nev & EV_READ)
87 FD_SET (handle, (fd_set *)vec_ri); 91 FD_SET (handle, (fd_set *)vec_ri);
88 else 92 else
89 FD_CLR (handle, (fd_set *)vec_ri); 93 FD_CLR (handle, (fd_set *)vec_ri);
90 94
95 #if EV_SELECT_IS_WINSOCKET
96 if ((oev ^ nev) & EV_WRITE)
97 #endif
91 if (nev & EV_WRITE) 98 if (nev & EV_WRITE)
92 FD_SET (handle, (fd_set *)vec_wi); 99 FD_SET (handle, (fd_set *)vec_wi);
93 else 100 else
94 FD_CLR (handle, (fd_set *)vec_wi); 101 FD_CLR (handle, (fd_set *)vec_wi);
95 102
96#else 103#else
97 104
98 int word = fd / NFDBITS; 105 int word = fd / NFDBITS;
99 fd_mask mask = 1UL << (fd % NFDBITS); 106 fd_mask mask = 1UL << (fd % NFDBITS);
100 107
101 if (expect_false (vec_max < word + 1)) 108 if (expect_false (vec_max <= word))
102 { 109 {
103 int new_max = word + 1; 110 int new_max = word + 1;
104 111
105 vec_ri = ev_realloc (vec_ri, new_max * NFDBYTES); 112 vec_ri = ev_realloc (vec_ri, new_max * NFDBYTES);
106 vec_ro = ev_realloc (vec_ro, new_max * NFDBYTES); /* could free/malloc */ 113 vec_ro = ev_realloc (vec_ro, new_max * NFDBYTES); /* could free/malloc */
107 vec_wi = ev_realloc (vec_wi, new_max * NFDBYTES); 114 vec_wi = ev_realloc (vec_wi, new_max * NFDBYTES);
108 vec_wo = ev_realloc (vec_wo, new_max * NFDBYTES); /* could free/malloc */ 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
109 119
110 for (; vec_max < new_max; ++vec_max) 120 for (; vec_max < new_max; ++vec_max)
111 ((fd_mask *)vec_ri) [vec_max] = 121 ((fd_mask *)vec_ri) [vec_max] =
112 ((fd_mask *)vec_wi) [vec_max] = 0; 122 ((fd_mask *)vec_wi) [vec_max] = 0;
113 } 123 }
126static void 136static void
127select_poll (EV_P_ ev_tstamp timeout) 137select_poll (EV_P_ ev_tstamp timeout)
128{ 138{
129 struct timeval tv; 139 struct timeval tv;
130 int res; 140 int res;
141 int fd_setsize;
131 142
132#if EV_SELECT_USE_FD_SET 143 EV_SUSPEND_CB;
133 memcpy (vec_ro, vec_ri, sizeof (fd_set));
134 memcpy (vec_wo, vec_wi, sizeof (fd_set));
135#else
136 memcpy (vec_ro, vec_ri, vec_max * NFDBYTES);
137 memcpy (vec_wo, vec_wi, vec_max * NFDBYTES);
138#endif
139
140 tv.tv_sec = (long)timeout; 144 tv.tv_sec = (long)timeout;
141 tv.tv_usec = (long)((timeout - (ev_tstamp)tv.tv_sec) * 1e6); 145 tv.tv_usec = (long)((timeout - (ev_tstamp)tv.tv_sec) * 1e6);
142 146
147#if EV_SELECT_USE_FD_SET
148 fd_setsize = sizeof (fd_set);
149#else
150 fd_setsize = vec_max * NFDBYTES;
151#endif
152
153 memcpy (vec_ro, vec_ri, fd_setsize);
154 memcpy (vec_wo, vec_wi, fd_setsize);
155
156#ifdef _WIN32
157 /* pass in the write set as except set.
158 * the idea behind this is to work around a windows bug that causes
159 * errors to be reported as an exception and not by setting
160 * the writable bit. this is so uncontrollably lame.
161 */
162 memcpy (vec_eo, vec_wi, fd_setsize);
163 res = select (vec_max * NFDBITS, (fd_set *)vec_ro, (fd_set *)vec_wo, (fd_set *)vec_eo, &tv);
164#elif EV_SELECT_USE_FD_SET
165 fd_setsize = anfdmax < FD_SETSIZE ? anfdmax : FD_SETSIZE;
166 res = select (fd_setsize, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv);
167#else
143 res = select (vec_max * NFDBITS, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv); 168 res = select (vec_max * NFDBITS, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv);
169#endif
170 EV_RESUME_CB;
144 171
145 if (expect_false (res < 0)) 172 if (expect_false (res < 0))
146 { 173 {
147 #if EV_SELECT_IS_WINSOCKET 174 #if EV_SELECT_IS_WINSOCKET
148 errno = WSAGetLastError (); 175 errno = WSAGetLastError ();
149 #endif 176 #endif
177 #ifdef WSABASEERR
178 /* on windows, select returns incompatible error codes, fix this */
179 if (errno >= WSABASEERR && errno < WSABASEERR + 1000)
180 if (errno == WSAENOTSOCK)
181 errno = EBADF;
182 else
183 errno -= WSABASEERR;
184 #endif
185
186 #ifdef _WIN32
187 /* select on windows errornously returns EINVAL when no fd sets have been
188 * provided (this is documented). what microsoft doesn't tell you that this bug
189 * exists even when the fd sets _are_ provided, so we have to check for this bug
190 * here and emulate by sleeping manually.
191 * we also get EINVAL when the timeout is invalid, but we ignore this case here
192 * and assume that EINVAL always means: you have to wait manually.
193 */
194 if (errno == EINVAL)
195 {
196 ev_sleep (timeout);
197 return;
198 }
199 #endif
150 200
151 if (errno == EBADF) 201 if (errno == EBADF)
152 fd_ebadf (EV_A); 202 fd_ebadf (EV_A);
153 else if (errno == ENOMEM && !syserr_cb) 203 else if (errno == ENOMEM && !syserr_cb)
154 fd_enomem (EV_A); 204 fd_enomem (EV_A);
155 else if (errno != EINTR) 205 else if (errno != EINTR)
156 syserr ("(libev) select"); 206 ev_syserr ("(libev) select");
157 207
158 return; 208 return;
159 } 209 }
160 210
161#if EV_SELECT_USE_FD_SET 211#if EV_SELECT_USE_FD_SET
173 int handle = fd; 223 int handle = fd;
174 #endif 224 #endif
175 225
176 if (FD_ISSET (handle, (fd_set *)vec_ro)) events |= EV_READ; 226 if (FD_ISSET (handle, (fd_set *)vec_ro)) events |= EV_READ;
177 if (FD_ISSET (handle, (fd_set *)vec_wo)) events |= EV_WRITE; 227 if (FD_ISSET (handle, (fd_set *)vec_wo)) events |= EV_WRITE;
228 #ifdef _WIN32
229 if (FD_ISSET (handle, (fd_set *)vec_eo)) events |= EV_WRITE;
230 #endif
178 231
179 if (expect_true (events)) 232 if (expect_true (events))
180 fd_event (EV_A_ fd, events); 233 fd_event (EV_A_ fd, events);
181 } 234 }
182 } 235 }
187 int word, bit; 240 int word, bit;
188 for (word = vec_max; word--; ) 241 for (word = vec_max; word--; )
189 { 242 {
190 fd_mask word_r = ((fd_mask *)vec_ro) [word]; 243 fd_mask word_r = ((fd_mask *)vec_ro) [word];
191 fd_mask word_w = ((fd_mask *)vec_wo) [word]; 244 fd_mask word_w = ((fd_mask *)vec_wo) [word];
245 #ifdef _WIN32
246 word_w |= ((fd_mask *)vec_eo) [word];
247 #endif
192 248
193 if (word_r || word_w) 249 if (word_r || word_w)
194 for (bit = NFDBITS; bit--; ) 250 for (bit = NFDBITS; bit--; )
195 { 251 {
196 fd_mask mask = 1UL << bit; 252 fd_mask mask = 1UL << bit;
214 backend_fudge = 0.; /* posix says this is zero */ 270 backend_fudge = 0.; /* posix says this is zero */
215 backend_modify = select_modify; 271 backend_modify = select_modify;
216 backend_poll = select_poll; 272 backend_poll = select_poll;
217 273
218#if EV_SELECT_USE_FD_SET 274#if EV_SELECT_USE_FD_SET
219 vec_max = FD_SETSIZE / 32;
220 vec_ri = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_ri); 275 vec_ri = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_ri);
221 vec_ro = ev_malloc (sizeof (fd_set)); 276 vec_ro = ev_malloc (sizeof (fd_set));
222 vec_wi = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_wi); 277 vec_wi = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_wi);
223 vec_wo = ev_malloc (sizeof (fd_set)); 278 vec_wo = ev_malloc (sizeof (fd_set));
279 #ifdef _WIN32
280 vec_eo = ev_malloc (sizeof (fd_set));
281 #endif
224#else 282#else
225 vec_max = 0; 283 vec_max = 0;
226 vec_ri = 0; 284 vec_ri = 0;
227 vec_ri = 0; 285 vec_ri = 0;
228 vec_wo = 0; 286 vec_wo = 0;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines