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

Comparing EV/EV.pm (file contents):
Revision 1.133 by root, Tue Jan 11 02:31:24 2011 UTC vs.
Revision 1.151 by root, Tue Sep 4 23:14:45 2018 UTC

47 my ($w, $revents) = @_; 47 my ($w, $revents) = @_;
48 warn $w->path, " has changed somehow.\n"; 48 warn $w->path, " has changed somehow.\n";
49 }; 49 };
50 50
51 # MAINLOOP 51 # MAINLOOP
52 EV::loop; # loop until EV::unloop is called or all watchers stop 52 EV::run; # loop until EV::break is called or all watchers stop
53 EV::loop EV::LOOP_ONESHOT; # block until at least one event could be handled 53 EV::run EV::RUN_ONCE; # block until at least one event could be handled
54 EV::loop EV::LOOP_NONBLOCK; # try to handle same events, but do not block 54 EV::run EV::RUN_NOWAIT; # try to handle same events, but do not block
55 55
56=head1 BEFORE YOU START USING THIS MODULE 56=head1 BEFORE YOU START USING THIS MODULE
57 57
58If you only need timer, I/O, signal, child and idle watchers and not the 58If you only need timer, I/O, signal, child and idle watchers and not the
59advanced functionality of this module, consider using L<AnyEvent> instead, 59advanced functionality of this module, consider using L<AnyEvent> instead,
119package EV; 119package EV;
120 120
121use common::sense; 121use common::sense;
122 122
123BEGIN { 123BEGIN {
124 our $VERSION = '4.02'; 124 our $VERSION = 4.22;
125 use XSLoader; 125 use XSLoader;
126 local $^W = 0; # avoid spurious warning
126 XSLoader::load "EV", $VERSION; 127 XSLoader::load "EV", $VERSION;
127} 128}
128 129
129@EV::IO::ISA = 130@EV::IO::ISA =
130@EV::Timer::ISA = 131@EV::Timer::ISA =
186Must be called after a fork in the child, before entering or continuing 187Must be called after a fork in the child, before entering or continuing
187the event loop. An alternative is to use C<EV::FLAG_FORKCHECK> which calls 188the event loop. An alternative is to use C<EV::FLAG_FORKCHECK> which calls
188this function automatically, at some performance loss (refer to the libev 189this function automatically, at some performance loss (refer to the libev
189documentation). 190documentation).
190 191
191=item $loop->loop_verify 192=item $loop->verify
192 193
193Calls C<ev_verify> to make internal consistency checks (for debugging 194Calls C<ev_verify> to make internal consistency checks (for debugging
194libev) and abort the program if any data structures were found to be 195libev) and abort the program if any data structures were found to be
195corrupted. 196corrupted.
196 197
290=item $backend = $loop->backend 291=item $backend = $loop->backend
291 292
292Returns an integer describing the backend used by libev (EV::BACKEND_SELECT 293Returns an integer describing the backend used by libev (EV::BACKEND_SELECT
293or EV::BACKEND_EPOLL). 294or EV::BACKEND_EPOLL).
294 295
295=item EV::loop [$flags] 296=item $active = EV::run [$flags]
296 297
297=item $loop->loop ([$flags]) 298=item $active = $loop->run ([$flags])
298 299
299Begin checking for events and calling callbacks. It returns when a 300Begin checking for events and calling callbacks. It returns when a
300callback calls EV::unloop. 301callback calls EV::break or the flags are nonzero (in which case the
302return value is true) or when there are no active watchers which reference
303the loop (keepalive is true), in which case the return value will be
304false. The return value can generally be interpreted as "if true, there is
305more work left to do".
301 306
302The $flags argument can be one of the following: 307The $flags argument can be one of the following:
303 308
304 0 as above 309 0 as above
305 EV::LOOP_ONCE block at most once (wait, but do not loop) 310 EV::RUN_ONCE block at most once (wait, but do not loop)
306 EV::LOOP_NOWAIT do not block at all (fetch/handle events but do not wait) 311 EV::RUN_NOWAIT do not block at all (fetch/handle events but do not wait)
307 312
308=item EV::break [$how] 313=item EV::break [$how]
309 314
310=item $loop->break ([$how]) 315=item $loop->break ([$how])
311 316
316return as fast as possible. 321return as fast as possible.
317 322
318When called with an argument of EV::BREAK_CANCEL, any pending break will 323When called with an argument of EV::BREAK_CANCEL, any pending break will
319be cancelled. 324be cancelled.
320 325
321=item $count = EV::loop_count 326=item $count = EV::iteration
322 327
323=item $count = $loop->loop_count 328=item $count = $loop->iteration
324 329
325Return the number of times the event loop has polled for new 330Return the number of times the event loop has polled for new
326events. Sometimes useful as a generation counter. 331events. Sometimes useful as a generation counter.
327 332
328=item EV::once $fh_or_undef, $events, $timeout, $cb->($revents) 333=item EV::once $fh_or_undef, $events, $timeout, $cb->($revents)
593 598
594=item $w = $loop->timer ($after, $repeat, $callback) 599=item $w = $loop->timer ($after, $repeat, $callback)
595 600
596=item $w = $loop->timer_ns ($after, $repeat, $callback) 601=item $w = $loop->timer_ns ($after, $repeat, $callback)
597 602
598Calls the callback after C<$after> seconds (which may be fractional). If 603Calls the callback after C<$after> seconds (which may be fractional or
599C<$repeat> is non-zero, the timer will be restarted (with the $repeat 604negative). If C<$repeat> is non-zero, the timer will be restarted (with
600value as $after) after the callback returns. 605the $repeat value as $after) after the callback returns.
601 606
602This means that the callback would be called roughly after C<$after> 607This means that the callback would be called roughly after C<$after>
603seconds, and then every C<$repeat> seconds. The timer does his best not 608seconds, and then every C<$repeat> seconds. The timer does his best not
604to drift, but it will not invoke the timer more often then once per event 609to drift, but it will not invoke the timer more often then once per event
605loop iteration, and might drift in other cases. If that isn't acceptable, 610loop iteration, and might drift in other cases. If that isn't acceptable,
609in front of the machine while the timer is running and changes the system 614in front of the machine while the timer is running and changes the system
610clock, the timer will nevertheless run (roughly) the same time. 615clock, the timer will nevertheless run (roughly) the same time.
611 616
612The C<timer_ns> variant doesn't start (activate) the newly created watcher. 617The C<timer_ns> variant doesn't start (activate) the newly created watcher.
613 618
614=item $w->set ($after, $repeat) 619=item $w->set ($after, $repeat = 0)
615 620
616Reconfigures the watcher, see the constructor above for details. Can be called at 621Reconfigures the watcher, see the constructor above for details. Can be called at
617any time. 622any time.
618 623
619=item $w->again 624=item $w->again
625
626=item $w->again ($repeat)
620 627
621Similar to the C<start> method, but has special semantics for repeating timers: 628Similar to the C<start> method, but has special semantics for repeating timers:
622 629
623If the timer is active and non-repeating, it will be stopped. 630If the timer is active and non-repeating, it will be stopped.
624 631
631 638
632This behaviour is useful when you have a timeout for some IO 639This behaviour is useful when you have a timeout for some IO
633operation. You create a timer object with the same value for C<$after> and 640operation. You create a timer object with the same value for C<$after> and
634C<$repeat>, and then, in the read/write watcher, run the C<again> method 641C<$repeat>, and then, in the read/write watcher, run the C<again> method
635on the timeout. 642on the timeout.
643
644If called with a C<$repeat> argument, then it uses this a timer repeat
645value.
646
647=item $after = $w->remaining
648
649Calculates and returns the remaining time till the timer will fire.
636 650
637=back 651=back
638 652
639 653
640=head3 PERIODIC WATCHERS - to cron or not to cron? 654=head3 PERIODIC WATCHERS - to cron or not to cron?
668surpasses this time. 682surpasses this time.
669 683
670=item * repeating interval timer ($interval > 0, $reschedule_cb = 0) 684=item * repeating interval timer ($interval > 0, $reschedule_cb = 0)
671 685
672In this mode the watcher will always be scheduled to time out at the 686In this mode the watcher will always be scheduled to time out at the
673next C<$at + N * $interval> time (for some integer N) and then repeat, 687next C<$at + N * $interval> time (for the lowest integer N) and then repeat,
674regardless of any time jumps. 688regardless of any time jumps. Note that, since C<N> can be negative, the
689first trigger can happen before C<$at>.
675 690
676This can be used to create timers that do not drift with respect to system 691This can be used to create timers that do not drift with respect to system
677time: 692time:
678 693
679 my $hourly = EV::periodic 0, 3600, 0, sub { print "once/hour\n" }; 694 my $hourly = EV::periodic 0, 3600, 0, sub { print "once/hour\n" };
680 695
681That doesn't mean there will always be 3600 seconds in between triggers, 696That doesn't mean there will always be 3600 seconds in between triggers,
682but only that the the clalback will be called when the system time shows a 697but only that the the callback will be called when the system time shows a
683full hour (UTC). 698full hour (UTC).
684 699
685Another way to think about it (for the mathematically inclined) is that 700Another way to think about it (for the mathematically inclined) is that
686EV::periodic will try to run the callback in this mode at the next 701EV::periodic will try to run the callback in this mode at the next
687possible time where C<$time = $at (mod $interval)>, regardless of any time 702possible time where C<$time = $at (mod $interval)>, regardless of any time
1135 1150
1136=item $w = EV::async $callback 1151=item $w = EV::async $callback
1137 1152
1138=item $w = EV::async_ns $callback 1153=item $w = EV::async_ns $callback
1139 1154
1155=item $w = $loop->async ($callback)
1156
1157=item $w = $loop->async_ns ($callback)
1158
1140=item $w->send 1159=item $w->send
1141 1160
1142=item $bool = $w->async_pending 1161=item $bool = $w->async_pending
1143 1162
1144=back 1163=back
1164
1165=head3 CLEANUP WATCHERS - how to clean up when the event loop goes away
1166
1167Cleanup watchers are not supported on the Perl level, they can only be
1168used via XS currently.
1145 1169
1146 1170
1147=head1 PERL SIGNALS 1171=head1 PERL SIGNALS
1148 1172
1149While Perl signal handling (C<%SIG>) is not affected by EV, the behaviour 1173While Perl signal handling (C<%SIG>) is not affected by EV, the behaviour

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines