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

Comparing AnyEvent/README (file contents):
Revision 1.33 by root, Thu Oct 30 03:43:13 2008 UTC vs.
Revision 1.40 by root, Tue Jun 23 23:37:32 2009 UTC

1NAME 1NAME
2 AnyEvent - provide framework for multiple event loops 2 AnyEvent - provide framework for multiple event loops
3 3
4 EV, Event, Glib, Tk, Perl, Event::Lib, Qt, POE - various supported event 4 EV, Event, Glib, Tk, Perl, Event::Lib, Qt and POE are various supported
5 loops 5 event loops.
6 6
7SYNOPSIS 7SYNOPSIS
8 use AnyEvent; 8 use AnyEvent;
9 9
10 # file descriptor readable
10 my $w = AnyEvent->io (fh => $fh, poll => "r|w", cb => sub { ... }); 11 my $w = AnyEvent->io (fh => $fh, poll => "r", cb => sub { ... });
11 12
13 # one-shot or repeating timers
12 my $w = AnyEvent->timer (after => $seconds, cb => sub { ... }); 14 my $w = AnyEvent->timer (after => $seconds, cb => sub { ... });
13 my $w = AnyEvent->timer (after => $seconds, interval => $seconds, cb => ... 15 my $w = AnyEvent->timer (after => $seconds, interval => $seconds, cb => ...
14 16
15 print AnyEvent->now; # prints current event loop time 17 print AnyEvent->now; # prints current event loop time
16 print AnyEvent->time; # think Time::HiRes::time or simply CORE::time. 18 print AnyEvent->time; # think Time::HiRes::time or simply CORE::time.
17 19
20 # POSIX signal
18 my $w = AnyEvent->signal (signal => "TERM", cb => sub { ... }); 21 my $w = AnyEvent->signal (signal => "TERM", cb => sub { ... });
19 22
23 # child process exit
20 my $w = AnyEvent->child (pid => $pid, cb => sub { 24 my $w = AnyEvent->child (pid => $pid, cb => sub {
21 my ($pid, $status) = @_; 25 my ($pid, $status) = @_;
22 ... 26 ...
23 }); 27 });
28
29 # called when event loop idle (if applicable)
30 my $w = AnyEvent->idle (cb => sub { ... });
24 31
25 my $w = AnyEvent->condvar; # stores whether a condition was flagged 32 my $w = AnyEvent->condvar; # stores whether a condition was flagged
26 $w->send; # wake up current and all future recv's 33 $w->send; # wake up current and all future recv's
27 $w->recv; # enters "main loop" till $condvar gets ->send 34 $w->recv; # enters "main loop" till $condvar gets ->send
28 # use a condvar in callback mode: 35 # use a condvar in callback mode:
132 These watchers are normal Perl objects with normal Perl lifetime. After 139 These watchers are normal Perl objects with normal Perl lifetime. After
133 creating a watcher it will immediately "watch" for events and invoke the 140 creating a watcher it will immediately "watch" for events and invoke the
134 callback when the event occurs (of course, only when the event model is 141 callback when the event occurs (of course, only when the event model is
135 in control). 142 in control).
136 143
144 Note that callbacks must not permanently change global variables
145 potentially in use by the event loop (such as $_ or $[) and that
146 callbacks must not "die". The former is good programming practise in
147 Perl and the latter stems from the fact that exception handling differs
148 widely between event loops.
149
137 To disable the watcher you have to destroy it (e.g. by setting the 150 To disable the watcher you have to destroy it (e.g. by setting the
138 variable you store it in to "undef" or otherwise deleting all references 151 variable you store it in to "undef" or otherwise deleting all references
139 to it). 152 to it).
140 153
141 All watchers are created by calling a method on the "AnyEvent" class. 154 All watchers are created by calling a method on the "AnyEvent" class.
156 169
157 I/O WATCHERS 170 I/O WATCHERS
158 You can create an I/O watcher by calling the "AnyEvent->io" method with 171 You can create an I/O watcher by calling the "AnyEvent->io" method with
159 the following mandatory key-value pairs as arguments: 172 the following mandatory key-value pairs as arguments:
160 173
161 "fh" the Perl *file handle* (*not* file descriptor) to watch for events 174 "fh" is the Perl *file handle* (*not* file descriptor) to watch for
162 (AnyEvent might or might not keep a reference to this file handle). 175 events (AnyEvent might or might not keep a reference to this file
176 handle). Note that only file handles pointing to things for which
177 non-blocking operation makes sense are allowed. This includes sockets,
178 most character devices, pipes, fifos and so on, but not for example
179 files or block devices.
180
163 "poll" must be a string that is either "r" or "w", which creates a 181 "poll" must be a string that is either "r" or "w", which creates a
164 watcher waiting for "r"eadable or "w"ritable events, respectively. "cb" 182 watcher waiting for "r"eadable or "w"ritable events, respectively.
183
165 is the callback to invoke each time the file handle becomes ready. 184 "cb" is the callback to invoke each time the file handle becomes ready.
166 185
167 Although the callback might get passed parameters, their value and 186 Although the callback might get passed parameters, their value and
168 presence is undefined and you cannot rely on them. Portable AnyEvent 187 presence is undefined and you cannot rely on them. Portable AnyEvent
169 callbacks cannot use arguments passed to I/O watcher callbacks. 188 callbacks cannot use arguments passed to I/O watcher callbacks.
170 189
302 In either case, if you care (and in most cases, you don't), then you 321 In either case, if you care (and in most cases, you don't), then you
303 can get whatever behaviour you want with any event loop, by taking 322 can get whatever behaviour you want with any event loop, by taking
304 the difference between "AnyEvent->time" and "AnyEvent->now" into 323 the difference between "AnyEvent->time" and "AnyEvent->now" into
305 account. 324 account.
306 325
326 AnyEvent->now_update
327 Some event loops (such as EV or AnyEvent::Impl::Perl) cache the
328 current time for each loop iteration (see the discussion of
329 AnyEvent->now, above).
330
331 When a callback runs for a long time (or when the process sleeps),
332 then this "current" time will differ substantially from the real
333 time, which might affect timers and time-outs.
334
335 When this is the case, you can call this method, which will update
336 the event loop's idea of "current time".
337
338 Note that updating the time *might* cause some events to be handled.
339
307 SIGNAL WATCHERS 340 SIGNAL WATCHERS
308 You can watch for signals using a signal watcher, "signal" is the signal 341 You can watch for signals using a signal watcher, "signal" is the signal
309 *name* in uppercase and without any "SIG" prefix, "cb" is the Perl 342 *name* in uppercase and without any "SIG" prefix, "cb" is the Perl
310 callback to be invoked whenever a signal occurs. 343 callback to be invoked whenever a signal occurs.
311 344
359 you "fork" the child (alternatively, you can call "AnyEvent::detect"). 392 you "fork" the child (alternatively, you can call "AnyEvent::detect").
360 393
361 Example: fork a process and wait for it 394 Example: fork a process and wait for it
362 395
363 my $done = AnyEvent->condvar; 396 my $done = AnyEvent->condvar;
364 397
365 my $pid = fork or exit 5; 398 my $pid = fork or exit 5;
366 399
367 my $w = AnyEvent->child ( 400 my $w = AnyEvent->child (
368 pid => $pid, 401 pid => $pid,
369 cb => sub { 402 cb => sub {
370 my ($pid, $status) = @_; 403 my ($pid, $status) = @_;
371 warn "pid $pid exited with status $status"; 404 warn "pid $pid exited with status $status";
372 $done->send; 405 $done->send;
373 }, 406 },
374 ); 407 );
375 408
376 # do something else, then wait for process exit 409 # do something else, then wait for process exit
377 $done->recv; 410 $done->recv;
411
412 IDLE WATCHERS
413 Sometimes there is a need to do something, but it is not so important to
414 do it instantly, but only when there is nothing better to do. This
415 "nothing better to do" is usually defined to be "no other events need
416 attention by the event loop".
417
418 Idle watchers ideally get invoked when the event loop has nothing better
419 to do, just before it would block the process to wait for new events.
420 Instead of blocking, the idle watcher is invoked.
421
422 Most event loops unfortunately do not really support idle watchers (only
423 EV, Event and Glib do it in a usable fashion) - for the rest, AnyEvent
424 will simply call the callback "from time to time".
425
426 Example: read lines from STDIN, but only process them when the program
427 is otherwise idle:
428
429 my @lines; # read data
430 my $idle_w;
431 my $io_w = AnyEvent->io (fh => \*STDIN, poll => 'r', cb => sub {
432 push @lines, scalar <STDIN>;
433
434 # start an idle watcher, if not already done
435 $idle_w ||= AnyEvent->idle (cb => sub {
436 # handle only one line, when there are lines left
437 if (my $line = shift @lines) {
438 print "handled when idle: $line";
439 } else {
440 # otherwise disable the idle watcher again
441 undef $idle_w;
442 }
443 });
444 });
378 445
379 CONDITION VARIABLES 446 CONDITION VARIABLES
380 If you are familiar with some event loops you will know that all of them 447 If you are familiar with some event loops you will know that all of them
381 require you to run some blocking "loop", "run" or similar function that 448 require you to run some blocking "loop", "run" or similar function that
382 will actively watch for new events and call your callbacks. 449 will actively watch for new events and call your callbacks.
816 "condvar->recv"), the Event and EV modules call "$Event/EV::DIED->()", 883 "condvar->recv"), the Event and EV modules call "$Event/EV::DIED->()",
817 Glib uses "install_exception_handler" and so on. 884 Glib uses "install_exception_handler" and so on.
818 885
819ENVIRONMENT VARIABLES 886ENVIRONMENT VARIABLES
820 The following environment variables are used by this module or its 887 The following environment variables are used by this module or its
821 submodules: 888 submodules.
889
890 Note that AnyEvent will remove *all* environment variables starting with
891 "PERL_ANYEVENT_" from %ENV when it is loaded while taint mode is
892 enabled.
822 893
823 "PERL_ANYEVENT_VERBOSE" 894 "PERL_ANYEVENT_VERBOSE"
824 By default, AnyEvent will be completely silent except in fatal 895 By default, AnyEvent will be completely silent except in fatal
825 conditions. You can set this environment variable to make AnyEvent 896 conditions. You can set this environment variable to make AnyEvent
826 more talkative. 897 more talkative.
870 mentioned will be used, and preference will be given to protocols 941 mentioned will be used, and preference will be given to protocols
871 mentioned earlier in the list. 942 mentioned earlier in the list.
872 943
873 This variable can effectively be used for denial-of-service attacks 944 This variable can effectively be used for denial-of-service attacks
874 against local programs (e.g. when setuid), although the impact is 945 against local programs (e.g. when setuid), although the impact is
875 likely small, as the program has to handle connection errors 946 likely small, as the program has to handle conenction and other
876 already- 947 failures anyways.
877 948
878 Examples: "PERL_ANYEVENT_PROTOCOLS=ipv4,ipv6" - prefer IPv4 over 949 Examples: "PERL_ANYEVENT_PROTOCOLS=ipv4,ipv6" - prefer IPv4 over
879 IPv6, but support both and try to use both. 950 IPv6, but support both and try to use both.
880 "PERL_ANYEVENT_PROTOCOLS=ipv4" - only support IPv4, never try to 951 "PERL_ANYEVENT_PROTOCOLS=ipv4" - only support IPv4, never try to
881 resolve or contact IPv6 addresses. 952 resolve or contact IPv6 addresses.
1134 Results 1205 Results
1135 name watchers bytes create invoke destroy comment 1206 name watchers bytes create invoke destroy comment
1136 EV/EV 400000 224 0.47 0.35 0.27 EV native interface 1207 EV/EV 400000 224 0.47 0.35 0.27 EV native interface
1137 EV/Any 100000 224 2.88 0.34 0.27 EV + AnyEvent watchers 1208 EV/Any 100000 224 2.88 0.34 0.27 EV + AnyEvent watchers
1138 CoroEV/Any 100000 224 2.85 0.35 0.28 coroutines + Coro::Signal 1209 CoroEV/Any 100000 224 2.85 0.35 0.28 coroutines + Coro::Signal
1139 Perl/Any 100000 452 4.14 0.75 0.99 pure perl implementation 1210 Perl/Any 100000 452 4.13 0.73 0.95 pure perl implementation
1140 Event/Event 16000 517 32.20 31.80 0.81 Event native interface 1211 Event/Event 16000 517 32.20 31.80 0.81 Event native interface
1141 Event/Any 16000 590 35.85 31.55 1.06 Event + AnyEvent watchers 1212 Event/Any 16000 590 35.85 31.55 1.06 Event + AnyEvent watchers
1142 Glib/Any 16000 1357 102.33 12.31 51.00 quadratic behaviour 1213 Glib/Any 16000 1357 102.33 12.31 51.00 quadratic behaviour
1143 Tk/Any 2000 1860 27.20 66.31 14.00 SEGV with >> 2000 watchers 1214 Tk/Any 2000 1860 27.20 66.31 14.00 SEGV with >> 2000 watchers
1144 POE/Event 2000 6328 109.99 751.67 14.02 via POE::Loop::Event 1215 POE/Event 2000 6328 109.99 751.67 14.02 via POE::Loop::Event
1331 1402
1332 Summary 1403 Summary
1333 * C-based event loops perform very well with small number of watchers, 1404 * C-based event loops perform very well with small number of watchers,
1334 as the management overhead dominates. 1405 as the management overhead dominates.
1335 1406
1407 THE IO::Lambda BENCHMARK
1408 Recently I was told about the benchmark in the IO::Lambda manpage, which
1409 could be misinterpreted to make AnyEvent look bad. In fact, the
1410 benchmark simply compares IO::Lambda with POE, and IO::Lambda looks
1411 better (which shouldn't come as a surprise to anybody). As such, the
1412 benchmark is fine, and shows that the AnyEvent backend from IO::Lambda
1413 isn't very optimal. But how would AnyEvent compare when used without the
1414 extra baggage? To explore this, I wrote the equivalent benchmark for
1415 AnyEvent.
1416
1417 The benchmark itself creates an echo-server, and then, for 500 times,
1418 connects to the echo server, sends a line, waits for the reply, and then
1419 creates the next connection. This is a rather bad benchmark, as it
1420 doesn't test the efficiency of the framework, but it is a benchmark
1421 nevertheless.
1422
1423 name runtime
1424 Lambda/select 0.330 sec
1425 + optimized 0.122 sec
1426 Lambda/AnyEvent 0.327 sec
1427 + optimized 0.138 sec
1428 Raw sockets/select 0.077 sec
1429 POE/select, components 0.662 sec
1430 POE/select, raw sockets 0.226 sec
1431 POE/select, optimized 0.404 sec
1432
1433 AnyEvent/select/nb 0.085 sec
1434 AnyEvent/EV/nb 0.068 sec
1435 +state machine 0.134 sec
1436
1437 The benchmark is also a bit unfair (my fault) - the IO::Lambda
1438 benchmarks actually make blocking connects and use 100% blocking I/O,
1439 defeating the purpose of an event-based solution. All of the newly
1440 written AnyEvent benchmarks use 100% non-blocking connects (using
1441 AnyEvent::Socket::tcp_connect and the asynchronous pure perl DNS
1442 resolver), so AnyEvent is at a disadvantage here as non-blocking
1443 connects generally require a lot more bookkeeping and event handling
1444 than blocking connects (which involve a single syscall only).
1445
1446 The last AnyEvent benchmark additionally uses AnyEvent::Handle, which
1447 offers similar expressive power as POE and IO::Lambda (using
1448 conventional Perl syntax), which means both the echo server and the
1449 client are 100% non-blocking w.r.t. I/O, further placing it at a
1450 disadvantage.
1451
1452 As you can see, AnyEvent + EV even beats the hand-optimised "raw sockets
1453 benchmark", while AnyEvent + its pure perl backend easily beats
1454 IO::Lambda and POE.
1455
1456 And even the 100% non-blocking version written using the high-level (and
1457 slow :) AnyEvent::Handle abstraction beats both POE and IO::Lambda, even
1458 thought it does all of DNS, tcp-connect and socket I/O in a non-blocking
1459 way.
1460
1461 The two AnyEvent benchmarks can be found as eg/ae0.pl and eg/ae2.pl in
1462 the AnyEvent distribution, the remaining benchmarks are part of the
1463 IO::lambda distribution and were used without any changes.
1464
1336SIGNALS 1465SIGNALS
1337 AnyEvent currently installs handlers for these signals: 1466 AnyEvent currently installs handlers for these signals:
1338 1467
1339 SIGCHLD 1468 SIGCHLD
1340 A handler for "SIGCHLD" is installed by AnyEvent's child watcher 1469 A handler for "SIGCHLD" is installed by AnyEvent's child watcher
1375 1504
1376 You can make AnyEvent completely ignore this variable by deleting it 1505 You can make AnyEvent completely ignore this variable by deleting it
1377 before the first watcher gets created, e.g. with a "BEGIN" block: 1506 before the first watcher gets created, e.g. with a "BEGIN" block:
1378 1507
1379 BEGIN { delete $ENV{PERL_ANYEVENT_MODEL} } 1508 BEGIN { delete $ENV{PERL_ANYEVENT_MODEL} }
1380 1509
1381 use AnyEvent; 1510 use AnyEvent;
1382 1511
1383 Similar considerations apply to $ENV{PERL_ANYEVENT_VERBOSE}, as that can 1512 Similar considerations apply to $ENV{PERL_ANYEVENT_VERBOSE}, as that can
1384 be used to probe what backend is used and gain other information (which 1513 be used to probe what backend is used and gain other information (which
1385 is probably even less useful to an attacker than PERL_ANYEVENT_MODEL), 1514 is probably even less useful to an attacker than PERL_ANYEVENT_MODEL),
1386 and $ENV{PERL_ANYEGENT_STRICT}. 1515 and $ENV{PERL_ANYEVENT_STRICT}.
1387 1516
1388BUGS 1517BUGS
1389 Perl 5.8 has numerous memleaks that sometimes hit this module and are 1518 Perl 5.8 has numerous memleaks that sometimes hit this module and are
1390 hard to work around. If you suffer from memleaks, first upgrade to Perl 1519 hard to work around. If you suffer from memleaks, first upgrade to Perl
1391 5.10 and check wether the leaks still show up. (Perl 5.10.0 has other 1520 5.10 and check wether the leaks still show up. (Perl 5.10.0 has other
1392 annoying mamleaks, such as leaking on "map" and "grep" but it is usually 1521 annoying memleaks, such as leaking on "map" and "grep" but it is usually
1393 not as pronounced). 1522 not as pronounced).
1394 1523
1395SEE ALSO 1524SEE ALSO
1396 Utility functions: AnyEvent::Util. 1525 Utility functions: AnyEvent::Util.
1397 1526

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines