1 //===- X86DisassemblerTables.cpp - Disassembler tables ----------*- C++ -*-===// 2 // 3 // The LLVM Compiler Infrastructure 4 // 5 // This file is distributed under the University of Illinois Open Source 6 // License. See LICENSE.TXT for details. 7 // 8 //===----------------------------------------------------------------------===// 9 // 10 // This file is part of the X86 Disassembler Emitter. 11 // It contains the implementation of the disassembler tables. 12 // Documentation for the disassembler emitter in general can be found in 13 // X86DisassemblerEmitter.h. 14 // 15 //===----------------------------------------------------------------------===// 16 17 #include "X86DisassemblerTables.h" 18 #include "X86DisassemblerShared.h" 19 #include "llvm/ADT/STLExtras.h" 20 #include "llvm/Support/ErrorHandling.h" 21 #include "llvm/Support/Format.h" 22 #include <map> 23 24 using namespace llvm; 25 using namespace X86Disassembler; 26 27 /// stringForContext - Returns a string containing the name of a particular 28 /// InstructionContext, usually for diagnostic purposes. 29 /// 30 /// @param insnContext - The instruction class to transform to a string. 31 /// @return - A statically-allocated string constant that contains the 32 /// name of the instruction class. 33 static inline const char* stringForContext(InstructionContext insnContext) { 34 switch (insnContext) { 35 default: 36 llvm_unreachable("Unhandled instruction class"); 37 #define ENUM_ENTRY(n, r, d) case n: return #n; break; 38 #define ENUM_ENTRY_K_B(n, r, d) ENUM_ENTRY(n, r, d) ENUM_ENTRY(n##_K_B, r, d)\ 39 ENUM_ENTRY(n##_KZ, r, d) ENUM_ENTRY(n##_K, r, d) ENUM_ENTRY(n##_B, r, d)\ 40 ENUM_ENTRY(n##_KZ_B, r, d) 41 INSTRUCTION_CONTEXTS 42 #undef ENUM_ENTRY 43 #undef ENUM_ENTRY_K_B 44 } 45 } 46 47 /// stringForOperandType - Like stringForContext, but for OperandTypes. 48 static inline const char* stringForOperandType(OperandType type) { 49 switch (type) { 50 default: 51 llvm_unreachable("Unhandled type"); 52 #define ENUM_ENTRY(i, d) case i: return #i; 53 TYPES 54 #undef ENUM_ENTRY 55 } 56 } 57 58 /// stringForOperandEncoding - like stringForContext, but for 59 /// OperandEncodings. 60 static inline const char* stringForOperandEncoding(OperandEncoding encoding) { 61 switch (encoding) { 62 default: 63 llvm_unreachable("Unhandled encoding"); 64 #define ENUM_ENTRY(i, d) case i: return #i; 65 ENCODINGS 66 #undef ENUM_ENTRY 67 } 68 } 69 70 /// inheritsFrom - Indicates whether all instructions in one class also belong 71 /// to another class. 72 /// 73 /// @param child - The class that may be the subset 74 /// @param parent - The class that may be the superset 75 /// @return - True if child is a subset of parent, false otherwise. 76 static inline bool inheritsFrom(InstructionContext child, 77 InstructionContext parent, bool noPrefix = true, 78 bool VEX_LIG = false, bool VEX_WIG = false, 79 bool AdSize64 = false) { 80 if (child == parent) 81 return true; 82 83 switch (parent) { 84 case IC: 85 return(inheritsFrom(child, IC_64BIT, AdSize64) || 86 (noPrefix && inheritsFrom(child, IC_OPSIZE, noPrefix)) || 87 inheritsFrom(child, IC_ADSIZE) || 88 (noPrefix && inheritsFrom(child, IC_XD, noPrefix)) || 89 (noPrefix && inheritsFrom(child, IC_XS, noPrefix))); 90 case IC_64BIT: 91 return(inheritsFrom(child, IC_64BIT_REXW) || 92 (noPrefix && inheritsFrom(child, IC_64BIT_OPSIZE, noPrefix)) || 93 (!AdSize64 && inheritsFrom(child, IC_64BIT_ADSIZE)) || 94 (noPrefix && inheritsFrom(child, IC_64BIT_XD, noPrefix)) || 95 (noPrefix && inheritsFrom(child, IC_64BIT_XS, noPrefix))); 96 case IC_OPSIZE: 97 return inheritsFrom(child, IC_64BIT_OPSIZE) || 98 inheritsFrom(child, IC_OPSIZE_ADSIZE); 99 case IC_ADSIZE: 100 return (noPrefix && inheritsFrom(child, IC_OPSIZE_ADSIZE, noPrefix)); 101 case IC_OPSIZE_ADSIZE: 102 return false; 103 case IC_64BIT_ADSIZE: 104 return (noPrefix && inheritsFrom(child, IC_64BIT_OPSIZE_ADSIZE, noPrefix)); 105 case IC_64BIT_OPSIZE_ADSIZE: 106 return false; 107 case IC_XD: 108 return inheritsFrom(child, IC_64BIT_XD); 109 case IC_XS: 110 return inheritsFrom(child, IC_64BIT_XS); 111 case IC_XD_OPSIZE: 112 return inheritsFrom(child, IC_64BIT_XD_OPSIZE); 113 case IC_XS_OPSIZE: 114 return inheritsFrom(child, IC_64BIT_XS_OPSIZE); 115 case IC_64BIT_REXW: 116 return((noPrefix && inheritsFrom(child, IC_64BIT_REXW_XS, noPrefix)) || 117 (noPrefix && inheritsFrom(child, IC_64BIT_REXW_XD, noPrefix)) || 118 (noPrefix && inheritsFrom(child, IC_64BIT_REXW_OPSIZE, noPrefix)) || 119 (!AdSize64 && inheritsFrom(child, IC_64BIT_REXW_ADSIZE))); 120 case IC_64BIT_OPSIZE: 121 return inheritsFrom(child, IC_64BIT_REXW_OPSIZE) || 122 (!AdSize64 && inheritsFrom(child, IC_64BIT_OPSIZE_ADSIZE)) || 123 (!AdSize64 && inheritsFrom(child, IC_64BIT_REXW_ADSIZE)); 124 case IC_64BIT_XD: 125 return(inheritsFrom(child, IC_64BIT_REXW_XD)); 126 case IC_64BIT_XS: 127 return(inheritsFrom(child, IC_64BIT_REXW_XS)); 128 case IC_64BIT_XD_OPSIZE: 129 case IC_64BIT_XS_OPSIZE: 130 return false; 131 case IC_64BIT_REXW_XD: 132 case IC_64BIT_REXW_XS: 133 case IC_64BIT_REXW_OPSIZE: 134 case IC_64BIT_REXW_ADSIZE: 135 return false; 136 case IC_VEX: 137 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_VEX_L_W)) || 138 (VEX_WIG && inheritsFrom(child, IC_VEX_W)) || 139 (VEX_LIG && inheritsFrom(child, IC_VEX_L)); 140 case IC_VEX_XS: 141 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_VEX_L_W_XS)) || 142 (VEX_WIG && inheritsFrom(child, IC_VEX_W_XS)) || 143 (VEX_LIG && inheritsFrom(child, IC_VEX_L_XS)); 144 case IC_VEX_XD: 145 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_VEX_L_W_XD)) || 146 (VEX_WIG && inheritsFrom(child, IC_VEX_W_XD)) || 147 (VEX_LIG && inheritsFrom(child, IC_VEX_L_XD)); 148 case IC_VEX_OPSIZE: 149 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_VEX_L_W_OPSIZE)) || 150 (VEX_WIG && inheritsFrom(child, IC_VEX_W_OPSIZE)) || 151 (VEX_LIG && inheritsFrom(child, IC_VEX_L_OPSIZE)); 152 case IC_VEX_W: 153 return VEX_LIG && inheritsFrom(child, IC_VEX_L_W); 154 case IC_VEX_W_XS: 155 return VEX_LIG && inheritsFrom(child, IC_VEX_L_W_XS); 156 case IC_VEX_W_XD: 157 return VEX_LIG && inheritsFrom(child, IC_VEX_L_W_XD); 158 case IC_VEX_W_OPSIZE: 159 return VEX_LIG && inheritsFrom(child, IC_VEX_L_W_OPSIZE); 160 case IC_VEX_L: 161 return VEX_WIG && inheritsFrom(child, IC_VEX_L_W); 162 case IC_VEX_L_XS: 163 return VEX_WIG && inheritsFrom(child, IC_VEX_L_W_XS); 164 case IC_VEX_L_XD: 165 return VEX_WIG && inheritsFrom(child, IC_VEX_L_W_XD); 166 case IC_VEX_L_OPSIZE: 167 return VEX_WIG && inheritsFrom(child, IC_VEX_L_W_OPSIZE); 168 case IC_VEX_L_W: 169 case IC_VEX_L_W_XS: 170 case IC_VEX_L_W_XD: 171 case IC_VEX_L_W_OPSIZE: 172 return false; 173 case IC_EVEX: 174 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W)) || 175 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W)) || 176 (VEX_WIG && inheritsFrom(child, IC_EVEX_W)) || 177 (VEX_LIG && inheritsFrom(child, IC_EVEX_L)) || 178 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2)); 179 case IC_EVEX_XS: 180 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS)) || 181 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS)) || 182 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XS)) || 183 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XS)) || 184 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XS)); 185 case IC_EVEX_XD: 186 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD)) || 187 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD)) || 188 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XD)) || 189 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XD)) || 190 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XD)); 191 case IC_EVEX_OPSIZE: 192 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE)) || 193 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE)) || 194 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_OPSIZE)) || 195 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_OPSIZE)) || 196 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_OPSIZE)); 197 case IC_EVEX_K: 198 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_K)) || 199 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_K)) || 200 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_K)) || 201 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_K)) || 202 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_K)); 203 case IC_EVEX_XS_K: 204 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_K)) || 205 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_K)) || 206 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XS_K)) || 207 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XS_K)) || 208 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XS_K)); 209 case IC_EVEX_XD_K: 210 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_K)) || 211 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_K)) || 212 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XD_K)) || 213 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XD_K)) || 214 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XD_K)); 215 case IC_EVEX_OPSIZE_K: 216 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_K)) || 217 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_K)) || 218 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_OPSIZE_K)) || 219 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_OPSIZE_K)) || 220 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_OPSIZE_K)); 221 case IC_EVEX_KZ: 222 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_KZ)) || 223 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_KZ)) || 224 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_KZ)) || 225 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_KZ)) || 226 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_KZ)); 227 case IC_EVEX_XS_KZ: 228 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_KZ)) || 229 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_KZ)) || 230 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XS_KZ)) || 231 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XS_KZ)) || 232 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XS_KZ)); 233 case IC_EVEX_XD_KZ: 234 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_KZ)) || 235 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_KZ)) || 236 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XD_KZ)) || 237 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XD_KZ)) || 238 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XD_KZ)); 239 case IC_EVEX_OPSIZE_KZ: 240 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_KZ)) || 241 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_KZ)) || 242 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_OPSIZE_KZ)) || 243 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_OPSIZE_KZ)) || 244 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_OPSIZE_KZ)); 245 case IC_EVEX_W: 246 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W)) || 247 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W)); 248 case IC_EVEX_W_XS: 249 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XS)) || 250 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XS)); 251 case IC_EVEX_W_XD: 252 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XD)) || 253 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XD)); 254 case IC_EVEX_W_OPSIZE: 255 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE)) || 256 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE)); 257 case IC_EVEX_W_K: 258 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_K)) || 259 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_K)); 260 case IC_EVEX_W_XS_K: 261 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XS_K)) || 262 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XS_K)); 263 case IC_EVEX_W_XD_K: 264 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XD_K)) || 265 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XD_K)); 266 case IC_EVEX_W_OPSIZE_K: 267 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_K)) || 268 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_K)); 269 case IC_EVEX_W_KZ: 270 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_KZ)) || 271 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_KZ)); 272 case IC_EVEX_W_XS_KZ: 273 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XS_KZ)) || 274 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XS_KZ)); 275 case IC_EVEX_W_XD_KZ: 276 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XD_KZ)) || 277 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XD_KZ)); 278 case IC_EVEX_W_OPSIZE_KZ: 279 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_KZ)) || 280 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_KZ)); 281 case IC_EVEX_L: 282 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W); 283 case IC_EVEX_L_XS: 284 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS); 285 case IC_EVEX_L_XD: 286 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD); 287 case IC_EVEX_L_OPSIZE: 288 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE); 289 case IC_EVEX_L_K: 290 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_K); 291 case IC_EVEX_L_XS_K: 292 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_K); 293 case IC_EVEX_L_XD_K: 294 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_K); 295 case IC_EVEX_L_OPSIZE_K: 296 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_K); 297 case IC_EVEX_L_KZ: 298 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_KZ); 299 case IC_EVEX_L_XS_KZ: 300 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_KZ); 301 case IC_EVEX_L_XD_KZ: 302 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_KZ); 303 case IC_EVEX_L_OPSIZE_KZ: 304 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_KZ); 305 case IC_EVEX_L_W: 306 case IC_EVEX_L_W_XS: 307 case IC_EVEX_L_W_XD: 308 case IC_EVEX_L_W_OPSIZE: 309 return false; 310 case IC_EVEX_L_W_K: 311 case IC_EVEX_L_W_XS_K: 312 case IC_EVEX_L_W_XD_K: 313 case IC_EVEX_L_W_OPSIZE_K: 314 return false; 315 case IC_EVEX_L_W_KZ: 316 case IC_EVEX_L_W_XS_KZ: 317 case IC_EVEX_L_W_XD_KZ: 318 case IC_EVEX_L_W_OPSIZE_KZ: 319 return false; 320 case IC_EVEX_L2: 321 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W); 322 case IC_EVEX_L2_XS: 323 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS); 324 case IC_EVEX_L2_XD: 325 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD); 326 case IC_EVEX_L2_OPSIZE: 327 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE); 328 case IC_EVEX_L2_K: 329 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_K); 330 case IC_EVEX_L2_XS_K: 331 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_K); 332 case IC_EVEX_L2_XD_K: 333 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_K); 334 case IC_EVEX_L2_OPSIZE_K: 335 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_K); 336 case IC_EVEX_L2_KZ: 337 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_KZ); 338 case IC_EVEX_L2_XS_KZ: 339 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_KZ); 340 case IC_EVEX_L2_XD_KZ: 341 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_KZ); 342 case IC_EVEX_L2_OPSIZE_KZ: 343 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_KZ); 344 case IC_EVEX_L2_W: 345 case IC_EVEX_L2_W_XS: 346 case IC_EVEX_L2_W_XD: 347 case IC_EVEX_L2_W_OPSIZE: 348 return false; 349 case IC_EVEX_L2_W_K: 350 case IC_EVEX_L2_W_XS_K: 351 case IC_EVEX_L2_W_XD_K: 352 case IC_EVEX_L2_W_OPSIZE_K: 353 return false; 354 case IC_EVEX_L2_W_KZ: 355 case IC_EVEX_L2_W_XS_KZ: 356 case IC_EVEX_L2_W_XD_KZ: 357 case IC_EVEX_L2_W_OPSIZE_KZ: 358 return false; 359 case IC_EVEX_B: 360 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_B)) || 361 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_B)) || 362 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_B)) || 363 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_B)) || 364 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_B)); 365 case IC_EVEX_XS_B: 366 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_B)) || 367 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_B)) || 368 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XS_B)) || 369 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XS_B)) || 370 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XS_B)); 371 case IC_EVEX_XD_B: 372 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_B)) || 373 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_B)) || 374 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XD_B)) || 375 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XD_B)) || 376 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XD_B)); 377 case IC_EVEX_OPSIZE_B: 378 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_B)) || 379 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_B)) || 380 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_OPSIZE_B)) || 381 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_OPSIZE_B)) || 382 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_OPSIZE_B)); 383 case IC_EVEX_K_B: 384 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_K_B)) || 385 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_K_B)) || 386 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_K_B)) || 387 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_K_B)) || 388 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_K_B)); 389 case IC_EVEX_XS_K_B: 390 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_K_B)) || 391 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_K_B)) || 392 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XS_K_B)) || 393 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XS_K_B)) || 394 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XS_K_B)); 395 case IC_EVEX_XD_K_B: 396 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_K_B)) || 397 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_K_B)) || 398 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XD_K_B)) || 399 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XD_K_B)) || 400 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XD_K_B)); 401 case IC_EVEX_OPSIZE_K_B: 402 return (VEX_LIG && VEX_WIG && 403 inheritsFrom(child, IC_EVEX_L_W_OPSIZE_K_B)) || 404 (VEX_LIG && VEX_WIG && 405 inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_K_B)) || 406 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_OPSIZE_K_B)) || 407 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_OPSIZE_K_B)) || 408 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_OPSIZE_K_B)); 409 case IC_EVEX_KZ_B: 410 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_KZ_B)) || 411 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_KZ_B)) || 412 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_KZ_B)) || 413 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_KZ_B)) || 414 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_KZ_B)); 415 case IC_EVEX_XS_KZ_B: 416 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_KZ_B)) || 417 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_KZ_B)) || 418 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XS_KZ_B)) || 419 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XS_KZ_B)) || 420 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XS_KZ_B)); 421 case IC_EVEX_XD_KZ_B: 422 return (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_KZ_B)) || 423 (VEX_LIG && VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_KZ_B)) || 424 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_XD_KZ_B)) || 425 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_XD_KZ_B)) || 426 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_XD_KZ_B)); 427 case IC_EVEX_OPSIZE_KZ_B: 428 return (VEX_LIG && VEX_WIG && 429 inheritsFrom(child, IC_EVEX_L_W_OPSIZE_KZ_B)) || 430 (VEX_LIG && VEX_WIG && 431 inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_KZ_B)) || 432 (VEX_WIG && inheritsFrom(child, IC_EVEX_W_OPSIZE_KZ_B)) || 433 (VEX_LIG && inheritsFrom(child, IC_EVEX_L_OPSIZE_KZ_B)) || 434 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_OPSIZE_KZ_B)); 435 case IC_EVEX_W_B: 436 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_B)) || 437 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_B)); 438 case IC_EVEX_W_XS_B: 439 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XS_B)) || 440 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XS_B)); 441 case IC_EVEX_W_XD_B: 442 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XD_B)) || 443 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XD_B)); 444 case IC_EVEX_W_OPSIZE_B: 445 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_B)) || 446 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_B)); 447 case IC_EVEX_W_K_B: 448 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_K_B)) || 449 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_K_B)); 450 case IC_EVEX_W_XS_K_B: 451 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XS_K_B)) || 452 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XS_K_B)); 453 case IC_EVEX_W_XD_K_B: 454 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XD_K_B)) || 455 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XD_K_B)); 456 case IC_EVEX_W_OPSIZE_K_B: 457 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_K_B)) || 458 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_K_B)); 459 case IC_EVEX_W_KZ_B: 460 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_KZ_B)) || 461 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_KZ_B)); 462 case IC_EVEX_W_XS_KZ_B: 463 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XS_KZ_B)) || 464 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XS_KZ_B)); 465 case IC_EVEX_W_XD_KZ_B: 466 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_XD_KZ_B)) || 467 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_XD_KZ_B)); 468 case IC_EVEX_W_OPSIZE_KZ_B: 469 return (VEX_LIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_KZ_B)) || 470 (VEX_LIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_KZ_B)); 471 case IC_EVEX_L_B: 472 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_B); 473 case IC_EVEX_L_XS_B: 474 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_B); 475 case IC_EVEX_L_XD_B: 476 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_B); 477 case IC_EVEX_L_OPSIZE_B: 478 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_B); 479 case IC_EVEX_L_K_B: 480 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_K_B); 481 case IC_EVEX_L_XS_K_B: 482 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_K_B); 483 case IC_EVEX_L_XD_K_B: 484 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_K_B); 485 case IC_EVEX_L_OPSIZE_K_B: 486 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_K_B); 487 case IC_EVEX_L_KZ_B: 488 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_KZ_B); 489 case IC_EVEX_L_XS_KZ_B: 490 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XS_KZ_B); 491 case IC_EVEX_L_XD_KZ_B: 492 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_XD_KZ_B); 493 case IC_EVEX_L_OPSIZE_KZ_B: 494 return VEX_WIG && inheritsFrom(child, IC_EVEX_L_W_OPSIZE_KZ_B); 495 case IC_EVEX_L_W_B: 496 case IC_EVEX_L_W_XS_B: 497 case IC_EVEX_L_W_XD_B: 498 case IC_EVEX_L_W_OPSIZE_B: 499 return false; 500 case IC_EVEX_L_W_K_B: 501 case IC_EVEX_L_W_XS_K_B: 502 case IC_EVEX_L_W_XD_K_B: 503 case IC_EVEX_L_W_OPSIZE_K_B: 504 return false; 505 case IC_EVEX_L_W_KZ_B: 506 case IC_EVEX_L_W_XS_KZ_B: 507 case IC_EVEX_L_W_XD_KZ_B: 508 case IC_EVEX_L_W_OPSIZE_KZ_B: 509 return false; 510 case IC_EVEX_L2_B: 511 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_B); 512 case IC_EVEX_L2_XS_B: 513 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_B); 514 case IC_EVEX_L2_XD_B: 515 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_B); 516 case IC_EVEX_L2_OPSIZE_B: 517 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_B); 518 case IC_EVEX_L2_K_B: 519 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_K_B); 520 case IC_EVEX_L2_XS_K_B: 521 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_K_B); 522 case IC_EVEX_L2_XD_K_B: 523 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_K_B); 524 case IC_EVEX_L2_OPSIZE_K_B: 525 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_K_B); 526 case IC_EVEX_L2_KZ_B: 527 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_KZ_B); 528 case IC_EVEX_L2_XS_KZ_B: 529 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XS_KZ_B); 530 case IC_EVEX_L2_XD_KZ_B: 531 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_XD_KZ_B); 532 case IC_EVEX_L2_OPSIZE_KZ_B: 533 return VEX_WIG && inheritsFrom(child, IC_EVEX_L2_W_OPSIZE_KZ_B); 534 case IC_EVEX_L2_W_B: 535 case IC_EVEX_L2_W_XS_B: 536 case IC_EVEX_L2_W_XD_B: 537 case IC_EVEX_L2_W_OPSIZE_B: 538 return false; 539 case IC_EVEX_L2_W_K_B: 540 case IC_EVEX_L2_W_XS_K_B: 541 case IC_EVEX_L2_W_XD_K_B: 542 case IC_EVEX_L2_W_OPSIZE_K_B: 543 return false; 544 case IC_EVEX_L2_W_KZ_B: 545 case IC_EVEX_L2_W_XS_KZ_B: 546 case IC_EVEX_L2_W_XD_KZ_B: 547 case IC_EVEX_L2_W_OPSIZE_KZ_B: 548 return false; 549 default: 550 errs() << "Unknown instruction class: " << 551 stringForContext((InstructionContext)parent) << "\n"; 552 llvm_unreachable("Unknown instruction class"); 553 } 554 } 555 556 /// outranks - Indicates whether, if an instruction has two different applicable 557 /// classes, which class should be preferred when performing decode. This 558 /// imposes a total ordering (ties are resolved toward "lower") 559 /// 560 /// @param upper - The class that may be preferable 561 /// @param lower - The class that may be less preferable 562 /// @return - True if upper is to be preferred, false otherwise. 563 static inline bool outranks(InstructionContext upper, 564 InstructionContext lower) { 565 assert(upper < IC_max); 566 assert(lower < IC_max); 567 568 #define ENUM_ENTRY(n, r, d) r, 569 #define ENUM_ENTRY_K_B(n, r, d) ENUM_ENTRY(n, r, d) \ 570 ENUM_ENTRY(n##_K_B, r, d) ENUM_ENTRY(n##_KZ_B, r, d) \ 571 ENUM_ENTRY(n##_KZ, r, d) ENUM_ENTRY(n##_K, r, d) ENUM_ENTRY(n##_B, r, d) 572 static int ranks[IC_max] = { 573 INSTRUCTION_CONTEXTS 574 }; 575 #undef ENUM_ENTRY 576 #undef ENUM_ENTRY_K_B 577 578 return (ranks[upper] > ranks[lower]); 579 } 580 581 /// getDecisionType - Determines whether a ModRM decision with 255 entries can 582 /// be compacted by eliminating redundant information. 583 /// 584 /// @param decision - The decision to be compacted. 585 /// @return - The compactest available representation for the decision. 586 static ModRMDecisionType getDecisionType(ModRMDecision &decision) { 587 bool satisfiesOneEntry = true; 588 bool satisfiesSplitRM = true; 589 bool satisfiesSplitReg = true; 590 bool satisfiesSplitMisc = true; 591 592 for (unsigned index = 0; index < 256; ++index) { 593 if (decision.instructionIDs[index] != decision.instructionIDs[0]) 594 satisfiesOneEntry = false; 595 596 if (((index & 0xc0) == 0xc0) && 597 (decision.instructionIDs[index] != decision.instructionIDs[0xc0])) 598 satisfiesSplitRM = false; 599 600 if (((index & 0xc0) != 0xc0) && 601 (decision.instructionIDs[index] != decision.instructionIDs[0x00])) 602 satisfiesSplitRM = false; 603 604 if (((index & 0xc0) == 0xc0) && 605 (decision.instructionIDs[index] != decision.instructionIDs[index&0xf8])) 606 satisfiesSplitReg = false; 607 608 if (((index & 0xc0) != 0xc0) && 609 (decision.instructionIDs[index] != decision.instructionIDs[index&0x38])) 610 satisfiesSplitMisc = false; 611 } 612 613 if (satisfiesOneEntry) 614 return MODRM_ONEENTRY; 615 616 if (satisfiesSplitRM) 617 return MODRM_SPLITRM; 618 619 if (satisfiesSplitReg && satisfiesSplitMisc) 620 return MODRM_SPLITREG; 621 622 if (satisfiesSplitMisc) 623 return MODRM_SPLITMISC; 624 625 return MODRM_FULL; 626 } 627 628 /// stringForDecisionType - Returns a statically-allocated string corresponding 629 /// to a particular decision type. 630 /// 631 /// @param dt - The decision type. 632 /// @return - A pointer to the statically-allocated string (e.g., 633 /// "MODRM_ONEENTRY" for MODRM_ONEENTRY). 634 static const char* stringForDecisionType(ModRMDecisionType dt) { 635 #define ENUM_ENTRY(n) case n: return #n; 636 switch (dt) { 637 default: 638 llvm_unreachable("Unknown decision type"); 639 MODRMTYPES 640 }; 641 #undef ENUM_ENTRY 642 } 643 644 DisassemblerTables::DisassemblerTables() { 645 for (unsigned i = 0; i < array_lengthof(Tables); i++) 646 Tables[i] = llvm::make_unique<ContextDecision>(); 647 648 HasConflicts = false; 649 } 650 651 DisassemblerTables::~DisassemblerTables() { 652 } 653 654 void DisassemblerTables::emitModRMDecision(raw_ostream &o1, raw_ostream &o2, 655 unsigned &i1, unsigned &i2, 656 unsigned &ModRMTableNum, 657 ModRMDecision &decision) const { 658 static uint32_t sTableNumber = 0; 659 static uint32_t sEntryNumber = 1; 660 ModRMDecisionType dt = getDecisionType(decision); 661 662 if (dt == MODRM_ONEENTRY && decision.instructionIDs[0] == 0) 663 { 664 o2.indent(i2) << "{ /* ModRMDecision */" << "\n"; 665 i2++; 666 667 o2.indent(i2) << stringForDecisionType(dt) << "," << "\n"; 668 o2.indent(i2) << 0 << " /* EmptyTable */\n"; 669 670 i2--; 671 o2.indent(i2) << "}"; 672 return; 673 } 674 675 std::vector<unsigned> ModRMDecision; 676 677 switch (dt) { 678 default: 679 llvm_unreachable("Unknown decision type"); 680 case MODRM_ONEENTRY: 681 ModRMDecision.push_back(decision.instructionIDs[0]); 682 break; 683 case MODRM_SPLITRM: 684 ModRMDecision.push_back(decision.instructionIDs[0x00]); 685 ModRMDecision.push_back(decision.instructionIDs[0xc0]); 686 break; 687 case MODRM_SPLITREG: 688 for (unsigned index = 0; index < 64; index += 8) 689 ModRMDecision.push_back(decision.instructionIDs[index]); 690 for (unsigned index = 0xc0; index < 256; index += 8) 691 ModRMDecision.push_back(decision.instructionIDs[index]); 692 break; 693 case MODRM_SPLITMISC: 694 for (unsigned index = 0; index < 64; index += 8) 695 ModRMDecision.push_back(decision.instructionIDs[index]); 696 for (unsigned index = 0xc0; index < 256; ++index) 697 ModRMDecision.push_back(decision.instructionIDs[index]); 698 break; 699 case MODRM_FULL: 700 for (unsigned index = 0; index < 256; ++index) 701 ModRMDecision.push_back(decision.instructionIDs[index]); 702 break; 703 } 704 705 unsigned &EntryNumber = ModRMTable[ModRMDecision]; 706 if (EntryNumber == 0) { 707 EntryNumber = ModRMTableNum; 708 709 ModRMTableNum += ModRMDecision.size(); 710 o1 << "/* Table" << EntryNumber << " */\n"; 711 i1++; 712 for (std::vector<unsigned>::const_iterator I = ModRMDecision.begin(), 713 E = ModRMDecision.end(); I != E; ++I) { 714 o1.indent(i1 * 2) << format("0x%hx", *I) << ", /* " 715 << InstructionSpecifiers[*I].name << " */\n"; 716 } 717 i1--; 718 } 719 720 o2.indent(i2) << "{ /* struct ModRMDecision */" << "\n"; 721 i2++; 722 723 o2.indent(i2) << stringForDecisionType(dt) << "," << "\n"; 724 o2.indent(i2) << EntryNumber << " /* Table" << EntryNumber << " */\n"; 725 726 i2--; 727 o2.indent(i2) << "}"; 728 729 switch (dt) { 730 default: 731 llvm_unreachable("Unknown decision type"); 732 case MODRM_ONEENTRY: 733 sEntryNumber += 1; 734 break; 735 case MODRM_SPLITRM: 736 sEntryNumber += 2; 737 break; 738 case MODRM_SPLITREG: 739 sEntryNumber += 16; 740 break; 741 case MODRM_SPLITMISC: 742 sEntryNumber += 8 + 64; 743 break; 744 case MODRM_FULL: 745 sEntryNumber += 256; 746 break; 747 } 748 749 // We assume that the index can fit into uint16_t. 750 assert(sEntryNumber < 65536U && 751 "Index into ModRMDecision is too large for uint16_t!"); 752 753 ++sTableNumber; 754 } 755 756 void DisassemblerTables::emitOpcodeDecision(raw_ostream &o1, raw_ostream &o2, 757 unsigned &i1, unsigned &i2, 758 unsigned &ModRMTableNum, 759 OpcodeDecision &decision) const { 760 o2.indent(i2) << "{ /* struct OpcodeDecision */" << "\n"; 761 i2++; 762 o2.indent(i2) << "{" << "\n"; 763 i2++; 764 765 for (unsigned index = 0; index < 256; ++index) { 766 o2.indent(i2); 767 768 o2 << "/* 0x" << format("%02hhx", index) << " */" << "\n"; 769 770 emitModRMDecision(o1, o2, i1, i2, ModRMTableNum, 771 decision.modRMDecisions[index]); 772 773 if (index < 255) 774 o2 << ","; 775 776 o2 << "\n"; 777 } 778 779 i2--; 780 o2.indent(i2) << "}" << "\n"; 781 i2--; 782 o2.indent(i2) << "}" << "\n"; 783 } 784 785 void DisassemblerTables::emitContextDecision(raw_ostream &o1, raw_ostream &o2, 786 unsigned &i1, unsigned &i2, 787 unsigned &ModRMTableNum, 788 ContextDecision &decision, 789 const char* name) const { 790 o2.indent(i2) << "static const struct ContextDecision " << name << " = {\n"; 791 i2++; 792 o2.indent(i2) << "{ /* opcodeDecisions */" << "\n"; 793 i2++; 794 795 for (unsigned index = 0; index < IC_max; ++index) { 796 o2.indent(i2) << "/* "; 797 o2 << stringForContext((InstructionContext)index); 798 o2 << " */"; 799 o2 << "\n"; 800 801 emitOpcodeDecision(o1, o2, i1, i2, ModRMTableNum, 802 decision.opcodeDecisions[index]); 803 804 if (index + 1 < IC_max) 805 o2 << ", "; 806 } 807 808 i2--; 809 o2.indent(i2) << "}" << "\n"; 810 i2--; 811 o2.indent(i2) << "};" << "\n"; 812 } 813 814 void DisassemblerTables::emitInstructionInfo(raw_ostream &o, 815 unsigned &i) const { 816 unsigned NumInstructions = InstructionSpecifiers.size(); 817 818 o << "static const struct OperandSpecifier x86OperandSets[][" 819 << X86_MAX_OPERANDS << "] = {\n"; 820 821 typedef SmallVector<std::pair<OperandEncoding, OperandType>, 822 X86_MAX_OPERANDS> OperandListTy; 823 std::map<OperandListTy, unsigned> OperandSets; 824 825 unsigned OperandSetNum = 0; 826 for (unsigned Index = 0; Index < NumInstructions; ++Index) { 827 OperandListTy OperandList; 828 829 for (unsigned OperandIndex = 0; OperandIndex < X86_MAX_OPERANDS; 830 ++OperandIndex) { 831 OperandEncoding Encoding = (OperandEncoding)InstructionSpecifiers[Index] 832 .operands[OperandIndex].encoding; 833 OperandType Type = (OperandType)InstructionSpecifiers[Index] 834 .operands[OperandIndex].type; 835 OperandList.push_back(std::make_pair(Encoding, Type)); 836 } 837 unsigned &N = OperandSets[OperandList]; 838 if (N != 0) continue; 839 840 N = ++OperandSetNum; 841 842 o << " { /* " << (OperandSetNum - 1) << " */\n"; 843 for (unsigned i = 0, e = OperandList.size(); i != e; ++i) { 844 const char *Encoding = stringForOperandEncoding(OperandList[i].first); 845 const char *Type = stringForOperandType(OperandList[i].second); 846 o << " { " << Encoding << ", " << Type << " },\n"; 847 } 848 o << " },\n"; 849 } 850 o << "};" << "\n\n"; 851 852 o.indent(i * 2) << "static const struct InstructionSpecifier "; 853 o << INSTRUCTIONS_STR "[" << InstructionSpecifiers.size() << "] = {\n"; 854 855 i++; 856 857 for (unsigned index = 0; index < NumInstructions; ++index) { 858 o.indent(i * 2) << "{ /* " << index << " */\n"; 859 i++; 860 861 OperandListTy OperandList; 862 for (unsigned OperandIndex = 0; OperandIndex < X86_MAX_OPERANDS; 863 ++OperandIndex) { 864 OperandEncoding Encoding = (OperandEncoding)InstructionSpecifiers[index] 865 .operands[OperandIndex].encoding; 866 OperandType Type = (OperandType)InstructionSpecifiers[index] 867 .operands[OperandIndex].type; 868 OperandList.push_back(std::make_pair(Encoding, Type)); 869 } 870 o.indent(i * 2) << (OperandSets[OperandList] - 1) << ",\n"; 871 872 o.indent(i * 2) << "/* " << InstructionSpecifiers[index].name << " */\n"; 873 874 i--; 875 o.indent(i * 2) << "},\n"; 876 } 877 878 i--; 879 o.indent(i * 2) << "};" << "\n"; 880 } 881 882 void DisassemblerTables::emitContextTable(raw_ostream &o, unsigned &i) const { 883 const unsigned int tableSize = 16384; 884 o.indent(i * 2) << "static const uint8_t " CONTEXTS_STR 885 "[" << tableSize << "] = {\n"; 886 i++; 887 888 for (unsigned index = 0; index < tableSize; ++index) { 889 o.indent(i * 2); 890 891 if (index & ATTR_EVEX) { 892 o << "IC_EVEX"; 893 if (index & ATTR_EVEXL2) 894 o << "_L2"; 895 else if (index & ATTR_EVEXL) 896 o << "_L"; 897 if (index & ATTR_REXW) 898 o << "_W"; 899 if (index & ATTR_OPSIZE) 900 o << "_OPSIZE"; 901 else if (index & ATTR_XD) 902 o << "_XD"; 903 else if (index & ATTR_XS) 904 o << "_XS"; 905 if (index & ATTR_EVEXKZ) 906 o << "_KZ"; 907 else if (index & ATTR_EVEXK) 908 o << "_K"; 909 if (index & ATTR_EVEXB) 910 o << "_B"; 911 } 912 else if ((index & ATTR_VEXL) && (index & ATTR_REXW) && (index & ATTR_OPSIZE)) 913 o << "IC_VEX_L_W_OPSIZE"; 914 else if ((index & ATTR_VEXL) && (index & ATTR_REXW) && (index & ATTR_XD)) 915 o << "IC_VEX_L_W_XD"; 916 else if ((index & ATTR_VEXL) && (index & ATTR_REXW) && (index & ATTR_XS)) 917 o << "IC_VEX_L_W_XS"; 918 else if ((index & ATTR_VEXL) && (index & ATTR_REXW)) 919 o << "IC_VEX_L_W"; 920 else if ((index & ATTR_VEXL) && (index & ATTR_OPSIZE)) 921 o << "IC_VEX_L_OPSIZE"; 922 else if ((index & ATTR_VEXL) && (index & ATTR_XD)) 923 o << "IC_VEX_L_XD"; 924 else if ((index & ATTR_VEXL) && (index & ATTR_XS)) 925 o << "IC_VEX_L_XS"; 926 else if ((index & ATTR_VEX) && (index & ATTR_REXW) && (index & ATTR_OPSIZE)) 927 o << "IC_VEX_W_OPSIZE"; 928 else if ((index & ATTR_VEX) && (index & ATTR_REXW) && (index & ATTR_XD)) 929 o << "IC_VEX_W_XD"; 930 else if ((index & ATTR_VEX) && (index & ATTR_REXW) && (index & ATTR_XS)) 931 o << "IC_VEX_W_XS"; 932 else if (index & ATTR_VEXL) 933 o << "IC_VEX_L"; 934 else if ((index & ATTR_VEX) && (index & ATTR_REXW)) 935 o << "IC_VEX_W"; 936 else if ((index & ATTR_VEX) && (index & ATTR_OPSIZE)) 937 o << "IC_VEX_OPSIZE"; 938 else if ((index & ATTR_VEX) && (index & ATTR_XD)) 939 o << "IC_VEX_XD"; 940 else if ((index & ATTR_VEX) && (index & ATTR_XS)) 941 o << "IC_VEX_XS"; 942 else if (index & ATTR_VEX) 943 o << "IC_VEX"; 944 else if ((index & ATTR_64BIT) && (index & ATTR_REXW) && (index & ATTR_XS)) 945 o << "IC_64BIT_REXW_XS"; 946 else if ((index & ATTR_64BIT) && (index & ATTR_REXW) && (index & ATTR_XD)) 947 o << "IC_64BIT_REXW_XD"; 948 else if ((index & ATTR_64BIT) && (index & ATTR_REXW) && 949 (index & ATTR_OPSIZE)) 950 o << "IC_64BIT_REXW_OPSIZE"; 951 else if ((index & ATTR_64BIT) && (index & ATTR_REXW) && 952 (index & ATTR_ADSIZE)) 953 o << "IC_64BIT_REXW_ADSIZE"; 954 else if ((index & ATTR_64BIT) && (index & ATTR_XD) && (index & ATTR_OPSIZE)) 955 o << "IC_64BIT_XD_OPSIZE"; 956 else if ((index & ATTR_64BIT) && (index & ATTR_XS) && (index & ATTR_OPSIZE)) 957 o << "IC_64BIT_XS_OPSIZE"; 958 else if ((index & ATTR_64BIT) && (index & ATTR_XS)) 959 o << "IC_64BIT_XS"; 960 else if ((index & ATTR_64BIT) && (index & ATTR_XD)) 961 o << "IC_64BIT_XD"; 962 else if ((index & ATTR_64BIT) && (index & ATTR_OPSIZE) && 963 (index & ATTR_ADSIZE)) 964 o << "IC_64BIT_OPSIZE_ADSIZE"; 965 else if ((index & ATTR_64BIT) && (index & ATTR_OPSIZE)) 966 o << "IC_64BIT_OPSIZE"; 967 else if ((index & ATTR_64BIT) && (index & ATTR_ADSIZE)) 968 o << "IC_64BIT_ADSIZE"; 969 else if ((index & ATTR_64BIT) && (index & ATTR_REXW)) 970 o << "IC_64BIT_REXW"; 971 else if ((index & ATTR_64BIT)) 972 o << "IC_64BIT"; 973 else if ((index & ATTR_XS) && (index & ATTR_OPSIZE)) 974 o << "IC_XS_OPSIZE"; 975 else if ((index & ATTR_XD) && (index & ATTR_OPSIZE)) 976 o << "IC_XD_OPSIZE"; 977 else if (index & ATTR_XS) 978 o << "IC_XS"; 979 else if (index & ATTR_XD) 980 o << "IC_XD"; 981 else if ((index & ATTR_OPSIZE) && (index & ATTR_ADSIZE)) 982 o << "IC_OPSIZE_ADSIZE"; 983 else if (index & ATTR_OPSIZE) 984 o << "IC_OPSIZE"; 985 else if (index & ATTR_ADSIZE) 986 o << "IC_ADSIZE"; 987 else 988 o << "IC"; 989 990 if (index < tableSize - 1) 991 o << ","; 992 else 993 o << " "; 994 995 o << " /* " << index << " */"; 996 997 o << "\n"; 998 } 999 1000 i--; 1001 o.indent(i * 2) << "};" << "\n"; 1002 } 1003 1004 void DisassemblerTables::emitContextDecisions(raw_ostream &o1, raw_ostream &o2, 1005 unsigned &i1, unsigned &i2, 1006 unsigned &ModRMTableNum) const { 1007 emitContextDecision(o1, o2, i1, i2, ModRMTableNum, *Tables[0], ONEBYTE_STR); 1008 emitContextDecision(o1, o2, i1, i2, ModRMTableNum, *Tables[1], TWOBYTE_STR); 1009 emitContextDecision(o1, o2, i1, i2, ModRMTableNum, *Tables[2], THREEBYTE38_STR); 1010 emitContextDecision(o1, o2, i1, i2, ModRMTableNum, *Tables[3], THREEBYTE3A_STR); 1011 emitContextDecision(o1, o2, i1, i2, ModRMTableNum, *Tables[4], XOP8_MAP_STR); 1012 emitContextDecision(o1, o2, i1, i2, ModRMTableNum, *Tables[5], XOP9_MAP_STR); 1013 emitContextDecision(o1, o2, i1, i2, ModRMTableNum, *Tables[6], XOPA_MAP_STR); 1014 emitContextDecision(o1, o2, i1, i2, ModRMTableNum, *Tables[7], THREEDNOW_MAP_STR); 1015 } 1016 1017 void DisassemblerTables::emit(raw_ostream &o) const { 1018 unsigned i1 = 0; 1019 unsigned i2 = 0; 1020 1021 std::string s1; 1022 std::string s2; 1023 1024 raw_string_ostream o1(s1); 1025 raw_string_ostream o2(s2); 1026 1027 emitInstructionInfo(o, i2); 1028 o << "\n"; 1029 1030 emitContextTable(o, i2); 1031 o << "\n"; 1032 1033 unsigned ModRMTableNum = 0; 1034 1035 o << "static const InstrUID modRMTable[] = {\n"; 1036 i1++; 1037 std::vector<unsigned> EmptyTable(1, 0); 1038 ModRMTable[EmptyTable] = ModRMTableNum; 1039 ModRMTableNum += EmptyTable.size(); 1040 o1 << "/* EmptyTable */\n"; 1041 o1.indent(i1 * 2) << "0x0,\n"; 1042 i1--; 1043 emitContextDecisions(o1, o2, i1, i2, ModRMTableNum); 1044 1045 o << o1.str(); 1046 o << " 0x0\n"; 1047 o << "};\n"; 1048 o << "\n"; 1049 o << o2.str(); 1050 o << "\n"; 1051 o << "\n"; 1052 } 1053 1054 void DisassemblerTables::setTableFields(ModRMDecision &decision, 1055 const ModRMFilter &filter, 1056 InstrUID uid, 1057 uint8_t opcode) { 1058 for (unsigned index = 0; index < 256; ++index) { 1059 if (filter.accepts(index)) { 1060 if (decision.instructionIDs[index] == uid) 1061 continue; 1062 1063 if (decision.instructionIDs[index] != 0) { 1064 InstructionSpecifier &newInfo = 1065 InstructionSpecifiers[uid]; 1066 InstructionSpecifier &previousInfo = 1067 InstructionSpecifiers[decision.instructionIDs[index]]; 1068 1069 if(previousInfo.name == "NOOP" && (newInfo.name == "XCHG16ar" || 1070 newInfo.name == "XCHG32ar" || 1071 newInfo.name == "XCHG32ar64" || 1072 newInfo.name == "XCHG64ar")) 1073 continue; // special case for XCHG*ar and NOOP 1074 1075 if (previousInfo.name == "DATA16_PREFIX" && 1076 newInfo.name == "DATA32_PREFIX") 1077 continue; // special case for data16 and data32 1078 1079 if (outranks(previousInfo.insnContext, newInfo.insnContext)) 1080 continue; 1081 1082 if (previousInfo.insnContext == newInfo.insnContext) { 1083 errs() << "Error: Primary decode conflict: "; 1084 errs() << newInfo.name << " would overwrite " << previousInfo.name; 1085 errs() << "\n"; 1086 errs() << "ModRM " << index << "\n"; 1087 errs() << "Opcode " << (uint16_t)opcode << "\n"; 1088 errs() << "Context " << stringForContext(newInfo.insnContext) << "\n"; 1089 HasConflicts = true; 1090 } 1091 } 1092 1093 decision.instructionIDs[index] = uid; 1094 } 1095 } 1096 } 1097 1098 void DisassemblerTables::setTableFields(OpcodeType type, 1099 InstructionContext insnContext, 1100 uint8_t opcode, 1101 const ModRMFilter &filter, 1102 InstrUID uid, 1103 bool is32bit, 1104 bool noPrefix, 1105 bool ignoresVEX_L, 1106 bool ignoresVEX_W, 1107 unsigned addressSize) { 1108 ContextDecision &decision = *Tables[type]; 1109 1110 for (unsigned index = 0; index < IC_max; ++index) { 1111 if ((is32bit || addressSize == 16) && 1112 inheritsFrom((InstructionContext)index, IC_64BIT)) 1113 continue; 1114 1115 bool adSize64 = addressSize == 64; 1116 if (inheritsFrom((InstructionContext)index, 1117 InstructionSpecifiers[uid].insnContext, noPrefix, 1118 ignoresVEX_L, ignoresVEX_W, adSize64)) 1119 setTableFields(decision.opcodeDecisions[index].modRMDecisions[opcode], 1120 filter, 1121 uid, 1122 opcode); 1123 } 1124 } 1125