]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/llvm/tools/clang/lib/Sema/SemaChecking.cpp
Add compiler-rt's libFuzzer, not connected to buildworld yet.
[FreeBSD/FreeBSD.git] / contrib / llvm / tools / clang / lib / Sema / SemaChecking.cpp
1 //===- SemaChecking.cpp - Extra Semantic Checking -------------------------===//
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 extra semantic analysis beyond what is enforced
11 //  by the C type system.
12 //
13 //===----------------------------------------------------------------------===//
14
15 #include "clang/AST/APValue.h"
16 #include "clang/AST/ASTContext.h"
17 #include "clang/AST/Attr.h"
18 #include "clang/AST/AttrIterator.h"
19 #include "clang/AST/CharUnits.h"
20 #include "clang/AST/Decl.h"
21 #include "clang/AST/DeclBase.h"
22 #include "clang/AST/DeclCXX.h"
23 #include "clang/AST/DeclObjC.h"
24 #include "clang/AST/DeclarationName.h"
25 #include "clang/AST/EvaluatedExprVisitor.h"
26 #include "clang/AST/Expr.h"
27 #include "clang/AST/ExprCXX.h"
28 #include "clang/AST/ExprObjC.h"
29 #include "clang/AST/ExprOpenMP.h"
30 #include "clang/AST/NSAPI.h"
31 #include "clang/AST/NonTrivialTypeVisitor.h"
32 #include "clang/AST/OperationKinds.h"
33 #include "clang/AST/Stmt.h"
34 #include "clang/AST/TemplateBase.h"
35 #include "clang/AST/Type.h"
36 #include "clang/AST/TypeLoc.h"
37 #include "clang/AST/UnresolvedSet.h"
38 #include "clang/Analysis/Analyses/FormatString.h"
39 #include "clang/Basic/AddressSpaces.h"
40 #include "clang/Basic/CharInfo.h"
41 #include "clang/Basic/Diagnostic.h"
42 #include "clang/Basic/IdentifierTable.h"
43 #include "clang/Basic/LLVM.h"
44 #include "clang/Basic/LangOptions.h"
45 #include "clang/Basic/OpenCLOptions.h"
46 #include "clang/Basic/OperatorKinds.h"
47 #include "clang/Basic/PartialDiagnostic.h"
48 #include "clang/Basic/SourceLocation.h"
49 #include "clang/Basic/SourceManager.h"
50 #include "clang/Basic/Specifiers.h"
51 #include "clang/Basic/SyncScope.h"
52 #include "clang/Basic/TargetBuiltins.h"
53 #include "clang/Basic/TargetCXXABI.h"
54 #include "clang/Basic/TargetInfo.h"
55 #include "clang/Basic/TypeTraits.h"
56 #include "clang/Lex/Lexer.h" // TODO: Extract static functions to fix layering.
57 #include "clang/Sema/Initialization.h"
58 #include "clang/Sema/Lookup.h"
59 #include "clang/Sema/Ownership.h"
60 #include "clang/Sema/Scope.h"
61 #include "clang/Sema/ScopeInfo.h"
62 #include "clang/Sema/Sema.h"
63 #include "clang/Sema/SemaInternal.h"
64 #include "llvm/ADT/APFloat.h"
65 #include "llvm/ADT/APInt.h"
66 #include "llvm/ADT/APSInt.h"
67 #include "llvm/ADT/ArrayRef.h"
68 #include "llvm/ADT/DenseMap.h"
69 #include "llvm/ADT/FoldingSet.h"
70 #include "llvm/ADT/None.h"
71 #include "llvm/ADT/Optional.h"
72 #include "llvm/ADT/STLExtras.h"
73 #include "llvm/ADT/SmallBitVector.h"
74 #include "llvm/ADT/SmallPtrSet.h"
75 #include "llvm/ADT/SmallString.h"
76 #include "llvm/ADT/SmallVector.h"
77 #include "llvm/ADT/StringRef.h"
78 #include "llvm/ADT/StringSwitch.h"
79 #include "llvm/ADT/Triple.h"
80 #include "llvm/Support/AtomicOrdering.h"
81 #include "llvm/Support/Casting.h"
82 #include "llvm/Support/Compiler.h"
83 #include "llvm/Support/ConvertUTF.h"
84 #include "llvm/Support/ErrorHandling.h"
85 #include "llvm/Support/Format.h"
86 #include "llvm/Support/Locale.h"
87 #include "llvm/Support/MathExtras.h"
88 #include "llvm/Support/raw_ostream.h"
89 #include <algorithm>
90 #include <cassert>
91 #include <cstddef>
92 #include <cstdint>
93 #include <functional>
94 #include <limits>
95 #include <string>
96 #include <tuple>
97 #include <utility>
98
99 using namespace clang;
100 using namespace sema;
101
102 SourceLocation Sema::getLocationOfStringLiteralByte(const StringLiteral *SL,
103                                                     unsigned ByteNo) const {
104   return SL->getLocationOfByte(ByteNo, getSourceManager(), LangOpts,
105                                Context.getTargetInfo());
106 }
107
108 /// Checks that a call expression's argument count is the desired number.
109 /// This is useful when doing custom type-checking.  Returns true on error.
110 static bool checkArgCount(Sema &S, CallExpr *call, unsigned desiredArgCount) {
111   unsigned argCount = call->getNumArgs();
112   if (argCount == desiredArgCount) return false;
113
114   if (argCount < desiredArgCount)
115     return S.Diag(call->getLocEnd(), diag::err_typecheck_call_too_few_args)
116         << 0 /*function call*/ << desiredArgCount << argCount
117         << call->getSourceRange();
118
119   // Highlight all the excess arguments.
120   SourceRange range(call->getArg(desiredArgCount)->getLocStart(),
121                     call->getArg(argCount - 1)->getLocEnd());
122
123   return S.Diag(range.getBegin(), diag::err_typecheck_call_too_many_args)
124     << 0 /*function call*/ << desiredArgCount << argCount
125     << call->getArg(1)->getSourceRange();
126 }
127
128 /// Check that the first argument to __builtin_annotation is an integer
129 /// and the second argument is a non-wide string literal.
130 static bool SemaBuiltinAnnotation(Sema &S, CallExpr *TheCall) {
131   if (checkArgCount(S, TheCall, 2))
132     return true;
133
134   // First argument should be an integer.
135   Expr *ValArg = TheCall->getArg(0);
136   QualType Ty = ValArg->getType();
137   if (!Ty->isIntegerType()) {
138     S.Diag(ValArg->getLocStart(), diag::err_builtin_annotation_first_arg)
139       << ValArg->getSourceRange();
140     return true;
141   }
142
143   // Second argument should be a constant string.
144   Expr *StrArg = TheCall->getArg(1)->IgnoreParenCasts();
145   StringLiteral *Literal = dyn_cast<StringLiteral>(StrArg);
146   if (!Literal || !Literal->isAscii()) {
147     S.Diag(StrArg->getLocStart(), diag::err_builtin_annotation_second_arg)
148       << StrArg->getSourceRange();
149     return true;
150   }
151
152   TheCall->setType(Ty);
153   return false;
154 }
155
156 static bool SemaBuiltinMSVCAnnotation(Sema &S, CallExpr *TheCall) {
157   // We need at least one argument.
158   if (TheCall->getNumArgs() < 1) {
159     S.Diag(TheCall->getLocEnd(), diag::err_typecheck_call_too_few_args_at_least)
160         << 0 << 1 << TheCall->getNumArgs()
161         << TheCall->getCallee()->getSourceRange();
162     return true;
163   }
164
165   // All arguments should be wide string literals.
166   for (Expr *Arg : TheCall->arguments()) {
167     auto *Literal = dyn_cast<StringLiteral>(Arg->IgnoreParenCasts());
168     if (!Literal || !Literal->isWide()) {
169       S.Diag(Arg->getLocStart(), diag::err_msvc_annotation_wide_str)
170           << Arg->getSourceRange();
171       return true;
172     }
173   }
174
175   return false;
176 }
177
178 /// Check that the argument to __builtin_addressof is a glvalue, and set the
179 /// result type to the corresponding pointer type.
180 static bool SemaBuiltinAddressof(Sema &S, CallExpr *TheCall) {
181   if (checkArgCount(S, TheCall, 1))
182     return true;
183
184   ExprResult Arg(TheCall->getArg(0));
185   QualType ResultType = S.CheckAddressOfOperand(Arg, TheCall->getLocStart());
186   if (ResultType.isNull())
187     return true;
188
189   TheCall->setArg(0, Arg.get());
190   TheCall->setType(ResultType);
191   return false;
192 }
193
194 static bool SemaBuiltinOverflow(Sema &S, CallExpr *TheCall) {
195   if (checkArgCount(S, TheCall, 3))
196     return true;
197
198   // First two arguments should be integers.
199   for (unsigned I = 0; I < 2; ++I) {
200     ExprResult Arg = TheCall->getArg(I);
201     QualType Ty = Arg.get()->getType();
202     if (!Ty->isIntegerType()) {
203       S.Diag(Arg.get()->getLocStart(), diag::err_overflow_builtin_must_be_int)
204           << Ty << Arg.get()->getSourceRange();
205       return true;
206     }
207     InitializedEntity Entity = InitializedEntity::InitializeParameter(
208         S.getASTContext(), Ty, /*consume*/ false);
209     Arg = S.PerformCopyInitialization(Entity, SourceLocation(), Arg);
210     if (Arg.isInvalid())
211       return true;
212     TheCall->setArg(I, Arg.get());
213   }
214
215   // Third argument should be a pointer to a non-const integer.
216   // IRGen correctly handles volatile, restrict, and address spaces, and
217   // the other qualifiers aren't possible.
218   {
219     ExprResult Arg = TheCall->getArg(2);
220     QualType Ty = Arg.get()->getType();
221     const auto *PtrTy = Ty->getAs<PointerType>();
222     if (!(PtrTy && PtrTy->getPointeeType()->isIntegerType() &&
223           !PtrTy->getPointeeType().isConstQualified())) {
224       S.Diag(Arg.get()->getLocStart(),
225              diag::err_overflow_builtin_must_be_ptr_int)
226           << Ty << Arg.get()->getSourceRange();
227       return true;
228     }
229     InitializedEntity Entity = InitializedEntity::InitializeParameter(
230         S.getASTContext(), Ty, /*consume*/ false);
231     Arg = S.PerformCopyInitialization(Entity, SourceLocation(), Arg);
232     if (Arg.isInvalid())
233       return true;
234     TheCall->setArg(2, Arg.get());
235   }
236   return false;
237 }
238
239 static void SemaBuiltinMemChkCall(Sema &S, FunctionDecl *FDecl,
240                                   CallExpr *TheCall, unsigned SizeIdx,
241                                   unsigned DstSizeIdx) {
242   if (TheCall->getNumArgs() <= SizeIdx ||
243       TheCall->getNumArgs() <= DstSizeIdx)
244     return;
245
246   const Expr *SizeArg = TheCall->getArg(SizeIdx);
247   const Expr *DstSizeArg = TheCall->getArg(DstSizeIdx);
248
249   llvm::APSInt Size, DstSize;
250
251   // find out if both sizes are known at compile time
252   if (!SizeArg->EvaluateAsInt(Size, S.Context) ||
253       !DstSizeArg->EvaluateAsInt(DstSize, S.Context))
254     return;
255
256   if (Size.ule(DstSize))
257     return;
258
259   // confirmed overflow so generate the diagnostic.
260   IdentifierInfo *FnName = FDecl->getIdentifier();
261   SourceLocation SL = TheCall->getLocStart();
262   SourceRange SR = TheCall->getSourceRange();
263
264   S.Diag(SL, diag::warn_memcpy_chk_overflow) << SR << FnName;
265 }
266
267 static bool SemaBuiltinCallWithStaticChain(Sema &S, CallExpr *BuiltinCall) {
268   if (checkArgCount(S, BuiltinCall, 2))
269     return true;
270
271   SourceLocation BuiltinLoc = BuiltinCall->getLocStart();
272   Expr *Builtin = BuiltinCall->getCallee()->IgnoreImpCasts();
273   Expr *Call = BuiltinCall->getArg(0);
274   Expr *Chain = BuiltinCall->getArg(1);
275
276   if (Call->getStmtClass() != Stmt::CallExprClass) {
277     S.Diag(BuiltinLoc, diag::err_first_argument_to_cwsc_not_call)
278         << Call->getSourceRange();
279     return true;
280   }
281
282   auto CE = cast<CallExpr>(Call);
283   if (CE->getCallee()->getType()->isBlockPointerType()) {
284     S.Diag(BuiltinLoc, diag::err_first_argument_to_cwsc_block_call)
285         << Call->getSourceRange();
286     return true;
287   }
288
289   const Decl *TargetDecl = CE->getCalleeDecl();
290   if (const FunctionDecl *FD = dyn_cast_or_null<FunctionDecl>(TargetDecl))
291     if (FD->getBuiltinID()) {
292       S.Diag(BuiltinLoc, diag::err_first_argument_to_cwsc_builtin_call)
293           << Call->getSourceRange();
294       return true;
295     }
296
297   if (isa<CXXPseudoDestructorExpr>(CE->getCallee()->IgnoreParens())) {
298     S.Diag(BuiltinLoc, diag::err_first_argument_to_cwsc_pdtor_call)
299         << Call->getSourceRange();
300     return true;
301   }
302
303   ExprResult ChainResult = S.UsualUnaryConversions(Chain);
304   if (ChainResult.isInvalid())
305     return true;
306   if (!ChainResult.get()->getType()->isPointerType()) {
307     S.Diag(BuiltinLoc, diag::err_second_argument_to_cwsc_not_pointer)
308         << Chain->getSourceRange();
309     return true;
310   }
311
312   QualType ReturnTy = CE->getCallReturnType(S.Context);
313   QualType ArgTys[2] = { ReturnTy, ChainResult.get()->getType() };
314   QualType BuiltinTy = S.Context.getFunctionType(
315       ReturnTy, ArgTys, FunctionProtoType::ExtProtoInfo());
316   QualType BuiltinPtrTy = S.Context.getPointerType(BuiltinTy);
317
318   Builtin =
319       S.ImpCastExprToType(Builtin, BuiltinPtrTy, CK_BuiltinFnToFnPtr).get();
320
321   BuiltinCall->setType(CE->getType());
322   BuiltinCall->setValueKind(CE->getValueKind());
323   BuiltinCall->setObjectKind(CE->getObjectKind());
324   BuiltinCall->setCallee(Builtin);
325   BuiltinCall->setArg(1, ChainResult.get());
326
327   return false;
328 }
329
330 static bool SemaBuiltinSEHScopeCheck(Sema &SemaRef, CallExpr *TheCall,
331                                      Scope::ScopeFlags NeededScopeFlags,
332                                      unsigned DiagID) {
333   // Scopes aren't available during instantiation. Fortunately, builtin
334   // functions cannot be template args so they cannot be formed through template
335   // instantiation. Therefore checking once during the parse is sufficient.
336   if (SemaRef.inTemplateInstantiation())
337     return false;
338
339   Scope *S = SemaRef.getCurScope();
340   while (S && !S->isSEHExceptScope())
341     S = S->getParent();
342   if (!S || !(S->getFlags() & NeededScopeFlags)) {
343     auto *DRE = cast<DeclRefExpr>(TheCall->getCallee()->IgnoreParenCasts());
344     SemaRef.Diag(TheCall->getExprLoc(), DiagID)
345         << DRE->getDecl()->getIdentifier();
346     return true;
347   }
348
349   return false;
350 }
351
352 static inline bool isBlockPointer(Expr *Arg) {
353   return Arg->getType()->isBlockPointerType();
354 }
355
356 /// OpenCL C v2.0, s6.13.17.2 - Checks that the block parameters are all local
357 /// void*, which is a requirement of device side enqueue.
358 static bool checkOpenCLBlockArgs(Sema &S, Expr *BlockArg) {
359   const BlockPointerType *BPT =
360       cast<BlockPointerType>(BlockArg->getType().getCanonicalType());
361   ArrayRef<QualType> Params =
362       BPT->getPointeeType()->getAs<FunctionProtoType>()->getParamTypes();
363   unsigned ArgCounter = 0;
364   bool IllegalParams = false;
365   // Iterate through the block parameters until either one is found that is not
366   // a local void*, or the block is valid.
367   for (ArrayRef<QualType>::iterator I = Params.begin(), E = Params.end();
368        I != E; ++I, ++ArgCounter) {
369     if (!(*I)->isPointerType() || !(*I)->getPointeeType()->isVoidType() ||
370         (*I)->getPointeeType().getQualifiers().getAddressSpace() !=
371             LangAS::opencl_local) {
372       // Get the location of the error. If a block literal has been passed
373       // (BlockExpr) then we can point straight to the offending argument,
374       // else we just point to the variable reference.
375       SourceLocation ErrorLoc;
376       if (isa<BlockExpr>(BlockArg)) {
377         BlockDecl *BD = cast<BlockExpr>(BlockArg)->getBlockDecl();
378         ErrorLoc = BD->getParamDecl(ArgCounter)->getLocStart();
379       } else if (isa<DeclRefExpr>(BlockArg)) {
380         ErrorLoc = cast<DeclRefExpr>(BlockArg)->getLocStart();
381       }
382       S.Diag(ErrorLoc,
383              diag::err_opencl_enqueue_kernel_blocks_non_local_void_args);
384       IllegalParams = true;
385     }
386   }
387
388   return IllegalParams;
389 }
390
391 static bool checkOpenCLSubgroupExt(Sema &S, CallExpr *Call) {
392   if (!S.getOpenCLOptions().isEnabled("cl_khr_subgroups")) {
393     S.Diag(Call->getLocStart(), diag::err_opencl_requires_extension)
394           << 1 << Call->getDirectCallee() << "cl_khr_subgroups";
395     return true;
396   }
397   return false;
398 }
399
400 static bool SemaOpenCLBuiltinNDRangeAndBlock(Sema &S, CallExpr *TheCall) {
401   if (checkArgCount(S, TheCall, 2))
402     return true;
403
404   if (checkOpenCLSubgroupExt(S, TheCall))
405     return true;
406
407   // First argument is an ndrange_t type.
408   Expr *NDRangeArg = TheCall->getArg(0);
409   if (NDRangeArg->getType().getUnqualifiedType().getAsString() != "ndrange_t") {
410     S.Diag(NDRangeArg->getLocStart(),
411            diag::err_opencl_builtin_expected_type)
412         << TheCall->getDirectCallee() << "'ndrange_t'";
413     return true;
414   }
415
416   Expr *BlockArg = TheCall->getArg(1);
417   if (!isBlockPointer(BlockArg)) {
418     S.Diag(BlockArg->getLocStart(),
419            diag::err_opencl_builtin_expected_type)
420         << TheCall->getDirectCallee() << "block";
421     return true;
422   }
423   return checkOpenCLBlockArgs(S, BlockArg);
424 }
425
426 /// OpenCL C v2.0, s6.13.17.6 - Check the argument to the
427 /// get_kernel_work_group_size
428 /// and get_kernel_preferred_work_group_size_multiple builtin functions.
429 static bool SemaOpenCLBuiltinKernelWorkGroupSize(Sema &S, CallExpr *TheCall) {
430   if (checkArgCount(S, TheCall, 1))
431     return true;
432
433   Expr *BlockArg = TheCall->getArg(0);
434   if (!isBlockPointer(BlockArg)) {
435     S.Diag(BlockArg->getLocStart(),
436            diag::err_opencl_builtin_expected_type)
437         << TheCall->getDirectCallee() << "block";
438     return true;
439   }
440   return checkOpenCLBlockArgs(S, BlockArg);
441 }
442
443 /// Diagnose integer type and any valid implicit conversion to it.
444 static bool checkOpenCLEnqueueIntType(Sema &S, Expr *E,
445                                       const QualType &IntType);
446
447 static bool checkOpenCLEnqueueLocalSizeArgs(Sema &S, CallExpr *TheCall,
448                                             unsigned Start, unsigned End) {
449   bool IllegalParams = false;
450   for (unsigned I = Start; I <= End; ++I)
451     IllegalParams |= checkOpenCLEnqueueIntType(S, TheCall->getArg(I),
452                                               S.Context.getSizeType());
453   return IllegalParams;
454 }
455
456 /// OpenCL v2.0, s6.13.17.1 - Check that sizes are provided for all
457 /// 'local void*' parameter of passed block.
458 static bool checkOpenCLEnqueueVariadicArgs(Sema &S, CallExpr *TheCall,
459                                            Expr *BlockArg,
460                                            unsigned NumNonVarArgs) {
461   const BlockPointerType *BPT =
462       cast<BlockPointerType>(BlockArg->getType().getCanonicalType());
463   unsigned NumBlockParams =
464       BPT->getPointeeType()->getAs<FunctionProtoType>()->getNumParams();
465   unsigned TotalNumArgs = TheCall->getNumArgs();
466
467   // For each argument passed to the block, a corresponding uint needs to
468   // be passed to describe the size of the local memory.
469   if (TotalNumArgs != NumBlockParams + NumNonVarArgs) {
470     S.Diag(TheCall->getLocStart(),
471            diag::err_opencl_enqueue_kernel_local_size_args);
472     return true;
473   }
474
475   // Check that the sizes of the local memory are specified by integers.
476   return checkOpenCLEnqueueLocalSizeArgs(S, TheCall, NumNonVarArgs,
477                                          TotalNumArgs - 1);
478 }
479
480 /// OpenCL C v2.0, s6.13.17 - Enqueue kernel function contains four different
481 /// overload formats specified in Table 6.13.17.1.
482 /// int enqueue_kernel(queue_t queue,
483 ///                    kernel_enqueue_flags_t flags,
484 ///                    const ndrange_t ndrange,
485 ///                    void (^block)(void))
486 /// int enqueue_kernel(queue_t queue,
487 ///                    kernel_enqueue_flags_t flags,
488 ///                    const ndrange_t ndrange,
489 ///                    uint num_events_in_wait_list,
490 ///                    clk_event_t *event_wait_list,
491 ///                    clk_event_t *event_ret,
492 ///                    void (^block)(void))
493 /// int enqueue_kernel(queue_t queue,
494 ///                    kernel_enqueue_flags_t flags,
495 ///                    const ndrange_t ndrange,
496 ///                    void (^block)(local void*, ...),
497 ///                    uint size0, ...)
498 /// int enqueue_kernel(queue_t queue,
499 ///                    kernel_enqueue_flags_t flags,
500 ///                    const ndrange_t ndrange,
501 ///                    uint num_events_in_wait_list,
502 ///                    clk_event_t *event_wait_list,
503 ///                    clk_event_t *event_ret,
504 ///                    void (^block)(local void*, ...),
505 ///                    uint size0, ...)
506 static bool SemaOpenCLBuiltinEnqueueKernel(Sema &S, CallExpr *TheCall) {
507   unsigned NumArgs = TheCall->getNumArgs();
508
509   if (NumArgs < 4) {
510     S.Diag(TheCall->getLocStart(), diag::err_typecheck_call_too_few_args);
511     return true;
512   }
513
514   Expr *Arg0 = TheCall->getArg(0);
515   Expr *Arg1 = TheCall->getArg(1);
516   Expr *Arg2 = TheCall->getArg(2);
517   Expr *Arg3 = TheCall->getArg(3);
518
519   // First argument always needs to be a queue_t type.
520   if (!Arg0->getType()->isQueueT()) {
521     S.Diag(TheCall->getArg(0)->getLocStart(),
522            diag::err_opencl_builtin_expected_type)
523         << TheCall->getDirectCallee() << S.Context.OCLQueueTy;
524     return true;
525   }
526
527   // Second argument always needs to be a kernel_enqueue_flags_t enum value.
528   if (!Arg1->getType()->isIntegerType()) {
529     S.Diag(TheCall->getArg(1)->getLocStart(),
530            diag::err_opencl_builtin_expected_type)
531         << TheCall->getDirectCallee() << "'kernel_enqueue_flags_t' (i.e. uint)";
532     return true;
533   }
534
535   // Third argument is always an ndrange_t type.
536   if (Arg2->getType().getUnqualifiedType().getAsString() != "ndrange_t") {
537     S.Diag(TheCall->getArg(2)->getLocStart(),
538            diag::err_opencl_builtin_expected_type)
539         << TheCall->getDirectCallee() << "'ndrange_t'";
540     return true;
541   }
542
543   // With four arguments, there is only one form that the function could be
544   // called in: no events and no variable arguments.
545   if (NumArgs == 4) {
546     // check that the last argument is the right block type.
547     if (!isBlockPointer(Arg3)) {
548       S.Diag(Arg3->getLocStart(), diag::err_opencl_builtin_expected_type)
549           << TheCall->getDirectCallee() << "block";
550       return true;
551     }
552     // we have a block type, check the prototype
553     const BlockPointerType *BPT =
554         cast<BlockPointerType>(Arg3->getType().getCanonicalType());
555     if (BPT->getPointeeType()->getAs<FunctionProtoType>()->getNumParams() > 0) {
556       S.Diag(Arg3->getLocStart(),
557              diag::err_opencl_enqueue_kernel_blocks_no_args);
558       return true;
559     }
560     return false;
561   }
562   // we can have block + varargs.
563   if (isBlockPointer(Arg3))
564     return (checkOpenCLBlockArgs(S, Arg3) ||
565             checkOpenCLEnqueueVariadicArgs(S, TheCall, Arg3, 4));
566   // last two cases with either exactly 7 args or 7 args and varargs.
567   if (NumArgs >= 7) {
568     // check common block argument.
569     Expr *Arg6 = TheCall->getArg(6);
570     if (!isBlockPointer(Arg6)) {
571       S.Diag(Arg6->getLocStart(), diag::err_opencl_builtin_expected_type)
572           << TheCall->getDirectCallee() << "block";
573       return true;
574     }
575     if (checkOpenCLBlockArgs(S, Arg6))
576       return true;
577
578     // Forth argument has to be any integer type.
579     if (!Arg3->getType()->isIntegerType()) {
580       S.Diag(TheCall->getArg(3)->getLocStart(),
581              diag::err_opencl_builtin_expected_type)
582           << TheCall->getDirectCallee() << "integer";
583       return true;
584     }
585     // check remaining common arguments.
586     Expr *Arg4 = TheCall->getArg(4);
587     Expr *Arg5 = TheCall->getArg(5);
588
589     // Fifth argument is always passed as a pointer to clk_event_t.
590     if (!Arg4->isNullPointerConstant(S.Context,
591                                      Expr::NPC_ValueDependentIsNotNull) &&
592         !Arg4->getType()->getPointeeOrArrayElementType()->isClkEventT()) {
593       S.Diag(TheCall->getArg(4)->getLocStart(),
594              diag::err_opencl_builtin_expected_type)
595           << TheCall->getDirectCallee()
596           << S.Context.getPointerType(S.Context.OCLClkEventTy);
597       return true;
598     }
599
600     // Sixth argument is always passed as a pointer to clk_event_t.
601     if (!Arg5->isNullPointerConstant(S.Context,
602                                      Expr::NPC_ValueDependentIsNotNull) &&
603         !(Arg5->getType()->isPointerType() &&
604           Arg5->getType()->getPointeeType()->isClkEventT())) {
605       S.Diag(TheCall->getArg(5)->getLocStart(),
606              diag::err_opencl_builtin_expected_type)
607           << TheCall->getDirectCallee()
608           << S.Context.getPointerType(S.Context.OCLClkEventTy);
609       return true;
610     }
611
612     if (NumArgs == 7)
613       return false;
614
615     return checkOpenCLEnqueueVariadicArgs(S, TheCall, Arg6, 7);
616   }
617
618   // None of the specific case has been detected, give generic error
619   S.Diag(TheCall->getLocStart(),
620          diag::err_opencl_enqueue_kernel_incorrect_args);
621   return true;
622 }
623
624 /// Returns OpenCL access qual.
625 static OpenCLAccessAttr *getOpenCLArgAccess(const Decl *D) {
626     return D->getAttr<OpenCLAccessAttr>();
627 }
628
629 /// Returns true if pipe element type is different from the pointer.
630 static bool checkOpenCLPipeArg(Sema &S, CallExpr *Call) {
631   const Expr *Arg0 = Call->getArg(0);
632   // First argument type should always be pipe.
633   if (!Arg0->getType()->isPipeType()) {
634     S.Diag(Call->getLocStart(), diag::err_opencl_builtin_pipe_first_arg)
635         << Call->getDirectCallee() << Arg0->getSourceRange();
636     return true;
637   }
638   OpenCLAccessAttr *AccessQual =
639       getOpenCLArgAccess(cast<DeclRefExpr>(Arg0)->getDecl());
640   // Validates the access qualifier is compatible with the call.
641   // OpenCL v2.0 s6.13.16 - The access qualifiers for pipe should only be
642   // read_only and write_only, and assumed to be read_only if no qualifier is
643   // specified.
644   switch (Call->getDirectCallee()->getBuiltinID()) {
645   case Builtin::BIread_pipe:
646   case Builtin::BIreserve_read_pipe:
647   case Builtin::BIcommit_read_pipe:
648   case Builtin::BIwork_group_reserve_read_pipe:
649   case Builtin::BIsub_group_reserve_read_pipe:
650   case Builtin::BIwork_group_commit_read_pipe:
651   case Builtin::BIsub_group_commit_read_pipe:
652     if (!(!AccessQual || AccessQual->isReadOnly())) {
653       S.Diag(Arg0->getLocStart(),
654              diag::err_opencl_builtin_pipe_invalid_access_modifier)
655           << "read_only" << Arg0->getSourceRange();
656       return true;
657     }
658     break;
659   case Builtin::BIwrite_pipe:
660   case Builtin::BIreserve_write_pipe:
661   case Builtin::BIcommit_write_pipe:
662   case Builtin::BIwork_group_reserve_write_pipe:
663   case Builtin::BIsub_group_reserve_write_pipe:
664   case Builtin::BIwork_group_commit_write_pipe:
665   case Builtin::BIsub_group_commit_write_pipe:
666     if (!(AccessQual && AccessQual->isWriteOnly())) {
667       S.Diag(Arg0->getLocStart(),
668              diag::err_opencl_builtin_pipe_invalid_access_modifier)
669           << "write_only" << Arg0->getSourceRange();
670       return true;
671     }
672     break;
673   default:
674     break;
675   }
676   return false;
677 }
678
679 /// Returns true if pipe element type is different from the pointer.
680 static bool checkOpenCLPipePacketType(Sema &S, CallExpr *Call, unsigned Idx) {
681   const Expr *Arg0 = Call->getArg(0);
682   const Expr *ArgIdx = Call->getArg(Idx);
683   const PipeType *PipeTy = cast<PipeType>(Arg0->getType());
684   const QualType EltTy = PipeTy->getElementType();
685   const PointerType *ArgTy = ArgIdx->getType()->getAs<PointerType>();
686   // The Idx argument should be a pointer and the type of the pointer and
687   // the type of pipe element should also be the same.
688   if (!ArgTy ||
689       !S.Context.hasSameType(
690           EltTy, ArgTy->getPointeeType()->getCanonicalTypeInternal())) {
691     S.Diag(Call->getLocStart(), diag::err_opencl_builtin_pipe_invalid_arg)
692         << Call->getDirectCallee() << S.Context.getPointerType(EltTy)
693         << ArgIdx->getType() << ArgIdx->getSourceRange();
694     return true;
695   }
696   return false;
697 }
698
699 // Performs semantic analysis for the read/write_pipe call.
700 // \param S Reference to the semantic analyzer.
701 // \param Call A pointer to the builtin call.
702 // \return True if a semantic error has been found, false otherwise.
703 static bool SemaBuiltinRWPipe(Sema &S, CallExpr *Call) {
704   // OpenCL v2.0 s6.13.16.2 - The built-in read/write
705   // functions have two forms.
706   switch (Call->getNumArgs()) {
707   case 2:
708     if (checkOpenCLPipeArg(S, Call))
709       return true;
710     // The call with 2 arguments should be
711     // read/write_pipe(pipe T, T*).
712     // Check packet type T.
713     if (checkOpenCLPipePacketType(S, Call, 1))
714       return true;
715     break;
716
717   case 4: {
718     if (checkOpenCLPipeArg(S, Call))
719       return true;
720     // The call with 4 arguments should be
721     // read/write_pipe(pipe T, reserve_id_t, uint, T*).
722     // Check reserve_id_t.
723     if (!Call->getArg(1)->getType()->isReserveIDT()) {
724       S.Diag(Call->getLocStart(), diag::err_opencl_builtin_pipe_invalid_arg)
725           << Call->getDirectCallee() << S.Context.OCLReserveIDTy
726           << Call->getArg(1)->getType() << Call->getArg(1)->getSourceRange();
727       return true;
728     }
729
730     // Check the index.
731     const Expr *Arg2 = Call->getArg(2);
732     if (!Arg2->getType()->isIntegerType() &&
733         !Arg2->getType()->isUnsignedIntegerType()) {
734       S.Diag(Call->getLocStart(), diag::err_opencl_builtin_pipe_invalid_arg)
735           << Call->getDirectCallee() << S.Context.UnsignedIntTy
736           << Arg2->getType() << Arg2->getSourceRange();
737       return true;
738     }
739
740     // Check packet type T.
741     if (checkOpenCLPipePacketType(S, Call, 3))
742       return true;
743   } break;
744   default:
745     S.Diag(Call->getLocStart(), diag::err_opencl_builtin_pipe_arg_num)
746         << Call->getDirectCallee() << Call->getSourceRange();
747     return true;
748   }
749
750   return false;
751 }
752
753 // Performs a semantic analysis on the {work_group_/sub_group_
754 //        /_}reserve_{read/write}_pipe
755 // \param S Reference to the semantic analyzer.
756 // \param Call The call to the builtin function to be analyzed.
757 // \return True if a semantic error was found, false otherwise.
758 static bool SemaBuiltinReserveRWPipe(Sema &S, CallExpr *Call) {
759   if (checkArgCount(S, Call, 2))
760     return true;
761
762   if (checkOpenCLPipeArg(S, Call))
763     return true;
764
765   // Check the reserve size.
766   if (!Call->getArg(1)->getType()->isIntegerType() &&
767       !Call->getArg(1)->getType()->isUnsignedIntegerType()) {
768     S.Diag(Call->getLocStart(), diag::err_opencl_builtin_pipe_invalid_arg)
769         << Call->getDirectCallee() << S.Context.UnsignedIntTy
770         << Call->getArg(1)->getType() << Call->getArg(1)->getSourceRange();
771     return true;
772   }
773
774   // Since return type of reserve_read/write_pipe built-in function is
775   // reserve_id_t, which is not defined in the builtin def file , we used int
776   // as return type and need to override the return type of these functions.
777   Call->setType(S.Context.OCLReserveIDTy);
778
779   return false;
780 }
781
782 // Performs a semantic analysis on {work_group_/sub_group_
783 //        /_}commit_{read/write}_pipe
784 // \param S Reference to the semantic analyzer.
785 // \param Call The call to the builtin function to be analyzed.
786 // \return True if a semantic error was found, false otherwise.
787 static bool SemaBuiltinCommitRWPipe(Sema &S, CallExpr *Call) {
788   if (checkArgCount(S, Call, 2))
789     return true;
790
791   if (checkOpenCLPipeArg(S, Call))
792     return true;
793
794   // Check reserve_id_t.
795   if (!Call->getArg(1)->getType()->isReserveIDT()) {
796     S.Diag(Call->getLocStart(), diag::err_opencl_builtin_pipe_invalid_arg)
797         << Call->getDirectCallee() << S.Context.OCLReserveIDTy
798         << Call->getArg(1)->getType() << Call->getArg(1)->getSourceRange();
799     return true;
800   }
801
802   return false;
803 }
804
805 // Performs a semantic analysis on the call to built-in Pipe
806 //        Query Functions.
807 // \param S Reference to the semantic analyzer.
808 // \param Call The call to the builtin function to be analyzed.
809 // \return True if a semantic error was found, false otherwise.
810 static bool SemaBuiltinPipePackets(Sema &S, CallExpr *Call) {
811   if (checkArgCount(S, Call, 1))
812     return true;
813
814   if (!Call->getArg(0)->getType()->isPipeType()) {
815     S.Diag(Call->getLocStart(), diag::err_opencl_builtin_pipe_first_arg)
816         << Call->getDirectCallee() << Call->getArg(0)->getSourceRange();
817     return true;
818   }
819
820   return false;
821 }
822
823 // OpenCL v2.0 s6.13.9 - Address space qualifier functions.
824 // Performs semantic analysis for the to_global/local/private call.
825 // \param S Reference to the semantic analyzer.
826 // \param BuiltinID ID of the builtin function.
827 // \param Call A pointer to the builtin call.
828 // \return True if a semantic error has been found, false otherwise.
829 static bool SemaOpenCLBuiltinToAddr(Sema &S, unsigned BuiltinID,
830                                     CallExpr *Call) {
831   if (Call->getNumArgs() != 1) {
832     S.Diag(Call->getLocStart(), diag::err_opencl_builtin_to_addr_arg_num)
833         << Call->getDirectCallee() << Call->getSourceRange();
834     return true;
835   }
836
837   auto RT = Call->getArg(0)->getType();
838   if (!RT->isPointerType() || RT->getPointeeType()
839       .getAddressSpace() == LangAS::opencl_constant) {
840     S.Diag(Call->getLocStart(), diag::err_opencl_builtin_to_addr_invalid_arg)
841         << Call->getArg(0) << Call->getDirectCallee() << Call->getSourceRange();
842     return true;
843   }
844
845   RT = RT->getPointeeType();
846   auto Qual = RT.getQualifiers();
847   switch (BuiltinID) {
848   case Builtin::BIto_global:
849     Qual.setAddressSpace(LangAS::opencl_global);
850     break;
851   case Builtin::BIto_local:
852     Qual.setAddressSpace(LangAS::opencl_local);
853     break;
854   case Builtin::BIto_private:
855     Qual.setAddressSpace(LangAS::opencl_private);
856     break;
857   default:
858     llvm_unreachable("Invalid builtin function");
859   }
860   Call->setType(S.Context.getPointerType(S.Context.getQualifiedType(
861       RT.getUnqualifiedType(), Qual)));
862
863   return false;
864 }
865
866 // Emit an error and return true if the current architecture is not in the list
867 // of supported architectures.
868 static bool
869 CheckBuiltinTargetSupport(Sema &S, unsigned BuiltinID, CallExpr *TheCall,
870                           ArrayRef<llvm::Triple::ArchType> SupportedArchs) {
871   llvm::Triple::ArchType CurArch =
872       S.getASTContext().getTargetInfo().getTriple().getArch();
873   if (llvm::is_contained(SupportedArchs, CurArch))
874     return false;
875   S.Diag(TheCall->getLocStart(), diag::err_builtin_target_unsupported)
876       << TheCall->getSourceRange();
877   return true;
878 }
879
880 ExprResult
881 Sema::CheckBuiltinFunctionCall(FunctionDecl *FDecl, unsigned BuiltinID,
882                                CallExpr *TheCall) {
883   ExprResult TheCallResult(TheCall);
884
885   // Find out if any arguments are required to be integer constant expressions.
886   unsigned ICEArguments = 0;
887   ASTContext::GetBuiltinTypeError Error;
888   Context.GetBuiltinType(BuiltinID, Error, &ICEArguments);
889   if (Error != ASTContext::GE_None)
890     ICEArguments = 0;  // Don't diagnose previously diagnosed errors.
891
892   // If any arguments are required to be ICE's, check and diagnose.
893   for (unsigned ArgNo = 0; ICEArguments != 0; ++ArgNo) {
894     // Skip arguments not required to be ICE's.
895     if ((ICEArguments & (1 << ArgNo)) == 0) continue;
896
897     llvm::APSInt Result;
898     if (SemaBuiltinConstantArg(TheCall, ArgNo, Result))
899       return true;
900     ICEArguments &= ~(1 << ArgNo);
901   }
902
903   switch (BuiltinID) {
904   case Builtin::BI__builtin___CFStringMakeConstantString:
905     assert(TheCall->getNumArgs() == 1 &&
906            "Wrong # arguments to builtin CFStringMakeConstantString");
907     if (CheckObjCString(TheCall->getArg(0)))
908       return ExprError();
909     break;
910   case Builtin::BI__builtin_ms_va_start:
911   case Builtin::BI__builtin_stdarg_start:
912   case Builtin::BI__builtin_va_start:
913     if (SemaBuiltinVAStart(BuiltinID, TheCall))
914       return ExprError();
915     break;
916   case Builtin::BI__va_start: {
917     switch (Context.getTargetInfo().getTriple().getArch()) {
918     case llvm::Triple::arm:
919     case llvm::Triple::thumb:
920       if (SemaBuiltinVAStartARMMicrosoft(TheCall))
921         return ExprError();
922       break;
923     default:
924       if (SemaBuiltinVAStart(BuiltinID, TheCall))
925         return ExprError();
926       break;
927     }
928     break;
929   }
930
931   // The acquire, release, and no fence variants are ARM and AArch64 only.
932   case Builtin::BI_interlockedbittestandset_acq:
933   case Builtin::BI_interlockedbittestandset_rel:
934   case Builtin::BI_interlockedbittestandset_nf:
935   case Builtin::BI_interlockedbittestandreset_acq:
936   case Builtin::BI_interlockedbittestandreset_rel:
937   case Builtin::BI_interlockedbittestandreset_nf:
938     if (CheckBuiltinTargetSupport(
939             *this, BuiltinID, TheCall,
940             {llvm::Triple::arm, llvm::Triple::thumb, llvm::Triple::aarch64}))
941       return ExprError();
942     break;
943
944   // The 64-bit bittest variants are x64, ARM, and AArch64 only.
945   case Builtin::BI_bittest64:
946   case Builtin::BI_bittestandcomplement64:
947   case Builtin::BI_bittestandreset64:
948   case Builtin::BI_bittestandset64:
949   case Builtin::BI_interlockedbittestandreset64:
950   case Builtin::BI_interlockedbittestandset64:
951     if (CheckBuiltinTargetSupport(*this, BuiltinID, TheCall,
952                                   {llvm::Triple::x86_64, llvm::Triple::arm,
953                                    llvm::Triple::thumb, llvm::Triple::aarch64}))
954       return ExprError();
955     break;
956
957   case Builtin::BI__builtin_isgreater:
958   case Builtin::BI__builtin_isgreaterequal:
959   case Builtin::BI__builtin_isless:
960   case Builtin::BI__builtin_islessequal:
961   case Builtin::BI__builtin_islessgreater:
962   case Builtin::BI__builtin_isunordered:
963     if (SemaBuiltinUnorderedCompare(TheCall))
964       return ExprError();
965     break;
966   case Builtin::BI__builtin_fpclassify:
967     if (SemaBuiltinFPClassification(TheCall, 6))
968       return ExprError();
969     break;
970   case Builtin::BI__builtin_isfinite:
971   case Builtin::BI__builtin_isinf:
972   case Builtin::BI__builtin_isinf_sign:
973   case Builtin::BI__builtin_isnan:
974   case Builtin::BI__builtin_isnormal:
975   case Builtin::BI__builtin_signbit:
976   case Builtin::BI__builtin_signbitf:
977   case Builtin::BI__builtin_signbitl:
978     if (SemaBuiltinFPClassification(TheCall, 1))
979       return ExprError();
980     break;
981   case Builtin::BI__builtin_shufflevector:
982     return SemaBuiltinShuffleVector(TheCall);
983     // TheCall will be freed by the smart pointer here, but that's fine, since
984     // SemaBuiltinShuffleVector guts it, but then doesn't release it.
985   case Builtin::BI__builtin_prefetch:
986     if (SemaBuiltinPrefetch(TheCall))
987       return ExprError();
988     break;
989   case Builtin::BI__builtin_alloca_with_align:
990     if (SemaBuiltinAllocaWithAlign(TheCall))
991       return ExprError();
992     break;
993   case Builtin::BI__assume:
994   case Builtin::BI__builtin_assume:
995     if (SemaBuiltinAssume(TheCall))
996       return ExprError();
997     break;
998   case Builtin::BI__builtin_assume_aligned:
999     if (SemaBuiltinAssumeAligned(TheCall))
1000       return ExprError();
1001     break;
1002   case Builtin::BI__builtin_object_size:
1003     if (SemaBuiltinConstantArgRange(TheCall, 1, 0, 3))
1004       return ExprError();
1005     break;
1006   case Builtin::BI__builtin_longjmp:
1007     if (SemaBuiltinLongjmp(TheCall))
1008       return ExprError();
1009     break;
1010   case Builtin::BI__builtin_setjmp:
1011     if (SemaBuiltinSetjmp(TheCall))
1012       return ExprError();
1013     break;
1014   case Builtin::BI_setjmp:
1015   case Builtin::BI_setjmpex:
1016     if (checkArgCount(*this, TheCall, 1))
1017       return true;
1018     break;
1019   case Builtin::BI__builtin_classify_type:
1020     if (checkArgCount(*this, TheCall, 1)) return true;
1021     TheCall->setType(Context.IntTy);
1022     break;
1023   case Builtin::BI__builtin_constant_p:
1024     if (checkArgCount(*this, TheCall, 1)) return true;
1025     TheCall->setType(Context.IntTy);
1026     break;
1027   case Builtin::BI__sync_fetch_and_add:
1028   case Builtin::BI__sync_fetch_and_add_1:
1029   case Builtin::BI__sync_fetch_and_add_2:
1030   case Builtin::BI__sync_fetch_and_add_4:
1031   case Builtin::BI__sync_fetch_and_add_8:
1032   case Builtin::BI__sync_fetch_and_add_16:
1033   case Builtin::BI__sync_fetch_and_sub:
1034   case Builtin::BI__sync_fetch_and_sub_1:
1035   case Builtin::BI__sync_fetch_and_sub_2:
1036   case Builtin::BI__sync_fetch_and_sub_4:
1037   case Builtin::BI__sync_fetch_and_sub_8:
1038   case Builtin::BI__sync_fetch_and_sub_16:
1039   case Builtin::BI__sync_fetch_and_or:
1040   case Builtin::BI__sync_fetch_and_or_1:
1041   case Builtin::BI__sync_fetch_and_or_2:
1042   case Builtin::BI__sync_fetch_and_or_4:
1043   case Builtin::BI__sync_fetch_and_or_8:
1044   case Builtin::BI__sync_fetch_and_or_16:
1045   case Builtin::BI__sync_fetch_and_and:
1046   case Builtin::BI__sync_fetch_and_and_1:
1047   case Builtin::BI__sync_fetch_and_and_2:
1048   case Builtin::BI__sync_fetch_and_and_4:
1049   case Builtin::BI__sync_fetch_and_and_8:
1050   case Builtin::BI__sync_fetch_and_and_16:
1051   case Builtin::BI__sync_fetch_and_xor:
1052   case Builtin::BI__sync_fetch_and_xor_1:
1053   case Builtin::BI__sync_fetch_and_xor_2:
1054   case Builtin::BI__sync_fetch_and_xor_4:
1055   case Builtin::BI__sync_fetch_and_xor_8:
1056   case Builtin::BI__sync_fetch_and_xor_16:
1057   case Builtin::BI__sync_fetch_and_nand:
1058   case Builtin::BI__sync_fetch_and_nand_1:
1059   case Builtin::BI__sync_fetch_and_nand_2:
1060   case Builtin::BI__sync_fetch_and_nand_4:
1061   case Builtin::BI__sync_fetch_and_nand_8:
1062   case Builtin::BI__sync_fetch_and_nand_16:
1063   case Builtin::BI__sync_add_and_fetch:
1064   case Builtin::BI__sync_add_and_fetch_1:
1065   case Builtin::BI__sync_add_and_fetch_2:
1066   case Builtin::BI__sync_add_and_fetch_4:
1067   case Builtin::BI__sync_add_and_fetch_8:
1068   case Builtin::BI__sync_add_and_fetch_16:
1069   case Builtin::BI__sync_sub_and_fetch:
1070   case Builtin::BI__sync_sub_and_fetch_1:
1071   case Builtin::BI__sync_sub_and_fetch_2:
1072   case Builtin::BI__sync_sub_and_fetch_4:
1073   case Builtin::BI__sync_sub_and_fetch_8:
1074   case Builtin::BI__sync_sub_and_fetch_16:
1075   case Builtin::BI__sync_and_and_fetch:
1076   case Builtin::BI__sync_and_and_fetch_1:
1077   case Builtin::BI__sync_and_and_fetch_2:
1078   case Builtin::BI__sync_and_and_fetch_4:
1079   case Builtin::BI__sync_and_and_fetch_8:
1080   case Builtin::BI__sync_and_and_fetch_16:
1081   case Builtin::BI__sync_or_and_fetch:
1082   case Builtin::BI__sync_or_and_fetch_1:
1083   case Builtin::BI__sync_or_and_fetch_2:
1084   case Builtin::BI__sync_or_and_fetch_4:
1085   case Builtin::BI__sync_or_and_fetch_8:
1086   case Builtin::BI__sync_or_and_fetch_16:
1087   case Builtin::BI__sync_xor_and_fetch:
1088   case Builtin::BI__sync_xor_and_fetch_1:
1089   case Builtin::BI__sync_xor_and_fetch_2:
1090   case Builtin::BI__sync_xor_and_fetch_4:
1091   case Builtin::BI__sync_xor_and_fetch_8:
1092   case Builtin::BI__sync_xor_and_fetch_16:
1093   case Builtin::BI__sync_nand_and_fetch:
1094   case Builtin::BI__sync_nand_and_fetch_1:
1095   case Builtin::BI__sync_nand_and_fetch_2:
1096   case Builtin::BI__sync_nand_and_fetch_4:
1097   case Builtin::BI__sync_nand_and_fetch_8:
1098   case Builtin::BI__sync_nand_and_fetch_16:
1099   case Builtin::BI__sync_val_compare_and_swap:
1100   case Builtin::BI__sync_val_compare_and_swap_1:
1101   case Builtin::BI__sync_val_compare_and_swap_2:
1102   case Builtin::BI__sync_val_compare_and_swap_4:
1103   case Builtin::BI__sync_val_compare_and_swap_8:
1104   case Builtin::BI__sync_val_compare_and_swap_16:
1105   case Builtin::BI__sync_bool_compare_and_swap:
1106   case Builtin::BI__sync_bool_compare_and_swap_1:
1107   case Builtin::BI__sync_bool_compare_and_swap_2:
1108   case Builtin::BI__sync_bool_compare_and_swap_4:
1109   case Builtin::BI__sync_bool_compare_and_swap_8:
1110   case Builtin::BI__sync_bool_compare_and_swap_16:
1111   case Builtin::BI__sync_lock_test_and_set:
1112   case Builtin::BI__sync_lock_test_and_set_1:
1113   case Builtin::BI__sync_lock_test_and_set_2:
1114   case Builtin::BI__sync_lock_test_and_set_4:
1115   case Builtin::BI__sync_lock_test_and_set_8:
1116   case Builtin::BI__sync_lock_test_and_set_16:
1117   case Builtin::BI__sync_lock_release:
1118   case Builtin::BI__sync_lock_release_1:
1119   case Builtin::BI__sync_lock_release_2:
1120   case Builtin::BI__sync_lock_release_4:
1121   case Builtin::BI__sync_lock_release_8:
1122   case Builtin::BI__sync_lock_release_16:
1123   case Builtin::BI__sync_swap:
1124   case Builtin::BI__sync_swap_1:
1125   case Builtin::BI__sync_swap_2:
1126   case Builtin::BI__sync_swap_4:
1127   case Builtin::BI__sync_swap_8:
1128   case Builtin::BI__sync_swap_16:
1129     return SemaBuiltinAtomicOverloaded(TheCallResult);
1130   case Builtin::BI__builtin_nontemporal_load:
1131   case Builtin::BI__builtin_nontemporal_store:
1132     return SemaBuiltinNontemporalOverloaded(TheCallResult);
1133 #define BUILTIN(ID, TYPE, ATTRS)
1134 #define ATOMIC_BUILTIN(ID, TYPE, ATTRS) \
1135   case Builtin::BI##ID: \
1136     return SemaAtomicOpsOverloaded(TheCallResult, AtomicExpr::AO##ID);
1137 #include "clang/Basic/Builtins.def"
1138   case Builtin::BI__annotation:
1139     if (SemaBuiltinMSVCAnnotation(*this, TheCall))
1140       return ExprError();
1141     break;
1142   case Builtin::BI__builtin_annotation:
1143     if (SemaBuiltinAnnotation(*this, TheCall))
1144       return ExprError();
1145     break;
1146   case Builtin::BI__builtin_addressof:
1147     if (SemaBuiltinAddressof(*this, TheCall))
1148       return ExprError();
1149     break;
1150   case Builtin::BI__builtin_add_overflow:
1151   case Builtin::BI__builtin_sub_overflow:
1152   case Builtin::BI__builtin_mul_overflow:
1153     if (SemaBuiltinOverflow(*this, TheCall))
1154       return ExprError();
1155     break;
1156   case Builtin::BI__builtin_operator_new:
1157   case Builtin::BI__builtin_operator_delete: {
1158     bool IsDelete = BuiltinID == Builtin::BI__builtin_operator_delete;
1159     ExprResult Res =
1160         SemaBuiltinOperatorNewDeleteOverloaded(TheCallResult, IsDelete);
1161     if (Res.isInvalid())
1162       CorrectDelayedTyposInExpr(TheCallResult.get());
1163     return Res;
1164   }
1165   case Builtin::BI__builtin_dump_struct: {
1166     // We first want to ensure we are called with 2 arguments
1167     if (checkArgCount(*this, TheCall, 2))
1168       return ExprError();
1169     // Ensure that the first argument is of type 'struct XX *'
1170     const Expr *PtrArg = TheCall->getArg(0)->IgnoreParenImpCasts();
1171     const QualType PtrArgType = PtrArg->getType();
1172     if (!PtrArgType->isPointerType() ||
1173         !PtrArgType->getPointeeType()->isRecordType()) {
1174       Diag(PtrArg->getLocStart(), diag::err_typecheck_convert_incompatible)
1175           << PtrArgType << "structure pointer" << 1 << 0 << 3 << 1 << PtrArgType
1176           << "structure pointer";
1177       return ExprError();
1178     }
1179
1180     // Ensure that the second argument is of type 'FunctionType'
1181     const Expr *FnPtrArg = TheCall->getArg(1)->IgnoreImpCasts();
1182     const QualType FnPtrArgType = FnPtrArg->getType();
1183     if (!FnPtrArgType->isPointerType()) {
1184       Diag(FnPtrArg->getLocStart(), diag::err_typecheck_convert_incompatible)
1185           << FnPtrArgType << "'int (*)(const char *, ...)'" << 1 << 0 << 3
1186           << 2 << FnPtrArgType << "'int (*)(const char *, ...)'";
1187       return ExprError();
1188     }
1189
1190     const auto *FuncType =
1191         FnPtrArgType->getPointeeType()->getAs<FunctionType>();
1192
1193     if (!FuncType) {
1194       Diag(FnPtrArg->getLocStart(), diag::err_typecheck_convert_incompatible)
1195           << FnPtrArgType << "'int (*)(const char *, ...)'" << 1 << 0 << 3
1196           << 2 << FnPtrArgType << "'int (*)(const char *, ...)'";
1197       return ExprError();
1198     }
1199
1200     if (const auto *FT = dyn_cast<FunctionProtoType>(FuncType)) {
1201       if (!FT->getNumParams()) {
1202         Diag(FnPtrArg->getLocStart(), diag::err_typecheck_convert_incompatible)
1203             << FnPtrArgType << "'int (*)(const char *, ...)'" << 1 << 0 << 3
1204             << 2 << FnPtrArgType << "'int (*)(const char *, ...)'";
1205         return ExprError();
1206       }
1207       QualType PT = FT->getParamType(0);
1208       if (!FT->isVariadic() || FT->getReturnType() != Context.IntTy ||
1209           !PT->isPointerType() || !PT->getPointeeType()->isCharType() ||
1210           !PT->getPointeeType().isConstQualified()) {
1211         Diag(FnPtrArg->getLocStart(), diag::err_typecheck_convert_incompatible)
1212             << FnPtrArgType << "'int (*)(const char *, ...)'" << 1 << 0 << 3
1213             << 2 << FnPtrArgType << "'int (*)(const char *, ...)'";
1214         return ExprError();
1215       }
1216     }
1217
1218     TheCall->setType(Context.IntTy);
1219     break;
1220   }
1221
1222   // check secure string manipulation functions where overflows
1223   // are detectable at compile time
1224   case Builtin::BI__builtin___memcpy_chk:
1225   case Builtin::BI__builtin___memmove_chk:
1226   case Builtin::BI__builtin___memset_chk:
1227   case Builtin::BI__builtin___strlcat_chk:
1228   case Builtin::BI__builtin___strlcpy_chk:
1229   case Builtin::BI__builtin___strncat_chk:
1230   case Builtin::BI__builtin___strncpy_chk:
1231   case Builtin::BI__builtin___stpncpy_chk:
1232     SemaBuiltinMemChkCall(*this, FDecl, TheCall, 2, 3);
1233     break;
1234   case Builtin::BI__builtin___memccpy_chk:
1235     SemaBuiltinMemChkCall(*this, FDecl, TheCall, 3, 4);
1236     break;
1237   case Builtin::BI__builtin___snprintf_chk:
1238   case Builtin::BI__builtin___vsnprintf_chk:
1239     SemaBuiltinMemChkCall(*this, FDecl, TheCall, 1, 3);
1240     break;
1241   case Builtin::BI__builtin_call_with_static_chain:
1242     if (SemaBuiltinCallWithStaticChain(*this, TheCall))
1243       return ExprError();
1244     break;
1245   case Builtin::BI__exception_code:
1246   case Builtin::BI_exception_code:
1247     if (SemaBuiltinSEHScopeCheck(*this, TheCall, Scope::SEHExceptScope,
1248                                  diag::err_seh___except_block))
1249       return ExprError();
1250     break;
1251   case Builtin::BI__exception_info:
1252   case Builtin::BI_exception_info:
1253     if (SemaBuiltinSEHScopeCheck(*this, TheCall, Scope::SEHFilterScope,
1254                                  diag::err_seh___except_filter))
1255       return ExprError();
1256     break;
1257   case Builtin::BI__GetExceptionInfo:
1258     if (checkArgCount(*this, TheCall, 1))
1259       return ExprError();
1260
1261     if (CheckCXXThrowOperand(
1262             TheCall->getLocStart(),
1263             Context.getExceptionObjectType(FDecl->getParamDecl(0)->getType()),
1264             TheCall))
1265       return ExprError();
1266
1267     TheCall->setType(Context.VoidPtrTy);
1268     break;
1269   // OpenCL v2.0, s6.13.16 - Pipe functions
1270   case Builtin::BIread_pipe:
1271   case Builtin::BIwrite_pipe:
1272     // Since those two functions are declared with var args, we need a semantic
1273     // check for the argument.
1274     if (SemaBuiltinRWPipe(*this, TheCall))
1275       return ExprError();
1276     TheCall->setType(Context.IntTy);
1277     break;
1278   case Builtin::BIreserve_read_pipe:
1279   case Builtin::BIreserve_write_pipe:
1280   case Builtin::BIwork_group_reserve_read_pipe:
1281   case Builtin::BIwork_group_reserve_write_pipe:
1282     if (SemaBuiltinReserveRWPipe(*this, TheCall))
1283       return ExprError();
1284     break;
1285   case Builtin::BIsub_group_reserve_read_pipe:
1286   case Builtin::BIsub_group_reserve_write_pipe:
1287     if (checkOpenCLSubgroupExt(*this, TheCall) ||
1288         SemaBuiltinReserveRWPipe(*this, TheCall))
1289       return ExprError();
1290     break;
1291   case Builtin::BIcommit_read_pipe:
1292   case Builtin::BIcommit_write_pipe:
1293   case Builtin::BIwork_group_commit_read_pipe:
1294   case Builtin::BIwork_group_commit_write_pipe:
1295     if (SemaBuiltinCommitRWPipe(*this, TheCall))
1296       return ExprError();
1297     break;
1298   case Builtin::BIsub_group_commit_read_pipe:
1299   case Builtin::BIsub_group_commit_write_pipe:
1300     if (checkOpenCLSubgroupExt(*this, TheCall) ||
1301         SemaBuiltinCommitRWPipe(*this, TheCall))
1302       return ExprError();
1303     break;
1304   case Builtin::BIget_pipe_num_packets:
1305   case Builtin::BIget_pipe_max_packets:
1306     if (SemaBuiltinPipePackets(*this, TheCall))
1307       return ExprError();
1308     TheCall->setType(Context.UnsignedIntTy);
1309     break;
1310   case Builtin::BIto_global:
1311   case Builtin::BIto_local:
1312   case Builtin::BIto_private:
1313     if (SemaOpenCLBuiltinToAddr(*this, BuiltinID, TheCall))
1314       return ExprError();
1315     break;
1316   // OpenCL v2.0, s6.13.17 - Enqueue kernel functions.
1317   case Builtin::BIenqueue_kernel:
1318     if (SemaOpenCLBuiltinEnqueueKernel(*this, TheCall))
1319       return ExprError();
1320     break;
1321   case Builtin::BIget_kernel_work_group_size:
1322   case Builtin::BIget_kernel_preferred_work_group_size_multiple:
1323     if (SemaOpenCLBuiltinKernelWorkGroupSize(*this, TheCall))
1324       return ExprError();
1325     break;
1326   case Builtin::BIget_kernel_max_sub_group_size_for_ndrange:
1327   case Builtin::BIget_kernel_sub_group_count_for_ndrange:
1328     if (SemaOpenCLBuiltinNDRangeAndBlock(*this, TheCall))
1329       return ExprError();
1330     break;
1331   case Builtin::BI__builtin_os_log_format:
1332   case Builtin::BI__builtin_os_log_format_buffer_size:
1333     if (SemaBuiltinOSLogFormat(TheCall))
1334       return ExprError();
1335     break;
1336   }
1337
1338   // Since the target specific builtins for each arch overlap, only check those
1339   // of the arch we are compiling for.
1340   if (Context.BuiltinInfo.isTSBuiltin(BuiltinID)) {
1341     switch (Context.getTargetInfo().getTriple().getArch()) {
1342       case llvm::Triple::arm:
1343       case llvm::Triple::armeb:
1344       case llvm::Triple::thumb:
1345       case llvm::Triple::thumbeb:
1346         if (CheckARMBuiltinFunctionCall(BuiltinID, TheCall))
1347           return ExprError();
1348         break;
1349       case llvm::Triple::aarch64:
1350       case llvm::Triple::aarch64_be:
1351         if (CheckAArch64BuiltinFunctionCall(BuiltinID, TheCall))
1352           return ExprError();
1353         break;
1354       case llvm::Triple::hexagon:
1355         if (CheckHexagonBuiltinFunctionCall(BuiltinID, TheCall))
1356           return ExprError();
1357         break;
1358       case llvm::Triple::mips:
1359       case llvm::Triple::mipsel:
1360       case llvm::Triple::mips64:
1361       case llvm::Triple::mips64el:
1362         if (CheckMipsBuiltinFunctionCall(BuiltinID, TheCall))
1363           return ExprError();
1364         break;
1365       case llvm::Triple::systemz:
1366         if (CheckSystemZBuiltinFunctionCall(BuiltinID, TheCall))
1367           return ExprError();
1368         break;
1369       case llvm::Triple::x86:
1370       case llvm::Triple::x86_64:
1371         if (CheckX86BuiltinFunctionCall(BuiltinID, TheCall))
1372           return ExprError();
1373         break;
1374       case llvm::Triple::ppc:
1375       case llvm::Triple::ppc64:
1376       case llvm::Triple::ppc64le:
1377         if (CheckPPCBuiltinFunctionCall(BuiltinID, TheCall))
1378           return ExprError();
1379         break;
1380       default:
1381         break;
1382     }
1383   }
1384
1385   return TheCallResult;
1386 }
1387
1388 // Get the valid immediate range for the specified NEON type code.
1389 static unsigned RFT(unsigned t, bool shift = false, bool ForceQuad = false) {
1390   NeonTypeFlags Type(t);
1391   int IsQuad = ForceQuad ? true : Type.isQuad();
1392   switch (Type.getEltType()) {
1393   case NeonTypeFlags::Int8:
1394   case NeonTypeFlags::Poly8:
1395     return shift ? 7 : (8 << IsQuad) - 1;
1396   case NeonTypeFlags::Int16:
1397   case NeonTypeFlags::Poly16:
1398     return shift ? 15 : (4 << IsQuad) - 1;
1399   case NeonTypeFlags::Int32:
1400     return shift ? 31 : (2 << IsQuad) - 1;
1401   case NeonTypeFlags::Int64:
1402   case NeonTypeFlags::Poly64:
1403     return shift ? 63 : (1 << IsQuad) - 1;
1404   case NeonTypeFlags::Poly128:
1405     return shift ? 127 : (1 << IsQuad) - 1;
1406   case NeonTypeFlags::Float16:
1407     assert(!shift && "cannot shift float types!");
1408     return (4 << IsQuad) - 1;
1409   case NeonTypeFlags::Float32:
1410     assert(!shift && "cannot shift float types!");
1411     return (2 << IsQuad) - 1;
1412   case NeonTypeFlags::Float64:
1413     assert(!shift && "cannot shift float types!");
1414     return (1 << IsQuad) - 1;
1415   }
1416   llvm_unreachable("Invalid NeonTypeFlag!");
1417 }
1418
1419 /// getNeonEltType - Return the QualType corresponding to the elements of
1420 /// the vector type specified by the NeonTypeFlags.  This is used to check
1421 /// the pointer arguments for Neon load/store intrinsics.
1422 static QualType getNeonEltType(NeonTypeFlags Flags, ASTContext &Context,
1423                                bool IsPolyUnsigned, bool IsInt64Long) {
1424   switch (Flags.getEltType()) {
1425   case NeonTypeFlags::Int8:
1426     return Flags.isUnsigned() ? Context.UnsignedCharTy : Context.SignedCharTy;
1427   case NeonTypeFlags::Int16:
1428     return Flags.isUnsigned() ? Context.UnsignedShortTy : Context.ShortTy;
1429   case NeonTypeFlags::Int32:
1430     return Flags.isUnsigned() ? Context.UnsignedIntTy : Context.IntTy;
1431   case NeonTypeFlags::Int64:
1432     if (IsInt64Long)
1433       return Flags.isUnsigned() ? Context.UnsignedLongTy : Context.LongTy;
1434     else
1435       return Flags.isUnsigned() ? Context.UnsignedLongLongTy
1436                                 : Context.LongLongTy;
1437   case NeonTypeFlags::Poly8:
1438     return IsPolyUnsigned ? Context.UnsignedCharTy : Context.SignedCharTy;
1439   case NeonTypeFlags::Poly16:
1440     return IsPolyUnsigned ? Context.UnsignedShortTy : Context.ShortTy;
1441   case NeonTypeFlags::Poly64:
1442     if (IsInt64Long)
1443       return Context.UnsignedLongTy;
1444     else
1445       return Context.UnsignedLongLongTy;
1446   case NeonTypeFlags::Poly128:
1447     break;
1448   case NeonTypeFlags::Float16:
1449     return Context.HalfTy;
1450   case NeonTypeFlags::Float32:
1451     return Context.FloatTy;
1452   case NeonTypeFlags::Float64:
1453     return Context.DoubleTy;
1454   }
1455   llvm_unreachable("Invalid NeonTypeFlag!");
1456 }
1457
1458 bool Sema::CheckNeonBuiltinFunctionCall(unsigned BuiltinID, CallExpr *TheCall) {
1459   llvm::APSInt Result;
1460   uint64_t mask = 0;
1461   unsigned TV = 0;
1462   int PtrArgNum = -1;
1463   bool HasConstPtr = false;
1464   switch (BuiltinID) {
1465 #define GET_NEON_OVERLOAD_CHECK
1466 #include "clang/Basic/arm_neon.inc"
1467 #include "clang/Basic/arm_fp16.inc"
1468 #undef GET_NEON_OVERLOAD_CHECK
1469   }
1470
1471   // For NEON intrinsics which are overloaded on vector element type, validate
1472   // the immediate which specifies which variant to emit.
1473   unsigned ImmArg = TheCall->getNumArgs()-1;
1474   if (mask) {
1475     if (SemaBuiltinConstantArg(TheCall, ImmArg, Result))
1476       return true;
1477
1478     TV = Result.getLimitedValue(64);
1479     if ((TV > 63) || (mask & (1ULL << TV)) == 0)
1480       return Diag(TheCall->getLocStart(), diag::err_invalid_neon_type_code)
1481         << TheCall->getArg(ImmArg)->getSourceRange();
1482   }
1483
1484   if (PtrArgNum >= 0) {
1485     // Check that pointer arguments have the specified type.
1486     Expr *Arg = TheCall->getArg(PtrArgNum);
1487     if (ImplicitCastExpr *ICE = dyn_cast<ImplicitCastExpr>(Arg))
1488       Arg = ICE->getSubExpr();
1489     ExprResult RHS = DefaultFunctionArrayLvalueConversion(Arg);
1490     QualType RHSTy = RHS.get()->getType();
1491
1492     llvm::Triple::ArchType Arch = Context.getTargetInfo().getTriple().getArch();
1493     bool IsPolyUnsigned = Arch == llvm::Triple::aarch64 ||
1494                           Arch == llvm::Triple::aarch64_be;
1495     bool IsInt64Long =
1496         Context.getTargetInfo().getInt64Type() == TargetInfo::SignedLong;
1497     QualType EltTy =
1498         getNeonEltType(NeonTypeFlags(TV), Context, IsPolyUnsigned, IsInt64Long);
1499     if (HasConstPtr)
1500       EltTy = EltTy.withConst();
1501     QualType LHSTy = Context.getPointerType(EltTy);
1502     AssignConvertType ConvTy;
1503     ConvTy = CheckSingleAssignmentConstraints(LHSTy, RHS);
1504     if (RHS.isInvalid())
1505       return true;
1506     if (DiagnoseAssignmentResult(ConvTy, Arg->getLocStart(), LHSTy, RHSTy,
1507                                  RHS.get(), AA_Assigning))
1508       return true;
1509   }
1510
1511   // For NEON intrinsics which take an immediate value as part of the
1512   // instruction, range check them here.
1513   unsigned i = 0, l = 0, u = 0;
1514   switch (BuiltinID) {
1515   default:
1516     return false;
1517   #define GET_NEON_IMMEDIATE_CHECK
1518   #include "clang/Basic/arm_neon.inc"
1519   #include "clang/Basic/arm_fp16.inc"
1520   #undef GET_NEON_IMMEDIATE_CHECK
1521   }
1522
1523   return SemaBuiltinConstantArgRange(TheCall, i, l, u + l);
1524 }
1525
1526 bool Sema::CheckARMBuiltinExclusiveCall(unsigned BuiltinID, CallExpr *TheCall,
1527                                         unsigned MaxWidth) {
1528   assert((BuiltinID == ARM::BI__builtin_arm_ldrex ||
1529           BuiltinID == ARM::BI__builtin_arm_ldaex ||
1530           BuiltinID == ARM::BI__builtin_arm_strex ||
1531           BuiltinID == ARM::BI__builtin_arm_stlex ||
1532           BuiltinID == AArch64::BI__builtin_arm_ldrex ||
1533           BuiltinID == AArch64::BI__builtin_arm_ldaex ||
1534           BuiltinID == AArch64::BI__builtin_arm_strex ||
1535           BuiltinID == AArch64::BI__builtin_arm_stlex) &&
1536          "unexpected ARM builtin");
1537   bool IsLdrex = BuiltinID == ARM::BI__builtin_arm_ldrex ||
1538                  BuiltinID == ARM::BI__builtin_arm_ldaex ||
1539                  BuiltinID == AArch64::BI__builtin_arm_ldrex ||
1540                  BuiltinID == AArch64::BI__builtin_arm_ldaex;
1541
1542   DeclRefExpr *DRE =cast<DeclRefExpr>(TheCall->getCallee()->IgnoreParenCasts());
1543
1544   // Ensure that we have the proper number of arguments.
1545   if (checkArgCount(*this, TheCall, IsLdrex ? 1 : 2))
1546     return true;
1547
1548   // Inspect the pointer argument of the atomic builtin.  This should always be
1549   // a pointer type, whose element is an integral scalar or pointer type.
1550   // Because it is a pointer type, we don't have to worry about any implicit
1551   // casts here.
1552   Expr *PointerArg = TheCall->getArg(IsLdrex ? 0 : 1);
1553   ExprResult PointerArgRes = DefaultFunctionArrayLvalueConversion(PointerArg);
1554   if (PointerArgRes.isInvalid())
1555     return true;
1556   PointerArg = PointerArgRes.get();
1557
1558   const PointerType *pointerType = PointerArg->getType()->getAs<PointerType>();
1559   if (!pointerType) {
1560     Diag(DRE->getLocStart(), diag::err_atomic_builtin_must_be_pointer)
1561       << PointerArg->getType() << PointerArg->getSourceRange();
1562     return true;
1563   }
1564
1565   // ldrex takes a "const volatile T*" and strex takes a "volatile T*". Our next
1566   // task is to insert the appropriate casts into the AST. First work out just
1567   // what the appropriate type is.
1568   QualType ValType = pointerType->getPointeeType();
1569   QualType AddrType = ValType.getUnqualifiedType().withVolatile();
1570   if (IsLdrex)
1571     AddrType.addConst();
1572
1573   // Issue a warning if the cast is dodgy.
1574   CastKind CastNeeded = CK_NoOp;
1575   if (!AddrType.isAtLeastAsQualifiedAs(ValType)) {
1576     CastNeeded = CK_BitCast;
1577     Diag(DRE->getLocStart(), diag::ext_typecheck_convert_discards_qualifiers)
1578       << PointerArg->getType()
1579       << Context.getPointerType(AddrType)
1580       << AA_Passing << PointerArg->getSourceRange();
1581   }
1582
1583   // Finally, do the cast and replace the argument with the corrected version.
1584   AddrType = Context.getPointerType(AddrType);
1585   PointerArgRes = ImpCastExprToType(PointerArg, AddrType, CastNeeded);
1586   if (PointerArgRes.isInvalid())
1587     return true;
1588   PointerArg = PointerArgRes.get();
1589
1590   TheCall->setArg(IsLdrex ? 0 : 1, PointerArg);
1591
1592   // In general, we allow ints, floats and pointers to be loaded and stored.
1593   if (!ValType->isIntegerType() && !ValType->isAnyPointerType() &&
1594       !ValType->isBlockPointerType() && !ValType->isFloatingType()) {
1595     Diag(DRE->getLocStart(), diag::err_atomic_builtin_must_be_pointer_intfltptr)
1596       << PointerArg->getType() << PointerArg->getSourceRange();
1597     return true;
1598   }
1599
1600   // But ARM doesn't have instructions to deal with 128-bit versions.
1601   if (Context.getTypeSize(ValType) > MaxWidth) {
1602     assert(MaxWidth == 64 && "Diagnostic unexpectedly inaccurate");
1603     Diag(DRE->getLocStart(), diag::err_atomic_exclusive_builtin_pointer_size)
1604       << PointerArg->getType() << PointerArg->getSourceRange();
1605     return true;
1606   }
1607
1608   switch (ValType.getObjCLifetime()) {
1609   case Qualifiers::OCL_None:
1610   case Qualifiers::OCL_ExplicitNone:
1611     // okay
1612     break;
1613
1614   case Qualifiers::OCL_Weak:
1615   case Qualifiers::OCL_Strong:
1616   case Qualifiers::OCL_Autoreleasing:
1617     Diag(DRE->getLocStart(), diag::err_arc_atomic_ownership)
1618       << ValType << PointerArg->getSourceRange();
1619     return true;
1620   }
1621
1622   if (IsLdrex) {
1623     TheCall->setType(ValType);
1624     return false;
1625   }
1626
1627   // Initialize the argument to be stored.
1628   ExprResult ValArg = TheCall->getArg(0);
1629   InitializedEntity Entity = InitializedEntity::InitializeParameter(
1630       Context, ValType, /*consume*/ false);
1631   ValArg = PerformCopyInitialization(Entity, SourceLocation(), ValArg);
1632   if (ValArg.isInvalid())
1633     return true;
1634   TheCall->setArg(0, ValArg.get());
1635
1636   // __builtin_arm_strex always returns an int. It's marked as such in the .def,
1637   // but the custom checker bypasses all default analysis.
1638   TheCall->setType(Context.IntTy);
1639   return false;
1640 }
1641
1642 bool Sema::CheckARMBuiltinFunctionCall(unsigned BuiltinID, CallExpr *TheCall) {
1643   if (BuiltinID == ARM::BI__builtin_arm_ldrex ||
1644       BuiltinID == ARM::BI__builtin_arm_ldaex ||
1645       BuiltinID == ARM::BI__builtin_arm_strex ||
1646       BuiltinID == ARM::BI__builtin_arm_stlex) {
1647     return CheckARMBuiltinExclusiveCall(BuiltinID, TheCall, 64);
1648   }
1649
1650   if (BuiltinID == ARM::BI__builtin_arm_prefetch) {
1651     return SemaBuiltinConstantArgRange(TheCall, 1, 0, 1) ||
1652       SemaBuiltinConstantArgRange(TheCall, 2, 0, 1);
1653   }
1654
1655   if (BuiltinID == ARM::BI__builtin_arm_rsr64 ||
1656       BuiltinID == ARM::BI__builtin_arm_wsr64)
1657     return SemaBuiltinARMSpecialReg(BuiltinID, TheCall, 0, 3, false);
1658
1659   if (BuiltinID == ARM::BI__builtin_arm_rsr ||
1660       BuiltinID == ARM::BI__builtin_arm_rsrp ||
1661       BuiltinID == ARM::BI__builtin_arm_wsr ||
1662       BuiltinID == ARM::BI__builtin_arm_wsrp)
1663     return SemaBuiltinARMSpecialReg(BuiltinID, TheCall, 0, 5, true);
1664
1665   if (CheckNeonBuiltinFunctionCall(BuiltinID, TheCall))
1666     return true;
1667
1668   // For intrinsics which take an immediate value as part of the instruction,
1669   // range check them here.
1670   // FIXME: VFP Intrinsics should error if VFP not present.
1671   switch (BuiltinID) {
1672   default: return false;
1673   case ARM::BI__builtin_arm_ssat:
1674     return SemaBuiltinConstantArgRange(TheCall, 1, 1, 32);
1675   case ARM::BI__builtin_arm_usat:
1676     return SemaBuiltinConstantArgRange(TheCall, 1, 0, 31);
1677   case ARM::BI__builtin_arm_ssat16:
1678     return SemaBuiltinConstantArgRange(TheCall, 1, 1, 16);
1679   case ARM::BI__builtin_arm_usat16:
1680     return SemaBuiltinConstantArgRange(TheCall, 1, 0, 15);
1681   case ARM::BI__builtin_arm_vcvtr_f:
1682   case ARM::BI__builtin_arm_vcvtr_d:
1683     return SemaBuiltinConstantArgRange(TheCall, 1, 0, 1);
1684   case ARM::BI__builtin_arm_dmb:
1685   case ARM::BI__builtin_arm_dsb:
1686   case ARM::BI__builtin_arm_isb:
1687   case ARM::BI__builtin_arm_dbg:
1688     return SemaBuiltinConstantArgRange(TheCall, 0, 0, 15);
1689   }
1690 }
1691
1692 bool Sema::CheckAArch64BuiltinFunctionCall(unsigned BuiltinID,
1693                                          CallExpr *TheCall) {
1694   if (BuiltinID == AArch64::BI__builtin_arm_ldrex ||
1695       BuiltinID == AArch64::BI__builtin_arm_ldaex ||
1696       BuiltinID == AArch64::BI__builtin_arm_strex ||
1697       BuiltinID == AArch64::BI__builtin_arm_stlex) {
1698     return CheckARMBuiltinExclusiveCall(BuiltinID, TheCall, 128);
1699   }
1700
1701   if (BuiltinID == AArch64::BI__builtin_arm_prefetch) {
1702     return SemaBuiltinConstantArgRange(TheCall, 1, 0, 1) ||
1703       SemaBuiltinConstantArgRange(TheCall, 2, 0, 2) ||
1704       SemaBuiltinConstantArgRange(TheCall, 3, 0, 1) ||
1705       SemaBuiltinConstantArgRange(TheCall, 4, 0, 1);
1706   }
1707
1708   if (BuiltinID == AArch64::BI__builtin_arm_rsr64 ||
1709       BuiltinID == AArch64::BI__builtin_arm_wsr64)
1710     return SemaBuiltinARMSpecialReg(BuiltinID, TheCall, 0, 5, true);
1711
1712   if (BuiltinID == AArch64::BI__builtin_arm_rsr ||
1713       BuiltinID == AArch64::BI__builtin_arm_rsrp ||
1714       BuiltinID == AArch64::BI__builtin_arm_wsr ||
1715       BuiltinID == AArch64::BI__builtin_arm_wsrp)
1716     return SemaBuiltinARMSpecialReg(BuiltinID, TheCall, 0, 5, true);
1717
1718   if (CheckNeonBuiltinFunctionCall(BuiltinID, TheCall))
1719     return true;
1720
1721   // For intrinsics which take an immediate value as part of the instruction,
1722   // range check them here.
1723   unsigned i = 0, l = 0, u = 0;
1724   switch (BuiltinID) {
1725   default: return false;
1726   case AArch64::BI__builtin_arm_dmb:
1727   case AArch64::BI__builtin_arm_dsb:
1728   case AArch64::BI__builtin_arm_isb: l = 0; u = 15; break;
1729   }
1730
1731   return SemaBuiltinConstantArgRange(TheCall, i, l, u + l);
1732 }
1733
1734 bool Sema::CheckHexagonBuiltinCpu(unsigned BuiltinID, CallExpr *TheCall) {
1735   static const std::map<unsigned, std::vector<StringRef>> ValidCPU = {
1736     { Hexagon::BI__builtin_HEXAGON_A6_vcmpbeq_notany, {"v65"} },
1737     { Hexagon::BI__builtin_HEXAGON_A6_vminub_RdP, {"v62", "v65"} },
1738     { Hexagon::BI__builtin_HEXAGON_M6_vabsdiffb, {"v62", "v65"} },
1739     { Hexagon::BI__builtin_HEXAGON_M6_vabsdiffub, {"v62", "v65"} },
1740     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_acc, {"v60", "v62", "v65"} },
1741     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_and, {"v60", "v62", "v65"} },
1742     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_nac, {"v60", "v62", "v65"} },
1743     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_or, {"v60", "v62", "v65"} },
1744     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p, {"v60", "v62", "v65"} },
1745     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_xacc, {"v60", "v62", "v65"} },
1746     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_acc, {"v60", "v62", "v65"} },
1747     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_and, {"v60", "v62", "v65"} },
1748     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_nac, {"v60", "v62", "v65"} },
1749     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_or, {"v60", "v62", "v65"} },
1750     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r, {"v60", "v62", "v65"} },
1751     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_xacc, {"v60", "v62", "v65"} },
1752     { Hexagon::BI__builtin_HEXAGON_S6_vsplatrbp, {"v62", "v65"} },
1753     { Hexagon::BI__builtin_HEXAGON_S6_vtrunehb_ppp, {"v62", "v65"} },
1754     { Hexagon::BI__builtin_HEXAGON_S6_vtrunohb_ppp, {"v62", "v65"} },
1755   };
1756
1757   static const std::map<unsigned, std::vector<StringRef>> ValidHVX = {
1758     { Hexagon::BI__builtin_HEXAGON_V6_extractw, {"v60", "v62", "v65"} },
1759     { Hexagon::BI__builtin_HEXAGON_V6_extractw_128B, {"v60", "v62", "v65"} },
1760     { Hexagon::BI__builtin_HEXAGON_V6_hi, {"v60", "v62", "v65"} },
1761     { Hexagon::BI__builtin_HEXAGON_V6_hi_128B, {"v60", "v62", "v65"} },
1762     { Hexagon::BI__builtin_HEXAGON_V6_lo, {"v60", "v62", "v65"} },
1763     { Hexagon::BI__builtin_HEXAGON_V6_lo_128B, {"v60", "v62", "v65"} },
1764     { Hexagon::BI__builtin_HEXAGON_V6_lvsplatb, {"v62", "v65"} },
1765     { Hexagon::BI__builtin_HEXAGON_V6_lvsplatb_128B, {"v62", "v65"} },
1766     { Hexagon::BI__builtin_HEXAGON_V6_lvsplath, {"v62", "v65"} },
1767     { Hexagon::BI__builtin_HEXAGON_V6_lvsplath_128B, {"v62", "v65"} },
1768     { Hexagon::BI__builtin_HEXAGON_V6_lvsplatw, {"v60", "v62", "v65"} },
1769     { Hexagon::BI__builtin_HEXAGON_V6_lvsplatw_128B, {"v60", "v62", "v65"} },
1770     { Hexagon::BI__builtin_HEXAGON_V6_pred_and, {"v60", "v62", "v65"} },
1771     { Hexagon::BI__builtin_HEXAGON_V6_pred_and_128B, {"v60", "v62", "v65"} },
1772     { Hexagon::BI__builtin_HEXAGON_V6_pred_and_n, {"v60", "v62", "v65"} },
1773     { Hexagon::BI__builtin_HEXAGON_V6_pred_and_n_128B, {"v60", "v62", "v65"} },
1774     { Hexagon::BI__builtin_HEXAGON_V6_pred_not, {"v60", "v62", "v65"} },
1775     { Hexagon::BI__builtin_HEXAGON_V6_pred_not_128B, {"v60", "v62", "v65"} },
1776     { Hexagon::BI__builtin_HEXAGON_V6_pred_or, {"v60", "v62", "v65"} },
1777     { Hexagon::BI__builtin_HEXAGON_V6_pred_or_128B, {"v60", "v62", "v65"} },
1778     { Hexagon::BI__builtin_HEXAGON_V6_pred_or_n, {"v60", "v62", "v65"} },
1779     { Hexagon::BI__builtin_HEXAGON_V6_pred_or_n_128B, {"v60", "v62", "v65"} },
1780     { Hexagon::BI__builtin_HEXAGON_V6_pred_scalar2, {"v60", "v62", "v65"} },
1781     { Hexagon::BI__builtin_HEXAGON_V6_pred_scalar2_128B, {"v60", "v62", "v65"} },
1782     { Hexagon::BI__builtin_HEXAGON_V6_pred_scalar2v2, {"v62", "v65"} },
1783     { Hexagon::BI__builtin_HEXAGON_V6_pred_scalar2v2_128B, {"v62", "v65"} },
1784     { Hexagon::BI__builtin_HEXAGON_V6_pred_xor, {"v60", "v62", "v65"} },
1785     { Hexagon::BI__builtin_HEXAGON_V6_pred_xor_128B, {"v60", "v62", "v65"} },
1786     { Hexagon::BI__builtin_HEXAGON_V6_shuffeqh, {"v62", "v65"} },
1787     { Hexagon::BI__builtin_HEXAGON_V6_shuffeqh_128B, {"v62", "v65"} },
1788     { Hexagon::BI__builtin_HEXAGON_V6_shuffeqw, {"v62", "v65"} },
1789     { Hexagon::BI__builtin_HEXAGON_V6_shuffeqw_128B, {"v62", "v65"} },
1790     { Hexagon::BI__builtin_HEXAGON_V6_vabsb, {"v65"} },
1791     { Hexagon::BI__builtin_HEXAGON_V6_vabsb_128B, {"v65"} },
1792     { Hexagon::BI__builtin_HEXAGON_V6_vabsb_sat, {"v65"} },
1793     { Hexagon::BI__builtin_HEXAGON_V6_vabsb_sat_128B, {"v65"} },
1794     { Hexagon::BI__builtin_HEXAGON_V6_vabsdiffh, {"v60", "v62", "v65"} },
1795     { Hexagon::BI__builtin_HEXAGON_V6_vabsdiffh_128B, {"v60", "v62", "v65"} },
1796     { Hexagon::BI__builtin_HEXAGON_V6_vabsdiffub, {"v60", "v62", "v65"} },
1797     { Hexagon::BI__builtin_HEXAGON_V6_vabsdiffub_128B, {"v60", "v62", "v65"} },
1798     { Hexagon::BI__builtin_HEXAGON_V6_vabsdiffuh, {"v60", "v62", "v65"} },
1799     { Hexagon::BI__builtin_HEXAGON_V6_vabsdiffuh_128B, {"v60", "v62", "v65"} },
1800     { Hexagon::BI__builtin_HEXAGON_V6_vabsdiffw, {"v60", "v62", "v65"} },
1801     { Hexagon::BI__builtin_HEXAGON_V6_vabsdiffw_128B, {"v60", "v62", "v65"} },
1802     { Hexagon::BI__builtin_HEXAGON_V6_vabsh, {"v60", "v62", "v65"} },
1803     { Hexagon::BI__builtin_HEXAGON_V6_vabsh_128B, {"v60", "v62", "v65"} },
1804     { Hexagon::BI__builtin_HEXAGON_V6_vabsh_sat, {"v60", "v62", "v65"} },
1805     { Hexagon::BI__builtin_HEXAGON_V6_vabsh_sat_128B, {"v60", "v62", "v65"} },
1806     { Hexagon::BI__builtin_HEXAGON_V6_vabsw, {"v60", "v62", "v65"} },
1807     { Hexagon::BI__builtin_HEXAGON_V6_vabsw_128B, {"v60", "v62", "v65"} },
1808     { Hexagon::BI__builtin_HEXAGON_V6_vabsw_sat, {"v60", "v62", "v65"} },
1809     { Hexagon::BI__builtin_HEXAGON_V6_vabsw_sat_128B, {"v60", "v62", "v65"} },
1810     { Hexagon::BI__builtin_HEXAGON_V6_vaddb, {"v60", "v62", "v65"} },
1811     { Hexagon::BI__builtin_HEXAGON_V6_vaddb_128B, {"v60", "v62", "v65"} },
1812     { Hexagon::BI__builtin_HEXAGON_V6_vaddb_dv, {"v60", "v62", "v65"} },
1813     { Hexagon::BI__builtin_HEXAGON_V6_vaddb_dv_128B, {"v60", "v62", "v65"} },
1814     { Hexagon::BI__builtin_HEXAGON_V6_vaddbsat, {"v62", "v65"} },
1815     { Hexagon::BI__builtin_HEXAGON_V6_vaddbsat_128B, {"v62", "v65"} },
1816     { Hexagon::BI__builtin_HEXAGON_V6_vaddbsat_dv, {"v62", "v65"} },
1817     { Hexagon::BI__builtin_HEXAGON_V6_vaddbsat_dv_128B, {"v62", "v65"} },
1818     { Hexagon::BI__builtin_HEXAGON_V6_vaddcarry, {"v62", "v65"} },
1819     { Hexagon::BI__builtin_HEXAGON_V6_vaddcarry_128B, {"v62", "v65"} },
1820     { Hexagon::BI__builtin_HEXAGON_V6_vaddclbh, {"v62", "v65"} },
1821     { Hexagon::BI__builtin_HEXAGON_V6_vaddclbh_128B, {"v62", "v65"} },
1822     { Hexagon::BI__builtin_HEXAGON_V6_vaddclbw, {"v62", "v65"} },
1823     { Hexagon::BI__builtin_HEXAGON_V6_vaddclbw_128B, {"v62", "v65"} },
1824     { Hexagon::BI__builtin_HEXAGON_V6_vaddh, {"v60", "v62", "v65"} },
1825     { Hexagon::BI__builtin_HEXAGON_V6_vaddh_128B, {"v60", "v62", "v65"} },
1826     { Hexagon::BI__builtin_HEXAGON_V6_vaddh_dv, {"v60", "v62", "v65"} },
1827     { Hexagon::BI__builtin_HEXAGON_V6_vaddh_dv_128B, {"v60", "v62", "v65"} },
1828     { Hexagon::BI__builtin_HEXAGON_V6_vaddhsat, {"v60", "v62", "v65"} },
1829     { Hexagon::BI__builtin_HEXAGON_V6_vaddhsat_128B, {"v60", "v62", "v65"} },
1830     { Hexagon::BI__builtin_HEXAGON_V6_vaddhsat_dv, {"v60", "v62", "v65"} },
1831     { Hexagon::BI__builtin_HEXAGON_V6_vaddhsat_dv_128B, {"v60", "v62", "v65"} },
1832     { Hexagon::BI__builtin_HEXAGON_V6_vaddhw, {"v60", "v62", "v65"} },
1833     { Hexagon::BI__builtin_HEXAGON_V6_vaddhw_128B, {"v60", "v62", "v65"} },
1834     { Hexagon::BI__builtin_HEXAGON_V6_vaddhw_acc, {"v62", "v65"} },
1835     { Hexagon::BI__builtin_HEXAGON_V6_vaddhw_acc_128B, {"v62", "v65"} },
1836     { Hexagon::BI__builtin_HEXAGON_V6_vaddubh, {"v60", "v62", "v65"} },
1837     { Hexagon::BI__builtin_HEXAGON_V6_vaddubh_128B, {"v60", "v62", "v65"} },
1838     { Hexagon::BI__builtin_HEXAGON_V6_vaddubh_acc, {"v62", "v65"} },
1839     { Hexagon::BI__builtin_HEXAGON_V6_vaddubh_acc_128B, {"v62", "v65"} },
1840     { Hexagon::BI__builtin_HEXAGON_V6_vaddubsat, {"v60", "v62", "v65"} },
1841     { Hexagon::BI__builtin_HEXAGON_V6_vaddubsat_128B, {"v60", "v62", "v65"} },
1842     { Hexagon::BI__builtin_HEXAGON_V6_vaddubsat_dv, {"v60", "v62", "v65"} },
1843     { Hexagon::BI__builtin_HEXAGON_V6_vaddubsat_dv_128B, {"v60", "v62", "v65"} },
1844     { Hexagon::BI__builtin_HEXAGON_V6_vaddububb_sat, {"v62", "v65"} },
1845     { Hexagon::BI__builtin_HEXAGON_V6_vaddububb_sat_128B, {"v62", "v65"} },
1846     { Hexagon::BI__builtin_HEXAGON_V6_vadduhsat, {"v60", "v62", "v65"} },
1847     { Hexagon::BI__builtin_HEXAGON_V6_vadduhsat_128B, {"v60", "v62", "v65"} },
1848     { Hexagon::BI__builtin_HEXAGON_V6_vadduhsat_dv, {"v60", "v62", "v65"} },
1849     { Hexagon::BI__builtin_HEXAGON_V6_vadduhsat_dv_128B, {"v60", "v62", "v65"} },
1850     { Hexagon::BI__builtin_HEXAGON_V6_vadduhw, {"v60", "v62", "v65"} },
1851     { Hexagon::BI__builtin_HEXAGON_V6_vadduhw_128B, {"v60", "v62", "v65"} },
1852     { Hexagon::BI__builtin_HEXAGON_V6_vadduhw_acc, {"v62", "v65"} },
1853     { Hexagon::BI__builtin_HEXAGON_V6_vadduhw_acc_128B, {"v62", "v65"} },
1854     { Hexagon::BI__builtin_HEXAGON_V6_vadduwsat, {"v62", "v65"} },
1855     { Hexagon::BI__builtin_HEXAGON_V6_vadduwsat_128B, {"v62", "v65"} },
1856     { Hexagon::BI__builtin_HEXAGON_V6_vadduwsat_dv, {"v62", "v65"} },
1857     { Hexagon::BI__builtin_HEXAGON_V6_vadduwsat_dv_128B, {"v62", "v65"} },
1858     { Hexagon::BI__builtin_HEXAGON_V6_vaddw, {"v60", "v62", "v65"} },
1859     { Hexagon::BI__builtin_HEXAGON_V6_vaddw_128B, {"v60", "v62", "v65"} },
1860     { Hexagon::BI__builtin_HEXAGON_V6_vaddw_dv, {"v60", "v62", "v65"} },
1861     { Hexagon::BI__builtin_HEXAGON_V6_vaddw_dv_128B, {"v60", "v62", "v65"} },
1862     { Hexagon::BI__builtin_HEXAGON_V6_vaddwsat, {"v60", "v62", "v65"} },
1863     { Hexagon::BI__builtin_HEXAGON_V6_vaddwsat_128B, {"v60", "v62", "v65"} },
1864     { Hexagon::BI__builtin_HEXAGON_V6_vaddwsat_dv, {"v60", "v62", "v65"} },
1865     { Hexagon::BI__builtin_HEXAGON_V6_vaddwsat_dv_128B, {"v60", "v62", "v65"} },
1866     { Hexagon::BI__builtin_HEXAGON_V6_valignb, {"v60", "v62", "v65"} },
1867     { Hexagon::BI__builtin_HEXAGON_V6_valignb_128B, {"v60", "v62", "v65"} },
1868     { Hexagon::BI__builtin_HEXAGON_V6_valignbi, {"v60", "v62", "v65"} },
1869     { Hexagon::BI__builtin_HEXAGON_V6_valignbi_128B, {"v60", "v62", "v65"} },
1870     { Hexagon::BI__builtin_HEXAGON_V6_vand, {"v60", "v62", "v65"} },
1871     { Hexagon::BI__builtin_HEXAGON_V6_vand_128B, {"v60", "v62", "v65"} },
1872     { Hexagon::BI__builtin_HEXAGON_V6_vandnqrt, {"v62", "v65"} },
1873     { Hexagon::BI__builtin_HEXAGON_V6_vandnqrt_128B, {"v62", "v65"} },
1874     { Hexagon::BI__builtin_HEXAGON_V6_vandnqrt_acc, {"v62", "v65"} },
1875     { Hexagon::BI__builtin_HEXAGON_V6_vandnqrt_acc_128B, {"v62", "v65"} },
1876     { Hexagon::BI__builtin_HEXAGON_V6_vandqrt, {"v60", "v62", "v65"} },
1877     { Hexagon::BI__builtin_HEXAGON_V6_vandqrt_128B, {"v60", "v62", "v65"} },
1878     { Hexagon::BI__builtin_HEXAGON_V6_vandqrt_acc, {"v60", "v62", "v65"} },
1879     { Hexagon::BI__builtin_HEXAGON_V6_vandqrt_acc_128B, {"v60", "v62", "v65"} },
1880     { Hexagon::BI__builtin_HEXAGON_V6_vandvnqv, {"v62", "v65"} },
1881     { Hexagon::BI__builtin_HEXAGON_V6_vandvnqv_128B, {"v62", "v65"} },
1882     { Hexagon::BI__builtin_HEXAGON_V6_vandvqv, {"v62", "v65"} },
1883     { Hexagon::BI__builtin_HEXAGON_V6_vandvqv_128B, {"v62", "v65"} },
1884     { Hexagon::BI__builtin_HEXAGON_V6_vandvrt, {"v60", "v62", "v65"} },
1885     { Hexagon::BI__builtin_HEXAGON_V6_vandvrt_128B, {"v60", "v62", "v65"} },
1886     { Hexagon::BI__builtin_HEXAGON_V6_vandvrt_acc, {"v60", "v62", "v65"} },
1887     { Hexagon::BI__builtin_HEXAGON_V6_vandvrt_acc_128B, {"v60", "v62", "v65"} },
1888     { Hexagon::BI__builtin_HEXAGON_V6_vaslh, {"v60", "v62", "v65"} },
1889     { Hexagon::BI__builtin_HEXAGON_V6_vaslh_128B, {"v60", "v62", "v65"} },
1890     { Hexagon::BI__builtin_HEXAGON_V6_vaslh_acc, {"v65"} },
1891     { Hexagon::BI__builtin_HEXAGON_V6_vaslh_acc_128B, {"v65"} },
1892     { Hexagon::BI__builtin_HEXAGON_V6_vaslhv, {"v60", "v62", "v65"} },
1893     { Hexagon::BI__builtin_HEXAGON_V6_vaslhv_128B, {"v60", "v62", "v65"} },
1894     { Hexagon::BI__builtin_HEXAGON_V6_vaslw, {"v60", "v62", "v65"} },
1895     { Hexagon::BI__builtin_HEXAGON_V6_vaslw_128B, {"v60", "v62", "v65"} },
1896     { Hexagon::BI__builtin_HEXAGON_V6_vaslw_acc, {"v60", "v62", "v65"} },
1897     { Hexagon::BI__builtin_HEXAGON_V6_vaslw_acc_128B, {"v60", "v62", "v65"} },
1898     { Hexagon::BI__builtin_HEXAGON_V6_vaslwv, {"v60", "v62", "v65"} },
1899     { Hexagon::BI__builtin_HEXAGON_V6_vaslwv_128B, {"v60", "v62", "v65"} },
1900     { Hexagon::BI__builtin_HEXAGON_V6_vasrh, {"v60", "v62", "v65"} },
1901     { Hexagon::BI__builtin_HEXAGON_V6_vasrh_128B, {"v60", "v62", "v65"} },
1902     { Hexagon::BI__builtin_HEXAGON_V6_vasrh_acc, {"v65"} },
1903     { Hexagon::BI__builtin_HEXAGON_V6_vasrh_acc_128B, {"v65"} },
1904     { Hexagon::BI__builtin_HEXAGON_V6_vasrhbrndsat, {"v60", "v62", "v65"} },
1905     { Hexagon::BI__builtin_HEXAGON_V6_vasrhbrndsat_128B, {"v60", "v62", "v65"} },
1906     { Hexagon::BI__builtin_HEXAGON_V6_vasrhbsat, {"v62", "v65"} },
1907     { Hexagon::BI__builtin_HEXAGON_V6_vasrhbsat_128B, {"v62", "v65"} },
1908     { Hexagon::BI__builtin_HEXAGON_V6_vasrhubrndsat, {"v60", "v62", "v65"} },
1909     { Hexagon::BI__builtin_HEXAGON_V6_vasrhubrndsat_128B, {"v60", "v62", "v65"} },
1910     { Hexagon::BI__builtin_HEXAGON_V6_vasrhubsat, {"v60", "v62", "v65"} },
1911     { Hexagon::BI__builtin_HEXAGON_V6_vasrhubsat_128B, {"v60", "v62", "v65"} },
1912     { Hexagon::BI__builtin_HEXAGON_V6_vasrhv, {"v60", "v62", "v65"} },
1913     { Hexagon::BI__builtin_HEXAGON_V6_vasrhv_128B, {"v60", "v62", "v65"} },
1914     { Hexagon::BI__builtin_HEXAGON_V6_vasruhubrndsat, {"v65"} },
1915     { Hexagon::BI__builtin_HEXAGON_V6_vasruhubrndsat_128B, {"v65"} },
1916     { Hexagon::BI__builtin_HEXAGON_V6_vasruhubsat, {"v65"} },
1917     { Hexagon::BI__builtin_HEXAGON_V6_vasruhubsat_128B, {"v65"} },
1918     { Hexagon::BI__builtin_HEXAGON_V6_vasruwuhrndsat, {"v62", "v65"} },
1919     { Hexagon::BI__builtin_HEXAGON_V6_vasruwuhrndsat_128B, {"v62", "v65"} },
1920     { Hexagon::BI__builtin_HEXAGON_V6_vasruwuhsat, {"v65"} },
1921     { Hexagon::BI__builtin_HEXAGON_V6_vasruwuhsat_128B, {"v65"} },
1922     { Hexagon::BI__builtin_HEXAGON_V6_vasrw, {"v60", "v62", "v65"} },
1923     { Hexagon::BI__builtin_HEXAGON_V6_vasrw_128B, {"v60", "v62", "v65"} },
1924     { Hexagon::BI__builtin_HEXAGON_V6_vasrw_acc, {"v60", "v62", "v65"} },
1925     { Hexagon::BI__builtin_HEXAGON_V6_vasrw_acc_128B, {"v60", "v62", "v65"} },
1926     { Hexagon::BI__builtin_HEXAGON_V6_vasrwh, {"v60", "v62", "v65"} },
1927     { Hexagon::BI__builtin_HEXAGON_V6_vasrwh_128B, {"v60", "v62", "v65"} },
1928     { Hexagon::BI__builtin_HEXAGON_V6_vasrwhrndsat, {"v60", "v62", "v65"} },
1929     { Hexagon::BI__builtin_HEXAGON_V6_vasrwhrndsat_128B, {"v60", "v62", "v65"} },
1930     { Hexagon::BI__builtin_HEXAGON_V6_vasrwhsat, {"v60", "v62", "v65"} },
1931     { Hexagon::BI__builtin_HEXAGON_V6_vasrwhsat_128B, {"v60", "v62", "v65"} },
1932     { Hexagon::BI__builtin_HEXAGON_V6_vasrwuhrndsat, {"v62", "v65"} },
1933     { Hexagon::BI__builtin_HEXAGON_V6_vasrwuhrndsat_128B, {"v62", "v65"} },
1934     { Hexagon::BI__builtin_HEXAGON_V6_vasrwuhsat, {"v60", "v62", "v65"} },
1935     { Hexagon::BI__builtin_HEXAGON_V6_vasrwuhsat_128B, {"v60", "v62", "v65"} },
1936     { Hexagon::BI__builtin_HEXAGON_V6_vasrwv, {"v60", "v62", "v65"} },
1937     { Hexagon::BI__builtin_HEXAGON_V6_vasrwv_128B, {"v60", "v62", "v65"} },
1938     { Hexagon::BI__builtin_HEXAGON_V6_vassign, {"v60", "v62", "v65"} },
1939     { Hexagon::BI__builtin_HEXAGON_V6_vassign_128B, {"v60", "v62", "v65"} },
1940     { Hexagon::BI__builtin_HEXAGON_V6_vassignp, {"v60", "v62", "v65"} },
1941     { Hexagon::BI__builtin_HEXAGON_V6_vassignp_128B, {"v60", "v62", "v65"} },
1942     { Hexagon::BI__builtin_HEXAGON_V6_vavgb, {"v65"} },
1943     { Hexagon::BI__builtin_HEXAGON_V6_vavgb_128B, {"v65"} },
1944     { Hexagon::BI__builtin_HEXAGON_V6_vavgbrnd, {"v65"} },
1945     { Hexagon::BI__builtin_HEXAGON_V6_vavgbrnd_128B, {"v65"} },
1946     { Hexagon::BI__builtin_HEXAGON_V6_vavgh, {"v60", "v62", "v65"} },
1947     { Hexagon::BI__builtin_HEXAGON_V6_vavgh_128B, {"v60", "v62", "v65"} },
1948     { Hexagon::BI__builtin_HEXAGON_V6_vavghrnd, {"v60", "v62", "v65"} },
1949     { Hexagon::BI__builtin_HEXAGON_V6_vavghrnd_128B, {"v60", "v62", "v65"} },
1950     { Hexagon::BI__builtin_HEXAGON_V6_vavgub, {"v60", "v62", "v65"} },
1951     { Hexagon::BI__builtin_HEXAGON_V6_vavgub_128B, {"v60", "v62", "v65"} },
1952     { Hexagon::BI__builtin_HEXAGON_V6_vavgubrnd, {"v60", "v62", "v65"} },
1953     { Hexagon::BI__builtin_HEXAGON_V6_vavgubrnd_128B, {"v60", "v62", "v65"} },
1954     { Hexagon::BI__builtin_HEXAGON_V6_vavguh, {"v60", "v62", "v65"} },
1955     { Hexagon::BI__builtin_HEXAGON_V6_vavguh_128B, {"v60", "v62", "v65"} },
1956     { Hexagon::BI__builtin_HEXAGON_V6_vavguhrnd, {"v60", "v62", "v65"} },
1957     { Hexagon::BI__builtin_HEXAGON_V6_vavguhrnd_128B, {"v60", "v62", "v65"} },
1958     { Hexagon::BI__builtin_HEXAGON_V6_vavguw, {"v65"} },
1959     { Hexagon::BI__builtin_HEXAGON_V6_vavguw_128B, {"v65"} },
1960     { Hexagon::BI__builtin_HEXAGON_V6_vavguwrnd, {"v65"} },
1961     { Hexagon::BI__builtin_HEXAGON_V6_vavguwrnd_128B, {"v65"} },
1962     { Hexagon::BI__builtin_HEXAGON_V6_vavgw, {"v60", "v62", "v65"} },
1963     { Hexagon::BI__builtin_HEXAGON_V6_vavgw_128B, {"v60", "v62", "v65"} },
1964     { Hexagon::BI__builtin_HEXAGON_V6_vavgwrnd, {"v60", "v62", "v65"} },
1965     { Hexagon::BI__builtin_HEXAGON_V6_vavgwrnd_128B, {"v60", "v62", "v65"} },
1966     { Hexagon::BI__builtin_HEXAGON_V6_vcl0h, {"v60", "v62", "v65"} },
1967     { Hexagon::BI__builtin_HEXAGON_V6_vcl0h_128B, {"v60", "v62", "v65"} },
1968     { Hexagon::BI__builtin_HEXAGON_V6_vcl0w, {"v60", "v62", "v65"} },
1969     { Hexagon::BI__builtin_HEXAGON_V6_vcl0w_128B, {"v60", "v62", "v65"} },
1970     { Hexagon::BI__builtin_HEXAGON_V6_vcombine, {"v60", "v62", "v65"} },
1971     { Hexagon::BI__builtin_HEXAGON_V6_vcombine_128B, {"v60", "v62", "v65"} },
1972     { Hexagon::BI__builtin_HEXAGON_V6_vd0, {"v60", "v62", "v65"} },
1973     { Hexagon::BI__builtin_HEXAGON_V6_vd0_128B, {"v60", "v62", "v65"} },
1974     { Hexagon::BI__builtin_HEXAGON_V6_vdd0, {"v65"} },
1975     { Hexagon::BI__builtin_HEXAGON_V6_vdd0_128B, {"v65"} },
1976     { Hexagon::BI__builtin_HEXAGON_V6_vdealb, {"v60", "v62", "v65"} },
1977     { Hexagon::BI__builtin_HEXAGON_V6_vdealb_128B, {"v60", "v62", "v65"} },
1978     { Hexagon::BI__builtin_HEXAGON_V6_vdealb4w, {"v60", "v62", "v65"} },
1979     { Hexagon::BI__builtin_HEXAGON_V6_vdealb4w_128B, {"v60", "v62", "v65"} },
1980     { Hexagon::BI__builtin_HEXAGON_V6_vdealh, {"v60", "v62", "v65"} },
1981     { Hexagon::BI__builtin_HEXAGON_V6_vdealh_128B, {"v60", "v62", "v65"} },
1982     { Hexagon::BI__builtin_HEXAGON_V6_vdealvdd, {"v60", "v62", "v65"} },
1983     { Hexagon::BI__builtin_HEXAGON_V6_vdealvdd_128B, {"v60", "v62", "v65"} },
1984     { Hexagon::BI__builtin_HEXAGON_V6_vdelta, {"v60", "v62", "v65"} },
1985     { Hexagon::BI__builtin_HEXAGON_V6_vdelta_128B, {"v60", "v62", "v65"} },
1986     { Hexagon::BI__builtin_HEXAGON_V6_vdmpybus, {"v60", "v62", "v65"} },
1987     { Hexagon::BI__builtin_HEXAGON_V6_vdmpybus_128B, {"v60", "v62", "v65"} },
1988     { Hexagon::BI__builtin_HEXAGON_V6_vdmpybus_acc, {"v60", "v62", "v65"} },
1989     { Hexagon::BI__builtin_HEXAGON_V6_vdmpybus_acc_128B, {"v60", "v62", "v65"} },
1990     { Hexagon::BI__builtin_HEXAGON_V6_vdmpybus_dv, {"v60", "v62", "v65"} },
1991     { Hexagon::BI__builtin_HEXAGON_V6_vdmpybus_dv_128B, {"v60", "v62", "v65"} },
1992     { Hexagon::BI__builtin_HEXAGON_V6_vdmpybus_dv_acc, {"v60", "v62", "v65"} },
1993     { Hexagon::BI__builtin_HEXAGON_V6_vdmpybus_dv_acc_128B, {"v60", "v62", "v65"} },
1994     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhb, {"v60", "v62", "v65"} },
1995     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhb_128B, {"v60", "v62", "v65"} },
1996     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhb_acc, {"v60", "v62", "v65"} },
1997     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhb_acc_128B, {"v60", "v62", "v65"} },
1998     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhb_dv, {"v60", "v62", "v65"} },
1999     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhb_dv_128B, {"v60", "v62", "v65"} },
2000     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhb_dv_acc, {"v60", "v62", "v65"} },
2001     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhb_dv_acc_128B, {"v60", "v62", "v65"} },
2002     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhisat, {"v60", "v62", "v65"} },
2003     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhisat_128B, {"v60", "v62", "v65"} },
2004     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhisat_acc, {"v60", "v62", "v65"} },
2005     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhisat_acc_128B, {"v60", "v62", "v65"} },
2006     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsat, {"v60", "v62", "v65"} },
2007     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsat_128B, {"v60", "v62", "v65"} },
2008     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsat_acc, {"v60", "v62", "v65"} },
2009     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsat_acc_128B, {"v60", "v62", "v65"} },
2010     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsuisat, {"v60", "v62", "v65"} },
2011     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsuisat_128B, {"v60", "v62", "v65"} },
2012     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsuisat_acc, {"v60", "v62", "v65"} },
2013     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsuisat_acc_128B, {"v60", "v62", "v65"} },
2014     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsusat, {"v60", "v62", "v65"} },
2015     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsusat_128B, {"v60", "v62", "v65"} },
2016     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsusat_acc, {"v60", "v62", "v65"} },
2017     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhsusat_acc_128B, {"v60", "v62", "v65"} },
2018     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhvsat, {"v60", "v62", "v65"} },
2019     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhvsat_128B, {"v60", "v62", "v65"} },
2020     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhvsat_acc, {"v60", "v62", "v65"} },
2021     { Hexagon::BI__builtin_HEXAGON_V6_vdmpyhvsat_acc_128B, {"v60", "v62", "v65"} },
2022     { Hexagon::BI__builtin_HEXAGON_V6_vdsaduh, {"v60", "v62", "v65"} },
2023     { Hexagon::BI__builtin_HEXAGON_V6_vdsaduh_128B, {"v60", "v62", "v65"} },
2024     { Hexagon::BI__builtin_HEXAGON_V6_vdsaduh_acc, {"v60", "v62", "v65"} },
2025     { Hexagon::BI__builtin_HEXAGON_V6_vdsaduh_acc_128B, {"v60", "v62", "v65"} },
2026     { Hexagon::BI__builtin_HEXAGON_V6_veqb, {"v60", "v62", "v65"} },
2027     { Hexagon::BI__builtin_HEXAGON_V6_veqb_128B, {"v60", "v62", "v65"} },
2028     { Hexagon::BI__builtin_HEXAGON_V6_veqb_and, {"v60", "v62", "v65"} },
2029     { Hexagon::BI__builtin_HEXAGON_V6_veqb_and_128B, {"v60", "v62", "v65"} },
2030     { Hexagon::BI__builtin_HEXAGON_V6_veqb_or, {"v60", "v62", "v65"} },
2031     { Hexagon::BI__builtin_HEXAGON_V6_veqb_or_128B, {"v60", "v62", "v65"} },
2032     { Hexagon::BI__builtin_HEXAGON_V6_veqb_xor, {"v60", "v62", "v65"} },
2033     { Hexagon::BI__builtin_HEXAGON_V6_veqb_xor_128B, {"v60", "v62", "v65"} },
2034     { Hexagon::BI__builtin_HEXAGON_V6_veqh, {"v60", "v62", "v65"} },
2035     { Hexagon::BI__builtin_HEXAGON_V6_veqh_128B, {"v60", "v62", "v65"} },
2036     { Hexagon::BI__builtin_HEXAGON_V6_veqh_and, {"v60", "v62", "v65"} },
2037     { Hexagon::BI__builtin_HEXAGON_V6_veqh_and_128B, {"v60", "v62", "v65"} },
2038     { Hexagon::BI__builtin_HEXAGON_V6_veqh_or, {"v60", "v62", "v65"} },
2039     { Hexagon::BI__builtin_HEXAGON_V6_veqh_or_128B, {"v60", "v62", "v65"} },
2040     { Hexagon::BI__builtin_HEXAGON_V6_veqh_xor, {"v60", "v62", "v65"} },
2041     { Hexagon::BI__builtin_HEXAGON_V6_veqh_xor_128B, {"v60", "v62", "v65"} },
2042     { Hexagon::BI__builtin_HEXAGON_V6_veqw, {"v60", "v62", "v65"} },
2043     { Hexagon::BI__builtin_HEXAGON_V6_veqw_128B, {"v60", "v62", "v65"} },
2044     { Hexagon::BI__builtin_HEXAGON_V6_veqw_and, {"v60", "v62", "v65"} },
2045     { Hexagon::BI__builtin_HEXAGON_V6_veqw_and_128B, {"v60", "v62", "v65"} },
2046     { Hexagon::BI__builtin_HEXAGON_V6_veqw_or, {"v60", "v62", "v65"} },
2047     { Hexagon::BI__builtin_HEXAGON_V6_veqw_or_128B, {"v60", "v62", "v65"} },
2048     { Hexagon::BI__builtin_HEXAGON_V6_veqw_xor, {"v60", "v62", "v65"} },
2049     { Hexagon::BI__builtin_HEXAGON_V6_veqw_xor_128B, {"v60", "v62", "v65"} },
2050     { Hexagon::BI__builtin_HEXAGON_V6_vgtb, {"v60", "v62", "v65"} },
2051     { Hexagon::BI__builtin_HEXAGON_V6_vgtb_128B, {"v60", "v62", "v65"} },
2052     { Hexagon::BI__builtin_HEXAGON_V6_vgtb_and, {"v60", "v62", "v65"} },
2053     { Hexagon::BI__builtin_HEXAGON_V6_vgtb_and_128B, {"v60", "v62", "v65"} },
2054     { Hexagon::BI__builtin_HEXAGON_V6_vgtb_or, {"v60", "v62", "v65"} },
2055     { Hexagon::BI__builtin_HEXAGON_V6_vgtb_or_128B, {"v60", "v62", "v65"} },
2056     { Hexagon::BI__builtin_HEXAGON_V6_vgtb_xor, {"v60", "v62", "v65"} },
2057     { Hexagon::BI__builtin_HEXAGON_V6_vgtb_xor_128B, {"v60", "v62", "v65"} },
2058     { Hexagon::BI__builtin_HEXAGON_V6_vgth, {"v60", "v62", "v65"} },
2059     { Hexagon::BI__builtin_HEXAGON_V6_vgth_128B, {"v60", "v62", "v65"} },
2060     { Hexagon::BI__builtin_HEXAGON_V6_vgth_and, {"v60", "v62", "v65"} },
2061     { Hexagon::BI__builtin_HEXAGON_V6_vgth_and_128B, {"v60", "v62", "v65"} },
2062     { Hexagon::BI__builtin_HEXAGON_V6_vgth_or, {"v60", "v62", "v65"} },
2063     { Hexagon::BI__builtin_HEXAGON_V6_vgth_or_128B, {"v60", "v62", "v65"} },
2064     { Hexagon::BI__builtin_HEXAGON_V6_vgth_xor, {"v60", "v62", "v65"} },
2065     { Hexagon::BI__builtin_HEXAGON_V6_vgth_xor_128B, {"v60", "v62", "v65"} },
2066     { Hexagon::BI__builtin_HEXAGON_V6_vgtub, {"v60", "v62", "v65"} },
2067     { Hexagon::BI__builtin_HEXAGON_V6_vgtub_128B, {"v60", "v62", "v65"} },
2068     { Hexagon::BI__builtin_HEXAGON_V6_vgtub_and, {"v60", "v62", "v65"} },
2069     { Hexagon::BI__builtin_HEXAGON_V6_vgtub_and_128B, {"v60", "v62", "v65"} },
2070     { Hexagon::BI__builtin_HEXAGON_V6_vgtub_or, {"v60", "v62", "v65"} },
2071     { Hexagon::BI__builtin_HEXAGON_V6_vgtub_or_128B, {"v60", "v62", "v65"} },
2072     { Hexagon::BI__builtin_HEXAGON_V6_vgtub_xor, {"v60", "v62", "v65"} },
2073     { Hexagon::BI__builtin_HEXAGON_V6_vgtub_xor_128B, {"v60", "v62", "v65"} },
2074     { Hexagon::BI__builtin_HEXAGON_V6_vgtuh, {"v60", "v62", "v65"} },
2075     { Hexagon::BI__builtin_HEXAGON_V6_vgtuh_128B, {"v60", "v62", "v65"} },
2076     { Hexagon::BI__builtin_HEXAGON_V6_vgtuh_and, {"v60", "v62", "v65"} },
2077     { Hexagon::BI__builtin_HEXAGON_V6_vgtuh_and_128B, {"v60", "v62", "v65"} },
2078     { Hexagon::BI__builtin_HEXAGON_V6_vgtuh_or, {"v60", "v62", "v65"} },
2079     { Hexagon::BI__builtin_HEXAGON_V6_vgtuh_or_128B, {"v60", "v62", "v65"} },
2080     { Hexagon::BI__builtin_HEXAGON_V6_vgtuh_xor, {"v60", "v62", "v65"} },
2081     { Hexagon::BI__builtin_HEXAGON_V6_vgtuh_xor_128B, {"v60", "v62", "v65"} },
2082     { Hexagon::BI__builtin_HEXAGON_V6_vgtuw, {"v60", "v62", "v65"} },
2083     { Hexagon::BI__builtin_HEXAGON_V6_vgtuw_128B, {"v60", "v62", "v65"} },
2084     { Hexagon::BI__builtin_HEXAGON_V6_vgtuw_and, {"v60", "v62", "v65"} },
2085     { Hexagon::BI__builtin_HEXAGON_V6_vgtuw_and_128B, {"v60", "v62", "v65"} },
2086     { Hexagon::BI__builtin_HEXAGON_V6_vgtuw_or, {"v60", "v62", "v65"} },
2087     { Hexagon::BI__builtin_HEXAGON_V6_vgtuw_or_128B, {"v60", "v62", "v65"} },
2088     { Hexagon::BI__builtin_HEXAGON_V6_vgtuw_xor, {"v60", "v62", "v65"} },
2089     { Hexagon::BI__builtin_HEXAGON_V6_vgtuw_xor_128B, {"v60", "v62", "v65"} },
2090     { Hexagon::BI__builtin_HEXAGON_V6_vgtw, {"v60", "v62", "v65"} },
2091     { Hexagon::BI__builtin_HEXAGON_V6_vgtw_128B, {"v60", "v62", "v65"} },
2092     { Hexagon::BI__builtin_HEXAGON_V6_vgtw_and, {"v60", "v62", "v65"} },
2093     { Hexagon::BI__builtin_HEXAGON_V6_vgtw_and_128B, {"v60", "v62", "v65"} },
2094     { Hexagon::BI__builtin_HEXAGON_V6_vgtw_or, {"v60", "v62", "v65"} },
2095     { Hexagon::BI__builtin_HEXAGON_V6_vgtw_or_128B, {"v60", "v62", "v65"} },
2096     { Hexagon::BI__builtin_HEXAGON_V6_vgtw_xor, {"v60", "v62", "v65"} },
2097     { Hexagon::BI__builtin_HEXAGON_V6_vgtw_xor_128B, {"v60", "v62", "v65"} },
2098     { Hexagon::BI__builtin_HEXAGON_V6_vinsertwr, {"v60", "v62", "v65"} },
2099     { Hexagon::BI__builtin_HEXAGON_V6_vinsertwr_128B, {"v60", "v62", "v65"} },
2100     { Hexagon::BI__builtin_HEXAGON_V6_vlalignb, {"v60", "v62", "v65"} },
2101     { Hexagon::BI__builtin_HEXAGON_V6_vlalignb_128B, {"v60", "v62", "v65"} },
2102     { Hexagon::BI__builtin_HEXAGON_V6_vlalignbi, {"v60", "v62", "v65"} },
2103     { Hexagon::BI__builtin_HEXAGON_V6_vlalignbi_128B, {"v60", "v62", "v65"} },
2104     { Hexagon::BI__builtin_HEXAGON_V6_vlsrb, {"v62", "v65"} },
2105     { Hexagon::BI__builtin_HEXAGON_V6_vlsrb_128B, {"v62", "v65"} },
2106     { Hexagon::BI__builtin_HEXAGON_V6_vlsrh, {"v60", "v62", "v65"} },
2107     { Hexagon::BI__builtin_HEXAGON_V6_vlsrh_128B, {"v60", "v62", "v65"} },
2108     { Hexagon::BI__builtin_HEXAGON_V6_vlsrhv, {"v60", "v62", "v65"} },
2109     { Hexagon::BI__builtin_HEXAGON_V6_vlsrhv_128B, {"v60", "v62", "v65"} },
2110     { Hexagon::BI__builtin_HEXAGON_V6_vlsrw, {"v60", "v62", "v65"} },
2111     { Hexagon::BI__builtin_HEXAGON_V6_vlsrw_128B, {"v60", "v62", "v65"} },
2112     { Hexagon::BI__builtin_HEXAGON_V6_vlsrwv, {"v60", "v62", "v65"} },
2113     { Hexagon::BI__builtin_HEXAGON_V6_vlsrwv_128B, {"v60", "v62", "v65"} },
2114     { Hexagon::BI__builtin_HEXAGON_V6_vlut4, {"v65"} },
2115     { Hexagon::BI__builtin_HEXAGON_V6_vlut4_128B, {"v65"} },
2116     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvb, {"v60", "v62", "v65"} },
2117     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvb_128B, {"v60", "v62", "v65"} },
2118     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvbi, {"v62", "v65"} },
2119     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvbi_128B, {"v62", "v65"} },
2120     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvb_nm, {"v62", "v65"} },
2121     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvb_nm_128B, {"v62", "v65"} },
2122     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvb_oracc, {"v60", "v62", "v65"} },
2123     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvb_oracc_128B, {"v60", "v62", "v65"} },
2124     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvb_oracci, {"v62", "v65"} },
2125     { Hexagon::BI__builtin_HEXAGON_V6_vlutvvb_oracci_128B, {"v62", "v65"} },
2126     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwh, {"v60", "v62", "v65"} },
2127     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwh_128B, {"v60", "v62", "v65"} },
2128     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwhi, {"v62", "v65"} },
2129     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwhi_128B, {"v62", "v65"} },
2130     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwh_nm, {"v62", "v65"} },
2131     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwh_nm_128B, {"v62", "v65"} },
2132     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwh_oracc, {"v60", "v62", "v65"} },
2133     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwh_oracc_128B, {"v60", "v62", "v65"} },
2134     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwh_oracci, {"v62", "v65"} },
2135     { Hexagon::BI__builtin_HEXAGON_V6_vlutvwh_oracci_128B, {"v62", "v65"} },
2136     { Hexagon::BI__builtin_HEXAGON_V6_vmaxb, {"v62", "v65"} },
2137     { Hexagon::BI__builtin_HEXAGON_V6_vmaxb_128B, {"v62", "v65"} },
2138     { Hexagon::BI__builtin_HEXAGON_V6_vmaxh, {"v60", "v62", "v65"} },
2139     { Hexagon::BI__builtin_HEXAGON_V6_vmaxh_128B, {"v60", "v62", "v65"} },
2140     { Hexagon::BI__builtin_HEXAGON_V6_vmaxub, {"v60", "v62", "v65"} },
2141     { Hexagon::BI__builtin_HEXAGON_V6_vmaxub_128B, {"v60", "v62", "v65"} },
2142     { Hexagon::BI__builtin_HEXAGON_V6_vmaxuh, {"v60", "v62", "v65"} },
2143     { Hexagon::BI__builtin_HEXAGON_V6_vmaxuh_128B, {"v60", "v62", "v65"} },
2144     { Hexagon::BI__builtin_HEXAGON_V6_vmaxw, {"v60", "v62", "v65"} },
2145     { Hexagon::BI__builtin_HEXAGON_V6_vmaxw_128B, {"v60", "v62", "v65"} },
2146     { Hexagon::BI__builtin_HEXAGON_V6_vminb, {"v62", "v65"} },
2147     { Hexagon::BI__builtin_HEXAGON_V6_vminb_128B, {"v62", "v65"} },
2148     { Hexagon::BI__builtin_HEXAGON_V6_vminh, {"v60", "v62", "v65"} },
2149     { Hexagon::BI__builtin_HEXAGON_V6_vminh_128B, {"v60", "v62", "v65"} },
2150     { Hexagon::BI__builtin_HEXAGON_V6_vminub, {"v60", "v62", "v65"} },
2151     { Hexagon::BI__builtin_HEXAGON_V6_vminub_128B, {"v60", "v62", "v65"} },
2152     { Hexagon::BI__builtin_HEXAGON_V6_vminuh, {"v60", "v62", "v65"} },
2153     { Hexagon::BI__builtin_HEXAGON_V6_vminuh_128B, {"v60", "v62", "v65"} },
2154     { Hexagon::BI__builtin_HEXAGON_V6_vminw, {"v60", "v62", "v65"} },
2155     { Hexagon::BI__builtin_HEXAGON_V6_vminw_128B, {"v60", "v62", "v65"} },
2156     { Hexagon::BI__builtin_HEXAGON_V6_vmpabus, {"v60", "v62", "v65"} },
2157     { Hexagon::BI__builtin_HEXAGON_V6_vmpabus_128B, {"v60", "v62", "v65"} },
2158     { Hexagon::BI__builtin_HEXAGON_V6_vmpabus_acc, {"v60", "v62", "v65"} },
2159     { Hexagon::BI__builtin_HEXAGON_V6_vmpabus_acc_128B, {"v60", "v62", "v65"} },
2160     { Hexagon::BI__builtin_HEXAGON_V6_vmpabusv, {"v60", "v62", "v65"} },
2161     { Hexagon::BI__builtin_HEXAGON_V6_vmpabusv_128B, {"v60", "v62", "v65"} },
2162     { Hexagon::BI__builtin_HEXAGON_V6_vmpabuu, {"v65"} },
2163     { Hexagon::BI__builtin_HEXAGON_V6_vmpabuu_128B, {"v65"} },
2164     { Hexagon::BI__builtin_HEXAGON_V6_vmpabuu_acc, {"v65"} },
2165     { Hexagon::BI__builtin_HEXAGON_V6_vmpabuu_acc_128B, {"v65"} },
2166     { Hexagon::BI__builtin_HEXAGON_V6_vmpabuuv, {"v60", "v62", "v65"} },
2167     { Hexagon::BI__builtin_HEXAGON_V6_vmpabuuv_128B, {"v60", "v62", "v65"} },
2168     { Hexagon::BI__builtin_HEXAGON_V6_vmpahb, {"v60", "v62", "v65"} },
2169     { Hexagon::BI__builtin_HEXAGON_V6_vmpahb_128B, {"v60", "v62", "v65"} },
2170     { Hexagon::BI__builtin_HEXAGON_V6_vmpahb_acc, {"v60", "v62", "v65"} },
2171     { Hexagon::BI__builtin_HEXAGON_V6_vmpahb_acc_128B, {"v60", "v62", "v65"} },
2172     { Hexagon::BI__builtin_HEXAGON_V6_vmpahhsat, {"v65"} },
2173     { Hexagon::BI__builtin_HEXAGON_V6_vmpahhsat_128B, {"v65"} },
2174     { Hexagon::BI__builtin_HEXAGON_V6_vmpauhb, {"v62", "v65"} },
2175     { Hexagon::BI__builtin_HEXAGON_V6_vmpauhb_128B, {"v62", "v65"} },
2176     { Hexagon::BI__builtin_HEXAGON_V6_vmpauhb_acc, {"v62", "v65"} },
2177     { Hexagon::BI__builtin_HEXAGON_V6_vmpauhb_acc_128B, {"v62", "v65"} },
2178     { Hexagon::BI__builtin_HEXAGON_V6_vmpauhuhsat, {"v65"} },
2179     { Hexagon::BI__builtin_HEXAGON_V6_vmpauhuhsat_128B, {"v65"} },
2180     { Hexagon::BI__builtin_HEXAGON_V6_vmpsuhuhsat, {"v65"} },
2181     { Hexagon::BI__builtin_HEXAGON_V6_vmpsuhuhsat_128B, {"v65"} },
2182     { Hexagon::BI__builtin_HEXAGON_V6_vmpybus, {"v60", "v62", "v65"} },
2183     { Hexagon::BI__builtin_HEXAGON_V6_vmpybus_128B, {"v60", "v62", "v65"} },
2184     { Hexagon::BI__builtin_HEXAGON_V6_vmpybus_acc, {"v60", "v62", "v65"} },
2185     { Hexagon::BI__builtin_HEXAGON_V6_vmpybus_acc_128B, {"v60", "v62", "v65"} },
2186     { Hexagon::BI__builtin_HEXAGON_V6_vmpybusv, {"v60", "v62", "v65"} },
2187     { Hexagon::BI__builtin_HEXAGON_V6_vmpybusv_128B, {"v60", "v62", "v65"} },
2188     { Hexagon::BI__builtin_HEXAGON_V6_vmpybusv_acc, {"v60", "v62", "v65"} },
2189     { Hexagon::BI__builtin_HEXAGON_V6_vmpybusv_acc_128B, {"v60", "v62", "v65"} },
2190     { Hexagon::BI__builtin_HEXAGON_V6_vmpybv, {"v60", "v62", "v65"} },
2191     { Hexagon::BI__builtin_HEXAGON_V6_vmpybv_128B, {"v60", "v62", "v65"} },
2192     { Hexagon::BI__builtin_HEXAGON_V6_vmpybv_acc, {"v60", "v62", "v65"} },
2193     { Hexagon::BI__builtin_HEXAGON_V6_vmpybv_acc_128B, {"v60", "v62", "v65"} },
2194     { Hexagon::BI__builtin_HEXAGON_V6_vmpyewuh, {"v60", "v62", "v65"} },
2195     { Hexagon::BI__builtin_HEXAGON_V6_vmpyewuh_128B, {"v60", "v62", "v65"} },
2196     { Hexagon::BI__builtin_HEXAGON_V6_vmpyewuh_64, {"v62", "v65"} },
2197     { Hexagon::BI__builtin_HEXAGON_V6_vmpyewuh_64_128B, {"v62", "v65"} },
2198     { Hexagon::BI__builtin_HEXAGON_V6_vmpyh, {"v60", "v62", "v65"} },
2199     { Hexagon::BI__builtin_HEXAGON_V6_vmpyh_128B, {"v60", "v62", "v65"} },
2200     { Hexagon::BI__builtin_HEXAGON_V6_vmpyh_acc, {"v65"} },
2201     { Hexagon::BI__builtin_HEXAGON_V6_vmpyh_acc_128B, {"v65"} },
2202     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhsat_acc, {"v60", "v62", "v65"} },
2203     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhsat_acc_128B, {"v60", "v62", "v65"} },
2204     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhsrs, {"v60", "v62", "v65"} },
2205     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhsrs_128B, {"v60", "v62", "v65"} },
2206     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhss, {"v60", "v62", "v65"} },
2207     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhss_128B, {"v60", "v62", "v65"} },
2208     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhus, {"v60", "v62", "v65"} },
2209     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhus_128B, {"v60", "v62", "v65"} },
2210     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhus_acc, {"v60", "v62", "v65"} },
2211     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhus_acc_128B, {"v60", "v62", "v65"} },
2212     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhv, {"v60", "v62", "v65"} },
2213     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhv_128B, {"v60", "v62", "v65"} },
2214     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhv_acc, {"v60", "v62", "v65"} },
2215     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhv_acc_128B, {"v60", "v62", "v65"} },
2216     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhvsrs, {"v60", "v62", "v65"} },
2217     { Hexagon::BI__builtin_HEXAGON_V6_vmpyhvsrs_128B, {"v60", "v62", "v65"} },
2218     { Hexagon::BI__builtin_HEXAGON_V6_vmpyieoh, {"v60", "v62", "v65"} },
2219     { Hexagon::BI__builtin_HEXAGON_V6_vmpyieoh_128B, {"v60", "v62", "v65"} },
2220     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiewh_acc, {"v60", "v62", "v65"} },
2221     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiewh_acc_128B, {"v60", "v62", "v65"} },
2222     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiewuh, {"v60", "v62", "v65"} },
2223     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiewuh_128B, {"v60", "v62", "v65"} },
2224     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiewuh_acc, {"v60", "v62", "v65"} },
2225     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiewuh_acc_128B, {"v60", "v62", "v65"} },
2226     { Hexagon::BI__builtin_HEXAGON_V6_vmpyih, {"v60", "v62", "v65"} },
2227     { Hexagon::BI__builtin_HEXAGON_V6_vmpyih_128B, {"v60", "v62", "v65"} },
2228     { Hexagon::BI__builtin_HEXAGON_V6_vmpyih_acc, {"v60", "v62", "v65"} },
2229     { Hexagon::BI__builtin_HEXAGON_V6_vmpyih_acc_128B, {"v60", "v62", "v65"} },
2230     { Hexagon::BI__builtin_HEXAGON_V6_vmpyihb, {"v60", "v62", "v65"} },
2231     { Hexagon::BI__builtin_HEXAGON_V6_vmpyihb_128B, {"v60", "v62", "v65"} },
2232     { Hexagon::BI__builtin_HEXAGON_V6_vmpyihb_acc, {"v60", "v62", "v65"} },
2233     { Hexagon::BI__builtin_HEXAGON_V6_vmpyihb_acc_128B, {"v60", "v62", "v65"} },
2234     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiowh, {"v60", "v62", "v65"} },
2235     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiowh_128B, {"v60", "v62", "v65"} },
2236     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwb, {"v60", "v62", "v65"} },
2237     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwb_128B, {"v60", "v62", "v65"} },
2238     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwb_acc, {"v60", "v62", "v65"} },
2239     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwb_acc_128B, {"v60", "v62", "v65"} },
2240     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwh, {"v60", "v62", "v65"} },
2241     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwh_128B, {"v60", "v62", "v65"} },
2242     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwh_acc, {"v60", "v62", "v65"} },
2243     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwh_acc_128B, {"v60", "v62", "v65"} },
2244     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwub, {"v62", "v65"} },
2245     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwub_128B, {"v62", "v65"} },
2246     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwub_acc, {"v62", "v65"} },
2247     { Hexagon::BI__builtin_HEXAGON_V6_vmpyiwub_acc_128B, {"v62", "v65"} },
2248     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh, {"v60", "v62", "v65"} },
2249     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_128B, {"v60", "v62", "v65"} },
2250     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_64_acc, {"v62", "v65"} },
2251     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_64_acc_128B, {"v62", "v65"} },
2252     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_rnd, {"v60", "v62", "v65"} },
2253     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_rnd_128B, {"v60", "v62", "v65"} },
2254     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_rnd_sacc, {"v60", "v62", "v65"} },
2255     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_rnd_sacc_128B, {"v60", "v62", "v65"} },
2256     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_sacc, {"v60", "v62", "v65"} },
2257     { Hexagon::BI__builtin_HEXAGON_V6_vmpyowh_sacc_128B, {"v60", "v62", "v65"} },
2258     { Hexagon::BI__builtin_HEXAGON_V6_vmpyub, {"v60", "v62", "v65"} },
2259     { Hexagon::BI__builtin_HEXAGON_V6_vmpyub_128B, {"v60", "v62", "v65"} },
2260     { Hexagon::BI__builtin_HEXAGON_V6_vmpyub_acc, {"v60", "v62", "v65"} },
2261     { Hexagon::BI__builtin_HEXAGON_V6_vmpyub_acc_128B, {"v60", "v62", "v65"} },
2262     { Hexagon::BI__builtin_HEXAGON_V6_vmpyubv, {"v60", "v62", "v65"} },
2263     { Hexagon::BI__builtin_HEXAGON_V6_vmpyubv_128B, {"v60", "v62", "v65"} },
2264     { Hexagon::BI__builtin_HEXAGON_V6_vmpyubv_acc, {"v60", "v62", "v65"} },
2265     { Hexagon::BI__builtin_HEXAGON_V6_vmpyubv_acc_128B, {"v60", "v62", "v65"} },
2266     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuh, {"v60", "v62", "v65"} },
2267     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuh_128B, {"v60", "v62", "v65"} },
2268     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuh_acc, {"v60", "v62", "v65"} },
2269     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuh_acc_128B, {"v60", "v62", "v65"} },
2270     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuhe, {"v65"} },
2271     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuhe_128B, {"v65"} },
2272     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuhe_acc, {"v65"} },
2273     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuhe_acc_128B, {"v65"} },
2274     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuhv, {"v60", "v62", "v65"} },
2275     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuhv_128B, {"v60", "v62", "v65"} },
2276     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuhv_acc, {"v60", "v62", "v65"} },
2277     { Hexagon::BI__builtin_HEXAGON_V6_vmpyuhv_acc_128B, {"v60", "v62", "v65"} },
2278     { Hexagon::BI__builtin_HEXAGON_V6_vmux, {"v60", "v62", "v65"} },
2279     { Hexagon::BI__builtin_HEXAGON_V6_vmux_128B, {"v60", "v62", "v65"} },
2280     { Hexagon::BI__builtin_HEXAGON_V6_vnavgb, {"v65"} },
2281     { Hexagon::BI__builtin_HEXAGON_V6_vnavgb_128B, {"v65"} },
2282     { Hexagon::BI__builtin_HEXAGON_V6_vnavgh, {"v60", "v62", "v65"} },
2283     { Hexagon::BI__builtin_HEXAGON_V6_vnavgh_128B, {"v60", "v62", "v65"} },
2284     { Hexagon::BI__builtin_HEXAGON_V6_vnavgub, {"v60", "v62", "v65"} },
2285     { Hexagon::BI__builtin_HEXAGON_V6_vnavgub_128B, {"v60", "v62", "v65"} },
2286     { Hexagon::BI__builtin_HEXAGON_V6_vnavgw, {"v60", "v62", "v65"} },
2287     { Hexagon::BI__builtin_HEXAGON_V6_vnavgw_128B, {"v60", "v62", "v65"} },
2288     { Hexagon::BI__builtin_HEXAGON_V6_vnormamth, {"v60", "v62", "v65"} },
2289     { Hexagon::BI__builtin_HEXAGON_V6_vnormamth_128B, {"v60", "v62", "v65"} },
2290     { Hexagon::BI__builtin_HEXAGON_V6_vnormamtw, {"v60", "v62", "v65"} },
2291     { Hexagon::BI__builtin_HEXAGON_V6_vnormamtw_128B, {"v60", "v62", "v65"} },
2292     { Hexagon::BI__builtin_HEXAGON_V6_vnot, {"v60", "v62", "v65"} },
2293     { Hexagon::BI__builtin_HEXAGON_V6_vnot_128B, {"v60", "v62", "v65"} },
2294     { Hexagon::BI__builtin_HEXAGON_V6_vor, {"v60", "v62", "v65"} },
2295     { Hexagon::BI__builtin_HEXAGON_V6_vor_128B, {"v60", "v62", "v65"} },
2296     { Hexagon::BI__builtin_HEXAGON_V6_vpackeb, {"v60", "v62", "v65"} },
2297     { Hexagon::BI__builtin_HEXAGON_V6_vpackeb_128B, {"v60", "v62", "v65"} },
2298     { Hexagon::BI__builtin_HEXAGON_V6_vpackeh, {"v60", "v62", "v65"} },
2299     { Hexagon::BI__builtin_HEXAGON_V6_vpackeh_128B, {"v60", "v62", "v65"} },
2300     { Hexagon::BI__builtin_HEXAGON_V6_vpackhb_sat, {"v60", "v62", "v65"} },
2301     { Hexagon::BI__builtin_HEXAGON_V6_vpackhb_sat_128B, {"v60", "v62", "v65"} },
2302     { Hexagon::BI__builtin_HEXAGON_V6_vpackhub_sat, {"v60", "v62", "v65"} },
2303     { Hexagon::BI__builtin_HEXAGON_V6_vpackhub_sat_128B, {"v60", "v62", "v65"} },
2304     { Hexagon::BI__builtin_HEXAGON_V6_vpackob, {"v60", "v62", "v65"} },
2305     { Hexagon::BI__builtin_HEXAGON_V6_vpackob_128B, {"v60", "v62", "v65"} },
2306     { Hexagon::BI__builtin_HEXAGON_V6_vpackoh, {"v60", "v62", "v65"} },
2307     { Hexagon::BI__builtin_HEXAGON_V6_vpackoh_128B, {"v60", "v62", "v65"} },
2308     { Hexagon::BI__builtin_HEXAGON_V6_vpackwh_sat, {"v60", "v62", "v65"} },
2309     { Hexagon::BI__builtin_HEXAGON_V6_vpackwh_sat_128B, {"v60", "v62", "v65"} },
2310     { Hexagon::BI__builtin_HEXAGON_V6_vpackwuh_sat, {"v60", "v62", "v65"} },
2311     { Hexagon::BI__builtin_HEXAGON_V6_vpackwuh_sat_128B, {"v60", "v62", "v65"} },
2312     { Hexagon::BI__builtin_HEXAGON_V6_vpopcounth, {"v60", "v62", "v65"} },
2313     { Hexagon::BI__builtin_HEXAGON_V6_vpopcounth_128B, {"v60", "v62", "v65"} },
2314     { Hexagon::BI__builtin_HEXAGON_V6_vprefixqb, {"v65"} },
2315     { Hexagon::BI__builtin_HEXAGON_V6_vprefixqb_128B, {"v65"} },
2316     { Hexagon::BI__builtin_HEXAGON_V6_vprefixqh, {"v65"} },
2317     { Hexagon::BI__builtin_HEXAGON_V6_vprefixqh_128B, {"v65"} },
2318     { Hexagon::BI__builtin_HEXAGON_V6_vprefixqw, {"v65"} },
2319     { Hexagon::BI__builtin_HEXAGON_V6_vprefixqw_128B, {"v65"} },
2320     { Hexagon::BI__builtin_HEXAGON_V6_vrdelta, {"v60", "v62", "v65"} },
2321     { Hexagon::BI__builtin_HEXAGON_V6_vrdelta_128B, {"v60", "v62", "v65"} },
2322     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybub_rtt, {"v65"} },
2323     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybub_rtt_128B, {"v65"} },
2324     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybub_rtt_acc, {"v65"} },
2325     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybub_rtt_acc_128B, {"v65"} },
2326     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybus, {"v60", "v62", "v65"} },
2327     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybus_128B, {"v60", "v62", "v65"} },
2328     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybus_acc, {"v60", "v62", "v65"} },
2329     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybus_acc_128B, {"v60", "v62", "v65"} },
2330     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusi, {"v60", "v62", "v65"} },
2331     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusi_128B, {"v60", "v62", "v65"} },
2332     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusi_acc, {"v60", "v62", "v65"} },
2333     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusi_acc_128B, {"v60", "v62", "v65"} },
2334     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusv, {"v60", "v62", "v65"} },
2335     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusv_128B, {"v60", "v62", "v65"} },
2336     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusv_acc, {"v60", "v62", "v65"} },
2337     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusv_acc_128B, {"v60", "v62", "v65"} },
2338     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybv, {"v60", "v62", "v65"} },
2339     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybv_128B, {"v60", "v62", "v65"} },
2340     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybv_acc, {"v60", "v62", "v65"} },
2341     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybv_acc_128B, {"v60", "v62", "v65"} },
2342     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyub, {"v60", "v62", "v65"} },
2343     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyub_128B, {"v60", "v62", "v65"} },
2344     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyub_acc, {"v60", "v62", "v65"} },
2345     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyub_acc_128B, {"v60", "v62", "v65"} },
2346     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubi, {"v60", "v62", "v65"} },
2347     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubi_128B, {"v60", "v62", "v65"} },
2348     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubi_acc, {"v60", "v62", "v65"} },
2349     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubi_acc_128B, {"v60", "v62", "v65"} },
2350     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyub_rtt, {"v65"} },
2351     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyub_rtt_128B, {"v65"} },
2352     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyub_rtt_acc, {"v65"} },
2353     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyub_rtt_acc_128B, {"v65"} },
2354     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubv, {"v60", "v62", "v65"} },
2355     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubv_128B, {"v60", "v62", "v65"} },
2356     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubv_acc, {"v60", "v62", "v65"} },
2357     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubv_acc_128B, {"v60", "v62", "v65"} },
2358     { Hexagon::BI__builtin_HEXAGON_V6_vror, {"v60", "v62", "v65"} },
2359     { Hexagon::BI__builtin_HEXAGON_V6_vror_128B, {"v60", "v62", "v65"} },
2360     { Hexagon::BI__builtin_HEXAGON_V6_vroundhb, {"v60", "v62", "v65"} },
2361     { Hexagon::BI__builtin_HEXAGON_V6_vroundhb_128B, {"v60", "v62", "v65"} },
2362     { Hexagon::BI__builtin_HEXAGON_V6_vroundhub, {"v60", "v62", "v65"} },
2363     { Hexagon::BI__builtin_HEXAGON_V6_vroundhub_128B, {"v60", "v62", "v65"} },
2364     { Hexagon::BI__builtin_HEXAGON_V6_vrounduhub, {"v62", "v65"} },
2365     { Hexagon::BI__builtin_HEXAGON_V6_vrounduhub_128B, {"v62", "v65"} },
2366     { Hexagon::BI__builtin_HEXAGON_V6_vrounduwuh, {"v62", "v65"} },
2367     { Hexagon::BI__builtin_HEXAGON_V6_vrounduwuh_128B, {"v62", "v65"} },
2368     { Hexagon::BI__builtin_HEXAGON_V6_vroundwh, {"v60", "v62", "v65"} },
2369     { Hexagon::BI__builtin_HEXAGON_V6_vroundwh_128B, {"v60", "v62", "v65"} },
2370     { Hexagon::BI__builtin_HEXAGON_V6_vroundwuh, {"v60", "v62", "v65"} },
2371     { Hexagon::BI__builtin_HEXAGON_V6_vroundwuh_128B, {"v60", "v62", "v65"} },
2372     { Hexagon::BI__builtin_HEXAGON_V6_vrsadubi, {"v60", "v62", "v65"} },
2373     { Hexagon::BI__builtin_HEXAGON_V6_vrsadubi_128B, {"v60", "v62", "v65"} },
2374     { Hexagon::BI__builtin_HEXAGON_V6_vrsadubi_acc, {"v60", "v62", "v65"} },
2375     { Hexagon::BI__builtin_HEXAGON_V6_vrsadubi_acc_128B, {"v60", "v62", "v65"} },
2376     { Hexagon::BI__builtin_HEXAGON_V6_vsathub, {"v60", "v62", "v65"} },
2377     { Hexagon::BI__builtin_HEXAGON_V6_vsathub_128B, {"v60", "v62", "v65"} },
2378     { Hexagon::BI__builtin_HEXAGON_V6_vsatuwuh, {"v62", "v65"} },
2379     { Hexagon::BI__builtin_HEXAGON_V6_vsatuwuh_128B, {"v62", "v65"} },
2380     { Hexagon::BI__builtin_HEXAGON_V6_vsatwh, {"v60", "v62", "v65"} },
2381     { Hexagon::BI__builtin_HEXAGON_V6_vsatwh_128B, {"v60", "v62", "v65"} },
2382     { Hexagon::BI__builtin_HEXAGON_V6_vsb, {"v60", "v62", "v65"} },
2383     { Hexagon::BI__builtin_HEXAGON_V6_vsb_128B, {"v60", "v62", "v65"} },
2384     { Hexagon::BI__builtin_HEXAGON_V6_vsh, {"v60", "v62", "v65"} },
2385     { Hexagon::BI__builtin_HEXAGON_V6_vsh_128B, {"v60", "v62", "v65"} },
2386     { Hexagon::BI__builtin_HEXAGON_V6_vshufeh, {"v60", "v62", "v65"} },
2387     { Hexagon::BI__builtin_HEXAGON_V6_vshufeh_128B, {"v60", "v62", "v65"} },
2388     { Hexagon::BI__builtin_HEXAGON_V6_vshuffb, {"v60", "v62", "v65"} },
2389     { Hexagon::BI__builtin_HEXAGON_V6_vshuffb_128B, {"v60", "v62", "v65"} },
2390     { Hexagon::BI__builtin_HEXAGON_V6_vshuffeb, {"v60", "v62", "v65"} },
2391     { Hexagon::BI__builtin_HEXAGON_V6_vshuffeb_128B, {"v60", "v62", "v65"} },
2392     { Hexagon::BI__builtin_HEXAGON_V6_vshuffh, {"v60", "v62", "v65"} },
2393     { Hexagon::BI__builtin_HEXAGON_V6_vshuffh_128B, {"v60", "v62", "v65"} },
2394     { Hexagon::BI__builtin_HEXAGON_V6_vshuffob, {"v60", "v62", "v65"} },
2395     { Hexagon::BI__builtin_HEXAGON_V6_vshuffob_128B, {"v60", "v62", "v65"} },
2396     { Hexagon::BI__builtin_HEXAGON_V6_vshuffvdd, {"v60", "v62", "v65"} },
2397     { Hexagon::BI__builtin_HEXAGON_V6_vshuffvdd_128B, {"v60", "v62", "v65"} },
2398     { Hexagon::BI__builtin_HEXAGON_V6_vshufoeb, {"v60", "v62", "v65"} },
2399     { Hexagon::BI__builtin_HEXAGON_V6_vshufoeb_128B, {"v60", "v62", "v65"} },
2400     { Hexagon::BI__builtin_HEXAGON_V6_vshufoeh, {"v60", "v62", "v65"} },
2401     { Hexagon::BI__builtin_HEXAGON_V6_vshufoeh_128B, {"v60", "v62", "v65"} },
2402     { Hexagon::BI__builtin_HEXAGON_V6_vshufoh, {"v60", "v62", "v65"} },
2403     { Hexagon::BI__builtin_HEXAGON_V6_vshufoh_128B, {"v60", "v62", "v65"} },
2404     { Hexagon::BI__builtin_HEXAGON_V6_vsubb, {"v60", "v62", "v65"} },
2405     { Hexagon::BI__builtin_HEXAGON_V6_vsubb_128B, {"v60", "v62", "v65"} },
2406     { Hexagon::BI__builtin_HEXAGON_V6_vsubb_dv, {"v60", "v62", "v65"} },
2407     { Hexagon::BI__builtin_HEXAGON_V6_vsubb_dv_128B, {"v60", "v62", "v65"} },
2408     { Hexagon::BI__builtin_HEXAGON_V6_vsubbsat, {"v62", "v65"} },
2409     { Hexagon::BI__builtin_HEXAGON_V6_vsubbsat_128B, {"v62", "v65"} },
2410     { Hexagon::BI__builtin_HEXAGON_V6_vsubbsat_dv, {"v62", "v65"} },
2411     { Hexagon::BI__builtin_HEXAGON_V6_vsubbsat_dv_128B, {"v62", "v65"} },
2412     { Hexagon::BI__builtin_HEXAGON_V6_vsubcarry, {"v62", "v65"} },
2413     { Hexagon::BI__builtin_HEXAGON_V6_vsubcarry_128B, {"v62", "v65"} },
2414     { Hexagon::BI__builtin_HEXAGON_V6_vsubh, {"v60", "v62", "v65"} },
2415     { Hexagon::BI__builtin_HEXAGON_V6_vsubh_128B, {"v60", "v62", "v65"} },
2416     { Hexagon::BI__builtin_HEXAGON_V6_vsubh_dv, {"v60", "v62", "v65"} },
2417     { Hexagon::BI__builtin_HEXAGON_V6_vsubh_dv_128B, {"v60", "v62", "v65"} },
2418     { Hexagon::BI__builtin_HEXAGON_V6_vsubhsat, {"v60", "v62", "v65"} },
2419     { Hexagon::BI__builtin_HEXAGON_V6_vsubhsat_128B, {"v60", "v62", "v65"} },
2420     { Hexagon::BI__builtin_HEXAGON_V6_vsubhsat_dv, {"v60", "v62", "v65"} },
2421     { Hexagon::BI__builtin_HEXAGON_V6_vsubhsat_dv_128B, {"v60", "v62", "v65"} },
2422     { Hexagon::BI__builtin_HEXAGON_V6_vsubhw, {"v60", "v62", "v65"} },
2423     { Hexagon::BI__builtin_HEXAGON_V6_vsubhw_128B, {"v60", "v62", "v65"} },
2424     { Hexagon::BI__builtin_HEXAGON_V6_vsububh, {"v60", "v62", "v65"} },
2425     { Hexagon::BI__builtin_HEXAGON_V6_vsububh_128B, {"v60", "v62", "v65"} },
2426     { Hexagon::BI__builtin_HEXAGON_V6_vsububsat, {"v60", "v62", "v65"} },
2427     { Hexagon::BI__builtin_HEXAGON_V6_vsububsat_128B, {"v60", "v62", "v65"} },
2428     { Hexagon::BI__builtin_HEXAGON_V6_vsububsat_dv, {"v60", "v62", "v65"} },
2429     { Hexagon::BI__builtin_HEXAGON_V6_vsububsat_dv_128B, {"v60", "v62", "v65"} },
2430     { Hexagon::BI__builtin_HEXAGON_V6_vsubububb_sat, {"v62", "v65"} },
2431     { Hexagon::BI__builtin_HEXAGON_V6_vsubububb_sat_128B, {"v62", "v65"} },
2432     { Hexagon::BI__builtin_HEXAGON_V6_vsubuhsat, {"v60", "v62", "v65"} },
2433     { Hexagon::BI__builtin_HEXAGON_V6_vsubuhsat_128B, {"v60", "v62", "v65"} },
2434     { Hexagon::BI__builtin_HEXAGON_V6_vsubuhsat_dv, {"v60", "v62", "v65"} },
2435     { Hexagon::BI__builtin_HEXAGON_V6_vsubuhsat_dv_128B, {"v60", "v62", "v65"} },
2436     { Hexagon::BI__builtin_HEXAGON_V6_vsubuhw, {"v60", "v62", "v65"} },
2437     { Hexagon::BI__builtin_HEXAGON_V6_vsubuhw_128B, {"v60", "v62", "v65"} },
2438     { Hexagon::BI__builtin_HEXAGON_V6_vsubuwsat, {"v62", "v65"} },
2439     { Hexagon::BI__builtin_HEXAGON_V6_vsubuwsat_128B, {"v62", "v65"} },
2440     { Hexagon::BI__builtin_HEXAGON_V6_vsubuwsat_dv, {"v62", "v65"} },
2441     { Hexagon::BI__builtin_HEXAGON_V6_vsubuwsat_dv_128B, {"v62", "v65"} },
2442     { Hexagon::BI__builtin_HEXAGON_V6_vsubw, {"v60", "v62", "v65"} },
2443     { Hexagon::BI__builtin_HEXAGON_V6_vsubw_128B, {"v60", "v62", "v65"} },
2444     { Hexagon::BI__builtin_HEXAGON_V6_vsubw_dv, {"v60", "v62", "v65"} },
2445     { Hexagon::BI__builtin_HEXAGON_V6_vsubw_dv_128B, {"v60", "v62", "v65"} },
2446     { Hexagon::BI__builtin_HEXAGON_V6_vsubwsat, {"v60", "v62", "v65"} },
2447     { Hexagon::BI__builtin_HEXAGON_V6_vsubwsat_128B, {"v60", "v62", "v65"} },
2448     { Hexagon::BI__builtin_HEXAGON_V6_vsubwsat_dv, {"v60", "v62", "v65"} },
2449     { Hexagon::BI__builtin_HEXAGON_V6_vsubwsat_dv_128B, {"v60", "v62", "v65"} },
2450     { Hexagon::BI__builtin_HEXAGON_V6_vswap, {"v60", "v62", "v65"} },
2451     { Hexagon::BI__builtin_HEXAGON_V6_vswap_128B, {"v60", "v62", "v65"} },
2452     { Hexagon::BI__builtin_HEXAGON_V6_vtmpyb, {"v60", "v62", "v65"} },
2453     { Hexagon::BI__builtin_HEXAGON_V6_vtmpyb_128B, {"v60", "v62", "v65"} },
2454     { Hexagon::BI__builtin_HEXAGON_V6_vtmpyb_acc, {"v60", "v62", "v65"} },
2455     { Hexagon::BI__builtin_HEXAGON_V6_vtmpyb_acc_128B, {"v60", "v62", "v65"} },
2456     { Hexagon::BI__builtin_HEXAGON_V6_vtmpybus, {"v60", "v62", "v65"} },
2457     { Hexagon::BI__builtin_HEXAGON_V6_vtmpybus_128B, {"v60", "v62", "v65"} },
2458     { Hexagon::BI__builtin_HEXAGON_V6_vtmpybus_acc, {"v60", "v62", "v65"} },
2459     { Hexagon::BI__builtin_HEXAGON_V6_vtmpybus_acc_128B, {"v60", "v62", "v65"} },
2460     { Hexagon::BI__builtin_HEXAGON_V6_vtmpyhb, {"v60", "v62", "v65"} },
2461     { Hexagon::BI__builtin_HEXAGON_V6_vtmpyhb_128B, {"v60", "v62", "v65"} },
2462     { Hexagon::BI__builtin_HEXAGON_V6_vtmpyhb_acc, {"v60", "v62", "v65"} },
2463     { Hexagon::BI__builtin_HEXAGON_V6_vtmpyhb_acc_128B, {"v60", "v62", "v65"} },
2464     { Hexagon::BI__builtin_HEXAGON_V6_vunpackb, {"v60", "v62", "v65"} },
2465     { Hexagon::BI__builtin_HEXAGON_V6_vunpackb_128B, {"v60", "v62", "v65"} },
2466     { Hexagon::BI__builtin_HEXAGON_V6_vunpackh, {"v60", "v62", "v65"} },
2467     { Hexagon::BI__builtin_HEXAGON_V6_vunpackh_128B, {"v60", "v62", "v65"} },
2468     { Hexagon::BI__builtin_HEXAGON_V6_vunpackob, {"v60", "v62", "v65"} },
2469     { Hexagon::BI__builtin_HEXAGON_V6_vunpackob_128B, {"v60", "v62", "v65"} },
2470     { Hexagon::BI__builtin_HEXAGON_V6_vunpackoh, {"v60", "v62", "v65"} },
2471     { Hexagon::BI__builtin_HEXAGON_V6_vunpackoh_128B, {"v60", "v62", "v65"} },
2472     { Hexagon::BI__builtin_HEXAGON_V6_vunpackub, {"v60", "v62", "v65"} },
2473     { Hexagon::BI__builtin_HEXAGON_V6_vunpackub_128B, {"v60", "v62", "v65"} },
2474     { Hexagon::BI__builtin_HEXAGON_V6_vunpackuh, {"v60", "v62", "v65"} },
2475     { Hexagon::BI__builtin_HEXAGON_V6_vunpackuh_128B, {"v60", "v62", "v65"} },
2476     { Hexagon::BI__builtin_HEXAGON_V6_vxor, {"v60", "v62", "v65"} },
2477     { Hexagon::BI__builtin_HEXAGON_V6_vxor_128B, {"v60", "v62", "v65"} },
2478     { Hexagon::BI__builtin_HEXAGON_V6_vzb, {"v60", "v62", "v65"} },
2479     { Hexagon::BI__builtin_HEXAGON_V6_vzb_128B, {"v60", "v62", "v65"} },
2480     { Hexagon::BI__builtin_HEXAGON_V6_vzh, {"v60", "v62", "v65"} },
2481     { Hexagon::BI__builtin_HEXAGON_V6_vzh_128B, {"v60", "v62", "v65"} },
2482   };
2483
2484   const TargetInfo &TI = Context.getTargetInfo();
2485
2486   auto FC = ValidCPU.find(BuiltinID);
2487   if (FC != ValidCPU.end()) {
2488     const TargetOptions &Opts = TI.getTargetOpts();
2489     StringRef CPU = Opts.CPU;
2490     if (!CPU.empty()) {
2491       assert(CPU.startswith("hexagon") && "Unexpected CPU name");
2492       CPU.consume_front("hexagon");
2493       if (llvm::none_of(FC->second, [CPU](StringRef S) { return S == CPU; }))
2494         return Diag(TheCall->getLocStart(),
2495                     diag::err_hexagon_builtin_unsupported_cpu);
2496     }
2497   }
2498
2499   auto FH = ValidHVX.find(BuiltinID);
2500   if (FH != ValidHVX.end()) {
2501     if (!TI.hasFeature("hvx"))
2502       return Diag(TheCall->getLocStart(),
2503                   diag::err_hexagon_builtin_requires_hvx);
2504
2505     bool IsValid = llvm::any_of(FH->second,
2506                                 [&TI] (StringRef V) {
2507                                   std::string F = "hvx" + V.str();
2508                                   return TI.hasFeature(F);
2509                                 });
2510     if (!IsValid)
2511       return Diag(TheCall->getLocStart(),
2512                   diag::err_hexagon_builtin_unsupported_hvx);
2513   }
2514
2515   return false;
2516 }
2517
2518 bool Sema::CheckHexagonBuiltinArgument(unsigned BuiltinID, CallExpr *TheCall) {
2519   struct ArgInfo {
2520     ArgInfo(unsigned O, bool S, unsigned W, unsigned A)
2521       : OpNum(O), IsSigned(S), BitWidth(W), Align(A) {}
2522     unsigned OpNum = 0;
2523     bool IsSigned = false;
2524     unsigned BitWidth = 0;
2525     unsigned Align = 0;
2526   };
2527
2528   static const std::map<unsigned, std::vector<ArgInfo>> Infos = {
2529     { Hexagon::BI__builtin_circ_ldd,                  {{ 3, true,  4,  3 }} },
2530     { Hexagon::BI__builtin_circ_ldw,                  {{ 3, true,  4,  2 }} },
2531     { Hexagon::BI__builtin_circ_ldh,                  {{ 3, true,  4,  1 }} },
2532     { Hexagon::BI__builtin_circ_lduh,                 {{ 3, true,  4,  0 }} },
2533     { Hexagon::BI__builtin_circ_ldb,                  {{ 3, true,  4,  0 }} },
2534     { Hexagon::BI__builtin_circ_ldub,                 {{ 3, true,  4,  0 }} },
2535     { Hexagon::BI__builtin_circ_std,                  {{ 3, true,  4,  3 }} },
2536     { Hexagon::BI__builtin_circ_stw,                  {{ 3, true,  4,  2 }} },
2537     { Hexagon::BI__builtin_circ_sth,                  {{ 3, true,  4,  1 }} },
2538     { Hexagon::BI__builtin_circ_sthhi,                {{ 3, true,  4,  1 }} },
2539     { Hexagon::BI__builtin_circ_stb,                  {{ 3, true,  4,  0 }} },
2540
2541     { Hexagon::BI__builtin_HEXAGON_L2_loadrub_pci,    {{ 1, true,  4,  0 }} },
2542     { Hexagon::BI__builtin_HEXAGON_L2_loadrb_pci,     {{ 1, true,  4,  0 }} },
2543     { Hexagon::BI__builtin_HEXAGON_L2_loadruh_pci,    {{ 1, true,  4,  1 }} },
2544     { Hexagon::BI__builtin_HEXAGON_L2_loadrh_pci,     {{ 1, true,  4,  1 }} },
2545     { Hexagon::BI__builtin_HEXAGON_L2_loadri_pci,     {{ 1, true,  4,  2 }} },
2546     { Hexagon::BI__builtin_HEXAGON_L2_loadrd_pci,     {{ 1, true,  4,  3 }} },
2547     { Hexagon::BI__builtin_HEXAGON_S2_storerb_pci,    {{ 1, true,  4,  0 }} },
2548     { Hexagon::BI__builtin_HEXAGON_S2_storerh_pci,    {{ 1, true,  4,  1 }} },
2549     { Hexagon::BI__builtin_HEXAGON_S2_storerf_pci,    {{ 1, true,  4,  1 }} },
2550     { Hexagon::BI__builtin_HEXAGON_S2_storeri_pci,    {{ 1, true,  4,  2 }} },
2551     { Hexagon::BI__builtin_HEXAGON_S2_storerd_pci,    {{ 1, true,  4,  3 }} },
2552
2553     { Hexagon::BI__builtin_HEXAGON_A2_combineii,      {{ 1, true,  8,  0 }} },
2554     { Hexagon::BI__builtin_HEXAGON_A2_tfrih,          {{ 1, false, 16, 0 }} },
2555     { Hexagon::BI__builtin_HEXAGON_A2_tfril,          {{ 1, false, 16, 0 }} },
2556     { Hexagon::BI__builtin_HEXAGON_A2_tfrpi,          {{ 0, true,  8,  0 }} },
2557     { Hexagon::BI__builtin_HEXAGON_A4_bitspliti,      {{ 1, false, 5,  0 }} },
2558     { Hexagon::BI__builtin_HEXAGON_A4_cmpbeqi,        {{ 1, false, 8,  0 }} },
2559     { Hexagon::BI__builtin_HEXAGON_A4_cmpbgti,        {{ 1, true,  8,  0 }} },
2560     { Hexagon::BI__builtin_HEXAGON_A4_cround_ri,      {{ 1, false, 5,  0 }} },
2561     { Hexagon::BI__builtin_HEXAGON_A4_round_ri,       {{ 1, false, 5,  0 }} },
2562     { Hexagon::BI__builtin_HEXAGON_A4_round_ri_sat,   {{ 1, false, 5,  0 }} },
2563     { Hexagon::BI__builtin_HEXAGON_A4_vcmpbeqi,       {{ 1, false, 8,  0 }} },
2564     { Hexagon::BI__builtin_HEXAGON_A4_vcmpbgti,       {{ 1, true,  8,  0 }} },
2565     { Hexagon::BI__builtin_HEXAGON_A4_vcmpbgtui,      {{ 1, false, 7,  0 }} },
2566     { Hexagon::BI__builtin_HEXAGON_A4_vcmpheqi,       {{ 1, true,  8,  0 }} },
2567     { Hexagon::BI__builtin_HEXAGON_A4_vcmphgti,       {{ 1, true,  8,  0 }} },
2568     { Hexagon::BI__builtin_HEXAGON_A4_vcmphgtui,      {{ 1, false, 7,  0 }} },
2569     { Hexagon::BI__builtin_HEXAGON_A4_vcmpweqi,       {{ 1, true,  8,  0 }} },
2570     { Hexagon::BI__builtin_HEXAGON_A4_vcmpwgti,       {{ 1, true,  8,  0 }} },
2571     { Hexagon::BI__builtin_HEXAGON_A4_vcmpwgtui,      {{ 1, false, 7,  0 }} },
2572     { Hexagon::BI__builtin_HEXAGON_C2_bitsclri,       {{ 1, false, 6,  0 }} },
2573     { Hexagon::BI__builtin_HEXAGON_C2_muxii,          {{ 2, true,  8,  0 }} },
2574     { Hexagon::BI__builtin_HEXAGON_C4_nbitsclri,      {{ 1, false, 6,  0 }} },
2575     { Hexagon::BI__builtin_HEXAGON_F2_dfclass,        {{ 1, false, 5,  0 }} },
2576     { Hexagon::BI__builtin_HEXAGON_F2_dfimm_n,        {{ 0, false, 10, 0 }} },
2577     { Hexagon::BI__builtin_HEXAGON_F2_dfimm_p,        {{ 0, false, 10, 0 }} },
2578     { Hexagon::BI__builtin_HEXAGON_F2_sfclass,        {{ 1, false, 5,  0 }} },
2579     { Hexagon::BI__builtin_HEXAGON_F2_sfimm_n,        {{ 0, false, 10, 0 }} },
2580     { Hexagon::BI__builtin_HEXAGON_F2_sfimm_p,        {{ 0, false, 10, 0 }} },
2581     { Hexagon::BI__builtin_HEXAGON_M4_mpyri_addi,     {{ 2, false, 6,  0 }} },
2582     { Hexagon::BI__builtin_HEXAGON_M4_mpyri_addr_u2,  {{ 1, false, 6,  2 }} },
2583     { Hexagon::BI__builtin_HEXAGON_S2_addasl_rrri,    {{ 2, false, 3,  0 }} },
2584     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_p_acc,    {{ 2, false, 6,  0 }} },
2585     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_p_and,    {{ 2, false, 6,  0 }} },
2586     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_p,        {{ 1, false, 6,  0 }} },
2587     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_p_nac,    {{ 2, false, 6,  0 }} },
2588     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_p_or,     {{ 2, false, 6,  0 }} },
2589     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_p_xacc,   {{ 2, false, 6,  0 }} },
2590     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_r_acc,    {{ 2, false, 5,  0 }} },
2591     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_r_and,    {{ 2, false, 5,  0 }} },
2592     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_r,        {{ 1, false, 5,  0 }} },
2593     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_r_nac,    {{ 2, false, 5,  0 }} },
2594     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_r_or,     {{ 2, false, 5,  0 }} },
2595     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_r_sat,    {{ 1, false, 5,  0 }} },
2596     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_r_xacc,   {{ 2, false, 5,  0 }} },
2597     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_vh,       {{ 1, false, 4,  0 }} },
2598     { Hexagon::BI__builtin_HEXAGON_S2_asl_i_vw,       {{ 1, false, 5,  0 }} },
2599     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_p_acc,    {{ 2, false, 6,  0 }} },
2600     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_p_and,    {{ 2, false, 6,  0 }} },
2601     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_p,        {{ 1, false, 6,  0 }} },
2602     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_p_nac,    {{ 2, false, 6,  0 }} },
2603     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_p_or,     {{ 2, false, 6,  0 }} },
2604     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_p_rnd_goodsyntax,
2605                                                       {{ 1, false, 6,  0 }} },
2606     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_p_rnd,    {{ 1, false, 6,  0 }} },
2607     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_r_acc,    {{ 2, false, 5,  0 }} },
2608     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_r_and,    {{ 2, false, 5,  0 }} },
2609     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_r,        {{ 1, false, 5,  0 }} },
2610     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_r_nac,    {{ 2, false, 5,  0 }} },
2611     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_r_or,     {{ 2, false, 5,  0 }} },
2612     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_r_rnd_goodsyntax,
2613                                                       {{ 1, false, 5,  0 }} },
2614     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_r_rnd,    {{ 1, false, 5,  0 }} },
2615     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_svw_trun, {{ 1, false, 5,  0 }} },
2616     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_vh,       {{ 1, false, 4,  0 }} },
2617     { Hexagon::BI__builtin_HEXAGON_S2_asr_i_vw,       {{ 1, false, 5,  0 }} },
2618     { Hexagon::BI__builtin_HEXAGON_S2_clrbit_i,       {{ 1, false, 5,  0 }} },
2619     { Hexagon::BI__builtin_HEXAGON_S2_extractu,       {{ 1, false, 5,  0 },
2620                                                        { 2, false, 5,  0 }} },
2621     { Hexagon::BI__builtin_HEXAGON_S2_extractup,      {{ 1, false, 6,  0 },
2622                                                        { 2, false, 6,  0 }} },
2623     { Hexagon::BI__builtin_HEXAGON_S2_insert,         {{ 2, false, 5,  0 },
2624                                                        { 3, false, 5,  0 }} },
2625     { Hexagon::BI__builtin_HEXAGON_S2_insertp,        {{ 2, false, 6,  0 },
2626                                                        { 3, false, 6,  0 }} },
2627     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_p_acc,    {{ 2, false, 6,  0 }} },
2628     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_p_and,    {{ 2, false, 6,  0 }} },
2629     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_p,        {{ 1, false, 6,  0 }} },
2630     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_p_nac,    {{ 2, false, 6,  0 }} },
2631     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_p_or,     {{ 2, false, 6,  0 }} },
2632     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_p_xacc,   {{ 2, false, 6,  0 }} },
2633     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_r_acc,    {{ 2, false, 5,  0 }} },
2634     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_r_and,    {{ 2, false, 5,  0 }} },
2635     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_r,        {{ 1, false, 5,  0 }} },
2636     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_r_nac,    {{ 2, false, 5,  0 }} },
2637     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_r_or,     {{ 2, false, 5,  0 }} },
2638     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_r_xacc,   {{ 2, false, 5,  0 }} },
2639     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_vh,       {{ 1, false, 4,  0 }} },
2640     { Hexagon::BI__builtin_HEXAGON_S2_lsr_i_vw,       {{ 1, false, 5,  0 }} },
2641     { Hexagon::BI__builtin_HEXAGON_S2_setbit_i,       {{ 1, false, 5,  0 }} },
2642     { Hexagon::BI__builtin_HEXAGON_S2_tableidxb_goodsyntax,
2643                                                       {{ 2, false, 4,  0 },
2644                                                        { 3, false, 5,  0 }} },
2645     { Hexagon::BI__builtin_HEXAGON_S2_tableidxd_goodsyntax,
2646                                                       {{ 2, false, 4,  0 },
2647                                                        { 3, false, 5,  0 }} },
2648     { Hexagon::BI__builtin_HEXAGON_S2_tableidxh_goodsyntax,
2649                                                       {{ 2, false, 4,  0 },
2650                                                        { 3, false, 5,  0 }} },
2651     { Hexagon::BI__builtin_HEXAGON_S2_tableidxw_goodsyntax,
2652                                                       {{ 2, false, 4,  0 },
2653                                                        { 3, false, 5,  0 }} },
2654     { Hexagon::BI__builtin_HEXAGON_S2_togglebit_i,    {{ 1, false, 5,  0 }} },
2655     { Hexagon::BI__builtin_HEXAGON_S2_tstbit_i,       {{ 1, false, 5,  0 }} },
2656     { Hexagon::BI__builtin_HEXAGON_S2_valignib,       {{ 2, false, 3,  0 }} },
2657     { Hexagon::BI__builtin_HEXAGON_S2_vspliceib,      {{ 2, false, 3,  0 }} },
2658     { Hexagon::BI__builtin_HEXAGON_S4_addi_asl_ri,    {{ 2, false, 5,  0 }} },
2659     { Hexagon::BI__builtin_HEXAGON_S4_addi_lsr_ri,    {{ 2, false, 5,  0 }} },
2660     { Hexagon::BI__builtin_HEXAGON_S4_andi_asl_ri,    {{ 2, false, 5,  0 }} },
2661     { Hexagon::BI__builtin_HEXAGON_S4_andi_lsr_ri,    {{ 2, false, 5,  0 }} },
2662     { Hexagon::BI__builtin_HEXAGON_S4_clbaddi,        {{ 1, true , 6,  0 }} },
2663     { Hexagon::BI__builtin_HEXAGON_S4_clbpaddi,       {{ 1, true,  6,  0 }} },
2664     { Hexagon::BI__builtin_HEXAGON_S4_extract,        {{ 1, false, 5,  0 },
2665                                                        { 2, false, 5,  0 }} },
2666     { Hexagon::BI__builtin_HEXAGON_S4_extractp,       {{ 1, false, 6,  0 },
2667                                                        { 2, false, 6,  0 }} },
2668     { Hexagon::BI__builtin_HEXAGON_S4_lsli,           {{ 0, true,  6,  0 }} },
2669     { Hexagon::BI__builtin_HEXAGON_S4_ntstbit_i,      {{ 1, false, 5,  0 }} },
2670     { Hexagon::BI__builtin_HEXAGON_S4_ori_asl_ri,     {{ 2, false, 5,  0 }} },
2671     { Hexagon::BI__builtin_HEXAGON_S4_ori_lsr_ri,     {{ 2, false, 5,  0 }} },
2672     { Hexagon::BI__builtin_HEXAGON_S4_subi_asl_ri,    {{ 2, false, 5,  0 }} },
2673     { Hexagon::BI__builtin_HEXAGON_S4_subi_lsr_ri,    {{ 2, false, 5,  0 }} },
2674     { Hexagon::BI__builtin_HEXAGON_S4_vrcrotate_acc,  {{ 3, false, 2,  0 }} },
2675     { Hexagon::BI__builtin_HEXAGON_S4_vrcrotate,      {{ 2, false, 2,  0 }} },
2676     { Hexagon::BI__builtin_HEXAGON_S5_asrhub_rnd_sat_goodsyntax,
2677                                                       {{ 1, false, 4,  0 }} },
2678     { Hexagon::BI__builtin_HEXAGON_S5_asrhub_sat,     {{ 1, false, 4,  0 }} },
2679     { Hexagon::BI__builtin_HEXAGON_S5_vasrhrnd_goodsyntax,
2680                                                       {{ 1, false, 4,  0 }} },
2681     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p,        {{ 1, false, 6,  0 }} },
2682     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_acc,    {{ 2, false, 6,  0 }} },
2683     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_and,    {{ 2, false, 6,  0 }} },
2684     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_nac,    {{ 2, false, 6,  0 }} },
2685     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_or,     {{ 2, false, 6,  0 }} },
2686     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_p_xacc,   {{ 2, false, 6,  0 }} },
2687     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r,        {{ 1, false, 5,  0 }} },
2688     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_acc,    {{ 2, false, 5,  0 }} },
2689     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_and,    {{ 2, false, 5,  0 }} },
2690     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_nac,    {{ 2, false, 5,  0 }} },
2691     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_or,     {{ 2, false, 5,  0 }} },
2692     { Hexagon::BI__builtin_HEXAGON_S6_rol_i_r_xacc,   {{ 2, false, 5,  0 }} },
2693     { Hexagon::BI__builtin_HEXAGON_V6_valignbi,       {{ 2, false, 3,  0 }} },
2694     { Hexagon::BI__builtin_HEXAGON_V6_valignbi_128B,  {{ 2, false, 3,  0 }} },
2695     { Hexagon::BI__builtin_HEXAGON_V6_vlalignbi,      {{ 2, false, 3,  0 }} },
2696     { Hexagon::BI__builtin_HEXAGON_V6_vlalignbi_128B, {{ 2, false, 3,  0 }} },
2697     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusi,      {{ 2, false, 1,  0 }} },
2698     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusi_128B, {{ 2, false, 1,  0 }} },
2699     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusi_acc,  {{ 3, false, 1,  0 }} },
2700     { Hexagon::BI__builtin_HEXAGON_V6_vrmpybusi_acc_128B,
2701                                                       {{ 3, false, 1,  0 }} },
2702     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubi,       {{ 2, false, 1,  0 }} },
2703     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubi_128B,  {{ 2, false, 1,  0 }} },
2704     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubi_acc,   {{ 3, false, 1,  0 }} },
2705     { Hexagon::BI__builtin_HEXAGON_V6_vrmpyubi_acc_128B,
2706                                                       {{ 3, false, 1,  0 }} },
2707     { Hexagon::BI__builtin_HEXAGON_V6_vrsadubi,       {{ 2, false, 1,  0 }} },
2708     { Hexagon::BI__builtin_HEXAGON_V6_vrsadubi_128B,  {{ 2, false, 1,  0 }} },
2709     { Hexagon::BI__builtin_HEXAGON_V6_vrsadubi_acc,   {{ 3, false, 1,  0 }} },
2710     { Hexagon::BI__builtin_HEXAGON_V6_vrsadubi_acc_128B,
2711                                                       {{ 3, false, 1,  0 }} },
2712   };
2713
2714   auto F = Infos.find(BuiltinID);
2715   if (F == Infos.end())
2716     return false;
2717
2718   bool Error = false;
2719
2720   for (const ArgInfo &A : F->second) {
2721     int32_t Min = A.IsSigned ? -(1 << (A.BitWidth-1)) : 0;
2722     int32_t Max = (1 << (A.IsSigned ? A.BitWidth-1 : A.BitWidth)) - 1;
2723     if (!A.Align) {
2724       Error |= SemaBuiltinConstantArgRange(TheCall, A.OpNum, Min, Max);
2725     } else {
2726       unsigned M = 1 << A.Align;
2727       Min *= M;
2728       Max *= M;
2729       Error |= SemaBuiltinConstantArgRange(TheCall, A.OpNum, Min, Max) |
2730                SemaBuiltinConstantArgMultiple(TheCall, A.OpNum, M);
2731     }
2732   }
2733   return Error;
2734 }
2735
2736 bool Sema::CheckHexagonBuiltinFunctionCall(unsigned BuiltinID,
2737                                            CallExpr *TheCall) {
2738   return CheckHexagonBuiltinCpu(BuiltinID, TheCall) ||
2739          CheckHexagonBuiltinArgument(BuiltinID, TheCall);
2740 }
2741
2742
2743 // CheckMipsBuiltinFunctionCall - Checks the constant value passed to the
2744 // intrinsic is correct. The switch statement is ordered by DSP, MSA. The
2745 // ordering for DSP is unspecified. MSA is ordered by the data format used
2746 // by the underlying instruction i.e., df/m, df/n and then by size.
2747 //
2748 // FIXME: The size tests here should instead be tablegen'd along with the
2749 //        definitions from include/clang/Basic/BuiltinsMips.def.
2750 // FIXME: GCC is strict on signedness for some of these intrinsics, we should
2751 //        be too.
2752 bool Sema::CheckMipsBuiltinFunctionCall(unsigned BuiltinID, CallExpr *TheCall) {
2753   unsigned i = 0, l = 0, u = 0, m = 0;
2754   switch (BuiltinID) {
2755   default: return false;
2756   case Mips::BI__builtin_mips_wrdsp: i = 1; l = 0; u = 63; break;
2757   case Mips::BI__builtin_mips_rddsp: i = 0; l = 0; u = 63; break;
2758   case Mips::BI__builtin_mips_append: i = 2; l = 0; u = 31; break;
2759   case Mips::BI__builtin_mips_balign: i = 2; l = 0; u = 3; break;
2760   case Mips::BI__builtin_mips_precr_sra_ph_w: i = 2; l = 0; u = 31; break;
2761   case Mips::BI__builtin_mips_precr_sra_r_ph_w: i = 2; l = 0; u = 31; break;
2762   case Mips::BI__builtin_mips_prepend: i = 2; l = 0; u = 31; break;
2763   // MSA instrinsics. Instructions (which the intrinsics maps to) which use the
2764   // df/m field.
2765   // These intrinsics take an unsigned 3 bit immediate.
2766   case Mips::BI__builtin_msa_bclri_b:
2767   case Mips::BI__builtin_msa_bnegi_b:
2768   case Mips::BI__builtin_msa_bseti_b:
2769   case Mips::BI__builtin_msa_sat_s_b:
2770   case Mips::BI__builtin_msa_sat_u_b:
2771   case Mips::BI__builtin_msa_slli_b:
2772   case Mips::BI__builtin_msa_srai_b:
2773   case Mips::BI__builtin_msa_srari_b:
2774   case Mips::BI__builtin_msa_srli_b:
2775   case Mips::BI__builtin_msa_srlri_b: i = 1; l = 0; u = 7; break;
2776   case Mips::BI__builtin_msa_binsli_b:
2777   case Mips::BI__builtin_msa_binsri_b: i = 2; l = 0; u = 7; break;
2778   // These intrinsics take an unsigned 4 bit immediate.
2779   case Mips::BI__builtin_msa_bclri_h:
2780   case Mips::BI__builtin_msa_bnegi_h:
2781   case Mips::BI__builtin_msa_bseti_h:
2782   case Mips::BI__builtin_msa_sat_s_h:
2783   case Mips::BI__builtin_msa_sat_u_h:
2784   case Mips::BI__builtin_msa_slli_h:
2785   case Mips::BI__builtin_msa_srai_h:
2786   case Mips::BI__builtin_msa_srari_h:
2787   case Mips::BI__builtin_msa_srli_h:
2788   case Mips::BI__builtin_msa_srlri_h: i = 1; l = 0; u = 15; break;
2789   case Mips::BI__builtin_msa_binsli_h:
2790   case Mips::BI__builtin_msa_binsri_h: i = 2; l = 0; u = 15; break;
2791   // These intrinsics take an unsigned 5 bit immediate.
2792   // The first block of intrinsics actually have an unsigned 5 bit field,
2793   // not a df/n field.
2794   case Mips::BI__builtin_msa_clei_u_b:
2795   case Mips::BI__builtin_msa_clei_u_h:
2796   case Mips::BI__builtin_msa_clei_u_w:
2797   case Mips::BI__builtin_msa_clei_u_d:
2798   case Mips::BI__builtin_msa_clti_u_b:
2799   case Mips::BI__builtin_msa_clti_u_h:
2800   case Mips::BI__builtin_msa_clti_u_w:
2801   case Mips::BI__builtin_msa_clti_u_d:
2802   case Mips::BI__builtin_msa_maxi_u_b:
2803   case Mips::BI__builtin_msa_maxi_u_h:
2804   case Mips::BI__builtin_msa_maxi_u_w:
2805   case Mips::BI__builtin_msa_maxi_u_d:
2806   case Mips::BI__builtin_msa_mini_u_b:
2807   case Mips::BI__builtin_msa_mini_u_h:
2808   case Mips::BI__builtin_msa_mini_u_w:
2809   case Mips::BI__builtin_msa_mini_u_d:
2810   case Mips::BI__builtin_msa_addvi_b:
2811   case Mips::BI__builtin_msa_addvi_h:
2812   case Mips::BI__builtin_msa_addvi_w:
2813   case Mips::BI__builtin_msa_addvi_d:
2814   case Mips::BI__builtin_msa_bclri_w:
2815   case Mips::BI__builtin_msa_bnegi_w:
2816   case Mips::BI__builtin_msa_bseti_w:
2817   case Mips::BI__builtin_msa_sat_s_w:
2818   case Mips::BI__builtin_msa_sat_u_w:
2819   case Mips::BI__builtin_msa_slli_w:
2820   case Mips::BI__builtin_msa_srai_w:
2821   case Mips::BI__builtin_msa_srari_w:
2822   case Mips::BI__builtin_msa_srli_w:
2823   case Mips::BI__builtin_msa_srlri_w:
2824   case Mips::BI__builtin_msa_subvi_b:
2825   case Mips::BI__builtin_msa_subvi_h:
2826   case Mips::BI__builtin_msa_subvi_w:
2827   case Mips::BI__builtin_msa_subvi_d: i = 1; l = 0; u = 31; break;
2828   case Mips::BI__builtin_msa_binsli_w:
2829   case Mips::BI__builtin_msa_binsri_w: i = 2; l = 0; u = 31; break;
2830   // These intrinsics take an unsigned 6 bit immediate.
2831   case Mips::BI__builtin_msa_bclri_d:
2832   case Mips::BI__builtin_msa_bnegi_d:
2833   case Mips::BI__builtin_msa_bseti_d:
2834   case Mips::BI__builtin_msa_sat_s_d:
2835   case Mips::BI__builtin_msa_sat_u_d:
2836   case Mips::BI__builtin_msa_slli_d:
2837   case Mips::BI__builtin_msa_srai_d:
2838   case Mips::BI__builtin_msa_srari_d:
2839   case Mips::BI__builtin_msa_srli_d:
2840   case Mips::BI__builtin_msa_srlri_d: i = 1; l = 0; u = 63; break;
2841   case Mips::BI__builtin_msa_binsli_d:
2842   case Mips::BI__builtin_msa_binsri_d: i = 2; l = 0; u = 63; break;
2843   // These intrinsics take a signed 5 bit immediate.
2844   case Mips::BI__builtin_msa_ceqi_b:
2845   case Mips::BI__builtin_msa_ceqi_h:
2846   case Mips::BI__builtin_msa_ceqi_w:
2847   case Mips::BI__builtin_msa_ceqi_d:
2848   case Mips::BI__builtin_msa_clti_s_b:
2849   case Mips::BI__builtin_msa_clti_s_h:
2850   case Mips::BI__builtin_msa_clti_s_w:
2851   case Mips::BI__builtin_msa_clti_s_d:
2852   case Mips::BI__builtin_msa_clei_s_b:
2853   case Mips::BI__builtin_msa_clei_s_h:
2854   case Mips::BI__builtin_msa_clei_s_w:
2855   case Mips::BI__builtin_msa_clei_s_d:
2856   case Mips::BI__builtin_msa_maxi_s_b:
2857   case Mips::BI__builtin_msa_maxi_s_h:
2858   case Mips::BI__builtin_msa_maxi_s_w:
2859   case Mips::BI__builtin_msa_maxi_s_d:
2860   case Mips::BI__builtin_msa_mini_s_b:
2861   case Mips::BI__builtin_msa_mini_s_h:
2862   case Mips::BI__builtin_msa_mini_s_w:
2863   case Mips::BI__builtin_msa_mini_s_d: i = 1; l = -16; u = 15; break;
2864   // These intrinsics take an unsigned 8 bit immediate.
2865   case Mips::BI__builtin_msa_andi_b:
2866   case Mips::BI__builtin_msa_nori_b:
2867   case Mips::BI__builtin_msa_ori_b:
2868   case Mips::BI__builtin_msa_shf_b:
2869   case Mips::BI__builtin_msa_shf_h:
2870   case Mips::BI__builtin_msa_shf_w:
2871   case Mips::BI__builtin_msa_xori_b: i = 1; l = 0; u = 255; break;
2872   case Mips::BI__builtin_msa_bseli_b:
2873   case Mips::BI__builtin_msa_bmnzi_b:
2874   case Mips::BI__builtin_msa_bmzi_b: i = 2; l = 0; u = 255; break;
2875   // df/n format
2876   // These intrinsics take an unsigned 4 bit immediate.
2877   case Mips::BI__builtin_msa_copy_s_b:
2878   case Mips::BI__builtin_msa_copy_u_b:
2879   case Mips::BI__builtin_msa_insve_b:
2880   case Mips::BI__builtin_msa_splati_b: i = 1; l = 0; u = 15; break;
2881   case Mips::BI__builtin_msa_sldi_b: i = 2; l = 0; u = 15; break;
2882   // These intrinsics take an unsigned 3 bit immediate.
2883   case Mips::BI__builtin_msa_copy_s_h:
2884   case Mips::BI__builtin_msa_copy_u_h:
2885   case Mips::BI__builtin_msa_insve_h:
2886   case Mips::BI__builtin_msa_splati_h: i = 1; l = 0; u = 7; break;
2887   case Mips::BI__builtin_msa_sldi_h: i = 2; l = 0; u = 7; break;
2888   // These intrinsics take an unsigned 2 bit immediate.
2889   case Mips::BI__builtin_msa_copy_s_w:
2890   case Mips::BI__builtin_msa_copy_u_w:
2891   case Mips::BI__builtin_msa_insve_w:
2892   case Mips::BI__builtin_msa_splati_w: i = 1; l = 0; u = 3; break;
2893   case Mips::BI__builtin_msa_sldi_w: i = 2; l = 0; u = 3; break;
2894   // These intrinsics take an unsigned 1 bit immediate.
2895   case Mips::BI__builtin_msa_copy_s_d:
2896   case Mips::BI__builtin_msa_copy_u_d:
2897   case Mips::BI__builtin_msa_insve_d:
2898   case Mips::BI__builtin_msa_splati_d: i = 1; l = 0; u = 1; break;
2899   case Mips::BI__builtin_msa_sldi_d: i = 2; l = 0; u = 1; break;
2900   // Memory offsets and immediate loads.
2901   // These intrinsics take a signed 10 bit immediate.
2902   case Mips::BI__builtin_msa_ldi_b: i = 0; l = -128; u = 255; break;
2903   case Mips::BI__builtin_msa_ldi_h:
2904   case Mips::BI__builtin_msa_ldi_w:
2905   case Mips::BI__builtin_msa_ldi_d: i = 0; l = -512; u = 511; break;
2906   case Mips::BI__builtin_msa_ld_b: i = 1; l = -512; u = 511; m = 16; break;
2907   case Mips::BI__builtin_msa_ld_h: i = 1; l = -1024; u = 1022; m = 16; break;
2908   case Mips::BI__builtin_msa_ld_w: i = 1; l = -2048; u = 2044; m = 16; break;
2909   case Mips::BI__builtin_msa_ld_d: i = 1; l = -4096; u = 4088; m = 16; break;
2910   case Mips::BI__builtin_msa_st_b: i = 2; l = -512; u = 511; m = 16; break;
2911   case Mips::BI__builtin_msa_st_h: i = 2; l = -1024; u = 1022; m = 16; break;
2912   case Mips::BI__builtin_msa_st_w: i = 2; l = -2048; u = 2044; m = 16; break;
2913   case Mips::BI__builtin_msa_st_d: i = 2; l = -4096; u = 4088; m = 16; break;
2914   }
2915
2916   if (!m)
2917     return SemaBuiltinConstantArgRange(TheCall, i, l, u);
2918
2919   return SemaBuiltinConstantArgRange(TheCall, i, l, u) ||
2920          SemaBuiltinConstantArgMultiple(TheCall, i, m);
2921 }
2922
2923 bool Sema::CheckPPCBuiltinFunctionCall(unsigned BuiltinID, CallExpr *TheCall) {
2924   unsigned i = 0, l = 0, u = 0;
2925   bool Is64BitBltin = BuiltinID == PPC::BI__builtin_divde ||
2926                       BuiltinID == PPC::BI__builtin_divdeu ||
2927                       BuiltinID == PPC::BI__builtin_bpermd;
2928   bool IsTarget64Bit = Context.getTargetInfo()
2929                               .getTypeWidth(Context
2930                                             .getTargetInfo()
2931                                             .getIntPtrType()) == 64;
2932   bool IsBltinExtDiv = BuiltinID == PPC::BI__builtin_divwe ||
2933                        BuiltinID == PPC::BI__builtin_divweu ||
2934                        BuiltinID == PPC::BI__builtin_divde ||
2935                        BuiltinID == PPC::BI__builtin_divdeu;
2936
2937   if (Is64BitBltin && !IsTarget64Bit)
2938       return Diag(TheCall->getLocStart(), diag::err_64_bit_builtin_32_bit_tgt)
2939              << TheCall->getSourceRange();
2940
2941   if ((IsBltinExtDiv && !Context.getTargetInfo().hasFeature("extdiv")) ||
2942       (BuiltinID == PPC::BI__builtin_bpermd &&
2943        !Context.getTargetInfo().hasFeature("bpermd")))
2944     return Diag(TheCall->getLocStart(), diag::err_ppc_builtin_only_on_pwr7)
2945            << TheCall->getSourceRange();
2946
2947   switch (BuiltinID) {
2948   default: return false;
2949   case PPC::BI__builtin_altivec_crypto_vshasigmaw:
2950   case PPC::BI__builtin_altivec_crypto_vshasigmad:
2951     return SemaBuiltinConstantArgRange(TheCall, 1, 0, 1) ||
2952            SemaBuiltinConstantArgRange(TheCall, 2, 0, 15);
2953   case PPC::BI__builtin_tbegin:
2954   case PPC::BI__builtin_tend: i = 0; l = 0; u = 1; break;
2955   case PPC::BI__builtin_tsr: i = 0; l = 0; u = 7; break;
2956   case PPC::BI__builtin_tabortwc:
2957   case PPC::BI__builtin_tabortdc: i = 0; l = 0; u = 31; break;
2958   case PPC::BI__builtin_tabortwci:
2959   case PPC::BI__builtin_tabortdci:
2960     return SemaBuiltinConstantArgRange(TheCall, 0, 0, 31) ||
2961            SemaBuiltinConstantArgRange(TheCall, 2, 0, 31);
2962   case PPC::BI__builtin_vsx_xxpermdi:
2963   case PPC::BI__builtin_vsx_xxsldwi:
2964     return SemaBuiltinVSX(TheCall);
2965   }
2966   return SemaBuiltinConstantArgRange(TheCall, i, l, u);
2967 }
2968
2969 bool Sema::CheckSystemZBuiltinFunctionCall(unsigned BuiltinID,
2970                                            CallExpr *TheCall) {
2971   if (BuiltinID == SystemZ::BI__builtin_tabort) {
2972     Expr *Arg = TheCall->getArg(0);
2973     llvm::APSInt AbortCode(32);
2974     if (Arg->isIntegerConstantExpr(AbortCode, Context) &&
2975         AbortCode.getSExtValue() >= 0 && AbortCode.getSExtValue() < 256)
2976       return Diag(Arg->getLocStart(), diag::err_systemz_invalid_tabort_code)
2977              << Arg->getSourceRange();
2978   }
2979
2980   // For intrinsics which take an immediate value as part of the instruction,
2981   // range check them here.
2982   unsigned i = 0, l = 0, u = 0;
2983   switch (BuiltinID) {
2984   default: return false;
2985   case SystemZ::BI__builtin_s390_lcbb: i = 1; l = 0; u = 15; break;
2986   case SystemZ::BI__builtin_s390_verimb:
2987   case SystemZ::BI__builtin_s390_verimh:
2988   case SystemZ::BI__builtin_s390_verimf:
2989   case SystemZ::BI__builtin_s390_verimg: i = 3; l = 0; u = 255; break;
2990   case SystemZ::BI__builtin_s390_vfaeb:
2991   case SystemZ::BI__builtin_s390_vfaeh:
2992   case SystemZ::BI__builtin_s390_vfaef:
2993   case SystemZ::BI__builtin_s390_vfaebs:
2994   case SystemZ::BI__builtin_s390_vfaehs:
2995   case SystemZ::BI__builtin_s390_vfaefs:
2996   case SystemZ::BI__builtin_s390_vfaezb:
2997   case SystemZ::BI__builtin_s390_vfaezh:
2998   case SystemZ::BI__builtin_s390_vfaezf:
2999   case SystemZ::BI__builtin_s390_vfaezbs:
3000   case SystemZ::BI__builtin_s390_vfaezhs:
3001   case SystemZ::BI__builtin_s390_vfaezfs: i = 2; l = 0; u = 15; break;
3002   case SystemZ::BI__builtin_s390_vfisb:
3003   case SystemZ::BI__builtin_s390_vfidb:
3004     return SemaBuiltinConstantArgRange(TheCall, 1, 0, 15) ||
3005            SemaBuiltinConstantArgRange(TheCall, 2, 0, 15);
3006   case SystemZ::BI__builtin_s390_vftcisb:
3007   case SystemZ::BI__builtin_s390_vftcidb: i = 1; l = 0; u = 4095; break;
3008   case SystemZ::BI__builtin_s390_vlbb: i = 1; l = 0; u = 15; break;
3009   case SystemZ::BI__builtin_s390_vpdi: i = 2; l = 0; u = 15; break;
3010   case SystemZ::BI__builtin_s390_vsldb: i = 2; l = 0; u = 15; break;
3011   case SystemZ::BI__builtin_s390_vstrcb:
3012   case SystemZ::BI__builtin_s390_vstrch:
3013   case SystemZ::BI__builtin_s390_vstrcf:
3014   case SystemZ::BI__builtin_s390_vstrczb:
3015   case SystemZ::BI__builtin_s390_vstrczh:
3016   case SystemZ::BI__builtin_s390_vstrczf:
3017   case SystemZ::BI__builtin_s390_vstrcbs:
3018   case SystemZ::BI__builtin_s390_vstrchs:
3019   case SystemZ::BI__builtin_s390_vstrcfs:
3020   case SystemZ::BI__builtin_s390_vstrczbs:
3021   case SystemZ::BI__builtin_s390_vstrczhs:
3022   case SystemZ::BI__builtin_s390_vstrczfs: i = 3; l = 0; u = 15; break;
3023   case SystemZ::BI__builtin_s390_vmslg: i = 3; l = 0; u = 15; break;
3024   case SystemZ::BI__builtin_s390_vfminsb:
3025   case SystemZ::BI__builtin_s390_vfmaxsb:
3026   case SystemZ::BI__builtin_s390_vfmindb:
3027   case SystemZ::BI__builtin_s390_vfmaxdb: i = 2; l = 0; u = 15; break;
3028   }
3029   return SemaBuiltinConstantArgRange(TheCall, i, l, u);
3030 }
3031
3032 /// SemaBuiltinCpuSupports - Handle __builtin_cpu_supports(char *).
3033 /// This checks that the target supports __builtin_cpu_supports and
3034 /// that the string argument is constant and valid.
3035 static bool SemaBuiltinCpuSupports(Sema &S, CallExpr *TheCall) {
3036   Expr *Arg = TheCall->getArg(0);
3037
3038   // Check if the argument is a string literal.
3039   if (!isa<StringLiteral>(Arg->IgnoreParenImpCasts()))
3040     return S.Diag(TheCall->getLocStart(), diag::err_expr_not_string_literal)
3041            << Arg->getSourceRange();
3042
3043   // Check the contents of the string.
3044   StringRef Feature =
3045       cast<StringLiteral>(Arg->IgnoreParenImpCasts())->getString();
3046   if (!S.Context.getTargetInfo().validateCpuSupports(Feature))
3047     return S.Diag(TheCall->getLocStart(), diag::err_invalid_cpu_supports)
3048            << Arg->getSourceRange();
3049   return false;
3050 }
3051
3052 /// SemaBuiltinCpuIs - Handle __builtin_cpu_is(char *).
3053 /// This checks that the target supports __builtin_cpu_is and
3054 /// that the string argument is constant and valid.
3055 static bool SemaBuiltinCpuIs(Sema &S, CallExpr *TheCall) {
3056   Expr *Arg = TheCall->getArg(0);
3057
3058   // Check if the argument is a string literal.
3059   if (!isa<StringLiteral>(Arg->IgnoreParenImpCasts()))
3060     return S.Diag(TheCall->getLocStart(), diag::err_expr_not_string_literal)
3061            << Arg->getSourceRange();
3062
3063   // Check the contents of the string.
3064   StringRef Feature =
3065       cast<StringLiteral>(Arg->IgnoreParenImpCasts())->getString();
3066   if (!S.Context.getTargetInfo().validateCpuIs(Feature))
3067     return S.Diag(TheCall->getLocStart(), diag::err_invalid_cpu_is)
3068            << Arg->getSourceRange();
3069   return false;
3070 }
3071
3072 // Check if the rounding mode is legal.
3073 bool Sema::CheckX86BuiltinRoundingOrSAE(unsigned BuiltinID, CallExpr *TheCall) {
3074   // Indicates if this instruction has rounding control or just SAE.
3075   bool HasRC = false;
3076
3077   unsigned ArgNum = 0;
3078   switch (BuiltinID) {
3079   default:
3080     return false;
3081   case X86::BI__builtin_ia32_vcvttsd2si32:
3082   case X86::BI__builtin_ia32_vcvttsd2si64:
3083   case X86::BI__builtin_ia32_vcvttsd2usi32:
3084   case X86::BI__builtin_ia32_vcvttsd2usi64:
3085   case X86::BI__builtin_ia32_vcvttss2si32:
3086   case X86::BI__builtin_ia32_vcvttss2si64:
3087   case X86::BI__builtin_ia32_vcvttss2usi32:
3088   case X86::BI__builtin_ia32_vcvttss2usi64:
3089     ArgNum = 1;
3090     break;
3091   case X86::BI__builtin_ia32_maxpd512:
3092   case X86::BI__builtin_ia32_maxps512:
3093   case X86::BI__builtin_ia32_minpd512:
3094   case X86::BI__builtin_ia32_minps512:
3095     ArgNum = 2;
3096     break;
3097   case X86::BI__builtin_ia32_cvtps2pd512_mask:
3098   case X86::BI__builtin_ia32_cvttpd2dq512_mask:
3099   case X86::BI__builtin_ia32_cvttpd2qq512_mask:
3100   case X86::BI__builtin_ia32_cvttpd2udq512_mask:
3101   case X86::BI__builtin_ia32_cvttpd2uqq512_mask:
3102   case X86::BI__builtin_ia32_cvttps2dq512_mask:
3103   case X86::BI__builtin_ia32_cvttps2qq512_mask:
3104   case X86::BI__builtin_ia32_cvttps2udq512_mask:
3105   case X86::BI__builtin_ia32_cvttps2uqq512_mask:
3106   case X86::BI__builtin_ia32_exp2pd_mask:
3107   case X86::BI__builtin_ia32_exp2ps_mask:
3108   case X86::BI__builtin_ia32_getexppd512_mask:
3109   case X86::BI__builtin_ia32_getexpps512_mask:
3110   case X86::BI__builtin_ia32_rcp28pd_mask:
3111   case X86::BI__builtin_ia32_rcp28ps_mask:
3112   case X86::BI__builtin_ia32_rsqrt28pd_mask:
3113   case X86::BI__builtin_ia32_rsqrt28ps_mask:
3114   case X86::BI__builtin_ia32_vcomisd:
3115   case X86::BI__builtin_ia32_vcomiss:
3116   case X86::BI__builtin_ia32_vcvtph2ps512_mask:
3117     ArgNum = 3;
3118     break;
3119   case X86::BI__builtin_ia32_cmppd512_mask:
3120   case X86::BI__builtin_ia32_cmpps512_mask:
3121   case X86::BI__builtin_ia32_cmpsd_mask:
3122   case X86::BI__builtin_ia32_cmpss_mask:
3123   case X86::BI__builtin_ia32_cvtss2sd_round_mask:
3124   case X86::BI__builtin_ia32_getexpsd128_round_mask:
3125   case X86::BI__builtin_ia32_getexpss128_round_mask:
3126   case X86::BI__builtin_ia32_maxsd_round_mask:
3127   case X86::BI__builtin_ia32_maxss_round_mask:
3128   case X86::BI__builtin_ia32_minsd_round_mask:
3129   case X86::BI__builtin_ia32_minss_round_mask:
3130   case X86::BI__builtin_ia32_rcp28sd_round_mask:
3131   case X86::BI__builtin_ia32_rcp28ss_round_mask:
3132   case X86::BI__builtin_ia32_reducepd512_mask:
3133   case X86::BI__builtin_ia32_reduceps512_mask:
3134   case X86::BI__builtin_ia32_rndscalepd_mask:
3135   case X86::BI__builtin_ia32_rndscaleps_mask:
3136   case X86::BI__builtin_ia32_rsqrt28sd_round_mask:
3137   case X86::BI__builtin_ia32_rsqrt28ss_round_mask:
3138     ArgNum = 4;
3139     break;
3140   case X86::BI__builtin_ia32_fixupimmpd512_mask:
3141   case X86::BI__builtin_ia32_fixupimmpd512_maskz:
3142   case X86::BI__builtin_ia32_fixupimmps512_mask:
3143   case X86::BI__builtin_ia32_fixupimmps512_maskz:
3144   case X86::BI__builtin_ia32_fixupimmsd_mask:
3145   case X86::BI__builtin_ia32_fixupimmsd_maskz:
3146   case X86::BI__builtin_ia32_fixupimmss_mask:
3147   case X86::BI__builtin_ia32_fixupimmss_maskz:
3148   case X86::BI__builtin_ia32_rangepd512_mask:
3149   case X86::BI__builtin_ia32_rangeps512_mask:
3150   case X86::BI__builtin_ia32_rangesd128_round_mask:
3151   case X86::BI__builtin_ia32_rangess128_round_mask:
3152   case X86::BI__builtin_ia32_reducesd_mask:
3153   case X86::BI__builtin_ia32_reducess_mask:
3154   case X86::BI__builtin_ia32_rndscalesd_round_mask:
3155   case X86::BI__builtin_ia32_rndscaless_round_mask:
3156     ArgNum = 5;
3157     break;
3158   case X86::BI__builtin_ia32_vcvtsd2si64:
3159   case X86::BI__builtin_ia32_vcvtsd2si32:
3160   case X86::BI__builtin_ia32_vcvtsd2usi32:
3161   case X86::BI__builtin_ia32_vcvtsd2usi64:
3162   case X86::BI__builtin_ia32_vcvtss2si32:
3163   case X86::BI__builtin_ia32_vcvtss2si64:
3164   case X86::BI__builtin_ia32_vcvtss2usi32:
3165   case X86::BI__builtin_ia32_vcvtss2usi64:
3166   case X86::BI__builtin_ia32_sqrtpd512:
3167   case X86::BI__builtin_ia32_sqrtps512:
3168     ArgNum = 1;
3169     HasRC = true;
3170     break;
3171   case X86::BI__builtin_ia32_addpd512:
3172   case X86::BI__builtin_ia32_addps512:
3173   case X86::BI__builtin_ia32_divpd512:
3174   case X86::BI__builtin_ia32_divps512:
3175   case X86::BI__builtin_ia32_mulpd512:
3176   case X86::BI__builtin_ia32_mulps512:
3177   case X86::BI__builtin_ia32_subpd512:
3178   case X86::BI__builtin_ia32_subps512:
3179   case X86::BI__builtin_ia32_cvtsi2sd64:
3180   case X86::BI__builtin_ia32_cvtsi2ss32:
3181   case X86::BI__builtin_ia32_cvtsi2ss64:
3182   case X86::BI__builtin_ia32_cvtusi2sd64:
3183   case X86::BI__builtin_ia32_cvtusi2ss32:
3184   case X86::BI__builtin_ia32_cvtusi2ss64:
3185     ArgNum = 2;
3186     HasRC = true;
3187     break;
3188   case X86::BI__builtin_ia32_cvtdq2ps512_mask:
3189   case X86::BI__builtin_ia32_cvtudq2ps512_mask:
3190   case X86::BI__builtin_ia32_cvtpd2ps512_mask:
3191   case X86::BI__builtin_ia32_cvtpd2qq512_mask:
3192   case X86::BI__builtin_ia32_cvtpd2uqq512_mask:
3193   case X86::BI__builtin_ia32_cvtps2qq512_mask:
3194   case X86::BI__builtin_ia32_cvtps2uqq512_mask:
3195   case X86::BI__builtin_ia32_cvtqq2pd512_mask:
3196   case X86::BI__builtin_ia32_cvtqq2ps512_mask:
3197   case X86::BI__builtin_ia32_cvtuqq2pd512_mask:
3198   case X86::BI__builtin_ia32_cvtuqq2ps512_mask:
3199     ArgNum = 3;
3200     HasRC = true;
3201     break;
3202   case X86::BI__builtin_ia32_addss_round_mask:
3203   case X86::BI__builtin_ia32_addsd_round_mask:
3204   case X86::BI__builtin_ia32_divss_round_mask:
3205   case X86::BI__builtin_ia32_divsd_round_mask:
3206   case X86::BI__builtin_ia32_mulss_round_mask:
3207   case X86::BI__builtin_ia32_mulsd_round_mask:
3208   case X86::BI__builtin_ia32_subss_round_mask:
3209   case X86::BI__builtin_ia32_subsd_round_mask:
3210   case X86::BI__builtin_ia32_scalefpd512_mask:
3211   case X86::BI__builtin_ia32_scalefps512_mask:
3212   case X86::BI__builtin_ia32_scalefsd_round_mask:
3213   case X86::BI__builtin_ia32_scalefss_round_mask:
3214   case X86::BI__builtin_ia32_getmantpd512_mask:
3215   case X86::BI__builtin_ia32_getmantps512_mask:
3216   case X86::BI__builtin_ia32_cvtsd2ss_round_mask:
3217   case X86::BI__builtin_ia32_sqrtsd_round_mask:
3218   case X86::BI__builtin_ia32_sqrtss_round_mask:
3219   case X86::BI__builtin_ia32_vfmaddsd3_mask:
3220   case X86::BI__builtin_ia32_vfmaddsd3_maskz:
3221   case X86::BI__builtin_ia32_vfmaddsd3_mask3:
3222   case X86::BI__builtin_ia32_vfmaddss3_mask:
3223   case X86::BI__builtin_ia32_vfmaddss3_maskz:
3224   case X86::BI__builtin_ia32_vfmaddss3_mask3:
3225   case X86::BI__builtin_ia32_vfmaddpd512_mask:
3226   case X86::BI__builtin_ia32_vfmaddpd512_maskz:
3227   case X86::BI__builtin_ia32_vfmaddpd512_mask3:
3228   case X86::BI__builtin_ia32_vfmsubpd512_mask3:
3229   case X86::BI__builtin_ia32_vfmaddps512_mask:
3230   case X86::BI__builtin_ia32_vfmaddps512_maskz:
3231   case X86::BI__builtin_ia32_vfmaddps512_mask3:
3232   case X86::BI__builtin_ia32_vfmsubps512_mask3:
3233   case X86::BI__builtin_ia32_vfmaddsubpd512_mask:
3234   case X86::BI__builtin_ia32_vfmaddsubpd512_maskz:
3235   case X86::BI__builtin_ia32_vfmaddsubpd512_mask3:
3236   case X86::BI__builtin_ia32_vfmsubaddpd512_mask3:
3237   case X86::BI__builtin_ia32_vfmaddsubps512_mask:
3238   case X86::BI__builtin_ia32_vfmaddsubps512_maskz:
3239   case X86::BI__builtin_ia32_vfmaddsubps512_mask3:
3240   case X86::BI__builtin_ia32_vfmsubaddps512_mask3:
3241     ArgNum = 4;
3242     HasRC = true;
3243     break;
3244   case X86::BI__builtin_ia32_getmantsd_round_mask:
3245   case X86::BI__builtin_ia32_getmantss_round_mask:
3246     ArgNum = 5;
3247     HasRC = true;
3248     break;
3249   }
3250
3251   llvm::APSInt Result;
3252
3253   // We can't check the value of a dependent argument.
3254   Expr *Arg = TheCall->getArg(ArgNum);
3255   if (Arg->isTypeDependent() || Arg->isValueDependent())
3256     return false;
3257
3258   // Check constant-ness first.
3259   if (SemaBuiltinConstantArg(TheCall, ArgNum, Result))
3260     return true;
3261
3262   // Make sure rounding mode is either ROUND_CUR_DIRECTION or ROUND_NO_EXC bit
3263   // is set. If the intrinsic has rounding control(bits 1:0), make sure its only
3264   // combined with ROUND_NO_EXC.
3265   if (Result == 4/*ROUND_CUR_DIRECTION*/ ||
3266       Result == 8/*ROUND_NO_EXC*/ ||
3267       (HasRC && Result.getZExtValue() >= 8 && Result.getZExtValue() <= 11))
3268     return false;
3269
3270   return Diag(TheCall->getLocStart(), diag::err_x86_builtin_invalid_rounding)
3271     << Arg->getSourceRange();
3272 }
3273
3274 // Check if the gather/scatter scale is legal.
3275 bool Sema::CheckX86BuiltinGatherScatterScale(unsigned BuiltinID,
3276                                              CallExpr *TheCall) {
3277   unsigned ArgNum = 0;
3278   switch (BuiltinID) {
3279   default:
3280     return false;
3281   case X86::BI__builtin_ia32_gatherpfdpd:
3282   case X86::BI__builtin_ia32_gatherpfdps:
3283   case X86::BI__builtin_ia32_gatherpfqpd:
3284   case X86::BI__builtin_ia32_gatherpfqps:
3285   case X86::BI__builtin_ia32_scatterpfdpd:
3286   case X86::BI__builtin_ia32_scatterpfdps:
3287   case X86::BI__builtin_ia32_scatterpfqpd:
3288   case X86::BI__builtin_ia32_scatterpfqps:
3289     ArgNum = 3;
3290     break;
3291   case X86::BI__builtin_ia32_gatherd_pd:
3292   case X86::BI__builtin_ia32_gatherd_pd256:
3293   case X86::BI__builtin_ia32_gatherq_pd:
3294   case X86::BI__builtin_ia32_gatherq_pd256:
3295   case X86::BI__builtin_ia32_gatherd_ps:
3296   case X86::BI__builtin_ia32_gatherd_ps256:
3297   case X86::BI__builtin_ia32_gatherq_ps:
3298   case X86::BI__builtin_ia32_gatherq_ps256:
3299   case X86::BI__builtin_ia32_gatherd_q:
3300   case X86::BI__builtin_ia32_gatherd_q256:
3301   case X86::BI__builtin_ia32_gatherq_q:
3302   case X86::BI__builtin_ia32_gatherq_q256:
3303   case X86::BI__builtin_ia32_gatherd_d:
3304   case X86::BI__builtin_ia32_gatherd_d256:
3305   case X86::BI__builtin_ia32_gatherq_d:
3306   case X86::BI__builtin_ia32_gatherq_d256:
3307   case X86::BI__builtin_ia32_gather3div2df:
3308   case X86::BI__builtin_ia32_gather3div2di:
3309   case X86::BI__builtin_ia32_gather3div4df:
3310   case X86::BI__builtin_ia32_gather3div4di:
3311   case X86::BI__builtin_ia32_gather3div4sf:
3312   case X86::BI__builtin_ia32_gather3div4si:
3313   case X86::BI__builtin_ia32_gather3div8sf:
3314   case X86::BI__builtin_ia32_gather3div8si:
3315   case X86::BI__builtin_ia32_gather3siv2df:
3316   case X86::BI__builtin_ia32_gather3siv2di:
3317   case X86::BI__builtin_ia32_gather3siv4df:
3318   case X86::BI__builtin_ia32_gather3siv4di:
3319   case X86::BI__builtin_ia32_gather3siv4sf:
3320   case X86::BI__builtin_ia32_gather3siv4si:
3321   case X86::BI__builtin_ia32_gather3siv8sf:
3322   case X86::BI__builtin_ia32_gather3siv8si:
3323   case X86::BI__builtin_ia32_gathersiv8df:
3324   case X86::BI__builtin_ia32_gathersiv16sf:
3325   case X86::BI__builtin_ia32_gatherdiv8df:
3326   case X86::BI__builtin_ia32_gatherdiv16sf:
3327   case X86::BI__builtin_ia32_gathersiv8di:
3328   case X86::BI__builtin_ia32_gathersiv16si:
3329   case X86::BI__builtin_ia32_gatherdiv8di:
3330   case X86::BI__builtin_ia32_gatherdiv16si:
3331   case X86::BI__builtin_ia32_scatterdiv2df:
3332   case X86::BI__builtin_ia32_scatterdiv2di:
3333   case X86::BI__builtin_ia32_scatterdiv4df:
3334   case X86::BI__builtin_ia32_scatterdiv4di:
3335   case X86::BI__builtin_ia32_scatterdiv4sf:
3336   case X86::BI__builtin_ia32_scatterdiv4si:
3337   case X86::BI__builtin_ia32_scatterdiv8sf:
3338   case X86::BI__builtin_ia32_scatterdiv8si:
3339   case X86::BI__builtin_ia32_scattersiv2df:
3340   case X86::BI__builtin_ia32_scattersiv2di:
3341   case X86::BI__builtin_ia32_scattersiv4df:
3342   case X86::BI__builtin_ia32_scattersiv4di:
3343   case X86::BI__builtin_ia32_scattersiv4sf:
3344   case X86::BI__builtin_ia32_scattersiv4si:
3345   case X86::BI__builtin_ia32_scattersiv8sf:
3346   case X86::BI__builtin_ia32_scattersiv8si:
3347   case X86::BI__builtin_ia32_scattersiv8df:
3348   case X86::BI__builtin_ia32_scattersiv16sf:
3349   case X86::BI__builtin_ia32_scatterdiv8df:
3350   case X86::BI__builtin_ia32_scatterdiv16sf:
3351   case X86::BI__builtin_ia32_scattersiv8di:
3352   case X86::BI__builtin_ia32_scattersiv16si:
3353   case X86::BI__builtin_ia32_scatterdiv8di:
3354   case X86::BI__builtin_ia32_scatterdiv16si:
3355     ArgNum = 4;
3356     break;
3357   }
3358
3359   llvm::APSInt Result;
3360
3361   // We can't check the value of a dependent argument.
3362   Expr *Arg = TheCall->getArg(ArgNum);
3363   if (Arg->isTypeDependent() || Arg->isValueDependent())
3364     return false;
3365
3366   // Check constant-ness first.
3367   if (SemaBuiltinConstantArg(TheCall, ArgNum, Result))
3368     return true;
3369
3370   if (Result == 1 || Result == 2 || Result == 4 || Result == 8)
3371     return false;
3372
3373   return Diag(TheCall->getLocStart(), diag::err_x86_builtin_invalid_scale)
3374     << Arg->getSourceRange();
3375 }
3376
3377 static bool isX86_32Builtin(unsigned BuiltinID) {
3378   // These builtins only work on x86-32 targets.
3379   switch (BuiltinID) {
3380   case X86::BI__builtin_ia32_readeflags_u32:
3381   case X86::BI__builtin_ia32_writeeflags_u32:
3382     return true;
3383   }
3384
3385   return false;
3386 }
3387
3388 bool Sema::CheckX86BuiltinFunctionCall(unsigned BuiltinID, CallExpr *TheCall) {
3389   if (BuiltinID == X86::BI__builtin_cpu_supports)
3390     return SemaBuiltinCpuSupports(*this, TheCall);
3391
3392   if (BuiltinID == X86::BI__builtin_cpu_is)
3393     return SemaBuiltinCpuIs(*this, TheCall);
3394
3395   // Check for 32-bit only builtins on a 64-bit target.
3396   const llvm::Triple &TT = Context.getTargetInfo().getTriple();
3397   if (TT.getArch() != llvm::Triple::x86 && isX86_32Builtin(BuiltinID))
3398     return Diag(TheCall->getCallee()->getLocStart(),
3399                 diag::err_32_bit_builtin_64_bit_tgt);
3400
3401   // If the intrinsic has rounding or SAE make sure its valid.
3402   if (CheckX86BuiltinRoundingOrSAE(BuiltinID, TheCall))
3403     return true;
3404
3405   // If the intrinsic has a gather/scatter scale immediate make sure its valid.
3406   if (CheckX86BuiltinGatherScatterScale(BuiltinID, TheCall))
3407     return true;
3408
3409   // For intrinsics which take an immediate value as part of the instruction,
3410   // range check them here.
3411   int i = 0, l = 0, u = 0;
3412   switch (BuiltinID) {
3413   default:
3414     return false;
3415   case X86::BI__builtin_ia32_vec_ext_v2si:
3416   case X86::BI__builtin_ia32_vec_ext_v2di:
3417   case X86::BI__builtin_ia32_vextractf128_pd256:
3418   case X86::BI__builtin_ia32_vextractf128_ps256:
3419   case X86::BI__builtin_ia32_vextractf128_si256:
3420   case X86::BI__builtin_ia32_extract128i256:
3421   case X86::BI__builtin_ia32_extractf64x4_mask:
3422   case X86::BI__builtin_ia32_extracti64x4_mask:
3423   case X86::BI__builtin_ia32_extractf32x8_mask:
3424   case X86::BI__builtin_ia32_extracti32x8_mask:
3425   case X86::BI__builtin_ia32_extractf64x2_256_mask:
3426   case X86::BI__builtin_ia32_extracti64x2_256_mask:
3427   case X86::BI__builtin_ia32_extractf32x4_256_mask:
3428   case X86::BI__builtin_ia32_extracti32x4_256_mask:
3429     i = 1; l = 0; u = 1;
3430     break;
3431   case X86::BI__builtin_ia32_vec_set_v2di:
3432   case X86::BI__builtin_ia32_vinsertf128_pd256:
3433   case X86::BI__builtin_ia32_vinsertf128_ps256:
3434   case X86::BI__builtin_ia32_vinsertf128_si256:
3435   case X86::BI__builtin_ia32_insert128i256:
3436   case X86::BI__builtin_ia32_insertf32x8:
3437   case X86::BI__builtin_ia32_inserti32x8:
3438   case X86::BI__builtin_ia32_insertf64x4:
3439   case X86::BI__builtin_ia32_inserti64x4:
3440   case X86::BI__builtin_ia32_insertf64x2_256:
3441   case X86::BI__builtin_ia32_inserti64x2_256:
3442   case X86::BI__builtin_ia32_insertf32x4_256:
3443   case X86::BI__builtin_ia32_inserti32x4_256:
3444     i = 2; l = 0; u = 1;
3445     break;
3446   case X86::BI__builtin_ia32_vpermilpd:
3447   case X86::BI__builtin_ia32_vec_ext_v4hi:
3448   case X86::BI__builtin_ia32_vec_ext_v4si:
3449   case X86::BI__builtin_ia32_vec_ext_v4sf:
3450   case X86::BI__builtin_ia32_vec_ext_v4di:
3451   case X86::BI__builtin_ia32_extractf32x4_mask:
3452   case X86::BI__builtin_ia32_extracti32x4_mask:
3453   case X86::BI__builtin_ia32_extractf64x2_512_mask:
3454   case X86::BI__builtin_ia32_extracti64x2_512_mask:
3455     i = 1; l = 0; u = 3;
3456     break;
3457   case X86::BI_mm_prefetch:
3458   case X86::BI__builtin_ia32_vec_ext_v8hi:
3459   case X86::BI__builtin_ia32_vec_ext_v8si:
3460     i = 1; l = 0; u = 7;
3461     break;
3462   case X86::BI__builtin_ia32_sha1rnds4:
3463   case X86::BI__builtin_ia32_blendpd:
3464   case X86::BI__builtin_ia32_shufpd:
3465   case X86::BI__builtin_ia32_vec_set_v4hi:
3466   case X86::BI__builtin_ia32_vec_set_v4si:
3467   case X86::BI__builtin_ia32_vec_set_v4di:
3468   case X86::BI__builtin_ia32_shuf_f32x4_256:
3469   case X86::BI__builtin_ia32_shuf_f64x2_256:
3470   case X86::BI__builtin_ia32_shuf_i32x4_256:
3471   case X86::BI__builtin_ia32_shuf_i64x2_256:
3472   case X86::BI__builtin_ia32_insertf64x2_512:
3473   case X86::BI__builtin_ia32_inserti64x2_512:
3474   case X86::BI__builtin_ia32_insertf32x4:
3475   case X86::BI__builtin_ia32_inserti32x4:
3476     i = 2; l = 0; u = 3;
3477     break;
3478   case X86::BI__builtin_ia32_vpermil2pd:
3479   case X86::BI__builtin_ia32_vpermil2pd256:
3480   case X86::BI__builtin_ia32_vpermil2ps:
3481   case X86::BI__builtin_ia32_vpermil2ps256:
3482     i = 3; l = 0; u = 3;
3483     break;
3484   case X86::BI__builtin_ia32_cmpb128_mask:
3485   case X86::BI__builtin_ia32_cmpw128_mask:
3486   case X86::BI__builtin_ia32_cmpd128_mask:
3487   case X86::BI__builtin_ia32_cmpq128_mask:
3488   case X86::BI__builtin_ia32_cmpb256_mask:
3489   case X86::BI__builtin_ia32_cmpw256_mask:
3490   case X86::BI__builtin_ia32_cmpd256_mask:
3491   case X86::BI__builtin_ia32_cmpq256_mask:
3492   case X86::BI__builtin_ia32_cmpb512_mask:
3493   case X86::BI__builtin_ia32_cmpw512_mask:
3494   case X86::BI__builtin_ia32_cmpd512_mask:
3495   case X86::BI__builtin_ia32_cmpq512_mask:
3496   case X86::BI__builtin_ia32_ucmpb128_mask:
3497   case X86::BI__builtin_ia32_ucmpw128_mask:
3498   case X86::BI__builtin_ia32_ucmpd128_mask:
3499   case X86::BI__builtin_ia32_ucmpq128_mask:
3500   case X86::BI__builtin_ia32_ucmpb256_mask:
3501   case X86::BI__builtin_ia32_ucmpw256_mask:
3502   case X86::BI__builtin_ia32_ucmpd256_mask:
3503   case X86::BI__builtin_ia32_ucmpq256_mask:
3504   case X86::BI__builtin_ia32_ucmpb512_mask:
3505   case X86::BI__builtin_ia32_ucmpw512_mask:
3506   case X86::BI__builtin_ia32_ucmpd512_mask:
3507   case X86::BI__builtin_ia32_ucmpq512_mask:
3508   case X86::BI__builtin_ia32_vpcomub:
3509   case X86::BI__builtin_ia32_vpcomuw:
3510   case X86::BI__builtin_ia32_vpcomud:
3511   case X86::BI__builtin_ia32_vpcomuq:
3512   case X86::BI__builtin_ia32_vpcomb:
3513   case X86::BI__builtin_ia32_vpcomw:
3514   case X86::BI__builtin_ia32_vpcomd:
3515   case X86::BI__builtin_ia32_vpcomq:
3516   case X86::BI__builtin_ia32_vec_set_v8hi:
3517   case X86::BI__builtin_ia32_vec_set_v8si:
3518     i = 2; l = 0; u = 7;
3519     break;
3520   case X86::BI__builtin_ia32_vpermilpd256:
3521   case X86::BI__builtin_ia32_roundps:
3522   case X86::BI__builtin_ia32_roundpd:
3523   case X86::BI__builtin_ia32_roundps256:
3524   case X86::BI__builtin_ia32_roundpd256:
3525   case X86::BI__builtin_ia32_getmantpd128_mask:
3526   case X86::BI__builtin_ia32_getmantpd256_mask:
3527   case X86::BI__builtin_ia32_getmantps128_mask:
3528   case X86::BI__builtin_ia32_getmantps256_mask:
3529   case X86::BI__builtin_ia32_getmantpd512_mask:
3530   case X86::BI__builtin_ia32_getmantps512_mask:
3531   case X86::BI__builtin_ia32_vec_ext_v16qi:
3532   case X86::BI__builtin_ia32_vec_ext_v16hi:
3533     i = 1; l = 0; u = 15;
3534     break;
3535   case X86::BI__builtin_ia32_pblendd128:
3536   case X86::BI__builtin_ia32_blendps:
3537   case X86::BI__builtin_ia32_blendpd256:
3538   case X86::BI__builtin_ia32_shufpd256:
3539   case X86::BI__builtin_ia32_roundss:
3540   case X86::BI__builtin_ia32_roundsd:
3541   case X86::BI__builtin_ia32_rangepd128_mask:
3542   case X86::BI__builtin_ia32_rangepd256_mask:
3543   case X86::BI__builtin_ia32_rangepd512_mask:
3544   case X86::BI__builtin_ia32_rangeps128_mask:
3545   case X86::BI__builtin_ia32_rangeps256_mask:
3546   case X86::BI__builtin_ia32_rangeps512_mask:
3547   case X86::BI__builtin_ia32_getmantsd_round_mask:
3548   case X86::BI__builtin_ia32_getmantss_round_mask:
3549   case X86::BI__builtin_ia32_vec_set_v16qi:
3550   case X86::BI__builtin_ia32_vec_set_v16hi:
3551     i = 2; l = 0; u = 15;
3552     break;
3553   case X86::BI__builtin_ia32_vec_ext_v32qi:
3554     i = 1; l = 0; u = 31;
3555     break;
3556   case X86::BI__builtin_ia32_cmpps:
3557   case X86::BI__builtin_ia32_cmpss:
3558   case X86::BI__builtin_ia32_cmppd:
3559   case X86::BI__builtin_ia32_cmpsd:
3560   case X86::BI__builtin_ia32_cmpps256:
3561   case X86::BI__builtin_ia32_cmppd256:
3562   case X86::BI__builtin_ia32_cmpps128_mask:
3563   case X86::BI__builtin_ia32_cmppd128_mask:
3564   case X86::BI__builtin_ia32_cmpps256_mask:
3565   case X86::BI__builtin_ia32_cmppd256_mask:
3566   case X86::BI__builtin_ia32_cmpps512_mask:
3567   case X86::BI__builtin_ia32_cmppd512_mask:
3568   case X86::BI__builtin_ia32_cmpsd_mask:
3569   case X86::BI__builtin_ia32_cmpss_mask:
3570   case X86::BI__builtin_ia32_vec_set_v32qi:
3571     i = 2; l = 0; u = 31;
3572     break;
3573   case X86::BI__builtin_ia32_permdf256:
3574   case X86::BI__builtin_ia32_permdi256:
3575   case X86::BI__builtin_ia32_permdf512:
3576   case X86::BI__builtin_ia32_permdi512:
3577   case X86::BI__builtin_ia32_vpermilps:
3578   case X86::BI__builtin_ia32_vpermilps256:
3579   case X86::BI__builtin_ia32_vpermilpd512:
3580   case X86::BI__builtin_ia32_vpermilps512:
3581   case X86::BI__builtin_ia32_pshufd:
3582   case X86::BI__builtin_ia32_pshufd256:
3583   case X86::BI__builtin_ia32_pshufd512:
3584   case X86::BI__builtin_ia32_pshufhw:
3585   case X86::BI__builtin_ia32_pshufhw256:
3586   case X86::BI__builtin_ia32_pshufhw512:
3587   case X86::BI__builtin_ia32_pshuflw:
3588   case X86::BI__builtin_ia32_pshuflw256:
3589   case X86::BI__builtin_ia32_pshuflw512:
3590   case X86::BI__builtin_ia32_vcvtps2ph:
3591   case X86::BI__builtin_ia32_vcvtps2ph_mask:
3592   case X86::BI__builtin_ia32_vcvtps2ph256:
3593   case X86::BI__builtin_ia32_vcvtps2ph256_mask:
3594   case X86::BI__builtin_ia32_vcvtps2ph512_mask:
3595   case X86::BI__builtin_ia32_rndscaleps_128_mask:
3596   case X86::BI__builtin_ia32_rndscalepd_128_mask:
3597   case X86::BI__builtin_ia32_rndscaleps_256_mask:
3598   case X86::BI__builtin_ia32_rndscalepd_256_mask:
3599   case X86::BI__builtin_ia32_rndscaleps_mask:
3600   case X86::BI__builtin_ia32_rndscalepd_mask:
3601   case X86::BI__builtin_ia32_reducepd128_mask:
3602   case X86::BI__builtin_ia32_reducepd256_mask:
3603   case X86::BI__builtin_ia32_reducepd512_mask:
3604   case X86::BI__builtin_ia32_reduceps128_mask:
3605   case X86::BI__builtin_ia32_reduceps256_mask:
3606   case X86::BI__builtin_ia32_reduceps512_mask:
3607   case X86::BI__builtin_ia32_prold512:
3608   case X86::BI__builtin_ia32_prolq512:
3609   case X86::BI__builtin_ia32_prold128:
3610   case X86::BI__builtin_ia32_prold256:
3611   case X86::BI__builtin_ia32_prolq128:
3612   case X86::BI__builtin_ia32_prolq256:
3613   case X86::BI__builtin_ia32_prord512:
3614   case X86::BI__builtin_ia32_prorq512:
3615   case X86::BI__builtin_ia32_prord128:
3616   case X86::BI__builtin_ia32_prord256:
3617   case X86::BI__builtin_ia32_prorq128:
3618   case X86::BI__builtin_ia32_prorq256:
3619   case X86::BI__builtin_ia32_fpclasspd128_mask:
3620   case X86::BI__builtin_ia32_fpclasspd256_mask:
3621   case X86::BI__builtin_ia32_fpclassps128_mask:
3622   case X86::BI__builtin_ia32_fpclassps256_mask:
3623   case X86::BI__builtin_ia32_fpclassps512_mask:
3624   case X86::BI__builtin_ia32_fpclasspd512_mask:
3625   case X86::BI__builtin_ia32_fpclasssd_mask:
3626   case X86::BI__builtin_ia32_fpclassss_mask:
3627   case X86::BI__builtin_ia32_pslldqi128_byteshift:
3628   case X86::BI__builtin_ia32_pslldqi256_byteshift:
3629   case X86::BI__builtin_ia32_pslldqi512_byteshift:
3630   case X86::BI__builtin_ia32_psrldqi128_byteshift:
3631   case X86::BI__builtin_ia32_psrldqi256_byteshift:
3632   case X86::BI__builtin_ia32_psrldqi512_byteshift:
3633     i = 1; l = 0; u = 255;
3634     break;
3635   case X86::BI__builtin_ia32_vperm2f128_pd256:
3636   case X86::BI__builtin_ia32_vperm2f128_ps256:
3637   case X86::BI__builtin_ia32_vperm2f128_si256:
3638   case X86::BI__builtin_ia32_permti256:
3639   case X86::BI__builtin_ia32_pblendw128:
3640   case X86::BI__builtin_ia32_pblendw256:
3641   case X86::BI__builtin_ia32_blendps256:
3642   case X86::BI__builtin_ia32_pblendd256:
3643   case X86::BI__builtin_ia32_palignr128:
3644   case X86::BI__builtin_ia32_palignr256:
3645   case X86::BI__builtin_ia32_palignr512:
3646   case X86::BI__builtin_ia32_alignq512:
3647   case X86::BI__builtin_ia32_alignd512:
3648   case X86::BI__builtin_ia32_alignd128:
3649   case X86::BI__builtin_ia32_alignd256:
3650   case X86::BI__builtin_ia32_alignq128:
3651   case X86::BI__builtin_ia32_alignq256:
3652   case X86::BI__builtin_ia32_vcomisd:
3653   case X86::BI__builtin_ia32_vcomiss:
3654   case X86::BI__builtin_ia32_shuf_f32x4:
3655   case X86::BI__builtin_ia32_shuf_f64x2:
3656   case X86::BI__builtin_ia32_shuf_i32x4:
3657   case X86::BI__builtin_ia32_shuf_i64x2:
3658   case X86::BI__builtin_ia32_shufpd512:
3659   case X86::BI__builtin_ia32_shufps:
3660   case X86::BI__builtin_ia32_shufps256:
3661   case X86::BI__builtin_ia32_shufps512:
3662   case X86::BI__builtin_ia32_dbpsadbw128:
3663   case X86::BI__builtin_ia32_dbpsadbw256:
3664   case X86::BI__builtin_ia32_dbpsadbw512:
3665   case X86::BI__builtin_ia32_vpshldd128:
3666   case X86::BI__builtin_ia32_vpshldd256:
3667   case X86::BI__builtin_ia32_vpshldd512:
3668   case X86::BI__builtin_ia32_vpshldq128:
3669   case X86::BI__builtin_ia32_vpshldq256:
3670   case X86::BI__builtin_ia32_vpshldq512:
3671   case X86::BI__builtin_ia32_vpshldw128:
3672   case X86::BI__builtin_ia32_vpshldw256:
3673   case X86::BI__builtin_ia32_vpshldw512:
3674   case X86::BI__builtin_ia32_vpshrdd128:
3675   case X86::BI__builtin_ia32_vpshrdd256:
3676   case X86::BI__builtin_ia32_vpshrdd512:
3677   case X86::BI__builtin_ia32_vpshrdq128:
3678   case X86::BI__builtin_ia32_vpshrdq256:
3679   case X86::BI__builtin_ia32_vpshrdq512:
3680   case X86::BI__builtin_ia32_vpshrdw128:
3681   case X86::BI__builtin_ia32_vpshrdw256:
3682   case X86::BI__builtin_ia32_vpshrdw512:
3683     i = 2; l = 0; u = 255;
3684     break;
3685   case X86::BI__builtin_ia32_fixupimmpd512_mask:
3686   case X86::BI__builtin_ia32_fixupimmpd512_maskz:
3687   case X86::BI__builtin_ia32_fixupimmps512_mask:
3688   case X86::BI__builtin_ia32_fixupimmps512_maskz:
3689   case X86::BI__builtin_ia32_fixupimmsd_mask:
3690   case X86::BI__builtin_ia32_fixupimmsd_maskz:
3691   case X86::BI__builtin_ia32_fixupimmss_mask:
3692   case X86::BI__builtin_ia32_fixupimmss_maskz:
3693   case X86::BI__builtin_ia32_fixupimmpd128_mask:
3694   case X86::BI__builtin_ia32_fixupimmpd128_maskz:
3695   case X86::BI__builtin_ia32_fixupimmpd256_mask:
3696   case X86::BI__builtin_ia32_fixupimmpd256_maskz:
3697   case X86::BI__builtin_ia32_fixupimmps128_mask:
3698   case X86::BI__builtin_ia32_fixupimmps128_maskz:
3699   case X86::BI__builtin_ia32_fixupimmps256_mask:
3700   case X86::BI__builtin_ia32_fixupimmps256_maskz:
3701   case X86::BI__builtin_ia32_pternlogd512_mask:
3702   case X86::BI__builtin_ia32_pternlogd512_maskz:
3703   case X86::BI__builtin_ia32_pternlogq512_mask:
3704   case X86::BI__builtin_ia32_pternlogq512_maskz:
3705   case X86::BI__builtin_ia32_pternlogd128_mask:
3706   case X86::BI__builtin_ia32_pternlogd128_maskz:
3707   case X86::BI__builtin_ia32_pternlogd256_mask:
3708   case X86::BI__builtin_ia32_pternlogd256_maskz:
3709   case X86::BI__builtin_ia32_pternlogq128_mask:
3710   case X86::BI__builtin_ia32_pternlogq128_maskz:
3711   case X86::BI__builtin_ia32_pternlogq256_mask:
3712   case X86::BI__builtin_ia32_pternlogq256_maskz:
3713     i = 3; l = 0; u = 255;
3714     break;
3715   case X86::BI__builtin_ia32_gatherpfdpd:
3716   case X86::BI__builtin_ia32_gatherpfdps:
3717   case X86::BI__builtin_ia32_gatherpfqpd:
3718   case X86::BI__builtin_ia32_gatherpfqps:
3719   case X86::BI__builtin_ia32_scatterpfdpd:
3720   case X86::BI__builtin_ia32_scatterpfdps:
3721   case X86::BI__builtin_ia32_scatterpfqpd:
3722   case X86::BI__builtin_ia32_scatterpfqps:
3723     i = 4; l = 2; u = 3;
3724     break;
3725   case X86::BI__builtin_ia32_rndscalesd_round_mask:
3726   case X86::BI__builtin_ia32_rndscaless_round_mask:
3727     i = 4; l = 0; u = 255;
3728     break;
3729   }
3730
3731   // Note that we don't force a hard error on the range check here, allowing
3732   // template-generated or macro-generated dead code to potentially have out-of-
3733   // range values. These need to code generate, but don't need to necessarily
3734   // make any sense. We use a warning that defaults to an error.
3735   return SemaBuiltinConstantArgRange(TheCall, i, l, u, /*RangeIsError*/ false);
3736 }
3737
3738 /// Given a FunctionDecl's FormatAttr, attempts to populate the FomatStringInfo
3739 /// parameter with the FormatAttr's correct format_idx and firstDataArg.
3740 /// Returns true when the format fits the function and the FormatStringInfo has
3741 /// been populated.
3742 bool Sema::getFormatStringInfo(const FormatAttr *Format, bool IsCXXMember,
3743                                FormatStringInfo *FSI) {
3744   FSI->HasVAListArg = Format->getFirstArg() == 0;
3745   FSI->FormatIdx = Format->getFormatIdx() - 1;
3746   FSI->FirstDataArg = FSI->HasVAListArg ? 0 : Format->getFirstArg() - 1;
3747
3748   // The way the format attribute works in GCC, the implicit this argument
3749   // of member functions is counted. However, it doesn't appear in our own
3750   // lists, so decrement format_idx in that case.
3751   if (IsCXXMember) {
3752     if(FSI->FormatIdx == 0)
3753       return false;
3754     --FSI->FormatIdx;
3755     if (FSI->FirstDataArg != 0)
3756       --FSI->FirstDataArg;
3757   }
3758   return true;
3759 }
3760
3761 /// Checks if a the given expression evaluates to null.
3762 ///
3763 /// Returns true if the value evaluates to null.
3764 static bool CheckNonNullExpr(Sema &S, const Expr *Expr) {
3765   // If the expression has non-null type, it doesn't evaluate to null.
3766   if (auto nullability
3767         = Expr->IgnoreImplicit()->getType()->getNullability(S.Context)) {
3768     if (*nullability == NullabilityKind::NonNull)
3769       return false;
3770   }
3771
3772   // As a special case, transparent unions initialized with zero are
3773   // considered null for the purposes of the nonnull attribute.
3774   if (const RecordType *UT = Expr->getType()->getAsUnionType()) {
3775     if (UT->getDecl()->hasAttr<TransparentUnionAttr>())
3776       if (const CompoundLiteralExpr *CLE =
3777           dyn_cast<CompoundLiteralExpr>(Expr))
3778         if (const InitListExpr *ILE =
3779             dyn_cast<InitListExpr>(CLE->getInitializer()))
3780           Expr = ILE->getInit(0);
3781   }
3782
3783   bool Result;
3784   return (!Expr->isValueDependent() &&
3785           Expr->EvaluateAsBooleanCondition(Result, S.Context) &&
3786           !Result);
3787 }
3788
3789 static void CheckNonNullArgument(Sema &S,
3790                                  const Expr *ArgExpr,
3791                                  SourceLocation CallSiteLoc) {
3792   if (CheckNonNullExpr(S, ArgExpr))
3793     S.DiagRuntimeBehavior(CallSiteLoc, ArgExpr,
3794            S.PDiag(diag::warn_null_arg) << ArgExpr->getSourceRange());
3795 }
3796
3797 bool Sema::GetFormatNSStringIdx(const FormatAttr *Format, unsigned &Idx) {
3798   FormatStringInfo FSI;
3799   if ((GetFormatStringType(Format) == FST_NSString) &&
3800       getFormatStringInfo(Format, false, &FSI)) {
3801     Idx = FSI.FormatIdx;
3802     return true;
3803   }
3804   return false;
3805 }
3806
3807 /// Diagnose use of %s directive in an NSString which is being passed
3808 /// as formatting string to formatting method.
3809 static void
3810 DiagnoseCStringFormatDirectiveInCFAPI(Sema &S,
3811                                         const NamedDecl *FDecl,
3812                                         Expr **Args,
3813                                         unsigned NumArgs) {
3814   unsigned Idx = 0;
3815   bool Format = false;
3816   ObjCStringFormatFamily SFFamily = FDecl->getObjCFStringFormattingFamily();
3817   if (SFFamily == ObjCStringFormatFamily::SFF_CFString) {
3818     Idx = 2;
3819     Format = true;
3820   }
3821   else
3822     for (const auto *I : FDecl->specific_attrs<FormatAttr>()) {
3823       if (S.GetFormatNSStringIdx(I, Idx)) {
3824         Format = true;
3825         break;
3826       }
3827     }
3828   if (!Format || NumArgs <= Idx)
3829     return;
3830   const Expr *FormatExpr = Args[Idx];
3831   if (const CStyleCastExpr *CSCE = dyn_cast<CStyleCastExpr>(FormatExpr))
3832     FormatExpr = CSCE->getSubExpr();
3833   const StringLiteral *FormatString;
3834   if (const ObjCStringLiteral *OSL =
3835       dyn_cast<ObjCStringLiteral>(FormatExpr->IgnoreParenImpCasts()))
3836     FormatString = OSL->getString();
3837   else
3838     FormatString = dyn_cast<StringLiteral>(FormatExpr->IgnoreParenImpCasts());
3839   if (!FormatString)
3840     return;
3841   if (S.FormatStringHasSArg(FormatString)) {
3842     S.Diag(FormatExpr->getExprLoc(), diag::warn_objc_cdirective_format_string)
3843       << "%s" << 1 << 1;
3844     S.Diag(FDecl->getLocation(), diag::note_entity_declared_at)
3845       << FDecl->getDeclName();
3846   }
3847 }
3848
3849 /// Determine whether the given type has a non-null nullability annotation.
3850 static bool isNonNullType(ASTContext &ctx, QualType type) {
3851   if (auto nullability = type->getNullability(ctx))
3852     return *nullability == NullabilityKind::NonNull;
3853
3854   return false;
3855 }
3856
3857 static void CheckNonNullArguments(Sema &S,
3858                                   const NamedDecl *FDecl,
3859                                   const FunctionProtoType *Proto,
3860                                   ArrayRef<const Expr *> Args,
3861                                   SourceLocation CallSiteLoc) {
3862   assert((FDecl || Proto) && "Need a function declaration or prototype");
3863
3864   // Check the attributes attached to the method/function itself.
3865   llvm::SmallBitVector NonNullArgs;
3866   if (FDecl) {
3867     // Handle the nonnull attribute on the function/method declaration itself.
3868     for (const auto *NonNull : FDecl->specific_attrs<NonNullAttr>()) {
3869       if (!NonNull->args_size()) {
3870         // Easy case: all pointer arguments are nonnull.
3871         for (const auto *Arg : Args)
3872           if (S.isValidPointerAttrType(Arg->getType()))
3873             CheckNonNullArgument(S, Arg, CallSiteLoc);
3874         return;
3875       }
3876
3877       for (const ParamIdx &Idx : NonNull->args()) {
3878         unsigned IdxAST = Idx.getASTIndex();
3879         if (IdxAST >= Args.size())
3880           continue;
3881         if (NonNullArgs.empty())
3882           NonNullArgs.resize(Args.size());
3883         NonNullArgs.set(IdxAST);
3884       }
3885     }
3886   }
3887
3888   if (FDecl && (isa<FunctionDecl>(FDecl) || isa<ObjCMethodDecl>(FDecl))) {
3889     // Handle the nonnull attribute on the parameters of the
3890     // function/method.
3891     ArrayRef<ParmVarDecl*> parms;
3892     if (const FunctionDecl *FD = dyn_cast<FunctionDecl>(FDecl))
3893       parms = FD->parameters();
3894     else
3895       parms = cast<ObjCMethodDecl>(FDecl)->parameters();
3896
3897     unsigned ParamIndex = 0;
3898     for (ArrayRef<ParmVarDecl*>::iterator I = parms.begin(), E = parms.end();
3899          I != E; ++I, ++ParamIndex) {
3900       const ParmVarDecl *PVD = *I;
3901       if (PVD->hasAttr<NonNullAttr>() ||
3902           isNonNullType(S.Context, PVD->getType())) {
3903         if (NonNullArgs.empty())
3904           NonNullArgs.resize(Args.size());
3905
3906         NonNullArgs.set(ParamIndex);
3907       }
3908     }
3909   } else {
3910     // If we have a non-function, non-method declaration but no
3911     // function prototype, try to dig out the function prototype.
3912     if (!Proto) {
3913       if (const ValueDecl *VD = dyn_cast<ValueDecl>(FDecl)) {
3914         QualType type = VD->getType().getNonReferenceType();
3915         if (auto pointerType = type->getAs<PointerType>())
3916           type = pointerType->getPointeeType();
3917         else if (auto blockType = type->getAs<BlockPointerType>())
3918           type = blockType->getPointeeType();
3919         // FIXME: data member pointers?
3920
3921         // Dig out the function prototype, if there is one.
3922         Proto = type->getAs<FunctionProtoType>();
3923       }
3924     }
3925
3926     // Fill in non-null argument information from the nullability
3927     // information on the parameter types (if we have them).
3928     if (Proto) {
3929       unsigned Index = 0;
3930       for (auto paramType : Proto->getParamTypes()) {
3931         if (isNonNullType(S.Context, paramType)) {
3932           if (NonNullArgs.empty())
3933             NonNullArgs.resize(Args.size());
3934
3935           NonNullArgs.set(Index);
3936         }
3937
3938         ++Index;
3939       }
3940     }
3941   }
3942
3943   // Check for non-null arguments.
3944   for (unsigned ArgIndex = 0, ArgIndexEnd = NonNullArgs.size();
3945        ArgIndex != ArgIndexEnd; ++ArgIndex) {
3946     if (NonNullArgs[ArgIndex])
3947       CheckNonNullArgument(S, Args[ArgIndex], CallSiteLoc);
3948   }
3949 }
3950
3951 /// Handles the checks for format strings, non-POD arguments to vararg
3952 /// functions, NULL arguments passed to non-NULL parameters, and diagnose_if
3953 /// attributes.
3954 void Sema::checkCall(NamedDecl *FDecl, const FunctionProtoType *Proto,
3955                      const Expr *ThisArg, ArrayRef<const Expr *> Args,
3956                      bool IsMemberFunction, SourceLocation Loc,
3957                      SourceRange Range, VariadicCallType CallType) {
3958   // FIXME: We should check as much as we can in the template definition.
3959   if (CurContext->isDependentContext())
3960     return;
3961
3962   // Printf and scanf checking.
3963   llvm::SmallBitVector CheckedVarArgs;
3964   if (FDecl) {
3965     for (const auto *I : FDecl->specific_attrs<FormatAttr>()) {
3966       // Only create vector if there are format attributes.
3967       CheckedVarArgs.resize(Args.size());
3968
3969       CheckFormatArguments(I, Args, IsMemberFunction, CallType, Loc, Range,
3970                            CheckedVarArgs);
3971     }
3972   }
3973
3974   // Refuse POD arguments that weren't caught by the format string
3975   // checks above.
3976   auto *FD = dyn_cast_or_null<FunctionDecl>(FDecl);
3977   if (CallType != VariadicDoesNotApply &&
3978       (!FD || FD->getBuiltinID() != Builtin::BI__noop)) {
3979     unsigned NumParams = Proto ? Proto->getNumParams()
3980                        : FDecl && isa<FunctionDecl>(FDecl)
3981                            ? cast<FunctionDecl>(FDecl)->getNumParams()
3982                        : FDecl && isa<ObjCMethodDecl>(FDecl)
3983                            ? cast<ObjCMethodDecl>(FDecl)->param_size()
3984                        : 0;
3985
3986     for (unsigned ArgIdx = NumParams; ArgIdx < Args.size(); ++ArgIdx) {
3987       // Args[ArgIdx] can be null in malformed code.
3988       if (const Expr *Arg = Args[ArgIdx]) {
3989         if (CheckedVarArgs.empty() || !CheckedVarArgs[ArgIdx])
3990           checkVariadicArgument(Arg, CallType);
3991       }
3992     }
3993   }
3994
3995   if (FDecl || Proto) {
3996     CheckNonNullArguments(*this, FDecl, Proto, Args, Loc);
3997
3998     // Type safety checking.
3999     if (FDecl) {
4000       for (const auto *I : FDecl->specific_attrs<ArgumentWithTypeTagAttr>())
4001         CheckArgumentWithTypeTag(I, Args, Loc);
4002     }
4003   }
4004
4005   if (FD)
4006     diagnoseArgDependentDiagnoseIfAttrs(FD, ThisArg, Args, Loc);
4007 }
4008
4009 /// CheckConstructorCall - Check a constructor call for correctness and safety
4010 /// properties not enforced by the C type system.
4011 void Sema::CheckConstructorCall(FunctionDecl *FDecl,
4012                                 ArrayRef<const Expr *> Args,
4013                                 const FunctionProtoType *Proto,
4014                                 SourceLocation Loc) {
4015   VariadicCallType CallType =
4016     Proto->isVariadic() ? VariadicConstructor : VariadicDoesNotApply;
4017   checkCall(FDecl, Proto, /*ThisArg=*/nullptr, Args, /*IsMemberFunction=*/true,
4018             Loc, SourceRange(), CallType);
4019 }
4020
4021 /// CheckFunctionCall - Check a direct function call for various correctness
4022 /// and safety properties not strictly enforced by the C type system.
4023 bool Sema::CheckFunctionCall(FunctionDecl *FDecl, CallExpr *TheCall,
4024                              const FunctionProtoType *Proto) {
4025   bool IsMemberOperatorCall = isa<CXXOperatorCallExpr>(TheCall) &&
4026                               isa<CXXMethodDecl>(FDecl);
4027   bool IsMemberFunction = isa<CXXMemberCallExpr>(TheCall) ||
4028                           IsMemberOperatorCall;
4029   VariadicCallType CallType = getVariadicCallType(FDecl, Proto,
4030                                                   TheCall->getCallee());
4031   Expr** Args = TheCall->getArgs();
4032   unsigned NumArgs = TheCall->getNumArgs();
4033
4034   Expr *ImplicitThis = nullptr;
4035   if (IsMemberOperatorCall) {
4036     // If this is a call to a member operator, hide the first argument
4037     // from checkCall.
4038     // FIXME: Our choice of AST representation here is less than ideal.
4039     ImplicitThis = Args[0];
4040     ++Args;
4041     --NumArgs;
4042   } else if (IsMemberFunction)
4043     ImplicitThis =
4044         cast<CXXMemberCallExpr>(TheCall)->getImplicitObjectArgument();
4045
4046   checkCall(FDecl, Proto, ImplicitThis, llvm::makeArrayRef(Args, NumArgs),
4047             IsMemberFunction, TheCall->getRParenLoc(),
4048             TheCall->getCallee()->getSourceRange(), CallType);
4049
4050   IdentifierInfo *FnInfo = FDecl->getIdentifier();
4051   // None of the checks below are needed for functions that don't have
4052   // simple names (e.g., C++ conversion functions).
4053   if (!FnInfo)
4054     return false;
4055
4056   CheckAbsoluteValueFunction(TheCall, FDecl);
4057   CheckMaxUnsignedZero(TheCall, FDecl);
4058
4059   if (getLangOpts().ObjC1)
4060     DiagnoseCStringFormatDirectiveInCFAPI(*this, FDecl, Args, NumArgs);
4061
4062   unsigned CMId = FDecl->getMemoryFunctionKind();
4063   if (CMId == 0)
4064     return false;
4065
4066   // Handle memory setting and copying functions.
4067   if (CMId == Builtin::BIstrlcpy || CMId == Builtin::BIstrlcat)
4068     CheckStrlcpycatArguments(TheCall, FnInfo);
4069   else if (CMId == Builtin::BIstrncat)
4070     CheckStrncatArguments(TheCall, FnInfo);
4071   else
4072     CheckMemaccessArguments(TheCall, CMId, FnInfo);
4073
4074   return false;
4075 }
4076
4077 bool Sema::CheckObjCMethodCall(ObjCMethodDecl *Method, SourceLocation lbrac,
4078                                ArrayRef<const Expr *> Args) {
4079   VariadicCallType CallType =
4080       Method->isVariadic() ? VariadicMethod : VariadicDoesNotApply;
4081
4082   checkCall(Method, nullptr, /*ThisArg=*/nullptr, Args,
4083             /*IsMemberFunction=*/false, lbrac, Method->getSourceRange(),
4084             CallType);
4085
4086   return false;
4087 }
4088
4089 bool Sema::CheckPointerCall(NamedDecl *NDecl, CallExpr *TheCall,
4090                             const FunctionProtoType *Proto) {
4091   QualType Ty;
4092   if (const auto *V = dyn_cast<VarDecl>(NDecl))
4093     Ty = V->getType().getNonReferenceType();
4094   else if (const auto *F = dyn_cast<FieldDecl>(NDecl))
4095     Ty = F->getType().getNonReferenceType();
4096   else
4097     return false;
4098
4099   if (!Ty->isBlockPointerType() && !Ty->isFunctionPointerType() &&
4100       !Ty->isFunctionProtoType())
4101     return false;
4102
4103   VariadicCallType CallType;
4104   if (!Proto || !Proto->isVariadic()) {
4105     CallType = VariadicDoesNotApply;
4106   } else if (Ty->isBlockPointerType()) {
4107     CallType = VariadicBlock;
4108   } else { // Ty->isFunctionPointerType()
4109     CallType = VariadicFunction;
4110   }
4111
4112   checkCall(NDecl, Proto, /*ThisArg=*/nullptr,
4113             llvm::makeArrayRef(TheCall->getArgs(), TheCall->getNumArgs()),
4114             /*IsMemberFunction=*/false, TheCall->getRParenLoc(),
4115             TheCall->getCallee()->getSourceRange(), CallType);
4116
4117   return false;
4118 }
4119
4120 /// Checks function calls when a FunctionDecl or a NamedDecl is not available,
4121 /// such as function pointers returned from functions.
4122 bool Sema::CheckOtherCall(CallExpr *TheCall, const FunctionProtoType *Proto) {
4123   VariadicCallType CallType = getVariadicCallType(/*FDecl=*/nullptr, Proto,
4124                                                   TheCall->getCallee());
4125   checkCall(/*FDecl=*/nullptr, Proto, /*ThisArg=*/nullptr,
4126             llvm::makeArrayRef(TheCall->getArgs(), TheCall->getNumArgs()),
4127             /*IsMemberFunction=*/false, TheCall->getRParenLoc(),
4128             TheCall->getCallee()->getSourceRange(), CallType);
4129
4130   return false;
4131 }
4132
4133 static bool isValidOrderingForOp(int64_t Ordering, AtomicExpr::AtomicOp Op) {
4134   if (!llvm::isValidAtomicOrderingCABI(Ordering))
4135     return false;
4136
4137   auto OrderingCABI = (llvm::AtomicOrderingCABI)Ordering;
4138   switch (Op) {
4139   case AtomicExpr::AO__c11_atomic_init:
4140   case AtomicExpr::AO__opencl_atomic_init:
4141     llvm_unreachable("There is no ordering argument for an init");
4142
4143   case AtomicExpr::AO__c11_atomic_load:
4144   case AtomicExpr::AO__opencl_atomic_load:
4145   case AtomicExpr::AO__atomic_load_n:
4146   case AtomicExpr::AO__atomic_load:
4147     return OrderingCABI != llvm::AtomicOrderingCABI::release &&
4148            OrderingCABI != llvm::AtomicOrderingCABI::acq_rel;
4149
4150   case AtomicExpr::AO__c11_atomic_store:
4151   case AtomicExpr::AO__opencl_atomic_store:
4152   case AtomicExpr::AO__atomic_store:
4153   case AtomicExpr::AO__atomic_store_n:
4154     return OrderingCABI != llvm::AtomicOrderingCABI::consume &&
4155            OrderingCABI != llvm::AtomicOrderingCABI::acquire &&
4156            OrderingCABI != llvm::AtomicOrderingCABI::acq_rel;
4157
4158   default:
4159     return true;
4160   }
4161 }
4162
4163 ExprResult Sema::SemaAtomicOpsOverloaded(ExprResult TheCallResult,
4164                                          AtomicExpr::AtomicOp Op) {
4165   CallExpr *TheCall = cast<CallExpr>(TheCallResult.get());
4166   DeclRefExpr *DRE =cast<DeclRefExpr>(TheCall->getCallee()->IgnoreParenCasts());
4167
4168   // All the non-OpenCL operations take one of the following forms.
4169   // The OpenCL operations take the __c11 forms with one extra argument for
4170   // synchronization scope.
4171   enum {
4172     // C    __c11_atomic_init(A *, C)
4173     Init,
4174
4175     // C    __c11_atomic_load(A *, int)
4176     Load,
4177
4178     // void __atomic_load(A *, CP, int)
4179     LoadCopy,
4180
4181     // void __atomic_store(A *, CP, int)
4182     Copy,
4183
4184     // C    __c11_atomic_add(A *, M, int)
4185     Arithmetic,
4186
4187     // C    __atomic_exchange_n(A *, CP, int)
4188     Xchg,
4189
4190     // void __atomic_exchange(A *, C *, CP, int)
4191     GNUXchg,
4192
4193     // bool __c11_atomic_compare_exchange_strong(A *, C *, CP, int, int)
4194     C11CmpXchg,
4195
4196     // bool __atomic_compare_exchange(A *, C *, CP, bool, int, int)
4197     GNUCmpXchg
4198   } Form = Init;
4199
4200   const unsigned NumForm = GNUCmpXchg + 1;
4201   const unsigned NumArgs[] = { 2, 2, 3, 3, 3, 3, 4, 5, 6 };
4202   const unsigned NumVals[] = { 1, 0, 1, 1, 1, 1, 2, 2, 3 };
4203   // where:
4204   //   C is an appropriate type,
4205   //   A is volatile _Atomic(C) for __c11 builtins and is C for GNU builtins,
4206   //   CP is C for __c11 builtins and GNU _n builtins and is C * otherwise,
4207   //   M is C if C is an integer, and ptrdiff_t if C is a pointer, and
4208   //   the int parameters are for orderings.
4209
4210   static_assert(sizeof(NumArgs)/sizeof(NumArgs[0]) == NumForm
4211       && sizeof(NumVals)/sizeof(NumVals[0]) == NumForm,
4212       "need to update code for modified forms");
4213   static_assert(AtomicExpr::AO__c11_atomic_init == 0 &&
4214                     AtomicExpr::AO__c11_atomic_fetch_xor + 1 ==
4215                         AtomicExpr::AO__atomic_load,
4216                 "need to update code for modified C11 atomics");
4217   bool IsOpenCL = Op >= AtomicExpr::AO__opencl_atomic_init &&
4218                   Op <= AtomicExpr::AO__opencl_atomic_fetch_max;
4219   bool IsC11 = (Op >= AtomicExpr::AO__c11_atomic_init &&
4220                Op <= AtomicExpr::AO__c11_atomic_fetch_xor) ||
4221                IsOpenCL;
4222   bool IsN = Op == AtomicExpr::AO__atomic_load_n ||
4223              Op == AtomicExpr::AO__atomic_store_n ||
4224              Op == AtomicExpr::AO__atomic_exchange_n ||
4225              Op == AtomicExpr::AO__atomic_compare_exchange_n;
4226   bool IsAddSub = false;
4227   bool IsMinMax = false;
4228
4229   switch (Op) {
4230   case AtomicExpr::AO__c11_atomic_init:
4231   case AtomicExpr::AO__opencl_atomic_init:
4232     Form = Init;
4233     break;
4234
4235   case AtomicExpr::AO__c11_atomic_load:
4236   case AtomicExpr::AO__opencl_atomic_load:
4237   case AtomicExpr::AO__atomic_load_n:
4238     Form = Load;
4239     break;
4240
4241   case AtomicExpr::AO__atomic_load:
4242     Form = LoadCopy;
4243     break;
4244
4245   case AtomicExpr::AO__c11_atomic_store:
4246   case AtomicExpr::AO__opencl_atomic_store:
4247   case AtomicExpr::AO__atomic_store:
4248   case AtomicExpr::AO__atomic_store_n:
4249     Form = Copy;
4250     break;
4251
4252   case AtomicExpr::AO__c11_atomic_fetch_add:
4253   case AtomicExpr::AO__c11_atomic_fetch_sub:
4254   case AtomicExpr::AO__opencl_atomic_fetch_add:
4255   case AtomicExpr::AO__opencl_atomic_fetch_sub:
4256   case AtomicExpr::AO__opencl_atomic_fetch_min:
4257   case AtomicExpr::AO__opencl_atomic_fetch_max:
4258   case AtomicExpr::AO__atomic_fetch_add:
4259   case AtomicExpr::AO__atomic_fetch_sub:
4260   case AtomicExpr::AO__atomic_add_fetch:
4261   case AtomicExpr::AO__atomic_sub_fetch:
4262     IsAddSub = true;
4263     LLVM_FALLTHROUGH;
4264   case AtomicExpr::AO__c11_atomic_fetch_and:
4265   case AtomicExpr::AO__c11_atomic_fetch_or:
4266   case AtomicExpr::AO__c11_atomic_fetch_xor:
4267   case AtomicExpr::AO__opencl_atomic_fetch_and:
4268   case AtomicExpr::AO__opencl_atomic_fetch_or:
4269   case AtomicExpr::AO__opencl_atomic_fetch_xor:
4270   case AtomicExpr::AO__atomic_fetch_and:
4271   case AtomicExpr::AO__atomic_fetch_or:
4272   case AtomicExpr::AO__atomic_fetch_xor:
4273   case AtomicExpr::AO__atomic_fetch_nand:
4274   case AtomicExpr::AO__atomic_and_fetch:
4275   case AtomicExpr::AO__atomic_or_fetch:
4276   case AtomicExpr::AO__atomic_xor_fetch:
4277   case AtomicExpr::AO__atomic_nand_fetch:
4278     Form = Arithmetic;
4279     break;
4280
4281   case AtomicExpr::AO__atomic_fetch_min:
4282   case AtomicExpr::AO__atomic_fetch_max:
4283     IsMinMax = true;
4284     Form = Arithmetic;
4285     break;
4286
4287   case AtomicExpr::AO__c11_atomic_exchange:
4288   case AtomicExpr::AO__opencl_atomic_exchange:
4289   case AtomicExpr::AO__atomic_exchange_n:
4290     Form = Xchg;
4291     break;
4292
4293   case AtomicExpr::AO__atomic_exchange:
4294     Form = GNUXchg;
4295     break;
4296
4297   case AtomicExpr::AO__c11_atomic_compare_exchange_strong:
4298   case AtomicExpr::AO__c11_atomic_compare_exchange_weak:
4299   case AtomicExpr::AO__opencl_atomic_compare_exchange_strong:
4300   case AtomicExpr::AO__opencl_atomic_compare_exchange_weak:
4301     Form = C11CmpXchg;
4302     break;
4303
4304   case AtomicExpr::AO__atomic_compare_exchange:
4305   case AtomicExpr::AO__atomic_compare_exchange_n:
4306     Form = GNUCmpXchg;
4307     break;
4308   }
4309
4310   unsigned AdjustedNumArgs = NumArgs[Form];
4311   if (IsOpenCL && Op != AtomicExpr::AO__opencl_atomic_init)
4312     ++AdjustedNumArgs;
4313   // Check we have the right number of arguments.
4314   if (TheCall->getNumArgs() < AdjustedNumArgs) {
4315     Diag(TheCall->getLocEnd(), diag::err_typecheck_call_too_few_args)
4316       << 0 << AdjustedNumArgs << TheCall->getNumArgs()
4317       << TheCall->getCallee()->getSourceRange();
4318     return ExprError();
4319   } else if (TheCall->getNumArgs() > AdjustedNumArgs) {
4320     Diag(TheCall->getArg(AdjustedNumArgs)->getLocStart(),
4321          diag::err_typecheck_call_too_many_args)
4322       << 0 << AdjustedNumArgs << TheCall->getNumArgs()
4323       << TheCall->getCallee()->getSourceRange();
4324     return ExprError();
4325   }
4326
4327   // Inspect the first argument of the atomic operation.
4328   Expr *Ptr = TheCall->getArg(0);
4329   ExprResult ConvertedPtr = DefaultFunctionArrayLvalueConversion(Ptr);
4330   if (ConvertedPtr.isInvalid())
4331     return ExprError();
4332
4333   Ptr = ConvertedPtr.get();
4334   const PointerType *pointerType = Ptr->getType()->getAs<PointerType>();
4335   if (!pointerType) {
4336     Diag(DRE->getLocStart(), diag::err_atomic_builtin_must_be_pointer)
4337       << Ptr->getType() << Ptr->getSourceRange();
4338     return ExprError();
4339   }
4340
4341   // For a __c11 builtin, this should be a pointer to an _Atomic type.
4342   QualType AtomTy = pointerType->getPointeeType(); // 'A'
4343   QualType ValType = AtomTy; // 'C'
4344   if (IsC11) {
4345     if (!AtomTy->isAtomicType()) {
4346       Diag(DRE->getLocStart(), diag::err_atomic_op_needs_atomic)
4347         << Ptr->getType() << Ptr->getSourceRange();
4348       return ExprError();
4349     }
4350     if (AtomTy.isConstQualified() ||
4351         AtomTy.getAddressSpace() == LangAS::opencl_constant) {
4352       Diag(DRE->getLocStart(), diag::err_atomic_op_needs_non_const_atomic)
4353           << (AtomTy.isConstQualified() ? 0 : 1) << Ptr->getType()
4354           << Ptr->getSourceRange();
4355       return ExprError();
4356     }
4357     ValType = AtomTy->getAs<AtomicType>()->getValueType();
4358   } else if (Form != Load && Form != LoadCopy) {
4359     if (ValType.isConstQualified()) {
4360       Diag(DRE->getLocStart(), diag::err_atomic_op_needs_non_const_pointer)
4361         << Ptr->getType() << Ptr->getSourceRange();
4362       return ExprError();
4363     }
4364   }
4365
4366   // For an arithmetic operation, the implied arithmetic must be well-formed.
4367   if (Form == Arithmetic) {
4368     // gcc does not enforce these rules for GNU atomics, but we do so for sanity.
4369     if (IsAddSub && !ValType->isIntegerType()
4370         && !ValType->isPointerType()) {
4371       Diag(DRE->getLocStart(), diag::err_atomic_op_needs_atomic_int_or_ptr)
4372         << IsC11 << Ptr->getType() << Ptr->getSourceRange();
4373       return ExprError();
4374     }
4375     if (IsMinMax) {
4376       const BuiltinType *BT = ValType->getAs<BuiltinType>();
4377       if (!BT || (BT->getKind() != BuiltinType::Int &&
4378                   BT->getKind() != BuiltinType::UInt)) {
4379         Diag(DRE->getLocStart(), diag::err_atomic_op_needs_int32_or_ptr);
4380         return ExprError();
4381       }
4382     }
4383     if (!IsAddSub && !IsMinMax && !ValType->isIntegerType()) {
4384       Diag(DRE->getLocStart(), diag::err_atomic_op_bitwise_needs_atomic_int)
4385         << IsC11 << Ptr->getType() << Ptr->getSourceRange();
4386       return ExprError();
4387     }
4388     if (IsC11 && ValType->isPointerType() &&
4389         RequireCompleteType(Ptr->getLocStart(), ValType->getPointeeType(),
4390                             diag::err_incomplete_type)) {
4391       return ExprError();
4392     }
4393   } else if (IsN && !ValType->isIntegerType() && !ValType->isPointerType()) {
4394     // For __atomic_*_n operations, the value type must be a scalar integral or
4395     // pointer type which is 1, 2, 4, 8 or 16 bytes in length.
4396     Diag(DRE->getLocStart(), diag::err_atomic_op_needs_atomic_int_or_ptr)
4397       << IsC11 << Ptr->getType() << Ptr->getSourceRange();
4398     return ExprError();
4399   }
4400
4401   if (!IsC11 && !AtomTy.isTriviallyCopyableType(Context) &&
4402       !AtomTy->isScalarType()) {
4403     // For GNU atomics, require a trivially-copyable type. This is not part of
4404     // the GNU atomics specification, but we enforce it for sanity.
4405     Diag(DRE->getLocStart(), diag::err_atomic_op_needs_trivial_copy)
4406       << Ptr->getType() << Ptr->getSourceRange();
4407     return ExprError();
4408   }
4409
4410   switch (ValType.getObjCLifetime()) {
4411   case Qualifiers::OCL_None:
4412   case Qualifiers::OCL_ExplicitNone:
4413     // okay
4414     break;
4415
4416   case Qualifiers::OCL_Weak:
4417   case Qualifiers::OCL_Strong:
4418   case Qualifiers::OCL_Autoreleasing:
4419     // FIXME: Can this happen? By this point, ValType should be known
4420     // to be trivially copyable.
4421     Diag(DRE->getLocStart(), diag::err_arc_atomic_ownership)
4422       << ValType << Ptr->getSourceRange();
4423     return ExprError();
4424   }
4425
4426   // All atomic operations have an overload which takes a pointer to a volatile
4427   // 'A'.  We shouldn't let the volatile-ness of the pointee-type inject itself
4428   // into the result or the other operands. Similarly atomic_load takes a
4429   // pointer to a const 'A'.
4430   ValType.removeLocalVolatile();
4431   ValType.removeLocalConst();
4432   QualType ResultType = ValType;
4433   if (Form == Copy || Form == LoadCopy || Form == GNUXchg ||
4434       Form == Init)
4435     ResultType = Context.VoidTy;
4436   else if (Form == C11CmpXchg || Form == GNUCmpXchg)
4437     ResultType = Context.BoolTy;
4438
4439   // The type of a parameter passed 'by value'. In the GNU atomics, such
4440   // arguments are actually passed as pointers.
4441   QualType ByValType = ValType; // 'CP'
4442   bool IsPassedByAddress = false;
4443   if (!IsC11 && !IsN) {
4444     ByValType = Ptr->getType();
4445     IsPassedByAddress = true;
4446   }
4447
4448   // The first argument's non-CV pointer type is used to deduce the type of
4449   // subsequent arguments, except for:
4450   //  - weak flag (always converted to bool)
4451   //  - memory order (always converted to int)
4452   //  - scope  (always converted to int)
4453   for (unsigned i = 0; i != TheCall->getNumArgs(); ++i) {
4454     QualType Ty;
4455     if (i < NumVals[Form] + 1) {
4456       switch (i) {
4457       case 0:
4458         // The first argument is always a pointer. It has a fixed type.
4459         // It is always dereferenced, a nullptr is undefined.
4460         CheckNonNullArgument(*this, TheCall->getArg(i), DRE->getLocStart());
4461         // Nothing else to do: we already know all we want about this pointer.
4462         continue;
4463       case 1:
4464         // The second argument is the non-atomic operand. For arithmetic, this
4465         // is always passed by value, and for a compare_exchange it is always
4466         // passed by address. For the rest, GNU uses by-address and C11 uses
4467         // by-value.
4468         assert(Form != Load);
4469         if (Form == Init || (Form == Arithmetic && ValType->isIntegerType()))
4470           Ty = ValType;
4471         else if (Form == Copy || Form == Xchg) {
4472           if (IsPassedByAddress)
4473             // The value pointer is always dereferenced, a nullptr is undefined.
4474             CheckNonNullArgument(*this, TheCall->getArg(i), DRE->getLocStart());
4475           Ty = ByValType;
4476         } else if (Form == Arithmetic)
4477           Ty = Context.getPointerDiffType();
4478         else {
4479           Expr *ValArg = TheCall->getArg(i);
4480           // The value pointer is always dereferenced, a nullptr is undefined.
4481           CheckNonNullArgument(*this, ValArg, DRE->getLocStart());
4482           LangAS AS = LangAS::Default;
4483           // Keep address space of non-atomic pointer type.
4484           if (const PointerType *PtrTy =
4485                   ValArg->getType()->getAs<PointerType>()) {
4486             AS = PtrTy->getPointeeType().getAddressSpace();
4487           }
4488           Ty = Context.getPointerType(
4489               Context.getAddrSpaceQualType(ValType.getUnqualifiedType(), AS));
4490         }
4491         break;
4492       case 2:
4493         // The third argument to compare_exchange / GNU exchange is the desired
4494         // value, either by-value (for the C11 and *_n variant) or as a pointer.
4495         if (IsPassedByAddress)
4496           CheckNonNullArgument(*this, TheCall->getArg(i), DRE->getLocStart());
4497         Ty = ByValType;
4498         break;
4499       case 3:
4500         // The fourth argument to GNU compare_exchange is a 'weak' flag.
4501         Ty = Context.BoolTy;
4502         break;
4503       }
4504     } else {
4505       // The order(s) and scope are always converted to int.
4506       Ty = Context.IntTy;
4507     }
4508
4509     InitializedEntity Entity =
4510         InitializedEntity::InitializeParameter(Context, Ty, false);
4511     ExprResult Arg = TheCall->getArg(i);
4512     Arg = PerformCopyInitialization(Entity, SourceLocation(), Arg);
4513     if (Arg.isInvalid())
4514       return true;
4515     TheCall->setArg(i, Arg.get());
4516   }
4517
4518   // Permute the arguments into a 'consistent' order.
4519   SmallVector<Expr*, 5> SubExprs;
4520   SubExprs.push_back(Ptr);
4521   switch (Form) {
4522   case Init:
4523     // Note, AtomicExpr::getVal1() has a special case for this atomic.
4524     SubExprs.push_back(TheCall->getArg(1)); // Val1
4525     break;
4526   case Load:
4527     SubExprs.push_back(TheCall->getArg(1)); // Order
4528     break;
4529   case LoadCopy:
4530   case Copy:
4531   case Arithmetic:
4532   case Xchg:
4533     SubExprs.push_back(TheCall->getArg(2)); // Order
4534     SubExprs.push_back(TheCall->getArg(1)); // Val1
4535     break;
4536   case GNUXchg:
4537     // Note, AtomicExpr::getVal2() has a special case for this atomic.
4538     SubExprs.push_back(TheCall->getArg(3)); // Order
4539     SubExprs.push_back(TheCall->getArg(1)); // Val1
4540     SubExprs.push_back(TheCall->getArg(2)); // Val2
4541     break;
4542   case C11CmpXchg:
4543     SubExprs.push_back(TheCall->getArg(3)); // Order
4544     SubExprs.push_back(TheCall->getArg(1)); // Val1
4545     SubExprs.push_back(TheCall->getArg(4)); // OrderFail
4546     SubExprs.push_back(TheCall->getArg(2)); // Val2
4547     break;
4548   case GNUCmpXchg:
4549     SubExprs.push_back(TheCall->getArg(4)); // Order
4550     SubExprs.push_back(TheCall->getArg(1)); // Val1
4551     SubExprs.push_back(TheCall->getArg(5)); // OrderFail
4552     SubExprs.push_back(TheCall->getArg(2)); // Val2
4553     SubExprs.push_back(TheCall->getArg(3)); // Weak
4554     break;
4555   }
4556
4557   if (SubExprs.size() >= 2 && Form != Init) {
4558     llvm::APSInt Result(32);
4559     if (SubExprs[1]->isIntegerConstantExpr(Result, Context) &&
4560         !isValidOrderingForOp(Result.getSExtValue(), Op))
4561       Diag(SubExprs[1]->getLocStart(),
4562            diag::warn_atomic_op_has_invalid_memory_order)
4563           << SubExprs[1]->getSourceRange();
4564   }
4565
4566   if (auto ScopeModel = AtomicExpr::getScopeModel(Op)) {
4567     auto *Scope = TheCall->getArg(TheCall->getNumArgs() - 1);
4568     llvm::APSInt Result(32);
4569     if (Scope->isIntegerConstantExpr(Result, Context) &&
4570         !ScopeModel->isValid(Result.getZExtValue())) {
4571       Diag(Scope->getLocStart(), diag::err_atomic_op_has_invalid_synch_scope)
4572           << Scope->getSourceRange();
4573     }
4574     SubExprs.push_back(Scope);
4575   }
4576
4577   AtomicExpr *AE = new (Context) AtomicExpr(TheCall->getCallee()->getLocStart(),
4578                                             SubExprs, ResultType, Op,
4579                                             TheCall->getRParenLoc());
4580
4581   if ((Op == AtomicExpr::AO__c11_atomic_load ||
4582        Op == AtomicExpr::AO__c11_atomic_store ||
4583        Op == AtomicExpr::AO__opencl_atomic_load ||
4584        Op == AtomicExpr::AO__opencl_atomic_store ) &&
4585       Context.AtomicUsesUnsupportedLibcall(AE))
4586     Diag(AE->getLocStart(), diag::err_atomic_load_store_uses_lib)
4587         << ((Op == AtomicExpr::AO__c11_atomic_load ||
4588             Op == AtomicExpr::AO__opencl_atomic_load)
4589                 ? 0 : 1);
4590
4591   return AE;
4592 }
4593
4594 /// checkBuiltinArgument - Given a call to a builtin function, perform
4595 /// normal type-checking on the given argument, updating the call in
4596 /// place.  This is useful when a builtin function requires custom
4597 /// type-checking for some of its arguments but not necessarily all of
4598 /// them.
4599 ///
4600 /// Returns true on error.
4601 static bool checkBuiltinArgument(Sema &S, CallExpr *E, unsigned ArgIndex) {
4602   FunctionDecl *Fn = E->getDirectCallee();
4603   assert(Fn && "builtin call without direct callee!");
4604
4605   ParmVarDecl *Param = Fn->getParamDecl(ArgIndex);
4606   InitializedEntity Entity =
4607     InitializedEntity::InitializeParameter(S.Context, Param);
4608
4609   ExprResult Arg = E->getArg(0);
4610   Arg = S.PerformCopyInitialization(Entity, SourceLocation(), Arg);
4611   if (Arg.isInvalid())
4612     return true;
4613
4614   E->setArg(ArgIndex, Arg.get());
4615   return false;
4616 }
4617
4618 /// SemaBuiltinAtomicOverloaded - We have a call to a function like
4619 /// __sync_fetch_and_add, which is an overloaded function based on the pointer
4620 /// type of its first argument.  The main ActOnCallExpr routines have already
4621 /// promoted the types of arguments because all of these calls are prototyped as
4622 /// void(...).
4623 ///
4624 /// This function goes through and does final semantic checking for these
4625 /// builtins,
4626 ExprResult
4627 Sema::SemaBuiltinAtomicOverloaded(ExprResult TheCallResult) {
4628   CallExpr *TheCall = (CallExpr *)TheCallResult.get();
4629   DeclRefExpr *DRE =cast<DeclRefExpr>(TheCall->getCallee()->IgnoreParenCasts());
4630   FunctionDecl *FDecl = cast<FunctionDecl>(DRE->getDecl());
4631
4632   // Ensure that we have at least one argument to do type inference from.
4633   if (TheCall->getNumArgs() < 1) {
4634     Diag(TheCall->getLocEnd(), diag::err_typecheck_call_too_few_args_at_least)
4635       << 0 << 1 << TheCall->getNumArgs()
4636       << TheCall->getCallee()->getSourceRange();
4637     return ExprError();
4638   }
4639
4640   // Inspect the first argument of the atomic builtin.  This should always be
4641   // a pointer type, whose element is an integral scalar or pointer type.
4642   // Because it is a pointer type, we don't have to worry about any implicit
4643   // casts here.
4644   // FIXME: We don't allow floating point scalars as input.
4645   Expr *FirstArg = TheCall->getArg(0);
4646   ExprResult FirstArgResult = DefaultFunctionArrayLvalueConversion(FirstArg);
4647   if (FirstArgResult.isInvalid())
4648     return ExprError();
4649   FirstArg = FirstArgResult.get();
4650   TheCall->setArg(0, FirstArg);
4651
4652   const PointerType *pointerType = FirstArg->getType()->getAs<PointerType>();
4653   if (!pointerType) {
4654     Diag(DRE->getLocStart(), diag::err_atomic_builtin_must_be_pointer)
4655       << FirstArg->getType() << FirstArg->getSourceRange();
4656     return ExprError();
4657   }
4658
4659   QualType ValType = pointerType->getPointeeType();
4660   if (!ValType->isIntegerType() && !ValType->isAnyPointerType() &&
4661       !ValType->isBlockPointerType()) {
4662     Diag(DRE->getLocStart(), diag::err_atomic_builtin_must_be_pointer_intptr)
4663       << FirstArg->getType() << FirstArg->getSourceRange();
4664     return ExprError();
4665   }
4666
4667   if (ValType.isConstQualified()) {
4668     Diag(DRE->getLocStart(), diag::err_atomic_builtin_cannot_be_const)
4669         << FirstArg->getType() << FirstArg->getSourceRange();
4670     return ExprError();
4671   }
4672
4673   switch (ValType.getObjCLifetime()) {
4674   case Qualifiers::OCL_None:
4675   case Qualifiers::OCL_ExplicitNone:
4676     // okay
4677     break;
4678
4679   case Qualifiers::OCL_Weak:
4680   case Qualifiers::OCL_Strong:
4681   case Qualifiers::OCL_Autoreleasing:
4682     Diag(DRE->getLocStart(), diag::err_arc_atomic_ownership)
4683       << ValType << FirstArg->getSourceRange();
4684     return ExprError();
4685   }
4686
4687   // Strip any qualifiers off ValType.
4688   ValType = ValType.getUnqualifiedType();
4689
4690   // The majority of builtins return a value, but a few have special return
4691   // types, so allow them to override appropriately below.
4692   QualType ResultType = ValType;
4693
4694   // We need to figure out which concrete builtin this maps onto.  For example,
4695   // __sync_fetch_and_add with a 2 byte object turns into
4696   // __sync_fetch_and_add_2.
4697 #define BUILTIN_ROW(x) \
4698   { Builtin::BI##x##_1, Builtin::BI##x##_2, Builtin::BI##x##_4, \
4699     Builtin::BI##x##_8, Builtin::BI##x##_16 }
4700
4701   static const unsigned BuiltinIndices[][5] = {
4702     BUILTIN_ROW(__sync_fetch_and_add),
4703     BUILTIN_ROW(__sync_fetch_and_sub),
4704     BUILTIN_ROW(__sync_fetch_and_or),
4705     BUILTIN_ROW(__sync_fetch_and_and),
4706     BUILTIN_ROW(__sync_fetch_and_xor),
4707     BUILTIN_ROW(__sync_fetch_and_nand),
4708
4709     BUILTIN_ROW(__sync_add_and_fetch),
4710     BUILTIN_ROW(__sync_sub_and_fetch),
4711     BUILTIN_ROW(__sync_and_and_fetch),
4712     BUILTIN_ROW(__sync_or_and_fetch),
4713     BUILTIN_ROW(__sync_xor_and_fetch),
4714     BUILTIN_ROW(__sync_nand_and_fetch),
4715
4716     BUILTIN_ROW(__sync_val_compare_and_swap),
4717     BUILTIN_ROW(__sync_bool_compare_and_swap),
4718     BUILTIN_ROW(__sync_lock_test_and_set),
4719     BUILTIN_ROW(__sync_lock_release),
4720     BUILTIN_ROW(__sync_swap)
4721   };
4722 #undef BUILTIN_ROW
4723
4724   // Determine the index of the size.
4725   unsigned SizeIndex;
4726   switch (Context.getTypeSizeInChars(ValType).getQuantity()) {
4727   case 1: SizeIndex = 0; break;
4728   case 2: SizeIndex = 1; break;
4729   case 4: SizeIndex = 2; break;
4730   case 8: SizeIndex = 3; break;
4731   case 16: SizeIndex = 4; break;
4732   default:
4733     Diag(DRE->getLocStart(), diag::err_atomic_builtin_pointer_size)
4734       << FirstArg->getType() << FirstArg->getSourceRange();
4735     return ExprError();
4736   }
4737
4738   // Each of these builtins has one pointer argument, followed by some number of
4739   // values (0, 1 or 2) followed by a potentially empty varags list of stuff
4740   // that we ignore.  Find out which row of BuiltinIndices to read from as well
4741   // as the number of fixed args.
4742   unsigned BuiltinID = FDecl->getBuiltinID();
4743   unsigned BuiltinIndex, NumFixed = 1;
4744   bool WarnAboutSemanticsChange = false;
4745   switch (BuiltinID) {
4746   default: llvm_unreachable("Unknown overloaded atomic builtin!");
4747   case Builtin::BI__sync_fetch_and_add:
4748   case Builtin::BI__sync_fetch_and_add_1:
4749   case Builtin::BI__sync_fetch_and_add_2:
4750   case Builtin::BI__sync_fetch_and_add_4:
4751   case Builtin::BI__sync_fetch_and_add_8:
4752   case Builtin::BI__sync_fetch_and_add_16:
4753     BuiltinIndex = 0;
4754     break;
4755
4756   case Builtin::BI__sync_fetch_and_sub:
4757   case Builtin::BI__sync_fetch_and_sub_1:
4758   case Builtin::BI__sync_fetch_and_sub_2:
4759   case Builtin::BI__sync_fetch_and_sub_4:
4760   case Builtin::BI__sync_fetch_and_sub_8:
4761   case Builtin::BI__sync_fetch_and_sub_16:
4762     BuiltinIndex = 1;
4763     break;
4764
4765   case Builtin::BI__sync_fetch_and_or:
4766   case Builtin::BI__sync_fetch_and_or_1:
4767   case Builtin::BI__sync_fetch_and_or_2:
4768   case Builtin::BI__sync_fetch_and_or_4:
4769   case Builtin::BI__sync_fetch_and_or_8:
4770   case Builtin::BI__sync_fetch_and_or_16:
4771     BuiltinIndex = 2;
4772     break;
4773
4774   case Builtin::BI__sync_fetch_and_and:
4775   case Builtin::BI__sync_fetch_and_and_1:
4776   case Builtin::BI__sync_fetch_and_and_2:
4777   case Builtin::BI__sync_fetch_and_and_4:
4778   case Builtin::BI__sync_fetch_and_and_8:
4779   case Builtin::BI__sync_fetch_and_and_16:
4780     BuiltinIndex = 3;
4781     break;
4782
4783   case Builtin::BI__sync_fetch_and_xor:
4784   case Builtin::BI__sync_fetch_and_xor_1:
4785   case Builtin::BI__sync_fetch_and_xor_2:
4786   case Builtin::BI__sync_fetch_and_xor_4:
4787   case Builtin::BI__sync_fetch_and_xor_8:
4788   case Builtin::BI__sync_fetch_and_xor_16:
4789     BuiltinIndex = 4;
4790     break;
4791
4792   case Builtin::BI__sync_fetch_and_nand:
4793   case Builtin::BI__sync_fetch_and_nand_1:
4794   case Builtin::BI__sync_fetch_and_nand_2:
4795   case Builtin::BI__sync_fetch_and_nand_4:
4796   case Builtin::BI__sync_fetch_and_nand_8:
4797   case Builtin::BI__sync_fetch_and_nand_16:
4798     BuiltinIndex = 5;
4799     WarnAboutSemanticsChange = true;
4800     break;
4801
4802   case Builtin::BI__sync_add_and_fetch:
4803   case Builtin::BI__sync_add_and_fetch_1:
4804   case Builtin::BI__sync_add_and_fetch_2:
4805   case Builtin::BI__sync_add_and_fetch_4:
4806   case Builtin::BI__sync_add_and_fetch_8:
4807   case Builtin::BI__sync_add_and_fetch_16:
4808     BuiltinIndex = 6;
4809     break;
4810
4811   case Builtin::BI__sync_sub_and_fetch:
4812   case Builtin::BI__sync_sub_and_fetch_1:
4813   case Builtin::BI__sync_sub_and_fetch_2:
4814   case Builtin::BI__sync_sub_and_fetch_4:
4815   case Builtin::BI__sync_sub_and_fetch_8:
4816   case Builtin::BI__sync_sub_and_fetch_16:
4817     BuiltinIndex = 7;
4818     break;
4819
4820   case Builtin::BI__sync_and_and_fetch:
4821   case Builtin::BI__sync_and_and_fetch_1:
4822   case Builtin::BI__sync_and_and_fetch_2:
4823   case Builtin::BI__sync_and_and_fetch_4:
4824   case Builtin::BI__sync_and_and_fetch_8:
4825   case Builtin::BI__sync_and_and_fetch_16:
4826     BuiltinIndex = 8;
4827     break;
4828
4829   case Builtin::BI__sync_or_and_fetch:
4830   case Builtin::BI__sync_or_and_fetch_1:
4831   case Builtin::BI__sync_or_and_fetch_2:
4832   case Builtin::BI__sync_or_and_fetch_4:
4833   case Builtin::BI__sync_or_and_fetch_8:
4834   case Builtin::BI__sync_or_and_fetch_16:
4835     BuiltinIndex = 9;
4836     break;
4837
4838   case Builtin::BI__sync_xor_and_fetch:
4839   case Builtin::BI__sync_xor_and_fetch_1:
4840   case Builtin::BI__sync_xor_and_fetch_2:
4841   case Builtin::BI__sync_xor_and_fetch_4:
4842   case Builtin::BI__sync_xor_and_fetch_8:
4843   case Builtin::BI__sync_xor_and_fetch_16:
4844     BuiltinIndex = 10;
4845     break;
4846
4847   case Builtin::BI__sync_nand_and_fetch:
4848   case Builtin::BI__sync_nand_and_fetch_1:
4849   case Builtin::BI__sync_nand_and_fetch_2:
4850   case Builtin::BI__sync_nand_and_fetch_4:
4851   case Builtin::BI__sync_nand_and_fetch_8:
4852   case Builtin::BI__sync_nand_and_fetch_16:
4853     BuiltinIndex = 11;
4854     WarnAboutSemanticsChange = true;
4855     break;
4856
4857   case Builtin::BI__sync_val_compare_and_swap:
4858   case Builtin::BI__sync_val_compare_and_swap_1:
4859   case Builtin::BI__sync_val_compare_and_swap_2:
4860   case Builtin::BI__sync_val_compare_and_swap_4:
4861   case Builtin::BI__sync_val_compare_and_swap_8:
4862   case Builtin::BI__sync_val_compare_and_swap_16:
4863     BuiltinIndex = 12;
4864     NumFixed = 2;
4865     break;
4866
4867   case Builtin::BI__sync_bool_compare_and_swap:
4868   case Builtin::BI__sync_bool_compare_and_swap_1:
4869   case Builtin::BI__sync_bool_compare_and_swap_2:
4870   case Builtin::BI__sync_bool_compare_and_swap_4:
4871   case Builtin::BI__sync_bool_compare_and_swap_8:
4872   case Builtin::BI__sync_bool_compare_and_swap_16:
4873     BuiltinIndex = 13;
4874     NumFixed = 2;
4875     ResultType = Context.BoolTy;
4876     break;
4877
4878   case Builtin::BI__sync_lock_test_and_set:
4879   case Builtin::BI__sync_lock_test_and_set_1:
4880   case Builtin::BI__sync_lock_test_and_set_2:
4881   case Builtin::BI__sync_lock_test_and_set_4:
4882   case Builtin::BI__sync_lock_test_and_set_8:
4883   case Builtin::BI__sync_lock_test_and_set_16:
4884     BuiltinIndex = 14;
4885     break;
4886
4887   case Builtin::BI__sync_lock_release:
4888   case Builtin::BI__sync_lock_release_1:
4889   case Builtin::BI__sync_lock_release_2:
4890   case Builtin::BI__sync_lock_release_4:
4891   case Builtin::BI__sync_lock_release_8:
4892   case Builtin::BI__sync_lock_release_16:
4893     BuiltinIndex = 15;
4894     NumFixed = 0;
4895     ResultType = Context.VoidTy;
4896     break;
4897
4898   case Builtin::BI__sync_swap:
4899   case Builtin::BI__sync_swap_1:
4900   case Builtin::BI__sync_swap_2:
4901   case Builtin::BI__sync_swap_4:
4902   case Builtin::BI__sync_swap_8:
4903   case Builtin::BI__sync_swap_16:
4904     BuiltinIndex = 16;
4905     break;
4906   }
4907
4908   // Now that we know how many fixed arguments we expect, first check that we
4909   // have at least that many.
4910   if (TheCall->getNumArgs() < 1+NumFixed) {
4911     Diag(TheCall->getLocEnd(), diag::err_typecheck_call_too_few_args_at_least)
4912       << 0 << 1+NumFixed << TheCall->getNumArgs()
4913       << TheCall->getCallee()->getSourceRange();
4914     return ExprError();
4915   }
4916
4917   if (WarnAboutSemanticsChange) {
4918     Diag(TheCall->getLocEnd(), diag::warn_sync_fetch_and_nand_semantics_change)
4919       << TheCall->getCallee()->getSourceRange();
4920   }
4921
4922   // Get the decl for the concrete builtin from this, we can tell what the
4923   // concrete integer type we should convert to is.
4924   unsigned NewBuiltinID = BuiltinIndices[BuiltinIndex][SizeIndex];
4925   const char *NewBuiltinName = Context.BuiltinInfo.getName(NewBuiltinID);
4926   FunctionDecl *NewBuiltinDecl;
4927   if (NewBuiltinID == BuiltinID)
4928     NewBuiltinDecl = FDecl;
4929   else {
4930     // Perform builtin lookup to avoid redeclaring it.
4931     DeclarationName DN(&Context.Idents.get(NewBuiltinName));
4932     LookupResult Res(*this, DN, DRE->getLocStart(), LookupOrdinaryName);
4933     LookupName(Res, TUScope, /*AllowBuiltinCreation=*/true);
4934     assert(Res.getFoundDecl());
4935     NewBuiltinDecl = dyn_cast<FunctionDecl>(Res.getFoundDecl());
4936     if (!NewBuiltinDecl)
4937       return ExprError();
4938   }
4939
4940   // The first argument --- the pointer --- has a fixed type; we
4941   // deduce the types of the rest of the arguments accordingly.  Walk
4942   // the remaining arguments, converting them to the deduced value type.
4943   for (unsigned i = 0; i != NumFixed; ++i) {
4944     ExprResult Arg = TheCall->getArg(i+1);
4945
4946     // GCC does an implicit conversion to the pointer or integer ValType.  This
4947     // can fail in some cases (1i -> int**), check for this error case now.
4948     // Initialize the argument.
4949     InitializedEntity Entity = InitializedEntity::InitializeParameter(Context,
4950                                                    ValType, /*consume*/ false);
4951     Arg = PerformCopyInitialization(Entity, SourceLocation(), Arg);
4952     if (Arg.isInvalid())
4953       return ExprError();
4954
4955     // Okay, we have something that *can* be converted to the right type.  Check
4956     // to see if there is a potentially weird extension going on here.  This can
4957     // happen when you do an atomic operation on something like an char* and
4958     // pass in 42.  The 42 gets converted to char.  This is even more strange
4959     // for things like 45.123 -> char, etc.
4960     // FIXME: Do this check.
4961     TheCall->setArg(i+1, Arg.get());
4962   }
4963
4964   ASTContext& Context = this->getASTContext();
4965
4966   // Create a new DeclRefExpr to refer to the new decl.
4967   DeclRefExpr* NewDRE = DeclRefExpr::Create(
4968       Context,
4969       DRE->getQualifierLoc(),
4970       SourceLocation(),
4971       NewBuiltinDecl,
4972       /*enclosing*/ false,
4973       DRE->getLocation(),
4974       Context.BuiltinFnTy,
4975       DRE->getValueKind());
4976
4977   // Set the callee in the CallExpr.
4978   // FIXME: This loses syntactic information.
4979   QualType CalleePtrTy = Context.getPointerType(NewBuiltinDecl->getType());
4980   ExprResult PromotedCall = ImpCastExprToType(NewDRE, CalleePtrTy,
4981                                               CK_BuiltinFnToFnPtr);
4982   TheCall->setCallee(PromotedCall.get());
4983
4984   // Change the result type of the call to match the original value type. This
4985   // is arbitrary, but the codegen for these builtins ins design to handle it
4986   // gracefully.
4987   TheCall->setType(ResultType);
4988
4989   return TheCallResult;
4990 }
4991
4992 /// SemaBuiltinNontemporalOverloaded - We have a call to
4993 /// __builtin_nontemporal_store or __builtin_nontemporal_load, which is an
4994 /// overloaded function based on the pointer type of its last argument.
4995 ///
4996 /// This function goes through and does final semantic checking for these
4997 /// builtins.
4998 ExprResult Sema::SemaBuiltinNontemporalOverloaded(ExprResult TheCallResult) {
4999   CallExpr *TheCall = (CallExpr *)TheCallResult.get();
5000   DeclRefExpr *DRE =
5001       cast<DeclRefExpr>(TheCall->getCallee()->IgnoreParenCasts());
5002   FunctionDecl *FDecl = cast<FunctionDecl>(DRE->getDecl());
5003   unsigned BuiltinID = FDecl->getBuiltinID();
5004   assert((BuiltinID == Builtin::BI__builtin_nontemporal_store ||
5005           BuiltinID == Builtin::BI__builtin_nontemporal_load) &&
5006          "Unexpected nontemporal load/store builtin!");
5007   bool isStore = BuiltinID == Builtin::BI__builtin_nontemporal_store;
5008   unsigned numArgs = isStore ? 2 : 1;
5009
5010   // Ensure that we have the proper number of arguments.
5011   if (checkArgCount(*this, TheCall, numArgs))
5012     return ExprError();
5013
5014   // Inspect the last argument of the nontemporal builtin.  This should always
5015   // be a pointer type, from which we imply the type of the memory access.
5016   // Because it is a pointer type, we don't have to worry about any implicit
5017   // casts here.
5018   Expr *PointerArg = TheCall->getArg(numArgs - 1);
5019   ExprResult PointerArgResult =
5020       DefaultFunctionArrayLvalueConversion(PointerArg);
5021
5022   if (PointerArgResult.isInvalid())
5023     return ExprError();
5024   PointerArg = PointerArgResult.get();
5025   TheCall->setArg(numArgs - 1, PointerArg);
5026
5027   const PointerType *pointerType = PointerArg->getType()->getAs<PointerType>();
5028   if (!pointerType) {
5029     Diag(DRE->getLocStart(), diag::err_nontemporal_builtin_must_be_pointer)
5030         << PointerArg->getType() << PointerArg->getSourceRange();
5031     return ExprError();
5032   }
5033
5034   QualType ValType = pointerType->getPointeeType();
5035
5036   // Strip any qualifiers off ValType.
5037   ValType = ValType.getUnqualifiedType();
5038   if (!ValType->isIntegerType() && !ValType->isAnyPointerType() &&
5039       !ValType->isBlockPointerType() && !ValType->isFloatingType() &&
5040       !ValType->isVectorType()) {
5041     Diag(DRE->getLocStart(),
5042          diag::err_nontemporal_builtin_must_be_pointer_intfltptr_or_vector)
5043         << PointerArg->getType() << PointerArg->getSourceRange();
5044     return ExprError();
5045   }
5046
5047   if (!isStore) {
5048     TheCall->setType(ValType);
5049     return TheCallResult;
5050   }
5051
5052   ExprResult ValArg = TheCall->getArg(0);
5053   InitializedEntity Entity = InitializedEntity::InitializeParameter(
5054       Context, ValType, /*consume*/ false);
5055   ValArg = PerformCopyInitialization(Entity, SourceLocation(), ValArg);
5056   if (ValArg.isInvalid())
5057     return ExprError();
5058
5059   TheCall->setArg(0, ValArg.get());
5060   TheCall->setType(Context.VoidTy);
5061   return TheCallResult;
5062 }
5063
5064 /// CheckObjCString - Checks that the argument to the builtin
5065 /// CFString constructor is correct
5066 /// Note: It might also make sense to do the UTF-16 conversion here (would
5067 /// simplify the backend).
5068 bool Sema::CheckObjCString(Expr *Arg) {
5069   Arg = Arg->IgnoreParenCasts();
5070   StringLiteral *Literal = dyn_cast<StringLiteral>(Arg);
5071
5072   if (!Literal || !Literal->isAscii()) {
5073     Diag(Arg->getLocStart(), diag::err_cfstring_literal_not_string_constant)
5074       << Arg->getSourceRange();
5075     return true;
5076   }
5077
5078   if (Literal->containsNonAsciiOrNull()) {
5079     StringRef String = Literal->getString();
5080     unsigned NumBytes = String.size();
5081     SmallVector<llvm::UTF16, 128> ToBuf(NumBytes);
5082     const llvm::UTF8 *FromPtr = (const llvm::UTF8 *)String.data();
5083     llvm::UTF16 *ToPtr = &ToBuf[0];
5084
5085     llvm::ConversionResult Result =
5086         llvm::ConvertUTF8toUTF16(&FromPtr, FromPtr + NumBytes, &ToPtr,
5087                                  ToPtr + NumBytes, llvm::strictConversion);
5088     // Check for conversion failure.
5089     if (Result != llvm::conversionOK)
5090       Diag(Arg->getLocStart(),
5091            diag::warn_cfstring_truncated) << Arg->getSourceRange();
5092   }
5093   return false;
5094 }
5095
5096 /// CheckObjCString - Checks that the format string argument to the os_log()
5097 /// and os_trace() functions is correct, and converts it to const char *.
5098 ExprResult Sema::CheckOSLogFormatStringArg(Expr *Arg) {
5099   Arg = Arg->IgnoreParenCasts();
5100   auto *Literal = dyn_cast<StringLiteral>(Arg);
5101   if (!Literal) {
5102     if (auto *ObjcLiteral = dyn_cast<ObjCStringLiteral>(Arg)) {
5103       Literal = ObjcLiteral->getString();
5104     }
5105   }
5106
5107   if (!Literal || (!Literal->isAscii() && !Literal->isUTF8())) {
5108     return ExprError(
5109         Diag(Arg->getLocStart(), diag::err_os_log_format_not_string_constant)
5110         << Arg->getSourceRange());
5111   }
5112
5113   ExprResult Result(Literal);
5114   QualType ResultTy = Context.getPointerType(Context.CharTy.withConst());
5115   InitializedEntity Entity =
5116       InitializedEntity::InitializeParameter(Context, ResultTy, false);
5117   Result = PerformCopyInitialization(Entity, SourceLocation(), Result);
5118   return Result;
5119 }
5120
5121 /// Check that the user is calling the appropriate va_start builtin for the
5122 /// target and calling convention.
5123 static bool checkVAStartABI(Sema &S, unsigned BuiltinID, Expr *Fn) {
5124   const llvm::Triple &TT = S.Context.getTargetInfo().getTriple();
5125   bool IsX64 = TT.getArch() == llvm::Triple::x86_64;
5126   bool IsAArch64 = TT.getArch() == llvm::Triple::aarch64;
5127   bool IsWindows = TT.isOSWindows();
5128   bool IsMSVAStart = BuiltinID == Builtin::BI__builtin_ms_va_start;
5129   if (IsX64 || IsAArch64) {
5130     CallingConv CC = CC_C;
5131     if (const FunctionDecl *FD = S.getCurFunctionDecl())
5132       CC = FD->getType()->getAs<FunctionType>()->getCallConv();
5133     if (IsMSVAStart) {
5134       // Don't allow this in System V ABI functions.
5135       if (CC == CC_X86_64SysV || (!IsWindows && CC != CC_Win64))
5136         return S.Diag(Fn->getLocStart(),
5137                       diag::err_ms_va_start_used_in_sysv_function);
5138     } else {
5139       // On x86-64/AArch64 Unix, don't allow this in Win64 ABI functions.
5140       // On x64 Windows, don't allow this in System V ABI functions.
5141       // (Yes, that means there's no corresponding way to support variadic
5142       // System V ABI functions on Windows.)
5143       if ((IsWindows && CC == CC_X86_64SysV) ||
5144           (!IsWindows && CC == CC_Win64))
5145         return S.Diag(Fn->getLocStart(),
5146                       diag::err_va_start_used_in_wrong_abi_function)
5147                << !IsWindows;
5148     }
5149     return false;
5150   }
5151
5152   if (IsMSVAStart)
5153     return S.Diag(Fn->getLocStart(), diag::err_builtin_x64_aarch64_only);
5154   return false;
5155 }
5156
5157 static bool checkVAStartIsInVariadicFunction(Sema &S, Expr *Fn,
5158                                              ParmVarDecl **LastParam = nullptr) {
5159   // Determine whether the current function, block, or obj-c method is variadic
5160   // and get its parameter list.
5161   bool IsVariadic = false;
5162   ArrayRef<ParmVarDecl *> Params;
5163   DeclContext *Caller = S.CurContext;
5164   if (auto *Block = dyn_cast<BlockDecl>(Caller)) {
5165     IsVariadic = Block->isVariadic();
5166     Params = Block->parameters();
5167   } else if (auto *FD = dyn_cast<FunctionDecl>(Caller)) {
5168     IsVariadic = FD->isVariadic();
5169     Params = FD->parameters();
5170   } else if (auto *MD = dyn_cast<ObjCMethodDecl>(Caller)) {
5171     IsVariadic = MD->isVariadic();
5172     // FIXME: This isn't correct for methods (results in bogus warning).
5173     Params = MD->parameters();
5174   } else if (isa<CapturedDecl>(Caller)) {
5175     // We don't support va_start in a CapturedDecl.
5176     S.Diag(Fn->getLocStart(), diag::err_va_start_captured_stmt);
5177     return true;
5178   } else {
5179     // This must be some other declcontext that parses exprs.
5180     S.Diag(Fn->getLocStart(), diag::err_va_start_outside_function);
5181     return true;
5182   }
5183
5184   if (!IsVariadic) {
5185     S.Diag(Fn->getLocStart(), diag::err_va_start_fixed_function);
5186     return true;
5187   }
5188
5189   if (LastParam)
5190     *LastParam = Params.empty() ? nullptr : Params.back();
5191
5192   return false;
5193 }
5194
5195 /// Check the arguments to '__builtin_va_start' or '__builtin_ms_va_start'
5196 /// for validity.  Emit an error and return true on failure; return false
5197 /// on success.
5198 bool Sema::SemaBuiltinVAStart(unsigned BuiltinID, CallExpr *TheCall) {
5199   Expr *Fn = TheCall->getCallee();
5200
5201   if (checkVAStartABI(*this, BuiltinID, Fn))
5202     return true;
5203
5204   if (TheCall->getNumArgs() > 2) {
5205     Diag(TheCall->getArg(2)->getLocStart(),
5206          diag::err_typecheck_call_too_many_args)
5207       << 0 /*function call*/ << 2 << TheCall->getNumArgs()
5208       << Fn->getSourceRange()
5209       << SourceRange(TheCall->getArg(2)->getLocStart(),
5210                      (*(TheCall->arg_end()-1))->getLocEnd());
5211     return true;
5212   }
5213
5214   if (TheCall->getNumArgs() < 2) {
5215     return Diag(TheCall->getLocEnd(),
5216       diag::err_typecheck_call_too_few_args_at_least)
5217       << 0 /*function call*/ << 2 << TheCall->getNumArgs();
5218   }
5219
5220   // Type-check the first argument normally.
5221   if (checkBuiltinArgument(*this, TheCall, 0))
5222     return true;
5223
5224   // Check that the current function is variadic, and get its last parameter.
5225   ParmVarDecl *LastParam;
5226   if (checkVAStartIsInVariadicFunction(*this, Fn, &LastParam))
5227     return true;
5228
5229   // Verify that the second argument to the builtin is the last argument of the
5230   // current function or method.
5231   bool SecondArgIsLastNamedArgument = false;
5232   const Expr *Arg = TheCall->getArg(1)->IgnoreParenCasts();
5233
5234   // These are valid if SecondArgIsLastNamedArgument is false after the next
5235   // block.
5236   QualType Type;
5237   SourceLocation ParamLoc;
5238   bool IsCRegister = false;
5239
5240   if (const DeclRefExpr *DR = dyn_cast<DeclRefExpr>(Arg)) {
5241     if (const ParmVarDecl *PV = dyn_cast<ParmVarDecl>(DR->getDecl())) {
5242       SecondArgIsLastNamedArgument = PV == LastParam;
5243
5244       Type = PV->getType();
5245       ParamLoc = PV->getLocation();
5246       IsCRegister =
5247           PV->getStorageClass() == SC_Register && !getLangOpts().CPlusPlus;
5248     }
5249   }
5250
5251   if (!SecondArgIsLastNamedArgument)
5252     Diag(TheCall->getArg(1)->getLocStart(),
5253          diag::warn_second_arg_of_va_start_not_last_named_param);
5254   else if (IsCRegister || Type->isReferenceType() ||
5255            Type->isSpecificBuiltinType(BuiltinType::Float) || [=] {
5256              // Promotable integers are UB, but enumerations need a bit of
5257              // extra checking to see what their promotable type actually is.
5258              if (!Type->isPromotableIntegerType())
5259                return false;
5260              if (!Type->isEnumeralType())
5261                return true;
5262              const EnumDecl *ED = Type->getAs<EnumType>()->getDecl();
5263              return !(ED &&
5264                       Context.typesAreCompatible(ED->getPromotionType(), Type));
5265            }()) {
5266     unsigned Reason = 0;
5267     if (Type->isReferenceType())  Reason = 1;
5268     else if (IsCRegister)         Reason = 2;
5269     Diag(Arg->getLocStart(), diag::warn_va_start_type_is_undefined) << Reason;
5270     Diag(ParamLoc, diag::note_parameter_type) << Type;
5271   }
5272
5273   TheCall->setType(Context.VoidTy);
5274   return false;
5275 }
5276
5277 bool Sema::SemaBuiltinVAStartARMMicrosoft(CallExpr *Call) {
5278   // void __va_start(va_list *ap, const char *named_addr, size_t slot_size,
5279   //                 const char *named_addr);
5280
5281   Expr *Func = Call->getCallee();
5282
5283   if (Call->getNumArgs() < 3)
5284     return Diag(Call->getLocEnd(),
5285                 diag::err_typecheck_call_too_few_args_at_least)
5286            << 0 /*function call*/ << 3 << Call->getNumArgs();
5287
5288   // Type-check the first argument normally.
5289   if (checkBuiltinArgument(*this, Call, 0))
5290     return true;
5291
5292   // Check that the current function is variadic.
5293   if (checkVAStartIsInVariadicFunction(*this, Func))
5294     return true;
5295
5296   // __va_start on Windows does not validate the parameter qualifiers
5297
5298   const Expr *Arg1 = Call->getArg(1)->IgnoreParens();
5299   const Type *Arg1Ty = Arg1->getType().getCanonicalType().getTypePtr();
5300
5301   const Expr *Arg2 = Call->getArg(2)->IgnoreParens();
5302   const Type *Arg2Ty = Arg2->getType().getCanonicalType().getTypePtr();
5303
5304   const QualType &ConstCharPtrTy =
5305       Context.getPointerType(Context.CharTy.withConst());
5306   if (!Arg1Ty->isPointerType() ||
5307       Arg1Ty->getPointeeType().withoutLocalFastQualifiers() != Context.CharTy)
5308     Diag(Arg1->getLocStart(), diag::err_typecheck_convert_incompatible)
5309         << Arg1->getType() << ConstCharPtrTy
5310         << 1 /* different class */
5311         << 0 /* qualifier difference */
5312         << 3 /* parameter mismatch */
5313         << 2 << Arg1->getType() << ConstCharPtrTy;
5314
5315   const QualType SizeTy = Context.getSizeType();
5316   if (Arg2Ty->getCanonicalTypeInternal().withoutLocalFastQualifiers() != SizeTy)
5317     Diag(Arg2->getLocStart(), diag::err_typecheck_convert_incompatible)
5318         << Arg2->getType() << SizeTy
5319         << 1 /* different class */
5320         << 0 /* qualifier difference */
5321         << 3 /* parameter mismatch */
5322         << 3 << Arg2->getType() << SizeTy;
5323
5324   return false;
5325 }
5326
5327 /// SemaBuiltinUnorderedCompare - Handle functions like __builtin_isgreater and
5328 /// friends.  This is declared to take (...), so we have to check everything.
5329 bool Sema::SemaBuiltinUnorderedCompare(CallExpr *TheCall) {
5330   if (TheCall->getNumArgs() < 2)
5331     return Diag(TheCall->getLocEnd(), diag::err_typecheck_call_too_few_args)
5332       << 0 << 2 << TheCall->getNumArgs()/*function call*/;
5333   if (TheCall->getNumArgs() > 2)
5334     return Diag(TheCall->getArg(2)->getLocStart(),
5335                 diag::err_typecheck_call_too_many_args)
5336       << 0 /*function call*/ << 2 << TheCall->getNumArgs()
5337       << SourceRange(TheCall->getArg(2)->getLocStart(),
5338                      (*(TheCall->arg_end()-1))->getLocEnd());
5339
5340   ExprResult OrigArg0 = TheCall->getArg(0);
5341   ExprResult OrigArg1 = TheCall->getArg(1);
5342
5343   // Do standard promotions between the two arguments, returning their common
5344   // type.
5345   QualType Res = UsualArithmeticConversions(OrigArg0, OrigArg1, false);
5346   if (OrigArg0.isInvalid() || OrigArg1.isInvalid())
5347     return true;
5348
5349   // Make sure any conversions are pushed back into the call; this is
5350   // type safe since unordered compare builtins are declared as "_Bool
5351   // foo(...)".
5352   TheCall->setArg(0, OrigArg0.get());
5353   TheCall->setArg(1, OrigArg1.get());
5354
5355   if (OrigArg0.get()->isTypeDependent() || OrigArg1.get()->isTypeDependent())
5356     return false;
5357
5358   // If the common type isn't a real floating type, then the arguments were
5359   // invalid for this operation.
5360   if (Res.isNull() || !Res->isRealFloatingType())
5361     return Diag(OrigArg0.get()->getLocStart(),
5362                 diag::err_typecheck_call_invalid_ordered_compare)
5363       << OrigArg0.get()->getType() << OrigArg1.get()->getType()
5364       << SourceRange(OrigArg0.get()->getLocStart(), OrigArg1.get()->getLocEnd());
5365
5366   return false;
5367 }
5368
5369 /// SemaBuiltinSemaBuiltinFPClassification - Handle functions like
5370 /// __builtin_isnan and friends.  This is declared to take (...), so we have
5371 /// to check everything. We expect the last argument to be a floating point
5372 /// value.
5373 bool Sema::SemaBuiltinFPClassification(CallExpr *TheCall, unsigned NumArgs) {
5374   if (TheCall->getNumArgs() < NumArgs)
5375     return Diag(TheCall->getLocEnd(), diag::err_typecheck_call_too_few_args)
5376       << 0 << NumArgs << TheCall->getNumArgs()/*function call*/;
5377   if (TheCall->getNumArgs() > NumArgs)
5378     return Diag(TheCall->getArg(NumArgs)->getLocStart(),
5379                 diag::err_typecheck_call_too_many_args)
5380       << 0 /*function call*/ << NumArgs << TheCall->getNumArgs()
5381       << SourceRange(TheCall->getArg(NumArgs)->getLocStart(),
5382                      (*(TheCall->arg_end()-1))->getLocEnd());
5383
5384   Expr *OrigArg = TheCall->getArg(NumArgs-1);
5385
5386   if (OrigArg->isTypeDependent())
5387     return false;
5388
5389   // This operation requires a non-_Complex floating-point number.
5390   if (!OrigArg->getType()->isRealFloatingType())
5391     return Diag(OrigArg->getLocStart(),
5392                 diag::err_typecheck_call_invalid_unary_fp)
5393       << OrigArg->getType() << OrigArg->getSourceRange();
5394
5395   // If this is an implicit conversion from float -> float, double, or
5396   // long double, remove it.
5397   if (ImplicitCastExpr *Cast = dyn_cast<ImplicitCastExpr>(OrigArg)) {
5398     // Only remove standard FloatCasts, leaving other casts inplace
5399     if (Cast->getCastKind() == CK_FloatingCast) {
5400       Expr *CastArg = Cast->getSubExpr();
5401       if (CastArg->getType()->isSpecificBuiltinType(BuiltinType::Float)) {
5402         assert(
5403             (Cast->getType()->isSpecificBuiltinType(BuiltinType::Double) ||
5404              Cast->getType()->isSpecificBuiltinType(BuiltinType::Float) ||
5405              Cast->getType()->isSpecificBuiltinType(BuiltinType::LongDouble)) &&
5406             "promotion from float to either float, double, or long double is "
5407             "the only expected cast here");
5408         Cast->setSubExpr(nullptr);
5409         TheCall->setArg(NumArgs-1, CastArg);
5410       }
5411     }
5412   }
5413
5414   return false;
5415 }
5416
5417 // Customized Sema Checking for VSX builtins that have the following signature:
5418 // vector [...] builtinName(vector [...], vector [...], const int);
5419 // Which takes the same type of vectors (any legal vector type) for the first
5420 // two arguments and takes compile time constant for the third argument.
5421 // Example builtins are :
5422 // vector double vec_xxpermdi(vector double, vector double, int);
5423 // vector short vec_xxsldwi(vector short, vector short, int);
5424 bool Sema::SemaBuiltinVSX(CallExpr *TheCall) {
5425   unsigned ExpectedNumArgs = 3;
5426   if (TheCall->getNumArgs() < ExpectedNumArgs)
5427     return Diag(TheCall->getLocEnd(),
5428                 diag::err_typecheck_call_too_few_args_at_least)
5429            << 0 /*function call*/ <<  ExpectedNumArgs << TheCall->getNumArgs()
5430            << TheCall->getSourceRange();
5431
5432   if (TheCall->getNumArgs() > ExpectedNumArgs)
5433     return Diag(TheCall->getLocEnd(),
5434                 diag::err_typecheck_call_too_many_args_at_most)
5435            << 0 /*function call*/ << ExpectedNumArgs << TheCall->getNumArgs()
5436            << TheCall->getSourceRange();
5437
5438   // Check the third argument is a compile time constant
5439   llvm::APSInt Value;
5440   if(!TheCall->getArg(2)->isIntegerConstantExpr(Value, Context))
5441     return Diag(TheCall->getLocStart(),
5442                 diag::err_vsx_builtin_nonconstant_argument)
5443            << 3 /* argument index */ << TheCall->getDirectCallee()
5444            << SourceRange(TheCall->getArg(2)->getLocStart(),
5445                           TheCall->getArg(2)->getLocEnd());
5446
5447   QualType Arg1Ty = TheCall->getArg(0)->getType();
5448   QualType Arg2Ty = TheCall->getArg(1)->getType();
5449
5450   // Check the type of argument 1 and argument 2 are vectors.
5451   SourceLocation BuiltinLoc = TheCall->getLocStart();
5452   if ((!Arg1Ty->isVectorType() && !Arg1Ty->isDependentType()) ||
5453       (!Arg2Ty->isVectorType() && !Arg2Ty->isDependentType())) {
5454     return Diag(BuiltinLoc, diag::err_vec_builtin_non_vector)
5455            << TheCall->getDirectCallee()
5456            << SourceRange(TheCall->getArg(0)->getLocStart(),
5457                           TheCall->getArg(1)->getLocEnd());
5458   }
5459
5460   // Check the first two arguments are the same type.
5461   if (!Context.hasSameUnqualifiedType(Arg1Ty, Arg2Ty)) {
5462     return Diag(BuiltinLoc, diag::err_vec_builtin_incompatible_vector)
5463            << TheCall->getDirectCallee()
5464            << SourceRange(TheCall->getArg(0)->getLocStart(),
5465                           TheCall->getArg(1)->getLocEnd());
5466   }
5467
5468   // When default clang type checking is turned off and the customized type
5469   // checking is used, the returning type of the function must be explicitly
5470   // set. Otherwise it is _Bool by default.
5471   TheCall->setType(Arg1Ty);
5472
5473   return false;
5474 }
5475
5476 /// SemaBuiltinShuffleVector - Handle __builtin_shufflevector.
5477 // This is declared to take (...), so we have to check everything.
5478 ExprResult Sema::SemaBuiltinShuffleVector(CallExpr *TheCall) {
5479   if (TheCall->getNumArgs() < 2)
5480     return ExprError(Diag(TheCall->getLocEnd(),
5481                           diag::err_typecheck_call_too_few_args_at_least)
5482                      << 0 /*function call*/ << 2 << TheCall->getNumArgs()
5483                      << TheCall->getSourceRange());
5484
5485   // Determine which of the following types of shufflevector we're checking:
5486   // 1) unary, vector mask: (lhs, mask)
5487   // 2) binary, scalar mask: (lhs, rhs, index, ..., index)
5488   QualType resType = TheCall->getArg(0)->getType();
5489   unsigned numElements = 0;
5490
5491   if (!TheCall->getArg(0)->isTypeDependent() &&
5492       !TheCall->getArg(1)->isTypeDependent()) {
5493     QualType LHSType = TheCall->getArg(0)->getType();
5494     QualType RHSType = TheCall->getArg(1)->getType();
5495
5496     if (!LHSType->isVectorType() || !RHSType->isVectorType())
5497       return ExprError(Diag(TheCall->getLocStart(),
5498                             diag::err_vec_builtin_non_vector)
5499                        << TheCall->getDirectCallee()
5500                        << SourceRange(TheCall->getArg(0)->getLocStart(),
5501                                       TheCall->getArg(1)->getLocEnd()));
5502
5503     numElements = LHSType->getAs<VectorType>()->getNumElements();
5504     unsigned numResElements = TheCall->getNumArgs() - 2;
5505
5506     // Check to see if we have a call with 2 vector arguments, the unary shuffle
5507     // with mask.  If so, verify that RHS is an integer vector type with the
5508     // same number of elts as lhs.
5509     if (TheCall->getNumArgs() == 2) {
5510       if (!RHSType->hasIntegerRepresentation() ||
5511           RHSType->getAs<VectorType>()->getNumElements() != numElements)
5512         return ExprError(Diag(TheCall->getLocStart(),
5513                               diag::err_vec_builtin_incompatible_vector)
5514                          << TheCall->getDirectCallee()
5515                          << SourceRange(TheCall->getArg(1)->getLocStart(),
5516                                         TheCall->getArg(1)->getLocEnd()));
5517     } else if (!Context.hasSameUnqualifiedType(LHSType, RHSType)) {
5518       return ExprError(Diag(TheCall->getLocStart(),
5519                             diag::err_vec_builtin_incompatible_vector)
5520                        << TheCall->getDirectCallee()
5521                        << SourceRange(TheCall->getArg(0)->getLocStart(),
5522                                       TheCall->getArg(1)->getLocEnd()));
5523     } else if (numElements != numResElements) {
5524       QualType eltType = LHSType->getAs<VectorType>()->getElementType();
5525       resType = Context.getVectorType(eltType, numResElements,
5526                                       VectorType::GenericVector);
5527     }
5528   }
5529
5530   for (unsigned i = 2; i < TheCall->getNumArgs(); i++) {
5531     if (TheCall->getArg(i)->isTypeDependent() ||
5532         TheCall->getArg(i)->isValueDependent())
5533       continue;
5534
5535     llvm::APSInt Result(32);
5536     if (!TheCall->getArg(i)->isIntegerConstantExpr(Result, Context))
5537       return ExprError(Diag(TheCall->getLocStart(),
5538                             diag::err_shufflevector_nonconstant_argument)
5539                        << TheCall->getArg(i)->getSourceRange());
5540
5541     // Allow -1 which will be translated to undef in the IR.
5542     if (Result.isSigned() && Result.isAllOnesValue())
5543       continue;
5544
5545     if (Result.getActiveBits() > 64 || Result.getZExtValue() >= numElements*2)
5546       return ExprError(Diag(TheCall->getLocStart(),
5547                             diag::err_shufflevector_argument_too_large)
5548                        << TheCall->getArg(i)->getSourceRange());
5549   }
5550
5551   SmallVector<Expr*, 32> exprs;
5552
5553   for (unsigned i = 0, e = TheCall->getNumArgs(); i != e; i++) {
5554     exprs.push_back(TheCall->getArg(i));
5555     TheCall->setArg(i, nullptr);
5556   }
5557
5558   return new (Context) ShuffleVectorExpr(Context, exprs, resType,
5559                                          TheCall->getCallee()->getLocStart(),
5560                                          TheCall->getRParenLoc());
5561 }
5562
5563 /// SemaConvertVectorExpr - Handle __builtin_convertvector
5564 ExprResult Sema::SemaConvertVectorExpr(Expr *E, TypeSourceInfo *TInfo,
5565                                        SourceLocation BuiltinLoc,
5566                                        SourceLocation RParenLoc) {
5567   ExprValueKind VK = VK_RValue;
5568   ExprObjectKind OK = OK_Ordinary;
5569   QualType DstTy = TInfo->getType();
5570   QualType SrcTy = E->getType();
5571
5572   if (!SrcTy->isVectorType() && !SrcTy->isDependentType())
5573     return ExprError(Diag(BuiltinLoc,
5574                           diag::err_convertvector_non_vector)
5575                      << E->getSourceRange());
5576   if (!DstTy->isVectorType() && !DstTy->isDependentType())
5577     return ExprError(Diag(BuiltinLoc,
5578                           diag::err_convertvector_non_vector_type));
5579
5580   if (!SrcTy->isDependentType() && !DstTy->isDependentType()) {
5581     unsigned SrcElts = SrcTy->getAs<VectorType>()->getNumElements();
5582     unsigned DstElts = DstTy->getAs<VectorType>()->getNumElements();
5583     if (SrcElts != DstElts)
5584       return ExprError(Diag(BuiltinLoc,
5585                             diag::err_convertvector_incompatible_vector)
5586                        << E->getSourceRange());
5587   }
5588
5589   return new (Context)
5590       ConvertVectorExpr(E, TInfo, DstTy, VK, OK, BuiltinLoc, RParenLoc);
5591 }
5592
5593 /// SemaBuiltinPrefetch - Handle __builtin_prefetch.
5594 // This is declared to take (const void*, ...) and can take two
5595 // optional constant int args.
5596 bool Sema::SemaBuiltinPrefetch(CallExpr *TheCall) {
5597   unsigned NumArgs = TheCall->getNumArgs();
5598
5599   if (NumArgs > 3)
5600     return Diag(TheCall->getLocEnd(),
5601              diag::err_typecheck_call_too_many_args_at_most)
5602              << 0 /*function call*/ << 3 << NumArgs
5603              << TheCall->getSourceRange();
5604
5605   // Argument 0 is checked for us and the remaining arguments must be
5606   // constant integers.
5607   for (unsigned i = 1; i != NumArgs; ++i)
5608     if (SemaBuiltinConstantArgRange(TheCall, i, 0, i == 1 ? 1 : 3))
5609       return true;
5610
5611   return false;
5612 }
5613
5614 /// SemaBuiltinAssume - Handle __assume (MS Extension).
5615 // __assume does not evaluate its arguments, and should warn if its argument
5616 // has side effects.
5617 bool Sema::SemaBuiltinAssume(CallExpr *TheCall) {
5618   Expr *Arg = TheCall->getArg(0);
5619   if (Arg->isInstantiationDependent()) return false;
5620
5621   if (Arg->HasSideEffects(Context))
5622     Diag(Arg->getLocStart(), diag::warn_assume_side_effects)
5623       << Arg->getSourceRange()
5624       << cast<FunctionDecl>(TheCall->getCalleeDecl())->getIdentifier();
5625
5626   return false;
5627 }
5628
5629 /// Handle __builtin_alloca_with_align. This is declared
5630 /// as (size_t, size_t) where the second size_t must be a power of 2 greater
5631 /// than 8.
5632 bool Sema::SemaBuiltinAllocaWithAlign(CallExpr *TheCall) {
5633   // The alignment must be a constant integer.
5634   Expr *Arg = TheCall->getArg(1);
5635
5636   // We can't check the value of a dependent argument.
5637   if (!Arg->isTypeDependent() && !Arg->isValueDependent()) {
5638     if (const auto *UE =
5639             dyn_cast<UnaryExprOrTypeTraitExpr>(Arg->IgnoreParenImpCasts()))
5640       if (UE->getKind() == UETT_AlignOf)
5641         Diag(TheCall->getLocStart(), diag::warn_alloca_align_alignof)
5642           << Arg->getSourceRange();
5643
5644     llvm::APSInt Result = Arg->EvaluateKnownConstInt(Context);
5645
5646     if (!Result.isPowerOf2())
5647       return Diag(TheCall->getLocStart(),
5648                   diag::err_alignment_not_power_of_two)
5649            << Arg->getSourceRange();
5650
5651     if (Result < Context.getCharWidth())
5652       return Diag(TheCall->getLocStart(), diag::err_alignment_too_small)
5653            << (unsigned)Context.getCharWidth()
5654            << Arg->getSourceRange();
5655
5656     if (Result > std::numeric_limits<int32_t>::max())
5657       return Diag(TheCall->getLocStart(), diag::err_alignment_too_big)
5658            << std::numeric_limits<int32_t>::max()
5659            << Arg->getSourceRange();
5660   }
5661
5662   return false;
5663 }
5664
5665 /// Handle __builtin_assume_aligned. This is declared
5666 /// as (const void*, size_t, ...) and can take one optional constant int arg.
5667 bool Sema::SemaBuiltinAssumeAligned(CallExpr *TheCall) {
5668   unsigned NumArgs = TheCall->getNumArgs();
5669
5670   if (NumArgs > 3)
5671     return Diag(TheCall->getLocEnd(),
5672              diag::err_typecheck_call_too_many_args_at_most)
5673              << 0 /*function call*/ << 3 << NumArgs
5674              << TheCall->getSourceRange();
5675
5676   // The alignment must be a constant integer.
5677   Expr *Arg = TheCall->getArg(1);
5678
5679   // We can't check the value of a dependent argument.
5680   if (!Arg->isTypeDependent() && !Arg->isValueDependent()) {
5681     llvm::APSInt Result;
5682     if (SemaBuiltinConstantArg(TheCall, 1, Result))
5683       return true;
5684
5685     if (!Result.isPowerOf2())
5686       return Diag(TheCall->getLocStart(),
5687                   diag::err_alignment_not_power_of_two)
5688            << Arg->getSourceRange();
5689   }
5690
5691   if (NumArgs > 2) {
5692     ExprResult Arg(TheCall->getArg(2));
5693     InitializedEntity Entity = InitializedEntity::InitializeParameter(Context,
5694       Context.getSizeType(), false);
5695     Arg = PerformCopyInitialization(Entity, SourceLocation(), Arg);
5696     if (Arg.isInvalid()) return true;
5697     TheCall->setArg(2, Arg.get());
5698   }
5699
5700   return false;
5701 }
5702
5703 bool Sema::SemaBuiltinOSLogFormat(CallExpr *TheCall) {
5704   unsigned BuiltinID =
5705       cast<FunctionDecl>(TheCall->getCalleeDecl())->getBuiltinID();
5706   bool IsSizeCall = BuiltinID == Builtin::BI__builtin_os_log_format_buffer_size;
5707
5708   unsigned NumArgs = TheCall->getNumArgs();
5709   unsigned NumRequiredArgs = IsSizeCall ? 1 : 2;
5710   if (NumArgs < NumRequiredArgs) {
5711     return Diag(TheCall->getLocEnd(), diag::err_typecheck_call_too_few_args)
5712            << 0 /* function call */ << NumRequiredArgs << NumArgs
5713            << TheCall->getSourceRange();
5714   }
5715   if (NumArgs >= NumRequiredArgs + 0x100) {
5716     return Diag(TheCall->getLocEnd(),
5717                 diag::err_typecheck_call_too_many_args_at_most)
5718            << 0 /* function call */ << (NumRequiredArgs + 0xff) << NumArgs
5719            << TheCall->getSourceRange();
5720   }
5721   unsigned i = 0;
5722
5723   // For formatting call, check buffer arg.
5724   if (!IsSizeCall) {
5725     ExprResult Arg(TheCall->getArg(i));
5726     InitializedEntity Entity = InitializedEntity::InitializeParameter(
5727         Context, Context.VoidPtrTy, false);
5728     Arg = PerformCopyInitialization(Entity, SourceLocation(), Arg);
5729     if (Arg.isInvalid())
5730       return true;
5731     TheCall->setArg(i, Arg.get());
5732     i++;
5733   }
5734
5735   // Check string literal arg.
5736   unsigned FormatIdx = i;
5737   {
5738     ExprResult Arg = CheckOSLogFormatStringArg(TheCall->getArg(i));
5739     if (Arg.isInvalid())
5740       return true;
5741     TheCall->setArg(i, Arg.get());
5742     i++;
5743   }
5744
5745   // Make sure variadic args are scalar.
5746   unsigned FirstDataArg = i;
5747   while (i < NumArgs) {
5748     ExprResult Arg = DefaultVariadicArgumentPromotion(
5749         TheCall->getArg(i), VariadicFunction, nullptr);
5750     if (Arg.isInvalid())
5751       return true;
5752     CharUnits ArgSize = Context.getTypeSizeInChars(Arg.get()->getType());
5753     if (ArgSize.getQuantity() >= 0x100) {
5754       return Diag(Arg.get()->getLocEnd(), diag::err_os_log_argument_too_big)
5755              << i << (int)ArgSize.getQuantity() << 0xff
5756              << TheCall->getSourceRange();
5757     }
5758     TheCall->setArg(i, Arg.get());
5759     i++;
5760   }
5761
5762   // Check formatting specifiers. NOTE: We're only doing this for the non-size
5763   // call to avoid duplicate diagnostics.
5764   if (!IsSizeCall) {
5765     llvm::SmallBitVector CheckedVarArgs(NumArgs, false);
5766     ArrayRef<const Expr *> Args(TheCall->getArgs(), TheCall->getNumArgs());
5767     bool Success = CheckFormatArguments(
5768         Args, /*HasVAListArg*/ false, FormatIdx, FirstDataArg, FST_OSLog,
5769         VariadicFunction, TheCall->getLocStart(), SourceRange(),
5770         CheckedVarArgs);
5771     if (!Success)
5772       return true;
5773   }
5774
5775   if (IsSizeCall) {
5776     TheCall->setType(Context.getSizeType());
5777   } else {
5778     TheCall->setType(Context.VoidPtrTy);
5779   }
5780   return false;
5781 }
5782
5783 /// SemaBuiltinConstantArg - Handle a check if argument ArgNum of CallExpr
5784 /// TheCall is a constant expression.
5785 bool Sema::SemaBuiltinConstantArg(CallExpr *TheCall, int ArgNum,
5786                                   llvm::APSInt &Result) {
5787   Expr *Arg = TheCall->getArg(ArgNum);
5788   DeclRefExpr *DRE =cast<DeclRefExpr>(TheCall->getCallee()->IgnoreParenCasts());
5789   FunctionDecl *FDecl = cast<FunctionDecl>(DRE->getDecl());
5790
5791   if (Arg->isTypeDependent() || Arg->isValueDependent()) return false;
5792
5793   if (!Arg->isIntegerConstantExpr(Result, Context))
5794     return Diag(TheCall->getLocStart(), diag::err_constant_integer_arg_type)
5795                 << FDecl->getDeclName() <<  Arg->getSourceRange();
5796
5797   return false;
5798 }
5799
5800 /// SemaBuiltinConstantArgRange - Handle a check if argument ArgNum of CallExpr
5801 /// TheCall is a constant expression in the range [Low, High].
5802 bool Sema::SemaBuiltinConstantArgRange(CallExpr *TheCall, int ArgNum,
5803                                        int Low, int High, bool RangeIsError) {
5804   llvm::APSInt Result;
5805
5806   // We can't check the value of a dependent argument.
5807   Expr *Arg = TheCall->getArg(ArgNum);
5808   if (Arg->isTypeDependent() || Arg->isValueDependent())
5809     return false;
5810
5811   // Check constant-ness first.
5812   if (SemaBuiltinConstantArg(TheCall, ArgNum, Result))
5813     return true;
5814
5815   if (Result.getSExtValue() < Low || Result.getSExtValue() > High) {
5816     if (RangeIsError)
5817       return Diag(TheCall->getLocStart(), diag::err_argument_invalid_range)
5818              << Result.toString(10) << Low << High << Arg->getSourceRange();
5819     else
5820       // Defer the warning until we know if the code will be emitted so that
5821       // dead code can ignore this.
5822       DiagRuntimeBehavior(TheCall->getLocStart(), TheCall,
5823                             PDiag(diag::warn_argument_invalid_range)
5824                                 << Result.toString(10) << Low << High
5825                                 << Arg->getSourceRange());
5826   }
5827
5828   return false;
5829 }
5830
5831 /// SemaBuiltinConstantArgMultiple - Handle a check if argument ArgNum of CallExpr
5832 /// TheCall is a constant expression is a multiple of Num..
5833 bool Sema::SemaBuiltinConstantArgMultiple(CallExpr *TheCall, int ArgNum,
5834                                           unsigned Num) {
5835   llvm::APSInt Result;
5836
5837   // We can't check the value of a dependent argument.
5838   Expr *Arg = TheCall->getArg(ArgNum);
5839   if (Arg->isTypeDependent() || Arg->isValueDependent())
5840     return false;
5841
5842   // Check constant-ness first.
5843   if (SemaBuiltinConstantArg(TheCall, ArgNum, Result))
5844     return true;
5845
5846   if (Result.getSExtValue() % Num != 0)
5847     return Diag(TheCall->getLocStart(), diag::err_argument_not_multiple)
5848       << Num << Arg->getSourceRange();
5849
5850   return false;
5851 }
5852
5853 /// SemaBuiltinARMSpecialReg - Handle a check if argument ArgNum of CallExpr
5854 /// TheCall is an ARM/AArch64 special register string literal.
5855 bool Sema::SemaBuiltinARMSpecialReg(unsigned BuiltinID, CallExpr *TheCall,
5856                                     int ArgNum, unsigned ExpectedFieldNum,
5857                                     bool AllowName) {
5858   bool IsARMBuiltin = BuiltinID == ARM::BI__builtin_arm_rsr64 ||
5859                       BuiltinID == ARM::BI__builtin_arm_wsr64 ||
5860                       BuiltinID == ARM::BI__builtin_arm_rsr ||
5861                       BuiltinID == ARM::BI__builtin_arm_rsrp ||
5862                       BuiltinID == ARM::BI__builtin_arm_wsr ||
5863                       BuiltinID == ARM::BI__builtin_arm_wsrp;
5864   bool IsAArch64Builtin = BuiltinID == AArch64::BI__builtin_arm_rsr64 ||
5865                           BuiltinID == AArch64::BI__builtin_arm_wsr64 ||
5866                           BuiltinID == AArch64::BI__builtin_arm_rsr ||
5867                           BuiltinID == AArch64::BI__builtin_arm_rsrp ||
5868                           BuiltinID == AArch64::BI__builtin_arm_wsr ||
5869                           BuiltinID == AArch64::BI__builtin_arm_wsrp;
5870   assert((IsARMBuiltin || IsAArch64Builtin) && "Unexpected ARM builtin.");
5871
5872   // We can't check the value of a dependent argument.
5873   Expr *Arg = TheCall->getArg(ArgNum);
5874   if (Arg->isTypeDependent() || Arg->isValueDependent())
5875     return false;
5876
5877   // Check if the argument is a string literal.
5878   if (!isa<StringLiteral>(Arg->IgnoreParenImpCasts()))
5879     return Diag(TheCall->getLocStart(), diag::err_expr_not_string_literal)
5880            << Arg->getSourceRange();
5881
5882   // Check the type of special register given.
5883   StringRef Reg = cast<StringLiteral>(Arg->IgnoreParenImpCasts())->getString();
5884   SmallVector<StringRef, 6> Fields;
5885   Reg.split(Fields, ":");
5886
5887   if (Fields.size() != ExpectedFieldNum && !(AllowName && Fields.size() == 1))
5888     return Diag(TheCall->getLocStart(), diag::err_arm_invalid_specialreg)
5889            << Arg->getSourceRange();
5890
5891   // If the string is the name of a register then we cannot check that it is
5892   // valid here but if the string is of one the forms described in ACLE then we
5893   // can check that the supplied fields are integers and within the valid
5894   // ranges.
5895   if (Fields.size() > 1) {
5896     bool FiveFields = Fields.size() == 5;
5897
5898     bool ValidString = true;
5899     if (IsARMBuiltin) {
5900       ValidString &= Fields[0].startswith_lower("cp") ||
5901                      Fields[0].startswith_lower("p");
5902       if (ValidString)
5903         Fields[0] =
5904           Fields[0].drop_front(Fields[0].startswith_lower("cp") ? 2 : 1);
5905
5906       ValidString &= Fields[2].startswith_lower("c");
5907       if (ValidString)
5908         Fields[2] = Fields[2].drop_front(1);
5909
5910       if (FiveFields) {
5911         ValidString &= Fields[3].startswith_lower("c");
5912         if (ValidString)
5913           Fields[3] = Fields[3].drop_front(1);
5914       }
5915     }
5916
5917     SmallVector<int, 5> Ranges;
5918     if (FiveFields)
5919       Ranges.append({IsAArch64Builtin ? 1 : 15, 7, 15, 15, 7});
5920     else
5921       Ranges.append({15, 7, 15});
5922
5923     for (unsigned i=0; i<Fields.size(); ++i) {
5924       int IntField;
5925       ValidString &= !Fields[i].getAsInteger(10, IntField);
5926       ValidString &= (IntField >= 0 && IntField <= Ranges[i]);
5927     }
5928
5929     if (!ValidString)
5930       return Diag(TheCall->getLocStart(), diag::err_arm_invalid_specialreg)
5931              << Arg->getSourceRange();
5932   } else if (IsAArch64Builtin && Fields.size() == 1) {
5933     // If the register name is one of those that appear in the condition below
5934     // and the special register builtin being used is one of the write builtins,
5935     // then we require that the argument provided for writing to the register
5936     // is an integer constant expression. This is because it will be lowered to
5937     // an MSR (immediate) instruction, so we need to know the immediate at
5938     // compile time.
5939     if (TheCall->getNumArgs() != 2)
5940       return false;
5941
5942     std::string RegLower = Reg.lower();
5943     if (RegLower != "spsel" && RegLower != "daifset" && RegLower != "daifclr" &&
5944         RegLower != "pan" && RegLower != "uao")
5945       return false;
5946
5947     return SemaBuiltinConstantArgRange(TheCall, 1, 0, 15);
5948   }
5949
5950   return false;
5951 }
5952
5953 /// SemaBuiltinLongjmp - Handle __builtin_longjmp(void *env[5], int val).
5954 /// This checks that the target supports __builtin_longjmp and
5955 /// that val is a constant 1.
5956 bool Sema::SemaBuiltinLongjmp(CallExpr *TheCall) {
5957   if (!Context.getTargetInfo().hasSjLjLowering())
5958     return Diag(TheCall->getLocStart(), diag::err_builtin_longjmp_unsupported)
5959              << SourceRange(TheCall->getLocStart(), TheCall->getLocEnd());
5960
5961   Expr *Arg = TheCall->getArg(1);
5962   llvm::APSInt Result;
5963
5964   // TODO: This is less than ideal. Overload this to take a value.
5965   if (SemaBuiltinConstantArg(TheCall, 1, Result))
5966     return true;
5967
5968   if (Result != 1)
5969     return Diag(TheCall->getLocStart(), diag::err_builtin_longjmp_invalid_val)
5970              << SourceRange(Arg->getLocStart(), Arg->getLocEnd());
5971
5972   return false;
5973 }
5974
5975 /// SemaBuiltinSetjmp - Handle __builtin_setjmp(void *env[5]).
5976 /// This checks that the target supports __builtin_setjmp.
5977 bool Sema::SemaBuiltinSetjmp(CallExpr *TheCall) {
5978   if (!Context.getTargetInfo().hasSjLjLowering())
5979     return Diag(TheCall->getLocStart(), diag::err_builtin_setjmp_unsupported)
5980              << SourceRange(TheCall->getLocStart(), TheCall->getLocEnd());
5981   return false;
5982 }
5983
5984 namespace {
5985
5986 class UncoveredArgHandler {
5987   enum { Unknown = -1, AllCovered = -2 };
5988
5989   signed FirstUncoveredArg = Unknown;
5990   SmallVector<const Expr *, 4> DiagnosticExprs;
5991
5992 public:
5993   UncoveredArgHandler() = default;
5994
5995   bool hasUncoveredArg() const {
5996     return (FirstUncoveredArg >= 0);
5997   }
5998
5999   unsigned getUncoveredArg() const {
6000     assert(hasUncoveredArg() && "no uncovered argument");
6001     return FirstUncoveredArg;
6002   }
6003
6004   void setAllCovered() {
6005     // A string has been found with all arguments covered, so clear out
6006     // the diagnostics.
6007     DiagnosticExprs.clear();
6008     FirstUncoveredArg = AllCovered;
6009   }
6010
6011   void Update(signed NewFirstUncoveredArg, const Expr *StrExpr) {
6012     assert(NewFirstUncoveredArg >= 0 && "Outside range");
6013
6014     // Don't update if a previous string covers all arguments.
6015     if (FirstUncoveredArg == AllCovered)
6016       return;
6017
6018     // UncoveredArgHandler tracks the highest uncovered argument index
6019     // and with it all the strings that match this index.
6020     if (NewFirstUncoveredArg == FirstUncoveredArg)
6021       DiagnosticExprs.push_back(StrExpr);
6022     else if (NewFirstUncoveredArg > FirstUncoveredArg) {
6023       DiagnosticExprs.clear();
6024       DiagnosticExprs.push_back(StrExpr);
6025       FirstUncoveredArg = NewFirstUncoveredArg;
6026     }
6027   }
6028
6029   void Diagnose(Sema &S, bool IsFunctionCall, const Expr *ArgExpr);
6030 };
6031
6032 enum StringLiteralCheckType {
6033   SLCT_NotALiteral,
6034   SLCT_UncheckedLiteral,
6035   SLCT_CheckedLiteral
6036 };
6037
6038 } // namespace
6039
6040 static void sumOffsets(llvm::APSInt &Offset, llvm::APSInt Addend,
6041                                      BinaryOperatorKind BinOpKind,
6042                                      bool AddendIsRight) {
6043   unsigned BitWidth = Offset.getBitWidth();
6044   unsigned AddendBitWidth = Addend.getBitWidth();
6045   // There might be negative interim results.
6046   if (Addend.isUnsigned()) {
6047     Addend = Addend.zext(++AddendBitWidth);
6048     Addend.setIsSigned(true);
6049   }
6050   // Adjust the bit width of the APSInts.
6051   if (AddendBitWidth > BitWidth) {
6052     Offset = Offset.sext(AddendBitWidth);
6053     BitWidth = AddendBitWidth;
6054   } else if (BitWidth > AddendBitWidth) {
6055     Addend = Addend.sext(BitWidth);
6056   }
6057
6058   bool Ov = false;
6059   llvm::APSInt ResOffset = Offset;
6060   if (BinOpKind == BO_Add)
6061     ResOffset = Offset.sadd_ov(Addend, Ov);
6062   else {
6063     assert(AddendIsRight && BinOpKind == BO_Sub &&
6064            "operator must be add or sub with addend on the right");
6065     ResOffset = Offset.ssub_ov(Addend, Ov);
6066   }
6067
6068   // We add an offset to a pointer here so we should support an offset as big as
6069   // possible.
6070   if (Ov) {
6071     assert(BitWidth <= std::numeric_limits<unsigned>::max() / 2 &&
6072            "index (intermediate) result too big");
6073     Offset = Offset.sext(2 * BitWidth);
6074     sumOffsets(Offset, Addend, BinOpKind, AddendIsRight);
6075     return;
6076   }
6077
6078   Offset = ResOffset;
6079 }
6080
6081 namespace {
6082
6083 // This is a wrapper class around StringLiteral to support offsetted string
6084 // literals as format strings. It takes the offset into account when returning
6085 // the string and its length or the source locations to display notes correctly.
6086 class FormatStringLiteral {
6087   const StringLiteral *FExpr;
6088   int64_t Offset;
6089
6090  public:
6091   FormatStringLiteral(const StringLiteral *fexpr, int64_t Offset = 0)
6092       : FExpr(fexpr), Offset(Offset) {}
6093
6094   StringRef getString() const {
6095     return FExpr->getString().drop_front(Offset);
6096   }
6097
6098   unsigned getByteLength() const {
6099     return FExpr->getByteLength() - getCharByteWidth() * Offset;
6100   }
6101
6102   unsigned getLength() const { return FExpr->getLength() - Offset; }
6103   unsigned getCharByteWidth() const { return FExpr->getCharByteWidth(); }
6104
6105   StringLiteral::StringKind getKind() const { return FExpr->getKind(); }
6106
6107   QualType getType() const { return FExpr->getType(); }
6108
6109   bool isAscii() const { return FExpr->isAscii(); }
6110   bool isWide() const { return FExpr->isWide(); }
6111   bool isUTF8() const { return FExpr->isUTF8(); }
6112   bool isUTF16() const { return FExpr->isUTF16(); }
6113   bool isUTF32() const { return FExpr->isUTF32(); }
6114   bool isPascal() const { return FExpr->isPascal(); }
6115
6116   SourceLocation getLocationOfByte(
6117       unsigned ByteNo, const SourceManager &SM, const LangOptions &Features,
6118       const TargetInfo &Target, unsigned *StartToken = nullptr,
6119       unsigned *StartTokenByteOffset = nullptr) const {
6120     return FExpr->getLocationOfByte(ByteNo + Offset, SM, Features, Target,
6121                                     StartToken, StartTokenByteOffset);
6122   }
6123
6124   SourceLocation getLocStart() const LLVM_READONLY { return getBeginLoc(); }
6125   SourceLocation getBeginLoc() const LLVM_READONLY {
6126     return FExpr->getLocStart().getLocWithOffset(Offset);
6127   }
6128
6129   SourceLocation getLocEnd() const LLVM_READONLY { return getEndLoc(); }
6130   SourceLocation getEndLoc() const LLVM_READONLY { return FExpr->getLocEnd(); }
6131 };
6132
6133 }  // namespace
6134
6135 static void CheckFormatString(Sema &S, const FormatStringLiteral *FExpr,
6136                               const Expr *OrigFormatExpr,
6137                               ArrayRef<const Expr *> Args,
6138                               bool HasVAListArg, unsigned format_idx,
6139                               unsigned firstDataArg,
6140                               Sema::FormatStringType Type,
6141                               bool inFunctionCall,
6142                               Sema::VariadicCallType CallType,
6143                               llvm::SmallBitVector &CheckedVarArgs,
6144                               UncoveredArgHandler &UncoveredArg);
6145
6146 // Determine if an expression is a string literal or constant string.
6147 // If this function returns false on the arguments to a function expecting a
6148 // format string, we will usually need to emit a warning.
6149 // True string literals are then checked by CheckFormatString.
6150 static StringLiteralCheckType
6151 checkFormatStringExpr(Sema &S, const Expr *E, ArrayRef<const Expr *> Args,
6152                       bool HasVAListArg, unsigned format_idx,
6153                       unsigned firstDataArg, Sema::FormatStringType Type,
6154                       Sema::VariadicCallType CallType, bool InFunctionCall,
6155                       llvm::SmallBitVector &CheckedVarArgs,
6156                       UncoveredArgHandler &UncoveredArg,
6157                       llvm::APSInt Offset) {
6158  tryAgain:
6159   assert(Offset.isSigned() && "invalid offset");
6160
6161   if (E->isTypeDependent() || E->isValueDependent())
6162     return SLCT_NotALiteral;
6163
6164   E = E->IgnoreParenCasts();
6165
6166   if (E->isNullPointerConstant(S.Context, Expr::NPC_ValueDependentIsNotNull))
6167     // Technically -Wformat-nonliteral does not warn about this case.
6168     // The behavior of printf and friends in this case is implementation
6169     // dependent.  Ideally if the format string cannot be null then
6170     // it should have a 'nonnull' attribute in the function prototype.
6171     return SLCT_UncheckedLiteral;
6172
6173   switch (E->getStmtClass()) {
6174   case Stmt::BinaryConditionalOperatorClass:
6175   case Stmt::ConditionalOperatorClass: {
6176     // The expression is a literal if both sub-expressions were, and it was
6177     // completely checked only if both sub-expressions were checked.
6178     const AbstractConditionalOperator *C =
6179         cast<AbstractConditionalOperator>(E);
6180
6181     // Determine whether it is necessary to check both sub-expressions, for
6182     // example, because the condition expression is a constant that can be
6183     // evaluated at compile time.
6184     bool CheckLeft = true, CheckRight = true;
6185
6186     bool Cond;
6187     if (C->getCond()->EvaluateAsBooleanCondition(Cond, S.getASTContext())) {
6188       if (Cond)
6189         CheckRight = false;
6190       else
6191         CheckLeft = false;
6192     }
6193
6194     // We need to maintain the offsets for the right and the left hand side
6195     // separately to check if every possible indexed expression is a valid
6196     // string literal. They might have different offsets for different string
6197     // literals in the end.
6198     StringLiteralCheckType Left;
6199     if (!CheckLeft)
6200       Left = SLCT_UncheckedLiteral;
6201     else {
6202       Left = checkFormatStringExpr(S, C->getTrueExpr(), Args,
6203                                    HasVAListArg, format_idx, firstDataArg,
6204                                    Type, CallType, InFunctionCall,
6205                                    CheckedVarArgs, UncoveredArg, Offset);
6206       if (Left == SLCT_NotALiteral || !CheckRight) {
6207         return Left;
6208       }
6209     }
6210
6211     StringLiteralCheckType Right =
6212         checkFormatStringExpr(S, C->getFalseExpr(), Args,
6213                               HasVAListArg, format_idx, firstDataArg,
6214                               Type, CallType, InFunctionCall, CheckedVarArgs,
6215                               UncoveredArg, Offset);
6216
6217     return (CheckLeft && Left < Right) ? Left : Right;
6218   }
6219
6220   case Stmt::ImplicitCastExprClass:
6221     E = cast<ImplicitCastExpr>(E)->getSubExpr();
6222     goto tryAgain;
6223
6224   case Stmt::OpaqueValueExprClass:
6225     if (const Expr *src = cast<OpaqueValueExpr>(E)->getSourceExpr()) {
6226       E = src;
6227       goto tryAgain;
6228     }
6229     return SLCT_NotALiteral;
6230
6231   case Stmt::PredefinedExprClass:
6232     // While __func__, etc., are technically not string literals, they
6233     // cannot contain format specifiers and thus are not a security
6234     // liability.
6235     return SLCT_UncheckedLiteral;
6236
6237   case Stmt::DeclRefExprClass: {
6238     const DeclRefExpr *DR = cast<DeclRefExpr>(E);
6239
6240     // As an exception, do not flag errors for variables binding to
6241     // const string literals.
6242     if (const VarDecl *VD = dyn_cast<VarDecl>(DR->getDecl())) {
6243       bool isConstant = false;
6244       QualType T = DR->getType();
6245
6246       if (const ArrayType *AT = S.Context.getAsArrayType(T)) {
6247         isConstant = AT->getElementType().isConstant(S.Context);
6248       } else if (const PointerType *PT = T->getAs<PointerType>()) {
6249         isConstant = T.isConstant(S.Context) &&
6250                      PT->getPointeeType().isConstant(S.Context);
6251       } else if (T->isObjCObjectPointerType()) {
6252         // In ObjC, there is usually no "const ObjectPointer" type,
6253         // so don't check if the pointee type is constant.
6254         isConstant = T.isConstant(S.Context);
6255       }
6256
6257       if (isConstant) {
6258         if (const Expr *Init = VD->getAnyInitializer()) {
6259           // Look through initializers like const char c[] = { "foo" }
6260           if (const InitListExpr *InitList = dyn_cast<InitListExpr>(Init)) {
6261             if (InitList->isStringLiteralInit())
6262               Init = InitList->getInit(0)->IgnoreParenImpCasts();
6263           }
6264           return checkFormatStringExpr(S, Init, Args,
6265                                        HasVAListArg, format_idx,
6266                                        firstDataArg, Type, CallType,
6267                                        /*InFunctionCall*/ false, CheckedVarArgs,
6268                                        UncoveredArg, Offset);
6269         }
6270       }
6271
6272       // For vprintf* functions (i.e., HasVAListArg==true), we add a
6273       // special check to see if the format string is a function parameter
6274       // of the function calling the printf function.  If the function
6275       // has an attribute indicating it is a printf-like function, then we
6276       // should suppress warnings concerning non-literals being used in a call
6277       // to a vprintf function.  For example:
6278       //
6279       // void
6280       // logmessage(char const *fmt __attribute__ (format (printf, 1, 2)), ...){
6281       //      va_list ap;
6282       //      va_start(ap, fmt);
6283       //      vprintf(fmt, ap);  // Do NOT emit a warning about "fmt".
6284       //      ...
6285       // }
6286       if (HasVAListArg) {
6287         if (const ParmVarDecl *PV = dyn_cast<ParmVarDecl>(VD)) {
6288           if (const NamedDecl *ND = dyn_cast<NamedDecl>(PV->getDeclContext())) {
6289             int PVIndex = PV->getFunctionScopeIndex() + 1;
6290             for (const auto *PVFormat : ND->specific_attrs<FormatAttr>()) {
6291               // adjust for implicit parameter
6292               if (const CXXMethodDecl *MD = dyn_cast<CXXMethodDecl>(ND))
6293                 if (MD->isInstance())
6294                   ++PVIndex;
6295               // We also check if the formats are compatible.
6296               // We can't pass a 'scanf' string to a 'printf' function.
6297               if (PVIndex == PVFormat->getFormatIdx() &&
6298                   Type == S.GetFormatStringType(PVFormat))
6299                 return SLCT_UncheckedLiteral;
6300             }
6301           }
6302         }
6303       }
6304     }
6305
6306     return SLCT_NotALiteral;
6307   }
6308
6309   case Stmt::CallExprClass:
6310   case Stmt::CXXMemberCallExprClass: {
6311     const CallExpr *CE = cast<CallExpr>(E);
6312     if (const NamedDecl *ND = dyn_cast_or_null<NamedDecl>(CE->getCalleeDecl())) {
6313       bool IsFirst = true;
6314       StringLiteralCheckType CommonResult;
6315       for (const auto *FA : ND->specific_attrs<FormatArgAttr>()) {
6316         const Expr *Arg = CE->getArg(FA->getFormatIdx().getASTIndex());
6317         StringLiteralCheckType Result = checkFormatStringExpr(
6318             S, Arg, Args, HasVAListArg, format_idx, firstDataArg, Type,
6319             CallType, InFunctionCall, CheckedVarArgs, UncoveredArg, Offset);
6320         if (IsFirst) {
6321           CommonResult = Result;
6322           IsFirst = false;
6323         }
6324       }
6325       if (!IsFirst)
6326         return CommonResult;
6327
6328       if (const auto *FD = dyn_cast<FunctionDecl>(ND)) {
6329         unsigned BuiltinID = FD->getBuiltinID();
6330         if (BuiltinID == Builtin::BI__builtin___CFStringMakeConstantString ||
6331             BuiltinID == Builtin::BI__builtin___NSStringMakeConstantString) {
6332           const Expr *Arg = CE->getArg(0);
6333           return checkFormatStringExpr(S, Arg, Args,
6334                                        HasVAListArg, format_idx,
6335                                        firstDataArg, Type, CallType,
6336                                        InFunctionCall, CheckedVarArgs,
6337                                        UncoveredArg, Offset);
6338         }
6339       }
6340     }
6341
6342     return SLCT_NotALiteral;
6343   }
6344   case Stmt::ObjCMessageExprClass: {
6345     const auto *ME = cast<ObjCMessageExpr>(E);
6346     if (const auto *ND = ME->getMethodDecl()) {
6347       if (const auto *FA = ND->getAttr<FormatArgAttr>()) {
6348         const Expr *Arg = ME->getArg(FA->getFormatIdx().getASTIndex());
6349         return checkFormatStringExpr(
6350             S, Arg, Args, HasVAListArg, format_idx, firstDataArg, Type,
6351             CallType, InFunctionCall, CheckedVarArgs, UncoveredArg, Offset);
6352       }
6353     }
6354
6355     return SLCT_NotALiteral;
6356   }
6357   case Stmt::ObjCStringLiteralClass:
6358   case Stmt::StringLiteralClass: {
6359     const StringLiteral *StrE = nullptr;
6360
6361     if (const ObjCStringLiteral *ObjCFExpr = dyn_cast<ObjCStringLiteral>(E))
6362       StrE = ObjCFExpr->getString();
6363     else
6364       StrE = cast<StringLiteral>(E);
6365
6366     if (StrE) {
6367       if (Offset.isNegative() || Offset > StrE->getLength()) {
6368         // TODO: It would be better to have an explicit warning for out of
6369         // bounds literals.
6370         return SLCT_NotALiteral;
6371       }
6372       FormatStringLiteral FStr(StrE, Offset.sextOrTrunc(64).getSExtValue());
6373       CheckFormatString(S, &FStr, E, Args, HasVAListArg, format_idx,
6374                         firstDataArg, Type, InFunctionCall, CallType,
6375                         CheckedVarArgs, UncoveredArg);
6376       return SLCT_CheckedLiteral;
6377     }
6378
6379     return SLCT_NotALiteral;
6380   }
6381   case Stmt::BinaryOperatorClass: {
6382     llvm::APSInt LResult;
6383     llvm::APSInt RResult;
6384
6385     const BinaryOperator *BinOp = cast<BinaryOperator>(E);
6386
6387     // A string literal + an int offset is still a string literal.
6388     if (BinOp->isAdditiveOp()) {
6389       bool LIsInt = BinOp->getLHS()->EvaluateAsInt(LResult, S.Context);
6390       bool RIsInt = BinOp->getRHS()->EvaluateAsInt(RResult, S.Context);
6391
6392       if (LIsInt != RIsInt) {
6393         BinaryOperatorKind BinOpKind = BinOp->getOpcode();
6394
6395         if (LIsInt) {
6396           if (BinOpKind == BO_Add) {
6397             sumOffsets(Offset, LResult, BinOpKind, RIsInt);
6398             E = BinOp->getRHS();
6399             goto tryAgain;
6400           }
6401         } else {
6402           sumOffsets(Offset, RResult, BinOpKind, RIsInt);
6403           E = BinOp->getLHS();
6404           goto tryAgain;
6405         }
6406       }
6407     }
6408
6409     return SLCT_NotALiteral;
6410   }
6411   case Stmt::UnaryOperatorClass: {
6412     const UnaryOperator *UnaOp = cast<UnaryOperator>(E);
6413     auto ASE = dyn_cast<ArraySubscriptExpr>(UnaOp->getSubExpr());
6414     if (UnaOp->getOpcode() == UO_AddrOf && ASE) {
6415       llvm::APSInt IndexResult;
6416       if (ASE->getRHS()->EvaluateAsInt(IndexResult, S.Context)) {
6417         sumOffsets(Offset, IndexResult, BO_Add, /*RHS is int*/ true);
6418         E = ASE->getBase();
6419         goto tryAgain;
6420       }
6421     }
6422
6423     return SLCT_NotALiteral;
6424   }
6425
6426   default:
6427     return SLCT_NotALiteral;
6428   }
6429 }
6430
6431 Sema::FormatStringType Sema::GetFormatStringType(const FormatAttr *Format) {
6432   return llvm::StringSwitch<FormatStringType>(Format->getType()->getName())
6433       .Case("scanf", FST_Scanf)
6434       .Cases("printf", "printf0", FST_Printf)
6435       .Cases("NSString", "CFString", FST_NSString)
6436       .Case("strftime", FST_Strftime)
6437       .Case("strfmon", FST_Strfmon)
6438       .Cases("kprintf", "cmn_err", "vcmn_err", "zcmn_err", FST_Kprintf)
6439       .Case("freebsd_kprintf", FST_FreeBSDKPrintf)
6440       .Case("os_trace", FST_OSLog)
6441       .Case("os_log", FST_OSLog)
6442       .Default(FST_Unknown);
6443 }
6444
6445 /// CheckFormatArguments - Check calls to printf and scanf (and similar
6446 /// functions) for correct use of format strings.
6447 /// Returns true if a format string has been fully checked.
6448 bool Sema::CheckFormatArguments(const FormatAttr *Format,
6449                                 ArrayRef<const Expr *> Args,
6450                                 bool IsCXXMember,
6451                                 VariadicCallType CallType,
6452                                 SourceLocation Loc, SourceRange Range,
6453                                 llvm::SmallBitVector &CheckedVarArgs) {
6454   FormatStringInfo FSI;
6455   if (getFormatStringInfo(Format, IsCXXMember, &FSI))
6456     return CheckFormatArguments(Args, FSI.HasVAListArg, FSI.FormatIdx,
6457                                 FSI.FirstDataArg, GetFormatStringType(Format),
6458                                 CallType, Loc, Range, CheckedVarArgs);
6459   return false;
6460 }
6461
6462 bool Sema::CheckFormatArguments(ArrayRef<const Expr *> Args,
6463                                 bool HasVAListArg, unsigned format_idx,
6464                                 unsigned firstDataArg, FormatStringType Type,
6465                                 VariadicCallType CallType,
6466                                 SourceLocation Loc, SourceRange Range,
6467                                 llvm::SmallBitVector &CheckedVarArgs) {
6468   // CHECK: printf/scanf-like function is called with no format string.
6469   if (format_idx >= Args.size()) {
6470     Diag(Loc, diag::warn_missing_format_string) << Range;
6471     return false;
6472   }
6473
6474   const Expr *OrigFormatExpr = Args[format_idx]->IgnoreParenCasts();
6475
6476   // CHECK: format string is not a string literal.
6477   //
6478   // Dynamically generated format strings are difficult to
6479   // automatically vet at compile time.  Requiring that format strings
6480   // are string literals: (1) permits the checking of format strings by
6481   // the compiler and thereby (2) can practically remove the source of
6482   // many format string exploits.
6483
6484   // Format string can be either ObjC string (e.g. @"%d") or
6485   // C string (e.g. "%d")
6486   // ObjC string uses the same format specifiers as C string, so we can use
6487   // the same format string checking logic for both ObjC and C strings.
6488   UncoveredArgHandler UncoveredArg;
6489   StringLiteralCheckType CT =
6490       checkFormatStringExpr(*this, OrigFormatExpr, Args, HasVAListArg,
6491                             format_idx, firstDataArg, Type, CallType,
6492                             /*IsFunctionCall*/ true, CheckedVarArgs,
6493                             UncoveredArg,
6494                             /*no string offset*/ llvm::APSInt(64, false) = 0);
6495
6496   // Generate a diagnostic where an uncovered argument is detected.
6497   if (UncoveredArg.hasUncoveredArg()) {
6498     unsigned ArgIdx = UncoveredArg.getUncoveredArg() + firstDataArg;
6499     assert(ArgIdx < Args.size() && "ArgIdx outside bounds");
6500     UncoveredArg.Diagnose(*this, /*IsFunctionCall*/true, Args[ArgIdx]);
6501   }
6502
6503   if (CT != SLCT_NotALiteral)
6504     // Literal format string found, check done!
6505     return CT == SLCT_CheckedLiteral;
6506
6507   // Strftime is particular as it always uses a single 'time' argument,
6508   // so it is safe to pass a non-literal string.
6509   if (Type == FST_Strftime)
6510     return false;
6511
6512   // Do not emit diag when the string param is a macro expansion and the
6513   // format is either NSString or CFString. This is a hack to prevent
6514   // diag when using the NSLocalizedString and CFCopyLocalizedString macros
6515   // which are usually used in place of NS and CF string literals.
6516   SourceLocation FormatLoc = Args[format_idx]->getLocStart();
6517   if (Type == FST_NSString && SourceMgr.isInSystemMacro(FormatLoc))
6518     return false;
6519
6520   // If there are no arguments specified, warn with -Wformat-security, otherwise
6521   // warn only with -Wformat-nonliteral.
6522   if (Args.size() == firstDataArg) {
6523     Diag(FormatLoc, diag::warn_format_nonliteral_noargs)
6524       << OrigFormatExpr->getSourceRange();
6525     switch (Type) {
6526     default:
6527       break;
6528     case FST_Kprintf:
6529     case FST_FreeBSDKPrintf:
6530     case FST_Printf:
6531       Diag(FormatLoc, diag::note_format_security_fixit)
6532         << FixItHint::CreateInsertion(FormatLoc, "\"%s\", ");
6533       break;
6534     case FST_NSString:
6535       Diag(FormatLoc, diag::note_format_security_fixit)
6536         << FixItHint::CreateInsertion(FormatLoc, "@\"%@\", ");
6537       break;
6538     }
6539   } else {
6540     Diag(FormatLoc, diag::warn_format_nonliteral)
6541       << OrigFormatExpr->getSourceRange();
6542   }
6543   return false;
6544 }
6545
6546 namespace {
6547
6548 class CheckFormatHandler : public analyze_format_string::FormatStringHandler {
6549 protected:
6550   Sema &S;
6551   const FormatStringLiteral *FExpr;
6552   const Expr *OrigFormatExpr;
6553   const Sema::FormatStringType FSType;
6554   const unsigned FirstDataArg;
6555   const unsigned NumDataArgs;
6556   const char *Beg; // Start of format string.
6557   const bool HasVAListArg;
6558   ArrayRef<const Expr *> Args;
6559   unsigned FormatIdx;
6560   llvm::SmallBitVector CoveredArgs;
6561   bool usesPositionalArgs = false;
6562   bool atFirstArg = true;
6563   bool inFunctionCall;
6564   Sema::VariadicCallType CallType;
6565   llvm::SmallBitVector &CheckedVarArgs;
6566   UncoveredArgHandler &UncoveredArg;
6567
6568 public:
6569   CheckFormatHandler(Sema &s, const FormatStringLiteral *fexpr,
6570                      const Expr *origFormatExpr,
6571                      const Sema::FormatStringType type, unsigned firstDataArg,
6572                      unsigned numDataArgs, const char *beg, bool hasVAListArg,
6573                      ArrayRef<const Expr *> Args, unsigned formatIdx,
6574                      bool inFunctionCall, Sema::VariadicCallType callType,
6575                      llvm::SmallBitVector &CheckedVarArgs,
6576                      UncoveredArgHandler &UncoveredArg)
6577       : S(s), FExpr(fexpr), OrigFormatExpr(origFormatExpr), FSType(type),
6578         FirstDataArg(firstDataArg), NumDataArgs(numDataArgs), Beg(beg),
6579         HasVAListArg(hasVAListArg), Args(Args), FormatIdx(formatIdx),
6580         inFunctionCall(inFunctionCall), CallType(callType),
6581         CheckedVarArgs(CheckedVarArgs), UncoveredArg(UncoveredArg) {
6582     CoveredArgs.resize(numDataArgs);
6583     CoveredArgs.reset();
6584   }
6585
6586   void DoneProcessing();
6587
6588   void HandleIncompleteSpecifier(const char *startSpecifier,
6589                                  unsigned specifierLen) override;
6590
6591   void HandleInvalidLengthModifier(
6592                            const analyze_format_string::FormatSpecifier &FS,
6593                            const analyze_format_string::ConversionSpecifier &CS,
6594                            const char *startSpecifier, unsigned specifierLen,
6595                            unsigned DiagID);
6596
6597   void HandleNonStandardLengthModifier(
6598                     const analyze_format_string::FormatSpecifier &FS,
6599                     const char *startSpecifier, unsigned specifierLen);
6600
6601   void HandleNonStandardConversionSpecifier(
6602                     const analyze_format_string::ConversionSpecifier &CS,
6603                     const char *startSpecifier, unsigned specifierLen);
6604
6605   void HandlePosition(const char *startPos, unsigned posLen) override;
6606
6607   void HandleInvalidPosition(const char *startSpecifier,
6608                              unsigned specifierLen,
6609                              analyze_format_string::PositionContext p) override;
6610
6611   void HandleZeroPosition(const char *startPos, unsigned posLen) override;
6612
6613   void HandleNullChar(const char *nullCharacter) override;
6614
6615   template <typename Range>
6616   static void
6617   EmitFormatDiagnostic(Sema &S, bool inFunctionCall, const Expr *ArgumentExpr,
6618                        const PartialDiagnostic &PDiag, SourceLocation StringLoc,
6619                        bool IsStringLocation, Range StringRange,
6620                        ArrayRef<FixItHint> Fixit = None);
6621
6622 protected:
6623   bool HandleInvalidConversionSpecifier(unsigned argIndex, SourceLocation Loc,
6624                                         const char *startSpec,
6625                                         unsigned specifierLen,
6626                                         const char *csStart, unsigned csLen);
6627
6628   void HandlePositionalNonpositionalArgs(SourceLocation Loc,
6629                                          const char *startSpec,
6630                                          unsigned specifierLen);
6631
6632   SourceRange getFormatStringRange();
6633   CharSourceRange getSpecifierRange(const char *startSpecifier,
6634                                     unsigned specifierLen);
6635   SourceLocation getLocationOfByte(const char *x);
6636
6637   const Expr *getDataArg(unsigned i) const;
6638
6639   bool CheckNumArgs(const analyze_format_string::FormatSpecifier &FS,
6640                     const analyze_format_string::ConversionSpecifier &CS,
6641                     const char *startSpecifier, unsigned specifierLen,
6642                     unsigned argIndex);
6643
6644   template <typename Range>
6645   void EmitFormatDiagnostic(PartialDiagnostic PDiag, SourceLocation StringLoc,
6646                             bool IsStringLocation, Range StringRange,
6647                             ArrayRef<FixItHint> Fixit = None);
6648 };
6649
6650 } // namespace
6651
6652 SourceRange CheckFormatHandler::getFormatStringRange() {
6653   return OrigFormatExpr->getSourceRange();
6654 }
6655
6656 CharSourceRange CheckFormatHandler::
6657 getSpecifierRange(const char *startSpecifier, unsigned specifierLen) {
6658   SourceLocation Start = getLocationOfByte(startSpecifier);
6659   SourceLocation End   = getLocationOfByte(startSpecifier + specifierLen - 1);
6660
6661   // Advance the end SourceLocation by one due to half-open ranges.
6662   End = End.getLocWithOffset(1);
6663
6664   return CharSourceRange::getCharRange(Start, End);
6665 }
6666
6667 SourceLocation CheckFormatHandler::getLocationOfByte(const char *x) {
6668   return FExpr->getLocationOfByte(x - Beg, S.getSourceManager(),
6669                                   S.getLangOpts(), S.Context.getTargetInfo());
6670 }
6671
6672 void CheckFormatHandler::HandleIncompleteSpecifier(const char *startSpecifier,
6673                                                    unsigned specifierLen){
6674   EmitFormatDiagnostic(S.PDiag(diag::warn_printf_incomplete_specifier),
6675                        getLocationOfByte(startSpecifier),
6676                        /*IsStringLocation*/true,
6677                        getSpecifierRange(startSpecifier, specifierLen));
6678 }
6679
6680 void CheckFormatHandler::HandleInvalidLengthModifier(
6681     const analyze_format_string::FormatSpecifier &FS,
6682     const analyze_format_string::ConversionSpecifier &CS,
6683     const char *startSpecifier, unsigned specifierLen, unsigned DiagID) {
6684   using namespace analyze_format_string;
6685
6686   const LengthModifier &LM = FS.getLengthModifier();
6687   CharSourceRange LMRange = getSpecifierRange(LM.getStart(), LM.getLength());
6688
6689   // See if we know how to fix this length modifier.
6690   Optional<LengthModifier> FixedLM = FS.getCorrectedLengthModifier();
6691   if (FixedLM) {
6692     EmitFormatDiagnostic(S.PDiag(DiagID) << LM.toString() << CS.toString(),
6693                          getLocationOfByte(LM.getStart()),
6694                          /*IsStringLocation*/true,
6695                          getSpecifierRange(startSpecifier, specifierLen));
6696
6697     S.Diag(getLocationOfByte(LM.getStart()), diag::note_format_fix_specifier)
6698       << FixedLM->toString()
6699       << FixItHint::CreateReplacement(LMRange, FixedLM->toString());
6700
6701   } else {
6702     FixItHint Hint;
6703     if (DiagID == diag::warn_format_nonsensical_length)
6704       Hint = FixItHint::CreateRemoval(LMRange);
6705
6706     EmitFormatDiagnostic(S.PDiag(DiagID) << LM.toString() << CS.toString(),
6707                          getLocationOfByte(LM.getStart()),
6708                          /*IsStringLocation*/true,
6709                          getSpecifierRange(startSpecifier, specifierLen),
6710                          Hint);
6711   }
6712 }
6713
6714 void CheckFormatHandler::HandleNonStandardLengthModifier(
6715     const analyze_format_string::FormatSpecifier &FS,
6716     const char *startSpecifier, unsigned specifierLen) {
6717   using namespace analyze_format_string;
6718
6719   const LengthModifier &LM = FS.getLengthModifier();
6720   CharSourceRange LMRange = getSpecifierRange(LM.getStart(), LM.getLength());
6721
6722   // See if we know how to fix this length modifier.
6723   Optional<LengthModifier> FixedLM = FS.getCorrectedLengthModifier();
6724   if (FixedLM) {
6725     EmitFormatDiagnostic(S.PDiag(diag::warn_format_non_standard)
6726                            << LM.toString() << 0,
6727                          getLocationOfByte(LM.getStart()),
6728                          /*IsStringLocation*/true,
6729                          getSpecifierRange(startSpecifier, specifierLen));
6730
6731     S.Diag(getLocationOfByte(LM.getStart()), diag::note_format_fix_specifier)
6732       << FixedLM->toString()
6733       << FixItHint::CreateReplacement(LMRange, FixedLM->toString());
6734
6735   } else {
6736     EmitFormatDiagnostic(S.PDiag(diag::warn_format_non_standard)
6737                            << LM.toString() << 0,
6738                          getLocationOfByte(LM.getStart()),
6739                          /*IsStringLocation*/true,
6740                          getSpecifierRange(startSpecifier, specifierLen));
6741   }
6742 }
6743
6744 void CheckFormatHandler::HandleNonStandardConversionSpecifier(
6745     const analyze_format_string::ConversionSpecifier &CS,
6746     const char *startSpecifier, unsigned specifierLen) {
6747   using namespace analyze_format_string;
6748
6749   // See if we know how to fix this conversion specifier.
6750   Optional<ConversionSpecifier> FixedCS = CS.getStandardSpecifier();
6751   if (FixedCS) {
6752     EmitFormatDiagnostic(S.PDiag(diag::warn_format_non_standard)
6753                           << CS.toString() << /*conversion specifier*/1,
6754                          getLocationOfByte(CS.getStart()),
6755                          /*IsStringLocation*/true,
6756                          getSpecifierRange(startSpecifier, specifierLen));
6757
6758     CharSourceRange CSRange = getSpecifierRange(CS.getStart(), CS.getLength());
6759     S.Diag(getLocationOfByte(CS.getStart()), diag::note_format_fix_specifier)
6760       << FixedCS->toString()
6761       << FixItHint::CreateReplacement(CSRange, FixedCS->toString());
6762   } else {
6763     EmitFormatDiagnostic(S.PDiag(diag::warn_format_non_standard)
6764                           << CS.toString() << /*conversion specifier*/1,
6765                          getLocationOfByte(CS.getStart()),
6766                          /*IsStringLocation*/true,
6767                          getSpecifierRange(startSpecifier, specifierLen));
6768   }
6769 }
6770
6771 void CheckFormatHandler::HandlePosition(const char *startPos,
6772                                         unsigned posLen) {
6773   EmitFormatDiagnostic(S.PDiag(diag::warn_format_non_standard_positional_arg),
6774                                getLocationOfByte(startPos),
6775                                /*IsStringLocation*/true,
6776                                getSpecifierRange(startPos, posLen));
6777 }
6778
6779 void
6780 CheckFormatHandler::HandleInvalidPosition(const char *startPos, unsigned posLen,
6781                                      analyze_format_string::PositionContext p) {
6782   EmitFormatDiagnostic(S.PDiag(diag::warn_format_invalid_positional_specifier)
6783                          << (unsigned) p,
6784                        getLocationOfByte(startPos), /*IsStringLocation*/true,
6785                        getSpecifierRange(startPos, posLen));
6786 }
6787
6788 void CheckFormatHandler::HandleZeroPosition(const char *startPos,
6789                                             unsigned posLen) {
6790   EmitFormatDiagnostic(S.PDiag(diag::warn_format_zero_positional_specifier),
6791                                getLocationOfByte(startPos),
6792                                /*IsStringLocation*/true,
6793                                getSpecifierRange(startPos, posLen));
6794 }
6795
6796 void CheckFormatHandler::HandleNullChar(const char *nullCharacter) {
6797   if (!isa<ObjCStringLiteral>(OrigFormatExpr)) {
6798     // The presence of a null character is likely an error.
6799     EmitFormatDiagnostic(
6800       S.PDiag(diag::warn_printf_format_string_contains_null_char),
6801       getLocationOfByte(nullCharacter), /*IsStringLocation*/true,
6802       getFormatStringRange());
6803   }
6804 }
6805
6806 // Note that this may return NULL if there was an error parsing or building
6807 // one of the argument expressions.
6808 const Expr *CheckFormatHandler::getDataArg(unsigned i) const {
6809   return Args[FirstDataArg + i];
6810 }
6811
6812 void CheckFormatHandler::DoneProcessing() {
6813   // Does the number of data arguments exceed the number of
6814   // format conversions in the format string?
6815   if (!HasVAListArg) {
6816       // Find any arguments that weren't covered.
6817     CoveredArgs.flip();
6818     signed notCoveredArg = CoveredArgs.find_first();
6819     if (notCoveredArg >= 0) {
6820       assert((unsigned)notCoveredArg < NumDataArgs);
6821       UncoveredArg.Update(notCoveredArg, OrigFormatExpr);
6822     } else {
6823       UncoveredArg.setAllCovered();
6824     }
6825   }
6826 }
6827
6828 void UncoveredArgHandler::Diagnose(Sema &S, bool IsFunctionCall,
6829                                    const Expr *ArgExpr) {
6830   assert(hasUncoveredArg() && DiagnosticExprs.size() > 0 &&
6831          "Invalid state");
6832
6833   if (!ArgExpr)
6834     return;
6835
6836   SourceLocation Loc = ArgExpr->getLocStart();
6837
6838   if (S.getSourceManager().isInSystemMacro(Loc))
6839     return;
6840
6841   PartialDiagnostic PDiag = S.PDiag(diag::warn_printf_data_arg_not_used);
6842   for (auto E : DiagnosticExprs)
6843     PDiag << E->getSourceRange();
6844
6845   CheckFormatHandler::EmitFormatDiagnostic(
6846                                   S, IsFunctionCall, DiagnosticExprs[0],
6847                                   PDiag, Loc, /*IsStringLocation*/false,
6848                                   DiagnosticExprs[0]->getSourceRange());
6849 }
6850
6851 bool
6852 CheckFormatHandler::HandleInvalidConversionSpecifier(unsigned argIndex,
6853                                                      SourceLocation Loc,
6854                                                      const char *startSpec,
6855                                                      unsigned specifierLen,
6856                                                      const char *csStart,
6857                                                      unsigned csLen) {
6858   bool keepGoing = true;
6859   if (argIndex < NumDataArgs) {
6860     // Consider the argument coverered, even though the specifier doesn't
6861     // make sense.
6862     CoveredArgs.set(argIndex);
6863   }
6864   else {
6865     // If argIndex exceeds the number of data arguments we
6866     // don't issue a warning because that is just a cascade of warnings (and
6867     // they may have intended '%%' anyway). We don't want to continue processing
6868     // the format string after this point, however, as we will like just get
6869     // gibberish when trying to match arguments.
6870     keepGoing = false;
6871   }
6872
6873   StringRef Specifier(csStart, csLen);
6874
6875   // If the specifier in non-printable, it could be the first byte of a UTF-8
6876   // sequence. In that case, print the UTF-8 code point. If not, print the byte
6877   // hex value.
6878   std::string CodePointStr;
6879   if (!llvm::sys::locale::isPrint(*csStart)) {
6880     llvm::UTF32 CodePoint;
6881     const llvm::UTF8 **B = reinterpret_cast<const llvm::UTF8 **>(&csStart);
6882     const llvm::UTF8 *E =
6883         reinterpret_cast<const llvm::UTF8 *>(csStart + csLen);
6884     llvm::ConversionResult Result =
6885         llvm::convertUTF8Sequence(B, E, &CodePoint, llvm::strictConversion);
6886
6887     if (Result != llvm::conversionOK) {
6888       unsigned char FirstChar = *csStart;
6889       CodePoint = (llvm::UTF32)FirstChar;
6890     }
6891
6892     llvm::raw_string_ostream OS(CodePointStr);
6893     if (CodePoint < 256)
6894       OS << "\\x" << llvm::format("%02x", CodePoint);
6895     else if (CodePoint <= 0xFFFF)
6896       OS << "\\u" << llvm::format("%04x", CodePoint);
6897     else
6898       OS << "\\U" << llvm::format("%08x", CodePoint);
6899     OS.flush();
6900     Specifier = CodePointStr;
6901   }
6902
6903   EmitFormatDiagnostic(
6904       S.PDiag(diag::warn_format_invalid_conversion) << Specifier, Loc,
6905       /*IsStringLocation*/ true, getSpecifierRange(startSpec, specifierLen));
6906
6907   return keepGoing;
6908 }
6909
6910 void
6911 CheckFormatHandler::HandlePositionalNonpositionalArgs(SourceLocation Loc,
6912                                                       const char *startSpec,
6913                                                       unsigned specifierLen) {
6914   EmitFormatDiagnostic(
6915     S.PDiag(diag::warn_format_mix_positional_nonpositional_args),
6916     Loc, /*isStringLoc*/true, getSpecifierRange(startSpec, specifierLen));
6917 }
6918
6919 bool
6920 CheckFormatHandler::CheckNumArgs(
6921   const analyze_format_string::FormatSpecifier &FS,
6922   const analyze_format_string::ConversionSpecifier &CS,
6923   const char *startSpecifier, unsigned specifierLen, unsigned argIndex) {
6924
6925   if (argIndex >= NumDataArgs) {
6926     PartialDiagnostic PDiag = FS.usesPositionalArg()
6927       ? (S.PDiag(diag::warn_printf_positional_arg_exceeds_data_args)
6928            << (argIndex+1) << NumDataArgs)
6929       : S.PDiag(diag::warn_printf_insufficient_data_args);
6930     EmitFormatDiagnostic(
6931       PDiag, getLocationOfByte(CS.getStart()), /*IsStringLocation*/true,
6932       getSpecifierRange(startSpecifier, specifierLen));
6933
6934     // Since more arguments than conversion tokens are given, by extension
6935     // all arguments are covered, so mark this as so.
6936     UncoveredArg.setAllCovered();
6937     return false;
6938   }
6939   return true;
6940 }
6941
6942 template<typename Range>
6943 void CheckFormatHandler::EmitFormatDiagnostic(PartialDiagnostic PDiag,
6944                                               SourceLocation Loc,
6945                                               bool IsStringLocation,
6946                                               Range StringRange,
6947                                               ArrayRef<FixItHint> FixIt) {
6948   EmitFormatDiagnostic(S, inFunctionCall, Args[FormatIdx], PDiag,
6949                        Loc, IsStringLocation, StringRange, FixIt);
6950 }
6951
6952 /// If the format string is not within the function call, emit a note
6953 /// so that the function call and string are in diagnostic messages.
6954 ///
6955 /// \param InFunctionCall if true, the format string is within the function
6956 /// call and only one diagnostic message will be produced.  Otherwise, an
6957 /// extra note will be emitted pointing to location of the format string.
6958 ///
6959 /// \param ArgumentExpr the expression that is passed as the format string
6960 /// argument in the function call.  Used for getting locations when two
6961 /// diagnostics are emitted.
6962 ///
6963 /// \param PDiag the callee should already have provided any strings for the
6964 /// diagnostic message.  This function only adds locations and fixits
6965 /// to diagnostics.
6966 ///
6967 /// \param Loc primary location for diagnostic.  If two diagnostics are
6968 /// required, one will be at Loc and a new SourceLocation will be created for
6969 /// the other one.
6970 ///
6971 /// \param IsStringLocation if true, Loc points to the format string should be
6972 /// used for the note.  Otherwise, Loc points to the argument list and will
6973 /// be used with PDiag.
6974 ///
6975 /// \param StringRange some or all of the string to highlight.  This is
6976 /// templated so it can accept either a CharSourceRange or a SourceRange.
6977 ///
6978 /// \param FixIt optional fix it hint for the format string.
6979 template <typename Range>
6980 void CheckFormatHandler::EmitFormatDiagnostic(
6981     Sema &S, bool InFunctionCall, const Expr *ArgumentExpr,
6982     const PartialDiagnostic &PDiag, SourceLocation Loc, bool IsStringLocation,
6983     Range StringRange, ArrayRef<FixItHint> FixIt) {
6984   if (InFunctionCall) {
6985     const Sema::SemaDiagnosticBuilder &D = S.Diag(Loc, PDiag);
6986     D << StringRange;
6987     D << FixIt;
6988   } else {
6989     S.Diag(IsStringLocation ? ArgumentExpr->getExprLoc() : Loc, PDiag)
6990       << ArgumentExpr->getSourceRange();
6991
6992     const Sema::SemaDiagnosticBuilder &Note =
6993       S.Diag(IsStringLocation ? Loc : StringRange.getBegin(),
6994              diag::note_format_string_defined);
6995
6996     Note << StringRange;
6997     Note << FixIt;
6998   }
6999 }
7000
7001 //===--- CHECK: Printf format string checking ------------------------------===//
7002
7003 namespace {
7004
7005 class CheckPrintfHandler : public CheckFormatHandler {
7006 public:
7007   CheckPrintfHandler(Sema &s, const FormatStringLiteral *fexpr,
7008                      const Expr *origFormatExpr,
7009                      const Sema::FormatStringType type, unsigned firstDataArg,
7010                      unsigned numDataArgs, bool isObjC, const char *beg,
7011                      bool hasVAListArg, ArrayRef<const Expr *> Args,
7012                      unsigned formatIdx, bool inFunctionCall,
7013                      Sema::VariadicCallType CallType,
7014                      llvm::SmallBitVector &CheckedVarArgs,
7015                      UncoveredArgHandler &UncoveredArg)
7016       : CheckFormatHandler(s, fexpr, origFormatExpr, type, firstDataArg,
7017                            numDataArgs, beg, hasVAListArg, Args, formatIdx,
7018                            inFunctionCall, CallType, CheckedVarArgs,
7019                            UncoveredArg) {}
7020
7021   bool isObjCContext() const { return FSType == Sema::FST_NSString; }
7022
7023   /// Returns true if '%@' specifiers are allowed in the format string.
7024   bool allowsObjCArg() const {
7025     return FSType == Sema::FST_NSString || FSType == Sema::FST_OSLog ||
7026            FSType == Sema::FST_OSTrace;
7027   }
7028
7029   bool HandleInvalidPrintfConversionSpecifier(
7030                                       const analyze_printf::PrintfSpecifier &FS,
7031                                       const char *startSpecifier,
7032                                       unsigned specifierLen) override;
7033
7034   bool HandlePrintfSpecifier(const analyze_printf::PrintfSpecifier &FS,
7035                              const char *startSpecifier,
7036                              unsigned specifierLen) override;
7037   bool checkFormatExpr(const analyze_printf::PrintfSpecifier &FS,
7038                        const char *StartSpecifier,
7039                        unsigned SpecifierLen,
7040                        const Expr *E);
7041
7042   bool HandleAmount(const analyze_format_string::OptionalAmount &Amt, unsigned k,
7043                     const char *startSpecifier, unsigned specifierLen);
7044   void HandleInvalidAmount(const analyze_printf::PrintfSpecifier &FS,
7045                            const analyze_printf::OptionalAmount &Amt,
7046                            unsigned type,
7047                            const char *startSpecifier, unsigned specifierLen);
7048   void HandleFlag(const analyze_printf::PrintfSpecifier &FS,
7049                   const analyze_printf::OptionalFlag &flag,
7050                   const char *startSpecifier, unsigned specifierLen);
7051   void HandleIgnoredFlag(const analyze_printf::PrintfSpecifier &FS,
7052                          const analyze_printf::OptionalFlag &ignoredFlag,
7053                          const analyze_printf::OptionalFlag &flag,
7054                          const char *startSpecifier, unsigned specifierLen);
7055   bool checkForCStrMembers(const analyze_printf::ArgType &AT,
7056                            const Expr *E);
7057
7058   void HandleEmptyObjCModifierFlag(const char *startFlag,
7059                                    unsigned flagLen) override;
7060
7061   void HandleInvalidObjCModifierFlag(const char *startFlag,
7062                                             unsigned flagLen) override;
7063
7064   void HandleObjCFlagsWithNonObjCConversion(const char *flagsStart,
7065                                            const char *flagsEnd,
7066                                            const char *conversionPosition)
7067                                              override;
7068 };
7069
7070 } // namespace
7071
7072 bool CheckPrintfHandler::HandleInvalidPrintfConversionSpecifier(
7073                                       const analyze_printf::PrintfSpecifier &FS,
7074                                       const char *startSpecifier,
7075                                       unsigned specifierLen) {
7076   const analyze_printf::PrintfConversionSpecifier &CS =
7077     FS.getConversionSpecifier();
7078
7079   return HandleInvalidConversionSpecifier(FS.getArgIndex(),
7080                                           getLocationOfByte(CS.getStart()),
7081                                           startSpecifier, specifierLen,
7082                                           CS.getStart(), CS.getLength());
7083 }
7084
7085 bool CheckPrintfHandler::HandleAmount(
7086                                const analyze_format_string::OptionalAmount &Amt,
7087                                unsigned k, const char *startSpecifier,
7088                                unsigned specifierLen) {
7089   if (Amt.hasDataArgument()) {
7090     if (!HasVAListArg) {
7091       unsigned argIndex = Amt.getArgIndex();
7092       if (argIndex >= NumDataArgs) {
7093         EmitFormatDiagnostic(S.PDiag(diag::warn_printf_asterisk_missing_arg)
7094                                << k,
7095                              getLocationOfByte(Amt.getStart()),
7096                              /*IsStringLocation*/true,
7097                              getSpecifierRange(startSpecifier, specifierLen));
7098         // Don't do any more checking.  We will just emit
7099         // spurious errors.
7100         return false;
7101       }
7102
7103       // Type check the data argument.  It should be an 'int'.
7104       // Although not in conformance with C99, we also allow the argument to be
7105       // an 'unsigned int' as that is a reasonably safe case.  GCC also
7106       // doesn't emit a warning for that case.
7107       CoveredArgs.set(argIndex);
7108       const Expr *Arg = getDataArg(argIndex);
7109       if (!Arg)
7110         return false;
7111
7112       QualType T = Arg->getType();
7113
7114       const analyze_printf::ArgType &AT = Amt.getArgType(S.Context);
7115       assert(AT.isValid());
7116
7117       if (!AT.matchesType(S.Context, T)) {
7118         EmitFormatDiagnostic(S.PDiag(diag::warn_printf_asterisk_wrong_type)
7119                                << k << AT.getRepresentativeTypeName(S.Context)
7120                                << T << Arg->getSourceRange(),
7121                              getLocationOfByte(Amt.getStart()),
7122                              /*IsStringLocation*/true,
7123                              getSpecifierRange(startSpecifier, specifierLen));
7124         // Don't do any more checking.  We will just emit
7125         // spurious errors.
7126         return false;
7127       }
7128     }
7129   }
7130   return true;
7131 }
7132
7133 void CheckPrintfHandler::HandleInvalidAmount(
7134                                       const analyze_printf::PrintfSpecifier &FS,
7135                                       const analyze_printf::OptionalAmount &Amt,
7136                                       unsigned type,
7137                                       const char *startSpecifier,
7138                                       unsigned specifierLen) {
7139   const analyze_printf::PrintfConversionSpecifier &CS =
7140     FS.getConversionSpecifier();
7141
7142   FixItHint fixit =
7143     Amt.getHowSpecified() == analyze_printf::OptionalAmount::Constant
7144       ? FixItHint::CreateRemoval(getSpecifierRange(Amt.getStart(),
7145                                  Amt.getConstantLength()))
7146       : FixItHint();
7147
7148   EmitFormatDiagnostic(S.PDiag(diag::warn_printf_nonsensical_optional_amount)
7149                          << type << CS.toString(),
7150                        getLocationOfByte(Amt.getStart()),
7151                        /*IsStringLocation*/true,
7152                        getSpecifierRange(startSpecifier, specifierLen),
7153                        fixit);
7154 }
7155
7156 void CheckPrintfHandler::HandleFlag(const analyze_printf::PrintfSpecifier &FS,
7157                                     const analyze_printf::OptionalFlag &flag,
7158                                     const char *startSpecifier,
7159                                     unsigned specifierLen) {
7160   // Warn about pointless flag with a fixit removal.
7161   const analyze_printf::PrintfConversionSpecifier &CS =
7162     FS.getConversionSpecifier();
7163   EmitFormatDiagnostic(S.PDiag(diag::warn_printf_nonsensical_flag)
7164                          << flag.toString() << CS.toString(),
7165                        getLocationOfByte(flag.getPosition()),
7166                        /*IsStringLocation*/true,
7167                        getSpecifierRange(startSpecifier, specifierLen),
7168                        FixItHint::CreateRemoval(
7169                          getSpecifierRange(flag.getPosition(), 1)));
7170 }
7171
7172 void CheckPrintfHandler::HandleIgnoredFlag(
7173                                 const analyze_printf::PrintfSpecifier &FS,
7174                                 const analyze_printf::OptionalFlag &ignoredFlag,
7175                                 const analyze_printf::OptionalFlag &flag,
7176                                 const char *startSpecifier,
7177                                 unsigned specifierLen) {
7178   // Warn about ignored flag with a fixit removal.
7179   EmitFormatDiagnostic(S.PDiag(diag::warn_printf_ignored_flag)
7180                          << ignoredFlag.toString() << flag.toString(),
7181                        getLocationOfByte(ignoredFlag.getPosition()),
7182                        /*IsStringLocation*/true,
7183                        getSpecifierRange(startSpecifier, specifierLen),
7184                        FixItHint::CreateRemoval(
7185                          getSpecifierRange(ignoredFlag.getPosition(), 1)));
7186 }
7187
7188 void CheckPrintfHandler::HandleEmptyObjCModifierFlag(const char *startFlag,
7189                                                      unsigned flagLen) {
7190   // Warn about an empty flag.
7191   EmitFormatDiagnostic(S.PDiag(diag::warn_printf_empty_objc_flag),
7192                        getLocationOfByte(startFlag),
7193                        /*IsStringLocation*/true,
7194                        getSpecifierRange(startFlag, flagLen));
7195 }
7196
7197 void CheckPrintfHandler::HandleInvalidObjCModifierFlag(const char *startFlag,
7198                                                        unsigned flagLen) {
7199   // Warn about an invalid flag.
7200   auto Range = getSpecifierRange(startFlag, flagLen);
7201   StringRef flag(startFlag, flagLen);
7202   EmitFormatDiagnostic(S.PDiag(diag::warn_printf_invalid_objc_flag) << flag,
7203                       getLocationOfByte(startFlag),
7204                       /*IsStringLocation*/true,
7205                       Range, FixItHint::CreateRemoval(Range));
7206 }
7207
7208 void CheckPrintfHandler::HandleObjCFlagsWithNonObjCConversion(
7209     const char *flagsStart, const char *flagsEnd, const char *conversionPosition) {
7210     // Warn about using '[...]' without a '@' conversion.
7211     auto Range = getSpecifierRange(flagsStart, flagsEnd - flagsStart + 1);
7212     auto diag = diag::warn_printf_ObjCflags_without_ObjCConversion;
7213     EmitFormatDiagnostic(S.PDiag(diag) << StringRef(conversionPosition, 1),
7214                          getLocationOfByte(conversionPosition),
7215                          /*IsStringLocation*/true,
7216                          Range, FixItHint::CreateRemoval(Range));
7217 }
7218
7219 // Determines if the specified is a C++ class or struct containing
7220 // a member with the specified name and kind (e.g. a CXXMethodDecl named
7221 // "c_str()").
7222 template<typename MemberKind>
7223 static llvm::SmallPtrSet<MemberKind*, 1>
7224 CXXRecordMembersNamed(StringRef Name, Sema &S, QualType Ty) {
7225   const RecordType *RT = Ty->getAs<RecordType>();
7226   llvm::SmallPtrSet<MemberKind*, 1> Results;
7227
7228   if (!RT)
7229     return Results;
7230   const CXXRecordDecl *RD = dyn_cast<CXXRecordDecl>(RT->getDecl());
7231   if (!RD || !RD->getDefinition())
7232     return Results;
7233
7234   LookupResult R(S, &S.Context.Idents.get(Name), SourceLocation(),
7235                  Sema::LookupMemberName);
7236   R.suppressDiagnostics();
7237
7238   // We just need to include all members of the right kind turned up by the
7239   // filter, at this point.
7240   if (S.LookupQualifiedName(R, RT->getDecl()))
7241     for (LookupResult::iterator I = R.begin(), E = R.end(); I != E; ++I) {
7242       NamedDecl *decl = (*I)->getUnderlyingDecl();
7243       if (MemberKind *FK = dyn_cast<MemberKind>(decl))
7244         Results.insert(FK);
7245     }
7246   return Results;
7247 }
7248
7249 /// Check if we could call '.c_str()' on an object.
7250 ///
7251 /// FIXME: This returns the wrong results in some cases (if cv-qualifiers don't
7252 /// allow the call, or if it would be ambiguous).
7253 bool Sema::hasCStrMethod(const Expr *E) {
7254   using MethodSet = llvm::SmallPtrSet<CXXMethodDecl *, 1>;
7255
7256   MethodSet Results =
7257       CXXRecordMembersNamed<CXXMethodDecl>("c_str", *this, E->getType());
7258   for (MethodSet::iterator MI = Results.begin(), ME = Results.end();
7259        MI != ME; ++MI)
7260     if ((*MI)->getMinRequiredArguments() == 0)
7261       return true;
7262   return false;
7263 }
7264
7265 // Check if a (w)string was passed when a (w)char* was needed, and offer a
7266 // better diagnostic if so. AT is assumed to be valid.
7267 // Returns true when a c_str() conversion method is found.
7268 bool CheckPrintfHandler::checkForCStrMembers(
7269     const analyze_printf::ArgType &AT, const Expr *E) {
7270   using MethodSet = llvm::SmallPtrSet<CXXMethodDecl *, 1>;
7271
7272   MethodSet Results =
7273       CXXRecordMembersNamed<CXXMethodDecl>("c_str", S, E->getType());
7274
7275   for (MethodSet::iterator MI = Results.begin(), ME = Results.end();
7276        MI != ME; ++MI) {
7277     const CXXMethodDecl *Method = *MI;
7278     if (Method->getMinRequiredArguments() == 0 &&
7279         AT.matchesType(S.Context, Method->getReturnType())) {
7280       // FIXME: Suggest parens if the expression needs them.
7281       SourceLocation EndLoc = S.getLocForEndOfToken(E->getLocEnd());
7282       S.Diag(E->getLocStart(), diag::note_printf_c_str)
7283           << "c_str()"
7284           << FixItHint::CreateInsertion(EndLoc, ".c_str()");
7285       return true;
7286     }
7287   }
7288
7289   return false;
7290 }
7291
7292 bool
7293 CheckPrintfHandler::HandlePrintfSpecifier(const analyze_printf::PrintfSpecifier
7294                                             &FS,
7295                                           const char *startSpecifier,
7296                                           unsigned specifierLen) {
7297   using namespace analyze_format_string;
7298   using namespace analyze_printf;
7299
7300   const PrintfConversionSpecifier &CS = FS.getConversionSpecifier();
7301
7302   if (FS.consumesDataArgument()) {
7303     if (atFirstArg) {
7304         atFirstArg = false;
7305         usesPositionalArgs = FS.usesPositionalArg();
7306     }
7307     else if (usesPositionalArgs != FS.usesPositionalArg()) {
7308       HandlePositionalNonpositionalArgs(getLocationOfByte(CS.getStart()),
7309                                         startSpecifier, specifierLen);
7310       return false;
7311     }
7312   }
7313
7314   // First check if the field width, precision, and conversion specifier
7315   // have matching data arguments.
7316   if (!HandleAmount(FS.getFieldWidth(), /* field width */ 0,
7317                     startSpecifier, specifierLen)) {
7318     return false;
7319   }
7320
7321   if (!HandleAmount(FS.getPrecision(), /* precision */ 1,
7322                     startSpecifier, specifierLen)) {
7323     return false;
7324   }
7325
7326   if (!CS.consumesDataArgument()) {
7327     // FIXME: Technically specifying a precision or field width here
7328     // makes no sense.  Worth issuing a warning at some point.
7329     return true;
7330   }
7331
7332   // Consume the argument.
7333   unsigned argIndex = FS.getArgIndex();
7334   if (argIndex < NumDataArgs) {
7335     // The check to see if the argIndex is valid will come later.
7336     // We set the bit here because we may exit early from this
7337     // function if we encounter some other error.
7338     CoveredArgs.set(argIndex);
7339   }
7340
7341   // FreeBSD kernel extensions.
7342   if (CS.getKind() == ConversionSpecifier::FreeBSDbArg ||
7343       CS.getKind() == ConversionSpecifier::FreeBSDDArg) {
7344     // We need at least two arguments.
7345     if (!CheckNumArgs(FS, CS, startSpecifier, specifierLen, argIndex + 1))
7346       return false;
7347
7348     // Claim the second argument.
7349     CoveredArgs.set(argIndex + 1);
7350
7351     // Type check the first argument (int for %b, pointer for %D)
7352     const Expr *Ex = getDataArg(argIndex);
7353     const analyze_printf::ArgType &AT =
7354       (CS.getKind() == ConversionSpecifier::FreeBSDbArg) ?
7355         ArgType(S.Context.IntTy) : ArgType::CPointerTy;
7356     if (AT.isValid() && !AT.matchesType(S.Context, Ex->getType()))
7357       EmitFormatDiagnostic(
7358         S.PDiag(diag::warn_format_conversion_argument_type_mismatch)
7359         << AT.getRepresentativeTypeName(S.Context) << Ex->getType()
7360         << false << Ex->getSourceRange(),
7361         Ex->getLocStart(), /*IsStringLocation*/false,
7362         getSpecifierRange(startSpecifier, specifierLen));
7363
7364     // Type check the second argument (char * for both %b and %D)
7365     Ex = getDataArg(argIndex + 1);
7366     const analyze_printf::ArgType &AT2 = ArgType::CStrTy;
7367     if (AT2.isValid() && !AT2.matchesType(S.Context, Ex->getType()))
7368       EmitFormatDiagnostic(
7369         S.PDiag(diag::warn_format_conversion_argument_type_mismatch)
7370         << AT2.getRepresentativeTypeName(S.Context) << Ex->getType()
7371         << false << Ex->getSourceRange(),
7372         Ex->getLocStart(), /*IsStringLocation*/false,
7373         getSpecifierRange(startSpecifier, specifierLen));
7374
7375      return true;
7376   }
7377
7378   // Check for using an Objective-C specific conversion specifier
7379   // in a non-ObjC literal.
7380   if (!allowsObjCArg() && CS.isObjCArg()) {
7381     return HandleInvalidPrintfConversionSpecifier(FS, startSpecifier,
7382                                                   specifierLen);
7383   }
7384
7385   // %P can only be used with os_log.
7386   if (FSType != Sema::FST_OSLog && CS.getKind() == ConversionSpecifier::PArg) {
7387     return HandleInvalidPrintfConversionSpecifier(FS, startSpecifier,
7388                                                   specifierLen);
7389   }
7390
7391   // %n is not allowed with os_log.
7392   if (FSType == Sema::FST_OSLog && CS.getKind() == ConversionSpecifier::nArg) {
7393     EmitFormatDiagnostic(S.PDiag(diag::warn_os_log_format_narg),
7394                          getLocationOfByte(CS.getStart()),
7395                          /*IsStringLocation*/ false,
7396                          getSpecifierRange(startSpecifier, specifierLen));
7397
7398     return true;
7399   }
7400
7401   // Only scalars are allowed for os_trace.
7402   if (FSType == Sema::FST_OSTrace &&
7403       (CS.getKind() == ConversionSpecifier::PArg ||
7404        CS.getKind() == ConversionSpecifier::sArg ||
7405        CS.getKind() == ConversionSpecifier::ObjCObjArg)) {
7406     return HandleInvalidPrintfConversionSpecifier(FS, startSpecifier,
7407                                                   specifierLen);
7408   }
7409
7410   // Check for use of public/private annotation outside of os_log().
7411   if (FSType != Sema::FST_OSLog) {
7412     if (FS.isPublic().isSet()) {
7413       EmitFormatDiagnostic(S.PDiag(diag::warn_format_invalid_annotation)
7414                                << "public",
7415                            getLocationOfByte(FS.isPublic().getPosition()),
7416                            /*IsStringLocation*/ false,
7417                            getSpecifierRange(startSpecifier, specifierLen));
7418     }
7419     if (FS.isPrivate().isSet()) {
7420       EmitFormatDiagnostic(S.PDiag(diag::warn_format_invalid_annotation)
7421                                << "private",
7422                            getLocationOfByte(FS.isPrivate().getPosition()),
7423                            /*IsStringLocation*/ false,
7424                            getSpecifierRange(startSpecifier, specifierLen));
7425     }
7426   }
7427
7428   // Check for invalid use of field width
7429   if (!FS.hasValidFieldWidth()) {
7430     HandleInvalidAmount(FS, FS.getFieldWidth(), /* field width */ 0,
7431         startSpecifier, specifierLen);
7432   }
7433
7434   // Check for invalid use of precision
7435   if (!FS.hasValidPrecision()) {
7436     HandleInvalidAmount(FS, FS.getPrecision(), /* precision */ 1,
7437         startSpecifier, specifierLen);
7438   }
7439
7440   // Precision is mandatory for %P specifier.
7441   if (CS.getKind() == ConversionSpecifier::PArg &&
7442       FS.getPrecision().getHowSpecified() == OptionalAmount::NotSpecified) {
7443     EmitFormatDiagnostic(S.PDiag(diag::warn_format_P_no_precision),
7444                          getLocationOfByte(startSpecifier),
7445                          /*IsStringLocation*/ false,
7446                          getSpecifierRange(startSpecifier, specifierLen));
7447   }
7448
7449   // Check each flag does not conflict with any other component.
7450   if (!FS.hasValidThousandsGroupingPrefix())
7451     HandleFlag(FS, FS.hasThousandsGrouping(), startSpecifier, specifierLen);
7452   if (!FS.hasValidLeadingZeros())
7453     HandleFlag(FS, FS.hasLeadingZeros(), startSpecifier, specifierLen);
7454   if (!FS.hasValidPlusPrefix())
7455     HandleFlag(FS, FS.hasPlusPrefix(), startSpecifier, specifierLen);
7456   if (!FS.hasValidSpacePrefix())
7457     HandleFlag(FS, FS.hasSpacePrefix(), startSpecifier, specifierLen);
7458   if (!FS.hasValidAlternativeForm())
7459     HandleFlag(FS, FS.hasAlternativeForm(), startSpecifier, specifierLen);
7460   if (!FS.hasValidLeftJustified())
7461     HandleFlag(FS, FS.isLeftJustified(), startSpecifier, specifierLen);
7462
7463   // Check that flags are not ignored by another flag
7464   if (FS.hasSpacePrefix() && FS.hasPlusPrefix()) // ' ' ignored by '+'
7465     HandleIgnoredFlag(FS, FS.hasSpacePrefix(), FS.hasPlusPrefix(),
7466         startSpecifier, specifierLen);
7467   if (FS.hasLeadingZeros() && FS.isLeftJustified()) // '0' ignored by '-'
7468     HandleIgnoredFlag(FS, FS.hasLeadingZeros(), FS.isLeftJustified(),
7469             startSpecifier, specifierLen);
7470
7471   // Check the length modifier is valid with the given conversion specifier.
7472   if (!FS.hasValidLengthModifier(S.getASTContext().getTargetInfo()))
7473     HandleInvalidLengthModifier(FS, CS, startSpecifier, specifierLen,
7474                                 diag::warn_format_nonsensical_length);
7475   else if (!FS.hasStandardLengthModifier())
7476     HandleNonStandardLengthModifier(FS, startSpecifier, specifierLen);
7477   else if (!FS.hasStandardLengthConversionCombination())
7478     HandleInvalidLengthModifier(FS, CS, startSpecifier, specifierLen,
7479                                 diag::warn_format_non_standard_conversion_spec);
7480
7481   if (!FS.hasStandardConversionSpecifier(S.getLangOpts()))
7482     HandleNonStandardConversionSpecifier(CS, startSpecifier, specifierLen);
7483
7484   // The remaining checks depend on the data arguments.
7485   if (HasVAListArg)
7486     return true;
7487
7488   if (!CheckNumArgs(FS, CS, startSpecifier, specifierLen, argIndex))
7489     return false;
7490
7491   const Expr *Arg = getDataArg(argIndex);
7492   if (!Arg)
7493     return true;
7494
7495   return checkFormatExpr(FS, startSpecifier, specifierLen, Arg);
7496 }
7497
7498 static bool requiresParensToAddCast(const Expr *E) {
7499   // FIXME: We should have a general way to reason about operator
7500   // precedence and whether parens are actually needed here.
7501   // Take care of a few common cases where they aren't.
7502   const Expr *Inside = E->IgnoreImpCasts();
7503   if (const PseudoObjectExpr *POE = dyn_cast<PseudoObjectExpr>(Inside))
7504     Inside = POE->getSyntacticForm()->IgnoreImpCasts();
7505
7506   switch (Inside->getStmtClass()) {
7507   case Stmt::ArraySubscriptExprClass:
7508   case Stmt::CallExprClass:
7509   case Stmt::CharacterLiteralClass:
7510   case Stmt::CXXBoolLiteralExprClass:
7511   case Stmt::DeclRefExprClass:
7512   case Stmt::FloatingLiteralClass:
7513   case Stmt::IntegerLiteralClass:
7514   case Stmt::MemberExprClass:
7515   case Stmt::ObjCArrayLiteralClass:
7516   case Stmt::ObjCBoolLiteralExprClass:
7517   case Stmt::ObjCBoxedExprClass:
7518   case Stmt::ObjCDictionaryLiteralClass:
7519   case Stmt::ObjCEncodeExprClass:
7520   case Stmt::ObjCIvarRefExprClass:
7521   case Stmt::ObjCMessageExprClass:
7522   case Stmt::ObjCPropertyRefExprClass:
7523   case Stmt::ObjCStringLiteralClass:
7524   case Stmt::ObjCSubscriptRefExprClass:
7525   case Stmt::ParenExprClass:
7526   case Stmt::StringLiteralClass:
7527   case Stmt::UnaryOperatorClass:
7528     return false;
7529   default:
7530     return true;
7531   }
7532 }
7533
7534 static std::pair<QualType, StringRef>
7535 shouldNotPrintDirectly(const ASTContext &Context,
7536                        QualType IntendedTy,
7537                        const Expr *E) {
7538   // Use a 'while' to peel off layers of typedefs.
7539   QualType TyTy = IntendedTy;
7540   while (const TypedefType *UserTy = TyTy->getAs<TypedefType>()) {
7541     StringRef Name = UserTy->getDecl()->getName();
7542     QualType CastTy = llvm::StringSwitch<QualType>(Name)
7543       .Case("CFIndex", Context.getNSIntegerType())
7544       .Case("NSInteger", Context.getNSIntegerType())
7545       .Case("NSUInteger", Context.getNSUIntegerType())
7546       .Case("SInt32", Context.IntTy)
7547       .Case("UInt32", Context.UnsignedIntTy)
7548       .Default(QualType());
7549
7550     if (!CastTy.isNull())
7551       return std::make_pair(CastTy, Name);
7552
7553     TyTy = UserTy->desugar();
7554   }
7555
7556   // Strip parens if necessary.
7557   if (const ParenExpr *PE = dyn_cast<ParenExpr>(E))
7558     return shouldNotPrintDirectly(Context,
7559                                   PE->getSubExpr()->getType(),
7560                                   PE->getSubExpr());
7561
7562   // If this is a conditional expression, then its result type is constructed
7563   // via usual arithmetic conversions and thus there might be no necessary
7564   // typedef sugar there.  Recurse to operands to check for NSInteger &
7565   // Co. usage condition.
7566   if (const ConditionalOperator *CO = dyn_cast<ConditionalOperator>(E)) {
7567     QualType TrueTy, FalseTy;
7568     StringRef TrueName, FalseName;
7569
7570     std::tie(TrueTy, TrueName) =
7571       shouldNotPrintDirectly(Context,
7572                              CO->getTrueExpr()->getType(),
7573                              CO->getTrueExpr());
7574     std::tie(FalseTy, FalseName) =
7575       shouldNotPrintDirectly(Context,
7576                              CO->getFalseExpr()->getType(),
7577                              CO->getFalseExpr());
7578
7579     if (TrueTy == FalseTy)
7580       return std::make_pair(TrueTy, TrueName);
7581     else if (TrueTy.isNull())
7582       return std::make_pair(FalseTy, FalseName);
7583     else if (FalseTy.isNull())
7584       return std::make_pair(TrueTy, TrueName);
7585   }
7586
7587   return std::make_pair(QualType(), StringRef());
7588 }
7589
7590 bool
7591 CheckPrintfHandler::checkFormatExpr(const analyze_printf::PrintfSpecifier &FS,
7592                                     const char *StartSpecifier,
7593                                     unsigned SpecifierLen,
7594                                     const Expr *E) {
7595   using namespace analyze_format_string;
7596   using namespace analyze_printf;
7597
7598   // Now type check the data expression that matches the
7599   // format specifier.
7600   const analyze_printf::ArgType &AT = FS.getArgType(S.Context, isObjCContext());
7601   if (!AT.isValid())
7602     return true;
7603
7604   QualType ExprTy = E->getType();
7605   while (const TypeOfExprType *TET = dyn_cast<TypeOfExprType>(ExprTy)) {
7606     ExprTy = TET->getUnderlyingExpr()->getType();
7607   }
7608
7609   const analyze_printf::ArgType::MatchKind Match =
7610       AT.matchesType(S.Context, ExprTy);
7611   bool Pedantic = Match == analyze_printf::ArgType::NoMatchPedantic;
7612   if (Match == analyze_printf::ArgType::Match)
7613     return true;
7614
7615   // Look through argument promotions for our error message's reported type.
7616   // This includes the integral and floating promotions, but excludes array
7617   // and function pointer decay; seeing that an argument intended to be a
7618   // string has type 'char [6]' is probably more confusing than 'char *'.
7619   if (const ImplicitCastExpr *ICE = dyn_cast<ImplicitCastExpr>(E)) {
7620     if (ICE->getCastKind() == CK_IntegralCast ||
7621         ICE->getCastKind() == CK_FloatingCast) {
7622       E = ICE->getSubExpr();
7623       ExprTy = E->getType();
7624
7625       // Check if we didn't match because of an implicit cast from a 'char'
7626       // or 'short' to an 'int'.  This is done because printf is a varargs
7627       // function.
7628       if (ICE->getType() == S.Context.IntTy ||
7629           ICE->getType() == S.Context.UnsignedIntTy) {
7630         // All further checking is done on the subexpression.
7631         if (AT.matchesType(S.Context, ExprTy))
7632           return true;
7633       }
7634     }
7635   } else if (const CharacterLiteral *CL = dyn_cast<CharacterLiteral>(E)) {
7636     // Special case for 'a', which has type 'int' in C.
7637     // Note, however, that we do /not/ want to treat multibyte constants like
7638     // 'MooV' as characters! This form is deprecated but still exists.
7639     if (ExprTy == S.Context.IntTy)
7640       if (llvm::isUIntN(S.Context.getCharWidth(), CL->getValue()))
7641         ExprTy = S.Context.CharTy;
7642   }
7643
7644   // Look through enums to their underlying type.
7645   bool IsEnum = false;
7646   if (auto EnumTy = ExprTy->getAs<EnumType>()) {
7647     ExprTy = EnumTy->getDecl()->getIntegerType();
7648     IsEnum = true;
7649   }
7650
7651   // %C in an Objective-C context prints a unichar, not a wchar_t.
7652   // If the argument is an integer of some kind, believe the %C and suggest
7653   // a cast instead of changing the conversion specifier.
7654   QualType IntendedTy = ExprTy;
7655   if (isObjCContext() &&
7656       FS.getConversionSpecifier().getKind() == ConversionSpecifier::CArg) {
7657     if (ExprTy->isIntegralOrUnscopedEnumerationType() &&
7658         !ExprTy->isCharType()) {
7659       // 'unichar' is defined as a typedef of unsigned short, but we should
7660       // prefer using the typedef if it is visible.
7661       IntendedTy = S.Context.UnsignedShortTy;
7662
7663       // While we are here, check if the value is an IntegerLiteral that happens
7664       // to be within the valid range.
7665       if (const IntegerLiteral *IL = dyn_cast<IntegerLiteral>(E)) {
7666         const llvm::APInt &V = IL->getValue();
7667         if (V.getActiveBits() <= S.Context.getTypeSize(IntendedTy))
7668           return true;
7669       }
7670
7671       LookupResult Result(S, &S.Context.Idents.get("unichar"), E->getLocStart(),
7672                           Sema::LookupOrdinaryName);
7673       if (S.LookupName(Result, S.getCurScope())) {
7674         NamedDecl *ND = Result.getFoundDecl();
7675         if (TypedefNameDecl *TD = dyn_cast<TypedefNameDecl>(ND))
7676           if (TD->getUnderlyingType() == IntendedTy)
7677             IntendedTy = S.Context.getTypedefType(TD);
7678       }
7679     }
7680   }
7681
7682   // Special-case some of Darwin's platform-independence types by suggesting
7683   // casts to primitive types that are known to be large enough.
7684   bool ShouldNotPrintDirectly = false; StringRef CastTyName;
7685   if (S.Context.getTargetInfo().getTriple().isOSDarwin()) {
7686     QualType CastTy;
7687     std::tie(CastTy, CastTyName) = shouldNotPrintDirectly(S.Context, IntendedTy, E);
7688     if (!CastTy.isNull()) {
7689       // %zi/%zu and %td/%tu are OK to use for NSInteger/NSUInteger of type int
7690       // (long in ASTContext). Only complain to pedants.
7691       if ((CastTyName == "NSInteger" || CastTyName == "NSUInteger") &&
7692           (AT.isSizeT() || AT.isPtrdiffT()) &&
7693           AT.matchesType(S.Context, CastTy))
7694         Pedantic = true;
7695       IntendedTy = CastTy;
7696       ShouldNotPrintDirectly = true;
7697     }
7698   }
7699
7700   // We may be able to offer a FixItHint if it is a supported type.
7701   PrintfSpecifier fixedFS = FS;
7702   bool Success =
7703       fixedFS.fixType(IntendedTy, S.getLangOpts(), S.Context, isObjCContext());
7704
7705   if (Success) {
7706     // Get the fix string from the fixed format specifier
7707     SmallString<16> buf;
7708     llvm::raw_svector_ostream os(buf);
7709     fixedFS.toString(os);
7710
7711     CharSourceRange SpecRange = getSpecifierRange(StartSpecifier, SpecifierLen);
7712
7713     if (IntendedTy == ExprTy && !ShouldNotPrintDirectly) {
7714       unsigned Diag =
7715           Pedantic
7716               ? diag::warn_format_conversion_argument_type_mismatch_pedantic
7717               : diag::warn_format_conversion_argument_type_mismatch;
7718       // In this case, the specifier is wrong and should be changed to match
7719       // the argument.
7720       EmitFormatDiagnostic(S.PDiag(Diag)
7721                                << AT.getRepresentativeTypeName(S.Context)
7722                                << IntendedTy << IsEnum << E->getSourceRange(),
7723                            E->getLocStart(),
7724                            /*IsStringLocation*/ false, SpecRange,
7725                            FixItHint::CreateReplacement(SpecRange, os.str()));
7726     } else {
7727       // The canonical type for formatting this value is different from the
7728       // actual type of the expression. (This occurs, for example, with Darwin's
7729       // NSInteger on 32-bit platforms, where it is typedef'd as 'int', but
7730       // should be printed as 'long' for 64-bit compatibility.)
7731       // Rather than emitting a normal format/argument mismatch, we want to
7732       // add a cast to the recommended type (and correct the format string
7733       // if necessary).
7734       SmallString<16> CastBuf;
7735       llvm::raw_svector_ostream CastFix(CastBuf);
7736       CastFix << "(";
7737       IntendedTy.print(CastFix, S.Context.getPrintingPolicy());
7738       CastFix << ")";
7739
7740       SmallVector<FixItHint,4> Hints;
7741       if (!AT.matchesType(S.Context, IntendedTy) || ShouldNotPrintDirectly)
7742         Hints.push_back(FixItHint::CreateReplacement(SpecRange, os.str()));
7743
7744       if (const CStyleCastExpr *CCast = dyn_cast<CStyleCastExpr>(E)) {
7745         // If there's already a cast present, just replace it.
7746         SourceRange CastRange(CCast->getLParenLoc(), CCast->getRParenLoc());
7747         Hints.push_back(FixItHint::CreateReplacement(CastRange, CastFix.str()));
7748
7749       } else if (!requiresParensToAddCast(E)) {
7750         // If the expression has high enough precedence,
7751         // just write the C-style cast.
7752         Hints.push_back(FixItHint::CreateInsertion(E->getLocStart(),
7753                                                    CastFix.str()));
7754       } else {
7755         // Otherwise, add parens around the expression as well as the cast.
7756         CastFix << "(";
7757         Hints.push_back(FixItHint::CreateInsertion(E->getLocStart(),
7758                                                    CastFix.str()));
7759
7760         SourceLocation After = S.getLocForEndOfToken(E->getLocEnd());
7761         Hints.push_back(FixItHint::CreateInsertion(After, ")"));
7762       }
7763
7764       if (ShouldNotPrintDirectly) {
7765         // The expression has a type that should not be printed directly.
7766         // We extract the name from the typedef because we don't want to show
7767         // the underlying type in the diagnostic.
7768         StringRef Name;
7769         if (const TypedefType *TypedefTy = dyn_cast<TypedefType>(ExprTy))
7770           Name = TypedefTy->getDecl()->getName();
7771         else
7772           Name = CastTyName;
7773         unsigned Diag = Pedantic
7774                             ? diag::warn_format_argument_needs_cast_pedantic
7775                             : diag::warn_format_argument_needs_cast;
7776         EmitFormatDiagnostic(S.PDiag(Diag) << Name << IntendedTy << IsEnum
7777                                            << E->getSourceRange(),
7778                              E->getLocStart(), /*IsStringLocation=*/false,
7779                              SpecRange, Hints);
7780       } else {
7781         // In this case, the expression could be printed using a different
7782         // specifier, but we've decided that the specifier is probably correct
7783         // and we should cast instead. Just use the normal warning message.
7784         EmitFormatDiagnostic(
7785           S.PDiag(diag::warn_format_conversion_argument_type_mismatch)
7786             << AT.getRepresentativeTypeName(S.Context) << ExprTy << IsEnum
7787             << E->getSourceRange(),
7788           E->getLocStart(), /*IsStringLocation*/false,
7789           SpecRange, Hints);
7790       }
7791     }
7792   } else {
7793     const CharSourceRange &CSR = getSpecifierRange(StartSpecifier,
7794                                                    SpecifierLen);
7795     // Since the warning for passing non-POD types to variadic functions
7796     // was deferred until now, we emit a warning for non-POD
7797     // arguments here.
7798     switch (S.isValidVarArgType(ExprTy)) {
7799     case Sema::VAK_Valid:
7800     case Sema::VAK_ValidInCXX11: {
7801       unsigned Diag =
7802           Pedantic
7803               ? diag::warn_format_conversion_argument_type_mismatch_pedantic
7804               : diag::warn_format_conversion_argument_type_mismatch;
7805
7806       EmitFormatDiagnostic(
7807           S.PDiag(Diag) << AT.getRepresentativeTypeName(S.Context) << ExprTy
7808                         << IsEnum << CSR << E->getSourceRange(),
7809           E->getLocStart(), /*IsStringLocation*/ false, CSR);
7810       break;
7811     }
7812     case Sema::VAK_Undefined:
7813     case Sema::VAK_MSVCUndefined:
7814       EmitFormatDiagnostic(
7815         S.PDiag(diag::warn_non_pod_vararg_with_format_string)
7816           << S.getLangOpts().CPlusPlus11
7817           << ExprTy
7818           << CallType
7819           << AT.getRepresentativeTypeName(S.Context)
7820           << CSR
7821           << E->getSourceRange(),
7822         E->getLocStart(), /*IsStringLocation*/false, CSR);
7823       checkForCStrMembers(AT, E);
7824       break;
7825
7826     case Sema::VAK_Invalid:
7827       if (ExprTy->isObjCObjectType())
7828         EmitFormatDiagnostic(
7829           S.PDiag(diag::err_cannot_pass_objc_interface_to_vararg_format)
7830             << S.getLangOpts().CPlusPlus11
7831             << ExprTy
7832             << CallType
7833             << AT.getRepresentativeTypeName(S.Context)
7834             << CSR
7835             << E->getSourceRange(),
7836           E->getLocStart(), /*IsStringLocation*/false, CSR);
7837       else
7838         // FIXME: If this is an initializer list, suggest removing the braces
7839         // or inserting a cast to the target type.
7840         S.Diag(E->getLocStart(), diag::err_cannot_pass_to_vararg_format)
7841           << isa<InitListExpr>(E) << ExprTy << CallType
7842           << AT.getRepresentativeTypeName(S.Context)
7843           << E->getSourceRange();
7844       break;
7845     }
7846
7847     assert(FirstDataArg + FS.getArgIndex() < CheckedVarArgs.size() &&
7848            "format string specifier index out of range");
7849     CheckedVarArgs[FirstDataArg + FS.getArgIndex()] = true;
7850   }
7851
7852   return true;
7853 }
7854
7855 //===--- CHECK: Scanf format string checking ------------------------------===//
7856
7857 namespace {
7858
7859 class CheckScanfHandler : public CheckFormatHandler {
7860 public:
7861   CheckScanfHandler(Sema &s, const FormatStringLiteral *fexpr,
7862                     const Expr *origFormatExpr, Sema::FormatStringType type,
7863                     unsigned firstDataArg, unsigned numDataArgs,
7864                     const char *beg, bool hasVAListArg,
7865                     ArrayRef<const Expr *> Args, unsigned formatIdx,
7866                     bool inFunctionCall, Sema::VariadicCallType CallType,
7867                     llvm::SmallBitVector &CheckedVarArgs,
7868                     UncoveredArgHandler &UncoveredArg)
7869       : CheckFormatHandler(s, fexpr, origFormatExpr, type, firstDataArg,
7870                            numDataArgs, beg, hasVAListArg, Args, formatIdx,
7871                            inFunctionCall, CallType, CheckedVarArgs,
7872                            UncoveredArg) {}
7873
7874   bool HandleScanfSpecifier(const analyze_scanf::ScanfSpecifier &FS,
7875                             const char *startSpecifier,
7876                             unsigned specifierLen) override;
7877
7878   bool HandleInvalidScanfConversionSpecifier(
7879           const analyze_scanf::ScanfSpecifier &FS,
7880           const char *startSpecifier,
7881           unsigned specifierLen) override;
7882
7883   void HandleIncompleteScanList(const char *start, const char *end) override;
7884 };
7885
7886 } // namespace
7887
7888 void CheckScanfHandler::HandleIncompleteScanList(const char *start,
7889                                                  const char *end) {
7890   EmitFormatDiagnostic(S.PDiag(diag::warn_scanf_scanlist_incomplete),
7891                        getLocationOfByte(end), /*IsStringLocation*/true,
7892                        getSpecifierRange(start, end - start));
7893 }
7894
7895 bool CheckScanfHandler::HandleInvalidScanfConversionSpecifier(
7896                                         const analyze_scanf::ScanfSpecifier &FS,
7897                                         const char *startSpecifier,
7898                                         unsigned specifierLen) {
7899   const analyze_scanf::ScanfConversionSpecifier &CS =
7900     FS.getConversionSpecifier();
7901
7902   return HandleInvalidConversionSpecifier(FS.getArgIndex(),
7903                                           getLocationOfByte(CS.getStart()),
7904                                           startSpecifier, specifierLen,
7905                                           CS.getStart(), CS.getLength());
7906 }
7907
7908 bool CheckScanfHandler::HandleScanfSpecifier(
7909                                        const analyze_scanf::ScanfSpecifier &FS,
7910                                        const char *startSpecifier,
7911                                        unsigned specifierLen) {
7912   using namespace analyze_scanf;
7913   using namespace analyze_format_string;
7914
7915   const ScanfConversionSpecifier &CS = FS.getConversionSpecifier();
7916
7917   // Handle case where '%' and '*' don't consume an argument.  These shouldn't
7918   // be used to decide if we are using positional arguments consistently.
7919   if (FS.consumesDataArgument()) {
7920     if (atFirstArg) {
7921       atFirstArg = false;
7922       usesPositionalArgs = FS.usesPositionalArg();
7923     }
7924     else if (usesPositionalArgs != FS.usesPositionalArg()) {
7925       HandlePositionalNonpositionalArgs(getLocationOfByte(CS.getStart()),
7926                                         startSpecifier, specifierLen);
7927       return false;
7928     }
7929   }
7930
7931   // Check if the field with is non-zero.
7932   const OptionalAmount &Amt = FS.getFieldWidth();
7933   if (Amt.getHowSpecified() == OptionalAmount::Constant) {
7934     if (Amt.getConstantAmount() == 0) {
7935       const CharSourceRange &R = getSpecifierRange(Amt.getStart(),
7936                                                    Amt.getConstantLength());
7937       EmitFormatDiagnostic(S.PDiag(diag::warn_scanf_nonzero_width),
7938                            getLocationOfByte(Amt.getStart()),
7939                            /*IsStringLocation*/true, R,
7940                            FixItHint::CreateRemoval(R));
7941     }
7942   }
7943
7944   if (!FS.consumesDataArgument()) {
7945     // FIXME: Technically specifying a precision or field width here
7946     // makes no sense.  Worth issuing a warning at some point.
7947     return true;
7948   }
7949
7950   // Consume the argument.
7951   unsigned argIndex = FS.getArgIndex();
7952   if (argIndex < NumDataArgs) {
7953       // The check to see if the argIndex is valid will come later.
7954       // We set the bit here because we may exit early from this
7955       // function if we encounter some other error.
7956     CoveredArgs.set(argIndex);
7957   }
7958
7959   // Check the length modifier is valid with the given conversion specifier.
7960   if (!FS.hasValidLengthModifier(S.getASTContext().getTargetInfo()))
7961     HandleInvalidLengthModifier(FS, CS, startSpecifier, specifierLen,
7962                                 diag::warn_format_nonsensical_length);
7963   else if (!FS.hasStandardLengthModifier())
7964     HandleNonStandardLengthModifier(FS, startSpecifier, specifierLen);
7965   else if (!FS.hasStandardLengthConversionCombination())
7966     HandleInvalidLengthModifier(FS, CS, startSpecifier, specifierLen,
7967                                 diag::warn_format_non_standard_conversion_spec);
7968
7969   if (!FS.hasStandardConversionSpecifier(S.getLangOpts()))
7970     HandleNonStandardConversionSpecifier(CS, startSpecifier, specifierLen);
7971
7972   // The remaining checks depend on the data arguments.
7973   if (HasVAListArg)
7974     return true;
7975
7976   if (!CheckNumArgs(FS, CS, startSpecifier, specifierLen, argIndex))
7977     return false;
7978
7979   // Check that the argument type matches the format specifier.
7980   const Expr *Ex = getDataArg(argIndex);
7981   if (!Ex)
7982     return true;
7983
7984   const analyze_format_string::ArgType &AT = FS.getArgType(S.Context);
7985
7986   if (!AT.isValid()) {
7987     return true;
7988   }
7989
7990   analyze_format_string::ArgType::MatchKind Match =
7991       AT.matchesType(S.Context, Ex->getType());
7992   bool Pedantic = Match == analyze_format_string::ArgType::NoMatchPedantic;
7993   if (Match == analyze_format_string::ArgType::Match)
7994     return true;
7995
7996   ScanfSpecifier fixedFS = FS;
7997   bool Success = fixedFS.fixType(Ex->getType(), Ex->IgnoreImpCasts()->getType(),
7998                                  S.getLangOpts(), S.Context);
7999
8000   unsigned Diag =
8001       Pedantic ? diag::warn_format_conversion_argument_type_mismatch_pedantic
8002                : diag::warn_format_conversion_argument_type_mismatch;
8003
8004   if (Success) {
8005     // Get the fix string from the fixed format specifier.
8006     SmallString<128> buf;
8007     llvm::raw_svector_ostream os(buf);
8008     fixedFS.toString(os);
8009
8010     EmitFormatDiagnostic(
8011         S.PDiag(Diag) << AT.getRepresentativeTypeName(S.Context)
8012                       << Ex->getType() << false << Ex->getSourceRange(),
8013         Ex->getLocStart(),
8014         /*IsStringLocation*/ false,
8015         getSpecifierRange(startSpecifier, specifierLen),
8016         FixItHint::CreateReplacement(
8017             getSpecifierRange(startSpecifier, specifierLen), os.str()));
8018   } else {
8019     EmitFormatDiagnostic(S.PDiag(Diag)
8020                              << AT.getRepresentativeTypeName(S.Context)
8021                              << Ex->getType() << false << Ex->getSourceRange(),
8022                          Ex->getLocStart(),
8023                          /*IsStringLocation*/ false,
8024                          getSpecifierRange(startSpecifier, specifierLen));
8025   }
8026
8027   return true;
8028 }
8029
8030 static void CheckFormatString(Sema &S, const FormatStringLiteral *FExpr,
8031                               const Expr *OrigFormatExpr,
8032                               ArrayRef<const Expr *> Args,
8033                               bool HasVAListArg, unsigned format_idx,
8034                               unsigned firstDataArg,
8035                               Sema::FormatStringType Type,
8036                               bool inFunctionCall,
8037                               Sema::VariadicCallType CallType,
8038                               llvm::SmallBitVector &CheckedVarArgs,
8039                               UncoveredArgHandler &UncoveredArg) {
8040   // CHECK: is the format string a wide literal?
8041   if (!FExpr->isAscii() && !FExpr->isUTF8()) {
8042     CheckFormatHandler::EmitFormatDiagnostic(
8043       S, inFunctionCall, Args[format_idx],
8044       S.PDiag(diag::warn_format_string_is_wide_literal), FExpr->getLocStart(),
8045       /*IsStringLocation*/true, OrigFormatExpr->getSourceRange());
8046     return;
8047   }
8048
8049   // Str - The format string.  NOTE: this is NOT null-terminated!
8050   StringRef StrRef = FExpr->getString();
8051   const char *Str = StrRef.data();
8052   // Account for cases where the string literal is truncated in a declaration.
8053   const ConstantArrayType *T =
8054     S.Context.getAsConstantArrayType(FExpr->getType());
8055   assert(T && "String literal not of constant array type!");
8056   size_t TypeSize = T->getSize().getZExtValue();
8057   size_t StrLen = std::min(std::max(TypeSize, size_t(1)) - 1, StrRef.size());
8058   const unsigned numDataArgs = Args.size() - firstDataArg;
8059
8060   // Emit a warning if the string literal is truncated and does not contain an
8061   // embedded null character.
8062   if (TypeSize <= StrRef.size() &&
8063       StrRef.substr(0, TypeSize).find('\0') == StringRef::npos) {
8064     CheckFormatHandler::EmitFormatDiagnostic(
8065         S, inFunctionCall, Args[format_idx],
8066         S.PDiag(diag::warn_printf_format_string_not_null_terminated),
8067         FExpr->getLocStart(),
8068         /*IsStringLocation=*/true, OrigFormatExpr->getSourceRange());
8069     return;
8070   }
8071
8072   // CHECK: empty format string?
8073   if (StrLen == 0 && numDataArgs > 0) {
8074     CheckFormatHandler::EmitFormatDiagnostic(
8075       S, inFunctionCall, Args[format_idx],
8076       S.PDiag(diag::warn_empty_format_string), FExpr->getLocStart(),
8077       /*IsStringLocation*/true, OrigFormatExpr->getSourceRange());
8078     return;
8079   }
8080
8081   if (Type == Sema::FST_Printf || Type == Sema::FST_NSString ||
8082       Type == Sema::FST_FreeBSDKPrintf || Type == Sema::FST_OSLog ||
8083       Type == Sema::FST_OSTrace) {
8084     CheckPrintfHandler H(
8085         S, FExpr, OrigFormatExpr, Type, firstDataArg, numDataArgs,
8086         (Type == Sema::FST_NSString || Type == Sema::FST_OSTrace), Str,
8087         HasVAListArg, Args, format_idx, inFunctionCall, CallType,
8088         CheckedVarArgs, UncoveredArg);
8089
8090     if (!analyze_format_string::ParsePrintfString(H, Str, Str + StrLen,
8091                                                   S.getLangOpts(),
8092                                                   S.Context.getTargetInfo(),
8093                                             Type == Sema::FST_FreeBSDKPrintf))
8094       H.DoneProcessing();
8095   } else if (Type == Sema::FST_Scanf) {
8096     CheckScanfHandler H(S, FExpr, OrigFormatExpr, Type, firstDataArg,
8097                         numDataArgs, Str, HasVAListArg, Args, format_idx,
8098                         inFunctionCall, CallType, CheckedVarArgs, UncoveredArg);
8099
8100     if (!analyze_format_string::ParseScanfString(H, Str, Str + StrLen,
8101                                                  S.getLangOpts(),
8102                                                  S.Context.getTargetInfo()))
8103       H.DoneProcessing();
8104   } // TODO: handle other formats
8105 }
8106
8107 bool Sema::FormatStringHasSArg(const StringLiteral *FExpr) {
8108   // Str - The format string.  NOTE: this is NOT null-terminated!
8109   StringRef StrRef = FExpr->getString();
8110   const char *Str = StrRef.data();
8111   // Account for cases where the string literal is truncated in a declaration.
8112   const ConstantArrayType *T = Context.getAsConstantArrayType(FExpr->getType());
8113   assert(T && "String literal not of constant array type!");
8114   size_t TypeSize = T->getSize().getZExtValue();
8115   size_t StrLen = std::min(std::max(TypeSize, size_t(1)) - 1, StrRef.size());
8116   return analyze_format_string::ParseFormatStringHasSArg(Str, Str + StrLen,
8117                                                          getLangOpts(),
8118                                                          Context.getTargetInfo());
8119 }
8120
8121 //===--- CHECK: Warn on use of wrong absolute value function. -------------===//
8122
8123 // Returns the related absolute value function that is larger, of 0 if one
8124 // does not exist.
8125 static unsigned getLargerAbsoluteValueFunction(unsigned AbsFunction) {
8126   switch (AbsFunction) {
8127   default:
8128     return 0;
8129
8130   case Builtin::BI__builtin_abs:
8131     return Builtin::BI__builtin_labs;
8132   case Builtin::BI__builtin_labs:
8133     return Builtin::BI__builtin_llabs;
8134   case Builtin::BI__builtin_llabs:
8135     return 0;
8136
8137   case Builtin::BI__builtin_fabsf:
8138     return Builtin::BI__builtin_fabs;
8139   case Builtin::BI__builtin_fabs:
8140     return Builtin::BI__builtin_fabsl;
8141   case Builtin::BI__builtin_fabsl:
8142     return 0;
8143
8144   case Builtin::BI__builtin_cabsf:
8145     return Builtin::BI__builtin_cabs;
8146   case Builtin::BI__builtin_cabs:
8147     return Builtin::BI__builtin_cabsl;
8148   case Builtin::BI__builtin_cabsl:
8149     return 0;
8150
8151   case Builtin::BIabs:
8152     return Builtin::BIlabs;
8153   case Builtin::BIlabs:
8154     return Builtin::BIllabs;
8155   case Builtin::BIllabs:
8156     return 0;
8157
8158   case Builtin::BIfabsf:
8159     return Builtin::BIfabs;
8160   case Builtin::BIfabs:
8161     return Builtin::BIfabsl;
8162   case Builtin::BIfabsl:
8163     return 0;
8164
8165   case Builtin::BIcabsf:
8166    return Builtin::BIcabs;
8167   case Builtin::BIcabs:
8168     return Builtin::BIcabsl;
8169   case Builtin::BIcabsl:
8170     return 0;
8171   }
8172 }
8173
8174 // Returns the argument type of the absolute value function.
8175 static QualType getAbsoluteValueArgumentType(ASTContext &Context,
8176                                              unsigned AbsType) {
8177   if (AbsType == 0)
8178     return QualType();
8179
8180   ASTContext::GetBuiltinTypeError Error = ASTContext::GE_None;
8181   QualType BuiltinType = Context.GetBuiltinType(AbsType, Error);
8182   if (Error != ASTContext::GE_None)
8183     return QualType();
8184
8185   const FunctionProtoType *FT = BuiltinType->getAs<FunctionProtoType>();
8186   if (!FT)
8187     return QualType();
8188
8189   if (FT->getNumParams() != 1)
8190     return QualType();
8191
8192   return FT->getParamType(0);
8193 }
8194
8195 // Returns the best absolute value function, or zero, based on type and
8196 // current absolute value function.
8197 static unsigned getBestAbsFunction(ASTContext &Context, QualType ArgType,
8198                                    unsigned AbsFunctionKind) {
8199   unsigned BestKind = 0;
8200   uint64_t ArgSize = Context.getTypeSize(ArgType);
8201   for (unsigned Kind = AbsFunctionKind; Kind != 0;
8202        Kind = getLargerAbsoluteValueFunction(Kind)) {
8203     QualType ParamType = getAbsoluteValueArgumentType(Context, Kind);
8204     if (Context.getTypeSize(ParamType) >= ArgSize) {
8205       if (BestKind == 0)
8206         BestKind = Kind;
8207       else if (Context.hasSameType(ParamType, ArgType)) {
8208         BestKind = Kind;
8209         break;
8210       }
8211     }
8212   }
8213   return BestKind;
8214 }
8215
8216 enum AbsoluteValueKind {
8217   AVK_Integer,
8218   AVK_Floating,
8219   AVK_Complex
8220 };
8221
8222 static AbsoluteValueKind getAbsoluteValueKind(QualType T) {
8223   if (T->isIntegralOrEnumerationType())
8224     return AVK_Integer;
8225   if (T->isRealFloatingType())
8226     return AVK_Floating;
8227   if (T->isAnyComplexType())
8228     return AVK_Complex;
8229
8230   llvm_unreachable("Type not integer, floating, or complex");
8231 }
8232
8233 // Changes the absolute value function to a different type.  Preserves whether
8234 // the function is a builtin.
8235 static unsigned changeAbsFunction(unsigned AbsKind,
8236                                   AbsoluteValueKind ValueKind) {
8237   switch (ValueKind) {
8238   case AVK_Integer:
8239     switch (AbsKind) {
8240     default:
8241       return 0;
8242     case Builtin::BI__builtin_fabsf:
8243     case Builtin::BI__builtin_fabs:
8244     case Builtin::BI__builtin_fabsl:
8245     case Builtin::BI__builtin_cabsf:
8246     case Builtin::BI__builtin_cabs:
8247     case Builtin::BI__builtin_cabsl:
8248       return Builtin::BI__builtin_abs;
8249     case Builtin::BIfabsf:
8250     case Builtin::BIfabs:
8251     case Builtin::BIfabsl:
8252     case Builtin::BIcabsf:
8253     case Builtin::BIcabs:
8254     case Builtin::BIcabsl:
8255       return Builtin::BIabs;
8256     }
8257   case AVK_Floating:
8258     switch (AbsKind) {
8259     default:
8260       return 0;
8261     case Builtin::BI__builtin_abs:
8262     case Builtin::BI__builtin_labs:
8263     case Builtin::BI__builtin_llabs:
8264     case Builtin::BI__builtin_cabsf:
8265     case Builtin::BI__builtin_cabs:
8266     case Builtin::BI__builtin_cabsl:
8267       return Builtin::BI__builtin_fabsf;
8268     case Builtin::BIabs:
8269     case Builtin::BIlabs:
8270     case Builtin::BIllabs:
8271     case Builtin::BIcabsf:
8272     case Builtin::BIcabs:
8273     case Builtin::BIcabsl:
8274       return Builtin::BIfabsf;
8275     }
8276   case AVK_Complex:
8277     switch (AbsKind) {
8278     default:
8279       return 0;
8280     case Builtin::BI__builtin_abs:
8281     case Builtin::BI__builtin_labs:
8282     case Builtin::BI__builtin_llabs:
8283     case Builtin::BI__builtin_fabsf:
8284     case Builtin::BI__builtin_fabs:
8285     case Builtin::BI__builtin_fabsl:
8286       return Builtin::BI__builtin_cabsf;
8287     case Builtin::BIabs:
8288     case Builtin::BIlabs:
8289     case Builtin::BIllabs:
8290     case Builtin::BIfabsf:
8291     case Builtin::BIfabs:
8292     case Builtin::BIfabsl:
8293       return Builtin::BIcabsf;
8294     }
8295   }
8296   llvm_unreachable("Unable to convert function");
8297 }
8298
8299 static unsigned getAbsoluteValueFunctionKind(const FunctionDecl *FDecl) {
8300   const IdentifierInfo *FnInfo = FDecl->getIdentifier();
8301   if (!FnInfo)
8302     return 0;
8303
8304   switch (FDecl->getBuiltinID()) {
8305   default:
8306     return 0;
8307   case Builtin::BI__builtin_abs:
8308   case Builtin::BI__builtin_fabs:
8309   case Builtin::BI__builtin_fabsf:
8310   case Builtin::BI__builtin_fabsl:
8311   case Builtin::BI__builtin_labs:
8312   case Builtin::BI__builtin_llabs:
8313   case Builtin::BI__builtin_cabs:
8314   case Builtin::BI__builtin_cabsf:
8315   case Builtin::BI__builtin_cabsl:
8316   case Builtin::BIabs:
8317   case Builtin::BIlabs:
8318   case Builtin::BIllabs:
8319   case Builtin::BIfabs:
8320   case Builtin::BIfabsf:
8321   case Builtin::BIfabsl:
8322   case Builtin::BIcabs:
8323   case Builtin::BIcabsf:
8324   case Builtin::BIcabsl:
8325     return FDecl->getBuiltinID();
8326   }
8327   llvm_unreachable("Unknown Builtin type");
8328 }
8329
8330 // If the replacement is valid, emit a note with replacement function.
8331 // Additionally, suggest including the proper header if not already included.
8332 static void emitReplacement(Sema &S, SourceLocation Loc, SourceRange Range,
8333                             unsigned AbsKind, QualType ArgType) {
8334   bool EmitHeaderHint = true;
8335   const char *HeaderName = nullptr;
8336   const char *FunctionName = nullptr;
8337   if (S.getLangOpts().CPlusPlus && !ArgType->isAnyComplexType()) {
8338     FunctionName = "std::abs";
8339     if (ArgType->isIntegralOrEnumerationType()) {
8340       HeaderName = "cstdlib";
8341     } else if (ArgType->isRealFloatingType()) {
8342       HeaderName = "cmath";
8343     } else {
8344       llvm_unreachable("Invalid Type");
8345     }
8346
8347     // Lookup all std::abs
8348     if (NamespaceDecl *Std = S.getStdNamespace()) {
8349       LookupResult R(S, &S.Context.Idents.get("abs"), Loc, Sema::LookupAnyName);
8350       R.suppressDiagnostics();
8351       S.LookupQualifiedName(R, Std);
8352
8353       for (const auto *I : R) {
8354         const FunctionDecl *FDecl = nullptr;
8355         if (const UsingShadowDecl *UsingD = dyn_cast<UsingShadowDecl>(I)) {
8356           FDecl = dyn_cast<FunctionDecl>(UsingD->getTargetDecl());
8357         } else {
8358           FDecl = dyn_cast<FunctionDecl>(I);
8359         }
8360         if (!FDecl)
8361           continue;
8362
8363         // Found std::abs(), check that they are the right ones.
8364         if (FDecl->getNumParams() != 1)
8365           continue;
8366
8367         // Check that the parameter type can handle the argument.
8368         QualType ParamType = FDecl->getParamDecl(0)->getType();
8369         if (getAbsoluteValueKind(ArgType) == getAbsoluteValueKind(ParamType) &&
8370             S.Context.getTypeSize(ArgType) <=
8371                 S.Context.getTypeSize(ParamType)) {
8372           // Found a function, don't need the header hint.
8373           EmitHeaderHint = false;
8374           break;
8375         }
8376       }
8377     }
8378   } else {
8379     FunctionName = S.Context.BuiltinInfo.getName(AbsKind);
8380     HeaderName = S.Context.BuiltinInfo.getHeaderName(AbsKind);
8381
8382     if (HeaderName) {
8383       DeclarationName DN(&S.Context.Idents.get(FunctionName));
8384       LookupResult R(S, DN, Loc, Sema::LookupAnyName);
8385       R.suppressDiagnostics();
8386       S.LookupName(R, S.getCurScope());
8387
8388       if (R.isSingleResult()) {
8389         FunctionDecl *FD = dyn_cast<FunctionDecl>(R.getFoundDecl());
8390         if (FD && FD->getBuiltinID() == AbsKind) {
8391           EmitHeaderHint = false;
8392         } else {
8393           return;
8394         }
8395       } else if (!R.empty()) {
8396         return;
8397       }
8398     }
8399   }
8400
8401   S.Diag(Loc, diag::note_replace_abs_function)
8402       << FunctionName << FixItHint::CreateReplacement(Range, FunctionName);
8403
8404   if (!HeaderName)
8405     return;
8406
8407   if (!EmitHeaderHint)
8408     return;
8409
8410   S.Diag(Loc, diag::note_include_header_or_declare) << HeaderName
8411                                                     << FunctionName;
8412 }
8413
8414 template <std::size_t StrLen>
8415 static bool IsStdFunction(const FunctionDecl *FDecl,
8416                           const char (&Str)[StrLen]) {
8417   if (!FDecl)
8418     return false;
8419   if (!FDecl->getIdentifier() || !FDecl->getIdentifier()->isStr(Str))
8420     return false;
8421   if (!FDecl->isInStdNamespace())
8422     return false;
8423
8424   return true;
8425 }
8426
8427 // Warn when using the wrong abs() function.
8428 void Sema::CheckAbsoluteValueFunction(const CallExpr *Call,
8429                                       const FunctionDecl *FDecl) {
8430   if (Call->getNumArgs() != 1)
8431     return;
8432
8433   unsigned AbsKind = getAbsoluteValueFunctionKind(FDecl);
8434   bool IsStdAbs = IsStdFunction(FDecl, "abs");
8435   if (AbsKind == 0 && !IsStdAbs)
8436     return;
8437
8438   QualType ArgType = Call->getArg(0)->IgnoreParenImpCasts()->getType();
8439   QualType ParamType = Call->getArg(0)->getType();
8440
8441   // Unsigned types cannot be negative.  Suggest removing the absolute value
8442   // function call.
8443   if (ArgType->isUnsignedIntegerType()) {
8444     const char *FunctionName =
8445         IsStdAbs ? "std::abs" : Context.BuiltinInfo.getName(AbsKind);
8446     Diag(Call->getExprLoc(), diag::warn_unsigned_abs) << ArgType << ParamType;
8447     Diag(Call->getExprLoc(), diag::note_remove_abs)
8448         << FunctionName
8449         << FixItHint::CreateRemoval(Call->getCallee()->getSourceRange());
8450     return;
8451   }
8452
8453   // Taking the absolute value of a pointer is very suspicious, they probably
8454   // wanted to index into an array, dereference a pointer, call a function, etc.
8455   if (ArgType->isPointerType() || ArgType->canDecayToPointerType()) {
8456     unsigned DiagType = 0;
8457     if (ArgType->isFunctionType())
8458       DiagType = 1;
8459     else if (ArgType->isArrayType())
8460       DiagType = 2;
8461
8462     Diag(Call->getExprLoc(), diag::warn_pointer_abs) << DiagType << ArgType;
8463     return;
8464   }
8465
8466   // std::abs has overloads which prevent most of the absolute value problems
8467   // from occurring.
8468   if (IsStdAbs)
8469     return;
8470
8471   AbsoluteValueKind ArgValueKind = getAbsoluteValueKind(ArgType);
8472   AbsoluteValueKind ParamValueKind = getAbsoluteValueKind(ParamType);
8473
8474   // The argument and parameter are the same kind.  Check if they are the right
8475   // size.
8476   if (ArgValueKind == ParamValueKind) {
8477     if (Context.getTypeSize(ArgType) <= Context.getTypeSize(ParamType))
8478       return;
8479
8480     unsigned NewAbsKind = getBestAbsFunction(Context, ArgType, AbsKind);
8481     Diag(Call->getExprLoc(), diag::warn_abs_too_small)
8482         << FDecl << ArgType << ParamType;
8483
8484     if (NewAbsKind == 0)
8485       return;
8486
8487     emitReplacement(*this, Call->getExprLoc(),
8488                     Call->getCallee()->getSourceRange(), NewAbsKind, ArgType);
8489     return;
8490   }
8491
8492   // ArgValueKind != ParamValueKind
8493   // The wrong type of absolute value function was used.  Attempt to find the
8494   // proper one.
8495   unsigned NewAbsKind = changeAbsFunction(AbsKind, ArgValueKind);
8496   NewAbsKind = getBestAbsFunction(Context, ArgType, NewAbsKind);
8497   if (NewAbsKind == 0)
8498     return;
8499
8500   Diag(Call->getExprLoc(), diag::warn_wrong_absolute_value_type)
8501       << FDecl << ParamValueKind << ArgValueKind;
8502
8503   emitReplacement(*this, Call->getExprLoc(),
8504                   Call->getCallee()->getSourceRange(), NewAbsKind, ArgType);
8505 }
8506
8507 //===--- CHECK: Warn on use of std::max and unsigned zero. r---------------===//
8508 void Sema::CheckMaxUnsignedZero(const CallExpr *Call,
8509                                 const FunctionDecl *FDecl) {
8510   if (!Call || !FDecl) return;
8511
8512   // Ignore template specializations and macros.
8513   if (inTemplateInstantiation()) return;
8514   if (Call->getExprLoc().isMacroID()) return;
8515
8516   // Only care about the one template argument, two function parameter std::max
8517   if (Call->getNumArgs() != 2) return;
8518   if (!IsStdFunction(FDecl, "max")) return;
8519   const auto * ArgList = FDecl->getTemplateSpecializationArgs();
8520   if (!ArgList) return;
8521   if (ArgList->size() != 1) return;
8522
8523   // Check that template type argument is unsigned integer.
8524   const auto& TA = ArgList->get(0);
8525   if (TA.getKind() != TemplateArgument::Type) return;
8526   QualType ArgType = TA.getAsType();
8527   if (!ArgType->isUnsignedIntegerType()) return;
8528
8529   // See if either argument is a literal zero.
8530   auto IsLiteralZeroArg = [](const Expr* E) -> bool {
8531     const auto *MTE = dyn_cast<MaterializeTemporaryExpr>(E);
8532     if (!MTE) return false;
8533     const auto *Num = dyn_cast<IntegerLiteral>(MTE->GetTemporaryExpr());
8534     if (!Num) return false;
8535     if (Num->getValue() != 0) return false;
8536     return true;
8537   };
8538
8539   const Expr *FirstArg = Call->getArg(0);
8540   const Expr *SecondArg = Call->getArg(1);
8541   const bool IsFirstArgZero = IsLiteralZeroArg(FirstArg);
8542   const bool IsSecondArgZero = IsLiteralZeroArg(SecondArg);
8543
8544   // Only warn when exactly one argument is zero.
8545   if (IsFirstArgZero == IsSecondArgZero) return;
8546
8547   SourceRange FirstRange = FirstArg->getSourceRange();
8548   SourceRange SecondRange = SecondArg->getSourceRange();
8549
8550   SourceRange ZeroRange = IsFirstArgZero ? FirstRange : SecondRange;
8551
8552   Diag(Call->getExprLoc(), diag::warn_max_unsigned_zero)
8553       << IsFirstArgZero << Call->getCallee()->getSourceRange() << ZeroRange;
8554
8555   // Deduce what parts to remove so that "std::max(0u, foo)" becomes "(foo)".
8556   SourceRange RemovalRange;
8557   if (IsFirstArgZero) {
8558     RemovalRange = SourceRange(FirstRange.getBegin(),
8559                                SecondRange.getBegin().getLocWithOffset(-1));
8560   } else {
8561     RemovalRange = SourceRange(getLocForEndOfToken(FirstRange.getEnd()),
8562                                SecondRange.getEnd());
8563   }
8564
8565   Diag(Call->getExprLoc(), diag::note_remove_max_call)
8566         << FixItHint::CreateRemoval(Call->getCallee()->getSourceRange())
8567         << FixItHint::CreateRemoval(RemovalRange);
8568 }
8569
8570 //===--- CHECK: Standard memory functions ---------------------------------===//
8571
8572 /// Takes the expression passed to the size_t parameter of functions
8573 /// such as memcmp, strncat, etc and warns if it's a comparison.
8574 ///
8575 /// This is to catch typos like `if (memcmp(&a, &b, sizeof(a) > 0))`.
8576 static bool CheckMemorySizeofForComparison(Sema &S, const Expr *E,
8577                                            IdentifierInfo *FnName,
8578                                            SourceLocation FnLoc,
8579                                            SourceLocation RParenLoc) {
8580   const BinaryOperator *Size = dyn_cast<BinaryOperator>(E);
8581   if (!Size)
8582     return false;
8583
8584   // if E is binop and op is <=>, >, <, >=, <=, ==, &&, ||:
8585   if (!Size->isComparisonOp() && !Size->isLogicalOp())
8586     return false;
8587
8588   SourceRange SizeRange = Size->getSourceRange();
8589   S.Diag(Size->getOperatorLoc(), diag::warn_memsize_comparison)
8590       << SizeRange << FnName;
8591   S.Diag(FnLoc, diag::note_memsize_comparison_paren)
8592       << FnName << FixItHint::CreateInsertion(
8593                        S.getLocForEndOfToken(Size->getLHS()->getLocEnd()), ")")
8594       << FixItHint::CreateRemoval(RParenLoc);
8595   S.Diag(SizeRange.getBegin(), diag::note_memsize_comparison_cast_silence)
8596       << FixItHint::CreateInsertion(SizeRange.getBegin(), "(size_t)(")
8597       << FixItHint::CreateInsertion(S.getLocForEndOfToken(SizeRange.getEnd()),
8598                                     ")");
8599
8600   return true;
8601 }
8602
8603 /// Determine whether the given type is or contains a dynamic class type
8604 /// (e.g., whether it has a vtable).
8605 static const CXXRecordDecl *getContainedDynamicClass(QualType T,
8606                                                      bool &IsContained) {
8607   // Look through array types while ignoring qualifiers.
8608   const Type *Ty = T->getBaseElementTypeUnsafe();
8609   IsContained = false;
8610
8611   const CXXRecordDecl *RD = Ty->getAsCXXRecordDecl();
8612   RD = RD ? RD->getDefinition() : nullptr;
8613   if (!RD || RD->isInvalidDecl())
8614     return nullptr;
8615
8616   if (RD->isDynamicClass())
8617     return RD;
8618
8619   // Check all the fields.  If any bases were dynamic, the class is dynamic.
8620   // It's impossible for a class to transitively contain itself by value, so
8621   // infinite recursion is impossible.
8622   for (auto *FD : RD->fields()) {
8623     bool SubContained;
8624     if (const CXXRecordDecl *ContainedRD =
8625             getContainedDynamicClass(FD->getType(), SubContained)) {
8626       IsContained = true;
8627       return ContainedRD;
8628     }
8629   }
8630
8631   return nullptr;
8632 }
8633
8634 static const UnaryExprOrTypeTraitExpr *getAsSizeOfExpr(const Expr *E) {
8635   if (const auto *Unary = dyn_cast<UnaryExprOrTypeTraitExpr>(E))
8636     if (Unary->getKind() == UETT_SizeOf)
8637       return Unary;
8638   return nullptr;
8639 }
8640
8641 /// If E is a sizeof expression, returns its argument expression,
8642 /// otherwise returns NULL.
8643 static const Expr *getSizeOfExprArg(const Expr *E) {
8644   if (const UnaryExprOrTypeTraitExpr *SizeOf = getAsSizeOfExpr(E))
8645     if (!SizeOf->isArgumentType())
8646       return SizeOf->getArgumentExpr()->IgnoreParenImpCasts();
8647   return nullptr;
8648 }
8649
8650 /// If E is a sizeof expression, returns its argument type.
8651 static QualType getSizeOfArgType(const Expr *E) {
8652   if (const UnaryExprOrTypeTraitExpr *SizeOf = getAsSizeOfExpr(E))
8653     return SizeOf->getTypeOfArgument();
8654   return QualType();
8655 }
8656
8657 namespace {
8658
8659 struct SearchNonTrivialToInitializeField
8660     : DefaultInitializedTypeVisitor<SearchNonTrivialToInitializeField> {
8661   using Super =
8662       DefaultInitializedTypeVisitor<SearchNonTrivialToInitializeField>;
8663
8664   SearchNonTrivialToInitializeField(const Expr *E, Sema &S) : E(E), S(S) {}
8665
8666   void visitWithKind(QualType::PrimitiveDefaultInitializeKind PDIK, QualType FT,
8667                      SourceLocation SL) {
8668     if (const auto *AT = asDerived().getContext().getAsArrayType(FT)) {
8669       asDerived().visitArray(PDIK, AT, SL);
8670       return;
8671     }
8672
8673     Super::visitWithKind(PDIK, FT, SL);
8674   }
8675
8676   void visitARCStrong(QualType FT, SourceLocation SL) {
8677     S.DiagRuntimeBehavior(SL, E, S.PDiag(diag::note_nontrivial_field) << 1);
8678   }
8679   void visitARCWeak(QualType FT, SourceLocation SL) {
8680     S.DiagRuntimeBehavior(SL, E, S.PDiag(diag::note_nontrivial_field) << 1);
8681   }
8682   void visitStruct(QualType FT, SourceLocation SL) {
8683     for (const FieldDecl *FD : FT->castAs<RecordType>()->getDecl()->fields())
8684       visit(FD->getType(), FD->getLocation());
8685   }
8686   void visitArray(QualType::PrimitiveDefaultInitializeKind PDIK,
8687                   const ArrayType *AT, SourceLocation SL) {
8688     visit(getContext().getBaseElementType(AT), SL);
8689   }
8690   void visitTrivial(QualType FT, SourceLocation SL) {}
8691
8692   static void diag(QualType RT, const Expr *E, Sema &S) {
8693     SearchNonTrivialToInitializeField(E, S).visitStruct(RT, SourceLocation());
8694   }
8695
8696   ASTContext &getContext() { return S.getASTContext(); }
8697
8698   const Expr *E;
8699   Sema &S;
8700 };
8701
8702 struct SearchNonTrivialToCopyField
8703     : CopiedTypeVisitor<SearchNonTrivialToCopyField, false> {
8704   using Super = CopiedTypeVisitor<SearchNonTrivialToCopyField, false>;
8705
8706   SearchNonTrivialToCopyField(const Expr *E, Sema &S) : E(E), S(S) {}
8707
8708   void visitWithKind(QualType::PrimitiveCopyKind PCK, QualType FT,
8709                      SourceLocation SL) {
8710     if (const auto *AT = asDerived().getContext().getAsArrayType(FT)) {
8711       asDerived().visitArray(PCK, AT, SL);
8712       return;
8713     }
8714
8715     Super::visitWithKind(PCK, FT, SL);
8716   }
8717
8718   void visitARCStrong(QualType FT, SourceLocation SL) {
8719     S.DiagRuntimeBehavior(SL, E, S.PDiag(diag::note_nontrivial_field) << 0);
8720   }
8721   void visitARCWeak(QualType FT, SourceLocation SL) {
8722     S.DiagRuntimeBehavior(SL, E, S.PDiag(diag::note_nontrivial_field) << 0);
8723   }
8724   void visitStruct(QualType FT, SourceLocation SL) {
8725     for (const FieldDecl *FD : FT->castAs<RecordType>()->getDecl()->fields())
8726       visit(FD->getType(), FD->getLocation());
8727   }
8728   void visitArray(QualType::PrimitiveCopyKind PCK, const ArrayType *AT,
8729                   SourceLocation SL) {
8730     visit(getContext().getBaseElementType(AT), SL);
8731   }
8732   void preVisit(QualType::PrimitiveCopyKind PCK, QualType FT,
8733                 SourceLocation SL) {}
8734   void visitTrivial(QualType FT, SourceLocation SL) {}
8735   void visitVolatileTrivial(QualType FT, SourceLocation SL) {}
8736
8737   static void diag(QualType RT, const Expr *E, Sema &S) {
8738     SearchNonTrivialToCopyField(E, S).visitStruct(RT, SourceLocation());
8739   }
8740
8741   ASTContext &getContext() { return S.getASTContext(); }
8742
8743   const Expr *E;
8744   Sema &S;
8745 };
8746
8747 }
8748
8749 /// Detect if \c SizeofExpr is likely to calculate the sizeof an object.
8750 static bool doesExprLikelyComputeSize(const Expr *SizeofExpr) {
8751   SizeofExpr = SizeofExpr->IgnoreParenImpCasts();
8752
8753   if (const auto *BO = dyn_cast<BinaryOperator>(SizeofExpr)) {
8754     if (BO->getOpcode() != BO_Mul && BO->getOpcode() != BO_Add)
8755       return false;
8756
8757     return doesExprLikelyComputeSize(BO->getLHS()) ||
8758            doesExprLikelyComputeSize(BO->getRHS());
8759   }
8760
8761   return getAsSizeOfExpr(SizeofExpr) != nullptr;
8762 }
8763
8764 /// Check if the ArgLoc originated from a macro passed to the call at CallLoc.
8765 ///
8766 /// \code
8767 ///   #define MACRO 0
8768 ///   foo(MACRO);
8769 ///   foo(0);
8770 /// \endcode
8771 ///
8772 /// This should return true for the first call to foo, but not for the second
8773 /// (regardless of whether foo is a macro or function).
8774 static bool isArgumentExpandedFromMacro(SourceManager &SM,
8775                                         SourceLocation CallLoc,
8776                                         SourceLocation ArgLoc) {
8777   if (!CallLoc.isMacroID())
8778     return SM.getFileID(CallLoc) != SM.getFileID(ArgLoc);
8779
8780   return SM.getFileID(SM.getImmediateMacroCallerLoc(CallLoc)) !=
8781          SM.getFileID(SM.getImmediateMacroCallerLoc(ArgLoc));
8782 }
8783
8784 /// Diagnose cases like 'memset(buf, sizeof(buf), 0)', which should have the
8785 /// last two arguments transposed.
8786 static void CheckMemaccessSize(Sema &S, unsigned BId, const CallExpr *Call) {
8787   if (BId != Builtin::BImemset && BId != Builtin::BIbzero)
8788     return;
8789
8790   const Expr *SizeArg =
8791     Call->getArg(BId == Builtin::BImemset ? 2 : 1)->IgnoreImpCasts();
8792
8793   auto isLiteralZero = [](const Expr *E) {
8794     return isa<IntegerLiteral>(E) && cast<IntegerLiteral>(E)->getValue() == 0;
8795   };
8796
8797   // If we're memsetting or bzeroing 0 bytes, then this is likely an error.
8798   SourceLocation CallLoc = Call->getRParenLoc();
8799   SourceManager &SM = S.getSourceManager();
8800   if (isLiteralZero(SizeArg) &&
8801       !isArgumentExpandedFromMacro(SM, CallLoc, SizeArg->getExprLoc())) {
8802
8803     SourceLocation DiagLoc = SizeArg->getExprLoc();
8804
8805     // Some platforms #define bzero to __builtin_memset. See if this is the
8806     // case, and if so, emit a better diagnostic.
8807     if (BId == Builtin::BIbzero ||
8808         (CallLoc.isMacroID() && Lexer::getImmediateMacroName(
8809                                     CallLoc, SM, S.getLangOpts()) == "bzero")) {
8810       S.Diag(DiagLoc, diag::warn_suspicious_bzero_size);
8811       S.Diag(DiagLoc, diag::note_suspicious_bzero_size_silence);
8812     } else if (!isLiteralZero(Call->getArg(1)->IgnoreImpCasts())) {
8813       S.Diag(DiagLoc, diag::warn_suspicious_sizeof_memset) << 0;
8814       S.Diag(DiagLoc, diag::note_suspicious_sizeof_memset_silence) << 0;
8815     }
8816     return;
8817   }
8818
8819   // If the second argument to a memset is a sizeof expression and the third
8820   // isn't, this is also likely an error. This should catch
8821   // 'memset(buf, sizeof(buf), 0xff)'.
8822   if (BId == Builtin::BImemset &&
8823       doesExprLikelyComputeSize(Call->getArg(1)) &&
8824       !doesExprLikelyComputeSize(Call->getArg(2))) {
8825     SourceLocation DiagLoc = Call->getArg(1)->getExprLoc();
8826     S.Diag(DiagLoc, diag::warn_suspicious_sizeof_memset) << 1;
8827     S.Diag(DiagLoc, diag::note_suspicious_sizeof_memset_silence) << 1;
8828     return;
8829   }
8830 }
8831
8832 /// Check for dangerous or invalid arguments to memset().
8833 ///
8834 /// This issues warnings on known problematic, dangerous or unspecified
8835 /// arguments to the standard 'memset', 'memcpy', 'memmove', and 'memcmp'
8836 /// function calls.
8837 ///
8838 /// \param Call The call expression to diagnose.
8839 void Sema::CheckMemaccessArguments(const CallExpr *Call,
8840                                    unsigned BId,
8841                                    IdentifierInfo *FnName) {
8842   assert(BId != 0);
8843
8844   // It is possible to have a non-standard definition of memset.  Validate
8845   // we have enough arguments, and if not, abort further checking.
8846   unsigned ExpectedNumArgs =
8847       (BId == Builtin::BIstrndup || BId == Builtin::BIbzero ? 2 : 3);
8848   if (Call->getNumArgs() < ExpectedNumArgs)
8849     return;
8850
8851   unsigned LastArg = (BId == Builtin::BImemset || BId == Builtin::BIbzero ||
8852                       BId == Builtin::BIstrndup ? 1 : 2);
8853   unsigned LenArg =
8854       (BId == Builtin::BIbzero || BId == Builtin::BIstrndup ? 1 : 2);
8855   const Expr *LenExpr = Call->getArg(LenArg)->IgnoreParenImpCasts();
8856
8857   if (CheckMemorySizeofForComparison(*this, LenExpr, FnName,
8858                                      Call->getLocStart(), Call->getRParenLoc()))
8859     return;
8860
8861   // Catch cases like 'memset(buf, sizeof(buf), 0)'.
8862   CheckMemaccessSize(*this, BId, Call);
8863
8864   // We have special checking when the length is a sizeof expression.
8865   QualType SizeOfArgTy = getSizeOfArgType(LenExpr);
8866   const Expr *SizeOfArg = getSizeOfExprArg(LenExpr);
8867   llvm::FoldingSetNodeID SizeOfArgID;
8868
8869   // Although widely used, 'bzero' is not a standard function. Be more strict
8870   // with the argument types before allowing diagnostics and only allow the
8871   // form bzero(ptr, sizeof(...)).
8872   QualType FirstArgTy = Call->getArg(0)->IgnoreParenImpCasts()->getType();
8873   if (BId == Builtin::BIbzero && !FirstArgTy->getAs<PointerType>())
8874     return;
8875
8876   for (unsigned ArgIdx = 0; ArgIdx != LastArg; ++ArgIdx) {
8877     const Expr *Dest = Call->getArg(ArgIdx)->IgnoreParenImpCasts();
8878     SourceRange ArgRange = Call->getArg(ArgIdx)->getSourceRange();
8879
8880     QualType DestTy = Dest->getType();
8881     QualType PointeeTy;
8882     if (const PointerType *DestPtrTy = DestTy->getAs<PointerType>()) {
8883       PointeeTy = DestPtrTy->getPointeeType();
8884
8885       // Never warn about void type pointers. This can be used to suppress
8886       // false positives.
8887       if (PointeeTy->isVoidType())
8888         continue;
8889
8890       // Catch "memset(p, 0, sizeof(p))" -- needs to be sizeof(*p). Do this by
8891       // actually comparing the expressions for equality. Because computing the
8892       // expression IDs can be expensive, we only do this if the diagnostic is
8893       // enabled.
8894       if (SizeOfArg &&
8895           !Diags.isIgnored(diag::warn_sizeof_pointer_expr_memaccess,
8896                            SizeOfArg->getExprLoc())) {
8897         // We only compute IDs for expressions if the warning is enabled, and
8898         // cache the sizeof arg's ID.
8899         if (SizeOfArgID == llvm::FoldingSetNodeID())
8900           SizeOfArg->Profile(SizeOfArgID, Context, true);
8901         llvm::FoldingSetNodeID DestID;
8902         Dest->Profile(DestID, Context, true);
8903         if (DestID == SizeOfArgID) {
8904           // TODO: For strncpy() and friends, this could suggest sizeof(dst)
8905           //       over sizeof(src) as well.
8906           unsigned ActionIdx = 0; // Default is to suggest dereferencing.
8907           StringRef ReadableName = FnName->getName();
8908
8909           if (const UnaryOperator *UnaryOp = dyn_cast<UnaryOperator>(Dest))
8910             if (UnaryOp->getOpcode() == UO_AddrOf)
8911               ActionIdx = 1; // If its an address-of operator, just remove it.
8912           if (!PointeeTy->isIncompleteType() &&
8913               (Context.getTypeSize(PointeeTy) == Context.getCharWidth()))
8914             ActionIdx = 2; // If the pointee's size is sizeof(char),
8915                            // suggest an explicit length.
8916
8917           // If the function is defined as a builtin macro, do not show macro
8918           // expansion.
8919           SourceLocation SL = SizeOfArg->getExprLoc();
8920           SourceRange DSR = Dest->getSourceRange();
8921           SourceRange SSR = SizeOfArg->getSourceRange();
8922           SourceManager &SM = getSourceManager();
8923
8924           if (SM.isMacroArgExpansion(SL)) {
8925             ReadableName = Lexer::getImmediateMacroName(SL, SM, LangOpts);
8926             SL = SM.getSpellingLoc(SL);
8927             DSR = SourceRange(SM.getSpellingLoc(DSR.getBegin()),
8928                              SM.getSpellingLoc(DSR.getEnd()));
8929             SSR = SourceRange(SM.getSpellingLoc(SSR.getBegin()),
8930                              SM.getSpellingLoc(SSR.getEnd()));
8931           }
8932
8933           DiagRuntimeBehavior(SL, SizeOfArg,
8934                               PDiag(diag::warn_sizeof_pointer_expr_memaccess)
8935                                 << ReadableName
8936                                 << PointeeTy
8937                                 << DestTy
8938                                 << DSR
8939                                 << SSR);
8940           DiagRuntimeBehavior(SL, SizeOfArg,
8941                          PDiag(diag::warn_sizeof_pointer_expr_memaccess_note)
8942                                 << ActionIdx
8943                                 << SSR);
8944
8945           break;
8946         }
8947       }
8948
8949       // Also check for cases where the sizeof argument is the exact same
8950       // type as the memory argument, and where it points to a user-defined
8951       // record type.
8952       if (SizeOfArgTy != QualType()) {
8953         if (PointeeTy->isRecordType() &&
8954             Context.typesAreCompatible(SizeOfArgTy, DestTy)) {
8955           DiagRuntimeBehavior(LenExpr->getExprLoc(), Dest,
8956                               PDiag(diag::warn_sizeof_pointer_type_memaccess)
8957                                 << FnName << SizeOfArgTy << ArgIdx
8958                                 << PointeeTy << Dest->getSourceRange()
8959                                 << LenExpr->getSourceRange());
8960           break;
8961         }
8962       }
8963     } else if (DestTy->isArrayType()) {
8964       PointeeTy = DestTy;
8965     }
8966
8967     if (PointeeTy == QualType())
8968       continue;
8969
8970     // Always complain about dynamic classes.
8971     bool IsContained;
8972     if (const CXXRecordDecl *ContainedRD =
8973             getContainedDynamicClass(PointeeTy, IsContained)) {
8974
8975       unsigned OperationType = 0;
8976       // "overwritten" if we're warning about the destination for any call
8977       // but memcmp; otherwise a verb appropriate to the call.
8978       if (ArgIdx != 0 || BId == Builtin::BImemcmp) {
8979         if (BId == Builtin::BImemcpy)
8980           OperationType = 1;
8981         else if(BId == Builtin::BImemmove)
8982           OperationType = 2;
8983         else if (BId == Builtin::BImemcmp)
8984           OperationType = 3;
8985       }
8986
8987       DiagRuntimeBehavior(
8988         Dest->getExprLoc(), Dest,
8989         PDiag(diag::warn_dyn_class_memaccess)
8990           << (BId == Builtin::BImemcmp ? ArgIdx + 2 : ArgIdx)
8991           << FnName << IsContained << ContainedRD << OperationType
8992           << Call->getCallee()->getSourceRange());
8993     } else if (PointeeTy.hasNonTrivialObjCLifetime() &&
8994              BId != Builtin::BImemset)
8995       DiagRuntimeBehavior(
8996         Dest->getExprLoc(), Dest,
8997         PDiag(diag::warn_arc_object_memaccess)
8998           << ArgIdx << FnName << PointeeTy
8999           << Call->getCallee()->getSourceRange());
9000     else if (const auto *RT = PointeeTy->getAs<RecordType>()) {
9001       if ((BId == Builtin::BImemset || BId == Builtin::BIbzero) &&
9002           RT->getDecl()->isNonTrivialToPrimitiveDefaultInitialize()) {
9003         DiagRuntimeBehavior(Dest->getExprLoc(), Dest,
9004                             PDiag(diag::warn_cstruct_memaccess)
9005                                 << ArgIdx << FnName << PointeeTy << 0);
9006         SearchNonTrivialToInitializeField::diag(PointeeTy, Dest, *this);
9007       } else if ((BId == Builtin::BImemcpy || BId == Builtin::BImemmove) &&
9008                  RT->getDecl()->isNonTrivialToPrimitiveCopy()) {
9009         DiagRuntimeBehavior(Dest->getExprLoc(), Dest,
9010                             PDiag(diag::warn_cstruct_memaccess)
9011                                 << ArgIdx << FnName << PointeeTy << 1);
9012         SearchNonTrivialToCopyField::diag(PointeeTy, Dest, *this);
9013       } else {
9014         continue;
9015       }
9016     } else
9017       continue;
9018
9019     DiagRuntimeBehavior(
9020       Dest->getExprLoc(), Dest,
9021       PDiag(diag::note_bad_memaccess_silence)
9022         << FixItHint::CreateInsertion(ArgRange.getBegin(), "(void*)"));
9023     break;
9024   }
9025 }
9026
9027 // A little helper routine: ignore addition and subtraction of integer literals.
9028 // This intentionally does not ignore all integer constant expressions because
9029 // we don't want to remove sizeof().
9030 static const Expr *ignoreLiteralAdditions(const Expr *Ex, ASTContext &Ctx) {
9031   Ex = Ex->IgnoreParenCasts();
9032
9033   while (true) {
9034     const BinaryOperator * BO = dyn_cast<BinaryOperator>(Ex);
9035     if (!BO || !BO->isAdditiveOp())
9036       break;
9037
9038     const Expr *RHS = BO->getRHS()->IgnoreParenCasts();
9039     const Expr *LHS = BO->getLHS()->IgnoreParenCasts();
9040
9041     if (isa<IntegerLiteral>(RHS))
9042       Ex = LHS;
9043     else if (isa<IntegerLiteral>(LHS))
9044       Ex = RHS;
9045     else
9046       break;
9047   }
9048
9049   return Ex;
9050 }
9051
9052 static bool isConstantSizeArrayWithMoreThanOneElement(QualType Ty,
9053                                                       ASTContext &Context) {
9054   // Only handle constant-sized or VLAs, but not flexible members.
9055   if (const ConstantArrayType *CAT = Context.getAsConstantArrayType(Ty)) {
9056     // Only issue the FIXIT for arrays of size > 1.
9057     if (CAT->getSize().getSExtValue() <= 1)
9058       return false;
9059   } else if (!Ty->isVariableArrayType()) {
9060     return false;
9061   }
9062   return true;
9063 }
9064
9065 // Warn if the user has made the 'size' argument to strlcpy or strlcat
9066 // be the size of the source, instead of the destination.
9067 void Sema::CheckStrlcpycatArguments(const CallExpr *Call,
9068                                     IdentifierInfo *FnName) {
9069
9070   // Don't crash if the user has the wrong number of arguments
9071   unsigned NumArgs = Call->getNumArgs();
9072   if ((NumArgs != 3) && (NumArgs != 4))
9073     return;
9074
9075   const Expr *SrcArg = ignoreLiteralAdditions(Call->getArg(1), Context);
9076   const Expr *SizeArg = ignoreLiteralAdditions(Call->getArg(2), Context);
9077   const Expr *CompareWithSrc = nullptr;
9078
9079   if (CheckMemorySizeofForComparison(*this, SizeArg, FnName,
9080                                      Call->getLocStart(), Call->getRParenLoc()))
9081     return;
9082
9083   // Look for 'strlcpy(dst, x, sizeof(x))'
9084   if (const Expr *Ex = getSizeOfExprArg(SizeArg))
9085     CompareWithSrc = Ex;
9086   else {
9087     // Look for 'strlcpy(dst, x, strlen(x))'
9088     if (const CallExpr *SizeCall = dyn_cast<CallExpr>(SizeArg)) {
9089       if (SizeCall->getBuiltinCallee() == Builtin::BIstrlen &&
9090           SizeCall->getNumArgs() == 1)
9091         CompareWithSrc = ignoreLiteralAdditions(SizeCall->getArg(0), Context);
9092     }
9093   }
9094
9095   if (!CompareWithSrc)
9096     return;
9097
9098   // Determine if the argument to sizeof/strlen is equal to the source
9099   // argument.  In principle there's all kinds of things you could do
9100   // here, for instance creating an == expression and evaluating it with
9101   // EvaluateAsBooleanCondition, but this uses a more direct technique:
9102   const DeclRefExpr *SrcArgDRE = dyn_cast<DeclRefExpr>(SrcArg);
9103   if (!SrcArgDRE)
9104     return;
9105
9106   const DeclRefExpr *CompareWithSrcDRE = dyn_cast<DeclRefExpr>(CompareWithSrc);
9107   if (!CompareWithSrcDRE ||
9108       SrcArgDRE->getDecl() != CompareWithSrcDRE->getDecl())
9109     return;
9110
9111   const Expr *OriginalSizeArg = Call->getArg(2);
9112   Diag(CompareWithSrcDRE->getLocStart(), diag::warn_strlcpycat_wrong_size)
9113     << OriginalSizeArg->getSourceRange() << FnName;
9114
9115   // Output a FIXIT hint if the destination is an array (rather than a
9116   // pointer to an array).  This could be enhanced to handle some
9117   // pointers if we know the actual size, like if DstArg is 'array+2'
9118   // we could say 'sizeof(array)-2'.
9119   const Expr *DstArg = Call->getArg(0)->IgnoreParenImpCasts();
9120   if (!isConstantSizeArrayWithMoreThanOneElement(DstArg->getType(), Context))
9121     return;
9122
9123   SmallString<128> sizeString;
9124   llvm::raw_svector_ostream OS(sizeString);
9125   OS << "sizeof(";
9126   DstArg->printPretty(OS, nullptr, getPrintingPolicy());
9127   OS << ")";
9128
9129   Diag(OriginalSizeArg->getLocStart(), diag::note_strlcpycat_wrong_size)
9130     << FixItHint::CreateReplacement(OriginalSizeArg->getSourceRange(),
9131                                     OS.str());
9132 }
9133
9134 /// Check if two expressions refer to the same declaration.
9135 static bool referToTheSameDecl(const Expr *E1, const Expr *E2) {
9136   if (const DeclRefExpr *D1 = dyn_cast_or_null<DeclRefExpr>(E1))
9137     if (const DeclRefExpr *D2 = dyn_cast_or_null<DeclRefExpr>(E2))
9138       return D1->getDecl() == D2->getDecl();
9139   return false;
9140 }
9141
9142 static const Expr *getStrlenExprArg(const Expr *E) {
9143   if (const CallExpr *CE = dyn_cast<CallExpr>(E)) {
9144     const FunctionDecl *FD = CE->getDirectCallee();
9145     if (!FD || FD->getMemoryFunctionKind() != Builtin::BIstrlen)
9146       return nullptr;
9147     return CE->getArg(0)->IgnoreParenCasts();
9148   }
9149   return nullptr;
9150 }
9151
9152 // Warn on anti-patterns as the 'size' argument to strncat.
9153 // The correct size argument should look like following:
9154 //   strncat(dst, src, sizeof(dst) - strlen(dest) - 1);
9155 void Sema::CheckStrncatArguments(const CallExpr *CE,
9156                                  IdentifierInfo *FnName) {
9157   // Don't crash if the user has the wrong number of arguments.
9158   if (CE->getNumArgs() < 3)
9159     return;
9160   const Expr *DstArg = CE->getArg(0)->IgnoreParenCasts();
9161   const Expr *SrcArg = CE->getArg(1)->IgnoreParenCasts();
9162   const Expr *LenArg = CE->getArg(2)->IgnoreParenCasts();
9163
9164   if (CheckMemorySizeofForComparison(*this, LenArg, FnName, CE->getLocStart(),
9165                                      CE->getRParenLoc()))
9166     return;
9167
9168   // Identify common expressions, which are wrongly used as the size argument
9169   // to strncat and may lead to buffer overflows.
9170   unsigned PatternType = 0;
9171   if (const Expr *SizeOfArg = getSizeOfExprArg(LenArg)) {
9172     // - sizeof(dst)
9173     if (referToTheSameDecl(SizeOfArg, DstArg))
9174       PatternType = 1;
9175     // - sizeof(src)
9176     else if (referToTheSameDecl(SizeOfArg, SrcArg))
9177       PatternType = 2;
9178   } else if (const BinaryOperator *BE = dyn_cast<BinaryOperator>(LenArg)) {
9179     if (BE->getOpcode() == BO_Sub) {
9180       const Expr *L = BE->getLHS()->IgnoreParenCasts();
9181       const Expr *R = BE->getRHS()->IgnoreParenCasts();
9182       // - sizeof(dst) - strlen(dst)
9183       if (referToTheSameDecl(DstArg, getSizeOfExprArg(L)) &&
9184           referToTheSameDecl(DstArg, getStrlenExprArg(R)))
9185         PatternType = 1;
9186       // - sizeof(src) - (anything)
9187       else if (referToTheSameDecl(SrcArg, getSizeOfExprArg(L)))
9188         PatternType = 2;
9189     }
9190   }
9191
9192   if (PatternType == 0)
9193     return;
9194
9195   // Generate the diagnostic.
9196   SourceLocation SL = LenArg->getLocStart();
9197   SourceRange SR = LenArg->getSourceRange();
9198   SourceManager &SM = getSourceManager();
9199
9200   // If the function is defined as a builtin macro, do not show macro expansion.
9201   if (SM.isMacroArgExpansion(SL)) {
9202     SL = SM.getSpellingLoc(SL);
9203     SR = SourceRange(SM.getSpellingLoc(SR.getBegin()),
9204                      SM.getSpellingLoc(SR.getEnd()));
9205   }
9206
9207   // Check if the destination is an array (rather than a pointer to an array).
9208   QualType DstTy = DstArg->getType();
9209   bool isKnownSizeArray = isConstantSizeArrayWithMoreThanOneElement(DstTy,
9210                                                                     Context);
9211   if (!isKnownSizeArray) {
9212     if (PatternType == 1)
9213       Diag(SL, diag::warn_strncat_wrong_size) << SR;
9214     else
9215       Diag(SL, diag::warn_strncat_src_size) << SR;
9216     return;
9217   }
9218
9219   if (PatternType == 1)
9220     Diag(SL, diag::warn_strncat_large_size) << SR;
9221   else
9222     Diag(SL, diag::warn_strncat_src_size) << SR;
9223
9224   SmallString<128> sizeString;
9225   llvm::raw_svector_ostream OS(sizeString);
9226   OS << "sizeof(";
9227   DstArg->printPretty(OS, nullptr, getPrintingPolicy());
9228   OS << ") - ";
9229   OS << "strlen(";
9230   DstArg->printPretty(OS, nullptr, getPrintingPolicy());
9231   OS << ") - 1";
9232
9233   Diag(SL, diag::note_strncat_wrong_size)
9234     << FixItHint::CreateReplacement(SR, OS.str());
9235 }
9236
9237 void
9238 Sema::CheckReturnValExpr(Expr *RetValExp, QualType lhsType,
9239                          SourceLocation ReturnLoc,
9240                          bool isObjCMethod,
9241                          const AttrVec *Attrs,
9242                          const FunctionDecl *FD) {
9243   // Check if the return value is null but should not be.
9244   if (((Attrs && hasSpecificAttr<ReturnsNonNullAttr>(*Attrs)) ||
9245        (!isObjCMethod && isNonNullType(Context, lhsType))) &&
9246       CheckNonNullExpr(*this, RetValExp))
9247     Diag(ReturnLoc, diag::warn_null_ret)
9248       << (isObjCMethod ? 1 : 0) << RetValExp->getSourceRange();
9249
9250   // C++11 [basic.stc.dynamic.allocation]p4:
9251   //   If an allocation function declared with a non-throwing
9252   //   exception-specification fails to allocate storage, it shall return
9253   //   a null pointer. Any other allocation function that fails to allocate
9254   //   storage shall indicate failure only by throwing an exception [...]
9255   if (FD) {
9256     OverloadedOperatorKind Op = FD->getOverloadedOperator();
9257     if (Op == OO_New || Op == OO_Array_New) {
9258       const FunctionProtoType *Proto
9259         = FD->getType()->castAs<FunctionProtoType>();
9260       if (!Proto->isNothrow(/*ResultIfDependent*/true) &&
9261           CheckNonNullExpr(*this, RetValExp))
9262         Diag(ReturnLoc, diag::warn_operator_new_returns_null)
9263           << FD << getLangOpts().CPlusPlus11;
9264     }
9265   }
9266 }
9267
9268 //===--- CHECK: Floating-Point comparisons (-Wfloat-equal) ---------------===//
9269
9270 /// Check for comparisons of floating point operands using != and ==.
9271 /// Issue a warning if these are no self-comparisons, as they are not likely
9272 /// to do what the programmer intended.
9273 void Sema::CheckFloatComparison(SourceLocation Loc, Expr* LHS, Expr *RHS) {
9274   Expr* LeftExprSansParen = LHS->IgnoreParenImpCasts();
9275   Expr* RightExprSansParen = RHS->IgnoreParenImpCasts();
9276
9277   // Special case: check for x == x (which is OK).
9278   // Do not emit warnings for such cases.
9279   if (DeclRefExpr* DRL = dyn_cast<DeclRefExpr>(LeftExprSansParen))
9280     if (DeclRefExpr* DRR = dyn_cast<DeclRefExpr>(RightExprSansParen))
9281       if (DRL->getDecl() == DRR->getDecl())
9282         return;
9283
9284   // Special case: check for comparisons against literals that can be exactly
9285   //  represented by APFloat.  In such cases, do not emit a warning.  This
9286   //  is a heuristic: often comparison against such literals are used to
9287   //  detect if a value in a variable has not changed.  This clearly can
9288   //  lead to false negatives.
9289   if (FloatingLiteral* FLL = dyn_cast<FloatingLiteral>(LeftExprSansParen)) {
9290     if (FLL->isExact())
9291       return;
9292   } else
9293     if (FloatingLiteral* FLR = dyn_cast<FloatingLiteral>(RightExprSansParen))
9294       if (FLR->isExact())
9295         return;
9296
9297   // Check for comparisons with builtin types.
9298   if (CallExpr* CL = dyn_cast<CallExpr>(LeftExprSansParen))
9299     if (CL->getBuiltinCallee())
9300       return;
9301
9302   if (CallExpr* CR = dyn_cast<CallExpr>(RightExprSansParen))
9303     if (CR->getBuiltinCallee())
9304       return;
9305
9306   // Emit the diagnostic.
9307   Diag(Loc, diag::warn_floatingpoint_eq)
9308     << LHS->getSourceRange() << RHS->getSourceRange();
9309 }
9310
9311 //===--- CHECK: Integer mixed-sign comparisons (-Wsign-compare) --------===//
9312 //===--- CHECK: Lossy implicit conversions (-Wconversion) --------------===//
9313
9314 namespace {
9315
9316 /// Structure recording the 'active' range of an integer-valued
9317 /// expression.
9318 struct IntRange {
9319   /// The number of bits active in the int.
9320   unsigned Width;
9321
9322   /// True if the int is known not to have negative values.
9323   bool NonNegative;
9324
9325   IntRange(unsigned Width, bool NonNegative)
9326       : Width(Width), NonNegative(NonNegative) {}
9327
9328   /// Returns the range of the bool type.
9329   static IntRange forBoolType() {
9330     return IntRange(1, true);
9331   }
9332
9333   /// Returns the range of an opaque value of the given integral type.
9334   static IntRange forValueOfType(ASTContext &C, QualType T) {
9335     return forValueOfCanonicalType(C,
9336                           T->getCanonicalTypeInternal().getTypePtr());
9337   }
9338
9339   /// Returns the range of an opaque value of a canonical integral type.
9340   static IntRange forValueOfCanonicalType(ASTContext &C, const Type *T) {
9341     assert(T->isCanonicalUnqualified());
9342
9343     if (const VectorType *VT = dyn_cast<VectorType>(T))
9344       T = VT->getElementType().getTypePtr();
9345     if (const ComplexType *CT = dyn_cast<ComplexType>(T))
9346       T = CT->getElementType().getTypePtr();
9347     if (const AtomicType *AT = dyn_cast<AtomicType>(T))
9348       T = AT->getValueType().getTypePtr();
9349
9350     if (!C.getLangOpts().CPlusPlus) {
9351       // For enum types in C code, use the underlying datatype.
9352       if (const EnumType *ET = dyn_cast<EnumType>(T))
9353         T = ET->getDecl()->getIntegerType().getDesugaredType(C).getTypePtr();
9354     } else if (const EnumType *ET = dyn_cast<EnumType>(T)) {
9355       // For enum types in C++, use the known bit width of the enumerators.
9356       EnumDecl *Enum = ET->getDecl();
9357       // In C++11, enums can have a fixed underlying type. Use this type to
9358       // compute the range.
9359       if (Enum->isFixed()) {
9360         return IntRange(C.getIntWidth(QualType(T, 0)),
9361                         !ET->isSignedIntegerOrEnumerationType());
9362       }
9363
9364       unsigned NumPositive = Enum->getNumPositiveBits();
9365       unsigned NumNegative = Enum->getNumNegativeBits();
9366
9367       if (NumNegative == 0)
9368         return IntRange(NumPositive, true/*NonNegative*/);
9369       else
9370         return IntRange(std::max(NumPositive + 1, NumNegative),
9371                         false/*NonNegative*/);
9372     }
9373
9374     const BuiltinType *BT = cast<BuiltinType>(T);
9375     assert(BT->isInteger());
9376
9377     return IntRange(C.getIntWidth(QualType(T, 0)), BT->isUnsignedInteger());
9378   }
9379
9380   /// Returns the "target" range of a canonical integral type, i.e.
9381   /// the range of values expressible in the type.
9382   ///
9383   /// This matches forValueOfCanonicalType except that enums have the
9384   /// full range of their type, not the range of their enumerators.
9385   static IntRange forTargetOfCanonicalType(ASTContext &C, const Type *T) {
9386     assert(T->isCanonicalUnqualified());
9387
9388     if (const VectorType *VT = dyn_cast<VectorType>(T))
9389       T = VT->getElementType().getTypePtr();
9390     if (const ComplexType *CT = dyn_cast<ComplexType>(T))
9391       T = CT->getElementType().getTypePtr();
9392     if (const AtomicType *AT = dyn_cast<AtomicType>(T))
9393       T = AT->getValueType().getTypePtr();
9394     if (const EnumType *ET = dyn_cast<EnumType>(T))
9395       T = C.getCanonicalType(ET->getDecl()->getIntegerType()).getTypePtr();
9396
9397     const BuiltinType *BT = cast<BuiltinType>(T);
9398     assert(BT->isInteger());
9399
9400     return IntRange(C.getIntWidth(QualType(T, 0)), BT->isUnsignedInteger());
9401   }
9402
9403   /// Returns the supremum of two ranges: i.e. their conservative merge.
9404   static IntRange join(IntRange L, IntRange R) {
9405     return IntRange(std::max(L.Width, R.Width),
9406                     L.NonNegative && R.NonNegative);
9407   }
9408
9409   /// Returns the infinum of two ranges: i.e. their aggressive merge.
9410   static IntRange meet(IntRange L, IntRange R) {
9411     return IntRange(std::min(L.Width, R.Width),
9412                     L.NonNegative || R.NonNegative);
9413   }
9414 };
9415
9416 } // namespace
9417
9418 static IntRange GetValueRange(ASTContext &C, llvm::APSInt &value,
9419                               unsigned MaxWidth) {
9420   if (value.isSigned() && value.isNegative())
9421     return IntRange(value.getMinSignedBits(), false);
9422
9423   if (value.getBitWidth() > MaxWidth)
9424     value = value.trunc(MaxWidth);
9425
9426   // isNonNegative() just checks the sign bit without considering
9427   // signedness.
9428   return IntRange(value.getActiveBits(), true);
9429 }
9430
9431 static IntRange GetValueRange(ASTContext &C, APValue &result, QualType Ty,
9432                               unsigned MaxWidth) {
9433   if (result.isInt())
9434     return GetValueRange(C, result.getInt(), MaxWidth);
9435
9436   if (result.isVector()) {
9437     IntRange R = GetValueRange(C, result.getVectorElt(0), Ty, MaxWidth);
9438     for (unsigned i = 1, e = result.getVectorLength(); i != e; ++i) {
9439       IntRange El = GetValueRange(C, result.getVectorElt(i), Ty, MaxWidth);
9440       R = IntRange::join(R, El);
9441     }
9442     return R;
9443   }
9444
9445   if (result.isComplexInt()) {
9446     IntRange R = GetValueRange(C, result.getComplexIntReal(), MaxWidth);
9447     IntRange I = GetValueRange(C, result.getComplexIntImag(), MaxWidth);
9448     return IntRange::join(R, I);
9449   }
9450
9451   // This can happen with lossless casts to intptr_t of "based" lvalues.
9452   // Assume it might use arbitrary bits.
9453   // FIXME: The only reason we need to pass the type in here is to get
9454   // the sign right on this one case.  It would be nice if APValue
9455   // preserved this.
9456   assert(result.isLValue() || result.isAddrLabelDiff());
9457   return IntRange(MaxWidth, Ty->isUnsignedIntegerOrEnumerationType());
9458 }
9459
9460 static QualType GetExprType(const Expr *E) {
9461   QualType Ty = E->getType();
9462   if (const AtomicType *AtomicRHS = Ty->getAs<AtomicType>())
9463     Ty = AtomicRHS->getValueType();
9464   return Ty;
9465 }
9466
9467 /// Pseudo-evaluate the given integer expression, estimating the
9468 /// range of values it might take.
9469 ///
9470 /// \param MaxWidth - the width to which the value will be truncated
9471 static IntRange GetExprRange(ASTContext &C, const Expr *E, unsigned MaxWidth) {
9472   E = E->IgnoreParens();
9473
9474   // Try a full evaluation first.
9475   Expr::EvalResult result;
9476   if (E->EvaluateAsRValue(result, C))
9477     return GetValueRange(C, result.Val, GetExprType(E), MaxWidth);
9478
9479   // I think we only want to look through implicit casts here; if the
9480   // user has an explicit widening cast, we should treat the value as
9481   // being of the new, wider type.
9482   if (const auto *CE = dyn_cast<ImplicitCastExpr>(E)) {
9483     if (CE->getCastKind() == CK_NoOp || CE->getCastKind() == CK_LValueToRValue)
9484       return GetExprRange(C, CE->getSubExpr(), MaxWidth);
9485
9486     IntRange OutputTypeRange = IntRange::forValueOfType(C, GetExprType(CE));
9487
9488     bool isIntegerCast = CE->getCastKind() == CK_IntegralCast ||
9489                          CE->getCastKind() == CK_BooleanToSignedIntegral;
9490
9491     // Assume that non-integer casts can span the full range of the type.
9492     if (!isIntegerCast)
9493       return OutputTypeRange;
9494
9495     IntRange SubRange
9496       = GetExprRange(C, CE->getSubExpr(),
9497                      std::min(MaxWidth, OutputTypeRange.Width));
9498
9499     // Bail out if the subexpr's range is as wide as the cast type.
9500     if (SubRange.Width >= OutputTypeRange.Width)
9501       return OutputTypeRange;
9502
9503     // Otherwise, we take the smaller width, and we're non-negative if
9504     // either the output type or the subexpr is.
9505     return IntRange(SubRange.Width,
9506                     SubRange.NonNegative || OutputTypeRange.NonNegative);
9507   }
9508
9509   if (const auto *CO = dyn_cast<ConditionalOperator>(E)) {
9510     // If we can fold the condition, just take that operand.
9511     bool CondResult;
9512     if (CO->getCond()->EvaluateAsBooleanCondition(CondResult, C))
9513       return GetExprRange(C, CondResult ? CO->getTrueExpr()
9514                                         : CO->getFalseExpr(),
9515                           MaxWidth);
9516
9517     // Otherwise, conservatively merge.
9518     IntRange L = GetExprRange(C, CO->getTrueExpr(), MaxWidth);
9519     IntRange R = GetExprRange(C, CO->getFalseExpr(), MaxWidth);
9520     return IntRange::join(L, R);
9521   }
9522
9523   if (const auto *BO = dyn_cast<BinaryOperator>(E)) {
9524     switch (BO->getOpcode()) {
9525     case BO_Cmp:
9526       llvm_unreachable("builtin <=> should have class type");
9527
9528     // Boolean-valued operations are single-bit and positive.
9529     case BO_LAnd:
9530     case BO_LOr:
9531     case BO_LT:
9532     case BO_GT:
9533     case BO_LE:
9534     case BO_GE:
9535     case BO_EQ:
9536     case BO_NE:
9537       return IntRange::forBoolType();
9538
9539     // The type of the assignments is the type of the LHS, so the RHS
9540     // is not necessarily the same type.
9541     case BO_MulAssign:
9542     case BO_DivAssign:
9543     case BO_RemAssign:
9544     case BO_AddAssign:
9545     case BO_SubAssign:
9546     case BO_XorAssign:
9547     case BO_OrAssign:
9548       // TODO: bitfields?
9549       return IntRange::forValueOfType(C, GetExprType(E));
9550
9551     // Simple assignments just pass through the RHS, which will have
9552     // been coerced to the LHS type.
9553     case BO_Assign:
9554       // TODO: bitfields?
9555       return GetExprRange(C, BO->getRHS(), MaxWidth);
9556
9557     // Operations with opaque sources are black-listed.
9558     case BO_PtrMemD:
9559     case BO_PtrMemI:
9560       return IntRange::forValueOfType(C, GetExprType(E));
9561
9562     // Bitwise-and uses the *infinum* of the two source ranges.
9563     case BO_And:
9564     case BO_AndAssign:
9565       return IntRange::meet(GetExprRange(C, BO->getLHS(), MaxWidth),
9566                             GetExprRange(C, BO->getRHS(), MaxWidth));
9567
9568     // Left shift gets black-listed based on a judgement call.
9569     case BO_Shl:
9570       // ...except that we want to treat '1 << (blah)' as logically
9571       // positive.  It's an important idiom.
9572       if (IntegerLiteral *I
9573             = dyn_cast<IntegerLiteral>(BO->getLHS()->IgnoreParenCasts())) {
9574         if (I->getValue() == 1) {
9575           IntRange R = IntRange::forValueOfType(C, GetExprType(E));
9576           return IntRange(R.Width, /*NonNegative*/ true);
9577         }
9578       }
9579       LLVM_FALLTHROUGH;
9580
9581     case BO_ShlAssign:
9582       return IntRange::forValueOfType(C, GetExprType(E));
9583
9584     // Right shift by a constant can narrow its left argument.
9585     case BO_Shr:
9586     case BO_ShrAssign: {
9587       IntRange L = GetExprRange(C, BO->getLHS(), MaxWidth);
9588
9589       // If the shift amount is a positive constant, drop the width by
9590       // that much.
9591       llvm::APSInt shift;
9592       if (BO->getRHS()->isIntegerConstantExpr(shift, C) &&
9593           shift.isNonNegative()) {
9594         unsigned zext = shift.getZExtValue();
9595         if (zext >= L.Width)
9596           L.Width = (L.NonNegative ? 0 : 1);
9597         else
9598           L.Width -= zext;
9599       }
9600
9601       return L;
9602     }
9603
9604     // Comma acts as its right operand.
9605     case BO_Comma:
9606       return GetExprRange(C, BO->getRHS(), MaxWidth);
9607
9608     // Black-list pointer subtractions.
9609     case BO_Sub:
9610       if (BO->getLHS()->getType()->isPointerType())
9611         return IntRange::forValueOfType(C, GetExprType(E));
9612       break;
9613
9614     // The width of a division result is mostly determined by the size
9615     // of the LHS.
9616     case BO_Div: {
9617       // Don't 'pre-truncate' the operands.
9618       unsigned opWidth = C.getIntWidth(GetExprType(E));
9619       IntRange L = GetExprRange(C, BO->getLHS(), opWidth);
9620
9621       // If the divisor is constant, use that.
9622       llvm::APSInt divisor;
9623       if (BO->getRHS()->isIntegerConstantExpr(divisor, C)) {
9624         unsigned log2 = divisor.logBase2(); // floor(log_2(divisor))
9625         if (log2 >= L.Width)
9626           L.Width = (L.NonNegative ? 0 : 1);
9627         else
9628           L.Width = std::min(L.Width - log2, MaxWidth);
9629         return L;
9630       }
9631
9632       // Otherwise, just use the LHS's width.
9633       IntRange R = GetExprRange(C, BO->getRHS(), opWidth);
9634       return IntRange(L.Width, L.NonNegative && R.NonNegative);
9635     }
9636
9637     // The result of a remainder can't be larger than the result of
9638     // either side.
9639     case BO_Rem: {
9640       // Don't 'pre-truncate' the operands.
9641       unsigned opWidth = C.getIntWidth(GetExprType(E));
9642       IntRange L = GetExprRange(C, BO->getLHS(), opWidth);
9643       IntRange R = GetExprRange(C, BO->getRHS(), opWidth);
9644
9645       IntRange meet = IntRange::meet(L, R);
9646       meet.Width = std::min(meet.Width, MaxWidth);
9647       return meet;
9648     }
9649
9650     // The default behavior is okay for these.
9651     case BO_Mul:
9652     case BO_Add:
9653     case BO_Xor:
9654     case BO_Or:
9655       break;
9656     }
9657
9658     // The default case is to treat the operation as if it were closed
9659     // on the narrowest type that encompasses both operands.
9660     IntRange L = GetExprRange(C, BO->getLHS(), MaxWidth);
9661     IntRange R = GetExprRange(C, BO->getRHS(), MaxWidth);
9662     return IntRange::join(L, R);
9663   }
9664
9665   if (const auto *UO = dyn_cast<UnaryOperator>(E)) {
9666     switch (UO->getOpcode()) {
9667     // Boolean-valued operations are white-listed.
9668     case UO_LNot:
9669       return IntRange::forBoolType();
9670
9671     // Operations with opaque sources are black-listed.
9672     case UO_Deref:
9673     case UO_AddrOf: // should be impossible
9674       return IntRange::forValueOfType(C, GetExprType(E));
9675
9676     default:
9677       return GetExprRange(C, UO->getSubExpr(), MaxWidth);
9678     }
9679   }
9680
9681   if (const auto *OVE = dyn_cast<OpaqueValueExpr>(E))
9682     return GetExprRange(C, OVE->getSourceExpr(), MaxWidth);
9683
9684   if (const auto *BitField = E->getSourceBitField())
9685     return IntRange(BitField->getBitWidthValue(C),
9686                     BitField->getType()->isUnsignedIntegerOrEnumerationType());
9687
9688   return IntRange::forValueOfType(C, GetExprType(E));
9689 }
9690
9691 static IntRange GetExprRange(ASTContext &C, const Expr *E) {
9692   return GetExprRange(C, E, C.getIntWidth(GetExprType(E)));
9693 }
9694
9695 /// Checks whether the given value, which currently has the given
9696 /// source semantics, has the same value when coerced through the
9697 /// target semantics.
9698 static bool IsSameFloatAfterCast(const llvm::APFloat &value,
9699                                  const llvm::fltSemantics &Src,
9700                                  const llvm::fltSemantics &Tgt) {
9701   llvm::APFloat truncated = value;
9702
9703   bool ignored;
9704   truncated.convert(Src, llvm::APFloat::rmNearestTiesToEven, &ignored);
9705   truncated.convert(Tgt, llvm::APFloat::rmNearestTiesToEven, &ignored);
9706
9707   return truncated.bitwiseIsEqual(value);
9708 }
9709
9710 /// Checks whether the given value, which currently has the given
9711 /// source semantics, has the same value when coerced through the
9712 /// target semantics.
9713 ///
9714 /// The value might be a vector of floats (or a complex number).
9715 static bool IsSameFloatAfterCast(const APValue &value,
9716                                  const llvm::fltSemantics &Src,
9717                                  const llvm::fltSemantics &Tgt) {
9718   if (value.isFloat())
9719     return IsSameFloatAfterCast(value.getFloat(), Src, Tgt);
9720
9721   if (value.isVector()) {
9722     for (unsigned i = 0, e = value.getVectorLength(); i != e; ++i)
9723       if (!IsSameFloatAfterCast(value.getVectorElt(i), Src, Tgt))
9724         return false;
9725     return true;
9726   }
9727
9728   assert(value.isComplexFloat());
9729   return (IsSameFloatAfterCast(value.getComplexFloatReal(), Src, Tgt) &&
9730           IsSameFloatAfterCast(value.getComplexFloatImag(), Src, Tgt));
9731 }
9732
9733 static void AnalyzeImplicitConversions(Sema &S, Expr *E, SourceLocation CC);
9734
9735 static bool IsEnumConstOrFromMacro(Sema &S, Expr *E) {
9736   // Suppress cases where we are comparing against an enum constant.
9737   if (const DeclRefExpr *DR =
9738       dyn_cast<DeclRefExpr>(E->IgnoreParenImpCasts()))
9739     if (isa<EnumConstantDecl>(DR->getDecl()))
9740       return true;
9741
9742   // Suppress cases where the '0' value is expanded from a macro.
9743   if (E->getLocStart().isMacroID())
9744     return true;
9745
9746   return false;
9747 }
9748
9749 static bool isKnownToHaveUnsignedValue(Expr *E) {
9750   return E->getType()->isIntegerType() &&
9751          (!E->getType()->isSignedIntegerType() ||
9752           !E->IgnoreParenImpCasts()->getType()->isSignedIntegerType());
9753 }
9754
9755 namespace {
9756 /// The promoted range of values of a type. In general this has the
9757 /// following structure:
9758 ///
9759 ///     |-----------| . . . |-----------|
9760 ///     ^           ^       ^           ^
9761 ///    Min       HoleMin  HoleMax      Max
9762 ///
9763 /// ... where there is only a hole if a signed type is promoted to unsigned
9764 /// (in which case Min and Max are the smallest and largest representable
9765 /// values).
9766 struct PromotedRange {
9767   // Min, or HoleMax if there is a hole.
9768   llvm::APSInt PromotedMin;
9769   // Max, or HoleMin if there is a hole.
9770   llvm::APSInt PromotedMax;
9771
9772   PromotedRange(IntRange R, unsigned BitWidth, bool Unsigned) {
9773     if (R.Width == 0)
9774       PromotedMin = PromotedMax = llvm::APSInt(BitWidth, Unsigned);
9775     else if (R.Width >= BitWidth && !Unsigned) {
9776       // Promotion made the type *narrower*. This happens when promoting
9777       // a < 32-bit unsigned / <= 32-bit signed bit-field to 'signed int'.
9778       // Treat all values of 'signed int' as being in range for now.
9779       PromotedMin = llvm::APSInt::getMinValue(BitWidth, Unsigned);
9780       PromotedMax = llvm::APSInt::getMaxValue(BitWidth, Unsigned);
9781     } else {
9782       PromotedMin = llvm::APSInt::getMinValue(R.Width, R.NonNegative)
9783                         .extOrTrunc(BitWidth);
9784       PromotedMin.setIsUnsigned(Unsigned);
9785
9786       PromotedMax = llvm::APSInt::getMaxValue(R.Width, R.NonNegative)
9787                         .extOrTrunc(BitWidth);
9788       PromotedMax.setIsUnsigned(Unsigned);
9789     }
9790   }
9791
9792   // Determine whether this range is contiguous (has no hole).
9793   bool isContiguous() const { return PromotedMin <= PromotedMax; }
9794
9795   // Where a constant value is within the range.
9796   enum ComparisonResult {
9797     LT = 0x1,
9798     LE = 0x2,
9799     GT = 0x4,
9800     GE = 0x8,
9801     EQ = 0x10,
9802     NE = 0x20,
9803     InRangeFlag = 0x40,
9804
9805     Less = LE | LT | NE,
9806     Min = LE | InRangeFlag,
9807     InRange = InRangeFlag,
9808     Max = GE | InRangeFlag,
9809     Greater = GE | GT | NE,
9810
9811     OnlyValue = LE | GE | EQ | InRangeFlag,
9812     InHole = NE
9813   };
9814
9815   ComparisonResult compare(const llvm::APSInt &Value) const {
9816     assert(Value.getBitWidth() == PromotedMin.getBitWidth() &&
9817            Value.isUnsigned() == PromotedMin.isUnsigned());
9818     if (!isContiguous()) {
9819       assert(Value.isUnsigned() && "discontiguous range for signed compare");
9820       if (Value.isMinValue()) return Min;
9821       if (Value.isMaxValue()) return Max;
9822       if (Value >= PromotedMin) return InRange;
9823       if (Value <= PromotedMax) return InRange;
9824       return InHole;
9825     }
9826
9827     switch (llvm::APSInt::compareValues(Value, PromotedMin)) {
9828     case -1: return Less;
9829     case 0: return PromotedMin == PromotedMax ? OnlyValue : Min;
9830     case 1:
9831       switch (llvm::APSInt::compareValues(Value, PromotedMax)) {
9832       case -1: return InRange;
9833       case 0: return Max;
9834       case 1: return Greater;
9835       }
9836     }
9837
9838     llvm_unreachable("impossible compare result");
9839   }
9840
9841   static llvm::Optional<StringRef>
9842   constantValue(BinaryOperatorKind Op, ComparisonResult R, bool ConstantOnRHS) {
9843     if (Op == BO_Cmp) {
9844       ComparisonResult LTFlag = LT, GTFlag = GT;
9845       if (ConstantOnRHS) std::swap(LTFlag, GTFlag);
9846
9847       if (R & EQ) return StringRef("'std::strong_ordering::equal'");
9848       if (R & LTFlag) return StringRef("'std::strong_ordering::less'");
9849       if (R & GTFlag) return StringRef("'std::strong_ordering::greater'");
9850       return llvm::None;
9851     }
9852
9853     ComparisonResult TrueFlag, FalseFlag;
9854     if (Op == BO_EQ) {
9855       TrueFlag = EQ;
9856       FalseFlag = NE;
9857     } else if (Op == BO_NE) {
9858       TrueFlag = NE;
9859       FalseFlag = EQ;
9860     } else {
9861       if ((Op == BO_LT || Op == BO_GE) ^ ConstantOnRHS) {
9862         TrueFlag = LT;
9863         FalseFlag = GE;
9864       } else {
9865         TrueFlag = GT;
9866         FalseFlag = LE;
9867       }
9868       if (Op == BO_GE || Op == BO_LE)
9869         std::swap(TrueFlag, FalseFlag);
9870     }
9871     if (R & TrueFlag)
9872       return StringRef("true");
9873     if (R & FalseFlag)
9874       return StringRef("false");
9875     return llvm::None;
9876   }
9877 };
9878 }
9879
9880 static bool HasEnumType(Expr *E) {
9881   // Strip off implicit integral promotions.
9882   while (ImplicitCastExpr *ICE = dyn_cast<ImplicitCastExpr>(E)) {
9883     if (ICE->getCastKind() != CK_IntegralCast &&
9884         ICE->getCastKind() != CK_NoOp)
9885       break;
9886     E = ICE->getSubExpr();
9887   }
9888
9889   return E->getType()->isEnumeralType();
9890 }
9891
9892 static int classifyConstantValue(Expr *Constant) {
9893   // The values of this enumeration are used in the diagnostics
9894   // diag::warn_out_of_range_compare and diag::warn_tautological_bool_compare.
9895   enum ConstantValueKind {
9896     Miscellaneous = 0,
9897     LiteralTrue,
9898     LiteralFalse
9899   };
9900   if (auto *BL = dyn_cast<CXXBoolLiteralExpr>(Constant))
9901     return BL->getValue() ? ConstantValueKind::LiteralTrue
9902                           : ConstantValueKind::LiteralFalse;
9903   return ConstantValueKind::Miscellaneous;
9904 }
9905
9906 static bool CheckTautologicalComparison(Sema &S, BinaryOperator *E,
9907                                         Expr *Constant, Expr *Other,
9908                                         const llvm::APSInt &Value,
9909                                         bool RhsConstant) {
9910   if (S.inTemplateInstantiation())
9911     return false;
9912
9913   Expr *OriginalOther = Other;
9914
9915   Constant = Constant->IgnoreParenImpCasts();
9916   Other = Other->IgnoreParenImpCasts();
9917
9918   // Suppress warnings on tautological comparisons between values of the same
9919   // enumeration type. There are only two ways we could warn on this:
9920   //  - If the constant is outside the range of representable values of
9921   //    the enumeration. In such a case, we should warn about the cast
9922   //    to enumeration type, not about the comparison.
9923   //  - If the constant is the maximum / minimum in-range value. For an
9924   //    enumeratin type, such comparisons can be meaningful and useful.
9925   if (Constant->getType()->isEnumeralType() &&
9926       S.Context.hasSameUnqualifiedType(Constant->getType(), Other->getType()))
9927     return false;
9928
9929   // TODO: Investigate using GetExprRange() to get tighter bounds
9930   // on the bit ranges.
9931   QualType OtherT = Other->getType();
9932   if (const auto *AT = OtherT->getAs<AtomicType>())
9933     OtherT = AT->getValueType();
9934   IntRange OtherRange = IntRange::forValueOfType(S.Context, OtherT);
9935
9936   // Whether we're treating Other as being a bool because of the form of
9937   // expression despite it having another type (typically 'int' in C).
9938   bool OtherIsBooleanDespiteType =
9939       !OtherT->isBooleanType() && Other->isKnownToHaveBooleanValue();
9940   if (OtherIsBooleanDespiteType)
9941     OtherRange = IntRange::forBoolType();
9942
9943   // Determine the promoted range of the other type and see if a comparison of
9944   // the constant against that range is tautological.
9945   PromotedRange OtherPromotedRange(OtherRange, Value.getBitWidth(),
9946                                    Value.isUnsigned());
9947   auto Cmp = OtherPromotedRange.compare(Value);
9948   auto Result = PromotedRange::constantValue(E->getOpcode(), Cmp, RhsConstant);
9949   if (!Result)
9950     return false;
9951
9952   // Suppress the diagnostic for an in-range comparison if the constant comes
9953   // from a macro or enumerator. We don't want to diagnose
9954   //
9955   //   some_long_value <= INT_MAX
9956   //
9957   // when sizeof(int) == sizeof(long).
9958   bool InRange = Cmp & PromotedRange::InRangeFlag;
9959   if (InRange && IsEnumConstOrFromMacro(S, Constant))
9960     return false;
9961
9962   // If this is a comparison to an enum constant, include that
9963   // constant in the diagnostic.
9964   const EnumConstantDecl *ED = nullptr;
9965   if (const DeclRefExpr *DR = dyn_cast<DeclRefExpr>(Constant))
9966     ED = dyn_cast<EnumConstantDecl>(DR->getDecl());
9967
9968   // Should be enough for uint128 (39 decimal digits)
9969   SmallString<64> PrettySourceValue;
9970   llvm::raw_svector_ostream OS(PrettySourceValue);
9971   if (ED)
9972     OS << '\'' << *ED << "' (" << Value << ")";
9973   else
9974     OS << Value;
9975
9976   // FIXME: We use a somewhat different formatting for the in-range cases and
9977   // cases involving boolean values for historical reasons. We should pick a
9978   // consistent way of presenting these diagnostics.
9979   if (!InRange || Other->isKnownToHaveBooleanValue()) {
9980     S.DiagRuntimeBehavior(
9981       E->getOperatorLoc(), E,
9982       S.PDiag(!InRange ? diag::warn_out_of_range_compare
9983                        : diag::warn_tautological_bool_compare)
9984           << OS.str() << classifyConstantValue(Constant)
9985           << OtherT << OtherIsBooleanDespiteType << *Result
9986           << E->getLHS()->getSourceRange() << E->getRHS()->getSourceRange());
9987   } else {
9988     unsigned Diag = (isKnownToHaveUnsignedValue(OriginalOther) && Value == 0)
9989                         ? (HasEnumType(OriginalOther)
9990                                ? diag::warn_unsigned_enum_always_true_comparison
9991                                : diag::warn_unsigned_always_true_comparison)
9992                         : diag::warn_tautological_constant_compare;
9993
9994     S.Diag(E->getOperatorLoc(), Diag)
9995         << RhsConstant << OtherT << E->getOpcodeStr() << OS.str() << *Result
9996         << E->getLHS()->getSourceRange() << E->getRHS()->getSourceRange();
9997   }
9998
9999   return true;
10000 }
10001
10002 /// Analyze the operands of the given comparison.  Implements the
10003 /// fallback case from AnalyzeComparison.
10004 static void AnalyzeImpConvsInComparison(Sema &S, BinaryOperator *E) {
10005   AnalyzeImplicitConversions(S, E->getLHS(), E->getOperatorLoc());
10006   AnalyzeImplicitConversions(S, E->getRHS(), E->getOperatorLoc());
10007 }
10008
10009 /// Implements -Wsign-compare.
10010 ///
10011 /// \param E the binary operator to check for warnings
10012 static void AnalyzeComparison(Sema &S, BinaryOperator *E) {
10013   // The type the comparison is being performed in.
10014   QualType T = E->getLHS()->getType();
10015
10016   // Only analyze comparison operators where both sides have been converted to
10017   // the same type.
10018   if (!S.Context.hasSameUnqualifiedType(T, E->getRHS()->getType()))
10019     return AnalyzeImpConvsInComparison(S, E);
10020
10021   // Don't analyze value-dependent comparisons directly.
10022   if (E->isValueDependent())
10023     return AnalyzeImpConvsInComparison(S, E);
10024
10025   Expr *LHS = E->getLHS();
10026   Expr *RHS = E->getRHS();
10027
10028   if (T->isIntegralType(S.Context)) {
10029     llvm::APSInt RHSValue;
10030     llvm::APSInt LHSValue;
10031
10032     bool IsRHSIntegralLiteral = RHS->isIntegerConstantExpr(RHSValue, S.Context);
10033     bool IsLHSIntegralLiteral = LHS->isIntegerConstantExpr(LHSValue, S.Context);
10034
10035     // We don't care about expressions whose result is a constant.
10036     if (IsRHSIntegralLiteral && IsLHSIntegralLiteral)
10037       return AnalyzeImpConvsInComparison(S, E);
10038
10039     // We only care about expressions where just one side is literal
10040     if (IsRHSIntegralLiteral ^ IsLHSIntegralLiteral) {
10041       // Is the constant on the RHS or LHS?
10042       const bool RhsConstant = IsRHSIntegralLiteral;
10043       Expr *Const = RhsConstant ? RHS : LHS;
10044       Expr *Other = RhsConstant ? LHS : RHS;
10045       const llvm::APSInt &Value = RhsConstant ? RHSValue : LHSValue;
10046
10047       // Check whether an integer constant comparison results in a value
10048       // of 'true' or 'false'.
10049       if (CheckTautologicalComparison(S, E, Const, Other, Value, RhsConstant))
10050         return AnalyzeImpConvsInComparison(S, E);
10051     }
10052   }
10053
10054   if (!T->hasUnsignedIntegerRepresentation()) {
10055     // We don't do anything special if this isn't an unsigned integral
10056     // comparison:  we're only interested in integral comparisons, and
10057     // signed comparisons only happen in cases we don't care to warn about.
10058     return AnalyzeImpConvsInComparison(S, E);
10059   }
10060
10061   LHS = LHS->IgnoreParenImpCasts();
10062   RHS = RHS->IgnoreParenImpCasts();
10063
10064   if (!S.getLangOpts().CPlusPlus) {
10065     // Avoid warning about comparison of integers with different signs when
10066     // RHS/LHS has a `typeof(E)` type whose sign is different from the sign of
10067     // the type of `E`.
10068     if (const auto *TET = dyn_cast<TypeOfExprType>(LHS->getType()))
10069       LHS = TET->getUnderlyingExpr()->IgnoreParenImpCasts();
10070     if (const auto *TET = dyn_cast<TypeOfExprType>(RHS->getType()))
10071       RHS = TET->getUnderlyingExpr()->IgnoreParenImpCasts();
10072   }
10073
10074   // Check to see if one of the (unmodified) operands is of different
10075   // signedness.
10076   Expr *signedOperand, *unsignedOperand;
10077   if (LHS->getType()->hasSignedIntegerRepresentation()) {
10078     assert(!RHS->getType()->hasSignedIntegerRepresentation() &&
10079            "unsigned comparison between two signed integer expressions?");
10080     signedOperand = LHS;
10081     unsignedOperand = RHS;
10082   } else if (RHS->getType()->hasSignedIntegerRepresentation()) {
10083     signedOperand = RHS;
10084     unsignedOperand = LHS;
10085   } else {
10086     return AnalyzeImpConvsInComparison(S, E);
10087   }
10088
10089   // Otherwise, calculate the effective range of the signed operand.
10090   IntRange signedRange = GetExprRange(S.Context, signedOperand);
10091
10092   // Go ahead and analyze implicit conversions in the operands.  Note
10093   // that we skip the implicit conversions on both sides.
10094   AnalyzeImplicitConversions(S, LHS, E->getOperatorLoc());
10095   AnalyzeImplicitConversions(S, RHS, E->getOperatorLoc());
10096
10097   // If the signed range is non-negative, -Wsign-compare won't fire.
10098   if (signedRange.NonNegative)
10099     return;
10100
10101   // For (in)equality comparisons, if the unsigned operand is a
10102   // constant which cannot collide with a overflowed signed operand,
10103   // then reinterpreting the signed operand as unsigned will not
10104   // change the result of the comparison.
10105   if (E->isEqualityOp()) {
10106     unsigned comparisonWidth = S.Context.getIntWidth(T);
10107     IntRange unsignedRange = GetExprRange(S.Context, unsignedOperand);
10108
10109     // We should never be unable to prove that the unsigned operand is
10110     // non-negative.
10111     assert(unsignedRange.NonNegative && "unsigned range includes negative?");
10112
10113     if (unsignedRange.Width < comparisonWidth)
10114       return;
10115   }
10116
10117   S.DiagRuntimeBehavior(E->getOperatorLoc(), E,
10118     S.PDiag(diag::warn_mixed_sign_comparison)
10119       << LHS->getType() << RHS->getType()
10120       << LHS->getSourceRange() << RHS->getSourceRange());
10121 }
10122
10123 /// Analyzes an attempt to assign the given value to a bitfield.
10124 ///
10125 /// Returns true if there was something fishy about the attempt.
10126 static bool AnalyzeBitFieldAssignment(Sema &S, FieldDecl *Bitfield, Expr *Init,
10127                                       SourceLocation InitLoc) {
10128   assert(Bitfield->isBitField());
10129   if (Bitfield->isInvalidDecl())
10130     return false;
10131
10132   // White-list bool bitfields.
10133   QualType BitfieldType = Bitfield->getType();
10134   if (BitfieldType->isBooleanType())
10135      return false;
10136
10137   if (BitfieldType->isEnumeralType()) {
10138     EnumDecl *BitfieldEnumDecl = BitfieldType->getAs<EnumType>()->getDecl();
10139     // If the underlying enum type was not explicitly specified as an unsigned
10140     // type and the enum contain only positive values, MSVC++ will cause an
10141     // inconsistency by storing this as a signed type.
10142     if (S.getLangOpts().CPlusPlus11 &&
10143         !BitfieldEnumDecl->getIntegerTypeSourceInfo() &&
10144         BitfieldEnumDecl->getNumPositiveBits() > 0 &&
10145         BitfieldEnumDecl->getNumNegativeBits() == 0) {
10146       S.Diag(InitLoc, diag::warn_no_underlying_type_specified_for_enum_bitfield)
10147         << BitfieldEnumDecl->getNameAsString();
10148     }
10149   }
10150
10151   if (Bitfield->getType()->isBooleanType())
10152     return false;
10153
10154   // Ignore value- or type-dependent expressions.
10155   if (Bitfield->getBitWidth()->isValueDependent() ||
10156       Bitfield->getBitWidth()->isTypeDependent() ||
10157       Init->isValueDependent() ||
10158       Init->isTypeDependent())
10159     return false;
10160
10161   Expr *OriginalInit = Init->IgnoreParenImpCasts();
10162   unsigned FieldWidth = Bitfield->getBitWidthValue(S.Context);
10163
10164   llvm::APSInt Value;
10165   if (!OriginalInit->EvaluateAsInt(Value, S.Context,
10166                                    Expr::SE_AllowSideEffects)) {
10167     // The RHS is not constant.  If the RHS has an enum type, make sure the
10168     // bitfield is wide enough to hold all the values of the enum without
10169     // truncation.
10170     if (const auto *EnumTy = OriginalInit->getType()->getAs<EnumType>()) {
10171       EnumDecl *ED = EnumTy->getDecl();
10172       bool SignedBitfield = BitfieldType->isSignedIntegerType();
10173
10174       // Enum types are implicitly signed on Windows, so check if there are any
10175       // negative enumerators to see if the enum was intended to be signed or
10176       // not.
10177       bool SignedEnum = ED->getNumNegativeBits() > 0;
10178
10179       // Check for surprising sign changes when assigning enum values to a
10180       // bitfield of different signedness.  If the bitfield is signed and we
10181       // have exactly the right number of bits to store this unsigned enum,
10182       // suggest changing the enum to an unsigned type. This typically happens
10183       // on Windows where unfixed enums always use an underlying type of 'int'.
10184       unsigned DiagID = 0;
10185       if (SignedEnum && !SignedBitfield) {
10186         DiagID = diag::warn_unsigned_bitfield_assigned_signed_enum;
10187       } else if (SignedBitfield && !SignedEnum &&
10188                  ED->getNumPositiveBits() == FieldWidth) {
10189         DiagID = diag::warn_signed_bitfield_enum_conversion;
10190       }
10191
10192       if (DiagID) {
10193         S.Diag(InitLoc, DiagID) << Bitfield << ED;
10194         TypeSourceInfo *TSI = Bitfield->getTypeSourceInfo();
10195         SourceRange TypeRange =
10196             TSI ? TSI->getTypeLoc().getSourceRange() : SourceRange();
10197         S.Diag(Bitfield->getTypeSpecStartLoc(), diag::note_change_bitfield_sign)
10198             << SignedEnum << TypeRange;
10199       }
10200
10201       // Compute the required bitwidth. If the enum has negative values, we need
10202       // one more bit than the normal number of positive bits to represent the
10203       // sign bit.
10204       unsigned BitsNeeded = SignedEnum ? std::max(ED->getNumPositiveBits() + 1,
10205                                                   ED->getNumNegativeBits())
10206                                        : ED->getNumPositiveBits();
10207
10208       // Check the bitwidth.
10209       if (BitsNeeded > FieldWidth) {
10210         Expr *WidthExpr = Bitfield->getBitWidth();
10211         S.Diag(InitLoc, diag::warn_bitfield_too_small_for_enum)
10212             << Bitfield << ED;
10213         S.Diag(WidthExpr->getExprLoc(), diag::note_widen_bitfield)
10214             << BitsNeeded << ED << WidthExpr->getSourceRange();
10215       }
10216     }
10217
10218     return false;
10219   }
10220
10221   unsigned OriginalWidth = Value.getBitWidth();
10222
10223   if (!Value.isSigned() || Value.isNegative())
10224     if (UnaryOperator *UO = dyn_cast<UnaryOperator>(OriginalInit))
10225       if (UO->getOpcode() == UO_Minus || UO->getOpcode() == UO_Not)
10226         OriginalWidth = Value.getMinSignedBits();
10227
10228   if (OriginalWidth <= FieldWidth)
10229     return false;
10230
10231   // Compute the value which the bitfield will contain.
10232   llvm::APSInt TruncatedValue = Value.trunc(FieldWidth);
10233   TruncatedValue.setIsSigned(BitfieldType->isSignedIntegerType());
10234
10235   // Check whether the stored value is equal to the original value.
10236   TruncatedValue = TruncatedValue.extend(OriginalWidth);
10237   if (llvm::APSInt::isSameValue(Value, TruncatedValue))
10238     return false;
10239
10240   // Special-case bitfields of width 1: booleans are naturally 0/1, and
10241   // therefore don't strictly fit into a signed bitfield of width 1.
10242   if (FieldWidth == 1 && Value == 1)
10243     return false;
10244
10245   std::string PrettyValue = Value.toString(10);
10246   std::string PrettyTrunc = TruncatedValue.toString(10);
10247
10248   S.Diag(InitLoc, diag::warn_impcast_bitfield_precision_constant)
10249     << PrettyValue << PrettyTrunc << OriginalInit->getType()
10250     << Init->getSourceRange();
10251
10252   return true;
10253 }
10254
10255 /// Analyze the given simple or compound assignment for warning-worthy
10256 /// operations.
10257 static void AnalyzeAssignment(Sema &S, BinaryOperator *E) {
10258   // Just recurse on the LHS.
10259   AnalyzeImplicitConversions(S, E->getLHS(), E->getOperatorLoc());
10260
10261   // We want to recurse on the RHS as normal unless we're assigning to
10262   // a bitfield.
10263   if (FieldDecl *Bitfield = E->getLHS()->getSourceBitField()) {
10264     if (AnalyzeBitFieldAssignment(S, Bitfield, E->getRHS(),
10265                                   E->getOperatorLoc())) {
10266       // Recurse, ignoring any implicit conversions on the RHS.
10267       return AnalyzeImplicitConversions(S, E->getRHS()->IgnoreParenImpCasts(),
10268                                         E->getOperatorLoc());
10269     }
10270   }
10271
10272   AnalyzeImplicitConversions(S, E->getRHS(), E->getOperatorLoc());
10273 }
10274
10275 /// Diagnose an implicit cast;  purely a helper for CheckImplicitConversion.
10276 static void DiagnoseImpCast(Sema &S, Expr *E, QualType SourceType, QualType T,
10277                             SourceLocation CContext, unsigned diag,
10278                             bool pruneControlFlow = false) {
10279   if (pruneControlFlow) {
10280     S.DiagRuntimeBehavior(E->getExprLoc(), E,
10281                           S.PDiag(diag)
10282                             << SourceType << T << E->getSourceRange()
10283                             << SourceRange(CContext));
10284     return;
10285   }
10286   S.Diag(E->getExprLoc(), diag)
10287     << SourceType << T << E->getSourceRange() << SourceRange(CContext);
10288 }
10289
10290 /// Diagnose an implicit cast;  purely a helper for CheckImplicitConversion.
10291 static void DiagnoseImpCast(Sema &S, Expr *E, QualType T,
10292                             SourceLocation CContext,
10293                             unsigned diag, bool pruneControlFlow = false) {
10294   DiagnoseImpCast(S, E, E->getType(), T, CContext, diag, pruneControlFlow);
10295 }
10296
10297 /// Analyze the given compound assignment for the possible losing of
10298 /// floating-point precision.
10299 static void AnalyzeCompoundAssignment(Sema &S, BinaryOperator *E) {
10300   assert(isa<CompoundAssignOperator>(E) &&
10301          "Must be compound assignment operation");
10302   // Recurse on the LHS and RHS in here
10303   AnalyzeImplicitConversions(S, E->getLHS(), E->getOperatorLoc());
10304   AnalyzeImplicitConversions(S, E->getRHS(), E->getOperatorLoc());
10305
10306   // Now check the outermost expression
10307   const auto *ResultBT = E->getLHS()->getType()->getAs<BuiltinType>();
10308   const auto *RBT = cast<CompoundAssignOperator>(E)
10309                         ->getComputationResultType()
10310                         ->getAs<BuiltinType>();
10311
10312   // If both source and target are floating points.
10313   if (ResultBT && ResultBT->isFloatingPoint() && RBT && RBT->isFloatingPoint())
10314     // Builtin FP kinds are ordered by increasing FP rank.
10315     if (ResultBT->getKind() < RBT->getKind())
10316       // We don't want to warn for system macro.
10317       if (!S.SourceMgr.isInSystemMacro(E->getOperatorLoc()))
10318         // warn about dropping FP rank.
10319         DiagnoseImpCast(S, E->getRHS(), E->getLHS()->getType(),
10320                         E->getOperatorLoc(),
10321                         diag::warn_impcast_float_result_precision);
10322 }
10323
10324 /// Diagnose an implicit cast from a floating point value to an integer value.
10325 static void DiagnoseFloatingImpCast(Sema &S, Expr *E, QualType T,
10326                                     SourceLocation CContext) {
10327   const bool IsBool = T->isSpecificBuiltinType(BuiltinType::Bool);
10328   const bool PruneWarnings = S.inTemplateInstantiation();
10329
10330   Expr *InnerE = E->IgnoreParenImpCasts();
10331   // We also want to warn on, e.g., "int i = -1.234"
10332   if (UnaryOperator *UOp = dyn_cast<UnaryOperator>(InnerE))
10333     if (UOp->getOpcode() == UO_Minus || UOp->getOpcode() == UO_Plus)
10334       InnerE = UOp->getSubExpr()->IgnoreParenImpCasts();
10335
10336   const bool IsLiteral =
10337       isa<FloatingLiteral>(E) || isa<FloatingLiteral>(InnerE);
10338
10339   llvm::APFloat Value(0.0);
10340   bool IsConstant =
10341     E->EvaluateAsFloat(Value, S.Context, Expr::SE_AllowSideEffects);
10342   if (!IsConstant) {
10343     return DiagnoseImpCast(S, E, T, CContext,
10344                            diag::warn_impcast_float_integer, PruneWarnings);
10345   }
10346
10347   bool isExact = false;
10348
10349   llvm::APSInt IntegerValue(S.Context.getIntWidth(T),
10350                             T->hasUnsignedIntegerRepresentation());
10351   llvm::APFloat::opStatus Result = Value.convertToInteger(
10352       IntegerValue, llvm::APFloat::rmTowardZero, &isExact);
10353
10354   if (Result == llvm::APFloat::opOK && isExact) {
10355     if (IsLiteral) return;
10356     return DiagnoseImpCast(S, E, T, CContext, diag::warn_impcast_float_integer,
10357                            PruneWarnings);
10358   }
10359
10360   // Conversion of a floating-point value to a non-bool integer where the
10361   // integral part cannot be represented by the integer type is undefined.
10362   if (!IsBool && Result == llvm::APFloat::opInvalidOp)
10363     return DiagnoseImpCast(
10364         S, E, T, CContext,
10365         IsLiteral ? diag::warn_impcast_literal_float_to_integer_out_of_range
10366                   : diag::warn_impcast_float_to_integer_out_of_range,
10367         PruneWarnings);
10368
10369   unsigned DiagID = 0;
10370   if (IsLiteral) {
10371     // Warn on floating point literal to integer.
10372     DiagID = diag::warn_impcast_literal_float_to_integer;
10373   } else if (IntegerValue == 0) {
10374     if (Value.isZero()) {  // Skip -0.0 to 0 conversion.
10375       return DiagnoseImpCast(S, E, T, CContext,
10376                              diag::warn_impcast_float_integer, PruneWarnings);
10377     }
10378     // Warn on non-zero to zero conversion.
10379     DiagID = diag::warn_impcast_float_to_integer_zero;
10380   } else {
10381     if (IntegerValue.isUnsigned()) {
10382       if (!IntegerValue.isMaxValue()) {
10383         return DiagnoseImpCast(S, E, T, CContext,
10384                                diag::warn_impcast_float_integer, PruneWarnings);
10385       }
10386     } else {  // IntegerValue.isSigned()
10387       if (!IntegerValue.isMaxSignedValue() &&
10388           !IntegerValue.isMinSignedValue()) {
10389         return DiagnoseImpCast(S, E, T, CContext,
10390                                diag::warn_impcast_float_integer, PruneWarnings);
10391       }
10392     }
10393     // Warn on evaluatable floating point expression to integer conversion.
10394     DiagID = diag::warn_impcast_float_to_integer;
10395   }
10396
10397   // FIXME: Force the precision of the source value down so we don't print
10398   // digits which are usually useless (we don't really care here if we
10399   // truncate a digit by accident in edge cases).  Ideally, APFloat::toString
10400   // would automatically print the shortest representation, but it's a bit
10401   // tricky to implement.
10402   SmallString<16> PrettySourceValue;
10403   unsigned precision = llvm::APFloat::semanticsPrecision(Value.getSemantics());
10404   precision = (precision * 59 + 195) / 196;
10405   Value.toString(PrettySourceValue, precision);
10406
10407   SmallString<16> PrettyTargetValue;
10408   if (IsBool)
10409     PrettyTargetValue = Value.isZero() ? "false" : "true";
10410   else
10411     IntegerValue.toString(PrettyTargetValue);
10412
10413   if (PruneWarnings) {
10414     S.DiagRuntimeBehavior(E->getExprLoc(), E,
10415                           S.PDiag(DiagID)
10416                               << E->getType() << T.getUnqualifiedType()
10417                               << PrettySourceValue << PrettyTargetValue
10418                               << E->getSourceRange() << SourceRange(CContext));
10419   } else {
10420     S.Diag(E->getExprLoc(), DiagID)
10421         << E->getType() << T.getUnqualifiedType() << PrettySourceValue
10422         << PrettyTargetValue << E->getSourceRange() << SourceRange(CContext);
10423   }
10424 }
10425
10426 static std::string PrettyPrintInRange(const llvm::APSInt &Value,
10427                                       IntRange Range) {
10428   if (!Range.Width) return "0";
10429
10430   llvm::APSInt ValueInRange = Value;
10431   ValueInRange.setIsSigned(!Range.NonNegative);
10432   ValueInRange = ValueInRange.trunc(Range.Width);
10433   return ValueInRange.toString(10);
10434 }
10435
10436 static bool IsImplicitBoolFloatConversion(Sema &S, Expr *Ex, bool ToBool) {
10437   if (!isa<ImplicitCastExpr>(Ex))
10438     return false;
10439
10440   Expr *InnerE = Ex->IgnoreParenImpCasts();
10441   const Type *Target = S.Context.getCanonicalType(Ex->getType()).getTypePtr();
10442   const Type *Source =
10443     S.Context.getCanonicalType(InnerE->getType()).getTypePtr();
10444   if (Target->isDependentType())
10445     return false;
10446
10447   const BuiltinType *FloatCandidateBT =
10448     dyn_cast<BuiltinType>(ToBool ? Source : Target);
10449   const Type *BoolCandidateType = ToBool ? Target : Source;
10450
10451   return (BoolCandidateType->isSpecificBuiltinType(BuiltinType::Bool) &&
10452           FloatCandidateBT && (FloatCandidateBT->isFloatingPoint()));
10453 }
10454
10455 static void CheckImplicitArgumentConversions(Sema &S, CallExpr *TheCall,
10456                                              SourceLocation CC) {
10457   unsigned NumArgs = TheCall->getNumArgs();
10458   for (unsigned i = 0; i < NumArgs; ++i) {
10459     Expr *CurrA = TheCall->getArg(i);
10460     if (!IsImplicitBoolFloatConversion(S, CurrA, true))
10461       continue;
10462
10463     bool IsSwapped = ((i > 0) &&
10464         IsImplicitBoolFloatConversion(S, TheCall->getArg(i - 1), false));
10465     IsSwapped |= ((i < (NumArgs - 1)) &&
10466         IsImplicitBoolFloatConversion(S, TheCall->getArg(i + 1), false));
10467     if (IsSwapped) {
10468       // Warn on this floating-point to bool conversion.
10469       DiagnoseImpCast(S, CurrA->IgnoreParenImpCasts(),
10470                       CurrA->getType(), CC,
10471                       diag::warn_impcast_floating_point_to_bool);
10472     }
10473   }
10474 }
10475
10476 static void DiagnoseNullConversion(Sema &S, Expr *E, QualType T,
10477                                    SourceLocation CC) {
10478   if (S.Diags.isIgnored(diag::warn_impcast_null_pointer_to_integer,
10479                         E->getExprLoc()))
10480     return;
10481
10482   // Don't warn on functions which have return type nullptr_t.
10483   if (isa<CallExpr>(E))
10484     return;
10485
10486   // Check for NULL (GNUNull) or nullptr (CXX11_nullptr).
10487   const Expr::NullPointerConstantKind NullKind =
10488       E->isNullPointerConstant(S.Context, Expr::NPC_ValueDependentIsNotNull);
10489   if (NullKind != Expr::NPCK_GNUNull && NullKind != Expr::NPCK_CXX11_nullptr)
10490     return;
10491
10492   // Return if target type is a safe conversion.
10493   if (T->isAnyPointerType() || T->isBlockPointerType() ||
10494       T->isMemberPointerType() || !T->isScalarType() || T->isNullPtrType())
10495     return;
10496
10497   SourceLocation Loc = E->getSourceRange().getBegin();
10498
10499   // Venture through the macro stacks to get to the source of macro arguments.
10500   // The new location is a better location than the complete location that was
10501   // passed in.
10502   Loc = S.SourceMgr.getTopMacroCallerLoc(Loc);
10503   CC = S.SourceMgr.getTopMacroCallerLoc(CC);
10504
10505   // __null is usually wrapped in a macro.  Go up a macro if that is the case.
10506   if (NullKind == Expr::NPCK_GNUNull && Loc.isMacroID()) {
10507     StringRef MacroName = Lexer::getImmediateMacroNameForDiagnostics(
10508         Loc, S.SourceMgr, S.getLangOpts());
10509     if (MacroName == "NULL")
10510       Loc = S.SourceMgr.getImmediateExpansionRange(Loc).getBegin();
10511   }
10512
10513   // Only warn if the null and context location are in the same macro expansion.
10514   if (S.SourceMgr.getFileID(Loc) != S.SourceMgr.getFileID(CC))
10515     return;
10516
10517   S.Diag(Loc, diag::warn_impcast_null_pointer_to_integer)
10518       << (NullKind == Expr::NPCK_CXX11_nullptr) << T << SourceRange(CC)
10519       << FixItHint::CreateReplacement(Loc,
10520                                       S.getFixItZeroLiteralForType(T, Loc));
10521 }
10522
10523 static void checkObjCArrayLiteral(Sema &S, QualType TargetType,
10524                                   ObjCArrayLiteral *ArrayLiteral);
10525
10526 static void
10527 checkObjCDictionaryLiteral(Sema &S, QualType TargetType,
10528                            ObjCDictionaryLiteral *DictionaryLiteral);
10529
10530 /// Check a single element within a collection literal against the
10531 /// target element type.
10532 static void checkObjCCollectionLiteralElement(Sema &S,
10533                                               QualType TargetElementType,
10534                                               Expr *Element,
10535                                               unsigned ElementKind) {
10536   // Skip a bitcast to 'id' or qualified 'id'.
10537   if (auto ICE = dyn_cast<ImplicitCastExpr>(Element)) {
10538     if (ICE->getCastKind() == CK_BitCast &&
10539         ICE->getSubExpr()->getType()->getAs<ObjCObjectPointerType>())
10540       Element = ICE->getSubExpr();
10541   }
10542
10543   QualType ElementType = Element->getType();
10544   ExprResult ElementResult(Element);
10545   if (ElementType->getAs<ObjCObjectPointerType>() &&
10546       S.CheckSingleAssignmentConstraints(TargetElementType,
10547                                          ElementResult,
10548                                          false, false)
10549         != Sema::Compatible) {
10550     S.Diag(Element->getLocStart(),
10551            diag::warn_objc_collection_literal_element)
10552       << ElementType << ElementKind << TargetElementType
10553       << Element->getSourceRange();
10554   }
10555
10556   if (auto ArrayLiteral = dyn_cast<ObjCArrayLiteral>(Element))
10557     checkObjCArrayLiteral(S, TargetElementType, ArrayLiteral);
10558   else if (auto DictionaryLiteral = dyn_cast<ObjCDictionaryLiteral>(Element))
10559     checkObjCDictionaryLiteral(S, TargetElementType, DictionaryLiteral);
10560 }
10561
10562 /// Check an Objective-C array literal being converted to the given
10563 /// target type.
10564 static void checkObjCArrayLiteral(Sema &S, QualType TargetType,
10565                                   ObjCArrayLiteral *ArrayLiteral) {
10566   if (!S.NSArrayDecl)
10567     return;
10568
10569   const auto *TargetObjCPtr = TargetType->getAs<ObjCObjectPointerType>();
10570   if (!TargetObjCPtr)
10571     return;
10572
10573   if (TargetObjCPtr->isUnspecialized() ||
10574       TargetObjCPtr->getInterfaceDecl()->getCanonicalDecl()
10575         != S.NSArrayDecl->getCanonicalDecl())
10576     return;
10577
10578   auto TypeArgs = TargetObjCPtr->getTypeArgs();
10579   if (TypeArgs.size() != 1)
10580     return;
10581
10582   QualType TargetElementType = TypeArgs[0];
10583   for (unsigned I = 0, N = ArrayLiteral->getNumElements(); I != N; ++I) {
10584     checkObjCCollectionLiteralElement(S, TargetElementType,
10585                                       ArrayLiteral->getElement(I),
10586                                       0);
10587   }
10588 }
10589
10590 /// Check an Objective-C dictionary literal being converted to the given
10591 /// target type.
10592 static void
10593 checkObjCDictionaryLiteral(Sema &S, QualType TargetType,
10594                            ObjCDictionaryLiteral *DictionaryLiteral) {
10595   if (!S.NSDictionaryDecl)
10596     return;
10597
10598   const auto *TargetObjCPtr = TargetType->getAs<ObjCObjectPointerType>();
10599   if (!TargetObjCPtr)
10600     return;
10601
10602   if (TargetObjCPtr->isUnspecialized() ||
10603       TargetObjCPtr->getInterfaceDecl()->getCanonicalDecl()
10604         != S.NSDictionaryDecl->getCanonicalDecl())
10605     return;
10606
10607   auto TypeArgs = TargetObjCPtr->getTypeArgs();
10608   if (TypeArgs.size() != 2)
10609     return;
10610
10611   QualType TargetKeyType = TypeArgs[0];
10612   QualType TargetObjectType = TypeArgs[1];
10613   for (unsigned I = 0, N = DictionaryLiteral->getNumElements(); I != N; ++I) {
10614     auto Element = DictionaryLiteral->getKeyValueElement(I);
10615     checkObjCCollectionLiteralElement(S, TargetKeyType, Element.Key, 1);
10616     checkObjCCollectionLiteralElement(S, TargetObjectType, Element.Value, 2);
10617   }
10618 }
10619
10620 // Helper function to filter out cases for constant width constant conversion.
10621 // Don't warn on char array initialization or for non-decimal values.
10622 static bool isSameWidthConstantConversion(Sema &S, Expr *E, QualType T,
10623                                           SourceLocation CC) {
10624   // If initializing from a constant, and the constant starts with '0',
10625   // then it is a binary, octal, or hexadecimal.  Allow these constants
10626   // to fill all the bits, even if there is a sign change.
10627   if (auto *IntLit = dyn_cast<IntegerLiteral>(E->IgnoreParenImpCasts())) {
10628     const char FirstLiteralCharacter =
10629         S.getSourceManager().getCharacterData(IntLit->getLocStart())[0];
10630     if (FirstLiteralCharacter == '0')
10631       return false;
10632   }
10633
10634   // If the CC location points to a '{', and the type is char, then assume
10635   // assume it is an array initialization.
10636   if (CC.isValid() && T->isCharType()) {
10637     const char FirstContextCharacter =
10638         S.getSourceManager().getCharacterData(CC)[0];
10639     if (FirstContextCharacter == '{')
10640       return false;
10641   }
10642
10643   return true;
10644 }
10645
10646 static void
10647 CheckImplicitConversion(Sema &S, Expr *E, QualType T, SourceLocation CC,
10648                         bool *ICContext = nullptr) {
10649   if (E->isTypeDependent() || E->isValueDependent()) return;
10650
10651   const Type *Source = S.Context.getCanonicalType(E->getType()).getTypePtr();
10652   const Type *Target = S.Context.getCanonicalType(T).getTypePtr();
10653   if (Source == Target) return;
10654   if (Target->isDependentType()) return;
10655
10656   // If the conversion context location is invalid don't complain. We also
10657   // don't want to emit a warning if the issue occurs from the expansion of
10658   // a system macro. The problem is that 'getSpellingLoc()' is slow, so we
10659   // delay this check as long as possible. Once we detect we are in that
10660   // scenario, we just return.
10661   if (CC.isInvalid())
10662     return;
10663
10664   // Diagnose implicit casts to bool.
10665   if (Target->isSpecificBuiltinType(BuiltinType::Bool)) {
10666     if (isa<StringLiteral>(E))
10667       // Warn on string literal to bool.  Checks for string literals in logical
10668       // and expressions, for instance, assert(0 && "error here"), are
10669       // prevented by a check in AnalyzeImplicitConversions().
10670       return DiagnoseImpCast(S, E, T, CC,
10671                              diag::warn_impcast_string_literal_to_bool);
10672     if (isa<ObjCStringLiteral>(E) || isa<ObjCArrayLiteral>(E) ||
10673         isa<ObjCDictionaryLiteral>(E) || isa<ObjCBoxedExpr>(E)) {
10674       // This covers the literal expressions that evaluate to Objective-C
10675       // objects.
10676       return DiagnoseImpCast(S, E, T, CC,
10677                              diag::warn_impcast_objective_c_literal_to_bool);
10678     }
10679     if (Source->isPointerType() || Source->canDecayToPointerType()) {
10680       // Warn on pointer to bool conversion that is always true.
10681       S.DiagnoseAlwaysNonNullPointer(E, Expr::NPCK_NotNull, /*IsEqual*/ false,
10682                                      SourceRange(CC));
10683     }
10684   }
10685
10686   // Check implicit casts from Objective-C collection literals to specialized
10687   // collection types, e.g., NSArray<NSString *> *.
10688   if (auto *ArrayLiteral = dyn_cast<ObjCArrayLiteral>(E))
10689     checkObjCArrayLiteral(S, QualType(Target, 0), ArrayLiteral);
10690   else if (auto *DictionaryLiteral = dyn_cast<ObjCDictionaryLiteral>(E))
10691     checkObjCDictionaryLiteral(S, QualType(Target, 0), DictionaryLiteral);
10692
10693   // Strip vector types.
10694   if (isa<VectorType>(Source)) {
10695     if (!isa<VectorType>(Target)) {
10696       if (S.SourceMgr.isInSystemMacro(CC))
10697         return;
10698       return DiagnoseImpCast(S, E, T, CC, diag::warn_impcast_vector_scalar);
10699     }
10700
10701     // If the vector cast is cast between two vectors of the same size, it is
10702     // a bitcast, not a conversion.
10703     if (S.Context.getTypeSize(Source) == S.Context.getTypeSize(Target))
10704       return;
10705
10706     Source = cast<VectorType>(Source)->getElementType().getTypePtr();
10707     Target = cast<VectorType>(Target)->getElementType().getTypePtr();
10708   }
10709   if (auto VecTy = dyn_cast<VectorType>(Target))
10710     Target = VecTy->getElementType().getTypePtr();
10711
10712   // Strip complex types.
10713   if (isa<ComplexType>(Source)) {
10714     if (!isa<ComplexType>(Target)) {
10715       if (S.SourceMgr.isInSystemMacro(CC) || Target->isBooleanType())
10716         return;
10717
10718       return DiagnoseImpCast(S, E, T, CC,
10719                              S.getLangOpts().CPlusPlus
10720                                  ? diag::err_impcast_complex_scalar
10721                                  : diag::warn_impcast_complex_scalar);
10722     }
10723
10724     Source = cast<ComplexType>(Source)->getElementType().getTypePtr();
10725     Target = cast<ComplexType>(Target)->getElementType().getTypePtr();
10726   }
10727
10728   const BuiltinType *SourceBT = dyn_cast<BuiltinType>(Source);
10729   const BuiltinType *TargetBT = dyn_cast<BuiltinType>(Target);
10730
10731   // If the source is floating point...
10732   if (SourceBT && SourceBT->isFloatingPoint()) {
10733     // ...and the target is floating point...
10734     if (TargetBT && TargetBT->isFloatingPoint()) {
10735       // ...then warn if we're dropping FP rank.
10736
10737       // Builtin FP kinds are ordered by increasing FP rank.
10738       if (SourceBT->getKind() > TargetBT->getKind()) {
10739         // Don't warn about float constants that are precisely
10740         // representable in the target type.
10741         Expr::EvalResult result;
10742         if (E->EvaluateAsRValue(result, S.Context)) {
10743           // Value might be a float, a float vector, or a float complex.
10744           if (IsSameFloatAfterCast(result.Val,
10745                    S.Context.getFloatTypeSemantics(QualType(TargetBT, 0)),
10746                    S.Context.getFloatTypeSemantics(QualType(SourceBT, 0))))
10747             return;
10748         }
10749
10750         if (S.SourceMgr.isInSystemMacro(CC))
10751           return;
10752
10753         DiagnoseImpCast(S, E, T, CC, diag::warn_impcast_float_precision);
10754       }
10755       // ... or possibly if we're increasing rank, too
10756       else if (TargetBT->getKind() > SourceBT->getKind()) {
10757         if (S.SourceMgr.isInSystemMacro(CC))
10758           return;
10759
10760         DiagnoseImpCast(S, E, T, CC, diag::warn_impcast_double_promotion);
10761       }
10762       return;
10763     }
10764
10765     // If the target is integral, always warn.
10766     if (TargetBT && TargetBT->isInteger()) {
10767       if (S.SourceMgr.isInSystemMacro(CC))
10768         return;
10769
10770       DiagnoseFloatingImpCast(S, E, T, CC);
10771     }
10772
10773     // Detect the case where a call result is converted from floating-point to
10774     // to bool, and the final argument to the call is converted from bool, to
10775     // discover this typo:
10776     //
10777     //    bool b = fabs(x < 1.0);  // should be "bool b = fabs(x) < 1.0;"
10778     //
10779     // FIXME: This is an incredibly special case; is there some more general
10780     // way to detect this class of misplaced-parentheses bug?
10781     if (Target->isBooleanType() && isa<CallExpr>(E)) {
10782       // Check last argument of function call to see if it is an
10783       // implicit cast from a type matching the type the result
10784       // is being cast to.
10785       CallExpr *CEx = cast<CallExpr>(E);
10786       if (unsigned NumArgs = CEx->getNumArgs()) {
10787         Expr *LastA = CEx->getArg(NumArgs - 1);
10788         Expr *InnerE = LastA->IgnoreParenImpCasts();
10789         if (isa<ImplicitCastExpr>(LastA) &&
10790             InnerE->getType()->isBooleanType()) {
10791           // Warn on this floating-point to bool conversion
10792           DiagnoseImpCast(S, E, T, CC,
10793                           diag::warn_impcast_floating_point_to_bool);
10794         }
10795       }
10796     }
10797     return;
10798   }
10799
10800   DiagnoseNullConversion(S, E, T, CC);
10801
10802   S.DiscardMisalignedMemberAddress(Target, E);
10803
10804   if (!Source->isIntegerType() || !Target->isIntegerType())
10805     return;
10806
10807   // TODO: remove this early return once the false positives for constant->bool
10808   // in templates, macros, etc, are reduced or removed.
10809   if (Target->isSpecificBuiltinType(BuiltinType::Bool))
10810     return;
10811
10812   IntRange SourceRange = GetExprRange(S.Context, E);
10813   IntRange TargetRange = IntRange::forTargetOfCanonicalType(S.Context, Target);
10814
10815   if (SourceRange.Width > TargetRange.Width) {
10816     // If the source is a constant, use a default-on diagnostic.
10817     // TODO: this should happen for bitfield stores, too.
10818     llvm::APSInt Value(32);
10819     if (E->EvaluateAsInt(Value, S.Context, Expr::SE_AllowSideEffects)) {
10820       if (S.SourceMgr.isInSystemMacro(CC))
10821         return;
10822
10823       std::string PrettySourceValue = Value.toString(10);
10824       std::string PrettyTargetValue = PrettyPrintInRange(Value, TargetRange);
10825
10826       S.DiagRuntimeBehavior(E->getExprLoc(), E,
10827         S.PDiag(diag::warn_impcast_integer_precision_constant)
10828             << PrettySourceValue << PrettyTargetValue
10829             << E->getType() << T << E->getSourceRange()
10830             << clang::SourceRange(CC));
10831       return;
10832     }
10833
10834     // People want to build with -Wshorten-64-to-32 and not -Wconversion.
10835     if (S.SourceMgr.isInSystemMacro(CC))
10836       return;
10837
10838     if (TargetRange.Width == 32 && S.Context.getIntWidth(E->getType()) == 64)
10839       return DiagnoseImpCast(S, E, T, CC, diag::warn_impcast_integer_64_32,
10840                              /* pruneControlFlow */ true);
10841     return DiagnoseImpCast(S, E, T, CC, diag::warn_impcast_integer_precision);
10842   }
10843
10844   if (TargetRange.Width == SourceRange.Width && !TargetRange.NonNegative &&
10845       SourceRange.NonNegative && Source->isSignedIntegerType()) {
10846     // Warn when doing a signed to signed conversion, warn if the positive
10847     // source value is exactly the width of the target type, which will
10848     // cause a negative value to be stored.
10849
10850     llvm::APSInt Value;
10851     if (E->EvaluateAsInt(Value, S.Context, Expr::SE_AllowSideEffects) &&
10852         !S.SourceMgr.isInSystemMacro(CC)) {
10853       if (isSameWidthConstantConversion(S, E, T, CC)) {
10854         std::string PrettySourceValue = Value.toString(10);
10855         std::string PrettyTargetValue = PrettyPrintInRange(Value, TargetRange);
10856
10857         S.DiagRuntimeBehavior(
10858             E->getExprLoc(), E,
10859             S.PDiag(diag::warn_impcast_integer_precision_constant)
10860                 << PrettySourceValue << PrettyTargetValue << E->getType() << T
10861                 << E->getSourceRange() << clang::SourceRange(CC));
10862         return;
10863       }
10864     }
10865
10866     // Fall through for non-constants to give a sign conversion warning.
10867   }
10868
10869   if ((TargetRange.NonNegative && !SourceRange.NonNegative) ||
10870       (!TargetRange.NonNegative && SourceRange.NonNegative &&
10871        SourceRange.Width == TargetRange.Width)) {
10872     if (S.SourceMgr.isInSystemMacro(CC))
10873       return;
10874
10875     unsigned DiagID = diag::warn_impcast_integer_sign;
10876
10877     // Traditionally, gcc has warned about this under -Wsign-compare.
10878     // We also want to warn about it in -Wconversion.
10879     // So if -Wconversion is off, use a completely identical diagnostic
10880     // in the sign-compare group.
10881     // The conditional-checking code will
10882     if (ICContext) {
10883       DiagID = diag::warn_impcast_integer_sign_conditional;
10884       *ICContext = true;
10885     }
10886
10887     return DiagnoseImpCast(S, E, T, CC, DiagID);
10888   }
10889
10890   // Diagnose conversions between different enumeration types.
10891   // In C, we pretend that the type of an EnumConstantDecl is its enumeration
10892   // type, to give us better diagnostics.
10893   QualType SourceType = E->getType();
10894   if (!S.getLangOpts().CPlusPlus) {
10895     if (DeclRefExpr *DRE = dyn_cast<DeclRefExpr>(E))
10896       if (EnumConstantDecl *ECD = dyn_cast<EnumConstantDecl>(DRE->getDecl())) {
10897         EnumDecl *Enum = cast<EnumDecl>(ECD->getDeclContext());
10898         SourceType = S.Context.getTypeDeclType(Enum);
10899         Source = S.Context.getCanonicalType(SourceType).getTypePtr();
10900       }
10901   }
10902
10903   if (const EnumType *SourceEnum = Source->getAs<EnumType>())
10904     if (const EnumType *TargetEnum = Target->getAs<EnumType>())
10905       if (SourceEnum->getDecl()->hasNameForLinkage() &&
10906           TargetEnum->getDecl()->hasNameForLinkage() &&
10907           SourceEnum != TargetEnum) {
10908         if (S.SourceMgr.isInSystemMacro(CC))
10909           return;
10910
10911         return DiagnoseImpCast(S, E, SourceType, T, CC,
10912                                diag::warn_impcast_different_enum_types);
10913       }
10914 }
10915
10916 static void CheckConditionalOperator(Sema &S, ConditionalOperator *E,
10917                                      SourceLocation CC, QualType T);
10918
10919 static void CheckConditionalOperand(Sema &S, Expr *E, QualType T,
10920                                     SourceLocation CC, bool &ICContext) {
10921   E = E->IgnoreParenImpCasts();
10922
10923   if (isa<ConditionalOperator>(E))
10924     return CheckConditionalOperator(S, cast<ConditionalOperator>(E), CC, T);
10925
10926   AnalyzeImplicitConversions(S, E, CC);
10927   if (E->getType() != T)
10928     return CheckImplicitConversion(S, E, T, CC, &ICContext);
10929 }
10930
10931 static void CheckConditionalOperator(Sema &S, ConditionalOperator *E,
10932                                      SourceLocation CC, QualType T) {
10933   AnalyzeImplicitConversions(S, E->getCond(), E->getQuestionLoc());
10934
10935   bool Suspicious = false;
10936   CheckConditionalOperand(S, E->getTrueExpr(), T, CC, Suspicious);
10937   CheckConditionalOperand(S, E->getFalseExpr(), T, CC, Suspicious);
10938
10939   // If -Wconversion would have warned about either of the candidates
10940   // for a signedness conversion to the context type...
10941   if (!Suspicious) return;
10942
10943   // ...but it's currently ignored...
10944   if (!S.Diags.isIgnored(diag::warn_impcast_integer_sign_conditional, CC))
10945     return;
10946
10947   // ...then check whether it would have warned about either of the
10948   // candidates for a signedness conversion to the condition type.
10949   if (E->getType() == T) return;
10950
10951   Suspicious = false;
10952   CheckImplicitConversion(S, E->getTrueExpr()->IgnoreParenImpCasts(),
10953                           E->getType(), CC, &Suspicious);
10954   if (!Suspicious)
10955     CheckImplicitConversion(S, E->getFalseExpr()->IgnoreParenImpCasts(),
10956                             E->getType(), CC, &Suspicious);
10957 }
10958
10959 /// CheckBoolLikeConversion - Check conversion of given expression to boolean.
10960 /// Input argument E is a logical expression.
10961 static void CheckBoolLikeConversion(Sema &S, Expr *E, SourceLocation CC) {
10962   if (S.getLangOpts().Bool)
10963     return;
10964   CheckImplicitConversion(S, E->IgnoreParenImpCasts(), S.Context.BoolTy, CC);
10965 }
10966
10967 /// AnalyzeImplicitConversions - Find and report any interesting
10968 /// implicit conversions in the given expression.  There are a couple
10969 /// of competing diagnostics here, -Wconversion and -Wsign-compare.
10970 static void AnalyzeImplicitConversions(Sema &S, Expr *OrigE,
10971                                        SourceLocation CC) {
10972   QualType T = OrigE->getType();
10973   Expr *E = OrigE->IgnoreParenImpCasts();
10974
10975   if (E->isTypeDependent() || E->isValueDependent())
10976     return;
10977
10978   // For conditional operators, we analyze the arguments as if they
10979   // were being fed directly into the output.
10980   if (isa<ConditionalOperator>(E)) {
10981     ConditionalOperator *CO = cast<ConditionalOperator>(E);
10982     CheckConditionalOperator(S, CO, CC, T);
10983     return;
10984   }
10985
10986   // Check implicit argument conversions for function calls.
10987   if (CallExpr *Call = dyn_cast<CallExpr>(E))
10988     CheckImplicitArgumentConversions(S, Call, CC);
10989
10990   // Go ahead and check any implicit conversions we might have skipped.
10991   // The non-canonical typecheck is just an optimization;
10992   // CheckImplicitConversion will filter out dead implicit conversions.
10993   if (E->getType() != T)
10994     CheckImplicitConversion(S, E, T, CC);
10995
10996   // Now continue drilling into this expression.
10997
10998   if (PseudoObjectExpr *POE = dyn_cast<PseudoObjectExpr>(E)) {
10999     // The bound subexpressions in a PseudoObjectExpr are not reachable
11000     // as transitive children.
11001     // FIXME: Use a more uniform representation for this.
11002     for (auto *SE : POE->semantics())
11003       if (auto *OVE = dyn_cast<OpaqueValueExpr>(SE))
11004         AnalyzeImplicitConversions(S, OVE->getSourceExpr(), CC);
11005   }
11006
11007   // Skip past explicit casts.
11008   if (isa<ExplicitCastExpr>(E)) {
11009     E = cast<ExplicitCastExpr>(E)->getSubExpr()->IgnoreParenImpCasts();
11010     return AnalyzeImplicitConversions(S, E, CC);
11011   }
11012
11013   if (BinaryOperator *BO = dyn_cast<BinaryOperator>(E)) {
11014     // Do a somewhat different check with comparison operators.
11015     if (BO->isComparisonOp())
11016       return AnalyzeComparison(S, BO);
11017
11018     // And with simple assignments.
11019     if (BO->getOpcode() == BO_Assign)
11020       return AnalyzeAssignment(S, BO);
11021     // And with compound assignments.
11022     if (BO->isAssignmentOp())
11023       return AnalyzeCompoundAssignment(S, BO);
11024   }
11025
11026   // These break the otherwise-useful invariant below.  Fortunately,
11027   // we don't really need to recurse into them, because any internal
11028   // expressions should have been analyzed already when they were
11029   // built into statements.
11030   if (isa<StmtExpr>(E)) return;
11031
11032   // Don't descend into unevaluated contexts.
11033   if (isa<UnaryExprOrTypeTraitExpr>(E)) return;
11034
11035   // Now just recurse over the expression's children.
11036   CC = E->getExprLoc();
11037   BinaryOperator *BO = dyn_cast<BinaryOperator>(E);
11038   bool IsLogicalAndOperator = BO && BO->getOpcode() == BO_LAnd;
11039   for (Stmt *SubStmt : E->children()) {
11040     Expr *ChildExpr = dyn_cast_or_null<Expr>(SubStmt);
11041     if (!ChildExpr)
11042       continue;
11043
11044     if (IsLogicalAndOperator &&
11045         isa<StringLiteral>(ChildExpr->IgnoreParenImpCasts()))
11046       // Ignore checking string literals that are in logical and operators.
11047       // This is a common pattern for asserts.
11048       continue;
11049     AnalyzeImplicitConversions(S, ChildExpr, CC);
11050   }
11051
11052   if (BO && BO->isLogicalOp()) {
11053     Expr *SubExpr = BO->getLHS()->IgnoreParenImpCasts();
11054     if (!IsLogicalAndOperator || !isa<StringLiteral>(SubExpr))
11055       ::CheckBoolLikeConversion(S, SubExpr, BO->getExprLoc());
11056
11057     SubExpr = BO->getRHS()->IgnoreParenImpCasts();
11058     if (!IsLogicalAndOperator || !isa<StringLiteral>(SubExpr))
11059       ::CheckBoolLikeConversion(S, SubExpr, BO->getExprLoc());
11060   }
11061
11062   if (const UnaryOperator *U = dyn_cast<UnaryOperator>(E))
11063     if (U->getOpcode() == UO_LNot)
11064       ::CheckBoolLikeConversion(S, U->getSubExpr(), CC);
11065 }
11066
11067 /// Diagnose integer type and any valid implicit conversion to it.
11068 static bool checkOpenCLEnqueueIntType(Sema &S, Expr *E, const QualType &IntT) {
11069   // Taking into account implicit conversions,
11070   // allow any integer.
11071   if (!E->getType()->isIntegerType()) {
11072     S.Diag(E->getLocStart(),
11073            diag::err_opencl_enqueue_kernel_invalid_local_size_type);
11074     return true;
11075   }
11076   // Potentially emit standard warnings for implicit conversions if enabled
11077   // using -Wconversion.
11078   CheckImplicitConversion(S, E, IntT, E->getLocStart());
11079   return false;
11080 }
11081
11082 // Helper function for Sema::DiagnoseAlwaysNonNullPointer.
11083 // Returns true when emitting a warning about taking the address of a reference.
11084 static bool CheckForReference(Sema &SemaRef, const Expr *E,
11085                               const PartialDiagnostic &PD) {
11086   E = E->IgnoreParenImpCasts();
11087
11088   const FunctionDecl *FD = nullptr;
11089
11090   if (const DeclRefExpr *DRE = dyn_cast<DeclRefExpr>(E)) {
11091     if (!DRE->getDecl()->getType()->isReferenceType())
11092       return false;
11093   } else if (const MemberExpr *M = dyn_cast<MemberExpr>(E)) {
11094     if (!M->getMemberDecl()->getType()->isReferenceType())
11095       return false;
11096   } else if (const CallExpr *Call = dyn_cast<CallExpr>(E)) {
11097     if (!Call->getCallReturnType(SemaRef.Context)->isReferenceType())
11098       return false;
11099     FD = Call->getDirectCallee();
11100   } else {
11101     return false;
11102   }
11103
11104   SemaRef.Diag(E->getExprLoc(), PD);
11105
11106   // If possible, point to location of function.
11107   if (FD) {
11108     SemaRef.Diag(FD->getLocation(), diag::note_reference_is_return_value) << FD;
11109   }
11110
11111   return true;
11112 }
11113
11114 // Returns true if the SourceLocation is expanded from any macro body.
11115 // Returns false if the SourceLocation is invalid, is from not in a macro
11116 // expansion, or is from expanded from a top-level macro argument.
11117 static bool IsInAnyMacroBody(const SourceManager &SM, SourceLocation Loc) {
11118   if (Loc.isInvalid())
11119     return false;
11120
11121   while (Loc.isMacroID()) {
11122     if (SM.isMacroBodyExpansion(Loc))
11123       return true;
11124     Loc = SM.getImmediateMacroCallerLoc(Loc);
11125   }
11126
11127   return false;
11128 }
11129
11130 /// Diagnose pointers that are always non-null.
11131 /// \param E the expression containing the pointer
11132 /// \param NullKind NPCK_NotNull if E is a cast to bool, otherwise, E is
11133 /// compared to a null pointer
11134 /// \param IsEqual True when the comparison is equal to a null pointer
11135 /// \param Range Extra SourceRange to highlight in the diagnostic
11136 void Sema::DiagnoseAlwaysNonNullPointer(Expr *E,
11137                                         Expr::NullPointerConstantKind NullKind,
11138                                         bool IsEqual, SourceRange Range) {
11139   if (!E)
11140     return;
11141
11142   // Don't warn inside macros.
11143   if (E->getExprLoc().isMacroID()) {
11144     const SourceManager &SM = getSourceManager();
11145     if (IsInAnyMacroBody(SM, E->getExprLoc()) ||
11146         IsInAnyMacroBody(SM, Range.getBegin()))
11147       return;
11148   }
11149   E = E->IgnoreImpCasts();
11150
11151   const bool IsCompare = NullKind != Expr::NPCK_NotNull;
11152
11153   if (isa<CXXThisExpr>(E)) {
11154     unsigned DiagID = IsCompare ? diag::warn_this_null_compare
11155                                 : diag::warn_this_bool_conversion;
11156     Diag(E->getExprLoc(), DiagID) << E->getSourceRange() << Range << IsEqual;
11157     return;
11158   }
11159
11160   bool IsAddressOf = false;
11161
11162   if (UnaryOperator *UO = dyn_cast<UnaryOperator>(E)) {
11163     if (UO->getOpcode() != UO_AddrOf)
11164       return;
11165     IsAddressOf = true;
11166     E = UO->getSubExpr();
11167   }
11168
11169   if (IsAddressOf) {
11170     unsigned DiagID = IsCompare
11171                           ? diag::warn_address_of_reference_null_compare
11172                           : diag::warn_address_of_reference_bool_conversion;
11173     PartialDiagnostic PD = PDiag(DiagID) << E->getSourceRange() << Range
11174                                          << IsEqual;
11175     if (CheckForReference(*this, E, PD)) {
11176       return;
11177     }
11178   }
11179
11180   auto ComplainAboutNonnullParamOrCall = [&](const Attr *NonnullAttr) {
11181     bool IsParam = isa<NonNullAttr>(NonnullAttr);
11182     std::string Str;
11183     llvm::raw_string_ostream S(Str);
11184     E->printPretty(S, nullptr, getPrintingPolicy());
11185     unsigned DiagID = IsCompare ? diag::warn_nonnull_expr_compare
11186                                 : diag::warn_cast_nonnull_to_bool;
11187     Diag(E->getExprLoc(), DiagID) << IsParam << S.str()
11188       << E->getSourceRange() << Range << IsEqual;
11189     Diag(NonnullAttr->getLocation(), diag::note_declared_nonnull) << IsParam;
11190   };
11191
11192   // If we have a CallExpr that is tagged with returns_nonnull, we can complain.
11193   if (auto *Call = dyn_cast<CallExpr>(E->IgnoreParenImpCasts())) {
11194     if (auto *Callee = Call->getDirectCallee()) {
11195       if (const Attr *A = Callee->getAttr<ReturnsNonNullAttr>()) {
11196         ComplainAboutNonnullParamOrCall(A);
11197         return;
11198       }
11199     }
11200   }
11201
11202   // Expect to find a single Decl.  Skip anything more complicated.
11203   ValueDecl *D = nullptr;
11204   if (DeclRefExpr *R = dyn_cast<DeclRefExpr>(E)) {
11205     D = R->getDecl();
11206   } else if (MemberExpr *M = dyn_cast<MemberExpr>(E)) {
11207     D = M->getMemberDecl();
11208   }
11209
11210   // Weak Decls can be null.
11211   if (!D || D->isWeak())
11212     return;
11213
11214   // Check for parameter decl with nonnull attribute
11215   if (const auto* PV = dyn_cast<ParmVarDecl>(D)) {
11216     if (getCurFunction() &&
11217         !getCurFunction()->ModifiedNonNullParams.count(PV)) {
11218       if (const Attr *A = PV->getAttr<NonNullAttr>()) {
11219         ComplainAboutNonnullParamOrCall(A);
11220         return;
11221       }
11222
11223       if (const auto *FD = dyn_cast<FunctionDecl>(PV->getDeclContext())) {
11224         auto ParamIter = llvm::find(FD->parameters(), PV);
11225         assert(ParamIter != FD->param_end());
11226         unsigned ParamNo = std::distance(FD->param_begin(), ParamIter);
11227
11228         for (const auto *NonNull : FD->specific_attrs<NonNullAttr>()) {
11229           if (!NonNull->args_size()) {
11230               ComplainAboutNonnullParamOrCall(NonNull);
11231               return;
11232           }
11233
11234           for (const ParamIdx &ArgNo : NonNull->args()) {
11235             if (ArgNo.getASTIndex() == ParamNo) {
11236               ComplainAboutNonnullParamOrCall(NonNull);
11237               return;
11238             }
11239           }
11240         }
11241       }
11242     }
11243   }
11244
11245   QualType T = D->getType();
11246   const bool IsArray = T->isArrayType();
11247   const bool IsFunction = T->isFunctionType();
11248
11249   // Address of function is used to silence the function warning.
11250   if (IsAddressOf && IsFunction) {
11251     return;
11252   }
11253
11254   // Found nothing.
11255   if (!IsAddressOf && !IsFunction && !IsArray)
11256     return;
11257
11258   // Pretty print the expression for the diagnostic.
11259   std::string Str;
11260   llvm::raw_string_ostream S(Str);
11261   E->printPretty(S, nullptr, getPrintingPolicy());
11262
11263   unsigned DiagID = IsCompare ? diag::warn_null_pointer_compare
11264                               : diag::warn_impcast_pointer_to_bool;
11265   enum {
11266     AddressOf,
11267     FunctionPointer,
11268     ArrayPointer
11269   } DiagType;
11270   if (IsAddressOf)
11271     DiagType = AddressOf;
11272   else if (IsFunction)
11273     DiagType = FunctionPointer;
11274   else if (IsArray)
11275     DiagType = ArrayPointer;
11276   else
11277     llvm_unreachable("Could not determine diagnostic.");
11278   Diag(E->getExprLoc(), DiagID) << DiagType << S.str() << E->getSourceRange()
11279                                 << Range << IsEqual;
11280
11281   if (!IsFunction)
11282     return;
11283
11284   // Suggest '&' to silence the function warning.
11285   Diag(E->getExprLoc(), diag::note_function_warning_silence)
11286       << FixItHint::CreateInsertion(E->getLocStart(), "&");
11287
11288   // Check to see if '()' fixit should be emitted.
11289   QualType ReturnType;
11290   UnresolvedSet<4> NonTemplateOverloads;
11291   tryExprAsCall(*E, ReturnType, NonTemplateOverloads);
11292   if (ReturnType.isNull())
11293     return;
11294
11295   if (IsCompare) {
11296     // There are two cases here.  If there is null constant, the only suggest
11297     // for a pointer return type.  If the null is 0, then suggest if the return
11298     // type is a pointer or an integer type.
11299     if (!ReturnType->isPointerType()) {
11300       if (NullKind == Expr::NPCK_ZeroExpression ||
11301           NullKind == Expr::NPCK_ZeroLiteral) {
11302         if (!ReturnType->isIntegerType())
11303           return;
11304       } else {
11305         return;
11306       }
11307     }
11308   } else { // !IsCompare
11309     // For function to bool, only suggest if the function pointer has bool
11310     // return type.
11311     if (!ReturnType->isSpecificBuiltinType(BuiltinType::Bool))
11312       return;
11313   }
11314   Diag(E->getExprLoc(), diag::note_function_to_function_call)
11315       << FixItHint::CreateInsertion(getLocForEndOfToken(E->getLocEnd()), "()");
11316 }
11317
11318 /// Diagnoses "dangerous" implicit conversions within the given
11319 /// expression (which is a full expression).  Implements -Wconversion
11320 /// and -Wsign-compare.
11321 ///
11322 /// \param CC the "context" location of the implicit conversion, i.e.
11323 ///   the most location of the syntactic entity requiring the implicit
11324 ///   conversion
11325 void Sema::CheckImplicitConversions(Expr *E, SourceLocation CC) {
11326   // Don't diagnose in unevaluated contexts.
11327   if (isUnevaluatedContext())
11328     return;
11329
11330   // Don't diagnose for value- or type-dependent expressions.
11331   if (E->isTypeDependent() || E->isValueDependent())
11332     return;
11333
11334   // Check for array bounds violations in cases where the check isn't triggered
11335   // elsewhere for other Expr types (like BinaryOperators), e.g. when an
11336   // ArraySubscriptExpr is on the RHS of a variable initialization.
11337   CheckArrayAccess(E);
11338
11339   // This is not the right CC for (e.g.) a variable initialization.
11340   AnalyzeImplicitConversions(*this, E, CC);
11341 }
11342
11343 /// CheckBoolLikeConversion - Check conversion of given expression to boolean.
11344 /// Input argument E is a logical expression.
11345 void Sema::CheckBoolLikeConversion(Expr *E, SourceLocation CC) {
11346   ::CheckBoolLikeConversion(*this, E, CC);
11347 }
11348
11349 /// Diagnose when expression is an integer constant expression and its evaluation
11350 /// results in integer overflow
11351 void Sema::CheckForIntOverflow (Expr *E) {
11352   // Use a work list to deal with nested struct initializers.
11353   SmallVector<Expr *, 2> Exprs(1, E);
11354
11355   do {
11356     Expr *OriginalE = Exprs.pop_back_val();
11357     Expr *E = OriginalE->IgnoreParenCasts();
11358
11359     if (isa<BinaryOperator>(E)) {
11360       E->EvaluateForOverflow(Context);
11361       continue;
11362     }
11363
11364     if (auto InitList = dyn_cast<InitListExpr>(OriginalE))
11365       Exprs.append(InitList->inits().begin(), InitList->inits().end());
11366     else if (isa<ObjCBoxedExpr>(OriginalE))
11367       E->EvaluateForOverflow(Context);
11368     else if (auto Call = dyn_cast<CallExpr>(E))
11369       Exprs.append(Call->arg_begin(), Call->arg_end());
11370     else if (auto Message = dyn_cast<ObjCMessageExpr>(E))
11371       Exprs.append(Message->arg_begin(), Message->arg_end());
11372   } while (!Exprs.empty());
11373 }
11374
11375 namespace {
11376
11377 /// Visitor for expressions which looks for unsequenced operations on the
11378 /// same object.
11379 class SequenceChecker : public EvaluatedExprVisitor<SequenceChecker> {
11380   using Base = EvaluatedExprVisitor<SequenceChecker>;
11381
11382   /// A tree of sequenced regions within an expression. Two regions are
11383   /// unsequenced if one is an ancestor or a descendent of the other. When we
11384   /// finish processing an expression with sequencing, such as a comma
11385   /// expression, we fold its tree nodes into its parent, since they are
11386   /// unsequenced with respect to nodes we will visit later.
11387   class SequenceTree {
11388     struct Value {
11389       explicit Value(unsigned Parent) : Parent(Parent), Merged(false) {}
11390       unsigned Parent : 31;
11391       unsigned Merged : 1;
11392     };
11393     SmallVector<Value, 8> Values;
11394
11395   public:
11396     /// A region within an expression which may be sequenced with respect
11397     /// to some other region.
11398     class Seq {
11399       friend class SequenceTree;
11400
11401       unsigned Index = 0;
11402
11403       explicit Seq(unsigned N) : Index(N) {}
11404
11405     public:
11406       Seq() = default;
11407     };
11408
11409     SequenceTree() { Values.push_back(Value(0)); }
11410     Seq root() const { return Seq(0); }
11411
11412     /// Create a new sequence of operations, which is an unsequenced
11413     /// subset of \p Parent. This sequence of operations is sequenced with
11414     /// respect to other children of \p Parent.
11415     Seq allocate(Seq Parent) {
11416       Values.push_back(Value(Parent.Index));
11417       return Seq(Values.size() - 1);
11418     }
11419
11420     /// Merge a sequence of operations into its parent.
11421     void merge(Seq S) {
11422       Values[S.Index].Merged = true;
11423     }
11424
11425     /// Determine whether two operations are unsequenced. This operation
11426     /// is asymmetric: \p Cur should be the more recent sequence, and \p Old
11427     /// should have been merged into its parent as appropriate.
11428     bool isUnsequenced(Seq Cur, Seq Old) {
11429       unsigned C = representative(Cur.Index);
11430       unsigned Target = representative(Old.Index);
11431       while (C >= Target) {
11432         if (C == Target)
11433           return true;
11434         C = Values[C].Parent;
11435       }
11436       return false;
11437     }
11438
11439   private:
11440     /// Pick a representative for a sequence.
11441     unsigned representative(unsigned K) {
11442       if (Values[K].Merged)
11443         // Perform path compression as we go.
11444         return Values[K].Parent = representative(Values[K].Parent);
11445       return K;
11446     }
11447   };
11448
11449   /// An object for which we can track unsequenced uses.
11450   using Object = NamedDecl *;
11451
11452   /// Different flavors of object usage which we track. We only track the
11453   /// least-sequenced usage of each kind.
11454   enum UsageKind {
11455     /// A read of an object. Multiple unsequenced reads are OK.
11456     UK_Use,
11457
11458     /// A modification of an object which is sequenced before the value
11459     /// computation of the expression, such as ++n in C++.
11460     UK_ModAsValue,
11461
11462     /// A modification of an object which is not sequenced before the value
11463     /// computation of the expression, such as n++.
11464     UK_ModAsSideEffect,
11465
11466     UK_Count = UK_ModAsSideEffect + 1
11467   };
11468
11469   struct Usage {
11470     Expr *Use = nullptr;
11471     SequenceTree::Seq Seq;
11472
11473     Usage() = default;
11474   };
11475
11476   struct UsageInfo {
11477     Usage Uses[UK_Count];
11478
11479     /// Have we issued a diagnostic for this variable already?
11480     bool Diagnosed = false;
11481
11482     UsageInfo() = default;
11483   };
11484   using UsageInfoMap = llvm::SmallDenseMap<Object, UsageInfo, 16>;
11485
11486   Sema &SemaRef;
11487
11488   /// Sequenced regions within the expression.
11489   SequenceTree Tree;
11490
11491   /// Declaration modifications and references which we have seen.
11492   UsageInfoMap UsageMap;
11493
11494   /// The region we are currently within.
11495   SequenceTree::Seq Region;
11496
11497   /// Filled in with declarations which were modified as a side-effect
11498   /// (that is, post-increment operations).
11499   SmallVectorImpl<std::pair<Object, Usage>> *ModAsSideEffect = nullptr;
11500
11501   /// Expressions to check later. We defer checking these to reduce
11502   /// stack usage.
11503   SmallVectorImpl<Expr *> &WorkList;
11504
11505   /// RAII object wrapping the visitation of a sequenced subexpression of an
11506   /// expression. At the end of this process, the side-effects of the evaluation
11507   /// become sequenced with respect to the value computation of the result, so
11508   /// we downgrade any UK_ModAsSideEffect within the evaluation to
11509   /// UK_ModAsValue.
11510   struct SequencedSubexpression {
11511     SequencedSubexpression(SequenceChecker &Self)
11512       : Self(Self), OldModAsSideEffect(Self.ModAsSideEffect) {
11513       Self.ModAsSideEffect = &ModAsSideEffect;
11514     }
11515
11516     ~SequencedSubexpression() {
11517       for (auto &M : llvm::reverse(ModAsSideEffect)) {
11518         UsageInfo &U = Self.UsageMap[M.first];
11519         auto &SideEffectUsage = U.Uses[UK_ModAsSideEffect];
11520         Self.addUsage(U, M.first, SideEffectUsage.Use, UK_ModAsValue);
11521         SideEffectUsage = M.second;
11522       }
11523       Self.ModAsSideEffect = OldModAsSideEffect;
11524     }
11525
11526     SequenceChecker &Self;
11527     SmallVector<std::pair<Object, Usage>, 4> ModAsSideEffect;
11528     SmallVectorImpl<std::pair<Object, Usage>> *OldModAsSideEffect;
11529   };
11530
11531   /// RAII object wrapping the visitation of a subexpression which we might
11532   /// choose to evaluate as a constant. If any subexpression is evaluated and
11533   /// found to be non-constant, this allows us to suppress the evaluation of
11534   /// the outer expression.
11535   class EvaluationTracker {
11536   public:
11537     EvaluationTracker(SequenceChecker &Self)
11538         : Self(Self), Prev(Self.EvalTracker) {
11539       Self.EvalTracker = this;
11540     }
11541
11542     ~EvaluationTracker() {
11543       Self.EvalTracker = Prev;
11544       if (Prev)
11545         Prev->EvalOK &= EvalOK;
11546     }
11547
11548     bool evaluate(const Expr *E, bool &Result) {
11549       if (!EvalOK || E->isValueDependent())
11550         return false;
11551       EvalOK = E->EvaluateAsBooleanCondition(Result, Self.SemaRef.Context);
11552       return EvalOK;
11553     }
11554
11555   private:
11556     SequenceChecker &Self;
11557     EvaluationTracker *Prev;
11558     bool EvalOK = true;
11559   } *EvalTracker = nullptr;
11560
11561   /// Find the object which is produced by the specified expression,
11562   /// if any.
11563   Object getObject(Expr *E, bool Mod) const {
11564     E = E->IgnoreParenCasts();
11565     if (UnaryOperator *UO = dyn_cast<UnaryOperator>(E)) {
11566       if (Mod && (UO->getOpcode() == UO_PreInc || UO->getOpcode() == UO_PreDec))
11567         return getObject(UO->getSubExpr(), Mod);
11568     } else if (BinaryOperator *BO = dyn_cast<BinaryOperator>(E)) {
11569       if (BO->getOpcode() == BO_Comma)
11570         return getObject(BO->getRHS(), Mod);
11571       if (Mod && BO->isAssignmentOp())
11572         return getObject(BO->getLHS(), Mod);
11573     } else if (MemberExpr *ME = dyn_cast<MemberExpr>(E)) {
11574       // FIXME: Check for more interesting cases, like "x.n = ++x.n".
11575       if (isa<CXXThisExpr>(ME->getBase()->IgnoreParenCasts()))
11576         return ME->getMemberDecl();
11577     } else if (DeclRefExpr *DRE = dyn_cast<DeclRefExpr>(E))
11578       // FIXME: If this is a reference, map through to its value.
11579       return DRE->getDecl();
11580     return nullptr;
11581   }
11582
11583   /// Note that an object was modified or used by an expression.
11584   void addUsage(UsageInfo &UI, Object O, Expr *Ref, UsageKind UK) {
11585     Usage &U = UI.Uses[UK];
11586     if (!U.Use || !Tree.isUnsequenced(Region, U.Seq)) {
11587       if (UK == UK_ModAsSideEffect && ModAsSideEffect)
11588         ModAsSideEffect->push_back(std::make_pair(O, U));
11589       U.Use = Ref;
11590       U.Seq = Region;
11591     }
11592   }
11593
11594   /// Check whether a modification or use conflicts with a prior usage.
11595   void checkUsage(Object O, UsageInfo &UI, Expr *Ref, UsageKind OtherKind,
11596                   bool IsModMod) {
11597     if (UI.Diagnosed)
11598       return;
11599
11600     const Usage &U = UI.Uses[OtherKind];
11601     if (!U.Use || !Tree.isUnsequenced(Region, U.Seq))
11602       return;
11603
11604     Expr *Mod = U.Use;
11605     Expr *ModOrUse = Ref;
11606     if (OtherKind == UK_Use)
11607       std::swap(Mod, ModOrUse);
11608
11609     SemaRef.Diag(Mod->getExprLoc(),
11610                  IsModMod ? diag::warn_unsequenced_mod_mod
11611                           : diag::warn_unsequenced_mod_use)
11612       << O << SourceRange(ModOrUse->getExprLoc());
11613     UI.Diagnosed = true;
11614   }
11615
11616   void notePreUse(Object O, Expr *Use) {
11617     UsageInfo &U = UsageMap[O];
11618     // Uses conflict with other modifications.
11619     checkUsage(O, U, Use, UK_ModAsValue, false);
11620   }
11621
11622   void notePostUse(Object O, Expr *Use) {
11623     UsageInfo &U = UsageMap[O];
11624     checkUsage(O, U, Use, UK_ModAsSideEffect, false);
11625     addUsage(U, O, Use, UK_Use);
11626   }
11627
11628   void notePreMod(Object O, Expr *Mod) {
11629     UsageInfo &U = UsageMap[O];
11630     // Modifications conflict with other modifications and with uses.
11631     checkUsage(O, U, Mod, UK_ModAsValue, true);
11632     checkUsage(O, U, Mod, UK_Use, false);
11633   }
11634
11635   void notePostMod(Object O, Expr *Use, UsageKind UK) {
11636     UsageInfo &U = UsageMap[O];
11637     checkUsage(O, U, Use, UK_ModAsSideEffect, true);
11638     addUsage(U, O, Use, UK);
11639   }
11640
11641 public:
11642   SequenceChecker(Sema &S, Expr *E, SmallVectorImpl<Expr *> &WorkList)
11643       : Base(S.Context), SemaRef(S), Region(Tree.root()), WorkList(WorkList) {
11644     Visit(E);
11645   }
11646
11647   void VisitStmt(Stmt *S) {
11648     // Skip all statements which aren't expressions for now.
11649   }
11650
11651   void VisitExpr(Expr *E) {
11652     // By default, just recurse to evaluated subexpressions.
11653     Base::VisitStmt(E);
11654   }
11655
11656   void VisitCastExpr(CastExpr *E) {
11657     Object O = Object();
11658     if (E->getCastKind() == CK_LValueToRValue)
11659       O = getObject(E->getSubExpr(), false);
11660
11661     if (O)
11662       notePreUse(O, E);
11663     VisitExpr(E);
11664     if (O)
11665       notePostUse(O, E);
11666   }
11667
11668   void VisitBinComma(BinaryOperator *BO) {
11669     // C++11 [expr.comma]p1:
11670     //   Every value computation and side effect associated with the left
11671     //   expression is sequenced before every value computation and side
11672     //   effect associated with the right expression.
11673     SequenceTree::Seq LHS = Tree.allocate(Region);
11674     SequenceTree::Seq RHS = Tree.allocate(Region);
11675     SequenceTree::Seq OldRegion = Region;
11676
11677     {
11678       SequencedSubexpression SeqLHS(*this);
11679       Region = LHS;
11680       Visit(BO->getLHS());
11681     }
11682
11683     Region = RHS;
11684     Visit(BO->getRHS());
11685
11686     Region = OldRegion;
11687
11688     // Forget that LHS and RHS are sequenced. They are both unsequenced
11689     // with respect to other stuff.
11690     Tree.merge(LHS);
11691     Tree.merge(RHS);
11692   }
11693
11694   void VisitBinAssign(BinaryOperator *BO) {
11695     // The modification is sequenced after the value computation of the LHS
11696     // and RHS, so check it before inspecting the operands and update the
11697     // map afterwards.
11698     Object O = getObject(BO->getLHS(), true);
11699     if (!O)
11700       return VisitExpr(BO);
11701
11702     notePreMod(O, BO);
11703
11704     // C++11 [expr.ass]p7:
11705     //   E1 op= E2 is equivalent to E1 = E1 op E2, except that E1 is evaluated
11706     //   only once.
11707     //
11708     // Therefore, for a compound assignment operator, O is considered used
11709     // everywhere except within the evaluation of E1 itself.
11710     if (isa<CompoundAssignOperator>(BO))
11711       notePreUse(O, BO);
11712
11713     Visit(BO->getLHS());
11714
11715     if (isa<CompoundAssignOperator>(BO))
11716       notePostUse(O, BO);
11717
11718     Visit(BO->getRHS());
11719
11720     // C++11 [expr.ass]p1:
11721     //   the assignment is sequenced [...] before the value computation of the
11722     //   assignment expression.
11723     // C11 6.5.16/3 has no such rule.
11724     notePostMod(O, BO, SemaRef.getLangOpts().CPlusPlus ? UK_ModAsValue
11725                                                        : UK_ModAsSideEffect);
11726   }
11727
11728   void VisitCompoundAssignOperator(CompoundAssignOperator *CAO) {
11729     VisitBinAssign(CAO);
11730   }
11731
11732   void VisitUnaryPreInc(UnaryOperator *UO) { VisitUnaryPreIncDec(UO); }
11733   void VisitUnaryPreDec(UnaryOperator *UO) { VisitUnaryPreIncDec(UO); }
11734   void VisitUnaryPreIncDec(UnaryOperator *UO) {
11735     Object O = getObject(UO->getSubExpr(), true);
11736     if (!O)
11737       return VisitExpr(UO);
11738
11739     notePreMod(O, UO);
11740     Visit(UO->getSubExpr());
11741     // C++11 [expr.pre.incr]p1:
11742     //   the expression ++x is equivalent to x+=1
11743     notePostMod(O, UO, SemaRef.getLangOpts().CPlusPlus ? UK_ModAsValue
11744                                                        : UK_ModAsSideEffect);
11745   }
11746
11747   void VisitUnaryPostInc(UnaryOperator *UO) { VisitUnaryPostIncDec(UO); }
11748   void VisitUnaryPostDec(UnaryOperator *UO) { VisitUnaryPostIncDec(UO); }
11749   void VisitUnaryPostIncDec(UnaryOperator *UO) {
11750     Object O = getObject(UO->getSubExpr(), true);
11751     if (!O)
11752       return VisitExpr(UO);
11753
11754     notePreMod(O, UO);
11755     Visit(UO->getSubExpr());
11756     notePostMod(O, UO, UK_ModAsSideEffect);
11757   }
11758
11759   /// Don't visit the RHS of '&&' or '||' if it might not be evaluated.
11760   void VisitBinLOr(BinaryOperator *BO) {
11761     // The side-effects of the LHS of an '&&' are sequenced before the
11762     // value computation of the RHS, and hence before the value computation
11763     // of the '&&' itself, unless the LHS evaluates to zero. We treat them
11764     // as if they were unconditionally sequenced.
11765     EvaluationTracker Eval(*this);
11766     {
11767       SequencedSubexpression Sequenced(*this);
11768       Visit(BO->getLHS());
11769     }
11770
11771     bool Result;
11772     if (Eval.evaluate(BO->getLHS(), Result)) {
11773       if (!Result)
11774         Visit(BO->getRHS());
11775     } else {
11776       // Check for unsequenced operations in the RHS, treating it as an
11777       // entirely separate evaluation.
11778       //
11779       // FIXME: If there are operations in the RHS which are unsequenced
11780       // with respect to operations outside the RHS, and those operations
11781       // are unconditionally evaluated, diagnose them.
11782       WorkList.push_back(BO->getRHS());
11783     }
11784   }
11785   void VisitBinLAnd(BinaryOperator *BO) {
11786     EvaluationTracker Eval(*this);
11787     {
11788       SequencedSubexpression Sequenced(*this);
11789       Visit(BO->getLHS());
11790     }
11791
11792     bool Result;
11793     if (Eval.evaluate(BO->getLHS(), Result)) {
11794       if (Result)
11795         Visit(BO->getRHS());
11796     } else {
11797       WorkList.push_back(BO->getRHS());
11798     }
11799   }
11800
11801   // Only visit the condition, unless we can be sure which subexpression will
11802   // be chosen.
11803   void VisitAbstractConditionalOperator(AbstractConditionalOperator *CO) {
11804     EvaluationTracker Eval(*this);
11805     {
11806       SequencedSubexpression Sequenced(*this);
11807       Visit(CO->getCond());
11808     }
11809
11810     bool Result;
11811     if (Eval.evaluate(CO->getCond(), Result))
11812       Visit(Result ? CO->getTrueExpr() : CO->getFalseExpr());
11813     else {
11814       WorkList.push_back(CO->getTrueExpr());
11815       WorkList.push_back(CO->getFalseExpr());
11816     }
11817   }
11818
11819   void VisitCallExpr(CallExpr *CE) {
11820     // C++11 [intro.execution]p15:
11821     //   When calling a function [...], every value computation and side effect
11822     //   associated with any argument expression, or with the postfix expression
11823     //   designating the called function, is sequenced before execution of every
11824     //   expression or statement in the body of the function [and thus before
11825     //   the value computation of its result].
11826     SequencedSubexpression Sequenced(*this);
11827     Base::VisitCallExpr(CE);
11828
11829     // FIXME: CXXNewExpr and CXXDeleteExpr implicitly call functions.
11830   }
11831
11832   void VisitCXXConstructExpr(CXXConstructExpr *CCE) {
11833     // This is a call, so all subexpressions are sequenced before the result.
11834     SequencedSubexpression Sequenced(*this);
11835
11836     if (!CCE->isListInitialization())
11837       return VisitExpr(CCE);
11838
11839     // In C++11, list initializations are sequenced.
11840     SmallVector<SequenceTree::Seq, 32> Elts;
11841     SequenceTree::Seq Parent = Region;
11842     for (CXXConstructExpr::arg_iterator I = CCE->arg_begin(),
11843                                         E = CCE->arg_end();
11844          I != E; ++I) {
11845       Region = Tree.allocate(Parent);
11846       Elts.push_back(Region);
11847       Visit(*I);
11848     }
11849
11850     // Forget that the initializers are sequenced.
11851     Region = Parent;
11852     for (unsigned I = 0; I < Elts.size(); ++I)
11853       Tree.merge(Elts[I]);
11854   }
11855
11856   void VisitInitListExpr(InitListExpr *ILE) {
11857     if (!SemaRef.getLangOpts().CPlusPlus11)
11858       return VisitExpr(ILE);
11859
11860     // In C++11, list initializations are sequenced.
11861     SmallVector<SequenceTree::Seq, 32> Elts;
11862     SequenceTree::Seq Parent = Region;
11863     for (unsigned I = 0; I < ILE->getNumInits(); ++I) {
11864       Expr *E = ILE->getInit(I);
11865       if (!E) continue;
11866       Region = Tree.allocate(Parent);
11867       Elts.push_back(Region);
11868       Visit(E);
11869     }
11870
11871     // Forget that the initializers are sequenced.
11872     Region = Parent;
11873     for (unsigned I = 0; I < Elts.size(); ++I)
11874       Tree.merge(Elts[I]);
11875   }
11876 };
11877
11878 } // namespace
11879
11880 void Sema::CheckUnsequencedOperations(Expr *E) {
11881   SmallVector<Expr *, 8> WorkList;
11882   WorkList.push_back(E);
11883   while (!WorkList.empty()) {
11884     Expr *Item = WorkList.pop_back_val();
11885     SequenceChecker(*this, Item, WorkList);
11886   }
11887 }
11888
11889 void Sema::CheckCompletedExpr(Expr *E, SourceLocation CheckLoc,
11890                               bool IsConstexpr) {
11891   CheckImplicitConversions(E, CheckLoc);
11892   if (!E->isInstantiationDependent())
11893     CheckUnsequencedOperations(E);
11894   if (!IsConstexpr && !E->isValueDependent())
11895     CheckForIntOverflow(E);
11896   DiagnoseMisalignedMembers();
11897 }
11898
11899 void Sema::CheckBitFieldInitialization(SourceLocation InitLoc,
11900                                        FieldDecl *BitField,
11901                                        Expr *Init) {
11902   (void) AnalyzeBitFieldAssignment(*this, BitField, Init, InitLoc);
11903 }
11904
11905 static void diagnoseArrayStarInParamType(Sema &S, QualType PType,
11906                                          SourceLocation Loc) {
11907   if (!PType->isVariablyModifiedType())
11908     return;
11909   if (const auto *PointerTy = dyn_cast<PointerType>(PType)) {
11910     diagnoseArrayStarInParamType(S, PointerTy->getPointeeType(), Loc);
11911     return;
11912   }
11913   if (const auto *ReferenceTy = dyn_cast<ReferenceType>(PType)) {
11914     diagnoseArrayStarInParamType(S, ReferenceTy->getPointeeType(), Loc);
11915     return;
11916   }
11917   if (const auto *ParenTy = dyn_cast<ParenType>(PType)) {
11918     diagnoseArrayStarInParamType(S, ParenTy->getInnerType(), Loc);
11919     return;
11920   }
11921
11922   const ArrayType *AT = S.Context.getAsArrayType(PType);
11923   if (!AT)
11924     return;
11925
11926   if (AT->getSizeModifier() != ArrayType::Star) {
11927     diagnoseArrayStarInParamType(S, AT->getElementType(), Loc);
11928     return;
11929   }
11930
11931   S.Diag(Loc, diag::err_array_star_in_function_definition);
11932 }
11933
11934 /// CheckParmsForFunctionDef - Check that the parameters of the given
11935 /// function are appropriate for the definition of a function. This
11936 /// takes care of any checks that cannot be performed on the
11937 /// declaration itself, e.g., that the types of each of the function
11938 /// parameters are complete.
11939 bool Sema::CheckParmsForFunctionDef(ArrayRef<ParmVarDecl *> Parameters,
11940                                     bool CheckParameterNames) {
11941   bool HasInvalidParm = false;
11942   for (ParmVarDecl *Param : Parameters) {
11943     // C99 6.7.5.3p4: the parameters in a parameter type list in a
11944     // function declarator that is part of a function definition of
11945     // that function shall not have incomplete type.
11946     //
11947     // This is also C++ [dcl.fct]p6.
11948     if (!Param->isInvalidDecl() &&
11949         RequireCompleteType(Param->getLocation(), Param->getType(),
11950                             diag::err_typecheck_decl_incomplete_type)) {
11951       Param->setInvalidDecl();
11952       HasInvalidParm = true;
11953     }
11954
11955     // C99 6.9.1p5: If the declarator includes a parameter type list, the
11956     // declaration of each parameter shall include an identifier.
11957     if (CheckParameterNames &&
11958         Param->getIdentifier() == nullptr &&
11959         !Param->isImplicit() &&
11960         !getLangOpts().CPlusPlus)
11961       Diag(Param->getLocation(), diag::err_parameter_name_omitted);
11962
11963     // C99 6.7.5.3p12:
11964     //   If the function declarator is not part of a definition of that
11965     //   function, parameters may have incomplete type and may use the [*]
11966     //   notation in their sequences of declarator specifiers to specify
11967     //   variable length array types.
11968     QualType PType = Param->getOriginalType();
11969     // FIXME: This diagnostic should point the '[*]' if source-location
11970     // information is added for it.
11971     diagnoseArrayStarInParamType(*this, PType, Param->getLocation());
11972
11973     // If the parameter is a c++ class type and it has to be destructed in the
11974     // callee function, declare the destructor so that it can be called by the
11975     // callee function. Do not perform any direct access check on the dtor here.
11976     if (!Param->isInvalidDecl()) {
11977       if (CXXRecordDecl *ClassDecl = Param->getType()->getAsCXXRecordDecl()) {
11978         if (!ClassDecl->isInvalidDecl() &&
11979             !ClassDecl->hasIrrelevantDestructor() &&
11980             !ClassDecl->isDependentContext() &&
11981             ClassDecl->isParamDestroyedInCallee()) {
11982           CXXDestructorDecl *Destructor = LookupDestructor(ClassDecl);
11983           MarkFunctionReferenced(Param->getLocation(), Destructor);
11984           DiagnoseUseOfDecl(Destructor, Param->getLocation());
11985         }
11986       }
11987     }
11988
11989     // Parameters with the pass_object_size attribute only need to be marked
11990     // constant at function definitions. Because we lack information about
11991     // whether we're on a declaration or definition when we're instantiating the
11992     // attribute, we need to check for constness here.
11993     if (const auto *Attr = Param->getAttr<PassObjectSizeAttr>())
11994       if (!Param->getType().isConstQualified())
11995         Diag(Param->getLocation(), diag::err_attribute_pointers_only)
11996             << Attr->getSpelling() << 1;
11997   }
11998
11999   return HasInvalidParm;
12000 }
12001
12002 /// A helper function to get the alignment of a Decl referred to by DeclRefExpr
12003 /// or MemberExpr.
12004 static CharUnits getDeclAlign(Expr *E, CharUnits TypeAlign,
12005                               ASTContext &Context) {
12006   if (const auto *DRE = dyn_cast<DeclRefExpr>(E))
12007     return Context.getDeclAlign(DRE->getDecl());
12008
12009   if (const auto *ME = dyn_cast<MemberExpr>(E))
12010     return Context.getDeclAlign(ME->getMemberDecl());
12011
12012   return TypeAlign;
12013 }
12014
12015 /// CheckCastAlign - Implements -Wcast-align, which warns when a
12016 /// pointer cast increases the alignment requirements.
12017 void Sema::CheckCastAlign(Expr *Op, QualType T, SourceRange TRange) {
12018   // This is actually a lot of work to potentially be doing on every
12019   // cast; don't do it if we're ignoring -Wcast_align (as is the default).
12020   if (getDiagnostics().isIgnored(diag::warn_cast_align, TRange.getBegin()))
12021     return;
12022
12023   // Ignore dependent types.
12024   if (T->isDependentType() || Op->getType()->isDependentType())
12025     return;
12026
12027   // Require that the destination be a pointer type.
12028   const PointerType *DestPtr = T->getAs<PointerType>();
12029   if (!DestPtr) return;
12030
12031   // If the destination has alignment 1, we're done.
12032   QualType DestPointee = DestPtr->getPointeeType();
12033   if (DestPointee->isIncompleteType()) return;
12034   CharUnits DestAlign = Context.getTypeAlignInChars(DestPointee);
12035   if (DestAlign.isOne()) return;
12036
12037   // Require that the source be a pointer type.
12038   const PointerType *SrcPtr = Op->getType()->getAs<PointerType>();
12039   if (!SrcPtr) return;
12040   QualType SrcPointee = SrcPtr->getPointeeType();
12041
12042   // Whitelist casts from cv void*.  We already implicitly
12043   // whitelisted casts to cv void*, since they have alignment 1.
12044   // Also whitelist casts involving incomplete types, which implicitly
12045   // includes 'void'.
12046   if (SrcPointee->isIncompleteType()) return;
12047
12048   CharUnits SrcAlign = Context.getTypeAlignInChars(SrcPointee);
12049
12050   if (auto *CE = dyn_cast<CastExpr>(Op)) {
12051     if (CE->getCastKind() == CK_ArrayToPointerDecay)
12052       SrcAlign = getDeclAlign(CE->getSubExpr(), SrcAlign, Context);
12053   } else if (auto *UO = dyn_cast<UnaryOperator>(Op)) {
12054     if (UO->getOpcode() == UO_AddrOf)
12055       SrcAlign = getDeclAlign(UO->getSubExpr(), SrcAlign, Context);
12056   }
12057
12058   if (SrcAlign >= DestAlign) return;
12059
12060   Diag(TRange.getBegin(), diag::warn_cast_align)
12061     << Op->getType() << T
12062     << static_cast<unsigned>(SrcAlign.getQuantity())
12063     << static_cast<unsigned>(DestAlign.getQuantity())
12064     << TRange << Op->getSourceRange();
12065 }
12066
12067 /// Check whether this array fits the idiom of a size-one tail padded
12068 /// array member of a struct.
12069 ///
12070 /// We avoid emitting out-of-bounds access warnings for such arrays as they are
12071 /// commonly used to emulate flexible arrays in C89 code.
12072 static bool IsTailPaddedMemberArray(Sema &S, const llvm::APInt &Size,
12073                                     const NamedDecl *ND) {
12074   if (Size != 1 || !ND) return false;
12075
12076   const FieldDecl *FD = dyn_cast<FieldDecl>(ND);
12077   if (!FD) return false;
12078
12079   // Don't consider sizes resulting from macro expansions or template argument
12080   // substitution to form C89 tail-padded arrays.
12081
12082   TypeSourceInfo *TInfo = FD->getTypeSourceInfo();
12083   while (TInfo) {
12084     TypeLoc TL = TInfo->getTypeLoc();
12085     // Look through typedefs.
12086     if (TypedefTypeLoc TTL = TL.getAs<TypedefTypeLoc>()) {
12087       const TypedefNameDecl *TDL = TTL.getTypedefNameDecl();
12088       TInfo = TDL->getTypeSourceInfo();
12089       continue;
12090     }
12091     if (ConstantArrayTypeLoc CTL = TL.getAs<ConstantArrayTypeLoc>()) {
12092       const Expr *SizeExpr = dyn_cast<IntegerLiteral>(CTL.getSizeExpr());
12093       if (!SizeExpr || SizeExpr->getExprLoc().isMacroID())
12094         return false;
12095     }
12096     break;
12097   }
12098
12099   const RecordDecl *RD = dyn_cast<RecordDecl>(FD->getDeclContext());
12100   if (!RD) return false;
12101   if (RD->isUnion()) return false;
12102   if (const CXXRecordDecl *CRD = dyn_cast<CXXRecordDecl>(RD)) {
12103     if (!CRD->isStandardLayout()) return false;
12104   }
12105
12106   // See if this is the last field decl in the record.
12107   const Decl *D = FD;
12108   while ((D = D->getNextDeclInContext()))
12109     if (isa<FieldDecl>(D))
12110       return false;
12111   return true;
12112 }
12113
12114 void Sema::CheckArrayAccess(const Expr *BaseExpr, const Expr *IndexExpr,
12115                             const ArraySubscriptExpr *ASE,
12116                             bool AllowOnePastEnd, bool IndexNegated) {
12117   IndexExpr = IndexExpr->IgnoreParenImpCasts();
12118   if (IndexExpr->isValueDependent())
12119     return;
12120
12121   const Type *EffectiveType =
12122       BaseExpr->getType()->getPointeeOrArrayElementType();
12123   BaseExpr = BaseExpr->IgnoreParenCasts();
12124   const ConstantArrayType *ArrayTy =
12125     Context.getAsConstantArrayType(BaseExpr->getType());
12126   if (!ArrayTy)
12127     return;
12128
12129   llvm::APSInt index;
12130   if (!IndexExpr->EvaluateAsInt(index, Context, Expr::SE_AllowSideEffects))
12131     return;
12132   if (IndexNegated)
12133     index = -index;
12134
12135   const NamedDecl *ND = nullptr;
12136   if (const DeclRefExpr *DRE = dyn_cast<DeclRefExpr>(BaseExpr))
12137     ND = DRE->getDecl();
12138   if (const MemberExpr *ME = dyn_cast<MemberExpr>(BaseExpr))
12139     ND = ME->getMemberDecl();
12140
12141   if (index.isUnsigned() || !index.isNegative()) {
12142     llvm::APInt size = ArrayTy->getSize();
12143     if (!size.isStrictlyPositive())
12144       return;
12145
12146     const Type *BaseType = BaseExpr->getType()->getPointeeOrArrayElementType();
12147     if (BaseType != EffectiveType) {
12148       // Make sure we're comparing apples to apples when comparing index to size
12149       uint64_t ptrarith_typesize = Context.getTypeSize(EffectiveType);
12150       uint64_t array_typesize = Context.getTypeSize(BaseType);
12151       // Handle ptrarith_typesize being zero, such as when casting to void*
12152       if (!ptrarith_typesize) ptrarith_typesize = 1;
12153       if (ptrarith_typesize != array_typesize) {
12154         // There's a cast to a different size type involved
12155         uint64_t ratio = array_typesize / ptrarith_typesize;
12156         // TODO: Be smarter about handling cases where array_typesize is not a
12157         // multiple of ptrarith_typesize
12158         if (ptrarith_typesize * ratio == array_typesize)
12159           size *= llvm::APInt(size.getBitWidth(), ratio);
12160       }
12161     }
12162
12163     if (size.getBitWidth() > index.getBitWidth())
12164       index = index.zext(size.getBitWidth());
12165     else if (size.getBitWidth() < index.getBitWidth())
12166       size = size.zext(index.getBitWidth());
12167
12168     // For array subscripting the index must be less than size, but for pointer
12169     // arithmetic also allow the index (offset) to be equal to size since
12170     // computing the next address after the end of the array is legal and
12171     // commonly done e.g. in C++ iterators and range-based for loops.
12172     if (AllowOnePastEnd ? index.ule(size) : index.ult(size))
12173       return;
12174
12175     // Also don't warn for arrays of size 1 which are members of some
12176     // structure. These are often used to approximate flexible arrays in C89
12177     // code.
12178     if (IsTailPaddedMemberArray(*this, size, ND))
12179       return;
12180
12181     // Suppress the warning if the subscript expression (as identified by the
12182     // ']' location) and the index expression are both from macro expansions
12183     // within a system header.
12184     if (ASE) {
12185       SourceLocation RBracketLoc = SourceMgr.getSpellingLoc(
12186           ASE->getRBracketLoc());
12187       if (SourceMgr.isInSystemHeader(RBracketLoc)) {
12188         SourceLocation IndexLoc = SourceMgr.getSpellingLoc(
12189             IndexExpr->getLocStart());
12190         if (SourceMgr.isWrittenInSameFile(RBracketLoc, IndexLoc))
12191           return;
12192       }
12193     }
12194
12195     unsigned DiagID = diag::warn_ptr_arith_exceeds_bounds;
12196     if (ASE)
12197       DiagID = diag::warn_array_index_exceeds_bounds;
12198
12199     DiagRuntimeBehavior(BaseExpr->getLocStart(), BaseExpr,
12200                         PDiag(DiagID) << index.toString(10, true)
12201                           << size.toString(10, true)
12202                           << (unsigned)size.getLimitedValue(~0U)
12203                           << IndexExpr->getSourceRange());
12204   } else {
12205     unsigned DiagID = diag::warn_array_index_precedes_bounds;
12206     if (!ASE) {
12207       DiagID = diag::warn_ptr_arith_precedes_bounds;
12208       if (index.isNegative()) index = -index;
12209     }
12210
12211     DiagRuntimeBehavior(BaseExpr->getLocStart(), BaseExpr,
12212                         PDiag(DiagID) << index.toString(10, true)
12213                           << IndexExpr->getSourceRange());
12214   }
12215
12216   if (!ND) {
12217     // Try harder to find a NamedDecl to point at in the note.
12218     while (const ArraySubscriptExpr *ASE =
12219            dyn_cast<ArraySubscriptExpr>(BaseExpr))
12220       BaseExpr = ASE->getBase()->IgnoreParenCasts();
12221     if (const DeclRefExpr *DRE = dyn_cast<DeclRefExpr>(BaseExpr))
12222       ND = DRE->getDecl();
12223     if (const MemberExpr *ME = dyn_cast<MemberExpr>(BaseExpr))
12224       ND = ME->getMemberDecl();
12225   }
12226
12227   if (ND)
12228     DiagRuntimeBehavior(ND->getLocStart(), BaseExpr,
12229                         PDiag(diag::note_array_index_out_of_bounds)
12230                           << ND->getDeclName());
12231 }
12232
12233 void Sema::CheckArrayAccess(const Expr *expr) {
12234   int AllowOnePastEnd = 0;
12235   while (expr) {
12236     expr = expr->IgnoreParenImpCasts();
12237     switch (expr->getStmtClass()) {
12238       case Stmt::ArraySubscriptExprClass: {
12239         const ArraySubscriptExpr *ASE = cast<ArraySubscriptExpr>(expr);
12240         CheckArrayAccess(ASE->getBase(), ASE->getIdx(), ASE,
12241                          AllowOnePastEnd > 0);
12242         expr = ASE->getBase();
12243         break;
12244       }
12245       case Stmt::MemberExprClass: {
12246         expr = cast<MemberExpr>(expr)->getBase();
12247         break;
12248       }
12249       case Stmt::OMPArraySectionExprClass: {
12250         const OMPArraySectionExpr *ASE = cast<OMPArraySectionExpr>(expr);
12251         if (ASE->getLowerBound())
12252           CheckArrayAccess(ASE->getBase(), ASE->getLowerBound(),
12253                            /*ASE=*/nullptr, AllowOnePastEnd > 0);
12254         return;
12255       }
12256       case Stmt::UnaryOperatorClass: {
12257         // Only unwrap the * and & unary operators
12258         const UnaryOperator *UO = cast<UnaryOperator>(expr);
12259         expr = UO->getSubExpr();
12260         switch (UO->getOpcode()) {
12261           case UO_AddrOf:
12262             AllowOnePastEnd++;
12263             break;
12264           case UO_Deref:
12265             AllowOnePastEnd--;
12266             break;
12267           default:
12268             return;
12269         }
12270         break;
12271       }
12272       case Stmt::ConditionalOperatorClass: {
12273         const ConditionalOperator *cond = cast<ConditionalOperator>(expr);
12274         if (const Expr *lhs = cond->getLHS())
12275           CheckArrayAccess(lhs);
12276         if (const Expr *rhs = cond->getRHS())
12277           CheckArrayAccess(rhs);
12278         return;
12279       }
12280       case Stmt::CXXOperatorCallExprClass: {
12281         const auto *OCE = cast<CXXOperatorCallExpr>(expr);
12282         for (const auto *Arg : OCE->arguments())
12283           CheckArrayAccess(Arg);
12284         return;
12285       }
12286       default:
12287         return;
12288     }
12289   }
12290 }
12291
12292 //===--- CHECK: Objective-C retain cycles ----------------------------------//
12293
12294 namespace {
12295
12296 struct RetainCycleOwner {
12297   VarDecl *Variable = nullptr;
12298   SourceRange Range;
12299   SourceLocation Loc;
12300   bool Indirect = false;
12301
12302   RetainCycleOwner() = default;
12303
12304   void setLocsFrom(Expr *e) {
12305     Loc = e->getExprLoc();
12306     Range = e->getSourceRange();
12307   }
12308 };
12309
12310 } // namespace
12311
12312 /// Consider whether capturing the given variable can possibly lead to
12313 /// a retain cycle.
12314 static bool considerVariable(VarDecl *var, Expr *ref, RetainCycleOwner &owner) {
12315   // In ARC, it's captured strongly iff the variable has __strong
12316   // lifetime.  In MRR, it's captured strongly if the variable is
12317   // __block and has an appropriate type.
12318   if (var->getType().getObjCLifetime() != Qualifiers::OCL_Strong)
12319     return false;
12320
12321   owner.Variable = var;
12322   if (ref)
12323     owner.setLocsFrom(ref);
12324   return true;
12325 }
12326
12327 static bool findRetainCycleOwner(Sema &S, Expr *e, RetainCycleOwner &owner) {
12328   while (true) {
12329     e = e->IgnoreParens();
12330     if (CastExpr *cast = dyn_cast<CastExpr>(e)) {
12331       switch (cast->getCastKind()) {
12332       case CK_BitCast:
12333       case CK_LValueBitCast:
12334       case CK_LValueToRValue:
12335       case CK_ARCReclaimReturnedObject:
12336         e = cast->getSubExpr();
12337         continue;
12338
12339       default:
12340         return false;
12341       }
12342     }
12343
12344     if (ObjCIvarRefExpr *ref = dyn_cast<ObjCIvarRefExpr>(e)) {
12345       ObjCIvarDecl *ivar = ref->getDecl();
12346       if (ivar->getType().getObjCLifetime() != Qualifiers::OCL_Strong)
12347         return false;
12348
12349       // Try to find a retain cycle in the base.
12350       if (!findRetainCycleOwner(S, ref->getBase(), owner))
12351         return false;
12352
12353       if (ref->isFreeIvar()) owner.setLocsFrom(ref);
12354       owner.Indirect = true;
12355       return true;
12356     }
12357
12358     if (DeclRefExpr *ref = dyn_cast<DeclRefExpr>(e)) {
12359       VarDecl *var = dyn_cast<VarDecl>(ref->getDecl());
12360       if (!var) return false;
12361       return considerVariable(var, ref, owner);
12362     }
12363
12364     if (MemberExpr *member = dyn_cast<MemberExpr>(e)) {
12365       if (member->isArrow()) return false;
12366
12367       // Don't count this as an indirect ownership.
12368       e = member->getBase();
12369       continue;
12370     }
12371
12372     if (PseudoObjectExpr *pseudo = dyn_cast<PseudoObjectExpr>(e)) {
12373       // Only pay attention to pseudo-objects on property references.
12374       ObjCPropertyRefExpr *pre
12375         = dyn_cast<ObjCPropertyRefExpr>(pseudo->getSyntacticForm()
12376                                               ->IgnoreParens());
12377       if (!pre) return false;
12378       if (pre->isImplicitProperty()) return false;
12379       ObjCPropertyDecl *property = pre->getExplicitProperty();
12380       if (!property->isRetaining() &&
12381           !(property->getPropertyIvarDecl() &&
12382             property->getPropertyIvarDecl()->getType()
12383               .getObjCLifetime() == Qualifiers::OCL_Strong))
12384           return false;
12385
12386       owner.Indirect = true;
12387       if (pre->isSuperReceiver()) {
12388         owner.Variable = S.getCurMethodDecl()->getSelfDecl();
12389         if (!owner.Variable)
12390           return false;
12391         owner.Loc = pre->getLocation();
12392         owner.Range = pre->getSourceRange();
12393         return true;
12394       }
12395       e = const_cast<Expr*>(cast<OpaqueValueExpr>(pre->getBase())
12396                               ->getSourceExpr());
12397       continue;
12398     }
12399
12400     // Array ivars?
12401
12402     return false;
12403   }
12404 }
12405
12406 namespace {
12407
12408   struct FindCaptureVisitor : EvaluatedExprVisitor<FindCaptureVisitor> {
12409     ASTContext &Context;
12410     VarDecl *Variable;
12411     Expr *Capturer = nullptr;
12412     bool VarWillBeReased = false;
12413
12414     FindCaptureVisitor(ASTContext &Context, VarDecl *variable)
12415         : EvaluatedExprVisitor<FindCaptureVisitor>(Context),
12416           Context(Context), Variable(variable) {}
12417
12418     void VisitDeclRefExpr(DeclRefExpr *ref) {
12419       if (ref->getDecl() == Variable && !Capturer)
12420         Capturer = ref;
12421     }
12422
12423     void VisitObjCIvarRefExpr(ObjCIvarRefExpr *ref) {
12424       if (Capturer) return;
12425       Visit(ref->getBase());
12426       if (Capturer && ref->isFreeIvar())
12427         Capturer = ref;
12428     }
12429
12430     void VisitBlockExpr(BlockExpr *block) {
12431       // Look inside nested blocks
12432       if (block->getBlockDecl()->capturesVariable(Variable))
12433         Visit(block->getBlockDecl()->getBody());
12434     }
12435
12436     void VisitOpaqueValueExpr(OpaqueValueExpr *OVE) {
12437       if (Capturer) return;
12438       if (OVE->getSourceExpr())
12439         Visit(OVE->getSourceExpr());
12440     }
12441
12442     void VisitBinaryOperator(BinaryOperator *BinOp) {
12443       if (!Variable || VarWillBeReased || BinOp->getOpcode() != BO_Assign)
12444         return;
12445       Expr *LHS = BinOp->getLHS();
12446       if (const DeclRefExpr *DRE = dyn_cast_or_null<DeclRefExpr>(LHS)) {
12447         if (DRE->getDecl() != Variable)
12448           return;
12449         if (Expr *RHS = BinOp->getRHS()) {
12450           RHS = RHS->IgnoreParenCasts();
12451           llvm::APSInt Value;
12452           VarWillBeReased =
12453             (RHS && RHS->isIntegerConstantExpr(Value, Context) && Value == 0);
12454         }
12455       }
12456     }
12457   };
12458
12459 } // namespace
12460
12461 /// Check whether the given argument is a block which captures a
12462 /// variable.
12463 static Expr *findCapturingExpr(Sema &S, Expr *e, RetainCycleOwner &owner) {
12464   assert(owner.Variable && owner.Loc.isValid());
12465
12466   e = e->IgnoreParenCasts();
12467
12468   // Look through [^{...} copy] and Block_copy(^{...}).
12469   if (ObjCMessageExpr *ME = dyn_cast<ObjCMessageExpr>(e)) {
12470     Selector Cmd = ME->getSelector();
12471     if (Cmd.isUnarySelector() && Cmd.getNameForSlot(0) == "copy") {
12472       e = ME->getInstanceReceiver();
12473       if (!e)
12474         return nullptr;
12475       e = e->IgnoreParenCasts();
12476     }
12477   } else if (CallExpr *CE = dyn_cast<CallExpr>(e)) {
12478     if (CE->getNumArgs() == 1) {
12479       FunctionDecl *Fn = dyn_cast_or_null<FunctionDecl>(CE->getCalleeDecl());
12480       if (Fn) {
12481         const IdentifierInfo *FnI = Fn->getIdentifier();
12482         if (FnI && FnI->isStr("_Block_copy")) {
12483           e = CE->getArg(0)->IgnoreParenCasts();
12484         }
12485       }
12486     }
12487   }
12488
12489   BlockExpr *block = dyn_cast<BlockExpr>(e);
12490   if (!block || !block->getBlockDecl()->capturesVariable(owner.Variable))
12491     return nullptr;
12492
12493   FindCaptureVisitor visitor(S.Context, owner.Variable);
12494   visitor.Visit(block->getBlockDecl()->getBody());
12495   return visitor.VarWillBeReased ? nullptr : visitor.Capturer;
12496 }
12497
12498 static void diagnoseRetainCycle(Sema &S, Expr *capturer,
12499                                 RetainCycleOwner &owner) {
12500   assert(capturer);
12501   assert(owner.Variable && owner.Loc.isValid());
12502
12503   S.Diag(capturer->getExprLoc(), diag::warn_arc_retain_cycle)
12504     << owner.Variable << capturer->getSourceRange();
12505   S.Diag(owner.Loc, diag::note_arc_retain_cycle_owner)
12506     << owner.Indirect << owner.Range;
12507 }
12508
12509 /// Check for a keyword selector that starts with the word 'add' or
12510 /// 'set'.
12511 static bool isSetterLikeSelector(Selector sel) {
12512   if (sel.isUnarySelector()) return false;
12513
12514   StringRef str = sel.getNameForSlot(0);
12515   while (!str.empty() && str.front() == '_') str = str.substr(1);
12516   if (str.startswith("set"))
12517     str = str.substr(3);
12518   else if (str.startswith("add")) {
12519     // Specially whitelist 'addOperationWithBlock:'.
12520     if (sel.getNumArgs() == 1 && str.startswith("addOperationWithBlock"))
12521       return false;
12522     str = str.substr(3);
12523   }
12524   else
12525     return false;
12526
12527   if (str.empty()) return true;
12528   return !isLowercase(str.front());
12529 }
12530
12531 static Optional<int> GetNSMutableArrayArgumentIndex(Sema &S,
12532                                                     ObjCMessageExpr *Message) {
12533   bool IsMutableArray = S.NSAPIObj->isSubclassOfNSClass(
12534                                                 Message->getReceiverInterface(),
12535                                                 NSAPI::ClassId_NSMutableArray);
12536   if (!IsMutableArray) {
12537     return None;
12538   }
12539
12540   Selector Sel = Message->getSelector();
12541
12542   Optional<NSAPI::NSArrayMethodKind> MKOpt =
12543     S.NSAPIObj->getNSArrayMethodKind(Sel);
12544   if (!MKOpt) {
12545     return None;
12546   }
12547
12548   NSAPI::NSArrayMethodKind MK = *MKOpt;
12549
12550   switch (MK) {
12551     case NSAPI::NSMutableArr_addObject:
12552     case NSAPI::NSMutableArr_insertObjectAtIndex:
12553     case NSAPI::NSMutableArr_setObjectAtIndexedSubscript:
12554       return 0;
12555     case NSAPI::NSMutableArr_replaceObjectAtIndex:
12556       return 1;
12557
12558     default:
12559       return None;
12560   }
12561
12562   return None;
12563 }
12564
12565 static
12566 Optional<int> GetNSMutableDictionaryArgumentIndex(Sema &S,
12567                                                   ObjCMessageExpr *Message) {
12568   bool IsMutableDictionary = S.NSAPIObj->isSubclassOfNSClass(
12569                                             Message->getReceiverInterface(),
12570                                             NSAPI::ClassId_NSMutableDictionary);
12571   if (!IsMutableDictionary) {
12572     return None;
12573   }
12574
12575   Selector Sel = Message->getSelector();
12576
12577   Optional<NSAPI::NSDictionaryMethodKind> MKOpt =
12578     S.NSAPIObj->getNSDictionaryMethodKind(Sel);
12579   if (!MKOpt) {
12580     return None;
12581   }
12582
12583   NSAPI::NSDictionaryMethodKind MK = *MKOpt;
12584
12585   switch (MK) {
12586     case NSAPI::NSMutableDict_setObjectForKey:
12587     case NSAPI::NSMutableDict_setValueForKey:
12588     case NSAPI::NSMutableDict_setObjectForKeyedSubscript:
12589       return 0;
12590
12591     default:
12592       return None;
12593   }
12594
12595   return None;
12596 }
12597
12598 static Optional<int> GetNSSetArgumentIndex(Sema &S, ObjCMessageExpr *Message) {
12599   bool IsMutableSet = S.NSAPIObj->isSubclassOfNSClass(
12600                                                 Message->getReceiverInterface(),
12601                                                 NSAPI::ClassId_NSMutableSet);
12602
12603   bool IsMutableOrderedSet = S.NSAPIObj->isSubclassOfNSClass(
12604                                             Message->getReceiverInterface(),
12605                                             NSAPI::ClassId_NSMutableOrderedSet);
12606   if (!IsMutableSet && !IsMutableOrderedSet) {
12607     return None;
12608   }
12609
12610   Selector Sel = Message->getSelector();
12611
12612   Optional<NSAPI::NSSetMethodKind> MKOpt = S.NSAPIObj->getNSSetMethodKind(Sel);
12613   if (!MKOpt) {
12614     return None;
12615   }
12616
12617   NSAPI::NSSetMethodKind MK = *MKOpt;
12618
12619   switch (MK) {
12620     case NSAPI::NSMutableSet_addObject:
12621     case NSAPI::NSOrderedSet_setObjectAtIndex:
12622     case NSAPI::NSOrderedSet_setObjectAtIndexedSubscript:
12623     case NSAPI::NSOrderedSet_insertObjectAtIndex:
12624       return 0;
12625     case NSAPI::NSOrderedSet_replaceObjectAtIndexWithObject:
12626       return 1;
12627   }
12628
12629   return None;
12630 }
12631
12632 void Sema::CheckObjCCircularContainer(ObjCMessageExpr *Message) {
12633   if (!Message->isInstanceMessage()) {
12634     return;
12635   }
12636
12637   Optional<int> ArgOpt;
12638
12639   if (!(ArgOpt = GetNSMutableArrayArgumentIndex(*this, Message)) &&
12640       !(ArgOpt = GetNSMutableDictionaryArgumentIndex(*this, Message)) &&
12641       !(ArgOpt = GetNSSetArgumentIndex(*this, Message))) {
12642     return;
12643   }
12644
12645   int ArgIndex = *ArgOpt;
12646
12647   Expr *Arg = Message->getArg(ArgIndex)->IgnoreImpCasts();
12648   if (OpaqueValueExpr *OE = dyn_cast<OpaqueValueExpr>(Arg)) {
12649     Arg = OE->getSourceExpr()->IgnoreImpCasts();
12650   }
12651
12652   if (Message->getReceiverKind() == ObjCMessageExpr::SuperInstance) {
12653     if (DeclRefExpr *ArgRE = dyn_cast<DeclRefExpr>(Arg)) {
12654       if (ArgRE->isObjCSelfExpr()) {
12655         Diag(Message->getSourceRange().getBegin(),
12656              diag::warn_objc_circular_container)
12657           << ArgRE->getDecl() << StringRef("'super'");
12658       }
12659     }
12660   } else {
12661     Expr *Receiver = Message->getInstanceReceiver()->IgnoreImpCasts();
12662
12663     if (OpaqueValueExpr *OE = dyn_cast<OpaqueValueExpr>(Receiver)) {
12664       Receiver = OE->getSourceExpr()->IgnoreImpCasts();
12665     }
12666
12667     if (DeclRefExpr *ReceiverRE = dyn_cast<DeclRefExpr>(Receiver)) {
12668       if (DeclRefExpr *ArgRE = dyn_cast<DeclRefExpr>(Arg)) {
12669         if (ReceiverRE->getDecl() == ArgRE->getDecl()) {
12670           ValueDecl *Decl = ReceiverRE->getDecl();
12671           Diag(Message->getSourceRange().getBegin(),
12672                diag::warn_objc_circular_container)
12673             << Decl << Decl;
12674           if (!ArgRE->isObjCSelfExpr()) {
12675             Diag(Decl->getLocation(),
12676                  diag::note_objc_circular_container_declared_here)
12677               << Decl;
12678           }
12679         }
12680       }
12681     } else if (ObjCIvarRefExpr *IvarRE = dyn_cast<ObjCIvarRefExpr>(Receiver)) {
12682       if (ObjCIvarRefExpr *IvarArgRE = dyn_cast<ObjCIvarRefExpr>(Arg)) {
12683         if (IvarRE->getDecl() == IvarArgRE->getDecl()) {
12684           ObjCIvarDecl *Decl = IvarRE->getDecl();
12685           Diag(Message->getSourceRange().getBegin(),
12686                diag::warn_objc_circular_container)
12687             << Decl << Decl;
12688           Diag(Decl->getLocation(),
12689                diag::note_objc_circular_container_declared_here)
12690             << Decl;
12691         }
12692       }
12693     }
12694   }
12695 }
12696
12697 /// Check a message send to see if it's likely to cause a retain cycle.
12698 void Sema::checkRetainCycles(ObjCMessageExpr *msg) {
12699   // Only check instance methods whose selector looks like a setter.
12700   if (!msg->isInstanceMessage() || !isSetterLikeSelector(msg->getSelector()))
12701     return;
12702
12703   // Try to find a variable that the receiver is strongly owned by.
12704   RetainCycleOwner owner;
12705   if (msg->getReceiverKind() == ObjCMessageExpr::Instance) {
12706     if (!findRetainCycleOwner(*this, msg->getInstanceReceiver(), owner))
12707       return;
12708   } else {
12709     assert(msg->getReceiverKind() == ObjCMessageExpr::SuperInstance);
12710     owner.Variable = getCurMethodDecl()->getSelfDecl();
12711     owner.Loc = msg->getSuperLoc();
12712     owner.Range = msg->getSuperLoc();
12713   }
12714
12715   // Check whether the receiver is captured by any of the arguments.
12716   const ObjCMethodDecl *MD = msg->getMethodDecl();
12717   for (unsigned i = 0, e = msg->getNumArgs(); i != e; ++i) {
12718     if (Expr *capturer = findCapturingExpr(*this, msg->getArg(i), owner)) {
12719       // noescape blocks should not be retained by the method.
12720       if (MD && MD->parameters()[i]->hasAttr<NoEscapeAttr>())
12721         continue;
12722       return diagnoseRetainCycle(*this, capturer, owner);
12723     }
12724   }
12725 }
12726
12727 /// Check a property assign to see if it's likely to cause a retain cycle.
12728 void Sema::checkRetainCycles(Expr *receiver, Expr *argument) {
12729   RetainCycleOwner owner;
12730   if (!findRetainCycleOwner(*this, receiver, owner))
12731     return;
12732
12733   if (Expr *capturer = findCapturingExpr(*this, argument, owner))
12734     diagnoseRetainCycle(*this, capturer, owner);
12735 }
12736
12737 void Sema::checkRetainCycles(VarDecl *Var, Expr *Init) {
12738   RetainCycleOwner Owner;
12739   if (!considerVariable(Var, /*DeclRefExpr=*/nullptr, Owner))
12740     return;
12741
12742   // Because we don't have an expression for the variable, we have to set the
12743   // location explicitly here.
12744   Owner.Loc = Var->getLocation();
12745   Owner.Range = Var->getSourceRange();
12746
12747   if (Expr *Capturer = findCapturingExpr(*this, Init, Owner))
12748     diagnoseRetainCycle(*this, Capturer, Owner);
12749 }
12750
12751 static bool checkUnsafeAssignLiteral(Sema &S, SourceLocation Loc,
12752                                      Expr *RHS, bool isProperty) {
12753   // Check if RHS is an Objective-C object literal, which also can get
12754   // immediately zapped in a weak reference.  Note that we explicitly
12755   // allow ObjCStringLiterals, since those are designed to never really die.
12756   RHS = RHS->IgnoreParenImpCasts();
12757
12758   // This enum needs to match with the 'select' in
12759   // warn_objc_arc_literal_assign (off-by-1).
12760   Sema::ObjCLiteralKind Kind = S.CheckLiteralKind(RHS);
12761   if (Kind == Sema::LK_String || Kind == Sema::LK_None)
12762     return false;
12763
12764   S.Diag(Loc, diag::warn_arc_literal_assign)
12765     << (unsigned) Kind
12766     << (isProperty ? 0 : 1)
12767     << RHS->getSourceRange();
12768
12769   return true;
12770 }
12771
12772 static bool checkUnsafeAssignObject(Sema &S, SourceLocation Loc,
12773                                     Qualifiers::ObjCLifetime LT,
12774                                     Expr *RHS, bool isProperty) {
12775   // Strip off any implicit cast added to get to the one ARC-specific.
12776   while (ImplicitCastExpr *cast = dyn_cast<ImplicitCastExpr>(RHS)) {
12777     if (cast->getCastKind() == CK_ARCConsumeObject) {
12778       S.Diag(Loc, diag::warn_arc_retained_assign)
12779         << (LT == Qualifiers::OCL_ExplicitNone)
12780         << (isProperty ? 0 : 1)
12781         << RHS->getSourceRange();
12782       return true;
12783     }
12784     RHS = cast->getSubExpr();
12785   }
12786
12787   if (LT == Qualifiers::OCL_Weak &&
12788       checkUnsafeAssignLiteral(S, Loc, RHS, isProperty))
12789     return true;
12790
12791   return false;
12792 }
12793
12794 bool Sema::checkUnsafeAssigns(SourceLocation Loc,
12795                               QualType LHS, Expr *RHS) {
12796   Qualifiers::ObjCLifetime LT = LHS.getObjCLifetime();
12797
12798   if (LT != Qualifiers::OCL_Weak && LT != Qualifiers::OCL_ExplicitNone)
12799     return false;
12800
12801   if (checkUnsafeAssignObject(*this, Loc, LT, RHS, false))
12802     return true;
12803
12804   return false;
12805 }
12806
12807 void Sema::checkUnsafeExprAssigns(SourceLocation Loc,
12808                               Expr *LHS, Expr *RHS) {
12809   QualType LHSType;
12810   // PropertyRef on LHS type need be directly obtained from
12811   // its declaration as it has a PseudoType.
12812   ObjCPropertyRefExpr *PRE
12813     = dyn_cast<ObjCPropertyRefExpr>(LHS->IgnoreParens());
12814   if (PRE && !PRE->isImplicitProperty()) {
12815     const ObjCPropertyDecl *PD = PRE->getExplicitProperty();
12816     if (PD)
12817       LHSType = PD->getType();
12818   }
12819
12820   if (LHSType.isNull())
12821     LHSType = LHS->getType();
12822
12823   Qualifiers::ObjCLifetime LT = LHSType.getObjCLifetime();
12824
12825   if (LT == Qualifiers::OCL_Weak) {
12826     if (!Diags.isIgnored(diag::warn_arc_repeated_use_of_weak, Loc))
12827       getCurFunction()->markSafeWeakUse(LHS);
12828   }
12829
12830   if (checkUnsafeAssigns(Loc, LHSType, RHS))
12831     return;
12832
12833   // FIXME. Check for other life times.
12834   if (LT != Qualifiers::OCL_None)
12835     return;
12836
12837   if (PRE) {
12838     if (PRE->isImplicitProperty())
12839       return;
12840     const ObjCPropertyDecl *PD = PRE->getExplicitProperty();
12841     if (!PD)
12842       return;
12843
12844     unsigned Attributes = PD->getPropertyAttributes();
12845     if (Attributes & ObjCPropertyDecl::OBJC_PR_assign) {
12846       // when 'assign' attribute was not explicitly specified
12847       // by user, ignore it and rely on property type itself
12848       // for lifetime info.
12849       unsigned AsWrittenAttr = PD->getPropertyAttributesAsWritten();
12850       if (!(AsWrittenAttr & ObjCPropertyDecl::OBJC_PR_assign) &&
12851           LHSType->isObjCRetainableType())
12852         return;
12853
12854       while (ImplicitCastExpr *cast = dyn_cast<ImplicitCastExpr>(RHS)) {
12855         if (cast->getCastKind() == CK_ARCConsumeObject) {
12856           Diag(Loc, diag::warn_arc_retained_property_assign)
12857           << RHS->getSourceRange();
12858           return;
12859         }
12860         RHS = cast->getSubExpr();
12861       }
12862     }
12863     else if (Attributes & ObjCPropertyDecl::OBJC_PR_weak) {
12864       if (checkUnsafeAssignObject(*this, Loc, Qualifiers::OCL_Weak, RHS, true))
12865         return;
12866     }
12867   }
12868 }
12869
12870 //===--- CHECK: Empty statement body (-Wempty-body) ---------------------===//
12871
12872 static bool ShouldDiagnoseEmptyStmtBody(const SourceManager &SourceMgr,
12873                                         SourceLocation StmtLoc,
12874                                         const NullStmt *Body) {
12875   // Do not warn if the body is a macro that expands to nothing, e.g:
12876   //
12877   // #define CALL(x)
12878   // if (condition)
12879   //   CALL(0);
12880   if (Body->hasLeadingEmptyMacro())
12881     return false;
12882
12883   // Get line numbers of statement and body.
12884   bool StmtLineInvalid;
12885   unsigned StmtLine = SourceMgr.getPresumedLineNumber(StmtLoc,
12886                                                       &StmtLineInvalid);
12887   if (StmtLineInvalid)
12888     return false;
12889
12890   bool BodyLineInvalid;
12891   unsigned BodyLine = SourceMgr.getSpellingLineNumber(Body->getSemiLoc(),
12892                                                       &BodyLineInvalid);
12893   if (BodyLineInvalid)
12894     return false;
12895
12896   // Warn if null statement and body are on the same line.
12897   if (StmtLine != BodyLine)
12898     return false;
12899
12900   return true;
12901 }
12902
12903 void Sema::DiagnoseEmptyStmtBody(SourceLocation StmtLoc,
12904                                  const Stmt *Body,
12905                                  unsigned DiagID) {
12906   // Since this is a syntactic check, don't emit diagnostic for template
12907   // instantiations, this just adds noise.
12908   if (CurrentInstantiationScope)
12909     return;
12910
12911   // The body should be a null statement.
12912   const NullStmt *NBody = dyn_cast<NullStmt>(Body);
12913   if (!NBody)
12914     return;
12915
12916   // Do the usual checks.
12917   if (!ShouldDiagnoseEmptyStmtBody(SourceMgr, StmtLoc, NBody))
12918     return;
12919
12920   Diag(NBody->getSemiLoc(), DiagID);
12921   Diag(NBody->getSemiLoc(), diag::note_empty_body_on_separate_line);
12922 }
12923
12924 void Sema::DiagnoseEmptyLoopBody(const Stmt *S,
12925                                  const Stmt *PossibleBody) {
12926   assert(!CurrentInstantiationScope); // Ensured by caller
12927
12928   SourceLocation StmtLoc;
12929   const Stmt *Body;
12930   unsigned DiagID;
12931   if (const ForStmt *FS = dyn_cast<ForStmt>(S)) {
12932     StmtLoc = FS->getRParenLoc();
12933     Body = FS->getBody();
12934     DiagID = diag::warn_empty_for_body;
12935   } else if (const WhileStmt *WS = dyn_cast<WhileStmt>(S)) {
12936     StmtLoc = WS->getCond()->getSourceRange().getEnd();
12937     Body = WS->getBody();
12938     DiagID = diag::warn_empty_while_body;
12939   } else
12940     return; // Neither `for' nor `while'.
12941
12942   // The body should be a null statement.
12943   const NullStmt *NBody = dyn_cast<NullStmt>(Body);
12944   if (!NBody)
12945     return;
12946
12947   // Skip expensive checks if diagnostic is disabled.
12948   if (Diags.isIgnored(DiagID, NBody->getSemiLoc()))
12949     return;
12950
12951   // Do the usual checks.
12952   if (!ShouldDiagnoseEmptyStmtBody(SourceMgr, StmtLoc, NBody))
12953     return;
12954
12955   // `for(...);' and `while(...);' are popular idioms, so in order to keep
12956   // noise level low, emit diagnostics only if for/while is followed by a
12957   // CompoundStmt, e.g.:
12958   //    for (int i = 0; i < n; i++);
12959   //    {
12960   //      a(i);
12961   //    }
12962   // or if for/while is followed by a statement with more indentation
12963   // than for/while itself:
12964   //    for (int i = 0; i < n; i++);
12965   //      a(i);
12966   bool ProbableTypo = isa<CompoundStmt>(PossibleBody);
12967   if (!ProbableTypo) {
12968     bool BodyColInvalid;
12969     unsigned BodyCol = SourceMgr.getPresumedColumnNumber(
12970                              PossibleBody->getLocStart(),
12971                              &BodyColInvalid);
12972     if (BodyColInvalid)
12973       return;
12974
12975     bool StmtColInvalid;
12976     unsigned StmtCol = SourceMgr.getPresumedColumnNumber(
12977                              S->getLocStart(),
12978                              &StmtColInvalid);
12979     if (StmtColInvalid)
12980       return;
12981
12982     if (BodyCol > StmtCol)
12983       ProbableTypo = true;
12984   }
12985
12986   if (ProbableTypo) {
12987     Diag(NBody->getSemiLoc(), DiagID);
12988     Diag(NBody->getSemiLoc(), diag::note_empty_body_on_separate_line);
12989   }
12990 }
12991
12992 //===--- CHECK: Warn on self move with std::move. -------------------------===//
12993
12994 /// DiagnoseSelfMove - Emits a warning if a value is moved to itself.
12995 void Sema::DiagnoseSelfMove(const Expr *LHSExpr, const Expr *RHSExpr,
12996                              SourceLocation OpLoc) {
12997   if (Diags.isIgnored(diag::warn_sizeof_pointer_expr_memaccess, OpLoc))
12998     return;
12999
13000   if (inTemplateInstantiation())
13001     return;
13002
13003   // Strip parens and casts away.
13004   LHSExpr = LHSExpr->IgnoreParenImpCasts();
13005   RHSExpr = RHSExpr->IgnoreParenImpCasts();
13006
13007   // Check for a call expression
13008   const CallExpr *CE = dyn_cast<CallExpr>(RHSExpr);
13009   if (!CE || CE->getNumArgs() != 1)
13010     return;
13011
13012   // Check for a call to std::move
13013   if (!CE->isCallToStdMove())
13014     return;
13015
13016   // Get argument from std::move
13017   RHSExpr = CE->getArg(0);
13018
13019   const DeclRefExpr *LHSDeclRef = dyn_cast<DeclRefExpr>(LHSExpr);
13020   const DeclRefExpr *RHSDeclRef = dyn_cast<DeclRefExpr>(RHSExpr);
13021
13022   // Two DeclRefExpr's, check that the decls are the same.
13023   if (LHSDeclRef && RHSDeclRef) {
13024     if (!LHSDeclRef->getDecl() || !RHSDeclRef->getDecl())
13025       return;
13026     if (LHSDeclRef->getDecl()->getCanonicalDecl() !=
13027         RHSDeclRef->getDecl()->getCanonicalDecl())
13028       return;
13029
13030     Diag(OpLoc, diag::warn_self_move) << LHSExpr->getType()
13031                                         << LHSExpr->getSourceRange()
13032                                         << RHSExpr->getSourceRange();
13033     return;
13034   }
13035
13036   // Member variables require a different approach to check for self moves.
13037   // MemberExpr's are the same if every nested MemberExpr refers to the same
13038   // Decl and that the base Expr's are DeclRefExpr's with the same Decl or
13039   // the base Expr's are CXXThisExpr's.
13040   const Expr *LHSBase = LHSExpr;
13041   const Expr *RHSBase = RHSExpr;
13042   const MemberExpr *LHSME = dyn_cast<MemberExpr>(LHSExpr);
13043   const MemberExpr *RHSME = dyn_cast<MemberExpr>(RHSExpr);
13044   if (!LHSME || !RHSME)
13045     return;
13046
13047   while (LHSME && RHSME) {
13048     if (LHSME->getMemberDecl()->getCanonicalDecl() !=
13049         RHSME->getMemberDecl()->getCanonicalDecl())
13050       return;
13051
13052     LHSBase = LHSME->getBase();
13053     RHSBase = RHSME->getBase();
13054     LHSME = dyn_cast<MemberExpr>(LHSBase);
13055     RHSME = dyn_cast<MemberExpr>(RHSBase);
13056   }
13057
13058   LHSDeclRef = dyn_cast<DeclRefExpr>(LHSBase);
13059   RHSDeclRef = dyn_cast<DeclRefExpr>(RHSBase);
13060   if (LHSDeclRef && RHSDeclRef) {
13061     if (!LHSDeclRef->getDecl() || !RHSDeclRef->getDecl())
13062       return;
13063     if (LHSDeclRef->getDecl()->getCanonicalDecl() !=
13064         RHSDeclRef->getDecl()->getCanonicalDecl())
13065       return;
13066
13067     Diag(OpLoc, diag::warn_self_move) << LHSExpr->getType()
13068                                         << LHSExpr->getSourceRange()
13069                                         << RHSExpr->getSourceRange();
13070     return;
13071   }
13072
13073   if (isa<CXXThisExpr>(LHSBase) && isa<CXXThisExpr>(RHSBase))
13074     Diag(OpLoc, diag::warn_self_move) << LHSExpr->getType()
13075                                         << LHSExpr->getSourceRange()
13076                                         << RHSExpr->getSourceRange();
13077 }
13078
13079 //===--- Layout compatibility ----------------------------------------------//
13080
13081 static bool isLayoutCompatible(ASTContext &C, QualType T1, QualType T2);
13082
13083 /// Check if two enumeration types are layout-compatible.
13084 static bool isLayoutCompatible(ASTContext &C, EnumDecl *ED1, EnumDecl *ED2) {
13085   // C++11 [dcl.enum] p8:
13086   // Two enumeration types are layout-compatible if they have the same
13087   // underlying type.
13088   return ED1->isComplete() && ED2->isComplete() &&
13089          C.hasSameType(ED1->getIntegerType(), ED2->getIntegerType());
13090 }
13091
13092 /// Check if two fields are layout-compatible.
13093 static bool isLayoutCompatible(ASTContext &C, FieldDecl *Field1,
13094                                FieldDecl *Field2) {
13095   if (!isLayoutCompatible(C, Field1->getType(), Field2->getType()))
13096     return false;
13097
13098   if (Field1->isBitField() != Field2->isBitField())
13099     return false;
13100
13101   if (Field1->isBitField()) {
13102     // Make sure that the bit-fields are the same length.
13103     unsigned Bits1 = Field1->getBitWidthValue(C);
13104     unsigned Bits2 = Field2->getBitWidthValue(C);
13105
13106     if (Bits1 != Bits2)
13107       return false;
13108   }
13109
13110   return true;
13111 }
13112
13113 /// Check if two standard-layout structs are layout-compatible.
13114 /// (C++11 [class.mem] p17)
13115 static bool isLayoutCompatibleStruct(ASTContext &C, RecordDecl *RD1,
13116                                      RecordDecl *RD2) {
13117   // If both records are C++ classes, check that base classes match.
13118   if (const CXXRecordDecl *D1CXX = dyn_cast<CXXRecordDecl>(RD1)) {
13119     // If one of records is a CXXRecordDecl we are in C++ mode,
13120     // thus the other one is a CXXRecordDecl, too.
13121     const CXXRecordDecl *D2CXX = cast<CXXRecordDecl>(RD2);
13122     // Check number of base classes.
13123     if (D1CXX->getNumBases() != D2CXX->getNumBases())
13124       return false;
13125
13126     // Check the base classes.
13127     for (CXXRecordDecl::base_class_const_iterator
13128                Base1 = D1CXX->bases_begin(),
13129            BaseEnd1 = D1CXX->bases_end(),
13130               Base2 = D2CXX->bases_begin();
13131          Base1 != BaseEnd1;
13132          ++Base1, ++Base2) {
13133       if (!isLayoutCompatible(C, Base1->getType(), Base2->getType()))
13134         return false;
13135     }
13136   } else if (const CXXRecordDecl *D2CXX = dyn_cast<CXXRecordDecl>(RD2)) {
13137     // If only RD2 is a C++ class, it should have zero base classes.
13138     if (D2CXX->getNumBases() > 0)
13139       return false;
13140   }
13141
13142   // Check the fields.
13143   RecordDecl::field_iterator Field2 = RD2->field_begin(),
13144                              Field2End = RD2->field_end(),
13145                              Field1 = RD1->field_begin(),
13146                              Field1End = RD1->field_end();
13147   for ( ; Field1 != Field1End && Field2 != Field2End; ++Field1, ++Field2) {
13148     if (!isLayoutCompatible(C, *Field1, *Field2))
13149       return false;
13150   }
13151   if (Field1 != Field1End || Field2 != Field2End)
13152     return false;
13153
13154   return true;
13155 }
13156
13157 /// Check if two standard-layout unions are layout-compatible.
13158 /// (C++11 [class.mem] p18)
13159 static bool isLayoutCompatibleUnion(ASTContext &C, RecordDecl *RD1,
13160                                     RecordDecl *RD2) {
13161   llvm::SmallPtrSet<FieldDecl *, 8> UnmatchedFields;
13162   for (auto *Field2 : RD2->fields())
13163     UnmatchedFields.insert(Field2);
13164
13165   for (auto *Field1 : RD1->fields()) {
13166     llvm::SmallPtrSet<FieldDecl *, 8>::iterator
13167         I = UnmatchedFields.begin(),
13168         E = UnmatchedFields.end();
13169
13170     for ( ; I != E; ++I) {
13171       if (isLayoutCompatible(C, Field1, *I)) {
13172         bool Result = UnmatchedFields.erase(*I);
13173         (void) Result;
13174         assert(Result);
13175         break;
13176       }
13177     }
13178     if (I == E)
13179       return false;
13180   }
13181
13182   return UnmatchedFields.empty();
13183 }
13184
13185 static bool isLayoutCompatible(ASTContext &C, RecordDecl *RD1,
13186                                RecordDecl *RD2) {
13187   if (RD1->isUnion() != RD2->isUnion())
13188     return false;
13189
13190   if (RD1->isUnion())
13191     return isLayoutCompatibleUnion(C, RD1, RD2);
13192   else
13193     return isLayoutCompatibleStruct(C, RD1, RD2);
13194 }
13195
13196 /// Check if two types are layout-compatible in C++11 sense.
13197 static bool isLayoutCompatible(ASTContext &C, QualType T1, QualType T2) {
13198   if (T1.isNull() || T2.isNull())
13199     return false;
13200
13201   // C++11 [basic.types] p11:
13202   // If two types T1 and T2 are the same type, then T1 and T2 are
13203   // layout-compatible types.
13204   if (C.hasSameType(T1, T2))
13205     return true;
13206
13207   T1 = T1.getCanonicalType().getUnqualifiedType();
13208   T2 = T2.getCanonicalType().getUnqualifiedType();
13209
13210   const Type::TypeClass TC1 = T1->getTypeClass();
13211   const Type::TypeClass TC2 = T2->getTypeClass();
13212
13213   if (TC1 != TC2)
13214     return false;
13215
13216   if (TC1 == Type::Enum) {
13217     return isLayoutCompatible(C,
13218                               cast<EnumType>(T1)->getDecl(),
13219                               cast<EnumType>(T2)->getDecl());
13220   } else if (TC1 == Type::Record) {
13221     if (!T1->isStandardLayoutType() || !T2->isStandardLayoutType())
13222       return false;
13223
13224     return isLayoutCompatible(C,
13225                               cast<RecordType>(T1)->getDecl(),
13226                               cast<RecordType>(T2)->getDecl());
13227   }
13228
13229   return false;
13230 }
13231
13232 //===--- CHECK: pointer_with_type_tag attribute: datatypes should match ----//
13233
13234 /// Given a type tag expression find the type tag itself.
13235 ///
13236 /// \param TypeExpr Type tag expression, as it appears in user's code.
13237 ///
13238 /// \param VD Declaration of an identifier that appears in a type tag.
13239 ///
13240 /// \param MagicValue Type tag magic value.
13241 static bool FindTypeTagExpr(const Expr *TypeExpr, const ASTContext &Ctx,
13242                             const ValueDecl **VD, uint64_t *MagicValue) {
13243   while(true) {
13244     if (!TypeExpr)
13245       return false;
13246
13247     TypeExpr = TypeExpr->IgnoreParenImpCasts()->IgnoreParenCasts();
13248
13249     switch (TypeExpr->getStmtClass()) {
13250     case Stmt::UnaryOperatorClass: {
13251       const UnaryOperator *UO = cast<UnaryOperator>(TypeExpr);
13252       if (UO->getOpcode() == UO_AddrOf || UO->getOpcode() == UO_Deref) {
13253         TypeExpr = UO->getSubExpr();
13254         continue;
13255       }
13256       return false;
13257     }
13258
13259     case Stmt::DeclRefExprClass: {
13260       const DeclRefExpr *DRE = cast<DeclRefExpr>(TypeExpr);
13261       *VD = DRE->getDecl();
13262       return true;
13263     }
13264
13265     case Stmt::IntegerLiteralClass: {
13266       const IntegerLiteral *IL = cast<IntegerLiteral>(TypeExpr);
13267       llvm::APInt MagicValueAPInt = IL->getValue();
13268       if (MagicValueAPInt.getActiveBits() <= 64) {
13269         *MagicValue = MagicValueAPInt.getZExtValue();
13270         return true;
13271       } else
13272         return false;
13273     }
13274
13275     case Stmt::BinaryConditionalOperatorClass:
13276     case Stmt::ConditionalOperatorClass: {
13277       const AbstractConditionalOperator *ACO =
13278           cast<AbstractConditionalOperator>(TypeExpr);
13279       bool Result;
13280       if (ACO->getCond()->EvaluateAsBooleanCondition(Result, Ctx)) {
13281         if (Result)
13282           TypeExpr = ACO->getTrueExpr();
13283         else
13284           TypeExpr = ACO->getFalseExpr();
13285         continue;
13286       }
13287       return false;
13288     }
13289
13290     case Stmt::BinaryOperatorClass: {
13291       const BinaryOperator *BO = cast<BinaryOperator>(TypeExpr);
13292       if (BO->getOpcode() == BO_Comma) {
13293         TypeExpr = BO->getRHS();
13294         continue;
13295       }
13296       return false;
13297     }
13298
13299     default:
13300       return false;
13301     }
13302   }
13303 }
13304
13305 /// Retrieve the C type corresponding to type tag TypeExpr.
13306 ///
13307 /// \param TypeExpr Expression that specifies a type tag.
13308 ///
13309 /// \param MagicValues Registered magic values.
13310 ///
13311 /// \param FoundWrongKind Set to true if a type tag was found, but of a wrong
13312 ///        kind.
13313 ///
13314 /// \param TypeInfo Information about the corresponding C type.
13315 ///
13316 /// \returns true if the corresponding C type was found.
13317 static bool GetMatchingCType(
13318         const IdentifierInfo *ArgumentKind,
13319         const Expr *TypeExpr, const ASTContext &Ctx,
13320         const llvm::DenseMap<Sema::TypeTagMagicValue,
13321                              Sema::TypeTagData> *MagicValues,
13322         bool &FoundWrongKind,
13323         Sema::TypeTagData &TypeInfo) {
13324   FoundWrongKind = false;
13325
13326   // Variable declaration that has type_tag_for_datatype attribute.
13327   const ValueDecl *VD = nullptr;
13328
13329   uint64_t MagicValue;
13330
13331   if (!FindTypeTagExpr(TypeExpr, Ctx, &VD, &MagicValue))
13332     return false;
13333
13334   if (VD) {
13335     if (TypeTagForDatatypeAttr *I = VD->getAttr<TypeTagForDatatypeAttr>()) {
13336       if (I->getArgumentKind() != ArgumentKind) {
13337         FoundWrongKind = true;
13338         return false;
13339       }
13340       TypeInfo.Type = I->getMatchingCType();
13341       TypeInfo.LayoutCompatible = I->getLayoutCompatible();
13342       TypeInfo.MustBeNull = I->getMustBeNull();
13343       return true;
13344     }
13345     return false;
13346   }
13347
13348   if (!MagicValues)
13349     return false;
13350
13351   llvm::DenseMap<Sema::TypeTagMagicValue,
13352                  Sema::TypeTagData>::const_iterator I =
13353       MagicValues->find(std::make_pair(ArgumentKind, MagicValue));
13354   if (I == MagicValues->end())
13355     return false;
13356
13357   TypeInfo = I->second;
13358   return true;
13359 }
13360
13361 void Sema::RegisterTypeTagForDatatype(const IdentifierInfo *ArgumentKind,
13362                                       uint64_t MagicValue, QualType Type,
13363                                       bool LayoutCompatible,
13364                                       bool MustBeNull) {
13365   if (!TypeTagForDatatypeMagicValues)
13366     TypeTagForDatatypeMagicValues.reset(
13367         new llvm::DenseMap<TypeTagMagicValue, TypeTagData>);
13368
13369   TypeTagMagicValue Magic(ArgumentKind, MagicValue);
13370   (*TypeTagForDatatypeMagicValues)[Magic] =
13371       TypeTagData(Type, LayoutCompatible, MustBeNull);
13372 }
13373
13374 static bool IsSameCharType(QualType T1, QualType T2) {
13375   const BuiltinType *BT1 = T1->getAs<BuiltinType>();
13376   if (!BT1)
13377     return false;
13378
13379   const BuiltinType *BT2 = T2->getAs<BuiltinType>();
13380   if (!BT2)
13381     return false;
13382
13383   BuiltinType::Kind T1Kind = BT1->getKind();
13384   BuiltinType::Kind T2Kind = BT2->getKind();
13385
13386   return (T1Kind == BuiltinType::SChar  && T2Kind == BuiltinType::Char_S) ||
13387          (T1Kind == BuiltinType::UChar  && T2Kind == BuiltinType::Char_U) ||
13388          (T1Kind == BuiltinType::Char_U && T2Kind == BuiltinType::UChar) ||
13389          (T1Kind == BuiltinType::Char_S && T2Kind == BuiltinType::SChar);
13390 }
13391
13392 void Sema::CheckArgumentWithTypeTag(const ArgumentWithTypeTagAttr *Attr,
13393                                     const ArrayRef<const Expr *> ExprArgs,
13394                                     SourceLocation CallSiteLoc) {
13395   const IdentifierInfo *ArgumentKind = Attr->getArgumentKind();
13396   bool IsPointerAttr = Attr->getIsPointer();
13397
13398   // Retrieve the argument representing the 'type_tag'.
13399   unsigned TypeTagIdxAST = Attr->getTypeTagIdx().getASTIndex();
13400   if (TypeTagIdxAST >= ExprArgs.size()) {
13401     Diag(CallSiteLoc, diag::err_tag_index_out_of_range)
13402         << 0 << Attr->getTypeTagIdx().getSourceIndex();
13403     return;
13404   }
13405   const Expr *TypeTagExpr = ExprArgs[TypeTagIdxAST];
13406   bool FoundWrongKind;
13407   TypeTagData TypeInfo;
13408   if (!GetMatchingCType(ArgumentKind, TypeTagExpr, Context,
13409                         TypeTagForDatatypeMagicValues.get(),
13410                         FoundWrongKind, TypeInfo)) {
13411     if (FoundWrongKind)
13412       Diag(TypeTagExpr->getExprLoc(),
13413            diag::warn_type_tag_for_datatype_wrong_kind)
13414         << TypeTagExpr->getSourceRange();
13415     return;
13416   }
13417
13418   // Retrieve the argument representing the 'arg_idx'.
13419   unsigned ArgumentIdxAST = Attr->getArgumentIdx().getASTIndex();
13420   if (ArgumentIdxAST >= ExprArgs.size()) {
13421     Diag(CallSiteLoc, diag::err_tag_index_out_of_range)
13422         << 1 << Attr->getArgumentIdx().getSourceIndex();
13423     return;
13424   }
13425   const Expr *ArgumentExpr = ExprArgs[ArgumentIdxAST];
13426   if (IsPointerAttr) {
13427     // Skip implicit cast of pointer to `void *' (as a function argument).
13428     if (const ImplicitCastExpr *ICE = dyn_cast<ImplicitCastExpr>(ArgumentExpr))
13429       if (ICE->getType()->isVoidPointerType() &&
13430           ICE->getCastKind() == CK_BitCast)
13431         ArgumentExpr = ICE->getSubExpr();
13432   }
13433   QualType ArgumentType = ArgumentExpr->getType();
13434
13435   // Passing a `void*' pointer shouldn't trigger a warning.
13436   if (IsPointerAttr && ArgumentType->isVoidPointerType())
13437     return;
13438
13439   if (TypeInfo.MustBeNull) {
13440     // Type tag with matching void type requires a null pointer.
13441     if (!ArgumentExpr->isNullPointerConstant(Context,
13442                                              Expr::NPC_ValueDependentIsNotNull)) {
13443       Diag(ArgumentExpr->getExprLoc(),
13444            diag::warn_type_safety_null_pointer_required)
13445           << ArgumentKind->getName()
13446           << ArgumentExpr->getSourceRange()
13447           << TypeTagExpr->getSourceRange();
13448     }
13449     return;
13450   }
13451
13452   QualType RequiredType = TypeInfo.Type;
13453   if (IsPointerAttr)
13454     RequiredType = Context.getPointerType(RequiredType);
13455
13456   bool mismatch = false;
13457   if (!TypeInfo.LayoutCompatible) {
13458     mismatch = !Context.hasSameType(ArgumentType, RequiredType);
13459
13460     // C++11 [basic.fundamental] p1:
13461     // Plain char, signed char, and unsigned char are three distinct types.
13462     //
13463     // But we treat plain `char' as equivalent to `signed char' or `unsigned
13464     // char' depending on the current char signedness mode.
13465     if (mismatch)
13466       if ((IsPointerAttr && IsSameCharType(ArgumentType->getPointeeType(),
13467                                            RequiredType->getPointeeType())) ||
13468           (!IsPointerAttr && IsSameCharType(ArgumentType, RequiredType)))
13469         mismatch = false;
13470   } else
13471     if (IsPointerAttr)
13472       mismatch = !isLayoutCompatible(Context,
13473                                      ArgumentType->getPointeeType(),
13474                                      RequiredType->getPointeeType());
13475     else
13476       mismatch = !isLayoutCompatible(Context, ArgumentType, RequiredType);
13477
13478   if (mismatch)
13479     Diag(ArgumentExpr->getExprLoc(), diag::warn_type_safety_type_mismatch)
13480         << ArgumentType << ArgumentKind
13481         << TypeInfo.LayoutCompatible << RequiredType
13482         << ArgumentExpr->getSourceRange()
13483         << TypeTagExpr->getSourceRange();
13484 }
13485
13486 void Sema::AddPotentialMisalignedMembers(Expr *E, RecordDecl *RD, ValueDecl *MD,
13487                                          CharUnits Alignment) {
13488   MisalignedMembers.emplace_back(E, RD, MD, Alignment);
13489 }
13490
13491 void Sema::DiagnoseMisalignedMembers() {
13492   for (MisalignedMember &m : MisalignedMembers) {
13493     const NamedDecl *ND = m.RD;
13494     if (ND->getName().empty()) {
13495       if (const TypedefNameDecl *TD = m.RD->getTypedefNameForAnonDecl())
13496         ND = TD;
13497     }
13498     Diag(m.E->getLocStart(), diag::warn_taking_address_of_packed_member)
13499         << m.MD << ND << m.E->getSourceRange();
13500   }
13501   MisalignedMembers.clear();
13502 }
13503
13504 void Sema::DiscardMisalignedMemberAddress(const Type *T, Expr *E) {
13505   E = E->IgnoreParens();
13506   if (!T->isPointerType() && !T->isIntegerType())
13507     return;
13508   if (isa<UnaryOperator>(E) &&
13509       cast<UnaryOperator>(E)->getOpcode() == UO_AddrOf) {
13510     auto *Op = cast<UnaryOperator>(E)->getSubExpr()->IgnoreParens();
13511     if (isa<MemberExpr>(Op)) {
13512       auto MA = std::find(MisalignedMembers.begin(), MisalignedMembers.end(),
13513                           MisalignedMember(Op));
13514       if (MA != MisalignedMembers.end() &&
13515           (T->isIntegerType() ||
13516            (T->isPointerType() && (T->getPointeeType()->isIncompleteType() ||
13517                                    Context.getTypeAlignInChars(
13518                                        T->getPointeeType()) <= MA->Alignment))))
13519         MisalignedMembers.erase(MA);
13520     }
13521   }
13522 }
13523
13524 void Sema::RefersToMemberWithReducedAlignment(
13525     Expr *E,
13526     llvm::function_ref<void(Expr *, RecordDecl *, FieldDecl *, CharUnits)>
13527         Action) {
13528   const auto *ME = dyn_cast<MemberExpr>(E);
13529   if (!ME)
13530     return;
13531
13532   // No need to check expressions with an __unaligned-qualified type.
13533   if (E->getType().getQualifiers().hasUnaligned())
13534     return;
13535
13536   // For a chain of MemberExpr like "a.b.c.d" this list
13537   // will keep FieldDecl's like [d, c, b].
13538   SmallVector<FieldDecl *, 4> ReverseMemberChain;
13539   const MemberExpr *TopME = nullptr;
13540   bool AnyIsPacked = false;
13541   do {
13542     QualType BaseType = ME->getBase()->getType();
13543     if (ME->isArrow())
13544       BaseType = BaseType->getPointeeType();
13545     RecordDecl *RD = BaseType->getAs<RecordType>()->getDecl();
13546     if (RD->isInvalidDecl())
13547       return;
13548
13549     ValueDecl *MD = ME->getMemberDecl();
13550     auto *FD = dyn_cast<FieldDecl>(MD);
13551     // We do not care about non-data members.
13552     if (!FD || FD->isInvalidDecl())
13553       return;
13554
13555     AnyIsPacked =
13556         AnyIsPacked || (RD->hasAttr<PackedAttr>() || MD->hasAttr<PackedAttr>());
13557     ReverseMemberChain.push_back(FD);
13558
13559     TopME = ME;
13560     ME = dyn_cast<MemberExpr>(ME->getBase()->IgnoreParens());
13561   } while (ME);
13562   assert(TopME && "We did not compute a topmost MemberExpr!");
13563
13564   // Not the scope of this diagnostic.
13565   if (!AnyIsPacked)
13566     return;
13567
13568   const Expr *TopBase = TopME->getBase()->IgnoreParenImpCasts();
13569   const auto *DRE = dyn_cast<DeclRefExpr>(TopBase);
13570   // TODO: The innermost base of the member expression may be too complicated.
13571   // For now, just disregard these cases. This is left for future
13572   // improvement.
13573   if (!DRE && !isa<CXXThisExpr>(TopBase))
13574       return;
13575
13576   // Alignment expected by the whole expression.
13577   CharUnits ExpectedAlignment = Context.getTypeAlignInChars(E->getType());
13578
13579   // No need to do anything else with this case.
13580   if (ExpectedAlignment.isOne())
13581     return;
13582
13583   // Synthesize offset of the whole access.
13584   CharUnits Offset;
13585   for (auto I = ReverseMemberChain.rbegin(); I != ReverseMemberChain.rend();
13586        I++) {
13587     Offset += Context.toCharUnitsFromBits(Context.getFieldOffset(*I));
13588   }
13589
13590   // Compute the CompleteObjectAlignment as the alignment of the whole chain.
13591   CharUnits CompleteObjectAlignment = Context.getTypeAlignInChars(
13592       ReverseMemberChain.back()->getParent()->getTypeForDecl());
13593
13594   // The base expression of the innermost MemberExpr may give
13595   // stronger guarantees than the class containing the member.
13596   if (DRE && !TopME->isArrow()) {
13597     const ValueDecl *VD = DRE->getDecl();
13598     if (!VD->getType()->isReferenceType())
13599       CompleteObjectAlignment =
13600           std::max(CompleteObjectAlignment, Context.getDeclAlign(VD));
13601   }
13602
13603   // Check if the synthesized offset fulfills the alignment.
13604   if (Offset % ExpectedAlignment != 0 ||
13605       // It may fulfill the offset it but the effective alignment may still be
13606       // lower than the expected expression alignment.
13607       CompleteObjectAlignment < ExpectedAlignment) {
13608     // If this happens, we want to determine a sensible culprit of this.
13609     // Intuitively, watching the chain of member expressions from right to
13610     // left, we start with the required alignment (as required by the field
13611     // type) but some packed attribute in that chain has reduced the alignment.
13612     // It may happen that another packed structure increases it again. But if
13613     // we are here such increase has not been enough. So pointing the first
13614     // FieldDecl that either is packed or else its RecordDecl is,
13615     // seems reasonable.
13616     FieldDecl *FD = nullptr;
13617     CharUnits Alignment;
13618     for (FieldDecl *FDI : ReverseMemberChain) {
13619       if (FDI->hasAttr<PackedAttr>() ||
13620           FDI->getParent()->hasAttr<PackedAttr>()) {
13621         FD = FDI;
13622         Alignment = std::min(
13623             Context.getTypeAlignInChars(FD->getType()),
13624             Context.getTypeAlignInChars(FD->getParent()->getTypeForDecl()));
13625         break;
13626       }
13627     }
13628     assert(FD && "We did not find a packed FieldDecl!");
13629     Action(E, FD->getParent(), FD, Alignment);
13630   }
13631 }
13632
13633 void Sema::CheckAddressOfPackedMember(Expr *rhs) {
13634   using namespace std::placeholders;
13635
13636   RefersToMemberWithReducedAlignment(
13637       rhs, std::bind(&Sema::AddPotentialMisalignedMembers, std::ref(*this), _1,
13638                      _2, _3, _4));
13639 }