source: proto/s2k/trunk/framework/input/grammar/scatter/b2k.scatter @ 4114

Last change on this file since 4114 was 4114, checked in by ksherdy, 5 years ago

Dropped Bitfield type added array of BitBlocks?.

File size: 9.5 KB
Line 
1//
2// b2k - A very high-level IR for the expression of block-by-block parallel bit stream processing.
3//
4// 02-12-2012      Original definition.
5// 29-03-2013      Added IDISA function call.
6// 06-04-2013      Updated to Scatter with types.
7//
8//
9//
10// Tom Shermer <shermer at sfu dot ca>
11// Ken Herdy <ksherdy at sfu dot ca>
12//
13
14
15types {
16//    toolchain.s2k.lang.type.Type,
17//    toolchain.s2k.lang.type.PrimitiveType,
18//    toolchain.s2k.lang.type.StreamType,
19}
20
21context main {
22    recognizers {
23        Whitespace [IGNORE],
24        Integer [INTEGER_CONST],
25        Identifier [IDENTIFIER],        // Java identifiers. Produces Lextant Tokens for keywords.
26        Comment [IGNORE] "#" "\n",      // parabix2_pablo debugging only.
27        Comment [IGNORE] "//" "\n",
28        Comment [SQ_STRING] "'" "'",
29        Comment [IGNORE] "/*" "*/",     // Comment. Comment [STRING] "/*" "*/",
30        String [STRING],
31        Punctuator,
32        EndOfInput,
33    }
34
35    // t o k e n s
36    tokens {
37        GRAPH,
38        INIT,
39        KERNEL,
40        IN,
41        OUT,
42        INOUT,
43        FUNCTION,   
44        STRUCT,
45        INT,
46        VOID,
47        BOOL,
48        //BITFIELD         "BitField",
49        BITBLOCK         "BitBlock",
50        //CODEBLOCK,
51        IF,
52        ELSE,
53        FOR,
54        BY,
55        WHILE,
56        RETURN,
57        AND             "&",
58        OR              "|",
59        NOT             "~",
60        XOR             "^",
61        MULTIPLY        "*",
62        DIVIDE          "/",
63        PLUS            "+",
64        MINUS           "-",
65        ASSIGN          "=",
66        LANGLE          "<",
67        RANGLE          ">",
68        LCURLY          "{",
69        RCURLY          "}",
70        LROUND          "(",
71        RROUND          ")",
72        LSQUARE         "[",
73        RSQUARE         "]",
74        COMMA           ",",
75        TERMINATOR      ";",
76        DOT             ".",
77        DDOT           "..",
78        COLON           ":",
79    }
80}
81
82interfaces {
83    intValued {int value = 0;},
84    hasFieldWidth   {int fieldWidth = 1;},
85}
86
87nodes {
88    unaryOperator           {}                     [expr2],
89    binaryOperator          {}                     [expr expr1 expr3 expr4],
90    assign                  {}                     [assignRest],
91    funcCall                {}                     [funcCallRest],
92    idisaFuncCall           {}                     [idisaFuncCallRest],
93    bitBlockType            {hasFieldWidth;}  [],
94    integerConstant         {intValued;}           [fieldWidthSpecifier],  // codeBlockWidthSpecifier ],
95    // primitiveType        {}                     [intType voidType boolType bitBlockType], // KH: update S2B
96    fieldWidthType          {int fieldWidth = 1;}  [],
97    // codeBlockWidth{int codeBlockWidth = 128;}   [],
98}
99
100grammar {
101   
102    program     -> (structDef | kernelDef) * graphDef ?;
103   
104    //
105    // s t r u c t   d e f i n i t i o n 
106    //
107    structDef           ->  STRUCT identifier structDefBody TERMINATOR? ;
108    structDefBody       ->  LCURLY (structMember TERMINATOR)+ RCURLY ;
109    structMember        ->  structMemberType identifier ;
110    structMemberType    #-> bitBlockType ;
111
112    //
113    // k e r n e l   d e f i n i t i o n
114    //
115    kernelDef           ->  KERNEL identifier LCURLY kernelInitDef kernelFuncDefs carryDeclare TERMINATOR RCURLY TERMINATOR? ; 
116    kernelFuncDefs      ->  kernelFuncDef * ;
117
118    //
119    // k e r n e l   p r o p e r t i e s 
120    //
121    kernelInitDef       #-> INIT LCURLY kernelProperty* RCURLY TERMINATOR? ;
122    kernelProperty      ->  identifier ASSIGN propertyValue TERMINATOR ;
123    propertyValue       ->  LSQUARE integerConstant (COMMA integerConstant)* RSQUARE ;
124
125    //
126    // k e r n e l   f u n c t i o n   d e f i n i t i o n
127    //
128    kernelFuncDef       ->  FUNCTION identifier LROUND kernelParameterList RROUND kernelFuncBody TERMINATOR? ;
129    kernelParameterList ->  (kernelParameter (COMMA kernelParameter)* )?;
130    kernelParameter     ->  (kernelParameterMode COLON)? type identifier ;
131    kernelParameterMode ->  (IN | OUT | INOUT) ;
132    kernelFuncBody      #-> blockStmt ;
133    carryDeclare                #-> expr; // KH: temp hack to append the CarryDeclare() macro
134
135    //
136    // s t r e a m   g r a p h  ( p i p e l i n e )  d e f i n i t i o n
137    //   
138    graphDef                    ->  GRAPH identifier LROUND graphParameterList RROUND graphBody TERMINATOR ? ;
139   
140    graphParameterList          ->  ( graphParameter (COMMA graphParameter)* ) ? ; // KH: implement as a 'modal' parameter
141    graphParameter              ->  graphParameterMode? type identifier ;
142    graphParameterMode          ->  (IN | OUT | INOUT) ;
143   
144    graphBody                   ->  LCURLY graphVarDecls addKernelStmts RCURLY ;
145   
146    graphVarDecls               ->  ( structDecl | kernelDecl ) * ;
147    structDecl                  ->  structType identifier TERMINATOR ;
148    kernelDecl                  ->  kernelType identifier TERMINATOR ;
149    // graphDecl                ->  GRAPH identifier TERMINATOR ;
150       
151    addKernelStmts              ->  addKernelStmt * ;   
152    addKernelStmt               ->  identifier addKernelArgList ;
153    addKernelArgList            ->  (identifier (COMMA identifier) *) ? ;
154
155    //
156    // c o d e   b l o c k     // (32,64,128,256,...)
157    //
158    // codeBlock        ->  CODEBLOCK codeBlockWidthSpecifier! 
159    //                      { @codeBlockWidth = @:value; }
160    //                      blockStmt (TERMINATOR)? ;
161    //               
162    // codeBlockWidthSpecifier  #-> (LANGLE fieldWidthSpecifier RANGLE ) | (epsilon {@value = 128;}) ;
163
164    //
165    // s t a t e m e n t s
166    //
167    stmt                    #-> varDecl | funcCallOrAssignStmt | returnStmt | ifStmt | whileStmt | forStmt ;
168    blockStmt               ->  LCURLY stmt* RCURLY ;
169    varDecl                 ->  type identifier TERMINATOR ;
170    funcCallOrAssignStmt    #-> expr (assignRest _promote_) ? TERMINATOR ; // KH: Add SA pass to validate expr is a function call type   
171    assignOperator          ->  ASSIGN ;                 
172    assignRest              ->  assignOperator^! expr ;               
173    returnStmt              ->  RETURN (expr) ? TERMINATOR ;
174    ifStmt                  ->  IF expr blockStmt (ELSE blockStmt)? ;             
175    whileStmt               ->  WHILE expr blockStmt ;
176   
177    // KH: add forStmt SA, lowerBound <= upperBound, stride != 0
178        // KH: count controlled for loop to support reductions         
179        forStmt                     ->      FOR identifier IN stridedRange blockStmt ;
180        //indexTypeDecl             ->      indexType identifier ; // ?
181    stridedRange                ->      range step ;
182    range                       ->      integerConstant DDOT integerConstant ;
183    step                        #->     (BY integerConstant) | epsilon {@value = 1;} ;
184
185    //
186    // e x p r e s s i o n s
187    //   
188//    expr        #-> expr1 ((BY^) expr1)?                  _leftAssoc_ ;   
189//    expr1       #-> expr2 ((RANGE^) expr2)?               _leftAssoc_ ;
190    expr        #-> expr1 ((OR^) expr)?                   _leftAssoc_ ;
191    expr1       #-> expr2 ((XOR^) expr1)?                 _leftAssoc_ ;
192    expr2       #-> expr3 ((AND^) expr2)?                 _leftAssoc_ ;
193    expr3       #-> expr4 ((PLUS^ | MINUS^) expr3)?       _leftAssoc_ ;
194    expr4       #-> expr5 ((MULTIPLY^ | DIVIDE^) expr4)?  _leftAssoc_ ;
195    expr5       #-> ((PLUS^^ | MINUS^^)? expr6) | ((NOT^^)* expr6)                          ;
196    expr6       #-> compoundIdentifier ((funcCallRest _promote_) | (idisaFuncCallRest _promote_)) ? 
197                |   LROUND expr RROUND
198                |   constant ;
199
200    constant            #->     stringConstant | integerConstant ;
201    integerConstant     ->      INTEGER_CONST {@value = @@value;} ;
202    stringConstant      ->      STRING | SQ_STRING ;
203    compoundIdentifier  #->     identifier (DOT^ identifier)* ;
204    identifier          ->      IDENTIFIER ;
205    funcCallRest        ->      LROUND^ funcCallArgList RROUND ;
206    funcCallArgList     ->      (expr (COMMA expr)*) ? ;
207    idisaFuncCallRest   ->      LANGLE^ fieldWidth RANGLE LROUND idisaFuncCallArgList RROUND; // KH: parameterized function call ?
208    fieldWidth          ->      integerConstant ;                                             // KH: fieldWidthSpecifier / expr ?
209    idisaFuncCallArgList    ->  (expr (COMMA expr)*) ? ;
210
211    //
212    // t y p e s
213    //
214    type                #-> primitiveType   |
215                            // bitFieldType    |
216                            structType      |
217                            kernelType      ;
218
219    primitiveType       #->  ( intType | voidType | boolType | bitBlockType ) ;
220
221    intType             ->  INT ;       // { @type = {{PrimitiveType.INTEGER}}; } ;
222    voidType            ->  VOID ;      // { @type = {{PrimitiveType.VOID}}; } ; // KH: ?
223    boolType            ->  BOOL ;      // { @type = {{PrimitiveType.BOOL}}; } ;
224    bitBlockType        ->  BITBLOCK fieldWidthSpecifier! {   @fieldWidth = @:value;
225                                                                    //@fieldWidth ; // KH ?
226                                                                } ;
227
228    // bitFieldType        ->  BITFIELD  fieldWidthSpecifier!
229    //                                        {   @fieldWidth = @:value;
230    //                                        // @type = {{ new BitFieldType(%?) }} , @fieldWidth ;
231    //                                        } ;
232
233    fieldWidthSpecifier    #-> (LANGLE integerConstant RANGLE )
234                            | (epsilon {@value = 1;}) ;
235
236    structType             ->  STRUCT identifier ;
237    kernelType             -> KERNEL identifier ;
238   
239}
Note: See TracBrowser for help on using the repository browser.