/* This file is part of Machina.
 * Copyright (C) 2007 Dave 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 2 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 details.
 * 
 * You should have received a copy of the GNU General Public License along
 * with this program; if not, write to the Free Software Foundation, Inc.,
 * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
 */

#include <iostream>
#include <raul/SharedPtr.hpp>
#include <raul/MIDISink.hpp>
#include <raul/Atom.hpp>
#include "machina/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()
{
	if (_event.get())
		delete _event.get();
}


/** 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.get();
	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(SharedPtr<Raul::MIDISink> sink, Raul::BeatTime time)
{
	const byte* const event = _event.get();

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


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

	Action::write_state(model);

	model.add_statement(_id,
			Redland::Node(model.world(), Redland::Node::RESOURCE, "rdf:type"),
			Redland::Node(model.world(), Redland::Node::RESOURCE, "machina:MidiAction"));
	
	// FIXME: Assumes note on/note off
	model.add_statement(_id,
			Redland::Node(model.world(), Redland::Node::RESOURCE, "machina:midiNote"),
			Atom((int)(_event.get()[1])).to_rdf_node(model.world()));
}


} // namespace Machina