1*04eeddc0SDimitry Andric //===-- M68kCallingConv.h - M68k Custom CC Routines -------------*- C++ -*-===//
2fe6060f1SDimitry Andric //
3fe6060f1SDimitry Andric // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4fe6060f1SDimitry Andric // See https://llvm.org/LICENSE.txt for license information.
5fe6060f1SDimitry Andric // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6fe6060f1SDimitry Andric //
7fe6060f1SDimitry Andric //===----------------------------------------------------------------------===//
8fe6060f1SDimitry Andric ///
9fe6060f1SDimitry Andric /// \file
10fe6060f1SDimitry Andric /// This file contains the custom routines for the M68k Calling Convention
11fe6060f1SDimitry Andric /// that aren't done by tablegen.
12fe6060f1SDimitry Andric ///
13fe6060f1SDimitry Andric //===----------------------------------------------------------------------===//
14fe6060f1SDimitry Andric
15fe6060f1SDimitry Andric #ifndef LLVM_LIB_TARGET_M68K_M68KCALLINGCONV_H
16fe6060f1SDimitry Andric #define LLVM_LIB_TARGET_M68K_M68KCALLINGCONV_H
17fe6060f1SDimitry Andric
18fe6060f1SDimitry Andric #include "MCTargetDesc/M68kMCTargetDesc.h"
19fe6060f1SDimitry Andric
20fe6060f1SDimitry Andric #include "llvm/CodeGen/CallingConvLower.h"
21fe6060f1SDimitry Andric #include "llvm/IR/CallingConv.h"
22fe6060f1SDimitry Andric #include "llvm/IR/Function.h"
23fe6060f1SDimitry Andric
24fe6060f1SDimitry Andric namespace llvm {
25fe6060f1SDimitry Andric
26fe6060f1SDimitry Andric /// Custom state to propagate llvm type info to register CC assigner
27349cc55cSDimitry Andric struct M68kCCState : public CCState {
28349cc55cSDimitry Andric ArrayRef<Type *> ArgTypeList;
29fe6060f1SDimitry Andric
M68kCCStateM68kCCState30349cc55cSDimitry Andric M68kCCState(ArrayRef<Type *> ArgTypes, CallingConv::ID CC, bool IsVarArg,
31fe6060f1SDimitry Andric MachineFunction &MF, SmallVectorImpl<CCValAssign> &Locs,
32fe6060f1SDimitry Andric LLVMContext &C)
33349cc55cSDimitry Andric : CCState(CC, IsVarArg, MF, Locs, C), ArgTypeList(ArgTypes) {}
34fe6060f1SDimitry Andric };
35fe6060f1SDimitry Andric
36fe6060f1SDimitry Andric /// NOTE this function is used to select registers for formal arguments and call
37fe6060f1SDimitry Andric /// FIXME: Handling on pointer arguments is not complete
CC_M68k_Any_AssignToReg(unsigned & ValNo,MVT & ValVT,MVT & LocVT,CCValAssign::LocInfo & LocInfo,ISD::ArgFlagsTy & ArgFlags,CCState & State)38fe6060f1SDimitry Andric inline bool CC_M68k_Any_AssignToReg(unsigned &ValNo, MVT &ValVT, MVT &LocVT,
39fe6060f1SDimitry Andric CCValAssign::LocInfo &LocInfo,
40fe6060f1SDimitry Andric ISD::ArgFlagsTy &ArgFlags, CCState &State) {
41349cc55cSDimitry Andric const M68kCCState &CCInfo = static_cast<M68kCCState &>(State);
42fe6060f1SDimitry Andric
43fe6060f1SDimitry Andric static const MCPhysReg DataRegList[] = {M68k::D0, M68k::D1, M68k::A0,
44fe6060f1SDimitry Andric M68k::A1};
45fe6060f1SDimitry Andric
46fe6060f1SDimitry Andric // Address registers have %a register priority
47fe6060f1SDimitry Andric static const MCPhysReg AddrRegList[] = {
48fe6060f1SDimitry Andric M68k::A0,
49fe6060f1SDimitry Andric M68k::A1,
50fe6060f1SDimitry Andric M68k::D0,
51fe6060f1SDimitry Andric M68k::D1,
52fe6060f1SDimitry Andric };
53fe6060f1SDimitry Andric
54349cc55cSDimitry Andric const auto &ArgTypes = CCInfo.ArgTypeList;
55349cc55cSDimitry Andric auto I = ArgTypes.begin(), End = ArgTypes.end();
56fe6060f1SDimitry Andric int No = ValNo;
57349cc55cSDimitry Andric while (No > 0 && I != End) {
58349cc55cSDimitry Andric No -= (*I)->isIntegerTy(64) ? 2 : 1;
59349cc55cSDimitry Andric ++I;
60fe6060f1SDimitry Andric }
61fe6060f1SDimitry Andric
62349cc55cSDimitry Andric bool IsPtr = I != End && (*I)->isPointerTy();
63fe6060f1SDimitry Andric
64fe6060f1SDimitry Andric unsigned Reg =
65fe6060f1SDimitry Andric IsPtr ? State.AllocateReg(AddrRegList) : State.AllocateReg(DataRegList);
66fe6060f1SDimitry Andric
67fe6060f1SDimitry Andric if (Reg) {
68fe6060f1SDimitry Andric State.addLoc(CCValAssign::getReg(ValNo, ValVT, Reg, LocVT, LocInfo));
69fe6060f1SDimitry Andric return true;
70fe6060f1SDimitry Andric }
71fe6060f1SDimitry Andric
72fe6060f1SDimitry Andric return false;
73fe6060f1SDimitry Andric }
74fe6060f1SDimitry Andric
75fe6060f1SDimitry Andric } // namespace llvm
76fe6060f1SDimitry Andric
77*04eeddc0SDimitry Andric #endif // LLVM_LIB_TARGET_M68K_M68KCALLINGCONV_H
78