blob: 76de9e2993990c79a268ddb8af4e16c442b9372c [file] [log] [blame]
Chad Rosier571c5e92012-08-17 21:27:25 +00001//===--- SemaStmtAsm.cpp - Semantic Analysis for Asm Statements -----------===//
Chad Rosier0731aff2012-08-17 21:19:40 +00002//
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 semantic analysis for inline asm statements.
11//
12//===----------------------------------------------------------------------===//
13
Weiming Zhao71ac2402015-02-03 22:35:58 +000014#include "clang/AST/ExprCXX.h"
Chad Rosier5c563642012-10-25 21:49:22 +000015#include "clang/AST/RecordLayout.h"
Chad Rosier0731aff2012-08-17 21:19:40 +000016#include "clang/AST/TypeLoc.h"
Chad Rosier0731aff2012-08-17 21:19:40 +000017#include "clang/Basic/TargetInfo.h"
Ehsan Akhgari31097582014-09-22 02:21:54 +000018#include "clang/Lex/Preprocessor.h"
Chandler Carruth3a022472012-12-04 09:13:33 +000019#include "clang/Sema/Initialization.h"
20#include "clang/Sema/Lookup.h"
21#include "clang/Sema/Scope.h"
22#include "clang/Sema/ScopeInfo.h"
Mehdi Amini9670f842016-07-18 19:02:11 +000023#include "clang/Sema/SemaInternal.h"
Chad Rosier0731aff2012-08-17 21:19:40 +000024#include "llvm/ADT/ArrayRef.h"
Marina Yatsinac42fd032016-12-26 12:23:42 +000025#include "llvm/ADT/StringSet.h"
Alp Toker10399272014-06-08 05:11:37 +000026#include "llvm/MC/MCParser/MCAsmParser.h"
Chad Rosier0731aff2012-08-17 21:19:40 +000027using namespace clang;
28using namespace sema;
29
30/// CheckAsmLValue - GNU C has an extremely ugly extension whereby they silently
31/// ignore "noop" casts in places where an lvalue is required by an inline asm.
32/// We emulate this behavior when -fheinous-gnu-extensions is specified, but
33/// provide a strong guidance to not use it.
34///
35/// This method checks to see if the argument is an acceptable l-value and
36/// returns false if it is a case we can handle.
37static bool CheckAsmLValue(const Expr *E, Sema &S) {
38 // Type dependent expressions will be checked during instantiation.
39 if (E->isTypeDependent())
40 return false;
41
42 if (E->isLValue())
43 return false; // Cool, this is an lvalue.
44
45 // Okay, this is not an lvalue, but perhaps it is the result of a cast that we
46 // are supposed to allow.
47 const Expr *E2 = E->IgnoreParenNoopCasts(S.Context);
48 if (E != E2 && E2->isLValue()) {
49 if (!S.getLangOpts().HeinousExtensions)
50 S.Diag(E2->getLocStart(), diag::err_invalid_asm_cast_lvalue)
51 << E->getSourceRange();
52 else
53 S.Diag(E2->getLocStart(), diag::warn_invalid_asm_cast_lvalue)
54 << E->getSourceRange();
55 // Accept, even if we emitted an error diagnostic.
56 return false;
57 }
58
59 // None of the above, just randomly invalid non-lvalue.
60 return true;
61}
62
63/// isOperandMentioned - Return true if the specified operand # is mentioned
64/// anywhere in the decomposed asm string.
65static bool isOperandMentioned(unsigned OpNo,
Chad Rosierde70e0e2012-08-25 00:11:56 +000066 ArrayRef<GCCAsmStmt::AsmStringPiece> AsmStrPieces) {
Chad Rosier0731aff2012-08-17 21:19:40 +000067 for (unsigned p = 0, e = AsmStrPieces.size(); p != e; ++p) {
Chad Rosierde70e0e2012-08-25 00:11:56 +000068 const GCCAsmStmt::AsmStringPiece &Piece = AsmStrPieces[p];
Chad Rosier0731aff2012-08-17 21:19:40 +000069 if (!Piece.isOperand()) continue;
70
71 // If this is a reference to the input and if the input was the smaller
72 // one, then we have to reject this asm.
73 if (Piece.getOperandNo() == OpNo)
74 return true;
75 }
76 return false;
77}
78
Hans Wennborge9d240a2014-10-08 01:58:02 +000079static bool CheckNakedParmReference(Expr *E, Sema &S) {
80 FunctionDecl *Func = dyn_cast<FunctionDecl>(S.CurContext);
81 if (!Func)
82 return false;
83 if (!Func->hasAttr<NakedAttr>())
84 return false;
85
86 SmallVector<Expr*, 4> WorkList;
87 WorkList.push_back(E);
88 while (WorkList.size()) {
89 Expr *E = WorkList.pop_back_val();
Weiming Zhao71ac2402015-02-03 22:35:58 +000090 if (isa<CXXThisExpr>(E)) {
91 S.Diag(E->getLocStart(), diag::err_asm_naked_this_ref);
92 S.Diag(Func->getAttr<NakedAttr>()->getLocation(), diag::note_attribute);
93 return true;
94 }
Hans Wennborge9d240a2014-10-08 01:58:02 +000095 if (DeclRefExpr *DRE = dyn_cast<DeclRefExpr>(E)) {
96 if (isa<ParmVarDecl>(DRE->getDecl())) {
97 S.Diag(DRE->getLocStart(), diag::err_asm_naked_parm_ref);
98 S.Diag(Func->getAttr<NakedAttr>()->getLocation(), diag::note_attribute);
99 return true;
100 }
101 }
102 for (Stmt *Child : E->children()) {
103 if (Expr *E = dyn_cast_or_null<Expr>(Child))
104 WorkList.push_back(E);
105 }
106 }
107 return false;
108}
109
Andrey Bokhankod9eab9c2015-08-03 10:38:10 +0000110/// \brief Returns true if given expression is not compatible with inline
111/// assembly's memory constraint; false otherwise.
112static bool checkExprMemoryConstraintCompat(Sema &S, Expr *E,
113 TargetInfo::ConstraintInfo &Info,
114 bool is_input_expr) {
115 enum {
116 ExprBitfield = 0,
117 ExprVectorElt,
118 ExprGlobalRegVar,
119 ExprSafeType
120 } EType = ExprSafeType;
121
122 // Bitfields, vector elements and global register variables are not
123 // compatible.
124 if (E->refersToBitField())
125 EType = ExprBitfield;
126 else if (E->refersToVectorElement())
127 EType = ExprVectorElt;
128 else if (E->refersToGlobalRegisterVar())
129 EType = ExprGlobalRegVar;
130
131 if (EType != ExprSafeType) {
132 S.Diag(E->getLocStart(), diag::err_asm_non_addr_value_in_memory_constraint)
133 << EType << is_input_expr << Info.getConstraintStr()
134 << E->getSourceRange();
135 return true;
136 }
137
138 return false;
139}
140
Marina Yatsinac42fd032016-12-26 12:23:42 +0000141// Extracting the register name from the Expression value,
142// if there is no register name to extract, returns ""
143static StringRef extractRegisterName(const Expr *Expression,
144 const TargetInfo &Target) {
145 Expression = Expression->IgnoreImpCasts();
146 if (const DeclRefExpr *AsmDeclRef = dyn_cast<DeclRefExpr>(Expression)) {
147 // Handle cases where the expression is a variable
148 const VarDecl *Variable = dyn_cast<VarDecl>(AsmDeclRef->getDecl());
149 if (Variable && Variable->getStorageClass() == SC_Register) {
150 if (AsmLabelAttr *Attr = Variable->getAttr<AsmLabelAttr>())
151 if (Target.isValidGCCRegisterName(Attr->getLabel()))
152 return Target.getNormalizedGCCRegisterName(Attr->getLabel(), true);
153 }
154 }
155 return "";
156}
157
158// Checks if there is a conflict between the input and output lists with the
159// clobbers list. If there's a conflict, returns the location of the
160// conflicted clobber, else returns nullptr
161static SourceLocation
162getClobberConflictLocation(MultiExprArg Exprs, StringLiteral **Constraints,
163 StringLiteral **Clobbers, int NumClobbers,
164 const TargetInfo &Target, ASTContext &Cont) {
165 llvm::StringSet<> InOutVars;
166 // Collect all the input and output registers from the extended asm
Marina Yatsinac5cf7a82016-12-26 13:16:40 +0000167 // statement in order to check for conflicts with the clobber list
168 for (unsigned int i = 0; i < Exprs.size(); ++i) {
Marina Yatsinac42fd032016-12-26 12:23:42 +0000169 StringRef Constraint = Constraints[i]->getString();
170 StringRef InOutReg = Target.getConstraintRegister(
171 Constraint, extractRegisterName(Exprs[i], Target));
172 if (InOutReg != "")
173 InOutVars.insert(InOutReg);
174 }
175 // Check for each item in the clobber list if it conflicts with the input
176 // or output
177 for (int i = 0; i < NumClobbers; ++i) {
178 StringRef Clobber = Clobbers[i]->getString();
179 // We only check registers, therefore we don't check cc and memory
180 // clobbers
181 if (Clobber == "cc" || Clobber == "memory")
182 continue;
183 Clobber = Target.getNormalizedGCCRegisterName(Clobber, true);
184 // Go over the output's registers we collected
185 if (InOutVars.count(Clobber))
186 return Clobbers[i]->getLocStart();
187 }
188 return SourceLocation();
189}
190
Chad Rosierde70e0e2012-08-25 00:11:56 +0000191StmtResult Sema::ActOnGCCAsmStmt(SourceLocation AsmLoc, bool IsSimple,
192 bool IsVolatile, unsigned NumOutputs,
193 unsigned NumInputs, IdentifierInfo **Names,
Dmitri Gribenkoea2d5f82013-05-10 01:14:26 +0000194 MultiExprArg constraints, MultiExprArg Exprs,
Chad Rosierde70e0e2012-08-25 00:11:56 +0000195 Expr *asmString, MultiExprArg clobbers,
196 SourceLocation RParenLoc) {
Chad Rosier0731aff2012-08-17 21:19:40 +0000197 unsigned NumClobbers = clobbers.size();
198 StringLiteral **Constraints =
Benjamin Kramercc4c49d2012-08-23 23:38:35 +0000199 reinterpret_cast<StringLiteral**>(constraints.data());
Chad Rosier0731aff2012-08-17 21:19:40 +0000200 StringLiteral *AsmString = cast<StringLiteral>(asmString);
Benjamin Kramercc4c49d2012-08-23 23:38:35 +0000201 StringLiteral **Clobbers = reinterpret_cast<StringLiteral**>(clobbers.data());
Chad Rosier0731aff2012-08-17 21:19:40 +0000202
203 SmallVector<TargetInfo::ConstraintInfo, 4> OutputConstraintInfos;
204
205 // The parser verifies that there is a string literal here.
David Majnemerb3e96f72014-12-11 01:00:48 +0000206 assert(AsmString->isAscii());
Chad Rosier0731aff2012-08-17 21:19:40 +0000207
Artem Belevich5ef02c22015-08-27 19:54:21 +0000208 // If we're compiling CUDA file and function attributes indicate that it's not
209 // for this compilation side, skip all the checks.
210 if (!DeclAttrsMatchCUDAMode(getLangOpts(), getCurFunctionDecl())) {
211 GCCAsmStmt *NS = new (Context) GCCAsmStmt(
212 Context, AsmLoc, IsSimple, IsVolatile, NumOutputs, NumInputs, Names,
213 Constraints, Exprs.data(), AsmString, NumClobbers, Clobbers, RParenLoc);
214 return NS;
215 }
Artem Belevich5196fe72015-03-19 18:40:25 +0000216
Chad Rosier0731aff2012-08-17 21:19:40 +0000217 for (unsigned i = 0; i != NumOutputs; i++) {
218 StringLiteral *Literal = Constraints[i];
David Majnemerb3e96f72014-12-11 01:00:48 +0000219 assert(Literal->isAscii());
Chad Rosier0731aff2012-08-17 21:19:40 +0000220
221 StringRef OutputName;
222 if (Names[i])
223 OutputName = Names[i]->getName();
224
225 TargetInfo::ConstraintInfo Info(Literal->getString(), OutputName);
Artem Belevich5ef02c22015-08-27 19:54:21 +0000226 if (!Context.getTargetInfo().validateOutputConstraint(Info))
Chad Rosier0731aff2012-08-17 21:19:40 +0000227 return StmtError(Diag(Literal->getLocStart(),
228 diag::err_asm_invalid_output_constraint)
229 << Info.getConstraintStr());
230
David Majnemer0f4d6412014-12-29 09:30:33 +0000231 ExprResult ER = CheckPlaceholderExpr(Exprs[i]);
232 if (ER.isInvalid())
233 return StmtError();
234 Exprs[i] = ER.get();
235
Chad Rosier0731aff2012-08-17 21:19:40 +0000236 // Check that the output exprs are valid lvalues.
237 Expr *OutputExpr = Exprs[i];
Bill Wendlingc4fc3a22013-03-25 21:09:49 +0000238
Hans Wennborge9d240a2014-10-08 01:58:02 +0000239 // Referring to parameters is not allowed in naked functions.
240 if (CheckNakedParmReference(OutputExpr, *this))
241 return StmtError();
242
Andrey Bokhankod9eab9c2015-08-03 10:38:10 +0000243 // Check that the output expression is compatible with memory constraint.
244 if (Info.allowsMemory() &&
245 checkExprMemoryConstraintCompat(*this, OutputExpr, Info, false))
246 return StmtError();
Alexander Musmaneae29e22015-06-05 13:40:59 +0000247
Chad Rosier0731aff2012-08-17 21:19:40 +0000248 OutputConstraintInfos.push_back(Info);
Akira Hatanaka974131e2014-09-18 18:17:18 +0000249
David Majnemer0f4d6412014-12-29 09:30:33 +0000250 // If this is dependent, just continue.
251 if (OutputExpr->isTypeDependent())
Akira Hatanaka974131e2014-09-18 18:17:18 +0000252 continue;
253
David Majnemer0f4d6412014-12-29 09:30:33 +0000254 Expr::isModifiableLvalueResult IsLV =
255 OutputExpr->isModifiableLvalue(Context, /*Loc=*/nullptr);
256 switch (IsLV) {
257 case Expr::MLV_Valid:
258 // Cool, this is an lvalue.
259 break;
David Majnemer04b78412014-12-29 10:29:53 +0000260 case Expr::MLV_ArrayType:
261 // This is OK too.
262 break;
David Majnemer0f4d6412014-12-29 09:30:33 +0000263 case Expr::MLV_LValueCast: {
264 const Expr *LVal = OutputExpr->IgnoreParenNoopCasts(Context);
265 if (!getLangOpts().HeinousExtensions) {
266 Diag(LVal->getLocStart(), diag::err_invalid_asm_cast_lvalue)
267 << OutputExpr->getSourceRange();
268 } else {
269 Diag(LVal->getLocStart(), diag::warn_invalid_asm_cast_lvalue)
270 << OutputExpr->getSourceRange();
271 }
272 // Accept, even if we emitted an error diagnostic.
273 break;
274 }
275 case Expr::MLV_IncompleteType:
276 case Expr::MLV_IncompleteVoidType:
277 if (RequireCompleteType(OutputExpr->getLocStart(), Exprs[i]->getType(),
278 diag::err_dereference_incomplete_type))
279 return StmtError();
280 default:
281 return StmtError(Diag(OutputExpr->getLocStart(),
282 diag::err_asm_invalid_lvalue_in_output)
283 << OutputExpr->getSourceRange());
284 }
285
286 unsigned Size = Context.getTypeSize(OutputExpr->getType());
Akira Hatanaka974131e2014-09-18 18:17:18 +0000287 if (!Context.getTargetInfo().validateOutputSize(Literal->getString(),
288 Size))
289 return StmtError(Diag(OutputExpr->getLocStart(),
290 diag::err_asm_invalid_output_size)
291 << Info.getConstraintStr());
Chad Rosier0731aff2012-08-17 21:19:40 +0000292 }
293
294 SmallVector<TargetInfo::ConstraintInfo, 4> InputConstraintInfos;
295
296 for (unsigned i = NumOutputs, e = NumOutputs + NumInputs; i != e; i++) {
297 StringLiteral *Literal = Constraints[i];
David Majnemerb3e96f72014-12-11 01:00:48 +0000298 assert(Literal->isAscii());
Chad Rosier0731aff2012-08-17 21:19:40 +0000299
300 StringRef InputName;
301 if (Names[i])
302 InputName = Names[i]->getName();
303
304 TargetInfo::ConstraintInfo Info(Literal->getString(), InputName);
Craig Topper55765ca2015-10-21 02:34:10 +0000305 if (!Context.getTargetInfo().validateInputConstraint(OutputConstraintInfos,
306 Info)) {
Chad Rosier0731aff2012-08-17 21:19:40 +0000307 return StmtError(Diag(Literal->getLocStart(),
308 diag::err_asm_invalid_input_constraint)
309 << Info.getConstraintStr());
310 }
311
David Majnemer0f4d6412014-12-29 09:30:33 +0000312 ExprResult ER = CheckPlaceholderExpr(Exprs[i]);
313 if (ER.isInvalid())
314 return StmtError();
315 Exprs[i] = ER.get();
316
Chad Rosier0731aff2012-08-17 21:19:40 +0000317 Expr *InputExpr = Exprs[i];
318
Hans Wennborge9d240a2014-10-08 01:58:02 +0000319 // Referring to parameters is not allowed in naked functions.
320 if (CheckNakedParmReference(InputExpr, *this))
321 return StmtError();
322
Andrey Bokhankod9eab9c2015-08-03 10:38:10 +0000323 // Check that the input expression is compatible with memory constraint.
324 if (Info.allowsMemory() &&
325 checkExprMemoryConstraintCompat(*this, InputExpr, Info, true))
326 return StmtError();
Alexander Musmaneae29e22015-06-05 13:40:59 +0000327
Chad Rosier0731aff2012-08-17 21:19:40 +0000328 // Only allow void types for memory constraints.
329 if (Info.allowsMemory() && !Info.allowsRegister()) {
330 if (CheckAsmLValue(InputExpr, *this))
331 return StmtError(Diag(InputExpr->getLocStart(),
332 diag::err_asm_invalid_lvalue_in_input)
333 << Info.getConstraintStr()
334 << InputExpr->getSourceRange());
Saleem Abdulrasoola2823572015-01-06 04:26:34 +0000335 } else if (Info.requiresImmediateConstant() && !Info.allowsRegister()) {
Sunil Srivastava780e5012015-07-14 18:08:50 +0000336 if (!InputExpr->isValueDependent()) {
337 llvm::APSInt Result;
338 if (!InputExpr->EvaluateAsInt(Result, Context))
339 return StmtError(
340 Diag(InputExpr->getLocStart(), diag::err_asm_immediate_expected)
341 << Info.getConstraintStr() << InputExpr->getSourceRange());
Alexey Bataev91e58602015-07-20 12:08:00 +0000342 if (!Info.isValidAsmImmediate(Result))
Sunil Srivastava780e5012015-07-14 18:08:50 +0000343 return StmtError(Diag(InputExpr->getLocStart(),
344 diag::err_invalid_asm_value_for_constraint)
345 << Result.toString(10) << Info.getConstraintStr()
346 << InputExpr->getSourceRange());
347 }
Saleem Abdulrasoola2823572015-01-06 04:26:34 +0000348
David Majnemerade4bee2014-07-14 16:27:53 +0000349 } else {
350 ExprResult Result = DefaultFunctionArrayLvalueConversion(Exprs[i]);
351 if (Result.isInvalid())
352 return StmtError();
353
354 Exprs[i] = Result.get();
Chad Rosier0731aff2012-08-17 21:19:40 +0000355 }
356
357 if (Info.allowsRegister()) {
358 if (InputExpr->getType()->isVoidType()) {
359 return StmtError(Diag(InputExpr->getLocStart(),
360 diag::err_asm_invalid_type_in_input)
361 << InputExpr->getType() << Info.getConstraintStr()
362 << InputExpr->getSourceRange());
363 }
364 }
365
Chad Rosier0731aff2012-08-17 21:19:40 +0000366 InputConstraintInfos.push_back(Info);
Bill Wendling887b4852012-11-12 06:42:51 +0000367
368 const Type *Ty = Exprs[i]->getType().getTypePtr();
Bill Wendlingc4fc3a22013-03-25 21:09:49 +0000369 if (Ty->isDependentType())
Eric Christopherd41010a2012-11-12 23:13:34 +0000370 continue;
371
Bill Wendlingc4fc3a22013-03-25 21:09:49 +0000372 if (!Ty->isVoidType() || !Info.allowsMemory())
Bill Wendlingb68b7572013-03-27 06:06:26 +0000373 if (RequireCompleteType(InputExpr->getLocStart(), Exprs[i]->getType(),
374 diag::err_dereference_incomplete_type))
375 return StmtError();
Bill Wendlingc4fc3a22013-03-25 21:09:49 +0000376
Bill Wendling887b4852012-11-12 06:42:51 +0000377 unsigned Size = Context.getTypeSize(Ty);
378 if (!Context.getTargetInfo().validateInputSize(Literal->getString(),
379 Size))
380 return StmtError(Diag(InputExpr->getLocStart(),
381 diag::err_asm_invalid_input_size)
382 << Info.getConstraintStr());
Chad Rosier0731aff2012-08-17 21:19:40 +0000383 }
384
385 // Check that the clobbers are valid.
386 for (unsigned i = 0; i != NumClobbers; i++) {
387 StringLiteral *Literal = Clobbers[i];
David Majnemerb3e96f72014-12-11 01:00:48 +0000388 assert(Literal->isAscii());
Chad Rosier0731aff2012-08-17 21:19:40 +0000389
390 StringRef Clobber = Literal->getString();
391
392 if (!Context.getTargetInfo().isValidClobber(Clobber))
393 return StmtError(Diag(Literal->getLocStart(),
394 diag::err_asm_unknown_register_name) << Clobber);
395 }
396
Chad Rosierde70e0e2012-08-25 00:11:56 +0000397 GCCAsmStmt *NS =
398 new (Context) GCCAsmStmt(Context, AsmLoc, IsSimple, IsVolatile, NumOutputs,
Dmitri Gribenkoea2d5f82013-05-10 01:14:26 +0000399 NumInputs, Names, Constraints, Exprs.data(),
400 AsmString, NumClobbers, Clobbers, RParenLoc);
Chad Rosier0731aff2012-08-17 21:19:40 +0000401 // Validate the asm string, ensuring it makes sense given the operands we
402 // have.
Chad Rosierde70e0e2012-08-25 00:11:56 +0000403 SmallVector<GCCAsmStmt::AsmStringPiece, 8> Pieces;
Chad Rosier0731aff2012-08-17 21:19:40 +0000404 unsigned DiagOffs;
405 if (unsigned DiagID = NS->AnalyzeAsmString(Pieces, Context, DiagOffs)) {
406 Diag(getLocationOfStringLiteralByte(AsmString, DiagOffs), DiagID)
407 << AsmString->getSourceRange();
408 return StmtError();
409 }
410
Bill Wendling9d1ee112012-10-25 23:28:48 +0000411 // Validate constraints and modifiers.
412 for (unsigned i = 0, e = Pieces.size(); i != e; ++i) {
413 GCCAsmStmt::AsmStringPiece &Piece = Pieces[i];
414 if (!Piece.isOperand()) continue;
415
416 // Look for the correct constraint index.
Akira Hatanaka96a36012015-02-04 00:27:13 +0000417 unsigned ConstraintIdx = Piece.getOperandNo();
418 unsigned NumOperands = NS->getNumOutputs() + NS->getNumInputs();
Bill Wendling9d1ee112012-10-25 23:28:48 +0000419
Akira Hatanaka96a36012015-02-04 00:27:13 +0000420 // Look for the (ConstraintIdx - NumOperands + 1)th constraint with
421 // modifier '+'.
422 if (ConstraintIdx >= NumOperands) {
423 unsigned I = 0, E = NS->getNumOutputs();
424
425 for (unsigned Cnt = ConstraintIdx - NumOperands; I != E; ++I)
426 if (OutputConstraintInfos[I].isReadWrite() && Cnt-- == 0) {
427 ConstraintIdx = I;
Bill Wendling9d1ee112012-10-25 23:28:48 +0000428 break;
Akira Hatanaka96a36012015-02-04 00:27:13 +0000429 }
Bill Wendling9d1ee112012-10-25 23:28:48 +0000430
Akira Hatanaka96a36012015-02-04 00:27:13 +0000431 assert(I != E && "Invalid operand number should have been caught in "
432 " AnalyzeAsmString");
Bill Wendling9d1ee112012-10-25 23:28:48 +0000433 }
434
435 // Now that we have the right indexes go ahead and check.
436 StringLiteral *Literal = Constraints[ConstraintIdx];
437 const Type *Ty = Exprs[ConstraintIdx]->getType().getTypePtr();
438 if (Ty->isDependentType() || Ty->isIncompleteType())
439 continue;
440
441 unsigned Size = Context.getTypeSize(Ty);
Akira Hatanaka987f1862014-08-22 06:05:21 +0000442 std::string SuggestedModifier;
443 if (!Context.getTargetInfo().validateConstraintModifier(
444 Literal->getString(), Piece.getModifier(), Size,
445 SuggestedModifier)) {
Bill Wendling9d1ee112012-10-25 23:28:48 +0000446 Diag(Exprs[ConstraintIdx]->getLocStart(),
447 diag::warn_asm_mismatched_size_modifier);
Akira Hatanaka987f1862014-08-22 06:05:21 +0000448
449 if (!SuggestedModifier.empty()) {
450 auto B = Diag(Piece.getRange().getBegin(),
451 diag::note_asm_missing_constraint_modifier)
452 << SuggestedModifier;
453 SuggestedModifier = "%" + SuggestedModifier + Piece.getString();
454 B.AddFixItHint(FixItHint::CreateReplacement(Piece.getRange(),
455 SuggestedModifier));
456 }
457 }
Bill Wendling9d1ee112012-10-25 23:28:48 +0000458 }
459
Chad Rosier0731aff2012-08-17 21:19:40 +0000460 // Validate tied input operands for type mismatches.
David Majnemerc63fa612014-12-29 04:09:59 +0000461 unsigned NumAlternatives = ~0U;
462 for (unsigned i = 0, e = OutputConstraintInfos.size(); i != e; ++i) {
463 TargetInfo::ConstraintInfo &Info = OutputConstraintInfos[i];
464 StringRef ConstraintStr = Info.getConstraintStr();
465 unsigned AltCount = ConstraintStr.count(',') + 1;
466 if (NumAlternatives == ~0U)
467 NumAlternatives = AltCount;
468 else if (NumAlternatives != AltCount)
469 return StmtError(Diag(NS->getOutputExpr(i)->getLocStart(),
470 diag::err_asm_unexpected_constraint_alternatives)
471 << NumAlternatives << AltCount);
472 }
Alexander Musman8e261be2015-09-21 14:41:00 +0000473 SmallVector<size_t, 4> InputMatchedToOutput(OutputConstraintInfos.size(),
474 ~0U);
Chad Rosier0731aff2012-08-17 21:19:40 +0000475 for (unsigned i = 0, e = InputConstraintInfos.size(); i != e; ++i) {
476 TargetInfo::ConstraintInfo &Info = InputConstraintInfos[i];
David Majnemerc63fa612014-12-29 04:09:59 +0000477 StringRef ConstraintStr = Info.getConstraintStr();
478 unsigned AltCount = ConstraintStr.count(',') + 1;
479 if (NumAlternatives == ~0U)
480 NumAlternatives = AltCount;
481 else if (NumAlternatives != AltCount)
482 return StmtError(Diag(NS->getInputExpr(i)->getLocStart(),
483 diag::err_asm_unexpected_constraint_alternatives)
484 << NumAlternatives << AltCount);
Chad Rosier0731aff2012-08-17 21:19:40 +0000485
486 // If this is a tied constraint, verify that the output and input have
487 // either exactly the same type, or that they are int/ptr operands with the
488 // same size (int/long, int*/long, are ok etc).
489 if (!Info.hasTiedOperand()) continue;
490
491 unsigned TiedTo = Info.getTiedOperand();
492 unsigned InputOpNo = i+NumOutputs;
493 Expr *OutputExpr = Exprs[TiedTo];
494 Expr *InputExpr = Exprs[InputOpNo];
495
Alexander Musman8e261be2015-09-21 14:41:00 +0000496 // Make sure no more than one input constraint matches each output.
497 assert(TiedTo < InputMatchedToOutput.size() && "TiedTo value out of range");
498 if (InputMatchedToOutput[TiedTo] != ~0U) {
499 Diag(NS->getInputExpr(i)->getLocStart(),
500 diag::err_asm_input_duplicate_match)
501 << TiedTo;
502 Diag(NS->getInputExpr(InputMatchedToOutput[TiedTo])->getLocStart(),
503 diag::note_asm_input_duplicate_first)
504 << TiedTo;
505 return StmtError();
506 }
507 InputMatchedToOutput[TiedTo] = i;
508
Chad Rosier0731aff2012-08-17 21:19:40 +0000509 if (OutputExpr->isTypeDependent() || InputExpr->isTypeDependent())
510 continue;
511
512 QualType InTy = InputExpr->getType();
513 QualType OutTy = OutputExpr->getType();
514 if (Context.hasSameType(InTy, OutTy))
515 continue; // All types can be tied to themselves.
516
517 // Decide if the input and output are in the same domain (integer/ptr or
518 // floating point.
519 enum AsmDomain {
520 AD_Int, AD_FP, AD_Other
521 } InputDomain, OutputDomain;
522
523 if (InTy->isIntegerType() || InTy->isPointerType())
524 InputDomain = AD_Int;
525 else if (InTy->isRealFloatingType())
526 InputDomain = AD_FP;
527 else
528 InputDomain = AD_Other;
529
530 if (OutTy->isIntegerType() || OutTy->isPointerType())
531 OutputDomain = AD_Int;
532 else if (OutTy->isRealFloatingType())
533 OutputDomain = AD_FP;
534 else
535 OutputDomain = AD_Other;
536
537 // They are ok if they are the same size and in the same domain. This
538 // allows tying things like:
539 // void* to int*
540 // void* to int if they are the same size.
541 // double to long double if they are the same size.
542 //
543 uint64_t OutSize = Context.getTypeSize(OutTy);
544 uint64_t InSize = Context.getTypeSize(InTy);
545 if (OutSize == InSize && InputDomain == OutputDomain &&
546 InputDomain != AD_Other)
547 continue;
548
549 // If the smaller input/output operand is not mentioned in the asm string,
550 // then we can promote the smaller one to a larger input and the asm string
551 // won't notice.
552 bool SmallerValueMentioned = false;
553
554 // If this is a reference to the input and if the input was the smaller
555 // one, then we have to reject this asm.
556 if (isOperandMentioned(InputOpNo, Pieces)) {
557 // This is a use in the asm string of the smaller operand. Since we
558 // codegen this by promoting to a wider value, the asm will get printed
559 // "wrong".
560 SmallerValueMentioned |= InSize < OutSize;
561 }
562 if (isOperandMentioned(TiedTo, Pieces)) {
563 // If this is a reference to the output, and if the output is the larger
564 // value, then it's ok because we'll promote the input to the larger type.
565 SmallerValueMentioned |= OutSize < InSize;
566 }
567
568 // If the smaller value wasn't mentioned in the asm string, and if the
569 // output was a register, just extend the shorter one to the size of the
570 // larger one.
571 if (!SmallerValueMentioned && InputDomain != AD_Other &&
572 OutputConstraintInfos[TiedTo].allowsRegister())
573 continue;
574
575 // Either both of the operands were mentioned or the smaller one was
576 // mentioned. One more special case that we'll allow: if the tied input is
577 // integer, unmentioned, and is a constant, then we'll allow truncating it
578 // down to the size of the destination.
579 if (InputDomain == AD_Int && OutputDomain == AD_Int &&
580 !isOperandMentioned(InputOpNo, Pieces) &&
581 InputExpr->isEvaluatable(Context)) {
582 CastKind castKind =
583 (OutTy->isBooleanType() ? CK_IntegralToBoolean : CK_IntegralCast);
Nikola Smiljanic01a75982014-05-29 10:55:11 +0000584 InputExpr = ImpCastExprToType(InputExpr, OutTy, castKind).get();
Chad Rosier0731aff2012-08-17 21:19:40 +0000585 Exprs[InputOpNo] = InputExpr;
586 NS->setInputExpr(i, InputExpr);
587 continue;
588 }
589
590 Diag(InputExpr->getLocStart(),
591 diag::err_asm_tying_incompatible_types)
592 << InTy << OutTy << OutputExpr->getSourceRange()
593 << InputExpr->getSourceRange();
594 return StmtError();
595 }
596
Marina Yatsinac42fd032016-12-26 12:23:42 +0000597 // Check for conflicts between clobber list and input or output lists
598 SourceLocation ConstraintLoc =
599 getClobberConflictLocation(Exprs, Constraints, Clobbers, NumClobbers,
600 Context.getTargetInfo(), Context);
601 if (ConstraintLoc.isValid())
602 return Diag(ConstraintLoc, diag::error_inoutput_conflict_with_clobber);
603
Nikola Smiljanic03ff2592014-05-29 14:05:12 +0000604 return NS;
Chad Rosier0731aff2012-08-17 21:19:40 +0000605}
606
Reid Kleckner14e96b42015-08-26 21:57:20 +0000607static void fillInlineAsmTypeInfo(const ASTContext &Context, QualType T,
608 llvm::InlineAsmIdentifierInfo &Info) {
609 // Compute the type size (and array length if applicable?).
610 Info.Type = Info.Size = Context.getTypeSizeInChars(T).getQuantity();
611 if (T->isArrayType()) {
612 const ArrayType *ATy = Context.getAsArrayType(T);
613 Info.Type = Context.getTypeSizeInChars(ATy->getElementType()).getQuantity();
614 Info.Length = Info.Size / Info.Type;
615 }
616}
617
John McCallf413f5e2013-05-03 00:10:13 +0000618ExprResult Sema::LookupInlineAsmIdentifier(CXXScopeSpec &SS,
619 SourceLocation TemplateKWLoc,
620 UnqualifiedId &Id,
Alp Toker10399272014-06-08 05:11:37 +0000621 llvm::InlineAsmIdentifierInfo &Info,
John McCallf413f5e2013-05-03 00:10:13 +0000622 bool IsUnevaluatedContext) {
Chad Rosierb18a2852013-04-22 17:01:37 +0000623 Info.clear();
Chad Rosierce2bcbf2012-10-18 15:49:40 +0000624
John McCallf413f5e2013-05-03 00:10:13 +0000625 if (IsUnevaluatedContext)
626 PushExpressionEvaluationContext(UnevaluatedAbstract,
627 ReuseLambdaContextDecl);
628
629 ExprResult Result = ActOnIdExpression(getCurScope(), SS, TemplateKWLoc, Id,
630 /*trailing lparen*/ false,
Chad Rosierb9aff1e2013-05-24 18:32:55 +0000631 /*is & operand*/ false,
Craig Topperc3ec1492014-05-26 06:22:03 +0000632 /*CorrectionCandidateCallback=*/nullptr,
Chad Rosierb9aff1e2013-05-24 18:32:55 +0000633 /*IsInlineAsmIdentifier=*/ true);
John McCallf413f5e2013-05-03 00:10:13 +0000634
635 if (IsUnevaluatedContext)
636 PopExpressionEvaluationContext();
637
638 if (!Result.isUsable()) return Result;
639
Nikola Smiljanic01a75982014-05-29 10:55:11 +0000640 Result = CheckPlaceholderExpr(Result.get());
John McCallf413f5e2013-05-03 00:10:13 +0000641 if (!Result.isUsable()) return Result;
642
Hans Wennborg93dbeae2014-09-04 22:16:48 +0000643 // Referring to parameters is not allowed in naked functions.
Hans Wennborge9d240a2014-10-08 01:58:02 +0000644 if (CheckNakedParmReference(Result.get(), *this))
645 return ExprError();
Hans Wennborg93dbeae2014-09-04 22:16:48 +0000646
John McCallf413f5e2013-05-03 00:10:13 +0000647 QualType T = Result.get()->getType();
648
John McCallf413f5e2013-05-03 00:10:13 +0000649 if (T->isDependentType()) {
David Majnemerf8b569c2016-01-04 23:51:15 +0000650 return Result;
Chad Rosierce2bcbf2012-10-18 15:49:40 +0000651 }
652
John McCallf413f5e2013-05-03 00:10:13 +0000653 // Any sort of function type is fine.
654 if (T->isFunctionType()) {
655 return Result;
Chad Rosierce2bcbf2012-10-18 15:49:40 +0000656 }
657
John McCallf413f5e2013-05-03 00:10:13 +0000658 // Otherwise, it needs to be a complete type.
659 if (RequireCompleteExprType(Result.get(), diag::err_asm_incomplete_type)) {
660 return ExprError();
661 }
662
Reid Kleckner14e96b42015-08-26 21:57:20 +0000663 fillInlineAsmTypeInfo(Context, T, Info);
John McCallf413f5e2013-05-03 00:10:13 +0000664
665 // We can work with the expression as long as it's not an r-value.
666 if (!Result.get()->isRValue())
Chad Rosierb18a2852013-04-22 17:01:37 +0000667 Info.IsVarDecl = true;
Chad Rosierce2bcbf2012-10-18 15:49:40 +0000668
John McCallf413f5e2013-05-03 00:10:13 +0000669 return Result;
Chad Rosier4a0054f2012-10-15 19:56:10 +0000670}
Chad Rosierd997bd12012-08-22 19:18:30 +0000671
Chad Rosier5c563642012-10-25 21:49:22 +0000672bool Sema::LookupInlineAsmField(StringRef Base, StringRef Member,
673 unsigned &Offset, SourceLocation AsmLoc) {
674 Offset = 0;
Marina Yatsina71ebc692015-12-17 12:51:51 +0000675 SmallVector<StringRef, 2> Members;
676 Member.split(Members, ".");
677
Chad Rosier5c563642012-10-25 21:49:22 +0000678 LookupResult BaseResult(*this, &Context.Idents.get(Base), SourceLocation(),
679 LookupOrdinaryName);
680
681 if (!LookupName(BaseResult, getCurScope()))
682 return true;
Marina Yatsinad6d8b312016-03-16 09:56:58 +0000683
684 if(!BaseResult.isSingleResult())
685 return true;
686 NamedDecl *FoundDecl = BaseResult.getFoundDecl();
Marina Yatsina71ebc692015-12-17 12:51:51 +0000687 for (StringRef NextMember : Members) {
Marina Yatsina71ebc692015-12-17 12:51:51 +0000688 const RecordType *RT = nullptr;
Marina Yatsina71ebc692015-12-17 12:51:51 +0000689 if (VarDecl *VD = dyn_cast<VarDecl>(FoundDecl))
690 RT = VD->getType()->getAs<RecordType>();
691 else if (TypedefNameDecl *TD = dyn_cast<TypedefNameDecl>(FoundDecl)) {
692 MarkAnyDeclReferenced(TD->getLocation(), TD, /*OdrUse=*/false);
693 RT = TD->getUnderlyingType()->getAs<RecordType>();
694 } else if (TypeDecl *TD = dyn_cast<TypeDecl>(FoundDecl))
695 RT = TD->getTypeForDecl()->getAs<RecordType>();
696 else if (FieldDecl *TD = dyn_cast<FieldDecl>(FoundDecl))
697 RT = TD->getType()->getAs<RecordType>();
698 if (!RT)
699 return true;
Chad Rosier5c563642012-10-25 21:49:22 +0000700
Richard Smithdb0ac552015-12-18 22:40:25 +0000701 if (RequireCompleteType(AsmLoc, QualType(RT, 0),
702 diag::err_asm_incomplete_type))
Marina Yatsina71ebc692015-12-17 12:51:51 +0000703 return true;
Chad Rosier5c563642012-10-25 21:49:22 +0000704
Marina Yatsina71ebc692015-12-17 12:51:51 +0000705 LookupResult FieldResult(*this, &Context.Idents.get(NextMember),
706 SourceLocation(), LookupMemberName);
Chad Rosier5c563642012-10-25 21:49:22 +0000707
Marina Yatsina71ebc692015-12-17 12:51:51 +0000708 if (!LookupQualifiedName(FieldResult, RT->getDecl()))
709 return true;
710
Marina Yatsinad6d8b312016-03-16 09:56:58 +0000711 if (!FieldResult.isSingleResult())
712 return true;
713 FoundDecl = FieldResult.getFoundDecl();
714
Marina Yatsina71ebc692015-12-17 12:51:51 +0000715 // FIXME: Handle IndirectFieldDecl?
Marina Yatsinad6d8b312016-03-16 09:56:58 +0000716 FieldDecl *FD = dyn_cast<FieldDecl>(FoundDecl);
Marina Yatsina71ebc692015-12-17 12:51:51 +0000717 if (!FD)
718 return true;
719
Marina Yatsina71ebc692015-12-17 12:51:51 +0000720 const ASTRecordLayout &RL = Context.getASTRecordLayout(RT->getDecl());
721 unsigned i = FD->getFieldIndex();
722 CharUnits Result = Context.toCharUnitsFromBits(RL.getFieldOffset(i));
723 Offset += (unsigned)Result.getQuantity();
724 }
Chad Rosier5c563642012-10-25 21:49:22 +0000725
726 return false;
727}
728
Reid Kleckner14e96b42015-08-26 21:57:20 +0000729ExprResult
David Majnemer758e7982016-01-05 00:08:41 +0000730Sema::LookupInlineAsmVarDeclField(Expr *E, StringRef Member,
Reid Kleckner14e96b42015-08-26 21:57:20 +0000731 llvm::InlineAsmIdentifierInfo &Info,
732 SourceLocation AsmLoc) {
733 Info.clear();
734
David Majnemerf8b569c2016-01-04 23:51:15 +0000735 QualType T = E->getType();
736 if (T->isDependentType()) {
737 DeclarationNameInfo NameInfo;
738 NameInfo.setLoc(AsmLoc);
739 NameInfo.setName(&Context.Idents.get(Member));
740 return CXXDependentScopeMemberExpr::Create(
741 Context, E, T, /*IsArrow=*/false, AsmLoc, NestedNameSpecifierLoc(),
742 SourceLocation(),
743 /*FirstQualifierInScope=*/nullptr, NameInfo, /*TemplateArgs=*/nullptr);
744 }
745
746 const RecordType *RT = T->getAs<RecordType>();
Reid Kleckner14e96b42015-08-26 21:57:20 +0000747 // FIXME: Diagnose this as field access into a scalar type.
748 if (!RT)
749 return ExprResult();
750
751 LookupResult FieldResult(*this, &Context.Idents.get(Member), AsmLoc,
752 LookupMemberName);
753
754 if (!LookupQualifiedName(FieldResult, RT->getDecl()))
755 return ExprResult();
756
757 // Only normal and indirect field results will work.
758 ValueDecl *FD = dyn_cast<FieldDecl>(FieldResult.getFoundDecl());
759 if (!FD)
760 FD = dyn_cast<IndirectFieldDecl>(FieldResult.getFoundDecl());
761 if (!FD)
762 return ExprResult();
763
Reid Kleckner14e96b42015-08-26 21:57:20 +0000764 // Make an Expr to thread through OpDecl.
765 ExprResult Result = BuildMemberReferenceExpr(
766 E, E->getType(), AsmLoc, /*IsArrow=*/false, CXXScopeSpec(),
Aaron Ballman6924dcd2015-09-01 14:49:24 +0000767 SourceLocation(), nullptr, FieldResult, nullptr, nullptr);
Reid Kleckner14e96b42015-08-26 21:57:20 +0000768 if (Result.isInvalid())
769 return Result;
770 Info.OpDecl = Result.get();
771
772 fillInlineAsmTypeInfo(Context, Result.get()->getType(), Info);
773
774 // Fields are "variables" as far as inline assembly is concerned.
775 Info.IsVarDecl = true;
776
777 return Result;
778}
779
Chad Rosierb261a502012-09-13 00:06:55 +0000780StmtResult Sema::ActOnMSAsmStmt(SourceLocation AsmLoc, SourceLocation LBraceLoc,
John McCallf413f5e2013-05-03 00:10:13 +0000781 ArrayRef<Token> AsmToks,
782 StringRef AsmString,
783 unsigned NumOutputs, unsigned NumInputs,
784 ArrayRef<StringRef> Constraints,
785 ArrayRef<StringRef> Clobbers,
786 ArrayRef<Expr*> Exprs,
787 SourceLocation EndLoc) {
788 bool IsSimple = (NumOutputs != 0 || NumInputs != 0);
Ehsan Akhgari31097582014-09-22 02:21:54 +0000789 getCurFunction()->setHasBranchProtectedScope();
Chad Rosier0731aff2012-08-17 21:19:40 +0000790 MSAsmStmt *NS =
Chad Rosierce2bcbf2012-10-18 15:49:40 +0000791 new (Context) MSAsmStmt(Context, AsmLoc, LBraceLoc, IsSimple,
792 /*IsVolatile*/ true, AsmToks, NumOutputs, NumInputs,
John McCallf413f5e2013-05-03 00:10:13 +0000793 Constraints, Exprs, AsmString,
794 Clobbers, EndLoc);
Nikola Smiljanic03ff2592014-05-29 14:05:12 +0000795 return NS;
Chad Rosier0731aff2012-08-17 21:19:40 +0000796}
Ehsan Akhgari31097582014-09-22 02:21:54 +0000797
798LabelDecl *Sema::GetOrCreateMSAsmLabel(StringRef ExternalLabelName,
799 SourceLocation Location,
800 bool AlwaysCreate) {
801 LabelDecl* Label = LookupOrCreateLabel(PP.getIdentifierInfo(ExternalLabelName),
802 Location);
803
Ehsan Akhgari42924432014-10-08 17:28:34 +0000804 if (Label->isMSAsmLabel()) {
805 // If we have previously created this label implicitly, mark it as used.
806 Label->markUsed(Context);
807 } else {
Ehsan Akhgari31097582014-09-22 02:21:54 +0000808 // Otherwise, insert it, but only resolve it if we have seen the label itself.
809 std::string InternalName;
810 llvm::raw_string_ostream OS(InternalName);
Reid Kleckner36c201a2016-12-07 00:17:18 +0000811 // Create an internal name for the label. The name should not be a valid
812 // mangled name, and should be unique. We use a dot to make the name an
813 // invalid mangled name. We use LLVM's inline asm ${:uid} escape so that a
814 // unique label is generated each time this blob is emitted, even after
815 // inlining or LTO.
Reid Klecknerfec0f322016-11-29 00:39:37 +0000816 OS << "__MSASMLABEL_.${:uid}__";
Reid Kleckner08ebbce2016-11-28 20:52:19 +0000817 for (char C : ExternalLabelName) {
818 OS << C;
819 // We escape '$' in asm strings by replacing it with "$$"
820 if (C == '$')
Marina Yatsinaafb72f32015-12-29 08:49:34 +0000821 OS << '$';
Marina Yatsinaafb72f32015-12-29 08:49:34 +0000822 }
Ehsan Akhgari31097582014-09-22 02:21:54 +0000823 Label->setMSAsmLabel(OS.str());
824 }
825 if (AlwaysCreate) {
826 // The label might have been created implicitly from a previously encountered
827 // goto statement. So, for both newly created and looked up labels, we mark
828 // them as resolved.
829 Label->setMSAsmLabelResolved();
830 }
831 // Adjust their location for being able to generate accurate diagnostics.
832 Label->setLocation(Location);
833
834 return Label;
835}