3 * Copyright © 2009 Intel Corporation
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the "Software"),
7 * to deal in the Software without restriction, including without limitation
8 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9 * and/or sell copies of the Software, and to permit persons to whom the
10 * Software is furnished to do so, subject to the following conditions:
12 * The above copyright notice and this permission notice (including the next
13 * paragraph) shall be included in all copies or substantial portions of the
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
21 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22 * DEALINGS IN THE SOFTWARE.
30 #include "glsl_parser_extras.h"
32 struct _mesa_glsl_parse_state
;
37 * \defgroup AST Abstract syntax tree node definitions
39 * An abstract syntax tree is generated by the parser. This is a fairly
40 * direct representation of the gramma derivation for the source program.
41 * No symantic checking is done during the generation of the AST. Only
42 * syntactic checking is done. Symantic checking is performed by a later
43 * stage that converts the AST to a more generic intermediate representation.
48 * Base class of all abstract syntax tree nodes
52 DECLARE_RALLOC_CXX_OPERATORS(ast_node
);
55 * Print an AST node in something approximating the original GLSL code
57 virtual void print(void) const;
60 * Convert the AST node to the high-level intermediate representation
62 virtual ir_rvalue
*hir(exec_list
*instructions
,
63 struct _mesa_glsl_parse_state
*state
);
66 * Retrieve the source location of an AST node
68 * This function is primarily used to get the source position of an AST node
69 * into a form that can be passed to \c _mesa_glsl_error.
71 * \sa _mesa_glsl_error, ast_node::set_location
73 struct YYLTYPE
get_location(void) const
77 locp
.source
= this->location
.source
;
78 locp
.first_line
= this->location
.first_line
;
79 locp
.first_column
= this->location
.first_column
;
80 locp
.last_line
= this->location
.last_line
;
81 locp
.last_column
= this->location
.last_column
;
87 * Set the source location of an AST node from a parser location
89 * \sa ast_node::get_location
91 void set_location(const struct YYLTYPE
&locp
)
93 this->location
.source
= locp
.source
;
94 this->location
.first_line
= locp
.first_line
;
95 this->location
.first_column
= locp
.first_column
;
96 this->location
.last_line
= locp
.last_line
;
97 this->location
.last_column
= locp
.last_column
;
101 * Set the source location range of an AST node using two location nodes
103 * \sa ast_node::set_location
105 void set_location_range(const struct YYLTYPE
&begin
, const struct YYLTYPE
&end
)
107 this->location
.source
= begin
.source
;
108 this->location
.first_line
= begin
.first_line
;
109 this->location
.last_line
= end
.last_line
;
110 this->location
.first_column
= begin
.first_column
;
111 this->location
.last_column
= end
.last_column
;
115 * Source location of the AST node.
118 unsigned source
; /**< GLSL source number. */
119 unsigned first_line
; /**< First line number within the source string. */
120 unsigned first_column
; /**< First column in the first line. */
121 unsigned last_line
; /**< Last line number within the source string. */
122 unsigned last_column
; /**< Last column in the last line. */
129 * The only constructor is protected so that only derived class objects can
137 * Operators for AST expression nodes.
141 ast_plus
, /**< Unary + operator. */
199 * Representation of any sort of expression.
201 class ast_expression
: public ast_node
{
203 ast_expression(int oper
, ast_expression
*,
204 ast_expression
*, ast_expression
*);
206 ast_expression(const char *identifier
) :
209 subexpressions
[0] = NULL
;
210 subexpressions
[1] = NULL
;
211 subexpressions
[2] = NULL
;
212 primary_expression
.identifier
= identifier
;
213 this->non_lvalue_description
= NULL
;
216 static const char *operator_string(enum ast_operators op
);
218 virtual ir_rvalue
*hir(exec_list
*instructions
,
219 struct _mesa_glsl_parse_state
*state
);
221 virtual void hir_no_rvalue(exec_list
*instructions
,
222 struct _mesa_glsl_parse_state
*state
);
224 ir_rvalue
*do_hir(exec_list
*instructions
,
225 struct _mesa_glsl_parse_state
*state
,
228 virtual void print(void) const;
230 enum ast_operators oper
;
232 ast_expression
*subexpressions
[3];
235 const char *identifier
;
237 float float_constant
;
238 unsigned uint_constant
;
240 double double_constant
;
241 } primary_expression
;
245 * List of expressions for an \c ast_sequence or parameters for an
246 * \c ast_function_call
248 exec_list expressions
;
251 * For things that can't be l-values, this describes what it is.
253 * This text is used by the code that generates IR for assignments to
254 * detect and emit useful messages for assignments to some things that
255 * can't be l-values. For example, pre- or post-incerement expressions.
258 * This pointer may be \c NULL.
260 const char *non_lvalue_description
;
263 class ast_expression_bin
: public ast_expression
{
265 ast_expression_bin(int oper
, ast_expression
*, ast_expression
*);
267 virtual void print(void) const;
271 * Subclass of expressions for function calls
273 class ast_function_expression
: public ast_expression
{
275 ast_function_expression(ast_expression
*callee
)
276 : ast_expression(ast_function_call
, callee
,
283 ast_function_expression(class ast_type_specifier
*type
)
284 : ast_expression(ast_function_call
, (ast_expression
*) type
,
291 bool is_constructor() const
296 virtual ir_rvalue
*hir(exec_list
*instructions
,
297 struct _mesa_glsl_parse_state
*state
);
299 virtual void hir_no_rvalue(exec_list
*instructions
,
300 struct _mesa_glsl_parse_state
*state
);
304 * Is this function call actually a constructor?
309 class ast_array_specifier
: public ast_node
{
311 /** Unsized array specifier ([]) */
312 explicit ast_array_specifier(const struct YYLTYPE
&locp
)
313 : is_unsized_array(true)
318 /** Sized array specifier ([dim]) */
319 ast_array_specifier(const struct YYLTYPE
&locp
, ast_expression
*dim
)
320 : is_unsized_array(false)
323 array_dimensions
.push_tail(&dim
->link
);
326 void add_dimension(ast_expression
*dim
)
328 array_dimensions
.push_tail(&dim
->link
);
331 virtual void print(void) const;
333 /* If true, this means that the array has an unsized outermost dimension. */
334 bool is_unsized_array
;
336 /* This list contains objects of type ast_node containing the
337 * sized dimensions only, in outermost-to-innermost order.
339 exec_list array_dimensions
;
343 * C-style aggregate initialization class
345 * Represents C-style initializers of vectors, matrices, arrays, and
346 * structures. E.g., vec3 pos = {1.0, 0.0, -1.0} is equivalent to
347 * vec3 pos = vec3(1.0, 0.0, -1.0).
349 * Specified in GLSL 4.20 and GL_ARB_shading_language_420pack.
351 * \sa _mesa_ast_set_aggregate_type
353 class ast_aggregate_initializer
: public ast_expression
{
355 ast_aggregate_initializer()
356 : ast_expression(ast_aggregate
, NULL
, NULL
, NULL
),
357 constructor_type(NULL
)
363 * glsl_type of the aggregate, which is inferred from the LHS of whatever
364 * the aggregate is being used to initialize. This can't be inferred at
365 * parse time (since the parser deals with ast_type_specifiers, not
366 * glsl_types), so the parser leaves it NULL. However, the ast-to-hir
367 * conversion code makes sure to fill it in with the appropriate type
368 * before hir() is called.
370 const glsl_type
*constructor_type
;
372 virtual ir_rvalue
*hir(exec_list
*instructions
,
373 struct _mesa_glsl_parse_state
*state
);
375 virtual void hir_no_rvalue(exec_list
*instructions
,
376 struct _mesa_glsl_parse_state
*state
);
380 * Number of possible operators for an ast_expression
382 * This is done as a define instead of as an additional value in the enum so
383 * that the compiler won't generate spurious messages like "warning:
384 * enumeration value ‘ast_num_operators’ not handled in switch"
386 #define AST_NUM_OPERATORS (ast_sequence + 1)
389 class ast_compound_statement
: public ast_node
{
391 ast_compound_statement(int new_scope
, ast_node
*statements
);
392 virtual void print(void) const;
394 virtual ir_rvalue
*hir(exec_list
*instructions
,
395 struct _mesa_glsl_parse_state
*state
);
398 exec_list statements
;
401 class ast_declaration
: public ast_node
{
403 ast_declaration(const char *identifier
,
404 ast_array_specifier
*array_specifier
,
405 ast_expression
*initializer
);
406 virtual void print(void) const;
408 const char *identifier
;
410 ast_array_specifier
*array_specifier
;
412 ast_expression
*initializer
;
417 ast_precision_none
= 0, /**< Absence of precision qualifier. */
419 ast_precision_medium
,
423 struct ast_type_qualifier
{
424 DECLARE_RALLOC_CXX_OPERATORS(ast_type_qualifier
);
428 unsigned invariant
:1;
431 unsigned attribute
:1;
440 unsigned noperspective
:1;
442 /** \name Layout qualifiers for GL_ARB_fragment_coord_conventions */
444 unsigned origin_upper_left
:1;
445 unsigned pixel_center_integer
:1;
449 * Flag set if GL_ARB_explicit_attrib_location "location" layout
452 unsigned explicit_location
:1;
454 * Flag set if GL_ARB_explicit_attrib_location "index" layout
457 unsigned explicit_index
:1;
460 * Flag set if GL_ARB_shading_language_420pack "binding" layout
463 unsigned explicit_binding
:1;
466 * Flag set if GL_ARB_shader_atomic counter "offset" layout
469 unsigned explicit_offset
:1;
471 /** \name Layout qualifiers for GL_AMD_conservative_depth */
473 unsigned depth_any
:1;
474 unsigned depth_greater
:1;
475 unsigned depth_less
:1;
476 unsigned depth_unchanged
:1;
479 /** \name Layout qualifiers for GL_ARB_uniform_buffer_object */
484 unsigned column_major
:1;
485 unsigned row_major
:1;
488 /** \name Layout qualifiers for GLSL 1.50 geometry shaders */
490 unsigned prim_type
:1;
491 unsigned max_vertices
:1;
495 * local_size_{x,y,z} flags for compute shaders. Bit 0 represents
496 * local_size_x, and so on.
498 unsigned local_size
:3;
500 /** \name Layout and memory qualifiers for ARB_shader_image_load_store. */
502 unsigned early_fragment_tests
:1;
503 unsigned explicit_image_format
:1;
505 unsigned _volatile
:1;
506 unsigned restrict_flag
:1;
507 unsigned read_only
:1; /**< "readonly" qualifier. */
508 unsigned write_only
:1; /**< "writeonly" qualifier. */
511 /** \name Layout qualifiers for GL_ARB_gpu_shader5 */
513 unsigned invocations
:1;
514 unsigned stream
:1; /**< Has stream value assigned */
515 unsigned explicit_stream
:1; /**< stream value assigned explicitly by shader code */
518 /** \brief Set of flags, accessed by name. */
521 /** \brief Set of flags, accessed as a bitmask. */
525 /** Precision of the type (highp/medium/lowp). */
526 unsigned precision
:2;
528 /** Geometry shader invocations for GL_ARB_gpu_shader5. */
532 * Location specified via GL_ARB_explicit_attrib_location layout
535 * This field is only valid if \c explicit_location is set.
539 * Index specified via GL_ARB_explicit_attrib_location layout
542 * This field is only valid if \c explicit_index is set.
546 /** Maximum output vertices in GLSL 1.50 geometry shaders. */
549 /** Stream in GLSL 1.50 geometry shaders. */
552 /** Input or output primitive type in GLSL 1.50 geometry shaders */
556 * Binding specified via GL_ARB_shading_language_420pack's "binding" keyword.
559 * This field is only valid if \c explicit_binding is set.
564 * Offset specified via GL_ARB_shader_atomic_counter's "offset"
568 * This field is only valid if \c explicit_offset is set.
573 * Local size specified via GL_ARB_compute_shader's "local_size_{x,y,z}"
574 * layout qualifier. Element i of this array is only valid if
575 * flags.q.local_size & (1 << i) is set.
580 * Image format specified with an ARB_shader_image_load_store
584 * This field is only valid if \c explicit_image_format is set.
589 * Base type of the data read from or written to this image. Only
590 * the following enumerants are allowed: GLSL_TYPE_UINT,
591 * GLSL_TYPE_INT, GLSL_TYPE_FLOAT.
594 * This field is only valid if \c explicit_image_format is set.
596 glsl_base_type image_base_type
;
599 * Return true if and only if an interpolation qualifier is present.
601 bool has_interpolation() const;
604 * Return whether a layout qualifier is present.
606 bool has_layout() const;
609 * Return whether a storage qualifier is present.
611 bool has_storage() const;
614 * Return whether an auxiliary storage qualifier is present.
616 bool has_auxiliary_storage() const;
619 * \brief Return string representation of interpolation qualifier.
621 * If an interpolation qualifier is present, then return that qualifier's
622 * string representation. Otherwise, return null. For example, if the
623 * noperspective bit is set, then this returns "noperspective".
625 * If multiple interpolation qualifiers are somehow present, then the
626 * returned string is undefined but not null.
628 const char *interpolation_string() const;
630 bool merge_qualifier(YYLTYPE
*loc
,
631 _mesa_glsl_parse_state
*state
,
632 ast_type_qualifier q
);
634 bool merge_in_qualifier(YYLTYPE
*loc
,
635 _mesa_glsl_parse_state
*state
,
636 ast_type_qualifier q
,
641 class ast_declarator_list
;
643 class ast_struct_specifier
: public ast_node
{
645 ast_struct_specifier(const char *identifier
,
646 ast_declarator_list
*declarator_list
);
647 virtual void print(void) const;
649 virtual ir_rvalue
*hir(exec_list
*instructions
,
650 struct _mesa_glsl_parse_state
*state
);
653 /* List of ast_declarator_list * */
654 exec_list declarations
;
660 class ast_type_specifier
: public ast_node
{
662 /** Construct a type specifier from a type name */
663 ast_type_specifier(const char *name
)
664 : type_name(name
), structure(NULL
), array_specifier(NULL
),
665 default_precision(ast_precision_none
)
670 /** Construct a type specifier from a structure definition */
671 ast_type_specifier(ast_struct_specifier
*s
)
672 : type_name(s
->name
), structure(s
), array_specifier(NULL
),
673 default_precision(ast_precision_none
)
678 const struct glsl_type
*glsl_type(const char **name
,
679 struct _mesa_glsl_parse_state
*state
)
682 virtual void print(void) const;
684 ir_rvalue
*hir(exec_list
*, struct _mesa_glsl_parse_state
*);
686 const char *type_name
;
687 ast_struct_specifier
*structure
;
689 ast_array_specifier
*array_specifier
;
691 /** For precision statements, this is the given precision; otherwise none. */
692 unsigned default_precision
:2;
696 class ast_fully_specified_type
: public ast_node
{
698 virtual void print(void) const;
699 bool has_qualifiers() const;
701 ast_fully_specified_type() : qualifier(), specifier(NULL
)
705 const struct glsl_type
*glsl_type(const char **name
,
706 struct _mesa_glsl_parse_state
*state
)
709 ast_type_qualifier qualifier
;
710 ast_type_specifier
*specifier
;
714 class ast_declarator_list
: public ast_node
{
716 ast_declarator_list(ast_fully_specified_type
*);
717 virtual void print(void) const;
719 virtual ir_rvalue
*hir(exec_list
*instructions
,
720 struct _mesa_glsl_parse_state
*state
);
722 ast_fully_specified_type
*type
;
723 /** List of 'ast_declaration *' */
724 exec_list declarations
;
727 * Flags for redeclarations. In these cases, no type is specified, to
728 * `type` is allowed to be NULL. In all other cases, this would be an error.
730 int invariant
; /** < `invariant` redeclaration */
731 int precise
; /** < `precise` redeclaration */
735 class ast_parameter_declarator
: public ast_node
{
737 ast_parameter_declarator() :
740 array_specifier(NULL
),
741 formal_parameter(false),
747 virtual void print(void) const;
749 virtual ir_rvalue
*hir(exec_list
*instructions
,
750 struct _mesa_glsl_parse_state
*state
);
752 ast_fully_specified_type
*type
;
753 const char *identifier
;
754 ast_array_specifier
*array_specifier
;
756 static void parameters_to_hir(exec_list
*ast_parameters
,
757 bool formal
, exec_list
*ir_parameters
,
758 struct _mesa_glsl_parse_state
*state
);
761 /** Is this parameter declaration part of a formal parameter list? */
762 bool formal_parameter
;
765 * Is this parameter 'void' type?
767 * This field is set by \c ::hir.
773 class ast_function
: public ast_node
{
777 virtual void print(void) const;
779 virtual ir_rvalue
*hir(exec_list
*instructions
,
780 struct _mesa_glsl_parse_state
*state
);
782 ast_fully_specified_type
*return_type
;
783 const char *identifier
;
785 exec_list parameters
;
789 * Is this prototype part of the function definition?
791 * Used by ast_function_definition::hir to process the parameters, etc.
799 * Function signature corresponding to this function prototype instance
801 * Used by ast_function_definition::hir to process the parameters, etc.
806 class ir_function_signature
*signature
;
808 friend class ast_function_definition
;
812 class ast_expression_statement
: public ast_node
{
814 ast_expression_statement(ast_expression
*);
815 virtual void print(void) const;
817 virtual ir_rvalue
*hir(exec_list
*instructions
,
818 struct _mesa_glsl_parse_state
*state
);
820 ast_expression
*expression
;
824 class ast_case_label
: public ast_node
{
826 ast_case_label(ast_expression
*test_value
);
827 virtual void print(void) const;
829 virtual ir_rvalue
*hir(exec_list
*instructions
,
830 struct _mesa_glsl_parse_state
*state
);
833 * An test value of NULL means 'default'.
835 ast_expression
*test_value
;
839 class ast_case_label_list
: public ast_node
{
841 ast_case_label_list(void);
842 virtual void print(void) const;
844 virtual ir_rvalue
*hir(exec_list
*instructions
,
845 struct _mesa_glsl_parse_state
*state
);
848 * A list of case labels.
854 class ast_case_statement
: public ast_node
{
856 ast_case_statement(ast_case_label_list
*labels
);
857 virtual void print(void) const;
859 virtual ir_rvalue
*hir(exec_list
*instructions
,
860 struct _mesa_glsl_parse_state
*state
);
862 ast_case_label_list
*labels
;
865 * A list of statements.
871 class ast_case_statement_list
: public ast_node
{
873 ast_case_statement_list(void);
874 virtual void print(void) const;
876 virtual ir_rvalue
*hir(exec_list
*instructions
,
877 struct _mesa_glsl_parse_state
*state
);
886 class ast_switch_body
: public ast_node
{
888 ast_switch_body(ast_case_statement_list
*stmts
);
889 virtual void print(void) const;
891 virtual ir_rvalue
*hir(exec_list
*instructions
,
892 struct _mesa_glsl_parse_state
*state
);
894 ast_case_statement_list
*stmts
;
898 class ast_selection_statement
: public ast_node
{
900 ast_selection_statement(ast_expression
*condition
,
901 ast_node
*then_statement
,
902 ast_node
*else_statement
);
903 virtual void print(void) const;
905 virtual ir_rvalue
*hir(exec_list
*instructions
,
906 struct _mesa_glsl_parse_state
*state
);
908 ast_expression
*condition
;
909 ast_node
*then_statement
;
910 ast_node
*else_statement
;
914 class ast_switch_statement
: public ast_node
{
916 ast_switch_statement(ast_expression
*test_expression
,
918 virtual void print(void) const;
920 virtual ir_rvalue
*hir(exec_list
*instructions
,
921 struct _mesa_glsl_parse_state
*state
);
923 ast_expression
*test_expression
;
927 void test_to_hir(exec_list
*, struct _mesa_glsl_parse_state
*);
930 class ast_iteration_statement
: public ast_node
{
932 ast_iteration_statement(int mode
, ast_node
*init
, ast_node
*condition
,
933 ast_expression
*rest_expression
, ast_node
*body
);
935 virtual void print(void) const;
937 virtual ir_rvalue
*hir(exec_list
*, struct _mesa_glsl_parse_state
*);
939 enum ast_iteration_modes
{
946 ast_node
*init_statement
;
948 ast_expression
*rest_expression
;
953 * Generate IR from the condition of a loop
955 * This is factored out of ::hir because some loops have the condition
956 * test at the top (for and while), and others have it at the end (do-while).
958 void condition_to_hir(exec_list
*, struct _mesa_glsl_parse_state
*);
962 class ast_jump_statement
: public ast_node
{
964 ast_jump_statement(int mode
, ast_expression
*return_value
);
965 virtual void print(void) const;
967 virtual ir_rvalue
*hir(exec_list
*instructions
,
968 struct _mesa_glsl_parse_state
*state
);
970 enum ast_jump_modes
{
977 ast_expression
*opt_return_value
;
981 class ast_function_definition
: public ast_node
{
983 ast_function_definition() : prototype(NULL
), body(NULL
)
987 virtual void print(void) const;
989 virtual ir_rvalue
*hir(exec_list
*instructions
,
990 struct _mesa_glsl_parse_state
*state
);
992 ast_function
*prototype
;
993 ast_compound_statement
*body
;
996 class ast_interface_block
: public ast_node
{
998 ast_interface_block(ast_type_qualifier layout
,
999 const char *instance_name
,
1000 ast_array_specifier
*array_specifier
)
1001 : layout(layout
), block_name(NULL
), instance_name(instance_name
),
1002 array_specifier(array_specifier
)
1006 virtual ir_rvalue
*hir(exec_list
*instructions
,
1007 struct _mesa_glsl_parse_state
*state
);
1009 ast_type_qualifier layout
;
1010 const char *block_name
;
1013 * Declared name of the block instance, if specified.
1015 * If the block does not have an instance name, this field will be
1018 const char *instance_name
;
1020 /** List of ast_declarator_list * */
1021 exec_list declarations
;
1024 * Declared array size of the block instance
1026 * If the block is not declared as an array or if the block instance array
1027 * is unsized, this field will be \c NULL.
1029 ast_array_specifier
*array_specifier
;
1034 * AST node representing a declaration of the input layout for geometry
1037 class ast_gs_input_layout
: public ast_node
1040 ast_gs_input_layout(const struct YYLTYPE
&locp
, GLenum prim_type
)
1041 : prim_type(prim_type
)
1046 virtual ir_rvalue
*hir(exec_list
*instructions
,
1047 struct _mesa_glsl_parse_state
*state
);
1050 const GLenum prim_type
;
1055 * AST node representing a decalaration of the input layout for compute
1058 class ast_cs_input_layout
: public ast_node
1061 ast_cs_input_layout(const struct YYLTYPE
&locp
, const unsigned *local_size
)
1063 memcpy(this->local_size
, local_size
, sizeof(this->local_size
));
1067 virtual ir_rvalue
*hir(exec_list
*instructions
,
1068 struct _mesa_glsl_parse_state
*state
);
1071 unsigned local_size
[3];
1077 _mesa_ast_to_hir(exec_list
*instructions
, struct _mesa_glsl_parse_state
*state
);
1080 _mesa_ast_field_selection_to_hir(const ast_expression
*expr
,
1081 exec_list
*instructions
,
1082 struct _mesa_glsl_parse_state
*state
);
1085 _mesa_ast_array_index_to_hir(void *mem_ctx
,
1086 struct _mesa_glsl_parse_state
*state
,
1087 ir_rvalue
*array
, ir_rvalue
*idx
,
1088 YYLTYPE
&loc
, YYLTYPE
&idx_loc
);
1091 _mesa_ast_set_aggregate_type(const glsl_type
*type
,
1092 ast_expression
*expr
);
1095 emit_function(_mesa_glsl_parse_state
*state
, ir_function
*f
);
1098 check_builtin_array_max_size(const char *name
, unsigned size
,
1099 YYLTYPE loc
, struct _mesa_glsl_parse_state
*state
);