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.55 by root, Fri Aug 14 23:17:17 2009 UTC vs.
Revision 1.68 by root, Fri Aug 28 23:06:33 2009 UTC

11 NODE $port # returns the noderef of the port 11 NODE $port # returns the noderef of the port
12 12
13 $SELF # receiving/own port id in rcv callbacks 13 $SELF # receiving/own port id in rcv callbacks
14 14
15 # initialise the node so it can send/receive messages 15 # initialise the node so it can send/receive messages
16 initialise_node; # -OR- 16 initialise_node;
17 initialise_node "localhost:4040"; # -OR-
18 initialise_node "slave/", "localhost:4040"
19 17
20 # ports are message endpoints 18 # ports are message endpoints
21 19
22 # sending messages 20 # sending messages
23 snd $port, type => data...; 21 snd $port, type => data...;
42 40
43=head1 CURRENT STATUS 41=head1 CURRENT STATUS
44 42
45 AnyEvent::MP - stable API, should work 43 AnyEvent::MP - stable API, should work
46 AnyEvent::MP::Intro - outdated 44 AnyEvent::MP::Intro - outdated
47 AnyEvent::MP::Kernel - WIP
48 AnyEvent::MP::Transport - mostly stable 45 AnyEvent::MP::Kernel - mostly stable
46 AnyEvent::MP::Global - mostly stable
47 AnyEvent::MP::Node - mostly stable, but internal anyways
48 AnyEvent::MP::Transport - mostly stable, but internal anyways
49 49
50 stay tuned. 50 stay tuned.
51 51
52=head1 DESCRIPTION 52=head1 DESCRIPTION
53 53
54This module (-family) implements a simple message passing framework. 54This module (-family) implements a simple message passing framework.
55 55
56Despite its simplicity, you can securely message other processes running 56Despite its simplicity, you can securely message other processes running
57on the same or other hosts. 57on the same or other hosts, and you can supervise entities remotely.
58 58
59For an introduction to this module family, see the L<AnyEvent::MP::Intro> 59For an introduction to this module family, see the L<AnyEvent::MP::Intro>
60manual page. 60manual page and the examples under F<eg/>.
61 61
62At the moment, this module family is severly broken and underdocumented, 62At the moment, this module family is a bit underdocumented.
63so do not use. This was uploaded mainly to reserve the CPAN namespace -
64stay tuned!
65 63
66=head1 CONCEPTS 64=head1 CONCEPTS
67 65
68=over 4 66=over 4
69 67
70=item port 68=item port
71 69
72A port is something you can send messages to (with the C<snd> function). 70A port is something you can send messages to (with the C<snd> function).
73 71
74Ports allow you to register C<rcv> handlers that can match all or just 72Ports allow you to register C<rcv> handlers that can match all or just
75some messages. Messages will not be queued. 73some messages. Messages send to ports will not be queued, regardless of
74anything was listening for them or not.
76 75
77=item port id - C<noderef#portname> 76=item port ID - C<nodeid#portname>
78 77
79A port ID is the concatenation of a noderef, a hash-mark (C<#>) as 78A port ID is the concatenation of a node ID, a hash-mark (C<#>) as
80separator, and a port name (a printable string of unspecified format). An 79separator, and a port name (a printable string of unspecified format).
81exception is the the node port, whose ID is identical to its node
82reference.
83 80
84=item node 81=item node
85 82
86A node is a single process containing at least one port - the node port, 83A node is a single process containing at least one port - the node port,
87which provides nodes to manage each other remotely, and to create new 84which enables nodes to manage each other remotely, and to create new
88ports. 85ports.
89 86
90Nodes are either private (single-process only), slaves (connected to a 87Nodes are either public (have one or more listening ports) or private
91master node only) or public nodes (connectable from unrelated nodes). 88(no listening ports). Private nodes cannot talk to other private nodes
89currently.
92 90
93=item noderef - C<host:port,host:port...>, C<id@noderef>, C<id> 91=item node ID - C<[a-za-Z0-9_\-.:]+>
94 92
95A node reference is a string that either simply identifies the node (for 93A node ID is a string that uniquely identifies the node within a
96private and slave nodes), or contains a recipe on how to reach a given 94network. Depending on the configuration used, node IDs can look like a
97node (for public nodes). 95hostname, a hostname and a port, or a random string. AnyEvent::MP itself
96doesn't interpret node IDs in any way.
98 97
99This recipe is simply a comma-separated list of C<address:port> pairs (for 98=item binds - C<ip:port>
100TCP/IP, other protocols might look different).
101 99
102Node references come in two flavours: resolved (containing only numerical 100Nodes can only talk to each other by creating some kind of connection to
103addresses) or unresolved (where hostnames are used instead of addresses). 101each other. To do this, nodes should listen on one or more local transport
102endpoints - binds. Currently, only standard C<ip:port> specifications can
103be used, which specify TCP ports to listen on.
104 104
105Before using an unresolved node reference in a message you first have to 105=item seeds - C<host:port>
106resolve it. 106
107When a node starts, it knows nothing about the network. To teach the node
108about the network it first has to contact some other node within the
109network. This node is called a seed.
110
111Seeds are transport endpoint(s) of as many nodes as one wants. Those nodes
112are expected to be long-running, and at least one of those should always
113be available. When nodes run out of connections (e.g. due to a network
114error), they try to re-establish connections to some seednodes again to
115join the network.
116
117Apart from being sued for seeding, seednodes are not special in any way -
118every public node can be a seednode.
107 119
108=back 120=back
109 121
110=head1 VARIABLES/FUNCTIONS 122=head1 VARIABLES/FUNCTIONS
111 123
126use base "Exporter"; 138use base "Exporter";
127 139
128our $VERSION = $AnyEvent::MP::Kernel::VERSION; 140our $VERSION = $AnyEvent::MP::Kernel::VERSION;
129 141
130our @EXPORT = qw( 142our @EXPORT = qw(
131 NODE $NODE *SELF node_of _any_ 143 NODE $NODE *SELF node_of after
132 resolve_node initialise_node 144 initialise_node
133 snd rcv mon kil reg psub spawn 145 snd rcv mon mon_guard kil reg psub spawn
134 port 146 port
135); 147);
136 148
137our $SELF; 149our $SELF;
138 150
142 kil $SELF, die => $msg; 154 kil $SELF, die => $msg;
143} 155}
144 156
145=item $thisnode = NODE / $NODE 157=item $thisnode = NODE / $NODE
146 158
147The C<NODE> function returns, and the C<$NODE> variable contains the 159The C<NODE> function returns, and the C<$NODE> variable contains, the node
148noderef of the local node. The value is initialised by a call to 160ID of the node running in the current process. This value is initialised by
149C<initialise_node>. 161a call to C<initialise_node>.
150 162
151=item $noderef = node_of $port 163=item $nodeid = node_of $port
152 164
153Extracts and returns the noderef from a port ID or a noderef. 165Extracts and returns the node ID from a port ID or a node ID.
154 166
155=item initialise_node $noderef, $seednode, $seednode... 167=item initialise_node $profile_name
156 168
157=item initialise_node "slave/", $master, $master...
158
159Before a node can talk to other nodes on the network it has to initialise 169Before a node can talk to other nodes on the network (i.e. enter
160itself - the minimum a node needs to know is it's own name, and optionally 170"distributed mode") it has to initialise itself - the minimum a node needs
161it should know the noderefs of some other nodes in the network. 171to know is its own name, and optionally it should know the addresses of
172some other nodes in the network to discover other nodes.
162 173
163This function initialises a node - it must be called exactly once (or 174This function initialises a node - it must be called exactly once (or
164never) before calling other AnyEvent::MP functions. 175never) before calling other AnyEvent::MP functions.
165 176
166All arguments (optionally except for the first) are noderefs, which can be 177The first argument is a profile name. If it is C<undef> or missing, then
167either resolved or unresolved. 178the current nodename will be used instead (i.e. F<uname -n>).
168 179
169The first argument will be looked up in the configuration database first 180The function then looks up the profile in the aemp configuration (see the
170(if it is C<undef> then the current nodename will be used instead) to find 181L<aemp> commandline utility).
171the relevant configuration profile (see L<aemp>). If none is found then
172the default configuration is used. The configuration supplies additional
173seed/master nodes and can override the actual noderef.
174 182
175There are two types of networked nodes, public nodes and slave nodes: 183If the profile specifies a node ID, then this will become the node ID of
184this process. If not, then the profile name will be used as node ID. The
185special node ID of C<anon/> will be replaced by a random node ID.
176 186
177=over 4 187The next step is to look up the binds in the profile, followed by binding
188aemp protocol listeners on all binds specified (it is possible and valid
189to have no binds, meaning that the node cannot be contacted form the
190outside. This means the node cannot talk to other nodes that also have no
191binds, but it can still talk to all "normal" nodes).
178 192
179=item public nodes 193If the profile does not specify a binds list, then the node ID will be
194treated as if it were of the form C<host:port>, which will be resolved and
195used as binds list.
180 196
181For public nodes, C<$noderef> (supplied either directly to 197Lastly, the seeds list from the profile is passed to the
182C<initialise_node> or indirectly via a profile or the nodename) must be a 198L<AnyEvent::MP::Global> module, which will then use it to keep
183noderef (possibly unresolved, in which case it will be resolved). 199connectivity with at least on of those seed nodes at any point in time.
184 200
185After resolving, the node will bind itself on all endpoints and try to
186connect to all additional C<$seednodes> that are specified. Seednodes are
187optional and can be used to quickly bootstrap the node into an existing
188network.
189
190=item slave nodes
191
192When the C<$noderef> (either as given or overriden by the config file)
193is the special string C<slave/>, then the node will become a slave
194node. Slave nodes cannot be contacted from outside and will route most of
195their traffic to the master node that they attach to.
196
197At least one additional noderef is required (either by specifying it
198directly or because it is part of the configuration profile): The node
199will try to connect to all of them and will become a slave attached to the
200first node it can successfully connect to.
201
202=back
203
204This function will block until all nodes have been resolved and, for slave
205nodes, until it has successfully established a connection to a master
206server.
207
208Example: become a public node listening on the guessed noderef, or the one 201Example: become a distributed node listening on the guessed noderef, or
209specified via C<aemp> for the current node. This should be the most common 202the one specified via C<aemp> for the current node. This should be the
210form of invocation for "daemon"-type nodes. 203most common form of invocation for "daemon"-type nodes.
211 204
212 initialise_node; 205 initialise_node;
213 206
214Example: become a slave node to any of the the seednodes specified via 207Example: become an anonymous node. This form is often used for commandline
215C<aemp>. This form is often used for commandline clients. 208clients.
216 209
217 initialise_node "slave/"; 210 initialise_node "anon/";
218 211
219Example: become a slave node to any of the specified master servers. This 212Example: become a distributed node. If there is no profile of the given
220form is also often used for commandline clients. 213name, or no binds list was specified, resolve C<localhost:4044> and bind
221 214on the resulting addresses.
222 initialise_node "slave/", "master1", "192.168.13.17", "mp.example.net";
223
224Example: become a public node, and try to contact some well-known master
225servers to become part of the network.
226
227 initialise_node undef, "master1", "master2";
228
229Example: become a public node listening on port C<4041>.
230
231 initialise_node 4041;
232
233Example: become a public node, only visible on localhost port 4044.
234 215
235 initialise_node "localhost:4044"; 216 initialise_node "localhost:4044";
236
237=item $cv = resolve_node $noderef
238
239Takes an unresolved node reference that may contain hostnames and
240abbreviated IDs, resolves all of them and returns a resolved node
241reference.
242
243In addition to C<address:port> pairs allowed in resolved noderefs, the
244following forms are supported:
245
246=over 4
247
248=item the empty string
249
250An empty-string component gets resolved as if the default port (4040) was
251specified.
252
253=item naked port numbers (e.g. C<1234>)
254
255These are resolved by prepending the local nodename and a colon, to be
256further resolved.
257
258=item hostnames (e.g. C<localhost:1234>, C<localhost>)
259
260These are resolved by using AnyEvent::DNS to resolve them, optionally
261looking up SRV records for the C<aemp=4040> port, if no port was
262specified.
263
264=back
265 217
266=item $SELF 218=item $SELF
267 219
268Contains the current port id while executing C<rcv> callbacks or C<psub> 220Contains the current port id while executing C<rcv> callbacks or C<psub>
269blocks. 221blocks.
270 222
271=item SELF, %SELF, @SELF... 223=item *SELF, SELF, %SELF, @SELF...
272 224
273Due to some quirks in how perl exports variables, it is impossible to 225Due to some quirks in how perl exports variables, it is impossible to
274just export C<$SELF>, all the symbols called C<SELF> are exported by this 226just export C<$SELF>, all the symbols named C<SELF> are exported by this
275module, but only C<$SELF> is currently used. 227module, but only C<$SELF> is currently used.
276 228
277=item snd $port, type => @data 229=item snd $port, type => @data
278 230
279=item snd $port, @msg 231=item snd $port, @msg
280 232
281Send the given message to the given port ID, which can identify either 233Send the given message to the given port, which can identify either a
282a local or a remote port, and must be a port ID. 234local or a remote port, and must be a port ID.
283 235
284While the message can be about anything, it is highly recommended to use a 236While the message can be almost anything, it is highly recommended to
285string as first element (a port ID, or some word that indicates a request 237use a string as first element (a port ID, or some word that indicates a
286type etc.). 238request type etc.) and to consist if only simple perl values (scalars,
239arrays, hashes) - if you think you need to pass an object, think again.
287 240
288The message data effectively becomes read-only after a call to this 241The message data logically becomes read-only after a call to this
289function: modifying any argument is not allowed and can cause many 242function: modifying any argument (or values referenced by them) is
290problems. 243forbidden, as there can be considerable time between the call to C<snd>
244and the time the message is actually being serialised - in fact, it might
245never be copied as within the same process it is simply handed to the
246receiving port.
291 247
292The type of data you can transfer depends on the transport protocol: when 248The type of data you can transfer depends on the transport protocol: when
293JSON is used, then only strings, numbers and arrays and hashes consisting 249JSON is used, then only strings, numbers and arrays and hashes consisting
294of those are allowed (no objects). When Storable is used, then anything 250of those are allowed (no objects). When Storable is used, then anything
295that Storable can serialise and deserialise is allowed, and for the local 251that Storable can serialise and deserialise is allowed, and for the local
296node, anything can be passed. 252node, anything can be passed. Best rely only on the common denominator of
253these.
297 254
298=item $local_port = port 255=item $local_port = port
299 256
300Create a new local port object and returns its port ID. Initially it has 257Create a new local port object and returns its port ID. Initially it has
301no callbacks set and will throw an error when it receives messages. 258no callbacks set and will throw an error when it receives messages.
388 345
389sub rcv($@) { 346sub rcv($@) {
390 my $port = shift; 347 my $port = shift;
391 my ($noderef, $portid) = split /#/, $port, 2; 348 my ($noderef, $portid) = split /#/, $port, 2;
392 349
393 ($NODE{$noderef} || add_node $noderef) == $NODE{""} 350 $NODE{$noderef} == $NODE{""}
394 or Carp::croak "$port: rcv can only be called on local ports, caught"; 351 or Carp::croak "$port: rcv can only be called on local ports, caught";
395 352
396 while (@_) { 353 while (@_) {
397 if (ref $_[0]) { 354 if (ref $_[0]) {
398 if (my $self = $PORT_DATA{$portid}) { 355 if (my $self = $PORT_DATA{$portid}) {
477 $res 434 $res
478 } 435 }
479 } 436 }
480} 437}
481 438
482=item $guard = mon $port, $cb->(@reason) 439=item $guard = mon $port, $cb->(@reason) # call $cb when $port dies
483 440
484=item $guard = mon $port, $rcvport 441=item $guard = mon $port, $rcvport # kill $rcvport when $port dies
485 442
486=item $guard = mon $port 443=item $guard = mon $port # kill $SELF when $port dies
487 444
488=item $guard = mon $port, $rcvport, @msg 445=item $guard = mon $port, $rcvport, @msg # send a message when $port dies
489 446
490Monitor the given port and do something when the port is killed or 447Monitor the given port and do something when the port is killed or
491messages to it were lost, and optionally return a guard that can be used 448messages to it were lost, and optionally return a guard that can be used
492to stop monitoring again. 449to stop monitoring again.
493 450
494C<mon> effectively guarantees that, in the absence of hardware failures, 451C<mon> effectively guarantees that, in the absence of hardware failures,
495that after starting the monitor, either all messages sent to the port 452after starting the monitor, either all messages sent to the port will
496will arrive, or the monitoring action will be invoked after possible 453arrive, or the monitoring action will be invoked after possible message
497message loss has been detected. No messages will be lost "in between" 454loss has been detected. No messages will be lost "in between" (after
498(after the first lost message no further messages will be received by the 455the first lost message no further messages will be received by the
499port). After the monitoring action was invoked, further messages might get 456port). After the monitoring action was invoked, further messages might get
500delivered again. 457delivered again.
458
459Note that monitoring-actions are one-shot: once messages are lost (and a
460monitoring alert was raised), they are removed and will not trigger again.
501 461
502In the first form (callback), the callback is simply called with any 462In the first form (callback), the callback is simply called with any
503number of C<@reason> elements (no @reason means that the port was deleted 463number of C<@reason> elements (no @reason means that the port was deleted
504"normally"). Note also that I<< the callback B<must> never die >>, so use 464"normally"). Note also that I<< the callback B<must> never die >>, so use
505C<eval> if unsure. 465C<eval> if unsure.
567is killed, the references will be freed. 527is killed, the references will be freed.
568 528
569Optionally returns a guard that will stop the monitoring. 529Optionally returns a guard that will stop the monitoring.
570 530
571This function is useful when you create e.g. timers or other watchers and 531This function is useful when you create e.g. timers or other watchers and
572want to free them when the port gets killed: 532want to free them when the port gets killed (note the use of C<psub>):
573 533
574 $port->rcv (start => sub { 534 $port->rcv (start => sub {
575 my $timer; $timer = mon_guard $port, AE::timer 1, 1, sub { 535 my $timer; $timer = mon_guard $port, AE::timer 1, 1, psub {
576 undef $timer if 0.9 < rand; 536 undef $timer if 0.9 < rand;
577 }); 537 });
578 }); 538 });
579 539
580=cut 540=cut
589 549
590=item kil $port[, @reason] 550=item kil $port[, @reason]
591 551
592Kill the specified port with the given C<@reason>. 552Kill the specified port with the given C<@reason>.
593 553
594If no C<@reason> is specified, then the port is killed "normally" (linked 554If no C<@reason> is specified, then the port is killed "normally" (ports
595ports will not be kileld, or even notified). 555monitoring other ports will not necessarily die because a port dies
556"normally").
596 557
597Otherwise, linked ports get killed with the same reason (second form of 558Otherwise, linked ports get killed with the same reason (second form of
598C<mon>, see below). 559C<mon>, see above).
599 560
600Runtime errors while evaluating C<rcv> callbacks or inside C<psub> blocks 561Runtime errors while evaluating C<rcv> callbacks or inside C<psub> blocks
601will be reported as reason C<< die => $@ >>. 562will be reported as reason C<< die => $@ >>.
602 563
603Transport/communication errors are reported as C<< transport_error => 564Transport/communication errors are reported as C<< transport_error =>
608=item $port = spawn $node, $initfunc[, @initdata] 569=item $port = spawn $node, $initfunc[, @initdata]
609 570
610Creates a port on the node C<$node> (which can also be a port ID, in which 571Creates a port on the node C<$node> (which can also be a port ID, in which
611case it's the node where that port resides). 572case it's the node where that port resides).
612 573
613The port ID of the newly created port is return immediately, and it is 574The port ID of the newly created port is returned immediately, and it is
614permissible to immediately start sending messages or monitor the port. 575possible to immediately start sending messages or to monitor the port.
615 576
616After the port has been created, the init function is 577After the port has been created, the init function is called on the remote
617called. This function must be a fully-qualified function name 578node, in the same context as a C<rcv> callback. This function must be a
618(e.g. C<MyApp::Chat::Server::init>). To specify a function in the main 579fully-qualified function name (e.g. C<MyApp::Chat::Server::init>). To
619program, use C<::name>. 580specify a function in the main program, use C<::name>.
620 581
621If the function doesn't exist, then the node tries to C<require> 582If the function doesn't exist, then the node tries to C<require>
622the package, then the package above the package and so on (e.g. 583the package, then the package above the package and so on (e.g.
623C<MyApp::Chat::Server>, C<MyApp::Chat>, C<MyApp>) until the function 584C<MyApp::Chat::Server>, C<MyApp::Chat>, C<MyApp>) until the function
624exists or it runs out of package names. 585exists or it runs out of package names.
625 586
626The init function is then called with the newly-created port as context 587The init function is then called with the newly-created port as context
627object (C<$SELF>) and the C<@initdata> values as arguments. 588object (C<$SELF>) and the C<@initdata> values as arguments.
628 589
629A common idiom is to pass your own port, monitor the spawned port, and 590A common idiom is to pass a local port, immediately monitor the spawned
630in the init function, monitor the original port. This two-way monitoring 591port, and in the remote init function, immediately monitor the passed
631ensures that both ports get cleaned up when there is a problem. 592local port. This two-way monitoring ensures that both ports get cleaned up
593when there is a problem.
632 594
633Example: spawn a chat server port on C<$othernode>. 595Example: spawn a chat server port on C<$othernode>.
634 596
635 # this node, executed from within a port context: 597 # this node, executed from within a port context:
636 my $server = spawn $othernode, "MyApp::Chat::Server::connect", $SELF; 598 my $server = spawn $othernode, "MyApp::Chat::Server::connect", $SELF;
671 snd_to_func $noderef, "AnyEvent::MP::_spawn" => $id, @_; 633 snd_to_func $noderef, "AnyEvent::MP::_spawn" => $id, @_;
672 634
673 "$noderef#$id" 635 "$noderef#$id"
674} 636}
675 637
676=back 638=item after $timeout, @msg
677 639
678=head1 NODE MESSAGES 640=item after $timeout, $callback
679 641
680Nodes understand the following messages sent to them. Many of them take 642Either sends the given message, or call the given callback, after the
681arguments called C<@reply>, which will simply be used to compose a reply 643specified number of seconds.
682message - C<$reply[0]> is the port to reply to, C<$reply[1]> the type and
683the remaining arguments are simply the message data.
684 644
685While other messages exist, they are not public and subject to change. 645This is simply a utility function that comes in handy at times - the
646AnyEvent::MP author is not convinced of the wisdom of having it, though,
647so it may go away in the future.
686 648
687=over 4
688
689=cut 649=cut
690 650
691=item lookup => $name, @reply 651sub after($@) {
652 my ($timeout, @action) = @_;
692 653
693Replies with the port ID of the specified well-known port, or C<undef>. 654 my $t; $t = AE::timer $timeout, 0, sub {
694 655 undef $t;
695=item devnull => ... 656 ref $action[0]
696 657 ? $action[0]()
697Generic data sink/CPU heat conversion. 658 : snd @action;
698 659 };
699=item relay => $port, @msg 660}
700
701Simply forwards the message to the given port.
702
703=item eval => $string[ @reply]
704
705Evaluates the given string. If C<@reply> is given, then a message of the
706form C<@reply, $@, @evalres> is sent.
707
708Example: crash another node.
709
710 snd $othernode, eval => "exit";
711
712=item time => @reply
713
714Replies the the current node time to C<@reply>.
715
716Example: tell the current node to send the current time to C<$myport> in a
717C<timereply> message.
718
719 snd $NODE, time => $myport, timereply => 1, 2;
720 # => snd $myport, timereply => 1, 2, <time>
721 661
722=back 662=back
723 663
724=head1 AnyEvent::MP vs. Distributed Erlang 664=head1 AnyEvent::MP vs. Distributed Erlang
725 665
735 675
736Despite the similarities, there are also some important differences: 676Despite the similarities, there are also some important differences:
737 677
738=over 4 678=over 4
739 679
740=item * Node references contain the recipe on how to contact them. 680=item * Node IDs are arbitrary strings in AEMP.
741 681
742Erlang relies on special naming and DNS to work everywhere in the 682Erlang relies on special naming and DNS to work everywhere in the same
743same way. AEMP relies on each node knowing it's own address(es), with 683way. AEMP relies on each node somehow knowing its own address(es) (e.g. by
744convenience functionality. 684configuraiton or DNS), but will otherwise discover other odes itself.
745
746This means that AEMP requires a less tightly controlled environment at the
747cost of longer node references and a slightly higher management overhead.
748 685
749=item * Erlang has a "remote ports are like local ports" philosophy, AEMP 686=item * Erlang has a "remote ports are like local ports" philosophy, AEMP
750uses "local ports are like remote ports". 687uses "local ports are like remote ports".
751 688
752The failure modes for local ports are quite different (runtime errors 689The failure modes for local ports are quite different (runtime errors
781 718
782Erlang makes few guarantees on messages delivery - messages can get lost 719Erlang makes few guarantees on messages delivery - messages can get lost
783without any of the processes realising it (i.e. you send messages a, b, 720without any of the processes realising it (i.e. you send messages a, b,
784and c, and the other side only receives messages a and c). 721and c, and the other side only receives messages a and c).
785 722
786AEMP guarantees correct ordering, and the guarantee that there are no 723AEMP guarantees correct ordering, and the guarantee that after one message
787holes in the message sequence. 724is lost, all following ones sent to the same port are lost as well, until
788 725monitoring raises an error, so there are no silent "holes" in the message
789=item * In Erlang, processes can be declared dead and later be found to be 726sequence.
790alive.
791
792In Erlang it can happen that a monitored process is declared dead and
793linked processes get killed, but later it turns out that the process is
794still alive - and can receive messages.
795
796In AEMP, when port monitoring detects a port as dead, then that port will
797eventually be killed - it cannot happen that a node detects a port as dead
798and then later sends messages to it, finding it is still alive.
799 727
800=item * Erlang can send messages to the wrong port, AEMP does not. 728=item * Erlang can send messages to the wrong port, AEMP does not.
801 729
802In Erlang it is quite likely that a node that restarts reuses a process ID 730In Erlang it is quite likely that a node that restarts reuses a process ID
803known to other nodes for a completely different process, causing messages 731known to other nodes for a completely different process, causing messages
807around in the network will not be sent to an unrelated port. 735around in the network will not be sent to an unrelated port.
808 736
809=item * Erlang uses unprotected connections, AEMP uses secure 737=item * Erlang uses unprotected connections, AEMP uses secure
810authentication and can use TLS. 738authentication and can use TLS.
811 739
812AEMP can use a proven protocol - SSL/TLS - to protect connections and 740AEMP can use a proven protocol - TLS - to protect connections and
813securely authenticate nodes. 741securely authenticate nodes.
814 742
815=item * The AEMP protocol is optimised for both text-based and binary 743=item * The AEMP protocol is optimised for both text-based and binary
816communications. 744communications.
817 745
818The AEMP protocol, unlike the Erlang protocol, supports both 746The AEMP protocol, unlike the Erlang protocol, supports both programming
819language-independent text-only protocols (good for debugging) and binary, 747language independent text-only protocols (good for debugging) and binary,
820language-specific serialisers (e.g. Storable). 748language-specific serialisers (e.g. Storable). By default, unless TLS is
749used, the protocol is actually completely text-based.
821 750
822It has also been carefully designed to be implementable in other languages 751It has also been carefully designed to be implementable in other languages
823with a minimum of work while gracefully degrading fucntionality to make the 752with a minimum of work while gracefully degrading functionality to make the
824protocol simple. 753protocol simple.
825 754
826=item * AEMP has more flexible monitoring options than Erlang. 755=item * AEMP has more flexible monitoring options than Erlang.
827 756
828In Erlang, you can chose to receive I<all> exit signals as messages 757In Erlang, you can chose to receive I<all> exit signals as messages
831Erlang, as one can choose between automatic kill, exit message or callback 760Erlang, as one can choose between automatic kill, exit message or callback
832on a per-process basis. 761on a per-process basis.
833 762
834=item * Erlang tries to hide remote/local connections, AEMP does not. 763=item * Erlang tries to hide remote/local connections, AEMP does not.
835 764
836Monitoring in Erlang is not an indicator of process death/crashes, 765Monitoring in Erlang is not an indicator of process death/crashes, in the
837as linking is (except linking is unreliable in Erlang). 766same way as linking is (except linking is unreliable in Erlang).
838 767
839In AEMP, you don't "look up" registered port names or send to named ports 768In AEMP, you don't "look up" registered port names or send to named ports
840that might or might not be persistent. Instead, you normally spawn a port 769that might or might not be persistent. Instead, you normally spawn a port
841on the remote node. The init function monitors the you, and you monitor 770on the remote node. The init function monitors you, and you monitor the
842the remote port. Since both monitors are local to the node, they are much 771remote port. Since both monitors are local to the node, they are much more
843more reliable. 772reliable (no need for C<spawn_link>).
844 773
845This also saves round-trips and avoids sending messages to the wrong port 774This also saves round-trips and avoids sending messages to the wrong port
846(hard to do in Erlang). 775(hard to do in Erlang).
847 776
848=back 777=back
849 778
850=head1 RATIONALE 779=head1 RATIONALE
851 780
852=over 4 781=over 4
853 782
854=item Why strings for ports and noderefs, why not objects? 783=item Why strings for port and node IDs, why not objects?
855 784
856We considered "objects", but found that the actual number of methods 785We considered "objects", but found that the actual number of methods
857thatc an be called are very low. Since port IDs and noderefs travel over 786that can be called are quite low. Since port and node IDs travel over
858the network frequently, the serialising/deserialising would add lots of 787the network frequently, the serialising/deserialising would add lots of
859overhead, as well as having to keep a proxy object. 788overhead, as well as having to keep a proxy object everywhere.
860 789
861Strings can easily be printed, easily serialised etc. and need no special 790Strings can easily be printed, easily serialised etc. and need no special
862procedures to be "valid". 791procedures to be "valid".
863 792
864And a a miniport consists of a single closure stored in a global hash - it 793And as a result, a miniport consists of a single closure stored in a
865can't become much cheaper. 794global hash - it can't become much cheaper.
866 795
867=item Why favour JSON, why not real serialising format such as Storable? 796=item Why favour JSON, why not a real serialising format such as Storable?
868 797
869In fact, any AnyEvent::MP node will happily accept Storable as framing 798In fact, any AnyEvent::MP node will happily accept Storable as framing
870format, but currently there is no way to make a node use Storable by 799format, but currently there is no way to make a node use Storable by
871default. 800default (although all nodes will accept it).
872 801
873The default framing protocol is JSON because a) JSON::XS is many times 802The default framing protocol is JSON because a) JSON::XS is many times
874faster for small messages and b) most importantly, after years of 803faster for small messages and b) most importantly, after years of
875experience we found that object serialisation is causing more problems 804experience we found that object serialisation is causing more problems
876than it gains: Just like function calls, objects simply do not travel 805than it solves: Just like function calls, objects simply do not travel
877easily over the network, mostly because they will always be a copy, so you 806easily over the network, mostly because they will always be a copy, so you
878always have to re-think your design. 807always have to re-think your design.
879 808
880Keeping your messages simple, concentrating on data structures rather than 809Keeping your messages simple, concentrating on data structures rather than
881objects, will keep your messages clean, tidy and efficient. 810objects, will keep your messages clean, tidy and efficient.
882 811
883=back 812=back
884 813
885=head1 SEE ALSO 814=head1 SEE ALSO
886 815
816L<AnyEvent::MP::Intro> - a gentle introduction.
817
818L<AnyEvent::MP::Kernel> - more, lower-level, stuff.
819
820L<AnyEvent::MP::Global> - network maintainance and port groups, to find
821your applications.
822
887L<AnyEvent>. 823L<AnyEvent>.
888 824
889=head1 AUTHOR 825=head1 AUTHOR
890 826
891 Marc Lehmann <schmorp@schmorp.de> 827 Marc Lehmann <schmorp@schmorp.de>

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines