1 /* Copyright (c) 2010-2011, Code Aurora Forum. All rights reserved.
3 * This program is free software; you can redistribute it and/or modify
4 * it under the terms of the GNU General Public License version 2 and
5 * only version 2 as published by the Free Software Foundation.
7 * This program is distributed in the hope that it will be useful,
8 * but WITHOUT ANY WARRANTY; without even the implied warranty of
9 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
10 * GNU General Public License for more details.
12 * You should have received a copy of the GNU General Public License
13 * along with this program; if not, write to the Free Software
14 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
18 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
19 #include <linux/kernel.h>
20 #include <linux/module.h>
21 #include <linux/platform_device.h>
22 #include <linux/errno.h>
24 #include <linux/interrupt.h>
25 #include <linux/list.h>
26 #include <linux/spinlock.h>
27 #include <linux/slab.h>
28 #include <linux/iommu.h>
29 #include <linux/clk.h>
31 #include <asm/cacheflush.h>
32 #include <asm/sizes.h>
34 #include <mach/iommu_hw-8xxx.h>
35 #include <mach/iommu.h>
37 #define MRC(reg, processor, op1, crn, crm, op2) \
38 __asm__ __volatile__ ( \
39 " mrc " #processor "," #op1 ", %0," #crn "," #crm "," #op2 "\n" \
42 #define RCP15_PRRR(reg) MRC(reg, p15, 0, c10, c2, 0)
43 #define RCP15_NMRR(reg) MRC(reg, p15, 0, c10, c2, 1)
45 /* bitmap of the page sizes currently supported */
46 #define MSM_IOMMU_PGSIZES (SZ_4K | SZ_64K | SZ_1M | SZ_16M)
48 static int msm_iommu_tex_class[4];
50 DEFINE_SPINLOCK(msm_iommu_lock);
53 unsigned long *pgtable;
54 struct list_head list_attached;
57 static int __enable_clocks(struct msm_iommu_drvdata *drvdata)
61 ret = clk_enable(drvdata->pclk);
66 ret = clk_enable(drvdata->clk);
68 clk_disable(drvdata->pclk);
74 static void __disable_clocks(struct msm_iommu_drvdata *drvdata)
77 clk_disable(drvdata->clk);
78 clk_disable(drvdata->pclk);
81 static int __flush_iotlb(struct iommu_domain *domain)
83 struct msm_priv *priv = domain->priv;
84 struct msm_iommu_drvdata *iommu_drvdata;
85 struct msm_iommu_ctx_drvdata *ctx_drvdata;
87 #ifndef CONFIG_IOMMU_PGTABLES_L2
88 unsigned long *fl_table = priv->pgtable;
91 if (!list_empty(&priv->list_attached)) {
92 dmac_flush_range(fl_table, fl_table + SZ_16K);
94 for (i = 0; i < NUM_FL_PTE; i++)
95 if ((fl_table[i] & 0x03) == FL_TYPE_TABLE) {
96 void *sl_table = __va(fl_table[i] &
98 dmac_flush_range(sl_table, sl_table + SZ_4K);
103 list_for_each_entry(ctx_drvdata, &priv->list_attached, attached_elm) {
104 if (!ctx_drvdata->pdev || !ctx_drvdata->pdev->dev.parent)
107 iommu_drvdata = dev_get_drvdata(ctx_drvdata->pdev->dev.parent);
108 BUG_ON(!iommu_drvdata);
110 ret = __enable_clocks(iommu_drvdata);
114 SET_CTX_TLBIALL(iommu_drvdata->base, ctx_drvdata->num, 0);
115 __disable_clocks(iommu_drvdata);
121 static void __reset_context(void __iomem *base, int ctx)
123 SET_BPRCOSH(base, ctx, 0);
124 SET_BPRCISH(base, ctx, 0);
125 SET_BPRCNSH(base, ctx, 0);
126 SET_BPSHCFG(base, ctx, 0);
127 SET_BPMTCFG(base, ctx, 0);
128 SET_ACTLR(base, ctx, 0);
129 SET_SCTLR(base, ctx, 0);
130 SET_FSRRESTORE(base, ctx, 0);
131 SET_TTBR0(base, ctx, 0);
132 SET_TTBR1(base, ctx, 0);
133 SET_TTBCR(base, ctx, 0);
134 SET_BFBCR(base, ctx, 0);
135 SET_PAR(base, ctx, 0);
136 SET_FAR(base, ctx, 0);
137 SET_CTX_TLBIALL(base, ctx, 0);
138 SET_TLBFLPTER(base, ctx, 0);
139 SET_TLBSLPTER(base, ctx, 0);
140 SET_TLBLKCR(base, ctx, 0);
141 SET_PRRR(base, ctx, 0);
142 SET_NMRR(base, ctx, 0);
145 static void __program_context(void __iomem *base, int ctx, phys_addr_t pgtable)
147 unsigned int prrr, nmrr;
148 __reset_context(base, ctx);
150 /* Set up HTW mode */
151 /* TLB miss configuration: perform HTW on miss */
152 SET_TLBMCFG(base, ctx, 0x3);
154 /* V2P configuration: HTW for access */
155 SET_V2PCFG(base, ctx, 0x3);
157 SET_TTBCR(base, ctx, 0);
158 SET_TTBR0_PA(base, ctx, (pgtable >> 14));
160 /* Invalidate the TLB for this context */
161 SET_CTX_TLBIALL(base, ctx, 0);
163 /* Set interrupt number to "secure" interrupt */
164 SET_IRPTNDX(base, ctx, 0);
166 /* Enable context fault interrupt */
167 SET_CFEIE(base, ctx, 1);
169 /* Stall access on a context fault and let the handler deal with it */
170 SET_CFCFG(base, ctx, 1);
172 /* Redirect all cacheable requests to L2 slave port. */
173 SET_RCISH(base, ctx, 1);
174 SET_RCOSH(base, ctx, 1);
175 SET_RCNSH(base, ctx, 1);
177 /* Turn on TEX Remap */
178 SET_TRE(base, ctx, 1);
180 /* Set TEX remap attributes */
183 SET_PRRR(base, ctx, prrr);
184 SET_NMRR(base, ctx, nmrr);
186 /* Turn on BFB prefetch */
187 SET_BFBDFE(base, ctx, 1);
189 #ifdef CONFIG_IOMMU_PGTABLES_L2
190 /* Configure page tables as inner-cacheable and shareable to reduce
191 * the TLB miss penalty.
193 SET_TTBR0_SH(base, ctx, 1);
194 SET_TTBR1_SH(base, ctx, 1);
196 SET_TTBR0_NOS(base, ctx, 1);
197 SET_TTBR1_NOS(base, ctx, 1);
199 SET_TTBR0_IRGNH(base, ctx, 0); /* WB, WA */
200 SET_TTBR0_IRGNL(base, ctx, 1);
202 SET_TTBR1_IRGNH(base, ctx, 0); /* WB, WA */
203 SET_TTBR1_IRGNL(base, ctx, 1);
205 SET_TTBR0_ORGN(base, ctx, 1); /* WB, WA */
206 SET_TTBR1_ORGN(base, ctx, 1); /* WB, WA */
213 static int msm_iommu_domain_init(struct iommu_domain *domain)
215 struct msm_priv *priv = kzalloc(sizeof(*priv), GFP_KERNEL);
220 INIT_LIST_HEAD(&priv->list_attached);
221 priv->pgtable = (unsigned long *)__get_free_pages(GFP_KERNEL,
227 memset(priv->pgtable, 0, SZ_16K);
236 static void msm_iommu_domain_destroy(struct iommu_domain *domain)
238 struct msm_priv *priv;
240 unsigned long *fl_table;
243 spin_lock_irqsave(&msm_iommu_lock, flags);
248 fl_table = priv->pgtable;
250 for (i = 0; i < NUM_FL_PTE; i++)
251 if ((fl_table[i] & 0x03) == FL_TYPE_TABLE)
252 free_page((unsigned long) __va(((fl_table[i]) &
255 free_pages((unsigned long)priv->pgtable, get_order(SZ_16K));
256 priv->pgtable = NULL;
260 spin_unlock_irqrestore(&msm_iommu_lock, flags);
263 static int msm_iommu_attach_dev(struct iommu_domain *domain, struct device *dev)
265 struct msm_priv *priv;
266 struct msm_iommu_ctx_dev *ctx_dev;
267 struct msm_iommu_drvdata *iommu_drvdata;
268 struct msm_iommu_ctx_drvdata *ctx_drvdata;
269 struct msm_iommu_ctx_drvdata *tmp_drvdata;
273 spin_lock_irqsave(&msm_iommu_lock, flags);
282 iommu_drvdata = dev_get_drvdata(dev->parent);
283 ctx_drvdata = dev_get_drvdata(dev);
284 ctx_dev = dev->platform_data;
286 if (!iommu_drvdata || !ctx_drvdata || !ctx_dev) {
291 if (!list_empty(&ctx_drvdata->attached_elm)) {
296 list_for_each_entry(tmp_drvdata, &priv->list_attached, attached_elm)
297 if (tmp_drvdata == ctx_drvdata) {
302 ret = __enable_clocks(iommu_drvdata);
306 __program_context(iommu_drvdata->base, ctx_dev->num,
307 __pa(priv->pgtable));
309 __disable_clocks(iommu_drvdata);
310 list_add(&(ctx_drvdata->attached_elm), &priv->list_attached);
311 ret = __flush_iotlb(domain);
314 spin_unlock_irqrestore(&msm_iommu_lock, flags);
318 static void msm_iommu_detach_dev(struct iommu_domain *domain,
321 struct msm_priv *priv;
322 struct msm_iommu_ctx_dev *ctx_dev;
323 struct msm_iommu_drvdata *iommu_drvdata;
324 struct msm_iommu_ctx_drvdata *ctx_drvdata;
328 spin_lock_irqsave(&msm_iommu_lock, flags);
334 iommu_drvdata = dev_get_drvdata(dev->parent);
335 ctx_drvdata = dev_get_drvdata(dev);
336 ctx_dev = dev->platform_data;
338 if (!iommu_drvdata || !ctx_drvdata || !ctx_dev)
341 ret = __flush_iotlb(domain);
345 ret = __enable_clocks(iommu_drvdata);
349 __reset_context(iommu_drvdata->base, ctx_dev->num);
350 __disable_clocks(iommu_drvdata);
351 list_del_init(&ctx_drvdata->attached_elm);
354 spin_unlock_irqrestore(&msm_iommu_lock, flags);
357 static int msm_iommu_map(struct iommu_domain *domain, unsigned long va,
358 phys_addr_t pa, size_t len, int prot)
360 struct msm_priv *priv;
362 unsigned long *fl_table;
363 unsigned long *fl_pte;
364 unsigned long fl_offset;
365 unsigned long *sl_table;
366 unsigned long *sl_pte;
367 unsigned long sl_offset;
369 int ret = 0, tex, sh;
371 spin_lock_irqsave(&msm_iommu_lock, flags);
373 sh = (prot & MSM_IOMMU_ATTR_SH) ? 1 : 0;
374 tex = msm_iommu_tex_class[prot & MSM_IOMMU_CP_MASK];
376 if (tex < 0 || tex > NUM_TEX_CLASS - 1) {
387 fl_table = priv->pgtable;
389 if (len != SZ_16M && len != SZ_1M &&
390 len != SZ_64K && len != SZ_4K) {
391 pr_debug("Bad size: %d\n", len);
397 pr_debug("Null page table\n");
402 if (len == SZ_16M || len == SZ_1M) {
403 pgprot = sh ? FL_SHARED : 0;
404 pgprot |= tex & 0x01 ? FL_BUFFERABLE : 0;
405 pgprot |= tex & 0x02 ? FL_CACHEABLE : 0;
406 pgprot |= tex & 0x04 ? FL_TEX0 : 0;
408 pgprot = sh ? SL_SHARED : 0;
409 pgprot |= tex & 0x01 ? SL_BUFFERABLE : 0;
410 pgprot |= tex & 0x02 ? SL_CACHEABLE : 0;
411 pgprot |= tex & 0x04 ? SL_TEX0 : 0;
414 fl_offset = FL_OFFSET(va); /* Upper 12 bits */
415 fl_pte = fl_table + fl_offset; /* int pointers, 4 bytes */
419 for (i = 0; i < 16; i++)
420 *(fl_pte+i) = (pa & 0xFF000000) | FL_SUPERSECTION |
421 FL_AP_READ | FL_AP_WRITE | FL_TYPE_SECT |
422 FL_SHARED | FL_NG | pgprot;
426 *fl_pte = (pa & 0xFFF00000) | FL_AP_READ | FL_AP_WRITE | FL_NG |
427 FL_TYPE_SECT | FL_SHARED | pgprot;
429 /* Need a 2nd level table */
430 if ((len == SZ_4K || len == SZ_64K) && (*fl_pte) == 0) {
432 sl = (unsigned long *) __get_free_pages(GFP_ATOMIC,
436 pr_debug("Could not allocate second level table\n");
441 memset(sl, 0, SZ_4K);
442 *fl_pte = ((((int)__pa(sl)) & FL_BASE_MASK) | FL_TYPE_TABLE);
445 sl_table = (unsigned long *) __va(((*fl_pte) & FL_BASE_MASK));
446 sl_offset = SL_OFFSET(va);
447 sl_pte = sl_table + sl_offset;
451 *sl_pte = (pa & SL_BASE_MASK_SMALL) | SL_AP0 | SL_AP1 | SL_NG |
452 SL_SHARED | SL_TYPE_SMALL | pgprot;
457 for (i = 0; i < 16; i++)
458 *(sl_pte+i) = (pa & SL_BASE_MASK_LARGE) | SL_AP0 |
459 SL_NG | SL_AP1 | SL_SHARED | SL_TYPE_LARGE | pgprot;
462 ret = __flush_iotlb(domain);
464 spin_unlock_irqrestore(&msm_iommu_lock, flags);
468 static size_t msm_iommu_unmap(struct iommu_domain *domain, unsigned long va,
471 struct msm_priv *priv;
473 unsigned long *fl_table;
474 unsigned long *fl_pte;
475 unsigned long fl_offset;
476 unsigned long *sl_table;
477 unsigned long *sl_pte;
478 unsigned long sl_offset;
481 spin_lock_irqsave(&msm_iommu_lock, flags);
488 fl_table = priv->pgtable;
490 if (len != SZ_16M && len != SZ_1M &&
491 len != SZ_64K && len != SZ_4K) {
492 pr_debug("Bad length: %d\n", len);
497 pr_debug("Null page table\n");
501 fl_offset = FL_OFFSET(va); /* Upper 12 bits */
502 fl_pte = fl_table + fl_offset; /* int pointers, 4 bytes */
505 pr_debug("First level PTE is 0\n");
509 /* Unmap supersection */
511 for (i = 0; i < 16; i++)
517 sl_table = (unsigned long *) __va(((*fl_pte) & FL_BASE_MASK));
518 sl_offset = SL_OFFSET(va);
519 sl_pte = sl_table + sl_offset;
522 for (i = 0; i < 16; i++)
529 if (len == SZ_4K || len == SZ_64K) {
532 for (i = 0; i < NUM_SL_PTE; i++)
536 free_page((unsigned long)sl_table);
541 ret = __flush_iotlb(domain);
544 spin_unlock_irqrestore(&msm_iommu_lock, flags);
546 /* the IOMMU API requires us to return how many bytes were unmapped */
551 static phys_addr_t msm_iommu_iova_to_phys(struct iommu_domain *domain,
554 struct msm_priv *priv;
555 struct msm_iommu_drvdata *iommu_drvdata;
556 struct msm_iommu_ctx_drvdata *ctx_drvdata;
563 spin_lock_irqsave(&msm_iommu_lock, flags);
566 if (list_empty(&priv->list_attached))
569 ctx_drvdata = list_entry(priv->list_attached.next,
570 struct msm_iommu_ctx_drvdata, attached_elm);
571 iommu_drvdata = dev_get_drvdata(ctx_drvdata->pdev->dev.parent);
573 base = iommu_drvdata->base;
574 ctx = ctx_drvdata->num;
576 ret = __enable_clocks(iommu_drvdata);
580 /* Invalidate context TLB */
581 SET_CTX_TLBIALL(base, ctx, 0);
582 SET_V2PPR(base, ctx, va & V2Pxx_VA);
584 par = GET_PAR(base, ctx);
586 /* We are dealing with a supersection */
587 if (GET_NOFAULT_SS(base, ctx))
588 ret = (par & 0xFF000000) | (va & 0x00FFFFFF);
589 else /* Upper 20 bits from PAR, lower 12 from VA */
590 ret = (par & 0xFFFFF000) | (va & 0x00000FFF);
592 if (GET_FAULT(base, ctx))
595 __disable_clocks(iommu_drvdata);
597 spin_unlock_irqrestore(&msm_iommu_lock, flags);
601 static int msm_iommu_domain_has_cap(struct iommu_domain *domain,
607 static void print_ctx_regs(void __iomem *base, int ctx)
609 unsigned int fsr = GET_FSR(base, ctx);
610 pr_err("FAR = %08x PAR = %08x\n",
611 GET_FAR(base, ctx), GET_PAR(base, ctx));
612 pr_err("FSR = %08x [%s%s%s%s%s%s%s%s%s%s]\n", fsr,
613 (fsr & 0x02) ? "TF " : "",
614 (fsr & 0x04) ? "AFF " : "",
615 (fsr & 0x08) ? "APF " : "",
616 (fsr & 0x10) ? "TLBMF " : "",
617 (fsr & 0x20) ? "HTWDEEF " : "",
618 (fsr & 0x40) ? "HTWSEEF " : "",
619 (fsr & 0x80) ? "MHF " : "",
620 (fsr & 0x10000) ? "SL " : "",
621 (fsr & 0x40000000) ? "SS " : "",
622 (fsr & 0x80000000) ? "MULTI " : "");
624 pr_err("FSYNR0 = %08x FSYNR1 = %08x\n",
625 GET_FSYNR0(base, ctx), GET_FSYNR1(base, ctx));
626 pr_err("TTBR0 = %08x TTBR1 = %08x\n",
627 GET_TTBR0(base, ctx), GET_TTBR1(base, ctx));
628 pr_err("SCTLR = %08x ACTLR = %08x\n",
629 GET_SCTLR(base, ctx), GET_ACTLR(base, ctx));
630 pr_err("PRRR = %08x NMRR = %08x\n",
631 GET_PRRR(base, ctx), GET_NMRR(base, ctx));
634 irqreturn_t msm_iommu_fault_handler(int irq, void *dev_id)
636 struct msm_iommu_drvdata *drvdata = dev_id;
641 spin_lock(&msm_iommu_lock);
644 pr_err("Invalid device ID in context interrupt handler\n");
648 base = drvdata->base;
650 pr_err("Unexpected IOMMU page fault!\n");
651 pr_err("base = %08x\n", (unsigned int) base);
653 ret = __enable_clocks(drvdata);
657 for (i = 0; i < drvdata->ncb; i++) {
658 fsr = GET_FSR(base, i);
660 pr_err("Fault occurred in context %d.\n", i);
661 pr_err("Interesting registers:\n");
662 print_ctx_regs(base, i);
663 SET_FSR(base, i, 0x4000000F);
666 __disable_clocks(drvdata);
668 spin_unlock(&msm_iommu_lock);
672 static struct iommu_ops msm_iommu_ops = {
673 .domain_init = msm_iommu_domain_init,
674 .domain_destroy = msm_iommu_domain_destroy,
675 .attach_dev = msm_iommu_attach_dev,
676 .detach_dev = msm_iommu_detach_dev,
677 .map = msm_iommu_map,
678 .unmap = msm_iommu_unmap,
679 .iova_to_phys = msm_iommu_iova_to_phys,
680 .domain_has_cap = msm_iommu_domain_has_cap,
681 .pgsize_bitmap = MSM_IOMMU_PGSIZES,
684 static int __init get_tex_class(int icp, int ocp, int mt, int nos)
687 unsigned int prrr = 0;
688 unsigned int nmrr = 0;
689 int c_icp, c_ocp, c_mt, c_nos;
694 for (i = 0; i < NUM_TEX_CLASS; i++) {
695 c_nos = PRRR_NOS(prrr, i);
696 c_mt = PRRR_MT(prrr, i);
697 c_icp = NMRR_ICP(nmrr, i);
698 c_ocp = NMRR_OCP(nmrr, i);
700 if (icp == c_icp && ocp == c_ocp && c_mt == mt && c_nos == nos)
707 static void __init setup_iommu_tex_classes(void)
709 msm_iommu_tex_class[MSM_IOMMU_ATTR_NONCACHED] =
710 get_tex_class(CP_NONCACHED, CP_NONCACHED, MT_NORMAL, 1);
712 msm_iommu_tex_class[MSM_IOMMU_ATTR_CACHED_WB_WA] =
713 get_tex_class(CP_WB_WA, CP_WB_WA, MT_NORMAL, 1);
715 msm_iommu_tex_class[MSM_IOMMU_ATTR_CACHED_WB_NWA] =
716 get_tex_class(CP_WB_NWA, CP_WB_NWA, MT_NORMAL, 1);
718 msm_iommu_tex_class[MSM_IOMMU_ATTR_CACHED_WT] =
719 get_tex_class(CP_WT, CP_WT, MT_NORMAL, 1);
722 static int __init msm_iommu_init(void)
724 setup_iommu_tex_classes();
725 bus_set_iommu(&platform_bus_type, &msm_iommu_ops);
729 subsys_initcall(msm_iommu_init);
731 MODULE_LICENSE("GPL v2");
732 MODULE_AUTHOR("Stepan Moskovchenko <stepanm@codeaurora.org>");