arch/arm/kernel/smp_tlb.c

   1 /*
   2  *  linux/arch/arm/kernel/smp_tlb.c
   3  *
   4  *  Copyright (C) 2002 ARM Limited, All Rights Reserved.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 as
   8  * published by the Free Software Foundation.
   9  */
  10 #include <linux/preempt.h>
  11 #include <linux/smp.h>
  12
  13 #include <asm/smp_plat.h>
  14 #include <asm/tlbflush.h>
  15 #include <asm/mmu_context.h>
  16
  17 /**********************************************************************/
  18
  19 /*
  20  * TLB operations
  21  */
  22 struct tlb_args {
  23         struct vm_area_struct *ta_vma;
  24         unsigned long ta_start;
  25         unsigned long ta_end;
  26 };
  27
  28 static inline void ipi_flush_tlb_all(void *ignored)
  29 {
  30         local_flush_tlb_all();
  31 }
  32
  33 static inline void ipi_flush_tlb_mm(void *arg)
  34 {
  35         struct mm_struct *mm = (struct mm_struct *)arg;
  36
  37         local_flush_tlb_mm(mm);
  38 }
  39
  40 static inline void ipi_flush_tlb_page(void *arg)
  41 {
  42         struct tlb_args *ta = (struct tlb_args *)arg;
  43
  44         local_flush_tlb_page(ta->ta_vma, ta->ta_start);
  45 }
  46
  47 static inline void ipi_flush_tlb_kernel_page(void *arg)
  48 {
  49         struct tlb_args *ta = (struct tlb_args *)arg;
  50
  51         local_flush_tlb_kernel_page(ta->ta_start);
  52 }
  53
  54 static inline void ipi_flush_tlb_range(void *arg)
  55 {
  56         struct tlb_args *ta = (struct tlb_args *)arg;
  57
  58         local_flush_tlb_range(ta->ta_vma, ta->ta_start, ta->ta_end);
  59 }
  60
  61 static inline void ipi_flush_tlb_kernel_range(void *arg)
  62 {
  63         struct tlb_args *ta = (struct tlb_args *)arg;
  64
  65         local_flush_tlb_kernel_range(ta->ta_start, ta->ta_end);
  66 }
  67
  68 static inline void ipi_flush_bp_all(void *ignored)
  69 {
  70         local_flush_bp_all();
  71 }
  72
  73 #ifdef CONFIG_ARM_ERRATA_798181
  74 bool (*erratum_a15_798181_handler)(void);
  75
  76 static bool erratum_a15_798181_partial(void)
  77 {
  78         asm("mcr p15, 0, %0, c8, c3, 1" : : "r" (0));
  79         dsb(ish);
  80         return false;
  81 }
  82
  83 static bool erratum_a15_798181_broadcast(void)
  84 {
  85         asm("mcr p15, 0, %0, c8, c3, 1" : : "r" (0));
  86         dsb(ish);
  87         return true;
  88 }
  89
  90 void erratum_a15_798181_init(void)
  91 {
  92         unsigned int midr = read_cpuid_id();
  93         unsigned int revidr = read_cpuid(CPUID_REVIDR);
  94
  95         /* Cortex-A15 r0p0..r3p2 w/o ECO fix affected */
  96         if ((midr & 0xff0ffff0) != 0x410fc0f0 || midr > 0x413fc0f2 ||
  97             (revidr & 0x210) == 0x210) {
  98                 return;
  99         }
 100         if (revidr & 0x10)
 101                 erratum_a15_798181_handler = erratum_a15_798181_partial;
 102         else
 103                 erratum_a15_798181_handler = erratum_a15_798181_broadcast;
 104 }
 105 #endif
 106
 107 static void ipi_flush_tlb_a15_erratum(void *arg)
 108 {
 109         dmb();
 110 }
 111
 112 static void broadcast_tlb_a15_erratum(void)
 113 {
 114         if (!erratum_a15_798181())
 115                 return;
 116
 117         smp_call_function(ipi_flush_tlb_a15_erratum, NULL, 1);
 118 }
 119
 120 static void broadcast_tlb_mm_a15_erratum(struct mm_struct *mm)
 121 {
 122         int this_cpu;
 123         cpumask_t mask = { CPU_BITS_NONE };
 124
 125         if (!erratum_a15_798181())
 126                 return;
 127
 128         this_cpu = get_cpu();
 129         a15_erratum_get_cpumask(this_cpu, mm, &mask);
 130         smp_call_function_many(&mask, ipi_flush_tlb_a15_erratum, NULL, 1);
 131         put_cpu();
 132 }
 133
 134 void flush_tlb_all(void)
 135 {
 136         if (tlb_ops_need_broadcast())
 137                 on_each_cpu(ipi_flush_tlb_all, NULL, 1);
 138         else
 139                 __flush_tlb_all();
 140         broadcast_tlb_a15_erratum();
 141 }
 142
 143 void flush_tlb_mm(struct mm_struct *mm)
 144 {
 145         if (tlb_ops_need_broadcast())
 146                 on_each_cpu_mask(mm_cpumask(mm), ipi_flush_tlb_mm, mm, 1);
 147         else
 148                 __flush_tlb_mm(mm);
 149         broadcast_tlb_mm_a15_erratum(mm);
 150 }
 151
 152 void flush_tlb_page(struct vm_area_struct *vma, unsigned long uaddr)
 153 {
 154         if (tlb_ops_need_broadcast()) {
 155                 struct tlb_args ta;
 156                 ta.ta_vma = vma;
 157                 ta.ta_start = uaddr;
 158                 on_each_cpu_mask(mm_cpumask(vma->vm_mm), ipi_flush_tlb_page,
 159                                         &ta, 1);
 160         } else
 161                 __flush_tlb_page(vma, uaddr);
 162         broadcast_tlb_mm_a15_erratum(vma->vm_mm);
 163 }
 164
 165 void flush_tlb_kernel_page(unsigned long kaddr)
 166 {
 167         if (tlb_ops_need_broadcast()) {
 168                 struct tlb_args ta;
 169                 ta.ta_start = kaddr;
 170                 on_each_cpu(ipi_flush_tlb_kernel_page, &ta, 1);
 171         } else
 172                 __flush_tlb_kernel_page(kaddr);
 173         broadcast_tlb_a15_erratum();
 174 }
 175
 176 void flush_tlb_range(struct vm_area_struct *vma,
 177                      unsigned long start, unsigned long end)
 178 {
 179         if (tlb_ops_need_broadcast()) {
 180                 struct tlb_args ta;
 181                 ta.ta_vma = vma;
 182                 ta.ta_start = start;
 183                 ta.ta_end = end;
 184                 on_each_cpu_mask(mm_cpumask(vma->vm_mm), ipi_flush_tlb_range,
 185                                         &ta, 1);
 186         } else
 187                 local_flush_tlb_range(vma, start, end);
 188         broadcast_tlb_mm_a15_erratum(vma->vm_mm);
 189 }
 190
 191 void flush_tlb_kernel_range(unsigned long start, unsigned long end)
 192 {
 193         if (tlb_ops_need_broadcast()) {
 194                 struct tlb_args ta;
 195                 ta.ta_start = start;
 196                 ta.ta_end = end;
 197                 on_each_cpu(ipi_flush_tlb_kernel_range, &ta, 1);
 198         } else
 199                 local_flush_tlb_kernel_range(start, end);
 200         broadcast_tlb_a15_erratum();
 201 }
 202
 203 void flush_bp_all(void)
 204 {
 205         if (tlb_ops_need_broadcast())
 206                 on_each_cpu(ipi_flush_bp_all, NULL, 1);
 207         else
 208                 __flush_bp_all();
 209 }