// Copyright 2023 The IREE Authors
//
// Licensed 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

#ifndef IREE_COMPILER_DIALECT_HAL_CONVERSION_STREAMTOHAL_UTILS_H_
#define IREE_COMPILER_DIALECT_HAL_CONVERSION_STREAMTOHAL_UTILS_H_

#include "iree/compiler/Dialect/HAL/IR/HALTypes.h"
#include "iree/compiler/Dialect/Stream/IR/StreamOps.h"
#include "mlir/IR/Builders.h"
#include "mlir/IR/Operation.h"
#include "mlir/IR/PatternMatch.h"

namespace mlir::iree_compiler {

// Returns a !hal.device for the affinity specified on |op|.
Value lookupDeviceFor(Operation *op, OpBuilder &builder);

// Returns a !hal.device and queue affinity i64 for the affinity specified on
// |op|.
std::tuple<Value, Value> lookupDeviceAndQueueAffinityFor(Operation *op,
                                                         OpBuilder &builder);

// Returns a !hal.device and queue affinity i64 for the affinity specified on
// |op| for use as an allocation. This may insert a runtime device selection
// op to resolve the responsible allocator.
std::tuple<Value, Value> lookupDeviceAndQueueAffinityFor(Operation *op,
                                                         Value memoryTypes,
                                                         Value bufferUsage,
                                                         OpBuilder &builder);

// Returns the !hal.allocator for the affinity specified on |op|.
Value lookupAllocatorFor(Operation *op, OpBuilder &builder);

// Returns a !hal.allocator and queue affinity i64 for the affinity specified on
// |op|.
std::tuple<Value, Value> lookupAllocatorAndQueueAffinityFor(Operation *op,
                                                            Value memoryTypes,
                                                            Value bufferUsage,
                                                            OpBuilder &builder);

// Returns the |timepointFence| or a util.null if the wait is to be ignored.
Value getOrCreateWaitFence(Location loc, Value timepointFence,
                           PatternRewriter &rewriter);

// Returns the a new fence for |timepoint| or an existing fence if one was
// associated with an external fence. Returns util.null if no one observes the
// fence.
Value getOrCreateSignalFence(Location loc, Value device, Value timepoint,
                             PatternRewriter &rewriter);

// Scans all of the stream.cmd.* ops in the region to derive a command category.
IREE::HAL::CommandCategoryBitfield deriveCommandCategories(Region &region);

// Maps a resource type to the corresponding HAL memory types and buffer usage.
// This will fail if the resource type is not directly mappable to HAL bits.
// The bits set here are those that must be set for the buffer to be used as the
// buffer within the program with its defined resource lifetime.
LogicalResult
deriveRequiredResourceBufferBits(Location loc, IREE::HAL::Lifetime lifetime,
                                 IREE::HAL::MemoryTypeBitfield &memoryTypes,
                                 IREE::HAL::BufferUsageBitfield &bufferUsage);

class BindingTable {
public:
  BindingTable() = default;
  // TODO(benvanik): interface for execution regions so this can be reused.
  BindingTable(IREE::Stream::CmdExecuteOp executeOp, ValueRange bufferValues,
               ValueRange bufferSizes, IndexSet &indexSet);

  // True if binding tables are supported for the consumer.
  bool isSupported() const { return true; }

  // True if the binding table is empty.
  bool empty() const { return indirectBuffers.empty(); }

  // Maximum binding table capacity.
  size_t size() const { return indirectBuffers.size(); }

  // Builds a binding table (buffer, offset, length) based on the analysis.
  ArrayRef<IREE::HAL::BindingValue> getValues() { return indirectBuffers; }

  // Returns the binding table slot for the given resource, if it's used
  // indirectly.
  std::optional<Value> lookupResourceSlot(Value resourceValue);

private:
  // Buffer binding table with <buffer, offset, length>.
  SmallVector<IREE::HAL::BindingValue> indirectBuffers;
  // A mapping of resources to binding table slot ordinals.
  DenseMap<Value, Value> indirectSlots;
};

class CommandBufferConversionMapping {
public:
  CommandBufferConversionMapping(Value handle, BindingTable bindingTable)
      : handle(handle), bindingTable(std::move(bindingTable)) {}

  // Returns the handle to the !hal.command_buffer.
  Value getHandle() const { return handle; }

  // Resolves a resource range to either a direct or indirect buffer reference.
  // The returned range may differ from the provided used range in cases where
  // an indirect binding table reference may have already factored in the
  // offset.
  IREE::HAL::BindingValue resolveBinding(Location loc, Value resourceValue,
                                         Value bufferValue, Value useOffset,
                                         Value useLength, OpBuilder &builder);

private:
  Value handle;
  BindingTable bindingTable;
};

class StreamConversionMapping {
public:
  // Maps the stream dialect |executeOp| to the hal dialect |commandBuffer|
  // value used during recording. Patterns can use this to find the SSA value
  // they need to make hal.command_buffer.* ops.
  void mapCommandBuffer(IREE::Stream::CmdExecuteOp executeOp,
                        Value commandBuffer, BindingTable bindingTable);

  // Looks up a mapped command buffer SSA value that can be used by the given
  // stream.cmd.* op.
  CommandBufferConversionMapping &
  lookupCommandBufferFor(Operation *cmdOp) const;

private:
  // All cached command buffer results.
  SmallVector<std::shared_ptr<CommandBufferConversionMapping>> commandBuffers;
  // Ops within stream.cmd.execute ops -> !hal.command_buffer.
  DenseMap<Operation *, CommandBufferConversionMapping *> opCommandBufferMap;
};

template <typename OpT>
struct StreamConversionPattern : OpConversionPattern<OpT> {
  StreamConversionPattern(std::shared_ptr<StreamConversionMapping> mapping,
                          TypeConverter &typeConverter, MLIRContext *context,
                          PatternBenefit benefit = 1)
      : OpConversionPattern<OpT>(typeConverter, context, benefit),
        mapping(std::move(mapping)) {}

  std::shared_ptr<StreamConversionMapping> mapping;
};

} // namespace mlir::iree_compiler

#endif // IREE_COMPILER_DIALECT_HAL_CONVERSION_STREAMTOHAL_UTILS_H_
