diff options
Diffstat (limited to 'src/intel/tools/aubinator.c')
| -rw-r--r-- | src/intel/tools/aubinator.c | 1066 |
1 files changed, 1066 insertions, 0 deletions
diff --git a/src/intel/tools/aubinator.c b/src/intel/tools/aubinator.c new file mode 100644 index 00000000000..250a2e1ecbf --- /dev/null +++ b/src/intel/tools/aubinator.c @@ -0,0 +1,1066 @@ +/* + * Copyright © 2016 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 <stdio.h> +#include <stdlib.h> +#include <stdint.h> + +#include <unistd.h> +#include <fcntl.h> +#include <string.h> +#include <signal.h> +#include <errno.h> +#include <error.h> +#include <sys/types.h> +#include <sys/stat.h> +#include <sys/wait.h> +#include <sys/mman.h> + +#include "decoder.h" +#include "intel_aub.h" +#include "gen_disasm.h" + +/* Below is the only command missing from intel_aub.h in libdrm + * So, reuse intel_aub.h from libdrm and #define the + * AUB_MI_BATCH_BUFFER_END as below + */ +#define AUB_MI_BATCH_BUFFER_END (0x0500 << 16) + +#define CSI "\e[" +#define HEADER CSI "37;44m" +#define NORMAL CSI "0m" +#define CLEAR_TO_EOL CSI "0K" + +/* options */ + +static bool option_full_decode = true; +static bool option_print_offsets = true; +static enum { COLOR_AUTO, COLOR_ALWAYS, COLOR_NEVER } option_color; + +/* state */ + +struct gen_disasm *disasm; + +uint64_t gtt_size, gtt_end; +void *gtt; +uint64_t general_state_base; +uint64_t surface_state_base; +uint64_t dynamic_state_base; +uint64_t instruction_base; +uint64_t instruction_bound; + +static inline uint32_t +field(uint32_t value, int start, int end) +{ + uint32_t mask; + + mask = ~0U >> (31 - end + start); + + return (value >> start) & mask; +} + +struct brw_instruction; + +static inline int +valid_offset(uint32_t offset) +{ + return offset < gtt_end; +} + +static void +decode_structure(struct gen_spec *spec, struct gen_group *strct, const uint32_t *p) +{ + struct gen_field_iterator iter; + + gen_field_iterator_init(&iter, strct, p); + while (gen_field_iterator_next(&iter)) { + printf(" %s: %s\n", iter.name, iter.value); + } +} + +static void +dump_binding_table(struct gen_spec *spec, uint32_t offset) +{ + uint32_t *pointers, i; + uint64_t start; + struct gen_group *surface_state; + + surface_state = gen_spec_find_struct(spec, "RENDER_SURFACE_STATE"); + if (surface_state == NULL) { + printf("did not find RENDER_SURFACE_STATE info\n"); + return; + } + + start = surface_state_base + offset; + pointers = gtt + start; + for (i = 0; i < 16; i++) { + if (pointers[i] == 0) + continue; + start = pointers[i] + surface_state_base; + if (!valid_offset(start)) { + printf("pointer %u: %08x <not valid>\n", + i, pointers[i]); + continue; + } else { + printf("pointer %u: %08x\n", i, pointers[i]); + } + + decode_structure(spec, surface_state, gtt + start); + } +} + +static void +handle_3dstate_index_buffer(struct gen_spec *spec, uint32_t *p) +{ + void *start; + uint32_t length, i, type, size; + + start = gtt + p[2]; + type = (p[1] >> 8) & 3; + size = 1 << type; + length = p[4] / size; + if (length > 10) + length = 10; + + printf("\t"); + + for (i = 0; i < length; i++) { + switch (type) { + case 0: + printf("%3d ", ((uint8_t *)start)[i]); + break; + case 1: + printf("%3d ", ((uint16_t *)start)[i]); + break; + case 2: + printf("%3d ", ((uint32_t *)start)[i]); + break; + } + } + if (length < p[4] / size) + printf("...\n"); + else + printf("\n"); +} + +static inline uint64_t +get_qword(uint32_t *p) +{ + return ((uint64_t) p[1] << 32) | p[0]; +} + +static void +handle_state_base_address(struct gen_spec *spec, uint32_t *p) +{ + uint64_t mask = ~((1 << 12) - 1); + + if (gen_spec_get_gen(spec) >= gen_make_gen(8,0)) { + if (p[1] & 1) + general_state_base = get_qword(&p[1]) & mask; + if (p[4] & 1) + surface_state_base = get_qword(&p[4]) & mask; + if (p[6] & 1) + dynamic_state_base = get_qword(&p[6]) & mask; + if (p[10] & 1) + instruction_base = get_qword(&p[10]) & mask; + if (p[15] & 1) + instruction_bound = p[15] & mask; + } else { + if (p[2] & 1) + surface_state_base = p[2] & mask; + if (p[3] & 1) + dynamic_state_base = p[3] & mask; + if (p[5] & 1) + instruction_base = p[5] & mask; + if (p[9] & 1) + instruction_bound = p[9] & mask; + } +} + +static void +dump_samplers(struct gen_spec *spec, uint32_t offset) +{ + uint32_t i; + uint64_t start; + struct gen_group *sampler_state; + + sampler_state = gen_spec_find_struct(spec, "SAMPLER_STATE"); + + start = dynamic_state_base + offset; + for (i = 0; i < 4; i++) { + printf("sampler state %d\n", i); + decode_structure(spec, sampler_state, gtt + start + i * 16); + } +} + +static void +handle_media_interface_descriptor_load(struct gen_spec *spec, uint32_t *p) +{ + int i, length = p[2] / 32; + struct gen_group *descriptor_structure; + uint32_t *descriptors; + uint64_t start; + struct brw_instruction *insns; + + descriptor_structure = + gen_spec_find_struct(spec, "INTERFACE_DESCRIPTOR_DATA"); + if (descriptor_structure == NULL) { + printf("did not find INTERFACE_DESCRIPTOR_DATA info\n"); + return; + } + + start = dynamic_state_base + p[3]; + descriptors = gtt + start; + for (i = 0; i < length; i++, descriptors += 8) { + printf("descriptor %u: %08x\n", i, *descriptors); + decode_structure(spec, descriptor_structure, descriptors); + + start = instruction_base + descriptors[0]; + if (!valid_offset(start)) { + printf("kernel: %08lx <not valid>\n", start); + continue; + } else { + printf("kernel: %08lx\n", start); + } + + insns = (struct brw_instruction *) (gtt + start); + gen_disasm_disassemble(disasm, insns, 0, 8192, stdout); + + dump_samplers(spec, descriptors[3] & ~0x1f); + dump_binding_table(spec, descriptors[4] & ~0x1f); + } +} + +/* Heuristic to determine whether a uint32_t is probably actually a float + * (http://stackoverflow.com/a/2953466) + */ + +static bool +probably_float(uint32_t bits) +{ + int exp = ((bits & 0x7f800000U) >> 23) - 127; + uint32_t mant = bits & 0x007fffff; + + /* +- 0.0 */ + if (exp == -127 && mant == 0) + return true; + + /* +- 1 billionth to 1 billion */ + if (-30 <= exp && exp <= 30) + return true; + + /* some value with only a few binary digits */ + if ((mant & 0x0000ffff) == 0) + return true; + + return false; +} + +static void +handle_3dstate_vertex_buffers(struct gen_spec *spec, uint32_t *p) +{ + uint32_t *end, *s, *dw, *dwend; + uint64_t offset; + int n, i, count, stride; + + end = (p[0] & 0xff) + p + 2; + for (s = &p[1], n = 0; s < end; s += 4, n++) { + if (gen_spec_get_gen(spec) >= gen_make_gen(8, 0)) { + offset = *(uint64_t *) &s[1]; + dwend = gtt + offset + s[3]; + } else { + offset = s[1]; + dwend = gtt + s[2] + 1; + } + + stride = field(s[0], 0, 11); + count = 0; + printf("vertex buffer %d, size %d\n", n, s[3]); + for (dw = gtt + offset, i = 0; dw < dwend && i < 256; dw++) { + if (count == 0 && count % (8 * 4) == 0) + printf(" "); + + if (probably_float(*dw)) + printf(" %8.2f", *(float *) dw); + else + printf(" 0x%08x", *dw); + + i++; + count += 4; + + if (count == stride) { + printf("\n"); + count = 0; + } else if (count % (8 * 4) == 0) { + printf("\n"); + } else { + printf(" "); + } + } + if (count > 0 && count % (8 * 4) != 0) + printf("\n"); + } +} + +static void +handle_3dstate_vs(struct gen_spec *spec, uint32_t *p) +{ + uint64_t start; + struct brw_instruction *insns; + int vs_enable; + + if (gen_spec_get_gen(spec) >= gen_make_gen(8, 0)) { + start = get_qword(&p[1]); + vs_enable = p[7] & 1; + } else { + start = p[1]; + vs_enable = p[5] & 1; + } + + if (vs_enable) { + printf("instruction_base %08lx, start %08lx\n", + instruction_base, start); + + insns = (struct brw_instruction *) (gtt + instruction_base + start); + gen_disasm_disassemble(disasm, insns, 0, 8192, stdout); + } +} + +static void +handle_3dstate_constant(struct gen_spec *spec, uint32_t *p) +{ + int i, j, length; + uint32_t *dw; + float *f; + + for (i = 0; i < 4; i++) { + length = (p[1 + i / 2] >> (i & 1) * 16) & 0xffff; + f = (float *) (gtt + p[3 + i * 2] + dynamic_state_base); + dw = (uint32_t *) f; + for (j = 0; j < length * 8; j++) { + if (probably_float(dw[j])) + printf(" %04.3f", f[j]); + else + printf(" 0x%08x", dw[j]); + + if ((j & 7) == 7) + printf("\n"); + } + } +} + +static void +handle_3dstate_ps(struct gen_spec *spec, uint32_t *p) +{ + uint32_t mask = ~((1 << 6) - 1); + uint64_t start; + struct brw_instruction *insns; + static const char unused[] = "unused"; + static const char *pixel_type[3] = {"8 pixel", "16 pixel", "32 pixel"}; + const char *k0, *k1, *k2; + uint32_t k_mask, k1_offset, k2_offset; + + if (gen_spec_get_gen(spec) >= gen_make_gen(8, 0)) { + k_mask = p[6] & 7; + k1_offset = 8; + k2_offset = 10; + } else { + k_mask = p[4] & 7; + k1_offset = 6; + k2_offset = 7; + } + +#define DISPATCH_8 1 +#define DISPATCH_16 2 +#define DISPATCH_32 4 + + switch (k_mask) { + case DISPATCH_8: + k0 = pixel_type[0]; + k1 = unused; + k2 = unused; + break; + case DISPATCH_16: + k0 = pixel_type[1]; + k1 = unused; + k2 = unused; + break; + case DISPATCH_8 | DISPATCH_16: + k0 = pixel_type[0]; + k1 = unused; + k2 = pixel_type[1]; + break; + case DISPATCH_32: + k0 = pixel_type[2]; + k1 = unused; + k2 = unused; + break; + case DISPATCH_16 | DISPATCH_32: + k0 = unused; + k1 = pixel_type[2]; + k2 = pixel_type[1]; + break; + case DISPATCH_8 | DISPATCH_16 | DISPATCH_32: + k0 = pixel_type[0]; + k1 = pixel_type[2]; + k2 = pixel_type[1]; + break; + default: + k0 = unused; + k1 = unused; + k2 = unused; + break; + } + + start = instruction_base + (p[1] & mask); + printf(" Kernel[0] %s\n", k0); + if (k0 != unused) { + insns = (struct brw_instruction *) (gtt + start); + gen_disasm_disassemble(disasm, insns, 0, 8192, stdout); + } + + start = instruction_base + (p[k1_offset] & mask); + printf(" Kernel[1] %s\n", k1); + if (k1 != unused) { + insns = (struct brw_instruction *) (gtt + start); + gen_disasm_disassemble(disasm, insns, 0, 8192, stdout); + } + + start = instruction_base + (p[k2_offset] & mask); + printf(" Kernel[2] %s\n", k2); + if (k2 != unused) { + insns = (struct brw_instruction *) (gtt + start); + gen_disasm_disassemble(disasm, insns, 0, 8192, stdout); + } +} + +static void +handle_3dstate_binding_table_pointers(struct gen_spec *spec, uint32_t *p) +{ + dump_binding_table(spec, p[1]); +} + +static void +handle_3dstate_sampler_state_pointers(struct gen_spec *spec, uint32_t *p) +{ + dump_samplers(spec, p[1]); +} + +static void +handle_3dstate_viewport_state_pointers_cc(struct gen_spec *spec, uint32_t *p) +{ + uint64_t start; + struct gen_group *cc_viewport; + + cc_viewport = gen_spec_find_struct(spec, "CC_VIEWPORT"); + + start = dynamic_state_base + (p[1] & ~0x1fu); + for (uint32_t i = 0; i < 4; i++) { + printf("viewport %d\n", i); + decode_structure(spec, cc_viewport, gtt + start + i * 8); + } +} + +static void +handle_3dstate_viewport_state_pointers_sf_clip(struct gen_spec *spec, uint32_t *p) +{ + uint64_t start; + struct gen_group *sf_clip_viewport; + + sf_clip_viewport = gen_spec_find_struct(spec, "SF_CLIP_VIEWPORT"); + + start = dynamic_state_base + (p[1] & ~0x3fu); + for (uint32_t i = 0; i < 4; i++) { + printf("viewport %d\n", i); + decode_structure(spec, sf_clip_viewport, gtt + start + i * 64); + } +} + +static void +handle_3dstate_blend_state_pointers(struct gen_spec *spec, uint32_t *p) +{ + uint64_t start; + struct gen_group *blend_state; + + blend_state = gen_spec_find_struct(spec, "BLEND_STATE"); + + start = dynamic_state_base + (p[1] & ~0x3fu); + decode_structure(spec, blend_state, gtt + start); +} + +static void +handle_3dstate_cc_state_pointers(struct gen_spec *spec, uint32_t *p) +{ + uint64_t start; + struct gen_group *cc_state; + + cc_state = gen_spec_find_struct(spec, "COLOR_CALC_STATE"); + + start = dynamic_state_base + (p[1] & ~0x3fu); + decode_structure(spec, cc_state, gtt + start); +} + +static void +handle_3dstate_scissor_state_pointers(struct gen_spec *spec, uint32_t *p) +{ + uint64_t start; + struct gen_group *scissor_rect; + + scissor_rect = gen_spec_find_struct(spec, "SCISSOR_RECT"); + + start = dynamic_state_base + (p[1] & ~0x1fu); + decode_structure(spec, scissor_rect, gtt + start); +} + +#define ARRAY_LENGTH(a) (sizeof (a) / sizeof (a)[0]) + +#define STATE_BASE_ADDRESS 0x61010000 + +#define MEDIA_INTERFACE_DESCRIPTOR_LOAD 0x70020000 + +#define _3DSTATE_INDEX_BUFFER 0x780a0000 +#define _3DSTATE_VERTEX_BUFFERS 0x78080000 + +#define _3DSTATE_VS 0x78100000 +#define _3DSTATE_GS 0x78110000 + +#define _3DSTATE_CONSTANT_VS 0x78150000 +#define _3DSTATE_CONSTANT_GS 0x78160000 +#define _3DSTATE_CONSTANT_PS 0x78170000 +#define _3DSTATE_CONSTANT_HS 0x78190000 +#define _3DSTATE_CONSTANT_DS 0x781A0000 + +#define _3DSTATE_PS 0x78200000 + +#define _3DSTATE_BINDING_TABLE_POINTERS_VS 0x78260000 +#define _3DSTATE_BINDING_TABLE_POINTERS_HS 0x78270000 +#define _3DSTATE_BINDING_TABLE_POINTERS_DS 0x78280000 +#define _3DSTATE_BINDING_TABLE_POINTERS_GS 0x78290000 +#define _3DSTATE_BINDING_TABLE_POINTERS_PS 0x782a0000 + +#define _3DSTATE_SAMPLER_STATE_POINTERS_VS 0x782b0000 +#define _3DSTATE_SAMPLER_STATE_POINTERS_GS 0x782e0000 +#define _3DSTATE_SAMPLER_STATE_POINTERS_PS 0x782f0000 + +#define _3DSTATE_VIEWPORT_STATE_POINTERS_CC 0x78230000 +#define _3DSTATE_VIEWPORT_STATE_POINTERS_SF_CLIP 0x78210000 +#define _3DSTATE_BLEND_STATE_POINTERS 0x78240000 +#define _3DSTATE_CC_STATE_POINTERS 0x780e0000 +#define _3DSTATE_SCISSOR_STATE_POINTERS 0x780f0000 + +struct custom_handler { + uint32_t opcode; + void (*handle)(struct gen_spec *spec, uint32_t *p); +} custom_handlers[] = { + { STATE_BASE_ADDRESS, handle_state_base_address }, + { MEDIA_INTERFACE_DESCRIPTOR_LOAD, handle_media_interface_descriptor_load }, + { _3DSTATE_VERTEX_BUFFERS, handle_3dstate_vertex_buffers }, + { _3DSTATE_INDEX_BUFFER, handle_3dstate_index_buffer }, + { _3DSTATE_VS, handle_3dstate_vs }, + { _3DSTATE_GS, handle_3dstate_vs }, + /* FIXME: Handle disassmbing for 3DSTATE_HS and 3DSTATE_DS. */ + { _3DSTATE_CONSTANT_VS, handle_3dstate_constant }, + { _3DSTATE_CONSTANT_GS, handle_3dstate_constant }, + { _3DSTATE_CONSTANT_PS, handle_3dstate_constant }, + { _3DSTATE_CONSTANT_HS, handle_3dstate_constant }, + { _3DSTATE_CONSTANT_DS, handle_3dstate_constant }, + { _3DSTATE_PS, handle_3dstate_ps }, + + { _3DSTATE_BINDING_TABLE_POINTERS_VS, handle_3dstate_binding_table_pointers }, + { _3DSTATE_BINDING_TABLE_POINTERS_HS, handle_3dstate_binding_table_pointers }, + { _3DSTATE_BINDING_TABLE_POINTERS_DS, handle_3dstate_binding_table_pointers }, + { _3DSTATE_BINDING_TABLE_POINTERS_GS, handle_3dstate_binding_table_pointers }, + { _3DSTATE_BINDING_TABLE_POINTERS_PS, handle_3dstate_binding_table_pointers }, + + { _3DSTATE_SAMPLER_STATE_POINTERS_VS, handle_3dstate_sampler_state_pointers }, + { _3DSTATE_SAMPLER_STATE_POINTERS_GS, handle_3dstate_sampler_state_pointers }, + { _3DSTATE_SAMPLER_STATE_POINTERS_PS, handle_3dstate_sampler_state_pointers }, + + { _3DSTATE_VIEWPORT_STATE_POINTERS_CC, handle_3dstate_viewport_state_pointers_cc }, + { _3DSTATE_VIEWPORT_STATE_POINTERS_SF_CLIP, handle_3dstate_viewport_state_pointers_sf_clip }, + { _3DSTATE_BLEND_STATE_POINTERS, handle_3dstate_blend_state_pointers }, + { _3DSTATE_CC_STATE_POINTERS, handle_3dstate_cc_state_pointers }, + { _3DSTATE_SCISSOR_STATE_POINTERS, handle_3dstate_scissor_state_pointers } +}; + +static void +parse_commands(struct gen_spec *spec, uint32_t *cmds, int size, int engine) +{ + uint32_t *p, *end = cmds + size / 4; + unsigned int length, i; + struct gen_group *inst; + + for (p = cmds; p < end; p += length) { + inst = gen_spec_find_instruction(spec, p); + if (inst == NULL) { + printf("unknown instruction %08x\n", p[0]); + length = (p[0] & 0xff) + 2; + continue; + } + length = gen_group_get_length(inst, p); + + const char *color, *reset_color = CLEAR_TO_EOL NORMAL; + uint64_t offset; + + if (option_full_decode) + color = HEADER; + else + color = NORMAL; + + if (option_color == COLOR_NEVER) { + color = ""; + reset_color = ""; + } + + if (option_print_offsets) + offset = (void *) p - gtt; + else + offset = 0; + + printf("%s0x%08lx: 0x%08x: %s%s\n", + color, offset, p[0], + gen_group_get_name(inst), reset_color); + + if (option_full_decode) { + struct gen_field_iterator iter; + gen_field_iterator_init(&iter, inst, p); + while (gen_field_iterator_next(&iter)) { + printf(" %s: %s\n", iter.name, iter.value); + } + + for (i = 0; i < ARRAY_LENGTH(custom_handlers); i++) { + if (gen_group_get_opcode(inst) == + custom_handlers[i].opcode) + custom_handlers[i].handle(spec, p); + } + } + + if ((p[0] & 0xffff0000) == AUB_MI_BATCH_BUFFER_START) { + uint64_t start; + if (gen_spec_get_gen(spec) >= gen_make_gen(8,0)) + start = get_qword(&p[1]); + else + start = p[1]; + + parse_commands(spec, gtt + start, 1 << 20, engine); + } else if ((p[0] & 0xffff0000) == AUB_MI_BATCH_BUFFER_END) { + break; + } + } +} + +#define GEN_ENGINE_RENDER 1 +#define GEN_ENGINE_BLITTER 2 + +static void +handle_trace_block(struct gen_spec *spec, uint32_t *p) +{ + int operation = p[1] & AUB_TRACE_OPERATION_MASK; + int type = p[1] & AUB_TRACE_TYPE_MASK; + int address_space = p[1] & AUB_TRACE_ADDRESS_SPACE_MASK; + uint64_t offset = p[3]; + uint32_t size = p[4]; + int header_length = p[0] & 0xffff; + uint32_t *data = p + header_length + 2; + int engine = GEN_ENGINE_RENDER; + + if (gen_spec_get_gen(spec) >= gen_make_gen(8,0)) + offset += (uint64_t) p[5] << 32; + + switch (operation) { + case AUB_TRACE_OP_DATA_WRITE: + if (address_space != AUB_TRACE_MEMTYPE_GTT) + break; + if (gtt_size < offset + size) + error(EXIT_FAILURE, errno, "overflow gtt space"); + memcpy((char *) gtt + offset, data, size); + if (gtt_end < offset + size) + gtt_end = offset + size; + break; + case AUB_TRACE_OP_COMMAND_WRITE: + switch (type) { + case AUB_TRACE_TYPE_RING_PRB0: + engine = GEN_ENGINE_RENDER; + break; + case AUB_TRACE_TYPE_RING_PRB2: + engine = GEN_ENGINE_BLITTER; + break; + default: + printf("command write to unknown ring %d\n", type); + break; + } + + parse_commands(spec, data, size, engine); + gtt_end = 0; + break; + } +} + +struct aub_file { + char *filename; + int fd; + struct stat sb; + uint32_t *map, *end, *cursor; +}; + +static struct aub_file * +aub_file_open(const char *filename) +{ + struct aub_file *file; + + file = malloc(sizeof *file); + file->filename = strdup(filename); + file->fd = open(file->filename, O_RDONLY); + if (file->fd == -1) + error(EXIT_FAILURE, errno, "open %s failed", file->filename); + + if (fstat(file->fd, &file->sb) == -1) + error(EXIT_FAILURE, errno, "stat failed"); + + file->map = mmap(NULL, file->sb.st_size, + PROT_READ, MAP_SHARED, file->fd, 0); + if (file->map == MAP_FAILED) + error(EXIT_FAILURE, errno, "mmap failed"); + + file->cursor = file->map; + file->end = file->map + file->sb.st_size / 4; + + /* mmap a terabyte for our gtt space. */ + gtt_size = 1ul << 40; + gtt = mmap(NULL, gtt_size, PROT_READ | PROT_WRITE, + MAP_PRIVATE | MAP_ANONYMOUS | MAP_NORESERVE, -1, 0); + if (gtt == MAP_FAILED) + error(EXIT_FAILURE, errno, "failed to alloc gtt space"); + + return file; +} + +#define TYPE(dw) (((dw) >> 29) & 7) +#define OPCODE(dw) (((dw) >> 23) & 0x3f) +#define SUBOPCODE(dw) (((dw) >> 16) & 0x7f) + +#define MAKE_HEADER(type, opcode, subopcode) \ + (((type) << 29) | ((opcode) << 23) | ((subopcode) << 16)) + +#define TYPE_AUB 0x7 + +/* Classic AUB opcodes */ +#define OPCODE_AUB 0x01 +#define SUBOPCODE_HEADER 0x05 +#define SUBOPCODE_BLOCK 0x41 +#define SUBOPCODE_BMP 0x1e + +/* Newer version AUB opcode*/ +#define OPCODE_NEW_AUB 0x2e +#define SUBOPCODE_VERSION 0x00 +#define SUBOPCODE_REG_WRITE 0x03 +#define SUBOPCODE_MEM_POLL 0x05 +#define SUBOPCODE_MEM_WRITE 0x06 + +#define MAKE_GEN(major, minor) ( ((major) << 8) | (minor) ) + +struct { + const char *name; + uint32_t gen; +} device_map[] = { + { "bwr", MAKE_GEN(4, 0) }, + { "cln", MAKE_GEN(4, 0) }, + { "blc", MAKE_GEN(4, 0) }, + { "ctg", MAKE_GEN(4, 0) }, + { "el", MAKE_GEN(4, 0) }, + { "il", MAKE_GEN(4, 0) }, + { "sbr", MAKE_GEN(6, 0) }, + { "ivb", MAKE_GEN(7, 0) }, + { "lrb2", MAKE_GEN(0, 0) }, + { "hsw", MAKE_GEN(7, 5) }, + { "vlv", MAKE_GEN(7, 0) }, + { "bdw", MAKE_GEN(8, 0) }, + { "skl", MAKE_GEN(9, 0) }, + { "chv", MAKE_GEN(8, 0) }, + { "bxt", MAKE_GEN(9, 0) } +}; + +static void +aub_file_decode_batch(struct aub_file *file, struct gen_spec *spec) +{ + uint32_t *p, h, device, data_type; + int header_length, payload_size, bias; + + p = file->cursor; + h = *p; + header_length = h & 0xffff; + + switch (OPCODE(h)) { + case OPCODE_AUB: + bias = 2; + break; + case OPCODE_NEW_AUB: + bias = 1; + break; + default: + printf("unknown opcode %d at %ld/%ld\n", + OPCODE(h), file->cursor - file->map, + file->end - file->map); + file->cursor = file->end; + return; + } + + payload_size = 0; + switch (h & 0xffff0000) { + case MAKE_HEADER(TYPE_AUB, OPCODE_AUB, SUBOPCODE_HEADER): + payload_size = p[12]; + break; + case MAKE_HEADER(TYPE_AUB, OPCODE_AUB, SUBOPCODE_BLOCK): + payload_size = p[4]; + handle_trace_block(spec, p); + break; + case MAKE_HEADER(TYPE_AUB, OPCODE_AUB, SUBOPCODE_BMP): + break; + + case MAKE_HEADER(TYPE_AUB, OPCODE_NEW_AUB, SUBOPCODE_VERSION): + printf("version block: dw1 %08x\n", p[1]); + device = (p[1] >> 8) & 0xff; + printf(" device %s\n", device_map[device].name); + break; + case MAKE_HEADER(TYPE_AUB, OPCODE_NEW_AUB, SUBOPCODE_REG_WRITE): + printf("register write block: (dwords %d)\n", h & 0xffff); + printf(" reg 0x%x, data 0x%x\n", p[1], p[5]); + break; + case MAKE_HEADER(TYPE_AUB, OPCODE_NEW_AUB, SUBOPCODE_MEM_WRITE): + printf("memory write block (dwords %d):\n", h & 0xffff); + printf(" address 0x%lx\n", *(uint64_t *) &p[1]); + data_type = (p[3] >> 20) & 0xff; + if (data_type != 0) + printf(" data type 0x%x\n", data_type); + printf(" address space 0x%x\n", (p[3] >> 28) & 0xf); + break; + case MAKE_HEADER(TYPE_AUB, OPCODE_NEW_AUB, SUBOPCODE_MEM_POLL): + printf("memory poll block (dwords %d):\n", h & 0xffff); + break; + default: + printf("unknown block type=0x%x, opcode=0x%x, " + "subopcode=0x%x (%08x)\n", TYPE(h), OPCODE(h), SUBOPCODE(h), h); + break; + } + file->cursor = p + header_length + bias + payload_size / 4; +} + +static int +aub_file_more_stuff(struct aub_file *file) +{ + return file->cursor < file->end; +} + +static void +setup_pager(void) +{ + int fds[2]; + pid_t pid; + + if (!isatty(1)) + return; + + if (pipe(fds) == -1) + return; + + pid = fork(); + if (pid == -1) + return; + + if (pid == 0) { + close(fds[1]); + dup2(fds[0], 0); + execlp("less", "less", "-rFi", NULL); + } + + close(fds[0]); + dup2(fds[1], 1); + close(fds[1]); +} + +static void +print_help(FILE *file) +{ + fprintf(file, + "Usage: %s [OPTION]... FILE\n" + "Decode aub file contents.\n\n" + "A valid --gen option must be provided.\n\n" + " --help display this help and exit\n" + " --gen=platform decode for given platform (ivb, byt, hsw, bdw, chv, skl, kbl or bxt)\n" + " --headers decode only command headers\n" + " --color[=WHEN] colorize the output; WHEN can be 'auto' (default\n" + " if omitted), 'always', or 'never'\n" + " --no-pager don't launch pager\n" + " --no-offsets don't print instruction offsets\n", + basename(program_invocation_name)); +} + +static bool +is_prefix(const char *arg, const char *prefix, const char **value) +{ + int l = strlen(prefix); + + if (strncmp(arg, prefix, l) == 0 && (arg[l] == '\0' || arg[l] == '=')) { + if (arg[l] == '=') + *value = arg + l + 1; + else + *value = NULL; + + return true; + } + + return false; +} + +int main(int argc, char *argv[]) +{ + struct gen_spec *spec; + struct aub_file *file; + int i, pci_id = 0; + bool found_arg_gen = false, pager = true; + int gen_major, gen_minor; + const char *value; + char gen_file[256], gen_val[24]; + + if (argc == 1) { + print_help(stderr); + exit(EXIT_FAILURE); + } + + for (i = 1; i < argc; ++i) { + if (strcmp(argv[i], "--no-pager") == 0) { + pager = false; + } else if (strcmp(argv[i], "--no-offsets") == 0) { + option_print_offsets = false; + } else if (is_prefix(argv[i], "--gen", &value)) { + if (value == NULL) + error(EXIT_FAILURE, 0, "option '--gen' requires an argument\n"); + found_arg_gen = true; + gen_major = 0; + gen_minor = 0; + snprintf(gen_val, sizeof(gen_val), "%s", value); + } else if (strcmp(argv[i], "--headers") == 0) { + option_full_decode = false; + } else if (is_prefix(argv[i], "--color", &value)) { + if (value == NULL || strcmp(value, "always") == 0) + option_color = COLOR_ALWAYS; + else if (strcmp(value, "never") == 0) + option_color = COLOR_NEVER; + else if (strcmp(value, "auto") == 0) + option_color = COLOR_AUTO; + else + error(EXIT_FAILURE, 0, "invalid value for --color: %s", value); + } else if (strcmp(argv[i], "--help") == 0) { + print_help(stdout); + exit(EXIT_SUCCESS); + } else { + if (argv[i][0] == '-') { + fprintf(stderr, "unknown option %s\n", argv[i]); + exit(EXIT_FAILURE); + } + break; + } + } + + if (!found_arg_gen) { + fprintf(stderr, "argument --gen is required\n"); + exit(EXIT_FAILURE); + } + + if (strstr(gen_val,"ivb") != NULL) { + /* Intel(R) Ivybridge Mobile GT2 */ + pci_id = 0x0166; + gen_major = 7; + gen_minor = 0; + } else if (strstr(gen_val,"hsw") != NULL) { + /* Intel(R) Haswell Mobile GT2 */ + pci_id = 0x0416; + gen_major = 7; + gen_minor = 5; + } else if (strstr(gen_val,"byt") != NULL) { + /* Intel(R) Bay Trail */ + pci_id = 0x0155; + gen_major = 7; + gen_minor = 5; + } else if (strstr(gen_val,"bdw") != NULL) { + /* Intel(R) HD Graphics 5500 (Broadwell GT2) */ + pci_id = 0x1616; + gen_major = 8; + gen_minor = 0; + } else if (strstr(gen_val,"chv") != NULL) { + /* Intel(R) HD Graphics (Cherryview) */ + pci_id = 0x22B3; + gen_major = 8; + gen_minor = 0; + } else if (strstr(gen_val,"skl") != NULL) { + /* Intel(R) HD Graphics 530 (Skylake GT2) */ + pci_id = 0x1912; + gen_major = 9; + gen_minor = 0; + } else if (strstr(gen_val,"kbl") != NULL) { + /* Intel(R) Kabylake GT2 */ + pci_id = 0x591D; + gen_major = 9; + gen_minor = 0; + } else if (strstr(gen_val,"bxt") != NULL) { + /* Intel(R) HD Graphics (Broxton) */ + pci_id = 0x0A84; + gen_major = 9; + gen_minor = 0; + } else { + error(EXIT_FAILURE, 0, "can't parse gen: %s, expected ivb, byt, hsw, bdw, chv, skl, kbl or bxt\n", gen_val); + } + + /* Do this before we redirect stdout to pager. */ + if (option_color == COLOR_AUTO) + option_color = isatty(1) ? COLOR_ALWAYS : COLOR_NEVER; + + if (isatty(1) && pager) + setup_pager(); + + if (gen_minor > 0) + snprintf(gen_file, sizeof(gen_file), "../genxml/gen%d%d.xml", gen_major, gen_minor); + else + snprintf(gen_file, sizeof(gen_file), "../genxml/gen%d.xml", gen_major); + + spec = gen_spec_load(gen_file); + disasm = gen_disasm_create(pci_id); + + if (argv[i] == NULL) { + print_help(stderr); + exit(EXIT_FAILURE); + } else { + file = aub_file_open(argv[i]); + } + + while (aub_file_more_stuff(file)) + aub_file_decode_batch(file, spec); + + fflush(stdout); + /* close the stdout which is opened to write the output */ + close(1); + + wait(NULL); + + return EXIT_SUCCESS; +} |