[mirror_ubuntu-artful-kernel.git] / arch / x86 / kernel / tce_64.c

/*
 * This file manages the translation entries for the IBM Calgary IOMMU.
 *
 * Derived from arch/powerpc/platforms/pseries/iommu.c
 *
 * Copyright (C) IBM Corporation, 2006
 *
 * Author: Jon Mason <jdmason@us.ibm.com>
 * Author: Muli Ben-Yehuda <muli@il.ibm.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * 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
 */

#include <linux/types.h>
#include <linux/slab.h>
#include <linux/mm.h>
#include <linux/spinlock.h>
#include <linux/string.h>
#include <linux/pci.h>
#include <linux/dma-mapping.h>
#include <linux/bootmem.h>
#include <asm/tce.h>
#include <asm/calgary.h>
#include <asm/proto.h>
#include <asm/cacheflush.h>

/* flush a tce at 'tceaddr' to main memory */
static inline void flush_tce(void* tceaddr)
{
	/* a single tce can't cross a cache line */
	if (boot_cpu_has(X86_FEATURE_CLFLUSH))
		clflush(tceaddr);
	else
		wbinvd();
}

void tce_build(struct iommu_table *tbl, unsigned long index,
	unsigned int npages, unsigned long uaddr, int direction)
{
	u64* tp;
	u64 t;
	u64 rpn;

	t = (1 << TCE_READ_SHIFT);
	if (direction != DMA_TO_DEVICE)
		t |= (1 << TCE_WRITE_SHIFT);

	tp = ((u64*)tbl->it_base) + index;

	while (npages--) {
		rpn = (virt_to_bus((void*)uaddr)) >> PAGE_SHIFT;
		t &= ~TCE_RPN_MASK;
		t |= (rpn << TCE_RPN_SHIFT);

		*tp = cpu_to_be64(t);
		flush_tce(tp);

		uaddr += PAGE_SIZE;
		tp++;
	}
}

void tce_free(struct iommu_table *tbl, long index, unsigned int npages)
{
	u64* tp;

	tp  = ((u64*)tbl->it_base) + index;

	while (npages--) {
		*tp = cpu_to_be64(0);
		flush_tce(tp);
		tp++;
	}
}

static inline unsigned int table_size_to_number_of_entries(unsigned char size)
{
	/*
	 * size is the order of the table, 0-7
	 * smallest table is 8K entries, so shift result by 13 to
	 * multiply by 8K
	 */
	return (1 << size) << 13;
}

static int tce_table_setparms(struct pci_dev *dev, struct iommu_table *tbl)
{
	unsigned int bitmapsz;
	unsigned long bmppages;
	int ret;

	tbl->it_busno = dev->bus->number;

	/* set the tce table size - measured in entries */
	tbl->it_size = table_size_to_number_of_entries(specified_table_size);

	/*
	 * number of bytes needed for the bitmap size in number of
	 * entries; we need one bit per entry
	 */
	bitmapsz = tbl->it_size / BITS_PER_BYTE;
	bmppages = __get_free_pages(GFP_KERNEL, get_order(bitmapsz));
	if (!bmppages) {
		printk(KERN_ERR "Calgary: cannot allocate bitmap\n");
		ret = -ENOMEM;
		goto done;
	}

	tbl->it_map = (unsigned long*)bmppages;

	memset(tbl->it_map, 0, bitmapsz);

	tbl->it_hint = 0;

	spin_lock_init(&tbl->it_lock);

	return 0;

done:
	return ret;
}

int __init build_tce_table(struct pci_dev *dev, void __iomem *bbar)
{
	struct iommu_table *tbl;
	int ret;

	if (pci_iommu(dev->bus)) {
		printk(KERN_ERR "Calgary: dev %p has sysdata->iommu %p\n",
		       dev, pci_iommu(dev->bus));
		BUG();
	}

	tbl = kzalloc(sizeof(struct iommu_table), GFP_KERNEL);
	if (!tbl) {
		printk(KERN_ERR "Calgary: error allocating iommu_table\n");
		ret = -ENOMEM;
		goto done;
	}

	ret = tce_table_setparms(dev, tbl);
	if (ret)
		goto free_tbl;

	tbl->bbar = bbar;

	set_pci_iommu(dev->bus, tbl);

	return 0;

free_tbl:
	kfree(tbl);
done:
	return ret;
}

void * __init alloc_tce_table(void)
{
	unsigned int size;

	size = table_size_to_number_of_entries(specified_table_size);
	size *= TCE_ENTRY_SIZE;

	return __alloc_bootmem_low(size, size, 0);
}

void __init free_tce_table(void *tbl)
{
	unsigned int size;

	if (!tbl)
		return;

	size = table_size_to_number_of_entries(specified_table_size);
	size *= TCE_ENTRY_SIZE;

	free_bootmem(__pa(tbl), size);
}
Commit	Line	Data
e465058d	1	/*
5ba5891d AK	2	* This file manages the translation entries for the IBM Calgary IOMMU.
5ba5891d AK	3	*
e465058d JM	4	* Derived from arch/powerpc/platforms/pseries/iommu.c
e465058d JM	5	*
aa0a9f37 MBY	6	* Copyright (C) IBM Corporation, 2006
	7	*
	8	* Author: Jon Mason <jdmason@us.ibm.com>
	9	* Author: Muli Ben-Yehuda <muli@il.ibm.com>
e465058d JM	10	*
	11	* This program is free software; you can redistribute it and/or modify
	12	* it under the terms of the GNU General Public License as published by
	13	* the Free Software Foundation; either version 2 of the License, or
	14	* (at your option) any later version.
	15	*
	16	* This program is distributed in the hope that it will be useful,
	17	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	18	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	19	* GNU General Public License for more details.
	20	*
	21	* You should have received a copy of the GNU General Public License
	22	* along with this program; if not, write to the Free Software
	23	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	24	*/
	25
e465058d JM	26	#include <linux/types.h>
	27	#include <linux/slab.h>
	28	#include <linux/mm.h>
	29	#include <linux/spinlock.h>
	30	#include <linux/string.h>
	31	#include <linux/pci.h>
	32	#include <linux/dma-mapping.h>
	33	#include <linux/bootmem.h>
	34	#include <asm/tce.h>
	35	#include <asm/calgary.h>
	36	#include <asm/proto.h>
f05e798a	37	#include <asm/cacheflush.h>
e465058d JM	38
	39	/* flush a tce at 'tceaddr' to main memory */
	40	static inline void flush_tce(void* tceaddr)
	41	{
	42	/* a single tce can't cross a cache line */
906bf7fd	43	if (boot_cpu_has(X86_FEATURE_CLFLUSH))
6619a8fb	44	clflush(tceaddr);
e465058d	45	else
6619a8fb	46	wbinvd();
e465058d JM	47	}
	48
	49	void tce_build(struct iommu_table *tbl, unsigned long index,
	50	unsigned int npages, unsigned long uaddr, int direction)
	51	{
	52	u64* tp;
	53	u64 t;
	54	u64 rpn;
	55
	56	t = (1 << TCE_READ_SHIFT);
	57	if (direction != DMA_TO_DEVICE)
	58	t \|= (1 << TCE_WRITE_SHIFT);
	59
	60	tp = ((u64*)tbl->it_base) + index;
	61
	62	while (npages--) {
	63	rpn = (virt_to_bus((void*)uaddr)) >> PAGE_SHIFT;
	64	t &= ~TCE_RPN_MASK;
	65	t \|= (rpn << TCE_RPN_SHIFT);
	66
	67	*tp = cpu_to_be64(t);
	68	flush_tce(tp);
	69
	70	uaddr += PAGE_SIZE;
	71	tp++;
	72	}
	73	}
	74
	75	void tce_free(struct iommu_table *tbl, long index, unsigned int npages)
	76	{
	77	u64* tp;
	78
	79	tp = ((u64*)tbl->it_base) + index;
	80
	81	while (npages--) {
	82	*tp = cpu_to_be64(0);
	83	flush_tce(tp);
	84	tp++;
	85	}
	86	}
	87
	88	static inline unsigned int table_size_to_number_of_entries(unsigned char size)
	89	{
	90	/*
	91	* size is the order of the table, 0-7
	92	* smallest table is 8K entries, so shift result by 13 to
	93	* multiply by 8K
	94	*/
	95	return (1 << size) << 13;
	96	}
	97
	98	static int tce_table_setparms(struct pci_dev dev, struct iommu_table tbl)
	99	{
	100	unsigned int bitmapsz;
e465058d JM	101	unsigned long bmppages;
	102	int ret;
	103
	104	tbl->it_busno = dev->bus->number;
	105
	106	/* set the tce table size - measured in entries */
	107	tbl->it_size = table_size_to_number_of_entries(specified_table_size);
	108
e465058d JM	109	/*
	110	* number of bytes needed for the bitmap size in number of
	111	* entries; we need one bit per entry
	112	*/
	113	bitmapsz = tbl->it_size / BITS_PER_BYTE;
	114	bmppages = __get_free_pages(GFP_KERNEL, get_order(bitmapsz));
	115	if (!bmppages) {
	116	printk(KERN_ERR "Calgary: cannot allocate bitmap\n");
	117	ret = -ENOMEM;
	118	goto done;
	119	}
	120
	121	tbl->it_map = (unsigned long*)bmppages;
	122
	123	memset(tbl->it_map, 0, bitmapsz);
	124
	125	tbl->it_hint = 0;
	126
	127	spin_lock_init(&tbl->it_lock);
	128
	129	return 0;
	130
	131	done:
	132	return ret;
	133	}
	134
e6b33220	135	int __init build_tce_table(struct pci_dev dev, void __iomem bbar)
e465058d JM	136	{
	137	struct iommu_table *tbl;
	138	int ret;
	139
08f1c192 MBY	140	if (pci_iommu(dev->bus)) {
	141	printk(KERN_ERR "Calgary: dev %p has sysdata->iommu %p\n",
	142	dev, pci_iommu(dev->bus));
e465058d JM	143	BUG();
	144	}
	145
	146	tbl = kzalloc(sizeof(struct iommu_table), GFP_KERNEL);
	147	if (!tbl) {
	148	printk(KERN_ERR "Calgary: error allocating iommu_table\n");
	149	ret = -ENOMEM;
	150	goto done;
	151	}
	152
	153	ret = tce_table_setparms(dev, tbl);
	154	if (ret)
	155	goto free_tbl;
	156
e465058d JM	157	tbl->bbar = bbar;
e465058d JM	158
08f1c192	159	set_pci_iommu(dev->bus, tbl);
e465058d JM	160
	161	return 0;
	162
	163	free_tbl:
	164	kfree(tbl);
	165	done:
	166	return ret;
	167	}
	168
252c01dc	169	void * __init alloc_tce_table(void)
e465058d JM	170	{
	171	unsigned int size;
	172
	173	size = table_size_to_number_of_entries(specified_table_size);
	174	size *= TCE_ENTRY_SIZE;
	175
	176	return __alloc_bootmem_low(size, size, 0);
	177	}
	178
252c01dc	179	void __init free_tce_table(void *tbl)
e465058d JM	180	{
	181	unsigned int size;
	182
	183	if (!tbl)
	184	return;
	185
	186	size = table_size_to_number_of_entries(specified_table_size);
	187	size *= TCE_ENTRY_SIZE;
	188
	189	free_bootmem(__pa(tbl), size);
	190	}