150ea93a2SStanislav Mekhanoshin //===-- AMDGPUUnifyMetadata.cpp - Unify OpenCL metadata -------------------===// 250ea93a2SStanislav Mekhanoshin // 350ea93a2SStanislav Mekhanoshin // The LLVM Compiler Infrastructure 450ea93a2SStanislav Mekhanoshin // 550ea93a2SStanislav Mekhanoshin // This file is distributed under the University of Illinois Open Source 650ea93a2SStanislav Mekhanoshin // License. See LICENSE.TXT for details. 750ea93a2SStanislav Mekhanoshin // 850ea93a2SStanislav Mekhanoshin //===----------------------------------------------------------------------===// 950ea93a2SStanislav Mekhanoshin // 1050ea93a2SStanislav Mekhanoshin // \file 1150ea93a2SStanislav Mekhanoshin // \brief This pass that unifies multiple OpenCL metadata due to linking. 1250ea93a2SStanislav Mekhanoshin // 1350ea93a2SStanislav Mekhanoshin //===----------------------------------------------------------------------===// 1450ea93a2SStanislav Mekhanoshin 1550ea93a2SStanislav Mekhanoshin #include "AMDGPU.h" 1650ea93a2SStanislav Mekhanoshin #include "llvm/IR/Constants.h" 1750ea93a2SStanislav Mekhanoshin #include "llvm/IR/Module.h" 1850ea93a2SStanislav Mekhanoshin #include "llvm/Pass.h" 1950ea93a2SStanislav Mekhanoshin 2050ea93a2SStanislav Mekhanoshin using namespace llvm; 2150ea93a2SStanislav Mekhanoshin 2250ea93a2SStanislav Mekhanoshin namespace { 2350ea93a2SStanislav Mekhanoshin namespace kOCLMD { 2450ea93a2SStanislav Mekhanoshin const char SpirVer[] = "opencl.spir.version"; 2550ea93a2SStanislav Mekhanoshin const char OCLVer[] = "opencl.ocl.version"; 2650ea93a2SStanislav Mekhanoshin const char UsedExt[] = "opencl.used.extensions"; 2750ea93a2SStanislav Mekhanoshin const char UsedOptCoreFeat[] = "opencl.used.optional.core.features"; 2850ea93a2SStanislav Mekhanoshin const char CompilerOptions[] = "opencl.compiler.options"; 2950ea93a2SStanislav Mekhanoshin const char LLVMIdent[] = "llvm.ident"; 3050ea93a2SStanislav Mekhanoshin } 3150ea93a2SStanislav Mekhanoshin 3250ea93a2SStanislav Mekhanoshin /// \brief Unify multiple OpenCL metadata due to linking. 3350ea93a2SStanislav Mekhanoshin class AMDGPUUnifyMetadata : public FunctionPass { 3450ea93a2SStanislav Mekhanoshin public: 3550ea93a2SStanislav Mekhanoshin static char ID; 3650ea93a2SStanislav Mekhanoshin explicit AMDGPUUnifyMetadata() : FunctionPass(ID) {}; 3750ea93a2SStanislav Mekhanoshin 3850ea93a2SStanislav Mekhanoshin private: 3950ea93a2SStanislav Mekhanoshin // This should really be a module pass but we have to run it as early 4050ea93a2SStanislav Mekhanoshin // as possible, so given function passes are executed first and 4150ea93a2SStanislav Mekhanoshin // TargetMachine::addEarlyAsPossiblePasses() expects only function passes 4250ea93a2SStanislav Mekhanoshin // it has to be a function pass. 4350ea93a2SStanislav Mekhanoshin virtual bool runOnModule(Module &M); 4450ea93a2SStanislav Mekhanoshin 4550ea93a2SStanislav Mekhanoshin // \todo: Convert to a module pass. 4650ea93a2SStanislav Mekhanoshin virtual bool runOnFunction(Function &F); 4750ea93a2SStanislav Mekhanoshin 4850ea93a2SStanislav Mekhanoshin /// \brief Unify version metadata. 4950ea93a2SStanislav Mekhanoshin /// \return true if changes are made. 5050ea93a2SStanislav Mekhanoshin /// Assume the named metadata has operands each of which is a pair of 5150ea93a2SStanislav Mekhanoshin /// integer constant, e.g. 5250ea93a2SStanislav Mekhanoshin /// !Name = {!n1, !n2} 5350ea93a2SStanislav Mekhanoshin /// !n1 = {i32 1, i32 2} 5450ea93a2SStanislav Mekhanoshin /// !n2 = {i32 2, i32 0} 5550ea93a2SStanislav Mekhanoshin /// Keep the largest version as the sole operand if PickFirst is false. 5650ea93a2SStanislav Mekhanoshin /// Otherwise pick it from the first value, representing kernel module. 5750ea93a2SStanislav Mekhanoshin bool unifyVersionMD(Module &M, StringRef Name, bool PickFirst) { 5850ea93a2SStanislav Mekhanoshin auto NamedMD = M.getNamedMetadata(Name); 5950ea93a2SStanislav Mekhanoshin if (!NamedMD || NamedMD->getNumOperands() <= 1) 6050ea93a2SStanislav Mekhanoshin return false; 6150ea93a2SStanislav Mekhanoshin MDNode *MaxMD = nullptr; 6250ea93a2SStanislav Mekhanoshin auto MaxVer = 0U; 6350ea93a2SStanislav Mekhanoshin for (const auto &VersionMD : NamedMD->operands()) { 6450ea93a2SStanislav Mekhanoshin assert(VersionMD->getNumOperands() == 2); 6550ea93a2SStanislav Mekhanoshin auto CMajor = mdconst::extract<ConstantInt>(VersionMD->getOperand(0)); 6650ea93a2SStanislav Mekhanoshin auto VersionMajor = CMajor->getZExtValue(); 6750ea93a2SStanislav Mekhanoshin auto CMinor = mdconst::extract<ConstantInt>(VersionMD->getOperand(1)); 6850ea93a2SStanislav Mekhanoshin auto VersionMinor = CMinor->getZExtValue(); 6950ea93a2SStanislav Mekhanoshin auto Ver = (VersionMajor * 100) + (VersionMinor * 10); 7050ea93a2SStanislav Mekhanoshin if (Ver > MaxVer) { 7150ea93a2SStanislav Mekhanoshin MaxVer = Ver; 7250ea93a2SStanislav Mekhanoshin MaxMD = VersionMD; 7350ea93a2SStanislav Mekhanoshin } 7450ea93a2SStanislav Mekhanoshin if (PickFirst) 7550ea93a2SStanislav Mekhanoshin break; 7650ea93a2SStanislav Mekhanoshin } 7750ea93a2SStanislav Mekhanoshin NamedMD->eraseFromParent(); 7850ea93a2SStanislav Mekhanoshin NamedMD = M.getOrInsertNamedMetadata(Name); 7950ea93a2SStanislav Mekhanoshin NamedMD->addOperand(MaxMD); 8050ea93a2SStanislav Mekhanoshin return true; 8150ea93a2SStanislav Mekhanoshin } 8250ea93a2SStanislav Mekhanoshin 8350ea93a2SStanislav Mekhanoshin /// \brief Unify version metadata. 8450ea93a2SStanislav Mekhanoshin /// \return true if changes are made. 8550ea93a2SStanislav Mekhanoshin /// Assume the named metadata has operands each of which is a list e.g. 8650ea93a2SStanislav Mekhanoshin /// !Name = {!n1, !n2} 8750ea93a2SStanislav Mekhanoshin /// !n1 = !{!"cl_khr_fp16", {!"cl_khr_fp64"}} 8850ea93a2SStanislav Mekhanoshin /// !n2 = !{!"cl_khr_image"} 8950ea93a2SStanislav Mekhanoshin /// Combine it into a single list with unique operands. 9050ea93a2SStanislav Mekhanoshin bool unifyExtensionMD(Module &M, StringRef Name) { 9150ea93a2SStanislav Mekhanoshin auto NamedMD = M.getNamedMetadata(Name); 9250ea93a2SStanislav Mekhanoshin if (!NamedMD || NamedMD->getNumOperands() == 1) 9350ea93a2SStanislav Mekhanoshin return false; 9450ea93a2SStanislav Mekhanoshin 9550ea93a2SStanislav Mekhanoshin SmallVector<Metadata *, 4> All; 9650ea93a2SStanislav Mekhanoshin for (const auto &MD : NamedMD->operands()) 9750ea93a2SStanislav Mekhanoshin for (const auto &Op : MD->operands()) 9850ea93a2SStanislav Mekhanoshin if (std::find(All.begin(), All.end(), Op.get()) == All.end()) 9950ea93a2SStanislav Mekhanoshin All.push_back(Op.get()); 10050ea93a2SStanislav Mekhanoshin 10150ea93a2SStanislav Mekhanoshin NamedMD->eraseFromParent(); 10250ea93a2SStanislav Mekhanoshin NamedMD = M.getOrInsertNamedMetadata(Name); 103*980688cdSKonstantin Zhuravlyov for (const auto &MD : All) 104*980688cdSKonstantin Zhuravlyov NamedMD->addOperand(MDNode::get(M.getContext(), MD)); 105*980688cdSKonstantin Zhuravlyov 10650ea93a2SStanislav Mekhanoshin return true; 10750ea93a2SStanislav Mekhanoshin } 10850ea93a2SStanislav Mekhanoshin }; 10950ea93a2SStanislav Mekhanoshin 11050ea93a2SStanislav Mekhanoshin } // end anonymous namespace 11150ea93a2SStanislav Mekhanoshin 11250ea93a2SStanislav Mekhanoshin char AMDGPUUnifyMetadata::ID = 0; 11350ea93a2SStanislav Mekhanoshin 11450ea93a2SStanislav Mekhanoshin char &llvm::AMDGPUUnifyMetadataID = AMDGPUUnifyMetadata::ID; 11550ea93a2SStanislav Mekhanoshin 11650ea93a2SStanislav Mekhanoshin INITIALIZE_PASS(AMDGPUUnifyMetadata, "amdgpu-unify-metadata", 11750ea93a2SStanislav Mekhanoshin "Unify multiple OpenCL metadata due to linking", 11850ea93a2SStanislav Mekhanoshin false, false) 11950ea93a2SStanislav Mekhanoshin 12050ea93a2SStanislav Mekhanoshin FunctionPass* llvm::createAMDGPUUnifyMetadataPass() { 12150ea93a2SStanislav Mekhanoshin return new AMDGPUUnifyMetadata(); 12250ea93a2SStanislav Mekhanoshin } 12350ea93a2SStanislav Mekhanoshin 12450ea93a2SStanislav Mekhanoshin bool AMDGPUUnifyMetadata::runOnModule(Module &M) { 12550ea93a2SStanislav Mekhanoshin const char* Vers[] = { 12650ea93a2SStanislav Mekhanoshin kOCLMD::SpirVer, 12750ea93a2SStanislav Mekhanoshin kOCLMD::OCLVer 12850ea93a2SStanislav Mekhanoshin }; 12950ea93a2SStanislav Mekhanoshin const char* Exts[] = { 13050ea93a2SStanislav Mekhanoshin kOCLMD::UsedExt, 13150ea93a2SStanislav Mekhanoshin kOCLMD::UsedOptCoreFeat, 13250ea93a2SStanislav Mekhanoshin kOCLMD::CompilerOptions, 13350ea93a2SStanislav Mekhanoshin kOCLMD::LLVMIdent 13450ea93a2SStanislav Mekhanoshin }; 13550ea93a2SStanislav Mekhanoshin 13650ea93a2SStanislav Mekhanoshin bool Changed = false; 13750ea93a2SStanislav Mekhanoshin 13850ea93a2SStanislav Mekhanoshin for (auto &I : Vers) 13950ea93a2SStanislav Mekhanoshin Changed |= unifyVersionMD(M, I, true); 14050ea93a2SStanislav Mekhanoshin 14150ea93a2SStanislav Mekhanoshin for (auto &I : Exts) 14250ea93a2SStanislav Mekhanoshin Changed |= unifyExtensionMD(M, I); 14350ea93a2SStanislav Mekhanoshin 14450ea93a2SStanislav Mekhanoshin return Changed; 14550ea93a2SStanislav Mekhanoshin } 14650ea93a2SStanislav Mekhanoshin 14750ea93a2SStanislav Mekhanoshin bool AMDGPUUnifyMetadata::runOnFunction(Function &F) { 14850ea93a2SStanislav Mekhanoshin return runOnModule(*F.getParent()); 14950ea93a2SStanislav Mekhanoshin } 150