| 1 | /* udis86 - libudis86/syn.c |
| 2 | * |
| 3 | * Copyright (c) 2002-2013 Vivek Thampi |
| 4 | * All rights reserved. |
| 5 | * |
| 6 | * Redistribution and use in source and binary forms, with or without modification, |
| 7 | * are permitted provided that the following conditions are met: |
| 8 | * |
| 9 | * * Redistributions of source code must retain the above copyright notice, |
| 10 | * this list of conditions and the following disclaimer. |
| 11 | * * Redistributions in binary form must reproduce the above copyright notice, |
| 12 | * this list of conditions and the following disclaimer in the documentation |
| 13 | * and/or other materials provided with the distribution. |
| 14 | * |
| 15 | * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND |
| 16 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED |
| 17 | * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE |
| 18 | * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR |
| 19 | * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES |
| 20 | * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; |
| 21 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON |
| 22 | * ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| 23 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS |
| 24 | * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| 25 | */ |
| 26 | |
| 27 | #include "config.h" |
| 28 | |
| 29 | #if USE(UDIS86) |
| 30 | |
| 31 | #include "udis86_types.h" |
| 32 | #include "udis86_decode.h" |
| 33 | #include "udis86_syn.h" |
| 34 | #include "udis86_udint.h" |
| 35 | |
| 36 | /* |
| 37 | * Register Table - Order Matters (types.h)! |
| 38 | * |
| 39 | */ |
| 40 | const char* const ud_reg_tab[] = |
| 41 | { |
| 42 | "al" , "cl" , "dl" , "bl" , |
| 43 | "ah" , "ch" , "dh" , "bh" , |
| 44 | "spl" , "bpl" , "sil" , "dil" , |
| 45 | "r8b" , "r9b" , "r10b" , "r11b" , |
| 46 | "r12b" , "r13b" , "r14b" , "r15b" , |
| 47 | |
| 48 | "ax" , "cx" , "dx" , "bx" , |
| 49 | "sp" , "bp" , "si" , "di" , |
| 50 | "r8w" , "r9w" , "r10w" , "r11w" , |
| 51 | "r12w" , "r13w" , "r14w" , "r15w" , |
| 52 | |
| 53 | "eax" , "ecx" , "edx" , "ebx" , |
| 54 | "esp" , "ebp" , "esi" , "edi" , |
| 55 | "r8d" , "r9d" , "r10d" , "r11d" , |
| 56 | "r12d" , "r13d" , "r14d" , "r15d" , |
| 57 | |
| 58 | "rax" , "rcx" , "rdx" , "rbx" , |
| 59 | "rsp" , "rbp" , "rsi" , "rdi" , |
| 60 | "r8" , "r9" , "r10" , "r11" , |
| 61 | "r12" , "r13" , "r14" , "r15" , |
| 62 | |
| 63 | "es" , "cs" , "ss" , "ds" , |
| 64 | "fs" , "gs" , |
| 65 | |
| 66 | "cr0" , "cr1" , "cr2" , "cr3" , |
| 67 | "cr4" , "cr5" , "cr6" , "cr7" , |
| 68 | "cr8" , "cr9" , "cr10" , "cr11" , |
| 69 | "cr12" , "cr13" , "cr14" , "cr15" , |
| 70 | |
| 71 | "dr0" , "dr1" , "dr2" , "dr3" , |
| 72 | "dr4" , "dr5" , "dr6" , "dr7" , |
| 73 | "dr8" , "dr9" , "dr10" , "dr11" , |
| 74 | "dr12" , "dr13" , "dr14" , "dr15" , |
| 75 | |
| 76 | "mm0" , "mm1" , "mm2" , "mm3" , |
| 77 | "mm4" , "mm5" , "mm6" , "mm7" , |
| 78 | |
| 79 | "st0" , "st1" , "st2" , "st3" , |
| 80 | "st4" , "st5" , "st6" , "st7" , |
| 81 | |
| 82 | "xmm0" , "xmm1" , "xmm2" , "xmm3" , |
| 83 | "xmm4" , "xmm5" , "xmm6" , "xmm7" , |
| 84 | "xmm8" , "xmm9" , "xmm10" , "xmm11" , |
| 85 | "xmm12" , "xmm13" , "xmm14" , "xmm15" , |
| 86 | |
| 87 | "ymm0" , "ymm1" , "ymm2" , "ymm3" , |
| 88 | "ymm4" , "ymm5" , "ymm6" , "ymm7" , |
| 89 | "ymm8" , "ymm9" , "ymm10" , "ymm11" , |
| 90 | "ymm12" , "ymm13" , "ymm14" , "ymm15" , |
| 91 | |
| 92 | "rip" |
| 93 | }; |
| 94 | |
| 95 | |
| 96 | uint64_t |
| 97 | ud_syn_rel_target(struct ud *u, struct ud_operand *opr) |
| 98 | { |
| 99 | const uint64_t trunc_mask = 0xffffffffffffffffull >> (64 - u->opr_mode); |
| 100 | switch (opr->size) { |
| 101 | case 8 : return (u->pc + opr->lval.sbyte) & trunc_mask; |
| 102 | case 16: return (u->pc + opr->lval.sword) & trunc_mask; |
| 103 | case 32: return (u->pc + opr->lval.sdword) & trunc_mask; |
| 104 | default: UD_ASSERT(!"invalid relative offset size." ); |
| 105 | return 0ull; |
| 106 | } |
| 107 | } |
| 108 | |
| 109 | |
| 110 | /* |
| 111 | * asmprintf |
| 112 | * Printf style function for printing translated assembly |
| 113 | * output. Returns the number of characters written and |
| 114 | * moves the buffer pointer forward. On an overflow, |
| 115 | * returns a negative number and truncates the output. |
| 116 | */ |
| 117 | int |
| 118 | ud_asmprintf(struct ud *u, const char *fmt, ...) |
| 119 | { |
| 120 | int ret; |
| 121 | int avail; |
| 122 | va_list ap; |
| 123 | va_start(ap, fmt); |
| 124 | avail = u->asm_buf_size - u->asm_buf_fill - 1 /* nullchar */; |
| 125 | ret = vsnprintf((char*) u->asm_buf + u->asm_buf_fill, avail, fmt, ap); |
| 126 | if (ret < 0 || ret > avail) { |
| 127 | u->asm_buf_fill = u->asm_buf_size - 1; |
| 128 | } else { |
| 129 | u->asm_buf_fill += ret; |
| 130 | } |
| 131 | va_end(ap); |
| 132 | return ret; |
| 133 | } |
| 134 | |
| 135 | |
| 136 | void |
| 137 | ud_syn_print_addr(struct ud *u, uint64_t addr) |
| 138 | { |
| 139 | const char *name = NULL; |
| 140 | if (u->sym_resolver) { |
| 141 | int64_t offset = 0; |
| 142 | name = u->sym_resolver(u, addr, &offset); |
| 143 | if (name) { |
| 144 | if (offset) { |
| 145 | ud_asmprintf(u, "%s%+" FMT64 "d" , name, offset); |
| 146 | } else { |
| 147 | ud_asmprintf(u, "%s" , name); |
| 148 | } |
| 149 | return; |
| 150 | } |
| 151 | } |
| 152 | ud_asmprintf(u, "0x%" FMT64 "x" , addr); |
| 153 | } |
| 154 | |
| 155 | |
| 156 | void |
| 157 | ud_syn_print_imm(struct ud* u, const struct ud_operand *op) |
| 158 | { |
| 159 | uint64_t v; |
| 160 | if (op->_oprcode == OP_sI && op->size != u->opr_mode) { |
| 161 | if (op->size == 8) { |
| 162 | v = (int64_t)op->lval.sbyte; |
| 163 | } else { |
| 164 | UD_ASSERT(op->size == 32); |
| 165 | v = (int64_t)op->lval.sdword; |
| 166 | } |
| 167 | if (u->opr_mode < 64) { |
| 168 | v = v & ((1ull << u->opr_mode) - 1ull); |
| 169 | } |
| 170 | } else { |
| 171 | switch (op->size) { |
| 172 | case 8 : v = op->lval.ubyte; break; |
| 173 | case 16: v = op->lval.uword; break; |
| 174 | case 32: v = op->lval.udword; break; |
| 175 | case 64: v = op->lval.uqword; break; |
| 176 | default: UD_ASSERT(!"invalid offset" ); v = 0; /* keep cc happy */ |
| 177 | } |
| 178 | } |
| 179 | ud_asmprintf(u, "0x%" FMT64 "x" , v); |
| 180 | } |
| 181 | |
| 182 | |
| 183 | void |
| 184 | ud_syn_print_mem_disp(struct ud* u, const struct ud_operand *op, int sign) |
| 185 | { |
| 186 | UD_ASSERT(op->offset != 0); |
| 187 | if (op->base == UD_NONE && op->index == UD_NONE) { |
| 188 | uint64_t v; |
| 189 | UD_ASSERT(op->scale == UD_NONE && op->offset != 8); |
| 190 | /* unsigned mem-offset */ |
| 191 | switch (op->offset) { |
| 192 | case 16: v = op->lval.uword; break; |
| 193 | case 32: v = op->lval.udword; break; |
| 194 | case 64: v = op->lval.uqword; break; |
| 195 | default: UD_ASSERT(!"invalid offset" ); v = 0; /* keep cc happy */ |
| 196 | } |
| 197 | ud_asmprintf(u, "0x%" FMT64 "x" , v); |
| 198 | } else { |
| 199 | int64_t v; |
| 200 | UD_ASSERT(op->offset != 64); |
| 201 | switch (op->offset) { |
| 202 | case 8 : v = op->lval.sbyte; break; |
| 203 | case 16: v = op->lval.sword; break; |
| 204 | case 32: v = op->lval.sdword; break; |
| 205 | default: UD_ASSERT(!"invalid offset" ); v = 0; /* keep cc happy */ |
| 206 | } |
| 207 | if (v < 0) { |
| 208 | ud_asmprintf(u, "-0x%" FMT64 "x" , -v); |
| 209 | } else if (v > 0) { |
| 210 | ud_asmprintf(u, "%s0x%" FMT64 "x" , sign? "+" : "" , v); |
| 211 | } |
| 212 | } |
| 213 | } |
| 214 | |
| 215 | #endif // USE(UDIS86) |
| 216 | |
| 217 | /* |
| 218 | vim: set ts=2 sw=2 expandtab |
| 219 | */ |
| 220 | |