Merge branch 'x86-apic-for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git...
[sfrench/cifs-2.6.git] / arch / x86 / kernel / apic / apic_flat_64.c
1 /*
2  * Copyright 2004 James Cleverdon, IBM.
3  * Subject to the GNU Public License, v.2
4  *
5  * Flat APIC subarch code.
6  *
7  * Hacked for x86-64 by James Cleverdon from i386 architecture code by
8  * Martin Bligh, Andi Kleen, James Bottomley, John Stultz, and
9  * James Cleverdon.
10  */
11 #include <linux/errno.h>
12 #include <linux/threads.h>
13 #include <linux/cpumask.h>
14 #include <linux/string.h>
15 #include <linux/kernel.h>
16 #include <linux/ctype.h>
17 #include <linux/hardirq.h>
18 #include <linux/module.h>
19 #include <asm/smp.h>
20 #include <asm/apic.h>
21 #include <asm/ipi.h>
22
23 #include <linux/acpi.h>
24
25 static struct apic apic_physflat;
26 static struct apic apic_flat;
27
28 struct apic __read_mostly *apic = &apic_flat;
29 EXPORT_SYMBOL_GPL(apic);
30
31 static int flat_acpi_madt_oem_check(char *oem_id, char *oem_table_id)
32 {
33         return 1;
34 }
35
36 /*
37  * Set up the logical destination ID.
38  *
39  * Intel recommends to set DFR, LDR and TPR before enabling
40  * an APIC.  See e.g. "AP-388 82489DX User's Manual" (Intel
41  * document number 292116).  So here it goes...
42  */
43 void flat_init_apic_ldr(void)
44 {
45         unsigned long val;
46         unsigned long num, id;
47
48         num = smp_processor_id();
49         id = 1UL << num;
50         apic_write(APIC_DFR, APIC_DFR_FLAT);
51         val = apic_read(APIC_LDR) & ~APIC_LDR_MASK;
52         val |= SET_APIC_LOGICAL_ID(id);
53         apic_write(APIC_LDR, val);
54 }
55
56 static inline void _flat_send_IPI_mask(unsigned long mask, int vector)
57 {
58         unsigned long flags;
59
60         local_irq_save(flags);
61         __default_send_IPI_dest_field(mask, vector, apic->dest_logical);
62         local_irq_restore(flags);
63 }
64
65 static void flat_send_IPI_mask(const struct cpumask *cpumask, int vector)
66 {
67         unsigned long mask = cpumask_bits(cpumask)[0];
68
69         _flat_send_IPI_mask(mask, vector);
70 }
71
72 static void
73 flat_send_IPI_mask_allbutself(const struct cpumask *cpumask, int vector)
74 {
75         unsigned long mask = cpumask_bits(cpumask)[0];
76         int cpu = smp_processor_id();
77
78         if (cpu < BITS_PER_LONG)
79                 clear_bit(cpu, &mask);
80
81         _flat_send_IPI_mask(mask, vector);
82 }
83
84 static void flat_send_IPI_allbutself(int vector)
85 {
86         int cpu = smp_processor_id();
87 #ifdef  CONFIG_HOTPLUG_CPU
88         int hotplug = 1;
89 #else
90         int hotplug = 0;
91 #endif
92         if (hotplug || vector == NMI_VECTOR) {
93                 if (!cpumask_equal(cpu_online_mask, cpumask_of(cpu))) {
94                         unsigned long mask = cpumask_bits(cpu_online_mask)[0];
95
96                         if (cpu < BITS_PER_LONG)
97                                 clear_bit(cpu, &mask);
98
99                         _flat_send_IPI_mask(mask, vector);
100                 }
101         } else if (num_online_cpus() > 1) {
102                 __default_send_IPI_shortcut(APIC_DEST_ALLBUT,
103                                             vector, apic->dest_logical);
104         }
105 }
106
107 static void flat_send_IPI_all(int vector)
108 {
109         if (vector == NMI_VECTOR) {
110                 flat_send_IPI_mask(cpu_online_mask, vector);
111         } else {
112                 __default_send_IPI_shortcut(APIC_DEST_ALLINC,
113                                             vector, apic->dest_logical);
114         }
115 }
116
117 static unsigned int flat_get_apic_id(unsigned long x)
118 {
119         unsigned int id;
120
121         id = (((x)>>24) & 0xFFu);
122
123         return id;
124 }
125
126 static unsigned long set_apic_id(unsigned int id)
127 {
128         unsigned long x;
129
130         x = ((id & 0xFFu)<<24);
131         return x;
132 }
133
134 static unsigned int read_xapic_id(void)
135 {
136         unsigned int id;
137
138         id = flat_get_apic_id(apic_read(APIC_ID));
139         return id;
140 }
141
142 static int flat_apic_id_registered(void)
143 {
144         return physid_isset(read_xapic_id(), phys_cpu_present_map);
145 }
146
147 static int flat_phys_pkg_id(int initial_apic_id, int index_msb)
148 {
149         return initial_apic_id >> index_msb;
150 }
151
152 static int flat_probe(void)
153 {
154         return 1;
155 }
156
157 static struct apic apic_flat =  {
158         .name                           = "flat",
159         .probe                          = flat_probe,
160         .acpi_madt_oem_check            = flat_acpi_madt_oem_check,
161         .apic_id_valid                  = default_apic_id_valid,
162         .apic_id_registered             = flat_apic_id_registered,
163
164         .irq_delivery_mode              = dest_LowestPrio,
165         .irq_dest_mode                  = 1, /* logical */
166
167         .target_cpus                    = online_target_cpus,
168         .disable_esr                    = 0,
169         .dest_logical                   = APIC_DEST_LOGICAL,
170         .check_apicid_used              = NULL,
171         .check_apicid_present           = NULL,
172
173         .vector_allocation_domain       = flat_vector_allocation_domain,
174         .init_apic_ldr                  = flat_init_apic_ldr,
175
176         .ioapic_phys_id_map             = NULL,
177         .setup_apic_routing             = NULL,
178         .multi_timer_check              = NULL,
179         .cpu_present_to_apicid          = default_cpu_present_to_apicid,
180         .apicid_to_cpu_present          = NULL,
181         .setup_portio_remap             = NULL,
182         .check_phys_apicid_present      = default_check_phys_apicid_present,
183         .enable_apic_mode               = NULL,
184         .phys_pkg_id                    = flat_phys_pkg_id,
185         .mps_oem_check                  = NULL,
186
187         .get_apic_id                    = flat_get_apic_id,
188         .set_apic_id                    = set_apic_id,
189         .apic_id_mask                   = 0xFFu << 24,
190
191         .cpu_mask_to_apicid_and         = flat_cpu_mask_to_apicid_and,
192
193         .send_IPI_mask                  = flat_send_IPI_mask,
194         .send_IPI_mask_allbutself       = flat_send_IPI_mask_allbutself,
195         .send_IPI_allbutself            = flat_send_IPI_allbutself,
196         .send_IPI_all                   = flat_send_IPI_all,
197         .send_IPI_self                  = apic_send_IPI_self,
198
199         .trampoline_phys_low            = DEFAULT_TRAMPOLINE_PHYS_LOW,
200         .trampoline_phys_high           = DEFAULT_TRAMPOLINE_PHYS_HIGH,
201         .wait_for_init_deassert         = false,
202         .smp_callin_clear_local_apic    = NULL,
203         .inquire_remote_apic            = default_inquire_remote_apic,
204
205         .read                           = native_apic_mem_read,
206         .write                          = native_apic_mem_write,
207         .eoi_write                      = native_apic_mem_write,
208         .icr_read                       = native_apic_icr_read,
209         .icr_write                      = native_apic_icr_write,
210         .wait_icr_idle                  = native_apic_wait_icr_idle,
211         .safe_wait_icr_idle             = native_safe_apic_wait_icr_idle,
212 };
213
214 /*
215  * Physflat mode is used when there are more than 8 CPUs on a system.
216  * We cannot use logical delivery in this case because the mask
217  * overflows, so use physical mode.
218  */
219 static int physflat_acpi_madt_oem_check(char *oem_id, char *oem_table_id)
220 {
221 #ifdef CONFIG_ACPI
222         /*
223          * Quirk: some x86_64 machines can only use physical APIC mode
224          * regardless of how many processors are present (x86_64 ES7000
225          * is an example).
226          */
227         if (acpi_gbl_FADT.header.revision >= FADT2_REVISION_ID &&
228                 (acpi_gbl_FADT.flags & ACPI_FADT_APIC_PHYSICAL)) {
229                 printk(KERN_DEBUG "system APIC only can use physical flat");
230                 return 1;
231         }
232
233         if (!strncmp(oem_id, "IBM", 3) && !strncmp(oem_table_id, "EXA", 3)) {
234                 printk(KERN_DEBUG "IBM Summit detected, will use apic physical");
235                 return 1;
236         }
237 #endif
238
239         return 0;
240 }
241
242 static void physflat_send_IPI_mask(const struct cpumask *cpumask, int vector)
243 {
244         default_send_IPI_mask_sequence_phys(cpumask, vector);
245 }
246
247 static void physflat_send_IPI_mask_allbutself(const struct cpumask *cpumask,
248                                               int vector)
249 {
250         default_send_IPI_mask_allbutself_phys(cpumask, vector);
251 }
252
253 static void physflat_send_IPI_allbutself(int vector)
254 {
255         default_send_IPI_mask_allbutself_phys(cpu_online_mask, vector);
256 }
257
258 static void physflat_send_IPI_all(int vector)
259 {
260         physflat_send_IPI_mask(cpu_online_mask, vector);
261 }
262
263 static int physflat_probe(void)
264 {
265         if (apic == &apic_physflat || num_possible_cpus() > 8)
266                 return 1;
267
268         return 0;
269 }
270
271 static struct apic apic_physflat =  {
272
273         .name                           = "physical flat",
274         .probe                          = physflat_probe,
275         .acpi_madt_oem_check            = physflat_acpi_madt_oem_check,
276         .apic_id_valid                  = default_apic_id_valid,
277         .apic_id_registered             = flat_apic_id_registered,
278
279         .irq_delivery_mode              = dest_Fixed,
280         .irq_dest_mode                  = 0, /* physical */
281
282         .target_cpus                    = online_target_cpus,
283         .disable_esr                    = 0,
284         .dest_logical                   = 0,
285         .check_apicid_used              = NULL,
286         .check_apicid_present           = NULL,
287
288         .vector_allocation_domain       = default_vector_allocation_domain,
289         /* not needed, but shouldn't hurt: */
290         .init_apic_ldr                  = flat_init_apic_ldr,
291
292         .ioapic_phys_id_map             = NULL,
293         .setup_apic_routing             = NULL,
294         .multi_timer_check              = NULL,
295         .cpu_present_to_apicid          = default_cpu_present_to_apicid,
296         .apicid_to_cpu_present          = NULL,
297         .setup_portio_remap             = NULL,
298         .check_phys_apicid_present      = default_check_phys_apicid_present,
299         .enable_apic_mode               = NULL,
300         .phys_pkg_id                    = flat_phys_pkg_id,
301         .mps_oem_check                  = NULL,
302
303         .get_apic_id                    = flat_get_apic_id,
304         .set_apic_id                    = set_apic_id,
305         .apic_id_mask                   = 0xFFu << 24,
306
307         .cpu_mask_to_apicid_and         = default_cpu_mask_to_apicid_and,
308
309         .send_IPI_mask                  = physflat_send_IPI_mask,
310         .send_IPI_mask_allbutself       = physflat_send_IPI_mask_allbutself,
311         .send_IPI_allbutself            = physflat_send_IPI_allbutself,
312         .send_IPI_all                   = physflat_send_IPI_all,
313         .send_IPI_self                  = apic_send_IPI_self,
314
315         .trampoline_phys_low            = DEFAULT_TRAMPOLINE_PHYS_LOW,
316         .trampoline_phys_high           = DEFAULT_TRAMPOLINE_PHYS_HIGH,
317         .wait_for_init_deassert         = false,
318         .smp_callin_clear_local_apic    = NULL,
319         .inquire_remote_apic            = default_inquire_remote_apic,
320
321         .read                           = native_apic_mem_read,
322         .write                          = native_apic_mem_write,
323         .eoi_write                      = native_apic_mem_write,
324         .icr_read                       = native_apic_icr_read,
325         .icr_write                      = native_apic_icr_write,
326         .wait_icr_idle                  = native_apic_wait_icr_idle,
327         .safe_wait_icr_idle             = native_safe_apic_wait_icr_idle,
328 };
329
330 /*
331  * We need to check for physflat first, so this order is important.
332  */
333 apic_drivers(apic_physflat, apic_flat);