1 /**************************************************************************
3 * Copyright 2003 Tungsten Graphics, Inc., Cedar Park, Texas.
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 TUNGSTEN GRAPHICS 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 "i915_context.h"
33 static const char *opcodes
[0x20] = {
69 static const int args
[0x20] = {
105 static const char *regname
[0x8] = {
116 static void print_reg_type_nr( GLuint type
, GLuint nr
)
121 case T_DIFFUSE
: fprintf(stderr
, "T_DIFFUSE"); return;
122 case T_SPECULAR
: fprintf(stderr
, "T_SPECULAR"); return;
123 case T_FOG_W
: fprintf(stderr
, "T_FOG_W"); return;
124 default: fprintf(stderr
, "T_TEX%d", nr
); return;
128 fprintf(stderr
, "oC");
134 fprintf(stderr
, "oD");
142 fprintf(stderr
, "%s[%d]", regname
[type
], nr
);
145 #define REG_SWIZZLE_MASK 0x7777
146 #define REG_NEGATE_MASK 0x8888
148 #define REG_SWIZZLE_XYZW ((SRC_X << A2_SRC2_CHANNEL_X_SHIFT) | \
149 (SRC_Y << A2_SRC2_CHANNEL_Y_SHIFT) | \
150 (SRC_Z << A2_SRC2_CHANNEL_Z_SHIFT) | \
151 (SRC_W << A2_SRC2_CHANNEL_W_SHIFT))
154 static void print_reg_neg_swizzle( GLuint reg
)
158 if ((reg
& REG_SWIZZLE_MASK
) == REG_SWIZZLE_XYZW
&&
159 (reg
& REG_NEGATE_MASK
) == 0)
162 fprintf(stderr
, ".");
164 for (i
= 3 ; i
>= 0; i
--) {
165 if (reg
& (1<<((i
*4)+3)))
166 fprintf(stderr
, "-");
168 switch ((reg
>>(i
*4)) & 0x7) {
169 case 0: fprintf(stderr
, "x"); break;
170 case 1: fprintf(stderr
, "y"); break;
171 case 2: fprintf(stderr
, "z"); break;
172 case 3: fprintf(stderr
, "w"); break;
173 case 4: fprintf(stderr
, "0"); break;
174 case 5: fprintf(stderr
, "1"); break;
175 default: fprintf(stderr
, "?"); break;
181 static void print_src_reg( GLuint dword
)
183 GLuint nr
= (dword
>> A2_SRC2_NR_SHIFT
) & REG_NR_MASK
;
184 GLuint type
= (dword
>> A2_SRC2_TYPE_SHIFT
) & REG_TYPE_MASK
;
185 print_reg_type_nr( type
, nr
);
186 print_reg_neg_swizzle( dword
);
189 void i915_print_ureg( const char *msg
, GLuint ureg
)
191 fprintf(stderr
, "%s: ", msg
);
192 print_src_reg( ureg
>> 8 );
193 fprintf(stderr
, "\n");
196 static void print_dest_reg( GLuint dword
)
198 GLuint nr
= (dword
>> A0_DEST_NR_SHIFT
) & REG_NR_MASK
;
199 GLuint type
= (dword
>> A0_DEST_TYPE_SHIFT
) & REG_TYPE_MASK
;
200 print_reg_type_nr( type
, nr
);
201 if ((dword
& A0_DEST_CHANNEL_ALL
) == A0_DEST_CHANNEL_ALL
)
203 fprintf(stderr
, ".");
204 if (dword
& A0_DEST_CHANNEL_X
) fprintf(stderr
, "x");
205 if (dword
& A0_DEST_CHANNEL_Y
) fprintf(stderr
, "y");
206 if (dword
& A0_DEST_CHANNEL_Z
) fprintf(stderr
, "z");
207 if (dword
& A0_DEST_CHANNEL_W
) fprintf(stderr
, "w");
211 #define GET_SRC0_REG(r0, r1) ((r0<<14)|(r1>>A1_SRC0_CHANNEL_W_SHIFT))
212 #define GET_SRC1_REG(r0, r1) ((r0<<8)|(r1>>A2_SRC1_CHANNEL_W_SHIFT))
213 #define GET_SRC2_REG(r) (r)
216 static void print_arith_op( GLuint opcode
, const GLuint
*program
)
218 if (opcode
!= A0_NOP
) {
219 print_dest_reg(program
[0]);
220 if (program
[0] & A0_DEST_SATURATE
)
221 fprintf(stderr
, " = SATURATE ");
223 fprintf(stderr
, " = ");
226 fprintf(stderr
, "%s ", opcodes
[opcode
]);
228 print_src_reg(GET_SRC0_REG(program
[0], program
[1]));
229 if (args
[opcode
] == 1) {
230 fprintf(stderr
, "\n");
234 fprintf(stderr
, ", ");
235 print_src_reg(GET_SRC1_REG(program
[1], program
[2]));
236 if (args
[opcode
] == 2) {
237 fprintf(stderr
, "\n");
241 fprintf(stderr
, ", ");
242 print_src_reg(GET_SRC2_REG(program
[2]));
243 fprintf(stderr
, "\n");
248 static void print_tex_op( GLuint opcode
, const GLuint
*program
)
250 print_dest_reg(program
[0] | A0_DEST_CHANNEL_ALL
);
251 fprintf(stderr
, " = ");
253 fprintf(stderr
, "%s ", opcodes
[opcode
]);
255 fprintf(stderr
, "S[%d],",
256 program
[0] & T0_SAMPLER_NR_MASK
);
258 print_reg_type_nr( (program
[1]>>T1_ADDRESS_REG_TYPE_SHIFT
) & REG_TYPE_MASK
,
259 (program
[1]>>T1_ADDRESS_REG_NR_SHIFT
) & REG_NR_MASK
);
260 fprintf(stderr
, "\n");
263 static void print_dcl_op( GLuint opcode
, const GLuint
*program
)
265 fprintf(stderr
, "%s ", opcodes
[opcode
]);
266 print_dest_reg(program
[0] | A0_DEST_CHANNEL_ALL
);
267 fprintf(stderr
, "\n");
271 void i915_disassemble_program( const GLuint
*program
, GLuint sz
)
273 GLuint size
= program
[0] & 0x1ff;
276 fprintf(stderr
, "BEGIN\n");
279 fprintf(stderr
, "%s: program size mismatch %d/%d\n", __FUNCTION__
,
285 for (i
= 1 ; i
< sz
; i
+=3, program
+=3) {
286 GLuint opcode
= program
[0] & (0x1f<<24);
288 if ((GLint
) opcode
>= A0_NOP
&& opcode
<= A0_SLT
)
289 print_arith_op(opcode
>> 24, program
);
290 else if (opcode
>= T0_TEXLD
&& opcode
<= T0_TEXKILL
)
291 print_tex_op(opcode
>> 24, program
);
292 else if (opcode
== D0_DCL
)
293 print_dcl_op(opcode
>> 24, program
);
295 fprintf(stderr
, "Unknown opcode 0x%x\n", opcode
);
298 fprintf(stderr
, "END\n\n");