r9702: r9680@blu: tridge | 2005-08-27 18:45:08 +1000
[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 /* NOTE: this code compiles fine, but is completly *UNTESTED*
24          and is only commited as example
25 */
26
27 #include "includes.h"
28 #include "lib/events/events.h"
29 #include "lib/events/events_internal.h"
30
31 #include <oop.h>
32
33 static int oop_event_context_destructor(void *ptr)
34 {
35         struct event_context *ev = talloc_get_type(ptr, struct event_context);
36         oop_source_sys *oop_sys = ev->additional_data;
37
38         oop_sys_delete(oop_sys);
39
40         return 0;
41 }
42
43 /*
44   create a oop_event_context structure.
45 */
46 static int oop_event_context_init(struct event_context *ev, void *private_data)
47 {
48         oop_source_sys *oop_sys = private_data;
49
50         if (!oop_sys) {
51                 oop_sys = oop_sys_new();
52                 if (!oop_sys) {
53                         return -1;
54                 }
55
56                 talloc_set_destructor(ev, oop_event_context_destructor);
57         }
58
59         ev->additional_data = oop_sys;
60
61         return 0;
62 }
63
64 static void *oop_event_fd_handler(oop_source *oop, int fd, oop_event oop_type, void *ptr)
65 {
66         struct fd_event *fde = ptr;
67
68         if (fd != fde->fd) return OOP_ERROR;
69
70         switch(oop_type) {
71                 case OOP_READ:
72                         fde->handler(fde->event_ctx, fde, EVENT_FD_READ, fde->private_data);
73                         return OOP_CONTINUE;
74                 case OOP_WRITE:
75                         fde->handler(fde->event_ctx, fde, EVENT_FD_WRITE, fde->private_data);
76                         return OOP_CONTINUE;                    
77                 case OOP_EXCEPTION:
78                         return OOP_ERROR;
79                 case OOP_NUM_EVENTS:
80                         return OOP_ERROR;
81         }
82
83         return OOP_ERROR;
84 }
85
86 /*
87   destroy an fd_event
88 */
89 static int oop_event_fd_destructor(void *ptr)
90 {
91         struct fd_event *fde = talloc_get_type(ptr, struct fd_event);
92         struct event_context *ev = fde->event_ctx;
93         oop_source_sys *oop_sys = ev->additional_data;
94         oop_source *oop = oop_sys_source(oop_sys);
95
96         if (fde->flags & EVENT_FD_READ)
97                 oop->cancel_fd(oop, fde->fd, OOP_READ);
98         if (fde->flags & EVENT_FD_WRITE)
99                 oop->cancel_fd(oop, fde->fd, OOP_WRITE);
100
101         return 0;
102 }
103
104 /*
105   add a fd based event
106   return NULL on failure (memory allocation error)
107 */
108 static struct fd_event *oop_event_add_fd(struct event_context *ev, TALLOC_CTX *mem_ctx,
109                                          int fd, uint16_t flags,
110                                          event_fd_handler_t handler,
111                                          void *private_data)
112 {
113         struct fd_event *fde;
114         oop_source_sys *oop_sys = ev->additional_data;
115         oop_source *oop = oop_sys_source(oop_sys);
116         
117         fde = talloc(mem_ctx?mem_ctx:ev, struct fd_event);
118         if (!fde) return NULL;
119
120         fde->event_ctx          = ev;
121         fde->fd                 = fd;
122         fde->flags              = flags;
123         fde->handler            = handler;
124         fde->private_data       = private_data;
125         fde->additional_data    = NULL;
126
127         if (fde->flags & EVENT_FD_READ)
128                 oop->on_fd(oop, fde->fd, OOP_READ, oop_event_fd_handler, fde);
129         if (fde->flags & EVENT_FD_WRITE)
130                 oop->on_fd(oop, fde->fd, OOP_WRITE, oop_event_fd_handler, fde);
131
132         talloc_set_destructor(fde, oop_event_fd_destructor);
133
134         return fde;
135 }
136
137 /*
138   return the fd event flags
139 */
140 static uint16_t oop_event_get_fd_flags(struct fd_event *fde)
141 {
142         if (!fde) return 0;
143
144         return fde->flags;
145 }
146
147 /*
148   set the fd event flags
149 */
150 static void oop_event_set_fd_flags(struct fd_event *fde, uint16_t flags)
151 {
152         oop_source_sys *oop_sys;
153         oop_source *oop;
154
155         if (!fde) return;
156
157         oop_sys = fde->event_ctx->additional_data;
158         oop = oop_sys_source(oop_sys);
159
160         if ((fde->flags & EVENT_FD_READ)&&(!(flags & EVENT_FD_READ)))
161                 oop->cancel_fd(oop, fde->fd, OOP_READ);
162
163         if ((!(fde->flags & EVENT_FD_READ))&&(flags & EVENT_FD_READ))
164                 oop->on_fd(oop, fde->fd, OOP_READ, oop_event_fd_handler, fde);
165
166         if ((fde->flags & EVENT_FD_WRITE)&&(!(flags & EVENT_FD_WRITE)))
167                 oop->cancel_fd(oop, fde->fd, OOP_WRITE);
168
169         if ((!(fde->flags & EVENT_FD_WRITE))&&(flags & EVENT_FD_WRITE))
170                 oop->on_fd(oop, fde->fd, OOP_WRITE, oop_event_fd_handler, fde);
171
172         fde->flags = flags;
173 }
174
175 static void *oop_event_timed_handler(oop_source *oop, struct timeval t, void *ptr)
176 {
177         struct timed_event *te = ptr;
178
179         te->handler(te->event_ctx, te, t, te->private_data);
180
181         return OOP_CONTINUE;
182 }
183
184 /*
185   destroy a timed event
186 */
187 static int oop_event_timed_destructor(void *ptr)
188 {
189         struct timed_event *te = talloc_get_type(ptr, struct timed_event);
190         struct event_context *ev = te->event_ctx;
191         oop_source_sys *oop_sys = ev->additional_data;
192         oop_source *oop = oop_sys_source(oop_sys);
193
194         oop->cancel_time(oop, te->next_event, oop_event_timed_handler, te);
195
196         return 0;
197 }
198
199 /*
200   add a timed event
201   return NULL on failure (memory allocation error)
202 */
203 static struct timed_event *oop_event_add_timed(struct event_context *ev, TALLOC_CTX *mem_ctx,
204                                                struct timeval next_event, 
205                                                event_timed_handler_t handler, 
206                                                void *private_data) 
207 {
208         oop_source_sys *oop_sys = ev->additional_data;
209         oop_source *oop = oop_sys_source(oop_sys);
210         struct timed_event *te;
211
212         te = talloc(mem_ctx?mem_ctx:ev, struct timed_event);
213         if (te == NULL) return NULL;
214
215         te->event_ctx           = ev;
216         te->next_event          = next_event;
217         te->handler             = handler;
218         te->private_data        = private_data;
219         te->additional_data     = NULL;
220
221         oop->cancel_time(oop, te->next_event, oop_event_timed_handler, te);
222
223         talloc_set_destructor(te, oop_event_timed_destructor);
224
225         return te;
226 }
227
228 /*
229   do a single event loop using the events defined in ev 
230 */
231 static int oop_event_loop_once(struct event_context *ev)
232 {
233         void *oop_ret;
234         oop_source_sys *oop_sys = ev->additional_data;
235
236         oop_ret = oop_sys_run_once(oop_sys);
237         if (oop_ret == OOP_CONTINUE) {
238                 return 0;
239         }
240
241         return -1;
242 }
243
244 /*
245   return on failure or (with 0) if all fd events are removed
246 */
247 static int oop_event_loop_wait(struct event_context *ev)
248 {
249         void *oop_ret;
250         oop_source_sys *oop_sys = ev->additional_data;
251
252         oop_ret = oop_sys_run(oop_sys);
253         if (oop_ret == OOP_CONTINUE) {
254                 return 0;
255         }
256
257         return -1;
258 }
259
260 static const struct event_ops events_oop_ops = {
261         .context_init   = oop_event_context_init,
262         .add_fd         = oop_event_add_fd,
263         .get_fd_flags   = oop_event_get_fd_flags,
264         .set_fd_flags   = oop_event_set_fd_flags,
265         .add_timed      = oop_event_add_timed,
266         .loop_once      = oop_event_loop_once,
267         .loop_wait      = oop_event_loop_wait,
268 };
269
270 const struct event_ops *events_oop_get_ops(void)
271 {
272         return &events_oop_ops;
273 }