/* This file is part of Machina.
 * Copyright 2007-2011 David Robillard <http://drobilla.net>
 *
 * Machina 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.
 *
 * Machina 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 Machina.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <iostream>

#include "raul/SharedPtr.hpp"
#include "raul/Atom.hpp"

#include "machina/types.hpp"

#include "MIDISink.hpp"
#include "MidiAction.hpp"

namespace Machina {

/** Create a MIDI action.
 *
 * Creating a NULL MIDIAction is okay, pass event=NULL and
 * the action will simply do nothing until a set_event (for MIDI learning).
 *
 * Memory management of @event is the caller's responsibility
 * (ownership is not taken).
 */
MidiAction::MidiAction(size_t      size,
                       const byte* event)
	: _size(0)
	, _max_size(size)
{
	_event = new byte[_max_size];
	set_event(size, event);
}

MidiAction::~MidiAction()
{
	delete[] _event.load();
}

/** Set the MIDI event to be emitted when the action executes.
 *
 * Returns pointer to old event (caller's responsibility to free if non-NULL).
 * Safe to call concurrently with execute.
 *
 * Returns true on success.
 */
bool
MidiAction::set_event(size_t size, const byte* new_event)
{
	byte* const event = _event.load();
	if (size <= _max_size) {
		_event = NULL;
		if (size > 0 && new_event)
			memcpy(event, new_event, size);
		_size = size;
		_event = event;
		return true;
	} else {
		return false;
	}
}

/** Execute the action.
 *
 * Safe to call concurrently with set_event.
 */
void
MidiAction::execute(MIDISink* sink, Raul::TimeStamp time)
{
	const byte* const event = _event.load();

	if (event) {
		if (sink)
			sink->write_event(time, _size, event);
	} else {
		std::cerr << "NULL MIDI ACTION";
	}
}

void
MidiAction::write_state(Sord::Model& model)
{
	using namespace Raul;

	Action::write_state(model);

	model.add_statement(rdf_id(model.world()),
	                    Sord::Curie(model.world(), "rdf:type"),
	                    Sord::Curie(model.world(), "machina:MidiAction"));

	// FIXME: Assumes note on/note off
	std::cerr << "FIXME: AtomRDF" << std::endl;
	/*
	model.add_statement(rdf_id(model.world()),
			Sord::Curie(model.world(), "machina:midiNote"),
			AtomRDF::atom_to_node(model, Atom((int)(_event.get()[1]))));
	*/
}

} // namespace Machina