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>");