1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21#include <linux/errno.h>
22#include <linux/module.h>
23#include <linux/efi.h>
24#include <linux/bcd.h>
25#include <linux/highmem.h>
26
27#include <asm/bug.h>
28#include <asm/paravirt.h>
29#include <asm/debugreg.h>
30#include <asm/desc.h>
31#include <asm/setup.h>
32#include <asm/pgtable.h>
33#include <asm/time.h>
34#include <asm/pgalloc.h>
35#include <asm/irq.h>
36#include <asm/delay.h>
37#include <asm/fixmap.h>
38#include <asm/apic.h>
39#include <asm/tlbflush.h>
40#include <asm/timer.h>
41#include <asm/special_insns.h>
42
43
44void _paravirt_nop(void)
45{
46}
47
48
49u32 _paravirt_ident_32(u32 x)
50{
51 return x;
52}
53
54u64 _paravirt_ident_64(u64 x)
55{
56 return x;
57}
58
59void __init default_banner(void)
60{
61 printk(KERN_INFO "Booting paravirtualized kernel on %s\n",
62 pv_info.name);
63}
64
65
66#define DEF_NATIVE(ops, name, code) \
67 extern const char start_##ops##_##name[], end_##ops##_##name[]; \
68 asm("start_" #ops "_" #name ": " code "; end_" #ops "_" #name ":")
69
70
71static const unsigned char ud2a[] = { 0x0f, 0x0b };
72
73unsigned paravirt_patch_nop(void)
74{
75 return 0;
76}
77
78unsigned paravirt_patch_ignore(unsigned len)
79{
80 return len;
81}
82
83struct branch {
84 unsigned char opcode;
85 u32 delta;
86} __attribute__((packed));
87
88unsigned paravirt_patch_call(void *insnbuf,
89 const void *target, u16 tgt_clobbers,
90 unsigned long addr, u16 site_clobbers,
91 unsigned len)
92{
93 struct branch *b = insnbuf;
94 unsigned long delta = (unsigned long)target - (addr+5);
95
96 if (tgt_clobbers & ~site_clobbers)
97 return len;
98 if (len < 5)
99 return len;
100
101 b->opcode = 0xe8;
102 b->delta = delta;
103 BUILD_BUG_ON(sizeof(*b) != 5);
104
105 return 5;
106}
107
108unsigned paravirt_patch_jmp(void *insnbuf, const void *target,
109 unsigned long addr, unsigned len)
110{
111 struct branch *b = insnbuf;
112 unsigned long delta = (unsigned long)target - (addr+5);
113
114 if (len < 5)
115 return len;
116
117 b->opcode = 0xe9;
118 b->delta = delta;
119
120 return 5;
121}
122
123
124
125static void *get_call_destination(u8 type)
126{
127 struct paravirt_patch_template tmpl = {
128 .pv_init_ops = pv_init_ops,
129 .pv_time_ops = pv_time_ops,
130 .pv_cpu_ops = pv_cpu_ops,
131 .pv_irq_ops = pv_irq_ops,
132 .pv_apic_ops = pv_apic_ops,
133 .pv_mmu_ops = pv_mmu_ops,
134#ifdef CONFIG_PARAVIRT_SPINLOCKS
135 .pv_lock_ops = pv_lock_ops,
136#endif
137 };
138 return *((void **)&tmpl + type);
139}
140
141unsigned paravirt_patch_default(u8 type, u16 clobbers, void *insnbuf,
142 unsigned long addr, unsigned len)
143{
144 void *opfunc = get_call_destination(type);
145 unsigned ret;
146
147 if (opfunc == NULL)
148
149 ret = paravirt_patch_insns(insnbuf, len, ud2a, ud2a+sizeof(ud2a));
150 else if (opfunc == _paravirt_nop)
151
152 ret = paravirt_patch_nop();
153
154
155 else if (opfunc == _paravirt_ident_32)
156 ret = paravirt_patch_ident_32(insnbuf, len);
157 else if (opfunc == _paravirt_ident_64)
158 ret = paravirt_patch_ident_64(insnbuf, len);
159
160 else if (type == PARAVIRT_PATCH(pv_cpu_ops.iret) ||
161 type == PARAVIRT_PATCH(pv_cpu_ops.irq_enable_sysexit) ||
162 type == PARAVIRT_PATCH(pv_cpu_ops.usergs_sysret32) ||
163 type == PARAVIRT_PATCH(pv_cpu_ops.usergs_sysret64))
164
165 ret = paravirt_patch_jmp(insnbuf, opfunc, addr, len);
166 else
167
168
169 ret = paravirt_patch_call(insnbuf, opfunc, CLBR_ANY,
170 addr, clobbers, len);
171
172 return ret;
173}
174
175unsigned paravirt_patch_insns(void *insnbuf, unsigned len,
176 const char *start, const char *end)
177{
178 unsigned insn_len = end - start;
179
180 if (insn_len > len || start == NULL)
181 insn_len = len;
182 else
183 memcpy(insnbuf, start, insn_len);
184
185 return insn_len;
186}
187
188static void native_flush_tlb(void)
189{
190 __native_flush_tlb();
191}
192
193
194
195
196
197static void native_flush_tlb_global(void)
198{
199 __native_flush_tlb_global();
200}
201
202static void native_flush_tlb_single(unsigned long addr)
203{
204 __native_flush_tlb_single(addr);
205}
206
207struct static_key paravirt_steal_enabled;
208struct static_key paravirt_steal_rq_enabled;
209
210static u64 native_steal_clock(int cpu)
211{
212 return 0;
213}
214
215
216extern void native_iret(void);
217extern void native_irq_enable_sysexit(void);
218extern void native_usergs_sysret32(void);
219extern void native_usergs_sysret64(void);
220
221static struct resource reserve_ioports = {
222 .start = 0,
223 .end = IO_SPACE_LIMIT,
224 .name = "paravirt-ioport",
225 .flags = IORESOURCE_IO | IORESOURCE_BUSY,
226};
227
228
229
230
231
232
233
234
235int paravirt_disable_iospace(void)
236{
237 return request_resource(&ioport_resource, &reserve_ioports);
238}
239
240static DEFINE_PER_CPU(enum paravirt_lazy_mode, paravirt_lazy_mode) = PARAVIRT_LAZY_NONE;
241
242static inline void enter_lazy(enum paravirt_lazy_mode mode)
243{
244 BUG_ON(this_cpu_read(paravirt_lazy_mode) != PARAVIRT_LAZY_NONE);
245
246 this_cpu_write(paravirt_lazy_mode, mode);
247}
248
249static void leave_lazy(enum paravirt_lazy_mode mode)
250{
251 BUG_ON(this_cpu_read(paravirt_lazy_mode) != mode);
252
253 this_cpu_write(paravirt_lazy_mode, PARAVIRT_LAZY_NONE);
254}
255
256void paravirt_enter_lazy_mmu(void)
257{
258 enter_lazy(PARAVIRT_LAZY_MMU);
259}
260
261void paravirt_leave_lazy_mmu(void)
262{
263 leave_lazy(PARAVIRT_LAZY_MMU);
264}
265
266void paravirt_start_context_switch(struct task_struct *prev)
267{
268 BUG_ON(preemptible());
269
270 if (this_cpu_read(paravirt_lazy_mode) == PARAVIRT_LAZY_MMU) {
271 arch_leave_lazy_mmu_mode();
272 set_ti_thread_flag(task_thread_info(prev), TIF_LAZY_MMU_UPDATES);
273 }
274 enter_lazy(PARAVIRT_LAZY_CPU);
275}
276
277void paravirt_end_context_switch(struct task_struct *next)
278{
279 BUG_ON(preemptible());
280
281 leave_lazy(PARAVIRT_LAZY_CPU);
282
283 if (test_and_clear_ti_thread_flag(task_thread_info(next), TIF_LAZY_MMU_UPDATES))
284 arch_enter_lazy_mmu_mode();
285}
286
287enum paravirt_lazy_mode paravirt_get_lazy_mode(void)
288{
289 if (in_interrupt())
290 return PARAVIRT_LAZY_NONE;
291
292 return this_cpu_read(paravirt_lazy_mode);
293}
294
295void arch_flush_lazy_mmu_mode(void)
296{
297 preempt_disable();
298
299 if (paravirt_get_lazy_mode() == PARAVIRT_LAZY_MMU) {
300 arch_leave_lazy_mmu_mode();
301 arch_enter_lazy_mmu_mode();
302 }
303
304 preempt_enable();
305}
306
307struct pv_info pv_info = {
308 .name = "bare hardware",
309 .paravirt_enabled = 0,
310 .kernel_rpl = 0,
311 .shared_kernel_pmd = 1,
312
313#ifdef CONFIG_X86_64
314 .extra_user_64bit_cs = __USER_CS,
315#endif
316};
317
318struct pv_init_ops pv_init_ops = {
319 .patch = native_patch,
320};
321
322struct pv_time_ops pv_time_ops = {
323 .sched_clock = native_sched_clock,
324 .steal_clock = native_steal_clock,
325};
326
327struct pv_irq_ops pv_irq_ops = {
328 .save_fl = __PV_IS_CALLEE_SAVE(native_save_fl),
329 .restore_fl = __PV_IS_CALLEE_SAVE(native_restore_fl),
330 .irq_disable = __PV_IS_CALLEE_SAVE(native_irq_disable),
331 .irq_enable = __PV_IS_CALLEE_SAVE(native_irq_enable),
332 .safe_halt = native_safe_halt,
333 .halt = native_halt,
334#ifdef CONFIG_X86_64
335 .adjust_exception_frame = paravirt_nop,
336#endif
337};
338
339struct pv_cpu_ops pv_cpu_ops = {
340 .cpuid = native_cpuid,
341 .get_debugreg = native_get_debugreg,
342 .set_debugreg = native_set_debugreg,
343 .clts = native_clts,
344 .read_cr0 = native_read_cr0,
345 .write_cr0 = native_write_cr0,
346 .read_cr4 = native_read_cr4,
347 .read_cr4_safe = native_read_cr4_safe,
348 .write_cr4 = native_write_cr4,
349#ifdef CONFIG_X86_64
350 .read_cr8 = native_read_cr8,
351 .write_cr8 = native_write_cr8,
352#endif
353 .wbinvd = native_wbinvd,
354 .read_msr = native_read_msr_safe,
355 .write_msr = native_write_msr_safe,
356 .read_tsc = native_read_tsc,
357 .read_pmc = native_read_pmc,
358 .read_tscp = native_read_tscp,
359 .load_tr_desc = native_load_tr_desc,
360 .set_ldt = native_set_ldt,
361 .load_gdt = native_load_gdt,
362 .load_idt = native_load_idt,
363 .store_gdt = native_store_gdt,
364 .store_idt = native_store_idt,
365 .store_tr = native_store_tr,
366 .load_tls = native_load_tls,
367#ifdef CONFIG_X86_64
368 .load_gs_index = native_load_gs_index,
369#endif
370 .write_ldt_entry = native_write_ldt_entry,
371 .write_gdt_entry = native_write_gdt_entry,
372 .write_idt_entry = native_write_idt_entry,
373
374 .alloc_ldt = paravirt_nop,
375 .free_ldt = paravirt_nop,
376
377 .load_sp0 = native_load_sp0,
378
379#if defined(CONFIG_X86_32) || defined(CONFIG_IA32_EMULATION)
380 .irq_enable_sysexit = native_irq_enable_sysexit,
381#endif
382#ifdef CONFIG_X86_64
383#ifdef CONFIG_IA32_EMULATION
384 .usergs_sysret32 = native_usergs_sysret32,
385#endif
386 .usergs_sysret64 = native_usergs_sysret64,
387#endif
388 .iret = native_iret,
389 .swapgs = native_swapgs,
390
391 .set_iopl_mask = native_set_iopl_mask,
392 .io_delay = native_io_delay,
393
394 .start_context_switch = paravirt_nop,
395 .end_context_switch = paravirt_nop,
396};
397
398struct pv_apic_ops pv_apic_ops = {
399#ifdef CONFIG_X86_LOCAL_APIC
400 .startup_ipi_hook = paravirt_nop,
401#endif
402};
403
404#if defined(CONFIG_X86_32) && !defined(CONFIG_X86_PAE)
405
406#define PTE_IDENT __PV_IS_CALLEE_SAVE(_paravirt_ident_32)
407#else
408
409#define PTE_IDENT __PV_IS_CALLEE_SAVE(_paravirt_ident_64)
410#endif
411
412struct pv_mmu_ops pv_mmu_ops = {
413
414 .read_cr2 = native_read_cr2,
415 .write_cr2 = native_write_cr2,
416 .read_cr3 = native_read_cr3,
417 .write_cr3 = native_write_cr3,
418
419 .flush_tlb_user = native_flush_tlb,
420 .flush_tlb_kernel = native_flush_tlb_global,
421 .flush_tlb_single = native_flush_tlb_single,
422 .flush_tlb_others = native_flush_tlb_others,
423
424 .pgd_alloc = __paravirt_pgd_alloc,
425 .pgd_free = paravirt_nop,
426
427 .alloc_pte = paravirt_nop,
428 .alloc_pmd = paravirt_nop,
429 .alloc_pud = paravirt_nop,
430 .release_pte = paravirt_nop,
431 .release_pmd = paravirt_nop,
432 .release_pud = paravirt_nop,
433
434 .set_pte = native_set_pte,
435 .set_pte_at = native_set_pte_at,
436 .set_pmd = native_set_pmd,
437 .set_pmd_at = native_set_pmd_at,
438 .pte_update = paravirt_nop,
439 .pte_update_defer = paravirt_nop,
440 .pmd_update = paravirt_nop,
441 .pmd_update_defer = paravirt_nop,
442
443 .ptep_modify_prot_start = __ptep_modify_prot_start,
444 .ptep_modify_prot_commit = __ptep_modify_prot_commit,
445
446#if PAGETABLE_LEVELS >= 3
447#ifdef CONFIG_X86_PAE
448 .set_pte_atomic = native_set_pte_atomic,
449 .pte_clear = native_pte_clear,
450 .pmd_clear = native_pmd_clear,
451#endif
452 .set_pud = native_set_pud,
453
454 .pmd_val = PTE_IDENT,
455 .make_pmd = PTE_IDENT,
456
457#if PAGETABLE_LEVELS == 4
458 .pud_val = PTE_IDENT,
459 .make_pud = PTE_IDENT,
460
461 .set_pgd = native_set_pgd,
462#endif
463#endif
464
465 .pte_val = PTE_IDENT,
466 .pgd_val = PTE_IDENT,
467
468 .make_pte = PTE_IDENT,
469 .make_pgd = PTE_IDENT,
470
471 .dup_mmap = paravirt_nop,
472 .exit_mmap = paravirt_nop,
473 .activate_mm = paravirt_nop,
474
475 .lazy_mode = {
476 .enter = paravirt_nop,
477 .leave = paravirt_nop,
478 },
479
480 .set_fixmap = native_set_fixmap,
481};
482
483EXPORT_SYMBOL_GPL(pv_time_ops);
484EXPORT_SYMBOL (pv_cpu_ops);
485EXPORT_SYMBOL (pv_mmu_ops);
486EXPORT_SYMBOL_GPL(pv_apic_ops);
487EXPORT_SYMBOL_GPL(pv_info);
488EXPORT_SYMBOL (pv_irq_ops);
489