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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 225 - (hide annotations) (download)
Sun Aug 22 14:46:47 2004 UTC (19 years, 7 months ago) by schoenebeck
File size: 58817 byte(s)
* set default volume to 1.0 in Gigasampler engine (was 0.0)
* implemented "SET CHANNEL AUDIO_OUTPUT_CHANNEL" LSCP command
* fixed "GET ENGINE INFO" LSCP command
* fixed "GET CHANNEL INFO" LSCP command
* src/network/lscp.y: fixed 'stringval' rule (returned string with formal
  apostrophes), fixed 'dotnum' rule (ignored position after decimal point)

1 schoenebeck 35 /***************************************************************************
2     * *
3     * LinuxSampler - modular, streaming capable sampler *
4     * *
5 schoenebeck 56 * Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck *
6 schoenebeck 35 * *
7     * This program is free software; you can redistribute it and/or modify *
8     * it under the terms of the GNU General Public License as published by *
9     * the Free Software Foundation; either version 2 of the License, or *
10     * (at your option) any later version. *
11     * *
12     * This program is distributed in the hope that it will be useful, *
13     * but WITHOUT ANY WARRANTY; without even the implied warranty of *
14     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
15     * GNU General Public License for more details. *
16     * *
17     * You should have received a copy of the GNU General Public License *
18     * along with this program; if not, write to the Free Software *
19     * Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
20     * MA 02111-1307 USA *
21     ***************************************************************************/
22    
23     #include "lscpserver.h"
24 senkov 113 #include "lscpresultset.h"
25 senkov 170 #include "lscpevent.h"
26 schoenebeck 35
27 schoenebeck 53 #include "../engines/gig/Engine.h"
28 schoenebeck 203 #include "../drivers/audio/AudioOutputDeviceFactory.h"
29     #include "../drivers/midi/MidiInputDeviceFactory.h"
30 schoenebeck 53
31 senkov 170 /**
32     * Below are a few static members of the LSCPServer class.
33     * The big assumption here is that LSCPServer is going to remain a singleton.
34     * These members are used to support client connections.
35     * Class handles multiple connections at the same time using select() and non-blocking recv()
36     * Commands are processed by a single LSCPServer thread.
37     * Notifications are delivered either by the thread that originated them
38     * or (if the resultset is currently in progress) by the LSCPServer thread
39     * after the resultset was sent out.
40     * This makes sure that resultsets can not be interrupted by notifications.
41     * This also makes sure that the thread sending notification is not blocked
42     * by the LSCPServer thread.
43     */
44     fd_set LSCPServer::fdSet;
45     int LSCPServer::currentSocket = -1;
46 schoenebeck 210 std::vector<yyparse_param_t> LSCPServer::Sessions = std::vector<yyparse_param_t>();
47 senkov 170 std::map<int,String> LSCPServer::bufferedNotifies = std::map<int,String>();
48     std::map<int,String> LSCPServer::bufferedCommands = std::map<int,String>();
49     std::map< LSCPEvent::event_t, std::list<int> > LSCPServer::eventSubscriptions = std::map< LSCPEvent::event_t, std::list<int> >();
50     Mutex LSCPServer::NotifyMutex = Mutex();
51     Mutex LSCPServer::NotifyBufferMutex = Mutex();
52     Mutex LSCPServer::SubscriptionMutex = Mutex();
53    
54 schoenebeck 53 LSCPServer::LSCPServer(Sampler* pSampler) : Thread(false, 0, -4) {
55     this->pSampler = pSampler;
56 senkov 170 LSCPEvent::RegisterEvent(LSCPEvent::event_channels, "CHANNELS");
57     LSCPEvent::RegisterEvent(LSCPEvent::event_voice_count, "VOICE_COUNT");
58     LSCPEvent::RegisterEvent(LSCPEvent::event_stream_count, "STREAM_COUNT");
59     LSCPEvent::RegisterEvent(LSCPEvent::event_buffer_fill, "BUFFER_FILL");
60     LSCPEvent::RegisterEvent(LSCPEvent::event_info, "INFO");
61     LSCPEvent::RegisterEvent(LSCPEvent::event_misc, "MISCELLANEOUS");
62 schoenebeck 35 }
63    
64 schoenebeck 211 /**
65     * Blocks the calling thread until the LSCP Server is initialized and
66     * accepting socket connections, if the server is already initialized then
67     * this method will return immediately.
68     * @param TimeoutSeconds - optional: max. wait time in seconds
69     * (default: 0s)
70     * @param TimeoutNanoSeconds - optional: max wait time in nano seconds
71     * (default: 0ns)
72     * @returns 0 on success, a value less than 0 if timeout exceeded
73     */
74     int LSCPServer::WaitUntilInitialized(long TimeoutSeconds, long TimeoutNanoSeconds) {
75     return Initialized.WaitAndUnlockIf(false, TimeoutSeconds, TimeoutNanoSeconds);
76     }
77    
78 schoenebeck 35 int LSCPServer::Main() {
79 senkov 170 int hSocket = socket(AF_INET, SOCK_STREAM, 0);
80 schoenebeck 35 if (hSocket < 0) {
81     std::cerr << "LSCPServer: Could not create server socket." << std::endl;
82 schoenebeck 53 //return -1;
83     exit(EXIT_FAILURE);
84 schoenebeck 35 }
85    
86     SocketAddress.sin_family = AF_INET;
87     SocketAddress.sin_port = htons(LSCP_PORT);
88     SocketAddress.sin_addr.s_addr = htonl(INADDR_ANY);
89    
90     if (bind(hSocket, (sockaddr*) &SocketAddress, sizeof(sockaddr_in)) < 0) {
91     std::cerr << "LSCPServer: Could not bind server socket." << std::endl;
92     close(hSocket);
93 schoenebeck 53 //return -1;
94     exit(EXIT_FAILURE);
95 schoenebeck 35 }
96    
97     listen(hSocket, 1);
98 schoenebeck 211 Initialized.Set(true);
99 schoenebeck 35
100     // now wait for client connections and handle their requests
101     sockaddr_in client;
102     int length = sizeof(client);
103 senkov 170 FD_ZERO(&fdSet);
104     FD_SET(hSocket, &fdSet);
105     int maxSessions = hSocket;
106 schoenebeck 203
107 schoenebeck 35 while (true) {
108 senkov 170 fd_set selectSet = fdSet;
109 senkov 198 int retval = select(maxSessions+1, &selectSet, NULL, NULL, NULL);
110 senkov 170 if (retval == 0)
111 senkov 198 continue; //Nothing try again
112 senkov 170 if (retval == -1) {
113     std::cerr << "LSCPServer: Socket select error." << std::endl;
114     close(hSocket);
115     exit(EXIT_FAILURE);
116     }
117 schoenebeck 203
118 senkov 170 //Accept new connections now (if any)
119     if (FD_ISSET(hSocket, &selectSet)) {
120     int socket = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length);
121     if (socket < 0) {
122     std::cerr << "LSCPServer: Client connection failed." << std::endl;
123     exit(EXIT_FAILURE);
124     }
125 schoenebeck 35
126 senkov 170 if (fcntl(socket, F_SETFL, O_NONBLOCK)) {
127     std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl;
128     exit(EXIT_FAILURE);
129     }
130 schoenebeck 35
131 schoenebeck 210 // Parser initialization
132     yyparse_param_t yyparse_param;
133     yyparse_param.pServer = this;
134     yyparse_param.hSession = socket;
135    
136     Sessions.push_back(yyparse_param);
137 senkov 170 FD_SET(socket, &fdSet);
138     if (socket > maxSessions)
139     maxSessions = socket;
140     dmsg(1,("LSCPServer: Client connection established on socket:%d.\n", socket));
141     LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection established on socket", socket));
142     continue; //Maybe this was the only selected socket, better select again
143     }
144 schoenebeck 35
145 senkov 170 //Something was selected and it was not the hSocket, so it must be some command(s) coming.
146 schoenebeck 210 for (std::vector<yyparse_param_t>::iterator iter = Sessions.begin(); iter != Sessions.end(); iter++) {
147     if (FD_ISSET((*iter).hSession, &selectSet)) { //Was it this socket?
148 senkov 170 if (GetLSCPCommand(iter)) { //Have we read the entire command?
149     dmsg(3,("LSCPServer: Got command on socket %d, calling parser.\n", currentSocket));
150 schoenebeck 219 int dummy; // just a temporary hack to fulfill the restart() function prototype
151     restart(NULL, dummy); // restart the 'scanner'
152 schoenebeck 210 currentSocket = (*iter).hSession; //a hack
153     if ((*iter).bVerbose) { // if echo mode enabled
154     AnswerClient(bufferedCommands[currentSocket]);
155     }
156     int result = yyparse(&(*iter));
157 senkov 170 currentSocket = -1; //continuation of a hack
158     dmsg(3,("LSCPServer: Done parsing on socket %d.\n", currentSocket));
159     if (result == LSCP_QUIT) { //Was it a quit command by any chance?
160     CloseConnection(iter);
161     }
162     }
163     //socket may have been closed, iter may be invalid, get out of the loop for now.
164     //we'll be back if there is data.
165 schoenebeck 203 break;
166 senkov 170 }
167     }
168    
169     //Now let's deliver late notifies (if any)
170     NotifyBufferMutex.Lock();
171     for (std::map<int,String>::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) {
172     send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0);
173     bufferedNotifies.erase(iterNotify);
174     }
175     NotifyBufferMutex.Unlock();
176 schoenebeck 35 }
177     }
178    
179 schoenebeck 210 void LSCPServer::CloseConnection( std::vector<yyparse_param_t>::iterator iter ) {
180     int socket = (*iter).hSession;
181 senkov 170 dmsg(1,("LSCPServer: Client connection terminated on socket:%d.\n",socket));
182     LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket));
183 schoenebeck 210 Sessions.erase(iter);
184 senkov 170 FD_CLR(socket, &fdSet);
185     SubscriptionMutex.Lock(); //Must unsubscribe this socket from all events (if any)
186     for (std::map< LSCPEvent::event_t, std::list<int> >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) {
187     iter->second.remove(socket);
188     }
189     SubscriptionMutex.Unlock();
190     NotifyMutex.Lock();
191     bufferedCommands.erase(socket);
192     bufferedNotifies.erase(socket);
193     close(socket);
194     NotifyMutex.Unlock();
195     }
196    
197     void LSCPServer::SendLSCPNotify( LSCPEvent event ) {
198     SubscriptionMutex.Lock();
199     if (eventSubscriptions.count(event.GetType()) == 0) {
200     SubscriptionMutex.Unlock(); //Nobody is subscribed to this event
201     return;
202     }
203     std::list<int>::iterator iter = eventSubscriptions[event.GetType()].begin();
204     std::list<int>::iterator end = eventSubscriptions[event.GetType()].end();
205     String notify = event.Produce();
206    
207     while (true) {
208     if (NotifyMutex.Trylock()) {
209     for(;iter != end; iter++)
210     send(*iter, notify.c_str(), notify.size(), 0);
211     NotifyMutex.Unlock();
212     break;
213     } else {
214     if (NotifyBufferMutex.Trylock()) {
215     for(;iter != end; iter++)
216     bufferedNotifies[*iter] += notify;
217     NotifyBufferMutex.Unlock();
218     break;
219     }
220     }
221     }
222     SubscriptionMutex.Unlock();
223     }
224    
225     extern int GetLSCPCommand( void *buf, int max_size ) {
226     String command = LSCPServer::bufferedCommands[LSCPServer::currentSocket];
227     if (command.size() == 0) { //Parser wants input but we have nothing.
228     strcpy((char*) buf, "\n"); //So give it an empty command
229     return 1; //to keep it happy.
230     }
231    
232     if (max_size < command.size()) {
233     std::cerr << "getLSCPCommand: Flex buffer too small, ignoring the command." << std::endl;
234     return 0; //This will never happen
235     }
236    
237     strcpy((char*) buf, command.c_str());
238     LSCPServer::bufferedCommands.erase(LSCPServer::currentSocket);
239     return command.size();
240     }
241    
242 schoenebeck 35 /**
243 senkov 170 * Will be called to try to read the command from the socket
244     * If command is read, it will return true. Otherwise false is returned.
245     * In any case the received portion (complete or incomplete) is saved into bufferedCommand map.
246     */
247 schoenebeck 210 bool LSCPServer::GetLSCPCommand( std::vector<yyparse_param_t>::iterator iter ) {
248     int socket = (*iter).hSession;
249 senkov 170 char c;
250     int i = 0;
251     while (true) {
252     int result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now
253     if (result == 0) { //socket was selected, so 0 here means client has closed the connection
254     CloseConnection(iter);
255     break;
256     }
257     if (result == 1) {
258 schoenebeck 203 if (c == '\r')
259 senkov 170 continue; //Ignore CR
260     if (c == '\n') {
261 senkov 184 LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Received \'" + bufferedCommands[socket] + "\' on socket", socket));
262 senkov 170 bufferedCommands[socket] += "\n";
263     return true; //Complete command was read
264     }
265     bufferedCommands[socket] += c;
266     }
267     if (result == -1) {
268     if (errno == EAGAIN) //Would block, try again later.
269     return false;
270     switch(errno) {
271     case EBADF:
272     dmsg(2,("LSCPScanner: The argument s is an invalid descriptor.\n"));
273     break;
274     case ECONNREFUSED:
275     dmsg(2,("LSCPScanner: A remote host refused to allow the network connection (typically because it is not running the requested service).\n"));
276     break;
277     case ENOTCONN:
278     dmsg(2,("LSCPScanner: The socket is associated with a connection-oriented protocol and has not been connected (see connect(2) and accept(2)).\n"));
279     break;
280     case ENOTSOCK:
281     dmsg(2,("LSCPScanner: The argument s does not refer to a socket.\n"));
282     break;
283     case EAGAIN:
284     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"));
285 schoenebeck 203 break;
286     case EINTR:
287 senkov 170 dmsg(2,("LSCPScanner: The receive was interrupted by delivery of a signal before any data were available.\n"));
288 schoenebeck 203 break;
289     case EFAULT:
290     dmsg(2,("LSCPScanner: The receive buffer pointer(s) point outside the process's address space.\n"));
291     break;
292     case EINVAL:
293     dmsg(2,("LSCPScanner: Invalid argument passed.\n"));
294     break;
295     case ENOMEM:
296     dmsg(2,("LSCPScanner: Could not allocate memory for recvmsg.\n"));
297     break;
298     default:
299     dmsg(2,("LSCPScanner: Unknown recv() error.\n"));
300     break;
301     }
302 senkov 170 CloseConnection(iter);
303     break;
304     }
305     }
306     return false;
307     }
308    
309     /**
310 schoenebeck 35 * Will be called by the parser whenever it wants to send an answer to the
311     * client / frontend.
312     *
313     * @param ReturnMessage - message that will be send to the client
314     */
315     void LSCPServer::AnswerClient(String ReturnMessage) {
316     dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str()));
317 senkov 170 if (currentSocket != -1) {
318     NotifyMutex.Lock();
319     send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0);
320     NotifyMutex.Unlock();
321     }
322 schoenebeck 35 }
323    
324 capela 143 /**
325     * Find a created audio output device index.
326     */
327     int LSCPServer::GetAudioOutputDeviceIndex ( AudioOutputDevice *pDevice )
328     {
329     // Search for the created device to get its index
330     std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
331     std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
332     for (; iter != devices.end(); iter++) {
333     if (iter->second == pDevice)
334     return iter->first;
335     }
336     // Not found.
337     return -1;
338     }
339    
340 senkov 155 /**
341     * Find a created midi input device index.
342     */
343     int LSCPServer::GetMidiInputDeviceIndex ( MidiInputDevice *pDevice )
344     {
345     // Search for the created device to get its index
346     std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
347     std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
348     for (; iter != devices.end(); iter++) {
349     if (iter->second == pDevice)
350     return iter->first;
351     }
352     // Not found.
353     return -1;
354     }
355    
356 schoenebeck 123 String LSCPServer::CreateAudioOutputDevice(String Driver, std::map<String,String> Parameters) {
357     dmsg(2,("LSCPServer: CreateAudioOutputDevice(Driver=%s)\n", Driver.c_str()));
358     LSCPResultSet result;
359     try {
360     AudioOutputDevice* pDevice = pSampler->CreateAudioOutputDevice(Driver, Parameters);
361     // search for the created device to get its index
362 capela 143 int index = GetAudioOutputDeviceIndex(pDevice);
363 schoenebeck 123 if (index == -1) throw LinuxSamplerException("Internal error: could not find created audio output device.");
364     result = index; // success
365     }
366     catch (LinuxSamplerException e) {
367     result.Error(e);
368     }
369     return result.Produce();
370     }
371    
372 senkov 155 String LSCPServer::CreateMidiInputDevice(String Driver, std::map<String,String> Parameters) {
373     dmsg(2,("LSCPServer: CreateMidiInputDevice(Driver=%s)\n", Driver.c_str()));
374     LSCPResultSet result;
375     try {
376     MidiInputDevice* pDevice = pSampler->CreateMidiInputDevice(Driver, Parameters);
377     // search for the created device to get its index
378     int index = GetMidiInputDeviceIndex(pDevice);
379     if (index == -1) throw LinuxSamplerException("Internal error: could not find created midi input device.");
380     result = index; // success
381     }
382     catch (LinuxSamplerException e) {
383     result.Error(e);
384     }
385     return result.Produce();
386     }
387    
388 schoenebeck 123 String LSCPServer::DestroyAudioOutputDevice(uint DeviceIndex) {
389     dmsg(2,("LSCPServer: DestroyAudioOutputDevice(DeviceIndex=%d)\n", DeviceIndex));
390     LSCPResultSet result;
391     try {
392     std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
393 schoenebeck 223 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
394 schoenebeck 123 AudioOutputDevice* pDevice = devices[DeviceIndex];
395     pSampler->DestroyAudioOutputDevice(pDevice);
396     }
397     catch (LinuxSamplerException e) {
398     result.Error(e);
399     }
400     return result.Produce();
401     }
402    
403 senkov 155 String LSCPServer::DestroyMidiInputDevice(uint DeviceIndex) {
404     dmsg(2,("LSCPServer: DestroyMidiInputDevice(DeviceIndex=%d)\n", DeviceIndex));
405     LSCPResultSet result;
406     try {
407     std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
408 schoenebeck 223 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
409 senkov 155 MidiInputDevice* pDevice = devices[DeviceIndex];
410     pSampler->DestroyMidiInputDevice(pDevice);
411     }
412     catch (LinuxSamplerException e) {
413     result.Error(e);
414     }
415     return result.Produce();
416     }
417    
418 schoenebeck 35 /**
419     * Will be called by the parser to load an instrument.
420     */
421 capela 137 String LSCPServer::LoadInstrument(String Filename, uint uiInstrument, uint uiSamplerChannel, bool bBackground) {
422 schoenebeck 53 dmsg(2,("LSCPServer: LoadInstrument(Filename=%s,Instrument=%d,SamplerChannel=%d)\n", Filename.c_str(), uiInstrument, uiSamplerChannel));
423 senkov 120 LSCPResultSet result;
424 schoenebeck 53 try {
425     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
426     if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
427     Engine* pEngine = pSamplerChannel->GetEngine();
428     if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
429 schoenebeck 223 if (!pSamplerChannel->GetAudioOutputDevice())
430 capela 143 throw LinuxSamplerException("No audio output device on channel");
431 capela 137 if (bBackground) {
432     LSCPLoadInstrument *pLoadInstrument = new LSCPLoadInstrument(pEngine, Filename.c_str(), uiInstrument);
433     pLoadInstrument->StartThread();
434     }
435     else pEngine->LoadInstrument(Filename.c_str(), uiInstrument);
436 schoenebeck 53 }
437     catch (LinuxSamplerException e) {
438 senkov 120 result.Error(e);
439 schoenebeck 53 }
440 senkov 120 return result.Produce();
441 schoenebeck 35 }
442    
443     /**
444     * Will be called by the parser to load and deploy an engine.
445     */
446 schoenebeck 53 String LSCPServer::LoadEngine(String EngineName, uint uiSamplerChannel) {
447     dmsg(2,("LSCPServer: LoadEngine(EngineName=%s,SamplerChannel=%d)\n", EngineName.c_str(), uiSamplerChannel));
448 senkov 120 LSCPResultSet result;
449 schoenebeck 53 try {
450 schoenebeck 64 Engine::type_t type;
451 senkov 120 if ((EngineName == "GigEngine") || (EngineName == "gig")) type = Engine::type_gig;
452 schoenebeck 53 else throw LinuxSamplerException("Unknown engine type");
453     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
454     if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
455     pSamplerChannel->LoadEngine(type);
456     }
457     catch (LinuxSamplerException e) {
458 senkov 120 result.Error(e);
459 schoenebeck 53 }
460 senkov 120 return result.Produce();
461 schoenebeck 35 }
462    
463     /**
464     * Will be called by the parser to get the amount of sampler channels.
465     */
466     String LSCPServer::GetChannels() {
467     dmsg(2,("LSCPServer: GetChannels()\n"));
468 senkov 120 LSCPResultSet result;
469     result.Add(pSampler->SamplerChannels());
470     return result.Produce();
471 schoenebeck 35 }
472    
473     /**
474 schoenebeck 209 * Will be called by the parser to get the list of sampler channels.
475     */
476     String LSCPServer::ListChannels() {
477     dmsg(2,("LSCPServer: ListChannels()\n"));
478     String list;
479     std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels();
480     std::map<uint,SamplerChannel*>::iterator iter = channels.begin();
481     for (; iter != channels.end(); iter++) {
482     if (list != "") list += ",";
483     list += ToString(iter->first);
484     }
485     LSCPResultSet result;
486     result.Add(list);
487     return result.Produce();
488     }
489    
490     /**
491 schoenebeck 35 * Will be called by the parser to add a sampler channel.
492     */
493     String LSCPServer::AddChannel() {
494     dmsg(2,("LSCPServer: AddChannel()\n"));
495 schoenebeck 53 SamplerChannel* pSamplerChannel = pSampler->AddSamplerChannel();
496 senkov 120 LSCPResultSet result(pSamplerChannel->Index());
497     return result.Produce();
498 schoenebeck 35 }
499    
500     /**
501     * Will be called by the parser to remove a sampler channel.
502     */
503 schoenebeck 53 String LSCPServer::RemoveChannel(uint uiSamplerChannel) {
504     dmsg(2,("LSCPServer: RemoveChannel(SamplerChannel=%d)\n", uiSamplerChannel));
505 senkov 120 LSCPResultSet result;
506 schoenebeck 53 pSampler->RemoveSamplerChannel(uiSamplerChannel);
507 senkov 120 return result.Produce();
508 schoenebeck 35 }
509    
510     /**
511     * Will be called by the parser to get all available engines.
512     */
513     String LSCPServer::GetAvailableEngines() {
514     dmsg(2,("LSCPServer: GetAvailableEngines()\n"));
515 senkov 120 LSCPResultSet result("GigEngine");
516     return result.Produce();
517 schoenebeck 35 }
518    
519     /**
520     * Will be called by the parser to get descriptions for a particular engine.
521     */
522     String LSCPServer::GetEngineInfo(String EngineName) {
523     dmsg(2,("LSCPServer: GetEngineInfo(EngineName=%s)\n", EngineName.c_str()));
524 senkov 120 LSCPResultSet result;
525 schoenebeck 53 try {
526 senkov 120 if ((EngineName == "GigEngine") || (EngineName == "gig")) {
527 schoenebeck 53 Engine* pEngine = new LinuxSampler::gig::Engine;
528 schoenebeck 225 result.Add("DESCRIPTION", pEngine->Description());
529     result.Add("VERSION", pEngine->Version());
530 schoenebeck 53 delete pEngine;
531     }
532     else throw LinuxSamplerException("Unknown engine type");
533     }
534     catch (LinuxSamplerException e) {
535 senkov 120 result.Error(e);
536 schoenebeck 53 }
537 senkov 120 return result.Produce();
538 schoenebeck 35 }
539    
540     /**
541     * Will be called by the parser to get informations about a particular
542     * sampler channel.
543     */
544 schoenebeck 53 String LSCPServer::GetChannelInfo(uint uiSamplerChannel) {
545     dmsg(2,("LSCPServer: GetChannelInfo(SamplerChannel=%d)\n", uiSamplerChannel));
546 senkov 120 LSCPResultSet result;
547 senkov 113 try {
548     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
549     if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
550     Engine* pEngine = pSamplerChannel->GetEngine();
551 schoenebeck 123
552 senkov 117 //Defaults values
553     String EngineName = "NONE";
554 schoenebeck 225 float Volume = 0.0f;
555 senkov 117 String InstrumentFileName = "NONE";
556 capela 133 int InstrumentIndex = -1;
557     int InstrumentStatus = -1;
558 schoenebeck 225 int AudioOutputChannels = 0;
559     String AudioRouting;
560 schoenebeck 123
561 senkov 113 if (pEngine) {
562 senkov 117 EngineName = pEngine->EngineName();
563 schoenebeck 225 AudioOutputChannels = pEngine->Channels();
564 senkov 117 Volume = pEngine->Volume();
565 capela 133 InstrumentStatus = pEngine->InstrumentStatus();
566     InstrumentIndex = pEngine->InstrumentIndex();
567     if (InstrumentIndex != -1)
568 senkov 117 InstrumentFileName = pEngine->InstrumentFileName();
569 schoenebeck 225 for (int chan = 0; chan < pEngine->Channels(); chan++) {
570     if (AudioRouting != "") AudioRouting += ",";
571     AudioRouting += ToString(pEngine->OutputChannel(chan));
572     }
573 senkov 113 }
574 senkov 117
575     result.Add("ENGINE_NAME", EngineName);
576     result.Add("VOLUME", Volume);
577    
578 capela 143 //Some not-so-hardcoded stuff to make GUI look good
579     result.Add("AUDIO_OUTPUT_DEVICE", GetAudioOutputDeviceIndex(pSamplerChannel->GetAudioOutputDevice()));
580 schoenebeck 225 result.Add("AUDIO_OUTPUT_CHANNELS", AudioOutputChannels);
581     result.Add("AUDIO_OUTPUT_ROUTING", AudioRouting);
582 senkov 113
583 capela 159 result.Add("MIDI_INPUT_DEVICE", GetMidiInputDeviceIndex(pSamplerChannel->GetMidiInputDevice()));
584     result.Add("MIDI_INPUT_PORT", pSamplerChannel->GetMidiInputPort());
585 schoenebeck 225 if (pSamplerChannel->GetMidiInputChannel()) result.Add("MIDI_INPUT_CHANNEL", pSamplerChannel->GetMidiInputChannel());
586     else result.Add("MIDI_INPUT_CHANNEL", "ALL");
587 capela 159
588 senkov 117 result.Add("INSTRUMENT_FILE", InstrumentFileName);
589     result.Add("INSTRUMENT_NR", InstrumentIndex);
590 capela 133 result.Add("INSTRUMENT_STATUS", InstrumentStatus);
591 senkov 113 }
592     catch (LinuxSamplerException e) {
593 senkov 120 result.Error(e);
594 senkov 113 }
595 senkov 120 return result.Produce();
596 schoenebeck 35 }
597    
598     /**
599     * Will be called by the parser to get the amount of active voices on a
600     * particular sampler channel.
601     */
602 schoenebeck 53 String LSCPServer::GetVoiceCount(uint uiSamplerChannel) {
603     dmsg(2,("LSCPServer: GetVoiceCount(SamplerChannel=%d)\n", uiSamplerChannel));
604 senkov 120 LSCPResultSet result;
605 schoenebeck 53 try {
606     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
607     if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
608     Engine* pEngine = pSamplerChannel->GetEngine();
609     if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
610 senkov 120 result.Add(pEngine->VoiceCount());
611 schoenebeck 53 }
612     catch (LinuxSamplerException e) {
613 senkov 120 result.Error(e);
614 schoenebeck 53 }
615 senkov 120 return result.Produce();
616 schoenebeck 35 }
617    
618     /**
619     * Will be called by the parser to get the amount of active disk streams on a
620     * particular sampler channel.
621     */
622 schoenebeck 53 String LSCPServer::GetStreamCount(uint uiSamplerChannel) {
623     dmsg(2,("LSCPServer: GetStreamCount(SamplerChannel=%d)\n", uiSamplerChannel));
624 senkov 120 LSCPResultSet result;
625 schoenebeck 53 try {
626     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
627     if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
628     Engine* pEngine = pSamplerChannel->GetEngine();
629     if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
630 senkov 120 result.Add(pEngine->DiskStreamCount());
631 schoenebeck 53 }
632     catch (LinuxSamplerException e) {
633 senkov 120 result.Error(e);
634 schoenebeck 53 }
635 senkov 120 return result.Produce();
636 schoenebeck 35 }
637    
638     /**
639     * Will be called by the parser to get the buffer fill states of all disk
640     * streams on a particular sampler channel.
641     */
642 schoenebeck 53 String LSCPServer::GetBufferFill(fill_response_t ResponseType, uint uiSamplerChannel) {
643     dmsg(2,("LSCPServer: GetBufferFill(ResponseType=%d, SamplerChannel=%d)\n", ResponseType, uiSamplerChannel));
644 senkov 120 LSCPResultSet result;
645 schoenebeck 53 try {
646     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
647     if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
648     Engine* pEngine = pSamplerChannel->GetEngine();
649     if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
650 senkov 129 if (!pEngine->DiskStreamSupported())
651     result.Add("NA");
652     else {
653     switch (ResponseType) {
654     case fill_response_bytes:
655     result.Add(pEngine->DiskStreamBufferFillBytes());
656     break;
657     case fill_response_percentage:
658     result.Add(pEngine->DiskStreamBufferFillPercentage());
659     break;
660     default:
661     throw LinuxSamplerException("Unknown fill response type");
662     }
663     }
664 schoenebeck 53 }
665     catch (LinuxSamplerException e) {
666 senkov 120 result.Error(e);
667 schoenebeck 53 }
668 senkov 120 return result.Produce();
669 schoenebeck 35 }
670    
671 schoenebeck 123 String LSCPServer::GetAvailableAudioOutputDrivers() {
672     dmsg(2,("LSCPServer: GetAvailableAudioOutputDrivers()\n"));
673 senkov 120 LSCPResultSet result;
674 schoenebeck 53 try {
675 schoenebeck 123 String s = AudioOutputDeviceFactory::AvailableDriversAsString();
676     result.Add(s);
677 schoenebeck 53 }
678     catch (LinuxSamplerException e) {
679 schoenebeck 123 result.Error(e);
680 schoenebeck 53 }
681 senkov 120 return result.Produce();
682 schoenebeck 35 }
683    
684 senkov 155 String LSCPServer::GetAvailableMidiInputDrivers() {
685     dmsg(2,("LSCPServer: GetAvailableMidiInputDrivers()\n"));
686     LSCPResultSet result;
687     try {
688     String s = MidiInputDeviceFactory::AvailableDriversAsString();
689     result.Add(s);
690     }
691     catch (LinuxSamplerException e) {
692     result.Error(e);
693     }
694     return result.Produce();
695     }
696    
697     String LSCPServer::GetMidiInputDriverInfo(String Driver) {
698     dmsg(2,("LSCPServer: GetMidiInputDriverInfo(Driver=%s)\n",Driver.c_str()));
699     LSCPResultSet result;
700     try {
701     result.Add("DESCRIPTION", MidiInputDeviceFactory::GetDriverDescription(Driver));
702     result.Add("VERSION", MidiInputDeviceFactory::GetDriverVersion(Driver));
703    
704     std::map<String,DeviceCreationParameter*> parameters = MidiInputDeviceFactory::GetAvailableDriverParameters(Driver);
705     if (parameters.size()) { // if there are parameters defined for this driver
706     String s;
707     std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
708     for (;iter != parameters.end(); iter++) {
709     if (s != "") s += ",";
710     s += iter->first;
711     }
712     result.Add("PARAMETERS", s);
713     }
714     }
715     catch (LinuxSamplerException e) {
716     result.Error(e);
717     }
718     return result.Produce();
719     }
720    
721 schoenebeck 123 String LSCPServer::GetAudioOutputDriverInfo(String Driver) {
722     dmsg(2,("LSCPServer: GetAudioOutputDriverInfo(Driver=%s)\n",Driver.c_str()));
723     LSCPResultSet result;
724     try {
725     result.Add("DESCRIPTION", AudioOutputDeviceFactory::GetDriverDescription(Driver));
726     result.Add("VERSION", AudioOutputDeviceFactory::GetDriverVersion(Driver));
727    
728     std::map<String,DeviceCreationParameter*> parameters = AudioOutputDeviceFactory::GetAvailableDriverParameters(Driver);
729     if (parameters.size()) { // if there are parameters defined for this driver
730     String s;
731     std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
732     for (;iter != parameters.end(); iter++) {
733     if (s != "") s += ",";
734     s += iter->first;
735     }
736     result.Add("PARAMETERS", s);
737     }
738     }
739     catch (LinuxSamplerException e) {
740     result.Error(e);
741     }
742     return result.Produce();
743     }
744    
745 senkov 155 String LSCPServer::GetMidiInputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
746     dmsg(2,("LSCPServer: GetMidiInputDriverParameterInfo(Driver=%s,Parameter=%s)\n",Driver.c_str(),Parameter.c_str()));
747     LSCPResultSet result;
748     try {
749     DeviceCreationParameter* pParameter = MidiInputDeviceFactory::GetDriverParameter(Driver, Parameter);
750     result.Add("TYPE", pParameter->Type());
751     result.Add("DESCRIPTION", pParameter->Description());
752 schoenebeck 223 result.Add("MANDATORY", pParameter->Mandatory());
753     result.Add("FIX", pParameter->Fix());
754     result.Add("MULTIPLICITY", pParameter->Multiplicity());
755 schoenebeck 212 if (pParameter->Depends()) result.Add("DEPENDS", *pParameter->Depends());
756     if (pParameter->Default()) result.Add("DEFAULT", *pParameter->Default());
757     if (pParameter->RangeMin()) result.Add("RANGE_MIN", *pParameter->RangeMin());
758     if (pParameter->RangeMax()) result.Add("RANGE_MAX", *pParameter->RangeMax());
759     if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
760 senkov 155 }
761     catch (LinuxSamplerException e) {
762     result.Error(e);
763     }
764     return result.Produce();
765     }
766    
767 schoenebeck 123 String LSCPServer::GetAudioOutputDriverParameterInfo(String Driver, String Parameter, std::map<String,String> DependencyList) {
768     dmsg(2,("LSCPServer: GetAudioOutputDriverParameterInfo(Driver=%s,Parameter=%s)\n",Driver.c_str(),Parameter.c_str()));
769     LSCPResultSet result;
770     try {
771     DeviceCreationParameter* pParameter = AudioOutputDeviceFactory::GetDriverParameter(Driver, Parameter);
772     result.Add("TYPE", pParameter->Type());
773     result.Add("DESCRIPTION", pParameter->Description());
774 schoenebeck 223 result.Add("MANDATORY", pParameter->Mandatory());
775     result.Add("FIX", pParameter->Fix());
776     result.Add("MULTIPLICITY", pParameter->Multiplicity());
777 schoenebeck 212 if (pParameter->Depends()) result.Add("DEPENDS", *pParameter->Depends());
778     if (pParameter->Default()) result.Add("DEFAULT", *pParameter->Default());
779     if (pParameter->RangeMin()) result.Add("RANGE_MIN", *pParameter->RangeMin());
780     if (pParameter->RangeMax()) result.Add("RANGE_MAX", *pParameter->RangeMax());
781     if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
782 schoenebeck 123 }
783     catch (LinuxSamplerException e) {
784     result.Error(e);
785     }
786     return result.Produce();
787     }
788    
789     String LSCPServer::GetAudioOutputDeviceCount() {
790     dmsg(2,("LSCPServer: GetAudioOutputDeviceCount()\n"));
791     LSCPResultSet result;
792     try {
793     uint count = pSampler->AudioOutputDevices();
794 senkov 138 result.Add(count); // success
795 schoenebeck 123 }
796     catch (LinuxSamplerException e) {
797     result.Error(e);
798     }
799     return result.Produce();
800     }
801    
802 senkov 155 String LSCPServer::GetMidiInputDeviceCount() {
803     dmsg(2,("LSCPServer: GetMidiInputDeviceCount()\n"));
804     LSCPResultSet result;
805     try {
806     uint count = pSampler->MidiInputDevices();
807     result.Add(count); // success
808     }
809     catch (LinuxSamplerException e) {
810     result.Error(e);
811     }
812     return result.Produce();
813     }
814    
815 schoenebeck 123 String LSCPServer::GetAudioOutputDevices() {
816     dmsg(2,("LSCPServer: GetAudioOutputDevices()\n"));
817     LSCPResultSet result;
818     try {
819     String s;
820     std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
821     std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
822     for (; iter != devices.end(); iter++) {
823     if (s != "") s += ",";
824     s += ToString(iter->first);
825     }
826     result.Add(s);
827     }
828     catch (LinuxSamplerException e) {
829     result.Error(e);
830     }
831     return result.Produce();
832     }
833    
834 senkov 155 String LSCPServer::GetMidiInputDevices() {
835     dmsg(2,("LSCPServer: GetMidiInputDevices()\n"));
836     LSCPResultSet result;
837     try {
838     String s;
839     std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
840     std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
841     for (; iter != devices.end(); iter++) {
842     if (s != "") s += ",";
843     s += ToString(iter->first);
844     }
845     result.Add(s);
846     }
847     catch (LinuxSamplerException e) {
848     result.Error(e);
849     }
850     return result.Produce();
851     }
852    
853 schoenebeck 123 String LSCPServer::GetAudioOutputDeviceInfo(uint DeviceIndex) {
854     dmsg(2,("LSCPServer: GetAudioOutputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex));
855     LSCPResultSet result;
856     try {
857     std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
858 schoenebeck 223 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
859 schoenebeck 123 AudioOutputDevice* pDevice = devices[DeviceIndex];
860 schoenebeck 221 result.Add("DRIVER", pDevice->Driver());
861 schoenebeck 123 std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
862     std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
863     for (; iter != parameters.end(); iter++) {
864     result.Add(iter->first, iter->second->Value());
865     }
866     }
867     catch (LinuxSamplerException e) {
868     result.Error(e);
869     }
870     return result.Produce();
871     }
872    
873 senkov 155 String LSCPServer::GetMidiInputDeviceInfo(uint DeviceIndex) {
874     dmsg(2,("LSCPServer: GetMidiInputDeviceInfo(DeviceIndex=%d)\n",DeviceIndex));
875     LSCPResultSet result;
876     try {
877     std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
878 schoenebeck 223 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
879 senkov 155 MidiInputDevice* pDevice = devices[DeviceIndex];
880 schoenebeck 221 result.Add("DRIVER", pDevice->Driver());
881 senkov 155 std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
882     std::map<String,DeviceCreationParameter*>::iterator iter = parameters.begin();
883     for (; iter != parameters.end(); iter++) {
884     result.Add(iter->first, iter->second->Value());
885     }
886     }
887     catch (LinuxSamplerException e) {
888     result.Error(e);
889     }
890     return result.Produce();
891     }
892     String LSCPServer::GetMidiInputPortInfo(uint DeviceIndex, uint PortIndex) {
893     dmsg(2,("LSCPServer: GetMidiInputPortInfo(DeviceIndex=%d, PortIndex=%d)\n",DeviceIndex, PortIndex));
894     LSCPResultSet result;
895     try {
896 schoenebeck 223 // get MIDI input device
897 senkov 155 std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
898 schoenebeck 223 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
899 senkov 155 MidiInputDevice* pDevice = devices[DeviceIndex];
900 schoenebeck 223
901     // get MIDI port
902 schoenebeck 221 MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex);
903     if (!pMidiInputPort) throw LinuxSamplerException("There is no MIDI input port with index " + ToString(PortIndex) + ".");
904 schoenebeck 223
905     // return the values of all MIDI port parameters
906 schoenebeck 221 std::map<String,DeviceRuntimeParameter*> parameters = pMidiInputPort->PortParameters();
907     std::map<String,DeviceRuntimeParameter*>::iterator iter = parameters.begin();
908 senkov 155 for (; iter != parameters.end(); iter++) {
909     result.Add(iter->first, iter->second->Value());
910     }
911     }
912     catch (LinuxSamplerException e) {
913     result.Error(e);
914     }
915     return result.Produce();
916     }
917    
918 schoenebeck 123 String LSCPServer::GetAudioOutputChannelInfo(uint DeviceId, uint ChannelId) {
919     dmsg(2,("LSCPServer: GetAudioOutputChannelInfo(DeviceId=%d,ChannelId)\n",DeviceId,ChannelId));
920     LSCPResultSet result;
921     try {
922     // get audio output device
923     std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
924 schoenebeck 223 if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
925 schoenebeck 123 AudioOutputDevice* pDevice = devices[DeviceId];
926    
927     // get audio channel
928     AudioChannel* pChannel = pDevice->Channel(ChannelId);
929     if (!pChannel) throw LinuxSamplerException("Audio ouotput device does not have channel " + ToString(ChannelId) + ".");
930    
931     // return the values of all audio channel parameters
932     std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
933     std::map<String,DeviceRuntimeParameter*>::iterator iter = parameters.begin();
934     for (; iter != parameters.end(); iter++) {
935     result.Add(iter->first, iter->second->Value());
936     }
937     }
938     catch (LinuxSamplerException e) {
939     result.Error(e);
940     }
941     return result.Produce();
942     }
943    
944 senkov 185 String LSCPServer::GetMidiInputPortParameterInfo(uint DeviceId, uint PortId, String ParameterName) {
945     dmsg(2,("LSCPServer: GetMidiInputPortParameterInfo(DeviceId=%d,PortId=%d,ParameterName=%s)\n",DeviceId,PortId,ParameterName.c_str()));
946     LSCPResultSet result;
947     try {
948 schoenebeck 223 // get MIDI input device
949     std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
950     if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no midi input device with index " + ToString(DeviceId) + ".");
951     MidiInputDevice* pDevice = devices[DeviceId];
952 senkov 185
953 schoenebeck 221 // get midi port
954     MidiInputPort* pPort = pDevice->GetPort(PortId);
955     if (!pPort) throw LinuxSamplerException("Midi input device does not have port " + ToString(PortId) + ".");
956 senkov 185
957 schoenebeck 223 // get desired port parameter
958     std::map<String,DeviceRuntimeParameter*> parameters = pPort->PortParameters();
959     if (!parameters.count(ParameterName)) throw LinuxSamplerException("Midi port does not provide a parameter '" + ParameterName + "'.");
960     DeviceRuntimeParameter* pParameter = parameters[ParameterName];
961 schoenebeck 203
962 senkov 185 // return all fields of this audio channel parameter
963     result.Add("TYPE", pParameter->Type());
964     result.Add("DESCRIPTION", pParameter->Description());
965     result.Add("FIX", pParameter->Fix());
966     result.Add("MULTIPLICITY", pParameter->Multiplicity());
967 schoenebeck 223 if (pParameter->RangeMin()) result.Add("RANGE_MIN", *pParameter->RangeMin());
968     if (pParameter->RangeMax()) result.Add("RANGE_MAX", *pParameter->RangeMax());
969     if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
970 senkov 185 }
971     catch (LinuxSamplerException e) {
972     result.Error(e);
973     }
974     return result.Produce();
975     }
976    
977 schoenebeck 123 String LSCPServer::GetAudioOutputChannelParameterInfo(uint DeviceId, uint ChannelId, String ParameterName) {
978     dmsg(2,("LSCPServer: GetAudioOutputChannelParameterInfo(DeviceId=%d,ChannelId=%d,ParameterName=%s)\n",DeviceId,ChannelId,ParameterName.c_str()));
979     LSCPResultSet result;
980     try {
981     // get audio output device
982     std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
983 schoenebeck 223 if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
984 schoenebeck 123 AudioOutputDevice* pDevice = devices[DeviceId];
985    
986     // get audio channel
987     AudioChannel* pChannel = pDevice->Channel(ChannelId);
988     if (!pChannel) throw LinuxSamplerException("Audio output device does not have channel " + ToString(ChannelId) + ".");
989    
990     // get desired audio channel parameter
991     std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
992 schoenebeck 223 if (!parameters.count(ParameterName)) throw LinuxSamplerException("Audio channel does not provide a parameter '" + ParameterName + "'.");
993 schoenebeck 123 DeviceRuntimeParameter* pParameter = parameters[ParameterName];
994    
995     // return all fields of this audio channel parameter
996     result.Add("TYPE", pParameter->Type());
997     result.Add("DESCRIPTION", pParameter->Description());
998     result.Add("FIX", pParameter->Fix());
999     result.Add("MULTIPLICITY", pParameter->Multiplicity());
1000 schoenebeck 223 if (pParameter->RangeMin()) result.Add("RANGE_MIN", *pParameter->RangeMin());
1001     if (pParameter->RangeMax()) result.Add("RANGE_MAX", *pParameter->RangeMax());
1002     if (pParameter->Possibilities()) result.Add("POSSIBILITIES", *pParameter->Possibilities());
1003 schoenebeck 123 }
1004     catch (LinuxSamplerException e) {
1005     result.Error(e);
1006     }
1007     return result.Produce();
1008     }
1009    
1010     String LSCPServer::SetAudioOutputChannelParameter(uint DeviceId, uint ChannelId, String ParamKey, String ParamVal) {
1011     dmsg(2,("LSCPServer: SetAudioOutputChannelParameter(DeviceId=%d,ChannelId=%d,ParamKey=%s,ParamVal=%s)\n",DeviceId,ChannelId,ParamKey.c_str(),ParamVal.c_str()));
1012     LSCPResultSet result;
1013     try {
1014     // get audio output device
1015     std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1016 schoenebeck 223 if (!devices.count(DeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceId) + ".");
1017 schoenebeck 123 AudioOutputDevice* pDevice = devices[DeviceId];
1018    
1019     // get audio channel
1020     AudioChannel* pChannel = pDevice->Channel(ChannelId);
1021     if (!pChannel) throw LinuxSamplerException("Audio output device does not have channel " + ToString(ChannelId) + ".");
1022    
1023     // get desired audio channel parameter
1024     std::map<String,DeviceRuntimeParameter*> parameters = pChannel->ChannelParameters();
1025 schoenebeck 223 if (!parameters.count(ParamKey)) throw LinuxSamplerException("Audio channel does not provide a parameter '" + ParamKey + "'.");
1026 schoenebeck 123 DeviceRuntimeParameter* pParameter = parameters[ParamKey];
1027    
1028     // set new channel parameter value
1029     pParameter->SetValue(ParamVal);
1030     }
1031     catch (LinuxSamplerException e) {
1032     result.Error(e);
1033     }
1034     return result.Produce();
1035     }
1036    
1037     String LSCPServer::SetAudioOutputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) {
1038     dmsg(2,("LSCPServer: SetAudioOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1039     LSCPResultSet result;
1040     try {
1041     std::map<uint,AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1042 schoenebeck 223 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no audio output device with index " + ToString(DeviceIndex) + ".");
1043 schoenebeck 123 AudioOutputDevice* pDevice = devices[DeviceIndex];
1044     std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1045 schoenebeck 223 if (!parameters.count(ParamKey)) throw LinuxSamplerException("Audio output device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'");
1046 schoenebeck 123 parameters[ParamKey]->SetValue(ParamVal);
1047     }
1048     catch (LinuxSamplerException e) {
1049     result.Error(e);
1050     }
1051     return result.Produce();
1052     }
1053    
1054 senkov 155 String LSCPServer::SetMidiInputDeviceParameter(uint DeviceIndex, String ParamKey, String ParamVal) {
1055     dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1056     LSCPResultSet result;
1057     try {
1058     std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1059 schoenebeck 223 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1060 senkov 155 MidiInputDevice* pDevice = devices[DeviceIndex];
1061     std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1062 schoenebeck 223 if (!parameters.count(ParamKey)) throw LinuxSamplerException("MIDI input device " + ToString(DeviceIndex) + " does not have a device parameter '" + ParamKey + "'");
1063 senkov 155 parameters[ParamKey]->SetValue(ParamVal);
1064     }
1065     catch (LinuxSamplerException e) {
1066     result.Error(e);
1067     }
1068     return result.Produce();
1069     }
1070    
1071     String LSCPServer::SetMidiInputPortParameter(uint DeviceIndex, uint PortIndex, String ParamKey, String ParamVal) {
1072     dmsg(2,("LSCPServer: SetMidiOutputDeviceParameter(DeviceIndex=%d,ParamKey=%s,ParamVal=%s)\n",DeviceIndex,ParamKey.c_str(),ParamVal.c_str()));
1073     LSCPResultSet result;
1074     try {
1075 schoenebeck 223 // get MIDI input device
1076 senkov 155 std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1077 schoenebeck 223 if (!devices.count(DeviceIndex)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(DeviceIndex) + ".");
1078 senkov 155 MidiInputDevice* pDevice = devices[DeviceIndex];
1079 schoenebeck 223
1080     // get MIDI port
1081 schoenebeck 221 MidiInputPort* pMidiInputPort = pDevice->GetPort(PortIndex);
1082     if (!pMidiInputPort) throw LinuxSamplerException("There is no MIDI input port with index " + ToString(PortIndex) + ".");
1083 schoenebeck 223
1084     // set port parameter value
1085 schoenebeck 221 std::map<String,DeviceRuntimeParameter*> parameters = pMidiInputPort->PortParameters();
1086 schoenebeck 223 if (!parameters.count(ParamKey)) throw LinuxSamplerException("MIDI input device " + ToString(PortIndex) + " does not have a parameter '" + ParamKey + "'");
1087 senkov 155 parameters[ParamKey]->SetValue(ParamVal);
1088     }
1089     catch (LinuxSamplerException e) {
1090     result.Error(e);
1091     }
1092     return result.Produce();
1093     }
1094    
1095 schoenebeck 35 /**
1096     * Will be called by the parser to change the audio output channel for
1097     * playback on a particular sampler channel.
1098     */
1099 schoenebeck 123 String LSCPServer::SetAudioOutputChannel(uint ChannelAudioOutputChannel, uint AudioOutputDeviceInputChannel, uint uiSamplerChannel) {
1100     dmsg(2,("LSCPServer: SetAudioOutputChannel(ChannelAudioOutputChannel=%d, AudioOutputDeviceInputChannel=%d, SamplerChannel=%d)\n",ChannelAudioOutputChannel,AudioOutputDeviceInputChannel,uiSamplerChannel));
1101 schoenebeck 225 LSCPResultSet result;
1102     try {
1103     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1104     if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1105     Engine* pEngine = pSamplerChannel->GetEngine();
1106     if (!pEngine) throw LinuxSamplerException("No engine deployed on sampler channel " + ToString(uiSamplerChannel));
1107     pEngine->SetOutputChannel(ChannelAudioOutputChannel, AudioOutputDeviceInputChannel);
1108     }
1109     catch (LinuxSamplerException e) {
1110     result.Error(e);
1111     }
1112     return result.Produce();
1113 schoenebeck 35 }
1114    
1115 capela 159 String LSCPServer::SetAudioOutputDevice(uint AudioDeviceId, uint uiSamplerChannel) {
1116     dmsg(2,("LSCPServer: SetAudiotOutputDevice(AudioDeviceId=%d, SamplerChannel=%d)\n",AudioDeviceId,uiSamplerChannel));
1117     LSCPResultSet result;
1118     try {
1119     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1120     if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1121     std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1122 schoenebeck 223 if (!devices.count(AudioDeviceId)) throw LinuxSamplerException("There is no audio output device with index " + ToString(AudioDeviceId));
1123 capela 159 AudioOutputDevice* pDevice = devices[AudioDeviceId];
1124     pSamplerChannel->SetAudioOutputDevice(pDevice);
1125     }
1126     catch (LinuxSamplerException e) {
1127     result.Error(e);
1128     }
1129     return result.Produce();
1130     }
1131    
1132 capela 143 String LSCPServer::SetAudioOutputType(String AudioOutputDriver, uint uiSamplerChannel) {
1133     dmsg(2,("LSCPServer: SetAudioOutputType(String AudioOutputDriver=%s, SamplerChannel=%d)\n",AudioOutputDriver.c_str(),uiSamplerChannel));
1134     LSCPResultSet result;
1135     try {
1136     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1137     if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1138     // Driver type name aliasing...
1139     if (AudioOutputDriver == "ALSA") AudioOutputDriver = "Alsa";
1140 schoenebeck 203 if (AudioOutputDriver == "JACK") AudioOutputDriver = "Jack";
1141 capela 143 // Check if there's one audio output device already created
1142     // for the intended audio driver type (AudioOutputDriver)...
1143     AudioOutputDevice *pDevice = NULL;
1144     std::map<uint, AudioOutputDevice*> devices = pSampler->GetAudioOutputDevices();
1145     std::map<uint, AudioOutputDevice*>::iterator iter = devices.begin();
1146     for (; iter != devices.end(); iter++) {
1147     if ((iter->second)->Driver() == AudioOutputDriver) {
1148     pDevice = iter->second;
1149     break;
1150     }
1151     }
1152     // If it doesn't exist, create a new one with default parameters...
1153     if (pDevice == NULL) {
1154     std::map<String,String> params;
1155     pDevice = pSampler->CreateAudioOutputDevice(AudioOutputDriver, params);
1156     }
1157     // Must have a device...
1158     if (pDevice == NULL)
1159     throw LinuxSamplerException("Internal error: could not create audio output device.");
1160     // Set it as the current channel device...
1161     pSamplerChannel->SetAudioOutputDevice(pDevice);
1162     }
1163     catch (LinuxSamplerException e) {
1164     result.Error(e);
1165     }
1166     return result.Produce();
1167     }
1168    
1169 capela 159 String LSCPServer::SetMIDIInputPort(uint MIDIPort, uint uiSamplerChannel) {
1170     dmsg(2,("LSCPServer: SetMIDIInputPort(MIDIPort=%d, SamplerChannel=%d)\n",MIDIPort,uiSamplerChannel));
1171 senkov 120 LSCPResultSet result;
1172 schoenebeck 53 try {
1173     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1174 capela 159 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1175     pSamplerChannel->SetMidiInputPort(MIDIPort);
1176 schoenebeck 53 }
1177     catch (LinuxSamplerException e) {
1178 senkov 120 result.Error(e);
1179 schoenebeck 53 }
1180 senkov 120 return result.Produce();
1181 schoenebeck 53 }
1182    
1183 capela 159 String LSCPServer::SetMIDIInputChannel(uint MIDIChannel, uint uiSamplerChannel) {
1184     dmsg(2,("LSCPServer: SetMIDIInputChannel(MIDIChannel=%d, SamplerChannel=%d)\n",MIDIChannel,uiSamplerChannel));
1185 senkov 120 LSCPResultSet result;
1186 senkov 68 try {
1187     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1188 senkov 155 if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1189 schoenebeck 221 pSamplerChannel->SetMidiInputChannel((MidiInputPort::midi_chan_t) MIDIChannel);
1190 senkov 68 }
1191     catch (LinuxSamplerException e) {
1192 senkov 120 result.Error(e);
1193 senkov 68 }
1194 senkov 120 return result.Produce();
1195 schoenebeck 35 }
1196    
1197 capela 159 String LSCPServer::SetMIDIInputDevice(uint MIDIDeviceId, uint uiSamplerChannel) {
1198     dmsg(2,("LSCPServer: SetMIDIInputDevice(MIDIDeviceId=%d, SamplerChannel=%d)\n",MIDIDeviceId,uiSamplerChannel));
1199 schoenebeck 123 LSCPResultSet result;
1200     try {
1201 capela 159 SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1202     if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1203     std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1204 schoenebeck 223 if (!devices.count(MIDIDeviceId)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1205 capela 159 MidiInputDevice* pDevice = devices[MIDIDeviceId];
1206     pSamplerChannel->SetMidiInputDevice(pDevice);
1207 schoenebeck 123 }
1208     catch (LinuxSamplerException e) {
1209     result.Error(e);
1210     }
1211     return result.Produce();
1212     }
1213    
1214 capela 159 String LSCPServer::SetMIDIInputType(String MidiInputDriver, uint uiSamplerChannel) {
1215     dmsg(2,("LSCPServer: SetMIDIInputType(String MidiInputDriver=%s, SamplerChannel=%d)\n",MidiInputDriver.c_str(),uiSamplerChannel));
1216     LSCPResultSet result;
1217     try {
1218     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1219     if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1220     // Driver type name aliasing...
1221     if (MidiInputDriver == "ALSA") MidiInputDriver = "Alsa";
1222     // Check if there's one MIDI input device already created
1223     // for the intended MIDI driver type (MidiInputDriver)...
1224     MidiInputDevice *pDevice = NULL;
1225     std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1226     std::map<uint, MidiInputDevice*>::iterator iter = devices.begin();
1227     for (; iter != devices.end(); iter++) {
1228     if ((iter->second)->Driver() == MidiInputDriver) {
1229     pDevice = iter->second;
1230     break;
1231     }
1232     }
1233     // If it doesn't exist, create a new one with default parameters...
1234     if (pDevice == NULL) {
1235     std::map<String,String> params;
1236     pDevice = pSampler->CreateMidiInputDevice(MidiInputDriver, params);
1237     // Make it with at least one initial port.
1238     std::map<String,DeviceCreationParameter*> parameters = pDevice->DeviceParameters();
1239 schoenebeck 221 parameters["PORTS"]->SetValue("1");
1240 capela 159 }
1241     // Must have a device...
1242     if (pDevice == NULL)
1243     throw LinuxSamplerException("Internal error: could not create MIDI input device.");
1244     // Set it as the current channel device...
1245     pSamplerChannel->SetMidiInputDevice(pDevice);
1246     }
1247     catch (LinuxSamplerException e) {
1248     result.Error(e);
1249     }
1250     return result.Produce();
1251     }
1252    
1253 schoenebeck 35 /**
1254 capela 159 * Will be called by the parser to change the MIDI input device, port and channel on which
1255     * engine of a particular sampler channel should listen to.
1256     */
1257     String LSCPServer::SetMIDIInput(uint MIDIDeviceId, uint MIDIPort, uint MIDIChannel, uint uiSamplerChannel) {
1258     dmsg(2,("LSCPServer: SetMIDIInput(MIDIDeviceId=%d, MIDIPort=%d, MIDIChannel=%d, SamplerChannel=%d)\n", MIDIDeviceId, MIDIPort, MIDIChannel, uiSamplerChannel));
1259     LSCPResultSet result;
1260     try {
1261     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1262     if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel));
1263     std::map<uint, MidiInputDevice*> devices = pSampler->GetMidiInputDevices();
1264 schoenebeck 223 if (!devices.count(MIDIDeviceId)) throw LinuxSamplerException("There is no MIDI input device with index " + ToString(MIDIDeviceId));
1265 capela 159 MidiInputDevice* pDevice = devices[MIDIDeviceId];
1266 schoenebeck 221 pSamplerChannel->SetMidiInput(pDevice, MIDIPort, (MidiInputPort::midi_chan_t) MIDIChannel);
1267 capela 159 }
1268     catch (LinuxSamplerException e) {
1269     result.Error(e);
1270     }
1271     return result.Produce();
1272     }
1273    
1274     /**
1275 schoenebeck 35 * Will be called by the parser to change the global volume factor on a
1276     * particular sampler channel.
1277     */
1278 schoenebeck 225 String LSCPServer::SetVolume(double dVolume, uint uiSamplerChannel) {
1279     dmsg(2,("LSCPServer: SetVolume(Volume=%f, SamplerChannel=%d)\n", dVolume, uiSamplerChannel));
1280 senkov 120 LSCPResultSet result;
1281 schoenebeck 53 try {
1282     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1283     if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
1284     Engine* pEngine = pSamplerChannel->GetEngine();
1285     if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
1286 schoenebeck 225 pEngine->Volume(dVolume);
1287 schoenebeck 53 }
1288     catch (LinuxSamplerException e) {
1289 senkov 120 result.Error(e);
1290 schoenebeck 53 }
1291 senkov 120 return result.Produce();
1292 schoenebeck 35 }
1293    
1294     /**
1295     * Will be called by the parser to reset a particular sampler channel.
1296     */
1297 schoenebeck 53 String LSCPServer::ResetChannel(uint uiSamplerChannel) {
1298     dmsg(2,("LSCPServer: ResetChannel(SamplerChannel=%d)\n", uiSamplerChannel));
1299 senkov 120 LSCPResultSet result;
1300 schoenebeck 53 try {
1301     SamplerChannel* pSamplerChannel = pSampler->GetSamplerChannel(uiSamplerChannel);
1302     if (!pSamplerChannel) throw LinuxSamplerException("Index out of bounds");
1303     Engine* pEngine = pSamplerChannel->GetEngine();
1304     if (!pEngine) throw LinuxSamplerException("No engine loaded on channel");
1305     pEngine->Reset();
1306     }
1307     catch (LinuxSamplerException e) {
1308 senkov 120 result.Error(e);
1309 schoenebeck 53 }
1310 senkov 120 return result.Produce();
1311 schoenebeck 35 }
1312    
1313     /**
1314 schoenebeck 212 * Will be called by the parser to reset the whole sampler.
1315     */
1316     String LSCPServer::ResetSampler() {
1317     dmsg(2,("LSCPServer: ResetSampler()\n"));
1318     pSampler->Reset();
1319     LSCPResultSet result;
1320     return result.Produce();
1321     }
1322    
1323     /**
1324 schoenebeck 35 * Will be called by the parser to subscribe a client (frontend) on the
1325     * server for receiving event messages.
1326     */
1327 senkov 170 String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) {
1328     dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
1329     LSCPResultSet result;
1330     SubscriptionMutex.Lock();
1331     eventSubscriptions[type].push_back(currentSocket);
1332     SubscriptionMutex.Unlock();
1333     return result.Produce();
1334 schoenebeck 35 }
1335    
1336     /**
1337     * Will be called by the parser to unsubscribe a client on the server
1338     * for not receiving further event messages.
1339     */
1340 senkov 170 String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) {
1341     dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str()));
1342     LSCPResultSet result;
1343     SubscriptionMutex.Lock();
1344     eventSubscriptions[type].remove(currentSocket);
1345     SubscriptionMutex.Unlock();
1346     return result.Produce();
1347 schoenebeck 35 }
1348 capela 133
1349 schoenebeck 210 /**
1350     * Will be called by the parser to enable or disable echo mode; if echo
1351     * mode is enabled, all commands from the client will (immediately) be
1352     * echoed back to the client.
1353     */
1354     String LSCPServer::SetEcho(yyparse_param_t* pSession, double boolean_value) {
1355     dmsg(2,("LSCPServer: SetEcho(val=%f)\n", boolean_value));
1356     LSCPResultSet result;
1357     try {
1358     if (boolean_value == 0) pSession->bVerbose = false;
1359     else if (boolean_value == 1) pSession->bVerbose = true;
1360     else throw LinuxSamplerException("Not a boolean value, must either be 0 or 1");
1361     }
1362     catch (LinuxSamplerException e) {
1363     result.Error(e);
1364     }
1365     return result.Produce();
1366     }
1367 capela 133
1368     // Instrument loader constructor.
1369     LSCPLoadInstrument::LSCPLoadInstrument(Engine* pEngine, String Filename, uint uiInstrument)
1370     : Thread(false, 0, -4)
1371     {
1372     this->pEngine = pEngine;
1373     this->Filename = Filename;
1374     this->uiInstrument = uiInstrument;
1375     }
1376    
1377     // Instrument loader process.
1378     int LSCPLoadInstrument::Main()
1379     {
1380     try {
1381     pEngine->LoadInstrument(Filename.c_str(), uiInstrument);
1382     }
1383    
1384     catch (LinuxSamplerException e) {
1385     e.PrintMessage();
1386     }
1387    
1388     // Always re-enable the engine.
1389     pEngine->Enable();
1390    
1391     // FIXME: Shoot ourselves on the foot?
1392     delete this;
1393     }

  ViewVC Help
Powered by ViewVC