1 //===--- CGExpr.cpp - Emit LLVM Code from Expressions ---------------------===// 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 contains code to emit Expr nodes as LLVM code. 11 // 12 //===----------------------------------------------------------------------===// 13 14 #include "CodeGenFunction.h" 15 #include "CodeGenModule.h" 16 #include "CGCall.h" 17 #include "CGObjCRuntime.h" 18 #include "clang/AST/ASTContext.h" 19 #include "clang/AST/DeclObjC.h" 20 #include "llvm/Target/TargetData.h" 21 using namespace clang; 22 using namespace CodeGen; 23 24 //===--------------------------------------------------------------------===// 25 // Miscellaneous Helper Methods 26 //===--------------------------------------------------------------------===// 27 28 /// CreateTempAlloca - This creates a alloca and inserts it into the entry 29 /// block. 30 llvm::AllocaInst *CodeGenFunction::CreateTempAlloca(const llvm::Type *Ty, 31 const char *Name) { 32 return new llvm::AllocaInst(Ty, 0, Name, AllocaInsertPt); 33 } 34 35 /// EvaluateExprAsBool - Perform the usual unary conversions on the specified 36 /// expression and compare the result against zero, returning an Int1Ty value. 37 llvm::Value *CodeGenFunction::EvaluateExprAsBool(const Expr *E) { 38 QualType BoolTy = getContext().BoolTy; 39 if (!E->getType()->isAnyComplexType()) 40 return EmitScalarConversion(EmitScalarExpr(E), E->getType(), BoolTy); 41 42 return EmitComplexToScalarConversion(EmitComplexExpr(E), E->getType(),BoolTy); 43 } 44 45 /// EmitAnyExpr - Emit code to compute the specified expression which can have 46 /// any type. The result is returned as an RValue struct. If this is an 47 /// aggregate expression, the aggloc/agglocvolatile arguments indicate where 48 /// the result should be returned. 49 RValue CodeGenFunction::EmitAnyExpr(const Expr *E, llvm::Value *AggLoc, 50 bool isAggLocVolatile) { 51 if (!hasAggregateLLVMType(E->getType())) 52 return RValue::get(EmitScalarExpr(E)); 53 else if (E->getType()->isAnyComplexType()) 54 return RValue::getComplex(EmitComplexExpr(E)); 55 56 EmitAggExpr(E, AggLoc, isAggLocVolatile); 57 return RValue::getAggregate(AggLoc); 58 } 59 60 /// EmitAnyExprToTemp - Similary to EmitAnyExpr(), however, the result 61 /// will always be accessible even if no aggregate location is 62 /// provided. 63 RValue CodeGenFunction::EmitAnyExprToTemp(const Expr *E, llvm::Value *AggLoc, 64 bool isAggLocVolatile) { 65 if (!AggLoc && hasAggregateLLVMType(E->getType()) && 66 !E->getType()->isAnyComplexType()) 67 AggLoc = CreateTempAlloca(ConvertType(E->getType()), "agg.tmp"); 68 return EmitAnyExpr(E, AggLoc, isAggLocVolatile); 69 } 70 71 /// getAccessedFieldNo - Given an encoded value and a result number, return 72 /// the input field number being accessed. 73 unsigned CodeGenFunction::getAccessedFieldNo(unsigned Idx, 74 const llvm::Constant *Elts) { 75 if (isa<llvm::ConstantAggregateZero>(Elts)) 76 return 0; 77 78 return cast<llvm::ConstantInt>(Elts->getOperand(Idx))->getZExtValue(); 79 } 80 81 82 //===----------------------------------------------------------------------===// 83 // LValue Expression Emission 84 //===----------------------------------------------------------------------===// 85 86 RValue CodeGenFunction::EmitUnsupportedRValue(const Expr *E, 87 const char *Name) { 88 ErrorUnsupported(E, Name); 89 if (const ComplexType *CTy = E->getType()->getAsComplexType()) { 90 const llvm::Type *EltTy = ConvertType(CTy->getElementType()); 91 llvm::Value *U = llvm::UndefValue::get(EltTy); 92 return RValue::getComplex(std::make_pair(U, U)); 93 } else if (hasAggregateLLVMType(E->getType())) { 94 const llvm::Type *Ty = 95 llvm::PointerType::getUnqual(ConvertType(E->getType())); 96 return RValue::getAggregate(llvm::UndefValue::get(Ty)); 97 } else { 98 const llvm::Type *Ty = ConvertType(E->getType()); 99 return RValue::get(llvm::UndefValue::get(Ty)); 100 } 101 } 102 103 LValue CodeGenFunction::EmitUnsupportedLValue(const Expr *E, 104 const char *Name) { 105 ErrorUnsupported(E, Name); 106 llvm::Type *Ty = llvm::PointerType::getUnqual(ConvertType(E->getType())); 107 return LValue::MakeAddr(llvm::UndefValue::get(Ty), 108 E->getType().getCVRQualifiers()); 109 } 110 111 /// EmitLValue - Emit code to compute a designator that specifies the location 112 /// of the expression. 113 /// 114 /// This can return one of two things: a simple address or a bitfield 115 /// reference. In either case, the LLVM Value* in the LValue structure is 116 /// guaranteed to be an LLVM pointer type. 117 /// 118 /// If this returns a bitfield reference, nothing about the pointee type of 119 /// the LLVM value is known: For example, it may not be a pointer to an 120 /// integer. 121 /// 122 /// If this returns a normal address, and if the lvalue's C type is fixed 123 /// size, this method guarantees that the returned pointer type will point to 124 /// an LLVM type of the same size of the lvalue's type. If the lvalue has a 125 /// variable length type, this is not possible. 126 /// 127 LValue CodeGenFunction::EmitLValue(const Expr *E) { 128 switch (E->getStmtClass()) { 129 default: return EmitUnsupportedLValue(E, "l-value expression"); 130 131 case Expr::BinaryOperatorClass: 132 return EmitBinaryOperatorLValue(cast<BinaryOperator>(E)); 133 case Expr::CallExprClass: 134 case Expr::CXXOperatorCallExprClass: 135 return EmitCallExprLValue(cast<CallExpr>(E)); 136 case Expr::DeclRefExprClass: 137 case Expr::QualifiedDeclRefExprClass: 138 return EmitDeclRefLValue(cast<DeclRefExpr>(E)); 139 case Expr::ParenExprClass:return EmitLValue(cast<ParenExpr>(E)->getSubExpr()); 140 case Expr::PredefinedExprClass: 141 return EmitPredefinedLValue(cast<PredefinedExpr>(E)); 142 case Expr::StringLiteralClass: 143 return EmitStringLiteralLValue(cast<StringLiteral>(E)); 144 145 case Expr::CXXConditionDeclExprClass: 146 return EmitCXXConditionDeclLValue(cast<CXXConditionDeclExpr>(E)); 147 148 case Expr::ObjCMessageExprClass: 149 return EmitObjCMessageExprLValue(cast<ObjCMessageExpr>(E)); 150 case Expr::ObjCIvarRefExprClass: 151 return EmitObjCIvarRefLValue(cast<ObjCIvarRefExpr>(E)); 152 case Expr::ObjCPropertyRefExprClass: 153 return EmitObjCPropertyRefLValue(cast<ObjCPropertyRefExpr>(E)); 154 case Expr::ObjCKVCRefExprClass: 155 return EmitObjCKVCRefLValue(cast<ObjCKVCRefExpr>(E)); 156 case Expr::ObjCSuperExprClass: 157 return EmitObjCSuperExpr(cast<ObjCSuperExpr>(E)); 158 159 case Expr::UnaryOperatorClass: 160 return EmitUnaryOpLValue(cast<UnaryOperator>(E)); 161 case Expr::ArraySubscriptExprClass: 162 return EmitArraySubscriptExpr(cast<ArraySubscriptExpr>(E)); 163 case Expr::ExtVectorElementExprClass: 164 return EmitExtVectorElementExpr(cast<ExtVectorElementExpr>(E)); 165 case Expr::MemberExprClass: return EmitMemberExpr(cast<MemberExpr>(E)); 166 case Expr::CompoundLiteralExprClass: 167 return EmitCompoundLiteralLValue(cast<CompoundLiteralExpr>(E)); 168 case Expr::ChooseExprClass: 169 // __builtin_choose_expr is the lvalue of the selected operand. 170 if (cast<ChooseExpr>(E)->isConditionTrue(getContext())) 171 return EmitLValue(cast<ChooseExpr>(E)->getLHS()); 172 else 173 return EmitLValue(cast<ChooseExpr>(E)->getRHS()); 174 } 175 } 176 177 /// EmitLoadOfLValue - Given an expression that represents a value lvalue, 178 /// this method emits the address of the lvalue, then loads the result as an 179 /// rvalue, returning the rvalue. 180 RValue CodeGenFunction::EmitLoadOfLValue(LValue LV, QualType ExprType) { 181 if (LV.isObjCWeak()) { 182 // load of a __weak object. 183 llvm::Value *AddrWeakObj = LV.getAddress(); 184 llvm::Value *read_weak = CGM.getObjCRuntime().EmitObjCWeakRead(*this, 185 AddrWeakObj); 186 return RValue::get(read_weak); 187 } 188 189 if (LV.isSimple()) { 190 llvm::Value *Ptr = LV.getAddress(); 191 const llvm::Type *EltTy = 192 cast<llvm::PointerType>(Ptr->getType())->getElementType(); 193 194 // Simple scalar l-value. 195 if (EltTy->isSingleValueType()) { 196 llvm::Value *V = Builder.CreateLoad(Ptr, LV.isVolatileQualified(),"tmp"); 197 198 // Bool can have different representation in memory than in registers. 199 if (ExprType->isBooleanType()) { 200 if (V->getType() != llvm::Type::Int1Ty) 201 V = Builder.CreateTrunc(V, llvm::Type::Int1Ty, "tobool"); 202 } 203 204 return RValue::get(V); 205 } 206 207 assert(ExprType->isFunctionType() && "Unknown scalar value"); 208 return RValue::get(Ptr); 209 } 210 211 if (LV.isVectorElt()) { 212 llvm::Value *Vec = Builder.CreateLoad(LV.getVectorAddr(), 213 LV.isVolatileQualified(), "tmp"); 214 return RValue::get(Builder.CreateExtractElement(Vec, LV.getVectorIdx(), 215 "vecext")); 216 } 217 218 // If this is a reference to a subset of the elements of a vector, either 219 // shuffle the input or extract/insert them as appropriate. 220 if (LV.isExtVectorElt()) 221 return EmitLoadOfExtVectorElementLValue(LV, ExprType); 222 223 if (LV.isBitfield()) 224 return EmitLoadOfBitfieldLValue(LV, ExprType); 225 226 if (LV.isPropertyRef()) 227 return EmitLoadOfPropertyRefLValue(LV, ExprType); 228 229 if (LV.isKVCRef()) 230 return EmitLoadOfKVCRefLValue(LV, ExprType); 231 232 assert(0 && "Unknown LValue type!"); 233 //an invalid RValue, but the assert will 234 //ensure that this point is never reached 235 return RValue(); 236 } 237 238 RValue CodeGenFunction::EmitLoadOfBitfieldLValue(LValue LV, 239 QualType ExprType) { 240 unsigned StartBit = LV.getBitfieldStartBit(); 241 unsigned BitfieldSize = LV.getBitfieldSize(); 242 llvm::Value *Ptr = LV.getBitfieldAddr(); 243 244 const llvm::Type *EltTy = 245 cast<llvm::PointerType>(Ptr->getType())->getElementType(); 246 unsigned EltTySize = CGM.getTargetData().getTypeSizeInBits(EltTy); 247 248 // In some cases the bitfield may straddle two memory locations. 249 // Currently we load the entire bitfield, then do the magic to 250 // sign-extend it if necessary. This results in somewhat more code 251 // than necessary for the common case (one load), since two shifts 252 // accomplish both the masking and sign extension. 253 unsigned LowBits = std::min(BitfieldSize, EltTySize - StartBit); 254 llvm::Value *Val = Builder.CreateLoad(Ptr, LV.isVolatileQualified(), "tmp"); 255 256 // Shift to proper location. 257 if (StartBit) 258 Val = Builder.CreateLShr(Val, llvm::ConstantInt::get(EltTy, StartBit), 259 "bf.lo"); 260 261 // Mask off unused bits. 262 llvm::Constant *LowMask = 263 llvm::ConstantInt::get(llvm::APInt::getLowBitsSet(EltTySize, LowBits)); 264 Val = Builder.CreateAnd(Val, LowMask, "bf.lo.cleared"); 265 266 // Fetch the high bits if necessary. 267 if (LowBits < BitfieldSize) { 268 unsigned HighBits = BitfieldSize - LowBits; 269 llvm::Value *HighPtr = 270 Builder.CreateGEP(Ptr, llvm::ConstantInt::get(llvm::Type::Int32Ty, 1), 271 "bf.ptr.hi"); 272 llvm::Value *HighVal = Builder.CreateLoad(HighPtr, 273 LV.isVolatileQualified(), 274 "tmp"); 275 276 // Mask off unused bits. 277 llvm::Constant *HighMask = 278 llvm::ConstantInt::get(llvm::APInt::getLowBitsSet(EltTySize, HighBits)); 279 HighVal = Builder.CreateAnd(HighVal, HighMask, "bf.lo.cleared"); 280 281 // Shift to proper location and or in to bitfield value. 282 HighVal = Builder.CreateShl(HighVal, 283 llvm::ConstantInt::get(EltTy, LowBits)); 284 Val = Builder.CreateOr(Val, HighVal, "bf.val"); 285 } 286 287 // Sign extend if necessary. 288 if (LV.isBitfieldSigned()) { 289 llvm::Value *ExtraBits = llvm::ConstantInt::get(EltTy, 290 EltTySize - BitfieldSize); 291 Val = Builder.CreateAShr(Builder.CreateShl(Val, ExtraBits), 292 ExtraBits, "bf.val.sext"); 293 } 294 295 // The bitfield type and the normal type differ when the storage sizes 296 // differ (currently just _Bool). 297 Val = Builder.CreateIntCast(Val, ConvertType(ExprType), false, "tmp"); 298 299 return RValue::get(Val); 300 } 301 302 RValue CodeGenFunction::EmitLoadOfPropertyRefLValue(LValue LV, 303 QualType ExprType) { 304 return EmitObjCPropertyGet(LV.getPropertyRefExpr()); 305 } 306 307 RValue CodeGenFunction::EmitLoadOfKVCRefLValue(LValue LV, 308 QualType ExprType) { 309 return EmitObjCPropertyGet(LV.getKVCRefExpr()); 310 } 311 312 // If this is a reference to a subset of the elements of a vector, create an 313 // appropriate shufflevector. 314 RValue CodeGenFunction::EmitLoadOfExtVectorElementLValue(LValue LV, 315 QualType ExprType) { 316 llvm::Value *Vec = Builder.CreateLoad(LV.getExtVectorAddr(), 317 LV.isVolatileQualified(), "tmp"); 318 319 const llvm::Constant *Elts = LV.getExtVectorElts(); 320 321 // If the result of the expression is a non-vector type, we must be 322 // extracting a single element. Just codegen as an extractelement. 323 const VectorType *ExprVT = ExprType->getAsVectorType(); 324 if (!ExprVT) { 325 unsigned InIdx = getAccessedFieldNo(0, Elts); 326 llvm::Value *Elt = llvm::ConstantInt::get(llvm::Type::Int32Ty, InIdx); 327 return RValue::get(Builder.CreateExtractElement(Vec, Elt, "tmp")); 328 } 329 330 // Always use shuffle vector to try to retain the original program structure 331 unsigned NumResultElts = ExprVT->getNumElements(); 332 333 llvm::SmallVector<llvm::Constant*, 4> Mask; 334 for (unsigned i = 0; i != NumResultElts; ++i) { 335 unsigned InIdx = getAccessedFieldNo(i, Elts); 336 Mask.push_back(llvm::ConstantInt::get(llvm::Type::Int32Ty, InIdx)); 337 } 338 339 llvm::Value *MaskV = llvm::ConstantVector::get(&Mask[0], Mask.size()); 340 Vec = Builder.CreateShuffleVector(Vec, 341 llvm::UndefValue::get(Vec->getType()), 342 MaskV, "tmp"); 343 return RValue::get(Vec); 344 } 345 346 347 348 /// EmitStoreThroughLValue - Store the specified rvalue into the specified 349 /// lvalue, where both are guaranteed to the have the same type, and that type 350 /// is 'Ty'. 351 void CodeGenFunction::EmitStoreThroughLValue(RValue Src, LValue Dst, 352 QualType Ty) { 353 if (!Dst.isSimple()) { 354 if (Dst.isVectorElt()) { 355 // Read/modify/write the vector, inserting the new element. 356 llvm::Value *Vec = Builder.CreateLoad(Dst.getVectorAddr(), 357 Dst.isVolatileQualified(), "tmp"); 358 Vec = Builder.CreateInsertElement(Vec, Src.getScalarVal(), 359 Dst.getVectorIdx(), "vecins"); 360 Builder.CreateStore(Vec, Dst.getVectorAddr(),Dst.isVolatileQualified()); 361 return; 362 } 363 364 // If this is an update of extended vector elements, insert them as 365 // appropriate. 366 if (Dst.isExtVectorElt()) 367 return EmitStoreThroughExtVectorComponentLValue(Src, Dst, Ty); 368 369 if (Dst.isBitfield()) 370 return EmitStoreThroughBitfieldLValue(Src, Dst, Ty); 371 372 if (Dst.isPropertyRef()) 373 return EmitStoreThroughPropertyRefLValue(Src, Dst, Ty); 374 375 if (Dst.isKVCRef()) 376 return EmitStoreThroughKVCRefLValue(Src, Dst, Ty); 377 378 assert(0 && "Unknown LValue type"); 379 } 380 381 if (Dst.isObjCWeak()) { 382 // load of a __weak object. 383 llvm::Value *LvalueDst = Dst.getAddress(); 384 llvm::Value *src = Src.getScalarVal(); 385 CGM.getObjCRuntime().EmitObjCWeakAssign(*this, src, LvalueDst); 386 return; 387 } 388 389 if (Dst.isObjCStrong()) { 390 // load of a __strong object. 391 llvm::Value *LvalueDst = Dst.getAddress(); 392 llvm::Value *src = Src.getScalarVal(); 393 if (Dst.isObjCIvar()) 394 CGM.getObjCRuntime().EmitObjCIvarAssign(*this, src, LvalueDst); 395 else 396 CGM.getObjCRuntime().EmitObjCGlobalAssign(*this, src, LvalueDst); 397 return; 398 } 399 400 llvm::Value *DstAddr = Dst.getAddress(); 401 assert(Src.isScalar() && "Can't emit an agg store with this method"); 402 // FIXME: Handle volatility etc. 403 const llvm::Type *SrcTy = Src.getScalarVal()->getType(); 404 const llvm::PointerType *DstPtr = cast<llvm::PointerType>(DstAddr->getType()); 405 const llvm::Type *AddrTy = DstPtr->getElementType(); 406 unsigned AS = DstPtr->getAddressSpace(); 407 408 if (AddrTy != SrcTy) 409 DstAddr = Builder.CreateBitCast(DstAddr, 410 llvm::PointerType::get(SrcTy, AS), 411 "storetmp"); 412 Builder.CreateStore(Src.getScalarVal(), DstAddr, Dst.isVolatileQualified()); 413 } 414 415 void CodeGenFunction::EmitStoreThroughBitfieldLValue(RValue Src, LValue Dst, 416 QualType Ty, 417 llvm::Value **Result) { 418 unsigned StartBit = Dst.getBitfieldStartBit(); 419 unsigned BitfieldSize = Dst.getBitfieldSize(); 420 llvm::Value *Ptr = Dst.getBitfieldAddr(); 421 422 const llvm::Type *EltTy = 423 cast<llvm::PointerType>(Ptr->getType())->getElementType(); 424 unsigned EltTySize = CGM.getTargetData().getTypeSizeInBits(EltTy); 425 426 // Get the new value, cast to the appropriate type and masked to 427 // exactly the size of the bit-field. 428 llvm::Value *SrcVal = Src.getScalarVal(); 429 llvm::Value *NewVal = Builder.CreateIntCast(SrcVal, EltTy, false, "tmp"); 430 llvm::Constant *Mask = 431 llvm::ConstantInt::get(llvm::APInt::getLowBitsSet(EltTySize, BitfieldSize)); 432 NewVal = Builder.CreateAnd(NewVal, Mask, "bf.value"); 433 434 // Return the new value of the bit-field, if requested. 435 if (Result) { 436 // Cast back to the proper type for result. 437 const llvm::Type *SrcTy = SrcVal->getType(); 438 llvm::Value *SrcTrunc = Builder.CreateIntCast(NewVal, SrcTy, false, 439 "bf.reload.val"); 440 441 // Sign extend if necessary. 442 if (Dst.isBitfieldSigned()) { 443 unsigned SrcTySize = CGM.getTargetData().getTypeSizeInBits(SrcTy); 444 llvm::Value *ExtraBits = llvm::ConstantInt::get(SrcTy, 445 SrcTySize - BitfieldSize); 446 SrcTrunc = Builder.CreateAShr(Builder.CreateShl(SrcTrunc, ExtraBits), 447 ExtraBits, "bf.reload.sext"); 448 } 449 450 *Result = SrcTrunc; 451 } 452 453 // In some cases the bitfield may straddle two memory locations. 454 // Emit the low part first and check to see if the high needs to be 455 // done. 456 unsigned LowBits = std::min(BitfieldSize, EltTySize - StartBit); 457 llvm::Value *LowVal = Builder.CreateLoad(Ptr, Dst.isVolatileQualified(), 458 "bf.prev.low"); 459 460 // Compute the mask for zero-ing the low part of this bitfield. 461 llvm::Constant *InvMask = 462 llvm::ConstantInt::get(~llvm::APInt::getBitsSet(EltTySize, StartBit, 463 StartBit + LowBits)); 464 465 // Compute the new low part as 466 // LowVal = (LowVal & InvMask) | (NewVal << StartBit), 467 // with the shift of NewVal implicitly stripping the high bits. 468 llvm::Value *NewLowVal = 469 Builder.CreateShl(NewVal, llvm::ConstantInt::get(EltTy, StartBit), 470 "bf.value.lo"); 471 LowVal = Builder.CreateAnd(LowVal, InvMask, "bf.prev.lo.cleared"); 472 LowVal = Builder.CreateOr(LowVal, NewLowVal, "bf.new.lo"); 473 474 // Write back. 475 Builder.CreateStore(LowVal, Ptr, Dst.isVolatileQualified()); 476 477 // If the low part doesn't cover the bitfield emit a high part. 478 if (LowBits < BitfieldSize) { 479 unsigned HighBits = BitfieldSize - LowBits; 480 llvm::Value *HighPtr = 481 Builder.CreateGEP(Ptr, llvm::ConstantInt::get(llvm::Type::Int32Ty, 1), 482 "bf.ptr.hi"); 483 llvm::Value *HighVal = Builder.CreateLoad(HighPtr, 484 Dst.isVolatileQualified(), 485 "bf.prev.hi"); 486 487 // Compute the mask for zero-ing the high part of this bitfield. 488 llvm::Constant *InvMask = 489 llvm::ConstantInt::get(~llvm::APInt::getLowBitsSet(EltTySize, HighBits)); 490 491 // Compute the new high part as 492 // HighVal = (HighVal & InvMask) | (NewVal lshr LowBits), 493 // where the high bits of NewVal have already been cleared and the 494 // shift stripping the low bits. 495 llvm::Value *NewHighVal = 496 Builder.CreateLShr(NewVal, llvm::ConstantInt::get(EltTy, LowBits), 497 "bf.value.high"); 498 HighVal = Builder.CreateAnd(HighVal, InvMask, "bf.prev.hi.cleared"); 499 HighVal = Builder.CreateOr(HighVal, NewHighVal, "bf.new.hi"); 500 501 // Write back. 502 Builder.CreateStore(HighVal, HighPtr, Dst.isVolatileQualified()); 503 } 504 } 505 506 void CodeGenFunction::EmitStoreThroughPropertyRefLValue(RValue Src, 507 LValue Dst, 508 QualType Ty) { 509 EmitObjCPropertySet(Dst.getPropertyRefExpr(), Src); 510 } 511 512 void CodeGenFunction::EmitStoreThroughKVCRefLValue(RValue Src, 513 LValue Dst, 514 QualType Ty) { 515 EmitObjCPropertySet(Dst.getKVCRefExpr(), Src); 516 } 517 518 void CodeGenFunction::EmitStoreThroughExtVectorComponentLValue(RValue Src, 519 LValue Dst, 520 QualType Ty) { 521 // This access turns into a read/modify/write of the vector. Load the input 522 // value now. 523 llvm::Value *Vec = Builder.CreateLoad(Dst.getExtVectorAddr(), 524 Dst.isVolatileQualified(), "tmp"); 525 const llvm::Constant *Elts = Dst.getExtVectorElts(); 526 527 llvm::Value *SrcVal = Src.getScalarVal(); 528 529 if (const VectorType *VTy = Ty->getAsVectorType()) { 530 unsigned NumSrcElts = VTy->getNumElements(); 531 unsigned NumDstElts = 532 cast<llvm::VectorType>(Vec->getType())->getNumElements(); 533 if (NumDstElts == NumSrcElts) { 534 // Use shuffle vector is the src and destination are the same number 535 // of elements 536 llvm::SmallVector<llvm::Constant*, 4> Mask; 537 for (unsigned i = 0; i != NumSrcElts; ++i) { 538 unsigned InIdx = getAccessedFieldNo(i, Elts); 539 Mask.push_back(llvm::ConstantInt::get(llvm::Type::Int32Ty, InIdx)); 540 } 541 542 llvm::Value *MaskV = llvm::ConstantVector::get(&Mask[0], Mask.size()); 543 Vec = Builder.CreateShuffleVector(SrcVal, 544 llvm::UndefValue::get(Vec->getType()), 545 MaskV, "tmp"); 546 } 547 else if (NumDstElts > NumSrcElts) { 548 // Extended the source vector to the same length and then shuffle it 549 // into the destination. 550 // FIXME: since we're shuffling with undef, can we just use the indices 551 // into that? This could be simpler. 552 llvm::SmallVector<llvm::Constant*, 4> ExtMask; 553 unsigned i; 554 for (i = 0; i != NumSrcElts; ++i) 555 ExtMask.push_back(llvm::ConstantInt::get(llvm::Type::Int32Ty, i)); 556 for (; i != NumDstElts; ++i) 557 ExtMask.push_back(llvm::UndefValue::get(llvm::Type::Int32Ty)); 558 llvm::Value *ExtMaskV = llvm::ConstantVector::get(&ExtMask[0], 559 ExtMask.size()); 560 llvm::Value *ExtSrcVal = Builder.CreateShuffleVector(SrcVal, 561 llvm::UndefValue::get(SrcVal->getType()), 562 ExtMaskV, "tmp"); 563 // build identity 564 llvm::SmallVector<llvm::Constant*, 4> Mask; 565 for (unsigned i = 0; i != NumDstElts; ++i) { 566 Mask.push_back(llvm::ConstantInt::get(llvm::Type::Int32Ty, i)); 567 } 568 // modify when what gets shuffled in 569 for (unsigned i = 0; i != NumSrcElts; ++i) { 570 unsigned Idx = getAccessedFieldNo(i, Elts); 571 Mask[Idx] =llvm::ConstantInt::get(llvm::Type::Int32Ty, i+NumDstElts); 572 } 573 llvm::Value *MaskV = llvm::ConstantVector::get(&Mask[0], Mask.size()); 574 Vec = Builder.CreateShuffleVector(Vec, ExtSrcVal, MaskV, "tmp"); 575 } 576 else { 577 // We should never shorten the vector 578 assert(0 && "unexpected shorten vector length"); 579 } 580 } else { 581 // If the Src is a scalar (not a vector) it must be updating one element. 582 unsigned InIdx = getAccessedFieldNo(0, Elts); 583 llvm::Value *Elt = llvm::ConstantInt::get(llvm::Type::Int32Ty, InIdx); 584 Vec = Builder.CreateInsertElement(Vec, SrcVal, Elt, "tmp"); 585 } 586 587 Builder.CreateStore(Vec, Dst.getExtVectorAddr(), Dst.isVolatileQualified()); 588 } 589 590 /// SetVarDeclObjCAttribute - Set __weak/__strong attributes into the LValue 591 /// object. 592 static void SetVarDeclObjCAttribute(ASTContext &Ctx, const Decl *VD, 593 const QualType &Ty, LValue &LV) 594 { 595 if (const ObjCGCAttr *A = VD->getAttr<ObjCGCAttr>()) { 596 ObjCGCAttr::GCAttrTypes attrType = A->getType(); 597 LValue::SetObjCType(attrType == ObjCGCAttr::Weak, 598 attrType == ObjCGCAttr::Strong, LV); 599 } 600 else if (Ctx.getLangOptions().ObjC1 && 601 Ctx.getLangOptions().getGCMode() != LangOptions::NonGC) { 602 // Default behavious under objective-c's gc is for objective-c pointers 603 // be treated as though they were declared as __strong. 604 if (Ctx.isObjCObjectPointerType(Ty)) 605 LValue::SetObjCType(false, true, LV); 606 } 607 } 608 609 LValue CodeGenFunction::EmitDeclRefLValue(const DeclRefExpr *E) { 610 const VarDecl *VD = dyn_cast<VarDecl>(E->getDecl()); 611 612 if (VD && (VD->isBlockVarDecl() || isa<ParmVarDecl>(VD) || 613 isa<ImplicitParamDecl>(VD))) { 614 LValue LV; 615 if (VD->getStorageClass() == VarDecl::Extern) { 616 LV = LValue::MakeAddr(CGM.GetAddrOfGlobalVar(VD), 617 E->getType().getCVRQualifiers()); 618 } 619 else { 620 llvm::Value *V = LocalDeclMap[VD]; 621 assert(V && "BlockVarDecl not entered in LocalDeclMap?"); 622 LV = LValue::MakeAddr(V, E->getType().getCVRQualifiers()); 623 } 624 if (VD->isBlockVarDecl() && 625 (VD->getStorageClass() == VarDecl::Static || 626 VD->getStorageClass() == VarDecl::Extern)) 627 SetVarDeclObjCAttribute(getContext(), VD, E->getType(), LV); 628 return LV; 629 } else if (VD && VD->isFileVarDecl()) { 630 LValue LV = LValue::MakeAddr(CGM.GetAddrOfGlobalVar(VD), 631 E->getType().getCVRQualifiers()); 632 SetVarDeclObjCAttribute(getContext(), VD, E->getType(), LV); 633 return LV; 634 } else if (const FunctionDecl *FD = dyn_cast<FunctionDecl>(E->getDecl())) { 635 return LValue::MakeAddr(CGM.GetAddrOfFunction(FD), 636 E->getType().getCVRQualifiers()); 637 } 638 else if (const ImplicitParamDecl *IPD = 639 dyn_cast<ImplicitParamDecl>(E->getDecl())) { 640 llvm::Value *V = LocalDeclMap[IPD]; 641 assert(V && "BlockVarDecl not entered in LocalDeclMap?"); 642 return LValue::MakeAddr(V, E->getType().getCVRQualifiers()); 643 } 644 assert(0 && "Unimp declref"); 645 //an invalid LValue, but the assert will 646 //ensure that this point is never reached. 647 return LValue(); 648 } 649 650 LValue CodeGenFunction::EmitUnaryOpLValue(const UnaryOperator *E) { 651 // __extension__ doesn't affect lvalue-ness. 652 if (E->getOpcode() == UnaryOperator::Extension) 653 return EmitLValue(E->getSubExpr()); 654 655 QualType ExprTy = getContext().getCanonicalType(E->getSubExpr()->getType()); 656 switch (E->getOpcode()) { 657 default: assert(0 && "Unknown unary operator lvalue!"); 658 case UnaryOperator::Deref: 659 return LValue::MakeAddr(EmitScalarExpr(E->getSubExpr()), 660 ExprTy->getAsPointerType()->getPointeeType() 661 .getCVRQualifiers()); 662 case UnaryOperator::Real: 663 case UnaryOperator::Imag: 664 LValue LV = EmitLValue(E->getSubExpr()); 665 unsigned Idx = E->getOpcode() == UnaryOperator::Imag; 666 return LValue::MakeAddr(Builder.CreateStructGEP(LV.getAddress(), 667 Idx, "idx"), 668 ExprTy.getCVRQualifiers()); 669 } 670 } 671 672 LValue CodeGenFunction::EmitStringLiteralLValue(const StringLiteral *E) { 673 return LValue::MakeAddr(CGM.GetAddrOfConstantStringFromLiteral(E), 0); 674 } 675 676 LValue CodeGenFunction::EmitPredefinedFunctionName(unsigned Type) { 677 std::string GlobalVarName; 678 679 switch (Type) { 680 default: 681 assert(0 && "Invalid type"); 682 case PredefinedExpr::Func: 683 GlobalVarName = "__func__."; 684 break; 685 case PredefinedExpr::Function: 686 GlobalVarName = "__FUNCTION__."; 687 break; 688 case PredefinedExpr::PrettyFunction: 689 // FIXME:: Demangle C++ method names 690 GlobalVarName = "__PRETTY_FUNCTION__."; 691 break; 692 } 693 694 std::string FunctionName; 695 if(const FunctionDecl *FD = dyn_cast<FunctionDecl>(CurFuncDecl)) { 696 FunctionName = FD->getNameAsString(); 697 } else { 698 // Just get the mangled name. 699 FunctionName = CurFn->getName(); 700 } 701 702 GlobalVarName += FunctionName; 703 llvm::Constant *C = 704 CGM.GetAddrOfConstantCString(FunctionName, GlobalVarName.c_str()); 705 return LValue::MakeAddr(C, 0); 706 } 707 708 LValue CodeGenFunction::EmitPredefinedLValue(const PredefinedExpr *E) { 709 switch (E->getIdentType()) { 710 default: 711 return EmitUnsupportedLValue(E, "predefined expression"); 712 case PredefinedExpr::Func: 713 case PredefinedExpr::Function: 714 case PredefinedExpr::PrettyFunction: 715 return EmitPredefinedFunctionName(E->getIdentType()); 716 } 717 } 718 719 LValue CodeGenFunction::EmitArraySubscriptExpr(const ArraySubscriptExpr *E) { 720 // The index must always be an integer, which is not an aggregate. Emit it. 721 llvm::Value *Idx = EmitScalarExpr(E->getIdx()); 722 723 // If the base is a vector type, then we are forming a vector element lvalue 724 // with this subscript. 725 if (E->getBase()->getType()->isVectorType()) { 726 // Emit the vector as an lvalue to get its address. 727 LValue LHS = EmitLValue(E->getBase()); 728 assert(LHS.isSimple() && "Can only subscript lvalue vectors here!"); 729 // FIXME: This should properly sign/zero/extend or truncate Idx to i32. 730 return LValue::MakeVectorElt(LHS.getAddress(), Idx, 731 E->getBase()->getType().getCVRQualifiers()); 732 } 733 734 // The base must be a pointer, which is not an aggregate. Emit it. 735 llvm::Value *Base = EmitScalarExpr(E->getBase()); 736 737 // Extend or truncate the index type to 32 or 64-bits. 738 QualType IdxTy = E->getIdx()->getType(); 739 bool IdxSigned = IdxTy->isSignedIntegerType(); 740 unsigned IdxBitwidth = cast<llvm::IntegerType>(Idx->getType())->getBitWidth(); 741 if (IdxBitwidth != LLVMPointerWidth) 742 Idx = Builder.CreateIntCast(Idx, llvm::IntegerType::get(LLVMPointerWidth), 743 IdxSigned, "idxprom"); 744 745 // We know that the pointer points to a type of the correct size, unless the 746 // size is a VLA. 747 if (const VariableArrayType *VAT = 748 getContext().getAsVariableArrayType(E->getType())) { 749 llvm::Value *VLASize = VLASizeMap[VAT]; 750 751 Idx = Builder.CreateMul(Idx, VLASize); 752 753 QualType BaseType = getContext().getBaseElementType(VAT); 754 755 uint64_t BaseTypeSize = getContext().getTypeSize(BaseType) / 8; 756 Idx = Builder.CreateUDiv(Idx, 757 llvm::ConstantInt::get(Idx->getType(), 758 BaseTypeSize)); 759 } 760 761 QualType ExprTy = getContext().getCanonicalType(E->getBase()->getType()); 762 763 return LValue::MakeAddr(Builder.CreateGEP(Base, Idx, "arrayidx"), 764 ExprTy->getAsPointerType()->getPointeeType() 765 .getCVRQualifiers()); 766 } 767 768 static 769 llvm::Constant *GenerateConstantVector(llvm::SmallVector<unsigned, 4> &Elts) { 770 llvm::SmallVector<llvm::Constant *, 4> CElts; 771 772 for (unsigned i = 0, e = Elts.size(); i != e; ++i) 773 CElts.push_back(llvm::ConstantInt::get(llvm::Type::Int32Ty, Elts[i])); 774 775 return llvm::ConstantVector::get(&CElts[0], CElts.size()); 776 } 777 778 LValue CodeGenFunction:: 779 EmitExtVectorElementExpr(const ExtVectorElementExpr *E) { 780 // Emit the base vector as an l-value. 781 LValue Base = EmitLValue(E->getBase()); 782 783 // Encode the element access list into a vector of unsigned indices. 784 llvm::SmallVector<unsigned, 4> Indices; 785 E->getEncodedElementAccess(Indices); 786 787 if (Base.isSimple()) { 788 llvm::Constant *CV = GenerateConstantVector(Indices); 789 return LValue::MakeExtVectorElt(Base.getAddress(), CV, 790 E->getBase()->getType().getCVRQualifiers()); 791 } 792 assert(Base.isExtVectorElt() && "Can only subscript lvalue vec elts here!"); 793 794 llvm::Constant *BaseElts = Base.getExtVectorElts(); 795 llvm::SmallVector<llvm::Constant *, 4> CElts; 796 797 for (unsigned i = 0, e = Indices.size(); i != e; ++i) { 798 if (isa<llvm::ConstantAggregateZero>(BaseElts)) 799 CElts.push_back(llvm::ConstantInt::get(llvm::Type::Int32Ty, 0)); 800 else 801 CElts.push_back(BaseElts->getOperand(Indices[i])); 802 } 803 llvm::Constant *CV = llvm::ConstantVector::get(&CElts[0], CElts.size()); 804 return LValue::MakeExtVectorElt(Base.getExtVectorAddr(), CV, 805 E->getBase()->getType().getCVRQualifiers()); 806 } 807 808 LValue CodeGenFunction::EmitMemberExpr(const MemberExpr *E) { 809 bool isUnion = false; 810 bool isIvar = false; 811 Expr *BaseExpr = E->getBase(); 812 llvm::Value *BaseValue = NULL; 813 unsigned CVRQualifiers=0; 814 815 // If this is s.x, emit s as an lvalue. If it is s->x, emit s as a scalar. 816 if (E->isArrow()) { 817 BaseValue = EmitScalarExpr(BaseExpr); 818 const PointerType *PTy = 819 cast<PointerType>(getContext().getCanonicalType(BaseExpr->getType())); 820 if (PTy->getPointeeType()->isUnionType()) 821 isUnion = true; 822 CVRQualifiers = PTy->getPointeeType().getCVRQualifiers(); 823 } 824 else if (BaseExpr->getStmtClass() == Expr::ObjCPropertyRefExprClass || 825 BaseExpr->getStmtClass() == Expr::ObjCKVCRefExprClass) { 826 RValue RV = EmitObjCPropertyGet(BaseExpr); 827 BaseValue = RV.getAggregateAddr(); 828 if (BaseExpr->getType()->isUnionType()) 829 isUnion = true; 830 CVRQualifiers = BaseExpr->getType().getCVRQualifiers(); 831 } 832 else { 833 LValue BaseLV = EmitLValue(BaseExpr); 834 if (BaseLV.isObjCIvar()) 835 isIvar = true; 836 // FIXME: this isn't right for bitfields. 837 BaseValue = BaseLV.getAddress(); 838 if (BaseExpr->getType()->isUnionType()) 839 isUnion = true; 840 CVRQualifiers = BaseExpr->getType().getCVRQualifiers(); 841 } 842 843 FieldDecl *Field = dyn_cast<FieldDecl>(E->getMemberDecl()); 844 // FIXME: Handle non-field member expressions 845 assert(Field && "No code generation for non-field member references"); 846 LValue MemExpLV = EmitLValueForField(BaseValue, Field, isUnion, CVRQualifiers); 847 LValue::SetObjCIvar(MemExpLV, isIvar); 848 return MemExpLV; 849 } 850 851 LValue CodeGenFunction::EmitLValueForBitfield(llvm::Value* BaseValue, 852 FieldDecl* Field, 853 unsigned CVRQualifiers, 854 unsigned idx) { 855 // FIXME: CodeGenTypes should expose a method to get the appropriate 856 // type for FieldTy (the appropriate type is ABI-dependent). 857 const llvm::Type *FieldTy = CGM.getTypes().ConvertTypeForMem(Field->getType()); 858 const llvm::PointerType *BaseTy = 859 cast<llvm::PointerType>(BaseValue->getType()); 860 unsigned AS = BaseTy->getAddressSpace(); 861 BaseValue = Builder.CreateBitCast(BaseValue, 862 llvm::PointerType::get(FieldTy, AS), 863 "tmp"); 864 llvm::Value *V = Builder.CreateGEP(BaseValue, 865 llvm::ConstantInt::get(llvm::Type::Int32Ty, idx), 866 "tmp"); 867 868 CodeGenTypes::BitFieldInfo bitFieldInfo = 869 CGM.getTypes().getBitFieldInfo(Field); 870 return LValue::MakeBitfield(V, bitFieldInfo.Begin, bitFieldInfo.Size, 871 Field->getType()->isSignedIntegerType(), 872 Field->getType().getCVRQualifiers()|CVRQualifiers); 873 } 874 875 LValue CodeGenFunction::EmitLValueForField(llvm::Value* BaseValue, 876 FieldDecl* Field, 877 bool isUnion, 878 unsigned CVRQualifiers) 879 { 880 unsigned idx = CGM.getTypes().getLLVMFieldNo(Field); 881 882 if (Field->isBitField()) 883 return EmitLValueForBitfield(BaseValue, Field, CVRQualifiers, idx); 884 885 llvm::Value *V = Builder.CreateStructGEP(BaseValue, idx, "tmp"); 886 887 // Match union field type. 888 if (isUnion) { 889 const llvm::Type *FieldTy = 890 CGM.getTypes().ConvertTypeForMem(Field->getType()); 891 const llvm::PointerType * BaseTy = 892 cast<llvm::PointerType>(BaseValue->getType()); 893 unsigned AS = BaseTy->getAddressSpace(); 894 V = Builder.CreateBitCast(V, 895 llvm::PointerType::get(FieldTy, AS), 896 "tmp"); 897 } 898 899 LValue LV = 900 LValue::MakeAddr(V, 901 Field->getType().getCVRQualifiers()|CVRQualifiers); 902 if (const ObjCGCAttr *A = Field->getAttr<ObjCGCAttr>()) { 903 ObjCGCAttr::GCAttrTypes attrType = A->getType(); 904 // __weak attribute on a field is ignored. 905 LValue::SetObjCType(false, attrType == ObjCGCAttr::Strong, LV); 906 } 907 else if (CGM.getLangOptions().ObjC1 && 908 CGM.getLangOptions().getGCMode() != LangOptions::NonGC) { 909 QualType ExprTy = Field->getType(); 910 if (getContext().isObjCObjectPointerType(ExprTy)) 911 LValue::SetObjCType(false, true, LV); 912 } 913 return LV; 914 } 915 916 LValue CodeGenFunction::EmitCompoundLiteralLValue(const CompoundLiteralExpr* E) 917 { 918 const llvm::Type *LTy = ConvertType(E->getType()); 919 llvm::Value *DeclPtr = CreateTempAlloca(LTy, ".compoundliteral"); 920 921 const Expr* InitExpr = E->getInitializer(); 922 LValue Result = LValue::MakeAddr(DeclPtr, E->getType().getCVRQualifiers()); 923 924 if (E->getType()->isComplexType()) { 925 EmitComplexExprIntoAddr(InitExpr, DeclPtr, false); 926 } else if (hasAggregateLLVMType(E->getType())) { 927 EmitAnyExpr(InitExpr, DeclPtr, false); 928 } else { 929 EmitStoreThroughLValue(EmitAnyExpr(InitExpr), Result, E->getType()); 930 } 931 932 return Result; 933 } 934 935 //===--------------------------------------------------------------------===// 936 // Expression Emission 937 //===--------------------------------------------------------------------===// 938 939 940 RValue CodeGenFunction::EmitCallExpr(const CallExpr *E) { 941 if (const ImplicitCastExpr *IcExpr = 942 dyn_cast<const ImplicitCastExpr>(E->getCallee())) 943 if (const DeclRefExpr *DRExpr = 944 dyn_cast<const DeclRefExpr>(IcExpr->getSubExpr())) 945 if (const FunctionDecl *FDecl = 946 dyn_cast<const FunctionDecl>(DRExpr->getDecl())) 947 if (unsigned builtinID = FDecl->getIdentifier()->getBuiltinID()) 948 return EmitBuiltinExpr(builtinID, E); 949 950 if (E->getCallee()->getType()->isBlockPointerType()) 951 return EmitUnsupportedRValue(E, "block pointer reference"); 952 953 llvm::Value *Callee = EmitScalarExpr(E->getCallee()); 954 return EmitCallExpr(Callee, E->getCallee()->getType(), 955 E->arg_begin(), E->arg_end()); 956 } 957 958 RValue CodeGenFunction::EmitCallExpr(Expr *FnExpr, 959 CallExpr::const_arg_iterator ArgBeg, 960 CallExpr::const_arg_iterator ArgEnd) { 961 962 llvm::Value *Callee = EmitScalarExpr(FnExpr); 963 return EmitCallExpr(Callee, FnExpr->getType(), ArgBeg, ArgEnd); 964 } 965 966 LValue CodeGenFunction::EmitBinaryOperatorLValue(const BinaryOperator *E) { 967 // Can only get l-value for binary operator expressions which are a 968 // simple assignment of aggregate type. 969 if (E->getOpcode() != BinaryOperator::Assign) 970 return EmitUnsupportedLValue(E, "binary l-value expression"); 971 972 llvm::Value *Temp = CreateTempAlloca(ConvertType(E->getType())); 973 EmitAggExpr(E, Temp, false); 974 // FIXME: Are these qualifiers correct? 975 return LValue::MakeAddr(Temp, E->getType().getCVRQualifiers()); 976 } 977 978 LValue CodeGenFunction::EmitCallExprLValue(const CallExpr *E) { 979 // Can only get l-value for call expression returning aggregate type 980 RValue RV = EmitCallExpr(E); 981 // FIXME: can this be volatile? 982 return LValue::MakeAddr(RV.getAggregateAddr(), 983 E->getType().getCVRQualifiers()); 984 } 985 986 LValue 987 CodeGenFunction::EmitCXXConditionDeclLValue(const CXXConditionDeclExpr *E) { 988 EmitLocalBlockVarDecl(*E->getVarDecl()); 989 return EmitDeclRefLValue(E); 990 } 991 992 LValue CodeGenFunction::EmitObjCMessageExprLValue(const ObjCMessageExpr *E) { 993 // Can only get l-value for message expression returning aggregate type 994 RValue RV = EmitObjCMessageExpr(E); 995 // FIXME: can this be volatile? 996 return LValue::MakeAddr(RV.getAggregateAddr(), 997 E->getType().getCVRQualifiers()); 998 } 999 1000 llvm::Value *CodeGenFunction::EmitIvarOffset(ObjCInterfaceDecl *Interface, 1001 const ObjCIvarDecl *Ivar) { 1002 // Objective-C objects are traditionally C structures with their layout 1003 // defined at compile-time. In some implementations, their layout is not 1004 // defined until run time in order to allow instance variables to be added to 1005 // a class without recompiling all of the subclasses. If this is the case 1006 // then the CGObjCRuntime subclass must return true to LateBoundIvars and 1007 // implement the lookup itself. 1008 if (CGM.getObjCRuntime().LateBoundIVars()) 1009 assert(0 && "late-bound ivars are unsupported"); 1010 1011 const llvm::Type *InterfaceLTy = 1012 CGM.getTypes().ConvertType(getContext().getObjCInterfaceType(Interface)); 1013 const llvm::StructLayout *Layout = 1014 CGM.getTargetData().getStructLayout(cast<llvm::StructType>(InterfaceLTy)); 1015 FieldDecl *Field = Interface->lookupFieldDeclForIvar(getContext(), Ivar); 1016 uint64_t Offset = 1017 Layout->getElementOffset(CGM.getTypes().getLLVMFieldNo(Field)); 1018 1019 return llvm::ConstantInt::get(CGM.getTypes().ConvertType(getContext().LongTy), 1020 Offset); 1021 } 1022 1023 LValue CodeGenFunction::EmitLValueForIvar(llvm::Value *BaseValue, 1024 const ObjCIvarDecl *Ivar, 1025 const FieldDecl *Field, 1026 unsigned CVRQualifiers) { 1027 // See comment in EmitIvarOffset. 1028 if (CGM.getObjCRuntime().LateBoundIVars()) 1029 assert(0 && "late-bound ivars are unsupported"); 1030 // TODO: Add a special case for isa (index 0) 1031 unsigned Index = CGM.getTypes().getLLVMFieldNo(Field); 1032 1033 if (Ivar->isBitField()) { 1034 return EmitLValueForBitfield(BaseValue, const_cast<FieldDecl *>(Field), 1035 CVRQualifiers, Index); 1036 } 1037 llvm::Value *V = Builder.CreateStructGEP(BaseValue, Index, "tmp"); 1038 LValue LV = LValue::MakeAddr(V, Ivar->getType().getCVRQualifiers()|CVRQualifiers); 1039 SetVarDeclObjCAttribute(getContext(), Ivar, Ivar->getType(), LV); 1040 LValue::SetObjCIvar(LV, true); 1041 return LV; 1042 } 1043 1044 LValue CodeGenFunction::EmitObjCIvarRefLValue(const ObjCIvarRefExpr *E) { 1045 // FIXME: A lot of the code below could be shared with EmitMemberExpr. 1046 llvm::Value *BaseValue = 0; 1047 const Expr *BaseExpr = E->getBase(); 1048 unsigned CVRQualifiers = 0; 1049 if (E->isArrow()) { 1050 BaseValue = EmitScalarExpr(BaseExpr); 1051 const PointerType *PTy = 1052 cast<PointerType>(getContext().getCanonicalType(BaseExpr->getType())); 1053 CVRQualifiers = PTy->getPointeeType().getCVRQualifiers(); 1054 } else { 1055 LValue BaseLV = EmitLValue(BaseExpr); 1056 // FIXME: this isn't right for bitfields. 1057 BaseValue = BaseLV.getAddress(); 1058 CVRQualifiers = BaseExpr->getType().getCVRQualifiers(); 1059 } 1060 1061 return EmitLValueForIvar(BaseValue, E->getDecl(), 1062 getContext().getFieldDecl(E), CVRQualifiers); 1063 } 1064 1065 LValue 1066 CodeGenFunction::EmitObjCPropertyRefLValue(const ObjCPropertyRefExpr *E) { 1067 // This is a special l-value that just issues sends when we load or 1068 // store through it. 1069 return LValue::MakePropertyRef(E, E->getType().getCVRQualifiers()); 1070 } 1071 1072 LValue 1073 CodeGenFunction::EmitObjCKVCRefLValue(const ObjCKVCRefExpr *E) { 1074 // This is a special l-value that just issues sends when we load or 1075 // store through it. 1076 return LValue::MakeKVCRef(E, E->getType().getCVRQualifiers()); 1077 } 1078 1079 LValue 1080 CodeGenFunction::EmitObjCSuperExpr(const ObjCSuperExpr *E) { 1081 return EmitUnsupportedLValue(E, "use of super"); 1082 } 1083 1084 RValue CodeGenFunction::EmitCallExpr(llvm::Value *Callee, QualType CalleeType, 1085 CallExpr::const_arg_iterator ArgBeg, 1086 CallExpr::const_arg_iterator ArgEnd) { 1087 // Get the actual function type. The callee type will always be a 1088 // pointer to function type or a block pointer type. 1089 QualType ResultType; 1090 if (const BlockPointerType *BPT = dyn_cast<BlockPointerType>(CalleeType)) { 1091 ResultType = BPT->getPointeeType()->getAsFunctionType()->getResultType(); 1092 } else { 1093 assert(CalleeType->isFunctionPointerType() && 1094 "Call must have function pointer type!"); 1095 QualType FnType = CalleeType->getAsPointerType()->getPointeeType(); 1096 ResultType = FnType->getAsFunctionType()->getResultType(); 1097 } 1098 1099 CallArgList Args; 1100 for (CallExpr::const_arg_iterator I = ArgBeg; I != ArgEnd; ++I) 1101 Args.push_back(std::make_pair(EmitAnyExprToTemp(*I), 1102 I->getType())); 1103 1104 return EmitCall(Callee, ResultType, Args); 1105 } 1106