VirtualBox

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

Last change on this file since 26522 was 26522, checked in by vboxsync, 15 years ago

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