lib/Target/PIC16/PIC16ISelLowering.cpp

   1 //
   2 //                     The LLVM Compiler Infrastructure
   3 //
   4 // This file is distributed under the University of Illinois Open Source
   5 // License. See LICENSE.TXT for details.
   6 //
   7 //===----------------------------------------------------------------------===//
   8 //
   9 // This file defines the interfaces that PIC16 uses to lower LLVM code into a
  10 // selection DAG.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #define DEBUG_TYPE "pic16-lower"
  15
  16 #include "PIC16ISelLowering.h"
  17 #include "PIC16TargetMachine.h"
  18 #include "llvm/DerivedTypes.h"
  19 #include "llvm/GlobalValue.h"
  20 #include "llvm/Function.h"
  21 #include "llvm/CallingConv.h"
  22 #include "llvm/CodeGen/MachineFrameInfo.h"
  23 #include "llvm/CodeGen/MachineFunction.h"
  24 #include "llvm/CodeGen/MachineInstrBuilder.h"
  25 #include "llvm/CodeGen/MachineRegisterInfo.h"
  26
  27
  28 using namespace llvm;
  29
  30 static const char *getIntrinsicName(unsigned opcode) {
  31   std::string Basename;
  32   switch(opcode) {
  33   default: assert (0 && "do not know intrinsic name");
  34   // Arithmetic Right shift for integer types.
  35   case PIC16ISD::SRA_I8: Basename = "sra.i8"; break;
  36   case RTLIB::SRA_I16: Basename = "sra.i16"; break;
  37   case RTLIB::SRA_I32: Basename = "sra.i32"; break;
  38
  39   // Left shift for integer types.
  40   case PIC16ISD::SLL_I8: Basename = "sll.i8"; break;
  41   case RTLIB::SHL_I16: Basename = "sll.i16"; break;
  42   case RTLIB::SHL_I32: Basename = "sll.i32"; break;
  43
  44   // Logical Right Shift for integer types.
  45   case PIC16ISD::SRL_I8: Basename = "srl.i8"; break;
  46   case RTLIB::SRL_I16: Basename = "srl.i16"; break;
  47   case RTLIB::SRL_I32: Basename = "srl.i32"; break;
  48
  49   // Multiply for integer types.
  50   case PIC16ISD::MUL_I8: Basename = "mul.i8"; break;
  51   case RTLIB::MUL_I16: Basename = "mul.i16"; break;
  52   case RTLIB::MUL_I32: Basename = "mul.i32"; break;
  53
  54   // Signed division for integers.
  55   case RTLIB::SDIV_I16: Basename = "sdiv.i16"; break;
  56   case RTLIB::SDIV_I32: Basename = "sdiv.i32"; break;
  57
  58   // Unsigned division for integers.
  59   case RTLIB::UDIV_I16: Basename = "udiv.i16"; break;
  60   case RTLIB::UDIV_I32: Basename = "udiv.i32"; break;
  61
  62   // Signed Modulas for integers.
  63   case RTLIB::SREM_I16: Basename = "srem.i16"; break;
  64   case RTLIB::SREM_I32: Basename = "srem.i32"; break;
  65
  66   // Unsigned Modulas for integers.
  67   case RTLIB::UREM_I16: Basename = "urem.i16"; break;
  68   case RTLIB::UREM_I32: Basename = "urem.i32"; break;
  69
  70   //////////////////////
  71   // LIBCALLS FOR FLOATS
  72   //////////////////////
  73
  74   // Float to signed integrals
  75   case RTLIB::FPTOSINT_F32_I8: Basename = "f32_to_si32"; break;
  76   case RTLIB::FPTOSINT_F32_I16: Basename = "f32_to_si32"; break;
  77   case RTLIB::FPTOSINT_F32_I32: Basename = "f32_to_si32"; break;
  78
  79   // Signed integrals to float. char and int are first sign extended to i32
  80   // before being converted to float, so an I8_F32 or I16_F32 isn't required.
  81   case RTLIB::SINTTOFP_I32_F32: Basename = "si32_to_f32"; break;
  82
  83   // Float to Unsigned conversions.
  84   // Signed conversion can be used for unsigned conversion as well.
  85   // In signed and unsigned versions only the interpretation of the
  86   // MSB is different. Bit representation remains the same.
  87   case RTLIB::FPTOUINT_F32_I8: Basename = "f32_to_si32"; break;
  88   case RTLIB::FPTOUINT_F32_I16: Basename = "f32_to_si32"; break;
  89   case RTLIB::FPTOUINT_F32_I32: Basename = "f32_to_si32"; break;
  90
  91   // Unsigned to Float conversions. char and int are first zero extended
  92   // before being converted to float.
  93   case RTLIB::UINTTOFP_I32_F32: Basename = "ui32_to_f32"; break;
  94
  95   // Floating point add, sub, mul, div.
  96   case RTLIB::ADD_F32: Basename = "add.f32"; break;
  97   case RTLIB::SUB_F32: Basename = "sub.f32"; break;
  98   case RTLIB::MUL_F32: Basename = "mul.f32"; break;
  99   case RTLIB::DIV_F32: Basename = "div.f32"; break;
 100
 101   // Floating point comparison
 102   case RTLIB::O_F32: Basename = "unordered.f32"; break;
 103   case RTLIB::UO_F32: Basename = "unordered.f32"; break;
 104   case RTLIB::OLE_F32: Basename = "le.f32"; break;
 105   case RTLIB::OGE_F32: Basename = "ge.f32"; break;
 106   case RTLIB::OLT_F32: Basename = "lt.f32"; break;
 107   case RTLIB::OGT_F32: Basename = "gt.f32"; break;
 108   case RTLIB::OEQ_F32: Basename = "eq.f32"; break;
 109   case RTLIB::UNE_F32: Basename = "neq.f32"; break;
 110   }
 111
 112   std::string prefix = PAN::getTagName(PAN::PREFIX_SYMBOL);
 113   std::string tagname = PAN::getTagName(PAN::LIBCALL);
 114   std::string Fullname = prefix + tagname + Basename;
 115
 116   // The name has to live through program life.
 117   char *tmp = new char[Fullname.size() + 1];
 118   strcpy (tmp, Fullname.c_str());
 119
 120   return tmp;
 121 }
 122
 123 // PIC16TargetLowering Constructor.
 124 PIC16TargetLowering::PIC16TargetLowering(PIC16TargetMachine &TM)
 125   : TargetLowering(TM), TmpSize(0) {
 126
 127   Subtarget = &TM.getSubtarget<PIC16Subtarget>();
 128
 129   addRegisterClass(MVT::i8, PIC16::GPRRegisterClass);
 130
 131   setShiftAmountType(MVT::i8);
 132   setShiftAmountFlavor(Extend);
 133
 134   // SRA library call names
 135   setPIC16LibcallName(PIC16ISD::SRA_I8, getIntrinsicName(PIC16ISD::SRA_I8));
 136   setLibcallName(RTLIB::SRA_I16, getIntrinsicName(RTLIB::SRA_I16));
 137   setLibcallName(RTLIB::SRA_I32, getIntrinsicName(RTLIB::SRA_I32));
 138
 139   // SHL library call names
 140   setPIC16LibcallName(PIC16ISD::SLL_I8, getIntrinsicName(PIC16ISD::SLL_I8));
 141   setLibcallName(RTLIB::SHL_I16, getIntrinsicName(RTLIB::SHL_I16));
 142   setLibcallName(RTLIB::SHL_I32, getIntrinsicName(RTLIB::SHL_I32));
 143
 144   // SRL library call names
 145   setPIC16LibcallName(PIC16ISD::SRL_I8, getIntrinsicName(PIC16ISD::SRL_I8));
 146   setLibcallName(RTLIB::SRL_I16, getIntrinsicName(RTLIB::SRL_I16));
 147   setLibcallName(RTLIB::SRL_I32, getIntrinsicName(RTLIB::SRL_I32));
 148
 149   // MUL Library call names
 150   setPIC16LibcallName(PIC16ISD::MUL_I8, getIntrinsicName(PIC16ISD::MUL_I8));
 151   setLibcallName(RTLIB::MUL_I16, getIntrinsicName(RTLIB::MUL_I16));
 152   setLibcallName(RTLIB::MUL_I32, getIntrinsicName(RTLIB::MUL_I32));
 153
 154   // Signed division lib call names
 155   setLibcallName(RTLIB::SDIV_I16, getIntrinsicName(RTLIB::SDIV_I16));
 156   setLibcallName(RTLIB::SDIV_I32, getIntrinsicName(RTLIB::SDIV_I32));
 157
 158   // Unsigned division lib call names
 159   setLibcallName(RTLIB::UDIV_I16, getIntrinsicName(RTLIB::UDIV_I16));
 160   setLibcallName(RTLIB::UDIV_I32, getIntrinsicName(RTLIB::UDIV_I32));
 161
 162   // Signed remainder lib call names
 163   setLibcallName(RTLIB::SREM_I16, getIntrinsicName(RTLIB::SREM_I16));
 164   setLibcallName(RTLIB::SREM_I32, getIntrinsicName(RTLIB::SREM_I32));
 165
 166   // Unsigned remainder lib call names
 167   setLibcallName(RTLIB::UREM_I16, getIntrinsicName(RTLIB::UREM_I16));
 168   setLibcallName(RTLIB::UREM_I32, getIntrinsicName(RTLIB::UREM_I32));
 169
 170   // Floating point to signed int conversions.
 171   setLibcallName(RTLIB::FPTOSINT_F32_I8,
 172                  getIntrinsicName(RTLIB::FPTOSINT_F32_I8));
 173   setLibcallName(RTLIB::FPTOSINT_F32_I16,
 174                  getIntrinsicName(RTLIB::FPTOSINT_F32_I16));
 175   setLibcallName(RTLIB::FPTOSINT_F32_I32,
 176                  getIntrinsicName(RTLIB::FPTOSINT_F32_I32));
 177
 178   // Signed int to floats.
 179   setLibcallName(RTLIB::SINTTOFP_I32_F32,
 180                  getIntrinsicName(RTLIB::SINTTOFP_I32_F32));
 181
 182   // Floating points to unsigned ints.
 183   setLibcallName(RTLIB::FPTOUINT_F32_I8,
 184                  getIntrinsicName(RTLIB::FPTOUINT_F32_I8));
 185   setLibcallName(RTLIB::FPTOUINT_F32_I16,
 186                  getIntrinsicName(RTLIB::FPTOUINT_F32_I16));
 187   setLibcallName(RTLIB::FPTOUINT_F32_I32,
 188                  getIntrinsicName(RTLIB::FPTOUINT_F32_I32));
 189
 190   // Unsigned int to floats.
 191   setLibcallName(RTLIB::UINTTOFP_I32_F32,
 192                  getIntrinsicName(RTLIB::UINTTOFP_I32_F32));
 193
 194   // Floating point add, sub, mul ,div.
 195   setLibcallName(RTLIB::ADD_F32, getIntrinsicName(RTLIB::ADD_F32));
 196   setLibcallName(RTLIB::SUB_F32, getIntrinsicName(RTLIB::SUB_F32));
 197   setLibcallName(RTLIB::MUL_F32, getIntrinsicName(RTLIB::MUL_F32));
 198   setLibcallName(RTLIB::DIV_F32, getIntrinsicName(RTLIB::DIV_F32));
 199
 200   // Floationg point comparison
 201   setLibcallName(RTLIB::UO_F32, getIntrinsicName(RTLIB::UO_F32));
 202   setLibcallName(RTLIB::OLE_F32, getIntrinsicName(RTLIB::OLE_F32));
 203   setLibcallName(RTLIB::OGE_F32, getIntrinsicName(RTLIB::OGE_F32));
 204   setLibcallName(RTLIB::OLT_F32, getIntrinsicName(RTLIB::OLT_F32));
 205   setLibcallName(RTLIB::OGT_F32, getIntrinsicName(RTLIB::OGT_F32));
 206   setLibcallName(RTLIB::OEQ_F32, getIntrinsicName(RTLIB::OEQ_F32));
 207   setLibcallName(RTLIB::UNE_F32, getIntrinsicName(RTLIB::UNE_F32));
 208
 209   // Return value comparisons of floating point calls.
 210   setCmpLibcallCC(RTLIB::OEQ_F32, ISD::SETNE);
 211   setCmpLibcallCC(RTLIB::UNE_F32, ISD::SETNE);
 212   setCmpLibcallCC(RTLIB::OLT_F32, ISD::SETNE);
 213   setCmpLibcallCC(RTLIB::OLE_F32, ISD::SETNE);
 214   setCmpLibcallCC(RTLIB::OGE_F32, ISD::SETNE);
 215   setCmpLibcallCC(RTLIB::OGT_F32, ISD::SETNE);
 216   setCmpLibcallCC(RTLIB::UO_F32, ISD::SETNE);
 217   setCmpLibcallCC(RTLIB::O_F32, ISD::SETEQ);
 218
 219   setOperationAction(ISD::GlobalAddress, MVT::i16, Custom);
 220   setOperationAction(ISD::ExternalSymbol, MVT::i16, Custom);
 221
 222   setOperationAction(ISD::LOAD,   MVT::i8,  Legal);
 223   setOperationAction(ISD::LOAD,   MVT::i16, Custom);
 224   setOperationAction(ISD::LOAD,   MVT::i32, Custom);
 225
 226   setOperationAction(ISD::STORE,  MVT::i8,  Legal);
 227   setOperationAction(ISD::STORE,  MVT::i16, Custom);
 228   setOperationAction(ISD::STORE,  MVT::i32, Custom);
 229
 230   setOperationAction(ISD::ADDE,    MVT::i8,  Custom);
 231   setOperationAction(ISD::ADDC,    MVT::i8,  Custom);
 232   setOperationAction(ISD::SUBE,    MVT::i8,  Custom);
 233   setOperationAction(ISD::SUBC,    MVT::i8,  Custom);
 234   setOperationAction(ISD::SUB,    MVT::i8,  Custom);
 235   setOperationAction(ISD::ADD,    MVT::i8,  Custom);
 236   setOperationAction(ISD::ADD,    MVT::i16, Custom);
 237
 238   setOperationAction(ISD::OR,     MVT::i8,  Custom);
 239   setOperationAction(ISD::AND,    MVT::i8,  Custom);
 240   setOperationAction(ISD::XOR,    MVT::i8,  Custom);
 241
 242   setOperationAction(ISD::FrameIndex, MVT::i16, Custom);
 243   setOperationAction(ISD::CALL,   MVT::i16, Custom);
 244   setOperationAction(ISD::RET,    MVT::Other, Custom);
 245
 246   setOperationAction(ISD::MUL,    MVT::i8,  Custom);
 247   setOperationAction(ISD::MUL,    MVT::i16, Expand);
 248   setOperationAction(ISD::MUL,    MVT::i32, Expand);
 249
 250   setOperationAction(ISD::SMUL_LOHI,    MVT::i8,  Expand);
 251   setOperationAction(ISD::SMUL_LOHI,    MVT::i16, Expand);
 252   setOperationAction(ISD::SMUL_LOHI,    MVT::i32, Expand);
 253   setOperationAction(ISD::UMUL_LOHI,    MVT::i8,  Expand);
 254   setOperationAction(ISD::UMUL_LOHI,    MVT::i16, Expand);
 255   setOperationAction(ISD::UMUL_LOHI,    MVT::i32, Expand);
 256   setOperationAction(ISD::MULHU,        MVT::i8, Expand);
 257   setOperationAction(ISD::MULHU,        MVT::i16, Expand);
 258   setOperationAction(ISD::MULHU,        MVT::i32, Expand);
 259   setOperationAction(ISD::MULHS,        MVT::i8, Expand);
 260   setOperationAction(ISD::MULHS,        MVT::i16, Expand);
 261   setOperationAction(ISD::MULHS,        MVT::i32, Expand);
 262
 263   setOperationAction(ISD::SRA,    MVT::i8,  Custom);
 264   setOperationAction(ISD::SRA,    MVT::i16, Expand);
 265   setOperationAction(ISD::SRA,    MVT::i32, Expand);
 266   setOperationAction(ISD::SHL,    MVT::i8,  Custom);
 267   setOperationAction(ISD::SHL,    MVT::i16, Expand);
 268   setOperationAction(ISD::SHL,    MVT::i32, Expand);
 269   setOperationAction(ISD::SRL,    MVT::i8,  Custom);
 270   setOperationAction(ISD::SRL,    MVT::i16, Expand);
 271   setOperationAction(ISD::SRL,    MVT::i32, Expand);
 272
 273   // PIC16 does not support shift parts
 274   setOperationAction(ISD::SRA_PARTS,    MVT::i8,  Expand);
 275   setOperationAction(ISD::SRA_PARTS,    MVT::i16, Expand);
 276   setOperationAction(ISD::SRA_PARTS,    MVT::i32, Expand);
 277   setOperationAction(ISD::SHL_PARTS,    MVT::i8, Expand);
 278   setOperationAction(ISD::SHL_PARTS,    MVT::i16, Expand);
 279   setOperationAction(ISD::SHL_PARTS,    MVT::i32, Expand);
 280   setOperationAction(ISD::SRL_PARTS,    MVT::i8, Expand);
 281   setOperationAction(ISD::SRL_PARTS,    MVT::i16, Expand);
 282   setOperationAction(ISD::SRL_PARTS,    MVT::i32, Expand);
 283
 284
 285   // PIC16 does not have a SETCC, expand it to SELECT_CC.
 286   setOperationAction(ISD::SETCC,  MVT::i8, Expand);
 287   setOperationAction(ISD::SELECT,  MVT::i8, Expand);
 288   setOperationAction(ISD::BRCOND, MVT::Other, Expand);
 289   setOperationAction(ISD::BRIND, MVT::Other, Expand);
 290
 291   setOperationAction(ISD::SELECT_CC,  MVT::i8, Custom);
 292   setOperationAction(ISD::BR_CC,  MVT::i8, Custom);
 293
 294   //setOperationAction(ISD::TRUNCATE, MVT::i16, Custom);
 295   setTruncStoreAction(MVT::i16,   MVT::i8,  Custom);
 296
 297   // Now deduce the information based on the above mentioned
 298   // actions
 299   computeRegisterProperties();
 300 }
 301
 302 // getOutFlag - Extract the flag result if the Op has it.
 303 static SDValue getOutFlag(SDValue &Op) {
 304   // Flag is the last value of the node.
 305   SDValue Flag = Op.getValue(Op.getNode()->getNumValues() - 1);
 306
 307   assert (Flag.getValueType() == MVT::Flag
 308           && "Node does not have an out Flag");
 309
 310   return Flag;
 311 }
 312 // Get the TmpOffset for FrameIndex
 313 unsigned PIC16TargetLowering::GetTmpOffsetForFI(unsigned FI, unsigned size) {
 314   std::map<unsigned, unsigned>::iterator
 315             MapIt = FiTmpOffsetMap.find(FI);
 316   if (MapIt != FiTmpOffsetMap.end())
 317       return MapIt->second;
 318
 319   // This FI (FrameIndex) is not yet mapped, so map it
 320   FiTmpOffsetMap[FI] = TmpSize;
 321   TmpSize += size;
 322   return FiTmpOffsetMap[FI];
 323 }
 324
 325 // To extract chain value from the SDValue Nodes
 326 // This function will help to maintain the chain extracting
 327 // code at one place. In case of any change in future it will
 328 // help maintain the code.
 329 static SDValue getChain(SDValue &Op) {
 330   SDValue Chain = Op.getValue(Op.getNode()->getNumValues() - 1);
 331
 332   // If the last value returned in Flag then the chain is
 333   // second last value returned.
 334   if (Chain.getValueType() == MVT::Flag)
 335     Chain = Op.getValue(Op.getNode()->getNumValues() - 2);
 336
 337   // All nodes may not produce a chain. Therefore following assert
 338   // verifies that the node is returning a chain only.
 339   assert (Chain.getValueType() == MVT::Other
 340           && "Node does not have a chain");
 341
 342   return Chain;
 343 }
 344
 345 /// PopulateResults - Helper function to LowerOperation.
 346 /// If a node wants to return multiple results after lowering,
 347 /// it stuffs them into an array of SDValue called Results.
 348
 349 static void PopulateResults(SDValue N, SmallVectorImpl<SDValue>&Results) {
 350   if (N.getOpcode() == ISD::MERGE_VALUES) {
 351     int NumResults = N.getNumOperands();
 352     for( int i = 0; i < NumResults; i++)
 353       Results.push_back(N.getOperand(i));
 354   }
 355   else
 356     Results.push_back(N);
 357 }
 358
 359 MVT PIC16TargetLowering::getSetCCResultType(MVT ValType) const {
 360   return MVT::i8;
 361 }
 362
 363 /// The type legalizer framework of generating legalizer can generate libcalls
 364 /// only when the operand/result types are illegal.
 365 /// PIC16 needs to generate libcalls even for the legal types (i8) for some ops.
 366 /// For example an arithmetic right shift. These functions are used to lower
 367 /// such operations that generate libcall for legal types.
 368
 369 void
 370 PIC16TargetLowering::setPIC16LibcallName(PIC16ISD::PIC16Libcall Call,
 371                                          const char *Name) {
 372   PIC16LibcallNames[Call] = Name;
 373 }
 374
 375 const char *
 376 PIC16TargetLowering::getPIC16LibcallName(PIC16ISD::PIC16Libcall Call) {
 377   return PIC16LibcallNames[Call];
 378 }
 379
 380 SDValue
 381 PIC16TargetLowering::MakePIC16Libcall(PIC16ISD::PIC16Libcall Call,
 382                                       MVT RetVT, const SDValue *Ops,
 383                                       unsigned NumOps, bool isSigned,
 384                                       SelectionDAG &DAG, DebugLoc dl) {
 385
 386   TargetLowering::ArgListTy Args;
 387   Args.reserve(NumOps);
 388
 389   TargetLowering::ArgListEntry Entry;
 390   for (unsigned i = 0; i != NumOps; ++i) {
 391     Entry.Node = Ops[i];
 392     Entry.Ty = Entry.Node.getValueType().getTypeForMVT();
 393     Entry.isSExt = isSigned;
 394     Entry.isZExt = !isSigned;
 395     Args.push_back(Entry);
 396   }
 397   SDValue Callee = DAG.getExternalSymbol(getPIC16LibcallName(Call), MVT::i8);
 398
 399    const Type *RetTy = RetVT.getTypeForMVT();
 400    std::pair<SDValue,SDValue> CallInfo =
 401      LowerCallTo(DAG.getEntryNode(), RetTy, isSigned, !isSigned, false,
 402                  false, CallingConv::C, false, Callee, Args, DAG, dl);
 403
 404   return CallInfo.first;
 405 }
 406
 407 const char *PIC16TargetLowering::getTargetNodeName(unsigned Opcode) const {
 408   switch (Opcode) {
 409   default:                         return NULL;
 410   case PIC16ISD::Lo:               return "PIC16ISD::Lo";
 411   case PIC16ISD::Hi:               return "PIC16ISD::Hi";
 412   case PIC16ISD::MTLO:             return "PIC16ISD::MTLO";
 413   case PIC16ISD::MTHI:             return "PIC16ISD::MTHI";
 414   case PIC16ISD::MTPCLATH:         return "PIC16ISD::MTPCLATH";
 415   case PIC16ISD::PIC16Connect:     return "PIC16ISD::PIC16Connect";
 416   case PIC16ISD::Banksel:          return "PIC16ISD::Banksel";
 417   case PIC16ISD::PIC16Load:        return "PIC16ISD::PIC16Load";
 418   case PIC16ISD::PIC16LdArg:       return "PIC16ISD::PIC16LdArg";
 419   case PIC16ISD::PIC16LdWF:        return "PIC16ISD::PIC16LdWF";
 420   case PIC16ISD::PIC16Store:       return "PIC16ISD::PIC16Store";
 421   case PIC16ISD::PIC16StWF:        return "PIC16ISD::PIC16StWF";
 422   case PIC16ISD::BCF:              return "PIC16ISD::BCF";
 423   case PIC16ISD::LSLF:             return "PIC16ISD::LSLF";
 424   case PIC16ISD::LRLF:             return "PIC16ISD::LRLF";
 425   case PIC16ISD::RLF:              return "PIC16ISD::RLF";
 426   case PIC16ISD::RRF:              return "PIC16ISD::RRF";
 427   case PIC16ISD::CALL:             return "PIC16ISD::CALL";
 428   case PIC16ISD::CALLW:            return "PIC16ISD::CALLW";
 429   case PIC16ISD::SUBCC:            return "PIC16ISD::SUBCC";
 430   case PIC16ISD::SELECT_ICC:       return "PIC16ISD::SELECT_ICC";
 431   case PIC16ISD::BRCOND:           return "PIC16ISD::BRCOND";
 432   case PIC16ISD::Dummy:            return "PIC16ISD::Dummy";
 433   }
 434 }
 435
 436 void PIC16TargetLowering::ReplaceNodeResults(SDNode *N,
 437                                              SmallVectorImpl<SDValue>&Results,
 438                                              SelectionDAG &DAG) {
 439
 440   switch (N->getOpcode()) {
 441     case ISD::GlobalAddress:
 442       Results.push_back(ExpandGlobalAddress(N, DAG));
 443       return;
 444     case ISD::ExternalSymbol:
 445       Results.push_back(ExpandExternalSymbol(N, DAG));
 446       return;
 447     case ISD::STORE:
 448       Results.push_back(ExpandStore(N, DAG));
 449       return;
 450     case ISD::LOAD:
 451       PopulateResults(ExpandLoad(N, DAG), Results);
 452       return;
 453     case ISD::ADD:
 454       // Results.push_back(ExpandAdd(N, DAG));
 455       return;
 456     case ISD::FrameIndex:
 457       Results.push_back(ExpandFrameIndex(N, DAG));
 458       return;
 459     default:
 460       assert (0 && "not implemented");
 461       return;
 462   }
 463 }
 464
 465 SDValue PIC16TargetLowering::ExpandFrameIndex(SDNode *N, SelectionDAG &DAG) {
 466
 467   // Currently handling FrameIndex of size MVT::i16 only
 468   // One example of this scenario is when return value is written on
 469   // FrameIndex#0
 470
 471   if (N->getValueType(0) != MVT::i16)
 472     return SDValue();
 473
 474   // Expand the FrameIndex into ExternalSymbol and a Constant node
 475   // The constant will represent the frame index number
 476   // Get the current function frame
 477   MachineFunction &MF = DAG.getMachineFunction();
 478   const Function *Func = MF.getFunction();
 479   const std::string Name = Func->getName();
 480
 481   FrameIndexSDNode *FR = dyn_cast<FrameIndexSDNode>(SDValue(N,0));
 482   // FIXME there isn't really debug info here
 483   DebugLoc dl = FR->getDebugLoc();
 484
 485   // Expand FrameIndex like GlobalAddress and ExternalSymbol
 486   // Also use Offset field for lo and hi parts. The default
 487   // offset is zero.
 488
 489   SDValue ES;
 490   int FrameOffset;
 491   SDValue FI = SDValue(N,0);
 492   LegalizeFrameIndex(FI, DAG, ES, FrameOffset);
 493   SDValue Offset = DAG.getConstant(FrameOffset, MVT::i8);
 494   SDValue Lo = DAG.getNode(PIC16ISD::Lo, dl, MVT::i8, ES, Offset);
 495   SDValue Hi = DAG.getNode(PIC16ISD::Hi, dl, MVT::i8, ES, Offset);
 496   return DAG.getNode(ISD::BUILD_PAIR, dl, N->getValueType(0), Lo, Hi);
 497 }
 498
 499
 500 SDValue PIC16TargetLowering::ExpandStore(SDNode *N, SelectionDAG &DAG) {
 501   StoreSDNode *St = cast<StoreSDNode>(N);
 502   SDValue Chain = St->getChain();
 503   SDValue Src = St->getValue();
 504   SDValue Ptr = St->getBasePtr();
 505   MVT ValueType = Src.getValueType();
 506   unsigned StoreOffset = 0;
 507   DebugLoc dl = N->getDebugLoc();
 508
 509   SDValue PtrLo, PtrHi;
 510   LegalizeAddress(Ptr, DAG, PtrLo, PtrHi, StoreOffset, dl);
 511
 512   if (ValueType == MVT::i8) {
 513     return DAG.getNode (PIC16ISD::PIC16Store, dl, MVT::Other, Chain, Src,
 514                         PtrLo, PtrHi,
 515                         DAG.getConstant (0 + StoreOffset, MVT::i8));
 516   }
 517   else if (ValueType == MVT::i16) {
 518     // Get the Lo and Hi parts from MERGE_VALUE or BUILD_PAIR.
 519     SDValue SrcLo, SrcHi;
 520     GetExpandedParts(Src, DAG, SrcLo, SrcHi);
 521     SDValue ChainLo = Chain, ChainHi = Chain;
 522     if (Chain.getOpcode() == ISD::TokenFactor) {
 523       ChainLo = Chain.getOperand(0);
 524       ChainHi = Chain.getOperand(1);
 525     }
 526     SDValue Store1 = DAG.getNode(PIC16ISD::PIC16Store, dl, MVT::Other,
 527                                  ChainLo,
 528                                  SrcLo, PtrLo, PtrHi,
 529                                  DAG.getConstant (0 + StoreOffset, MVT::i8));
 530
 531     SDValue Store2 = DAG.getNode(PIC16ISD::PIC16Store, dl, MVT::Other, ChainHi,
 532                                  SrcHi, PtrLo, PtrHi,
 533                                  DAG.getConstant (1 + StoreOffset, MVT::i8));
 534
 535     return DAG.getNode(ISD::TokenFactor, dl, MVT::Other, getChain(Store1),
 536                        getChain(Store2));
 537   }
 538   else if (ValueType == MVT::i32) {
 539     // Get the Lo and Hi parts from MERGE_VALUE or BUILD_PAIR.
 540     SDValue SrcLo, SrcHi;
 541     GetExpandedParts(Src, DAG, SrcLo, SrcHi);
 542
 543     // Get the expanded parts of each of SrcLo and SrcHi.
 544     SDValue SrcLo1, SrcLo2, SrcHi1, SrcHi2;
 545     GetExpandedParts(SrcLo, DAG, SrcLo1, SrcLo2);
 546     GetExpandedParts(SrcHi, DAG, SrcHi1, SrcHi2);
 547
 548     SDValue ChainLo = Chain, ChainHi = Chain;
 549     if (Chain.getOpcode() == ISD::TokenFactor) {
 550       ChainLo = Chain.getOperand(0);
 551       ChainHi = Chain.getOperand(1);
 552     }
 553     SDValue ChainLo1 = ChainLo, ChainLo2 = ChainLo, ChainHi1 = ChainHi,
 554             ChainHi2 = ChainHi;
 555     if (ChainLo.getOpcode() == ISD::TokenFactor) {
 556       ChainLo1 = ChainLo.getOperand(0);
 557       ChainLo2 = ChainLo.getOperand(1);
 558     }
 559     if (ChainHi.getOpcode() == ISD::TokenFactor) {
 560       ChainHi1 = ChainHi.getOperand(0);
 561       ChainHi2 = ChainHi.getOperand(1);
 562     }
 563     SDValue Store1 = DAG.getNode(PIC16ISD::PIC16Store, dl, MVT::Other,
 564                                  ChainLo1,
 565                                  SrcLo1, PtrLo, PtrHi,
 566                                  DAG.getConstant (0 + StoreOffset, MVT::i8));
 567
 568     SDValue Store2 = DAG.getNode(PIC16ISD::PIC16Store, dl, MVT::Other, ChainLo2,
 569                                  SrcLo2, PtrLo, PtrHi,
 570                                  DAG.getConstant (1 + StoreOffset, MVT::i8));
 571
 572     SDValue Store3 = DAG.getNode(PIC16ISD::PIC16Store, dl, MVT::Other, ChainHi1,
 573                                  SrcHi1, PtrLo, PtrHi,
 574                                  DAG.getConstant (2 + StoreOffset, MVT::i8));
 575
 576     SDValue Store4 = DAG.getNode(PIC16ISD::PIC16Store, dl, MVT::Other, ChainHi2,
 577                                  SrcHi2, PtrLo, PtrHi,
 578                                  DAG.getConstant (3 + StoreOffset, MVT::i8));
 579
 580     SDValue RetLo =  DAG.getNode(ISD::TokenFactor, dl, MVT::Other,
 581                                  getChain(Store1), getChain(Store2));
 582     SDValue RetHi =  DAG.getNode(ISD::TokenFactor, dl, MVT::Other,
 583                                  getChain(Store3), getChain(Store4));
 584     return  DAG.getNode(ISD::TokenFactor, dl, MVT::Other, RetLo, RetHi);
 585
 586   }
 587   else {
 588     assert (0 && "value type not supported");
 589     return SDValue();
 590   }
 591 }
 592
 593 SDValue PIC16TargetLowering::ExpandExternalSymbol(SDNode *N, SelectionDAG &DAG)
 594 {
 595   ExternalSymbolSDNode *ES = dyn_cast<ExternalSymbolSDNode>(SDValue(N, 0));
 596   // FIXME there isn't really debug info here
 597   DebugLoc dl = ES->getDebugLoc();
 598
 599   SDValue TES = DAG.getTargetExternalSymbol(ES->getSymbol(), MVT::i8);
 600   SDValue Offset = DAG.getConstant(0, MVT::i8);
 601   SDValue Lo = DAG.getNode(PIC16ISD::Lo, dl, MVT::i8, TES, Offset);
 602   SDValue Hi = DAG.getNode(PIC16ISD::Hi, dl, MVT::i8, TES, Offset);
 603
 604   return DAG.getNode(ISD::BUILD_PAIR, dl, MVT::i16, Lo, Hi);
 605 }
 606
 607 // ExpandGlobalAddress -
 608 SDValue PIC16TargetLowering::ExpandGlobalAddress(SDNode *N, SelectionDAG &DAG) {
 609   GlobalAddressSDNode *G = dyn_cast<GlobalAddressSDNode>(SDValue(N, 0));
 610   // FIXME there isn't really debug info here
 611   DebugLoc dl = G->getDebugLoc();
 612
 613   SDValue TGA = DAG.getTargetGlobalAddress(G->getGlobal(), MVT::i8,
 614                                            G->getOffset());
 615
 616   SDValue Offset = DAG.getConstant(0, MVT::i8);
 617   SDValue Lo = DAG.getNode(PIC16ISD::Lo, dl, MVT::i8, TGA, Offset);
 618   SDValue Hi = DAG.getNode(PIC16ISD::Hi, dl, MVT::i8, TGA, Offset);
 619
 620   return DAG.getNode(ISD::BUILD_PAIR, dl, MVT::i16, Lo, Hi);
 621 }
 622
 623 bool PIC16TargetLowering::isDirectAddress(const SDValue &Op) {
 624   assert (Op.getNode() != NULL && "Can't operate on NULL SDNode!!");
 625
 626   if (Op.getOpcode() == ISD::BUILD_PAIR) {
 627    if (Op.getOperand(0).getOpcode() == PIC16ISD::Lo)
 628      return true;
 629   }
 630   return false;
 631 }
 632
 633 // Return true if DirectAddress is in ROM_SPACE
 634 bool PIC16TargetLowering::isRomAddress(const SDValue &Op) {
 635
 636   // RomAddress is a GlobalAddress in ROM_SPACE_
 637   // If the Op is not a GlobalAddress return NULL without checking
 638   // anything further.
 639   if (!isDirectAddress(Op))
 640     return false;
 641
 642   // Its a GlobalAddress.
 643   // It is BUILD_PAIR((PIC16Lo TGA), (PIC16Hi TGA)) and Op is BUILD_PAIR
 644   SDValue TGA = Op.getOperand(0).getOperand(0);
 645   GlobalAddressSDNode *GSDN = dyn_cast<GlobalAddressSDNode>(TGA);
 646
 647   if (GSDN->getAddressSpace() == PIC16ISD::ROM_SPACE)
 648     return true;
 649
 650   // Any other address space return it false
 651   return false;
 652 }
 653
 654
 655 // GetExpandedParts - This function is on the similiar lines as
 656 // the GetExpandedInteger in type legalizer is. This returns expanded
 657 // parts of Op in Lo and Hi.
 658
 659 void PIC16TargetLowering::GetExpandedParts(SDValue Op, SelectionDAG &DAG,
 660                                            SDValue &Lo, SDValue &Hi) {
 661   SDNode *N = Op.getNode();
 662   DebugLoc dl = N->getDebugLoc();
 663   MVT NewVT = getTypeToTransformTo(N->getValueType(0));
 664
 665   // Extract the lo component.
 666   Lo = DAG.getNode(ISD::EXTRACT_ELEMENT, dl, NewVT, Op,
 667                    DAG.getConstant(0, MVT::i8));
 668
 669   // extract the hi component
 670   Hi = DAG.getNode(ISD::EXTRACT_ELEMENT, dl, NewVT, Op,
 671                    DAG.getConstant(1, MVT::i8));
 672 }
 673
 674 // Legalize FrameIndex into ExternalSymbol and offset.
 675 void
 676 PIC16TargetLowering::LegalizeFrameIndex(SDValue Op, SelectionDAG &DAG,
 677                                         SDValue &ES, int &Offset) {
 678
 679   MachineFunction &MF = DAG.getMachineFunction();
 680   const Function *Func = MF.getFunction();
 681   MachineFrameInfo *MFI = MF.getFrameInfo();
 682   const std::string Name = Func->getName();
 683
 684   FrameIndexSDNode *FR = dyn_cast<FrameIndexSDNode>(Op);
 685
 686   // FrameIndices are not stack offsets. But they represent the request
 687   // for space on stack. That space requested may be more than one byte.
 688   // Therefore, to calculate the stack offset that a FrameIndex aligns
 689   // with, we need to traverse all the FrameIndices available earlier in
 690   // the list and add their requested size.
 691   unsigned FIndex = FR->getIndex();
 692   const char *tmpName;
 693   if (FIndex < ReservedFrameCount) {
 694     tmpName = createESName(PAN::getFrameLabel(Name));
 695     ES = DAG.getTargetExternalSymbol(tmpName, MVT::i8);
 696     Offset = 0;
 697     for (unsigned i=0; i<FIndex ; ++i) {
 698       Offset += MFI->getObjectSize(i);
 699     }
 700   } else {
 701    // FrameIndex has been made for some temporary storage
 702     tmpName = createESName(PAN::getTempdataLabel(Name));
 703     ES = DAG.getTargetExternalSymbol(tmpName, MVT::i8);
 704     Offset = GetTmpOffsetForFI(FIndex, MFI->getObjectSize(FIndex));
 705   }
 706
 707   return;
 708 }
 709
 710 // This function legalizes the PIC16 Addresses. If the Pointer is
 711 //  -- Direct address variable residing
 712 //     --> then a Banksel for that variable will be created.
 713 //  -- Rom variable
 714 //     --> then it will be treated as an indirect address.
 715 //  -- Indirect address
 716 //     --> then the address will be loaded into FSR
 717 //  -- ADD with constant operand
 718 //     --> then constant operand of ADD will be returned as Offset
 719 //         and non-constant operand of ADD will be treated as pointer.
 720 // Returns the high and lo part of the address, and the offset(in case of ADD).
 721
 722 void PIC16TargetLowering::LegalizeAddress(SDValue Ptr, SelectionDAG &DAG,
 723                                           SDValue &Lo, SDValue &Hi,
 724                                           unsigned &Offset, DebugLoc dl) {
 725
 726   // Offset, by default, should be 0
 727   Offset = 0;
 728
 729   // If the pointer is ADD with constant,
 730   // return the constant value as the offset
 731   if (Ptr.getOpcode() == ISD::ADD) {
 732     SDValue OperLeft = Ptr.getOperand(0);
 733     SDValue OperRight = Ptr.getOperand(1);
 734     if ((OperLeft.getOpcode() == ISD::Constant) &&
 735         (dyn_cast<ConstantSDNode>(OperLeft)->getZExtValue() < 32 )) {
 736       Offset = dyn_cast<ConstantSDNode>(OperLeft)->getZExtValue();
 737       Ptr = OperRight;
 738     } else if ((OperRight.getOpcode() == ISD::Constant)  &&
 739                (dyn_cast<ConstantSDNode>(OperRight)->getZExtValue() < 32 )){
 740       Offset = dyn_cast<ConstantSDNode>(OperRight)->getZExtValue();
 741       Ptr = OperLeft;
 742     }
 743   }
 744
 745   // If the pointer is Type i8 and an external symbol
 746   // then treat it as direct address.
 747   // One example for such case is storing and loading
 748   // from function frame during a call
 749   if (Ptr.getValueType() == MVT::i8) {
 750     switch (Ptr.getOpcode()) {
 751     case ISD::TargetExternalSymbol:
 752       Lo = Ptr;
 753       Hi = DAG.getConstant(1, MVT::i8);
 754       return;
 755     }
 756   }
 757
 758   // Expansion of FrameIndex has Lo/Hi parts
 759   if (isDirectAddress(Ptr)) {
 760       SDValue TFI = Ptr.getOperand(0).getOperand(0);
 761       int FrameOffset;
 762       if (TFI.getOpcode() == ISD::TargetFrameIndex) {
 763         LegalizeFrameIndex(TFI, DAG, Lo, FrameOffset);
 764         Hi = DAG.getConstant(1, MVT::i8);
 765         Offset += FrameOffset;
 766         return;
 767       } else if (TFI.getOpcode() == ISD::TargetExternalSymbol) {
 768         // FrameIndex has already been expanded.
 769         // Now just make use of its expansion
 770         Lo = TFI;
 771         Hi = DAG.getConstant(1, MVT::i8);
 772         SDValue FOffset = Ptr.getOperand(0).getOperand(1);
 773         assert (FOffset.getOpcode() == ISD::Constant &&
 774                           "Invalid operand of PIC16ISD::Lo");
 775         Offset += dyn_cast<ConstantSDNode>(FOffset)->getZExtValue();
 776         return;
 777       }
 778   }
 779
 780   if (isDirectAddress(Ptr) && !isRomAddress(Ptr)) {
 781     // Direct addressing case for RAM variables. The Hi part is constant
 782     // and the Lo part is the TGA itself.
 783     Lo = Ptr.getOperand(0).getOperand(0);
 784
 785     // For direct addresses Hi is a constant. Value 1 for the constant
 786     // signifies that banksel needs to generated for it. Value 0 for
 787     // the constant signifies that banksel does not need to be generated
 788     // for it. Mark it as 1 now and optimize later.
 789     Hi = DAG.getConstant(1, MVT::i8);
 790     return;
 791   }
 792
 793   // Indirect addresses. Get the hi and lo parts of ptr.
 794   GetExpandedParts(Ptr, DAG, Lo, Hi);
 795
 796   // Put the hi and lo parts into FSR.
 797   Lo = DAG.getNode(PIC16ISD::MTLO, dl, MVT::i8, Lo);
 798   Hi = DAG.getNode(PIC16ISD::MTHI, dl, MVT::i8, Hi);
 799
 800   return;
 801 }
 802
 803 SDValue PIC16TargetLowering::ExpandLoad(SDNode *N, SelectionDAG &DAG) {
 804   LoadSDNode *LD = dyn_cast<LoadSDNode>(SDValue(N, 0));
 805   SDValue Chain = LD->getChain();
 806   SDValue Ptr = LD->getBasePtr();
 807   DebugLoc dl = LD->getDebugLoc();
 808
 809   SDValue Load, Offset;
 810   SDVTList Tys;
 811   MVT VT, NewVT;
 812   SDValue PtrLo, PtrHi;
 813   unsigned LoadOffset;
 814
 815   // Legalize direct/indirect addresses. This will give the lo and hi parts
 816   // of the address and the offset.
 817   LegalizeAddress(Ptr, DAG, PtrLo, PtrHi, LoadOffset, dl);
 818
 819   // Load from the pointer (direct address or FSR)
 820   VT = N->getValueType(0);
 821   unsigned NumLoads = VT.getSizeInBits() / 8;
 822   std::vector<SDValue> PICLoads;
 823   unsigned iter;
 824   MVT MemVT = LD->getMemoryVT();
 825   if(ISD::isNON_EXTLoad(N)) {
 826     for (iter=0; iter<NumLoads ; ++iter) {
 827       // Add the pointer offset if any
 828       Offset = DAG.getConstant(iter + LoadOffset, MVT::i8);
 829       Tys = DAG.getVTList(MVT::i8, MVT::Other);
 830       Load = DAG.getNode(PIC16ISD::PIC16Load, dl, Tys, Chain, PtrLo, PtrHi,
 831                          Offset);
 832       PICLoads.push_back(Load);
 833     }
 834   } else {
 835     // If it is extended load then use PIC16Load for Memory Bytes
 836     // and for all extended bytes perform action based on type of
 837     // extention - i.e. SignExtendedLoad or ZeroExtendedLoad
 838
 839
 840     // For extended loads this is the memory value type
 841     // i.e. without any extension
 842     MVT MemVT = LD->getMemoryVT();
 843     unsigned MemBytes = MemVT.getSizeInBits() / 8;
 844     unsigned ExtdBytes = VT.getSizeInBits() / 8;
 845     Offset = DAG.getConstant(LoadOffset, MVT::i8);
 846
 847     Tys = DAG.getVTList(MVT::i8, MVT::Other);
 848     // For MemBytes generate PIC16Load with proper offset
 849     for (iter=0; iter<MemBytes; ++iter) {
 850       // Add the pointer offset if any
 851       Offset = DAG.getConstant(iter + LoadOffset, MVT::i8);
 852       Load = DAG.getNode(PIC16ISD::PIC16Load, dl, Tys, Chain, PtrLo, PtrHi,
 853                          Offset);
 854       PICLoads.push_back(Load);
 855     }
 856
 857     // For SignExtendedLoad
 858     if (ISD::isSEXTLoad(N)) {
 859       // For all ExtdBytes use the Right Shifted(Arithmetic) Value of the
 860       // highest MemByte
 861       SDValue SRA = DAG.getNode(ISD::SRA, dl, MVT::i8, Load,
 862                                 DAG.getConstant(7, MVT::i8));
 863       for (iter=MemBytes; iter<ExtdBytes; ++iter) {
 864         PICLoads.push_back(SRA);
 865       }
 866     } else if (ISD::isZEXTLoad(N) || ISD::isEXTLoad(N)) {
 867     //} else if (ISD::isZEXTLoad(N)) {
 868       // ZeroExtendedLoad -- For all ExtdBytes use constant 0
 869       SDValue ConstZero = DAG.getConstant(0, MVT::i8);
 870       for (iter=MemBytes; iter<ExtdBytes; ++iter) {
 871         PICLoads.push_back(ConstZero);
 872       }
 873     }
 874   }
 875   SDValue BP;
 876
 877   if (VT == MVT::i8) {
 878     // Operand of Load is illegal -- Load itself is legal
 879     return PICLoads[0];
 880   }
 881   else if (VT == MVT::i16) {
 882     BP = DAG.getNode(ISD::BUILD_PAIR, dl, VT, PICLoads[0], PICLoads[1]);
 883     if (MemVT == MVT::i8)
 884       Chain = getChain(PICLoads[0]);
 885     else
 886       Chain = DAG.getNode(ISD::TokenFactor, dl, MVT::Other,
 887                           getChain(PICLoads[0]), getChain(PICLoads[1]));
 888   } else if (VT == MVT::i32) {
 889     SDValue BPs[2];
 890     BPs[0] = DAG.getNode(ISD::BUILD_PAIR, dl, MVT::i16,
 891                          PICLoads[0], PICLoads[1]);
 892     BPs[1] = DAG.getNode(ISD::BUILD_PAIR, dl, MVT::i16,
 893                          PICLoads[2], PICLoads[3]);
 894     BP = DAG.getNode(ISD::BUILD_PAIR, dl, VT, BPs[0], BPs[1]);
 895     if (MemVT == MVT::i8)
 896       Chain = getChain(PICLoads[0]);
 897     else if (MemVT == MVT::i16)
 898       Chain = DAG.getNode(ISD::TokenFactor, dl, MVT::Other,
 899                           getChain(PICLoads[0]), getChain(PICLoads[1]));
 900     else {
 901       SDValue Chains[2];
 902       Chains[0] = DAG.getNode(ISD::TokenFactor, dl, MVT::Other,
 903                               getChain(PICLoads[0]), getChain(PICLoads[1]));
 904       Chains[1] = DAG.getNode(ISD::TokenFactor, dl, MVT::Other,
 905                               getChain(PICLoads[2]), getChain(PICLoads[3]));
 906       Chain =  DAG.getNode(ISD::TokenFactor, dl, MVT::Other,
 907                            Chains[0], Chains[1]);
 908     }
 909   }
 910   Tys = DAG.getVTList(VT, MVT::Other);
 911   return DAG.getNode(ISD::MERGE_VALUES, dl, Tys, BP, Chain);
 912 }
 913
 914 SDValue PIC16TargetLowering::LowerShift(SDValue Op, SelectionDAG &DAG) {
 915   // We should have handled larger operands in type legalizer itself.
 916   assert (Op.getValueType() == MVT::i8 && "illegal shift to lower");
 917
 918   SDNode *N = Op.getNode();
 919   SDValue Value = N->getOperand(0);
 920   SDValue Amt = N->getOperand(1);
 921   PIC16ISD::PIC16Libcall CallCode;
 922   switch (N->getOpcode()) {
 923   case ISD::SRA:
 924     CallCode = PIC16ISD::SRA_I8;
 925     break;
 926   case ISD::SHL:
 927     CallCode = PIC16ISD::SLL_I8;
 928     break;
 929   case ISD::SRL:
 930     CallCode = PIC16ISD::SRL_I8;
 931     break;
 932   default:
 933     assert ( 0 && "This shift is not implemented yet.");
 934     return SDValue();
 935   }
 936   SmallVector<SDValue, 2> Ops(2);
 937   Ops[0] = Value;
 938   Ops[1] = Amt;
 939   SDValue Call = MakePIC16Libcall(CallCode, N->getValueType(0), &Ops[0], 2,
 940                                   true, DAG, N->getDebugLoc());
 941   return Call;
 942 }
 943
 944 void
 945 PIC16TargetLowering::LowerOperationWrapper(SDNode *N,
 946                                            SmallVectorImpl<SDValue>&Results,
 947                                            SelectionDAG &DAG) {
 948   SDValue Op = SDValue(N, 0);
 949   SDValue Res;
 950   unsigned i;
 951   switch (Op.getOpcode()) {
 952     case ISD::FORMAL_ARGUMENTS:
 953       Res = LowerFORMAL_ARGUMENTS(Op, DAG); break;
 954     case ISD::LOAD:
 955       Res = ExpandLoad(Op.getNode(), DAG); break;
 956     case ISD::CALL:
 957       Res = LowerCALL(Op, DAG); break;
 958     default: {
 959       // All other operations are handled in LowerOperation.
 960       Res = LowerOperation(Op, DAG);
 961       if (Res.getNode())
 962         Results.push_back(Res);
 963
 964       return;
 965     }
 966   }
 967
 968   N = Res.getNode();
 969   unsigned NumValues = N->getNumValues();
 970   for (i = 0; i < NumValues ; i++) {
 971     Results.push_back(SDValue(N, i));
 972   }
 973 }
 974
 975 SDValue PIC16TargetLowering::LowerOperation(SDValue Op, SelectionDAG &DAG) {
 976   switch (Op.getOpcode()) {
 977     case ISD::FORMAL_ARGUMENTS:
 978       return LowerFORMAL_ARGUMENTS(Op, DAG);
 979     case ISD::ADD:
 980     case ISD::ADDC:
 981     case ISD::ADDE:
 982       return LowerADD(Op, DAG);
 983     case ISD::SUB:
 984     case ISD::SUBC:
 985     case ISD::SUBE:
 986       return LowerSUB(Op, DAG);
 987     case ISD::LOAD:
 988       return ExpandLoad(Op.getNode(), DAG);
 989     case ISD::STORE:
 990       return ExpandStore(Op.getNode(), DAG);
 991     case ISD::SHL:
 992     case ISD::SRA:
 993     case ISD::SRL:
 994       return LowerShift(Op, DAG);
 995     case ISD::OR:
 996     case ISD::AND:
 997     case ISD::XOR:
 998       return LowerBinOp(Op, DAG);
 999     case ISD::CALL:
1000       return LowerCALL(Op, DAG);
1001     case ISD::RET:
1002       return LowerRET(Op, DAG);
1003     case ISD::BR_CC:
1004       return LowerBR_CC(Op, DAG);
1005     case ISD::SELECT_CC:
1006       return LowerSELECT_CC(Op, DAG);
1007   }
1008   return SDValue();
1009 }
1010
1011 SDValue PIC16TargetLowering::ConvertToMemOperand(SDValue Op,
1012                                                  SelectionDAG &DAG,
1013                                                  DebugLoc dl) {
1014   assert (Op.getValueType() == MVT::i8
1015           && "illegal value type to store on stack.");
1016
1017   MachineFunction &MF = DAG.getMachineFunction();
1018   const Function *Func = MF.getFunction();
1019   const std::string FuncName = Func->getName();
1020
1021
1022   // Put the value on stack.
1023   // Get a stack slot index and convert to es.
1024   int FI = MF.getFrameInfo()->CreateStackObject(1, 1);
1025   const char *tmpName = createESName(PAN::getTempdataLabel(FuncName));
1026   SDValue ES = DAG.getTargetExternalSymbol(tmpName, MVT::i8);
1027
1028   // Store the value to ES.
1029   SDValue Store = DAG.getNode (PIC16ISD::PIC16Store, dl, MVT::Other,
1030                                DAG.getEntryNode(),
1031                                Op, ES,
1032                                DAG.getConstant (1, MVT::i8), // Banksel.
1033                                DAG.getConstant (GetTmpOffsetForFI(FI, 1),
1034                                                 MVT::i8));
1035
1036   // Load the value from ES.
1037   SDVTList Tys = DAG.getVTList(MVT::i8, MVT::Other);
1038   SDValue Load = DAG.getNode(PIC16ISD::PIC16Load, dl, Tys, Store,
1039                              ES, DAG.getConstant (1, MVT::i8),
1040                              DAG.getConstant (GetTmpOffsetForFI(FI, 1),
1041                              MVT::i8));
1042
1043   return Load.getValue(0);
1044 }
1045
1046 SDValue PIC16TargetLowering::
1047 LowerIndirectCallArguments(SDValue Op, SDValue Chain, SDValue InFlag,
1048                            SDValue DataAddr_Lo, SDValue DataAddr_Hi,
1049                            SelectionDAG &DAG) {
1050   CallSDNode *TheCall = dyn_cast<CallSDNode>(Op);
1051   unsigned NumOps = TheCall->getNumArgs();
1052   DebugLoc dl = TheCall->getDebugLoc();
1053
1054   // If call has no arguments then do nothing and return.
1055   if (NumOps == 0)
1056     return Chain;
1057
1058   std::vector<SDValue> Ops;
1059   SDVTList Tys = DAG.getVTList(MVT::Other, MVT::Flag);
1060   SDValue Arg, StoreRet;
1061
1062   // For PIC16 ABI the arguments come after the return value.
1063   unsigned RetVals = TheCall->getNumRetVals();
1064   for (unsigned i = 0, ArgOffset = RetVals; i < NumOps; i++) {
1065     // Get the arguments
1066     Arg = TheCall->getArg(i);
1067
1068     Ops.clear();
1069     Ops.push_back(Chain);
1070     Ops.push_back(Arg);
1071     Ops.push_back(DataAddr_Lo);
1072     Ops.push_back(DataAddr_Hi);
1073     Ops.push_back(DAG.getConstant(ArgOffset, MVT::i8));
1074     Ops.push_back(InFlag);
1075
1076     StoreRet = DAG.getNode (PIC16ISD::PIC16StWF, dl, Tys, &Ops[0], Ops.size());
1077
1078     Chain = getChain(StoreRet);
1079     InFlag = getOutFlag(StoreRet);
1080     ArgOffset++;
1081   }
1082   return Chain;
1083 }
1084
1085 SDValue PIC16TargetLowering::
1086 LowerDirectCallArguments(SDValue Op, SDValue Chain, SDValue ArgLabel,
1087                          SDValue InFlag, SelectionDAG &DAG) {
1088   CallSDNode *TheCall = dyn_cast<CallSDNode>(Op);
1089   unsigned NumOps = TheCall->getNumArgs();
1090   DebugLoc dl = TheCall->getDebugLoc();
1091   std::string Name;
1092   SDValue Arg, StoreAt;
1093   MVT ArgVT;
1094   unsigned Size=0;
1095   unsigned ArgCount=0;
1096
1097   // If call has no arguments then do nothing and return.
1098   if (NumOps == 0)
1099     return Chain;
1100
1101   // FIXME: This portion of code currently assumes only
1102   // primitive types being passed as arguments.
1103
1104   // Legalize the address before use
1105   SDValue PtrLo, PtrHi;
1106   unsigned AddressOffset;
1107   int StoreOffset = 0;
1108   LegalizeAddress(ArgLabel, DAG, PtrLo, PtrHi, AddressOffset, dl);
1109   SDValue StoreRet;
1110
1111   std::vector<SDValue> Ops;
1112   SDVTList Tys = DAG.getVTList(MVT::Other, MVT::Flag);
1113   for (unsigned i=ArgCount, Offset = 0; i<NumOps; i++) {
1114     // Get the argument
1115     Arg = TheCall->getArg(i);
1116     StoreOffset = (Offset + AddressOffset);
1117
1118     // Store the argument on frame
1119
1120     Ops.clear();
1121     Ops.push_back(Chain);
1122     Ops.push_back(Arg);
1123     Ops.push_back(PtrLo);
1124     Ops.push_back(PtrHi);
1125     Ops.push_back(DAG.getConstant(StoreOffset, MVT::i8));
1126     Ops.push_back(InFlag);
1127
1128     StoreRet = DAG.getNode (PIC16ISD::PIC16StWF, dl, Tys, &Ops[0], Ops.size());
1129
1130     Chain = getChain(StoreRet);
1131     InFlag = getOutFlag(StoreRet);
1132
1133     // Update the frame offset to be used for next argument
1134     ArgVT = Arg.getValueType();
1135     Size = ArgVT.getSizeInBits();
1136     Size = Size/8;    // Calculate size in bytes
1137     Offset += Size;   // Increase the frame offset
1138   }
1139   return Chain;
1140 }
1141
1142 SDValue PIC16TargetLowering::
1143 LowerIndirectCallReturn (SDValue Op, SDValue Chain, SDValue InFlag,
1144                          SDValue DataAddr_Lo, SDValue DataAddr_Hi,
1145                          SelectionDAG &DAG) {
1146   CallSDNode *TheCall = dyn_cast<CallSDNode>(Op);
1147   DebugLoc dl = TheCall->getDebugLoc();
1148   unsigned RetVals = TheCall->getNumRetVals();
1149
1150   // If call does not have anything to return
1151   // then do nothing and go back.
1152   if (RetVals == 0)
1153     return Chain;
1154
1155   // Call has something to return
1156   std::vector<SDValue> ResultVals;
1157   SDValue LoadRet;
1158
1159   SDVTList Tys = DAG.getVTList(MVT::i8, MVT::Other, MVT::Flag);
1160   for(unsigned i=0;i<RetVals;i++) {
1161     LoadRet = DAG.getNode(PIC16ISD::PIC16LdWF, dl, Tys, Chain, DataAddr_Lo,
1162                           DataAddr_Hi, DAG.getConstant(i, MVT::i8),
1163                           InFlag);
1164     InFlag = getOutFlag(LoadRet);
1165     Chain = getChain(LoadRet);
1166     ResultVals.push_back(LoadRet);
1167   }
1168   ResultVals.push_back(Chain);
1169   SDValue Res = DAG.getMergeValues(&ResultVals[0], ResultVals.size(), dl);
1170   return Res;
1171 }
1172
1173 SDValue PIC16TargetLowering::
1174 LowerDirectCallReturn(SDValue Op, SDValue Chain, SDValue RetLabel,
1175                       SDValue InFlag, SelectionDAG &DAG) {
1176   CallSDNode *TheCall = dyn_cast<CallSDNode>(Op);
1177   DebugLoc dl = TheCall->getDebugLoc();
1178   // Currently handling primitive types only. They will come in
1179   // i8 parts
1180   unsigned RetVals = TheCall->getNumRetVals();
1181
1182   std::vector<SDValue> ResultVals;
1183
1184   // Return immediately if the return type is void
1185   if (RetVals == 0)
1186     return Chain;
1187
1188   // Call has something to return
1189
1190   // Legalize the address before use
1191   SDValue LdLo, LdHi;
1192   unsigned LdOffset;
1193   LegalizeAddress(RetLabel, DAG, LdLo, LdHi, LdOffset, dl);
1194
1195   SDVTList Tys = DAG.getVTList(MVT::i8, MVT::Other, MVT::Flag);
1196   SDValue LoadRet;
1197
1198   for(unsigned i=0, Offset=0;i<RetVals;i++) {
1199
1200     LoadRet = DAG.getNode(PIC16ISD::PIC16LdWF, dl, Tys, Chain, LdLo, LdHi,
1201                           DAG.getConstant(LdOffset + Offset, MVT::i8),
1202                           InFlag);
1203
1204     InFlag = getOutFlag(LoadRet);
1205
1206     Chain = getChain(LoadRet);
1207     Offset++;
1208     ResultVals.push_back(LoadRet);
1209   }
1210
1211   // To return use MERGE_VALUES
1212   ResultVals.push_back(Chain);
1213   SDValue Res = DAG.getMergeValues(&ResultVals[0], ResultVals.size(), dl);
1214   return Res;
1215 }
1216
1217 SDValue PIC16TargetLowering::LowerRET(SDValue Op, SelectionDAG &DAG) {
1218   SDValue Chain = Op.getOperand(0);
1219   DebugLoc dl = Op.getDebugLoc();
1220
1221   if (Op.getNumOperands() == 1)   // return void
1222     return Op;
1223
1224   // return should have odd number of operands
1225   if ((Op.getNumOperands() % 2) == 0 ) {
1226     assert(0 && "Do not know how to return this many arguments!");
1227     abort();
1228   }
1229
1230   // Number of values to return
1231   unsigned NumRet = (Op.getNumOperands() / 2);
1232
1233   // Function returns value always on stack with the offset starting
1234   // from 0
1235   MachineFunction &MF = DAG.getMachineFunction();
1236   const Function *F = MF.getFunction();
1237   std::string FuncName = F->getName();
1238
1239   const char *tmpName = createESName(PAN::getFrameLabel(FuncName));
1240   SDVTList VTs  = DAG.getVTList (MVT::i8, MVT::Other);
1241   SDValue ES = DAG.getTargetExternalSymbol(tmpName, MVT::i8);
1242   SDValue BS = DAG.getConstant(1, MVT::i8);
1243   SDValue RetVal;
1244   for(unsigned i=0;i<NumRet; ++i) {
1245     RetVal = Op.getNode()->getOperand(2*i + 1);
1246     Chain =  DAG.getNode (PIC16ISD::PIC16Store, dl, MVT::Other, Chain, RetVal,
1247                         ES, BS,
1248                         DAG.getConstant (i, MVT::i8));
1249
1250   }
1251   return DAG.getNode(ISD::RET, dl, MVT::Other, Chain);
1252 }
1253
1254 // CALL node may have some operands non-legal to PIC16. Generate new CALL
1255 // node with all the operands legal.
1256 // Currently only Callee operand of the CALL node is non-legal. This function
1257 // legalizes the Callee operand and uses all other operands as are to generate
1258 // new CALL node.
1259
1260 SDValue PIC16TargetLowering::LegalizeCALL(SDValue Op, SelectionDAG &DAG) {
1261     CallSDNode *TheCall = dyn_cast<CallSDNode>(Op);
1262     SDValue Chain = TheCall->getChain();
1263     SDValue Callee = TheCall->getCallee();
1264     DebugLoc dl = TheCall->getDebugLoc();
1265     unsigned i =0;
1266
1267     assert(Callee.getValueType() == MVT::i16 &&
1268            "Don't know how to legalize this call node!!!");
1269     assert(Callee.getOpcode() == ISD::BUILD_PAIR &&
1270            "Don't know how to legalize this call node!!!");
1271
1272     if (isDirectAddress(Callee)) {
1273        // Come here for direct calls
1274        Callee = Callee.getOperand(0).getOperand(0);
1275     } else {
1276       // Come here for indirect calls
1277       SDValue Lo, Hi;
1278       // Indirect addresses. Get the hi and lo parts of ptr.
1279       GetExpandedParts(Callee, DAG, Lo, Hi);
1280       // Connect Lo and Hi parts of the callee with the PIC16Connect
1281       Callee = DAG.getNode(PIC16ISD::PIC16Connect, dl, MVT::i8, Lo, Hi);
1282     }
1283     std::vector<SDValue> Ops;
1284     Ops.push_back(Chain);
1285     Ops.push_back(Callee);
1286
1287     // Add the call arguments and their flags
1288     unsigned NumArgs = TheCall->getNumArgs();
1289     for(i=0;i<NumArgs;i++) {
1290        Ops.push_back(TheCall->getArg(i));
1291        Ops.push_back(TheCall->getArgFlagsVal(i));
1292     }
1293     std::vector<MVT> NodeTys;
1294     unsigned NumRets = TheCall->getNumRetVals();
1295     for(i=0;i<NumRets;i++)
1296        NodeTys.push_back(TheCall->getRetValType(i));
1297
1298    // Return a Chain as well
1299    NodeTys.push_back(MVT::Other);
1300
1301    SDVTList VTs = DAG.getVTList(&NodeTys[0], NodeTys.size());
1302    // Generate new call with all the operands legal
1303    return DAG.getCall(TheCall->getCallingConv(), dl,
1304                       TheCall->isVarArg(), TheCall->isTailCall(),
1305                       TheCall->isInreg(), VTs, &Ops[0], Ops.size());
1306 }
1307
1308 void PIC16TargetLowering::
1309 GetDataAddress(DebugLoc dl, SDValue Callee, SDValue &Chain,
1310                SDValue &DataAddr_Lo, SDValue &DataAddr_Hi,
1311                SelectionDAG &DAG) {
1312    assert (Callee.getOpcode() == PIC16ISD::PIC16Connect
1313            && "Don't know what to do of such callee!!");
1314    SDValue ZeroOperand = DAG.getConstant(0, MVT::i8);
1315    SDValue SeqStart  = DAG.getCALLSEQ_START(Chain, ZeroOperand);
1316    Chain = getChain(SeqStart);
1317    SDValue OperFlag = getOutFlag(SeqStart); // To manage the data dependency
1318
1319    // Get the Lo and Hi part of code address
1320    SDValue Lo = Callee.getOperand(0);
1321    SDValue Hi = Callee.getOperand(1);
1322
1323    SDValue Data_Lo, Data_Hi;
1324    SDVTList Tys = DAG.getVTList(MVT::i8, MVT::Other, MVT::Flag);
1325    // Subtract 2 from Address to get the Lower part of DataAddress.
1326    SDVTList VTList = DAG.getVTList(MVT::i8, MVT::Flag);
1327    Data_Lo = DAG.getNode(ISD::SUBC, dl, VTList, Lo,
1328                          DAG.getConstant(2, MVT::i8));
1329    SDValue Ops[3] = { Hi, DAG.getConstant(0, MVT::i8), Data_Lo.getValue(1)};
1330    Data_Hi = DAG.getNode(ISD::SUBE, dl, VTList, Ops, 3);
1331    SDValue PCLATH = DAG.getNode(PIC16ISD::MTPCLATH, dl, MVT::i8, Data_Hi);
1332    Callee = DAG.getNode(PIC16ISD::PIC16Connect, dl, MVT::i8, Data_Lo, PCLATH);
1333    SDValue Call = DAG.getNode(PIC16ISD::CALLW, dl, Tys, Chain, Callee,
1334                               OperFlag);
1335    Chain = getChain(Call);
1336    OperFlag = getOutFlag(Call);
1337    SDValue SeqEnd = DAG.getCALLSEQ_END(Chain, ZeroOperand, ZeroOperand,
1338                                        OperFlag);
1339    Chain = getChain(SeqEnd);
1340    OperFlag = getOutFlag(SeqEnd);
1341
1342    // Low part of Data Address
1343    DataAddr_Lo = DAG.getNode(PIC16ISD::MTLO, dl, MVT::i8, Call, OperFlag);
1344
1345    // Make the second call.
1346    SeqStart  = DAG.getCALLSEQ_START(Chain, ZeroOperand);
1347    Chain = getChain(SeqStart);
1348    OperFlag = getOutFlag(SeqStart); // To manage the data dependency
1349
1350    // Subtract 1 from Address to get high part of data address.
1351    Data_Lo = DAG.getNode(ISD::SUBC, dl, VTList, Lo,
1352                          DAG.getConstant(1, MVT::i8));
1353    SDValue HiOps[3] = { Hi, DAG.getConstant(0, MVT::i8), Data_Lo.getValue(1)};
1354    Data_Hi = DAG.getNode(ISD::SUBE, dl, VTList, HiOps, 3);
1355    PCLATH = DAG.getNode(PIC16ISD::MTPCLATH, dl, MVT::i8, Data_Hi);
1356
1357    // Use new Lo to make another CALLW
1358    Callee = DAG.getNode(PIC16ISD::PIC16Connect, dl, MVT::i8, Data_Lo, PCLATH);
1359    Call = DAG.getNode(PIC16ISD::CALLW, dl, Tys, Chain, Callee, OperFlag);
1360    Chain = getChain(Call);
1361    OperFlag = getOutFlag(Call);
1362    SeqEnd = DAG.getCALLSEQ_END(Chain, ZeroOperand, ZeroOperand,
1363                                         OperFlag);
1364    Chain = getChain(SeqEnd);
1365    OperFlag = getOutFlag(SeqEnd);
1366    // Hi part of Data Address
1367    DataAddr_Hi = DAG.getNode(PIC16ISD::MTHI, dl, MVT::i8, Call, OperFlag);
1368 }
1369
1370
1371 SDValue PIC16TargetLowering::LowerCALL(SDValue Op, SelectionDAG &DAG) {
1372     CallSDNode *TheCall = dyn_cast<CallSDNode>(Op);
1373     SDValue Chain = TheCall->getChain();
1374     SDValue Callee = TheCall->getCallee();
1375     DebugLoc dl = TheCall->getDebugLoc();
1376     if (Callee.getValueType() == MVT::i16 &&
1377       Callee.getOpcode() == ISD::BUILD_PAIR) {
1378           // Control should come here only from TypeLegalizer for lowering
1379
1380           // Legalize the non-legal arguments of call and return the
1381           // new call with legal arguments.
1382           return LegalizeCALL(Op, DAG);
1383     }
1384     // Control should come here from Legalize DAG.
1385     // Here all the operands of CALL node should be legal.
1386
1387     // If this is an indirect call then to pass the arguments
1388     // and read the return value back, we need the data address
1389     // of the function being called.
1390     // To get the data address two more calls need to be made.
1391
1392     // The flag to track if this is a direct or indirect call.
1393     bool IsDirectCall = true;
1394     unsigned RetVals = TheCall->getNumRetVals();
1395     unsigned NumArgs = TheCall->getNumArgs();
1396
1397     SDValue DataAddr_Lo, DataAddr_Hi;
1398     if (Callee.getOpcode() == PIC16ISD::PIC16Connect) {
1399        IsDirectCall = false;    // This is indirect call
1400        // Read DataAddress only if we have to pass arguments or
1401        // read return value.
1402        if ((RetVals > 0) || (NumArgs > 0))
1403          GetDataAddress(dl, Callee, Chain, DataAddr_Lo, DataAddr_Hi, DAG);
1404     }
1405
1406     SDValue ZeroOperand = DAG.getConstant(0, MVT::i8);
1407
1408     // Start the call sequence.
1409     // Carring the Constant 0 along the CALLSEQSTART
1410     // because there is nothing else to carry.
1411     SDValue SeqStart  = DAG.getCALLSEQ_START(Chain, ZeroOperand);
1412     Chain = getChain(SeqStart);
1413     SDValue OperFlag = getOutFlag(SeqStart); // To manage the data dependency
1414     std::string Name;
1415
1416     // For any direct call - callee will be GlobalAddressNode or
1417     // ExternalSymbol
1418     SDValue ArgLabel, RetLabel;
1419     if (IsDirectCall) {
1420        // Considering the GlobalAddressNode case here.
1421        if (GlobalAddressSDNode *G = dyn_cast<GlobalAddressSDNode>(Callee)) {
1422           GlobalValue *GV = G->getGlobal();
1423           Callee = DAG.getTargetGlobalAddress(GV, MVT::i8);
1424           Name = G->getGlobal()->getName();
1425        } else {// Considering the ExternalSymbol case here
1426           ExternalSymbolSDNode *ES = dyn_cast<ExternalSymbolSDNode>(Callee);
1427           Callee = DAG.getTargetExternalSymbol(ES->getSymbol(), MVT::i8);
1428           Name = ES->getSymbol();
1429        }
1430
1431        // Label for argument passing
1432        const char *argFrame = createESName(PAN::getArgsLabel(Name));
1433        ArgLabel = DAG.getTargetExternalSymbol(argFrame, MVT::i8);
1434
1435        // Label for reading return value
1436        const char *retName = createESName(PAN::getRetvalLabel(Name));
1437        RetLabel = DAG.getTargetExternalSymbol(retName, MVT::i8);
1438     } else {
1439        // if indirect call
1440        SDValue CodeAddr_Lo = Callee.getOperand(0);
1441        SDValue CodeAddr_Hi = Callee.getOperand(1);
1442
1443        /*CodeAddr_Lo = DAG.getNode(ISD::ADD, dl, MVT::i8, CodeAddr_Lo,
1444                                  DAG.getConstant(2, MVT::i8));*/
1445
1446        // move Hi part in PCLATH
1447        CodeAddr_Hi = DAG.getNode(PIC16ISD::MTPCLATH, dl, MVT::i8, CodeAddr_Hi);
1448        Callee = DAG.getNode(PIC16ISD::PIC16Connect, dl, MVT::i8, CodeAddr_Lo,
1449                             CodeAddr_Hi);
1450     }
1451
1452     // Pass the argument to function before making the call.
1453     SDValue CallArgs;
1454     if (IsDirectCall) {
1455       CallArgs = LowerDirectCallArguments(Op, Chain, ArgLabel, OperFlag, DAG);
1456       Chain = getChain(CallArgs);
1457       OperFlag = getOutFlag(CallArgs);
1458     } else {
1459       CallArgs = LowerIndirectCallArguments(Op, Chain, OperFlag, DataAddr_Lo,
1460                                             DataAddr_Hi, DAG);
1461       Chain = getChain(CallArgs);
1462       OperFlag = getOutFlag(CallArgs);
1463     }
1464
1465     SDVTList Tys = DAG.getVTList(MVT::Other, MVT::Flag);
1466     SDValue PICCall = DAG.getNode(PIC16ISD::CALL, dl, Tys, Chain, Callee,
1467                                   OperFlag);
1468     Chain = getChain(PICCall);
1469     OperFlag = getOutFlag(PICCall);
1470
1471
1472     // Carrying the Constant 0 along the CALLSEQSTART
1473     // because there is nothing else to carry.
1474     SDValue SeqEnd = DAG.getCALLSEQ_END(Chain, ZeroOperand, ZeroOperand,
1475                                         OperFlag);
1476     Chain = getChain(SeqEnd);
1477     OperFlag = getOutFlag(SeqEnd);
1478
1479     // Lower the return value reading after the call.
1480     if (IsDirectCall)
1481       return LowerDirectCallReturn(Op, Chain, RetLabel, OperFlag, DAG);
1482     else
1483       return LowerIndirectCallReturn(Op, Chain, OperFlag, DataAddr_Lo,
1484                                      DataAddr_Hi, DAG);
1485 }
1486
1487 bool PIC16TargetLowering::isDirectLoad(const SDValue Op) {
1488   if (Op.getOpcode() == PIC16ISD::PIC16Load)
1489     if (Op.getOperand(1).getOpcode() == ISD::TargetGlobalAddress
1490      || Op.getOperand(1).getOpcode() == ISD::TargetExternalSymbol)
1491       return true;
1492   return false;
1493 }
1494
1495 // NeedToConvertToMemOp - Returns true if one of the operands of the
1496 // operation 'Op' needs to be put into memory. Also returns the
1497 // operand no. of the operand to be converted in 'MemOp'. Remember, PIC16 has
1498 // no instruction that can operation on two registers. Most insns take
1499 // one register and one memory operand (addwf) / Constant (addlw).
1500 bool PIC16TargetLowering::NeedToConvertToMemOp(SDValue Op, unsigned &MemOp) {
1501   // If one of the operand is a constant, return false.
1502   if (Op.getOperand(0).getOpcode() == ISD::Constant ||
1503       Op.getOperand(1).getOpcode() == ISD::Constant)
1504     return false;
1505
1506   // Return false if one of the operands is already a direct
1507   // load and that operand has only one use.
1508   if (isDirectLoad(Op.getOperand(0))) {
1509     if (Op.getOperand(0).hasOneUse())
1510       return false;
1511     else
1512       MemOp = 0;
1513   }
1514   if (isDirectLoad(Op.getOperand(1))) {
1515     if (Op.getOperand(1).hasOneUse())
1516       return false;
1517     else
1518       MemOp = 1;
1519   }
1520   return true;
1521 }
1522
1523 // LowerBinOp - Lower a commutative binary operation that does not
1524 // affect status flag carry.
1525 SDValue PIC16TargetLowering::LowerBinOp(SDValue Op, SelectionDAG &DAG) {
1526   DebugLoc dl = Op.getDebugLoc();
1527
1528   // We should have handled larger operands in type legalizer itself.
1529   assert (Op.getValueType() == MVT::i8 && "illegal Op to lower");
1530
1531   unsigned MemOp = 1;
1532   if (NeedToConvertToMemOp(Op, MemOp)) {
1533     // Put one value on stack.
1534     SDValue NewVal = ConvertToMemOperand (Op.getOperand(MemOp), DAG, dl);
1535
1536     return DAG.getNode(Op.getOpcode(), dl, MVT::i8, Op.getOperand(MemOp ^ 1),
1537     NewVal);
1538   }
1539   else {
1540     return Op;
1541   }
1542 }
1543
1544 // LowerADD - Lower all types of ADD operations including the ones
1545 // that affects carry.
1546 SDValue PIC16TargetLowering::LowerADD(SDValue Op, SelectionDAG &DAG) {
1547   // We should have handled larger operands in type legalizer itself.
1548   assert (Op.getValueType() == MVT::i8 && "illegal add to lower");
1549   DebugLoc dl = Op.getDebugLoc();
1550   unsigned MemOp = 1;
1551   if (NeedToConvertToMemOp(Op, MemOp)) {
1552     // Put one value on stack.
1553     SDValue NewVal = ConvertToMemOperand (Op.getOperand(MemOp), DAG, dl);
1554
1555     // ADDC and ADDE produce two results.
1556     SDVTList Tys = DAG.getVTList(MVT::i8, MVT::Flag);
1557
1558     // ADDE has three operands, the last one is the carry bit.
1559     if (Op.getOpcode() == ISD::ADDE)
1560       return DAG.getNode(Op.getOpcode(), dl, Tys, Op.getOperand(MemOp ^ 1),
1561                          NewVal, Op.getOperand(2));
1562     // ADDC has two operands.
1563     else if (Op.getOpcode() == ISD::ADDC)
1564       return DAG.getNode(Op.getOpcode(), dl, Tys, Op.getOperand(MemOp ^ 1),
1565                          NewVal);
1566     // ADD it is. It produces only one result.
1567     else
1568       return DAG.getNode(Op.getOpcode(), dl, MVT::i8, Op.getOperand(MemOp ^ 1),
1569                          NewVal);
1570   }
1571   else
1572     return Op;
1573 }
1574
1575 SDValue PIC16TargetLowering::LowerSUB(SDValue Op, SelectionDAG &DAG) {
1576   DebugLoc dl = Op.getDebugLoc();
1577   // We should have handled larger operands in type legalizer itself.
1578   assert (Op.getValueType() == MVT::i8 && "illegal sub to lower");
1579
1580   // Nothing to do if the first operand is already a direct load and it has
1581   // only one use.
1582   if (isDirectLoad(Op.getOperand(0)) && Op.getOperand(0).hasOneUse())
1583     return Op;
1584
1585   // Put first operand on stack.
1586   SDValue NewVal = ConvertToMemOperand (Op.getOperand(0), DAG, dl);
1587
1588   SDVTList Tys = DAG.getVTList(MVT::i8, MVT::Flag);
1589   if (Op.getOpcode() == ISD::SUBE)
1590     return DAG.getNode(Op.getOpcode(), dl, Tys, NewVal, Op.getOperand(1),
1591                        Op.getOperand(2));
1592   else
1593     return DAG.getNode(Op.getOpcode(), dl, Tys, NewVal, Op.getOperand(1));
1594 }
1595
1596 void PIC16TargetLowering::InitReservedFrameCount(const Function *F) {
1597   unsigned NumArgs = F->arg_size();
1598
1599   bool isVoidFunc = (F->getReturnType()->getTypeID() == Type::VoidTyID);
1600
1601   if (isVoidFunc)
1602     ReservedFrameCount = NumArgs;
1603   else
1604     ReservedFrameCount = NumArgs + 1;
1605 }
1606
1607 // LowerFORMAL_ARGUMENTS - Argument values are loaded from the
1608 // <fname>.args + offset. All arguments are already broken to leaglized
1609 // types, so the offset just runs from 0 to NumArgVals - 1.
1610
1611 SDValue PIC16TargetLowering::LowerFORMAL_ARGUMENTS(SDValue Op,
1612                                                    SelectionDAG &DAG) {
1613   SmallVector<SDValue, 8> ArgValues;
1614   unsigned NumArgVals = Op.getNode()->getNumValues() - 1;
1615   DebugLoc dl = Op.getDebugLoc();
1616   SDValue Chain = Op.getOperand(0);    // Formal arguments' chain
1617
1618
1619   // Get the callee's name to create the <fname>.args label to pass args.
1620   MachineFunction &MF = DAG.getMachineFunction();
1621   const Function *F = MF.getFunction();
1622   std::string FuncName = F->getName();
1623
1624   // Reset the map of FI and TmpOffset
1625   ResetTmpOffsetMap();
1626   // Initialize the ReserveFrameCount
1627   InitReservedFrameCount(F);
1628
1629   // Create the <fname>.args external symbol.
1630   const char *tmpName = createESName(PAN::getArgsLabel(FuncName));
1631   SDValue ES = DAG.getTargetExternalSymbol(tmpName, MVT::i8);
1632
1633   // Load arg values from the label + offset.
1634   SDVTList VTs  = DAG.getVTList (MVT::i8, MVT::Other);
1635   SDValue BS = DAG.getConstant(1, MVT::i8);
1636   for (unsigned i = 0; i < NumArgVals ; ++i) {
1637     SDValue Offset = DAG.getConstant(i, MVT::i8);
1638     SDValue PICLoad = DAG.getNode(PIC16ISD::PIC16LdArg, dl, VTs, Chain, ES, BS,
1639                                   Offset);
1640     Chain = getChain(PICLoad);
1641     ArgValues.push_back(PICLoad);
1642   }
1643
1644   // Return a MERGE_VALUE node.
1645   ArgValues.push_back(Op.getOperand(0));
1646   return DAG.getNode(ISD::MERGE_VALUES, dl, Op.getNode()->getVTList(),
1647                      &ArgValues[0], ArgValues.size()).getValue(Op.getResNo());
1648 }
1649
1650 // Perform DAGCombine of PIC16Load.
1651 // FIXME - Need a more elaborate comment here.
1652 SDValue PIC16TargetLowering::
1653 PerformPIC16LoadCombine(SDNode *N, DAGCombinerInfo &DCI) const {
1654   SelectionDAG &DAG = DCI.DAG;
1655   SDValue Chain = N->getOperand(0);
1656   if (N->hasNUsesOfValue(0, 0)) {
1657     DAG.ReplaceAllUsesOfValueWith(SDValue(N,1), Chain);
1658   }
1659   return SDValue();
1660 }
1661
1662 // For all the functions with arguments some STORE nodes are generated
1663 // that store the argument on the frameindex. However in PIC16 the arguments
1664 // are passed on stack only. Therefore these STORE nodes are redundant.
1665 // To remove these STORE nodes will be removed in PerformStoreCombine
1666 //
1667 // Currently this function is doint nothing and will be updated for removing
1668 // unwanted store operations
1669 SDValue PIC16TargetLowering::
1670 PerformStoreCombine(SDNode *N, DAGCombinerInfo &DCI) const {
1671   return SDValue(N, 0);
1672   /*
1673   // Storing an undef value is of no use, so remove it
1674   if (isStoringUndef(N, Chain, DAG)) {
1675     return Chain; // remove the store and return the chain
1676   }
1677   //else everything is ok.
1678   return SDValue(N, 0);
1679   */
1680 }
1681
1682 SDValue PIC16TargetLowering::PerformDAGCombine(SDNode *N,
1683                                                DAGCombinerInfo &DCI) const {
1684   switch (N->getOpcode()) {
1685   case ISD::STORE:
1686    return PerformStoreCombine(N, DCI);
1687   case PIC16ISD::PIC16Load:
1688     return PerformPIC16LoadCombine(N, DCI);
1689   }
1690   return SDValue();
1691 }
1692
1693 static PIC16CC::CondCodes IntCCToPIC16CC(ISD::CondCode CC) {
1694   switch (CC) {
1695   default: assert(0 && "Unknown condition code!");
1696   case ISD::SETNE:  return PIC16CC::NE;
1697   case ISD::SETEQ:  return PIC16CC::EQ;
1698   case ISD::SETGT:  return PIC16CC::GT;
1699   case ISD::SETGE:  return PIC16CC::GE;
1700   case ISD::SETLT:  return PIC16CC::LT;
1701   case ISD::SETLE:  return PIC16CC::LE;
1702   case ISD::SETULT: return PIC16CC::ULT;
1703   case ISD::SETULE: return PIC16CC::ULE;
1704   case ISD::SETUGE: return PIC16CC::UGE;
1705   case ISD::SETUGT: return PIC16CC::UGT;
1706   }
1707 }
1708
1709 // Look at LHS/RHS/CC and see if they are a lowered setcc instruction.  If so
1710 // set LHS/RHS and SPCC to the LHS/RHS of the setcc and SPCC to the condition.
1711 static void LookThroughSetCC(SDValue &LHS, SDValue &RHS,
1712                              ISD::CondCode CC, unsigned &SPCC) {
1713   if (isa<ConstantSDNode>(RHS) &&
1714       cast<ConstantSDNode>(RHS)->getZExtValue() == 0 &&
1715       CC == ISD::SETNE &&
1716       (LHS.getOpcode() == PIC16ISD::SELECT_ICC &&
1717         LHS.getOperand(3).getOpcode() == PIC16ISD::SUBCC) &&
1718       isa<ConstantSDNode>(LHS.getOperand(0)) &&
1719       isa<ConstantSDNode>(LHS.getOperand(1)) &&
1720       cast<ConstantSDNode>(LHS.getOperand(0))->getZExtValue() == 1 &&
1721       cast<ConstantSDNode>(LHS.getOperand(1))->getZExtValue() == 0) {
1722     SDValue CMPCC = LHS.getOperand(3);
1723     SPCC = cast<ConstantSDNode>(LHS.getOperand(2))->getZExtValue();
1724     LHS = CMPCC.getOperand(0);
1725     RHS = CMPCC.getOperand(1);
1726   }
1727 }
1728
1729 // Returns appropriate CMP insn and corresponding condition code in PIC16CC
1730 SDValue PIC16TargetLowering::getPIC16Cmp(SDValue LHS, SDValue RHS,
1731                                          unsigned CC, SDValue &PIC16CC,
1732                                          SelectionDAG &DAG, DebugLoc dl) {
1733   PIC16CC::CondCodes CondCode = (PIC16CC::CondCodes) CC;
1734
1735   // PIC16 sub is literal - W. So Swap the operands and condition if needed.
1736   // i.e. a < 12 can be rewritten as 12 > a.
1737   if (RHS.getOpcode() == ISD::Constant) {
1738
1739     SDValue Tmp = LHS;
1740     LHS = RHS;
1741     RHS = Tmp;
1742
1743     switch (CondCode) {
1744     default: break;
1745     case PIC16CC::LT:
1746       CondCode = PIC16CC::GT;
1747       break;
1748     case PIC16CC::GT:
1749       CondCode = PIC16CC::LT;
1750       break;
1751     case PIC16CC::ULT:
1752       CondCode = PIC16CC::UGT;
1753       break;
1754     case PIC16CC::UGT:
1755       CondCode = PIC16CC::ULT;
1756       break;
1757     case PIC16CC::GE:
1758       CondCode = PIC16CC::LE;
1759       break;
1760     case PIC16CC::LE:
1761       CondCode = PIC16CC::GE;
1762       break;
1763     case PIC16CC::ULE:
1764       CondCode = PIC16CC::UGE;
1765       break;
1766     case PIC16CC::UGE:
1767       CondCode = PIC16CC::ULE;
1768       break;
1769     }
1770   }
1771
1772   PIC16CC = DAG.getConstant(CondCode, MVT::i8);
1773
1774   // These are signed comparisons.
1775   SDValue Mask = DAG.getConstant(128, MVT::i8);
1776   if (isSignedComparison(CondCode)) {
1777     LHS = DAG.getNode (ISD::XOR, dl, MVT::i8, LHS, Mask);
1778     RHS = DAG.getNode (ISD::XOR, dl, MVT::i8, RHS, Mask);
1779   }
1780
1781   SDVTList VTs = DAG.getVTList (MVT::i8, MVT::Flag);
1782   // We can use a subtract operation to set the condition codes. But
1783   // we need to put one operand in memory if required.
1784   // Nothing to do if the first operand is already a valid type (direct load
1785   // for subwf and literal for sublw) and it is used by this operation only.
1786   if ((LHS.getOpcode() == ISD::Constant || isDirectLoad(LHS))
1787       && LHS.hasOneUse())
1788     return DAG.getNode(PIC16ISD::SUBCC, dl, VTs, LHS, RHS);
1789
1790   // else convert the first operand to mem.
1791   LHS = ConvertToMemOperand (LHS, DAG, dl);
1792   return DAG.getNode(PIC16ISD::SUBCC, dl, VTs, LHS, RHS);
1793 }
1794
1795
1796 SDValue PIC16TargetLowering::LowerSELECT_CC(SDValue Op, SelectionDAG &DAG) {
1797   SDValue LHS = Op.getOperand(0);
1798   SDValue RHS = Op.getOperand(1);
1799   ISD::CondCode CC = cast<CondCodeSDNode>(Op.getOperand(4))->get();
1800   SDValue TrueVal = Op.getOperand(2);
1801   SDValue FalseVal = Op.getOperand(3);
1802   unsigned ORIGCC = ~0;
1803   DebugLoc dl = Op.getDebugLoc();
1804
1805   // If this is a select_cc of a "setcc", and if the setcc got lowered into
1806   // an CMP[IF]CC/SELECT_[IF]CC pair, find the original compared values.
1807   // i.e.
1808   // A setcc: lhs, rhs, cc is expanded by llvm to
1809   // select_cc: result of setcc, 0, 1, 0, setne
1810   // We can think of it as:
1811   // select_cc: lhs, rhs, 1, 0, cc
1812   LookThroughSetCC(LHS, RHS, CC, ORIGCC);
1813   if (ORIGCC == ~0U) ORIGCC = IntCCToPIC16CC (CC);
1814
1815   SDValue PIC16CC;
1816   SDValue Cmp = getPIC16Cmp(LHS, RHS, ORIGCC, PIC16CC, DAG, dl);
1817
1818   return DAG.getNode (PIC16ISD::SELECT_ICC, dl, TrueVal.getValueType(), TrueVal,
1819                       FalseVal, PIC16CC, Cmp.getValue(1));
1820 }
1821
1822 MachineBasicBlock *
1823 PIC16TargetLowering::EmitInstrWithCustomInserter(MachineInstr *MI,
1824                                                  MachineBasicBlock *BB) const {
1825   const TargetInstrInfo &TII = *getTargetMachine().getInstrInfo();
1826   unsigned CC = (PIC16CC::CondCodes)MI->getOperand(3).getImm();
1827   DebugLoc dl = MI->getDebugLoc();
1828
1829   // To "insert" a SELECT_CC instruction, we actually have to insert the diamond
1830   // control-flow pattern.  The incoming instruction knows the destination vreg
1831   // to set, the condition code register to branch on, the true/false values to
1832   // select between, and a branch opcode to use.
1833   const BasicBlock *LLVM_BB = BB->getBasicBlock();
1834   MachineFunction::iterator It = BB;
1835   ++It;
1836
1837   //  thisMBB:
1838   //  ...
1839   //   TrueVal = ...
1840   //   [f]bCC copy1MBB
1841   //   fallthrough --> copy0MBB
1842   MachineBasicBlock *thisMBB = BB;
1843   MachineFunction *F = BB->getParent();
1844   MachineBasicBlock *copy0MBB = F->CreateMachineBasicBlock(LLVM_BB);
1845   MachineBasicBlock *sinkMBB = F->CreateMachineBasicBlock(LLVM_BB);
1846   BuildMI(BB, dl, TII.get(PIC16::pic16brcond)).addMBB(sinkMBB).addImm(CC);
1847   F->insert(It, copy0MBB);
1848   F->insert(It, sinkMBB);
1849
1850   // Update machine-CFG edges by transferring all successors of the current
1851   // block to the new block which will contain the Phi node for the select.
1852   sinkMBB->transferSuccessors(BB);
1853   // Next, add the true and fallthrough blocks as its successors.
1854   BB->addSuccessor(copy0MBB);
1855   BB->addSuccessor(sinkMBB);
1856
1857   //  copy0MBB:
1858   //   %FalseValue = ...
1859   //   # fallthrough to sinkMBB
1860   BB = copy0MBB;
1861
1862   // Update machine-CFG edges
1863   BB->addSuccessor(sinkMBB);
1864
1865   //  sinkMBB:
1866   //   %Result = phi [ %FalseValue, copy0MBB ], [ %TrueValue, thisMBB ]
1867   //  ...
1868   BB = sinkMBB;
1869   BuildMI(BB, dl, TII.get(PIC16::PHI), MI->getOperand(0).getReg())
1870     .addReg(MI->getOperand(2).getReg()).addMBB(copy0MBB)
1871     .addReg(MI->getOperand(1).getReg()).addMBB(thisMBB);
1872
1873   F->DeleteMachineInstr(MI);   // The pseudo instruction is gone now.
1874   return BB;
1875 }
1876
1877
1878 SDValue PIC16TargetLowering::LowerBR_CC(SDValue Op, SelectionDAG &DAG) {
1879   SDValue Chain = Op.getOperand(0);
1880   ISD::CondCode CC = cast<CondCodeSDNode>(Op.getOperand(1))->get();
1881   SDValue LHS = Op.getOperand(2);   // LHS of the condition.
1882   SDValue RHS = Op.getOperand(3);   // RHS of the condition.
1883   SDValue Dest = Op.getOperand(4);  // BB to jump to
1884   unsigned ORIGCC = ~0;
1885   DebugLoc dl = Op.getDebugLoc();
1886
1887   // If this is a br_cc of a "setcc", and if the setcc got lowered into
1888   // an CMP[IF]CC/SELECT_[IF]CC pair, find the original compared values.
1889   LookThroughSetCC(LHS, RHS, CC, ORIGCC);
1890   if (ORIGCC == ~0U) ORIGCC = IntCCToPIC16CC (CC);
1891
1892   // Get the Compare insn and condition code.
1893   SDValue PIC16CC;
1894   SDValue Cmp = getPIC16Cmp(LHS, RHS, ORIGCC, PIC16CC, DAG, dl);
1895
1896   return DAG.getNode(PIC16ISD::BRCOND, dl, MVT::Other, Chain, Dest, PIC16CC,
1897                      Cmp.getValue(1));
1898 }
1899