ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/EV/README
(Generate patch)

Comparing EV/README (file contents):
Revision 1.8 by root, Thu Nov 8 17:02:10 2007 UTC vs.
Revision 1.15 by root, Wed Dec 5 14:06:50 2007 UTC

9 9
10 my $w = EV::timer 2, 0, sub { 10 my $w = EV::timer 2, 0, sub {
11 warn "is called after 2s"; 11 warn "is called after 2s";
12 }; 12 };
13 13
14 my $w = EV::timer 2, 1, sub { 14 my $w = EV::timer 2, 2, sub {
15 warn "is called roughly every 2s (repeat = 1)"; 15 warn "is called roughly every 2s (repeat = 2)";
16 }; 16 };
17 17
18 undef $w; # destroy event watcher again 18 undef $w; # destroy event watcher again
19 19
20 my $w = EV::periodic 0, 60, 0, sub { 20 my $w = EV::periodic 0, 60, 0, sub {
22 }; 22 };
23 23
24 # IO 24 # IO
25 25
26 my $w = EV::io *STDIN, EV::READ, sub { 26 my $w = EV::io *STDIN, EV::READ, sub {
27 my ($w, $revents) = @_; # all callbacks get the watcher object and event mask 27 my ($w, $revents) = @_; # all callbacks receive the watcher and event mask
28 warn "stdin is readable, you entered: ", <STDIN>; 28 warn "stdin is readable, you entered: ", <STDIN>;
29 }; 29 };
30 30
31 # SIGNALS 31 # SIGNALS
32 32
33 my $w = EV::signal 'QUIT', sub { 33 my $w = EV::signal 'QUIT', sub {
34 warn "sigquit received\n"; 34 warn "sigquit received\n";
35 }; 35 };
36 36
37 my $w = EV::signal 3, sub {
38 warn "sigquit received (this is GNU/Linux, right?)\n";
39 };
40
41 # CHILD/PID STATUS CHANGES 37 # CHILD/PID STATUS CHANGES
42 38
43 my $w = EV::child 666, sub { 39 my $w = EV::child 666, sub {
44 my ($w, $revents) = @_; 40 my ($w, $revents) = @_;
45 # my $pid = $w->rpid;
46 my $status = $w->rstatus; 41 my $status = $w->rstatus;
47 }; 42 };
43
44 # STAT CHANGES
45 my $w = EV::stat "/etc/passwd", 10, sub {
46 my ($w, $revents) = @_;
47 warn $w->path, " has changed somehow.\n";
48 };
48 49
49 # MAINLOOP 50 # MAINLOOP
50 EV::loop; # loop until EV::loop_done is called 51 EV::loop; # loop until EV::unloop is called or all watchers stop
51 EV::loop EV::LOOP_ONESHOT; # block until at least one event could be handled 52 EV::loop EV::LOOP_ONESHOT; # block until at least one event could be handled
52 EV::loop EV::LOOP_NONBLOCK; # try to handle same events, but do not block 53 EV::loop EV::LOOP_NONBLOCK; # try to handle same events, but do not block
53 54
54DESCRIPTION 55DESCRIPTION
55 This module provides an interface to libev 56 This module provides an interface to libev
56 (<http://software.schmorp.de/pkg/libev.html>). 57 (<http://software.schmorp.de/pkg/libev.html>). While the documentation
58 below is comprehensive, one might also consult the documentation of
59 libev itself (<http://cvs.schmorp.de/libev/ev.html>) for more subtle
60 details on watcher semantics or some discussion on the available
61 backends, or how to force a specific backend with "LIBEV_FLAGS".
57 62
58BASIC INTERFACE 63BASIC INTERFACE
59 $EV::DIED 64 $EV::DIED
60 Must contain a reference to a function that is called when a 65 Must contain a reference to a function that is called when a
61 callback throws an exception (with $@ containing thr error). The 66 callback throws an exception (with $@ containing thr error). The
69 $time = EV::now 74 $time = EV::now
70 Returns the time the last event loop iteration has been started. 75 Returns the time the last event loop iteration has been started.
71 This is the time that (relative) timers are based on, and refering 76 This is the time that (relative) timers are based on, and refering
72 to it is usually faster then calling EV::time. 77 to it is usually faster then calling EV::time.
73 78
74 $method = EV::ev_method 79 $method = EV::method
75 Returns an integer describing the backend used by libev 80 Returns an integer describing the backend used by libev
76 (EV::METHOD_SELECT or EV::METHOD_EPOLL). 81 (EV::METHOD_SELECT or EV::METHOD_EPOLL).
77 82
78 EV::loop [$flags] 83 EV::loop [$flags]
79 Begin checking for events and calling callbacks. It returns when a 84 Begin checking for events and calling callbacks. It returns when a
80 callback calls EV::loop_done. 85 callback calls EV::unloop.
81 86
82 The $flags argument can be one of the following: 87 The $flags argument can be one of the following:
83 88
84 0 as above 89 0 as above
85 EV::LOOP_ONESHOT block at most once (wait, but do not loop) 90 EV::LOOP_ONESHOT block at most once (wait, but do not loop)
86 EV::LOOP_NONBLOCK do not block at all (fetch/handle events but do not wait) 91 EV::LOOP_NONBLOCK do not block at all (fetch/handle events but do not wait)
87 92
88 EV::loop_done [$how] 93 EV::unloop [$how]
89 When called with no arguments or an argument of 1, makes the 94 When called with no arguments or an argument of EV::UNLOOP_ONE,
90 innermost call to EV::loop return. 95 makes the innermost call to EV::loop return.
91 96
92 When called with an agrument of 2, all calls to EV::loop will return 97 When called with an argument of EV::UNLOOP_ALL, all calls to
93 as fast as possible. 98 EV::loop will return as fast as possible.
94 99
95 WATCHER 100 $count = EV::loop_count
101 Return the number of times the event loop has polled for new events.
102 Sometiems useful as a generation counter.
103
104 EV::once $fh_or_undef, $events, $timeout, $cb->($revents)
105 This function rolls together an I/O and a timer watcher for a single
106 one-shot event without the need for managing a watcher object.
107
108 If $fh_or_undef is a filehandle or file descriptor, then $events
109 must be a bitset containing either "EV::READ", "EV::WRITE" or
110 "EV::READ | EV::WRITE", indicating the type of I/O event you want to
111 wait for. If you do not want to wait for some I/O event, specify
112 "undef" for $fh_or_undef and 0 for $events).
113
114 If timeout is "undef" or negative, then there will be no timeout.
115 Otherwise a EV::timer with this value will be started.
116
117 When an error occurs or either the timeout or I/O watcher triggers,
118 then the callback will be called with the received event set (in
119 general you can expect it to be a combination of "EV:ERROR",
120 "EV::READ", "EV::WRITE" and "EV::TIMEOUT").
121
122 EV::once doesn't return anything: the watchers stay active till
123 either of them triggers, then they will be stopped and freed, and
124 the callback invoked.
125
126 WATCHER OBJECTS
96 A watcher is an object that gets created to record your interest in some 127 A watcher is an object that gets created to record your interest in some
97 event. For instance, if you want to wait for STDIN to become readable, 128 event. For instance, if you want to wait for STDIN to become readable,
98 you would create an EV::io watcher for that: 129 you would create an EV::io watcher for that:
99 130
100 my $watcher = EV::io *STDIN, EV::READ, sub { 131 my $watcher = EV::io *STDIN, EV::READ, sub {
124 155
125 Also, all methods changing some aspect of a watcher (->set, ->priority, 156 Also, all methods changing some aspect of a watcher (->set, ->priority,
126 ->fh and so on) automatically stop and start it again if it is active, 157 ->fh and so on) automatically stop and start it again if it is active,
127 which means pending events get lost. 158 which means pending events get lost.
128 159
129 WATCHER TYPES 160 COMMON WATCHER METHODS
130 Now lets move to the existing watcher types and asociated methods. 161 This section lists methods common to all watchers.
131
132 The following methods are available for all watchers. Then followes a
133 description of each watcher constructor (EV::io, EV::timer,
134 EV::periodic, EV::signal, EV::child, EV::idle, EV::prepare and
135 EV::check), followed by any type-specific methods (if any).
136 162
137 $w->start 163 $w->start
138 Starts a watcher if it isn't active already. Does nothing to an 164 Starts a watcher if it isn't active already. Does nothing to an
139 already active watcher. By default, all watchers start out in the 165 already active watcher. By default, all watchers start out in the
140 active state (see the description of the "_ns" variants if you need 166 active state (see the description of the "_ns" variants if you need
170 Pending watchers with higher priority will be invoked first. The 196 Pending watchers with higher priority will be invoked first. The
171 valid range of priorities lies between EV::MAXPRI (default 2) and 197 valid range of priorities lies between EV::MAXPRI (default 2) and
172 EV::MINPRI (default -2). If the priority is outside this range it 198 EV::MINPRI (default -2). If the priority is outside this range it
173 will automatically be normalised to the nearest valid priority. 199 will automatically be normalised to the nearest valid priority.
174 200
175 The default priority of any newly-created weatcher is 0. 201 The default priority of any newly-created watcher is 0.
202
203 Note that the priority semantics have not yet been fleshed out and
204 are subject to almost certain change.
176 205
177 $w->trigger ($revents) 206 $w->trigger ($revents)
178 Call the callback *now* with the given event mask. 207 Call the callback *now* with the given event mask.
179 208
209 $previous_state = $w->keepalive ($bool)
210 Normally, "EV::loop" will return when there are no active watchers
211 (which is a "deadlock" because no progress can be made anymore).
212 This is convinient because it allows you to start your watchers (and
213 your jobs), call "EV::loop" once and when it returns you know that
214 all your jobs are finished (or they forgot to register some watchers
215 for their task :).
216
217 Sometimes, however, this gets in your way, for example when you the
218 module that calls "EV::loop" (usually the main program) is not the
219 same module as a long-living watcher (for example a DNS client
220 module written by somebody else even). Then you might want any
221 outstanding requests to be handled, but you would not want to keep
222 "EV::loop" from returning just because you happen to have this
223 long-running UDP port watcher.
224
225 In this case you can clear the keepalive status, which means that
226 even though your watcher is active, it won't keep "EV::loop" from
227 returning.
228
229 The initial value for keepalive is true (enabled), and you cna
230 change it any time.
231
232 Example: Register an IO watcher for some UDP socket but do not keep
233 the event loop from running just because of that watcher.
234
235 my $udp_socket = ...
236 my $udp_watcher = EV::io $udp_socket, EV::READ, sub { ... };
237 $udp_watcher->keepalive (0);
238
239 WATCHER TYPES
240 Each of the following subsections describes a single watcher type.
241
242 IO WATCHERS - is this file descriptor readable or writable?
180 $w = EV::io $fileno_or_fh, $eventmask, $callback 243 $w = EV::io $fileno_or_fh, $eventmask, $callback
181 $w = EV::io_ns $fileno_or_fh, $eventmask, $callback 244 $w = EV::io_ns $fileno_or_fh, $eventmask, $callback
182 As long as the returned watcher object is alive, call the $callback 245 As long as the returned watcher object is alive, call the $callback
183 when the events specified in $eventmask. 246 when at least one of events specified in $eventmask occurs.
184 247
185 The $eventmask can be one or more of these constants ORed together: 248 The $eventmask can be one or more of these constants ORed together:
186 249
187 EV::READ wait until read() wouldn't block anymore 250 EV::READ wait until read() wouldn't block anymore
188 EV::WRITE wait until write() wouldn't block anymore 251 EV::WRITE wait until write() wouldn't block anymore
200 263
201 $current_eventmask = $w->events 264 $current_eventmask = $w->events
202 $old_eventmask = $w->events ($new_eventmask) 265 $old_eventmask = $w->events ($new_eventmask)
203 Returns the previously set event mask and optionally set a new one. 266 Returns the previously set event mask and optionally set a new one.
204 267
268 TIMER WATCHERS - relative and optionally repeating timeouts
205 $w = EV::timer $after, $repeat, $callback 269 $w = EV::timer $after, $repeat, $callback
206 $w = EV::timer_ns $after, $repeat, $callback 270 $w = EV::timer_ns $after, $repeat, $callback
207 Calls the callback after $after seconds. If $repeat is non-zero, the 271 Calls the callback after $after seconds (which may be fractional).
208 timer will be restarted (with the $repeat value as $after) after the 272 If $repeat is non-zero, the timer will be restarted (with the
209 callback returns. 273 $repeat value as $after) after the callback returns.
210 274
211 This means that the callback would be called roughly after $after 275 This means that the callback would be called roughly after $after
212 seconds, and then every $repeat seconds. "Roughly" because the time 276 seconds, and then every $repeat seconds. The timer does his best not
213 of callback processing is not taken into account, so the timer will 277 to drift, but it will not invoke the timer more often then once per
214 slowly drift. If that isn't acceptable, look at EV::periodic. 278 event loop iteration, and might drift in other cases. If that isn't
279 acceptable, look at EV::periodic, which can provide long-term stable
280 timers.
215 281
216 The timer is based on a monotonic clock, that is if somebody is 282 The timer is based on a monotonic clock, that is, if somebody is
217 sitting in front of the machine while the timer is running and 283 sitting in front of the machine while the timer is running and
218 changes the system clock, the timer will nevertheless run (roughly) 284 changes the system clock, the timer will nevertheless run (roughly)
219 the same time. 285 the same time.
220 286
221 The "timer_ns" variant doesn't start (activate) the newly created 287 The "timer_ns" variant doesn't start (activate) the newly created
222 watcher. 288 watcher.
223 289
224 $w->set ($after, $repeat) 290 $w->set ($after, $repeat)
225 Reconfigures the watcher, see the constructor above for details. Can 291 Reconfigures the watcher, see the constructor above for details. Can
226 be at any time. 292 be called at any time.
227 293
228 $w->again 294 $w->again
229 Similar to the "start" method, but has special semantics for 295 Similar to the "start" method, but has special semantics for
230 repeating timers: 296 repeating timers:
231 297
298 If the timer is active and non-repeating, it will be stopped.
299
232 If the timer is active and repeating, reset the timeout to occur 300 If the timer is active and repeating, reset the timeout to occur
233 $repeat seconds after now. 301 $repeat seconds after now.
234 302
235 If the timer is active and non-repeating, it will be stopped.
236
237 If the timer is in active and repeating, start it. 303 If the timer is inactive and repeating, start it using the repeat
304 value.
238 305
239 Otherwise do nothing. 306 Otherwise do nothing.
240 307
241 This behaviour is useful when you have a timeout for some IO 308 This behaviour is useful when you have a timeout for some IO
242 operation. You create a timer object with the same value for $after 309 operation. You create a timer object with the same value for $after
243 and $repeat, and then, in the read/write watcher, run the "again" 310 and $repeat, and then, in the read/write watcher, run the "again"
244 method on the timeout. 311 method on the timeout.
245 312
313 PERIODIC WATCHERS - to cron or not to cron?
246 $w = EV::periodic $at, $interval, $reschedule_cb, $callback 314 $w = EV::periodic $at, $interval, $reschedule_cb, $callback
247 $w = EV::periodic_ns $at, $interval, $reschedule_cb, $callback 315 $w = EV::periodic_ns $at, $interval, $reschedule_cb, $callback
248 Similar to EV::timer, but is not based on relative timeouts but on 316 Similar to EV::timer, but is not based on relative timeouts but on
249 absolute times. Apart from creating "simple" timers that trigger 317 absolute times. Apart from creating "simple" timers that trigger
250 "at" the specified time, it can also be used for non-drifting 318 "at" the specified time, it can also be used for non-drifting
280 at the next possible time where "$time = $at (mod $interval)", 348 at the next possible time where "$time = $at (mod $interval)",
281 regardless of any time jumps. 349 regardless of any time jumps.
282 350
283 * manual reschedule mode ($reschedule_cb = coderef) 351 * manual reschedule mode ($reschedule_cb = coderef)
284 In this mode $interval and $at are both being ignored. Instead, 352 In this mode $interval and $at are both being ignored. Instead,
285 each time the periodic watcher gets scheduled, the first 353 each time the periodic watcher gets scheduled, the reschedule
286 callback ($reschedule_cb) will be called with the watcher as 354 callback ($reschedule_cb) will be called with the watcher as
287 first, and the current time as second argument. 355 first, and the current time as second argument.
288 356
289 *This callback MUST NOT stop or destroy this or any other 357 *This callback MUST NOT stop or destroy this or any other
290 periodic watcher, ever*. If you need to stop it, return 1e30 and 358 periodic watcher, ever*. If you need to stop it, return 1e30 and
315 The "periodic_ns" variant doesn't start (activate) the newly created 383 The "periodic_ns" variant doesn't start (activate) the newly created
316 watcher. 384 watcher.
317 385
318 $w->set ($at, $interval, $reschedule_cb) 386 $w->set ($at, $interval, $reschedule_cb)
319 Reconfigures the watcher, see the constructor above for details. Can 387 Reconfigures the watcher, see the constructor above for details. Can
320 be at any time. 388 be called at any time.
321 389
322 $w->again 390 $w->again
323 Simply stops and starts the watcher again. 391 Simply stops and starts the watcher again.
324 392
393 SIGNAL WATCHERS - signal me when a signal gets signalled!
325 $w = EV::signal $signal, $callback 394 $w = EV::signal $signal, $callback
326 $w = EV::signal_ns $signal, $callback 395 $w = EV::signal_ns $signal, $callback
327 Call the callback when $signal is received (the signal can be 396 Call the callback when $signal is received (the signal can be
328 specified by number or by name, just as with kill or %SIG). 397 specified by number or by name, just as with "kill" or %SIG).
329 398
330 EV will grab the signal for the process (the kernel only allows one 399 EV will grab the signal for the process (the kernel only allows one
331 component to receive a signal at a time) when you start a signal 400 component to receive a signal at a time) when you start a signal
332 watcher, and removes it again when you stop it. Perl does the same 401 watcher, and removes it again when you stop it. Perl does the same
333 when you add/remove callbacks to %SIG, so watch out. 402 when you add/remove callbacks to %SIG, so watch out.
337 The "signal_ns" variant doesn't start (activate) the newly created 406 The "signal_ns" variant doesn't start (activate) the newly created
338 watcher. 407 watcher.
339 408
340 $w->set ($signal) 409 $w->set ($signal)
341 Reconfigures the watcher, see the constructor above for details. Can 410 Reconfigures the watcher, see the constructor above for details. Can
342 be at any time. 411 be called at any time.
343 412
344 $current_signum = $w->signal 413 $current_signum = $w->signal
345 $old_signum = $w->signal ($new_signal) 414 $old_signum = $w->signal ($new_signal)
346 Returns the previously set signal (always as a number not name) and 415 Returns the previously set signal (always as a number not name) and
347 optionally set a new one. 416 optionally set a new one.
348 417
418 CHILD WATCHERS - watch out for process status changes
349 $w = EV::child $pid, $callback 419 $w = EV::child $pid, $callback
350 $w = EV::child_ns $pid, $callback 420 $w = EV::child_ns $pid, $callback
351 Call the callback when a status change for pid $pid (or any pid if 421 Call the callback when a status change for pid $pid (or any pid if
352 $pid is 0) has been received. More precisely: when the process 422 $pid is 0) has been received. More precisely: when the process
353 receives a SIGCHLD, EV will fetch the outstanding exit/wait status 423 receives a "SIGCHLD", EV will fetch the outstanding exit/wait status
354 for all changed/zombie children and call the callback. 424 for all changed/zombie children and call the callback.
355 425
356 You can access both status and pid by using the "rstatus" and "rpid" 426 It is valid (and fully supported) to install a child watcher after a
427 child has exited but before the event loop has started its next
428 iteration (for example, first you "fork", then the new child process
429 might exit, and only then do you install a child watcher in the
430 parent for the new pid).
431
432 You can access both exit (or tracing) status and pid by using the
357 methods on the watcher object. 433 "rstatus" and "rpid" methods on the watcher object.
358 434
359 You can have as many pid watchers per pid as you want. 435 You can have as many pid watchers per pid as you want, they will all
436 be called.
360 437
361 The "child_ns" variant doesn't start (activate) the newly created 438 The "child_ns" variant doesn't start (activate) the newly created
362 watcher. 439 watcher.
363 440
364 $w->set ($pid) 441 $w->set ($pid)
365 Reconfigures the watcher, see the constructor above for details. Can 442 Reconfigures the watcher, see the constructor above for details. Can
366 be at any time. 443 be called at any time.
367 444
368 $current_pid = $w->pid 445 $current_pid = $w->pid
369 $old_pid = $w->pid ($new_pid) 446 $old_pid = $w->pid ($new_pid)
370 Returns the previously set process id and optionally set a new one. 447 Returns the previously set process id and optionally set a new one.
371 448
375 452
376 $pid = $w->rpid 453 $pid = $w->rpid
377 Return the pid of the awaited child (useful when you have installed 454 Return the pid of the awaited child (useful when you have installed
378 a watcher for all pids). 455 a watcher for all pids).
379 456
457 STAT WATCHERS - did the file attributes just change?
458 $w = EV::stat $path, $interval, $callback
459 $w = EV::stat_ns $path, $interval, $callback
460 Call the callback when a file status change has been detected on
461 $path. The $path does not need to exist, changing from "path exists"
462 to "path does not exist" is a status change like any other.
463
464 The $interval is a recommended polling interval for systems where
465 OS-supported change notifications don't exist or are not supported.
466 If you use 0 then an unspecified default is used (which is highly
467 recommended!), which is to be expected to be around five seconds
468 usually.
469
470 This watcher type is not meant for massive numbers of stat watchers,
471 as even with OS-supported change notifications, this can be
472 resource-intensive.
473
474 The "stat_ns" variant doesn't start (activate) the newly created
475 watcher.
476
477 ... = $w->stat
478 This call is very similar to the perl "stat" built-in: It stats
479 (using "lstat") the path specified in the watcher and sets perls
480 stat cache (as well as EV's idea of the current stat values) to the
481 values found.
482
483 In scalar context, a boolean is return indicating success or failure
484 of the stat. In list context, the same 13-value list as with stat is
485 returned (except that the blksize and blocks fields are not
486 reliable).
487
488 In the case of an error, errno is set to "ENOENT" (regardless of the
489 actual error value) and the "nlink" value is forced to zero (if the
490 stat was successful then nlink is guaranteed to be non-zero).
491
492 See also the next two entries for more info.
493
494 ... = $w->attr
495 Just like "$w->stat", but without the initial stat'ing: this returns
496 the values most recently detected by EV. See the next entry for more
497 info.
498
499 ... = $w->prev
500 Just like "$w->stat", but without the initial stat'ing: this returns
501 the previous set of values, before the change.
502
503 That is, when the watcher callback is invoked, "$w->prev" will be
504 set to the values found *before* a change was detected, while
505 "$w->attr" returns the values found leading to the change detection.
506 The difference (if any) between "prev" and "attr" is what triggered
507 the callback.
508
509 If you did something to the filesystem object and do not want to
510 trigger yet another change, you can call "stat" to update EV's idea
511 of what the current attributes are.
512
513 $w->set ($path, $interval)
514 Reconfigures the watcher, see the constructor above for details. Can
515 be called at any time.
516
517 $current_path = $w->path
518 $old_path = $w->path ($new_path)
519 Returns the previously set path and optionally set a new one.
520
521 $current_interval = $w->interval
522 $old_interval = $w->interval ($new_interval)
523 Returns the previously set interval and optionally set a new one.
524 Can be used to query the actual interval used.
525
526 IDLE WATCHERS - when you've got nothing better to do...
380 $w = EV::idle $callback 527 $w = EV::idle $callback
381 $w = EV::idle_ns $callback 528 $w = EV::idle_ns $callback
382 Call the callback when there are no pending io, timer/periodic, 529 Call the callback when there are no pending io, timer/periodic,
383 signal or child events, i.e. when the process is idle. 530 signal or child events, i.e. when the process is idle.
384 531
386 and they will be called repeatedly until stopped. 533 and they will be called repeatedly until stopped.
387 534
388 The "idle_ns" variant doesn't start (activate) the newly created 535 The "idle_ns" variant doesn't start (activate) the newly created
389 watcher. 536 watcher.
390 537
538 PREPARE WATCHERS - customise your event loop!
391 $w = EV::prepare $callback 539 $w = EV::prepare $callback
392 $w = EV::prepare_ns $callback 540 $w = EV::prepare_ns $callback
393 Call the callback just before the process would block. You can still 541 Call the callback just before the process would block. You can still
394 create/modify any watchers at this point. 542 create/modify any watchers at this point.
395 543
396 See the EV::check watcher, below, for explanations and an example. 544 See the EV::check watcher, below, for explanations and an example.
397 545
398 The "prepare_ns" variant doesn't start (activate) the newly created 546 The "prepare_ns" variant doesn't start (activate) the newly created
399 watcher. 547 watcher.
400 548
549 CHECK WATCHERS - customise your event loop even more!
401 $w = EV::check $callback 550 $w = EV::check $callback
402 $w = EV::check_ns $callback 551 $w = EV::check_ns $callback
403 Call the callback just after the process wakes up again (after it 552 Call the callback just after the process wakes up again (after it
404 has gathered events), but before any other callbacks have been 553 has gathered events), but before any other callbacks have been
405 invoked. 554 invoked.
416 # do nothing unless active 565 # do nothing unless active
417 $dispatcher->{_event_queue_h} 566 $dispatcher->{_event_queue_h}
418 or return; 567 or return;
419 568
420 # make the dispatcher handle any outstanding stuff 569 # make the dispatcher handle any outstanding stuff
570 ... not shown
421 571
422 # create an IO watcher for each and every socket 572 # create an IO watcher for each and every socket
423 @snmp_watcher = ( 573 @snmp_watcher = (
424 (map { EV::io $_, EV::READ, sub { } } 574 (map { EV::io $_, EV::READ, sub { } }
425 keys %{ $dispatcher->{_descriptors} }), 575 keys %{ $dispatcher->{_descriptors} }),
576
577 EV::timer +($event->[Net::SNMP::Dispatcher::_ACTIVE]
578 ? $event->[Net::SNMP::Dispatcher::_TIME] - EV::now : 0),
579 0, sub { },
426 ); 580 );
427
428 # if there are any timeouts, also create a timer
429 push @snmp_watcher, EV::timer $event->[Net::SNMP::Dispatcher::_TIME] - EV::now, 0, sub { }
430 if $event->[Net::SNMP::Dispatcher::_ACTIVE];
431 }; 581 };
432 582
433 The callbacks are irrelevant, the only purpose of those watchers is 583 The callbacks are irrelevant (and are not even being called), the
434 to wake up the process as soon as one of those events occurs (socket 584 only purpose of those watchers is to wake up the process as soon as
435 readable, or timer timed out). The corresponding EV::check watcher 585 one of those events occurs (socket readable, or timer timed out).
436 will then clean up: 586 The corresponding EV::check watcher will then clean up:
437 587
438 our $snmp_check = EV::check sub { 588 our $snmp_check = EV::check sub {
439 # destroy all watchers 589 # destroy all watchers
440 @snmp_watcher = (); 590 @snmp_watcher = ();
441 591
442 # make the dispatcher handle any new stuff 592 # make the dispatcher handle any new stuff
593 ... not shown
443 }; 594 };
444 595
445 The callbacks of the created watchers will not be called as the 596 The callbacks of the created watchers will not be called as the
446 watchers are destroyed before this cna happen (remember EV::check 597 watchers are destroyed before this cna happen (remember EV::check
447 gets called first). 598 gets called first).
448 599
449 The "check_ns" variant doesn't start (activate) the newly created 600 The "check_ns" variant doesn't start (activate) the newly created
450 watcher. 601 watcher.
451 602
603 FORK WATCHERS - the audacity to resume the event loop after a fork
604 Fork watchers are called when a "fork ()" was detected. The invocation
605 is done before the event loop blocks next and before "check" watchers
606 are being called, and only in the child after the fork.
607
608 $w = EV::fork $callback
609 $w = EV::fork_ns $callback
610 Call the callback before the event loop is resumed in the child
611 process after a fork.
612
613 The "fork_ns" variant doesn't start (activate) the newly created
614 watcher.
615
452THREADS 616THREADS
453 Threads are not supported by this in any way. Perl pseudo-threads is 617 Threads are not supported by this module in any way. Perl pseudo-threads
454 evil stuff and must die. 618 is evil stuff and must die. As soon as Perl gains real threads I will
619 work on thread support for it.
620
621FORK
622 Most of the "improved" event delivering mechanisms of modern operating
623 systems have quite a few problems with fork(2) (to put it bluntly: it is
624 not supported and usually destructive). Libev makes it possible to work
625 around this by having a function that recreates the kernel state after
626 fork in the child.
627
628 On non-win32 platforms, this module requires the pthread_atfork
629 functionality to do this automatically for you. This function is quite
630 buggy on most BSDs, though, so YMMV. The overhead for this is quite
631 negligible, because everything the function currently does is set a flag
632 that is checked only when the event loop gets used the next time, so
633 when you do fork but not use EV, the overhead is minimal.
634
635 On win32, there is no notion of fork so all this doesn't apply, of
636 course.
455 637
456SEE ALSO 638SEE ALSO
457 L<EV::DNS>, L<EV::AnyEvent>. 639 EV::ADNS (asynchronous dns), Glib::EV (makes Glib/Gtk2 use EV as event
640 loop), Coro::EV (efficient coroutines with EV).
458 641
459AUTHOR 642AUTHOR
460 Marc Lehmann <schmorp@schmorp.de> 643 Marc Lehmann <schmorp@schmorp.de>
461 http://home.schmorp.de/ 644 http://home.schmorp.de/
462 645

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines