Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 1 | //===---- IA64ISelDAGToDAG.cpp - IA64 pattern matching inst selector ------===// |
| 2 | // |
| 3 | // The LLVM Compiler Infrastructure |
| 4 | // |
| 5 | // This file was developed by Duraid Madina and is distributed under |
| 6 | // the University of Illinois Open Source License. See LICENSE.TXT for details. |
| 7 | // |
| 8 | //===----------------------------------------------------------------------===// |
| 9 | // |
| 10 | // This file defines a pattern matching instruction selector for IA64, |
| 11 | // converting a legalized dag to an IA64 dag. |
| 12 | // |
| 13 | //===----------------------------------------------------------------------===// |
| 14 | |
| 15 | #include "IA64.h" |
| 16 | #include "IA64TargetMachine.h" |
| 17 | #include "IA64ISelLowering.h" |
| 18 | #include "llvm/CodeGen/MachineInstrBuilder.h" |
| 19 | #include "llvm/CodeGen/MachineFunction.h" |
| 20 | #include "llvm/CodeGen/SSARegMap.h" |
| 21 | #include "llvm/CodeGen/SelectionDAG.h" |
| 22 | #include "llvm/CodeGen/SelectionDAGISel.h" |
| 23 | #include "llvm/Target/TargetOptions.h" |
| 24 | #include "llvm/ADT/Statistic.h" |
| 25 | #include "llvm/Constants.h" |
| 26 | #include "llvm/GlobalValue.h" |
| 27 | #include "llvm/Support/Debug.h" |
| 28 | #include "llvm/Support/MathExtras.h" |
Chris Lattner | 2c2c6c6 | 2006-01-22 23:41:00 +0000 | [diff] [blame] | 29 | #include <iostream> |
Evan Cheng | ba2f0a9 | 2006-02-05 06:46:41 +0000 | [diff] [blame] | 30 | #include <set> |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 31 | using namespace llvm; |
| 32 | |
| 33 | namespace { |
| 34 | Statistic<> FusedFP ("ia64-codegen", "Number of fused fp operations"); |
| 35 | Statistic<> FrameOff("ia64-codegen", "Number of frame idx offsets collapsed"); |
| 36 | |
| 37 | //===--------------------------------------------------------------------===// |
| 38 | /// IA64DAGToDAGISel - IA64 specific code to select IA64 machine |
| 39 | /// instructions for SelectionDAG operations. |
| 40 | /// |
| 41 | class IA64DAGToDAGISel : public SelectionDAGISel { |
| 42 | IA64TargetLowering IA64Lowering; |
| 43 | unsigned GlobalBaseReg; |
| 44 | public: |
| 45 | IA64DAGToDAGISel(TargetMachine &TM) |
| 46 | : SelectionDAGISel(IA64Lowering), IA64Lowering(TM) {} |
| 47 | |
| 48 | virtual bool runOnFunction(Function &Fn) { |
| 49 | // Make sure we re-emit a set of the global base reg if necessary |
| 50 | GlobalBaseReg = 0; |
| 51 | return SelectionDAGISel::runOnFunction(Fn); |
| 52 | } |
| 53 | |
| 54 | /// getI64Imm - Return a target constant with the specified value, of type |
| 55 | /// i64. |
| 56 | inline SDOperand getI64Imm(uint64_t Imm) { |
| 57 | return CurDAG->getTargetConstant(Imm, MVT::i64); |
| 58 | } |
| 59 | |
| 60 | /// getGlobalBaseReg - insert code into the entry mbb to materialize the PIC |
| 61 | /// base register. Return the virtual register that holds this value. |
| 62 | // SDOperand getGlobalBaseReg(); TODO: hmm |
| 63 | |
| 64 | // Select - Convert the specified operand from a target-independent to a |
| 65 | // target-specific node if it hasn't already been changed. |
| 66 | SDOperand Select(SDOperand Op); |
| 67 | |
| 68 | SDNode *SelectIntImmediateExpr(SDOperand LHS, SDOperand RHS, |
| 69 | unsigned OCHi, unsigned OCLo, |
| 70 | bool IsArithmetic = false, |
| 71 | bool Negate = false); |
| 72 | SDNode *SelectBitfieldInsert(SDNode *N); |
| 73 | |
| 74 | /// SelectCC - Select a comparison of the specified values with the |
| 75 | /// specified condition code, returning the CR# of the expression. |
| 76 | SDOperand SelectCC(SDOperand LHS, SDOperand RHS, ISD::CondCode CC); |
| 77 | |
| 78 | /// SelectAddr - Given the specified address, return the two operands for a |
| 79 | /// load/store instruction, and return true if it should be an indexed [r+r] |
| 80 | /// operation. |
| 81 | bool SelectAddr(SDOperand Addr, SDOperand &Op1, SDOperand &Op2); |
| 82 | |
| 83 | SDOperand BuildSDIVSequence(SDNode *N); |
| 84 | SDOperand BuildUDIVSequence(SDNode *N); |
| 85 | |
| 86 | /// InstructionSelectBasicBlock - This callback is invoked by |
| 87 | /// SelectionDAGISel when it has created a SelectionDAG for us to codegen. |
| 88 | virtual void InstructionSelectBasicBlock(SelectionDAG &DAG); |
| 89 | |
| 90 | virtual const char *getPassName() const { |
| 91 | return "IA64 (Itanium) DAG->DAG Instruction Selector"; |
| 92 | } |
| 93 | |
| 94 | // Include the pieces autogenerated from the target description. |
| 95 | #include "IA64GenDAGISel.inc" |
| 96 | |
| 97 | private: |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 98 | SDOperand SelectDIV(SDOperand Op); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 99 | }; |
| 100 | } |
| 101 | |
| 102 | /// InstructionSelectBasicBlock - This callback is invoked by |
| 103 | /// SelectionDAGISel when it has created a SelectionDAG for us to codegen. |
| 104 | void IA64DAGToDAGISel::InstructionSelectBasicBlock(SelectionDAG &DAG) { |
| 105 | DEBUG(BB->dump()); |
| 106 | |
| 107 | // The selection process is inherently a bottom-up recursive process (users |
| 108 | // select their uses before themselves). Given infinite stack space, we |
| 109 | // could just start selecting on the root and traverse the whole graph. In |
| 110 | // practice however, this causes us to run out of stack space on large basic |
| 111 | // blocks. To avoid this problem, select the entry node, then all its uses, |
| 112 | // iteratively instead of recursively. |
| 113 | std::vector<SDOperand> Worklist; |
| 114 | Worklist.push_back(DAG.getEntryNode()); |
| 115 | |
| 116 | // Note that we can do this in the IA64 target (scanning forward across token |
| 117 | // chain edges) because no nodes ever get folded across these edges. On a |
| 118 | // target like X86 which supports load/modify/store operations, this would |
| 119 | // have to be more careful. |
| 120 | while (!Worklist.empty()) { |
| 121 | SDOperand Node = Worklist.back(); |
| 122 | Worklist.pop_back(); |
| 123 | |
| 124 | // Chose from the least deep of the top two nodes. |
| 125 | if (!Worklist.empty() && |
| 126 | Worklist.back().Val->getNodeDepth() < Node.Val->getNodeDepth()) |
| 127 | std::swap(Worklist.back(), Node); |
| 128 | |
| 129 | if ((Node.Val->getOpcode() >= ISD::BUILTIN_OP_END && |
| 130 | Node.Val->getOpcode() < IA64ISD::FIRST_NUMBER) || |
| 131 | CodeGenMap.count(Node)) continue; |
| 132 | |
| 133 | for (SDNode::use_iterator UI = Node.Val->use_begin(), |
| 134 | E = Node.Val->use_end(); UI != E; ++UI) { |
| 135 | // Scan the values. If this use has a value that is a token chain, add it |
| 136 | // to the worklist. |
| 137 | SDNode *User = *UI; |
| 138 | for (unsigned i = 0, e = User->getNumValues(); i != e; ++i) |
| 139 | if (User->getValueType(i) == MVT::Other) { |
| 140 | Worklist.push_back(SDOperand(User, i)); |
| 141 | break; |
| 142 | } |
| 143 | } |
| 144 | |
| 145 | // Finally, legalize this node. |
| 146 | Select(Node); |
| 147 | } |
| 148 | |
| 149 | // Select target instructions for the DAG. |
Evan Cheng | ba2f0a9 | 2006-02-05 06:46:41 +0000 | [diff] [blame] | 150 | DAG.setRoot(SelectRoot(DAG.getRoot())); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 151 | CodeGenMap.clear(); |
| 152 | DAG.RemoveDeadNodes(); |
| 153 | |
| 154 | // Emit machine code to BB. |
| 155 | ScheduleAndEmitDAG(DAG); |
| 156 | } |
| 157 | |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 158 | SDOperand IA64DAGToDAGISel::SelectDIV(SDOperand Op) { |
| 159 | SDNode *N = Op.Val; |
| 160 | SDOperand Chain = Select(N->getOperand(0)); |
| 161 | |
| 162 | SDOperand Tmp1 = Select(N->getOperand(0)); |
| 163 | SDOperand Tmp2 = Select(N->getOperand(1)); |
| 164 | |
| 165 | bool isFP=false; |
| 166 | |
| 167 | if(MVT::isFloatingPoint(Tmp1.getValueType())) |
| 168 | isFP=true; |
| 169 | |
| 170 | bool isModulus=false; // is it a division or a modulus? |
| 171 | bool isSigned=false; |
| 172 | |
| 173 | switch(N->getOpcode()) { |
| 174 | case ISD::FDIV: |
| 175 | case ISD::SDIV: isModulus=false; isSigned=true; break; |
| 176 | case ISD::UDIV: isModulus=false; isSigned=false; break; |
| 177 | case ISD::FREM: |
| 178 | case ISD::SREM: isModulus=true; isSigned=true; break; |
| 179 | case ISD::UREM: isModulus=true; isSigned=false; break; |
| 180 | } |
| 181 | |
| 182 | // TODO: check for integer divides by powers of 2 (or other simple patterns?) |
| 183 | |
| 184 | SDOperand TmpPR, TmpPR2; |
| 185 | SDOperand TmpF1, TmpF2, TmpF3, TmpF4, TmpF5, TmpF6, TmpF7, TmpF8; |
| 186 | SDOperand TmpF9, TmpF10,TmpF11,TmpF12,TmpF13,TmpF14,TmpF15; |
| 187 | SDOperand Result; |
Duraid Madina | 76bb6ae | 2006-01-16 14:33:04 +0000 | [diff] [blame] | 188 | |
| 189 | // we'll need copies of F0 and F1 |
| 190 | SDOperand F0 = CurDAG->getRegister(IA64::F0, MVT::f64); |
| 191 | SDOperand F1 = CurDAG->getRegister(IA64::F1, MVT::f64); |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 192 | |
| 193 | // OK, emit some code: |
| 194 | |
| 195 | if(!isFP) { |
| 196 | // first, load the inputs into FP regs. |
| 197 | TmpF1 = CurDAG->getTargetNode(IA64::SETFSIG, MVT::f64, Tmp1); |
| 198 | Chain = TmpF1.getValue(1); |
| 199 | TmpF2 = CurDAG->getTargetNode(IA64::SETFSIG, MVT::f64, Tmp2); |
| 200 | Chain = TmpF2.getValue(1); |
| 201 | |
| 202 | // next, convert the inputs to FP |
| 203 | if(isSigned) { |
| 204 | TmpF3 = CurDAG->getTargetNode(IA64::FCVTXF, MVT::f64, TmpF1); |
| 205 | Chain = TmpF3.getValue(1); |
| 206 | TmpF4 = CurDAG->getTargetNode(IA64::FCVTXF, MVT::f64, TmpF2); |
| 207 | Chain = TmpF4.getValue(1); |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 208 | } else { // is unsigned |
Duraid Madina | 76bb6ae | 2006-01-16 14:33:04 +0000 | [diff] [blame] | 209 | TmpF3 = CurDAG->getTargetNode(IA64::FCVTXUFS1, MVT::f64, TmpF1); |
| 210 | Chain = TmpF3.getValue(1); |
| 211 | TmpF4 = CurDAG->getTargetNode(IA64::FCVTXUFS1, MVT::f64, TmpF2); |
| 212 | Chain = TmpF4.getValue(1); |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 213 | } |
| 214 | |
| 215 | } else { // this is an FP divide/remainder, so we 'leak' some temp |
| 216 | // regs and assign TmpF3=Tmp1, TmpF4=Tmp2 |
| 217 | TmpF3=Tmp1; |
| 218 | TmpF4=Tmp2; |
| 219 | } |
| 220 | |
| 221 | // we start by computing an approximate reciprocal (good to 9 bits?) |
| 222 | // note, this instruction writes _both_ TmpF5 (answer) and TmpPR (predicate) |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 223 | if(isFP) |
| 224 | TmpF5 = CurDAG->getTargetNode(IA64::FRCPAS0, MVT::f64, MVT::i1, |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 225 | TmpF3, TmpF4); |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 226 | else |
| 227 | TmpF5 = CurDAG->getTargetNode(IA64::FRCPAS1, MVT::f64, MVT::i1, |
| 228 | TmpF3, TmpF4); |
| 229 | |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 230 | TmpPR = TmpF5.getValue(1); |
| 231 | Chain = TmpF5.getValue(2); |
| 232 | |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 233 | SDOperand minusB; |
| 234 | if(isModulus) { // for remainders, it'll be handy to have |
| 235 | // copies of -input_b |
| 236 | minusB = CurDAG->getTargetNode(IA64::SUB, MVT::i64, |
| 237 | CurDAG->getRegister(IA64::r0, MVT::i64), Tmp2); |
| 238 | Chain = minusB.getValue(1); |
| 239 | } |
| 240 | |
| 241 | SDOperand TmpE0, TmpY1, TmpE1, TmpY2; |
| 242 | |
| 243 | TmpE0 = CurDAG->getTargetNode(IA64::CFNMAS1, MVT::f64, |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 244 | TmpF4, TmpF5, F1, TmpPR); |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 245 | Chain = TmpE0.getValue(1); |
| 246 | TmpY1 = CurDAG->getTargetNode(IA64::CFMAS1, MVT::f64, |
| 247 | TmpF5, TmpE0, TmpF5, TmpPR); |
| 248 | Chain = TmpY1.getValue(1); |
| 249 | TmpE1 = CurDAG->getTargetNode(IA64::CFMAS1, MVT::f64, |
| 250 | TmpE0, TmpE0, F0, TmpPR); |
| 251 | Chain = TmpE1.getValue(1); |
| 252 | TmpY2 = CurDAG->getTargetNode(IA64::CFMAS1, MVT::f64, |
| 253 | TmpY1, TmpE1, TmpY1, TmpPR); |
| 254 | Chain = TmpY2.getValue(1); |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 255 | |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 256 | if(isFP) { // if this is an FP divide, we finish up here and exit early |
| 257 | if(isModulus) |
| 258 | assert(0 && "Sorry, try another FORTRAN compiler."); |
| 259 | |
| 260 | SDOperand TmpE2, TmpY3, TmpQ0, TmpR0; |
| 261 | |
| 262 | TmpE2 = CurDAG->getTargetNode(IA64::CFMAS1, MVT::f64, |
| 263 | TmpE1, TmpE1, F0, TmpPR); |
| 264 | Chain = TmpE2.getValue(1); |
| 265 | TmpY3 = CurDAG->getTargetNode(IA64::CFMAS1, MVT::f64, |
| 266 | TmpY2, TmpE2, TmpY2, TmpPR); |
| 267 | Chain = TmpY3.getValue(1); |
| 268 | TmpQ0 = CurDAG->getTargetNode(IA64::CFMADS1, MVT::f64, // double prec! |
| 269 | Tmp1, TmpY3, F0, TmpPR); |
| 270 | Chain = TmpQ0.getValue(1); |
| 271 | TmpR0 = CurDAG->getTargetNode(IA64::CFNMADS1, MVT::f64, // double prec! |
| 272 | Tmp2, TmpQ0, Tmp1, TmpPR); |
| 273 | Chain = TmpR0.getValue(1); |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 274 | |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 275 | // we want Result to have the same target register as the frcpa, so |
| 276 | // we two-address hack it. See the comment "for this to work..." on |
| 277 | // page 48 of Intel application note #245415 |
| 278 | Result = CurDAG->getTargetNode(IA64::TCFMADS0, MVT::f64, // d.p. s0 rndg! |
Duraid Madina | 76bb6ae | 2006-01-16 14:33:04 +0000 | [diff] [blame] | 279 | TmpF5, TmpY3, TmpR0, TmpQ0, TmpPR); |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 280 | Chain = Result.getValue(1); |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 281 | return Result; // XXX: early exit! |
| 282 | } else { // this is *not* an FP divide, so there's a bit left to do: |
| 283 | |
| 284 | SDOperand TmpQ2, TmpR2, TmpQ3, TmpQ; |
| 285 | |
| 286 | TmpQ2 = CurDAG->getTargetNode(IA64::CFMAS1, MVT::f64, |
| 287 | TmpF3, TmpY2, F0, TmpPR); |
| 288 | Chain = TmpQ2.getValue(1); |
| 289 | TmpR2 = CurDAG->getTargetNode(IA64::CFNMAS1, MVT::f64, |
| 290 | TmpF4, TmpQ2, TmpF3, TmpPR); |
| 291 | Chain = TmpR2.getValue(1); |
Duraid Madina | ae6dcdd | 2006-01-17 01:19:49 +0000 | [diff] [blame] | 292 | |
Duraid Madina | 76bb6ae | 2006-01-16 14:33:04 +0000 | [diff] [blame] | 293 | // we want TmpQ3 to have the same target register as the frcpa? maybe we |
| 294 | // should two-address hack it. See the comment "for this to work..." on page |
| 295 | // 48 of Intel application note #245415 |
Duraid Madina | ae6dcdd | 2006-01-17 01:19:49 +0000 | [diff] [blame] | 296 | TmpQ3 = CurDAG->getTargetNode(IA64::TCFMAS1, MVT::f64, |
| 297 | TmpF5, TmpR2, TmpY2, TmpQ2, TmpPR); |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 298 | Chain = TmpQ3.getValue(1); |
Duraid Madina | 76bb6ae | 2006-01-16 14:33:04 +0000 | [diff] [blame] | 299 | |
Duraid Madina | ae6dcdd | 2006-01-17 01:19:49 +0000 | [diff] [blame] | 300 | // STORY: without these two-address instructions (TCFMAS1 and TCFMADS0) |
| 301 | // the FPSWA won't be able to help out in the case of large/tiny |
| 302 | // arguments. Other fun bugs may also appear, e.g. 0/x = x, not 0. |
| 303 | |
Duraid Madina | 0c81dc8 | 2006-01-16 06:33:38 +0000 | [diff] [blame] | 304 | if(isSigned) |
| 305 | TmpQ = CurDAG->getTargetNode(IA64::FCVTFXTRUNCS1, MVT::f64, TmpQ3); |
| 306 | else |
| 307 | TmpQ = CurDAG->getTargetNode(IA64::FCVTFXUTRUNCS1, MVT::f64, TmpQ3); |
| 308 | |
| 309 | Chain = TmpQ.getValue(1); |
| 310 | |
| 311 | if(isModulus) { |
| 312 | SDOperand FPminusB = CurDAG->getTargetNode(IA64::SETFSIG, MVT::f64, |
| 313 | minusB); |
| 314 | Chain = FPminusB.getValue(1); |
| 315 | SDOperand Remainder = CurDAG->getTargetNode(IA64::XMAL, MVT::f64, |
| 316 | TmpQ, FPminusB, TmpF1); |
| 317 | Chain = Remainder.getValue(1); |
| 318 | Result = CurDAG->getTargetNode(IA64::GETFSIG, MVT::i64, Remainder); |
| 319 | Chain = Result.getValue(1); |
| 320 | } else { // just an integer divide |
| 321 | Result = CurDAG->getTargetNode(IA64::GETFSIG, MVT::i64, TmpQ); |
| 322 | Chain = Result.getValue(1); |
| 323 | } |
| 324 | |
| 325 | return Result; |
| 326 | } // wasn't an FP divide |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 327 | } |
| 328 | |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 329 | // Select - Convert the specified operand from a target-independent to a |
| 330 | // target-specific node if it hasn't already been changed. |
| 331 | SDOperand IA64DAGToDAGISel::Select(SDOperand Op) { |
| 332 | SDNode *N = Op.Val; |
| 333 | if (N->getOpcode() >= ISD::BUILTIN_OP_END && |
| 334 | N->getOpcode() < IA64ISD::FIRST_NUMBER) |
| 335 | return Op; // Already selected. |
| 336 | |
| 337 | // If this has already been converted, use it. |
| 338 | std::map<SDOperand, SDOperand>::iterator CGMI = CodeGenMap.find(Op); |
| 339 | if (CGMI != CodeGenMap.end()) return CGMI->second; |
| 340 | |
| 341 | switch (N->getOpcode()) { |
| 342 | default: break; |
| 343 | |
Duraid Madina | 64aa0ea | 2005-12-22 13:29:14 +0000 | [diff] [blame] | 344 | case IA64ISD::BRCALL: { // XXX: this is also a hack! |
| 345 | SDOperand Chain = Select(N->getOperand(0)); |
| 346 | SDOperand InFlag; // Null incoming flag value. |
| 347 | |
| 348 | if(N->getNumOperands()==3) // we have an incoming chain, callee and flag |
| 349 | InFlag = Select(N->getOperand(2)); |
| 350 | |
| 351 | unsigned CallOpcode; |
| 352 | SDOperand CallOperand; |
Duraid Madina | 64aa0ea | 2005-12-22 13:29:14 +0000 | [diff] [blame] | 353 | |
| 354 | // if we can call directly, do so |
| 355 | if (GlobalAddressSDNode *GASD = |
| 356 | dyn_cast<GlobalAddressSDNode>(N->getOperand(1))) { |
| 357 | CallOpcode = IA64::BRCALL_IPREL_GA; |
| 358 | CallOperand = CurDAG->getTargetGlobalAddress(GASD->getGlobal(), MVT::i64); |
| 359 | } else if (ExternalSymbolSDNode *ESSDN = // FIXME: we currently NEED this |
| 360 | // case for correctness, to avoid |
| 361 | // "non-pic code with imm reloc.n |
| 362 | // against dynamic symbol" errors |
| 363 | dyn_cast<ExternalSymbolSDNode>(N->getOperand(1))) { |
| 364 | CallOpcode = IA64::BRCALL_IPREL_ES; |
| 365 | CallOperand = N->getOperand(1); |
| 366 | } else { |
| 367 | // otherwise we need to load the function descriptor, |
| 368 | // load the branch target (function)'s entry point and GP, |
| 369 | // branch (call) then restore the GP |
| 370 | SDOperand FnDescriptor = Select(N->getOperand(1)); |
| 371 | |
| 372 | // load the branch target's entry point [mem] and |
| 373 | // GP value [mem+8] |
| 374 | SDOperand targetEntryPoint=CurDAG->getTargetNode(IA64::LD8, MVT::i64, |
| 375 | FnDescriptor); |
| 376 | Chain = targetEntryPoint.getValue(1); |
| 377 | SDOperand targetGPAddr=CurDAG->getTargetNode(IA64::ADDS, MVT::i64, |
| 378 | FnDescriptor, CurDAG->getConstant(8, MVT::i64)); |
| 379 | Chain = targetGPAddr.getValue(1); |
| 380 | SDOperand targetGP=CurDAG->getTargetNode(IA64::LD8, MVT::i64, |
| 381 | targetGPAddr); |
| 382 | Chain = targetGP.getValue(1); |
| 383 | |
| 384 | Chain = CurDAG->getCopyToReg(Chain, IA64::r1, targetGP, InFlag); |
| 385 | InFlag = Chain.getValue(1); |
| 386 | Chain = CurDAG->getCopyToReg(Chain, IA64::B6, targetEntryPoint, InFlag); // FLAG these? |
| 387 | InFlag = Chain.getValue(1); |
| 388 | |
| 389 | CallOperand = CurDAG->getRegister(IA64::B6, MVT::i64); |
| 390 | CallOpcode = IA64::BRCALL_INDIRECT; |
| 391 | } |
| 392 | |
| 393 | // Finally, once everything is setup, emit the call itself |
| 394 | if(InFlag.Val) |
Duraid Madina | b13d74a | 2005-12-25 14:09:08 +0000 | [diff] [blame] | 395 | Chain = CurDAG->getTargetNode(CallOpcode, MVT::Other, MVT::Flag, CallOperand, InFlag); |
Duraid Madina | 64aa0ea | 2005-12-22 13:29:14 +0000 | [diff] [blame] | 396 | else // there might be no arguments |
| 397 | Chain = CurDAG->getTargetNode(CallOpcode, MVT::Other, MVT::Flag, CallOperand, Chain); |
| 398 | InFlag = Chain.getValue(1); |
| 399 | |
| 400 | std::vector<SDOperand> CallResults; |
| 401 | |
| 402 | CallResults.push_back(Chain); |
| 403 | CallResults.push_back(InFlag); |
| 404 | |
| 405 | for (unsigned i = 0, e = CallResults.size(); i != e; ++i) |
| 406 | CodeGenMap[Op.getValue(i)] = CallResults[i]; |
| 407 | return CallResults[Op.ResNo]; |
| 408 | } |
Duraid Madina | a36153a | 2005-12-22 03:58:17 +0000 | [diff] [blame] | 409 | |
Duraid Madina | 8617f3c | 2005-12-22 07:14:45 +0000 | [diff] [blame] | 410 | case IA64ISD::GETFD: { |
| 411 | SDOperand Input = Select(N->getOperand(0)); |
Duraid Madina | bf09458 | 2006-01-11 03:50:40 +0000 | [diff] [blame] | 412 | SDOperand Result = CurDAG->getTargetNode(IA64::GETFD, MVT::i64, Input); |
| 413 | CodeGenMap[Op] = Result; |
| 414 | return Result; |
Duraid Madina | 8617f3c | 2005-12-22 07:14:45 +0000 | [diff] [blame] | 415 | } |
| 416 | |
Duraid Madina | b6f023a | 2005-11-21 14:14:54 +0000 | [diff] [blame] | 417 | case ISD::FDIV: |
| 418 | case ISD::SDIV: |
| 419 | case ISD::UDIV: |
| 420 | case ISD::SREM: |
| 421 | case ISD::UREM: return SelectDIV(Op); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 422 | |
Chris Lattner | a54aa94 | 2006-01-29 06:26:08 +0000 | [diff] [blame] | 423 | case ISD::TargetConstantFP: { |
Duraid Madina | 056728f | 2005-11-02 07:32:59 +0000 | [diff] [blame] | 424 | SDOperand Chain = CurDAG->getEntryNode(); // this is a constant, so.. |
| 425 | |
Duraid Madina | 9385680 | 2005-11-02 02:35:04 +0000 | [diff] [blame] | 426 | if (cast<ConstantFPSDNode>(N)->isExactlyValue(+0.0)) |
Duraid Madina | 056728f | 2005-11-02 07:32:59 +0000 | [diff] [blame] | 427 | return CurDAG->getCopyFromReg(Chain, IA64::F0, MVT::f64); |
Duraid Madina | 9385680 | 2005-11-02 02:35:04 +0000 | [diff] [blame] | 428 | else if (cast<ConstantFPSDNode>(N)->isExactlyValue(+1.0)) |
Duraid Madina | 056728f | 2005-11-02 07:32:59 +0000 | [diff] [blame] | 429 | return CurDAG->getCopyFromReg(Chain, IA64::F1, MVT::f64); |
Duraid Madina | 9385680 | 2005-11-02 02:35:04 +0000 | [diff] [blame] | 430 | else |
| 431 | assert(0 && "Unexpected FP constant!"); |
| 432 | } |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 433 | |
| 434 | case ISD::FrameIndex: { // TODO: reduce creepyness |
| 435 | int FI = cast<FrameIndexSDNode>(N)->getIndex(); |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 436 | if (N->hasOneUse()) |
| 437 | return CurDAG->SelectNodeTo(N, IA64::MOV, MVT::i64, |
| 438 | CurDAG->getTargetFrameIndex(FI, MVT::i64)); |
Duraid Madina | 19e5e14 | 2006-01-21 14:27:19 +0000 | [diff] [blame] | 439 | else |
| 440 | return CodeGenMap[Op] = CurDAG->getTargetNode(IA64::MOV, MVT::i64, |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 441 | CurDAG->getTargetFrameIndex(FI, MVT::i64)); |
| 442 | } |
| 443 | |
Duraid Madina | 2e0348e | 2006-01-15 09:45:23 +0000 | [diff] [blame] | 444 | case ISD::ConstantPool: { // TODO: nuke the constant pool |
| 445 | // (ia64 doesn't need one) |
Evan Cheng | b8973bd | 2006-01-31 22:23:14 +0000 | [diff] [blame] | 446 | ConstantPoolSDNode *CP = cast<ConstantPoolSDNode>(N); |
| 447 | Constant *C = CP->get(); |
| 448 | SDOperand CPI = CurDAG->getTargetConstantPool(C, MVT::i64, |
| 449 | CP->getAlignment()); |
Duraid Madina | 25d0a88 | 2005-10-29 16:08:30 +0000 | [diff] [blame] | 450 | return CurDAG->getTargetNode(IA64::ADDL_GA, MVT::i64, // ? |
| 451 | CurDAG->getRegister(IA64::r1, MVT::i64), CPI); |
| 452 | } |
| 453 | |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 454 | case ISD::GlobalAddress: { |
| 455 | GlobalValue *GV = cast<GlobalAddressSDNode>(N)->getGlobal(); |
| 456 | SDOperand GA = CurDAG->getTargetGlobalAddress(GV, MVT::i64); |
| 457 | SDOperand Tmp = CurDAG->getTargetNode(IA64::ADDL_GA, MVT::i64, |
| 458 | CurDAG->getRegister(IA64::r1, MVT::i64), GA); |
| 459 | return CurDAG->getTargetNode(IA64::LD8, MVT::i64, Tmp); |
| 460 | } |
Duraid Madina | a36153a | 2005-12-22 03:58:17 +0000 | [diff] [blame] | 461 | |
| 462 | /* XXX case ISD::ExternalSymbol: { |
| 463 | SDOperand EA = CurDAG->getTargetExternalSymbol(cast<ExternalSymbolSDNode>(N)->getSymbol(), |
| 464 | MVT::i64); |
| 465 | SDOperand Tmp = CurDAG->getTargetNode(IA64::ADDL_EA, MVT::i64, |
| 466 | CurDAG->getRegister(IA64::r1, MVT::i64), EA); |
| 467 | return CurDAG->getTargetNode(IA64::LD8, MVT::i64, Tmp); |
| 468 | } |
| 469 | */ |
| 470 | |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 471 | case ISD::LOAD: |
Duraid Madina | ecc1a1b | 2006-01-20 16:10:05 +0000 | [diff] [blame] | 472 | case ISD::EXTLOAD: // FIXME: load -1, not 1, for bools? |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 473 | case ISD::ZEXTLOAD: { |
| 474 | SDOperand Chain = Select(N->getOperand(0)); |
| 475 | SDOperand Address = Select(N->getOperand(1)); |
| 476 | |
| 477 | MVT::ValueType TypeBeingLoaded = (N->getOpcode() == ISD::LOAD) ? |
| 478 | N->getValueType(0) : cast<VTSDNode>(N->getOperand(3))->getVT(); |
| 479 | unsigned Opc; |
| 480 | switch (TypeBeingLoaded) { |
| 481 | default: N->dump(); assert(0 && "Cannot load this type!"); |
Duraid Madina | 9f72906 | 2005-11-04 09:59:06 +0000 | [diff] [blame] | 482 | case MVT::i1: { // this is a bool |
| 483 | Opc = IA64::LD1; // first we load a byte, then compare for != 0 |
Duraid Madina | a36153a | 2005-12-22 03:58:17 +0000 | [diff] [blame] | 484 | if(N->getValueType(0) == MVT::i1) // XXX: early exit! |
| 485 | return CurDAG->SelectNodeTo(N, IA64::CMPNE, MVT::i1, MVT::Other, |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 486 | CurDAG->getTargetNode(Opc, MVT::i64, Address), |
| 487 | CurDAG->getRegister(IA64::r0, MVT::i64), |
| 488 | Chain).getValue(Op.ResNo); |
Duraid Madina | a36153a | 2005-12-22 03:58:17 +0000 | [diff] [blame] | 489 | /* otherwise, we want to load a bool into something bigger: LD1 |
| 490 | will do that for us, so we just fall through */ |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 491 | } |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 492 | case MVT::i8: Opc = IA64::LD1; break; |
| 493 | case MVT::i16: Opc = IA64::LD2; break; |
| 494 | case MVT::i32: Opc = IA64::LD4; break; |
| 495 | case MVT::i64: Opc = IA64::LD8; break; |
| 496 | |
| 497 | case MVT::f32: Opc = IA64::LDF4; break; |
| 498 | case MVT::f64: Opc = IA64::LDF8; break; |
| 499 | } |
| 500 | |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 501 | // TODO: comment this |
| 502 | return CurDAG->SelectNodeTo(N, Opc, N->getValueType(0), MVT::Other, |
| 503 | Address, Chain).getValue(Op.ResNo); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 504 | } |
| 505 | |
| 506 | case ISD::TRUNCSTORE: |
| 507 | case ISD::STORE: { |
| 508 | SDOperand Address = Select(N->getOperand(2)); |
Duraid Madina | d525df3 | 2005-11-07 03:11:02 +0000 | [diff] [blame] | 509 | SDOperand Chain = Select(N->getOperand(0)); |
| 510 | |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 511 | unsigned Opc; |
| 512 | if (N->getOpcode() == ISD::STORE) { |
| 513 | switch (N->getOperand(1).getValueType()) { |
Duraid Madina | d525df3 | 2005-11-07 03:11:02 +0000 | [diff] [blame] | 514 | default: assert(0 && "unknown type in store"); |
| 515 | case MVT::i1: { // this is a bool |
| 516 | Opc = IA64::ST1; // we store either 0 or 1 as a byte |
Duraid Madina | 544cbbd | 2006-01-13 10:28:25 +0000 | [diff] [blame] | 517 | // first load zero! |
| 518 | SDOperand Initial = CurDAG->getCopyFromReg(Chain, IA64::r0, MVT::i64); |
| 519 | Chain = Initial.getValue(1); |
Duraid Madina | a7fb5be | 2006-01-20 03:40:25 +0000 | [diff] [blame] | 520 | // then load 1 into the same reg iff the predicate to store is 1 |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 521 | SDOperand Tmp = |
Duraid Madina | a7fb5be | 2006-01-20 03:40:25 +0000 | [diff] [blame] | 522 | CurDAG->getTargetNode(IA64::TPCADDS, MVT::i64, Initial, |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 523 | CurDAG->getConstant(1, MVT::i64), |
| 524 | Select(N->getOperand(1))); |
| 525 | return CurDAG->SelectNodeTo(N, Opc, MVT::Other, Address, Tmp, Chain); |
| 526 | } |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 527 | case MVT::i64: Opc = IA64::ST8; break; |
| 528 | case MVT::f64: Opc = IA64::STF8; break; |
Duraid Madina | d525df3 | 2005-11-07 03:11:02 +0000 | [diff] [blame] | 529 | } |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 530 | } else { //ISD::TRUNCSTORE |
| 531 | switch(cast<VTSDNode>(N->getOperand(4))->getVT()) { |
Duraid Madina | d525df3 | 2005-11-07 03:11:02 +0000 | [diff] [blame] | 532 | default: assert(0 && "unknown type in truncstore"); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 533 | case MVT::i8: Opc = IA64::ST1; break; |
| 534 | case MVT::i16: Opc = IA64::ST2; break; |
| 535 | case MVT::i32: Opc = IA64::ST4; break; |
| 536 | case MVT::f32: Opc = IA64::STF4; break; |
| 537 | } |
| 538 | } |
| 539 | |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 540 | return CurDAG->SelectNodeTo(N, Opc, MVT::Other, Select(N->getOperand(2)), |
| 541 | Select(N->getOperand(1)), Chain); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 542 | } |
| 543 | |
| 544 | case ISD::BRCOND: { |
| 545 | SDOperand Chain = Select(N->getOperand(0)); |
| 546 | SDOperand CC = Select(N->getOperand(1)); |
| 547 | MachineBasicBlock *Dest = |
| 548 | cast<BasicBlockSDNode>(N->getOperand(2))->getBasicBlock(); |
| 549 | //FIXME - we do NOT need long branches all the time |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 550 | return CurDAG->SelectNodeTo(N, IA64::BRLCOND_NOTCALL, MVT::Other, CC, |
| 551 | CurDAG->getBasicBlock(Dest), Chain); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 552 | } |
| 553 | |
| 554 | case ISD::CALLSEQ_START: |
| 555 | case ISD::CALLSEQ_END: { |
| 556 | int64_t Amt = cast<ConstantSDNode>(N->getOperand(1))->getValue(); |
| 557 | unsigned Opc = N->getOpcode() == ISD::CALLSEQ_START ? |
| 558 | IA64::ADJUSTCALLSTACKDOWN : IA64::ADJUSTCALLSTACKUP; |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 559 | return CurDAG->SelectNodeTo(N, Opc, MVT::Other, |
| 560 | getI64Imm(Amt), Select(N->getOperand(0))); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 561 | } |
| 562 | |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 563 | case ISD::BR: |
| 564 | // FIXME: we don't need long branches all the time! |
Chris Lattner | b19b899 | 2005-11-30 23:02:08 +0000 | [diff] [blame] | 565 | return CurDAG->SelectNodeTo(N, IA64::BRL_NOTCALL, MVT::Other, |
| 566 | N->getOperand(1), Select(N->getOperand(0))); |
Duraid Madina | f2db9b8 | 2005-10-28 17:46:35 +0000 | [diff] [blame] | 567 | } |
| 568 | |
| 569 | return SelectCode(Op); |
| 570 | } |
| 571 | |
| 572 | |
| 573 | /// createIA64DAGToDAGInstructionSelector - This pass converts a legalized DAG |
| 574 | /// into an IA64-specific DAG, ready for instruction scheduling. |
| 575 | /// |
| 576 | FunctionPass *llvm::createIA64DAGToDAGInstructionSelector(TargetMachine &TM) { |
| 577 | return new IA64DAGToDAGISel(TM); |
| 578 | } |
| 579 | |