2 * Copyright (C) 2019 Connor Abbott <cwabbott0@gmail.com>
3 * Copyright (C) 2019 Lyude Paul <thatslyude@gmail.com>
4 * Copyright (C) 2019 Ryan Houdek <Sonicadvance1@gmail.com>
5 * Copyright (C) 2019-2020 Collabora, Ltd.
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the "Software"),
9 * to deal in the Software without restriction, including without limitation
10 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
11 * and/or sell copies of the Software, and to permit persons to whom the
12 * Software is furnished to do so, subject to the following conditions:
14 * The above copyright notice and this permission notice (including the next
15 * paragraph) shall be included in all copies or substantial portions of the
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
30 bi_clause_type_name(enum bifrost_clause_type T
)
33 case BIFROST_CLAUSE_NONE
: return "";
34 case BIFROST_CLAUSE_LOAD_VARY
: return "load_vary";
35 case BIFROST_CLAUSE_UBO
: return "ubo";
36 case BIFROST_CLAUSE_TEX
: return "tex";
37 case BIFROST_CLAUSE_SSBO_LOAD
: return "load";
38 case BIFROST_CLAUSE_SSBO_STORE
: return "store";
39 case BIFROST_CLAUSE_BLEND
: return "blend";
40 case BIFROST_CLAUSE_FRAGZ
: return "fragz";
41 case BIFROST_CLAUSE_ATEST
: return "atest";
42 case BIFROST_CLAUSE_64BIT
: return "64";
48 bi_output_mod_name(enum bifrost_outmod mod
)
51 case BIFROST_NONE
: return "";
52 case BIFROST_POS
: return ".pos";
53 case BIFROST_SAT_SIGNED
: return ".sat_signed";
54 case BIFROST_SAT
: return ".sat";
55 default: return "invalid";
60 bi_minmax_mode_name(enum bifrost_minmax_mode mod
)
63 case BIFROST_MINMAX_NONE
: return "";
64 case BIFROST_NAN_WINS
: return ".nan_wins";
65 case BIFROST_SRC1_WINS
: return ".src1_wins";
66 case BIFROST_SRC0_WINS
: return ".src0_wins";
67 default: return "invalid";
72 bi_round_mode_name(enum bifrost_roundmode mod
)
75 case BIFROST_RTE
: return "";
76 case BIFROST_RTP
: return ".rtp";
77 case BIFROST_RTN
: return ".rtn";
78 case BIFROST_RTZ
: return ".rtz";
79 default: return "invalid";
84 bi_csel_cond_name(enum bifrost_csel_cond cond
)
87 case BIFROST_FEQ_F
: return "feq.f";
88 case BIFROST_FGT_F
: return "fgt.f";
89 case BIFROST_FGE_F
: return "fge.f";
90 case BIFROST_IEQ_F
: return "ieq.f";
91 case BIFROST_IGT_I
: return "igt.i";
92 case BIFROST_IGE_I
: return "uge.i";
93 case BIFROST_UGT_I
: return "ugt.i";
94 case BIFROST_UGE_I
: return "uge.i";
95 default: return "invalid";
100 bi_interp_mode_name(enum bifrost_interp_mode mode
)
103 case BIFROST_INTERP_PER_FRAG
: return ".per_frag";
104 case BIFROST_INTERP_CENTROID
: return ".centroid";
105 case BIFROST_INTERP_DEFAULT
: return "";
106 case BIFROST_INTERP_EXPLICIT
: return ".explicit";
107 default: return ".unknown";
112 bi_ldst_type_name(enum bifrost_ldst_type type
)
115 case BIFROST_LDST_F16
: return "f16";
116 case BIFROST_LDST_F32
: return "f32";
117 case BIFROST_LDST_I32
: return "i32";
118 case BIFROST_LDST_U32
: return "u32";
119 default: return "invalid";
123 /* The remaining functions in this file are for IR-internal
124 * structures; the disassembler doesn't use them */
127 bi_class_name(enum bi_class cl
)
130 case BI_ADD
: return "add";
131 case BI_ATEST
: return "atest";
132 case BI_BRANCH
: return "branch";
133 case BI_CMP
: return "cmp";
134 case BI_BLEND
: return "blend";
135 case BI_BITWISE
: return "bitwise";
136 case BI_COMBINE
: return "combine";
137 case BI_CONVERT
: return "convert";
138 case BI_CSEL
: return "csel";
139 case BI_DISCARD
: return "discard";
140 case BI_FMA
: return "fma";
141 case BI_FMOV
: return "fmov";
142 case BI_FREXP
: return "frexp";
143 case BI_IMATH
: return "imath";
144 case BI_LOAD
: return "load";
145 case BI_LOAD_UNIFORM
: return "load_uniform";
146 case BI_LOAD_ATTR
: return "load_attr";
147 case BI_LOAD_VAR
: return "load_var";
148 case BI_LOAD_VAR_ADDRESS
: return "load_var_address";
149 case BI_MINMAX
: return "minmax";
150 case BI_MOV
: return "mov";
151 case BI_SELECT
: return "select";
152 case BI_STORE
: return "store";
153 case BI_STORE_VAR
: return "store_var";
154 case BI_SPECIAL
: return "special";
155 case BI_TABLE
: return "table";
156 case BI_TEX
: return "tex";
157 case BI_ROUND
: return "round";
158 default: return "unknown_class";
163 bi_print_dest_index(FILE *fp
, bi_instruction
*ins
, unsigned index
)
167 else if (index
& BIR_INDEX_REGISTER
)
168 fprintf(fp
, "br%u", index
& ~BIR_INDEX_REGISTER
);
169 else if (index
& PAN_IS_REG
)
170 fprintf(fp
, "r%u", index
>> 1);
171 else if (!(index
& BIR_SPECIAL
))
172 fprintf(fp
, "%u", (index
>> 1) - 1);
180 bi_print_index(FILE *fp
, bi_instruction
*ins
, unsigned index
, unsigned s
)
182 if (bi_print_dest_index(fp
, ins
, index
))
185 if (index
& BIR_INDEX_UNIFORM
)
186 fprintf(fp
, "u%u", index
& ~BIR_INDEX_UNIFORM
);
187 else if (index
& BIR_INDEX_CONSTANT
)
188 fprintf(fp
, "#0x%" PRIx64
, bi_get_immediate(ins
, s
));
189 else if (index
& BIR_INDEX_ZERO
)
196 bi_print_src(FILE *fp
, bi_instruction
*ins
, unsigned s
)
198 unsigned src
= ins
->src
[s
];
199 bool mods
= bi_has_source_mods(ins
);
200 bool abs
= ins
->src_abs
[s
] && mods
;
201 bool neg
= ins
->src_neg
[s
] && mods
;
209 if (ins
->type
== BI_BITWISE
&& ins
->bitwise
.src_invert
[s
])
212 bi_print_index(fp
, ins
, src
, s
);
219 bi_print_swizzle(bi_instruction
*ins
, unsigned src
, FILE *fp
)
223 for (unsigned u
= 0; u
< bi_get_component_count(ins
, src
); ++u
) {
224 assert(ins
->swizzle
[src
][u
] < 4);
225 fputc("xyzw"[ins
->swizzle
[src
][u
]], fp
);
230 bi_bitwise_op_name(enum bi_bitwise_op op
)
233 case BI_BITWISE_AND
: return "and";
234 case BI_BITWISE_OR
: return "or";
235 case BI_BITWISE_XOR
: return "xor";
236 default: return "invalid";
241 bi_imath_op_name(enum bi_imath_op op
)
244 case BI_IMATH_ADD
: return "iadd";
245 case BI_IMATH_SUB
: return "isub";
246 default: return "invalid";
251 bi_table_op_name(enum bi_table_op op
)
254 case BI_TABLE_LOG2_U_OVER_U_1_LOW
: return "log2.help";
255 default: return "invalid";
260 bi_special_op_name(enum bi_special_op op
)
263 case BI_SPECIAL_FRCP
: return "frcp";
264 case BI_SPECIAL_FRSQ
: return "frsq";
265 case BI_SPECIAL_EXP2_LOW
: return "exp2_low";
266 default: return "invalid";
271 bi_reduce_op_name(enum bi_reduce_op op
)
274 case BI_REDUCE_ADD_FREXPM
: return "add_frexpm";
275 default: return "invalid";
280 bi_frexp_op_name(enum bi_frexp_op op
)
283 case BI_FREXPE_LOG
: return "frexpe_log";
284 default: return "invalid";
289 bi_tex_op_name(enum bi_tex_op op
)
292 case BI_TEX_NORMAL
: return "normal";
293 case BI_TEX_COMPACT
: return "compact";
294 case BI_TEX_DUAL
: return "dual";
295 default: return "invalid";
300 bi_print_load_vary(struct bi_load_vary
*load
, FILE *fp
)
302 fprintf(fp
, "%s", bi_interp_mode_name(load
->interp_mode
));
305 fprintf(fp
, ".reuse");
308 fprintf(fp
, ".flat");
312 bi_cond_name(enum bi_cond cond
)
315 case BI_COND_ALWAYS
: return "always";
316 case BI_COND_LT
: return "lt";
317 case BI_COND_LE
: return "le";
318 case BI_COND_GE
: return "ge";
319 case BI_COND_GT
: return "gt";
320 case BI_COND_EQ
: return "eq";
321 case BI_COND_NE
: return "ne";
322 default: return "invalid";
327 bi_print_texture(struct bi_texture
*tex
, FILE *fp
)
329 fprintf(fp
, " - texture %u, sampler %u",
330 tex
->texture_index
, tex
->sampler_index
);
334 bi_print_instruction(bi_instruction
*ins
, FILE *fp
)
336 if (ins
->type
== BI_MINMAX
)
337 fprintf(fp
, "%s", ins
->op
.minmax
== BI_MINMAX_MIN
? "min" : "max");
338 else if (ins
->type
== BI_BITWISE
)
339 fprintf(fp
, "%s", bi_bitwise_op_name(ins
->op
.bitwise
));
340 else if (ins
->type
== BI_IMATH
)
341 fprintf(fp
, "%s", bi_imath_op_name(ins
->op
.imath
));
342 else if (ins
->type
== BI_SPECIAL
)
343 fprintf(fp
, "%s", bi_special_op_name(ins
->op
.special
));
344 else if (ins
->type
== BI_TABLE
)
345 fprintf(fp
, "%s", bi_table_op_name(ins
->op
.table
));
346 else if (ins
->type
== BI_REDUCE_FMA
)
347 fprintf(fp
, "%s", bi_reduce_op_name(ins
->op
.reduce
));
348 else if (ins
->type
== BI_FREXP
)
349 fprintf(fp
, "%s", bi_frexp_op_name(ins
->op
.frexp
));
351 fprintf(fp
, "%s", bi_class_name(ins
->type
));
353 if ((ins
->type
== BI_ADD
|| ins
->type
== BI_FMA
) && ins
->op
.mscale
)
354 fprintf(fp
, ".mscale");
356 if (ins
->type
== BI_MINMAX
)
357 fprintf(fp
, "%s", bi_minmax_mode_name(ins
->minmax
));
358 else if (ins
->type
== BI_LOAD_VAR
)
359 bi_print_load_vary(&ins
->load_vary
, fp
);
360 else if (ins
->type
== BI_BLEND
)
361 fprintf(fp
, ".loc%u", ins
->blend_location
);
362 else if (ins
->type
== BI_TEX
) {
363 fprintf(fp
, ".%s", bi_tex_op_name(ins
->op
.texture
));
364 } else if (ins
->type
== BI_BITWISE
)
365 fprintf(fp
, ".%cshift", ins
->bitwise
.rshift
? 'r' : 'l');
367 if (bi_class_props
[ins
->type
] & BI_CONDITIONAL
)
368 fprintf(fp
, ".%s", bi_cond_name(ins
->cond
));
370 if (ins
->vector_channels
)
371 fprintf(fp
, ".v%u", ins
->vector_channels
);
374 pan_print_alu_type(ins
->dest_type
, fp
);
376 if (bi_has_outmod(ins
))
377 fprintf(fp
, "%s", bi_output_mod_name(ins
->outmod
));
379 if (bi_class_props
[ins
->type
] & BI_ROUNDMODE
)
380 fprintf(fp
, "%s", bi_round_mode_name(ins
->roundmode
));
383 bool succ
= bi_print_dest_index(fp
, ins
, ins
->dest
);
386 if (ins
->dest_offset
)
387 fprintf(fp
, "+%u", ins
->dest_offset
);
391 bi_foreach_src(ins
, s
) {
392 bi_print_src(fp
, ins
, s
);
394 if (ins
->src
[s
] && !(ins
->src
[s
] & (BIR_INDEX_CONSTANT
| BIR_INDEX_ZERO
))) {
395 pan_print_alu_type(ins
->src_types
[s
], fp
);
396 bi_print_swizzle(ins
, s
, fp
);
399 if (s
< BIR_SRC_COUNT
)
403 if (ins
->type
== BI_BRANCH
) {
404 if (ins
->branch_target
) {
405 fprintf(fp
, "-> block%u", ins
->branch_target
->base
.name
);
407 fprintf(fp
, "-> void");
409 } else if (ins
->type
== BI_TEX
) {
410 bi_print_texture(&ins
->texture
, fp
);
417 bi_print_ports(bi_registers
*regs
, FILE *fp
)
419 for (unsigned i
= 0; i
< 2; ++i
) {
420 if (regs
->enabled
[i
])
421 fprintf(fp
, "port %u: %u\n", i
, regs
->port
[i
]);
424 if (regs
->write_fma
|| regs
->write_add
) {
425 fprintf(fp
, "port 2 (%s): %u\n",
426 regs
->write_add
? "ADD" : "FMA",
430 if ((regs
->write_fma
&& regs
->write_add
) || regs
->read_port3
) {
431 fprintf(fp
, "port 3 (%s): %u\n",
432 regs
->read_port3
? "read" : "FMA",
438 bi_print_bundle(bi_bundle
*bundle
, FILE *fp
)
440 bi_instruction
*ins
[2] = { bundle
->fma
, bundle
->add
};
442 for (unsigned i
= 0; i
< 2; ++i
) {
444 bi_print_instruction(ins
[i
], fp
);
446 fprintf(fp
, "nop\n");
451 bi_print_clause(bi_clause
*clause
, FILE *fp
)
453 fprintf(fp
, "\tid(%u)", clause
->scoreboard_id
);
455 if (clause
->dependencies
) {
456 fprintf(fp
, ", wait(");
458 for (unsigned i
= 0; i
< 8; ++i
) {
459 if (clause
->dependencies
& (1 << i
))
460 fprintf(fp
, "%u ", i
);
466 if (!clause
->back_to_back
)
467 fprintf(fp
, " nbb %s", clause
->branch_conditional
? "branch-cond" : "branch-uncond");
469 if (clause
->data_register_write_barrier
)
470 fprintf(fp
, " drwb");
474 for (unsigned i
= 0; i
< clause
->bundle_count
; ++i
)
475 bi_print_bundle(&clause
->bundles
[i
], fp
);
477 if (clause
->constant_count
) {
478 for (unsigned i
= 0; i
< clause
->constant_count
; ++i
)
479 fprintf(fp
, "%" PRIx64
" ", clause
->constants
[i
]);
481 if (clause
->branch_constant
)
489 bi_print_block(bi_block
*block
, FILE *fp
)
491 fprintf(fp
, "block%u {\n", block
->base
.name
);
493 if (block
->scheduled
) {
494 bi_foreach_clause_in_block(block
, clause
)
495 bi_print_clause(clause
, fp
);
497 bi_foreach_instr_in_block(block
, ins
)
498 bi_print_instruction(ins
, fp
);
503 if (block
->base
.successors
[0]) {
506 pan_foreach_successor((&block
->base
), succ
)
507 fprintf(fp
, "block%u ", succ
->name
);
510 if (block
->base
.predecessors
->entries
) {
511 fprintf(fp
, " from");
513 bi_foreach_predecessor(block
, pred
)
514 fprintf(fp
, " block%u", pred
->base
.name
);
521 bi_print_shader(bi_context
*ctx
, FILE *fp
)
523 bi_foreach_block(ctx
, block
)
524 bi_print_block((bi_block
*) block
, fp
);