blob: bf2370612a2f30d113f4e48b8aaa2df7cde239f0 [file] [log] [blame]
/*
* Copyright © 2009-2011 Intel Corporation
*
* Permission is hereby granted, free of charge, to any person obtaining a
* copy of this software and associated documentation files (the "Software"),
* to deal in the Software without restriction, including without limitation
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
* and/or sell copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice (including the next
* paragraph) shall be included in all copies or substantial portions of the
* Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
* IN THE SOFTWARE.
*/
#include <assert.h>
#include <stdint.h>
#include <stdlib.h>
#include <stdio.h>
#include <stdbool.h>
#include <stdarg.h>
#include <string.h>
#include "intel_chipset.h"
#include "intel_bufmgr.h"
/* Struct for tracking drm_intel_decode state. */
struct drm_intel_decode {
/** stdio file where the output should land. Defaults to stdout. */
FILE *out;
/** PCI device ID. */
uint32_t devid;
/**
* Shorthand device identifier: 3 is 915, 4 is 965, 5 is
* Ironlake, etc.
*/
int gen;
/** GPU address of the start of the current packet. */
uint32_t hw_offset;
/** CPU virtual address of the start of the current packet. */
uint32_t *data;
/** DWORDs of remaining batchbuffer data starting from the packet. */
uint32_t count;
/** GPU address of the start of the batchbuffer data. */
uint32_t base_hw_offset;
/** CPU Virtual address of the start of the batchbuffer data. */
uint32_t *base_data;
/** Number of DWORDs of batchbuffer data. */
uint32_t base_count;
/** @{
* GPU head and tail pointers, which will be noted in the dump, or ~0.
*/
uint32_t head, tail;
/** @} */
/**
* Whether to dump the dwords after MI_BATCHBUFFER_END.
*
* This sometimes provides clues in corrupted batchbuffers,
* and is used by the intel-gpu-tools.
*/
bool dump_past_end;
bool overflowed;
};
static FILE *out;
static uint32_t saved_s2 = 0, saved_s4 = 0;
static char saved_s2_set = 0, saved_s4_set = 0;
static uint32_t head_offset = 0xffffffff; /* undefined */
static uint32_t tail_offset = 0xffffffff; /* undefined */
#ifndef ARRAY_SIZE
#define ARRAY_SIZE(A) (sizeof(A)/sizeof(A[0]))
#endif
#define BUFFER_FAIL(_count, _len, _name) do { \
fprintf(out, "Buffer size too small in %s (%d < %d)\n", \
(_name), (_count), (_len)); \
return _count; \
} while (0)
static float int_as_float(uint32_t intval)
{
union intfloat {
uint32_t i;
float f;
} uval;
uval.i = intval;
return uval.f;
}
static void
instr_out(struct drm_intel_decode *ctx, unsigned int index,
const char *fmt, ...) __attribute__((format(__printf__, 3, 4)));
static void
instr_out(struct drm_intel_decode *ctx, unsigned int index,
const char *fmt, ...)
{
va_list va;
const char *parseinfo;
uint32_t offset = ctx->hw_offset + index * 4;
if (index > ctx->count) {
if (!ctx->overflowed) {
fprintf(out, "ERROR: Decode attempted to continue beyond end of batchbuffer\n");
ctx->overflowed = true;
}
return;
}
if (offset == head_offset)
parseinfo = "HEAD";
else if (offset == tail_offset)
parseinfo = "TAIL";
else
parseinfo = " ";
fprintf(out, "0x%08x: %s 0x%08x: %s", offset, parseinfo,
ctx->data[index], index == 0 ? "" : " ");
va_start(va, fmt);
vfprintf(out, fmt, va);
va_end(va);
}
static int
decode_MI_WAIT_FOR_EVENT(struct drm_intel_decode *ctx)
{
const char *cc_wait;
int cc_shift = 0;
uint32_t data = ctx->data[0];
if (ctx->gen <= 5)
cc_shift = 9;
else
cc_shift = 16;
switch ((data >> cc_shift) & 0x1f) {
case 1:
cc_wait = ", cc wait 1";
break;
case 2:
cc_wait = ", cc wait 2";
break;
case 3:
cc_wait = ", cc wait 3";
break;
case 4:
cc_wait = ", cc wait 4";
break;
case 5:
cc_wait = ", cc wait 4";
break;
default:
cc_wait = "";
break;
}
if (ctx->gen <= 5) {
instr_out(ctx, 0, "MI_WAIT_FOR_EVENT%s%s%s%s%s%s%s%s%s%s%s%s%s%s\n",
data & (1<<18)? ", pipe B start vblank wait": "",
data & (1<<17)? ", pipe A start vblank wait": "",
data & (1<<16)? ", overlay flip pending wait": "",
data & (1<<14)? ", pipe B hblank wait": "",
data & (1<<13)? ", pipe A hblank wait": "",
cc_wait,
data & (1<<8)? ", plane C pending flip wait": "",
data & (1<<7)? ", pipe B vblank wait": "",
data & (1<<6)? ", plane B pending flip wait": "",
data & (1<<5)? ", pipe B scan line wait": "",
data & (1<<4)? ", fbc idle wait": "",
data & (1<<3)? ", pipe A vblank wait": "",
data & (1<<2)? ", plane A pending flip wait": "",
data & (1<<1)? ", plane A scan line wait": "");
} else {
instr_out(ctx, 0, "MI_WAIT_FOR_EVENT%s%s%s%s%s%s%s%s%s%s%s%s\n",
data & (1<<20)? ", sprite C pending flip wait": "", /* ivb */
cc_wait,
data & (1<<13)? ", pipe B hblank wait": "",
data & (1<<11)? ", pipe B vblank wait": "",
data & (1<<10)? ", sprite B pending flip wait": "",
data & (1<<9)? ", plane B pending flip wait": "",
data & (1<<8)? ", plane B scan line wait": "",
data & (1<<5)? ", pipe A hblank wait": "",
data & (1<<3)? ", pipe A vblank wait": "",
data & (1<<2)? ", sprite A pending flip wait": "",
data & (1<<1)? ", plane A pending flip wait": "",
data & (1<<0)? ", plane A scan line wait": "");
}
return 1;
}
static int
decode_mi(struct drm_intel_decode *ctx)
{
unsigned int opcode, len = -1;
const char *post_sync_op = "";
uint32_t *data = ctx->data;
struct {
uint32_t opcode;
int len_mask;
unsigned int min_len;
unsigned int max_len;
const char *name;
int (*func)(struct drm_intel_decode *ctx);
} opcodes_mi[] = {
{ 0x08, 0, 1, 1, "MI_ARB_ON_OFF" },
{ 0x0a, 0, 1, 1, "MI_BATCH_BUFFER_END" },
{ 0x30, 0x3f, 3, 3, "MI_BATCH_BUFFER" },
{ 0x31, 0x3f, 2, 2, "MI_BATCH_BUFFER_START" },
{ 0x14, 0x3f, 3, 3, "MI_DISPLAY_BUFFER_INFO" },
{ 0x04, 0, 1, 1, "MI_FLUSH" },
{ 0x22, 0x1f, 3, 3, "MI_LOAD_REGISTER_IMM" },
{ 0x13, 0x3f, 2, 2, "MI_LOAD_SCAN_LINES_EXCL" },
{ 0x12, 0x3f, 2, 2, "MI_LOAD_SCAN_LINES_INCL" },
{ 0x00, 0, 1, 1, "MI_NOOP" },
{ 0x11, 0x3f, 2, 2, "MI_OVERLAY_FLIP" },
{ 0x07, 0, 1, 1, "MI_REPORT_HEAD" },
{ 0x18, 0x3f, 2, 2, "MI_SET_CONTEXT" },
{ 0x20, 0x3f, 3, 4, "MI_STORE_DATA_IMM" },
{ 0x21, 0x3f, 3, 4, "MI_STORE_DATA_INDEX" },
{ 0x24, 0x3f, 3, 3, "MI_STORE_REGISTER_MEM" },
{ 0x02, 0, 1, 1, "MI_USER_INTERRUPT" },
{ 0x03, 0, 1, 1, "MI_WAIT_FOR_EVENT", decode_MI_WAIT_FOR_EVENT },
{ 0x16, 0x7f, 3, 3, "MI_SEMAPHORE_MBOX" },
{ 0x26, 0x1f, 3, 4, "MI_FLUSH_DW" },
{ 0x0b, 0, 1, 1, "MI_SUSPEND_FLUSH"},
}, *opcode_mi = NULL;
/* check instruction length */
for (opcode = 0; opcode < sizeof(opcodes_mi) / sizeof(opcodes_mi[0]);
opcode++) {
if ((data[0] & 0x1f800000) >> 23 == opcodes_mi[opcode].opcode) {
len = 1;
if (opcodes_mi[opcode].max_len > 1) {
len =
(data[0] & opcodes_mi[opcode].len_mask) + 2;
if (len < opcodes_mi[opcode].min_len
|| len > opcodes_mi[opcode].max_len) {
fprintf(out,
"Bad length (%d) in %s, [%d, %d]\n",
len, opcodes_mi[opcode].name,
opcodes_mi[opcode].min_len,
opcodes_mi[opcode].max_len);
}
}
opcode_mi = &opcodes_mi[opcode];
break;
}
}
if (opcode_mi && opcode_mi->func)
return opcode_mi->func(ctx);
switch ((data[0] & 0x1f800000) >> 23) {
case 0x0a:
instr_out(ctx, 0, "MI_BATCH_BUFFER_END\n");
return -1;
case 0x16:
instr_out(ctx, 0, "MI_SEMAPHORE_MBOX%s%s%s%s %u\n",
data[0] & (1 << 22) ? " global gtt," : "",
data[0] & (1 << 21) ? " update semaphore," : "",
data[0] & (1 << 20) ? " compare semaphore," : "",
data[0] & (1 << 18) ? " use compare reg" : "",
(data[0] & (0x3 << 16)) >> 16);
instr_out(ctx, 1, "value\n");
instr_out(ctx, 2, "address\n");
return len;
case 0x21:
instr_out(ctx, 0, "MI_STORE_DATA_INDEX%s\n",
data[0] & (1 << 21) ? " use per-process HWS," : "");
instr_out(ctx, 1, "index\n");
instr_out(ctx, 2, "dword\n");
if (len == 4)
instr_out(ctx, 3, "upper dword\n");
return len;
case 0x00:
if (data[0] & (1 << 22))
instr_out(ctx, 0,
"MI_NOOP write NOPID reg, val=0x%x\n",
data[0] & ((1 << 22) - 1));
else
instr_out(ctx, 0, "MI_NOOP\n");
return len;
case 0x26:
switch (data[0] & (0x3 << 14)) {
case (0 << 14):
post_sync_op = "no write";
break;
case (1 << 14):
post_sync_op = "write data";
break;
case (2 << 14):
post_sync_op = "reserved";
break;
case (3 << 14):
post_sync_op = "write TIMESTAMP";
break;
}
instr_out(ctx, 0,
"MI_FLUSH_DW%s%s%s%s post_sync_op='%s' %s%s\n",
data[0] & (1 << 22) ?
" enable protected mem (BCS-only)," : "",
data[0] & (1 << 21) ? " store in hws," : "",
data[0] & (1 << 18) ? " invalidate tlb," : "",
data[0] & (1 << 17) ? " flush gfdt," : "",
post_sync_op,
data[0] & (1 << 8) ? " enable notify interrupt," : "",
data[0] & (1 << 7) ?
" invalidate video state (BCS-only)," : "");
if (data[0] & (1 << 21))
instr_out(ctx, 1, "hws index\n");
else
instr_out(ctx, 1, "address\n");
instr_out(ctx, 2, "dword\n");
if (len == 4)
instr_out(ctx, 3, "upper dword\n");
return len;
}
for (opcode = 0; opcode < sizeof(opcodes_mi) / sizeof(opcodes_mi[0]);
opcode++) {
if ((data[0] & 0x1f800000) >> 23 == opcodes_mi[opcode].opcode) {
unsigned int i;
instr_out(ctx, 0, "%s\n",
opcodes_mi[opcode].name);
for (i = 1; i < len; i++) {
instr_out(ctx, i, "dword %d\n", i);
}
return len;
}
}
instr_out(ctx, 0, "MI UNKNOWN\n");
return 1;
}
static void
decode_2d_br00(struct drm_intel_decode *ctx, const char *cmd)
{
instr_out(ctx, 0,
"%s (rgb %sabled, alpha %sabled, src tile %d, dst tile %d)\n",
cmd,
(ctx->data[0] & (1 << 20)) ? "en" : "dis",
(ctx->data[0] & (1 << 21)) ? "en" : "dis",
(ctx->data[0] >> 15) & 1,
(ctx->data[0] >> 11) & 1);
}
static void
decode_2d_br01(struct drm_intel_decode *ctx)
{
const char *format;
switch ((ctx->data[1] >> 24) & 0x3) {
case 0:
format = "8";
break;
case 1:
format = "565";
break;
case 2:
format = "1555";
break;
case 3:
format = "8888";
break;
}
instr_out(ctx, 1,
"format %s, pitch %d, rop 0x%02x, "
"clipping %sabled, %s%s \n",
format,
(short)(ctx->data[1] & 0xffff),
(ctx->data[1] >> 16) & 0xff,
ctx->data[1] & (1 << 30) ? "en" : "dis",
ctx->data[1] & (1 << 31) ? "solid pattern enabled, " : "",
ctx->data[1] & (1 << 31) ?
"mono pattern transparency enabled, " : "");
}
static int
decode_2d(struct drm_intel_decode *ctx)
{
unsigned int opcode, len;
uint32_t *data = ctx->data;
struct {
uint32_t opcode;
unsigned int min_len;
unsigned int max_len;
const char *name;
} opcodes_2d[] = {
{ 0x40, 5, 5, "COLOR_BLT" },
{ 0x43, 6, 6, "SRC_COPY_BLT" },
{ 0x01, 8, 8, "XY_SETUP_BLT" },
{ 0x11, 9, 9, "XY_SETUP_MONO_PATTERN_SL_BLT" },
{ 0x03, 3, 3, "XY_SETUP_CLIP_BLT" },
{ 0x24, 2, 2, "XY_PIXEL_BLT" },
{ 0x25, 3, 3, "XY_SCANLINES_BLT" },
{ 0x26, 4, 4, "Y_TEXT_BLT" },
{ 0x31, 5, 134, "XY_TEXT_IMMEDIATE_BLT" },
{ 0x50, 6, 6, "XY_COLOR_BLT" },
{ 0x51, 6, 6, "XY_PAT_BLT" },
{ 0x76, 8, 8, "XY_PAT_CHROMA_BLT" },
{ 0x72, 7, 135, "XY_PAT_BLT_IMMEDIATE" },
{ 0x77, 9, 137, "XY_PAT_CHROMA_BLT_IMMEDIATE" },
{ 0x52, 9, 9, "XY_MONO_PAT_BLT" },
{ 0x59, 7, 7, "XY_MONO_PAT_FIXED_BLT" },
{ 0x53, 8, 8, "XY_SRC_COPY_BLT" },
{ 0x54, 8, 8, "XY_MONO_SRC_COPY_BLT" },
{ 0x71, 9, 137, "XY_MONO_SRC_COPY_IMMEDIATE_BLT" },
{ 0x55, 9, 9, "XY_FULL_BLT" },
{ 0x55, 9, 137, "XY_FULL_IMMEDIATE_PATTERN_BLT" },
{ 0x56, 9, 9, "XY_FULL_MONO_SRC_BLT" },
{ 0x75, 10, 138, "XY_FULL_MONO_SRC_IMMEDIATE_PATTERN_BLT" },
{ 0x57, 12, 12, "XY_FULL_MONO_PATTERN_BLT" },
{ 0x58, 12, 12, "XY_FULL_MONO_PATTERN_MONO_SRC_BLT"},
};
switch ((data[0] & 0x1fc00000) >> 22) {
case 0x25:
instr_out(ctx, 0,
"XY_SCANLINES_BLT (pattern seed (%d, %d), dst tile %d)\n",
(data[0] >> 12) & 0x8,
(data[0] >> 8) & 0x8, (data[0] >> 11) & 1);
len = (data[0] & 0x000000ff) + 2;
if (len != 3)
fprintf(out, "Bad count in XY_SCANLINES_BLT\n");
instr_out(ctx, 1, "dest (%d,%d)\n",
data[1] & 0xffff, data[1] >> 16);
instr_out(ctx, 2, "dest (%d,%d)\n",
data[2] & 0xffff, data[2] >> 16);
return len;
case 0x01:
decode_2d_br00(ctx, "XY_SETUP_BLT");
len = (data[0] & 0x000000ff) + 2;
if (len != 8)
fprintf(out, "Bad count in XY_SETUP_BLT\n");
decode_2d_br01(ctx);
instr_out(ctx, 2, "cliprect (%d,%d)\n",
data[2] & 0xffff, data[2] >> 16);
instr_out(ctx, 3, "cliprect (%d,%d)\n",
data[3] & 0xffff, data[3] >> 16);
instr_out(ctx, 4, "setup dst offset 0x%08x\n",
data[4]);
instr_out(ctx, 5, "setup background color\n");
instr_out(ctx, 6, "setup foreground color\n");
instr_out(ctx, 7, "color pattern offset\n");
return len;
case 0x03:
decode_2d_br00(ctx, "XY_SETUP_CLIP_BLT");
len = (data[0] & 0x000000ff) + 2;
if (len != 3)
fprintf(out, "Bad count in XY_SETUP_CLIP_BLT\n");
instr_out(ctx, 1, "cliprect (%d,%d)\n",
data[1] & 0xffff, data[2] >> 16);
instr_out(ctx, 2, "cliprect (%d,%d)\n",
data[2] & 0xffff, data[3] >> 16);
return len;
case 0x11:
decode_2d_br00(ctx, "XY_SETUP_MONO_PATTERN_SL_BLT");
len = (data[0] & 0x000000ff) + 2;
if (len != 9)
fprintf(out,
"Bad count in XY_SETUP_MONO_PATTERN_SL_BLT\n");
decode_2d_br01(ctx);
instr_out(ctx, 2, "cliprect (%d,%d)\n",
data[2] & 0xffff, data[2] >> 16);
instr_out(ctx, 3, "cliprect (%d,%d)\n",
data[3] & 0xffff, data[3] >> 16);
instr_out(ctx, 4, "setup dst offset 0x%08x\n",
data[4]);
instr_out(ctx, 5, "setup background color\n");
instr_out(ctx, 6, "setup foreground color\n");
instr_out(ctx, 7, "mono pattern dw0\n");
instr_out(ctx, 8, "mono pattern dw1\n");
return len;
case 0x50:
decode_2d_br00(ctx, "XY_COLOR_BLT");
len = (data[0] & 0x000000ff) + 2;
if (len != 6)
fprintf(out, "Bad count in XY_COLOR_BLT\n");
decode_2d_br01(ctx);
instr_out(ctx, 2, "(%d,%d)\n",
data[2] & 0xffff, data[2] >> 16);
instr_out(ctx, 3, "(%d,%d)\n",
data[3] & 0xffff, data[3] >> 16);
instr_out(ctx, 4, "offset 0x%08x\n", data[4]);
instr_out(ctx, 5, "color\n");
return len;
case 0x53:
decode_2d_br00(ctx, "XY_SRC_COPY_BLT");
len = (data[0] & 0x000000ff) + 2;
if (len != 8)
fprintf(out, "Bad count in XY_SRC_COPY_BLT\n");
decode_2d_br01(ctx);
instr_out(ctx, 2, "dst (%d,%d)\n",
data[2] & 0xffff, data[2] >> 16);
instr_out(ctx, 3, "dst (%d,%d)\n",
data[3] & 0xffff, data[3] >> 16);
instr_out(ctx, 4, "dst offset 0x%08x\n", data[4]);
instr_out(ctx, 5, "src (%d,%d)\n",
data[5] & 0xffff, data[5] >> 16);
instr_out(ctx, 6, "src pitch %d\n",
(short)(data[6] & 0xffff));
instr_out(ctx, 7, "src offset 0x%08x\n", data[7]);
return len;
}
for (opcode = 0; opcode < sizeof(opcodes_2d) / sizeof(opcodes_2d[0]);
opcode++) {
if ((data[0] & 0x1fc00000) >> 22 == opcodes_2d[opcode].opcode) {
unsigned int i;
len = 1;
instr_out(ctx, 0, "%s\n",
opcodes_2d[opcode].name);
if (opcodes_2d[opcode].max_len > 1) {
len = (data[0] & 0x000000ff) + 2;
if (len < opcodes_2d[opcode].min_len ||
len > opcodes_2d[opcode].max_len) {
fprintf(out, "Bad count in %s\n",
opcodes_2d[opcode].name);
}
}
for (i = 1; i < len; i++) {
instr_out(ctx, i, "dword %d\n", i);
}
return len;
}
}
instr_out(ctx, 0, "2D UNKNOWN\n");
return 1;
}
static int
decode_3d_1c(struct drm_intel_decode *ctx)
{
uint32_t *data = ctx->data;
uint32_t opcode;
opcode = (data[0] & 0x00f80000) >> 19;
switch (opcode) {
case 0x11:
instr_out(ctx, 0,
"3DSTATE_DEPTH_SUBRECTANGLE_DISABLE\n");
return 1;
case 0x10:
instr_out(ctx, 0, "3DSTATE_SCISSOR_ENABLE %s\n",
data[0] & 1 ? "enabled" : "disabled");
return 1;
case 0x01:
instr_out(ctx, 0, "3DSTATE_MAP_COORD_SET_I830\n");
return 1;
case 0x0a:
instr_out(ctx, 0, "3DSTATE_MAP_CUBE_I830\n");
return 1;
case 0x05:
instr_out(ctx, 0, "3DSTATE_MAP_TEX_STREAM_I830\n");
return 1;
}
instr_out(ctx, 0, "3D UNKNOWN: 3d_1c opcode = 0x%x\n",
opcode);
return 1;
}
/** Sets the string dstname to describe the destination of the PS instruction */
static void
i915_get_instruction_dst(uint32_t *data, int i, char *dstname, int do_mask)
{
uint32_t a0 = data[i];
int dst_nr = (a0 >> 14) & 0xf;
char dstmask[8];
const char *sat;
if (do_mask) {
if (((a0 >> 10) & 0xf) == 0xf) {
dstmask[0] = 0;
} else {
int dstmask_index = 0;
dstmask[dstmask_index++] = '.';
if (a0 & (1 << 10))
dstmask[dstmask_index++] = 'x';
if (a0 & (1 << 11))
dstmask[dstmask_index++] = 'y';
if (a0 & (1 << 12))
dstmask[dstmask_index++] = 'z';
if (a0 & (1 << 13))
dstmask[dstmask_index++] = 'w';
dstmask[dstmask_index++] = 0;
}
if (a0 & (1 << 22))
sat = ".sat";
else
sat = "";
} else {
dstmask[0] = 0;
sat = "";
}
switch ((a0 >> 19) & 0x7) {
case 0:
if (dst_nr > 15)
fprintf(out, "bad destination reg R%d\n", dst_nr);
sprintf(dstname, "R%d%s%s", dst_nr, dstmask, sat);
break;
case 4:
if (dst_nr > 0)
fprintf(out, "bad destination reg oC%d\n", dst_nr);
sprintf(dstname, "oC%s%s", dstmask, sat);
break;
case 5:
if (dst_nr > 0)
fprintf(out, "bad destination reg oD%d\n", dst_nr);
sprintf(dstname, "oD%s%s", dstmask, sat);
break;
case 6:
if (dst_nr > 3)
fprintf(out, "bad destination reg U%d\n", dst_nr);
sprintf(dstname, "U%d%s%s", dst_nr, dstmask, sat);
break;
default:
sprintf(dstname, "RESERVED");
break;
}
}
static const char *
i915_get_channel_swizzle(uint32_t select)
{
switch (select & 0x7) {
case 0:
return (select & 8) ? "-x" : "x";
case 1:
return (select & 8) ? "-y" : "y";
case 2:
return (select & 8) ? "-z" : "z";
case 3:
return (select & 8) ? "-w" : "w";
case 4:
return (select & 8) ? "-0" : "0";
case 5:
return (select & 8) ? "-1" : "1";
default:
return (select & 8) ? "-bad" : "bad";
}
}
static void
i915_get_instruction_src_name(uint32_t src_type, uint32_t src_nr, char *name)
{
switch (src_type) {
case 0:
sprintf(name, "R%d", src_nr);
if (src_nr > 15)
fprintf(out, "bad src reg %s\n", name);
break;
case 1:
if (src_nr < 8)
sprintf(name, "T%d", src_nr);
else if (src_nr == 8)
sprintf(name, "DIFFUSE");
else if (src_nr == 9)
sprintf(name, "SPECULAR");
else if (src_nr == 10)
sprintf(name, "FOG");
else {
fprintf(out, "bad src reg T%d\n", src_nr);
sprintf(name, "RESERVED");
}
break;
case 2:
sprintf(name, "C%d", src_nr);
if (src_nr > 31)
fprintf(out, "bad src reg %s\n", name);
break;
case 4:
sprintf(name, "oC");
if (src_nr > 0)
fprintf(out, "bad src reg oC%d\n", src_nr);
break;
case 5:
sprintf(name, "oD");
if (src_nr > 0)
fprintf(out, "bad src reg oD%d\n", src_nr);
break;
case 6:
sprintf(name, "U%d", src_nr);
if (src_nr > 3)
fprintf(out, "bad src reg %s\n", name);
break;
default:
fprintf(out, "bad src reg type %d\n", src_type);
sprintf(name, "RESERVED");
break;
}
}
static void i915_get_instruction_src0(uint32_t *data, int i, char *srcname)
{
uint32_t a0 = data[i];
uint32_t a1 = data[i + 1];
int src_nr = (a0 >> 2) & 0x1f;
const char *swizzle_x = i915_get_channel_swizzle((a1 >> 28) & 0xf);
const char *swizzle_y = i915_get_channel_swizzle((a1 >> 24) & 0xf);
const char *swizzle_z = i915_get_channel_swizzle((a1 >> 20) & 0xf);
const char *swizzle_w = i915_get_channel_swizzle((a1 >> 16) & 0xf);
char swizzle[100];
i915_get_instruction_src_name((a0 >> 7) & 0x7, src_nr, srcname);
sprintf(swizzle, ".%s%s%s%s", swizzle_x, swizzle_y, swizzle_z,
swizzle_w);
if (strcmp(swizzle, ".xyzw") != 0)
strcat(srcname, swizzle);
}
static void i915_get_instruction_src1(uint32_t *data, int i, char *srcname)
{
uint32_t a1 = data[i + 1];
uint32_t a2 = data[i + 2];
int src_nr = (a1 >> 8) & 0x1f;
const char *swizzle_x = i915_get_channel_swizzle((a1 >> 4) & 0xf);
const char *swizzle_y = i915_get_channel_swizzle((a1 >> 0) & 0xf);
const char *swizzle_z = i915_get_channel_swizzle((a2 >> 28) & 0xf);
const char *swizzle_w = i915_get_channel_swizzle((a2 >> 24) & 0xf);
char swizzle[100];
i915_get_instruction_src_name((a1 >> 13) & 0x7, src_nr, srcname);
sprintf(swizzle, ".%s%s%s%s", swizzle_x, swizzle_y, swizzle_z,
swizzle_w);
if (strcmp(swizzle, ".xyzw") != 0)
strcat(srcname, swizzle);
}
static void i915_get_instruction_src2(uint32_t *data, int i, char *srcname)
{
uint32_t a2 = data[i + 2];
int src_nr = (a2 >> 16) & 0x1f;
const char *swizzle_x = i915_get_channel_swizzle((a2 >> 12) & 0xf);
const char *swizzle_y = i915_get_channel_swizzle((a2 >> 8) & 0xf);
const char *swizzle_z = i915_get_channel_swizzle((a2 >> 4) & 0xf);
const char *swizzle_w = i915_get_channel_swizzle((a2 >> 0) & 0xf);
char swizzle[100];
i915_get_instruction_src_name((a2 >> 21) & 0x7, src_nr, srcname);
sprintf(swizzle, ".%s%s%s%s", swizzle_x, swizzle_y, swizzle_z,
swizzle_w);
if (strcmp(swizzle, ".xyzw") != 0)
strcat(srcname, swizzle);
}
static void
i915_get_instruction_addr(uint32_t src_type, uint32_t src_nr, char *name)
{
switch (src_type) {
case 0:
sprintf(name, "R%d", src_nr);
if (src_nr > 15)
fprintf(out, "bad src reg %s\n", name);
break;
case 1:
if (src_nr < 8)
sprintf(name, "T%d", src_nr);
else if (src_nr == 8)
sprintf(name, "DIFFUSE");
else if (src_nr == 9)
sprintf(name, "SPECULAR");
else if (src_nr == 10)
sprintf(name, "FOG");
else {
fprintf(out, "bad src reg T%d\n", src_nr);
sprintf(name, "RESERVED");
}
break;
case 4:
sprintf(name, "oC");
if (src_nr > 0)
fprintf(out, "bad src reg oC%d\n", src_nr);
break;
case 5:
sprintf(name, "oD");
if (src_nr > 0)
fprintf(out, "bad src reg oD%d\n", src_nr);
break;
default:
fprintf(out, "bad src reg type %d\n", src_type);
sprintf(name, "RESERVED");
break;
}
}
static void
i915_decode_alu1(struct drm_intel_decode *ctx,
int i, char *instr_prefix, const char *op_name)
{
char dst[100], src0[100];
i915_get_instruction_dst(ctx->data, i, dst, 1);
i915_get_instruction_src0(ctx->data, i, src0);
instr_out(ctx, i++, "%s: %s %s, %s\n", instr_prefix,
op_name, dst, src0);
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
}
static void
i915_decode_alu2(struct drm_intel_decode *ctx,
int i, char *instr_prefix, const char *op_name)
{
char dst[100], src0[100], src1[100];
i915_get_instruction_dst(ctx->data, i, dst, 1);
i915_get_instruction_src0(ctx->data, i, src0);
i915_get_instruction_src1(ctx->data, i, src1);
instr_out(ctx, i++, "%s: %s %s, %s, %s\n", instr_prefix,
op_name, dst, src0, src1);
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
}
static void
i915_decode_alu3(struct drm_intel_decode *ctx,
int i, char *instr_prefix, const char *op_name)
{
char dst[100], src0[100], src1[100], src2[100];
i915_get_instruction_dst(ctx->data, i, dst, 1);
i915_get_instruction_src0(ctx->data, i, src0);
i915_get_instruction_src1(ctx->data, i, src1);
i915_get_instruction_src2(ctx->data, i, src2);
instr_out(ctx, i++, "%s: %s %s, %s, %s, %s\n", instr_prefix,
op_name, dst, src0, src1, src2);
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
}
static void
i915_decode_tex(struct drm_intel_decode *ctx, int i,
const char *instr_prefix, const char *tex_name)
{
uint32_t t0 = ctx->data[i];
uint32_t t1 = ctx->data[i + 1];
char dst_name[100];
char addr_name[100];
int sampler_nr;
i915_get_instruction_dst(ctx->data, i, dst_name, 0);
i915_get_instruction_addr((t1 >> 24) & 0x7,
(t1 >> 17) & 0xf, addr_name);
sampler_nr = t0 & 0xf;
instr_out(ctx, i++, "%s: %s %s, S%d, %s\n", instr_prefix,
tex_name, dst_name, sampler_nr, addr_name);
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
}
static void
i915_decode_dcl(struct drm_intel_decode *ctx, int i, char *instr_prefix)
{
uint32_t d0 = ctx->data[i];
const char *sampletype;
int dcl_nr = (d0 >> 14) & 0xf;
const char *dcl_x = d0 & (1 << 10) ? "x" : "";
const char *dcl_y = d0 & (1 << 11) ? "y" : "";
const char *dcl_z = d0 & (1 << 12) ? "z" : "";
const char *dcl_w = d0 & (1 << 13) ? "w" : "";
char dcl_mask[10];
switch ((d0 >> 19) & 0x3) {
case 1:
sprintf(dcl_mask, ".%s%s%s%s", dcl_x, dcl_y, dcl_z, dcl_w);
if (strcmp(dcl_mask, ".") == 0)
fprintf(out, "bad (empty) dcl mask\n");
if (dcl_nr > 10)
fprintf(out, "bad T%d dcl register number\n", dcl_nr);
if (dcl_nr < 8) {
if (strcmp(dcl_mask, ".x") != 0 &&
strcmp(dcl_mask, ".xy") != 0 &&
strcmp(dcl_mask, ".xz") != 0 &&
strcmp(dcl_mask, ".w") != 0 &&
strcmp(dcl_mask, ".xyzw") != 0) {
fprintf(out, "bad T%d.%s dcl mask\n", dcl_nr,
dcl_mask);
}
instr_out(ctx, i++, "%s: DCL T%d%s\n",
instr_prefix, dcl_nr, dcl_mask);
} else {
if (strcmp(dcl_mask, ".xz") == 0)
fprintf(out, "errataed bad dcl mask %s\n",
dcl_mask);
else if (strcmp(dcl_mask, ".xw") == 0)
fprintf(out, "errataed bad dcl mask %s\n",
dcl_mask);
else if (strcmp(dcl_mask, ".xzw") == 0)
fprintf(out, "errataed bad dcl mask %s\n",
dcl_mask);
if (dcl_nr == 8) {
instr_out(ctx, i++,
"%s: DCL DIFFUSE%s\n", instr_prefix,
dcl_mask);
} else if (dcl_nr == 9) {
instr_out(ctx, i++,
"%s: DCL SPECULAR%s\n", instr_prefix,
dcl_mask);
} else if (dcl_nr == 10) {
instr_out(ctx, i++,
"%s: DCL FOG%s\n", instr_prefix,
dcl_mask);
}
}
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
break;
case 3:
switch ((d0 >> 22) & 0x3) {
case 0:
sampletype = "2D";
break;
case 1:
sampletype = "CUBE";
break;
case 2:
sampletype = "3D";
break;
default:
sampletype = "RESERVED";
break;
}
if (dcl_nr > 15)
fprintf(out, "bad S%d dcl register number\n", dcl_nr);
instr_out(ctx, i++, "%s: DCL S%d %s\n",
instr_prefix, dcl_nr, sampletype);
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
break;
default:
instr_out(ctx, i++, "%s: DCL RESERVED%d\n",
instr_prefix, dcl_nr);
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
}
}
static void
i915_decode_instruction(struct drm_intel_decode *ctx,
int i, char *instr_prefix)
{
switch ((ctx->data[i] >> 24) & 0x1f) {
case 0x0:
instr_out(ctx, i++, "%s: NOP\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
break;
case 0x01:
i915_decode_alu2(ctx, i, instr_prefix, "ADD");
break;
case 0x02:
i915_decode_alu1(ctx, i, instr_prefix, "MOV");
break;
case 0x03:
i915_decode_alu2(ctx, i, instr_prefix, "MUL");
break;
case 0x04:
i915_decode_alu3(ctx, i, instr_prefix, "MAD");
break;
case 0x05:
i915_decode_alu3(ctx, i, instr_prefix, "DP2ADD");
break;
case 0x06:
i915_decode_alu2(ctx, i, instr_prefix, "DP3");
break;
case 0x07:
i915_decode_alu2(ctx, i, instr_prefix, "DP4");
break;
case 0x08:
i915_decode_alu1(ctx, i, instr_prefix, "FRC");
break;
case 0x09:
i915_decode_alu1(ctx, i, instr_prefix, "RCP");
break;
case 0x0a:
i915_decode_alu1(ctx, i, instr_prefix, "RSQ");
break;
case 0x0b:
i915_decode_alu1(ctx, i, instr_prefix, "EXP");
break;
case 0x0c:
i915_decode_alu1(ctx, i, instr_prefix, "LOG");
break;
case 0x0d:
i915_decode_alu2(ctx, i, instr_prefix, "CMP");
break;
case 0x0e:
i915_decode_alu2(ctx, i, instr_prefix, "MIN");
break;
case 0x0f:
i915_decode_alu2(ctx, i, instr_prefix, "MAX");
break;
case 0x10:
i915_decode_alu1(ctx, i, instr_prefix, "FLR");
break;
case 0x11:
i915_decode_alu1(ctx, i, instr_prefix, "MOD");
break;
case 0x12:
i915_decode_alu1(ctx, i, instr_prefix, "TRC");
break;
case 0x13:
i915_decode_alu2(ctx, i, instr_prefix, "SGE");
break;
case 0x14:
i915_decode_alu2(ctx, i, instr_prefix, "SLT");
break;
case 0x15:
i915_decode_tex(ctx, i, instr_prefix, "TEXLD");
break;
case 0x16:
i915_decode_tex(ctx, i, instr_prefix, "TEXLDP");
break;
case 0x17:
i915_decode_tex(ctx, i, instr_prefix, "TEXLDB");
break;
case 0x19:
i915_decode_dcl(ctx, i, instr_prefix);
break;
default:
instr_out(ctx, i++, "%s: unknown\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
instr_out(ctx, i++, "%s\n", instr_prefix);
break;
}
}
static const char *
decode_compare_func(uint32_t op)
{
switch (op & 0x7) {
case 0:
return "always";
case 1:
return "never";
case 2:
return "less";
case 3:
return "equal";
case 4:
return "lequal";
case 5:
return "greater";
case 6:
return "notequal";
case 7:
return "gequal";
}
return "";
}
static const char *
decode_stencil_op(uint32_t op)
{
switch (op & 0x7) {
case 0:
return "keep";
case 1:
return "zero";
case 2:
return "replace";
case 3:
return "incr_sat";
case 4:
return "decr_sat";
case 5:
return "greater";
case 6:
return "incr";
case 7:
return "decr";
}
return "";
}
#if 0
static const char *
decode_logic_op(uint32_t op)
{
switch (op & 0xf) {
case 0:
return "clear";
case 1:
return "nor";
case 2:
return "and_inv";
case 3:
return "copy_inv";
case 4:
return "and_rvrse";
case 5:
return "inv";
case 6:
return "xor";
case 7:
return "nand";
case 8:
return "and";
case 9:
return "equiv";
case 10:
return "noop";
case 11:
return "or_inv";
case 12:
return "copy";
case 13:
return "or_rvrse";
case 14:
return "or";
case 15:
return "set";
}
return "";
}
#endif
static const char *
decode_blend_fact(uint32_t op)
{
switch (op & 0xf) {
case 1:
return "zero";
case 2:
return "one";
case 3:
return "src_colr";
case 4:
return "inv_src_colr";
case 5:
return "src_alpha";
case 6:
return "inv_src_alpha";
case 7:
return "dst_alpha";
case 8:
return "inv_dst_alpha";
case 9:
return "dst_colr";
case 10:
return "inv_dst_colr";
case 11:
return "src_alpha_sat";
case 12:
return "cnst_colr";
case 13:
return "inv_cnst_colr";
case 14:
return "cnst_alpha";
case 15:
return "inv_const_alpha";
}
return "";
}
static const char *
decode_tex_coord_mode(uint32_t mode)
{
switch (mode & 0x7) {
case 0:
return "wrap";
case 1:
return "mirror";
case 2:
return "clamp_edge";
case 3:
return "cube";
case 4:
return "clamp_border";
case 5:
return "mirror_once";
}
return "";
}
static const char *
decode_sample_filter(uint32_t mode)
{
switch (mode & 0x7) {
case 0:
return "nearest";
case 1:
return "linear";
case 2:
return "anisotropic";
case 3:
return "4x4_1";
case 4:
return "4x4_2";
case 5:
return "4x4_flat";
case 6:
return "6x5_mono";
}
return "";
}
static int
decode_3d_1d(struct drm_intel_decode *ctx)
{
unsigned int len, i, c, idx, word, map, sampler, instr;
const char *format, *zformat, *type;
uint32_t opcode;
uint32_t *data = ctx->data;
uint32_t devid = ctx->devid;
struct {
uint32_t opcode;
int i830_only;
unsigned int min_len;
unsigned int max_len;
const char *name;
} opcodes_3d_1d[] = {
{ 0x86, 0, 4, 4, "3DSTATE_CHROMA_KEY" },
{ 0x88, 0, 2, 2, "3DSTATE_CONSTANT_BLEND_COLOR" },
{ 0x99, 0, 2, 2, "3DSTATE_DEFAULT_DIFFUSE" },
{ 0x9a, 0, 2, 2, "3DSTATE_DEFAULT_SPECULAR" },
{ 0x98, 0, 2, 2, "3DSTATE_DEFAULT_Z" },
{ 0x97, 0, 2, 2, "3DSTATE_DEPTH_OFFSET_SCALE" },
{ 0x9d, 0, 65, 65, "3DSTATE_FILTER_COEFFICIENTS_4X4" },
{ 0x9e, 0, 4, 4, "3DSTATE_MONO_FILTER" },
{ 0x89, 0, 4, 4, "3DSTATE_FOG_MODE" },
{ 0x8f, 0, 2, 16, "3DSTATE_MAP_PALLETE_LOAD_32" },
{ 0x83, 0, 2, 2, "3DSTATE_SPAN_STIPPLE" },
{ 0x8c, 1, 2, 2, "3DSTATE_MAP_COORD_TRANSFORM_I830" },
{ 0x8b, 1, 2, 2, "3DSTATE_MAP_VERTEX_TRANSFORM_I830" },
{ 0x8d, 1, 3, 3, "3DSTATE_W_STATE_I830" },
{ 0x01, 1, 2, 2, "3DSTATE_COLOR_FACTOR_I830" },
{ 0x02, 1, 2, 2, "3DSTATE_MAP_COORD_SETBIND_I830"},
}, *opcode_3d_1d;
opcode = (data[0] & 0x00ff0000) >> 16;
switch (opcode) {
case 0x07:
/* This instruction is unusual. A 0 length means just
* 1 DWORD instead of 2. The 0 length is specified in
* one place to be unsupported, but stated to be
* required in another, and 0 length LOAD_INDIRECTs
* appear to cause no harm at least.
*/
instr_out(ctx, 0, "3DSTATE_LOAD_INDIRECT\n");
len = (data[0] & 0x000000ff) + 1;
i = 1;
if (data[0] & (0x01 << 8)) {
instr_out(ctx, i++, "SIS.0\n");
instr_out(ctx, i++, "SIS.1\n");
}
if (data[0] & (0x02 << 8)) {
instr_out(ctx, i++, "DIS.0\n");
}
if (data[0] & (0x04 << 8)) {
instr_out(ctx, i++, "SSB.0\n");
instr_out(ctx, i++, "SSB.1\n");
}
if (data[0] & (0x08 << 8)) {
instr_out(ctx, i++, "MSB.0\n");
instr_out(ctx, i++, "MSB.1\n");
}
if (data[0] & (0x10 << 8)) {
instr_out(ctx, i++, "PSP.0\n");
instr_out(ctx, i++, "PSP.1\n");
}
if (data[0] & (0x20 << 8)) {
instr_out(ctx, i++, "PSC.0\n");
instr_out(ctx, i++, "PSC.1\n");
}
if (len != i) {
fprintf(out, "Bad count in 3DSTATE_LOAD_INDIRECT\n");
return len;
}
return len;
case 0x04:
instr_out(ctx, 0,
"3DSTATE_LOAD_STATE_IMMEDIATE_1\n");
len = (data[0] & 0x0000000f) + 2;
i = 1;
for (word = 0; word <= 8; word++) {
if (data[0] & (1 << (4 + word))) {
/* save vertex state for decode */
if (!IS_GEN2(devid)) {
int tex_num;
if (word == 2) {
saved_s2_set = 1;
saved_s2 = data[i];
}
if (word == 4) {
saved_s4_set = 1;
saved_s4 = data[i];
}
switch (word) {
case 0:
instr_out(ctx, i,
"S0: vbo offset: 0x%08x%s\n",
data[i] & (~1),
data[i] & 1 ?
", auto cache invalidate disabled"
: "");
break;
case 1:
instr_out(ctx, i,
"S1: vertex width: %i, vertex pitch: %i\n",
(data[i] >> 24) &
0x3f,
(data[i] >> 16) &
0x3f);
break;
case 2:
instr_out(ctx, i,
"S2: texcoord formats: ");
for (tex_num = 0;
tex_num < 8; tex_num++) {
switch ((data[i] >>
tex_num *
4) & 0xf) {
case 0:
fprintf(out,
"%i=2D ",
tex_num);
break;
case 1:
fprintf(out,
"%i=3D ",
tex_num);
break;
case 2:
fprintf(out,
"%i=4D ",
tex_num);
break;
case 3:
fprintf(out,
"%i=1D ",
tex_num);
break;
case 4:
fprintf(out,
"%i=2D_16 ",
tex_num);
break;
case 5:
fprintf(out,
"%i=4D_16 ",
tex_num);
break;
case 0xf:
fprintf(out,
"%i=NP ",
tex_num);
break;
}
}
fprintf(out, "\n");
break;
case 3:
instr_out(ctx, i,
"S3: not documented\n");
break;
case 4:
{
const char *cullmode = "";
const char *vfmt_xyzw = "";
switch ((data[i] >> 13)
& 0x3) {
case 0:
cullmode =
"both";
break;
case 1:
cullmode =
"none";
break;
case 2:
cullmode = "cw";
break;
case 3:
cullmode =
"ccw";
break;
}
switch (data[i] &
(7 << 6 | 1 <<
2)) {
case 1 << 6:
vfmt_xyzw =
"XYZ,";
break;
case 2 << 6:
vfmt_xyzw =
"XYZW,";
break;
case 3 << 6:
vfmt_xyzw =
"XY,";
break;
case 4 << 6:
vfmt_xyzw =
"XYW,";
break;
case 1 << 6 | 1 << 2:
vfmt_xyzw =
"XYZF,";
break;
case 2 << 6 | 1 << 2:
vfmt_xyzw =
"XYZWF,";
break;
case 3 << 6 | 1 << 2:
vfmt_xyzw =
"XYF,";
break;
case 4 << 6 | 1 << 2:
vfmt_xyzw =
"XYWF,";
break;
}
instr_out(ctx, i,
"S4: point_width=%i, line_width=%.1f,"
"%s%s%s%s%s cullmode=%s, vfmt=%s%s%s%s%s%s "
"%s%s%s%s%s\n",
(data[i] >>
23) & 0x1ff,
((data[i] >>
19) & 0xf) /
2.0,
data[i] & (0xf
<<
15)
?
" flatshade="
: "",
data[i] & (1
<<
18)
? "Alpha," :
"",
data[i] & (1
<<
17)
? "Fog," : "",
data[i] & (1
<<
16)
? "Specular,"
: "",
data[i] & (1
<<
15)
? "Color," :
"", cullmode,
data[i] & (1
<<
12)
?
"PointWidth,"
: "",
data[i] & (1
<<
11)
? "SpecFog," :
"",
data[i] & (1
<<
10)
? "Color," :
"",
data[i] & (1
<<
9)
? "DepthOfs,"
: "",
vfmt_xyzw,
data[i] & (1
<<
9)
? "FogParam,"
: "",
data[i] & (1
<<
5)
?
"force default diffuse, "
: "",
data[i] & (1
<<
4)
?
"force default specular, "
: "",
data[i] & (1
<<
3)
?
"local depth ofs enable, "
: "",
data[i] & (1
<<
1)
?
"point sprite enable, "
: "",
data[i] & (1
<<
0)
?
"line AA enable, "
: "");
break;
}
case 5:
{
instr_out(ctx, i,
"S5:%s%s%s%s%s"
"%s%s%s%s stencil_ref=0x%x, stencil_test=%s, "
"stencil_fail=%s, stencil_pass_z_fail=%s, "
"stencil_pass_z_pass=%s, %s%s%s%s\n",
data[i] & (0xf
<<
28)
?
" write_disable="
: "",
data[i] & (1
<<
31)
? "Alpha," :
"",
data[i] & (1
<<
30)
? "Red," : "",
data[i] & (1
<<
29)
? "Green," :
"",
data[i] & (1
<<
28)
? "Blue," :
"",
data[i] & (1
<<
27)
?
" force default point size,"
: "",
data[i] & (1
<<
26)
?
" last pixel enable,"
: "",
data[i] & (1
<<
25)
?
" global depth ofs enable,"
: "",
data[i] & (1
<<
24)
?
" fog enable,"
: "",
(data[i] >>
16) & 0xff,
decode_compare_func
(data[i] >>
13),
decode_stencil_op
(data[i] >>
10),
decode_stencil_op
(data[i] >>
7),
decode_stencil_op
(data[i] >>
4),
data[i] & (1
<<
3)
?
"stencil write enable, "
: "",
data[i] & (1
<<
2)
?
"stencil test enable, "
: "",
data[i] & (1
<<
1)
?
"color dither enable, "
: "",
data[i] & (1
<<
0)
?
"logicop enable, "
: "");
}
break;
case 6:
instr_out(ctx, i,
"S6: %salpha_test=%s, alpha_ref=0x%x, "
"depth_test=%s, %ssrc_blnd_fct=%s, dst_blnd_fct=%s, "
"%s%stristrip_provoking_vertex=%i\n",
data[i] & (1 << 31) ?
"alpha test enable, "
: "",
decode_compare_func
(data[i] >> 28),
data[i] & (0xff <<
20),
decode_compare_func
(data[i] >> 16),
data[i] & (1 << 15) ?
"cbuf blend enable, "
: "",
decode_blend_fact(data
[i]
>>
8),
decode_blend_fact(data
[i]
>>
4),
data[i] & (1 << 3) ?
"depth write enable, "
: "",
data[i] & (1 << 2) ?
"cbuf write enable, "
: "",
data[i] & (0x3));
break;
case 7:
instr_out(ctx, i,
"S7: depth offset constant: 0x%08x\n",
data[i]);
break;
}
} else {
instr_out(ctx, i,
"S%d: 0x%08x\n", i, data[i]);
}
i++;
}
}
if (len != i) {
fprintf(out,
"Bad count in 3DSTATE_LOAD_STATE_IMMEDIATE_1\n");
}
return len;
case 0x03:
instr_out(ctx, 0,
"3DSTATE_LOAD_STATE_IMMEDIATE_2\n");
len = (data[0] & 0x0000000f) + 2;
i = 1;
for (word = 6; word <= 14; word++) {
if (data[0] & (1 << word)) {
if (word == 6)
instr_out(ctx, i++,
"TBCF\n");
else if (word >= 7 && word <= 10) {
instr_out(ctx, i++,
"TB%dC\n", word - 7);
instr_out(ctx, i++,
"TB%dA\n", word - 7);
} else if (word >= 11 && word <= 14) {
instr_out(ctx, i,
"TM%dS0: offset=0x%08x, %s\n",
word - 11,
data[i] & 0xfffffffe,
data[i] & 1 ? "use fence" :
"");
i++;
instr_out(ctx, i,
"TM%dS1: height=%i, width=%i, %s\n",
word - 11, data[i] >> 21,
(data[i] >> 10) & 0x3ff,
data[i] & 2 ? (data[i] & 1 ?
"y-tiled" :
"x-tiled") :
"");
i++;
instr_out(ctx, i,
"TM%dS2: pitch=%i, \n",
word - 11,
((data[i] >> 21) + 1) * 4);
i++;
instr_out(ctx, i++,
"TM%dS3\n", word - 11);
instr_out(ctx, i++,
"TM%dS4: dflt color\n",
word - 11);
}
}
}
if (len != i) {
fprintf(out,
"Bad count in 3DSTATE_LOAD_STATE_IMMEDIATE_2\n");
}
return len;
case 0x00:
instr_out(ctx, 0, "3DSTATE_MAP_STATE\n");
len = (data[0] & 0x0000003f) + 2;
instr_out(ctx, 1, "mask\n");
i = 2;
for (map = 0; map <= 15; map++) {
if (data[1] & (1 << map)) {
int width, height, pitch, dword;
const char *tiling;
dword = data[i];
instr_out(ctx, i++,
"map %d MS2 %s%s%s\n", map,
dword & (1 << 31) ?
"untrusted surface, " : "",
dword & (1 << 1) ?
"vertical line stride enable, " : "",
dword & (1 << 0) ?
"vertical ofs enable, " : "");
dword = data[i];
width = ((dword >> 10) & ((1 << 11) - 1)) + 1;
height = ((dword >> 21) & ((1 << 11) - 1)) + 1;
tiling = "none";
if (dword & (1 << 2))
tiling = "fenced";
else if (dword & (1 << 1))
tiling = dword & (1 << 0) ? "Y" : "X";
type = " BAD";
format = "BAD";
switch ((dword >> 7) & 0x7) {
case 1:
type = "8b";
switch ((dword >> 3) & 0xf) {
case 0:
format = "I";
break;
case 1:
format = "L";
break;
case 4:
format = "A";
break;
case 5:
format = " mono";
break;
}
break;
case 2:
type = "16b";
switch ((dword >> 3) & 0xf) {
case 0:
format = " rgb565";
break;
case 1:
format = " argb1555";
break;
case 2:
format = " argb4444";
break;
case 5:
format = " ay88";
break;
case 6:
format = " bump655";
break;
case 7:
format = "I";
break;
case 8:
format = "L";
break;
case 9:
format = "A";
break;
}
break;
case 3:
type = "32b";
switch ((dword >> 3) & 0xf) {
case 0:
format = " argb8888";
break;
case 1:
format = " abgr8888";
break;
case 2:
format = " xrgb8888";
break;
case 3:
format = " xbgr8888";
break;
case 4:
format = " qwvu8888";
break;
case 5:
format = " axvu8888";
break;
case 6:
format = " lxvu8888";
break;
case 7:
format = " xlvu8888";
break;
case 8:
format = " argb2101010";
break;
case 9:
format = " abgr2101010";
break;
case 10:
format = " awvu2101010";
break;
case 11:
format = " gr1616";
break;
case 12:
format = " vu1616";
break;
case 13:
format = " xI824";
break;
case 14:
format = " xA824";
break;
case 15:
format = " xL824";
break;
}
break;
case 5:
type = "422";
switch ((dword >> 3) & 0xf) {
case 0:
format = " yuv_swapy";
break;
case 1:
format = " yuv";
break;
case 2:
format = " yuv_swapuv";
break;
case 3:
format = " yuv_swapuvy";
break;
}
break;
case 6:
type = "compressed";
switch ((dword >> 3) & 0x7) {
case 0:
format = " dxt1";
break;
case 1:
format = " dxt2_3";
break;
case 2:
format = " dxt4_5";
break;
case 3:
format = " fxt1";
break;
case 4:
format = " dxt1_rb";
break;
}
break;
case 7:
type = "4b indexed";
switch ((dword >> 3) & 0xf) {
case 7:
format = " argb8888";
break;
}
break;
}
dword = data[i];
instr_out(ctx, i++,
"map %d MS3 [width=%d, height=%d, format=%s%s, tiling=%s%s]\n",
map, width, height, type, format,
tiling,
dword & (1 << 9) ? " palette select" :
"");
dword = data[i];
pitch =
4 * (((dword >> 21) & ((1 << 11) - 1)) + 1);
instr_out(ctx, i++,
"map %d MS4 [pitch=%d, max_lod=%i, vol_depth=%i, cube_face_ena=%x, %s]\n",
map, pitch, (dword >> 9) & 0x3f,
dword & 0xff, (dword >> 15) & 0x3f,
dword & (1 << 8) ? "miplayout legacy"
: "miplayout right");
}
}
if (len != i) {
fprintf(out, "Bad count in 3DSTATE_MAP_STATE\n");
return len;
}
return len;
case 0x06:
instr_out(ctx, 0,
"3DSTATE_PIXEL_SHADER_CONSTANTS\n");
len = (data[0] & 0x000000ff) + 2;
i = 2;
for (c = 0; c <= 31; c++) {
if (data[1] & (1 << c)) {
instr_out(ctx, i, "C%d.X = %f\n", c,
int_as_float(data[i]));
i++;
instr_out(ctx, i, "C%d.Y = %f\n",
c, int_as_float(data[i]));
i++;
instr_out(ctx, i, "C%d.Z = %f\n",
c, int_as_float(data[i]));
i++;
instr_out(ctx, i, "C%d.W = %f\n",
c, int_as_float(data[i]));
i++;
}
}
if (len != i) {
fprintf(out,
"Bad count in 3DSTATE_PIXEL_SHADER_CONSTANTS\n");
}
return len;
case 0x05:
instr_out(ctx, 0, "3DSTATE_PIXEL_SHADER_PROGRAM\n");
len = (data[0] & 0x000000ff) + 2;
if ((len - 1) % 3 != 0 || len > 370) {
fprintf(out,
"Bad count in 3DSTATE_PIXEL_SHADER_PROGRAM\n");
}
i = 1;
for (instr = 0; instr < (len - 1) / 3; instr++) {
char instr_prefix[10];
sprintf(instr_prefix, "PS%03d", instr);
i915_decode_instruction(ctx, i,
instr_prefix);
i += 3;
}
return len;
case 0x01:
if (IS_GEN2(devid))
break;
instr_out(ctx, 0, "3DSTATE_SAMPLER_STATE\n");
instr_out(ctx, 1, "mask\n");
len = (data[0] & 0x0000003f) + 2;
i = 2;
for (sampler = 0; sampler <= 15; sampler++) {
if (data[1] & (1 << sampler)) {
uint32_t dword;
const char *mip_filter = "";
dword = data[i];
switch ((dword >> 20) & 0x3) {
case 0:
mip_filter = "none";
break;
case 1:
mip_filter = "nearest";
break;
case 3:
mip_filter = "linear";
break;
}
instr_out(ctx, i++,
"sampler %d SS2:%s%s%s "
"base_mip_level=%i, mip_filter=%s, mag_filter=%s, min_filter=%s "
"lod_bias=%.2f,%s max_aniso=%i, shadow_func=%s\n",
sampler,
dword & (1 << 31) ? " reverse gamma,"
: "",
dword & (1 << 30) ? " packed2planar,"
: "",
dword & (1 << 29) ?
" colorspace conversion," : "",
(dword >> 22) & 0x1f, mip_filter,
decode_sample_filter(dword >> 17),
decode_sample_filter(dword >> 14),
((dword >> 5) & 0x1ff) / (0x10 * 1.0),
dword & (1 << 4) ? " shadow," : "",
dword & (1 << 3) ? 4 : 2,
decode_compare_func(dword));
dword = data[i];
instr_out(ctx, i++,
"sampler %d SS3: min_lod=%.2f,%s "
"tcmode_x=%s, tcmode_y=%s, tcmode_z=%s,%s texmap_idx=%i,%s\n",
sampler,
((dword >> 24) & 0xff) / (0x10 * 1.0),
dword & (1 << 17) ?
" kill pixel enable," : "",
decode_tex_coord_mode(dword >> 12),
decode_tex_coord_mode(dword >> 9),
decode_tex_coord_mode(dword >> 6),
dword & (1 << 5) ?
" normalized coords," : "",
(dword >> 1) & 0xf,
dword & (1 << 0) ? " deinterlacer," :
"");
dword = data[i];
instr_out(ctx, i++,
"sampler %d SS4: border color\n",
sampler);
}
}
if (len != i) {
fprintf(out, "Bad count in 3DSTATE_SAMPLER_STATE\n");
}
return len;
case 0x85:
len = (data[0] & 0x0000000f) + 2;
if (len != 2)
fprintf(out,
"Bad count in 3DSTATE_DEST_BUFFER_VARIABLES\n");
instr_out(ctx, 0,
"3DSTATE_DEST_BUFFER_VARIABLES\n");
switch ((data[1] >> 8) & 0xf) {
case 0x0:
format = "g8";
break;
case 0x1:
format = "x1r5g5b5";
break;
case 0x2:
format = "r5g6b5";
break;
case 0x3:
format = "a8r8g8b8";
break;
case 0x4:
format = "ycrcb_swapy";
break;
case 0x5:
format = "ycrcb_normal";
break;
case 0x6:
format = "ycrcb_swapuv";
break;
case 0x7:
format = "ycrcb_swapuvy";
break;
case 0x8:
format = "a4r4g4b4";
break;
case 0x9:
format = "a1r5g5b5";
break;
case 0xa:
format = "a2r10g10b10";
break;
default:
format = "BAD";
break;
}
switch ((data[1] >> 2) & 0x3) {
case 0x0:
zformat = "u16";
break;
case 0x1:
zformat = "f16";
break;
case 0x2:
zformat = "u24x8";
break;
default:
zformat = "BAD";
break;
}
instr_out(ctx, 1,
"%s format, %s depth format, early Z %sabled\n",
format, zformat,
(data[1] & (1 << 31)) ? "en" : "dis");
return len;
case 0x8e:
{
const char *name, *tiling;
len = (data[0] & 0x0000000f) + 2;
if (len != 3)
fprintf(out,
"Bad count in 3DSTATE_BUFFER_INFO\n");
switch ((data[1] >> 24) & 0x7) {
case 0x3:
name = "color";
break;
case 0x7:
name = "depth";
break;
default:
name = "unknown";
break;
}
tiling = "none";
if (data[1] & (1 << 23))
tiling = "fenced";
else if (data[1] & (1 << 22))
tiling = data[1] & (1 << 21) ? "Y" : "X";
instr_out(ctx, 0, "3DSTATE_BUFFER_INFO\n");
instr_out(ctx, 1,
"%s, tiling = %s, pitch=%d\n", name, tiling,
data[1] & 0xffff);
instr_out(ctx, 2, "address\n");
return len;
}
case 0x81:
len = (data[0] & 0x0000000f) + 2;
if (len != 3)
fprintf(out,
"Bad count in 3DSTATE_SCISSOR_RECTANGLE\n");
instr_out(ctx, 0, "3DSTATE_SCISSOR_RECTANGLE\n");
instr_out(ctx, 1, "(%d,%d)\n",
data[1] & 0xffff, data[1] >> 16);
instr_out(ctx, 2, "(%d,%d)\n",
data[2] & 0xffff, data[2] >> 16);
return len;
case 0x80:
len = (data[0] & 0x0000000f) + 2;
if (len != 5)
fprintf(out,
"Bad count in 3DSTATE_DRAWING_RECTANGLE\n");
instr_out(ctx, 0, "3DSTATE_DRAWING_RECTANGLE\n");
instr_out(ctx, 1, "%s\n",
data[1] & (1 << 30) ? "depth ofs disabled " : "");
instr_out(ctx, 2, "(%d,%d)\n",
data[2] & 0xffff, data[2] >> 16);
instr_out(ctx, 3, "(%d,%d)\n",
data[3] & 0xffff, data[3] >> 16);
instr_out(ctx, 4, "(%d,%d)\n",
data[4] & 0xffff, data[4] >> 16);
return len;
case 0x9c:
len = (data[0] & 0x0000000f) + 2;
if (len != 7)
fprintf(out, "Bad count in 3DSTATE_CLEAR_PARAMETERS\n");
instr_out(ctx, 0, "3DSTATE_CLEAR_PARAMETERS\n");
instr_out(ctx, 1, "prim_type=%s, clear=%s%s%s\n",
data[1] & (1 << 16) ? "CLEAR_RECT" : "ZONE_INIT",
data[1] & (1 << 2) ? "color," : "",
data[1] & (1 << 1) ? "depth," : "",
data[1] & (1 << 0) ? "stencil," : "");
instr_out(ctx, 2, "clear color\n");
instr_out(ctx, 3, "clear depth/stencil\n");
instr_out(ctx, 4, "color value (rgba8888)\n");
instr_out(ctx, 5, "depth value %f\n",
int_as_float(data[5]));
instr_out(ctx, 6, "clear stencil\n");
return len;
}
for (idx = 0; idx < ARRAY_SIZE(opcodes_3d_1d); idx++) {
opcode_3d_1d = &opcodes_3d_1d[idx];
if (opcode_3d_1d->i830_only && !IS_GEN2(devid))
continue;
if (((data[0] & 0x00ff0000) >> 16) == opcode_3d_1d->opcode) {
len = 1;
instr_out(ctx, 0, "%s\n",
opcode_3d_1d->name);
if (opcode_3d_1d->max_len > 1) {
len = (data[0] & 0x0000ffff) + 2;
if (len < opcode_3d_1d->min_len ||
len > opcode_3d_1d->max_len) {
fprintf(out, "Bad count in %s\n",
opcode_3d_1d->name);
}
}
for (i = 1; i < len; i++) {
instr_out(ctx, i, "dword %d\n", i);
}
return len;
}
}
instr_out(ctx, 0, "3D UNKNOWN: 3d_1d opcode = 0x%x\n",
opcode);
return 1;
}
static int
decode_3d_primitive(struct drm_intel_decode *ctx)
{
uint32_t *data = ctx->data;
uint32_t count = ctx->count;
char immediate = (data[0] & (1 << 23)) == 0;
unsigned int len, i, j, ret;
const char *primtype;
int original_s2 = saved_s2;
int original_s4 = saved_s4;
switch ((data[0] >> 18) & 0xf) {
case 0x0:
primtype = "TRILIST";
break;
case 0x1:
primtype = "TRISTRIP";
break;
case 0x2:
primtype = "TRISTRIP_REVERSE";
break;
case 0x3:
primtype = "TRIFAN";
break;
case 0x4:
primtype = "POLYGON";
break;
case 0x5:
primtype = "LINELIST";
break;
case 0x6:
primtype = "LINESTRIP";
break;
case 0x7:
primtype = "RECTLIST";
break;
case 0x8:
primtype = "POINTLIST";
break;
case 0x9:
primtype = "DIB";
break;
case 0xa:
primtype = "CLEAR_RECT";
saved_s4 = 3 << 6;
saved_s2 = ~0;
break;
default:
primtype = "unknown";
break;
}
/* XXX: 3DPRIM_DIB not supported */
if (immediate) {
len = (data[0] & 0x0003ffff) + 2;
instr_out(ctx, 0, "3DPRIMITIVE inline %s\n",
primtype);
if (count < len)
BUFFER_FAIL(count, len, "3DPRIMITIVE inline");
if (!saved_s2_set || !saved_s4_set) {
fprintf(out, "unknown vertex format\n");
for (i = 1; i < len; i++) {
instr_out(ctx, i,
" vertex data (%f float)\n",
int_as_float(data[i]));
}
} else {
unsigned int vertex = 0;
for (i = 1; i < len;) {
unsigned int tc;
#define VERTEX_OUT(fmt, ...) do { \
if (i < len) \
instr_out(ctx, i, " V%d."fmt"\n", vertex, __VA_ARGS__); \
else \
fprintf(out, " missing data in V%d\n", vertex); \
i++; \
} while (0)
VERTEX_OUT("X = %f", int_as_float(data[i]));
VERTEX_OUT("Y = %f", int_as_float(data[i]));
switch (saved_s4 >> 6 & 0x7) {
case 0x1:
VERTEX_OUT("Z = %f",
int_as_float(data[i]));
break;
case 0x2:
VERTEX_OUT("Z = %f",
int_as_float(data[i]));
VERTEX_OUT("W = %f",
int_as_float(data[i]));
break;
case 0x3:
break;
case 0x4:
VERTEX_OUT("W = %f",
int_as_float(data[i]));
break;
default:
fprintf(out, "bad S4 position mask\n");
}
if (saved_s4 & (1 << 10)) {
VERTEX_OUT
("color = (A=0x%02x, R=0x%02x, G=0x%02x, "
"B=0x%02x)", data[i] >> 24,
(data[i] >> 16) & 0xff,
(data[i] >> 8) & 0xff,
data[i] & 0xff);
}
if (saved_s4 & (1 << 11)) {
VERTEX_OUT
("spec = (A=0x%02x, R=0x%02x, G=0x%02x, "
"B=0x%02x)", data[i] >> 24,
(data[i] >> 16) & 0xff,
(data[i] >> 8) & 0xff,
data[i] & 0xff);
}
if (saved_s4 & (1 << 12))
VERTEX_OUT("width = 0x%08x)", data[i]);
for (tc = 0; tc <= 7; tc++) {
switch ((saved_s2 >> (tc * 4)) & 0xf) {
case 0x0:
VERTEX_OUT("T%d.X = %f", tc,
int_as_float(data
[i]));
VERTEX_OUT("T%d.Y = %f", tc,
int_as_float(data
[i]));
break;
case 0x1:
VERTEX_OUT("T%d.X = %f", tc,
int_as_float(data
[i]));
VERTEX_OUT("T%d.Y = %f", tc,
int_as_float(data
[i]));
VERTEX_OUT("T%d.Z = %f", tc,
int_as_float(data
[i]));
break;
case 0x2:
VERTEX_OUT("T%d.X = %f", tc,
int_as_float(data
[i]));
VERTEX_OUT("T%d.Y = %f", tc,
int_as_float(data
[i]));
VERTEX_OUT("T%d.Z = %f", tc,
int_as_float(data
[i]));
VERTEX_OUT("T%d.W = %f", tc,
int_as_float(data
[i]));
break;
case 0x3:
VERTEX_OUT("T%d.X = %f", tc,
int_as_float(data
[i]));
break;
case 0x4:
VERTEX_OUT
("T%d.XY = 0x%08x half-float",
tc, data[i]);
break;
case 0x5:
VERTEX_OUT
("T%d.XY = 0x%08x half-float",
tc, data[i]);
VERTEX_OUT
("T%d.ZW = 0x%08x half-float",
tc, data[i]);
break;
case 0xf:
break;
default:
fprintf(out,
"bad S2.T%d format\n",
tc);
}
}
vertex++;
}
}
ret = len;
} else {
/* indirect vertices */
len = data[0] & 0x0000ffff; /* index count */
if (data[0] & (1 << 17)) {
/* random vertex access */
if (count < (len + 1) / 2 + 1) {
BUFFER_FAIL(count, (len + 1) / 2 + 1,
"3DPRIMITIVE random indirect");
}
instr_out(ctx, 0,
"3DPRIMITIVE random indirect %s (%d)\n",
primtype, len);
if (len == 0) {
/* vertex indices continue until 0xffff is
* found
*/
for (i = 1; i < count; i++) {
if ((data[i] & 0xffff) == 0xffff) {
instr_out(ctx, i,
" indices: (terminator)\n");
ret = i;
goto out;
} else if ((data[i] >> 16) == 0xffff) {
instr_out(ctx, i,
" indices: 0x%04x, (terminator)\n",
data[i] & 0xffff);
ret = i;
goto out;
} else {
instr_out(ctx, i,
" indices: 0x%04x, 0x%04x\n",
data[i] & 0xffff,
data[i] >> 16);
}
}
fprintf(out,
"3DPRIMITIVE: no terminator found in index buffer\n");
ret = count;