1 /* Copyright (c) 2010, 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>
30 #include <asm/cacheflush.h>
31 #include <asm/sizes.h>
33 #include <mach/iommu_hw-8xxx.h>
34 #include <mach/iommu.h>
36 #define MRC(reg, processor, op1, crn, crm, op2) \
37 __asm__ __volatile__ ( \
38 " mrc " #processor "," #op1 ", %0," #crn "," #crm "," #op2 "\n" \
41 #define RCP15_PRRR(reg) MRC(reg, p15, 0, c10, c2, 0)
42 #define RCP15_NMRR(reg) MRC(reg, p15, 0, c10, c2, 1)
44 static int msm_iommu_tex_class
[4];
46 DEFINE_SPINLOCK(msm_iommu_lock
);
49 unsigned long *pgtable
;
50 struct list_head list_attached
;
53 static int __flush_iotlb(struct iommu_domain
*domain
)
55 struct msm_priv
*priv
= domain
->priv
;
56 struct msm_iommu_drvdata
*iommu_drvdata
;
57 struct msm_iommu_ctx_drvdata
*ctx_drvdata
;
59 #ifndef CONFIG_IOMMU_PGTABLES_L2
60 unsigned long *fl_table
= priv
->pgtable
;
63 if (!list_empty(&priv
->list_attached
)) {
64 dmac_flush_range(fl_table
, fl_table
+ SZ_16K
);
66 for (i
= 0; i
< NUM_FL_PTE
; i
++)
67 if ((fl_table
[i
] & 0x03) == FL_TYPE_TABLE
) {
68 void *sl_table
= __va(fl_table
[i
] &
70 dmac_flush_range(sl_table
, sl_table
+ SZ_4K
);
75 list_for_each_entry(ctx_drvdata
, &priv
->list_attached
, attached_elm
) {
76 if (!ctx_drvdata
->pdev
|| !ctx_drvdata
->pdev
->dev
.parent
)
79 iommu_drvdata
= dev_get_drvdata(ctx_drvdata
->pdev
->dev
.parent
);
80 SET_CTX_TLBIALL(iommu_drvdata
->base
, ctx_drvdata
->num
, 0);
86 static void __reset_context(void __iomem
*base
, int ctx
)
88 SET_BPRCOSH(base
, ctx
, 0);
89 SET_BPRCISH(base
, ctx
, 0);
90 SET_BPRCNSH(base
, ctx
, 0);
91 SET_BPSHCFG(base
, ctx
, 0);
92 SET_BPMTCFG(base
, ctx
, 0);
93 SET_ACTLR(base
, ctx
, 0);
94 SET_SCTLR(base
, ctx
, 0);
95 SET_FSRRESTORE(base
, ctx
, 0);
96 SET_TTBR0(base
, ctx
, 0);
97 SET_TTBR1(base
, ctx
, 0);
98 SET_TTBCR(base
, ctx
, 0);
99 SET_BFBCR(base
, ctx
, 0);
100 SET_PAR(base
, ctx
, 0);
101 SET_FAR(base
, ctx
, 0);
102 SET_CTX_TLBIALL(base
, ctx
, 0);
103 SET_TLBFLPTER(base
, ctx
, 0);
104 SET_TLBSLPTER(base
, ctx
, 0);
105 SET_TLBLKCR(base
, ctx
, 0);
106 SET_PRRR(base
, ctx
, 0);
107 SET_NMRR(base
, ctx
, 0);
108 SET_CONTEXTIDR(base
, ctx
, 0);
111 static void __program_context(void __iomem
*base
, int ctx
, phys_addr_t pgtable
)
113 unsigned int prrr
, nmrr
;
114 __reset_context(base
, ctx
);
116 /* Set up HTW mode */
117 /* TLB miss configuration: perform HTW on miss */
118 SET_TLBMCFG(base
, ctx
, 0x3);
120 /* V2P configuration: HTW for access */
121 SET_V2PCFG(base
, ctx
, 0x3);
123 SET_TTBCR(base
, ctx
, 0);
124 SET_TTBR0_PA(base
, ctx
, (pgtable
>> 14));
126 /* Invalidate the TLB for this context */
127 SET_CTX_TLBIALL(base
, ctx
, 0);
129 /* Set interrupt number to "secure" interrupt */
130 SET_IRPTNDX(base
, ctx
, 0);
132 /* Enable context fault interrupt */
133 SET_CFEIE(base
, ctx
, 1);
135 /* Stall access on a context fault and let the handler deal with it */
136 SET_CFCFG(base
, ctx
, 1);
138 /* Redirect all cacheable requests to L2 slave port. */
139 SET_RCISH(base
, ctx
, 1);
140 SET_RCOSH(base
, ctx
, 1);
141 SET_RCNSH(base
, ctx
, 1);
143 /* Turn on TEX Remap */
144 SET_TRE(base
, ctx
, 1);
146 /* Set TEX remap attributes */
149 SET_PRRR(base
, ctx
, prrr
);
150 SET_NMRR(base
, ctx
, nmrr
);
152 /* Turn on BFB prefetch */
153 SET_BFBDFE(base
, ctx
, 1);
155 #ifdef CONFIG_IOMMU_PGTABLES_L2
156 /* Configure page tables as inner-cacheable and shareable to reduce
157 * the TLB miss penalty.
159 SET_TTBR0_SH(base
, ctx
, 1);
160 SET_TTBR1_SH(base
, ctx
, 1);
162 SET_TTBR0_NOS(base
, ctx
, 1);
163 SET_TTBR1_NOS(base
, ctx
, 1);
165 SET_TTBR0_IRGNH(base
, ctx
, 0); /* WB, WA */
166 SET_TTBR0_IRGNL(base
, ctx
, 1);
168 SET_TTBR1_IRGNH(base
, ctx
, 0); /* WB, WA */
169 SET_TTBR1_IRGNL(base
, ctx
, 1);
171 SET_TTBR0_ORGN(base
, ctx
, 1); /* WB, WA */
172 SET_TTBR1_ORGN(base
, ctx
, 1); /* WB, WA */
179 static int msm_iommu_domain_init(struct iommu_domain
*domain
)
181 struct msm_priv
*priv
= kzalloc(sizeof(*priv
), GFP_KERNEL
);
186 INIT_LIST_HEAD(&priv
->list_attached
);
187 priv
->pgtable
= (unsigned long *)__get_free_pages(GFP_KERNEL
,
193 memset(priv
->pgtable
, 0, SZ_16K
);
202 static void msm_iommu_domain_destroy(struct iommu_domain
*domain
)
204 struct msm_priv
*priv
;
206 unsigned long *fl_table
;
209 spin_lock_irqsave(&msm_iommu_lock
, flags
);
214 fl_table
= priv
->pgtable
;
216 for (i
= 0; i
< NUM_FL_PTE
; i
++)
217 if ((fl_table
[i
] & 0x03) == FL_TYPE_TABLE
)
218 free_page((unsigned long) __va(((fl_table
[i
]) &
221 free_pages((unsigned long)priv
->pgtable
, get_order(SZ_16K
));
222 priv
->pgtable
= NULL
;
226 spin_unlock_irqrestore(&msm_iommu_lock
, flags
);
229 static int msm_iommu_attach_dev(struct iommu_domain
*domain
, struct device
*dev
)
231 struct msm_priv
*priv
;
232 struct msm_iommu_ctx_dev
*ctx_dev
;
233 struct msm_iommu_drvdata
*iommu_drvdata
;
234 struct msm_iommu_ctx_drvdata
*ctx_drvdata
;
235 struct msm_iommu_ctx_drvdata
*tmp_drvdata
;
239 spin_lock_irqsave(&msm_iommu_lock
, flags
);
248 iommu_drvdata
= dev_get_drvdata(dev
->parent
);
249 ctx_drvdata
= dev_get_drvdata(dev
);
250 ctx_dev
= dev
->platform_data
;
252 if (!iommu_drvdata
|| !ctx_drvdata
|| !ctx_dev
) {
257 if (!list_empty(&ctx_drvdata
->attached_elm
)) {
262 list_for_each_entry(tmp_drvdata
, &priv
->list_attached
, attached_elm
)
263 if (tmp_drvdata
== ctx_drvdata
) {
268 __program_context(iommu_drvdata
->base
, ctx_dev
->num
,
269 __pa(priv
->pgtable
));
271 list_add(&(ctx_drvdata
->attached_elm
), &priv
->list_attached
);
272 ret
= __flush_iotlb(domain
);
275 spin_unlock_irqrestore(&msm_iommu_lock
, flags
);
279 static void msm_iommu_detach_dev(struct iommu_domain
*domain
,
282 struct msm_priv
*priv
;
283 struct msm_iommu_ctx_dev
*ctx_dev
;
284 struct msm_iommu_drvdata
*iommu_drvdata
;
285 struct msm_iommu_ctx_drvdata
*ctx_drvdata
;
289 spin_lock_irqsave(&msm_iommu_lock
, flags
);
295 iommu_drvdata
= dev_get_drvdata(dev
->parent
);
296 ctx_drvdata
= dev_get_drvdata(dev
);
297 ctx_dev
= dev
->platform_data
;
299 if (!iommu_drvdata
|| !ctx_drvdata
|| !ctx_dev
)
302 ret
= __flush_iotlb(domain
);
306 __reset_context(iommu_drvdata
->base
, ctx_dev
->num
);
307 list_del_init(&ctx_drvdata
->attached_elm
);
310 spin_unlock_irqrestore(&msm_iommu_lock
, flags
);
313 static int msm_iommu_map(struct iommu_domain
*domain
, unsigned long va
,
314 phys_addr_t pa
, int order
, int prot
)
316 struct msm_priv
*priv
;
318 unsigned long *fl_table
;
319 unsigned long *fl_pte
;
320 unsigned long fl_offset
;
321 unsigned long *sl_table
;
322 unsigned long *sl_pte
;
323 unsigned long sl_offset
;
325 size_t len
= 0x1000UL
<< order
;
326 int ret
= 0, tex
, sh
;
328 spin_lock_irqsave(&msm_iommu_lock
, flags
);
330 sh
= (prot
& MSM_IOMMU_ATTR_SH
) ? 1 : 0;
331 tex
= msm_iommu_tex_class
[prot
& MSM_IOMMU_CP_MASK
];
333 if (tex
< 0 || tex
> NUM_TEX_CLASS
- 1) {
344 fl_table
= priv
->pgtable
;
346 if (len
!= SZ_16M
&& len
!= SZ_1M
&&
347 len
!= SZ_64K
&& len
!= SZ_4K
) {
348 pr_debug("Bad size: %d\n", len
);
354 pr_debug("Null page table\n");
359 if (len
== SZ_16M
|| len
== SZ_1M
) {
360 pgprot
= sh
? FL_SHARED
: 0;
361 pgprot
|= tex
& 0x01 ? FL_BUFFERABLE
: 0;
362 pgprot
|= tex
& 0x02 ? FL_CACHEABLE
: 0;
363 pgprot
|= tex
& 0x04 ? FL_TEX0
: 0;
365 pgprot
= sh
? SL_SHARED
: 0;
366 pgprot
|= tex
& 0x01 ? SL_BUFFERABLE
: 0;
367 pgprot
|= tex
& 0x02 ? SL_CACHEABLE
: 0;
368 pgprot
|= tex
& 0x04 ? SL_TEX0
: 0;
371 fl_offset
= FL_OFFSET(va
); /* Upper 12 bits */
372 fl_pte
= fl_table
+ fl_offset
; /* int pointers, 4 bytes */
376 for (i
= 0; i
< 16; i
++)
377 *(fl_pte
+i
) = (pa
& 0xFF000000) | FL_SUPERSECTION
|
378 FL_AP_READ
| FL_AP_WRITE
| FL_TYPE_SECT
|
383 *fl_pte
= (pa
& 0xFFF00000) | FL_AP_READ
| FL_AP_WRITE
|
384 FL_TYPE_SECT
| FL_SHARED
| pgprot
;
386 /* Need a 2nd level table */
387 if ((len
== SZ_4K
|| len
== SZ_64K
) && (*fl_pte
) == 0) {
389 sl
= (unsigned long *) __get_free_pages(GFP_ATOMIC
,
393 pr_debug("Could not allocate second level table\n");
398 memset(sl
, 0, SZ_4K
);
399 *fl_pte
= ((((int)__pa(sl
)) & FL_BASE_MASK
) | FL_TYPE_TABLE
);
402 sl_table
= (unsigned long *) __va(((*fl_pte
) & FL_BASE_MASK
));
403 sl_offset
= SL_OFFSET(va
);
404 sl_pte
= sl_table
+ sl_offset
;
408 *sl_pte
= (pa
& SL_BASE_MASK_SMALL
) | SL_AP0
| SL_AP1
|
409 SL_SHARED
| SL_TYPE_SMALL
| pgprot
;
414 for (i
= 0; i
< 16; i
++)
415 *(sl_pte
+i
) = (pa
& SL_BASE_MASK_LARGE
) | SL_AP0
|
416 SL_AP1
| SL_SHARED
| SL_TYPE_LARGE
| pgprot
;
419 ret
= __flush_iotlb(domain
);
421 spin_unlock_irqrestore(&msm_iommu_lock
, flags
);
425 static int msm_iommu_unmap(struct iommu_domain
*domain
, unsigned long va
,
428 struct msm_priv
*priv
;
430 unsigned long *fl_table
;
431 unsigned long *fl_pte
;
432 unsigned long fl_offset
;
433 unsigned long *sl_table
;
434 unsigned long *sl_pte
;
435 unsigned long sl_offset
;
436 size_t len
= 0x1000UL
<< order
;
439 spin_lock_irqsave(&msm_iommu_lock
, flags
);
448 fl_table
= priv
->pgtable
;
450 if (len
!= SZ_16M
&& len
!= SZ_1M
&&
451 len
!= SZ_64K
&& len
!= SZ_4K
) {
452 pr_debug("Bad length: %d\n", len
);
458 pr_debug("Null page table\n");
463 fl_offset
= FL_OFFSET(va
); /* Upper 12 bits */
464 fl_pte
= fl_table
+ fl_offset
; /* int pointers, 4 bytes */
467 pr_debug("First level PTE is 0\n");
472 /* Unmap supersection */
474 for (i
= 0; i
< 16; i
++)
480 sl_table
= (unsigned long *) __va(((*fl_pte
) & FL_BASE_MASK
));
481 sl_offset
= SL_OFFSET(va
);
482 sl_pte
= sl_table
+ sl_offset
;
485 for (i
= 0; i
< 16; i
++)
492 if (len
== SZ_4K
|| len
== SZ_64K
) {
495 for (i
= 0; i
< NUM_SL_PTE
; i
++)
499 free_page((unsigned long)sl_table
);
504 ret
= __flush_iotlb(domain
);
506 spin_unlock_irqrestore(&msm_iommu_lock
, flags
);
510 static phys_addr_t
msm_iommu_iova_to_phys(struct iommu_domain
*domain
,
513 struct msm_priv
*priv
;
514 struct msm_iommu_drvdata
*iommu_drvdata
;
515 struct msm_iommu_ctx_drvdata
*ctx_drvdata
;
522 spin_lock_irqsave(&msm_iommu_lock
, flags
);
525 if (list_empty(&priv
->list_attached
))
528 ctx_drvdata
= list_entry(priv
->list_attached
.next
,
529 struct msm_iommu_ctx_drvdata
, attached_elm
);
530 iommu_drvdata
= dev_get_drvdata(ctx_drvdata
->pdev
->dev
.parent
);
532 base
= iommu_drvdata
->base
;
533 ctx
= ctx_drvdata
->num
;
535 /* Invalidate context TLB */
536 SET_CTX_TLBIALL(base
, ctx
, 0);
537 SET_V2PPR_VA(base
, ctx
, va
>> V2Pxx_VA_SHIFT
);
539 par
= GET_PAR(base
, ctx
);
541 /* We are dealing with a supersection */
542 if (GET_NOFAULT_SS(base
, ctx
))
543 ret
= (par
& 0xFF000000) | (va
& 0x00FFFFFF);
544 else /* Upper 20 bits from PAR, lower 12 from VA */
545 ret
= (par
& 0xFFFFF000) | (va
& 0x00000FFF);
547 if (GET_FAULT(base
, ctx
))
551 spin_unlock_irqrestore(&msm_iommu_lock
, flags
);
555 static int msm_iommu_domain_has_cap(struct iommu_domain
*domain
,
561 static void print_ctx_regs(void __iomem
*base
, int ctx
)
563 unsigned int fsr
= GET_FSR(base
, ctx
);
564 pr_err("FAR = %08x PAR = %08x\n",
565 GET_FAR(base
, ctx
), GET_PAR(base
, ctx
));
566 pr_err("FSR = %08x [%s%s%s%s%s%s%s%s%s%s]\n", fsr
,
567 (fsr
& 0x02) ? "TF " : "",
568 (fsr
& 0x04) ? "AFF " : "",
569 (fsr
& 0x08) ? "APF " : "",
570 (fsr
& 0x10) ? "TLBMF " : "",
571 (fsr
& 0x20) ? "HTWDEEF " : "",
572 (fsr
& 0x40) ? "HTWSEEF " : "",
573 (fsr
& 0x80) ? "MHF " : "",
574 (fsr
& 0x10000) ? "SL " : "",
575 (fsr
& 0x40000000) ? "SS " : "",
576 (fsr
& 0x80000000) ? "MULTI " : "");
578 pr_err("FSYNR0 = %08x FSYNR1 = %08x\n",
579 GET_FSYNR0(base
, ctx
), GET_FSYNR1(base
, ctx
));
580 pr_err("TTBR0 = %08x TTBR1 = %08x\n",
581 GET_TTBR0(base
, ctx
), GET_TTBR1(base
, ctx
));
582 pr_err("SCTLR = %08x ACTLR = %08x\n",
583 GET_SCTLR(base
, ctx
), GET_ACTLR(base
, ctx
));
584 pr_err("PRRR = %08x NMRR = %08x\n",
585 GET_PRRR(base
, ctx
), GET_NMRR(base
, ctx
));
588 irqreturn_t
msm_iommu_fault_handler(int irq
, void *dev_id
)
590 struct msm_iommu_drvdata
*drvdata
= dev_id
;
595 spin_lock(&msm_iommu_lock
);
598 pr_err("Invalid device ID in context interrupt handler\n");
602 base
= drvdata
->base
;
604 pr_err("Unexpected IOMMU page fault!\n");
605 pr_err("base = %08x\n", (unsigned int) base
);
607 ncb
= GET_NCB(base
)+1;
608 for (i
= 0; i
< ncb
; i
++) {
609 fsr
= GET_FSR(base
, i
);
611 pr_err("Fault occurred in context %d.\n", i
);
612 pr_err("Interesting registers:\n");
613 print_ctx_regs(base
, i
);
614 SET_FSR(base
, i
, 0x4000000F);
618 spin_unlock(&msm_iommu_lock
);
622 static struct iommu_ops msm_iommu_ops
= {
623 .domain_init
= msm_iommu_domain_init
,
624 .domain_destroy
= msm_iommu_domain_destroy
,
625 .attach_dev
= msm_iommu_attach_dev
,
626 .detach_dev
= msm_iommu_detach_dev
,
627 .map
= msm_iommu_map
,
628 .unmap
= msm_iommu_unmap
,
629 .iova_to_phys
= msm_iommu_iova_to_phys
,
630 .domain_has_cap
= msm_iommu_domain_has_cap
633 static int __init
get_tex_class(int icp
, int ocp
, int mt
, int nos
)
636 unsigned int prrr
= 0;
637 unsigned int nmrr
= 0;
638 int c_icp
, c_ocp
, c_mt
, c_nos
;
643 for (i
= 0; i
< NUM_TEX_CLASS
; i
++) {
644 c_nos
= PRRR_NOS(prrr
, i
);
645 c_mt
= PRRR_MT(prrr
, i
);
646 c_icp
= NMRR_ICP(nmrr
, i
);
647 c_ocp
= NMRR_OCP(nmrr
, i
);
649 if (icp
== c_icp
&& ocp
== c_ocp
&& c_mt
== mt
&& c_nos
== nos
)
656 static void __init
setup_iommu_tex_classes(void)
658 msm_iommu_tex_class
[MSM_IOMMU_ATTR_NONCACHED
] =
659 get_tex_class(CP_NONCACHED
, CP_NONCACHED
, MT_NORMAL
, 1);
661 msm_iommu_tex_class
[MSM_IOMMU_ATTR_CACHED_WB_WA
] =
662 get_tex_class(CP_WB_WA
, CP_WB_WA
, MT_NORMAL
, 1);
664 msm_iommu_tex_class
[MSM_IOMMU_ATTR_CACHED_WB_NWA
] =
665 get_tex_class(CP_WB_NWA
, CP_WB_NWA
, MT_NORMAL
, 1);
667 msm_iommu_tex_class
[MSM_IOMMU_ATTR_CACHED_WT
] =
668 get_tex_class(CP_WT
, CP_WT
, MT_NORMAL
, 1);
671 static int __init
msm_iommu_init(void)
673 setup_iommu_tex_classes();
674 register_iommu(&msm_iommu_ops
);
678 subsys_initcall(msm_iommu_init
);
680 MODULE_LICENSE("GPL v2");
681 MODULE_AUTHOR("Stepan Moskovchenko <stepanm@codeaurora.org>");