public:

void_type_tinfo() : uniform_type_info(to_uniform_name<util::void_type>()) {}

bool equals(const type_info &tinfo) const {

return typeid(util::void_type) == tinfo;

}

protected:

void serialize(const void*, serializer* sink) const {

serialize_nullptr(sink);

}

void deserialize(void*, deserializer* source) const {

string cname = source->seek_object();

if (cname != name()) {

throw logic_error("wrong type name found");

}

deserialize_nullptr(source);

}

bool equals(const void*, const void*) const {

return true;

}

void* new_instance(const void*) const {

// const_cast cannot cause any harm, because void_type is immutable

return const_cast<void*>(static_cast<const void*>(&m_value));

}

void delete_instance(void* instance) const {

CPPA_REQUIRE(instance == &m_value);

// keep compiler happy (suppress unused argument warning)

static_cast<void>(instance);

}

private:

util::void_type m_value;

public:

static void s_serialize(const actor_ptr& ptr,

serializer* sink,

const string&) {

auto impl = sink->addressing();

if (impl) impl->write(sink, ptr);

else throw std::runtime_error("unable to serialize actor_ptr: "

"no actor addressing defined");

}

static void s_deserialize(actor_ptr& ptrref,

deserializer* source,

const string&) {

auto impl = source->addressing();

if (impl) ptrref = impl->read(source);

else throw std::runtime_error("unable to deserialize actor_ptr: "

"no actor addressing defined");

}

protected:

void serialize(const void* ptr, serializer* sink) const {

s_serialize(*reinterpret_cast<const actor_ptr*>(ptr), sink, name());

}

void deserialize(void* ptr, deserializer* source) const {

s_deserialize(*reinterpret_cast<actor_ptr*>(ptr), source, name());

}

public:

static void s_serialize(const group_ptr& ptr,

serializer* sink,

const string& name) {

if (ptr == nullptr) {

serialize_nullptr(sink);

}

else {

sink->begin_object(name);

sink->write_value(ptr->module_name());

ptr->serialize(sink);

sink->end_object();

}

}

static void s_deserialize(group_ptr& ptrref,

deserializer* source,

const string& name) {

auto cname = source->seek_object();

if (cname != name) {

if (cname == s_nullptr_type_name) {

deserialize_nullptr(source);

ptrref.reset();

}

else assert_type_name(source, name); // throws

}

else {

source->begin_object(name);

auto modname = source->read<string>();

ptrref = group::get_module(modname)

->deserialize(source);

source->end_object();

}

}

protected:

void serialize(const void* ptr, serializer* sink) const {

s_serialize(*reinterpret_cast<const group_ptr*>(ptr),

sink,

name());

}

void deserialize(void* ptr, deserializer* source) const {

s_deserialize(*reinterpret_cast<group_ptr*>(ptr), source, name());

}

string group_ptr_name;

string actor_ptr_name;

public:

static void s_serialize(const channel_ptr& ptr,

serializer* sink,

const string& channel_type_name,

const string& actor_ptr_type_name,

const string& group_ptr_type_name) {

sink->begin_object(channel_type_name);

if (ptr == nullptr) {

serialize_nullptr(sink);

}

else {

group_ptr gptr;

auto aptr = ptr.downcast<actor>();

if (aptr) {

actor_ptr_tinfo::s_serialize(aptr, sink, actor_ptr_type_name);

}

else if ((gptr = ptr.downcast<group>())) {

group_ptr_tinfo::s_serialize(gptr, sink, group_ptr_type_name);

}

else {

throw logic_error("channel is neither "

"an actor nor a group");

}

}

sink->end_object();

}

static void s_deserialize(channel_ptr& ptrref,

deserializer* source,

const string& name,

const string& actor_ptr_type_name,

const string& group_ptr_type_name) {

assert_type_name(source, name);

source->begin_object(name);

string subobj = source->peek_object();

if (subobj == actor_ptr_type_name) {

actor_ptr tmp;

actor_ptr_tinfo::s_deserialize(tmp, source, actor_ptr_type_name);

ptrref = tmp;

}

else if (subobj == group_ptr_type_name) {

group_ptr tmp;

group_ptr_tinfo::s_deserialize(tmp, source, group_ptr_type_name);

ptrref = tmp;

}

else if (subobj == s_nullptr_type_name) { (void) source->seek_object();

deserialize_nullptr(source);

ptrref.reset();

}

else {

throw logic_error("unexpected type name: " + subobj);

}

source->end_object();

}

protected:

void serialize(const void* instance, serializer* sink) const {

s_serialize(*reinterpret_cast<const channel_ptr*>(instance),

sink,

name(),

actor_ptr_name,

group_ptr_name);

}

void deserialize(void* instance, deserializer* source) const {

s_deserialize(*reinterpret_cast<channel_ptr*>(instance),

source,

name(),

actor_ptr_name,

group_ptr_name);

}

public:

channel_ptr_tinfo() : group_ptr_name(to_uniform_name(typeid(group_ptr)))

, actor_ptr_name(to_uniform_name(typeid(actor_ptr))) { }

public:

static void s_serialize(const any_tuple& atup,

serializer* sink,

const string& name) {

sink->begin_object(name);

sink->begin_sequence(atup.size());

for (size_t i = 0; i < atup.size(); ++i) {

atup.type_at(i)->serialize(atup.at(i), sink);

}

sink->end_sequence();

sink->end_object();

}

static void s_deserialize(any_tuple& atref,

deserializer* source,

const string& name) {

uniform_type_info::assert_type_name(source, name);

auto result = new detail::object_array;

source->begin_object(name);

size_t tuple_size = source->begin_sequence();

for (size_t i = 0; i < tuple_size; ++i) {

auto tname = source->peek_object();

auto utype = uniform_type_info::from(tname);

result->push_back(utype->deserialize(source));

}

source->end_sequence();

source->end_object();

atref = any_tuple{result};

}

protected:

void serialize(const void* instance, serializer* sink) const {

s_serialize(*reinterpret_cast<const any_tuple*>(instance),sink,name());

}

void deserialize(void* instance, deserializer* source) const {

s_deserialize(*reinterpret_cast<any_tuple*>(instance), source, name());

}

string any_tuple_name;

string actor_ptr_name;

public:

virtual void serialize(const void* instance, serializer* sink) const {

CPPA_LOG_TRACE("");

auto& hdr = *reinterpret_cast<const network::message_header*>(instance);

sink->begin_object(name());

actor_ptr_tinfo::s_serialize(hdr.sender, sink, actor_ptr_name);

actor_ptr_tinfo::s_serialize(hdr.receiver, sink, actor_ptr_name);

sink->write_value(hdr.id.integer_value());

sink->end_object();

}

virtual void deserialize(void* instance, deserializer* source) const {

CPPA_LOG_TRACE("");

assert_type_name(source);

source->begin_object(name());

auto& msg = *reinterpret_cast<network::message_header*>(instance);

actor_ptr_tinfo::s_deserialize(msg.sender, source, actor_ptr_name);

actor_ptr_tinfo::s_deserialize(msg.receiver, source, actor_ptr_name);

auto msg_id = source->read<std::uint64_t>();

msg.id = message_id_t::from_integer_value(msg_id);

source->end_object();

}

msg_hdr_tinfo() : any_tuple_name(to_uniform_name<any_tuple>())

, actor_ptr_name(to_uniform_name<actor_ptr>()) { }

typedef process_information_ptr ptr_type;

public:

virtual void serialize(const void* instance, serializer* sink) const {

auto& ptr = *reinterpret_cast<const ptr_type*>(instance);

if (ptr == nullptr) {

serialize_nullptr(sink);

}

else {

sink->begin_object(name());

sink->write_value(ptr->process_id());

sink->write_raw(ptr->node_id().size(), ptr->node_id().data());

sink->end_object();

}

}

virtual void deserialize(void* instance, deserializer* source) const {

auto& ptrref = *reinterpret_cast<ptr_type*>(instance);

auto cname = source->seek_object();

if (cname != name()) {

if (cname == s_nullptr_type_name) {

deserialize_nullptr(source);

ptrref.reset();

}

else assert_type_name(source); // throws

}

else {

source->begin_object(cname);

auto id = source->read<uint32_t>();

process_information::node_id_type nid;

source->read_raw(nid.size(), nid.data());

source->end_object();

ptrref.reset(new process_information{id, nid});

}

}

public:

virtual void serialize(const void* instance, serializer* sink) const {

auto val = reinterpret_cast<const atom_value*>(instance);

sink->begin_object(name());

sink->write_value(static_cast<uint64_t>(*val));

sink->end_object();

}

virtual void deserialize(void* instance, deserializer* source) const {

assert_type_name(source);

auto val = reinterpret_cast<atom_value*>(instance);

source->begin_object(name());

*val = static_cast<atom_value>(source->read<uint64_t>());

source->end_object();

}

virtual void serialize(const void* instance, serializer* sink) const {

auto val = reinterpret_cast<const util::duration*>(instance);

sink->begin_object(name());

sink->write_value(static_cast<uint32_t>(val->unit));

sink->write_value(val->count);

sink->end_object();

}

virtual void deserialize(void* instance, deserializer* source) const {

assert_type_name(source);

source->begin_object(name());

auto val = reinterpret_cast<util::duration*>(instance);

auto unit_val = source->read<uint32_t>();

auto count_val = source->read<uint32_t>();

source->end_object();

switch (unit_val) {

case 1:

val->unit = util::time_unit::seconds;

break;

case 1000:

val->unit = util::time_unit::milliseconds;

break;

case 1000000:

val->unit = util::time_unit::microseconds;

break;

default:

val->unit = util::time_unit::none;

break;

}

val->count = count_val;

}

public:

bool equals(const type_info& tinfo) const {

// TODO: string comparsion sucks & is slow; find a nicer solution

auto map_iter = uti_map().int_names().find(sizeof(T));

const string_set& st = is_signed<T>::value ? map_iter->second.first

: map_iter->second.second;

auto x = raw_name(tinfo);

return any_of(st.begin(), st.end(),

[&x](const string& y) { return x == y; });

}

public:

virtual void serialize(const void* instance, serializer* sink) const {

auto val = *reinterpret_cast<const bool*>(instance);

sink->begin_object(name());

sink->write_value(static_cast<uint8_t>(val ? 1 : 0));

sink->end_object();

}

virtual void deserialize(void* instance, deserializer* source) const {

assert_type_name(source);

source->begin_object(name());

*reinterpret_cast<bool*>(instance) = source->read<uint8_t>() != 0;

source->end_object();

}

public:

uniform_type_info_map_helper(uniform_type_info_map* umap) : d(umap) { }

template<typename T>

inline void insert_int() {

d->insert(d->m_ints[sizeof(T)].first, new int_tinfo<T>);

}

template<typename T>

inline void insert_uint() {

d->insert(d->m_ints[sizeof(T)].second, new int_tinfo<T>);

}

template<typename T>

inline void insert_builtin() {

d->insert({raw_name<T>()}, new default_uniform_type_info_impl<T>);

}

private:

uniform_type_info_map* d;

// inserts all compiler generated raw-names to m_ings

push<char, signed char,

unsigned char, short,

signed short, unsigned short,

short int, signed short int,

unsigned short int, int,

signed int, unsigned int,

long int, signed long int,

unsigned long int, long,

signed long, unsigned long,

long long, signed long long,

unsigned long long, wchar_t,

std::int8_t, std::uint8_t,

std::int16_t, std::uint16_t,

std::int32_t, std::uint32_t,

std::int64_t, std::uint64_t,

char16_t, char32_t,

size_t, ptrdiff_t,

intptr_t >(m_ints);

uniform_type_info_map_helper helper{this};

// inserts integer type infos

helper.insert_int<std::int8_t>();

helper.insert_int<std::int16_t>();

helper.insert_int<std::int32_t>();

helper.insert_int<std::int64_t>();

helper.insert_uint<std::uint8_t>();

helper.insert_uint<std::uint16_t>();

helper.insert_uint<std::uint32_t>();

helper.insert_uint<std::uint64_t>();

// insert type infos for "built-in" types

helper.insert_builtin<float>();

helper.insert_builtin<double>();

helper.insert_builtin<long double>();

helper.insert_builtin<std::string>();

helper.insert_builtin<std::u16string>();

helper.insert_builtin<std::u32string>();

// bool needs some special handling, because it hasn't a guaranteed size

insert({raw_name<bool>()}, new bool_tinfo);

// insert cppa types

insert({raw_name<util::duration>()}, new duration_tinfo);

insert({raw_name<any_tuple>()}, new any_tuple_tinfo);

insert({raw_name<actor_ptr>()}, new actor_ptr_tinfo);

insert({raw_name<group_ptr>()}, new group_ptr_tinfo);

insert({raw_name<channel_ptr>()}, new channel_ptr_tinfo);

insert({raw_name<atom_value>()}, new atom_value_tinfo);

insert({raw_name<network::message_header>()}, new msg_hdr_tinfo);

insert({raw_name<util::void_type>()}, new void_type_tinfo);

insert({raw_name<process_information_ptr>()}, new process_info_ptr_tinfo);

insert({raw_name<map<string,string>>()}, new default_uniform_type_info_impl<map<string,string>>);

uniform_type_info* what) {

if (m_by_uname.count(what->name()) > 0) {

delete what;

return false;

}

m_by_uname.insert(std::make_pair(what->name(), what));

for (auto& plain_name : raw_names) {

if (!m_by_rname.insert(std::make_pair(plain_name, what)).second) {

std::string error_str = plain_name;

error_str += " already mapped to an uniform_type_info";

throw std::runtime_error(error_str);

}

}

return true;

std::vector<const uniform_type_info*> result;

result.reserve(m_by_uname.size());

for (const uti_map_type::value_type& i : m_by_uname) {

result.push_back(i.second);

}

return std::move(result);

const std::string& expected_name) {

auto tname = source->seek_object();

if (tname != expected_name) {

std::string error_msg = "wrong type name found; expected \"";

error_msg += expected_name;

error_msg += "\", found \"";

error_msg += tname;

error_msg += "\"";

throw std::logic_error(std::move(error_msg));

}

auto ptr = new_instance();

deserialize(ptr, from);

return {ptr, this};