src/compiler/nir/nir_lower_io_arrays_to_elements.c

   1 /*
   2  * Copyright © 2017 Timothy Arceri
   3  *
   4  * Permission is hereby granted, free of charge, to any person obtaining a
   5  * copy of this software and associated documentation files (the "Software"),
   6  * to deal in the Software without restriction, including without limitation
   7  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
   8  * and/or sell copies of the Software, and to permit persons to whom the
   9  * Software is furnished to do so, subject to the following conditions:
  10  *
  11  * The above copyright notice and this permission notice (including the next
  12  * paragraph) shall be included in all copies or substantial portions of the
  13  * Software.
  14  *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  18  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
  20  * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
  21  * IN THE SOFTWARE.
  22  */
  23
  24 #include "nir.h"
  25 #include "nir_builder.h"
  26 #include "nir_deref.h"
  27
  28 /** @file nir_lower_io_arrays_to_elements.c
  29  *
  30  * Split arrays/matrices with direct indexing into individual elements. This
  31  * will allow optimisation passes to better clean up unused elements.
  32  *
  33  */
  34
  35 static unsigned
  36 get_io_offset(nir_builder *b, nir_deref_instr *deref, nir_variable *var,
  37               unsigned *element_index, unsigned *xfb_offset,
  38               nir_ssa_def **vertex_index)
  39 {
  40    nir_deref_path path;
  41    nir_deref_path_init(&path, deref, NULL);
  42
  43    assert(path.path[0]->deref_type == nir_deref_type_var);
  44    nir_deref_instr **p = &path.path[1];
  45
  46    /* For per-vertex input arrays (i.e. geometry shader inputs), skip the
  47     * outermost array index.  Process the rest normally.
  48     */
  49    if (nir_is_per_vertex_io(var, b->shader->info.stage)) {
  50       *vertex_index = nir_ssa_for_src(b, (*p)->arr.index, 1);
  51       p++;
  52    }
  53
  54    unsigned offset = 0;
  55    *xfb_offset = 0;
  56    for (; *p; p++) {
  57       if ((*p)->deref_type == nir_deref_type_array) {
  58          /* must not be indirect dereference */
  59          unsigned index = nir_src_as_uint((*p)->arr.index);
  60
  61          unsigned size = glsl_count_attribute_slots((*p)->type, false);
  62          offset += size * index;
  63
  64          xfb_offset += index * glsl_get_component_slots((*p)->type) * 4;
  65
  66          unsigned num_elements = glsl_type_is_array((*p)->type) ?
  67             glsl_get_aoa_size((*p)->type) : 1;
  68
  69          num_elements *= glsl_type_is_matrix(glsl_without_array((*p)->type)) ?
  70             glsl_get_matrix_columns(glsl_without_array((*p)->type)) : 1;
  71
  72          *element_index += num_elements * index;
  73       } else if ((*p)->deref_type == nir_deref_type_struct) {
  74          /* TODO: we could also add struct splitting support to this pass */
  75          break;
  76       }
  77    }
  78
  79    nir_deref_path_finish(&path);
  80
  81    return offset;
  82 }
  83
  84 static nir_variable **
  85 get_array_elements(struct hash_table *ht, nir_variable *var,
  86                    gl_shader_stage stage)
  87 {
  88    nir_variable **elements;
  89    struct hash_entry *entry = _mesa_hash_table_search(ht, var);
  90    if (!entry) {
  91       const struct glsl_type *type = var->type;
  92       if (nir_is_per_vertex_io(var, stage)) {
  93          assert(glsl_type_is_array(type));
  94          type = glsl_get_array_element(type);
  95       }
  96
  97       unsigned num_elements = glsl_type_is_array(type) ?
  98          glsl_get_aoa_size(type) : 1;
  99
 100       num_elements *= glsl_type_is_matrix(glsl_without_array(type)) ?
 101          glsl_get_matrix_columns(glsl_without_array(type)) : 1;
 102
 103       elements = (nir_variable **) calloc(num_elements, sizeof(nir_variable *));
 104       _mesa_hash_table_insert(ht, var, elements);
 105    } else {
 106       elements = (nir_variable **) entry->data;
 107    }
 108
 109    return elements;
 110 }
 111
 112 static void
 113 lower_array(nir_builder *b, nir_intrinsic_instr *intr, nir_variable *var,
 114             struct hash_table *varyings)
 115 {
 116    b->cursor = nir_before_instr(&intr->instr);
 117
 118    nir_variable **elements =
 119       get_array_elements(varyings, var, b->shader->info.stage);
 120
 121    nir_ssa_def *vertex_index = NULL;
 122    unsigned elements_index = 0;
 123    unsigned xfb_offset = 0;
 124    unsigned io_offset = get_io_offset(b, nir_src_as_deref(intr->src[0]),
 125                                       var, &elements_index, &xfb_offset,
 126                                       &vertex_index);
 127
 128    nir_variable *element = elements[elements_index];
 129    if (!element) {
 130          element = nir_variable_clone(var, b->shader);
 131          element->data.location =  var->data.location + io_offset;
 132
 133          if (var->data.explicit_offset)
 134             element->data.offset = var->data.offset + xfb_offset;
 135
 136          const struct glsl_type *type = glsl_without_array(element->type);
 137
 138          /* This pass also splits matrices so we need give them a new type. */
 139          if (glsl_type_is_matrix(type))
 140             type = glsl_get_column_type(type);
 141
 142          if (nir_is_per_vertex_io(var, b->shader->info.stage)) {
 143             type = glsl_array_type(type, glsl_get_length(element->type),
 144                                    glsl_get_explicit_stride(element->type));
 145          }
 146
 147          element->type = type;
 148          elements[elements_index] = element;
 149
 150          nir_shader_add_variable(b->shader, element);
 151    }
 152
 153    nir_deref_instr *element_deref = nir_build_deref_var(b, element);
 154
 155    if (nir_is_per_vertex_io(var, b->shader->info.stage)) {
 156       assert(vertex_index);
 157       element_deref = nir_build_deref_array(b, element_deref, vertex_index);
 158    }
 159
 160    nir_intrinsic_instr *element_intr =
 161       nir_intrinsic_instr_create(b->shader, intr->intrinsic);
 162    element_intr->num_components = intr->num_components;
 163    element_intr->src[0] = nir_src_for_ssa(&element_deref->dest.ssa);
 164
 165    if (intr->intrinsic != nir_intrinsic_store_deref) {
 166       nir_ssa_dest_init(&element_intr->instr, &element_intr->dest,
 167                         intr->num_components, intr->dest.ssa.bit_size, NULL);
 168
 169       if (intr->intrinsic == nir_intrinsic_interp_deref_at_offset ||
 170           intr->intrinsic == nir_intrinsic_interp_deref_at_sample) {
 171          nir_src_copy(&element_intr->src[1], &intr->src[1],
 172                       &element_intr->instr);
 173       }
 174
 175       nir_ssa_def_rewrite_uses(&intr->dest.ssa,
 176                                nir_src_for_ssa(&element_intr->dest.ssa));
 177    } else {
 178       nir_intrinsic_set_write_mask(element_intr,
 179                                    nir_intrinsic_write_mask(intr));
 180       nir_src_copy(&element_intr->src[1], &intr->src[1],
 181                    &element_intr->instr);
 182    }
 183
 184    nir_builder_instr_insert(b, &element_intr->instr);
 185
 186    /* Remove the old load intrinsic */
 187    nir_instr_remove(&intr->instr);
 188 }
 189
 190 static bool
 191 deref_has_indirect(nir_builder *b, nir_variable *var, nir_deref_path *path)
 192 {
 193    assert(path->path[0]->deref_type == nir_deref_type_var);
 194    nir_deref_instr **p = &path->path[1];
 195
 196    if (nir_is_per_vertex_io(var, b->shader->info.stage)) {
 197       p++;
 198    }
 199
 200    for (; *p; p++) {
 201       if ((*p)->deref_type != nir_deref_type_array)
 202          continue;
 203
 204       if (!nir_src_is_const((*p)->arr.index))
 205          return true;
 206    }
 207
 208    return false;
 209 }
 210
 211 /* Creates a mask of locations that contains arrays that are indexed via
 212  * indirect indexing.
 213  */
 214 static void
 215 create_indirects_mask(nir_shader *shader,
 216                       BITSET_WORD *indirects, nir_variable_mode mode)
 217 {
 218    nir_foreach_function(function, shader) {
 219       if (function->impl) {
 220          nir_builder b;
 221          nir_builder_init(&b, function->impl);
 222
 223          nir_foreach_block(block, function->impl) {
 224             nir_foreach_instr_safe(instr, block) {
 225
 226                if (instr->type != nir_instr_type_intrinsic)
 227                   continue;
 228
 229                nir_intrinsic_instr *intr = nir_instr_as_intrinsic(instr);
 230
 231                if (intr->intrinsic != nir_intrinsic_load_deref &&
 232                    intr->intrinsic != nir_intrinsic_store_deref &&
 233                    intr->intrinsic != nir_intrinsic_interp_deref_at_centroid &&
 234                    intr->intrinsic != nir_intrinsic_interp_deref_at_sample &&
 235                    intr->intrinsic != nir_intrinsic_interp_deref_at_offset)
 236                   continue;
 237
 238                nir_deref_instr *deref = nir_src_as_deref(intr->src[0]);
 239                if (deref->mode != mode)
 240                   continue;
 241
 242                nir_variable *var = nir_deref_instr_get_variable(deref);
 243
 244                nir_deref_path path;
 245                nir_deref_path_init(&path, deref, NULL);
 246
 247                int loc = var->data.location * 4 + var->data.location_frac;
 248                if (deref_has_indirect(&b, var, &path))
 249                   BITSET_SET(indirects, loc);
 250
 251                nir_deref_path_finish(&path);
 252             }
 253          }
 254       }
 255    }
 256 }
 257
 258 static void
 259 lower_io_arrays_to_elements(nir_shader *shader, nir_variable_mode mask,
 260                             BITSET_WORD *indirects,
 261                             struct hash_table *varyings,
 262                             bool after_cross_stage_opts)
 263 {
 264    nir_foreach_function(function, shader) {
 265       if (function->impl) {
 266          nir_builder b;
 267          nir_builder_init(&b, function->impl);
 268
 269          nir_foreach_block(block, function->impl) {
 270             nir_foreach_instr_safe(instr, block) {
 271                if (instr->type != nir_instr_type_intrinsic)
 272                   continue;
 273
 274                nir_intrinsic_instr *intr = nir_instr_as_intrinsic(instr);
 275
 276                if (intr->intrinsic != nir_intrinsic_load_deref &&
 277                    intr->intrinsic != nir_intrinsic_store_deref &&
 278                    intr->intrinsic != nir_intrinsic_interp_deref_at_centroid &&
 279                    intr->intrinsic != nir_intrinsic_interp_deref_at_sample &&
 280                    intr->intrinsic != nir_intrinsic_interp_deref_at_offset)
 281                   continue;
 282
 283                nir_deref_instr *deref = nir_src_as_deref(intr->src[0]);
 284                if (!(deref->mode & mask))
 285                   continue;
 286
 287                nir_variable *var = nir_deref_instr_get_variable(deref);
 288
 289                /* Drivers assume compact arrays are, in fact, arrays. */
 290                if (var->data.compact)
 291                   continue;
 292
 293                /* Skip indirects */
 294                int loc = var->data.location * 4 + var->data.location_frac;
 295                if (BITSET_TEST(indirects, loc))
 296                   continue;
 297
 298                nir_variable_mode mode = var->data.mode;
 299
 300                const struct glsl_type *type = var->type;
 301                if (nir_is_per_vertex_io(var, b.shader->info.stage)) {
 302                   assert(glsl_type_is_array(type));
 303                   type = glsl_get_array_element(type);
 304                }
 305
 306                /* Skip types we cannot split.
 307                 *
 308                 * TODO: Add support for struct splitting.
 309                 */
 310                if ((!glsl_type_is_array(type) && !glsl_type_is_matrix(type))||
 311                    glsl_type_is_struct_or_ifc(glsl_without_array(type)))
 312                   continue;
 313
 314                /* Skip builtins */
 315                if (!after_cross_stage_opts &&
 316                    var->data.location < VARYING_SLOT_VAR0 &&
 317                    var->data.location >= 0)
 318                   continue;
 319
 320                /* Don't bother splitting if we can't opt away any unused
 321                 * elements.
 322                 */
 323                if (!after_cross_stage_opts && var->data.always_active_io)
 324                   continue;
 325
 326                switch (intr->intrinsic) {
 327                case nir_intrinsic_interp_deref_at_centroid:
 328                case nir_intrinsic_interp_deref_at_sample:
 329                case nir_intrinsic_interp_deref_at_offset:
 330                case nir_intrinsic_load_deref:
 331                case nir_intrinsic_store_deref:
 332                   if ((mask & nir_var_shader_in && mode == nir_var_shader_in) ||
 333                       (mask & nir_var_shader_out && mode == nir_var_shader_out))
 334                      lower_array(&b, intr, var, varyings);
 335                   break;
 336                default:
 337                   break;
 338                }
 339             }
 340          }
 341       }
 342    }
 343 }
 344
 345 void
 346 nir_lower_io_arrays_to_elements_no_indirects(nir_shader *shader,
 347                                              bool outputs_only)
 348 {
 349    struct hash_table *split_inputs = _mesa_pointer_hash_table_create(NULL);
 350    struct hash_table *split_outputs = _mesa_pointer_hash_table_create(NULL);
 351
 352    BITSET_DECLARE(indirects, 4 * VARYING_SLOT_TESS_MAX) = {};
 353
 354    lower_io_arrays_to_elements(shader, nir_var_shader_out,
 355                                indirects, split_outputs, true);
 356
 357    if (!outputs_only) {
 358       lower_io_arrays_to_elements(shader, nir_var_shader_in,
 359                                   indirects, split_inputs, true);
 360
 361       /* Remove old input from the shaders inputs list */
 362       hash_table_foreach(split_inputs, entry) {
 363          nir_variable *var = (nir_variable *) entry->key;
 364          exec_node_remove(&var->node);
 365
 366          free(entry->data);
 367       }
 368    }
 369
 370    /* Remove old output from the shaders outputs list */
 371    hash_table_foreach(split_outputs, entry) {
 372       nir_variable *var = (nir_variable *) entry->key;
 373       exec_node_remove(&var->node);
 374
 375       free(entry->data);
 376    }
 377
 378    _mesa_hash_table_destroy(split_inputs, NULL);
 379    _mesa_hash_table_destroy(split_outputs, NULL);
 380
 381    nir_remove_dead_derefs(shader);
 382 }
 383
 384 void
 385 nir_lower_io_arrays_to_elements(nir_shader *producer, nir_shader *consumer)
 386 {
 387    struct hash_table *split_inputs = _mesa_pointer_hash_table_create(NULL);
 388    struct hash_table *split_outputs = _mesa_pointer_hash_table_create(NULL);
 389
 390    BITSET_DECLARE(indirects, 4 * VARYING_SLOT_TESS_MAX) = {};
 391
 392    create_indirects_mask(producer, indirects, nir_var_shader_out);
 393    create_indirects_mask(consumer, indirects, nir_var_shader_in);
 394
 395    lower_io_arrays_to_elements(producer, nir_var_shader_out,
 396                                indirects, split_outputs, false);
 397
 398    lower_io_arrays_to_elements(consumer, nir_var_shader_in,
 399                                indirects, split_inputs, false);
 400
 401    /* Remove old input from the shaders inputs list */
 402    hash_table_foreach(split_inputs, entry) {
 403       nir_variable *var = (nir_variable *) entry->key;
 404       exec_node_remove(&var->node);
 405
 406       free(entry->data);
 407    }
 408
 409    /* Remove old output from the shaders outputs list */
 410    hash_table_foreach(split_outputs, entry) {
 411       nir_variable *var = (nir_variable *) entry->key;
 412       exec_node_remove(&var->node);
 413
 414       free(entry->data);
 415    }
 416
 417    _mesa_hash_table_destroy(split_inputs, NULL);
 418    _mesa_hash_table_destroy(split_outputs, NULL);
 419
 420    nir_remove_dead_derefs(producer);
 421    nir_remove_dead_derefs(consumer);
 422 }