1 #ifndef __DISASM_H
2 #define __DISASM_H
3
4 #include <stdio.h>
5 #include <stdint.h>
6 #include <inttypes.h>
7 #include <assert.h>
8 #include <stdbool.h>
9 #include <stdlib.h>
10 #include <string.h>
11
12 #define BIT(b) (1ull << (b))
13 #define MASK(count) ((1ull << (count)) - 1)
14 #define SEXT(b, count) ((b ^ BIT(count - 1)) - BIT(count - 1))
15 #define UNUSED __attribute__((unused))
16
17 #define VA_SRC_UNIFORM_TYPE 0x2
18 #define VA_SRC_IMM_TYPE 0x3
19
20 static inline void
va_print_dest(FILE * fp,uint8_t dest,bool can_mask)21 va_print_dest(FILE *fp, uint8_t dest, bool can_mask)
22 {
23 unsigned mask = (dest >> 6);
24 unsigned value = (dest & 0x3F);
25 fprintf(fp, "r%u", value);
26
27 /* Should write at least one component */
28 // assert(mask != 0);
29 // assert(mask == 0x3 || can_mask);
30
31 if (mask != 0x3)
32 fprintf(fp, ".h%u", (mask == 1) ? 0 : 1);
33 }
34
35 void va_disasm_instr(FILE *fp, uint64_t instr);
36
37 static inline void
disassemble_valhall(FILE * fp,const uint64_t * code,unsigned size)38 disassemble_valhall(FILE *fp, const uint64_t *code, unsigned size)
39 {
40 assert((size & 7) == 0);
41
42 /* Segment into 8-byte instructions */
43 for (unsigned i = 0; i < (size / 8); ++i) {
44 uint64_t instr = code[i];
45
46 /* TODO: is there a stop-bit? or does all-0's mean stop? */
47 if (instr == 0)
48 return;
49
50 /* Print byte pattern */
51 for (unsigned j = 0; j < 8; ++j)
52 fprintf(fp, "%02x ", (uint8_t) (instr >> (j * 8)));
53
54 fprintf(fp, " ");
55
56 va_disasm_instr(fp, instr);
57 fprintf(fp, "\n");
58 }
59 }
60
61 #endif
62