xref: /kvm-unit-tests/lib/x86/smp.c (revision 7db17e21adeedeba0f421f4c23f13934577f0264)
1 
2 #include <libcflat.h>
3 #include "processor.h"
4 #include "atomic.h"
5 #include "smp.h"
6 #include "apic.h"
7 #include "fwcfg.h"
8 #include "desc.h"
9 
10 #define IPI_VECTOR 0x20
11 
12 typedef void (*ipi_function_type)(void *data);
13 
14 static struct spinlock ipi_lock;
15 static volatile ipi_function_type ipi_function;
16 static void *volatile ipi_data;
17 static volatile int ipi_done;
18 static volatile bool ipi_wait;
19 static int _cpu_count;
20 static atomic_t active_cpus;
21 
22 static __attribute__((used)) void ipi(void)
23 {
24     void (*function)(void *data) = ipi_function;
25     void *data = ipi_data;
26     bool wait = ipi_wait;
27 
28     if (!wait) {
29 	ipi_done = 1;
30 	apic_write(APIC_EOI, 0);
31     }
32     function(data);
33     atomic_dec(&active_cpus);
34     if (wait) {
35 	ipi_done = 1;
36 	apic_write(APIC_EOI, 0);
37     }
38 }
39 
40 asm (
41      "ipi_entry: \n"
42      "   call ipi \n"
43 #ifndef __x86_64__
44      "   iret"
45 #else
46      "   iretq"
47 #endif
48      );
49 
50 int cpu_count(void)
51 {
52     return _cpu_count;
53 }
54 
55 int smp_id(void)
56 {
57     unsigned id;
58 
59     asm ("mov %%gs:0, %0" : "=r"(id));
60     return id;
61 }
62 
63 static void setup_smp_id(void *data)
64 {
65     asm ("mov %0, %%gs:0" : : "r"(apic_id()) : "memory");
66 }
67 
68 static void __on_cpu(int cpu, void (*function)(void *data), void *data,
69                      int wait)
70 {
71     spin_lock(&ipi_lock);
72     if (cpu == smp_id())
73 	function(data);
74     else {
75 	atomic_inc(&active_cpus);
76 	ipi_done = 0;
77 	ipi_function = function;
78 	ipi_data = data;
79 	ipi_wait = wait;
80 	apic_icr_write(APIC_INT_ASSERT | APIC_DEST_PHYSICAL | APIC_DM_FIXED
81                        | IPI_VECTOR,
82                        cpu);
83 	while (!ipi_done)
84 	    ;
85     }
86     spin_unlock(&ipi_lock);
87 }
88 
89 void on_cpu(int cpu, void (*function)(void *data), void *data)
90 {
91     __on_cpu(cpu, function, data, 1);
92 }
93 
94 void on_cpu_async(int cpu, void (*function)(void *data), void *data)
95 {
96     __on_cpu(cpu, function, data, 0);
97 }
98 
99 void on_cpus(void (*function)(void *data), void *data)
100 {
101     int cpu;
102 
103     for (cpu = cpu_count() - 1; cpu >= 0; --cpu)
104         on_cpu_async(cpu, function, data);
105 
106     while (cpus_active() > 1)
107         pause();
108 }
109 
110 int cpus_active(void)
111 {
112     return atomic_read(&active_cpus);
113 }
114 
115 void smp_init(void)
116 {
117     int i;
118     void ipi_entry(void);
119 
120     _cpu_count = fwcfg_get_nb_cpus();
121 
122     setup_idt();
123     set_idt_entry(IPI_VECTOR, ipi_entry, 0);
124 
125     setup_smp_id(0);
126     for (i = 1; i < cpu_count(); ++i)
127         on_cpu(i, setup_smp_id, 0);
128 
129     atomic_inc(&active_cpus);
130 }
131