/*
 * Copyright © 2010 Intel Corporation
 * SPDX-License-Identifier: MIT
 */

#include "brw_shader.h"
#include "brw_builder.h"
#include "brw_nir.h"
#include "brw_eu.h"
#include "brw_sampler.h"
#include "nir.h"
#include "nir_intrinsics.h"
#include "nir_search_helpers.h"
#include "dev/intel_debug.h"
#include "util/u_math.h"
#include "util/bitscan.h"
#include "util/lut.h"
#include "compiler/glsl_types.h"

#include <cassert>
#include <optional>

struct brw_bind_info {
   bool valid:1;
   bool bindless:1;
   bool internal:1;
   unsigned block;
   unsigned set;
   unsigned binding;
};

struct nir_to_brw_state {
   brw_shader &s;
   const nir_shader *nir;
   const intel_device_info *devinfo;
   void *mem_ctx;

   /* Points to the end of the program.  Annotated with the current NIR
    * instruction when applicable.
    */
   brw_builder bld;

   brw_reg *ssa_values;
   struct brw_bind_info *ssa_bind_infos;
   brw_reg *system_values;

   bool annotate;
};

static brw_reg get_nir_src(nir_to_brw_state &ntb, const nir_src &src, int channel);
static brw_reg get_nir_def(nir_to_brw_state &ntb, const nir_def &def, bool all_sources_uniform = false);
static nir_component_mask_t get_nir_write_mask(const nir_def &def);

static void brw_from_nir_emit_intrinsic(nir_to_brw_state &ntb, const brw_builder &bld, nir_intrinsic_instr *instr);
static brw_reg emit_samplepos_setup(nir_to_brw_state &ntb);
static brw_reg emit_sampleid_setup(nir_to_brw_state &ntb);

static void brw_from_nir_emit_impl(nir_to_brw_state &ntb, nir_function_impl *impl);
static void brw_from_nir_emit_cf_list(nir_to_brw_state &ntb, exec_list *list);
static void brw_from_nir_emit_if(nir_to_brw_state &ntb, nir_if *if_stmt);
static void brw_from_nir_emit_loop(nir_to_brw_state &ntb, nir_loop *loop);
static void brw_from_nir_emit_block(nir_to_brw_state &ntb, nir_block *block);
static void brw_from_nir_emit_instr(nir_to_brw_state &ntb, nir_instr *instr);

static void brw_from_nir_emit_memory_access(nir_to_brw_state &ntb,
                                      const brw_builder &bld,
                                      const brw_builder &xbld,
                                      nir_intrinsic_instr *instr);

static void brw_combine_with_vec(const brw_builder &bld, const brw_reg &dst,
                                 const brw_reg &src, unsigned n);

static brw_reg
setup_imm_b(const brw_builder &bld, int8_t v)
{
   const brw_reg tmp = bld.vgrf(BRW_TYPE_B);
   bld.MOV(tmp, brw_imm_w(v));
   return tmp;
}

static brw_reg
emit_work_group_id_setup(nir_to_brw_state &ntb)
{
   brw_shader &s = ntb.s;
   const brw_builder &bld = ntb.bld.scalar_group();

   assert(mesa_shader_stage_is_compute(s.stage));

   brw_reg id = bld.vgrf(BRW_TYPE_UD, 3);

   id.is_scalar = true;

   struct brw_reg r0_1(retype(brw_vec1_grf(0, 1), BRW_TYPE_UD));
   bld.MOV(id, r0_1);

   struct brw_reg r0_6(retype(brw_vec1_grf(0, 6), BRW_TYPE_UD));
   struct brw_reg r0_7(retype(brw_vec1_grf(0, 7), BRW_TYPE_UD));
   bld.MOV(offset(id, bld, 1), r0_6);
   bld.MOV(offset(id, bld, 2), r0_7);

   return id;
}

static bool
emit_system_values_block(nir_to_brw_state &ntb, nir_block *block)
{
   brw_shader &s = ntb.s;
   brw_reg *reg;

   nir_foreach_instr(instr, block) {
      if (instr->type != nir_instr_type_intrinsic)
         continue;

      nir_intrinsic_instr *intrin = nir_instr_as_intrinsic(instr);
      switch (intrin->intrinsic) {
      case nir_intrinsic_load_vertex_id:
      case nir_intrinsic_load_base_vertex:
         UNREACHABLE("should be lowered by nir_lower_system_values().");

      case nir_intrinsic_load_vertex_id_zero_base:
      case nir_intrinsic_load_is_indexed_draw:
      case nir_intrinsic_load_first_vertex:
      case nir_intrinsic_load_instance_id:
      case nir_intrinsic_load_base_instance:
         UNREACHABLE("should be lowered by brw_nir_lower_vs_inputs().");
         break;

      case nir_intrinsic_load_draw_id:
         /* For Task/Mesh, draw_id will be handled later in
          * nir_emit_mesh_task_intrinsic().
          */
         if (!mesa_shader_stage_is_mesh(s.stage))
            UNREACHABLE("should be lowered by brw_nir_lower_vs_inputs().");
         break;

      case nir_intrinsic_load_sample_pos:
      case nir_intrinsic_load_sample_pos_or_center:
         assert(s.stage == MESA_SHADER_FRAGMENT);
         reg = &ntb.system_values[SYSTEM_VALUE_SAMPLE_POS];
         if (reg->file == BAD_FILE)
            *reg = emit_samplepos_setup(ntb);
         break;

      case nir_intrinsic_load_sample_id:
         assert(s.stage == MESA_SHADER_FRAGMENT);
         reg = &ntb.system_values[SYSTEM_VALUE_SAMPLE_ID];
         if (reg->file == BAD_FILE)
            *reg = emit_sampleid_setup(ntb);
         break;

      case nir_intrinsic_load_workgroup_id:
         if (mesa_shader_stage_is_mesh(s.stage))
            UNREACHABLE("should be lowered by nir_lower_compute_system_values().");
         assert(mesa_shader_stage_is_compute(s.stage));
         reg = &ntb.system_values[SYSTEM_VALUE_WORKGROUP_ID];
         if (reg->file == BAD_FILE)
            *reg = emit_work_group_id_setup(ntb);
         break;

      case nir_intrinsic_load_helper_invocation:
         assert(s.stage == MESA_SHADER_FRAGMENT);
         reg = &ntb.system_values[SYSTEM_VALUE_HELPER_INVOCATION];
         if (reg->file == BAD_FILE) {
            const brw_builder abld =
               ntb.bld.annotate("gl_HelperInvocation");

            /* On Gfx6+ (gl_HelperInvocation is only exposed on Gfx7+) the
             * pixel mask is in g1.7 of the thread payload.
             *
             * We move the per-channel pixel enable bit to the low bit of each
             * channel by shifting the byte containing the pixel mask by the
             * vector immediate 0x76543210UV.
             *
             * The region of <1,8,0> reads only 1 byte (the pixel masks for
             * subspans 0 and 1) in SIMD8 and an additional byte (the pixel
             * masks for 2 and 3) in SIMD16.
             */
            brw_reg shifted = abld.vgrf(BRW_TYPE_UW);

            for (unsigned i = 0; i < DIV_ROUND_UP(s.dispatch_width, 16); i++) {
               const brw_builder hbld = abld.group(MIN2(16, s.dispatch_width), i);
               /* According to the "PS Thread Payload for Normal
                * Dispatch" pages on the BSpec, the dispatch mask is
                * stored in R0.15/R1.15 on gfx20+ and in R1.7/R2.7 on
                * gfx6+.
                */
               const struct brw_reg reg = s.devinfo->ver >= 20 ?
                  xe2_vec1_grf(i, 15) : brw_vec1_grf(i + 1, 7);
               brw_reg mask_uw = hbld.vgrf(BRW_TYPE_UW);
               hbld.MOV(mask_uw, stride(retype(reg, BRW_TYPE_UB), 1, 8, 0));

               hbld.SHR(offset(shifted, hbld, i),
                        mask_uw,
                        brw_imm_v(0x76543210));
            }

            /* A set bit in the pixel mask means the channel is enabled, but
             * that is the opposite of gl_HelperInvocation so we need to invert
             * the mask.
             *
             * The negate source-modifier bit of logical instructions on Gfx8+
             * performs 1's complement negation, so we can use that instead of
             * a NOT instruction.
             */
            brw_reg inverted = negate(shifted);

            /* We then resolve the 0/1 result to 0/~0 boolean values by ANDing
             * with 1 and negating.
             */
            brw_reg anded = abld.vgrf(BRW_TYPE_UD);
            abld.AND(anded, inverted, brw_imm_uw(1));

            *reg = abld.MOV(negate(retype(anded, BRW_TYPE_D)));
         }
         break;

      default:
         break;
      }
   }

   return true;
}

static void
brw_from_nir_emit_system_values(nir_to_brw_state &ntb)
{
   brw_shader &s = ntb.s;

   ntb.system_values = ralloc_array(ntb.mem_ctx, brw_reg, SYSTEM_VALUE_MAX);
   for (unsigned i = 0; i < SYSTEM_VALUE_MAX; i++) {
      ntb.system_values[i] = brw_reg();
   }

   nir_function_impl *impl = nir_shader_get_entrypoint((nir_shader *)s.nir);
   nir_foreach_block(block, impl)
      emit_system_values_block(ntb, block);
}

static void
brw_from_nir_emit_impl(nir_to_brw_state &ntb, nir_function_impl *impl)
{
   ntb.ssa_values = rzalloc_array(ntb.mem_ctx, brw_reg, impl->ssa_alloc);
   ntb.ssa_bind_infos = rzalloc_array(ntb.mem_ctx, struct brw_bind_info, impl->ssa_alloc);

   assert(impl->valid_metadata & nir_metadata_divergence);

   brw_from_nir_emit_cf_list(ntb, &impl->body);
}

static void
brw_from_nir_emit_cf_list(nir_to_brw_state &ntb, exec_list *list)
{
   exec_list_validate(list);
   foreach_list_typed(nir_cf_node, node, node, list) {
      switch (node->type) {
      case nir_cf_node_if:
         brw_from_nir_emit_if(ntb, nir_cf_node_as_if(node));
         break;

      case nir_cf_node_loop:
         brw_from_nir_emit_loop(ntb, nir_cf_node_as_loop(node));
         break;

      case nir_cf_node_block:
         brw_from_nir_emit_block(ntb, nir_cf_node_as_block(node));
         break;

      default:
         UNREACHABLE("Invalid CFG node block");
      }
   }
}

static brw_inst *
brw_from_nir_emit_jump(nir_to_brw_state &ntb, nir_jump_instr *instr)
{
   switch (instr->type) {
   case nir_jump_break:
      return ntb.bld.emit(BRW_OPCODE_BREAK);
   case nir_jump_continue:
      return ntb.bld.emit(BRW_OPCODE_CONTINUE);
   case nir_jump_halt:
      return ntb.bld.emit(BRW_OPCODE_HALT);
   case nir_jump_return:
   default:
      UNREACHABLE("unknown jump");
   }
}

static void
brw_from_nir_emit_if(nir_to_brw_state &ntb, nir_if *if_stmt)
{
   const brw_builder &bld = ntb.bld;

   bool invert;
   brw_reg cond_reg;

   /* If the condition has the form !other_condition, use other_condition as
    * the source, but invert the predicate on the if instruction.
    */
   nir_alu_instr *cond = nir_src_as_alu(if_stmt->condition);
   if (cond != NULL && cond->op == nir_op_inot) {
      invert = true;
      cond_reg = get_nir_src(ntb, cond->src[0].src, cond->src[0].swizzle[0]);
   } else {
      invert = false;
      cond_reg = get_nir_src(ntb, if_stmt->condition, 0);
   }

   /* first, put the condition into f0 */
   brw_inst *inst = bld.MOV(bld.null_reg_d(),
                           retype(cond_reg, BRW_TYPE_D));
   inst->conditional_mod = BRW_CONDITIONAL_NZ;

   /* Peephole: replace IF-JUMP-ENDIF with predicated jump */
   if (nir_cf_list_is_empty_block(&if_stmt->else_list) &&
       exec_list_is_singular(&if_stmt->then_list)) {
      struct exec_node *head = exec_list_get_head(&if_stmt->then_list);
      nir_block *block =
         nir_cf_node_as_block(exec_node_data(nir_cf_node, head, node));

      if (exec_list_is_singular(&block->instr_list) &&
          nir_block_ends_in_jump(block)) {
         nir_jump_instr *jump = nir_instr_as_jump(nir_block_first_instr(block));
         if (jump->type == nir_jump_break ||
             jump->type == nir_jump_continue) {

            brw_inst *inst = brw_from_nir_emit_jump(ntb, jump);
            inst->predicate = BRW_PREDICATE_NORMAL;
            inst->predicate_inverse = invert;
            return;
         }
      }
   }

   brw_inst *iff = bld.IF(BRW_PREDICATE_NORMAL);
   iff->predicate_inverse = invert;

   brw_from_nir_emit_cf_list(ntb, &if_stmt->then_list);

   if (!nir_cf_list_is_empty_block(&if_stmt->else_list)) {
      bld.emit(BRW_OPCODE_ELSE);
      brw_from_nir_emit_cf_list(ntb, &if_stmt->else_list);
   }

   bld.emit(BRW_OPCODE_ENDIF);
}

static void
brw_from_nir_emit_loop(nir_to_brw_state &ntb, nir_loop *loop)
{
   const brw_builder &bld = ntb.bld;

   assert(!nir_loop_has_continue_construct(loop));
   bld.DO();

   brw_from_nir_emit_cf_list(ntb, &loop->body);

   brw_inst *peep_while = bld.emit(BRW_OPCODE_WHILE);

   /* Peephole: replace (+f0) break; while with (-f0) while */
   brw_inst *peep_break = (brw_inst *) peep_while->prev;

   if (peep_break->opcode == BRW_OPCODE_BREAK &&
       peep_break->predicate != BRW_PREDICATE_NONE) {
      peep_while->predicate = peep_break->predicate;
      peep_while->predicate_inverse = !peep_break->predicate_inverse;
      peep_break->brw_exec_node::remove();
   }
}

static void
brw_from_nir_emit_block(nir_to_brw_state &ntb, nir_block *block)
{
   brw_builder bld = ntb.bld;

   nir_foreach_instr(instr, block) {
      brw_from_nir_emit_instr(ntb, instr);
   }

   ntb.bld = bld;
}

/**
 * Recognizes a parent instruction of nir_op_extract_* and changes the type to
 * match instr.
 */
static bool
optimize_extract_to_float(nir_to_brw_state &ntb, const brw_builder &bld,
                          nir_alu_instr *instr, const brw_reg &result)
{
   const intel_device_info *devinfo = ntb.devinfo;

   /* No fast path for f16 (yet) or f64. */
   assert(instr->op == nir_op_i2f32 || instr->op == nir_op_u2f32);

   nir_alu_instr *src0 = nir_src_as_alu(instr->src[0].src);
   if (!src0)
      return false;

   unsigned bytes;
   bool is_signed;

   switch (src0->op) {
   case nir_op_extract_u8:
   case nir_op_extract_u16:
      bytes = src0->op == nir_op_extract_u8 ? 1 : 2;

      /* i2f(extract_u8(a, b)) and u2f(extract_u8(a, b)) produce the same
       * result. Ditto for extract_u16.
       */
      is_signed = false;
      break;

   case nir_op_extract_i8:
   case nir_op_extract_i16:
      bytes = src0->op == nir_op_extract_i8 ? 1 : 2;

      /* The fast path can't handle u2f(extract_i8(a, b)) because the implicit
       * sign extension of the extract_i8 is lost. For example,
       * u2f(extract_i8(0x0000ff00, 1)) should produce 4294967295.0, but a
       * fast path could either give 255.0 (by implementing the fast path as
       * u2f(extract_u8(x))) or -1.0 (by implementing the fast path as
       * i2f(extract_i8(x))). At one point in time, we incorrectly implemented
       * the former.
       */
      if (instr->op != nir_op_i2f32)
         return false;

      is_signed = true;
      break;

   default:
      return false;
   }

   unsigned element = nir_src_as_uint(src0->src[1].src);

   /* Element type to extract.*/
   const brw_reg_type type = brw_int_type(bytes, is_signed);

   brw_reg op0 = get_nir_src(ntb, src0->src[0].src, -1);
   op0.type = brw_type_for_nir_type(devinfo,
      (nir_alu_type)(nir_op_infos[src0->op].input_types[0] |
                     nir_src_bit_size(src0->src[0].src)));

   /* It is not documented in the Bspec, but DG2 and newer platforms cannot do
    * direct byte-to-float conversions from scalars. MR !30140 has more
    * details. If the optimization is applied in cases that would require
    * lower_regioning to do some lowering, the code generated will be much,
    * much worse.
    */
   if (devinfo->verx10 >= 125 && bytes == 1) {
      /* If the source truly scalar, for example from the UNIFORM file, skip
       * the optimize_extract_to_float optimization.
       *
       * Note: is_scalar values won't have zero stride until after the call to
       * offset() below that applies the swizzle.
       */
      if (is_uniform(op0))
         return false;

      /* If the dispatch width matches the scalar allocation width, then
       * is_scalar can be demoted to non-is_scalar. This prevents offset() and
       * component() (both called below) from setting the stride to zero, and
       * that avoids the awful code generated by lower_regioning.
       */
      if (op0.is_scalar) {
         const unsigned allocation_width = 8 * reg_unit(ntb.devinfo);
         if (ntb.bld.dispatch_width() != allocation_width)
            return false;

         assert(bld.dispatch_width() == allocation_width);
         op0.is_scalar = false;
      }
   }

   op0 = offset(op0, bld, src0->src[0].swizzle[0]);

   /* If the dispatch width matches the scalar allocation width, offset() will
    * not modify the stride, but having source stride <0;1,0> is advantageous.
    */
   if (op0.is_scalar)
      op0 = component(op0, 0);

   /* Bspec "Register Region Restrictions" for Xe says:
    *
    *    "In case of all float point data types used in destination
    *
    *    1. Register Regioning patterns where register data bit location of
    *       the LSB of the channels are changed between source and destination
    *       are not supported on Src0 and Src1 except for broadcast of a
    *       scalar."
    *
    * This restriction is enfored in brw_lower_regioning.  There is no
    * reason to generate an optimized instruction that brw_lower_regioning
    * will have to break up later.
    */
   if (devinfo->verx10 >= 125 && element != 0 && !is_uniform(op0))
      return false;

   bld.MOV(result, subscript(op0, type, element));
   return true;
}

static bool
optimize_frontfacing_ternary(nir_to_brw_state &ntb,
                             nir_alu_instr *instr,
                             const brw_reg &result)
{
   const intel_device_info *devinfo = ntb.devinfo;
   brw_shader &s = ntb.s;

   if (instr->def.bit_size != 32)
      return false;

   nir_intrinsic_instr *src0 = nir_src_as_intrinsic(instr->src[0].src);
   if (src0 == NULL || src0->intrinsic != nir_intrinsic_load_front_face)
      return false;

   if (!nir_src_is_const(instr->src[1].src) ||
       !nir_src_is_const(instr->src[2].src))
      return false;

   const float value1 = nir_src_as_float(instr->src[1].src);
   const float value2 = nir_src_as_float(instr->src[2].src);
   if (fabsf(value1) != 1.0f || fabsf(value2) != 1.0f)
      return false;

   /* nir_opt_algebraic should have gotten rid of bcsel(b, a, a) */
   assert(value1 == -value2);

   brw_reg tmp = ntb.bld.vgrf(BRW_TYPE_D);

   if (devinfo->ver >= 20) {
      /* Gfx20+ has separate back-facing bits for each pair of
       * subspans in order to support multiple polygons, so we need to
       * use a <1;8,0> region in order to select the correct word for
       * each channel.  Unfortunately they're no longer aligned to the
       * sign bit of a 16-bit word, so a left shift is necessary.
       */
      brw_reg ff = ntb.bld.vgrf(BRW_TYPE_UW);

      for (unsigned i = 0; i < DIV_ROUND_UP(s.dispatch_width, 16); i++) {
         const brw_builder hbld = ntb.bld.group(16, i);
         const struct brw_reg gi_uw = retype(xe2_vec1_grf(i, 9),
                                             BRW_TYPE_UW);
         hbld.SHL(offset(ff, hbld, i), stride(gi_uw, 1, 8, 0), brw_imm_ud(4));
      }

      if (value1 == -1.0f)
         ff.negate = true;

      ntb.bld.OR(subscript(tmp, BRW_TYPE_UW, 1), ff,
                  brw_imm_uw(0x3f80));

   } else if (devinfo->ver >= 12 && s.max_polygons == 2) {
      /* According to the BSpec "PS Thread Payload for Normal
       * Dispatch", the front/back facing interpolation bit is stored
       * as bit 15 of either the R1.1 or R1.6 poly info field, for the
       * first and second polygons respectively in multipolygon PS
       * dispatch mode.
       */
      assert(s.dispatch_width == 16);

      for (unsigned i = 0; i < s.max_polygons; i++) {
         const brw_builder hbld = ntb.bld.group(8, i);
         struct brw_reg g1 = retype(brw_vec1_grf(1, 1 + 5 * i),
                                    BRW_TYPE_UW);

         if (value1 == -1.0f)
            g1.negate = true;

         hbld.OR(subscript(offset(tmp, hbld, i), BRW_TYPE_UW, 1),
                 g1, brw_imm_uw(0x3f80));
      }

   } else if (devinfo->ver >= 12) {
      /* Bit 15 of g1.1 is 0 if the polygon is front facing. */
      brw_reg g1 = brw_reg(retype(brw_vec1_grf(1, 1), BRW_TYPE_W));

      /* For (gl_FrontFacing ? 1.0 : -1.0), emit:
       *
       *    or(8)  tmp.1<2>W  g1.1<0,1,0>W  0x00003f80W
       *    and(8) dst<1>D    tmp<8,8,1>D   0xbf800000D
       *
       * and negate g1.1<0,1,0>W for (gl_FrontFacing ? -1.0 : 1.0).
       */
      if (value1 == -1.0f)
         g1.negate = true;

      ntb.bld.OR(subscript(tmp, BRW_TYPE_W, 1),
                  g1, brw_imm_uw(0x3f80));
   } else {
      /* Bit 15 of g0.0 is 0 if the polygon is front facing. */
      brw_reg g0 = brw_reg(retype(brw_vec1_grf(0, 0), BRW_TYPE_W));

      /* For (gl_FrontFacing ? 1.0 : -1.0), emit:
       *
       *    or(8)  tmp.1<2>W  g0.0<0,1,0>W  0x00003f80W
       *    and(8) dst<1>D    tmp<8,8,1>D   0xbf800000D
       *
       * and negate g0.0<0,1,0>W for (gl_FrontFacing ? -1.0 : 1.0).
       *
       * This negation looks like it's safe in practice, because bits 0:4 will
       * surely be TRIANGLES
       */

      if (value1 == -1.0f) {
         g0.negate = true;
      }

      ntb.bld.OR(subscript(tmp, BRW_TYPE_W, 1),
                  g0, brw_imm_uw(0x3f80));
   }
   ntb.bld.AND(retype(result, BRW_TYPE_D), tmp, brw_imm_d(0xbf800000));

   return true;
}

static brw_rnd_mode
brw_rnd_mode_from_nir_op (const nir_op op) {
   switch (op) {
   case nir_op_f2f16_rtz:
      return BRW_RND_MODE_RTZ;
   case nir_op_f2f16_rtne:
      return BRW_RND_MODE_RTNE;
   default:
      UNREACHABLE("Operation doesn't support rounding mode");
   }
}

static brw_rnd_mode
brw_rnd_mode_from_execution_mode(unsigned execution_mode)
{
   if (nir_has_any_rounding_mode_rtne(execution_mode))
      return BRW_RND_MODE_RTNE;
   if (nir_has_any_rounding_mode_rtz(execution_mode))
      return BRW_RND_MODE_RTZ;
   return BRW_RND_MODE_UNSPECIFIED;
}

static brw_reg
prepare_alu_destination_and_sources(nir_to_brw_state &ntb,
                                    const brw_builder &bld,
                                    nir_alu_instr *instr,
                                    brw_reg *op,
                                    bool need_dest)
{
   const intel_device_info *devinfo = ntb.devinfo;

   bool all_sources_uniform = true;
   for (unsigned i = 0; i < nir_op_infos[instr->op].num_inputs; i++) {
      op[i] = get_nir_src(ntb, instr->src[i].src, -1);
      op[i].type = brw_type_for_nir_type(devinfo,
         (nir_alu_type)(nir_op_infos[instr->op].input_types[i] |
                        nir_src_bit_size(instr->src[i].src)));

      /* is_scalar sources won't be is_uniform because get_nir_src was passed
       * -1 as the channel.
       */
      if (!is_uniform(op[i]) && !op[i].is_scalar)
         all_sources_uniform = false;
   }

   brw_reg result =
      need_dest ? get_nir_def(ntb, instr->def, all_sources_uniform) : bld.null_reg_ud();

   result.type = brw_type_for_nir_type(devinfo,
      (nir_alu_type)(nir_op_infos[instr->op].output_type |
                     instr->def.bit_size));

   /* Move and vecN instrutions may still be vectored.  Return the raw,
    * vectored source and destination so that brw_shader::nir_emit_alu can
    * handle it.  Other callers should not have to handle these kinds of
    * instructions.
    */
   switch (instr->op) {
   case nir_op_mov:
   case nir_op_vec2:
   case nir_op_vec3:
   case nir_op_vec4:
   case nir_op_vec8:
   case nir_op_vec16:
      return result;
   default:
      break;
   }

   const bool is_scalar = result.is_scalar || (!need_dest && all_sources_uniform);
   const brw_builder xbld = is_scalar ? bld.scalar_group() : bld;

   /* At this point, we have dealt with any instruction that operates on
    * more than a single channel.  Therefore, we can just adjust the source
    * and destination registers for that channel and emit the instruction.
    */
   unsigned channel = 0;
   if (nir_op_infos[instr->op].output_size == 0) {
      /* Since NIR is doing the scalarizing for us, we should only ever see
       * vectorized operations with a single channel.
       */
      nir_component_mask_t write_mask = get_nir_write_mask(instr->def);
      assert(util_bitcount(write_mask) == 1);
      channel = ffs(write_mask) - 1;

      result = offset(result, xbld, channel);
   }

   for (unsigned i = 0; i < nir_op_infos[instr->op].num_inputs; i++) {
      assert(nir_op_infos[instr->op].input_sizes[i] < 2);
      op[i] = offset(op[i], xbld, instr->src[i].swizzle[channel]);

      /* If the dispatch width matches the scalar allocation width, offset()
       * won't set the stride to zero. Force that here.
       */
      if (op[i].is_scalar)
         op[i] = component(op[i], 0);
   }

   return result;
}

static brw_reg
resolve_source_modifiers(const brw_builder &bld, const brw_reg &src)
{
   return (src.abs || src.negate) ? bld.MOV(src) : src;
}

static void
resolve_inot_sources(nir_to_brw_state &ntb, const brw_builder &bld, nir_alu_instr *instr,
                     brw_reg *op)
{
   for (unsigned i = 0; i < 2; i++) {
      nir_alu_instr *inot_instr = nir_src_as_alu(instr->src[i].src);

      if (inot_instr != NULL && inot_instr->op == nir_op_inot) {
         /* The source of the inot is now the source of instr. */
         prepare_alu_destination_and_sources(ntb, bld, inot_instr, &op[i], false);

         assert(!op[i].negate);
         op[i].negate = true;
      } else {
         op[i] = resolve_source_modifiers(bld, op[i]);
      }
   }
}

static bool
try_emit_b2fi_of_inot(nir_to_brw_state &ntb, const brw_builder &bld,
                      brw_reg result,
                      nir_alu_instr *instr)
{
   nir_alu_instr *inot_instr = nir_src_as_alu(instr->src[0].src);

   if (inot_instr == NULL || inot_instr->op != nir_op_inot)
      return false;

   /* HF is also possible as a destination on BDW+.  For nir_op_b2i, the set
    * of valid size-changing combinations is a bit more complex.
    *
    * The source restriction is just because I was lazy about generating the
    * constant below.
    */
   if (nir_src_bit_size(inot_instr->src[0].src) != 32)
      return false;

   /* b2[fi](inot(a)) maps a=0 => 1, a=-1 => 0.  Since a can only be 0 or -1,
    * this is either intBitsToFloat(~a & ONE_POINT_ZERO) or (~a & 1).
    */
   brw_reg one;
   switch (instr->op) {
   case nir_op_b2f32:
      one = brw_imm_ud(0x3f800000);
      break;
   case nir_op_b2i32:
      one = brw_imm_ud(1);
      break;
   default:
      return false;
   }

   brw_reg op;

   prepare_alu_destination_and_sources(ntb, bld, inot_instr, &op, false);

   op.negate = true;
   bld.AND(retype(result, one.type), op, one);

   return true;
}

static bool
is_const_zero(const nir_alu_src &src)
{
   return nir_src_is_const(src.src) && nir_alu_src_as_uint(src) == 0;
}

static void
brw_from_nir_emit_alu(nir_to_brw_state &ntb, nir_alu_instr *instr,
                bool need_dest)
{
   const intel_device_info *devinfo = ntb.devinfo;

   brw_inst *inst;
   unsigned execution_mode =
      ntb.bld.shader->nir->info.float_controls_execution_mode;

   brw_reg op[NIR_MAX_VEC_COMPONENTS];
   brw_reg result = prepare_alu_destination_and_sources(ntb, ntb.bld, instr, op, need_dest);

#ifndef NDEBUG
   /* Everything except raw moves, some type conversions, iabs, and ineg
    * should have 8-bit sources lowered by nir_lower_bit_size in
    * brw_preprocess_nir or by nir_split_conversion in
    * brw_postprocess_nir.
    */
   switch (instr->op) {
   case nir_op_mov:
   case nir_op_vec2:
   case nir_op_vec3:
   case nir_op_vec4:
   case nir_op_vec8:
   case nir_op_vec16:
   case nir_op_i2f16:
   case nir_op_i2f32:
   case nir_op_i2i16:
   case nir_op_i2i32:
   case nir_op_u2f16:
   case nir_op_u2f32:
   case nir_op_u2u16:
   case nir_op_u2u32:
   case nir_op_iabs:
   case nir_op_ineg:
   case nir_op_pack_32_4x8_split:
      break;

   default:
      for (unsigned i = 0; i < nir_op_infos[instr->op].num_inputs; i++) {
         assert(brw_type_size_bytes(op[i].type) > 1);
      }
   }
#endif

   const brw_builder &bld = result.is_scalar ? ntb.bld.scalar_group() : ntb.bld;

   switch (instr->op) {
   case nir_op_mov:
   case nir_op_vec2:
   case nir_op_vec3:
   case nir_op_vec4:
   case nir_op_vec8:
   case nir_op_vec16: {
      brw_reg temp = result;
      bool need_extra_copy = false;

      nir_intrinsic_instr *store_reg =
         nir_store_reg_for_def(&instr->def);
      if (store_reg != NULL) {
         nir_def *dest_reg = store_reg->src[1].ssa;
         for (unsigned i = 0; i < nir_op_infos[instr->op].num_inputs; i++) {
            nir_intrinsic_instr *load_reg =
               nir_load_reg_for_def(instr->src[i].src.ssa);
            if (load_reg == NULL)
               continue;

            if (load_reg->src[0].ssa == dest_reg) {
               need_extra_copy = true;
               temp = bld.vgrf(result.type, 4);
               break;
            }
         }
      }

      nir_component_mask_t write_mask = get_nir_write_mask(instr->def);
      unsigned last_bit = util_last_bit(write_mask);

      assert(last_bit <= NIR_MAX_VEC_COMPONENTS);
      brw_reg comps[NIR_MAX_VEC_COMPONENTS];

      for (unsigned i = 0; i < last_bit; i++) {
         if (instr->op == nir_op_mov)
            comps[i] = offset(op[0], bld, instr->src[0].swizzle[i]);
         else
            comps[i] = offset(op[i], bld, instr->src[i].swizzle[0]);
      }

      if (write_mask == (1u << last_bit) - 1) {
         bld.VEC(temp, comps, last_bit);
      } else {
         for (unsigned i = 0; i < last_bit; i++) {
            if (write_mask & (1 << i))
               bld.MOV(offset(temp, bld, i), comps[i]);
         }
      }

      /* In this case the source and destination registers were the same,
       * so we need to insert an extra set of moves in order to deal with
       * any swizzling.
       */
      if (need_extra_copy) {
         for (unsigned i = 0; i < last_bit; i++) {
            if (!(write_mask & (1 << i)))
               continue;

            bld.MOV(offset(result, bld, i), offset(temp, bld, i));
         }
      }
      return;
   }

   case nir_op_i2f32:
   case nir_op_u2f32:
      if (optimize_extract_to_float(ntb, bld, instr, result))
         return;
      bld.MOV(result, op[0]);
      break;

   case nir_op_f2f16_rtne:
   case nir_op_f2f16_rtz:
   case nir_op_f2f16: {
      brw_rnd_mode rnd = BRW_RND_MODE_UNSPECIFIED;

      if (nir_op_f2f16 == instr->op)
         rnd = brw_rnd_mode_from_execution_mode(execution_mode);
      else
         rnd = brw_rnd_mode_from_nir_op(instr->op);

      if (BRW_RND_MODE_UNSPECIFIED != rnd)
         bld.exec_all().emit(SHADER_OPCODE_RND_MODE, bld.null_reg_ud(), brw_imm_d(rnd));

      assert(brw_type_size_bytes(op[0].type) < 8); /* nir_split_conversion */
      bld.MOV(result, op[0]);
      break;
   }

   case nir_op_b2i8:
   case nir_op_b2i16:
   case nir_op_b2i32:
   case nir_op_b2i64:
   case nir_op_b2f16:
   case nir_op_b2f32:
   case nir_op_b2f64:
      if (try_emit_b2fi_of_inot(ntb, bld, result, instr))
         break;
      op[0].type = BRW_TYPE_D;
      op[0].negate = !op[0].negate;
      FALLTHROUGH;
   case nir_op_i2f64:
   case nir_op_i2i64:
   case nir_op_u2f64:
   case nir_op_u2u64:
   case nir_op_f2f64:
   case nir_op_f2i64:
   case nir_op_f2u64:
   case nir_op_i2i32:
   case nir_op_u2u32:
   case nir_op_f2i32:
   case nir_op_f2i32_sat:
   case nir_op_f2u32:
   case nir_op_f2u32_sat:
   case nir_op_i2f16:
   case nir_op_u2f16:
   case nir_op_f2i16:
   case nir_op_f2i16_sat:
   case nir_op_f2u16:
   case nir_op_f2u16_sat:
   case nir_op_f2i8:
   case nir_op_f2i8_sat:
   case nir_op_f2u8:
   case nir_op_f2u8_sat:
      if (result.type == BRW_TYPE_B ||
          result.type == BRW_TYPE_UB ||
          result.type == BRW_TYPE_HF)
         assert(brw_type_size_bytes(op[0].type) < 8); /* nir_split_conversion */

      if (op[0].type == BRW_TYPE_B ||
          op[0].type == BRW_TYPE_UB ||
          op[0].type == BRW_TYPE_HF)
         assert(brw_type_size_bytes(result.type) < 8); /* nir_split_conversion */

      bld.MOV(result, op[0]);
      break;

   case nir_op_i2i8:
   case nir_op_u2u8:
      assert(brw_type_size_bytes(op[0].type) < 8); /* nir_split_conversion */
      FALLTHROUGH;
   case nir_op_i2i16:
   case nir_op_u2u16: {
      /* Emit better code for u2u8(extract_u8(a, b)) and similar patterns.
       * Emitting the instructions one by one results in two MOV instructions
       * that won't be propagated.  By handling both instructions here, a
       * single MOV is emitted.
       */
      nir_alu_instr *extract_instr = nir_src_as_alu(instr->src[0].src);
      if (extract_instr != NULL) {
         if (extract_instr->op == nir_op_extract_u8 ||
             extract_instr->op == nir_op_extract_i8) {
            prepare_alu_destination_and_sources(ntb, ntb.bld, extract_instr, op, false);

            const unsigned byte = nir_src_as_uint(extract_instr->src[1].src);
            const brw_reg_type type =
               brw_int_type(1, extract_instr->op == nir_op_extract_i8);

            op[0] = subscript(op[0], type, byte);
         } else if (extract_instr->op == nir_op_extract_u16 ||
                    extract_instr->op == nir_op_extract_i16) {
            prepare_alu_destination_and_sources(ntb, ntb.bld, extract_instr, op, false);

            const unsigned word = nir_src_as_uint(extract_instr->src[1].src);
            const brw_reg_type type =
               brw_int_type(2, extract_instr->op == nir_op_extract_i16);

            op[0] = subscript(op[0], type, word);
         }
      }

      /* If narrowing (e.g. 32 -> 16), don't do a D -> W or UD -> UW mov,
       * instead just read the source as W/UW with a stride (discarding
       * the top bits).  This avoids the need for the destination to be
       * DWord aligned due to regioning restrictions.
       */
      if (brw_type_size_bits(result.type) < brw_type_size_bits(op[0].type)) {
         const unsigned bits = brw_type_size_bits(result.type);
         op[0] = subscript(op[0], brw_type_with_size(op[0].type, bits), 0);
      }

      bld.MOV(result, op[0]);
      break;
   }

   case nir_op_fsat:
      inst = bld.MOV(result, op[0]);
      inst->saturate = true;
      break;

   case nir_op_fneg:
   case nir_op_ineg:
      op[0].negate = true;
      bld.MOV(result, op[0]);
      break;

   case nir_op_fabs:
   case nir_op_iabs:
      op[0].negate = false;
      op[0].abs = true;
      bld.MOV(result, op[0]);
      break;

   case nir_op_f2f32:
      if (nir_has_any_rounding_mode_enabled(execution_mode)) {
         brw_rnd_mode rnd =
            brw_rnd_mode_from_execution_mode(execution_mode);
         bld.exec_all().emit(SHADER_OPCODE_RND_MODE, bld.null_reg_ud(),
                             brw_imm_d(rnd));
      }

      if (op[0].type == BRW_TYPE_HF)
         assert(brw_type_size_bytes(result.type) < 8); /* nir_split_conversion */

      bld.MOV(result, op[0]);
      break;

   case nir_op_fsign:
      UNREACHABLE("Should have been lowered by brw_nir_lower_fsign.");

   case nir_op_frcp:
      bld.RCP(result, op[0]);
      break;

   case nir_op_fexp2:
      bld.EXP2(result, op[0]);
      break;

   case nir_op_flog2:
      bld.LOG2(result, op[0]);
      break;

   case nir_op_fsin:
      bld.SIN(result, op[0]);
      break;

   case nir_op_fcos:
      bld.COS(result, op[0]);
      break;

   case nir_op_fadd:
   case nir_op_fadd_rtne:
      if (instr->op == nir_op_fadd_rtne) {
         bld.exec_all().emit(SHADER_OPCODE_RND_MODE, bld.null_reg_ud(),
                             brw_imm_d(BRW_RND_MODE_RTNE));
      } else if (nir_has_any_rounding_mode_enabled(execution_mode)) {
         brw_rnd_mode rnd =
            brw_rnd_mode_from_execution_mode(execution_mode);
         bld.exec_all().emit(SHADER_OPCODE_RND_MODE, bld.null_reg_ud(),
                             brw_imm_d(rnd));
      }
      FALLTHROUGH;
   case nir_op_iadd:
      bld.ADD(result, op[0], op[1]);
      break;

   case nir_op_iadd3:
      assert(instr->def.bit_size < 64);
      bld.ADD3(result, op[0], op[1], op[2]);
      break;

   case nir_op_iadd_sat:
   case nir_op_uadd_sat:
      inst = bld.ADD(result, op[0], op[1]);
      inst->saturate = true;
      break;

   case nir_op_isub_sat:
      bld.emit(SHADER_OPCODE_ISUB_SAT, result, op[0], op[1]);
      break;

   case nir_op_usub_sat:
      bld.emit(SHADER_OPCODE_USUB_SAT, result, op[0], op[1]);
      break;

   case nir_op_irhadd:
   case nir_op_urhadd:
      assert(instr->def.bit_size < 64);
      bld.AVG(result, op[0], op[1]);
      break;

   case nir_op_ihadd:
   case nir_op_uhadd: {
      assert(instr->def.bit_size < 64);

      op[0] = resolve_source_modifiers(bld, op[0]);
      op[1] = resolve_source_modifiers(bld, op[1]);

      /* AVG(x, y) - ((x ^ y) & 1) */
      brw_reg one = retype(brw_imm_ud(1), result.type);
      bld.ADD(result, bld.AVG(op[0], op[1]),
              negate(bld.AND(bld.XOR(op[0], op[1]), one)));
      break;
   }

   case nir_op_fmul:
      if (nir_has_any_rounding_mode_enabled(execution_mode)) {
         brw_rnd_mode rnd =
            brw_rnd_mode_from_execution_mode(execution_mode);
         bld.exec_all().emit(SHADER_OPCODE_RND_MODE, bld.null_reg_ud(),
                             brw_imm_d(rnd));
      }

      bld.MUL(result, op[0], op[1]);
      break;

   case nir_op_imul_2x32_64:
   case nir_op_umul_2x32_64:
      bld.MUL(result, op[0], op[1]);
      break;

   case nir_op_imul_32x16:
   case nir_op_umul_32x16: {
      const bool ud = instr->op == nir_op_umul_32x16;
      const enum brw_reg_type word_type = ud ? BRW_TYPE_UW : BRW_TYPE_W;
      const enum brw_reg_type dword_type = ud ? BRW_TYPE_UD : BRW_TYPE_D;

      assert(instr->def.bit_size == 32);

      /* Before copy propagation there are no immediate values. */
      assert(op[0].file != IMM && op[1].file != IMM);

      op[1] = subscript(op[1], word_type, 0);

      bld.MUL(result, retype(op[0], dword_type), op[1]);

      break;
   }

   case nir_op_imul:
      assert(instr->def.bit_size < 64);
      bld.MUL(result, op[0], op[1]);
      break;

   case nir_op_imul_high:
   case nir_op_umul_high:
      assert(instr->def.bit_size < 64);
      if (instr->def.bit_size == 32) {
         bld.emit(SHADER_OPCODE_MULH, result, op[0], op[1]);
      } else {
         brw_reg tmp = bld.vgrf(brw_type_with_size(op[0].type, 32));
         bld.MUL(tmp, op[0], op[1]);
         bld.MOV(result, subscript(tmp, result.type, 1));
      }
      break;

   case nir_op_idiv:
   case nir_op_udiv:
      assert(instr->def.bit_size < 64);
      bld.INT_QUOTIENT(result, op[0], op[1]);
      break;

   case nir_op_uadd_carry:
      UNREACHABLE("Should have been lowered by carry_to_arith().");

   case nir_op_usub_borrow:
      UNREACHABLE("Should have been lowered by borrow_to_arith().");

   case nir_op_umod:
   case nir_op_irem:
      /* According to the sign table for INT DIV in the Ivy Bridge PRM, it
       * appears that our hardware just does the right thing for signed
       * remainder.
       */
      assert(instr->def.bit_size < 64);
      bld.INT_REMAINDER(result, op[0], op[1]);
      break;

   case nir_op_imod: {
      /* Get a regular C-style remainder.  If a % b == 0, set the predicate. */
      bld.INT_REMAINDER(result, op[0], op[1]);

      /* Math instructions don't support conditional mod */
      inst = bld.MOV(bld.null_reg_d(), result);
      inst->conditional_mod = BRW_CONDITIONAL_NZ;

      /* Now, we need to determine if signs of the sources are different.
       * When we XOR the sources, the top bit is 0 if they are the same and 1
       * if they are different.  We can then use a conditional modifier to
       * turn that into a predicate.  This leads us to an XOR.l instruction.
       *
       * Technically, according to the PRM, you're not allowed to use .l on a
       * XOR instruction.  However, empirical experiments and Curro's reading
       * of the simulator source both indicate that it's safe.
       */
      bld.XOR(op[0], op[1], &inst);
      inst->predicate = BRW_PREDICATE_NORMAL;
      inst->conditional_mod = BRW_CONDITIONAL_L;

      /* If the result of the initial remainder operation is non-zero and the
       * two sources have different signs, add in a copy of op[1] to get the
       * final integer modulus value.
       */
      inst = bld.ADD(result, result, op[1]);
      inst->predicate = BRW_PREDICATE_NORMAL;
      break;
   }

   case nir_op_flt32:
   case nir_op_fge32:
   case nir_op_feq32:
   case nir_op_fneu32: {
      brw_reg dest = result;

      const uint32_t bit_size =  nir_src_bit_size(instr->src[0].src);
      if (bit_size != 32) {
         dest = bld.vgrf(op[0].type);
         bld.emit_undef_for_partial_reg(dest);
      }

      bld.CMP(dest, op[0], op[1], brw_cmod_for_nir_comparison(instr->op));

      /* The destination will now be used as a source, so select component 0
       * if it's is_scalar (as is done in get_nir_src).
       */
      if (bit_size != 32 && result.is_scalar)
         dest = component(dest, 0);

      if (bit_size > 32) {
         bld.MOV(result, subscript(dest, BRW_TYPE_UD, 0));
      } else if(bit_size < 32) {
         /* When we convert the result to 32-bit we need to be careful and do
          * it as a signed conversion to get sign extension (for 32-bit true)
          */
         const brw_reg_type src_type =
            brw_type_with_size(BRW_TYPE_D, bit_size);

         bld.MOV(retype(result, BRW_TYPE_D), retype(dest, src_type));
      }
      break;
   }

   case nir_op_ilt32:
   case nir_op_ult32:
   case nir_op_ige32:
   case nir_op_uge32:
   case nir_op_ieq32:
   case nir_op_ine32: {
      brw_reg dest = result;

      const uint32_t bit_size = brw_type_size_bits(op[0].type);
      if (bit_size != 32) {
         dest = bld.vgrf(op[0].type);
         bld.emit_undef_for_partial_reg(dest);
      }

      bld.CMP(dest, op[0], op[1],
              brw_cmod_for_nir_comparison(instr->op));

      /* The destination will now be used as a source, so select component 0
       * if it's is_scalar (as is done in get_nir_src).
       */
      if (bit_size != 32 && result.is_scalar)
         dest = component(dest, 0);

      if (bit_size > 32) {
         bld.MOV(result, subscript(dest, BRW_TYPE_UD, 0));
      } else if (bit_size < 32) {
         /* When we convert the result to 32-bit we need to be careful and do
          * it as a signed conversion to get sign extension (for 32-bit true)
          */
         const brw_reg_type src_type =
            brw_type_with_size(BRW_TYPE_D, bit_size);

         bld.MOV(retype(result, BRW_TYPE_D), retype(dest, src_type));
      }
      break;
   }

   case nir_op_inot: {
      nir_alu_instr *inot_src_instr = nir_src_as_alu(instr->src[0].src);

      if (inot_src_instr != NULL &&
          (inot_src_instr->op == nir_op_ior ||
           inot_src_instr->op == nir_op_ixor ||
           inot_src_instr->op == nir_op_iand)) {
         /* The sources of the source logical instruction are now the
          * sources of the instruction that will be generated.
          */
         prepare_alu_destination_and_sources(ntb, ntb.bld, inot_src_instr, op, false);
         resolve_inot_sources(ntb, bld, inot_src_instr, op);

         /* Smash all of the sources and destination to be signed.  This
          * doesn't matter for the operation of the instruction, but cmod
          * propagation fails on unsigned sources with negation (due to
          * brw_inst::can_do_cmod returning false).
          */
         result.type =
            brw_type_for_nir_type(devinfo,
                                  (nir_alu_type)(nir_type_int |
                                                 instr->def.bit_size));
         op[0].type =
            brw_type_for_nir_type(devinfo,
                                  (nir_alu_type)(nir_type_int |
                                                 nir_src_bit_size(inot_src_instr->src[0].src)));
         op[1].type =
            brw_type_for_nir_type(devinfo,
                                  (nir_alu_type)(nir_type_int |
                                                 nir_src_bit_size(inot_src_instr->src[1].src)));

         /* For XOR, only invert one of the sources.  Arbitrarily choose
          * the first source.
          */
         op[0].negate = !op[0].negate;
         if (inot_src_instr->op != nir_op_ixor)
            op[1].negate = !op[1].negate;

         switch (inot_src_instr->op) {
         case nir_op_ior:
            bld.AND(result, op[0], op[1]);
            return;

         case nir_op_iand:
            bld.OR(result, op[0], op[1]);
            return;

         case nir_op_ixor:
            bld.XOR(result, op[0], op[1]);
            return;

         default:
            UNREACHABLE("impossible opcode");
         }
      }
      op[0] = resolve_source_modifiers(bld, op[0]);
      bld.NOT(result, op[0]);
      break;
   }

   case nir_op_ixor:
      resolve_inot_sources(ntb, bld, instr, op);
      bld.XOR(result, op[0], op[1]);
      break;
   case nir_op_ior:
      resolve_inot_sources(ntb, bld, instr, op);
      bld.OR(result, op[0], op[1]);
      break;
   case nir_op_iand:
      resolve_inot_sources(ntb, bld, instr, op);
      bld.AND(result, op[0], op[1]);
      break;

   case nir_op_fdot2:
   case nir_op_fdot3:
   case nir_op_fdot4:
   case nir_op_b32all_fequal2:
   case nir_op_b32all_iequal2:
   case nir_op_b32all_fequal3:
   case nir_op_b32all_iequal3:
   case nir_op_b32all_fequal4:
   case nir_op_b32all_iequal4:
   case nir_op_b32any_fnequal2:
   case nir_op_b32any_inequal2:
   case nir_op_b32any_fnequal3:
   case nir_op_b32any_inequal3:
   case nir_op_b32any_fnequal4:
   case nir_op_b32any_inequal4:
      UNREACHABLE("Lowered by nir_lower_alu_reductions");

   case nir_op_ldexp:
      UNREACHABLE("not reached: should be handled by ldexp_to_arith()");

   case nir_op_fsqrt:
      bld.SQRT(result, op[0]);
      break;

   case nir_op_frsq:
      bld.RSQ(result, op[0]);
      break;

   case nir_op_ftrunc:
      bld.RNDZ(result, op[0]);
      break;

   case nir_op_fceil:
      bld.MOV(result, negate(bld.RNDD(negate(op[0]))));
      break;
   case nir_op_ffloor:
      bld.RNDD(result, op[0]);
      break;
   case nir_op_ffract:
      bld.FRC(result, op[0]);
      break;
   case nir_op_fround_even:
      bld.RNDE(result, op[0]);
      break;

   case nir_op_imin:
   case nir_op_umin:
   case nir_op_fmin:
      bld.emit_minmax(result, op[0], op[1], BRW_CONDITIONAL_L);
      break;

   case nir_op_imax:
   case nir_op_umax:
   case nir_op_fmax:
      bld.emit_minmax(result, op[0], op[1], BRW_CONDITIONAL_GE);
      break;

   case nir_op_pack_snorm_2x16:
   case nir_op_pack_snorm_4x8:
   case nir_op_pack_unorm_2x16:
   case nir_op_pack_unorm_4x8:
   case nir_op_unpack_snorm_2x16:
   case nir_op_unpack_snorm_4x8:
   case nir_op_unpack_unorm_2x16:
   case nir_op_unpack_unorm_4x8:
   case nir_op_unpack_half_2x16:
   case nir_op_pack_half_2x16:
      UNREACHABLE("not reached: should be handled by lower_packing_builtins");

   case nir_op_pack_64_2x32_split:
   case nir_op_pack_32_2x16_split:
      bld.emit(FS_OPCODE_PACK, result, op[0], op[1]);
      break;

   case nir_op_pack_32_4x8_split:
      bld.emit(FS_OPCODE_PACK, result, op, 4);
      break;

   case nir_op_unpack_64_2x32_split_x:
   case nir_op_unpack_64_2x32_split_y: {
      if (instr->op == nir_op_unpack_64_2x32_split_x)
         bld.MOV(result, subscript(op[0], BRW_TYPE_UD, 0));
      else
         bld.MOV(result, subscript(op[0], BRW_TYPE_UD, 1));
      break;
   }

   case nir_op_unpack_32_2x16_split_x:
   case nir_op_unpack_32_2x16_split_y: {
      if (instr->op == nir_op_unpack_32_2x16_split_x)
         bld.MOV(result, subscript(op[0], BRW_TYPE_UW, 0));
      else
         bld.MOV(result, subscript(op[0], BRW_TYPE_UW, 1));
      break;
   }

   case nir_op_fpow:
      bld.POW(result, op[0], op[1]);
      break;

   case nir_op_bitfield_reverse:
      assert(instr->def.bit_size == 32);
      assert(nir_src_bit_size(instr->src[0].src) == 32);
      bld.BFREV(result, op[0]);
      break;

   case nir_op_bit_count:
      assert(instr->def.bit_size == 32);
      assert(nir_src_bit_size(instr->src[0].src) < 64);
      bld.CBIT(result, op[0]);
      break;

   case nir_op_uclz:
      assert(instr->def.bit_size == 32);
      assert(nir_src_bit_size(instr->src[0].src) == 32);
      bld.LZD(retype(result, BRW_TYPE_UD), op[0]);
      break;

   case nir_op_ifind_msb: {
      assert(instr->def.bit_size == 32);
      assert(nir_src_bit_size(instr->src[0].src) == 32);

      brw_reg tmp = bld.FBH(retype(op[0], BRW_TYPE_D));

      /* FBH counts from the MSB side, while GLSL's findMSB() wants the count
       * from the LSB side. If FBH didn't return an error (0xFFFFFFFF), then
       * subtract the result from 31 to convert the MSB count into an LSB
       * count.
       */
      brw_reg count_from_lsb = bld.ADD(negate(tmp), brw_imm_w(31));

      /* The high word of the FBH result will be 0xffff or 0x0000. After
       * calculating 31 - fbh, we can obtain the correct result for
       * ifind_msb(0) by ORing the (sign extended) upper word of the
       * intermediate result.
       */
      bld.OR(result, count_from_lsb, subscript(tmp, BRW_TYPE_W, 1));
      break;
   }

   case nir_op_find_lsb:
      assert(instr->def.bit_size == 32);
      assert(nir_src_bit_size(instr->src[0].src) == 32);
      bld.FBL(result, op[0]);
      break;

   case nir_op_ubitfield_extract:
   case nir_op_ibitfield_extract:
      UNREACHABLE("should have been lowered");
   case nir_op_ubfe:
   case nir_op_ibfe:
      assert(instr->def.bit_size < 64);
      bld.BFE(result, op[2], op[1], op[0]);
      break;
   case nir_op_bfm:
      assert(instr->def.bit_size < 64);
      bld.BFI1(result, op[0], op[1]);
      break;
   case nir_op_bfi:
      assert(instr->def.bit_size < 64);

      /* bfi is ((...) | (~src0 & src2)). The second part is zero when src2 is
       * either 0 or src0. Replacing the 0 with another value can eliminate a
       * temporary register.
       */
      if (is_const_zero(instr->src[2]))
         bld.BFI2(result, op[0], op[1], op[0]);
      else
         bld.BFI2(result, op[0], op[1], op[2]);

      break;

   case nir_op_bitfield_insert:
      UNREACHABLE("not reached: should have been lowered");

   case nir_op_bitfield_select:
      bld.BFN(result, op[0], op[1], op[2], UTIL_LUT3((a & b) | (~a & c)));
      break;

   /* With regards to implicit masking of the shift counts for 8- and 16-bit
    * types, the PRMs are **incorrect**. They falsely state that on Gen9+ only
    * the low bits of src1 matching the size of src0 (e.g., 4-bits for W or UW
    * src0) are used. The Bspec (backed by data from experimentation) state
    * that 0x3f is used for Q and UQ types, and 0x1f is used for **all** other
    * types.
    *
    * The match the behavior expected for the NIR opcodes, explicit masks for
    * 8- and 16-bit types must be added.
    */
   case nir_op_ishl:
      if (instr->def.bit_size < 32) {
         bld.SHL(result, op[0],
                 bld.AND(subscript(op[1], BRW_TYPE_UW, 0),
                         brw_imm_uw(instr->def.bit_size - 1)));
      } else {
         bld.SHL(result, op[0], op[1]);
      }

      break;
   case nir_op_ishr:
      if (instr->def.bit_size < 32) {
         bld.ASR(result, op[0],
                 bld.AND(subscript(op[1], BRW_TYPE_UW, 0),
                         brw_imm_uw(instr->def.bit_size - 1)));
      } else {
         bld.ASR(result, op[0], op[1]);
      }

      break;
   case nir_op_ushr:
      if (instr->def.bit_size < 32) {
         bld.SHR(result, op[0],
                 bld.AND(subscript(op[1], BRW_TYPE_UW, 0),
                         brw_imm_uw(instr->def.bit_size - 1)));
      } else {
         bld.SHR(result, op[0], op[1]);
      }

      break;

   case nir_op_urol:
      bld.ROL(result, op[0], op[1]);
      break;
   case nir_op_uror:
      bld.ROR(result, op[0], op[1]);
      break;

   case nir_op_pack_half_2x16_split:
      bld.emit(FS_OPCODE_PACK_HALF_2x16_SPLIT, result, op[0], op[1]);
      break;

   case nir_op_sdot_4x8_iadd:
   case nir_op_sdot_4x8_iadd_sat:
      inst = bld.DP4A(retype(result, BRW_TYPE_D),
                      retype(op[2], BRW_TYPE_D),
                      retype(op[0], BRW_TYPE_D),
                      retype(op[1], BRW_TYPE_D));

      if (instr->op == nir_op_sdot_4x8_iadd_sat)
         inst->saturate = true;
      break;

   case nir_op_udot_4x8_uadd:
   case nir_op_udot_4x8_uadd_sat:
      inst = bld.DP4A(retype(result, BRW_TYPE_UD),
                      retype(op[2], BRW_TYPE_UD),
                      retype(op[0], BRW_TYPE_UD),
                      retype(op[1], BRW_TYPE_UD));

      if (instr->op == nir_op_udot_4x8_uadd_sat)
         inst->saturate = true;
      break;

   case nir_op_sudot_4x8_iadd:
   case nir_op_sudot_4x8_iadd_sat:
      inst = bld.DP4A(retype(result, BRW_TYPE_D),
                      retype(op[2], BRW_TYPE_D),
                      retype(op[0], BRW_TYPE_D),
                      retype(op[1], BRW_TYPE_UD));

      if (instr->op == nir_op_sudot_4x8_iadd_sat)
         inst->saturate = true;
      break;

   case nir_op_ffma:
      if (nir_has_any_rounding_mode_enabled(execution_mode)) {
         brw_rnd_mode rnd =
            brw_rnd_mode_from_execution_mode(execution_mode);
         bld.exec_all().emit(SHADER_OPCODE_RND_MODE, bld.null_reg_ud(),
                             brw_imm_d(rnd));
      }

      bld.MAD(result, op[2], op[1], op[0]);
      break;

   case nir_op_flrp:
      if (nir_has_any_rounding_mode_enabled(execution_mode)) {
         brw_rnd_mode rnd =
            brw_rnd_mode_from_execution_mode(execution_mode);
         bld.exec_all().emit(SHADER_OPCODE_RND_MODE, bld.null_reg_ud(),
                             brw_imm_d(rnd));
      }

      bld.LRP(result, op[0], op[1], op[2]);
      break;

   case nir_op_b32csel:
      if (optimize_frontfacing_ternary(ntb, instr, result))
         return;

      bld.CMP(bld.null_reg_d(), op[0], brw_imm_d(0), BRW_CONDITIONAL_NZ);
      inst = bld.SEL(result, op[1], op[2]);
      inst->predicate = BRW_PREDICATE_NORMAL;
      break;

   case nir_op_fcsel:
      bld.CSEL(result, op[1], op[2], op[0], BRW_CONDITIONAL_NZ);
      break;

   case nir_op_fcsel_gt:
      bld.CSEL(result, op[1], op[2], op[0], BRW_CONDITIONAL_G);
      break;

   case nir_op_fcsel_ge:
      bld.CSEL(result, op[1], op[2], op[0], BRW_CONDITIONAL_GE);
      break;

   case nir_op_extract_u8:
   case nir_op_extract_i8: {
      const brw_reg_type type = brw_int_type(1, instr->op == nir_op_extract_i8);
      unsigned byte = nir_src_as_uint(instr->src[1].src);

      /* The PRMs say:
       *
       *    BDW+
       *    There is no direct conversion from B/UB to Q/UQ or Q/UQ to B/UB.
       *    Use two instructions and a word or DWord intermediate integer type.
       */
      if (instr->def.bit_size == 64) {
         if (instr->op == nir_op_extract_i8) {
            /* If we need to sign extend, extract to a word first */
            brw_reg w_temp = bld.vgrf(BRW_TYPE_W);
            bld.MOV(w_temp, subscript(op[0], type, byte));
            bld.MOV(result, w_temp);
         } else if (byte & 1) {
            /* Extract the high byte from the word containing the desired byte
             * offset.
             */
            bld.SHR(result,
                    subscript(op[0], BRW_TYPE_UW, byte / 2),
                    brw_imm_uw(8));
         } else {
            /* Otherwise use an AND with 0xff and a word type */
            bld.AND(result,
                    subscript(op[0], BRW_TYPE_UW, byte / 2),
                    brw_imm_uw(0xff));
         }
      } else {
         bld.MOV(result, subscript(op[0], type, byte));
      }
      break;
   }

   case nir_op_extract_u16:
   case nir_op_extract_i16: {
      const brw_reg_type type = brw_int_type(2, instr->op == nir_op_extract_i16);
      unsigned word = nir_src_as_uint(instr->src[1].src);
      bld.MOV(result, subscript(op[0], type, word));
      break;
   }

   /* BFloat16 values in NIR are represented by uint16_t,
    * but BRW can handle them natively.
    */

   case nir_op_bf2f:
      bld.MOV(result, retype(op[0], BRW_TYPE_BF));
      break;

   case nir_op_f2bf:
      bld.MOV(retype(result, BRW_TYPE_BF), op[0]);
      break;

   case nir_op_bfmul:
      bld.MUL(retype(result, BRW_TYPE_BF),
              retype(op[0], BRW_TYPE_BF),
              retype(op[1], BRW_TYPE_BF));
      break;

   case nir_op_bffma:
      bld.MAD(retype(result, BRW_TYPE_BF),
              retype(op[2], BRW_TYPE_BF),
              retype(op[1], BRW_TYPE_BF),
              retype(op[0], BRW_TYPE_BF));
      break;

   default:
      UNREACHABLE("unhandled instruction");
   }
}

static void
brw_from_nir_emit_load_const(nir_to_brw_state &ntb,
                       nir_load_const_instr *instr)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld.scalar_group();

   const brw_reg_type reg_type =
      brw_type_with_size(BRW_TYPE_D, instr->def.bit_size);
   brw_reg reg = bld.vgrf(reg_type, instr->def.num_components);

   reg.is_scalar = true;

   brw_reg comps[NIR_MAX_VEC_COMPONENTS];

   switch (instr->def.bit_size) {
   case 8:
      for (unsigned i = 0; i < instr->def.num_components; i++)
         comps[i] = setup_imm_b(bld, instr->value[i].i8);
      break;

   case 16:
      for (unsigned i = 0; i < instr->def.num_components; i++)
         comps[i] = brw_imm_w(instr->value[i].i16);
      break;

   case 32:
      for (unsigned i = 0; i < instr->def.num_components; i++)
         comps[i] = brw_imm_d(instr->value[i].i32);
      break;

   case 64:
      if (!devinfo->has_64bit_int) {
         reg.type = BRW_TYPE_DF;
         for (unsigned i = 0; i < instr->def.num_components; i++)
            comps[i] = brw_imm_df(instr->value[i].f64);
      } else {
         for (unsigned i = 0; i < instr->def.num_components; i++)
            comps[i] = brw_imm_q(instr->value[i].i64);
      }
      break;

   default:
      UNREACHABLE("Invalid bit size");
   }

   bld.VEC(reg, comps, instr->def.num_components);

   ntb.ssa_values[instr->def.index] = reg;
}

static bool
get_nir_src_bindless(nir_to_brw_state &ntb, const nir_src &src)
{
   return ntb.ssa_bind_infos[src.ssa->index].bindless;
}

static bool
get_nir_src_internal(nir_to_brw_state &ntb, const nir_src &src)
{
   return ntb.ssa_bind_infos[src.ssa->index].internal;
}

/**
 * Specifying -1 for channel indicates that no channel selection should be applied.
 */
static brw_reg
get_nir_src(nir_to_brw_state &ntb, const nir_src &src, int channel)
{
   nir_intrinsic_instr *load_reg = nir_load_reg_for_def(src.ssa);

   brw_reg reg;
   if (!load_reg) {
      if (nir_src_is_undef(src)) {
         const brw_reg_type reg_type =
            brw_type_with_size(BRW_TYPE_D, src.ssa->bit_size);
         reg = ntb.bld.vgrf(reg_type, src.ssa->num_components);
      } else {
         reg = ntb.ssa_values[src.ssa->index];
      }
   } else {
      nir_intrinsic_instr *decl_reg = nir_reg_get_decl(load_reg->src[0].ssa);
      /* We don't handle indirects on locals */
      assert(nir_intrinsic_base(load_reg) == 0);
      assert(load_reg->intrinsic != nir_intrinsic_load_reg_indirect);
      reg = ntb.ssa_values[decl_reg->def.index];
   }

   /* To avoid floating-point denorm flushing problems, set the type by
    * default to an integer type - instructions that need floating point
    * semantics will set this to F if they need to
    */
   reg.type = brw_type_with_size(BRW_TYPE_D, nir_src_bit_size(src));

   if (channel >= 0) {
      reg = offset(reg, ntb.bld, channel);

      /* If the dispatch width matches the scalar allocation width, offset()
       * won't set the stride to zero. Force that here.
       */
      if (reg.is_scalar)
         reg = component(reg, 0);
   }

   return reg;
}

/**
 * Return an IMM for 32-bit constants; otherwise call get_nir_src() as normal.
 */
static brw_reg
get_nir_src_imm(nir_to_brw_state &ntb, const nir_src &src)
{
   return nir_src_is_const(src) && nir_src_bit_size(src) == 32 ?
          brw_reg(brw_imm_d(nir_src_as_int(src))) : get_nir_src(ntb, src, 0);
}

static brw_reg
get_nir_def(nir_to_brw_state &ntb, const nir_def &def, bool all_sources_uniform)
{
   nir_intrinsic_instr *store_reg = nir_store_reg_for_def(&def);
   bool is_scalar = false;

   if (nir_def_is_intrinsic(&def) && store_reg == NULL) {
      const nir_intrinsic_instr *instr = nir_def_as_intrinsic(&def);

      switch (instr->intrinsic) {
      case nir_intrinsic_load_btd_global_arg_addr_intel:
      case nir_intrinsic_load_btd_local_arg_addr_intel:
      case nir_intrinsic_load_btd_shader_type_intel:
      case nir_intrinsic_load_global_constant_uniform_block_intel:
      case nir_intrinsic_load_reloc_const_intel:
      case nir_intrinsic_load_ssbo_uniform_block_intel:
      case nir_intrinsic_load_ubo_uniform_block_intel:
      case nir_intrinsic_load_workgroup_id:
      case nir_intrinsic_load_indirect_address_intel:
      case nir_intrinsic_subgroup_barrier_index_intel:
         is_scalar = true;
         break;

      case nir_intrinsic_load_ubo:
         is_scalar = get_nir_src(ntb, instr->src[1], 0).is_scalar;
         break;

      case nir_intrinsic_load_push_data_intel:
      case nir_intrinsic_load_inline_data_intel:
      case nir_intrinsic_load_shader_indirect_data_intel:
         is_scalar = get_nir_src(ntb, instr->src[0], 0).is_scalar;
         break;

      case nir_intrinsic_ballot:
      case nir_intrinsic_resource_intel:
         is_scalar = !def.divergent;
         break;

      default:
         break;
      }

      /* This cannot be is_scalar if NIR thought it was divergent. */
      assert(!(is_scalar && def.divergent));
   } else if (nir_def_is_alu(&def)) {
      is_scalar = store_reg == NULL && all_sources_uniform && !def.divergent;
   }

   const brw_builder &bld = is_scalar ? ntb.bld.scalar_group() : ntb.bld;

   if (!store_reg) {
      const brw_reg_type reg_type =
         brw_type_with_size(def.bit_size == 8 ? BRW_TYPE_D : BRW_TYPE_F,
                            def.bit_size);
      ntb.ssa_values[def.index] =
         bld.vgrf(reg_type, def.num_components);

      ntb.ssa_values[def.index].is_scalar = is_scalar;

      bld.emit_undef_for_partial_reg(ntb.ssa_values[def.index]);

      return ntb.ssa_values[def.index];
   } else {
      nir_intrinsic_instr *decl_reg = nir_reg_get_decl(store_reg->src[1].ssa);
      /* We don't handle indirects on locals */
      assert(nir_intrinsic_base(store_reg) == 0);
      assert(store_reg->intrinsic != nir_intrinsic_store_reg_indirect);
      assert(!is_scalar);
      return ntb.ssa_values[decl_reg->def.index];
   }
}

static nir_component_mask_t
get_nir_write_mask(const nir_def &def)
{
   nir_intrinsic_instr *store_reg = nir_store_reg_for_def(&def);
   if (!store_reg) {
      return nir_component_mask(def.num_components);
   } else {
      return nir_intrinsic_write_mask(store_reg);
   }
}

static brw_inst *
emit_pixel_interpolater_send(const brw_builder &bld,
                             enum opcode opcode,
                             const brw_reg &dst,
                             const brw_reg &src,
                             const brw_reg &desc,
                             const brw_reg &flag_reg,
                             glsl_interp_mode interpolation)
{
   struct brw_fs_prog_data *fs_prog_data =
      brw_fs_prog_data(bld.shader->prog_data);

   brw_reg srcs[INTERP_NUM_SRCS];

   if (src.is_scalar) {
      srcs[INTERP_SRC_OFFSET] = bld.vgrf(src.type, 2);
      brw_combine_with_vec(bld, srcs[INTERP_SRC_OFFSET], src, 2);
   } else {
      srcs[INTERP_SRC_OFFSET] = src;
   }

   srcs[INTERP_SRC_MSG_DESC]     = desc;
   srcs[INTERP_SRC_DYNAMIC_MODE] = flag_reg;
   srcs[INTERP_SRC_NOPERSPECTIVE] = brw_imm_ud(false);

   if (interpolation == INTERP_MODE_NOPERSPECTIVE) {
      srcs[INTERP_SRC_NOPERSPECTIVE] = brw_imm_ud(true);

      /* TGL BSpec says:
       *     This field cannot be set to "Linear Interpolation"
       *     unless Non-Perspective Barycentric Enable in 3DSTATE_CLIP is enabled"
       */
      fs_prog_data->uses_nonperspective_interp_modes = true;
   }

   brw_inst *inst = bld.emit(opcode, dst, srcs, INTERP_NUM_SRCS);
   /* 2 floats per slot returned */
   inst->size_written = 2 * dst.component_size(inst->exec_size);

   fs_prog_data->pulls_bary = true;

   return inst;
}

/**
 * Return the specified component \p subreg of a per-polygon PS
 * payload register for the polygon corresponding to each channel
 * specified in the provided \p bld.
 *
 * \p reg specifies the payload register in REG_SIZE units for the
 * first polygon dispatched to the thread.  This function requires
 * that subsequent registers on the payload contain the corresponding
 * register for subsequent polygons, one GRF register per polygon, if
 * multiple polygons are being processed by the same PS thread.
 *
 * This can be used to access the value of a "Source Depth and/or W
 * Attribute Vertex Deltas", "Perspective Bary Planes" or
 * "Non-Perspective Bary Planes" payload field conveniently for
 * multiple polygons as a single brw_reg.
 */
static brw_reg
fetch_polygon_reg(const brw_builder &bld, unsigned reg, unsigned subreg)
{
   const brw_shader *shader = bld.shader;
   assert(shader->stage == MESA_SHADER_FRAGMENT);

   const struct intel_device_info *devinfo = shader->devinfo;
   const unsigned poly_width = shader->dispatch_width / shader->max_polygons;
   const unsigned poly_idx = bld.group() / poly_width;
   assert(bld.group() % poly_width == 0);

   if (bld.dispatch_width() > poly_width) {
      assert(bld.dispatch_width() <= 2 * poly_width);
      const unsigned reg_size = reg_unit(devinfo) * REG_SIZE;
      const unsigned vstride = reg_size / brw_type_size_bytes(BRW_TYPE_F);
      return stride(brw_vec1_grf(reg + reg_unit(devinfo) * poly_idx, subreg),
                    vstride, poly_width, 0);
   } else {
      return brw_vec1_grf(reg + reg_unit(devinfo) * poly_idx, subreg);
   }
}

/**
 * Interpolate per-polygon barycentrics at a specific offset relative
 * to each channel fragment coordinates, optionally using
 * perspective-correct interpolation if requested.  This is mostly
 * useful as replacement for the PI shared function that existed on
 * platforms prior to Xe2, but is expected to work on earlier
 * platforms since we can get the required polygon setup information
 * from the thread payload as far back as ICL.
 */
static void
emit_pixel_interpolater_alu_at_offset(const brw_builder &bld,
                                      const brw_reg &dst,
                                      const brw_reg &offs,
                                      glsl_interp_mode interpolation)
{
   const brw_shader *shader = bld.shader;
   assert(shader->stage == MESA_SHADER_FRAGMENT);

   const intel_device_info *devinfo = shader->devinfo;
   assert(devinfo->ver >= 11);

   const brw_fs_thread_payload &payload = shader->fs_payload();
   const struct brw_fs_prog_data *fs_prog_data =
      brw_fs_prog_data(shader->prog_data);

   if (interpolation == INTERP_MODE_NOPERSPECTIVE) {
      assert(fs_prog_data->uses_npc_bary_coefficients &&
             fs_prog_data->uses_nonperspective_interp_modes);
   } else {
      assert(interpolation == INTERP_MODE_SMOOTH);
      assert(fs_prog_data->uses_pc_bary_coefficients &&
             fs_prog_data->uses_depth_w_coefficients);
   }

   /* Account for half-pixel X/Y coordinate offset. */
   const brw_reg off_x = bld.vgrf(BRW_TYPE_F);
   bld.ADD(off_x, offset(offs, bld, 0), brw_imm_f(0.5));

   const brw_reg off_y = bld.vgrf(BRW_TYPE_F);
   bld.ADD(off_y, offset(offs, bld, 1), brw_imm_f(0.5));

   const brw_reg pixel_x = bld.vgrf(BRW_TYPE_F);
   bld.MOV(pixel_x, shader->uw_pixel_x);
   const brw_reg pixel_y = bld.vgrf(BRW_TYPE_F);
   bld.MOV(pixel_y, shader->uw_pixel_y);

   /* Process no more than two polygons at a time to avoid hitting
    * regioning restrictions.
    */
   const unsigned poly_width = shader->dispatch_width / shader->max_polygons;

   for (unsigned i = 0; i < DIV_ROUND_UP(shader->max_polygons, 2); i++) {
      const brw_builder ibld = bld.group(MIN2(bld.dispatch_width(), 2 * poly_width), i);

      /* Fetch needed parameters from the thread payload. */
      const unsigned bary_coef_reg = interpolation == INTERP_MODE_NOPERSPECTIVE ?
         payload.npc_bary_coef_reg : payload.pc_bary_coef_reg;
      const brw_reg start_x = devinfo->ver < 12 ? fetch_polygon_reg(ibld, 1, 1) :
         fetch_polygon_reg(ibld, bary_coef_reg,
                           devinfo->ver >= 20 ? 6 : 2);
      const brw_reg start_y = devinfo->ver < 12 ? fetch_polygon_reg(ibld, 1, 6) :
         fetch_polygon_reg(ibld, bary_coef_reg,
                           devinfo->ver >= 20 ? 7 : 6);

      const brw_reg bary1_c0 = fetch_polygon_reg(ibld, bary_coef_reg,
                                                devinfo->ver >= 20 ? 2 : 3);
      const brw_reg bary1_cx = fetch_polygon_reg(ibld, bary_coef_reg, 1);
      const brw_reg bary1_cy = fetch_polygon_reg(ibld, bary_coef_reg, 0);

      const brw_reg bary2_c0 = fetch_polygon_reg(ibld, bary_coef_reg,
                                                devinfo->ver >= 20 ? 5 : 7);
      const brw_reg bary2_cx = fetch_polygon_reg(ibld, bary_coef_reg,
                                                devinfo->ver >= 20 ? 4 : 5);
      const brw_reg bary2_cy = fetch_polygon_reg(ibld, bary_coef_reg,
                                                devinfo->ver >= 20 ? 3 : 4);

      const brw_reg rhw_c0 = devinfo->ver >= 20 ?
         fetch_polygon_reg(ibld, payload.depth_w_coef_reg + 1, 5) :
         fetch_polygon_reg(ibld, payload.depth_w_coef_reg, 7);
      const brw_reg rhw_cx = devinfo->ver >= 20 ?
         fetch_polygon_reg(ibld, payload.depth_w_coef_reg + 1, 4) :
         fetch_polygon_reg(ibld, payload.depth_w_coef_reg, 5);
      const brw_reg rhw_cy = devinfo->ver >= 20 ?
         fetch_polygon_reg(ibld, payload.depth_w_coef_reg + 1, 3) :
         fetch_polygon_reg(ibld, payload.depth_w_coef_reg, 4);

      /* Compute X/Y coordinate deltas relative to the origin of the polygon. */
      const brw_reg delta_x = ibld.vgrf(BRW_TYPE_F);
      ibld.ADD(delta_x, offset(pixel_x, ibld, i), negate(start_x));
      ibld.ADD(delta_x, delta_x, offset(off_x, ibld, i));

      const brw_reg delta_y = ibld.vgrf(BRW_TYPE_F);
      ibld.ADD(delta_y, offset(pixel_y, ibld, i), negate(start_y));
      ibld.ADD(delta_y, delta_y, offset(off_y, ibld, i));

      /* Evaluate the plane equations obtained above for the
       * barycentrics and RHW coordinate at the offset specified for
       * each channel.  Limit arithmetic to acc_width in order to
       * allow the accumulator to be used for linear interpolation.
       */
      const unsigned acc_width = 16 * reg_unit(devinfo);
      const brw_reg rhw = ibld.vgrf(BRW_TYPE_F);
      const brw_reg bary1 = ibld.vgrf(BRW_TYPE_F);
      const brw_reg bary2 = ibld.vgrf(BRW_TYPE_F);

      for (unsigned j = 0; j < DIV_ROUND_UP(ibld.dispatch_width(), acc_width); j++) {
         const brw_builder jbld = ibld.group(MIN2(ibld.dispatch_width(), acc_width), j);
         const brw_reg acc = suboffset(brw_acc_reg(16), jbld.group() % acc_width);

         if (interpolation != INTERP_MODE_NOPERSPECTIVE) {
            jbld.MAD(acc, horiz_offset(rhw_c0, acc_width * j),
                     horiz_offset(rhw_cx, acc_width * j), offset(delta_x, jbld, j));
            jbld.MAC(offset(rhw, jbld, j),
                     horiz_offset(rhw_cy, acc_width * j), offset(delta_y, jbld, j));
         }

         jbld.MAD(acc, horiz_offset(bary1_c0, acc_width * j),
                  horiz_offset(bary1_cx, acc_width * j), offset(delta_x, jbld, j));
         jbld.MAC(offset(bary1, jbld, j),
                  horiz_offset(bary1_cy, acc_width * j), offset(delta_y, jbld, j));

         jbld.MAD(acc, horiz_offset(bary2_c0, acc_width * j),
                  horiz_offset(bary2_cx, acc_width * j), offset(delta_x, jbld, j));
         jbld.MAC(offset(bary2, jbld, j),
                  horiz_offset(bary2_cy, acc_width * j), offset(delta_y, jbld, j));
      }

      /* Scale the results dividing by the interpolated RHW coordinate
       * if the interpolation is required to be perspective-correct.
       */
      if (interpolation == INTERP_MODE_NOPERSPECTIVE) {
         ibld.MOV(offset(dst, ibld, i), bary1);
         ibld.MOV(offset(offset(dst, bld, 1), ibld, i), bary2);
      } else {
         const brw_reg w = ibld.vgrf(BRW_TYPE_F);
         ibld.emit(SHADER_OPCODE_RCP, w, rhw);
         ibld.MUL(offset(dst, ibld, i), bary1, w);
         ibld.MUL(offset(offset(dst, bld, 1), ibld, i), bary2, w);
      }
   }
}

/**
 * Interpolate per-polygon barycentrics at a specified sample index,
 * optionally using perspective-correct interpolation if requested.
 * This is mostly useful as replacement for the PI shared function
 * that existed on platforms prior to Xe2, but is expected to work on
 * earlier platforms since we can get the required polygon setup
 * information from the thread payload as far back as ICL.
 */
static void
emit_pixel_interpolater_alu_at_sample(const brw_builder &bld,
                                      const brw_reg &dst,
                                      const brw_reg &idx,
                                      glsl_interp_mode interpolation)
{
   const brw_fs_thread_payload &payload = bld.shader->fs_payload();
   const struct brw_fs_prog_data *fs_prog_data =
      brw_fs_prog_data(bld.shader->prog_data);
   const brw_builder ubld = bld.exec_all().group(16, 0);
   const brw_reg sample_offs_xy = ubld.vgrf(BRW_TYPE_UD);
   assert(fs_prog_data->uses_sample_offsets);

   /* Interleave the X/Y coordinates of each sample in order to allow
    * a single indirect look-up, by using a MOV for the 16 X
    * coordinates, then another MOV for the 16 Y coordinates.
    */
   for (unsigned i = 0; i < 2; i++) {
      const brw_reg reg = retype(brw_vec16_grf(payload.sample_offsets_reg, 4 * i),
                                BRW_TYPE_UB);
      ubld.MOV(subscript(sample_offs_xy, BRW_TYPE_UW, i), reg);
   }

   /* Use indirect addressing to fetch the X/Y offsets of the sample
    * index provided for each channel.
    */
   const brw_reg idx_b = bld.vgrf(BRW_TYPE_UD);
   bld.MUL(idx_b, idx, brw_imm_ud(brw_type_size_bytes(BRW_TYPE_UD)));

   const brw_reg off_xy = bld.vgrf(BRW_TYPE_UD);
   bld.emit(SHADER_OPCODE_MOV_INDIRECT, off_xy, component(sample_offs_xy, 0),
            idx_b, brw_imm_ud(16 * brw_type_size_bytes(BRW_TYPE_UD)));

   /* Convert the selected fixed-point offsets to floating-point
    * offsets.
    */
   const brw_reg offs = bld.vgrf(BRW_TYPE_F, 2);

   for (unsigned i = 0; i < 2; i++) {
      const brw_reg tmp = bld.vgrf(BRW_TYPE_F);
      bld.MOV(tmp, subscript(off_xy, BRW_TYPE_UW, i));
      bld.MUL(tmp, tmp, brw_imm_f(0.0625));
      bld.ADD(offset(offs, bld, i), tmp, brw_imm_f(-0.5));
   }

   /* Interpolate at the resulting offsets. */
   emit_pixel_interpolater_alu_at_offset(bld, dst, offs, interpolation);
}

/**
 * Computes 1 << x, given a D/UD register containing some value x.
 */
static brw_reg
intexp2(const brw_builder &bld, const brw_reg &x)
{
   assert(x.type == BRW_TYPE_UD || x.type == BRW_TYPE_D);

   return bld.SHL(bld.MOV(retype(brw_imm_d(1), x.type)), x);
}

static void
emit_gs_end_primitive(nir_to_brw_state &ntb, const nir_src &vertex_count_nir_src)
{
   brw_shader &s = ntb.s;
   assert(s.stage == MESA_SHADER_GEOMETRY);

   struct brw_gs_prog_data *gs_prog_data = brw_gs_prog_data(s.prog_data);

   if (s.gs.control_data_header_size_bits == 0)
      return;

   /* We can only do EndPrimitive() functionality when the control data
    * consists of cut bits.  Fortunately, the only time it isn't is when the
    * output type is points, in which case EndPrimitive() is a no-op.
    */
   if (gs_prog_data->control_data_format !=
       GFX7_GS_CONTROL_DATA_FORMAT_GSCTL_CUT) {
      return;
   }

   /* Cut bits use one bit per vertex. */
   assert(s.gs.control_data_bits_per_vertex == 1);

   brw_reg vertex_count = get_nir_src(ntb, vertex_count_nir_src, 0);
   vertex_count.type = BRW_TYPE_UD;

   /* Cut bit n should be set to 1 if EndPrimitive() was called after emitting
    * vertex n, 0 otherwise.  So all we need to do here is mark bit
    * (vertex_count - 1) % 32 in the cut_bits register to indicate that
    * EndPrimitive() was called after emitting vertex (vertex_count - 1);
    * vec4_gs_visitor::emit_control_data_bits() will take care of the rest.
    *
    * Note that if EndPrimitive() is called before emitting any vertices, this
    * will cause us to set bit 31 of the control_data_bits register to 1.
    * That's fine because:
    *
    * - If max_vertices < 32, then vertex number 31 (zero-based) will never be
    *   output, so the hardware will ignore cut bit 31.
    *
    * - If max_vertices == 32, then vertex number 31 is guaranteed to be the
    *   last vertex, so setting cut bit 31 has no effect (since the primitive
    *   is automatically ended when the GS terminates).
    *
    * - If max_vertices > 32, then the ir_emit_vertex visitor will reset the
    *   control_data_bits register to 0 when the first vertex is emitted.
    */

   const brw_builder abld = ntb.bld.annotate("end primitive");

   /* control_data_bits |= 1 << ((vertex_count - 1) % 32) */
   brw_reg prev_count = abld.ADD(vertex_count, brw_imm_ud(0xffffffffu));
   brw_reg mask = intexp2(abld, prev_count);
   /* Note: we're relying on the fact that the GEN SHL instruction only pays
    * attention to the lower 5 bits of its second source argument, so on this
    * architecture, 1 << (vertex_count - 1) is equivalent to 1 <<
    * ((vertex_count - 1) % 32).
    */
   abld.OR(s.control_data_bits, s.control_data_bits, mask);
}

brw_reg
brw_shader::gs_urb_per_slot_dword_index(const brw_reg &vertex_count)
{
   /* We use a single UD register to accumulate control data bits (32 bits
    * for each of the SIMD8 channels).  So we need to write a DWord (32 bits)
    * at a time.
    *
    * On platforms < Xe2:
    *    Unfortunately,the URB_WRITE_SIMD8 message uses 128-bit (OWord)
    *    offsets.  We have select a 128-bit group via the Global and Per-Slot
    *    Offsets, then use the Channel Mask phase to enable/disable which DWord
    *    within that group to write.  (Remember, different SIMD8 channels may
    *    have emitted different numbers of vertices, so we may need per-slot
    *    offsets.)
    *
    *    Channel masking presents an annoying problem: we may have to replicate
    *    the data up to 4 times:
    *
    *    Msg = Handles, Per-Slot Offsets, Channel Masks, Data, Data, Data,
    *          Data.
    *
    *    To avoid penalizing shaders that emit a small number of vertices, we
    *    can avoid these sometimes: if the size of the control data header is
    *    <= 128 bits, then there is only 1 OWord.  All SIMD8 channels will land
    *    land in the same 128-bit group, so we can skip per-slot offsets.
    *
    *    Similarly, if the control data header is <= 32 bits, there is only one
    *    DWord, so we can skip channel masks.
    */
   const brw_builder bld = brw_builder(this);
   const brw_builder abld = bld.annotate("urb per slot offset");

   /* Figure out which DWord we're trying to write to using the formula:
    *
    *    dword_index = (vertex_count - 1) * bits_per_vertex / 32
    *
    * Since bits_per_vertex is a power of two, and is known at compile
    * time, this can be optimized to:
    *
    *    dword_index = (vertex_count - 1) >> (6 - log2(bits_per_vertex))
    */
   brw_reg prev_count = abld.ADD(vertex_count, brw_imm_ud(0xffffffffu));
   unsigned log2_bits_per_vertex =
      util_last_bit(gs.control_data_bits_per_vertex);
   return abld.SHR(prev_count, brw_imm_ud(6u - log2_bits_per_vertex));
}

brw_reg
brw_shader::gs_urb_channel_mask(const brw_reg &dword_index)
{
   brw_reg channel_mask;

   /* Xe2+ can do URB loads with a byte offset, so we don't need to
    * construct a channel mask.
    */
   if (devinfo->ver >= 20)
      return channel_mask;

   /* Channel masking presents an annoying problem: we may have to replicate
    * the data up to 4 times:
    *
    * Msg = Handles, Per-Slot Offsets, Channel Masks, Data, Data, Data, Data.
    *
    * To avoid penalizing shaders that emit a small number of vertices, we
    * can avoid these sometimes: if the size of the control data header is
    * <= 128 bits, then there is only 1 OWord.  All SIMD8 channels will land
    * land in the same 128-bit group, so we can skip per-slot offsets.
    *
    * Similarly, if the control data header is <= 32 bits, there is only one
    * DWord, so we can skip channel masks.
    */
   if (gs.control_data_header_size_bits <= 32)
      return channel_mask;

   const brw_builder bld = brw_builder(this);
   const brw_builder ubld = bld.exec_all();

   /* Set the channel masks to 1 << (dword_index % 4), so that we'll
    * write to the appropriate DWORD within the OWORD.
    */
   return intexp2(ubld, ubld.AND(dword_index, brw_imm_ud(3u)));
}

void
brw_shader::emit_gs_control_data_bits(const brw_reg &vertex_count)
{
   assert(stage == MESA_SHADER_GEOMETRY);
   assert(gs.control_data_bits_per_vertex != 0);

   const struct brw_gs_prog_data *gs_prog_data = brw_gs_prog_data(prog_data);

   const brw_builder bld = brw_builder(this);
   const brw_builder abld = bld.annotate("emit control data bits");

   brw_reg dword_index = gs_urb_per_slot_dword_index(vertex_count);
   brw_reg channel_mask = gs_urb_channel_mask(dword_index);
   brw_reg per_slot_offset;

   const unsigned max_control_data_header_size_bits =
      devinfo->ver >= 20 ? 32 : 128;

   if (gs.control_data_header_size_bits > max_control_data_header_size_bits) {
      /* Convert dword_index to bytes on Xe2+ since LSC can do operate on byte
       * offset granularity.
       */
      if (devinfo->ver >= 20) {
         per_slot_offset = abld.SHL(dword_index, brw_imm_ud(2u));
      } else {
         /* Set the per-slot offset to dword_index / 4, so that we'll write to
          * the appropriate OWord within the control data header.
          */
         per_slot_offset = abld.SHR(dword_index, brw_imm_ud(2u));
      }
   }

   /* If there are channel masks, add 3 extra copies of the data. */
   const unsigned length = 1 + 3 * unsigned(channel_mask.file != BAD_FILE);
   assert(length <= 4);
   brw_reg sources[4];

   for (unsigned i = 0; i < length; i++)
      sources[i] = this->control_data_bits;

   brw_reg srcs[URB_LOGICAL_NUM_SRCS];
   srcs[URB_LOGICAL_SRC_HANDLE] = gs_payload().urb_handles;
   srcs[URB_LOGICAL_SRC_PER_SLOT_OFFSETS] = per_slot_offset;
   srcs[URB_LOGICAL_SRC_CHANNEL_MASK] = channel_mask;
   srcs[URB_LOGICAL_SRC_DATA] = bld.vgrf(BRW_TYPE_F, length);
   abld.LOAD_PAYLOAD(srcs[URB_LOGICAL_SRC_DATA], sources, length, 0);

   brw_urb_inst *urb = abld.URB_WRITE(srcs, ARRAY_SIZE(srcs));
   urb->components = length;

   /* We need to increment Global Offset by 256-bits to make room for
    * Broadwell's extra "Vertex Count" payload at the beginning of the
    * URB entry.  Since this is an OWord message, Global Offset is counted
    * in 128-bit units, so we must set it to 2.
    */
   if (gs_prog_data->static_vertex_count == -1)
      urb->offset = devinfo->ver >= 20 ? 32 : 2;
}

static void
set_gs_stream_control_data_bits(nir_to_brw_state &ntb, const brw_reg &vertex_count,
                                unsigned stream_id)
{
   brw_shader &s = ntb.s;

   /* control_data_bits |= stream_id << ((2 * (vertex_count - 1)) % 32) */

   /* Note: we are calling this *before* increasing vertex_count, so
    * this->vertex_count == vertex_count - 1 in the formula above.
    */

   /* Stream mode uses 2 bits per vertex */
   assert(s.gs.control_data_bits_per_vertex == 2);

   /* Must be a valid stream */
   assert(stream_id < 4); /* MAX_VERTEX_STREAMS */

   /* Control data bits are initialized to 0 so we don't have to set any
    * bits when sending vertices to stream 0.
    */
   if (stream_id == 0)
      return;

   const brw_builder abld = ntb.bld.annotate("set stream control data bits");

   /* reg::sid = stream_id */
   brw_reg sid = abld.MOV(brw_imm_ud(stream_id));

   /* reg:shift_count = 2 * (vertex_count - 1) */
   brw_reg shift_count = abld.SHL(vertex_count, brw_imm_ud(1u));

   /* Note: we're relying on the fact that the GEN SHL instruction only pays
    * attention to the lower 5 bits of its second source argument, so on this
    * architecture, stream_id << 2 * (vertex_count - 1) is equivalent to
    * stream_id << ((2 * (vertex_count - 1)) % 32).
    */
   brw_reg mask = abld.SHL(sid, shift_count);
   abld.OR(s.control_data_bits, s.control_data_bits, mask);
}

static void
emit_gs_vertex(nir_to_brw_state &ntb, const nir_src &vertex_count_nir_src,
               unsigned stream_id)
{
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_GEOMETRY);

   struct brw_gs_prog_data *gs_prog_data = brw_gs_prog_data(s.prog_data);

   brw_reg vertex_count = get_nir_src(ntb, vertex_count_nir_src, 0);
   vertex_count.type = BRW_TYPE_UD;

   /* Haswell and later hardware ignores the "Render Stream Select" bits
    * from the 3DSTATE_STREAMOUT packet when the SOL stage is disabled,
    * and instead sends all primitives down the pipeline for rasterization.
    * If the SOL stage is enabled, "Render Stream Select" is honored and
    * primitives bound to non-zero streams are discarded after stream output.
    *
    * Since the only purpose of primives sent to non-zero streams is to
    * be recorded by transform feedback, we can simply discard all geometry
    * bound to these streams when transform feedback is disabled.
    */
   if (stream_id > 0 && !s.nir->info.has_transform_feedback_varyings)
      return;

   /* If we're outputting 32 control data bits or less, then we can wait
    * until the shader is over to output them all.  Otherwise we need to
    * output them as we go.  Now is the time to do it, since we're about to
    * output the vertex_count'th vertex, so it's guaranteed that the
    * control data bits associated with the (vertex_count - 1)th vertex are
    * correct.
    */
   if (s.gs.control_data_header_size_bits > 32) {
      const brw_builder abld =
         ntb.bld.annotate("emit vertex: emit control data bits");

      /* Only emit control data bits if we've finished accumulating a batch
       * of 32 bits.  This is the case when:
       *
       *     (vertex_count * bits_per_vertex) % 32 == 0
       *
       * (in other words, when the last 5 bits of vertex_count *
       * bits_per_vertex are 0).  Assuming bits_per_vertex == 2^n for some
       * integer n (which is always the case, since bits_per_vertex is
       * always 1 or 2), this is equivalent to requiring that the last 5-n
       * bits of vertex_count are 0:
       *
       *     vertex_count & (2^(5-n) - 1) == 0
       *
       * 2^(5-n) == 2^5 / 2^n == 32 / bits_per_vertex, so this is
       * equivalent to:
       *
       *     vertex_count & (32 / bits_per_vertex - 1) == 0
       *
       * TODO: If vertex_count is an immediate, we could do some of this math
       *       at compile time...
       */
      brw_inst *inst =
         abld.AND(ntb.bld.null_reg_d(), vertex_count,
                  brw_imm_ud(32u / s.gs.control_data_bits_per_vertex - 1u));
      inst->conditional_mod = BRW_CONDITIONAL_Z;

      abld.IF(BRW_PREDICATE_NORMAL);
      /* If vertex_count is 0, then no control data bits have been
       * accumulated yet, so we can skip emitting them.
       */
      abld.CMP(ntb.bld.null_reg_d(), vertex_count, brw_imm_ud(0u),
               BRW_CONDITIONAL_NEQ);
      abld.IF(BRW_PREDICATE_NORMAL);
      s.emit_gs_control_data_bits(vertex_count);
      abld.emit(BRW_OPCODE_ENDIF);

      /* Reset control_data_bits to 0 so we can start accumulating a new
       * batch.
       *
       * Note: in the case where vertex_count == 0, this neutralizes the
       * effect of any call to EndPrimitive() that the shader may have
       * made before outputting its first vertex.
       */
      abld.exec_all().MOV(s.control_data_bits, brw_imm_ud(0u));
      abld.emit(BRW_OPCODE_ENDIF);
   }

   /* In stream mode we have to set control data bits for all vertices
    * unless we have disabled control data bits completely (which we do
    * do for MESA_PRIM_POINTS outputs that don't use streams).
    */
   if (s.gs.control_data_header_size_bits > 0 &&
       gs_prog_data->control_data_format ==
          GFX7_GS_CONTROL_DATA_FORMAT_GSCTL_SID) {
      set_gs_stream_control_data_bits(ntb, vertex_count, stream_id);
   }
}

static void
brw_combine_with_vec(const brw_builder &bld, const brw_reg &dst,
                     const brw_reg &src, unsigned n)
{
   assert(n <= NIR_MAX_VEC_COMPONENTS);
   brw_reg comps[NIR_MAX_VEC_COMPONENTS];
   for (unsigned i = 0; i < n; i++)
      comps[i] = offset(src, bld, i);
   bld.VEC(dst, comps, n);
}

static void
brw_from_nir_emit_vs_intrinsic(nir_to_brw_state &ntb,
                         nir_intrinsic_instr *instr)
{
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;
   assert(s.stage == MESA_SHADER_VERTEX);

   brw_reg dest;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dest = get_nir_def(ntb, instr->def);

   switch (instr->intrinsic) {
   case nir_intrinsic_load_vertex_id:
   case nir_intrinsic_load_base_vertex:
      UNREACHABLE("should be lowered by nir_lower_system_values()");

   case nir_intrinsic_load_urb_input_handle_intel:
   case nir_intrinsic_load_urb_output_handle_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD), s.vs_payload().urb_handles);
      break;

   case nir_intrinsic_load_input: {
      assert(instr->def.bit_size == 32);
      const brw_reg src = offset(brw_attr_reg(0, dest.type), bld,
                                nir_intrinsic_base(instr) * 4 +
                                nir_intrinsic_component(instr) +
                                nir_src_as_uint(instr->src[0]));
      brw_combine_with_vec(bld, dest, src, instr->num_components);
      break;
   }

   case nir_intrinsic_load_vertex_id_zero_base:
   case nir_intrinsic_load_instance_id:
   case nir_intrinsic_load_base_instance:
   case nir_intrinsic_load_draw_id:
   case nir_intrinsic_load_first_vertex:
   case nir_intrinsic_load_is_indexed_draw:
      UNREACHABLE("lowered by brw_nir_lower_vs_inputs");

   default:
      brw_from_nir_emit_intrinsic(ntb, bld, instr);
      break;
   }
}

static brw_reg
get_tcs_single_patch_icp_handle(nir_to_brw_state &ntb, const brw_builder &bld,
                                nir_intrinsic_instr *instr)
{
   brw_shader &s = ntb.s;

   struct brw_tcs_prog_data *tcs_prog_data = brw_tcs_prog_data(s.prog_data);
   const nir_src &vertex_src = instr->src[0];
   nir_intrinsic_instr *vertex_intrin = nir_src_as_intrinsic(vertex_src);

   const brw_reg start = s.tcs_payload().icp_handle_start;

   brw_reg icp_handle;

   if (nir_src_is_const(vertex_src)) {
      /* Emit a MOV to resolve <0,1,0> regioning. */
      unsigned vertex = nir_src_as_uint(vertex_src);
      icp_handle = bld.MOV(component(start, vertex));
   } else if (tcs_prog_data->instances == 1 && vertex_intrin &&
              vertex_intrin->intrinsic == nir_intrinsic_load_invocation_id) {
      /* For the common case of only 1 instance, an array index of
       * gl_InvocationID means reading the handles from the start.  Skip all
       * the indirect work.
       */
      icp_handle = start;
   } else {
      /* The vertex index is non-constant.  We need to use indirect
       * addressing to fetch the proper URB handle.
       */
      icp_handle = bld.vgrf(BRW_TYPE_UD);

      /* Each ICP handle is a single DWord (4 bytes) */
      brw_reg vertex_offset_bytes =
         bld.SHL(retype(get_nir_src(ntb, vertex_src, 0), BRW_TYPE_UD),
                 brw_imm_ud(2u));

      /* We might read up to 4 registers. */
      bld.emit(SHADER_OPCODE_MOV_INDIRECT, icp_handle,
               start, vertex_offset_bytes,
               brw_imm_ud(4 * REG_SIZE));
   }

   return icp_handle;
}

static brw_reg
get_tcs_multi_patch_icp_handle(nir_to_brw_state &ntb, const brw_builder &bld,
                               nir_intrinsic_instr *instr)
{
   brw_shader &s = ntb.s;
   const intel_device_info *devinfo = s.devinfo;

   struct brw_tcs_prog_key *tcs_key = (struct brw_tcs_prog_key *) s.key;
   const nir_src &vertex_src = instr->src[0];
   const unsigned grf_size_bytes = REG_SIZE * reg_unit(devinfo);

   const brw_reg start = s.tcs_payload().icp_handle_start;

   if (nir_src_is_const(vertex_src))
      return byte_offset(start, nir_src_as_uint(vertex_src) * grf_size_bytes);

   /* The vertex index is non-constant.  We need to use indirect
    * addressing to fetch the proper URB handle.
    *
    * First, we start with the sequence indicating that channel <n>
    * should read the handle from DWord <n>.  We convert that to bytes
    * by multiplying by 4.
    *
    * Next, we convert the vertex index to bytes by multiplying
    * by the GRF size (by shifting), and add the two together.  This is
    * the final indirect byte offset.
    */
   brw_reg sequence = bld.LOAD_SUBGROUP_INVOCATION();

   /* Offsets will be 0, 4, 8, ... */
   brw_reg channel_offsets = bld.SHL(sequence, brw_imm_ud(2u));
   /* Convert vertex_index to bytes (multiply by 32) */
   assert(util_is_power_of_two_nonzero(grf_size_bytes)); /* for ffs() */
   brw_reg vertex_offset_bytes =
      bld.SHL(retype(get_nir_src(ntb, vertex_src, 0), BRW_TYPE_UD),
              brw_imm_ud(ffs(grf_size_bytes) - 1));
   brw_reg icp_offset_bytes =
      bld.ADD(vertex_offset_bytes, channel_offsets);

   /* Use start of ICP handles as the base offset.  There is one register
    * of URB handles per vertex, so inform the register allocator that
    * we might read up to nir->info.gs.vertices_in registers.
    */
   brw_reg icp_handle = bld.vgrf(BRW_TYPE_UD);
   bld.emit(SHADER_OPCODE_MOV_INDIRECT, icp_handle, start,
            icp_offset_bytes,
            brw_imm_ud(brw_tcs_prog_key_input_vertices(tcs_key) *
                       grf_size_bytes));

   return icp_handle;
}

static void
setup_barrier_message_payload_gfx125(const brw_builder &bld,
                                     const brw_reg &msg_payload)
{
   const brw_builder ubld = bld.uniform();
   const struct intel_device_info *devinfo = bld.shader->devinfo;
   assert(devinfo->verx10 >= 125);

   /* From BSpec: 54006, mov r0.2[31:24] into m0.2[31:24] and m0.2[23:16] */
   brw_reg m0_10ub = horiz_offset(retype(msg_payload, BRW_TYPE_UB), 10);
   brw_reg r0_11ub =
      stride(suboffset(retype(brw_vec1_grf(0, 0), BRW_TYPE_UB), 11),
             0, 1, 0);
   ubld.group(2, 0).MOV(m0_10ub, r0_11ub);

   if (devinfo->ver >= 20) {
      /* Use an active threads barrier. */
      const brw_reg m0_2ud = component(retype(msg_payload, BRW_TYPE_UD), 2);
      ubld.OR(m0_2ud, m0_2ud, brw_imm_ud(1u << 8));
   }
}

static void
emit_barrier(nir_to_brw_state &ntb)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld;
   const brw_builder ubld = bld.exec_all();
   const brw_builder hbld = ubld.group(8 * reg_unit(devinfo), 0);
   brw_shader &s = ntb.s;

   /* We are getting the barrier ID from the compute shader header */
   assert(mesa_shader_stage_uses_workgroup(s.stage));

   /* Zero-initialize the payload */
   brw_reg payload = hbld.MOV(brw_imm_ud(0u));

   if (devinfo->verx10 >= 125) {
      setup_barrier_message_payload_gfx125(bld, payload);
   } else {
      assert(mesa_shader_stage_is_compute(s.stage));

      brw_reg barrier_id_mask =
         brw_imm_ud(devinfo->ver == 9 ? 0x8f000000u : 0x7f000000u);

      /* Copy the barrier id from r0.2 to the message payload reg.2 */
      brw_reg r0_2 = brw_reg(retype(brw_vec1_grf(0, 2), BRW_TYPE_UD));
      ubld.group(1, 0).AND(component(payload, 2), r0_2, barrier_id_mask);
   }

   /* Emit a gateway "barrier" message using the payload we set up, followed
    * by a wait instruction.
    */
   ubld.emit(SHADER_OPCODE_BARRIER, reg_undef, payload);
}

static void
emit_tcs_barrier(nir_to_brw_state &ntb)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_TESS_CTRL);
   struct brw_tcs_prog_data *tcs_prog_data = brw_tcs_prog_data(s.prog_data);

   brw_reg m0 = bld.vgrf(BRW_TYPE_UD);
   brw_reg m0_2 = component(m0, 2);

   const brw_builder chanbld = bld.uniform();

   /* Zero the message header */
   bld.exec_all().MOV(m0, brw_imm_ud(0u));

   if (devinfo->verx10 >= 125) {
      setup_barrier_message_payload_gfx125(bld, m0);
   } else if (devinfo->ver >= 11) {
      chanbld.AND(m0_2, retype(brw_vec1_grf(0, 2), BRW_TYPE_UD),
                  brw_imm_ud(INTEL_MASK(30, 24)));

      /* Set the Barrier Count and the enable bit */
      chanbld.OR(m0_2, m0_2,
                 brw_imm_ud(tcs_prog_data->instances << 8 | (1 << 15)));
   } else {
      /* Copy "Barrier ID" from r0.2, bits 16:13 */
      chanbld.AND(m0_2, retype(brw_vec1_grf(0, 2), BRW_TYPE_UD),
                  brw_imm_ud(INTEL_MASK(16, 13)));

      /* Shift it up to bits 27:24. */
      chanbld.SHL(m0_2, m0_2, brw_imm_ud(11));

      /* Set the Barrier Count and the enable bit */
      chanbld.OR(m0_2, m0_2,
                 brw_imm_ud(tcs_prog_data->instances << 9 | (1 << 15)));
   }

   bld.emit(SHADER_OPCODE_BARRIER, bld.null_reg_ud(), m0);
}

static void
brw_from_nir_emit_tcs_intrinsic(nir_to_brw_state &ntb,
                          nir_intrinsic_instr *instr)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_TESS_CTRL);
   struct brw_tcs_prog_data *tcs_prog_data = brw_tcs_prog_data(s.prog_data);
   struct brw_vue_prog_data *vue_prog_data = &tcs_prog_data->base;

   brw_reg dst;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dst = get_nir_def(ntb, instr->def);

   switch (instr->intrinsic) {
   case nir_intrinsic_load_primitive_id:
      bld.MOV(dst, s.tcs_payload().primitive_id);
      break;
   case nir_intrinsic_load_invocation_id: {
      /* Get "Instance ID" from g0.2 field */
      const unsigned instance_id_mask =
         (devinfo->verx10 >= 125) ? INTEL_MASK( 7,  0) :
         (devinfo->ver >= 11)     ? INTEL_MASK(22, 16) :
                                    INTEL_MASK(23, 17);
      const unsigned instance_id_shift =
         (devinfo->verx10 >= 125) ? 0 : (devinfo->ver >= 11) ? 16 : 17;

      brw_reg t = bld.AND(brw_ud1_grf(0, 2), brw_imm_ud(instance_id_mask));

      /* gl_InvocationID is just the thread number */
      if (instance_id_shift)
         bld.SHR(retype(dst, BRW_TYPE_UD), t, brw_imm_ud(instance_id_shift));
      else
         bld.MOV(retype(dst, BRW_TYPE_UD), t);
      break;
   }

   case nir_intrinsic_barrier:
      if (nir_intrinsic_memory_scope(instr) != SCOPE_NONE)
         brw_from_nir_emit_intrinsic(ntb, bld, instr);
      if (nir_intrinsic_execution_scope(instr) == SCOPE_WORKGROUP) {
         if (tcs_prog_data->instances != 1)
            emit_tcs_barrier(ntb);
      }
      break;

   case nir_intrinsic_load_urb_input_handle_indexed_intel: {
      const bool multi_patch =
         vue_prog_data->dispatch_mode == INTEL_DISPATCH_MODE_TCS_MULTI_PATCH;

      brw_reg icp_handle = multi_patch ?
         get_tcs_multi_patch_icp_handle(ntb, bld, instr) :
         get_tcs_single_patch_icp_handle(ntb, bld, instr);
      bld.MOV(retype(dst, BRW_TYPE_UD), icp_handle);
      break;
   }

   case nir_intrinsic_load_urb_output_handle_intel:
      bld.MOV(retype(dst, BRW_TYPE_UD), s.tcs_payload().patch_urb_output);
      break;

   case nir_intrinsic_load_tess_config_intel:
      bld.MOV(retype(dst, BRW_TYPE_UD),
              byte_offset(
                 brw_uniform_reg(
                    tcs_prog_data->tess_config_param / REG_SIZE, BRW_TYPE_UD),
                 tcs_prog_data->tess_config_param % REG_SIZE));
      break;

   default:
      brw_from_nir_emit_intrinsic(ntb, bld, instr);
      break;
   }
}

static void
brw_from_nir_emit_tes_intrinsic(nir_to_brw_state &ntb,
                          nir_intrinsic_instr *instr)
{
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_TESS_EVAL);
   struct brw_tes_prog_data *tes_prog_data = brw_tes_prog_data(s.prog_data);

   brw_reg dest;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dest = get_nir_def(ntb, instr->def);

   switch (instr->intrinsic) {
   case nir_intrinsic_load_primitive_id:
      bld.MOV(dest, s.tes_payload().primitive_id);
      break;

   case nir_intrinsic_load_tess_coord:
      for (unsigned i = 0; i < 3; i++)
         bld.MOV(offset(dest, bld, i), s.tes_payload().coords[i]);
      break;

   case nir_intrinsic_load_urb_input_handle_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD), s.tes_payload().patch_urb_input);
      break;

   case nir_intrinsic_load_urb_output_handle_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD), s.tes_payload().urb_output);
      break;

   case nir_intrinsic_load_tess_config_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD),
              byte_offset(
                 brw_uniform_reg(
                    tes_prog_data->tess_config_param / REG_SIZE, BRW_TYPE_UD),
                 tes_prog_data->tess_config_param % REG_SIZE));
      break;

   default:
      brw_from_nir_emit_intrinsic(ntb, bld, instr);
      break;
   }
}

static void
brw_from_nir_emit_gs_intrinsic(nir_to_brw_state &ntb,
                         nir_intrinsic_instr *instr)
{
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_GEOMETRY);

   struct brw_gs_prog_data *gs_prog_data = brw_gs_prog_data(s.prog_data);

   brw_reg dest;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dest = get_nir_def(ntb, instr->def);

   switch (instr->intrinsic) {
   case nir_intrinsic_load_primitive_id:
      assert(s.stage == MESA_SHADER_GEOMETRY);
      assert(brw_gs_prog_data(s.prog_data)->include_primitive_id);
      bld.MOV(retype(dest, BRW_TYPE_UD), s.gs_payload().primitive_id);
      break;

   case nir_intrinsic_load_input:
      UNREACHABLE("load_input intrinsics are invalid for the GS stage");

   case nir_intrinsic_load_per_vertex_input: {
      /* Load a push input (assuming single invocation layout) */
      assert(s.nir->info.gs.invocations == 1);
      assert(nir_src_as_uint(instr->src[1]) == 0);
      const unsigned vertex = nir_src_as_uint(instr->src[0]);
      const unsigned stride = gs_prog_data->base.urb_read_length * 8;
      const unsigned imm_offset = vertex * stride +
                                  4 * nir_intrinsic_base(instr) +
                                  nir_intrinsic_component(instr);

      const brw_reg attr = offset(brw_attr_reg(0, dest.type), bld, imm_offset);
      brw_combine_with_vec(bld, dest, attr, instr->num_components);
      break;
   }

   case nir_intrinsic_load_urb_input_handle_indexed_intel: {
      const unsigned grf_size_bytes = REG_SIZE * reg_unit(ntb.devinfo);
      brw_reg start = s.gs_payload().icp_handle_start;
      dest.type = start.type;

      if (gs_prog_data->invocations == 1) {
         if (nir_src_is_const(instr->src[0])) {
            /* Vertex index is constant; just select the proper URB handle. */
            bld.MOV(dest, byte_offset(start, grf_size_bytes *
                                      nir_src_as_uint(instr->src[0])));
         } else {
            /* The vertex index is non-constant.  We need to use indirect
             * addressing to fetch the proper URB handle.
             *
             * First, we start with the sequence <7, 6, 5, 4, 3, 2, 1, 0>
             * indicating that channel <n> should read the handle from
             * DWord <n>.  We convert that to bytes by multiplying by 4.
             *
             * Next, we convert the vertex index to bytes by multiplying
             * by 32/64 (shifting by 5/6), and add the two together.  This is
             * the final indirect byte offset.
             */
            brw_reg sequence = bld.LOAD_SUBGROUP_INVOCATION();

            /* channel_offsets = 4 * sequence = <28, 24, 20, 16, 12, 8, 4, 0> */
            brw_reg channel_offsets = bld.SHL(sequence, brw_imm_ud(2u));
            /* Convert vertex_index to bytes (multiply by 32/64) */
            assert(util_is_power_of_two_nonzero(grf_size_bytes)); /* ffs() */
            brw_reg vertex_offset_bytes =
               bld.SHL(retype(get_nir_src(ntb, instr->src[0], 0), BRW_TYPE_UD),
                       brw_imm_ud(ffs(grf_size_bytes) - 1));
            brw_reg icp_offset_bytes =
               bld.ADD(vertex_offset_bytes, channel_offsets);

            /* Use first_icp_handle as the base offset.  There is one register
             * of URB handles per vertex, so inform the register allocator that
             * we might read up to nir->info.gs.vertices_in registers.
             */
            bld.emit(SHADER_OPCODE_MOV_INDIRECT, dest, start,
                     brw_reg(icp_offset_bytes),
                     brw_imm_ud(s.nir->info.gs.vertices_in * grf_size_bytes));
         }
      } else {
         assert(gs_prog_data->invocations > 1);

         if (nir_src_is_const(instr->src[0])) {
            unsigned vertex = nir_src_as_uint(instr->src[0]);
            bld.MOV(dest, component(start, vertex));
         } else {
            /* The vertex index is non-constant.  We need to use indirect
             * addressing to fetch the proper URB handle.
             *
             * Convert vertex_index to bytes (multiply by 4)
             */
            brw_reg icp_offset_bytes =
               bld.SHL(retype(get_nir_src(ntb, instr->src[0], 0), BRW_TYPE_UD),
                       brw_imm_ud(2u));

            /* Use first_icp_handle as the base offset.  There is one DWord
             * of URB handles per vertex, so inform the register allocator that
             * we might read up to ceil(nir->info.gs.vertices_in / 8) registers.
             */
            bld.emit(SHADER_OPCODE_MOV_INDIRECT, dest, start,
                     brw_reg(icp_offset_bytes),
                     brw_imm_ud(DIV_ROUND_UP(s.nir->info.gs.vertices_in, 8) *
                                grf_size_bytes));
         }
      }
      break;
   }

   case nir_intrinsic_load_urb_output_handle_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD), s.gs_payload().urb_handles);
      break;

   case nir_intrinsic_emit_vertex_with_counter:
      emit_gs_vertex(ntb, instr->src[0], nir_intrinsic_stream_id(instr));
      break;

   case nir_intrinsic_end_primitive_with_counter:
      emit_gs_end_primitive(ntb, instr->src[0]);
      break;

   case nir_intrinsic_set_vertex_and_primitive_count:
      bld.MOV(s.final_gs_vertex_count, get_nir_src(ntb, instr->src[0], 0));
      break;

   case nir_intrinsic_load_invocation_id:
      bld.MOV(dest, retype(s.gs_payload().instance_id, dest.type));
      break;

   default:
      brw_from_nir_emit_intrinsic(ntb, bld, instr);
      break;
   }
}

/**
 * Fetch the current render target layer index.
 */
static brw_reg
fetch_render_target_array_index(const brw_builder &bld)
{
   const brw_shader *v = bld.shader;

   if (bld.shader->devinfo->ver >= 20) {
      /* Gfx20+ has separate Render Target Array indices for each pair
       * of subspans in order to support multiple polygons, so we need
       * to use a <1;8,0> region in order to select the correct word
       * for each channel.
       */
      const brw_reg idx = bld.vgrf(BRW_TYPE_UD);

      for (unsigned i = 0; i < DIV_ROUND_UP(bld.dispatch_width(), 16); i++) {
         const brw_builder hbld = bld.group(16, i);
         const struct brw_reg reg = retype(brw_vec1_grf(2 * i + 1, 1),
                                           BRW_TYPE_UW);
         hbld.AND(offset(idx, hbld, i), stride(reg, 1, 8, 0),
                  brw_imm_uw(0x7ff));
      }

      return idx;
   } else if (bld.shader->devinfo->ver >= 12 && v->max_polygons == 2) {
      /* According to the BSpec "PS Thread Payload for Normal
       * Dispatch", the render target array index is stored as bits
       * 26:16 of either the R1.1 or R1.6 poly info dwords, for the
       * first and second polygons respectively in multipolygon PS
       * dispatch mode.
       */
      assert(bld.dispatch_width() == 16);
      const brw_reg idx = bld.vgrf(BRW_TYPE_UD);

      for (unsigned i = 0; i < v->max_polygons; i++) {
         const brw_builder hbld = bld.group(8, i);
         const struct brw_reg g1 = brw_uw1_reg(FIXED_GRF, 1, 3 + 10 * i);
         hbld.AND(offset(idx, hbld, i), g1, brw_imm_uw(0x7ff));
      }

      return idx;
   } else if (bld.shader->devinfo->ver >= 12) {
      /* The render target array index is provided in the thread payload as
       * bits 26:16 of r1.1.
       */
      const brw_reg idx = bld.vgrf(BRW_TYPE_UD);
      bld.AND(idx, brw_uw1_reg(FIXED_GRF, 1, 3),
              brw_imm_uw(0x7ff));
      return idx;
   } else {
      /* The render target array index is provided in the thread payload as
       * bits 26:16 of r0.0.
       */
      const brw_reg idx = bld.vgrf(BRW_TYPE_UD);
      bld.AND(idx, brw_uw1_reg(FIXED_GRF, 0, 1),
              brw_imm_uw(0x7ff));
      return idx;
   }
}

static brw_reg
fetch_viewport_index(const brw_builder &bld)
{
   const brw_shader *v = bld.shader;

   if (bld.shader->devinfo->ver >= 20) {
      /* Gfx20+ has separate viewport indices for each pair
       * of subspans in order to support multiple polygons, so we need
       * to use a <1;8,0> region in order to select the correct word
       * for each channel.
       */
      const brw_reg idx = bld.vgrf(BRW_TYPE_UD);

      for (unsigned i = 0; i < DIV_ROUND_UP(bld.dispatch_width(), 16); i++) {
         const brw_builder hbld = bld.group(16, i);
         const struct brw_reg reg = retype(xe2_vec1_grf(i, 9),
                                           BRW_TYPE_UW);
         hbld.AND(offset(idx, hbld, i), stride(reg, 1, 8, 0),
                  brw_imm_uw(0xf000));
      }

      bld.SHR(idx, idx, brw_imm_ud(12));
      return idx;
   } else if (bld.shader->devinfo->ver >= 12 && v->max_polygons == 2) {
      /* According to the BSpec "PS Thread Payload for Normal
       * Dispatch", the viewport index is stored as bits
       * 30:27 of either the R1.1 or R1.6 poly info dwords, for the
       * first and second polygons respectively in multipolygon PS
       * dispatch mode.
       */
      assert(bld.dispatch_width() == 16);
      const brw_reg idx = bld.vgrf(BRW_TYPE_UD);
      brw_reg vp_idx_per_poly_dw[2] = {
         brw_ud1_reg(FIXED_GRF, 1, 1), /* R1.1 bits 30:27 */
         brw_ud1_reg(FIXED_GRF, 1, 6), /* R1.6 bits 30:27 */
      };

      for (unsigned i = 0; i < v->max_polygons; i++) {
         const brw_builder hbld = bld.group(8, i);
         hbld.SHR(offset(idx, hbld, i), vp_idx_per_poly_dw[i], brw_imm_ud(27));
      }

      return bld.AND(idx, brw_imm_ud(0xf));
   } else if (bld.shader->devinfo->ver >= 12) {
      /* The viewport index is provided in the thread payload as
       * bits 30:27 of r1.1.
       */
      const brw_reg idx = bld.vgrf(BRW_TYPE_UD);
      bld.SHR(idx,
              bld.AND(brw_uw1_reg(FIXED_GRF, 1, 3),
                      brw_imm_uw(0x7800)),
              brw_imm_ud(11));
      return idx;
   } else {
      /* The viewport index is provided in the thread payload as
       * bits 30:27 of r0.0.
       */
      const brw_reg idx = bld.vgrf(BRW_TYPE_UD);
      bld.SHR(idx,
              bld.AND(brw_uw1_reg(FIXED_GRF, 0, 1),
                      brw_imm_uw(0x7800)),
              brw_imm_ud(11));
      return idx;
   }
}

/**
 * Actual coherent framebuffer read implemented using the native render target
 * read message.  Requires SKL+.
 */
static brw_inst *
emit_coherent_fb_read(const brw_builder &bld, const brw_reg &dst, unsigned target)
{
   brw_inst *inst =
      bld.emit(FS_OPCODE_FB_READ_LOGICAL, dst, brw_imm_ud(target));
   inst->size_written = 4 * inst->dst.component_size(inst->exec_size);

   return inst;
}

static brw_reg
alloc_temporary(const brw_builder &bld, unsigned size, brw_reg *regs, unsigned n)
{
   if (n && regs[0].file != BAD_FILE) {
      return regs[0];

   } else {
      const brw_reg tmp = bld.vgrf(BRW_TYPE_F, size);

      for (unsigned i = 0; i < n; i++)
         regs[i] = tmp;

      return tmp;
   }
}

static brw_reg
alloc_frag_output(nir_to_brw_state &ntb, unsigned l)
{
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_FRAGMENT);
   const brw_fs_prog_key *const key =
      reinterpret_cast<const brw_fs_prog_key *>(s.key);

   if (l == FRAG_RESULT_DUAL_SRC_BLEND)
      return alloc_temporary(ntb.bld, 4, &s.dual_src_output, 1);

   else if (l == FRAG_RESULT_COLOR)
      return alloc_temporary(ntb.bld, 4, s.outputs,
                             MAX2(key->nr_color_regions, 1));

   else if (l == FRAG_RESULT_DEPTH)
      return alloc_temporary(ntb.bld, 1, &s.frag_depth, 1);

   else if (l == FRAG_RESULT_STENCIL)
      return alloc_temporary(ntb.bld, 1, &s.frag_stencil, 1);

   else if (l == FRAG_RESULT_SAMPLE_MASK)
      return alloc_temporary(ntb.bld, 1, &s.sample_mask, 1);

   else if (l >= FRAG_RESULT_DATA0 &&
            l < FRAG_RESULT_DATA0 + BRW_MAX_DRAW_BUFFERS)
      return alloc_temporary(ntb.bld, 4,
                             &s.outputs[l - FRAG_RESULT_DATA0], 1);

   else
      UNREACHABLE("Invalid location");
}

static void
emit_is_helper_invocation(nir_to_brw_state &ntb, brw_reg result)
{
   const brw_builder &bld = ntb.bld;

   /* Unlike the regular gl_HelperInvocation, that is defined at dispatch,
    * the helperInvocationEXT() (aka SpvOpIsHelperInvocationEXT) takes into
    * consideration demoted invocations.
    */
   result.type = BRW_TYPE_UD;

   bld.MOV(result, brw_imm_ud(0));

   /* See brw_sample_mask_reg() for why we split SIMD32 into SIMD16 here. */
   unsigned width = bld.dispatch_width();
   for (unsigned i = 0; i < DIV_ROUND_UP(width, 16); i++) {
      const brw_builder b = bld.group(MIN2(width, 16), i);

      brw_inst *mov = b.MOV(offset(result, b, i), brw_imm_ud(~0));

      /* The before() ensures that any code emitted to get the predicate happens
       * before the mov right above.  This is not an issue elsewhere because
       * lowering code already set up the builder this way.
       */
      brw_emit_predicate_on_sample_mask(b.before(mov), mov);
      mov->predicate_inverse = true;
   }
}

static brw_reg
emit_frontfacing_interpolation(nir_to_brw_state &ntb)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   brw_reg ff = bld.vgrf(BRW_TYPE_D);

   if (devinfo->ver >= 20) {
      /* Gfx20+ has separate back-facing bits for each pair of
       * subspans in order to support multiple polygons, so we need to
       * use a <1;8,0> region in order to select the correct word for
       * each channel.
       */
      const brw_reg tmp = bld.vgrf(BRW_TYPE_UW);

      for (unsigned i = 0; i < DIV_ROUND_UP(s.dispatch_width, 16); i++) {
         const brw_builder hbld = bld.group(16, i);
         const struct brw_reg gi_uw = retype(xe2_vec1_grf(i, 9),
                                             BRW_TYPE_UW);
         hbld.AND(offset(tmp, hbld, i), gi_uw, brw_imm_uw(0x800));
      }

      bld.CMP(ff, tmp, brw_imm_uw(0), BRW_CONDITIONAL_Z);

   } else if (devinfo->ver >= 12 && s.max_polygons == 2) {
      /* According to the BSpec "PS Thread Payload for Normal
       * Dispatch", the front/back facing interpolation bit is stored
       * as bit 15 of either the R1.1 or R1.6 poly info field, for the
       * first and second polygons respectively in multipolygon PS
       * dispatch mode.
       */
      assert(s.dispatch_width == 16);
      brw_reg tmp = bld.vgrf(BRW_TYPE_W);

      for (unsigned i = 0; i < s.max_polygons; i++) {
         const brw_builder hbld = bld.group(8, i);
         const struct brw_reg g1 = retype(brw_vec1_grf(1, 1 + 5 * i),
                                          BRW_TYPE_W);
         hbld.ASR(offset(tmp, hbld, i), g1, brw_imm_d(15));
      }

      bld.NOT(ff, tmp);

   } else if (devinfo->ver >= 12) {
      brw_reg g1 = brw_reg(retype(brw_vec1_grf(1, 1), BRW_TYPE_W));

      brw_reg tmp = bld.vgrf(BRW_TYPE_W);
      bld.ASR(tmp, g1, brw_imm_d(15));
      bld.NOT(ff, tmp);
   } else {
      /* Bit 15 of g0.0 is 0 if the polygon is front facing. We want to create
       * a boolean result from this (~0/true or 0/false).
       *
       * We can use the fact that bit 15 is the MSB of g0.0:W to accomplish
       * this task in only one instruction:
       *    - a negation source modifier will flip the bit; and
       *    - a W -> D type conversion will sign extend the bit into the high
       *      word of the destination.
       *
       * An ASR 15 fills the low word of the destination.
       */
      brw_reg g0 = brw_reg(retype(brw_vec1_grf(0, 0), BRW_TYPE_W));

      bld.ASR(ff, negate(g0), brw_imm_d(15));
   }

   return ff;
}

static brw_reg
emit_samplepos_setup(nir_to_brw_state &ntb)
{
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_FRAGMENT);
   assert(brw_fs_prog_data(s.prog_data)->persample_dispatch);

   const brw_builder abld = bld.annotate("compute sample position");
   brw_reg pos = abld.vgrf(BRW_TYPE_F, 2);

   /* WM will be run in MSDISPMODE_PERSAMPLE. So, only one of SIMD8 or SIMD16
    * mode will be enabled.
    *
    * From the Ivy Bridge PRM, volume 2 part 1, page 344:
    * R31.1:0         Position Offset X/Y for Slot[3:0]
    * R31.3:2         Position Offset X/Y for Slot[7:4]
    * .....
    *
    * The X, Y sample positions come in as bytes in  thread payload. So, read
    * the positions using vstride=16, width=8, hstride=2.
    */
   const brw_reg sample_pos_reg =
      brw_fetch_payload_reg(abld, s.fs_payload().sample_pos_reg, BRW_TYPE_W);

   for (unsigned i = 0; i < 2; i++) {
      brw_reg tmp_d = bld.vgrf(BRW_TYPE_D);
      abld.MOV(tmp_d, subscript(sample_pos_reg, BRW_TYPE_B, i));
      /* Convert int_sample_pos to floating point */
      brw_reg tmp_f = bld.vgrf(BRW_TYPE_F);
      abld.MOV(tmp_f, tmp_d);
      /* Scale to the range [0, 1] */
      abld.MUL(offset(pos, abld, i), tmp_f, brw_imm_f(1 / 16.0f));
   }

   return pos;
}

static brw_reg
emit_sampleid_setup(nir_to_brw_state &ntb)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_FRAGMENT);
   ASSERTED brw_fs_prog_key *key = (brw_fs_prog_key*) s.key;

   const brw_builder abld = bld.annotate("compute sample id");
   brw_reg sample_id = abld.vgrf(BRW_TYPE_UD);

   assert(key->multisample_fbo != INTEL_NEVER);

   /* Sample ID comes in as 4-bit numbers in g1.0:
    *
    *    15:12 Slot 3 SampleID (only used in SIMD16)
    *     11:8 Slot 2 SampleID (only used in SIMD16)
    *      7:4 Slot 1 SampleID
    *      3:0 Slot 0 SampleID
    *
    * Each slot corresponds to four channels, so we want to replicate each
    * half-byte value to 4 channels in a row:
    *
    *    dst+0:    .7    .6    .5    .4    .3    .2    .1    .0
    *             7:4   7:4   7:4   7:4   3:0   3:0   3:0   3:0
    *
    *    dst+1:    .7    .6    .5    .4    .3    .2    .1    .0  (if SIMD16)
    *           15:12 15:12 15:12 15:12  11:8  11:8  11:8  11:8
    *
    * First, we read g1.0 with a <1,8,0>UB region, causing the first 8
    * channels to read the first byte (7:0), and the second group of 8
    * channels to read the second byte (15:8).  Then, we shift right by
    * a vector immediate of <4, 4, 4, 4, 0, 0, 0, 0>, moving the slot 1 / 3
    * values into place.  Finally, we AND with 0xf to keep the low nibble.
    *
    *    shr(16) tmp<1>W g1.0<1,8,0>B 0x44440000:V
    *    and(16) dst<1>D tmp<8,8,1>W  0xf:W
    *
    * TODO: These payload bits exist on Gfx7 too, but they appear to always
    *       be zero, so this code fails to work.  We should find out why.
    */
   const brw_reg tmp = abld.vgrf(BRW_TYPE_UW);

   for (unsigned i = 0; i < DIV_ROUND_UP(s.dispatch_width, 16); i++) {
      const brw_builder hbld = abld.group(MIN2(16, s.dispatch_width), i);
      /* According to the "PS Thread Payload for Normal Dispatch"
       * pages on the BSpec, the sample ids are stored in R0.8/R1.8
       * on gfx20+ and in R1.0/R2.0 on gfx8+.
       */
      const struct brw_reg id_reg = devinfo->ver >= 20 ? xe2_vec1_grf(i, 8) :
                                    brw_vec1_grf(i + 1, 0);
      brw_reg mask_uw = hbld.vgrf(BRW_TYPE_UW);
      hbld.MOV(mask_uw, stride(retype(id_reg, BRW_TYPE_UB), 1, 8, 0));

      hbld.SHR(offset(tmp, hbld, i),
               mask_uw,
               brw_imm_v(0x44440000));
   }

   abld.AND(sample_id, tmp, brw_imm_w(0xf));

   if (key->multisample_fbo == INTEL_SOMETIMES) {
      brw_check_dynamic_fs_config(abld, INTEL_FS_CONFIG_MULTISAMPLE_FBO);
      set_predicate(BRW_PREDICATE_NORMAL,
                    abld.SEL(sample_id, sample_id, brw_imm_ud(0)));
   }

   return sample_id;
}

static void
emit_frag_shading_rate_setup(nir_to_brw_state &ntb, brw_reg result)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &abld = ntb.bld.annotate("compute fragment size");

   result.type = BRW_TYPE_UD;

   assert(devinfo->ver >= 11);

   /* r1.0 - 0:7 ActualCoarsePixelShadingSize.X */
   brw_reg actual_x = brw_reg(retype(brw_vec1_grf(1, 0), BRW_TYPE_UB));
   /* r1.0 - 15:8 ActualCoarsePixelShadingSize.Y */
   brw_reg actual_y = byte_offset(actual_x, 1);

   abld.MOV(offset(result, abld, 0), actual_x);
   abld.MOV(offset(result, abld, 1), actual_y);
}

/* Input data is organized with first the per-primitive values, followed
 * by per-vertex values.  The per-vertex will have interpolation information
 * associated, so use 4 components for each value.
 */

/* The register location here is relative to the start of the URB
 * data.  It will get adjusted to be a real location before
 * generate_code() time.
 */
static brw_reg
brw_interp_reg(const brw_builder &bld, unsigned location,
               unsigned channel, unsigned comp)
{
   brw_shader &s = *bld.shader;
   assert(s.stage == MESA_SHADER_FRAGMENT);
   assert((BITFIELD64_BIT(location) & ~s.nir->info.per_primitive_inputs) ||
          location == VARYING_SLOT_PRIMITIVE_ID);

   const struct brw_fs_prog_data *prog_data = brw_fs_prog_data(s.prog_data);

   assert(prog_data->urb_setup[location] >= 0);
   unsigned nr = prog_data->urb_setup[location];

   const unsigned per_vertex_start = prog_data->num_per_primitive_inputs;
   const unsigned regnr = per_vertex_start + (nr * 4) + channel;

   if (s.max_polygons > 1) {
      /* In multipolygon dispatch each plane parameter is a
       * dispatch_width-wide SIMD vector (see comment in
       * assign_urb_setup()), so we need to use offset() instead of
       * component() to select the specified parameter.
       */
      const brw_reg tmp = bld.vgrf(BRW_TYPE_UD);
      bld.MOV(tmp, offset(brw_attr_reg(regnr, BRW_TYPE_UD),
                          s.dispatch_width, comp));
      return retype(tmp, BRW_TYPE_F);
   } else {
      return component(brw_attr_reg(regnr, BRW_TYPE_F), comp);
   }
}

/* The register location here is relative to the start of the URB
 * data.  It will get adjusted to be a real location before
 * generate_code() time.
 */
static brw_reg
brw_per_primitive_reg(const brw_builder &bld, int location, unsigned comp)
{
   brw_shader &s = *bld.shader;
   assert(s.stage == MESA_SHADER_FRAGMENT);
   assert((BITFIELD64_BIT(location) & s.nir->info.per_primitive_inputs) ||
          location == VARYING_SLOT_PRIMITIVE_ID);

   const struct brw_fs_prog_data *prog_data = brw_fs_prog_data(s.prog_data);

   comp += (s.fs.per_primitive_offsets[location] % 16) / 4;

   const unsigned regnr = s.fs.per_primitive_offsets[location] / 16 + comp / 4;

   assert(s.fs.per_primitive_offsets[location] >= 0);
   assert(regnr < prog_data->num_per_primitive_inputs);

   brw_reg loc_reg = brw_attr_reg(regnr, BRW_TYPE_UD);

   if (s.max_polygons > 1) {
      /* In multipolygon dispatch each primitive constant is a
       * dispatch_width-wide SIMD vector (see comment in
       * assign_urb_setup()), so we need to use offset() instead of
       * component() to select the specified parameter.
       */
      const brw_reg tmp = bld.vgrf(BRW_TYPE_UD);
      bld.MOV(tmp, offset(loc_reg, s.dispatch_width, comp % 4));
      return retype(tmp, BRW_TYPE_F);
   } else {
      return component(loc_reg, comp % 4);
   }
}

static void
brw_from_nir_emit_fs_intrinsic(nir_to_brw_state &ntb,
                         nir_intrinsic_instr *instr)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_FRAGMENT);

   brw_reg dest;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dest = get_nir_def(ntb, instr->def);

   switch (instr->intrinsic) {
   case nir_intrinsic_load_pixel_coord: {
      brw_reg comps[2] = { s.uw_pixel_x, s.uw_pixel_y };
      bld.VEC(retype(dest, BRW_TYPE_UW), comps, 2);
      break;
   }

   case nir_intrinsic_load_frag_coord_z:
      bld.MOV(dest, s.pixel_z);
      break;

   case nir_intrinsic_load_frag_coord_w:
      bld.MOV(dest, s.wpos_w);
      break;

   case nir_intrinsic_load_fs_start_intel: {
      brw_reg comps[2] = { s.x_start, s.y_start };
      bld.VEC(retype(dest, BRW_TYPE_F), comps, 2);
      break;
   }

   case nir_intrinsic_load_fs_z_c_intel: {
      brw_reg comps[2] = { s.z_cx, s.z_cy };
      bld.VEC(retype(dest, BRW_TYPE_F), comps, 2);
      break;
   }

   case nir_intrinsic_load_fs_z_c0_intel:
      bld.MOV(dest, s.z_c0);
      break;

   case nir_intrinsic_load_front_face:
      bld.MOV(retype(dest, BRW_TYPE_D), emit_frontfacing_interpolation(ntb));
      break;

   case nir_intrinsic_load_sample_pos:
   case nir_intrinsic_load_sample_pos_or_center: {
      brw_reg sample_pos = ntb.system_values[SYSTEM_VALUE_SAMPLE_POS];
      assert(sample_pos.file != BAD_FILE);
      dest.type = sample_pos.type;
      bld.MOV(dest, sample_pos);
      bld.MOV(offset(dest, bld, 1), offset(sample_pos, bld, 1));
      break;
   }

   case nir_intrinsic_load_layer_id:
      dest.type = BRW_TYPE_UD;
      bld.MOV(dest, fetch_render_target_array_index(bld));
      break;

   case nir_intrinsic_is_helper_invocation:
      emit_is_helper_invocation(ntb, dest);
      break;

   case nir_intrinsic_load_helper_invocation:
   case nir_intrinsic_load_sample_id: {
      gl_system_value sv = nir_system_value_from_intrinsic(instr->intrinsic);
      brw_reg val = ntb.system_values[sv];
      assert(val.file != BAD_FILE);
      dest.type = val.type;
      bld.MOV(dest, val);
      break;
   }

   case nir_intrinsic_load_frag_shading_rate_intel: {
      emit_frag_shading_rate_setup(ntb, dest);
      break;
   }

   case nir_intrinsic_load_coverage_mask_intel: {
      struct brw_fs_prog_data *fs_prog_data = brw_fs_prog_data(ntb.s.prog_data);
      assert(fs_prog_data->uses_sample_mask);
      bld.MOV(retype(dest, BRW_TYPE_UD),
              brw_fetch_payload_reg(ntb.bld,
                                    ntb.s.fs_payload().sample_mask_in_reg,
                                    BRW_TYPE_UD));
      break;
   }

   case nir_intrinsic_load_msaa_rate_intel: {
      brw_reg msaa = brw_uw1_grf(1, 1);
      dest.type = BRW_TYPE_UD;
      bld.ADD(dest, bld.AND(msaa, brw_imm_uw(0xf)), brw_imm_ud(1));
      break;
   }

   case nir_intrinsic_store_output: {
      const brw_reg src = get_nir_src(ntb, instr->src[0], -1);
      const nir_io_semantics sem = nir_intrinsic_io_semantics(instr);
      const brw_reg new_dest =
         offset(retype(alloc_frag_output(ntb, sem.location), src.type),
                bld, nir_intrinsic_component(instr));

      brw_combine_with_vec(bld, new_dest, src, instr->num_components);
      break;
   }

   case nir_intrinsic_load_output: {
      const nir_io_semantics sem = nir_intrinsic_io_semantics(instr);
      assert(sem.location >= FRAG_RESULT_DATA0);
      const unsigned target = sem.location - FRAG_RESULT_DATA0;
      const brw_reg tmp = bld.vgrf(dest.type, 4);

      /* Not functional after Gfx20 */
      assert(brw_can_coherent_fb_fetch(devinfo));
      emit_coherent_fb_read(bld, tmp, target);

      brw_combine_with_vec(bld, dest,
                           offset(tmp, bld, nir_intrinsic_component(instr)),
                           instr->num_components);
      break;
   }

   case nir_intrinsic_demote:
   case nir_intrinsic_terminate:
   case nir_intrinsic_demote_if:
   case nir_intrinsic_terminate_if: {
      /* We track our discarded pixels in f0.1/f1.0.  By predicating on it, we
       * can update just the flag bits that aren't yet discarded.  If there's
       * no condition, we emit a CMP of g0 != g0, so all currently executing
       * channels will get turned off.
       */
      brw_inst *cmp = NULL;
      if (instr->intrinsic == nir_intrinsic_demote_if ||
          instr->intrinsic == nir_intrinsic_terminate_if) {
         nir_alu_instr *alu = nir_src_as_alu(instr->src[0]);

         if (alu != NULL &&
             alu->op != nir_op_bcsel) {
            /* Re-emit the instruction that generated the Boolean value, but
             * do not store it.  Since this instruction will be conditional,
             * other instructions that want to use the real Boolean value may
             * get garbage.  This was a problem for piglit's fs-discard-exit-2
             * test.
             *
             * Ideally we'd detect that the instruction cannot have a
             * conditional modifier before emitting the instructions.  Alas,
             * that is nigh impossible.  Instead, we're going to assume the
             * instruction (or last instruction) generated can have a
             * conditional modifier.  If it cannot, fallback to the old-style
             * compare, and hope dead code elimination will clean up the
             * extra instructions generated.
             */
            brw_from_nir_emit_alu(ntb, alu, false);

            cmp = (brw_inst *) s.instructions.get_tail();
            if (cmp->conditional_mod == BRW_CONDITIONAL_NONE) {
               if (cmp->can_do_cmod(BRW_CONDITIONAL_Z))
                  cmp->conditional_mod = BRW_CONDITIONAL_Z;
               else
                  cmp = NULL;
            } else {
               /* The old sequence that would have been generated is,
                * basically, bool_result == false.  This is equivalent to
                * !bool_result, so negate the old modifier.
                *
                * Unfortunately, we can't do this to most float comparisons
                * because of NaN, so we'll have to fallback to the old-style
                * compare.
                *
                * For example, this code (after negation):
                *    (+f1.0) cmp.ge.f1.0(8) null<1>F g30<8,8,1>F     0x0F
                * will provide different results from this:
                *    cmp.l.f0.0(8)   g31<1>F         g30<1,1,0>F     0x0F
                *    (+f1.0) cmp.z.f1.0(8) null<1>D  g31<8,8,1>D     0D
                * because both (NaN >= 0) == false and (NaN < 0) == false.
                *
                * It will still work for == and != though, because
                * (NaN == x) == false and (NaN != x) == true.
                */
               if (brw_type_is_float(cmp->src[0].type) &&
                   cmp->conditional_mod != BRW_CONDITIONAL_EQ &&
                   cmp->conditional_mod != BRW_CONDITIONAL_NEQ) {
                  cmp = NULL;
               } else {
                  cmp->conditional_mod = brw_negate_cmod(cmp->conditional_mod);
               }
            }
         }

         if (cmp == NULL) {
            cmp = bld.CMP(bld.null_reg_f(), get_nir_src(ntb, instr->src[0], 0),
                          brw_imm_d(0), BRW_CONDITIONAL_Z);
         }
      } else {
         brw_reg some_reg = brw_reg(retype(brw_vec8_grf(0, 0), BRW_TYPE_UW));
         cmp = bld.CMP(bld.null_reg_f(), some_reg, some_reg, BRW_CONDITIONAL_NZ);
      }

      cmp->predicate = BRW_PREDICATE_NORMAL;
      cmp->flag_subreg = sample_mask_flag_subreg(s);

      brw_inst *jump = bld.emit(BRW_OPCODE_HALT);
      jump->flag_subreg = sample_mask_flag_subreg(s);
      jump->predicate_inverse = true;

      if (instr->intrinsic == nir_intrinsic_terminate ||
          instr->intrinsic == nir_intrinsic_terminate_if) {
         jump->predicate = BRW_PREDICATE_NORMAL;
      } else {
         /* Only jump when the whole quad is demoted.  For historical
          * reasons this is also used for discard.
          */
         jump->predicate = (devinfo->ver >= 20 ? XE2_PREDICATE_ANY :
                            BRW_PREDICATE_ALIGN1_ANY4H);
      }
      break;
   }

   case nir_intrinsic_load_input:
   case nir_intrinsic_load_per_primitive_input: {
      /* In Fragment Shaders load_input is used either for flat inputs or
       * per-primitive inputs.
       */
      assert(instr->def.bit_size == 32);
      unsigned base = nir_intrinsic_base(instr);
      /* Handled with load_layer_id */
      assert(base != VARYING_SLOT_LAYER);
      unsigned comp = nir_intrinsic_component(instr);
      unsigned num_components = instr->num_components;

      /* TODO(mesh): Multiview. Verify and handle these special cases for Mesh. */

      if (base == VARYING_SLOT_VIEWPORT) {
         dest.type = BRW_TYPE_UD;
         bld.MOV(dest, fetch_viewport_index(bld));
         break;
      }

      if (instr->intrinsic == nir_intrinsic_load_per_primitive_input) {
         assert(base != VARYING_SLOT_PRIMITIVE_INDICES);
         for (unsigned int i = 0; i < num_components; i++) {
            bld.MOV(offset(dest, bld, i),
                    retype(brw_per_primitive_reg(bld, base, comp + i), dest.type));
         }
      } else {
         /* Gfx20+ packs the plane parameters of a single logical
          * input in a vec3 format instead of the previously used vec4
          * format.
          */
         const unsigned k = devinfo->ver >= 20 ? 0 : 3;
         for (unsigned int i = 0; i < num_components; i++) {
            bld.MOV(offset(dest, bld, i),
                    retype(brw_interp_reg(bld, base, comp + i, k), dest.type));
         }
      }
      break;
   }

   case nir_intrinsic_load_input_vertex: {
      unsigned base = nir_intrinsic_base(instr);
      unsigned comp = nir_intrinsic_component(instr);
      unsigned vtx = nir_src_as_uint(instr->src[0]);
      unsigned num_components = instr->num_components;

      for (unsigned int i = 0; i < num_components; i++) {
         bld.MOV(offset(dest, bld, i),
                 retype(brw_interp_reg(bld, base, comp + i, vtx), dest.type));
      }
      break;
   }

   case nir_intrinsic_store_per_primitive_payload_intel: {
      const brw_builder ubld = bld.exec_all().group(1, 0);
      brw_reg src = get_nir_src(ntb, instr->src[0], -1);
      src = retype(bld.emit_uniformize(src), BRW_TYPE_UD);

      ubld.MOV(retype(
                  brw_per_primitive_reg(bld,
                                        nir_intrinsic_base(instr),
                                        nir_intrinsic_component(instr)),
                  BRW_TYPE_UD),
               component(src, 0));
      break;
   }

   case nir_intrinsic_load_fs_input_interp_deltas: {
      assert(s.stage == MESA_SHADER_FRAGMENT);
      assert(nir_src_as_uint(instr->src[0]) == 0);
      const unsigned base = nir_intrinsic_base(instr);
      const unsigned comp = nir_intrinsic_component(instr);
      dest.type = BRW_TYPE_F;

      /* Gfx20+ packs the plane parameters of a single logical
       * input in a vec3 format instead of the previously used vec4
       * format.
       */
      if (devinfo->ver >= 20) {
         bld.MOV(offset(dest, bld, 0), brw_interp_reg(bld, base, comp, 0));
         bld.MOV(offset(dest, bld, 1), brw_interp_reg(bld, base, comp, 2));
         bld.MOV(offset(dest, bld, 2), brw_interp_reg(bld, base, comp, 1));
      } else {
         bld.MOV(offset(dest, bld, 0), brw_interp_reg(bld, base, comp, 3));
         bld.MOV(offset(dest, bld, 1), brw_interp_reg(bld, base, comp, 1));
         bld.MOV(offset(dest, bld, 2), brw_interp_reg(bld, base, comp, 0));
      }

      break;
   }

   case nir_intrinsic_load_barycentric_pixel:
   case nir_intrinsic_load_barycentric_centroid:
   case nir_intrinsic_load_barycentric_sample: {
      /* Use the delta_xy values computed from the payload */
      enum intel_barycentric_mode bary = intel_fs_barycentric_mode_for_persample_dispatch(
         brw_fs_prog_data(s.prog_data)->persample_dispatch, brw_barycentric_mode(instr));
      const brw_reg srcs[] = { offset(s.delta_xy[bary], bld, 0),
                              offset(s.delta_xy[bary], bld, 1) };
      bld.LOAD_PAYLOAD(dest, srcs, ARRAY_SIZE(srcs), 0);
      break;
   }

   case nir_intrinsic_load_barycentric_at_sample: {
      const glsl_interp_mode interpolation =
         (enum glsl_interp_mode) nir_intrinsic_interp_mode(instr);

      if (devinfo->ver >= 20) {
         emit_pixel_interpolater_alu_at_sample(
            bld, dest, retype(get_nir_src(ntb, instr->src[0], 0),
                              BRW_TYPE_UD),
            interpolation);

      } else {
         const brw_reg sample_src = retype(get_nir_src(ntb, instr->src[0], 0),
                                           BRW_TYPE_UD);
         const brw_reg sample_id = bld.emit_uniformize(sample_src);
         const brw_reg msg_data = component(bld.group(8, 0).vgrf(BRW_TYPE_UD), 0);

         bld.uniform().SHL(msg_data, sample_id, brw_imm_ud(4u));

         brw_reg flag_reg;
         struct brw_fs_prog_key *fs_prog_key = (struct brw_fs_prog_key *) s.key;
         if (fs_prog_key->multisample_fbo == INTEL_SOMETIMES) {
            brw_check_dynamic_fs_config(bld.exec_all().group(8, 0),
                                        INTEL_FS_CONFIG_MULTISAMPLE_FBO);
            flag_reg = brw_flag_reg(0, 0);
         }

         emit_pixel_interpolater_send(bld,
                                      FS_OPCODE_INTERPOLATE_AT_SAMPLE,
                                      dest,
                                      brw_reg(), /* src */
                                      msg_data,
                                      flag_reg,
                                      interpolation);
      }
      break;
   }

   case nir_intrinsic_load_barycentric_at_offset: {
      const glsl_interp_mode interpolation =
         (enum glsl_interp_mode) nir_intrinsic_interp_mode(instr);

      if (devinfo->ver >= 20) {
         emit_pixel_interpolater_alu_at_offset(
            bld, dest,
            retype(get_nir_src(ntb, instr->src[0], -1), BRW_TYPE_F),
            interpolation);

      } else if (nir_const_value *const_offset = nir_src_as_const_value(instr->src[0])) {
         assert(nir_src_bit_size(instr->src[0]) == 32);
         unsigned off_x = const_offset[0].u32 & 0xf;
         unsigned off_y = const_offset[1].u32 & 0xf;

         emit_pixel_interpolater_send(bld,
                                      FS_OPCODE_INTERPOLATE_AT_SHARED_OFFSET,
                                      dest,
                                      brw_reg(), /* src */
                                      brw_imm_ud(off_x | (off_y << 4)),
                                      brw_reg(), /* flag_reg */
                                      interpolation);
      } else {
         brw_reg src = retype(get_nir_src(ntb, instr->src[0], -1), BRW_TYPE_D);
         const enum opcode opcode = FS_OPCODE_INTERPOLATE_AT_PER_SLOT_OFFSET;
         emit_pixel_interpolater_send(bld,
                                      opcode,
                                      dest,
                                      src,
                                      brw_imm_ud(0u),
                                      brw_reg(), /* flag_reg */
                                      interpolation);
      }
      break;
   }

   case nir_intrinsic_load_interpolated_input: {
      assert(nir_src_is_intrinsic(instr->src[0]));
      nir_intrinsic_instr *bary_intrinsic = nir_src_as_intrinsic(instr->src[0]);
      nir_intrinsic_op bary_intrin = bary_intrinsic->intrinsic;
      brw_reg dst_xy;

      if (bary_intrin == nir_intrinsic_load_barycentric_at_offset ||
          bary_intrin == nir_intrinsic_load_barycentric_at_sample) {
         /* Use the result of the PI message. */
         dst_xy = retype(get_nir_src(ntb, instr->src[0], -1), BRW_TYPE_F);
      } else {
         /* Use the delta_xy values computed from the payload */
         enum intel_barycentric_mode bary = intel_fs_barycentric_mode_for_persample_dispatch(
            brw_fs_prog_data(s.prog_data)->persample_dispatch, brw_barycentric_mode(bary_intrinsic));
         dst_xy = s.delta_xy[bary];
      }

      /* Force valid linear stride for src1 of PLN.  See
       * b14313e4529 ("i965/fs: Manually set source regioning on
       * PLN instructions.") for details.
       */
      dst_xy.vstride = BRW_VERTICAL_STRIDE_8;
      dst_xy.width = BRW_WIDTH_8;
      dst_xy.hstride = BRW_HORIZONTAL_STRIDE_1;

      for (unsigned int i = 0; i < instr->num_components; i++) {
         brw_reg interp =
            brw_interp_reg(bld, nir_intrinsic_base(instr),
                           nir_intrinsic_component(instr) + i, 0);
         interp.type = BRW_TYPE_F;
         dest.type = BRW_TYPE_F;
         assert(is_uniform(interp));
         bld.PLN(offset(dest, bld, i), interp, dst_xy);
      }
      break;
   }

   case nir_intrinsic_load_fs_config_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD),
              brw_dynamic_fs_config(brw_fs_prog_data(s.prog_data)));
      break;

   case nir_intrinsic_load_max_polygon_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD), brw_imm_ud(s.max_polygons));
      break;

   default:
      brw_from_nir_emit_intrinsic(ntb, bld, instr);
      break;
   }
}

static bool
can_use_instruction_offset(enum lsc_addr_surface_type binding_type, int32_t offset)
{
   const unsigned max_bits = brw_max_immediate_offset_bits(binding_type);
   return offset >= u_intN_min(max_bits) && offset <= u_intN_max(max_bits);
}

static brw_reg
memory_address(nir_to_brw_state &ntb,
               const brw_builder &bld,
               nir_intrinsic_instr *instr,
               enum lsc_addr_surface_type binding_type,
               int32_t *address_offset)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const nir_src *nir_src_offset = nir_get_io_offset_src(instr);
   const brw_reg src_offset = get_nir_src_imm(ntb, *nir_src_offset);
   const brw_builder ubld = (src_offset.is_scalar || src_offset.file == IMM) ?
      bld.scalar_group() : bld;
   brw_reg address;

   if ((brw_lsc_supports_base_offset(devinfo) == false) ||
       (!nir_intrinsic_has_base(instr) && !nir_src_is_const(*nir_src_offset))) {
      address =
         nir_intrinsic_has_base(instr) ?
         ubld.ADD(src_offset,
                  brw_imm_int(src_offset.type, nir_intrinsic_base(instr))) :
         src_offset;
      *address_offset = 0;
   } else if (!nir_intrinsic_has_base(instr) && nir_src_is_const(*nir_src_offset)) {
      const int32_t offset = nir_src_as_int(*nir_src_offset);
      if (can_use_instruction_offset(binding_type, offset)) {
         address = brw_imm_ud(0);
         *address_offset = offset;
      } else {
         address = src_offset;
         *address_offset = 0;
      }
   } else {
      assert(nir_intrinsic_has_base(instr));
      const int32_t offset = nir_intrinsic_base(instr);
      assert(can_use_instruction_offset(binding_type, offset));
      address = src_offset;
      *address_offset = offset;
   }

   /* If nir_src is_scalar, the MEMORY_LOGICAL_ADDRESS will be allocated at
    * scalar_group() size and will have every component the same value. This
    * is the definition of is_scalar. Much more importantly, setting is_scalar
    * properly also ensures that emit_uniformize (below) will handle the value
    * as scalar_group() size instead of full dispatch width.
    */
   address.is_scalar = src_offset.is_scalar;

   return address;
}

static unsigned
brw_workgroup_size(brw_shader &s)
{
   assert(mesa_shader_stage_uses_workgroup(s.stage));
   assert(!s.nir->info.workgroup_size_variable);
   const struct brw_cs_prog_data *cs = brw_cs_prog_data(s.prog_data);
   return cs->local_size[0] * cs->local_size[1] * cs->local_size[2];
}

static void
brw_from_nir_emit_cs_intrinsic(nir_to_brw_state &ntb,
                         nir_intrinsic_instr *instr)
{
   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(mesa_shader_stage_uses_workgroup(s.stage));
   struct brw_cs_prog_data *cs_prog_data = brw_cs_prog_data(s.prog_data);

   brw_reg dest;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dest = get_nir_def(ntb, instr->def);

   switch (instr->intrinsic) {
   case nir_intrinsic_barrier:
      if (nir_intrinsic_memory_scope(instr) != SCOPE_NONE)
         brw_from_nir_emit_intrinsic(ntb, bld, instr);
      if (nir_intrinsic_execution_scope(instr) == SCOPE_WORKGROUP) {
         /* The whole workgroup fits in a single HW thread, so all the
          * invocations are already executed lock-step.  Instead of an actual
          * barrier just emit a scheduling fence, that will generate no code.
          */
         if (!s.nir->info.workgroup_size_variable &&
             brw_workgroup_size(s) <= s.dispatch_width) {
            bld.uniform().emit(FS_OPCODE_SCHEDULING_FENCE);
            break;
         }

         emit_barrier(ntb);
         cs_prog_data->uses_barrier = true;
      }
      break;

   case nir_intrinsic_load_subgroup_id:
      s.cs_payload().load_subgroup_id(bld, dest);
      break;

   case nir_intrinsic_load_indirect_address_intel:
      (dest.is_scalar ? bld.scalar_group() : bld).AND(
         retype(dest, BRW_TYPE_UD),
         retype(brw_vec1_grf(0, 0), BRW_TYPE_UD),
         brw_imm_ud(INTEL_MASK(31, 6)));
      break;

   case nir_intrinsic_load_local_invocation_id:
      /* This is only used for hardware generated local IDs. */
      assert(cs_prog_data->generate_local_id);

      dest.type = BRW_TYPE_UD;

      for (unsigned i = 0; i < 3; i++)
         bld.MOV(offset(dest, bld, i), s.cs_payload().local_invocation_id[i]);
      break;

   case nir_intrinsic_load_workgroup_id: {
      brw_reg val = ntb.system_values[SYSTEM_VALUE_WORKGROUP_ID];
      const brw_builder ubld = bld.scalar_group();

      assert(val.file != BAD_FILE);
      assert(val.is_scalar);

      dest.type = val.type;
      for (unsigned i = 0; i < 3; i++)
         ubld.MOV(offset(dest, ubld, i), offset(val, ubld, i));
      break;
   }

   case nir_intrinsic_load_workgroup_size: {
      /* Should have been lowered by brw_nir_lower_cs_intrinsics() or
       * iris_setup_uniforms() for the variable group size case.
       */
      UNREACHABLE("Should have been lowered");
      break;
   }

   case nir_intrinsic_dpas_intel: {
      const unsigned sdepth = nir_intrinsic_systolic_depth(instr);
      const unsigned rcount = nir_intrinsic_repeat_count(instr);

      const brw_reg_type dest_type =
         brw_type_for_base_type(nir_intrinsic_dest_base_type(instr));
      const brw_reg_type src_type =
         brw_type_for_base_type(nir_intrinsic_src_base_type(instr));

      /* ACM PRM, Vol 2a, "Dot Product Accumulate Systolic" says
       *
       *     When Src0 is specified as null, it is treated as an
       *     immediate value of +0.
       */
      bool src0_use_null = true;
      for (unsigned c = 0; c < nir_src_num_components(instr->src[0]); c++)
         src0_use_null &= nir_scalar_is_zero(nir_scalar_resolved(instr->src[0].ssa, c));

      brw_reg src[3] = {};
      for (unsigned i = 0; i < ARRAY_SIZE(src); i++) {
         nir_src nsrc = instr->src[i];
         brw_reg val = get_nir_src(ntb, nsrc, 0);

         if (i == 0 && src0_use_null) {
            src[i] = brw_null_reg();
         } else if (!is_uniform(val)) {
            src[i] = val;
         } else {
            /* DPAS can't use regioning, so broadcast the uniform value in the
             * registers to be consumed by it.
             */
            assert(nir_src_bit_size(nsrc) == 32);
            const unsigned num_components = nir_src_num_components(nsrc);

            src[i] = bld.vgrf(BRW_TYPE_UD, num_components);
            const brw_reg scalar = retype(component(val, 0), BRW_TYPE_UD);
            for (unsigned j = 0; j < num_components; j++)
               bld.exec_all().MOV(offset(src[i], bld, j), scalar);
         }
      }

      const unsigned dpas_exec_size = devinfo->ver >= 20 ? 16 : 8;
      brw_builder bldn = bld.exec_all().group(dpas_exec_size, 0);

      bldn.DPAS(retype(dest,   dest_type),
                retype(src[0], dest_type),
                retype(src[1], src_type),
                retype(src[2], src_type),
                sdepth,
                rcount)
         ->saturate = nir_intrinsic_saturate(instr);

      if (!ntb.s.compiler->lower_dpas)
         cs_prog_data->uses_systolic = true;

      break;
   }

   case nir_intrinsic_convert_cmat_intel: {
      struct glsl_cmat_description dst_cmat_desc =
         nir_intrinsic_dst_cmat_desc(instr);
      struct glsl_cmat_description src_cmat_desc =
         nir_intrinsic_src_cmat_desc(instr);

      brw_reg_type dst_type =
         brw_type_for_base_type((enum glsl_base_type)dst_cmat_desc.element_type);
      brw_reg_type src_type =
         brw_type_for_base_type((enum glsl_base_type)src_cmat_desc.element_type);

      const unsigned dst_element_bits =
         brw_type_size_bits(dst_type);
      const unsigned src_element_bits =
         brw_type_size_bits(src_type);

      const unsigned element_bits = 32;
      const unsigned src_packing_factor = element_bits / src_element_bits;
      const unsigned src_components = nir_src_num_components(instr->src[0]);
      const unsigned elems = src_components * src_packing_factor;

      brw_builder bldn = bld.exec_all();
      brw_reg src = retype(get_nir_src(ntb, instr->src[0], 0), src_type);
      const brw_reg dst = retype(dest, dst_type);

      assert(dst_cmat_desc.use == src_cmat_desc.use);

      const bool needs_intermediate =
         (src.type == BRW_TYPE_BF && dst.type != BRW_TYPE_F) ||
         (dst.type == BRW_TYPE_BF && src.type != BRW_TYPE_F);

      switch (src_cmat_desc.use) {
      case GLSL_CMAT_USE_B:
         assert(dst_element_bits == src_element_bits);
         FALLTHROUGH;

      case GLSL_CMAT_USE_A:
      case GLSL_CMAT_USE_ACCUMULATOR: {
         const unsigned width = bldn.dispatch_width();

         if (needs_intermediate) {
            brw_reg tmp = bldn.vgrf(BRW_TYPE_F, elems);
            for (unsigned c = 0; c < elems; c++) {
               bldn.MOV(suboffset(tmp, c * width),
                        suboffset(src, c * width));
            }
            src = tmp;
         }

         for (unsigned c = 0; c < elems; c++) {
            bldn.MOV(suboffset(dst, c * width),
                     suboffset(src, c * width));
         }
         break;
      }
      default:
         UNREACHABLE("not reached");
      }
      break;
   }

   /* Part of a temporary workaround for a broken shader in RE engine, see
    * brw_nir_lower_divergent_barriers for more details.
    */
   case nir_intrinsic_subgroup_barrier_index_intel: {
      brw_builder xbld = bld.scalar_group();
      brw_builder ubld = bld.uniform();
      if (s.subgroup_barrier_index.file == BAD_FILE) {
         /* First source-order invocation always sets the initial value */
         s.subgroup_barrier_index = component(ubld.vgrf(BRW_TYPE_UD), 0);
         xbld.MOV(retype(dest, BRW_TYPE_UD), brw_imm_ud(0u));
         ubld.MOV(s.subgroup_barrier_index,
                  brw_imm_ud(nir_intrinsic_base(instr)));
      } else {
         xbld.MOV(retype(dest, BRW_TYPE_UD), s.subgroup_barrier_index);
         ubld.ADD(s.subgroup_barrier_index,
                  s.subgroup_barrier_index,
                  brw_imm_ud(nir_intrinsic_base(instr)));
      }
      break;
   }

   default:
      brw_from_nir_emit_intrinsic(ntb, bld, instr);
      break;
   }
}

static void
emit_rt_lsc_fence(const brw_builder &bld,
                  enum lsc_fence_scope scope,
                  enum lsc_flush_type flush_type)
{
   const intel_device_info *devinfo = bld.shader->devinfo;

   const brw_builder ubld = bld.exec_all().group(8, 0);
   brw_reg tmp = ubld.vgrf(BRW_TYPE_UD);

   brw_send_inst *send = ubld.SEND();
   send->dst = tmp;

   send->src[SEND_SRC_DESC]     = brw_imm_ud(0);
   send->src[SEND_SRC_EX_DESC]  = brw_imm_ud(0);
   send->src[SEND_SRC_PAYLOAD1] = brw_vec8_grf(0, 0);
   send->src[SEND_SRC_PAYLOAD2] = brw_reg();

   send->sfid = GEN_SFID_UGM;
   send->desc = lsc_fence_msg_desc(devinfo, scope, flush_type, true);
   send->mlen = reg_unit(devinfo); /* g0 header */
   send->ex_mlen = 0;
   /* Temp write for scheduling */
   send->size_written = REG_SIZE * reg_unit(devinfo);
   send->has_side_effects = true;

   ubld.emit(FS_OPCODE_SCHEDULING_FENCE, ubld.null_reg_ud(), tmp);
}


static void
brw_from_nir_emit_bs_intrinsic(nir_to_brw_state &ntb,
                         nir_intrinsic_instr *instr)
{
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(brw_shader_stage_is_bindless(s.stage));
   const brw_bs_thread_payload &payload = s.bs_payload();

   brw_reg dest;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dest = get_nir_def(ntb, instr->def);

   const brw_builder xbld = dest.is_scalar ? bld.scalar_group() : bld;

   switch (instr->intrinsic) {
   case nir_intrinsic_load_btd_global_arg_addr_intel:
      xbld.MOV(dest, retype(payload.global_arg_ptr, dest.type));
      break;

   case nir_intrinsic_load_btd_local_arg_addr_intel:
      xbld.MOV(dest, retype(payload.local_arg_ptr, dest.type));
      break;

   case nir_intrinsic_load_btd_shader_type_intel:
      payload.load_shader_type(xbld, dest);
      break;

   default:
      brw_from_nir_emit_intrinsic(ntb, bld, instr);
      break;
   }
}

static brw_reduce_op
brw_reduce_op_for_nir_reduction_op(nir_op op)
{
   switch (op) {
   case nir_op_iadd: return BRW_REDUCE_OP_ADD;
   case nir_op_fadd: return BRW_REDUCE_OP_ADD;
   case nir_op_imul: return BRW_REDUCE_OP_MUL;
   case nir_op_fmul: return BRW_REDUCE_OP_MUL;
   case nir_op_imin: return BRW_REDUCE_OP_MIN;
   case nir_op_umin: return BRW_REDUCE_OP_MIN;
   case nir_op_fmin: return BRW_REDUCE_OP_MIN;
   case nir_op_imax: return BRW_REDUCE_OP_MAX;
   case nir_op_umax: return BRW_REDUCE_OP_MAX;
   case nir_op_fmax: return BRW_REDUCE_OP_MAX;
   case nir_op_iand: return BRW_REDUCE_OP_AND;
   case nir_op_ior:  return BRW_REDUCE_OP_OR;
   case nir_op_ixor: return BRW_REDUCE_OP_XOR;
   default:
      UNREACHABLE("Invalid reduction operation");
   }
}

static brw_reg
get_nir_image_intrinsic_image(nir_to_brw_state &ntb, const brw_builder &bld,
                              nir_intrinsic_instr *instr)
{
   brw_reg surf_index = get_nir_src_imm(ntb, instr->src[0]);
   enum brw_reg_type type = brw_type_with_size(BRW_TYPE_UD,
                                               brw_type_size_bits(surf_index.type));

   return bld.emit_uniformize(retype(surf_index, type));
}

static brw_reg
get_nir_buffer_intrinsic_index(nir_to_brw_state &ntb, const brw_builder &bld,
                               nir_intrinsic_instr *instr, bool *no_mask_handle = NULL)
{
   /* SSBO stores are weird in that their index is in src[1] */
   const bool is_store =
      instr->intrinsic == nir_intrinsic_store_ssbo ||
      instr->intrinsic == nir_intrinsic_store_ssbo_intel ||
      instr->intrinsic == nir_intrinsic_store_ssbo_block_intel;
   nir_src src = is_store ? instr->src[1] : instr->src[0];

   brw_reg surf_index = get_nir_src_imm(ntb, src);

   if (no_mask_handle)
      *no_mask_handle = surf_index.is_scalar || surf_index.file == IMM;

   enum brw_reg_type type = brw_type_with_size(BRW_TYPE_UD,
                                               brw_type_size_bits(surf_index.type));

   return bld.emit_uniformize(retype(surf_index, type));
}

static unsigned
choose_block_size_dwords(const intel_device_info *devinfo, unsigned dwords)
{
   const unsigned min_block = devinfo->has_lsc ? 1 : 4;
   const unsigned max_block = devinfo->has_lsc ? 64 : 32;

   const unsigned block = dwords > 4 ? 1 << util_logbase2(dwords) : dwords;

   return CLAMP(block, min_block, max_block);
}

static brw_reg
increment_a64_address(const brw_builder &_bld, brw_reg address, uint32_t v, bool use_no_mask)
{
   const brw_builder bld = use_no_mask ? _bld.exec_all().group(8, 0) : _bld;

   if (bld.shader->devinfo->has_64bit_int) {
      return bld.ADD(retype(address, BRW_TYPE_UQ), brw_imm_ud(v));
   } else {
      brw_reg dst = bld.vgrf(BRW_TYPE_UQ);
      brw_reg dst_low = subscript(dst, BRW_TYPE_UD, 0);
      brw_reg dst_high = subscript(dst, BRW_TYPE_UD, 1);
      brw_reg src_low = subscript(address, BRW_TYPE_UD, 0);
      brw_reg src_high = subscript(address, BRW_TYPE_UD, 1);

      /* Add low and if that overflows, add carry to high. */
      bld.ADD(dst_low, src_low, brw_imm_ud(v))->conditional_mod = BRW_CONDITIONAL_O;
      bld.MOV(dst_high, src_high);
      bld.ADD(dst_high, dst_high, brw_imm_ud(0x1))->predicate = BRW_PREDICATE_NORMAL;
      return dst;
   }
}

static brw_reg
emit_fence(const brw_builder &bld, enum opcode opcode,
           uint8_t sfid, uint32_t desc,
           bool commit_enable)
{
   const struct intel_device_info *devinfo = bld.shader->devinfo;

   assert(opcode == SHADER_OPCODE_INTERLOCK ||
          opcode == SHADER_OPCODE_MEMORY_FENCE);

   brw_reg dst = commit_enable ? bld.vgrf(BRW_TYPE_UD) : bld.null_reg_ud();
   brw_send_inst *fence = bld.emit(opcode, dst, brw_vec8_grf(0, 0),
                                   brw_imm_ud(commit_enable))->as_send();
   fence->sfid = sfid;
   fence->desc = desc;
   fence->size_written = commit_enable ? REG_SIZE * reg_unit(devinfo) : 0;

   return dst;
}

static uint32_t
lsc_fence_descriptor_for_intrinsic(const struct intel_device_info *devinfo,
                                   nir_intrinsic_instr *instr, bool is_tgm)
{
   assert(devinfo->has_lsc);

   enum lsc_fence_scope scope = LSC_FENCE_TILE;
   enum lsc_flush_type flush_type = LSC_FLUSH_TYPE_EVICT;

   if (instr->intrinsic == nir_intrinsic_begin_invocation_interlock ||
       instr->intrinsic == nir_intrinsic_end_invocation_interlock) {
      /* Critical section begin/end don't need any flush, if the shader needs
       * some barrier intrinsics will express the flushing needed.
       *
       * We choose scope TILE as we have to synchronize all the fragment
       * shaders of a given draw call.
       */
      scope = LSC_FENCE_TILE;
      flush_type = LSC_FLUSH_TYPE_NONE;
   } else {
      if (nir_intrinsic_has_memory_scope(instr)) {
         switch (nir_intrinsic_memory_scope(instr)) {
         case SCOPE_DEVICE:
         case SCOPE_QUEUE_FAMILY:
            scope = LSC_FENCE_TILE;
            flush_type = LSC_FLUSH_TYPE_EVICT;
            break;
         case SCOPE_WORKGROUP:
            /* On Xe2 and Xe3 we need the eviction due to aliasing of TGM data
             * in L1 (HSD 14020414266). On Xe3p we need this due to how data
             * post-format conversion happens (HSD 22020984324).
             * Also, we have to upgrade the scope to TILE since flush_type is
             * ignored for threadgroup fences, which means we'll use the
             * values alaready initialized.
             */
            if (devinfo->ver < 20 || !is_tgm) {
               scope = LSC_FENCE_THREADGROUP;
               flush_type = LSC_FLUSH_TYPE_NONE;
            }
            break;
         case SCOPE_SHADER_CALL:
         case SCOPE_INVOCATION:
         case SCOPE_SUBGROUP:
         case SCOPE_NONE:
            scope = LSC_FENCE_LOCAL;
            flush_type = LSC_FLUSH_TYPE_NONE;
            break;
         }
      }
   }
   return lsc_fence_msg_desc(devinfo, scope, flush_type, true);
}

/**
 * Create a MOV to read the timestamp register.
 */
static brw_reg
get_timestamp(const brw_builder &bld)
{
   brw_shader &s = *bld.shader;

   brw_reg ts = brw_reg(retype(brw_vec4_reg(ARF,
                                          BRW_ARF_TIMESTAMP, 0), BRW_TYPE_UD));

   brw_reg dst = retype(brw_allocate_vgrf_units(s, 1), BRW_TYPE_UD);

   /* We want to read the 3 fields we care about even if it's not enabled in
    * the dispatch.
    */
   bld.group(4, 0).exec_all().MOV(dst, ts);

   return dst;
}

static void
adjust_handle_and_offset(const brw_builder &bld,
                         brw_reg &urb_handle,
                         unsigned &urb_global_offset)
{
   /* Make sure that URB global offset is below 2048 (2^11), because
    * that's the maximum possible value encoded in Message Descriptor.
    */
   unsigned adjustment = (urb_global_offset >> 11) << 11;

   if (adjustment) {
      /* Allocate new register to not overwrite the shared URB handle. */
      urb_handle = bld.ADD(urb_handle, brw_imm_ud(adjustment));
      urb_global_offset -= adjustment;
   }
}

static void
brw_from_nir_emit_task_mesh_intrinsic(nir_to_brw_state &ntb,
                                      nir_intrinsic_instr *instr)
{
   brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   assert(s.stage == MESA_SHADER_MESH || s.stage == MESA_SHADER_TASK);
   const brw_task_mesh_thread_payload &payload = s.task_mesh_payload();

   brw_reg dest;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dest = get_nir_def(ntb, instr->def);

   switch (instr->intrinsic) {
   case nir_intrinsic_load_urb_input_handle_intel:
      assert(s.stage == MESA_SHADER_MESH);
      bld.MOV(retype(dest, BRW_TYPE_UD), payload.task_urb_input);
      break;

   case nir_intrinsic_load_urb_output_handle_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD), payload.urb_output);
      break;

   case nir_intrinsic_load_draw_id:
      dest = retype(dest, BRW_TYPE_UD);
      bld.MOV(dest, payload.extended_parameter_0);
      break;

   case nir_intrinsic_load_local_invocation_id:
      UNREACHABLE("local invocation id should have been lowered earlier");
      break;

   case nir_intrinsic_load_local_invocation_index_intel:
      dest = retype(dest, BRW_TYPE_UD);
      bld.MOV(dest, payload.local_index);
      break;

   case nir_intrinsic_load_num_workgroups:
      dest = retype(dest, BRW_TYPE_UD);
      bld.MOV(offset(dest, bld, 0), brw_uw1_grf(0, 13)); /* g0.6 >> 16 */
      bld.MOV(offset(dest, bld, 1), brw_uw1_grf(0, 8));  /* g0.4 & 0xffff */
      bld.MOV(offset(dest, bld, 2), brw_uw1_grf(0, 9));  /* g0.4 >> 16 */
      break;

   case nir_intrinsic_load_workgroup_index:
      dest = retype(dest, BRW_TYPE_UD);
      bld.MOV(dest, retype(brw_vec1_grf(0, 1), BRW_TYPE_UD));
      break;

   default:
      brw_from_nir_emit_cs_intrinsic(ntb, instr);
      break;
   }
}

static void
brw_from_nir_emit_intrinsic(nir_to_brw_state &ntb,
                      const brw_builder &bld, nir_intrinsic_instr *instr)
{
   const intel_device_info *devinfo = ntb.devinfo;
   brw_shader &s = ntb.s;

   /* We handle this as a special case */
   if (instr->intrinsic == nir_intrinsic_decl_reg) {
      assert(nir_intrinsic_num_array_elems(instr) == 0);
      unsigned bit_size = nir_intrinsic_bit_size(instr);
      unsigned num_components = nir_intrinsic_num_components(instr);
      const brw_reg_type reg_type =
         brw_type_with_size(bit_size == 8 ? BRW_TYPE_D : BRW_TYPE_F,
                            bit_size);

      /* Re-use the destination's slot in the table for the register */
      ntb.ssa_values[instr->def.index] =
         bld.vgrf(reg_type, num_components);
      return;
   }

   brw_reg dest;
   if (nir_intrinsic_infos[instr->intrinsic].has_dest)
      dest = get_nir_def(ntb, instr->def);

   const brw_builder xbld = dest.is_scalar ? bld.scalar_group() : bld;

   switch (instr->intrinsic) {
   case nir_intrinsic_resource_intel: {
      ntb.ssa_bind_infos[instr->def.index].valid = true;
      ntb.ssa_bind_infos[instr->def.index].bindless =
         (nir_intrinsic_resource_access_intel(instr) &
          nir_resource_intel_bindless) != 0;
      ntb.ssa_bind_infos[instr->def.index].internal =
         (nir_intrinsic_resource_access_intel(instr) &
          nir_resource_intel_internal) != 0;
      ntb.ssa_bind_infos[instr->def.index].block =
         nir_intrinsic_resource_block_intel(instr);
      ntb.ssa_bind_infos[instr->def.index].set =
         nir_intrinsic_desc_set(instr);
      ntb.ssa_bind_infos[instr->def.index].binding =
         nir_intrinsic_binding(instr);

      dest = retype(dest, BRW_TYPE_UD);
      ntb.ssa_values[instr->def.index] = dest;

      xbld.MOV(dest,
               bld.emit_uniformize(get_nir_src(ntb, instr->src[1], 0)));
      break;
   }

   case nir_intrinsic_load_reg:
   case nir_intrinsic_store_reg:
      /* Nothing to do with these. */
      break;

   case nir_intrinsic_load_global_constant_uniform_block_intel:
   case nir_intrinsic_load_ssbo_uniform_block_intel:
   case nir_intrinsic_load_shared_uniform_block_intel:
   case nir_intrinsic_load_global_block_intel:
   case nir_intrinsic_store_global_block_intel:
   case nir_intrinsic_load_shared_block_intel:
   case nir_intrinsic_store_shared_block_intel:
   case nir_intrinsic_load_ssbo_block_intel:
   case nir_intrinsic_store_ssbo_block_intel:
   case nir_intrinsic_image_load:
   case nir_intrinsic_image_store:
   case nir_intrinsic_image_atomic:
   case nir_intrinsic_image_atomic_swap:
   case nir_intrinsic_bindless_image_load:
   case nir_intrinsic_bindless_image_store:
   case nir_intrinsic_bindless_image_atomic:
   case nir_intrinsic_bindless_image_atomic_swap:
   case nir_intrinsic_load_shared:
   case nir_intrinsic_store_shared:
   case nir_intrinsic_shared_atomic:
   case nir_intrinsic_shared_atomic_swap:
   case nir_intrinsic_load_ssbo:
   case nir_intrinsic_load_ssbo_intel:
   case nir_intrinsic_store_ssbo:
   case nir_intrinsic_store_ssbo_intel:
   case nir_intrinsic_ssbo_atomic:
   case nir_intrinsic_ssbo_atomic_swap:
   case nir_intrinsic_load_global:
   case nir_intrinsic_load_global_intel:
   case nir_intrinsic_load_global_constant:
   case nir_intrinsic_store_global:
   case nir_intrinsic_store_global_intel:
   case nir_intrinsic_global_atomic:
   case nir_intrinsic_global_atomic_swap:
   case nir_intrinsic_load_scratch:
   case nir_intrinsic_store_scratch:
   case nir_intrinsic_load_scratch_intel:
   case nir_intrinsic_store_scratch_intel:
   case nir_intrinsic_load_shader_indirect_data_intel:
      brw_from_nir_emit_memory_access(ntb, bld, xbld, instr);
      break;

   case nir_intrinsic_load_attribute_payload_intel: {
      assert(instr->def.bit_size == 32);
      const unsigned vector_payload =
         nir_intrinsic_vector_payload_intel(instr);

      if (nir_src_is_const(instr->src[0])) {
         const brw_reg src = byte_offset(brw_attr_reg(0, dest.type),
                                         nir_src_as_uint(instr->src[0]));
         brw_reg comps[NIR_MAX_VEC_COMPONENTS];
         for (unsigned i = 0; i < instr->num_components; i++) {
            comps[i] = vector_payload ? offset(src, bld, i) : component(src, i);
         }
         bld.VEC(dest, comps, instr->num_components);
      } else {
         assert(instr->def.num_components == 1);
         /* Unsupported */
         assert(!vector_payload);

         const brw_reg offset = retype(
            bld.emit_uniformize(get_nir_src(ntb, instr->src[0], 0)),
            BRW_TYPE_UD);
         bld.emit(SHADER_OPCODE_LOAD_ATTRIBUTE_PAYLOAD,
                  retype(dest, BRW_TYPE_UD), offset);
      }
      break;
   }

   case nir_intrinsic_load_urb_vec4_intel: {
      assert(devinfo->ver < 20);
      brw_reg srcs[URB_LOGICAL_NUM_SRCS];
      unsigned urb_global_offset = nir_intrinsic_base(instr);

      if (nir_src_is_const(instr->src[1])) {
         urb_global_offset += nir_src_as_uint(instr->src[1]);
      } else {
         srcs[URB_LOGICAL_SRC_PER_SLOT_OFFSETS] =
            get_nir_src(ntb, instr->src[1], -1);
      }
      brw_reg urb_handle = get_nir_src(ntb, instr->src[0], -1);
      adjust_handle_and_offset(bld, urb_handle, urb_global_offset);
      srcs[URB_LOGICAL_SRC_HANDLE] = urb_handle;

      brw_urb_inst *urb = bld.URB_READ(dest, srcs, ARRAY_SIZE(srcs));
      urb->offset = urb_global_offset;
      urb->size_written = instr->num_components *
                          urb->dst.component_size(urb->exec_size);
      break;
   }

   case nir_intrinsic_store_urb_vec4_intel: {
      assert(devinfo->ver < 20);
      brw_reg srcs[URB_LOGICAL_NUM_SRCS];
      unsigned urb_global_offset = nir_intrinsic_base(instr);

      if (nir_src_is_const(instr->src[2])) {
         urb_global_offset += nir_src_as_uint(instr->src[2]);
      } else {
         srcs[URB_LOGICAL_SRC_PER_SLOT_OFFSETS] =
            get_nir_src(ntb, instr->src[2], -1);
      }

      brw_reg urb_handle = get_nir_src(ntb, instr->src[1], -1);
      adjust_handle_and_offset(bld, urb_handle, urb_global_offset);

      srcs[URB_LOGICAL_SRC_HANDLE] = urb_handle;
      srcs[URB_LOGICAL_SRC_DATA] = get_nir_src(ntb, instr->src[0], -1);

      if (!nir_src_is_const(instr->src[3]) ||
          nir_src_as_uint(instr->src[3]) !=
          nir_component_mask(nir_src_num_components(instr->src[0]))) {
         srcs[URB_LOGICAL_SRC_CHANNEL_MASK] =
            retype(get_nir_src_imm(ntb, instr->src[3]), BRW_TYPE_UD);
      }

      brw_urb_inst *urb = bld.URB_WRITE(srcs, ARRAY_SIZE(srcs));
      urb->components = instr->src[0].ssa->num_components;
      urb->offset = urb_global_offset;

      assert(urb->components == 4 || urb->components == 8);
      break;
   }

   case nir_intrinsic_load_urb_lsc_intel: {
      assert(devinfo->ver >= 20);

      brw_reg srcs[URB_LOGICAL_NUM_SRCS];
      srcs[URB_LOGICAL_SRC_HANDLE] = get_nir_src(ntb, instr->src[0], -1);

      brw_urb_inst *urb = bld.URB_READ(dest, srcs, ARRAY_SIZE(srcs));
      urb->offset = nir_intrinsic_base(instr);
      urb->size_written = instr->num_components *
                          urb->dst.component_size(urb->exec_size);
      break;
   }

   case nir_intrinsic_store_urb_lsc_intel: {
      assert(devinfo->ver >= 20);

      brw_reg srcs[URB_LOGICAL_NUM_SRCS];
      srcs[URB_LOGICAL_SRC_HANDLE] = get_nir_src(ntb, instr->src[1], -1);
      srcs[URB_LOGICAL_SRC_DATA] = get_nir_src(ntb, instr->src[0], -1);

      brw_urb_inst *urb = bld.URB_WRITE(srcs, ARRAY_SIZE(srcs));
      urb->components = instr->src[0].ssa->num_components;
      urb->offset = nir_intrinsic_base(instr);
      break;
   }

   case nir_intrinsic_barrier:
   case nir_intrinsic_begin_invocation_interlock:
   case nir_intrinsic_end_invocation_interlock: {
      bool ugm_fence, slm_fence, tgm_fence, urb_fence;
      enum opcode opcode = BRW_OPCODE_NOP;

      /* Handling interlock intrinsics here will allow the logic for IVB
       * render cache (see below) to be reused.
       */

      switch (instr->intrinsic) {
      case nir_intrinsic_barrier: {
         /* Note we only care about the memory part of the
          * barrier.  The execution part will be taken care
          * of by the stage specific intrinsic handler functions.
          */
         nir_variable_mode modes = nir_intrinsic_memory_modes(instr);
         ugm_fence = modes & (nir_var_mem_ssbo | nir_var_mem_global);
         slm_fence = modes & nir_var_mem_shared;
         tgm_fence = modes & nir_var_image;
         urb_fence = modes & (nir_var_shader_out | nir_var_mem_task_payload);

         /* When image accesses have been lowered to global intrinsics and a
          * typed fence is requested, we also need to include the untyped
          * global memory fence.
          */
         if (tgm_fence && s.nir->info.use_lowered_image_to_global)
            ugm_fence = true;

         if (nir_intrinsic_memory_scope(instr) != SCOPE_NONE)
            opcode = SHADER_OPCODE_MEMORY_FENCE;
         break;
      }

      case nir_intrinsic_begin_invocation_interlock:
         /* For beginInvocationInterlockARB(), we will generate a memory fence
          * but with a different opcode so that generator can pick SENDC
          * instead of SEND.
          */
         assert(s.stage == MESA_SHADER_FRAGMENT);
         ugm_fence = tgm_fence = true;
         slm_fence = urb_fence = false;
         opcode = SHADER_OPCODE_INTERLOCK;
         break;

      case nir_intrinsic_end_invocation_interlock:
         /* For endInvocationInterlockARB(), we need to insert a memory fence which
          * stalls in the shader until the memory transactions prior to that
          * fence are complete.  This ensures that the shader does not end before
          * any writes from its critical section have landed.  Otherwise, you can
          * end up with a case where the next invocation on that pixel properly
          * stalls for previous FS invocation on its pixel to complete but
          * doesn't actually wait for the dataport memory transactions from that
          * thread to land before submitting its own.
          */
         assert(s.stage == MESA_SHADER_FRAGMENT);
         ugm_fence = tgm_fence = true;
         slm_fence = urb_fence = false;
         opcode = SHADER_OPCODE_MEMORY_FENCE;
         break;

      default:
         UNREACHABLE("invalid intrinsic");
      }

      if (opcode == BRW_OPCODE_NOP)
         break;

      /* If the workgroup fits in a single HW thread, the messages for SLM are
       * processed in-order and the shader itself is already synchronized so
       * the memory fence is not necessary.
       *
       * TODO: Check if applies for many HW threads sharing same Data Port.
       */
      if (!s.nir->info.workgroup_size_variable &&
          slm_fence && brw_workgroup_size(s) <= s.dispatch_width)
         slm_fence = false;

      switch (s.stage) {
         case MESA_SHADER_TESS_CTRL:
         case MESA_SHADER_TASK:
         case MESA_SHADER_MESH:
            break;
         default:
            urb_fence = false;
            break;
      }

      if (s.stage == MESA_SHADER_COMPUTE) {
         struct brw_cs_prog_data *cs_prog_data = brw_cs_prog_data(s.prog_data);
         cs_prog_data->uses_fence = true;
      }

      unsigned fence_regs_count = 0;
      brw_reg fence_regs[4] = {};

      const brw_builder ubld1 = bld.uniform();

      /* A memory barrier with acquire semantics requires us to
       * guarantee that memory operations of the specified storage
       * class sequenced-after the barrier aren't reordered before the
       * barrier, nor before any previous atomic operation
       * sequenced-before the barrier which may be synchronizing this
       * acquire barrier with a prior release sequence.
       *
       * In order to guarantee the latter we must make sure that any
       * such previous operation has completed execution before
       * invalidating the relevant caches, since otherwise some cache
       * could be polluted by a concurrent thread after its
       * invalidation but before the previous atomic completes, which
       * could lead to a violation of the expected memory ordering if
       * a subsequent memory read hits the polluted cacheline, which
       * would return a stale value read from memory before the
       * completion of the atomic sequenced-before the barrier.
       *
       * This ordering inversion can be avoided trivially if the
       * operations we need to order are all handled by a single
       * in-order cache, since the flush implied by the memory fence
       * occurs after any pending operations have completed, however
       * that doesn't help us when dealing with multiple caches
       * processing requests out of order, in which case we need to
       * explicitly stall the EU until any pending memory operations
       * have executed.
       *
       * Note that that might be somewhat heavy handed in some cases.
       * In particular when this memory fence was inserted by
       * spirv_to_nir() lowering an atomic with acquire semantics into
       * an atomic+barrier sequence we could do a better job by
       * synchronizing with respect to that one atomic *only*, but
       * that would require additional information not currently
       * available to the backend.
       *
       * XXX - Use an alternative workaround on IVB and ICL, since
       *       SYNC.ALLWR is only available on Gfx12+.
       */
      if (devinfo->ver >= 12 &&
          (!nir_intrinsic_has_memory_scope(instr) ||
           (nir_intrinsic_memory_semantics(instr) & NIR_MEMORY_ACQUIRE))) {
         ubld1.SYNC(TGL_SYNC_ALLWR);
      }

      if (devinfo->has_lsc) {
         assert(devinfo->verx10 >= 125);
         uint32_t desc =
            lsc_fence_descriptor_for_intrinsic(devinfo, instr, tgm_fence);
         if (ugm_fence) {
            fence_regs[fence_regs_count++] =
               emit_fence(ubld1, opcode, GEN_SFID_UGM, desc,
                          true /* commit_enable */);
         }

         if (tgm_fence) {
            fence_regs[fence_regs_count++] =
               emit_fence(ubld1, opcode, GEN_SFID_TGM, desc,
                          true /* commit_enable */);
         }

         if (slm_fence) {
            assert(opcode == SHADER_OPCODE_MEMORY_FENCE);
            if (intel_needs_workaround(devinfo, 14014063774)) {
               /* Wa_14014063774
                *
                * Before SLM fence compiler needs to insert SYNC.ALLWR in order
                * to avoid the SLM data race.
                */
               ubld1.SYNC(TGL_SYNC_ALLWR);
            }
            fence_regs[fence_regs_count++] =
               emit_fence(ubld1, opcode, GEN_SFID_SLM, desc,
                          true /* commit_enable */);
         }

         if (urb_fence) {
            assert(opcode == SHADER_OPCODE_MEMORY_FENCE);
            fence_regs[fence_regs_count++] =
               emit_fence(ubld1, opcode, GEN_SFID_URB, desc,
                          true /* commit_enable */);
         }
      } else if (devinfo->ver >= 11) {
         if (tgm_fence || ugm_fence || urb_fence) {
            fence_regs[fence_regs_count++] =
               emit_fence(ubld1, opcode, GEN_SFID_HDC0, 0,
                          true /* commit_enable HSD ES # 1404612949 */);
         }

         if (slm_fence) {
            assert(opcode == SHADER_OPCODE_MEMORY_FENCE);
            /* We use the "SLM" SFID here even though it doesn't exist;
             * the logical send lowering will replace it with the SLM
             * special binding table index and the normal DATA_CACHE SFID.
             */
            fence_regs[fence_regs_count++] =
               emit_fence(ubld1, opcode, GEN_SFID_SLM, 0,
                          true /* commit_enable HSD ES # 1404612949 */);
         }
      } else {
         /* Simulation also complains on Gfx9 if we do not enable commit.
          */
         const bool commit_enable =
            instr->intrinsic == nir_intrinsic_end_invocation_interlock ||
            devinfo->ver == 9;

         if (tgm_fence || ugm_fence || slm_fence || urb_fence) {
            fence_regs[fence_regs_count++] =
               emit_fence(ubld1, opcode, GEN_SFID_HDC0, 0, commit_enable);
         }
      }

      assert(fence_regs_count <= ARRAY_SIZE(fence_regs));

      /* Be conservative in Gen11+ and always stall in a fence.  Since
       * there are two different fences, and shader might want to
       * synchronize between them.
       *
       * TODO: Use scope and visibility information for the barriers from NIR
       * to make a better decision on whether we need to stall.
       */
      bool force_stall = devinfo->ver >= 11;

      /* There are four cases where we want to insert a stall:
       *
       *  1. If we're a nir_intrinsic_end_invocation_interlock.  This is
       *     required to ensure that the shader EOT doesn't happen until
       *     after the fence returns.  Otherwise, we might end up with the
       *     next shader invocation for that pixel not respecting our fence
       *     because it may happen on a different HW thread.
       *
       *  2. If we have multiple fences.  This is required to ensure that
       *     they all complete and nothing gets weirdly out-of-order.
       *
       *  3. If we have no fences.  In this case, we need at least a
       *     scheduling barrier to keep the compiler from moving things
       *     around in an invalid way.
       *
       *  4. On Gen11+ and platforms with LSC, we have multiple fence types,
       *     without further information about the fence, we need to force a
       *     stall.
       */
      if (instr->intrinsic == nir_intrinsic_end_invocation_interlock ||
          fence_regs_count != 1 || devinfo->has_lsc || force_stall) {
         ubld1.emit(FS_OPCODE_SCHEDULING_FENCE,
                    retype(brw_null_reg(), BRW_TYPE_UW),
                    fence_regs, fence_regs_count);
      }

      break;
   }

   case nir_intrinsic_shader_clock: {
      /* We cannot do anything if there is an event, so ignore it for now */
      const brw_reg shader_clock = get_timestamp(bld);
      const brw_reg srcs[] = { component(shader_clock, 0),
                              component(shader_clock, 1) };
      bld.LOAD_PAYLOAD(dest, srcs, ARRAY_SIZE(srcs), 0);
      break;
   }

   case nir_intrinsic_load_reloc_const_intel: {
      uint32_t id = nir_intrinsic_param_idx(instr);
      uint32_t base = nir_intrinsic_base(instr);

      /* Emit the reloc in the smallest SIMD size to limit register usage. */
      const brw_builder ubld = dest.is_scalar ? xbld : bld.exec_all().group(1, 0);
      brw_reg small_dest = dest.is_scalar ? dest : ubld.vgrf(dest.type);

      if (!dest.is_scalar)
         ubld.UNDEF(small_dest);

      ubld.emit(SHADER_OPCODE_MOV_RELOC_IMM, retype(small_dest, BRW_TYPE_D),
                brw_imm_ud(id), brw_imm_ud(base));

      /* Copy propagation will get rid of this MOV. */
      if (!dest.is_scalar)
         bld.MOV(dest, component(small_dest, 0));

      break;
   }

   case nir_intrinsic_load_inline_data_intel:
      assert(brw_shader_stage_has_inline_data(ntb.devinfo, ntb.s.stage));
      FALLTHROUGH;
   case nir_intrinsic_load_push_data_intel: {
      /* Offsets are in bytes but they should always aligned to
       * the type size
       */
      unsigned base_offset = nir_intrinsic_base(instr);
      assert(base_offset % 4 == 0 || base_offset % brw_type_size_bytes(dest.type) == 0);

      unsigned nr = base_offset / REG_SIZE;
      nr += instr->intrinsic == nir_intrinsic_load_inline_data_intel ? BRW_INLINE_PARAM_REG : 0;
      brw_reg src = brw_uniform_reg(nr, dest.type);
      src.offset = base_offset % REG_SIZE;

      if (nir_src_is_const(instr->src[0])) {
         unsigned load_offset = nir_src_as_uint(instr->src[0]);
         assert(load_offset % brw_type_size_bytes(dest.type) == 0);
         /* The base offset can only handle 32-bit units, so for 16-bit
          * data take the modulo of the offset with 4 bytes and add it to
          * the offset to read from within the source register.
          */
         src.offset += load_offset;

         for (unsigned j = 0; j < instr->num_components; j++) {
            xbld.MOV(offset(dest, xbld, j), offset(src, xbld, j));
         }
      } else {
         brw_reg indirect = retype(get_nir_src(ntb, instr->src[0], 0),
                                  BRW_TYPE_UD);

         /* We need to pass a size to the MOV_INDIRECT but we don't want it to
          * go past the end of the uniform.  In order to keep the n'th
          * component from running past, we subtract off the size of all but
          * one component of the vector.
          */
         assert(nir_intrinsic_range(instr) >=
                instr->num_components * brw_type_size_bytes(dest.type));
         unsigned read_size = nir_intrinsic_range(instr) -
            (instr->num_components - 1) * brw_type_size_bytes(dest.type);

         bool supports_64bit_indirects = !intel_device_info_is_9lp(devinfo);

         if (brw_type_size_bytes(dest.type) != 8 || supports_64bit_indirects) {
            for (unsigned j = 0; j < instr->num_components; j++) {
               xbld.emit(SHADER_OPCODE_MOV_INDIRECT,
                         offset(dest, xbld, j), offset(src, xbld, j),
                         indirect, brw_imm_ud(read_size));
            }
         } else {
            const unsigned num_mov_indirects =
               brw_type_size_bytes(dest.type) / brw_type_size_bytes(BRW_TYPE_UD);
            /* We read a little bit less per MOV INDIRECT, as they are now
             * 32-bits ones instead of 64-bit. Fix read_size then.
             */
            const unsigned read_size_32bit = read_size -
                (num_mov_indirects - 1) * brw_type_size_bytes(BRW_TYPE_UD);
            for (unsigned j = 0; j < instr->num_components; j++) {
               for (unsigned i = 0; i < num_mov_indirects; i++) {
                  xbld.emit(SHADER_OPCODE_MOV_INDIRECT,
                            subscript(offset(dest, xbld, j), BRW_TYPE_UD, i),
                            subscript(offset(src, xbld, j), BRW_TYPE_UD, i),
                            indirect, brw_imm_ud(read_size_32bit));
               }
            }
         }
      }
      break;
   }

   case nir_intrinsic_load_ubo_uniform_block_intel:
      s.prog_data->has_ubo_pull = true;
      brw_from_nir_emit_memory_access(ntb, bld, xbld, instr);
      break;

   case nir_intrinsic_load_ubo: {
      s.prog_data->has_ubo_pull = true;

      bool no_mask_handle = false;

      brw_reg binding_type = brw_imm_ud(
         get_nir_src_internal(ntb, instr->src[0]) ? LSC_ADDR_SURFTYPE_SS :
         get_nir_src_bindless(ntb, instr->src[0]) ? LSC_ADDR_SURFTYPE_BSS :
         LSC_ADDR_SURFTYPE_BTI);
      brw_reg binding =
         get_nir_buffer_intrinsic_index(ntb, bld, instr, &no_mask_handle);

      const unsigned first_component =
         nir_def_first_component_read(&instr->def);
      const unsigned last_component =
         nir_def_last_component_read(&instr->def);
      const unsigned num_components = last_component - first_component + 1;

      if (!nir_src_is_const(instr->src[1])) {
         /* load_ubo with non-constant offset. The offset might still be
          * uniform on non-LSC platforms when loading fewer than 4 components.
          */
         brw_reg base_offset = retype(get_nir_src(ntb, instr->src[1], 0),
                                      BRW_TYPE_UD);
         if (nir_intrinsic_has_base(instr)) {
            struct brw_reg imm = brw_imm_int(base_offset.type,
                                             nir_intrinsic_base(instr));
            base_offset = bld.ADD(base_offset, imm);
         }

         const unsigned comps_per_load = brw_type_size_bytes(dest.type) == 8 ? 2 : 4;

         for (unsigned i = first_component;
              i <= last_component;
              i += comps_per_load) {
            const unsigned remaining = last_component + 1 - i;
            xbld.VARYING_PULL_CONSTANT_LOAD(offset(dest, xbld, i),
                                            binding_type, binding,
                                            base_offset,
                                            i * brw_type_size_bytes(dest.type),
                                            instr->def.bit_size / 8,
                                            MIN2(remaining, comps_per_load));
         }
      } else {
         /* Even if we are loading doubles, a pull constant load will load
          * a 32-bit vec4, so should only reserve vgrf space for that. If we
          * need to load a full dvec4 we will have to emit 2 loads. This is
          * similar to demote_pull_constants(), except that in that case we
          * see individual accesses to each component of the vector and then
          * we let CSE deal with duplicate loads. Here we see a vector access
          * and we have to split it if necessary.
          */
         const unsigned type_size = brw_type_size_bytes(dest.type);
         const unsigned load_offset =
            nir_src_as_uint(instr->src[1]) + first_component * type_size +
            (nir_intrinsic_has_base(instr) ? nir_intrinsic_base(instr) : 0);
         const unsigned block_sz = 64; /* Fetch one cacheline at a time. */
         const brw_builder ubld = bld.exec_all().group(block_sz / 4, 0);

         for (unsigned c = 0; c < num_components;) {
            const unsigned base = load_offset + c * type_size;
            /* Number of usable components in the next block-aligned load. */
            const unsigned count = MIN2(num_components - c,
                                        (block_sz - base % block_sz) / type_size);

            const brw_reg packed_consts = ubld.vgrf(BRW_TYPE_UD);
            brw_reg srcs[PULL_UNIFORM_CONSTANT_SRCS];
            srcs[PULL_UNIFORM_CONSTANT_SRC_BINDING_TYPE] = brw_imm_ud(
               get_nir_src_internal(ntb, instr->src[0]) ? LSC_ADDR_SURFTYPE_SS :
               get_nir_src_bindless(ntb, instr->src[0]) ? LSC_ADDR_SURFTYPE_BSS :
               LSC_ADDR_SURFTYPE_BTI);
            srcs[PULL_UNIFORM_CONSTANT_SRC_BINDING]      = binding;
            srcs[PULL_UNIFORM_CONSTANT_SRC_OFFSET]       = brw_imm_ud(base & ~(block_sz - 1));
            srcs[PULL_UNIFORM_CONSTANT_SRC_SIZE]         = brw_imm_ud(block_sz);

            ubld.emit(FS_OPCODE_UNIFORM_PULL_CONSTANT_LOAD, packed_consts,
                      srcs, PULL_UNIFORM_CONSTANT_SRCS);

            const brw_reg consts =
               retype(byte_offset(packed_consts, base & (block_sz - 1)),
                      dest.type);

            for (unsigned d = 0; d < count; d++) {
               xbld.MOV(offset(dest, xbld, first_component + c + d),
                        component(consts, d));
            }

            c += count;
         }
      }
      break;
   }

   case nir_intrinsic_load_subgroup_size:
   case nir_intrinsic_load_simd_width_intel:
      /* This should only happen for fragment shaders because every other case
       * is lowered in NIR so we can optimize on it.
       */
      assert(s.stage == MESA_SHADER_FRAGMENT);
      bld.MOV(retype(dest, BRW_TYPE_D), brw_imm_d(s.dispatch_width));
      break;

   case nir_intrinsic_load_subgroup_invocation:
      bld.MOV(retype(dest, BRW_TYPE_UD), bld.LOAD_SUBGROUP_INVOCATION());
      break;

   case nir_intrinsic_load_subgroup_eq_mask:
   case nir_intrinsic_load_subgroup_ge_mask:
   case nir_intrinsic_load_subgroup_gt_mask:
   case nir_intrinsic_load_subgroup_le_mask:
   case nir_intrinsic_load_subgroup_lt_mask:
      UNREACHABLE("not reached");

   case nir_intrinsic_ddx_fine: {
      enum brw_reg_type type = brw_float_type_for_reg_type(dest.type);
      bld.emit(FS_OPCODE_DDX_FINE, retype(dest, type),
               retype(get_nir_src(ntb, instr->src[0], 0), type));
      break;
   }
   case nir_intrinsic_ddx:
   case nir_intrinsic_ddx_coarse: {
      enum brw_reg_type type = brw_float_type_for_reg_type(dest.type);
      bld.emit(FS_OPCODE_DDX_COARSE, retype(dest, type),
               retype(get_nir_src(ntb, instr->src[0], 0), type));
      break;
   }
   case nir_intrinsic_ddy_fine: {
      enum brw_reg_type type = brw_float_type_for_reg_type(dest.type);
      bld.emit(FS_OPCODE_DDY_FINE, retype(dest, type),
               retype(get_nir_src(ntb, instr->src[0], 0), type));
      break;
   }
   case nir_intrinsic_ddy:
   case nir_intrinsic_ddy_coarse: {
      enum brw_reg_type type = brw_float_type_for_reg_type(dest.type);
      bld.emit(FS_OPCODE_DDY_COARSE, retype(dest, type),
               retype(get_nir_src(ntb, instr->src[0], 0), type));
      break;
   }

   case nir_intrinsic_vote_any:
   case nir_intrinsic_vote_all:
   case nir_intrinsic_quad_vote_any:
   case nir_intrinsic_quad_vote_all: {
      const bool any = instr->intrinsic == nir_intrinsic_vote_any ||
                       instr->intrinsic == nir_intrinsic_quad_vote_any;
      const bool quad = instr->intrinsic == nir_intrinsic_quad_vote_any ||
                        instr->intrinsic == nir_intrinsic_quad_vote_all;

      brw_reg cond = get_nir_src(ntb, instr->src[0], 0);
      const unsigned cluster_size = quad ? 4 : s.dispatch_width;

      bld.emit(any ? SHADER_OPCODE_VOTE_ANY : SHADER_OPCODE_VOTE_ALL,
               retype(dest, BRW_TYPE_UD), cond, brw_imm_ud(cluster_size));

      break;
   }

   case nir_intrinsic_vote_feq:
   case nir_intrinsic_vote_ieq: {
      brw_reg value = get_nir_src(ntb, instr->src[0], 0);
      if (instr->intrinsic == nir_intrinsic_vote_feq) {
         const unsigned bit_size = nir_src_bit_size(instr->src[0]);
         value.type = bit_size == 8 ? BRW_TYPE_B :
            brw_type_with_size(BRW_TYPE_F, bit_size);
      }
      bld.emit(SHADER_OPCODE_VOTE_EQUAL, retype(dest, BRW_TYPE_D), value);
      break;
   }

   case nir_intrinsic_ballot: {
      if (instr->def.bit_size > 32) {
         dest.type = BRW_TYPE_UQ;
      } else {
         dest.type = BRW_TYPE_UD;
      }

      brw_reg value = get_nir_src(ntb, instr->src[0], 0);

      /* A ballot will always be at the full dispatch width even if the
       * use of the ballot result is smaller. If the source is_scalar,
       * it may be allocated at less than the full dispatch width (e.g.,
       * allocated at SIMD8 with SIMD32 dispatch). The input may or may
       * not be stride=0. If it is not, the generated ballot
       *
       *    ballot(32) dst, value<1>
       *
       * is invalid because it will read out of bounds from value.
       *
       * To account for this, modify the stride of an is_scalar input to be
       * zero.
       */
      if (value.is_scalar)
         value = component(value, 0);

      /* Note the use of bld here instead of xbld. As mentioned above, the
       * ballot must execute on all SIMD lanes regardless of the amount of
       * data (i.e., scalar or not scalar) generated.
       */
      brw_inst *inst = bld.emit(SHADER_OPCODE_BALLOT, dest, value);

      if (dest.is_scalar)
         inst->size_written = dest.component_size(xbld.dispatch_width());

      break;
   }

   case nir_intrinsic_read_invocation: {
      const brw_reg value = get_nir_src(ntb, instr->src[0], 0);
      const brw_reg invocation = get_nir_src_imm(ntb, instr->src[1]);

      bld.emit(SHADER_OPCODE_READ_FROM_CHANNEL, retype(dest, value.type),
               value, invocation);
      break;
   }

   case nir_intrinsic_read_first_invocation: {
      const brw_reg value = get_nir_src(ntb, instr->src[0], 0);

      bld.emit(SHADER_OPCODE_READ_FROM_LIVE_CHANNEL, retype(dest, value.type), value);
      break;
   }

   case nir_intrinsic_shuffle: {
      const brw_reg value = get_nir_src(ntb, instr->src[0], 0);
      brw_reg index = get_nir_src(ntb, instr->src[1], 0);

      if (devinfo->ver >= 30) {
         /* Mask index to constrain it to be within the valid range in
          * order to avoid potentially reading past the end of the GRF
          * file, which can lead to hangs on Xe3+ with VRT enabled.
          */
         const brw_reg tmp = bld.vgrf(BRW_TYPE_UD);
         bld.AND(tmp, index, brw_imm_ud(s.dispatch_width - 1));
         index = tmp;
      }

      bld.emit(SHADER_OPCODE_SHUFFLE, retype(dest, value.type), value, index);
      break;
   }

   case nir_intrinsic_first_invocation: {
      brw_reg tmp = bld.vgrf(BRW_TYPE_UD);
      bld.exec_all().emit(SHADER_OPCODE_FIND_LIVE_CHANNEL, tmp);
      bld.MOV(retype(dest, BRW_TYPE_UD),
              brw_reg(component(tmp, 0)));
      break;
   }

   case nir_intrinsic_last_invocation: {
      brw_reg tmp = bld.vgrf(BRW_TYPE_UD);
      bld.exec_all().emit(SHADER_OPCODE_FIND_LAST_LIVE_CHANNEL, tmp);
      bld.MOV(retype(dest, BRW_TYPE_UD),
              brw_reg(component(tmp, 0)));
      break;
   }

   case nir_intrinsic_quad_broadcast: {
      const brw_reg value = get_nir_src(ntb, instr->src[0], 0);
      const unsigned index = nir_src_as_uint(instr->src[1]);

      bld.emit(SHADER_OPCODE_CLUSTER_BROADCAST, retype(dest, value.type),
               value, brw_imm_ud(index), brw_imm_ud(4));
      break;
   }

   case nir_intrinsic_quad_swap_horizontal:
   case nir_intrinsic_quad_swap_vertical:
   case nir_intrinsic_quad_swap_diagonal: {
      const brw_reg value = get_nir_src(ntb, instr->src[0], 0);

      enum brw_swap_direction dir;
      switch (instr->intrinsic) {
      case nir_intrinsic_quad_swap_horizontal: dir = BRW_SWAP_HORIZONTAL; break;
      case nir_intrinsic_quad_swap_vertical:   dir = BRW_SWAP_VERTICAL;   break;
      case nir_intrinsic_quad_swap_diagonal:   dir = BRW_SWAP_DIAGONAL;   break;
      default: UNREACHABLE("invalid quad swap");
      }

      bld.emit(SHADER_OPCODE_QUAD_SWAP, retype(dest, value.type),
               value, brw_imm_ud(dir));
      break;
   }

   case nir_intrinsic_reduce: {
      brw_reg src = get_nir_src(ntb, instr->src[0], 0);
      nir_op op = (nir_op)nir_intrinsic_reduction_op(instr);
      enum brw_reduce_op brw_op = brw_reduce_op_for_nir_reduction_op(op);
      unsigned cluster_size = nir_intrinsic_cluster_size(instr);
      if (cluster_size == 0 || cluster_size > s.dispatch_width)
         cluster_size = s.dispatch_width;

      /* Figure out the source type */
      src.type = brw_type_for_nir_type(devinfo,
         (nir_alu_type)(nir_op_infos[op].input_types[0] |
                        nir_src_bit_size(instr->src[0])));

      bld.emit(SHADER_OPCODE_REDUCE, retype(dest, src.type), src,
               brw_imm_ud(brw_op), brw_imm_ud(cluster_size));
      break;
   }

   case nir_intrinsic_inclusive_scan:
   case nir_intrinsic_exclusive_scan: {
      brw_reg src = get_nir_src(ntb, instr->src[0], 0);
      nir_op op = (nir_op)nir_intrinsic_reduction_op(instr);
      enum brw_reduce_op brw_op = brw_reduce_op_for_nir_reduction_op(op);

      /* Figure out the source type */
      src.type = brw_type_for_nir_type(devinfo,
         (nir_alu_type)(nir_op_infos[op].input_types[0] |
                        nir_src_bit_size(instr->src[0])));

      enum opcode opcode = instr->intrinsic == nir_intrinsic_exclusive_scan ?
            SHADER_OPCODE_EXCLUSIVE_SCAN : SHADER_OPCODE_INCLUSIVE_SCAN;

      bld.emit(opcode, retype(dest, src.type), src, brw_imm_ud(brw_op));
      break;
   }

   case nir_intrinsic_load_topology_id_intel:
      bld.MOV(retype(dest, BRW_TYPE_UD), brw_sr0_reg(0));
      break;

   case nir_intrinsic_load_btd_stack_id_intel:
      if (s.stage == MESA_SHADER_COMPUTE) {
         assert(brw_cs_prog_data(s.prog_data)->uses_btd_stack_ids);
      } else {
         assert(brw_shader_stage_is_bindless(s.stage));
      }
      /* Stack IDs are always in R1 regardless of whether we're coming from a
       * bindless shader or a regular compute shader.
       */
      bld.MOV(retype(dest, BRW_TYPE_UD),
              retype(brw_vec8_grf(1 * reg_unit(devinfo), 0), BRW_TYPE_UW));
      break;

   case nir_intrinsic_btd_spawn_intel:
      if (s.stage == MESA_SHADER_COMPUTE) {
         assert(brw_cs_prog_data(s.prog_data)->uses_btd_stack_ids);
      } else {
         assert(brw_shader_stage_is_bindless(s.stage));
      }
      /* Make sure all the pointers to resume shaders have landed where other
       * threads can see them.
       */
      emit_rt_lsc_fence(bld, LSC_FENCE_LOCAL, LSC_FLUSH_TYPE_NONE);

      bld.emit(SHADER_OPCODE_BTD_SPAWN_LOGICAL, bld.null_reg_ud(),
               bld.emit_uniformize(get_nir_src(ntb, instr->src[0], -1)),
               get_nir_src(ntb, instr->src[1], 0));
      break;

   case nir_intrinsic_btd_retire_intel:
      if (s.stage == MESA_SHADER_COMPUTE) {
         assert(brw_cs_prog_data(s.prog_data)->uses_btd_stack_ids);
      } else {
         assert(brw_shader_stage_is_bindless(s.stage));
      }
      /* Make sure all the pointers to resume shaders have landed where other
       * threads can see them.
       */
      emit_rt_lsc_fence(bld, LSC_FENCE_LOCAL, LSC_FLUSH_TYPE_NONE);
      bld.emit(SHADER_OPCODE_BTD_RETIRE_LOGICAL);
      break;

   case nir_intrinsic_trace_ray_intel: {
      const bool synchronous = nir_intrinsic_synchronous(instr);
      assert(brw_shader_stage_is_bindless(s.stage) || synchronous);

      /* Make sure all the previous RT structure writes are visible to the RT
       * fixed function within the DSS, as well as stack pointers to resume
       * shaders.
       */
      emit_rt_lsc_fence(bld, LSC_FENCE_LOCAL, LSC_FLUSH_TYPE_NONE);

      brw_reg srcs[RT_LOGICAL_NUM_SRCS];

      brw_reg globals = get_nir_src(ntb, instr->src[0], -1);
      srcs[RT_LOGICAL_SRC_GLOBALS] = bld.emit_uniformize(globals);
      srcs[RT_LOGICAL_SRC_PAYLOADS] = get_nir_src(ntb, instr->src[1], 0);
      srcs[RT_LOGICAL_SRC_SYNCHRONOUS] = brw_imm_ud(synchronous);

      /* Bspec 57508, 47937: Structure_SIMD16TraceRayMessage:: RayQuery Enable
       *
       *    "When this bit is set in the header, Trace Ray Message behaves like
       *    a Ray Query. This message requires a write-back message indicating
       *    RayQuery for all valid Rays (SIMD lanes) have completed."
       */
      brw_reg dst = synchronous ? bld.vgrf(BRW_TYPE_UD) : bld.null_reg_ud();

      bld.emit(RT_OPCODE_TRACE_RAY_LOGICAL, dst, srcs, RT_LOGICAL_NUM_SRCS);

      /* There is no actual value to use in the destination register of the
       * synchronous trace instruction. All of the communication with the HW
       * unit happens through memory reads/writes. So to ensure that the
       * operation has completed before we go read the results in memory, we
       * need a barrier followed by an invalidate before accessing memory.
       */
      if (synchronous) {
         bld.SYNC(TGL_SYNC_ALLWR);
         emit_rt_lsc_fence(bld, LSC_FENCE_LOCAL, LSC_FLUSH_TYPE_INVALIDATE);
      }
      break;
   }

   default:
#ifndef NDEBUG
      assert(instr->intrinsic < nir_num_intrinsics);
      fprintf(stderr, "intrinsic: %s\n", nir_intrinsic_infos[instr->intrinsic].name);
#endif
      UNREACHABLE("unknown intrinsic");
   }
}

static enum lsc_data_size
lsc_bits_to_data_size(unsigned bit_size)
{
   switch (bit_size / 8) {
   case 1:  return LSC_DATA_SIZE_D8U32;
   case 2:  return LSC_DATA_SIZE_D16U32;
   case 4:  return LSC_DATA_SIZE_D32;
   case 8:  return LSC_DATA_SIZE_D64;
   default:
      UNREACHABLE("Unsupported data size.");
   }
}

/**
 *
 * \param bld  "Normal" builder. This is the full dispatch width of the shader.
 *
 * \param xbld Builder for the intrinsic. If the intrinsic is convergent, this
 *             builder will be scalar_group(). Otherwise it will be the same
 *             as bld.
 *
 * Some places in the function will also use \c ubld. There are two cases of
 * this. Sometimes it is to generate intermediate values as SIMD1. Other
 * places that use \c ubld need a scalar_group() builder to operate on sources
 * to the intrinsic that are is_scalar.
 */
static void
brw_from_nir_emit_memory_access(nir_to_brw_state &ntb,
                          const brw_builder &bld,
                          const brw_builder &xbld,
                          nir_intrinsic_instr *instr)
{
   const intel_device_info *devinfo = ntb.devinfo;
   brw_shader &s = ntb.s;

   /* nir_lower_mem_access_bit_sizes should be eliminating non-trivial
    * writemasks for us, and we fully ignore them here.  Assert that if
    * they're present, the masks are trivial (all components written).
    */
   assert(!nir_intrinsic_has_write_mask(instr) ||
          nir_intrinsic_write_mask(instr) ==
          nir_component_mask(instr->num_components));

   brw_reg srcs[MEMORY_LOGICAL_NUM_SRCS];

   /* Start with some default values for most cases */

   enum lsc_opcode op = lsc_op_for_nir_intrinsic(instr);
   const bool is_store = !nir_intrinsic_infos[instr->intrinsic].has_dest;
   const bool is_atomic = lsc_opcode_is_atomic(op);
   const bool is_load = !is_store && !is_atomic;
   const bool include_helpers = nir_intrinsic_has_access(instr) &&
      (nir_intrinsic_access(instr) & ACCESS_INCLUDE_HELPERS);
   const bool volatile_access = nir_intrinsic_has_access(instr) &&
      (nir_intrinsic_access(instr) & ACCESS_VOLATILE);
   const bool coherent_access = nir_intrinsic_has_access(instr) &&
      (nir_intrinsic_access(instr) & ACCESS_COHERENT);
   const bool fused_eu_disable = nir_intrinsic_has_access(instr) &&
      (nir_intrinsic_access(instr) & ACCESS_FUSED_EU_DISABLE_INTEL);
   const bool can_reorder = nir_intrinsic_can_reorder(instr);
   const unsigned alignment =
      nir_intrinsic_has_align(instr) ? nir_intrinsic_align(instr) : 0;
   uint8_t flags =
      (include_helpers ? MEMORY_FLAG_INCLUDE_HELPERS : 0) |
      (volatile_access ? MEMORY_FLAG_VOLATILE_ACCESS : 0) |
      (coherent_access ? MEMORY_FLAG_COHERENT_ACCESS : 0) |
      (fused_eu_disable ? MEMORY_FLAG_FUSED_EU_DISABLE : 0) |
      (can_reorder ? MEMORY_FLAG_CAN_REORDER : 0);
   bool no_mask_handle = false;

   uint8_t coord_components = 1;

   int32_t address_offset = 0;

   std::optional<memory_logical_mode> mode;
   std::optional<lsc_addr_surface_type> binding_type;

   switch (instr->intrinsic) {
   case nir_intrinsic_bindless_image_load:
   case nir_intrinsic_bindless_image_store:
   case nir_intrinsic_bindless_image_atomic:
   case nir_intrinsic_bindless_image_atomic_swap:
      binding_type = LSC_ADDR_SURFTYPE_BSS;
      FALLTHROUGH;
   case nir_intrinsic_image_load:
   case nir_intrinsic_image_store:
   case nir_intrinsic_image_atomic:
   case nir_intrinsic_image_atomic_swap:
      /* Bspec 73734 (r50040):
       *
       * Instruction_StoreCmaskMSRT::Src0 Length:
       *
       *    "num_coordinates is the number of address coordinates used in
       *    message. For TGM it will be 4 (U, V, R, SAMPLE_INDEX)."
       *
       */
      coord_components =
         (devinfo->ver >= 30 &&
          nir_intrinsic_image_dim(instr) == GLSL_SAMPLER_DIM_MS) ? 4 :
         nir_image_intrinsic_coord_components(instr);

      /* MSAA image atomic accesses not supported, must be lowered to UGM */
      assert((instr->intrinsic != nir_intrinsic_bindless_image_atomic &&
             instr->intrinsic != nir_intrinsic_bindless_image_atomic_swap) ||
             nir_intrinsic_image_dim(instr) != GLSL_SAMPLER_DIM_MS);

      mode = MEMORY_MODE_TYPED;
      srcs[MEMORY_LOGICAL_BINDING] =
         get_nir_image_intrinsic_image(ntb, bld, instr);

      if (!binding_type.has_value())
         binding_type = LSC_ADDR_SURFTYPE_BTI;

      srcs[MEMORY_LOGICAL_ADDRESS] = get_nir_src(ntb, instr->src[1], 0);
      break;

   case nir_intrinsic_load_ubo_uniform_block_intel:
      mode = MEMORY_MODE_CONSTANT;
      FALLTHROUGH;
   case nir_intrinsic_load_ssbo:
   case nir_intrinsic_load_ssbo_intel:
   case nir_intrinsic_store_ssbo:
   case nir_intrinsic_store_ssbo_intel:
   case nir_intrinsic_ssbo_atomic:
   case nir_intrinsic_ssbo_atomic_swap:
   case nir_intrinsic_load_ssbo_block_intel:
   case nir_intrinsic_store_ssbo_block_intel:
   case nir_intrinsic_load_ssbo_uniform_block_intel:
      if (!mode.has_value())
         mode = MEMORY_MODE_UNTYPED;
      binding_type =
         get_nir_src_internal(ntb, instr->src[is_store ? 1 : 0]) ? LSC_ADDR_SURFTYPE_SS :
         get_nir_src_bindless(ntb, instr->src[is_store ? 1 : 0]) ? LSC_ADDR_SURFTYPE_BSS :
         LSC_ADDR_SURFTYPE_BTI;
      srcs[MEMORY_LOGICAL_BINDING] =
         get_nir_buffer_intrinsic_index(ntb, bld, instr, &no_mask_handle);
      srcs[MEMORY_LOGICAL_ADDRESS] =
         memory_address(ntb, bld, instr, *binding_type, &address_offset);
      break;
   case nir_intrinsic_load_shared:
   case nir_intrinsic_store_shared:
   case nir_intrinsic_shared_atomic:
   case nir_intrinsic_shared_atomic_swap:
   case nir_intrinsic_load_shared_block_intel:
   case nir_intrinsic_store_shared_block_intel:
   case nir_intrinsic_load_shared_uniform_block_intel: {
      mode = MEMORY_MODE_SHARED_LOCAL;
      binding_type = LSC_ADDR_SURFTYPE_FLAT;
      srcs[MEMORY_LOGICAL_ADDRESS] =
         memory_address(ntb, bld, instr, *binding_type, &address_offset);
      no_mask_handle = true;
      break;
   }
   case nir_intrinsic_load_scratch_intel:
   case nir_intrinsic_store_scratch_intel: {
      mode = MEMORY_MODE_SCRATCH;

      const nir_src &addr = instr->src[is_store ? 1 : 0];

      if (devinfo->verx10 >= 125) {
         binding_type = LSC_ADDR_SURFTYPE_SS;

         const brw_builder ubld = bld.exec_all().group(8 * reg_unit(devinfo), 0);
         brw_reg bind = ubld.AND(retype(brw_vec1_grf(0, 5), BRW_TYPE_UD),
                                 brw_imm_ud(INTEL_MASK(31, 10)));
         if (devinfo->ver >= 20 || intel_has_extended_bindless(devinfo))
            bind = ubld.SHR(bind, brw_imm_ud(4));

         srcs[MEMORY_LOGICAL_BINDING] = component(bind, 0);
      } else {
         binding_type = LSC_ADDR_SURFTYPE_FLAT;
      }

      /* load_scratch / store_scratch cannot be is_scalar yet. */
      assert(xbld.dispatch_width() == bld.dispatch_width());

      srcs[MEMORY_LOGICAL_ADDRESS] =
         retype(get_nir_src(ntb, addr, 0), BRW_TYPE_UD);

      if (is_store)
         ++s.shader_stats.spill_count;
      else
         ++s.shader_stats.fill_count;
      break;
   }

   case nir_intrinsic_load_shader_indirect_data_intel: {
      mode = MEMORY_MODE_CONSTANT;
      binding_type = LSC_ADDR_SURFTYPE_FLAT;
      srcs[MEMORY_LOGICAL_ADDRESS] =
         memory_address(ntb, bld, instr, *binding_type, &address_offset);
      no_mask_handle = srcs[MEMORY_LOGICAL_ADDRESS].is_scalar;
      break;
   }
   case nir_intrinsic_load_global_constant_uniform_block_intel:
   case nir_intrinsic_load_global:
   case nir_intrinsic_load_global_constant:
   case nir_intrinsic_store_global:
   case nir_intrinsic_global_atomic:
   case nir_intrinsic_global_atomic_swap:
   case nir_intrinsic_load_global_intel:
   case nir_intrinsic_store_global_intel:
   case nir_intrinsic_load_global_block_intel:
   case nir_intrinsic_store_global_block_intel:
      mode = MEMORY_MODE_UNTYPED;
      binding_type = LSC_ADDR_SURFTYPE_FLAT;
      srcs[MEMORY_LOGICAL_ADDRESS] =
         memory_address(ntb, bld, instr, *binding_type, &address_offset);
      no_mask_handle = srcs[MEMORY_LOGICAL_ADDRESS].is_scalar;
      break;

   default:
      UNREACHABLE("unknown memory intrinsic");
   }

   int data_src = nir_get_io_data_src_number(instr);
   unsigned components;
   if (is_store) {
      assert(data_src >= 0);
      components = instr->src[data_src].ssa->num_components;
   } else {
      components = instr->def.num_components;
   }

   if (components == 0)
      components = instr->num_components;

   const unsigned nir_bit_size =
      is_store ? instr->src[data_src].ssa->bit_size : instr->def.bit_size;
   const enum lsc_data_size data_size = lsc_bits_to_data_size(nir_bit_size);
   uint32_t data_bit_size = lsc_data_size_bytes(data_size) * 8;

   const brw_reg_type data_type =
      brw_type_with_size(BRW_TYPE_UD, data_bit_size);
   const brw_reg_type nir_data_type =
      brw_type_with_size(BRW_TYPE_UD, nir_bit_size);
   assert(data_bit_size >= nir_bit_size);

   if (!is_load) {
      for (unsigned i = 0; i < lsc_op_num_data_values(op); i++) {
         brw_reg nir_src =
            retype(get_nir_src(ntb, instr->src[data_src + i], -1), nir_data_type);

         if (data_bit_size > nir_bit_size) {
            /* Expand e.g. D16 to D16U32 */
            srcs[MEMORY_LOGICAL_DATA0 + i] = xbld.vgrf(data_type, components);
            for (unsigned c = 0; c < components; c++) {
               xbld.MOV(offset(srcs[MEMORY_LOGICAL_DATA0 + i], xbld, c),
                        offset(nir_src, xbld, c));
            }
         } else {
            srcs[MEMORY_LOGICAL_DATA0 + i] = nir_src;
         }
      }
   }

   brw_reg dest, nir_dest;
   if (!is_store) {
      nir_dest = retype(get_nir_def(ntb, instr->def), nir_data_type);
      dest = data_bit_size > nir_bit_size ? xbld.vgrf(data_type, components)
                                          : nir_dest;
   }

   enum opcode opcode = is_load ? SHADER_OPCODE_MEMORY_LOAD_LOGICAL :
                        is_store ? SHADER_OPCODE_MEMORY_STORE_LOGICAL :
                        SHADER_OPCODE_MEMORY_ATOMIC_LOGICAL;

   const bool convergent_block_load =
      instr->intrinsic == nir_intrinsic_load_ubo_uniform_block_intel ||
      instr->intrinsic == nir_intrinsic_load_ssbo_uniform_block_intel ||
      instr->intrinsic == nir_intrinsic_load_shared_uniform_block_intel ||
      instr->intrinsic == nir_intrinsic_load_global_constant_uniform_block_intel ||
      (instr->intrinsic == nir_intrinsic_load_shader_indirect_data_intel &&
       srcs[MEMORY_LOGICAL_ADDRESS].is_scalar);
   const bool block = convergent_block_load ||
      instr->intrinsic == nir_intrinsic_load_global_block_intel ||
      instr->intrinsic == nir_intrinsic_load_shared_block_intel ||
      instr->intrinsic == nir_intrinsic_load_ssbo_block_intel ||
      instr->intrinsic == nir_intrinsic_store_global_block_intel ||
      instr->intrinsic == nir_intrinsic_store_shared_block_intel ||
      instr->intrinsic == nir_intrinsic_store_ssbo_block_intel;

   brw_mem_inst *mem;

   if (!block) {
      mem = xbld.emit(opcode, dest, srcs, MEMORY_LOGICAL_NUM_SRCS)->as_mem();
      mem->size_written *= components;
      mem->lsc_op = op;
      mem->mode = *mode;
      mem->binding_type = *binding_type;
      mem->address_offset = address_offset;
      mem->coord_components = coord_components;
      mem->data_size = data_size;
      mem->components = components;
      mem->alignment = alignment;
      mem->flags = flags;

      if (dest.file != BAD_FILE && data_bit_size > nir_bit_size) {
         /* Shrink e.g. D16U32 result back to D16 */
         for (unsigned i = 0; i < components; i++) {
            xbld.MOV(offset(nir_dest, xbld, i),
                     subscript(offset(dest, xbld, i), nir_dest.type, 0));
         }
      }
   } else {
      assert(nir_bit_size == 32);

      flags |= MEMORY_FLAG_TRANSPOSE;
      srcs[MEMORY_LOGICAL_ADDRESS] =
         bld.emit_uniformize(srcs[MEMORY_LOGICAL_ADDRESS]);

      const brw_builder ubld = bld.uniform();
      unsigned total;
      unsigned first_read_component = 0;

      if (convergent_block_load) {
         /* If the address is a constant and alignment permits, skip as many
          * unread leading and trailing components as we can without splitting
          * the load into more smaller blocks.  (It's probably not worth the
          * extra address math for non-constant addresses.)
          *
          * Note that SLM block loads on HDC platforms need to be 16B aligned.
          */
         if (srcs[MEMORY_LOGICAL_ADDRESS].file == IMM &&
             alignment >= nir_bit_size / 8) {
            first_read_component = nir_def_first_component_read(&instr->def);
            unsigned last_component = nir_def_last_component_read(&instr->def) + 1;
            if (!devinfo->has_lsc && mode == MEMORY_MODE_SHARED_LOCAL) {
               first_read_component = ROUND_DOWN_TO(first_read_component, 4);
               last_component = align(last_component, 4);
            }
            total = last_component - first_read_component;
            total = brw_uniform_block_size(devinfo, total);
            first_read_component =
               total >= last_component ? 0 : last_component - total;
            components = MIN2(components, last_component) - first_read_component;
            srcs[MEMORY_LOGICAL_ADDRESS].u64 +=
               first_read_component * (nir_bit_size / 8);
         } else {
            total = brw_uniform_block_size(devinfo, components);
         }

         dest = ubld.vgrf(BRW_TYPE_UD, total);
      } else {
         total = components * bld.dispatch_width();
         dest = nir_dest;
      }

      brw_reg src = srcs[MEMORY_LOGICAL_DATA0];

      unsigned done = 0;
      while (done < total) {
         unsigned block_comps = choose_block_size_dwords(devinfo, total - done);
         const unsigned block_bytes = block_comps * (nir_bit_size / 8);

         /* Our current choice of block sizes and 32-bit data type will
          * always give us a GRF-aligned offset into dest
          */
         assert(done % (REG_SIZE / 4 * reg_unit(devinfo)) == 0);

         brw_reg dst_offset = is_store ? brw_reg() :
            retype(byte_offset(dest, done * 4), BRW_TYPE_UD);
         if (is_store) {
            srcs[MEMORY_LOGICAL_DATA0] =
               retype(byte_offset(src, done * 4), BRW_TYPE_UD);
         }

         mem = ubld.emit(opcode, dst_offset, srcs, MEMORY_LOGICAL_NUM_SRCS)->as_mem();
         mem->has_no_mask_send_params = no_mask_handle;
         if (is_load)
            mem->size_written = align(block_bytes, REG_SIZE * reg_unit(devinfo));
         mem->lsc_op = op;
         mem->mode = *mode;
         mem->binding_type = *binding_type;
         mem->address_offset = address_offset;
         mem->coord_components = coord_components;
         mem->data_size = data_size;
         mem->components = block_comps;
         mem->alignment = alignment;
         mem->flags = flags;

         done += block_comps;

         if (done < total) {
            if (brw_type_size_bits(srcs[MEMORY_LOGICAL_ADDRESS].type) == 64) {
               srcs[MEMORY_LOGICAL_ADDRESS] =
                  increment_a64_address(ubld, srcs[MEMORY_LOGICAL_ADDRESS],
                                        block_bytes, no_mask_handle);
            } else {
               srcs[MEMORY_LOGICAL_ADDRESS] =
                  ubld.ADD(retype(srcs[MEMORY_LOGICAL_ADDRESS], BRW_TYPE_UD),
                           brw_imm_ud(block_bytes));
            }
         }
      }
      assert(done == total);

      if (convergent_block_load) {
         for (unsigned c = 0; c < components; c++) {
            xbld.MOV(retype(offset(nir_dest, xbld, first_read_component + c),
                            BRW_TYPE_UD),
                     component(dest, c));
         }
      }
   }
}

static void
brw_from_nir_emit_texture(nir_to_brw_state &ntb,
                    nir_tex_instr *instr)
{
   /* SKL PRMs: Volume 7: 3D-Media-GPGPU:
    *
    *    "The Pixel Null Mask field, when enabled via the Pixel Null Mask
    *     Enable will be incorect for sample_c when applied to a surface with
    *     64-bit per texel format such as R16G16BA16_UNORM. Pixel Null mask
    *     Enable may incorrectly report pixels as referencing a Null surface."
    *
    * We'll take care of this in NIR.
    */
   assert(!instr->is_sparse ||
          nir_tex_instr_src_index(instr, nir_tex_src_comparator) == -1);

   const intel_device_info *devinfo = ntb.devinfo;
   const brw_builder &bld = ntb.bld;

   brw_reg srcs[TEX_LOGICAL_NUM_SRCS];

   const enum brw_sampler_opcode sampler_opcode =
      (enum brw_sampler_opcode)(instr->backend_flags &
                                ~BRW_TEX_INSTR_FUSED_EU_DISABLE);
   const struct brw_sampler_payload_desc *payload_desc =
      brw_get_sampler_payload_desc(sampler_opcode);

   /* First deal with surface & sampler */
   bool surface_bindless = false;
   bool sampler_bindless = false;
   int src_idx;
   {
      if ((src_idx = nir_tex_instr_src_index(instr, nir_tex_src_texture_handle)) >= 0) {
         srcs[TEX_LOGICAL_SRC_SURFACE] = bld.emit_uniformize(
            get_nir_src(ntb, instr->src[src_idx].src, -1));
         surface_bindless = true;
      } else if ((src_idx = nir_tex_instr_src_index(instr, nir_tex_src_texture_offset)) >= 0) {
         srcs[TEX_LOGICAL_SRC_SURFACE] = bld.emit_uniformize(
            bld.ADD(get_nir_src(ntb, instr->src[src_idx].src, -1),
                    brw_imm_ud(instr->texture_index)));
      } else {
         srcs[TEX_LOGICAL_SRC_SURFACE] = brw_imm_ud(instr->texture_index);
      }

      if ((src_idx = nir_tex_instr_src_index(instr, nir_tex_src_sampler_handle)) >= 0) {
         srcs[TEX_LOGICAL_SRC_SAMPLER] = bld.emit_uniformize(
            get_nir_src(ntb, instr->src[src_idx].src, -1));
         sampler_bindless = true;
      } else if ((src_idx = nir_tex_instr_src_index(instr, nir_tex_src_sampler_offset)) >= 0) {
         srcs[TEX_LOGICAL_SRC_SAMPLER] = bld.emit_uniformize(
            bld.ADD(get_nir_src(ntb, instr->src[src_idx].src, -1),
                    brw_imm_ud(instr->sampler_index)));
      } else {
         srcs[TEX_LOGICAL_SRC_SAMPLER] = brw_imm_ud(instr->sampler_index);
      }
   }

   /* Now the sampler payload */
   bool has_offset_in_payload = false;
   uint32_t n_sources = TEX_LOGICAL_SRC_PAYLOAD0;
   uint16_t required_params = 0;
   for (uint32_t i = 0; payload_desc->sources[i].param != BRW_SAMPLER_PAYLOAD_PARAM_INVALID; i++) {
      nir_tex_src_type nir_source;
      unsigned nir_comp;

#define P(name) BRW_SAMPLER_PAYLOAD_PARAM_##name
#define S(name, component) do { \
         nir_source = nir_tex_src_##name; \
         nir_comp = component; \
      } while (0)

      struct brw_sampler_payload_src sampler_src =
         payload_desc->sources[i];

      switch (sampler_src.param) {
      case P(U):    S(coord, 0); break;
      case P(V):    S(coord, 1); break;
      case P(R):    S(coord, 2); break;
      case P(AI):   S(coord, 3); break;
      case P(BIAS): S(bias, 0); break;
      case P(LOD):  S(lod, 0); break;
      case P(MLOD): S(min_lod, 0); break;
      case P(REF):  S(comparator, 0); break;
      case P(DUDX): S(ddx, 0); break;
      case P(DUDY): S(ddy, 0); break;
      case P(DVDX): S(ddx, 1); break;
      case P(DVDY): S(ddy, 1); break;
      case P(DRDX): S(ddx, 2); break;
      case P(DRDY): S(ddy, 2); break;
      case P(SI):   S(ms_index, 0); break;
      case P(MCSL): S(ms_mcs_intel, 0); break;
      case P(MCSH): S(ms_mcs_intel, 1); break;
      case P(MCS0): S(ms_mcs_intel, 0); break;
      case P(MCS1): S(ms_mcs_intel, 1); break;
      case P(MCS2): S(ms_mcs_intel, 2); break;
      case P(MCS3): S(ms_mcs_intel, 3); break;

      case P(OFFU):
         S(offset, 0);
         has_offset_in_payload = true;
         break;
      case P(OFFV):
         S(offset, 1);
         has_offset_in_payload = true;
         break;
      case P(OFFUV4):
      case P(OFFUVR4):
      case P(OFFUV6):
      case P(OFFUVR6):
      case P(BIAS_OFFUV6):
      case P(BIAS_OFFUVR4):
      case P(LOD_OFFUV6):
      case P(LOD_OFFUVR4):
      case P(OFFUV4_R):
      case P(OFFUV6_R):
      case P(OFFUVR4_R):
         /* There is no payload with 2 packed entries, so backend1 is always
          * the one payload parameter packed. */
         S(backend1, 0);
         has_offset_in_payload = true;
         break;

      case P(BIAS_AI):
      case P(LOD_AI):
      case P(MLOD_R):
         /* There is no payload with 2 packed entries, so backend1 is always
          * the one payload parameter packed. */
         S(backend1, 0);
         break;

      default: UNREACHABLE("unhandled sampler param");
      }

#undef P
#undef S

      /* TODO: make sure sources have consistent bit sizes */
      brw_reg param_val = brw_imm_ud(0);

      src_idx = nir_tex_instr_src_index(instr, nir_source);
      if (src_idx >= 0 &&
          nir_comp < instr->src[src_idx].src.ssa->num_components) {
         param_val =
            get_nir_src(ntb, instr->src[src_idx].src, nir_comp);
      }

      /* The hardware requires a LOD for buffer textures */
      if (instr->sampler_dim == GLSL_SAMPLER_DIM_BUF &&
          sampler_src.param == BRW_SAMPLER_PAYLOAD_PARAM_LOD) {
         sampler_src.optional = false;
      }

      /* Wa_14012688258:
       *
       * Don't trim zeros at the end of payload for sample operations
       * in cube and cube arrays.
       *
       * Compiler should send U,V,R parameters even if V,R are 0.
       */
      if (instr->sampler_dim == GLSL_SAMPLER_DIM_CUBE &&
          intel_needs_workaround(devinfo, 14012688258) &&
          (sampler_src.param == BRW_SAMPLER_PAYLOAD_PARAM_U ||
           sampler_src.param == BRW_SAMPLER_PAYLOAD_PARAM_V ||
           sampler_src.param == BRW_SAMPLER_PAYLOAD_PARAM_R)) {
         sampler_src.optional = false;
      }

      srcs[TEX_LOGICAL_SRC_PAYLOAD0 + i] = param_val;

      /* The last source present in the payload dictates the number of
       * sources, unless it's required.
       *
       * We can skip the last source if it's zero.
       */
      if (!sampler_src.optional ||
          !(param_val.file == IMM && param_val.ud == 0))
         n_sources = TEX_LOGICAL_SRC_PAYLOAD0 + i + 1;

      if (!sampler_src.optional)
         required_params |= BITFIELD_BIT(i);
   }

   int packed_offset_idx = nir_tex_instr_src_index(instr, nir_tex_src_backend2);
   if (packed_offset_idx >= 0) {
      srcs[TEX_LOGICAL_SRC_PACKED_OFFSETS] = bld.emit_uniformize(
         get_nir_src(ntb, instr->src[packed_offset_idx].src, 0));
   }

   brw_reg nir_def_reg = get_nir_def(ntb, instr->def);

   const unsigned dest_size = nir_tex_instr_dest_size(instr);
   unsigned dest_comp;
   if (instr->op != nir_texop_tg4) {
      unsigned write_mask = nir_def_components_read(&instr->def);
      assert(write_mask != 0); /* dead code should have been eliminated */

      dest_comp = util_last_bit(write_mask) - instr->is_sparse;
   } else {
      dest_comp = 4;
   }

   /* Compute the number of physical registers needed to hold a single
    * component and round it up to a physical register count.
    */
   brw_reg_type dst_type = brw_type_for_nir_type(devinfo, instr->dest_type);
   const unsigned grf_size = reg_unit(devinfo) * REG_SIZE;
   const unsigned per_component_regs =
      DIV_ROUND_UP(brw_type_size_bytes(dst_type) * bld.dispatch_width(),
                   grf_size);
   const unsigned total_regs =
      dest_comp * per_component_regs + instr->is_sparse;
   /* Allocate enough space for the components + one physical register for the
    * residency data.
    */
   brw_reg dst = retype(
      brw_allocate_vgrf_units(*bld.shader, total_regs * reg_unit(devinfo)),
      dst_type);

   brw_tex_inst *tex = bld.emit(SHADER_OPCODE_SAMPLER, dst, srcs, n_sources)->as_tex();
   tex->sampler_opcode = (enum brw_sampler_opcode) instr->backend_flags;
   tex->surface_bindless = surface_bindless;
   tex->sampler_bindless = sampler_bindless;
   tex->size_written = total_regs * grf_size;
   tex->residency = instr->is_sparse;
   tex->required_params = required_params;
   tex->coord_components = instr->coord_components;
   tex->fused_eu_disable = (instr->backend_flags & BRW_TEX_INSTR_FUSED_EU_DISABLE) != 0;
   tex->gather_component = instr->component;

   /* If the NIR instruction has an offset param but the sampler payload
    * doesn't, we can put the offset into the header of the message.
    *
    * The restriction though is that it should be a constant value.
    */
   if ((src_idx = nir_tex_instr_src_index(instr, nir_tex_src_offset)) != -1 &&
       !has_offset_in_payload) {
      assert(nir_src_is_const(instr->src[src_idx].src));

      const unsigned num_components = nir_tex_instr_src_size(instr, src_idx);
      for (unsigned i = 0; i < num_components; i++) {
         int offset = nir_src_comp_as_int(instr->src[src_idx].src, i);
         tex->const_offsets[i] = offset;
      }
      tex->has_const_offsets = true;
   }

   /* With half-floats returns, the stride into a GRF allocation for each
    * component might be different than where the sampler is storing each
    * component. For example in SIMD8 on DG2 the layout of the data returned
    * by the sampler is as follow for 2 components load:
    *
    *           _______________________________________________________________
    *   g0 : |           unused              |hf7|hf6|hf5|hf4|hf3|hf2|hf1|hf0|
    *   g1 : |           unused              |hf7|hf6|hf5|hf4|hf3|hf2|hf1|hf0|
    *
    * The same issue also happens in SIMD16 on Xe2 because the physical
    * register size has doubled but we're still loading data only on half the
    * register.
    *
    * In those cases we need the special remapping case below.
    */
   const bool non_aligned_component_stride =
      (brw_type_size_bytes(dst_type) * bld.dispatch_width()) % grf_size != 0;
   if (!instr->is_sparse && !non_aligned_component_stride) {
      /* In most cases we can write directly to the result. */
      tex->dst = nir_def_reg;
   } else {
      /* In other cases, we have to reorganize the sampler message's results
       * a bit to match the NIR intrinsic's expectations.
       */
      brw_reg nir_dest[5];
      for (unsigned i = 0; i < dest_comp; i++)
         nir_dest[i] = byte_offset(dst, i * per_component_regs * grf_size);

      for (unsigned i = dest_comp; i < dest_size; i++)
         nir_dest[i].type = dst.type;

      /* The residency bits are only in the first component. */
      if (instr->is_sparse) {
         nir_dest[dest_size - 1] =
            component(offset(dst, bld, dest_comp), 0);
      }

      bld.LOAD_PAYLOAD(nir_def_reg, nir_dest, dest_size, 0);
   }
}

static void
brw_from_nir_emit_instr(nir_to_brw_state &ntb, nir_instr *instr)
{
#ifndef NDEBUG
   if (unlikely(ntb.annotate)) {
      /* Use shader mem_ctx since annotations outlive the NIR conversion. */
      ntb.bld = ntb.bld.annotate(nir_instr_as_str(instr, ntb.s.mem_ctx));
   }
#endif

   switch (instr->type) {
   case nir_instr_type_alu:
      brw_from_nir_emit_alu(ntb, nir_instr_as_alu(instr), true);
      break;

   case nir_instr_type_deref:
      UNREACHABLE("All derefs should've been lowered");
      break;

   case nir_instr_type_intrinsic:
      switch (ntb.s.stage) {
      case MESA_SHADER_VERTEX:
         brw_from_nir_emit_vs_intrinsic(ntb, nir_instr_as_intrinsic(instr));
         break;
      case MESA_SHADER_TESS_CTRL:
         brw_from_nir_emit_tcs_intrinsic(ntb, nir_instr_as_intrinsic(instr));
         break;
      case MESA_SHADER_TESS_EVAL:
         brw_from_nir_emit_tes_intrinsic(ntb, nir_instr_as_intrinsic(instr));
         break;
      case MESA_SHADER_GEOMETRY:
         brw_from_nir_emit_gs_intrinsic(ntb, nir_instr_as_intrinsic(instr));
         break;
      case MESA_SHADER_FRAGMENT:
         brw_from_nir_emit_fs_intrinsic(ntb, nir_instr_as_intrinsic(instr));
         break;
      case MESA_SHADER_COMPUTE:
      case MESA_SHADER_KERNEL:
         brw_from_nir_emit_cs_intrinsic(ntb, nir_instr_as_intrinsic(instr));
         break;
      case MESA_SHADER_RAYGEN:
      case MESA_SHADER_ANY_HIT:
      case MESA_SHADER_CLOSEST_HIT:
      case MESA_SHADER_MISS:
      case MESA_SHADER_INTERSECTION:
      case MESA_SHADER_CALLABLE:
         brw_from_nir_emit_bs_intrinsic(ntb, nir_instr_as_intrinsic(instr));
         break;
      case MESA_SHADER_TASK:
      case MESA_SHADER_MESH:
         brw_from_nir_emit_task_mesh_intrinsic(ntb,
                                               nir_instr_as_intrinsic(instr));
         break;
      default:
         UNREACHABLE("unsupported shader stage");
      }
      break;

   case nir_instr_type_tex:
      brw_from_nir_emit_texture(ntb, nir_instr_as_tex(instr));
      break;

   case nir_instr_type_load_const:
      brw_from_nir_emit_load_const(ntb, nir_instr_as_load_const(instr));
      break;

   case nir_instr_type_undef:
      /* We create a new VGRF for undefs on every use (by handling
       * them in get_nir_src()), rather than for each definition.
       * This helps register coalescing eliminate MOVs from undef.
       */
      break;

   case nir_instr_type_jump:
      brw_from_nir_emit_jump(ntb, nir_instr_as_jump(instr));
      break;

   default:
      UNREACHABLE("unknown instruction type");
   }
}

static unsigned
brw_rnd_mode_from_nir(unsigned mode, unsigned *mask)
{
   unsigned brw_mode = 0;
   *mask = 0;

   if ((FLOAT_CONTROLS_ROUNDING_MODE_RTZ_FP16 |
        FLOAT_CONTROLS_ROUNDING_MODE_RTZ_FP32 |
        FLOAT_CONTROLS_ROUNDING_MODE_RTZ_FP64) &
       mode) {
      brw_mode |= BRW_RND_MODE_RTZ << BRW_CR0_RND_MODE_SHIFT;
      *mask |= BRW_CR0_RND_MODE_MASK;
   }
   if ((FLOAT_CONTROLS_ROUNDING_MODE_RTE_FP16 |
        FLOAT_CONTROLS_ROUNDING_MODE_RTE_FP32 |
        FLOAT_CONTROLS_ROUNDING_MODE_RTE_FP64) &
       mode) {
      brw_mode |= BRW_RND_MODE_RTNE << BRW_CR0_RND_MODE_SHIFT;
      *mask |= BRW_CR0_RND_MODE_MASK;
   }
   if (mode & FLOAT_CONTROLS_DENORM_PRESERVE_FP16) {
      brw_mode |= BRW_CR0_FP16_DENORM_PRESERVE;
      *mask |= BRW_CR0_FP16_DENORM_PRESERVE;
   }
   if (mode & FLOAT_CONTROLS_DENORM_PRESERVE_FP32) {
      brw_mode |= BRW_CR0_FP32_DENORM_PRESERVE;
      *mask |= BRW_CR0_FP32_DENORM_PRESERVE;
   }
   if (mode & FLOAT_CONTROLS_DENORM_PRESERVE_FP64) {
      brw_mode |= BRW_CR0_FP64_DENORM_PRESERVE;
      *mask |= BRW_CR0_FP64_DENORM_PRESERVE;
   }
   if (mode & FLOAT_CONTROLS_DENORM_FLUSH_TO_ZERO_FP16)
      *mask |= BRW_CR0_FP16_DENORM_PRESERVE;
   if (mode & FLOAT_CONTROLS_DENORM_FLUSH_TO_ZERO_FP32)
      *mask |= BRW_CR0_FP32_DENORM_PRESERVE;
   if (mode & FLOAT_CONTROLS_DENORM_FLUSH_TO_ZERO_FP64)
      *mask |= BRW_CR0_FP64_DENORM_PRESERVE;
   if (mode == FLOAT_CONTROLS_DEFAULT_FLOAT_CONTROL_MODE)
      *mask |= BRW_CR0_FP_MODE_MASK;

   if (*mask != 0)
      assert((*mask & brw_mode) == brw_mode);

   return brw_mode;
}

static void
emit_shader_float_controls_execution_mode(nir_to_brw_state &ntb)
{
   const brw_builder &bld = ntb.bld;
   brw_shader &s = ntb.s;

   unsigned execution_mode = s.nir->info.float_controls_execution_mode;
   if (execution_mode == FLOAT_CONTROLS_DEFAULT_FLOAT_CONTROL_MODE)
      return;

   brw_builder abld = bld.uniform().annotate("shader floats control execution mode");
   unsigned mask, mode = brw_rnd_mode_from_nir(execution_mode, &mask);

   if (mask == 0)
      return;

   abld.emit(SHADER_OPCODE_FLOAT_CONTROL_MODE, bld.null_reg_ud(),
             brw_imm_d(mode), brw_imm_d(mask));
}

/**
 * Test the dispatch mask packing assumptions of
 * brw_stage_has_packed_dispatch().  Call this from e.g. the top of
 * nir_to_brw() to cause a GPU hang if any shader invocation is
 * executed with an unexpected dispatch mask.
 */
static UNUSED void
brw_test_dispatch_packing(const brw_builder &bld)
{
   const brw_shader *shader = bld.shader;
   const mesa_shader_stage stage = shader->stage;
   const bool uses_vmask =
      stage == MESA_SHADER_FRAGMENT &&
      brw_fs_prog_data(shader->prog_data)->uses_vmask;

   if (brw_stage_has_packed_dispatch(shader->devinfo, stage,
                                     shader->max_polygons,
                                     shader->prog_data)) {
      const brw_builder ubld = bld.uniform();
      const brw_reg tmp = component(bld.vgrf(BRW_TYPE_UD), 0);
      const brw_reg mask = uses_vmask ? brw_vmask_reg() : brw_dmask_reg();

      ubld.ADD(tmp, mask, brw_imm_ud(1));
      ubld.AND(tmp, mask, tmp);

      /* This will loop forever if the dispatch mask doesn't have the expected
       * form '2^n-1', in which case tmp will be non-zero.
       */
      bld.DO();
      bld.CMP(bld.null_reg_ud(), tmp, brw_imm_ud(0), BRW_CONDITIONAL_NZ);
      set_predicate(BRW_PREDICATE_NORMAL, bld.emit(BRW_OPCODE_WHILE));
   }
}

static void
set_clip_cull_distance_masks(brw_shader &s)
{
   const shader_info &info = s.nir->info;

   if (info.stage != MESA_SHADER_VERTEX &&
       info.stage != MESA_SHADER_TESS_EVAL &&
       info.stage != MESA_SHADER_GEOMETRY &&
       info.stage != MESA_SHADER_MESH)
      return;

   if (info.outputs_written &
       (VARYING_BIT_CLIP_DIST0 | VARYING_BIT_CLIP_DIST1 |
        VARYING_BIT_CULL_DIST0 | VARYING_BIT_CULL_DIST1)) {

      uint32_t clip_mask = BITFIELD_MASK(info.clip_distance_array_size);

      uint32_t cull_mask = BITFIELD_RANGE(info.clip_distance_array_size,
                                          info.cull_distance_array_size);

      if (info.stage == MESA_SHADER_MESH) {
         struct brw_mesh_prog_data *prog_data = brw_mesh_prog_data(s.prog_data);
         prog_data->clip_distance_mask = clip_mask;
         prog_data->cull_distance_mask = cull_mask;
      } else {
         struct brw_vue_prog_data *prog_data = brw_vue_prog_data(s.prog_data);
         prog_data->clip_distance_mask = clip_mask;
         prog_data->cull_distance_mask = cull_mask;
      }
   }
}

void
brw_from_nir(brw_shader *s)
{
   nir_to_brw_state ntb = {
      .s       = *s,
      .nir     = s->nir,
      .devinfo = s->devinfo,
      .mem_ctx = ralloc_context(NULL),
      .bld     = brw_builder(s),
   };

   if (INTEL_DEBUG(DEBUG_ANNOTATION))
      ntb.annotate = true;

   if (ENABLE_TEST_DISPATCH_PACKING)
      brw_test_dispatch_packing(ntb.bld);

   set_clip_cull_distance_masks(*s);

   emit_shader_float_controls_execution_mode(ntb);

   /* emit the arrays used for inputs and outputs - load/store intrinsics will
    * be converted to reads/writes of these arrays
    */
   brw_from_nir_emit_system_values(ntb);
   ntb.s.last_scratch = align(ntb.nir->scratch_size, 4) * ntb.s.dispatch_width;

   brw_from_nir_emit_impl(ntb, nir_shader_get_entrypoint((nir_shader *)ntb.nir));

   if (s->stage >= MESA_SHADER_FRAGMENT)
      ntb.bld.emit(SHADER_OPCODE_HALT_TARGET);

   ralloc_free(ntb.mem_ctx);

   brw_shader_phase_update(*s, BRW_SHADER_PHASE_AFTER_NIR);
}
