/**
 * \file
 *
 * \author	Georg Hopp
 *
 * \copyright
 * Copyright © 2014 Georg Hopp
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <unistd.h>

#include "trbase.h"
#include "trevent.h"

#include "tr/io_handler.h"
#include "tr/comm_end_point.h"
#include "tr/interface/comm_end_point.h"

extern int count_write_ready;
int count_write_ready_handle = 0;

static
int
ioHandlerCtor(void * _this, va_list * params)
{
	TR_PARENTCALL(TR_IoHandler, _this, TR_Class, ctor, params);

	return 0;
}

static void ioHandlerDtor(void * _this) {}

static
TR_EventDone
ioHandlerRead(void * _this, TR_Event event)
{
	TR_Event     revent;
	TR_EventDone done = TR_EVENT_DONE;

	switch (TR_cepBufferRead((TR_CommEndPoint)event->subject)) {
		case FALSE: // EAGAIN
			revent = TR_eventSubjectEmit(
					event->subject,
					TR_CEP_EVENT_READ_BLOCK,
					NULL);
			break;

		case -1: // error
			revent = TR_eventSubjectEmit(
					event->subject,
					TR_CEP_EVENT_CLOSE,
					NULL);
			break;

		default:
		case -2: // remote close
			revent = TR_eventSubjectEmit(
					event->subject,
					TR_CEP_EVENT_SHUT_READ,
					NULL);
			break;

		case TRUE:
			revent = TR_eventSubjectEmit(
					event->subject,
					TR_CEP_EVENT_NEW_DATA,
					NULL);

			done = TR_EVENT_PENDING;
			break;
	}

	TR_eventHandlerIssueEvent((TR_EventHandler)_this, revent);
	return done;
}

static
TR_EventDone
ioHandlerWrite(void * _this, TR_Event event)
{
	TR_Event        revent, close_event = NULL;

	count_write_ready_handle++;

	switch (TR_cepWriteBuffered((TR_CommEndPoint)event->subject)) {
		case FALSE: // EAGAIN
			if (TR_cepHasPendingData((TR_CommEndPoint)event->subject)) {
				revent = TR_eventSubjectEmit(
						event->subject,
						TR_CEP_EVENT_PENDING_DATA,
						NULL);
			} else {
				revent = TR_eventSubjectEmit(
						event->subject,
						TR_CEP_EVENT_END_DATA,
						NULL);
			}
			break;

		case -1:    // FAILURE
			revent = TR_eventSubjectEmit(
					event->subject,
					TR_CEP_EVENT_CLOSE,
					NULL);
			break;

		case -2:    // remote close
			revent = TR_eventSubjectEmit(
					event->subject,
					TR_CEP_EVENT_SHUT_WRITE,
					NULL);
			break;

		default:
			if (! TR_cepHasPendingData((TR_CommEndPoint)event->subject)) {
				revent = TR_eventSubjectEmit(
						event->subject,
						TR_CEP_EVENT_END_DATA,
						NULL);

				if (TRUE == ((TR_CommEndPoint)event->subject)->do_close) {
					close_event = TR_eventSubjectEmit(
							event->subject,
							TR_CEP_EVENT_CLOSE,
							NULL);
				}
			}
	}

	TR_eventHandlerIssueEvent((TR_EventHandler)_this, revent);
	if (close_event) {
		TR_eventHandlerIssueEvent((TR_EventHandler)_this, close_event);
	}

	return TR_EVENT_DONE;
}

static
void
ioHandlerCvInit(TR_class_ptr cls)
{
	TR_EVENT_HANDLER_SET_METHOD(
			cls,
			TR_CommEndPoint,
			TR_CEP_EVENT_READ_READY,
			ioHandlerRead);

	TR_EVENT_HANDLER_SET_METHOD(
			cls,
			TR_CommEndPoint,
			TR_CEP_EVENT_WRITE_READY,
			ioHandlerWrite);
}

TR_INSTANCE(TR_Hash, ioHandlerEventMethods);
TR_INIT_IFACE(TR_Class, ioHandlerCtor, ioHandlerDtor, NULL);
TR_CREATE_CLASS(
		TR_IoHandler,
		TR_EventHandler,
		ioHandlerCvInit,
		TR_IF(TR_Class)) = {
	{ &(_ioHandlerEventMethods.data) }
};

// vim: set ts=4 sw=4: