trunk/src/Sampler.cpp

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

#include <sstream>

#include "Sampler.h"

#include "engines/EngineFactory.h"
#include "engines/EngineChannelFactory.h"
#include "drivers/audio/AudioOutputDeviceFactory.h"
#include "drivers/midi/MidiInputDeviceFactory.h"
#include "drivers/midi/MidiInstrumentMapper.h"
#include "network/lscpserver.h"

namespace LinuxSampler {

    // ******************************************************************
    // * SamplerChannel

    SamplerChannel::SamplerChannel(Sampler* pS) {
        pSampler           = pS;
        pEngineChannel     = NULL;
        pAudioOutputDevice = NULL;
        pMidiInputDevice   = NULL;
        iMidiPort          = 0;
        midiChannel        = midi_chan_all;
        iIndex             = -1;
    }

    SamplerChannel::~SamplerChannel() {
        if (pEngineChannel) {
            Engine* engine = pEngineChannel->GetEngine();
            if (pAudioOutputDevice) pAudioOutputDevice->Disconnect(engine);

            MidiInputPort* pMidiInputPort = (pEngineChannel) ? pEngineChannel->GetMidiInputPort() : __GetMidiInputDevicePort(GetMidiInputChannel());
            if (pMidiInputPort) pMidiInputPort->Disconnect(pEngineChannel);
            if (pEngineChannel) {
                if (pAudioOutputDevice) pEngineChannel->DisconnectAudioOutputDevice();
                EngineChannelFactory::Destroy(pEngineChannel);

                // reconnect engine if it still exists
                const std::set<Engine*>& engines = EngineFactory::EngineInstances();
                if (engines.find(engine) != engines.end()) pAudioOutputDevice->Connect(engine);
            }
        }
    }

    void SamplerChannel::SetEngineType(String EngineType) throw (Exception) {
        dmsg(2,("SamplerChannel: Assigning engine type..."));

        // create new engine channel
        EngineChannel* pNewEngineChannel = EngineChannelFactory::Create(EngineType);
        if (!pNewEngineChannel) throw Exception("Unknown engine type");

        //FIXME: hack to allow fast retrieval of engine channel's sampler channel index
        pNewEngineChannel->iSamplerChannelIndex = Index();

        // dereference midi input port.
        MidiInputPort* pMidiInputPort = __GetMidiInputDevicePort(GetMidiInputPort());
        // disconnect old engine channel
        if (pEngineChannel) {
            Engine* engine = pEngineChannel->GetEngine();
            if (pAudioOutputDevice) pAudioOutputDevice->Disconnect(engine);

            if (pMidiInputPort) pMidiInputPort->Disconnect(pEngineChannel);
            if (pAudioOutputDevice) pEngineChannel->DisconnectAudioOutputDevice();
            EngineChannelFactory::Destroy(pEngineChannel);

            // reconnect engine if it still exists
            const std::set<Engine*>& engines = EngineFactory::EngineInstances();
            if (engines.find(engine) != engines.end()) pAudioOutputDevice->Connect(engine);
        }

        // connect new engine channel
        if (pAudioOutputDevice) {
            pNewEngineChannel->Connect(pAudioOutputDevice);
            pAudioOutputDevice->Connect(pNewEngineChannel->GetEngine());
        }
        if (pMidiInputPort) pMidiInputPort->Connect(pNewEngineChannel, GetMidiInputChannel());
        pEngineChannel = pNewEngineChannel;

        // from now on get MIDI device and port from EngineChannel object
        this->pMidiInputDevice = NULL;
        this->iMidiPort        = 0;

        pEngineChannel->StatusChanged(true);

        dmsg(2,("OK\n"));
    }

    void SamplerChannel::SetAudioOutputDevice(AudioOutputDevice* pDevice) {
        if(pAudioOutputDevice == pDevice) return;

        // disconnect old device
        if (pAudioOutputDevice && pEngineChannel) {
            Engine* engine = pEngineChannel->GetEngine();
            pAudioOutputDevice->Disconnect(engine);

            pEngineChannel->DisconnectAudioOutputDevice();

            // reconnect engine if it still exists
            const std::set<Engine*>& engines = EngineFactory::EngineInstances();
            if (engines.find(engine) != engines.end()) pAudioOutputDevice->Connect(engine);
        }

        // connect new device
        pAudioOutputDevice = pDevice;
        if (pEngineChannel) {
            pEngineChannel->Connect(pAudioOutputDevice);
            pAudioOutputDevice->Connect(pEngineChannel->GetEngine());
        }
    }

    void SamplerChannel::SetMidiInputDevice(MidiInputDevice* pDevice) {
       SetMidiInput(pDevice, 0, GetMidiInputChannel());
    }

    void SamplerChannel::SetMidiInputPort(int MidiPort) {
       SetMidiInput(GetMidiInputDevice(), MidiPort, GetMidiInputChannel());
    }

    void SamplerChannel::SetMidiInputChannel(midi_chan_t MidiChannel) {
       SetMidiInput(GetMidiInputDevice(), GetMidiInputPort(), MidiChannel);
    }

    void SamplerChannel::SetMidiInput(MidiInputDevice* pDevice, int iMidiPort, midi_chan_t MidiChannel) {
        if (!pDevice) throw Exception("No MIDI input device assigned.");

        // get old and new midi input port
        MidiInputPort* pOldMidiInputPort = __GetMidiInputDevicePort(GetMidiInputPort());
        MidiInputPort* pNewMidiInputPort = pDevice->GetPort(iMidiPort);

        // disconnect old device port
        if (pOldMidiInputPort && pEngineChannel) pOldMidiInputPort->Disconnect(pEngineChannel);
        // remember new device, port and channel if not engine channel yet created
        if (!pEngineChannel) {
            this->pMidiInputDevice = pDevice;
            this->iMidiPort        = iMidiPort;
            this->midiChannel      = MidiChannel;
        }

        // connect new device port
        if (pNewMidiInputPort && pEngineChannel) pNewMidiInputPort->Connect(pEngineChannel, MidiChannel);
        // Ooops.
        if (pNewMidiInputPort == NULL)
            throw Exception("There is no MIDI input port with index " + ToString(iMidiPort) + ".");
    }

    EngineChannel* SamplerChannel::GetEngineChannel() {
        return pEngineChannel;
    }

    midi_chan_t SamplerChannel::GetMidiInputChannel() {
        if (pEngineChannel) this->midiChannel = pEngineChannel->MidiChannel();
        return this->midiChannel;
    }

    int SamplerChannel::GetMidiInputPort() {
        MidiInputPort* pMidiInputPort = (pEngineChannel) ? pEngineChannel->GetMidiInputPort() : NULL;
        if (pMidiInputPort) this->iMidiPort = (int) pMidiInputPort->GetPortNumber();
        return iMidiPort;
    }

    AudioOutputDevice* SamplerChannel::GetAudioOutputDevice() {
        return pAudioOutputDevice;
    }

    MidiInputDevice* SamplerChannel::GetMidiInputDevice() {
        if (pEngineChannel)
            pMidiInputDevice = (pEngineChannel->GetMidiInputPort()) ? pEngineChannel->GetMidiInputPort()->GetDevice() : NULL;
        return pMidiInputDevice;
    }

    uint SamplerChannel::Index() {
        if (iIndex >= 0) return iIndex;

        Sampler::SamplerChannelMap::iterator iter = pSampler->mSamplerChannels.begin();
        for (; iter != pSampler->mSamplerChannels.end(); iter++) {
            if (iter->second == this) {
                iIndex = iter->first;
                return iIndex;
            }
        }

        throw Exception("Internal error: SamplerChannel index not found");
    }

    MidiInputPort* SamplerChannel::__GetMidiInputDevicePort(int iMidiPort) {
        MidiInputPort* pMidiInputPort = NULL;
        MidiInputDevice* pMidiInputDevice = GetMidiInputDevice();
        if (pMidiInputDevice)
            pMidiInputPort = pMidiInputDevice->GetPort(iMidiPort);
        return pMidiInputPort;
    }


    // ******************************************************************
    // * Sampler

    Sampler::Sampler() {
    }

    Sampler::~Sampler() {
        Reset();
    }

    uint Sampler::SamplerChannels() {
        return mSamplerChannels.size();
    }

    SamplerChannel* Sampler::AddSamplerChannel() {
        // if there's no sampler channel yet
        if (!mSamplerChannels.size()) {
            SamplerChannel* pChannel = new SamplerChannel(this);
            mSamplerChannels[0] = pChannel;
            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, 1));
            return pChannel;
        }

        // get the highest used sampler channel index
        uint lastIndex = (--(mSamplerChannels.end()))->first;

        // check if we reached the index limit
        if (lastIndex + 1 < lastIndex) {
            // search for an unoccupied sampler channel index starting from 0
            for (uint i = 0; i < lastIndex; i++) {
                if (mSamplerChannels.find(i) != mSamplerChannels.end()) continue;
                // we found an unused index, so insert the new channel there
                SamplerChannel* pChannel = new SamplerChannel(this);
                mSamplerChannels[i] = pChannel;
                LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, i));
                return pChannel;
            }
            throw Exception("Internal error: could not find unoccupied sampler channel index.");
        }

        // we have not reached the index limit so we just add the channel past the highest index
        SamplerChannel* pChannel = new SamplerChannel(this);
        mSamplerChannels[lastIndex + 1] = pChannel;
        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, lastIndex + 1));
        return pChannel;
    }

    SamplerChannel* Sampler::GetSamplerChannel(uint uiSamplerChannel) {
        return (mSamplerChannels.find(uiSamplerChannel) != mSamplerChannels.end()) ? mSamplerChannels[uiSamplerChannel] : NULL;
    }

    std::map<uint, SamplerChannel*> Sampler::GetSamplerChannels() {
        return mSamplerChannels;
    }

    void Sampler::RemoveSamplerChannel(SamplerChannel* pSamplerChannel) {
        SamplerChannelMap::iterator iterChan = mSamplerChannels.begin();
        for (; iterChan != mSamplerChannels.end(); iterChan++) {
            if (iterChan->second == pSamplerChannel) {
                mSamplerChannels.erase(iterChan);
                delete pSamplerChannel;
                LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, mSamplerChannels.size()));
                return;
            }
        }
    }

    void Sampler::RemoveSamplerChannel(uint uiSamplerChannel) {
        SamplerChannel* pChannel = GetSamplerChannel(uiSamplerChannel);
        if (!pChannel) return;
        RemoveSamplerChannel(pChannel);
    }

    std::vector<String> Sampler::AvailableAudioOutputDrivers() {
        return AudioOutputDeviceFactory::AvailableDrivers();
    }

    std::vector<String> Sampler::AvailableMidiInputDrivers() {
        return MidiInputDeviceFactory::AvailableDrivers();
    }

    std::vector<String> Sampler::AvailableEngineTypes() {
        return EngineFactory::AvailableEngineTypes();
    }

    AudioOutputDevice* Sampler::CreateAudioOutputDevice(String AudioDriver, std::map<String,String> Parameters) throw (Exception) {
        // create new device
        AudioOutputDevice* pDevice = AudioOutputDeviceFactory::Create(AudioDriver, Parameters);

        // add new audio device to the audio device list
        for (uint i = 0; ; i++) { // seek for a free place starting from the beginning
            if (!mAudioOutputDevices[i]) {
                mAudioOutputDevices[i] = pDevice;
                break;
            }
        }

        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_count, AudioOutputDevices()));
        return pDevice;
    }

    uint Sampler::AudioOutputDevices() {
        return mAudioOutputDevices.size();
    }

    uint Sampler::MidiInputDevices() {
        return mMidiInputDevices.size();
    }

    std::map<uint, AudioOutputDevice*> Sampler::GetAudioOutputDevices() {
        return mAudioOutputDevices;
    }

    std::map<uint, MidiInputDevice*> Sampler::GetMidiInputDevices() {
        return mMidiInputDevices;
    }

    void Sampler::DestroyAudioOutputDevice(AudioOutputDevice* pDevice) throw (Exception) {
        AudioOutputDeviceMap::iterator iter = mAudioOutputDevices.begin();
        for (; iter != mAudioOutputDevices.end(); iter++) {
            if (iter->second == pDevice) {
                // check if there are still sampler engines connected to this device
                for (uint i = 0; i < SamplerChannels(); i++)
                    if (GetSamplerChannel(i)->GetAudioOutputDevice() == pDevice) throw Exception("Sampler channel " + ToString(i) + " is still connected to the audio output device.");

                // disable device
                pDevice->Stop();

                // remove device from the device list
                mAudioOutputDevices.erase(iter);

                // destroy and free device from memory
                delete pDevice;

                LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_count, AudioOutputDevices()));
                break;
            }
        }
    }

    void Sampler::DestroyMidiInputDevice(MidiInputDevice* pDevice) throw (Exception) {
        MidiInputDeviceMap::iterator iter = mMidiInputDevices.begin();
        for (; iter != mMidiInputDevices.end(); iter++) {
            if (iter->second == pDevice) {
                // check if there are still sampler engines connected to this device
                for (uint i = 0; i < SamplerChannels(); i++)
                    if (GetSamplerChannel(i)->GetMidiInputDevice() == pDevice) throw Exception("Sampler channel " + ToString(i) + " is still connected to the midi input device.");

                // disable device
                pDevice->StopListen();

                // remove device from the device list
                mMidiInputDevices.erase(iter);

                // destroy and free device from memory
                delete pDevice;

                LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_count, MidiInputDevices()));
                break;
            }
        }
    }

    MidiInputDevice* Sampler::CreateMidiInputDevice(String MidiDriver, std::map<String,String> Parameters) throw (Exception) {
        // create new device
        MidiInputDevice* pDevice = MidiInputDeviceFactory::Create(MidiDriver, Parameters, this);

        // add new device to the midi device list
        for (uint i = 0; ; i++) { // seek for a free place starting from the beginning
                if (!mMidiInputDevices[i]) {
                        mMidiInputDevices[i] = pDevice;
                        break;
                }
        }

        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_count, MidiInputDevices()));
        return pDevice;
    }

    int Sampler::GetVoiceCount() {
        int count = 0;
        std::set<Engine*>::iterator it = EngineFactory::EngineInstances().begin();

        for(; it != EngineFactory::EngineInstances().end(); it++) {
            count += (*it)->VoiceCount();
        }

        return count;
    }

    void Sampler::Reset() {
        // delete sampler channels
        try {
            while (true) {
                    SamplerChannelMap::iterator iter = mSamplerChannels.begin();
                    if (iter == mSamplerChannels.end()) break;
                    RemoveSamplerChannel(iter->second);
            }
        }
        catch(...) {
            std::cerr << "Sampler::Reset(): Exception occured while trying to delete all sampler channels, exiting.\n" << std::flush;
            exit(EXIT_FAILURE);
        }

        // delete midi input devices
        try {
            while (true) {
                    MidiInputDeviceMap::iterator iter = mMidiInputDevices.begin();
                    if (iter == mMidiInputDevices.end()) break;
                    DestroyMidiInputDevice(iter->second);
            }
        }
        catch(...) {
            std::cerr << "Sampler::Reset(): Exception occured while trying to delete all MIDI input devices, exiting.\n" << std::flush;
            exit(EXIT_FAILURE);
        }

        // delete audio output devices
        try {
            while (true) {
                    AudioOutputDeviceMap::iterator iter = mAudioOutputDevices.begin();
                    if (iter == mAudioOutputDevices.end()) break;
                    DestroyAudioOutputDevice(iter->second);
            }
        }
        catch(...) {
            std::cerr << "Sampler::Reset(): Exception occured while trying to delete all audio output devices, exiting.\n" << std::flush;
            exit(EXIT_FAILURE);
        }

        // delete MIDI instrument maps
        try {
            MidiInstrumentMapper::RemoveAllMaps();
        }
        catch(...) {
            std::cerr << "Sampler::Reset(): Exception occured while trying to delete all MIDI instrument maps, exiting.\n" << std::flush;
            exit(EXIT_FAILURE);
        }
    }

} // namespace LinuxSampler
1	/***************************************************************************
2	* *
3	* LinuxSampler - modular, streaming capable sampler *
4	* *
5	* Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck *
6	* Copyright (C) 2005 - 2007 Christian Schoenebeck *
7	* *
8	* This library is free software; you can redistribute it and/or modify *
9	* it under the terms of the GNU General Public License as published by *
10	* the Free Software Foundation; either version 2 of the License, or *
11	* (at your option) any later version. *
12	* *
13	* This library is distributed in the hope that it will be useful, *
14	* but WITHOUT ANY WARRANTY; without even the implied warranty of *
15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
16	* GNU General Public License for more details. *
17	* *
18	* You should have received a copy of the GNU General Public License *
19	* along with this library; if not, write to the Free Software *
20	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
21	* MA 02111-1307 USA *
22	***************************************************************************/
23
24	#include <sstream>
25
26	#include "Sampler.h"
27
28	#include "engines/EngineFactory.h"
29	#include "engines/EngineChannelFactory.h"
30	#include "drivers/audio/AudioOutputDeviceFactory.h"
31	#include "drivers/midi/MidiInputDeviceFactory.h"
32	#include "drivers/midi/MidiInstrumentMapper.h"
33	#include "network/lscpserver.h"
34
35	namespace LinuxSampler {
36
37	// ******************************************************************
38	// * SamplerChannel
39
40	SamplerChannel::SamplerChannel(Sampler* pS) {
41	pSampler = pS;
42	pEngineChannel = NULL;
43	pAudioOutputDevice = NULL;
44	pMidiInputDevice = NULL;
45	iMidiPort = 0;
46	midiChannel = midi_chan_all;
47	iIndex = -1;
48	}
49
50	SamplerChannel::~SamplerChannel() {
51	if (pEngineChannel) {
52	Engine* engine = pEngineChannel->GetEngine();
53	if (pAudioOutputDevice) pAudioOutputDevice->Disconnect(engine);
54
55	MidiInputPort* pMidiInputPort = (pEngineChannel) ? pEngineChannel->GetMidiInputPort() : __GetMidiInputDevicePort(GetMidiInputChannel());
56	if (pMidiInputPort) pMidiInputPort->Disconnect(pEngineChannel);
57	if (pEngineChannel) {
58	if (pAudioOutputDevice) pEngineChannel->DisconnectAudioOutputDevice();
59	EngineChannelFactory::Destroy(pEngineChannel);
60
61	// reconnect engine if it still exists
62	const std::set<Engine*>& engines = EngineFactory::EngineInstances();
63	if (engines.find(engine) != engines.end()) pAudioOutputDevice->Connect(engine);
64	}
65	}
66	}
67
68	void SamplerChannel::SetEngineType(String EngineType) throw (Exception) {
69	dmsg(2,("SamplerChannel: Assigning engine type..."));
70
71	// create new engine channel
72	EngineChannel* pNewEngineChannel = EngineChannelFactory::Create(EngineType);
73	if (!pNewEngineChannel) throw Exception("Unknown engine type");
74
75	//FIXME: hack to allow fast retrieval of engine channel's sampler channel index
76	pNewEngineChannel->iSamplerChannelIndex = Index();
77
78	// dereference midi input port.
79	MidiInputPort* pMidiInputPort = __GetMidiInputDevicePort(GetMidiInputPort());
80	// disconnect old engine channel
81	if (pEngineChannel) {
82	Engine* engine = pEngineChannel->GetEngine();
83	if (pAudioOutputDevice) pAudioOutputDevice->Disconnect(engine);
84
85	if (pMidiInputPort) pMidiInputPort->Disconnect(pEngineChannel);
86	if (pAudioOutputDevice) pEngineChannel->DisconnectAudioOutputDevice();
87	EngineChannelFactory::Destroy(pEngineChannel);
88
89	// reconnect engine if it still exists
90	const std::set<Engine*>& engines = EngineFactory::EngineInstances();
91	if (engines.find(engine) != engines.end()) pAudioOutputDevice->Connect(engine);
92	}
93
94	// connect new engine channel
95	if (pAudioOutputDevice) {
96	pNewEngineChannel->Connect(pAudioOutputDevice);
97	pAudioOutputDevice->Connect(pNewEngineChannel->GetEngine());
98	}
99	if (pMidiInputPort) pMidiInputPort->Connect(pNewEngineChannel, GetMidiInputChannel());
100	pEngineChannel = pNewEngineChannel;
101
102	// from now on get MIDI device and port from EngineChannel object
103	this->pMidiInputDevice = NULL;
104	this->iMidiPort = 0;
105
106	pEngineChannel->StatusChanged(true);
107
108	dmsg(2,("OK\n"));
109	}
110
111	void SamplerChannel::SetAudioOutputDevice(AudioOutputDevice* pDevice) {
112	if(pAudioOutputDevice == pDevice) return;
113
114	// disconnect old device
115	if (pAudioOutputDevice && pEngineChannel) {
116	Engine* engine = pEngineChannel->GetEngine();
117	pAudioOutputDevice->Disconnect(engine);
118
119	pEngineChannel->DisconnectAudioOutputDevice();
120
121	// reconnect engine if it still exists
122	const std::set<Engine*>& engines = EngineFactory::EngineInstances();
123	if (engines.find(engine) != engines.end()) pAudioOutputDevice->Connect(engine);
124	}
125
126	// connect new device
127	pAudioOutputDevice = pDevice;
128	if (pEngineChannel) {
129	pEngineChannel->Connect(pAudioOutputDevice);
130	pAudioOutputDevice->Connect(pEngineChannel->GetEngine());
131	}
132	}
133
134	void SamplerChannel::SetMidiInputDevice(MidiInputDevice* pDevice) {
135	SetMidiInput(pDevice, 0, GetMidiInputChannel());
136	}
137
138	void SamplerChannel::SetMidiInputPort(int MidiPort) {
139	SetMidiInput(GetMidiInputDevice(), MidiPort, GetMidiInputChannel());
140	}
141
142	void SamplerChannel::SetMidiInputChannel(midi_chan_t MidiChannel) {
143	SetMidiInput(GetMidiInputDevice(), GetMidiInputPort(), MidiChannel);
144	}
145
146	void SamplerChannel::SetMidiInput(MidiInputDevice* pDevice, int iMidiPort, midi_chan_t MidiChannel) {
147	if (!pDevice) throw Exception("No MIDI input device assigned.");
148
149	// get old and new midi input port
150	MidiInputPort* pOldMidiInputPort = __GetMidiInputDevicePort(GetMidiInputPort());
151	MidiInputPort* pNewMidiInputPort = pDevice->GetPort(iMidiPort);
152
153	// disconnect old device port
154	if (pOldMidiInputPort && pEngineChannel) pOldMidiInputPort->Disconnect(pEngineChannel);
155	// remember new device, port and channel if not engine channel yet created
156	if (!pEngineChannel) {
157	this->pMidiInputDevice = pDevice;
158	this->iMidiPort = iMidiPort;
159	this->midiChannel = MidiChannel;
160	}
161
162	// connect new device port
163	if (pNewMidiInputPort && pEngineChannel) pNewMidiInputPort->Connect(pEngineChannel, MidiChannel);
164	// Ooops.
165	if (pNewMidiInputPort == NULL)
166	throw Exception("There is no MIDI input port with index " + ToString(iMidiPort) + ".");
167	}
168
169	EngineChannel* SamplerChannel::GetEngineChannel() {
170	return pEngineChannel;
171	}
172
173	midi_chan_t SamplerChannel::GetMidiInputChannel() {
174	if (pEngineChannel) this->midiChannel = pEngineChannel->MidiChannel();
175	return this->midiChannel;
176	}
177
178	int SamplerChannel::GetMidiInputPort() {
179	MidiInputPort* pMidiInputPort = (pEngineChannel) ? pEngineChannel->GetMidiInputPort() : NULL;
180	if (pMidiInputPort) this->iMidiPort = (int) pMidiInputPort->GetPortNumber();
181	return iMidiPort;
182	}
183
184	AudioOutputDevice* SamplerChannel::GetAudioOutputDevice() {
185	return pAudioOutputDevice;
186	}
187
188	MidiInputDevice* SamplerChannel::GetMidiInputDevice() {
189	if (pEngineChannel)
190	pMidiInputDevice = (pEngineChannel->GetMidiInputPort()) ? pEngineChannel->GetMidiInputPort()->GetDevice() : NULL;
191	return pMidiInputDevice;
192	}
193
194	uint SamplerChannel::Index() {
195	if (iIndex >= 0) return iIndex;
196
197	Sampler::SamplerChannelMap::iterator iter = pSampler->mSamplerChannels.begin();
198	for (; iter != pSampler->mSamplerChannels.end(); iter++) {
199	if (iter->second == this) {
200	iIndex = iter->first;
201	return iIndex;
202	}
203	}
204
205	throw Exception("Internal error: SamplerChannel index not found");
206	}
207
208	MidiInputPort* SamplerChannel::__GetMidiInputDevicePort(int iMidiPort) {
209	MidiInputPort* pMidiInputPort = NULL;
210	MidiInputDevice* pMidiInputDevice = GetMidiInputDevice();
211	if (pMidiInputDevice)
212	pMidiInputPort = pMidiInputDevice->GetPort(iMidiPort);
213	return pMidiInputPort;
214	}
215
216
217
218	// ******************************************************************
219	// * Sampler
220
221	Sampler::Sampler() {
222	}
223
224	Sampler::~Sampler() {
225	Reset();
226	}
227
228	uint Sampler::SamplerChannels() {
229	return mSamplerChannels.size();
230	}
231
232	SamplerChannel* Sampler::AddSamplerChannel() {
233	// if there's no sampler channel yet
234	if (!mSamplerChannels.size()) {
235	SamplerChannel* pChannel = new SamplerChannel(this);
236	mSamplerChannels[0] = pChannel;
237	LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, 1));
238	return pChannel;
239	}
240
241	// get the highest used sampler channel index
242	uint lastIndex = (--(mSamplerChannels.end()))->first;
243
244	// check if we reached the index limit
245	if (lastIndex + 1 < lastIndex) {
246	// search for an unoccupied sampler channel index starting from 0
247	for (uint i = 0; i < lastIndex; i++) {
248	if (mSamplerChannels.find(i) != mSamplerChannels.end()) continue;
249	// we found an unused index, so insert the new channel there
250	SamplerChannel* pChannel = new SamplerChannel(this);
251	mSamplerChannels[i] = pChannel;
252	LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, i));
253	return pChannel;
254	}
255	throw Exception("Internal error: could not find unoccupied sampler channel index.");
256	}
257
258	// we have not reached the index limit so we just add the channel past the highest index
259	SamplerChannel* pChannel = new SamplerChannel(this);
260	mSamplerChannels[lastIndex + 1] = pChannel;
261	LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, lastIndex + 1));
262	return pChannel;
263	}
264
265	SamplerChannel* Sampler::GetSamplerChannel(uint uiSamplerChannel) {
266	return (mSamplerChannels.find(uiSamplerChannel) != mSamplerChannels.end()) ? mSamplerChannels[uiSamplerChannel] : NULL;
267	}
268
269	std::map<uint, SamplerChannel*> Sampler::GetSamplerChannels() {
270	return mSamplerChannels;
271	}
272
273	void Sampler::RemoveSamplerChannel(SamplerChannel* pSamplerChannel) {
274	SamplerChannelMap::iterator iterChan = mSamplerChannels.begin();
275	for (; iterChan != mSamplerChannels.end(); iterChan++) {
276	if (iterChan->second == pSamplerChannel) {
277	mSamplerChannels.erase(iterChan);
278	delete pSamplerChannel;
279	LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, mSamplerChannels.size()));
280	return;
281	}
282	}
283	}
284
285	void Sampler::RemoveSamplerChannel(uint uiSamplerChannel) {
286	SamplerChannel* pChannel = GetSamplerChannel(uiSamplerChannel);
287	if (!pChannel) return;
288	RemoveSamplerChannel(pChannel);
289	}
290
291	std::vector<String> Sampler::AvailableAudioOutputDrivers() {
292	return AudioOutputDeviceFactory::AvailableDrivers();
293	}
294
295	std::vector<String> Sampler::AvailableMidiInputDrivers() {
296	return MidiInputDeviceFactory::AvailableDrivers();
297	}
298
299	std::vector<String> Sampler::AvailableEngineTypes() {
300	return EngineFactory::AvailableEngineTypes();
301	}
302
303	AudioOutputDevice* Sampler::CreateAudioOutputDevice(String AudioDriver, std::map<String,String> Parameters) throw (Exception) {
304	// create new device
305	AudioOutputDevice* pDevice = AudioOutputDeviceFactory::Create(AudioDriver, Parameters);
306
307	// add new audio device to the audio device list
308	for (uint i = 0; ; i++) { // seek for a free place starting from the beginning
309	if (!mAudioOutputDevices[i]) {
310	mAudioOutputDevices[i] = pDevice;
311	break;
312	}
313	}
314
315	LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_count, AudioOutputDevices()));
316	return pDevice;
317	}
318
319	uint Sampler::AudioOutputDevices() {
320	return mAudioOutputDevices.size();
321	}
322
323	uint Sampler::MidiInputDevices() {
324	return mMidiInputDevices.size();
325	}
326
327	std::map<uint, AudioOutputDevice*> Sampler::GetAudioOutputDevices() {
328	return mAudioOutputDevices;
329	}
330
331	std::map<uint, MidiInputDevice*> Sampler::GetMidiInputDevices() {
332	return mMidiInputDevices;
333	}
334
335	void Sampler::DestroyAudioOutputDevice(AudioOutputDevice* pDevice) throw (Exception) {
336	AudioOutputDeviceMap::iterator iter = mAudioOutputDevices.begin();
337	for (; iter != mAudioOutputDevices.end(); iter++) {
338	if (iter->second == pDevice) {
339	// check if there are still sampler engines connected to this device
340	for (uint i = 0; i < SamplerChannels(); i++)
341	if (GetSamplerChannel(i)->GetAudioOutputDevice() == pDevice) throw Exception("Sampler channel " + ToString(i) + " is still connected to the audio output device.");
342
343	// disable device
344	pDevice->Stop();
345
346	// remove device from the device list
347	mAudioOutputDevices.erase(iter);
348
349	// destroy and free device from memory
350	delete pDevice;
351
352	LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_count, AudioOutputDevices()));
353	break;
354	}
355	}
356	}
357
358	void Sampler::DestroyMidiInputDevice(MidiInputDevice* pDevice) throw (Exception) {
359	MidiInputDeviceMap::iterator iter = mMidiInputDevices.begin();
360	for (; iter != mMidiInputDevices.end(); iter++) {
361	if (iter->second == pDevice) {
362	// check if there are still sampler engines connected to this device
363	for (uint i = 0; i < SamplerChannels(); i++)
364	if (GetSamplerChannel(i)->GetMidiInputDevice() == pDevice) throw Exception("Sampler channel " + ToString(i) + " is still connected to the midi input device.");
365
366	// disable device
367	pDevice->StopListen();
368
369	// remove device from the device list
370	mMidiInputDevices.erase(iter);
371
372	// destroy and free device from memory
373	delete pDevice;
374
375	LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_count, MidiInputDevices()));
376	break;
377	}
378	}
379	}
380
381	MidiInputDevice* Sampler::CreateMidiInputDevice(String MidiDriver, std::map<String,String> Parameters) throw (Exception) {
382	// create new device
383	MidiInputDevice* pDevice = MidiInputDeviceFactory::Create(MidiDriver, Parameters, this);
384
385	// add new device to the midi device list
386	for (uint i = 0; ; i++) { // seek for a free place starting from the beginning
387	if (!mMidiInputDevices[i]) {
388	mMidiInputDevices[i] = pDevice;
389	break;
390	}
391	}
392
393	LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_count, MidiInputDevices()));
394	return pDevice;
395	}
396
397	int Sampler::GetVoiceCount() {
398	int count = 0;
399	std::set<Engine*>::iterator it = EngineFactory::EngineInstances().begin();
400
401	for(; it != EngineFactory::EngineInstances().end(); it++) {
402	count += (*it)->VoiceCount();
403	}
404
405	return count;
406	}
407
408	void Sampler::Reset() {
409	// delete sampler channels
410	try {
411	while (true) {
412	SamplerChannelMap::iterator iter = mSamplerChannels.begin();
413	if (iter == mSamplerChannels.end()) break;
414	RemoveSamplerChannel(iter->second);
415	}
416	}
417	catch(...) {
418	std::cerr << "Sampler::Reset(): Exception occured while trying to delete all sampler channels, exiting.\n" << std::flush;
419	exit(EXIT_FAILURE);
420	}
421
422	// delete midi input devices
423	try {
424	while (true) {
425	MidiInputDeviceMap::iterator iter = mMidiInputDevices.begin();
426	if (iter == mMidiInputDevices.end()) break;
427	DestroyMidiInputDevice(iter->second);
428	}
429	}
430	catch(...) {
431	std::cerr << "Sampler::Reset(): Exception occured while trying to delete all MIDI input devices, exiting.\n" << std::flush;
432	exit(EXIT_FAILURE);
433	}
434
435	// delete audio output devices
436	try {
437	while (true) {
438	AudioOutputDeviceMap::iterator iter = mAudioOutputDevices.begin();
439	if (iter == mAudioOutputDevices.end()) break;
440	DestroyAudioOutputDevice(iter->second);
441	}
442	}
443	catch(...) {
444	std::cerr << "Sampler::Reset(): Exception occured while trying to delete all audio output devices, exiting.\n" << std::flush;
445	exit(EXIT_FAILURE);
446	}
447
448	// delete MIDI instrument maps
449	try {
450	MidiInstrumentMapper::RemoveAllMaps();
451	}
452	catch(...) {
453	std::cerr << "Sampler::Reset(): Exception occured while trying to delete all MIDI instrument maps, exiting.\n" << std::flush;
454	exit(EXIT_FAILURE);
455	}
456	}
457
458	} // namespace LinuxSampler