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

Legend:
Removed from v.53  
changed lines
  Added in v.2025

  ViewVC Help
Powered by ViewVC