… | |
… | |
30 | */ |
30 | */ |
31 | |
31 | |
32 | #include <stddef.h> |
32 | #include <stddef.h> |
33 | #include <stdlib.h> |
33 | #include <stdlib.h> |
34 | #include <sys/time.h> |
34 | #include <sys/time.h> |
|
|
35 | #include <assert.h> |
35 | |
36 | |
|
|
37 | #include "ev.h" |
36 | #include "event.h" |
38 | #include "event.h" |
37 | |
39 | |
|
|
40 | #if EV_MULTIPLICITY |
|
|
41 | # define dLOOPev struct ev_loop *loop = (struct ev_loop *)ev->ev_base |
|
|
42 | # define dLOOPbase struct ev_loop *loop = (struct ev_loop *)base |
|
|
43 | #else |
|
|
44 | # define dLOOPev |
|
|
45 | # define dLOOPbase |
|
|
46 | #endif |
|
|
47 | |
|
|
48 | /* never accessed, will always be cast from/to ev_loop */ |
38 | struct event_base |
49 | struct event_base |
39 | { |
50 | { |
40 | int dummy; |
51 | int dummy; |
41 | }; |
52 | }; |
42 | |
53 | |
43 | static int x_actives; |
|
|
44 | |
|
|
45 | static struct event_base x_base, *x_cur; |
54 | static struct event_base *x_cur; |
46 | |
55 | |
47 | static void |
56 | static void |
48 | tv_set (struct timeval *tv, ev_tstamp at) |
57 | tv_set (struct timeval *tv, ev_tstamp at) |
49 | { |
58 | { |
50 | tv->tv_sec = (long)at; |
59 | tv->tv_sec = (long)at; |
… | |
… | |
72 | return "libev"; |
81 | return "libev"; |
73 | } |
82 | } |
74 | |
83 | |
75 | void *event_init (void) |
84 | void *event_init (void) |
76 | { |
85 | { |
77 | if (ev_init (0)) |
86 | #if EV_MULTIPLICITY |
78 | return x_cur = &x_base; |
87 | if (x_cur) |
|
|
88 | x_cur = (struct event_base *)ev_loop_new (EVMETHOD_AUTO); |
|
|
89 | else |
|
|
90 | x_cur = (struct event_base *)ev_default_loop (EVMETHOD_AUTO); |
|
|
91 | #else |
|
|
92 | assert (("multiple event bases not supported when not compiled with EV_MULTIPLICITY", !x_cur)); |
79 | |
93 | |
|
|
94 | x_cur = (struct event_base *)(long)ev_default_loop (EVMETHOD_AUTO); |
|
|
95 | #endif |
|
|
96 | |
80 | return 0; |
97 | return x_cur; |
81 | } |
98 | } |
82 | |
99 | |
83 | void event_base_free (struct event_base *base) |
100 | void event_base_free (struct event_base *base) |
84 | { |
101 | { |
85 | /* nop */ |
102 | dLOOPbase; |
|
|
103 | |
|
|
104 | #if EV_MULTIPLICITY |
|
|
105 | if (ev_default_loop (EVMETHOD_AUTO) != loop) |
|
|
106 | ev_loop_destroy (loop); |
|
|
107 | #endif |
86 | } |
108 | } |
87 | |
109 | |
88 | int event_dispatch (void) |
110 | int event_dispatch (void) |
89 | { |
111 | { |
90 | return event_base_dispatch (x_cur); |
112 | return event_base_dispatch (x_cur); |
… | |
… | |
108 | } |
130 | } |
109 | |
131 | |
110 | static void |
132 | static void |
111 | x_cb (struct event *ev, int revents) |
133 | x_cb (struct event *ev, int revents) |
112 | { |
134 | { |
113 | if (ev->ev_events & EV_SIGNAL) |
|
|
114 | { |
|
|
115 | /* sig */ |
|
|
116 | if (ev_is_active (&ev->iosig.sig)) |
|
|
117 | { |
|
|
118 | ev_signal_stop (&ev->iosig.sig); |
|
|
119 | --x_actives; |
|
|
120 | } |
|
|
121 | } |
|
|
122 | else |
|
|
123 | { |
|
|
124 | /* io */ |
|
|
125 | if (!(ev->ev_events & EV_PERSIST) && ev_is_active (&ev->iosig.io)) |
|
|
126 | { |
|
|
127 | ev_io_stop (&ev->iosig.io); |
|
|
128 | --x_actives; |
|
|
129 | } |
|
|
130 | } |
|
|
131 | |
|
|
132 | revents &= EV_READ | EV_WRITE | EV_TIMEOUT | EV_SIGNAL; |
135 | revents &= EV_READ | EV_WRITE | EV_TIMEOUT | EV_SIGNAL; |
133 | |
|
|
134 | if (revents & EV_TIMEOUT) |
|
|
135 | --x_actives; |
|
|
136 | |
136 | |
137 | ev->ev_res = revents; |
137 | ev->ev_res = revents; |
138 | ev->ev_callback (ev->ev_fd, revents, ev->ev_arg); |
138 | ev->ev_callback (ev->ev_fd, revents, ev->ev_arg); |
139 | } |
139 | } |
140 | |
140 | |
141 | static void |
141 | static void |
142 | x_cb_io (struct ev_io *w, int revents) |
|
|
143 | { |
|
|
144 | x_cb ((struct event *)(((char *)w) - offsetof (struct event, iosig.io)), revents); |
|
|
145 | } |
|
|
146 | |
|
|
147 | static void |
|
|
148 | x_cb_to (struct ev_timer *w, int revents) |
|
|
149 | { |
|
|
150 | x_cb ((struct event *)(((char *)w) - offsetof (struct event, to)), revents); |
|
|
151 | } |
|
|
152 | |
|
|
153 | static void |
|
|
154 | x_cb_sig (struct ev_signal *w, int revents) |
142 | x_cb_sig (EV_P_ struct ev_signal *w, int revents) |
155 | { |
143 | { |
156 | x_cb ((struct event *)(((char *)w) - offsetof (struct event, iosig.sig)), revents); |
144 | x_cb ((struct event *)(((char *)w) - offsetof (struct event, iosig.sig)), revents); |
|
|
145 | } |
|
|
146 | |
|
|
147 | static void |
|
|
148 | x_cb_io (EV_P_ struct ev_io *w, int revents) |
|
|
149 | { |
|
|
150 | struct event *ev = (struct event *)(((char *)w) - offsetof (struct event, iosig.io)); |
|
|
151 | |
|
|
152 | if (!(ev->ev_events & EV_PERSIST) && ev_is_active (w)) |
|
|
153 | ev_io_stop (EV_A_ w); |
|
|
154 | |
|
|
155 | x_cb (ev, revents); |
|
|
156 | } |
|
|
157 | |
|
|
158 | static void |
|
|
159 | x_cb_to (EV_P_ struct ev_timer *w, int revents) |
|
|
160 | { |
|
|
161 | struct event *ev = (struct event *)(((char *)w) - offsetof (struct event, to)); |
|
|
162 | |
|
|
163 | event_del (ev); |
|
|
164 | |
|
|
165 | x_cb (ev, revents); |
157 | } |
166 | } |
158 | |
167 | |
159 | void event_set (struct event *ev, int fd, short events, void (*cb)(int, short, void *), void *arg) |
168 | void event_set (struct event *ev, int fd, short events, void (*cb)(int, short, void *), void *arg) |
160 | { |
169 | { |
161 | if (events & EV_SIGNAL) |
170 | if (events & EV_SIGNAL) |
… | |
… | |
163 | else |
172 | else |
164 | ev_watcher_init (&ev->iosig.io, x_cb_io); |
173 | ev_watcher_init (&ev->iosig.io, x_cb_io); |
165 | |
174 | |
166 | ev_watcher_init (&ev->to, x_cb_to); |
175 | ev_watcher_init (&ev->to, x_cb_to); |
167 | |
176 | |
168 | ev->ev_base = x_cur; |
177 | ev->ev_base = x_cur; /* not threadsafe, but its like libevent works */ |
169 | ev->ev_fd = fd; |
178 | ev->ev_fd = fd; |
170 | ev->ev_events = events; |
179 | ev->ev_events = events; |
171 | ev->ev_pri = 0; |
180 | ev->ev_pri = 0; |
172 | ev->ev_callback = cb; |
181 | ev->ev_callback = cb; |
173 | ev->ev_arg = arg; |
182 | ev->ev_arg = arg; |
… | |
… | |
179 | return event_base_once (x_cur, fd, events, cb, arg, tv); |
188 | return event_base_once (x_cur, fd, events, cb, arg, tv); |
180 | } |
189 | } |
181 | |
190 | |
182 | int event_add (struct event *ev, struct timeval *tv) |
191 | int event_add (struct event *ev, struct timeval *tv) |
183 | { |
192 | { |
|
|
193 | dLOOPev; |
|
|
194 | |
184 | /* disable all watchers */ |
195 | /* disable all watchers */ |
185 | event_del (ev); |
196 | event_del (ev); |
186 | |
197 | |
187 | if (ev->ev_events & EV_SIGNAL) |
198 | if (ev->ev_events & EV_SIGNAL) |
188 | { |
199 | { |
189 | ev_signal_set (&ev->iosig.sig, ev->ev_fd); |
200 | ev_signal_set (&ev->iosig.sig, ev->ev_fd); |
190 | ev_signal_start (&ev->iosig.sig); |
201 | ev_signal_start (EV_A_ &ev->iosig.sig); |
191 | ++x_actives; |
|
|
192 | } |
202 | } |
193 | else if (ev->ev_events & (EV_READ | EV_WRITE)) |
203 | else if (ev->ev_events & (EV_READ | EV_WRITE)) |
194 | { |
204 | { |
195 | ev_io_set (&ev->iosig.io, ev->ev_fd, ev->ev_events & (EV_READ | EV_WRITE)); |
205 | ev_io_set (&ev->iosig.io, ev->ev_fd, ev->ev_events & (EV_READ | EV_WRITE)); |
196 | ev_io_start (&ev->iosig.io); |
206 | ev_io_start (EV_A_ &ev->iosig.io); |
197 | ++x_actives; |
|
|
198 | } |
207 | } |
199 | |
208 | |
200 | if (tv) |
209 | if (tv) |
201 | { |
210 | { |
202 | ev_timer_set (&ev->to, tv_get (tv), 0.); |
211 | ev_timer_set (&ev->to, tv_get (tv), 0.); |
203 | ev_timer_start (&ev->to); |
212 | ev_timer_start (EV_A_ &ev->to); |
204 | ++x_actives; |
|
|
205 | } |
213 | } |
206 | |
214 | |
207 | return 0; |
215 | return 0; |
208 | } |
216 | } |
209 | |
217 | |
210 | int event_del (struct event *ev) |
218 | int event_del (struct event *ev) |
211 | { |
219 | { |
|
|
220 | dLOOPev; |
|
|
221 | |
212 | if (ev->ev_events & EV_SIGNAL) |
222 | if (ev->ev_events & EV_SIGNAL) |
213 | { |
223 | { |
214 | /* sig */ |
224 | /* sig */ |
215 | if (ev_is_active (&ev->iosig.sig)) |
225 | if (ev_is_active (&ev->iosig.sig)) |
216 | { |
|
|
217 | ev_signal_stop (&ev->iosig.sig); |
226 | ev_signal_stop (EV_A_ &ev->iosig.sig); |
218 | --x_actives; |
|
|
219 | } |
|
|
220 | } |
227 | } |
221 | else |
228 | else if (ev->ev_events & (EV_READ | EV_WRITE)) |
222 | { |
229 | { |
223 | /* io */ |
230 | /* io */ |
224 | if (ev_is_active (&ev->iosig.io)) |
231 | if (ev_is_active (&ev->iosig.io)) |
225 | { |
|
|
226 | ev_io_stop (&ev->iosig.io); |
232 | ev_io_stop (EV_A_ &ev->iosig.io); |
227 | --x_actives; |
|
|
228 | } |
|
|
229 | } |
233 | } |
230 | |
234 | |
231 | if (ev_is_active (&ev->to)) |
235 | if (ev_is_active (&ev->to)) |
232 | { |
|
|
233 | ev_timer_stop (&ev->to); |
236 | ev_timer_stop (EV_A_ &ev->to); |
234 | --x_actives; |
|
|
235 | } |
|
|
236 | |
237 | |
237 | return 0; |
238 | return 0; |
238 | } |
239 | } |
239 | |
240 | |
240 | int event_pending (struct event *ev, short events, struct timeval *tv) |
241 | int event_pending (struct event *ev, short events, struct timeval *tv) |
241 | { |
242 | { |
|
|
243 | dLOOPev; |
|
|
244 | |
242 | short revents = 0; |
245 | short revents = 0; |
243 | |
246 | |
244 | if (ev->ev_events & EV_SIGNAL) |
247 | if (ev->ev_events & EV_SIGNAL) |
245 | { |
248 | { |
246 | /* sig */ |
249 | /* sig */ |
247 | if (ev->iosig.sig.pending) |
250 | if (ev_is_active (&ev->iosig.sig) || ev_is_pending (&ev->iosig.sig)) |
248 | revents |= EV_SIGNAL; |
251 | revents |= EV_SIGNAL; |
249 | } |
252 | } |
250 | else |
253 | else if (ev->ev_events & (EV_READ | EV_WRITE)) |
251 | { |
254 | { |
252 | /* io */ |
255 | /* io */ |
253 | if (ev->iosig.io.pending) |
256 | if (ev_is_active (&ev->iosig.io) || ev_is_pending (&ev->iosig.io)) |
254 | revents |= ev->ev_events & (EV_READ | EV_WRITE); |
257 | revents |= ev->ev_events & (EV_READ | EV_WRITE); |
255 | } |
258 | } |
256 | |
259 | |
257 | if (ev->to.pending) |
260 | if (ev->ev_events & EV_TIMEOUT || ev_is_active (&ev->to) || ev_is_pending (&ev->to)) |
258 | { |
261 | { |
259 | revents |= EV_TIMEOUT; |
262 | revents |= EV_TIMEOUT; |
260 | |
263 | |
261 | if (tv) |
264 | if (tv) |
262 | tv_set (tv, ev_now); /* not sure if this is right :) */ |
265 | tv_set (tv, ev_now (EV_A)); /* not sure if this is right :) */ |
263 | } |
266 | } |
264 | |
267 | |
265 | return events & revents; |
268 | return events & revents; |
266 | } |
269 | } |
267 | |
270 | |
… | |
… | |
284 | return 0; |
287 | return 0; |
285 | } |
288 | } |
286 | |
289 | |
287 | int event_base_loop (struct event_base *base, int flags) |
290 | int event_base_loop (struct event_base *base, int flags) |
288 | { |
291 | { |
289 | do |
292 | dLOOPbase; |
290 | { |
293 | |
291 | ev_loop (flags | EVLOOP_ONESHOT); |
294 | ev_loop (EV_A_ flags); |
292 | } |
|
|
293 | while (!(flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK)) && x_actives && !ev_loop_done); |
|
|
294 | |
295 | |
295 | return 0; |
296 | return 0; |
296 | } |
297 | } |
297 | |
298 | |
298 | int event_base_dispatch (struct event_base *base) |
299 | int event_base_dispatch (struct event_base *base) |
299 | { |
300 | { |
300 | return event_base_loop (base, 0); |
301 | return event_base_loop (base, 0); |
301 | } |
302 | } |
302 | |
303 | |
303 | static void |
304 | static void |
304 | x_loopexit_cb (int revents, void *arg) |
305 | x_loopexit_cb (int revents, void *base) |
305 | { |
306 | { |
306 | ev_loop_done = 2; |
307 | dLOOPbase; |
|
|
308 | |
|
|
309 | ev_unloop (EV_A_ EVUNLOOP_ONCE); |
307 | } |
310 | } |
308 | |
311 | |
309 | int event_base_loopexit (struct event_base *base, struct timeval *tv) |
312 | int event_base_loopexit (struct event_base *base, struct timeval *tv) |
310 | { |
313 | { |
|
|
314 | dLOOPbase; |
311 | ev_tstamp after = tv_get (tv); |
315 | ev_tstamp after = tv_get (tv); |
312 | |
316 | |
313 | ev_once (-1, 0, after >= 0. ? after : 0., x_loopexit_cb, (void *)base); |
317 | ev_once (EV_A_ -1, 0, after >= 0. ? after : 0., x_loopexit_cb, (void *)base); |
314 | |
318 | |
315 | return -1; |
319 | return -1; |
316 | } |
320 | } |
317 | |
321 | |
318 | struct x_once |
322 | struct x_once |
… | |
… | |
331 | free (once); |
335 | free (once); |
332 | } |
336 | } |
333 | |
337 | |
334 | int event_base_once (struct event_base *base, int fd, short events, void (*cb)(int, short, void *), void *arg, struct timeval *tv) |
338 | int event_base_once (struct event_base *base, int fd, short events, void (*cb)(int, short, void *), void *arg, struct timeval *tv) |
335 | { |
339 | { |
|
|
340 | dLOOPbase; |
336 | struct x_once *once = malloc (sizeof (struct x_once)); |
341 | struct x_once *once = malloc (sizeof (struct x_once)); |
337 | |
342 | |
338 | if (!once) |
343 | if (!once) |
339 | return -1; |
344 | return -1; |
340 | |
345 | |
341 | once->fd = fd; |
346 | once->fd = fd; |
342 | once->cb = cb; |
347 | once->cb = cb; |
343 | once->arg = arg; |
348 | once->arg = arg; |
344 | |
349 | |
345 | ev_once (fd, events & (EV_READ | EV_WRITE), tv_get (tv), x_once_cb, (void *)once); |
350 | ev_once (EV_A_ fd, events & (EV_READ | EV_WRITE), tv_get (tv), x_once_cb, (void *)once); |
346 | |
351 | |
347 | return 0; |
352 | return 0; |
348 | } |
353 | } |
349 | |
354 | |
350 | int event_base_priority_init (struct event_base *base, int npri) |
355 | int event_base_priority_init (struct event_base *base, int npri) |
351 | { |
356 | { |
352 | return 0; |
357 | /*dLOOPbase;*/ |
353 | } |
|
|
354 | |
358 | |
|
|
359 | return 0; |
|
|
360 | } |
|
|
361 | |