[mirror_ubuntu-artful-kernel.git] / drivers / base / dma-coherent.c

/*
 * Coherent per-device memory handling.
 * Borrowed from i386
 */
#include <linux/io.h>
#include <linux/slab.h>
#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/dma-mapping.h>

struct dma_coherent_mem {
	void		*virt_base;
	dma_addr_t	device_base;
	unsigned long	pfn_base;
	int		size;
	int		flags;
	unsigned long	*bitmap;
	spinlock_t	spinlock;
	bool		use_dev_dma_pfn_offset;
};

static struct dma_coherent_mem *dma_coherent_default_memory __ro_after_init;

static inline struct dma_coherent_mem *dev_get_coherent_memory(struct device *dev)
{
	if (dev && dev->dma_mem)
		return dev->dma_mem;
	return NULL;
}

static inline dma_addr_t dma_get_device_base(struct device *dev,
					     struct dma_coherent_mem * mem)
{
	if (mem->use_dev_dma_pfn_offset)
		return (mem->pfn_base - dev->dma_pfn_offset) << PAGE_SHIFT;
	else
		return mem->device_base;
}

static bool dma_init_coherent_memory(
	phys_addr_t phys_addr, dma_addr_t device_addr, size_t size, int flags,
	struct dma_coherent_mem **mem)
{
	struct dma_coherent_mem *dma_mem = NULL;
	void __iomem *mem_base = NULL;
	int pages = size >> PAGE_SHIFT;
	int bitmap_size = BITS_TO_LONGS(pages) * sizeof(long);

	if ((flags & (DMA_MEMORY_MAP | DMA_MEMORY_IO)) == 0)
		goto out;
	if (!size)
		goto out;

	if (flags & DMA_MEMORY_MAP)
		mem_base = memremap(phys_addr, size, MEMREMAP_WC);
	else
		mem_base = ioremap(phys_addr, size);
	if (!mem_base)
		goto out;

	dma_mem = kzalloc(sizeof(struct dma_coherent_mem), GFP_KERNEL);
	if (!dma_mem)
		goto out;
	dma_mem->bitmap = kzalloc(bitmap_size, GFP_KERNEL);
	if (!dma_mem->bitmap)
		goto out;

	dma_mem->virt_base = mem_base;
	dma_mem->device_base = device_addr;
	dma_mem->pfn_base = PFN_DOWN(phys_addr);
	dma_mem->size = pages;
	dma_mem->flags = flags;
	spin_lock_init(&dma_mem->spinlock);

	*mem = dma_mem;
	return true;

out:
	kfree(dma_mem);
	if (mem_base) {
		if (flags & DMA_MEMORY_MAP)
			memunmap(mem_base);
		else
			iounmap(mem_base);
	}
	return false;
}

static void dma_release_coherent_memory(struct dma_coherent_mem *mem)
{
	if (!mem)
		return;

	if (mem->flags & DMA_MEMORY_MAP)
		memunmap(mem->virt_base);
	else
		iounmap(mem->virt_base);
	kfree(mem->bitmap);
	kfree(mem);
}

static int dma_assign_coherent_memory(struct device *dev,
				      struct dma_coherent_mem *mem)
{
	if (!dev)
		return -ENODEV;

	if (dev->dma_mem)
		return -EBUSY;

	dev->dma_mem = mem;
	/* FIXME: this routine just ignores DMA_MEMORY_INCLUDES_CHILDREN */

	return 0;
}

int dma_declare_coherent_memory(struct device *dev, phys_addr_t phys_addr,
				dma_addr_t device_addr, size_t size, int flags)
{
	struct dma_coherent_mem *mem;

	if (!dma_init_coherent_memory(phys_addr, device_addr, size, flags,
				      &mem))
		return 0;

	if (dma_assign_coherent_memory(dev, mem) == 0)
		return flags & DMA_MEMORY_MAP ? DMA_MEMORY_MAP : DMA_MEMORY_IO;

	dma_release_coherent_memory(mem);
	return 0;
}
EXPORT_SYMBOL(dma_declare_coherent_memory);

void dma_release_declared_memory(struct device *dev)
{
	struct dma_coherent_mem *mem = dev->dma_mem;

	if (!mem)
		return;
	dma_release_coherent_memory(mem);
	dev->dma_mem = NULL;
}
EXPORT_SYMBOL(dma_release_declared_memory);

void *dma_mark_declared_memory_occupied(struct device *dev,
					dma_addr_t device_addr, size_t size)
{
	struct dma_coherent_mem *mem = dev->dma_mem;
	unsigned long flags;
	int pos, err;

	size += device_addr & ~PAGE_MASK;

	if (!mem)
		return ERR_PTR(-EINVAL);

	spin_lock_irqsave(&mem->spinlock, flags);
	pos = PFN_DOWN(device_addr - dma_get_device_base(dev, mem));
	err = bitmap_allocate_region(mem->bitmap, pos, get_order(size));
	spin_unlock_irqrestore(&mem->spinlock, flags);

	if (err != 0)
		return ERR_PTR(err);
	return mem->virt_base + (pos << PAGE_SHIFT);
}
EXPORT_SYMBOL(dma_mark_declared_memory_occupied);

static void *__dma_alloc_from_coherent(struct dma_coherent_mem *mem,
		ssize_t size, dma_addr_t *dma_handle)
{
	int order = get_order(size);
	unsigned long flags;
	int pageno;
	int dma_memory_map;
	void *ret;

	spin_lock_irqsave(&mem->spinlock, flags);

	if (unlikely(size > (mem->size << PAGE_SHIFT)))
		goto err;

	pageno = bitmap_find_free_region(mem->bitmap, mem->size, order);
	if (unlikely(pageno < 0))
		goto err;

	/*
	 * Memory was found in the coherent area.
	 */
	*dma_handle = mem->device_base + (pageno << PAGE_SHIFT);
	ret = mem->virt_base + (pageno << PAGE_SHIFT);
	dma_memory_map = (mem->flags & DMA_MEMORY_MAP);
	spin_unlock_irqrestore(&mem->spinlock, flags);
	if (dma_memory_map)
		memset(ret, 0, size);
	else
		memset_io(ret, 0, size);

	return ret;

err:
	spin_unlock_irqrestore(&mem->spinlock, flags);
	return NULL;
}

/**
 * dma_alloc_from_dev_coherent() - allocate memory from device coherent pool
 * @dev:	device from which we allocate memory
 * @size:	size of requested memory area
 * @dma_handle:	This will be filled with the correct dma handle
 * @ret:	This pointer will be filled with the virtual address
 *		to allocated area.
 *
 * This function should be only called from per-arch dma_alloc_coherent()
 * to support allocation from per-device coherent memory pools.
 *
 * Returns 0 if dma_alloc_coherent should continue with allocating from
 * generic memory areas, or !0 if dma_alloc_coherent should return @ret.
 */
int dma_alloc_from_dev_coherent(struct device *dev, ssize_t size,
		dma_addr_t *dma_handle, void **ret)
{
	struct dma_coherent_mem *mem = dev_get_coherent_memory(dev);

	if (!mem)
		return 0;

	*ret = __dma_alloc_from_coherent(mem, size, dma_handle);
	if (*ret)
		return 1;

	/*
	 * In the case where the allocation can not be satisfied from the
	 * per-device area, try to fall back to generic memory if the
	 * constraints allow it.
	 */
	return mem->flags & DMA_MEMORY_EXCLUSIVE;
}
EXPORT_SYMBOL(dma_alloc_from_dev_coherent);

void *dma_alloc_from_global_coherent(ssize_t size, dma_addr_t *dma_handle)
{
	if (!dma_coherent_default_memory)
		return NULL;

	return __dma_alloc_from_coherent(dma_coherent_default_memory, size,
			dma_handle);
}

static int __dma_release_from_coherent(struct dma_coherent_mem *mem,
				       int order, void *vaddr)
{
	if (mem && vaddr >= mem->virt_base && vaddr <
		   (mem->virt_base + (mem->size << PAGE_SHIFT))) {
		int page = (vaddr - mem->virt_base) >> PAGE_SHIFT;
		unsigned long flags;

		spin_lock_irqsave(&mem->spinlock, flags);
		bitmap_release_region(mem->bitmap, page, order);
		spin_unlock_irqrestore(&mem->spinlock, flags);
		return 1;
	}
	return 0;
}

/**
 * dma_release_from_dev_coherent() - free memory to device coherent memory pool
 * @dev:	device from which the memory was allocated
 * @order:	the order of pages allocated
 * @vaddr:	virtual address of allocated pages
 *
 * This checks whether the memory was allocated from the per-device
 * coherent memory pool and if so, releases that memory.
 *
 * Returns 1 if we correctly released the memory, or 0 if the caller should
 * proceed with releasing memory from generic pools.
 */
int dma_release_from_dev_coherent(struct device *dev, int order, void *vaddr)
{
	struct dma_coherent_mem *mem = dev_get_coherent_memory(dev);

	return __dma_release_from_coherent(mem, order, vaddr);
}
EXPORT_SYMBOL(dma_release_from_dev_coherent);

int dma_release_from_global_coherent(int order, void *vaddr)
{
	if (!dma_coherent_default_memory)
		return 0;

	return __dma_release_from_coherent(dma_coherent_default_memory, order,
			vaddr);
}

static int __dma_mmap_from_coherent(struct dma_coherent_mem *mem,
		struct vm_area_struct *vma, void *vaddr, size_t size, int *ret)
{
	if (mem && vaddr >= mem->virt_base && vaddr + size <=
		   (mem->virt_base + (mem->size << PAGE_SHIFT))) {
		unsigned long off = vma->vm_pgoff;
		int start = (vaddr - mem->virt_base) >> PAGE_SHIFT;
		int user_count = vma_pages(vma);
		int count = PAGE_ALIGN(size) >> PAGE_SHIFT;

		*ret = -ENXIO;
		if (off < count && user_count <= count - off) {
			unsigned long pfn = mem->pfn_base + start + off;
			*ret = remap_pfn_range(vma, vma->vm_start, pfn,
					       user_count << PAGE_SHIFT,
					       vma->vm_page_prot);
		}
		return 1;
	}
	return 0;
}

/**
 * dma_mmap_from_dev_coherent() - mmap memory from the device coherent pool
 * @dev:	device from which the memory was allocated
 * @vma:	vm_area for the userspace memory
 * @vaddr:	cpu address returned by dma_alloc_from_dev_coherent
 * @size:	size of the memory buffer allocated
 * @ret:	result from remap_pfn_range()
 *
 * This checks whether the memory was allocated from the per-device
 * coherent memory pool and if so, maps that memory to the provided vma.
 *
 * Returns 1 if we correctly mapped the memory, or 0 if the caller should
 * proceed with mapping memory from generic pools.
 */
int dma_mmap_from_dev_coherent(struct device *dev, struct vm_area_struct *vma,
			   void *vaddr, size_t size, int *ret)
{
	struct dma_coherent_mem *mem = dev_get_coherent_memory(dev);

	return __dma_mmap_from_coherent(mem, vma, vaddr, size, ret);
}
EXPORT_SYMBOL(dma_mmap_from_dev_coherent);

int dma_mmap_from_global_coherent(struct vm_area_struct *vma, void *vaddr,
				   size_t size, int *ret)
{
	if (!dma_coherent_default_memory)
		return 0;

	return __dma_mmap_from_coherent(dma_coherent_default_memory, vma,
					vaddr, size, ret);
}

/*
 * Support for reserved memory regions defined in device tree
 */
#ifdef CONFIG_OF_RESERVED_MEM
#include <linux/of.h>
#include <linux/of_fdt.h>
#include <linux/of_reserved_mem.h>

static struct reserved_mem *dma_reserved_default_memory __initdata;

static int rmem_dma_device_init(struct reserved_mem *rmem, struct device *dev)
{
	struct dma_coherent_mem *mem = rmem->priv;

	if (!mem &&
	    !dma_init_coherent_memory(rmem->base, rmem->base, rmem->size,
				      DMA_MEMORY_MAP | DMA_MEMORY_EXCLUSIVE,
				      &mem)) {
		pr_err("Reserved memory: failed to init DMA memory pool at %pa, size %ld MiB\n",
			&rmem->base, (unsigned long)rmem->size / SZ_1M);
		return -ENODEV;
	}
	mem->use_dev_dma_pfn_offset = true;
	rmem->priv = mem;
	dma_assign_coherent_memory(dev, mem);
	return 0;
}

static void rmem_dma_device_release(struct reserved_mem *rmem,
				    struct device *dev)
{
	if (dev)
		dev->dma_mem = NULL;
}

static const struct reserved_mem_ops rmem_dma_ops = {
	.device_init	= rmem_dma_device_init,
	.device_release	= rmem_dma_device_release,
};

static int __init rmem_dma_setup(struct reserved_mem *rmem)
{
	unsigned long node = rmem->fdt_node;

	if (of_get_flat_dt_prop(node, "reusable", NULL))
		return -EINVAL;

#ifdef CONFIG_ARM
	if (!of_get_flat_dt_prop(node, "no-map", NULL)) {
		pr_err("Reserved memory: regions without no-map are not yet supported\n");
		return -EINVAL;
	}

	if (of_get_flat_dt_prop(node, "linux,dma-default", NULL)) {
		WARN(dma_reserved_default_memory,
		     "Reserved memory: region for default DMA coherent area is redefined\n");
		dma_reserved_default_memory = rmem;
	}
#endif

	rmem->ops = &rmem_dma_ops;
	pr_info("Reserved memory: created DMA memory pool at %pa, size %ld MiB\n",
		&rmem->base, (unsigned long)rmem->size / SZ_1M);
	return 0;
}

static int __init dma_init_reserved_memory(void)
{
	const struct reserved_mem_ops *ops;
	int ret;

	if (!dma_reserved_default_memory)
		return -ENOMEM;

	ops = dma_reserved_default_memory->ops;

	/*
	 * We rely on rmem_dma_device_init() does not propagate error of
	 * dma_assign_coherent_memory() for "NULL" device.
	 */
	ret = ops->device_init(dma_reserved_default_memory, NULL);

	if (!ret) {
		dma_coherent_default_memory = dma_reserved_default_memory->priv;
		pr_info("DMA: default coherent area is set\n");
	}

	return ret;
}

core_initcall(dma_init_reserved_memory);

RESERVEDMEM_OF_DECLARE(dma, "shared-dma-pool", rmem_dma_setup);
#endif
Commit	Line	Data
ee7e5516 DES	1	/*
	2	* Coherent per-device memory handling.
	3	* Borrowed from i386
	4	*/
6b03ae0d	5	#include <linux/io.h>
5a0e3ad6	6	#include <linux/slab.h>
ee7e5516	7	#include <linux/kernel.h>
08a999ce	8	#include <linux/module.h>
ee7e5516 DES	9	#include <linux/dma-mapping.h>
	10
	11	struct dma_coherent_mem {
	12	void *virt_base;
ed1d218c	13	dma_addr_t device_base;
88a984ba	14	unsigned long pfn_base;
ee7e5516 DES	15	int size;
	16	int flags;
	17	unsigned long *bitmap;
7bfa5ab6	18	spinlock_t spinlock;
c41f9ea9	19	bool use_dev_dma_pfn_offset;
ee7e5516 DES	20	};
ee7e5516 DES	21
93228b44 VM	22	static struct dma_coherent_mem *dma_coherent_default_memory __ro_after_init;
	23
	24	static inline struct dma_coherent_mem dev_get_coherent_memory(struct device dev)
	25	{
	26	if (dev && dev->dma_mem)
	27	return dev->dma_mem;
43fc509c	28	return NULL;
93228b44 VM	29	}
93228b44 VM	30
c41f9ea9 VM	31	static inline dma_addr_t dma_get_device_base(struct device *dev,
	32	struct dma_coherent_mem * mem)
	33	{
	34	if (mem->use_dev_dma_pfn_offset)
	35	return (mem->pfn_base - dev->dma_pfn_offset) << PAGE_SHIFT;
	36	else
	37	return mem->device_base;
	38	}
	39
9e5b3d6f MN	40	static bool dma_init_coherent_memory(
	41	phys_addr_t phys_addr, dma_addr_t device_addr, size_t size, int flags,
	42	struct dma_coherent_mem **mem)
ee7e5516	43	{
7bfa5ab6	44	struct dma_coherent_mem *dma_mem = NULL;
ee7e5516 DES	45	void __iomem *mem_base = NULL;
	46	int pages = size >> PAGE_SHIFT;
	47	int bitmap_size = BITS_TO_LONGS(pages) * sizeof(long);
	48
	49	if ((flags & (DMA_MEMORY_MAP \| DMA_MEMORY_IO)) == 0)
	50	goto out;
	51	if (!size)
	52	goto out;
ee7e5516	53
6b03ae0d BS	54	if (flags & DMA_MEMORY_MAP)
	55	mem_base = memremap(phys_addr, size, MEMREMAP_WC);
	56	else
	57	mem_base = ioremap(phys_addr, size);
ee7e5516 DES	58	if (!mem_base)
	59	goto out;
	60
7bfa5ab6 MS	61	dma_mem = kzalloc(sizeof(struct dma_coherent_mem), GFP_KERNEL);
7bfa5ab6 MS	62	if (!dma_mem)
ee7e5516	63	goto out;
7bfa5ab6 MS	64	dma_mem->bitmap = kzalloc(bitmap_size, GFP_KERNEL);
	65	if (!dma_mem->bitmap)
	66	goto out;
	67
	68	dma_mem->virt_base = mem_base;
	69	dma_mem->device_base = device_addr;
	70	dma_mem->pfn_base = PFN_DOWN(phys_addr);
	71	dma_mem->size = pages;
	72	dma_mem->flags = flags;
	73	spin_lock_init(&dma_mem->spinlock);
ee7e5516	74
7bfa5ab6	75	*mem = dma_mem;
9e5b3d6f	76	return true;
ee7e5516	77
7bfa5ab6 MS	78	out:
7bfa5ab6 MS	79	kfree(dma_mem);
6b03ae0d BS	80	if (mem_base) {
	81	if (flags & DMA_MEMORY_MAP)
	82	memunmap(mem_base);
	83	else
	84	iounmap(mem_base);
	85	}
9e5b3d6f	86	return false;
ee7e5516	87	}
7bfa5ab6 MS	88
	89	static void dma_release_coherent_memory(struct dma_coherent_mem *mem)
	90	{
	91	if (!mem)
	92	return;
6b03ae0d BS	93
	94	if (mem->flags & DMA_MEMORY_MAP)
	95	memunmap(mem->virt_base);
	96	else
	97	iounmap(mem->virt_base);
7bfa5ab6 MS	98	kfree(mem->bitmap);
	99	kfree(mem);
	100	}
	101
	102	static int dma_assign_coherent_memory(struct device *dev,
	103	struct dma_coherent_mem *mem)
	104	{
93228b44 VM	105	if (!dev)
	106	return -ENODEV;
	107
7bfa5ab6 MS	108	if (dev->dma_mem)
	109	return -EBUSY;
	110
	111	dev->dma_mem = mem;
	112	/* FIXME: this routine just ignores DMA_MEMORY_INCLUDES_CHILDREN */
	113
	114	return 0;
	115	}
	116
	117	int dma_declare_coherent_memory(struct device *dev, phys_addr_t phys_addr,
	118	dma_addr_t device_addr, size_t size, int flags)
	119	{
	120	struct dma_coherent_mem *mem;
7bfa5ab6	121
9e5b3d6f MN	122	if (!dma_init_coherent_memory(phys_addr, device_addr, size, flags,
9e5b3d6f MN	123	&mem))
7bfa5ab6 MS	124	return 0;
	125
	126	if (dma_assign_coherent_memory(dev, mem) == 0)
9e5b3d6f	127	return flags & DMA_MEMORY_MAP ? DMA_MEMORY_MAP : DMA_MEMORY_IO;
7bfa5ab6 MS	128
	129	dma_release_coherent_memory(mem);
	130	return 0;
	131	}
ee7e5516 DES	132	EXPORT_SYMBOL(dma_declare_coherent_memory);
	133
	134	void dma_release_declared_memory(struct device *dev)
	135	{
	136	struct dma_coherent_mem *mem = dev->dma_mem;
	137
	138	if (!mem)
	139	return;
7bfa5ab6	140	dma_release_coherent_memory(mem);
ee7e5516	141	dev->dma_mem = NULL;
ee7e5516 DES	142	}
	143	EXPORT_SYMBOL(dma_release_declared_memory);
	144
	145	void dma_mark_declared_memory_occupied(struct device dev,
	146	dma_addr_t device_addr, size_t size)
	147	{
	148	struct dma_coherent_mem *mem = dev->dma_mem;
7bfa5ab6	149	unsigned long flags;
ee7e5516	150	int pos, err;
ee7e5516	151
d2dc1f4a	152	size += device_addr & ~PAGE_MASK;
ee7e5516 DES	153
	154	if (!mem)
	155	return ERR_PTR(-EINVAL);
	156
7bfa5ab6	157	spin_lock_irqsave(&mem->spinlock, flags);
c41f9ea9	158	pos = PFN_DOWN(device_addr - dma_get_device_base(dev, mem));
d2dc1f4a	159	err = bitmap_allocate_region(mem->bitmap, pos, get_order(size));
7bfa5ab6 MS	160	spin_unlock_irqrestore(&mem->spinlock, flags);
7bfa5ab6 MS	161
ee7e5516 DES	162	if (err != 0)
	163	return ERR_PTR(err);
	164	return mem->virt_base + (pos << PAGE_SHIFT);
	165	}
	166	EXPORT_SYMBOL(dma_mark_declared_memory_occupied);
	167
43fc509c VM	168	static void __dma_alloc_from_coherent(struct dma_coherent_mem mem,
43fc509c VM	169	ssize_t size, dma_addr_t *dma_handle)
ee7e5516	170	{
ee7e5516	171	int order = get_order(size);
7bfa5ab6	172	unsigned long flags;
eccd83e1	173	int pageno;
dd01c75f	174	int dma_memory_map;
43fc509c	175	void *ret;
ee7e5516	176
7bfa5ab6	177	spin_lock_irqsave(&mem->spinlock, flags);
0609697e	178
cdf57cab	179	if (unlikely(size > (mem->size << PAGE_SHIFT)))
0609697e	180	goto err;
eccd83e1 AM	181
eccd83e1 AM	182	pageno = bitmap_find_free_region(mem->bitmap, mem->size, order);
0609697e PM	183	if (unlikely(pageno < 0))
	184	goto err;
	185
	186	/*
43fc509c	187	* Memory was found in the coherent area.
0609697e	188	*/
43fc509c VM	189	*dma_handle = mem->device_base + (pageno << PAGE_SHIFT);
43fc509c VM	190	ret = mem->virt_base + (pageno << PAGE_SHIFT);
dd01c75f BH	191	dma_memory_map = (mem->flags & DMA_MEMORY_MAP);
	192	spin_unlock_irqrestore(&mem->spinlock, flags);
	193	if (dma_memory_map)
43fc509c	194	memset(ret, 0, size);
20d7a35b	195	else
43fc509c	196	memset_io(ret, 0, size);
0609697e	197
43fc509c	198	return ret;
0609697e PM	199
0609697e PM	200	err:
7bfa5ab6	201	spin_unlock_irqrestore(&mem->spinlock, flags);
43fc509c VM	202	return NULL;
	203	}
	204
	205	/**
	206	* dma_alloc_from_dev_coherent() - allocate memory from device coherent pool
	207	* @dev: device from which we allocate memory
	208	* @size: size of requested memory area
	209	* @dma_handle: This will be filled with the correct dma handle
	210	* @ret: This pointer will be filled with the virtual address
	211	* to allocated area.
	212	*
	213	* This function should be only called from per-arch dma_alloc_coherent()
	214	* to support allocation from per-device coherent memory pools.
	215	*
	216	* Returns 0 if dma_alloc_coherent should continue with allocating from
	217	* generic memory areas, or !0 if dma_alloc_coherent should return @ret.
	218	*/
	219	int dma_alloc_from_dev_coherent(struct device *dev, ssize_t size,
	220	dma_addr_t dma_handle, void *ret)
	221	{
	222	struct dma_coherent_mem *mem = dev_get_coherent_memory(dev);
	223
	224	if (!mem)
	225	return 0;
	226
	227	*ret = __dma_alloc_from_coherent(mem, size, dma_handle);
	228	if (*ret)
	229	return 1;
	230
0609697e PM	231	/*
	232	* In the case where the allocation can not be satisfied from the
	233	* per-device area, try to fall back to generic memory if the
	234	* constraints allow it.
	235	*/
	236	return mem->flags & DMA_MEMORY_EXCLUSIVE;
ee7e5516	237	}
43fc509c	238	EXPORT_SYMBOL(dma_alloc_from_dev_coherent);
ee7e5516	239
43fc509c	240	void dma_alloc_from_global_coherent(ssize_t size, dma_addr_t dma_handle)
ee7e5516	241	{
43fc509c VM	242	if (!dma_coherent_default_memory)
	243	return NULL;
	244
	245	return __dma_alloc_from_coherent(dma_coherent_default_memory, size,
	246	dma_handle);
	247	}
ee7e5516	248
43fc509c VM	249	static int __dma_release_from_coherent(struct dma_coherent_mem *mem,
	250	int order, void *vaddr)
	251	{
ee7e5516 DES	252	if (mem && vaddr >= mem->virt_base && vaddr <
	253	(mem->virt_base + (mem->size << PAGE_SHIFT))) {
	254	int page = (vaddr - mem->virt_base) >> PAGE_SHIFT;
7bfa5ab6	255	unsigned long flags;
ee7e5516	256
7bfa5ab6	257	spin_lock_irqsave(&mem->spinlock, flags);
ee7e5516	258	bitmap_release_region(mem->bitmap, page, order);
7bfa5ab6	259	spin_unlock_irqrestore(&mem->spinlock, flags);
ee7e5516 DES	260	return 1;
	261	}
	262	return 0;
	263	}
bca0fa5f MS	264
bca0fa5f MS	265	/**
43fc509c	266	* dma_release_from_dev_coherent() - free memory to device coherent memory pool
bca0fa5f	267	* @dev: device from which the memory was allocated
43fc509c VM	268	* @order: the order of pages allocated
43fc509c VM	269	* @vaddr: virtual address of allocated pages
bca0fa5f MS	270	*
bca0fa5f MS	271	* This checks whether the memory was allocated from the per-device
43fc509c	272	* coherent memory pool and if so, releases that memory.
bca0fa5f	273	*
43fc509c VM	274	* Returns 1 if we correctly released the memory, or 0 if the caller should
43fc509c VM	275	* proceed with releasing memory from generic pools.
bca0fa5f	276	*/
43fc509c	277	int dma_release_from_dev_coherent(struct device dev, int order, void vaddr)
bca0fa5f	278	{
93228b44	279	struct dma_coherent_mem *mem = dev_get_coherent_memory(dev);
bca0fa5f	280
43fc509c VM	281	return __dma_release_from_coherent(mem, order, vaddr);
	282	}
	283	EXPORT_SYMBOL(dma_release_from_dev_coherent);
	284
	285	int dma_release_from_global_coherent(int order, void *vaddr)
	286	{
	287	if (!dma_coherent_default_memory)
	288	return 0;
	289
	290	return __dma_release_from_coherent(dma_coherent_default_memory, order,
	291	vaddr);
	292	}
	293
	294	static int __dma_mmap_from_coherent(struct dma_coherent_mem *mem,
	295	struct vm_area_struct vma, void vaddr, size_t size, int *ret)
	296	{
bca0fa5f MS	297	if (mem && vaddr >= mem->virt_base && vaddr + size <=
	298	(mem->virt_base + (mem->size << PAGE_SHIFT))) {
	299	unsigned long off = vma->vm_pgoff;
	300	int start = (vaddr - mem->virt_base) >> PAGE_SHIFT;
e688f144	301	int user_count = vma_pages(vma);
9ca5d4fd	302	int count = PAGE_ALIGN(size) >> PAGE_SHIFT;
bca0fa5f MS	303
	304	*ret = -ENXIO;
	305	if (off < count && user_count <= count - off) {
88a984ba	306	unsigned long pfn = mem->pfn_base + start + off;
bca0fa5f MS	307	*ret = remap_pfn_range(vma, vma->vm_start, pfn,
	308	user_count << PAGE_SHIFT,
	309	vma->vm_page_prot);
	310	}
	311	return 1;
	312	}
	313	return 0;
	314	}
43fc509c VM	315
	316	/**
	317	* dma_mmap_from_dev_coherent() - mmap memory from the device coherent pool
	318	* @dev: device from which the memory was allocated
	319	* @vma: vm_area for the userspace memory
	320	* @vaddr: cpu address returned by dma_alloc_from_dev_coherent
	321	* @size: size of the memory buffer allocated
	322	* @ret: result from remap_pfn_range()
	323	*
	324	* This checks whether the memory was allocated from the per-device
	325	* coherent memory pool and if so, maps that memory to the provided vma.
	326	*
	327	* Returns 1 if we correctly mapped the memory, or 0 if the caller should
	328	* proceed with mapping memory from generic pools.
	329	*/
	330	int dma_mmap_from_dev_coherent(struct device dev, struct vm_area_struct vma,
	331	void vaddr, size_t size, int ret)
	332	{
	333	struct dma_coherent_mem *mem = dev_get_coherent_memory(dev);
	334
	335	return __dma_mmap_from_coherent(mem, vma, vaddr, size, ret);
	336	}
	337	EXPORT_SYMBOL(dma_mmap_from_dev_coherent);
	338
	339	int dma_mmap_from_global_coherent(struct vm_area_struct vma, void vaddr,
	340	size_t size, int *ret)
	341	{
	342	if (!dma_coherent_default_memory)
	343	return 0;
	344
	345	return __dma_mmap_from_coherent(dma_coherent_default_memory, vma,
	346	vaddr, size, ret);
	347	}
7bfa5ab6 MS	348
	349	/*
	350	* Support for reserved memory regions defined in device tree
	351	*/
	352	#ifdef CONFIG_OF_RESERVED_MEM
	353	#include <linux/of.h>
	354	#include <linux/of_fdt.h>
	355	#include <linux/of_reserved_mem.h>
	356
93228b44 VM	357	static struct reserved_mem *dma_reserved_default_memory __initdata;
93228b44 VM	358
7bfa5ab6 MS	359	static int rmem_dma_device_init(struct reserved_mem rmem, struct device dev)
	360	{
	361	struct dma_coherent_mem *mem = rmem->priv;
	362
	363	if (!mem &&
9e5b3d6f MN	364	!dma_init_coherent_memory(rmem->base, rmem->base, rmem->size,
	365	DMA_MEMORY_MAP \| DMA_MEMORY_EXCLUSIVE,
	366	&mem)) {
7bfa5ab6 MS	367	pr_err("Reserved memory: failed to init DMA memory pool at %pa, size %ld MiB\n",
	368	&rmem->base, (unsigned long)rmem->size / SZ_1M);
	369	return -ENODEV;
	370	}
c41f9ea9	371	mem->use_dev_dma_pfn_offset = true;
7bfa5ab6 MS	372	rmem->priv = mem;
	373	dma_assign_coherent_memory(dev, mem);
	374	return 0;
	375	}
	376
	377	static void rmem_dma_device_release(struct reserved_mem *rmem,
	378	struct device *dev)
	379	{
93228b44 VM	380	if (dev)
93228b44 VM	381	dev->dma_mem = NULL;
7bfa5ab6 MS	382	}
	383
	384	static const struct reserved_mem_ops rmem_dma_ops = {
	385	.device_init = rmem_dma_device_init,
	386	.device_release = rmem_dma_device_release,
	387	};
	388
	389	static int __init rmem_dma_setup(struct reserved_mem *rmem)
	390	{
	391	unsigned long node = rmem->fdt_node;
	392
	393	if (of_get_flat_dt_prop(node, "reusable", NULL))
	394	return -EINVAL;
	395
	396	#ifdef CONFIG_ARM
	397	if (!of_get_flat_dt_prop(node, "no-map", NULL)) {
	398	pr_err("Reserved memory: regions without no-map are not yet supported\n");
	399	return -EINVAL;
	400	}
93228b44 VM	401
	402	if (of_get_flat_dt_prop(node, "linux,dma-default", NULL)) {
	403	WARN(dma_reserved_default_memory,
	404	"Reserved memory: region for default DMA coherent area is redefined\n");
	405	dma_reserved_default_memory = rmem;
	406	}
7bfa5ab6 MS	407	#endif
	408
	409	rmem->ops = &rmem_dma_ops;
	410	pr_info("Reserved memory: created DMA memory pool at %pa, size %ld MiB\n",
	411	&rmem->base, (unsigned long)rmem->size / SZ_1M);
	412	return 0;
	413	}
93228b44 VM	414
	415	static int __init dma_init_reserved_memory(void)
	416	{
	417	const struct reserved_mem_ops *ops;
	418	int ret;
	419
	420	if (!dma_reserved_default_memory)
	421	return -ENOMEM;
	422
	423	ops = dma_reserved_default_memory->ops;
	424
	425	/*
	426	* We rely on rmem_dma_device_init() does not propagate error of
	427	* dma_assign_coherent_memory() for "NULL" device.
	428	*/
	429	ret = ops->device_init(dma_reserved_default_memory, NULL);
	430
	431	if (!ret) {
	432	dma_coherent_default_memory = dma_reserved_default_memory->priv;
	433	pr_info("DMA: default coherent area is set\n");
	434	}
	435
	436	return ret;
	437	}
	438
	439	core_initcall(dma_init_reserved_memory);
	440
7bfa5ab6 MS	441	RESERVEDMEM_OF_DECLARE(dma, "shared-dma-pool", rmem_dma_setup);
7bfa5ab6 MS	442	#endif