boot.c 45 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244
  1. /*P:010
  2. * A hypervisor allows multiple Operating Systems to run on a single machine.
  3. * To quote David Wheeler: "Any problem in computer science can be solved with
  4. * another layer of indirection."
  5. *
  6. * We keep things simple in two ways. First, we start with a normal Linux
  7. * kernel and insert a module (lg.ko) which allows us to run other Linux
  8. * kernels the same way we'd run processes. We call the first kernel the Host,
  9. * and the others the Guests. The program which sets up and configures Guests
  10. * (such as the example in Documentation/lguest/lguest.c) is called the
  11. * Launcher.
  12. *
  13. * Secondly, we only run specially modified Guests, not normal kernels: setting
  14. * CONFIG_LGUEST_GUEST to "y" compiles this file into the kernel so it knows
  15. * how to be a Guest at boot time. This means that you can use the same kernel
  16. * you boot normally (ie. as a Host) as a Guest.
  17. *
  18. * These Guests know that they cannot do privileged operations, such as disable
  19. * interrupts, and that they have to ask the Host to do such things explicitly.
  20. * This file consists of all the replacements for such low-level native
  21. * hardware operations: these special Guest versions call the Host.
  22. *
  23. * So how does the kernel know it's a Guest? We'll see that later, but let's
  24. * just say that we end up here where we replace the native functions various
  25. * "paravirt" structures with our Guest versions, then boot like normal. :*/
  26. /*
  27. * Copyright (C) 2006, Rusty Russell <rusty@rustcorp.com.au> IBM Corporation.
  28. *
  29. * This program is free software; you can redistribute it and/or modify
  30. * it under the terms of the GNU General Public License as published by
  31. * the Free Software Foundation; either version 2 of the License, or
  32. * (at your option) any later version.
  33. *
  34. * This program is distributed in the hope that it will be useful, but
  35. * WITHOUT ANY WARRANTY; without even the implied warranty of
  36. * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
  37. * NON INFRINGEMENT. See the GNU General Public License for more
  38. * details.
  39. *
  40. * You should have received a copy of the GNU General Public License
  41. * along with this program; if not, write to the Free Software
  42. * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  43. */
  44. #include <linux/kernel.h>
  45. #include <linux/start_kernel.h>
  46. #include <linux/string.h>
  47. #include <linux/console.h>
  48. #include <linux/screen_info.h>
  49. #include <linux/irq.h>
  50. #include <linux/interrupt.h>
  51. #include <linux/clocksource.h>
  52. #include <linux/clockchips.h>
  53. #include <linux/lguest.h>
  54. #include <linux/lguest_launcher.h>
  55. #include <linux/virtio_console.h>
  56. #include <linux/pm.h>
  57. #include <asm/apic.h>
  58. #include <asm/lguest.h>
  59. #include <asm/paravirt.h>
  60. #include <asm/param.h>
  61. #include <asm/page.h>
  62. #include <asm/pgtable.h>
  63. #include <asm/desc.h>
  64. #include <asm/setup.h>
  65. #include <asm/e820.h>
  66. #include <asm/mce.h>
  67. #include <asm/io.h>
  68. #include <asm/i387.h>
  69. #include <asm/stackprotector.h>
  70. #include <asm/reboot.h> /* for struct machine_ops */
  71. /*G:010 Welcome to the Guest!
  72. *
  73. * The Guest in our tale is a simple creature: identical to the Host but
  74. * behaving in simplified but equivalent ways. In particular, the Guest is the
  75. * same kernel as the Host (or at least, built from the same source code). :*/
  76. struct lguest_data lguest_data = {
  77. .hcall_status = { [0 ... LHCALL_RING_SIZE-1] = 0xFF },
  78. .noirq_start = (u32)lguest_noirq_start,
  79. .noirq_end = (u32)lguest_noirq_end,
  80. .kernel_address = PAGE_OFFSET,
  81. .blocked_interrupts = { 1 }, /* Block timer interrupts */
  82. .syscall_vec = SYSCALL_VECTOR,
  83. };
  84. /*G:037 async_hcall() is pretty simple: I'm quite proud of it really. We have a
  85. * ring buffer of stored hypercalls which the Host will run though next time we
  86. * do a normal hypercall. Each entry in the ring has 5 slots for the hypercall
  87. * arguments, and a "hcall_status" word which is 0 if the call is ready to go,
  88. * and 255 once the Host has finished with it.
  89. *
  90. * If we come around to a slot which hasn't been finished, then the table is
  91. * full and we just make the hypercall directly. This has the nice side
  92. * effect of causing the Host to run all the stored calls in the ring buffer
  93. * which empties it for next time! */
  94. static void async_hcall(unsigned long call, unsigned long arg1,
  95. unsigned long arg2, unsigned long arg3,
  96. unsigned long arg4)
  97. {
  98. /* Note: This code assumes we're uniprocessor. */
  99. static unsigned int next_call;
  100. unsigned long flags;
  101. /* Disable interrupts if not already disabled: we don't want an
  102. * interrupt handler making a hypercall while we're already doing
  103. * one! */
  104. local_irq_save(flags);
  105. if (lguest_data.hcall_status[next_call] != 0xFF) {
  106. /* Table full, so do normal hcall which will flush table. */
  107. kvm_hypercall4(call, arg1, arg2, arg3, arg4);
  108. } else {
  109. lguest_data.hcalls[next_call].arg0 = call;
  110. lguest_data.hcalls[next_call].arg1 = arg1;
  111. lguest_data.hcalls[next_call].arg2 = arg2;
  112. lguest_data.hcalls[next_call].arg3 = arg3;
  113. lguest_data.hcalls[next_call].arg4 = arg4;
  114. /* Arguments must all be written before we mark it to go */
  115. wmb();
  116. lguest_data.hcall_status[next_call] = 0;
  117. if (++next_call == LHCALL_RING_SIZE)
  118. next_call = 0;
  119. }
  120. local_irq_restore(flags);
  121. }
  122. /*G:035 Notice the lazy_hcall() above, rather than hcall(). This is our first
  123. * real optimization trick!
  124. *
  125. * When lazy_mode is set, it means we're allowed to defer all hypercalls and do
  126. * them as a batch when lazy_mode is eventually turned off. Because hypercalls
  127. * are reasonably expensive, batching them up makes sense. For example, a
  128. * large munmap might update dozens of page table entries: that code calls
  129. * paravirt_enter_lazy_mmu(), does the dozen updates, then calls
  130. * lguest_leave_lazy_mode().
  131. *
  132. * So, when we're in lazy mode, we call async_hcall() to store the call for
  133. * future processing: */
  134. static void lazy_hcall1(unsigned long call,
  135. unsigned long arg1)
  136. {
  137. if (paravirt_get_lazy_mode() == PARAVIRT_LAZY_NONE)
  138. kvm_hypercall1(call, arg1);
  139. else
  140. async_hcall(call, arg1, 0, 0, 0);
  141. }
  142. static void lazy_hcall2(unsigned long call,
  143. unsigned long arg1,
  144. unsigned long arg2)
  145. {
  146. if (paravirt_get_lazy_mode() == PARAVIRT_LAZY_NONE)
  147. kvm_hypercall2(call, arg1, arg2);
  148. else
  149. async_hcall(call, arg1, arg2, 0, 0);
  150. }
  151. static void lazy_hcall3(unsigned long call,
  152. unsigned long arg1,
  153. unsigned long arg2,
  154. unsigned long arg3)
  155. {
  156. if (paravirt_get_lazy_mode() == PARAVIRT_LAZY_NONE)
  157. kvm_hypercall3(call, arg1, arg2, arg3);
  158. else
  159. async_hcall(call, arg1, arg2, arg3, 0);
  160. }
  161. #ifdef CONFIG_X86_PAE
  162. static void lazy_hcall4(unsigned long call,
  163. unsigned long arg1,
  164. unsigned long arg2,
  165. unsigned long arg3,
  166. unsigned long arg4)
  167. {
  168. if (paravirt_get_lazy_mode() == PARAVIRT_LAZY_NONE)
  169. kvm_hypercall4(call, arg1, arg2, arg3, arg4);
  170. else
  171. async_hcall(call, arg1, arg2, arg3, arg4);
  172. }
  173. #endif
  174. /* When lazy mode is turned off reset the per-cpu lazy mode variable and then
  175. * issue the do-nothing hypercall to flush any stored calls. */
  176. static void lguest_leave_lazy_mmu_mode(void)
  177. {
  178. kvm_hypercall0(LHCALL_FLUSH_ASYNC);
  179. paravirt_leave_lazy_mmu();
  180. }
  181. static void lguest_end_context_switch(struct task_struct *next)
  182. {
  183. kvm_hypercall0(LHCALL_FLUSH_ASYNC);
  184. paravirt_end_context_switch(next);
  185. }
  186. /*G:032
  187. * After that diversion we return to our first native-instruction
  188. * replacements: four functions for interrupt control.
  189. *
  190. * The simplest way of implementing these would be to have "turn interrupts
  191. * off" and "turn interrupts on" hypercalls. Unfortunately, this is too slow:
  192. * these are by far the most commonly called functions of those we override.
  193. *
  194. * So instead we keep an "irq_enabled" field inside our "struct lguest_data",
  195. * which the Guest can update with a single instruction. The Host knows to
  196. * check there before it tries to deliver an interrupt.
  197. */
  198. /* save_flags() is expected to return the processor state (ie. "flags"). The
  199. * flags word contains all kind of stuff, but in practice Linux only cares
  200. * about the interrupt flag. Our "save_flags()" just returns that. */
  201. static unsigned long save_fl(void)
  202. {
  203. return lguest_data.irq_enabled;
  204. }
  205. /* Interrupts go off... */
  206. static void irq_disable(void)
  207. {
  208. lguest_data.irq_enabled = 0;
  209. }
  210. /* Let's pause a moment. Remember how I said these are called so often?
  211. * Jeremy Fitzhardinge optimized them so hard early in 2009 that he had to
  212. * break some rules. In particular, these functions are assumed to save their
  213. * own registers if they need to: normal C functions assume they can trash the
  214. * eax register. To use normal C functions, we use
  215. * PV_CALLEE_SAVE_REGS_THUNK(), which pushes %eax onto the stack, calls the
  216. * C function, then restores it. */
  217. PV_CALLEE_SAVE_REGS_THUNK(save_fl);
  218. PV_CALLEE_SAVE_REGS_THUNK(irq_disable);
  219. /*:*/
  220. /* These are in i386_head.S */
  221. extern void lg_irq_enable(void);
  222. extern void lg_restore_fl(unsigned long flags);
  223. /*M:003 Note that we don't check for outstanding interrupts when we re-enable
  224. * them (or when we unmask an interrupt). This seems to work for the moment,
  225. * since interrupts are rare and we'll just get the interrupt on the next timer
  226. * tick, but now we can run with CONFIG_NO_HZ, we should revisit this. One way
  227. * would be to put the "irq_enabled" field in a page by itself, and have the
  228. * Host write-protect it when an interrupt comes in when irqs are disabled.
  229. * There will then be a page fault as soon as interrupts are re-enabled.
  230. *
  231. * A better method is to implement soft interrupt disable generally for x86:
  232. * instead of disabling interrupts, we set a flag. If an interrupt does come
  233. * in, we then disable them for real. This is uncommon, so we could simply use
  234. * a hypercall for interrupt control and not worry about efficiency. :*/
  235. /*G:034
  236. * The Interrupt Descriptor Table (IDT).
  237. *
  238. * The IDT tells the processor what to do when an interrupt comes in. Each
  239. * entry in the table is a 64-bit descriptor: this holds the privilege level,
  240. * address of the handler, and... well, who cares? The Guest just asks the
  241. * Host to make the change anyway, because the Host controls the real IDT.
  242. */
  243. static void lguest_write_idt_entry(gate_desc *dt,
  244. int entrynum, const gate_desc *g)
  245. {
  246. /* The gate_desc structure is 8 bytes long: we hand it to the Host in
  247. * two 32-bit chunks. The whole 32-bit kernel used to hand descriptors
  248. * around like this; typesafety wasn't a big concern in Linux's early
  249. * years. */
  250. u32 *desc = (u32 *)g;
  251. /* Keep the local copy up to date. */
  252. native_write_idt_entry(dt, entrynum, g);
  253. /* Tell Host about this new entry. */
  254. kvm_hypercall3(LHCALL_LOAD_IDT_ENTRY, entrynum, desc[0], desc[1]);
  255. }
  256. /* Changing to a different IDT is very rare: we keep the IDT up-to-date every
  257. * time it is written, so we can simply loop through all entries and tell the
  258. * Host about them. */
  259. static void lguest_load_idt(const struct desc_ptr *desc)
  260. {
  261. unsigned int i;
  262. struct desc_struct *idt = (void *)desc->address;
  263. for (i = 0; i < (desc->size+1)/8; i++)
  264. kvm_hypercall3(LHCALL_LOAD_IDT_ENTRY, i, idt[i].a, idt[i].b);
  265. }
  266. /*
  267. * The Global Descriptor Table.
  268. *
  269. * The Intel architecture defines another table, called the Global Descriptor
  270. * Table (GDT). You tell the CPU where it is (and its size) using the "lgdt"
  271. * instruction, and then several other instructions refer to entries in the
  272. * table. There are three entries which the Switcher needs, so the Host simply
  273. * controls the entire thing and the Guest asks it to make changes using the
  274. * LOAD_GDT hypercall.
  275. *
  276. * This is the exactly like the IDT code.
  277. */
  278. static void lguest_load_gdt(const struct desc_ptr *desc)
  279. {
  280. unsigned int i;
  281. struct desc_struct *gdt = (void *)desc->address;
  282. for (i = 0; i < (desc->size+1)/8; i++)
  283. kvm_hypercall3(LHCALL_LOAD_GDT_ENTRY, i, gdt[i].a, gdt[i].b);
  284. }
  285. /* For a single GDT entry which changes, we do the lazy thing: alter our GDT,
  286. * then tell the Host to reload the entire thing. This operation is so rare
  287. * that this naive implementation is reasonable. */
  288. static void lguest_write_gdt_entry(struct desc_struct *dt, int entrynum,
  289. const void *desc, int type)
  290. {
  291. native_write_gdt_entry(dt, entrynum, desc, type);
  292. /* Tell Host about this new entry. */
  293. kvm_hypercall3(LHCALL_LOAD_GDT_ENTRY, entrynum,
  294. dt[entrynum].a, dt[entrynum].b);
  295. }
  296. /* OK, I lied. There are three "thread local storage" GDT entries which change
  297. * on every context switch (these three entries are how glibc implements
  298. * __thread variables). So we have a hypercall specifically for this case. */
  299. static void lguest_load_tls(struct thread_struct *t, unsigned int cpu)
  300. {
  301. /* There's one problem which normal hardware doesn't have: the Host
  302. * can't handle us removing entries we're currently using. So we clear
  303. * the GS register here: if it's needed it'll be reloaded anyway. */
  304. lazy_load_gs(0);
  305. lazy_hcall2(LHCALL_LOAD_TLS, __pa(&t->tls_array), cpu);
  306. }
  307. /*G:038 That's enough excitement for now, back to ploughing through each of
  308. * the different pv_ops structures (we're about 1/3 of the way through).
  309. *
  310. * This is the Local Descriptor Table, another weird Intel thingy. Linux only
  311. * uses this for some strange applications like Wine. We don't do anything
  312. * here, so they'll get an informative and friendly Segmentation Fault. */
  313. static void lguest_set_ldt(const void *addr, unsigned entries)
  314. {
  315. }
  316. /* This loads a GDT entry into the "Task Register": that entry points to a
  317. * structure called the Task State Segment. Some comments scattered though the
  318. * kernel code indicate that this used for task switching in ages past, along
  319. * with blood sacrifice and astrology.
  320. *
  321. * Now there's nothing interesting in here that we don't get told elsewhere.
  322. * But the native version uses the "ltr" instruction, which makes the Host
  323. * complain to the Guest about a Segmentation Fault and it'll oops. So we
  324. * override the native version with a do-nothing version. */
  325. static void lguest_load_tr_desc(void)
  326. {
  327. }
  328. /* The "cpuid" instruction is a way of querying both the CPU identity
  329. * (manufacturer, model, etc) and its features. It was introduced before the
  330. * Pentium in 1993 and keeps getting extended by both Intel, AMD and others.
  331. * As you might imagine, after a decade and a half this treatment, it is now a
  332. * giant ball of hair. Its entry in the current Intel manual runs to 28 pages.
  333. *
  334. * This instruction even it has its own Wikipedia entry. The Wikipedia entry
  335. * has been translated into 4 languages. I am not making this up!
  336. *
  337. * We could get funky here and identify ourselves as "GenuineLguest", but
  338. * instead we just use the real "cpuid" instruction. Then I pretty much turned
  339. * off feature bits until the Guest booted. (Don't say that: you'll damage
  340. * lguest sales!) Shut up, inner voice! (Hey, just pointing out that this is
  341. * hardly future proof.) Noone's listening! They don't like you anyway,
  342. * parenthetic weirdo!
  343. *
  344. * Replacing the cpuid so we can turn features off is great for the kernel, but
  345. * anyone (including userspace) can just use the raw "cpuid" instruction and
  346. * the Host won't even notice since it isn't privileged. So we try not to get
  347. * too worked up about it. */
  348. static void lguest_cpuid(unsigned int *ax, unsigned int *bx,
  349. unsigned int *cx, unsigned int *dx)
  350. {
  351. int function = *ax;
  352. native_cpuid(ax, bx, cx, dx);
  353. switch (function) {
  354. case 0: /* ID and highest CPUID. Futureproof a little by sticking to
  355. * older ones. */
  356. if (*ax > 5)
  357. *ax = 5;
  358. break;
  359. case 1: /* Basic feature request. */
  360. /* We only allow kernel to see SSE3, CMPXCHG16B and SSSE3 */
  361. *cx &= 0x00002201;
  362. /* SSE, SSE2, FXSR, MMX, CMOV, CMPXCHG8B, TSC, FPU, PAE. */
  363. *dx &= 0x07808151;
  364. /* The Host can do a nice optimization if it knows that the
  365. * kernel mappings (addresses above 0xC0000000 or whatever
  366. * PAGE_OFFSET is set to) haven't changed. But Linux calls
  367. * flush_tlb_user() for both user and kernel mappings unless
  368. * the Page Global Enable (PGE) feature bit is set. */
  369. *dx |= 0x00002000;
  370. /* We also lie, and say we're family id 5. 6 or greater
  371. * leads to a rdmsr in early_init_intel which we can't handle.
  372. * Family ID is returned as bits 8-12 in ax. */
  373. *ax &= 0xFFFFF0FF;
  374. *ax |= 0x00000500;
  375. break;
  376. case 0x80000000:
  377. /* Futureproof this a little: if they ask how much extended
  378. * processor information there is, limit it to known fields. */
  379. if (*ax > 0x80000008)
  380. *ax = 0x80000008;
  381. break;
  382. case 0x80000001:
  383. /* Here we should fix nx cap depending on host. */
  384. /* For this version of PAE, we just clear NX bit. */
  385. *dx &= ~(1 << 20);
  386. break;
  387. }
  388. }
  389. /* Intel has four control registers, imaginatively named cr0, cr2, cr3 and cr4.
  390. * I assume there's a cr1, but it hasn't bothered us yet, so we'll not bother
  391. * it. The Host needs to know when the Guest wants to change them, so we have
  392. * a whole series of functions like read_cr0() and write_cr0().
  393. *
  394. * We start with cr0. cr0 allows you to turn on and off all kinds of basic
  395. * features, but Linux only really cares about one: the horrifically-named Task
  396. * Switched (TS) bit at bit 3 (ie. 8)
  397. *
  398. * What does the TS bit do? Well, it causes the CPU to trap (interrupt 7) if
  399. * the floating point unit is used. Which allows us to restore FPU state
  400. * lazily after a task switch, and Linux uses that gratefully, but wouldn't a
  401. * name like "FPUTRAP bit" be a little less cryptic?
  402. *
  403. * We store cr0 locally because the Host never changes it. The Guest sometimes
  404. * wants to read it and we'd prefer not to bother the Host unnecessarily. */
  405. static unsigned long current_cr0;
  406. static void lguest_write_cr0(unsigned long val)
  407. {
  408. lazy_hcall1(LHCALL_TS, val & X86_CR0_TS);
  409. current_cr0 = val;
  410. }
  411. static unsigned long lguest_read_cr0(void)
  412. {
  413. return current_cr0;
  414. }
  415. /* Intel provided a special instruction to clear the TS bit for people too cool
  416. * to use write_cr0() to do it. This "clts" instruction is faster, because all
  417. * the vowels have been optimized out. */
  418. static void lguest_clts(void)
  419. {
  420. lazy_hcall1(LHCALL_TS, 0);
  421. current_cr0 &= ~X86_CR0_TS;
  422. }
  423. /* cr2 is the virtual address of the last page fault, which the Guest only ever
  424. * reads. The Host kindly writes this into our "struct lguest_data", so we
  425. * just read it out of there. */
  426. static unsigned long lguest_read_cr2(void)
  427. {
  428. return lguest_data.cr2;
  429. }
  430. /* See lguest_set_pte() below. */
  431. static bool cr3_changed = false;
  432. /* cr3 is the current toplevel pagetable page: the principle is the same as
  433. * cr0. Keep a local copy, and tell the Host when it changes. The only
  434. * difference is that our local copy is in lguest_data because the Host needs
  435. * to set it upon our initial hypercall. */
  436. static void lguest_write_cr3(unsigned long cr3)
  437. {
  438. lguest_data.pgdir = cr3;
  439. lazy_hcall1(LHCALL_NEW_PGTABLE, cr3);
  440. cr3_changed = true;
  441. }
  442. static unsigned long lguest_read_cr3(void)
  443. {
  444. return lguest_data.pgdir;
  445. }
  446. /* cr4 is used to enable and disable PGE, but we don't care. */
  447. static unsigned long lguest_read_cr4(void)
  448. {
  449. return 0;
  450. }
  451. static void lguest_write_cr4(unsigned long val)
  452. {
  453. }
  454. /*
  455. * Page Table Handling.
  456. *
  457. * Now would be a good time to take a rest and grab a coffee or similarly
  458. * relaxing stimulant. The easy parts are behind us, and the trek gradually
  459. * winds uphill from here.
  460. *
  461. * Quick refresher: memory is divided into "pages" of 4096 bytes each. The CPU
  462. * maps virtual addresses to physical addresses using "page tables". We could
  463. * use one huge index of 1 million entries: each address is 4 bytes, so that's
  464. * 1024 pages just to hold the page tables. But since most virtual addresses
  465. * are unused, we use a two level index which saves space. The cr3 register
  466. * contains the physical address of the top level "page directory" page, which
  467. * contains physical addresses of up to 1024 second-level pages. Each of these
  468. * second level pages contains up to 1024 physical addresses of actual pages,
  469. * or Page Table Entries (PTEs).
  470. *
  471. * Here's a diagram, where arrows indicate physical addresses:
  472. *
  473. * cr3 ---> +---------+
  474. * | --------->+---------+
  475. * | | | PADDR1 |
  476. * Top-level | | PADDR2 |
  477. * (PMD) page | | |
  478. * | | Lower-level |
  479. * | | (PTE) page |
  480. * | | | |
  481. * .... ....
  482. *
  483. * So to convert a virtual address to a physical address, we look up the top
  484. * level, which points us to the second level, which gives us the physical
  485. * address of that page. If the top level entry was not present, or the second
  486. * level entry was not present, then the virtual address is invalid (we
  487. * say "the page was not mapped").
  488. *
  489. * Put another way, a 32-bit virtual address is divided up like so:
  490. *
  491. * 1 1 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
  492. * |<---- 10 bits ---->|<---- 10 bits ---->|<------ 12 bits ------>|
  493. * Index into top Index into second Offset within page
  494. * page directory page pagetable page
  495. *
  496. * The kernel spends a lot of time changing both the top-level page directory
  497. * and lower-level pagetable pages. The Guest doesn't know physical addresses,
  498. * so while it maintains these page tables exactly like normal, it also needs
  499. * to keep the Host informed whenever it makes a change: the Host will create
  500. * the real page tables based on the Guests'.
  501. */
  502. /* The Guest calls this to set a second-level entry (pte), ie. to map a page
  503. * into a process' address space. We set the entry then tell the Host the
  504. * toplevel and address this corresponds to. The Guest uses one pagetable per
  505. * process, so we need to tell the Host which one we're changing (mm->pgd). */
  506. static void lguest_pte_update(struct mm_struct *mm, unsigned long addr,
  507. pte_t *ptep)
  508. {
  509. #ifdef CONFIG_X86_PAE
  510. lazy_hcall4(LHCALL_SET_PTE, __pa(mm->pgd), addr,
  511. ptep->pte_low, ptep->pte_high);
  512. #else
  513. lazy_hcall3(LHCALL_SET_PTE, __pa(mm->pgd), addr, ptep->pte_low);
  514. #endif
  515. }
  516. static void lguest_set_pte_at(struct mm_struct *mm, unsigned long addr,
  517. pte_t *ptep, pte_t pteval)
  518. {
  519. native_set_pte(ptep, pteval);
  520. lguest_pte_update(mm, addr, ptep);
  521. }
  522. /* The Guest calls lguest_set_pud to set a top-level entry and lguest_set_pmd
  523. * to set a middle-level entry when PAE is activated.
  524. * Again, we set the entry then tell the Host which page we changed,
  525. * and the index of the entry we changed. */
  526. #ifdef CONFIG_X86_PAE
  527. static void lguest_set_pud(pud_t *pudp, pud_t pudval)
  528. {
  529. native_set_pud(pudp, pudval);
  530. /* 32 bytes aligned pdpt address and the index. */
  531. lazy_hcall2(LHCALL_SET_PGD, __pa(pudp) & 0xFFFFFFE0,
  532. (__pa(pudp) & 0x1F) / sizeof(pud_t));
  533. }
  534. static void lguest_set_pmd(pmd_t *pmdp, pmd_t pmdval)
  535. {
  536. native_set_pmd(pmdp, pmdval);
  537. lazy_hcall2(LHCALL_SET_PMD, __pa(pmdp) & PAGE_MASK,
  538. (__pa(pmdp) & (PAGE_SIZE - 1)) / sizeof(pmd_t));
  539. }
  540. #else
  541. /* The Guest calls lguest_set_pmd to set a top-level entry when PAE is not
  542. * activated. */
  543. static void lguest_set_pmd(pmd_t *pmdp, pmd_t pmdval)
  544. {
  545. native_set_pmd(pmdp, pmdval);
  546. lazy_hcall2(LHCALL_SET_PGD, __pa(pmdp) & PAGE_MASK,
  547. (__pa(pmdp) & (PAGE_SIZE - 1)) / sizeof(pmd_t));
  548. }
  549. #endif
  550. /* There are a couple of legacy places where the kernel sets a PTE, but we
  551. * don't know the top level any more. This is useless for us, since we don't
  552. * know which pagetable is changing or what address, so we just tell the Host
  553. * to forget all of them. Fortunately, this is very rare.
  554. *
  555. * ... except in early boot when the kernel sets up the initial pagetables,
  556. * which makes booting astonishingly slow: 1.83 seconds! So we don't even tell
  557. * the Host anything changed until we've done the first page table switch,
  558. * which brings boot back to 0.25 seconds. */
  559. static void lguest_set_pte(pte_t *ptep, pte_t pteval)
  560. {
  561. native_set_pte(ptep, pteval);
  562. if (cr3_changed)
  563. lazy_hcall1(LHCALL_FLUSH_TLB, 1);
  564. }
  565. #ifdef CONFIG_X86_PAE
  566. static void lguest_set_pte_atomic(pte_t *ptep, pte_t pte)
  567. {
  568. native_set_pte_atomic(ptep, pte);
  569. if (cr3_changed)
  570. lazy_hcall1(LHCALL_FLUSH_TLB, 1);
  571. }
  572. void lguest_pte_clear(struct mm_struct *mm, unsigned long addr, pte_t *ptep)
  573. {
  574. native_pte_clear(mm, addr, ptep);
  575. lguest_pte_update(mm, addr, ptep);
  576. }
  577. void lguest_pmd_clear(pmd_t *pmdp)
  578. {
  579. lguest_set_pmd(pmdp, __pmd(0));
  580. }
  581. #endif
  582. /* Unfortunately for Lguest, the pv_mmu_ops for page tables were based on
  583. * native page table operations. On native hardware you can set a new page
  584. * table entry whenever you want, but if you want to remove one you have to do
  585. * a TLB flush (a TLB is a little cache of page table entries kept by the CPU).
  586. *
  587. * So the lguest_set_pte_at() and lguest_set_pmd() functions above are only
  588. * called when a valid entry is written, not when it's removed (ie. marked not
  589. * present). Instead, this is where we come when the Guest wants to remove a
  590. * page table entry: we tell the Host to set that entry to 0 (ie. the present
  591. * bit is zero). */
  592. static void lguest_flush_tlb_single(unsigned long addr)
  593. {
  594. /* Simply set it to zero: if it was not, it will fault back in. */
  595. lazy_hcall3(LHCALL_SET_PTE, lguest_data.pgdir, addr, 0);
  596. }
  597. /* This is what happens after the Guest has removed a large number of entries.
  598. * This tells the Host that any of the page table entries for userspace might
  599. * have changed, ie. virtual addresses below PAGE_OFFSET. */
  600. static void lguest_flush_tlb_user(void)
  601. {
  602. lazy_hcall1(LHCALL_FLUSH_TLB, 0);
  603. }
  604. /* This is called when the kernel page tables have changed. That's not very
  605. * common (unless the Guest is using highmem, which makes the Guest extremely
  606. * slow), so it's worth separating this from the user flushing above. */
  607. static void lguest_flush_tlb_kernel(void)
  608. {
  609. lazy_hcall1(LHCALL_FLUSH_TLB, 1);
  610. }
  611. /*
  612. * The Unadvanced Programmable Interrupt Controller.
  613. *
  614. * This is an attempt to implement the simplest possible interrupt controller.
  615. * I spent some time looking though routines like set_irq_chip_and_handler,
  616. * set_irq_chip_and_handler_name, set_irq_chip_data and set_phasers_to_stun and
  617. * I *think* this is as simple as it gets.
  618. *
  619. * We can tell the Host what interrupts we want blocked ready for using the
  620. * lguest_data.interrupts bitmap, so disabling (aka "masking") them is as
  621. * simple as setting a bit. We don't actually "ack" interrupts as such, we
  622. * just mask and unmask them. I wonder if we should be cleverer?
  623. */
  624. static void disable_lguest_irq(unsigned int irq)
  625. {
  626. set_bit(irq, lguest_data.blocked_interrupts);
  627. }
  628. static void enable_lguest_irq(unsigned int irq)
  629. {
  630. clear_bit(irq, lguest_data.blocked_interrupts);
  631. }
  632. /* This structure describes the lguest IRQ controller. */
  633. static struct irq_chip lguest_irq_controller = {
  634. .name = "lguest",
  635. .mask = disable_lguest_irq,
  636. .mask_ack = disable_lguest_irq,
  637. .unmask = enable_lguest_irq,
  638. };
  639. /* This sets up the Interrupt Descriptor Table (IDT) entry for each hardware
  640. * interrupt (except 128, which is used for system calls), and then tells the
  641. * Linux infrastructure that each interrupt is controlled by our level-based
  642. * lguest interrupt controller. */
  643. static void __init lguest_init_IRQ(void)
  644. {
  645. unsigned int i;
  646. for (i = FIRST_EXTERNAL_VECTOR; i < NR_VECTORS; i++) {
  647. /* Some systems map "vectors" to interrupts weirdly. Lguest has
  648. * a straightforward 1 to 1 mapping, so force that here. */
  649. __get_cpu_var(vector_irq)[i] = i - FIRST_EXTERNAL_VECTOR;
  650. if (i != SYSCALL_VECTOR)
  651. set_intr_gate(i, interrupt[i - FIRST_EXTERNAL_VECTOR]);
  652. }
  653. /* This call is required to set up for 4k stacks, where we have
  654. * separate stacks for hard and soft interrupts. */
  655. irq_ctx_init(smp_processor_id());
  656. }
  657. void lguest_setup_irq(unsigned int irq)
  658. {
  659. irq_to_desc_alloc_node(irq, 0);
  660. set_irq_chip_and_handler_name(irq, &lguest_irq_controller,
  661. handle_level_irq, "level");
  662. }
  663. /*
  664. * Time.
  665. *
  666. * It would be far better for everyone if the Guest had its own clock, but
  667. * until then the Host gives us the time on every interrupt.
  668. */
  669. static unsigned long lguest_get_wallclock(void)
  670. {
  671. return lguest_data.time.tv_sec;
  672. }
  673. /* The TSC is an Intel thing called the Time Stamp Counter. The Host tells us
  674. * what speed it runs at, or 0 if it's unusable as a reliable clock source.
  675. * This matches what we want here: if we return 0 from this function, the x86
  676. * TSC clock will give up and not register itself. */
  677. static unsigned long lguest_tsc_khz(void)
  678. {
  679. return lguest_data.tsc_khz;
  680. }
  681. /* If we can't use the TSC, the kernel falls back to our lower-priority
  682. * "lguest_clock", where we read the time value given to us by the Host. */
  683. static cycle_t lguest_clock_read(struct clocksource *cs)
  684. {
  685. unsigned long sec, nsec;
  686. /* Since the time is in two parts (seconds and nanoseconds), we risk
  687. * reading it just as it's changing from 99 & 0.999999999 to 100 and 0,
  688. * and getting 99 and 0. As Linux tends to come apart under the stress
  689. * of time travel, we must be careful: */
  690. do {
  691. /* First we read the seconds part. */
  692. sec = lguest_data.time.tv_sec;
  693. /* This read memory barrier tells the compiler and the CPU that
  694. * this can't be reordered: we have to complete the above
  695. * before going on. */
  696. rmb();
  697. /* Now we read the nanoseconds part. */
  698. nsec = lguest_data.time.tv_nsec;
  699. /* Make sure we've done that. */
  700. rmb();
  701. /* Now if the seconds part has changed, try again. */
  702. } while (unlikely(lguest_data.time.tv_sec != sec));
  703. /* Our lguest clock is in real nanoseconds. */
  704. return sec*1000000000ULL + nsec;
  705. }
  706. /* This is the fallback clocksource: lower priority than the TSC clocksource. */
  707. static struct clocksource lguest_clock = {
  708. .name = "lguest",
  709. .rating = 200,
  710. .read = lguest_clock_read,
  711. .mask = CLOCKSOURCE_MASK(64),
  712. .mult = 1 << 22,
  713. .shift = 22,
  714. .flags = CLOCK_SOURCE_IS_CONTINUOUS,
  715. };
  716. /* We also need a "struct clock_event_device": Linux asks us to set it to go
  717. * off some time in the future. Actually, James Morris figured all this out, I
  718. * just applied the patch. */
  719. static int lguest_clockevent_set_next_event(unsigned long delta,
  720. struct clock_event_device *evt)
  721. {
  722. /* FIXME: I don't think this can ever happen, but James tells me he had
  723. * to put this code in. Maybe we should remove it now. Anyone? */
  724. if (delta < LG_CLOCK_MIN_DELTA) {
  725. if (printk_ratelimit())
  726. printk(KERN_DEBUG "%s: small delta %lu ns\n",
  727. __func__, delta);
  728. return -ETIME;
  729. }
  730. /* Please wake us this far in the future. */
  731. kvm_hypercall1(LHCALL_SET_CLOCKEVENT, delta);
  732. return 0;
  733. }
  734. static void lguest_clockevent_set_mode(enum clock_event_mode mode,
  735. struct clock_event_device *evt)
  736. {
  737. switch (mode) {
  738. case CLOCK_EVT_MODE_UNUSED:
  739. case CLOCK_EVT_MODE_SHUTDOWN:
  740. /* A 0 argument shuts the clock down. */
  741. kvm_hypercall0(LHCALL_SET_CLOCKEVENT);
  742. break;
  743. case CLOCK_EVT_MODE_ONESHOT:
  744. /* This is what we expect. */
  745. break;
  746. case CLOCK_EVT_MODE_PERIODIC:
  747. BUG();
  748. case CLOCK_EVT_MODE_RESUME:
  749. break;
  750. }
  751. }
  752. /* This describes our primitive timer chip. */
  753. static struct clock_event_device lguest_clockevent = {
  754. .name = "lguest",
  755. .features = CLOCK_EVT_FEAT_ONESHOT,
  756. .set_next_event = lguest_clockevent_set_next_event,
  757. .set_mode = lguest_clockevent_set_mode,
  758. .rating = INT_MAX,
  759. .mult = 1,
  760. .shift = 0,
  761. .min_delta_ns = LG_CLOCK_MIN_DELTA,
  762. .max_delta_ns = LG_CLOCK_MAX_DELTA,
  763. };
  764. /* This is the Guest timer interrupt handler (hardware interrupt 0). We just
  765. * call the clockevent infrastructure and it does whatever needs doing. */
  766. static void lguest_time_irq(unsigned int irq, struct irq_desc *desc)
  767. {
  768. unsigned long flags;
  769. /* Don't interrupt us while this is running. */
  770. local_irq_save(flags);
  771. lguest_clockevent.event_handler(&lguest_clockevent);
  772. local_irq_restore(flags);
  773. }
  774. /* At some point in the boot process, we get asked to set up our timing
  775. * infrastructure. The kernel doesn't expect timer interrupts before this, but
  776. * we cleverly initialized the "blocked_interrupts" field of "struct
  777. * lguest_data" so that timer interrupts were blocked until now. */
  778. static void lguest_time_init(void)
  779. {
  780. /* Set up the timer interrupt (0) to go to our simple timer routine */
  781. set_irq_handler(0, lguest_time_irq);
  782. clocksource_register(&lguest_clock);
  783. /* We can't set cpumask in the initializer: damn C limitations! Set it
  784. * here and register our timer device. */
  785. lguest_clockevent.cpumask = cpumask_of(0);
  786. clockevents_register_device(&lguest_clockevent);
  787. /* Finally, we unblock the timer interrupt. */
  788. enable_lguest_irq(0);
  789. }
  790. /*
  791. * Miscellaneous bits and pieces.
  792. *
  793. * Here is an oddball collection of functions which the Guest needs for things
  794. * to work. They're pretty simple.
  795. */
  796. /* The Guest needs to tell the Host what stack it expects traps to use. For
  797. * native hardware, this is part of the Task State Segment mentioned above in
  798. * lguest_load_tr_desc(), but to help hypervisors there's this special call.
  799. *
  800. * We tell the Host the segment we want to use (__KERNEL_DS is the kernel data
  801. * segment), the privilege level (we're privilege level 1, the Host is 0 and
  802. * will not tolerate us trying to use that), the stack pointer, and the number
  803. * of pages in the stack. */
  804. static void lguest_load_sp0(struct tss_struct *tss,
  805. struct thread_struct *thread)
  806. {
  807. lazy_hcall3(LHCALL_SET_STACK, __KERNEL_DS | 0x1, thread->sp0,
  808. THREAD_SIZE / PAGE_SIZE);
  809. }
  810. /* Let's just say, I wouldn't do debugging under a Guest. */
  811. static void lguest_set_debugreg(int regno, unsigned long value)
  812. {
  813. /* FIXME: Implement */
  814. }
  815. /* There are times when the kernel wants to make sure that no memory writes are
  816. * caught in the cache (that they've all reached real hardware devices). This
  817. * doesn't matter for the Guest which has virtual hardware.
  818. *
  819. * On the Pentium 4 and above, cpuid() indicates that the Cache Line Flush
  820. * (clflush) instruction is available and the kernel uses that. Otherwise, it
  821. * uses the older "Write Back and Invalidate Cache" (wbinvd) instruction.
  822. * Unlike clflush, wbinvd can only be run at privilege level 0. So we can
  823. * ignore clflush, but replace wbinvd.
  824. */
  825. static void lguest_wbinvd(void)
  826. {
  827. }
  828. /* If the Guest expects to have an Advanced Programmable Interrupt Controller,
  829. * we play dumb by ignoring writes and returning 0 for reads. So it's no
  830. * longer Programmable nor Controlling anything, and I don't think 8 lines of
  831. * code qualifies for Advanced. It will also never interrupt anything. It
  832. * does, however, allow us to get through the Linux boot code. */
  833. #ifdef CONFIG_X86_LOCAL_APIC
  834. static void lguest_apic_write(u32 reg, u32 v)
  835. {
  836. }
  837. static u32 lguest_apic_read(u32 reg)
  838. {
  839. return 0;
  840. }
  841. static u64 lguest_apic_icr_read(void)
  842. {
  843. return 0;
  844. }
  845. static void lguest_apic_icr_write(u32 low, u32 id)
  846. {
  847. /* Warn to see if there's any stray references */
  848. WARN_ON(1);
  849. }
  850. static void lguest_apic_wait_icr_idle(void)
  851. {
  852. return;
  853. }
  854. static u32 lguest_apic_safe_wait_icr_idle(void)
  855. {
  856. return 0;
  857. }
  858. static void set_lguest_basic_apic_ops(void)
  859. {
  860. apic->read = lguest_apic_read;
  861. apic->write = lguest_apic_write;
  862. apic->icr_read = lguest_apic_icr_read;
  863. apic->icr_write = lguest_apic_icr_write;
  864. apic->wait_icr_idle = lguest_apic_wait_icr_idle;
  865. apic->safe_wait_icr_idle = lguest_apic_safe_wait_icr_idle;
  866. };
  867. #endif
  868. /* STOP! Until an interrupt comes in. */
  869. static void lguest_safe_halt(void)
  870. {
  871. kvm_hypercall0(LHCALL_HALT);
  872. }
  873. /* The SHUTDOWN hypercall takes a string to describe what's happening, and
  874. * an argument which says whether this to restart (reboot) the Guest or not.
  875. *
  876. * Note that the Host always prefers that the Guest speak in physical addresses
  877. * rather than virtual addresses, so we use __pa() here. */
  878. static void lguest_power_off(void)
  879. {
  880. kvm_hypercall2(LHCALL_SHUTDOWN, __pa("Power down"),
  881. LGUEST_SHUTDOWN_POWEROFF);
  882. }
  883. /*
  884. * Panicing.
  885. *
  886. * Don't. But if you did, this is what happens.
  887. */
  888. static int lguest_panic(struct notifier_block *nb, unsigned long l, void *p)
  889. {
  890. kvm_hypercall2(LHCALL_SHUTDOWN, __pa(p), LGUEST_SHUTDOWN_POWEROFF);
  891. /* The hcall won't return, but to keep gcc happy, we're "done". */
  892. return NOTIFY_DONE;
  893. }
  894. static struct notifier_block paniced = {
  895. .notifier_call = lguest_panic
  896. };
  897. /* Setting up memory is fairly easy. */
  898. static __init char *lguest_memory_setup(void)
  899. {
  900. /* We do this here and not earlier because lockcheck used to barf if we
  901. * did it before start_kernel(). I think we fixed that, so it'd be
  902. * nice to move it back to lguest_init. Patch welcome... */
  903. atomic_notifier_chain_register(&panic_notifier_list, &paniced);
  904. /* The Linux bootloader header contains an "e820" memory map: the
  905. * Launcher populated the first entry with our memory limit. */
  906. e820_add_region(boot_params.e820_map[0].addr,
  907. boot_params.e820_map[0].size,
  908. boot_params.e820_map[0].type);
  909. /* This string is for the boot messages. */
  910. return "LGUEST";
  911. }
  912. /* We will eventually use the virtio console device to produce console output,
  913. * but before that is set up we use LHCALL_NOTIFY on normal memory to produce
  914. * console output. */
  915. static __init int early_put_chars(u32 vtermno, const char *buf, int count)
  916. {
  917. char scratch[17];
  918. unsigned int len = count;
  919. /* We use a nul-terminated string, so we have to make a copy. Icky,
  920. * huh? */
  921. if (len > sizeof(scratch) - 1)
  922. len = sizeof(scratch) - 1;
  923. scratch[len] = '\0';
  924. memcpy(scratch, buf, len);
  925. kvm_hypercall1(LHCALL_NOTIFY, __pa(scratch));
  926. /* This routine returns the number of bytes actually written. */
  927. return len;
  928. }
  929. /* Rebooting also tells the Host we're finished, but the RESTART flag tells the
  930. * Launcher to reboot us. */
  931. static void lguest_restart(char *reason)
  932. {
  933. kvm_hypercall2(LHCALL_SHUTDOWN, __pa(reason), LGUEST_SHUTDOWN_RESTART);
  934. }
  935. /*G:050
  936. * Patching (Powerfully Placating Performance Pedants)
  937. *
  938. * We have already seen that pv_ops structures let us replace simple native
  939. * instructions with calls to the appropriate back end all throughout the
  940. * kernel. This allows the same kernel to run as a Guest and as a native
  941. * kernel, but it's slow because of all the indirect branches.
  942. *
  943. * Remember that David Wheeler quote about "Any problem in computer science can
  944. * be solved with another layer of indirection"? The rest of that quote is
  945. * "... But that usually will create another problem." This is the first of
  946. * those problems.
  947. *
  948. * Our current solution is to allow the paravirt back end to optionally patch
  949. * over the indirect calls to replace them with something more efficient. We
  950. * patch two of the simplest of the most commonly called functions: disable
  951. * interrupts and save interrupts. We usually have 6 or 10 bytes to patch
  952. * into: the Guest versions of these operations are small enough that we can
  953. * fit comfortably.
  954. *
  955. * First we need assembly templates of each of the patchable Guest operations,
  956. * and these are in i386_head.S. */
  957. /*G:060 We construct a table from the assembler templates: */
  958. static const struct lguest_insns
  959. {
  960. const char *start, *end;
  961. } lguest_insns[] = {
  962. [PARAVIRT_PATCH(pv_irq_ops.irq_disable)] = { lgstart_cli, lgend_cli },
  963. [PARAVIRT_PATCH(pv_irq_ops.save_fl)] = { lgstart_pushf, lgend_pushf },
  964. };
  965. /* Now our patch routine is fairly simple (based on the native one in
  966. * paravirt.c). If we have a replacement, we copy it in and return how much of
  967. * the available space we used. */
  968. static unsigned lguest_patch(u8 type, u16 clobber, void *ibuf,
  969. unsigned long addr, unsigned len)
  970. {
  971. unsigned int insn_len;
  972. /* Don't do anything special if we don't have a replacement */
  973. if (type >= ARRAY_SIZE(lguest_insns) || !lguest_insns[type].start)
  974. return paravirt_patch_default(type, clobber, ibuf, addr, len);
  975. insn_len = lguest_insns[type].end - lguest_insns[type].start;
  976. /* Similarly if we can't fit replacement (shouldn't happen, but let's
  977. * be thorough). */
  978. if (len < insn_len)
  979. return paravirt_patch_default(type, clobber, ibuf, addr, len);
  980. /* Copy in our instructions. */
  981. memcpy(ibuf, lguest_insns[type].start, insn_len);
  982. return insn_len;
  983. }
  984. /*G:029 Once we get to lguest_init(), we know we're a Guest. The various
  985. * pv_ops structures in the kernel provide points for (almost) every routine we
  986. * have to override to avoid privileged instructions. */
  987. __init void lguest_init(void)
  988. {
  989. /* We're under lguest, paravirt is enabled, and we're running at
  990. * privilege level 1, not 0 as normal. */
  991. pv_info.name = "lguest";
  992. pv_info.paravirt_enabled = 1;
  993. pv_info.kernel_rpl = 1;
  994. pv_info.shared_kernel_pmd = 1;
  995. /* We set up all the lguest overrides for sensitive operations. These
  996. * are detailed with the operations themselves. */
  997. /* interrupt-related operations */
  998. pv_irq_ops.init_IRQ = lguest_init_IRQ;
  999. pv_irq_ops.save_fl = PV_CALLEE_SAVE(save_fl);
  1000. pv_irq_ops.restore_fl = __PV_IS_CALLEE_SAVE(lg_restore_fl);
  1001. pv_irq_ops.irq_disable = PV_CALLEE_SAVE(irq_disable);
  1002. pv_irq_ops.irq_enable = __PV_IS_CALLEE_SAVE(lg_irq_enable);
  1003. pv_irq_ops.safe_halt = lguest_safe_halt;
  1004. /* init-time operations */
  1005. pv_init_ops.memory_setup = lguest_memory_setup;
  1006. pv_init_ops.patch = lguest_patch;
  1007. /* Intercepts of various cpu instructions */
  1008. pv_cpu_ops.load_gdt = lguest_load_gdt;
  1009. pv_cpu_ops.cpuid = lguest_cpuid;
  1010. pv_cpu_ops.load_idt = lguest_load_idt;
  1011. pv_cpu_ops.iret = lguest_iret;
  1012. pv_cpu_ops.load_sp0 = lguest_load_sp0;
  1013. pv_cpu_ops.load_tr_desc = lguest_load_tr_desc;
  1014. pv_cpu_ops.set_ldt = lguest_set_ldt;
  1015. pv_cpu_ops.load_tls = lguest_load_tls;
  1016. pv_cpu_ops.set_debugreg = lguest_set_debugreg;
  1017. pv_cpu_ops.clts = lguest_clts;
  1018. pv_cpu_ops.read_cr0 = lguest_read_cr0;
  1019. pv_cpu_ops.write_cr0 = lguest_write_cr0;
  1020. pv_cpu_ops.read_cr4 = lguest_read_cr4;
  1021. pv_cpu_ops.write_cr4 = lguest_write_cr4;
  1022. pv_cpu_ops.write_gdt_entry = lguest_write_gdt_entry;
  1023. pv_cpu_ops.write_idt_entry = lguest_write_idt_entry;
  1024. pv_cpu_ops.wbinvd = lguest_wbinvd;
  1025. pv_cpu_ops.start_context_switch = paravirt_start_context_switch;
  1026. pv_cpu_ops.end_context_switch = lguest_end_context_switch;
  1027. /* pagetable management */
  1028. pv_mmu_ops.write_cr3 = lguest_write_cr3;
  1029. pv_mmu_ops.flush_tlb_user = lguest_flush_tlb_user;
  1030. pv_mmu_ops.flush_tlb_single = lguest_flush_tlb_single;
  1031. pv_mmu_ops.flush_tlb_kernel = lguest_flush_tlb_kernel;
  1032. pv_mmu_ops.set_pte = lguest_set_pte;
  1033. pv_mmu_ops.set_pte_at = lguest_set_pte_at;
  1034. pv_mmu_ops.set_pmd = lguest_set_pmd;
  1035. #ifdef CONFIG_X86_PAE
  1036. pv_mmu_ops.set_pte_atomic = lguest_set_pte_atomic;
  1037. pv_mmu_ops.pte_clear = lguest_pte_clear;
  1038. pv_mmu_ops.pmd_clear = lguest_pmd_clear;
  1039. pv_mmu_ops.set_pud = lguest_set_pud;
  1040. #endif
  1041. pv_mmu_ops.read_cr2 = lguest_read_cr2;
  1042. pv_mmu_ops.read_cr3 = lguest_read_cr3;
  1043. pv_mmu_ops.lazy_mode.enter = paravirt_enter_lazy_mmu;
  1044. pv_mmu_ops.lazy_mode.leave = lguest_leave_lazy_mmu_mode;
  1045. pv_mmu_ops.pte_update = lguest_pte_update;
  1046. pv_mmu_ops.pte_update_defer = lguest_pte_update;
  1047. #ifdef CONFIG_X86_LOCAL_APIC
  1048. /* apic read/write intercepts */
  1049. set_lguest_basic_apic_ops();
  1050. #endif
  1051. /* time operations */
  1052. pv_time_ops.get_wallclock = lguest_get_wallclock;
  1053. pv_time_ops.time_init = lguest_time_init;
  1054. pv_time_ops.get_tsc_khz = lguest_tsc_khz;
  1055. /* Now is a good time to look at the implementations of these functions
  1056. * before returning to the rest of lguest_init(). */
  1057. /*G:070 Now we've seen all the paravirt_ops, we return to
  1058. * lguest_init() where the rest of the fairly chaotic boot setup
  1059. * occurs. */
  1060. /* The stack protector is a weird thing where gcc places a canary
  1061. * value on the stack and then checks it on return. This file is
  1062. * compiled with -fno-stack-protector it, so we got this far without
  1063. * problems. The value of the canary is kept at offset 20 from the
  1064. * %gs register, so we need to set that up before calling C functions
  1065. * in other files. */
  1066. setup_stack_canary_segment(0);
  1067. /* We could just call load_stack_canary_segment(), but we might as
  1068. * call switch_to_new_gdt() which loads the whole table and sets up
  1069. * the per-cpu segment descriptor register %fs as well. */
  1070. switch_to_new_gdt(0);
  1071. /* As described in head_32.S, we map the first 128M of memory. */
  1072. max_pfn_mapped = (128*1024*1024) >> PAGE_SHIFT;
  1073. /* The Host<->Guest Switcher lives at the top of our address space, and
  1074. * the Host told us how big it is when we made LGUEST_INIT hypercall:
  1075. * it put the answer in lguest_data.reserve_mem */
  1076. reserve_top_address(lguest_data.reserve_mem);
  1077. /* If we don't initialize the lock dependency checker now, it crashes
  1078. * paravirt_disable_iospace. */
  1079. lockdep_init();
  1080. /* The IDE code spends about 3 seconds probing for disks: if we reserve
  1081. * all the I/O ports up front it can't get them and so doesn't probe.
  1082. * Other device drivers are similar (but less severe). This cuts the
  1083. * kernel boot time on my machine from 4.1 seconds to 0.45 seconds. */
  1084. paravirt_disable_iospace();
  1085. /* This is messy CPU setup stuff which the native boot code does before
  1086. * start_kernel, so we have to do, too: */
  1087. cpu_detect(&new_cpu_data);
  1088. /* head.S usually sets up the first capability word, so do it here. */
  1089. new_cpu_data.x86_capability[0] = cpuid_edx(1);
  1090. /* Math is always hard! */
  1091. new_cpu_data.hard_math = 1;
  1092. /* We don't have features. We have puppies! Puppies! */
  1093. #ifdef CONFIG_X86_MCE
  1094. mce_disabled = 1;
  1095. #endif
  1096. #ifdef CONFIG_ACPI
  1097. acpi_disabled = 1;
  1098. acpi_ht = 0;
  1099. #endif
  1100. /* We set the preferred console to "hvc". This is the "hypervisor
  1101. * virtual console" driver written by the PowerPC people, which we also
  1102. * adapted for lguest's use. */
  1103. add_preferred_console("hvc", 0, NULL);
  1104. /* Register our very early console. */
  1105. virtio_cons_early_init(early_put_chars);
  1106. /* Last of all, we set the power management poweroff hook to point to
  1107. * the Guest routine to power off, and the reboot hook to our restart
  1108. * routine. */
  1109. pm_power_off = lguest_power_off;
  1110. machine_ops.restart = lguest_restart;
  1111. /* Now we're set up, call i386_start_kernel() in head32.c and we proceed
  1112. * to boot as normal. It never returns. */
  1113. i386_start_kernel();
  1114. }
  1115. /*
  1116. * This marks the end of stage II of our journey, The Guest.
  1117. *
  1118. * It is now time for us to explore the layer of virtual drivers and complete
  1119. * our understanding of the Guest in "make Drivers".
  1120. */