… | |
… | |
29 | * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
29 | * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
30 | */ |
30 | */ |
31 | |
31 | |
32 | #include <stddef.h> |
32 | #include <stddef.h> |
33 | #include <stdlib.h> |
33 | #include <stdlib.h> |
|
|
34 | #include <assert.h> |
|
|
35 | |
|
|
36 | #ifndef WIN32 |
34 | #include <sys/time.h> |
37 | # include <sys/time.h> |
|
|
38 | #endif |
35 | |
39 | |
|
|
40 | #ifdef EV_EVENT_H |
|
|
41 | # include EV_EVENT_H |
|
|
42 | #else |
36 | #include "event.h" |
43 | # include "event.h" |
|
|
44 | #endif |
37 | |
45 | |
38 | #if EV_MULTIPLICITY |
46 | #if EV_MULTIPLICITY |
39 | # define dLOOPev struct ev_loop *loop = (struct ev_loop *)ev->ev_base |
47 | # define dLOOPev struct ev_loop *loop = (struct ev_loop *)ev->ev_base |
40 | # define dLOOPbase struct ev_loop *loop = (struct ev_loop *)base |
48 | # define dLOOPbase struct ev_loop *loop = (struct ev_loop *)base |
41 | #else |
49 | #else |
… | |
… | |
47 | struct event_base |
55 | struct event_base |
48 | { |
56 | { |
49 | int dummy; |
57 | int dummy; |
50 | }; |
58 | }; |
51 | |
59 | |
52 | static struct event_base x_base, *x_cur; |
60 | static struct event_base *x_cur; |
53 | |
61 | |
54 | static void |
62 | static void |
55 | tv_set (struct timeval *tv, ev_tstamp at) |
63 | tv_set (struct timeval *tv, ev_tstamp at) |
56 | { |
64 | { |
57 | tv->tv_sec = (long)at; |
65 | tv->tv_sec = (long)at; |
… | |
… | |
80 | } |
88 | } |
81 | |
89 | |
82 | void *event_init (void) |
90 | void *event_init (void) |
83 | { |
91 | { |
84 | #if EV_MULTIPLICITY |
92 | #if EV_MULTIPLICITY |
|
|
93 | if (x_cur) |
85 | x_cur = (struct event_base *)ev_loop_new (EVMETHOD_AUTO); |
94 | x_cur = (struct event_base *)ev_loop_new (EVFLAG_AUTO); |
|
|
95 | else |
|
|
96 | x_cur = (struct event_base *)ev_default_loop (EVFLAG_AUTO); |
86 | #else |
97 | #else |
87 | x_cur = &x_base; |
98 | assert (("multiple event bases not supported when not compiled with EV_MULTIPLICITY", !x_cur)); |
|
|
99 | |
|
|
100 | x_cur = (struct event_base *)(long)ev_default_loop (EVFLAG_AUTO); |
88 | #endif |
101 | #endif |
89 | |
102 | |
90 | return x_cur; |
103 | return x_cur; |
91 | } |
104 | } |
92 | |
105 | |
93 | void event_base_free (struct event_base *base) |
106 | void event_base_free (struct event_base *base) |
94 | { |
107 | { |
95 | dLOOPbase; |
108 | dLOOPbase; |
96 | |
109 | |
97 | #if EV_MULTIPLICITY |
110 | #if EV_MULTIPLICITY |
|
|
111 | if (ev_default_loop (EVMETHOD_AUTO) != loop) |
98 | ev_loop_delete (loop); |
112 | ev_loop_destroy (loop); |
99 | #endif |
113 | #endif |
100 | } |
114 | } |
101 | |
115 | |
102 | int event_dispatch (void) |
116 | int event_dispatch (void) |
103 | { |
117 | { |
… | |
… | |
125 | x_cb (struct event *ev, int revents) |
139 | x_cb (struct event *ev, int revents) |
126 | { |
140 | { |
127 | revents &= EV_READ | EV_WRITE | EV_TIMEOUT | EV_SIGNAL; |
141 | revents &= EV_READ | EV_WRITE | EV_TIMEOUT | EV_SIGNAL; |
128 | |
142 | |
129 | ev->ev_res = revents; |
143 | ev->ev_res = revents; |
130 | ev->ev_callback (ev->ev_fd, revents, ev->ev_arg); |
144 | ev->ev_callback (ev->ev_fd, (short)revents, ev->ev_arg); |
131 | } |
145 | } |
132 | |
146 | |
133 | static void |
147 | static void |
134 | x_cb_sig (EV_P_ struct ev_signal *w, int revents) |
148 | x_cb_sig (EV_P_ struct ev_signal *w, int revents) |
135 | { |
149 | { |
136 | x_cb ((struct event *)(((char *)w) - offsetof (struct event, iosig.sig)), revents); |
150 | struct event *ev = (struct event *)(((char *)w) - offsetof (struct event, iosig.sig)); |
|
|
151 | |
|
|
152 | if (revents & EV_ERROR) |
|
|
153 | event_del (ev); |
|
|
154 | |
|
|
155 | x_cb (ev, revents); |
137 | } |
156 | } |
138 | |
157 | |
139 | static void |
158 | static void |
140 | x_cb_io (EV_P_ struct ev_io *w, int revents) |
159 | x_cb_io (EV_P_ struct ev_io *w, int revents) |
141 | { |
160 | { |
142 | struct event *ev = (struct event *)(((char *)w) - offsetof (struct event, iosig.io)); |
161 | struct event *ev = (struct event *)(((char *)w) - offsetof (struct event, iosig.io)); |
143 | |
162 | |
|
|
163 | if (revents & EV_ERROR) |
|
|
164 | event_del (ev); |
144 | if (!(ev->ev_events & EV_PERSIST) && ev_is_active (w)) |
165 | else if (!(ev->ev_events & EV_PERSIST) && ev_is_active (w)) |
|
|
166 | { |
145 | ev_io_stop (EV_A_ w); |
167 | ev_io_stop (EV_A_ w); |
|
|
168 | ev->ev_flags &= ~EVLIST_INSERTED; |
|
|
169 | } |
146 | |
170 | |
147 | x_cb (ev, revents); |
171 | x_cb (ev, revents); |
148 | } |
172 | } |
149 | |
173 | |
150 | static void |
174 | static void |
151 | x_cb_to (EV_P_ struct ev_timer *w, int revents) |
175 | x_cb_to (EV_P_ struct ev_timer *w, int revents) |
152 | { |
176 | { |
153 | x_cb ((struct event *)(((char *)w) - offsetof (struct event, to)), revents); |
177 | struct event *ev = (struct event *)(((char *)w) - offsetof (struct event, to)); |
|
|
178 | |
|
|
179 | event_del (ev); |
|
|
180 | |
|
|
181 | x_cb (ev, revents); |
154 | } |
182 | } |
155 | |
183 | |
156 | void event_set (struct event *ev, int fd, short events, void (*cb)(int, short, void *), void *arg) |
184 | void event_set (struct event *ev, int fd, short events, void (*cb)(int, short, void *), void *arg) |
157 | { |
185 | { |
158 | if (!ev->initialised) |
|
|
159 | { |
|
|
160 | ev->initialised = 1; |
|
|
161 | |
|
|
162 | if (events & EV_SIGNAL) |
186 | if (events & EV_SIGNAL) |
163 | ev_watcher_init (&ev->iosig.sig, x_cb_sig); |
187 | ev_init (&ev->iosig.sig, x_cb_sig); |
164 | else |
188 | else |
165 | ev_watcher_init (&ev->iosig.io, x_cb_io); |
189 | ev_init (&ev->iosig.io, x_cb_io); |
166 | |
190 | |
167 | ev_watcher_init (&ev->to, x_cb_to); |
191 | ev_init (&ev->to, x_cb_to); |
168 | } |
|
|
169 | |
192 | |
170 | ev->ev_base = x_cur; /* not threadsafe, but its like libevent works */ |
193 | ev->ev_base = x_cur; /* not threadsafe, but its like libevent works */ |
171 | ev->ev_fd = fd; |
194 | ev->ev_fd = fd; |
172 | ev->ev_events = events; |
195 | ev->ev_events = events; |
173 | ev->ev_pri = 0; |
196 | ev->ev_pri = 0; |
174 | ev->ev_callback = cb; |
197 | ev->ev_callback = cb; |
175 | ev->ev_arg = arg; |
198 | ev->ev_arg = arg; |
176 | ev->ev_res = 0; |
199 | ev->ev_res = 0; |
|
|
200 | ev->ev_flags = EVLIST_INIT; |
177 | } |
201 | } |
178 | |
202 | |
179 | int event_once (int fd, short events, void (*cb)(int, short, void *), void *arg, struct timeval *tv) |
203 | int event_once (int fd, short events, void (*cb)(int, short, void *), void *arg, struct timeval *tv) |
180 | { |
204 | { |
181 | return event_base_once (x_cur, fd, events, cb, arg, tv); |
205 | return event_base_once (x_cur, fd, events, cb, arg, tv); |
… | |
… | |
190 | |
214 | |
191 | if (ev->ev_events & EV_SIGNAL) |
215 | if (ev->ev_events & EV_SIGNAL) |
192 | { |
216 | { |
193 | ev_signal_set (&ev->iosig.sig, ev->ev_fd); |
217 | ev_signal_set (&ev->iosig.sig, ev->ev_fd); |
194 | ev_signal_start (EV_A_ &ev->iosig.sig); |
218 | ev_signal_start (EV_A_ &ev->iosig.sig); |
|
|
219 | |
|
|
220 | ev->ev_flags |= EVLIST_SIGNAL; |
195 | } |
221 | } |
196 | else if (ev->ev_events & (EV_READ | EV_WRITE)) |
222 | else if (ev->ev_events & (EV_READ | EV_WRITE)) |
197 | { |
223 | { |
198 | ev_io_set (&ev->iosig.io, ev->ev_fd, ev->ev_events & (EV_READ | EV_WRITE)); |
224 | ev_io_set (&ev->iosig.io, ev->ev_fd, ev->ev_events & (EV_READ | EV_WRITE)); |
199 | ev_io_start (EV_A_ &ev->iosig.io); |
225 | ev_io_start (EV_A_ &ev->iosig.io); |
|
|
226 | |
|
|
227 | ev->ev_flags |= EVLIST_INSERTED; |
200 | } |
228 | } |
201 | |
229 | |
202 | if (tv) |
230 | if (tv) |
203 | { |
231 | { |
204 | ev_timer_set (&ev->to, tv_get (tv), 0.); |
232 | ev_timer_set (&ev->to, tv_get (tv), 0.); |
205 | ev_timer_start (EV_A_ &ev->to); |
233 | ev_timer_start (EV_A_ &ev->to); |
|
|
234 | |
|
|
235 | ev->ev_flags |= EVLIST_TIMEOUT; |
206 | } |
236 | } |
|
|
237 | |
|
|
238 | ev->ev_flags |= EVLIST_ACTIVE; |
207 | |
239 | |
208 | return 0; |
240 | return 0; |
209 | } |
241 | } |
210 | |
242 | |
211 | int event_del (struct event *ev) |
243 | int event_del (struct event *ev) |
… | |
… | |
216 | { |
248 | { |
217 | /* sig */ |
249 | /* sig */ |
218 | if (ev_is_active (&ev->iosig.sig)) |
250 | if (ev_is_active (&ev->iosig.sig)) |
219 | ev_signal_stop (EV_A_ &ev->iosig.sig); |
251 | ev_signal_stop (EV_A_ &ev->iosig.sig); |
220 | } |
252 | } |
221 | else |
253 | else if (ev->ev_events & (EV_READ | EV_WRITE)) |
222 | { |
254 | { |
223 | /* io */ |
255 | /* io */ |
224 | if (ev_is_active (&ev->iosig.io)) |
256 | if (ev_is_active (&ev->iosig.io)) |
225 | ev_io_stop (EV_A_ &ev->iosig.io); |
257 | ev_io_stop (EV_A_ &ev->iosig.io); |
226 | } |
258 | } |
227 | |
259 | |
228 | if (ev_is_active (&ev->to)) |
260 | if (ev_is_active (&ev->to)) |
229 | ev_timer_stop (EV_A_ &ev->to); |
261 | ev_timer_stop (EV_A_ &ev->to); |
230 | |
262 | |
|
|
263 | ev->ev_flags = EVLIST_INIT; |
|
|
264 | |
231 | return 0; |
265 | return 0; |
|
|
266 | } |
|
|
267 | |
|
|
268 | void event_active (struct event *ev, int res, short ncalls) |
|
|
269 | { |
|
|
270 | dLOOPev; |
|
|
271 | |
|
|
272 | if (res & EV_TIMEOUT) |
|
|
273 | ev_feed_event (EV_A_ &ev->to, res & EV_TIMEOUT); |
|
|
274 | |
|
|
275 | if (res & EV_SIGNAL) |
|
|
276 | ev_feed_event (EV_A_ &ev->iosig.sig, res & EV_SIGNAL); |
|
|
277 | |
|
|
278 | if (res & (EV_READ | EV_WRITE)) |
|
|
279 | ev_feed_event (EV_A_ &ev->iosig.io, res & (EV_READ | EV_WRITE)); |
232 | } |
280 | } |
233 | |
281 | |
234 | int event_pending (struct event *ev, short events, struct timeval *tv) |
282 | int event_pending (struct event *ev, short events, struct timeval *tv) |
235 | { |
283 | { |
|
|
284 | short revents = 0; |
236 | dLOOPev; |
285 | dLOOPev; |
237 | |
286 | |
238 | short revents = 0; |
|
|
239 | |
287 | |
240 | if (ev->ev_events & EV_SIGNAL) |
288 | if (ev->ev_events & EV_SIGNAL) |
241 | { |
289 | { |
242 | /* sig */ |
290 | /* sig */ |
243 | if (ev->iosig.sig.pending) |
291 | if (ev_is_active (&ev->iosig.sig) || ev_is_pending (&ev->iosig.sig)) |
244 | revents |= EV_SIGNAL; |
292 | revents |= EV_SIGNAL; |
245 | } |
293 | } |
246 | else |
294 | else if (ev->ev_events & (EV_READ | EV_WRITE)) |
247 | { |
295 | { |
248 | /* io */ |
296 | /* io */ |
249 | if (ev->iosig.io.pending) |
297 | if (ev_is_active (&ev->iosig.io) || ev_is_pending (&ev->iosig.io)) |
250 | revents |= ev->ev_events & (EV_READ | EV_WRITE); |
298 | revents |= ev->ev_events & (EV_READ | EV_WRITE); |
251 | } |
299 | } |
252 | |
300 | |
253 | if (ev->to.pending) |
301 | if (ev->ev_events & EV_TIMEOUT || ev_is_active (&ev->to) || ev_is_pending (&ev->to)) |
254 | { |
302 | { |
255 | revents |= EV_TIMEOUT; |
303 | revents |= EV_TIMEOUT; |
256 | |
304 | |
257 | if (tv) |
305 | if (tv) |
258 | tv_set (tv, ev_now (EV_A)); /* not sure if this is right :) */ |
306 | tv_set (tv, ev_now (EV_A)); /* not sure if this is right :) */ |
… | |
… | |
302 | ev_unloop (EV_A_ EVUNLOOP_ONCE); |
350 | ev_unloop (EV_A_ EVUNLOOP_ONCE); |
303 | } |
351 | } |
304 | |
352 | |
305 | int event_base_loopexit (struct event_base *base, struct timeval *tv) |
353 | int event_base_loopexit (struct event_base *base, struct timeval *tv) |
306 | { |
354 | { |
|
|
355 | ev_tstamp after = tv_get (tv); |
307 | dLOOPbase; |
356 | dLOOPbase; |
308 | ev_tstamp after = tv_get (tv); |
|
|
309 | |
357 | |
310 | ev_once (EV_A_ -1, 0, after >= 0. ? after : 0., x_loopexit_cb, (void *)base); |
358 | ev_once (EV_A_ -1, 0, after >= 0. ? after : 0., x_loopexit_cb, (void *)base); |
311 | |
359 | |
312 | return -1; |
360 | return -1; |
313 | } |
361 | } |
… | |
… | |
320 | }; |
368 | }; |
321 | |
369 | |
322 | static void |
370 | static void |
323 | x_once_cb (int revents, void *arg) |
371 | x_once_cb (int revents, void *arg) |
324 | { |
372 | { |
325 | struct x_once *once = arg; |
373 | struct x_once *once = (struct x_once *)arg; |
326 | |
374 | |
327 | once->cb (once->fd, revents, once->arg); |
375 | once->cb (once->fd, (short)revents, once->arg); |
328 | free (once); |
376 | free (once); |
329 | } |
377 | } |
330 | |
378 | |
331 | int event_base_once (struct event_base *base, int fd, short events, void (*cb)(int, short, void *), void *arg, struct timeval *tv) |
379 | int event_base_once (struct event_base *base, int fd, short events, void (*cb)(int, short, void *), void *arg, struct timeval *tv) |
332 | { |
380 | { |
|
|
381 | struct x_once *once = (struct x_once *)malloc (sizeof (struct x_once)); |
333 | dLOOPbase; |
382 | dLOOPbase; |
334 | struct x_once *once = malloc (sizeof (struct x_once)); |
|
|
335 | |
383 | |
336 | if (!once) |
384 | if (!once) |
337 | return -1; |
385 | return -1; |
338 | |
386 | |
339 | once->fd = fd; |
387 | once->fd = fd; |
… | |
… | |
345 | return 0; |
393 | return 0; |
346 | } |
394 | } |
347 | |
395 | |
348 | int event_base_priority_init (struct event_base *base, int npri) |
396 | int event_base_priority_init (struct event_base *base, int npri) |
349 | { |
397 | { |
350 | dLOOPbase; |
398 | /*dLOOPbase;*/ |
351 | |
399 | |
352 | return 0; |
400 | return 0; |
353 | } |
401 | } |
354 | |
402 | |