/*
 * machinarium.
 *
 * cooperative multitasking engine.
 */

#include <machinarium.h>
#include <machinarium_private.h>

MACHINE_API machine_channel_t *
machine_channel_create()
{
	mm_channel_t *channel;
	channel = malloc(sizeof(mm_channel_t));
	if (channel == NULL) {
		mm_errno_set(ENOMEM);
		return NULL;
	}
	mm_channel_init(channel);
	return (machine_channel_t *)channel;
}

MACHINE_API void
machine_channel_free(machine_channel_t *obj)
{
	mm_channeltype_t *type;
	type = mm_cast(mm_channeltype_t *, obj);
	if (type->is_shared) {
		mm_channel_t *channel;
		channel = mm_cast(mm_channel_t *, obj);
		mm_channel_free(channel);
		free(channel);
		return;
	}
	mm_channelfast_t *channel;
	channel = mm_cast(mm_channelfast_t *, obj);
	mm_channelfast_free(channel);
	free(channel);
}

MACHINE_API void
machine_channel_write(machine_channel_t *obj, machine_msg_t *obj_msg)
{
	mm_channeltype_t *type;
	type = mm_cast(mm_channeltype_t *, obj);
	if (type->is_shared) {
		mm_channel_t *channel;
		channel       = mm_cast(mm_channel_t *, obj);
		mm_msg_t *msg = mm_cast(mm_msg_t *, obj_msg);
		mm_channel_write(channel, msg);
		return;
	}
	mm_channelfast_t *channel;
	channel       = mm_cast(mm_channelfast_t *, obj);
	mm_msg_t *msg = mm_cast(mm_msg_t *, obj_msg);
	mm_channelfast_write(channel, msg);
}

MACHINE_API machine_msg_t *
machine_channel_read(machine_channel_t *obj, uint32_t time_ms)
{
	mm_channeltype_t *type;
	type = mm_cast(mm_channeltype_t *, obj);
	if (type->is_shared) {
		mm_channel_t *channel;
		channel = mm_cast(mm_channel_t *, obj);
		mm_msg_t *msg;
		msg = mm_channel_read(channel, time_ms);
		return (machine_msg_t *)msg;
	}
	mm_channelfast_t *channel;
	channel = mm_cast(mm_channelfast_t *, obj);
	mm_msg_t *msg;
	msg = mm_channelfast_read(channel, time_ms);
	return (machine_msg_t *)msg;
}