MMHyper.cpp@ 48565

Last change on this file since 48565 was 45618, checked in by vboxsync, 12 years ago
Do HMR3Init first in vmR3InitRing3 so the other components can skip raw-mode bits during init.
Property svn:eol-style set to `native` Property svn:keywords set to `Id Revision`
File size: 50.3 KB

Line
1	/* $Id: MMHyper.cpp 45618 2013-04-18 18:41:07Z vboxsync $ */
2	/** @file
3	* MM - Memory Manager - Hypervisor Memory Area.
4	*/
5
6	/*
7	* Copyright (C) 2006-2012 Oracle Corporation
8	*
9	* This file is part of VirtualBox Open Source Edition (OSE), as
10	* available from http://www.virtualbox.org. This file is free software;
11	* you can redistribute it and/or modify it under the terms of the GNU
12	* General Public License (GPL) as published by the Free Software
13	* Foundation, in version 2 as it comes in the "COPYING" file of the
14	* VirtualBox OSE distribution. VirtualBox OSE is distributed in the
15	* hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
16	*/
17
18
19	/*******************************************************************************
20	* Header Files *
21	*******************************************************************************/
22	#define LOG_GROUP LOG_GROUP_MM_HYPER
23	#include <VBox/vmm/pgm.h>
24	#include <VBox/vmm/mm.h>
25	#include <VBox/vmm/hm.h>
26	#include <VBox/vmm/dbgf.h>
27	#include "MMInternal.h"
28	#include <VBox/vmm/vm.h>
29	#include <VBox/err.h>
30	#include <VBox/param.h>
31	#include <VBox/log.h>
32	#include "internal/pgm.h"
33	#include <iprt/alloc.h>
34	#include <iprt/assert.h>
35	#include <iprt/string.h>
36
37
38	/*******************************************************************************
39	* Internal Functions *
40	*******************************************************************************/
41	static DECLCALLBACK(bool) mmR3HyperRelocateCallback(PVM pVM, RTGCPTR GCPtrOld, RTGCPTR GCPtrNew, PGMRELOCATECALL enmMode, void *pvUser);
42	static int mmR3HyperMap(PVM pVM, const size_t cb, const char pszDesc, PRTGCPTR pGCPtr, PMMLOOKUPHYPER ppLookup);
43	static int mmR3HyperHeapCreate(PVM pVM, const size_t cb, PMMHYPERHEAP *ppHeap, PRTR0PTR pR0PtrHeap);
44	static int mmR3HyperHeapMap(PVM pVM, PMMHYPERHEAP pHeap, PRTGCPTR ppHeapGC);
45	static DECLCALLBACK(void) mmR3HyperInfoHma(PVM pVM, PCDBGFINFOHLP pHlp, const char *pszArgs);
46
47
48	/**
49	* Determin the default heap size.
50	*
51	* @returns The heap size in bytes.
52	* @param pVM Pointer to the VM.
53	*/
54	static uint32_t mmR3ComputeHyperHeapSize(PVM pVM)
55	{
56	/*
57	* Gather parameters.
58	*/
59	bool fCanUseLargerHeap;
60	int rc = CFGMR3QueryBoolDef(CFGMR3GetChild(CFGMR3GetRoot(pVM), "MM"), "CanUseLargerHeap", &fCanUseLargerHeap, false);
61	AssertStmt(RT_SUCCESS(rc), fCanUseLargerHeap = false);
62
63	uint64_t cbRam;
64	rc = CFGMR3QueryU64(CFGMR3GetRoot(pVM), "RamSize", &cbRam);
65	AssertStmt(RT_SUCCESS(rc), cbRam = _1G);
66
67	/*
68	* We need to keep saved state compatibility if raw-mode is an option,
69	* so lets filter out that case first.
70	*/
71	if ( !fCanUseLargerHeap
72	&& !HMIsEnabled(pVM)
73	&& cbRam < 16*_1G64)
74	return 1280 * _1K;
75
76	/*
77	* Calculate the heap size.
78	*/
79	uint32_t cbHeap = _1M;
80
81	/* The newer chipset may have more devices attached, putting additional
82	pressure on the heap. */
83	if (fCanUseLargerHeap)
84	cbHeap += _1M;
85
86	/* More CPUs means some extra memory usage. */
87	if (pVM->cCpus > 1)
88	cbHeap += pVM->cCpus * _64K;
89
90	/* Lots of memory means extra memory consumption as well (pool). */
91	if (cbRam > 16*_1G64)
92	cbHeap += _2M; /** @todo figure out extactly how much */
93
94	return RT_ALIGN(cbHeap, _256K);
95	}
96
97
98	/**
99	* Initializes the hypervisor related MM stuff without
100	* calling down to PGM.
101	*
102	* PGM is not initialized at this point, PGM relies on
103	* the heap to initialize.
104	*
105	* @returns VBox status.
106	*/
107	int mmR3HyperInit(PVM pVM)
108	{
109	LogFlow(("mmR3HyperInit:\n"));
110
111	/*
112	* Decide Hypervisor mapping in the guest context
113	* And setup various hypervisor area and heap parameters.
114	*/
115	pVM->mm.s.pvHyperAreaGC = (RTGCPTR)MM_HYPER_AREA_ADDRESS;
116	pVM->mm.s.cbHyperArea = MM_HYPER_AREA_MAX_SIZE;
117	AssertRelease(RT_ALIGN_T(pVM->mm.s.pvHyperAreaGC, 1 << X86_PD_SHIFT, RTGCPTR) == pVM->mm.s.pvHyperAreaGC);
118	Assert(pVM->mm.s.pvHyperAreaGC < 0xff000000);
119
120	/** @todo @bugref{1865}, @bugref{3202}: Change the cbHyperHeap default
121	* depending on whether VT-x/AMD-V is enabled or not! Don't waste
122	* precious kernel space on heap for the PATM.
123	*/
124	PCFGMNODE pMM = CFGMR3GetChild(CFGMR3GetRoot(pVM), "MM");
125	uint32_t cbHyperHeap;
126	int rc = CFGMR3QueryU32Def(pMM, "cbHyperHeap", &cbHyperHeap, mmR3ComputeHyperHeapSize(pVM));
127	AssertLogRelRCReturn(rc, rc);
128
129	cbHyperHeap = RT_ALIGN_32(cbHyperHeap, PAGE_SIZE);
130	LogRel(("MM: cbHyperHeap=%#x (%u)\n", cbHyperHeap, cbHyperHeap));
131
132	/*
133	* Allocate the hypervisor heap.
134	*
135	* (This must be done before we start adding memory to the
136	* hypervisor static area because lookup records are allocated from it.)
137	*/
138	rc = mmR3HyperHeapCreate(pVM, cbHyperHeap, &pVM->mm.s.pHyperHeapR3, &pVM->mm.s.pHyperHeapR0);
139	if (RT_SUCCESS(rc))
140	{
141	/*
142	* Make a small head fence to fend of accidental sequential access.
143	*/
144	MMR3HyperReserve(pVM, PAGE_SIZE, "fence", NULL);
145
146	/*
147	* Map the VM structure into the hypervisor space.
148	*/
149	AssertRelease(pVM->cbSelf == RT_UOFFSETOF(VM, aCpus[pVM->cCpus]));
150	RTGCPTR GCPtr;
151	rc = MMR3HyperMapPages(pVM, pVM, pVM->pVMR0, RT_ALIGN_Z(pVM->cbSelf, PAGE_SIZE) >> PAGE_SHIFT, pVM->paVMPagesR3, "VM", &GCPtr);
152	if (RT_SUCCESS(rc))
153	{
154	pVM->pVMRC = (RTRCPTR)GCPtr;
155	for (VMCPUID i = 0; i < pVM->cCpus; i++)
156	pVM->aCpus[i].pVMRC = pVM->pVMRC;
157
158	/* Reserve a page for fencing. */
159	MMR3HyperReserve(pVM, PAGE_SIZE, "fence", NULL);
160
161	/*
162	* Map the heap into the hypervisor space.
163	*/
164	rc = mmR3HyperHeapMap(pVM, pVM->mm.s.pHyperHeapR3, &GCPtr);
165	if (RT_SUCCESS(rc))
166	{
167	pVM->mm.s.pHyperHeapRC = (RTRCPTR)GCPtr;
168	Assert(pVM->mm.s.pHyperHeapRC == GCPtr);
169
170	/*
171	* Register info handlers.
172	*/
173	DBGFR3InfoRegisterInternal(pVM, "hma", "Show the layout of the Hypervisor Memory Area.", mmR3HyperInfoHma);
174
175	LogFlow(("mmR3HyperInit: returns VINF_SUCCESS\n"));
176	return VINF_SUCCESS;
177	}
178	/* Caller will do proper cleanup. */
179	}
180	}
181
182	LogFlow(("mmR3HyperInit: returns %Rrc\n", rc));
183	return rc;
184	}
185
186
187	/**
188	* Cleans up the hypervisor heap.
189	*
190	* @returns VBox status.
191	*/
192	int mmR3HyperTerm(PVM pVM)
193	{
194	if (pVM->mm.s.pHyperHeapR3)
195	PDMR3CritSectDelete(&pVM->mm.s.pHyperHeapR3->Lock);
196
197	return VINF_SUCCESS;
198	}
199
200
201	/**
202	* Finalizes the HMA mapping.
203	*
204	* This is called later during init, most (all) HMA allocations should be done
205	* by the time this function is called.
206	*
207	* @returns VBox status.
208	*/
209	VMMR3DECL(int) MMR3HyperInitFinalize(PVM pVM)
210	{
211	LogFlow(("MMR3HyperInitFinalize:\n"));
212
213	/*
214	* Initialize the hyper heap critical section.
215	*/
216	int rc = PDMR3CritSectInit(pVM, &pVM->mm.s.pHyperHeapR3->Lock, RT_SRC_POS, "MM-HYPER");
217	AssertRC(rc);
218
219	/*
220	* Adjust and create the HMA mapping.
221	*/
222	while ((RTINT)pVM->mm.s.offHyperNextStatic + 64*_1K < (RTINT)pVM->mm.s.cbHyperArea - _4M)
223	pVM->mm.s.cbHyperArea -= _4M;
224	rc = PGMR3MapPT(pVM, pVM->mm.s.pvHyperAreaGC, pVM->mm.s.cbHyperArea, 0 /fFlags/,
225	mmR3HyperRelocateCallback, NULL, "Hypervisor Memory Area");
226	if (RT_FAILURE(rc))
227	return rc;
228	pVM->mm.s.fPGMInitialized = true;
229
230	/*
231	* Do all the delayed mappings.
232	*/
233	PMMLOOKUPHYPER pLookup = (PMMLOOKUPHYPER)((uintptr_t)pVM->mm.s.pHyperHeapR3 + pVM->mm.s.offLookupHyper);
234	for (;;)
235	{
236	RTGCPTR GCPtr = pVM->mm.s.pvHyperAreaGC + pLookup->off;
237	uint32_t cPages = pLookup->cb >> PAGE_SHIFT;
238	switch (pLookup->enmType)
239	{
240	case MMLOOKUPHYPERTYPE_LOCKED:
241	{
242	PCRTHCPHYS paHCPhysPages = pLookup->u.Locked.paHCPhysPages;
243	for (uint32_t i = 0; i < cPages; i++)
244	{
245	rc = PGMMap(pVM, GCPtr + (i << PAGE_SHIFT), paHCPhysPages[i], PAGE_SIZE, 0);
246	AssertRCReturn(rc, rc);
247	}
248	break;
249	}
250
251	case MMLOOKUPHYPERTYPE_HCPHYS:
252	rc = PGMMap(pVM, GCPtr, pLookup->u.HCPhys.HCPhys, pLookup->cb, 0);
253	break;
254
255	case MMLOOKUPHYPERTYPE_GCPHYS:
256	{
257	const RTGCPHYS GCPhys = pLookup->u.GCPhys.GCPhys;
258	const uint32_t cb = pLookup->cb;
259	for (uint32_t off = 0; off < cb; off += PAGE_SIZE)
260	{
261	RTHCPHYS HCPhys;
262	rc = PGMPhysGCPhys2HCPhys(pVM, GCPhys + off, &HCPhys);
263	if (RT_FAILURE(rc))
264	break;
265	rc = PGMMap(pVM, GCPtr + off, HCPhys, PAGE_SIZE, 0);
266	if (RT_FAILURE(rc))
267	break;
268	}
269	break;
270	}
271
272	case MMLOOKUPHYPERTYPE_MMIO2:
273	{
274	const RTGCPHYS offEnd = pLookup->u.MMIO2.off + pLookup->cb;
275	for (RTGCPHYS offCur = pLookup->u.MMIO2.off; offCur < offEnd; offCur += PAGE_SIZE)
276	{
277	RTHCPHYS HCPhys;
278	rc = PGMR3PhysMMIO2GetHCPhys(pVM, pLookup->u.MMIO2.pDevIns, pLookup->u.MMIO2.iRegion, offCur, &HCPhys);
279	if (RT_FAILURE(rc))
280	break;
281	rc = PGMMap(pVM, GCPtr + (offCur - pLookup->u.MMIO2.off), HCPhys, PAGE_SIZE, 0);
282	if (RT_FAILURE(rc))
283	break;
284	}
285	break;
286	}
287
288	case MMLOOKUPHYPERTYPE_DYNAMIC:
289	/* do nothing here since these are either fences or managed by someone else using PGM. */
290	break;
291
292	default:
293	AssertMsgFailed(("enmType=%d\n", pLookup->enmType));
294	break;
295	}
296
297	if (RT_FAILURE(rc))
298	{
299	AssertMsgFailed(("rc=%Rrc cb=%d off=%#RX32 enmType=%d pszDesc=%s\n",
300	rc, pLookup->cb, pLookup->off, pLookup->enmType, pLookup->pszDesc));
301	return rc;
302	}
303
304	/* next */
305	if (pLookup->offNext == (int32_t)NIL_OFFSET)
306	break;
307	pLookup = (PMMLOOKUPHYPER)((uintptr_t)pLookup + pLookup->offNext);
308	}
309
310	LogFlow(("MMR3HyperInitFinalize: returns VINF_SUCCESS\n"));
311	return VINF_SUCCESS;
312	}
313
314
315	/**
316	* Callback function which will be called when PGM is trying to find a new
317	* location for the mapping.
318	*
319	* The callback is called in two modes, 1) the check mode and 2) the relocate mode.
320	* In 1) the callback should say if it objects to a suggested new location. If it
321	* accepts the new location, it is called again for doing it's relocation.
322	*
323	*
324	* @returns true if the location is ok.
325	* @returns false if another location should be found.
326	* @param pVM Pointer to the VM.
327	* @param GCPtrOld The old virtual address.
328	* @param GCPtrNew The new virtual address.
329	* @param enmMode Used to indicate the callback mode.
330	* @param pvUser User argument. Ignored.
331	* @remark The return value is no a failure indicator, it's an acceptance
332	* indicator. Relocation can not fail!
333	*/
334	static DECLCALLBACK(bool) mmR3HyperRelocateCallback(PVM pVM, RTGCPTR GCPtrOld, RTGCPTR GCPtrNew,
335	PGMRELOCATECALL enmMode, void *pvUser)
336	{
337	NOREF(pvUser);
338	switch (enmMode)
339	{
340	/*
341	* Verify location - all locations are good for us.
342	*/
343	case PGMRELOCATECALL_SUGGEST:
344	return true;
345
346	/*
347	* Execute the relocation.
348	*/
349	case PGMRELOCATECALL_RELOCATE:
350	{
351	/*
352	* Accepted!
353	*/
354	AssertMsg(GCPtrOld == pVM->mm.s.pvHyperAreaGC, ("GCPtrOld=%RGv pVM->mm.s.pvHyperAreaGC=%RGv\n", GCPtrOld, pVM->mm.s.pvHyperAreaGC));
355	Log(("Relocating the hypervisor from %RGv to %RGv\n", GCPtrOld, GCPtrNew));
356
357	/*
358	* Relocate the VM structure and ourselves.
359	*/
360	RTGCINTPTR offDelta = GCPtrNew - GCPtrOld;
361	pVM->pVMRC += offDelta;
362	for (VMCPUID i = 0; i < pVM->cCpus; i++)
363	pVM->aCpus[i].pVMRC = pVM->pVMRC;
364
365	pVM->mm.s.pvHyperAreaGC += offDelta;
366	Assert(pVM->mm.s.pvHyperAreaGC < _4G);
367	pVM->mm.s.pHyperHeapRC += offDelta;
368	pVM->mm.s.pHyperHeapR3->pbHeapRC += offDelta;
369	pVM->mm.s.pHyperHeapR3->pVMRC = pVM->pVMRC;
370
371	/*
372	* Relocate the rest.
373	*/
374	VMR3Relocate(pVM, offDelta);
375	return true;
376	}
377
378	default:
379	AssertMsgFailed(("Invalid relocation mode %d\n", enmMode));
380	}
381
382	return false;
383	}
384
385	/**
386	* Service a VMMCALLRING3_MMHYPER_LOCK call.
387	*
388	* @returns VBox status code.
389	* @param pVM Pointer to the VM.
390	*/
391	VMMR3DECL(int) MMR3LockCall(PVM pVM)
392	{
393	PMMHYPERHEAP pHeap = pVM->mm.s.CTX_SUFF(pHyperHeap);
394
395	int rc = PDMR3CritSectEnterEx(&pHeap->Lock, true /* fHostCall */);
396	AssertRC(rc);
397	return rc;
398	}
399
400	/**
401	* Maps contiguous HC physical memory into the hypervisor region in the GC.
402	*
403	* @return VBox status code.
404	*
405	* @param pVM Pointer to the VM.
406	* @param pvR3 Ring-3 address of the memory. Must be page aligned!
407	* @param pvR0 Optional ring-0 address of the memory.
408	* @param HCPhys Host context physical address of the memory to be
409	* mapped. Must be page aligned!
410	* @param cb Size of the memory. Will be rounded up to nearest page.
411	* @param pszDesc Description.
412	* @param pGCPtr Where to store the GC address.
413	*/
414	VMMR3DECL(int) MMR3HyperMapHCPhys(PVM pVM, void pvR3, RTR0PTR pvR0, RTHCPHYS HCPhys, size_t cb, const char pszDesc, PRTGCPTR pGCPtr)
415	{
416	LogFlow(("MMR3HyperMapHCPhys: pvR3=%p pvR0=%p HCPhys=%RHp cb=%d pszDesc=%p:{%s} pGCPtr=%p\n", pvR3, pvR0, HCPhys, (int)cb, pszDesc, pszDesc, pGCPtr));
417
418	/*
419	* Validate input.
420	*/
421	AssertReturn(RT_ALIGN_P(pvR3, PAGE_SIZE) == pvR3, VERR_INVALID_PARAMETER);
422	AssertReturn(RT_ALIGN_T(pvR0, PAGE_SIZE, RTR0PTR) == pvR0, VERR_INVALID_PARAMETER);
423	AssertReturn(RT_ALIGN_T(HCPhys, PAGE_SIZE, RTHCPHYS) == HCPhys, VERR_INVALID_PARAMETER);
424	AssertReturn(pszDesc && *pszDesc, VERR_INVALID_PARAMETER);
425
426	/*
427	* Add the memory to the hypervisor area.
428	*/
429	uint32_t cbAligned = RT_ALIGN_32(cb, PAGE_SIZE);
430	AssertReturn(cbAligned >= cb, VERR_INVALID_PARAMETER);
431	RTGCPTR GCPtr;
432	PMMLOOKUPHYPER pLookup;
433	int rc = mmR3HyperMap(pVM, cbAligned, pszDesc, &GCPtr, &pLookup);
434	if (RT_SUCCESS(rc))
435	{
436	pLookup->enmType = MMLOOKUPHYPERTYPE_HCPHYS;
437	pLookup->u.HCPhys.pvR3 = pvR3;
438	pLookup->u.HCPhys.pvR0 = pvR0;
439	pLookup->u.HCPhys.HCPhys = HCPhys;
440
441	/*
442	* Update the page table.
443	*/
444	if (pVM->mm.s.fPGMInitialized)
445	rc = PGMMap(pVM, GCPtr, HCPhys, cbAligned, 0);
446	if (RT_SUCCESS(rc))
447	*pGCPtr = GCPtr;
448	}
449	return rc;
450	}
451
452
453	/**
454	* Maps contiguous GC physical memory into the hypervisor region in the GC.
455	*
456	* @return VBox status code.
457	*
458	* @param pVM Pointer to the VM.
459	* @param GCPhys Guest context physical address of the memory to be mapped. Must be page aligned!
460	* @param cb Size of the memory. Will be rounded up to nearest page.
461	* @param pszDesc Mapping description.
462	* @param pGCPtr Where to store the GC address.
463	*/
464	VMMR3DECL(int) MMR3HyperMapGCPhys(PVM pVM, RTGCPHYS GCPhys, size_t cb, const char *pszDesc, PRTGCPTR pGCPtr)
465	{
466	LogFlow(("MMR3HyperMapGCPhys: GCPhys=%RGp cb=%d pszDesc=%p:{%s} pGCPtr=%p\n", GCPhys, (int)cb, pszDesc, pszDesc, pGCPtr));
467
468	/*
469	* Validate input.
470	*/
471	AssertReturn(RT_ALIGN_T(GCPhys, PAGE_SIZE, RTGCPHYS) == GCPhys, VERR_INVALID_PARAMETER);
472	AssertReturn(pszDesc && *pszDesc, VERR_INVALID_PARAMETER);
473
474	/*
475	* Add the memory to the hypervisor area.
476	*/
477	cb = RT_ALIGN_Z(cb, PAGE_SIZE);
478	RTGCPTR GCPtr;
479	PMMLOOKUPHYPER pLookup;
480	int rc = mmR3HyperMap(pVM, cb, pszDesc, &GCPtr, &pLookup);
481	if (RT_SUCCESS(rc))
482	{
483	pLookup->enmType = MMLOOKUPHYPERTYPE_GCPHYS;
484	pLookup->u.GCPhys.GCPhys = GCPhys;
485
486	/*
487	* Update the page table.
488	*/
489	for (unsigned off = 0; off < cb; off += PAGE_SIZE)
490	{
491	RTHCPHYS HCPhys;
492	rc = PGMPhysGCPhys2HCPhys(pVM, GCPhys + off, &HCPhys);
493	AssertRC(rc);
494	if (RT_FAILURE(rc))
495	{
496	AssertMsgFailed(("rc=%Rrc GCPhys=%RGp off=%#x %s\n", rc, GCPhys, off, pszDesc));
497	break;
498	}
499	if (pVM->mm.s.fPGMInitialized)
500	{
501	rc = PGMMap(pVM, GCPtr + off, HCPhys, PAGE_SIZE, 0);
502	AssertRC(rc);
503	if (RT_FAILURE(rc))
504	{
505	AssertMsgFailed(("rc=%Rrc GCPhys=%RGp off=%#x %s\n", rc, GCPhys, off, pszDesc));
506	break;
507	}
508	}
509	}
510
511	if (RT_SUCCESS(rc) && pGCPtr)
512	*pGCPtr = GCPtr;
513	}
514	return rc;
515	}
516
517
518	/**
519	* Maps a portion of an MMIO2 region into the hypervisor region.
520	*
521	* Callers of this API must never deregister the MMIO2 region before the
522	* VM is powered off. If this becomes a requirement MMR3HyperUnmapMMIO2
523	* API will be needed to perform cleanups.
524	*
525	* @return VBox status code.
526	*
527	* @param pVM Pointer to the VM.
528	* @param pDevIns The device owning the MMIO2 memory.
529	* @param iRegion The region.
530	* @param off The offset into the region. Will be rounded down to closest page boundary.
531	* @param cb The number of bytes to map. Will be rounded up to the closest page boundary.
532	* @param pszDesc Mapping description.
533	* @param pRCPtr Where to store the RC address.
534	*/
535	VMMR3DECL(int) MMR3HyperMapMMIO2(PVM pVM, PPDMDEVINS pDevIns, uint32_t iRegion, RTGCPHYS off, RTGCPHYS cb,
536	const char *pszDesc, PRTRCPTR pRCPtr)
537	{
538	LogFlow(("MMR3HyperMapMMIO2: pDevIns=%p iRegion=%#x off=%RGp cb=%RGp pszDesc=%p:{%s} pRCPtr=%p\n",
539	pDevIns, iRegion, off, cb, pszDesc, pszDesc, pRCPtr));
540	int rc;
541
542	/*
543	* Validate input.
544	*/
545	AssertReturn(pszDesc && *pszDesc, VERR_INVALID_PARAMETER);
546	AssertReturn(off + cb > off, VERR_INVALID_PARAMETER);
547	uint32_t const offPage = off & PAGE_OFFSET_MASK;
548	off &= ~(RTGCPHYS)PAGE_OFFSET_MASK;
549	cb += offPage;
550	cb = RT_ALIGN_Z(cb, PAGE_SIZE);
551	const RTGCPHYS offEnd = off + cb;
552	AssertReturn(offEnd > off, VERR_INVALID_PARAMETER);
553	for (RTGCPHYS offCur = off; offCur < offEnd; offCur += PAGE_SIZE)
554	{
555	RTHCPHYS HCPhys;
556	rc = PGMR3PhysMMIO2GetHCPhys(pVM, pDevIns, iRegion, offCur, &HCPhys);
557	AssertMsgRCReturn(rc, ("rc=%Rrc - iRegion=%d off=%RGp\n", rc, iRegion, off), rc);
558	}
559
560	/*
561	* Add the memory to the hypervisor area.
562	*/
563	RTGCPTR GCPtr;
564	PMMLOOKUPHYPER pLookup;
565	rc = mmR3HyperMap(pVM, cb, pszDesc, &GCPtr, &pLookup);
566	if (RT_SUCCESS(rc))
567	{
568	pLookup->enmType = MMLOOKUPHYPERTYPE_MMIO2;
569	pLookup->u.MMIO2.pDevIns = pDevIns;
570	pLookup->u.MMIO2.iRegion = iRegion;
571	pLookup->u.MMIO2.off = off;
572
573	/*
574	* Update the page table.
575	*/
576	if (pVM->mm.s.fPGMInitialized)
577	{
578	for (RTGCPHYS offCur = off; offCur < offEnd; offCur += PAGE_SIZE)
579	{
580	RTHCPHYS HCPhys;
581	rc = PGMR3PhysMMIO2GetHCPhys(pVM, pDevIns, iRegion, offCur, &HCPhys);
582	AssertRCReturn(rc, rc);
583	rc = PGMMap(pVM, GCPtr + (offCur - off), HCPhys, PAGE_SIZE, 0);
584	if (RT_FAILURE(rc))
585	{
586	AssertMsgFailed(("rc=%Rrc offCur=%RGp %s\n", rc, offCur, pszDesc));
587	break;
588	}
589	}
590	}
591
592	if (RT_SUCCESS(rc))
593	{
594	GCPtr \|= offPage;
595	*pRCPtr = GCPtr;
596	AssertLogRelReturn(*pRCPtr == GCPtr, VERR_INTERNAL_ERROR);
597	}
598	}
599	return rc;
600	}
601
602
603	/**
604	* Maps locked R3 virtual memory into the hypervisor region in the GC.
605	*
606	* @return VBox status code.
607	*
608	* @param pVM Pointer to the VM.
609	* @param pvR3 The ring-3 address of the memory, must be page aligned.
610	* @param pvR0 The ring-0 address of the memory, must be page aligned. (optional)
611	* @param cPages The number of pages.
612	* @param paPages The page descriptors.
613	* @param pszDesc Mapping description.
614	* @param pGCPtr Where to store the GC address corresponding to pvR3.
615	*/
616	VMMR3DECL(int) MMR3HyperMapPages(PVM pVM, void pvR3, RTR0PTR pvR0, size_t cPages, PCSUPPAGE paPages, const char pszDesc, PRTGCPTR pGCPtr)
617	{
618	LogFlow(("MMR3HyperMapPages: pvR3=%p pvR0=%p cPages=%zu paPages=%p pszDesc=%p:{%s} pGCPtr=%p\n",
619	pvR3, pvR0, cPages, paPages, pszDesc, pszDesc, pGCPtr));
620
621	/*
622	* Validate input.
623	*/
624	AssertPtrReturn(pvR3, VERR_INVALID_POINTER);
625	AssertPtrReturn(paPages, VERR_INVALID_POINTER);
626	AssertReturn(cPages > 0, VERR_PAGE_COUNT_OUT_OF_RANGE);
627	AssertReturn(cPages <= VBOX_MAX_ALLOC_PAGE_COUNT, VERR_PAGE_COUNT_OUT_OF_RANGE);
628	AssertPtrReturn(pszDesc, VERR_INVALID_POINTER);
629	AssertReturn(*pszDesc, VERR_INVALID_PARAMETER);
630	AssertPtrReturn(pGCPtr, VERR_INVALID_PARAMETER);
631
632	/*
633	* Add the memory to the hypervisor area.
634	*/
635	RTGCPTR GCPtr;
636	PMMLOOKUPHYPER pLookup;
637	int rc = mmR3HyperMap(pVM, cPages << PAGE_SHIFT, pszDesc, &GCPtr, &pLookup);
638	if (RT_SUCCESS(rc))
639	{
640	/*
641	* Copy the physical page addresses and tell PGM about them.
642	*/
643	PRTHCPHYS paHCPhysPages = (PRTHCPHYS)MMR3HeapAlloc(pVM, MM_TAG_MM, sizeof(RTHCPHYS) * cPages);
644	if (paHCPhysPages)
645	{
646	for (size_t i = 0; i < cPages; i++)
647	{
648	AssertReleaseMsgReturn(paPages[i].Phys != 0 && paPages[i].Phys != NIL_RTHCPHYS && !(paPages[i].Phys & PAGE_OFFSET_MASK),
649	("i=%#zx Phys=%RHp %s\n", i, paPages[i].Phys, pszDesc),
650	VERR_INTERNAL_ERROR);
651	paHCPhysPages[i] = paPages[i].Phys;
652	}
653
654	if (pVM->mm.s.fPGMInitialized)
655	{
656	for (size_t i = 0; i < cPages; i++)
657	{
658	rc = PGMMap(pVM, GCPtr + (i << PAGE_SHIFT), paHCPhysPages[i], PAGE_SIZE, 0);
659	AssertRCBreak(rc);
660	}
661	}
662	if (RT_SUCCESS(rc))
663	{
664	pLookup->enmType = MMLOOKUPHYPERTYPE_LOCKED;
665	pLookup->u.Locked.pvR3 = pvR3;
666	pLookup->u.Locked.pvR0 = pvR0;
667	pLookup->u.Locked.paHCPhysPages = paHCPhysPages;
668
669	/* done. */
670	*pGCPtr = GCPtr;
671	return rc;
672	}
673	/* Don't care about failure clean, we're screwed if this fails anyway. */
674	}
675	}
676
677	return rc;
678	}
679
680
681	/**
682	* Reserves a hypervisor memory area.
683	* Most frequent usage is fence pages and dynamically mappings like the guest PD and PDPT.
684	*
685	* @return VBox status code.
686	*
687	* @param pVM Pointer to the VM.
688	* @param cb Size of the memory. Will be rounded up to nearest page.
689	* @param pszDesc Mapping description.
690	* @param pGCPtr Where to store the assigned GC address. Optional.
691	*/
692	VMMR3DECL(int) MMR3HyperReserve(PVM pVM, unsigned cb, const char *pszDesc, PRTGCPTR pGCPtr)
693	{
694	LogFlow(("MMR3HyperMapHCRam: cb=%d pszDesc=%p:{%s} pGCPtr=%p\n", (int)cb, pszDesc, pszDesc, pGCPtr));
695
696	/*
697	* Validate input.
698	*/
699	if ( cb <= 0
700	\|\| !pszDesc
701	\|\| !*pszDesc)
702	{
703	AssertMsgFailed(("Invalid parameter\n"));
704	return VERR_INVALID_PARAMETER;
705	}
706
707	/*
708	* Add the memory to the hypervisor area.
709	*/
710	RTGCPTR GCPtr;
711	PMMLOOKUPHYPER pLookup;
712	int rc = mmR3HyperMap(pVM, cb, pszDesc, &GCPtr, &pLookup);
713	if (RT_SUCCESS(rc))
714	{
715	pLookup->enmType = MMLOOKUPHYPERTYPE_DYNAMIC;
716	if (pGCPtr)
717	*pGCPtr = GCPtr;
718	return VINF_SUCCESS;
719	}
720	return rc;
721	}
722
723
724	/**
725	* Adds memory to the hypervisor memory arena.
726	*
727	* @return VBox status code.
728	* @param pVM Pointer to the VM.
729	* @param cb Size of the memory. Will be rounded up to nearest page.
730	* @param pszDesc The description of the memory.
731	* @param pGCPtr Where to store the GC address.
732	* @param ppLookup Where to store the pointer to the lookup record.
733	* @remark We assume the threading structure of VBox imposes natural
734	* serialization of most functions, this one included.
735	*/
736	static int mmR3HyperMap(PVM pVM, const size_t cb, const char pszDesc, PRTGCPTR pGCPtr, PMMLOOKUPHYPER ppLookup)
737	{
738	/*
739	* Validate input.
740	*/
741	const uint32_t cbAligned = RT_ALIGN_32(cb, PAGE_SIZE);
742	AssertReturn(cbAligned >= cb, VERR_INVALID_PARAMETER);
743	if (pVM->mm.s.offHyperNextStatic + cbAligned >= pVM->mm.s.cbHyperArea) /* don't use the last page, it's a fence. */
744	{
745	AssertMsgFailed(("Out of static mapping space in the HMA! offHyperAreaGC=%x cbAligned=%x cbHyperArea=%x\n",
746	pVM->mm.s.offHyperNextStatic, cbAligned, pVM->mm.s.cbHyperArea));
747	return VERR_NO_MEMORY;
748	}
749
750	/*
751	* Allocate lookup record.
752	*/
753	PMMLOOKUPHYPER pLookup;
754	int rc = MMHyperAlloc(pVM, sizeof(pLookup), 1, MM_TAG_MM, (void *)&pLookup);
755	if (RT_SUCCESS(rc))
756	{
757	/*
758	* Initialize it and insert it.
759	*/
760	pLookup->offNext = pVM->mm.s.offLookupHyper;
761	pLookup->cb = cbAligned;
762	pLookup->off = pVM->mm.s.offHyperNextStatic;
763	pVM->mm.s.offLookupHyper = (uint8_t )pLookup - (uint8_t )pVM->mm.s.pHyperHeapR3;
764	if (pLookup->offNext != (int32_t)NIL_OFFSET)
765	pLookup->offNext -= pVM->mm.s.offLookupHyper;
766	pLookup->enmType = MMLOOKUPHYPERTYPE_INVALID;
767	memset(&pLookup->u, 0xff, sizeof(pLookup->u));
768	pLookup->pszDesc = pszDesc;
769
770	/* Mapping. */
771	*pGCPtr = pVM->mm.s.pvHyperAreaGC + pVM->mm.s.offHyperNextStatic;
772	pVM->mm.s.offHyperNextStatic += cbAligned;
773
774	/* Return pointer. */
775	*ppLookup = pLookup;
776	}
777
778	AssertRC(rc);
779	LogFlow(("mmR3HyperMap: returns %Rrc pGCPtr=%RGv\n", rc, pGCPtr));
780	return rc;
781	}
782
783
784	/**
785	* Allocates a new heap.
786	*
787	* @returns VBox status code.
788	* @param pVM Pointer to the VM.
789	* @param cb The size of the new heap.
790	* @param ppHeap Where to store the heap pointer on successful return.
791	* @param pR0PtrHeap Where to store the ring-0 address of the heap on
792	* success.
793	*/
794	static int mmR3HyperHeapCreate(PVM pVM, const size_t cb, PMMHYPERHEAP *ppHeap, PRTR0PTR pR0PtrHeap)
795	{
796	/*
797	* Allocate the hypervisor heap.
798	*/
799	const uint32_t cbAligned = RT_ALIGN_32(cb, PAGE_SIZE);
800	AssertReturn(cbAligned >= cb, VERR_INVALID_PARAMETER);
801	uint32_t const cPages = cbAligned >> PAGE_SHIFT;
802	PSUPPAGE paPages = (PSUPPAGE)MMR3HeapAlloc(pVM, MM_TAG_MM, cPages * sizeof(paPages[0]));
803	if (!paPages)
804	return VERR_NO_MEMORY;
805	void *pv;
806	RTR0PTR pvR0 = NIL_RTR0PTR;
807	int rc = SUPR3PageAllocEx(cPages,
808	0 /fFlags/,
809	&pv,
810	#ifdef VBOX_WITH_2X_4GB_ADDR_SPACE
811	HMIsEnabled(pVM) ? &pvR0 : NULL,
812	#else
813	NULL,
814	#endif
815	paPages);
816	if (RT_SUCCESS(rc))
817	{
818	#ifdef VBOX_WITH_2X_4GB_ADDR_SPACE
819	if (!HMIsEnabled(pVM))
820	pvR0 = NIL_RTR0PTR;
821	#else
822	pvR0 = (uintptr_t)pv;
823	#endif
824	memset(pv, 0, cbAligned);
825
826	/*
827	* Initialize the heap and first free chunk.
828	*/
829	PMMHYPERHEAP pHeap = (PMMHYPERHEAP)pv;
830	pHeap->u32Magic = MMHYPERHEAP_MAGIC;
831	pHeap->pbHeapR3 = (uint8_t *)pHeap + MMYPERHEAP_HDR_SIZE;
832	pHeap->pbHeapR0 = pvR0 != NIL_RTR0PTR ? pvR0 + MMYPERHEAP_HDR_SIZE : NIL_RTR0PTR;
833	//pHeap->pbHeapRC = 0; // set by mmR3HyperHeapMap()
834	pHeap->pVMR3 = pVM;
835	pHeap->pVMR0 = pVM->pVMR0;
836	pHeap->pVMRC = pVM->pVMRC;
837	pHeap->cbHeap = cbAligned - MMYPERHEAP_HDR_SIZE;
838	pHeap->cbFree = pHeap->cbHeap - sizeof(MMHYPERCHUNK);
839	//pHeap->offFreeHead = 0;
840	//pHeap->offFreeTail = 0;
841	pHeap->offPageAligned = pHeap->cbHeap;
842	//pHeap->HyperHeapStatTree = 0;
843	pHeap->paPages = paPages;
844
845	PMMHYPERCHUNKFREE pFree = (PMMHYPERCHUNKFREE)pHeap->pbHeapR3;
846	pFree->cb = pHeap->cbFree;
847	//pFree->core.offNext = 0;
848	MMHYPERCHUNK_SET_TYPE(&pFree->core, MMHYPERCHUNK_FLAGS_FREE);
849	pFree->core.offHeap = -(int32_t)MMYPERHEAP_HDR_SIZE;
850	//pFree->offNext = 0;
851	//pFree->offPrev = 0;
852
853	STAMR3Register(pVM, &pHeap->cbHeap, STAMTYPE_U32, STAMVISIBILITY_ALWAYS, "/MM/HyperHeap/cbHeap", STAMUNIT_BYTES, "The heap size.");
854	STAMR3Register(pVM, &pHeap->cbFree, STAMTYPE_U32, STAMVISIBILITY_ALWAYS, "/MM/HyperHeap/cbFree", STAMUNIT_BYTES, "The free space.");
855
856	*ppHeap = pHeap;
857	*pR0PtrHeap = pvR0;
858	return VINF_SUCCESS;
859	}
860	AssertMsgFailed(("SUPR3PageAllocEx(%d,,,,) -> %Rrc\n", cbAligned >> PAGE_SHIFT, rc));
861
862	*ppHeap = NULL;
863	return rc;
864	}
865
866	/**
867	* Allocates a new heap.
868	*/
869	static int mmR3HyperHeapMap(PVM pVM, PMMHYPERHEAP pHeap, PRTGCPTR ppHeapGC)
870	{
871	Assert(RT_ALIGN_Z(pHeap->cbHeap + MMYPERHEAP_HDR_SIZE, PAGE_SIZE) == pHeap->cbHeap + MMYPERHEAP_HDR_SIZE);
872	Assert(pHeap->paPages);
873	int rc = MMR3HyperMapPages(pVM,
874	pHeap,
875	pHeap->pbHeapR0 != NIL_RTR0PTR ? pHeap->pbHeapR0 - MMYPERHEAP_HDR_SIZE : NIL_RTR0PTR,
876	(pHeap->cbHeap + MMYPERHEAP_HDR_SIZE) >> PAGE_SHIFT,
877	pHeap->paPages,
878	"Heap", ppHeapGC);
879	if (RT_SUCCESS(rc))
880	{
881	pHeap->pVMRC = pVM->pVMRC;
882	pHeap->pbHeapRC = *ppHeapGC + MMYPERHEAP_HDR_SIZE;
883	/* Reserve a page for fencing. */
884	MMR3HyperReserve(pVM, PAGE_SIZE, "fence", NULL);
885
886	/* We won't need these any more. */
887	MMR3HeapFree(pHeap->paPages);
888	pHeap->paPages = NULL;
889	}
890	return rc;
891	}
892
893
894	/**
895	* Allocates memory in the Hypervisor (GC VMM) area which never will
896	* be freed and doesn't have any offset based relation to other heap blocks.
897	*
898	* The latter means that two blocks allocated by this API will not have the
899	* same relative position to each other in GC and HC. In short, never use
900	* this API for allocating nodes for an offset based AVL tree!
901	*
902	* The returned memory is of course zeroed.
903	*
904	* @returns VBox status code.
905	* @param pVM Pointer to the VM.
906	* @param cb Number of bytes to allocate.
907	* @param uAlignment Required memory alignment in bytes.
908	* Values are 0,8,16,32 and PAGE_SIZE.
909	* 0 -> default alignment, i.e. 8 bytes.
910	* @param enmTag The statistics tag.
911	* @param ppv Where to store the address to the allocated
912	* memory.
913	* @remark This is assumed not to be used at times when serialization is required.
914	*/
915	VMMR3DECL(int) MMR3HyperAllocOnceNoRel(PVM pVM, size_t cb, unsigned uAlignment, MMTAG enmTag, void **ppv)
916	{
917	return MMR3HyperAllocOnceNoRelEx(pVM, cb, uAlignment, enmTag, 0/fFlags/, ppv);
918	}
919
920
921	/**
922	* Allocates memory in the Hypervisor (GC VMM) area which never will
923	* be freed and doesn't have any offset based relation to other heap blocks.
924	*
925	* The latter means that two blocks allocated by this API will not have the
926	* same relative position to each other in GC and HC. In short, never use
927	* this API for allocating nodes for an offset based AVL tree!
928	*
929	* The returned memory is of course zeroed.
930	*
931	* @returns VBox status code.
932	* @param pVM Pointer to the VM.
933	* @param cb Number of bytes to allocate.
934	* @param uAlignment Required memory alignment in bytes.
935	* Values are 0,8,16,32 and PAGE_SIZE.
936	* 0 -> default alignment, i.e. 8 bytes.
937	* @param enmTag The statistics tag.
938	* @param fFlags Flags, see MMHYPER_AONR_FLAGS_KERNEL_MAPPING.
939	* @param ppv Where to store the address to the allocated memory.
940	* @remark This is assumed not to be used at times when serialization is required.
941	*/
942	VMMR3DECL(int) MMR3HyperAllocOnceNoRelEx(PVM pVM, size_t cb, unsigned uAlignment, MMTAG enmTag, uint32_t fFlags, void **ppv)
943	{
944	AssertMsg(cb >= 8, ("Hey! Do you really mean to allocate less than 8 bytes?! cb=%d\n", cb));
945	Assert(!(fFlags & ~(MMHYPER_AONR_FLAGS_KERNEL_MAPPING)));
946
947	/*
948	* Choose between allocating a new chunk of HMA memory
949	* and the heap. We will only do BIG allocations from HMA and
950	* only at creation time.
951	*/
952	if ( ( cb < _64K
953	&& ( uAlignment != PAGE_SIZE
954	\|\| cb < 48*_1K)
955	&& !(fFlags & MMHYPER_AONR_FLAGS_KERNEL_MAPPING)
956	)
957	\|\| VMR3GetState(pVM) != VMSTATE_CREATING
958	)
959	{
960	Assert(!(fFlags & MMHYPER_AONR_FLAGS_KERNEL_MAPPING));
961	int rc = MMHyperAlloc(pVM, cb, uAlignment, enmTag, ppv);
962	if ( rc != VERR_MM_HYPER_NO_MEMORY
963	\|\| cb <= 8*_1K)
964	{
965	Log2(("MMR3HyperAllocOnceNoRel: cb=%#zx uAlignment=%#x returns %Rrc and *ppv=%p\n",
966	cb, uAlignment, rc, *ppv));
967	return rc;
968	}
969	}
970
971	#ifdef VBOX_WITH_2X_4GB_ADDR_SPACE
972	/*
973	* Set MMHYPER_AONR_FLAGS_KERNEL_MAPPING if we're in going to execute in ring-0.
974	*/
975	if (HMIsEnabled(pVM))
976	fFlags \|= MMHYPER_AONR_FLAGS_KERNEL_MAPPING;
977	#endif
978
979	/*
980	* Validate alignment.
981	*/
982	switch (uAlignment)
983	{
984	case 0:
985	case 8:
986	case 16:
987	case 32:
988	case PAGE_SIZE:
989	break;
990	default:
991	AssertMsgFailed(("Invalid alignment %u\n", uAlignment));
992	return VERR_INVALID_PARAMETER;
993	}
994
995	/*
996	* Allocate the pages and map them into HMA space.
997	*/
998	uint32_t const cbAligned = RT_ALIGN_32(cb, PAGE_SIZE);
999	AssertReturn(cbAligned >= cb, VERR_INVALID_PARAMETER);
1000	uint32_t const cPages = cbAligned >> PAGE_SHIFT;
1001	PSUPPAGE paPages = (PSUPPAGE)RTMemTmpAlloc(cPages * sizeof(paPages[0]));
1002	if (!paPages)
1003	return VERR_NO_TMP_MEMORY;
1004	void *pvPages;
1005	RTR0PTR pvR0 = NIL_RTR0PTR;
1006	int rc = SUPR3PageAllocEx(cPages,
1007	0 /fFlags/,
1008	&pvPages,
1009	fFlags & MMHYPER_AONR_FLAGS_KERNEL_MAPPING ? &pvR0 : NULL,
1010	paPages);
1011	if (RT_SUCCESS(rc))
1012	{
1013	if (!(fFlags & MMHYPER_AONR_FLAGS_KERNEL_MAPPING))
1014	#ifdef VBOX_WITH_2X_4GB_ADDR_SPACE
1015	pvR0 = NIL_RTR0PTR;
1016	#else
1017	pvR0 = (RTR0PTR)pvPages;
1018	#endif
1019
1020	memset(pvPages, 0, cbAligned);
1021
1022	RTGCPTR GCPtr;
1023	rc = MMR3HyperMapPages(pVM,
1024	pvPages,
1025	pvR0,
1026	cPages,
1027	paPages,
1028	MMR3HeapAPrintf(pVM, MM_TAG_MM, "alloc once (%s)", mmGetTagName(enmTag)),
1029	&GCPtr);
1030	if (RT_SUCCESS(rc))
1031	{
1032	*ppv = pvPages;
1033	Log2(("MMR3HyperAllocOnceNoRel: cbAligned=%#x uAlignment=%#x returns VINF_SUCCESS and *ppv=%p\n",
1034	cbAligned, uAlignment, *ppv));
1035	MMR3HyperReserve(pVM, PAGE_SIZE, "fence", NULL);
1036	return rc;
1037	}
1038	AssertMsgFailed(("Failed to allocate %zd bytes! %Rrc\n", cbAligned, rc));
1039	SUPR3PageFreeEx(pvPages, cPages);
1040
1041
1042	/*
1043	* HACK ALERT! Try allocate it off the heap so that we don't freak
1044	* out during vga/vmmdev mmio2 allocation with certain ram sizes.
1045	*/
1046	/** @todo make a proper fix for this so we will never end up in this kind of situation! */
1047	Log(("MMR3HyperAllocOnceNoRel: MMR3HyperMapHCRam failed with rc=%Rrc, try MMHyperAlloc(,%#x,,) instead\n", rc, cb));
1048	int rc2 = MMHyperAlloc(pVM, cb, uAlignment, enmTag, ppv);
1049	if (RT_SUCCESS(rc2))
1050	{
1051	Log2(("MMR3HyperAllocOnceNoRel: cb=%#x uAlignment=%#x returns %Rrc and *ppv=%p\n",
1052	cb, uAlignment, rc, *ppv));
1053	return rc;
1054	}
1055	}
1056	else
1057	AssertMsgFailed(("Failed to allocate %zd bytes! %Rrc\n", cbAligned, rc));
1058
1059	if (rc == VERR_NO_MEMORY)
1060	rc = VERR_MM_HYPER_NO_MEMORY;
1061	LogRel(("MMR3HyperAllocOnceNoRel: cb=%#zx uAlignment=%#x returns %Rrc\n", cb, uAlignment, rc));
1062	return rc;
1063	}
1064
1065
1066	/**
1067	* Lookus up a ring-3 pointer to HMA.
1068	*
1069	* @returns The lookup record on success, NULL on failure.
1070	* @param pVM Pointer to the VM.
1071	* @param pvR3 The ring-3 address to look up.
1072	*/
1073	DECLINLINE(PMMLOOKUPHYPER) mmR3HyperLookupR3(PVM pVM, void *pvR3)
1074	{
1075	PMMLOOKUPHYPER pLookup = (PMMLOOKUPHYPER)((uint8_t *)pVM->mm.s.pHyperHeapR3 + pVM->mm.s.offLookupHyper);
1076	for (;;)
1077	{
1078	switch (pLookup->enmType)
1079	{
1080	case MMLOOKUPHYPERTYPE_LOCKED:
1081	{
1082	unsigned off = (uint8_t )pvR3 - (uint8_t )pLookup->u.Locked.pvR3;
1083	if (off < pLookup->cb)
1084	return pLookup;
1085	break;
1086	}
1087
1088	case MMLOOKUPHYPERTYPE_HCPHYS:
1089	{
1090	unsigned off = (uint8_t )pvR3 - (uint8_t )pLookup->u.HCPhys.pvR3;
1091	if (off < pLookup->cb)
1092	return pLookup;
1093	break;
1094	}
1095
1096	case MMLOOKUPHYPERTYPE_GCPHYS:
1097	case MMLOOKUPHYPERTYPE_MMIO2:
1098	case MMLOOKUPHYPERTYPE_DYNAMIC:
1099	/** @todo ? */
1100	break;
1101
1102	default:
1103	AssertMsgFailed(("enmType=%d\n", pLookup->enmType));
1104	return NULL;
1105	}
1106
1107	/* next */
1108	if ((unsigned)pLookup->offNext == NIL_OFFSET)
1109	return NULL;
1110	pLookup = (PMMLOOKUPHYPER)((uint8_t *)pLookup + pLookup->offNext);
1111	}
1112	}
1113
1114
1115	/**
1116	* Set / unset guard status on one or more hyper heap pages.
1117	*
1118	* @returns VBox status code (first failure).
1119	* @param pVM Pointer to the VM.
1120	* @param pvStart The hyper heap page address. Must be page
1121	* aligned.
1122	* @param cb The number of bytes. Must be page aligned.
1123	* @param fSet Whether to set or unset guard page status.
1124	*/
1125	VMMR3DECL(int) MMR3HyperSetGuard(PVM pVM, void *pvStart, size_t cb, bool fSet)
1126	{
1127	/*
1128	* Validate input.
1129	*/
1130	AssertReturn(!((uintptr_t)pvStart & PAGE_OFFSET_MASK), VERR_INVALID_POINTER);
1131	AssertReturn(!(cb & PAGE_OFFSET_MASK), VERR_INVALID_PARAMETER);
1132	AssertReturn(cb <= UINT32_MAX, VERR_INVALID_PARAMETER);
1133	PMMLOOKUPHYPER pLookup = mmR3HyperLookupR3(pVM, pvStart);
1134	AssertReturn(pLookup, VERR_INVALID_PARAMETER);
1135	AssertReturn(pLookup->enmType == MMLOOKUPHYPERTYPE_LOCKED, VERR_INVALID_PARAMETER);
1136
1137	/*
1138	* Get down to business.
1139	* Note! We quietly ignore errors from the support library since the
1140	* protection stuff isn't possible to implement on all platforms.
1141	*/
1142	uint8_t pbR3 = (uint8_t )pLookup->u.Locked.pvR3;
1143	RTR0PTR R0Ptr = pLookup->u.Locked.pvR0 != (uintptr_t)pLookup->u.Locked.pvR3
1144	? pLookup->u.Locked.pvR0
1145	: NIL_RTR0PTR;
1146	uint32_t off = (uint32_t)((uint8_t *)pvStart - pbR3);
1147	int rc;
1148	if (fSet)
1149	{
1150	rc = PGMMapSetPage(pVM, MMHyperR3ToRC(pVM, pvStart), cb, 0);
1151	SUPR3PageProtect(pbR3, R0Ptr, off, (uint32_t)cb, RTMEM_PROT_NONE);
1152	}
1153	else
1154	{
1155	rc = PGMMapSetPage(pVM, MMHyperR3ToRC(pVM, pvStart), cb, X86_PTE_P \| X86_PTE_A \| X86_PTE_D \| X86_PTE_RW);
1156	SUPR3PageProtect(pbR3, R0Ptr, off, (uint32_t)cb, RTMEM_PROT_READ \| RTMEM_PROT_WRITE);
1157	}
1158	return rc;
1159	}
1160
1161
1162	/**
1163	* Convert hypervisor HC virtual address to HC physical address.
1164	*
1165	* @returns HC physical address.
1166	* @param pVM Pointer to the VM
1167	* @param pvR3 Host context virtual address.
1168	*/
1169	VMMR3DECL(RTHCPHYS) MMR3HyperHCVirt2HCPhys(PVM pVM, void *pvR3)
1170	{
1171	PMMLOOKUPHYPER pLookup = (PMMLOOKUPHYPER)((uint8_t *)pVM->mm.s.pHyperHeapR3 + pVM->mm.s.offLookupHyper);
1172	for (;;)
1173	{
1174	switch (pLookup->enmType)
1175	{
1176	case MMLOOKUPHYPERTYPE_LOCKED:
1177	{
1178	unsigned off = (uint8_t )pvR3 - (uint8_t )pLookup->u.Locked.pvR3;
1179	if (off < pLookup->cb)
1180	return pLookup->u.Locked.paHCPhysPages[off >> PAGE_SHIFT] \| (off & PAGE_OFFSET_MASK);
1181	break;
1182	}
1183
1184	case MMLOOKUPHYPERTYPE_HCPHYS:
1185	{
1186	unsigned off = (uint8_t )pvR3 - (uint8_t )pLookup->u.HCPhys.pvR3;
1187	if (off < pLookup->cb)
1188	return pLookup->u.HCPhys.HCPhys + off;
1189	break;
1190	}
1191
1192	case MMLOOKUPHYPERTYPE_GCPHYS:
1193	case MMLOOKUPHYPERTYPE_MMIO2:
1194	case MMLOOKUPHYPERTYPE_DYNAMIC:
1195	/* can (or don't want to) convert these kind of records. */
1196	break;
1197
1198	default:
1199	AssertMsgFailed(("enmType=%d\n", pLookup->enmType));
1200	break;
1201	}
1202
1203	/* next */
1204	if ((unsigned)pLookup->offNext == NIL_OFFSET)
1205	break;
1206	pLookup = (PMMLOOKUPHYPER)((uint8_t *)pLookup + pLookup->offNext);
1207	}
1208
1209	AssertMsgFailed(("pvR3=%p is not inside the hypervisor memory area!\n", pvR3));
1210	return NIL_RTHCPHYS;
1211	}
1212
1213
1214	/**
1215	* Implements the hcphys-not-found return case of MMR3HyperQueryInfoFromHCPhys.
1216	*
1217	* @returns VINF_SUCCESS, VINF_BUFFER_OVERFLOW.
1218	* @param pVM Pointer to the VM.
1219	* @param HCPhys The host physical address to look for.
1220	* @param pLookup The HMA lookup entry corresponding to HCPhys.
1221	* @param pszWhat Where to return the description.
1222	* @param cbWhat Size of the return buffer.
1223	* @param pcbAlloc Where to return the size of whatever it is.
1224	*/
1225	static int mmR3HyperQueryInfoFromHCPhysFound(PVM pVM, RTHCPHYS HCPhys, PMMLOOKUPHYPER pLookup,
1226	char pszWhat, size_t cbWhat, uint32_t pcbAlloc)
1227	{
1228	NOREF(pVM); NOREF(HCPhys);
1229	*pcbAlloc = pLookup->cb;
1230	int rc = RTStrCopy(pszWhat, cbWhat, pLookup->pszDesc);
1231	return rc == VERR_BUFFER_OVERFLOW ? VINF_BUFFER_OVERFLOW : rc;
1232	}
1233
1234
1235	/**
1236	* Scans the HMA for the physical page and reports back a description if found.
1237	*
1238	* @returns VINF_SUCCESS, VINF_BUFFER_OVERFLOW, VERR_NOT_FOUND.
1239	* @param pVM Pointer to the VM.
1240	* @param HCPhys The host physical address to look for.
1241	* @param pszWhat Where to return the description.
1242	* @param cbWhat Size of the return buffer.
1243	* @param pcbAlloc Where to return the size of whatever it is.
1244	*/
1245	VMMR3_INT_DECL(int) MMR3HyperQueryInfoFromHCPhys(PVM pVM, RTHCPHYS HCPhys, char pszWhat, size_t cbWhat, uint32_t pcbAlloc)
1246	{
1247	RTHCPHYS HCPhysPage = HCPhys & ~(RTHCPHYS)PAGE_OFFSET_MASK;
1248	PMMLOOKUPHYPER pLookup = (PMMLOOKUPHYPER)((uint8_t *)pVM->mm.s.pHyperHeapR3 + pVM->mm.s.offLookupHyper);
1249	for (;;)
1250	{
1251	switch (pLookup->enmType)
1252	{
1253	case MMLOOKUPHYPERTYPE_LOCKED:
1254	{
1255	uint32_t i = pLookup->cb >> PAGE_SHIFT;
1256	while (i-- > 0)
1257	if (pLookup->u.Locked.paHCPhysPages[i] == HCPhysPage)
1258	return mmR3HyperQueryInfoFromHCPhysFound(pVM, HCPhys, pLookup, pszWhat, cbWhat, pcbAlloc);
1259	break;
1260	}
1261
1262	case MMLOOKUPHYPERTYPE_HCPHYS:
1263	{
1264	if (pLookup->u.HCPhys.HCPhys - HCPhysPage < pLookup->cb)
1265	return mmR3HyperQueryInfoFromHCPhysFound(pVM, HCPhys, pLookup, pszWhat, cbWhat, pcbAlloc);
1266	break;
1267	}
1268
1269	case MMLOOKUPHYPERTYPE_MMIO2:
1270	case MMLOOKUPHYPERTYPE_GCPHYS:
1271	case MMLOOKUPHYPERTYPE_DYNAMIC:
1272	{
1273	/* brute force. */
1274	uint32_t i = pLookup->cb >> PAGE_SHIFT;
1275	while (i-- > 0)
1276	{
1277	RTGCPTR GCPtr = pLookup->off + pVM->mm.s.pvHyperAreaGC;
1278	RTHCPHYS HCPhysCur;
1279	int rc = PGMMapGetPage(pVM, GCPtr, NULL, &HCPhysCur);
1280	if (RT_SUCCESS(rc) && HCPhysCur == HCPhysPage)
1281	return mmR3HyperQueryInfoFromHCPhysFound(pVM, HCPhys, pLookup, pszWhat, cbWhat, pcbAlloc);
1282	}
1283	break;
1284	}
1285	default:
1286	AssertMsgFailed(("enmType=%d\n", pLookup->enmType));
1287	break;
1288	}
1289
1290	/* next */
1291	if ((unsigned)pLookup->offNext == NIL_OFFSET)
1292	break;
1293	pLookup = (PMMLOOKUPHYPER)((uint8_t *)pLookup + pLookup->offNext);
1294	}
1295	return VERR_NOT_FOUND;
1296	}
1297
1298
1299	#if 0 /* unused, not implemented */
1300	/**
1301	* Convert hypervisor HC physical address to HC virtual address.
1302	*
1303	* @returns HC virtual address.
1304	* @param pVM Pointer to the VM
1305	* @param HCPhys Host context physical address.
1306	*/
1307	VMMR3DECL(void *) MMR3HyperHCPhys2HCVirt(PVM pVM, RTHCPHYS HCPhys)
1308	{
1309	void *pv;
1310	int rc = MMR3HyperHCPhys2HCVirtEx(pVM, HCPhys, &pv);
1311	if (RT_SUCCESS(rc))
1312	return pv;
1313	AssertMsgFailed(("Invalid address HCPhys=%x rc=%d\n", HCPhys, rc));
1314	return NULL;
1315	}
1316
1317
1318	/**
1319	* Convert hypervisor HC physical address to HC virtual address.
1320	*
1321	* @returns VBox status.
1322	* @param pVM Pointer to the VM
1323	* @param HCPhys Host context physical address.
1324	* @param ppv Where to store the HC virtual address.
1325	*/
1326	VMMR3DECL(int) MMR3HyperHCPhys2HCVirtEx(PVM pVM, RTHCPHYS HCPhys, void **ppv)
1327	{
1328	/*
1329	* Linear search.
1330	*/
1331	/** @todo implement when actually used. */
1332	return VERR_INVALID_POINTER;
1333	}
1334	#endif /* unused, not implemented */
1335
1336
1337	/**
1338	* Read hypervisor memory from GC virtual address.
1339	*
1340	* @returns VBox status.
1341	* @param pVM Pointer to the VM.
1342	* @param pvDst Destination address (HC of course).
1343	* @param GCPtr GC virtual address.
1344	* @param cb Number of bytes to read.
1345	*
1346	* @remarks For DBGF only.
1347	*/
1348	VMMR3DECL(int) MMR3HyperReadGCVirt(PVM pVM, void *pvDst, RTGCPTR GCPtr, size_t cb)
1349	{
1350	if (GCPtr - pVM->mm.s.pvHyperAreaGC >= pVM->mm.s.cbHyperArea)
1351	return VERR_INVALID_POINTER;
1352	return PGMR3MapRead(pVM, pvDst, GCPtr, cb);
1353	}
1354
1355
1356	/**
1357	* Info handler for 'hma', it dumps the list of lookup records for the hypervisor memory area.
1358	*
1359	* @param pVM Pointer to the VM.
1360	* @param pHlp Callback functions for doing output.
1361	* @param pszArgs Argument string. Optional and specific to the handler.
1362	*/
1363	static DECLCALLBACK(void) mmR3HyperInfoHma(PVM pVM, PCDBGFINFOHLP pHlp, const char *pszArgs)
1364	{
1365	NOREF(pszArgs);
1366
1367	pHlp->pfnPrintf(pHlp, "Hypervisor Memory Area (HMA) Layout: Base %RGv, 0x%08x bytes\n",
1368	pVM->mm.s.pvHyperAreaGC, pVM->mm.s.cbHyperArea);
1369
1370	PMMLOOKUPHYPER pLookup = (PMMLOOKUPHYPER)((uint8_t *)pVM->mm.s.pHyperHeapR3 + pVM->mm.s.offLookupHyper);
1371	for (;;)
1372	{
1373	switch (pLookup->enmType)
1374	{
1375	case MMLOOKUPHYPERTYPE_LOCKED:
1376	pHlp->pfnPrintf(pHlp, "%RGv-%RGv %RHv %RHv LOCKED %-*s %s\n",
1377	pLookup->off + pVM->mm.s.pvHyperAreaGC,
1378	pLookup->off + pVM->mm.s.pvHyperAreaGC + pLookup->cb,
1379	pLookup->u.Locked.pvR3,
1380	pLookup->u.Locked.pvR0,
1381	sizeof(RTHCPTR) * 2, "",
1382	pLookup->pszDesc);
1383	break;
1384
1385	case MMLOOKUPHYPERTYPE_HCPHYS:
1386	pHlp->pfnPrintf(pHlp, "%RGv-%RGv %RHv %RHv HCPHYS %RHp %s\n",
1387	pLookup->off + pVM->mm.s.pvHyperAreaGC,
1388	pLookup->off + pVM->mm.s.pvHyperAreaGC + pLookup->cb,
1389	pLookup->u.HCPhys.pvR3,
1390	pLookup->u.HCPhys.pvR0,
1391	pLookup->u.HCPhys.HCPhys,
1392	pLookup->pszDesc);
1393	break;
1394
1395	case MMLOOKUPHYPERTYPE_GCPHYS:
1396	pHlp->pfnPrintf(pHlp, "%RGv-%RGv %s GCPHYS %RGp%s %s\n",
1397	pLookup->off + pVM->mm.s.pvHyperAreaGC,
1398	pLookup->off + pVM->mm.s.pvHyperAreaGC + pLookup->cb,
1399	sizeof(RTHCPTR) * 2 * 2 + 1, "",
1400	pLookup->u.GCPhys.GCPhys, RT_ABS((int)(sizeof(RTHCPHYS) - sizeof(RTGCPHYS))) * 2, "",
1401	pLookup->pszDesc);
1402	break;
1403
1404	case MMLOOKUPHYPERTYPE_MMIO2:
1405	pHlp->pfnPrintf(pHlp, "%RGv-%RGv %s MMIO2 %RGp%s %s\n",
1406	pLookup->off + pVM->mm.s.pvHyperAreaGC,
1407	pLookup->off + pVM->mm.s.pvHyperAreaGC + pLookup->cb,
1408	sizeof(RTHCPTR) * 2 * 2 + 1, "",
1409	pLookup->u.MMIO2.off, RT_ABS((int)(sizeof(RTHCPHYS) - sizeof(RTGCPHYS))) * 2, "",
1410	pLookup->pszDesc);
1411	break;
1412
1413	case MMLOOKUPHYPERTYPE_DYNAMIC:
1414	pHlp->pfnPrintf(pHlp, "%RGv-%RGv %s DYNAMIC %s %s\n",
1415	pLookup->off + pVM->mm.s.pvHyperAreaGC,
1416	pLookup->off + pVM->mm.s.pvHyperAreaGC + pLookup->cb,
1417	sizeof(RTHCPTR) * 2 * 2 + 1, "",
1418	sizeof(RTHCPTR) * 2, "",
1419	pLookup->pszDesc);
1420	break;
1421
1422	default:
1423	AssertMsgFailed(("enmType=%d\n", pLookup->enmType));
1424	break;
1425	}
1426
1427	/* next */
1428	if ((unsigned)pLookup->offNext == NIL_OFFSET)
1429	break;
1430	pLookup = (PMMLOOKUPHYPER)((uint8_t *)pLookup + pLookup->offNext);
1431	}
1432	}

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/VMM/VMMR3/MMHyper.cpp@ 48565

Download in other formats: