Pony provides a built-in mechanism for serialising and deserialising objects so that they can be passed between Pony processes. Serialisation takes an object and turns it into an array of bytes that can be used to send the object to another process by, for example, writing it to a TCP stream. Deserialisation takes an array of bytes and turns them into a Pony object.
Pony uses an intermediate object type called Serialised
to represent a serialised object. A Serialised
object can be created in one of two ways:
- calling the
create(...)
constructor with theSerialiseAuth
authority and the object to serialize - calling the
input(...)
constructor with theDeserialiseAuth
authority and anArray[U8]
that represents the object to deserialise This intermediate object can then be used to either: - generate an
Array[U8]
that represents the object by calling theoutput(...)
method with theOutputSerialisedAuth
authority - generate a deserialised object by calling the
apply(...)
method with theInputSerialisedAuth
authority
This program serialises and deserialise an object, and checks that the fields of the original object are the same as the fields of the deserialised object.
use "serialise"
class Foo is Equatable[Foo box]
let _s: String
let _u: U32
new create(s: String, u: U32) =>
_s = s
_u = u
fun eq(foo: Foo box): Bool =>
(_s == foo._s) and (_u == foo._u)
actor Main
new create(env: Env) =>
try
let ambient = env.root as AmbientAuth
// get serialization authorities
let serialise = SerialiseAuth(ambient)
let output = OutputSerialisedAuth(ambient)
let deserialise = DeserialiseAuth(ambient)
let input = InputSerialisedAuth(ambient)
let foo1 = Foo("abc", 123)
// serialisation
let sfoo = Serialised(serialise, foo1)?
let bytes_foo: Array[U8] val = sfoo.output(output)
env.out.print("serialised representation is " +
bytes_foo.size().string() +
" bytes long")
// deserialisation
let dfoo = Serialised.input(input, bytes_foo)
let foo2 = dfoo(deserialise)? as Foo
env.out.print("(foo1 == foo2) is " + (foo1 == foo2).string())
else
env.err.print("there was an error")
end
There are several things to keep in mind when using Pony's serialisation system:
- Serialised objects will currently only work when passed between two running instances of the same Pony executable. You cannot pass objects between different Pony programs, nor can you pass them between different versions of the same program.
- Objects with
embed
fields will not be properly serialised. - Objects with
Pointer
fields must use the custom serialisation mechanism or else thePointer
fields will be null when the object is deserialised. For information on how to handle these kinds of fields, please see the discussion of custom serialisation and deserialisation below.
Pony objects can have Pointer
fields that store pointers to memory that contains things that are opaque to Pony but that may be useful to code that is called via FFI. Because the objects that Pointer
fields point to are opaque, Pony cannot serialise and deserialise them by itself. However, Pony's serialisation system provides a way for the programmer to specify how the objects pointed to by these fields should be serialised and deserialised. This system is called custom serialisation.
Since Pointer
fields are opaque to Pony, it is assumed that the serialisation and deserialisation code will be written in another language that knows how to read the object referenced by the pointers.
In order to serialise an object from a pointer field, Pony needs to know how much space to set aside for that object and how to write a representation of that object into the reserved space. The programmer must provide two methods on the object:
fun _serialise_space(): USize
-- This method returns the number of bytes that must be reserved for the object.fun _serialise(bytes: Pointer[U8] tag)
-- This method receives a pointer to the memory that has been set aside for serialising the object. The programmer must not write more bytes than were returned by the_serialise_space
method.
Custom deserialisation is handled by a fun ref _deserialise(bytes: Pointer[U8] tag)
method. This method receives a pointer to the character array that stores the serialised representation of the object (or objects) that the Pointer
fields should point to. The programmer must copy out any bytes that will be used by the deserialised object.
The custom deserialization method is expected to modify the values of the objects Pointer
fields, so the fields must be declared var
so that they can be modified.
The programmer must write their custom serialisation and deserialisation code in such a way that it is aware of how many bytes are available in the byte arrays that are passed to the methods. If the objects are always of a fixed size then the functions can read and write than many bytes to the buffer. However, if the objects are of varying sizes (for example, if the object was a string), then the serialized representation must include information that the deserialisation code can use to ensure that it does not read beyond the end of the memory occupied by the object. The custom serialisation system does not provide a mechanism for doing this, so it is up to the program to choose a mechanism and implement it. In the case of a string, the serialisation format could consist of a 4-byte header that encodes the length of the string, followed by a string of the specified length. This additonal four bytes must be included in the value returned by _serialise_space()
. The deserialisation function would then start by reading the first four bytes of the array to obtain the size of the string and then read only that many bytes from the array.
If a class has more than one Pointer
field then all of those fields must be handled by the custom serialisation and deserialisation methods for that class; there are not methods for each field. For example, if a class has three Pointer
fields then the _serialise_space()
method must return the total number of bytes required to serialise the objects from all three fields.
Assume we have a Pony class with a field that is a pointer to a C string. We would like to be able to serialise and deserialise this object. In order to do that, the Pony class implements the methods _serialise_space(...)
, _serialise(...)
, and _deserialise(...)
. These methods, in turn, call C functions that calculate the number of bytes needed to serialise the string and serialise and deserialise it. In this example the serialised string is represented by a four-byte big-endian number that represents the length of the string, followed by the string itself without the terminating null. So if the C string is hello world\0
then the serialised string is \0x00\0x00\0x00\0x0Bhello world
(where the first four bytes of the serialised string are a big-endian representation of the number 0x0000000B
, which is 11
).
use "serialise"
use "lib:custser"
class CStringWrapper
var _cstr: Pointer[U8] tag
new create(cstr: Pointer[U8] tag) =>
_cstr = cstr
fun _serialise_space(): USize =>
@serialise_space[USize](_cstr)
fun _serialise(bytes: Pointer[U8] tag) =>
@serialise[None](bytes, _cstr)
fun ref _deserialise(bytes: Pointer[U8] tag) =>
_cstr = @deserialise[Pointer[U8] tag](bytes)
fun print() =>
@printf[I32](_cstr)
actor Main
new create(env: Env) =>
let csw = CStringWrapper(@get_string[Pointer[U8]]())
csw.print()
try
let ambient = env.root as AmbientAuth
let serialise = SerialiseAuth(ambient)
let deserialise = DeserialiseAuth(ambient)
let sx = Serialised(serialise, csw)?
let y = sx(deserialise)? as CStringWrapper
y.print()
else
env.err.print("there was an error")
end
// custser.c
#include <stdlib.h>
#include <string.h>
extern char *get_string()
{
return "hello world\n";
}
extern size_t serialise_space(char *s)
{
// space for the size and the string (without the null)
return 4 + strlen(s);
}
extern void serialise(char *buff, char *s)
{
size_t sz = strlen(s);
unsigned char *ubuff = (unsigned char *) buff;
// write the size as a 32-bit big-endian integer
ubuff[0] = (sz >> 24) & 0xFF;
ubuff[1] = (sz >> 16) & 0xFF;
ubuff[2] = (sz >> 8) & 0xFF;
ubuff[3] = sz & 0xFF;
// copy the string
strncpy(buff + 4, s, sz);
}
extern char *deserialise(char *buff)
{
unsigned char *ubuff = (unsigned char *) buff;
size_t sz = (ubuff[0] << 24) + (ubuff[1] << 16) + (ubuff[2] << 8) + ubuff[3];
char *s = malloc(sizeof(char) * sz + 1);
memcpy(s, buff + 4, sz);
s[sz] = '\0';
return s;
}