1 | /*
|
---|
2 | Unix SMB/CIFS implementation.
|
---|
3 | Timed event library.
|
---|
4 | Copyright (C) Andrew Tridgell 1992-1998
|
---|
5 | Copyright (C) Volker Lendecke 2005
|
---|
6 |
|
---|
7 | This program is free software; you can redistribute it and/or modify
|
---|
8 | it under the terms of the GNU General Public License as published by
|
---|
9 | the Free Software Foundation; either version 3 of the License, or
|
---|
10 | (at your option) any later version.
|
---|
11 |
|
---|
12 | This program is distributed in the hope that it will be useful,
|
---|
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
15 | GNU General Public License for more details.
|
---|
16 |
|
---|
17 | You should have received a copy of the GNU General Public License
|
---|
18 | along with this program. If not, see <http://www.gnu.org/licenses/>.
|
---|
19 | */
|
---|
20 |
|
---|
21 | #include "includes.h"
|
---|
22 | #include <tevent_internal.h>
|
---|
23 |
|
---|
24 | void event_fd_set_writeable(struct tevent_fd *fde)
|
---|
25 | {
|
---|
26 | TEVENT_FD_WRITEABLE(fde);
|
---|
27 | }
|
---|
28 |
|
---|
29 | void event_fd_set_not_writeable(struct tevent_fd *fde)
|
---|
30 | {
|
---|
31 | TEVENT_FD_NOT_WRITEABLE(fde);
|
---|
32 | }
|
---|
33 |
|
---|
34 | void event_fd_set_readable(struct tevent_fd *fde)
|
---|
35 | {
|
---|
36 | TEVENT_FD_READABLE(fde);
|
---|
37 | }
|
---|
38 |
|
---|
39 | void event_fd_set_not_readable(struct tevent_fd *fde)
|
---|
40 | {
|
---|
41 | TEVENT_FD_NOT_READABLE(fde);
|
---|
42 | }
|
---|
43 |
|
---|
44 | /*
|
---|
45 | * Return if there's something in the queue
|
---|
46 | */
|
---|
47 |
|
---|
48 | bool event_add_to_select_args(struct tevent_context *ev,
|
---|
49 | const struct timeval *now,
|
---|
50 | fd_set *read_fds, fd_set *write_fds,
|
---|
51 | struct timeval *timeout, int *maxfd)
|
---|
52 | {
|
---|
53 | struct tevent_fd *fde;
|
---|
54 | struct timeval diff;
|
---|
55 | bool ret = false;
|
---|
56 |
|
---|
57 | for (fde = ev->fd_events; fde; fde = fde->next) {
|
---|
58 | if (fde->flags & EVENT_FD_READ) {
|
---|
59 | FD_SET(fde->fd, read_fds);
|
---|
60 | ret = true;
|
---|
61 | }
|
---|
62 | if (fde->flags & EVENT_FD_WRITE) {
|
---|
63 | FD_SET(fde->fd, write_fds);
|
---|
64 | ret = true;
|
---|
65 | }
|
---|
66 |
|
---|
67 | if ((fde->flags & (EVENT_FD_READ|EVENT_FD_WRITE))
|
---|
68 | && (fde->fd > *maxfd)) {
|
---|
69 | *maxfd = fde->fd;
|
---|
70 | }
|
---|
71 | }
|
---|
72 |
|
---|
73 | if (ev->immediate_events != NULL) {
|
---|
74 | *timeout = timeval_zero();
|
---|
75 | return true;
|
---|
76 | }
|
---|
77 |
|
---|
78 | if (ev->timer_events == NULL) {
|
---|
79 | return ret;
|
---|
80 | }
|
---|
81 |
|
---|
82 | diff = timeval_until(now, &ev->timer_events->next_event);
|
---|
83 | *timeout = timeval_min(timeout, &diff);
|
---|
84 |
|
---|
85 | return true;
|
---|
86 | }
|
---|
87 |
|
---|
88 | bool run_events(struct tevent_context *ev,
|
---|
89 | int selrtn, fd_set *read_fds, fd_set *write_fds)
|
---|
90 | {
|
---|
91 | struct tevent_fd *fde;
|
---|
92 | struct timeval now;
|
---|
93 |
|
---|
94 | if (ev->signal_events &&
|
---|
95 | tevent_common_check_signal(ev)) {
|
---|
96 | return true;
|
---|
97 | }
|
---|
98 |
|
---|
99 | if (ev->immediate_events &&
|
---|
100 | tevent_common_loop_immediate(ev)) {
|
---|
101 | return true;
|
---|
102 | }
|
---|
103 |
|
---|
104 | GetTimeOfDay(&now);
|
---|
105 |
|
---|
106 | if ((ev->timer_events != NULL)
|
---|
107 | && (timeval_compare(&now, &ev->timer_events->next_event) >= 0)) {
|
---|
108 | /* this older events system did not auto-free timed
|
---|
109 | events on running them, and had a race condition
|
---|
110 | where the event could be called twice if the
|
---|
111 | talloc_free of the te happened after the callback
|
---|
112 | made a call which invoked the event loop. To avoid
|
---|
113 | this while still allowing old code which frees the
|
---|
114 | te, we need to create a temporary context which
|
---|
115 | will be used to ensure the te is freed. We also
|
---|
116 | remove the te from the timed event list before we
|
---|
117 | call the handler, to ensure we can't loop */
|
---|
118 |
|
---|
119 | struct tevent_timer *te = ev->timer_events;
|
---|
120 | TALLOC_CTX *tmp_ctx = talloc_new(ev);
|
---|
121 |
|
---|
122 | DEBUG(10, ("Running timed event \"%s\" %p\n",
|
---|
123 | ev->timer_events->handler_name, ev->timer_events));
|
---|
124 |
|
---|
125 | DLIST_REMOVE(ev->timer_events, te);
|
---|
126 | talloc_steal(tmp_ctx, te);
|
---|
127 |
|
---|
128 | te->handler(ev, te, now, te->private_data);
|
---|
129 |
|
---|
130 | talloc_free(tmp_ctx);
|
---|
131 | return true;
|
---|
132 | }
|
---|
133 |
|
---|
134 | if (selrtn == 0) {
|
---|
135 | /*
|
---|
136 | * No fd ready
|
---|
137 | */
|
---|
138 | return false;
|
---|
139 | }
|
---|
140 |
|
---|
141 | for (fde = ev->fd_events; fde; fde = fde->next) {
|
---|
142 | uint16 flags = 0;
|
---|
143 |
|
---|
144 | if (FD_ISSET(fde->fd, read_fds)) flags |= EVENT_FD_READ;
|
---|
145 | if (FD_ISSET(fde->fd, write_fds)) flags |= EVENT_FD_WRITE;
|
---|
146 |
|
---|
147 | if (flags & fde->flags) {
|
---|
148 | fde->handler(ev, fde, flags, fde->private_data);
|
---|
149 | return true;
|
---|
150 | }
|
---|
151 | }
|
---|
152 |
|
---|
153 | return false;
|
---|
154 | }
|
---|
155 |
|
---|
156 |
|
---|
157 | struct timeval *get_timed_events_timeout(struct tevent_context *ev,
|
---|
158 | struct timeval *to_ret)
|
---|
159 | {
|
---|
160 | struct timeval now;
|
---|
161 |
|
---|
162 | if ((ev->timer_events == NULL) && (ev->immediate_events == NULL)) {
|
---|
163 | return NULL;
|
---|
164 | }
|
---|
165 | if (ev->immediate_events != NULL) {
|
---|
166 | *to_ret = timeval_zero();
|
---|
167 | return to_ret;
|
---|
168 | }
|
---|
169 |
|
---|
170 | now = timeval_current();
|
---|
171 | *to_ret = timeval_until(&now, &ev->timer_events->next_event);
|
---|
172 |
|
---|
173 | DEBUG(10, ("timed_events_timeout: %d/%d\n", (int)to_ret->tv_sec,
|
---|
174 | (int)to_ret->tv_usec));
|
---|
175 |
|
---|
176 | return to_ret;
|
---|
177 | }
|
---|
178 |
|
---|
179 | static int s3_event_loop_once(struct tevent_context *ev, const char *location)
|
---|
180 | {
|
---|
181 | struct timeval now, to;
|
---|
182 | fd_set r_fds, w_fds;
|
---|
183 | int maxfd = 0;
|
---|
184 | int ret;
|
---|
185 |
|
---|
186 | FD_ZERO(&r_fds);
|
---|
187 | FD_ZERO(&w_fds);
|
---|
188 |
|
---|
189 | to.tv_sec = 9999; /* Max timeout */
|
---|
190 | to.tv_usec = 0;
|
---|
191 |
|
---|
192 | if (run_events(ev, 0, NULL, NULL)) {
|
---|
193 | return 0;
|
---|
194 | }
|
---|
195 |
|
---|
196 | GetTimeOfDay(&now);
|
---|
197 |
|
---|
198 | if (!event_add_to_select_args(ev, &now, &r_fds, &w_fds, &to, &maxfd)) {
|
---|
199 | return -1;
|
---|
200 | }
|
---|
201 |
|
---|
202 | ret = sys_select(maxfd+1, &r_fds, &w_fds, NULL, &to);
|
---|
203 |
|
---|
204 | if (ret == -1 && errno != EINTR) {
|
---|
205 | tevent_debug(ev, TEVENT_DEBUG_FATAL,
|
---|
206 | "sys_select() failed: %d:%s\n",
|
---|
207 | errno, strerror(errno));
|
---|
208 | return -1;
|
---|
209 | }
|
---|
210 |
|
---|
211 | run_events(ev, ret, &r_fds, &w_fds);
|
---|
212 | return 0;
|
---|
213 | }
|
---|
214 |
|
---|
215 | void event_context_reinit(struct tevent_context *ev)
|
---|
216 | {
|
---|
217 | tevent_common_context_destructor(ev);
|
---|
218 | return;
|
---|
219 | }
|
---|
220 |
|
---|
221 | static int s3_event_context_init(struct tevent_context *ev)
|
---|
222 | {
|
---|
223 | return 0;
|
---|
224 | }
|
---|
225 |
|
---|
226 | void dump_event_list(struct tevent_context *ev)
|
---|
227 | {
|
---|
228 | struct tevent_timer *te;
|
---|
229 | struct tevent_fd *fe;
|
---|
230 | struct timeval evt, now;
|
---|
231 |
|
---|
232 | if (!ev) {
|
---|
233 | return;
|
---|
234 | }
|
---|
235 |
|
---|
236 | now = timeval_current();
|
---|
237 |
|
---|
238 | DEBUG(10,("dump_event_list:\n"));
|
---|
239 |
|
---|
240 | for (te = ev->timer_events; te; te = te->next) {
|
---|
241 |
|
---|
242 | evt = timeval_until(&now, &te->next_event);
|
---|
243 |
|
---|
244 | DEBUGADD(10,("Timed Event \"%s\" %p handled in %d seconds (at %s)\n",
|
---|
245 | te->handler_name,
|
---|
246 | te,
|
---|
247 | (int)evt.tv_sec,
|
---|
248 | http_timestring(talloc_tos(), te->next_event.tv_sec)));
|
---|
249 | }
|
---|
250 |
|
---|
251 | for (fe = ev->fd_events; fe; fe = fe->next) {
|
---|
252 |
|
---|
253 | DEBUGADD(10,("FD Event %d %p, flags: 0x%04x\n",
|
---|
254 | fe->fd,
|
---|
255 | fe,
|
---|
256 | fe->flags));
|
---|
257 | }
|
---|
258 | }
|
---|
259 |
|
---|
260 | static const struct tevent_ops s3_event_ops = {
|
---|
261 | .context_init = s3_event_context_init,
|
---|
262 | .add_fd = tevent_common_add_fd,
|
---|
263 | .set_fd_close_fn = tevent_common_fd_set_close_fn,
|
---|
264 | .get_fd_flags = tevent_common_fd_get_flags,
|
---|
265 | .set_fd_flags = tevent_common_fd_set_flags,
|
---|
266 | .add_timer = tevent_common_add_timer,
|
---|
267 | .schedule_immediate = tevent_common_schedule_immediate,
|
---|
268 | .add_signal = tevent_common_add_signal,
|
---|
269 | .loop_once = s3_event_loop_once,
|
---|
270 | .loop_wait = tevent_common_loop_wait,
|
---|
271 | };
|
---|
272 |
|
---|
273 | static bool s3_tevent_init(void)
|
---|
274 | {
|
---|
275 | static bool initialized;
|
---|
276 | if (initialized) {
|
---|
277 | return true;
|
---|
278 | }
|
---|
279 | initialized = tevent_register_backend("s3", &s3_event_ops);
|
---|
280 | tevent_set_default_backend("s3");
|
---|
281 | return initialized;
|
---|
282 | }
|
---|
283 |
|
---|
284 | /*
|
---|
285 | this is used to catch debug messages from events
|
---|
286 | */
|
---|
287 | static void s3_event_debug(void *context, enum tevent_debug_level level,
|
---|
288 | const char *fmt, va_list ap) PRINTF_ATTRIBUTE(3,0);
|
---|
289 |
|
---|
290 | static void s3_event_debug(void *context, enum tevent_debug_level level,
|
---|
291 | const char *fmt, va_list ap)
|
---|
292 | {
|
---|
293 | int samba_level = -1;
|
---|
294 | char *s = NULL;
|
---|
295 | switch (level) {
|
---|
296 | case TEVENT_DEBUG_FATAL:
|
---|
297 | samba_level = 0;
|
---|
298 | break;
|
---|
299 | case TEVENT_DEBUG_ERROR:
|
---|
300 | samba_level = 1;
|
---|
301 | break;
|
---|
302 | case TEVENT_DEBUG_WARNING:
|
---|
303 | samba_level = 2;
|
---|
304 | break;
|
---|
305 | case TEVENT_DEBUG_TRACE:
|
---|
306 | samba_level = 11;
|
---|
307 | break;
|
---|
308 |
|
---|
309 | };
|
---|
310 | if (vasprintf(&s, fmt, ap) == -1) {
|
---|
311 | return;
|
---|
312 | }
|
---|
313 | DEBUG(samba_level, ("s3_event: %s", s));
|
---|
314 | free(s);
|
---|
315 | }
|
---|
316 |
|
---|
317 | struct tevent_context *s3_tevent_context_init(TALLOC_CTX *mem_ctx)
|
---|
318 | {
|
---|
319 | struct tevent_context *ev;
|
---|
320 |
|
---|
321 | s3_tevent_init();
|
---|
322 |
|
---|
323 | ev = tevent_context_init_byname(mem_ctx, "s3");
|
---|
324 | if (ev) {
|
---|
325 | tevent_set_debug(ev, s3_event_debug, NULL);
|
---|
326 | }
|
---|
327 |
|
---|
328 | return ev;
|
---|
329 | }
|
---|
330 |
|
---|