1 /**************************************************************************
3 * Copyright 2009 VMware, Inc.
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the
8 * "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sub license, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
14 * The above copyright notice and this permission notice (including the
15 * next paragraph) shall be included in all copies or substantial portions
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
21 * IN NO EVENT SHALL VMWARE, INC AND/OR ITS SUPPLIERS BE LIABLE FOR
22 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
23 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
24 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
26 **************************************************************************/
29 #include "pipe/p_context.h"
30 #include "pipe/p_state.h"
31 #include "tgsi/tgsi_ureg.h"
32 #include "tgsi/tgsi_build.h"
33 #include "tgsi/tgsi_info.h"
34 #include "tgsi/tgsi_dump.h"
35 #include "tgsi/tgsi_sanity.h"
36 #include "util/u_memory.h"
37 #include "util/u_math.h"
39 union tgsi_any_token
{
40 struct tgsi_header header
;
41 struct tgsi_processor processor
;
42 struct tgsi_token token
;
43 struct tgsi_property prop
;
44 struct tgsi_property_data prop_data
;
45 struct tgsi_declaration decl
;
46 struct tgsi_declaration_range decl_range
;
47 struct tgsi_declaration_semantic decl_semantic
;
48 struct tgsi_immediate imm
;
49 union tgsi_immediate_data imm_data
;
50 struct tgsi_instruction insn
;
51 struct tgsi_instruction_predicate insn_predicate
;
52 struct tgsi_instruction_label insn_label
;
53 struct tgsi_instruction_texture insn_texture
;
54 struct tgsi_src_register src
;
55 struct tgsi_dimension dim
;
56 struct tgsi_dst_register dst
;
62 union tgsi_any_token
*tokens
;
68 #define UREG_MAX_INPUT PIPE_MAX_ATTRIBS
69 #define UREG_MAX_SYSTEM_VALUE PIPE_MAX_ATTRIBS
70 #define UREG_MAX_OUTPUT PIPE_MAX_ATTRIBS
71 #define UREG_MAX_CONSTANT_RANGE 32
72 #define UREG_MAX_IMMEDIATE 32
73 #define UREG_MAX_TEMP 256
74 #define UREG_MAX_ADDR 2
75 #define UREG_MAX_LOOP 1
76 #define UREG_MAX_PRED 1
84 struct pipe_context
*pipe
;
87 unsigned semantic_name
;
88 unsigned semantic_index
;
90 } fs_input
[UREG_MAX_INPUT
];
91 unsigned nr_fs_inputs
;
93 unsigned vs_inputs
[UREG_MAX_INPUT
/32];
97 } gs_input
[UREG_MAX_INPUT
];
98 unsigned nr_gs_inputs
;
102 unsigned semantic_name
;
103 unsigned semantic_index
;
104 } system_value
[UREG_MAX_SYSTEM_VALUE
];
105 unsigned nr_system_values
;
108 unsigned semantic_name
;
109 unsigned semantic_index
;
110 } output
[UREG_MAX_OUTPUT
];
121 } immediate
[UREG_MAX_IMMEDIATE
];
122 unsigned nr_immediates
;
124 struct ureg_src sampler
[PIPE_MAX_SAMPLERS
];
125 unsigned nr_samplers
;
127 unsigned temps_active
[UREG_MAX_TEMP
/ 32];
133 } constant_range
[UREG_MAX_CONSTANT_RANGE
];
134 unsigned nr_constant_ranges
;
136 unsigned property_gs_input_prim
;
141 unsigned nr_instructions
;
143 struct ureg_tokens domain
[2];
146 static union tgsi_any_token error_tokens
[32];
148 static void tokens_error( struct ureg_tokens
*tokens
)
150 if (tokens
->tokens
&& tokens
->tokens
!= error_tokens
)
151 FREE(tokens
->tokens
);
153 tokens
->tokens
= error_tokens
;
154 tokens
->size
= Elements(error_tokens
);
159 static void tokens_expand( struct ureg_tokens
*tokens
,
162 unsigned old_size
= tokens
->size
* sizeof(unsigned);
164 if (tokens
->tokens
== error_tokens
) {
168 while (tokens
->count
+ count
> tokens
->size
) {
169 tokens
->size
= (1 << ++tokens
->order
);
172 tokens
->tokens
= REALLOC(tokens
->tokens
,
174 tokens
->size
* sizeof(unsigned));
175 if (tokens
->tokens
== NULL
) {
176 tokens_error(tokens
);
180 static void set_bad( struct ureg_program
*ureg
)
182 tokens_error(&ureg
->domain
[0]);
187 static union tgsi_any_token
*get_tokens( struct ureg_program
*ureg
,
191 struct ureg_tokens
*tokens
= &ureg
->domain
[domain
];
192 union tgsi_any_token
*result
;
194 if (tokens
->count
+ count
> tokens
->size
)
195 tokens_expand(tokens
, count
);
197 result
= &tokens
->tokens
[tokens
->count
];
198 tokens
->count
+= count
;
203 static union tgsi_any_token
*retrieve_token( struct ureg_program
*ureg
,
207 if (ureg
->domain
[domain
].tokens
== error_tokens
)
208 return &error_tokens
[0];
210 return &ureg
->domain
[domain
].tokens
[nr
];
215 static INLINE
struct ureg_dst
216 ureg_dst_register( unsigned file
,
222 dst
.WriteMask
= TGSI_WRITEMASK_XYZW
;
224 dst
.IndirectIndex
= 0;
225 dst
.IndirectSwizzle
= 0;
229 dst
.PredSwizzleX
= TGSI_SWIZZLE_X
;
230 dst
.PredSwizzleY
= TGSI_SWIZZLE_Y
;
231 dst
.PredSwizzleZ
= TGSI_SWIZZLE_Z
;
232 dst
.PredSwizzleW
= TGSI_SWIZZLE_W
;
238 static INLINE
struct ureg_src
239 ureg_src_register( unsigned file
,
245 src
.SwizzleX
= TGSI_SWIZZLE_X
;
246 src
.SwizzleY
= TGSI_SWIZZLE_Y
;
247 src
.SwizzleZ
= TGSI_SWIZZLE_Z
;
248 src
.SwizzleW
= TGSI_SWIZZLE_W
;
250 src
.IndirectIndex
= 0;
251 src
.IndirectSwizzle
= 0;
256 src
.DimensionIndex
= 0;
264 ureg_property_gs_input_prim(struct ureg_program
*ureg
,
265 unsigned gs_input_prim
)
267 ureg
->property_gs_input_prim
= gs_input_prim
;
273 ureg_DECL_fs_input( struct ureg_program
*ureg
,
276 unsigned interp_mode
)
280 for (i
= 0; i
< ureg
->nr_fs_inputs
; i
++) {
281 if (ureg
->fs_input
[i
].semantic_name
== name
&&
282 ureg
->fs_input
[i
].semantic_index
== index
)
286 if (ureg
->nr_fs_inputs
< UREG_MAX_INPUT
) {
287 ureg
->fs_input
[i
].semantic_name
= name
;
288 ureg
->fs_input
[i
].semantic_index
= index
;
289 ureg
->fs_input
[i
].interp
= interp_mode
;
290 ureg
->nr_fs_inputs
++;
297 return ureg_src_register( TGSI_FILE_INPUT
, i
);
302 ureg_DECL_vs_input( struct ureg_program
*ureg
,
305 assert(ureg
->processor
== TGSI_PROCESSOR_VERTEX
);
307 ureg
->vs_inputs
[index
/32] |= 1 << (index
% 32);
308 return ureg_src_register( TGSI_FILE_INPUT
, index
);
313 ureg_DECL_gs_input(struct ureg_program
*ureg
,
316 if (ureg
->nr_gs_inputs
< UREG_MAX_INPUT
) {
317 ureg
->gs_input
[ureg
->nr_gs_inputs
].index
= index
;
318 ureg
->nr_gs_inputs
++;
323 /* XXX: Add suport for true 2D input registers. */
324 return ureg_src_register(TGSI_FILE_INPUT
, index
);
329 ureg_DECL_system_value(struct ureg_program
*ureg
,
331 unsigned semantic_name
,
332 unsigned semantic_index
)
334 if (ureg
->nr_system_values
< UREG_MAX_SYSTEM_VALUE
) {
335 ureg
->system_value
[ureg
->nr_system_values
].index
= index
;
336 ureg
->system_value
[ureg
->nr_system_values
].semantic_name
= semantic_name
;
337 ureg
->system_value
[ureg
->nr_system_values
].semantic_index
= semantic_index
;
338 ureg
->nr_system_values
++;
343 return ureg_src_register(TGSI_FILE_SYSTEM_VALUE
, index
);
348 ureg_DECL_output( struct ureg_program
*ureg
,
354 for (i
= 0; i
< ureg
->nr_outputs
; i
++) {
355 if (ureg
->output
[i
].semantic_name
== name
&&
356 ureg
->output
[i
].semantic_index
== index
)
360 if (ureg
->nr_outputs
< UREG_MAX_OUTPUT
) {
361 ureg
->output
[i
].semantic_name
= name
;
362 ureg
->output
[i
].semantic_index
= index
;
370 return ureg_dst_register( TGSI_FILE_OUTPUT
, i
);
374 /* Returns a new constant register. Keep track of which have been
375 * referred to so that we can emit decls later.
377 * There is nothing in this code to bind this constant to any tracked
378 * value or manage any constant_buffer contents -- that's the
379 * resposibility of the calling code.
381 struct ureg_src
ureg_DECL_constant(struct ureg_program
*ureg
,
384 unsigned minconst
= index
, maxconst
= index
;
387 /* Inside existing range?
389 for (i
= 0; i
< ureg
->nr_constant_ranges
; i
++) {
390 if (ureg
->constant_range
[i
].first
<= index
&&
391 ureg
->constant_range
[i
].last
>= index
)
395 /* Extend existing range?
397 for (i
= 0; i
< ureg
->nr_constant_ranges
; i
++) {
398 if (ureg
->constant_range
[i
].last
== index
- 1) {
399 ureg
->constant_range
[i
].last
= index
;
403 if (ureg
->constant_range
[i
].first
== index
+ 1) {
404 ureg
->constant_range
[i
].first
= index
;
408 minconst
= MIN2(minconst
, ureg
->constant_range
[i
].first
);
409 maxconst
= MAX2(maxconst
, ureg
->constant_range
[i
].last
);
414 if (ureg
->nr_constant_ranges
< UREG_MAX_CONSTANT_RANGE
) {
415 i
= ureg
->nr_constant_ranges
++;
416 ureg
->constant_range
[i
].first
= index
;
417 ureg
->constant_range
[i
].last
= index
;
421 /* Collapse all ranges down to one:
424 ureg
->constant_range
[0].first
= minconst
;
425 ureg
->constant_range
[0].last
= maxconst
;
426 ureg
->nr_constant_ranges
= 1;
429 assert(i
< ureg
->nr_constant_ranges
);
430 assert(ureg
->constant_range
[i
].first
<= index
);
431 assert(ureg
->constant_range
[i
].last
>= index
);
432 return ureg_src_register( TGSI_FILE_CONSTANT
, index
);
436 /* Allocate a new temporary. Temporaries greater than UREG_MAX_TEMP
437 * are legal, but will not be released.
439 struct ureg_dst
ureg_DECL_temporary( struct ureg_program
*ureg
)
443 for (i
= 0; i
< UREG_MAX_TEMP
; i
+= 32) {
444 int bit
= ffs(~ureg
->temps_active
[i
/32]);
451 /* No reusable temps, so allocate a new one:
453 i
= ureg
->nr_temps
++;
456 if (i
< UREG_MAX_TEMP
)
457 ureg
->temps_active
[i
/32] |= 1 << (i
% 32);
459 if (i
>= ureg
->nr_temps
)
460 ureg
->nr_temps
= i
+ 1;
462 return ureg_dst_register( TGSI_FILE_TEMPORARY
, i
);
466 void ureg_release_temporary( struct ureg_program
*ureg
,
467 struct ureg_dst tmp
)
469 if(tmp
.File
== TGSI_FILE_TEMPORARY
)
470 if (tmp
.Index
< UREG_MAX_TEMP
)
471 ureg
->temps_active
[tmp
.Index
/32] &= ~(1 << (tmp
.Index
% 32));
475 /* Allocate a new address register.
477 struct ureg_dst
ureg_DECL_address( struct ureg_program
*ureg
)
479 if (ureg
->nr_addrs
< UREG_MAX_ADDR
)
480 return ureg_dst_register( TGSI_FILE_ADDRESS
, ureg
->nr_addrs
++ );
483 return ureg_dst_register( TGSI_FILE_ADDRESS
, 0 );
486 /* Allocate a new loop register.
489 ureg_DECL_loop(struct ureg_program
*ureg
)
491 if (ureg
->nr_loops
< UREG_MAX_LOOP
) {
492 return ureg_dst_register(TGSI_FILE_LOOP
, ureg
->nr_loops
++);
496 return ureg_dst_register(TGSI_FILE_LOOP
, 0);
499 /* Allocate a new predicate register.
502 ureg_DECL_predicate(struct ureg_program
*ureg
)
504 if (ureg
->nr_preds
< UREG_MAX_PRED
) {
505 return ureg_dst_register(TGSI_FILE_PREDICATE
, ureg
->nr_preds
++);
509 return ureg_dst_register(TGSI_FILE_PREDICATE
, 0);
512 /* Allocate a new sampler.
514 struct ureg_src
ureg_DECL_sampler( struct ureg_program
*ureg
,
519 for (i
= 0; i
< ureg
->nr_samplers
; i
++)
520 if (ureg
->sampler
[i
].Index
== nr
)
521 return ureg
->sampler
[i
];
523 if (i
< PIPE_MAX_SAMPLERS
) {
524 ureg
->sampler
[i
] = ureg_src_register( TGSI_FILE_SAMPLER
, nr
);
526 return ureg
->sampler
[i
];
530 return ureg
->sampler
[0];
535 match_or_expand_immediate( const unsigned *v
,
541 unsigned nr2
= *pnr2
;
546 for (i
= 0; i
< nr
; i
++) {
547 boolean found
= FALSE
;
549 for (j
= 0; j
< nr2
&& !found
; j
++) {
551 *swizzle
|= j
<< (i
* 2);
562 *swizzle
|= nr2
<< (i
* 2);
567 /* Actually expand immediate only when fully succeeded.
574 static struct ureg_src
575 decl_immediate( struct ureg_program
*ureg
,
583 /* Could do a first pass where we examine all existing immediates
587 for (i
= 0; i
< ureg
->nr_immediates
; i
++) {
588 if (ureg
->immediate
[i
].type
!= type
) {
591 if (match_or_expand_immediate(v
,
593 ureg
->immediate
[i
].value
.u
,
594 &ureg
->immediate
[i
].nr
,
600 if (ureg
->nr_immediates
< UREG_MAX_IMMEDIATE
) {
601 i
= ureg
->nr_immediates
++;
602 ureg
->immediate
[i
].type
= type
;
603 if (match_or_expand_immediate(v
,
605 ureg
->immediate
[i
].value
.u
,
606 &ureg
->immediate
[i
].nr
,
615 /* Make sure that all referenced elements are from this immediate.
616 * Has the effect of making size-one immediates into scalars.
618 for (j
= nr
; j
< 4; j
++) {
619 swizzle
|= (swizzle
& 0x3) << (j
* 2);
622 return ureg_swizzle(ureg_src_register(TGSI_FILE_IMMEDIATE
, i
),
623 (swizzle
>> 0) & 0x3,
624 (swizzle
>> 2) & 0x3,
625 (swizzle
>> 4) & 0x3,
626 (swizzle
>> 6) & 0x3);
631 ureg_DECL_immediate( struct ureg_program
*ureg
,
641 for (i
= 0; i
< nr
; i
++) {
645 return decl_immediate(ureg
, fu
.u
, nr
, TGSI_IMM_FLOAT32
);
650 ureg_DECL_immediate_uint( struct ureg_program
*ureg
,
654 return decl_immediate(ureg
, v
, nr
, TGSI_IMM_UINT32
);
659 ureg_DECL_immediate_int( struct ureg_program
*ureg
,
663 return decl_immediate(ureg
, (const unsigned *)v
, nr
, TGSI_IMM_INT32
);
668 ureg_emit_src( struct ureg_program
*ureg
,
669 struct ureg_src src
)
671 unsigned size
= 1 + (src
.Indirect
? 1 : 0) + (src
.Dimension
? 1 : 0);
673 union tgsi_any_token
*out
= get_tokens( ureg
, DOMAIN_INSN
, size
);
676 assert(src
.File
!= TGSI_FILE_NULL
);
677 assert(src
.File
!= TGSI_FILE_OUTPUT
);
678 assert(src
.File
< TGSI_FILE_COUNT
);
681 out
[n
].src
.File
= src
.File
;
682 out
[n
].src
.SwizzleX
= src
.SwizzleX
;
683 out
[n
].src
.SwizzleY
= src
.SwizzleY
;
684 out
[n
].src
.SwizzleZ
= src
.SwizzleZ
;
685 out
[n
].src
.SwizzleW
= src
.SwizzleW
;
686 out
[n
].src
.Index
= src
.Index
;
687 out
[n
].src
.Negate
= src
.Negate
;
688 out
[0].src
.Absolute
= src
.Absolute
;
692 out
[0].src
.Indirect
= 1;
694 out
[n
].src
.File
= TGSI_FILE_ADDRESS
;
695 out
[n
].src
.SwizzleX
= src
.IndirectSwizzle
;
696 out
[n
].src
.SwizzleY
= src
.IndirectSwizzle
;
697 out
[n
].src
.SwizzleZ
= src
.IndirectSwizzle
;
698 out
[n
].src
.SwizzleW
= src
.IndirectSwizzle
;
699 out
[n
].src
.Index
= src
.IndirectIndex
;
704 out
[0].src
.Dimension
= 1;
705 out
[n
].dim
.Indirect
= 0;
706 out
[n
].dim
.Dimension
= 0;
707 out
[n
].dim
.Padding
= 0;
708 out
[n
].dim
.Index
= src
.DimensionIndex
;
717 ureg_emit_dst( struct ureg_program
*ureg
,
718 struct ureg_dst dst
)
721 (dst
.Indirect
? 1 : 0));
723 union tgsi_any_token
*out
= get_tokens( ureg
, DOMAIN_INSN
, size
);
726 assert(dst
.File
!= TGSI_FILE_NULL
);
727 assert(dst
.File
!= TGSI_FILE_CONSTANT
);
728 assert(dst
.File
!= TGSI_FILE_INPUT
);
729 assert(dst
.File
!= TGSI_FILE_SAMPLER
);
730 assert(dst
.File
!= TGSI_FILE_IMMEDIATE
);
731 assert(dst
.File
< TGSI_FILE_COUNT
);
734 out
[n
].dst
.File
= dst
.File
;
735 out
[n
].dst
.WriteMask
= dst
.WriteMask
;
736 out
[n
].dst
.Indirect
= dst
.Indirect
;
737 out
[n
].dst
.Index
= dst
.Index
;
742 out
[n
].src
.File
= TGSI_FILE_ADDRESS
;
743 out
[n
].src
.SwizzleX
= dst
.IndirectSwizzle
;
744 out
[n
].src
.SwizzleY
= dst
.IndirectSwizzle
;
745 out
[n
].src
.SwizzleZ
= dst
.IndirectSwizzle
;
746 out
[n
].src
.SwizzleW
= dst
.IndirectSwizzle
;
747 out
[n
].src
.Index
= dst
.IndirectIndex
;
755 static void validate( unsigned opcode
,
760 const struct tgsi_opcode_info
*info
= tgsi_get_opcode_info( opcode
);
763 assert(nr_dst
== info
->num_dst
);
764 assert(nr_src
== info
->num_src
);
769 struct ureg_emit_insn_result
770 ureg_emit_insn(struct ureg_program
*ureg
,
775 unsigned pred_swizzle_x
,
776 unsigned pred_swizzle_y
,
777 unsigned pred_swizzle_z
,
778 unsigned pred_swizzle_w
,
782 union tgsi_any_token
*out
;
783 uint count
= predicate
? 2 : 1;
784 struct ureg_emit_insn_result result
;
786 validate( opcode
, num_dst
, num_src
);
788 out
= get_tokens( ureg
, DOMAIN_INSN
, count
);
789 out
[0].insn
= tgsi_default_instruction();
790 out
[0].insn
.Opcode
= opcode
;
791 out
[0].insn
.Saturate
= saturate
;
792 out
[0].insn
.NumDstRegs
= num_dst
;
793 out
[0].insn
.NumSrcRegs
= num_src
;
795 result
.insn_token
= ureg
->domain
[DOMAIN_INSN
].count
- count
;
796 result
.extended_token
= result
.insn_token
;
799 out
[0].insn
.Predicate
= 1;
800 out
[1].insn_predicate
= tgsi_default_instruction_predicate();
801 out
[1].insn_predicate
.Negate
= pred_negate
;
802 out
[1].insn_predicate
.SwizzleX
= pred_swizzle_x
;
803 out
[1].insn_predicate
.SwizzleY
= pred_swizzle_y
;
804 out
[1].insn_predicate
.SwizzleZ
= pred_swizzle_z
;
805 out
[1].insn_predicate
.SwizzleW
= pred_swizzle_w
;
808 ureg
->nr_instructions
++;
815 ureg_emit_label(struct ureg_program
*ureg
,
816 unsigned extended_token
,
817 unsigned *label_token
)
819 union tgsi_any_token
*out
, *insn
;
824 out
= get_tokens( ureg
, DOMAIN_INSN
, 1 );
827 insn
= retrieve_token( ureg
, DOMAIN_INSN
, extended_token
);
828 insn
->insn
.Label
= 1;
830 *label_token
= ureg
->domain
[DOMAIN_INSN
].count
- 1;
833 /* Will return a number which can be used in a label to point to the
834 * next instruction to be emitted.
837 ureg_get_instruction_number( struct ureg_program
*ureg
)
839 return ureg
->nr_instructions
;
842 /* Patch a given label (expressed as a token number) to point to a
843 * given instruction (expressed as an instruction number).
846 ureg_fixup_label(struct ureg_program
*ureg
,
847 unsigned label_token
,
848 unsigned instruction_number
)
850 union tgsi_any_token
*out
= retrieve_token( ureg
, DOMAIN_INSN
, label_token
);
852 out
->insn_label
.Label
= instruction_number
;
857 ureg_emit_texture(struct ureg_program
*ureg
,
858 unsigned extended_token
,
861 union tgsi_any_token
*out
, *insn
;
863 out
= get_tokens( ureg
, DOMAIN_INSN
, 1 );
864 insn
= retrieve_token( ureg
, DOMAIN_INSN
, extended_token
);
866 insn
->insn
.Texture
= 1;
869 out
[0].insn_texture
.Texture
= target
;
874 ureg_fixup_insn_size(struct ureg_program
*ureg
,
877 union tgsi_any_token
*out
= retrieve_token( ureg
, DOMAIN_INSN
, insn
);
879 assert(out
->insn
.Type
== TGSI_TOKEN_TYPE_INSTRUCTION
);
880 out
->insn
.NrTokens
= ureg
->domain
[DOMAIN_INSN
].count
- insn
- 1;
885 ureg_insn(struct ureg_program
*ureg
,
887 const struct ureg_dst
*dst
,
889 const struct ureg_src
*src
,
892 struct ureg_emit_insn_result insn
;
896 boolean negate
= FALSE
;
897 unsigned swizzle
[4] = { 0 };
899 saturate
= nr_dst
? dst
[0].Saturate
: FALSE
;
900 predicate
= nr_dst
? dst
[0].Predicate
: FALSE
;
902 negate
= dst
[0].PredNegate
;
903 swizzle
[0] = dst
[0].PredSwizzleX
;
904 swizzle
[1] = dst
[0].PredSwizzleY
;
905 swizzle
[2] = dst
[0].PredSwizzleZ
;
906 swizzle
[3] = dst
[0].PredSwizzleW
;
909 insn
= ureg_emit_insn(ureg
,
921 for (i
= 0; i
< nr_dst
; i
++)
922 ureg_emit_dst( ureg
, dst
[i
] );
924 for (i
= 0; i
< nr_src
; i
++)
925 ureg_emit_src( ureg
, src
[i
] );
927 ureg_fixup_insn_size( ureg
, insn
.insn_token
);
931 ureg_tex_insn(struct ureg_program
*ureg
,
933 const struct ureg_dst
*dst
,
936 const struct ureg_src
*src
,
939 struct ureg_emit_insn_result insn
;
943 boolean negate
= FALSE
;
944 unsigned swizzle
[4] = { 0 };
946 saturate
= nr_dst
? dst
[0].Saturate
: FALSE
;
947 predicate
= nr_dst
? dst
[0].Predicate
: FALSE
;
949 negate
= dst
[0].PredNegate
;
950 swizzle
[0] = dst
[0].PredSwizzleX
;
951 swizzle
[1] = dst
[0].PredSwizzleY
;
952 swizzle
[2] = dst
[0].PredSwizzleZ
;
953 swizzle
[3] = dst
[0].PredSwizzleW
;
956 insn
= ureg_emit_insn(ureg
,
968 ureg_emit_texture( ureg
, insn
.extended_token
, target
);
970 for (i
= 0; i
< nr_dst
; i
++)
971 ureg_emit_dst( ureg
, dst
[i
] );
973 for (i
= 0; i
< nr_src
; i
++)
974 ureg_emit_src( ureg
, src
[i
] );
976 ureg_fixup_insn_size( ureg
, insn
.insn_token
);
981 ureg_label_insn(struct ureg_program
*ureg
,
983 const struct ureg_src
*src
,
985 unsigned *label_token
)
987 struct ureg_emit_insn_result insn
;
990 insn
= ureg_emit_insn(ureg
,
1002 ureg_emit_label( ureg
, insn
.extended_token
, label_token
);
1004 for (i
= 0; i
< nr_src
; i
++)
1005 ureg_emit_src( ureg
, src
[i
] );
1007 ureg_fixup_insn_size( ureg
, insn
.insn_token
);
1012 static void emit_decl( struct ureg_program
*ureg
,
1015 unsigned semantic_name
,
1016 unsigned semantic_index
,
1019 union tgsi_any_token
*out
= get_tokens( ureg
, DOMAIN_DECL
, 3 );
1022 out
[0].decl
.Type
= TGSI_TOKEN_TYPE_DECLARATION
;
1023 out
[0].decl
.NrTokens
= 3;
1024 out
[0].decl
.File
= file
;
1025 out
[0].decl
.UsageMask
= TGSI_WRITEMASK_XYZW
; /* FIXME! */
1026 out
[0].decl
.Interpolate
= interp
;
1027 out
[0].decl
.Semantic
= 1;
1030 out
[1].decl_range
.First
=
1031 out
[1].decl_range
.Last
= index
;
1034 out
[2].decl_semantic
.Name
= semantic_name
;
1035 out
[2].decl_semantic
.Index
= semantic_index
;
1040 static void emit_decl_range( struct ureg_program
*ureg
,
1045 union tgsi_any_token
*out
= get_tokens( ureg
, DOMAIN_DECL
, 2 );
1048 out
[0].decl
.Type
= TGSI_TOKEN_TYPE_DECLARATION
;
1049 out
[0].decl
.NrTokens
= 2;
1050 out
[0].decl
.File
= file
;
1051 out
[0].decl
.UsageMask
= 0xf;
1052 out
[0].decl
.Interpolate
= TGSI_INTERPOLATE_CONSTANT
;
1053 out
[0].decl
.Semantic
= 0;
1056 out
[1].decl_range
.First
= first
;
1057 out
[1].decl_range
.Last
= first
+ count
- 1;
1061 emit_immediate( struct ureg_program
*ureg
,
1065 union tgsi_any_token
*out
= get_tokens( ureg
, DOMAIN_DECL
, 5 );
1068 out
[0].imm
.Type
= TGSI_TOKEN_TYPE_IMMEDIATE
;
1069 out
[0].imm
.NrTokens
= 5;
1070 out
[0].imm
.DataType
= type
;
1071 out
[0].imm
.Padding
= 0;
1073 out
[1].imm_data
.Uint
= v
[0];
1074 out
[2].imm_data
.Uint
= v
[1];
1075 out
[3].imm_data
.Uint
= v
[2];
1076 out
[4].imm_data
.Uint
= v
[3];
1080 emit_property(struct ureg_program
*ureg
,
1084 union tgsi_any_token
*out
= get_tokens(ureg
, DOMAIN_DECL
, 2);
1087 out
[0].prop
.Type
= TGSI_TOKEN_TYPE_PROPERTY
;
1088 out
[0].prop
.NrTokens
= 2;
1089 out
[0].prop
.PropertyName
= name
;
1091 out
[1].prop_data
.Data
= data
;
1095 static void emit_decls( struct ureg_program
*ureg
)
1099 if (ureg
->property_gs_input_prim
!= ~0) {
1100 assert(ureg
->processor
== TGSI_PROCESSOR_GEOMETRY
);
1103 TGSI_PROPERTY_GS_INPUT_PRIM
,
1104 ureg
->property_gs_input_prim
);
1107 if (ureg
->processor
== TGSI_PROCESSOR_VERTEX
) {
1108 for (i
= 0; i
< UREG_MAX_INPUT
; i
++) {
1109 if (ureg
->vs_inputs
[i
/32] & (1 << (i
%32))) {
1110 emit_decl_range( ureg
, TGSI_FILE_INPUT
, i
, 1 );
1113 } else if (ureg
->processor
== TGSI_PROCESSOR_FRAGMENT
) {
1114 for (i
= 0; i
< ureg
->nr_fs_inputs
; i
++) {
1118 ureg
->fs_input
[i
].semantic_name
,
1119 ureg
->fs_input
[i
].semantic_index
,
1120 ureg
->fs_input
[i
].interp
);
1123 for (i
= 0; i
< ureg
->nr_gs_inputs
; i
++) {
1124 emit_decl_range(ureg
,
1126 ureg
->gs_input
[i
].index
,
1131 for (i
= 0; i
< ureg
->nr_system_values
; i
++) {
1133 TGSI_FILE_SYSTEM_VALUE
,
1134 ureg
->system_value
[i
].index
,
1135 ureg
->system_value
[i
].semantic_name
,
1136 ureg
->system_value
[i
].semantic_index
,
1137 TGSI_INTERPOLATE_CONSTANT
);
1140 for (i
= 0; i
< ureg
->nr_outputs
; i
++) {
1144 ureg
->output
[i
].semantic_name
,
1145 ureg
->output
[i
].semantic_index
,
1146 TGSI_INTERPOLATE_CONSTANT
);
1149 for (i
= 0; i
< ureg
->nr_samplers
; i
++) {
1150 emit_decl_range( ureg
,
1152 ureg
->sampler
[i
].Index
, 1 );
1155 if (ureg
->nr_constant_ranges
) {
1156 for (i
= 0; i
< ureg
->nr_constant_ranges
; i
++)
1157 emit_decl_range( ureg
,
1159 ureg
->constant_range
[i
].first
,
1160 (ureg
->constant_range
[i
].last
+ 1 -
1161 ureg
->constant_range
[i
].first
) );
1164 if (ureg
->nr_temps
) {
1165 emit_decl_range( ureg
,
1166 TGSI_FILE_TEMPORARY
,
1167 0, ureg
->nr_temps
);
1170 if (ureg
->nr_addrs
) {
1171 emit_decl_range( ureg
,
1173 0, ureg
->nr_addrs
);
1176 if (ureg
->nr_loops
) {
1177 emit_decl_range(ureg
,
1183 if (ureg
->nr_preds
) {
1184 emit_decl_range(ureg
,
1185 TGSI_FILE_PREDICATE
,
1190 for (i
= 0; i
< ureg
->nr_immediates
; i
++) {
1191 emit_immediate( ureg
,
1192 ureg
->immediate
[i
].value
.u
,
1193 ureg
->immediate
[i
].type
);
1197 /* Append the instruction tokens onto the declarations to build a
1198 * contiguous stream suitable to send to the driver.
1200 static void copy_instructions( struct ureg_program
*ureg
)
1202 unsigned nr_tokens
= ureg
->domain
[DOMAIN_INSN
].count
;
1203 union tgsi_any_token
*out
= get_tokens( ureg
,
1208 ureg
->domain
[DOMAIN_INSN
].tokens
,
1209 nr_tokens
* sizeof out
[0] );
1214 fixup_header_size(struct ureg_program
*ureg
)
1216 union tgsi_any_token
*out
= retrieve_token( ureg
, DOMAIN_DECL
, 0 );
1218 out
->header
.BodySize
= ureg
->domain
[DOMAIN_DECL
].count
- 2;
1223 emit_header( struct ureg_program
*ureg
)
1225 union tgsi_any_token
*out
= get_tokens( ureg
, DOMAIN_DECL
, 2 );
1227 out
[0].header
.HeaderSize
= 2;
1228 out
[0].header
.BodySize
= 0;
1230 out
[1].processor
.Processor
= ureg
->processor
;
1231 out
[1].processor
.Padding
= 0;
1235 const struct tgsi_token
*ureg_finalize( struct ureg_program
*ureg
)
1237 const struct tgsi_token
*tokens
;
1239 emit_header( ureg
);
1241 copy_instructions( ureg
);
1242 fixup_header_size( ureg
);
1244 if (ureg
->domain
[0].tokens
== error_tokens
||
1245 ureg
->domain
[1].tokens
== error_tokens
) {
1246 debug_printf("%s: error in generated shader\n", __FUNCTION__
);
1251 tokens
= &ureg
->domain
[DOMAIN_DECL
].tokens
[0].token
;
1254 debug_printf("%s: emitted shader %d tokens:\n", __FUNCTION__
,
1255 ureg
->domain
[DOMAIN_DECL
].count
);
1256 tgsi_dump( tokens
, 0 );
1260 if (tokens
&& !tgsi_sanity_check(tokens
)) {
1261 debug_printf("tgsi_ureg.c, sanity check failed on generated tokens:\n");
1262 tgsi_dump(tokens
, 0);
1272 void *ureg_create_shader( struct ureg_program
*ureg
,
1273 struct pipe_context
*pipe
)
1275 struct pipe_shader_state state
;
1277 state
.tokens
= ureg_finalize(ureg
);
1281 if (ureg
->processor
== TGSI_PROCESSOR_VERTEX
)
1282 return pipe
->create_vs_state( pipe
, &state
);
1284 return pipe
->create_fs_state( pipe
, &state
);
1288 const struct tgsi_token
*ureg_get_tokens( struct ureg_program
*ureg
,
1289 unsigned *nr_tokens
)
1291 const struct tgsi_token
*tokens
;
1293 ureg_finalize(ureg
);
1295 tokens
= &ureg
->domain
[DOMAIN_DECL
].tokens
[0].token
;
1298 *nr_tokens
= ureg
->domain
[DOMAIN_DECL
].size
;
1300 ureg
->domain
[DOMAIN_DECL
].tokens
= 0;
1301 ureg
->domain
[DOMAIN_DECL
].size
= 0;
1302 ureg
->domain
[DOMAIN_DECL
].order
= 0;
1303 ureg
->domain
[DOMAIN_DECL
].count
= 0;
1309 struct ureg_program
*ureg_create( unsigned processor
)
1311 struct ureg_program
*ureg
= CALLOC_STRUCT( ureg_program
);
1315 ureg
->processor
= processor
;
1316 ureg
->property_gs_input_prim
= ~0;
1321 void ureg_destroy( struct ureg_program
*ureg
)
1325 for (i
= 0; i
< Elements(ureg
->domain
); i
++) {
1326 if (ureg
->domain
[i
].tokens
&&
1327 ureg
->domain
[i
].tokens
!= error_tokens
)
1328 FREE(ureg
->domain
[i
].tokens
);