22 |
|
|
23 |
#include "lscpserver.h" |
#include "lscpserver.h" |
24 |
#include "lscpresultset.h" |
#include "lscpresultset.h" |
25 |
|
#include "lscpevent.h" |
26 |
|
|
27 |
#include "../engines/gig/Engine.h" |
#include "../engines/gig/Engine.h" |
28 |
#include "../audiodriver/AudioOutputDeviceFactory.h" |
#include "../drivers/audio/AudioOutputDeviceFactory.h" |
29 |
#include "../mididriver/MidiInputDeviceFactory.h" |
#include "../drivers/midi/MidiInputDeviceFactory.h" |
30 |
|
|
31 |
|
/** |
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 |
|
std::vector<int> LSCPServer::hSessions = std::vector<int>(); |
47 |
|
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 |
LSCPServer::LSCPServer(Sampler* pSampler) : Thread(false, 0, -4) { |
LSCPServer::LSCPServer(Sampler* pSampler) : Thread(false, 0, -4) { |
55 |
this->pSampler = pSampler; |
this->pSampler = pSampler; |
56 |
|
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 |
} |
} |
63 |
|
|
64 |
int LSCPServer::Main() { |
int LSCPServer::Main() { |
65 |
hSocket = socket(AF_INET, SOCK_STREAM, 0); |
int hSocket = socket(AF_INET, SOCK_STREAM, 0); |
66 |
if (hSocket < 0) { |
if (hSocket < 0) { |
67 |
std::cerr << "LSCPServer: Could not create server socket." << std::endl; |
std::cerr << "LSCPServer: Could not create server socket." << std::endl; |
68 |
//return -1; |
//return -1; |
86 |
// now wait for client connections and handle their requests |
// now wait for client connections and handle their requests |
87 |
sockaddr_in client; |
sockaddr_in client; |
88 |
int length = sizeof(client); |
int length = sizeof(client); |
89 |
|
FD_ZERO(&fdSet); |
90 |
|
FD_SET(hSocket, &fdSet); |
91 |
|
int maxSessions = hSocket; |
92 |
|
|
93 |
|
// Parser initialization |
94 |
|
yyparse_param_t yyparse_param; |
95 |
|
yyparse_param.pServer = this; |
96 |
|
|
97 |
while (true) { |
while (true) { |
98 |
hSession = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length); |
fd_set selectSet = fdSet; |
99 |
if (hSession < 0) { |
int retval = select(maxSessions+1, &selectSet, NULL, NULL, NULL); |
100 |
std::cerr << "LSCPServer: Client connection failed." << std::endl; |
if (retval == 0) |
101 |
close(hSocket); |
continue; //Nothing try again |
102 |
//return -1; |
if (retval == -1) { |
103 |
exit(EXIT_FAILURE); |
std::cerr << "LSCPServer: Socket select error." << std::endl; |
104 |
} |
close(hSocket); |
105 |
|
exit(EXIT_FAILURE); |
106 |
dmsg(1,("LSCPServer: Client connection established.\n")); |
} |
107 |
//send(hSession, "Welcome!\r\n", 10, 0); |
|
108 |
|
//Accept new connections now (if any) |
109 |
// Parser invocation |
if (FD_ISSET(hSocket, &selectSet)) { |
110 |
yyparse_param_t yyparse_param; |
int socket = accept(hSocket, (sockaddr*) &client, (socklen_t*) &length); |
111 |
yyparse_param.pServer = this; |
if (socket < 0) { |
112 |
yylex_init(&yyparse_param.pScanner); |
std::cerr << "LSCPServer: Client connection failed." << std::endl; |
113 |
while (yyparse(&yyparse_param) == LSCP_SYNTAX_ERROR); // recall parser in case of syntax error |
exit(EXIT_FAILURE); |
114 |
yylex_destroy(yyparse_param.pScanner); |
} |
115 |
|
|
116 |
|
if (fcntl(socket, F_SETFL, O_NONBLOCK)) { |
117 |
|
std::cerr << "LSCPServer: F_SETFL O_NONBLOCK failed." << std::endl; |
118 |
|
exit(EXIT_FAILURE); |
119 |
|
} |
120 |
|
|
121 |
|
hSessions.push_back(socket); |
122 |
|
FD_SET(socket, &fdSet); |
123 |
|
if (socket > maxSessions) |
124 |
|
maxSessions = socket; |
125 |
|
dmsg(1,("LSCPServer: Client connection established on socket:%d.\n", socket)); |
126 |
|
LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection established on socket", socket)); |
127 |
|
continue; //Maybe this was the only selected socket, better select again |
128 |
|
} |
129 |
|
|
130 |
close(hSession); |
//Something was selected and it was not the hSocket, so it must be some command(s) coming. |
131 |
dmsg(1,("LSCPServer: Client connection terminated.\n")); |
for (std::vector<int>::iterator iter = hSessions.begin(); iter != hSessions.end(); iter++) { |
132 |
|
if (FD_ISSET(*iter, &selectSet)) { //Was it this socket? |
133 |
|
if (GetLSCPCommand(iter)) { //Have we read the entire command? |
134 |
|
dmsg(3,("LSCPServer: Got command on socket %d, calling parser.\n", currentSocket)); |
135 |
|
yylex_init(&yyparse_param.pScanner); |
136 |
|
currentSocket = *iter; //a hack |
137 |
|
int result = yyparse(&yyparse_param); |
138 |
|
currentSocket = -1; //continuation of a hack |
139 |
|
dmsg(3,("LSCPServer: Done parsing on socket %d.\n", currentSocket)); |
140 |
|
if (result == LSCP_QUIT) { //Was it a quit command by any chance? |
141 |
|
CloseConnection(iter); |
142 |
|
} |
143 |
|
} |
144 |
|
//socket may have been closed, iter may be invalid, get out of the loop for now. |
145 |
|
//we'll be back if there is data. |
146 |
|
break; |
147 |
|
} |
148 |
|
} |
149 |
|
|
150 |
|
//Now let's deliver late notifies (if any) |
151 |
|
NotifyBufferMutex.Lock(); |
152 |
|
for (std::map<int,String>::iterator iterNotify = bufferedNotifies.begin(); iterNotify != bufferedNotifies.end(); iterNotify++) { |
153 |
|
send(iterNotify->first, iterNotify->second.c_str(), iterNotify->second.size(), 0); |
154 |
|
bufferedNotifies.erase(iterNotify); |
155 |
|
} |
156 |
|
NotifyBufferMutex.Unlock(); |
157 |
} |
} |
158 |
|
//It will never get here anyway |
159 |
|
//yylex_destroy(yyparse_param.pScanner); |
160 |
|
} |
161 |
|
|
162 |
|
void LSCPServer::CloseConnection( std::vector<int>::iterator iter ) { |
163 |
|
int socket = *iter; |
164 |
|
dmsg(1,("LSCPServer: Client connection terminated on socket:%d.\n",socket)); |
165 |
|
LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Client connection terminated on socket", socket)); |
166 |
|
hSessions.erase(iter); |
167 |
|
FD_CLR(socket, &fdSet); |
168 |
|
SubscriptionMutex.Lock(); //Must unsubscribe this socket from all events (if any) |
169 |
|
for (std::map< LSCPEvent::event_t, std::list<int> >::iterator iter = eventSubscriptions.begin(); iter != eventSubscriptions.end(); iter++) { |
170 |
|
iter->second.remove(socket); |
171 |
|
} |
172 |
|
SubscriptionMutex.Unlock(); |
173 |
|
NotifyMutex.Lock(); |
174 |
|
bufferedCommands.erase(socket); |
175 |
|
bufferedNotifies.erase(socket); |
176 |
|
close(socket); |
177 |
|
NotifyMutex.Unlock(); |
178 |
|
} |
179 |
|
|
180 |
|
void LSCPServer::SendLSCPNotify( LSCPEvent event ) { |
181 |
|
SubscriptionMutex.Lock(); |
182 |
|
if (eventSubscriptions.count(event.GetType()) == 0) { |
183 |
|
SubscriptionMutex.Unlock(); //Nobody is subscribed to this event |
184 |
|
return; |
185 |
|
} |
186 |
|
std::list<int>::iterator iter = eventSubscriptions[event.GetType()].begin(); |
187 |
|
std::list<int>::iterator end = eventSubscriptions[event.GetType()].end(); |
188 |
|
String notify = event.Produce(); |
189 |
|
|
190 |
|
while (true) { |
191 |
|
if (NotifyMutex.Trylock()) { |
192 |
|
for(;iter != end; iter++) |
193 |
|
send(*iter, notify.c_str(), notify.size(), 0); |
194 |
|
NotifyMutex.Unlock(); |
195 |
|
break; |
196 |
|
} else { |
197 |
|
if (NotifyBufferMutex.Trylock()) { |
198 |
|
for(;iter != end; iter++) |
199 |
|
bufferedNotifies[*iter] += notify; |
200 |
|
NotifyBufferMutex.Unlock(); |
201 |
|
break; |
202 |
|
} |
203 |
|
} |
204 |
|
} |
205 |
|
SubscriptionMutex.Unlock(); |
206 |
|
} |
207 |
|
|
208 |
|
extern int GetLSCPCommand( void *buf, int max_size ) { |
209 |
|
String command = LSCPServer::bufferedCommands[LSCPServer::currentSocket]; |
210 |
|
if (command.size() == 0) { //Parser wants input but we have nothing. |
211 |
|
strcpy((char*) buf, "\n"); //So give it an empty command |
212 |
|
return 1; //to keep it happy. |
213 |
|
} |
214 |
|
|
215 |
|
if (max_size < command.size()) { |
216 |
|
std::cerr << "getLSCPCommand: Flex buffer too small, ignoring the command." << std::endl; |
217 |
|
return 0; //This will never happen |
218 |
|
} |
219 |
|
|
220 |
|
strcpy((char*) buf, command.c_str()); |
221 |
|
LSCPServer::bufferedCommands.erase(LSCPServer::currentSocket); |
222 |
|
return command.size(); |
223 |
|
} |
224 |
|
|
225 |
|
/** |
226 |
|
* Will be called to try to read the command from the socket |
227 |
|
* If command is read, it will return true. Otherwise false is returned. |
228 |
|
* In any case the received portion (complete or incomplete) is saved into bufferedCommand map. |
229 |
|
*/ |
230 |
|
bool LSCPServer::GetLSCPCommand( std::vector<int>::iterator iter ) { |
231 |
|
int socket = *iter; |
232 |
|
char c; |
233 |
|
int i = 0; |
234 |
|
while (true) { |
235 |
|
int result = recv(socket, (void *)&c, 1, 0); //Read one character at a time for now |
236 |
|
if (result == 0) { //socket was selected, so 0 here means client has closed the connection |
237 |
|
CloseConnection(iter); |
238 |
|
break; |
239 |
|
} |
240 |
|
if (result == 1) { |
241 |
|
if (c == '\r') |
242 |
|
continue; //Ignore CR |
243 |
|
if (c == '\n') { |
244 |
|
LSCPServer::SendLSCPNotify(LSCPEvent(LSCPEvent::event_misc, "Received \'" + bufferedCommands[socket] + "\' on socket", socket)); |
245 |
|
bufferedCommands[socket] += "\n"; |
246 |
|
return true; //Complete command was read |
247 |
|
} |
248 |
|
bufferedCommands[socket] += c; |
249 |
|
} |
250 |
|
if (result == -1) { |
251 |
|
if (errno == EAGAIN) //Would block, try again later. |
252 |
|
return false; |
253 |
|
switch(errno) { |
254 |
|
case EBADF: |
255 |
|
dmsg(2,("LSCPScanner: The argument s is an invalid descriptor.\n")); |
256 |
|
break; |
257 |
|
case ECONNREFUSED: |
258 |
|
dmsg(2,("LSCPScanner: A remote host refused to allow the network connection (typically because it is not running the requested service).\n")); |
259 |
|
break; |
260 |
|
case ENOTCONN: |
261 |
|
dmsg(2,("LSCPScanner: The socket is associated with a connection-oriented protocol and has not been connected (see connect(2) and accept(2)).\n")); |
262 |
|
break; |
263 |
|
case ENOTSOCK: |
264 |
|
dmsg(2,("LSCPScanner: The argument s does not refer to a socket.\n")); |
265 |
|
break; |
266 |
|
case EAGAIN: |
267 |
|
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")); |
268 |
|
break; |
269 |
|
case EINTR: |
270 |
|
dmsg(2,("LSCPScanner: The receive was interrupted by delivery of a signal before any data were available.\n")); |
271 |
|
break; |
272 |
|
case EFAULT: |
273 |
|
dmsg(2,("LSCPScanner: The receive buffer pointer(s) point outside the process's address space.\n")); |
274 |
|
break; |
275 |
|
case EINVAL: |
276 |
|
dmsg(2,("LSCPScanner: Invalid argument passed.\n")); |
277 |
|
break; |
278 |
|
case ENOMEM: |
279 |
|
dmsg(2,("LSCPScanner: Could not allocate memory for recvmsg.\n")); |
280 |
|
break; |
281 |
|
default: |
282 |
|
dmsg(2,("LSCPScanner: Unknown recv() error.\n")); |
283 |
|
break; |
284 |
|
} |
285 |
|
CloseConnection(iter); |
286 |
|
break; |
287 |
|
} |
288 |
|
} |
289 |
|
return false; |
290 |
} |
} |
291 |
|
|
292 |
/** |
/** |
297 |
*/ |
*/ |
298 |
void LSCPServer::AnswerClient(String ReturnMessage) { |
void LSCPServer::AnswerClient(String ReturnMessage) { |
299 |
dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str())); |
dmsg(2,("LSCPServer::AnswerClient(ReturnMessage=%s)", ReturnMessage.c_str())); |
300 |
send(hSession, ReturnMessage.c_str(), ReturnMessage.size(), 0); |
if (currentSocket != -1) { |
301 |
|
NotifyMutex.Lock(); |
302 |
|
send(currentSocket, ReturnMessage.c_str(), ReturnMessage.size(), 0); |
303 |
|
NotifyMutex.Unlock(); |
304 |
|
} |
305 |
} |
} |
306 |
|
|
307 |
/** |
/** |
454 |
} |
} |
455 |
|
|
456 |
/** |
/** |
457 |
|
* Will be called by the parser to get the list of sampler channels. |
458 |
|
*/ |
459 |
|
String LSCPServer::ListChannels() { |
460 |
|
dmsg(2,("LSCPServer: ListChannels()\n")); |
461 |
|
String list; |
462 |
|
std::map<uint,SamplerChannel*> channels = pSampler->GetSamplerChannels(); |
463 |
|
std::map<uint,SamplerChannel*>::iterator iter = channels.begin(); |
464 |
|
for (; iter != channels.end(); iter++) { |
465 |
|
if (list != "") list += ","; |
466 |
|
list += ToString(iter->first); |
467 |
|
} |
468 |
|
LSCPResultSet result; |
469 |
|
result.Add(list); |
470 |
|
return result.Produce(); |
471 |
|
} |
472 |
|
|
473 |
|
/** |
474 |
* Will be called by the parser to add a sampler channel. |
* Will be called by the parser to add a sampler channel. |
475 |
*/ |
*/ |
476 |
String LSCPServer::AddChannel() { |
String LSCPServer::AddChannel() { |
911 |
return result.Produce(); |
return result.Produce(); |
912 |
} |
} |
913 |
|
|
914 |
|
String LSCPServer::GetMidiInputPortParameterInfo(uint DeviceId, uint PortId, String ParameterName) { |
915 |
|
dmsg(2,("LSCPServer: GetMidiInputPortParameterInfo(DeviceId=%d,PortId=%d,ParameterName=%s)\n",DeviceId,PortId,ParameterName.c_str())); |
916 |
|
LSCPResultSet result; |
917 |
|
try { |
918 |
|
// get audio output device |
919 |
|
std::map<uint,MidiInputDevice*> devices = pSampler->GetMidiInputDevices(); |
920 |
|
if (!devices[DeviceId]) throw LinuxSamplerException("There is no midi input device with index " + ToString(DeviceId) + "."); |
921 |
|
MidiInputDevice* pDevice = devices[DeviceId]; |
922 |
|
|
923 |
|
// get midi port |
924 |
|
MidiInputDevice::MidiInputPort* pPort = pDevice->GetPort(PortId); |
925 |
|
if (!pPort) throw LinuxSamplerException("Midi input device does not have port " + ToString(PortId) + "."); |
926 |
|
|
927 |
|
// get desired port parameter |
928 |
|
std::map<String,DeviceCreationParameter*> parameters = pPort->DeviceParameters(); |
929 |
|
if (!parameters[ParameterName]) throw LinuxSamplerException("Midi port does not provice a parameters '" + ParameterName + "'."); |
930 |
|
DeviceCreationParameter* pParameter = parameters[ParameterName]; |
931 |
|
|
932 |
|
// return all fields of this audio channel parameter |
933 |
|
result.Add("TYPE", pParameter->Type()); |
934 |
|
result.Add("DESCRIPTION", pParameter->Description()); |
935 |
|
result.Add("FIX", pParameter->Fix()); |
936 |
|
result.Add("MULTIPLICITY", pParameter->Multiplicity()); |
937 |
|
if (pParameter->RangeMin()) result.Add("RANGE_MIN", pParameter->RangeMin()); |
938 |
|
if (pParameter->RangeMax()) result.Add("RANGE_MAX", pParameter->RangeMax()); |
939 |
|
if (pParameter->Possibilities()) result.Add("POSSIBILITIES", pParameter->Possibilities()); |
940 |
|
} |
941 |
|
catch (LinuxSamplerException e) { |
942 |
|
result.Error(e); |
943 |
|
} |
944 |
|
return result.Produce(); |
945 |
|
} |
946 |
|
|
947 |
String LSCPServer::GetAudioOutputChannelParameterInfo(uint DeviceId, uint ChannelId, String ParameterName) { |
String LSCPServer::GetAudioOutputChannelParameterInfo(uint DeviceId, uint ChannelId, String ParameterName) { |
948 |
dmsg(2,("LSCPServer: GetAudioOutputChannelParameterInfo(DeviceId=%d,ChannelId=%d,ParameterName=%s)\n",DeviceId,ChannelId,ParameterName.c_str())); |
dmsg(2,("LSCPServer: GetAudioOutputChannelParameterInfo(DeviceId=%d,ChannelId=%d,ParameterName=%s)\n",DeviceId,ChannelId,ParameterName.c_str())); |
949 |
LSCPResultSet result; |
LSCPResultSet result; |
1091 |
if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); |
if (!pSamplerChannel) throw LinuxSamplerException("Invalid channel number " + ToString(uiSamplerChannel)); |
1092 |
// Driver type name aliasing... |
// Driver type name aliasing... |
1093 |
if (AudioOutputDriver == "ALSA") AudioOutputDriver = "Alsa"; |
if (AudioOutputDriver == "ALSA") AudioOutputDriver = "Alsa"; |
1094 |
if (AudioOutputDriver == "JACK") AudioOutputDriver = "Jack"; |
if (AudioOutputDriver == "JACK") AudioOutputDriver = "Jack"; |
1095 |
// Check if there's one audio output device already created |
// Check if there's one audio output device already created |
1096 |
// for the intended audio driver type (AudioOutputDriver)... |
// for the intended audio driver type (AudioOutputDriver)... |
1097 |
AudioOutputDevice *pDevice = NULL; |
AudioOutputDevice *pDevice = NULL; |
1268 |
* 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 |
1269 |
* server for receiving event messages. |
* server for receiving event messages. |
1270 |
*/ |
*/ |
1271 |
String LSCPServer::SubscribeNotification(event_t Event) { |
String LSCPServer::SubscribeNotification(LSCPEvent::event_t type) { |
1272 |
dmsg(2,("LSCPServer: SubscribeNotification(Event=%d)\n", Event)); |
dmsg(2,("LSCPServer: SubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str())); |
1273 |
return "ERR:0:Not implemented yet.\r\n"; |
LSCPResultSet result; |
1274 |
|
SubscriptionMutex.Lock(); |
1275 |
|
eventSubscriptions[type].push_back(currentSocket); |
1276 |
|
SubscriptionMutex.Unlock(); |
1277 |
|
return result.Produce(); |
1278 |
} |
} |
1279 |
|
|
1280 |
/** |
/** |
1281 |
* 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 |
1282 |
* for not receiving further event messages. |
* for not receiving further event messages. |
1283 |
*/ |
*/ |
1284 |
String LSCPServer::UnsubscribeNotification(event_t Event) { |
String LSCPServer::UnsubscribeNotification(LSCPEvent::event_t type) { |
1285 |
dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%d)\n", Event)); |
dmsg(2,("LSCPServer: UnsubscribeNotification(Event=%s)\n", LSCPEvent::Name(type).c_str())); |
1286 |
return "ERR:0:Not implemented yet.\r\n"; |
LSCPResultSet result; |
1287 |
|
SubscriptionMutex.Lock(); |
1288 |
|
eventSubscriptions[type].remove(currentSocket); |
1289 |
|
SubscriptionMutex.Unlock(); |
1290 |
|
return result.Produce(); |
1291 |
} |
} |
1292 |
|
|
1293 |
|
|