enlighten.c 39 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651
  1. /*
  2. * Core of Xen paravirt_ops implementation.
  3. *
  4. * This file contains the xen_paravirt_ops structure itself, and the
  5. * implementations for:
  6. * - privileged instructions
  7. * - interrupt flags
  8. * - segment operations
  9. * - booting and setup
  10. *
  11. * Jeremy Fitzhardinge <jeremy@xensource.com>, XenSource Inc, 2007
  12. */
  13. #include <linux/cpu.h>
  14. #include <linux/kernel.h>
  15. #include <linux/init.h>
  16. #include <linux/smp.h>
  17. #include <linux/preempt.h>
  18. #include <linux/hardirq.h>
  19. #include <linux/percpu.h>
  20. #include <linux/delay.h>
  21. #include <linux/start_kernel.h>
  22. #include <linux/sched.h>
  23. #include <linux/kprobes.h>
  24. #include <linux/bootmem.h>
  25. #include <linux/module.h>
  26. #include <linux/mm.h>
  27. #include <linux/page-flags.h>
  28. #include <linux/highmem.h>
  29. #include <linux/console.h>
  30. #include <linux/pci.h>
  31. #include <linux/gfp.h>
  32. #include <linux/memblock.h>
  33. #include <xen/xen.h>
  34. #include <xen/events.h>
  35. #include <xen/interface/xen.h>
  36. #include <xen/interface/version.h>
  37. #include <xen/interface/physdev.h>
  38. #include <xen/interface/vcpu.h>
  39. #include <xen/interface/memory.h>
  40. #include <xen/interface/xen-mca.h>
  41. #include <xen/features.h>
  42. #include <xen/page.h>
  43. #include <xen/hvm.h>
  44. #include <xen/hvc-console.h>
  45. #include <xen/acpi.h>
  46. #include <asm/paravirt.h>
  47. #include <asm/apic.h>
  48. #include <asm/page.h>
  49. #include <asm/xen/pci.h>
  50. #include <asm/xen/hypercall.h>
  51. #include <asm/xen/hypervisor.h>
  52. #include <asm/fixmap.h>
  53. #include <asm/processor.h>
  54. #include <asm/proto.h>
  55. #include <asm/msr-index.h>
  56. #include <asm/traps.h>
  57. #include <asm/setup.h>
  58. #include <asm/desc.h>
  59. #include <asm/pgalloc.h>
  60. #include <asm/pgtable.h>
  61. #include <asm/tlbflush.h>
  62. #include <asm/reboot.h>
  63. #include <asm/stackprotector.h>
  64. #include <asm/hypervisor.h>
  65. #include <asm/mwait.h>
  66. #include <asm/pci_x86.h>
  67. #include <asm/pat.h>
  68. #ifdef CONFIG_ACPI
  69. #include <linux/acpi.h>
  70. #include <asm/acpi.h>
  71. #include <acpi/pdc_intel.h>
  72. #include <acpi/processor.h>
  73. #include <xen/interface/platform.h>
  74. #endif
  75. #include "xen-ops.h"
  76. #include "mmu.h"
  77. #include "smp.h"
  78. #include "multicalls.h"
  79. EXPORT_SYMBOL_GPL(hypercall_page);
  80. DEFINE_PER_CPU(struct vcpu_info *, xen_vcpu);
  81. DEFINE_PER_CPU(struct vcpu_info, xen_vcpu_info);
  82. enum xen_domain_type xen_domain_type = XEN_NATIVE;
  83. EXPORT_SYMBOL_GPL(xen_domain_type);
  84. unsigned long *machine_to_phys_mapping = (void *)MACH2PHYS_VIRT_START;
  85. EXPORT_SYMBOL(machine_to_phys_mapping);
  86. unsigned long machine_to_phys_nr;
  87. EXPORT_SYMBOL(machine_to_phys_nr);
  88. struct start_info *xen_start_info;
  89. EXPORT_SYMBOL_GPL(xen_start_info);
  90. struct shared_info xen_dummy_shared_info;
  91. void *xen_initial_gdt;
  92. RESERVE_BRK(shared_info_page_brk, PAGE_SIZE);
  93. __read_mostly int xen_have_vector_callback;
  94. EXPORT_SYMBOL_GPL(xen_have_vector_callback);
  95. /*
  96. * Point at some empty memory to start with. We map the real shared_info
  97. * page as soon as fixmap is up and running.
  98. */
  99. struct shared_info *HYPERVISOR_shared_info = &xen_dummy_shared_info;
  100. /*
  101. * Flag to determine whether vcpu info placement is available on all
  102. * VCPUs. We assume it is to start with, and then set it to zero on
  103. * the first failure. This is because it can succeed on some VCPUs
  104. * and not others, since it can involve hypervisor memory allocation,
  105. * or because the guest failed to guarantee all the appropriate
  106. * constraints on all VCPUs (ie buffer can't cross a page boundary).
  107. *
  108. * Note that any particular CPU may be using a placed vcpu structure,
  109. * but we can only optimise if the all are.
  110. *
  111. * 0: not available, 1: available
  112. */
  113. static int have_vcpu_info_placement = 1;
  114. struct tls_descs {
  115. struct desc_struct desc[3];
  116. };
  117. /*
  118. * Updating the 3 TLS descriptors in the GDT on every task switch is
  119. * surprisingly expensive so we avoid updating them if they haven't
  120. * changed. Since Xen writes different descriptors than the one
  121. * passed in the update_descriptor hypercall we keep shadow copies to
  122. * compare against.
  123. */
  124. static DEFINE_PER_CPU(struct tls_descs, shadow_tls_desc);
  125. static void clamp_max_cpus(void)
  126. {
  127. #ifdef CONFIG_SMP
  128. if (setup_max_cpus > MAX_VIRT_CPUS)
  129. setup_max_cpus = MAX_VIRT_CPUS;
  130. #endif
  131. }
  132. static void xen_vcpu_setup(int cpu)
  133. {
  134. struct vcpu_register_vcpu_info info;
  135. int err;
  136. struct vcpu_info *vcpup;
  137. BUG_ON(HYPERVISOR_shared_info == &xen_dummy_shared_info);
  138. if (cpu < MAX_VIRT_CPUS)
  139. per_cpu(xen_vcpu,cpu) = &HYPERVISOR_shared_info->vcpu_info[cpu];
  140. if (!have_vcpu_info_placement) {
  141. if (cpu >= MAX_VIRT_CPUS)
  142. clamp_max_cpus();
  143. return;
  144. }
  145. vcpup = &per_cpu(xen_vcpu_info, cpu);
  146. info.mfn = arbitrary_virt_to_mfn(vcpup);
  147. info.offset = offset_in_page(vcpup);
  148. /* Check to see if the hypervisor will put the vcpu_info
  149. structure where we want it, which allows direct access via
  150. a percpu-variable. */
  151. err = HYPERVISOR_vcpu_op(VCPUOP_register_vcpu_info, cpu, &info);
  152. if (err) {
  153. printk(KERN_DEBUG "register_vcpu_info failed: err=%d\n", err);
  154. have_vcpu_info_placement = 0;
  155. clamp_max_cpus();
  156. } else {
  157. /* This cpu is using the registered vcpu info, even if
  158. later ones fail to. */
  159. per_cpu(xen_vcpu, cpu) = vcpup;
  160. }
  161. }
  162. /*
  163. * On restore, set the vcpu placement up again.
  164. * If it fails, then we're in a bad state, since
  165. * we can't back out from using it...
  166. */
  167. void xen_vcpu_restore(void)
  168. {
  169. int cpu;
  170. for_each_possible_cpu(cpu) {
  171. bool other_cpu = (cpu != smp_processor_id());
  172. bool is_up = HYPERVISOR_vcpu_op(VCPUOP_is_up, cpu, NULL);
  173. if (other_cpu && is_up &&
  174. HYPERVISOR_vcpu_op(VCPUOP_down, cpu, NULL))
  175. BUG();
  176. xen_setup_runstate_info(cpu);
  177. if (have_vcpu_info_placement)
  178. xen_vcpu_setup(cpu);
  179. if (other_cpu && is_up &&
  180. HYPERVISOR_vcpu_op(VCPUOP_up, cpu, NULL))
  181. BUG();
  182. }
  183. }
  184. static void __init xen_banner(void)
  185. {
  186. unsigned version = HYPERVISOR_xen_version(XENVER_version, NULL);
  187. struct xen_extraversion extra;
  188. HYPERVISOR_xen_version(XENVER_extraversion, &extra);
  189. printk(KERN_INFO "Booting paravirtualized kernel on %s\n",
  190. pv_info.name);
  191. printk(KERN_INFO "Xen version: %d.%d%s%s\n",
  192. version >> 16, version & 0xffff, extra.extraversion,
  193. xen_feature(XENFEAT_mmu_pt_update_preserve_ad) ? " (preserve-AD)" : "");
  194. }
  195. /* Check if running on Xen version (major, minor) or later */
  196. bool
  197. xen_running_on_version_or_later(unsigned int major, unsigned int minor)
  198. {
  199. unsigned int version;
  200. if (!xen_domain())
  201. return false;
  202. version = HYPERVISOR_xen_version(XENVER_version, NULL);
  203. if ((((version >> 16) == major) && ((version & 0xffff) >= minor)) ||
  204. ((version >> 16) > major))
  205. return true;
  206. return false;
  207. }
  208. #define CPUID_THERM_POWER_LEAF 6
  209. #define APERFMPERF_PRESENT 0
  210. static __read_mostly unsigned int cpuid_leaf1_edx_mask = ~0;
  211. static __read_mostly unsigned int cpuid_leaf1_ecx_mask = ~0;
  212. static __read_mostly unsigned int cpuid_leaf1_ecx_set_mask;
  213. static __read_mostly unsigned int cpuid_leaf5_ecx_val;
  214. static __read_mostly unsigned int cpuid_leaf5_edx_val;
  215. static void xen_cpuid(unsigned int *ax, unsigned int *bx,
  216. unsigned int *cx, unsigned int *dx)
  217. {
  218. unsigned maskebx = ~0;
  219. unsigned maskecx = ~0;
  220. unsigned maskedx = ~0;
  221. unsigned setecx = 0;
  222. /*
  223. * Mask out inconvenient features, to try and disable as many
  224. * unsupported kernel subsystems as possible.
  225. */
  226. switch (*ax) {
  227. case 1:
  228. maskecx = cpuid_leaf1_ecx_mask;
  229. setecx = cpuid_leaf1_ecx_set_mask;
  230. maskedx = cpuid_leaf1_edx_mask;
  231. break;
  232. case CPUID_MWAIT_LEAF:
  233. /* Synthesize the values.. */
  234. *ax = 0;
  235. *bx = 0;
  236. *cx = cpuid_leaf5_ecx_val;
  237. *dx = cpuid_leaf5_edx_val;
  238. return;
  239. case CPUID_THERM_POWER_LEAF:
  240. /* Disabling APERFMPERF for kernel usage */
  241. maskecx = ~(1 << APERFMPERF_PRESENT);
  242. break;
  243. case 0xb:
  244. /* Suppress extended topology stuff */
  245. maskebx = 0;
  246. break;
  247. }
  248. asm(XEN_EMULATE_PREFIX "cpuid"
  249. : "=a" (*ax),
  250. "=b" (*bx),
  251. "=c" (*cx),
  252. "=d" (*dx)
  253. : "0" (*ax), "2" (*cx));
  254. *bx &= maskebx;
  255. *cx &= maskecx;
  256. *cx |= setecx;
  257. *dx &= maskedx;
  258. }
  259. static bool __init xen_check_mwait(void)
  260. {
  261. #ifdef CONFIG_ACPI
  262. struct xen_platform_op op = {
  263. .cmd = XENPF_set_processor_pminfo,
  264. .u.set_pminfo.id = -1,
  265. .u.set_pminfo.type = XEN_PM_PDC,
  266. };
  267. uint32_t buf[3];
  268. unsigned int ax, bx, cx, dx;
  269. unsigned int mwait_mask;
  270. /* We need to determine whether it is OK to expose the MWAIT
  271. * capability to the kernel to harvest deeper than C3 states from ACPI
  272. * _CST using the processor_harvest_xen.c module. For this to work, we
  273. * need to gather the MWAIT_LEAF values (which the cstate.c code
  274. * checks against). The hypervisor won't expose the MWAIT flag because
  275. * it would break backwards compatibility; so we will find out directly
  276. * from the hardware and hypercall.
  277. */
  278. if (!xen_initial_domain())
  279. return false;
  280. /*
  281. * When running under platform earlier than Xen4.2, do not expose
  282. * mwait, to avoid the risk of loading native acpi pad driver
  283. */
  284. if (!xen_running_on_version_or_later(4, 2))
  285. return false;
  286. ax = 1;
  287. cx = 0;
  288. native_cpuid(&ax, &bx, &cx, &dx);
  289. mwait_mask = (1 << (X86_FEATURE_EST % 32)) |
  290. (1 << (X86_FEATURE_MWAIT % 32));
  291. if ((cx & mwait_mask) != mwait_mask)
  292. return false;
  293. /* We need to emulate the MWAIT_LEAF and for that we need both
  294. * ecx and edx. The hypercall provides only partial information.
  295. */
  296. ax = CPUID_MWAIT_LEAF;
  297. bx = 0;
  298. cx = 0;
  299. dx = 0;
  300. native_cpuid(&ax, &bx, &cx, &dx);
  301. /* Ask the Hypervisor whether to clear ACPI_PDC_C_C2C3_FFH. If so,
  302. * don't expose MWAIT_LEAF and let ACPI pick the IOPORT version of C3.
  303. */
  304. buf[0] = ACPI_PDC_REVISION_ID;
  305. buf[1] = 1;
  306. buf[2] = (ACPI_PDC_C_CAPABILITY_SMP | ACPI_PDC_EST_CAPABILITY_SWSMP);
  307. set_xen_guest_handle(op.u.set_pminfo.pdc, buf);
  308. if ((HYPERVISOR_dom0_op(&op) == 0) &&
  309. (buf[2] & (ACPI_PDC_C_C1_FFH | ACPI_PDC_C_C2C3_FFH))) {
  310. cpuid_leaf5_ecx_val = cx;
  311. cpuid_leaf5_edx_val = dx;
  312. }
  313. return true;
  314. #else
  315. return false;
  316. #endif
  317. }
  318. static void __init xen_init_cpuid_mask(void)
  319. {
  320. unsigned int ax, bx, cx, dx;
  321. unsigned int xsave_mask;
  322. cpuid_leaf1_edx_mask =
  323. ~((1 << X86_FEATURE_MTRR) | /* disable MTRR */
  324. (1 << X86_FEATURE_ACC)); /* thermal monitoring */
  325. if (!xen_initial_domain())
  326. cpuid_leaf1_edx_mask &=
  327. ~((1 << X86_FEATURE_APIC) | /* disable local APIC */
  328. (1 << X86_FEATURE_ACPI)); /* disable ACPI */
  329. ax = 1;
  330. cx = 0;
  331. xen_cpuid(&ax, &bx, &cx, &dx);
  332. xsave_mask =
  333. (1 << (X86_FEATURE_XSAVE % 32)) |
  334. (1 << (X86_FEATURE_OSXSAVE % 32));
  335. /* Xen will set CR4.OSXSAVE if supported and not disabled by force */
  336. if ((cx & xsave_mask) != xsave_mask)
  337. cpuid_leaf1_ecx_mask &= ~xsave_mask; /* disable XSAVE & OSXSAVE */
  338. if (xen_check_mwait())
  339. cpuid_leaf1_ecx_set_mask = (1 << (X86_FEATURE_MWAIT % 32));
  340. }
  341. static void xen_set_debugreg(int reg, unsigned long val)
  342. {
  343. HYPERVISOR_set_debugreg(reg, val);
  344. }
  345. static unsigned long xen_get_debugreg(int reg)
  346. {
  347. return HYPERVISOR_get_debugreg(reg);
  348. }
  349. static void xen_end_context_switch(struct task_struct *next)
  350. {
  351. xen_mc_flush();
  352. paravirt_end_context_switch(next);
  353. }
  354. static unsigned long xen_store_tr(void)
  355. {
  356. return 0;
  357. }
  358. /*
  359. * Set the page permissions for a particular virtual address. If the
  360. * address is a vmalloc mapping (or other non-linear mapping), then
  361. * find the linear mapping of the page and also set its protections to
  362. * match.
  363. */
  364. static void set_aliased_prot(void *v, pgprot_t prot)
  365. {
  366. int level;
  367. pte_t *ptep;
  368. pte_t pte;
  369. unsigned long pfn;
  370. struct page *page;
  371. ptep = lookup_address((unsigned long)v, &level);
  372. BUG_ON(ptep == NULL);
  373. pfn = pte_pfn(*ptep);
  374. page = pfn_to_page(pfn);
  375. pte = pfn_pte(pfn, prot);
  376. if (HYPERVISOR_update_va_mapping((unsigned long)v, pte, 0))
  377. BUG();
  378. if (!PageHighMem(page)) {
  379. void *av = __va(PFN_PHYS(pfn));
  380. if (av != v)
  381. if (HYPERVISOR_update_va_mapping((unsigned long)av, pte, 0))
  382. BUG();
  383. } else
  384. kmap_flush_unused();
  385. }
  386. static void xen_alloc_ldt(struct desc_struct *ldt, unsigned entries)
  387. {
  388. const unsigned entries_per_page = PAGE_SIZE / LDT_ENTRY_SIZE;
  389. int i;
  390. for(i = 0; i < entries; i += entries_per_page)
  391. set_aliased_prot(ldt + i, PAGE_KERNEL_RO);
  392. }
  393. static void xen_free_ldt(struct desc_struct *ldt, unsigned entries)
  394. {
  395. const unsigned entries_per_page = PAGE_SIZE / LDT_ENTRY_SIZE;
  396. int i;
  397. for(i = 0; i < entries; i += entries_per_page)
  398. set_aliased_prot(ldt + i, PAGE_KERNEL);
  399. }
  400. static void xen_set_ldt(const void *addr, unsigned entries)
  401. {
  402. struct mmuext_op *op;
  403. struct multicall_space mcs = xen_mc_entry(sizeof(*op));
  404. trace_xen_cpu_set_ldt(addr, entries);
  405. op = mcs.args;
  406. op->cmd = MMUEXT_SET_LDT;
  407. op->arg1.linear_addr = (unsigned long)addr;
  408. op->arg2.nr_ents = entries;
  409. MULTI_mmuext_op(mcs.mc, op, 1, NULL, DOMID_SELF);
  410. xen_mc_issue(PARAVIRT_LAZY_CPU);
  411. }
  412. static void xen_load_gdt(const struct desc_ptr *dtr)
  413. {
  414. unsigned long va = dtr->address;
  415. unsigned int size = dtr->size + 1;
  416. unsigned pages = (size + PAGE_SIZE - 1) / PAGE_SIZE;
  417. unsigned long frames[pages];
  418. int f;
  419. /*
  420. * A GDT can be up to 64k in size, which corresponds to 8192
  421. * 8-byte entries, or 16 4k pages..
  422. */
  423. BUG_ON(size > 65536);
  424. BUG_ON(va & ~PAGE_MASK);
  425. for (f = 0; va < dtr->address + size; va += PAGE_SIZE, f++) {
  426. int level;
  427. pte_t *ptep;
  428. unsigned long pfn, mfn;
  429. void *virt;
  430. /*
  431. * The GDT is per-cpu and is in the percpu data area.
  432. * That can be virtually mapped, so we need to do a
  433. * page-walk to get the underlying MFN for the
  434. * hypercall. The page can also be in the kernel's
  435. * linear range, so we need to RO that mapping too.
  436. */
  437. ptep = lookup_address(va, &level);
  438. BUG_ON(ptep == NULL);
  439. pfn = pte_pfn(*ptep);
  440. mfn = pfn_to_mfn(pfn);
  441. virt = __va(PFN_PHYS(pfn));
  442. frames[f] = mfn;
  443. make_lowmem_page_readonly((void *)va);
  444. make_lowmem_page_readonly(virt);
  445. }
  446. if (HYPERVISOR_set_gdt(frames, size / sizeof(struct desc_struct)))
  447. BUG();
  448. }
  449. /*
  450. * load_gdt for early boot, when the gdt is only mapped once
  451. */
  452. static void __init xen_load_gdt_boot(const struct desc_ptr *dtr)
  453. {
  454. unsigned long va = dtr->address;
  455. unsigned int size = dtr->size + 1;
  456. unsigned pages = (size + PAGE_SIZE - 1) / PAGE_SIZE;
  457. unsigned long frames[pages];
  458. int f;
  459. /*
  460. * A GDT can be up to 64k in size, which corresponds to 8192
  461. * 8-byte entries, or 16 4k pages..
  462. */
  463. BUG_ON(size > 65536);
  464. BUG_ON(va & ~PAGE_MASK);
  465. for (f = 0; va < dtr->address + size; va += PAGE_SIZE, f++) {
  466. pte_t pte;
  467. unsigned long pfn, mfn;
  468. pfn = virt_to_pfn(va);
  469. mfn = pfn_to_mfn(pfn);
  470. pte = pfn_pte(pfn, PAGE_KERNEL_RO);
  471. if (HYPERVISOR_update_va_mapping((unsigned long)va, pte, 0))
  472. BUG();
  473. frames[f] = mfn;
  474. }
  475. if (HYPERVISOR_set_gdt(frames, size / sizeof(struct desc_struct)))
  476. BUG();
  477. }
  478. static inline bool desc_equal(const struct desc_struct *d1,
  479. const struct desc_struct *d2)
  480. {
  481. return d1->a == d2->a && d1->b == d2->b;
  482. }
  483. static void load_TLS_descriptor(struct thread_struct *t,
  484. unsigned int cpu, unsigned int i)
  485. {
  486. struct desc_struct *shadow = &per_cpu(shadow_tls_desc, cpu).desc[i];
  487. struct desc_struct *gdt;
  488. xmaddr_t maddr;
  489. struct multicall_space mc;
  490. if (desc_equal(shadow, &t->tls_array[i]))
  491. return;
  492. *shadow = t->tls_array[i];
  493. gdt = get_cpu_gdt_table(cpu);
  494. maddr = arbitrary_virt_to_machine(&gdt[GDT_ENTRY_TLS_MIN+i]);
  495. mc = __xen_mc_entry(0);
  496. MULTI_update_descriptor(mc.mc, maddr.maddr, t->tls_array[i]);
  497. }
  498. static void xen_load_tls(struct thread_struct *t, unsigned int cpu)
  499. {
  500. /*
  501. * XXX sleazy hack: If we're being called in a lazy-cpu zone
  502. * and lazy gs handling is enabled, it means we're in a
  503. * context switch, and %gs has just been saved. This means we
  504. * can zero it out to prevent faults on exit from the
  505. * hypervisor if the next process has no %gs. Either way, it
  506. * has been saved, and the new value will get loaded properly.
  507. * This will go away as soon as Xen has been modified to not
  508. * save/restore %gs for normal hypercalls.
  509. *
  510. * On x86_64, this hack is not used for %gs, because gs points
  511. * to KERNEL_GS_BASE (and uses it for PDA references), so we
  512. * must not zero %gs on x86_64
  513. *
  514. * For x86_64, we need to zero %fs, otherwise we may get an
  515. * exception between the new %fs descriptor being loaded and
  516. * %fs being effectively cleared at __switch_to().
  517. */
  518. if (paravirt_get_lazy_mode() == PARAVIRT_LAZY_CPU) {
  519. #ifdef CONFIG_X86_32
  520. lazy_load_gs(0);
  521. #else
  522. loadsegment(fs, 0);
  523. #endif
  524. }
  525. xen_mc_batch();
  526. load_TLS_descriptor(t, cpu, 0);
  527. load_TLS_descriptor(t, cpu, 1);
  528. load_TLS_descriptor(t, cpu, 2);
  529. xen_mc_issue(PARAVIRT_LAZY_CPU);
  530. }
  531. #ifdef CONFIG_X86_64
  532. static void xen_load_gs_index(unsigned int idx)
  533. {
  534. if (HYPERVISOR_set_segment_base(SEGBASE_GS_USER_SEL, idx))
  535. BUG();
  536. }
  537. #endif
  538. static void xen_write_ldt_entry(struct desc_struct *dt, int entrynum,
  539. const void *ptr)
  540. {
  541. xmaddr_t mach_lp = arbitrary_virt_to_machine(&dt[entrynum]);
  542. u64 entry = *(u64 *)ptr;
  543. trace_xen_cpu_write_ldt_entry(dt, entrynum, entry);
  544. preempt_disable();
  545. xen_mc_flush();
  546. if (HYPERVISOR_update_descriptor(mach_lp.maddr, entry))
  547. BUG();
  548. preempt_enable();
  549. }
  550. static int cvt_gate_to_trap(int vector, const gate_desc *val,
  551. struct trap_info *info)
  552. {
  553. unsigned long addr;
  554. if (val->type != GATE_TRAP && val->type != GATE_INTERRUPT)
  555. return 0;
  556. info->vector = vector;
  557. addr = gate_offset(*val);
  558. #ifdef CONFIG_X86_64
  559. /*
  560. * Look for known traps using IST, and substitute them
  561. * appropriately. The debugger ones are the only ones we care
  562. * about. Xen will handle faults like double_fault,
  563. * so we should never see them. Warn if
  564. * there's an unexpected IST-using fault handler.
  565. */
  566. if (addr == (unsigned long)debug)
  567. addr = (unsigned long)xen_debug;
  568. else if (addr == (unsigned long)int3)
  569. addr = (unsigned long)xen_int3;
  570. else if (addr == (unsigned long)stack_segment)
  571. addr = (unsigned long)xen_stack_segment;
  572. else if (addr == (unsigned long)double_fault ||
  573. addr == (unsigned long)nmi) {
  574. /* Don't need to handle these */
  575. return 0;
  576. #ifdef CONFIG_X86_MCE
  577. } else if (addr == (unsigned long)machine_check) {
  578. /*
  579. * when xen hypervisor inject vMCE to guest,
  580. * use native mce handler to handle it
  581. */
  582. ;
  583. #endif
  584. } else {
  585. /* Some other trap using IST? */
  586. if (WARN_ON(val->ist != 0))
  587. return 0;
  588. }
  589. #endif /* CONFIG_X86_64 */
  590. info->address = addr;
  591. info->cs = gate_segment(*val);
  592. info->flags = val->dpl;
  593. /* interrupt gates clear IF */
  594. if (val->type == GATE_INTERRUPT)
  595. info->flags |= 1 << 2;
  596. return 1;
  597. }
  598. /* Locations of each CPU's IDT */
  599. static DEFINE_PER_CPU(struct desc_ptr, idt_desc);
  600. /* Set an IDT entry. If the entry is part of the current IDT, then
  601. also update Xen. */
  602. static void xen_write_idt_entry(gate_desc *dt, int entrynum, const gate_desc *g)
  603. {
  604. unsigned long p = (unsigned long)&dt[entrynum];
  605. unsigned long start, end;
  606. trace_xen_cpu_write_idt_entry(dt, entrynum, g);
  607. preempt_disable();
  608. start = __this_cpu_read(idt_desc.address);
  609. end = start + __this_cpu_read(idt_desc.size) + 1;
  610. xen_mc_flush();
  611. native_write_idt_entry(dt, entrynum, g);
  612. if (p >= start && (p + 8) <= end) {
  613. struct trap_info info[2];
  614. info[1].address = 0;
  615. if (cvt_gate_to_trap(entrynum, g, &info[0]))
  616. if (HYPERVISOR_set_trap_table(info))
  617. BUG();
  618. }
  619. preempt_enable();
  620. }
  621. static void xen_convert_trap_info(const struct desc_ptr *desc,
  622. struct trap_info *traps)
  623. {
  624. unsigned in, out, count;
  625. count = (desc->size+1) / sizeof(gate_desc);
  626. BUG_ON(count > 256);
  627. for (in = out = 0; in < count; in++) {
  628. gate_desc *entry = (gate_desc*)(desc->address) + in;
  629. if (cvt_gate_to_trap(in, entry, &traps[out]))
  630. out++;
  631. }
  632. traps[out].address = 0;
  633. }
  634. void xen_copy_trap_info(struct trap_info *traps)
  635. {
  636. const struct desc_ptr *desc = &__get_cpu_var(idt_desc);
  637. xen_convert_trap_info(desc, traps);
  638. }
  639. /* Load a new IDT into Xen. In principle this can be per-CPU, so we
  640. hold a spinlock to protect the static traps[] array (static because
  641. it avoids allocation, and saves stack space). */
  642. static void xen_load_idt(const struct desc_ptr *desc)
  643. {
  644. static DEFINE_SPINLOCK(lock);
  645. static struct trap_info traps[257];
  646. trace_xen_cpu_load_idt(desc);
  647. spin_lock(&lock);
  648. __get_cpu_var(idt_desc) = *desc;
  649. xen_convert_trap_info(desc, traps);
  650. xen_mc_flush();
  651. if (HYPERVISOR_set_trap_table(traps))
  652. BUG();
  653. spin_unlock(&lock);
  654. }
  655. /* Write a GDT descriptor entry. Ignore LDT descriptors, since
  656. they're handled differently. */
  657. static void xen_write_gdt_entry(struct desc_struct *dt, int entry,
  658. const void *desc, int type)
  659. {
  660. trace_xen_cpu_write_gdt_entry(dt, entry, desc, type);
  661. preempt_disable();
  662. switch (type) {
  663. case DESC_LDT:
  664. case DESC_TSS:
  665. /* ignore */
  666. break;
  667. default: {
  668. xmaddr_t maddr = arbitrary_virt_to_machine(&dt[entry]);
  669. xen_mc_flush();
  670. if (HYPERVISOR_update_descriptor(maddr.maddr, *(u64 *)desc))
  671. BUG();
  672. }
  673. }
  674. preempt_enable();
  675. }
  676. /*
  677. * Version of write_gdt_entry for use at early boot-time needed to
  678. * update an entry as simply as possible.
  679. */
  680. static void __init xen_write_gdt_entry_boot(struct desc_struct *dt, int entry,
  681. const void *desc, int type)
  682. {
  683. trace_xen_cpu_write_gdt_entry(dt, entry, desc, type);
  684. switch (type) {
  685. case DESC_LDT:
  686. case DESC_TSS:
  687. /* ignore */
  688. break;
  689. default: {
  690. xmaddr_t maddr = virt_to_machine(&dt[entry]);
  691. if (HYPERVISOR_update_descriptor(maddr.maddr, *(u64 *)desc))
  692. dt[entry] = *(struct desc_struct *)desc;
  693. }
  694. }
  695. }
  696. static void xen_load_sp0(struct tss_struct *tss,
  697. struct thread_struct *thread)
  698. {
  699. struct multicall_space mcs;
  700. mcs = xen_mc_entry(0);
  701. MULTI_stack_switch(mcs.mc, __KERNEL_DS, thread->sp0);
  702. xen_mc_issue(PARAVIRT_LAZY_CPU);
  703. }
  704. static void xen_set_iopl_mask(unsigned mask)
  705. {
  706. struct physdev_set_iopl set_iopl;
  707. /* Force the change at ring 0. */
  708. set_iopl.iopl = (mask == 0) ? 1 : (mask >> 12) & 3;
  709. HYPERVISOR_physdev_op(PHYSDEVOP_set_iopl, &set_iopl);
  710. }
  711. static void xen_io_delay(void)
  712. {
  713. }
  714. #ifdef CONFIG_X86_LOCAL_APIC
  715. static unsigned long xen_set_apic_id(unsigned int x)
  716. {
  717. WARN_ON(1);
  718. return x;
  719. }
  720. static unsigned int xen_get_apic_id(unsigned long x)
  721. {
  722. return ((x)>>24) & 0xFFu;
  723. }
  724. static u32 xen_apic_read(u32 reg)
  725. {
  726. struct xen_platform_op op = {
  727. .cmd = XENPF_get_cpuinfo,
  728. .interface_version = XENPF_INTERFACE_VERSION,
  729. .u.pcpu_info.xen_cpuid = 0,
  730. };
  731. int ret = 0;
  732. /* Shouldn't need this as APIC is turned off for PV, and we only
  733. * get called on the bootup processor. But just in case. */
  734. if (!xen_initial_domain() || smp_processor_id())
  735. return 0;
  736. if (reg == APIC_LVR)
  737. return 0x10;
  738. if (reg != APIC_ID)
  739. return 0;
  740. ret = HYPERVISOR_dom0_op(&op);
  741. if (ret)
  742. return 0;
  743. return op.u.pcpu_info.apic_id << 24;
  744. }
  745. static void xen_apic_write(u32 reg, u32 val)
  746. {
  747. /* Warn to see if there's any stray references */
  748. WARN_ON(1);
  749. }
  750. static u64 xen_apic_icr_read(void)
  751. {
  752. return 0;
  753. }
  754. static void xen_apic_icr_write(u32 low, u32 id)
  755. {
  756. /* Warn to see if there's any stray references */
  757. WARN_ON(1);
  758. }
  759. static void xen_apic_wait_icr_idle(void)
  760. {
  761. return;
  762. }
  763. static u32 xen_safe_apic_wait_icr_idle(void)
  764. {
  765. return 0;
  766. }
  767. static void set_xen_basic_apic_ops(void)
  768. {
  769. apic->read = xen_apic_read;
  770. apic->write = xen_apic_write;
  771. apic->icr_read = xen_apic_icr_read;
  772. apic->icr_write = xen_apic_icr_write;
  773. apic->wait_icr_idle = xen_apic_wait_icr_idle;
  774. apic->safe_wait_icr_idle = xen_safe_apic_wait_icr_idle;
  775. apic->set_apic_id = xen_set_apic_id;
  776. apic->get_apic_id = xen_get_apic_id;
  777. #ifdef CONFIG_SMP
  778. apic->send_IPI_allbutself = xen_send_IPI_allbutself;
  779. apic->send_IPI_mask_allbutself = xen_send_IPI_mask_allbutself;
  780. apic->send_IPI_mask = xen_send_IPI_mask;
  781. apic->send_IPI_all = xen_send_IPI_all;
  782. apic->send_IPI_self = xen_send_IPI_self;
  783. #endif
  784. }
  785. #endif
  786. static void xen_clts(void)
  787. {
  788. struct multicall_space mcs;
  789. mcs = xen_mc_entry(0);
  790. MULTI_fpu_taskswitch(mcs.mc, 0);
  791. xen_mc_issue(PARAVIRT_LAZY_CPU);
  792. }
  793. static DEFINE_PER_CPU(unsigned long, xen_cr0_value);
  794. static unsigned long xen_read_cr0(void)
  795. {
  796. unsigned long cr0 = this_cpu_read(xen_cr0_value);
  797. if (unlikely(cr0 == 0)) {
  798. cr0 = native_read_cr0();
  799. this_cpu_write(xen_cr0_value, cr0);
  800. }
  801. return cr0;
  802. }
  803. static void xen_write_cr0(unsigned long cr0)
  804. {
  805. struct multicall_space mcs;
  806. this_cpu_write(xen_cr0_value, cr0);
  807. /* Only pay attention to cr0.TS; everything else is
  808. ignored. */
  809. mcs = xen_mc_entry(0);
  810. MULTI_fpu_taskswitch(mcs.mc, (cr0 & X86_CR0_TS) != 0);
  811. xen_mc_issue(PARAVIRT_LAZY_CPU);
  812. }
  813. static void xen_write_cr4(unsigned long cr4)
  814. {
  815. cr4 &= ~X86_CR4_PGE;
  816. cr4 &= ~X86_CR4_PSE;
  817. native_write_cr4(cr4);
  818. }
  819. #ifdef CONFIG_X86_64
  820. static inline unsigned long xen_read_cr8(void)
  821. {
  822. return 0;
  823. }
  824. static inline void xen_write_cr8(unsigned long val)
  825. {
  826. BUG_ON(val);
  827. }
  828. #endif
  829. static int xen_write_msr_safe(unsigned int msr, unsigned low, unsigned high)
  830. {
  831. int ret;
  832. ret = 0;
  833. switch (msr) {
  834. #ifdef CONFIG_X86_64
  835. unsigned which;
  836. u64 base;
  837. case MSR_FS_BASE: which = SEGBASE_FS; goto set;
  838. case MSR_KERNEL_GS_BASE: which = SEGBASE_GS_USER; goto set;
  839. case MSR_GS_BASE: which = SEGBASE_GS_KERNEL; goto set;
  840. set:
  841. base = ((u64)high << 32) | low;
  842. if (HYPERVISOR_set_segment_base(which, base) != 0)
  843. ret = -EIO;
  844. break;
  845. #endif
  846. case MSR_STAR:
  847. case MSR_CSTAR:
  848. case MSR_LSTAR:
  849. case MSR_SYSCALL_MASK:
  850. case MSR_IA32_SYSENTER_CS:
  851. case MSR_IA32_SYSENTER_ESP:
  852. case MSR_IA32_SYSENTER_EIP:
  853. /* Fast syscall setup is all done in hypercalls, so
  854. these are all ignored. Stub them out here to stop
  855. Xen console noise. */
  856. break;
  857. case MSR_IA32_CR_PAT:
  858. if (smp_processor_id() == 0)
  859. xen_set_pat(((u64)high << 32) | low);
  860. break;
  861. default:
  862. ret = native_write_msr_safe(msr, low, high);
  863. }
  864. return ret;
  865. }
  866. void xen_setup_shared_info(void)
  867. {
  868. if (!xen_feature(XENFEAT_auto_translated_physmap)) {
  869. set_fixmap(FIX_PARAVIRT_BOOTMAP,
  870. xen_start_info->shared_info);
  871. HYPERVISOR_shared_info =
  872. (struct shared_info *)fix_to_virt(FIX_PARAVIRT_BOOTMAP);
  873. } else
  874. HYPERVISOR_shared_info =
  875. (struct shared_info *)__va(xen_start_info->shared_info);
  876. #ifndef CONFIG_SMP
  877. /* In UP this is as good a place as any to set up shared info */
  878. xen_setup_vcpu_info_placement();
  879. #endif
  880. xen_setup_mfn_list_list();
  881. }
  882. /* This is called once we have the cpu_possible_mask */
  883. void xen_setup_vcpu_info_placement(void)
  884. {
  885. int cpu;
  886. for_each_possible_cpu(cpu)
  887. xen_vcpu_setup(cpu);
  888. /* xen_vcpu_setup managed to place the vcpu_info within the
  889. percpu area for all cpus, so make use of it */
  890. if (have_vcpu_info_placement) {
  891. pv_irq_ops.save_fl = __PV_IS_CALLEE_SAVE(xen_save_fl_direct);
  892. pv_irq_ops.restore_fl = __PV_IS_CALLEE_SAVE(xen_restore_fl_direct);
  893. pv_irq_ops.irq_disable = __PV_IS_CALLEE_SAVE(xen_irq_disable_direct);
  894. pv_irq_ops.irq_enable = __PV_IS_CALLEE_SAVE(xen_irq_enable_direct);
  895. pv_mmu_ops.read_cr2 = xen_read_cr2_direct;
  896. }
  897. }
  898. static unsigned xen_patch(u8 type, u16 clobbers, void *insnbuf,
  899. unsigned long addr, unsigned len)
  900. {
  901. char *start, *end, *reloc;
  902. unsigned ret;
  903. start = end = reloc = NULL;
  904. #define SITE(op, x) \
  905. case PARAVIRT_PATCH(op.x): \
  906. if (have_vcpu_info_placement) { \
  907. start = (char *)xen_##x##_direct; \
  908. end = xen_##x##_direct_end; \
  909. reloc = xen_##x##_direct_reloc; \
  910. } \
  911. goto patch_site
  912. switch (type) {
  913. SITE(pv_irq_ops, irq_enable);
  914. SITE(pv_irq_ops, irq_disable);
  915. SITE(pv_irq_ops, save_fl);
  916. SITE(pv_irq_ops, restore_fl);
  917. #undef SITE
  918. patch_site:
  919. if (start == NULL || (end-start) > len)
  920. goto default_patch;
  921. ret = paravirt_patch_insns(insnbuf, len, start, end);
  922. /* Note: because reloc is assigned from something that
  923. appears to be an array, gcc assumes it's non-null,
  924. but doesn't know its relationship with start and
  925. end. */
  926. if (reloc > start && reloc < end) {
  927. int reloc_off = reloc - start;
  928. long *relocp = (long *)(insnbuf + reloc_off);
  929. long delta = start - (char *)addr;
  930. *relocp += delta;
  931. }
  932. break;
  933. default_patch:
  934. default:
  935. ret = paravirt_patch_default(type, clobbers, insnbuf,
  936. addr, len);
  937. break;
  938. }
  939. return ret;
  940. }
  941. static const struct pv_info xen_info __initconst = {
  942. .paravirt_enabled = 1,
  943. .shared_kernel_pmd = 0,
  944. #ifdef CONFIG_X86_64
  945. .extra_user_64bit_cs = FLAT_USER_CS64,
  946. #endif
  947. .name = "Xen",
  948. };
  949. static const struct pv_init_ops xen_init_ops __initconst = {
  950. .patch = xen_patch,
  951. };
  952. static const struct pv_cpu_ops xen_cpu_ops __initconst = {
  953. .cpuid = xen_cpuid,
  954. .set_debugreg = xen_set_debugreg,
  955. .get_debugreg = xen_get_debugreg,
  956. .clts = xen_clts,
  957. .read_cr0 = xen_read_cr0,
  958. .write_cr0 = xen_write_cr0,
  959. .read_cr4 = native_read_cr4,
  960. .read_cr4_safe = native_read_cr4_safe,
  961. .write_cr4 = xen_write_cr4,
  962. #ifdef CONFIG_X86_64
  963. .read_cr8 = xen_read_cr8,
  964. .write_cr8 = xen_write_cr8,
  965. #endif
  966. .wbinvd = native_wbinvd,
  967. .read_msr = native_read_msr_safe,
  968. .write_msr = xen_write_msr_safe,
  969. .read_tsc = native_read_tsc,
  970. .read_pmc = native_read_pmc,
  971. .read_tscp = native_read_tscp,
  972. .iret = xen_iret,
  973. .irq_enable_sysexit = xen_sysexit,
  974. #ifdef CONFIG_X86_64
  975. .usergs_sysret32 = xen_sysret32,
  976. .usergs_sysret64 = xen_sysret64,
  977. #endif
  978. .load_tr_desc = paravirt_nop,
  979. .set_ldt = xen_set_ldt,
  980. .load_gdt = xen_load_gdt,
  981. .load_idt = xen_load_idt,
  982. .load_tls = xen_load_tls,
  983. #ifdef CONFIG_X86_64
  984. .load_gs_index = xen_load_gs_index,
  985. #endif
  986. .alloc_ldt = xen_alloc_ldt,
  987. .free_ldt = xen_free_ldt,
  988. .store_gdt = native_store_gdt,
  989. .store_idt = native_store_idt,
  990. .store_tr = xen_store_tr,
  991. .write_ldt_entry = xen_write_ldt_entry,
  992. .write_gdt_entry = xen_write_gdt_entry,
  993. .write_idt_entry = xen_write_idt_entry,
  994. .load_sp0 = xen_load_sp0,
  995. .set_iopl_mask = xen_set_iopl_mask,
  996. .io_delay = xen_io_delay,
  997. /* Xen takes care of %gs when switching to usermode for us */
  998. .swapgs = paravirt_nop,
  999. .start_context_switch = paravirt_start_context_switch,
  1000. .end_context_switch = xen_end_context_switch,
  1001. };
  1002. static const struct pv_apic_ops xen_apic_ops __initconst = {
  1003. #ifdef CONFIG_X86_LOCAL_APIC
  1004. .startup_ipi_hook = paravirt_nop,
  1005. #endif
  1006. };
  1007. static void xen_reboot(int reason)
  1008. {
  1009. struct sched_shutdown r = { .reason = reason };
  1010. if (HYPERVISOR_sched_op(SCHEDOP_shutdown, &r))
  1011. BUG();
  1012. }
  1013. static void xen_restart(char *msg)
  1014. {
  1015. xen_reboot(SHUTDOWN_reboot);
  1016. }
  1017. static void xen_emergency_restart(void)
  1018. {
  1019. xen_reboot(SHUTDOWN_reboot);
  1020. }
  1021. static void xen_machine_halt(void)
  1022. {
  1023. xen_reboot(SHUTDOWN_poweroff);
  1024. }
  1025. static void xen_machine_power_off(void)
  1026. {
  1027. if (pm_power_off)
  1028. pm_power_off();
  1029. xen_reboot(SHUTDOWN_poweroff);
  1030. }
  1031. static void xen_crash_shutdown(struct pt_regs *regs)
  1032. {
  1033. xen_reboot(SHUTDOWN_crash);
  1034. }
  1035. static int
  1036. xen_panic_event(struct notifier_block *this, unsigned long event, void *ptr)
  1037. {
  1038. xen_reboot(SHUTDOWN_crash);
  1039. return NOTIFY_DONE;
  1040. }
  1041. static struct notifier_block xen_panic_block = {
  1042. .notifier_call= xen_panic_event,
  1043. };
  1044. int xen_panic_handler_init(void)
  1045. {
  1046. atomic_notifier_chain_register(&panic_notifier_list, &xen_panic_block);
  1047. return 0;
  1048. }
  1049. static const struct machine_ops xen_machine_ops __initconst = {
  1050. .restart = xen_restart,
  1051. .halt = xen_machine_halt,
  1052. .power_off = xen_machine_power_off,
  1053. .shutdown = xen_machine_halt,
  1054. .crash_shutdown = xen_crash_shutdown,
  1055. .emergency_restart = xen_emergency_restart,
  1056. };
  1057. /*
  1058. * Set up the GDT and segment registers for -fstack-protector. Until
  1059. * we do this, we have to be careful not to call any stack-protected
  1060. * function, which is most of the kernel.
  1061. */
  1062. static void __init xen_setup_stackprotector(void)
  1063. {
  1064. pv_cpu_ops.write_gdt_entry = xen_write_gdt_entry_boot;
  1065. pv_cpu_ops.load_gdt = xen_load_gdt_boot;
  1066. setup_stack_canary_segment(0);
  1067. switch_to_new_gdt(0);
  1068. pv_cpu_ops.write_gdt_entry = xen_write_gdt_entry;
  1069. pv_cpu_ops.load_gdt = xen_load_gdt;
  1070. }
  1071. /* First C function to be called on Xen boot */
  1072. asmlinkage void __init xen_start_kernel(void)
  1073. {
  1074. struct physdev_set_iopl set_iopl;
  1075. int rc;
  1076. if (!xen_start_info)
  1077. return;
  1078. xen_domain_type = XEN_PV_DOMAIN;
  1079. xen_setup_machphys_mapping();
  1080. /* Install Xen paravirt ops */
  1081. pv_info = xen_info;
  1082. pv_init_ops = xen_init_ops;
  1083. pv_cpu_ops = xen_cpu_ops;
  1084. pv_apic_ops = xen_apic_ops;
  1085. x86_init.resources.memory_setup = xen_memory_setup;
  1086. x86_init.oem.arch_setup = xen_arch_setup;
  1087. x86_init.oem.banner = xen_banner;
  1088. xen_init_time_ops();
  1089. /*
  1090. * Set up some pagetable state before starting to set any ptes.
  1091. */
  1092. xen_init_mmu_ops();
  1093. /* Prevent unwanted bits from being set in PTEs. */
  1094. __supported_pte_mask &= ~_PAGE_GLOBAL;
  1095. #if 0
  1096. if (!xen_initial_domain())
  1097. #endif
  1098. __supported_pte_mask &= ~(_PAGE_PWT | _PAGE_PCD);
  1099. __supported_pte_mask |= _PAGE_IOMAP;
  1100. /*
  1101. * Prevent page tables from being allocated in highmem, even
  1102. * if CONFIG_HIGHPTE is enabled.
  1103. */
  1104. __userpte_alloc_gfp &= ~__GFP_HIGHMEM;
  1105. /* Work out if we support NX */
  1106. x86_configure_nx();
  1107. xen_setup_features();
  1108. /* Get mfn list */
  1109. if (!xen_feature(XENFEAT_auto_translated_physmap))
  1110. xen_build_dynamic_phys_to_machine();
  1111. /*
  1112. * Set up kernel GDT and segment registers, mainly so that
  1113. * -fstack-protector code can be executed.
  1114. */
  1115. xen_setup_stackprotector();
  1116. xen_init_irq_ops();
  1117. xen_init_cpuid_mask();
  1118. #ifdef CONFIG_X86_LOCAL_APIC
  1119. /*
  1120. * set up the basic apic ops.
  1121. */
  1122. set_xen_basic_apic_ops();
  1123. #endif
  1124. if (xen_feature(XENFEAT_mmu_pt_update_preserve_ad)) {
  1125. pv_mmu_ops.ptep_modify_prot_start = xen_ptep_modify_prot_start;
  1126. pv_mmu_ops.ptep_modify_prot_commit = xen_ptep_modify_prot_commit;
  1127. }
  1128. machine_ops = xen_machine_ops;
  1129. /*
  1130. * The only reliable way to retain the initial address of the
  1131. * percpu gdt_page is to remember it here, so we can go and
  1132. * mark it RW later, when the initial percpu area is freed.
  1133. */
  1134. xen_initial_gdt = &per_cpu(gdt_page, 0);
  1135. xen_smp_init();
  1136. #ifdef CONFIG_ACPI_NUMA
  1137. /*
  1138. * The pages we from Xen are not related to machine pages, so
  1139. * any NUMA information the kernel tries to get from ACPI will
  1140. * be meaningless. Prevent it from trying.
  1141. */
  1142. acpi_numa = -1;
  1143. #endif
  1144. #ifdef CONFIG_X86_PAT
  1145. /*
  1146. * For right now disable the PAT. We should remove this once
  1147. * git commit 8eaffa67b43e99ae581622c5133e20b0f48bcef1
  1148. * (xen/pat: Disable PAT support for now) is reverted.
  1149. */
  1150. pat_enabled = 0;
  1151. #endif
  1152. /* Don't do the full vcpu_info placement stuff until we have a
  1153. possible map and a non-dummy shared_info. */
  1154. per_cpu(xen_vcpu, 0) = &HYPERVISOR_shared_info->vcpu_info[0];
  1155. local_irq_disable();
  1156. early_boot_irqs_disabled = true;
  1157. xen_raw_console_write("mapping kernel into physical memory\n");
  1158. xen_setup_kernel_pagetable((pgd_t *)xen_start_info->pt_base, xen_start_info->nr_pages);
  1159. /* Allocate and initialize top and mid mfn levels for p2m structure */
  1160. xen_build_mfn_list_list();
  1161. /* keep using Xen gdt for now; no urgent need to change it */
  1162. #ifdef CONFIG_X86_32
  1163. pv_info.kernel_rpl = 1;
  1164. if (xen_feature(XENFEAT_supervisor_mode_kernel))
  1165. pv_info.kernel_rpl = 0;
  1166. #else
  1167. pv_info.kernel_rpl = 0;
  1168. #endif
  1169. /* set the limit of our address space */
  1170. xen_reserve_top();
  1171. /* We used to do this in xen_arch_setup, but that is too late on AMD
  1172. * were early_cpu_init (run before ->arch_setup()) calls early_amd_init
  1173. * which pokes 0xcf8 port.
  1174. */
  1175. set_iopl.iopl = 1;
  1176. rc = HYPERVISOR_physdev_op(PHYSDEVOP_set_iopl, &set_iopl);
  1177. if (rc != 0)
  1178. xen_raw_printk("physdev_op failed %d\n", rc);
  1179. #ifdef CONFIG_X86_32
  1180. /* set up basic CPUID stuff */
  1181. cpu_detect(&new_cpu_data);
  1182. new_cpu_data.hard_math = 1;
  1183. new_cpu_data.wp_works_ok = 1;
  1184. new_cpu_data.x86_capability[0] = cpuid_edx(1);
  1185. #endif
  1186. /* Poke various useful things into boot_params */
  1187. boot_params.hdr.type_of_loader = (9 << 4) | 0;
  1188. boot_params.hdr.ramdisk_image = xen_start_info->mod_start
  1189. ? __pa(xen_start_info->mod_start) : 0;
  1190. boot_params.hdr.ramdisk_size = xen_start_info->mod_len;
  1191. boot_params.hdr.cmd_line_ptr = __pa(xen_start_info->cmd_line);
  1192. if (!xen_initial_domain()) {
  1193. add_preferred_console("xenboot", 0, NULL);
  1194. add_preferred_console("tty", 0, NULL);
  1195. add_preferred_console("hvc", 0, NULL);
  1196. if (pci_xen)
  1197. x86_init.pci.arch_init = pci_xen_init;
  1198. } else {
  1199. const struct dom0_vga_console_info *info =
  1200. (void *)((char *)xen_start_info +
  1201. xen_start_info->console.dom0.info_off);
  1202. struct xen_platform_op op = {
  1203. .cmd = XENPF_firmware_info,
  1204. .interface_version = XENPF_INTERFACE_VERSION,
  1205. .u.firmware_info.type = XEN_FW_KBD_SHIFT_FLAGS,
  1206. };
  1207. xen_init_vga(info, xen_start_info->console.dom0.info_size);
  1208. xen_start_info->console.domU.mfn = 0;
  1209. xen_start_info->console.domU.evtchn = 0;
  1210. if (HYPERVISOR_dom0_op(&op) == 0)
  1211. boot_params.kbd_status = op.u.firmware_info.u.kbd_shift_flags;
  1212. xen_init_apic();
  1213. /* Make sure ACS will be enabled */
  1214. pci_request_acs();
  1215. xen_acpi_sleep_register();
  1216. /* Avoid searching for BIOS MP tables */
  1217. x86_init.mpparse.find_smp_config = x86_init_noop;
  1218. x86_init.mpparse.get_smp_config = x86_init_uint_noop;
  1219. }
  1220. #ifdef CONFIG_PCI
  1221. /* PCI BIOS service won't work from a PV guest. */
  1222. pci_probe &= ~PCI_PROBE_BIOS;
  1223. #endif
  1224. xen_raw_console_write("about to get started...\n");
  1225. xen_setup_runstate_info(0);
  1226. /* Start the world */
  1227. #ifdef CONFIG_X86_32
  1228. i386_start_kernel();
  1229. #else
  1230. x86_64_start_reservations((char *)__pa_symbol(&boot_params));
  1231. #endif
  1232. }
  1233. void __ref xen_hvm_init_shared_info(void)
  1234. {
  1235. int cpu;
  1236. struct xen_add_to_physmap xatp;
  1237. static struct shared_info *shared_info_page = 0;
  1238. if (!shared_info_page)
  1239. shared_info_page = (struct shared_info *)
  1240. extend_brk(PAGE_SIZE, PAGE_SIZE);
  1241. xatp.domid = DOMID_SELF;
  1242. xatp.idx = 0;
  1243. xatp.space = XENMAPSPACE_shared_info;
  1244. xatp.gpfn = __pa(shared_info_page) >> PAGE_SHIFT;
  1245. if (HYPERVISOR_memory_op(XENMEM_add_to_physmap, &xatp))
  1246. BUG();
  1247. HYPERVISOR_shared_info = (struct shared_info *)shared_info_page;
  1248. /* xen_vcpu is a pointer to the vcpu_info struct in the shared_info
  1249. * page, we use it in the event channel upcall and in some pvclock
  1250. * related functions. We don't need the vcpu_info placement
  1251. * optimizations because we don't use any pv_mmu or pv_irq op on
  1252. * HVM.
  1253. * When xen_hvm_init_shared_info is run at boot time only vcpu 0 is
  1254. * online but xen_hvm_init_shared_info is run at resume time too and
  1255. * in that case multiple vcpus might be online. */
  1256. for_each_online_cpu(cpu) {
  1257. per_cpu(xen_vcpu, cpu) = &HYPERVISOR_shared_info->vcpu_info[cpu];
  1258. }
  1259. }
  1260. #ifdef CONFIG_XEN_PVHVM
  1261. static void __init init_hvm_pv_info(void)
  1262. {
  1263. int major, minor;
  1264. uint32_t eax, ebx, ecx, edx, pages, msr, base;
  1265. u64 pfn;
  1266. base = xen_cpuid_base();
  1267. cpuid(base + 1, &eax, &ebx, &ecx, &edx);
  1268. major = eax >> 16;
  1269. minor = eax & 0xffff;
  1270. printk(KERN_INFO "Xen version %d.%d.\n", major, minor);
  1271. cpuid(base + 2, &pages, &msr, &ecx, &edx);
  1272. pfn = __pa(hypercall_page);
  1273. wrmsr_safe(msr, (u32)pfn, (u32)(pfn >> 32));
  1274. xen_setup_features();
  1275. pv_info.name = "Xen HVM";
  1276. xen_domain_type = XEN_HVM_DOMAIN;
  1277. }
  1278. static int __cpuinit xen_hvm_cpu_notify(struct notifier_block *self,
  1279. unsigned long action, void *hcpu)
  1280. {
  1281. int cpu = (long)hcpu;
  1282. switch (action) {
  1283. case CPU_UP_PREPARE:
  1284. xen_vcpu_setup(cpu);
  1285. if (xen_have_vector_callback)
  1286. xen_init_lock_cpu(cpu);
  1287. break;
  1288. default:
  1289. break;
  1290. }
  1291. return NOTIFY_OK;
  1292. }
  1293. static struct notifier_block xen_hvm_cpu_notifier __cpuinitdata = {
  1294. .notifier_call = xen_hvm_cpu_notify,
  1295. };
  1296. static void __init xen_hvm_guest_init(void)
  1297. {
  1298. init_hvm_pv_info();
  1299. xen_hvm_init_shared_info();
  1300. if (xen_feature(XENFEAT_hvm_callback_vector))
  1301. xen_have_vector_callback = 1;
  1302. xen_hvm_smp_init();
  1303. register_cpu_notifier(&xen_hvm_cpu_notifier);
  1304. xen_unplug_emulated_devices();
  1305. x86_init.irqs.intr_init = xen_init_IRQ;
  1306. xen_hvm_init_time_ops();
  1307. xen_hvm_init_mmu_ops();
  1308. }
  1309. static bool __init xen_hvm_platform(void)
  1310. {
  1311. if (xen_pv_domain())
  1312. return false;
  1313. if (!xen_cpuid_base())
  1314. return false;
  1315. return true;
  1316. }
  1317. bool xen_hvm_need_lapic(void)
  1318. {
  1319. if (xen_pv_domain())
  1320. return false;
  1321. if (!xen_hvm_domain())
  1322. return false;
  1323. if (xen_feature(XENFEAT_hvm_pirqs) && xen_have_vector_callback)
  1324. return false;
  1325. return true;
  1326. }
  1327. EXPORT_SYMBOL_GPL(xen_hvm_need_lapic);
  1328. const struct hypervisor_x86 x86_hyper_xen_hvm __refconst = {
  1329. .name = "Xen HVM",
  1330. .detect = xen_hvm_platform,
  1331. .init_platform = xen_hvm_guest_init,
  1332. .x2apic_available = xen_x2apic_para_available,
  1333. };
  1334. EXPORT_SYMBOL(x86_hyper_xen_hvm);
  1335. #endif