2 * Copyright © 2014 Intel Corporation
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
11 * The above copyright notice and this permission notice (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
24 * Connor Abbott (cwabbott0@gmail.com)
29 #include "compiler/shader_enums.h"
30 #include "util/half_float.h"
33 #include <inttypes.h> /* for PRIx64 macro */
36 print_tabs(unsigned num_tabs
, FILE *fp
)
38 for (unsigned i
= 0; i
< num_tabs
; i
++)
45 /** map from nir_variable -> printable name */
46 struct hash_table
*ht
;
48 /** set of names used so far for nir_variables */
51 /* an index used to make new non-conflicting names */
55 * Optional table of annotations mapping nir object
56 * (such as instr or var) to message to print.
58 struct hash_table
*annotations
;
62 print_annotation(print_state
*state
, void *obj
)
64 if (!state
->annotations
)
67 struct hash_entry
*entry
= _mesa_hash_table_search(state
->annotations
, obj
);
71 const char *note
= entry
->data
;
72 _mesa_hash_table_remove(state
->annotations
, entry
);
74 fprintf(stderr
, "%s\n\n", note
);
78 print_register(nir_register
*reg
, print_state
*state
)
81 if (reg
->name
!= NULL
)
82 fprintf(fp
, "/* %s */ ", reg
->name
);
84 fprintf(fp
, "gr%u", reg
->index
);
86 fprintf(fp
, "r%u", reg
->index
);
89 static const char *sizes
[] = { "error", "vec1", "vec2", "vec3", "vec4",
90 "error", "error", "error", "vec8",
91 "error", "error", "error", "error",
92 "error", "error", "error", "vec16"};
95 print_register_decl(nir_register
*reg
, print_state
*state
)
98 fprintf(fp
, "decl_reg %s %u ", sizes
[reg
->num_components
], reg
->bit_size
);
100 fprintf(fp
, "(packed) ");
101 print_register(reg
, state
);
102 if (reg
->num_array_elems
!= 0)
103 fprintf(fp
, "[%u]", reg
->num_array_elems
);
108 print_ssa_def(nir_ssa_def
*def
, print_state
*state
)
110 FILE *fp
= state
->fp
;
111 if (def
->name
!= NULL
)
112 fprintf(fp
, "/* %s */ ", def
->name
);
113 fprintf(fp
, "%s %u ssa_%u", sizes
[def
->num_components
], def
->bit_size
,
118 print_ssa_use(nir_ssa_def
*def
, print_state
*state
)
120 FILE *fp
= state
->fp
;
121 if (def
->name
!= NULL
)
122 fprintf(fp
, "/* %s */ ", def
->name
);
123 fprintf(fp
, "ssa_%u", def
->index
);
126 static void print_src(const nir_src
*src
, print_state
*state
);
129 print_reg_src(const nir_reg_src
*src
, print_state
*state
)
131 FILE *fp
= state
->fp
;
132 print_register(src
->reg
, state
);
133 if (src
->reg
->num_array_elems
!= 0) {
134 fprintf(fp
, "[%u", src
->base_offset
);
135 if (src
->indirect
!= NULL
) {
137 print_src(src
->indirect
, state
);
144 print_reg_dest(nir_reg_dest
*dest
, print_state
*state
)
146 FILE *fp
= state
->fp
;
147 print_register(dest
->reg
, state
);
148 if (dest
->reg
->num_array_elems
!= 0) {
149 fprintf(fp
, "[%u", dest
->base_offset
);
150 if (dest
->indirect
!= NULL
) {
152 print_src(dest
->indirect
, state
);
159 print_src(const nir_src
*src
, print_state
*state
)
162 print_ssa_use(src
->ssa
, state
);
164 print_reg_src(&src
->reg
, state
);
168 print_dest(nir_dest
*dest
, print_state
*state
)
171 print_ssa_def(&dest
->ssa
, state
);
173 print_reg_dest(&dest
->reg
, state
);
177 print_alu_src(nir_alu_instr
*instr
, unsigned src
, print_state
*state
)
179 FILE *fp
= state
->fp
;
181 if (instr
->src
[src
].negate
)
183 if (instr
->src
[src
].abs
)
186 print_src(&instr
->src
[src
].src
, state
);
188 bool print_swizzle
= false;
189 nir_component_mask_t used_channels
= 0;
191 for (unsigned i
= 0; i
< NIR_MAX_VEC_COMPONENTS
; i
++) {
192 if (!nir_alu_instr_channel_used(instr
, src
, i
))
197 if (instr
->src
[src
].swizzle
[i
] != i
) {
198 print_swizzle
= true;
203 unsigned live_channels
= nir_src_num_components(instr
->src
[src
].src
);
205 if (print_swizzle
|| used_channels
!= live_channels
) {
207 for (unsigned i
= 0; i
< NIR_MAX_VEC_COMPONENTS
; i
++) {
208 if (!nir_alu_instr_channel_used(instr
, src
, i
))
211 fprintf(fp
, "%c", "xyzw"[instr
->src
[src
].swizzle
[i
]]);
215 if (instr
->src
[src
].abs
)
220 print_alu_dest(nir_alu_dest
*dest
, print_state
*state
)
222 FILE *fp
= state
->fp
;
223 /* we're going to print the saturate modifier later, after the opcode */
225 print_dest(&dest
->dest
, state
);
227 if (!dest
->dest
.is_ssa
&&
228 dest
->write_mask
!= (1 << dest
->dest
.reg
.reg
->num_components
) - 1) {
230 for (unsigned i
= 0; i
< NIR_MAX_VEC_COMPONENTS
; i
++)
231 if ((dest
->write_mask
>> i
) & 1)
232 fprintf(fp
, "%c", "xyzw"[i
]);
237 print_alu_instr(nir_alu_instr
*instr
, print_state
*state
)
239 FILE *fp
= state
->fp
;
241 print_alu_dest(&instr
->dest
, state
);
243 fprintf(fp
, " = %s", nir_op_infos
[instr
->op
].name
);
246 if (instr
->dest
.saturate
)
250 for (unsigned i
= 0; i
< nir_op_infos
[instr
->op
].num_inputs
; i
++) {
254 print_alu_src(instr
, i
, state
);
259 get_var_name(nir_variable
*var
, print_state
*state
)
261 if (state
->ht
== NULL
)
262 return var
->name
? var
->name
: "unnamed";
266 struct hash_entry
*entry
= _mesa_hash_table_search(state
->ht
, var
);
271 if (var
->name
== NULL
) {
272 name
= ralloc_asprintf(state
->syms
, "@%u", state
->index
++);
274 struct set_entry
*set_entry
= _mesa_set_search(state
->syms
, var
->name
);
275 if (set_entry
!= NULL
) {
276 /* we have a collision with another name, append an @ + a unique
278 name
= ralloc_asprintf(state
->syms
, "%s@%u", var
->name
,
281 /* Mark this one as seen */
282 _mesa_set_add(state
->syms
, var
->name
);
287 _mesa_hash_table_insert(state
->ht
, var
, name
);
293 print_constant(nir_constant
*c
, const struct glsl_type
*type
, print_state
*state
)
295 FILE *fp
= state
->fp
;
296 const unsigned rows
= glsl_get_vector_elements(type
);
297 const unsigned cols
= glsl_get_matrix_columns(type
);
300 switch (glsl_get_base_type(type
)) {
302 /* Only float base types can be matrices. */
305 for (i
= 0; i
< rows
; i
++) {
306 if (i
> 0) fprintf(fp
, ", ");
307 fprintf(fp
, "%s", c
->values
[0].b
[i
] ? "true" : "false");
311 case GLSL_TYPE_UINT8
:
313 /* Only float base types can be matrices. */
316 for (i
= 0; i
< rows
; i
++) {
317 if (i
> 0) fprintf(fp
, ", ");
318 fprintf(fp
, "0x%02x", c
->values
[0].u8
[i
]);
322 case GLSL_TYPE_UINT16
:
323 case GLSL_TYPE_INT16
:
324 /* Only float base types can be matrices. */
327 for (i
= 0; i
< rows
; i
++) {
328 if (i
> 0) fprintf(fp
, ", ");
329 fprintf(fp
, "0x%04x", c
->values
[0].u16
[i
]);
335 /* Only float base types can be matrices. */
338 for (i
= 0; i
< rows
; i
++) {
339 if (i
> 0) fprintf(fp
, ", ");
340 fprintf(fp
, "0x%08x", c
->values
[0].u32
[i
]);
344 case GLSL_TYPE_FLOAT16
:
345 for (i
= 0; i
< cols
; i
++) {
346 for (j
= 0; j
< rows
; j
++) {
347 if (i
+ j
> 0) fprintf(fp
, ", ");
348 fprintf(fp
, "%f", _mesa_half_to_float(c
->values
[i
].u16
[j
]));
353 case GLSL_TYPE_FLOAT
:
354 for (i
= 0; i
< cols
; i
++) {
355 for (j
= 0; j
< rows
; j
++) {
356 if (i
+ j
> 0) fprintf(fp
, ", ");
357 fprintf(fp
, "%f", c
->values
[i
].f32
[j
]);
362 case GLSL_TYPE_DOUBLE
:
363 for (i
= 0; i
< cols
; i
++) {
364 for (j
= 0; j
< rows
; j
++) {
365 if (i
+ j
> 0) fprintf(fp
, ", ");
366 fprintf(fp
, "%f", c
->values
[i
].f64
[j
]);
371 case GLSL_TYPE_UINT64
:
372 case GLSL_TYPE_INT64
:
373 /* Only float base types can be matrices. */
376 for (i
= 0; i
< cols
; i
++) {
377 if (i
> 0) fprintf(fp
, ", ");
378 fprintf(fp
, "0x%08" PRIx64
, c
->values
[0].u64
[i
]);
382 case GLSL_TYPE_STRUCT
:
383 for (i
= 0; i
< c
->num_elements
; i
++) {
384 if (i
> 0) fprintf(fp
, ", ");
386 print_constant(c
->elements
[i
], glsl_get_struct_field(type
, i
), state
);
391 case GLSL_TYPE_ARRAY
:
392 for (i
= 0; i
< c
->num_elements
; i
++) {
393 if (i
> 0) fprintf(fp
, ", ");
395 print_constant(c
->elements
[i
], glsl_get_array_element(type
), state
);
401 unreachable("not reached");
406 get_variable_mode_str(nir_variable_mode mode
, bool want_local_global_mode
)
409 case nir_var_shader_in
:
411 case nir_var_shader_out
:
413 case nir_var_uniform
:
417 case nir_var_system_value
:
424 return want_local_global_mode
? "global" : "";
426 return want_local_global_mode
? "local" : "";
433 print_var_decl(nir_variable
*var
, print_state
*state
)
435 FILE *fp
= state
->fp
;
437 fprintf(fp
, "decl_var ");
439 const char *const cent
= (var
->data
.centroid
) ? "centroid " : "";
440 const char *const samp
= (var
->data
.sample
) ? "sample " : "";
441 const char *const patch
= (var
->data
.patch
) ? "patch " : "";
442 const char *const inv
= (var
->data
.invariant
) ? "invariant " : "";
443 fprintf(fp
, "%s%s%s%s%s %s ",
444 cent
, samp
, patch
, inv
, get_variable_mode_str(var
->data
.mode
, false),
445 glsl_interp_mode_name(var
->data
.interpolation
));
447 enum gl_access_qualifier access
= var
->data
.image
.access
;
448 const char *const coher
= (access
& ACCESS_COHERENT
) ? "coherent " : "";
449 const char *const volat
= (access
& ACCESS_VOLATILE
) ? "volatile " : "";
450 const char *const restr
= (access
& ACCESS_RESTRICT
) ? "restrict " : "";
451 const char *const ronly
= (access
& ACCESS_NON_WRITEABLE
) ? "readonly " : "";
452 const char *const wonly
= (access
& ACCESS_NON_READABLE
) ? "writeonly " : "";
453 fprintf(fp
, "%s%s%s%s%s", coher
, volat
, restr
, ronly
, wonly
);
455 #define FORMAT_CASE(x) case x: fprintf(stderr, #x " "); break
456 switch (var
->data
.image
.format
) {
457 FORMAT_CASE(GL_RGBA32F
);
458 FORMAT_CASE(GL_RGBA32UI
);
459 FORMAT_CASE(GL_RGBA32I
);
460 FORMAT_CASE(GL_R32F
);
461 FORMAT_CASE(GL_R32UI
);
462 FORMAT_CASE(GL_R32I
);
463 FORMAT_CASE(GL_RG32F
);
464 FORMAT_CASE(GL_RG32UI
);
465 FORMAT_CASE(GL_RG32I
);
468 FORMAT_CASE(GL_RGBA8
);
469 FORMAT_CASE(GL_R8_SNORM
);
470 FORMAT_CASE(GL_RG8_SNORM
);
471 FORMAT_CASE(GL_RGBA8_SNORM
);
473 FORMAT_CASE(GL_RG16
);
474 FORMAT_CASE(GL_RGBA16
);
475 FORMAT_CASE(GL_R16_SNORM
);
476 FORMAT_CASE(GL_RG16_SNORM
);
477 FORMAT_CASE(GL_RGBA16_SNORM
);
478 FORMAT_CASE(GL_R16F
);
479 FORMAT_CASE(GL_RG16F
);
480 FORMAT_CASE(GL_RGBA16F
);
481 FORMAT_CASE(GL_R8UI
);
483 FORMAT_CASE(GL_RG8UI
);
484 FORMAT_CASE(GL_RG8I
);
485 FORMAT_CASE(GL_RGBA8UI
);
486 FORMAT_CASE(GL_RGBA8I
);
487 FORMAT_CASE(GL_R16UI
);
488 FORMAT_CASE(GL_R16I
);
489 FORMAT_CASE(GL_RG16UI
);
490 FORMAT_CASE(GL_RG16I
);
491 FORMAT_CASE(GL_RGBA16UI
);
492 FORMAT_CASE(GL_RGBA16I
);
493 FORMAT_CASE(GL_R11F_G11F_B10F
);
494 FORMAT_CASE(GL_RGB9_E5
);
495 FORMAT_CASE(GL_RGB10_A2
);
496 FORMAT_CASE(GL_RGB10_A2UI
);
497 default: /* Including the normal GL_NONE */
502 fprintf(fp
, "%s %s", glsl_get_type_name(var
->type
),
503 get_var_name(var
, state
));
505 if (var
->data
.mode
== nir_var_shader_in
||
506 var
->data
.mode
== nir_var_shader_out
||
507 var
->data
.mode
== nir_var_uniform
||
508 var
->data
.mode
== nir_var_ubo
||
509 var
->data
.mode
== nir_var_ssbo
) {
510 const char *loc
= NULL
;
513 switch (state
->shader
->info
.stage
) {
514 case MESA_SHADER_VERTEX
:
515 if (var
->data
.mode
== nir_var_shader_in
)
516 loc
= gl_vert_attrib_name(var
->data
.location
);
517 else if (var
->data
.mode
== nir_var_shader_out
)
518 loc
= gl_varying_slot_name(var
->data
.location
);
520 case MESA_SHADER_GEOMETRY
:
521 if ((var
->data
.mode
== nir_var_shader_in
) ||
522 (var
->data
.mode
== nir_var_shader_out
))
523 loc
= gl_varying_slot_name(var
->data
.location
);
525 case MESA_SHADER_FRAGMENT
:
526 if (var
->data
.mode
== nir_var_shader_in
)
527 loc
= gl_varying_slot_name(var
->data
.location
);
528 else if (var
->data
.mode
== nir_var_shader_out
)
529 loc
= gl_frag_result_name(var
->data
.location
);
531 case MESA_SHADER_TESS_CTRL
:
532 case MESA_SHADER_TESS_EVAL
:
533 case MESA_SHADER_COMPUTE
:
540 snprintf(buf
, sizeof(buf
), "%u", var
->data
.location
);
544 /* For shader I/O vars that have been split to components or packed,
545 * print the fractional location within the input/output.
547 unsigned int num_components
=
548 glsl_get_components(glsl_without_array(var
->type
));
549 const char *components
= NULL
;
550 char components_local
[6] = {'.' /* the rest is 0-filled */};
551 switch (var
->data
.mode
) {
552 case nir_var_shader_in
:
553 case nir_var_shader_out
:
554 if (num_components
< 4 && num_components
!= 0) {
555 const char *xyzw
= "xyzw";
556 for (int i
= 0; i
< num_components
; i
++)
557 components_local
[i
+ 1] = xyzw
[i
+ var
->data
.location_frac
];
559 components
= components_local
;
566 fprintf(fp
, " (%s%s, %u, %u)%s", loc
,
567 components
? components
: "",
568 var
->data
.driver_location
, var
->data
.binding
,
569 var
->data
.compact
? " compact" : "");
572 if (var
->constant_initializer
) {
573 fprintf(fp
, " = { ");
574 print_constant(var
->constant_initializer
, var
->type
, state
);
579 print_annotation(state
, var
);
583 print_deref_link(const nir_deref_instr
*instr
, bool whole_chain
, print_state
*state
)
585 FILE *fp
= state
->fp
;
587 if (instr
->deref_type
== nir_deref_type_var
) {
588 fprintf(fp
, "%s", get_var_name(instr
->var
, state
));
590 } else if (instr
->deref_type
== nir_deref_type_cast
) {
591 fprintf(fp
, "(%s *)", glsl_get_type_name(instr
->type
));
592 print_src(&instr
->parent
, state
);
596 assert(instr
->parent
.is_ssa
);
597 nir_deref_instr
*parent
=
598 nir_instr_as_deref(instr
->parent
.ssa
->parent_instr
);
600 /* Is the parent we're going to print a bare cast? */
601 const bool is_parent_cast
=
602 whole_chain
&& parent
->deref_type
== nir_deref_type_cast
;
604 /* If we're not printing the whole chain, the parent we print will be a SSA
605 * value that represents a pointer. The only deref type that naturally
606 * gives a pointer is a cast.
608 const bool is_parent_pointer
=
609 !whole_chain
|| parent
->deref_type
== nir_deref_type_cast
;
611 /* Struct derefs have a nice syntax that works on pointers, arrays derefs
614 const bool need_deref
=
615 is_parent_pointer
&& instr
->deref_type
!= nir_deref_type_struct
;
617 /* Cast need extra parens and so * dereferences */
618 if (is_parent_cast
|| need_deref
)
625 print_deref_link(parent
, whole_chain
, state
);
627 print_src(&instr
->parent
, state
);
630 if (is_parent_cast
|| need_deref
)
633 switch (instr
->deref_type
) {
634 case nir_deref_type_struct
:
635 fprintf(fp
, "%s%s", is_parent_pointer
? "->" : ".",
636 glsl_get_struct_elem_name(parent
->type
, instr
->strct
.index
));
639 case nir_deref_type_array
:
640 case nir_deref_type_ptr_as_array
: {
641 nir_const_value
*const_index
= nir_src_as_const_value(instr
->arr
.index
);
643 fprintf(fp
, "[%u]", const_index
->u32
[0]);
646 print_src(&instr
->arr
.index
, state
);
652 case nir_deref_type_array_wildcard
:
657 unreachable("Invalid deref instruction type");
662 print_deref_instr(nir_deref_instr
*instr
, print_state
*state
)
664 FILE *fp
= state
->fp
;
666 print_dest(&instr
->dest
, state
);
668 switch (instr
->deref_type
) {
669 case nir_deref_type_var
:
670 fprintf(fp
, " = deref_var ");
672 case nir_deref_type_array
:
673 case nir_deref_type_array_wildcard
:
674 fprintf(fp
, " = deref_array ");
676 case nir_deref_type_struct
:
677 fprintf(fp
, " = deref_struct ");
679 case nir_deref_type_cast
:
680 fprintf(fp
, " = deref_cast ");
682 case nir_deref_type_ptr_as_array
:
683 fprintf(fp
, " = deref_ptr_as_array ");
686 unreachable("Invalid deref instruction type");
689 /* Only casts naturally return a pointer type */
690 if (instr
->deref_type
!= nir_deref_type_cast
)
693 print_deref_link(instr
, false, state
);
695 fprintf(fp
, " (%s %s) ",
696 get_variable_mode_str(instr
->mode
, true),
697 glsl_get_type_name(instr
->type
));
699 if (instr
->deref_type
!= nir_deref_type_var
&&
700 instr
->deref_type
!= nir_deref_type_cast
) {
701 /* Print the entire chain as a comment */
703 print_deref_link(instr
, true, state
);
709 print_intrinsic_instr(nir_intrinsic_instr
*instr
, print_state
*state
)
711 const nir_intrinsic_info
*info
= &nir_intrinsic_infos
[instr
->intrinsic
];
712 unsigned num_srcs
= info
->num_srcs
;
713 FILE *fp
= state
->fp
;
715 if (info
->has_dest
) {
716 print_dest(&instr
->dest
, state
);
720 fprintf(fp
, "intrinsic %s (", info
->name
);
722 for (unsigned i
= 0; i
< num_srcs
; i
++) {
726 print_src(&instr
->src
[i
], state
);
731 for (unsigned i
= 0; i
< info
->num_indices
; i
++) {
735 fprintf(fp
, "%d", instr
->const_index
[i
]);
740 static const char *index_name
[NIR_INTRINSIC_NUM_INDEX_FLAGS
] = {
741 [NIR_INTRINSIC_BASE
] = "base",
742 [NIR_INTRINSIC_WRMASK
] = "wrmask",
743 [NIR_INTRINSIC_STREAM_ID
] = "stream-id",
744 [NIR_INTRINSIC_UCP_ID
] = "ucp-id",
745 [NIR_INTRINSIC_RANGE
] = "range",
746 [NIR_INTRINSIC_DESC_SET
] = "desc-set",
747 [NIR_INTRINSIC_BINDING
] = "binding",
748 [NIR_INTRINSIC_COMPONENT
] = "component",
749 [NIR_INTRINSIC_INTERP_MODE
] = "interp_mode",
750 [NIR_INTRINSIC_REDUCTION_OP
] = "reduction_op",
751 [NIR_INTRINSIC_CLUSTER_SIZE
] = "cluster_size",
752 [NIR_INTRINSIC_PARAM_IDX
] = "param_idx",
753 [NIR_INTRINSIC_IMAGE_DIM
] = "image_dim",
754 [NIR_INTRINSIC_IMAGE_ARRAY
] = "image_array",
755 [NIR_INTRINSIC_ACCESS
] = "access",
756 [NIR_INTRINSIC_FORMAT
] = "format",
757 [NIR_INTRINSIC_ALIGN_MUL
] = "align_mul",
758 [NIR_INTRINSIC_ALIGN_OFFSET
] = "align_offset",
760 for (unsigned idx
= 1; idx
< NIR_INTRINSIC_NUM_INDEX_FLAGS
; idx
++) {
761 if (!info
->index_map
[idx
])
764 if (idx
== NIR_INTRINSIC_WRMASK
) {
765 /* special case wrmask to show it as a writemask.. */
766 unsigned wrmask
= nir_intrinsic_write_mask(instr
);
767 fprintf(fp
, " wrmask=");
768 for (unsigned i
= 0; i
< 4; i
++)
769 if ((wrmask
>> i
) & 1)
770 fprintf(fp
, "%c", "xyzw"[i
]);
771 } else if (idx
== NIR_INTRINSIC_REDUCTION_OP
) {
772 nir_op reduction_op
= nir_intrinsic_reduction_op(instr
);
773 fprintf(fp
, " reduction_op=%s", nir_op_infos
[reduction_op
].name
);
774 } else if (idx
== NIR_INTRINSIC_IMAGE_DIM
) {
775 static const char *dim_name
[] = {
776 [GLSL_SAMPLER_DIM_1D
] = "1D",
777 [GLSL_SAMPLER_DIM_2D
] = "2D",
778 [GLSL_SAMPLER_DIM_3D
] = "3D",
779 [GLSL_SAMPLER_DIM_CUBE
] = "Cube",
780 [GLSL_SAMPLER_DIM_RECT
] = "Rect",
781 [GLSL_SAMPLER_DIM_BUF
] = "Buf",
782 [GLSL_SAMPLER_DIM_MS
] = "2D-MSAA",
783 [GLSL_SAMPLER_DIM_SUBPASS
] = "Subpass",
784 [GLSL_SAMPLER_DIM_SUBPASS_MS
] = "Subpass-MSAA",
786 enum glsl_sampler_dim dim
= nir_intrinsic_image_dim(instr
);
787 assert(dim
< ARRAY_SIZE(dim_name
) && dim_name
[dim
]);
788 fprintf(fp
, " image_dim=%s", dim_name
[dim
]);
789 } else if (idx
== NIR_INTRINSIC_IMAGE_ARRAY
) {
790 bool array
= nir_intrinsic_image_dim(instr
);
791 fprintf(fp
, " image_dim=%s", array
? "true" : "false");
793 unsigned off
= info
->index_map
[idx
] - 1;
794 assert(index_name
[idx
]); /* forgot to update index_name table? */
795 fprintf(fp
, " %s=%d", index_name
[idx
], instr
->const_index
[off
]);
803 struct exec_list
*var_list
= NULL
;
805 switch (instr
->intrinsic
) {
806 case nir_intrinsic_load_uniform
:
807 var_list
= &state
->shader
->uniforms
;
809 case nir_intrinsic_load_input
:
810 case nir_intrinsic_load_per_vertex_input
:
811 var_list
= &state
->shader
->inputs
;
813 case nir_intrinsic_load_output
:
814 case nir_intrinsic_store_output
:
815 case nir_intrinsic_store_per_vertex_output
:
816 var_list
= &state
->shader
->outputs
;
822 nir_foreach_variable(var
, var_list
) {
823 if ((var
->data
.driver_location
== nir_intrinsic_base(instr
)) &&
824 (instr
->intrinsic
== nir_intrinsic_load_uniform
||
825 var
->data
.location_frac
== nir_intrinsic_component(instr
)) &&
827 fprintf(fp
, "\t/* %s */", var
->name
);
834 print_tex_instr(nir_tex_instr
*instr
, print_state
*state
)
836 FILE *fp
= state
->fp
;
838 print_dest(&instr
->dest
, state
);
858 case nir_texop_txf_ms
:
859 fprintf(fp
, "txf_ms ");
861 case nir_texop_txf_ms_mcs
:
862 fprintf(fp
, "txf_ms_mcs ");
873 case nir_texop_query_levels
:
874 fprintf(fp
, "query_levels ");
876 case nir_texop_texture_samples
:
877 fprintf(fp
, "texture_samples ");
879 case nir_texop_samples_identical
:
880 fprintf(fp
, "samples_identical ");
883 unreachable("Invalid texture operation");
887 bool has_texture_deref
= false, has_sampler_deref
= false;
888 for (unsigned i
= 0; i
< instr
->num_srcs
; i
++) {
889 print_src(&instr
->src
[i
].src
, state
);
893 switch(instr
->src
[i
].src_type
) {
894 case nir_tex_src_coord
:
895 fprintf(fp
, "(coord)");
897 case nir_tex_src_projector
:
898 fprintf(fp
, "(projector)");
900 case nir_tex_src_comparator
:
901 fprintf(fp
, "(comparator)");
903 case nir_tex_src_offset
:
904 fprintf(fp
, "(offset)");
906 case nir_tex_src_bias
:
907 fprintf(fp
, "(bias)");
909 case nir_tex_src_lod
:
910 fprintf(fp
, "(lod)");
912 case nir_tex_src_min_lod
:
913 fprintf(fp
, "(min_lod)");
915 case nir_tex_src_ms_index
:
916 fprintf(fp
, "(ms_index)");
918 case nir_tex_src_ms_mcs
:
919 fprintf(fp
, "(ms_mcs)");
921 case nir_tex_src_ddx
:
922 fprintf(fp
, "(ddx)");
924 case nir_tex_src_ddy
:
925 fprintf(fp
, "(ddy)");
927 case nir_tex_src_texture_deref
:
928 has_texture_deref
= true;
929 fprintf(fp
, "(texture_deref)");
931 case nir_tex_src_sampler_deref
:
932 has_sampler_deref
= true;
933 fprintf(fp
, "(sampler_deref)");
935 case nir_tex_src_texture_offset
:
936 fprintf(fp
, "(texture_offset)");
938 case nir_tex_src_sampler_offset
:
939 fprintf(fp
, "(sampler_offset)");
941 case nir_tex_src_plane
:
942 fprintf(fp
, "(plane)");
946 unreachable("Invalid texture source type");
953 if (instr
->op
== nir_texop_tg4
) {
954 fprintf(fp
, "%u (gather_component), ", instr
->component
);
957 if (!has_texture_deref
) {
958 fprintf(fp
, "%u (texture), ", instr
->texture_index
);
961 if (!has_sampler_deref
) {
962 fprintf(fp
, "%u (sampler), ", instr
->sampler_index
);
967 print_call_instr(nir_call_instr
*instr
, print_state
*state
)
969 FILE *fp
= state
->fp
;
971 fprintf(fp
, "call %s ", instr
->callee
->name
);
973 for (unsigned i
= 0; i
< instr
->num_params
; i
++) {
977 print_src(&instr
->params
[i
], state
);
982 print_load_const_instr(nir_load_const_instr
*instr
, print_state
*state
)
984 FILE *fp
= state
->fp
;
986 print_ssa_def(&instr
->def
, state
);
988 fprintf(fp
, " = load_const (");
990 for (unsigned i
= 0; i
< instr
->def
.num_components
; i
++) {
995 * we don't really know the type of the constant (if it will be used as a
996 * float or an int), so just print the raw constant in hex for fidelity
997 * and then print the float in a comment for readability.
1000 switch (instr
->def
.bit_size
) {
1002 fprintf(fp
, "0x%16" PRIx64
" /* %f */", instr
->value
.u64
[i
],
1003 instr
->value
.f64
[i
]);
1006 fprintf(fp
, "0x%08x /* %f */", instr
->value
.u32
[i
], instr
->value
.f32
[i
]);
1009 fprintf(fp
, "0x%04x /* %f */", instr
->value
.u16
[i
],
1010 _mesa_half_to_float(instr
->value
.u16
[i
]));
1013 fprintf(fp
, "0x%02x", instr
->value
.u8
[i
]);
1016 fprintf(fp
, "%s", instr
->value
.b
[i
] ? "true" : "false");
1025 print_jump_instr(nir_jump_instr
*instr
, print_state
*state
)
1027 FILE *fp
= state
->fp
;
1029 switch (instr
->type
) {
1030 case nir_jump_break
:
1031 fprintf(fp
, "break");
1034 case nir_jump_continue
:
1035 fprintf(fp
, "continue");
1038 case nir_jump_return
:
1039 fprintf(fp
, "return");
1045 print_ssa_undef_instr(nir_ssa_undef_instr
* instr
, print_state
*state
)
1047 FILE *fp
= state
->fp
;
1048 print_ssa_def(&instr
->def
, state
);
1049 fprintf(fp
, " = undefined");
1053 print_phi_instr(nir_phi_instr
*instr
, print_state
*state
)
1055 FILE *fp
= state
->fp
;
1056 print_dest(&instr
->dest
, state
);
1057 fprintf(fp
, " = phi ");
1058 nir_foreach_phi_src(src
, instr
) {
1059 if (&src
->node
!= exec_list_get_head(&instr
->srcs
))
1062 fprintf(fp
, "block_%u: ", src
->pred
->index
);
1063 print_src(&src
->src
, state
);
1068 print_parallel_copy_instr(nir_parallel_copy_instr
*instr
, print_state
*state
)
1070 FILE *fp
= state
->fp
;
1071 nir_foreach_parallel_copy_entry(entry
, instr
) {
1072 if (&entry
->node
!= exec_list_get_head(&instr
->entries
))
1075 print_dest(&entry
->dest
, state
);
1077 print_src(&entry
->src
, state
);
1082 print_instr(const nir_instr
*instr
, print_state
*state
, unsigned tabs
)
1084 FILE *fp
= state
->fp
;
1085 print_tabs(tabs
, fp
);
1087 switch (instr
->type
) {
1088 case nir_instr_type_alu
:
1089 print_alu_instr(nir_instr_as_alu(instr
), state
);
1092 case nir_instr_type_deref
:
1093 print_deref_instr(nir_instr_as_deref(instr
), state
);
1096 case nir_instr_type_call
:
1097 print_call_instr(nir_instr_as_call(instr
), state
);
1100 case nir_instr_type_intrinsic
:
1101 print_intrinsic_instr(nir_instr_as_intrinsic(instr
), state
);
1104 case nir_instr_type_tex
:
1105 print_tex_instr(nir_instr_as_tex(instr
), state
);
1108 case nir_instr_type_load_const
:
1109 print_load_const_instr(nir_instr_as_load_const(instr
), state
);
1112 case nir_instr_type_jump
:
1113 print_jump_instr(nir_instr_as_jump(instr
), state
);
1116 case nir_instr_type_ssa_undef
:
1117 print_ssa_undef_instr(nir_instr_as_ssa_undef(instr
), state
);
1120 case nir_instr_type_phi
:
1121 print_phi_instr(nir_instr_as_phi(instr
), state
);
1124 case nir_instr_type_parallel_copy
:
1125 print_parallel_copy_instr(nir_instr_as_parallel_copy(instr
), state
);
1129 unreachable("Invalid instruction type");
1135 compare_block_index(const void *p1
, const void *p2
)
1137 const nir_block
*block1
= *((const nir_block
**) p1
);
1138 const nir_block
*block2
= *((const nir_block
**) p2
);
1140 return (int) block1
->index
- (int) block2
->index
;
1143 static void print_cf_node(nir_cf_node
*node
, print_state
*state
,
1147 print_block(nir_block
*block
, print_state
*state
, unsigned tabs
)
1149 FILE *fp
= state
->fp
;
1151 print_tabs(tabs
, fp
);
1152 fprintf(fp
, "block block_%u:\n", block
->index
);
1154 /* sort the predecessors by index so we consistently print the same thing */
1157 malloc(block
->predecessors
->entries
* sizeof(nir_block
*));
1160 set_foreach(block
->predecessors
, entry
) {
1161 preds
[i
++] = (nir_block
*) entry
->key
;
1164 qsort(preds
, block
->predecessors
->entries
, sizeof(nir_block
*),
1165 compare_block_index
);
1167 print_tabs(tabs
, fp
);
1168 fprintf(fp
, "/* preds: ");
1169 for (unsigned i
= 0; i
< block
->predecessors
->entries
; i
++) {
1170 fprintf(fp
, "block_%u ", preds
[i
]->index
);
1172 fprintf(fp
, "*/\n");
1176 nir_foreach_instr(instr
, block
) {
1177 print_instr(instr
, state
, tabs
);
1179 print_annotation(state
, instr
);
1182 print_tabs(tabs
, fp
);
1183 fprintf(fp
, "/* succs: ");
1184 for (unsigned i
= 0; i
< 2; i
++)
1185 if (block
->successors
[i
]) {
1186 fprintf(fp
, "block_%u ", block
->successors
[i
]->index
);
1188 fprintf(fp
, "*/\n");
1192 print_if(nir_if
*if_stmt
, print_state
*state
, unsigned tabs
)
1194 FILE *fp
= state
->fp
;
1196 print_tabs(tabs
, fp
);
1198 print_src(&if_stmt
->condition
, state
);
1199 fprintf(fp
, " {\n");
1200 foreach_list_typed(nir_cf_node
, node
, node
, &if_stmt
->then_list
) {
1201 print_cf_node(node
, state
, tabs
+ 1);
1203 print_tabs(tabs
, fp
);
1204 fprintf(fp
, "} else {\n");
1205 foreach_list_typed(nir_cf_node
, node
, node
, &if_stmt
->else_list
) {
1206 print_cf_node(node
, state
, tabs
+ 1);
1208 print_tabs(tabs
, fp
);
1213 print_loop(nir_loop
*loop
, print_state
*state
, unsigned tabs
)
1215 FILE *fp
= state
->fp
;
1217 print_tabs(tabs
, fp
);
1218 fprintf(fp
, "loop {\n");
1219 foreach_list_typed(nir_cf_node
, node
, node
, &loop
->body
) {
1220 print_cf_node(node
, state
, tabs
+ 1);
1222 print_tabs(tabs
, fp
);
1227 print_cf_node(nir_cf_node
*node
, print_state
*state
, unsigned int tabs
)
1229 switch (node
->type
) {
1230 case nir_cf_node_block
:
1231 print_block(nir_cf_node_as_block(node
), state
, tabs
);
1234 case nir_cf_node_if
:
1235 print_if(nir_cf_node_as_if(node
), state
, tabs
);
1238 case nir_cf_node_loop
:
1239 print_loop(nir_cf_node_as_loop(node
), state
, tabs
);
1243 unreachable("Invalid CFG node type");
1248 print_function_impl(nir_function_impl
*impl
, print_state
*state
)
1250 FILE *fp
= state
->fp
;
1252 fprintf(fp
, "\nimpl %s ", impl
->function
->name
);
1256 nir_foreach_variable(var
, &impl
->locals
) {
1258 print_var_decl(var
, state
);
1261 foreach_list_typed(nir_register
, reg
, node
, &impl
->registers
) {
1263 print_register_decl(reg
, state
);
1266 nir_index_blocks(impl
);
1268 foreach_list_typed(nir_cf_node
, node
, node
, &impl
->body
) {
1269 print_cf_node(node
, state
, 1);
1272 fprintf(fp
, "\tblock block_%u:\n}\n\n", impl
->end_block
->index
);
1276 print_function(nir_function
*function
, print_state
*state
)
1278 FILE *fp
= state
->fp
;
1280 fprintf(fp
, "decl_function %s (%d params)", function
->name
,
1281 function
->num_params
);
1285 if (function
->impl
!= NULL
) {
1286 print_function_impl(function
->impl
, state
);
1292 init_print_state(print_state
*state
, nir_shader
*shader
, FILE *fp
)
1295 state
->shader
= shader
;
1296 state
->ht
= _mesa_hash_table_create(NULL
, _mesa_hash_pointer
,
1297 _mesa_key_pointer_equal
);
1298 state
->syms
= _mesa_set_create(NULL
, _mesa_key_hash_string
,
1299 _mesa_key_string_equal
);
1304 destroy_print_state(print_state
*state
)
1306 _mesa_hash_table_destroy(state
->ht
, NULL
);
1307 _mesa_set_destroy(state
->syms
, NULL
);
1311 nir_print_shader_annotated(nir_shader
*shader
, FILE *fp
,
1312 struct hash_table
*annotations
)
1315 init_print_state(&state
, shader
, fp
);
1317 state
.annotations
= annotations
;
1319 fprintf(fp
, "shader: %s\n", gl_shader_stage_name(shader
->info
.stage
));
1321 if (shader
->info
.name
)
1322 fprintf(fp
, "name: %s\n", shader
->info
.name
);
1324 if (shader
->info
.label
)
1325 fprintf(fp
, "label: %s\n", shader
->info
.label
);
1327 switch (shader
->info
.stage
) {
1328 case MESA_SHADER_COMPUTE
:
1329 fprintf(fp
, "local-size: %u, %u, %u%s\n",
1330 shader
->info
.cs
.local_size
[0],
1331 shader
->info
.cs
.local_size
[1],
1332 shader
->info
.cs
.local_size
[2],
1333 shader
->info
.cs
.local_size_variable
? " (variable)" : "");
1334 fprintf(fp
, "shared-size: %u\n", shader
->info
.cs
.shared_size
);
1340 fprintf(fp
, "inputs: %u\n", shader
->num_inputs
);
1341 fprintf(fp
, "outputs: %u\n", shader
->num_outputs
);
1342 fprintf(fp
, "uniforms: %u\n", shader
->num_uniforms
);
1343 fprintf(fp
, "shared: %u\n", shader
->num_shared
);
1345 nir_foreach_variable(var
, &shader
->uniforms
) {
1346 print_var_decl(var
, &state
);
1349 nir_foreach_variable(var
, &shader
->inputs
) {
1350 print_var_decl(var
, &state
);
1353 nir_foreach_variable(var
, &shader
->outputs
) {
1354 print_var_decl(var
, &state
);
1357 nir_foreach_variable(var
, &shader
->shared
) {
1358 print_var_decl(var
, &state
);
1361 nir_foreach_variable(var
, &shader
->globals
) {
1362 print_var_decl(var
, &state
);
1365 nir_foreach_variable(var
, &shader
->system_values
) {
1366 print_var_decl(var
, &state
);
1369 foreach_list_typed(nir_register
, reg
, node
, &shader
->registers
) {
1370 print_register_decl(reg
, &state
);
1373 foreach_list_typed(nir_function
, func
, node
, &shader
->functions
) {
1374 print_function(func
, &state
);
1377 destroy_print_state(&state
);
1381 nir_print_shader(nir_shader
*shader
, FILE *fp
)
1383 nir_print_shader_annotated(shader
, fp
, NULL
);
1388 nir_print_instr(const nir_instr
*instr
, FILE *fp
)
1390 print_state state
= {
1393 print_instr(instr
, &state
, 0);
1398 nir_print_deref(const nir_deref_instr
*deref
, FILE *fp
)
1400 print_state state
= {
1403 print_deref_link(deref
, true, &state
);