Added few more stubs so that control reaches to DestroyDevice().
[mesa.git] / src / broadcom / compiler / v3d_compiler.h
1 /*
2 * Copyright © 2016 Broadcom
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
10 *
11 * The above copyright notice and this permission notice (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
13 * Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
21 * IN THE SOFTWARE.
22 */
23
24 #ifndef V3D_COMPILER_H
25 #define V3D_COMPILER_H
26
27 #include <assert.h>
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <stdbool.h>
31 #include <stdint.h>
32 #include <string.h>
33
34 #include "util/macros.h"
35 #include "common/v3d_debug.h"
36 #include "common/v3d_device_info.h"
37 #include "common/v3d_limits.h"
38 #include "compiler/nir/nir.h"
39 #include "util/list.h"
40 #include "util/u_math.h"
41
42 #include "qpu/qpu_instr.h"
43 #include "pipe/p_state.h"
44
45 struct nir_builder;
46
47 struct v3d_fs_inputs {
48 /**
49 * Array of the meanings of the VPM inputs this shader needs.
50 *
51 * It doesn't include those that aren't part of the VPM, like
52 * point/line coordinates.
53 */
54 struct v3d_varying_slot *input_slots;
55 uint32_t num_inputs;
56 };
57
58 enum qfile {
59 /** An unused source or destination register. */
60 QFILE_NULL,
61
62 /** A physical register, such as the W coordinate payload. */
63 QFILE_REG,
64 /** One of the regsiters for fixed function interactions. */
65 QFILE_MAGIC,
66
67 /**
68 * A virtual register, that will be allocated to actual accumulator
69 * or physical registers later.
70 */
71 QFILE_TEMP,
72
73 /**
74 * VPM reads use this with an index value to say what part of the VPM
75 * is being read.
76 */
77 QFILE_VPM,
78
79 /**
80 * Stores an immediate value in the index field that will be used
81 * directly by qpu_load_imm().
82 */
83 QFILE_LOAD_IMM,
84
85 /**
86 * Stores an immediate value in the index field that can be turned
87 * into a small immediate field by qpu_encode_small_immediate().
88 */
89 QFILE_SMALL_IMM,
90 };
91
92 /**
93 * A reference to a QPU register or a virtual temp register.
94 */
95 struct qreg {
96 enum qfile file;
97 uint32_t index;
98 };
99
100 static inline struct qreg vir_reg(enum qfile file, uint32_t index)
101 {
102 return (struct qreg){file, index};
103 }
104
105 static inline struct qreg vir_magic_reg(uint32_t index)
106 {
107 return (struct qreg){QFILE_MAGIC, index};
108 }
109
110 static inline struct qreg vir_nop_reg(void)
111 {
112 return (struct qreg){QFILE_NULL, 0};
113 }
114
115 /**
116 * A reference to an actual register at the QPU level, for register
117 * allocation.
118 */
119 struct qpu_reg {
120 bool magic;
121 bool smimm;
122 int index;
123 };
124
125 struct qinst {
126 /** Entry in qblock->instructions */
127 struct list_head link;
128
129 /**
130 * The instruction being wrapped. Its condition codes, pack flags,
131 * signals, etc. will all be used, with just the register references
132 * being replaced by the contents of qinst->dst and qinst->src[].
133 */
134 struct v3d_qpu_instr qpu;
135
136 /* Pre-register-allocation references to src/dst registers */
137 struct qreg dst;
138 struct qreg src[3];
139 bool is_last_thrsw;
140
141 /* If the instruction reads a uniform (other than through src[i].file
142 * == QFILE_UNIF), that uniform's index in c->uniform_contents. ~0
143 * otherwise.
144 */
145 int uniform;
146 };
147
148 enum quniform_contents {
149 /**
150 * Indicates that a constant 32-bit value is copied from the program's
151 * uniform contents.
152 */
153 QUNIFORM_CONSTANT,
154 /**
155 * Indicates that the program's uniform contents are used as an index
156 * into the GL uniform storage.
157 */
158 QUNIFORM_UNIFORM,
159
160 /** @{
161 * Scaling factors from clip coordinates to relative to the viewport
162 * center.
163 *
164 * This is used by the coordinate and vertex shaders to produce the
165 * 32-bit entry consisting of 2 16-bit fields with 12.4 signed fixed
166 * point offsets from the viewport ccenter.
167 */
168 QUNIFORM_VIEWPORT_X_SCALE,
169 QUNIFORM_VIEWPORT_Y_SCALE,
170 /** @} */
171
172 QUNIFORM_VIEWPORT_Z_OFFSET,
173 QUNIFORM_VIEWPORT_Z_SCALE,
174
175 QUNIFORM_USER_CLIP_PLANE,
176
177 /**
178 * A reference to a V3D 3.x texture config parameter 0 uniform.
179 *
180 * This is a uniform implicitly loaded with a QPU_W_TMU* write, which
181 * defines texture type, miplevels, and such. It will be found as a
182 * parameter to the first QOP_TEX_[STRB] instruction in a sequence.
183 */
184 QUNIFORM_TEXTURE_CONFIG_P0_0,
185 QUNIFORM_TEXTURE_CONFIG_P0_1,
186 QUNIFORM_TEXTURE_CONFIG_P0_2,
187 QUNIFORM_TEXTURE_CONFIG_P0_3,
188 QUNIFORM_TEXTURE_CONFIG_P0_4,
189 QUNIFORM_TEXTURE_CONFIG_P0_5,
190 QUNIFORM_TEXTURE_CONFIG_P0_6,
191 QUNIFORM_TEXTURE_CONFIG_P0_7,
192 QUNIFORM_TEXTURE_CONFIG_P0_8,
193 QUNIFORM_TEXTURE_CONFIG_P0_9,
194 QUNIFORM_TEXTURE_CONFIG_P0_10,
195 QUNIFORM_TEXTURE_CONFIG_P0_11,
196 QUNIFORM_TEXTURE_CONFIG_P0_12,
197 QUNIFORM_TEXTURE_CONFIG_P0_13,
198 QUNIFORM_TEXTURE_CONFIG_P0_14,
199 QUNIFORM_TEXTURE_CONFIG_P0_15,
200 QUNIFORM_TEXTURE_CONFIG_P0_16,
201 QUNIFORM_TEXTURE_CONFIG_P0_17,
202 QUNIFORM_TEXTURE_CONFIG_P0_18,
203 QUNIFORM_TEXTURE_CONFIG_P0_19,
204 QUNIFORM_TEXTURE_CONFIG_P0_20,
205 QUNIFORM_TEXTURE_CONFIG_P0_21,
206 QUNIFORM_TEXTURE_CONFIG_P0_22,
207 QUNIFORM_TEXTURE_CONFIG_P0_23,
208 QUNIFORM_TEXTURE_CONFIG_P0_24,
209 QUNIFORM_TEXTURE_CONFIG_P0_25,
210 QUNIFORM_TEXTURE_CONFIG_P0_26,
211 QUNIFORM_TEXTURE_CONFIG_P0_27,
212 QUNIFORM_TEXTURE_CONFIG_P0_28,
213 QUNIFORM_TEXTURE_CONFIG_P0_29,
214 QUNIFORM_TEXTURE_CONFIG_P0_30,
215 QUNIFORM_TEXTURE_CONFIG_P0_31,
216 QUNIFORM_TEXTURE_CONFIG_P0_32,
217
218 /**
219 * A reference to a V3D 3.x texture config parameter 1 uniform.
220 *
221 * This is a uniform implicitly loaded with a QPU_W_TMU* write, which
222 * has the pointer to the indirect texture state. Our data[] field
223 * will have a packed p1 value, but the address field will be just
224 * which texture unit's texture should be referenced.
225 */
226 QUNIFORM_TEXTURE_CONFIG_P1,
227
228 /* A V3D 4.x texture config parameter. The high 8 bits will be
229 * which texture or sampler is being sampled, and the driver must
230 * replace the address field with the appropriate address.
231 */
232 QUNIFORM_TMU_CONFIG_P0,
233 QUNIFORM_TMU_CONFIG_P1,
234
235 QUNIFORM_IMAGE_TMU_CONFIG_P0,
236
237 QUNIFORM_TEXTURE_FIRST_LEVEL,
238
239 QUNIFORM_TEXTURE_WIDTH,
240 QUNIFORM_TEXTURE_HEIGHT,
241 QUNIFORM_TEXTURE_DEPTH,
242 QUNIFORM_TEXTURE_ARRAY_SIZE,
243 QUNIFORM_TEXTURE_LEVELS,
244
245 QUNIFORM_UBO_ADDR,
246
247 QUNIFORM_TEXRECT_SCALE_X,
248 QUNIFORM_TEXRECT_SCALE_Y,
249
250 /* Returns the base offset of the SSBO given by the data value. */
251 QUNIFORM_SSBO_OFFSET,
252
253 /* Returns the size of the SSBO given by the data value. */
254 QUNIFORM_GET_BUFFER_SIZE,
255
256 /* Sizes (in pixels) of a shader image given by the data value. */
257 QUNIFORM_IMAGE_WIDTH,
258 QUNIFORM_IMAGE_HEIGHT,
259 QUNIFORM_IMAGE_DEPTH,
260 QUNIFORM_IMAGE_ARRAY_SIZE,
261
262 QUNIFORM_ALPHA_REF,
263
264 QUNIFORM_LINE_WIDTH,
265
266 /* The line width sent to hardware. This includes the expanded width
267 * when anti-aliasing is enabled.
268 */
269 QUNIFORM_AA_LINE_WIDTH,
270
271 /* Number of workgroups passed to glDispatchCompute in the dimension
272 * selected by the data value.
273 */
274 QUNIFORM_NUM_WORK_GROUPS,
275
276 /**
277 * Returns the the offset of the scratch buffer for register spilling.
278 */
279 QUNIFORM_SPILL_OFFSET,
280 QUNIFORM_SPILL_SIZE_PER_THREAD,
281
282 /**
283 * Returns the offset of the shared memory for compute shaders.
284 *
285 * This will be accessed using TMU general memory operations, so the
286 * L2T cache will effectively be the shared memory area.
287 */
288 QUNIFORM_SHARED_OFFSET,
289
290 /**
291 * Returns the number of layers in the framebuffer.
292 *
293 * This is used to cap gl_Layer in geometry shaders to avoid
294 * out-of-bounds accesses into the tile state during binning.
295 */
296 QUNIFORM_FB_LAYERS,
297 };
298
299 static inline uint32_t v3d_unit_data_create(uint32_t unit, uint32_t value)
300 {
301 assert(value < (1 << 24));
302 return unit << 24 | value;
303 }
304
305 static inline uint32_t v3d_unit_data_get_unit(uint32_t data)
306 {
307 return data >> 24;
308 }
309
310 static inline uint32_t v3d_unit_data_get_offset(uint32_t data)
311 {
312 return data & 0xffffff;
313 }
314
315 struct v3d_varying_slot {
316 uint8_t slot_and_component;
317 };
318
319 static inline struct v3d_varying_slot
320 v3d_slot_from_slot_and_component(uint8_t slot, uint8_t component)
321 {
322 assert(slot < 255 / 4);
323 return (struct v3d_varying_slot){ (slot << 2) + component };
324 }
325
326 static inline uint8_t v3d_slot_get_slot(struct v3d_varying_slot slot)
327 {
328 return slot.slot_and_component >> 2;
329 }
330
331 static inline uint8_t v3d_slot_get_component(struct v3d_varying_slot slot)
332 {
333 return slot.slot_and_component & 3;
334 }
335
336 struct v3d_key {
337 void *shader_state;
338 struct {
339 uint8_t swizzle[4];
340 uint8_t return_size;
341 uint8_t return_channels;
342 bool clamp_s:1;
343 bool clamp_t:1;
344 bool clamp_r:1;
345 } tex[V3D_MAX_TEXTURE_SAMPLERS];
346 uint8_t ucp_enables;
347 bool is_last_geometry_stage;
348 };
349
350 struct v3d_fs_key {
351 struct v3d_key base;
352 bool depth_enabled;
353 bool is_points;
354 bool is_lines;
355 bool line_smoothing;
356 bool alpha_test;
357 bool point_coord_upper_left;
358 bool light_twoside;
359 bool msaa;
360 bool sample_coverage;
361 bool sample_alpha_to_coverage;
362 bool sample_alpha_to_one;
363 bool clamp_color;
364 bool shade_model_flat;
365 /* Mask of which color render targets are present. */
366 uint8_t cbufs;
367 uint8_t swap_color_rb;
368 /* Mask of which render targets need to be written as 32-bit floats */
369 uint8_t f32_color_rb;
370 /* Masks of which render targets need to be written as ints/uints.
371 * Used by gallium to work around lost information in TGSI.
372 */
373 uint8_t int_color_rb;
374 uint8_t uint_color_rb;
375
376 /* Color format information per render target. Only set when logic
377 * operations are enabled.
378 */
379 struct {
380 enum pipe_format format;
381 const uint8_t *swizzle;
382 } color_fmt[V3D_MAX_DRAW_BUFFERS];
383
384 uint8_t alpha_test_func;
385 uint8_t logicop_func;
386 uint32_t point_sprite_mask;
387
388 struct pipe_rt_blend_state blend;
389 };
390
391 struct v3d_gs_key {
392 struct v3d_key base;
393
394 struct v3d_varying_slot used_outputs[V3D_MAX_FS_INPUTS];
395 uint8_t num_used_outputs;
396
397 bool is_coord;
398 bool per_vertex_point_size;
399 };
400
401 struct v3d_vs_key {
402 struct v3d_key base;
403
404 struct v3d_varying_slot used_outputs[V3D_MAX_ANY_STAGE_INPUTS];
405 uint8_t num_used_outputs;
406
407 bool is_coord;
408 bool per_vertex_point_size;
409 bool clamp_color;
410 };
411
412 /** A basic block of VIR intructions. */
413 struct qblock {
414 struct list_head link;
415
416 struct list_head instructions;
417
418 struct set *predecessors;
419 struct qblock *successors[2];
420
421 int index;
422
423 /* Instruction IPs for the first and last instruction of the block.
424 * Set by qpu_schedule.c.
425 */
426 uint32_t start_qpu_ip;
427 uint32_t end_qpu_ip;
428
429 /* Instruction IP for the branch instruction of the block. Set by
430 * qpu_schedule.c.
431 */
432 uint32_t branch_qpu_ip;
433
434 /** Offset within the uniform stream at the start of the block. */
435 uint32_t start_uniform;
436 /** Offset within the uniform stream of the branch instruction */
437 uint32_t branch_uniform;
438
439 /** @{ used by v3d_vir_live_variables.c */
440 BITSET_WORD *def;
441 BITSET_WORD *defin;
442 BITSET_WORD *defout;
443 BITSET_WORD *use;
444 BITSET_WORD *live_in;
445 BITSET_WORD *live_out;
446 int start_ip, end_ip;
447 /** @} */
448 };
449
450 /** Which util/list.h add mode we should use when inserting an instruction. */
451 enum vir_cursor_mode {
452 vir_cursor_add,
453 vir_cursor_addtail,
454 };
455
456 /**
457 * Tracking structure for where new instructions should be inserted. Create
458 * with one of the vir_after_inst()-style helper functions.
459 *
460 * This does not protect against removal of the block or instruction, so we
461 * have an assert in instruction removal to try to catch it.
462 */
463 struct vir_cursor {
464 enum vir_cursor_mode mode;
465 struct list_head *link;
466 };
467
468 static inline struct vir_cursor
469 vir_before_inst(struct qinst *inst)
470 {
471 return (struct vir_cursor){ vir_cursor_addtail, &inst->link };
472 }
473
474 static inline struct vir_cursor
475 vir_after_inst(struct qinst *inst)
476 {
477 return (struct vir_cursor){ vir_cursor_add, &inst->link };
478 }
479
480 static inline struct vir_cursor
481 vir_before_block(struct qblock *block)
482 {
483 return (struct vir_cursor){ vir_cursor_add, &block->instructions };
484 }
485
486 static inline struct vir_cursor
487 vir_after_block(struct qblock *block)
488 {
489 return (struct vir_cursor){ vir_cursor_addtail, &block->instructions };
490 }
491
492 enum v3d_compilation_result {
493 V3D_COMPILATION_SUCCEEDED,
494 V3D_COMPILATION_FAILED_REGISTER_ALLOCATION,
495 V3D_COMPILATION_FAILED,
496 };
497
498 /**
499 * Compiler state saved across compiler invocations, for any expensive global
500 * setup.
501 */
502 struct v3d_compiler {
503 const struct v3d_device_info *devinfo;
504 struct ra_regs *regs;
505 unsigned int reg_class_any[3];
506 unsigned int reg_class_r5[3];
507 unsigned int reg_class_phys[3];
508 unsigned int reg_class_phys_or_acc[3];
509 };
510
511 struct v3d_compile {
512 const struct v3d_device_info *devinfo;
513 nir_shader *s;
514 nir_function_impl *impl;
515 struct exec_list *cf_node_list;
516 const struct v3d_compiler *compiler;
517
518 void (*debug_output)(const char *msg,
519 void *debug_output_data);
520 void *debug_output_data;
521
522 /**
523 * Mapping from nir_register * or nir_ssa_def * to array of struct
524 * qreg for the values.
525 */
526 struct hash_table *def_ht;
527
528 /* For each temp, the instruction generating its value. */
529 struct qinst **defs;
530 uint32_t defs_array_size;
531
532 /**
533 * Inputs to the shader, arranged by TGSI declaration order.
534 *
535 * Not all fragment shader QFILE_VARY reads are present in this array.
536 */
537 struct qreg *inputs;
538 struct qreg *outputs;
539 bool msaa_per_sample_output;
540 struct qreg color_reads[V3D_MAX_DRAW_BUFFERS * V3D_MAX_SAMPLES * 4];
541 struct qreg sample_colors[V3D_MAX_DRAW_BUFFERS * V3D_MAX_SAMPLES * 4];
542 uint32_t inputs_array_size;
543 uint32_t outputs_array_size;
544 uint32_t uniforms_array_size;
545
546 /* Booleans for whether the corresponding QFILE_VARY[i] is
547 * flat-shaded. This includes gl_FragColor flat-shading, which is
548 * customized based on the shademodel_flat shader key.
549 */
550 uint32_t flat_shade_flags[BITSET_WORDS(V3D_MAX_FS_INPUTS)];
551
552 uint32_t noperspective_flags[BITSET_WORDS(V3D_MAX_FS_INPUTS)];
553
554 uint32_t centroid_flags[BITSET_WORDS(V3D_MAX_FS_INPUTS)];
555
556 bool uses_center_w;
557 bool writes_z;
558 bool uses_implicit_point_line_varyings;
559
560 /* Whether we are using the fallback scheduler. This will be set after
561 * register allocation has failed once.
562 */
563 bool fallback_scheduler;
564
565 /* State for whether we're executing on each channel currently. 0 if
566 * yes, otherwise a block number + 1 that the channel jumped to.
567 */
568 struct qreg execute;
569 bool in_control_flow;
570
571 struct qreg line_x, point_x, point_y;
572
573 /**
574 * Instance ID, which comes in before the vertex attribute payload if
575 * the shader record requests it.
576 */
577 struct qreg iid;
578
579 /**
580 * Vertex ID, which comes in before the vertex attribute payload
581 * (after Instance ID) if the shader record requests it.
582 */
583 struct qreg vid;
584
585 /* Fragment shader payload regs. */
586 struct qreg payload_w, payload_w_centroid, payload_z;
587
588 struct qreg cs_payload[2];
589 struct qreg cs_shared_offset;
590 int local_invocation_index_bits;
591
592 uint8_t vattr_sizes[V3D_MAX_VS_INPUTS / 4];
593 uint32_t vpm_output_size;
594
595 /* Size in bytes of registers that have been spilled. This is how much
596 * space needs to be available in the spill BO per thread per QPU.
597 */
598 uint32_t spill_size;
599 /* Shader-db stats */
600 uint32_t spills, fills, loops;
601 /**
602 * Register spilling's per-thread base address, shared between each
603 * spill/fill's addressing calculations.
604 */
605 struct qreg spill_base;
606 /* Bit vector of which temps may be spilled */
607 BITSET_WORD *spillable;
608
609 /**
610 * Array of the VARYING_SLOT_* of all FS QFILE_VARY reads.
611 *
612 * This includes those that aren't part of the VPM varyings, like
613 * point/line coordinates.
614 */
615 struct v3d_varying_slot input_slots[V3D_MAX_FS_INPUTS];
616
617 /**
618 * An entry per outputs[] in the VS indicating what the VARYING_SLOT_*
619 * of the output is. Used to emit from the VS in the order that the
620 * FS needs.
621 */
622 struct v3d_varying_slot *output_slots;
623
624 struct pipe_shader_state *shader_state;
625 struct v3d_key *key;
626 struct v3d_fs_key *fs_key;
627 struct v3d_gs_key *gs_key;
628 struct v3d_vs_key *vs_key;
629
630 /* Live ranges of temps. */
631 int *temp_start, *temp_end;
632 bool live_intervals_valid;
633
634 uint32_t *uniform_data;
635 enum quniform_contents *uniform_contents;
636 uint32_t uniform_array_size;
637 uint32_t num_uniforms;
638 uint32_t output_position_index;
639 nir_variable *output_color_var[4];
640 uint32_t output_sample_mask_index;
641
642 struct qreg undef;
643 uint32_t num_temps;
644
645 struct vir_cursor cursor;
646 struct list_head blocks;
647 int next_block_index;
648 struct qblock *cur_block;
649 struct qblock *loop_cont_block;
650 struct qblock *loop_break_block;
651
652 uint64_t *qpu_insts;
653 uint32_t qpu_inst_count;
654 uint32_t qpu_inst_size;
655 uint32_t qpu_inst_stalled_count;
656
657 /* For the FS, the number of varying inputs not counting the
658 * point/line varyings payload
659 */
660 uint32_t num_inputs;
661
662 uint32_t program_id;
663 uint32_t variant_id;
664
665 /* Set to compile program in in 1x, 2x, or 4x threaded mode, where
666 * SIG_THREAD_SWITCH is used to hide texturing latency at the cost of
667 * limiting ourselves to the part of the physical reg space.
668 *
669 * On V3D 3.x, 2x or 4x divide the physical reg space by 2x or 4x. On
670 * V3D 4.x, all shaders are 2x threaded, and 4x only divides the
671 * physical reg space in half.
672 */
673 uint8_t threads;
674 struct qinst *last_thrsw;
675 bool last_thrsw_at_top_level;
676
677 bool emitted_tlb_load;
678 bool lock_scoreboard_on_first_thrsw;
679
680 enum v3d_compilation_result compilation_result;
681
682 bool tmu_dirty_rcl;
683 };
684
685 struct v3d_uniform_list {
686 enum quniform_contents *contents;
687 uint32_t *data;
688 uint32_t count;
689 };
690
691 struct v3d_prog_data {
692 struct v3d_uniform_list uniforms;
693
694 uint32_t spill_size;
695
696 uint8_t threads;
697
698 /* For threads > 1, whether the program should be dispatched in the
699 * after-final-THRSW state.
700 */
701 bool single_seg;
702
703 bool tmu_dirty_rcl;
704 };
705
706 struct v3d_vs_prog_data {
707 struct v3d_prog_data base;
708
709 bool uses_iid, uses_vid;
710
711 /* Number of components read from each vertex attribute. */
712 uint8_t vattr_sizes[V3D_MAX_VS_INPUTS / 4];
713
714 /* Total number of components read, for the shader state record. */
715 uint32_t vpm_input_size;
716
717 /* Total number of components written, for the shader state record. */
718 uint32_t vpm_output_size;
719
720 /* Set if there should be separate VPM segments for input and output.
721 * If unset, vpm_input_size will be 0.
722 */
723 bool separate_segments;
724
725 /* Value to be programmed in VCM_CACHE_SIZE. */
726 uint8_t vcm_cache_size;
727 };
728
729 struct v3d_gs_prog_data {
730 struct v3d_prog_data base;
731
732 /* Whether the program reads gl_PrimitiveIDIn */
733 bool uses_pid;
734
735 /* Number of components read from each input varying. */
736 uint8_t input_sizes[V3D_MAX_GS_INPUTS / 4];
737
738 /* Number of inputs */
739 uint8_t num_inputs;
740 struct v3d_varying_slot input_slots[V3D_MAX_GS_INPUTS];
741
742 /* Total number of components written, for the shader state record. */
743 uint32_t vpm_output_size;
744
745 /* Maximum SIMD dispatch width to not exceed VPM output size limits
746 * in the geometry shader. Notice that the final dispatch width has to
747 * be decided at draw time and could be lower based on the VPM pressure
748 * added by other shader stages.
749 */
750 uint8_t simd_width;
751
752 /* Output primitive type */
753 uint8_t out_prim_type;
754
755 /* Number of GS invocations */
756 uint8_t num_invocations;
757 };
758
759 struct v3d_fs_prog_data {
760 struct v3d_prog_data base;
761
762 struct v3d_varying_slot input_slots[V3D_MAX_FS_INPUTS];
763
764 /* Array of flat shade flags.
765 *
766 * Each entry is only 24 bits (high 8 bits 0), to match the hardware
767 * packet layout.
768 */
769 uint32_t flat_shade_flags[((V3D_MAX_FS_INPUTS - 1) / 24) + 1];
770
771 uint32_t noperspective_flags[((V3D_MAX_FS_INPUTS - 1) / 24) + 1];
772
773 uint32_t centroid_flags[((V3D_MAX_FS_INPUTS - 1) / 24) + 1];
774
775 uint8_t num_inputs;
776 bool writes_z;
777 bool disable_ez;
778 bool uses_center_w;
779 bool uses_implicit_point_line_varyings;
780 bool lock_scoreboard_on_first_thrsw;
781 };
782
783 struct v3d_compute_prog_data {
784 struct v3d_prog_data base;
785 /* Size in bytes of the workgroup's shared space. */
786 uint32_t shared_size;
787 };
788
789 static inline bool
790 vir_has_uniform(struct qinst *inst)
791 {
792 return inst->uniform != ~0;
793 }
794
795 extern const nir_shader_compiler_options v3d_nir_options;
796
797 const struct v3d_compiler *v3d_compiler_init(const struct v3d_device_info *devinfo);
798 void v3d_compiler_free(const struct v3d_compiler *compiler);
799 void v3d_optimize_nir(struct nir_shader *s);
800
801 uint64_t *v3d_compile(const struct v3d_compiler *compiler,
802 struct v3d_key *key,
803 struct v3d_prog_data **prog_data,
804 nir_shader *s,
805 void (*debug_output)(const char *msg,
806 void *debug_output_data),
807 void *debug_output_data,
808 int program_id, int variant_id,
809 uint32_t *final_assembly_size);
810
811 uint32_t v3d_prog_data_size(gl_shader_stage stage);
812 void v3d_nir_to_vir(struct v3d_compile *c);
813
814 void vir_compile_destroy(struct v3d_compile *c);
815 const char *vir_get_stage_name(struct v3d_compile *c);
816 struct qblock *vir_new_block(struct v3d_compile *c);
817 void vir_set_emit_block(struct v3d_compile *c, struct qblock *block);
818 void vir_link_blocks(struct qblock *predecessor, struct qblock *successor);
819 struct qblock *vir_entry_block(struct v3d_compile *c);
820 struct qblock *vir_exit_block(struct v3d_compile *c);
821 struct qinst *vir_add_inst(enum v3d_qpu_add_op op, struct qreg dst,
822 struct qreg src0, struct qreg src1);
823 struct qinst *vir_mul_inst(enum v3d_qpu_mul_op op, struct qreg dst,
824 struct qreg src0, struct qreg src1);
825 struct qinst *vir_branch_inst(struct v3d_compile *c,
826 enum v3d_qpu_branch_cond cond);
827 void vir_remove_instruction(struct v3d_compile *c, struct qinst *qinst);
828 uint32_t vir_get_uniform_index(struct v3d_compile *c,
829 enum quniform_contents contents,
830 uint32_t data);
831 struct qreg vir_uniform(struct v3d_compile *c,
832 enum quniform_contents contents,
833 uint32_t data);
834 void vir_schedule_instructions(struct v3d_compile *c);
835 void v3d_setup_spill_base(struct v3d_compile *c);
836 struct v3d_qpu_instr v3d_qpu_nop(void);
837
838 struct qreg vir_emit_def(struct v3d_compile *c, struct qinst *inst);
839 struct qinst *vir_emit_nondef(struct v3d_compile *c, struct qinst *inst);
840 void vir_set_cond(struct qinst *inst, enum v3d_qpu_cond cond);
841 void vir_set_pf(struct qinst *inst, enum v3d_qpu_pf pf);
842 void vir_set_uf(struct qinst *inst, enum v3d_qpu_uf uf);
843 void vir_set_unpack(struct qinst *inst, int src,
844 enum v3d_qpu_input_unpack unpack);
845
846 struct qreg vir_get_temp(struct v3d_compile *c);
847 void vir_emit_last_thrsw(struct v3d_compile *c);
848 void vir_calculate_live_intervals(struct v3d_compile *c);
849 int vir_get_nsrc(struct qinst *inst);
850 bool vir_has_side_effects(struct v3d_compile *c, struct qinst *inst);
851 bool vir_get_add_op(struct qinst *inst, enum v3d_qpu_add_op *op);
852 bool vir_get_mul_op(struct qinst *inst, enum v3d_qpu_mul_op *op);
853 bool vir_is_raw_mov(struct qinst *inst);
854 bool vir_is_tex(struct qinst *inst);
855 bool vir_is_add(struct qinst *inst);
856 bool vir_is_mul(struct qinst *inst);
857 bool vir_writes_r3(const struct v3d_device_info *devinfo, struct qinst *inst);
858 bool vir_writes_r4(const struct v3d_device_info *devinfo, struct qinst *inst);
859 struct qreg vir_follow_movs(struct v3d_compile *c, struct qreg reg);
860 uint8_t vir_channels_written(struct qinst *inst);
861 struct qreg ntq_get_src(struct v3d_compile *c, nir_src src, int i);
862 void ntq_store_dest(struct v3d_compile *c, nir_dest *dest, int chan,
863 struct qreg result);
864 void vir_emit_thrsw(struct v3d_compile *c);
865
866 void vir_dump(struct v3d_compile *c);
867 void vir_dump_inst(struct v3d_compile *c, struct qinst *inst);
868 void vir_dump_uniform(enum quniform_contents contents, uint32_t data);
869
870 void vir_validate(struct v3d_compile *c);
871
872 void vir_optimize(struct v3d_compile *c);
873 bool vir_opt_algebraic(struct v3d_compile *c);
874 bool vir_opt_constant_folding(struct v3d_compile *c);
875 bool vir_opt_copy_propagate(struct v3d_compile *c);
876 bool vir_opt_dead_code(struct v3d_compile *c);
877 bool vir_opt_peephole_sf(struct v3d_compile *c);
878 bool vir_opt_redundant_flags(struct v3d_compile *c);
879 bool vir_opt_small_immediates(struct v3d_compile *c);
880 bool vir_opt_vpm(struct v3d_compile *c);
881 void v3d_nir_lower_blend(nir_shader *s, struct v3d_compile *c);
882 void v3d_nir_lower_io(nir_shader *s, struct v3d_compile *c);
883 void v3d_nir_lower_line_smooth(nir_shader *shader);
884 void v3d_nir_lower_logic_ops(nir_shader *s, struct v3d_compile *c);
885 void v3d_nir_lower_scratch(nir_shader *s);
886 void v3d_nir_lower_txf_ms(nir_shader *s, struct v3d_compile *c);
887 void v3d_nir_lower_image_load_store(nir_shader *s);
888 void vir_lower_uniforms(struct v3d_compile *c);
889
890 void v3d33_vir_vpm_read_setup(struct v3d_compile *c, int num_components);
891 void v3d33_vir_vpm_write_setup(struct v3d_compile *c);
892 void v3d33_vir_emit_tex(struct v3d_compile *c, nir_tex_instr *instr);
893 void v3d40_vir_emit_tex(struct v3d_compile *c, nir_tex_instr *instr);
894 void v3d40_vir_emit_image_load_store(struct v3d_compile *c,
895 nir_intrinsic_instr *instr);
896
897 void v3d_vir_to_qpu(struct v3d_compile *c, struct qpu_reg *temp_registers);
898 uint32_t v3d_qpu_schedule_instructions(struct v3d_compile *c);
899 void qpu_validate(struct v3d_compile *c);
900 struct qpu_reg *v3d_register_allocate(struct v3d_compile *c, bool *spilled);
901 bool vir_init_reg_sets(struct v3d_compiler *compiler);
902
903 bool v3d_gl_format_is_return_32(GLenum format);
904
905 uint32_t
906 v3d_get_op_for_atomic_add(nir_intrinsic_instr *instr, unsigned src);
907
908 static inline bool
909 quniform_contents_is_texture_p0(enum quniform_contents contents)
910 {
911 return (contents >= QUNIFORM_TEXTURE_CONFIG_P0_0 &&
912 contents < (QUNIFORM_TEXTURE_CONFIG_P0_0 +
913 V3D_MAX_TEXTURE_SAMPLERS));
914 }
915
916 static inline bool
917 vir_in_nonuniform_control_flow(struct v3d_compile *c)
918 {
919 return c->execute.file != QFILE_NULL;
920 }
921
922 static inline struct qreg
923 vir_uniform_ui(struct v3d_compile *c, uint32_t ui)
924 {
925 return vir_uniform(c, QUNIFORM_CONSTANT, ui);
926 }
927
928 static inline struct qreg
929 vir_uniform_f(struct v3d_compile *c, float f)
930 {
931 return vir_uniform(c, QUNIFORM_CONSTANT, fui(f));
932 }
933
934 #define VIR_ALU0(name, vir_inst, op) \
935 static inline struct qreg \
936 vir_##name(struct v3d_compile *c) \
937 { \
938 return vir_emit_def(c, vir_inst(op, c->undef, \
939 c->undef, c->undef)); \
940 } \
941 static inline struct qinst * \
942 vir_##name##_dest(struct v3d_compile *c, struct qreg dest) \
943 { \
944 return vir_emit_nondef(c, vir_inst(op, dest, \
945 c->undef, c->undef)); \
946 }
947
948 #define VIR_ALU1(name, vir_inst, op) \
949 static inline struct qreg \
950 vir_##name(struct v3d_compile *c, struct qreg a) \
951 { \
952 return vir_emit_def(c, vir_inst(op, c->undef, \
953 a, c->undef)); \
954 } \
955 static inline struct qinst * \
956 vir_##name##_dest(struct v3d_compile *c, struct qreg dest, \
957 struct qreg a) \
958 { \
959 return vir_emit_nondef(c, vir_inst(op, dest, a, \
960 c->undef)); \
961 }
962
963 #define VIR_ALU2(name, vir_inst, op) \
964 static inline struct qreg \
965 vir_##name(struct v3d_compile *c, struct qreg a, struct qreg b) \
966 { \
967 return vir_emit_def(c, vir_inst(op, c->undef, a, b)); \
968 } \
969 static inline struct qinst * \
970 vir_##name##_dest(struct v3d_compile *c, struct qreg dest, \
971 struct qreg a, struct qreg b) \
972 { \
973 return vir_emit_nondef(c, vir_inst(op, dest, a, b)); \
974 }
975
976 #define VIR_NODST_0(name, vir_inst, op) \
977 static inline struct qinst * \
978 vir_##name(struct v3d_compile *c) \
979 { \
980 return vir_emit_nondef(c, vir_inst(op, c->undef, \
981 c->undef, c->undef)); \
982 }
983
984 #define VIR_NODST_1(name, vir_inst, op) \
985 static inline struct qinst * \
986 vir_##name(struct v3d_compile *c, struct qreg a) \
987 { \
988 return vir_emit_nondef(c, vir_inst(op, c->undef, \
989 a, c->undef)); \
990 }
991
992 #define VIR_NODST_2(name, vir_inst, op) \
993 static inline struct qinst * \
994 vir_##name(struct v3d_compile *c, struct qreg a, struct qreg b) \
995 { \
996 return vir_emit_nondef(c, vir_inst(op, c->undef, \
997 a, b)); \
998 }
999
1000 #define VIR_SFU(name) \
1001 static inline struct qreg \
1002 vir_##name(struct v3d_compile *c, struct qreg a) \
1003 { \
1004 if (c->devinfo->ver >= 41) { \
1005 return vir_emit_def(c, vir_add_inst(V3D_QPU_A_##name, \
1006 c->undef, \
1007 a, c->undef)); \
1008 } else { \
1009 vir_FMOV_dest(c, vir_reg(QFILE_MAGIC, V3D_QPU_WADDR_##name), a); \
1010 return vir_FMOV(c, vir_reg(QFILE_MAGIC, V3D_QPU_WADDR_R4)); \
1011 } \
1012 } \
1013 static inline struct qinst * \
1014 vir_##name##_dest(struct v3d_compile *c, struct qreg dest, \
1015 struct qreg a) \
1016 { \
1017 if (c->devinfo->ver >= 41) { \
1018 return vir_emit_nondef(c, vir_add_inst(V3D_QPU_A_##name, \
1019 dest, \
1020 a, c->undef)); \
1021 } else { \
1022 vir_FMOV_dest(c, vir_reg(QFILE_MAGIC, V3D_QPU_WADDR_##name), a); \
1023 return vir_FMOV_dest(c, dest, vir_reg(QFILE_MAGIC, V3D_QPU_WADDR_R4)); \
1024 } \
1025 }
1026
1027 #define VIR_A_ALU2(name) VIR_ALU2(name, vir_add_inst, V3D_QPU_A_##name)
1028 #define VIR_M_ALU2(name) VIR_ALU2(name, vir_mul_inst, V3D_QPU_M_##name)
1029 #define VIR_A_ALU1(name) VIR_ALU1(name, vir_add_inst, V3D_QPU_A_##name)
1030 #define VIR_M_ALU1(name) VIR_ALU1(name, vir_mul_inst, V3D_QPU_M_##name)
1031 #define VIR_A_ALU0(name) VIR_ALU0(name, vir_add_inst, V3D_QPU_A_##name)
1032 #define VIR_M_ALU0(name) VIR_ALU0(name, vir_mul_inst, V3D_QPU_M_##name)
1033 #define VIR_A_NODST_2(name) VIR_NODST_2(name, vir_add_inst, V3D_QPU_A_##name)
1034 #define VIR_M_NODST_2(name) VIR_NODST_2(name, vir_mul_inst, V3D_QPU_M_##name)
1035 #define VIR_A_NODST_1(name) VIR_NODST_1(name, vir_add_inst, V3D_QPU_A_##name)
1036 #define VIR_M_NODST_1(name) VIR_NODST_1(name, vir_mul_inst, V3D_QPU_M_##name)
1037 #define VIR_A_NODST_0(name) VIR_NODST_0(name, vir_add_inst, V3D_QPU_A_##name)
1038
1039 VIR_A_ALU2(FADD)
1040 VIR_A_ALU2(VFPACK)
1041 VIR_A_ALU2(FSUB)
1042 VIR_A_ALU2(FMIN)
1043 VIR_A_ALU2(FMAX)
1044
1045 VIR_A_ALU2(ADD)
1046 VIR_A_ALU2(SUB)
1047 VIR_A_ALU2(SHL)
1048 VIR_A_ALU2(SHR)
1049 VIR_A_ALU2(ASR)
1050 VIR_A_ALU2(ROR)
1051 VIR_A_ALU2(MIN)
1052 VIR_A_ALU2(MAX)
1053 VIR_A_ALU2(UMIN)
1054 VIR_A_ALU2(UMAX)
1055 VIR_A_ALU2(AND)
1056 VIR_A_ALU2(OR)
1057 VIR_A_ALU2(XOR)
1058 VIR_A_ALU2(VADD)
1059 VIR_A_ALU2(VSUB)
1060 VIR_A_NODST_2(STVPMV)
1061 VIR_A_NODST_2(STVPMD)
1062 VIR_A_ALU1(NOT)
1063 VIR_A_ALU1(NEG)
1064 VIR_A_ALU1(FLAPUSH)
1065 VIR_A_ALU1(FLBPUSH)
1066 VIR_A_ALU1(FLPOP)
1067 VIR_A_ALU1(SETMSF)
1068 VIR_A_ALU1(SETREVF)
1069 VIR_A_ALU0(TIDX)
1070 VIR_A_ALU0(EIDX)
1071 VIR_A_ALU1(LDVPMV_IN)
1072 VIR_A_ALU1(LDVPMV_OUT)
1073 VIR_A_ALU1(LDVPMD_IN)
1074 VIR_A_ALU1(LDVPMD_OUT)
1075 VIR_A_ALU2(LDVPMG_IN)
1076 VIR_A_ALU2(LDVPMG_OUT)
1077 VIR_A_ALU0(TMUWT)
1078
1079 VIR_A_ALU0(IID)
1080 VIR_A_ALU0(FXCD)
1081 VIR_A_ALU0(XCD)
1082 VIR_A_ALU0(FYCD)
1083 VIR_A_ALU0(YCD)
1084 VIR_A_ALU0(MSF)
1085 VIR_A_ALU0(REVF)
1086 VIR_A_ALU0(BARRIERID)
1087 VIR_A_ALU0(SAMPID)
1088 VIR_A_NODST_1(VPMSETUP)
1089 VIR_A_NODST_0(VPMWT)
1090 VIR_A_ALU2(FCMP)
1091 VIR_A_ALU2(VFMAX)
1092
1093 VIR_A_ALU1(FROUND)
1094 VIR_A_ALU1(FTOIN)
1095 VIR_A_ALU1(FTRUNC)
1096 VIR_A_ALU1(FTOIZ)
1097 VIR_A_ALU1(FFLOOR)
1098 VIR_A_ALU1(FTOUZ)
1099 VIR_A_ALU1(FCEIL)
1100 VIR_A_ALU1(FTOC)
1101
1102 VIR_A_ALU1(FDX)
1103 VIR_A_ALU1(FDY)
1104
1105 VIR_A_ALU1(ITOF)
1106 VIR_A_ALU1(CLZ)
1107 VIR_A_ALU1(UTOF)
1108
1109 VIR_M_ALU2(UMUL24)
1110 VIR_M_ALU2(FMUL)
1111 VIR_M_ALU2(SMUL24)
1112 VIR_M_NODST_2(MULTOP)
1113
1114 VIR_M_ALU1(MOV)
1115 VIR_M_ALU1(FMOV)
1116
1117 VIR_SFU(RECIP)
1118 VIR_SFU(RSQRT)
1119 VIR_SFU(EXP)
1120 VIR_SFU(LOG)
1121 VIR_SFU(SIN)
1122 VIR_SFU(RSQRT2)
1123
1124 static inline struct qinst *
1125 vir_MOV_cond(struct v3d_compile *c, enum v3d_qpu_cond cond,
1126 struct qreg dest, struct qreg src)
1127 {
1128 struct qinst *mov = vir_MOV_dest(c, dest, src);
1129 vir_set_cond(mov, cond);
1130 return mov;
1131 }
1132
1133 static inline struct qreg
1134 vir_SEL(struct v3d_compile *c, enum v3d_qpu_cond cond,
1135 struct qreg src0, struct qreg src1)
1136 {
1137 struct qreg t = vir_get_temp(c);
1138 vir_MOV_dest(c, t, src1);
1139 vir_MOV_cond(c, cond, t, src0);
1140 return t;
1141 }
1142
1143 static inline struct qinst *
1144 vir_NOP(struct v3d_compile *c)
1145 {
1146 return vir_emit_nondef(c, vir_add_inst(V3D_QPU_A_NOP,
1147 c->undef, c->undef, c->undef));
1148 }
1149
1150 static inline struct qreg
1151 vir_LDTMU(struct v3d_compile *c)
1152 {
1153 if (c->devinfo->ver >= 41) {
1154 struct qinst *ldtmu = vir_add_inst(V3D_QPU_A_NOP, c->undef,
1155 c->undef, c->undef);
1156 ldtmu->qpu.sig.ldtmu = true;
1157
1158 return vir_emit_def(c, ldtmu);
1159 } else {
1160 vir_NOP(c)->qpu.sig.ldtmu = true;
1161 return vir_MOV(c, vir_reg(QFILE_MAGIC, V3D_QPU_WADDR_R4));
1162 }
1163 }
1164
1165 static inline struct qreg
1166 vir_UMUL(struct v3d_compile *c, struct qreg src0, struct qreg src1)
1167 {
1168 vir_MULTOP(c, src0, src1);
1169 return vir_UMUL24(c, src0, src1);
1170 }
1171
1172 static inline struct qreg
1173 vir_TLBU_COLOR_READ(struct v3d_compile *c, uint32_t config)
1174 {
1175 assert(c->devinfo->ver >= 41); /* XXX */
1176 assert((config & 0xffffff00) == 0xffffff00);
1177
1178 struct qinst *ldtlb = vir_add_inst(V3D_QPU_A_NOP, c->undef,
1179 c->undef, c->undef);
1180 ldtlb->qpu.sig.ldtlbu = true;
1181 ldtlb->uniform = vir_get_uniform_index(c, QUNIFORM_CONSTANT, config);
1182 return vir_emit_def(c, ldtlb);
1183 }
1184
1185 static inline struct qreg
1186 vir_TLB_COLOR_READ(struct v3d_compile *c)
1187 {
1188 assert(c->devinfo->ver >= 41); /* XXX */
1189
1190 struct qinst *ldtlb = vir_add_inst(V3D_QPU_A_NOP, c->undef,
1191 c->undef, c->undef);
1192 ldtlb->qpu.sig.ldtlb = true;
1193 return vir_emit_def(c, ldtlb);
1194 }
1195
1196 /*
1197 static inline struct qreg
1198 vir_LOAD_IMM(struct v3d_compile *c, uint32_t val)
1199 {
1200 return vir_emit_def(c, vir_inst(QOP_LOAD_IMM, c->undef,
1201 vir_reg(QFILE_LOAD_IMM, val), c->undef));
1202 }
1203
1204 static inline struct qreg
1205 vir_LOAD_IMM_U2(struct v3d_compile *c, uint32_t val)
1206 {
1207 return vir_emit_def(c, vir_inst(QOP_LOAD_IMM_U2, c->undef,
1208 vir_reg(QFILE_LOAD_IMM, val),
1209 c->undef));
1210 }
1211 static inline struct qreg
1212 vir_LOAD_IMM_I2(struct v3d_compile *c, uint32_t val)
1213 {
1214 return vir_emit_def(c, vir_inst(QOP_LOAD_IMM_I2, c->undef,
1215 vir_reg(QFILE_LOAD_IMM, val),
1216 c->undef));
1217 }
1218 */
1219
1220 static inline struct qinst *
1221 vir_BRANCH(struct v3d_compile *c, enum v3d_qpu_branch_cond cond)
1222 {
1223 /* The actual uniform_data value will be set at scheduling time */
1224 return vir_emit_nondef(c, vir_branch_inst(c, cond));
1225 }
1226
1227 #define vir_for_each_block(block, c) \
1228 list_for_each_entry(struct qblock, block, &c->blocks, link)
1229
1230 #define vir_for_each_block_rev(block, c) \
1231 list_for_each_entry_rev(struct qblock, block, &c->blocks, link)
1232
1233 /* Loop over the non-NULL members of the successors array. */
1234 #define vir_for_each_successor(succ, block) \
1235 for (struct qblock *succ = block->successors[0]; \
1236 succ != NULL; \
1237 succ = (succ == block->successors[1] ? NULL : \
1238 block->successors[1]))
1239
1240 #define vir_for_each_inst(inst, block) \
1241 list_for_each_entry(struct qinst, inst, &block->instructions, link)
1242
1243 #define vir_for_each_inst_rev(inst, block) \
1244 list_for_each_entry_rev(struct qinst, inst, &block->instructions, link)
1245
1246 #define vir_for_each_inst_safe(inst, block) \
1247 list_for_each_entry_safe(struct qinst, inst, &block->instructions, link)
1248
1249 #define vir_for_each_inst_inorder(inst, c) \
1250 vir_for_each_block(_block, c) \
1251 vir_for_each_inst(inst, _block)
1252
1253 #define vir_for_each_inst_inorder_safe(inst, c) \
1254 vir_for_each_block(_block, c) \
1255 vir_for_each_inst_safe(inst, _block)
1256
1257 #endif /* V3D_COMPILER_H */