contrib/llvm/tools/clang/lib/AST/ExprClassification.cpp

   1 //===--- ExprClassification.cpp - Expression AST Node Implementation ------===//
   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 implements Expr::classify.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #include "llvm/Support/ErrorHandling.h"
  15 #include "clang/AST/Expr.h"
  16 #include "clang/AST/ExprCXX.h"
  17 #include "clang/AST/ExprObjC.h"
  18 #include "clang/AST/ASTContext.h"
  19 #include "clang/AST/DeclObjC.h"
  20 #include "clang/AST/DeclCXX.h"
  21 #include "clang/AST/DeclTemplate.h"
  22 using namespace clang;
  23
  24 typedef Expr::Classification Cl;
  25
  26 static Cl::Kinds ClassifyInternal(ASTContext &Ctx, const Expr *E);
  27 static Cl::Kinds ClassifyDecl(ASTContext &Ctx, const Decl *D);
  28 static Cl::Kinds ClassifyUnnamed(ASTContext &Ctx, QualType T);
  29 static Cl::Kinds ClassifyMemberExpr(ASTContext &Ctx, const MemberExpr *E);
  30 static Cl::Kinds ClassifyBinaryOp(ASTContext &Ctx, const BinaryOperator *E);
  31 static Cl::Kinds ClassifyConditional(ASTContext &Ctx,
  32                                      const Expr *trueExpr,
  33                                      const Expr *falseExpr);
  34 static Cl::ModifiableType IsModifiable(ASTContext &Ctx, const Expr *E,
  35                                        Cl::Kinds Kind, SourceLocation &Loc);
  36
  37 static Cl::Kinds ClassifyExprValueKind(const LangOptions &Lang,
  38                                        const Expr *E,
  39                                        ExprValueKind Kind) {
  40   switch (Kind) {
  41   case VK_RValue:
  42     return Lang.CPlusPlus && E->getType()->isRecordType() ?
  43       Cl::CL_ClassTemporary : Cl::CL_PRValue;
  44   case VK_LValue:
  45     return Cl::CL_LValue;
  46   case VK_XValue:
  47     return Cl::CL_XValue;
  48   }
  49   llvm_unreachable("Invalid value category of implicit cast.");
  50   return Cl::CL_PRValue;
  51 }
  52
  53 Cl Expr::ClassifyImpl(ASTContext &Ctx, SourceLocation *Loc) const {
  54   assert(!TR->isReferenceType() && "Expressions can't have reference type.");
  55
  56   Cl::Kinds kind = ClassifyInternal(Ctx, this);
  57   // C99 6.3.2.1: An lvalue is an expression with an object type or an
  58   //   incomplete type other than void.
  59   if (!Ctx.getLangOptions().CPlusPlus) {
  60     // Thus, no functions.
  61     if (TR->isFunctionType() || TR == Ctx.OverloadTy)
  62       kind = Cl::CL_Function;
  63     // No void either, but qualified void is OK because it is "other than void".
  64     // Void "lvalues" are classified as addressable void values, which are void
  65     // expressions whose address can be taken.
  66     else if (TR->isVoidType() && !TR.hasQualifiers())
  67       kind = (kind == Cl::CL_LValue ? Cl::CL_AddressableVoid : Cl::CL_Void);
  68   }
  69
  70   // Enable this assertion for testing.
  71   switch (kind) {
  72   case Cl::CL_LValue: assert(getValueKind() == VK_LValue); break;
  73   case Cl::CL_XValue: assert(getValueKind() == VK_XValue); break;
  74   case Cl::CL_Function:
  75   case Cl::CL_Void:
  76   case Cl::CL_AddressableVoid:
  77   case Cl::CL_DuplicateVectorComponents:
  78   case Cl::CL_MemberFunction:
  79   case Cl::CL_SubObjCPropertySetting:
  80   case Cl::CL_ClassTemporary:
  81   case Cl::CL_ObjCMessageRValue:
  82   case Cl::CL_PRValue: assert(getValueKind() == VK_RValue); break;
  83   }
  84
  85   Cl::ModifiableType modifiable = Cl::CM_Untested;
  86   if (Loc)
  87     modifiable = IsModifiable(Ctx, this, kind, *Loc);
  88   return Classification(kind, modifiable);
  89 }
  90
  91 static Cl::Kinds ClassifyInternal(ASTContext &Ctx, const Expr *E) {
  92   // This function takes the first stab at classifying expressions.
  93   const LangOptions &Lang = Ctx.getLangOptions();
  94
  95   switch (E->getStmtClass()) {
  96     // First come the expressions that are always lvalues, unconditionally.
  97   case Stmt::NoStmtClass:
  98 #define ABSTRACT_STMT(Kind)
  99 #define STMT(Kind, Base) case Expr::Kind##Class:
 100 #define EXPR(Kind, Base)
 101 #include "clang/AST/StmtNodes.inc"
 102     llvm_unreachable("cannot classify a statement");
 103     break;
 104   case Expr::ObjCIsaExprClass:
 105     // C++ [expr.prim.general]p1: A string literal is an lvalue.
 106   case Expr::StringLiteralClass:
 107     // @encode is equivalent to its string
 108   case Expr::ObjCEncodeExprClass:
 109     // __func__ and friends are too.
 110   case Expr::PredefinedExprClass:
 111     // Property references are lvalues
 112   case Expr::ObjCPropertyRefExprClass:
 113     // C++ [expr.typeid]p1: The result of a typeid expression is an lvalue of...
 114   case Expr::CXXTypeidExprClass:
 115     // Unresolved lookups get classified as lvalues.
 116     // FIXME: Is this wise? Should they get their own kind?
 117   case Expr::UnresolvedLookupExprClass:
 118   case Expr::UnresolvedMemberExprClass:
 119   case Expr::CXXDependentScopeMemberExprClass:
 120   case Expr::DependentScopeDeclRefExprClass:
 121     // ObjC instance variables are lvalues
 122     // FIXME: ObjC++0x might have different rules
 123   case Expr::ObjCIvarRefExprClass:
 124     return Cl::CL_LValue;
 125     // C99 6.5.2.5p5 says that compound literals are lvalues.
 126     // In C++, they're class temporaries.
 127   case Expr::CompoundLiteralExprClass:
 128     return Ctx.getLangOptions().CPlusPlus? Cl::CL_ClassTemporary
 129                                          : Cl::CL_LValue;
 130
 131     // Expressions that are prvalues.
 132   case Expr::CXXBoolLiteralExprClass:
 133   case Expr::CXXPseudoDestructorExprClass:
 134   case Expr::UnaryExprOrTypeTraitExprClass:
 135   case Expr::CXXNewExprClass:
 136   case Expr::CXXThisExprClass:
 137   case Expr::CXXNullPtrLiteralExprClass:
 138   case Expr::ImaginaryLiteralClass:
 139   case Expr::GNUNullExprClass:
 140   case Expr::OffsetOfExprClass:
 141   case Expr::CXXThrowExprClass:
 142   case Expr::ShuffleVectorExprClass:
 143   case Expr::IntegerLiteralClass:
 144   case Expr::CharacterLiteralClass:
 145   case Expr::AddrLabelExprClass:
 146   case Expr::CXXDeleteExprClass:
 147   case Expr::ImplicitValueInitExprClass:
 148   case Expr::BlockExprClass:
 149   case Expr::FloatingLiteralClass:
 150   case Expr::CXXNoexceptExprClass:
 151   case Expr::CXXScalarValueInitExprClass:
 152   case Expr::UnaryTypeTraitExprClass:
 153   case Expr::BinaryTypeTraitExprClass:
 154   case Expr::ArrayTypeTraitExprClass:
 155   case Expr::ExpressionTraitExprClass:
 156   case Expr::ObjCSelectorExprClass:
 157   case Expr::ObjCProtocolExprClass:
 158   case Expr::ObjCStringLiteralClass:
 159   case Expr::ParenListExprClass:
 160   case Expr::InitListExprClass:
 161   case Expr::SizeOfPackExprClass:
 162   case Expr::SubstNonTypeTemplateParmPackExprClass:
 163   case Expr::AsTypeExprClass:
 164   case Expr::ObjCIndirectCopyRestoreExprClass:
 165     return Cl::CL_PRValue;
 166
 167     // Next come the complicated cases.
 168   case Expr::SubstNonTypeTemplateParmExprClass:
 169     return ClassifyInternal(Ctx,
 170                  cast<SubstNonTypeTemplateParmExpr>(E)->getReplacement());
 171
 172     // C++ [expr.sub]p1: The result is an lvalue of type "T".
 173     // However, subscripting vector types is more like member access.
 174   case Expr::ArraySubscriptExprClass:
 175     if (cast<ArraySubscriptExpr>(E)->getBase()->getType()->isVectorType())
 176       return ClassifyInternal(Ctx, cast<ArraySubscriptExpr>(E)->getBase());
 177     return Cl::CL_LValue;
 178
 179     // C++ [expr.prim.general]p3: The result is an lvalue if the entity is a
 180     //   function or variable and a prvalue otherwise.
 181   case Expr::DeclRefExprClass:
 182     if (E->getType() == Ctx.UnknownAnyTy)
 183       return isa<FunctionDecl>(cast<DeclRefExpr>(E)->getDecl())
 184                ? Cl::CL_PRValue : Cl::CL_LValue;
 185     return ClassifyDecl(Ctx, cast<DeclRefExpr>(E)->getDecl());
 186     // We deal with names referenced from blocks the same way.
 187   case Expr::BlockDeclRefExprClass:
 188     return ClassifyDecl(Ctx, cast<BlockDeclRefExpr>(E)->getDecl());
 189
 190     // Member access is complex.
 191   case Expr::MemberExprClass:
 192     return ClassifyMemberExpr(Ctx, cast<MemberExpr>(E));
 193
 194   case Expr::UnaryOperatorClass:
 195     switch (cast<UnaryOperator>(E)->getOpcode()) {
 196       // C++ [expr.unary.op]p1: The unary * operator performs indirection:
 197       //   [...] the result is an lvalue referring to the object or function
 198       //   to which the expression points.
 199     case UO_Deref:
 200       return Cl::CL_LValue;
 201
 202       // GNU extensions, simply look through them.
 203     case UO_Extension:
 204       return ClassifyInternal(Ctx, cast<UnaryOperator>(E)->getSubExpr());
 205
 206     // Treat _Real and _Imag basically as if they were member
 207     // expressions:  l-value only if the operand is a true l-value.
 208     case UO_Real:
 209     case UO_Imag: {
 210       const Expr *Op = cast<UnaryOperator>(E)->getSubExpr()->IgnoreParens();
 211       Cl::Kinds K = ClassifyInternal(Ctx, Op);
 212       if (K != Cl::CL_LValue) return K;
 213
 214       if (isa<ObjCPropertyRefExpr>(Op))
 215         return Cl::CL_SubObjCPropertySetting;
 216       return Cl::CL_LValue;
 217     }
 218
 219       // C++ [expr.pre.incr]p1: The result is the updated operand; it is an
 220       //   lvalue, [...]
 221       // Not so in C.
 222     case UO_PreInc:
 223     case UO_PreDec:
 224       return Lang.CPlusPlus ? Cl::CL_LValue : Cl::CL_PRValue;
 225
 226     default:
 227       return Cl::CL_PRValue;
 228     }
 229
 230   case Expr::OpaqueValueExprClass:
 231     return ClassifyExprValueKind(Lang, E,
 232                                  cast<OpaqueValueExpr>(E)->getValueKind());
 233
 234     // Implicit casts are lvalues if they're lvalue casts. Other than that, we
 235     // only specifically record class temporaries.
 236   case Expr::ImplicitCastExprClass:
 237     return ClassifyExprValueKind(Lang, E,
 238                                  cast<ImplicitCastExpr>(E)->getValueKind());
 239
 240     // C++ [expr.prim.general]p4: The presence of parentheses does not affect
 241     //   whether the expression is an lvalue.
 242   case Expr::ParenExprClass:
 243     return ClassifyInternal(Ctx, cast<ParenExpr>(E)->getSubExpr());
 244
 245     // C1X 6.5.1.1p4: [A generic selection] is an lvalue, a function designator,
 246     // or a void expression if its result expression is, respectively, an
 247     // lvalue, a function designator, or a void expression.
 248   case Expr::GenericSelectionExprClass:
 249     if (cast<GenericSelectionExpr>(E)->isResultDependent())
 250       return Cl::CL_PRValue;
 251     return ClassifyInternal(Ctx,cast<GenericSelectionExpr>(E)->getResultExpr());
 252
 253   case Expr::BinaryOperatorClass:
 254   case Expr::CompoundAssignOperatorClass:
 255     // C doesn't have any binary expressions that are lvalues.
 256     if (Lang.CPlusPlus)
 257       return ClassifyBinaryOp(Ctx, cast<BinaryOperator>(E));
 258     return Cl::CL_PRValue;
 259
 260   case Expr::CallExprClass:
 261   case Expr::CXXOperatorCallExprClass:
 262   case Expr::CXXMemberCallExprClass:
 263   case Expr::CUDAKernelCallExprClass:
 264     return ClassifyUnnamed(Ctx, cast<CallExpr>(E)->getCallReturnType());
 265
 266     // __builtin_choose_expr is equivalent to the chosen expression.
 267   case Expr::ChooseExprClass:
 268     return ClassifyInternal(Ctx, cast<ChooseExpr>(E)->getChosenSubExpr(Ctx));
 269
 270     // Extended vector element access is an lvalue unless there are duplicates
 271     // in the shuffle expression.
 272   case Expr::ExtVectorElementExprClass:
 273     return cast<ExtVectorElementExpr>(E)->containsDuplicateElements() ?
 274       Cl::CL_DuplicateVectorComponents : Cl::CL_LValue;
 275
 276     // Simply look at the actual default argument.
 277   case Expr::CXXDefaultArgExprClass:
 278     return ClassifyInternal(Ctx, cast<CXXDefaultArgExpr>(E)->getExpr());
 279
 280     // Same idea for temporary binding.
 281   case Expr::CXXBindTemporaryExprClass:
 282     return ClassifyInternal(Ctx, cast<CXXBindTemporaryExpr>(E)->getSubExpr());
 283
 284     // And the cleanups guard.
 285   case Expr::ExprWithCleanupsClass:
 286     return ClassifyInternal(Ctx, cast<ExprWithCleanups>(E)->getSubExpr());
 287
 288     // Casts depend completely on the target type. All casts work the same.
 289   case Expr::CStyleCastExprClass:
 290   case Expr::CXXFunctionalCastExprClass:
 291   case Expr::CXXStaticCastExprClass:
 292   case Expr::CXXDynamicCastExprClass:
 293   case Expr::CXXReinterpretCastExprClass:
 294   case Expr::CXXConstCastExprClass:
 295   case Expr::ObjCBridgedCastExprClass:
 296     // Only in C++ can casts be interesting at all.
 297     if (!Lang.CPlusPlus) return Cl::CL_PRValue;
 298     return ClassifyUnnamed(Ctx, cast<ExplicitCastExpr>(E)->getTypeAsWritten());
 299
 300   case Expr::CXXUnresolvedConstructExprClass:
 301     return ClassifyUnnamed(Ctx,
 302                       cast<CXXUnresolvedConstructExpr>(E)->getTypeAsWritten());
 303
 304   case Expr::BinaryConditionalOperatorClass: {
 305     if (!Lang.CPlusPlus) return Cl::CL_PRValue;
 306     const BinaryConditionalOperator *co = cast<BinaryConditionalOperator>(E);
 307     return ClassifyConditional(Ctx, co->getTrueExpr(), co->getFalseExpr());
 308   }
 309
 310   case Expr::ConditionalOperatorClass: {
 311     // Once again, only C++ is interesting.
 312     if (!Lang.CPlusPlus) return Cl::CL_PRValue;
 313     const ConditionalOperator *co = cast<ConditionalOperator>(E);
 314     return ClassifyConditional(Ctx, co->getTrueExpr(), co->getFalseExpr());
 315   }
 316
 317     // ObjC message sends are effectively function calls, if the target function
 318     // is known.
 319   case Expr::ObjCMessageExprClass:
 320     if (const ObjCMethodDecl *Method =
 321           cast<ObjCMessageExpr>(E)->getMethodDecl()) {
 322       Cl::Kinds kind = ClassifyUnnamed(Ctx, Method->getResultType());
 323       return (kind == Cl::CL_PRValue) ? Cl::CL_ObjCMessageRValue : kind;
 324     }
 325     return Cl::CL_PRValue;
 326
 327     // Some C++ expressions are always class temporaries.
 328   case Expr::CXXConstructExprClass:
 329   case Expr::CXXTemporaryObjectExprClass:
 330     return Cl::CL_ClassTemporary;
 331
 332   case Expr::VAArgExprClass:
 333     return ClassifyUnnamed(Ctx, E->getType());
 334
 335   case Expr::DesignatedInitExprClass:
 336     return ClassifyInternal(Ctx, cast<DesignatedInitExpr>(E)->getInit());
 337
 338   case Expr::StmtExprClass: {
 339     const CompoundStmt *S = cast<StmtExpr>(E)->getSubStmt();
 340     if (const Expr *LastExpr = dyn_cast_or_null<Expr>(S->body_back()))
 341       return ClassifyUnnamed(Ctx, LastExpr->getType());
 342     return Cl::CL_PRValue;
 343   }
 344
 345   case Expr::CXXUuidofExprClass:
 346     return Cl::CL_LValue;
 347
 348   case Expr::PackExpansionExprClass:
 349     return ClassifyInternal(Ctx, cast<PackExpansionExpr>(E)->getPattern());
 350
 351   case Expr::MaterializeTemporaryExprClass:
 352     return cast<MaterializeTemporaryExpr>(E)->isBoundToLvalueReference()
 353               ? Cl::CL_LValue
 354               : Cl::CL_XValue;
 355   }
 356
 357   llvm_unreachable("unhandled expression kind in classification");
 358   return Cl::CL_LValue;
 359 }
 360
 361 /// ClassifyDecl - Return the classification of an expression referencing the
 362 /// given declaration.
 363 static Cl::Kinds ClassifyDecl(ASTContext &Ctx, const Decl *D) {
 364   // C++ [expr.prim.general]p6: The result is an lvalue if the entity is a
 365   //   function, variable, or data member and a prvalue otherwise.
 366   // In C, functions are not lvalues.
 367   // In addition, NonTypeTemplateParmDecl derives from VarDecl but isn't an
 368   // lvalue unless it's a reference type (C++ [temp.param]p6), so we need to
 369   // special-case this.
 370
 371   if (isa<CXXMethodDecl>(D) && cast<CXXMethodDecl>(D)->isInstance())
 372     return Cl::CL_MemberFunction;
 373
 374   bool islvalue;
 375   if (const NonTypeTemplateParmDecl *NTTParm =
 376         dyn_cast<NonTypeTemplateParmDecl>(D))
 377     islvalue = NTTParm->getType()->isReferenceType();
 378   else
 379     islvalue = isa<VarDecl>(D) || isa<FieldDecl>(D) ||
 380           isa<IndirectFieldDecl>(D) ||
 381       (Ctx.getLangOptions().CPlusPlus &&
 382         (isa<FunctionDecl>(D) || isa<FunctionTemplateDecl>(D)));
 383
 384   return islvalue ? Cl::CL_LValue : Cl::CL_PRValue;
 385 }
 386
 387 /// ClassifyUnnamed - Return the classification of an expression yielding an
 388 /// unnamed value of the given type. This applies in particular to function
 389 /// calls and casts.
 390 static Cl::Kinds ClassifyUnnamed(ASTContext &Ctx, QualType T) {
 391   // In C, function calls are always rvalues.
 392   if (!Ctx.getLangOptions().CPlusPlus) return Cl::CL_PRValue;
 393
 394   // C++ [expr.call]p10: A function call is an lvalue if the result type is an
 395   //   lvalue reference type or an rvalue reference to function type, an xvalue
 396   //   if the result type is an rvalue refernence to object type, and a prvalue
 397   //   otherwise.
 398   if (T->isLValueReferenceType())
 399     return Cl::CL_LValue;
 400   const RValueReferenceType *RV = T->getAs<RValueReferenceType>();
 401   if (!RV) // Could still be a class temporary, though.
 402     return T->isRecordType() ? Cl::CL_ClassTemporary : Cl::CL_PRValue;
 403
 404   return RV->getPointeeType()->isFunctionType() ? Cl::CL_LValue : Cl::CL_XValue;
 405 }
 406
 407 static Cl::Kinds ClassifyMemberExpr(ASTContext &Ctx, const MemberExpr *E) {
 408   if (E->getType() == Ctx.UnknownAnyTy)
 409     return (isa<FunctionDecl>(E->getMemberDecl())
 410               ? Cl::CL_PRValue : Cl::CL_LValue);
 411
 412   // Handle C first, it's easier.
 413   if (!Ctx.getLangOptions().CPlusPlus) {
 414     // C99 6.5.2.3p3
 415     // For dot access, the expression is an lvalue if the first part is. For
 416     // arrow access, it always is an lvalue.
 417     if (E->isArrow())
 418       return Cl::CL_LValue;
 419     // ObjC property accesses are not lvalues, but get special treatment.
 420     Expr *Base = E->getBase()->IgnoreParens();
 421     if (isa<ObjCPropertyRefExpr>(Base))
 422       return Cl::CL_SubObjCPropertySetting;
 423     return ClassifyInternal(Ctx, Base);
 424   }
 425
 426   NamedDecl *Member = E->getMemberDecl();
 427   // C++ [expr.ref]p3: E1->E2 is converted to the equivalent form (*(E1)).E2.
 428   // C++ [expr.ref]p4: If E2 is declared to have type "reference to T", then
 429   //   E1.E2 is an lvalue.
 430   if (ValueDecl *Value = dyn_cast<ValueDecl>(Member))
 431     if (Value->getType()->isReferenceType())
 432       return Cl::CL_LValue;
 433
 434   //   Otherwise, one of the following rules applies.
 435   //   -- If E2 is a static member [...] then E1.E2 is an lvalue.
 436   if (isa<VarDecl>(Member) && Member->getDeclContext()->isRecord())
 437     return Cl::CL_LValue;
 438
 439   //   -- If E2 is a non-static data member [...]. If E1 is an lvalue, then
 440   //      E1.E2 is an lvalue; if E1 is an xvalue, then E1.E2 is an xvalue;
 441   //      otherwise, it is a prvalue.
 442   if (isa<FieldDecl>(Member)) {
 443     // *E1 is an lvalue
 444     if (E->isArrow())
 445       return Cl::CL_LValue;
 446     Expr *Base = E->getBase()->IgnoreParenImpCasts();
 447     if (isa<ObjCPropertyRefExpr>(Base))
 448       return Cl::CL_SubObjCPropertySetting;
 449     return ClassifyInternal(Ctx, E->getBase());
 450   }
 451
 452   //   -- If E2 is a [...] member function, [...]
 453   //      -- If it refers to a static member function [...], then E1.E2 is an
 454   //         lvalue; [...]
 455   //      -- Otherwise [...] E1.E2 is a prvalue.
 456   if (CXXMethodDecl *Method = dyn_cast<CXXMethodDecl>(Member))
 457     return Method->isStatic() ? Cl::CL_LValue : Cl::CL_MemberFunction;
 458
 459   //   -- If E2 is a member enumerator [...], the expression E1.E2 is a prvalue.
 460   // So is everything else we haven't handled yet.
 461   return Cl::CL_PRValue;
 462 }
 463
 464 static Cl::Kinds ClassifyBinaryOp(ASTContext &Ctx, const BinaryOperator *E) {
 465   assert(Ctx.getLangOptions().CPlusPlus &&
 466          "This is only relevant for C++.");
 467   // C++ [expr.ass]p1: All [...] return an lvalue referring to the left operand.
 468   // Except we override this for writes to ObjC properties.
 469   if (E->isAssignmentOp())
 470     return (E->getLHS()->getObjectKind() == OK_ObjCProperty
 471               ? Cl::CL_PRValue : Cl::CL_LValue);
 472
 473   // C++ [expr.comma]p1: the result is of the same value category as its right
 474   //   operand, [...].
 475   if (E->getOpcode() == BO_Comma)
 476     return ClassifyInternal(Ctx, E->getRHS());
 477
 478   // C++ [expr.mptr.oper]p6: The result of a .* expression whose second operand
 479   //   is a pointer to a data member is of the same value category as its first
 480   //   operand.
 481   if (E->getOpcode() == BO_PtrMemD)
 482     return (E->getType()->isFunctionType() || E->getType() == Ctx.BoundMemberTy)
 483              ? Cl::CL_MemberFunction
 484              : ClassifyInternal(Ctx, E->getLHS());
 485
 486   // C++ [expr.mptr.oper]p6: The result of an ->* expression is an lvalue if its
 487   //   second operand is a pointer to data member and a prvalue otherwise.
 488   if (E->getOpcode() == BO_PtrMemI)
 489     return (E->getType()->isFunctionType() || E->getType() == Ctx.BoundMemberTy)
 490              ? Cl::CL_MemberFunction
 491              : Cl::CL_LValue;
 492
 493   // All other binary operations are prvalues.
 494   return Cl::CL_PRValue;
 495 }
 496
 497 static Cl::Kinds ClassifyConditional(ASTContext &Ctx, const Expr *True,
 498                                      const Expr *False) {
 499   assert(Ctx.getLangOptions().CPlusPlus &&
 500          "This is only relevant for C++.");
 501
 502   // C++ [expr.cond]p2
 503   //   If either the second or the third operand has type (cv) void, [...]
 504   //   the result [...] is a prvalue.
 505   if (True->getType()->isVoidType() || False->getType()->isVoidType())
 506     return Cl::CL_PRValue;
 507
 508   // Note that at this point, we have already performed all conversions
 509   // according to [expr.cond]p3.
 510   // C++ [expr.cond]p4: If the second and third operands are glvalues of the
 511   //   same value category [...], the result is of that [...] value category.
 512   // C++ [expr.cond]p5: Otherwise, the result is a prvalue.
 513   Cl::Kinds LCl = ClassifyInternal(Ctx, True),
 514             RCl = ClassifyInternal(Ctx, False);
 515   return LCl == RCl ? LCl : Cl::CL_PRValue;
 516 }
 517
 518 static Cl::ModifiableType IsModifiable(ASTContext &Ctx, const Expr *E,
 519                                        Cl::Kinds Kind, SourceLocation &Loc) {
 520   // As a general rule, we only care about lvalues. But there are some rvalues
 521   // for which we want to generate special results.
 522   if (Kind == Cl::CL_PRValue) {
 523     // For the sake of better diagnostics, we want to specifically recognize
 524     // use of the GCC cast-as-lvalue extension.
 525     if (const ExplicitCastExpr *CE =
 526           dyn_cast<ExplicitCastExpr>(E->IgnoreParens())) {
 527       if (CE->getSubExpr()->IgnoreParenImpCasts()->isLValue()) {
 528         Loc = CE->getExprLoc();
 529         return Cl::CM_LValueCast;
 530       }
 531     }
 532   }
 533   if (Kind != Cl::CL_LValue)
 534     return Cl::CM_RValue;
 535
 536   // This is the lvalue case.
 537   // Functions are lvalues in C++, but not modifiable. (C++ [basic.lval]p6)
 538   if (Ctx.getLangOptions().CPlusPlus && E->getType()->isFunctionType())
 539     return Cl::CM_Function;
 540
 541   // You cannot assign to a variable outside a block from within the block if
 542   // it is not marked __block, e.g.
 543   //   void takeclosure(void (^C)(void));
 544   //   void func() { int x = 1; takeclosure(^{ x = 7; }); }
 545   if (const BlockDeclRefExpr *BDR = dyn_cast<BlockDeclRefExpr>(E)) {
 546     if (!BDR->isByRef() && isa<VarDecl>(BDR->getDecl()))
 547       return Cl::CM_NotBlockQualified;
 548   }
 549
 550   // Assignment to a property in ObjC is an implicit setter access. But a
 551   // setter might not exist.
 552   if (const ObjCPropertyRefExpr *Expr = dyn_cast<ObjCPropertyRefExpr>(E)) {
 553     if (Expr->isImplicitProperty() && Expr->getImplicitPropertySetter() == 0)
 554       return Cl::CM_NoSetterProperty;
 555   }
 556
 557   CanQualType CT = Ctx.getCanonicalType(E->getType());
 558   // Const stuff is obviously not modifiable.
 559   if (CT.isConstQualified())
 560     return Cl::CM_ConstQualified;
 561   // Arrays are not modifiable, only their elements are.
 562   if (CT->isArrayType())
 563     return Cl::CM_ArrayType;
 564   // Incomplete types are not modifiable.
 565   if (CT->isIncompleteType())
 566     return Cl::CM_IncompleteType;
 567
 568   // Records with any const fields (recursively) are not modifiable.
 569   if (const RecordType *R = CT->getAs<RecordType>()) {
 570     assert((E->getObjectKind() == OK_ObjCProperty ||
 571             !Ctx.getLangOptions().CPlusPlus) &&
 572            "C++ struct assignment should be resolved by the "
 573            "copy assignment operator.");
 574     if (R->hasConstFields())
 575       return Cl::CM_ConstQualified;
 576   }
 577
 578   return Cl::CM_Modifiable;
 579 }
 580
 581 Expr::LValueClassification Expr::ClassifyLValue(ASTContext &Ctx) const {
 582   Classification VC = Classify(Ctx);
 583   switch (VC.getKind()) {
 584   case Cl::CL_LValue: return LV_Valid;
 585   case Cl::CL_XValue: return LV_InvalidExpression;
 586   case Cl::CL_Function: return LV_NotObjectType;
 587   case Cl::CL_Void: return LV_InvalidExpression;
 588   case Cl::CL_AddressableVoid: return LV_IncompleteVoidType;
 589   case Cl::CL_DuplicateVectorComponents: return LV_DuplicateVectorComponents;
 590   case Cl::CL_MemberFunction: return LV_MemberFunction;
 591   case Cl::CL_SubObjCPropertySetting: return LV_SubObjCPropertySetting;
 592   case Cl::CL_ClassTemporary: return LV_ClassTemporary;
 593   case Cl::CL_ObjCMessageRValue: return LV_InvalidMessageExpression;
 594   case Cl::CL_PRValue: return LV_InvalidExpression;
 595   }
 596   llvm_unreachable("Unhandled kind");
 597 }
 598
 599 Expr::isModifiableLvalueResult
 600 Expr::isModifiableLvalue(ASTContext &Ctx, SourceLocation *Loc) const {
 601   SourceLocation dummy;
 602   Classification VC = ClassifyModifiable(Ctx, Loc ? *Loc : dummy);
 603   switch (VC.getKind()) {
 604   case Cl::CL_LValue: break;
 605   case Cl::CL_XValue: return MLV_InvalidExpression;
 606   case Cl::CL_Function: return MLV_NotObjectType;
 607   case Cl::CL_Void: return MLV_InvalidExpression;
 608   case Cl::CL_AddressableVoid: return MLV_IncompleteVoidType;
 609   case Cl::CL_DuplicateVectorComponents: return MLV_DuplicateVectorComponents;
 610   case Cl::CL_MemberFunction: return MLV_MemberFunction;
 611   case Cl::CL_SubObjCPropertySetting: return MLV_SubObjCPropertySetting;
 612   case Cl::CL_ClassTemporary: return MLV_ClassTemporary;
 613   case Cl::CL_ObjCMessageRValue: return MLV_InvalidMessageExpression;
 614   case Cl::CL_PRValue:
 615     return VC.getModifiable() == Cl::CM_LValueCast ?
 616       MLV_LValueCast : MLV_InvalidExpression;
 617   }
 618   assert(VC.getKind() == Cl::CL_LValue && "Unhandled kind");
 619   switch (VC.getModifiable()) {
 620   case Cl::CM_Untested: llvm_unreachable("Did not test modifiability");
 621   case Cl::CM_Modifiable: return MLV_Valid;
 622   case Cl::CM_RValue: llvm_unreachable("CM_RValue and CL_LValue don't match");
 623   case Cl::CM_Function: return MLV_NotObjectType;
 624   case Cl::CM_LValueCast:
 625     llvm_unreachable("CM_LValueCast and CL_LValue don't match");
 626   case Cl::CM_NotBlockQualified: return MLV_NotBlockQualified;
 627   case Cl::CM_NoSetterProperty: return MLV_NoSetterProperty;
 628   case Cl::CM_ConstQualified: return MLV_ConstQualified;
 629   case Cl::CM_ArrayType: return MLV_ArrayType;
 630   case Cl::CM_IncompleteType: return MLV_IncompleteType;
 631   }
 632   llvm_unreachable("Unhandled modifiable type");
 633 }