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

Comparing AnyEvent-MP/MP.pm (file contents):
Revision 1.138 by root, Thu Mar 22 00:48:29 2012 UTC vs.
Revision 1.140 by root, Thu Mar 22 23:47:01 2012 UTC

46 46
47 # execute callbacks in $SELF port context 47 # execute callbacks in $SELF port context
48 my $timer = AE::timer 1, 0, psub { 48 my $timer = AE::timer 1, 0, psub {
49 die "kill the port, delayed"; 49 die "kill the port, delayed";
50 }; 50 };
51
52=head1 CURRENT STATUS
53
54 bin/aemp - stable.
55 AnyEvent::MP - stable API, should work.
56 AnyEvent::MP::Intro - explains most concepts.
57 AnyEvent::MP::Kernel - mostly stable API.
58 AnyEvent::MP::Global - stable API.
59 51
60=head1 DESCRIPTION 52=head1 DESCRIPTION
61 53
62This module (-family) implements a simple message passing framework. 54This module (-family) implements a simple message passing framework.
63 55
601 $res 593 $res
602 } 594 }
603 } 595 }
604} 596}
605 597
598=item $guard = mon $port, $rcvport # kill $rcvport when $port dies
599
600=item $guard = mon $port # kill $SELF when $port dies
601
606=item $guard = mon $port, $cb->(@reason) # call $cb when $port dies 602=item $guard = mon $port, $cb->(@reason) # call $cb when $port dies
607
608=item $guard = mon $port, $rcvport # kill $rcvport when $port dies
609
610=item $guard = mon $port # kill $SELF when $port dies
611 603
612=item $guard = mon $port, $rcvport, @msg # send a message when $port dies 604=item $guard = mon $port, $rcvport, @msg # send a message when $port dies
613 605
614Monitor the given port and do something when the port is killed or 606Monitor the given port and do something when the port is killed or
615messages to it were lost, and optionally return a guard that can be used 607messages to it were lost, and optionally return a guard that can be used
616to stop monitoring again. 608to stop monitoring again.
617 609
610The first two forms distinguish between "normal" and "abnormal" kil's:
611
612In the first form (another port given), if the C<$port> is C<kil>'ed with
613a non-empty reason, the other port (C<$rcvport>) will be kil'ed with the
614same reason. That is, on "normal" kil's nothing happens, while under all
615other conditions, the other port is killed with the same reason.
616
617The second form (kill self) is the same as the first form, except that
618C<$rvport> defaults to C<$SELF>.
619
620The remaining forms don't distinguish between "normal" and "abnormal" kil's
621- it's up to the callback or receiver to check whether the C<@reason> is
622empty and act accordingly.
623
618In the first form (callback), the callback is simply called with any 624In the third form (callback), the callback is simply called with any
619number of C<@reason> elements (no @reason means that the port was deleted 625number of C<@reason> elements (empty @reason means that the port was deleted
620"normally"). Note also that I<< the callback B<must> never die >>, so use 626"normally"). Note also that I<< the callback B<must> never die >>, so use
621C<eval> if unsure. 627C<eval> if unsure.
622 628
623In the second form (another port given), the other port (C<$rcvport>)
624will be C<kil>'ed with C<@reason>, if a @reason was specified, i.e. on
625"normal" kils nothing happens, while under all other conditions, the other
626port is killed with the same reason.
627
628The third form (kill self) is the same as the second form, except that
629C<$rvport> defaults to C<$SELF>.
630
631In the last form (message), a message of the form C<@msg, @reason> will be 629In the last form (message), a message of the form C<$rcvport, @msg,
632C<snd>. 630@reason> will be C<snd>.
633 631
634Monitoring-actions are one-shot: once messages are lost (and a monitoring 632Monitoring-actions are one-shot: once messages are lost (and a monitoring
635alert was raised), they are removed and will not trigger again. 633alert was raised), they are removed and will not trigger again, even if it
634turns out that the port is still alive.
636 635
637As a rule of thumb, monitoring requests should always monitor a port from 636As a rule of thumb, monitoring requests should always monitor a remote
638a local port (or callback). The reason is that kill messages might get 637port locally (using a local C<$rcvport> or a callback). The reason is that
639lost, just like any other message. Another less obvious reason is that 638kill messages might get lost, just like any other message. Another less
640even monitoring requests can get lost (for example, when the connection 639obvious reason is that even monitoring requests can get lost (for example,
641to the other node goes down permanently). When monitoring a port locally 640when the connection to the other node goes down permanently). When
642these problems do not exist. 641monitoring a port locally these problems do not exist.
643 642
644C<mon> effectively guarantees that, in the absence of hardware failures, 643C<mon> effectively guarantees that, in the absence of hardware failures,
645after starting the monitor, either all messages sent to the port will 644after starting the monitor, either all messages sent to the port will
646arrive, or the monitoring action will be invoked after possible message 645arrive, or the monitoring action will be invoked after possible message
647loss has been detected. No messages will be lost "in between" (after 646loss has been detected. No messages will be lost "in between" (after
1254 1253
1255=back 1254=back
1256 1255
1257=head1 PORTING FROM AnyEvent::MP VERSION 1.X 1256=head1 PORTING FROM AnyEvent::MP VERSION 1.X
1258 1257
1259AEMP version 2 has three major incompatible changes compared to version 1: 1258AEMP version 2 has a few major incompatible changes compared to version 1:
1260 1259
1261=over 4 1260=over 4
1262 1261
1263=item AnyEvent::MP::Global no longer has group management functions. 1262=item AnyEvent::MP::Global no longer has group management functions.
1264 1263
1264At least not officially - the grp_* functions are still exported and might
1265work, but they will be removed in some later release.
1266
1265AnyEvent::MP now comes with a distributed database that is more 1267AnyEvent::MP now comes with a distributed database that is more
1266powerful. It's database families map closely to ports, but the API has 1268powerful. Its database families map closely to port groups, but the API
1267minor differences: 1269has changed (the functions are also now exported by AnyEvent::MP). Here is
1270a rough porting guide:
1268 1271
1269 grp_reg $group, $port # old 1272 grp_reg $group, $port # old
1270 db_reg $group, $port # new 1273 db_reg $group, $port # new
1271 1274
1272 $list = grp_get $group # old 1275 $list = grp_get $group # old
1273 db_keys $group, sub { my $list = shift } # new 1276 db_keys $group, sub { my $list = shift } # new
1274 1277
1275 grp_mon $group, $cb->(\@ports, $add, $del) # old 1278 grp_mon $group, $cb->(\@ports, $add, $del) # old
1276 db_mon $group, $cb->(\%ports, $add, $change, $del) # new 1279 db_mon $group, $cb->(\%ports, $add, $change, $del) # new
1277 1280
1278C<grp_reg> is a no-brainer (just replace by C<db_reg>), but C<grp_get> 1281C<grp_reg> is a no-brainer (just replace by C<db_reg>), but C<grp_get> is
1279is no longer instant, because the local node might not have a copy of 1282no longer instant, because the local node might not have a copy of the
1280the group. This can be partially remedied by using C<db_mon> to keep an 1283group. You can either modify your code to allow for a callback, or use
1281updated copy of the group: 1284C<db_mon> to keep an updated copy of the group:
1282 1285
1283 my $local_group_copy; 1286 my $local_group_copy;
1284 db_mon $group => sub { $local_group_copy = shift }; 1287 db_mon $group => sub { $local_group_copy = $_[0] };
1285 1288
1286 # no keys %$local_group_copy always returns the most up-to-date 1289 # now "keys %$local_group_copy" always returns the most up-to-date
1287 # list of ports in the group. 1290 # list of ports in the group.
1288 1291
1289C<grp_mon> can almost be replaced by C<db_mon>: 1292C<grp_mon> can be replaced by C<db_mon> with minor changes - C<db_mon>
1293passes a hash as first argument, and an extra C<$chg> argument that can be
1294ignored:
1290 1295
1291 db_mon $group => sub { 1296 db_mon $group => sub {
1292 my ($ports, $add, $chg, $lde) = @_; 1297 my ($ports, $add, $chg, $lde) = @_;
1293 $ports = [keys %$ports]; 1298 $ports = [keys %$ports];
1294 1299
1311of its seed nodes. If that seed node isn't a global node yet, it will 1316of its seed nodes. If that seed node isn't a global node yet, it will
1312automatically be upgraded to a global node. 1317automatically be upgraded to a global node.
1313 1318
1314So in many cases, nothing needs to be changed - one just has to make sure 1319So in many cases, nothing needs to be changed - one just has to make sure
1315that all seed nodes are meshed together with the other seed nodes (as with 1320that all seed nodes are meshed together with the other seed nodes (as with
1316AEMP 1.x), and other nodes specify them as seed nodes. 1321AEMP 1.x), and other nodes specify them as seed nodes. This is most easily
1322achieved by specifying the same set of seed nodes for all nodes in the
1323network.
1317 1324
1318Not opening a connection to every other node is usually an advantage, 1325Not opening a connection to every other node is usually an advantage,
1319except when you need the lower latency of an already established 1326except when you need the lower latency of an already established
1320connection. To ensure a node establishes a connection to another node, 1327connection. To ensure a node establishes a connection to another node,
1321you can monitor the node port (C<mon $node, ...>), which will attempt to 1328you can monitor the node port (C<mon $node, ...>), which will attempt to
1322create the connection (and notify you when the connection fails). 1329create the connection (and notify you when the connection fails).
1323 1330
1324=item Listener-less nodes (nodes without binds) are gone. 1331=item Listener-less nodes (nodes without binds) are gone.
1325 1332
1326And are not coming back, at least not in their old form. If no C<binds> 1333And are not coming back, at least not in their old form. If no C<binds>
1327are specified for a node, AnyEvent::MP now assumes a default of C<*:*>. 1334are specified for a node, AnyEvent::MP assumes a default of C<*:*>.
1328 1335
1329There are vague plans to implement some form of routing domains, which 1336There are vague plans to implement some form of routing domains, which
1330might or might not bring back listener-less nodes, but don't count on it. 1337might or might not bring back listener-less nodes, but don't count on it.
1331 1338
1332The fact that most connections are now optional somewhat mitigates this, 1339The fact that most connections are now optional somewhat mitigates this,
1341 1348
1342Every module now documents what kinds of messages it generates, with 1349Every module now documents what kinds of messages it generates, with
1343AnyEvent::MP acting as a catch all. 1350AnyEvent::MP acting as a catch all.
1344 1351
1345On the positive side, this means that instead of setting 1352On the positive side, this means that instead of setting
1346C<PERL_ANYEVENT_MP_WARNLEVEL>, you can get away by setting C<AE_VERBOSE>, 1353C<PERL_ANYEVENT_MP_WARNLEVEL>, you can get away by setting C<AE_VERBOSE> -
1347much less to type. 1354much less to type.
1348 1355
1349=back 1356=back
1357
1358=head1 LOGGING
1359
1360AnyEvent::MP does not normally log anything by itself, but sinc eit is the
1361root of the contetx hierarchy for AnyEvent::MP modules, it will receive
1362all log messages by submodules.
1350 1363
1351=head1 SEE ALSO 1364=head1 SEE ALSO
1352 1365
1353L<AnyEvent::MP::Intro> - a gentle introduction. 1366L<AnyEvent::MP::Intro> - a gentle introduction.
1354 1367

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines