2 * Copyright 2016 Advanced Micro Devices, Inc.
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 * on the rights to use, copy, modify, merge, publish, distribute, sub
9 * license, and/or sell copies of the Software, and to permit persons to whom
10 * the 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 NON-INFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHOR(S) AND/OR THEIR SUPPLIERS BE LIABLE FOR ANY CLAIM,
20 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
21 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
22 * USE OR OTHER DEALINGS IN THE SOFTWARE.
25 #include "ac_nir_to_llvm.h"
28 #include "si_shader_internal.h"
30 #include "tgsi/tgsi_from_mesa.h"
31 #include "util/u_memory.h"
33 struct si_llvm_diagnostics
{
34 struct pipe_debug_callback
*debug
;
38 static void si_diagnostic_handler(LLVMDiagnosticInfoRef di
, void *context
)
40 struct si_llvm_diagnostics
*diag
= (struct si_llvm_diagnostics
*)context
;
41 LLVMDiagnosticSeverity severity
= LLVMGetDiagInfoSeverity(di
);
42 const char *severity_str
= NULL
;
46 severity_str
= "error";
49 severity_str
= "warning";
57 char *description
= LLVMGetDiagInfoDescription(di
);
59 pipe_debug_message(diag
->debug
, SHADER_INFO
, "LLVM diagnostic (%s): %s", severity_str
,
62 if (severity
== LLVMDSError
) {
64 fprintf(stderr
, "LLVM triggered Diagnostic Handler: %s\n", description
);
67 LLVMDisposeMessage(description
);
70 bool si_compile_llvm(struct si_screen
*sscreen
, struct si_shader_binary
*binary
,
71 struct ac_shader_config
*conf
, struct ac_llvm_compiler
*compiler
,
72 struct ac_llvm_context
*ac
, struct pipe_debug_callback
*debug
,
73 enum pipe_shader_type shader_type
, const char *name
, bool less_optimized
)
75 unsigned count
= p_atomic_inc_return(&sscreen
->num_compilations
);
77 if (si_can_dump_shader(sscreen
, shader_type
)) {
78 fprintf(stderr
, "radeonsi: Compiling shader %d\n", count
);
80 if (!(sscreen
->debug_flags
& (DBG(NO_IR
) | DBG(PREOPT_IR
)))) {
81 fprintf(stderr
, "%s LLVM IR:\n\n", name
);
82 ac_dump_module(ac
->module
);
83 fprintf(stderr
, "\n");
87 if (sscreen
->record_llvm_ir
) {
88 char *ir
= LLVMPrintModuleToString(ac
->module
);
89 binary
->llvm_ir_string
= strdup(ir
);
90 LLVMDisposeMessage(ir
);
93 if (!si_replace_shader(count
, binary
)) {
94 struct ac_compiler_passes
*passes
= compiler
->passes
;
96 if (ac
->wave_size
== 32)
97 passes
= compiler
->passes_wave32
;
98 else if (less_optimized
&& compiler
->low_opt_passes
)
99 passes
= compiler
->low_opt_passes
;
101 struct si_llvm_diagnostics diag
= {debug
};
102 LLVMContextSetDiagnosticHandler(ac
->context
, si_diagnostic_handler
, &diag
);
104 if (!ac_compile_module_to_elf(passes
, ac
->module
, (char **)&binary
->elf_buffer
,
108 if (diag
.retval
!= 0) {
109 pipe_debug_message(debug
, SHADER_INFO
, "LLVM compilation failed");
114 struct ac_rtld_binary rtld
;
115 if (!ac_rtld_open(&rtld
, (struct ac_rtld_open_info
){
116 .info
= &sscreen
->info
,
117 .shader_type
= tgsi_processor_to_shader_stage(shader_type
),
118 .wave_size
= ac
->wave_size
,
120 .elf_ptrs
= &binary
->elf_buffer
,
121 .elf_sizes
= &binary
->elf_size
}))
124 bool ok
= ac_rtld_read_config(&rtld
, conf
);
125 ac_rtld_close(&rtld
);
129 void si_llvm_context_init(struct si_shader_context
*ctx
, struct si_screen
*sscreen
,
130 struct ac_llvm_compiler
*compiler
, unsigned wave_size
)
132 memset(ctx
, 0, sizeof(*ctx
));
133 ctx
->screen
= sscreen
;
134 ctx
->compiler
= compiler
;
136 ac_llvm_context_init(&ctx
->ac
, compiler
, sscreen
->info
.chip_class
, sscreen
->info
.family
,
137 AC_FLOAT_MODE_DEFAULT_OPENGL
, wave_size
, 64);
140 void si_llvm_create_func(struct si_shader_context
*ctx
, const char *name
, LLVMTypeRef
*return_types
,
141 unsigned num_return_elems
, unsigned max_workgroup_size
)
143 LLVMTypeRef ret_type
;
144 enum ac_llvm_calling_convention call_conv
;
145 enum pipe_shader_type real_shader_type
;
147 if (num_return_elems
)
148 ret_type
= LLVMStructTypeInContext(ctx
->ac
.context
, return_types
, num_return_elems
, true);
150 ret_type
= ctx
->ac
.voidt
;
152 real_shader_type
= ctx
->type
;
154 /* LS is merged into HS (TCS), and ES is merged into GS. */
155 if (ctx
->screen
->info
.chip_class
>= GFX9
) {
156 if (ctx
->shader
->key
.as_ls
)
157 real_shader_type
= PIPE_SHADER_TESS_CTRL
;
158 else if (ctx
->shader
->key
.as_es
|| ctx
->shader
->key
.as_ngg
)
159 real_shader_type
= PIPE_SHADER_GEOMETRY
;
162 switch (real_shader_type
) {
163 case PIPE_SHADER_VERTEX
:
164 case PIPE_SHADER_TESS_EVAL
:
165 call_conv
= AC_LLVM_AMDGPU_VS
;
167 case PIPE_SHADER_TESS_CTRL
:
168 call_conv
= AC_LLVM_AMDGPU_HS
;
170 case PIPE_SHADER_GEOMETRY
:
171 call_conv
= AC_LLVM_AMDGPU_GS
;
173 case PIPE_SHADER_FRAGMENT
:
174 call_conv
= AC_LLVM_AMDGPU_PS
;
176 case PIPE_SHADER_COMPUTE
:
177 call_conv
= AC_LLVM_AMDGPU_CS
;
180 unreachable("Unhandle shader type");
183 /* Setup the function */
184 ctx
->return_type
= ret_type
;
185 ctx
->main_fn
= ac_build_main(&ctx
->args
, &ctx
->ac
, call_conv
, name
, ret_type
, ctx
->ac
.module
);
186 ctx
->return_value
= LLVMGetUndef(ctx
->return_type
);
188 if (ctx
->screen
->info
.address32_hi
) {
189 ac_llvm_add_target_dep_function_attr(ctx
->main_fn
, "amdgpu-32bit-address-high-bits",
190 ctx
->screen
->info
.address32_hi
);
193 LLVMAddTargetDependentFunctionAttr(ctx
->main_fn
, "no-signed-zeros-fp-math", "true");
195 ac_llvm_set_workgroup_size(ctx
->main_fn
, max_workgroup_size
);
198 void si_llvm_optimize_module(struct si_shader_context
*ctx
)
200 /* Dump LLVM IR before any optimization passes */
201 if (ctx
->screen
->debug_flags
& DBG(PREOPT_IR
) && si_can_dump_shader(ctx
->screen
, ctx
->type
))
202 LLVMDumpModule(ctx
->ac
.module
);
205 LLVMRunPassManager(ctx
->compiler
->passmgr
, ctx
->ac
.module
);
206 LLVMDisposeBuilder(ctx
->ac
.builder
);
209 void si_llvm_dispose(struct si_shader_context
*ctx
)
211 LLVMDisposeModule(ctx
->ac
.module
);
212 LLVMContextDispose(ctx
->ac
.context
);
213 ac_llvm_context_dispose(&ctx
->ac
);
217 * Load a dword from a constant buffer.
219 LLVMValueRef
si_buffer_load_const(struct si_shader_context
*ctx
, LLVMValueRef resource
,
222 return ac_build_buffer_load(&ctx
->ac
, resource
, 1, NULL
, offset
, NULL
, 0, 0, true, true);
225 void si_llvm_build_ret(struct si_shader_context
*ctx
, LLVMValueRef ret
)
227 if (LLVMGetTypeKind(LLVMTypeOf(ret
)) == LLVMVoidTypeKind
)
228 LLVMBuildRetVoid(ctx
->ac
.builder
);
230 LLVMBuildRet(ctx
->ac
.builder
, ret
);
233 LLVMValueRef
si_insert_input_ret(struct si_shader_context
*ctx
, LLVMValueRef ret
,
234 struct ac_arg param
, unsigned return_index
)
236 return LLVMBuildInsertValue(ctx
->ac
.builder
, ret
, ac_get_arg(&ctx
->ac
, param
), return_index
, "");
239 LLVMValueRef
si_insert_input_ret_float(struct si_shader_context
*ctx
, LLVMValueRef ret
,
240 struct ac_arg param
, unsigned return_index
)
242 LLVMBuilderRef builder
= ctx
->ac
.builder
;
243 LLVMValueRef p
= ac_get_arg(&ctx
->ac
, param
);
245 return LLVMBuildInsertValue(builder
, ret
, ac_to_float(&ctx
->ac
, p
), return_index
, "");
248 LLVMValueRef
si_insert_input_ptr(struct si_shader_context
*ctx
, LLVMValueRef ret
,
249 struct ac_arg param
, unsigned return_index
)
251 LLVMBuilderRef builder
= ctx
->ac
.builder
;
252 LLVMValueRef ptr
= ac_get_arg(&ctx
->ac
, param
);
253 ptr
= LLVMBuildPtrToInt(builder
, ptr
, ctx
->ac
.i32
, "");
254 return LLVMBuildInsertValue(builder
, ret
, ptr
, return_index
, "");
257 LLVMValueRef
si_prolog_get_rw_buffers(struct si_shader_context
*ctx
)
259 LLVMValueRef ptr
[2], list
;
260 bool merged_shader
= si_is_merged_shader(ctx
->shader
);
262 ptr
[0] = LLVMGetParam(ctx
->main_fn
, (merged_shader
? 8 : 0) + SI_SGPR_RW_BUFFERS
);
264 LLVMBuildIntToPtr(ctx
->ac
.builder
, ptr
[0], ac_array_in_const32_addr_space(ctx
->ac
.v4i32
), "");
268 LLVMValueRef
si_build_gather_64bit(struct si_shader_context
*ctx
, LLVMTypeRef type
,
269 LLVMValueRef val1
, LLVMValueRef val2
)
271 LLVMValueRef values
[2] = {
272 ac_to_integer(&ctx
->ac
, val1
),
273 ac_to_integer(&ctx
->ac
, val2
),
275 LLVMValueRef result
= ac_build_gather_values(&ctx
->ac
, values
, 2);
276 return LLVMBuildBitCast(ctx
->ac
.builder
, result
, type
, "");
279 void si_llvm_emit_barrier(struct si_shader_context
*ctx
)
281 /* GFX6 only (thanks to a hw bug workaround):
282 * The real barrier instruction isn’t needed, because an entire patch
283 * always fits into a single wave.
285 if (ctx
->screen
->info
.chip_class
== GFX6
&& ctx
->type
== PIPE_SHADER_TESS_CTRL
) {
286 ac_build_waitcnt(&ctx
->ac
, AC_WAIT_LGKM
| AC_WAIT_VLOAD
| AC_WAIT_VSTORE
);
290 ac_build_s_barrier(&ctx
->ac
);
293 /* Ensure that the esgs ring is declared.
295 * We declare it with 64KB alignment as a hint that the
296 * pointer value will always be 0.
298 void si_llvm_declare_esgs_ring(struct si_shader_context
*ctx
)
303 assert(!LLVMGetNamedGlobal(ctx
->ac
.module
, "esgs_ring"));
305 ctx
->esgs_ring
= LLVMAddGlobalInAddressSpace(ctx
->ac
.module
, LLVMArrayType(ctx
->ac
.i32
, 0),
306 "esgs_ring", AC_ADDR_SPACE_LDS
);
307 LLVMSetLinkage(ctx
->esgs_ring
, LLVMExternalLinkage
);
308 LLVMSetAlignment(ctx
->esgs_ring
, 64 * 1024);
311 void si_init_exec_from_input(struct si_shader_context
*ctx
, struct ac_arg param
, unsigned bitoffset
)
313 LLVMValueRef args
[] = {
314 ac_get_arg(&ctx
->ac
, param
),
315 LLVMConstInt(ctx
->ac
.i32
, bitoffset
, 0),
317 ac_build_intrinsic(&ctx
->ac
, "llvm.amdgcn.init.exec.from.input", ctx
->ac
.voidt
, args
, 2,
318 AC_FUNC_ATTR_CONVERGENT
);
322 * Get the value of a shader input parameter and extract a bitfield.
324 static LLVMValueRef
unpack_llvm_param(struct si_shader_context
*ctx
, LLVMValueRef value
,
325 unsigned rshift
, unsigned bitwidth
)
327 if (LLVMGetTypeKind(LLVMTypeOf(value
)) == LLVMFloatTypeKind
)
328 value
= ac_to_integer(&ctx
->ac
, value
);
331 value
= LLVMBuildLShr(ctx
->ac
.builder
, value
, LLVMConstInt(ctx
->ac
.i32
, rshift
, 0), "");
333 if (rshift
+ bitwidth
< 32) {
334 unsigned mask
= (1 << bitwidth
) - 1;
335 value
= LLVMBuildAnd(ctx
->ac
.builder
, value
, LLVMConstInt(ctx
->ac
.i32
, mask
, 0), "");
341 LLVMValueRef
si_unpack_param(struct si_shader_context
*ctx
, struct ac_arg param
, unsigned rshift
,
344 LLVMValueRef value
= ac_get_arg(&ctx
->ac
, param
);
346 return unpack_llvm_param(ctx
, value
, rshift
, bitwidth
);
349 LLVMValueRef
si_get_primitive_id(struct si_shader_context
*ctx
, unsigned swizzle
)
352 return ctx
->ac
.i32_0
;
355 case PIPE_SHADER_VERTEX
:
356 return ac_get_arg(&ctx
->ac
, ctx
->vs_prim_id
);
357 case PIPE_SHADER_TESS_CTRL
:
358 return ac_get_arg(&ctx
->ac
, ctx
->args
.tcs_patch_id
);
359 case PIPE_SHADER_TESS_EVAL
:
360 return ac_get_arg(&ctx
->ac
, ctx
->args
.tes_patch_id
);
361 case PIPE_SHADER_GEOMETRY
:
362 return ac_get_arg(&ctx
->ac
, ctx
->args
.gs_prim_id
);
365 return ctx
->ac
.i32_0
;
369 LLVMValueRef
si_llvm_get_block_size(struct ac_shader_abi
*abi
)
371 struct si_shader_context
*ctx
= si_shader_context_from_abi(abi
);
373 LLVMValueRef values
[3];
376 unsigned *properties
= ctx
->shader
->selector
->info
.properties
;
378 if (properties
[TGSI_PROPERTY_CS_FIXED_BLOCK_WIDTH
] != 0) {
379 unsigned sizes
[3] = {properties
[TGSI_PROPERTY_CS_FIXED_BLOCK_WIDTH
],
380 properties
[TGSI_PROPERTY_CS_FIXED_BLOCK_HEIGHT
],
381 properties
[TGSI_PROPERTY_CS_FIXED_BLOCK_DEPTH
]};
383 for (i
= 0; i
< 3; ++i
)
384 values
[i
] = LLVMConstInt(ctx
->ac
.i32
, sizes
[i
], 0);
386 result
= ac_build_gather_values(&ctx
->ac
, values
, 3);
388 result
= ac_get_arg(&ctx
->ac
, ctx
->block_size
);
394 void si_llvm_declare_compute_memory(struct si_shader_context
*ctx
)
396 struct si_shader_selector
*sel
= ctx
->shader
->selector
;
397 unsigned lds_size
= sel
->info
.properties
[TGSI_PROPERTY_CS_LOCAL_SIZE
];
399 LLVMTypeRef i8p
= LLVMPointerType(ctx
->ac
.i8
, AC_ADDR_SPACE_LDS
);
402 assert(!ctx
->ac
.lds
);
404 var
= LLVMAddGlobalInAddressSpace(ctx
->ac
.module
, LLVMArrayType(ctx
->ac
.i8
, lds_size
),
405 "compute_lds", AC_ADDR_SPACE_LDS
);
406 LLVMSetAlignment(var
, 64 * 1024);
408 ctx
->ac
.lds
= LLVMBuildBitCast(ctx
->ac
.builder
, var
, i8p
, "");
411 bool si_nir_build_llvm(struct si_shader_context
*ctx
, struct nir_shader
*nir
)
413 if (nir
->info
.stage
== MESA_SHADER_VERTEX
) {
414 si_llvm_load_vs_inputs(ctx
, nir
);
415 } else if (nir
->info
.stage
== MESA_SHADER_FRAGMENT
) {
416 unsigned colors_read
= ctx
->shader
->selector
->info
.colors_read
;
417 LLVMValueRef main_fn
= ctx
->main_fn
;
419 LLVMValueRef undef
= LLVMGetUndef(ctx
->ac
.f32
);
421 unsigned offset
= SI_PARAM_POS_FIXED_PT
+ 1;
423 if (colors_read
& 0x0f) {
424 unsigned mask
= colors_read
& 0x0f;
425 LLVMValueRef values
[4];
426 values
[0] = mask
& 0x1 ? LLVMGetParam(main_fn
, offset
++) : undef
;
427 values
[1] = mask
& 0x2 ? LLVMGetParam(main_fn
, offset
++) : undef
;
428 values
[2] = mask
& 0x4 ? LLVMGetParam(main_fn
, offset
++) : undef
;
429 values
[3] = mask
& 0x8 ? LLVMGetParam(main_fn
, offset
++) : undef
;
430 ctx
->abi
.color0
= ac_to_integer(&ctx
->ac
, ac_build_gather_values(&ctx
->ac
, values
, 4));
432 if (colors_read
& 0xf0) {
433 unsigned mask
= (colors_read
& 0xf0) >> 4;
434 LLVMValueRef values
[4];
435 values
[0] = mask
& 0x1 ? LLVMGetParam(main_fn
, offset
++) : undef
;
436 values
[1] = mask
& 0x2 ? LLVMGetParam(main_fn
, offset
++) : undef
;
437 values
[2] = mask
& 0x4 ? LLVMGetParam(main_fn
, offset
++) : undef
;
438 values
[3] = mask
& 0x8 ? LLVMGetParam(main_fn
, offset
++) : undef
;
439 ctx
->abi
.color1
= ac_to_integer(&ctx
->ac
, ac_build_gather_values(&ctx
->ac
, values
, 4));
442 ctx
->abi
.interp_at_sample_force_center
=
443 ctx
->shader
->key
.mono
.u
.ps
.interpolate_at_sample_force_center
;
445 ctx
->abi
.kill_ps_if_inf_interp
=
446 (ctx
->screen
->debug_flags
& DBG(KILL_PS_INF_INTERP
)) &&
447 (ctx
->shader
->selector
->info
.uses_persp_center
||
448 ctx
->shader
->selector
->info
.uses_persp_centroid
||
449 ctx
->shader
->selector
->info
.uses_persp_sample
);
451 } else if (nir
->info
.stage
== MESA_SHADER_COMPUTE
) {
452 if (nir
->info
.cs
.user_data_components_amd
) {
453 ctx
->abi
.user_data
= ac_get_arg(&ctx
->ac
, ctx
->cs_user_data
);
454 ctx
->abi
.user_data
= ac_build_expand_to_vec4(&ctx
->ac
, ctx
->abi
.user_data
,
455 nir
->info
.cs
.user_data_components_amd
);
459 ctx
->abi
.inputs
= &ctx
->inputs
[0];
460 ctx
->abi
.clamp_shadow_reference
= true;
461 ctx
->abi
.robust_buffer_access
= true;
462 ctx
->abi
.convert_undef_to_zero
= true;
464 if (ctx
->shader
->selector
->info
.properties
[TGSI_PROPERTY_CS_LOCAL_SIZE
]) {
465 assert(gl_shader_stage_is_compute(nir
->info
.stage
));
466 si_llvm_declare_compute_memory(ctx
);
468 ac_nir_translate(&ctx
->ac
, &ctx
->abi
, &ctx
->args
, nir
);
474 * Given a list of shader part functions, build a wrapper function that
475 * runs them in sequence to form a monolithic shader.
477 void si_build_wrapper_function(struct si_shader_context
*ctx
, LLVMValueRef
*parts
,
478 unsigned num_parts
, unsigned main_part
,
479 unsigned next_shader_first_part
)
481 LLVMBuilderRef builder
= ctx
->ac
.builder
;
482 /* PS epilog has one arg per color component; gfx9 merged shader
483 * prologs need to forward 40 SGPRs.
485 LLVMValueRef initial
[AC_MAX_ARGS
], out
[AC_MAX_ARGS
];
486 LLVMTypeRef function_type
;
487 unsigned num_first_params
;
488 unsigned num_out
, initial_num_out
;
489 ASSERTED
unsigned num_out_sgpr
; /* used in debug checks */
490 ASSERTED
unsigned initial_num_out_sgpr
; /* used in debug checks */
491 unsigned num_sgprs
, num_vgprs
;
494 memset(&ctx
->args
, 0, sizeof(ctx
->args
));
496 for (unsigned i
= 0; i
< num_parts
; ++i
) {
497 ac_add_function_attr(ctx
->ac
.context
, parts
[i
], -1, AC_FUNC_ATTR_ALWAYSINLINE
);
498 LLVMSetLinkage(parts
[i
], LLVMPrivateLinkage
);
501 /* The parameters of the wrapper function correspond to those of the
502 * first part in terms of SGPRs and VGPRs, but we use the types of the
503 * main part to get the right types. This is relevant for the
504 * dereferenceable attribute on descriptor table pointers.
509 function_type
= LLVMGetElementType(LLVMTypeOf(parts
[0]));
510 num_first_params
= LLVMCountParamTypes(function_type
);
512 for (unsigned i
= 0; i
< num_first_params
; ++i
) {
513 LLVMValueRef param
= LLVMGetParam(parts
[0], i
);
515 if (ac_is_sgpr_param(param
)) {
516 assert(num_vgprs
== 0);
517 num_sgprs
+= ac_get_type_size(LLVMTypeOf(param
)) / 4;
519 num_vgprs
+= ac_get_type_size(LLVMTypeOf(param
)) / 4;
524 while (gprs
< num_sgprs
+ num_vgprs
) {
525 LLVMValueRef param
= LLVMGetParam(parts
[main_part
], ctx
->args
.arg_count
);
526 LLVMTypeRef type
= LLVMTypeOf(param
);
527 unsigned size
= ac_get_type_size(type
) / 4;
529 /* This is going to get casted anyways, so we don't have to
530 * have the exact same type. But we do have to preserve the
531 * pointer-ness so that LLVM knows about it.
533 enum ac_arg_type arg_type
= AC_ARG_INT
;
534 if (LLVMGetTypeKind(type
) == LLVMPointerTypeKind
) {
535 type
= LLVMGetElementType(type
);
537 if (LLVMGetTypeKind(type
) == LLVMVectorTypeKind
) {
538 if (LLVMGetVectorSize(type
) == 4)
539 arg_type
= AC_ARG_CONST_DESC_PTR
;
540 else if (LLVMGetVectorSize(type
) == 8)
541 arg_type
= AC_ARG_CONST_IMAGE_PTR
;
544 } else if (type
== ctx
->ac
.f32
) {
545 arg_type
= AC_ARG_CONST_FLOAT_PTR
;
551 ac_add_arg(&ctx
->args
, gprs
< num_sgprs
? AC_ARG_SGPR
: AC_ARG_VGPR
, size
, arg_type
, NULL
);
553 assert(ac_is_sgpr_param(param
) == (gprs
< num_sgprs
));
554 assert(gprs
+ size
<= num_sgprs
+ num_vgprs
&&
555 (gprs
>= num_sgprs
|| gprs
+ size
<= num_sgprs
));
560 /* Prepare the return type. */
561 unsigned num_returns
= 0;
562 LLVMTypeRef returns
[AC_MAX_ARGS
], last_func_type
, return_type
;
564 last_func_type
= LLVMGetElementType(LLVMTypeOf(parts
[num_parts
- 1]));
565 return_type
= LLVMGetReturnType(last_func_type
);
567 switch (LLVMGetTypeKind(return_type
)) {
568 case LLVMStructTypeKind
:
569 num_returns
= LLVMCountStructElementTypes(return_type
);
570 assert(num_returns
<= ARRAY_SIZE(returns
));
571 LLVMGetStructElementTypes(return_type
, returns
);
573 case LLVMVoidTypeKind
:
576 unreachable("unexpected type");
579 si_llvm_create_func(ctx
, "wrapper", returns
, num_returns
,
580 si_get_max_workgroup_size(ctx
->shader
));
582 if (si_is_merged_shader(ctx
->shader
))
583 ac_init_exec_full_mask(&ctx
->ac
);
585 /* Record the arguments of the function as if they were an output of
591 for (unsigned i
= 0; i
< ctx
->args
.arg_count
; ++i
) {
592 LLVMValueRef param
= LLVMGetParam(ctx
->main_fn
, i
);
593 LLVMTypeRef param_type
= LLVMTypeOf(param
);
594 LLVMTypeRef out_type
= ctx
->args
.args
[i
].file
== AC_ARG_SGPR
? ctx
->ac
.i32
: ctx
->ac
.f32
;
595 unsigned size
= ac_get_type_size(param_type
) / 4;
598 if (LLVMGetTypeKind(param_type
) == LLVMPointerTypeKind
) {
599 param
= LLVMBuildPtrToInt(builder
, param
, ctx
->ac
.i32
, "");
600 param_type
= ctx
->ac
.i32
;
603 if (param_type
!= out_type
)
604 param
= LLVMBuildBitCast(builder
, param
, out_type
, "");
605 out
[num_out
++] = param
;
607 LLVMTypeRef vector_type
= LLVMVectorType(out_type
, size
);
609 if (LLVMGetTypeKind(param_type
) == LLVMPointerTypeKind
) {
610 param
= LLVMBuildPtrToInt(builder
, param
, ctx
->ac
.i64
, "");
611 param_type
= ctx
->ac
.i64
;
614 if (param_type
!= vector_type
)
615 param
= LLVMBuildBitCast(builder
, param
, vector_type
, "");
617 for (unsigned j
= 0; j
< size
; ++j
)
619 LLVMBuildExtractElement(builder
, param
, LLVMConstInt(ctx
->ac
.i32
, j
, 0), "");
622 if (ctx
->args
.args
[i
].file
== AC_ARG_SGPR
)
623 num_out_sgpr
= num_out
;
626 memcpy(initial
, out
, sizeof(out
));
627 initial_num_out
= num_out
;
628 initial_num_out_sgpr
= num_out_sgpr
;
630 /* Now chain the parts. */
631 LLVMValueRef ret
= NULL
;
632 for (unsigned part
= 0; part
< num_parts
; ++part
) {
633 LLVMValueRef in
[AC_MAX_ARGS
];
634 LLVMTypeRef ret_type
;
635 unsigned out_idx
= 0;
636 unsigned num_params
= LLVMCountParams(parts
[part
]);
638 /* Merged shaders are executed conditionally depending
639 * on the number of enabled threads passed in the input SGPRs. */
640 if (si_is_multi_part_shader(ctx
->shader
) && part
== 0) {
641 LLVMValueRef ena
, count
= initial
[3];
643 count
= LLVMBuildAnd(builder
, count
, LLVMConstInt(ctx
->ac
.i32
, 0x7f, 0), "");
644 ena
= LLVMBuildICmp(builder
, LLVMIntULT
, ac_get_thread_id(&ctx
->ac
), count
, "");
645 ac_build_ifcc(&ctx
->ac
, ena
, 6506);
648 /* Derive arguments for the next part from outputs of the
651 for (unsigned param_idx
= 0; param_idx
< num_params
; ++param_idx
) {
653 LLVMTypeRef param_type
;
656 LLVMValueRef arg
= NULL
;
658 param
= LLVMGetParam(parts
[part
], param_idx
);
659 param_type
= LLVMTypeOf(param
);
660 param_size
= ac_get_type_size(param_type
) / 4;
661 is_sgpr
= ac_is_sgpr_param(param
);
664 ac_add_function_attr(ctx
->ac
.context
, parts
[part
], param_idx
+ 1, AC_FUNC_ATTR_INREG
);
665 } else if (out_idx
< num_out_sgpr
) {
666 /* Skip returned SGPRs the current part doesn't
667 * declare on the input. */
668 out_idx
= num_out_sgpr
;
671 assert(out_idx
+ param_size
<= (is_sgpr
? num_out_sgpr
: num_out
));
676 arg
= ac_build_gather_values(&ctx
->ac
, &out
[out_idx
], param_size
);
678 if (LLVMTypeOf(arg
) != param_type
) {
679 if (LLVMGetTypeKind(param_type
) == LLVMPointerTypeKind
) {
680 if (LLVMGetPointerAddressSpace(param_type
) == AC_ADDR_SPACE_CONST_32BIT
) {
681 arg
= LLVMBuildBitCast(builder
, arg
, ctx
->ac
.i32
, "");
682 arg
= LLVMBuildIntToPtr(builder
, arg
, param_type
, "");
684 arg
= LLVMBuildBitCast(builder
, arg
, ctx
->ac
.i64
, "");
685 arg
= LLVMBuildIntToPtr(builder
, arg
, param_type
, "");
688 arg
= LLVMBuildBitCast(builder
, arg
, param_type
, "");
693 out_idx
+= param_size
;
696 ret
= ac_build_call(&ctx
->ac
, parts
[part
], in
, num_params
);
698 if (si_is_multi_part_shader(ctx
->shader
) && part
+ 1 == next_shader_first_part
) {
699 ac_build_endif(&ctx
->ac
, 6506);
701 /* The second half of the merged shader should use
702 * the inputs from the toplevel (wrapper) function,
703 * not the return value from the last call.
705 * That's because the last call was executed condi-
706 * tionally, so we can't consume it in the main
709 memcpy(out
, initial
, sizeof(initial
));
710 num_out
= initial_num_out
;
711 num_out_sgpr
= initial_num_out_sgpr
;
715 /* Extract the returned GPRs. */
716 ret_type
= LLVMTypeOf(ret
);
720 if (LLVMGetTypeKind(ret_type
) != LLVMVoidTypeKind
) {
721 assert(LLVMGetTypeKind(ret_type
) == LLVMStructTypeKind
);
723 unsigned ret_size
= LLVMCountStructElementTypes(ret_type
);
725 for (unsigned i
= 0; i
< ret_size
; ++i
) {
726 LLVMValueRef val
= LLVMBuildExtractValue(builder
, ret
, i
, "");
728 assert(num_out
< ARRAY_SIZE(out
));
729 out
[num_out
++] = val
;
731 if (LLVMTypeOf(val
) == ctx
->ac
.i32
) {
732 assert(num_out_sgpr
+ 1 == num_out
);
733 num_out_sgpr
= num_out
;
739 /* Return the value from the last part. */
740 if (LLVMGetTypeKind(LLVMTypeOf(ret
)) == LLVMVoidTypeKind
)
741 LLVMBuildRetVoid(builder
);
743 LLVMBuildRet(builder
, ret
);