/***************************************************************************
 *                                                                         *
 *   LinuxSampler - modular, streaming capable sampler                     *
 *                                                                         *
 *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *
 *                                                                         *
 *   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 2 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, write to the Free Software           *
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston,                 *
 *   MA  02111-1307  USA                                                   *
 ***************************************************************************/

#include "MidiInputDevice.h"

namespace LinuxSampler {

    MidiInputDevice::MidiInputDevice(std::map<String,DeviceCreationParameter*> DriverParameters) {
	    this->Parameters = DriverParameters;
    }

    MidiInputDevice::~MidiInputDevice() {
	    std::map<String,DeviceCreationParameter*>::iterator iter = Parameters.begin();
	    while (iter != Parameters.end()) {
		    Parameters.erase(iter);
		    delete iter->second;
		    iter++;
	    }
    }

    std::map<String,DeviceCreationParameter*> MidiInputDevice::AvailableParameters() {
	    static const std::map<String,DeviceCreationParameter*> available_parameters = CreateAvailableParameters();
	    return available_parameters;
    }
                                                                                                                                                            
    std::map<String,DeviceCreationParameter*> MidiInputDevice::CreateAvailableParameters() {
	    static ParameterActive     param_active(NULL);
	    static ParameterPorts      param_ports(NULL);
	    std::map<String,DeviceCreationParameter*> result;
	    result["active"]     = &param_active;
	    result["ports"]      = &param_ports;
	    return result;
    }

    MidiInputDevice::MidiInputPort::~MidiInputPort() {
	    std::map<String,DeviceCreationParameter*>::iterator iter = Parameters.begin();
	    while (iter != Parameters.end()) {
		    Parameters.erase(iter);
		    delete iter->second;
		    iter++;
	    }
    }

    MidiInputDevice::MidiInputPort::MidiInputPort(MidiInputDevice* pDevice, int portNumber) {
	    this->pDevice = pDevice;
	    this->portNumber = portNumber;
	    Parameters["name"] = new ParameterName(this);
    }

    MidiInputDevice* MidiInputDevice::MidiInputPort::GetDevice() {
	    return pDevice;
    }

    uint MidiInputDevice::MidiInputPort::GetPortNumber() {
	    return portNumber;
    }

    std::map<String,DeviceCreationParameter*> MidiInputDevice::DeviceParameters() {
	    return Parameters;
    }

    std::map<String,DeviceCreationParameter*> MidiInputDevice::MidiInputPort::DeviceParameters() {
	    return Parameters;
    }

    void MidiInputDevice::MidiInputPort::DispatchNoteOn(uint8_t Key, uint8_t Velocity, uint MidiChannel) {
        std::set<Engine*>::iterator engineiter = MidiChannelMap[MidiChannel].begin();
        std::set<Engine*>::iterator end        = MidiChannelMap[MidiChannel].end();
        for (; engineiter != end; engineiter++) (*engineiter)->SendNoteOn(Key, Velocity);
    }

    void MidiInputDevice::MidiInputPort::DispatchNoteOff(uint8_t Key, uint8_t Velocity, uint MidiChannel) {
        std::set<Engine*>::iterator engineiter = MidiChannelMap[MidiChannel].begin();
        std::set<Engine*>::iterator end        = MidiChannelMap[MidiChannel].end();
        for (; engineiter != end; engineiter++) (*engineiter)->SendNoteOff(Key, Velocity);
    }

    void MidiInputDevice::MidiInputPort::DispatchPitchbend(int Pitch, uint MidiChannel) {
        std::set<Engine*>::iterator engineiter = MidiChannelMap[MidiChannel].begin();
        std::set<Engine*>::iterator end        = MidiChannelMap[MidiChannel].end();
        for (; engineiter != end; engineiter++) (*engineiter)->SendPitchbend(Pitch);
    }

    void MidiInputDevice::MidiInputPort::DispatchControlChange(uint8_t Controller, uint8_t Value, uint MidiChannel) {
        std::set<Engine*>::iterator engineiter = MidiChannelMap[MidiChannel].begin();
        std::set<Engine*>::iterator end        = MidiChannelMap[MidiChannel].end();
        for (; engineiter != end; engineiter++) (*engineiter)->SendControlChange(Controller, Value);
    }

    void MidiInputDevice::MidiInputPort::Connect(Engine* pEngine, midi_chan_t MidiChannel) {
        if (MidiChannel < 0 || MidiChannel > 16)
            throw MidiInputException("MIDI channel index out of bounds");
        Disconnect(pEngine);
        MidiChannelMap[MidiChannel].insert(pEngine);
    }

    void MidiInputDevice::MidiInputPort::Disconnect(Engine* pEngine) {
        try { for (int i = 0; i <= 16; i++) MidiChannelMap[i].erase(pEngine); }
        catch(...) { /* NOOP */ }
    }

    void MidiInputDevice::AcquirePorts(uint newPorts) {
	 int diff = this->Ports.size() - newPorts;
	 if (!diff)
		 return; //Number of ports matches already, nothing to do.

	 while (diff != 0) {
		 if (diff > 0) {	//We've got too many ports, remove one
			 std::map<int,MidiInputPort*>::iterator portsIter = Ports.end();
			 Ports.erase(--portsIter);
			 delete portsIter->second;
			 diff--;
		 }
		 if (diff < 0) {       //We don't have enough ports, create one
			 MidiInputPort* midiPort = this->CreateMidiPort();
			 Ports[midiPort->portNumber] = midiPort;
			 diff++;
		 }
	 }
    }

} // namespace LinuxSampler