lib/Target/IA64/IA64ISelLowering.cpp

   1 //===-- IA64ISelLowering.cpp - IA64 DAG Lowering Implementation -----------===//
   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 implements the IA64ISelLowering class.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #include "IA64ISelLowering.h"
  15 #include "IA64MachineFunctionInfo.h"
  16 #include "IA64TargetMachine.h"
  17 #include "llvm/CodeGen/MachineFrameInfo.h"
  18 #include "llvm/CodeGen/MachineFunction.h"
  19 #include "llvm/CodeGen/MachineInstrBuilder.h"
  20 #include "llvm/CodeGen/SelectionDAG.h"
  21 #include "llvm/CodeGen/SSARegMap.h"
  22 #include "llvm/Constants.h"
  23 #include "llvm/Function.h"
  24 using namespace llvm;
  25
  26 IA64TargetLowering::IA64TargetLowering(TargetMachine &TM)
  27   : TargetLowering(TM) {
  28
  29       // register class for general registers
  30       addRegisterClass(MVT::i64, IA64::GRRegisterClass);
  31
  32       // register class for FP registers
  33       addRegisterClass(MVT::f64, IA64::FPRegisterClass);
  34
  35       // register class for predicate registers
  36       addRegisterClass(MVT::i1, IA64::PRRegisterClass);
  37
  38       setOperationAction(ISD::BRCONDTWOWAY     , MVT::Other, Expand);
  39       setOperationAction(ISD::BRTWOWAY_CC      , MVT::Other, Expand);
  40       setOperationAction(ISD::FP_ROUND_INREG   , MVT::f32  , Expand);
  41
  42       setSetCCResultType(MVT::i1);
  43       setShiftAmountType(MVT::i64);
  44
  45       setOperationAction(ISD::EXTLOAD          , MVT::i1   , Promote);
  46
  47       setOperationAction(ISD::ZEXTLOAD         , MVT::i1   , Expand);
  48
  49       setOperationAction(ISD::SEXTLOAD         , MVT::i1   , Expand);
  50       setOperationAction(ISD::SEXTLOAD         , MVT::i8   , Expand);
  51       setOperationAction(ISD::SEXTLOAD         , MVT::i16  , Expand);
  52       setOperationAction(ISD::SEXTLOAD         , MVT::i32  , Expand);
  53
  54       setOperationAction(ISD::FREM             , MVT::f32  , Expand);
  55       setOperationAction(ISD::FREM             , MVT::f64  , Expand);
  56
  57       setOperationAction(ISD::UREM             , MVT::f32  , Expand);
  58       setOperationAction(ISD::UREM             , MVT::f64  , Expand);
  59
  60       setOperationAction(ISD::MEMMOVE          , MVT::Other, Expand);
  61       setOperationAction(ISD::MEMSET           , MVT::Other, Expand);
  62       setOperationAction(ISD::MEMCPY           , MVT::Other, Expand);
  63
  64       setOperationAction(ISD::SINT_TO_FP       , MVT::i1   , Promote);
  65       setOperationAction(ISD::UINT_TO_FP       , MVT::i1   , Promote);
  66
  67       // We don't support sin/cos/sqrt
  68       setOperationAction(ISD::FSIN , MVT::f64, Expand);
  69       setOperationAction(ISD::FCOS , MVT::f64, Expand);
  70       setOperationAction(ISD::FSQRT, MVT::f64, Expand);
  71       setOperationAction(ISD::FSIN , MVT::f32, Expand);
  72       setOperationAction(ISD::FCOS , MVT::f32, Expand);
  73       setOperationAction(ISD::FSQRT, MVT::f32, Expand);
  74
  75       // We don't have line number support yet.
  76       setOperationAction(ISD::LOCATION, MVT::Other, Expand);
  77
  78       //IA64 has these, but they are not implemented
  79       setOperationAction(ISD::CTTZ , MVT::i64  , Expand);
  80       setOperationAction(ISD::CTLZ , MVT::i64  , Expand);
  81
  82       computeRegisterProperties();
  83
  84       addLegalFPImmediate(+0.0);
  85       addLegalFPImmediate(+1.0);
  86 }
  87
  88 /// isFloatingPointZero - Return true if this is 0.0 or -0.0.
  89 static bool isFloatingPointZero(SDOperand Op) {
  90   if (ConstantFPSDNode *CFP = dyn_cast<ConstantFPSDNode>(Op))
  91     return CFP->isExactlyValue(-0.0) || CFP->isExactlyValue(0.0);
  92   else if (Op.getOpcode() == ISD::EXTLOAD || Op.getOpcode() == ISD::LOAD) {
  93     // Maybe this has already been legalized into the constant pool?
  94     if (ConstantPoolSDNode *CP = dyn_cast<ConstantPoolSDNode>(Op.getOperand(1)))
  95       if (ConstantFP *CFP = dyn_cast<ConstantFP>(CP->get()))
  96         return CFP->isExactlyValue(-0.0) || CFP->isExactlyValue(0.0);
  97   }
  98   return false;
  99 }
 100
 101 std::vector<SDOperand>
 102 IA64TargetLowering::LowerArguments(Function &F, SelectionDAG &DAG) {
 103   std::vector<SDOperand> ArgValues;
 104   //
 105   // add beautiful description of IA64 stack frame format
 106   // here (from intel 24535803.pdf most likely)
 107   //
 108   MachineFunction &MF = DAG.getMachineFunction();
 109   MachineFrameInfo *MFI = MF.getFrameInfo();
 110
 111   GP = MF.getSSARegMap()->createVirtualRegister(getRegClassFor(MVT::i64));
 112   SP = MF.getSSARegMap()->createVirtualRegister(getRegClassFor(MVT::i64));
 113   RP = MF.getSSARegMap()->createVirtualRegister(getRegClassFor(MVT::i64));
 114
 115   MachineBasicBlock& BB = MF.front();
 116
 117   unsigned args_int[] = {IA64::r32, IA64::r33, IA64::r34, IA64::r35,
 118                          IA64::r36, IA64::r37, IA64::r38, IA64::r39};
 119
 120   unsigned args_FP[] = {IA64::F8, IA64::F9, IA64::F10, IA64::F11,
 121                         IA64::F12,IA64::F13,IA64::F14, IA64::F15};
 122
 123   unsigned argVreg[8];
 124   unsigned argPreg[8];
 125   unsigned argOpc[8];
 126
 127   unsigned used_FPArgs = 0; // how many FP args have been used so far?
 128
 129   unsigned ArgOffset = 0;
 130   int count = 0;
 131
 132   for (Function::arg_iterator I = F.arg_begin(), E = F.arg_end(); I != E; ++I)
 133     {
 134       SDOperand newroot, argt;
 135       if(count < 8) { // need to fix this logic? maybe.
 136
 137         switch (getValueType(I->getType())) {
 138           default:
 139             assert(0 && "ERROR in LowerArgs: can't lower this type of arg.\n");
 140           case MVT::f32:
 141             // fixme? (well, will need to for weird FP structy stuff,
 142             // see intel ABI docs)
 143           case MVT::f64:
 144 //XXX            BuildMI(&BB, IA64::IDEF, 0, args_FP[used_FPArgs]);
 145             MF.addLiveIn(args_FP[used_FPArgs]); // mark this reg as liveIn
 146             // floating point args go into f8..f15 as-needed, the increment
 147             argVreg[count] =                              // is below..:
 148             MF.getSSARegMap()->createVirtualRegister(getRegClassFor(MVT::f64));
 149             // FP args go into f8..f15 as needed: (hence the ++)
 150             argPreg[count] = args_FP[used_FPArgs++];
 151             argOpc[count] = IA64::FMOV;
 152             argt = newroot = DAG.getCopyFromReg(DAG.getRoot(), argVreg[count],
 153                                                 MVT::f64);
 154             if (I->getType() == Type::FloatTy)
 155               argt = DAG.getNode(ISD::FP_ROUND, MVT::f32, argt);
 156             break;
 157           case MVT::i1: // NOTE: as far as C abi stuff goes,
 158                         // bools are just boring old ints
 159           case MVT::i8:
 160           case MVT::i16:
 161           case MVT::i32:
 162           case MVT::i64:
 163 //XXX            BuildMI(&BB, IA64::IDEF, 0, args_int[count]);
 164             MF.addLiveIn(args_int[count]); // mark this register as liveIn
 165             argVreg[count] =
 166             MF.getSSARegMap()->createVirtualRegister(getRegClassFor(MVT::i64));
 167             argPreg[count] = args_int[count];
 168             argOpc[count] = IA64::MOV;
 169             argt = newroot =
 170               DAG.getCopyFromReg(DAG.getRoot(), argVreg[count], MVT::i64);
 171             if ( getValueType(I->getType()) != MVT::i64)
 172               argt = DAG.getNode(ISD::TRUNCATE, getValueType(I->getType()),
 173                   newroot);
 174             break;
 175         }
 176       } else { // more than 8 args go into the frame
 177         // Create the frame index object for this incoming parameter...
 178         ArgOffset = 16 + 8 * (count - 8);
 179         int FI = MFI->CreateFixedObject(8, ArgOffset);
 180
 181         // Create the SelectionDAG nodes corresponding to a load
 182         //from this parameter
 183         SDOperand FIN = DAG.getFrameIndex(FI, MVT::i64);
 184         argt = newroot = DAG.getLoad(getValueType(I->getType()),
 185                                      DAG.getEntryNode(), FIN, DAG.getSrcValue(NULL));
 186       }
 187       ++count;
 188       DAG.setRoot(newroot.getValue(1));
 189       ArgValues.push_back(argt);
 190     }
 191
 192
 193   // Create a vreg to hold the output of (what will become)
 194   // the "alloc" instruction
 195   VirtGPR = MF.getSSARegMap()->createVirtualRegister(getRegClassFor(MVT::i64));
 196   BuildMI(&BB, IA64::PSEUDO_ALLOC, 0, VirtGPR);
 197   // we create a PSEUDO_ALLOC (pseudo)instruction for now
 198 /*
 199   BuildMI(&BB, IA64::IDEF, 0, IA64::r1);
 200
 201   // hmm:
 202   BuildMI(&BB, IA64::IDEF, 0, IA64::r12);
 203   BuildMI(&BB, IA64::IDEF, 0, IA64::rp);
 204   // ..hmm.
 205
 206   BuildMI(&BB, IA64::MOV, 1, GP).addReg(IA64::r1);
 207
 208   // hmm:
 209   BuildMI(&BB, IA64::MOV, 1, SP).addReg(IA64::r12);
 210   BuildMI(&BB, IA64::MOV, 1, RP).addReg(IA64::rp);
 211   // ..hmm.
 212 */
 213
 214   unsigned tempOffset=0;
 215
 216   // if this is a varargs function, we simply lower llvm.va_start by
 217   // pointing to the first entry
 218   if(F.isVarArg()) {
 219     tempOffset=0;
 220     VarArgsFrameIndex = MFI->CreateFixedObject(8, tempOffset);
 221   }
 222
 223   // here we actually do the moving of args, and store them to the stack
 224   // too if this is a varargs function:
 225   for (int i = 0; i < count && i < 8; ++i) {
 226     BuildMI(&BB, argOpc[i], 1, argVreg[i]).addReg(argPreg[i]);
 227     if(F.isVarArg()) {
 228       // if this is a varargs function, we copy the input registers to the stack
 229       int FI = MFI->CreateFixedObject(8, tempOffset);
 230       tempOffset+=8;   //XXX: is it safe to use r22 like this?
 231       BuildMI(&BB, IA64::MOV, 1, IA64::r22).addFrameIndex(FI);
 232       // FIXME: we should use st8.spill here, one day
 233       BuildMI(&BB, IA64::ST8, 1, IA64::r22).addReg(argPreg[i]);
 234     }
 235   }
 236
 237   // Finally, inform the code generator which regs we return values in.
 238   // (see the ISD::RET: case in the instruction selector)
 239   switch (getValueType(F.getReturnType())) {
 240   default: assert(0 && "i have no idea where to return this type!");
 241   case MVT::isVoid: break;
 242   case MVT::i1:
 243   case MVT::i8:
 244   case MVT::i16:
 245   case MVT::i32:
 246   case MVT::i64:
 247     MF.addLiveOut(IA64::r8);
 248     break;
 249   case MVT::f32:
 250   case MVT::f64:
 251     MF.addLiveOut(IA64::F8);
 252     break;
 253   }
 254
 255   return ArgValues;
 256 }
 257
 258 std::pair<SDOperand, SDOperand>
 259 IA64TargetLowering::LowerCallTo(SDOperand Chain,
 260                                 const Type *RetTy, bool isVarArg,
 261                                 unsigned CallingConv, bool isTailCall,
 262                                 SDOperand Callee, ArgListTy &Args,
 263                                 SelectionDAG &DAG) {
 264
 265   MachineFunction &MF = DAG.getMachineFunction();
 266
 267   unsigned NumBytes = 16;
 268   unsigned outRegsUsed = 0;
 269
 270   if (Args.size() > 8) {
 271     NumBytes += (Args.size() - 8) * 8;
 272     outRegsUsed = 8;
 273   } else {
 274     outRegsUsed = Args.size();
 275   }
 276
 277   // FIXME? this WILL fail if we ever try to pass around an arg that
 278   // consumes more than a single output slot (a 'real' double, int128
 279   // some sort of aggregate etc.), as we'll underestimate how many 'outX'
 280   // registers we use. Hopefully, the assembler will notice.
 281   MF.getInfo<IA64FunctionInfo>()->outRegsUsed=
 282     std::max(outRegsUsed, MF.getInfo<IA64FunctionInfo>()->outRegsUsed);
 283
 284   Chain = DAG.getNode(ISD::CALLSEQ_START, MVT::Other, Chain,
 285                         DAG.getConstant(NumBytes, getPointerTy()));
 286
 287   std::vector<SDOperand> args_to_use;
 288   for (unsigned i = 0, e = Args.size(); i != e; ++i)
 289     {
 290       switch (getValueType(Args[i].second)) {
 291       default: assert(0 && "unexpected argument type!");
 292       case MVT::i1:
 293       case MVT::i8:
 294       case MVT::i16:
 295       case MVT::i32:
 296         //promote to 64-bits, sign/zero extending based on type
 297         //of the argument
 298         if(Args[i].second->isSigned())
 299           Args[i].first = DAG.getNode(ISD::SIGN_EXTEND, MVT::i64,
 300               Args[i].first);
 301         else
 302           Args[i].first = DAG.getNode(ISD::ZERO_EXTEND, MVT::i64,
 303               Args[i].first);
 304         break;
 305       case MVT::f32:
 306         //promote to 64-bits
 307         Args[i].first = DAG.getNode(ISD::FP_EXTEND, MVT::f64, Args[i].first);
 308       case MVT::f64:
 309       case MVT::i64:
 310         break;
 311       }
 312       args_to_use.push_back(Args[i].first);
 313     }
 314
 315   std::vector<MVT::ValueType> RetVals;
 316   MVT::ValueType RetTyVT = getValueType(RetTy);
 317   if (RetTyVT != MVT::isVoid)
 318     RetVals.push_back(RetTyVT);
 319   RetVals.push_back(MVT::Other);
 320
 321   SDOperand TheCall = SDOperand(DAG.getCall(RetVals, Chain,
 322                                             Callee, args_to_use), 0);
 323   Chain = TheCall.getValue(RetTyVT != MVT::isVoid);
 324   Chain = DAG.getNode(ISD::CALLSEQ_END, MVT::Other, Chain,
 325                       DAG.getConstant(NumBytes, getPointerTy()));
 326   return std::make_pair(TheCall, Chain);
 327 }
 328
 329 SDOperand
 330 IA64TargetLowering::LowerVAStart(SDOperand Chain, SDOperand VAListP,
 331                                  Value *VAListV, SelectionDAG &DAG) {
 332   // vastart just stores the address of the VarArgsFrameIndex slot.
 333   SDOperand FR = DAG.getFrameIndex(VarArgsFrameIndex, MVT::i64);
 334   return DAG.getNode(ISD::STORE, MVT::Other, Chain, FR,
 335                      VAListP, DAG.getSrcValue(VAListV));
 336 }
 337
 338 std::pair<SDOperand,SDOperand> IA64TargetLowering::
 339 LowerVAArg(SDOperand Chain, SDOperand VAListP, Value *VAListV,
 340            const Type *ArgTy, SelectionDAG &DAG) {
 341
 342   MVT::ValueType ArgVT = getValueType(ArgTy);
 343   SDOperand Val = DAG.getLoad(MVT::i64, Chain,
 344                               VAListP, DAG.getSrcValue(VAListV));
 345   SDOperand Result = DAG.getLoad(ArgVT, DAG.getEntryNode(), Val,
 346                                  DAG.getSrcValue(NULL));
 347   unsigned Amt;
 348   if (ArgVT == MVT::i32 || ArgVT == MVT::f32)
 349     Amt = 8;
 350   else {
 351     assert((ArgVT == MVT::i64 || ArgVT == MVT::f64) &&
 352            "Other types should have been promoted for varargs!");
 353     Amt = 8;
 354   }
 355   Val = DAG.getNode(ISD::ADD, Val.getValueType(), Val,
 356                     DAG.getConstant(Amt, Val.getValueType()));
 357   Chain = DAG.getNode(ISD::STORE, MVT::Other, Chain,
 358                       Val, VAListP, DAG.getSrcValue(VAListV));
 359   return std::make_pair(Result, Chain);
 360 }
 361
 362
 363
 364 std::pair<SDOperand, SDOperand> IA64TargetLowering::
 365 LowerFrameReturnAddress(bool isFrameAddress, SDOperand Chain, unsigned Depth,
 366                         SelectionDAG &DAG) {
 367   assert(0 && "LowerFrameReturnAddress unimplemented");
 368   abort();
 369 }
 370