lib/VMCore/IntrinsicInst.cpp

   1 //===-- InstrinsicInst.cpp - Intrinsic Instruction Wrappers -----*- C++ -*-===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file was developed by James M. Laskey and is distributed under
   6 // the University of Illinois Open Source License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file implements methods that make it really easy to deal with intrinsic
  11 // functions with the isa/dyncast family of functions.  In particular, this
  12 // allows you to do things like:
  13 //
  14 //     if (DbgStopPointInst *SPI = dyn_cast<DbgStopPointInst>(Inst))
  15 //        ... SPI->getFileName() ... SPI->getDirectory() ...
  16 //
  17 // All intrinsic function calls are instances of the call instruction, so these
  18 // are all subclasses of the CallInst class.  Note that none of these classes
  19 // has state or virtual methods, which is an important part of this gross/neat
  20 // hack working.
  21 //
  22 // In some cases, arguments to intrinsics need to be generic and are defined as
  23 // type pointer to empty struct { }*.  To access the real item of interest the
  24 // cast instruction needs to be stripped away.
  25 //
  26 //===----------------------------------------------------------------------===//
  27
  28 #include "llvm/IntrinsicInst.h"
  29
  30 #include "llvm/Constants.h"
  31 #include "llvm/GlobalVariable.h"
  32 #include "llvm/CodeGen/MachineDebugInfo.h"
  33
  34 using namespace llvm;
  35
  36 //===----------------------------------------------------------------------===//
  37 /// DbgInfoIntrinsic - This is the common base class for debug info intrinsics
  38 ///
  39
  40 static Value *CastOperand(Value *C) {
  41   if (ConstantExpr *CE = dyn_cast<ConstantExpr>(C))
  42     if (CE->getOpcode() == Instruction::Cast)
  43       return CE->getOperand(0);
  44   return NULL;
  45 }
  46
  47 Value *DbgInfoIntrinsic::StripCast(Value *C) {
  48   if (Value *CO = CastOperand(C)) {
  49     C = StripCast(CO);
  50   } else if (GlobalVariable *GV = dyn_cast<GlobalVariable>(C)) {
  51     if (GV->hasInitializer())
  52       if (Value *CO = CastOperand(GV->getInitializer()))
  53         C = StripCast(CO);
  54   }
  55   return dyn_cast<GlobalVariable>(C);
  56 }
  57
  58 //===----------------------------------------------------------------------===//
  59 /// DbgStopPointInst - This represents the llvm.dbg.stoppoint instruction.
  60 ///
  61
  62 std::string DbgStopPointInst::getFileName() const {
  63   // Once the operand indices are verified, update this assert
  64   assert(LLVMDebugVersion == (5 << 16) && "Verify operand indices");
  65   GlobalVariable *GV = cast<GlobalVariable>(getContext());
  66   ConstantStruct *CS = cast<ConstantStruct>(GV->getInitializer());
  67   return CS->getOperand(3)->getStringValue();
  68 }
  69
  70 std::string DbgStopPointInst::getDirectory() const {
  71   // Once the operand indices are verified, update this assert
  72   assert(LLVMDebugVersion == (5 << 16) && "Verify operand indices");
  73   GlobalVariable *GV = cast<GlobalVariable>(getContext());
  74   ConstantStruct *CS = cast<ConstantStruct>(GV->getInitializer());
  75   return CS->getOperand(4)->getStringValue();
  76 }
  77
  78 //===----------------------------------------------------------------------===//
  79 /// Ensure that users of IntrinsicInst.h will link with this module.
  80 DEFINING_FILE_FOR(IntrinsicInst)