nir/builder: Add an int64 immediate helper
[mesa.git] / src / compiler / nir / nir_builder.h
1 /*
2 * Copyright © 2014-2015 Broadcom
3 *
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:
10 *
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
13 * Software.
14 *
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
21 * IN THE SOFTWARE.
22 */
23
24 #ifndef NIR_BUILDER_H
25 #define NIR_BUILDER_H
26
27 #include "nir_control_flow.h"
28
29 struct exec_list;
30
31 typedef struct nir_builder {
32 nir_cursor cursor;
33
34 /* Whether new ALU instructions will be marked "exact" */
35 bool exact;
36
37 nir_shader *shader;
38 nir_function_impl *impl;
39 } nir_builder;
40
41 static inline void
42 nir_builder_init(nir_builder *build, nir_function_impl *impl)
43 {
44 memset(build, 0, sizeof(*build));
45 build->exact = false;
46 build->impl = impl;
47 build->shader = impl->function->shader;
48 }
49
50 static inline void
51 nir_builder_init_simple_shader(nir_builder *build, void *mem_ctx,
52 gl_shader_stage stage,
53 const nir_shader_compiler_options *options)
54 {
55 build->shader = nir_shader_create(mem_ctx, stage, options, NULL);
56 nir_function *func = nir_function_create(build->shader, "main");
57 build->exact = false;
58 build->impl = nir_function_impl_create(func);
59 build->cursor = nir_after_cf_list(&build->impl->body);
60 }
61
62 static inline void
63 nir_builder_instr_insert(nir_builder *build, nir_instr *instr)
64 {
65 nir_instr_insert(build->cursor, instr);
66
67 /* Move the cursor forward. */
68 build->cursor = nir_after_instr(instr);
69 }
70
71 static inline nir_instr *
72 nir_builder_last_instr(nir_builder *build)
73 {
74 assert(build->cursor.option == nir_cursor_after_instr);
75 return build->cursor.instr;
76 }
77
78 static inline void
79 nir_builder_cf_insert(nir_builder *build, nir_cf_node *cf)
80 {
81 nir_cf_node_insert(build->cursor, cf);
82 }
83
84 static inline bool
85 nir_builder_is_inside_cf(nir_builder *build, nir_cf_node *cf_node)
86 {
87 nir_block *block = nir_cursor_current_block(build->cursor);
88 for (nir_cf_node *n = &block->cf_node; n; n = n->parent) {
89 if (n == cf_node)
90 return true;
91 }
92 return false;
93 }
94
95 static inline nir_if *
96 nir_push_if(nir_builder *build, nir_ssa_def *condition)
97 {
98 nir_if *nif = nir_if_create(build->shader);
99 nif->condition = nir_src_for_ssa(condition);
100 nir_builder_cf_insert(build, &nif->cf_node);
101 build->cursor = nir_before_cf_list(&nif->then_list);
102 return nif;
103 }
104
105 static inline nir_if *
106 nir_push_else(nir_builder *build, nir_if *nif)
107 {
108 if (nif) {
109 assert(nir_builder_is_inside_cf(build, &nif->cf_node));
110 } else {
111 nir_block *block = nir_cursor_current_block(build->cursor);
112 nif = nir_cf_node_as_if(block->cf_node.parent);
113 }
114 build->cursor = nir_before_cf_list(&nif->else_list);
115 return nif;
116 }
117
118 static inline void
119 nir_pop_if(nir_builder *build, nir_if *nif)
120 {
121 if (nif) {
122 assert(nir_builder_is_inside_cf(build, &nif->cf_node));
123 } else {
124 nir_block *block = nir_cursor_current_block(build->cursor);
125 nif = nir_cf_node_as_if(block->cf_node.parent);
126 }
127 build->cursor = nir_after_cf_node(&nif->cf_node);
128 }
129
130 static inline nir_ssa_def *
131 nir_if_phi(nir_builder *build, nir_ssa_def *then_def, nir_ssa_def *else_def)
132 {
133 nir_block *block = nir_cursor_current_block(build->cursor);
134 nir_if *nif = nir_cf_node_as_if(nir_cf_node_prev(&block->cf_node));
135
136 nir_phi_instr *phi = nir_phi_instr_create(build->shader);
137
138 nir_phi_src *src = ralloc(phi, nir_phi_src);
139 src->pred = nir_if_last_then_block(nif);
140 src->src = nir_src_for_ssa(then_def);
141 exec_list_push_tail(&phi->srcs, &src->node);
142
143 src = ralloc(phi, nir_phi_src);
144 src->pred = nir_if_last_else_block(nif);
145 src->src = nir_src_for_ssa(else_def);
146 exec_list_push_tail(&phi->srcs, &src->node);
147
148 assert(then_def->num_components == else_def->num_components);
149 assert(then_def->bit_size == else_def->bit_size);
150 nir_ssa_dest_init(&phi->instr, &phi->dest,
151 then_def->num_components, then_def->bit_size, NULL);
152
153 nir_builder_instr_insert(build, &phi->instr);
154
155 return &phi->dest.ssa;
156 }
157
158 static inline nir_loop *
159 nir_push_loop(nir_builder *build)
160 {
161 nir_loop *loop = nir_loop_create(build->shader);
162 nir_builder_cf_insert(build, &loop->cf_node);
163 build->cursor = nir_before_cf_list(&loop->body);
164 return loop;
165 }
166
167 static inline void
168 nir_pop_loop(nir_builder *build, nir_loop *loop)
169 {
170 if (loop) {
171 assert(nir_builder_is_inside_cf(build, &loop->cf_node));
172 } else {
173 nir_block *block = nir_cursor_current_block(build->cursor);
174 loop = nir_cf_node_as_loop(block->cf_node.parent);
175 }
176 build->cursor = nir_after_cf_node(&loop->cf_node);
177 }
178
179 static inline nir_ssa_def *
180 nir_ssa_undef(nir_builder *build, unsigned num_components, unsigned bit_size)
181 {
182 nir_ssa_undef_instr *undef =
183 nir_ssa_undef_instr_create(build->shader, num_components, bit_size);
184 if (!undef)
185 return NULL;
186
187 nir_instr_insert(nir_before_cf_list(&build->impl->body), &undef->instr);
188
189 return &undef->def;
190 }
191
192 static inline nir_ssa_def *
193 nir_build_imm(nir_builder *build, unsigned num_components,
194 unsigned bit_size, nir_const_value value)
195 {
196 nir_load_const_instr *load_const =
197 nir_load_const_instr_create(build->shader, num_components, bit_size);
198 if (!load_const)
199 return NULL;
200
201 load_const->value = value;
202
203 nir_builder_instr_insert(build, &load_const->instr);
204
205 return &load_const->def;
206 }
207
208 static inline nir_ssa_def *
209 nir_imm_float(nir_builder *build, float x)
210 {
211 nir_const_value v;
212
213 memset(&v, 0, sizeof(v));
214 v.f32[0] = x;
215
216 return nir_build_imm(build, 1, 32, v);
217 }
218
219 static inline nir_ssa_def *
220 nir_imm_double(nir_builder *build, double x)
221 {
222 nir_const_value v;
223
224 memset(&v, 0, sizeof(v));
225 v.f64[0] = x;
226
227 return nir_build_imm(build, 1, 64, v);
228 }
229
230 static inline nir_ssa_def *
231 nir_imm_vec4(nir_builder *build, float x, float y, float z, float w)
232 {
233 nir_const_value v;
234
235 memset(&v, 0, sizeof(v));
236 v.f32[0] = x;
237 v.f32[1] = y;
238 v.f32[2] = z;
239 v.f32[3] = w;
240
241 return nir_build_imm(build, 4, 32, v);
242 }
243
244 static inline nir_ssa_def *
245 nir_imm_int(nir_builder *build, int x)
246 {
247 nir_const_value v;
248
249 memset(&v, 0, sizeof(v));
250 v.i32[0] = x;
251
252 return nir_build_imm(build, 1, 32, v);
253 }
254
255 static inline nir_ssa_def *
256 nir_imm_int64(nir_builder *build, int64_t x)
257 {
258 nir_const_value v;
259
260 memset(&v, 0, sizeof(v));
261 v.i64[0] = x;
262
263 return nir_build_imm(build, 1, 64, v);
264 }
265
266 static inline nir_ssa_def *
267 nir_imm_ivec4(nir_builder *build, int x, int y, int z, int w)
268 {
269 nir_const_value v;
270
271 memset(&v, 0, sizeof(v));
272 v.i32[0] = x;
273 v.i32[1] = y;
274 v.i32[2] = z;
275 v.i32[3] = w;
276
277 return nir_build_imm(build, 4, 32, v);
278 }
279
280 static inline nir_ssa_def *
281 nir_build_alu(nir_builder *build, nir_op op, nir_ssa_def *src0,
282 nir_ssa_def *src1, nir_ssa_def *src2, nir_ssa_def *src3)
283 {
284 const nir_op_info *op_info = &nir_op_infos[op];
285 nir_alu_instr *instr = nir_alu_instr_create(build->shader, op);
286 if (!instr)
287 return NULL;
288
289 instr->exact = build->exact;
290
291 instr->src[0].src = nir_src_for_ssa(src0);
292 if (src1)
293 instr->src[1].src = nir_src_for_ssa(src1);
294 if (src2)
295 instr->src[2].src = nir_src_for_ssa(src2);
296 if (src3)
297 instr->src[3].src = nir_src_for_ssa(src3);
298
299 /* Guess the number of components the destination temporary should have
300 * based on our input sizes, if it's not fixed for the op.
301 */
302 unsigned num_components = op_info->output_size;
303 if (num_components == 0) {
304 for (unsigned i = 0; i < op_info->num_inputs; i++) {
305 if (op_info->input_sizes[i] == 0)
306 num_components = MAX2(num_components,
307 instr->src[i].src.ssa->num_components);
308 }
309 }
310 assert(num_components != 0);
311
312 /* Figure out the bitwidth based on the source bitwidth if the instruction
313 * is variable-width.
314 */
315 unsigned bit_size = nir_alu_type_get_type_size(op_info->output_type);
316 if (bit_size == 0) {
317 for (unsigned i = 0; i < op_info->num_inputs; i++) {
318 unsigned src_bit_size = instr->src[i].src.ssa->bit_size;
319 if (nir_alu_type_get_type_size(op_info->input_types[i]) == 0) {
320 if (bit_size)
321 assert(src_bit_size == bit_size);
322 else
323 bit_size = src_bit_size;
324 } else {
325 assert(src_bit_size ==
326 nir_alu_type_get_type_size(op_info->input_types[i]));
327 }
328 }
329 }
330
331 /* Make sure we don't swizzle from outside of our source vector (like if a
332 * scalar value was passed into a multiply with a vector).
333 */
334 for (unsigned i = 0; i < op_info->num_inputs; i++) {
335 for (unsigned j = instr->src[i].src.ssa->num_components; j < 4; j++) {
336 instr->src[i].swizzle[j] = instr->src[i].src.ssa->num_components - 1;
337 }
338 }
339
340 nir_ssa_dest_init(&instr->instr, &instr->dest.dest, num_components,
341 bit_size, NULL);
342 instr->dest.write_mask = (1 << num_components) - 1;
343
344 nir_builder_instr_insert(build, &instr->instr);
345
346 return &instr->dest.dest.ssa;
347 }
348
349 #include "nir_builder_opcodes.h"
350
351 static inline nir_ssa_def *
352 nir_vec(nir_builder *build, nir_ssa_def **comp, unsigned num_components)
353 {
354 switch (num_components) {
355 case 4:
356 return nir_vec4(build, comp[0], comp[1], comp[2], comp[3]);
357 case 3:
358 return nir_vec3(build, comp[0], comp[1], comp[2]);
359 case 2:
360 return nir_vec2(build, comp[0], comp[1]);
361 case 1:
362 return comp[0];
363 default:
364 unreachable("bad component count");
365 return NULL;
366 }
367 }
368
369 /**
370 * Similar to nir_fmov, but takes a nir_alu_src instead of a nir_ssa_def.
371 */
372 static inline nir_ssa_def *
373 nir_fmov_alu(nir_builder *build, nir_alu_src src, unsigned num_components)
374 {
375 nir_alu_instr *mov = nir_alu_instr_create(build->shader, nir_op_fmov);
376 nir_ssa_dest_init(&mov->instr, &mov->dest.dest, num_components,
377 nir_src_bit_size(src.src), NULL);
378 mov->exact = build->exact;
379 mov->dest.write_mask = (1 << num_components) - 1;
380 mov->src[0] = src;
381 nir_builder_instr_insert(build, &mov->instr);
382
383 return &mov->dest.dest.ssa;
384 }
385
386 static inline nir_ssa_def *
387 nir_imov_alu(nir_builder *build, nir_alu_src src, unsigned num_components)
388 {
389 nir_alu_instr *mov = nir_alu_instr_create(build->shader, nir_op_imov);
390 nir_ssa_dest_init(&mov->instr, &mov->dest.dest, num_components,
391 nir_src_bit_size(src.src), NULL);
392 mov->exact = build->exact;
393 mov->dest.write_mask = (1 << num_components) - 1;
394 mov->src[0] = src;
395 nir_builder_instr_insert(build, &mov->instr);
396
397 return &mov->dest.dest.ssa;
398 }
399
400 /**
401 * Construct an fmov or imov that reswizzles the source's components.
402 */
403 static inline nir_ssa_def *
404 nir_swizzle(nir_builder *build, nir_ssa_def *src, const unsigned swiz[4],
405 unsigned num_components, bool use_fmov)
406 {
407 nir_alu_src alu_src = { NIR_SRC_INIT };
408 alu_src.src = nir_src_for_ssa(src);
409 for (unsigned i = 0; i < num_components; i++)
410 alu_src.swizzle[i] = swiz[i];
411
412 return use_fmov ? nir_fmov_alu(build, alu_src, num_components) :
413 nir_imov_alu(build, alu_src, num_components);
414 }
415
416 /* Selects the right fdot given the number of components in each source. */
417 static inline nir_ssa_def *
418 nir_fdot(nir_builder *build, nir_ssa_def *src0, nir_ssa_def *src1)
419 {
420 assert(src0->num_components == src1->num_components);
421 switch (src0->num_components) {
422 case 1: return nir_fmul(build, src0, src1);
423 case 2: return nir_fdot2(build, src0, src1);
424 case 3: return nir_fdot3(build, src0, src1);
425 case 4: return nir_fdot4(build, src0, src1);
426 default:
427 unreachable("bad component size");
428 }
429
430 return NULL;
431 }
432
433 static inline nir_ssa_def *
434 nir_bany_inequal(nir_builder *b, nir_ssa_def *src0, nir_ssa_def *src1)
435 {
436 switch (src0->num_components) {
437 case 1: return nir_ine(b, src0, src1);
438 case 2: return nir_bany_inequal2(b, src0, src1);
439 case 3: return nir_bany_inequal3(b, src0, src1);
440 case 4: return nir_bany_inequal4(b, src0, src1);
441 default:
442 unreachable("bad component size");
443 }
444 }
445
446 static inline nir_ssa_def *
447 nir_bany(nir_builder *b, nir_ssa_def *src)
448 {
449 return nir_bany_inequal(b, src, nir_imm_int(b, 0));
450 }
451
452 static inline nir_ssa_def *
453 nir_channel(nir_builder *b, nir_ssa_def *def, unsigned c)
454 {
455 unsigned swizzle[4] = {c, c, c, c};
456 return nir_swizzle(b, def, swizzle, 1, false);
457 }
458
459 static inline nir_ssa_def *
460 nir_channels(nir_builder *b, nir_ssa_def *def, unsigned mask)
461 {
462 unsigned num_channels = 0, swizzle[4] = { 0, 0, 0, 0 };
463
464 for (unsigned i = 0; i < 4; i++) {
465 if ((mask & (1 << i)) == 0)
466 continue;
467 swizzle[num_channels++] = i;
468 }
469
470 return nir_swizzle(b, def, swizzle, num_channels, false);
471 }
472
473 /**
474 * Turns a nir_src into a nir_ssa_def * so it can be passed to
475 * nir_build_alu()-based builder calls.
476 *
477 * See nir_ssa_for_alu_src() for alu instructions.
478 */
479 static inline nir_ssa_def *
480 nir_ssa_for_src(nir_builder *build, nir_src src, int num_components)
481 {
482 if (src.is_ssa && src.ssa->num_components == num_components)
483 return src.ssa;
484
485 nir_alu_src alu = { NIR_SRC_INIT };
486 alu.src = src;
487 for (int j = 0; j < 4; j++)
488 alu.swizzle[j] = j;
489
490 return nir_imov_alu(build, alu, num_components);
491 }
492
493 /**
494 * Similar to nir_ssa_for_src(), but for alu src's, respecting the
495 * nir_alu_src's swizzle.
496 */
497 static inline nir_ssa_def *
498 nir_ssa_for_alu_src(nir_builder *build, nir_alu_instr *instr, unsigned srcn)
499 {
500 static uint8_t trivial_swizzle[4] = { 0, 1, 2, 3 };
501 nir_alu_src *src = &instr->src[srcn];
502 unsigned num_components = nir_ssa_alu_instr_src_components(instr, srcn);
503
504 if (src->src.is_ssa && (src->src.ssa->num_components == num_components) &&
505 !src->abs && !src->negate &&
506 (memcmp(src->swizzle, trivial_swizzle, num_components) == 0))
507 return src->src.ssa;
508
509 return nir_imov_alu(build, *src, num_components);
510 }
511
512 static inline nir_ssa_def *
513 nir_load_var(nir_builder *build, nir_variable *var)
514 {
515 const unsigned num_components = glsl_get_vector_elements(var->type);
516
517 nir_intrinsic_instr *load =
518 nir_intrinsic_instr_create(build->shader, nir_intrinsic_load_var);
519 load->num_components = num_components;
520 load->variables[0] = nir_deref_var_create(load, var);
521 nir_ssa_dest_init(&load->instr, &load->dest, num_components,
522 glsl_get_bit_size(var->type), NULL);
523 nir_builder_instr_insert(build, &load->instr);
524 return &load->dest.ssa;
525 }
526
527 static inline nir_ssa_def *
528 nir_load_deref_var(nir_builder *build, nir_deref_var *deref)
529 {
530 const struct glsl_type *type = nir_deref_tail(&deref->deref)->type;
531 const unsigned num_components = glsl_get_vector_elements(type);
532
533 nir_intrinsic_instr *load =
534 nir_intrinsic_instr_create(build->shader, nir_intrinsic_load_var);
535 load->num_components = num_components;
536 load->variables[0] = nir_deref_var_clone(deref, load);
537 nir_ssa_dest_init(&load->instr, &load->dest, num_components,
538 glsl_get_bit_size(type), NULL);
539 nir_builder_instr_insert(build, &load->instr);
540 return &load->dest.ssa;
541 }
542
543 static inline void
544 nir_store_var(nir_builder *build, nir_variable *var, nir_ssa_def *value,
545 unsigned writemask)
546 {
547 const unsigned num_components = glsl_get_vector_elements(var->type);
548
549 nir_intrinsic_instr *store =
550 nir_intrinsic_instr_create(build->shader, nir_intrinsic_store_var);
551 store->num_components = num_components;
552 nir_intrinsic_set_write_mask(store, writemask);
553 store->variables[0] = nir_deref_var_create(store, var);
554 store->src[0] = nir_src_for_ssa(value);
555 nir_builder_instr_insert(build, &store->instr);
556 }
557
558 static inline void
559 nir_store_deref_var(nir_builder *build, nir_deref_var *deref,
560 nir_ssa_def *value, unsigned writemask)
561 {
562 const unsigned num_components =
563 glsl_get_vector_elements(nir_deref_tail(&deref->deref)->type);
564
565 nir_intrinsic_instr *store =
566 nir_intrinsic_instr_create(build->shader, nir_intrinsic_store_var);
567 store->num_components = num_components;
568 store->const_index[0] = writemask & ((1 << num_components) - 1);
569 store->variables[0] = nir_deref_var_clone(deref, store);
570 store->src[0] = nir_src_for_ssa(value);
571 nir_builder_instr_insert(build, &store->instr);
572 }
573
574 static inline void
575 nir_copy_deref_var(nir_builder *build, nir_deref_var *dest, nir_deref_var *src)
576 {
577 assert(nir_deref_tail(&dest->deref)->type ==
578 nir_deref_tail(&src->deref)->type);
579
580 nir_intrinsic_instr *copy =
581 nir_intrinsic_instr_create(build->shader, nir_intrinsic_copy_var);
582 copy->variables[0] = nir_deref_var_clone(dest, copy);
583 copy->variables[1] = nir_deref_var_clone(src, copy);
584 nir_builder_instr_insert(build, &copy->instr);
585 }
586
587 static inline void
588 nir_copy_var(nir_builder *build, nir_variable *dest, nir_variable *src)
589 {
590 nir_intrinsic_instr *copy =
591 nir_intrinsic_instr_create(build->shader, nir_intrinsic_copy_var);
592 copy->variables[0] = nir_deref_var_create(copy, dest);
593 copy->variables[1] = nir_deref_var_create(copy, src);
594 nir_builder_instr_insert(build, &copy->instr);
595 }
596
597 /* Generic builder for system values. */
598 static inline nir_ssa_def *
599 nir_load_system_value(nir_builder *build, nir_intrinsic_op op, int index)
600 {
601 nir_intrinsic_instr *load = nir_intrinsic_instr_create(build->shader, op);
602 load->num_components = nir_intrinsic_infos[op].dest_components;
603 load->const_index[0] = index;
604 nir_ssa_dest_init(&load->instr, &load->dest,
605 nir_intrinsic_infos[op].dest_components, 32, NULL);
606 nir_builder_instr_insert(build, &load->instr);
607 return &load->dest.ssa;
608 }
609
610 /* Generate custom builders for system values. */
611 #define INTRINSIC(name, num_srcs, src_components, has_dest, dest_components, \
612 num_variables, num_indices, idx0, idx1, idx2, flags)
613 #define LAST_INTRINSIC(name)
614
615 #define DEFINE_SYSTEM_VALUE(name) \
616 static inline nir_ssa_def * \
617 nir_load_##name(nir_builder *build) \
618 { \
619 return nir_load_system_value(build, nir_intrinsic_load_##name, 0); \
620 } \
621
622 #include "nir_intrinsics.h"
623
624 static inline nir_ssa_def *
625 nir_load_barycentric(nir_builder *build, nir_intrinsic_op op,
626 unsigned interp_mode)
627 {
628 nir_intrinsic_instr *bary = nir_intrinsic_instr_create(build->shader, op);
629 nir_ssa_dest_init(&bary->instr, &bary->dest, 2, 32, NULL);
630 nir_intrinsic_set_interp_mode(bary, interp_mode);
631 nir_builder_instr_insert(build, &bary->instr);
632 return &bary->dest.ssa;
633 }
634
635 static inline void
636 nir_jump(nir_builder *build, nir_jump_type jump_type)
637 {
638 nir_jump_instr *jump = nir_jump_instr_create(build->shader, jump_type);
639 nir_builder_instr_insert(build, &jump->instr);
640 }
641
642 #endif /* NIR_BUILDER_H */