1 #include <linux/cpumask.h> 2 #include <linux/interrupt.h> 3 4 #include <linux/mm.h> 5 #include <linux/delay.h> 6 #include <linux/spinlock.h> 7 #include <linux/kernel_stat.h> 8 #include <linux/mc146818rtc.h> 9 #include <linux/cache.h> 10 #include <linux/cpu.h> 11 #include <linux/module.h> 12 13 #include <asm/smp.h> 14 #include <asm/mtrr.h> 15 #include <asm/tlbflush.h> 16 #include <asm/mmu_context.h> 17 #include <asm/apic.h> 18 #include <asm/proto.h> 19 #include <asm/ipi.h> 20 21 void __default_send_IPI_shortcut(unsigned int shortcut, int vector, unsigned int dest) 22 { 23 /* 24 * Subtle. In the case of the 'never do double writes' workaround 25 * we have to lock out interrupts to be safe. As we don't care 26 * of the value read we use an atomic rmw access to avoid costly 27 * cli/sti. Otherwise we use an even cheaper single atomic write 28 * to the APIC. 29 */ 30 unsigned int cfg; 31 32 /* 33 * Wait for idle. 34 */ 35 __xapic_wait_icr_idle(); 36 37 /* 38 * No need to touch the target chip field 39 */ 40 cfg = __prepare_ICR(shortcut, vector, dest); 41 42 /* 43 * Send the IPI. The write to APIC_ICR fires this off. 44 */ 45 native_apic_mem_write(APIC_ICR, cfg); 46 } 47 48 /* 49 * This is used to send an IPI with no shorthand notation (the destination is 50 * specified in bits 56 to 63 of the ICR). 51 */ 52 void __default_send_IPI_dest_field(unsigned int mask, int vector, unsigned int dest) 53 { 54 unsigned long cfg; 55 56 /* 57 * Wait for idle. 58 */ 59 if (unlikely(vector == NMI_VECTOR)) 60 safe_apic_wait_icr_idle(); 61 else 62 __xapic_wait_icr_idle(); 63 64 /* 65 * prepare target chip field 66 */ 67 cfg = __prepare_ICR2(mask); 68 native_apic_mem_write(APIC_ICR2, cfg); 69 70 /* 71 * program the ICR 72 */ 73 cfg = __prepare_ICR(0, vector, dest); 74 75 /* 76 * Send the IPI. The write to APIC_ICR fires this off. 77 */ 78 native_apic_mem_write(APIC_ICR, cfg); 79 } 80 81 void default_send_IPI_single_phys(int cpu, int vector) 82 { 83 unsigned long flags; 84 85 local_irq_save(flags); 86 __default_send_IPI_dest_field(per_cpu(x86_cpu_to_apicid, cpu), 87 vector, APIC_DEST_PHYSICAL); 88 local_irq_restore(flags); 89 } 90 91 void default_send_IPI_mask_sequence_phys(const struct cpumask *mask, int vector) 92 { 93 unsigned long query_cpu; 94 unsigned long flags; 95 96 /* 97 * Hack. The clustered APIC addressing mode doesn't allow us to send 98 * to an arbitrary mask, so I do a unicast to each CPU instead. 99 * - mbligh 100 */ 101 local_irq_save(flags); 102 for_each_cpu(query_cpu, mask) { 103 __default_send_IPI_dest_field(per_cpu(x86_cpu_to_apicid, 104 query_cpu), vector, APIC_DEST_PHYSICAL); 105 } 106 local_irq_restore(flags); 107 } 108 109 void default_send_IPI_mask_allbutself_phys(const struct cpumask *mask, 110 int vector) 111 { 112 unsigned int this_cpu = smp_processor_id(); 113 unsigned int query_cpu; 114 unsigned long flags; 115 116 /* See Hack comment above */ 117 118 local_irq_save(flags); 119 for_each_cpu(query_cpu, mask) { 120 if (query_cpu == this_cpu) 121 continue; 122 __default_send_IPI_dest_field(per_cpu(x86_cpu_to_apicid, 123 query_cpu), vector, APIC_DEST_PHYSICAL); 124 } 125 local_irq_restore(flags); 126 } 127 128 /* 129 * Helper function for APICs which insist on cpumasks 130 */ 131 void default_send_IPI_single(int cpu, int vector) 132 { 133 apic->send_IPI_mask(cpumask_of(cpu), vector); 134 } 135 136 #ifdef CONFIG_X86_32 137 138 void default_send_IPI_mask_sequence_logical(const struct cpumask *mask, 139 int vector) 140 { 141 unsigned long flags; 142 unsigned int query_cpu; 143 144 /* 145 * Hack. The clustered APIC addressing mode doesn't allow us to send 146 * to an arbitrary mask, so I do a unicasts to each CPU instead. This 147 * should be modified to do 1 message per cluster ID - mbligh 148 */ 149 150 local_irq_save(flags); 151 for_each_cpu(query_cpu, mask) 152 __default_send_IPI_dest_field( 153 early_per_cpu(x86_cpu_to_logical_apicid, query_cpu), 154 vector, apic->dest_logical); 155 local_irq_restore(flags); 156 } 157 158 void default_send_IPI_mask_allbutself_logical(const struct cpumask *mask, 159 int vector) 160 { 161 unsigned long flags; 162 unsigned int query_cpu; 163 unsigned int this_cpu = smp_processor_id(); 164 165 /* See Hack comment above */ 166 167 local_irq_save(flags); 168 for_each_cpu(query_cpu, mask) { 169 if (query_cpu == this_cpu) 170 continue; 171 __default_send_IPI_dest_field( 172 early_per_cpu(x86_cpu_to_logical_apicid, query_cpu), 173 vector, apic->dest_logical); 174 } 175 local_irq_restore(flags); 176 } 177 178 /* 179 * This is only used on smaller machines. 180 */ 181 void default_send_IPI_mask_logical(const struct cpumask *cpumask, int vector) 182 { 183 unsigned long mask = cpumask_bits(cpumask)[0]; 184 unsigned long flags; 185 186 if (!mask) 187 return; 188 189 local_irq_save(flags); 190 WARN_ON(mask & ~cpumask_bits(cpu_online_mask)[0]); 191 __default_send_IPI_dest_field(mask, vector, apic->dest_logical); 192 local_irq_restore(flags); 193 } 194 195 void default_send_IPI_allbutself(int vector) 196 { 197 /* 198 * if there are no other CPUs in the system then we get an APIC send 199 * error if we try to broadcast, thus avoid sending IPIs in this case. 200 */ 201 if (!(num_online_cpus() > 1)) 202 return; 203 204 __default_local_send_IPI_allbutself(vector); 205 } 206 207 void default_send_IPI_all(int vector) 208 { 209 __default_local_send_IPI_all(vector); 210 } 211 212 void default_send_IPI_self(int vector) 213 { 214 __default_send_IPI_shortcut(APIC_DEST_SELF, vector, apic->dest_logical); 215 } 216 217 /* must come after the send_IPI functions above for inlining */ 218 static int convert_apicid_to_cpu(int apic_id) 219 { 220 int i; 221 222 for_each_possible_cpu(i) { 223 if (per_cpu(x86_cpu_to_apicid, i) == apic_id) 224 return i; 225 } 226 return -1; 227 } 228 229 int safe_smp_processor_id(void) 230 { 231 int apicid, cpuid; 232 233 if (!cpu_has_apic) 234 return 0; 235 236 apicid = hard_smp_processor_id(); 237 if (apicid == BAD_APICID) 238 return 0; 239 240 cpuid = convert_apicid_to_cpu(apicid); 241 242 return cpuid >= 0 ? cpuid : 0; 243 } 244 #endif 245