blob: 8b8ea0cc7a46ed9a81439e0874fd86e56a745bba [file] [log] [blame]
Dan Gohmanf17a25c2007-07-18 16:29:46 +00001//===-- X86/X86CodeEmitter.cpp - Convert X86 code to machine code ---------===//
2//
3// The LLVM Compiler Infrastructure
4//
Chris Lattner081ce942007-12-29 20:36:04 +00005// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
Dan Gohmanf17a25c2007-07-18 16:29:46 +00007//
8//===----------------------------------------------------------------------===//
9//
10// This file contains the pass that transforms the X86 machine instructions into
11// relocatable machine code.
12//
13//===----------------------------------------------------------------------===//
14
15#define DEBUG_TYPE "x86-emitter"
16#include "X86InstrInfo.h"
17#include "X86Subtarget.h"
18#include "X86TargetMachine.h"
19#include "X86Relocations.h"
20#include "X86.h"
21#include "llvm/PassManager.h"
22#include "llvm/CodeGen/MachineCodeEmitter.h"
23#include "llvm/CodeGen/MachineFunctionPass.h"
24#include "llvm/CodeGen/MachineInstr.h"
25#include "llvm/CodeGen/Passes.h"
26#include "llvm/Function.h"
27#include "llvm/ADT/Statistic.h"
28#include "llvm/Support/Compiler.h"
29#include "llvm/Target/TargetOptions.h"
30using namespace llvm;
31
32STATISTIC(NumEmitted, "Number of machine instructions emitted");
33
34namespace {
35 class VISIBILITY_HIDDEN Emitter : public MachineFunctionPass {
36 const X86InstrInfo *II;
37 const TargetData *TD;
38 TargetMachine &TM;
39 MachineCodeEmitter &MCE;
Evan Cheng8ee6bab2007-12-22 09:40:20 +000040 intptr_t PICBase;
Dan Gohmanf17a25c2007-07-18 16:29:46 +000041 bool Is64BitMode;
Evan Cheng8ee6bab2007-12-22 09:40:20 +000042 bool IsPIC;
Dan Gohmanf17a25c2007-07-18 16:29:46 +000043 public:
44 static char ID;
45 explicit Emitter(TargetMachine &tm, MachineCodeEmitter &mce)
46 : MachineFunctionPass((intptr_t)&ID), II(0), TD(0), TM(tm),
Evan Cheng8ee6bab2007-12-22 09:40:20 +000047 MCE(mce), PICBase(0), Is64BitMode(false),
48 IsPIC(TM.getRelocationModel() == Reloc::PIC_) {}
Dan Gohmanf17a25c2007-07-18 16:29:46 +000049 Emitter(TargetMachine &tm, MachineCodeEmitter &mce,
50 const X86InstrInfo &ii, const TargetData &td, bool is64)
51 : MachineFunctionPass((intptr_t)&ID), II(&ii), TD(&td), TM(tm),
Evan Cheng8ee6bab2007-12-22 09:40:20 +000052 MCE(mce), PICBase(0), Is64BitMode(is64),
53 IsPIC(TM.getRelocationModel() == Reloc::PIC_) {}
Dan Gohmanf17a25c2007-07-18 16:29:46 +000054
55 bool runOnMachineFunction(MachineFunction &MF);
56
57 virtual const char *getPassName() const {
58 return "X86 Machine Code Emitter";
59 }
60
61 void emitInstruction(const MachineInstr &MI);
62
63 private:
64 void emitPCRelativeBlockAddress(MachineBasicBlock *MBB);
Evan Cheng8ee6bab2007-12-22 09:40:20 +000065 void emitGlobalAddress(GlobalValue *GV, unsigned Reloc,
66 int Disp = 0, intptr_t PCAdj = 0,
67 bool DoesntNeedStub = false, bool isPIC = false);
68 void emitExternalSymbolAddress(const char *ES, unsigned Reloc,
69 bool isPIC = false);
Dan Gohmanf17a25c2007-07-18 16:29:46 +000070 void emitConstPoolAddress(unsigned CPI, unsigned Reloc, int Disp = 0,
Evan Cheng8ee6bab2007-12-22 09:40:20 +000071 intptr_t PCAdj = 0, bool isPIC = false);
72 void emitJumpTableAddress(unsigned JTI, unsigned Reloc,
73 intptr_t PCAdj = 0, bool isPIC = false);
Dan Gohmanf17a25c2007-07-18 16:29:46 +000074
75 void emitDisplacementField(const MachineOperand *RelocOp, int DispVal,
Evan Cheng8ee6bab2007-12-22 09:40:20 +000076 intptr_t PCAdj = 0);
Dan Gohmanf17a25c2007-07-18 16:29:46 +000077
78 void emitRegModRMByte(unsigned ModRMReg, unsigned RegOpcodeField);
79 void emitSIBByte(unsigned SS, unsigned Index, unsigned Base);
80 void emitConstant(uint64_t Val, unsigned Size);
81
82 void emitMemModRMByte(const MachineInstr &MI,
83 unsigned Op, unsigned RegOpcodeField,
Evan Cheng8ee6bab2007-12-22 09:40:20 +000084 intptr_t PCAdj = 0);
Dan Gohmanf17a25c2007-07-18 16:29:46 +000085
86 unsigned getX86RegNum(unsigned RegNo);
87 bool isX86_64ExtendedReg(const MachineOperand &MO);
88 unsigned determineREX(const MachineInstr &MI);
89 };
90 char Emitter::ID = 0;
91}
92
93/// createX86CodeEmitterPass - Return a pass that emits the collected X86 code
94/// to the specified MCE object.
95FunctionPass *llvm::createX86CodeEmitterPass(X86TargetMachine &TM,
96 MachineCodeEmitter &MCE) {
97 return new Emitter(TM, MCE);
98}
99
100bool Emitter::runOnMachineFunction(MachineFunction &MF) {
101 assert((MF.getTarget().getRelocationModel() != Reloc::Default ||
102 MF.getTarget().getRelocationModel() != Reloc::Static) &&
103 "JIT relocation model must be set to static or default!");
104 II = ((X86TargetMachine&)MF.getTarget()).getInstrInfo();
105 TD = ((X86TargetMachine&)MF.getTarget()).getTargetData();
106 Is64BitMode =
107 ((X86TargetMachine&)MF.getTarget()).getSubtarget<X86Subtarget>().is64Bit();
108
109 do {
110 MCE.startFunction(MF);
111 for (MachineFunction::iterator MBB = MF.begin(), E = MF.end();
112 MBB != E; ++MBB) {
113 MCE.StartMachineBasicBlock(MBB);
114 for (MachineBasicBlock::const_iterator I = MBB->begin(), E = MBB->end();
115 I != E; ++I)
116 emitInstruction(*I);
117 }
118 } while (MCE.finishFunction(MF));
119
120 return false;
121}
122
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000123/// emitPCRelativeBlockAddress - This method keeps track of the information
124/// necessary to resolve the address of this block later and emits a dummy
125/// value.
126///
127void Emitter::emitPCRelativeBlockAddress(MachineBasicBlock *MBB) {
128 // Remember where this reference was and where it is to so we can
129 // deal with it later.
130 MCE.addRelocation(MachineRelocation::getBB(MCE.getCurrentPCOffset(),
131 X86::reloc_pcrel_word, MBB));
132 MCE.emitWordLE(0);
133}
134
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000135/// emitGlobalAddress - Emit the specified address to the code stream assuming
136/// this is part of a "take the address of a global" instruction.
137///
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000138void Emitter::emitGlobalAddress(GlobalValue *GV, unsigned Reloc,
139 int Disp /* = 0 */, intptr_t PCAdj /* = 0 */,
140 bool DoesntNeedStub /* = false */,
141 bool isPIC /* = false */) {
142 if (isPIC)
143 PCAdj += PICBase;
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000144 MCE.addRelocation(MachineRelocation::getGV(MCE.getCurrentPCOffset(), Reloc,
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000145 GV, PCAdj, DoesntNeedStub));
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000146 if (Reloc == X86::reloc_absolute_dword)
147 MCE.emitWordLE(0);
148 MCE.emitWordLE(Disp); // The relocated value will be added to the displacement
149}
150
151/// emitExternalSymbolAddress - Arrange for the address of an external symbol to
152/// be emitted to the current location in the function, and allow it to be PC
153/// relative.
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000154void Emitter::emitExternalSymbolAddress(const char *ES, unsigned Reloc,
155 bool isPIC /* = false */) {
156 intptr_t PCAdj = isPIC ? PICBase : 0;
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000157 MCE.addRelocation(MachineRelocation::getExtSym(MCE.getCurrentPCOffset(),
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000158 Reloc, ES, PCAdj));
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000159 if (Reloc == X86::reloc_absolute_dword)
160 MCE.emitWordLE(0);
161 MCE.emitWordLE(0);
162}
163
164/// emitConstPoolAddress - Arrange for the address of an constant pool
165/// to be emitted to the current location in the function, and allow it to be PC
166/// relative.
167void Emitter::emitConstPoolAddress(unsigned CPI, unsigned Reloc,
168 int Disp /* = 0 */,
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000169 intptr_t PCAdj /* = 0 */,
170 bool isPIC /* = false */) {
171 if (isPIC)
172 PCAdj += PICBase;
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000173 MCE.addRelocation(MachineRelocation::getConstPool(MCE.getCurrentPCOffset(),
174 Reloc, CPI, PCAdj));
175 if (Reloc == X86::reloc_absolute_dword)
176 MCE.emitWordLE(0);
177 MCE.emitWordLE(Disp); // The relocated value will be added to the displacement
178}
179
180/// emitJumpTableAddress - Arrange for the address of a jump table to
181/// be emitted to the current location in the function, and allow it to be PC
182/// relative.
183void Emitter::emitJumpTableAddress(unsigned JTI, unsigned Reloc,
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000184 intptr_t PCAdj /* = 0 */,
185 bool isPIC /* = false */) {
186 if (isPIC)
187 PCAdj += PICBase;
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000188 MCE.addRelocation(MachineRelocation::getJumpTable(MCE.getCurrentPCOffset(),
189 Reloc, JTI, PCAdj));
190 if (Reloc == X86::reloc_absolute_dword)
191 MCE.emitWordLE(0);
192 MCE.emitWordLE(0); // The relocated value will be added to the displacement
193}
194
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000195unsigned Emitter::getX86RegNum(unsigned RegNo) {
Duncan Sands466eadd2007-08-29 19:01:20 +0000196 return ((X86RegisterInfo&)II->getRegisterInfo()).getX86RegNum(RegNo);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000197}
198
199inline static unsigned char ModRMByte(unsigned Mod, unsigned RegOpcode,
200 unsigned RM) {
201 assert(Mod < 4 && RegOpcode < 8 && RM < 8 && "ModRM Fields out of range!");
202 return RM | (RegOpcode << 3) | (Mod << 6);
203}
204
205void Emitter::emitRegModRMByte(unsigned ModRMReg, unsigned RegOpcodeFld){
206 MCE.emitByte(ModRMByte(3, RegOpcodeFld, getX86RegNum(ModRMReg)));
207}
208
209void Emitter::emitSIBByte(unsigned SS, unsigned Index, unsigned Base) {
210 // SIB byte is in the same format as the ModRMByte...
211 MCE.emitByte(ModRMByte(SS, Index, Base));
212}
213
214void Emitter::emitConstant(uint64_t Val, unsigned Size) {
215 // Output the constant in little endian byte order...
216 for (unsigned i = 0; i != Size; ++i) {
217 MCE.emitByte(Val & 255);
218 Val >>= 8;
219 }
220}
221
222/// isDisp8 - Return true if this signed displacement fits in a 8-bit
223/// sign-extended field.
224static bool isDisp8(int Value) {
225 return Value == (signed char)Value;
226}
227
228void Emitter::emitDisplacementField(const MachineOperand *RelocOp,
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000229 int DispVal, intptr_t PCAdj) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000230 // If this is a simple integer displacement that doesn't require a relocation,
231 // emit it now.
232 if (!RelocOp) {
233 emitConstant(DispVal, 4);
234 return;
235 }
236
237 // Otherwise, this is something that requires a relocation. Emit it as such
238 // now.
239 if (RelocOp->isGlobalAddress()) {
240 // In 64-bit static small code model, we could potentially emit absolute.
241 // But it's probably not beneficial.
242 // 89 05 00 00 00 00 mov %eax,0(%rip) # PC-relative
243 // 89 04 25 00 00 00 00 mov %eax,0x0 # Absolute
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000244 unsigned rt= Is64BitMode ? X86::reloc_pcrel_word
245 : (IsPIC ? X86::reloc_picrel_word : X86::reloc_absolute_word);
246 emitGlobalAddress(RelocOp->getGlobal(), rt, RelocOp->getOffset(),
247 PCAdj, false, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000248 } else if (RelocOp->isConstantPoolIndex()) {
Evan Cheng8c872652008-01-02 23:38:59 +0000249 unsigned rt = Is64BitMode ? X86::reloc_pcrel_word : X86::reloc_picrel_word;
250 emitConstPoolAddress(RelocOp->getIndex(), rt,
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000251 RelocOp->getOffset(), PCAdj, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000252 } else if (RelocOp->isJumpTableIndex()) {
Evan Cheng8c872652008-01-02 23:38:59 +0000253 unsigned rt = Is64BitMode ? X86::reloc_pcrel_word : X86::reloc_picrel_word;
254 emitJumpTableAddress(RelocOp->getIndex(), rt, PCAdj, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000255 } else {
256 assert(0 && "Unknown value to relocate!");
257 }
258}
259
260void Emitter::emitMemModRMByte(const MachineInstr &MI,
261 unsigned Op, unsigned RegOpcodeField,
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000262 intptr_t PCAdj) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000263 const MachineOperand &Op3 = MI.getOperand(Op+3);
264 int DispVal = 0;
265 const MachineOperand *DispForReloc = 0;
266
267 // Figure out what sort of displacement we have to handle here.
268 if (Op3.isGlobalAddress()) {
269 DispForReloc = &Op3;
270 } else if (Op3.isConstantPoolIndex()) {
Evan Cheng8c872652008-01-02 23:38:59 +0000271 if (Is64BitMode || IsPIC) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000272 DispForReloc = &Op3;
273 } else {
Chris Lattner6017d482007-12-30 23:10:15 +0000274 DispVal += MCE.getConstantPoolEntryAddress(Op3.getIndex());
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000275 DispVal += Op3.getOffset();
276 }
277 } else if (Op3.isJumpTableIndex()) {
Evan Cheng8c872652008-01-02 23:38:59 +0000278 if (Is64BitMode || IsPIC) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000279 DispForReloc = &Op3;
280 } else {
Chris Lattner6017d482007-12-30 23:10:15 +0000281 DispVal += MCE.getJumpTableEntryAddress(Op3.getIndex());
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000282 }
283 } else {
284 DispVal = Op3.getImm();
285 }
286
287 const MachineOperand &Base = MI.getOperand(Op);
288 const MachineOperand &Scale = MI.getOperand(Op+1);
289 const MachineOperand &IndexReg = MI.getOperand(Op+2);
290
291 unsigned BaseReg = Base.getReg();
292
293 // Is a SIB byte needed?
294 if (IndexReg.getReg() == 0 &&
295 (BaseReg == 0 || getX86RegNum(BaseReg) != N86::ESP)) {
296 if (BaseReg == 0) { // Just a displacement?
297 // Emit special case [disp32] encoding
298 MCE.emitByte(ModRMByte(0, RegOpcodeField, 5));
299
300 emitDisplacementField(DispForReloc, DispVal, PCAdj);
301 } else {
302 unsigned BaseRegNo = getX86RegNum(BaseReg);
303 if (!DispForReloc && DispVal == 0 && BaseRegNo != N86::EBP) {
304 // Emit simple indirect register encoding... [EAX] f.e.
305 MCE.emitByte(ModRMByte(0, RegOpcodeField, BaseRegNo));
306 } else if (!DispForReloc && isDisp8(DispVal)) {
307 // Emit the disp8 encoding... [REG+disp8]
308 MCE.emitByte(ModRMByte(1, RegOpcodeField, BaseRegNo));
309 emitConstant(DispVal, 1);
310 } else {
311 // Emit the most general non-SIB encoding: [REG+disp32]
312 MCE.emitByte(ModRMByte(2, RegOpcodeField, BaseRegNo));
313 emitDisplacementField(DispForReloc, DispVal, PCAdj);
314 }
315 }
316
317 } else { // We need a SIB byte, so start by outputting the ModR/M byte first
318 assert(IndexReg.getReg() != X86::ESP &&
319 IndexReg.getReg() != X86::RSP && "Cannot use ESP as index reg!");
320
321 bool ForceDisp32 = false;
322 bool ForceDisp8 = false;
323 if (BaseReg == 0) {
324 // If there is no base register, we emit the special case SIB byte with
325 // MOD=0, BASE=5, to JUST get the index, scale, and displacement.
326 MCE.emitByte(ModRMByte(0, RegOpcodeField, 4));
327 ForceDisp32 = true;
328 } else if (DispForReloc) {
329 // Emit the normal disp32 encoding.
330 MCE.emitByte(ModRMByte(2, RegOpcodeField, 4));
331 ForceDisp32 = true;
332 } else if (DispVal == 0 && getX86RegNum(BaseReg) != N86::EBP) {
333 // Emit no displacement ModR/M byte
334 MCE.emitByte(ModRMByte(0, RegOpcodeField, 4));
335 } else if (isDisp8(DispVal)) {
336 // Emit the disp8 encoding...
337 MCE.emitByte(ModRMByte(1, RegOpcodeField, 4));
338 ForceDisp8 = true; // Make sure to force 8 bit disp if Base=EBP
339 } else {
340 // Emit the normal disp32 encoding...
341 MCE.emitByte(ModRMByte(2, RegOpcodeField, 4));
342 }
343
344 // Calculate what the SS field value should be...
345 static const unsigned SSTable[] = { ~0, 0, 1, ~0, 2, ~0, ~0, ~0, 3 };
346 unsigned SS = SSTable[Scale.getImm()];
347
348 if (BaseReg == 0) {
349 // Handle the SIB byte for the case where there is no base. The
350 // displacement has already been output.
351 assert(IndexReg.getReg() && "Index register must be specified!");
352 emitSIBByte(SS, getX86RegNum(IndexReg.getReg()), 5);
353 } else {
354 unsigned BaseRegNo = getX86RegNum(BaseReg);
355 unsigned IndexRegNo;
356 if (IndexReg.getReg())
357 IndexRegNo = getX86RegNum(IndexReg.getReg());
358 else
359 IndexRegNo = 4; // For example [ESP+1*<noreg>+4]
360 emitSIBByte(SS, IndexRegNo, BaseRegNo);
361 }
362
363 // Do we need to output a displacement?
364 if (ForceDisp8) {
365 emitConstant(DispVal, 1);
366 } else if (DispVal != 0 || ForceDisp32) {
367 emitDisplacementField(DispForReloc, DispVal, PCAdj);
368 }
369 }
370}
371
372static unsigned sizeOfImm(const TargetInstrDescriptor *Desc) {
373 switch (Desc->TSFlags & X86II::ImmMask) {
374 case X86II::Imm8: return 1;
375 case X86II::Imm16: return 2;
376 case X86II::Imm32: return 4;
377 case X86II::Imm64: return 8;
378 default: assert(0 && "Immediate size not set!");
379 return 0;
380 }
381}
382
383/// isX86_64ExtendedReg - Is the MachineOperand a x86-64 extended register?
384/// e.g. r8, xmm8, etc.
385bool Emitter::isX86_64ExtendedReg(const MachineOperand &MO) {
386 if (!MO.isRegister()) return false;
Evan Chenge21ff432007-11-13 17:54:34 +0000387 switch (MO.getReg()) {
388 default: break;
389 case X86::R8: case X86::R9: case X86::R10: case X86::R11:
390 case X86::R12: case X86::R13: case X86::R14: case X86::R15:
391 case X86::R8D: case X86::R9D: case X86::R10D: case X86::R11D:
392 case X86::R12D: case X86::R13D: case X86::R14D: case X86::R15D:
393 case X86::R8W: case X86::R9W: case X86::R10W: case X86::R11W:
394 case X86::R12W: case X86::R13W: case X86::R14W: case X86::R15W:
395 case X86::R8B: case X86::R9B: case X86::R10B: case X86::R11B:
396 case X86::R12B: case X86::R13B: case X86::R14B: case X86::R15B:
397 case X86::XMM8: case X86::XMM9: case X86::XMM10: case X86::XMM11:
398 case X86::XMM12: case X86::XMM13: case X86::XMM14: case X86::XMM15:
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000399 return true;
Evan Chenge21ff432007-11-13 17:54:34 +0000400 }
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000401 return false;
402}
403
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000404inline static bool isX86_64NonExtLowByteReg(unsigned reg) {
405 return (reg == X86::SPL || reg == X86::BPL ||
406 reg == X86::SIL || reg == X86::DIL);
407}
408
409/// determineREX - Determine if the MachineInstr has to be encoded with a X86-64
410/// REX prefix which specifies 1) 64-bit instructions, 2) non-default operand
411/// size, and 3) use of X86-64 extended registers.
412unsigned Emitter::determineREX(const MachineInstr &MI) {
413 unsigned REX = 0;
414 const TargetInstrDescriptor *Desc = MI.getInstrDescriptor();
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000415
416 // Pseudo instructions do not need REX prefix byte.
417 if ((Desc->TSFlags & X86II::FormMask) == X86II::Pseudo)
418 return 0;
419 if (Desc->TSFlags & X86II::REX_W)
420 REX |= 1 << 3;
421
422 unsigned NumOps = Desc->numOperands;
423 if (NumOps) {
424 bool isTwoAddr = NumOps > 1 &&
425 Desc->getOperandConstraint(1, TOI::TIED_TO) != -1;
426
427 // If it accesses SPL, BPL, SIL, or DIL, then it requires a 0x40 REX prefix.
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000428 unsigned i = isTwoAddr ? 1 : 0;
429 for (unsigned e = NumOps; i != e; ++i) {
430 const MachineOperand& MO = MI.getOperand(i);
431 if (MO.isRegister()) {
432 unsigned Reg = MO.getReg();
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000433 if (isX86_64NonExtLowByteReg(Reg))
434 REX |= 0x40;
435 }
436 }
437
438 switch (Desc->TSFlags & X86II::FormMask) {
439 case X86II::MRMInitReg:
440 if (isX86_64ExtendedReg(MI.getOperand(0)))
441 REX |= (1 << 0) | (1 << 2);
442 break;
443 case X86II::MRMSrcReg: {
444 if (isX86_64ExtendedReg(MI.getOperand(0)))
445 REX |= 1 << 2;
446 i = isTwoAddr ? 2 : 1;
447 for (unsigned e = NumOps; i != e; ++i) {
448 const MachineOperand& MO = MI.getOperand(i);
449 if (isX86_64ExtendedReg(MO))
450 REX |= 1 << 0;
451 }
452 break;
453 }
454 case X86II::MRMSrcMem: {
455 if (isX86_64ExtendedReg(MI.getOperand(0)))
456 REX |= 1 << 2;
457 unsigned Bit = 0;
458 i = isTwoAddr ? 2 : 1;
459 for (; i != NumOps; ++i) {
460 const MachineOperand& MO = MI.getOperand(i);
461 if (MO.isRegister()) {
462 if (isX86_64ExtendedReg(MO))
463 REX |= 1 << Bit;
464 Bit++;
465 }
466 }
467 break;
468 }
469 case X86II::MRM0m: case X86II::MRM1m:
470 case X86II::MRM2m: case X86II::MRM3m:
471 case X86II::MRM4m: case X86II::MRM5m:
472 case X86II::MRM6m: case X86II::MRM7m:
473 case X86II::MRMDestMem: {
474 unsigned e = isTwoAddr ? 5 : 4;
475 i = isTwoAddr ? 1 : 0;
476 if (NumOps > e && isX86_64ExtendedReg(MI.getOperand(e)))
477 REX |= 1 << 2;
478 unsigned Bit = 0;
479 for (; i != e; ++i) {
480 const MachineOperand& MO = MI.getOperand(i);
481 if (MO.isRegister()) {
482 if (isX86_64ExtendedReg(MO))
483 REX |= 1 << Bit;
484 Bit++;
485 }
486 }
487 break;
488 }
489 default: {
490 if (isX86_64ExtendedReg(MI.getOperand(0)))
491 REX |= 1 << 0;
492 i = isTwoAddr ? 2 : 1;
493 for (unsigned e = NumOps; i != e; ++i) {
494 const MachineOperand& MO = MI.getOperand(i);
495 if (isX86_64ExtendedReg(MO))
496 REX |= 1 << 2;
497 }
498 break;
499 }
500 }
501 }
502 return REX;
503}
504
505void Emitter::emitInstruction(const MachineInstr &MI) {
506 NumEmitted++; // Keep track of the # of mi's emitted
507
508 const TargetInstrDescriptor *Desc = MI.getInstrDescriptor();
509 unsigned Opcode = Desc->Opcode;
510
511 // Emit the repeat opcode prefix as needed.
512 if ((Desc->TSFlags & X86II::Op0Mask) == X86II::REP) MCE.emitByte(0xF3);
513
514 // Emit the operand size opcode prefix as needed.
515 if (Desc->TSFlags & X86II::OpSize) MCE.emitByte(0x66);
516
517 // Emit the address size opcode prefix as needed.
518 if (Desc->TSFlags & X86II::AdSize) MCE.emitByte(0x67);
519
520 bool Need0FPrefix = false;
521 switch (Desc->TSFlags & X86II::Op0Mask) {
522 case X86II::TB:
523 Need0FPrefix = true; // Two-byte opcode prefix
524 break;
525 case X86II::T8:
526 MCE.emitByte(0x0F);
527 MCE.emitByte(0x38);
528 break;
529 case X86II::TA:
530 MCE.emitByte(0x0F);
531 MCE.emitByte(0x3A);
532 break;
533 case X86II::REP: break; // already handled.
534 case X86II::XS: // F3 0F
535 MCE.emitByte(0xF3);
536 Need0FPrefix = true;
537 break;
538 case X86II::XD: // F2 0F
539 MCE.emitByte(0xF2);
540 Need0FPrefix = true;
541 break;
542 case X86II::D8: case X86II::D9: case X86II::DA: case X86II::DB:
543 case X86II::DC: case X86II::DD: case X86II::DE: case X86II::DF:
544 MCE.emitByte(0xD8+
545 (((Desc->TSFlags & X86II::Op0Mask)-X86II::D8)
546 >> X86II::Op0Shift));
547 break; // Two-byte opcode prefix
548 default: assert(0 && "Invalid prefix!");
549 case 0: break; // No prefix!
550 }
551
552 if (Is64BitMode) {
553 // REX prefix
554 unsigned REX = determineREX(MI);
555 if (REX)
556 MCE.emitByte(0x40 | REX);
557 }
558
559 // 0x0F escape code must be emitted just before the opcode.
560 if (Need0FPrefix)
561 MCE.emitByte(0x0F);
562
563 // If this is a two-address instruction, skip one of the register operands.
564 unsigned NumOps = Desc->numOperands;
565 unsigned CurOp = 0;
566 if (NumOps > 1 && Desc->getOperandConstraint(1, TOI::TIED_TO) != -1)
567 CurOp++;
568
569 unsigned char BaseOpcode = II->getBaseOpcodeFor(Desc);
570 switch (Desc->TSFlags & X86II::FormMask) {
571 default: assert(0 && "Unknown FormMask value in X86 MachineCodeEmitter!");
572 case X86II::Pseudo:
573#ifndef NDEBUG
574 switch (Opcode) {
575 default:
576 assert(0 && "psuedo instructions should be removed before code emission");
577 case TargetInstrInfo::INLINEASM:
578 assert(0 && "JIT does not support inline asm!\n");
579 case TargetInstrInfo::LABEL:
580 assert(0 && "JIT does not support meta labels!\n");
581 case X86::IMPLICIT_USE:
582 case X86::IMPLICIT_DEF:
583 case X86::IMPLICIT_DEF_GR8:
584 case X86::IMPLICIT_DEF_GR16:
585 case X86::IMPLICIT_DEF_GR32:
586 case X86::IMPLICIT_DEF_GR64:
587 case X86::IMPLICIT_DEF_FR32:
588 case X86::IMPLICIT_DEF_FR64:
589 case X86::IMPLICIT_DEF_VR64:
590 case X86::IMPLICIT_DEF_VR128:
591 case X86::FP_REG_KILL:
592 break;
593 }
594#endif
595 CurOp = NumOps;
596 break;
597
598 case X86II::RawFrm:
599 MCE.emitByte(BaseOpcode);
600 if (CurOp != NumOps) {
601 const MachineOperand &MO = MI.getOperand(CurOp++);
602 if (MO.isMachineBasicBlock()) {
Chris Lattner6017d482007-12-30 23:10:15 +0000603 emitPCRelativeBlockAddress(MO.getMBB());
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000604 } else if (MO.isGlobalAddress()) {
605 bool NeedStub = Is64BitMode ||
606 Opcode == X86::TAILJMPd ||
607 Opcode == X86::TAILJMPr || Opcode == X86::TAILJMPm;
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000608 emitGlobalAddress(MO.getGlobal(), X86::reloc_pcrel_word,
609 0, 0, !NeedStub, false);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000610 } else if (MO.isExternalSymbol()) {
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000611 emitExternalSymbolAddress(MO.getSymbolName(),
612 X86::reloc_pcrel_word, false);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000613 } else if (MO.isImmediate()) {
614 emitConstant(MO.getImm(), sizeOfImm(Desc));
615 } else {
616 assert(0 && "Unknown RawFrm operand!");
617 }
618 }
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000619
620 // Remember the current PC offset, this is the PIC relocation
621 // base address.
622 if (Opcode == X86::MovePCtoStack)
623 PICBase = MCE.getCurrentPCOffset();
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000624 break;
625
626 case X86II::AddRegFrm:
627 MCE.emitByte(BaseOpcode + getX86RegNum(MI.getOperand(CurOp++).getReg()));
628
629 if (CurOp != NumOps) {
630 const MachineOperand &MO1 = MI.getOperand(CurOp++);
631 unsigned Size = sizeOfImm(Desc);
632 if (MO1.isImmediate())
633 emitConstant(MO1.getImm(), Size);
634 else {
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000635 unsigned rt = Is64BitMode ? X86::reloc_pcrel_word
636 : (IsPIC ? X86::reloc_picrel_word : X86::reloc_absolute_word);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000637 if (Opcode == X86::MOV64ri)
638 rt = X86::reloc_absolute_dword; // FIXME: add X86II flag?
639 if (MO1.isGlobalAddress())
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000640 emitGlobalAddress(MO1.getGlobal(), rt, MO1.getOffset(), false, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000641 else if (MO1.isExternalSymbol())
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000642 emitExternalSymbolAddress(MO1.getSymbolName(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000643 else if (MO1.isConstantPoolIndex())
Chris Lattner6017d482007-12-30 23:10:15 +0000644 emitConstPoolAddress(MO1.getIndex(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000645 else if (MO1.isJumpTableIndex())
Chris Lattner6017d482007-12-30 23:10:15 +0000646 emitJumpTableAddress(MO1.getIndex(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000647 }
648 }
649 break;
650
651 case X86II::MRMDestReg: {
652 MCE.emitByte(BaseOpcode);
653 emitRegModRMByte(MI.getOperand(CurOp).getReg(),
654 getX86RegNum(MI.getOperand(CurOp+1).getReg()));
655 CurOp += 2;
656 if (CurOp != NumOps)
657 emitConstant(MI.getOperand(CurOp++).getImm(), sizeOfImm(Desc));
658 break;
659 }
660 case X86II::MRMDestMem: {
661 MCE.emitByte(BaseOpcode);
662 emitMemModRMByte(MI, CurOp, getX86RegNum(MI.getOperand(CurOp+4).getReg()));
663 CurOp += 5;
664 if (CurOp != NumOps)
665 emitConstant(MI.getOperand(CurOp++).getImm(), sizeOfImm(Desc));
666 break;
667 }
668
669 case X86II::MRMSrcReg:
670 MCE.emitByte(BaseOpcode);
671 emitRegModRMByte(MI.getOperand(CurOp+1).getReg(),
672 getX86RegNum(MI.getOperand(CurOp).getReg()));
673 CurOp += 2;
674 if (CurOp != NumOps)
675 emitConstant(MI.getOperand(CurOp++).getImm(), sizeOfImm(Desc));
676 break;
677
678 case X86II::MRMSrcMem: {
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000679 intptr_t PCAdj = (CurOp+5 != NumOps) ? sizeOfImm(Desc) : 0;
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000680
681 MCE.emitByte(BaseOpcode);
682 emitMemModRMByte(MI, CurOp+1, getX86RegNum(MI.getOperand(CurOp).getReg()),
683 PCAdj);
684 CurOp += 5;
685 if (CurOp != NumOps)
686 emitConstant(MI.getOperand(CurOp++).getImm(), sizeOfImm(Desc));
687 break;
688 }
689
690 case X86II::MRM0r: case X86II::MRM1r:
691 case X86II::MRM2r: case X86II::MRM3r:
692 case X86II::MRM4r: case X86II::MRM5r:
693 case X86II::MRM6r: case X86II::MRM7r:
694 MCE.emitByte(BaseOpcode);
695 emitRegModRMByte(MI.getOperand(CurOp++).getReg(),
696 (Desc->TSFlags & X86II::FormMask)-X86II::MRM0r);
697
698 if (CurOp != NumOps) {
699 const MachineOperand &MO1 = MI.getOperand(CurOp++);
700 unsigned Size = sizeOfImm(Desc);
701 if (MO1.isImmediate())
702 emitConstant(MO1.getImm(), Size);
703 else {
704 unsigned rt = Is64BitMode ? X86::reloc_pcrel_word
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000705 : (IsPIC ? X86::reloc_picrel_word : X86::reloc_absolute_word);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000706 if (Opcode == X86::MOV64ri32)
707 rt = X86::reloc_absolute_word; // FIXME: add X86II flag?
708 if (MO1.isGlobalAddress())
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000709 emitGlobalAddress(MO1.getGlobal(), rt, MO1.getOffset(), false, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000710 else if (MO1.isExternalSymbol())
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000711 emitExternalSymbolAddress(MO1.getSymbolName(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000712 else if (MO1.isConstantPoolIndex())
Chris Lattner6017d482007-12-30 23:10:15 +0000713 emitConstPoolAddress(MO1.getIndex(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000714 else if (MO1.isJumpTableIndex())
Chris Lattner6017d482007-12-30 23:10:15 +0000715 emitJumpTableAddress(MO1.getIndex(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000716 }
717 }
718 break;
719
720 case X86II::MRM0m: case X86II::MRM1m:
721 case X86II::MRM2m: case X86II::MRM3m:
722 case X86II::MRM4m: case X86II::MRM5m:
723 case X86II::MRM6m: case X86II::MRM7m: {
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000724 intptr_t PCAdj = (CurOp+4 != NumOps) ?
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000725 (MI.getOperand(CurOp+4).isImmediate() ? sizeOfImm(Desc) : 4) : 0;
726
727 MCE.emitByte(BaseOpcode);
728 emitMemModRMByte(MI, CurOp, (Desc->TSFlags & X86II::FormMask)-X86II::MRM0m,
729 PCAdj);
730 CurOp += 4;
731
732 if (CurOp != NumOps) {
733 const MachineOperand &MO = MI.getOperand(CurOp++);
734 unsigned Size = sizeOfImm(Desc);
735 if (MO.isImmediate())
736 emitConstant(MO.getImm(), Size);
737 else {
738 unsigned rt = Is64BitMode ? X86::reloc_pcrel_word
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000739 : (IsPIC ? X86::reloc_picrel_word : X86::reloc_absolute_word);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000740 if (Opcode == X86::MOV64mi32)
741 rt = X86::reloc_absolute_word; // FIXME: add X86II flag?
742 if (MO.isGlobalAddress())
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000743 emitGlobalAddress(MO.getGlobal(), rt, MO.getOffset(), false, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000744 else if (MO.isExternalSymbol())
Evan Cheng8ee6bab2007-12-22 09:40:20 +0000745 emitExternalSymbolAddress(MO.getSymbolName(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000746 else if (MO.isConstantPoolIndex())
Chris Lattner6017d482007-12-30 23:10:15 +0000747 emitConstPoolAddress(MO.getIndex(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000748 else if (MO.isJumpTableIndex())
Chris Lattner6017d482007-12-30 23:10:15 +0000749 emitJumpTableAddress(MO.getIndex(), rt, IsPIC);
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000750 }
751 }
752 break;
753 }
754
755 case X86II::MRMInitReg:
756 MCE.emitByte(BaseOpcode);
757 // Duplicate register, used by things like MOV8r0 (aka xor reg,reg).
758 emitRegModRMByte(MI.getOperand(CurOp).getReg(),
759 getX86RegNum(MI.getOperand(CurOp).getReg()));
760 ++CurOp;
761 break;
762 }
763
764 assert((Desc->Flags & M_VARIABLE_OPS) != 0 ||
765 CurOp == NumOps && "Unknown encoding!");
766}