2 * Copyright (c) 2013 Rob Clark <robdclark@gmail.com>
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 FROM,
20 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
30 #include "instr-a3xx.h"
31 #include "disasm.h" /* TODO move 'enum shader_t' somewhere else.. */
33 /* low level intermediate representation of an adreno shader program */
36 struct ir3_instruction
;
39 struct ir3
* fd_asm_parse(const char *src
);
43 uint16_t instrs_count
; /* expanded to account for rpt's */
44 /* NOTE: max_reg, etc, does not include registers not touched
45 * by the shader (ie. vertex fetched via VFD_DECODE but not
48 int8_t max_reg
; /* highest GPR # used by shader */
55 IR3_REG_CONST
= 0x001,
56 IR3_REG_IMMED
= 0x002,
58 IR3_REG_RELATIV
= 0x008,
60 IR3_REG_NEGATE
= 0x020,
63 IR3_REG_POS_INF
= 0x100,
64 /* (ei) flag, end-input? Set on last bary, presumably to signal
65 * that the shader needs no more input:
68 /* meta-flags, for intermediate stages of IR, ie.
69 * before register assignment is done:
71 IR3_REG_SSA
= 0x1000, /* 'instr' is ptr to assigning instr */
72 IR3_REG_IA
= 0x2000, /* meta-input dst is "assigned" */
73 IR3_REG_ADDR
= 0x4000, /* register is a0.x */
77 * the component is in the low two bits of the reg #, so
78 * rN.x becomes: (N << 2) | x
86 /* for IR3_REG_SSA, src registers contain ptr back to
87 * assigning instruction.
89 struct ir3_instruction
*instr
;
92 /* used for cat5 instructions, but also for internal/IR level
93 * tracking of what registers are read/written by an instruction.
94 * wrmask may be a bad name since it is used to represent both
95 * src and dst that touch multiple adjacent registers.
100 struct ir3_instruction
{
101 struct ir3_block
*block
;
105 /* (sy) flag is set on first instruction, and after sample
106 * instructions (probably just on RAW hazard).
108 IR3_INSTR_SY
= 0x001,
109 /* (ss) flag is set on first instruction, and first instruction
110 * to depend on the result of "long" instructions (RAW hazard):
112 * rcp, rsq, log2, exp2, sin, cos, sqrt
114 * It seems to synchronize until all in-flight instructions are
115 * completed, for example:
118 * add.f hr2.z, (neg)hr2.z, hc0.y
119 * mul.f hr2.w, (neg)hr2.y, (neg)hr2.y
122 * mad.f16 hr2.w, hr2.z, hr2.z, hr2.w
124 * mad.f16 hr2.w, (neg)hr0.w, (neg)hr0.w, hr2.w
125 * (ss)(rpt2)mul.f hr1.x, (r)hr1.x, hr1.w
126 * (rpt2)mul.f hr0.x, (neg)(r)hr0.x, hr2.x
128 * The last mul.f does not have (ss) set, presumably because the
129 * (ss) on the previous instruction does the job.
131 * The blob driver also seems to set it on WAR hazards, although
132 * not really clear if this is needed or just blob compiler being
133 * sloppy. So far I haven't found a case where removing the (ss)
134 * causes problems for WAR hazard, but I could just be getting
138 * (ss)(rpt2)mad.f32 r3.y, (r)c9.x, r1.x, (r)r3.z
141 IR3_INSTR_SS
= 0x002,
142 /* (jp) flag is set on jump targets:
144 IR3_INSTR_JP
= 0x004,
145 IR3_INSTR_UL
= 0x008,
146 IR3_INSTR_3D
= 0x010,
151 IR3_INSTR_S2EN
= 0x200,
152 /* meta-flags, for intermediate stages of IR, ie.
153 * before register assignment is done:
155 IR3_INSTR_MARK
= 0x1000,
159 struct ir3_register
*regs
[5];
167 type_t src_type
, dst_type
;
188 /* for meta-instructions, just used to hold extra data
189 * before instruction scheduling, etc
192 int off
; /* component/offset */
195 struct ir3_block
*if_block
, *else_block
;
198 struct ir3_block
*block
;
202 /* transient values used during various algorithms: */
204 /* The instruction depth is the max dependency distance to output.
206 * You can also think of it as the "cost", if we did any sort of
207 * optimization for register footprint. Ie. a value that is just
208 * result of moving a const to a reg would have a low cost, so to
209 * it could make sense to duplicate the instruction at various
210 * points where the result is needed to reduce register footprint.
214 struct ir3_instruction
*next
;
220 struct ir3_heap_chunk
;
223 unsigned instrs_count
, instrs_sz
;
224 struct ir3_instruction
**instrs
;
226 struct ir3_heap_chunk
*chunk
;
231 unsigned ntemporaries
, ninputs
, noutputs
;
232 /* maps TGSI_FILE_TEMPORARY index back to the assigning instruction: */
233 struct ir3_instruction
**temporaries
;
234 struct ir3_instruction
**inputs
;
235 struct ir3_instruction
**outputs
;
236 /* only a single address register: */
237 struct ir3_instruction
*address
;
238 struct ir3_block
*parent
;
239 struct ir3_instruction
*head
;
242 struct ir3
* ir3_create(void);
243 void ir3_destroy(struct ir3
*shader
);
244 void * ir3_assemble(struct ir3
*shader
,
245 struct ir3_info
*info
);
246 void * ir3_alloc(struct ir3
*shader
, int sz
);
248 struct ir3_block
* ir3_block_create(struct ir3
*shader
,
249 unsigned ntmp
, unsigned nin
, unsigned nout
);
251 struct ir3_instruction
* ir3_instr_create(struct ir3_block
*block
,
252 int category
, opc_t opc
);
253 struct ir3_instruction
* ir3_instr_clone(struct ir3_instruction
*instr
);
254 const char *ir3_instr_name(struct ir3_instruction
*instr
);
256 struct ir3_register
* ir3_reg_create(struct ir3_instruction
*instr
,
260 static inline bool ir3_instr_check_mark(struct ir3_instruction
*instr
)
262 if (instr
->flags
& IR3_INSTR_MARK
)
263 return true; /* already visited */
264 instr
->flags
^= IR3_INSTR_MARK
;
268 static inline void ir3_clear_mark(struct ir3
*shader
)
270 /* TODO would be nice to drop the instruction array.. for
271 * new compiler, _clear_mark() is all we use it for, and
272 * we could probably manage a linked list instead..
275 for (i
= 0; i
< shader
->instrs_count
; i
++) {
276 struct ir3_instruction
*instr
= shader
->instrs
[i
];
277 instr
->flags
&= ~IR3_INSTR_MARK
;
281 static inline int ir3_instr_regno(struct ir3_instruction
*instr
,
282 struct ir3_register
*reg
)
285 for (i
= 0; i
< instr
->regs_count
; i
++)
286 if (reg
== instr
->regs
[i
])
298 static inline uint32_t regid(int num
, int comp
)
300 return (num
<< 2) | (comp
& 0x3);
303 static inline uint32_t reg_num(struct ir3_register
*reg
)
305 return reg
->num
>> 2;
308 static inline uint32_t reg_comp(struct ir3_register
*reg
)
310 return reg
->num
& 0x3;
313 static inline bool is_flow(struct ir3_instruction
*instr
)
315 return (instr
->category
== 0);
318 static inline bool is_kill(struct ir3_instruction
*instr
)
320 return is_flow(instr
) && (instr
->opc
== OPC_KILL
);
323 static inline bool is_nop(struct ir3_instruction
*instr
)
325 return is_flow(instr
) && (instr
->opc
== OPC_NOP
);
328 static inline bool is_alu(struct ir3_instruction
*instr
)
330 return (1 <= instr
->category
) && (instr
->category
<= 3);
333 static inline bool is_sfu(struct ir3_instruction
*instr
)
335 return (instr
->category
== 4);
338 static inline bool is_tex(struct ir3_instruction
*instr
)
340 return (instr
->category
== 5);
343 static inline bool is_input(struct ir3_instruction
*instr
)
345 return (instr
->category
== 2) && (instr
->opc
== OPC_BARY_F
);
348 static inline bool is_meta(struct ir3_instruction
*instr
)
350 /* TODO how should we count PHI (and maybe fan-in/out) which
351 * might actually contribute some instructions to the final
354 return (instr
->category
== -1);
357 static inline bool is_addr(struct ir3_instruction
*instr
)
359 return is_meta(instr
) && (instr
->opc
== OPC_META_DEREF
);
362 static inline bool writes_addr(struct ir3_instruction
*instr
)
364 if (instr
->regs_count
> 0) {
365 struct ir3_register
*dst
= instr
->regs
[0];
366 return !!(dst
->flags
& IR3_REG_ADDR
);
371 static inline bool writes_pred(struct ir3_instruction
*instr
)
373 if (instr
->regs_count
> 0) {
374 struct ir3_register
*dst
= instr
->regs
[0];
375 return reg_num(dst
) == REG_P0
;
380 static inline bool reg_gpr(struct ir3_register
*r
)
382 if (r
->flags
& (IR3_REG_CONST
| IR3_REG_IMMED
| IR3_REG_RELATIV
| IR3_REG_SSA
| IR3_REG_ADDR
))
384 if ((reg_num(r
) == REG_A0
) || (reg_num(r
) == REG_P0
))
391 void ir3_dump(struct ir3
*shader
, const char *name
,
392 struct ir3_block
*block
/* XXX maybe 'block' ptr should move to ir3? */,
394 void ir3_dump_instr_single(struct ir3_instruction
*instr
);
395 void ir3_dump_instr_list(struct ir3_instruction
*instr
);
397 /* flatten if/else: */
398 int ir3_block_flatten(struct ir3_block
*block
);
400 /* depth calculation: */
401 int ir3_delayslots(struct ir3_instruction
*assigner
,
402 struct ir3_instruction
*consumer
, unsigned n
);
403 void ir3_block_depth(struct ir3_block
*block
);
405 /* copy-propagate: */
406 void ir3_block_cp(struct ir3_block
*block
);
409 void ir3_block_sched(struct ir3_block
*block
);
411 /* register assignment: */
412 int ir3_block_ra(struct ir3_block
*block
, enum shader_t type
,
413 bool half_precision
, bool frag_coord
, bool frag_face
,
417 # define ARRAY_SIZE(arr) (sizeof(arr) / sizeof((arr)[0]))
420 /* ************************************************************************* */
421 /* split this out or find some helper to use.. like main/bitset.h.. */
427 typedef uint8_t regmask_t
[2 * MAX_REG
/ 8];
429 static inline unsigned regmask_idx(struct ir3_register
*reg
)
431 unsigned num
= reg
->num
;
432 assert(num
< MAX_REG
);
433 if (reg
->flags
& IR3_REG_HALF
)
438 static inline void regmask_init(regmask_t
*regmask
)
440 memset(regmask
, 0, sizeof(*regmask
));
443 static inline void regmask_set(regmask_t
*regmask
, struct ir3_register
*reg
)
445 unsigned idx
= regmask_idx(reg
);
447 for (i
= 0; i
< 4; i
++, idx
++)
448 if (reg
->wrmask
& (1 << i
))
449 (*regmask
)[idx
/ 8] |= 1 << (idx
% 8);
452 /* set bits in a if not set in b, conceptually:
455 static inline void regmask_set_if_not(regmask_t
*a
,
456 struct ir3_register
*reg
, regmask_t
*b
)
458 unsigned idx
= regmask_idx(reg
);
460 for (i
= 0; i
< 4; i
++, idx
++)
461 if (reg
->wrmask
& (1 << i
))
462 if (!((*b
)[idx
/ 8] & (1 << (idx
% 8))))
463 (*a
)[idx
/ 8] |= 1 << (idx
% 8);
466 static inline unsigned regmask_get(regmask_t
*regmask
,
467 struct ir3_register
*reg
)
469 unsigned idx
= regmask_idx(reg
);
471 for (i
= 0; i
< 4; i
++, idx
++)
472 if (reg
->wrmask
& (1 << i
))
473 if ((*regmask
)[idx
/ 8] & (1 << (idx
% 8)))
478 /* ************************************************************************* */