1 //===-- lib/CodeGen/GlobalISel/CallLowering.cpp - Call lowering -----------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 ///
9 /// \file
10 /// This file implements some simple delegations needed for call lowering.
11 ///
12 //===----------------------------------------------------------------------===//
13 
14 #include "llvm/CodeGen/Analysis.h"
15 #include "llvm/CodeGen/CallingConvLower.h"
16 #include "llvm/CodeGen/GlobalISel/CallLowering.h"
17 #include "llvm/CodeGen/GlobalISel/Utils.h"
18 #include "llvm/CodeGen/GlobalISel/MachineIRBuilder.h"
19 #include "llvm/CodeGen/MachineOperand.h"
20 #include "llvm/CodeGen/MachineRegisterInfo.h"
21 #include "llvm/CodeGen/TargetLowering.h"
22 #include "llvm/IR/DataLayout.h"
23 #include "llvm/IR/Instructions.h"
24 #include "llvm/IR/LLVMContext.h"
25 #include "llvm/IR/Module.h"
26 #include "llvm/Target/TargetMachine.h"
27 
28 #define DEBUG_TYPE "call-lowering"
29 
30 using namespace llvm;
31 
32 void CallLowering::anchor() {}
33 
34 /// Helper function which updates \p Flags when \p AttrFn returns true.
35 static void
36 addFlagsUsingAttrFn(ISD::ArgFlagsTy &Flags,
37                     const std::function<bool(Attribute::AttrKind)> &AttrFn) {
38   if (AttrFn(Attribute::SExt))
39     Flags.setSExt();
40   if (AttrFn(Attribute::ZExt))
41     Flags.setZExt();
42   if (AttrFn(Attribute::InReg))
43     Flags.setInReg();
44   if (AttrFn(Attribute::StructRet))
45     Flags.setSRet();
46   if (AttrFn(Attribute::Nest))
47     Flags.setNest();
48   if (AttrFn(Attribute::ByVal))
49     Flags.setByVal();
50   if (AttrFn(Attribute::Preallocated))
51     Flags.setPreallocated();
52   if (AttrFn(Attribute::InAlloca))
53     Flags.setInAlloca();
54   if (AttrFn(Attribute::Returned))
55     Flags.setReturned();
56   if (AttrFn(Attribute::SwiftSelf))
57     Flags.setSwiftSelf();
58   if (AttrFn(Attribute::SwiftAsync))
59     Flags.setSwiftAsync();
60   if (AttrFn(Attribute::SwiftError))
61     Flags.setSwiftError();
62 }
63 
64 ISD::ArgFlagsTy CallLowering::getAttributesForArgIdx(const CallBase &Call,
65                                                      unsigned ArgIdx) const {
66   ISD::ArgFlagsTy Flags;
67   addFlagsUsingAttrFn(Flags, [&Call, &ArgIdx](Attribute::AttrKind Attr) {
68     return Call.paramHasAttr(ArgIdx, Attr);
69   });
70   return Flags;
71 }
72 
73 void CallLowering::addArgFlagsFromAttributes(ISD::ArgFlagsTy &Flags,
74                                              const AttributeList &Attrs,
75                                              unsigned OpIdx) const {
76   addFlagsUsingAttrFn(Flags, [&Attrs, &OpIdx](Attribute::AttrKind Attr) {
77     return Attrs.hasAttributeAtIndex(OpIdx, Attr);
78   });
79 }
80 
81 bool CallLowering::lowerCall(MachineIRBuilder &MIRBuilder, const CallBase &CB,
82                              ArrayRef<Register> ResRegs,
83                              ArrayRef<ArrayRef<Register>> ArgRegs,
84                              Register SwiftErrorVReg,
85                              std::function<unsigned()> GetCalleeReg) const {
86   CallLoweringInfo Info;
87   const DataLayout &DL = MIRBuilder.getDataLayout();
88   MachineFunction &MF = MIRBuilder.getMF();
89   bool CanBeTailCalled = CB.isTailCall() &&
90                          isInTailCallPosition(CB, MF.getTarget()) &&
91                          (MF.getFunction()
92                               .getFnAttribute("disable-tail-calls")
93                               .getValueAsString() != "true");
94 
95   CallingConv::ID CallConv = CB.getCallingConv();
96   Type *RetTy = CB.getType();
97   bool IsVarArg = CB.getFunctionType()->isVarArg();
98 
99   SmallVector<BaseArgInfo, 4> SplitArgs;
100   getReturnInfo(CallConv, RetTy, CB.getAttributes(), SplitArgs, DL);
101   Info.CanLowerReturn = canLowerReturn(MF, CallConv, SplitArgs, IsVarArg);
102 
103   if (!Info.CanLowerReturn) {
104     // Callee requires sret demotion.
105     insertSRetOutgoingArgument(MIRBuilder, CB, Info);
106 
107     // The sret demotion isn't compatible with tail-calls, since the sret
108     // argument points into the caller's stack frame.
109     CanBeTailCalled = false;
110   }
111 
112   // First step is to marshall all the function's parameters into the correct
113   // physregs and memory locations. Gather the sequence of argument types that
114   // we'll pass to the assigner function.
115   unsigned i = 0;
116   unsigned NumFixedArgs = CB.getFunctionType()->getNumParams();
117   for (auto &Arg : CB.args()) {
118     ArgInfo OrigArg{ArgRegs[i], *Arg.get(), i, getAttributesForArgIdx(CB, i),
119                     i < NumFixedArgs};
120     setArgFlags(OrigArg, i + AttributeList::FirstArgIndex, DL, CB);
121 
122     // If we have an explicit sret argument that is an Instruction, (i.e., it
123     // might point to function-local memory), we can't meaningfully tail-call.
124     if (OrigArg.Flags[0].isSRet() && isa<Instruction>(&Arg))
125       CanBeTailCalled = false;
126 
127     Info.OrigArgs.push_back(OrigArg);
128     ++i;
129   }
130 
131   // Try looking through a bitcast from one function type to another.
132   // Commonly happens with calls to objc_msgSend().
133   const Value *CalleeV = CB.getCalledOperand()->stripPointerCasts();
134   if (const Function *F = dyn_cast<Function>(CalleeV))
135     Info.Callee = MachineOperand::CreateGA(F, 0);
136   else
137     Info.Callee = MachineOperand::CreateReg(GetCalleeReg(), false);
138 
139   Info.OrigRet = ArgInfo{ResRegs, RetTy, 0, ISD::ArgFlagsTy{}};
140   if (!Info.OrigRet.Ty->isVoidTy())
141     setArgFlags(Info.OrigRet, AttributeList::ReturnIndex, DL, CB);
142 
143   Info.CB = &CB;
144   Info.KnownCallees = CB.getMetadata(LLVMContext::MD_callees);
145   Info.CallConv = CallConv;
146   Info.SwiftErrorVReg = SwiftErrorVReg;
147   Info.IsMustTailCall = CB.isMustTailCall();
148   Info.IsTailCall = CanBeTailCalled;
149   Info.IsVarArg = IsVarArg;
150   return lowerCall(MIRBuilder, Info);
151 }
152 
153 template <typename FuncInfoTy>
154 void CallLowering::setArgFlags(CallLowering::ArgInfo &Arg, unsigned OpIdx,
155                                const DataLayout &DL,
156                                const FuncInfoTy &FuncInfo) const {
157   auto &Flags = Arg.Flags[0];
158   const AttributeList &Attrs = FuncInfo.getAttributes();
159   addArgFlagsFromAttributes(Flags, Attrs, OpIdx);
160 
161   PointerType *PtrTy = dyn_cast<PointerType>(Arg.Ty->getScalarType());
162   if (PtrTy) {
163     Flags.setPointer();
164     Flags.setPointerAddrSpace(PtrTy->getPointerAddressSpace());
165   }
166 
167   Align MemAlign = DL.getABITypeAlign(Arg.Ty);
168   if (Flags.isByVal() || Flags.isInAlloca() || Flags.isPreallocated()) {
169     assert(OpIdx >= AttributeList::FirstArgIndex);
170     unsigned ParamIdx = OpIdx - AttributeList::FirstArgIndex;
171 
172     Type *ElementTy = FuncInfo.getParamByValType(ParamIdx);
173     if (!ElementTy)
174       ElementTy = FuncInfo.getParamInAllocaType(ParamIdx);
175     if (!ElementTy)
176       ElementTy = FuncInfo.getParamPreallocatedType(ParamIdx);
177     assert(ElementTy && "Must have byval, inalloca or preallocated type");
178     Flags.setByValSize(DL.getTypeAllocSize(ElementTy));
179 
180     // For ByVal, alignment should be passed from FE.  BE will guess if
181     // this info is not there but there are cases it cannot get right.
182     if (auto ParamAlign = FuncInfo.getParamStackAlign(ParamIdx))
183       MemAlign = *ParamAlign;
184     else if ((ParamAlign = FuncInfo.getParamAlign(ParamIdx)))
185       MemAlign = *ParamAlign;
186     else
187       MemAlign = Align(getTLI()->getByValTypeAlignment(ElementTy, DL));
188   } else if (OpIdx >= AttributeList::FirstArgIndex) {
189     if (auto ParamAlign =
190             FuncInfo.getParamStackAlign(OpIdx - AttributeList::FirstArgIndex))
191       MemAlign = *ParamAlign;
192   }
193   Flags.setMemAlign(MemAlign);
194   Flags.setOrigAlign(DL.getABITypeAlign(Arg.Ty));
195 
196   // Don't try to use the returned attribute if the argument is marked as
197   // swiftself, since it won't be passed in x0.
198   if (Flags.isSwiftSelf())
199     Flags.setReturned(false);
200 }
201 
202 template void
203 CallLowering::setArgFlags<Function>(CallLowering::ArgInfo &Arg, unsigned OpIdx,
204                                     const DataLayout &DL,
205                                     const Function &FuncInfo) const;
206 
207 template void
208 CallLowering::setArgFlags<CallBase>(CallLowering::ArgInfo &Arg, unsigned OpIdx,
209                                     const DataLayout &DL,
210                                     const CallBase &FuncInfo) const;
211 
212 void CallLowering::splitToValueTypes(const ArgInfo &OrigArg,
213                                      SmallVectorImpl<ArgInfo> &SplitArgs,
214                                      const DataLayout &DL,
215                                      CallingConv::ID CallConv,
216                                      SmallVectorImpl<uint64_t> *Offsets) const {
217   LLVMContext &Ctx = OrigArg.Ty->getContext();
218 
219   SmallVector<EVT, 4> SplitVTs;
220   ComputeValueVTs(*TLI, DL, OrigArg.Ty, SplitVTs, Offsets, 0);
221 
222   if (SplitVTs.size() == 0)
223     return;
224 
225   if (SplitVTs.size() == 1) {
226     // No splitting to do, but we want to replace the original type (e.g. [1 x
227     // double] -> double).
228     SplitArgs.emplace_back(OrigArg.Regs[0], SplitVTs[0].getTypeForEVT(Ctx),
229                            OrigArg.OrigArgIndex, OrigArg.Flags[0],
230                            OrigArg.IsFixed, OrigArg.OrigValue);
231     return;
232   }
233 
234   // Create one ArgInfo for each virtual register in the original ArgInfo.
235   assert(OrigArg.Regs.size() == SplitVTs.size() && "Regs / types mismatch");
236 
237   bool NeedsRegBlock = TLI->functionArgumentNeedsConsecutiveRegisters(
238       OrigArg.Ty, CallConv, false, DL);
239   for (unsigned i = 0, e = SplitVTs.size(); i < e; ++i) {
240     Type *SplitTy = SplitVTs[i].getTypeForEVT(Ctx);
241     SplitArgs.emplace_back(OrigArg.Regs[i], SplitTy, OrigArg.OrigArgIndex,
242                            OrigArg.Flags[0], OrigArg.IsFixed);
243     if (NeedsRegBlock)
244       SplitArgs.back().Flags[0].setInConsecutiveRegs();
245   }
246 
247   SplitArgs.back().Flags[0].setInConsecutiveRegsLast();
248 }
249 
250 /// Pack values \p SrcRegs to cover the vector type result \p DstRegs.
251 static MachineInstrBuilder
252 mergeVectorRegsToResultRegs(MachineIRBuilder &B, ArrayRef<Register> DstRegs,
253                             ArrayRef<Register> SrcRegs) {
254   MachineRegisterInfo &MRI = *B.getMRI();
255   LLT LLTy = MRI.getType(DstRegs[0]);
256   LLT PartLLT = MRI.getType(SrcRegs[0]);
257 
258   // Deal with v3s16 split into v2s16
259   LLT LCMTy = getCoverTy(LLTy, PartLLT);
260   if (LCMTy == LLTy) {
261     // Common case where no padding is needed.
262     assert(DstRegs.size() == 1);
263     return B.buildConcatVectors(DstRegs[0], SrcRegs);
264   }
265 
266   // We need to create an unmerge to the result registers, which may require
267   // widening the original value.
268   Register UnmergeSrcReg;
269   if (LCMTy != PartLLT) {
270     assert(DstRegs.size() == 1);
271     return B.buildDeleteTrailingVectorElements(DstRegs[0],
272                                                B.buildMerge(LCMTy, SrcRegs));
273   } else {
274     // We don't need to widen anything if we're extracting a scalar which was
275     // promoted to a vector e.g. s8 -> v4s8 -> s8
276     assert(SrcRegs.size() == 1);
277     UnmergeSrcReg = SrcRegs[0];
278   }
279 
280   int NumDst = LCMTy.getSizeInBits() / LLTy.getSizeInBits();
281 
282   SmallVector<Register, 8> PadDstRegs(NumDst);
283   std::copy(DstRegs.begin(), DstRegs.end(), PadDstRegs.begin());
284 
285   // Create the excess dead defs for the unmerge.
286   for (int I = DstRegs.size(); I != NumDst; ++I)
287     PadDstRegs[I] = MRI.createGenericVirtualRegister(LLTy);
288 
289   if (PadDstRegs.size() == 1)
290     return B.buildDeleteTrailingVectorElements(DstRegs[0], UnmergeSrcReg);
291   return B.buildUnmerge(PadDstRegs, UnmergeSrcReg);
292 }
293 
294 /// Create a sequence of instructions to combine pieces split into register
295 /// typed values to the original IR value. \p OrigRegs contains the destination
296 /// value registers of type \p LLTy, and \p Regs contains the legalized pieces
297 /// with type \p PartLLT. This is used for incoming values (physregs to vregs).
298 static void buildCopyFromRegs(MachineIRBuilder &B, ArrayRef<Register> OrigRegs,
299                               ArrayRef<Register> Regs, LLT LLTy, LLT PartLLT,
300                               const ISD::ArgFlagsTy Flags) {
301   MachineRegisterInfo &MRI = *B.getMRI();
302 
303   if (PartLLT == LLTy) {
304     // We should have avoided introducing a new virtual register, and just
305     // directly assigned here.
306     assert(OrigRegs[0] == Regs[0]);
307     return;
308   }
309 
310   if (PartLLT.getSizeInBits() == LLTy.getSizeInBits() && OrigRegs.size() == 1 &&
311       Regs.size() == 1) {
312     B.buildBitcast(OrigRegs[0], Regs[0]);
313     return;
314   }
315 
316   // A vector PartLLT needs extending to LLTy's element size.
317   // E.g. <2 x s64> = G_SEXT <2 x s32>.
318   if (PartLLT.isVector() == LLTy.isVector() &&
319       PartLLT.getScalarSizeInBits() > LLTy.getScalarSizeInBits() &&
320       (!PartLLT.isVector() ||
321        PartLLT.getNumElements() == LLTy.getNumElements()) &&
322       OrigRegs.size() == 1 && Regs.size() == 1) {
323     Register SrcReg = Regs[0];
324 
325     LLT LocTy = MRI.getType(SrcReg);
326 
327     if (Flags.isSExt()) {
328       SrcReg = B.buildAssertSExt(LocTy, SrcReg, LLTy.getScalarSizeInBits())
329                    .getReg(0);
330     } else if (Flags.isZExt()) {
331       SrcReg = B.buildAssertZExt(LocTy, SrcReg, LLTy.getScalarSizeInBits())
332                    .getReg(0);
333     }
334 
335     // Sometimes pointers are passed zero extended.
336     LLT OrigTy = MRI.getType(OrigRegs[0]);
337     if (OrigTy.isPointer()) {
338       LLT IntPtrTy = LLT::scalar(OrigTy.getSizeInBits());
339       B.buildIntToPtr(OrigRegs[0], B.buildTrunc(IntPtrTy, SrcReg));
340       return;
341     }
342 
343     B.buildTrunc(OrigRegs[0], SrcReg);
344     return;
345   }
346 
347   if (!LLTy.isVector() && !PartLLT.isVector()) {
348     assert(OrigRegs.size() == 1);
349     LLT OrigTy = MRI.getType(OrigRegs[0]);
350 
351     unsigned SrcSize = PartLLT.getSizeInBits().getFixedSize() * Regs.size();
352     if (SrcSize == OrigTy.getSizeInBits())
353       B.buildMerge(OrigRegs[0], Regs);
354     else {
355       auto Widened = B.buildMerge(LLT::scalar(SrcSize), Regs);
356       B.buildTrunc(OrigRegs[0], Widened);
357     }
358 
359     return;
360   }
361 
362   if (PartLLT.isVector()) {
363     assert(OrigRegs.size() == 1);
364     SmallVector<Register> CastRegs(Regs.begin(), Regs.end());
365 
366     // If PartLLT is a mismatched vector in both number of elements and element
367     // size, e.g. PartLLT == v2s64 and LLTy is v3s32, then first coerce it to
368     // have the same elt type, i.e. v4s32.
369     if (PartLLT.getSizeInBits() > LLTy.getSizeInBits() &&
370         PartLLT.getScalarSizeInBits() == LLTy.getScalarSizeInBits() * 2 &&
371         Regs.size() == 1) {
372       LLT NewTy = PartLLT.changeElementType(LLTy.getElementType())
373                       .changeElementCount(PartLLT.getElementCount() * 2);
374       CastRegs[0] = B.buildBitcast(NewTy, Regs[0]).getReg(0);
375       PartLLT = NewTy;
376     }
377 
378     if (LLTy.getScalarType() == PartLLT.getElementType()) {
379       mergeVectorRegsToResultRegs(B, OrigRegs, CastRegs);
380     } else {
381       unsigned I = 0;
382       LLT GCDTy = getGCDType(LLTy, PartLLT);
383 
384       // We are both splitting a vector, and bitcasting its element types. Cast
385       // the source pieces into the appropriate number of pieces with the result
386       // element type.
387       for (Register SrcReg : CastRegs)
388         CastRegs[I++] = B.buildBitcast(GCDTy, SrcReg).getReg(0);
389       mergeVectorRegsToResultRegs(B, OrigRegs, CastRegs);
390     }
391 
392     return;
393   }
394 
395   assert(LLTy.isVector() && !PartLLT.isVector());
396 
397   LLT DstEltTy = LLTy.getElementType();
398 
399   // Pointer information was discarded. We'll need to coerce some register types
400   // to avoid violating type constraints.
401   LLT RealDstEltTy = MRI.getType(OrigRegs[0]).getElementType();
402 
403   assert(DstEltTy.getSizeInBits() == RealDstEltTy.getSizeInBits());
404 
405   if (DstEltTy == PartLLT) {
406     // Vector was trivially scalarized.
407 
408     if (RealDstEltTy.isPointer()) {
409       for (Register Reg : Regs)
410         MRI.setType(Reg, RealDstEltTy);
411     }
412 
413     B.buildBuildVector(OrigRegs[0], Regs);
414   } else if (DstEltTy.getSizeInBits() > PartLLT.getSizeInBits()) {
415     // Deal with vector with 64-bit elements decomposed to 32-bit
416     // registers. Need to create intermediate 64-bit elements.
417     SmallVector<Register, 8> EltMerges;
418     int PartsPerElt = DstEltTy.getSizeInBits() / PartLLT.getSizeInBits();
419 
420     assert(DstEltTy.getSizeInBits() % PartLLT.getSizeInBits() == 0);
421 
422     for (int I = 0, NumElts = LLTy.getNumElements(); I != NumElts; ++I) {
423       auto Merge = B.buildMerge(RealDstEltTy, Regs.take_front(PartsPerElt));
424       // Fix the type in case this is really a vector of pointers.
425       MRI.setType(Merge.getReg(0), RealDstEltTy);
426       EltMerges.push_back(Merge.getReg(0));
427       Regs = Regs.drop_front(PartsPerElt);
428     }
429 
430     B.buildBuildVector(OrigRegs[0], EltMerges);
431   } else {
432     // Vector was split, and elements promoted to a wider type.
433     // FIXME: Should handle floating point promotions.
434     LLT BVType = LLT::fixed_vector(LLTy.getNumElements(), PartLLT);
435     auto BV = B.buildBuildVector(BVType, Regs);
436     B.buildTrunc(OrigRegs[0], BV);
437   }
438 }
439 
440 /// Create a sequence of instructions to expand the value in \p SrcReg (of type
441 /// \p SrcTy) to the types in \p DstRegs (of type \p PartTy). \p ExtendOp should
442 /// contain the type of scalar value extension if necessary.
443 ///
444 /// This is used for outgoing values (vregs to physregs)
445 static void buildCopyToRegs(MachineIRBuilder &B, ArrayRef<Register> DstRegs,
446                             Register SrcReg, LLT SrcTy, LLT PartTy,
447                             unsigned ExtendOp = TargetOpcode::G_ANYEXT) {
448   // We could just insert a regular copy, but this is unreachable at the moment.
449   assert(SrcTy != PartTy && "identical part types shouldn't reach here");
450 
451   const unsigned PartSize = PartTy.getSizeInBits();
452 
453   if (PartTy.isVector() == SrcTy.isVector() &&
454       PartTy.getScalarSizeInBits() > SrcTy.getScalarSizeInBits()) {
455     assert(DstRegs.size() == 1);
456     B.buildInstr(ExtendOp, {DstRegs[0]}, {SrcReg});
457     return;
458   }
459 
460   if (SrcTy.isVector() && !PartTy.isVector() &&
461       PartSize > SrcTy.getElementType().getSizeInBits()) {
462     // Vector was scalarized, and the elements extended.
463     auto UnmergeToEltTy = B.buildUnmerge(SrcTy.getElementType(), SrcReg);
464     for (int i = 0, e = DstRegs.size(); i != e; ++i)
465       B.buildAnyExt(DstRegs[i], UnmergeToEltTy.getReg(i));
466     return;
467   }
468 
469   LLT GCDTy = getGCDType(SrcTy, PartTy);
470   if (GCDTy == PartTy) {
471     // If this already evenly divisible, we can create a simple unmerge.
472     B.buildUnmerge(DstRegs, SrcReg);
473     return;
474   }
475 
476   MachineRegisterInfo &MRI = *B.getMRI();
477   LLT DstTy = MRI.getType(DstRegs[0]);
478   LLT LCMTy = getCoverTy(SrcTy, PartTy);
479 
480   const unsigned DstSize = DstTy.getSizeInBits();
481   const unsigned SrcSize = SrcTy.getSizeInBits();
482   unsigned CoveringSize = LCMTy.getSizeInBits();
483 
484   Register UnmergeSrc = SrcReg;
485 
486   if (!LCMTy.isVector() && CoveringSize != SrcSize) {
487     // For scalars, it's common to be able to use a simple extension.
488     if (SrcTy.isScalar() && DstTy.isScalar()) {
489       CoveringSize = alignTo(SrcSize, DstSize);
490       LLT CoverTy = LLT::scalar(CoveringSize);
491       UnmergeSrc = B.buildInstr(ExtendOp, {CoverTy}, {SrcReg}).getReg(0);
492     } else {
493       // Widen to the common type.
494       // FIXME: This should respect the extend type
495       Register Undef = B.buildUndef(SrcTy).getReg(0);
496       SmallVector<Register, 8> MergeParts(1, SrcReg);
497       for (unsigned Size = SrcSize; Size != CoveringSize; Size += SrcSize)
498         MergeParts.push_back(Undef);
499       UnmergeSrc = B.buildMerge(LCMTy, MergeParts).getReg(0);
500     }
501   }
502 
503   if (LCMTy.isVector() && CoveringSize != SrcSize)
504     UnmergeSrc = B.buildPadVectorWithUndefElements(LCMTy, SrcReg).getReg(0);
505 
506   B.buildUnmerge(DstRegs, UnmergeSrc);
507 }
508 
509 bool CallLowering::determineAndHandleAssignments(
510     ValueHandler &Handler, ValueAssigner &Assigner,
511     SmallVectorImpl<ArgInfo> &Args, MachineIRBuilder &MIRBuilder,
512     CallingConv::ID CallConv, bool IsVarArg,
513     ArrayRef<Register> ThisReturnRegs) const {
514   MachineFunction &MF = MIRBuilder.getMF();
515   const Function &F = MF.getFunction();
516   SmallVector<CCValAssign, 16> ArgLocs;
517 
518   CCState CCInfo(CallConv, IsVarArg, MF, ArgLocs, F.getContext());
519   if (!determineAssignments(Assigner, Args, CCInfo))
520     return false;
521 
522   return handleAssignments(Handler, Args, CCInfo, ArgLocs, MIRBuilder,
523                            ThisReturnRegs);
524 }
525 
526 static unsigned extendOpFromFlags(llvm::ISD::ArgFlagsTy Flags) {
527   if (Flags.isSExt())
528     return TargetOpcode::G_SEXT;
529   if (Flags.isZExt())
530     return TargetOpcode::G_ZEXT;
531   return TargetOpcode::G_ANYEXT;
532 }
533 
534 bool CallLowering::determineAssignments(ValueAssigner &Assigner,
535                                         SmallVectorImpl<ArgInfo> &Args,
536                                         CCState &CCInfo) const {
537   LLVMContext &Ctx = CCInfo.getContext();
538   const CallingConv::ID CallConv = CCInfo.getCallingConv();
539 
540   unsigned NumArgs = Args.size();
541   for (unsigned i = 0; i != NumArgs; ++i) {
542     EVT CurVT = EVT::getEVT(Args[i].Ty);
543 
544     MVT NewVT = TLI->getRegisterTypeForCallingConv(Ctx, CallConv, CurVT);
545 
546     // If we need to split the type over multiple regs, check it's a scenario
547     // we currently support.
548     unsigned NumParts =
549         TLI->getNumRegistersForCallingConv(Ctx, CallConv, CurVT);
550 
551     if (NumParts == 1) {
552       // Try to use the register type if we couldn't assign the VT.
553       if (Assigner.assignArg(i, CurVT, NewVT, NewVT, CCValAssign::Full, Args[i],
554                              Args[i].Flags[0], CCInfo))
555         return false;
556       continue;
557     }
558 
559     // For incoming arguments (physregs to vregs), we could have values in
560     // physregs (or memlocs) which we want to extract and copy to vregs.
561     // During this, we might have to deal with the LLT being split across
562     // multiple regs, so we have to record this information for later.
563     //
564     // If we have outgoing args, then we have the opposite case. We have a
565     // vreg with an LLT which we want to assign to a physical location, and
566     // we might have to record that the value has to be split later.
567 
568     // We're handling an incoming arg which is split over multiple regs.
569     // E.g. passing an s128 on AArch64.
570     ISD::ArgFlagsTy OrigFlags = Args[i].Flags[0];
571     Args[i].Flags.clear();
572 
573     for (unsigned Part = 0; Part < NumParts; ++Part) {
574       ISD::ArgFlagsTy Flags = OrigFlags;
575       if (Part == 0) {
576         Flags.setSplit();
577       } else {
578         Flags.setOrigAlign(Align(1));
579         if (Part == NumParts - 1)
580           Flags.setSplitEnd();
581       }
582 
583       Args[i].Flags.push_back(Flags);
584       if (Assigner.assignArg(i, CurVT, NewVT, NewVT, CCValAssign::Full, Args[i],
585                              Args[i].Flags[Part], CCInfo)) {
586         // Still couldn't assign this smaller part type for some reason.
587         return false;
588       }
589     }
590   }
591 
592   return true;
593 }
594 
595 bool CallLowering::handleAssignments(ValueHandler &Handler,
596                                      SmallVectorImpl<ArgInfo> &Args,
597                                      CCState &CCInfo,
598                                      SmallVectorImpl<CCValAssign> &ArgLocs,
599                                      MachineIRBuilder &MIRBuilder,
600                                      ArrayRef<Register> ThisReturnRegs) const {
601   MachineFunction &MF = MIRBuilder.getMF();
602   MachineRegisterInfo &MRI = MF.getRegInfo();
603   const Function &F = MF.getFunction();
604   const DataLayout &DL = F.getParent()->getDataLayout();
605 
606   const unsigned NumArgs = Args.size();
607 
608   // Stores thunks for outgoing register assignments. This is used so we delay
609   // generating register copies until mem loc assignments are done. We do this
610   // so that if the target is using the delayed stack protector feature, we can
611   // find the split point of the block accurately. E.g. if we have:
612   // G_STORE %val, %memloc
613   // $x0 = COPY %foo
614   // $x1 = COPY %bar
615   // CALL func
616   // ... then the split point for the block will correctly be at, and including,
617   // the copy to $x0. If instead the G_STORE instruction immediately precedes
618   // the CALL, then we'd prematurely choose the CALL as the split point, thus
619   // generating a split block with a CALL that uses undefined physregs.
620   SmallVector<std::function<void()>> DelayedOutgoingRegAssignments;
621 
622   for (unsigned i = 0, j = 0; i != NumArgs; ++i, ++j) {
623     assert(j < ArgLocs.size() && "Skipped too many arg locs");
624     CCValAssign &VA = ArgLocs[j];
625     assert(VA.getValNo() == i && "Location doesn't correspond to current arg");
626 
627     if (VA.needsCustom()) {
628       std::function<void()> Thunk;
629       unsigned NumArgRegs = Handler.assignCustomValue(
630           Args[i], makeArrayRef(ArgLocs).slice(j), &Thunk);
631       if (Thunk)
632         DelayedOutgoingRegAssignments.emplace_back(Thunk);
633       if (!NumArgRegs)
634         return false;
635       j += NumArgRegs;
636       continue;
637     }
638 
639     const MVT ValVT = VA.getValVT();
640     const MVT LocVT = VA.getLocVT();
641 
642     const LLT LocTy(LocVT);
643     const LLT ValTy(ValVT);
644     const LLT NewLLT = Handler.isIncomingArgumentHandler() ? LocTy : ValTy;
645     const EVT OrigVT = EVT::getEVT(Args[i].Ty);
646     const LLT OrigTy = getLLTForType(*Args[i].Ty, DL);
647 
648     // Expected to be multiple regs for a single incoming arg.
649     // There should be Regs.size() ArgLocs per argument.
650     // This should be the same as getNumRegistersForCallingConv
651     const unsigned NumParts = Args[i].Flags.size();
652 
653     // Now split the registers into the assigned types.
654     Args[i].OrigRegs.assign(Args[i].Regs.begin(), Args[i].Regs.end());
655 
656     if (NumParts != 1 || NewLLT != OrigTy) {
657       // If we can't directly assign the register, we need one or more
658       // intermediate values.
659       Args[i].Regs.resize(NumParts);
660 
661       // For each split register, create and assign a vreg that will store
662       // the incoming component of the larger value. These will later be
663       // merged to form the final vreg.
664       for (unsigned Part = 0; Part < NumParts; ++Part)
665         Args[i].Regs[Part] = MRI.createGenericVirtualRegister(NewLLT);
666     }
667 
668     assert((j + (NumParts - 1)) < ArgLocs.size() &&
669            "Too many regs for number of args");
670 
671     // Coerce into outgoing value types before register assignment.
672     if (!Handler.isIncomingArgumentHandler() && OrigTy != ValTy) {
673       assert(Args[i].OrigRegs.size() == 1);
674       buildCopyToRegs(MIRBuilder, Args[i].Regs, Args[i].OrigRegs[0], OrigTy,
675                       ValTy, extendOpFromFlags(Args[i].Flags[0]));
676     }
677 
678     for (unsigned Part = 0; Part < NumParts; ++Part) {
679       Register ArgReg = Args[i].Regs[Part];
680       // There should be Regs.size() ArgLocs per argument.
681       VA = ArgLocs[j + Part];
682       const ISD::ArgFlagsTy Flags = Args[i].Flags[Part];
683 
684       if (VA.isMemLoc() && !Flags.isByVal()) {
685         // Individual pieces may have been spilled to the stack and others
686         // passed in registers.
687 
688         // TODO: The memory size may be larger than the value we need to
689         // store. We may need to adjust the offset for big endian targets.
690         LLT MemTy = Handler.getStackValueStoreType(DL, VA, Flags);
691 
692         MachinePointerInfo MPO;
693         Register StackAddr = Handler.getStackAddress(
694             MemTy.getSizeInBytes(), VA.getLocMemOffset(), MPO, Flags);
695 
696         Handler.assignValueToAddress(Args[i], Part, StackAddr, MemTy, MPO, VA);
697         continue;
698       }
699 
700       if (VA.isMemLoc() && Flags.isByVal()) {
701         assert(Args[i].Regs.size() == 1 &&
702                "didn't expect split byval pointer");
703 
704         if (Handler.isIncomingArgumentHandler()) {
705           // We just need to copy the frame index value to the pointer.
706           MachinePointerInfo MPO;
707           Register StackAddr = Handler.getStackAddress(
708               Flags.getByValSize(), VA.getLocMemOffset(), MPO, Flags);
709           MIRBuilder.buildCopy(Args[i].Regs[0], StackAddr);
710         } else {
711           // For outgoing byval arguments, insert the implicit copy byval
712           // implies, such that writes in the callee do not modify the caller's
713           // value.
714           uint64_t MemSize = Flags.getByValSize();
715           int64_t Offset = VA.getLocMemOffset();
716 
717           MachinePointerInfo DstMPO;
718           Register StackAddr =
719               Handler.getStackAddress(MemSize, Offset, DstMPO, Flags);
720 
721           MachinePointerInfo SrcMPO(Args[i].OrigValue);
722           if (!Args[i].OrigValue) {
723             // We still need to accurately track the stack address space if we
724             // don't know the underlying value.
725             const LLT PtrTy = MRI.getType(StackAddr);
726             SrcMPO = MachinePointerInfo(PtrTy.getAddressSpace());
727           }
728 
729           Align DstAlign = std::max(Flags.getNonZeroByValAlign(),
730                                     inferAlignFromPtrInfo(MF, DstMPO));
731 
732           Align SrcAlign = std::max(Flags.getNonZeroByValAlign(),
733                                     inferAlignFromPtrInfo(MF, SrcMPO));
734 
735           Handler.copyArgumentMemory(Args[i], StackAddr, Args[i].Regs[0],
736                                      DstMPO, DstAlign, SrcMPO, SrcAlign,
737                                      MemSize, VA);
738         }
739         continue;
740       }
741 
742       assert(!VA.needsCustom() && "custom loc should have been handled already");
743 
744       if (i == 0 && !ThisReturnRegs.empty() &&
745           Handler.isIncomingArgumentHandler() &&
746           isTypeIsValidForThisReturn(ValVT)) {
747         Handler.assignValueToReg(ArgReg, ThisReturnRegs[Part], VA);
748         continue;
749       }
750 
751       if (Handler.isIncomingArgumentHandler())
752         Handler.assignValueToReg(ArgReg, VA.getLocReg(), VA);
753       else {
754         DelayedOutgoingRegAssignments.emplace_back([=, &Handler]() {
755           Handler.assignValueToReg(ArgReg, VA.getLocReg(), VA);
756         });
757       }
758     }
759 
760     // Now that all pieces have been assigned, re-pack the register typed values
761     // into the original value typed registers.
762     if (Handler.isIncomingArgumentHandler() && OrigVT != LocVT) {
763       // Merge the split registers into the expected larger result vregs of
764       // the original call.
765       buildCopyFromRegs(MIRBuilder, Args[i].OrigRegs, Args[i].Regs, OrigTy,
766                         LocTy, Args[i].Flags[0]);
767     }
768 
769     j += NumParts - 1;
770   }
771   for (auto &Fn : DelayedOutgoingRegAssignments)
772     Fn();
773 
774   return true;
775 }
776 
777 void CallLowering::insertSRetLoads(MachineIRBuilder &MIRBuilder, Type *RetTy,
778                                    ArrayRef<Register> VRegs, Register DemoteReg,
779                                    int FI) const {
780   MachineFunction &MF = MIRBuilder.getMF();
781   MachineRegisterInfo &MRI = MF.getRegInfo();
782   const DataLayout &DL = MF.getDataLayout();
783 
784   SmallVector<EVT, 4> SplitVTs;
785   SmallVector<uint64_t, 4> Offsets;
786   ComputeValueVTs(*TLI, DL, RetTy, SplitVTs, &Offsets, 0);
787 
788   assert(VRegs.size() == SplitVTs.size());
789 
790   unsigned NumValues = SplitVTs.size();
791   Align BaseAlign = DL.getPrefTypeAlign(RetTy);
792   Type *RetPtrTy = RetTy->getPointerTo(DL.getAllocaAddrSpace());
793   LLT OffsetLLTy = getLLTForType(*DL.getIntPtrType(RetPtrTy), DL);
794 
795   MachinePointerInfo PtrInfo = MachinePointerInfo::getFixedStack(MF, FI);
796 
797   for (unsigned I = 0; I < NumValues; ++I) {
798     Register Addr;
799     MIRBuilder.materializePtrAdd(Addr, DemoteReg, OffsetLLTy, Offsets[I]);
800     auto *MMO = MF.getMachineMemOperand(PtrInfo, MachineMemOperand::MOLoad,
801                                         MRI.getType(VRegs[I]),
802                                         commonAlignment(BaseAlign, Offsets[I]));
803     MIRBuilder.buildLoad(VRegs[I], Addr, *MMO);
804   }
805 }
806 
807 void CallLowering::insertSRetStores(MachineIRBuilder &MIRBuilder, Type *RetTy,
808                                     ArrayRef<Register> VRegs,
809                                     Register DemoteReg) const {
810   MachineFunction &MF = MIRBuilder.getMF();
811   MachineRegisterInfo &MRI = MF.getRegInfo();
812   const DataLayout &DL = MF.getDataLayout();
813 
814   SmallVector<EVT, 4> SplitVTs;
815   SmallVector<uint64_t, 4> Offsets;
816   ComputeValueVTs(*TLI, DL, RetTy, SplitVTs, &Offsets, 0);
817 
818   assert(VRegs.size() == SplitVTs.size());
819 
820   unsigned NumValues = SplitVTs.size();
821   Align BaseAlign = DL.getPrefTypeAlign(RetTy);
822   unsigned AS = DL.getAllocaAddrSpace();
823   LLT OffsetLLTy =
824       getLLTForType(*DL.getIntPtrType(RetTy->getPointerTo(AS)), DL);
825 
826   MachinePointerInfo PtrInfo(AS);
827 
828   for (unsigned I = 0; I < NumValues; ++I) {
829     Register Addr;
830     MIRBuilder.materializePtrAdd(Addr, DemoteReg, OffsetLLTy, Offsets[I]);
831     auto *MMO = MF.getMachineMemOperand(PtrInfo, MachineMemOperand::MOStore,
832                                         MRI.getType(VRegs[I]),
833                                         commonAlignment(BaseAlign, Offsets[I]));
834     MIRBuilder.buildStore(VRegs[I], Addr, *MMO);
835   }
836 }
837 
838 void CallLowering::insertSRetIncomingArgument(
839     const Function &F, SmallVectorImpl<ArgInfo> &SplitArgs, Register &DemoteReg,
840     MachineRegisterInfo &MRI, const DataLayout &DL) const {
841   unsigned AS = DL.getAllocaAddrSpace();
842   DemoteReg = MRI.createGenericVirtualRegister(
843       LLT::pointer(AS, DL.getPointerSizeInBits(AS)));
844 
845   Type *PtrTy = PointerType::get(F.getReturnType(), AS);
846 
847   SmallVector<EVT, 1> ValueVTs;
848   ComputeValueVTs(*TLI, DL, PtrTy, ValueVTs);
849 
850   // NOTE: Assume that a pointer won't get split into more than one VT.
851   assert(ValueVTs.size() == 1);
852 
853   ArgInfo DemoteArg(DemoteReg, ValueVTs[0].getTypeForEVT(PtrTy->getContext()),
854                     ArgInfo::NoArgIndex);
855   setArgFlags(DemoteArg, AttributeList::ReturnIndex, DL, F);
856   DemoteArg.Flags[0].setSRet();
857   SplitArgs.insert(SplitArgs.begin(), DemoteArg);
858 }
859 
860 void CallLowering::insertSRetOutgoingArgument(MachineIRBuilder &MIRBuilder,
861                                               const CallBase &CB,
862                                               CallLoweringInfo &Info) const {
863   const DataLayout &DL = MIRBuilder.getDataLayout();
864   Type *RetTy = CB.getType();
865   unsigned AS = DL.getAllocaAddrSpace();
866   LLT FramePtrTy = LLT::pointer(AS, DL.getPointerSizeInBits(AS));
867 
868   int FI = MIRBuilder.getMF().getFrameInfo().CreateStackObject(
869       DL.getTypeAllocSize(RetTy), DL.getPrefTypeAlign(RetTy), false);
870 
871   Register DemoteReg = MIRBuilder.buildFrameIndex(FramePtrTy, FI).getReg(0);
872   ArgInfo DemoteArg(DemoteReg, PointerType::get(RetTy, AS),
873                     ArgInfo::NoArgIndex);
874   setArgFlags(DemoteArg, AttributeList::ReturnIndex, DL, CB);
875   DemoteArg.Flags[0].setSRet();
876 
877   Info.OrigArgs.insert(Info.OrigArgs.begin(), DemoteArg);
878   Info.DemoteStackIndex = FI;
879   Info.DemoteRegister = DemoteReg;
880 }
881 
882 bool CallLowering::checkReturn(CCState &CCInfo,
883                                SmallVectorImpl<BaseArgInfo> &Outs,
884                                CCAssignFn *Fn) const {
885   for (unsigned I = 0, E = Outs.size(); I < E; ++I) {
886     MVT VT = MVT::getVT(Outs[I].Ty);
887     if (Fn(I, VT, VT, CCValAssign::Full, Outs[I].Flags[0], CCInfo))
888       return false;
889   }
890   return true;
891 }
892 
893 void CallLowering::getReturnInfo(CallingConv::ID CallConv, Type *RetTy,
894                                  AttributeList Attrs,
895                                  SmallVectorImpl<BaseArgInfo> &Outs,
896                                  const DataLayout &DL) const {
897   LLVMContext &Context = RetTy->getContext();
898   ISD::ArgFlagsTy Flags = ISD::ArgFlagsTy();
899 
900   SmallVector<EVT, 4> SplitVTs;
901   ComputeValueVTs(*TLI, DL, RetTy, SplitVTs);
902   addArgFlagsFromAttributes(Flags, Attrs, AttributeList::ReturnIndex);
903 
904   for (EVT VT : SplitVTs) {
905     unsigned NumParts =
906         TLI->getNumRegistersForCallingConv(Context, CallConv, VT);
907     MVT RegVT = TLI->getRegisterTypeForCallingConv(Context, CallConv, VT);
908     Type *PartTy = EVT(RegVT).getTypeForEVT(Context);
909 
910     for (unsigned I = 0; I < NumParts; ++I) {
911       Outs.emplace_back(PartTy, Flags);
912     }
913   }
914 }
915 
916 bool CallLowering::checkReturnTypeForCallConv(MachineFunction &MF) const {
917   const auto &F = MF.getFunction();
918   Type *ReturnType = F.getReturnType();
919   CallingConv::ID CallConv = F.getCallingConv();
920 
921   SmallVector<BaseArgInfo, 4> SplitArgs;
922   getReturnInfo(CallConv, ReturnType, F.getAttributes(), SplitArgs,
923                 MF.getDataLayout());
924   return canLowerReturn(MF, CallConv, SplitArgs, F.isVarArg());
925 }
926 
927 bool CallLowering::parametersInCSRMatch(
928     const MachineRegisterInfo &MRI, const uint32_t *CallerPreservedMask,
929     const SmallVectorImpl<CCValAssign> &OutLocs,
930     const SmallVectorImpl<ArgInfo> &OutArgs) const {
931   for (unsigned i = 0; i < OutLocs.size(); ++i) {
932     auto &ArgLoc = OutLocs[i];
933     // If it's not a register, it's fine.
934     if (!ArgLoc.isRegLoc())
935       continue;
936 
937     MCRegister PhysReg = ArgLoc.getLocReg();
938 
939     // Only look at callee-saved registers.
940     if (MachineOperand::clobbersPhysReg(CallerPreservedMask, PhysReg))
941       continue;
942 
943     LLVM_DEBUG(
944         dbgs()
945         << "... Call has an argument passed in a callee-saved register.\n");
946 
947     // Check if it was copied from.
948     const ArgInfo &OutInfo = OutArgs[i];
949 
950     if (OutInfo.Regs.size() > 1) {
951       LLVM_DEBUG(
952           dbgs() << "... Cannot handle arguments in multiple registers.\n");
953       return false;
954     }
955 
956     // Check if we copy the register, walking through copies from virtual
957     // registers. Note that getDefIgnoringCopies does not ignore copies from
958     // physical registers.
959     MachineInstr *RegDef = getDefIgnoringCopies(OutInfo.Regs[0], MRI);
960     if (!RegDef || RegDef->getOpcode() != TargetOpcode::COPY) {
961       LLVM_DEBUG(
962           dbgs()
963           << "... Parameter was not copied into a VReg, cannot tail call.\n");
964       return false;
965     }
966 
967     // Got a copy. Verify that it's the same as the register we want.
968     Register CopyRHS = RegDef->getOperand(1).getReg();
969     if (CopyRHS != PhysReg) {
970       LLVM_DEBUG(dbgs() << "... Callee-saved register was not copied into "
971                            "VReg, cannot tail call.\n");
972       return false;
973     }
974   }
975 
976   return true;
977 }
978 
979 bool CallLowering::resultsCompatible(CallLoweringInfo &Info,
980                                      MachineFunction &MF,
981                                      SmallVectorImpl<ArgInfo> &InArgs,
982                                      ValueAssigner &CalleeAssigner,
983                                      ValueAssigner &CallerAssigner) const {
984   const Function &F = MF.getFunction();
985   CallingConv::ID CalleeCC = Info.CallConv;
986   CallingConv::ID CallerCC = F.getCallingConv();
987 
988   if (CallerCC == CalleeCC)
989     return true;
990 
991   SmallVector<CCValAssign, 16> ArgLocs1;
992   CCState CCInfo1(CalleeCC, Info.IsVarArg, MF, ArgLocs1, F.getContext());
993   if (!determineAssignments(CalleeAssigner, InArgs, CCInfo1))
994     return false;
995 
996   SmallVector<CCValAssign, 16> ArgLocs2;
997   CCState CCInfo2(CallerCC, F.isVarArg(), MF, ArgLocs2, F.getContext());
998   if (!determineAssignments(CallerAssigner, InArgs, CCInfo2))
999     return false;
1000 
1001   // We need the argument locations to match up exactly. If there's more in
1002   // one than the other, then we are done.
1003   if (ArgLocs1.size() != ArgLocs2.size())
1004     return false;
1005 
1006   // Make sure that each location is passed in exactly the same way.
1007   for (unsigned i = 0, e = ArgLocs1.size(); i < e; ++i) {
1008     const CCValAssign &Loc1 = ArgLocs1[i];
1009     const CCValAssign &Loc2 = ArgLocs2[i];
1010 
1011     // We need both of them to be the same. So if one is a register and one
1012     // isn't, we're done.
1013     if (Loc1.isRegLoc() != Loc2.isRegLoc())
1014       return false;
1015 
1016     if (Loc1.isRegLoc()) {
1017       // If they don't have the same register location, we're done.
1018       if (Loc1.getLocReg() != Loc2.getLocReg())
1019         return false;
1020 
1021       // They matched, so we can move to the next ArgLoc.
1022       continue;
1023     }
1024 
1025     // Loc1 wasn't a RegLoc, so they both must be MemLocs. Check if they match.
1026     if (Loc1.getLocMemOffset() != Loc2.getLocMemOffset())
1027       return false;
1028   }
1029 
1030   return true;
1031 }
1032 
1033 LLT CallLowering::ValueHandler::getStackValueStoreType(
1034     const DataLayout &DL, const CCValAssign &VA, ISD::ArgFlagsTy Flags) const {
1035   const MVT ValVT = VA.getValVT();
1036   if (ValVT != MVT::iPTR) {
1037     LLT ValTy(ValVT);
1038 
1039     // We lost the pointeriness going through CCValAssign, so try to restore it
1040     // based on the flags.
1041     if (Flags.isPointer()) {
1042       LLT PtrTy = LLT::pointer(Flags.getPointerAddrSpace(),
1043                                ValTy.getScalarSizeInBits());
1044       if (ValVT.isVector())
1045         return LLT::vector(ValTy.getElementCount(), PtrTy);
1046       return PtrTy;
1047     }
1048 
1049     return ValTy;
1050   }
1051 
1052   unsigned AddrSpace = Flags.getPointerAddrSpace();
1053   return LLT::pointer(AddrSpace, DL.getPointerSize(AddrSpace));
1054 }
1055 
1056 void CallLowering::ValueHandler::copyArgumentMemory(
1057     const ArgInfo &Arg, Register DstPtr, Register SrcPtr,
1058     const MachinePointerInfo &DstPtrInfo, Align DstAlign,
1059     const MachinePointerInfo &SrcPtrInfo, Align SrcAlign, uint64_t MemSize,
1060     CCValAssign &VA) const {
1061   MachineFunction &MF = MIRBuilder.getMF();
1062   MachineMemOperand *SrcMMO = MF.getMachineMemOperand(
1063       SrcPtrInfo,
1064       MachineMemOperand::MOLoad | MachineMemOperand::MODereferenceable, MemSize,
1065       SrcAlign);
1066 
1067   MachineMemOperand *DstMMO = MF.getMachineMemOperand(
1068       DstPtrInfo,
1069       MachineMemOperand::MOStore | MachineMemOperand::MODereferenceable,
1070       MemSize, DstAlign);
1071 
1072   const LLT PtrTy = MRI.getType(DstPtr);
1073   const LLT SizeTy = LLT::scalar(PtrTy.getSizeInBits());
1074 
1075   auto SizeConst = MIRBuilder.buildConstant(SizeTy, MemSize);
1076   MIRBuilder.buildMemCpy(DstPtr, SrcPtr, SizeConst, *DstMMO, *SrcMMO);
1077 }
1078 
1079 Register CallLowering::ValueHandler::extendRegister(Register ValReg,
1080                                                     CCValAssign &VA,
1081                                                     unsigned MaxSizeBits) {
1082   LLT LocTy{VA.getLocVT()};
1083   LLT ValTy{VA.getValVT()};
1084 
1085   if (LocTy.getSizeInBits() == ValTy.getSizeInBits())
1086     return ValReg;
1087 
1088   if (LocTy.isScalar() && MaxSizeBits && MaxSizeBits < LocTy.getSizeInBits()) {
1089     if (MaxSizeBits <= ValTy.getSizeInBits())
1090       return ValReg;
1091     LocTy = LLT::scalar(MaxSizeBits);
1092   }
1093 
1094   const LLT ValRegTy = MRI.getType(ValReg);
1095   if (ValRegTy.isPointer()) {
1096     // The x32 ABI wants to zero extend 32-bit pointers to 64-bit registers, so
1097     // we have to cast to do the extension.
1098     LLT IntPtrTy = LLT::scalar(ValRegTy.getSizeInBits());
1099     ValReg = MIRBuilder.buildPtrToInt(IntPtrTy, ValReg).getReg(0);
1100   }
1101 
1102   switch (VA.getLocInfo()) {
1103   default: break;
1104   case CCValAssign::Full:
1105   case CCValAssign::BCvt:
1106     // FIXME: bitconverting between vector types may or may not be a
1107     // nop in big-endian situations.
1108     return ValReg;
1109   case CCValAssign::AExt: {
1110     auto MIB = MIRBuilder.buildAnyExt(LocTy, ValReg);
1111     return MIB.getReg(0);
1112   }
1113   case CCValAssign::SExt: {
1114     Register NewReg = MRI.createGenericVirtualRegister(LocTy);
1115     MIRBuilder.buildSExt(NewReg, ValReg);
1116     return NewReg;
1117   }
1118   case CCValAssign::ZExt: {
1119     Register NewReg = MRI.createGenericVirtualRegister(LocTy);
1120     MIRBuilder.buildZExt(NewReg, ValReg);
1121     return NewReg;
1122   }
1123   }
1124   llvm_unreachable("unable to extend register");
1125 }
1126 
1127 void CallLowering::ValueAssigner::anchor() {}
1128 
1129 Register CallLowering::IncomingValueHandler::buildExtensionHint(CCValAssign &VA,
1130                                                                 Register SrcReg,
1131                                                                 LLT NarrowTy) {
1132   switch (VA.getLocInfo()) {
1133   case CCValAssign::LocInfo::ZExt: {
1134     return MIRBuilder
1135         .buildAssertZExt(MRI.cloneVirtualRegister(SrcReg), SrcReg,
1136                          NarrowTy.getScalarSizeInBits())
1137         .getReg(0);
1138   }
1139   case CCValAssign::LocInfo::SExt: {
1140     return MIRBuilder
1141         .buildAssertSExt(MRI.cloneVirtualRegister(SrcReg), SrcReg,
1142                          NarrowTy.getScalarSizeInBits())
1143         .getReg(0);
1144     break;
1145   }
1146   default:
1147     return SrcReg;
1148   }
1149 }
1150 
1151 /// Check if we can use a basic COPY instruction between the two types.
1152 ///
1153 /// We're currently building on top of the infrastructure using MVT, which loses
1154 /// pointer information in the CCValAssign. We accept copies from physical
1155 /// registers that have been reported as integers if it's to an equivalent sized
1156 /// pointer LLT.
1157 static bool isCopyCompatibleType(LLT SrcTy, LLT DstTy) {
1158   if (SrcTy == DstTy)
1159     return true;
1160 
1161   if (SrcTy.getSizeInBits() != DstTy.getSizeInBits())
1162     return false;
1163 
1164   SrcTy = SrcTy.getScalarType();
1165   DstTy = DstTy.getScalarType();
1166 
1167   return (SrcTy.isPointer() && DstTy.isScalar()) ||
1168          (DstTy.isScalar() && SrcTy.isPointer());
1169 }
1170 
1171 void CallLowering::IncomingValueHandler::assignValueToReg(Register ValVReg,
1172                                                           Register PhysReg,
1173                                                           CCValAssign VA) {
1174   const MVT LocVT = VA.getLocVT();
1175   const LLT LocTy(LocVT);
1176   const LLT RegTy = MRI.getType(ValVReg);
1177 
1178   if (isCopyCompatibleType(RegTy, LocTy)) {
1179     MIRBuilder.buildCopy(ValVReg, PhysReg);
1180     return;
1181   }
1182 
1183   auto Copy = MIRBuilder.buildCopy(LocTy, PhysReg);
1184   auto Hint = buildExtensionHint(VA, Copy.getReg(0), RegTy);
1185   MIRBuilder.buildTrunc(ValVReg, Hint);
1186 }
1187