Jetpack/kernel/nvidia/drivers/iommu/arm-smmu-t19x.c

/*
 * IOMMU API for ARM architected SMMU implementations.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 *
 * Copyright (C) 2013 ARM Limited
 * Copyright (c) 2015-2020, NVIDIA CORPORATION. All rights reserved.
 *
 * Author: Will Deacon <will.deacon@arm.com>
 *
 * This driver currently supports:
 *	- SMMUv1 and v2 implementations
 *	- Stream-matching and stream-indexing
 *	- v7/v8 long-descriptor format
 *	- Non-secure access to the SMMU
 *	- 4k and 64k pages, with contiguous pte hints.
 *	- Up to 48-bit addressing (dependent on VA_BITS)
 *	- Context fault reporting
 */

#define pr_fmt(fmt) "t19x-arm-smmu: " fmt

#include <linux/delay.h>
#include <linux/dma-iommu.h>
#include <linux/dma-mapping.h>
#include <linux/err.h>
#include <linux/interrupt.h>
#include <linux/io.h>
#include <linux/iommu.h>
#include <linux/mm.h>
#include <linux/module.h>
#include <linux/of.h>
#include <linux/of_iommu.h>
#include <linux/of_platform.h>
#include <linux/pci.h>
#include <linux/platform_device.h>
#include <linux/slab.h>
#include <linux/spinlock.h>
#include <linux/debugfs.h>
#include <linux/uaccess.h>
#include <linux/dma-attrs.h>
#include <soc/tegra/chip-id.h>
#include <linux/ktime.h>
#include <linux/string.h>
#include <linux/dma-override.h>

#include <linux/amba/bus.h>
#include <linux/version.h>

#include <linux/arm-smmu-suspend.h>

#include <asm/pgalloc.h>
#include <asm/dma-iommu.h>
#include <asm/pgtable.h>

#include <trace/events/arm_smmu.h>

#include "of_tegra-smmu.h" /* FIXME: to parse implicitly */
#include "arm-smmu-regs-t19x.h"

#include <dt-bindings/memory/tegra-swgroup.h>
#include <linux/platform/tegra/tegra-mc-sid.h>

#ifndef ENABLE_IOMMU_DMA_OPS
#define ENABLE_IOMMU_DMA_OPS 0
#endif

/* Maximum number of stream IDs assigned to a single device */
#define MAX_MASTER_STREAMIDS		MAX_PHANDLE_ARGS

/* Maximum number of context banks per SMMU */
#define ARM_SMMU_MAX_CBS		128

/* Maximum number of mapping groups per SMMU */
#define ARM_SMMU_MAX_SMRS		128

#define MAX_SMMUS			4


#define NUM_SID				64
#define ALL_PGSIZES_BITMAP		((~0UL) & PAGE_MASK)

static int force_stage;
module_param_named(t19x_force_stage, force_stage, int, S_IRUGO | S_IWUSR);
MODULE_PARM_DESC(t19x_force_stage,
	"Force SMMU mappings to be installed at a particular stage of translation. A value of '1' or '2' forces the corresponding stage. All other values are ignored (i.e. no stage is forced). Note that selecting a specific stage will disable support for nested translation.");

static s8 debug_smmu_id;

enum arm_smmu_arch_version {
	ARM_SMMU_V1 = 1,
	ARM_SMMU_V2,
};

struct arm_smmu_smr {
	u8				idx;
	u16				mask;
	u16				id;
};

struct arm_smmu_master_cfg {
	int				num_streamids;
	u16				streamids[MAX_MASTER_STREAMIDS];
	struct arm_smmu_smr		*smrs;
};

struct arm_smmu_master {
	struct device_node		*of_node;
	struct rb_node			node;
	struct arm_smmu_master_cfg	*cfg;
	struct dentry			*debugfs_root;
};

struct arm_smmu_device {
	struct device			*dev;

	void __iomem			*base[MAX_SMMUS];
	u32				base_pa[MAX_SMMUS];
	u32				num_smmus;
	s8				iso_smmu_id;

	unsigned long			size;
	unsigned long			pgshift;

#define ARM_SMMU_FEAT_COHERENT_WALK	(1 << 0)
#define ARM_SMMU_FEAT_STREAM_MATCH	(1 << 1)
#define ARM_SMMU_FEAT_TRANS_S1		(1 << 2)
#define ARM_SMMU_FEAT_TRANS_S2		(1 << 3)
#define ARM_SMMU_FEAT_TRANS_NESTED	(1 << 4)
	u32				features;

#define ARM_SMMU_OPT_SECURE_CFG_ACCESS (1 << 0)
	u32				options;
	enum arm_smmu_arch_version	version;

	u32				num_context_banks;
	u32				num_s2_context_banks;
	DECLARE_BITMAP(context_map, ARM_SMMU_MAX_CBS);
	atomic_t			irptndx;

	u32				num_mapping_groups;
	DECLARE_BITMAP(smr_map, ARM_SMMU_MAX_SMRS);

	unsigned long			s1_input_size;
	unsigned long			s1_output_size;
	unsigned long			s2_input_size;
	unsigned long			s2_output_size;

	u32				num_global_irqs;
	u32				num_context_irqs;
	unsigned int			*irqs;

	struct list_head		list;
	struct rb_root			masters;
	struct dentry			*masters_root;

	struct dentry			*debugfs_root;
	struct debugfs_regset32		*regset;
	struct debugfs_regset32         *perf_regset;
	DECLARE_BITMAP(context_filter, ARM_SMMU_MAX_CBS);
};

struct arm_smmu_cfg {
	u8				cbndx;
	u8				irptndx;
	u32				cbar;
	pgd_t				*pgd;
	u32				iso_client_count;
	u32				non_iso_client_count;
};
#define INVALID_IRPTNDX			0xff

#define ARM_SMMU_CB_ASID(cfg)		((cfg)->cbndx)
#define ARM_SMMU_CB_VMID(cfg)		((cfg)->cbndx + 1)

struct arm_smmu_domain {
	struct arm_smmu_device		*smmu;
	struct arm_smmu_cfg		cfg;
	spinlock_t			lock;

	dma_addr_t			inquired_iova;
	phys_addr_t			inquired_phys;

	struct iommu_domain             domain;
};

static struct iommu_domain *iommu_domains[NUM_SID]; /* To keep all allocated domains */

static DEFINE_SPINLOCK(arm_smmu_devices_lock);
static LIST_HEAD(arm_smmu_devices);

static struct arm_smmu_device *smmu_handle; /* assmu only one smmu device */
static bool arm_smmu_skip_mapping; /* For debug */
static bool arm_smmu_gr0_tlbiallnsnh; /* Insert TLBIALLNSNH at all */
static bool arm_smmu_tlb_inv_by_addr = 1; /* debugfs: tlb inv context by default */
static bool arm_smmu_tlb_inv_at_map;	/* debugfs: tlb inv at map additionally */

static void get_pte_info(struct arm_smmu_cfg *cfg, ulong iova,
	pgdval_t *pgdval, pudval_t *pudval, pmdval_t *pmdval, pteval_t *pteval);

static inline void writel_single(u32 val, volatile void __iomem *virt_addr)
{
	writel(val, virt_addr);
}

static inline void writel_relaxed_single(u32 val,
			volatile void __iomem *virt_addr)
{
	writel_relaxed(val, virt_addr);
}

static inline void writel_relaxed_iso(u32 val,
			volatile void __iomem *virt_addr, bool iso_smmu)
{
	int smmu_id, offset;

	offset = abs(virt_addr - smmu_handle->base[0]);
	if (iso_smmu) {
		if (smmu_handle->iso_smmu_id < 0)
			return;
		writel_relaxed(val,
			smmu_handle->base[smmu_handle->iso_smmu_id] + offset);
	} else {
		for (smmu_id = 0; smmu_id < smmu_handle->num_smmus; smmu_id++) {
			if (smmu_id != smmu_handle->iso_smmu_id)
				writel_relaxed(val,
					smmu_handle->base[smmu_id] + offset);
		}
	}
}

static inline void writel_relaxed_cfg_iso(u64 val,
			volatile void __iomem *virt_addr,
			struct arm_smmu_cfg *cfg)
{
	if (cfg->iso_client_count)
		writel_relaxed_iso(val, virt_addr, 1);

	if (cfg->non_iso_client_count)
		writel_relaxed_iso(val, virt_addr, 0);

}

static inline void writeq_relaxed_iso(u64 val,
			volatile void __iomem *virt_addr, bool iso_smmu)
{
	int smmu_id, offset;

	offset = abs(virt_addr - smmu_handle->base[0]);
	if (iso_smmu) {
		if (smmu_handle->iso_smmu_id < 0)
			return;
		writeq_relaxed(val,
			smmu_handle->base[smmu_handle->iso_smmu_id] + offset);
	} else {
		for (smmu_id = 0; smmu_id < smmu_handle->num_smmus; smmu_id++) {
			if (smmu_id != smmu_handle->iso_smmu_id)
				writeq_relaxed(val,
					smmu_handle->base[smmu_id] + offset);
		}
	}
}

static inline void writeq_relaxed_cfg_iso(u64 val,
			volatile void __iomem *virt_addr,
			struct arm_smmu_cfg *cfg)
{
	if (cfg->iso_client_count)
		writeq_relaxed_iso(val, virt_addr, 1);

	if (cfg->non_iso_client_count)
		writeq_relaxed_iso(val, virt_addr, 0);

}

#define WRITEL_FN(fn, call, type) \
static inline void fn(type val, volatile void __iomem *virt_addr) \
{ \
	int smmu_id, offset; \
	offset = abs(virt_addr - smmu_handle->base[0]); \
	for (smmu_id = 0; smmu_id < smmu_handle->num_smmus; smmu_id++) \
		call(val, smmu_handle->base[smmu_id] + offset); \
}

WRITEL_FN(writel_relaxed_all, writel_relaxed, u32);
WRITEL_FN(writeq_relaxed_all, writeq_relaxed, u64);
WRITEL_FN(writel_all, writel, u32);

#undef writel_relaxed
#undef writeq_relaxed
#undef writel
#define writel_relaxed writel_relaxed_all
#define writeq_relaxed writeq_relaxed_all
#define writel writel_all

void __weak platform_override_streamid(int streamid)
{
}

static phys_addr_t arm_smmu_iova_to_phys(struct iommu_domain *domain,
					dma_addr_t iova);

struct arm_smmu_option_prop {
	u32 opt;
	const char *prop;
};

static struct arm_smmu_option_prop arm_smmu_options[] = {
	{ ARM_SMMU_OPT_SECURE_CFG_ACCESS, "calxeda,smmu-secure-config-access" },
	{ ARM_SMMU_OPT_SECURE_CFG_ACCESS, "-calxeda,smmu-secure-config-access" },
	{ 0, NULL},
};

static struct arm_smmu_domain *to_smmu_domain(struct iommu_domain *dom)
{
	return container_of(dom, struct arm_smmu_domain, domain);
}

static void parse_driver_options(struct arm_smmu_device *smmu)
{
	int i = 0;

	do {
		if (of_property_read_bool(smmu->dev->of_node,
						arm_smmu_options[i].prop)) {
			if (arm_smmu_options[i].prop[0] == '-')
				smmu->options &= ~arm_smmu_options[i].opt;
			else
				smmu->options |= arm_smmu_options[i].opt;
			dev_notice(smmu->dev, "option %s\n",
				arm_smmu_options[i].prop);
		}
	} while (arm_smmu_options[++i].opt);

	/* FIXME: remove if linsim is fixed */
	if (tegra_platform_is_sim()) {
		u64 nvcl;

		if (!of_property_read_u64(smmu->dev->of_node,
					"nvidia,changelist",  &nvcl)) {
			if (nvcl < 38424879)
				smmu->options |= ARM_SMMU_OPT_SECURE_CFG_ACCESS;
		}
	}
}

static struct device_node *dev_get_dev_node(struct device *dev)
{
	if (dev_is_pci(dev)) {
		struct pci_bus *bus = to_pci_dev(dev)->bus;

		while (!pci_is_root_bus(bus))
			bus = bus->parent;
		return bus->bridge->parent->of_node;
	}

	return dev->of_node;
}

static struct arm_smmu_master *find_smmu_master(struct arm_smmu_device *smmu,
						struct device_node *dev_node)
{
	struct rb_node *node = smmu->masters.rb_node;

	while (node) {
		struct arm_smmu_master *master;

		master = container_of(node, struct arm_smmu_master, node);

		if (dev_node < master->of_node)
			node = node->rb_left;
		else if (dev_node > master->of_node)
			node = node->rb_right;
		else
			return master;
	}

	return NULL;
}

static struct arm_smmu_master_cfg *
find_smmu_master_cfg(struct device *dev)
{
	struct arm_smmu_master_cfg *cfg = NULL;
	struct iommu_group *group = iommu_group_get(dev);

	if (group) {
		cfg = iommu_group_get_iommudata(group);
		iommu_group_put(group);
	}

	return cfg;
}

static int insert_smmu_master(struct arm_smmu_device *smmu,
			      struct arm_smmu_master *master)
{
	struct rb_node **new, *parent;

	new = &smmu->masters.rb_node;
	parent = NULL;
	while (*new) {
		struct arm_smmu_master *this
			= container_of(*new, struct arm_smmu_master, node);

		parent = *new;
		if (master->of_node < this->of_node)
			new = &((*new)->rb_left);
		else if (master->of_node > this->of_node)
			new = &((*new)->rb_right);
		else
			return -EEXIST;
	}

	rb_link_node(&master->node, parent, new);
	rb_insert_color(&master->node, &smmu->masters);
	return 0;
}

/*
 * Look for a master_cfg which is identical to the masterspec passed. This
 * allows us to support multiple devices all sharing the same master_cfg.
 * Ultimately that allows multiple devices to share the same set of stream
 * IDs.
 */
static struct arm_smmu_master_cfg *
find_identical_smmu_master_cfg(struct arm_smmu_device *smmu,
			       struct of_phandle_args *masterspec)
{
	struct rb_node *node;
	struct arm_smmu_master *master;
	int i;

	for (node = rb_first(&smmu->masters); node; node = rb_next(node)) {
		int sids_match = 1;

		master = container_of(node, struct arm_smmu_master, node);

		/* If we don't have the same number of StreamIDs then we are
		 * certainly not identical.
		 */
		if (master->cfg->num_streamids != masterspec->args_count)
			continue;

		/* And now check the StreamIDs themselves. */
		for (i = 0; i < masterspec->args_count; i++) {
			if (masterspec->args[i] != master->cfg->streamids[i]) {
				sids_match = 0;
				break;
			}
		}

		if (!sids_match)
			continue;

		/* Found an identical master cfg! */
		return master->cfg;
	}

	return NULL;
}

static int register_smmu_master(struct arm_smmu_device *smmu,
				struct device *dev,
				struct of_phandle_args *masterspec)
{
	int i;
	struct arm_smmu_master *master;
	struct arm_smmu_master_cfg *master_cfg;

	master = find_smmu_master(smmu, masterspec->np);
	if (master) {
		/* Silently ignore if the master is attempted to
		 * register with same propoerties as before.
		 */
		if (master->cfg->num_streamids == masterspec->args_count) {
			for (i = 0; i < master->cfg->num_streamids; ++i) {
				if (master->cfg->streamids[i] == masterspec->args[i])
					continue;
				break;
			}
			if (i == master->cfg->num_streamids)
				return 0;
		}
		dev_err(dev,
			"rejecting multiple registrations for master device %s\n",
			masterspec->np->name);
		return -EBUSY;
	}

	if (masterspec->args_count > MAX_MASTER_STREAMIDS) {
		dev_err(dev,
			"reached maximum number (%d) of stream IDs for master device %s\n",
			MAX_MASTER_STREAMIDS, masterspec->np->name);
		return -ENOSPC;
	}

	master = devm_kzalloc(smmu->dev, sizeof(*master), GFP_KERNEL);
	if (!master)
		return -ENOMEM;

	master->of_node = masterspec->np;

	master_cfg = find_identical_smmu_master_cfg(smmu, masterspec);
	if (master_cfg) {
		master->cfg = master_cfg;
		return insert_smmu_master(smmu, master);
	}

	/* Make a new master_cfg */
	master_cfg = devm_kzalloc(smmu->dev, sizeof(*master_cfg), GFP_KERNEL);
	if (!master_cfg) {
		kfree(master);
		return -ENOMEM;
	}

	master->cfg = master_cfg;
	master->cfg->num_streamids = masterspec->args_count;
	for (i = 0; i < master->cfg->num_streamids; ++i) {
		u16 streamid = masterspec->args[i];

		if (!(smmu->features & ARM_SMMU_FEAT_STREAM_MATCH) &&
		     (streamid >= smmu->num_mapping_groups)) {
			dev_err(dev,
				"stream ID for master device %s greater than maximum allowed (%d)\n",
				masterspec->np->name, smmu->num_mapping_groups);
			return -ERANGE;
		}
		master->cfg->streamids[i] = streamid;
	}

	return insert_smmu_master(smmu, master);
}

static struct arm_smmu_device *find_smmu_for_device(struct device *dev)
{
	struct arm_smmu_device *smmu;
	struct arm_smmu_master *master = NULL;
	struct device_node *dev_node = dev_get_dev_node(dev);

	spin_lock(&arm_smmu_devices_lock);
	list_for_each_entry(smmu, &arm_smmu_devices, list) {
		master = find_smmu_master(smmu, dev_node);
		if (master)
			break;
	}
	spin_unlock(&arm_smmu_devices_lock);

	return master ? smmu : NULL;
}

static int __arm_smmu_alloc_bitmap(unsigned long *map, int start, int end)
{
	int idx;

	do {
		idx = find_next_zero_bit(map, end, start);
		if (idx == end)
			return -ENOSPC;
	} while (test_and_set_bit(idx, map));

	return idx;
}

static void __arm_smmu_free_bitmap(unsigned long *map, int idx)
{
	clear_bit(idx, map);
}

/* Wait for any pending TLB invalidations to complete */
static void arm_smmu_tlb_sync_wait_for_complete(struct arm_smmu_device *smmu,
		void __iomem *gr0_base)
{
	int count = 0;

	while (readl_relaxed(gr0_base + ARM_SMMU_GR0_sTLBGSTATUS)
			& sTLBGSTATUS_GSACTIVE) {
		cpu_relax();
		if (++count == TLB_LOOP_TIMEOUT) {
			dev_err_ratelimited(smmu->dev,
			"TLB sync timed out -- SMMU may be deadlocked\n");
			return;
		}
		udelay(1);
	}
}

static void arm_smmu_cb_tlb_sync_wait_for_complete(struct arm_smmu_device *smmu,
		void __iomem *base)
{
	int count = 0;

	while (readl_relaxed(base + ARM_SMMU_CB_TLBSTATUS)
			& sTLBGSTATUS_GSACTIVE) {
		cpu_relax();
		if (++count == TLB_LOOP_TIMEOUT) {
			dev_err_ratelimited(smmu->dev,
			"TLB sync timed out -- SMMU may be deadlocked\n");
			return;
		}
		udelay(1);
	}
}

static void arm_smmu_cb_tlb_sync(struct arm_smmu_domain *smmu_domain, bool iso_client)
{
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	void __iomem *base;
	uint64_t offset;
	int smmu_id = 0;

	base = ARM_SMMU_CB_BASE(smmu) + ARM_SMMU_CB(smmu, cfg->cbndx);

	writel_relaxed_iso(0, base + ARM_SMMU_CB_TLBSYNC, iso_client);
	offset = abs(base - smmu_handle->base[0]);

	if (iso_client) {
		if (smmu_handle->iso_smmu_id < 0)
			return;
		base = smmu->base[smmu->iso_smmu_id] + offset;
		arm_smmu_cb_tlb_sync_wait_for_complete(smmu, base);
		return;
	}

	while (smmu_id < smmu->num_smmus) {
		if (smmu_id != smmu->iso_smmu_id) {
			base = smmu->base[smmu_id] + offset;
			arm_smmu_cb_tlb_sync_wait_for_complete(smmu, base);
		}
		smmu_id++;
	}

}

static void arm_smmu_tlb_sync(struct arm_smmu_device *smmu, bool iso_client)
{
	int smmu_id = 0;
	void __iomem *gr0_base = ARM_SMMU_GR0(smmu);
	u32 gr0_offset = abs(gr0_base - smmu->base[0]);

	if (tegra_platform_is_sim() || arm_smmu_gr0_tlbiallnsnh)
		writel_relaxed_iso(0, gr0_base + ARM_SMMU_GR0_TLBIALLNSNH,
					iso_client);

	writel_relaxed_iso(0, gr0_base + ARM_SMMU_GR0_sTLBGSYNC, iso_client);

	if (iso_client) {
		if (smmu_handle->iso_smmu_id < 0)
			return;
		gr0_base = smmu->base[smmu->iso_smmu_id] + gr0_offset;
		arm_smmu_tlb_sync_wait_for_complete(smmu, gr0_base);
		return;
	}

	while (smmu_id < smmu->num_smmus) {
		if (smmu_id != smmu->iso_smmu_id) {
			gr0_base = smmu->base[smmu_id] + gr0_offset;
			arm_smmu_tlb_sync_wait_for_complete(smmu, gr0_base);
		}
		smmu_id++;
	}
}

static void arm_smmu_tlb_inv_context(struct arm_smmu_domain *smmu_domain)
{
	u64 time_before = 0;
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	void __iomem *base;
	bool stage1 = cfg->cbar != CBAR_TYPE_S2_TRANS;
	bool do_cb_inval_sync = false;

#ifdef CONFIG_TRACEPOINTS
	if (static_key_false(&__tracepoint_arm_smmu_tlb_inv_context.key)
		&& test_bit(cfg->cbndx, smmu->context_filter))
		time_before = local_clock();
#endif

	if (stage1) {
		base = ARM_SMMU_CB_BASE(smmu) + ARM_SMMU_CB(smmu, cfg->cbndx);
		writel_relaxed_cfg_iso(ARM_SMMU_CB_ASID(cfg),
			       base + ARM_SMMU_CB_S1_TLBIASID,
			       cfg);
		if (!tegra_platform_is_sim())
			do_cb_inval_sync = true;
	} else {
		base = ARM_SMMU_GR0(smmu);
		writel_relaxed_cfg_iso(ARM_SMMU_CB_VMID(cfg),
			       base + ARM_SMMU_GR0_TLBIVMID,
			       cfg);
	}

	if (do_cb_inval_sync) {
		if (cfg->iso_client_count)
			arm_smmu_cb_tlb_sync(smmu_domain, 1);

		if (cfg->non_iso_client_count)
			arm_smmu_cb_tlb_sync(smmu_domain, 0);
	} else {
		if (cfg->iso_client_count)
			arm_smmu_tlb_sync(smmu, 1);

		if (cfg->non_iso_client_count)
			arm_smmu_tlb_sync(smmu, 0);
	}

	if (time_before)
		trace_arm_smmu_tlb_inv_context(time_before, cfg->cbndx);
}

static void __arm_smmu_tlb_inv_range(struct arm_smmu_domain *smmu_domain,
				     unsigned long iova)
{
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	bool stage1 = cfg->cbar != CBAR_TYPE_S2_TRANS;
	void __iomem *reg;

	if (stage1) {
		reg = ARM_SMMU_CB_BASE(smmu) + ARM_SMMU_CB(smmu, cfg->cbndx);
		reg += ARM_SMMU_CB_S1_TLBIVA;
		iova >>= 12;
		iova |= (u64)ARM_SMMU_CB_ASID(cfg) << 48;
		writeq_relaxed_cfg_iso(iova, reg, cfg);
	} else if (smmu->version == ARM_SMMU_V2) {
		reg = ARM_SMMU_CB_BASE(smmu) + ARM_SMMU_CB(smmu, cfg->cbndx);
		reg += ARM_SMMU_CB_S2_TLBIIPAS2;
		writeq_relaxed_cfg_iso(iova >> 12, reg, cfg);
	} else {
		reg = ARM_SMMU_GR0(smmu) + ARM_SMMU_GR0_TLBIVMID;
		writel_relaxed_cfg_iso(ARM_SMMU_CB_VMID(cfg), reg,
					cfg);
	}
}

static void arm_smmu_tlb_inv_range(struct arm_smmu_domain *smmu_domain,
				   unsigned long iova, size_t size)
{
	int i;
	u64 time_before = 0;
	unsigned long iova_orig = iova;
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	bool stage1 = cfg->cbar != CBAR_TYPE_S2_TRANS;

#ifdef CONFIG_TRACEPOINTS
	if (static_key_false(&__tracepoint_arm_smmu_tlb_inv_range.key)
		&& test_bit(cfg->cbndx, smmu->context_filter))
		time_before = local_clock();
#endif

	for (i = 0; i < size / PAGE_SIZE; i++) {
		__arm_smmu_tlb_inv_range(smmu_domain, iova);
		iova += PAGE_SIZE;
	}

	if (!tegra_platform_is_sim() &&
	    (stage1 || smmu->version == ARM_SMMU_V2)) {
		if (cfg->iso_client_count)
			arm_smmu_cb_tlb_sync(smmu_domain, 1);

		if (cfg->non_iso_client_count)
			arm_smmu_cb_tlb_sync(smmu_domain, 0);
	} else {
		if (cfg->iso_client_count)
			arm_smmu_tlb_sync(smmu, 1);

		if (cfg->non_iso_client_count)
			arm_smmu_tlb_sync(smmu, 0);
	}

	if (time_before)
		trace_arm_smmu_tlb_inv_range(time_before, cfg->cbndx,
			iova_orig, size);
}

static irqreturn_t __arm_smmu_context_fault(int irq, void *dev,
				void __iomem *cb_base, void __iomem *gr1_base,
				int smmu_id)
{
	int flags, ret, sid;
	u32 fsr, far, fsynr, fsynra, resume;
	unsigned long iova;
	struct iommu_domain *domain = dev;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	struct arm_smmu_device *smmu = smmu_domain->smmu;

	cb_base = cb_base + ARM_SMMU_CB(smmu, cfg->cbndx);
	fsr = readl_relaxed(cb_base + ARM_SMMU_CB_FSR);

	if (!(fsr & FSR_FAULT))
		return IRQ_NONE;

	if (fsr & FSR_IGN)
		dev_err_ratelimited(smmu->dev,
				    "Unexpected context fault (fsr 0x%x) smmu%d\n",
				    fsr, smmu_id);

	fsynr = readl_relaxed(cb_base + ARM_SMMU_CB_FSYNR0);
	fsynra = readl_relaxed(gr1_base + ARM_SMMU_GR1_FRSYNRA(cfg->cbndx));
	flags = fsynr & FSYNR0_WNR ? IOMMU_FAULT_WRITE : IOMMU_FAULT_READ;

	far = readl_relaxed(cb_base + ARM_SMMU_CB_FAR_LO);
	iova = far;
#ifdef CONFIG_64BIT
	far = readl_relaxed(cb_base + ARM_SMMU_CB_FAR_HI);
	iova |= ((unsigned long)far << 32);
#endif
	sid = (fsynra & FRSYNRA_STREAMID_MASK) >> FRSYNRA_STREAMID_SHIFT;
	sid &= 0x7f; /* Tegra hack. Why are the top 9-bits not RAZ? */

	if (!report_iommu_fault(domain, smmu->dev, iova, flags)) {
		ret = IRQ_HANDLED;
		resume = RESUME_RETRY;
	} else {
		pgdval_t pgd;
		pudval_t pud;
		pmdval_t pmd;
		pteval_t pte;

		get_pte_info(cfg, iova, &pgd, &pud, &pmd, &pte);

		dev_err_ratelimited(smmu->dev,
			"Unhandled context fault: smmu%d, iova=0x%08lx, fsynr=0x%x, "
			"cb=%d, sid=%d(0x%x - %s), pgd=%llx, pud=%llx, "
			"pmd=%llx, pte=%llx\n", smmu_id, iova, fsynr, cfg->cbndx,
			sid, sid, tegra_mc_get_sid_name(sid), pgd,
			pud, pmd, pte);
		ret = IRQ_NONE;
		resume = RESUME_TERMINATE;
	}

	/* Clear the faulting FSR */
	writel_single(fsr, cb_base + ARM_SMMU_CB_FSR);

	/* Retry or terminate any stalled transactions */
	if (fsr & FSR_SS)
		writel_relaxed_single(resume, cb_base + ARM_SMMU_CB_RESUME);

	return ret;
}

static irqreturn_t arm_smmu_context_fault(int irq, void *dev)
{
	int i;
	struct arm_smmu_device *smmu = dev;
	bool fault_handled = false;

	for (i = 0; i < smmu->num_context_banks; i++) {
		void __iomem *cb_base, *gr1;
		struct iommu_domain *domain;
		u32 fsr, fsr_offset, cb_offset, gr1_offset;
		int smmu_id = 0;

		cb_base = ARM_SMMU_CB_BASE(smmu);
		cb_offset = abs(cb_base - smmu->base[0]);
		fsr_offset = ARM_SMMU_CB(smmu, i) + ARM_SMMU_CB_FSR;
		gr1_offset = abs(ARM_SMMU_GR1(smmu) - smmu->base[0]);

		while (smmu_id < smmu->num_smmus) {
			cb_base = smmu->base[smmu_id] + cb_offset;
			gr1 = smmu->base[smmu_id] + gr1_offset;

			fsr = readl_relaxed(cb_base + fsr_offset);
			if (fsr & FSR_FAULT) {
				domain = iommu_domains[i];
				if (!domain) {
					pr_err("%s: smmu%d domain(%d) doesn't exist\n",
					       __func__, smmu_id, i);
					continue;
				}
				__arm_smmu_context_fault(irq, domain,
								cb_base, gr1, smmu_id);
				fault_handled = true;
			}
			smmu_id++;
		}
	}
	if (fault_handled)
		return IRQ_HANDLED;
	else
		return IRQ_NONE;
}

static void arm_smmu_global_fault_printinfo(struct arm_smmu_device *smmu,
				void __iomem *gr0_base, int smmu_id)
{
	int sid;
	u64 gfar;
	u32 gfsr, gfsynr0, gfsynr1, gfsynr2;

	gfsr = readl_relaxed(gr0_base + ARM_SMMU_GR0_sGFSR);
	gfsynr0 = readl_relaxed(gr0_base + ARM_SMMU_GR0_sGFSYNR0);
	gfsynr1 = readl_relaxed(gr0_base + ARM_SMMU_GR0_sGFSYNR1);
	gfsynr2 = readl_relaxed(gr0_base + ARM_SMMU_GR0_sGFSYNR2);
	gfar = readq_relaxed(gr0_base + ARM_SMMU_GR0_sGFAR);
	sid = gfsynr1 & 0xFF;

	dev_err_ratelimited(smmu->dev,
		"SMMU%d: Unexpected {global,context} fault, this could be serious\n", smmu_id);
	dev_err_ratelimited(smmu->dev,
		"\tGFSR 0x%08x, GFSYNR0 0x%08x, GFSYNR1 0x%08x, GFSYNR2 0x%08x, "
		"fault_addr=0x%llx, sid=%d(0x%x - %s)\n",
		gfsr, gfsynr0, gfsynr1, gfsynr2, gfar, sid, sid, tegra_mc_get_sid_name(sid));

	writel_single(gfsr, gr0_base + ARM_SMMU_GR0_sGFSR);
}

static irqreturn_t arm_smmu_global_fault(int irq, void *dev)
{
	u32 gfsr, gr0_offset, cb_offset;
	struct arm_smmu_device *smmu = dev;
	void __iomem *cb_base = ARM_SMMU_CB_BASE(smmu);
	void __iomem *gr0_base = ARM_SMMU_GR0_NS(smmu);
	int smmu_id = 0;
	bool fault_handled = false;

	cb_offset = abs(cb_base - smmu->base[0]);
	gr0_offset = abs(gr0_base - smmu->base[0]);

	while (smmu_id < smmu->num_smmus) {

		gr0_base = smmu->base[smmu_id] + gr0_offset;
		cb_base = smmu->base[smmu_id] + cb_offset;

		gfsr = readl_relaxed(gr0_base + ARM_SMMU_GR0_sGFSR);
		if (gfsr) {
			arm_smmu_global_fault_printinfo(smmu, gr0_base, smmu_id);
			fault_handled = true;
		} else {
			int ret;

			ret = arm_smmu_context_fault(irq, dev);
			if (ret == IRQ_HANDLED)
				fault_handled = true;
		}
		smmu_id++;
	}

	if (fault_handled) {
		return IRQ_HANDLED;
	} else {
		pr_err("No fault found! But SMMU fault irq occured.");
		return IRQ_NONE;
	}
}

static void arm_smmu_flush_pgtable(struct arm_smmu_device *smmu, void *addr,
				   size_t size)
{
	unsigned long offset = (unsigned long)addr & ~PAGE_MASK;


	/* Ensure new page tables are visible to the hardware walker */
	if (smmu->features & ARM_SMMU_FEAT_COHERENT_WALK) {
		dsb(ishst);
	} else {
		/*
		 * If the SMMU can't walk tables in the CPU caches, treat them
		 * like non-coherent DMA since we need to flush the new entries
		 * all the way out to memory. There's no possibility of
		 * recursion here as the SMMU table walker will not be wired
		 * through another SMMU.
		 */
		dma_map_page(smmu->dev, virt_to_page(addr), offset, size,
				DMA_TO_DEVICE);
	}
}

static void arm_smmu_init_context_bank(struct arm_smmu_domain *smmu_domain)
{
	u32 reg;
	bool stage1;
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	void __iomem *cb_base, *gr0_base, *gr1_base;

	gr0_base = ARM_SMMU_GR0(smmu);
	gr1_base = ARM_SMMU_GR1(smmu);
	stage1 = cfg->cbar != CBAR_TYPE_S2_TRANS;
	cb_base = ARM_SMMU_CB_BASE(smmu) + ARM_SMMU_CB(smmu, cfg->cbndx);

	/* CBAR */
	reg = cfg->cbar;
	if (smmu->version == ARM_SMMU_V1)
		reg |= cfg->irptndx << CBAR_IRPTNDX_SHIFT;

	/*
	 * Use the weakest shareability/memory types, so they are
	 * overridden by the ttbcr/pte.
	 */
	if (stage1) {
		reg |= (CBAR_S1_BPSHCFG_NSH << CBAR_S1_BPSHCFG_SHIFT) |
			(CBAR_S1_MEMATTR_WB << CBAR_S1_MEMATTR_SHIFT);
	} else {
		reg |= ARM_SMMU_CB_VMID(cfg) << CBAR_VMID_SHIFT;
	}
	writel_relaxed(reg, gr1_base + ARM_SMMU_GR1_CBAR(cfg->cbndx));

	if (smmu->version > ARM_SMMU_V1) {
		/* CBA2R */
#ifdef CONFIG_64BIT
		reg = CBA2R_RW64_64BIT;
#else
		reg = CBA2R_RW64_32BIT;
#endif
		writel_relaxed(reg,
			       gr1_base + ARM_SMMU_GR1_CBA2R(cfg->cbndx));

		/* TTBCR2 */
		switch (smmu->s1_input_size) {
		case 32:
			reg = (TTBCR2_ADDR_32 << TTBCR2_SEP_SHIFT);
			break;
		case 36:
			reg = (TTBCR2_ADDR_36 << TTBCR2_SEP_SHIFT);
			break;
		case 39:
		case 40:
			reg = (TTBCR2_ADDR_40 << TTBCR2_SEP_SHIFT);
			break;
		case 42:
			reg = (TTBCR2_ADDR_42 << TTBCR2_SEP_SHIFT);
			break;
		case 44:
			reg = (TTBCR2_ADDR_44 << TTBCR2_SEP_SHIFT);
			break;
		case 48:
			reg = (TTBCR2_ADDR_48 << TTBCR2_SEP_SHIFT);
			break;
		}

		switch (smmu->s1_output_size) {
		case 32:
			reg |= (TTBCR2_ADDR_32 << TTBCR2_PASIZE_SHIFT);
			break;
		case 36:
			reg |= (TTBCR2_ADDR_36 << TTBCR2_PASIZE_SHIFT);
			break;
		case 39:
		case 40:
			reg |= (TTBCR2_ADDR_40 << TTBCR2_PASIZE_SHIFT);
			break;
		case 42:
			reg |= (TTBCR2_ADDR_42 << TTBCR2_PASIZE_SHIFT);
			break;
		case 44:
			reg |= (TTBCR2_ADDR_44 << TTBCR2_PASIZE_SHIFT);
			break;
		case 48:
			reg |= (TTBCR2_ADDR_48 << TTBCR2_PASIZE_SHIFT);
			break;
		}

		if (stage1)
			writel_relaxed(reg, cb_base + ARM_SMMU_CB_TTBCR2);
	}

	/* TTBR0 */
	arm_smmu_flush_pgtable(smmu, cfg->pgd,
			       PTRS_PER_PGD * sizeof(pgd_t));
	reg = __pa(cfg->pgd);
	writel_relaxed(reg, cb_base + ARM_SMMU_CB_TTBR0_LO);
	reg = (phys_addr_t)__pa(cfg->pgd) >> 32;
	if (stage1)
		reg |= ARM_SMMU_CB_ASID(cfg) << TTBRn_HI_ASID_SHIFT;
	writel_relaxed(reg, cb_base + ARM_SMMU_CB_TTBR0_HI);

	/*
	 * TTBCR
	 * We use long descriptor, with inner-shareable WBWA tables in TTBR0.
	 */
	if (smmu->version > ARM_SMMU_V1) {
		if (PAGE_SIZE == SZ_4K)
			reg = TTBCR_TG0_4K;
		else
			reg = TTBCR_TG0_64K;

		if (!stage1) {
			reg |= (64 - smmu->s2_input_size) << TTBCR_T0SZ_SHIFT;

			switch (smmu->s2_output_size) {
			case 32:
				reg |= (TTBCR2_ADDR_32 << TTBCR_PASIZE_SHIFT);
				break;
			case 36:
				reg |= (TTBCR2_ADDR_36 << TTBCR_PASIZE_SHIFT);
				break;
			case 40:
				reg |= (TTBCR2_ADDR_40 << TTBCR_PASIZE_SHIFT);
				break;
			case 42:
				reg |= (TTBCR2_ADDR_42 << TTBCR_PASIZE_SHIFT);
				break;
			case 44:
				reg |= (TTBCR2_ADDR_44 << TTBCR_PASIZE_SHIFT);
				break;
			case 48:
				reg |= (TTBCR2_ADDR_48 << TTBCR_PASIZE_SHIFT);
				break;
			}
		} else {
			reg |= (64 - smmu->s1_input_size) << TTBCR_T0SZ_SHIFT;
		}
	} else {
		reg = 0;
	}

	reg |= TTBCR_EAE |
	      (TTBCR_SH_IS << TTBCR_SH0_SHIFT) |
	      (TTBCR_RGN_WBWA << TTBCR_ORGN0_SHIFT) |
	      (TTBCR_RGN_WBWA << TTBCR_IRGN0_SHIFT);

	if (!stage1)
		reg |= (TTBCR_SL0_LVL_1 << TTBCR_SL0_SHIFT);

	writel_relaxed(reg, cb_base + ARM_SMMU_CB_TTBCR);

	/* MAIR0 (stage-1 only) */
	if (stage1) {
		reg = (MAIR_ATTR_NC << MAIR_ATTR_SHIFT(MAIR_ATTR_IDX_NC)) |
		    (MAIR_ATTR_WBRWA << MAIR_ATTR_SHIFT(MAIR_ATTR_IDX_CACHE)) |
		    (MAIR_ATTR_DEVICE << MAIR_ATTR_SHIFT(MAIR_ATTR_IDX_DEV));
		writel_relaxed(reg, cb_base + ARM_SMMU_CB_S1_MAIR0);
	}

	/* SCTLR */
	reg = SCTLR_CFIE | SCTLR_CFRE | SCTLR_M | SCTLR_EAE_SBOP | SCTLR_HUPCF;
	if (stage1)
		reg |= SCTLR_S1_ASIDPNE;
#ifdef __BIG_ENDIAN
	reg |= SCTLR_E;
#endif
	writel_relaxed(reg, cb_base + ARM_SMMU_CB_SCTLR);
}

static int arm_smmu_init_domain_context(struct iommu_domain *domain,
					struct arm_smmu_device *smmu)
{
	int irq, start, ret = 0;
	unsigned long flags;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;

	spin_lock_irqsave(&smmu_domain->lock, flags);
	if (smmu_domain->smmu)
		goto out_unlock;

	if (smmu->features & ARM_SMMU_FEAT_TRANS_NESTED) {
		/*
		 * We will likely want to change this if/when KVM gets
		 * involved.
		 */
		cfg->cbar = CBAR_TYPE_S1_TRANS_S2_BYPASS;
		start = smmu->num_s2_context_banks;
	} else if (smmu->features & ARM_SMMU_FEAT_TRANS_S1) {
		cfg->cbar = CBAR_TYPE_S1_TRANS_S2_BYPASS;
		start = smmu->num_s2_context_banks;
	} else {
		cfg->cbar = CBAR_TYPE_S2_TRANS;
		start = 0;
	}

	ret = __arm_smmu_alloc_bitmap(smmu->context_map, start,
				      smmu->num_context_banks);
	if (ret < 0)
		goto out_unlock;

	cfg->cbndx = ret;
	if (smmu->version == ARM_SMMU_V1) {
		cfg->irptndx = atomic_inc_return(&smmu->irptndx);
		cfg->irptndx %= smmu->num_context_irqs;
	} else if (smmu->num_context_banks == smmu->num_context_irqs) {
		cfg->irptndx = cfg->cbndx;
	} else {
		cfg->irptndx = 0;
	}

	cfg->iso_client_count = 0;
	cfg->non_iso_client_count = 0;

	ACCESS_ONCE(smmu_domain->smmu) = smmu;
	arm_smmu_init_context_bank(smmu_domain);
	spin_unlock_irqrestore(&smmu_domain->lock, flags);

	if (smmu->num_context_irqs) {

		irq = smmu->irqs[smmu->num_global_irqs + cfg->irptndx];
		ret = request_irq(irq, arm_smmu_context_fault, IRQF_SHARED,
			  "arm-smmu-context-fault", domain);
		if (ret < 0) {
			dev_err(smmu->dev,
				"failed to request context IRQ %d (%u)\n",
				cfg->irptndx, irq);
			cfg->irptndx = INVALID_IRPTNDX;
		}
	}

	BUG_ON(iommu_domains[cfg->cbndx]);
	iommu_domains[cfg->cbndx] = domain;
	return 0;

out_unlock:
	spin_unlock_irqrestore(&smmu_domain->lock, flags);
	return ret;
}

static void arm_smmu_destroy_domain_context(struct iommu_domain *domain)
{
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	void __iomem *cb_base;
	int irq;

	if (!smmu)
		return;

	/* Disable the context bank and nuke the TLB before freeing it. */
	cb_base = ARM_SMMU_CB_BASE(smmu) + ARM_SMMU_CB(smmu, cfg->cbndx);
	writel_relaxed(0, cb_base + ARM_SMMU_CB_SCTLR);
	arm_smmu_tlb_inv_context(smmu_domain);

	if ((smmu->num_context_irqs) &&
		(cfg->irptndx != INVALID_IRPTNDX)) {
		irq = smmu->irqs[smmu->num_global_irqs + cfg->irptndx];
		free_irq(irq, domain);
	}

	__arm_smmu_free_bitmap(smmu->context_map, cfg->cbndx);
	iommu_domains[cfg->cbndx] = NULL;
}

static int arm_smmu_get_hwid(struct iommu_domain *domain,
			     struct device *dev, unsigned int id)
{
	struct arm_smmu_master_cfg *cfg;

	cfg = find_smmu_master_cfg(dev);
	if (!cfg)
		return -EINVAL;

	if (id >= cfg->num_streamids)
		return -EINVAL;

	return cfg->streamids[id];
}

static struct iommu_domain *arm_smmu_domain_alloc(unsigned type)
{
	struct arm_smmu_domain *smmu_domain;
	pgd_t *pgd;
	unsigned int order;

	/*
	 * Allocate the domain and initialise some of its data structures.
	 * We can't really do anything meaningful until we've added a
	 * master.
	 */
	smmu_domain = kzalloc(sizeof(*smmu_domain), GFP_KERNEL);
	if (!smmu_domain)
		return NULL;

	order = get_order(PTRS_PER_PGD * sizeof(pgd_t));
	pgd = (pgd_t *)__get_free_pages(GFP_KERNEL | __GFP_ZERO, order);
	if (!pgd)
		goto out_free_domain;

	smmu_domain->cfg.pgd = pgd;

	spin_lock_init(&smmu_domain->lock);

	/*
	 * Our arm-smmu driver can handle any size page by breaking
	 * it up into 4Kb and 4Mb chunks. We would like the iommu
	 * framework to pass us largest pages possible for performance
	 * reasons, so set all pgsize_bitmap bits.
	 */
	smmu_domain->domain.pgsize_bitmap = ALL_PGSIZES_BITMAP;

#if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 9, 0)
	if (iommu_get_dma_cookie(&smmu_domain->domain))
		goto out_free_domain;
#endif

	return &smmu_domain->domain;

out_free_domain:
	kfree(smmu_domain);
	return NULL;
}

static void arm_smmu_free_ptes(pmd_t *pmd)
{
	pgtable_t table = pmd_pgtable(*pmd);

	__free_page(table);
}

static void arm_smmu_free_pmds(pud_t *pud)
{
	int i;
	pmd_t *pmd, *pmd_base = pmd_offset(pud, 0);

	pmd = pmd_base;
	for (i = 0; i < PTRS_PER_PMD; ++i) {
		if (pmd_none(*pmd))
			continue;

		arm_smmu_free_ptes(pmd);
		pmd++;
	}

	pmd_free(NULL, pmd_base);
}

static void arm_smmu_free_puds(pgd_t *pgd)
{
	int i;
	pud_t *pud, *pud_base = pud_offset(pgd, 0);

	pud = pud_base;
	for (i = 0; i < PTRS_PER_PUD; ++i) {
		if (pud_none(*pud))
			continue;

		arm_smmu_free_pmds(pud);
		pud++;
	}

	pud_free(NULL, pud_base);
}

static void arm_smmu_free_pgtables(struct arm_smmu_domain *smmu_domain)
{
	int i;
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	pgd_t *pgd, *pgd_base = cfg->pgd;
	unsigned long order;

	/*
	 * Recursively free the page tables for this domain. We don't
	 * care about speculative TLB filling because the tables should
	 * not be active in any context bank at this point (SCTLR.M is 0).
	 */
	pgd = pgd_base;
	for (i = 0; i < PTRS_PER_PGD; ++i) {
		if (pgd_none(*pgd))
			continue;
		arm_smmu_free_puds(pgd);
		pgd++;
	}

	order = get_order(PTRS_PER_PGD * sizeof(pgd_t));
	free_pages((unsigned long)pgd_base, order);
}

static void arm_smmu_domain_free(struct iommu_domain *domain)
{
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);

	/*
	 * Free the domain resources. We assume that all devices have
	 * already been detached.
	 */
#if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 9, 0)
	iommu_put_dma_cookie(domain);
#endif
	arm_smmu_destroy_domain_context(domain);
	arm_smmu_free_pgtables(smmu_domain);
	kfree(smmu_domain);
}

static int arm_smmu_master_configure_smrs(struct arm_smmu_device *smmu,
					  struct arm_smmu_master_cfg *cfg)
{
	int i;
	struct arm_smmu_smr *smrs;
	void __iomem *gr0_base = ARM_SMMU_GR0(smmu);

	if (!(smmu->features & ARM_SMMU_FEAT_STREAM_MATCH))
		return 0;

	if (cfg->smrs) {
		pr_debug("%s() cfg->smrs=%p exists\n", __func__, cfg->smrs);
		return -EEXIST;
	}

	smrs = kmalloc_array(cfg->num_streamids, sizeof(*smrs), GFP_KERNEL);
	if (!smrs)
		return -ENOMEM;

	/* Allocate the SMRs on the SMMU */
	for (i = 0; i < cfg->num_streamids; ++i) {
		int idx = __arm_smmu_alloc_bitmap(smmu->smr_map, 0,
						  smmu->num_mapping_groups);
		if (idx < 0) {
			dev_err(smmu->dev, "failed to allocate free SMR\n");
			goto err_free_smrs;
		}

		smrs[i] = (struct arm_smmu_smr) {
			.idx	= idx,
			.mask	= SMR_ID_MASK,
			.id	= cfg->streamids[i],
		};
	}

	/* It worked! Now, poke the actual hardware */
	for (i = 0; i < cfg->num_streamids; ++i) {
		u32 reg = SMR_VALID | smrs[i].id << SMR_ID_SHIFT |
			  smrs[i].mask << SMR_MASK_SHIFT;
		writel_relaxed(reg, gr0_base + ARM_SMMU_GR0_SMR(smrs[i].idx));
	}

	cfg->smrs = smrs;
	pr_debug("%s() set cfg->smrs=%p\n", __func__, cfg->smrs);
	return 0;

err_free_smrs:
	while (--i >= 0)
		__arm_smmu_free_bitmap(smmu->smr_map, smrs[i].idx);
	kfree(smrs);
	return -ENOSPC;
}

static void arm_smmu_master_free_smrs(struct arm_smmu_device *smmu,
				      struct arm_smmu_master_cfg *cfg)
{
	int i;
	void __iomem *gr0_base = ARM_SMMU_GR0(smmu);
	struct arm_smmu_smr *smrs = cfg->smrs;

	if (!smrs)
		return;

	/* Invalidate the SMRs before freeing back to the allocator */
	for (i = 0; i < cfg->num_streamids; ++i) {
		u8 idx = smrs[i].idx;

		writel_relaxed(~SMR_VALID, gr0_base + ARM_SMMU_GR0_SMR(idx));
		__arm_smmu_free_bitmap(smmu->smr_map, idx);
	}

	cfg->smrs = NULL;
	kfree(smrs);
}

static int arm_smmu_domain_add_master(struct arm_smmu_domain *smmu_domain,
				      struct arm_smmu_master_cfg *cfg)
{
	int i, ret;
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	void __iomem *gr0_base = ARM_SMMU_GR0(smmu);

	/* Devices in an IOMMU group may already be configured */
	ret = arm_smmu_master_configure_smrs(smmu, cfg);
	if (ret)
		return ret == -EEXIST ? 0 : ret;

	for (i = 0; i < cfg->num_streamids; ++i) {
		u32 idx, s2cr;

		idx = cfg->smrs ? cfg->smrs[i].idx : cfg->streamids[i];
		s2cr = S2CR_TYPE_TRANS |
		       (smmu_domain->cfg.cbndx << S2CR_CBNDX_SHIFT);
		writel_relaxed(s2cr, gr0_base + ARM_SMMU_GR0_S2CR(idx));
	}

	return 0;
}

static void arm_smmu_domain_remove_master(struct arm_smmu_domain *smmu_domain,
					  struct arm_smmu_master_cfg *cfg)
{
	int i;
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	void __iomem *gr0_base = ARM_SMMU_GR0(smmu);

	/* An IOMMU group is torn down by the first device to be removed */
	if ((smmu->features & ARM_SMMU_FEAT_STREAM_MATCH) && !cfg->smrs)
		return;

	/*
	 * We *must* clear the S2CR first, because freeing the SMR means
	 * that it can be re-allocated immediately.
	 */
	for (i = 0; i < cfg->num_streamids; ++i) {
		u32 idx = cfg->smrs ? cfg->smrs[i].idx : cfg->streamids[i];

		writel_relaxed(S2CR_TYPE_BYPASS,
			       gr0_base + ARM_SMMU_GR0_S2CR(idx));
	}

	arm_smmu_master_free_smrs(smmu, cfg);
}

static int smmu_ptdump_show(struct seq_file *s, void *unused)
{
	struct arm_smmu_domain *smmu_domain = s->private;
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	pgd_t *pgd;
	pud_t *pud;
	pmd_t *pmd;
	pte_t *pte;
	int i, j, k, l;
	unsigned long addr = 0;
	unsigned long mapped = 0;

	pgd = cfg->pgd;
	for (i = 0; i < PTRS_PER_PGD;
		++i, pgd++) {
		if (pgd_none(*pgd)) {
			addr += PGDIR_SIZE;
			continue;
		}
		pud = pud_offset(pgd, addr);
		for (j = 0; j < PTRS_PER_PUD; ++j, pud++) {
			if (pud_none(*pud)) {
				addr += PUD_SIZE;
				continue;
			}
			pmd = pmd_offset(pud, addr);
			for (k = 0; k < PTRS_PER_PMD;
				++k, pmd++) {
				if (pmd_none(*pmd)) {
					addr += PMD_SIZE;
					continue;
				}
				pte = pmd_page_vaddr(*pmd) + pte_index(addr);
				for (l = 0; l < PTRS_PER_PTE;
					++l, pte++, addr += PAGE_SIZE) {
					phys_addr_t pa;

					pa = __pfn_to_phys(pte_pfn(*pte));
					if (!pa)
						continue;
					seq_printf(s,
						   "va=0x%016lx pa=%pap *pte=%pad\n",
						   addr, &pa, &(*pte));
					mapped += PAGE_SIZE;
				}
			}
		}
	}
	seq_printf(s, "total mapped iova=%luKB\n", mapped / SZ_1K);
	return 0;
}

static int smmu_ptdump_open(struct inode *inode, struct file *file)
{
	return single_open(file, smmu_ptdump_show, inode->i_private);
}

static const struct file_operations smmu_ptdump_fops = {
	.open           = smmu_ptdump_open,
	.read           = seq_read,
	.llseek         = seq_lseek,
	.release        = single_release,
};

#define defreg_cb(_name)			\
	{					\
		.name = __stringify(_name),	\
		.offset = ARM_SMMU_CB_ ## _name,\
	}

static const struct debugfs_reg32 arm_smmu_cb_regs[] = {
	defreg_cb(SCTLR),
	defreg_cb(TTBCR2),
	defreg_cb(TTBR0_LO),
	defreg_cb(TTBR0_HI),
	defreg_cb(TTBCR),
	defreg_cb(S1_MAIR0),
	defreg_cb(FSR),
	defreg_cb(FAR_LO),
	defreg_cb(FAR_HI),
	defreg_cb(FSYNR0),
};

static ssize_t smmu_debugfs_iova2phys_write(struct file *file,
					    const char __user *buffer,
					    size_t count, loff_t *pos)
{
	int ret;
	struct iommu_domain *domain = file_inode(file)->i_private;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	char str[] = "0x0123456789abcdef";
	unsigned long flags;
	dma_addr_t tmp;

	count = min_t(size_t, strlen(str), count);
	if (copy_from_user(str, buffer, count))
		return -EINVAL;

	ret = sscanf(str, "0x%16llx", &tmp);
	if (ret != 1)
		return -EINVAL;

	spin_lock_irqsave(&smmu_domain->lock, flags);
	smmu_domain->inquired_iova = tmp;
	smmu_domain->inquired_phys =
		arm_smmu_iova_to_phys(domain, smmu_domain->inquired_iova);
	pr_info("iova=%pa pa=%pa\n",
		&smmu_domain->inquired_iova, &smmu_domain->inquired_phys);
	spin_unlock_irqrestore(&smmu_domain->lock, flags);
	return count;
}

static int smmu_iova2phys_show(struct seq_file *m, void *v)
{
	struct iommu_domain *domain = m->private;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	unsigned long flags;

	spin_lock_irqsave(&smmu_domain->lock, flags);

	seq_printf(m, "iova=%pa pa=%pa\n",
		   &smmu_domain->inquired_iova,
		   &smmu_domain->inquired_phys);

	spin_unlock_irqrestore(&smmu_domain->lock, flags);
	return 0;
}

static int smmu_iova2phys_open(struct inode *inode, struct file *file)
{
	return single_open(file, smmu_iova2phys_show, inode->i_private);
}

static const struct file_operations smmu_iova2phys_fops = {
	.open		= smmu_iova2phys_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
	.write		= smmu_debugfs_iova2phys_write,
};

static void debugfs_create_smmu_cb(struct iommu_domain *domain,
				   struct device *dev)
{
	struct dentry *dent;
	char name[] = "cb000";
	struct debugfs_regset32	*cb;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	u8 cbndx = smmu_domain->cfg.cbndx;
	struct arm_smmu_device *smmu = smmu_domain->smmu;

	sprintf(name, "cb%03d", cbndx);
	dent = debugfs_create_dir(name, smmu->debugfs_root);
	if (!dent)
		return;
	cb = smmu->regset + 1 + cbndx;
	cb->regs = arm_smmu_cb_regs;
	cb->nregs = ARRAY_SIZE(arm_smmu_cb_regs);
	cb->base = smmu->base[0] + (smmu->size >> 1) +
		cbndx * (1 << smmu->pgshift);
	debugfs_create_regset32("regdump", S_IRUGO, dent, cb);
	debugfs_create_file("ptdump", S_IRUGO, dent, smmu_domain,
			    &smmu_ptdump_fops);
	debugfs_create_file("iova_to_phys", S_IRUSR, dent, domain,
			    &smmu_iova2phys_fops);
}

static int smmu_master_show(struct seq_file *s, void *unused)
{
	int i;
	struct arm_smmu_master *master = s->private;

	for (i = 0; i < master->cfg->num_streamids; i++)
		seq_printf(s, "streamids: % 3d ", master->cfg->streamids[i]);
	seq_printf(s, "\n");
	for (i = 0; i < master->cfg->num_streamids; i++)
		seq_printf(s, "smrs:      % 3d ", master->cfg->smrs[i].idx);
	seq_printf(s, "\n");
	return 0;
}

static int smmu_master_open(struct inode *inode, struct file *file)
{
	return single_open(file, smmu_master_show, inode->i_private);
}

static const struct file_operations smmu_master_fops = {
	.open           = smmu_master_open,
	.read           = seq_read,
	.llseek         = seq_lseek,
	.release        = single_release,
};

static void add_smmu_master_debugfs(struct iommu_domain *domain,
				    struct device *dev,
				    struct arm_smmu_master *master)
{
	struct dentry *dent;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	char name[] = "cb000";
	char target[] = "../../cb000";
	u8 cbndx = smmu_domain->cfg.cbndx;

	dent = debugfs_create_dir(dev_name(dev), smmu->masters_root);
	if (!dent)
		return;

	debugfs_create_file("streamids", 0444, dent, master, &smmu_master_fops);
	debugfs_create_u8("cbndx", 0444, dent, &smmu_domain->cfg.cbndx);
	debugfs_create_smmu_cb(domain, dev);
	sprintf(name, "cb%03d", cbndx);
	sprintf(target, "../../cb%03d", cbndx);
	debugfs_create_symlink(name, dent, target);
	master->debugfs_root = dent;
}

static void arm_smmu_do_linear_map(struct device *dev)
{
	struct iommu_linear_map *map = NULL;

	if (iommu_get_linear_map(dev, &map)) {
		int err;
		DEFINE_DMA_ATTRS(attrs);

		if (map->is_mapped)
			return;

		dma_set_attr(DMA_ATTR_SKIP_IOVA_GAP, __DMA_ATTR(attrs));
		dma_set_attr(DMA_ATTR_SKIP_CPU_SYNC, __DMA_ATTR(attrs));

		while (map && map->size) {

			size_t size = PAGE_ALIGN(map->size);

			err = dma_map_linear_attrs(dev, map->start,
						size, 0, __DMA_ATTR(attrs));
			if (err == DMA_ERROR_CODE) {
				dev_err(dev,
					"IOVA linear map %pad(%zx) failed\n",
					&map->start, size);
			} else {
				dev_info(dev,
					"IOVA linear map %pad(%zx)\n",
					&map->start, size);
				map->is_mapped = true;
			}
			map++;
		}
	}
}

static int arm_smmu_attach_dev(struct iommu_domain *domain, struct device *dev)
{
	int ret, i;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	struct arm_smmu_cfg *arm_smmu_cfg = &smmu_domain->cfg;
	struct arm_smmu_device *smmu, *dom_smmu;
	struct arm_smmu_master_cfg *cfg;
	struct device_node *dev_node;
	bool iso_smmu_client = false;

	smmu = find_smmu_for_device(dev);
	if (!smmu) {
		dev_err(dev, "cannot attach to SMMU, is it on the same bus?\n");
		return -ENXIO;
	}

	if (dev->archdata.iommu) {
		dev_err(dev, "already attached to IOMMU domain\n");
		return -EEXIST;
	}

	dev_node = dev_get_dev_node(dev);
	if (of_property_read_bool(dev_node, "iso-smmu")) {
		if (smmu->iso_smmu_id == -1) {
			dev_err(dev,
			    "iso smmu not present so can't enable it for %s\n",
			    dev_name(dev));
			BUG();
			return -EINVAL;
		}
		iso_smmu_client = true;
	}

	/*
	 * Sanity check the domain. We don't support domains across
	 * different SMMUs.
	 */
	dom_smmu = ACCESS_ONCE(smmu_domain->smmu);
	if (!dom_smmu) {
		/* Now that we have a master, we can finalise the domain */
		ret = arm_smmu_init_domain_context(domain, smmu);
		if (ret < 0)
			return ret;

		dom_smmu = smmu_domain->smmu;
	}

	if (dom_smmu != smmu) {
		dev_err(dev,
			"cannot attach to SMMU %s whilst already attached to domain on SMMU %s\n",
			dev_name(smmu_domain->smmu->dev), dev_name(smmu->dev));
		return -EINVAL;
	}

	/* Looks ok, so add the device to the domain */
	cfg = find_smmu_master_cfg(dev);
	if (!cfg)
		return -ENODEV;

#if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 9, 0)
	if (iommu_dma_init_domain(domain,
				domain->geometry.aperture_start,
				domain->geometry.aperture_end -
				domain->geometry.aperture_start, dev))
		pr_err("iommu_dma_init_domain failed, %s\n",
				dev_name(dev));
#endif

	arm_smmu_do_linear_map(dev);

	ret = arm_smmu_domain_add_master(smmu_domain, cfg);
	if (!ret) {
		dev->archdata.iommu = domain;
		add_smmu_master_debugfs(domain, dev,
				find_smmu_master(smmu, dev_get_dev_node(dev)));
	}
	/* Enable stream Id override, which enables SMMU translation for dev */
	for (i = 0; i < cfg->num_streamids; i++)
		platform_override_streamid(cfg->streamids[i]);

	if (iso_smmu_client) {
		pr_info("Adding %s to ISO SMMU client\n", dev_name(dev));
		arm_smmu_cfg->iso_client_count++;
	} else {
		arm_smmu_cfg->non_iso_client_count++;
	}

	if (arm_smmu_cfg->iso_client_count &&
			arm_smmu_cfg->non_iso_client_count)
		pr_warn("%s: Shared context between ISO and non-ISO clients\n",
				dev_name(dev));

	return ret;
}

static void arm_smmu_detach_dev(struct iommu_domain *domain, struct device *dev)
{
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	struct arm_smmu_master_cfg *cfg;

	cfg = find_smmu_master_cfg(dev);
	if (!cfg)
		return;

	dev->archdata.iommu = NULL;
	arm_smmu_domain_remove_master(smmu_domain, cfg);
}

static bool arm_smmu_pte_is_contiguous_range(unsigned long addr,
					unsigned long end, unsigned long phys)
{
	return !(addr & ~ARM_SMMU_PTE_CONT_MASK) &&
		(addr + ARM_SMMU_PTE_CONT_SIZE <= end) &&
		!(phys & ~ARM_SMMU_PTE_CONT_MASK);
}

static void *arm_smmu_alloc_pgtable_page(struct arm_smmu_domain *domain, int lvl,
					void * entry, unsigned long addr)
{
	struct arm_smmu_device *smmu = domain->smmu;
	void * ret = NULL;

	pr_debug("Alloc for address %lx level: %d\n", addr, lvl);

	if (lvl == 0) {
#ifndef __PAGETABLE_PUD_FOLDED
		pgd_t *pgd = (pgd_t *) entry;
		pud_t *pud;

		if (!pgd_none(*pgd)) {
			ret = pud_offset(pgd, adr);
			goto unlock_ret;
		}

		pud = (pud_t *)get_zeroed_page(GFP_ATOMIC);
		if (!pud)
			goto unlock_ret;

		arm_smmu_flush_pgtable(smmu, pud, PAGE_SIZE);
		pgd_populate(NULL, pgd, pud);
		arm_smmu_flush_pgtable(smmu, pgd, sizeof(*pgd));

		ret = pud + pud_index(addr);
		goto unlock_ret;
#else
		goto unlock_ret;
#endif

	} else if (lvl == 1) {
#ifndef __PAGETABLE_PMD_FOLDED
		pud_t *pud = (pud_t *) entry;
		pmd_t *pmd;

		if (!pud_none(*pud)) {
			ret = pmd_offset(pud, addr);
			goto unlock_ret;
		}

		pmd = (pmd_t *) get_zeroed_page(GFP_ATOMIC);
		if (!pmd)
			goto unlock_ret;

		arm_smmu_flush_pgtable(smmu, pmd, PAGE_SIZE);
		pud_populate(NULL, pud, pmd);
		arm_smmu_flush_pgtable(smmu, pud, sizeof(*pud));

		ret = pmd + pmd_index(addr);
		goto unlock_ret;
#else
		goto unlock_ret;
#endif
	} else if (lvl == 2) {
		pmd_t *pmd = (pmd_t *) entry;
		pgtable_t table;

		if (!pmd_none(*pmd)) {
			ret = pmd_page_vaddr(*pmd) + pte_index(addr);
			goto unlock_ret;
		}

		table = alloc_page(GFP_ATOMIC|__GFP_ZERO);
		if (!table)
			goto unlock_ret;

		arm_smmu_flush_pgtable(smmu, page_address(table), PAGE_SIZE);
		pmd_populate(NULL, pmd, table);
		arm_smmu_flush_pgtable(smmu, pmd, sizeof(*pmd));

		ret = table;
		goto unlock_ret;
	}

unlock_ret:
	return ret;
}

static int arm_smmu_alloc_init_pte(struct arm_smmu_domain *domain, pmd_t *pmd,
				   unsigned long addr, unsigned long end,
				   unsigned long pfn, int prot, int stage)
{
	pte_t *pte, *start;
	struct arm_smmu_device *smmu = domain->smmu;
	pteval_t pteval = ARM_SMMU_PTE_PAGE | ARM_SMMU_PTE_AF | ARM_SMMU_PTE_XN;

	if (pmd_none(*pmd)) {
		/* Allocate a new set of tables */
		pgtable_t table = (pgtable_t) arm_smmu_alloc_pgtable_page(
							domain, 2, pmd, addr);
		if (!table)
			return -ENOMEM;
	}

	if (stage == 1) {
		pteval |= ARM_SMMU_PTE_AP_UNPRIV | ARM_SMMU_PTE_nG;
		if (!(prot & IOMMU_WRITE) && (prot & IOMMU_READ))
			pteval |= ARM_SMMU_PTE_AP_RDONLY;

		if (prot & IOMMU_CACHE)
			pteval |= (MAIR_ATTR_IDX_CACHE <<
				   ARM_SMMU_PTE_ATTRINDX_SHIFT);
	} else {
		pteval |= ARM_SMMU_PTE_HAP_FAULT;
		if (prot & IOMMU_READ)
			pteval |= ARM_SMMU_PTE_HAP_READ;
		if (prot & IOMMU_WRITE)
			pteval |= ARM_SMMU_PTE_HAP_WRITE;
		if (prot & IOMMU_CACHE)
			pteval |= ARM_SMMU_PTE_MEMATTR_OIWB;
		else
			pteval |= ARM_SMMU_PTE_MEMATTR_NC;
	}

	if (prot & IOMMU_NOEXEC)
		pteval |= ARM_SMMU_PTE_XN;

	/* If no access, create a faulting entry to avoid TLB fills */
	if (!(prot & (IOMMU_READ | IOMMU_WRITE)))
		pteval &= ~ARM_SMMU_PTE_PAGE;

	pteval |= ARM_SMMU_PTE_SH_IS;
	start = pmd_page_vaddr(*pmd) + pte_index(addr);
	pte = start;

	/*
	 * Install the page table entries. This is fairly complicated
	 * since we attempt to make use of the contiguous hint in the
	 * ptes where possible. The contiguous hint indicates a series
	 * of ARM_SMMU_PTE_CONT_ENTRIES ptes mapping a physically
	 * contiguous region with the following constraints:
	 *
	 *   - The region start is aligned to ARM_SMMU_PTE_CONT_SIZE
	 *   - Each pte in the region has the contiguous hint bit set
	 *
	 * This complicates unmapping (also handled by this code, when
	 * neither IOMMU_READ or IOMMU_WRITE are set) because it is
	 * possible, yet highly unlikely, that a client may unmap only
	 * part of a contiguous range. This requires clearing of the
	 * contiguous hint bits in the range before installing the new
	 * faulting entries.
	 *
	 * Note that re-mapping an address range without first unmapping
	 * it is not supported, so TLB invalidation is not required here
	 * and is instead performed at unmap and domain-init time.
	 */
	do {
		int i = 1;
		u64 set_bit = 0;
		pteval &= ~ARM_SMMU_PTE_CONT;

		if (arm_smmu_pte_is_contiguous_range(addr, end,
							__pfn_to_phys(pfn))) {
			i = ARM_SMMU_PTE_CONT_ENTRIES;
			pteval |= ARM_SMMU_PTE_CONT;
		} else if (pte_val(*pte) &
			   (ARM_SMMU_PTE_CONT | ARM_SMMU_PTE_PAGE)) {
			int j;
			pte_t *cont_start;
			unsigned long idx = pte_index(addr);

			idx &= ~(ARM_SMMU_PTE_CONT_ENTRIES - 1);
			cont_start = pmd_page_vaddr(*pmd) + idx;
			for (j = 0; j < ARM_SMMU_PTE_CONT_ENTRIES; ++j)
				pte_val(*(cont_start + j)) &=
					~ARM_SMMU_PTE_CONT;

			arm_smmu_flush_pgtable(smmu, cont_start,
					       sizeof(*pte) *
					       ARM_SMMU_PTE_CONT_ENTRIES);
		}

		if (!pfn) {
			memset(pte, 0, i * sizeof(*pte));
			addr += i * PAGE_SIZE;
			pte += i;
			continue;
		}

		if (prot & DMA_FOR_NVLINK)
			set_bit = (1 << (NVLINK_PHY_BIT - PAGE_SHIFT));

		do {
			*pte = pfn_pte(pfn | set_bit, __pgprot(pteval));
		} while (pte++, pfn++, addr += PAGE_SIZE, --i);
	} while (addr != end);

	arm_smmu_flush_pgtable(smmu, start, sizeof(*pte) * (pte - start));
	return 0;
}

static int arm_smmu_alloc_init_pmd(struct arm_smmu_domain *domain, pud_t *pud,
				   unsigned long addr, unsigned long end,
				   phys_addr_t phys, int prot, int stage)
{
	int ret;
	pmd_t *pmd = NULL;
	unsigned long next, pfn = __phys_to_pfn(phys);

#ifndef __PAGETABLE_PMD_FOLDED
	if (pud_none(*pud)) {
		pmd = (pmd_t *) arm_smmu_alloc_pgtable_page(domain, 1,
								pud, addr);
		if (!pmd)
			return -ENOMEM;
	}
#endif
	if (!pmd)
		pmd = pmd_offset(pud, addr);

	do {
		next = pmd_addr_end(addr, end);
		ret = arm_smmu_alloc_init_pte(domain, pmd, addr, next, pfn,
					      prot, stage);
		if (phys)
			phys += next - addr;
		pfn = __phys_to_pfn(phys);
	} while (pmd++, addr = next, addr < end);

	return ret;
}

static int arm_smmu_alloc_init_pud(struct arm_smmu_domain *domain, pgd_t *pgd,
				   unsigned long addr, unsigned long end,
				   phys_addr_t phys, int prot, int stage)
{
	int ret = 0;
	pud_t *pud = NULL;
	unsigned long next;

#ifndef __PAGETABLE_PUD_FOLDED
	if (pgd_none(*pgd)) {
		pud = (pud_t *) arm_smmu_alloc_pgtable_page(domain, 0,
								pgd, addr);
		if (!pud)
			return -ENOMEM;
	}
#endif
	if (!pud)
		pud = pud_offset(pgd, addr);

	do {
		next = pud_addr_end(addr, end);
		ret = arm_smmu_alloc_init_pmd(domain, pud, addr, next, phys,
					      prot, stage);
		if (phys)
			phys += next - addr;
	} while (pud++, addr = next, addr < end);

	return ret;
}

static void get_pte_info(struct arm_smmu_cfg *cfg, ulong iova,
	pgdval_t *pgdval, pudval_t *pudval, pmdval_t *pmdval, pteval_t *pteval)
{
	pgd_t *pgd;
	pud_t *pud;
	pmd_t *pmd;
	pte_t *pte;

	*pgdval = *pudval = *pmdval = *pteval = 0;

	pgd = cfg->pgd + pgd_index(iova);
	*pgdval = pgd_val(*pgd);
	if (pgd_none(*pgd))
		return;

	pud = pud_offset(pgd, iova);
	*pudval = pud_val(*pud);
	if (pud_none(*pud))
		return;

	pmd = pmd_offset(pud, iova);
	*pmdval = pmd_val(*pmd);
	if (pmd_none(*pmd))
		return;

	pte = pmd_page_vaddr(*pmd) + pte_index(iova);
	*pteval = pte_val(*pte);
}

static int arm_smmu_handle_mapping(struct arm_smmu_domain *smmu_domain,
				   unsigned long iova, phys_addr_t paddr,
				   size_t size, unsigned long prot)
{
	int ret, stage;
	unsigned long end, iova_orig = iova;
	phys_addr_t input_mask, output_mask;
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;
	pgd_t *pgd = cfg->pgd;
	unsigned long flags;

	u64 time_before = 0;

	if (cfg->cbar == CBAR_TYPE_S2_TRANS) {
		stage = 2;
		input_mask = (1ULL << smmu->s2_input_size) - 1;
		output_mask = (1ULL << smmu->s2_output_size) - 1;
	} else {
		stage = 1;
		input_mask = (1ULL << smmu->s1_input_size) - 1;
		output_mask = (1ULL << smmu->s1_output_size) - 1;
	}

	if (!pgd)
		return -EINVAL;

	if (size & ~PAGE_MASK)
		return -EINVAL;

	if ((phys_addr_t)iova & ~input_mask)
		return -ERANGE;

	if (paddr & ~output_mask)
		return -ERANGE;

	if (test_bit(cfg->cbndx, smmu->context_filter)) {
		pr_debug("cbndx=%d iova=%pad paddr=%pap size=%zx prot=%lx skip=%d\n",
			 cfg->cbndx, &iova, &paddr, size, prot,
			 arm_smmu_skip_mapping);
	}

	if (arm_smmu_skip_mapping)
		return 0;

#ifdef CONFIG_TRACEPOINTS
	if (static_key_false(&__tracepoint_arm_smmu_handle_mapping.key)
		&& test_bit(cfg->cbndx, smmu->context_filter))
		time_before = local_clock();
#endif

	spin_lock_irqsave(&smmu_domain->lock, flags);
	pgd += pgd_index(iova);
	end = iova + size;
	do {
		unsigned long next = pgd_addr_end(iova, end);

		ret = arm_smmu_alloc_init_pud(smmu_domain, pgd, iova, next, paddr,
					      prot, stage);
		if (ret)
			goto out_unlock;

		if (paddr)
			paddr += next - iova;
		iova = next;
	} while (pgd++, iova != end);

out_unlock:
	if (arm_smmu_tlb_inv_at_map) {
		if (arm_smmu_tlb_inv_by_addr)
			arm_smmu_tlb_inv_range(smmu_domain,
					       iova, iova - iova_orig);
		else
			arm_smmu_tlb_inv_context(smmu_domain);
	}
	spin_unlock_irqrestore(&smmu_domain->lock, flags);

	if (time_before)
		trace_arm_smmu_handle_mapping(time_before, cfg->cbndx,
			iova_orig, paddr, size, prot);

	return ret;
}

#if LINUX_VERSION_CODE < KERNEL_VERSION(4, 9, 0)
static size_t arm_smmu_map_sg(struct iommu_domain *domain, unsigned long iova,
			struct scatterlist *sgl, unsigned int npages,
			unsigned long prot)
{
	int i;
	struct scatterlist *sg;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);

	for (i = 0, sg = sgl; i < npages; sg = sg_next(sg)) {
		int err;
		phys_addr_t pa = sg_phys(sg) & PAGE_MASK;
		unsigned int len = PAGE_ALIGN(sg->offset + sg->length);

		pr_debug("%s() iova=%pad pa=%pap size=%x\n",
			__func__, &iova, &pa, len);
		err = arm_smmu_handle_mapping(smmu_domain, iova, pa, len, prot);
		if (err)
			return err;

		i += len >> PAGE_SHIFT;
		iova += len;
	}

	return 0;
}
#endif

static int arm_smmu_map(struct iommu_domain *domain, unsigned long iova,
			phys_addr_t paddr, size_t size, unsigned long prot)
{
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);

	if (!smmu_domain)
		return -ENODEV;

	return arm_smmu_handle_mapping(smmu_domain, iova, paddr, size, prot);
}

static size_t arm_smmu_unmap(struct iommu_domain *domain, unsigned long iova,
			     size_t size)
{
	int ret;
	u64 time_before = 0;

	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
#ifdef CONFIG_TRACEPOINTS
	struct arm_smmu_device *smmu = smmu_domain->smmu;
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;

	if (static_key_false(&__tracepoint_arm_smmu_unmap.key)
		&& test_bit(cfg->cbndx, smmu->context_filter))
		time_before = local_clock();
#endif

	ret = arm_smmu_handle_mapping(smmu_domain, iova, 0, size, 0);
	if (!arm_smmu_tlb_inv_at_map) {
		if (arm_smmu_tlb_inv_by_addr)
			arm_smmu_tlb_inv_range(smmu_domain, iova, size);
		else
			arm_smmu_tlb_inv_context(smmu_domain);
	}
	if (time_before)
		trace_arm_smmu_unmap(time_before, iova, size);

	return ret ? 0 : size;
}

static phys_addr_t arm_smmu_iova_to_phys(struct iommu_domain *domain,
					 dma_addr_t iova)
{
	pgd_t *pgdp, pgd;
	pud_t pud;
	pmd_t pmd;
	pte_t pte;
	struct arm_smmu_domain *smmu_domain = to_smmu_domain(domain);
	struct arm_smmu_cfg *cfg = &smmu_domain->cfg;

	pgdp = cfg->pgd;
	if (!pgdp)
		return 0;

	pgd = *(pgdp + pgd_index(iova));
	if (pgd_none(pgd))
		return 0;

	pud = *pud_offset(&pgd, iova);
	if (pud_none(pud))
		return 0;

	pmd = *pmd_offset(&pud, iova);
	if (pmd_none(pmd))
		return 0;

	pte = *(pmd_page_vaddr(pmd) + pte_index(iova));
	if (pte_none(pte))
		return 0;

	return __pfn_to_phys(pte_pfn(pte)) | (iova & ~PAGE_MASK);
}

static bool arm_smmu_capable(enum iommu_cap cap)
{
	switch (cap) {
	case IOMMU_CAP_CACHE_COHERENCY:
		/*
		 * Return true here as the SMMU can always send out coherent
		 * requests.
		 */
		return true;
	case IOMMU_CAP_INTR_REMAP:
		return true; /* MSIs are just memory writes */
	default:
		return false;
	}
}

/*
 * On Tegra we set the same SID for all PCI devices. As such this function does
 * not need to do anything.
 */
static int __arm_smmu_get_pci_sid(struct pci_dev *pdev, u16 alias, void *data)
{
	return 0; /* Continue walking */
}

static int arm_smmu_add_device(struct device *dev)
{
	struct arm_smmu_device *smmu;
	struct arm_smmu_master_cfg *cfg;
	struct iommu_group *group;
	struct arm_smmu_master *master;
	struct dma_iommu_mapping *mapping;
	int ret;
	int i;
	struct device_node *np = dev_get_dev_node(dev);
	struct of_phandle_args args;
	struct of_phandle_args master_spec = {0};
	int iommus_idx = 0;
	bool register_master = false;

	if (!smmu_handle)
		return -ENODEV;
	master_spec.args_count = 0;

	while (!of_parse_phandle_with_args(np, "iommus", "#iommu-cells",
					   iommus_idx++, &args)) {
		if (args.np == smmu_handle->dev->of_node) {
			master_spec.np = np;
			for (i = 0; i < args.args_count; i++) {
				if (master_spec.args_count >= MAX_MASTER_STREAMIDS) {
					WARN(1, "> %d stream id's not supported, dev=%s",
						MAX_MASTER_STREAMIDS, dev_name(dev));
					of_node_put(args.np);
					return -ENOSPC;
				}
				master_spec.args[master_spec.args_count++] = args.args[i];
				pr_debug("sid=%d, dev_name=%s\n", args.args[i], dev_name(dev));
				register_master = true;
			}
		}
		of_node_put(args.np);
	}

	if (register_master)
		(void)register_smmu_master(smmu_handle, dev, &master_spec);

	smmu = find_smmu_for_device(dev);
	if (!smmu)
		return -ENODEV;

	group = iommu_group_alloc();
	if (IS_ERR(group)) {
		dev_err(dev, "Failed to allocate IOMMU group\n");
		return PTR_ERR(group);
	}

	/*
	 * Don't just use the dev here. That dev won't be a registered SMMU
	 * master so instead we should use the PCIe root.
	 */
	master = find_smmu_master(smmu, dev_get_dev_node(dev));
	if (!master) {
		ret = -ENODEV;
		goto out_put_group;
	}

	cfg = master->cfg;

	if (dev_is_pci(dev)) {
		struct pci_dev *pdev = to_pci_dev(dev);

		pci_for_each_dma_alias(pdev, __arm_smmu_get_pci_sid,
				       &cfg->streamids[0]);
	}

	iommu_group_set_iommudata(group, cfg, NULL);
	ret = iommu_group_add_device(group, dev);
	iommu_group_put(group);
	if (ret)
		return ret;

	mapping = tegra_smmu_of_get_master_map(dev, master->cfg->streamids,
					       master->cfg->num_streamids);
	if (IS_ERR_OR_NULL(mapping)) {
		ret = PTR_ERR(mapping);
		goto out_put_group;
	}

	ret = arm_iommu_attach_device(dev, mapping);
	if (ret)
		goto err_attach_dev;

	pr_debug("Device added to SMMU: %s\n", dev_name(dev));
	return 0;

err_attach_dev:
	arm_iommu_release_mapping(mapping);
out_put_group:
	iommu_group_put(group);
	return ret;
}

static void arm_smmu_remove_device(struct device *dev)
{
	iommu_group_remove_device(dev);
}

static const struct iommu_ops arm_smmu_ops = {
	.capable	= arm_smmu_capable,
	.domain_alloc	= arm_smmu_domain_alloc,
	.domain_free	= arm_smmu_domain_free,
	.attach_dev	= arm_smmu_attach_dev,
	.detach_dev	= arm_smmu_detach_dev,
	.get_hwid	= arm_smmu_get_hwid,
#if LINUX_VERSION_CODE  > KERNEL_VERSION(4, 9, 0)
	.map_sg		= default_iommu_map_sg,
#else
	.map_sg		= arm_smmu_map_sg,
#endif
	.map		= arm_smmu_map,
	.unmap		= arm_smmu_unmap,
	.iova_to_phys	= arm_smmu_iova_to_phys,
	.add_device	= arm_smmu_add_device,
	.remove_device	= arm_smmu_remove_device,
	.pgsize_bitmap	= ALL_PGSIZES_BITMAP,
#if LINUX_VERSION_CODE  > KERNEL_VERSION(4, 9, 0)
	.ignore_align	= 1,
#endif
};

static void arm_smmu_device_reset(struct arm_smmu_device *smmu)
{
	void __iomem *gr0_base = ARM_SMMU_GR0_NS(smmu);
	void __iomem *cb_base;
	int i = 0, smmu_id = 0;
	u32 reg;
	u32 gr0_offset = abs(gr0_base - smmu->base[0]);

	/* clear global FSR */
	while (smmu_id < smmu->num_smmus) {
		gr0_base = smmu->base[smmu_id] + gr0_offset;
		reg = readl_relaxed(gr0_base + ARM_SMMU_GR0_sGFSR);
		writel_single(reg, gr0_base + ARM_SMMU_GR0_sGFSR);
		smmu_id++;
	}

	gr0_base = ARM_SMMU_GR0(smmu);

	/* Mark all SMRn as invalid and all S2CRn as bypass */
	for (i = 0; i < smmu->num_mapping_groups; ++i) {
		if (smmu->features & ARM_SMMU_FEAT_STREAM_MATCH)
			writel_relaxed(0, gr0_base + ARM_SMMU_GR0_SMR(i));
		writel_relaxed(S2CR_TYPE_BYPASS,
			gr0_base + ARM_SMMU_GR0_S2CR(i));
	}

	/* Make sure all context banks are disabled and clear CB_FSR  */
	for (i = 0; i < smmu->num_context_banks; ++i) {
		cb_base = ARM_SMMU_CB_BASE(smmu) + ARM_SMMU_CB(smmu, i);
		writel_relaxed(0, cb_base + ARM_SMMU_CB_SCTLR);
		writel_relaxed(FSR_FAULT, cb_base + ARM_SMMU_CB_FSR);
	}

	/* Invalidate the TLB, just in case */
	writel_relaxed(0, gr0_base + ARM_SMMU_GR0_STLBIALL);
	writel_relaxed(0, gr0_base + ARM_SMMU_GR0_TLBIALLH);
	writel_relaxed(0, gr0_base + ARM_SMMU_GR0_TLBIALLNSNH);

	reg = readl_relaxed(ARM_SMMU_GR0_NS(smmu) + ARM_SMMU_GR0_sCR0);

	/* Enable fault reporting */
	reg |= (sCR0_GFRE | sCR0_GFIE | sCR0_GCFGFRE | sCR0_GCFGFIE | sCR0_USFCFG);

	/* Disable TLB broadcasting. */
	reg |= (sCR0_VMIDPNE | sCR0_PTM);

	/* Enable client access, but bypass when no mapping is found */
	reg &= ~(sCR0_CLIENTPD);

	/* Disable forced broadcasting */
	reg &= ~sCR0_FB;

	/* Don't upgrade barriers */
	reg &= ~(sCR0_BSU_MASK << sCR0_BSU_SHIFT);

	/* Push the button */
	arm_smmu_tlb_sync(smmu, false);
	arm_smmu_tlb_sync(smmu, true);

	writel(reg, ARM_SMMU_GR0_NS(smmu) + ARM_SMMU_GR0_sCR0);
}

static int arm_smmu_id_size_to_bits(int size)
{
	switch (size) {
	case 0:
		return 32;
	case 1:
		return 36;
	case 2:
		return 40;
	case 3:
		return 42;
	case 4:
		return 44;
	case 5:
	default:
		return 48;
	}
}

static int arm_smmu_device_cfg_probe(struct arm_smmu_device *smmu)
{
	unsigned long size;
	void __iomem *gr0_base = ARM_SMMU_GR0(smmu);
	u32 id;

	dev_notice(smmu->dev, "probing hardware configuration...\n");
	dev_notice(smmu->dev, "SMMUv%d with:\n", smmu->version);

	/* ID0 */
	id = readl_relaxed(gr0_base + ARM_SMMU_GR0_ID0);
#ifndef CONFIG_64BIT
	if (((id >> ID0_PTFS_SHIFT) & ID0_PTFS_MASK) == ID0_PTFS_V8_ONLY) {
		dev_err(smmu->dev, "\tno v7 descriptor support!\n");
		return -ENODEV;
	}
#endif

	/* Restrict available stages based on module parameter */
	if (force_stage == 1)
		id &= ~(ID0_S2TS | ID0_NTS);
	else if (force_stage == 2)
		id &= ~(ID0_S1TS | ID0_NTS);

	if (id & ID0_S1TS) {
		smmu->features |= ARM_SMMU_FEAT_TRANS_S1;
		dev_notice(smmu->dev, "\tstage 1 translation\n");
	}

	if (id & ID0_S2TS) {
		smmu->features |= ARM_SMMU_FEAT_TRANS_S2;
		dev_notice(smmu->dev, "\tstage 2 translation\n");
	}

	if (id & ID0_NTS) {
		smmu->features |= ARM_SMMU_FEAT_TRANS_NESTED;
		dev_notice(smmu->dev, "\tnested translation\n");
	}

	if (!(smmu->features &
		(ARM_SMMU_FEAT_TRANS_S1 | ARM_SMMU_FEAT_TRANS_S2))) {
		dev_err(smmu->dev, "\tno translation support!\n");
		return -ENODEV;
	}

	if (id & ID0_CTTW) {
		smmu->features |= ARM_SMMU_FEAT_COHERENT_WALK;
		dev_notice(smmu->dev, "\tcoherent table walk\n");
	}

	smmu->num_mapping_groups = (id >> ID0_NUMSMRG_SHIFT) &
		ID0_NUMSMRG_MASK;

	if (id & ID0_SMS) {
		u32 smr, sid, mask;

		smmu->features |= ARM_SMMU_FEAT_STREAM_MATCH;
		if (smmu->num_mapping_groups == 0) {
			dev_err(smmu->dev,
				"stream-matching supported, but no SMRs present!\n");
			return -ENODEV;
		}

		smr = SMR_MASK_MASK << SMR_MASK_SHIFT;
		smr |= (SMR_ID_MASK << SMR_ID_SHIFT);
		writel_relaxed(smr, gr0_base + ARM_SMMU_GR0_SMR(0));
		smr = readl_relaxed(gr0_base + ARM_SMMU_GR0_SMR(0));

		mask = (smr >> SMR_MASK_SHIFT) & SMR_MASK_MASK;
		sid = (smr >> SMR_ID_SHIFT) & SMR_ID_MASK;
		if ((mask & sid) != sid) {
			dev_err(smmu->dev,
				"SMR mask bits (0x%x) insufficient for ID field (0x%x)\n",
				mask, sid);
			return -ENODEV;
		}

		dev_notice(smmu->dev,
			   "\tstream matching with %u register groups, mask 0x%x",
			   smmu->num_mapping_groups, mask);
	} else {
		dev_notice(smmu->dev,
			   "\tstream indexing with %u indices",
			   smmu->num_mapping_groups);
	}

	/* ID1 */
	id = readl_relaxed(gr0_base + ARM_SMMU_GR0_ID1);
	smmu->pgshift = (id & ID1_PAGESIZE) ? 16 : 12;

	/* Check for size mismatch of SMMU address space from mapped region */
	size = 1 <<
		(((id >> ID1_NUMPAGENDXB_SHIFT) & ID1_NUMPAGENDXB_MASK) + 1);
	size *= 2 << smmu->pgshift;
	if (smmu->size != size) {
		dev_info(smmu->dev,
			"SMMU address space size (0x%lx) differs from mapped region size (0x%lx)!\n",
			size, smmu->size);
		smmu->size = size;
	}

	smmu->num_s2_context_banks = (id >> ID1_NUMS2CB_SHIFT) &
				      ID1_NUMS2CB_MASK;
	smmu->num_context_banks = (id >> ID1_NUMCB_SHIFT) & ID1_NUMCB_MASK;
	if (smmu->num_s2_context_banks > smmu->num_context_banks) {
		dev_err(smmu->dev, "impossible number of S2 context banks!\n");
		return -ENODEV;
	}
	dev_notice(smmu->dev, "\t%u context banks (%u stage-2 only)\n",
		   smmu->num_context_banks, smmu->num_s2_context_banks);

	/* ID2 */
	id = readl_relaxed(gr0_base + ARM_SMMU_GR0_ID2);
	size = arm_smmu_id_size_to_bits((id >> ID2_IAS_SHIFT) & ID2_IAS_MASK);
	smmu->s1_output_size = min_t(unsigned long, PHYS_MASK_SHIFT, size);

	/* Stage-2 input size limited due to pgd allocation (PTRS_PER_PGD) */
#ifdef CONFIG_64BIT
	smmu->s2_input_size = min_t(unsigned long, VA_BITS, size);
#else
	smmu->s2_input_size = min(32UL, size);
#endif

	/* The stage-2 output mask is also applied for bypass */
	size = arm_smmu_id_size_to_bits((id >> ID2_OAS_SHIFT) & ID2_OAS_MASK);
	smmu->s2_output_size = min_t(unsigned long, PHYS_MASK_SHIFT, size);

	if (smmu->version == ARM_SMMU_V1) {
		smmu->s1_input_size = 32;
	} else {
#ifdef CONFIG_64BIT
		size = (id >> ID2_UBS_SHIFT) & ID2_UBS_MASK;
		size = min(VA_BITS, arm_smmu_id_size_to_bits(size));
#else
		size = 32;
#endif
		smmu->s1_input_size = size;

		if ((PAGE_SIZE == SZ_4K && !(id & ID2_PTFS_4K)) ||
		    (PAGE_SIZE == SZ_64K && !(id & ID2_PTFS_64K)) ||
		    (PAGE_SIZE != SZ_4K && PAGE_SIZE != SZ_64K)) {
			dev_err(smmu->dev, "CPU page size 0x%lx unsupported\n",
				PAGE_SIZE);
			return -ENODEV;
		}
	}

	if (smmu->features & ARM_SMMU_FEAT_TRANS_S1)
		dev_notice(smmu->dev, "\tStage-1: %lu-bit VA -> %lu-bit IPA\n",
			   smmu->s1_input_size, smmu->s1_output_size);

	if (smmu->features & ARM_SMMU_FEAT_TRANS_S2)
		dev_notice(smmu->dev, "\tStage-2: %lu-bit IPA -> %lu-bit PA\n",
			   smmu->s2_input_size, smmu->s2_output_size);

	return 0;
}

#define defreg(_name)				\
	{					\
		.name = __stringify(_name),	\
		.offset = ARM_SMMU_ ## _name,	\
	}
#define defreg_gr0(_name) defreg(GR0_ ## _name)

static const struct debugfs_reg32 arm_smmu_gr0_regs[] = {
	defreg_gr0(sCR0),
	defreg_gr0(ID0),
	defreg_gr0(ID1),
	defreg_gr0(ID2),
	defreg_gr0(sGFSR),
	defreg_gr0(sGFSYNR0),
	defreg_gr0(sGFSYNR1),
	defreg_gr0(sTLBGSTATUS),
	defreg_gr0(nsCR0),
	defreg_gr0(nsGFSR),
	defreg_gr0(nsGFSYNR0),
	defreg_gr0(nsGFSYNR1),
	defreg_gr0(nsTLBGSTATUS),
	defreg_gr0(PIDR2),
};

#define defreg_gnsr0(_name) defreg(GNSR0_ ## _name)

static const struct debugfs_reg32 arm_smmu_gnsr0_regs[] = {
	defreg_gnsr0(PMCNTENSET_0),
	defreg_gnsr0(PMCNTENCLR_0),
	defreg_gnsr0(PMINTENSET_0),
	defreg_gnsr0(PMINTENCLR_0),
	defreg_gnsr0(PMOVSCLR_0),
	defreg_gnsr0(PMOVSSET_0),
	defreg_gnsr0(PMCFGR_0),
	defreg_gnsr0(PMCR_0),
	defreg_gnsr0(PMCEID0_0),
	defreg_gnsr0(PMAUTHSTATUS_0),
	defreg_gnsr0(PMDEVTYPE_0)
};

static ssize_t smmu_context_filter_write(struct file *file,
					 const char __user *user_buf,
					 size_t count, loff_t *ppos)
{
	s16 cbndx;
	char *pbuf, *temp, *val;
	bool first_times = 1;
	ssize_t ret = count;
	struct seq_file *seqf = file->private_data;
	struct arm_smmu_device *smmu = seqf->private;
	unsigned long *bitmap = smmu->context_filter;

	/* Clear bitmap in case of user buf empty */
	if (count == 1 && *user_buf == '\n') {
		bitmap_zero(bitmap, smmu->num_context_banks);
		return ret;
	}

	pbuf = vmalloc(count + 1);
	if (!pbuf)
		return -ENOMEM;

	if (copy_from_user(pbuf, user_buf, count)) {
		ret = -EFAULT;
		goto end;
	}

	if (pbuf[count - 1] == '\n')
		pbuf[count - 1] = '\0';
	else
		pbuf[count] = '\0';

	temp = pbuf;

	do {
		val = strsep(&temp, ",");
		if (*val) {
			if (kstrtos16(val, 10, &cbndx))
				continue;

			/* Reset bitmap in case of negative index */
			if (cbndx < 0) {
				bitmap_fill(bitmap, smmu->num_context_banks);
				goto end;
			}

			if (cbndx >= smmu->num_context_banks) {
				dev_err(smmu->dev,
					"context filter index out of range\n");
				ret = -EINVAL;
				goto end;
			}

			if (first_times) {
				bitmap_zero(bitmap, smmu->num_context_banks);
				first_times = 0;
			}

			set_bit(cbndx, bitmap);
		}
	} while (temp);

end:
	vfree(pbuf);
	return ret;
}

static int smmu_context_filter_show(struct seq_file *s, void *unused)
{
	struct arm_smmu_device *smmu = s->private;
	unsigned long *bitmap = smmu->context_filter;
	int idx = 0;

	while (1) {
		idx = find_next_bit(bitmap, ARM_SMMU_MAX_CBS, idx);
		if (idx >= smmu->num_context_banks)
			break;
		seq_printf(s, "%d,", idx);
		idx++;
	}
	seq_putc(s, '\n');
	return 0;
}

static int smmu_context_filter_open(struct inode *inode, struct file *file)
{
	return single_open(file, smmu_context_filter_show, inode->i_private);
}

static const struct file_operations smmu_context_filter_fops = {
	.open		= smmu_context_filter_open,
	.read		= seq_read,
	.write		= smmu_context_filter_write,
	.llseek		= seq_lseek,
	.release	= single_release,
};

static int smmu_reg32_debugfs_set(void *data, u64 val)
{
	struct debugfs_reg32 *regs = (struct debugfs_reg32 *)data;

	writel(val, (smmu_handle->base[debug_smmu_id] + regs->offset));
	return 0;
}

static int smmu_reg32_debugfs_get(void *data, u64 *val)
{
	struct debugfs_reg32 *regs = (struct debugfs_reg32 *)data;

	*val = readl(smmu_handle->base[debug_smmu_id] + regs->offset);
	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(smmu_reg32_debugfs_fops,
			smmu_reg32_debugfs_get,
			smmu_reg32_debugfs_set, "%08llx\n");

static int smmu_perf_regset_debugfs_set(void *data, u64 val)
{
	struct debugfs_reg32 *regs = (struct debugfs_reg32 *)data;

	writel(val, (smmu_handle->perf_regset->base + regs->offset));
	return 0;
}

static int smmu_perf_regset_debugfs_get(void *data, u64 *val)
{
	struct debugfs_reg32 *regs = (struct debugfs_reg32 *)data;

	*val = readl(smmu_handle->perf_regset->base + regs->offset);
	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(smmu_perf_regset_debugfs_fops,
			smmu_perf_regset_debugfs_get,
			smmu_perf_regset_debugfs_set, "%08llx\n");

static void arm_smmu_debugfs_delete(struct arm_smmu_device *smmu)
{
	int i;

	if (smmu->regset) {
		const struct debugfs_reg32 *regs = smmu->regset->regs;

		regs += ARRAY_SIZE(arm_smmu_gr0_regs);
		for (i = 0; i < 4 * smmu->num_context_banks; i++)
			kfree(regs[i].name);

		kfree(smmu->regset);
	}

	if (smmu->perf_regset) {
		const struct debugfs_reg32 *regs = smmu->perf_regset->regs;

		i = ARRAY_SIZE(arm_smmu_gnsr0_regs);
		for (; i < smmu->perf_regset->nregs ; i++)
			kfree(regs[i].name);

		kfree(smmu->perf_regset);
		smmu->perf_regset = NULL;
	}

	debugfs_remove_recursive(smmu->debugfs_root);
}

static int debug_smmu_id_debugfs_set(void *data, u64 val)
{
	struct arm_smmu_device *smmu = (struct arm_smmu_device *)data;

	if (val >= smmu->num_smmus)
		return -EINVAL;

	debug_smmu_id = (s8)val;
	smmu->regset->base = smmu->base[debug_smmu_id];
	smmu->perf_regset->base = smmu->regset->base + 3 * (1 << smmu->pgshift);
	return 0;
}

static int debug_smmu_id_debugfs_get(void *data, u64 *val)
{
	*val = debug_smmu_id;
	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(debug_smmu_id_debugfs_fops,
			debug_smmu_id_debugfs_get,
			debug_smmu_id_debugfs_set, "%08llx\n");

static void arm_smmu_debugfs_create(struct arm_smmu_device *smmu)
{
	int i;
	struct debugfs_reg32 *regs;
	size_t bytes;
	struct dentry *dent_gr, *dent_gnsr;

	smmu->debugfs_root = debugfs_create_dir(dev_name(smmu->dev), NULL);
	if (!smmu->debugfs_root)
		return;

	debugfs_create_file("debug_smmu_id", S_IRUGO | S_IWUSR,
			smmu->debugfs_root, smmu, &debug_smmu_id_debugfs_fops);

	dent_gr = debugfs_create_dir("gr", smmu->debugfs_root);
	if (!dent_gr)
		goto err_out;

	dent_gnsr = debugfs_create_dir("gnsr", smmu->debugfs_root);
	if (!dent_gnsr)
		goto err_out;

	smmu->masters_root = debugfs_create_dir("masters", smmu->debugfs_root);
	if (!smmu->masters_root)
		goto err_out;

	bytes = (smmu->num_context_banks + 1) * sizeof(*smmu->regset);
	bytes += ARRAY_SIZE(arm_smmu_gr0_regs) * sizeof(*regs);
	bytes += 4 * smmu->num_context_banks * sizeof(*regs);
	smmu->regset = kzalloc(bytes, GFP_KERNEL);
	if (!smmu->regset)
		goto err_out;

	smmu->regset->base = smmu->base[0];
	smmu->regset->nregs = ARRAY_SIZE(arm_smmu_gr0_regs) +
		4 * smmu->num_context_banks;
	smmu->regset->regs = (struct debugfs_reg32 *)(smmu->regset +
						smmu->num_context_banks + 1);
	regs = (struct debugfs_reg32 *)smmu->regset->regs;
	for (i = 0; i < ARRAY_SIZE(arm_smmu_gr0_regs); i++) {
		regs->name = arm_smmu_gr0_regs[i].name;
		regs->offset = arm_smmu_gr0_regs[i].offset;
		regs++;
	}

	for (i = 0; i < smmu->num_context_banks; i++) {
		regs->name = kasprintf(GFP_KERNEL, "GR0_SMR%03d", i);
		if (!regs->name)
			goto err_out;
		regs->offset = ARM_SMMU_GR0_SMR(i);
		regs++;

		regs->name = kasprintf(GFP_KERNEL, "GR0_S2CR%03d", i);
		if (!regs->name)
			goto err_out;
		regs->offset = ARM_SMMU_GR0_S2CR(i);
		regs++;

		regs->name = kasprintf(GFP_KERNEL, "GR1_CBAR%03d", i);
		if (!regs->name)
			goto err_out;
		regs->offset = (1 << smmu->pgshift) + ARM_SMMU_GR1_CBAR(i);
		regs++;

		regs->name = kasprintf(GFP_KERNEL, "GR1_CBA2R%03d", i);
		if (!regs->name)
			goto err_out;
		regs->offset = (1 << smmu->pgshift) + ARM_SMMU_GR1_CBA2R(i);
		regs++;
	}

	regs = (struct debugfs_reg32 *)smmu->regset->regs;
	for (i = 0; i < smmu->regset->nregs; i++) {
		debugfs_create_file(regs->name, S_IRUGO | S_IWUSR,
				dent_gr, regs, &smmu_reg32_debugfs_fops);
		regs++;
	}

	debugfs_create_regset32("regdump", S_IRUGO, smmu->debugfs_root,
				smmu->regset);

	bytes = sizeof(*smmu->perf_regset);
	bytes += ARRAY_SIZE(arm_smmu_gnsr0_regs) * sizeof(*regs);
	/*
	 * Account the number of bytes for two sets of
	 * counter group registers
	 */
	bytes += 2 * PMCG_SIZE * sizeof(*regs);
	/*
	 * Account the number of bytes for two sets of
	 * event counter registers
	 */
	bytes += 2 * PMEV_SIZE * sizeof(*regs);

	/* Allocate memory for Perf Monitor registers */
	smmu->perf_regset =  kzalloc(bytes, GFP_KERNEL);
	if (!smmu->perf_regset)
		goto err_out;

	/*
	 * perf_regset base address is placed at offset (3 * smmu_pagesize)
	 * from smmu->base address
	 */
	smmu->perf_regset->base = smmu->base[0] + 3 * (1 << smmu->pgshift);
	smmu->perf_regset->nregs = ARRAY_SIZE(arm_smmu_gnsr0_regs) +
		2 * PMCG_SIZE + 2 * PMEV_SIZE;
	smmu->perf_regset->regs =
		(struct debugfs_reg32 *)(smmu->perf_regset + 1);

	regs = (struct debugfs_reg32 *)smmu->perf_regset->regs;

	for (i = 0; i < ARRAY_SIZE(arm_smmu_gnsr0_regs); i++) {
		regs->name = arm_smmu_gnsr0_regs[i].name;
		regs->offset = arm_smmu_gnsr0_regs[i].offset;
		regs++;
	}

	for (i = 0; i < PMEV_SIZE; i++) {
		regs->name = kasprintf(GFP_KERNEL, "GNSR0_PMEVTYPER%d_0", i);
		if (!regs->name)
			goto err_out;
		regs->offset = ARM_SMMU_GNSR0_PMEVTYPER(i);
		regs++;

		regs->name = kasprintf(GFP_KERNEL, "GNSR0_PMEVCNTR%d_0", i);
		if (!regs->name)
			goto err_out;
		regs->offset = ARM_SMMU_GNSR0_PMEVCNTR(i);
		regs++;
	}

	for (i = 0; i < PMCG_SIZE; i++) {
		regs->name = kasprintf(GFP_KERNEL, "GNSR0_PMCGCR%d_0", i);
		if (!regs->name)
			goto err_out;
		regs->offset = ARM_SMMU_GNSR0_PMCGCR(i);
		regs++;

		regs->name = kasprintf(GFP_KERNEL, "GNSR0_PMCGSMR%d_0", i);
		if (!regs->name)
			goto err_out;
		regs->offset = ARM_SMMU_GNSR0_PMCGSMR(i);
		regs++;
	}

	regs = (struct debugfs_reg32 *)smmu->perf_regset->regs;
	for (i = 0; i < smmu->perf_regset->nregs; i++) {
		debugfs_create_file(regs->name, S_IRUGO | S_IWUSR,
			dent_gnsr, regs, &smmu_perf_regset_debugfs_fops);
		regs++;
	}

	debugfs_create_file("context_filter", S_IRUGO | S_IWUSR,
			    smmu->debugfs_root, smmu,
			    &smmu_context_filter_fops);
	debugfs_create_bool("skip_mapping",  S_IRUGO | S_IWUSR,
			    smmu->debugfs_root, &arm_smmu_skip_mapping);
	debugfs_create_bool("gr0_tlbiallnsnh",  S_IRUGO | S_IWUSR,
			smmu->debugfs_root, &arm_smmu_gr0_tlbiallnsnh);
	debugfs_create_bool("tlb_inv_by_addr",  S_IRUGO | S_IWUSR,
			smmu->debugfs_root, &arm_smmu_tlb_inv_by_addr);
	debugfs_create_bool("tlb_inv_at_map",  S_IRUGO | S_IWUSR,
			smmu->debugfs_root, &arm_smmu_tlb_inv_at_map);
	return;

err_out:
	arm_smmu_debugfs_delete(smmu);
}

static const struct of_device_id arm_smmu_of_match[] = {
	{ .compatible = "arm,smmu-v1", .data = (void *)ARM_SMMU_V1 },
	{ .compatible = "arm,smmu-v2", .data = (void *)ARM_SMMU_V2 },
	{ .compatible = "arm,mmu-400", .data = (void *)ARM_SMMU_V1 },
	{ .compatible = "arm,mmu-401", .data = (void *)ARM_SMMU_V1 },
	{ .compatible = "t19x,arm,mmu-500", .data = (void *)ARM_SMMU_V2 },
	{ },
};
MODULE_DEVICE_TABLE(of, arm_smmu_of_match);

static int arm_smmu_device_dt_probe(struct platform_device *pdev)
{
	const struct of_device_id *of_id;
	struct resource *res;
	struct arm_smmu_device *smmu;
	struct device *dev = &pdev->dev;
	int num_irqs, i, err;
	u32 emu_id = 0;
#ifdef CONFIG_ARM_SMMU_SUSPEND
	u32 suspend_save_reg;
#endif

	if (tegra_platform_is_unit_fpga())
		return -ENODEV;

	smmu = devm_kzalloc(dev, sizeof(*smmu), GFP_KERNEL);
	if (!smmu) {
		dev_err(dev, "failed to allocate arm_smmu_device\n");
		return -ENOMEM;
	}
	smmu_handle = smmu;
	smmu->dev = dev;

	of_id = of_match_node(arm_smmu_of_match, dev->of_node);
	smmu->version = (enum arm_smmu_arch_version)of_id->data;

	err = tegra_smmu_of_parse_sids(smmu->dev);
	if (err) {
		pr_err("Unable to parse tegra SIDs!\n");
		return -EINVAL;
	}

	for (i = 0; i < MAX_SMMUS; i++) {
		res = platform_get_resource(pdev, IORESOURCE_MEM, i);
		if (!res)
			break;

		smmu->base[i] = devm_ioremap_resource(dev, res);
		if (IS_ERR(smmu->base[i])) {
			if (i == 0)
				return PTR_ERR(smmu->base[i]);
			break;
		}
		smmu->base_pa[i] = res->start;

		if (i == 0)
			smmu->size = resource_size(res);
	}

	if (i == 0)
		return -ENODEV;

	smmu->num_smmus = i;

	if (of_property_read_u32(dev->of_node, "#global-interrupts",
				 &smmu->num_global_irqs)) {
		dev_err(dev, "missing #global-interrupts property\n");
		return -ENODEV;
	}

	if (of_property_read_u32(dev->of_node, "iso-smmu-id",
				 (u32 *)&smmu->iso_smmu_id)) {
		smmu->iso_smmu_id = -1;
		dev_info(dev, "found %d SMMUs\n", smmu->num_smmus);
	} else {
		if (!tegra_platform_is_fpga()) {
			dev_info(dev, "found %d SMMUs and ISO SMMU id is %d\n",
				smmu->num_smmus, smmu->iso_smmu_id);
		} else {
			emu_id = tegra_read_emu_revid();
			/* high byte encodes FPGA config: GPU(2), MAX(3) have ISO SMMU */
			if ((emu_id >> 24) > 1) {
				dev_info(dev,
					 "found %d SMMUs and ISO SMMU id is %d\n",
					 smmu->num_smmus, smmu->iso_smmu_id);
			} else {
				smmu->iso_smmu_id = -1;
				smmu->num_smmus--;
				dev_info(dev, "found %d SMMUs\n",
					smmu->num_smmus);
			}
		}
	}

	num_irqs = 0;
	while ((res = platform_get_resource(pdev, IORESOURCE_IRQ, num_irqs))) {
		num_irqs++;
		if (num_irqs > smmu->num_global_irqs)
			smmu->num_context_irqs++;
	}

	smmu->irqs = devm_kzalloc(dev, sizeof(*smmu->irqs) * num_irqs,
				  GFP_KERNEL);
	if (!smmu->irqs) {
		dev_err(dev, "failed to allocate %d irqs\n", num_irqs);
		return -ENOMEM;
	}

	for (i = 0; i < num_irqs; ++i) {
		int irq = platform_get_irq(pdev, i);

		if (irq < 0) {
			dev_err(dev, "failed to get irq index %d\n", i);
			return -ENODEV;
		}
		smmu->irqs[i] = irq;
	}

	err = arm_smmu_device_cfg_probe(smmu);
	if (err)
		return err;

	bitmap_fill(smmu->context_filter, smmu->num_context_banks);
	smmu->masters = RB_ROOT;
	parse_driver_options(smmu);

	for (i = 0; i < smmu->num_global_irqs; ++i) {
		err = request_irq(smmu->irqs[i],
				  arm_smmu_global_fault,
				  IRQF_SHARED,
				  "arm-smmu global fault",
				  smmu);
		if (err) {
			dev_err(dev, "failed to request global IRQ %d (%u)\n",
				i, smmu->irqs[i]);
			goto out_free_irqs;
		}
	}

#ifdef CONFIG_ARM_SMMU_SUSPEND
	if (!of_property_read_u32(dev->of_node, "suspend-save-reg",
			&suspend_save_reg)) {

		err = arm_smmu_suspend_init(smmu->base, smmu->base_pa,
					smmu->num_smmus, smmu->size,
					smmu->pgshift, suspend_save_reg);
		if (err) {
			dev_err(dev, "failed to init arm_smu_suspend\n");
			goto out_free_irqs;
		}
	}
#endif

	INIT_LIST_HEAD(&smmu->list);
	spin_lock(&arm_smmu_devices_lock);
	list_add(&smmu->list, &arm_smmu_devices);
	spin_unlock(&arm_smmu_devices_lock);

	arm_smmu_device_reset(smmu);
	arm_smmu_debugfs_create(smmu);
	return 0;

out_free_irqs:
	while (i--)
		free_irq(smmu->irqs[i], smmu);

	return err;
}

static int arm_smmu_device_remove(struct platform_device *pdev)
{
	int i;
	struct device *dev = &pdev->dev;
	struct arm_smmu_device *curr, *smmu = NULL;
	struct rb_node *node;

	spin_lock(&arm_smmu_devices_lock);
	list_for_each_entry(curr, &arm_smmu_devices, list) {
		if (curr->dev == dev) {
			smmu = curr;
			list_del(&smmu->list);
			break;
		}
	}
	spin_unlock(&arm_smmu_devices_lock);

	if (!smmu)
		return -ENODEV;

	arm_smmu_debugfs_delete(smmu);

	for (node = rb_first(&smmu->masters); node; node = rb_next(node)) {
		struct arm_smmu_master *master
			= container_of(node, struct arm_smmu_master, node);
		of_node_put(master->of_node);
	}

	if (!bitmap_empty(smmu->context_map, ARM_SMMU_MAX_CBS))
		dev_err(dev, "removing device with active domains!\n");

	for (i = 0; i < smmu->num_global_irqs; ++i)
		free_irq(smmu->irqs[i], smmu);

	/* Turn the thing off */
	writel(sCR0_CLIENTPD, ARM_SMMU_GR0_NS(smmu) + ARM_SMMU_GR0_sCR0);
	return 0;
}

static struct platform_driver arm_smmu_driver = {
	.driver	= {
		.owner		= THIS_MODULE,
		.name		= "t19x-arm-smmu",
		.of_match_table	= of_match_ptr(arm_smmu_of_match),
		.suppress_bind_attrs = true,
	},
	.probe	= arm_smmu_device_dt_probe,
	.remove	= arm_smmu_device_remove,
};

static bool init_done;

static int __init arm_smmu_init(void)
{
	int ret;

	ret = platform_driver_register(&arm_smmu_driver);
	if (ret)
		return ret;

	/* Oh, for a proper bus abstraction */
	if (!iommu_present(&platform_bus_type))
		bus_set_iommu(&platform_bus_type, &arm_smmu_ops);

#ifdef CONFIG_ARM_AMBA
	if (!iommu_present(&amba_bustype))
		bus_set_iommu(&amba_bustype, &arm_smmu_ops);
#endif

#ifdef CONFIG_PCI
	if (!iommu_present(&pci_bus_type))
		bus_set_iommu(&pci_bus_type, &arm_smmu_ops);
#endif

	init_done = true;

	return 0;
}

static void __exit arm_smmu_exit(void)
{
	return platform_driver_unregister(&arm_smmu_driver);
}

module_exit(arm_smmu_exit);

static int __init arm_smmu_of_setup(struct device_node *np)
{
	struct platform_device *pdev;

	if (!init_done)
		arm_smmu_init();

	pdev = of_platform_device_create(np, NULL, platform_bus_type.dev_root);
	if (IS_ERR(pdev))
		return PTR_ERR(pdev);

	of_iommu_set_ops(np, (struct iommu_ops *)&arm_smmu_ops);
	return 0;
}
IOMMU_OF_DECLARE(arm_smmu_of, "t19x,arm,mmu-500", arm_smmu_of_setup);

MODULE_DESCRIPTION("IOMMU API for ARM architected SMMU implementations");
MODULE_AUTHOR("Will Deacon <will.deacon@arm.com>");
MODULE_LICENSE("GPL v2");