20 |
* MA 02111-1307 USA * |
* MA 02111-1307 USA * |
21 |
***************************************************************************/ |
***************************************************************************/ |
22 |
|
|
23 |
|
/* Note: don't forget to run 'make parser' after you changed this file, */ |
24 |
|
/* otherwise the parser will not be regenerated! */ |
25 |
|
|
26 |
%{ |
%{ |
27 |
|
|
28 |
#include "lscpparser.h" |
#include "lscpparser.h" |
29 |
#include "lscpserver.h" |
#include "lscpserver.h" |
30 |
|
#include "lscpevent.h" |
|
// as we need an reentrant scanner, we have to pass the pointer to the scanner with each yylex() call |
|
|
#define YYLEX_PARAM ((yyparse_param_t*) yyparse_param)->pScanner |
|
31 |
|
|
32 |
// to save us typing work in the rules action definitions |
// to save us typing work in the rules action definitions |
33 |
#define LSCPSERVER ((yyparse_param_t*) yyparse_param)->pServer |
#define LSCPSERVER ((yyparse_param_t*) yyparse_param)->pServer |
34 |
|
|
35 |
// clears input buffer and restarts scanner. |
// clears input buffer |
36 |
void restart(yyparse_param_t* pparam, int& yychar); |
void restart(yyparse_param_t* pparam, int& yychar); |
37 |
#define RESTART restart((yyparse_param_t*) YYPARSE_PARAM, yychar) |
#define RESTART restart((yyparse_param_t*) YYPARSE_PARAM, yychar) |
38 |
|
|
|
// external reference to the main scanner function yylex() |
|
|
extern YY_DECL; |
|
|
|
|
|
// external reference to restart the lex scanner |
|
|
extern void yyrestart(FILE* input_file, yyscan_t yyscanner); |
|
|
|
|
39 |
// we provide our own version of yyerror() so we don't have to link against the yacc library |
// we provide our own version of yyerror() so we don't have to link against the yacc library |
40 |
void yyerror(const char* s); |
void yyerror(const char* s); |
41 |
|
|
42 |
|
static char buf[1024]; // input buffer to feed the parser with new characters |
43 |
|
static int bytes = 0; // current number of characters in the input buffer |
44 |
|
static int ptr = 0; // current position in the input buffer |
45 |
|
|
46 |
|
// external reference to the function which actually reads from the socket |
47 |
|
extern int GetLSCPCommand( void *buf, int max_size); |
48 |
|
|
49 |
|
// custom scanner function which reads from the socket |
50 |
|
int yylex(YYSTYPE* yylval) { |
51 |
|
// check if we have to read new characters |
52 |
|
if (ptr >= bytes) { |
53 |
|
bytes = GetLSCPCommand(buf, 1023); |
54 |
|
ptr = 0; |
55 |
|
if (bytes < 0) { |
56 |
|
bytes = 0; |
57 |
|
return 0; |
58 |
|
} |
59 |
|
} |
60 |
|
return (int) buf[ptr++]; |
61 |
|
} |
62 |
|
|
63 |
%} |
%} |
64 |
|
|
65 |
// reentrant parser |
// reentrant parser |
66 |
%pure_parser |
%pure_parser |
67 |
|
|
68 |
%token <Char> CHAR |
%type <Char> char digit |
69 |
%token <Dotnum> DOTNUM |
%type <Dotnum> dotnum volume_value boolean |
70 |
%token <Number> NUMBER |
%type <Number> number sampler_channel instrument_index audio_channel_index device_index midi_input_channel_index midi_input_port_index |
71 |
%token <String> STRINGVAL |
%type <String> string text stringval digits param_val filename engine_name command create_instruction destroy_instruction get_instruction list_instruction load_instruction set_chan_instruction load_instr_args load_engine_args audio_output_type_name midi_input_type_name set_instruction subscribe_event unsubscribe_event |
|
%token SP LF CR HASH EQ |
|
|
%token ADD GET CREATE DESTROY LIST LOAD LOAD_BACKGROUND REMOVE SET SUBSCRIBE UNSUBSCRIBE RESET QUIT |
|
|
%token CHANNEL NOTIFICATION |
|
|
%token AVAILABLE_ENGINES AVAILABLE_AUDIO_OUTPUT_DRIVERS CHANNELS INFO BUFFER_FILL STREAM_COUNT VOICE_COUNT |
|
|
%token INSTRUMENT ENGINE |
|
|
%token AUDIO_OUTPUT_CHANNEL AUDIO_OUTPUT_CHANNEL_PARAMETER AUDIO_OUTPUT_DEVICE AUDIO_OUTPUT_DEVICES AUDIO_OUTPUT_DEVICE_PARAMETER AUDIO_OUTPUT_DRIVER AUDIO_OUTPUT_DRIVER_PARAMETER MIDI_INPUT_PORT MIDI_INPUT_CHANNEL MIDI_INPUT_TYPE VOLUME |
|
|
%token BYTES PERCENTAGE |
|
|
%token MISCELLANEOUS |
|
|
|
|
|
%type <Dotnum> volume |
|
|
%type <Number> sampler_channel instrument_index audio_output_channel midi_input_channel |
|
|
%type <String> string param_val filename engine_name midi_input_port command create_instruction destroy_instruction get_instruction list_instruction load_instruction set_chan_instruction load_instr_args load_engine_args midi_input_type set_instruction subscribe_event unsubscribe_event |
|
72 |
%type <FillResponse> buffer_size_type |
%type <FillResponse> buffer_size_type |
73 |
%type <KeyValList> key_val_list |
%type <KeyValList> key_val_list |
74 |
|
|
78 |
|
|
79 |
//TODO: return more meaningful error messages |
//TODO: return more meaningful error messages |
80 |
|
|
81 |
input : line |
input : line LF |
82 |
| input LF line |
| line CR LF |
|
| input CR LF line |
|
83 |
; |
; |
84 |
|
|
85 |
line : /* epsilon (empty line ignored) */ |
line : /* epsilon (empty line ignored) */ { return LSCP_DONE; } |
86 |
| comment |
| comment { return LSCP_DONE; } |
87 |
| command { LSCPSERVER->AnswerClient($1); } |
| command { LSCPSERVER->AnswerClient($1); return LSCP_DONE; } |
88 |
| error { LSCPSERVER->AnswerClient("Err:0:Unknown command.\r\n"); RESTART; return LSCP_SYNTAX_ERROR; } |
| error { LSCPSERVER->AnswerClient("Err:0:Unknown command.\r\n"); RESTART; return LSCP_SYNTAX_ERROR; } |
89 |
; |
; |
90 |
|
|
91 |
comment : HASH |
comment : '#' |
92 |
| comment HASH |
| comment '#' |
93 |
| comment SP |
| comment SP |
94 |
| comment NUMBER |
| comment number |
95 |
| comment string |
| comment string |
96 |
; |
; |
97 |
|
|
98 |
command : ADD SP CHANNEL { $$ = LSCPSERVER->AddChannel(); } |
command : ADD SP CHANNEL { $$ = LSCPSERVER->AddChannel(); } |
99 |
| GET SP get_instruction { $$ = $3; } |
| GET SP get_instruction { $$ = $3; } |
100 |
| CREATE SP create_instruction { $$ = $3; } |
| CREATE SP create_instruction { $$ = $3; } |
101 |
| DESTROY SP destroy_instruction { $$ = $3; } |
| DESTROY SP destroy_instruction { $$ = $3; } |
102 |
| LIST SP list_instruction { $$ = $3; } |
| LIST SP list_instruction { $$ = $3; } |
103 |
| LOAD SP load_instruction { $$ = $3; } |
| LOAD SP load_instruction { $$ = $3; } |
104 |
| LOAD_BACKGROUND SP load_instruction { $$ = $3; } |
| REMOVE SP CHANNEL SP sampler_channel { $$ = LSCPSERVER->RemoveChannel($5); } |
105 |
| REMOVE SP CHANNEL SP sampler_channel { $$ = LSCPSERVER->RemoveChannel($5); } |
| SET SP set_instruction { $$ = $3; } |
106 |
| SET SP set_instruction { $$ = $3; } |
| SUBSCRIBE SP subscribe_event { $$ = $3; } |
107 |
| SUBSCRIBE SP subscribe_event { $$ = $3; } |
| UNSUBSCRIBE SP unsubscribe_event { $$ = $3; } |
108 |
| UNSUBSCRIBE SP unsubscribe_event { $$ = $3; } |
| RESET SP CHANNEL SP sampler_channel { $$ = LSCPSERVER->ResetChannel($5); } |
109 |
| RESET SP CHANNEL SP sampler_channel { $$ = LSCPSERVER->ResetChannel($5); } |
| RESET { $$ = LSCPSERVER->ResetSampler(); } |
110 |
| QUIT { LSCPSERVER->AnswerClient("Bye!\r\n"); return 0; } |
| QUIT { LSCPSERVER->AnswerClient("Bye!\r\n"); return LSCP_QUIT; } |
111 |
; |
; |
112 |
|
|
113 |
subscribe_event : CHANNELS { $$ = LSCPSERVER->SubscribeNotification(event_channels); } |
subscribe_event : CHANNELS { $$ = LSCPSERVER->SubscribeNotification(LSCPEvent::event_channels); } |
114 |
| VOICE_COUNT { $$ = LSCPSERVER->SubscribeNotification(event_voice_count); } |
| VOICE_COUNT { $$ = LSCPSERVER->SubscribeNotification(LSCPEvent::event_voice_count); } |
115 |
| STREAM_COUNT { $$ = LSCPSERVER->SubscribeNotification(event_stream_count); } |
| STREAM_COUNT { $$ = LSCPSERVER->SubscribeNotification(LSCPEvent::event_stream_count); } |
116 |
| BUFFER_FILL { $$ = LSCPSERVER->SubscribeNotification(event_channel_buffer_fill); } |
| BUFFER_FILL { $$ = LSCPSERVER->SubscribeNotification(LSCPEvent::event_buffer_fill); } |
117 |
| INFO { $$ = LSCPSERVER->SubscribeNotification(event_channel_info); } |
| INFO { $$ = LSCPSERVER->SubscribeNotification(LSCPEvent::event_info); } |
118 |
| MISCELLANEOUS { $$ = LSCPSERVER->SubscribeNotification(event_misc); } |
| MISCELLANEOUS { $$ = LSCPSERVER->SubscribeNotification(LSCPEvent::event_misc); } |
119 |
; |
; |
120 |
|
|
121 |
unsubscribe_event : CHANNELS { $$ = LSCPSERVER->UnsubscribeNotification(event_channels); } |
unsubscribe_event : CHANNELS { $$ = LSCPSERVER->UnsubscribeNotification(LSCPEvent::event_channels); } |
122 |
| VOICE_COUNT { $$ = LSCPSERVER->UnsubscribeNotification(event_voice_count); } |
| VOICE_COUNT { $$ = LSCPSERVER->UnsubscribeNotification(LSCPEvent::event_voice_count); } |
123 |
| STREAM_COUNT { $$ = LSCPSERVER->UnsubscribeNotification(event_stream_count); } |
| STREAM_COUNT { $$ = LSCPSERVER->UnsubscribeNotification(LSCPEvent::event_stream_count); } |
124 |
| BUFFER_FILL { $$ = LSCPSERVER->UnsubscribeNotification(event_channel_buffer_fill); } |
| BUFFER_FILL { $$ = LSCPSERVER->UnsubscribeNotification(LSCPEvent::event_buffer_fill); } |
125 |
| INFO { $$ = LSCPSERVER->UnsubscribeNotification(event_channel_info); } |
| INFO { $$ = LSCPSERVER->UnsubscribeNotification(LSCPEvent::event_info); } |
126 |
| MISCELLANEOUS { $$ = LSCPSERVER->UnsubscribeNotification(event_misc); } |
| MISCELLANEOUS { $$ = LSCPSERVER->UnsubscribeNotification(LSCPEvent::event_misc); } |
127 |
; |
; |
128 |
|
|
129 |
get_instruction : AVAILABLE_ENGINES { $$ = LSCPSERVER->GetAvailableEngines(); } |
get_instruction : AVAILABLE_ENGINES { $$ = LSCPSERVER->GetAvailableEngines(); } |
130 |
|
| AVAILABLE_MIDI_INPUT_DRIVERS { $$ = LSCPSERVER->GetAvailableMidiInputDrivers(); } |
131 |
|
| MIDI_INPUT_DRIVER SP INFO SP string { $$ = LSCPSERVER->GetMidiInputDriverInfo($5); } |
132 |
|
| MIDI_INPUT_DRIVER_PARAMETER SP INFO SP string SP string { $$ = LSCPSERVER->GetMidiInputDriverParameterInfo($5, $7); } |
133 |
|
| MIDI_INPUT_DRIVER_PARAMETER SP INFO SP string SP string SP key_val_list { $$ = LSCPSERVER->GetMidiInputDriverParameterInfo($5, $7, $9); } |
134 |
| AVAILABLE_AUDIO_OUTPUT_DRIVERS { $$ = LSCPSERVER->GetAvailableAudioOutputDrivers(); } |
| AVAILABLE_AUDIO_OUTPUT_DRIVERS { $$ = LSCPSERVER->GetAvailableAudioOutputDrivers(); } |
135 |
| AUDIO_OUTPUT_DRIVER SP INFO SP string { $$ = LSCPSERVER->GetAudioOutputDriverInfo($5); } |
| AUDIO_OUTPUT_DRIVER SP INFO SP string { $$ = LSCPSERVER->GetAudioOutputDriverInfo($5); } |
136 |
| AUDIO_OUTPUT_DRIVER_PARAMETER SP INFO SP string SP string { $$ = LSCPSERVER->GetAudioOutputDriverParameterInfo($5, $7); } |
| AUDIO_OUTPUT_DRIVER_PARAMETER SP INFO SP string SP string { $$ = LSCPSERVER->GetAudioOutputDriverParameterInfo($5, $7); } |
137 |
| AUDIO_OUTPUT_DRIVER_PARAMETER SP INFO SP string SP string SP key_val_list { $$ = LSCPSERVER->GetAudioOutputDriverParameterInfo($5, $7, $9); } |
| AUDIO_OUTPUT_DRIVER_PARAMETER SP INFO SP string SP string SP key_val_list { $$ = LSCPSERVER->GetAudioOutputDriverParameterInfo($5, $7, $9); } |
138 |
| AUDIO_OUTPUT_DEVICES { $$ = LSCPSERVER->GetAudioOutputDeviceCount(); } |
| AUDIO_OUTPUT_DEVICES { $$ = LSCPSERVER->GetAudioOutputDeviceCount(); } |
139 |
| AUDIO_OUTPUT_DEVICE SP INFO SP NUMBER { $$ = LSCPSERVER->GetAudioOutputDeviceInfo($5); } |
| MIDI_INPUT_DEVICES { $$ = LSCPSERVER->GetMidiInputDeviceCount(); } |
140 |
| AUDIO_OUTPUT_CHANNEL SP INFO SP NUMBER SP NUMBER { $$ = LSCPSERVER->GetAudioOutputChannelInfo($5, $7); } |
| AUDIO_OUTPUT_DEVICE SP INFO SP number { $$ = LSCPSERVER->GetAudioOutputDeviceInfo($5); } |
141 |
| AUDIO_OUTPUT_CHANNEL_PARAMETER SP INFO SP NUMBER SP NUMBER SP string { $$ = LSCPSERVER->GetAudioOutputChannelParameterInfo($5, $7, $9); } |
| MIDI_INPUT_DEVICE SP INFO SP number { $$ = LSCPSERVER->GetMidiInputDeviceInfo($5); } |
142 |
|
| MIDI_INPUT_PORT SP INFO SP number SP number { $$ = LSCPSERVER->GetMidiInputPortInfo($5, $7); } |
143 |
|
| MIDI_INPUT_PORT_PARAMETER SP INFO SP number SP number SP string { $$ = LSCPSERVER->GetMidiInputPortParameterInfo($5, $7, $9); } |
144 |
|
| AUDIO_OUTPUT_CHANNEL SP INFO SP number SP number { $$ = LSCPSERVER->GetAudioOutputChannelInfo($5, $7); } |
145 |
|
| AUDIO_OUTPUT_CHANNEL_PARAMETER SP INFO SP number SP number SP string { $$ = LSCPSERVER->GetAudioOutputChannelParameterInfo($5, $7, $9); } |
146 |
| CHANNELS { $$ = LSCPSERVER->GetChannels(); } |
| CHANNELS { $$ = LSCPSERVER->GetChannels(); } |
147 |
| CHANNEL SP INFO SP sampler_channel { $$ = LSCPSERVER->GetChannelInfo($5); } |
| CHANNEL SP INFO SP sampler_channel { $$ = LSCPSERVER->GetChannelInfo($5); } |
148 |
| CHANNEL SP BUFFER_FILL SP buffer_size_type SP sampler_channel { $$ = LSCPSERVER->GetBufferFill($5, $7); } |
| CHANNEL SP BUFFER_FILL SP buffer_size_type SP sampler_channel { $$ = LSCPSERVER->GetBufferFill($5, $7); } |
151 |
| ENGINE SP INFO SP engine_name { $$ = LSCPSERVER->GetEngineInfo($5); } |
| ENGINE SP INFO SP engine_name { $$ = LSCPSERVER->GetEngineInfo($5); } |
152 |
; |
; |
153 |
|
|
154 |
set_instruction : AUDIO_OUTPUT_DEVICE_PARAMETER SP NUMBER SP string EQ param_val { $$ = LSCPSERVER->SetAudioOutputDeviceParameter($3, $5, $7); } |
set_instruction : AUDIO_OUTPUT_DEVICE_PARAMETER SP number SP string '=' param_val { $$ = LSCPSERVER->SetAudioOutputDeviceParameter($3, $5, $7); } |
155 |
| AUDIO_OUTPUT_CHANNEL_PARAMETER SP NUMBER SP NUMBER SP string EQ param_val { $$ = LSCPSERVER->SetAudioOutputChannelParameter($3, $5, $7, $9); } |
| AUDIO_OUTPUT_CHANNEL_PARAMETER SP number SP number SP string '=' param_val { $$ = LSCPSERVER->SetAudioOutputChannelParameter($3, $5, $7, $9); } |
156 |
| CHANNEL SP set_chan_instruction { $$ = $3; } |
| MIDI_INPUT_DEVICE_PARAMETER SP number SP string '=' param_val { $$ = LSCPSERVER->SetMidiInputDeviceParameter($3, $5, $7); } |
157 |
; |
| MIDI_INPUT_PORT_PARAMETER SP number SP number SP string '=' param_val { $$ = LSCPSERVER->SetMidiInputPortParameter($3, $5, $7, $9); } |
158 |
|
| CHANNEL SP set_chan_instruction { $$ = $3; } |
159 |
create_instruction : AUDIO_OUTPUT_DEVICE SP string SP key_val_list { $$ = LSCPSERVER->CreateAudioOutputDevice($3,$5); } |
| ECHO SP boolean { $$ = LSCPSERVER->SetEcho((yyparse_param_t*) yyparse_param, $3); } |
160 |
|
; |
161 |
|
|
162 |
|
create_instruction : AUDIO_OUTPUT_DEVICE SP string SP key_val_list { $$ = LSCPSERVER->CreateAudioOutputDevice($3,$5); } |
163 |
|
| AUDIO_OUTPUT_DEVICE SP string { $$ = LSCPSERVER->CreateAudioOutputDevice($3); } |
164 |
|
| MIDI_INPUT_DEVICE SP string SP key_val_list { $$ = LSCPSERVER->CreateMidiInputDevice($3,$5); } |
165 |
|
| MIDI_INPUT_DEVICE SP string { $$ = LSCPSERVER->CreateMidiInputDevice($3); } |
166 |
; |
; |
167 |
|
|
168 |
destroy_instruction : AUDIO_OUTPUT_DEVICE SP NUMBER { $$ = LSCPSERVER->DestroyAudioOutputDevice($3); } |
destroy_instruction : AUDIO_OUTPUT_DEVICE SP number { $$ = LSCPSERVER->DestroyAudioOutputDevice($3); } |
169 |
|
| MIDI_INPUT_DEVICE SP number { $$ = LSCPSERVER->DestroyMidiInputDevice($3); } |
170 |
; |
; |
171 |
|
|
172 |
load_instruction : INSTRUMENT SP load_instr_args { $$ = $3; } |
load_instruction : INSTRUMENT SP load_instr_args { $$ = $3; } |
173 |
| ENGINE SP load_engine_args { $$ = $3; } |
| ENGINE SP load_engine_args { $$ = $3; } |
174 |
; |
; |
175 |
|
|
176 |
set_chan_instruction : AUDIO_OUTPUT_DEVICE SP sampler_channel SP NUMBER { $$ = LSCPSERVER->SetAudioOutputDevice($5, $3); } |
set_chan_instruction : AUDIO_OUTPUT_DEVICE SP sampler_channel SP device_index { $$ = LSCPSERVER->SetAudioOutputDevice($5, $3); } |
177 |
| AUDIO_OUTPUT_CHANNEL SP sampler_channel SP audio_output_channel SP audio_output_channel { $$ = LSCPSERVER->SetAudioOutputChannel($5, $7, $3); } |
| AUDIO_OUTPUT_CHANNEL SP sampler_channel SP audio_channel_index SP audio_channel_index { $$ = LSCPSERVER->SetAudioOutputChannel($5, $7, $3); } |
178 |
| MIDI_INPUT_PORT SP sampler_channel SP midi_input_port { $$ = LSCPSERVER->SetMIDIInputPort($5, $3); } |
| AUDIO_OUTPUT_TYPE SP sampler_channel SP audio_output_type_name { $$ = LSCPSERVER->SetAudioOutputType($5, $3); } |
179 |
| MIDI_INPUT_CHANNEL SP sampler_channel SP midi_input_channel { $$ = LSCPSERVER->SetMIDIInputChannel($5, $3); } |
| MIDI_INPUT SP sampler_channel SP device_index SP midi_input_port_index SP midi_input_channel_index { $$ = LSCPSERVER->SetMIDIInput($5, $7, $9, $3); } |
180 |
| MIDI_INPUT_TYPE SP sampler_channel SP midi_input_type { $$ = LSCPSERVER->SetMIDIInputType($5, $3); } |
| MIDI_INPUT_DEVICE SP sampler_channel SP device_index { $$ = LSCPSERVER->SetMIDIInputDevice($5, $3); } |
181 |
| VOLUME SP sampler_channel SP volume { $$ = LSCPSERVER->SetVolume($5, $3); } |
| MIDI_INPUT_PORT SP sampler_channel SP midi_input_port_index { $$ = LSCPSERVER->SetMIDIInputPort($5, $3); } |
182 |
|
| MIDI_INPUT_CHANNEL SP sampler_channel SP midi_input_channel_index { $$ = LSCPSERVER->SetMIDIInputChannel($5, $3); } |
183 |
|
| MIDI_INPUT_TYPE SP sampler_channel SP midi_input_type_name { $$ = LSCPSERVER->SetMIDIInputType($5, $3); } |
184 |
|
| VOLUME SP sampler_channel SP volume_value { $$ = LSCPSERVER->SetVolume($5, $3); } |
185 |
; |
; |
186 |
|
|
187 |
key_val_list : string EQ param_val { $$[$1] = $3; } |
key_val_list : string '=' param_val { $$[$1] = $3; } |
188 |
| key_val_list SP string EQ param_val { $$ = $1; $$[$3] = $5; } |
| key_val_list SP string '=' param_val { $$ = $1; $$[$3] = $5; } |
189 |
; |
; |
190 |
|
|
191 |
buffer_size_type : BYTES { $$ = fill_response_bytes; } |
buffer_size_type : BYTES { $$ = fill_response_bytes; } |
193 |
; |
; |
194 |
|
|
195 |
list_instruction : AUDIO_OUTPUT_DEVICES { $$ = LSCPSERVER->GetAudioOutputDevices(); } |
list_instruction : AUDIO_OUTPUT_DEVICES { $$ = LSCPSERVER->GetAudioOutputDevices(); } |
196 |
|
| MIDI_INPUT_DEVICES { $$ = LSCPSERVER->GetMidiInputDevices(); } |
197 |
|
| CHANNELS { $$ = LSCPSERVER->ListChannels(); } |
198 |
; |
; |
199 |
|
|
200 |
load_instr_args : filename SP instrument_index SP sampler_channel { $$ = LSCPSERVER->LoadInstrument($1, $3, $5); } |
load_instr_args : filename SP instrument_index SP sampler_channel { $$ = LSCPSERVER->LoadInstrument($1, $3, $5); } |
201 |
|
| NON_MODAL SP filename SP instrument_index SP sampler_channel { $$ = LSCPSERVER->LoadInstrument($3, $5, $7, true); } |
202 |
; |
; |
203 |
|
|
204 |
load_engine_args : engine_name SP sampler_channel { $$ = LSCPSERVER->LoadEngine($1, $3); } |
load_engine_args : engine_name SP sampler_channel { $$ = LSCPSERVER->LoadEngine($1, $3); } |
205 |
; |
; |
206 |
|
|
207 |
midi_input_type : string |
device_index : number |
208 |
|
; |
209 |
|
|
210 |
|
audio_channel_index : number |
211 |
|
; |
212 |
|
|
213 |
|
audio_output_type_name : string |
214 |
|
; |
215 |
|
|
216 |
|
midi_input_port_index : number |
217 |
|
; |
218 |
|
|
219 |
|
midi_input_channel_index : number |
220 |
|
| ALL { $$ = 0; } |
221 |
|
; |
222 |
|
|
223 |
|
midi_input_type_name : string |
224 |
|
; |
225 |
|
|
226 |
|
volume_value : dotnum |
227 |
|
| number { $$ = $1; } |
228 |
|
; |
229 |
|
|
230 |
|
sampler_channel : number |
231 |
|
; |
232 |
|
|
233 |
|
instrument_index : number |
234 |
|
; |
235 |
|
|
236 |
|
engine_name : string |
237 |
|
; |
238 |
|
|
239 |
|
filename : stringval |
240 |
|
; |
241 |
|
|
242 |
|
param_val : string |
243 |
|
| stringval |
244 |
|
| number { std::stringstream ss; ss << $1; $$ = ss.str(); } |
245 |
|
| dotnum { std::stringstream ss; ss << $1; $$ = ss.str(); } |
246 |
|
; |
247 |
|
|
248 |
|
|
249 |
|
// atomic variable symbol rules |
250 |
|
|
251 |
|
boolean : number { $$ = $1; } |
252 |
|
| string { $$ = -1; } |
253 |
|
; |
254 |
|
|
255 |
|
string : char { std::string s; s = $1; $$ = s; } |
256 |
|
| string char { $$ = $1 + $2; } |
257 |
|
; |
258 |
|
|
259 |
|
dotnum : digits '.' digits { $$ = atof(String($1 + "." + $3).c_str()); } |
260 |
|
| '+' digits '.' digits { String s = "+"; s += $2; s += "."; s += $4; $$ = atof(s.c_str()); } |
261 |
|
| '-' digits '.' digits { $$ = atof(String("-" + $2 + "." + $4).c_str()); } |
262 |
|
; |
263 |
|
|
264 |
|
|
265 |
|
digits : digit { $$ = $1; } |
266 |
|
| digits digit { $$ = $1 + $2; } |
267 |
|
; |
268 |
|
|
269 |
|
digit : '0' { $$ = '0'; } |
270 |
|
| '1' { $$ = '1'; } |
271 |
|
| '2' { $$ = '2'; } |
272 |
|
| '3' { $$ = '3'; } |
273 |
|
| '4' { $$ = '4'; } |
274 |
|
| '5' { $$ = '5'; } |
275 |
|
| '6' { $$ = '6'; } |
276 |
|
| '7' { $$ = '7'; } |
277 |
|
| '8' { $$ = '8'; } |
278 |
|
| '9' { $$ = '9'; } |
279 |
|
; |
280 |
|
|
281 |
|
number : digit { $$ = atoi(String(1, $1).c_str()); } |
282 |
|
| '1' digits { $$ = atoi(String(String("1") + $2).c_str()); } |
283 |
|
| '2' digits { $$ = atoi(String(String("2") + $2).c_str()); } |
284 |
|
| '3' digits { $$ = atoi(String(String("3") + $2).c_str()); } |
285 |
|
| '4' digits { $$ = atoi(String(String("4") + $2).c_str()); } |
286 |
|
| '5' digits { $$ = atoi(String(String("5") + $2).c_str()); } |
287 |
|
| '6' digits { $$ = atoi(String(String("6") + $2).c_str()); } |
288 |
|
| '7' digits { $$ = atoi(String(String("7") + $2).c_str()); } |
289 |
|
| '8' digits { $$ = atoi(String(String("8") + $2).c_str()); } |
290 |
|
| '9' digits { $$ = atoi(String(String("9") + $2).c_str()); } |
291 |
|
|
292 |
|
char : 'A' { $$ = 'A'; } | 'B' { $$ = 'B'; } | 'C' { $$ = 'C'; } | 'D' { $$ = 'D'; } | 'E' { $$ = 'E'; } | 'F' { $$ = 'F'; } | 'G' { $$ = 'G'; } | 'H' { $$ = 'H'; } | 'I' { $$ = 'I'; } | 'J' { $$ = 'J'; } | 'K' { $$ = 'K'; } | 'L' { $$ = 'L'; } | 'M' { $$ = 'M'; } | 'N' { $$ = 'N'; } | 'O' { $$ = 'O'; } | 'P' { $$ = 'P'; } | 'Q' { $$ = 'Q'; } | 'R' { $$ = 'R'; } | 'S' { $$ = 'S'; } | 'T' { $$ = 'T'; } | 'U' { $$ = 'U'; } | 'V' { $$ = 'V'; } | 'W' { $$ = 'W'; } | 'X' { $$ = 'X'; } | 'Y' { $$ = 'Y'; } | 'Z' { $$ = 'Z'; } |
293 |
|
| 'a' { $$ = 'a'; } | 'b' { $$ = 'b'; } | 'c' { $$ = 'c'; } | 'd' { $$ = 'd'; } | 'e' { $$ = 'e'; } | 'f' { $$ = 'f'; } | 'g' { $$ = 'g'; } | 'h' { $$ = 'h'; } | 'i' { $$ = 'i'; } | 'j' { $$ = 'j'; } | 'k' { $$ = 'k'; } | 'l' { $$ = 'l'; } | 'm' { $$ = 'm'; } | 'n' { $$ = 'n'; } | 'o' { $$ = 'o'; } | 'p' { $$ = 'p'; } | 'q' { $$ = 'q'; } | 'r' { $$ = 'r'; } | 's' { $$ = 's'; } | 't' { $$ = 't'; } | 'u' { $$ = 'u'; } | 'v' { $$ = 'v'; } | 'w' { $$ = 'w'; } | 'x' { $$ = 'x'; } | 'y' { $$ = 'y'; } | 'z' { $$ = 'z'; } |
294 |
|
| '0' { $$ = '0'; } | '1' { $$ = '1'; } | '2' { $$ = '2'; } | '3' { $$ = '3'; } | '4' { $$ = '4'; } | '5' { $$ = '5'; } | '6' { $$ = '6'; } | '7' { $$ = '7'; } | '8' { $$ = '8'; } | '9' { $$ = '9'; } |
295 |
|
| '!' { $$ = '!'; } | '#' { $$ = '#'; } | '$' { $$ = '$'; } | '%' { $$ = '%'; } | '&' { $$ = '&'; } | '(' { $$ = '('; } | ')' { $$ = ')'; } | '*' { $$ = '*'; } | '+' { $$ = '+'; } | '-' { $$ = '-'; } | '.' { $$ = '.'; } | ',' { $$ = ','; } | '/' { $$ = '/'; } |
296 |
|
| ':' { $$ = ':'; } | ';' { $$ = ';'; } | '<' { $$ = '<'; } | '=' { $$ = '='; } | '>' { $$ = '>'; } | '?' { $$ = '?'; } | '@' { $$ = '@'; } |
297 |
|
| '[' { $$ = '['; } | '\\' { $$ = '\\'; } | ']' { $$ = ']'; } | '^' { $$ = '^'; } | '_' { $$ = '_'; } |
298 |
|
| '{' { $$ = '{'; } | '|' { $$ = '|'; } | '}' { $$ = '}'; } | '~' { $$ = '~'; } |
299 |
|
| '\200' { $$ = '\200'; } | '\201' { $$ = '\201'; } | '\202' { $$ = '\202'; } |
300 |
|
| '\203' { $$ = '\203'; } | '\204' { $$ = '\204'; } | '\205' { $$ = '\205'; } |
301 |
|
| '\206' { $$ = '\206'; } | '\207' { $$ = '\207'; } | '\210' { $$ = '\210'; } |
302 |
|
| '\211' { $$ = '\211'; } | '\212' { $$ = '\212'; } | '\213' { $$ = '\213'; } |
303 |
|
| '\214' { $$ = '\214'; } | '\215' { $$ = '\215'; } | '\216' { $$ = '\216'; } |
304 |
|
| '\217' { $$ = '\217'; } | '\220' { $$ = '\220'; } | '\221' { $$ = '\221'; } |
305 |
|
| '\222' { $$ = '\222'; } | '\223' { $$ = '\223'; } | '\224' { $$ = '\224'; } |
306 |
|
| '\225' { $$ = '\225'; } | '\226' { $$ = '\226'; } | '\227' { $$ = '\227'; } |
307 |
|
| '\230' { $$ = '\230'; } | '\231' { $$ = '\231'; } | '\232' { $$ = '\232'; } |
308 |
|
| '\233' { $$ = '\233'; } | '\234' { $$ = '\234'; } | '\235' { $$ = '\235'; } |
309 |
|
| '\236' { $$ = '\236'; } | '\237' { $$ = '\237'; } | '\240' { $$ = '\240'; } |
310 |
|
| '\241' { $$ = '\241'; } | '\242' { $$ = '\242'; } | '\243' { $$ = '\243'; } |
311 |
|
| '\244' { $$ = '\244'; } | '\245' { $$ = '\245'; } | '\246' { $$ = '\246'; } |
312 |
|
| '\247' { $$ = '\247'; } | '\250' { $$ = '\250'; } | '\251' { $$ = '\251'; } |
313 |
|
| '\252' { $$ = '\252'; } | '\253' { $$ = '\253'; } | '\254' { $$ = '\254'; } |
314 |
|
| '\255' { $$ = '\255'; } | '\256' { $$ = '\256'; } | '\257' { $$ = '\257'; } |
315 |
|
| '\260' { $$ = '\260'; } | '\261' { $$ = '\261'; } | '\262' { $$ = '\262'; } |
316 |
|
| '\263' { $$ = '\263'; } | '\264' { $$ = '\264'; } | '\265' { $$ = '\265'; } |
317 |
|
| '\266' { $$ = '\266'; } | '\267' { $$ = '\267'; } | '\270' { $$ = '\270'; } |
318 |
|
| '\271' { $$ = '\271'; } | '\272' { $$ = '\272'; } | '\273' { $$ = '\273'; } |
319 |
|
| '\274' { $$ = '\274'; } | '\275' { $$ = '\275'; } | '\276' { $$ = '\276'; } |
320 |
|
| '\277' { $$ = '\277'; } | '\300' { $$ = '\300'; } | '\301' { $$ = '\301'; } |
321 |
|
| '\302' { $$ = '\302'; } | '\303' { $$ = '\303'; } | '\304' { $$ = '\304'; } |
322 |
|
| '\305' { $$ = '\305'; } | '\306' { $$ = '\306'; } | '\307' { $$ = '\307'; } |
323 |
|
| '\310' { $$ = '\310'; } | '\311' { $$ = '\311'; } | '\312' { $$ = '\312'; } |
324 |
|
| '\313' { $$ = '\313'; } | '\314' { $$ = '\314'; } | '\315' { $$ = '\315'; } |
325 |
|
| '\316' { $$ = '\316'; } | '\317' { $$ = '\317'; } | '\320' { $$ = '\320'; } |
326 |
|
| '\321' { $$ = '\321'; } | '\322' { $$ = '\322'; } | '\323' { $$ = '\323'; } |
327 |
|
| '\324' { $$ = '\324'; } | '\325' { $$ = '\325'; } | '\326' { $$ = '\326'; } |
328 |
|
| '\327' { $$ = '\327'; } | '\330' { $$ = '\330'; } | '\331' { $$ = '\331'; } |
329 |
|
| '\332' { $$ = '\332'; } | '\333' { $$ = '\333'; } | '\334' { $$ = '\334'; } |
330 |
|
| '\335' { $$ = '\335'; } | '\336' { $$ = '\336'; } | '\337' { $$ = '\337'; } |
331 |
|
| '\340' { $$ = '\340'; } | '\341' { $$ = '\341'; } | '\342' { $$ = '\342'; } |
332 |
|
| '\343' { $$ = '\343'; } | '\344' { $$ = '\344'; } | '\345' { $$ = '\345'; } |
333 |
|
| '\346' { $$ = '\346'; } | '\347' { $$ = '\347'; } | '\350' { $$ = '\350'; } |
334 |
|
| '\351' { $$ = '\351'; } | '\352' { $$ = '\352'; } | '\353' { $$ = '\353'; } |
335 |
|
| '\354' { $$ = '\354'; } | '\355' { $$ = '\355'; } | '\356' { $$ = '\356'; } |
336 |
|
| '\357' { $$ = '\357'; } | '\360' { $$ = '\360'; } | '\361' { $$ = '\361'; } |
337 |
|
| '\362' { $$ = '\362'; } | '\363' { $$ = '\363'; } | '\364' { $$ = '\364'; } |
338 |
|
| '\365' { $$ = '\365'; } | '\366' { $$ = '\366'; } | '\367' { $$ = '\367'; } |
339 |
|
| '\370' { $$ = '\370'; } | '\371' { $$ = '\371'; } | '\372' { $$ = '\372'; } |
340 |
|
| '\373' { $$ = '\373'; } | '\374' { $$ = '\374'; } | '\375' { $$ = '\375'; } |
341 |
|
| '\376' { $$ = '\376'; } | '\377' { $$ = '\377'; } |
342 |
|
; |
343 |
|
|
344 |
|
text : SP { $$ = " "; } |
345 |
|
| string |
346 |
|
| text SP { $$ = $1 + " "; } |
347 |
|
| text string { $$ = $1 + $2; } |
348 |
|
; |
349 |
|
|
350 |
|
stringval : '\'' text '\'' { $$ = $2; } |
351 |
|
| '\"' text '\"' { $$ = $2; } |
352 |
|
; |
353 |
|
|
354 |
|
|
355 |
|
// rules which are more or less just terminal symbols |
356 |
|
|
357 |
|
SP : ' ' |
358 |
|
; |
359 |
|
|
360 |
|
LF : '\n' |
361 |
|
; |
362 |
|
|
363 |
|
CR : '\r' |
364 |
|
; |
365 |
|
|
366 |
|
ADD : 'A''D''D' |
367 |
|
; |
368 |
|
|
369 |
|
GET : 'G''E''T' |
370 |
|
; |
371 |
|
|
372 |
|
CREATE : 'C''R''E''A''T''E' |
373 |
|
; |
374 |
|
|
375 |
|
DESTROY : 'D''E''S''T''R''O''Y' |
376 |
|
; |
377 |
|
|
378 |
|
LIST : 'L''I''S''T' |
379 |
|
; |
380 |
|
|
381 |
|
LOAD : 'L''O''A''D' |
382 |
|
; |
383 |
|
|
384 |
|
ALL : 'A''L''L' |
385 |
|
; |
386 |
|
|
387 |
|
NON_MODAL : 'N''O''N''_''M''O''D''A''L' |
388 |
|
; |
389 |
|
|
390 |
|
REMOVE : 'R''E''M''O''V''E' |
391 |
|
; |
392 |
|
|
393 |
|
SET : 'S''E''T' |
394 |
|
; |
395 |
|
|
396 |
|
SUBSCRIBE : 'S''U''B''S''C''R''I''B''E' |
397 |
|
; |
398 |
|
|
399 |
|
UNSUBSCRIBE : 'U''N''S''U''B''S''C''R''I''B''E' |
400 |
|
; |
401 |
|
|
402 |
|
CHANNEL : 'C''H''A''N''N''E''L' |
403 |
|
; |
404 |
|
|
405 |
|
AVAILABLE_ENGINES : 'A''V''A''I''L''A''B''L''E''_''E''N''G''I''N''E''S' |
406 |
|
; |
407 |
|
|
408 |
|
AVAILABLE_AUDIO_OUTPUT_DRIVERS : 'A''V''A''I''L''A''B''L''E''_''A''U''D''I''O''_''O''U''T''P''U''T''_''D''R''I''V''E''R''S' |
409 |
|
; |
410 |
|
|
411 |
|
CHANNELS : 'C''H''A''N''N''E''L''S' |
412 |
|
; |
413 |
|
|
414 |
|
INFO : 'I''N''F''O' |
415 |
|
; |
416 |
|
|
417 |
|
BUFFER_FILL : 'B''U''F''F''E''R''_''F''I''L''L' |
418 |
|
; |
419 |
|
|
420 |
|
STREAM_COUNT : 'S''T''R''E''A''M''_''C''O''U''N''T' |
421 |
|
; |
422 |
|
|
423 |
|
VOICE_COUNT : 'V''O''I''C''E''_''C''O''U''N''T' |
424 |
|
; |
425 |
|
|
426 |
|
INSTRUMENT : 'I''N''S''T''R''U''M''E''N''T' |
427 |
|
; |
428 |
|
|
429 |
|
ENGINE : 'E' 'N' 'G' 'I' 'N' 'E' |
430 |
|
; |
431 |
|
|
432 |
|
AUDIO_OUTPUT_DEVICE_PARAMETER : 'A''U''D''I''O''_''O''U''T''P''U''T''_''D''E''V''I''C''E''_''P''A''R''A''M''E''T''E''R' |
433 |
|
; |
434 |
|
|
435 |
|
AUDIO_OUTPUT_DEVICES : 'A''U''D''I''O''_''O''U''T''P''U''T''_''D''E''V''I''C''E''S' |
436 |
|
; |
437 |
|
|
438 |
|
AUDIO_OUTPUT_DEVICE : 'A''U''D''I''O''_''O''U''T''P''U''T''_''D''E''V''I''C''E' |
439 |
|
; |
440 |
|
|
441 |
|
AUDIO_OUTPUT_DRIVER_PARAMETER : 'A''U''D''I''O''_''O''U''T''P''U''T''_''D''R''I''V''E''R''_''P''A''R''A''M''E''T''E''R' |
442 |
|
; |
443 |
|
|
444 |
|
AUDIO_OUTPUT_DRIVER : 'A''U''D''I''O''_''O''U''T''P''U''T''_''D''R''I''V''E''R' |
445 |
|
; |
446 |
|
|
447 |
|
AUDIO_OUTPUT_CHANNEL_PARAMETER : 'A''U''D''I''O''_''O''U''T''P''U''T''_''C''H''A''N''N''E''L''_''P''A''R''A''M''E''T''E''R' |
448 |
|
; |
449 |
|
|
450 |
|
AUDIO_OUTPUT_CHANNEL : 'A''U''D''I''O''_''O''U''T''P''U''T''_''C''H''A''N''N''E''L' |
451 |
|
; |
452 |
|
|
453 |
|
AUDIO_OUTPUT_TYPE : 'A''U''D''I''O''_''O''U''T''P''U''T''_''T''Y''P''E' |
454 |
|
; |
455 |
|
|
456 |
|
AVAILABLE_MIDI_INPUT_DRIVERS : 'A''V''A''I''L''A''B''L''E''_''M''I''D''I''_''I''N''P''U''T''_''D''R''I''V''E''R''S' |
457 |
|
; |
458 |
|
|
459 |
|
MIDI_INPUT_DEVICE_PARAMETER : 'M''I''D''I''_''I''N''P''U''T''_''D''E''V''I''C''E''_''P''A''R''A''M''E''T''E''R' |
460 |
|
; |
461 |
|
|
462 |
|
MIDI_INPUT_PORT_PARAMETER : 'M''I''D''I''_''I''N''P''U''T''_''P''O''R''T''_''P''A''R''A''M''E''T''E''R' |
463 |
|
; |
464 |
|
|
465 |
|
MIDI_INPUT_DEVICES : 'M''I''D''I''_''I''N''P''U''T''_''D''E''V''I''C''E''S' |
466 |
|
; |
467 |
|
|
468 |
|
MIDI_INPUT_DEVICE : 'M''I''D''I''_''I''N''P''U''T''_''D''E''V''I''C''E' |
469 |
|
; |
470 |
|
|
471 |
|
MIDI_INPUT_DRIVER_PARAMETER : 'M''I''D''I''_''I''N''P''U''T''_''D''R''I''V''E''R''_''P''A''R''A''M''E''T''E''R' |
472 |
|
; |
473 |
|
|
474 |
|
MIDI_INPUT_DRIVER : 'M''I''D''I''_''I''N''P''U''T''_''D''R''I''V''E''R' |
475 |
|
; |
476 |
|
|
477 |
|
MIDI_INPUT_PORT : 'M''I''D''I''_''I''N''P''U''T''_''P''O''R''T' |
478 |
; |
; |
479 |
|
|
480 |
volume : DOTNUM |
MIDI_INPUT_CHANNEL : 'M''I''D''I''_''I''N''P''U''T''_''C''H''A''N''N''E''L' |
|
| NUMBER { $$ = $1; } |
|
481 |
; |
; |
482 |
|
|
483 |
sampler_channel : NUMBER |
MIDI_INPUT_TYPE : 'M''I''D''I''_''I''N''P''U''T''_''T''Y''P''E' |
484 |
; |
; |
485 |
|
|
486 |
instrument_index : NUMBER |
MIDI_INPUT : 'M''I''D''I''_''I''N''P''U''T' |
487 |
; |
; |
488 |
|
|
489 |
audio_output_channel : NUMBER |
VOLUME : 'V''O''L''U''M''E' |
490 |
; |
; |
491 |
|
|
492 |
midi_input_channel : NUMBER |
BYTES : 'B''Y''T''E''S' |
493 |
; |
; |
494 |
|
|
495 |
engine_name : string |
PERCENTAGE : 'P''E''R''C''E''N''T''A''G''E' |
496 |
; |
; |
497 |
|
|
498 |
midi_input_port : STRINGVAL |
RESET : 'R''E''S''E''T' |
499 |
; |
; |
500 |
|
|
501 |
filename : STRINGVAL |
MISCELLANEOUS : 'M''I''S''C''E''L''L''A''N''E''O''U''S' |
502 |
; |
; |
503 |
|
|
504 |
param_val : STRINGVAL { $$ = $1; } |
ECHO : 'E''C''H''O' |
|
| NUMBER { std::stringstream ss; ss << $1; $$ = ss.str(); } |
|
|
| DOTNUM { std::stringstream ss; ss << $1; $$ = ss.str(); } |
|
505 |
; |
; |
506 |
|
|
507 |
string : CHAR { std::string s; s = $1; $$ = s; } |
QUIT : 'Q''U''I''T' |
|
| string CHAR { $$ = $1 + $2; } |
|
508 |
; |
; |
509 |
|
|
510 |
%% |
%% |
517 |
} |
} |
518 |
|
|
519 |
/** |
/** |
520 |
* Clears input buffer and restarts scanner. |
* Clears input buffer. |
521 |
*/ |
*/ |
522 |
void restart(yyparse_param_t* pparam, int& yychar) { |
void restart(yyparse_param_t* pparam, int& yychar) { |
523 |
// restart scanner |
bytes = 0; |
524 |
yyrestart(stdin, pparam->pScanner); |
ptr = 0; |
|
// flush input buffer |
|
|
static char buf[1024]; |
|
|
while(recv(hSession, buf, 1024, MSG_DONTWAIT) > 0); |
|
|
// reset lookahead symbol |
|
|
yyclearin; |
|
525 |
} |
} |