21 |
* MA 02111-1307 USA * |
* MA 02111-1307 USA * |
22 |
***************************************************************************/ |
***************************************************************************/ |
23 |
|
|
24 |
/* CAUTION: !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! */ |
/* |
25 |
/* */ |
The parser's C++ source files should be automatically (re)generated if |
26 |
/* don't forget to run 'make parser' after you changed this file, */ |
this file was modified. If not, or in case you want explicitly |
27 |
/* otherwise the parser will not be regenerated ! */ |
regenerate the parser C++ files, run 'make parser'. In both cases you |
28 |
/* */ |
need to have bison or another yacc compatible parser generator |
29 |
/* !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! */ |
installed though. |
30 |
|
*/ |
31 |
|
|
32 |
%{ |
%{ |
33 |
|
|
52 |
// external reference to the function which actually reads from the socket |
// external reference to the function which actually reads from the socket |
53 |
extern int GetLSCPCommand( void *buf, int max_size); |
extern int GetLSCPCommand( void *buf, int max_size); |
54 |
|
|
55 |
|
// returns true if supplied characters has an ASCII code of 128 or higher |
56 |
|
inline bool isExtendedAsciiChar(const char c) { |
57 |
|
return (c < 0); |
58 |
|
} |
59 |
|
|
60 |
// custom scanner function which reads from the socket |
// custom scanner function which reads from the socket |
61 |
|
// (bison expects it to return the numerical ID of the next |
62 |
|
// "recognized token" from the input stream) |
63 |
int yylex(YYSTYPE* yylval) { |
int yylex(YYSTYPE* yylval) { |
64 |
// check if we have to read new characters |
// check if we have to read new characters |
65 |
if (ptr >= bytes) { |
if (ptr >= bytes) { |
70 |
return 0; |
return 0; |
71 |
} |
} |
72 |
} |
} |
73 |
return (int) buf[ptr++]; |
// this is the next character in the input stream |
74 |
|
const char c = buf[ptr++]; |
75 |
|
// we have to handle "normal" and "extended" ASCII characters separately |
76 |
|
if (isExtendedAsciiChar(c)) { |
77 |
|
// workaround for characters with ASCII code higher than 127 |
78 |
|
yylval->Char = c; |
79 |
|
return EXT_ASCII_CHAR; |
80 |
|
} else { |
81 |
|
// simply return the ASCII code as terminal symbol ID |
82 |
|
return (int) c; |
83 |
|
} |
84 |
|
} |
85 |
|
|
86 |
|
// parser helper functions |
87 |
|
|
88 |
|
int octalsToNumber(char oct_digit0, char oct_digit1 = '0', char oct_digit2 = '0') { |
89 |
|
const char d0[] = { oct_digit0, '\0' }; |
90 |
|
const char d1[] = { oct_digit1, '\0' }; |
91 |
|
const char d2[] = { oct_digit2, '\0' }; |
92 |
|
return atoi(d2)*8*8 + atoi(d1)*8 + atoi(d0); |
93 |
|
} |
94 |
|
|
95 |
|
int hexToNumber(char hex_digit) { |
96 |
|
switch (hex_digit) { |
97 |
|
case '0': return 0; |
98 |
|
case '1': return 1; |
99 |
|
case '2': return 2; |
100 |
|
case '3': return 3; |
101 |
|
case '4': return 4; |
102 |
|
case '5': return 5; |
103 |
|
case '6': return 6; |
104 |
|
case '7': return 7; |
105 |
|
case '8': return 8; |
106 |
|
case '9': return 9; |
107 |
|
// grammar rule 'digit_hex' already forced lower case |
108 |
|
case 'a': return 10; |
109 |
|
case 'b': return 11; |
110 |
|
case 'c': return 12; |
111 |
|
case 'd': return 13; |
112 |
|
case 'e': return 14; |
113 |
|
case 'f': return 15; |
114 |
|
default: return 0; |
115 |
|
} |
116 |
|
} |
117 |
|
|
118 |
|
int hexsToNumber(char hex_digit0, char hex_digit1 = '0') { |
119 |
|
return hexToNumber(hex_digit1)*16 + hexToNumber(hex_digit0); |
120 |
} |
} |
121 |
|
|
122 |
%} |
%} |
123 |
|
|
124 |
// reentrant parser |
// reentrant parser |
125 |
%pure_parser |
%pure_parser |
126 |
|
%error-verbose |
127 |
|
|
128 |
|
%token <Char> EXT_ASCII_CHAR |
129 |
|
|
130 |
%type <Char> char digit |
%type <Char> char digit digit_oct digit_hex escape_seq escape_seq_octal escape_seq_hex |
131 |
%type <Dotnum> dotnum volume_value boolean |
%type <Dotnum> dotnum volume_value boolean |
132 |
%type <Number> number sampler_channel instrument_index fx_send_id audio_channel_index device_index midi_input_channel_index midi_input_port_index midi_map midi_bank midi_prog midi_ctrl |
%type <Number> number sampler_channel instrument_index fx_send_id audio_channel_index device_index midi_input_channel_index midi_input_port_index midi_map midi_bank midi_prog midi_ctrl |
133 |
%type <String> string text stringval digits param_val_list param_val query_val pathname dirname filename map_name entry_name fx_send_name engine_name command add_instruction 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 remove_instruction unmap_instruction set_instruction subscribe_event unsubscribe_event map_instruction reset_instruction clear_instruction find_instruction move_instruction copy_instruction scan_mode edit_instruction |
%type <String> string string_escaped text text_escaped stringval stringval_escaped digits param_val_list param_val query_val pathname dirname filename map_name entry_name fx_send_name engine_name command add_instruction 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 remove_instruction unmap_instruction set_instruction subscribe_event unsubscribe_event map_instruction reset_instruction clear_instruction find_instruction move_instruction copy_instruction scan_mode edit_instruction |
134 |
%type <FillResponse> buffer_size_type |
%type <FillResponse> buffer_size_type |
135 |
%type <KeyValList> key_val_list query_val_list |
%type <KeyValList> key_val_list query_val_list |
136 |
%type <LoadMode> instr_load_mode |
%type <LoadMode> instr_load_mode |
480 |
dirname : stringval |
dirname : stringval |
481 |
; |
; |
482 |
|
|
483 |
filename : stringval |
filename : stringval_escaped |
484 |
; |
; |
485 |
|
|
486 |
map_name : stringval |
map_name : stringval |
525 |
; |
; |
526 |
|
|
527 |
string : char { std::string s; s = $1; $$ = s; } |
string : char { std::string s; s = $1; $$ = s; } |
528 |
|
| '\\' { $$ = "\\"; } // we have to place this rule here, because we currently distinguish between escaped and unescaped strings |
529 |
| string char { $$ = $1 + $2; } |
| string char { $$ = $1 + $2; } |
530 |
; |
; |
531 |
|
|
532 |
|
string_escaped : char { std::string s; s = $1; $$ = s; } |
533 |
|
| escape_seq { std::string s; s = $1; $$ = s; } |
534 |
|
| string_escaped char { $$ = $1 + $2; } |
535 |
|
| string_escaped escape_seq { $$ = $1 + $2; } |
536 |
|
; |
537 |
|
|
538 |
dotnum : digits '.' digits { $$ = atof(String($1 + "." + $3).c_str()); } |
dotnum : digits '.' digits { $$ = atof(String($1 + "." + $3).c_str()); } |
539 |
| '+' digits '.' digits { String s = "+"; s += $2; s += "."; s += $4; $$ = atof(s.c_str()); } |
| '+' digits '.' digits { String s = "+"; s += $2; s += "."; s += $4; $$ = atof(s.c_str()); } |
540 |
| '-' digits '.' digits { $$ = atof(String("-" + $2 + "." + $4).c_str()); } |
| '-' digits '.' digits { $$ = atof(String("-" + $2 + "." + $4).c_str()); } |
557 |
| '9' { $$ = '9'; } |
| '9' { $$ = '9'; } |
558 |
; |
; |
559 |
|
|
560 |
|
digit_oct : '0' { $$ = '0'; } |
561 |
|
| '1' { $$ = '1'; } |
562 |
|
| '2' { $$ = '2'; } |
563 |
|
| '3' { $$ = '3'; } |
564 |
|
| '4' { $$ = '4'; } |
565 |
|
| '5' { $$ = '5'; } |
566 |
|
| '6' { $$ = '6'; } |
567 |
|
| '7' { $$ = '7'; } |
568 |
|
; |
569 |
|
|
570 |
|
digit_hex : '0' { $$ = '0'; } |
571 |
|
| '1' { $$ = '1'; } |
572 |
|
| '2' { $$ = '2'; } |
573 |
|
| '3' { $$ = '3'; } |
574 |
|
| '4' { $$ = '4'; } |
575 |
|
| '5' { $$ = '5'; } |
576 |
|
| '6' { $$ = '6'; } |
577 |
|
| '7' { $$ = '7'; } |
578 |
|
| '8' { $$ = '8'; } |
579 |
|
| '9' { $$ = '9'; } |
580 |
|
| 'a' { $$ = 'a'; } |
581 |
|
| 'b' { $$ = 'b'; } |
582 |
|
| 'c' { $$ = 'c'; } |
583 |
|
| 'd' { $$ = 'd'; } |
584 |
|
| 'e' { $$ = 'e'; } |
585 |
|
| 'f' { $$ = 'f'; } |
586 |
|
| 'A' { $$ = 'a'; } |
587 |
|
| 'B' { $$ = 'b'; } |
588 |
|
| 'C' { $$ = 'c'; } |
589 |
|
| 'D' { $$ = 'd'; } |
590 |
|
| 'E' { $$ = 'e'; } |
591 |
|
| 'F' { $$ = 'f'; } |
592 |
|
; |
593 |
|
|
594 |
number : digit { $$ = atoi(String(1, $1).c_str()); } |
number : digit { $$ = atoi(String(1, $1).c_str()); } |
595 |
| '1' digits { $$ = atoi(String(String("1") + $2).c_str()); } |
| '1' digits { $$ = atoi(String(String("1") + $2).c_str()); } |
596 |
| '2' digits { $$ = atoi(String(String("2") + $2).c_str()); } |
| '2' digits { $$ = atoi(String(String("2") + $2).c_str()); } |
607 |
| '0' { $$ = '0'; } | '1' { $$ = '1'; } | '2' { $$ = '2'; } | '3' { $$ = '3'; } | '4' { $$ = '4'; } | '5' { $$ = '5'; } | '6' { $$ = '6'; } | '7' { $$ = '7'; } | '8' { $$ = '8'; } | '9' { $$ = '9'; } |
| '0' { $$ = '0'; } | '1' { $$ = '1'; } | '2' { $$ = '2'; } | '3' { $$ = '3'; } | '4' { $$ = '4'; } | '5' { $$ = '5'; } | '6' { $$ = '6'; } | '7' { $$ = '7'; } | '8' { $$ = '8'; } | '9' { $$ = '9'; } |
608 |
| '!' { $$ = '!'; } | '#' { $$ = '#'; } | '$' { $$ = '$'; } | '%' { $$ = '%'; } | '&' { $$ = '&'; } | '(' { $$ = '('; } | ')' { $$ = ')'; } | '*' { $$ = '*'; } | '+' { $$ = '+'; } | '-' { $$ = '-'; } | '.' { $$ = '.'; } | ',' { $$ = ','; } | '/' { $$ = '/'; } |
| '!' { $$ = '!'; } | '#' { $$ = '#'; } | '$' { $$ = '$'; } | '%' { $$ = '%'; } | '&' { $$ = '&'; } | '(' { $$ = '('; } | ')' { $$ = ')'; } | '*' { $$ = '*'; } | '+' { $$ = '+'; } | '-' { $$ = '-'; } | '.' { $$ = '.'; } | ',' { $$ = ','; } | '/' { $$ = '/'; } |
609 |
| ':' { $$ = ':'; } | ';' { $$ = ';'; } | '<' { $$ = '<'; } | '=' { $$ = '='; } | '>' { $$ = '>'; } | '?' { $$ = '?'; } | '@' { $$ = '@'; } |
| ':' { $$ = ':'; } | ';' { $$ = ';'; } | '<' { $$ = '<'; } | '=' { $$ = '='; } | '>' { $$ = '>'; } | '?' { $$ = '?'; } | '@' { $$ = '@'; } |
610 |
| '[' { $$ = '['; } | '\\' { $$ = '\\'; } | ']' { $$ = ']'; } | '^' { $$ = '^'; } | '_' { $$ = '_'; } |
| '[' { $$ = '['; } | ']' { $$ = ']'; } | '^' { $$ = '^'; } | '_' { $$ = '_'; } |
611 |
| '{' { $$ = '{'; } | '|' { $$ = '|'; } | '}' { $$ = '}'; } | '~' { $$ = '~'; } |
| '{' { $$ = '{'; } | '|' { $$ = '|'; } | '}' { $$ = '}'; } | '~' { $$ = '~'; } |
612 |
| '\200' { $$ = '\200'; } | '\201' { $$ = '\201'; } | '\202' { $$ = '\202'; } |
| EXT_ASCII_CHAR |
|
| '\203' { $$ = '\203'; } | '\204' { $$ = '\204'; } | '\205' { $$ = '\205'; } |
|
|
| '\206' { $$ = '\206'; } | '\207' { $$ = '\207'; } | '\210' { $$ = '\210'; } |
|
|
| '\211' { $$ = '\211'; } | '\212' { $$ = '\212'; } | '\213' { $$ = '\213'; } |
|
|
| '\214' { $$ = '\214'; } | '\215' { $$ = '\215'; } | '\216' { $$ = '\216'; } |
|
|
| '\217' { $$ = '\217'; } | '\220' { $$ = '\220'; } | '\221' { $$ = '\221'; } |
|
|
| '\222' { $$ = '\222'; } | '\223' { $$ = '\223'; } | '\224' { $$ = '\224'; } |
|
|
| '\225' { $$ = '\225'; } | '\226' { $$ = '\226'; } | '\227' { $$ = '\227'; } |
|
|
| '\230' { $$ = '\230'; } | '\231' { $$ = '\231'; } | '\232' { $$ = '\232'; } |
|
|
| '\233' { $$ = '\233'; } | '\234' { $$ = '\234'; } | '\235' { $$ = '\235'; } |
|
|
| '\236' { $$ = '\236'; } | '\237' { $$ = '\237'; } | '\240' { $$ = '\240'; } |
|
|
| '\241' { $$ = '\241'; } | '\242' { $$ = '\242'; } | '\243' { $$ = '\243'; } |
|
|
| '\244' { $$ = '\244'; } | '\245' { $$ = '\245'; } | '\246' { $$ = '\246'; } |
|
|
| '\247' { $$ = '\247'; } | '\250' { $$ = '\250'; } | '\251' { $$ = '\251'; } |
|
|
| '\252' { $$ = '\252'; } | '\253' { $$ = '\253'; } | '\254' { $$ = '\254'; } |
|
|
| '\255' { $$ = '\255'; } | '\256' { $$ = '\256'; } | '\257' { $$ = '\257'; } |
|
|
| '\260' { $$ = '\260'; } | '\261' { $$ = '\261'; } | '\262' { $$ = '\262'; } |
|
|
| '\263' { $$ = '\263'; } | '\264' { $$ = '\264'; } | '\265' { $$ = '\265'; } |
|
|
| '\266' { $$ = '\266'; } | '\267' { $$ = '\267'; } | '\270' { $$ = '\270'; } |
|
|
| '\271' { $$ = '\271'; } | '\272' { $$ = '\272'; } | '\273' { $$ = '\273'; } |
|
|
| '\274' { $$ = '\274'; } | '\275' { $$ = '\275'; } | '\276' { $$ = '\276'; } |
|
|
| '\277' { $$ = '\277'; } | '\300' { $$ = '\300'; } | '\301' { $$ = '\301'; } |
|
|
| '\302' { $$ = '\302'; } | '\303' { $$ = '\303'; } | '\304' { $$ = '\304'; } |
|
|
| '\305' { $$ = '\305'; } | '\306' { $$ = '\306'; } | '\307' { $$ = '\307'; } |
|
|
| '\310' { $$ = '\310'; } | '\311' { $$ = '\311'; } | '\312' { $$ = '\312'; } |
|
|
| '\313' { $$ = '\313'; } | '\314' { $$ = '\314'; } | '\315' { $$ = '\315'; } |
|
|
| '\316' { $$ = '\316'; } | '\317' { $$ = '\317'; } | '\320' { $$ = '\320'; } |
|
|
| '\321' { $$ = '\321'; } | '\322' { $$ = '\322'; } | '\323' { $$ = '\323'; } |
|
|
| '\324' { $$ = '\324'; } | '\325' { $$ = '\325'; } | '\326' { $$ = '\326'; } |
|
|
| '\327' { $$ = '\327'; } | '\330' { $$ = '\330'; } | '\331' { $$ = '\331'; } |
|
|
| '\332' { $$ = '\332'; } | '\333' { $$ = '\333'; } | '\334' { $$ = '\334'; } |
|
|
| '\335' { $$ = '\335'; } | '\336' { $$ = '\336'; } | '\337' { $$ = '\337'; } |
|
|
| '\340' { $$ = '\340'; } | '\341' { $$ = '\341'; } | '\342' { $$ = '\342'; } |
|
|
| '\343' { $$ = '\343'; } | '\344' { $$ = '\344'; } | '\345' { $$ = '\345'; } |
|
|
| '\346' { $$ = '\346'; } | '\347' { $$ = '\347'; } | '\350' { $$ = '\350'; } |
|
|
| '\351' { $$ = '\351'; } | '\352' { $$ = '\352'; } | '\353' { $$ = '\353'; } |
|
|
| '\354' { $$ = '\354'; } | '\355' { $$ = '\355'; } | '\356' { $$ = '\356'; } |
|
|
| '\357' { $$ = '\357'; } | '\360' { $$ = '\360'; } | '\361' { $$ = '\361'; } |
|
|
| '\362' { $$ = '\362'; } | '\363' { $$ = '\363'; } | '\364' { $$ = '\364'; } |
|
|
| '\365' { $$ = '\365'; } | '\366' { $$ = '\366'; } | '\367' { $$ = '\367'; } |
|
|
| '\370' { $$ = '\370'; } | '\371' { $$ = '\371'; } | '\372' { $$ = '\372'; } |
|
|
| '\373' { $$ = '\373'; } | '\374' { $$ = '\374'; } | '\375' { $$ = '\375'; } |
|
|
| '\376' { $$ = '\376'; } | '\377' { $$ = '\377'; } |
|
613 |
; |
; |
614 |
|
|
615 |
text : SP { $$ = " "; } |
text : SP { $$ = " "; } |
618 |
| text string { $$ = $1 + $2; } |
| text string { $$ = $1 + $2; } |
619 |
; |
; |
620 |
|
|
621 |
|
text_escaped : SP { $$ = " "; } |
622 |
|
| string_escaped |
623 |
|
| text_escaped SP { $$ = $1 + " "; } |
624 |
|
| text_escaped string_escaped { $$ = $1 + $2; } |
625 |
|
; |
626 |
|
|
627 |
stringval : '\'' text '\'' { $$ = $2; } |
stringval : '\'' text '\'' { $$ = $2; } |
628 |
| '\"' text '\"' { $$ = $2; } |
| '\"' text '\"' { $$ = $2; } |
629 |
; |
; |
630 |
|
|
631 |
|
stringval_escaped : '\'' text_escaped '\'' { $$ = $2; } |
632 |
|
| '\"' text_escaped '\"' { $$ = $2; } |
633 |
|
; |
634 |
|
|
635 |
|
escape_seq : '\\' '\'' { $$ = '\''; } |
636 |
|
| '\\' '\"' { $$ = '\"'; } |
637 |
|
| '\\' '\\' { $$ = '\\'; } |
638 |
|
| '\\' 'n' { $$ = '\n'; } |
639 |
|
| '\\' 'r' { $$ = '\r'; } |
640 |
|
| '\\' 'f' { $$ = '\f'; } |
641 |
|
| '\\' 't' { $$ = '\t'; } |
642 |
|
| '\\' 'v' { $$ = '\v'; } |
643 |
|
| escape_seq_octal |
644 |
|
| escape_seq_hex |
645 |
|
; |
646 |
|
|
647 |
|
escape_seq_octal : '\\' digit_oct { $$ = (char) octalsToNumber($2); } |
648 |
|
| '\\' digit_oct digit_oct { $$ = (char) octalsToNumber($3,$2); } |
649 |
|
| '\\' digit_oct digit_oct digit_oct { $$ = (char) octalsToNumber($4,$3,$2); } |
650 |
|
; |
651 |
|
|
652 |
|
escape_seq_hex : '\\' 'x' digit_hex { $$ = (char) hexsToNumber($3); } |
653 |
|
| '\\' 'x' digit_hex digit_hex { $$ = (char) hexsToNumber($4,$3); } |
654 |
|
; |
655 |
|
|
656 |
// rules which are more or less just terminal symbols |
// rules which are more or less just terminal symbols |
657 |
|
|