module Netcamlbox:Camlboxes are a fast IPC mechanism to send Ocaml values from one process to another. Source and destination processes must run on the same machine (no network). The Ocaml value is copied to a shared memory object where it can be directly accessed by the receiver without unmarshalling step. This means the sender writes the value into the shared memory in a format that can immediately interpreted by the receiver.sig
..end
A camlbox is owned by the single receiving process. Only this process (or a fork) can look for new messages and can read them. There can be any number of sending processes, i.e. we have a n:1 message passing scenario.
The receiver process creates the camlbox, and is seen as the owner. The receiver is accountible for deleting the camlbox when it is no longer needed.
The sender(s) can send messages to any existing camlbox. There is no notification whether the messages are actually read. The sender, however, blocks when the destination camlbox is full, and will only proceed when the receiver makes room for new messages. If there is space in the camlbox the sender does not need to synchronize with the receiver, i.e. it is possible to put a message into the box when the receiver is busy with something else (asynchronous send operation).
Camlboxes have a fixed capacity of messages, and the message slots have a fixed maximum length. The messages can have any type with only a few restrictions (e.g. no functions and no custom blocks). There is no check whether the sender and the receiver assume the same type of the messages. This is left to the user. Breaking this assumption will lead to unpredictable effects, including program crashes. It is strongly advised to only communicate between processes that run the same executable.
The user is also responsible for keeping only references to existing messages. It is possible to get a value pointer for a certain message and then to delete the message. The user must no longer access the value - once the value is deleted it may be overwritten, and the program may crash. Another danger is that message values are modified so that pointers to heap values are put into the message. This may lead to delayed crashes when the heap value is moved to a different location or is even deleted by the garbage collector. There is nothing the camlbox implementation can do about that.
On the system level, camlboxes are stored in POSIX shared memory objects. These objects have kernel persistence and continue to live after the process creating the camlbox has terminated without unlinking the box.
This module requires Ocaml 3.11 or newer. The system must support
POSIX shared memory and POSIX semaphores. Camlboxes may be used
in multi-threaded programs as long as the values camlbox
and
camlbox_sender
are not used by several threads at the same time.
Camlboxes can be used to gain speed-ups on multi-cores. See
examples/camlbox/README in the distribution tarball for an example
how to accomplish this.
typecamlbox_address =
string
type
camlbox
camlbox
may receive messagestype
camlbox_sender
exception Empty
exception Message_too_big
val create_camlbox : camlbox_address -> int -> int -> camlbox
create_camlbox addr n size
: Creates a new camlbox for up to
n
messages of size
bytes. The messages are numbered from
0 to n-1
. The camlbox is only meaningful for the creating
process, and must not be directly accessed by other processes.
Other processes can only send using a camlbox_sender
.
It is an error if the camlbox already exists.
val unlink_camlbox : camlbox_address -> unit
camlbox_address
as input will not find the box anymore. The
box, however, continues to exist until the receiver and the senders
are done with it.val camlbox_fd : camlbox_address -> Unix.file_descr
val camlbox_capacity : camlbox_address -> int
n
val camlbox_bcapacity : camlbox -> int
val camlbox_scapacity : camlbox_sender -> int
val camlbox_msg_size : camlbox_address -> int
val camlbox_bmsg_size : camlbox -> int
val camlbox_smsg_size : camlbox_sender -> int
val camlbox_messages : camlbox_address -> int
val camlbox_bmessages : camlbox -> int
val camlbox_smessages : camlbox_sender -> int
val camlbox_get : camlbox -> int -> 'a
camlbox_get box k
: Returns message number k
from box
.
The returned value lives in the camlbox, and using it is only
safe as long as the camlbox exists and the message is not
deleted.
If there is no message at k
the exception Empty
will be
raised.
The result value must have the same type as the sent value.
This is not checked, however. Violating this rule is likely
to crash the program.
val camlbox_delete : camlbox -> int -> unit
camlbox_delete box k
: Deletes the message number k
from box
.
Any value obtained via camlbox_get
for a message or a part
of a message becomes invalid and must not be used anymore.
There is no way to check this - violating this rule is likely
to crash the program.
If there is no message at k
the exception Empty
will be
raised.
val camlbox_wait : camlbox -> int list
camlbox_wait
. The
order of the messages is not specified.
Only one thread at a time must wait for new messages.
It is allowed that this function returns the empty list.
val camlbox_cancel_wait : camlbox -> unit
camlbox_wait
operation called by a different threadval camlbox_sender : camlbox_address -> camlbox_sender
val camlbox_sender_of_fd : Unix.file_descr -> camlbox_sender
camlbox_fd
.val camlbox_send : camlbox_sender -> 'a -> unit
char
,
bool
, int
, nor a variant type), and a number of restrictions apply:Message_too_big
is raised.int32
, int64
, and nativeint
.This function blocks until the receiving camlbox has free space.
Several threads may try to send messages at the same time.
val camlbox_wake : camlbox_sender -> unit
camlbox_wait
will return the empty list.
This function is non-blocking.