/[svn]/linuxsampler/trunk/src/network/lscpserver.cpp
ViewVC logotype

Diff of /linuxsampler/trunk/src/network/lscpserver.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 68 by senkov, Sat May 8 19:03:17 2004 UTC revision 2138 by schoenebeck, Mon Oct 4 22:11:53 2010 UTC
# Line 3  Line 3 
3   *   LinuxSampler - modular, streaming capable sampler                     *   *   LinuxSampler - modular, streaming capable sampler                     *
4   *                                                                         *   *                                                                         *
5   *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *   *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *
6     *   Copyright (C) 2005 - 2010 Christian Schoenebeck                       *
7   *                                                                         *   *                                                                         *
8   *   This program is free software; you can redistribute it and/or modify  *   *   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  *   *   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     *   *   the Free Software Foundation; either version 2 of the License, or     *
11   *   (at your option) any later version.                                   *   *   (at your option) any later version.                                   *
12   *                                                                         *   *                                                                         *
13   *   This program is distributed in the hope that it will be useful,       *   *   This library is distributed in the hope that it will be useful,       *
14   *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *   *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
15   *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *   *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
16   *   GNU General Public License for more details.                          *   *   GNU General Public License for more details.                          *
17   *                                                                         *   *                                                                         *
18   *   You should have received a copy of the GNU General Public License     *   *   You should have received a copy of the GNU General Public License     *
19   *   along with this program; if not, write to the Free Software           *   *   along with this library; if not, write to the Free Software           *
20   *   Foundation, Inc., 59 Temple Place, Suite 330, Boston,                 *   *   Foundation, Inc., 59 Temple Place, Suite 330, Boston,                 *
21   *   MA  02111-1307  USA                                                   *   *   MA  02111-1307  USA                                                   *
22   ***************************************************************************/   ***************************************************************************/
23    
24    #include <algorithm>
25    #include <string>
26    
27    #include "../common/File.h"
28  #include "lscpserver.h"  #include "lscpserver.h"
29    #include "lscpresultset.h"
30    #include "lscpevent.h"
31    
32    #if defined(WIN32)
33    #include <windows.h>
34    #else
35    #include <fcntl.h>
36    #endif
37    
38    #if ! HAVE_SQLITE3
39    #define DOESNT_HAVE_SQLITE3 "No database support. SQLITE3 was not installed when linuxsampler was built."
40    #endif
41    
42    #include "../engines/EngineFactory.h"
43    #include "../engines/EngineChannelFactory.h"
44    #include "../drivers/audio/AudioOutputDeviceFactory.h"
45    #include "../drivers/midi/MidiInputDeviceFactory.h"
46    #include "../effects/EffectFactory.h"
47    
48    namespace LinuxSampler {
49    
50  #include "../engines/gig/Engine.h"  /**
51     * Returns a copy of the given string where all special characters are
52     * replaced by LSCP escape sequences ("\xHH"). This function shall be used
53     * to escape LSCP response fields in case the respective response field is
54     * actually defined as using escape sequences in the LSCP specs.
55     *
56     * @e Caution: DO NOT use this function for escaping path based responses,
57     * use the Path class (src/common/Path.h) for this instead!
58     */
59    static String _escapeLscpResponse(String txt) {
60        for (int i = 0; i < txt.length(); i++) {
61            const char c = txt.c_str()[i];
62            if (
63                !(c >= '0' && c <= '9') &&
64                !(c >= 'a' && c <= 'z') &&
65                !(c >= 'A' && c <= 'Z') &&
66                !(c == ' ') && !(c == '!') && !(c == '#') && !(c == '$') &&
67                !(c == '%') && !(c == '&') && !(c == '(') && !(c == ')') &&
68                !(c == '*') && !(c == '+') && !(c == ',') && !(c == '-') &&
69                !(c == '.') && !(c == '/') && !(c == ':') && !(c == ';') &&
70                !(c == '<') && !(c == '=') && !(c == '>') && !(c == '?') &&
71                !(c == '@') && !(c == '[') && !(c == ']') &&
72                !(c == '^') && !(c == '_') && !(c == '`') && !(c == '{') &&
73                !(c == '|') && !(c == '}') && !(c == '~')
74            ) {
75                // convert the "special" character into a "\xHH" LSCP escape sequence
76                char buf[5];
77                snprintf(buf, sizeof(buf), "\\x%02x", static_cast<unsigned char>(c));
78                txt.replace(i, 1, buf);
79                i += 3;
80            }
81        }
82        return txt;
83    }
84    
85    /**
86     * Below are a few static members of the LSCPServer class.
87     * The big assumption here is that LSCPServer is going to remain a singleton.
88     * These members are used to support client connections.
89     * Class handles multiple connections at the same time using select() and non-blocking recv()
90     * Commands are processed by a single LSCPServer thread.
91     * Notifications are delivered either by the thread that originated them
92     * or (if the resultset is currently in progress) by the LSCPServer thread
93     * after the resultset was sent out.
94     * This makes sure that resultsets can not be interrupted by notifications.
95     * This also makes sure that the thread sending notification is not blocked
96     * by the LSCPServer thread.
97     */
98    fd_set LSCPServer::fdSet;
99    int LSCPServer::currentSocket = -1;
100    std::vector<yyparse_param_t> LSCPServer::Sessions = std::vector<yyparse_param_t>();
101    std::vector<yyparse_param_t>::iterator itCurrentSession = std::vector<yyparse_param_t>::iterator();
102    std::map<int,String> LSCPServer::bufferedNotifies = std::map<int,String>();
103    std::map<int,String> LSCPServer::bufferedCommands = std::map<int,String>();
104    std::map< LSCPEvent::event_t, std::list<int> > LSCPServer::eventSubscriptions = std::map< LSCPEvent::event_t, std::list<int> >();
105    Mutex LSCPServer::NotifyMutex = Mutex();
106    Mutex LSCPServer::NotifyBufferMutex = Mutex();
107    Mutex LSCPServer::SubscriptionMutex = Mutex();
108    Mutex LSCPServer::RTNotifyMutex = Mutex();
109    
110  LSCPServer::LSCPServer(Sampler* pSampler) : Thread(false, 0, -4) {  LSCPServer::LSCPServer(Sampler* pSampler, long int addr, short int port) : Thread(true, false, 0, -4), eventHandler(this) {
111        SocketAddress.sin_family      = AF_INET;
112        SocketAddress.sin_addr.s_addr = addr;
113        SocketAddress.sin_port        = port;
114      this->pSampler = pSampler;      this->pSampler = pSampler;
115        LSCPEvent::RegisterEvent(LSCPEvent::event_audio_device_count, "AUDIO_OUTPUT_DEVICE_COUNT");
116        LSCPEvent::RegisterEvent(LSCPEvent::event_audio_device_info, "AUDIO_OUTPUT_DEVICE_INFO");
117        LSCPEvent::RegisterEvent(LSCPEvent::event_midi_device_count, "MIDI_INPUT_DEVICE_COUNT");
118        LSCPEvent::RegisterEvent(LSCPEvent::event_midi_device_info, "MIDI_INPUT_DEVICE_INFO");
119        LSCPEvent::RegisterEvent(LSCPEvent::event_channel_count, "CHANNEL_COUNT");
120        LSCPEvent::RegisterEvent(LSCPEvent::event_voice_count, "VOICE_COUNT");
121        LSCPEvent::RegisterEvent(LSCPEvent::event_stream_count, "STREAM_COUNT");
122        LSCPEvent::RegisterEvent(LSCPEvent::event_buffer_fill, "BUFFER_FILL");
123        LSCPEvent::RegisterEvent(LSCPEvent::event_channel_info, "CHANNEL_INFO");
124        LSCPEvent::RegisterEvent(LSCPEvent::event_fx_send_count, "FX_SEND_COUNT");
125        LSCPEvent::RegisterEvent(LSCPEvent::event_fx_send_info, "FX_SEND_INFO");
126        LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_map_count, "MIDI_INSTRUMENT_MAP_COUNT");
127        LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_map_info, "MIDI_INSTRUMENT_MAP_INFO");
128        LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_count, "MIDI_INSTRUMENT_COUNT");
129        LSCPEvent::RegisterEvent(LSCPEvent::event_midi_instr_info, "MIDI_INSTRUMENT_INFO");
130        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_dir_count, "DB_INSTRUMENT_DIRECTORY_COUNT");
131        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_dir_info, "DB_INSTRUMENT_DIRECTORY_INFO");
132        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_count, "DB_INSTRUMENT_COUNT");
133        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instr_info, "DB_INSTRUMENT_INFO");
134        LSCPEvent::RegisterEvent(LSCPEvent::event_db_instrs_job_info, "DB_INSTRUMENTS_JOB_INFO");
135        LSCPEvent::RegisterEvent(LSCPEvent::event_misc, "MISCELLANEOUS");
136        LSCPEvent::RegisterEvent(LSCPEvent::event_total_stream_count, "TOTAL_STREAM_COUNT");
137        LSCPEvent::RegisterEvent(LSCPEvent::event_total_voice_count, "TOTAL_VOICE_COUNT");
138        LSCPEvent::RegisterEvent(LSCPEvent::event_global_info, "GLOBAL_INFO");
139        LSCPEvent::RegisterEvent(LSCPEvent::event_channel_midi, "CHANNEL_MIDI");
140        LSCPEvent::RegisterEvent(LSCPEvent::event_device_midi, "DEVICE_MIDI");
141        hSocket = -1;
142    }
143    
144    LSCPServer::~LSCPServer() {
145        CloseAllConnections();
146        InstrumentManager::StopBackgroundThread();
147    #if defined(WIN32)
148        if (hSocket >= 0) closesocket(hSocket);
149    #else
150        if (hSocket >= 0) close(hSocket);
151    #endif
152    }
153    
154    LSCPServer::EventHandler::EventHandler(LSCPServer* pParent) {
155        this->pParent = pParent;
156    }
157    
158    LSCPServer::EventHandler::~EventHandler() {
159        std::vector<midi_listener_entry> l = channelMidiListeners;
160        channelMidiListeners.clear();
161        for (int i = 0; i < l.size(); i++)
162            delete l[i].pMidiListener;
163    }
164    
165    void LSCPServer::EventHandler::ChannelCountChanged(int NewCount) {
166        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_count, NewCount));
167    }
168    
169    void LSCPServer::EventHandler::ChannelAdded(SamplerChannel* pChannel) {
170        pChannel->AddEngineChangeListener(this);
171    }
172    
173    void LSCPServer::EventHandler::ChannelToBeRemoved(SamplerChannel* pChannel) {
174        if (!pChannel->GetEngineChannel()) return;
175        EngineToBeChanged(pChannel->Index());
176    }
177    
178    void LSCPServer::EventHandler::EngineToBeChanged(int ChannelId) {
179        SamplerChannel* pSamplerChannel =
180            pParent->pSampler->GetSamplerChannel(ChannelId);
181        if (!pSamplerChannel) return;
182        EngineChannel* pEngineChannel =
183            pSamplerChannel->GetEngineChannel();
184        if (!pEngineChannel) return;
185        for (std::vector<midi_listener_entry>::iterator iter = channelMidiListeners.begin(); iter != channelMidiListeners.end(); ++iter) {
186            if ((*iter).pEngineChannel == pEngineChannel) {
187                VirtualMidiDevice* pMidiListener = (*iter).pMidiListener;
188                pEngineChannel->Disconnect(pMidiListener);
189                channelMidiListeners.erase(iter);
190                delete pMidiListener;
191                return;
192            }
193        }
194    }
195    
196    void LSCPServer::EventHandler::EngineChanged(int ChannelId) {
197        SamplerChannel* pSamplerChannel =
198            pParent->pSampler->GetSamplerChannel(ChannelId);
199        if (!pSamplerChannel) return;
200        EngineChannel* pEngineChannel =
201            pSamplerChannel->GetEngineChannel();
202        if (!pEngineChannel) return;
203        VirtualMidiDevice* pMidiListener = new VirtualMidiDevice;
204        pEngineChannel->Connect(pMidiListener);
205        midi_listener_entry entry = {
206            pSamplerChannel, pEngineChannel, pMidiListener
207        };
208        channelMidiListeners.push_back(entry);
209    }
210    
211    void LSCPServer::EventHandler::AudioDeviceCountChanged(int NewCount) {
212        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_count, NewCount));
213    }
214    
215    void LSCPServer::EventHandler::MidiDeviceCountChanged(int NewCount) {
216        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_count, NewCount));
217    }
218    
219    void LSCPServer::EventHandler::MidiDeviceToBeDestroyed(MidiInputDevice* pDevice) {
220        pDevice->RemoveMidiPortCountListener(this);
221        for (int i = 0; i < pDevice->PortCount(); ++i)
222            MidiPortToBeRemoved(pDevice->GetPort(i));
223    }
224    
225    void LSCPServer::EventHandler::MidiDeviceCreated(MidiInputDevice* pDevice) {
226        pDevice->AddMidiPortCountListener(this);
227        for (int i = 0; i < pDevice->PortCount(); ++i)
228            MidiPortAdded(pDevice->GetPort(i));
229    }
230    
231    void LSCPServer::EventHandler::MidiPortCountChanged(int NewCount) {
232        // yet unused
233    }
234    
235    void LSCPServer::EventHandler::MidiPortToBeRemoved(MidiInputPort* pPort) {
236        for (std::vector<device_midi_listener_entry>::iterator iter = deviceMidiListeners.begin(); iter != deviceMidiListeners.end(); ++iter) {
237            if ((*iter).pPort == pPort) {
238                VirtualMidiDevice* pMidiListener = (*iter).pMidiListener;
239                pPort->Disconnect(pMidiListener);
240                deviceMidiListeners.erase(iter);
241                delete pMidiListener;
242                return;
243            }
244        }
245    }
246    
247    void LSCPServer::EventHandler::MidiPortAdded(MidiInputPort* pPort) {
248        // find out the device ID
249        std::map<uint, MidiInputDevice*> devices =
250            pParent->pSampler->GetMidiInputDevices();
251        for (
252            std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
253            iter != devices.end(); ++iter
254        ) {
255            if (iter->second == pPort->GetDevice()) { // found
256                VirtualMidiDevice* pMidiListener = new VirtualMidiDevice;
257                pPort->Connect(pMidiListener);
258                device_midi_listener_entry entry = {
259                    pPort, pMidiListener, iter->first
260                };
261                deviceMidiListeners.push_back(entry);
262                return;
263            }
264        }
265    }
266    
267    void LSCPServer::EventHandler::MidiInstrumentCountChanged(int MapId, int NewCount) {
268        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_count, MapId, NewCount));
269    }
270    
271    void LSCPServer::EventHandler::MidiInstrumentInfoChanged(int MapId, int Bank, int Program) {
272        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_info, MapId, Bank, Program));
273    }
274    
275    void LSCPServer::EventHandler::MidiInstrumentMapCountChanged(int NewCount) {
276        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_map_count, NewCount));
277    }
278    
279    void LSCPServer::EventHandler::MidiInstrumentMapInfoChanged(int MapId) {
280        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_instr_map_info, MapId));
281    }
282    
283    void LSCPServer::EventHandler::FxSendCountChanged(int ChannelId, int NewCount) {
284        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_count, ChannelId, NewCount));
285    }
286    
287    void LSCPServer::EventHandler::VoiceCountChanged(int ChannelId, int NewCount) {
288        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_voice_count, ChannelId, NewCount));
289    }
290    
291    void LSCPServer::EventHandler::StreamCountChanged(int ChannelId, int NewCount) {
292        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_stream_count, ChannelId, NewCount));
293    }
294    
295    void LSCPServer::EventHandler::BufferFillChanged(int ChannelId, String FillData) {
296        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_buffer_fill, ChannelId, FillData));
297    }
298    
299    void LSCPServer::EventHandler::TotalVoiceCountChanged(int NewCount) {
300        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_total_voice_count, NewCount));
301    }
302    
303    void LSCPServer::EventHandler::TotalStreamCountChanged(int NewCount) {
304        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_total_stream_count, NewCount));
305    }
306    
307    #if HAVE_SQLITE3
308    void LSCPServer::DbInstrumentsEventHandler::DirectoryCountChanged(String Dir) {
309        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_dir_count, InstrumentsDb::toEscapedPath(Dir)));
310    }
311    
312    void LSCPServer::DbInstrumentsEventHandler::DirectoryInfoChanged(String Dir) {
313        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_dir_info, InstrumentsDb::toEscapedPath(Dir)));
314    }
315    
316    void LSCPServer::DbInstrumentsEventHandler::DirectoryNameChanged(String Dir, String NewName) {
317        Dir = "'" + InstrumentsDb::toEscapedPath(Dir) + "'";
318        NewName = "'" + InstrumentsDb::toEscapedPath(NewName) + "'";
319        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_dir_info, "NAME", Dir, NewName));
320    }
321    
322    void LSCPServer::DbInstrumentsEventHandler::InstrumentCountChanged(String Dir) {
323        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_count, InstrumentsDb::toEscapedPath(Dir)));
324    }
325    
326    void LSCPServer::DbInstrumentsEventHandler::InstrumentInfoChanged(String Instr) {
327        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_info, InstrumentsDb::toEscapedPath(Instr)));
328    }
329    
330    void LSCPServer::DbInstrumentsEventHandler::InstrumentNameChanged(String Instr, String NewName) {
331        Instr = "'" + InstrumentsDb::toEscapedPath(Instr) + "'";
332        NewName = "'" + InstrumentsDb::toEscapedPath(NewName) + "'";
333        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instr_info, "NAME", Instr, NewName));
334    }
335    
336    void LSCPServer::DbInstrumentsEventHandler::JobStatusChanged(int JobId) {
337        LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_db_instrs_job_info, JobId));
338    }
339    #endif // HAVE_SQLITE3
340    
341    void LSCPServer::RemoveListeners() {
342        pSampler->RemoveChannelCountListener(&eventHandler);
343        pSampler->RemoveAudioDeviceCountListener(&eventHandler);
344        pSampler->RemoveMidiDeviceCountListener(&eventHandler);
345        pSampler->RemoveVoiceCountListener(&eventHandler);
346        pSampler->RemoveStreamCountListener(&eventHandler);
347        pSampler->RemoveBufferFillListener(&eventHandler);
348        pSampler->RemoveTotalStreamCountListener(&eventHandler);
349        pSampler->RemoveTotalVoiceCountListener(&eventHandler);
350        pSampler->RemoveFxSendCountListener(&eventHandler);
351        MidiInstrumentMapper::RemoveMidiInstrumentCountListener(&eventHandler);
352        MidiInstrumentMapper::RemoveMidiInstrumentInfoListener(&eventHandler);
353        MidiInstrumentMapper::RemoveMidiInstrumentMapCountListener(&eventHandler);
354        MidiInstrumentMapper::RemoveMidiInstrumentMapInfoListener(&eventHandler);
355    #if HAVE_SQLITE3
356        InstrumentsDb::GetInstrumentsDb()->RemoveInstrumentsDbListener(&dbInstrumentsEventHandler);
357    #endif
358    }
359    
360    /**
361     * Blocks the calling thread until the LSCP Server is initialized and
362     * accepting socket connections, if the server is already initialized then
363     * this method will return immediately.
364     * @param TimeoutSeconds     - optional: max. wait time in seconds
365     *                             (default: 0s)
366     * @param TimeoutNanoSeconds - optional: max wait time in nano seconds
367     *                             (default: 0ns)
368     * @returns  0 on success, a value less than 0 if timeout exceeded
369     */
370    int LSCPServer::WaitUntilInitialized(long TimeoutSeconds, long TimeoutNanoSeconds) {
371        return Initialized.WaitAndUnlockIf(false, TimeoutSeconds, TimeoutNanoSeconds);
372  }  }
373    
374  int LSCPServer::Main() {  int LSCPServer::Main() {
375            #if defined(WIN32)
376            WSADATA wsaData;
377            int iResult;
378            iResult = WSAStartup(MAKEWORD(2,2), &wsaData);
379            if (iResult != 0) {
380                    std::cerr << "LSCPServer: WSAStartup failed: " << iResult << "\n";
381                    exit(EXIT_FAILURE);
382            }
383            #endif
384      hSocket = socket(AF_INET, SOCK_STREAM, 0);      hSocket = socket(AF_INET, SOCK_STREAM, 0);
385      if (hSocket < 0) {      if (hSocket < 0) {
386          std::cerr << "LSCPServer: Could not create server socket." << std::endl;          std::cerr << "LSCPServer: Could not create server socket." << std::endl;
# Line 36  int LSCPServer::Main() { Line 388  int LSCPServer::Main() {
388          exit(EXIT_FAILURE);          exit(EXIT_FAILURE);
389      }      }
390    
     SocketAddress.sin_family      = AF_INET;  
     SocketAddress.sin_port        = htons(LSCP_PORT);  
     SocketAddress.sin_addr.s_addr = htonl(INADDR_ANY);  
   
391      if (bind(hSocket, (sockaddr*) &SocketAddress, sizeof(sockaddr_in)) < 0) {      if (bind(hSocket, (sockaddr*) &SocketAddress, sizeof(sockaddr_in)) < 0) {
392          std::cerr << "LSCPServer: Could not bind server socket." << std::endl;          std::cerr << "LSCPServer: Could not bind server socket, retrying for " << ToString(LSCP_SERVER_BIND_TIMEOUT) << " seconds...";
393          close(hSocket);          for (int trial = 0; true; trial++) { // retry for LSCP_SERVER_BIND_TIMEOUT seconds
394          //return -1;              if (bind(hSocket, (sockaddr*) &SocketAddress, sizeof(sockaddr_in)) < 0) {
395          exit(EXIT_FAILURE);                  if (trial > LSCP_SERVER_BIND_TIMEOUT) {
396                        std::cerr << "gave up!" << std::endl;
397                        #if defined(WIN32)
398                        closesocket(hSocket);
399                        #else
400                        close(hSocket);
401                        #endif
402                        //return -1;
403                        exit(EXIT_FAILURE);
404                    }
405                    else sleep(1); // sleep 1s
406                }
407                else break; // success
408            }
409      }      }
410    
411      listen(hSocket, 1);      listen(hSocket, 1);
412      dmsg(1,("LSCPServer: Server running.\n")); // server running      Initialized.Set(true);
413    
414        // Registering event listeners
415        pSampler->AddChannelCountListener(&eventHandler);
416        pSampler->AddAudioDeviceCountListener(&eventHandler);
417        pSampler->AddMidiDeviceCountListener(&eventHandler);
418        pSampler->AddVoiceCountListener(&eventHandler);
419        pSampler->AddStreamCountListener(&eventHandler);
420        pSampler->AddBufferFillListener(&eventHandler);
421        pSampler->AddTotalStreamCountListener(&eventHandler);
422        pSampler->AddTotalVoiceCountListener(&eventHandler);
423        pSampler->AddFxSendCountListener(&eventHandler);
424        MidiInstrumentMapper::AddMidiInstrumentCountListener(&eventHandler);
425        MidiInstrumentMapper::AddMidiInstrumentInfoListener(&eventHandler);
426        MidiInstrumentMapper::AddMidiInstrumentMapCountListener(&eventHandler);
427        MidiInstrumentMapper::AddMidiInstrumentMapInfoListener(&eventHandler);
428    #if HAVE_SQLITE3
429        InstrumentsDb::GetInstrumentsDb()->AddInstrumentsDbListener(&dbInstrumentsEventHandler);
430    #endif
431      // now wait for client connections and handle their requests      // now wait for client connections and handle their requests
432      sockaddr_in client;      sockaddr_in client;
433      int length = sizeof(client);      int length = sizeof(client);
434        FD_ZERO(&fdSet);
435        FD_SET(hSocket, &fdSet);
436        int maxSessions = hSocket;
437    
438        timeval timeout;
439    
440      while (true) {      while (true) {
441          hSession = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length);          #if CONFIG_PTHREAD_TESTCANCEL
442          if (hSession < 0) {                  TestCancel();
443              std::cerr << "LSCPServer: Client connection failed." << std::endl;          #endif
444              close(hSocket);          // check if some engine channel's parameter / status changed, if so notify the respective LSCP event subscribers
445              //return -1;          {
446              exit(EXIT_FAILURE);              std::set<EngineChannel*> engineChannels = EngineChannelFactory::EngineChannelInstances();
447          }              std::set<EngineChannel*>::iterator itEngineChannel = engineChannels.begin();
448                std::set<EngineChannel*>::iterator itEnd           = engineChannels.end();
449          dmsg(1,("LSCPServer: Client connection established.\n"));              for (; itEngineChannel != itEnd; ++itEngineChannel) {
450          //send(hSession, "Welcome!\r\n", 10, 0);                  if ((*itEngineChannel)->StatusChanged()) {
451                        SendLSCPNotify(LSCPEvent(LSCPEvent::event_channel_info, (*itEngineChannel)->GetSamplerChannel()->Index()));
452          // Parser invocation                  }
453          yyparse_param_t yyparse_param;  
454          yyparse_param.pServer = this;                  for (int i = 0; i < (*itEngineChannel)->GetFxSendCount(); i++) {
455          yylex_init(&yyparse_param.pScanner);                      FxSend* fxs = (*itEngineChannel)->GetFxSend(i);
456          while (yyparse(&yyparse_param) == LSCP_SYNTAX_ERROR); // recall parser in case of syntax error                      if(fxs != NULL && fxs->IsInfoChanged()) {
457          yylex_destroy(yyparse_param.pScanner);                          int chn = (*itEngineChannel)->GetSamplerChannel()->Index();
458                            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, chn, fxs->Id()));
459                            fxs->SetInfoChanged(false);
460                        }
461                    }
462                }
463            }
464    
465          close(hSession);          // check if MIDI data arrived on some engine channel
466          dmsg(1,("LSCPServer: Client connection terminated.\n"));          for (int i = 0; i < eventHandler.channelMidiListeners.size(); ++i) {
467      }              const EventHandler::midi_listener_entry entry =
468                    eventHandler.channelMidiListeners[i];
469                VirtualMidiDevice* pMidiListener = entry.pMidiListener;
470                if (pMidiListener->NotesChanged()) {
471                    for (int iNote = 0; iNote < 128; iNote++) {
472                        if (pMidiListener->NoteChanged(iNote)) {
473                            const bool bActive = pMidiListener->NoteIsActive(iNote);
474                            LSCPServer::SendLSCPNotify(
475                                LSCPEvent(
476                                    LSCPEvent::event_channel_midi,
477                                    entry.pSamplerChannel->Index(),
478                                    std::string(bActive ? "NOTE_ON" : "NOTE_OFF"),
479                                    iNote,
480                                    bActive ? pMidiListener->NoteOnVelocity(iNote)
481                                            : pMidiListener->NoteOffVelocity(iNote)
482                                )
483                            );
484                        }
485                    }
486                }
487            }
488    
489            // check if MIDI data arrived on some MIDI device
490            for (int i = 0; i < eventHandler.deviceMidiListeners.size(); ++i) {
491                const EventHandler::device_midi_listener_entry entry =
492                    eventHandler.deviceMidiListeners[i];
493                VirtualMidiDevice* pMidiListener = entry.pMidiListener;
494                if (pMidiListener->NotesChanged()) {
495                    for (int iNote = 0; iNote < 128; iNote++) {
496                        if (pMidiListener->NoteChanged(iNote)) {
497                            const bool bActive = pMidiListener->NoteIsActive(iNote);
498                            LSCPServer::SendLSCPNotify(
499                                LSCPEvent(
500                                    LSCPEvent::event_device_midi,
501                                    entry.uiDeviceID,
502                                    entry.pPort->GetPortNumber(),
503                                    std::string(bActive ? "NOTE_ON" : "NOTE_OFF"),
504                                    iNote,
505                                    bActive ? pMidiListener->NoteOnVelocity(iNote)
506                                            : pMidiListener->NoteOffVelocity(iNote)
507                                )
508                            );
509                        }
510                    }
511                }
512            }
513    
514            //Now let's deliver late notifies (if any)
515            NotifyBufferMutex.Lock();
516            for (std::map<int,String>::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) {
517    #ifdef MSG_NOSIGNAL
518                    send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), MSG_NOSIGNAL);
519    #else
520                    send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0);
521    #endif
522            }
523            bufferedNotifies.clear();
524            NotifyBufferMutex.Unlock();
525    
526            fd_set selectSet = fdSet;
527            timeout.tv_sec  = 0;
528            timeout.tv_usec = 100000;
529    
530            int retval = select(maxSessions+1, &selectSet, NULL, NULL, &timeout);
531    
532            if (retval == 0 || (retval == -1 && errno == EINTR))
533                    continue; //Nothing try again
534            if (retval == -1) {
535                    std::cerr << "LSCPServer: Socket select error." << std::endl;
536                    #if defined(WIN32)
537                    closesocket(hSocket);
538                    #else
539                    close(hSocket);
540                    #endif
541                    exit(EXIT_FAILURE);
542            }
543    
544            //Accept new connections now (if any)
545            if (FD_ISSET(hSocket, &selectSet)) {
546                    int socket = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length);
547                    if (socket < 0) {
548                            std::cerr << "LSCPServer: Client connection failed." << std::endl;
549                            exit(EXIT_FAILURE);
550                    }
551    
552                    #if defined(WIN32)
553                    u_long nonblock_io = 1;
554                    if( ioctlsocket(socket, FIONBIO, &nonblock_io) ) {
555                      std::cerr << "LSCPServer: ioctlsocket: set FIONBIO failed. Error " << WSAGetLastError() << std::endl;
556                      exit(EXIT_FAILURE);
557                    }
558            #else
559                    struct linger linger;
560                    linger.l_onoff = 1;
561                    linger.l_linger = 0;
562                    if(setsockopt(socket, SOL_SOCKET, SO_LINGER, &linger, sizeof(linger))) {
563                        std::cerr << "LSCPServer: Failed to set SO_LINGER\n";
564                    }
565    
566                    if (fcntl(socket, F_SETFL, O_NONBLOCK)) {
567                            std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;
568                            exit(EXIT_FAILURE);
569                    }
570                    #endif
571    
572                    // Parser initialization
573                    yyparse_param_t yyparse_param;
574                    yyparse_param.pServer  = this;
575                    yyparse_param.hSession = socket;
576    
577                    Sessions.push_back(yyparse_param);
578                    FD_SET(socket, &fdSet);
579                    if (socket > maxSessions)
580                            maxSessions = socket;
581                    dmsg(1,("LSCPServer: Client connection established on socket:%d.\n", socket));
582                    LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection established on socket", socket));
583                    continue; //Maybe this was the only selected socket, better select again
584            }
585    
586            //Something was selected and it was not the hSocket, so it must be some command(s) coming.
587            for (std::vector<yyparse_param_t>::iterator iter = Sessions.begin(); iter != Sessions.end(); iter++) {
588                    if (FD_ISSET((*iter).hSession, &selectSet)) {   //Was it this socket?
589                            if (GetLSCPCommand(iter)) {     //Have we read the entire command?
590                                    dmsg(3,("LSCPServer: Got command on socket %d, calling parser.\n", currentSocket));
591                                    int dummy; // just a temporary hack to fulfill the restart() function prototype
592                                    restart(NULL, dummy); // restart the 'scanner'
593                                    currentSocket = (*iter).hSession;  //a hack
594                                    itCurrentSession = iter; // another hack
595                                    dmsg(2,("LSCPServer: [%s]\n",bufferedCommands[currentSocket].c_str()));
596                                    if ((*iter).bVerbose) { // if echo mode enabled
597                                        AnswerClient(bufferedCommands[currentSocket]);
598                                    }
599                                    int result = yyparse(&(*iter));
600                                    currentSocket = -1;     //continuation of a hack
601                                    itCurrentSession = Sessions.end(); // hack as well
602                                    dmsg(3,("LSCPServer: Done parsing on socket %d.\n", currentSocket));
603                                    if (result == LSCP_QUIT) { //Was it a quit command by any chance?
604                                            CloseConnection(iter);
605                                    }
606                            }
607                            //socket may have been closed, iter may be invalid, get out of the loop for now.
608                            //we'll be back if there is data.
609                            break;
610                    }
611            }
612        }
613    }
614    
615    void LSCPServer::CloseConnection( std::vector<yyparse_param_t>::iterator iter ) {
616            int socket = (*iter).hSession;
617            dmsg(1,("LSCPServer: Client connection terminated on socket:%d.\n",socket));
618            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket));
619            Sessions.erase(iter);
620            FD_CLR(socket,  &fdSet);
621            SubscriptionMutex.Lock(); //Must unsubscribe this socket from all events (if any)
622            for (std::map< LSCPEvent::event_t, std::list<int> >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) {
623                    iter->second.remove(socket);
624            }
625            SubscriptionMutex.Unlock();
626            NotifyMutex.Lock();
627            bufferedCommands.erase(socket);
628            bufferedNotifies.erase(socket);
629            #if defined(WIN32)
630            closesocket(socket);
631            #else
632            close(socket);
633            #endif
634            NotifyMutex.Unlock();
635    }
636    
637    void LSCPServer::CloseAllConnections() {
638        std::vector<yyparse_param_t>::iterator iter = Sessions.begin();
639        while(iter != Sessions.end()) {
640            CloseConnection(iter);
641            iter = Sessions.begin();
642        }
643    }
644    
645    void LSCPServer::LockRTNotify() {
646        RTNotifyMutex.Lock();
647    }
648    
649    void LSCPServer::UnlockRTNotify() {
650        RTNotifyMutex.Unlock();
651    }
652    
653    int LSCPServer::EventSubscribers( std::list<LSCPEvent::event_t> events ) {
654            int subs = 0;
655            SubscriptionMutex.Lock();
656            for( std::list<LSCPEvent::event_t>::iterator iter = events.begin();
657                            iter != events.end(); iter++)
658            {
659                    subs += eventSubscriptions.count(*iter);
660            }
661            SubscriptionMutex.Unlock();
662            return subs;
663    }
664    
665    void LSCPServer::SendLSCPNotify( LSCPEvent event ) {
666            SubscriptionMutex.Lock();
667            if (eventSubscriptions.count(event.GetType()) == 0) {
668                    SubscriptionMutex.Unlock();     //Nobody is subscribed to this event
669                    return;
670            }
671            std::list<int>::iterator iter = eventSubscriptions[event.GetType()].begin();
672            std::list<int>::iterator end = eventSubscriptions[event.GetType()].end();
673            String notify = event.Produce();
674    
675            while (true) {
676                    if (NotifyMutex.Trylock()) {
677                            for(;iter != end; iter++)
678    #ifdef MSG_NOSIGNAL
679                                    send(*iter, notify.c_str(), notify.size(), MSG_NOSIGNAL);
680    #else
681                                    send(*iter, notify.c_str(), notify.size(), 0);
682    #endif
683                            NotifyMutex.Unlock();
684                            break;
685                    } else {
686                            if (NotifyBufferMutex.Trylock()) {
687                                    for(;iter != end; iter++)
688                                            bufferedNotifies[*iter] += notify;
689                                    NotifyBufferMutex.Unlock();
690                                    break;
691                            }
692                    }
693            }
694            SubscriptionMutex.Unlock();
695    }
696    
697    extern int GetLSCPCommand( void *buf, int max_size ) {
698            String command = LSCPServer::bufferedCommands[LSCPServer::currentSocket];
699            if (command.size() == 0) {              //Parser wants input but we have nothing.
700                    strcpy((char*) buf, "\n");      //So give it an empty command
701                    return 1;                       //to keep it happy.
702            }
703    
704            if (max_size < command.size()) {
705                    std::cerr << "getLSCPCommand: Flex buffer too small, ignoring the command." << std::endl;
706                    return 0;       //This will never happen
707            }
708    
709            strcpy((char*) buf, command.c_str());
710            LSCPServer::bufferedCommands.erase(LSCPServer::currentSocket);
711            return command.size();
712    }
713    
714    extern yyparse_param_t* GetCurrentYaccSession() {
715        return &(*itCurrentSession);
716    }
717    
718    /**
719     * Will be called to try to read the command from the socket
720     * If command is read, it will return true. Otherwise false is returned.
721     * In any case the received portion (complete or incomplete) is saved into bufferedCommand map.
722     */
723    bool LSCPServer::GetLSCPCommand( std::vector<yyparse_param_t>::iterator iter ) {
724            int socket = (*iter).hSession;
725            char c;
726            int i = 0;
727            while (true) {
728                    #if defined(WIN32)
729                    int result = recv(socket, (char *)&c, 1, 0); //Read one character at a time for now
730                    #else
731                    int result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now
732                    #endif
733                    if (result == 0) { //socket was selected, so 0 here means client has closed the connection
734                            CloseConnection(iter);
735                            break;
736                    }
737                    if (result == 1) {
738                            if (c == '\r')
739                                    continue; //Ignore CR
740                            if (c == '\n') {
741                                    LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Received \'" + bufferedCommands[socket] + "\' on socket", socket));
742                                    bufferedCommands[socket] += "\r\n";
743                                    return true; //Complete command was read
744                            }
745                            bufferedCommands[socket] += c;
746                    }
747                    #if defined(WIN32)
748                    if (result == SOCKET_ERROR) {
749                        int wsa_lasterror = WSAGetLastError();
750                            if (wsa_lasterror == WSAEWOULDBLOCK) //Would block, try again later.
751                                    return false;
752                            dmsg(2,("LSCPScanner: Socket error after recv() Error %d.\n", wsa_lasterror));
753                            CloseConnection(iter);
754                            break;
755                    }
756                    #else
757                    if (result == -1) {
758                            if (errno == EAGAIN) //Would block, try again later.
759                                    return false;
760                            switch(errno) {
761                                    case EBADF:
762                                            dmsg(2,("LSCPScanner: The argument s is an invalid descriptor.\n"));
763                                            break;
764                                    case ECONNREFUSED:
765                                            dmsg(2,("LSCPScanner: A remote host refused to allow the network connection (typically because it is not running the requested service).\n"));
766                                            break;
767                                    case ENOTCONN:
768                                            dmsg(2,("LSCPScanner: The socket is associated with a connection-oriented protocol and has not been connected (see connect(2) and accept(2)).\n"));
769                                            break;
770                                    case ENOTSOCK:
771                                            dmsg(2,("LSCPScanner: The argument s does not refer to a socket.\n"));
772                                            break;
773                                    case EAGAIN:
774                                            dmsg(2,("LSCPScanner: The socket is marked non-blocking and the receive operation would block, or a receive timeout had been set and the timeout expired before data was received.\n"));
775                                            break;
776                                    case EINTR:
777                                            dmsg(2,("LSCPScanner: The receive was interrupted by delivery of a signal before any data were available.\n"));
778                                            break;
779                                    case EFAULT:
780                                            dmsg(2,("LSCPScanner: The receive buffer pointer(s) point outside the process's address space.\n"));
781                                            break;
782                                    case EINVAL:
783                                            dmsg(2,("LSCPScanner: Invalid argument passed.\n"));
784                                            break;
785                                    case ENOMEM:
786                                            dmsg(2,("LSCPScanner: Could not allocate memory for recvmsg.\n"));
787                                            break;
788                                    default:
789                                            dmsg(2,("LSCPScanner: Unknown recv() error.\n"));
790                                            break;
791                            }
792                            CloseConnection(iter);
793                            break;
794                    }
795                    #endif
796            }
797            return false;
798  }  }
799    
800  /**  /**
# Line 85  int LSCPServer::Main() { Line 805  int LSCPServer::Main() {
805   */   */
806  void LSCPServer::AnswerClient(String ReturnMessage) {  void LSCPServer::AnswerClient(String ReturnMessage) {
807      dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str()));      dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str()));
808      send(hSession, ReturnMessage.c_str(), ReturnMessage.size(), 0);      if (currentSocket != -1) {
809                NotifyMutex.Lock();
810    #ifdef MSG_NOSIGNAL
811                send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), MSG_NOSIGNAL);
812    #else
813                send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0);
814    #endif
815                NotifyMutex.Unlock();
816        }
817    }
818    
819    /**
820     * Find a created audio output device index.
821     */
822    int LSCPServer::GetAudioOutputDeviceIndex ( AudioOutputDevice *pDevice )
823    {
824        // Search for the created device to get its index
825        std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
826        std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
827        for (; iter != devices.end(); iter++) {
828            if (iter->second == pDevice)
829                return iter->first;
830        }
831        // Not found.
832        return -1;
833    }
834    
835    /**
836     * Find a created midi input device index.
837     */
838    int LSCPServer::GetMidiInputDeviceIndex ( MidiInputDevice *pDevice )
839    {
840        // Search for the created device to get its index
841        std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
842        std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
843        for (; iter != devices.end(); iter++) {
844            if (iter->second == pDevice)
845                return iter->first;
846        }
847        // Not found.
848        return -1;
849    }
850    
851    String LSCPServer::CreateAudioOutputDevice(String Driver, std::map<String,String> Parameters) {
852        dmsg(2,("LSCPServer: CreateAudioOutputDevice(Driver=%s)\n", Driver.c_str()));
853        LSCPResultSet result;
854        try {
855            AudioOutputDevice* pDevice = pSampler->CreateAudioOutputDevice(Driver, Parameters);
856            // search for the created device to get its index
857            int index = GetAudioOutputDeviceIndex(pDevice);
858            if (index == -1) throw Exception("Internal error: could not find created audio output device.");
859            result = index; // success
860        }
861        catch (Exception e) {
862            result.Error(e);
863        }
864        return result.Produce();
865    }
866    
867    String LSCPServer::CreateMidiInputDevice(String Driver, std::map<String,String> Parameters) {
868        dmsg(2,("LSCPServer: CreateMidiInputDevice(Driver=%s)\n", Driver.c_str()));
869        LSCPResultSet result;
870        try {
871            MidiInputDevice* pDevice = pSampler->CreateMidiInputDevice(Driver, Parameters);
872            // search for the created device to get its index
873            int index = GetMidiInputDeviceIndex(pDevice);
874            if (index == -1) throw Exception("Internal error: could not find created midi input device.");
875            result = index; // success
876        }
877        catch (Exception e) {
878            result.Error(e);
879        }
880        return result.Produce();
881    }
882    
883    String LSCPServer::DestroyAudioOutputDevice(uint DeviceIndex) {
884        dmsg(2,("LSCPServer: DestroyAudioOutputDevice(DeviceIndex=%d)\n", DeviceIndex));
885        LSCPResultSet result;
886        try {
887            std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
888            if (!devices.count(DeviceIndex)) throw Exception("There is no audio output device with index " + ToString(DeviceIndex) + ".");
889            AudioOutputDevice* pDevice = devices[DeviceIndex];
890            pSampler->DestroyAudioOutputDevice(pDevice);
891        }
892        catch (Exception e) {
893            result.Error(e);
894        }
895        return result.Produce();
896    }
897    
898    String LSCPServer::DestroyMidiInputDevice(uint DeviceIndex) {
899        dmsg(2,("LSCPServer: DestroyMidiInputDevice(DeviceIndex=%d)\n", DeviceIndex));
900        LSCPResultSet result;
901        try {
902            std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
903            if (!devices.count(DeviceIndex)) throw Exception("There is no audio output device with index " + ToString(DeviceIndex) + ".");
904            MidiInputDevice* pDevice = devices[DeviceIndex];
905            pSampler->DestroyMidiInputDevice(pDevice);
906        }
907        catch (Exception e) {
908            result.Error(e);
909        }
910        return result.Produce();
911    }
912    
913    EngineChannel* LSCPServer::GetEngineChannel(uint uiSamplerChannel) {
914        SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
915        if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
916    
917        EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
918        if (!pEngineChannel) throw Exception("There is no engine deployed on this sampler channel yet");
919    
920        return pEngineChannel;
921  }  }
922    
923  /**  /**
924   * Will be called by the parser to load an instrument.   * Will be called by the parser to load an instrument.
925   */   */
926  String LSCPServer::LoadInstrument(String Filename, uint uiInstrument, uint uiSamplerChannel) {  String LSCPServer::LoadInstrument(String Filename, uint uiInstrument, uint uiSamplerChannel, bool bBackground) {
927      dmsg(2,("LSCPServer: LoadInstrument(Filename=%s,Instrument=%d,SamplerChannel=%d)\n", Filename.c_str(), uiInstrument, uiSamplerChannel));      dmsg(2,("LSCPServer: LoadInstrument(Filename=%s,Instrument=%d,SamplerChannel=%d)\n", Filename.c_str(), uiInstrument, uiSamplerChannel));
928      result_t result;      LSCPResultSet result;
929      try {      try {
930          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
931          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
932          Engine* pEngine = pSamplerChannel->GetEngine();          EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
933          if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");          if (!pEngineChannel) throw Exception("No engine type assigned to sampler channel yet");
934          pEngine->LoadInstrument(Filename.c_str(), uiInstrument);          if (!pSamplerChannel->GetAudioOutputDevice())
935          result.type = result_type_success;              throw Exception("No audio output device connected to sampler channel");
936            if (bBackground) {
937                InstrumentManager::instrument_id_t id;
938                id.FileName = Filename;
939                id.Index    = uiInstrument;
940                InstrumentManager::LoadInstrumentInBackground(id, pEngineChannel);
941            }
942            else {
943                // tell the engine channel which instrument to load
944                pEngineChannel->PrepareLoadInstrument(Filename.c_str(), uiInstrument);
945                // actually start to load the instrument (blocks until completed)
946                pEngineChannel->LoadInstrument();
947            }
948      }      }
949      catch (LinuxSamplerException e) {      catch (Exception e) {
950           e.PrintMessage();           result.Error(e);
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
951      }      }
952      return ConvertResult(result);      return result.Produce();
953  }  }
954    
955  /**  /**
956   * Will be called by the parser to load and deploy an engine.   * Will be called by the parser to assign a sampler engine type to a
957     * sampler channel.
958   */   */
959  String LSCPServer::LoadEngine(String EngineName, uint uiSamplerChannel) {  String LSCPServer::SetEngineType(String EngineName, uint uiSamplerChannel) {
960      dmsg(2,("LSCPServer: LoadEngine(EngineName=%s,SamplerChannel=%d)\n", EngineName.c_str(), uiSamplerChannel));      dmsg(2,("LSCPServer: SetEngineType(EngineName=%s,uiSamplerChannel=%d)\n", EngineName.c_str(), uiSamplerChannel));
961      result_t result;      LSCPResultSet result;
962      try {      try {
         Engine::type_t type;  
         if (EngineName == "gig") type = Engine::type_gig;  
         else throw LinuxSamplerException("Unknown engine type");  
963          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
964          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
965          pSamplerChannel->LoadEngine(type);          LockRTNotify();
966          result.type = result_type_success;          pSamplerChannel->SetEngineType(EngineName);
967            if(HasSoloChannel()) pSamplerChannel->GetEngineChannel()->SetMute(-1);
968            UnlockRTNotify();
969      }      }
970      catch (LinuxSamplerException e) {      catch (Exception e) {
971           e.PrintMessage();           result.Error(e);
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
972      }      }
973      return ConvertResult(result);      return result.Produce();
974  }  }
975    
976  /**  /**
# Line 140  String LSCPServer::LoadEngine(String Eng Line 978  String LSCPServer::LoadEngine(String Eng
978   */   */
979  String LSCPServer::GetChannels() {  String LSCPServer::GetChannels() {
980      dmsg(2,("LSCPServer: GetChannels()\n"));      dmsg(2,("LSCPServer: GetChannels()\n"));
981      return ToString(pSampler->SamplerChannels()) + "\r\n";      LSCPResultSet result;
982        result.Add(pSampler->SamplerChannels());
983        return result.Produce();
984    }
985    
986    /**
987     * Will be called by the parser to get the list of sampler channels.
988     */
989    String LSCPServer::ListChannels() {
990        dmsg(2,("LSCPServer: ListChannels()\n"));
991        String list;
992        std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
993        std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
994        for (; iter != channels.end(); iter++) {
995            if (list != "") list += ",";
996            list += ToString(iter->first);
997        }
998        LSCPResultSet result;
999        result.Add(list);
1000        return result.Produce();
1001  }  }
1002    
1003  /**  /**
# Line 148  String LSCPServer::GetChannels() { Line 1005  String LSCPServer::GetChannels() {
1005   */   */
1006  String LSCPServer::AddChannel() {  String LSCPServer::AddChannel() {
1007      dmsg(2,("LSCPServer: AddChannel()\n"));      dmsg(2,("LSCPServer: AddChannel()\n"));
1008        LockRTNotify();
1009      SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel();      SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel();
1010      return "OK[" + ToString(pSamplerChannel->Index()) + "]\r\n";      UnlockRTNotify();
1011        LSCPResultSet result(pSamplerChannel->Index());
1012        return result.Produce();
1013  }  }
1014    
1015  /**  /**
# Line 157  String LSCPServer::AddChannel() { Line 1017  String LSCPServer::AddChannel() {
1017   */   */
1018  String LSCPServer::RemoveChannel(uint uiSamplerChannel) {  String LSCPServer::RemoveChannel(uint uiSamplerChannel) {
1019      dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));
1020        LSCPResultSet result;
1021        LockRTNotify();
1022      pSampler->RemoveSamplerChannel(uiSamplerChannel);      pSampler->RemoveSamplerChannel(uiSamplerChannel);
1023      return "OK\r\n";      UnlockRTNotify();
1024        return result.Produce();
1025  }  }
1026    
1027  /**  /**
1028   * Will be called by the parser to get all available engines.   * Will be called by the parser to get the amount of all available engines.
1029   */   */
1030  String LSCPServer::GetAvailableEngines() {  String LSCPServer::GetAvailableEngines() {
1031      dmsg(2,("LSCPServer: GetAvailableEngines()\n"));      dmsg(2,("LSCPServer: GetAvailableEngines()\n"));
1032      return "gig\r\n";      LSCPResultSet result;
1033        try {
1034            int n = EngineFactory::AvailableEngineTypes().size();
1035            result.Add(n);
1036        }
1037        catch (Exception e) {
1038            result.Error(e);
1039        }
1040        return result.Produce();
1041    }
1042    
1043    /**
1044     * Will be called by the parser to get a list of all available engines.
1045     */
1046    String LSCPServer::ListAvailableEngines() {
1047        dmsg(2,("LSCPServer: ListAvailableEngines()\n"));
1048        LSCPResultSet result;
1049        try {
1050            String s = EngineFactory::AvailableEngineTypesAsString();
1051            result.Add(s);
1052        }
1053        catch (Exception e) {
1054            result.Error(e);
1055        }
1056        return result.Produce();
1057  }  }
1058    
1059  /**  /**
1060   * Will be called by the parser to get descriptions for a particular engine.   * Will be called by the parser to get descriptions for a particular
1061     * sampler engine.
1062   */   */
1063  String LSCPServer::GetEngineInfo(String EngineName) {  String LSCPServer::GetEngineInfo(String EngineName) {
1064      dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));      dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));
1065      result_t result;      LSCPResultSet result;
1066        LockRTNotify();
1067      try {      try {
1068          if (EngineName == "gig") {          Engine* pEngine = EngineFactory::Create(EngineName);
1069              Engine* pEngine = new LinuxSampler::gig::Engine;          result.Add("DESCRIPTION", _escapeLscpResponse(pEngine->Description()));
1070              String info = pEngine->Description() + "\r\n";          result.Add("VERSION",     pEngine->Version());
1071              delete pEngine;          EngineFactory::Destroy(pEngine);
1072              return info; // success      }
1073          }      catch (Exception e) {
1074          else throw LinuxSamplerException("Unknown engine type");           result.Error(e);
     }  
     catch (LinuxSamplerException e) {  
          e.PrintMessage();  
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
1075      }      }
1076      return ConvertResult(result);      UnlockRTNotify();
1077        return result.Produce();
1078  }  }
1079    
1080  /**  /**
# Line 199  String LSCPServer::GetEngineInfo(String Line 1083  String LSCPServer::GetEngineInfo(String
1083   */   */
1084  String LSCPServer::GetChannelInfo(uint uiSamplerChannel) {  String LSCPServer::GetChannelInfo(uint uiSamplerChannel) {
1085      dmsg(2,("LSCPServer: GetChannelInfo(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: GetChannelInfo(SamplerChannel=%d)\n", uiSamplerChannel));
1086      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
1087        try {
1088            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1089            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1090            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
1091    
1092            //Defaults values
1093            String EngineName = "NONE";
1094            float Volume = 0.0f;
1095            String InstrumentFileName = "NONE";
1096            String InstrumentName = "NONE";
1097            int InstrumentIndex = -1;
1098            int InstrumentStatus = -1;
1099            int AudioOutputChannels = 0;
1100            String AudioRouting;
1101            int Mute = 0;
1102            bool Solo = false;
1103            String MidiInstrumentMap = "NONE";
1104    
1105            if (pEngineChannel) {
1106                EngineName          = pEngineChannel->EngineName();
1107                AudioOutputChannels = pEngineChannel->Channels();
1108                Volume              = pEngineChannel->Volume();
1109                InstrumentStatus    = pEngineChannel->InstrumentStatus();
1110                InstrumentIndex     = pEngineChannel->InstrumentIndex();
1111                if (InstrumentIndex != -1) {
1112                    InstrumentFileName = pEngineChannel->InstrumentFileName();
1113                    InstrumentName     = pEngineChannel->InstrumentName();
1114                }
1115                for (int chan = 0; chan < pEngineChannel->Channels(); chan++) {
1116                    if (AudioRouting != "") AudioRouting += ",";
1117                    AudioRouting += ToString(pEngineChannel->OutputChannel(chan));
1118                }
1119                Mute = pEngineChannel->GetMute();
1120                Solo = pEngineChannel->GetSolo();
1121                if (pEngineChannel->UsesNoMidiInstrumentMap())
1122                    MidiInstrumentMap = "NONE";
1123                else if (pEngineChannel->UsesDefaultMidiInstrumentMap())
1124                    MidiInstrumentMap = "DEFAULT";
1125                else
1126                    MidiInstrumentMap = ToString(pEngineChannel->GetMidiInstrumentMap());
1127            }
1128    
1129            result.Add("ENGINE_NAME", EngineName);
1130            result.Add("VOLUME", Volume);
1131    
1132            //Some not-so-hardcoded stuff to make GUI look good
1133            result.Add("AUDIO_OUTPUT_DEVICE", GetAudioOutputDeviceIndex(pSamplerChannel->GetAudioOutputDevice()));
1134            result.Add("AUDIO_OUTPUT_CHANNELS", AudioOutputChannels);
1135            result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
1136    
1137            result.Add("MIDI_INPUT_DEVICE", GetMidiInputDeviceIndex(pSamplerChannel->GetMidiInputDevice()));
1138            result.Add("MIDI_INPUT_PORT", pSamplerChannel->GetMidiInputPort());
1139            if (pSamplerChannel->GetMidiInputChannel() == midi_chan_all) result.Add("MIDI_INPUT_CHANNEL", "ALL");
1140            else result.Add("MIDI_INPUT_CHANNEL", pSamplerChannel->GetMidiInputChannel());
1141    
1142            // convert the filename into the correct encoding as defined for LSCP
1143            // (especially in terms of special characters -> escape sequences)
1144            if (InstrumentFileName != "NONE" && InstrumentFileName != "") {
1145    #if WIN32
1146                InstrumentFileName = Path::fromWindows(InstrumentFileName).toLscp();
1147    #else
1148                // assuming POSIX
1149                InstrumentFileName = Path::fromPosix(InstrumentFileName).toLscp();
1150    #endif
1151            }
1152    
1153            result.Add("INSTRUMENT_FILE", InstrumentFileName);
1154            result.Add("INSTRUMENT_NR", InstrumentIndex);
1155            result.Add("INSTRUMENT_NAME", _escapeLscpResponse(InstrumentName));
1156            result.Add("INSTRUMENT_STATUS", InstrumentStatus);
1157            result.Add("MUTE", Mute == -1 ? "MUTED_BY_SOLO" : (Mute ? "true" : "false"));
1158            result.Add("SOLO", Solo);
1159            result.Add("MIDI_INSTRUMENT_MAP", MidiInstrumentMap);
1160        }
1161        catch (Exception e) {
1162             result.Error(e);
1163        }
1164        return result.Produce();
1165  }  }
1166    
1167  /**  /**
# Line 208  String LSCPServer::GetChannelInfo(uint u Line 1170  String LSCPServer::GetChannelInfo(uint u
1170   */   */
1171  String LSCPServer::GetVoiceCount(uint uiSamplerChannel) {  String LSCPServer::GetVoiceCount(uint uiSamplerChannel) {
1172      dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));
1173      result_t result;      LSCPResultSet result;
1174      try {      try {
1175          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
1176          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");
1177          Engine* pEngine = pSamplerChannel->GetEngine();          result.Add(pEngineChannel->GetEngine()->VoiceCount());
         if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");  
         return ToString(pEngine->VoiceCount()) + "\r\n"; // success  
1178      }      }
1179      catch (LinuxSamplerException e) {      catch (Exception e) {
1180           e.PrintMessage();           result.Error(e);
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
1181      }      }
1182      return ConvertResult(result);      return result.Produce();
1183  }  }
1184    
1185  /**  /**
# Line 231  String LSCPServer::GetVoiceCount(uint ui Line 1188  String LSCPServer::GetVoiceCount(uint ui
1188   */   */
1189  String LSCPServer::GetStreamCount(uint uiSamplerChannel) {  String LSCPServer::GetStreamCount(uint uiSamplerChannel) {
1190      dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));
1191      result_t result;      LSCPResultSet result;
1192      try {      try {
1193          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
1194          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");
1195          Engine* pEngine = pSamplerChannel->GetEngine();          result.Add(pEngineChannel->GetEngine()->DiskStreamCount());
         if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");  
         return ToString(pEngine->DiskStreamCount()) + "\r\n"; // success  
1196      }      }
1197      catch (LinuxSamplerException e) {      catch (Exception e) {
1198           e.PrintMessage();           result.Error(e);
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
1199      }      }
1200      return ConvertResult(result);      return result.Produce();
1201  }  }
1202    
1203  /**  /**
# Line 254  String LSCPServer::GetStreamCount(uint u Line 1206  String LSCPServer::GetStreamCount(uint u
1206   */   */
1207  String LSCPServer::GetBufferFill(fill_response_t ResponseType, uint uiSamplerChannel) {  String LSCPServer::GetBufferFill(fill_response_t ResponseType, uint uiSamplerChannel) {
1208      dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));      dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));
1209      result_t result;      LSCPResultSet result;
1210      try {      try {
1211          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
1212          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          if (!pEngineChannel->GetEngine()) throw Exception("No audio output device connected to sampler channel");
1213          Engine* pEngine = pSamplerChannel->GetEngine();          if (!pEngineChannel->GetEngine()->DiskStreamSupported()) result.Add("NA");
1214          if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");          else {
1215          if (!pEngine->DiskStreamSupported()) return "NA\r\n";              switch (ResponseType) {
1216          switch (ResponseType) {                  case fill_response_bytes:
1217              case fill_response_bytes:                      result.Add(pEngineChannel->GetEngine()->DiskStreamBufferFillBytes());
1218                  return ToString(pEngine->DiskStreamBufferFillBytes()) + "\r\n"; // success                      break;
1219              case fill_response_percentage:                  case fill_response_percentage:
1220                  return ToString(pEngine->DiskStreamBufferFillPercentage()) + "\r\n"; // success                      result.Add(pEngineChannel->GetEngine()->DiskStreamBufferFillPercentage());
1221              default:                      break;
1222                  throw LinuxSamplerException("Unknown fill response type");                  default:
1223                        throw Exception("Unknown fill response type");
1224                }
1225            }
1226        }
1227        catch (Exception e) {
1228             result.Error(e);
1229        }
1230        return result.Produce();
1231    }
1232    
1233    String LSCPServer::GetAvailableAudioOutputDrivers() {
1234        dmsg(2,("LSCPServer: GetAvailableAudioOutputDrivers()\n"));
1235        LSCPResultSet result;
1236        try {
1237            int n = AudioOutputDeviceFactory::AvailableDrivers().size();
1238            result.Add(n);
1239        }
1240        catch (Exception e) {
1241            result.Error(e);
1242        }
1243        return result.Produce();
1244    }
1245    
1246    String LSCPServer::ListAvailableAudioOutputDrivers() {
1247        dmsg(2,("LSCPServer: ListAvailableAudioOutputDrivers()\n"));
1248        LSCPResultSet result;
1249        try {
1250            String s = AudioOutputDeviceFactory::AvailableDriversAsString();
1251            result.Add(s);
1252        }
1253        catch (Exception e) {
1254            result.Error(e);
1255        }
1256        return result.Produce();
1257    }
1258    
1259    String LSCPServer::GetAvailableMidiInputDrivers() {
1260        dmsg(2,("LSCPServer: GetAvailableMidiInputDrivers()\n"));
1261        LSCPResultSet result;
1262        try {
1263            int n = MidiInputDeviceFactory::AvailableDrivers().size();
1264            result.Add(n);
1265        }
1266        catch (Exception e) {
1267            result.Error(e);
1268        }
1269        return result.Produce();
1270    }
1271    
1272    String LSCPServer::ListAvailableMidiInputDrivers() {
1273        dmsg(2,("LSCPServer: ListAvailableMidiInputDrivers()\n"));
1274        LSCPResultSet result;
1275        try {
1276            String s = MidiInputDeviceFactory::AvailableDriversAsString();
1277            result.Add(s);
1278        }
1279        catch (Exception e) {
1280            result.Error(e);
1281        }
1282        return result.Produce();
1283    }
1284    
1285    String LSCPServer::GetMidiInputDriverInfo(String Driver) {
1286        dmsg(2,("LSCPServer: GetMidiInputDriverInfo(Driver=%s)\n",Driver.c_str()));
1287        LSCPResultSet result;
1288        try {
1289            result.Add("DESCRIPTION", MidiInputDeviceFactory::GetDriverDescription(Driver));
1290            result.Add("VERSION",     MidiInputDeviceFactory::GetDriverVersion(Driver));
1291    
1292            std::map<String,DeviceCreationParameter*> parameters = MidiInputDeviceFactory::GetAvailableDriverParameters(Driver);
1293            if (parameters.size()) { // if there are parameters defined for this driver
1294                String s;
1295                std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
1296                for (;iter != parameters.end(); iter++) {
1297                    if (s != "") s += ",";
1298                    s += iter->first;
1299                    delete iter->second;
1300                }
1301                result.Add("PARAMETERS", s);
1302          }          }
1303      }      }
1304      catch (LinuxSamplerException e) {      catch (Exception e) {
1305           e.PrintMessage();          result.Error(e);
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
1306      }      }
1307      return ConvertResult(result);      return result.Produce();
1308  }  }
1309    
1310  /**  String LSCPServer::GetAudioOutputDriverInfo(String Driver) {
1311   * Will be called by the parser to change the audio output type on a      dmsg(2,("LSCPServer: GetAudioOutputDriverInfo(Driver=%s)\n",Driver.c_str()));
1312   * particular sampler channel.      LSCPResultSet result;
1313   */      try {
1314  String LSCPServer::SetAudioOutputType(AudioOutputDevice::type_t AudioOutputType, uint uiSamplerChannel) {          result.Add("DESCRIPTION", AudioOutputDeviceFactory::GetDriverDescription(Driver));
1315      dmsg(2,("LSCPServer: SetAudioOutputType(AudioOutputType=%d, SamplerChannel=%d)\n", AudioOutputType, uiSamplerChannel));          result.Add("VERSION",     AudioOutputDeviceFactory::GetDriverVersion(Driver));
1316      result_t result;  
1317      try {          std::map<String,DeviceCreationParameter*> parameters = AudioOutputDeviceFactory::GetAvailableDriverParameters(Driver);
1318          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          if (parameters.size()) { // if there are parameters defined for this driver
1319          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");              String s;
1320          pSamplerChannel->SetAudioOutputDevice(AudioOutputType);              std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
1321          result.type = result_type_success;              for (;iter != parameters.end(); iter++) {
1322      }                  if (s != "") s += ",";
1323      catch (LinuxSamplerException e) {                  s += iter->first;
1324           e.PrintMessage();                  delete iter->second;
1325           result.type    = result_type_error;              }
1326           result.code    = LSCP_ERR_UNKNOWN;              result.Add("PARAMETERS", s);
1327           result.message = e.Message();          }
1328        }
1329        catch (Exception e) {
1330            result.Error(e);
1331        }
1332        return result.Produce();
1333    }
1334    
1335    String LSCPServer::GetMidiInputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
1336        dmsg(2,("LSCPServer: GetMidiInputDriverParameterInfo(Driver=%s,Parameter=%s,DependencyListSize=%d)\n",Driver.c_str(),Parameter.c_str(),DependencyList.size()));
1337        LSCPResultSet result;
1338        try {
1339            DeviceCreationParameter* pParameter = MidiInputDeviceFactory::GetDriverParameter(Driver, Parameter);
1340            result.Add("TYPE",         pParameter->Type());
1341            result.Add("DESCRIPTION",  pParameter->Description());
1342            result.Add("MANDATORY",    pParameter->Mandatory());
1343            result.Add("FIX",          pParameter->Fix());
1344            result.Add("MULTIPLICITY", pParameter->Multiplicity());
1345            optional<String> oDepends       = pParameter->Depends();
1346            optional<String> oDefault       = pParameter->Default(DependencyList);
1347            optional<String> oRangeMin      = pParameter->RangeMin(DependencyList);
1348            optional<String> oRangeMax      = pParameter->RangeMax(DependencyList);
1349            optional<String> oPossibilities = pParameter->Possibilities(DependencyList);
1350            if (oDepends)       result.Add("DEPENDS",       *oDepends);
1351            if (oDefault)       result.Add("DEFAULT",       *oDefault);
1352            if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);
1353            if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);
1354            if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);
1355            delete pParameter;
1356        }
1357        catch (Exception e) {
1358            result.Error(e);
1359        }
1360        return result.Produce();
1361    }
1362    
1363    String LSCPServer::GetAudioOutputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
1364        dmsg(2,("LSCPServer: GetAudioOutputDriverParameterInfo(Driver=%s,Parameter=%s,DependencyListSize=%d)\n",Driver.c_str(),Parameter.c_str(),DependencyList.size()));
1365        LSCPResultSet result;
1366        try {
1367            DeviceCreationParameter* pParameter = AudioOutputDeviceFactory::GetDriverParameter(Driver, Parameter);
1368            result.Add("TYPE",         pParameter->Type());
1369            result.Add("DESCRIPTION",  pParameter->Description());
1370            result.Add("MANDATORY",    pParameter->Mandatory());
1371            result.Add("FIX",          pParameter->Fix());
1372            result.Add("MULTIPLICITY", pParameter->Multiplicity());
1373            optional<String> oDepends       = pParameter->Depends();
1374            optional<String> oDefault       = pParameter->Default(DependencyList);
1375            optional<String> oRangeMin      = pParameter->RangeMin(DependencyList);
1376            optional<String> oRangeMax      = pParameter->RangeMax(DependencyList);
1377            optional<String> oPossibilities = pParameter->Possibilities(DependencyList);
1378            if (oDepends)       result.Add("DEPENDS",       *oDepends);
1379            if (oDefault)       result.Add("DEFAULT",       *oDefault);
1380            if (oRangeMin)      result.Add("RANGE_MIN",     *oRangeMin);
1381            if (oRangeMax)      result.Add("RANGE_MAX",     *oRangeMax);
1382            if (oPossibilities) result.Add("POSSIBILITIES", *oPossibilities);
1383            delete pParameter;
1384        }
1385        catch (Exception e) {
1386            result.Error(e);
1387        }
1388        return result.Produce();
1389    }
1390    
1391    String LSCPServer::GetAudioOutputDeviceCount() {
1392        dmsg(2,("LSCPServer: GetAudioOutputDeviceCount()\n"));
1393        LSCPResultSet result;
1394        try {
1395            uint count = pSampler->AudioOutputDevices();
1396            result.Add(count); // success
1397        }
1398        catch (Exception e) {
1399            result.Error(e);
1400        }
1401        return result.Produce();
1402    }
1403    
1404    String LSCPServer::GetMidiInputDeviceCount() {
1405        dmsg(2,("LSCPServer: GetMidiInputDeviceCount()\n"));
1406        LSCPResultSet result;
1407        try {
1408            uint count = pSampler->MidiInputDevices();
1409            result.Add(count); // success
1410        }
1411        catch (Exception e) {
1412            result.Error(e);
1413      }      }
1414      return ConvertResult(result);      return result.Produce();
1415    }
1416    
1417    String LSCPServer::GetAudioOutputDevices() {
1418        dmsg(2,("LSCPServer: GetAudioOutputDevices()\n"));
1419        LSCPResultSet result;
1420        try {
1421            String s;
1422            std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1423            std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
1424            for (; iter != devices.end(); iter++) {
1425                if (s != "") s += ",";
1426                s += ToString(iter->first);
1427            }
1428            result.Add(s);
1429        }
1430        catch (Exception e) {
1431            result.Error(e);
1432        }
1433        return result.Produce();
1434    }
1435    
1436    String LSCPServer::GetMidiInputDevices() {
1437        dmsg(2,("LSCPServer: GetMidiInputDevices()\n"));
1438        LSCPResultSet result;
1439        try {
1440            String s;
1441            std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1442            std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
1443            for (; iter != devices.end(); iter++) {
1444                if (s != "") s += ",";
1445                s += ToString(iter->first);
1446            }
1447            result.Add(s);
1448        }
1449        catch (Exception e) {
1450            result.Error(e);
1451        }
1452        return result.Produce();
1453    }
1454    
1455    String LSCPServer::GetAudioOutputDeviceInfo(uint DeviceIndex) {
1456        dmsg(2,("LSCPServer: GetAudioOutputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex));
1457        LSCPResultSet result;
1458        try {
1459            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1460            if (!devices.count(DeviceIndex)) throw Exception("There is no audio output device with index " + ToString(DeviceIndex) + ".");
1461            AudioOutputDevice* pDevice = devices[DeviceIndex];
1462            result.Add("DRIVER", pDevice->Driver());
1463            std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1464            std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
1465            for (; iter != parameters.end(); iter++) {
1466                result.Add(iter->first, iter->second->Value());
1467            }
1468        }
1469        catch (Exception e) {
1470            result.Error(e);
1471        }
1472        return result.Produce();
1473    }
1474    
1475    String LSCPServer::GetMidiInputDeviceInfo(uint DeviceIndex) {
1476        dmsg(2,("LSCPServer: GetMidiInputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex));
1477        LSCPResultSet result;
1478        try {
1479            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1480            if (!devices.count(DeviceIndex)) throw Exception("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1481            MidiInputDevice* pDevice = devices[DeviceIndex];
1482            result.Add("DRIVER", pDevice->Driver());
1483            std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1484            std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
1485            for (; iter != parameters.end(); iter++) {
1486                result.Add(iter->first, iter->second->Value());
1487            }
1488        }
1489        catch (Exception e) {
1490            result.Error(e);
1491        }
1492        return result.Produce();
1493    }
1494    String LSCPServer::GetMidiInputPortInfo(uint DeviceIndex, uint PortIndex) {
1495        dmsg(2,("LSCPServer: GetMidiInputPortInfo(DeviceIndex=%d, PortIndex=%d)\n",DeviceIndex, PortIndex));
1496        LSCPResultSet result;
1497        try {
1498            // get MIDI input device
1499            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1500            if (!devices.count(DeviceIndex)) throw Exception("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1501            MidiInputDevice* pDevice = devices[DeviceIndex];
1502    
1503            // get MIDI port
1504            MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex);
1505            if (!pMidiInputPort) throw Exception("There is no MIDI input port with index " + ToString(PortIndex) + ".");
1506    
1507            // return the values of all MIDI port parameters
1508            std::map<String,DeviceRuntimeParameter*> parameters = pMidiInputPort->PortParameters();
1509            std::map<String,DeviceRuntimeParameter*>::iterator iter = parameters.begin();
1510            for (; iter != parameters.end(); iter++) {
1511                result.Add(iter->first, iter->second->Value());
1512            }
1513        }
1514        catch (Exception e) {
1515            result.Error(e);
1516        }
1517        return result.Produce();
1518    }
1519    
1520    String LSCPServer::GetAudioOutputChannelInfo(uint DeviceId, uint ChannelId) {
1521        dmsg(2,("LSCPServer: GetAudioOutputChannelInfo(DeviceId=%d,ChannelId)\n",DeviceId,ChannelId));
1522        LSCPResultSet result;
1523        try {
1524            // get audio output device
1525            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1526            if (!devices.count(DeviceId)) throw Exception("There is no audio output device with index " + ToString(DeviceId) + ".");
1527            AudioOutputDevice* pDevice = devices[DeviceId];
1528    
1529            // get audio channel
1530            AudioChannel* pChannel = pDevice->Channel(ChannelId);
1531            if (!pChannel) throw Exception("Audio output device does not have audio channel " + ToString(ChannelId) + ".");
1532    
1533            // return the values of all audio channel parameters
1534            std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
1535            std::map<String,DeviceRuntimeParameter*>::iterator iter = parameters.begin();
1536            for (; iter != parameters.end(); iter++) {
1537                result.Add(iter->first, iter->second->Value());
1538            }
1539        }
1540        catch (Exception e) {
1541            result.Error(e);
1542        }
1543        return result.Produce();
1544    }
1545    
1546    String LSCPServer::GetMidiInputPortParameterInfo(uint DeviceId, uint PortId, String ParameterName) {
1547        dmsg(2,("LSCPServer: GetMidiInputPortParameterInfo(DeviceId=%d,PortId=%d,ParameterName=%s)\n",DeviceId,PortId,ParameterName.c_str()));
1548        LSCPResultSet result;
1549        try {
1550            // get MIDI input device
1551            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1552            if (!devices.count(DeviceId)) throw Exception("There is no midi input device with index " + ToString(DeviceId) + ".");
1553            MidiInputDevice* pDevice = devices[DeviceId];
1554    
1555            // get midi port
1556            MidiInputPort* pPort = pDevice->GetPort(PortId);
1557            if (!pPort) throw Exception("Midi input device does not have port " + ToString(PortId) + ".");
1558    
1559            // get desired port parameter
1560            std::map<String,DeviceRuntimeParameter*> parameters = pPort->PortParameters();
1561            if (!parameters.count(ParameterName)) throw Exception("Midi port does not provide a parameter '" + ParameterName + "'.");
1562            DeviceRuntimeParameter* pParameter = parameters[ParameterName];
1563    
1564            // return all fields of this audio channel parameter
1565            result.Add("TYPE",         pParameter->Type());
1566            result.Add("DESCRIPTION",  pParameter->Description());
1567            result.Add("FIX",          pParameter->Fix());
1568            result.Add("MULTIPLICITY", pParameter->Multiplicity());
1569            if (pParameter->RangeMin())      result.Add("RANGE_MIN",     *pParameter->RangeMin());
1570            if (pParameter->RangeMax())      result.Add("RANGE_MAX",     *pParameter->RangeMax());
1571            if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
1572        }
1573        catch (Exception e) {
1574            result.Error(e);
1575        }
1576        return result.Produce();
1577    }
1578    
1579    String LSCPServer::GetAudioOutputChannelParameterInfo(uint DeviceId, uint ChannelId, String ParameterName) {
1580        dmsg(2,("LSCPServer: GetAudioOutputChannelParameterInfo(DeviceId=%d,ChannelId=%d,ParameterName=%s)\n",DeviceId,ChannelId,ParameterName.c_str()));
1581        LSCPResultSet result;
1582        try {
1583            // get audio output device
1584            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1585            if (!devices.count(DeviceId)) throw Exception("There is no audio output device with index " + ToString(DeviceId) + ".");
1586            AudioOutputDevice* pDevice = devices[DeviceId];
1587    
1588            // get audio channel
1589            AudioChannel* pChannel = pDevice->Channel(ChannelId);
1590            if (!pChannel) throw Exception("Audio output device does not have audio channel " + ToString(ChannelId) + ".");
1591    
1592            // get desired audio channel parameter
1593            std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
1594            if (!parameters.count(ParameterName)) throw Exception("Audio channel does not provide a parameter '" + ParameterName + "'.");
1595            DeviceRuntimeParameter* pParameter = parameters[ParameterName];
1596    
1597            // return all fields of this audio channel parameter
1598            result.Add("TYPE",         pParameter->Type());
1599            result.Add("DESCRIPTION",  pParameter->Description());
1600            result.Add("FIX",          pParameter->Fix());
1601            result.Add("MULTIPLICITY", pParameter->Multiplicity());
1602            if (pParameter->RangeMin())      result.Add("RANGE_MIN",     *pParameter->RangeMin());
1603            if (pParameter->RangeMax())      result.Add("RANGE_MAX",     *pParameter->RangeMax());
1604            if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
1605        }
1606        catch (Exception e) {
1607            result.Error(e);
1608        }
1609        return result.Produce();
1610    }
1611    
1612    String LSCPServer::SetAudioOutputChannelParameter(uint DeviceId, uint ChannelId, String ParamKey, String ParamVal) {
1613        dmsg(2,("LSCPServer: SetAudioOutputChannelParameter(DeviceId=%d,ChannelId=%d,ParamKey=%s,ParamVal=%s)\n",DeviceId,ChannelId,ParamKey.c_str(),ParamVal.c_str()));
1614        LSCPResultSet result;
1615        try {
1616            // get audio output device
1617            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1618            if (!devices.count(DeviceId)) throw Exception("There is no audio output device with index " + ToString(DeviceId) + ".");
1619            AudioOutputDevice* pDevice = devices[DeviceId];
1620    
1621            // get audio channel
1622            AudioChannel* pChannel = pDevice->Channel(ChannelId);
1623            if (!pChannel) throw Exception("Audio output device does not have audio channel " + ToString(ChannelId) + ".");
1624    
1625            // get desired audio channel parameter
1626            std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
1627            if (!parameters.count(ParamKey)) throw Exception("Audio channel does not provide a parameter '" + ParamKey + "'.");
1628            DeviceRuntimeParameter* pParameter = parameters[ParamKey];
1629    
1630            // set new channel parameter value
1631            pParameter->SetValue(ParamVal);
1632            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_info, DeviceId));
1633        }
1634        catch (Exception e) {
1635            result.Error(e);
1636        }
1637        return result.Produce();
1638    }
1639    
1640    String LSCPServer::SetAudioOutputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) {
1641        dmsg(2,("LSCPServer: SetAudioOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1642        LSCPResultSet result;
1643        try {
1644            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1645            if (!devices.count(DeviceIndex)) throw Exception("There is no audio output device with index " + ToString(DeviceIndex) + ".");
1646            AudioOutputDevice* pDevice = devices[DeviceIndex];
1647            std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1648            if (!parameters.count(ParamKey)) throw Exception("Audio output device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'");
1649            parameters[ParamKey]->SetValue(ParamVal);
1650            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_audio_device_info, DeviceIndex));
1651        }
1652        catch (Exception e) {
1653            result.Error(e);
1654        }
1655        return result.Produce();
1656    }
1657    
1658    String LSCPServer::SetMidiInputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) {
1659        dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1660        LSCPResultSet result;
1661        try {
1662            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1663            if (!devices.count(DeviceIndex)) throw Exception("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1664            MidiInputDevice* pDevice = devices[DeviceIndex];
1665            std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1666            if (!parameters.count(ParamKey)) throw Exception("MIDI input device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'");
1667            parameters[ParamKey]->SetValue(ParamVal);
1668            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_info, DeviceIndex));
1669        }
1670        catch (Exception e) {
1671            result.Error(e);
1672        }
1673        return result.Produce();
1674    }
1675    
1676    String LSCPServer::SetMidiInputPortParameter(uint DeviceIndex, uint PortIndex, String ParamKey, String ParamVal) {
1677        dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1678        LSCPResultSet result;
1679        try {
1680            // get MIDI input device
1681            std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1682            if (!devices.count(DeviceIndex)) throw Exception("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1683            MidiInputDevice* pDevice = devices[DeviceIndex];
1684    
1685            // get MIDI port
1686            MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex);
1687            if (!pMidiInputPort) throw Exception("There is no MIDI input port with index " + ToString(PortIndex) + ".");
1688    
1689            // set port parameter value
1690            std::map<String,DeviceRuntimeParameter*> parameters = pMidiInputPort->PortParameters();
1691            if (!parameters.count(ParamKey)) throw Exception("MIDI input device " + ToString(PortIndex) + " does not have a parameter '" + ParamKey + "'");
1692            parameters[ParamKey]->SetValue(ParamVal);
1693            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_midi_device_info, DeviceIndex));
1694        }
1695        catch (Exception e) {
1696            result.Error(e);
1697        }
1698        return result.Produce();
1699  }  }
1700    
1701  /**  /**
1702   * Will be called by the parser to change the audio output channel for   * Will be called by the parser to change the audio output channel for
1703   * playback on a particular sampler channel.   * playback on a particular sampler channel.
1704   */   */
1705  String LSCPServer::SetAudioOutputChannel(uint AudioOutputChannel, uint uiSamplerChannel) {  String LSCPServer::SetAudioOutputChannel(uint ChannelAudioOutputChannel, uint AudioOutputDeviceInputChannel, uint uiSamplerChannel) {
1706      dmsg(2,("LSCPServer: SetAudioOutputChannel(AudioOutputChannel=%d, SamplerChannel=%d)\n", AudioOutputChannel, uiSamplerChannel));      dmsg(2,("LSCPServer: SetAudioOutputChannel(ChannelAudioOutputChannel=%d, AudioOutputDeviceInputChannel=%d, SamplerChannel=%d)\n",ChannelAudioOutputChannel,AudioOutputDeviceInputChannel,uiSamplerChannel));
1707      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
1708        try {
1709            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1710            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1711            EngineChannel* pEngineChannel = pSamplerChannel->GetEngineChannel();
1712            if (!pEngineChannel) throw Exception("No engine type yet assigned to sampler channel " + ToString(uiSamplerChannel));
1713            if (!pSamplerChannel->GetAudioOutputDevice()) throw Exception("No audio output device connected to sampler channel " + ToString(uiSamplerChannel));
1714            pEngineChannel->SetOutputChannel(ChannelAudioOutputChannel, AudioOutputDeviceInputChannel);
1715        }
1716        catch (Exception e) {
1717             result.Error(e);
1718        }
1719        return result.Produce();
1720    }
1721    
1722    String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) {
1723        dmsg(2,("LSCPServer: SetAudiotOutputDevice(AudioDeviceId=%d, SamplerChannel=%d)\n",AudioDeviceId,uiSamplerChannel));
1724        LSCPResultSet result;
1725        LockRTNotify();
1726        try {
1727            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1728            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1729            std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1730            if (!devices.count(AudioDeviceId)) throw Exception("There is no audio output device with index " + ToString(AudioDeviceId));
1731            AudioOutputDevice* pDevice = devices[AudioDeviceId];
1732            pSamplerChannel->SetAudioOutputDevice(pDevice);
1733        }
1734        catch (Exception e) {
1735             result.Error(e);
1736        }
1737        UnlockRTNotify();
1738        return result.Produce();
1739    }
1740    
1741    String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) {
1742        dmsg(2,("LSCPServer: SetAudioOutputType(String AudioOutputDriver=%s, SamplerChannel=%d)\n",AudioOutputDriver.c_str(),uiSamplerChannel));
1743        LSCPResultSet result;
1744        LockRTNotify();
1745        try {
1746            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1747            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1748            // Driver type name aliasing...
1749            if (AudioOutputDriver == "Alsa") AudioOutputDriver = "ALSA";
1750            if (AudioOutputDriver == "Jack") AudioOutputDriver = "JACK";
1751            // Check if there's one audio output device already created
1752            // for the intended audio driver type (AudioOutputDriver)...
1753            AudioOutputDevice *pDevice = NULL;
1754            std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1755            std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
1756            for (; iter != devices.end(); iter++) {
1757                if ((iter->second)->Driver() == AudioOutputDriver) {
1758                    pDevice = iter->second;
1759                    break;
1760                }
1761            }
1762            // If it doesn't exist, create a new one with default parameters...
1763            if (pDevice == NULL) {
1764                std::map<String,String> params;
1765                pDevice = pSampler->CreateAudioOutputDevice(AudioOutputDriver, params);
1766            }
1767            // Must have a device...
1768            if (pDevice == NULL)
1769                throw Exception("Internal error: could not create audio output device.");
1770            // Set it as the current channel device...
1771            pSamplerChannel->SetAudioOutputDevice(pDevice);
1772        }
1773        catch (Exception e) {
1774             result.Error(e);
1775        }
1776        UnlockRTNotify();
1777        return result.Produce();
1778    }
1779    
1780    String LSCPServer::SetMIDIInputPort(uint MIDIPort, uint uiSamplerChannel) {
1781        dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIPort=%d, SamplerChannel=%d)\n",MIDIPort,uiSamplerChannel));
1782        LSCPResultSet result;
1783        try {
1784            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1785            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1786            pSamplerChannel->SetMidiInputPort(MIDIPort);
1787        }
1788        catch (Exception e) {
1789             result.Error(e);
1790        }
1791        return result.Produce();
1792  }  }
1793    
1794  String LSCPServer::SetMIDIInputType(MidiInputDevice::type_t MidiInputType, uint uiSamplerChannel) {  String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint uiSamplerChannel) {
1795      dmsg(2,("LSCPServer: SetMIDIInputType(MidiInputType=%d, SamplerChannel=%d)\n", MidiInputType, uiSamplerChannel));      dmsg(2,("LSCPServer: SetMIDIInputChannel(MIDIChannel=%d, SamplerChannel=%d)\n",MIDIChannel,uiSamplerChannel));
1796      result_t result;      LSCPResultSet result;
1797      try {      try {
1798          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1799          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1800          pSamplerChannel->SetMidiInputDevice(MidiInputType);          pSamplerChannel->SetMidiInputChannel((midi_chan_t) MIDIChannel);
         result.type = result_type_success;  
1801      }      }
1802      catch (LinuxSamplerException e) {      catch (Exception e) {
1803           e.PrintMessage();           result.Error(e);
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
1804      }      }
1805      return ConvertResult(result);      return result.Produce();
1806  }  }
1807    
1808  /**  String LSCPServer::SetMIDIInputDevice(uint MIDIDeviceId, uint uiSamplerChannel) {
1809   * Will be called by the parser to change the MIDI input port on which the      dmsg(2,("LSCPServer: SetMIDIInputDevice(MIDIDeviceId=%d, SamplerChannel=%d)\n",MIDIDeviceId,uiSamplerChannel));
1810   * engine of a particular sampler channel should listen to.      LSCPResultSet result;
  */  
 String LSCPServer::SetMIDIInputPort(String MIDIInputPort, uint uiSamplerChannel) {  
     dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIInputPort=%s, Samplerchannel=%d)\n", MIDIInputPort.c_str(), uiSamplerChannel));  
     result_t result;  
1811      try {      try {
1812          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1813          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1814          if (!pSamplerChannel->GetMidiInputDevice()) throw LinuxSamplerException("No MIDI input device connected yet");          std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1815          pSamplerChannel->GetMidiInputDevice()->SetInputPort(MIDIInputPort.c_str());          if (!devices.count(MIDIDeviceId)) throw Exception("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1816          result.type = result_type_success;          MidiInputDevice* pDevice = devices[MIDIDeviceId];
1817            pSamplerChannel->SetMidiInputDevice(pDevice);
1818        }
1819        catch (Exception e) {
1820             result.Error(e);
1821        }
1822        return result.Produce();
1823    }
1824    
1825    String LSCPServer::SetMIDIInputType(String MidiInputDriver, uint uiSamplerChannel) {
1826        dmsg(2,("LSCPServer: SetMIDIInputType(String MidiInputDriver=%s, SamplerChannel=%d)\n",MidiInputDriver.c_str(),uiSamplerChannel));
1827        LSCPResultSet result;
1828        try {
1829            SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1830            if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1831            // Driver type name aliasing...
1832            if (MidiInputDriver == "Alsa") MidiInputDriver = "ALSA";
1833            // Check if there's one MIDI input device already created
1834            // for the intended MIDI driver type (MidiInputDriver)...
1835            MidiInputDevice *pDevice = NULL;
1836            std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1837            std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
1838            for (; iter != devices.end(); iter++) {
1839                if ((iter->second)->Driver() == MidiInputDriver) {
1840                    pDevice = iter->second;
1841                    break;
1842                }
1843            }
1844            // If it doesn't exist, create a new one with default parameters...
1845            if (pDevice == NULL) {
1846                std::map<String,String> params;
1847                pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params);
1848                // Make it with at least one initial port.
1849                std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1850            }
1851            // Must have a device...
1852            if (pDevice == NULL)
1853                throw Exception("Internal error: could not create MIDI input device.");
1854            // Set it as the current channel device...
1855            pSamplerChannel->SetMidiInputDevice(pDevice);
1856      }      }
1857      catch (LinuxSamplerException e) {      catch (Exception e) {
1858           e.PrintMessage();           result.Error(e);
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
1859      }      }
1860      return ConvertResult(result);      return result.Produce();
1861  }  }
1862    
1863  /**  /**
1864   * Will be called by the parser to change the MIDI input channel on which the   * Will be called by the parser to change the MIDI input device, port and channel on which
1865   * engine of a particular sampler channel should listen to.   * engine of a particular sampler channel should listen to.
1866   */   */
1867  String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint uiSamplerChannel) {  String LSCPServer::SetMIDIInput(uint MIDIDeviceId, uint MIDIPort, uint MIDIChannel, uint uiSamplerChannel) {
1868      dmsg(2,("LSCPServer: SetMIDIInputChannel(MIDIChannel=%d, SamplerChannel=%d)\n", MIDIChannel, uiSamplerChannel));      dmsg(2,("LSCPServer: SetMIDIInput(MIDIDeviceId=%d, MIDIPort=%d, MIDIChannel=%d, SamplerChannel=%d)\n", MIDIDeviceId, MIDIPort, MIDIChannel, uiSamplerChannel));
1869      result_t result;      LSCPResultSet result;
1870      try {      try {
1871          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1872          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          if (!pSamplerChannel) throw Exception("Invalid sampler channel number " + ToString(uiSamplerChannel));
1873          if (!pSamplerChannel->GetMidiInputDevice()) throw LinuxSamplerException("No MIDI input device connected yet");          std::map<uint, MidiInputDevice*> devices =  pSampler->GetMidiInputDevices();
1874          MidiInputDevice::type_t oldtype = pSamplerChannel->GetMidiInputDevice()->Type();          if (!devices.count(MIDIDeviceId)) throw Exception("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1875          pSamplerChannel->SetMidiInputDevice(oldtype, (MidiInputDevice::midi_chan_t) uiSamplerChannel);          MidiInputDevice* pDevice = devices[MIDIDeviceId];
1876            pSamplerChannel->SetMidiInput(pDevice, MIDIPort, (midi_chan_t) MIDIChannel);
         result.type = result_type_success;  
1877      }      }
1878      catch (LinuxSamplerException e) {      catch (Exception e) {
1879           e.PrintMessage();           result.Error(e);
          result.type    = result_type_error;  
          result.code    = LSCP_ERR_UNKNOWN;  
          result.message = e.Message();  
1880      }      }
1881      return ConvertResult(result);      return result.Produce();
1882  }  }
1883    
1884  /**  /**
1885   * Will be called by the parser to change the global volume factor on a   * Will be called by the parser to change the global volume factor on a
1886   * particular sampler channel.   * particular sampler channel.
1887   */   */
1888  String LSCPServer::SetVolume(double Volume, uint uiSamplerChannel) {  String LSCPServer::SetVolume(double dVolume, uint uiSamplerChannel) {
1889      dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", Volume, uiSamplerChannel));      dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", dVolume, uiSamplerChannel));
1890      result_t result;      LSCPResultSet result;
1891      try {      try {
1892          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
1893          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          pEngineChannel->Volume(dVolume);
1894          Engine* pEngine = pSamplerChannel->GetEngine();      }
1895          if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");      catch (Exception e) {
1896          pEngine->Volume(Volume);           result.Error(e);
1897          result.type = result_type_success;      }
1898      }      return result.Produce();
1899      catch (LinuxSamplerException e) {  }
1900           e.PrintMessage();  
1901           result.type    = result_type_error;  /**
1902           result.code    = LSCP_ERR_UNKNOWN;   * Will be called by the parser to mute/unmute particular sampler channel.
1903           result.message = e.Message();   */
1904    String LSCPServer::SetChannelMute(bool bMute, uint uiSamplerChannel) {
1905        dmsg(2,("LSCPServer: SetChannelMute(bMute=%d,uiSamplerChannel=%d)\n",bMute,uiSamplerChannel));
1906        LSCPResultSet result;
1907        try {
1908            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
1909    
1910            if(!bMute) pEngineChannel->SetMute((HasSoloChannel() && !pEngineChannel->GetSolo()) ? -1 : 0);
1911            else pEngineChannel->SetMute(1);
1912        } catch (Exception e) {
1913            result.Error(e);
1914        }
1915        return result.Produce();
1916    }
1917    
1918    /**
1919     * Will be called by the parser to solo particular sampler channel.
1920     */
1921    String LSCPServer::SetChannelSolo(bool bSolo, uint uiSamplerChannel) {
1922        dmsg(2,("LSCPServer: SetChannelSolo(bSolo=%d,uiSamplerChannel=%d)\n",bSolo,uiSamplerChannel));
1923        LSCPResultSet result;
1924        try {
1925            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
1926    
1927            bool oldSolo = pEngineChannel->GetSolo();
1928            bool hadSoloChannel = HasSoloChannel();
1929    
1930            pEngineChannel->SetSolo(bSolo);
1931    
1932            if(!oldSolo && bSolo) {
1933                if(pEngineChannel->GetMute() == -1) pEngineChannel->SetMute(0);
1934                if(!hadSoloChannel) MuteNonSoloChannels();
1935            }
1936    
1937            if(oldSolo && !bSolo) {
1938                if(!HasSoloChannel()) UnmuteChannels();
1939                else if(!pEngineChannel->GetMute()) pEngineChannel->SetMute(-1);
1940            }
1941        } catch (Exception e) {
1942            result.Error(e);
1943        }
1944        return result.Produce();
1945    }
1946    
1947    /**
1948     * Determines whether there is at least one solo channel in the channel list.
1949     *
1950     * @returns true if there is at least one solo channel in the channel list,
1951     * false otherwise.
1952     */
1953    bool LSCPServer::HasSoloChannel() {
1954        std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
1955        std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
1956        for (; iter != channels.end(); iter++) {
1957            EngineChannel* c = iter->second->GetEngineChannel();
1958            if(c && c->GetSolo()) return true;
1959        }
1960    
1961        return false;
1962    }
1963    
1964    /**
1965     * Mutes all unmuted non-solo channels. Notice that the channels are muted
1966     * with -1 which indicates that they are muted because of the presence
1967     * of a solo channel(s). Channels muted with -1 will be automatically unmuted
1968     * when there are no solo channels left.
1969     */
1970    void LSCPServer::MuteNonSoloChannels() {
1971        dmsg(2,("LSCPServer: MuteNonSoloChannels()\n"));
1972        std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
1973        std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
1974        for (; iter != channels.end(); iter++) {
1975            EngineChannel* c = iter->second->GetEngineChannel();
1976            if(c && !c->GetSolo() && !c->GetMute()) c->SetMute(-1);
1977      }      }
1978      return ConvertResult(result);  }
1979    
1980    /**
1981     * Unmutes all channels that are muted because of the presence
1982     * of a solo channel(s).
1983     */
1984    void  LSCPServer::UnmuteChannels() {
1985        dmsg(2,("LSCPServer: UnmuteChannels()\n"));
1986        std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
1987        std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
1988        for (; iter != channels.end(); iter++) {
1989            EngineChannel* c = iter->second->GetEngineChannel();
1990            if(c && c->GetMute() == -1) c->SetMute(0);
1991        }
1992    }
1993    
1994    String LSCPServer::AddOrReplaceMIDIInstrumentMapping(uint MidiMapID, uint MidiBank, uint MidiProg, String EngineType, String InstrumentFile, uint InstrumentIndex, float Volume, MidiInstrumentMapper::mode_t LoadMode, String Name, bool bModal) {
1995        dmsg(2,("LSCPServer: AddOrReplaceMIDIInstrumentMapping()\n"));
1996    
1997        midi_prog_index_t idx;
1998        idx.midi_bank_msb = (MidiBank >> 7) & 0x7f;
1999        idx.midi_bank_lsb = MidiBank & 0x7f;
2000        idx.midi_prog     = MidiProg;
2001    
2002        MidiInstrumentMapper::entry_t entry;
2003        entry.EngineName      = EngineType;
2004        entry.InstrumentFile  = InstrumentFile;
2005        entry.InstrumentIndex = InstrumentIndex;
2006        entry.LoadMode        = LoadMode;
2007        entry.Volume          = Volume;
2008        entry.Name            = Name;
2009    
2010        LSCPResultSet result;
2011        try {
2012            // PERSISTENT mapping commands might block for a long time, so in
2013            // that case we add/replace the mapping in another thread in case
2014            // the NON_MODAL argument was supplied, non persistent mappings
2015            // should return immediately, so we don't need to do that for them
2016            bool bInBackground = (entry.LoadMode == MidiInstrumentMapper::PERSISTENT && !bModal);
2017            MidiInstrumentMapper::AddOrReplaceEntry(MidiMapID, idx, entry, bInBackground);
2018        } catch (Exception e) {
2019            result.Error(e);
2020        }
2021        return result.Produce();
2022    }
2023    
2024    String LSCPServer::RemoveMIDIInstrumentMapping(uint MidiMapID, uint MidiBank, uint MidiProg) {
2025        dmsg(2,("LSCPServer: RemoveMIDIInstrumentMapping()\n"));
2026    
2027        midi_prog_index_t idx;
2028        idx.midi_bank_msb = (MidiBank >> 7) & 0x7f;
2029        idx.midi_bank_lsb = MidiBank & 0x7f;
2030        idx.midi_prog     = MidiProg;
2031    
2032        LSCPResultSet result;
2033        try {
2034            MidiInstrumentMapper::RemoveEntry(MidiMapID, idx);
2035        } catch (Exception e) {
2036            result.Error(e);
2037        }
2038        return result.Produce();
2039    }
2040    
2041    String LSCPServer::GetMidiInstrumentMappings(uint MidiMapID) {
2042        dmsg(2,("LSCPServer: GetMidiInstrumentMappings()\n"));
2043        LSCPResultSet result;
2044        try {
2045            result.Add(MidiInstrumentMapper::GetInstrumentCount(MidiMapID));
2046        } catch (Exception e) {
2047            result.Error(e);
2048        }
2049        return result.Produce();
2050    }
2051    
2052    
2053    String LSCPServer::GetAllMidiInstrumentMappings() {
2054        dmsg(2,("LSCPServer: GetAllMidiInstrumentMappings()\n"));
2055        LSCPResultSet result;
2056        try {
2057            result.Add(MidiInstrumentMapper::GetInstrumentCount());
2058        } catch (Exception e) {
2059            result.Error(e);
2060        }
2061        return result.Produce();
2062    }
2063    
2064    String LSCPServer::GetMidiInstrumentMapping(uint MidiMapID, uint MidiBank, uint MidiProg) {
2065        dmsg(2,("LSCPServer: GetMidiIstrumentMapping()\n"));
2066        LSCPResultSet result;
2067        try {
2068            MidiInstrumentMapper::entry_t entry = MidiInstrumentMapper::GetEntry(MidiMapID, MidiBank, MidiProg);
2069            // convert the filename into the correct encoding as defined for LSCP
2070            // (especially in terms of special characters -> escape sequences)
2071    #if WIN32
2072            const String instrumentFileName = Path::fromWindows(entry.InstrumentFile).toLscp();
2073    #else
2074            // assuming POSIX
2075            const String instrumentFileName = Path::fromPosix(entry.InstrumentFile).toLscp();
2076    #endif
2077    
2078            result.Add("NAME", _escapeLscpResponse(entry.Name));
2079            result.Add("ENGINE_NAME", entry.EngineName);
2080            result.Add("INSTRUMENT_FILE", instrumentFileName);
2081            result.Add("INSTRUMENT_NR", (int) entry.InstrumentIndex);
2082            String instrumentName;
2083            Engine* pEngine = EngineFactory::Create(entry.EngineName);
2084            if (pEngine) {
2085                if (pEngine->GetInstrumentManager()) {
2086                    InstrumentManager::instrument_id_t instrID;
2087                    instrID.FileName = entry.InstrumentFile;
2088                    instrID.Index    = entry.InstrumentIndex;
2089                    instrumentName = pEngine->GetInstrumentManager()->GetInstrumentName(instrID);
2090                }
2091                EngineFactory::Destroy(pEngine);
2092            }
2093            result.Add("INSTRUMENT_NAME", _escapeLscpResponse(instrumentName));
2094            switch (entry.LoadMode) {
2095                case MidiInstrumentMapper::ON_DEMAND:
2096                    result.Add("LOAD_MODE", "ON_DEMAND");
2097                    break;
2098                case MidiInstrumentMapper::ON_DEMAND_HOLD:
2099                    result.Add("LOAD_MODE", "ON_DEMAND_HOLD");
2100                    break;
2101                case MidiInstrumentMapper::PERSISTENT:
2102                    result.Add("LOAD_MODE", "PERSISTENT");
2103                    break;
2104                default:
2105                    throw Exception("entry reflects invalid LOAD_MODE, consider this as a bug!");
2106            }
2107            result.Add("VOLUME", entry.Volume);
2108        } catch (Exception e) {
2109            result.Error(e);
2110        }
2111        return result.Produce();
2112    }
2113    
2114    String LSCPServer::ListMidiInstrumentMappings(uint MidiMapID) {
2115        dmsg(2,("LSCPServer: ListMidiInstrumentMappings()\n"));
2116        LSCPResultSet result;
2117        try {
2118            String s;
2119            std::map<midi_prog_index_t,MidiInstrumentMapper::entry_t> mappings = MidiInstrumentMapper::Entries(MidiMapID);
2120            std::map<midi_prog_index_t,MidiInstrumentMapper::entry_t>::iterator iter = mappings.begin();
2121            for (; iter != mappings.end(); iter++) {
2122                if (s.size()) s += ",";
2123                s += "{" + ToString(MidiMapID) + ","
2124                         + ToString((int(iter->first.midi_bank_msb) << 7) | int(iter->first.midi_bank_lsb)) + ","
2125                         + ToString(int(iter->first.midi_prog)) + "}";
2126            }
2127            result.Add(s);
2128        } catch (Exception e) {
2129            result.Error(e);
2130        }
2131        return result.Produce();
2132    }
2133    
2134    String LSCPServer::ListAllMidiInstrumentMappings() {
2135        dmsg(2,("LSCPServer: ListAllMidiInstrumentMappings()\n"));
2136        LSCPResultSet result;
2137        try {
2138            std::vector<int> maps = MidiInstrumentMapper::Maps();
2139            String s;
2140            for (int i = 0; i < maps.size(); i++) {
2141                std::map<midi_prog_index_t,MidiInstrumentMapper::entry_t> mappings = MidiInstrumentMapper::Entries(maps[i]);
2142                std::map<midi_prog_index_t,MidiInstrumentMapper::entry_t>::iterator iter = mappings.begin();
2143                for (; iter != mappings.end(); iter++) {
2144                    if (s.size()) s += ",";
2145                    s += "{" + ToString(maps[i]) + ","
2146                             + ToString((int(iter->first.midi_bank_msb) << 7) | int(iter->first.midi_bank_lsb)) + ","
2147                             + ToString(int(iter->first.midi_prog)) + "}";
2148                }
2149            }
2150            result.Add(s);
2151        } catch (Exception e) {
2152            result.Error(e);
2153        }
2154        return result.Produce();
2155    }
2156    
2157    String LSCPServer::ClearMidiInstrumentMappings(uint MidiMapID) {
2158        dmsg(2,("LSCPServer: ClearMidiInstrumentMappings()\n"));
2159        LSCPResultSet result;
2160        try {
2161            MidiInstrumentMapper::RemoveAllEntries(MidiMapID);
2162        } catch (Exception e) {
2163            result.Error(e);
2164        }
2165        return result.Produce();
2166    }
2167    
2168    String LSCPServer::ClearAllMidiInstrumentMappings() {
2169        dmsg(2,("LSCPServer: ClearAllMidiInstrumentMappings()\n"));
2170        LSCPResultSet result;
2171        try {
2172            std::vector<int> maps = MidiInstrumentMapper::Maps();
2173            for (int i = 0; i < maps.size(); i++)
2174                MidiInstrumentMapper::RemoveAllEntries(maps[i]);
2175        } catch (Exception e) {
2176            result.Error(e);
2177        }
2178        return result.Produce();
2179    }
2180    
2181    String LSCPServer::AddMidiInstrumentMap(String MapName) {
2182        dmsg(2,("LSCPServer: AddMidiInstrumentMap()\n"));
2183        LSCPResultSet result;
2184        try {
2185            int MapID = MidiInstrumentMapper::AddMap(MapName);
2186            result = LSCPResultSet(MapID);
2187        } catch (Exception e) {
2188            result.Error(e);
2189        }
2190        return result.Produce();
2191    }
2192    
2193    String LSCPServer::RemoveMidiInstrumentMap(uint MidiMapID) {
2194        dmsg(2,("LSCPServer: RemoveMidiInstrumentMap()\n"));
2195        LSCPResultSet result;
2196        try {
2197            MidiInstrumentMapper::RemoveMap(MidiMapID);
2198        } catch (Exception e) {
2199            result.Error(e);
2200        }
2201        return result.Produce();
2202    }
2203    
2204    String LSCPServer::RemoveAllMidiInstrumentMaps() {
2205        dmsg(2,("LSCPServer: RemoveAllMidiInstrumentMaps()\n"));
2206        LSCPResultSet result;
2207        try {
2208            MidiInstrumentMapper::RemoveAllMaps();
2209        } catch (Exception e) {
2210            result.Error(e);
2211        }
2212        return result.Produce();
2213    }
2214    
2215    String LSCPServer::GetMidiInstrumentMaps() {
2216        dmsg(2,("LSCPServer: GetMidiInstrumentMaps()\n"));
2217        LSCPResultSet result;
2218        try {
2219            result.Add(MidiInstrumentMapper::Maps().size());
2220        } catch (Exception e) {
2221            result.Error(e);
2222        }
2223        return result.Produce();
2224    }
2225    
2226    String LSCPServer::ListMidiInstrumentMaps() {
2227        dmsg(2,("LSCPServer: ListMidiInstrumentMaps()\n"));
2228        LSCPResultSet result;
2229        try {
2230            std::vector<int> maps = MidiInstrumentMapper::Maps();
2231            String sList;
2232            for (int i = 0; i < maps.size(); i++) {
2233                if (sList != "") sList += ",";
2234                sList += ToString(maps[i]);
2235            }
2236            result.Add(sList);
2237        } catch (Exception e) {
2238            result.Error(e);
2239        }
2240        return result.Produce();
2241    }
2242    
2243    String LSCPServer::GetMidiInstrumentMap(uint MidiMapID) {
2244        dmsg(2,("LSCPServer: GetMidiInstrumentMap()\n"));
2245        LSCPResultSet result;
2246        try {
2247            result.Add("NAME", _escapeLscpResponse(MidiInstrumentMapper::MapName(MidiMapID)));
2248            result.Add("DEFAULT", MidiInstrumentMapper::GetDefaultMap() == MidiMapID);
2249        } catch (Exception e) {
2250            result.Error(e);
2251        }
2252        return result.Produce();
2253    }
2254    
2255    String LSCPServer::SetMidiInstrumentMapName(uint MidiMapID, String NewName) {
2256        dmsg(2,("LSCPServer: SetMidiInstrumentMapName()\n"));
2257        LSCPResultSet result;
2258        try {
2259            MidiInstrumentMapper::RenameMap(MidiMapID, NewName);
2260        } catch (Exception e) {
2261            result.Error(e);
2262        }
2263        return result.Produce();
2264    }
2265    
2266    /**
2267     * Set the MIDI instrument map the given sampler channel shall use for
2268     * handling MIDI program change messages. There are the following two
2269     * special (negative) values:
2270     *
2271     *    - (-1) :  set to NONE (ignore program changes)
2272     *    - (-2) :  set to DEFAULT map
2273     */
2274    String LSCPServer::SetChannelMap(uint uiSamplerChannel, int MidiMapID) {
2275        dmsg(2,("LSCPServer: SetChannelMap()\n"));
2276        LSCPResultSet result;
2277        try {
2278            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2279    
2280            if      (MidiMapID == -1) pEngineChannel->SetMidiInstrumentMapToNone();
2281            else if (MidiMapID == -2) pEngineChannel->SetMidiInstrumentMapToDefault();
2282            else                      pEngineChannel->SetMidiInstrumentMap(MidiMapID);
2283        } catch (Exception e) {
2284            result.Error(e);
2285        }
2286        return result.Produce();
2287    }
2288    
2289    String LSCPServer::CreateFxSend(uint uiSamplerChannel, uint MidiCtrl, String Name) {
2290        dmsg(2,("LSCPServer: CreateFxSend()\n"));
2291        LSCPResultSet result;
2292        try {
2293            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2294    
2295            FxSend* pFxSend = pEngineChannel->AddFxSend(MidiCtrl, Name);
2296            if (!pFxSend) throw Exception("Could not add FxSend, don't ask, I don't know why (probably a bug)");
2297    
2298            result = LSCPResultSet(pFxSend->Id()); // success
2299        } catch (Exception e) {
2300            result.Error(e);
2301        }
2302        return result.Produce();
2303    }
2304    
2305    String LSCPServer::DestroyFxSend(uint uiSamplerChannel, uint FxSendID) {
2306        dmsg(2,("LSCPServer: DestroyFxSend()\n"));
2307        LSCPResultSet result;
2308        try {
2309            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2310    
2311            FxSend* pFxSend = NULL;
2312            for (int i = 0; i < pEngineChannel->GetFxSendCount(); i++) {
2313                if (pEngineChannel->GetFxSend(i)->Id() == FxSendID) {
2314                    pFxSend = pEngineChannel->GetFxSend(i);
2315                    break;
2316                }
2317            }
2318            if (!pFxSend) throw Exception("There is no FxSend with that ID on the given sampler channel");
2319            pEngineChannel->RemoveFxSend(pFxSend);
2320        } catch (Exception e) {
2321            result.Error(e);
2322        }
2323        return result.Produce();
2324    }
2325    
2326    String LSCPServer::GetFxSends(uint uiSamplerChannel) {
2327        dmsg(2,("LSCPServer: GetFxSends()\n"));
2328        LSCPResultSet result;
2329        try {
2330            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2331    
2332            result.Add(pEngineChannel->GetFxSendCount());
2333        } catch (Exception e) {
2334            result.Error(e);
2335        }
2336        return result.Produce();
2337    }
2338    
2339    String LSCPServer::ListFxSends(uint uiSamplerChannel) {
2340        dmsg(2,("LSCPServer: ListFxSends()\n"));
2341        LSCPResultSet result;
2342        String list;
2343        try {
2344            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2345    
2346            for (int i = 0; i < pEngineChannel->GetFxSendCount(); i++) {
2347                FxSend* pFxSend = pEngineChannel->GetFxSend(i);
2348                if (list != "") list += ",";
2349                list += ToString(pFxSend->Id());
2350            }
2351            result.Add(list);
2352        } catch (Exception e) {
2353            result.Error(e);
2354        }
2355        return result.Produce();
2356    }
2357    
2358    FxSend* LSCPServer::GetFxSend(uint uiSamplerChannel, uint FxSendID) {
2359        EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2360    
2361        FxSend* pFxSend = NULL;
2362        for (int i = 0; i < pEngineChannel->GetFxSendCount(); i++) {
2363            if (pEngineChannel->GetFxSend(i)->Id() == FxSendID) {
2364                pFxSend = pEngineChannel->GetFxSend(i);
2365                break;
2366            }
2367        }
2368        if (!pFxSend) throw Exception("There is no FxSend with that ID on the given sampler channel");
2369        return pFxSend;
2370    }
2371    
2372    String LSCPServer::GetFxSendInfo(uint uiSamplerChannel, uint FxSendID) {
2373        dmsg(2,("LSCPServer: GetFxSendInfo()\n"));
2374        LSCPResultSet result;
2375        try {
2376            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2377            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2378    
2379            // gather audio routing informations
2380            String AudioRouting;
2381            for (int chan = 0; chan < pEngineChannel->Channels(); chan++) {
2382                if (AudioRouting != "") AudioRouting += ",";
2383                AudioRouting += ToString(pFxSend->DestinationChannel(chan));
2384            }
2385    
2386            const String sEffectRouting =
2387                (pFxSend->DestinationEffectChain() >= 0 && pFxSend->DestinationEffectChainPosition() >= 0)
2388                    ? ToString(pFxSend->DestinationEffectChain()) + "," + ToString(pFxSend->DestinationEffectChainPosition())
2389                    : "NONE";
2390    
2391            // success
2392            result.Add("NAME", _escapeLscpResponse(pFxSend->Name()));
2393            result.Add("MIDI_CONTROLLER", pFxSend->MidiController());
2394            result.Add("LEVEL", ToString(pFxSend->Level()));
2395            result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
2396            result.Add("SEND_EFFECT", sEffectRouting);
2397        } catch (Exception e) {
2398            result.Error(e);
2399        }
2400        return result.Produce();
2401    }
2402    
2403    String LSCPServer::SetFxSendName(uint uiSamplerChannel, uint FxSendID, String Name) {
2404        dmsg(2,("LSCPServer: SetFxSendName()\n"));
2405        LSCPResultSet result;
2406        try {
2407            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2408    
2409            pFxSend->SetName(Name);
2410            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2411        } catch (Exception e) {
2412            result.Error(e);
2413        }
2414        return result.Produce();
2415    }
2416    
2417    String LSCPServer::SetFxSendAudioOutputChannel(uint uiSamplerChannel, uint FxSendID, uint FxSendChannel, uint DeviceChannel) {
2418        dmsg(2,("LSCPServer: SetFxSendAudioOutputChannel()\n"));
2419        LSCPResultSet result;
2420        try {
2421            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2422    
2423            pFxSend->SetDestinationChannel(FxSendChannel, DeviceChannel);
2424            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2425        } catch (Exception e) {
2426            result.Error(e);
2427        }
2428        return result.Produce();
2429    }
2430    
2431    String LSCPServer::SetFxSendMidiController(uint uiSamplerChannel, uint FxSendID, uint MidiController) {
2432        dmsg(2,("LSCPServer: SetFxSendMidiController()\n"));
2433        LSCPResultSet result;
2434        try {
2435            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2436    
2437            pFxSend->SetMidiController(MidiController);
2438            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2439        } catch (Exception e) {
2440            result.Error(e);
2441        }
2442        return result.Produce();
2443    }
2444    
2445    String LSCPServer::SetFxSendLevel(uint uiSamplerChannel, uint FxSendID, double dLevel) {
2446        dmsg(2,("LSCPServer: SetFxSendLevel()\n"));
2447        LSCPResultSet result;
2448        try {
2449            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2450    
2451            pFxSend->SetLevel((float)dLevel);
2452            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2453        } catch (Exception e) {
2454            result.Error(e);
2455        }
2456        return result.Produce();
2457    }
2458    
2459    String LSCPServer::SetFxSendEffect(uint uiSamplerChannel, uint FxSendID, int iSendEffectChain, int iEffectChainPosition) {
2460        dmsg(2,("LSCPServer: SetFxSendEffect(%d,%d)\n", iSendEffectChain, iEffectChainPosition));
2461        LSCPResultSet result;
2462        try {
2463            FxSend* pFxSend = GetFxSend(uiSamplerChannel, FxSendID);
2464    
2465            pFxSend->SetDestinationEffect(iSendEffectChain, iEffectChainPosition);
2466            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_fx_send_info, uiSamplerChannel, FxSendID));
2467        } catch (Exception e) {
2468            result.Error(e);
2469        }
2470        return result.Produce();
2471    }
2472    
2473    String LSCPServer::GetAvailableEffects() {
2474        dmsg(2,("LSCPServer: GetAvailableEffects()\n"));
2475        LSCPResultSet result;
2476        try {
2477            int n = EffectFactory::AvailableEffectsCount();
2478            result.Add(n);
2479        }
2480        catch (Exception e) {
2481            result.Error(e);
2482        }
2483        return result.Produce();
2484    }
2485    
2486    String LSCPServer::ListAvailableEffects() {
2487        dmsg(2,("LSCPServer: ListAvailableEffects()\n"));
2488        LSCPResultSet result;
2489        String list;
2490        try {
2491            //FIXME: for now we simply enumerate from 0 .. EffectFactory::AvailableEffectsCount() here, in future we should use unique IDs for effects during the whole sampler session. This issue comes into game when the user forces a reload of available effect plugins
2492            int n = EffectFactory::AvailableEffectsCount();
2493            for (int i = 0; i < n; i++) {
2494                if (i) list += ",";
2495                list += ToString(i);
2496            }
2497        }
2498        catch (Exception e) {
2499            result.Error(e);
2500        }
2501        result.Add(list);
2502        return result.Produce();
2503    }
2504    
2505    String LSCPServer::GetEffectInfo(int iEffectIndex) {
2506        dmsg(2,("LSCPServer: GetEffectInfo(%d)\n", iEffectIndex));
2507        LSCPResultSet result;
2508        try {
2509            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(iEffectIndex);
2510            if (!pEffectInfo)
2511                throw Exception("There is no effect with index " + ToString(iEffectIndex));
2512    
2513            // convert the filename into the correct encoding as defined for LSCP
2514            // (especially in terms of special characters -> escape sequences)
2515    #if WIN32
2516            const String dllFileName = Path::fromWindows(pEffectInfo->Module()).toLscp();
2517    #else
2518            // assuming POSIX
2519            const String dllFileName = Path::fromPosix(pEffectInfo->Module()).toLscp();
2520    #endif
2521    
2522            result.Add("SYSTEM", pEffectInfo->EffectSystem());
2523            result.Add("MODULE", dllFileName);
2524            result.Add("NAME", _escapeLscpResponse(pEffectInfo->Name()));
2525            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectInfo->Description()));
2526        }
2527        catch (Exception e) {
2528            result.Error(e);
2529        }
2530        return result.Produce();    
2531    }
2532    
2533    String LSCPServer::GetEffectInstanceInfo(int iEffectInstance) {
2534        dmsg(2,("LSCPServer: GetEffectInstanceInfo(%d)\n", iEffectInstance));
2535        LSCPResultSet result;
2536        try {
2537            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2538            if (!pEffect)
2539                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2540    
2541            EffectInfo* pEffectInfo = pEffect->GetEffectInfo();
2542    
2543            // convert the filename into the correct encoding as defined for LSCP
2544            // (especially in terms of special characters -> escape sequences)
2545    #if WIN32
2546            const String dllFileName = Path::fromWindows(pEffectInfo->Module()).toLscp();
2547    #else
2548            // assuming POSIX
2549            const String dllFileName = Path::fromPosix(pEffectInfo->Module()).toLscp();
2550    #endif
2551    
2552            result.Add("SYSTEM", pEffectInfo->EffectSystem());
2553            result.Add("MODULE", dllFileName);
2554            result.Add("NAME", _escapeLscpResponse(pEffectInfo->Name()));
2555            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectInfo->Description()));
2556            result.Add("INPUT_CONTROLS", ToString(pEffect->InputControlCount()));
2557        }
2558        catch (Exception e) {
2559            result.Error(e);
2560        }
2561        return result.Produce();
2562    }
2563    
2564    String LSCPServer::GetEffectInstanceInputControlInfo(int iEffectInstance, int iInputControlIndex) {
2565        dmsg(2,("LSCPServer: GetEffectInstanceInputControlInfo(%d,%d)\n", iEffectInstance, iInputControlIndex));
2566        LSCPResultSet result;
2567        try {
2568            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2569            if (!pEffect)
2570                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2571    
2572            EffectControl* pEffectControl = pEffect->InputControl(iInputControlIndex);
2573            if (!pEffectControl)
2574                throw Exception(
2575                    "Effect instance " + ToString(iEffectInstance) +
2576                    " does not have an input control with index " +
2577                    ToString(iInputControlIndex)
2578                );
2579    
2580            result.Add("DESCRIPTION", _escapeLscpResponse(pEffectControl->Description()));
2581            result.Add("VALUE", pEffectControl->Value());
2582            if (pEffectControl->MinValue())
2583                 result.Add("RANGE_MIN", *pEffectControl->MinValue());
2584            if (pEffectControl->MaxValue())
2585                 result.Add("RANGE_MAX", *pEffectControl->MaxValue());
2586            if (!pEffectControl->Possibilities().empty())
2587                 result.Add("POSSIBILITIES", pEffectControl->Possibilities());
2588            if (pEffectControl->DefaultValue())
2589                 result.Add("DEFAULT", *pEffectControl->DefaultValue());
2590        } catch (Exception e) {
2591            result.Error(e);
2592        }
2593        return result.Produce();
2594    }
2595    
2596    String LSCPServer::SetEffectInstanceInputControlValue(int iEffectInstance, int iInputControlIndex, double dValue) {
2597        dmsg(2,("LSCPServer: SetEffectInstanceInputControlValue(%d,%d,%f)\n", iEffectInstance, iInputControlIndex, dValue));
2598        LSCPResultSet result;
2599        try {
2600            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2601            if (!pEffect)
2602                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2603    
2604            EffectControl* pEffectControl = pEffect->InputControl(iInputControlIndex);
2605            if (!pEffectControl)
2606                throw Exception(
2607                    "Effect instance " + ToString(iEffectInstance) +
2608                    " does not have an input control with index " +
2609                    ToString(iInputControlIndex)
2610                );
2611    
2612            pEffectControl->SetValue(dValue);
2613        } catch (Exception e) {
2614            result.Error(e);
2615        }
2616        return result.Produce();
2617    }
2618    
2619    String LSCPServer::CreateEffectInstance(int iEffectIndex) {
2620        dmsg(2,("LSCPServer: CreateEffectInstance(%d)\n", iEffectIndex));
2621        LSCPResultSet result;
2622        try {
2623            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(iEffectIndex);
2624            if (!pEffectInfo)
2625                throw Exception("There is no effect with index " + ToString(iEffectIndex));
2626            Effect* pEffect = EffectFactory::Create(pEffectInfo);
2627            result = pEffect->ID(); // success
2628        } catch (Exception e) {
2629            result.Error(e);
2630        }
2631        return result.Produce();
2632    }
2633    
2634    String LSCPServer::CreateEffectInstance(String effectSystem, String module, String effectName) {
2635        dmsg(2,("LSCPServer: CreateEffectInstance('%s','%s','%s')\n", effectSystem.c_str(), module.c_str(), effectName.c_str()));
2636        LSCPResultSet result;
2637        try {
2638            // to allow loading the same LSCP session file on different systems
2639            // successfully, probably with different effect plugin DLL paths or even
2640            // running completely different operating systems, we do the following
2641            // for finding the right effect:
2642            //
2643            // first try to search for an exact match of the effect plugin DLL
2644            // (a.k.a 'module'), to avoid picking the wrong DLL with the same
2645            // effect name ...
2646            EffectInfo* pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_MATCH_EXACTLY);
2647            // ... if no effect with exactly matchin DLL filename was found, then
2648            // try to lower the restrictions of matching the effect plugin DLL
2649            // filename and try again and again ...
2650            if (!pEffectInfo) {
2651                dmsg(2,("no exact module match, trying MODULE_IGNORE_PATH\n"));
2652                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH);
2653            }
2654            if (!pEffectInfo) {
2655                dmsg(2,("no module match, trying MODULE_IGNORE_PATH | MODULE_IGNORE_CASE\n"));
2656                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH | EffectFactory::MODULE_IGNORE_CASE);
2657            }
2658            if (!pEffectInfo) {
2659                dmsg(2,("no module match, trying MODULE_IGNORE_PATH | MODULE_IGNORE_CASE | MODULE_IGNORE_EXTENSION\n"));
2660                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_PATH | EffectFactory::MODULE_IGNORE_CASE | EffectFactory::MODULE_IGNORE_EXTENSION);
2661            }
2662            // ... if there was still no effect found, then completely ignore the
2663            // DLL plugin filename argument and just search for the matching effect
2664            // system type and effect name
2665            if (!pEffectInfo) {
2666                dmsg(2,("no module match, trying MODULE_IGNORE_ALL\n"));
2667                pEffectInfo = EffectFactory::GetEffectInfo(effectSystem, module, effectName, EffectFactory::MODULE_IGNORE_ALL);
2668            }
2669            if (!pEffectInfo)
2670                throw Exception("There is no such effect '" + effectSystem + "' '" + module + "' '" + effectName + "'");
2671    
2672            Effect* pEffect = EffectFactory::Create(pEffectInfo);
2673            result = LSCPResultSet(pEffect->ID());
2674        } catch (Exception e) {
2675            result.Error(e);
2676        }
2677        return result.Produce();
2678    }
2679    
2680    String LSCPServer::DestroyEffectInstance(int iEffectInstance) {
2681        dmsg(2,("LSCPServer: DestroyEffectInstance(%d)\n", iEffectInstance));
2682        LSCPResultSet result;
2683        try {
2684            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2685            if (!pEffect)
2686                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2687            EffectFactory::Destroy(pEffect);
2688        } catch (Exception e) {
2689            result.Error(e);
2690        }
2691        return result.Produce();
2692    }
2693    
2694    String LSCPServer::GetEffectInstances() {
2695        dmsg(2,("LSCPServer: GetEffectInstances()\n"));
2696        LSCPResultSet result;
2697        try {
2698            int n = EffectFactory::EffectInstancesCount();
2699            result.Add(n);
2700        } catch (Exception e) {
2701            result.Error(e);
2702        }
2703        return result.Produce();
2704    }
2705    
2706    String LSCPServer::ListEffectInstances() {
2707        dmsg(2,("LSCPServer: ListEffectInstances()\n"));
2708        LSCPResultSet result;
2709        String list;
2710        try {
2711            int n = EffectFactory::EffectInstancesCount();
2712            for (int i = 0; i < n; i++) {
2713                Effect* pEffect = EffectFactory::GetEffectInstance(i);
2714                if (i) list += ",";
2715                list += ToString(pEffect->ID());
2716            }
2717        } catch (Exception e) {
2718            result.Error(e);
2719        }
2720        result.Add(list);
2721        return result.Produce();
2722    }
2723    
2724    String LSCPServer::GetSendEffectChains(int iAudioOutputDevice) {
2725        dmsg(2,("LSCPServer: GetSendEffectChains(%d)\n", iAudioOutputDevice));
2726        LSCPResultSet result;
2727        try {
2728            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2729            if (!devices.count(iAudioOutputDevice))
2730                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2731            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2732            int n = pDevice->SendEffectChainCount();
2733            result.Add(n);
2734        } catch (Exception e) {
2735            result.Error(e);
2736        }
2737        return result.Produce();
2738    }
2739    
2740    String LSCPServer::ListSendEffectChains(int iAudioOutputDevice) {
2741        dmsg(2,("LSCPServer: ListSendEffectChains(%d)\n", iAudioOutputDevice));
2742        LSCPResultSet result;
2743        String list;
2744        try {
2745            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2746            if (!devices.count(iAudioOutputDevice))
2747                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2748            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2749            int n = pDevice->SendEffectChainCount();
2750            for (int i = 0; i < n; i++) {
2751                EffectChain* pEffectChain = pDevice->SendEffectChain(i);
2752                if (i) list += ",";
2753                list += ToString(pEffectChain->ID());
2754            }
2755        } catch (Exception e) {
2756            result.Error(e);
2757        }
2758        result.Add(list);
2759        return result.Produce();
2760    }
2761    
2762    String LSCPServer::AddSendEffectChain(int iAudioOutputDevice) {
2763        dmsg(2,("LSCPServer: AddSendEffectChain(%d)\n", iAudioOutputDevice));
2764        LSCPResultSet result;
2765        try {
2766            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2767            if (!devices.count(iAudioOutputDevice))
2768                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2769            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2770            EffectChain* pEffectChain = pDevice->AddSendEffectChain();
2771            result = pEffectChain->ID();
2772        } catch (Exception e) {
2773            result.Error(e);
2774        }
2775        return result.Produce();
2776    }
2777    
2778    String LSCPServer::RemoveSendEffectChain(int iAudioOutputDevice, int iSendEffectChain) {
2779        dmsg(2,("LSCPServer: RemoveSendEffectChain(%d,%d)\n", iAudioOutputDevice, iSendEffectChain));
2780        LSCPResultSet result;
2781        try {
2782            std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2783            if (!devices.count(iAudioOutputDevice))
2784                throw Exception("There is no audio output device with index " + ToString(iAudioOutputDevice) + ".");
2785            AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2786            for (int i = 0; i < pDevice->SendEffectChainCount(); i++) {
2787                EffectChain* pEffectChain = pDevice->SendEffectChain(i);
2788                if (pEffectChain->ID() == iSendEffectChain) {
2789                    pDevice->RemoveSendEffectChain(i);
2790                    return result.Produce();
2791                }
2792            }
2793            throw Exception(
2794                "There is no send effect chain with ID " +
2795                ToString(iSendEffectChain) + " for audio output device " +
2796                ToString(iAudioOutputDevice) + "."
2797            );
2798        } catch (Exception e) {
2799            result.Error(e);
2800        }
2801        return result.Produce();
2802    }
2803    
2804    static EffectChain* _getSendEffectChain(Sampler* pSampler, int iAudioOutputDevice, int iSendEffectChain) throw (Exception) {
2805        std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
2806        if (!devices.count(iAudioOutputDevice))
2807            throw Exception(
2808                "There is no audio output device with index " +
2809                ToString(iAudioOutputDevice) + "."
2810            );
2811        AudioOutputDevice* pDevice = devices[iAudioOutputDevice];
2812        for (int i = 0; i < pDevice->SendEffectChainCount(); i++) {
2813            EffectChain* pEffectChain = pDevice->SendEffectChain(i);
2814            if (pEffectChain->ID() == iSendEffectChain) {
2815                return pEffectChain;
2816            }
2817        }
2818        throw Exception(
2819            "There is no send effect chain with ID " +
2820            ToString(iSendEffectChain) + " for audio output device " +
2821            ToString(iAudioOutputDevice) + "."
2822        );
2823    }
2824    
2825    String LSCPServer::GetSendEffectChainInfo(int iAudioOutputDevice, int iSendEffectChain) {
2826        dmsg(2,("LSCPServer: GetSendEffectChainInfo(%d,%d)\n", iAudioOutputDevice, iSendEffectChain));
2827        LSCPResultSet result;
2828        try {
2829            EffectChain* pEffectChain =
2830                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
2831            String sEffectSequence;
2832            for (int i = 0; i < pEffectChain->EffectCount(); i++) {
2833                if (i) sEffectSequence += ",";
2834                sEffectSequence += ToString(pEffectChain->GetEffect(i)->ID());
2835            }
2836            result.Add("EFFECT_COUNT", pEffectChain->EffectCount());
2837            result.Add("EFFECT_SEQUENCE", sEffectSequence);
2838        } catch (Exception e) {
2839            result.Error(e);
2840        }
2841        return result.Produce();
2842    }
2843    
2844    String LSCPServer::AppendSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectInstance) {
2845        dmsg(2,("LSCPServer: AppendSendEffectChainEffect(%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectInstance));
2846        LSCPResultSet result;
2847        try {
2848            EffectChain* pEffectChain =
2849                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
2850            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2851            if (!pEffect)
2852                throw Exception("There is no effect instance with ID " + ToString(iEffectInstance));
2853            pEffectChain->AppendEffect(pEffect);
2854        } catch (Exception e) {
2855            result.Error(e);
2856        }
2857        return result.Produce();
2858    }
2859    
2860    String LSCPServer::InsertSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectChainPosition, int iEffectInstance) {
2861        dmsg(2,("LSCPServer: InsertSendEffectChainEffect(%d,%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectChainPosition, iEffectInstance));
2862        LSCPResultSet result;
2863        try {
2864            EffectChain* pEffectChain =
2865                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
2866            Effect* pEffect = EffectFactory::GetEffectInstanceByID(iEffectInstance);
2867            if (!pEffect)
2868                throw Exception("There is no effect instance with index " + ToString(iEffectInstance));
2869            pEffectChain->InsertEffect(pEffect, iEffectChainPosition);
2870        } catch (Exception e) {
2871            result.Error(e);
2872        }
2873        return result.Produce();
2874    }
2875    
2876    String LSCPServer::RemoveSendEffectChainEffect(int iAudioOutputDevice, int iSendEffectChain, int iEffectChainPosition) {
2877        dmsg(2,("LSCPServer: RemoveSendEffectChainEffect(%d,%d,%d)\n", iAudioOutputDevice, iSendEffectChain, iEffectChainPosition));
2878        LSCPResultSet result;
2879        try {
2880            EffectChain* pEffectChain =
2881                _getSendEffectChain(pSampler, iAudioOutputDevice, iSendEffectChain);
2882            pEffectChain->RemoveEffect(iEffectChainPosition);
2883        } catch (Exception e) {
2884            result.Error(e);
2885        }
2886        return result.Produce();
2887    }
2888    
2889    String LSCPServer::EditSamplerChannelInstrument(uint uiSamplerChannel) {
2890        dmsg(2,("LSCPServer: EditSamplerChannelInstrument(SamplerChannel=%d)\n", uiSamplerChannel));
2891        LSCPResultSet result;
2892        try {
2893            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2894            if (pEngineChannel->InstrumentStatus() < 0) throw Exception("No instrument loaded to sampler channel");
2895            Engine* pEngine = pEngineChannel->GetEngine();
2896            InstrumentManager* pInstrumentManager = pEngine->GetInstrumentManager();
2897            if (!pInstrumentManager) throw Exception("Engine does not provide an instrument manager");
2898            InstrumentManager::instrument_id_t instrumentID;
2899            instrumentID.FileName = pEngineChannel->InstrumentFileName();
2900            instrumentID.Index    = pEngineChannel->InstrumentIndex();
2901            pInstrumentManager->LaunchInstrumentEditor(instrumentID);
2902        } catch (Exception e) {
2903            result.Error(e);
2904        }
2905        return result.Produce();
2906    }
2907    
2908    String LSCPServer::SendChannelMidiData(String MidiMsg, uint uiSamplerChannel, uint Arg1, uint Arg2) {
2909        dmsg(2,("LSCPServer: SendChannelMidiData(MidiMsg=%s,uiSamplerChannel=%d,Arg1=%d,Arg2=%d)\n", MidiMsg.c_str(), uiSamplerChannel, Arg1, Arg2));
2910        LSCPResultSet result;
2911        try {
2912            EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2913    
2914            if (Arg1 > 127 || Arg2 > 127) {
2915                throw Exception("Invalid MIDI message");
2916            }
2917    
2918            VirtualMidiDevice* pMidiDevice = NULL;
2919            std::vector<EventHandler::midi_listener_entry>::iterator iter = eventHandler.channelMidiListeners.begin();
2920            for (; iter != eventHandler.channelMidiListeners.end(); ++iter) {
2921                if ((*iter).pEngineChannel == pEngineChannel) {
2922                    pMidiDevice = (*iter).pMidiListener;
2923                    break;
2924                }
2925            }
2926            
2927            if(pMidiDevice == NULL) throw Exception("Couldn't find virtual MIDI device");
2928    
2929            if (MidiMsg == "NOTE_ON") {
2930                pMidiDevice->SendNoteOnToDevice(Arg1, Arg2);
2931                bool b = pMidiDevice->SendNoteOnToSampler(Arg1, Arg2);
2932                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
2933            } else if (MidiMsg == "NOTE_OFF") {
2934                pMidiDevice->SendNoteOffToDevice(Arg1, Arg2);
2935                bool b = pMidiDevice->SendNoteOffToSampler(Arg1, Arg2);
2936                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
2937            } else if (MidiMsg == "CC") {
2938                pMidiDevice->SendCCToDevice(Arg1, Arg2);
2939                bool b = pMidiDevice->SendCCToSampler(Arg1, Arg2);
2940                if (!b) throw Exception("MIDI event failed: " + MidiMsg + " " + ToString(Arg1) + " " + ToString(Arg2));
2941            } else {
2942                throw Exception("Unknown MIDI message type: " + MidiMsg);
2943            }
2944        } catch (Exception e) {
2945            result.Error(e);
2946        }
2947        return result.Produce();
2948  }  }
2949    
2950  /**  /**
# Line 405  String LSCPServer::SetVolume(double Volu Line 2952  String LSCPServer::SetVolume(double Volu
2952   */   */
2953  String LSCPServer::ResetChannel(uint uiSamplerChannel) {  String LSCPServer::ResetChannel(uint uiSamplerChannel) {
2954      dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));      dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));
2955      result_t result;      LSCPResultSet result;
2956      try {      try {
2957          SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);          EngineChannel* pEngineChannel = GetEngineChannel(uiSamplerChannel);
2958          if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");          pEngineChannel->Reset();
2959          Engine* pEngine = pSamplerChannel->GetEngine();      }
2960          if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");      catch (Exception e) {
2961          pEngine->Reset();           result.Error(e);
2962          result.type = result_type_success;      }
2963      }      return result.Produce();
2964      catch (LinuxSamplerException e) {  }
2965           e.PrintMessage();  
2966           result.type    = result_type_error;  /**
2967           result.code    = LSCP_ERR_UNKNOWN;   * Will be called by the parser to reset the whole sampler.
2968           result.message = e.Message();   */
2969    String LSCPServer::ResetSampler() {
2970        dmsg(2,("LSCPServer: ResetSampler()\n"));
2971        pSampler->Reset();
2972        LSCPResultSet result;
2973        return result.Produce();
2974    }
2975    
2976    /**
2977     * Will be called by the parser to return general informations about this
2978     * sampler.
2979     */
2980    String LSCPServer::GetServerInfo() {
2981        dmsg(2,("LSCPServer: GetServerInfo()\n"));
2982        const std::string description =
2983            _escapeLscpResponse("LinuxSampler - modular, streaming capable sampler");
2984        LSCPResultSet result;
2985        result.Add("DESCRIPTION", description);
2986        result.Add("VERSION", VERSION);
2987        result.Add("PROTOCOL_VERSION", ToString(LSCP_RELEASE_MAJOR) + "." + ToString(LSCP_RELEASE_MINOR));
2988    #if HAVE_SQLITE3
2989        result.Add("INSTRUMENTS_DB_SUPPORT", "yes");
2990    #else
2991        result.Add("INSTRUMENTS_DB_SUPPORT", "no");
2992    #endif
2993    
2994        return result.Produce();
2995    }
2996    
2997    /**
2998     * Will be called by the parser to return the current number of all active streams.
2999     */
3000    String LSCPServer::GetTotalStreamCount() {
3001        dmsg(2,("LSCPServer: GetTotalStreamCount()\n"));
3002        LSCPResultSet result;
3003        result.Add(pSampler->GetDiskStreamCount());
3004        return result.Produce();
3005    }
3006    
3007    /**
3008     * Will be called by the parser to return the current number of all active voices.
3009     */
3010    String LSCPServer::GetTotalVoiceCount() {
3011        dmsg(2,("LSCPServer: GetTotalVoiceCount()\n"));
3012        LSCPResultSet result;
3013        result.Add(pSampler->GetVoiceCount());
3014        return result.Produce();
3015    }
3016    
3017    /**
3018     * Will be called by the parser to return the maximum number of voices.
3019     */
3020    String LSCPServer::GetTotalVoiceCountMax() {
3021        dmsg(2,("LSCPServer: GetTotalVoiceCountMax()\n"));
3022        LSCPResultSet result;
3023        result.Add(EngineFactory::EngineInstances().size() * GLOBAL_MAX_VOICES);
3024        return result.Produce();
3025    }
3026    
3027    /**
3028     * Will be called by the parser to return the sampler global maximum
3029     * allowed number of voices.
3030     */
3031    String LSCPServer::GetGlobalMaxVoices() {
3032        dmsg(2,("LSCPServer: GetGlobalMaxVoices()\n"));
3033        LSCPResultSet result;
3034        result.Add(GLOBAL_MAX_VOICES);
3035        return result.Produce();
3036    }
3037    
3038    /**
3039     * Will be called by the parser to set the sampler global maximum number of
3040     * voices.
3041     */
3042    String LSCPServer::SetGlobalMaxVoices(int iVoices) {
3043        dmsg(2,("LSCPServer: SetGlobalMaxVoices(%d)\n", iVoices));
3044        LSCPResultSet result;
3045        try {
3046            if (iVoices < 1) throw Exception("Maximum voices may not be less than 1");
3047            GLOBAL_MAX_VOICES = iVoices; // see common/global_private.cpp
3048            const std::set<Engine*>& engines = EngineFactory::EngineInstances();
3049            if (engines.size() > 0) {
3050                std::set<Engine*>::iterator iter = engines.begin();
3051                std::set<Engine*>::iterator end  = engines.end();
3052                for (; iter != end; ++iter) {
3053                    (*iter)->SetMaxVoices(iVoices);
3054                }
3055            }
3056            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_global_info, "VOICES", GLOBAL_MAX_VOICES));
3057        } catch (Exception e) {
3058            result.Error(e);
3059      }      }
3060      return ConvertResult(result);      return result.Produce();
3061    }
3062    
3063    /**
3064     * Will be called by the parser to return the sampler global maximum
3065     * allowed number of disk streams.
3066     */
3067    String LSCPServer::GetGlobalMaxStreams() {
3068        dmsg(2,("LSCPServer: GetGlobalMaxStreams()\n"));
3069        LSCPResultSet result;
3070        result.Add(GLOBAL_MAX_STREAMS);
3071        return result.Produce();
3072    }
3073    
3074    /**
3075     * Will be called by the parser to set the sampler global maximum number of
3076     * disk streams.
3077     */
3078    String LSCPServer::SetGlobalMaxStreams(int iStreams) {
3079        dmsg(2,("LSCPServer: SetGlobalMaxStreams(%d)\n", iStreams));
3080        LSCPResultSet result;
3081        try {
3082            if (iStreams < 0) throw Exception("Maximum disk streams may not be negative");
3083            GLOBAL_MAX_STREAMS = iStreams; // see common/global_private.cpp
3084            const std::set<Engine*>& engines = EngineFactory::EngineInstances();
3085            if (engines.size() > 0) {
3086                std::set<Engine*>::iterator iter = engines.begin();
3087                std::set<Engine*>::iterator end  = engines.end();
3088                for (; iter != end; ++iter) {
3089                    (*iter)->SetMaxDiskStreams(iStreams);
3090                }
3091            }
3092            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_global_info, "STREAMS", GLOBAL_MAX_STREAMS));
3093        } catch (Exception e) {
3094            result.Error(e);
3095        }
3096        return result.Produce();
3097    }
3098    
3099    String LSCPServer::GetGlobalVolume() {
3100        LSCPResultSet result;
3101        result.Add(ToString(GLOBAL_VOLUME)); // see common/global.cpp
3102        return result.Produce();
3103    }
3104    
3105    String LSCPServer::SetGlobalVolume(double dVolume) {
3106        LSCPResultSet result;
3107        try {
3108            if (dVolume < 0) throw Exception("Volume may not be negative");
3109            GLOBAL_VOLUME = dVolume; // see common/global_private.cpp
3110            LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_global_info, "VOLUME", GLOBAL_VOLUME));
3111        } catch (Exception e) {
3112            result.Error(e);
3113        }
3114        return result.Produce();
3115    }
3116    
3117    String LSCPServer::GetFileInstruments(String Filename) {
3118        dmsg(2,("LSCPServer: GetFileInstruments(String Filename=%s)\n",Filename.c_str()));
3119        LSCPResultSet result;
3120        try {
3121            VerifyFile(Filename);
3122        } catch (Exception e) {
3123            result.Error(e);
3124            return result.Produce();
3125        }
3126        // try to find a sampler engine that can handle the file
3127        bool bFound = false;
3128        std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
3129        for (int i = 0; !bFound && i < engineTypes.size(); i++) {
3130            Engine* pEngine = NULL;
3131            try {
3132                pEngine = EngineFactory::Create(engineTypes[i]);
3133                if (!pEngine) throw Exception("Internal error: could not create '" + engineTypes[i] + "' engine");
3134                InstrumentManager* pManager = pEngine->GetInstrumentManager();
3135                if (pManager) {
3136                    std::vector<InstrumentManager::instrument_id_t> IDs =
3137                        pManager->GetInstrumentFileContent(Filename);
3138                    // return the amount of instruments in the file
3139                    result.Add(IDs.size());
3140                    // no more need to ask other engine types
3141                    bFound = true;
3142                } else dmsg(1,("Warning: engine '%s' does not provide an instrument manager\n", engineTypes[i].c_str()));
3143            } catch (Exception e) {
3144                // NOOP, as exception is thrown if engine doesn't support file
3145            }
3146            if (pEngine) EngineFactory::Destroy(pEngine);
3147        }
3148    
3149        if (!bFound) result.Error("Unknown file format");
3150        return result.Produce();
3151    }
3152    
3153    String LSCPServer::ListFileInstruments(String Filename) {
3154        dmsg(2,("LSCPServer: ListFileInstruments(String Filename=%s)\n",Filename.c_str()));
3155        LSCPResultSet result;
3156        try {
3157            VerifyFile(Filename);
3158        } catch (Exception e) {
3159            result.Error(e);
3160            return result.Produce();
3161        }
3162        // try to find a sampler engine that can handle the file
3163        bool bFound = false;
3164        std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
3165        for (int i = 0; !bFound && i < engineTypes.size(); i++) {
3166            Engine* pEngine = NULL;
3167            try {
3168                pEngine = EngineFactory::Create(engineTypes[i]);
3169                if (!pEngine) throw Exception("Internal error: could not create '" + engineTypes[i] + "' engine");
3170                InstrumentManager* pManager = pEngine->GetInstrumentManager();
3171                if (pManager) {
3172                    std::vector<InstrumentManager::instrument_id_t> IDs =
3173                        pManager->GetInstrumentFileContent(Filename);
3174                    // return a list of IDs of the instruments in the file
3175                    String s;
3176                    for (int j = 0; j < IDs.size(); j++) {
3177                        if (s.size()) s += ",";
3178                        s += ToString(IDs[j].Index);
3179                    }
3180                    result.Add(s);
3181                    // no more need to ask other engine types
3182                    bFound = true;
3183                } else dmsg(1,("Warning: engine '%s' does not provide an instrument manager\n", engineTypes[i].c_str()));
3184            } catch (Exception e) {
3185                // NOOP, as exception is thrown if engine doesn't support file
3186            }
3187            if (pEngine) EngineFactory::Destroy(pEngine);
3188        }
3189    
3190        if (!bFound) result.Error("Unknown file format");
3191        return result.Produce();
3192    }
3193    
3194    String LSCPServer::GetFileInstrumentInfo(String Filename, uint InstrumentID) {
3195        dmsg(2,("LSCPServer: GetFileInstrumentInfo(String Filename=%s, InstrumentID=%d)\n",Filename.c_str(),InstrumentID));
3196        LSCPResultSet result;
3197        try {
3198            VerifyFile(Filename);
3199        } catch (Exception e) {
3200            result.Error(e);
3201            return result.Produce();
3202        }
3203        InstrumentManager::instrument_id_t id;
3204        id.FileName = Filename;
3205        id.Index    = InstrumentID;
3206        // try to find a sampler engine that can handle the file
3207        bool bFound = false;
3208        bool bFatalErr = false;
3209        std::vector<String> engineTypes = EngineFactory::AvailableEngineTypes();
3210        for (int i = 0; !bFound && !bFatalErr && i < engineTypes.size(); i++) {
3211            Engine* pEngine = NULL;
3212            try {
3213                pEngine = EngineFactory::Create(engineTypes[i]);
3214                if (!pEngine) throw Exception("Internal error: could not create '" + engineTypes[i] + "' engine");
3215                InstrumentManager* pManager = pEngine->GetInstrumentManager();
3216                if (pManager) {
3217                    // check if the instrument index is valid
3218                    // FIXME: this won't work if an engine only supports parts of the instrument file
3219                    std::vector<InstrumentManager::instrument_id_t> IDs =
3220                        pManager->GetInstrumentFileContent(Filename);
3221                    if (std::find(IDs.begin(), IDs.end(), id) == IDs.end()) {
3222                        std::stringstream ss;
3223                        ss << "Invalid instrument index " << InstrumentID << " for instrument file '" << Filename << "'";
3224                        bFatalErr = true;
3225                        throw Exception(ss.str());
3226                    }
3227                    // get the info of the requested instrument
3228                    InstrumentManager::instrument_info_t info =
3229                        pManager->GetInstrumentInfo(id);
3230                    // return detailed informations about the file
3231                    result.Add("NAME", info.InstrumentName);
3232                    result.Add("FORMAT_FAMILY", engineTypes[i]);
3233                    result.Add("FORMAT_VERSION", info.FormatVersion);
3234                    result.Add("PRODUCT", info.Product);
3235                    result.Add("ARTISTS", info.Artists);
3236    
3237                    std::stringstream ss;
3238                    bool b = false;
3239                    for (int i = 0; i < 128; i++) {
3240                        if (info.KeyBindings[i]) {
3241                            if (b) ss << ',';
3242                            ss << i; b = true;
3243                        }
3244                    }
3245                    result.Add("KEY_BINDINGS", ss.str());
3246    
3247                    b = false;
3248                    std::stringstream ss2;
3249                    for (int i = 0; i < 128; i++) {
3250                        if (info.KeySwitchBindings[i]) {
3251                            if (b) ss2 << ',';
3252                            ss2 << i; b = true;
3253                        }
3254                    }
3255                    result.Add("KEYSWITCH_BINDINGS", ss2.str());
3256                    // no more need to ask other engine types
3257                    bFound = true;
3258                } else dmsg(1,("Warning: engine '%s' does not provide an instrument manager\n", engineTypes[i].c_str()));
3259            } catch (Exception e) {
3260                // usually NOOP, as exception is thrown if engine doesn't support file
3261                if (bFatalErr) result.Error(e);
3262            }
3263            if (pEngine) EngineFactory::Destroy(pEngine);
3264        }
3265    
3266        if (!bFound && !bFatalErr) result.Error("Unknown file format");
3267        return result.Produce();
3268    }
3269    
3270    void LSCPServer::VerifyFile(String Filename) {
3271        #if WIN32
3272        WIN32_FIND_DATA win32FileAttributeData;
3273        BOOL res = GetFileAttributesEx( Filename.c_str(), GetFileExInfoStandard, &win32FileAttributeData );
3274        if (!res) {
3275            std::stringstream ss;
3276            ss << "File does not exist, GetFileAttributesEx failed `" << Filename << "`: Error " << GetLastError();
3277            throw Exception(ss.str());
3278        }
3279        if ( win32FileAttributeData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ) {
3280            throw Exception("Directory is specified");
3281        }
3282        #else
3283        File f(Filename);
3284        if(!f.Exist()) throw Exception(f.GetErrorMsg());
3285        if (f.IsDirectory()) throw Exception("Directory is specified");
3286        #endif
3287  }  }
3288    
3289  /**  /**
3290   * Will be called by the parser to subscribe a client (frontend) on the   * Will be called by the parser to subscribe a client (frontend) on the
3291   * server for receiving event messages.   * server for receiving event messages.
3292   */   */
3293  String LSCPServer::SubscribeNotification(uint UDPPort) {  String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) {
3294      dmsg(2,("LSCPServer: SubscribeNotification(UDPPort=%d)\n", UDPPort));      dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
3295      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
3296        SubscriptionMutex.Lock();
3297        eventSubscriptions[type].push_back(currentSocket);
3298        SubscriptionMutex.Unlock();
3299        return result.Produce();
3300  }  }
3301    
3302  /**  /**
3303   * Will be called by the parser to unsubscribe a client on the server   * Will be called by the parser to unsubscribe a client on the server
3304   * for not receiving further event messages.   * for not receiving further event messages.
3305   */   */
3306  String LSCPServer::UnsubscribeNotification(String SessionID) {  String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) {
3307      dmsg(2,("LSCPServer: UnsubscribeNotification(SessionID=%s)\n", SessionID.c_str()));      dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
3308      return "ERR:0:Not implemented yet.\r\n";      LSCPResultSet result;
3309        SubscriptionMutex.Lock();
3310        eventSubscriptions[type].remove(currentSocket);
3311        SubscriptionMutex.Unlock();
3312        return result.Produce();
3313    }
3314    
3315    String LSCPServer::AddDbInstrumentDirectory(String Dir) {
3316        dmsg(2,("LSCPServer: AddDbInstrumentDirectory(Dir=%s)\n", Dir.c_str()));
3317        LSCPResultSet result;
3318    #if HAVE_SQLITE3
3319        try {
3320            InstrumentsDb::GetInstrumentsDb()->AddDirectory(Dir);
3321        } catch (Exception e) {
3322             result.Error(e);
3323        }
3324    #else
3325        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3326    #endif
3327        return result.Produce();
3328    }
3329    
3330    String LSCPServer::RemoveDbInstrumentDirectory(String Dir, bool Force) {
3331        dmsg(2,("LSCPServer: RemoveDbInstrumentDirectory(Dir=%s,Force=%d)\n", Dir.c_str(), Force));
3332        LSCPResultSet result;
3333    #if HAVE_SQLITE3
3334        try {
3335            InstrumentsDb::GetInstrumentsDb()->RemoveDirectory(Dir, Force);
3336        } catch (Exception e) {
3337             result.Error(e);
3338        }
3339    #else
3340        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3341    #endif
3342        return result.Produce();
3343    }
3344    
3345    String LSCPServer::GetDbInstrumentDirectoryCount(String Dir, bool Recursive) {
3346        dmsg(2,("LSCPServer: GetDbInstrumentDirectoryCount(Dir=%s,Recursive=%d)\n", Dir.c_str(), Recursive));
3347        LSCPResultSet result;
3348    #if HAVE_SQLITE3
3349        try {
3350            result.Add(InstrumentsDb::GetInstrumentsDb()->GetDirectoryCount(Dir, Recursive));
3351        } catch (Exception e) {
3352             result.Error(e);
3353        }
3354    #else
3355        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3356    #endif
3357        return result.Produce();
3358    }
3359    
3360    String LSCPServer::GetDbInstrumentDirectories(String Dir, bool Recursive) {
3361        dmsg(2,("LSCPServer: GetDbInstrumentDirectories(Dir=%s,Recursive=%d)\n", Dir.c_str(), Recursive));
3362        LSCPResultSet result;
3363    #if HAVE_SQLITE3
3364        try {
3365            String list;
3366            StringListPtr dirs = InstrumentsDb::GetInstrumentsDb()->GetDirectories(Dir, Recursive);
3367    
3368            for (int i = 0; i < dirs->size(); i++) {
3369                if (list != "") list += ",";
3370                list += "'" + InstrumentsDb::toEscapedPath(dirs->at(i)) + "'";
3371            }
3372    
3373            result.Add(list);
3374        } catch (Exception e) {
3375             result.Error(e);
3376        }
3377    #else
3378        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3379    #endif
3380        return result.Produce();
3381    }
3382    
3383    String LSCPServer::GetDbInstrumentDirectoryInfo(String Dir) {
3384        dmsg(2,("LSCPServer: GetDbInstrumentDirectoryInfo(Dir=%s)\n", Dir.c_str()));
3385        LSCPResultSet result;
3386    #if HAVE_SQLITE3
3387        try {
3388            DbDirectory info = InstrumentsDb::GetInstrumentsDb()->GetDirectoryInfo(Dir);
3389    
3390            result.Add("DESCRIPTION", _escapeLscpResponse(info.Description));
3391            result.Add("CREATED", info.Created);
3392            result.Add("MODIFIED", info.Modified);
3393        } catch (Exception e) {
3394             result.Error(e);
3395        }
3396    #else
3397        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3398    #endif
3399        return result.Produce();
3400    }
3401    
3402    String LSCPServer::SetDbInstrumentDirectoryName(String Dir, String Name) {
3403        dmsg(2,("LSCPServer: SetDbInstrumentDirectoryName(Dir=%s,Name=%s)\n", Dir.c_str(), Name.c_str()));
3404        LSCPResultSet result;
3405    #if HAVE_SQLITE3
3406        try {
3407            InstrumentsDb::GetInstrumentsDb()->RenameDirectory(Dir, Name);
3408        } catch (Exception e) {
3409             result.Error(e);
3410        }
3411    #else
3412        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3413    #endif
3414        return result.Produce();
3415    }
3416    
3417    String LSCPServer::MoveDbInstrumentDirectory(String Dir, String Dst) {
3418        dmsg(2,("LSCPServer: MoveDbInstrumentDirectory(Dir=%s,Dst=%s)\n", Dir.c_str(), Dst.c_str()));
3419        LSCPResultSet result;
3420    #if HAVE_SQLITE3
3421        try {
3422            InstrumentsDb::GetInstrumentsDb()->MoveDirectory(Dir, Dst);
3423        } catch (Exception e) {
3424             result.Error(e);
3425        }
3426    #else
3427        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3428    #endif
3429        return result.Produce();
3430    }
3431    
3432    String LSCPServer::CopyDbInstrumentDirectory(String Dir, String Dst) {
3433        dmsg(2,("LSCPServer: CopyDbInstrumentDirectory(Dir=%s,Dst=%s)\n", Dir.c_str(), Dst.c_str()));
3434        LSCPResultSet result;
3435    #if HAVE_SQLITE3
3436        try {
3437            InstrumentsDb::GetInstrumentsDb()->CopyDirectory(Dir, Dst);
3438        } catch (Exception e) {
3439             result.Error(e);
3440        }
3441    #else
3442        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3443    #endif
3444        return result.Produce();
3445    }
3446    
3447    String LSCPServer::SetDbInstrumentDirectoryDescription(String Dir, String Desc) {
3448        dmsg(2,("LSCPServer: SetDbInstrumentDirectoryDescription(Dir=%s,Desc=%s)\n", Dir.c_str(), Desc.c_str()));
3449        LSCPResultSet result;
3450    #if HAVE_SQLITE3
3451        try {
3452            InstrumentsDb::GetInstrumentsDb()->SetDirectoryDescription(Dir, Desc);
3453        } catch (Exception e) {
3454             result.Error(e);
3455        }
3456    #else
3457        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3458    #endif
3459        return result.Produce();
3460    }
3461    
3462    String LSCPServer::AddDbInstruments(String DbDir, String FilePath, int Index, bool bBackground) {
3463        dmsg(2,("LSCPServer: AddDbInstruments(DbDir=%s,FilePath=%s,Index=%d,bBackground=%d)\n", DbDir.c_str(), FilePath.c_str(), Index, bBackground));
3464        LSCPResultSet result;
3465    #if HAVE_SQLITE3
3466        try {
3467            int id;
3468            InstrumentsDb* db = InstrumentsDb::GetInstrumentsDb();
3469            id = db->AddInstruments(DbDir, FilePath, Index, bBackground);
3470            if (bBackground) result = id;
3471        } catch (Exception e) {
3472             result.Error(e);
3473        }
3474    #else
3475        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3476    #endif
3477        return result.Produce();
3478    }
3479    
3480    String LSCPServer::AddDbInstruments(String ScanMode, String DbDir, String FsDir, bool bBackground, bool insDir) {
3481        dmsg(2,("LSCPServer: AddDbInstruments(ScanMode=%s,DbDir=%s,FsDir=%s,bBackground=%d,insDir=%d)\n", ScanMode.c_str(), DbDir.c_str(), FsDir.c_str(), bBackground, insDir));
3482        LSCPResultSet result;
3483    #if HAVE_SQLITE3
3484        try {
3485            int id;
3486            InstrumentsDb* db = InstrumentsDb::GetInstrumentsDb();
3487            if (ScanMode.compare("RECURSIVE") == 0) {
3488                id = db->AddInstruments(RECURSIVE, DbDir, FsDir, bBackground, insDir);
3489            } else if (ScanMode.compare("NON_RECURSIVE") == 0) {
3490                id = db->AddInstruments(NON_RECURSIVE, DbDir, FsDir, bBackground, insDir);
3491            } else if (ScanMode.compare("FLAT") == 0) {
3492                id = db->AddInstruments(FLAT, DbDir, FsDir, bBackground, insDir);
3493            } else {
3494                throw Exception("Unknown scan mode: " + ScanMode);
3495            }
3496    
3497            if (bBackground) result = id;
3498        } catch (Exception e) {
3499             result.Error(e);
3500        }
3501    #else
3502        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3503    #endif
3504        return result.Produce();
3505    }
3506    
3507    String LSCPServer::RemoveDbInstrument(String Instr) {
3508        dmsg(2,("LSCPServer: RemoveDbInstrument(Instr=%s)\n", Instr.c_str()));
3509        LSCPResultSet result;
3510    #if HAVE_SQLITE3
3511        try {
3512            InstrumentsDb::GetInstrumentsDb()->RemoveInstrument(Instr);
3513        } catch (Exception e) {
3514             result.Error(e);
3515        }
3516    #else
3517        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3518    #endif
3519        return result.Produce();
3520    }
3521    
3522    String LSCPServer::GetDbInstrumentCount(String Dir, bool Recursive) {
3523        dmsg(2,("LSCPServer: GetDbInstrumentCount(Dir=%s,Recursive=%d)\n", Dir.c_str(), Recursive));
3524        LSCPResultSet result;
3525    #if HAVE_SQLITE3
3526        try {
3527            result.Add(InstrumentsDb::GetInstrumentsDb()->GetInstrumentCount(Dir, Recursive));
3528        } catch (Exception e) {
3529             result.Error(e);
3530        }
3531    #else
3532        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3533    #endif
3534        return result.Produce();
3535    }
3536    
3537    String LSCPServer::GetDbInstruments(String Dir, bool Recursive) {
3538        dmsg(2,("LSCPServer: GetDbInstruments(Dir=%s,Recursive=%d)\n", Dir.c_str(), Recursive));
3539        LSCPResultSet result;
3540    #if HAVE_SQLITE3
3541        try {
3542            String list;
3543            StringListPtr instrs = InstrumentsDb::GetInstrumentsDb()->GetInstruments(Dir, Recursive);
3544    
3545            for (int i = 0; i < instrs->size(); i++) {
3546                if (list != "") list += ",";
3547                list += "'" + InstrumentsDb::toEscapedPath(instrs->at(i)) + "'";
3548            }
3549    
3550            result.Add(list);
3551        } catch (Exception e) {
3552             result.Error(e);
3553        }
3554    #else
3555        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3556    #endif
3557        return result.Produce();
3558    }
3559    
3560    String LSCPServer::GetDbInstrumentInfo(String Instr) {
3561        dmsg(2,("LSCPServer: GetDbInstrumentInfo(Instr=%s)\n", Instr.c_str()));
3562        LSCPResultSet result;
3563    #if HAVE_SQLITE3
3564        try {
3565            DbInstrument info = InstrumentsDb::GetInstrumentsDb()->GetInstrumentInfo(Instr);
3566    
3567            result.Add("INSTRUMENT_FILE", info.InstrFile);
3568            result.Add("INSTRUMENT_NR", info.InstrNr);
3569            result.Add("FORMAT_FAMILY", info.FormatFamily);
3570            result.Add("FORMAT_VERSION", info.FormatVersion);
3571            result.Add("SIZE", (int)info.Size);
3572            result.Add("CREATED", info.Created);
3573            result.Add("MODIFIED", info.Modified);
3574            result.Add("DESCRIPTION", _escapeLscpResponse(info.Description));
3575            result.Add("IS_DRUM", info.IsDrum);
3576            result.Add("PRODUCT", _escapeLscpResponse(info.Product));
3577            result.Add("ARTISTS", _escapeLscpResponse(info.Artists));
3578            result.Add("KEYWORDS", _escapeLscpResponse(info.Keywords));
3579        } catch (Exception e) {
3580             result.Error(e);
3581        }
3582    #else
3583        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3584    #endif
3585        return result.Produce();
3586    }
3587    
3588    String LSCPServer::GetDbInstrumentsJobInfo(int JobId) {
3589        dmsg(2,("LSCPServer: GetDbInstrumentsJobInfo(JobId=%d)\n", JobId));
3590        LSCPResultSet result;
3591    #if HAVE_SQLITE3
3592        try {
3593            ScanJob job = InstrumentsDb::GetInstrumentsDb()->Jobs.GetJobById(JobId);
3594    
3595            result.Add("FILES_TOTAL", job.FilesTotal);
3596            result.Add("FILES_SCANNED", job.FilesScanned);
3597            result.Add("SCANNING", job.Scanning);
3598            result.Add("STATUS", job.Status);
3599        } catch (Exception e) {
3600             result.Error(e);
3601        }
3602    #else
3603        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3604    #endif
3605        return result.Produce();
3606    }
3607    
3608    String LSCPServer::SetDbInstrumentName(String Instr, String Name) {
3609        dmsg(2,("LSCPServer: SetDbInstrumentName(Instr=%s,Name=%s)\n", Instr.c_str(), Name.c_str()));
3610        LSCPResultSet result;
3611    #if HAVE_SQLITE3
3612        try {
3613            InstrumentsDb::GetInstrumentsDb()->RenameInstrument(Instr, Name);
3614        } catch (Exception e) {
3615             result.Error(e);
3616        }
3617    #else
3618        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3619    #endif
3620        return result.Produce();
3621    }
3622    
3623    String LSCPServer::MoveDbInstrument(String Instr, String Dst) {
3624        dmsg(2,("LSCPServer: MoveDbInstrument(Instr=%s,Dst=%s)\n", Instr.c_str(), Dst.c_str()));
3625        LSCPResultSet result;
3626    #if HAVE_SQLITE3
3627        try {
3628            InstrumentsDb::GetInstrumentsDb()->MoveInstrument(Instr, Dst);
3629        } catch (Exception e) {
3630             result.Error(e);
3631        }
3632    #else
3633        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3634    #endif
3635        return result.Produce();
3636    }
3637    
3638    String LSCPServer::CopyDbInstrument(String Instr, String Dst) {
3639        dmsg(2,("LSCPServer: CopyDbInstrument(Instr=%s,Dst=%s)\n", Instr.c_str(), Dst.c_str()));
3640        LSCPResultSet result;
3641    #if HAVE_SQLITE3
3642        try {
3643            InstrumentsDb::GetInstrumentsDb()->CopyInstrument(Instr, Dst);
3644        } catch (Exception e) {
3645             result.Error(e);
3646        }
3647    #else
3648        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3649    #endif
3650        return result.Produce();
3651    }
3652    
3653    String LSCPServer::SetDbInstrumentDescription(String Instr, String Desc) {
3654        dmsg(2,("LSCPServer: SetDbInstrumentDescription(Instr=%s,Desc=%s)\n", Instr.c_str(), Desc.c_str()));
3655        LSCPResultSet result;
3656    #if HAVE_SQLITE3
3657        try {
3658            InstrumentsDb::GetInstrumentsDb()->SetInstrumentDescription(Instr, Desc);
3659        } catch (Exception e) {
3660             result.Error(e);
3661        }
3662    #else
3663        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3664    #endif
3665        return result.Produce();
3666    }
3667    
3668    String LSCPServer::SetDbInstrumentFilePath(String OldPath, String NewPath) {
3669        dmsg(2,("LSCPServer: SetDbInstrumentFilePath(OldPath=%s,NewPath=%s)\n", OldPath.c_str(), NewPath.c_str()));
3670        LSCPResultSet result;
3671    #if HAVE_SQLITE3
3672        try {
3673            InstrumentsDb::GetInstrumentsDb()->SetInstrumentFilePath(OldPath, NewPath);
3674        } catch (Exception e) {
3675             result.Error(e);
3676        }
3677    #else
3678        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3679    #endif
3680        return result.Produce();
3681    }
3682    
3683    String LSCPServer::FindLostDbInstrumentFiles() {
3684        dmsg(2,("LSCPServer: FindLostDbInstrumentFiles()\n"));
3685        LSCPResultSet result;
3686    #if HAVE_SQLITE3
3687        try {
3688            String list;
3689            StringListPtr pLostFiles = InstrumentsDb::GetInstrumentsDb()->FindLostInstrumentFiles();
3690    
3691            for (int i = 0; i < pLostFiles->size(); i++) {
3692                if (list != "") list += ",";
3693                list += "'" + pLostFiles->at(i) + "'";
3694            }
3695    
3696            result.Add(list);
3697        } catch (Exception e) {
3698             result.Error(e);
3699        }
3700    #else
3701        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3702    #endif
3703        return result.Produce();
3704    }
3705    
3706    String LSCPServer::FindDbInstrumentDirectories(String Dir, std::map<String,String> Parameters, bool Recursive) {
3707        dmsg(2,("LSCPServer: FindDbInstrumentDirectories(Dir=%s)\n", Dir.c_str()));
3708        LSCPResultSet result;
3709    #if HAVE_SQLITE3
3710        try {
3711            SearchQuery Query;
3712            std::map<String,String>::iterator iter;
3713            for (iter = Parameters.begin(); iter != Parameters.end(); iter++) {
3714                if (iter->first.compare("NAME") == 0) {
3715                    Query.Name = iter->second;
3716                } else if (iter->first.compare("CREATED") == 0) {
3717                    Query.SetCreated(iter->second);
3718                } else if (iter->first.compare("MODIFIED") == 0) {
3719                    Query.SetModified(iter->second);
3720                } else if (iter->first.compare("DESCRIPTION") == 0) {
3721                    Query.Description = iter->second;
3722                } else {
3723                    throw Exception("Unknown search criteria: " + iter->first);
3724                }
3725            }
3726    
3727            String list;
3728            StringListPtr pDirectories =
3729                InstrumentsDb::GetInstrumentsDb()->FindDirectories(Dir, &Query, Recursive);
3730    
3731            for (int i = 0; i < pDirectories->size(); i++) {
3732                if (list != "") list += ",";
3733                list += "'" + InstrumentsDb::toEscapedPath(pDirectories->at(i)) + "'";
3734            }
3735    
3736            result.Add(list);
3737        } catch (Exception e) {
3738             result.Error(e);
3739        }
3740    #else
3741        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3742    #endif
3743        return result.Produce();
3744    }
3745    
3746    String LSCPServer::FindDbInstruments(String Dir, std::map<String,String> Parameters, bool Recursive) {
3747        dmsg(2,("LSCPServer: FindDbInstruments(Dir=%s)\n", Dir.c_str()));
3748        LSCPResultSet result;
3749    #if HAVE_SQLITE3
3750        try {
3751            SearchQuery Query;
3752            std::map<String,String>::iterator iter;
3753            for (iter = Parameters.begin(); iter != Parameters.end(); iter++) {
3754                if (iter->first.compare("NAME") == 0) {
3755                    Query.Name = iter->second;
3756                } else if (iter->first.compare("FORMAT_FAMILIES") == 0) {
3757                    Query.SetFormatFamilies(iter->second);
3758                } else if (iter->first.compare("SIZE") == 0) {
3759                    Query.SetSize(iter->second);
3760                } else if (iter->first.compare("CREATED") == 0) {
3761                    Query.SetCreated(iter->second);
3762                } else if (iter->first.compare("MODIFIED") == 0) {
3763                    Query.SetModified(iter->second);
3764                } else if (iter->first.compare("DESCRIPTION") == 0) {
3765                    Query.Description = iter->second;
3766                } else if (iter->first.compare("IS_DRUM") == 0) {
3767                    if (!strcasecmp(iter->second.c_str(), "true")) {
3768                        Query.InstrType = SearchQuery::DRUM;
3769                    } else {
3770                        Query.InstrType = SearchQuery::CHROMATIC;
3771                    }
3772                } else if (iter->first.compare("PRODUCT") == 0) {
3773                     Query.Product = iter->second;
3774                } else if (iter->first.compare("ARTISTS") == 0) {
3775                     Query.Artists = iter->second;
3776                } else if (iter->first.compare("KEYWORDS") == 0) {
3777                     Query.Keywords = iter->second;
3778                } else {
3779                    throw Exception("Unknown search criteria: " + iter->first);
3780                }
3781            }
3782    
3783            String list;
3784            StringListPtr pInstruments =
3785                InstrumentsDb::GetInstrumentsDb()->FindInstruments(Dir, &Query, Recursive);
3786    
3787            for (int i = 0; i < pInstruments->size(); i++) {
3788                if (list != "") list += ",";
3789                list += "'" + InstrumentsDb::toEscapedPath(pInstruments->at(i)) + "'";
3790            }
3791    
3792            result.Add(list);
3793        } catch (Exception e) {
3794             result.Error(e);
3795        }
3796    #else
3797        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3798    #endif
3799        return result.Produce();
3800    }
3801    
3802    String LSCPServer::FormatInstrumentsDb() {
3803        dmsg(2,("LSCPServer: FormatInstrumentsDb()\n"));
3804        LSCPResultSet result;
3805    #if HAVE_SQLITE3
3806        try {
3807            InstrumentsDb::GetInstrumentsDb()->Format();
3808        } catch (Exception e) {
3809             result.Error(e);
3810        }
3811    #else
3812        result.Error(String(DOESNT_HAVE_SQLITE3), 0);
3813    #endif
3814        return result.Produce();
3815    }
3816    
3817    
3818    /**
3819     * Will be called by the parser to enable or disable echo mode; if echo
3820     * mode is enabled, all commands from the client will (immediately) be
3821     * echoed back to the client.
3822     */
3823    String LSCPServer::SetEcho(yyparse_param_t* pSession, double boolean_value) {
3824        dmsg(2,("LSCPServer: SetEcho(val=%f)\n", boolean_value));
3825        LSCPResultSet result;
3826        try {
3827            if      (boolean_value == 0) pSession->bVerbose = false;
3828            else if (boolean_value == 1) pSession->bVerbose = true;
3829            else throw Exception("Not a boolean value, must either be 0 or 1");
3830        }
3831        catch (Exception e) {
3832             result.Error(e);
3833        }
3834        return result.Produce();
3835    }
3836    
3837  }  }

Legend:
Removed from v.68  
changed lines
  Added in v.2138

  ViewVC Help
Powered by ViewVC