VirtualBox

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

Last change on this file since 56286 was 54823, checked in by vboxsync, 10 years ago

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

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette