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

Comparing AnyEvent/lib/AnyEvent.pm (file contents):
Revision 1.96 by root, Sat Apr 26 11:16:16 2008 UTC vs.
Revision 1.104 by root, Wed Apr 30 11:40:22 2008 UTC

65technically possible. 65technically possible.
66 66
67Of course, if you want lots of policy (this can arguably be somewhat 67Of course, if you want lots of policy (this can arguably be somewhat
68useful) and you want to force your users to use the one and only event 68useful) and you want to force your users to use the one and only event
69model, you should I<not> use this module. 69model, you should I<not> use this module.
70
71 70
72=head1 DESCRIPTION 71=head1 DESCRIPTION
73 72
74L<AnyEvent> provides an identical interface to multiple event loops. This 73L<AnyEvent> provides an identical interface to multiple event loops. This
75allows module authors to utilise an event loop without forcing module 74allows module authors to utilise an event loop without forcing module
391 390
392 AnyEvent::Impl::CoroEV based on Coro::EV, best choice. 391 AnyEvent::Impl::CoroEV based on Coro::EV, best choice.
393 AnyEvent::Impl::CoroEvent based on Coro::Event, second best choice. 392 AnyEvent::Impl::CoroEvent based on Coro::Event, second best choice.
394 AnyEvent::Impl::EV based on EV (an interface to libev, best choice). 393 AnyEvent::Impl::EV based on EV (an interface to libev, best choice).
395 AnyEvent::Impl::Event based on Event, second best choice. 394 AnyEvent::Impl::Event based on Event, second best choice.
395 AnyEvent::Impl::Perl pure-perl implementation, fast and portable.
396 AnyEvent::Impl::Glib based on Glib, third-best choice. 396 AnyEvent::Impl::Glib based on Glib, third-best choice.
397 AnyEvent::Impl::Perl pure-perl implementation, inefficient but portable.
398 AnyEvent::Impl::Tk based on Tk, very bad choice. 397 AnyEvent::Impl::Tk based on Tk, very bad choice.
399 AnyEvent::Impl::Qt based on Qt, cannot be autoprobed (see its docs). 398 AnyEvent::Impl::Qt based on Qt, cannot be autoprobed (see its docs).
400 AnyEvent::Impl::EventLib based on Event::Lib, leaks memory and worse. 399 AnyEvent::Impl::EventLib based on Event::Lib, leaks memory and worse.
401 AnyEvent::Impl::POE based on POE, not generic enough for full support. 400 AnyEvent::Impl::POE based on POE, not generic enough for full support.
402 401
458 457
459You can chose to use a rather inefficient pure-perl implementation by 458You can chose to use a rather inefficient pure-perl implementation by
460loading the C<AnyEvent::Impl::Perl> module, which gives you similar 459loading the C<AnyEvent::Impl::Perl> module, which gives you similar
461behaviour everywhere, but letting AnyEvent chose is generally better. 460behaviour everywhere, but letting AnyEvent chose is generally better.
462 461
462=head1 OTHER MODULES
463
464The following is a non-exhaustive list of additional modules that use
465AnyEvent and can therefore be mixed easily with other AnyEvent modules
466in the same program. Some of the modules come with AnyEvent, some are
467available via CPAN.
468
469=over 4
470
471=item L<AnyEvent::Util>
472
473Contains various utility functions that replace often-used but blocking
474functions such as C<inet_aton> by event-/callback-based versions.
475
476=item L<AnyEvent::Handle>
477
478Provide read and write buffers and manages watchers for reads and writes.
479
480=item L<AnyEvent::Socket>
481
482Provides a means to do non-blocking connects, accepts etc.
483
484=item L<AnyEvent::HTTPD>
485
486Provides a simple web application server framework.
487
488=item L<AnyEvent::DNS>
489
490Provides asynchronous DNS resolver capabilities, beyond what
491L<AnyEvent::Util> offers.
492
493=item L<AnyEvent::FastPing>
494
495The fastest ping in the west.
496
497=item L<Net::IRC3>
498
499AnyEvent based IRC client module family.
500
501=item L<Net::XMPP2>
502
503AnyEvent based XMPP (Jabber protocol) module family.
504
505=item L<Net::FCP>
506
507AnyEvent-based implementation of the Freenet Client Protocol, birthplace
508of AnyEvent.
509
510=item L<Event::ExecFlow>
511
512High level API for event-based execution flow control.
513
514=item L<Coro>
515
516Has special support for AnyEvent.
517
518=item L<IO::Lambda>
519
520The lambda approach to I/O - don't ask, look there. Can use AnyEvent.
521
522=item L<IO::AIO>
523
524Truly asynchronous I/O, should be in the toolbox of every event
525programmer. Can be trivially made to use AnyEvent.
526
527=item L<BDB>
528
529Truly asynchronous Berkeley DB access. Can be trivially made to use
530AnyEvent.
531
532=back
533
463=cut 534=cut
464 535
465package AnyEvent; 536package AnyEvent;
466 537
467no warnings; 538no warnings;
482my @models = ( 553my @models = (
483 [Coro::EV:: => AnyEvent::Impl::CoroEV::], 554 [Coro::EV:: => AnyEvent::Impl::CoroEV::],
484 [Coro::Event:: => AnyEvent::Impl::CoroEvent::], 555 [Coro::Event:: => AnyEvent::Impl::CoroEvent::],
485 [EV:: => AnyEvent::Impl::EV::], 556 [EV:: => AnyEvent::Impl::EV::],
486 [Event:: => AnyEvent::Impl::Event::], 557 [Event:: => AnyEvent::Impl::Event::],
487 [Glib:: => AnyEvent::Impl::Glib::],
488 [Tk:: => AnyEvent::Impl::Tk::], 558 [Tk:: => AnyEvent::Impl::Tk::],
489 [Wx:: => AnyEvent::Impl::POE::], 559 [Wx:: => AnyEvent::Impl::POE::],
490 [Prima:: => AnyEvent::Impl::POE::], 560 [Prima:: => AnyEvent::Impl::POE::],
491 [AnyEvent::Impl::Perl:: => AnyEvent::Impl::Perl::], 561 [AnyEvent::Impl::Perl:: => AnyEvent::Impl::Perl::],
492 # everything below here will not be autoprobed as the pureperl backend should work everywhere 562 # everything below here will not be autoprobed as the pureperl backend should work everywhere
563 [Glib:: => AnyEvent::Impl::Glib::],
493 [Event::Lib:: => AnyEvent::Impl::EventLib::], # too buggy 564 [Event::Lib:: => AnyEvent::Impl::EventLib::], # too buggy
494 [Qt:: => AnyEvent::Impl::Qt::], # requires special main program 565 [Qt:: => AnyEvent::Impl::Qt::], # requires special main program
495 [POE::Kernel:: => AnyEvent::Impl::POE::], # lasciate ogni speranza 566 [POE::Kernel:: => AnyEvent::Impl::POE::], # lasciate ogni speranza
496); 567);
497 568
944 EV/EV 400000 244 0.56 0.46 0.31 EV native interface 1015 EV/EV 400000 244 0.56 0.46 0.31 EV native interface
945 EV/Any 100000 244 2.50 0.46 0.29 EV + AnyEvent watchers 1016 EV/Any 100000 244 2.50 0.46 0.29 EV + AnyEvent watchers
946 CoroEV/Any 100000 244 2.49 0.44 0.29 coroutines + Coro::Signal 1017 CoroEV/Any 100000 244 2.49 0.44 0.29 coroutines + Coro::Signal
947 Perl/Any 100000 513 4.92 0.87 1.12 pure perl implementation 1018 Perl/Any 100000 513 4.92 0.87 1.12 pure perl implementation
948 Event/Event 16000 516 31.88 31.30 0.85 Event native interface 1019 Event/Event 16000 516 31.88 31.30 0.85 Event native interface
949 Event/Any 16000 936 39.17 33.63 1.43 Event + AnyEvent watchers 1020 Event/Any 16000 590 35.75 31.42 1.08 Event + AnyEvent watchers
950 Glib/Any 16000 1357 98.22 12.41 54.00 quadratic behaviour 1021 Glib/Any 16000 1357 98.22 12.41 54.00 quadratic behaviour
951 Tk/Any 2000 1860 26.97 67.98 14.00 SEGV with >> 2000 watchers 1022 Tk/Any 2000 1860 26.97 67.98 14.00 SEGV with >> 2000 watchers
952 POE/Event 2000 6644 108.64 736.02 14.73 via POE::Loop::Event 1023 POE/Event 2000 6644 108.64 736.02 14.73 via POE::Loop::Event
953 POE/Select 2000 6343 94.13 809.12 565.96 via POE::Loop::Select 1024 POE/Select 2000 6343 94.13 809.12 565.96 via POE::Loop::Select
954 1025
1000file descriptor is dup()ed for each watcher. This shows that the dup() 1071file descriptor is dup()ed for each watcher. This shows that the dup()
1001employed by some adaptors is not a big performance issue (it does incur a 1072employed by some adaptors is not a big performance issue (it does incur a
1002hidden memory cost inside the kernel which is not reflected in the figures 1073hidden memory cost inside the kernel which is not reflected in the figures
1003above). 1074above).
1004 1075
1005C<POE>, regardless of underlying event loop (whether using its pure 1076C<POE>, regardless of underlying event loop (whether using its pure perl
1006perl select-based backend or the Event module, the POE-EV backend 1077select-based backend or the Event module, the POE-EV backend couldn't
1007couldn't be tested because it wasn't working) shows abysmal performance 1078be tested because it wasn't working) shows abysmal performance and
1008and memory usage: Watchers use almost 30 times as much memory as 1079memory usage with AnyEvent: Watchers use almost 30 times as much memory
1009EV watchers, and 10 times as much memory as Event (the high memory 1080as EV watchers, and 10 times as much memory as Event (the high memory
1010requirements are caused by requiring a session for each watcher). Watcher 1081requirements are caused by requiring a session for each watcher). Watcher
1011invocation speed is almost 900 times slower than with AnyEvent's pure perl 1082invocation speed is almost 900 times slower than with AnyEvent's pure perl
1083implementation.
1084
1012implementation. The design of the POE adaptor class in AnyEvent can not 1085The design of the POE adaptor class in AnyEvent can not really account
1013really account for this, as session creation overhead is small compared 1086for the performance issues, though, as session creation overhead is
1014to execution of the state machine, which is coded pretty optimally within 1087small compared to execution of the state machine, which is coded pretty
1015L<AnyEvent::Impl::POE>. POE simply seems to be abysmally slow. 1088optimally within L<AnyEvent::Impl::POE> (and while everybody agrees that
1089using multiple sessions is not a good approach, especially regarding
1090memory usage, even the author of POE could not come up with a faster
1091design).
1016 1092
1017=head3 Summary 1093=head3 Summary
1018 1094
1019=over 4 1095=over 4
1020 1096
1067 1143
1068=head3 Results 1144=head3 Results
1069 1145
1070 name sockets create request 1146 name sockets create request
1071 EV 20000 69.01 11.16 1147 EV 20000 69.01 11.16
1072 Perl 20000 75.28 112.76 1148 Perl 20000 73.32 35.87
1073 Event 20000 212.62 257.32 1149 Event 20000 212.62 257.32
1074 Glib 20000 651.16 1896.30 1150 Glib 20000 651.16 1896.30
1075 POE 20000 349.67 12317.24 uses POE::Loop::Event 1151 POE 20000 349.67 12317.24 uses POE::Loop::Event
1076 1152
1077=head3 Discussion 1153=head3 Discussion
1099 1175
1100=head3 Summary 1176=head3 Summary
1101 1177
1102=over 4 1178=over 4
1103 1179
1104=item * The pure perl implementation performs extremely well, considering 1180=item * The pure perl implementation performs extremely well.
1105that it uses select.
1106 1181
1107=item * Avoid Glib or POE in large projects where performance matters. 1182=item * Avoid Glib or POE in large projects where performance matters.
1108 1183
1109=back 1184=back
1110 1185
1123 1198
1124=head3 Results 1199=head3 Results
1125 1200
1126 name sockets create request 1201 name sockets create request
1127 EV 16 20.00 6.54 1202 EV 16 20.00 6.54
1203 Perl 16 25.75 12.62
1128 Event 16 81.27 35.86 1204 Event 16 81.27 35.86
1129 Glib 16 32.63 15.48 1205 Glib 16 32.63 15.48
1130 Perl 16 24.62 162.37
1131 POE 16 261.87 276.28 uses POE::Loop::Event 1206 POE 16 261.87 276.28 uses POE::Loop::Event
1132 1207
1133=head3 Discussion 1208=head3 Discussion
1134 1209
1135The benchmark tries to test the performance of a typical small 1210The benchmark tries to test the performance of a typical small
1136server. While knowing how various event loops perform is interesting, keep 1211server. While knowing how various event loops perform is interesting, keep
1137in mind that their overhead in this case is usually not as important, due 1212in mind that their overhead in this case is usually not as important, due
1138to the small absolute number of watchers. 1213to the small absolute number of watchers (that is, you need efficiency and
1214speed most when you have lots of watchers, not when you only have a few of
1215them).
1139 1216
1140EV is again fastest. 1217EV is again fastest.
1141 1218
1142The C-based event loops Event and Glib come in second this time, as the 1219Perl again comes second. It is noticably faster than the C-based event
1143overhead of running an iteration is much smaller in C than in Perl (little 1220loops Event and Glib, although the difference is too small to really
1144code to execute in the inner loop, and perl's function calling overhead is 1221matter.
1145high, and updating all the data structures is costly).
1146 1222
1147The pure perl event loop is much slower, but still competitive.
1148
1149POE also performs much better in this case, but is is stillf ar behind the 1223POE also performs much better in this case, but is is still far behind the
1150others. 1224others.
1151 1225
1152=head3 Summary 1226=head3 Summary
1153 1227
1154=over 4 1228=over 4
1160 1234
1161 1235
1162=head1 FORK 1236=head1 FORK
1163 1237
1164Most event libraries are not fork-safe. The ones who are usually are 1238Most event libraries are not fork-safe. The ones who are usually are
1165because they are so inefficient. Only L<EV> is fully fork-aware. 1239because they rely on inefficient but fork-safe C<select> or C<poll>
1240calls. Only L<EV> is fully fork-aware.
1166 1241
1167If you have to fork, you must either do so I<before> creating your first 1242If you have to fork, you must either do so I<before> creating your first
1168watcher OR you must not use AnyEvent at all in the child. 1243watcher OR you must not use AnyEvent at all in the child.
1169 1244
1170 1245

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines