lib/Target/PIC16/PIC16ISelDAGToDAG.cpp

   1 //===-- PIC16ISelDAGToDAG.cpp - A dag to dag inst selector for PIC16 ------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file defines an instruction selector for the PIC16 target.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #define DEBUG_TYPE "pic16-isel"
  15
  16 #include "PIC16.h"
  17 #include "PIC16ISelLowering.h"
  18 #include "PIC16RegisterInfo.h"
  19 #include "PIC16Subtarget.h"
  20 #include "PIC16TargetMachine.h"
  21 #include "llvm/GlobalValue.h"
  22 #include "llvm/Instructions.h"
  23 #include "llvm/Intrinsics.h"
  24 #include "llvm/Type.h"
  25 #include "llvm/CodeGen/MachineConstantPool.h"
  26 #include "llvm/CodeGen/MachineFunction.h"
  27 #include "llvm/CodeGen/MachineFrameInfo.h"
  28 #include "llvm/CodeGen/MachineInstrBuilder.h"
  29 #include "llvm/CodeGen/SelectionDAGISel.h"
  30 #include "llvm/Support/CFG.h"
  31 #include "llvm/Support/Compiler.h"
  32 #include "llvm/Support/Debug.h"
  33 #include "llvm/Target/TargetMachine.h"
  34 #include <queue>
  35 #include <set>
  36
  37 using namespace llvm;
  38
  39 //===----------------------------------------------------------------------===//
  40 // Instruction Selector Implementation
  41 //===----------------------------------------------------------------------===//
  42
  43 //===----------------------------------------------------------------------===//
  44 // PIC16DAGToDAGISel - PIC16 specific code to select PIC16 machine
  45 // instructions for SelectionDAG operations.
  46 //===----------------------------------------------------------------------===//
  47 namespace {
  48
  49 class VISIBILITY_HIDDEN PIC16DAGToDAGISel : public SelectionDAGISel {
  50
  51   /// TM - Keep a reference to PIC16TargetMachine.
  52   PIC16TargetMachine &TM;
  53
  54   /// PIC16Lowering - This object fully describes how to lower LLVM code to an
  55   /// PIC16-specific SelectionDAG.
  56   PIC16TargetLowering PIC16Lowering;
  57
  58 public:
  59   explicit PIC16DAGToDAGISel(PIC16TargetMachine &tm) :
  60         SelectionDAGISel(PIC16Lowering),
  61         TM(tm), PIC16Lowering(*TM.getTargetLowering()) {}
  62
  63   virtual void InstructionSelect();
  64
  65   // Pass Name
  66   virtual const char *getPassName() const {
  67     return "PIC16 DAG->DAG Pattern Instruction Selection";
  68   }
  69
  70 private:
  71   // Include the pieces autogenerated from the target description.
  72 #include "PIC16GenDAGISel.inc"
  73
  74   SDNode *Select(SDValue N);
  75
  76   // Select addressing mode. currently assume base + offset addr mode.
  77   bool SelectAM(SDValue Op, SDValue N, SDValue &Base, SDValue &Offset);
  78   bool SelectDirectAM(SDValue Op, SDValue N, SDValue &Base,
  79                       SDValue &Offset);
  80   bool StoreInDirectAM(SDValue Op, SDValue N, SDValue &fsr);
  81   bool LoadFSR(SDValue Op, SDValue N, SDValue &Base, SDValue &Offset);
  82   bool LoadNothing(SDValue Op, SDValue N, SDValue &Base,
  83                    SDValue &Offset);
  84
  85   // getI8Imm - Return a target constant with the specified
  86   // value, of type i8.
  87   inline SDValue getI8Imm(unsigned Imm) {
  88     return CurDAG->getTargetConstant(Imm, MVT::i8);
  89   }
  90
  91
  92 #ifndef NDEBUG
  93   unsigned Indent;
  94 #endif
  95 };
  96
  97 }
  98
  99 /// InstructionSelect - This callback is invoked by
 100 /// SelectionDAGISel when it has created a SelectionDAG for us to codegen.
 101 void PIC16DAGToDAGISel::InstructionSelect()
 102 {
 103   DEBUG(BB->dump());
 104   // Codegen the basic block.
 105
 106   DOUT << "===== Instruction selection begins:\n";
 107 #ifndef NDEBUG
 108   Indent = 0;
 109 #endif
 110
 111   // Select target instructions for the DAG.
 112   SelectRoot();
 113
 114   DOUT << "===== Instruction selection ends:\n";
 115
 116   CurDAG->RemoveDeadNodes();
 117 }
 118
 119
 120 bool PIC16DAGToDAGISel::
 121 SelectDirectAM (SDValue Op, SDValue N, SDValue &Base, SDValue &Offset)
 122 {
 123   GlobalAddressSDNode *GA;
 124   ConstantSDNode      *GC;
 125
 126   // if Address is FI, get the TargetFrameIndex.
 127   if (FrameIndexSDNode *FIN = dyn_cast<FrameIndexSDNode>(N)) {
 128     DOUT << "--------- its frame Index\n";
 129     Base   = CurDAG->getTargetFrameIndex(FIN->getIndex(), MVT::i32);
 130     Offset = CurDAG->getTargetConstant(0, MVT::i32);
 131     return true;
 132   }
 133
 134   if (N.getOpcode() == ISD::GlobalAddress) {
 135     GA = dyn_cast<GlobalAddressSDNode>(N);
 136     Offset = CurDAG->getTargetConstant((unsigned char)GA->getOffset(), MVT::i8);
 137     Base = CurDAG->getTargetGlobalAddress(GA->getGlobal(), MVT::i16,
 138                                           GA->getOffset());
 139     return true;
 140   }
 141
 142   if (N.getOpcode() == ISD::ADD) {
 143     GC = dyn_cast<ConstantSDNode>(N.getOperand(1));
 144     Offset = CurDAG->getTargetConstant((unsigned char)GC->getZExtValue(),
 145                                        MVT::i8);
 146     if ((GA = dyn_cast<GlobalAddressSDNode>(N.getOperand(0)))) {
 147       Base = CurDAG->getTargetGlobalAddress(GA->getGlobal(), MVT::i16,
 148                                             GC->getZExtValue());
 149       return true;
 150     }
 151     else if (FrameIndexSDNode *FIN
 152                 = dyn_cast<FrameIndexSDNode>(N.getOperand(0))) {
 153       Base = CurDAG->getTargetFrameIndex(FIN->getIndex(), MVT::i32);
 154       return true;
 155     }
 156   }
 157
 158   return false;
 159 }
 160
 161
 162 // FIXME: must also account for preinc/predec/postinc/postdec.
 163 bool PIC16DAGToDAGISel::
 164 StoreInDirectAM (SDValue Op, SDValue N, SDValue &fsr)
 165 {
 166   RegisterSDNode *Reg;
 167   if (N.getOpcode() == ISD::LOAD) {
 168     LoadSDNode *LD = dyn_cast<LoadSDNode>(N);
 169     if (LD) {
 170       fsr = LD->getBasePtr();
 171     }
 172     else if (isa<RegisterSDNode>(N.getNode())) {
 173       //FIXME an attempt to retrieve the register number
 174       //but does not work
 175       DOUT << "this is a register\n";
 176       Reg = dyn_cast<RegisterSDNode>(N.getNode());
 177       fsr = CurDAG->getRegister(Reg->getReg(),MVT::i16);
 178     }
 179     else {
 180       DOUT << "this is not a register\n";
 181       // FIXME must use whatever load is using
 182       fsr = CurDAG->getRegister(1,MVT::i16);
 183     }
 184     return true;
 185   }
 186   return false;
 187 }
 188
 189 bool PIC16DAGToDAGISel::
 190 LoadFSR (SDValue Op, SDValue N, SDValue &Base, SDValue &Offset)
 191 {
 192   GlobalAddressSDNode *GA;
 193
 194   if (N.getOpcode() == ISD::GlobalAddress) {
 195     GA = dyn_cast<GlobalAddressSDNode>(N);
 196     Offset = CurDAG->getTargetConstant((unsigned char)GA->getOffset(), MVT::i8);
 197     Base = CurDAG->getTargetGlobalAddress(GA->getGlobal(), MVT::i16,
 198                                           GA->getOffset());
 199     return true;
 200   }
 201   else if (N.getOpcode() == PIC16ISD::Package) {
 202     CurDAG->setGraphColor(Op.getNode(), "blue");
 203     CurDAG->viewGraph();
 204   }
 205
 206   return false;
 207 }
 208
 209 // LoadNothing - Don't thake this seriously, it will change.
 210 bool PIC16DAGToDAGISel::
 211 LoadNothing (SDValue Op, SDValue N, SDValue &Base, SDValue &Offset)
 212 {
 213   GlobalAddressSDNode *GA;
 214   if (N.getOpcode() == ISD::GlobalAddress) {
 215     GA = dyn_cast<GlobalAddressSDNode>(N);
 216     DOUT << "==========" << GA->getOffset() << "\n";
 217     Offset = CurDAG->getTargetConstant((unsigned char)GA->getOffset(), MVT::i8);
 218     Base = CurDAG->getTargetGlobalAddress(GA->getGlobal(), MVT::i16,
 219                                           GA->getOffset());
 220     return true;
 221   }
 222
 223   return false;
 224 }
 225
 226
 227 /// Select - Select instructions not customized! Used for
 228 /// expanded, promoted and normal instructions.
 229 SDNode* PIC16DAGToDAGISel::Select(SDValue N)
 230 {
 231   SDNode *Node = N.getNode();
 232   unsigned Opcode = Node->getOpcode();
 233
 234   // Dump information about the Node being selected
 235 #ifndef NDEBUG
 236   DOUT << std::string(Indent, ' ') << "Selecting: ";
 237   DEBUG(Node->dump(CurDAG));
 238   DOUT << "\n";
 239   Indent += 2;
 240 #endif
 241
 242   // If we have a custom node, we already have selected!
 243   if (Node->isMachineOpcode()) {
 244 #ifndef NDEBUG
 245     DOUT << std::string(Indent-2, ' ') << "== ";
 246     DEBUG(Node->dump(CurDAG));
 247     DOUT << "\n";
 248     Indent -= 2;
 249 #endif
 250     return NULL;
 251   }
 252
 253   ///
 254   // FIXME: Instruction Selection not handled by custom or by the
 255   // auto-generated tablegen selection should be handled here.
 256   ///
 257   switch(Opcode) {
 258     default: break;
 259   }
 260
 261   // Select the default instruction.
 262   SDNode *ResNode = SelectCode(N);
 263
 264 #ifndef NDEBUG
 265   DOUT << std::string(Indent-2, ' ') << "=> ";
 266   if (ResNode == NULL || ResNode == N.getNode())
 267     DEBUG(N.getNode()->dump(CurDAG));
 268   else
 269     DEBUG(ResNode->dump(CurDAG));
 270   DOUT << "\n";
 271   Indent -= 2;
 272 #endif
 273
 274   return ResNode;
 275 }
 276
 277 /// createPIC16ISelDag - This pass converts a legalized DAG into a
 278 /// PIC16-specific DAG, ready for instruction scheduling.
 279 FunctionPass *llvm::createPIC16ISelDag(PIC16TargetMachine &TM) {
 280   return new PIC16DAGToDAGISel(TM);
 281 }
 282