1 /**************************************************************************
3 * Copyright 2008 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 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 * TGSI program transformation utility.
34 #include "util/u_debug.h"
36 #include "tgsi_transform.h"
41 emit_instruction(struct tgsi_transform_context
*ctx
,
42 const struct tgsi_full_instruction
*inst
)
46 ti
+= tgsi_build_full_instruction(inst
,
49 ctx
->max_tokens_out
- ti
);
55 emit_declaration(struct tgsi_transform_context
*ctx
,
56 const struct tgsi_full_declaration
*decl
)
60 ti
+= tgsi_build_full_declaration(decl
,
63 ctx
->max_tokens_out
- ti
);
69 emit_immediate(struct tgsi_transform_context
*ctx
,
70 const struct tgsi_full_immediate
*imm
)
74 ti
+= tgsi_build_full_immediate(imm
,
77 ctx
->max_tokens_out
- ti
);
83 emit_property(struct tgsi_transform_context
*ctx
,
84 const struct tgsi_full_property
*prop
)
88 ti
+= tgsi_build_full_property(prop
,
91 ctx
->max_tokens_out
- ti
);
97 * Apply user-defined transformations to the input shader to produce
99 * For example, a register search-and-replace operation could be applied
100 * by defining a transform_instruction() callback that examined and changed
101 * the instruction src/dest regs.
103 * \return number of tokens emitted
106 tgsi_transform_shader(const struct tgsi_token
*tokens_in
,
107 struct tgsi_token
*tokens_out
,
109 struct tgsi_transform_context
*ctx
)
112 boolean first_instruction
= TRUE
;
115 struct tgsi_parse_context parse
;
118 struct tgsi_processor
*processor
;
122 ** callback context init
124 ctx
->emit_instruction
= emit_instruction
;
125 ctx
->emit_declaration
= emit_declaration
;
126 ctx
->emit_immediate
= emit_immediate
;
127 ctx
->emit_property
= emit_property
;
128 ctx
->tokens_out
= tokens_out
;
129 ctx
->max_tokens_out
= max_tokens_out
;
133 ** Setup to begin parsing input shader
135 if (tgsi_parse_init( &parse
, tokens_in
) != TGSI_PARSE_OK
) {
136 debug_printf("tgsi_parse_init() failed in tgsi_transform_shader()!\n");
139 procType
= parse
.FullHeader
.Processor
.Processor
;
140 assert(procType
== PIPE_SHADER_FRAGMENT
||
141 procType
== PIPE_SHADER_VERTEX
||
142 procType
== PIPE_SHADER_GEOMETRY
);
146 ** Setup output shader
148 ctx
->header
= (struct tgsi_header
*)tokens_out
;
149 *ctx
->header
= tgsi_build_header();
151 processor
= (struct tgsi_processor
*) (tokens_out
+ 1);
152 *processor
= tgsi_build_processor( procType
, ctx
->header
);
158 ** Loop over incoming program tokens/instructions
160 while( !tgsi_parse_end_of_tokens( &parse
) ) {
162 tgsi_parse_token( &parse
);
164 switch( parse
.FullToken
.Token
.Type
) {
165 case TGSI_TOKEN_TYPE_INSTRUCTION
:
167 struct tgsi_full_instruction
*fullinst
168 = &parse
.FullToken
.FullInstruction
;
170 if (first_instruction
&& ctx
->prolog
) {
174 /* XXX Note: we may also want to look for a main/top-level
175 * TGSI_OPCODE_RET instruction in the future.
177 if (fullinst
->Instruction
.Opcode
== TGSI_OPCODE_END
179 /* Emit caller's epilog */
182 ctx
->emit_instruction(ctx
, fullinst
);
185 if (ctx
->transform_instruction
)
186 ctx
->transform_instruction(ctx
, fullinst
);
188 ctx
->emit_instruction(ctx
, fullinst
);
191 first_instruction
= FALSE
;
195 case TGSI_TOKEN_TYPE_DECLARATION
:
197 struct tgsi_full_declaration
*fulldecl
198 = &parse
.FullToken
.FullDeclaration
;
200 if (ctx
->transform_declaration
)
201 ctx
->transform_declaration(ctx
, fulldecl
);
203 ctx
->emit_declaration(ctx
, fulldecl
);
207 case TGSI_TOKEN_TYPE_IMMEDIATE
:
209 struct tgsi_full_immediate
*fullimm
210 = &parse
.FullToken
.FullImmediate
;
212 if (ctx
->transform_immediate
)
213 ctx
->transform_immediate(ctx
, fullimm
);
215 ctx
->emit_immediate(ctx
, fullimm
);
218 case TGSI_TOKEN_TYPE_PROPERTY
:
220 struct tgsi_full_property
*fullprop
221 = &parse
.FullToken
.FullProperty
;
223 if (ctx
->transform_property
)
224 ctx
->transform_property(ctx
, fullprop
);
226 ctx
->emit_property(ctx
, fullprop
);
235 tgsi_parse_free (&parse
);
241 #include "tgsi_text.h"
243 extern int tgsi_transform_foo( struct tgsi_token
*tokens_out
,
244 uint max_tokens_out
);
246 /* This function exists only so that tgsi_text_translate() doesn't get
247 * magic-ed out of the libtgsi.a archive by the build system. Don't
248 * remove unless you know this has been fixed - check on mingw/scons
252 tgsi_transform_foo( struct tgsi_token
*tokens_out
,
253 uint max_tokens_out
)
257 "DCL IN[0], COLOR, CONSTANT\n"
258 "DCL OUT[0], COLOR\n"
259 " 0: MOV OUT[0], IN[0]\n"
262 return tgsi_text_translate( text
,