Merge branch 'core/softlockup-for-linus' of git://git.kernel.org/pub/scm/linux/kernel...
[linux-2.6] / arch / x86 / kernel / tlb_64.c
1 #include <linux/init.h>
2
3 #include <linux/mm.h>
4 #include <linux/delay.h>
5 #include <linux/spinlock.h>
6 #include <linux/smp.h>
7 #include <linux/kernel_stat.h>
8 #include <linux/mc146818rtc.h>
9 #include <linux/interrupt.h>
10
11 #include <asm/mtrr.h>
12 #include <asm/pgalloc.h>
13 #include <asm/tlbflush.h>
14 #include <asm/mmu_context.h>
15 #include <asm/proto.h>
16 #include <asm/apicdef.h>
17 #include <asm/idle.h>
18 #include <asm/uv/uv_hub.h>
19 #include <asm/uv/uv_bau.h>
20
21 #include <mach_ipi.h>
22 /*
23  *      Smarter SMP flushing macros.
24  *              c/o Linus Torvalds.
25  *
26  *      These mean you can really definitely utterly forget about
27  *      writing to user space from interrupts. (Its not allowed anyway).
28  *
29  *      Optimizations Manfred Spraul <manfred@colorfullife.com>
30  *
31  *      More scalable flush, from Andi Kleen
32  *
33  *      To avoid global state use 8 different call vectors.
34  *      Each CPU uses a specific vector to trigger flushes on other
35  *      CPUs. Depending on the received vector the target CPUs look into
36  *      the right per cpu variable for the flush data.
37  *
38  *      With more than 8 CPUs they are hashed to the 8 available
39  *      vectors. The limited global vector space forces us to this right now.
40  *      In future when interrupts are split into per CPU domains this could be
41  *      fixed, at the cost of triggering multiple IPIs in some cases.
42  */
43
44 union smp_flush_state {
45         struct {
46                 cpumask_t flush_cpumask;
47                 struct mm_struct *flush_mm;
48                 unsigned long flush_va;
49                 spinlock_t tlbstate_lock;
50         };
51         char pad[SMP_CACHE_BYTES];
52 } ____cacheline_aligned;
53
54 /* State is put into the per CPU data section, but padded
55    to a full cache line because other CPUs can access it and we don't
56    want false sharing in the per cpu data segment. */
57 static DEFINE_PER_CPU(union smp_flush_state, flush_state);
58
59 /*
60  * We cannot call mmdrop() because we are in interrupt context,
61  * instead update mm->cpu_vm_mask.
62  */
63 void leave_mm(int cpu)
64 {
65         if (read_pda(mmu_state) == TLBSTATE_OK)
66                 BUG();
67         cpu_clear(cpu, read_pda(active_mm)->cpu_vm_mask);
68         load_cr3(swapper_pg_dir);
69 }
70 EXPORT_SYMBOL_GPL(leave_mm);
71
72 /*
73  *
74  * The flush IPI assumes that a thread switch happens in this order:
75  * [cpu0: the cpu that switches]
76  * 1) switch_mm() either 1a) or 1b)
77  * 1a) thread switch to a different mm
78  * 1a1) cpu_clear(cpu, old_mm->cpu_vm_mask);
79  *      Stop ipi delivery for the old mm. This is not synchronized with
80  *      the other cpus, but smp_invalidate_interrupt ignore flush ipis
81  *      for the wrong mm, and in the worst case we perform a superfluous
82  *      tlb flush.
83  * 1a2) set cpu mmu_state to TLBSTATE_OK
84  *      Now the smp_invalidate_interrupt won't call leave_mm if cpu0
85  *      was in lazy tlb mode.
86  * 1a3) update cpu active_mm
87  *      Now cpu0 accepts tlb flushes for the new mm.
88  * 1a4) cpu_set(cpu, new_mm->cpu_vm_mask);
89  *      Now the other cpus will send tlb flush ipis.
90  * 1a4) change cr3.
91  * 1b) thread switch without mm change
92  *      cpu active_mm is correct, cpu0 already handles
93  *      flush ipis.
94  * 1b1) set cpu mmu_state to TLBSTATE_OK
95  * 1b2) test_and_set the cpu bit in cpu_vm_mask.
96  *      Atomically set the bit [other cpus will start sending flush ipis],
97  *      and test the bit.
98  * 1b3) if the bit was 0: leave_mm was called, flush the tlb.
99  * 2) switch %%esp, ie current
100  *
101  * The interrupt must handle 2 special cases:
102  * - cr3 is changed before %%esp, ie. it cannot use current->{active_,}mm.
103  * - the cpu performs speculative tlb reads, i.e. even if the cpu only
104  *   runs in kernel space, the cpu could load tlb entries for user space
105  *   pages.
106  *
107  * The good news is that cpu mmu_state is local to each cpu, no
108  * write/read ordering problems.
109  */
110
111 /*
112  * TLB flush IPI:
113  *
114  * 1) Flush the tlb entries if the cpu uses the mm that's being flushed.
115  * 2) Leave the mm if we are in the lazy tlb mode.
116  *
117  * Interrupts are disabled.
118  */
119
120 asmlinkage void smp_invalidate_interrupt(struct pt_regs *regs)
121 {
122         int cpu;
123         int sender;
124         union smp_flush_state *f;
125
126         cpu = smp_processor_id();
127         /*
128          * orig_rax contains the negated interrupt vector.
129          * Use that to determine where the sender put the data.
130          */
131         sender = ~regs->orig_ax - INVALIDATE_TLB_VECTOR_START;
132         f = &per_cpu(flush_state, sender);
133
134         if (!cpu_isset(cpu, f->flush_cpumask))
135                 goto out;
136                 /*
137                  * This was a BUG() but until someone can quote me the
138                  * line from the intel manual that guarantees an IPI to
139                  * multiple CPUs is retried _only_ on the erroring CPUs
140                  * its staying as a return
141                  *
142                  * BUG();
143                  */
144
145         if (f->flush_mm == read_pda(active_mm)) {
146                 if (read_pda(mmu_state) == TLBSTATE_OK) {
147                         if (f->flush_va == TLB_FLUSH_ALL)
148                                 local_flush_tlb();
149                         else
150                                 __flush_tlb_one(f->flush_va);
151                 } else
152                         leave_mm(cpu);
153         }
154 out:
155         ack_APIC_irq();
156         cpu_clear(cpu, f->flush_cpumask);
157         add_pda(irq_tlb_count, 1);
158 }
159
160 void native_flush_tlb_others(const cpumask_t *cpumaskp, struct mm_struct *mm,
161                              unsigned long va)
162 {
163         int sender;
164         union smp_flush_state *f;
165         cpumask_t cpumask = *cpumaskp;
166
167         if (is_uv_system() && uv_flush_tlb_others(&cpumask, mm, va))
168                 return;
169
170         /* Caller has disabled preemption */
171         sender = smp_processor_id() % NUM_INVALIDATE_TLB_VECTORS;
172         f = &per_cpu(flush_state, sender);
173
174         /*
175          * Could avoid this lock when
176          * num_online_cpus() <= NUM_INVALIDATE_TLB_VECTORS, but it is
177          * probably not worth checking this for a cache-hot lock.
178          */
179         spin_lock(&f->tlbstate_lock);
180
181         f->flush_mm = mm;
182         f->flush_va = va;
183         cpus_or(f->flush_cpumask, cpumask, f->flush_cpumask);
184
185         /*
186          * We have to send the IPI only to
187          * CPUs affected.
188          */
189         send_IPI_mask(cpumask, INVALIDATE_TLB_VECTOR_START + sender);
190
191         while (!cpus_empty(f->flush_cpumask))
192                 cpu_relax();
193
194         f->flush_mm = NULL;
195         f->flush_va = 0;
196         spin_unlock(&f->tlbstate_lock);
197 }
198
199 static int __cpuinit init_smp_flush(void)
200 {
201         int i;
202
203         for_each_possible_cpu(i)
204                 spin_lock_init(&per_cpu(flush_state, i).tlbstate_lock);
205
206         return 0;
207 }
208 core_initcall(init_smp_flush);
209
210 void flush_tlb_current_task(void)
211 {
212         struct mm_struct *mm = current->mm;
213         cpumask_t cpu_mask;
214
215         preempt_disable();
216         cpu_mask = mm->cpu_vm_mask;
217         cpu_clear(smp_processor_id(), cpu_mask);
218
219         local_flush_tlb();
220         if (!cpus_empty(cpu_mask))
221                 flush_tlb_others(cpu_mask, mm, TLB_FLUSH_ALL);
222         preempt_enable();
223 }
224
225 void flush_tlb_mm(struct mm_struct *mm)
226 {
227         cpumask_t cpu_mask;
228
229         preempt_disable();
230         cpu_mask = mm->cpu_vm_mask;
231         cpu_clear(smp_processor_id(), cpu_mask);
232
233         if (current->active_mm == mm) {
234                 if (current->mm)
235                         local_flush_tlb();
236                 else
237                         leave_mm(smp_processor_id());
238         }
239         if (!cpus_empty(cpu_mask))
240                 flush_tlb_others(cpu_mask, mm, TLB_FLUSH_ALL);
241
242         preempt_enable();
243 }
244
245 void flush_tlb_page(struct vm_area_struct *vma, unsigned long va)
246 {
247         struct mm_struct *mm = vma->vm_mm;
248         cpumask_t cpu_mask;
249
250         preempt_disable();
251         cpu_mask = mm->cpu_vm_mask;
252         cpu_clear(smp_processor_id(), cpu_mask);
253
254         if (current->active_mm == mm) {
255                 if (current->mm)
256                         __flush_tlb_one(va);
257                 else
258                         leave_mm(smp_processor_id());
259         }
260
261         if (!cpus_empty(cpu_mask))
262                 flush_tlb_others(cpu_mask, mm, va);
263
264         preempt_enable();
265 }
266
267 static void do_flush_tlb_all(void *info)
268 {
269         unsigned long cpu = smp_processor_id();
270
271         __flush_tlb_all();
272         if (read_pda(mmu_state) == TLBSTATE_LAZY)
273                 leave_mm(cpu);
274 }
275
276 void flush_tlb_all(void)
277 {
278         on_each_cpu(do_flush_tlb_all, NULL, 1);
279 }