blob: 10373cb427cd671565fae109f0f439b8e199116d [file] [log] [blame]
Dan Gohmanf17a25c2007-07-18 16:29:46 +00001//===- PowerPCSubtarget.cpp - PPC Subtarget Information -------------------===//
2//
3// The LLVM Compiler Infrastructure
4//
Chris Lattner081ce942007-12-29 20:36:04 +00005// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
Dan Gohmanf17a25c2007-07-18 16:29:46 +00007//
8//===----------------------------------------------------------------------===//
9//
10// This file implements the PPC specific subclass of TargetSubtarget.
11//
12//===----------------------------------------------------------------------===//
13
14#include "PPCSubtarget.h"
15#include "PPC.h"
16#include "llvm/Module.h"
17#include "llvm/Target/TargetMachine.h"
18#include "PPCGenSubtarget.inc"
19using namespace llvm;
20
21#if defined(__APPLE__)
22#include <mach/mach.h>
23#include <mach/mach_host.h>
24#include <mach/host_info.h>
25#include <mach/machine.h>
26
27/// GetCurrentPowerPCFeatures - Returns the current CPUs features.
28static const char *GetCurrentPowerPCCPU() {
29 host_basic_info_data_t hostInfo;
30 mach_msg_type_number_t infoCount;
31
32 infoCount = HOST_BASIC_INFO_COUNT;
33 host_info(mach_host_self(), HOST_BASIC_INFO, (host_info_t)&hostInfo,
34 &infoCount);
35
36 if (hostInfo.cpu_type != CPU_TYPE_POWERPC) return "generic";
37
38 switch(hostInfo.cpu_subtype) {
39 case CPU_SUBTYPE_POWERPC_601: return "601";
40 case CPU_SUBTYPE_POWERPC_602: return "602";
41 case CPU_SUBTYPE_POWERPC_603: return "603";
42 case CPU_SUBTYPE_POWERPC_603e: return "603e";
43 case CPU_SUBTYPE_POWERPC_603ev: return "603ev";
44 case CPU_SUBTYPE_POWERPC_604: return "604";
45 case CPU_SUBTYPE_POWERPC_604e: return "604e";
46 case CPU_SUBTYPE_POWERPC_620: return "620";
47 case CPU_SUBTYPE_POWERPC_750: return "750";
48 case CPU_SUBTYPE_POWERPC_7400: return "7400";
49 case CPU_SUBTYPE_POWERPC_7450: return "7450";
50 case CPU_SUBTYPE_POWERPC_970: return "970";
51 default: ;
52 }
53
54 return "generic";
55}
56#endif
57
58
59PPCSubtarget::PPCSubtarget(const TargetMachine &tm, const Module &M,
60 const std::string &FS, bool is64Bit)
61 : TM(tm)
62 , StackAlignment(16)
Dale Johannesen161badc2008-02-14 23:35:16 +000063 , DarwinDirective(PPC::DIR_NONE)
Dan Gohmanf17a25c2007-07-18 16:29:46 +000064 , IsGigaProcessor(false)
65 , Has64BitSupport(false)
66 , Use64BitRegs(false)
67 , IsPPC64(is64Bit)
68 , HasAltivec(false)
69 , HasFSQRT(false)
70 , HasSTFIWX(false)
Chris Lattner9b7677d2008-01-02 19:35:16 +000071 , HasLazyResolverStubs(false)
72 , DarwinVers(0) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +000073
74 // Determine default and user specified characteristics
75 std::string CPU = "generic";
76#if defined(__APPLE__)
77 CPU = GetCurrentPowerPCCPU();
78#endif
79
80 // Parse features string.
81 ParseSubtargetFeatures(FS, CPU);
82
83 // If we are generating code for ppc64, verify that options make sense.
84 if (is64Bit) {
85 if (!has64BitSupport()) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +000086 Has64BitSupport = true;
87 }
88 // Silently force 64-bit register use on ppc64.
89 Use64BitRegs = true;
90 }
91
92 // If the user requested use of 64-bit regs, but the cpu selected doesn't
93 // support it, warn and ignore.
94 if (use64BitRegs() && !has64BitSupport()) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +000095 Use64BitRegs = false;
96 }
97
98 // Set the boolean corresponding to the current target triple, or the default
99 // if one cannot be determined, to true.
Chris Lattner9b7677d2008-01-02 19:35:16 +0000100 const std::string &TT = M.getTargetTriple();
101 if (TT.length() > 7) {
102 // Determine which version of darwin this is.
Duncan Sandsdfd94582008-01-08 10:06:15 +0000103 size_t DarwinPos = TT.find("-darwin");
Chris Lattner9b7677d2008-01-02 19:35:16 +0000104 if (DarwinPos != std::string::npos) {
105 if (isdigit(TT[DarwinPos+7]))
106 DarwinVers = atoi(&TT[DarwinPos+7]);
107 else
108 DarwinVers = 8; // Minimum supported darwin is Tiger.
109 }
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000110 } else if (TT.empty()) {
Chris Lattner9b7677d2008-01-02 19:35:16 +0000111 // Try to autosense the subtarget from the host compiler.
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000112#if defined(__APPLE__)
Chris Lattner9b7677d2008-01-02 19:35:16 +0000113#if __APPLE_CC__ > 5400
114 DarwinVers = 9; // GCC 5400+ is Leopard.
115#else
116 DarwinVers = 8; // Minimum supported darwin is Tiger.
117#endif
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000118#endif
119 }
120
121 // Set up darwin-specific properties.
Chris Lattner9b7677d2008-01-02 19:35:16 +0000122 if (isDarwin()) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000123 HasLazyResolverStubs = true;
124 AsmFlavor = NewMnemonic;
125 } else {
126 AsmFlavor = OldMnemonic;
127 }
128}
129
130/// SetJITMode - This is called to inform the subtarget info that we are
131/// producing code for the JIT.
132void PPCSubtarget::SetJITMode() {
133 // JIT mode doesn't want lazy resolver stubs, it knows exactly where
134 // everything is. This matters for PPC64, which codegens in PIC mode without
135 // stubs.
136 HasLazyResolverStubs = false;
137}
138
139
140/// hasLazyResolverStub - Return true if accesses to the specified global have
141/// to go through a dyld lazy resolution stub. This means that an extra load
142/// is required to get the address of the global.
143bool PPCSubtarget::hasLazyResolverStub(const GlobalValue *GV) const {
144 // We never hae stubs if HasLazyResolverStubs=false or if in static mode.
145 if (!HasLazyResolverStubs || TM.getRelocationModel() == Reloc::Static)
146 return false;
147
148 return GV->hasWeakLinkage() || GV->hasLinkOnceLinkage() ||
149 (GV->isDeclaration() && !GV->hasNotBeenReadFromBitcode());
150}