2 Unix SMB/CIFS implementation.
4 Copyright (C) Andrew Tridgell 1992-1998
5 Copyright (C) Volker Lendecke 2005
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.
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.
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/>.
22 #include <tevent_internal.h>
25 * Return if there's something in the queue
28 bool event_add_to_select_args(struct tevent_context
*ev
,
29 const struct timeval
*now
,
30 fd_set
*read_fds
, fd_set
*write_fds
,
31 struct timeval
*timeout
, int *maxfd
)
33 struct tevent_fd
*fde
;
37 for (fde
= ev
->fd_events
; fde
; fde
= fde
->next
) {
38 if (fde
->flags
& EVENT_FD_READ
) {
39 FD_SET(fde
->fd
, read_fds
);
42 if (fde
->flags
& EVENT_FD_WRITE
) {
43 FD_SET(fde
->fd
, write_fds
);
47 if ((fde
->flags
& (EVENT_FD_READ
|EVENT_FD_WRITE
))
48 && (fde
->fd
> *maxfd
)) {
53 if (ev
->immediate_events
!= NULL
) {
54 *timeout
= timeval_zero();
58 if (ev
->timer_events
== NULL
) {
62 diff
= timeval_until(now
, &ev
->timer_events
->next_event
);
63 *timeout
= timeval_min(timeout
, &diff
);
68 bool run_events(struct tevent_context
*ev
,
69 int selrtn
, fd_set
*read_fds
, fd_set
*write_fds
)
71 struct tevent_fd
*fde
;
74 if (ev
->signal_events
&&
75 tevent_common_check_signal(ev
)) {
79 if (ev
->immediate_events
&&
80 tevent_common_loop_immediate(ev
)) {
86 if ((ev
->timer_events
!= NULL
)
87 && (timeval_compare(&now
, &ev
->timer_events
->next_event
) >= 0)) {
88 /* this older events system did not auto-free timed
89 events on running them, and had a race condition
90 where the event could be called twice if the
91 talloc_free of the te happened after the callback
92 made a call which invoked the event loop. To avoid
93 this while still allowing old code which frees the
94 te, we need to create a temporary context which
95 will be used to ensure the te is freed. We also
96 remove the te from the timed event list before we
97 call the handler, to ensure we can't loop */
99 struct tevent_timer
*te
= ev
->timer_events
;
100 TALLOC_CTX
*tmp_ctx
= talloc_new(ev
);
102 DEBUG(10, ("Running timed event \"%s\" %p\n",
103 ev
->timer_events
->handler_name
, ev
->timer_events
));
105 DLIST_REMOVE(ev
->timer_events
, te
);
106 talloc_steal(tmp_ctx
, te
);
108 te
->handler(ev
, te
, now
, te
->private_data
);
110 talloc_free(tmp_ctx
);
121 for (fde
= ev
->fd_events
; fde
; fde
= fde
->next
) {
124 if (FD_ISSET(fde
->fd
, read_fds
)) flags
|= EVENT_FD_READ
;
125 if (FD_ISSET(fde
->fd
, write_fds
)) flags
|= EVENT_FD_WRITE
;
127 if (flags
& fde
->flags
) {
128 fde
->handler(ev
, fde
, flags
, fde
->private_data
);
137 struct timeval
*get_timed_events_timeout(struct tevent_context
*ev
,
138 struct timeval
*to_ret
)
142 if ((ev
->timer_events
== NULL
) && (ev
->immediate_events
== NULL
)) {
145 if (ev
->immediate_events
!= NULL
) {
146 *to_ret
= timeval_zero();
150 now
= timeval_current();
151 *to_ret
= timeval_until(&now
, &ev
->timer_events
->next_event
);
153 DEBUG(10, ("timed_events_timeout: %d/%d\n", (int)to_ret
->tv_sec
,
154 (int)to_ret
->tv_usec
));
159 static int s3_event_loop_once(struct tevent_context
*ev
, const char *location
)
161 struct timeval now
, to
;
169 to
.tv_sec
= 9999; /* Max timeout */
172 if (run_events(ev
, 0, NULL
, NULL
)) {
178 if (!event_add_to_select_args(ev
, &now
, &r_fds
, &w_fds
, &to
, &maxfd
)) {
182 ret
= sys_select(maxfd
+1, &r_fds
, &w_fds
, NULL
, &to
);
184 if (ret
== -1 && errno
!= EINTR
) {
185 tevent_debug(ev
, TEVENT_DEBUG_FATAL
,
186 "sys_select() failed: %d:%s\n",
187 errno
, strerror(errno
));
191 run_events(ev
, ret
, &r_fds
, &w_fds
);
195 void event_context_reinit(struct tevent_context
*ev
)
197 tevent_common_context_destructor(ev
);
201 static int s3_event_context_init(struct tevent_context
*ev
)
206 void dump_event_list(struct tevent_context
*ev
)
208 struct tevent_timer
*te
;
209 struct tevent_fd
*fe
;
210 struct timeval evt
, now
;
216 now
= timeval_current();
218 DEBUG(10,("dump_event_list:\n"));
220 for (te
= ev
->timer_events
; te
; te
= te
->next
) {
222 evt
= timeval_until(&now
, &te
->next_event
);
224 DEBUGADD(10,("Timed Event \"%s\" %p handled in %d seconds (at %s)\n",
228 http_timestring(talloc_tos(), te
->next_event
.tv_sec
)));
231 for (fe
= ev
->fd_events
; fe
; fe
= fe
->next
) {
233 DEBUGADD(10,("FD Event %d %p, flags: 0x%04x\n",
240 static const struct tevent_ops s3_event_ops
= {
241 .context_init
= s3_event_context_init
,
242 .add_fd
= tevent_common_add_fd
,
243 .set_fd_close_fn
= tevent_common_fd_set_close_fn
,
244 .get_fd_flags
= tevent_common_fd_get_flags
,
245 .set_fd_flags
= tevent_common_fd_set_flags
,
246 .add_timer
= tevent_common_add_timer
,
247 .schedule_immediate
= tevent_common_schedule_immediate
,
248 .add_signal
= tevent_common_add_signal
,
249 .loop_once
= s3_event_loop_once
,
250 .loop_wait
= tevent_common_loop_wait
,
253 static bool s3_tevent_init(void)
255 static bool initialized
;
259 initialized
= tevent_register_backend("s3", &s3_event_ops
);
260 tevent_set_default_backend("s3");
265 this is used to catch debug messages from events
267 static void s3_event_debug(void *context
, enum tevent_debug_level level
,
268 const char *fmt
, va_list ap
) PRINTF_ATTRIBUTE(3,0);
270 static void s3_event_debug(void *context
, enum tevent_debug_level level
,
271 const char *fmt
, va_list ap
)
273 int samba_level
= -1;
276 case TEVENT_DEBUG_FATAL
:
279 case TEVENT_DEBUG_ERROR
:
282 case TEVENT_DEBUG_WARNING
:
285 case TEVENT_DEBUG_TRACE
:
290 if (vasprintf(&s
, fmt
, ap
) == -1) {
293 DEBUG(samba_level
, ("s3_event: %s", s
));
297 struct tevent_context
*s3_tevent_context_init(TALLOC_CTX
*mem_ctx
)
299 struct tevent_context
*ev
;
303 ev
= tevent_context_init_byname(mem_ctx
, "s3");
305 tevent_set_debug(ev
, s3_event_debug
, NULL
);