2017-11-03 02:42:44 +03:00
|
|
|
%{
|
|
|
|
|
|
|
|
package lvgen
|
|
|
|
|
|
|
|
import (
|
|
|
|
//"fmt"
|
|
|
|
)
|
|
|
|
|
|
|
|
%}
|
|
|
|
|
|
|
|
// SymType
|
|
|
|
%union{
|
|
|
|
val string
|
|
|
|
}
|
|
|
|
|
|
|
|
// XDR tokens:
|
|
|
|
%token BOOL CASE CONST DEFAULT DOUBLE ENUM FLOAT OPAQUE STRING STRUCT
|
|
|
|
%token SWITCH TYPEDEF UNION UNSIGNED VOID HYPER INT SHORT CHAR
|
|
|
|
%token IDENTIFIER CONSTANT ERROR
|
|
|
|
// RPCL additional tokens:
|
|
|
|
%token PROGRAM VERSION
|
|
|
|
|
|
|
|
%%
|
|
|
|
|
|
|
|
specification
|
|
|
|
: definition_list
|
|
|
|
;
|
|
|
|
|
|
|
|
value
|
|
|
|
: IDENTIFIER
|
|
|
|
| CONSTANT
|
|
|
|
;
|
|
|
|
|
|
|
|
definition_list
|
|
|
|
: definition ';'
|
|
|
|
| definition ';' definition_list
|
|
|
|
;
|
|
|
|
|
|
|
|
definition
|
|
|
|
: enum_definition
|
|
|
|
| const_definition
|
|
|
|
| typedef_definition
|
|
|
|
| struct_definition
|
|
|
|
| union_definition
|
|
|
|
| program_definition
|
|
|
|
;
|
|
|
|
|
|
|
|
enum_definition
|
2017-11-08 00:05:12 +03:00
|
|
|
: ENUM enum_ident '{' enum_value_list '}' { StartEnum($2.val) }
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
enum_value_list
|
|
|
|
: enum_value
|
|
|
|
| enum_value ',' enum_value_list
|
|
|
|
;
|
|
|
|
|
|
|
|
enum_value
|
|
|
|
: enum_value_ident {
|
|
|
|
err := AddEnumAutoVal($1.val)
|
|
|
|
if err != nil {
|
|
|
|
yylex.Error(err.Error())
|
|
|
|
return 1
|
|
|
|
}
|
|
|
|
}
|
|
|
|
| enum_value_ident '=' value {
|
2017-11-08 00:05:12 +03:00
|
|
|
err := AddEnumVal($1.val, $3.val)
|
2017-11-03 02:42:44 +03:00
|
|
|
if err != nil {
|
|
|
|
yylex.Error(err.Error())
|
|
|
|
return 1
|
|
|
|
}
|
|
|
|
}
|
|
|
|
;
|
|
|
|
|
|
|
|
enum_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
enum_value_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
// Ignore consts that are set to IDENTIFIERs - this isn't allowed by the spec,
|
|
|
|
// but occurs in the file because libvirt runs the pre-processor on the protocol
|
|
|
|
// file, and it handles replacing the identifier with it's #defined value.
|
|
|
|
const_definition
|
|
|
|
: CONST const_ident '=' IDENTIFIER
|
|
|
|
| CONST const_ident '=' CONSTANT {
|
|
|
|
err := AddConst($2.val, $4.val)
|
|
|
|
if err != nil {
|
|
|
|
yylex.Error(err.Error())
|
|
|
|
return 1
|
|
|
|
}
|
|
|
|
}
|
|
|
|
;
|
|
|
|
|
|
|
|
const_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
typedef_definition
|
2017-11-08 00:05:12 +03:00
|
|
|
: TYPEDEF {StartTypedef()} declaration
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
declaration
|
|
|
|
: simple_declaration
|
|
|
|
| fixed_array_declaration
|
|
|
|
| variable_array_declaration
|
|
|
|
| pointer_declaration
|
|
|
|
;
|
|
|
|
|
|
|
|
simple_declaration
|
2017-11-08 00:05:12 +03:00
|
|
|
: type_specifier variable_ident {AddDeclaration($2.val, $1.val)}
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
type_specifier
|
|
|
|
: int_spec
|
2017-11-08 00:05:12 +03:00
|
|
|
| UNSIGNED int_spec {$$.val = "u"+$2.val}
|
|
|
|
| FLOAT {$$.val = "float32"}
|
|
|
|
| DOUBLE {$$.val = "float64"}
|
|
|
|
| BOOL {$$.val = "bool"}
|
|
|
|
| STRING {$$.val = "string"}
|
2017-11-13 23:18:18 +03:00
|
|
|
| OPAQUE {$$.val = "byte"}
|
2017-11-03 02:42:44 +03:00
|
|
|
| enum_definition
|
|
|
|
| struct_definition
|
|
|
|
| union_definition
|
|
|
|
| IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
int_spec
|
2017-11-08 00:05:12 +03:00
|
|
|
: HYPER {$$.val = "int64"}
|
|
|
|
| INT {$$.val = "int32"}
|
|
|
|
| SHORT {$$.val = "int16"}
|
|
|
|
| CHAR {$$.val = "int8"}
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
variable_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
fixed_array_declaration
|
2017-11-13 23:18:18 +03:00
|
|
|
: type_specifier variable_ident '[' value ']' { AddFixedArray($2.val, $1.val, $4.val) }
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
variable_array_declaration
|
2017-11-13 23:18:18 +03:00
|
|
|
: type_specifier variable_ident '<' value '>' { AddVariableArray($2.val, $1.val, $4.val) }
|
|
|
|
| type_specifier variable_ident '<' '>' { AddVariableArray($2.val, $1.val, "") }
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
pointer_declaration
|
2017-11-08 00:05:12 +03:00
|
|
|
: type_specifier '*' variable_ident { AddDeclaration($3.val, "*"+$1.val) }
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
struct_definition
|
2017-11-13 23:18:18 +03:00
|
|
|
: STRUCT struct_ident '{' {StartStruct($2.val)} declaration_list '}' { AddStruct() }
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
struct_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
declaration_list
|
|
|
|
: declaration ';'
|
|
|
|
| declaration ';' declaration_list
|
|
|
|
;
|
|
|
|
|
|
|
|
union_definition
|
2017-11-08 00:05:12 +03:00
|
|
|
: UNION union_ident {StartUnion($2.val)} SWITCH '(' simple_declaration ')' '{' case_list '}' {AddUnion()}
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
union_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
case_list
|
|
|
|
: case ';'
|
|
|
|
| case ';' case_list
|
|
|
|
;
|
|
|
|
|
|
|
|
case
|
2017-11-08 00:05:12 +03:00
|
|
|
: CASE value {StartCase($2.val)} ':' declaration {AddCase()}
|
|
|
|
| DEFAULT {StartCase("default")} ':' declaration {AddCase()}
|
2017-11-03 02:42:44 +03:00
|
|
|
;
|
|
|
|
|
|
|
|
program_definition
|
|
|
|
: PROGRAM program_ident '{' version_list '}' '=' value
|
|
|
|
;
|
|
|
|
|
|
|
|
program_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
version_list
|
|
|
|
: version ';'
|
|
|
|
| version ';' version_list
|
|
|
|
;
|
|
|
|
|
|
|
|
version
|
|
|
|
: VERSION version_ident '{' procedure_list '}' '=' value ';'
|
|
|
|
;
|
|
|
|
|
|
|
|
version_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
procedure_list
|
|
|
|
: procedure ';'
|
|
|
|
| procedure ';' procedure_list
|
|
|
|
;
|
|
|
|
|
|
|
|
procedure
|
|
|
|
: type_specifier procedure_ident '(' type_specifier ')' '=' value ';'
|
|
|
|
;
|
|
|
|
|
|
|
|
procedure_ident
|
|
|
|
: IDENTIFIER
|
|
|
|
;
|
|
|
|
|
|
|
|
%%
|