r12123: handle fde == NULL at the correct level
[bbaumbach/samba-autobuild/.git] / source4 / lib / events / events_liboop.c
1 /* 
2    Unix SMB/CIFS implementation.
3    main select loop and event handling
4    wrapper for http://liboop.org/
5
6    Copyright (C) Stefan Metzmacher 2005
7    
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 */
22
23 /* 
24 NOTE: this code compiles fine, but is completly *UNTESTED*
25          and is only commited as example
26 */
27
28 #include "includes.h"
29 #include "lib/events/events.h"
30 #include "lib/events/events_internal.h"
31
32 #include <oop.h>
33
34 /*
35  !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 
36
37  NOTE: this code compiles fine, but is completly *UNTESTED*
38        and is only commited as example
39
40  !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!   
41 */
42
43 static int oop_event_context_destructor(void *ptr)
44 {
45         struct event_context *ev = talloc_get_type(ptr, struct event_context);
46         oop_source_sys *oop_sys = ev->additional_data;
47
48         oop_sys_delete(oop_sys);
49
50         return 0;
51 }
52
53 /*
54   create a oop_event_context structure.
55 */
56 static int oop_event_context_init(struct event_context *ev, void *private_data)
57 {
58         oop_source_sys *oop_sys = private_data;
59
60         if (!oop_sys) {
61                 oop_sys = oop_sys_new();
62                 if (!oop_sys) {
63                         return -1;
64                 }
65
66                 talloc_set_destructor(ev, oop_event_context_destructor);
67         }
68
69         ev->additional_data = oop_sys;
70
71         return 0;
72 }
73
74 static void *oop_event_fd_handler(oop_source *oop, int fd, oop_event oop_type, void *ptr)
75 {
76         struct fd_event *fde = ptr;
77
78         if (fd != fde->fd) return OOP_ERROR;
79
80         switch(oop_type) {
81                 case OOP_READ:
82                         fde->handler(fde->event_ctx, fde, EVENT_FD_READ, fde->private_data);
83                         return OOP_CONTINUE;
84                 case OOP_WRITE:
85                         fde->handler(fde->event_ctx, fde, EVENT_FD_WRITE, fde->private_data);
86                         return OOP_CONTINUE;                    
87                 case OOP_EXCEPTION:
88                         return OOP_ERROR;
89                 case OOP_NUM_EVENTS:
90                         return OOP_ERROR;
91         }
92
93         return OOP_ERROR;
94 }
95
96 /*
97   destroy an fd_event
98 */
99 static int oop_event_fd_destructor(void *ptr)
100 {
101         struct fd_event *fde = talloc_get_type(ptr, struct fd_event);
102         struct event_context *ev = fde->event_ctx;
103         oop_source_sys *oop_sys = ev->additional_data;
104         oop_source *oop = oop_sys_source(oop_sys);
105
106         if (fde->flags & EVENT_FD_READ)
107                 oop->cancel_fd(oop, fde->fd, OOP_READ);
108         if (fde->flags & EVENT_FD_WRITE)
109                 oop->cancel_fd(oop, fde->fd, OOP_WRITE);
110
111         return 0;
112 }
113
114 /*
115   add a fd based event
116   return NULL on failure (memory allocation error)
117 */
118 static struct fd_event *oop_event_add_fd(struct event_context *ev, TALLOC_CTX *mem_ctx,
119                                          int fd, uint16_t flags,
120                                          event_fd_handler_t handler,
121                                          void *private_data)
122 {
123         struct fd_event *fde;
124         oop_source_sys *oop_sys = ev->additional_data;
125         oop_source *oop = oop_sys_source(oop_sys);
126         
127         fde = talloc(mem_ctx?mem_ctx:ev, struct fd_event);
128         if (!fde) return NULL;
129
130         fde->event_ctx          = ev;
131         fde->fd                 = fd;
132         fde->flags              = flags;
133         fde->handler            = handler;
134         fde->private_data       = private_data;
135         fde->additional_data    = NULL;
136
137         if (fde->flags & EVENT_FD_READ)
138                 oop->on_fd(oop, fde->fd, OOP_READ, oop_event_fd_handler, fde);
139         if (fde->flags & EVENT_FD_WRITE)
140                 oop->on_fd(oop, fde->fd, OOP_WRITE, oop_event_fd_handler, fde);
141
142         talloc_set_destructor(fde, oop_event_fd_destructor);
143
144         return fde;
145 }
146
147 /*
148   return the fd event flags
149 */
150 static uint16_t oop_event_get_fd_flags(struct fd_event *fde)
151 {
152         return fde->flags;
153 }
154
155 /*
156   set the fd event flags
157 */
158 static void oop_event_set_fd_flags(struct fd_event *fde, uint16_t flags)
159 {
160         oop_source_sys *oop_sys;
161         oop_source *oop;
162
163         oop_sys = fde->event_ctx->additional_data;
164         oop = oop_sys_source(oop_sys);
165
166         if ((fde->flags & EVENT_FD_READ)&&(!(flags & EVENT_FD_READ)))
167                 oop->cancel_fd(oop, fde->fd, OOP_READ);
168
169         if ((!(fde->flags & EVENT_FD_READ))&&(flags & EVENT_FD_READ))
170                 oop->on_fd(oop, fde->fd, OOP_READ, oop_event_fd_handler, fde);
171
172         if ((fde->flags & EVENT_FD_WRITE)&&(!(flags & EVENT_FD_WRITE)))
173                 oop->cancel_fd(oop, fde->fd, OOP_WRITE);
174
175         if ((!(fde->flags & EVENT_FD_WRITE))&&(flags & EVENT_FD_WRITE))
176                 oop->on_fd(oop, fde->fd, OOP_WRITE, oop_event_fd_handler, fde);
177
178         fde->flags = flags;
179 }
180
181 static int oop_event_timed_destructor(void *ptr);
182 static int oop_event_timed_deny_destructor(void *ptr)
183 {
184         return -1;
185 }
186
187 static void *oop_event_timed_handler(oop_source *oop, struct timeval t, void *ptr)
188 {
189         struct timed_event *te = ptr;
190
191         /* deny the handler to free the event */
192         talloc_set_destructor(te, oop_event_timed_deny_destructor);
193         te->handler(te->event_ctx, te, t, te->private_data);
194
195         talloc_set_destructor(te, oop_event_timed_destructor);
196         talloc_free(te);
197
198         return OOP_CONTINUE;
199 }
200
201 /*
202   destroy a timed event
203 */
204 static int oop_event_timed_destructor(void *ptr)
205 {
206         struct timed_event *te = talloc_get_type(ptr, struct timed_event);
207         struct event_context *ev = te->event_ctx;
208         oop_source_sys *oop_sys = ev->additional_data;
209         oop_source *oop = oop_sys_source(oop_sys);
210
211         oop->cancel_time(oop, te->next_event, oop_event_timed_handler, te);
212
213         return 0;
214 }
215
216 /*
217   add a timed event
218   return NULL on failure (memory allocation error)
219 */
220 static struct timed_event *oop_event_add_timed(struct event_context *ev, TALLOC_CTX *mem_ctx,
221                                                struct timeval next_event, 
222                                                event_timed_handler_t handler, 
223                                                void *private_data) 
224 {
225         oop_source_sys *oop_sys = ev->additional_data;
226         oop_source *oop = oop_sys_source(oop_sys);
227         struct timed_event *te;
228
229         te = talloc(mem_ctx?mem_ctx:ev, struct timed_event);
230         if (te == NULL) return NULL;
231
232         te->event_ctx           = ev;
233         te->next_event          = next_event;
234         te->handler             = handler;
235         te->private_data        = private_data;
236         te->additional_data     = NULL;
237
238         oop->on_time(oop, te->next_event, oop_event_timed_handler, te);
239
240         talloc_set_destructor(te, oop_event_timed_destructor);
241
242         return te;
243 }
244
245 /*
246   do a single event loop using the events defined in ev 
247 */
248 static int oop_event_loop_once(struct event_context *ev)
249 {
250         void *oop_ret;
251         oop_source_sys *oop_sys = ev->additional_data;
252
253         oop_ret = oop_sys_run_once(oop_sys);
254         if (oop_ret == OOP_CONTINUE) {
255                 return 0;
256         }
257
258         return -1;
259 }
260
261 /*
262   return on failure or (with 0) if all fd events are removed
263 */
264 static int oop_event_loop_wait(struct event_context *ev)
265 {
266         void *oop_ret;
267         oop_source_sys *oop_sys = ev->additional_data;
268
269         oop_ret = oop_sys_run(oop_sys);
270         if (oop_ret == OOP_CONTINUE) {
271                 return 0;
272         }
273
274         return -1;
275 }
276
277 static const struct event_ops events_oop_ops = {
278         .context_init   = oop_event_context_init,
279         .add_fd         = oop_event_add_fd,
280         .get_fd_flags   = oop_event_get_fd_flags,
281         .set_fd_flags   = oop_event_set_fd_flags,
282         .add_timed      = oop_event_add_timed,
283         .loop_once      = oop_event_loop_once,
284         .loop_wait      = oop_event_loop_wait,
285 };
286
287 const struct event_ops *events_oop_get_ops(void)
288 {
289         return &events_oop_ops;
290 }