1 #include "clang/Basic/Cuda.h"
2 
3 #include "llvm/ADT/StringRef.h"
4 #include "llvm/ADT/StringSwitch.h"
5 #include "llvm/ADT/Twine.h"
6 #include "llvm/Support/ErrorHandling.h"
7 #include "llvm/Support/VersionTuple.h"
8 
9 namespace clang {
10 
11 const char *CudaVersionToString(CudaVersion V) {
12   switch (V) {
13   case CudaVersion::UNKNOWN:
14     return "unknown";
15   case CudaVersion::CUDA_70:
16     return "7.0";
17   case CudaVersion::CUDA_75:
18     return "7.5";
19   case CudaVersion::CUDA_80:
20     return "8.0";
21   case CudaVersion::CUDA_90:
22     return "9.0";
23   case CudaVersion::CUDA_91:
24     return "9.1";
25   case CudaVersion::CUDA_92:
26     return "9.2";
27   case CudaVersion::CUDA_100:
28     return "10.0";
29   case CudaVersion::CUDA_101:
30     return "10.1";
31   case CudaVersion::CUDA_102:
32     return "10.2";
33   case CudaVersion::CUDA_110:
34     return "11.0";
35   }
36   llvm_unreachable("invalid enum");
37 }
38 
39 CudaVersion CudaStringToVersion(const llvm::Twine &S) {
40   return llvm::StringSwitch<CudaVersion>(S.str())
41       .Case("7.0", CudaVersion::CUDA_70)
42       .Case("7.5", CudaVersion::CUDA_75)
43       .Case("8.0", CudaVersion::CUDA_80)
44       .Case("9.0", CudaVersion::CUDA_90)
45       .Case("9.1", CudaVersion::CUDA_91)
46       .Case("9.2", CudaVersion::CUDA_92)
47       .Case("10.0", CudaVersion::CUDA_100)
48       .Case("10.1", CudaVersion::CUDA_101)
49       .Case("10.2", CudaVersion::CUDA_102)
50       .Case("11.0", CudaVersion::CUDA_110)
51       .Default(CudaVersion::UNKNOWN);
52 }
53 
54 struct CudaArchToStringMap {
55   CudaArch arch;
56   const char *arch_name;
57   const char *virtual_arch_name;
58 };
59 
60 #define SM2(sm, ca)                                                            \
61   { CudaArch::SM_##sm, "sm_" #sm, ca }
62 #define SM(sm) SM2(sm, "compute_" #sm)
63 #define GFX(gpu)                                                               \
64   { CudaArch::GFX##gpu, "gfx" #gpu, "compute_amdgcn" }
65 CudaArchToStringMap arch_names[] = {
66     // clang-format off
67     {CudaArch::UNUSED, "", ""},
68     SM2(20, "compute_20"), SM2(21, "compute_20"), // Fermi
69     SM(30), SM(32), SM(35), SM(37),  // Kepler
70     SM(50), SM(52), SM(53),          // Maxwell
71     SM(60), SM(61), SM(62),          // Pascal
72     SM(70), SM(72),                  // Volta
73     SM(75),                          // Turing
74     SM(80),                          // Ampere
75     GFX(600), // tahiti
76     GFX(601), // pitcairn, verde, oland,hainan
77     GFX(700), // kaveri
78     GFX(701), // hawaii
79     GFX(702), // 290,290x,R390,R390x
80     GFX(703), // kabini mullins
81     GFX(704), // bonaire
82     GFX(801), // carrizo
83     GFX(802), // tonga,iceland
84     GFX(803), // fiji,polaris10
85     GFX(810), // stoney
86     GFX(900), // vega, instinct
87     GFX(902), GFX(904), GFX(906), GFX(908), GFX(909),
88     GFX(1010), GFX(1011), GFX(1012), GFX(1030), GFX(1031)
89     // clang-format on
90 };
91 #undef SM
92 #undef SM2
93 #undef GFX
94 
95 const char *CudaArchToString(CudaArch A) {
96   auto result = std::find_if(
97       std::begin(arch_names), std::end(arch_names),
98       [A](const CudaArchToStringMap &map) { return A == map.arch; });
99   if (result == std::end(arch_names))
100     return "unknown";
101   return result->arch_name;
102 }
103 
104 const char *CudaArchToVirtualArchString(CudaArch A) {
105   auto result = std::find_if(
106       std::begin(arch_names), std::end(arch_names),
107       [A](const CudaArchToStringMap &map) { return A == map.arch; });
108   if (result == std::end(arch_names))
109     return "unknown";
110   return result->virtual_arch_name;
111 }
112 
113 CudaArch StringToCudaArch(llvm::StringRef S) {
114   auto result = std::find_if(
115       std::begin(arch_names), std::end(arch_names),
116       [S](const CudaArchToStringMap &map) { return S == map.arch_name; });
117   if (result == std::end(arch_names))
118     return CudaArch::UNKNOWN;
119   return result->arch;
120 }
121 
122 CudaVersion MinVersionForCudaArch(CudaArch A) {
123   if (A == CudaArch::UNKNOWN)
124     return CudaVersion::UNKNOWN;
125 
126   // AMD GPUs do not depend on CUDA versions.
127   if (IsAMDGpuArch(A))
128     return CudaVersion::CUDA_70;
129 
130   switch (A) {
131   case CudaArch::SM_20:
132   case CudaArch::SM_21:
133   case CudaArch::SM_30:
134   case CudaArch::SM_32:
135   case CudaArch::SM_35:
136   case CudaArch::SM_37:
137   case CudaArch::SM_50:
138   case CudaArch::SM_52:
139   case CudaArch::SM_53:
140     return CudaVersion::CUDA_70;
141   case CudaArch::SM_60:
142   case CudaArch::SM_61:
143   case CudaArch::SM_62:
144     return CudaVersion::CUDA_80;
145   case CudaArch::SM_70:
146     return CudaVersion::CUDA_90;
147   case CudaArch::SM_72:
148     return CudaVersion::CUDA_91;
149   case CudaArch::SM_75:
150     return CudaVersion::CUDA_100;
151   case CudaArch::SM_80:
152     return CudaVersion::CUDA_110;
153   default:
154     llvm_unreachable("invalid enum");
155   }
156 }
157 
158 CudaVersion MaxVersionForCudaArch(CudaArch A) {
159   // AMD GPUs do not depend on CUDA versions.
160   if (IsAMDGpuArch(A))
161     return CudaVersion::LATEST;
162 
163   switch (A) {
164   case CudaArch::UNKNOWN:
165     return CudaVersion::UNKNOWN;
166   case CudaArch::SM_20:
167   case CudaArch::SM_21:
168     return CudaVersion::CUDA_80;
169   default:
170     return CudaVersion::LATEST;
171   }
172 }
173 
174 CudaVersion ToCudaVersion(llvm::VersionTuple Version) {
175   int IVer =
176       Version.getMajor() * 10 + Version.getMinor().getValueOr(0);
177   switch(IVer) {
178   case 70:
179     return CudaVersion::CUDA_70;
180   case 75:
181     return CudaVersion::CUDA_75;
182   case 80:
183     return CudaVersion::CUDA_80;
184   case 90:
185     return CudaVersion::CUDA_90;
186   case 91:
187     return CudaVersion::CUDA_91;
188   case 92:
189     return CudaVersion::CUDA_92;
190   case 100:
191     return CudaVersion::CUDA_100;
192   case 101:
193     return CudaVersion::CUDA_101;
194   case 102:
195     return CudaVersion::CUDA_102;
196   case 110:
197     return CudaVersion::CUDA_110;
198   default:
199     return CudaVersion::UNKNOWN;
200   }
201 }
202 
203 bool CudaFeatureEnabled(llvm::VersionTuple  Version, CudaFeature Feature) {
204   return CudaFeatureEnabled(ToCudaVersion(Version), Feature);
205 }
206 
207 bool CudaFeatureEnabled(CudaVersion Version, CudaFeature Feature) {
208   switch (Feature) {
209   case CudaFeature::CUDA_USES_NEW_LAUNCH:
210     return Version >= CudaVersion::CUDA_92;
211   case CudaFeature::CUDA_USES_FATBIN_REGISTER_END:
212     return Version >= CudaVersion::CUDA_101;
213   }
214   llvm_unreachable("Unknown CUDA feature.");
215 }
216 } // namespace clang
217