enlighten.c 38.8 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13
/*
 * Core of Xen paravirt_ops implementation.
 *
 * This file contains the xen_paravirt_ops structure itself, and the
 * implementations for:
 * - privileged instructions
 * - interrupt flags
 * - segment operations
 * - booting and setup
 *
 * Jeremy Fitzhardinge <jeremy@xensource.com>, XenSource Inc, 2007
 */

14
#include <linux/cpu.h>
15 16 17 18
#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/smp.h>
#include <linux/preempt.h>
19
#include <linux/hardirq.h>
20 21 22 23
#include <linux/percpu.h>
#include <linux/delay.h>
#include <linux/start_kernel.h>
#include <linux/sched.h>
24
#include <linux/kprobes.h>
25 26
#include <linux/bootmem.h>
#include <linux/module.h>
27 28 29
#include <linux/mm.h>
#include <linux/page-flags.h>
#include <linux/highmem.h>
30
#include <linux/console.h>
C
Chris Wright 已提交
31
#include <linux/pci.h>
32
#include <linux/gfp.h>
33
#include <linux/memblock.h>
34

35
#include <xen/xen.h>
36
#include <xen/events.h>
37
#include <xen/interface/xen.h>
38
#include <xen/interface/version.h>
39 40
#include <xen/interface/physdev.h>
#include <xen/interface/vcpu.h>
41
#include <xen/interface/memory.h>
42
#include <xen/interface/xen-mca.h>
43 44
#include <xen/features.h>
#include <xen/page.h>
45
#include <xen/hvm.h>
J
Jeremy Fitzhardinge 已提交
46
#include <xen/hvc-console.h>
47
#include <xen/acpi.h>
48 49

#include <asm/paravirt.h>
I
Ingo Molnar 已提交
50
#include <asm/apic.h>
51
#include <asm/page.h>
52
#include <asm/xen/pci.h>
53 54 55 56
#include <asm/xen/hypercall.h>
#include <asm/xen/hypervisor.h>
#include <asm/fixmap.h>
#include <asm/processor.h>
57
#include <asm/proto.h>
58
#include <asm/msr-index.h>
59
#include <asm/traps.h>
60 61
#include <asm/setup.h>
#include <asm/desc.h>
62
#include <asm/pgalloc.h>
63
#include <asm/pgtable.h>
J
Jeremy Fitzhardinge 已提交
64
#include <asm/tlbflush.h>
J
Jeremy Fitzhardinge 已提交
65
#include <asm/reboot.h>
66
#include <asm/stackprotector.h>
67
#include <asm/hypervisor.h>
68
#include <asm/mwait.h>
69
#include <asm/pci_x86.h>
70
#include <asm/pat.h>
71 72 73 74 75 76 77 78

#ifdef CONFIG_ACPI
#include <linux/acpi.h>
#include <asm/acpi.h>
#include <acpi/pdc_intel.h>
#include <acpi/processor.h>
#include <xen/interface/platform.h>
#endif
79 80

#include "xen-ops.h"
J
Jeremy Fitzhardinge 已提交
81
#include "mmu.h"
B
Ben Guthro 已提交
82
#include "smp.h"
83 84 85 86 87 88
#include "multicalls.h"

EXPORT_SYMBOL_GPL(hypercall_page);

DEFINE_PER_CPU(struct vcpu_info *, xen_vcpu);
DEFINE_PER_CPU(struct vcpu_info, xen_vcpu_info);
89

90 91 92
enum xen_domain_type xen_domain_type = XEN_NATIVE;
EXPORT_SYMBOL_GPL(xen_domain_type);

93 94
unsigned long *machine_to_phys_mapping = (void *)MACH2PHYS_VIRT_START;
EXPORT_SYMBOL(machine_to_phys_mapping);
95 96
unsigned long  machine_to_phys_nr;
EXPORT_SYMBOL(machine_to_phys_nr);
97

98 99 100
struct start_info *xen_start_info;
EXPORT_SYMBOL_GPL(xen_start_info);

101
struct shared_info xen_dummy_shared_info;
102

103 104
void *xen_initial_gdt;

105
RESERVE_BRK(shared_info_page_brk, PAGE_SIZE);
106 107
__read_mostly int xen_have_vector_callback;
EXPORT_SYMBOL_GPL(xen_have_vector_callback);
108

109 110 111 112
/*
 * Point at some empty memory to start with. We map the real shared_info
 * page as soon as fixmap is up and running.
 */
113
struct shared_info *HYPERVISOR_shared_info = &xen_dummy_shared_info;
114 115 116 117 118 119 120 121 122 123 124 125 126 127

/*
 * Flag to determine whether vcpu info placement is available on all
 * VCPUs.  We assume it is to start with, and then set it to zero on
 * the first failure.  This is because it can succeed on some VCPUs
 * and not others, since it can involve hypervisor memory allocation,
 * or because the guest failed to guarantee all the appropriate
 * constraints on all VCPUs (ie buffer can't cross a page boundary).
 *
 * Note that any particular CPU may be using a placed vcpu structure,
 * but we can only optimise if the all are.
 *
 * 0: not available, 1: available
 */
128
static int have_vcpu_info_placement = 1;
129

130 131 132 133 134 135 136 137 138 139 140 141 142
struct tls_descs {
	struct desc_struct desc[3];
};

/*
 * Updating the 3 TLS descriptors in the GDT on every task switch is
 * surprisingly expensive so we avoid updating them if they haven't
 * changed.  Since Xen writes different descriptors than the one
 * passed in the update_descriptor hypercall we keep shadow copies to
 * compare against.
 */
static DEFINE_PER_CPU(struct tls_descs, shadow_tls_desc);

143 144 145 146 147 148 149 150
static void clamp_max_cpus(void)
{
#ifdef CONFIG_SMP
	if (setup_max_cpus > MAX_VIRT_CPUS)
		setup_max_cpus = MAX_VIRT_CPUS;
#endif
}

151
static void xen_vcpu_setup(int cpu)
152
{
153 154 155 156
	struct vcpu_register_vcpu_info info;
	int err;
	struct vcpu_info *vcpup;

157
	BUG_ON(HYPERVISOR_shared_info == &xen_dummy_shared_info);
158

159 160
	if (cpu < MAX_VIRT_CPUS)
		per_cpu(xen_vcpu,cpu) = &HYPERVISOR_shared_info->vcpu_info[cpu];
161

162 163 164 165 166
	if (!have_vcpu_info_placement) {
		if (cpu >= MAX_VIRT_CPUS)
			clamp_max_cpus();
		return;
	}
167

168
	vcpup = &per_cpu(xen_vcpu_info, cpu);
169
	info.mfn = arbitrary_virt_to_mfn(vcpup);
170 171 172 173 174 175 176 177 178 179
	info.offset = offset_in_page(vcpup);

	/* Check to see if the hypervisor will put the vcpu_info
	   structure where we want it, which allows direct access via
	   a percpu-variable. */
	err = HYPERVISOR_vcpu_op(VCPUOP_register_vcpu_info, cpu, &info);

	if (err) {
		printk(KERN_DEBUG "register_vcpu_info failed: err=%d\n", err);
		have_vcpu_info_placement = 0;
180
		clamp_max_cpus();
181 182 183 184 185
	} else {
		/* This cpu is using the registered vcpu info, even if
		   later ones fail to. */
		per_cpu(xen_vcpu, cpu) = vcpup;
	}
186 187
}

188 189 190 191 192 193 194
/*
 * On restore, set the vcpu placement up again.
 * If it fails, then we're in a bad state, since
 * we can't back out from using it...
 */
void xen_vcpu_restore(void)
{
195
	int cpu;
196

W
Wei Liu 已提交
197
	for_each_possible_cpu(cpu) {
198
		bool other_cpu = (cpu != smp_processor_id());
W
Wei Liu 已提交
199
		bool is_up = HYPERVISOR_vcpu_op(VCPUOP_is_up, cpu, NULL);
200

W
Wei Liu 已提交
201
		if (other_cpu && is_up &&
202 203
		    HYPERVISOR_vcpu_op(VCPUOP_down, cpu, NULL))
			BUG();
204

205
		xen_setup_runstate_info(cpu);
206

207
		if (have_vcpu_info_placement)
208 209
			xen_vcpu_setup(cpu);

W
Wei Liu 已提交
210
		if (other_cpu && is_up &&
211 212
		    HYPERVISOR_vcpu_op(VCPUOP_up, cpu, NULL))
			BUG();
213 214 215
	}
}

216 217
static void __init xen_banner(void)
{
218 219 220 221
	unsigned version = HYPERVISOR_xen_version(XENVER_version, NULL);
	struct xen_extraversion extra;
	HYPERVISOR_xen_version(XENVER_extraversion, &extra);

222
	printk(KERN_INFO "Booting paravirtualized kernel on %s\n",
223
	       pv_info.name);
224 225
	printk(KERN_INFO "Xen version: %d.%d%s%s\n",
	       version >> 16, version & 0xffff, extra.extraversion,
226
	       xen_feature(XENFEAT_mmu_pt_update_preserve_ad) ? " (preserve-AD)" : "");
227
}
228 229 230 231 232 233 234 235 236 237 238 239 240 241 242
/* Check if running on Xen version (major, minor) or later */
bool
xen_running_on_version_or_later(unsigned int major, unsigned int minor)
{
	unsigned int version;

	if (!xen_domain())
		return false;

	version = HYPERVISOR_xen_version(XENVER_version, NULL);
	if ((((version >> 16) == major) && ((version & 0xffff) >= minor)) ||
		((version >> 16) > major))
		return true;
	return false;
}
243

244 245 246
#define CPUID_THERM_POWER_LEAF 6
#define APERFMPERF_PRESENT 0

J
Jeremy Fitzhardinge 已提交
247 248 249
static __read_mostly unsigned int cpuid_leaf1_edx_mask = ~0;
static __read_mostly unsigned int cpuid_leaf1_ecx_mask = ~0;

250 251 252 253
static __read_mostly unsigned int cpuid_leaf1_ecx_set_mask;
static __read_mostly unsigned int cpuid_leaf5_ecx_val;
static __read_mostly unsigned int cpuid_leaf5_edx_val;

254 255
static void xen_cpuid(unsigned int *ax, unsigned int *bx,
		      unsigned int *cx, unsigned int *dx)
256
{
257
	unsigned maskebx = ~0;
J
Jeremy Fitzhardinge 已提交
258
	unsigned maskecx = ~0;
259
	unsigned maskedx = ~0;
260
	unsigned setecx = 0;
261 262 263 264
	/*
	 * Mask out inconvenient features, to try and disable as many
	 * unsupported kernel subsystems as possible.
	 */
265 266
	switch (*ax) {
	case 1:
J
Jeremy Fitzhardinge 已提交
267
		maskecx = cpuid_leaf1_ecx_mask;
268
		setecx = cpuid_leaf1_ecx_set_mask;
J
Jeremy Fitzhardinge 已提交
269
		maskedx = cpuid_leaf1_edx_mask;
270 271
		break;

272 273 274 275 276 277 278 279
	case CPUID_MWAIT_LEAF:
		/* Synthesize the values.. */
		*ax = 0;
		*bx = 0;
		*cx = cpuid_leaf5_ecx_val;
		*dx = cpuid_leaf5_edx_val;
		return;

280 281 282 283 284
	case CPUID_THERM_POWER_LEAF:
		/* Disabling APERFMPERF for kernel usage */
		maskecx = ~(1 << APERFMPERF_PRESENT);
		break;

285 286 287 288
	case 0xb:
		/* Suppress extended topology stuff */
		maskebx = 0;
		break;
J
Jeremy Fitzhardinge 已提交
289
	}
290 291

	asm(XEN_EMULATE_PREFIX "cpuid"
292 293 294 295 296
		: "=a" (*ax),
		  "=b" (*bx),
		  "=c" (*cx),
		  "=d" (*dx)
		: "0" (*ax), "2" (*cx));
J
Jeremy Fitzhardinge 已提交
297

298
	*bx &= maskebx;
J
Jeremy Fitzhardinge 已提交
299
	*cx &= maskecx;
300
	*cx |= setecx;
301
	*dx &= maskedx;
302

303 304
}

305 306
static bool __init xen_check_mwait(void)
{
307
#ifdef CONFIG_ACPI
308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327
	struct xen_platform_op op = {
		.cmd			= XENPF_set_processor_pminfo,
		.u.set_pminfo.id	= -1,
		.u.set_pminfo.type	= XEN_PM_PDC,
	};
	uint32_t buf[3];
	unsigned int ax, bx, cx, dx;
	unsigned int mwait_mask;

	/* We need to determine whether it is OK to expose the MWAIT
	 * capability to the kernel to harvest deeper than C3 states from ACPI
	 * _CST using the processor_harvest_xen.c module. For this to work, we
	 * need to gather the MWAIT_LEAF values (which the cstate.c code
	 * checks against). The hypervisor won't expose the MWAIT flag because
	 * it would break backwards compatibility; so we will find out directly
	 * from the hardware and hypercall.
	 */
	if (!xen_initial_domain())
		return false;

328 329 330 331 332 333 334
	/*
	 * When running under platform earlier than Xen4.2, do not expose
	 * mwait, to avoid the risk of loading native acpi pad driver
	 */
	if (!xen_running_on_version_or_later(4, 2))
		return false;

335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375
	ax = 1;
	cx = 0;

	native_cpuid(&ax, &bx, &cx, &dx);

	mwait_mask = (1 << (X86_FEATURE_EST % 32)) |
		     (1 << (X86_FEATURE_MWAIT % 32));

	if ((cx & mwait_mask) != mwait_mask)
		return false;

	/* We need to emulate the MWAIT_LEAF and for that we need both
	 * ecx and edx. The hypercall provides only partial information.
	 */

	ax = CPUID_MWAIT_LEAF;
	bx = 0;
	cx = 0;
	dx = 0;

	native_cpuid(&ax, &bx, &cx, &dx);

	/* Ask the Hypervisor whether to clear ACPI_PDC_C_C2C3_FFH. If so,
	 * don't expose MWAIT_LEAF and let ACPI pick the IOPORT version of C3.
	 */
	buf[0] = ACPI_PDC_REVISION_ID;
	buf[1] = 1;
	buf[2] = (ACPI_PDC_C_CAPABILITY_SMP | ACPI_PDC_EST_CAPABILITY_SWSMP);

	set_xen_guest_handle(op.u.set_pminfo.pdc, buf);

	if ((HYPERVISOR_dom0_op(&op) == 0) &&
	    (buf[2] & (ACPI_PDC_C_C1_FFH | ACPI_PDC_C_C2C3_FFH))) {
		cpuid_leaf5_ecx_val = cx;
		cpuid_leaf5_edx_val = dx;
	}
	return true;
#else
	return false;
#endif
}
376
static void __init xen_init_cpuid_mask(void)
J
Jeremy Fitzhardinge 已提交
377 378
{
	unsigned int ax, bx, cx, dx;
379
	unsigned int xsave_mask;
J
Jeremy Fitzhardinge 已提交
380 381

	cpuid_leaf1_edx_mask =
382
		~((1 << X86_FEATURE_MTRR) |  /* disable MTRR */
J
Jeremy Fitzhardinge 已提交
383 384 385 386 387 388
		  (1 << X86_FEATURE_ACC));   /* thermal monitoring */

	if (!xen_initial_domain())
		cpuid_leaf1_edx_mask &=
			~((1 << X86_FEATURE_APIC) |  /* disable local APIC */
			  (1 << X86_FEATURE_ACPI));  /* disable ACPI */
389
	ax = 1;
390
	cx = 0;
391
	xen_cpuid(&ax, &bx, &cx, &dx);
J
Jeremy Fitzhardinge 已提交
392

393 394 395 396 397 398 399
	xsave_mask =
		(1 << (X86_FEATURE_XSAVE % 32)) |
		(1 << (X86_FEATURE_OSXSAVE % 32));

	/* Xen will set CR4.OSXSAVE if supported and not disabled by force */
	if ((cx & xsave_mask) != xsave_mask)
		cpuid_leaf1_ecx_mask &= ~xsave_mask; /* disable XSAVE & OSXSAVE */
400 401
	if (xen_check_mwait())
		cpuid_leaf1_ecx_set_mask = (1 << (X86_FEATURE_MWAIT % 32));
J
Jeremy Fitzhardinge 已提交
402 403
}

404 405 406 407 408 409 410 411 412 413
static void xen_set_debugreg(int reg, unsigned long val)
{
	HYPERVISOR_set_debugreg(reg, val);
}

static unsigned long xen_get_debugreg(int reg)
{
	return HYPERVISOR_get_debugreg(reg);
}

414
static void xen_end_context_switch(struct task_struct *next)
415 416
{
	xen_mc_flush();
417
	paravirt_end_context_switch(next);
418 419 420 421 422 423 424
}

static unsigned long xen_store_tr(void)
{
	return 0;
}

425
/*
426 427 428 429
 * Set the page permissions for a particular virtual address.  If the
 * address is a vmalloc mapping (or other non-linear mapping), then
 * find the linear mapping of the page and also set its protections to
 * match.
430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459
 */
static void set_aliased_prot(void *v, pgprot_t prot)
{
	int level;
	pte_t *ptep;
	pte_t pte;
	unsigned long pfn;
	struct page *page;

	ptep = lookup_address((unsigned long)v, &level);
	BUG_ON(ptep == NULL);

	pfn = pte_pfn(*ptep);
	page = pfn_to_page(pfn);

	pte = pfn_pte(pfn, prot);

	if (HYPERVISOR_update_va_mapping((unsigned long)v, pte, 0))
		BUG();

	if (!PageHighMem(page)) {
		void *av = __va(PFN_PHYS(pfn));

		if (av != v)
			if (HYPERVISOR_update_va_mapping((unsigned long)av, pte, 0))
				BUG();
	} else
		kmap_flush_unused();
}

460 461
static void xen_alloc_ldt(struct desc_struct *ldt, unsigned entries)
{
462
	const unsigned entries_per_page = PAGE_SIZE / LDT_ENTRY_SIZE;
463 464
	int i;

465 466
	for(i = 0; i < entries; i += entries_per_page)
		set_aliased_prot(ldt + i, PAGE_KERNEL_RO);
467 468 469 470
}

static void xen_free_ldt(struct desc_struct *ldt, unsigned entries)
{
471
	const unsigned entries_per_page = PAGE_SIZE / LDT_ENTRY_SIZE;
472 473
	int i;

474 475
	for(i = 0; i < entries; i += entries_per_page)
		set_aliased_prot(ldt + i, PAGE_KERNEL);
476 477
}

478 479 480 481 482
static void xen_set_ldt(const void *addr, unsigned entries)
{
	struct mmuext_op *op;
	struct multicall_space mcs = xen_mc_entry(sizeof(*op));

483 484
	trace_xen_cpu_set_ldt(addr, entries);

485 486
	op = mcs.args;
	op->cmd = MMUEXT_SET_LDT;
487
	op->arg1.linear_addr = (unsigned long)addr;
488 489 490 491 492 493 494
	op->arg2.nr_ents = entries;

	MULTI_mmuext_op(mcs.mc, op, 1, NULL, DOMID_SELF);

	xen_mc_issue(PARAVIRT_LAZY_CPU);
}

495
static void xen_load_gdt(const struct desc_ptr *dtr)
496 497 498 499
{
	unsigned long va = dtr->address;
	unsigned int size = dtr->size + 1;
	unsigned pages = (size + PAGE_SIZE - 1) / PAGE_SIZE;
500
	unsigned long frames[pages];
501 502
	int f;

503 504 505 506
	/*
	 * A GDT can be up to 64k in size, which corresponds to 8192
	 * 8-byte entries, or 16 4k pages..
	 */
507 508 509 510 511

	BUG_ON(size > 65536);
	BUG_ON(va & ~PAGE_MASK);

	for (f = 0; va < dtr->address + size; va += PAGE_SIZE, f++) {
J
Jeremy Fitzhardinge 已提交
512
		int level;
513
		pte_t *ptep;
J
Jeremy Fitzhardinge 已提交
514 515 516
		unsigned long pfn, mfn;
		void *virt;

517 518 519 520 521 522 523 524
		/*
		 * The GDT is per-cpu and is in the percpu data area.
		 * That can be virtually mapped, so we need to do a
		 * page-walk to get the underlying MFN for the
		 * hypercall.  The page can also be in the kernel's
		 * linear range, so we need to RO that mapping too.
		 */
		ptep = lookup_address(va, &level);
J
Jeremy Fitzhardinge 已提交
525 526 527 528 529 530 531
		BUG_ON(ptep == NULL);

		pfn = pte_pfn(*ptep);
		mfn = pfn_to_mfn(pfn);
		virt = __va(PFN_PHYS(pfn));

		frames[f] = mfn;
532

533
		make_lowmem_page_readonly((void *)va);
J
Jeremy Fitzhardinge 已提交
534
		make_lowmem_page_readonly(virt);
535 536
	}

537 538
	if (HYPERVISOR_set_gdt(frames, size / sizeof(struct desc_struct)))
		BUG();
539 540
}

541 542 543
/*
 * load_gdt for early boot, when the gdt is only mapped once
 */
544
static void __init xen_load_gdt_boot(const struct desc_ptr *dtr)
545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578
{
	unsigned long va = dtr->address;
	unsigned int size = dtr->size + 1;
	unsigned pages = (size + PAGE_SIZE - 1) / PAGE_SIZE;
	unsigned long frames[pages];
	int f;

	/*
	 * A GDT can be up to 64k in size, which corresponds to 8192
	 * 8-byte entries, or 16 4k pages..
	 */

	BUG_ON(size > 65536);
	BUG_ON(va & ~PAGE_MASK);

	for (f = 0; va < dtr->address + size; va += PAGE_SIZE, f++) {
		pte_t pte;
		unsigned long pfn, mfn;

		pfn = virt_to_pfn(va);
		mfn = pfn_to_mfn(pfn);

		pte = pfn_pte(pfn, PAGE_KERNEL_RO);

		if (HYPERVISOR_update_va_mapping((unsigned long)va, pte, 0))
			BUG();

		frames[f] = mfn;
	}

	if (HYPERVISOR_set_gdt(frames, size / sizeof(struct desc_struct)))
		BUG();
}

579 580 581 582 583 584
static inline bool desc_equal(const struct desc_struct *d1,
			      const struct desc_struct *d2)
{
	return d1->a == d2->a && d1->b == d2->b;
}

585 586 587
static void load_TLS_descriptor(struct thread_struct *t,
				unsigned int cpu, unsigned int i)
{
588 589 590 591 592 593 594 595 596 597 598 599 600
	struct desc_struct *shadow = &per_cpu(shadow_tls_desc, cpu).desc[i];
	struct desc_struct *gdt;
	xmaddr_t maddr;
	struct multicall_space mc;

	if (desc_equal(shadow, &t->tls_array[i]))
		return;

	*shadow = t->tls_array[i];

	gdt = get_cpu_gdt_table(cpu);
	maddr = arbitrary_virt_to_machine(&gdt[GDT_ENTRY_TLS_MIN+i]);
	mc = __xen_mc_entry(0);
601 602 603 604 605 606

	MULTI_update_descriptor(mc.mc, maddr.maddr, t->tls_array[i]);
}

static void xen_load_tls(struct thread_struct *t, unsigned int cpu)
{
607
	/*
608 609 610 611 612 613 614 615
	 * XXX sleazy hack: If we're being called in a lazy-cpu zone
	 * and lazy gs handling is enabled, it means we're in a
	 * context switch, and %gs has just been saved.  This means we
	 * can zero it out to prevent faults on exit from the
	 * hypervisor if the next process has no %gs.  Either way, it
	 * has been saved, and the new value will get loaded properly.
	 * This will go away as soon as Xen has been modified to not
	 * save/restore %gs for normal hypercalls.
616 617 618 619 620 621 622 623
	 *
	 * On x86_64, this hack is not used for %gs, because gs points
	 * to KERNEL_GS_BASE (and uses it for PDA references), so we
	 * must not zero %gs on x86_64
	 *
	 * For x86_64, we need to zero %fs, otherwise we may get an
	 * exception between the new %fs descriptor being loaded and
	 * %fs being effectively cleared at __switch_to().
624
	 */
625 626
	if (paravirt_get_lazy_mode() == PARAVIRT_LAZY_CPU) {
#ifdef CONFIG_X86_32
627
		lazy_load_gs(0);
628 629 630 631 632 633 634 635 636 637 638 639
#else
		loadsegment(fs, 0);
#endif
	}

	xen_mc_batch();

	load_TLS_descriptor(t, cpu, 0);
	load_TLS_descriptor(t, cpu, 1);
	load_TLS_descriptor(t, cpu, 2);

	xen_mc_issue(PARAVIRT_LAZY_CPU);
640 641
}

642 643 644 645 646
#ifdef CONFIG_X86_64
static void xen_load_gs_index(unsigned int idx)
{
	if (HYPERVISOR_set_segment_base(SEGBASE_GS_USER_SEL, idx))
		BUG();
647
}
648
#endif
649 650

static void xen_write_ldt_entry(struct desc_struct *dt, int entrynum,
651
				const void *ptr)
652
{
653
	xmaddr_t mach_lp = arbitrary_virt_to_machine(&dt[entrynum]);
654
	u64 entry = *(u64 *)ptr;
655

656 657
	trace_xen_cpu_write_ldt_entry(dt, entrynum, entry);

658 659
	preempt_disable();

660 661 662
	xen_mc_flush();
	if (HYPERVISOR_update_descriptor(mach_lp.maddr, entry))
		BUG();
663 664

	preempt_enable();
665 666
}

667
static int cvt_gate_to_trap(int vector, const gate_desc *val,
668 669
			    struct trap_info *info)
{
670 671
	unsigned long addr;

672
	if (val->type != GATE_TRAP && val->type != GATE_INTERRUPT)
673 674 675
		return 0;

	info->vector = vector;
676 677 678

	addr = gate_offset(*val);
#ifdef CONFIG_X86_64
679 680 681
	/*
	 * Look for known traps using IST, and substitute them
	 * appropriately.  The debugger ones are the only ones we care
682 683
	 * about.  Xen will handle faults like double_fault,
	 * so we should never see them.  Warn if
684 685
	 * there's an unexpected IST-using fault handler.
	 */
686 687 688 689 690 691
	if (addr == (unsigned long)debug)
		addr = (unsigned long)xen_debug;
	else if (addr == (unsigned long)int3)
		addr = (unsigned long)xen_int3;
	else if (addr == (unsigned long)stack_segment)
		addr = (unsigned long)xen_stack_segment;
692 693 694 695 696 697
	else if (addr == (unsigned long)double_fault ||
		 addr == (unsigned long)nmi) {
		/* Don't need to handle these */
		return 0;
#ifdef CONFIG_X86_MCE
	} else if (addr == (unsigned long)machine_check) {
698 699 700 701 702
		/*
		 * when xen hypervisor inject vMCE to guest,
		 * use native mce handler to handle it
		 */
		;
703 704 705 706 707 708
#endif
	} else {
		/* Some other trap using IST? */
		if (WARN_ON(val->ist != 0))
			return 0;
	}
709 710 711
#endif	/* CONFIG_X86_64 */
	info->address = addr;

712 713
	info->cs = gate_segment(*val);
	info->flags = val->dpl;
714
	/* interrupt gates clear IF */
715 716
	if (val->type == GATE_INTERRUPT)
		info->flags |= 1 << 2;
717 718 719 720 721

	return 1;
}

/* Locations of each CPU's IDT */
722
static DEFINE_PER_CPU(struct desc_ptr, idt_desc);
723 724 725

/* Set an IDT entry.  If the entry is part of the current IDT, then
   also update Xen. */
726
static void xen_write_idt_entry(gate_desc *dt, int entrynum, const gate_desc *g)
727 728
{
	unsigned long p = (unsigned long)&dt[entrynum];
729 730
	unsigned long start, end;

731 732
	trace_xen_cpu_write_idt_entry(dt, entrynum, g);

733 734
	preempt_disable();

C
Christoph Lameter 已提交
735 736
	start = __this_cpu_read(idt_desc.address);
	end = start + __this_cpu_read(idt_desc.size) + 1;
737 738 739

	xen_mc_flush();

740
	native_write_idt_entry(dt, entrynum, g);
741 742 743 744 745 746

	if (p >= start && (p + 8) <= end) {
		struct trap_info info[2];

		info[1].address = 0;

747
		if (cvt_gate_to_trap(entrynum, g, &info[0]))
748 749 750
			if (HYPERVISOR_set_trap_table(info))
				BUG();
	}
751 752

	preempt_enable();
753 754
}

755
static void xen_convert_trap_info(const struct desc_ptr *desc,
J
Jeremy Fitzhardinge 已提交
756
				  struct trap_info *traps)
757 758 759
{
	unsigned in, out, count;

760
	count = (desc->size+1) / sizeof(gate_desc);
761 762 763
	BUG_ON(count > 256);

	for (in = out = 0; in < count; in++) {
764
		gate_desc *entry = (gate_desc*)(desc->address) + in;
765

766
		if (cvt_gate_to_trap(in, entry, &traps[out]))
767 768 769
			out++;
	}
	traps[out].address = 0;
J
Jeremy Fitzhardinge 已提交
770 771 772 773
}

void xen_copy_trap_info(struct trap_info *traps)
{
774
	const struct desc_ptr *desc = &__get_cpu_var(idt_desc);
J
Jeremy Fitzhardinge 已提交
775 776 777 778 779 780 781

	xen_convert_trap_info(desc, traps);
}

/* Load a new IDT into Xen.  In principle this can be per-CPU, so we
   hold a spinlock to protect the static traps[] array (static because
   it avoids allocation, and saves stack space). */
782
static void xen_load_idt(const struct desc_ptr *desc)
J
Jeremy Fitzhardinge 已提交
783 784 785 786
{
	static DEFINE_SPINLOCK(lock);
	static struct trap_info traps[257];

787 788
	trace_xen_cpu_load_idt(desc);

J
Jeremy Fitzhardinge 已提交
789 790
	spin_lock(&lock);

791 792
	__get_cpu_var(idt_desc) = *desc;

J
Jeremy Fitzhardinge 已提交
793
	xen_convert_trap_info(desc, traps);
794 795 796 797 798 799 800 801 802 803 804

	xen_mc_flush();
	if (HYPERVISOR_set_trap_table(traps))
		BUG();

	spin_unlock(&lock);
}

/* Write a GDT descriptor entry.  Ignore LDT descriptors, since
   they're handled differently. */
static void xen_write_gdt_entry(struct desc_struct *dt, int entry,
805
				const void *desc, int type)
806
{
807 808
	trace_xen_cpu_write_gdt_entry(dt, entry, desc, type);

809 810
	preempt_disable();

811 812 813
	switch (type) {
	case DESC_LDT:
	case DESC_TSS:
814 815 816 817
		/* ignore */
		break;

	default: {
818
		xmaddr_t maddr = arbitrary_virt_to_machine(&dt[entry]);
819 820

		xen_mc_flush();
821
		if (HYPERVISOR_update_descriptor(maddr.maddr, *(u64 *)desc))
822 823 824 825
			BUG();
	}

	}
826 827

	preempt_enable();
828 829
}

830 831 832 833
/*
 * Version of write_gdt_entry for use at early boot-time needed to
 * update an entry as simply as possible.
 */
834
static void __init xen_write_gdt_entry_boot(struct desc_struct *dt, int entry,
835 836
					    const void *desc, int type)
{
837 838
	trace_xen_cpu_write_gdt_entry(dt, entry, desc, type);

839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854
	switch (type) {
	case DESC_LDT:
	case DESC_TSS:
		/* ignore */
		break;

	default: {
		xmaddr_t maddr = virt_to_machine(&dt[entry]);

		if (HYPERVISOR_update_descriptor(maddr.maddr, *(u64 *)desc))
			dt[entry] = *(struct desc_struct *)desc;
	}

	}
}

855
static void xen_load_sp0(struct tss_struct *tss,
856
			 struct thread_struct *thread)
857
{
858 859 860
	struct multicall_space mcs;

	mcs = xen_mc_entry(0);
861
	MULTI_stack_switch(mcs.mc, __KERNEL_DS, thread->sp0);
862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878
	xen_mc_issue(PARAVIRT_LAZY_CPU);
}

static void xen_set_iopl_mask(unsigned mask)
{
	struct physdev_set_iopl set_iopl;

	/* Force the change at ring 0. */
	set_iopl.iopl = (mask == 0) ? 1 : (mask >> 12) & 3;
	HYPERVISOR_physdev_op(PHYSDEVOP_set_iopl, &set_iopl);
}

static void xen_io_delay(void)
{
}

#ifdef CONFIG_X86_LOCAL_APIC
879 880 881 882 883 884 885 886 887
static unsigned long xen_set_apic_id(unsigned int x)
{
	WARN_ON(1);
	return x;
}
static unsigned int xen_get_apic_id(unsigned long x)
{
	return ((x)>>24) & 0xFFu;
}
888
static u32 xen_apic_read(u32 reg)
889
{
890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912
	struct xen_platform_op op = {
		.cmd = XENPF_get_cpuinfo,
		.interface_version = XENPF_INTERFACE_VERSION,
		.u.pcpu_info.xen_cpuid = 0,
	};
	int ret = 0;

	/* Shouldn't need this as APIC is turned off for PV, and we only
	 * get called on the bootup processor. But just in case. */
	if (!xen_initial_domain() || smp_processor_id())
		return 0;

	if (reg == APIC_LVR)
		return 0x10;

	if (reg != APIC_ID)
		return 0;

	ret = HYPERVISOR_dom0_op(&op);
	if (ret)
		return 0;

	return op.u.pcpu_info.apic_id << 24;
913
}
J
Jeremy Fitzhardinge 已提交
914

915
static void xen_apic_write(u32 reg, u32 val)
J
Jeremy Fitzhardinge 已提交
916 917 918 919
{
	/* Warn to see if there's any stray references */
	WARN_ON(1);
}
920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936

static u64 xen_apic_icr_read(void)
{
	return 0;
}

static void xen_apic_icr_write(u32 low, u32 id)
{
	/* Warn to see if there's any stray references */
	WARN_ON(1);
}

static void xen_apic_wait_icr_idle(void)
{
        return;
}

937 938 939 940 941
static u32 xen_safe_apic_wait_icr_idle(void)
{
        return 0;
}

Y
Yinghai Lu 已提交
942 943 944 945 946 947 948 949
static void set_xen_basic_apic_ops(void)
{
	apic->read = xen_apic_read;
	apic->write = xen_apic_write;
	apic->icr_read = xen_apic_icr_read;
	apic->icr_write = xen_apic_icr_write;
	apic->wait_icr_idle = xen_apic_wait_icr_idle;
	apic->safe_wait_icr_idle = xen_safe_apic_wait_icr_idle;
950 951
	apic->set_apic_id = xen_set_apic_id;
	apic->get_apic_id = xen_get_apic_id;
B
Ben Guthro 已提交
952 953 954 955 956 957 958 959

#ifdef CONFIG_SMP
	apic->send_IPI_allbutself = xen_send_IPI_allbutself;
	apic->send_IPI_mask_allbutself = xen_send_IPI_mask_allbutself;
	apic->send_IPI_mask = xen_send_IPI_mask;
	apic->send_IPI_all = xen_send_IPI_all;
	apic->send_IPI_self = xen_send_IPI_self;
#endif
Y
Yinghai Lu 已提交
960
}
961

962 963
#endif

964 965 966 967 968 969 970 971 972 973 974
static void xen_clts(void)
{
	struct multicall_space mcs;

	mcs = xen_mc_entry(0);

	MULTI_fpu_taskswitch(mcs.mc, 0);

	xen_mc_issue(PARAVIRT_LAZY_CPU);
}

975 976 977 978
static DEFINE_PER_CPU(unsigned long, xen_cr0_value);

static unsigned long xen_read_cr0(void)
{
979
	unsigned long cr0 = this_cpu_read(xen_cr0_value);
980 981 982

	if (unlikely(cr0 == 0)) {
		cr0 = native_read_cr0();
983
		this_cpu_write(xen_cr0_value, cr0);
984 985 986 987 988
	}

	return cr0;
}

989 990 991 992
static void xen_write_cr0(unsigned long cr0)
{
	struct multicall_space mcs;

993
	this_cpu_write(xen_cr0_value, cr0);
994

995 996 997 998 999 1000 1001 1002 1003
	/* Only pay attention to cr0.TS; everything else is
	   ignored. */
	mcs = xen_mc_entry(0);

	MULTI_fpu_taskswitch(mcs.mc, (cr0 & X86_CR0_TS) != 0);

	xen_mc_issue(PARAVIRT_LAZY_CPU);
}

1004 1005
static void xen_write_cr4(unsigned long cr4)
{
1006 1007 1008 1009
	cr4 &= ~X86_CR4_PGE;
	cr4 &= ~X86_CR4_PSE;

	native_write_cr4(cr4);
1010
}
1011 1012 1013 1014 1015 1016 1017 1018 1019 1020
#ifdef CONFIG_X86_64
static inline unsigned long xen_read_cr8(void)
{
	return 0;
}
static inline void xen_write_cr8(unsigned long val)
{
	BUG_ON(val);
}
#endif
1021 1022 1023 1024 1025 1026
static int xen_write_msr_safe(unsigned int msr, unsigned low, unsigned high)
{
	int ret;

	ret = 0;

T
Tej 已提交
1027
	switch (msr) {
1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038
#ifdef CONFIG_X86_64
		unsigned which;
		u64 base;

	case MSR_FS_BASE:		which = SEGBASE_FS; goto set;
	case MSR_KERNEL_GS_BASE:	which = SEGBASE_GS_USER; goto set;
	case MSR_GS_BASE:		which = SEGBASE_GS_KERNEL; goto set;

	set:
		base = ((u64)high << 32) | low;
		if (HYPERVISOR_set_segment_base(which, base) != 0)
1039
			ret = -EIO;
1040 1041
		break;
#endif
J
Jeremy Fitzhardinge 已提交
1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054

	case MSR_STAR:
	case MSR_CSTAR:
	case MSR_LSTAR:
	case MSR_SYSCALL_MASK:
	case MSR_IA32_SYSENTER_CS:
	case MSR_IA32_SYSENTER_ESP:
	case MSR_IA32_SYSENTER_EIP:
		/* Fast syscall setup is all done in hypercalls, so
		   these are all ignored.  Stub them out here to stop
		   Xen console noise. */
		break;

J
Jeremy Fitzhardinge 已提交
1055 1056 1057 1058 1059
	case MSR_IA32_CR_PAT:
		if (smp_processor_id() == 0)
			xen_set_pat(((u64)high << 32) | low);
		break;

1060 1061 1062 1063 1064 1065 1066
	default:
		ret = native_write_msr_safe(msr, low, high);
	}

	return ret;
}

1067
void xen_setup_shared_info(void)
1068 1069
{
	if (!xen_feature(XENFEAT_auto_translated_physmap)) {
1070 1071 1072 1073 1074
		set_fixmap(FIX_PARAVIRT_BOOTMAP,
			   xen_start_info->shared_info);

		HYPERVISOR_shared_info =
			(struct shared_info *)fix_to_virt(FIX_PARAVIRT_BOOTMAP);
1075 1076 1077 1078
	} else
		HYPERVISOR_shared_info =
			(struct shared_info *)__va(xen_start_info->shared_info);

1079 1080 1081 1082
#ifndef CONFIG_SMP
	/* In UP this is as good a place as any to set up shared info */
	xen_setup_vcpu_info_placement();
#endif
J
Jeremy Fitzhardinge 已提交
1083 1084

	xen_setup_mfn_list_list();
1085 1086
}

1087
/* This is called once we have the cpu_possible_mask */
1088
void xen_setup_vcpu_info_placement(void)
1089 1090 1091 1092 1093 1094 1095 1096 1097
{
	int cpu;

	for_each_possible_cpu(cpu)
		xen_vcpu_setup(cpu);

	/* xen_vcpu_setup managed to place the vcpu_info within the
	   percpu area for all cpus, so make use of it */
	if (have_vcpu_info_placement) {
1098 1099 1100 1101
		pv_irq_ops.save_fl = __PV_IS_CALLEE_SAVE(xen_save_fl_direct);
		pv_irq_ops.restore_fl = __PV_IS_CALLEE_SAVE(xen_restore_fl_direct);
		pv_irq_ops.irq_disable = __PV_IS_CALLEE_SAVE(xen_irq_disable_direct);
		pv_irq_ops.irq_enable = __PV_IS_CALLEE_SAVE(xen_irq_enable_direct);
1102
		pv_mmu_ops.read_cr2 = xen_read_cr2_direct;
1103
	}
1104 1105
}

1106 1107
static unsigned xen_patch(u8 type, u16 clobbers, void *insnbuf,
			  unsigned long addr, unsigned len)
1108 1109 1110 1111 1112 1113
{
	char *start, *end, *reloc;
	unsigned ret;

	start = end = reloc = NULL;

1114 1115
#define SITE(op, x)							\
	case PARAVIRT_PATCH(op.x):					\
1116 1117 1118 1119 1120 1121 1122 1123
	if (have_vcpu_info_placement) {					\
		start = (char *)xen_##x##_direct;			\
		end = xen_##x##_direct_end;				\
		reloc = xen_##x##_direct_reloc;				\
	}								\
	goto patch_site

	switch (type) {
1124 1125 1126 1127
		SITE(pv_irq_ops, irq_enable);
		SITE(pv_irq_ops, irq_disable);
		SITE(pv_irq_ops, save_fl);
		SITE(pv_irq_ops, restore_fl);
1128 1129 1130 1131 1132 1133
#undef SITE

	patch_site:
		if (start == NULL || (end-start) > len)
			goto default_patch;

1134
		ret = paravirt_patch_insns(insnbuf, len, start, end);
1135 1136 1137 1138 1139 1140 1141

		/* Note: because reloc is assigned from something that
		   appears to be an array, gcc assumes it's non-null,
		   but doesn't know its relationship with start and
		   end. */
		if (reloc > start && reloc < end) {
			int reloc_off = reloc - start;
1142 1143
			long *relocp = (long *)(insnbuf + reloc_off);
			long delta = start - (char *)addr;
1144 1145 1146 1147 1148 1149 1150

			*relocp += delta;
		}
		break;

	default_patch:
	default:
1151 1152
		ret = paravirt_patch_default(type, clobbers, insnbuf,
					     addr, len);
1153 1154 1155 1156 1157 1158
		break;
	}

	return ret;
}

1159
static const struct pv_info xen_info __initconst = {
1160 1161 1162
	.paravirt_enabled = 1,
	.shared_kernel_pmd = 0,

1163 1164 1165 1166
#ifdef CONFIG_X86_64
	.extra_user_64bit_cs = FLAT_USER_CS64,
#endif

1167
	.name = "Xen",
1168
};
1169

1170
static const struct pv_init_ops xen_init_ops __initconst = {
1171
	.patch = xen_patch,
1172
};
1173

1174
static const struct pv_cpu_ops xen_cpu_ops __initconst = {
1175 1176 1177 1178 1179
	.cpuid = xen_cpuid,

	.set_debugreg = xen_set_debugreg,
	.get_debugreg = xen_get_debugreg,

1180
	.clts = xen_clts,
1181

1182
	.read_cr0 = xen_read_cr0,
1183
	.write_cr0 = xen_write_cr0,
1184 1185 1186 1187 1188

	.read_cr4 = native_read_cr4,
	.read_cr4_safe = native_read_cr4_safe,
	.write_cr4 = xen_write_cr4,

1189 1190 1191 1192 1193
#ifdef CONFIG_X86_64
	.read_cr8 = xen_read_cr8,
	.write_cr8 = xen_write_cr8,
#endif

1194 1195 1196
	.wbinvd = native_wbinvd,

	.read_msr = native_read_msr_safe,
1197
	.write_msr = xen_write_msr_safe,
1198

1199 1200 1201
	.read_tsc = native_read_tsc,
	.read_pmc = native_read_pmc,

1202 1203
	.read_tscp = native_read_tscp,

1204
	.iret = xen_iret,
1205
	.irq_enable_sysexit = xen_sysexit,
1206 1207 1208 1209
#ifdef CONFIG_X86_64
	.usergs_sysret32 = xen_sysret32,
	.usergs_sysret64 = xen_sysret64,
#endif
1210 1211 1212 1213 1214 1215

	.load_tr_desc = paravirt_nop,
	.set_ldt = xen_set_ldt,
	.load_gdt = xen_load_gdt,
	.load_idt = xen_load_idt,
	.load_tls = xen_load_tls,
1216 1217 1218
#ifdef CONFIG_X86_64
	.load_gs_index = xen_load_gs_index,
#endif
1219

1220 1221 1222
	.alloc_ldt = xen_alloc_ldt,
	.free_ldt = xen_free_ldt,

1223 1224 1225 1226 1227 1228 1229
	.store_gdt = native_store_gdt,
	.store_idt = native_store_idt,
	.store_tr = xen_store_tr,

	.write_ldt_entry = xen_write_ldt_entry,
	.write_gdt_entry = xen_write_gdt_entry,
	.write_idt_entry = xen_write_idt_entry,
1230
	.load_sp0 = xen_load_sp0,
1231 1232 1233 1234

	.set_iopl_mask = xen_set_iopl_mask,
	.io_delay = xen_io_delay,

J
Jeremy Fitzhardinge 已提交
1235 1236 1237
	/* Xen takes care of %gs when switching to usermode for us */
	.swapgs = paravirt_nop,

1238 1239
	.start_context_switch = paravirt_start_context_switch,
	.end_context_switch = xen_end_context_switch,
1240 1241
};

1242
static const struct pv_apic_ops xen_apic_ops __initconst = {
1243 1244 1245
#ifdef CONFIG_X86_LOCAL_APIC
	.startup_ipi_hook = paravirt_nop,
#endif
1246 1247
};

J
Jeremy Fitzhardinge 已提交
1248 1249
static void xen_reboot(int reason)
{
J
Jeremy Fitzhardinge 已提交
1250 1251 1252
	struct sched_shutdown r = { .reason = reason };

	if (HYPERVISOR_sched_op(SCHEDOP_shutdown, &r))
J
Jeremy Fitzhardinge 已提交
1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270
		BUG();
}

static void xen_restart(char *msg)
{
	xen_reboot(SHUTDOWN_reboot);
}

static void xen_emergency_restart(void)
{
	xen_reboot(SHUTDOWN_reboot);
}

static void xen_machine_halt(void)
{
	xen_reboot(SHUTDOWN_poweroff);
}

1271 1272 1273 1274 1275 1276 1277
static void xen_machine_power_off(void)
{
	if (pm_power_off)
		pm_power_off();
	xen_reboot(SHUTDOWN_poweroff);
}

J
Jeremy Fitzhardinge 已提交
1278 1279 1280 1281 1282
static void xen_crash_shutdown(struct pt_regs *regs)
{
	xen_reboot(SHUTDOWN_crash);
}

1283 1284 1285
static int
xen_panic_event(struct notifier_block *this, unsigned long event, void *ptr)
{
1286
	xen_reboot(SHUTDOWN_crash);
1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299
	return NOTIFY_DONE;
}

static struct notifier_block xen_panic_block = {
	.notifier_call= xen_panic_event,
};

int xen_panic_handler_init(void)
{
	atomic_notifier_chain_register(&panic_notifier_list, &xen_panic_block);
	return 0;
}

1300
static const struct machine_ops xen_machine_ops __initconst = {
J
Jeremy Fitzhardinge 已提交
1301 1302
	.restart = xen_restart,
	.halt = xen_machine_halt,
1303
	.power_off = xen_machine_power_off,
J
Jeremy Fitzhardinge 已提交
1304 1305 1306 1307 1308
	.shutdown = xen_machine_halt,
	.crash_shutdown = xen_crash_shutdown,
	.emergency_restart = xen_emergency_restart,
};

1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325
/*
 * Set up the GDT and segment registers for -fstack-protector.  Until
 * we do this, we have to be careful not to call any stack-protected
 * function, which is most of the kernel.
 */
static void __init xen_setup_stackprotector(void)
{
	pv_cpu_ops.write_gdt_entry = xen_write_gdt_entry_boot;
	pv_cpu_ops.load_gdt = xen_load_gdt_boot;

	setup_stack_canary_segment(0);
	switch_to_new_gdt(0);

	pv_cpu_ops.write_gdt_entry = xen_write_gdt_entry;
	pv_cpu_ops.load_gdt = xen_load_gdt;
}

1326 1327 1328
/* First C function to be called on Xen boot */
asmlinkage void __init xen_start_kernel(void)
{
1329 1330
	struct physdev_set_iopl set_iopl;
	int rc;
1331 1332 1333 1334

	if (!xen_start_info)
		return;

1335 1336
	xen_domain_type = XEN_PV_DOMAIN;

1337 1338
	xen_setup_machphys_mapping();

1339
	/* Install Xen paravirt ops */
1340 1341 1342 1343 1344
	pv_info = xen_info;
	pv_init_ops = xen_init_ops;
	pv_cpu_ops = xen_cpu_ops;
	pv_apic_ops = xen_apic_ops;

1345
	x86_init.resources.memory_setup = xen_memory_setup;
1346
	x86_init.oem.arch_setup = xen_arch_setup;
1347
	x86_init.oem.banner = xen_banner;
1348

1349
	xen_init_time_ops();
1350

1351
	/*
1352
	 * Set up some pagetable state before starting to set any ptes.
1353
	 */
1354

1355 1356
	xen_init_mmu_ops();

1357 1358
	/* Prevent unwanted bits from being set in PTEs. */
	__supported_pte_mask &= ~_PAGE_GLOBAL;
1359
#if 0
1360
	if (!xen_initial_domain())
1361
#endif
1362 1363 1364 1365
		__supported_pte_mask &= ~(_PAGE_PWT | _PAGE_PCD);

	__supported_pte_mask |= _PAGE_IOMAP;

1366 1367 1368 1369 1370 1371
	/*
	 * Prevent page tables from being allocated in highmem, even
	 * if CONFIG_HIGHPTE is enabled.
	 */
	__userpte_alloc_gfp &= ~__GFP_HIGHMEM;

1372
	/* Work out if we support NX */
1373
	x86_configure_nx();
1374

1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385
	xen_setup_features();

	/* Get mfn list */
	if (!xen_feature(XENFEAT_auto_translated_physmap))
		xen_build_dynamic_phys_to_machine();

	/*
	 * Set up kernel GDT and segment registers, mainly so that
	 * -fstack-protector code can be executed.
	 */
	xen_setup_stackprotector();
1386

1387
	xen_init_irq_ops();
J
Jeremy Fitzhardinge 已提交
1388 1389
	xen_init_cpuid_mask();

1390
#ifdef CONFIG_X86_LOCAL_APIC
1391
	/*
1392
	 * set up the basic apic ops.
1393
	 */
Y
Yinghai Lu 已提交
1394
	set_xen_basic_apic_ops();
1395
#endif
1396

1397 1398 1399 1400 1401
	if (xen_feature(XENFEAT_mmu_pt_update_preserve_ad)) {
		pv_mmu_ops.ptep_modify_prot_start = xen_ptep_modify_prot_start;
		pv_mmu_ops.ptep_modify_prot_commit = xen_ptep_modify_prot_commit;
	}

J
Jeremy Fitzhardinge 已提交
1402 1403
	machine_ops = xen_machine_ops;

1404 1405 1406 1407 1408 1409
	/*
	 * The only reliable way to retain the initial address of the
	 * percpu gdt_page is to remember it here, so we can go and
	 * mark it RW later, when the initial percpu area is freed.
	 */
	xen_initial_gdt = &per_cpu(gdt_page, 0);
1410

1411
	xen_smp_init();
1412

1413 1414 1415 1416 1417 1418 1419 1420
#ifdef CONFIG_ACPI_NUMA
	/*
	 * The pages we from Xen are not related to machine pages, so
	 * any NUMA information the kernel tries to get from ACPI will
	 * be meaningless.  Prevent it from trying.
	 */
	acpi_numa = -1;
#endif
1421 1422 1423 1424 1425 1426 1427 1428
#ifdef CONFIG_X86_PAT
	/*
	 * For right now disable the PAT. We should remove this once
	 * git commit 8eaffa67b43e99ae581622c5133e20b0f48bcef1
	 * (xen/pat: Disable PAT support for now) is reverted.
	 */
	pat_enabled = 0;
#endif
1429
	/* Don't do the full vcpu_info placement stuff until we have a
1430
	   possible map and a non-dummy shared_info. */
1431
	per_cpu(xen_vcpu, 0) = &HYPERVISOR_shared_info->vcpu_info[0];
1432

1433
	local_irq_disable();
1434
	early_boot_irqs_disabled = true;
1435

J
Jeremy Fitzhardinge 已提交
1436
	xen_raw_console_write("mapping kernel into physical memory\n");
1437
	xen_setup_kernel_pagetable((pgd_t *)xen_start_info->pt_base, xen_start_info->nr_pages);
1438

1439 1440 1441
	/* Allocate and initialize top and mid mfn levels for p2m structure */
	xen_build_mfn_list_list();

1442 1443
	/* keep using Xen gdt for now; no urgent need to change it */

1444
#ifdef CONFIG_X86_32
1445
	pv_info.kernel_rpl = 1;
1446
	if (xen_feature(XENFEAT_supervisor_mode_kernel))
1447
		pv_info.kernel_rpl = 0;
1448 1449 1450
#else
	pv_info.kernel_rpl = 0;
#endif
1451
	/* set the limit of our address space */
1452
	xen_reserve_top();
1453

1454 1455 1456 1457 1458 1459 1460 1461 1462
	/* We used to do this in xen_arch_setup, but that is too late on AMD
	 * were early_cpu_init (run before ->arch_setup()) calls early_amd_init
	 * which pokes 0xcf8 port.
	 */
	set_iopl.iopl = 1;
	rc = HYPERVISOR_physdev_op(PHYSDEVOP_set_iopl, &set_iopl);
	if (rc != 0)
		xen_raw_printk("physdev_op failed %d\n", rc);

1463
#ifdef CONFIG_X86_32
1464 1465 1466
	/* set up basic CPUID stuff */
	cpu_detect(&new_cpu_data);
	new_cpu_data.hard_math = 1;
1467
	new_cpu_data.wp_works_ok = 1;
1468
	new_cpu_data.x86_capability[0] = cpuid_edx(1);
1469
#endif
1470 1471

	/* Poke various useful things into boot_params */
1472 1473 1474 1475
	boot_params.hdr.type_of_loader = (9 << 4) | 0;
	boot_params.hdr.ramdisk_image = xen_start_info->mod_start
		? __pa(xen_start_info->mod_start) : 0;
	boot_params.hdr.ramdisk_size = xen_start_info->mod_len;
1476
	boot_params.hdr.cmd_line_ptr = __pa(xen_start_info->cmd_line);
1477

1478
	if (!xen_initial_domain()) {
1479
		add_preferred_console("xenboot", 0, NULL);
1480
		add_preferred_console("tty", 0, NULL);
1481
		add_preferred_console("hvc", 0, NULL);
1482 1483
		if (pci_xen)
			x86_init.pci.arch_init = pci_xen_init;
C
Chris Wright 已提交
1484
	} else {
1485 1486 1487
		const struct dom0_vga_console_info *info =
			(void *)((char *)xen_start_info +
				 xen_start_info->console.dom0.info_off);
1488 1489 1490 1491 1492
		struct xen_platform_op op = {
			.cmd = XENPF_firmware_info,
			.interface_version = XENPF_INTERFACE_VERSION,
			.u.firmware_info.type = XEN_FW_KBD_SHIFT_FLAGS,
		};
1493 1494 1495 1496 1497

		xen_init_vga(info, xen_start_info->console.dom0.info_size);
		xen_start_info->console.domU.mfn = 0;
		xen_start_info->console.domU.evtchn = 0;

1498 1499 1500
		if (HYPERVISOR_dom0_op(&op) == 0)
			boot_params.kbd_status = op.u.firmware_info.u.kbd_shift_flags;

1501 1502
		xen_init_apic();

C
Chris Wright 已提交
1503 1504
		/* Make sure ACS will be enabled */
		pci_request_acs();
1505 1506

		xen_acpi_sleep_register();
1507 1508 1509 1510

		/* Avoid searching for BIOS MP tables */
		x86_init.mpparse.find_smp_config = x86_init_noop;
		x86_init.mpparse.get_smp_config = x86_init_uint_noop;
1511
	}
1512 1513 1514 1515
#ifdef CONFIG_PCI
	/* PCI BIOS service won't work from a PV guest. */
	pci_probe &= ~PCI_PROBE_BIOS;
#endif
J
Jeremy Fitzhardinge 已提交
1516 1517
	xen_raw_console_write("about to get started...\n");

1518 1519
	xen_setup_runstate_info(0);

1520
	/* Start the world */
1521
#ifdef CONFIG_X86_32
1522
	i386_start_kernel();
1523
#else
J
Jeremy Fitzhardinge 已提交
1524
	x86_64_start_reservations((char *)__pa_symbol(&boot_params));
1525
#endif
1526
}
1527

1528
void __ref xen_hvm_init_shared_info(void)
1529
{
1530
	int cpu;
1531
	struct xen_add_to_physmap xatp;
1532
	static struct shared_info *shared_info_page = 0;
1533

1534 1535 1536
	if (!shared_info_page)
		shared_info_page = (struct shared_info *)
			extend_brk(PAGE_SIZE, PAGE_SIZE);
1537 1538 1539
	xatp.domid = DOMID_SELF;
	xatp.idx = 0;
	xatp.space = XENMAPSPACE_shared_info;
1540
	xatp.gpfn = __pa(shared_info_page) >> PAGE_SHIFT;
1541 1542 1543
	if (HYPERVISOR_memory_op(XENMEM_add_to_physmap, &xatp))
		BUG();

1544
	HYPERVISOR_shared_info = (struct shared_info *)shared_info_page;
1545

1546 1547 1548 1549
	/* xen_vcpu is a pointer to the vcpu_info struct in the shared_info
	 * page, we use it in the event channel upcall and in some pvclock
	 * related functions. We don't need the vcpu_info placement
	 * optimizations because we don't use any pv_mmu or pv_irq op on
1550 1551 1552 1553 1554
	 * HVM.
	 * When xen_hvm_init_shared_info is run at boot time only vcpu 0 is
	 * online but xen_hvm_init_shared_info is run at resume time too and
	 * in that case multiple vcpus might be online. */
	for_each_online_cpu(cpu) {
1555 1556
		per_cpu(xen_vcpu, cpu) = &HYPERVISOR_shared_info->vcpu_info[cpu];
	}
1557 1558
}

1559
#ifdef CONFIG_XEN_PVHVM
O
Olaf Hering 已提交
1560 1561
static void __init init_hvm_pv_info(void)
{
1562
	int major, minor;
1563
	uint32_t eax, ebx, ecx, edx, pages, msr, base;
O
Olaf Hering 已提交
1564 1565 1566
	u64 pfn;

	base = xen_cpuid_base();
1567 1568 1569 1570 1571 1572
	cpuid(base + 1, &eax, &ebx, &ecx, &edx);

	major = eax >> 16;
	minor = eax & 0xffff;
	printk(KERN_INFO "Xen version %d.%d.\n", major, minor);

O
Olaf Hering 已提交
1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584
	cpuid(base + 2, &pages, &msr, &ecx, &edx);

	pfn = __pa(hypercall_page);
	wrmsr_safe(msr, (u32)pfn, (u32)(pfn >> 32));

	xen_setup_features();

	pv_info.name = "Xen HVM";

	xen_domain_type = XEN_HVM_DOMAIN;
}

1585 1586 1587 1588 1589 1590
static int __cpuinit xen_hvm_cpu_notify(struct notifier_block *self,
				    unsigned long action, void *hcpu)
{
	int cpu = (long)hcpu;
	switch (action) {
	case CPU_UP_PREPARE:
1591
		xen_vcpu_setup(cpu);
1592 1593
		if (xen_have_vector_callback)
			xen_init_lock_cpu(cpu);
1594 1595 1596 1597 1598 1599 1600
		break;
	default:
		break;
	}
	return NOTIFY_OK;
}

1601
static struct notifier_block xen_hvm_cpu_notifier __cpuinitdata = {
1602 1603 1604
	.notifier_call	= xen_hvm_cpu_notify,
};

1605 1606
static void __init xen_hvm_guest_init(void)
{
O
Olaf Hering 已提交
1607
	init_hvm_pv_info();
1608

1609
	xen_hvm_init_shared_info();
1610 1611 1612

	if (xen_feature(XENFEAT_hvm_callback_vector))
		xen_have_vector_callback = 1;
1613
	xen_hvm_smp_init();
1614
	register_cpu_notifier(&xen_hvm_cpu_notifier);
1615
	xen_unplug_emulated_devices();
1616
	x86_init.irqs.intr_init = xen_init_IRQ;
1617
	xen_hvm_init_time_ops();
1618
	xen_hvm_init_mmu_ops();
1619 1620 1621 1622 1623 1624 1625
}

static bool __init xen_hvm_platform(void)
{
	if (xen_pv_domain())
		return false;

1626
	if (!xen_cpuid_base())
1627 1628 1629 1630 1631
		return false;

	return true;
}

S
Sheng Yang 已提交
1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643
bool xen_hvm_need_lapic(void)
{
	if (xen_pv_domain())
		return false;
	if (!xen_hvm_domain())
		return false;
	if (xen_feature(XENFEAT_hvm_pirqs) && xen_have_vector_callback)
		return false;
	return true;
}
EXPORT_SYMBOL_GPL(xen_hvm_need_lapic);

1644
const struct hypervisor_x86 x86_hyper_xen_hvm __refconst = {
1645 1646 1647
	.name			= "Xen HVM",
	.detect			= xen_hvm_platform,
	.init_platform		= xen_hvm_guest_init,
1648
	.x2apic_available	= xen_x2apic_para_available,
1649 1650
};
EXPORT_SYMBOL(x86_hyper_xen_hvm);
1651
#endif