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.40 by root, Tue Jan 6 19:46:56 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
74 if (oev == nev) 70 if (oev == nev)
75 return; 71 return;
76 72
77 { 73 {
78#if EV_SELECT_USE_FD_SET 74#if EV_SELECT_USE_FD_SET
75 assert (("libev: fd >= FD_SETSIZE passed to fd_set-based select backend", fd < FD_SETSIZE));
79 76
80 #if EV_SELECT_IS_WINSOCKET 77 #if EV_SELECT_IS_WINSOCKET
81 SOCKET handle = anfds [fd].handle; 78 SOCKET handle = anfds [fd].handle;
82 #else 79 #else
83 int handle = fd; 80 int handle = fd;
84 #endif 81 #endif
85 82
83 /* FD_SET is broken on windows (it adds the fd to a set twice or more,
84 * which eventually leads to overflows). Need to call it only on changes.
85 */
86 #if EV_SELECT_IS_WINSOCKET
87 if ((oev ^ nev) & EV_READ)
88 #endif
86 if (nev & EV_READ) 89 if (nev & EV_READ)
87 FD_SET (handle, (fd_set *)vec_ri); 90 FD_SET (handle, (fd_set *)vec_ri);
88 else 91 else
89 FD_CLR (handle, (fd_set *)vec_ri); 92 FD_CLR (handle, (fd_set *)vec_ri);
90 93
94 #if EV_SELECT_IS_WINSOCKET
95 if ((oev ^ nev) & EV_WRITE)
96 #endif
91 if (nev & EV_WRITE) 97 if (nev & EV_WRITE)
92 FD_SET (handle, (fd_set *)vec_wi); 98 FD_SET (handle, (fd_set *)vec_wi);
93 else 99 else
94 FD_CLR (handle, (fd_set *)vec_wi); 100 FD_CLR (handle, (fd_set *)vec_wi);
95 101
96#else 102#else
97 103
98 int word = fd / NFDBITS; 104 int word = fd / NFDBITS;
99 fd_mask mask = 1UL << (fd % NFDBITS); 105 fd_mask mask = 1UL << (fd % NFDBITS);
100 106
101 if (expect_false (vec_max < word + 1)) 107 if (expect_false (vec_max <= word))
102 { 108 {
103 int new_max = word + 1; 109 int new_max = word + 1;
104 110
105 vec_ri = ev_realloc (vec_ri, new_max * NFDBYTES); 111 vec_ri = ev_realloc (vec_ri, new_max * NFDBYTES);
106 vec_ro = ev_realloc (vec_ro, new_max * NFDBYTES); /* could free/malloc */ 112 vec_ro = ev_realloc (vec_ro, new_max * NFDBYTES); /* could free/malloc */
107 vec_wi = ev_realloc (vec_wi, new_max * NFDBYTES); 113 vec_wi = ev_realloc (vec_wi, new_max * NFDBYTES);
108 vec_wo = ev_realloc (vec_wo, new_max * NFDBYTES); /* could free/malloc */ 114 vec_wo = ev_realloc (vec_wo, new_max * NFDBYTES); /* could free/malloc */
115 #ifdef _WIN32
116 vec_eo = ev_realloc (vec_eo, new_max * NFDBYTES); /* could free/malloc */
117 #endif
109 118
110 for (; vec_max < new_max; ++vec_max) 119 for (; vec_max < new_max; ++vec_max)
111 ((fd_mask *)vec_ri) [vec_max] = 120 ((fd_mask *)vec_ri) [vec_max] =
112 ((fd_mask *)vec_wi) [vec_max] = 0; 121 ((fd_mask *)vec_wi) [vec_max] = 0;
113 } 122 }
126static void 135static void
127select_poll (EV_P_ ev_tstamp timeout) 136select_poll (EV_P_ ev_tstamp timeout)
128{ 137{
129 struct timeval tv; 138 struct timeval tv;
130 int res; 139 int res;
131 140 int fd_setsize;
132#if EV_SELECT_USE_FD_SET
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 141
140 tv.tv_sec = (long)timeout; 142 tv.tv_sec = (long)timeout;
141 tv.tv_usec = (long)((timeout - (ev_tstamp)tv.tv_sec) * 1e6); 143 tv.tv_usec = (long)((timeout - (ev_tstamp)tv.tv_sec) * 1e6);
142 144
145#if EV_SELECT_USE_FD_SET
146 fd_setsize = sizeof (fd_set);
147#else
148 fd_setsize = vec_max * NFDBYTES;
149#endif
150
151 memcpy (vec_ro, vec_ri, fd_setsize);
152 memcpy (vec_wo, vec_wi, fd_setsize);
153
154#ifdef _WIN32
155 /* pass in the write set as except set.
156 * the idea behind this is to work around a windows bug that causes
157 * errors to be reported as an exception and not by setting
158 * the writable bit. this is so uncontrollably lame.
159 */
160 memcpy (vec_eo, vec_wi, fd_setsize);
161 res = select (vec_max * NFDBITS, (fd_set *)vec_ro, (fd_set *)vec_wo, (fd_set *)vec_eo, &tv);
162#elif EV_SELECT_USE_FD_SET
163 fd_setsize = anfdmax < FD_SETSIZE ? anfdmax : FD_SETSIZE;
164 res = select (fd_setsize, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv);
165#else
143 res = select (vec_max * NFDBITS, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv); 166 res = select (vec_max * NFDBITS, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv);
167#endif
144 168
145 if (expect_false (res < 0)) 169 if (expect_false (res < 0))
146 { 170 {
147 #if EV_SELECT_IS_WINSOCKET 171 #if EV_SELECT_IS_WINSOCKET
148 errno = WSAGetLastError (); 172 errno = WSAGetLastError ();
149 #endif 173 #endif
174 #ifdef WSABASEERR
175 /* on windows, select returns incompatible error codes, fix this */
176 if (errno >= WSABASEERR && errno < WSABASEERR + 1000)
177 if (errno == WSAENOTSOCK)
178 errno = EBADF;
179 else
180 errno -= WSABASEERR;
181 #endif
182
183 #ifdef _WIN32
184 /* select on windows errornously returns EINVAL when no fd sets have been
185 * provided (this is documented). what microsoft doesn't tell you that this bug
186 * exists even when the fd sets _are_ provided, so we have to check for this bug
187 * here and emulate by sleeping manually.
188 * we also get EINVAL when the timeout is invalid, but we ignore this case here
189 * and assume that EINVAL always means: you have to wait manually.
190 */
191 if (errno == EINVAL)
192 {
193 ev_sleep (timeout);
194 return;
195 }
196 #endif
150 197
151 if (errno == EBADF) 198 if (errno == EBADF)
152 fd_ebadf (EV_A); 199 fd_ebadf (EV_A);
153 else if (errno == ENOMEM && !syserr_cb) 200 else if (errno == ENOMEM && !syserr_cb)
154 fd_enomem (EV_A); 201 fd_enomem (EV_A);
155 else if (errno != EINTR) 202 else if (errno != EINTR)
156 syserr ("(libev) select"); 203 ev_syserr ("(libev) select");
157 204
158 return; 205 return;
159 } 206 }
160 207
161#if EV_SELECT_USE_FD_SET 208#if EV_SELECT_USE_FD_SET
173 int handle = fd; 220 int handle = fd;
174 #endif 221 #endif
175 222
176 if (FD_ISSET (handle, (fd_set *)vec_ro)) events |= EV_READ; 223 if (FD_ISSET (handle, (fd_set *)vec_ro)) events |= EV_READ;
177 if (FD_ISSET (handle, (fd_set *)vec_wo)) events |= EV_WRITE; 224 if (FD_ISSET (handle, (fd_set *)vec_wo)) events |= EV_WRITE;
225 #ifdef _WIN32
226 if (FD_ISSET (handle, (fd_set *)vec_eo)) events |= EV_WRITE;
227 #endif
178 228
179 if (expect_true (events)) 229 if (expect_true (events))
180 fd_event (EV_A_ fd, events); 230 fd_event (EV_A_ fd, events);
181 } 231 }
182 } 232 }
187 int word, bit; 237 int word, bit;
188 for (word = vec_max; word--; ) 238 for (word = vec_max; word--; )
189 { 239 {
190 fd_mask word_r = ((fd_mask *)vec_ro) [word]; 240 fd_mask word_r = ((fd_mask *)vec_ro) [word];
191 fd_mask word_w = ((fd_mask *)vec_wo) [word]; 241 fd_mask word_w = ((fd_mask *)vec_wo) [word];
242 #ifdef _WIN32
243 word_w |= ((fd_mask *)vec_eo) [word];
244 #endif
192 245
193 if (word_r || word_w) 246 if (word_r || word_w)
194 for (bit = NFDBITS; bit--; ) 247 for (bit = NFDBITS; bit--; )
195 { 248 {
196 fd_mask mask = 1UL << bit; 249 fd_mask mask = 1UL << bit;
214 backend_fudge = 0.; /* posix says this is zero */ 267 backend_fudge = 0.; /* posix says this is zero */
215 backend_modify = select_modify; 268 backend_modify = select_modify;
216 backend_poll = select_poll; 269 backend_poll = select_poll;
217 270
218#if EV_SELECT_USE_FD_SET 271#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); 272 vec_ri = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_ri);
221 vec_ro = ev_malloc (sizeof (fd_set)); 273 vec_ro = ev_malloc (sizeof (fd_set));
222 vec_wi = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_wi); 274 vec_wi = ev_malloc (sizeof (fd_set)); FD_ZERO ((fd_set *)vec_wi);
223 vec_wo = ev_malloc (sizeof (fd_set)); 275 vec_wo = ev_malloc (sizeof (fd_set));
276 #ifdef _WIN32
277 vec_eo = ev_malloc (sizeof (fd_set));
278 #endif
224#else 279#else
225 vec_max = 0; 280 vec_max = 0;
226 vec_ri = 0; 281 vec_ri = 0;
227 vec_ri = 0; 282 vec_ri = 0;
228 vec_wo = 0; 283 vec_wo = 0;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines