blob: 7143dcc19ff10b8cd345615857746c79fcbd6032 [file] [edit]
//===-- MathToXeVM.cpp - conversion from Math to XeVM ---------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "mlir/Conversion/MathToXeVM/MathToXeVM.h"
#include "mlir/Analysis/DataLayoutAnalysis.h"
#include "mlir/Conversion/ArithCommon/AttrToLLVMConverter.h"
#include "mlir/Dialect/LLVMIR/FunctionCallUtils.h"
#include "mlir/Dialect/LLVMIR/LLVMDialect.h"
#include "mlir/Dialect/Math/IR/Math.h"
#include "mlir/Dialect/Vector/IR/VectorOps.h"
#include "mlir/IR/BuiltinDialect.h"
#include "mlir/Pass/Pass.h"
#include "llvm/Support/FormatVariadic.h"
#include "../GPUCommon/GPUOpsLowering.h"
#include "../GPUCommon/OpToFuncCallLowering.h"
namespace mlir {
#define GEN_PASS_DEF_CONVERTMATHTOXEVM
#include "mlir/Conversion/Passes.h.inc"
} // namespace mlir
using namespace mlir;
#define DEBUG_TYPE "math-to-xevm"
static bool isSizeOneVector(Type type) {
auto vecType = dyn_cast<VectorType>(type);
return vecType && vecType.getShape().size() == 1 &&
vecType.getShape()[0] == 1 && vecType.getElementType().isFloat();
}
static bool isSPIRVCompatibleFloatOrVec(Type type) {
if (type.isFloat())
return true;
if (auto vecType = dyn_cast<VectorType>(type)) {
if (!vecType.getElementType().isFloat())
return false;
// SPIRV distinguishes between vectors and matrices: OpenCL native math
// intrsinics are not compatible with matrices.
ArrayRef<int64_t> shape = vecType.getShape();
if (shape.size() != 1)
return false;
// SPIRV has no size-1 vector type; such degenerate vectors are handled
// by unwrapping to the scalar intrinsic (see matchAndRewrite).
if (shape[0] == 1)
return true;
// SPIRV only allows vectors of size 2, 3, 4, 8, 16.
if (shape[0] == 2 || shape[0] == 3 || shape[0] == 4 || shape[0] == 8 ||
shape[0] == 16)
return true;
}
return false;
}
/// Convert math ops marked with `fast` (`afn`) to native OpenCL intrinsics.
template <typename Op>
struct ConvertNativeFuncPattern final : public OpConversionPattern<Op> {
ConvertNativeFuncPattern(MLIRContext *context, StringRef nativeFunc,
PatternBenefit benefit = 1)
: OpConversionPattern<Op>(context, benefit), nativeFunc(nativeFunc) {}
inline std::string
getMangledNativeFuncName(const ArrayRef<Type> operandTypes) const {
std::string mangledFuncName =
"_Z" + std::to_string(nativeFunc.size()) + nativeFunc.str();
auto appendFloatToMangledFunc = [&mangledFuncName](Type type) {
if (type.isF32())
mangledFuncName += "f";
else if (type.isF16())
mangledFuncName += "Dh";
else if (type.isF64())
mangledFuncName += "d";
};
for (auto type : operandTypes) {
if (auto vecType = dyn_cast<VectorType>(type)) {
mangledFuncName += "Dv" + std::to_string(vecType.getShape()[0]) + "_";
appendFloatToMangledFunc(vecType.getElementType());
} else
appendFloatToMangledFunc(type);
}
return mangledFuncName;
}
LogicalResult
matchAndRewrite(Op op, typename Op::Adaptor adaptor,
ConversionPatternRewriter &rewriter) const override {
if (!isSPIRVCompatibleFloatOrVec(op.getType()))
return failure();
arith::FastMathFlags fastFlags = op.getFastmath();
if (!arith::bitEnumContainsAll(fastFlags, arith::FastMathFlags::afn))
return rewriter.notifyMatchFailure(op, "not a fastmath `afn` operation");
Location loc = op.getLoc();
// SPIRV has no size-1 vector type: such vectors are the degenerate result
// of distributing/linearizing larger vectors down to a single element (e.g.
// by the XeGPU lowering pipeline). They have no OpenCL vector intrinsic, so
// unwrap them to the scalar element type and use the scalar intrinsic.
SmallVector<Value, 1> operands(adaptor.getOperands());
SmallVector<Type, 1> operandTypes;
bool unwrapSizeOneVec = isSizeOneVector(op.getType());
for (Value &operand : operands) {
Type opTy = operand.getType();
// This pass only supports operations on vectors that are already in SPIRV
// supported vector sizes: Distributing unsupported vector sizes to SPIRV
// supported vector sizes are done in other blocking optimization passes.
if (!isSPIRVCompatibleFloatOrVec(opTy))
return rewriter.notifyMatchFailure(
op, llvm::formatv("incompatible operand type: '{0}'", opTy));
if (unwrapSizeOneVec) {
assert(isSizeOneVector(opTy) &&
"expected all operands to be size-1 vectors");
opTy = cast<VectorType>(opTy).getElementType();
operand = vector::ExtractOp::create(rewriter, loc, operand,
ArrayRef<int64_t>{0});
}
operandTypes.push_back(opTy);
}
Type resultType = unwrapSizeOneVec
? cast<VectorType>(op.getType()).getElementType()
: op.getType();
auto moduleOp = op->template getParentWithTrait<OpTrait::SymbolTable>();
auto funcOpRes = LLVM::lookupOrCreateFn(
rewriter, moduleOp, getMangledNativeFuncName(operandTypes),
operandTypes, resultType);
assert(!failed(funcOpRes));
LLVM::LLVMFuncOp funcOp = funcOpRes.value();
auto callOp = LLVM::CallOp::create(rewriter, loc, funcOp, operands);
// Preserve fastmath flags in our MLIR op when converting to llvm function
// calls, in order to allow further fastmath optimizations: We thus need to
// convert arith fastmath attrs into attrs recognized by llvm.
arith::AttrConvertFastMathToLLVM<Op, LLVM::CallOp> fastAttrConverter(op);
mlir::NamedAttribute fastAttr = fastAttrConverter.getAttrs()[0];
callOp->setAttr(fastAttr.getName(), fastAttr.getValue());
if (unwrapSizeOneVec) {
// Re-wrap the scalar result back into a size-1 vector to preserve types.
rewriter.replaceOpWithNewOp<vector::BroadcastOp>(op, op.getType(),
callOp.getResult());
} else {
rewriter.replaceOp(op, callOp);
}
return success();
}
const StringRef nativeFunc;
};
template <typename OpTy>
static void populateOCLExtSetOpPatterns(const LLVMTypeConverter &converter,
RewritePatternSet &patterns,
PatternBenefit benefit,
StringRef opName) {
std::string prefix = "__spirv_ocl_";
std::string mangledName = "_Z" +
std::to_string(prefix.size() + opName.size()) +
prefix + opName.str();
patterns.add<ScalarizeVectorOpLowering<OpTy>>(converter, benefit);
patterns.add<OpToFuncCallLowering<OpTy>>(
converter, mangledName + "f", mangledName + "d",
/*f32ApproxFunc=*/"", /*f16Func=*/"",
/*i32Func=*/"", benefit, LLVM::cconv::CConv::SPIR_FUNC);
}
void mlir::populateMathToScalarOCLExtSetConversionPatterns(
const LLVMTypeConverter &converter, RewritePatternSet &patterns,
PatternBenefit benefit) {
populateOCLExtSetOpPatterns<math::AcosOp>(converter, patterns, benefit,
"acos");
populateOCLExtSetOpPatterns<math::AcoshOp>(converter, patterns, benefit,
"acosh");
populateOCLExtSetOpPatterns<math::AsinOp>(converter, patterns, benefit,
"asin");
populateOCLExtSetOpPatterns<math::AsinhOp>(converter, patterns, benefit,
"asinh");
populateOCLExtSetOpPatterns<math::AtanOp>(converter, patterns, benefit,
"atan");
populateOCLExtSetOpPatterns<math::Atan2Op>(converter, patterns, benefit,
"atan2");
populateOCLExtSetOpPatterns<math::AtanhOp>(converter, patterns, benefit,
"atanh");
populateOCLExtSetOpPatterns<math::CbrtOp>(converter, patterns, benefit,
"cbrt");
populateOCLExtSetOpPatterns<math::CopySignOp>(converter, patterns, benefit,
"copysign");
populateOCLExtSetOpPatterns<math::CosOp>(converter, patterns, benefit, "cos");
populateOCLExtSetOpPatterns<math::CoshOp>(converter, patterns, benefit,
"cosh");
populateOCLExtSetOpPatterns<math::ErfOp>(converter, patterns, benefit, "erf");
populateOCLExtSetOpPatterns<math::ErfcOp>(converter, patterns, benefit,
"erfc");
populateOCLExtSetOpPatterns<math::ExpOp>(converter, patterns, benefit, "exp");
populateOCLExtSetOpPatterns<math::Exp2Op>(converter, patterns, benefit,
"exp2");
populateOCLExtSetOpPatterns<math::ExpM1Op>(converter, patterns, benefit,
"expm1");
populateOCLExtSetOpPatterns<math::LogOp>(converter, patterns, benefit, "log");
populateOCLExtSetOpPatterns<math::Log10Op>(converter, patterns, benefit,
"log10");
populateOCLExtSetOpPatterns<math::Log1pOp>(converter, patterns, benefit,
"log1p");
populateOCLExtSetOpPatterns<math::Log2Op>(converter, patterns, benefit,
"log2");
populateOCLExtSetOpPatterns<math::PowFOp>(converter, patterns, benefit,
"pow");
populateOCLExtSetOpPatterns<math::RsqrtOp>(converter, patterns, benefit,
"rsqrt");
populateOCLExtSetOpPatterns<math::SinOp>(converter, patterns, benefit, "sin");
populateOCLExtSetOpPatterns<math::SinhOp>(converter, patterns, benefit,
"sinh");
populateOCLExtSetOpPatterns<math::SqrtOp>(converter, patterns, benefit,
"sqrt");
populateOCLExtSetOpPatterns<math::TanOp>(converter, patterns, benefit, "tan");
populateOCLExtSetOpPatterns<math::TanhOp>(converter, patterns, benefit,
"tanh");
}
void mlir::populateMathToXeVMConversionPatterns(RewritePatternSet &patterns,
bool convertArith,
PatternBenefit benefit) {
patterns.add<ConvertNativeFuncPattern<math::ExpOp>>(
patterns.getContext(), "__spirv_ocl_native_exp", benefit);
patterns.add<ConvertNativeFuncPattern<math::CosOp>>(
patterns.getContext(), "__spirv_ocl_native_cos", benefit);
patterns.add<ConvertNativeFuncPattern<math::Exp2Op>>(
patterns.getContext(), "__spirv_ocl_native_exp2", benefit);
patterns.add<ConvertNativeFuncPattern<math::LogOp>>(
patterns.getContext(), "__spirv_ocl_native_log", benefit);
patterns.add<ConvertNativeFuncPattern<math::Log2Op>>(
patterns.getContext(), "__spirv_ocl_native_log2", benefit);
patterns.add<ConvertNativeFuncPattern<math::Log10Op>>(
patterns.getContext(), "__spirv_ocl_native_log10", benefit);
patterns.add<ConvertNativeFuncPattern<math::PowFOp>>(
patterns.getContext(), "__spirv_ocl_native_powr", benefit);
patterns.add<ConvertNativeFuncPattern<math::RsqrtOp>>(
patterns.getContext(), "__spirv_ocl_native_rsqrt", benefit);
patterns.add<ConvertNativeFuncPattern<math::SinOp>>(
patterns.getContext(), "__spirv_ocl_native_sin", benefit);
patterns.add<ConvertNativeFuncPattern<math::SqrtOp>>(
patterns.getContext(), "__spirv_ocl_native_sqrt", benefit);
patterns.add<ConvertNativeFuncPattern<math::TanOp>>(
patterns.getContext(), "__spirv_ocl_native_tan", benefit);
if (convertArith)
patterns.add<ConvertNativeFuncPattern<arith::DivFOp>>(
patterns.getContext(), "__spirv_ocl_native_divide", benefit);
}
namespace {
struct ConvertMathToXeVMPass
: public impl::ConvertMathToXeVMBase<ConvertMathToXeVMPass> {
using Base::Base;
void runOnOperation() override;
};
} // namespace
void ConvertMathToXeVMPass::runOnOperation() {
Operation *op = getOperation();
MLIRContext *ctx = op->getContext();
const auto &dl = getAnalysis<DataLayoutAnalysis>();
RewritePatternSet patterns(&getContext());
LowerToLLVMOptions options(ctx, dl.getAtOrAbove(op));
LLVMTypeConverter converter(ctx, options);
ConversionTarget target(getContext());
// Native OCL patterns should take precedence for `fast` ops even when
// convertToOCL is set.
populateMathToXeVMConversionPatterns(patterns, convertArith,
convertToOCL + 1);
if (convertToOCL) {
populateMathToScalarOCLExtSetConversionPatterns(converter, patterns, 1);
target
.addIllegalOp<LLVM::CosOp, LLVM::ExpOp, LLVM::Exp2Op, LLVM::LogOp,
LLVM::Log10Op, LLVM::Log2Op, LLVM::SinOp, LLVM::SqrtOp>();
}
target.addLegalDialect<BuiltinDialect, LLVM::LLVMDialect>();
// The size-1-vector patterns unwrap to the scalar intrinsic via
// vector.extract / vector.broadcast; these must be legal for the partial
// conversion to succeed.
target.addLegalOp<vector::ExtractOp, vector::BroadcastOp>();
if (failed(
applyPartialConversion(getOperation(), target, std::move(patterns))))
signalPassFailure();
}