VirtualBox

source: vbox/trunk/src/VBox/VMM/VMMR3/PGMPhys.cpp@ 93171

Last change on this file since 93171 was 93171, checked in by vboxsync, 3 years ago

VMM/PGMPhys: Don't assert on NIL ring-0 address in NEM mode. bugref:10122 bugref:10138

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id Revision
File size: 223.6 KB
Line 
1/* $Id: PGMPhys.cpp 93171 2022-01-11 00:59:10Z vboxsync $ */
2/** @file
3 * PGM - Page Manager and Monitor, Physical Memory Addressing.
4 */
5
6/*
7 * Copyright (C) 2006-2022 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_PGM_PHYS
23#define VBOX_WITHOUT_PAGING_BIT_FIELDS /* 64-bit bitfields are just asking for trouble. See @bugref{9841} and others. */
24#include <VBox/vmm/pgm.h>
25#include <VBox/vmm/iem.h>
26#include <VBox/vmm/iom.h>
27#include <VBox/vmm/mm.h>
28#include <VBox/vmm/nem.h>
29#include <VBox/vmm/stam.h>
30#include <VBox/vmm/pdmdev.h>
31#include "PGMInternal.h"
32#include <VBox/vmm/vmcc.h>
33
34#include "PGMInline.h"
35
36#include <VBox/sup.h>
37#include <VBox/param.h>
38#include <VBox/err.h>
39#include <VBox/log.h>
40#include <iprt/assert.h>
41#include <iprt/alloc.h>
42#include <iprt/asm.h>
43#ifdef VBOX_STRICT
44# include <iprt/crc.h>
45#endif
46#include <iprt/thread.h>
47#include <iprt/string.h>
48#include <iprt/system.h>
49
50
51/*********************************************************************************************************************************
52* Defined Constants And Macros *
53*********************************************************************************************************************************/
54/** The number of pages to free in one batch. */
55#define PGMPHYS_FREE_PAGE_BATCH_SIZE 128
56
57
58
59/*********************************************************************************************************************************
60* Reading and Writing Guest Pysical Memory *
61*********************************************************************************************************************************/
62
63/*
64 * PGMR3PhysReadU8-64
65 * PGMR3PhysWriteU8-64
66 */
67#define PGMPHYSFN_READNAME PGMR3PhysReadU8
68#define PGMPHYSFN_WRITENAME PGMR3PhysWriteU8
69#define PGMPHYS_DATASIZE 1
70#define PGMPHYS_DATATYPE uint8_t
71#include "PGMPhysRWTmpl.h"
72
73#define PGMPHYSFN_READNAME PGMR3PhysReadU16
74#define PGMPHYSFN_WRITENAME PGMR3PhysWriteU16
75#define PGMPHYS_DATASIZE 2
76#define PGMPHYS_DATATYPE uint16_t
77#include "PGMPhysRWTmpl.h"
78
79#define PGMPHYSFN_READNAME PGMR3PhysReadU32
80#define PGMPHYSFN_WRITENAME PGMR3PhysWriteU32
81#define PGMPHYS_DATASIZE 4
82#define PGMPHYS_DATATYPE uint32_t
83#include "PGMPhysRWTmpl.h"
84
85#define PGMPHYSFN_READNAME PGMR3PhysReadU64
86#define PGMPHYSFN_WRITENAME PGMR3PhysWriteU64
87#define PGMPHYS_DATASIZE 8
88#define PGMPHYS_DATATYPE uint64_t
89#include "PGMPhysRWTmpl.h"
90
91
92/**
93 * EMT worker for PGMR3PhysReadExternal.
94 */
95static DECLCALLBACK(int) pgmR3PhysReadExternalEMT(PVM pVM, PRTGCPHYS pGCPhys, void *pvBuf, size_t cbRead,
96 PGMACCESSORIGIN enmOrigin)
97{
98 VBOXSTRICTRC rcStrict = PGMPhysRead(pVM, *pGCPhys, pvBuf, cbRead, enmOrigin);
99 AssertMsg(rcStrict == VINF_SUCCESS, ("%Rrc\n", VBOXSTRICTRC_VAL(rcStrict))); NOREF(rcStrict);
100 return VINF_SUCCESS;
101}
102
103
104/**
105 * Read from physical memory, external users.
106 *
107 * @returns VBox status code.
108 * @retval VINF_SUCCESS.
109 *
110 * @param pVM The cross context VM structure.
111 * @param GCPhys Physical address to read from.
112 * @param pvBuf Where to read into.
113 * @param cbRead How many bytes to read.
114 * @param enmOrigin Who is calling.
115 *
116 * @thread Any but EMTs.
117 */
118VMMR3DECL(int) PGMR3PhysReadExternal(PVM pVM, RTGCPHYS GCPhys, void *pvBuf, size_t cbRead, PGMACCESSORIGIN enmOrigin)
119{
120 VM_ASSERT_OTHER_THREAD(pVM);
121
122 AssertMsgReturn(cbRead > 0, ("don't even think about reading zero bytes!\n"), VINF_SUCCESS);
123 LogFlow(("PGMR3PhysReadExternal: %RGp %d\n", GCPhys, cbRead));
124
125 PGM_LOCK_VOID(pVM);
126
127 /*
128 * Copy loop on ram ranges.
129 */
130 PPGMRAMRANGE pRam = pgmPhysGetRangeAtOrAbove(pVM, GCPhys);
131 for (;;)
132 {
133 /* Inside range or not? */
134 if (pRam && GCPhys >= pRam->GCPhys)
135 {
136 /*
137 * Must work our way thru this page by page.
138 */
139 RTGCPHYS off = GCPhys - pRam->GCPhys;
140 while (off < pRam->cb)
141 {
142 unsigned iPage = off >> PAGE_SHIFT;
143 PPGMPAGE pPage = &pRam->aPages[iPage];
144
145 /*
146 * If the page has an ALL access handler, we'll have to
147 * delegate the job to EMT.
148 */
149 if ( PGM_PAGE_HAS_ACTIVE_ALL_HANDLERS(pPage)
150 || PGM_PAGE_IS_SPECIAL_ALIAS_MMIO(pPage))
151 {
152 PGM_UNLOCK(pVM);
153
154 return VMR3ReqPriorityCallWait(pVM, VMCPUID_ANY, (PFNRT)pgmR3PhysReadExternalEMT, 5,
155 pVM, &GCPhys, pvBuf, cbRead, enmOrigin);
156 }
157 Assert(!PGM_PAGE_IS_MMIO_OR_SPECIAL_ALIAS(pPage));
158
159 /*
160 * Simple stuff, go ahead.
161 */
162 size_t cb = PAGE_SIZE - (off & PAGE_OFFSET_MASK);
163 if (cb > cbRead)
164 cb = cbRead;
165 PGMPAGEMAPLOCK PgMpLck;
166 const void *pvSrc;
167 int rc = pgmPhysGCPhys2CCPtrInternalReadOnly(pVM, pPage, pRam->GCPhys + off, &pvSrc, &PgMpLck);
168 if (RT_SUCCESS(rc))
169 {
170 memcpy(pvBuf, pvSrc, cb);
171 pgmPhysReleaseInternalPageMappingLock(pVM, &PgMpLck);
172 }
173 else
174 {
175 AssertLogRelMsgFailed(("pgmPhysGCPhys2CCPtrInternalReadOnly failed on %RGp / %R[pgmpage] -> %Rrc\n",
176 pRam->GCPhys + off, pPage, rc));
177 memset(pvBuf, 0xff, cb);
178 }
179
180 /* next page */
181 if (cb >= cbRead)
182 {
183 PGM_UNLOCK(pVM);
184 return VINF_SUCCESS;
185 }
186 cbRead -= cb;
187 off += cb;
188 GCPhys += cb;
189 pvBuf = (char *)pvBuf + cb;
190 } /* walk pages in ram range. */
191 }
192 else
193 {
194 LogFlow(("PGMPhysRead: Unassigned %RGp size=%u\n", GCPhys, cbRead));
195
196 /*
197 * Unassigned address space.
198 */
199 size_t cb = pRam ? pRam->GCPhys - GCPhys : ~(size_t)0;
200 if (cb >= cbRead)
201 {
202 memset(pvBuf, 0xff, cbRead);
203 break;
204 }
205 memset(pvBuf, 0xff, cb);
206
207 cbRead -= cb;
208 pvBuf = (char *)pvBuf + cb;
209 GCPhys += cb;
210 }
211
212 /* Advance range if necessary. */
213 while (pRam && GCPhys > pRam->GCPhysLast)
214 pRam = pRam->CTX_SUFF(pNext);
215 } /* Ram range walk */
216
217 PGM_UNLOCK(pVM);
218
219 return VINF_SUCCESS;
220}
221
222
223/**
224 * EMT worker for PGMR3PhysWriteExternal.
225 */
226static DECLCALLBACK(int) pgmR3PhysWriteExternalEMT(PVM pVM, PRTGCPHYS pGCPhys, const void *pvBuf, size_t cbWrite,
227 PGMACCESSORIGIN enmOrigin)
228{
229 /** @todo VERR_EM_NO_MEMORY */
230 VBOXSTRICTRC rcStrict = PGMPhysWrite(pVM, *pGCPhys, pvBuf, cbWrite, enmOrigin);
231 AssertMsg(rcStrict == VINF_SUCCESS, ("%Rrc\n", VBOXSTRICTRC_VAL(rcStrict))); NOREF(rcStrict);
232 return VINF_SUCCESS;
233}
234
235
236/**
237 * Write to physical memory, external users.
238 *
239 * @returns VBox status code.
240 * @retval VINF_SUCCESS.
241 * @retval VERR_EM_NO_MEMORY.
242 *
243 * @param pVM The cross context VM structure.
244 * @param GCPhys Physical address to write to.
245 * @param pvBuf What to write.
246 * @param cbWrite How many bytes to write.
247 * @param enmOrigin Who is calling.
248 *
249 * @thread Any but EMTs.
250 */
251VMMDECL(int) PGMR3PhysWriteExternal(PVM pVM, RTGCPHYS GCPhys, const void *pvBuf, size_t cbWrite, PGMACCESSORIGIN enmOrigin)
252{
253 VM_ASSERT_OTHER_THREAD(pVM);
254
255 AssertMsg(!pVM->pgm.s.fNoMorePhysWrites,
256 ("Calling PGMR3PhysWriteExternal after pgmR3Save()! GCPhys=%RGp cbWrite=%#x enmOrigin=%d\n",
257 GCPhys, cbWrite, enmOrigin));
258 AssertMsgReturn(cbWrite > 0, ("don't even think about writing zero bytes!\n"), VINF_SUCCESS);
259 LogFlow(("PGMR3PhysWriteExternal: %RGp %d\n", GCPhys, cbWrite));
260
261 PGM_LOCK_VOID(pVM);
262
263 /*
264 * Copy loop on ram ranges, stop when we hit something difficult.
265 */
266 PPGMRAMRANGE pRam = pgmPhysGetRangeAtOrAbove(pVM, GCPhys);
267 for (;;)
268 {
269 /* Inside range or not? */
270 if (pRam && GCPhys >= pRam->GCPhys)
271 {
272 /*
273 * Must work our way thru this page by page.
274 */
275 RTGCPTR off = GCPhys - pRam->GCPhys;
276 while (off < pRam->cb)
277 {
278 RTGCPTR iPage = off >> PAGE_SHIFT;
279 PPGMPAGE pPage = &pRam->aPages[iPage];
280
281 /*
282 * Is the page problematic, we have to do the work on the EMT.
283 *
284 * Allocating writable pages and access handlers are
285 * problematic, write monitored pages are simple and can be
286 * dealt with here.
287 */
288 if ( PGM_PAGE_HAS_ACTIVE_HANDLERS(pPage)
289 || PGM_PAGE_GET_STATE(pPage) != PGM_PAGE_STATE_ALLOCATED
290 || PGM_PAGE_IS_SPECIAL_ALIAS_MMIO(pPage))
291 {
292 if ( PGM_PAGE_GET_STATE(pPage) == PGM_PAGE_STATE_WRITE_MONITORED
293 && !PGM_PAGE_HAS_ACTIVE_HANDLERS(pPage))
294 pgmPhysPageMakeWriteMonitoredWritable(pVM, pPage, GCPhys);
295 else
296 {
297 PGM_UNLOCK(pVM);
298
299 return VMR3ReqPriorityCallWait(pVM, VMCPUID_ANY, (PFNRT)pgmR3PhysWriteExternalEMT, 5,
300 pVM, &GCPhys, pvBuf, cbWrite, enmOrigin);
301 }
302 }
303 Assert(!PGM_PAGE_IS_MMIO_OR_SPECIAL_ALIAS(pPage));
304
305 /*
306 * Simple stuff, go ahead.
307 */
308 size_t cb = PAGE_SIZE - (off & PAGE_OFFSET_MASK);
309 if (cb > cbWrite)
310 cb = cbWrite;
311 PGMPAGEMAPLOCK PgMpLck;
312 void *pvDst;
313 int rc = pgmPhysGCPhys2CCPtrInternal(pVM, pPage, pRam->GCPhys + off, &pvDst, &PgMpLck);
314 if (RT_SUCCESS(rc))
315 {
316 memcpy(pvDst, pvBuf, cb);
317 pgmPhysReleaseInternalPageMappingLock(pVM, &PgMpLck);
318 }
319 else
320 AssertLogRelMsgFailed(("pgmPhysGCPhys2CCPtrInternal failed on %RGp / %R[pgmpage] -> %Rrc\n",
321 pRam->GCPhys + off, pPage, rc));
322
323 /* next page */
324 if (cb >= cbWrite)
325 {
326 PGM_UNLOCK(pVM);
327 return VINF_SUCCESS;
328 }
329
330 cbWrite -= cb;
331 off += cb;
332 GCPhys += cb;
333 pvBuf = (const char *)pvBuf + cb;
334 } /* walk pages in ram range */
335 }
336 else
337 {
338 /*
339 * Unassigned address space, skip it.
340 */
341 if (!pRam)
342 break;
343 size_t cb = pRam->GCPhys - GCPhys;
344 if (cb >= cbWrite)
345 break;
346 cbWrite -= cb;
347 pvBuf = (const char *)pvBuf + cb;
348 GCPhys += cb;
349 }
350
351 /* Advance range if necessary. */
352 while (pRam && GCPhys > pRam->GCPhysLast)
353 pRam = pRam->CTX_SUFF(pNext);
354 } /* Ram range walk */
355
356 PGM_UNLOCK(pVM);
357 return VINF_SUCCESS;
358}
359
360
361/*********************************************************************************************************************************
362* Mapping Guest Physical Memory *
363*********************************************************************************************************************************/
364
365/**
366 * VMR3ReqCall worker for PGMR3PhysGCPhys2CCPtrExternal to make pages writable.
367 *
368 * @returns see PGMR3PhysGCPhys2CCPtrExternal
369 * @param pVM The cross context VM structure.
370 * @param pGCPhys Pointer to the guest physical address.
371 * @param ppv Where to store the mapping address.
372 * @param pLock Where to store the lock.
373 */
374static DECLCALLBACK(int) pgmR3PhysGCPhys2CCPtrDelegated(PVM pVM, PRTGCPHYS pGCPhys, void **ppv, PPGMPAGEMAPLOCK pLock)
375{
376 /*
377 * Just hand it to PGMPhysGCPhys2CCPtr and check that it's not a page with
378 * an access handler after it succeeds.
379 */
380 int rc = PGM_LOCK(pVM);
381 AssertRCReturn(rc, rc);
382
383 rc = PGMPhysGCPhys2CCPtr(pVM, *pGCPhys, ppv, pLock);
384 if (RT_SUCCESS(rc))
385 {
386 PPGMPAGEMAPTLBE pTlbe;
387 int rc2 = pgmPhysPageQueryTlbe(pVM, *pGCPhys, &pTlbe);
388 AssertFatalRC(rc2);
389 PPGMPAGE pPage = pTlbe->pPage;
390 if (PGM_PAGE_IS_MMIO_OR_SPECIAL_ALIAS(pPage))
391 {
392 PGMPhysReleasePageMappingLock(pVM, pLock);
393 rc = VERR_PGM_PHYS_PAGE_RESERVED;
394 }
395 else if ( PGM_PAGE_HAS_ACTIVE_HANDLERS(pPage)
396#ifdef PGMPOOL_WITH_OPTIMIZED_DIRTY_PT
397 || pgmPoolIsDirtyPage(pVM, *pGCPhys)
398#endif
399 )
400 {
401 /* We *must* flush any corresponding pgm pool page here, otherwise we'll
402 * not be informed about writes and keep bogus gst->shw mappings around.
403 */
404 pgmPoolFlushPageByGCPhys(pVM, *pGCPhys);
405 Assert(!PGM_PAGE_HAS_ACTIVE_HANDLERS(pPage));
406 /** @todo r=bird: return VERR_PGM_PHYS_PAGE_RESERVED here if it still has
407 * active handlers, see the PGMR3PhysGCPhys2CCPtrExternal docs. */
408 }
409 }
410
411 PGM_UNLOCK(pVM);
412 return rc;
413}
414
415
416/**
417 * Requests the mapping of a guest page into ring-3, external threads.
418 *
419 * When you're done with the page, call PGMPhysReleasePageMappingLock() ASAP to
420 * release it.
421 *
422 * This API will assume your intention is to write to the page, and will
423 * therefore replace shared and zero pages. If you do not intend to modify the
424 * page, use the PGMR3PhysGCPhys2CCPtrReadOnlyExternal() API.
425 *
426 * @returns VBox status code.
427 * @retval VINF_SUCCESS on success.
428 * @retval VERR_PGM_PHYS_PAGE_RESERVED it it's a valid page but has no physical
429 * backing or if the page has any active access handlers. The caller
430 * must fall back on using PGMR3PhysWriteExternal.
431 * @retval VERR_PGM_INVALID_GC_PHYSICAL_ADDRESS if it's not a valid physical address.
432 *
433 * @param pVM The cross context VM structure.
434 * @param GCPhys The guest physical address of the page that should be mapped.
435 * @param ppv Where to store the address corresponding to GCPhys.
436 * @param pLock Where to store the lock information that PGMPhysReleasePageMappingLock needs.
437 *
438 * @remark Avoid calling this API from within critical sections (other than the
439 * PGM one) because of the deadlock risk when we have to delegating the
440 * task to an EMT.
441 * @thread Any.
442 */
443VMMR3DECL(int) PGMR3PhysGCPhys2CCPtrExternal(PVM pVM, RTGCPHYS GCPhys, void **ppv, PPGMPAGEMAPLOCK pLock)
444{
445 AssertPtr(ppv);
446 AssertPtr(pLock);
447
448 Assert(VM_IS_EMT(pVM) || !PGMIsLockOwner(pVM));
449
450 int rc = PGM_LOCK(pVM);
451 AssertRCReturn(rc, rc);
452
453 /*
454 * Query the Physical TLB entry for the page (may fail).
455 */
456 PPGMPAGEMAPTLBE pTlbe;
457 rc = pgmPhysPageQueryTlbe(pVM, GCPhys, &pTlbe);
458 if (RT_SUCCESS(rc))
459 {
460 PPGMPAGE pPage = pTlbe->pPage;
461 if (PGM_PAGE_IS_MMIO_OR_SPECIAL_ALIAS(pPage))
462 rc = VERR_PGM_PHYS_PAGE_RESERVED;
463 else
464 {
465 /*
466 * If the page is shared, the zero page, or being write monitored
467 * it must be converted to an page that's writable if possible.
468 * We can only deal with write monitored pages here, the rest have
469 * to be on an EMT.
470 */
471 if ( PGM_PAGE_HAS_ACTIVE_HANDLERS(pPage)
472 || PGM_PAGE_GET_STATE(pPage) != PGM_PAGE_STATE_ALLOCATED
473#ifdef PGMPOOL_WITH_OPTIMIZED_DIRTY_PT
474 || pgmPoolIsDirtyPage(pVM, GCPhys)
475#endif
476 )
477 {
478 if ( PGM_PAGE_GET_STATE(pPage) == PGM_PAGE_STATE_WRITE_MONITORED
479 && !PGM_PAGE_HAS_ACTIVE_HANDLERS(pPage)
480#ifdef PGMPOOL_WITH_OPTIMIZED_DIRTY_PT
481 && !pgmPoolIsDirtyPage(pVM, GCPhys) /** @todo we're very likely doing this twice. */
482#endif
483 )
484 pgmPhysPageMakeWriteMonitoredWritable(pVM, pPage, GCPhys);
485 else
486 {
487 PGM_UNLOCK(pVM);
488
489 return VMR3ReqPriorityCallWait(pVM, VMCPUID_ANY, (PFNRT)pgmR3PhysGCPhys2CCPtrDelegated, 4,
490 pVM, &GCPhys, ppv, pLock);
491 }
492 }
493
494 /*
495 * Now, just perform the locking and calculate the return address.
496 */
497 PPGMPAGEMAP pMap = pTlbe->pMap;
498 if (pMap)
499 pMap->cRefs++;
500
501 unsigned cLocks = PGM_PAGE_GET_WRITE_LOCKS(pPage);
502 if (RT_LIKELY(cLocks < PGM_PAGE_MAX_LOCKS - 1))
503 {
504 if (cLocks == 0)
505 pVM->pgm.s.cWriteLockedPages++;
506 PGM_PAGE_INC_WRITE_LOCKS(pPage);
507 }
508 else if (cLocks != PGM_PAGE_GET_WRITE_LOCKS(pPage))
509 {
510 PGM_PAGE_INC_WRITE_LOCKS(pPage);
511 AssertMsgFailed(("%RGp / %R[pgmpage] is entering permanent write locked state!\n", GCPhys, pPage));
512 if (pMap)
513 pMap->cRefs++; /* Extra ref to prevent it from going away. */
514 }
515
516 *ppv = (void *)((uintptr_t)pTlbe->pv | (uintptr_t)(GCPhys & PAGE_OFFSET_MASK));
517 pLock->uPageAndType = (uintptr_t)pPage | PGMPAGEMAPLOCK_TYPE_WRITE;
518 pLock->pvMap = pMap;
519 }
520 }
521
522 PGM_UNLOCK(pVM);
523 return rc;
524}
525
526
527/**
528 * Requests the mapping of a guest page into ring-3, external threads.
529 *
530 * When you're done with the page, call PGMPhysReleasePageMappingLock() ASAP to
531 * release it.
532 *
533 * @returns VBox status code.
534 * @retval VINF_SUCCESS on success.
535 * @retval VERR_PGM_PHYS_PAGE_RESERVED it it's a valid page but has no physical
536 * backing or if the page as an active ALL access handler. The caller
537 * must fall back on using PGMPhysRead.
538 * @retval VERR_PGM_INVALID_GC_PHYSICAL_ADDRESS if it's not a valid physical address.
539 *
540 * @param pVM The cross context VM structure.
541 * @param GCPhys The guest physical address of the page that should be mapped.
542 * @param ppv Where to store the address corresponding to GCPhys.
543 * @param pLock Where to store the lock information that PGMPhysReleasePageMappingLock needs.
544 *
545 * @remark Avoid calling this API from within critical sections (other than
546 * the PGM one) because of the deadlock risk.
547 * @thread Any.
548 */
549VMMR3DECL(int) PGMR3PhysGCPhys2CCPtrReadOnlyExternal(PVM pVM, RTGCPHYS GCPhys, void const **ppv, PPGMPAGEMAPLOCK pLock)
550{
551 int rc = PGM_LOCK(pVM);
552 AssertRCReturn(rc, rc);
553
554 /*
555 * Query the Physical TLB entry for the page (may fail).
556 */
557 PPGMPAGEMAPTLBE pTlbe;
558 rc = pgmPhysPageQueryTlbe(pVM, GCPhys, &pTlbe);
559 if (RT_SUCCESS(rc))
560 {
561 PPGMPAGE pPage = pTlbe->pPage;
562#if 1
563 /* MMIO pages doesn't have any readable backing. */
564 if (PGM_PAGE_IS_MMIO_OR_SPECIAL_ALIAS(pPage))
565 rc = VERR_PGM_PHYS_PAGE_RESERVED;
566#else
567 if (PGM_PAGE_HAS_ACTIVE_ALL_HANDLERS(pPage))
568 rc = VERR_PGM_PHYS_PAGE_RESERVED;
569#endif
570 else
571 {
572 /*
573 * Now, just perform the locking and calculate the return address.
574 */
575 PPGMPAGEMAP pMap = pTlbe->pMap;
576 if (pMap)
577 pMap->cRefs++;
578
579 unsigned cLocks = PGM_PAGE_GET_READ_LOCKS(pPage);
580 if (RT_LIKELY(cLocks < PGM_PAGE_MAX_LOCKS - 1))
581 {
582 if (cLocks == 0)
583 pVM->pgm.s.cReadLockedPages++;
584 PGM_PAGE_INC_READ_LOCKS(pPage);
585 }
586 else if (cLocks != PGM_PAGE_GET_READ_LOCKS(pPage))
587 {
588 PGM_PAGE_INC_READ_LOCKS(pPage);
589 AssertMsgFailed(("%RGp / %R[pgmpage] is entering permanent readonly locked state!\n", GCPhys, pPage));
590 if (pMap)
591 pMap->cRefs++; /* Extra ref to prevent it from going away. */
592 }
593
594 *ppv = (void *)((uintptr_t)pTlbe->pv | (uintptr_t)(GCPhys & PAGE_OFFSET_MASK));
595 pLock->uPageAndType = (uintptr_t)pPage | PGMPAGEMAPLOCK_TYPE_READ;
596 pLock->pvMap = pMap;
597 }
598 }
599
600 PGM_UNLOCK(pVM);
601 return rc;
602}
603
604
605/**
606 * Requests the mapping of multiple guest page into ring-3, external threads.
607 *
608 * When you're done with the pages, call PGMPhysBulkReleasePageMappingLock()
609 * ASAP to release them.
610 *
611 * This API will assume your intention is to write to the pages, and will
612 * therefore replace shared and zero pages. If you do not intend to modify the
613 * pages, use the PGMR3PhysBulkGCPhys2CCPtrReadOnlyExternal() API.
614 *
615 * @returns VBox status code.
616 * @retval VINF_SUCCESS on success.
617 * @retval VERR_PGM_PHYS_PAGE_RESERVED if any of the pages has no physical
618 * backing or if any of the pages the page has any active access
619 * handlers. The caller must fall back on using PGMR3PhysWriteExternal.
620 * @retval VERR_PGM_INVALID_GC_PHYSICAL_ADDRESS if @a paGCPhysPages contains
621 * an invalid physical address.
622 *
623 * @param pVM The cross context VM structure.
624 * @param cPages Number of pages to lock.
625 * @param paGCPhysPages The guest physical address of the pages that
626 * should be mapped (@a cPages entries).
627 * @param papvPages Where to store the ring-3 mapping addresses
628 * corresponding to @a paGCPhysPages.
629 * @param paLocks Where to store the locking information that
630 * pfnPhysBulkReleasePageMappingLock needs (@a cPages
631 * in length).
632 *
633 * @remark Avoid calling this API from within critical sections (other than the
634 * PGM one) because of the deadlock risk when we have to delegating the
635 * task to an EMT.
636 * @thread Any.
637 */
638VMMR3DECL(int) PGMR3PhysBulkGCPhys2CCPtrExternal(PVM pVM, uint32_t cPages, PCRTGCPHYS paGCPhysPages,
639 void **papvPages, PPGMPAGEMAPLOCK paLocks)
640{
641 Assert(cPages > 0);
642 AssertPtr(papvPages);
643 AssertPtr(paLocks);
644
645 Assert(VM_IS_EMT(pVM) || !PGMIsLockOwner(pVM));
646
647 int rc = PGM_LOCK(pVM);
648 AssertRCReturn(rc, rc);
649
650 /*
651 * Lock the pages one by one.
652 * The loop body is similar to PGMR3PhysGCPhys2CCPtrExternal.
653 */
654 int32_t cNextYield = 128;
655 uint32_t iPage;
656 for (iPage = 0; iPage < cPages; iPage++)
657 {
658 if (--cNextYield > 0)
659 { /* likely */ }
660 else
661 {
662 PGM_UNLOCK(pVM);
663 ASMNopPause();
664 PGM_LOCK_VOID(pVM);
665 cNextYield = 128;
666 }
667
668 /*
669 * Query the Physical TLB entry for the page (may fail).
670 */
671 PPGMPAGEMAPTLBE pTlbe;
672 rc = pgmPhysPageQueryTlbe(pVM, paGCPhysPages[iPage], &pTlbe);
673 if (RT_SUCCESS(rc))
674 { }
675 else
676 break;
677 PPGMPAGE pPage = pTlbe->pPage;
678
679 /*
680 * No MMIO or active access handlers.
681 */
682 if ( !PGM_PAGE_IS_MMIO_OR_SPECIAL_ALIAS(pPage)
683 && !PGM_PAGE_HAS_ACTIVE_HANDLERS(pPage))
684 { }
685 else
686 {
687 rc = VERR_PGM_PHYS_PAGE_RESERVED;
688 break;
689 }
690
691 /*
692 * The page must be in the allocated state and not be a dirty pool page.
693 * We can handle converting a write monitored page to an allocated one, but
694 * anything more complicated must be delegated to an EMT.
695 */
696 bool fDelegateToEmt = false;
697 if (PGM_PAGE_GET_STATE(pPage) == PGM_PAGE_STATE_ALLOCATED)
698#ifdef PGMPOOL_WITH_OPTIMIZED_DIRTY_PT
699 fDelegateToEmt = pgmPoolIsDirtyPage(pVM, paGCPhysPages[iPage]);
700#else
701 fDelegateToEmt = false;
702#endif
703 else if (PGM_PAGE_GET_STATE(pPage) == PGM_PAGE_STATE_WRITE_MONITORED)
704 {
705#ifdef PGMPOOL_WITH_OPTIMIZED_DIRTY_PT
706 if (!pgmPoolIsDirtyPage(pVM, paGCPhysPages[iPage]))
707 pgmPhysPageMakeWriteMonitoredWritable(pVM, pPage, paGCPhysPages[iPage]);
708 else
709 fDelegateToEmt = true;
710#endif
711 }
712 else
713 fDelegateToEmt = true;
714 if (!fDelegateToEmt)
715 { }
716 else
717 {
718 /* We could do this delegation in bulk, but considered too much work vs gain. */
719 PGM_UNLOCK(pVM);
720 rc = VMR3ReqPriorityCallWait(pVM, VMCPUID_ANY, (PFNRT)pgmR3PhysGCPhys2CCPtrDelegated, 4,
721 pVM, &paGCPhysPages[iPage], &papvPages[iPage], &paLocks[iPage]);
722 PGM_LOCK_VOID(pVM);
723 if (RT_FAILURE(rc))
724 break;
725 cNextYield = 128;
726 }
727
728 /*
729 * Now, just perform the locking and address calculation.
730 */
731 PPGMPAGEMAP pMap = pTlbe->pMap;
732 if (pMap)
733 pMap->cRefs++;
734
735 unsigned cLocks = PGM_PAGE_GET_WRITE_LOCKS(pPage);
736 if (RT_LIKELY(cLocks < PGM_PAGE_MAX_LOCKS - 1))
737 {
738 if (cLocks == 0)
739 pVM->pgm.s.cWriteLockedPages++;
740 PGM_PAGE_INC_WRITE_LOCKS(pPage);
741 }
742 else if (cLocks != PGM_PAGE_GET_WRITE_LOCKS(pPage))
743 {
744 PGM_PAGE_INC_WRITE_LOCKS(pPage);
745 AssertMsgFailed(("%RGp / %R[pgmpage] is entering permanent write locked state!\n", paGCPhysPages[iPage], pPage));
746 if (pMap)
747 pMap->cRefs++; /* Extra ref to prevent it from going away. */
748 }
749
750 papvPages[iPage] = (void *)((uintptr_t)pTlbe->pv | (uintptr_t)(paGCPhysPages[iPage] & PAGE_OFFSET_MASK));
751 paLocks[iPage].uPageAndType = (uintptr_t)pPage | PGMPAGEMAPLOCK_TYPE_WRITE;
752 paLocks[iPage].pvMap = pMap;
753 }
754
755 PGM_UNLOCK(pVM);
756
757 /*
758 * On failure we must unlock any pages we managed to get already.
759 */
760 if (RT_FAILURE(rc) && iPage > 0)
761 PGMPhysBulkReleasePageMappingLocks(pVM, iPage, paLocks);
762
763 return rc;
764}
765
766
767/**
768 * Requests the mapping of multiple guest page into ring-3, for reading only,
769 * external threads.
770 *
771 * When you're done with the pages, call PGMPhysReleasePageMappingLock() ASAP
772 * to release them.
773 *
774 * @returns VBox status code.
775 * @retval VINF_SUCCESS on success.
776 * @retval VERR_PGM_PHYS_PAGE_RESERVED if any of the pages has no physical
777 * backing or if any of the pages the page has an active ALL access
778 * handler. The caller must fall back on using PGMR3PhysWriteExternal.
779 * @retval VERR_PGM_INVALID_GC_PHYSICAL_ADDRESS if @a paGCPhysPages contains
780 * an invalid physical address.
781 *
782 * @param pVM The cross context VM structure.
783 * @param cPages Number of pages to lock.
784 * @param paGCPhysPages The guest physical address of the pages that
785 * should be mapped (@a cPages entries).
786 * @param papvPages Where to store the ring-3 mapping addresses
787 * corresponding to @a paGCPhysPages.
788 * @param paLocks Where to store the lock information that
789 * pfnPhysReleasePageMappingLock needs (@a cPages
790 * in length).
791 *
792 * @remark Avoid calling this API from within critical sections (other than
793 * the PGM one) because of the deadlock risk.
794 * @thread Any.
795 */
796VMMR3DECL(int) PGMR3PhysBulkGCPhys2CCPtrReadOnlyExternal(PVM pVM, uint32_t cPages, PCRTGCPHYS paGCPhysPages,
797 void const **papvPages, PPGMPAGEMAPLOCK paLocks)
798{
799 Assert(cPages > 0);
800 AssertPtr(papvPages);
801 AssertPtr(paLocks);
802
803 Assert(VM_IS_EMT(pVM) || !PGMIsLockOwner(pVM));
804
805 int rc = PGM_LOCK(pVM);
806 AssertRCReturn(rc, rc);
807
808 /*
809 * Lock the pages one by one.
810 * The loop body is similar to PGMR3PhysGCPhys2CCPtrReadOnlyExternal.
811 */
812 int32_t cNextYield = 256;
813 uint32_t iPage;
814 for (iPage = 0; iPage < cPages; iPage++)
815 {
816 if (--cNextYield > 0)
817 { /* likely */ }
818 else
819 {
820 PGM_UNLOCK(pVM);
821 ASMNopPause();
822 PGM_LOCK_VOID(pVM);
823 cNextYield = 256;
824 }
825
826 /*
827 * Query the Physical TLB entry for the page (may fail).
828 */
829 PPGMPAGEMAPTLBE pTlbe;
830 rc = pgmPhysPageQueryTlbe(pVM, paGCPhysPages[iPage], &pTlbe);
831 if (RT_SUCCESS(rc))
832 { }
833 else
834 break;
835 PPGMPAGE pPage = pTlbe->pPage;
836
837 /*
838 * No MMIO or active all access handlers, everything else can be accessed.
839 */
840 if ( !PGM_PAGE_IS_MMIO_OR_SPECIAL_ALIAS(pPage)
841 && !PGM_PAGE_HAS_ACTIVE_ALL_HANDLERS(pPage))
842 { }
843 else
844 {
845 rc = VERR_PGM_PHYS_PAGE_RESERVED;
846 break;
847 }
848
849 /*
850 * Now, just perform the locking and address calculation.
851 */
852 PPGMPAGEMAP pMap = pTlbe->pMap;
853 if (pMap)
854 pMap->cRefs++;
855
856 unsigned cLocks = PGM_PAGE_GET_READ_LOCKS(pPage);
857 if (RT_LIKELY(cLocks < PGM_PAGE_MAX_LOCKS - 1))
858 {
859 if (cLocks == 0)
860 pVM->pgm.s.cReadLockedPages++;
861 PGM_PAGE_INC_READ_LOCKS(pPage);
862 }
863 else if (cLocks != PGM_PAGE_GET_READ_LOCKS(pPage))
864 {
865 PGM_PAGE_INC_READ_LOCKS(pPage);
866 AssertMsgFailed(("%RGp / %R[pgmpage] is entering permanent readonly locked state!\n", paGCPhysPages[iPage], pPage));
867 if (pMap)
868 pMap->cRefs++; /* Extra ref to prevent it from going away. */
869 }
870
871 papvPages[iPage] = (void *)((uintptr_t)pTlbe->pv | (uintptr_t)(paGCPhysPages[iPage] & PAGE_OFFSET_MASK));
872 paLocks[iPage].uPageAndType = (uintptr_t)pPage | PGMPAGEMAPLOCK_TYPE_READ;
873 paLocks[iPage].pvMap = pMap;
874 }
875
876 PGM_UNLOCK(pVM);
877
878 /*
879 * On failure we must unlock any pages we managed to get already.
880 */
881 if (RT_FAILURE(rc) && iPage > 0)
882 PGMPhysBulkReleasePageMappingLocks(pVM, iPage, paLocks);
883
884 return rc;
885}
886
887
888/**
889 * Converts a GC physical address to a HC ring-3 pointer, with some
890 * additional checks.
891 *
892 * @returns VBox status code.
893 * @retval VINF_SUCCESS on success.
894 * @retval VINF_PGM_PHYS_TLB_CATCH_WRITE and *ppv set if the page has a write
895 * access handler of some kind.
896 * @retval VERR_PGM_PHYS_TLB_CATCH_ALL if the page has a handler catching all
897 * accesses or is odd in any way.
898 * @retval VERR_PGM_PHYS_TLB_UNASSIGNED if the page doesn't exist.
899 *
900 * @param pVM The cross context VM structure.
901 * @param GCPhys The GC physical address to convert. Since this is only
902 * used for filling the REM TLB, the A20 mask must be
903 * applied before calling this API.
904 * @param fWritable Whether write access is required.
905 * @param ppv Where to store the pointer corresponding to GCPhys on
906 * success.
907 */
908VMMR3DECL(int) PGMR3PhysTlbGCPhys2Ptr(PVM pVM, RTGCPHYS GCPhys, bool fWritable, void **ppv)
909{
910 PGM_LOCK_VOID(pVM);
911 PGM_A20_ASSERT_MASKED(VMMGetCpu(pVM), GCPhys);
912
913 PPGMRAMRANGE pRam;
914 PPGMPAGE pPage;
915 int rc = pgmPhysGetPageAndRangeEx(pVM, GCPhys, &pPage, &pRam);
916 if (RT_SUCCESS(rc))
917 {
918 if (PGM_PAGE_IS_BALLOONED(pPage))
919 rc = VINF_PGM_PHYS_TLB_CATCH_WRITE;
920 else if (!PGM_PAGE_HAS_ANY_HANDLERS(pPage))
921 rc = VINF_SUCCESS;
922 else
923 {
924 if (PGM_PAGE_HAS_ACTIVE_ALL_HANDLERS(pPage)) /* catches MMIO */
925 rc = VERR_PGM_PHYS_TLB_CATCH_ALL;
926 else if (PGM_PAGE_HAS_ACTIVE_HANDLERS(pPage))
927 {
928 /** @todo Handle TLB loads of virtual handlers so ./test.sh can be made to work
929 * in -norawr0 mode. */
930 if (fWritable)
931 rc = VINF_PGM_PHYS_TLB_CATCH_WRITE;
932 }
933 else
934 {
935 /* Temporarily disabled physical handler(s), since the recompiler
936 doesn't get notified when it's reset we'll have to pretend it's
937 operating normally. */
938 if (pgmHandlerPhysicalIsAll(pVM, GCPhys))
939 rc = VERR_PGM_PHYS_TLB_CATCH_ALL;
940 else
941 rc = VINF_PGM_PHYS_TLB_CATCH_WRITE;
942 }
943 }
944 if (RT_SUCCESS(rc))
945 {
946 int rc2;
947
948 /* Make sure what we return is writable. */
949 if (fWritable)
950 switch (PGM_PAGE_GET_STATE(pPage))
951 {
952 case PGM_PAGE_STATE_ALLOCATED:
953 break;
954 case PGM_PAGE_STATE_BALLOONED:
955 AssertFailed();
956 break;
957 case PGM_PAGE_STATE_ZERO:
958 case PGM_PAGE_STATE_SHARED:
959 if (rc == VINF_PGM_PHYS_TLB_CATCH_WRITE)
960 break;
961 RT_FALL_THRU();
962 case PGM_PAGE_STATE_WRITE_MONITORED:
963 rc2 = pgmPhysPageMakeWritable(pVM, pPage, GCPhys & ~(RTGCPHYS)PAGE_OFFSET_MASK);
964 AssertLogRelRCReturn(rc2, rc2);
965 break;
966 }
967
968 /* Get a ring-3 mapping of the address. */
969 PPGMPAGER3MAPTLBE pTlbe;
970 rc2 = pgmPhysPageQueryTlbe(pVM, GCPhys, &pTlbe);
971 AssertLogRelRCReturn(rc2, rc2);
972 *ppv = (void *)((uintptr_t)pTlbe->pv | (uintptr_t)(GCPhys & PAGE_OFFSET_MASK));
973 /** @todo mapping/locking hell; this isn't horribly efficient since
974 * pgmPhysPageLoadIntoTlb will repeat the lookup we've done here. */
975
976 Log6(("PGMR3PhysTlbGCPhys2Ptr: GCPhys=%RGp rc=%Rrc pPage=%R[pgmpage] *ppv=%p\n", GCPhys, rc, pPage, *ppv));
977 }
978 else
979 Log6(("PGMR3PhysTlbGCPhys2Ptr: GCPhys=%RGp rc=%Rrc pPage=%R[pgmpage]\n", GCPhys, rc, pPage));
980
981 /* else: handler catching all access, no pointer returned. */
982 }
983 else
984 rc = VERR_PGM_PHYS_TLB_UNASSIGNED;
985
986 PGM_UNLOCK(pVM);
987 return rc;
988}
989
990
991
992/*********************************************************************************************************************************
993* RAM Range Management *
994*********************************************************************************************************************************/
995
996#define MAKE_LEAF(a_pNode) \
997 do { \
998 (a_pNode)->pLeftR3 = NIL_RTR3PTR; \
999 (a_pNode)->pRightR3 = NIL_RTR3PTR; \
1000 (a_pNode)->pLeftR0 = NIL_RTR0PTR; \
1001 (a_pNode)->pRightR0 = NIL_RTR0PTR; \
1002 } while (0)
1003
1004#define INSERT_LEFT(a_pParent, a_pNode) \
1005 do { \
1006 (a_pParent)->pLeftR3 = (a_pNode); \
1007 (a_pParent)->pLeftR0 = (a_pNode)->pSelfR0; \
1008 } while (0)
1009#define INSERT_RIGHT(a_pParent, a_pNode) \
1010 do { \
1011 (a_pParent)->pRightR3 = (a_pNode); \
1012 (a_pParent)->pRightR0 = (a_pNode)->pSelfR0; \
1013 } while (0)
1014
1015
1016/**
1017 * Recursive tree builder.
1018 *
1019 * @param ppRam Pointer to the iterator variable.
1020 * @param iDepth The current depth. Inserts a leaf node if 0.
1021 */
1022static PPGMRAMRANGE pgmR3PhysRebuildRamRangeSearchTreesRecursively(PPGMRAMRANGE *ppRam, int iDepth)
1023{
1024 PPGMRAMRANGE pRam;
1025 if (iDepth <= 0)
1026 {
1027 /*
1028 * Leaf node.
1029 */
1030 pRam = *ppRam;
1031 if (pRam)
1032 {
1033 *ppRam = pRam->pNextR3;
1034 MAKE_LEAF(pRam);
1035 }
1036 }
1037 else
1038 {
1039
1040 /*
1041 * Intermediate node.
1042 */
1043 PPGMRAMRANGE pLeft = pgmR3PhysRebuildRamRangeSearchTreesRecursively(ppRam, iDepth - 1);
1044
1045 pRam = *ppRam;
1046 if (!pRam)
1047 return pLeft;
1048 *ppRam = pRam->pNextR3;
1049 MAKE_LEAF(pRam);
1050 INSERT_LEFT(pRam, pLeft);
1051
1052 PPGMRAMRANGE pRight = pgmR3PhysRebuildRamRangeSearchTreesRecursively(ppRam, iDepth - 1);
1053 if (pRight)
1054 INSERT_RIGHT(pRam, pRight);
1055 }
1056 return pRam;
1057}
1058
1059
1060/**
1061 * Rebuilds the RAM range search trees.
1062 *
1063 * @param pVM The cross context VM structure.
1064 */
1065static void pgmR3PhysRebuildRamRangeSearchTrees(PVM pVM)
1066{
1067
1068 /*
1069 * Create the reasonably balanced tree in a sequential fashion.
1070 * For simplicity (laziness) we use standard recursion here.
1071 */
1072 int iDepth = 0;
1073 PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3;
1074 PPGMRAMRANGE pRoot = pgmR3PhysRebuildRamRangeSearchTreesRecursively(&pRam, 0);
1075 while (pRam)
1076 {
1077 PPGMRAMRANGE pLeft = pRoot;
1078
1079 pRoot = pRam;
1080 pRam = pRam->pNextR3;
1081 MAKE_LEAF(pRoot);
1082 INSERT_LEFT(pRoot, pLeft);
1083
1084 PPGMRAMRANGE pRight = pgmR3PhysRebuildRamRangeSearchTreesRecursively(&pRam, iDepth);
1085 if (pRight)
1086 INSERT_RIGHT(pRoot, pRight);
1087 /** @todo else: rotate the tree. */
1088
1089 iDepth++;
1090 }
1091
1092 pVM->pgm.s.pRamRangeTreeR3 = pRoot;
1093 pVM->pgm.s.pRamRangeTreeR0 = pRoot ? pRoot->pSelfR0 : NIL_RTR0PTR;
1094
1095#ifdef VBOX_STRICT
1096 /*
1097 * Verify that the above code works.
1098 */
1099 unsigned cRanges = 0;
1100 for (pRam = pVM->pgm.s.pRamRangesXR3; pRam; pRam = pRam->pNextR3)
1101 cRanges++;
1102 Assert(cRanges > 0);
1103
1104 unsigned cMaxDepth = ASMBitLastSetU32(cRanges);
1105 if ((1U << cMaxDepth) < cRanges)
1106 cMaxDepth++;
1107
1108 for (pRam = pVM->pgm.s.pRamRangesXR3; pRam; pRam = pRam->pNextR3)
1109 {
1110 unsigned cDepth = 0;
1111 PPGMRAMRANGE pRam2 = pVM->pgm.s.pRamRangeTreeR3;
1112 for (;;)
1113 {
1114 if (pRam == pRam2)
1115 break;
1116 Assert(pRam2);
1117 if (pRam->GCPhys < pRam2->GCPhys)
1118 pRam2 = pRam2->pLeftR3;
1119 else
1120 pRam2 = pRam2->pRightR3;
1121 }
1122 AssertMsg(cDepth <= cMaxDepth, ("cDepth=%d cMaxDepth=%d\n", cDepth, cMaxDepth));
1123 }
1124#endif /* VBOX_STRICT */
1125}
1126
1127#undef MAKE_LEAF
1128#undef INSERT_LEFT
1129#undef INSERT_RIGHT
1130
1131/**
1132 * Relinks the RAM ranges using the pSelfRC and pSelfR0 pointers.
1133 *
1134 * Called when anything was relocated.
1135 *
1136 * @param pVM The cross context VM structure.
1137 */
1138void pgmR3PhysRelinkRamRanges(PVM pVM)
1139{
1140 PPGMRAMRANGE pCur;
1141
1142#ifdef VBOX_STRICT
1143 for (pCur = pVM->pgm.s.pRamRangesXR3; pCur; pCur = pCur->pNextR3)
1144 {
1145 Assert((pCur->fFlags & PGM_RAM_RANGE_FLAGS_FLOATING) || pCur->pSelfR0 == MMHyperCCToR0(pVM, pCur));
1146 Assert((pCur->GCPhys & PAGE_OFFSET_MASK) == 0);
1147 Assert((pCur->GCPhysLast & PAGE_OFFSET_MASK) == PAGE_OFFSET_MASK);
1148 Assert((pCur->cb & PAGE_OFFSET_MASK) == 0);
1149 Assert(pCur->cb == pCur->GCPhysLast - pCur->GCPhys + 1);
1150 for (PPGMRAMRANGE pCur2 = pVM->pgm.s.pRamRangesXR3; pCur2; pCur2 = pCur2->pNextR3)
1151 Assert( pCur2 == pCur
1152 || strcmp(pCur2->pszDesc, pCur->pszDesc)); /** @todo fix MMIO ranges!! */
1153 }
1154#endif
1155
1156 pCur = pVM->pgm.s.pRamRangesXR3;
1157 if (pCur)
1158 {
1159 pVM->pgm.s.pRamRangesXR0 = pCur->pSelfR0;
1160
1161 for (; pCur->pNextR3; pCur = pCur->pNextR3)
1162 pCur->pNextR0 = pCur->pNextR3->pSelfR0;
1163
1164 Assert(pCur->pNextR0 == NIL_RTR0PTR);
1165 }
1166 else
1167 {
1168 Assert(pVM->pgm.s.pRamRangesXR0 == NIL_RTR0PTR);
1169 }
1170 ASMAtomicIncU32(&pVM->pgm.s.idRamRangesGen);
1171
1172 pgmR3PhysRebuildRamRangeSearchTrees(pVM);
1173}
1174
1175
1176/**
1177 * Links a new RAM range into the list.
1178 *
1179 * @param pVM The cross context VM structure.
1180 * @param pNew Pointer to the new list entry.
1181 * @param pPrev Pointer to the previous list entry. If NULL, insert as head.
1182 */
1183static void pgmR3PhysLinkRamRange(PVM pVM, PPGMRAMRANGE pNew, PPGMRAMRANGE pPrev)
1184{
1185 AssertMsg(pNew->pszDesc, ("%RGp-%RGp\n", pNew->GCPhys, pNew->GCPhysLast));
1186 Assert((pNew->fFlags & PGM_RAM_RANGE_FLAGS_FLOATING) || pNew->pSelfR0 == MMHyperCCToR0(pVM, pNew));
1187
1188 PGM_LOCK_VOID(pVM);
1189
1190 PPGMRAMRANGE pRam = pPrev ? pPrev->pNextR3 : pVM->pgm.s.pRamRangesXR3;
1191 pNew->pNextR3 = pRam;
1192 pNew->pNextR0 = pRam ? pRam->pSelfR0 : NIL_RTR0PTR;
1193
1194 if (pPrev)
1195 {
1196 pPrev->pNextR3 = pNew;
1197 pPrev->pNextR0 = pNew->pSelfR0;
1198 }
1199 else
1200 {
1201 pVM->pgm.s.pRamRangesXR3 = pNew;
1202 pVM->pgm.s.pRamRangesXR0 = pNew->pSelfR0;
1203 }
1204 ASMAtomicIncU32(&pVM->pgm.s.idRamRangesGen);
1205
1206 pgmR3PhysRebuildRamRangeSearchTrees(pVM);
1207 PGM_UNLOCK(pVM);
1208}
1209
1210
1211/**
1212 * Unlink an existing RAM range from the list.
1213 *
1214 * @param pVM The cross context VM structure.
1215 * @param pRam Pointer to the new list entry.
1216 * @param pPrev Pointer to the previous list entry. If NULL, insert as head.
1217 */
1218static void pgmR3PhysUnlinkRamRange2(PVM pVM, PPGMRAMRANGE pRam, PPGMRAMRANGE pPrev)
1219{
1220 Assert(pPrev ? pPrev->pNextR3 == pRam : pVM->pgm.s.pRamRangesXR3 == pRam);
1221 Assert((pRam->fFlags & PGM_RAM_RANGE_FLAGS_FLOATING) || pRam->pSelfR0 == MMHyperCCToR0(pVM, pRam));
1222
1223 PGM_LOCK_VOID(pVM);
1224
1225 PPGMRAMRANGE pNext = pRam->pNextR3;
1226 if (pPrev)
1227 {
1228 pPrev->pNextR3 = pNext;
1229 pPrev->pNextR0 = pNext ? pNext->pSelfR0 : NIL_RTR0PTR;
1230 }
1231 else
1232 {
1233 Assert(pVM->pgm.s.pRamRangesXR3 == pRam);
1234 pVM->pgm.s.pRamRangesXR3 = pNext;
1235 pVM->pgm.s.pRamRangesXR0 = pNext ? pNext->pSelfR0 : NIL_RTR0PTR;
1236 }
1237 ASMAtomicIncU32(&pVM->pgm.s.idRamRangesGen);
1238
1239 pgmR3PhysRebuildRamRangeSearchTrees(pVM);
1240 PGM_UNLOCK(pVM);
1241}
1242
1243
1244/**
1245 * Unlink an existing RAM range from the list.
1246 *
1247 * @param pVM The cross context VM structure.
1248 * @param pRam Pointer to the new list entry.
1249 */
1250static void pgmR3PhysUnlinkRamRange(PVM pVM, PPGMRAMRANGE pRam)
1251{
1252 PGM_LOCK_VOID(pVM);
1253
1254 /* find prev. */
1255 PPGMRAMRANGE pPrev = NULL;
1256 PPGMRAMRANGE pCur = pVM->pgm.s.pRamRangesXR3;
1257 while (pCur != pRam)
1258 {
1259 pPrev = pCur;
1260 pCur = pCur->pNextR3;
1261 }
1262 AssertFatal(pCur);
1263
1264 pgmR3PhysUnlinkRamRange2(pVM, pRam, pPrev);
1265 PGM_UNLOCK(pVM);
1266}
1267
1268
1269/**
1270 * Gets the number of ram ranges.
1271 *
1272 * @returns Number of ram ranges. Returns UINT32_MAX if @a pVM is invalid.
1273 * @param pVM The cross context VM structure.
1274 */
1275VMMR3DECL(uint32_t) PGMR3PhysGetRamRangeCount(PVM pVM)
1276{
1277 VM_ASSERT_VALID_EXT_RETURN(pVM, UINT32_MAX);
1278
1279 PGM_LOCK_VOID(pVM);
1280 uint32_t cRamRanges = 0;
1281 for (PPGMRAMRANGE pCur = pVM->pgm.s.CTX_SUFF(pRamRangesX); pCur; pCur = pCur->CTX_SUFF(pNext))
1282 cRamRanges++;
1283 PGM_UNLOCK(pVM);
1284 return cRamRanges;
1285}
1286
1287
1288/**
1289 * Get information about a range.
1290 *
1291 * @returns VINF_SUCCESS or VERR_OUT_OF_RANGE.
1292 * @param pVM The cross context VM structure.
1293 * @param iRange The ordinal of the range.
1294 * @param pGCPhysStart Where to return the start of the range. Optional.
1295 * @param pGCPhysLast Where to return the address of the last byte in the
1296 * range. Optional.
1297 * @param ppszDesc Where to return the range description. Optional.
1298 * @param pfIsMmio Where to indicate that this is a pure MMIO range.
1299 * Optional.
1300 */
1301VMMR3DECL(int) PGMR3PhysGetRange(PVM pVM, uint32_t iRange, PRTGCPHYS pGCPhysStart, PRTGCPHYS pGCPhysLast,
1302 const char **ppszDesc, bool *pfIsMmio)
1303{
1304 VM_ASSERT_VALID_EXT_RETURN(pVM, VERR_INVALID_VM_HANDLE);
1305
1306 PGM_LOCK_VOID(pVM);
1307 uint32_t iCurRange = 0;
1308 for (PPGMRAMRANGE pCur = pVM->pgm.s.CTX_SUFF(pRamRangesX); pCur; pCur = pCur->CTX_SUFF(pNext), iCurRange++)
1309 if (iCurRange == iRange)
1310 {
1311 if (pGCPhysStart)
1312 *pGCPhysStart = pCur->GCPhys;
1313 if (pGCPhysLast)
1314 *pGCPhysLast = pCur->GCPhysLast;
1315 if (ppszDesc)
1316 *ppszDesc = pCur->pszDesc;
1317 if (pfIsMmio)
1318 *pfIsMmio = !!(pCur->fFlags & PGM_RAM_RANGE_FLAGS_AD_HOC_MMIO);
1319
1320 PGM_UNLOCK(pVM);
1321 return VINF_SUCCESS;
1322 }
1323 PGM_UNLOCK(pVM);
1324 return VERR_OUT_OF_RANGE;
1325}
1326
1327
1328/*********************************************************************************************************************************
1329* RAM *
1330*********************************************************************************************************************************/
1331
1332/**
1333 * Frees the specified RAM page and replaces it with the ZERO page.
1334 *
1335 * This is used by ballooning, remapping MMIO2, RAM reset and state loading.
1336 *
1337 * @param pVM The cross context VM structure.
1338 * @param pReq Pointer to the request. This is NULL when doing a
1339 * bulk free in NEM memory mode.
1340 * @param pcPendingPages Where the number of pages waiting to be freed are
1341 * kept. This will normally be incremented. This is
1342 * NULL when doing a bulk free in NEM memory mode.
1343 * @param pPage Pointer to the page structure.
1344 * @param GCPhys The guest physical address of the page, if applicable.
1345 * @param enmNewType New page type for NEM notification, since several
1346 * callers will change the type upon successful return.
1347 *
1348 * @remarks The caller must own the PGM lock.
1349 */
1350int pgmPhysFreePage(PVM pVM, PGMMFREEPAGESREQ pReq, uint32_t *pcPendingPages, PPGMPAGE pPage, RTGCPHYS GCPhys,
1351 PGMPAGETYPE enmNewType)
1352{
1353 /*
1354 * Assert sanity.
1355 */
1356 PGM_LOCK_ASSERT_OWNER(pVM);
1357 if (RT_UNLIKELY( PGM_PAGE_GET_TYPE(pPage) != PGMPAGETYPE_RAM
1358 && PGM_PAGE_GET_TYPE(pPage) != PGMPAGETYPE_ROM_SHADOW))
1359 {
1360 AssertMsgFailed(("GCPhys=%RGp pPage=%R[pgmpage]\n", GCPhys, pPage));
1361 return VMSetError(pVM, VERR_PGM_PHYS_NOT_RAM, RT_SRC_POS, "GCPhys=%RGp type=%d", GCPhys, PGM_PAGE_GET_TYPE(pPage));
1362 }
1363
1364 /** @todo What about ballooning of large pages??! */
1365 Assert( PGM_PAGE_GET_PDE_TYPE(pPage) != PGM_PAGE_PDE_TYPE_PDE
1366 && PGM_PAGE_GET_PDE_TYPE(pPage) != PGM_PAGE_PDE_TYPE_PDE_DISABLED);
1367
1368 if ( PGM_PAGE_IS_ZERO(pPage)
1369 || PGM_PAGE_IS_BALLOONED(pPage))
1370 return VINF_SUCCESS;
1371
1372 const uint32_t idPage = PGM_PAGE_GET_PAGEID(pPage);
1373 Log3(("pgmPhysFreePage: idPage=%#x GCPhys=%RGp pPage=%R[pgmpage]\n", idPage, GCPhys, pPage));
1374 if (RT_UNLIKELY(!PGM_IS_IN_NEM_MODE(pVM)
1375 ? idPage == NIL_GMM_PAGEID
1376 || idPage > GMM_PAGEID_LAST
1377 || PGM_PAGE_GET_CHUNKID(pPage) == NIL_GMM_CHUNKID
1378 : idPage != NIL_GMM_PAGEID))
1379 {
1380 AssertMsgFailed(("GCPhys=%RGp pPage=%R[pgmpage]\n", GCPhys, pPage));
1381 return VMSetError(pVM, VERR_PGM_PHYS_INVALID_PAGE_ID, RT_SRC_POS, "GCPhys=%RGp idPage=%#x", GCPhys, pPage);
1382 }
1383#ifdef VBOX_WITH_NATIVE_NEM
1384 const RTHCPHYS HCPhysPrev = PGM_PAGE_GET_HCPHYS(pPage);
1385#endif
1386
1387 /* update page count stats. */
1388 if (PGM_PAGE_IS_SHARED(pPage))
1389 pVM->pgm.s.cSharedPages--;
1390 else
1391 pVM->pgm.s.cPrivatePages--;
1392 pVM->pgm.s.cZeroPages++;
1393
1394 /* Deal with write monitored pages. */
1395 if (PGM_PAGE_GET_STATE(pPage) == PGM_PAGE_STATE_WRITE_MONITORED)
1396 {
1397 PGM_PAGE_SET_WRITTEN_TO(pVM, pPage);
1398 pVM->pgm.s.cWrittenToPages++;
1399 }
1400
1401 /*
1402 * pPage = ZERO page.
1403 */
1404 PGM_PAGE_SET_HCPHYS(pVM, pPage, pVM->pgm.s.HCPhysZeroPg);
1405 PGM_PAGE_SET_STATE(pVM, pPage, PGM_PAGE_STATE_ZERO);
1406 PGM_PAGE_SET_PAGEID(pVM, pPage, NIL_GMM_PAGEID);
1407 PGM_PAGE_SET_PDE_TYPE(pVM, pPage, PGM_PAGE_PDE_TYPE_DONTCARE);
1408 PGM_PAGE_SET_PTE_INDEX(pVM, pPage, 0);
1409 PGM_PAGE_SET_TRACKING(pVM, pPage, 0);
1410
1411 /* Flush physical page map TLB entry. */
1412 pgmPhysInvalidatePageMapTLBEntry(pVM, GCPhys);
1413
1414#ifdef VBOX_WITH_PGM_NEM_MODE
1415 /*
1416 * Skip the rest if we're doing a bulk free in NEM memory mode.
1417 */
1418 if (!pReq)
1419 return VINF_SUCCESS;
1420 AssertLogRelReturn(!pVM->pgm.s.fNemMode, VERR_PGM_NOT_SUPPORTED_FOR_NEM_MODE);
1421#endif
1422
1423#ifdef VBOX_WITH_NATIVE_NEM
1424 /* Notify NEM. */
1425 /** @todo Remove this one? */
1426 if (VM_IS_NEM_ENABLED(pVM))
1427 {
1428 uint8_t u2State = PGM_PAGE_GET_NEM_STATE(pPage);
1429 NEMHCNotifyPhysPageChanged(pVM, GCPhys, HCPhysPrev, pVM->pgm.s.HCPhysZeroPg, pVM->pgm.s.pvZeroPgR3,
1430 pgmPhysPageCalcNemProtection(pPage, enmNewType), enmNewType, &u2State);
1431 PGM_PAGE_SET_NEM_STATE(pPage, u2State);
1432 }
1433#else
1434 RT_NOREF(enmNewType);
1435#endif
1436
1437 /*
1438 * Make sure it's not in the handy page array.
1439 */
1440 for (uint32_t i = pVM->pgm.s.cHandyPages; i < RT_ELEMENTS(pVM->pgm.s.aHandyPages); i++)
1441 {
1442 if (pVM->pgm.s.aHandyPages[i].idPage == idPage)
1443 {
1444 pVM->pgm.s.aHandyPages[i].HCPhysGCPhys = NIL_GMMPAGEDESC_PHYS;
1445 pVM->pgm.s.aHandyPages[i].fZeroed = false;
1446 pVM->pgm.s.aHandyPages[i].idPage = NIL_GMM_PAGEID;
1447 break;
1448 }
1449 if (pVM->pgm.s.aHandyPages[i].idSharedPage == idPage)
1450 {
1451 pVM->pgm.s.aHandyPages[i].idSharedPage = NIL_GMM_PAGEID;
1452 break;
1453 }
1454 }
1455
1456 /*
1457 * Push it onto the page array.
1458 */
1459 uint32_t iPage = *pcPendingPages;
1460 Assert(iPage < PGMPHYS_FREE_PAGE_BATCH_SIZE);
1461 *pcPendingPages += 1;
1462
1463 pReq->aPages[iPage].idPage = idPage;
1464
1465 if (iPage + 1 < PGMPHYS_FREE_PAGE_BATCH_SIZE)
1466 return VINF_SUCCESS;
1467
1468 /*
1469 * Flush the pages.
1470 */
1471 int rc = GMMR3FreePagesPerform(pVM, pReq, PGMPHYS_FREE_PAGE_BATCH_SIZE);
1472 if (RT_SUCCESS(rc))
1473 {
1474 GMMR3FreePagesRePrep(pVM, pReq, PGMPHYS_FREE_PAGE_BATCH_SIZE, GMMACCOUNT_BASE);
1475 *pcPendingPages = 0;
1476 }
1477 return rc;
1478}
1479
1480
1481/**
1482 * Frees a range of pages, replacing them with ZERO pages of the specified type.
1483 *
1484 * @returns VBox status code.
1485 * @param pVM The cross context VM structure.
1486 * @param pRam The RAM range in which the pages resides.
1487 * @param GCPhys The address of the first page.
1488 * @param GCPhysLast The address of the last page.
1489 * @param pvMmio2 Pointer to the ring-3 mapping of any MMIO2 memory that
1490 * will replace the pages we're freeing up.
1491 */
1492static int pgmR3PhysFreePageRange(PVM pVM, PPGMRAMRANGE pRam, RTGCPHYS GCPhys, RTGCPHYS GCPhysLast, void *pvMmio2)
1493{
1494 PGM_LOCK_ASSERT_OWNER(pVM);
1495
1496#ifdef VBOX_WITH_PGM_NEM_MODE
1497 /*
1498 * In simplified memory mode we don't actually free the memory,
1499 * we just unmap it and let NEM do any unlocking of it.
1500 */
1501 if (pVM->pgm.s.fNemMode)
1502 {
1503 Assert(VM_IS_NEM_ENABLED(pVM));
1504 uint32_t const fNemNotify = (pvMmio2 ? NEM_NOTIFY_PHYS_MMIO_EX_F_MMIO2 : 0) | NEM_NOTIFY_PHYS_MMIO_EX_F_REPLACE;
1505 uint8_t u2State = 0; /* (We don't support UINT8_MAX here.) */
1506 int rc = NEMR3NotifyPhysMmioExMapEarly(pVM, GCPhys, GCPhysLast - GCPhys + 1, fNemNotify,
1507 pRam->pvR3 ? (uint8_t *)pRam->pvR3 + GCPhys - pRam->GCPhys : NULL,
1508 pvMmio2, &u2State, NULL /*puNemRange*/);
1509 AssertLogRelRCReturn(rc, rc);
1510
1511 /* Iterate the pages. */
1512 PPGMPAGE pPageDst = &pRam->aPages[(GCPhys - pRam->GCPhys) >> PAGE_SHIFT];
1513 uint32_t cPagesLeft = ((GCPhysLast - GCPhys) >> PAGE_SHIFT) + 1;
1514 while (cPagesLeft-- > 0)
1515 {
1516 rc = pgmPhysFreePage(pVM, NULL, NULL, pPageDst, GCPhys, PGMPAGETYPE_MMIO);
1517 AssertLogRelRCReturn(rc, rc); /* We're done for if this goes wrong. */
1518
1519 PGM_PAGE_SET_TYPE(pVM, pPageDst, PGMPAGETYPE_MMIO);
1520 PGM_PAGE_SET_NEM_STATE(pPageDst, u2State);
1521
1522 GCPhys += PAGE_SIZE;
1523 pPageDst++;
1524 }
1525 return rc;
1526 }
1527#else /* !VBOX_WITH_PGM_NEM_MODE */
1528 RT_NOREF(pvMmio2);
1529#endif /* !VBOX_WITH_PGM_NEM_MODE */
1530
1531 /*
1532 * Regular mode.
1533 */
1534 /* Prepare. */
1535 uint32_t cPendingPages = 0;
1536 PGMMFREEPAGESREQ pReq;
1537 int rc = GMMR3FreePagesPrepare(pVM, &pReq, PGMPHYS_FREE_PAGE_BATCH_SIZE, GMMACCOUNT_BASE);
1538 AssertLogRelRCReturn(rc, rc);
1539
1540#ifdef VBOX_WITH_NATIVE_NEM
1541 /* Tell NEM up-front. */
1542 uint8_t u2State = UINT8_MAX;
1543 if (VM_IS_NEM_ENABLED(pVM))
1544 {
1545 uint32_t const fNemNotify = (pvMmio2 ? NEM_NOTIFY_PHYS_MMIO_EX_F_MMIO2 : 0) | NEM_NOTIFY_PHYS_MMIO_EX_F_REPLACE;
1546 rc = NEMR3NotifyPhysMmioExMapEarly(pVM, GCPhys, GCPhysLast - GCPhys + 1, fNemNotify, NULL, pvMmio2,
1547 &u2State, NULL /*puNemRange*/);
1548 AssertLogRelRCReturnStmt(rc, GMMR3FreePagesCleanup(pReq), rc);
1549 }
1550#endif
1551
1552 /* Iterate the pages. */
1553 PPGMPAGE pPageDst = &pRam->aPages[(GCPhys - pRam->GCPhys) >> PAGE_SHIFT];
1554 uint32_t cPagesLeft = ((GCPhysLast - GCPhys) >> PAGE_SHIFT) + 1;
1555 while (cPagesLeft-- > 0)
1556 {
1557 rc = pgmPhysFreePage(pVM, pReq, &cPendingPages, pPageDst, GCPhys, PGMPAGETYPE_MMIO);
1558 AssertLogRelRCReturn(rc, rc); /* We're done for if this goes wrong. */
1559
1560 PGM_PAGE_SET_TYPE(pVM, pPageDst, PGMPAGETYPE_MMIO);
1561#ifdef VBOX_WITH_NATIVE_NEM
1562 if (u2State != UINT8_MAX)
1563 PGM_PAGE_SET_NEM_STATE(pPageDst, u2State);
1564#endif
1565
1566 GCPhys += PAGE_SIZE;
1567 pPageDst++;
1568 }
1569
1570 /* Finish pending and cleanup. */
1571 if (cPendingPages)
1572 {
1573 rc = GMMR3FreePagesPerform(pVM, pReq, cPendingPages);
1574 AssertLogRelRCReturn(rc, rc);
1575 }
1576 GMMR3FreePagesCleanup(pReq);
1577
1578 return rc;
1579}
1580
1581
1582/**
1583 * PGMR3PhysRegisterRam worker that initializes and links a RAM range.
1584 *
1585 * In NEM mode, this will allocate the pages backing the RAM range and this may
1586 * fail. NEM registration may also fail. (In regular HM mode it won't fail.)
1587 *
1588 * @returns VBox status code.
1589 * @param pVM The cross context VM structure.
1590 * @param pNew The new RAM range.
1591 * @param GCPhys The address of the RAM range.
1592 * @param GCPhysLast The last address of the RAM range.
1593 * @param R0PtrNew Ditto for R0.
1594 * @param fFlags PGM_RAM_RANGE_FLAGS_FLOATING or zero.
1595 * @param pszDesc The description.
1596 * @param pPrev The previous RAM range (for linking).
1597 */
1598static int pgmR3PhysInitAndLinkRamRange(PVM pVM, PPGMRAMRANGE pNew, RTGCPHYS GCPhys, RTGCPHYS GCPhysLast,
1599 RTR0PTR R0PtrNew, uint32_t fFlags, const char *pszDesc, PPGMRAMRANGE pPrev)
1600{
1601 /*
1602 * Initialize the range.
1603 */
1604 pNew->pSelfR0 = R0PtrNew;
1605 pNew->GCPhys = GCPhys;
1606 pNew->GCPhysLast = GCPhysLast;
1607 pNew->cb = GCPhysLast - GCPhys + 1;
1608 pNew->pszDesc = pszDesc;
1609 pNew->fFlags = fFlags;
1610 pNew->uNemRange = UINT32_MAX;
1611 pNew->pvR3 = NULL;
1612 pNew->paLSPages = NULL;
1613
1614 uint32_t const cPages = pNew->cb >> PAGE_SHIFT;
1615#ifdef VBOX_WITH_PGM_NEM_MODE
1616 if (!pVM->pgm.s.fNemMode)
1617#endif
1618 {
1619 RTGCPHYS iPage = cPages;
1620 while (iPage-- > 0)
1621 PGM_PAGE_INIT_ZERO(&pNew->aPages[iPage], pVM, PGMPAGETYPE_RAM);
1622
1623 /* Update the page count stats. */
1624 pVM->pgm.s.cZeroPages += cPages;
1625 pVM->pgm.s.cAllPages += cPages;
1626 }
1627#ifdef VBOX_WITH_PGM_NEM_MODE
1628 else
1629 {
1630 int rc = SUPR3PageAlloc(cPages, pVM->pgm.s.fUseLargePages ? SUP_PAGE_ALLOC_F_LARGE_PAGES : 0, &pNew->pvR3);
1631 if (RT_FAILURE(rc))
1632 return rc;
1633
1634 RTGCPHYS iPage = cPages;
1635 while (iPage-- > 0)
1636 PGM_PAGE_INIT(&pNew->aPages[iPage], UINT64_C(0x0000fffffffff000), NIL_GMM_PAGEID,
1637 PGMPAGETYPE_RAM, PGM_PAGE_STATE_ALLOCATED);
1638
1639 /* Update the page count stats. */
1640 pVM->pgm.s.cPrivatePages += cPages;
1641 pVM->pgm.s.cAllPages += cPages;
1642 }
1643#endif
1644
1645 /*
1646 * Link it.
1647 */
1648 pgmR3PhysLinkRamRange(pVM, pNew, pPrev);
1649
1650#ifdef VBOX_WITH_NATIVE_NEM
1651 /*
1652 * Notify NEM now that it has been linked.
1653 */
1654 if (VM_IS_NEM_ENABLED(pVM))
1655 {
1656 uint8_t u2State = UINT8_MAX;
1657 int rc = NEMR3NotifyPhysRamRegister(pVM, GCPhys, pNew->cb, pNew->pvR3, &u2State, &pNew->uNemRange);
1658 if (RT_SUCCESS(rc))
1659 {
1660 if (u2State != UINT8_MAX)
1661 pgmPhysSetNemStateForPages(&pNew->aPages[0], cPages, u2State);
1662 }
1663 else
1664 pgmR3PhysUnlinkRamRange2(pVM, pNew, pPrev);
1665 return rc;
1666 }
1667#endif
1668 return VINF_SUCCESS;
1669}
1670
1671
1672/**
1673 * PGMR3PhysRegisterRam worker that registers a high chunk.
1674 *
1675 * @returns VBox status code.
1676 * @param pVM The cross context VM structure.
1677 * @param GCPhys The address of the RAM.
1678 * @param cRamPages The number of RAM pages to register.
1679 * @param iChunk The chunk number.
1680 * @param pszDesc The RAM range description.
1681 * @param ppPrev Previous RAM range pointer. In/Out.
1682 */
1683static int pgmR3PhysRegisterHighRamChunk(PVM pVM, RTGCPHYS GCPhys, uint32_t cRamPages, uint32_t iChunk,
1684 const char *pszDesc, PPGMRAMRANGE *ppPrev)
1685{
1686 const char *pszDescChunk = iChunk == 0
1687 ? pszDesc
1688 : MMR3HeapAPrintf(pVM, MM_TAG_PGM_PHYS, "%s (#%u)", pszDesc, iChunk + 1);
1689 AssertReturn(pszDescChunk, VERR_NO_MEMORY);
1690
1691 /*
1692 * Allocate memory for the new chunk.
1693 */
1694 size_t const cChunkPages = RT_ALIGN_Z(RT_UOFFSETOF_DYN(PGMRAMRANGE, aPages[cRamPages]), PAGE_SIZE) >> PAGE_SHIFT;
1695 PSUPPAGE paChunkPages = (PSUPPAGE)RTMemTmpAllocZ(sizeof(SUPPAGE) * cChunkPages);
1696 AssertReturn(paChunkPages, VERR_NO_TMP_MEMORY);
1697 RTR0PTR R0PtrChunk = NIL_RTR0PTR;
1698 void *pvChunk = NULL;
1699 int rc = SUPR3PageAllocEx(cChunkPages, 0 /*fFlags*/, &pvChunk, &R0PtrChunk, paChunkPages);
1700 if (RT_SUCCESS(rc))
1701 {
1702 Assert(R0PtrChunk != NIL_RTR0PTR || PGM_IS_IN_NEM_MODE(pVM));
1703 memset(pvChunk, 0, cChunkPages << PAGE_SHIFT);
1704
1705 PPGMRAMRANGE pNew = (PPGMRAMRANGE)pvChunk;
1706
1707 /*
1708 * Ok, init and link the range.
1709 */
1710 rc = pgmR3PhysInitAndLinkRamRange(pVM, pNew, GCPhys, GCPhys + ((RTGCPHYS)cRamPages << PAGE_SHIFT) - 1,
1711 R0PtrChunk, PGM_RAM_RANGE_FLAGS_FLOATING, pszDescChunk, *ppPrev);
1712 if (RT_SUCCESS(rc))
1713 *ppPrev = pNew;
1714
1715 if (RT_FAILURE(rc))
1716 SUPR3PageFreeEx(pvChunk, cChunkPages);
1717 }
1718
1719 RTMemTmpFree(paChunkPages);
1720 return rc;
1721}
1722
1723
1724/**
1725 * Sets up a range RAM.
1726 *
1727 * This will check for conflicting registrations, make a resource
1728 * reservation for the memory (with GMM), and setup the per-page
1729 * tracking structures (PGMPAGE).
1730 *
1731 * @returns VBox status code.
1732 * @param pVM The cross context VM structure.
1733 * @param GCPhys The physical address of the RAM.
1734 * @param cb The size of the RAM.
1735 * @param pszDesc The description - not copied, so, don't free or change it.
1736 */
1737VMMR3DECL(int) PGMR3PhysRegisterRam(PVM pVM, RTGCPHYS GCPhys, RTGCPHYS cb, const char *pszDesc)
1738{
1739 /*
1740 * Validate input.
1741 */
1742 Log(("PGMR3PhysRegisterRam: GCPhys=%RGp cb=%RGp pszDesc=%s\n", GCPhys, cb, pszDesc));
1743 AssertReturn(RT_ALIGN_T(GCPhys, PAGE_SIZE, RTGCPHYS) == GCPhys, VERR_INVALID_PARAMETER);
1744 AssertReturn(RT_ALIGN_T(cb, PAGE_SIZE, RTGCPHYS) == cb, VERR_INVALID_PARAMETER);
1745 AssertReturn(cb > 0, VERR_INVALID_PARAMETER);
1746 RTGCPHYS GCPhysLast = GCPhys + (cb - 1);
1747 AssertMsgReturn(GCPhysLast > GCPhys, ("The range wraps! GCPhys=%RGp cb=%RGp\n", GCPhys, cb), VERR_INVALID_PARAMETER);
1748 AssertPtrReturn(pszDesc, VERR_INVALID_POINTER);
1749 VM_ASSERT_EMT_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
1750
1751 PGM_LOCK_VOID(pVM);
1752
1753 /*
1754 * Find range location and check for conflicts.
1755 */
1756 PPGMRAMRANGE pPrev = NULL;
1757 PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3;
1758 while (pRam && GCPhysLast >= pRam->GCPhys)
1759 {
1760 AssertLogRelMsgReturnStmt( GCPhysLast < pRam->GCPhys
1761 || GCPhys > pRam->GCPhysLast,
1762 ("%RGp-%RGp (%s) conflicts with existing %RGp-%RGp (%s)\n",
1763 GCPhys, GCPhysLast, pszDesc, pRam->GCPhys, pRam->GCPhysLast, pRam->pszDesc),
1764 PGM_UNLOCK(pVM), VERR_PGM_RAM_CONFLICT);
1765
1766 /* next */
1767 pPrev = pRam;
1768 pRam = pRam->pNextR3;
1769 }
1770
1771 /*
1772 * Register it with GMM (the API bitches).
1773 */
1774 const RTGCPHYS cPages = cb >> PAGE_SHIFT;
1775 int rc = MMR3IncreaseBaseReservation(pVM, cPages);
1776 if (RT_FAILURE(rc))
1777 {
1778 PGM_UNLOCK(pVM);
1779 return rc;
1780 }
1781
1782 if ( GCPhys >= _4G
1783 && cPages > 256)
1784 {
1785 /*
1786 * The PGMRAMRANGE structures for the high memory can get very big.
1787 * There used to be some limitations on SUPR3PageAllocEx allocation
1788 * sizes, so traditionally we limited this to 16MB chunks. These days
1789 * we do ~64 MB chunks each covering 16GB of guest RAM, making sure
1790 * each range is a multiple of 1GB to enable eager hosts to use 1GB
1791 * pages in NEM mode.
1792 *
1793 * See also pgmR3PhysMmio2CalcChunkCount.
1794 */
1795 uint32_t const cPagesPerChunk = _4M;
1796 Assert(RT_ALIGN_32(cPagesPerChunk, X86_PD_PAE_SHIFT - X86_PAGE_SHIFT)); /* NEM large page requirement: 1GB pages. */
1797
1798 RTGCPHYS cPagesLeft = cPages;
1799 RTGCPHYS GCPhysChunk = GCPhys;
1800 uint32_t iChunk = 0;
1801 while (cPagesLeft > 0)
1802 {
1803 uint32_t cPagesInChunk = cPagesLeft;
1804 if (cPagesInChunk > cPagesPerChunk)
1805 cPagesInChunk = cPagesPerChunk;
1806
1807 rc = pgmR3PhysRegisterHighRamChunk(pVM, GCPhysChunk, cPagesInChunk, iChunk, pszDesc, &pPrev);
1808 AssertRCReturn(rc, rc);
1809
1810 /* advance */
1811 GCPhysChunk += (RTGCPHYS)cPagesInChunk << PAGE_SHIFT;
1812 cPagesLeft -= cPagesInChunk;
1813 iChunk++;
1814 }
1815 }
1816 else
1817 {
1818 /*
1819 * Allocate, initialize and link the new RAM range.
1820 */
1821 const size_t cbRamRange = RT_UOFFSETOF_DYN(PGMRAMRANGE, aPages[cPages]);
1822 PPGMRAMRANGE pNew;
1823 rc = MMR3HyperAllocOnceNoRel(pVM, cbRamRange, 0, MM_TAG_PGM_PHYS, (void **)&pNew);
1824 AssertLogRelMsgRCReturn(rc, ("rc=%Rrc cbRamRange=%zu\n", rc, cbRamRange), rc);
1825
1826 rc = pgmR3PhysInitAndLinkRamRange(pVM, pNew, GCPhys, GCPhysLast, MMHyperCCToR0(pVM, pNew), 0 /*fFlags*/, pszDesc, pPrev);
1827 AssertLogRelMsgRCReturn(rc, ("rc=%Rrc cbRamRange=%zu\n", rc, cbRamRange), rc);
1828 }
1829 pgmPhysInvalidatePageMapTLB(pVM);
1830
1831 PGM_UNLOCK(pVM);
1832 return rc;
1833}
1834
1835
1836/**
1837 * Worker called by PGMR3InitFinalize if we're configured to pre-allocate RAM.
1838 *
1839 * We do this late in the init process so that all the ROM and MMIO ranges have
1840 * been registered already and we don't go wasting memory on them.
1841 *
1842 * @returns VBox status code.
1843 *
1844 * @param pVM The cross context VM structure.
1845 */
1846int pgmR3PhysRamPreAllocate(PVM pVM)
1847{
1848 Assert(pVM->pgm.s.fRamPreAlloc);
1849 Log(("pgmR3PhysRamPreAllocate: enter\n"));
1850#ifdef VBOX_WITH_PGM_NEM_MODE
1851 AssertLogRelReturn(!pVM->pgm.s.fNemMode, VERR_PGM_NOT_SUPPORTED_FOR_NEM_MODE);
1852#endif
1853
1854 /*
1855 * Walk the RAM ranges and allocate all RAM pages, halt at
1856 * the first allocation error.
1857 */
1858 uint64_t cPages = 0;
1859 uint64_t NanoTS = RTTimeNanoTS();
1860 PGM_LOCK_VOID(pVM);
1861 for (PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3; pRam; pRam = pRam->pNextR3)
1862 {
1863 PPGMPAGE pPage = &pRam->aPages[0];
1864 RTGCPHYS GCPhys = pRam->GCPhys;
1865 uint32_t cLeft = pRam->cb >> PAGE_SHIFT;
1866 while (cLeft-- > 0)
1867 {
1868 if (PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_RAM)
1869 {
1870 switch (PGM_PAGE_GET_STATE(pPage))
1871 {
1872 case PGM_PAGE_STATE_ZERO:
1873 {
1874 int rc = pgmPhysAllocPage(pVM, pPage, GCPhys);
1875 if (RT_FAILURE(rc))
1876 {
1877 LogRel(("PGM: RAM Pre-allocation failed at %RGp (in %s) with rc=%Rrc\n", GCPhys, pRam->pszDesc, rc));
1878 PGM_UNLOCK(pVM);
1879 return rc;
1880 }
1881 cPages++;
1882 break;
1883 }
1884
1885 case PGM_PAGE_STATE_BALLOONED:
1886 case PGM_PAGE_STATE_ALLOCATED:
1887 case PGM_PAGE_STATE_WRITE_MONITORED:
1888 case PGM_PAGE_STATE_SHARED:
1889 /* nothing to do here. */
1890 break;
1891 }
1892 }
1893
1894 /* next */
1895 pPage++;
1896 GCPhys += PAGE_SIZE;
1897 }
1898 }
1899 PGM_UNLOCK(pVM);
1900 NanoTS = RTTimeNanoTS() - NanoTS;
1901
1902 LogRel(("PGM: Pre-allocated %llu pages in %llu ms\n", cPages, NanoTS / 1000000));
1903 Log(("pgmR3PhysRamPreAllocate: returns VINF_SUCCESS\n"));
1904 return VINF_SUCCESS;
1905}
1906
1907
1908/**
1909 * Checks shared page checksums.
1910 *
1911 * @param pVM The cross context VM structure.
1912 */
1913void pgmR3PhysAssertSharedPageChecksums(PVM pVM)
1914{
1915#ifdef VBOX_STRICT
1916 PGM_LOCK_VOID(pVM);
1917
1918 if (pVM->pgm.s.cSharedPages > 0)
1919 {
1920 /*
1921 * Walk the ram ranges.
1922 */
1923 for (PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3; pRam; pRam = pRam->pNextR3)
1924 {
1925 uint32_t iPage = pRam->cb >> PAGE_SHIFT;
1926 AssertMsg(((RTGCPHYS)iPage << PAGE_SHIFT) == pRam->cb, ("%RGp %RGp\n", (RTGCPHYS)iPage << PAGE_SHIFT, pRam->cb));
1927
1928 while (iPage-- > 0)
1929 {
1930 PPGMPAGE pPage = &pRam->aPages[iPage];
1931 if (PGM_PAGE_IS_SHARED(pPage))
1932 {
1933 uint32_t u32Checksum = pPage->s.u2Unused0/* | ((uint32_t)pPage->s.u2Unused1 << 8)*/;
1934 if (!u32Checksum)
1935 {
1936 RTGCPHYS GCPhysPage = pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT);
1937 void const *pvPage;
1938 int rc = pgmPhysPageMapReadOnly(pVM, pPage, GCPhysPage, &pvPage);
1939 if (RT_SUCCESS(rc))
1940 {
1941 uint32_t u32Checksum2 = RTCrc32(pvPage, PAGE_SIZE);
1942# if 0
1943 AssertMsg((u32Checksum2 & /*UINT32_C(0x00000303)*/ 0x3) == u32Checksum, ("GCPhysPage=%RGp\n", GCPhysPage));
1944# else
1945 if ((u32Checksum2 & /*UINT32_C(0x00000303)*/ 0x3) == u32Checksum)
1946 LogFlow(("shpg %#x @ %RGp %#x [OK]\n", PGM_PAGE_GET_PAGEID(pPage), GCPhysPage, u32Checksum2));
1947 else
1948 AssertMsgFailed(("shpg %#x @ %RGp %#x\n", PGM_PAGE_GET_PAGEID(pPage), GCPhysPage, u32Checksum2));
1949# endif
1950 }
1951 else
1952 AssertRC(rc);
1953 }
1954 }
1955
1956 } /* for each page */
1957
1958 } /* for each ram range */
1959 }
1960
1961 PGM_UNLOCK(pVM);
1962#endif /* VBOX_STRICT */
1963 NOREF(pVM);
1964}
1965
1966
1967/**
1968 * Resets the physical memory state.
1969 *
1970 * ASSUMES that the caller owns the PGM lock.
1971 *
1972 * @returns VBox status code.
1973 * @param pVM The cross context VM structure.
1974 */
1975int pgmR3PhysRamReset(PVM pVM)
1976{
1977 PGM_LOCK_ASSERT_OWNER(pVM);
1978
1979 /* Reset the memory balloon. */
1980 int rc = GMMR3BalloonedPages(pVM, GMMBALLOONACTION_RESET, 0);
1981 AssertRC(rc);
1982
1983#ifdef VBOX_WITH_PAGE_SHARING
1984 /* Clear all registered shared modules. */
1985 pgmR3PhysAssertSharedPageChecksums(pVM);
1986 rc = GMMR3ResetSharedModules(pVM);
1987 AssertRC(rc);
1988#endif
1989 /* Reset counters. */
1990 pVM->pgm.s.cReusedSharedPages = 0;
1991 pVM->pgm.s.cBalloonedPages = 0;
1992
1993 return VINF_SUCCESS;
1994}
1995
1996
1997/**
1998 * Resets (zeros) the RAM after all devices and components have been reset.
1999 *
2000 * ASSUMES that the caller owns the PGM lock.
2001 *
2002 * @returns VBox status code.
2003 * @param pVM The cross context VM structure.
2004 */
2005int pgmR3PhysRamZeroAll(PVM pVM)
2006{
2007 PGM_LOCK_ASSERT_OWNER(pVM);
2008
2009 /*
2010 * We batch up pages that should be freed instead of calling GMM for
2011 * each and every one of them.
2012 */
2013 uint32_t cPendingPages = 0;
2014 PGMMFREEPAGESREQ pReq;
2015 int rc = GMMR3FreePagesPrepare(pVM, &pReq, PGMPHYS_FREE_PAGE_BATCH_SIZE, GMMACCOUNT_BASE);
2016 AssertLogRelRCReturn(rc, rc);
2017
2018 /*
2019 * Walk the ram ranges.
2020 */
2021 for (PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3; pRam; pRam = pRam->pNextR3)
2022 {
2023 uint32_t iPage = pRam->cb >> PAGE_SHIFT;
2024 AssertMsg(((RTGCPHYS)iPage << PAGE_SHIFT) == pRam->cb, ("%RGp %RGp\n", (RTGCPHYS)iPage << PAGE_SHIFT, pRam->cb));
2025
2026 if ( !pVM->pgm.s.fRamPreAlloc
2027#ifdef VBOX_WITH_PGM_NEM_MODE
2028 && !pVM->pgm.s.fNemMode
2029#endif
2030 && pVM->pgm.s.fZeroRamPagesOnReset)
2031 {
2032 /* Replace all RAM pages by ZERO pages. */
2033 while (iPage-- > 0)
2034 {
2035 PPGMPAGE pPage = &pRam->aPages[iPage];
2036 switch (PGM_PAGE_GET_TYPE(pPage))
2037 {
2038 case PGMPAGETYPE_RAM:
2039 /* Do not replace pages part of a 2 MB continuous range
2040 with zero pages, but zero them instead. */
2041 if ( PGM_PAGE_GET_PDE_TYPE(pPage) == PGM_PAGE_PDE_TYPE_PDE
2042 || PGM_PAGE_GET_PDE_TYPE(pPage) == PGM_PAGE_PDE_TYPE_PDE_DISABLED)
2043 {
2044 void *pvPage;
2045 rc = pgmPhysPageMap(pVM, pPage, pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT), &pvPage);
2046 AssertLogRelRCReturn(rc, rc);
2047 ASMMemZeroPage(pvPage);
2048 }
2049 else if (PGM_PAGE_IS_BALLOONED(pPage))
2050 {
2051 /* Turn into a zero page; the balloon status is lost when the VM reboots. */
2052 PGM_PAGE_SET_STATE(pVM, pPage, PGM_PAGE_STATE_ZERO);
2053 }
2054 else if (!PGM_PAGE_IS_ZERO(pPage))
2055 {
2056 rc = pgmPhysFreePage(pVM, pReq, &cPendingPages, pPage, pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT),
2057 PGMPAGETYPE_RAM);
2058 AssertLogRelRCReturn(rc, rc);
2059 }
2060 break;
2061
2062 case PGMPAGETYPE_MMIO2_ALIAS_MMIO:
2063 case PGMPAGETYPE_SPECIAL_ALIAS_MMIO: /** @todo perhaps leave the special page alone? I don't think VT-x copes with this code. */
2064 pgmHandlerPhysicalResetAliasedPage(pVM, pPage, pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT),
2065 pRam, true /*fDoAccounting*/);
2066 break;
2067
2068 case PGMPAGETYPE_MMIO2:
2069 case PGMPAGETYPE_ROM_SHADOW: /* handled by pgmR3PhysRomReset. */
2070 case PGMPAGETYPE_ROM:
2071 case PGMPAGETYPE_MMIO:
2072 break;
2073 default:
2074 AssertFailed();
2075 }
2076 } /* for each page */
2077 }
2078 else
2079 {
2080 /* Zero the memory. */
2081 while (iPage-- > 0)
2082 {
2083 PPGMPAGE pPage = &pRam->aPages[iPage];
2084 switch (PGM_PAGE_GET_TYPE(pPage))
2085 {
2086 case PGMPAGETYPE_RAM:
2087 switch (PGM_PAGE_GET_STATE(pPage))
2088 {
2089 case PGM_PAGE_STATE_ZERO:
2090 break;
2091
2092 case PGM_PAGE_STATE_BALLOONED:
2093 /* Turn into a zero page; the balloon status is lost when the VM reboots. */
2094 PGM_PAGE_SET_STATE(pVM, pPage, PGM_PAGE_STATE_ZERO);
2095 break;
2096
2097 case PGM_PAGE_STATE_SHARED:
2098 case PGM_PAGE_STATE_WRITE_MONITORED:
2099 rc = pgmPhysPageMakeWritable(pVM, pPage, pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT));
2100 AssertLogRelRCReturn(rc, rc);
2101 RT_FALL_THRU();
2102
2103 case PGM_PAGE_STATE_ALLOCATED:
2104 if (pVM->pgm.s.fZeroRamPagesOnReset)
2105 {
2106 void *pvPage;
2107 rc = pgmPhysPageMap(pVM, pPage, pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT), &pvPage);
2108 AssertLogRelRCReturn(rc, rc);
2109 ASMMemZeroPage(pvPage);
2110 }
2111 break;
2112 }
2113 break;
2114
2115 case PGMPAGETYPE_MMIO2_ALIAS_MMIO:
2116 case PGMPAGETYPE_SPECIAL_ALIAS_MMIO: /** @todo perhaps leave the special page alone? I don't think VT-x copes with this code. */
2117 pgmHandlerPhysicalResetAliasedPage(pVM, pPage, pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT),
2118 pRam, true /*fDoAccounting*/);
2119 break;
2120
2121 case PGMPAGETYPE_MMIO2:
2122 case PGMPAGETYPE_ROM_SHADOW:
2123 case PGMPAGETYPE_ROM:
2124 case PGMPAGETYPE_MMIO:
2125 break;
2126 default:
2127 AssertFailed();
2128
2129 }
2130 } /* for each page */
2131 }
2132
2133 }
2134
2135 /*
2136 * Finish off any pages pending freeing.
2137 */
2138 if (cPendingPages)
2139 {
2140 rc = GMMR3FreePagesPerform(pVM, pReq, cPendingPages);
2141 AssertLogRelRCReturn(rc, rc);
2142 }
2143 GMMR3FreePagesCleanup(pReq);
2144 return VINF_SUCCESS;
2145}
2146
2147
2148/**
2149 * Frees all RAM during VM termination
2150 *
2151 * ASSUMES that the caller owns the PGM lock.
2152 *
2153 * @returns VBox status code.
2154 * @param pVM The cross context VM structure.
2155 */
2156int pgmR3PhysRamTerm(PVM pVM)
2157{
2158 PGM_LOCK_ASSERT_OWNER(pVM);
2159
2160 /* Reset the memory balloon. */
2161 int rc = GMMR3BalloonedPages(pVM, GMMBALLOONACTION_RESET, 0);
2162 AssertRC(rc);
2163
2164#ifdef VBOX_WITH_PAGE_SHARING
2165 /*
2166 * Clear all registered shared modules.
2167 */
2168 pgmR3PhysAssertSharedPageChecksums(pVM);
2169 rc = GMMR3ResetSharedModules(pVM);
2170 AssertRC(rc);
2171
2172 /*
2173 * Flush the handy pages updates to make sure no shared pages are hiding
2174 * in there. (Not unlikely if the VM shuts down, apparently.)
2175 */
2176# ifdef VBOX_WITH_PGM_NEM_MODE
2177 if (!pVM->pgm.s.fNemMode)
2178# endif
2179 rc = VMMR3CallR0(pVM, VMMR0_DO_PGM_FLUSH_HANDY_PAGES, 0, NULL);
2180#endif
2181
2182 /*
2183 * We batch up pages that should be freed instead of calling GMM for
2184 * each and every one of them.
2185 */
2186 uint32_t cPendingPages = 0;
2187 PGMMFREEPAGESREQ pReq;
2188 rc = GMMR3FreePagesPrepare(pVM, &pReq, PGMPHYS_FREE_PAGE_BATCH_SIZE, GMMACCOUNT_BASE);
2189 AssertLogRelRCReturn(rc, rc);
2190
2191 /*
2192 * Walk the ram ranges.
2193 */
2194 for (PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3; pRam; pRam = pRam->pNextR3)
2195 {
2196 uint32_t iPage = pRam->cb >> PAGE_SHIFT;
2197 AssertMsg(((RTGCPHYS)iPage << PAGE_SHIFT) == pRam->cb, ("%RGp %RGp\n", (RTGCPHYS)iPage << PAGE_SHIFT, pRam->cb));
2198
2199 while (iPage-- > 0)
2200 {
2201 PPGMPAGE pPage = &pRam->aPages[iPage];
2202 switch (PGM_PAGE_GET_TYPE(pPage))
2203 {
2204 case PGMPAGETYPE_RAM:
2205 /* Free all shared pages. Private pages are automatically freed during GMM VM cleanup. */
2206 /** @todo change this to explicitly free private pages here. */
2207 if (PGM_PAGE_IS_SHARED(pPage))
2208 {
2209 rc = pgmPhysFreePage(pVM, pReq, &cPendingPages, pPage, pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT),
2210 PGMPAGETYPE_RAM);
2211 AssertLogRelRCReturn(rc, rc);
2212 }
2213 break;
2214
2215 case PGMPAGETYPE_MMIO2_ALIAS_MMIO:
2216 case PGMPAGETYPE_SPECIAL_ALIAS_MMIO:
2217 case PGMPAGETYPE_MMIO2:
2218 case PGMPAGETYPE_ROM_SHADOW: /* handled by pgmR3PhysRomReset. */
2219 case PGMPAGETYPE_ROM:
2220 case PGMPAGETYPE_MMIO:
2221 break;
2222 default:
2223 AssertFailed();
2224 }
2225 } /* for each page */
2226 }
2227
2228 /*
2229 * Finish off any pages pending freeing.
2230 */
2231 if (cPendingPages)
2232 {
2233 rc = GMMR3FreePagesPerform(pVM, pReq, cPendingPages);
2234 AssertLogRelRCReturn(rc, rc);
2235 }
2236 GMMR3FreePagesCleanup(pReq);
2237 return VINF_SUCCESS;
2238}
2239
2240
2241
2242/*********************************************************************************************************************************
2243* MMIO *
2244*********************************************************************************************************************************/
2245
2246/**
2247 * This is the interface IOM is using to register an MMIO region.
2248 *
2249 * It will check for conflicts and ensure that a RAM range structure
2250 * is present before calling the PGMR3HandlerPhysicalRegister API to
2251 * register the callbacks.
2252 *
2253 * @returns VBox status code.
2254 *
2255 * @param pVM The cross context VM structure.
2256 * @param GCPhys The start of the MMIO region.
2257 * @param cb The size of the MMIO region.
2258 * @param hType The physical access handler type registration.
2259 * @param pvUserR3 The user argument for R3.
2260 * @param pvUserR0 The user argument for R0.
2261 * @param pvUserRC The user argument for RC.
2262 * @param pszDesc The description of the MMIO region.
2263 */
2264VMMR3DECL(int) PGMR3PhysMMIORegister(PVM pVM, RTGCPHYS GCPhys, RTGCPHYS cb, PGMPHYSHANDLERTYPE hType,
2265 RTR3PTR pvUserR3, RTR0PTR pvUserR0, RTRCPTR pvUserRC, const char *pszDesc)
2266{
2267 /*
2268 * Assert on some assumption.
2269 */
2270 VM_ASSERT_EMT(pVM);
2271 AssertReturn(!(cb & PAGE_OFFSET_MASK), VERR_INVALID_PARAMETER);
2272 AssertReturn(!(GCPhys & PAGE_OFFSET_MASK), VERR_INVALID_PARAMETER);
2273 AssertPtrReturn(pszDesc, VERR_INVALID_POINTER);
2274 AssertReturn(*pszDesc, VERR_INVALID_PARAMETER);
2275 Assert(((PPGMPHYSHANDLERTYPEINT)MMHyperHeapOffsetToPtr(pVM, hType))->enmKind == PGMPHYSHANDLERKIND_MMIO);
2276
2277 int rc = PGM_LOCK(pVM);
2278 AssertRCReturn(rc, rc);
2279
2280 /*
2281 * Make sure there's a RAM range structure for the region.
2282 */
2283 RTGCPHYS GCPhysLast = GCPhys + (cb - 1);
2284 bool fRamExists = false;
2285 PPGMRAMRANGE pRamPrev = NULL;
2286 PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3;
2287 while (pRam && GCPhysLast >= pRam->GCPhys)
2288 {
2289 if ( GCPhysLast >= pRam->GCPhys
2290 && GCPhys <= pRam->GCPhysLast)
2291 {
2292 /* Simplification: all within the same range. */
2293 AssertLogRelMsgReturnStmt( GCPhys >= pRam->GCPhys
2294 && GCPhysLast <= pRam->GCPhysLast,
2295 ("%RGp-%RGp (MMIO/%s) falls partly outside %RGp-%RGp (%s)\n",
2296 GCPhys, GCPhysLast, pszDesc,
2297 pRam->GCPhys, pRam->GCPhysLast, pRam->pszDesc),
2298 PGM_UNLOCK(pVM),
2299 VERR_PGM_RAM_CONFLICT);
2300
2301 /* Check that it's all RAM or MMIO pages. */
2302 PCPGMPAGE pPage = &pRam->aPages[(GCPhys - pRam->GCPhys) >> PAGE_SHIFT];
2303 uint32_t cLeft = cb >> PAGE_SHIFT;
2304 while (cLeft-- > 0)
2305 {
2306 AssertLogRelMsgReturnStmt( PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_RAM
2307 || PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_MMIO,
2308 ("%RGp-%RGp (MMIO/%s): %RGp is not a RAM or MMIO page - type=%d desc=%s\n",
2309 GCPhys, GCPhysLast, pszDesc, pRam->GCPhys, PGM_PAGE_GET_TYPE(pPage), pRam->pszDesc),
2310 PGM_UNLOCK(pVM),
2311 VERR_PGM_RAM_CONFLICT);
2312 pPage++;
2313 }
2314
2315 /* Looks good. */
2316 fRamExists = true;
2317 break;
2318 }
2319
2320 /* next */
2321 pRamPrev = pRam;
2322 pRam = pRam->pNextR3;
2323 }
2324 PPGMRAMRANGE pNew;
2325 if (fRamExists)
2326 {
2327 pNew = NULL;
2328
2329 /*
2330 * Make all the pages in the range MMIO/ZERO pages, freeing any
2331 * RAM pages currently mapped here. This might not be 100% correct
2332 * for PCI memory, but we're doing the same thing for MMIO2 pages.
2333 */
2334 rc = pgmR3PhysFreePageRange(pVM, pRam, GCPhys, GCPhysLast, NULL);
2335 AssertRCReturnStmt(rc, PGM_UNLOCK(pVM), rc);
2336
2337 /* Force a PGM pool flush as guest ram references have been changed. */
2338 /** @todo not entirely SMP safe; assuming for now the guest takes
2339 * care of this internally (not touch mapped mmio while changing the
2340 * mapping). */
2341 PVMCPU pVCpu = VMMGetCpu(pVM);
2342 pVCpu->pgm.s.fSyncFlags |= PGM_SYNC_CLEAR_PGM_POOL;
2343 VMCPU_FF_SET(pVCpu, VMCPU_FF_PGM_SYNC_CR3);
2344 }
2345 else
2346 {
2347 /*
2348 * No RAM range, insert an ad hoc one.
2349 *
2350 * Note that we don't have to tell REM about this range because
2351 * PGMHandlerPhysicalRegisterEx will do that for us.
2352 */
2353 Log(("PGMR3PhysMMIORegister: Adding ad hoc MMIO range for %RGp-%RGp %s\n", GCPhys, GCPhysLast, pszDesc));
2354
2355 /* Alloc. */
2356 const uint32_t cPages = cb >> PAGE_SHIFT;
2357 const size_t cbRamRange = RT_UOFFSETOF_DYN(PGMRAMRANGE, aPages[cPages]);
2358 rc = MMHyperAlloc(pVM, RT_UOFFSETOF_DYN(PGMRAMRANGE, aPages[cPages]), 16, MM_TAG_PGM_PHYS, (void **)&pNew);
2359 AssertLogRelMsgRCReturnStmt(rc, ("cbRamRange=%zu\n", cbRamRange), PGM_UNLOCK(pVM), rc);
2360
2361#ifdef VBOX_WITH_NATIVE_NEM
2362 /* Notify NEM. */
2363 uint8_t u2State = 0; /* (must have valid state as there can't be anything to preserve) */
2364 if (VM_IS_NEM_ENABLED(pVM))
2365 {
2366 rc = NEMR3NotifyPhysMmioExMapEarly(pVM, GCPhys, cPages << PAGE_SHIFT, 0 /*fFlags*/, NULL, NULL,
2367 &u2State, &pNew->uNemRange);
2368 AssertLogRelRCReturnStmt(rc, MMHyperFree(pVM, pNew), rc);
2369 }
2370#endif
2371
2372 /* Initialize the range. */
2373 pNew->pSelfR0 = MMHyperCCToR0(pVM, pNew);
2374 pNew->GCPhys = GCPhys;
2375 pNew->GCPhysLast = GCPhysLast;
2376 pNew->cb = cb;
2377 pNew->pszDesc = pszDesc;
2378 pNew->fFlags = PGM_RAM_RANGE_FLAGS_AD_HOC_MMIO;
2379 pNew->pvR3 = NULL;
2380 pNew->paLSPages = NULL;
2381
2382 uint32_t iPage = cPages;
2383 while (iPage-- > 0)
2384 {
2385 PGM_PAGE_INIT_ZERO(&pNew->aPages[iPage], pVM, PGMPAGETYPE_MMIO);
2386#ifdef VBOX_WITH_NATIVE_NEM
2387 PGM_PAGE_SET_NEM_STATE(&pNew->aPages[iPage], u2State);
2388#endif
2389 }
2390 Assert(PGM_PAGE_GET_TYPE(&pNew->aPages[0]) == PGMPAGETYPE_MMIO);
2391
2392 /* update the page count stats. */
2393 pVM->pgm.s.cPureMmioPages += cPages;
2394 pVM->pgm.s.cAllPages += cPages;
2395
2396 /* link it */
2397 pgmR3PhysLinkRamRange(pVM, pNew, pRamPrev);
2398 }
2399
2400 /*
2401 * Register the access handler.
2402 */
2403 rc = PGMHandlerPhysicalRegister(pVM, GCPhys, GCPhysLast, hType, pvUserR3, pvUserR0, pvUserRC, pszDesc);
2404 if (RT_SUCCESS(rc))
2405 {
2406#ifdef VBOX_WITH_NATIVE_NEM
2407 /* Late NEM notification. */
2408 if (VM_IS_NEM_ENABLED(pVM))
2409 {
2410 uint32_t const fNemNotify = (fRamExists ? NEM_NOTIFY_PHYS_MMIO_EX_F_REPLACE : 0);
2411 rc = NEMR3NotifyPhysMmioExMapLate(pVM, GCPhys, GCPhysLast - GCPhys + 1, fNemNotify,
2412 fRamExists ? (uint8_t *)pRam->pvR3 + (uintptr_t)(GCPhys - pRam->GCPhys) : NULL,
2413 NULL, !fRamExists ? &pRam->uNemRange : NULL);
2414 AssertLogRelRCReturn(rc, rc);
2415 }
2416#endif
2417 }
2418 /** @todo the phys handler failure handling isn't complete, esp. wrt NEM. */
2419 else if (!fRamExists)
2420 {
2421 pVM->pgm.s.cPureMmioPages -= cb >> PAGE_SHIFT;
2422 pVM->pgm.s.cAllPages -= cb >> PAGE_SHIFT;
2423
2424 /* remove the ad hoc range. */
2425 pgmR3PhysUnlinkRamRange2(pVM, pNew, pRamPrev);
2426 pNew->cb = pNew->GCPhys = pNew->GCPhysLast = NIL_RTGCPHYS;
2427 MMHyperFree(pVM, pRam);
2428 }
2429 pgmPhysInvalidatePageMapTLB(pVM);
2430
2431 PGM_UNLOCK(pVM);
2432 return rc;
2433}
2434
2435
2436/**
2437 * This is the interface IOM is using to register an MMIO region.
2438 *
2439 * It will take care of calling PGMHandlerPhysicalDeregister and clean up
2440 * any ad hoc PGMRAMRANGE left behind.
2441 *
2442 * @returns VBox status code.
2443 * @param pVM The cross context VM structure.
2444 * @param GCPhys The start of the MMIO region.
2445 * @param cb The size of the MMIO region.
2446 */
2447VMMR3DECL(int) PGMR3PhysMMIODeregister(PVM pVM, RTGCPHYS GCPhys, RTGCPHYS cb)
2448{
2449 VM_ASSERT_EMT(pVM);
2450
2451 int rc = PGM_LOCK(pVM);
2452 AssertRCReturn(rc, rc);
2453
2454 /*
2455 * First deregister the handler, then check if we should remove the ram range.
2456 */
2457 rc = PGMHandlerPhysicalDeregister(pVM, GCPhys);
2458 if (RT_SUCCESS(rc))
2459 {
2460 RTGCPHYS GCPhysLast = GCPhys + (cb - 1);
2461 PPGMRAMRANGE pRamPrev = NULL;
2462 PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3;
2463 while (pRam && GCPhysLast >= pRam->GCPhys)
2464 {
2465 /** @todo We're being a bit too careful here. rewrite. */
2466 if ( GCPhysLast == pRam->GCPhysLast
2467 && GCPhys == pRam->GCPhys)
2468 {
2469 Assert(pRam->cb == cb);
2470
2471 /*
2472 * See if all the pages are dead MMIO pages.
2473 */
2474 uint32_t const cPages = cb >> PAGE_SHIFT;
2475 bool fAllMMIO = true;
2476 uint32_t iPage = 0;
2477 uint32_t cLeft = cPages;
2478 while (cLeft-- > 0)
2479 {
2480 PPGMPAGE pPage = &pRam->aPages[iPage];
2481 if ( !PGM_PAGE_IS_MMIO_OR_ALIAS(pPage)
2482 /*|| not-out-of-action later */)
2483 {
2484 fAllMMIO = false;
2485 AssertMsgFailed(("%RGp %R[pgmpage]\n", pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT), pPage));
2486 break;
2487 }
2488 Assert( PGM_PAGE_IS_ZERO(pPage)
2489 || PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_MMIO2_ALIAS_MMIO
2490 || PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_SPECIAL_ALIAS_MMIO);
2491 pPage++;
2492 }
2493 if (fAllMMIO)
2494 {
2495 /*
2496 * Ad-hoc range, unlink and free it.
2497 */
2498 Log(("PGMR3PhysMMIODeregister: Freeing ad hoc MMIO range for %RGp-%RGp %s\n",
2499 GCPhys, GCPhysLast, pRam->pszDesc));
2500 /** @todo check the ad-hoc flags? */
2501
2502#ifdef VBOX_WITH_NATIVE_NEM
2503 if (VM_IS_NEM_ENABLED(pVM)) /* Notify REM before we unlink the range. */
2504 {
2505 rc = NEMR3NotifyPhysMmioExUnmap(pVM, GCPhys, GCPhysLast - GCPhys + 1, 0 /*fFlags*/,
2506 NULL, NULL, NULL, &pRam->uNemRange);
2507 AssertLogRelRCReturn(rc, rc);
2508 }
2509#endif
2510
2511 pVM->pgm.s.cAllPages -= cPages;
2512 pVM->pgm.s.cPureMmioPages -= cPages;
2513
2514 pgmR3PhysUnlinkRamRange2(pVM, pRam, pRamPrev);
2515 pRam->cb = pRam->GCPhys = pRam->GCPhysLast = NIL_RTGCPHYS;
2516 MMHyperFree(pVM, pRam);
2517 break;
2518 }
2519 }
2520
2521 /*
2522 * Range match? It will all be within one range (see PGMAllHandler.cpp).
2523 */
2524 if ( GCPhysLast >= pRam->GCPhys
2525 && GCPhys <= pRam->GCPhysLast)
2526 {
2527 Assert(GCPhys >= pRam->GCPhys);
2528 Assert(GCPhysLast <= pRam->GCPhysLast);
2529
2530 /*
2531 * Turn the pages back into RAM pages.
2532 */
2533 uint32_t iPage = (GCPhys - pRam->GCPhys) >> PAGE_SHIFT;
2534 uint32_t cLeft = cb >> PAGE_SHIFT;
2535 while (cLeft--)
2536 {
2537 PPGMPAGE pPage = &pRam->aPages[iPage];
2538 AssertMsg( (PGM_PAGE_IS_MMIO(pPage) && PGM_PAGE_IS_ZERO(pPage))
2539 || PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_MMIO2_ALIAS_MMIO
2540 || PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_SPECIAL_ALIAS_MMIO,
2541 ("%RGp %R[pgmpage]\n", pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT), pPage));
2542 if (PGM_PAGE_IS_MMIO_OR_ALIAS(pPage))
2543 PGM_PAGE_SET_TYPE(pVM, pPage, PGMPAGETYPE_RAM);
2544 iPage++;
2545 }
2546
2547#ifdef VBOX_WITH_NATIVE_NEM
2548 /* Notify REM (failure will probably leave things in a non-working state). */
2549 if (VM_IS_NEM_ENABLED(pVM))
2550 {
2551 uint8_t u2State = UINT8_MAX;
2552 rc = NEMR3NotifyPhysMmioExUnmap(pVM, GCPhys, GCPhysLast - GCPhys + 1, NEM_NOTIFY_PHYS_MMIO_EX_F_REPLACE,
2553 pRam->pvR3 ? (uint8_t *)pRam->pvR3 + GCPhys - pRam->GCPhys : NULL,
2554 NULL, &u2State, &pRam->uNemRange);
2555 AssertLogRelRCReturn(rc, rc);
2556 if (u2State != UINT8_MAX)
2557 pgmPhysSetNemStateForPages(&pRam->aPages[(GCPhys - pRam->GCPhys) >> PAGE_SHIFT],
2558 cb >> PAGE_SHIFT, u2State);
2559 }
2560#endif
2561 break;
2562 }
2563
2564 /* next */
2565 pRamPrev = pRam;
2566 pRam = pRam->pNextR3;
2567 }
2568 }
2569
2570 /* Force a PGM pool flush as guest ram references have been changed. */
2571 /** @todo Not entirely SMP safe; assuming for now the guest takes care of
2572 * this internally (not touch mapped mmio while changing the mapping). */
2573 PVMCPU pVCpu = VMMGetCpu(pVM);
2574 pVCpu->pgm.s.fSyncFlags |= PGM_SYNC_CLEAR_PGM_POOL;
2575 VMCPU_FF_SET(pVCpu, VMCPU_FF_PGM_SYNC_CR3);
2576
2577 pgmPhysInvalidatePageMapTLB(pVM);
2578 pgmPhysInvalidRamRangeTlbs(pVM);
2579 PGM_UNLOCK(pVM);
2580 return rc;
2581}
2582
2583
2584
2585/*********************************************************************************************************************************
2586* MMIO2 *
2587*********************************************************************************************************************************/
2588
2589/**
2590 * Locate a MMIO2 range.
2591 *
2592 * @returns Pointer to the MMIO2 range.
2593 * @param pVM The cross context VM structure.
2594 * @param pDevIns The device instance owning the region.
2595 * @param iSubDev The sub-device number.
2596 * @param iRegion The region.
2597 * @param hMmio2 Handle to look up. If NIL, use the @a iSubDev and
2598 * @a iRegion.
2599 */
2600DECLINLINE(PPGMREGMMIO2RANGE) pgmR3PhysMmio2Find(PVM pVM, PPDMDEVINS pDevIns, uint32_t iSubDev,
2601 uint32_t iRegion, PGMMMIO2HANDLE hMmio2)
2602{
2603 if (hMmio2 != NIL_PGMMMIO2HANDLE)
2604 {
2605 if (hMmio2 <= RT_ELEMENTS(pVM->pgm.s.apMmio2RangesR3) && hMmio2 != 0)
2606 {
2607 PPGMREGMMIO2RANGE pCur = pVM->pgm.s.apMmio2RangesR3[hMmio2 - 1];
2608 if (pCur && pCur->pDevInsR3 == pDevIns)
2609 {
2610 Assert(pCur->idMmio2 == hMmio2);
2611 AssertReturn(pCur->fFlags & PGMREGMMIO2RANGE_F_FIRST_CHUNK, NULL);
2612 return pCur;
2613 }
2614 Assert(!pCur);
2615 }
2616 for (PPGMREGMMIO2RANGE pCur = pVM->pgm.s.pRegMmioRangesR3; pCur; pCur = pCur->pNextR3)
2617 if (pCur->idMmio2 == hMmio2)
2618 {
2619 AssertBreak(pCur->pDevInsR3 == pDevIns);
2620 AssertReturn(pCur->fFlags & PGMREGMMIO2RANGE_F_FIRST_CHUNK, NULL);
2621 return pCur;
2622 }
2623 }
2624 else
2625 {
2626 /*
2627 * Search the list. There shouldn't be many entries.
2628 */
2629 /** @todo Optimize this lookup! There may now be many entries and it'll
2630 * become really slow when doing MMR3HyperMapMMIO2 and similar. */
2631 for (PPGMREGMMIO2RANGE pCur = pVM->pgm.s.pRegMmioRangesR3; pCur; pCur = pCur->pNextR3)
2632 if ( pCur->pDevInsR3 == pDevIns
2633 && pCur->iRegion == iRegion
2634 && pCur->iSubDev == iSubDev)
2635 return pCur;
2636 }
2637 return NULL;
2638}
2639
2640
2641/**
2642 * Worker for PGMR3PhysMmio2ControlDirtyPageTracking and PGMR3PhysMmio2Map.
2643 */
2644static int pgmR3PhysMmio2EnableDirtyPageTracing(PVM pVM, PPGMREGMMIO2RANGE pFirstMmio2)
2645{
2646 int rc = VINF_SUCCESS;
2647 for (PPGMREGMMIO2RANGE pCurMmio2 = pFirstMmio2; pCurMmio2; pCurMmio2 = pCurMmio2->pNextR3)
2648 {
2649 Assert(!(pCurMmio2->fFlags & PGMREGMMIO2RANGE_F_IS_TRACKING));
2650 int rc2 = pgmHandlerPhysicalExRegister(pVM, pCurMmio2->pPhysHandlerR3, pCurMmio2->RamRange.GCPhys,
2651 pCurMmio2->RamRange.GCPhysLast);
2652 AssertLogRelMsgRC(rc2, ("%#RGp-%#RGp %s failed -> %Rrc\n", pCurMmio2->RamRange.GCPhys, pCurMmio2->RamRange.GCPhysLast,
2653 pCurMmio2->RamRange.pszDesc, rc2));
2654 if (RT_SUCCESS(rc2))
2655 pCurMmio2->fFlags |= PGMREGMMIO2RANGE_F_IS_TRACKING;
2656 else if (RT_SUCCESS(rc))
2657 rc = rc2;
2658 if (pCurMmio2->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
2659 return rc;
2660 }
2661 AssertFailed();
2662 return rc;
2663}
2664
2665
2666/**
2667 * Worker for PGMR3PhysMmio2ControlDirtyPageTracking and PGMR3PhysMmio2Unmap.
2668 */
2669static int pgmR3PhysMmio2DisableDirtyPageTracing(PVM pVM, PPGMREGMMIO2RANGE pFirstMmio2)
2670{
2671 for (PPGMREGMMIO2RANGE pCurMmio2 = pFirstMmio2; pCurMmio2; pCurMmio2 = pCurMmio2->pNextR3)
2672 {
2673 if (pCurMmio2->fFlags & PGMREGMMIO2RANGE_F_IS_TRACKING)
2674 {
2675 int rc2 = pgmHandlerPhysicalExDeregister(pVM, pCurMmio2->pPhysHandlerR3);
2676 AssertLogRelMsgRC(rc2, ("%#RGp-%#RGp %s failed -> %Rrc\n", pCurMmio2->RamRange.GCPhys, pCurMmio2->RamRange.GCPhysLast,
2677 pCurMmio2->RamRange.pszDesc, rc2));
2678 pCurMmio2->fFlags &= ~PGMREGMMIO2RANGE_F_IS_TRACKING;
2679 }
2680 if (pCurMmio2->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
2681 return VINF_SUCCESS;
2682 }
2683 AssertFailed();
2684 return VINF_SUCCESS;
2685
2686}
2687
2688
2689/**
2690 * Calculates the number of chunks
2691 *
2692 * @returns Number of registration chunk needed.
2693 * @param pVM The cross context VM structure.
2694 * @param cb The size of the MMIO/MMIO2 range.
2695 * @param pcPagesPerChunk Where to return the number of pages tracked by each
2696 * chunk. Optional.
2697 * @param pcbChunk Where to return the guest mapping size for a chunk.
2698 */
2699static uint16_t pgmR3PhysMmio2CalcChunkCount(PVM pVM, RTGCPHYS cb, uint32_t *pcPagesPerChunk, uint32_t *pcbChunk)
2700{
2701 RT_NOREF_PV(pVM); /* without raw mode */
2702
2703 /*
2704 * This is the same calculation as PGMR3PhysRegisterRam does, except we'll be
2705 * needing a few bytes extra the PGMREGMMIO2RANGE structure.
2706 *
2707 * Note! In additions, we've got a 24 bit sub-page range for MMIO2 ranges, leaving
2708 * us with an absolute maximum of 16777215 pages per chunk (close to 64 GB).
2709 */
2710 uint32_t const cPagesPerChunk = _4M;
2711 Assert(RT_ALIGN_32(cPagesPerChunk, X86_PD_PAE_SHIFT - X86_PAGE_SHIFT)); /* NEM large page requirement: 1GB pages. */
2712 uint32_t const cbChunk = RT_UOFFSETOF_DYN(PGMREGMMIO2RANGE, RamRange.aPages[cPagesPerChunk]);
2713 AssertRelease(cPagesPerChunk < _16M);
2714
2715 if (pcbChunk)
2716 *pcbChunk = cbChunk;
2717 if (pcPagesPerChunk)
2718 *pcPagesPerChunk = cPagesPerChunk;
2719
2720 /* Calc the number of chunks we need. */
2721 RTGCPHYS const cPages = cb >> X86_PAGE_SHIFT;
2722 uint16_t cChunks = (uint16_t)((cPages + cPagesPerChunk - 1) / cPagesPerChunk);
2723 AssertRelease((RTGCPHYS)cChunks * cPagesPerChunk >= cPages);
2724 return cChunks;
2725}
2726
2727
2728/**
2729 * Worker for PGMR3PhysMMIO2Register that allocates and the PGMREGMMIO2RANGE
2730 * structures and does basic initialization.
2731 *
2732 * Caller must set type specfic members and initialize the PGMPAGE structures.
2733 *
2734 * This was previously also used by PGMR3PhysMmio2PreRegister, a function for
2735 * pre-registering MMIO that was later (6.1) replaced by a new handle based IOM
2736 * interface. The reference to caller and type above is purely historical.
2737 *
2738 * @returns VBox status code.
2739 * @param pVM The cross context VM structure.
2740 * @param pDevIns The device instance owning the region.
2741 * @param iSubDev The sub-device number (internal PCI config number).
2742 * @param iRegion The region number. If the MMIO2 memory is a PCI
2743 * I/O region this number has to be the number of that
2744 * region. Otherwise it can be any number safe
2745 * UINT8_MAX.
2746 * @param cb The size of the region. Must be page aligned.
2747 * @param fFlags PGMPHYS_MMIO2_FLAGS_XXX.
2748 * @param idMmio2 The MMIO2 ID for the first chunk.
2749 * @param pszDesc The description.
2750 * @param ppHeadRet Where to return the pointer to the first
2751 * registration chunk.
2752 *
2753 * @thread EMT
2754 */
2755static int pgmR3PhysMmio2Create(PVM pVM, PPDMDEVINS pDevIns, uint32_t iSubDev, uint32_t iRegion, RTGCPHYS cb, uint32_t fFlags,
2756 uint8_t idMmio2, const char *pszDesc, PPGMREGMMIO2RANGE *ppHeadRet)
2757{
2758 /*
2759 * Figure out how many chunks we need and of which size.
2760 */
2761 uint32_t cPagesPerChunk;
2762 uint16_t cChunks = pgmR3PhysMmio2CalcChunkCount(pVM, cb, &cPagesPerChunk, NULL);
2763 AssertReturn(cChunks, VERR_PGM_PHYS_MMIO_EX_IPE);
2764
2765 /*
2766 * Allocate the chunks.
2767 */
2768 PPGMREGMMIO2RANGE *ppNext = ppHeadRet;
2769 *ppNext = NULL;
2770
2771 int rc = VINF_SUCCESS;
2772 uint32_t cPagesLeft = cb >> X86_PAGE_SHIFT;
2773 for (uint16_t iChunk = 0; iChunk < cChunks && RT_SUCCESS(rc); iChunk++, idMmio2++)
2774 {
2775 /*
2776 * We currently do a single RAM range for the whole thing. This will
2777 * probably have to change once someone needs really large MMIO regions,
2778 * as we will be running into SUPR3PageAllocEx limitations and such.
2779 */
2780 const uint32_t cPagesTrackedByChunk = RT_MIN(cPagesLeft, cPagesPerChunk);
2781 const size_t cbRange = RT_UOFFSETOF_DYN(PGMREGMMIO2RANGE, RamRange.aPages[cPagesTrackedByChunk]);
2782 PPGMREGMMIO2RANGE pNew = NULL;
2783 if ( iChunk + 1 < cChunks
2784 || cbRange >= _1M)
2785 {
2786 /*
2787 * Allocate memory for the registration structure.
2788 */
2789 size_t const cChunkPages = RT_ALIGN_Z(cbRange, PAGE_SIZE) >> PAGE_SHIFT;
2790 size_t const cbChunk = (1 + cChunkPages + 1) << PAGE_SHIFT;
2791 AssertLogRelBreakStmt(cbChunk == (uint32_t)cbChunk, rc = VERR_OUT_OF_RANGE);
2792 PSUPPAGE paChunkPages = (PSUPPAGE)RTMemTmpAllocZ(sizeof(SUPPAGE) * cChunkPages);
2793 AssertBreakStmt(paChunkPages, rc = VERR_NO_TMP_MEMORY);
2794 RTR0PTR R0PtrChunk = NIL_RTR0PTR;
2795 void *pvChunk = NULL;
2796 rc = SUPR3PageAllocEx(cChunkPages, 0 /*fFlags*/, &pvChunk, &R0PtrChunk, paChunkPages);
2797 AssertLogRelMsgRCBreakStmt(rc, ("rc=%Rrc, cChunkPages=%#zx\n", rc, cChunkPages), RTMemTmpFree(paChunkPages));
2798
2799 Assert(R0PtrChunk != NIL_RTR0PTR || PGM_IS_IN_NEM_MODE(pVM));
2800 memset(pvChunk, 0, cChunkPages << PAGE_SHIFT);
2801
2802 pNew = (PPGMREGMMIO2RANGE)pvChunk;
2803 pNew->RamRange.fFlags = PGM_RAM_RANGE_FLAGS_FLOATING;
2804 pNew->RamRange.pSelfR0 = R0PtrChunk + RT_UOFFSETOF(PGMREGMMIO2RANGE, RamRange);
2805
2806 RTMemTmpFree(paChunkPages);
2807 }
2808 /*
2809 * Not so big, do a one time hyper allocation.
2810 */
2811 else
2812 {
2813 rc = MMR3HyperAllocOnceNoRel(pVM, cbRange, 0, MM_TAG_PGM_PHYS, (void **)&pNew);
2814 AssertLogRelMsgRCBreak(rc, ("cbRange=%zu\n", cbRange));
2815
2816 /*
2817 * Initialize allocation specific items.
2818 */
2819 //pNew->RamRange.fFlags = 0;
2820 pNew->RamRange.pSelfR0 = MMHyperCCToR0(pVM, &pNew->RamRange);
2821 }
2822
2823 /*
2824 * Initialize the registration structure (caller does specific bits).
2825 */
2826 pNew->pDevInsR3 = pDevIns;
2827 //pNew->pvR3 = NULL;
2828 //pNew->pNext = NULL;
2829 if (iChunk == 0)
2830 pNew->fFlags |= PGMREGMMIO2RANGE_F_FIRST_CHUNK;
2831 if (iChunk + 1 == cChunks)
2832 pNew->fFlags |= PGMREGMMIO2RANGE_F_LAST_CHUNK;
2833 if (fFlags & PGMPHYS_MMIO2_FLAGS_TRACK_DIRTY_PAGES)
2834 pNew->fFlags |= PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES;
2835 pNew->iSubDev = iSubDev;
2836 pNew->iRegion = iRegion;
2837 pNew->idSavedState = UINT8_MAX;
2838 pNew->idMmio2 = idMmio2;
2839 //pNew->pPhysHandlerR3 = NULL;
2840 //pNew->paLSPages = NULL;
2841 pNew->RamRange.GCPhys = NIL_RTGCPHYS;
2842 pNew->RamRange.GCPhysLast = NIL_RTGCPHYS;
2843 pNew->RamRange.pszDesc = pszDesc;
2844 pNew->RamRange.cb = pNew->cbReal = (RTGCPHYS)cPagesTrackedByChunk << X86_PAGE_SHIFT;
2845 pNew->RamRange.fFlags |= PGM_RAM_RANGE_FLAGS_AD_HOC_MMIO_EX;
2846 pNew->RamRange.uNemRange = UINT32_MAX;
2847 //pNew->RamRange.pvR3 = NULL;
2848 //pNew->RamRange.paLSPages = NULL;
2849
2850 *ppNext = pNew;
2851 ASMCompilerBarrier();
2852 cPagesLeft -= cPagesTrackedByChunk;
2853 ppNext = &pNew->pNextR3;
2854
2855 /*
2856 * Pre-allocate a handler if we're tracking dirty pages, unless NEM takes care of this.
2857 */
2858 if ( (fFlags & PGMPHYS_MMIO2_FLAGS_TRACK_DIRTY_PAGES)
2859#ifdef VBOX_WITH_PGM_NEM_MODE
2860 && (!VM_IS_NEM_ENABLED(pVM) || !NEMR3IsMmio2DirtyPageTrackingSupported(pVM))
2861#endif
2862 )
2863
2864 {
2865 rc = pgmHandlerPhysicalExCreate(pVM, pVM->pgm.s.hMmio2DirtyPhysHandlerType,
2866 (RTR3PTR)(uintptr_t)idMmio2, idMmio2, idMmio2, pszDesc, &pNew->pPhysHandlerR3);
2867 AssertLogRelMsgRCBreak(rc, ("idMmio2=%zu\n", idMmio2));
2868 }
2869 }
2870 Assert(cPagesLeft == 0);
2871
2872 if (RT_SUCCESS(rc))
2873 {
2874 Assert((*ppHeadRet)->fFlags & PGMREGMMIO2RANGE_F_FIRST_CHUNK);
2875 return VINF_SUCCESS;
2876 }
2877
2878 /*
2879 * Free floating ranges.
2880 */
2881 while (*ppHeadRet)
2882 {
2883 PPGMREGMMIO2RANGE pFree = *ppHeadRet;
2884 *ppHeadRet = pFree->pNextR3;
2885
2886 if (pFree->pPhysHandlerR3)
2887 {
2888 pgmHandlerPhysicalExDestroy(pVM, pFree->pPhysHandlerR3);
2889 pFree->pPhysHandlerR3 = NULL;
2890 }
2891
2892 if (pFree->RamRange.fFlags & PGM_RAM_RANGE_FLAGS_FLOATING)
2893 {
2894 const size_t cbRange = RT_UOFFSETOF_DYN(PGMREGMMIO2RANGE, RamRange.aPages[pFree->RamRange.cb >> X86_PAGE_SHIFT]);
2895 size_t const cChunkPages = RT_ALIGN_Z(cbRange, PAGE_SIZE) >> PAGE_SHIFT;
2896 SUPR3PageFreeEx(pFree, cChunkPages);
2897 }
2898 }
2899
2900 return rc;
2901}
2902
2903
2904/**
2905 * Common worker PGMR3PhysMmio2PreRegister & PGMR3PhysMMIO2Register that links a
2906 * complete registration entry into the lists and lookup tables.
2907 *
2908 * @param pVM The cross context VM structure.
2909 * @param pNew The new MMIO / MMIO2 registration to link.
2910 */
2911static void pgmR3PhysMmio2Link(PVM pVM, PPGMREGMMIO2RANGE pNew)
2912{
2913 Assert(pNew->idMmio2 != UINT8_MAX);
2914
2915 /*
2916 * Link it into the list (order doesn't matter, so insert it at the head).
2917 *
2918 * Note! The range we're linking may consist of multiple chunks, so we
2919 * have to find the last one.
2920 */
2921 PPGMREGMMIO2RANGE pLast = pNew;
2922 for (pLast = pNew; ; pLast = pLast->pNextR3)
2923 {
2924 if (pLast->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
2925 break;
2926 Assert(pLast->pNextR3);
2927 Assert(pLast->pNextR3->pDevInsR3 == pNew->pDevInsR3);
2928 Assert(pLast->pNextR3->iSubDev == pNew->iSubDev);
2929 Assert(pLast->pNextR3->iRegion == pNew->iRegion);
2930 Assert(pLast->pNextR3->idMmio2 == pLast->idMmio2 + 1);
2931 }
2932
2933 PGM_LOCK_VOID(pVM);
2934
2935 /* Link in the chain of ranges at the head of the list. */
2936 pLast->pNextR3 = pVM->pgm.s.pRegMmioRangesR3;
2937 pVM->pgm.s.pRegMmioRangesR3 = pNew;
2938
2939 /* Insert the MMIO2 range/page IDs. */
2940 uint8_t idMmio2 = pNew->idMmio2;
2941 for (;;)
2942 {
2943 Assert(pVM->pgm.s.apMmio2RangesR3[idMmio2 - 1] == NULL);
2944 Assert(pVM->pgm.s.apMmio2RangesR0[idMmio2 - 1] == NIL_RTR0PTR);
2945 pVM->pgm.s.apMmio2RangesR3[idMmio2 - 1] = pNew;
2946 pVM->pgm.s.apMmio2RangesR0[idMmio2 - 1] = pNew->RamRange.pSelfR0 - RT_UOFFSETOF(PGMREGMMIO2RANGE, RamRange);
2947 if (pNew->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
2948 break;
2949 pNew = pNew->pNextR3;
2950 idMmio2++;
2951 }
2952
2953 pgmPhysInvalidatePageMapTLB(pVM);
2954 PGM_UNLOCK(pVM);
2955}
2956
2957
2958/**
2959 * Allocate and register an MMIO2 region.
2960 *
2961 * As mentioned elsewhere, MMIO2 is just RAM spelled differently. It's RAM
2962 * associated with a device. It is also non-shared memory with a permanent
2963 * ring-3 mapping and page backing (presently).
2964 *
2965 * A MMIO2 range may overlap with base memory if a lot of RAM is configured for
2966 * the VM, in which case we'll drop the base memory pages. Presently we will
2967 * make no attempt to preserve anything that happens to be present in the base
2968 * memory that is replaced, this is of course incorrect but it's too much
2969 * effort.
2970 *
2971 * @returns VBox status code.
2972 * @retval VINF_SUCCESS on success, *ppv pointing to the R3 mapping of the
2973 * memory.
2974 * @retval VERR_ALREADY_EXISTS if the region already exists.
2975 *
2976 * @param pVM The cross context VM structure.
2977 * @param pDevIns The device instance owning the region.
2978 * @param iSubDev The sub-device number.
2979 * @param iRegion The region number. If the MMIO2 memory is a PCI
2980 * I/O region this number has to be the number of that
2981 * region. Otherwise it can be any number save
2982 * UINT8_MAX.
2983 * @param cb The size of the region. Must be page aligned.
2984 * @param fFlags Reserved for future use, must be zero.
2985 * @param pszDesc The description.
2986 * @param ppv Where to store the pointer to the ring-3 mapping of
2987 * the memory.
2988 * @param phRegion Where to return the MMIO2 region handle. Optional.
2989 * @thread EMT
2990 */
2991VMMR3_INT_DECL(int) PGMR3PhysMmio2Register(PVM pVM, PPDMDEVINS pDevIns, uint32_t iSubDev, uint32_t iRegion, RTGCPHYS cb,
2992 uint32_t fFlags, const char *pszDesc, void **ppv, PGMMMIO2HANDLE *phRegion)
2993{
2994 /*
2995 * Validate input.
2996 */
2997 AssertPtrReturn(ppv, VERR_INVALID_POINTER);
2998 *ppv = NULL;
2999 if (phRegion)
3000 {
3001 AssertPtrReturn(phRegion, VERR_INVALID_POINTER);
3002 *phRegion = NIL_PGMMMIO2HANDLE;
3003 }
3004 VM_ASSERT_EMT_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
3005 AssertPtrReturn(pDevIns, VERR_INVALID_PARAMETER);
3006 AssertReturn(iSubDev <= UINT8_MAX, VERR_INVALID_PARAMETER);
3007 AssertReturn(iRegion <= UINT8_MAX, VERR_INVALID_PARAMETER);
3008 AssertPtrReturn(pszDesc, VERR_INVALID_POINTER);
3009 AssertReturn(*pszDesc, VERR_INVALID_PARAMETER);
3010 AssertReturn(pgmR3PhysMmio2Find(pVM, pDevIns, iSubDev, iRegion, NIL_PGMMMIO2HANDLE) == NULL, VERR_ALREADY_EXISTS);
3011 AssertReturn(!(cb & PAGE_OFFSET_MASK), VERR_INVALID_PARAMETER);
3012 AssertReturn(cb, VERR_INVALID_PARAMETER);
3013 AssertReturn(!(fFlags & ~PGMPHYS_MMIO2_FLAGS_VALID_MASK), VERR_INVALID_FLAGS);
3014
3015 const uint32_t cPages = cb >> PAGE_SHIFT;
3016 AssertLogRelReturn(((RTGCPHYS)cPages << PAGE_SHIFT) == cb, VERR_INVALID_PARAMETER);
3017 AssertLogRelReturn(cPages <= (MM_MMIO_64_MAX >> X86_PAGE_SHIFT), VERR_OUT_OF_RANGE);
3018 AssertLogRelReturn(cPages <= PGM_MMIO2_MAX_PAGE_COUNT, VERR_OUT_OF_RANGE);
3019
3020 /*
3021 * For the 2nd+ instance, mangle the description string so it's unique.
3022 */
3023 if (pDevIns->iInstance > 0) /** @todo Move to PDMDevHlp.cpp and use a real string cache. */
3024 {
3025 pszDesc = MMR3HeapAPrintf(pVM, MM_TAG_PGM_PHYS, "%s [%u]", pszDesc, pDevIns->iInstance);
3026 if (!pszDesc)
3027 return VERR_NO_MEMORY;
3028 }
3029
3030 /*
3031 * Allocate an MMIO2 range ID (not freed on failure).
3032 *
3033 * The zero ID is not used as it could be confused with NIL_GMM_PAGEID, so
3034 * the IDs goes from 1 thru PGM_MMIO2_MAX_RANGES.
3035 */
3036 unsigned cChunks = pgmR3PhysMmio2CalcChunkCount(pVM, cb, NULL, NULL);
3037
3038 PGM_LOCK_VOID(pVM);
3039 AssertCompile(PGM_MMIO2_MAX_RANGES < 255);
3040 uint8_t const idMmio2 = pVM->pgm.s.cMmio2Regions + 1;
3041 unsigned const cNewMmio2Regions = pVM->pgm.s.cMmio2Regions + cChunks;
3042 if (cNewMmio2Regions > PGM_MMIO2_MAX_RANGES)
3043 {
3044 PGM_UNLOCK(pVM);
3045 AssertLogRelFailedReturn(VERR_PGM_TOO_MANY_MMIO2_RANGES);
3046 }
3047 pVM->pgm.s.cMmio2Regions = cNewMmio2Regions;
3048 PGM_UNLOCK(pVM);
3049
3050 /*
3051 * Try reserve and allocate the backing memory first as this is what is
3052 * most likely to fail.
3053 */
3054 int rc = VINF_SUCCESS;
3055#ifdef VBOX_WITH_PGM_NEM_MODE
3056 if (!pVM->pgm.s.fNemMode)
3057#endif
3058 rc = MMR3AdjustFixedReservation(pVM, cPages, pszDesc);
3059 if (RT_SUCCESS(rc))
3060 {
3061 PSUPPAGE paPages = (PSUPPAGE)RTMemTmpAlloc(cPages * sizeof(SUPPAGE));
3062 if (RT_SUCCESS(rc))
3063 {
3064 void *pvPages;
3065#ifndef VBOX_WITH_LINEAR_HOST_PHYS_MEM
3066 RTR0PTR pvPagesR0 = NIL_RTR0PTR;
3067#endif
3068
3069#ifdef VBOX_WITH_PGM_NEM_MODE
3070 if (!pVM->pgm.s.fNemMode)
3071#endif
3072 {
3073#ifndef VBOX_WITH_LINEAR_HOST_PHYS_MEM
3074 rc = SUPR3PageAllocEx(cPages, 0 /*fFlags*/, &pvPages, &pvPagesR0, paPages);
3075#else
3076 rc = SUPR3PageAllocEx(cPages, 0 /*fFlags*/, &pvPages, NULL /*pR0Ptr*/, paPages);
3077#endif
3078 }
3079#ifdef VBOX_WITH_PGM_NEM_MODE
3080 else
3081 {
3082 rc = SUPR3PageAlloc(cPages, pVM->pgm.s.fUseLargePages ? SUP_PAGE_ALLOC_F_LARGE_PAGES : 0, &pvPages);
3083 if (RT_SUCCESS(rc))
3084 for (uint32_t i = 0; i < cPages; i++)
3085 paPages[i].Phys = UINT64_C(0x0000fffffffff000);
3086 }
3087#endif
3088 if (RT_SUCCESS(rc))
3089 {
3090 memset(pvPages, 0, cPages * PAGE_SIZE);
3091
3092 /*
3093 * Create the registered MMIO range record for it.
3094 */
3095 PPGMREGMMIO2RANGE pNew;
3096 rc = pgmR3PhysMmio2Create(pVM, pDevIns, iSubDev, iRegion, cb, fFlags, idMmio2, pszDesc, &pNew);
3097 if (RT_SUCCESS(rc))
3098 {
3099 if (phRegion)
3100 *phRegion = idMmio2; /* The ID of the first chunk. */
3101
3102 uint32_t iSrcPage = 0;
3103 uint8_t *pbCurPages = (uint8_t *)pvPages;
3104 for (PPGMREGMMIO2RANGE pCur = pNew; pCur; pCur = pCur->pNextR3)
3105 {
3106 pCur->pvR3 = pbCurPages;
3107#ifndef VBOX_WITH_LINEAR_HOST_PHYS_MEM
3108 pCur->pvR0 = pvPagesR0 + (iSrcPage << PAGE_SHIFT);
3109#endif
3110 pCur->RamRange.pvR3 = pbCurPages;
3111
3112 uint32_t iDstPage = pCur->RamRange.cb >> X86_PAGE_SHIFT;
3113 while (iDstPage-- > 0)
3114 {
3115 PGM_PAGE_INIT(&pNew->RamRange.aPages[iDstPage],
3116 paPages[iDstPage + iSrcPage].Phys,
3117 PGM_MMIO2_PAGEID_MAKE(idMmio2, iDstPage),
3118 PGMPAGETYPE_MMIO2, PGM_PAGE_STATE_ALLOCATED);
3119 }
3120
3121 /* advance. */
3122 iSrcPage += pCur->RamRange.cb >> X86_PAGE_SHIFT;
3123 pbCurPages += pCur->RamRange.cb;
3124 }
3125
3126 RTMemTmpFree(paPages);
3127
3128 /*
3129 * Update the page count stats, link the registration and we're done.
3130 */
3131 pVM->pgm.s.cAllPages += cPages;
3132 pVM->pgm.s.cPrivatePages += cPages;
3133
3134 pgmR3PhysMmio2Link(pVM, pNew);
3135
3136 *ppv = pvPages;
3137 return VINF_SUCCESS;
3138 }
3139
3140 SUPR3PageFreeEx(pvPages, cPages);
3141 }
3142 }
3143 RTMemTmpFree(paPages);
3144 MMR3AdjustFixedReservation(pVM, -(int32_t)cPages, pszDesc);
3145 }
3146 if (pDevIns->iInstance > 0)
3147 MMR3HeapFree((void *)pszDesc);
3148 return rc;
3149}
3150
3151
3152/**
3153 * Deregisters and frees an MMIO2 region.
3154 *
3155 * Any physical access handlers registered for the region must be deregistered
3156 * before calling this function.
3157 *
3158 * @returns VBox status code.
3159 * @param pVM The cross context VM structure.
3160 * @param pDevIns The device instance owning the region.
3161 * @param hMmio2 The MMIO2 handle to deregister, or NIL if all
3162 * regions for the given device is to be deregistered.
3163 */
3164VMMR3_INT_DECL(int) PGMR3PhysMmio2Deregister(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2)
3165{
3166 /*
3167 * Validate input.
3168 */
3169 VM_ASSERT_EMT_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
3170 AssertPtrReturn(pDevIns, VERR_INVALID_PARAMETER);
3171
3172 /*
3173 * The loop here scanning all registrations will make sure that multi-chunk ranges
3174 * get properly deregistered, though it's original purpose was the wildcard iRegion.
3175 */
3176 PGM_LOCK_VOID(pVM);
3177 int rc = VINF_SUCCESS;
3178 unsigned cFound = 0;
3179 PPGMREGMMIO2RANGE pPrev = NULL;
3180 PPGMREGMMIO2RANGE pCur = pVM->pgm.s.pRegMmioRangesR3;
3181 while (pCur)
3182 {
3183 uint32_t const fFlags = pCur->fFlags;
3184 if ( pCur->pDevInsR3 == pDevIns
3185 && ( hMmio2 == NIL_PGMMMIO2HANDLE
3186 || pCur->idMmio2 == hMmio2))
3187 {
3188 cFound++;
3189
3190 /*
3191 * Unmap it if it's mapped.
3192 */
3193 if (fFlags & PGMREGMMIO2RANGE_F_MAPPED)
3194 {
3195 int rc2 = PGMR3PhysMmio2Unmap(pVM, pCur->pDevInsR3, pCur->idMmio2, pCur->RamRange.GCPhys);
3196 AssertRC(rc2);
3197 if (RT_FAILURE(rc2) && RT_SUCCESS(rc))
3198 rc = rc2;
3199 }
3200
3201 /*
3202 * Unlink it
3203 */
3204 PPGMREGMMIO2RANGE pNext = pCur->pNextR3;
3205 if (pPrev)
3206 pPrev->pNextR3 = pNext;
3207 else
3208 pVM->pgm.s.pRegMmioRangesR3 = pNext;
3209 pCur->pNextR3 = NULL;
3210
3211 uint8_t idMmio2 = pCur->idMmio2;
3212 Assert(idMmio2 <= RT_ELEMENTS(pVM->pgm.s.apMmio2RangesR3));
3213 if (idMmio2 <= RT_ELEMENTS(pVM->pgm.s.apMmio2RangesR3))
3214 {
3215 Assert(pVM->pgm.s.apMmio2RangesR3[idMmio2 - 1] == pCur);
3216 pVM->pgm.s.apMmio2RangesR3[idMmio2 - 1] = NULL;
3217 pVM->pgm.s.apMmio2RangesR0[idMmio2 - 1] = NIL_RTR0PTR;
3218 }
3219
3220 /*
3221 * Free the memory.
3222 */
3223 uint32_t const cPages = pCur->cbReal >> PAGE_SHIFT;
3224#ifdef VBOX_WITH_PGM_NEM_MODE
3225 if (!pVM->pgm.s.fNemMode)
3226#endif
3227 {
3228 int rc2 = SUPR3PageFreeEx(pCur->pvR3, cPages);
3229 AssertRC(rc2);
3230 if (RT_FAILURE(rc2) && RT_SUCCESS(rc))
3231 rc = rc2;
3232
3233 rc2 = MMR3AdjustFixedReservation(pVM, -(int32_t)cPages, pCur->RamRange.pszDesc);
3234 AssertRC(rc2);
3235 if (RT_FAILURE(rc2) && RT_SUCCESS(rc))
3236 rc = rc2;
3237 }
3238#ifdef VBOX_WITH_PGM_NEM_MODE
3239 else
3240 {
3241 int rc2 = SUPR3PageFree(pCur->pvR3, cPages);
3242 AssertRC(rc2);
3243 if (RT_FAILURE(rc2) && RT_SUCCESS(rc))
3244 rc = rc2;
3245 }
3246#endif
3247
3248 if (pCur->pPhysHandlerR3)
3249 {
3250 pgmHandlerPhysicalExDestroy(pVM, pCur->pPhysHandlerR3);
3251 pCur->pPhysHandlerR3 = NULL;
3252 }
3253
3254 /* we're leaking hyper memory here if done at runtime. */
3255#ifdef VBOX_STRICT
3256 VMSTATE const enmState = VMR3GetState(pVM);
3257 AssertMsg( enmState == VMSTATE_POWERING_OFF
3258 || enmState == VMSTATE_POWERING_OFF_LS
3259 || enmState == VMSTATE_OFF
3260 || enmState == VMSTATE_OFF_LS
3261 || enmState == VMSTATE_DESTROYING
3262 || enmState == VMSTATE_TERMINATED
3263 || enmState == VMSTATE_CREATING
3264 , ("%s\n", VMR3GetStateName(enmState)));
3265#endif
3266
3267 if (pCur->RamRange.fFlags & PGM_RAM_RANGE_FLAGS_FLOATING)
3268 {
3269 const size_t cbRange = RT_UOFFSETOF_DYN(PGMREGMMIO2RANGE, RamRange.aPages[cPages]);
3270 size_t const cChunkPages = RT_ALIGN_Z(cbRange, PAGE_SIZE) >> PAGE_SHIFT;
3271 SUPR3PageFreeEx(pCur, cChunkPages);
3272 }
3273 /*else
3274 {
3275 rc = MMHyperFree(pVM, pCur); - does not work, see the alloc call.
3276 AssertRCReturn(rc, rc);
3277 } */
3278
3279
3280 /* update page count stats */
3281 pVM->pgm.s.cAllPages -= cPages;
3282 pVM->pgm.s.cPrivatePages -= cPages;
3283
3284 /* next */
3285 pCur = pNext;
3286 if (hMmio2 != NIL_PGMMMIO2HANDLE)
3287 {
3288 if (fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3289 break;
3290 hMmio2++;
3291 Assert(pCur->idMmio2 == hMmio2);
3292 Assert(pCur->pDevInsR3 == pDevIns);
3293 Assert(!(pCur->fFlags & PGMREGMMIO2RANGE_F_FIRST_CHUNK));
3294 }
3295 }
3296 else
3297 {
3298 pPrev = pCur;
3299 pCur = pCur->pNextR3;
3300 }
3301 }
3302 pgmPhysInvalidatePageMapTLB(pVM);
3303 PGM_UNLOCK(pVM);
3304 return !cFound && hMmio2 != NIL_PGMMMIO2HANDLE ? VERR_NOT_FOUND : rc;
3305}
3306
3307
3308/**
3309 * Maps a MMIO2 region.
3310 *
3311 * This is typically done when a guest / the bios / state loading changes the
3312 * PCI config. The replacing of base memory has the same restrictions as during
3313 * registration, of course.
3314 *
3315 * @returns VBox status code.
3316 *
3317 * @param pVM The cross context VM structure.
3318 * @param pDevIns The device instance owning the region.
3319 * @param hMmio2 The handle of the region to map.
3320 * @param GCPhys The guest-physical address to be remapped.
3321 */
3322VMMR3_INT_DECL(int) PGMR3PhysMmio2Map(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2, RTGCPHYS GCPhys)
3323{
3324 /*
3325 * Validate input.
3326 *
3327 * Note! It's safe to walk the MMIO/MMIO2 list since registrations only
3328 * happens during VM construction.
3329 */
3330 VM_ASSERT_EMT_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
3331 AssertPtrReturn(pDevIns, VERR_INVALID_PARAMETER);
3332 AssertReturn(GCPhys != NIL_RTGCPHYS, VERR_INVALID_PARAMETER);
3333 AssertReturn(GCPhys != 0, VERR_INVALID_PARAMETER);
3334 AssertReturn(!(GCPhys & PAGE_OFFSET_MASK), VERR_INVALID_PARAMETER);
3335 AssertReturn(hMmio2 != NIL_PGMMMIO2HANDLE, VERR_INVALID_HANDLE);
3336
3337 PPGMREGMMIO2RANGE pFirstMmio = pgmR3PhysMmio2Find(pVM, pDevIns, UINT32_MAX, UINT32_MAX, hMmio2);
3338 AssertReturn(pFirstMmio, VERR_NOT_FOUND);
3339 Assert(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_FIRST_CHUNK);
3340
3341 PPGMREGMMIO2RANGE pLastMmio = pFirstMmio;
3342 RTGCPHYS cbRange = 0;
3343 for (;;)
3344 {
3345 AssertReturn(!(pLastMmio->fFlags & PGMREGMMIO2RANGE_F_MAPPED), VERR_WRONG_ORDER);
3346 Assert(pLastMmio->RamRange.GCPhys == NIL_RTGCPHYS);
3347 Assert(pLastMmio->RamRange.GCPhysLast == NIL_RTGCPHYS);
3348 Assert(pLastMmio->pDevInsR3 == pFirstMmio->pDevInsR3);
3349 Assert(pLastMmio->iSubDev == pFirstMmio->iSubDev);
3350 Assert(pLastMmio->iRegion == pFirstMmio->iRegion);
3351 cbRange += pLastMmio->RamRange.cb;
3352 if (pLastMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3353 break;
3354 pLastMmio = pLastMmio->pNextR3;
3355 }
3356
3357 RTGCPHYS GCPhysLast = GCPhys + cbRange - 1;
3358 AssertLogRelReturn(GCPhysLast > GCPhys, VERR_INVALID_PARAMETER);
3359
3360 /*
3361 * Find our location in the ram range list, checking for restriction
3362 * we don't bother implementing yet (partially overlapping, multiple
3363 * ram ranges).
3364 */
3365 PGM_LOCK_VOID(pVM);
3366
3367 AssertReturnStmt(!(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_MAPPED), PGM_UNLOCK(pVM), VERR_WRONG_ORDER);
3368
3369 bool fRamExists = false;
3370 PPGMRAMRANGE pRamPrev = NULL;
3371 PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3;
3372 while (pRam && GCPhysLast >= pRam->GCPhys)
3373 {
3374 if ( GCPhys <= pRam->GCPhysLast
3375 && GCPhysLast >= pRam->GCPhys)
3376 {
3377 /* Completely within? */
3378 AssertLogRelMsgReturnStmt( GCPhys >= pRam->GCPhys
3379 && GCPhysLast <= pRam->GCPhysLast,
3380 ("%RGp-%RGp (MMIOEx/%s) falls partly outside %RGp-%RGp (%s)\n",
3381 GCPhys, GCPhysLast, pFirstMmio->RamRange.pszDesc,
3382 pRam->GCPhys, pRam->GCPhysLast, pRam->pszDesc),
3383 PGM_UNLOCK(pVM),
3384 VERR_PGM_RAM_CONFLICT);
3385
3386 /* Check that all the pages are RAM pages. */
3387 PPGMPAGE pPage = &pRam->aPages[(GCPhys - pRam->GCPhys) >> PAGE_SHIFT];
3388 uint32_t cPagesLeft = cbRange >> PAGE_SHIFT;
3389 while (cPagesLeft-- > 0)
3390 {
3391 AssertLogRelMsgReturnStmt(PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_RAM,
3392 ("%RGp isn't a RAM page (%d) - mapping %RGp-%RGp (MMIO2/%s).\n",
3393 GCPhys, PGM_PAGE_GET_TYPE(pPage), GCPhys, GCPhysLast, pFirstMmio->RamRange.pszDesc),
3394 PGM_UNLOCK(pVM),
3395 VERR_PGM_RAM_CONFLICT);
3396 pPage++;
3397 }
3398
3399 /* There can only be one MMIO/MMIO2 chunk matching here! */
3400 AssertLogRelMsgReturnStmt(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK,
3401 ("%RGp-%RGp (MMIOEx/%s, flags %#X) consists of multiple chunks whereas the RAM somehow doesn't!\n",
3402 GCPhys, GCPhysLast, pFirstMmio->RamRange.pszDesc, pFirstMmio->fFlags),
3403 PGM_UNLOCK(pVM),
3404 VERR_PGM_PHYS_MMIO_EX_IPE);
3405
3406 fRamExists = true;
3407 break;
3408 }
3409
3410 /* next */
3411 pRamPrev = pRam;
3412 pRam = pRam->pNextR3;
3413 }
3414 Log(("PGMR3PhysMmio2Map: %RGp-%RGp fRamExists=%RTbool %s\n", GCPhys, GCPhysLast, fRamExists, pFirstMmio->RamRange.pszDesc));
3415
3416
3417 /*
3418 * Make the changes.
3419 */
3420 RTGCPHYS GCPhysCur = GCPhys;
3421 for (PPGMREGMMIO2RANGE pCurMmio = pFirstMmio; ; pCurMmio = pCurMmio->pNextR3)
3422 {
3423 pCurMmio->RamRange.GCPhys = GCPhysCur;
3424 pCurMmio->RamRange.GCPhysLast = GCPhysCur + pCurMmio->RamRange.cb - 1;
3425 if (pCurMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3426 {
3427 Assert(pCurMmio->RamRange.GCPhysLast == GCPhysLast);
3428 break;
3429 }
3430 GCPhysCur += pCurMmio->RamRange.cb;
3431 }
3432
3433 if (fRamExists)
3434 {
3435 /*
3436 * Make all the pages in the range MMIO/ZERO pages, freeing any
3437 * RAM pages currently mapped here. This might not be 100% correct
3438 * for PCI memory, but we're doing the same thing for MMIO2 pages.
3439 *
3440 * We replace these MMIO/ZERO pages with real pages in the MMIO2 case.
3441 */
3442 Assert(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK); /* Only one chunk */
3443 Assert(pFirstMmio->pvR3 == pFirstMmio->RamRange.pvR3);
3444 Assert(pFirstMmio->RamRange.pvR3 != NULL);
3445
3446#ifdef VBOX_WITH_PGM_NEM_MODE
3447 /* We cannot mix MMIO2 into a RAM range in simplified memory mode because pRam->pvR3 can't point
3448 both at the RAM and MMIO2, so we won't ever write & read from the actual MMIO2 memory if we try. */
3449 AssertLogRelMsgReturn(!pVM->pgm.s.fNemMode, ("%s at %RGp-%RGp\n", pFirstMmio->RamRange.pszDesc, GCPhys, GCPhysLast),
3450 VERR_PGM_NOT_SUPPORTED_FOR_NEM_MODE);
3451#endif
3452
3453 int rc = pgmR3PhysFreePageRange(pVM, pRam, GCPhys, GCPhysLast, pFirstMmio->RamRange.pvR3);
3454 AssertRCReturnStmt(rc, PGM_UNLOCK(pVM), rc);
3455
3456 /* Replace the pages, freeing all present RAM pages. */
3457 PPGMPAGE pPageSrc = &pFirstMmio->RamRange.aPages[0];
3458 PPGMPAGE pPageDst = &pRam->aPages[(GCPhys - pRam->GCPhys) >> PAGE_SHIFT];
3459 uint32_t cPagesLeft = pFirstMmio->RamRange.cb >> PAGE_SHIFT;
3460 while (cPagesLeft-- > 0)
3461 {
3462 Assert(PGM_PAGE_IS_MMIO(pPageDst));
3463
3464 RTHCPHYS const HCPhys = PGM_PAGE_GET_HCPHYS(pPageSrc);
3465 uint32_t const idPage = PGM_PAGE_GET_PAGEID(pPageSrc);
3466 PGM_PAGE_SET_PAGEID(pVM, pPageDst, idPage);
3467 PGM_PAGE_SET_HCPHYS(pVM, pPageDst, HCPhys);
3468 PGM_PAGE_SET_TYPE(pVM, pPageDst, PGMPAGETYPE_MMIO2);
3469 PGM_PAGE_SET_STATE(pVM, pPageDst, PGM_PAGE_STATE_ALLOCATED);
3470 PGM_PAGE_SET_PDE_TYPE(pVM, pPageDst, PGM_PAGE_PDE_TYPE_DONTCARE);
3471 PGM_PAGE_SET_PTE_INDEX(pVM, pPageDst, 0);
3472 PGM_PAGE_SET_TRACKING(pVM, pPageDst, 0);
3473 /* NEM state is set by pgmR3PhysFreePageRange. */
3474
3475 pVM->pgm.s.cZeroPages--;
3476 GCPhys += PAGE_SIZE;
3477 pPageSrc++;
3478 pPageDst++;
3479 }
3480
3481 /* Flush physical page map TLB. */
3482 pgmPhysInvalidatePageMapTLB(pVM);
3483
3484 /* Force a PGM pool flush as guest ram references have been changed. */
3485 /** @todo not entirely SMP safe; assuming for now the guest takes care of
3486 * this internally (not touch mapped mmio while changing the mapping). */
3487 PVMCPU pVCpu = VMMGetCpu(pVM);
3488 pVCpu->pgm.s.fSyncFlags |= PGM_SYNC_CLEAR_PGM_POOL;
3489 VMCPU_FF_SET(pVCpu, VMCPU_FF_PGM_SYNC_CR3);
3490 }
3491 else
3492 {
3493 /*
3494 * No RAM range, insert the ones prepared during registration.
3495 */
3496 for (PPGMREGMMIO2RANGE pCurMmio = pFirstMmio; ; pCurMmio = pCurMmio->pNextR3)
3497 {
3498#ifdef VBOX_WITH_NATIVE_NEM
3499 /* Tell NEM and get the new NEM state for the pages. */
3500 uint8_t u2NemState = 0;
3501 if (VM_IS_NEM_ENABLED(pVM))
3502 {
3503 int rc = NEMR3NotifyPhysMmioExMapEarly(pVM, pCurMmio->RamRange.GCPhys,
3504 pCurMmio->RamRange.GCPhysLast - pCurMmio->RamRange.GCPhys + 1,
3505 NEM_NOTIFY_PHYS_MMIO_EX_F_MMIO2
3506 | (pCurMmio->fFlags & PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES
3507 ? NEM_NOTIFY_PHYS_MMIO_EX_F_TRACK_DIRTY_PAGES : 0),
3508 NULL /*pvRam*/, pCurMmio->RamRange.pvR3,
3509 &u2NemState, &pCurMmio->RamRange.uNemRange);
3510 AssertLogRelRCReturnStmt(rc, PGM_UNLOCK(pVM), rc);
3511 }
3512#endif
3513
3514 /* Clear the tracking data of pages we're going to reactivate. */
3515 PPGMPAGE pPageSrc = &pCurMmio->RamRange.aPages[0];
3516 uint32_t cPagesLeft = pCurMmio->RamRange.cb >> PAGE_SHIFT;
3517 while (cPagesLeft-- > 0)
3518 {
3519 PGM_PAGE_SET_TRACKING(pVM, pPageSrc, 0);
3520 PGM_PAGE_SET_PTE_INDEX(pVM, pPageSrc, 0);
3521#ifdef VBOX_WITH_NATIVE_NEM
3522 PGM_PAGE_SET_NEM_STATE(pPageSrc, u2NemState);
3523#endif
3524 pPageSrc++;
3525 }
3526
3527 /* link in the ram range */
3528 pgmR3PhysLinkRamRange(pVM, &pCurMmio->RamRange, pRamPrev);
3529
3530 if (pCurMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3531 {
3532 Assert(pCurMmio->RamRange.GCPhysLast == GCPhysLast);
3533 break;
3534 }
3535 pRamPrev = &pCurMmio->RamRange;
3536 }
3537 }
3538
3539 /*
3540 * If the range have dirty page monitoring enabled, enable that.
3541 *
3542 * We ignore failures here for now because if we fail, the whole mapping
3543 * will have to be reversed and we'll end up with nothing at all on the
3544 * screen and a grumpy guest, whereas if we just go on, we'll only have
3545 * visual distortions to gripe about. There will be something in the
3546 * release log.
3547 */
3548 if ( pFirstMmio->pPhysHandlerR3
3549 && (pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_TRACKING_ENABLED))
3550 pgmR3PhysMmio2EnableDirtyPageTracing(pVM, pFirstMmio);
3551
3552 /*
3553 * We're good, set the flags and invalid the mapping TLB.
3554 */
3555 for (PPGMREGMMIO2RANGE pCurMmio = pFirstMmio; ; pCurMmio = pCurMmio->pNextR3)
3556 {
3557 pCurMmio->fFlags |= PGMREGMMIO2RANGE_F_MAPPED;
3558 if (fRamExists)
3559 pCurMmio->fFlags |= PGMREGMMIO2RANGE_F_OVERLAPPING;
3560 else
3561 pCurMmio->fFlags &= ~PGMREGMMIO2RANGE_F_OVERLAPPING;
3562 if (pCurMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3563 break;
3564 }
3565 pgmPhysInvalidatePageMapTLB(pVM);
3566
3567#ifdef VBOX_WITH_NATIVE_NEM
3568 /*
3569 * Late NEM notification.
3570 */
3571 if (VM_IS_NEM_ENABLED(pVM))
3572 {
3573 int rc;
3574 uint32_t fNemFlags = NEM_NOTIFY_PHYS_MMIO_EX_F_MMIO2;
3575 if (pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES)
3576 fNemFlags |= NEM_NOTIFY_PHYS_MMIO_EX_F_TRACK_DIRTY_PAGES;
3577 if (fRamExists)
3578 rc = NEMR3NotifyPhysMmioExMapLate(pVM, GCPhys, GCPhysLast - GCPhys + 1, fNemFlags | NEM_NOTIFY_PHYS_MMIO_EX_F_REPLACE,
3579 pRam->pvR3 ? (uint8_t *)pRam->pvR3 + GCPhys - pRam->GCPhys : NULL, pFirstMmio->pvR3,
3580 NULL /*puNemRange*/);
3581 else
3582 {
3583 rc = VINF_SUCCESS;
3584 for (PPGMREGMMIO2RANGE pCurMmio = pFirstMmio; ; pCurMmio = pCurMmio->pNextR3)
3585 {
3586 rc = NEMR3NotifyPhysMmioExMapLate(pVM, pCurMmio->RamRange.GCPhys, pCurMmio->RamRange.cb, fNemFlags,
3587 NULL, pCurMmio->RamRange.pvR3, &pCurMmio->RamRange.uNemRange);
3588 if ((pCurMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK) || RT_FAILURE(rc))
3589 break;
3590 }
3591 }
3592 AssertLogRelRCReturnStmt(rc, PGMR3PhysMmio2Unmap(pVM, pDevIns, hMmio2, GCPhys); PGM_UNLOCK(pVM), rc);
3593 }
3594#endif
3595
3596 PGM_UNLOCK(pVM);
3597
3598 return VINF_SUCCESS;
3599}
3600
3601
3602/**
3603 * Unmaps an MMIO2 region.
3604 *
3605 * This is typically done when a guest / the bios / state loading changes the
3606 * PCI config. The replacing of base memory has the same restrictions as during
3607 * registration, of course.
3608 */
3609VMMR3_INT_DECL(int) PGMR3PhysMmio2Unmap(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2, RTGCPHYS GCPhys)
3610{
3611 /*
3612 * Validate input
3613 */
3614 VM_ASSERT_EMT_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
3615 AssertPtrReturn(pDevIns, VERR_INVALID_PARAMETER);
3616 AssertReturn(hMmio2 != NIL_PGMMMIO2HANDLE, VERR_INVALID_HANDLE);
3617 if (GCPhys != NIL_RTGCPHYS)
3618 {
3619 AssertReturn(GCPhys != 0, VERR_INVALID_PARAMETER);
3620 AssertReturn(!(GCPhys & PAGE_OFFSET_MASK), VERR_INVALID_PARAMETER);
3621 }
3622
3623 PPGMREGMMIO2RANGE pFirstMmio = pgmR3PhysMmio2Find(pVM, pDevIns, UINT32_MAX, UINT32_MAX, hMmio2);
3624 AssertReturn(pFirstMmio, VERR_NOT_FOUND);
3625 Assert(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_FIRST_CHUNK);
3626
3627 int rc = PGM_LOCK(pVM);
3628 AssertRCReturn(rc, rc);
3629
3630 PPGMREGMMIO2RANGE pLastMmio = pFirstMmio;
3631 RTGCPHYS cbRange = 0;
3632 for (;;)
3633 {
3634 AssertReturnStmt(pLastMmio->fFlags & PGMREGMMIO2RANGE_F_MAPPED, PGM_UNLOCK(pVM), VERR_WRONG_ORDER);
3635 AssertReturnStmt(pLastMmio->RamRange.GCPhys == GCPhys + cbRange || GCPhys == NIL_RTGCPHYS, PGM_UNLOCK(pVM), VERR_INVALID_PARAMETER);
3636 Assert(pLastMmio->pDevInsR3 == pFirstMmio->pDevInsR3);
3637 Assert(pLastMmio->iSubDev == pFirstMmio->iSubDev);
3638 Assert(pLastMmio->iRegion == pFirstMmio->iRegion);
3639 cbRange += pLastMmio->RamRange.cb;
3640 if (pLastMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3641 break;
3642 pLastMmio = pLastMmio->pNextR3;
3643 }
3644
3645 Log(("PGMR3PhysMmio2Unmap: %RGp-%RGp %s\n",
3646 pFirstMmio->RamRange.GCPhys, pLastMmio->RamRange.GCPhysLast, pFirstMmio->RamRange.pszDesc));
3647
3648 uint16_t const fOldFlags = pFirstMmio->fFlags;
3649 AssertReturnStmt(fOldFlags & PGMREGMMIO2RANGE_F_MAPPED, PGM_UNLOCK(pVM), VERR_WRONG_ORDER);
3650
3651 /*
3652 * If monitoring dirty pages, we must deregister the handlers first.
3653 */
3654 if ( pFirstMmio->pPhysHandlerR3
3655 && (fOldFlags & PGMREGMMIO2RANGE_F_TRACKING_ENABLED))
3656 pgmR3PhysMmio2DisableDirtyPageTracing(pVM, pFirstMmio);
3657
3658 /*
3659 * Unmap it.
3660 */
3661 int rcRet = VINF_SUCCESS;
3662#ifdef VBOX_WITH_NATIVE_NEM
3663 uint32_t const fNemFlags = NEM_NOTIFY_PHYS_MMIO_EX_F_MMIO2
3664 | (fOldFlags & PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES
3665 ? NEM_NOTIFY_PHYS_MMIO_EX_F_TRACK_DIRTY_PAGES : 0);
3666#endif
3667 if (fOldFlags & PGMREGMMIO2RANGE_F_OVERLAPPING)
3668 {
3669 /*
3670 * We've replaced RAM, replace with zero pages.
3671 *
3672 * Note! This is where we might differ a little from a real system, because
3673 * it's likely to just show the RAM pages as they were before the
3674 * MMIO/MMIO2 region was mapped here.
3675 */
3676 /* Only one chunk allowed when overlapping! */
3677 Assert(fOldFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK);
3678
3679 /* Restore the RAM pages we've replaced. */
3680 PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3;
3681 while (pRam->GCPhys > pFirstMmio->RamRange.GCPhysLast)
3682 pRam = pRam->pNextR3;
3683
3684 PPGMPAGE pPageDst = &pRam->aPages[(pFirstMmio->RamRange.GCPhys - pRam->GCPhys) >> PAGE_SHIFT];
3685 uint32_t cPagesLeft = pFirstMmio->RamRange.cb >> PAGE_SHIFT;
3686 pVM->pgm.s.cZeroPages += cPagesLeft; /** @todo not correct for NEM mode */
3687
3688#ifdef VBOX_WITH_NATIVE_NEM
3689 if (VM_IS_NEM_ENABLED(pVM)) /* Notify NEM. Note! we cannot be here in simple memory mode, see mapping function. */
3690 {
3691 uint8_t u2State = UINT8_MAX;
3692 rc = NEMR3NotifyPhysMmioExUnmap(pVM, pFirstMmio->RamRange.GCPhys, pFirstMmio->RamRange.cb,
3693 fNemFlags | NEM_NOTIFY_PHYS_MMIO_EX_F_REPLACE,
3694 pRam->pvR3
3695 ? (uint8_t *)pRam->pvR3 + pFirstMmio->RamRange.GCPhys - pRam->GCPhys : NULL,
3696 pFirstMmio->pvR3, &u2State, &pRam->uNemRange);
3697 AssertRCStmt(rc, rcRet = rc);
3698 if (u2State != UINT8_MAX)
3699 pgmPhysSetNemStateForPages(pPageDst, cPagesLeft, u2State);
3700 }
3701#endif
3702
3703 while (cPagesLeft-- > 0)
3704 {
3705 PGM_PAGE_INIT_ZERO(pPageDst, pVM, PGMPAGETYPE_RAM);
3706 pPageDst++;
3707 }
3708
3709 /* Flush physical page map TLB. */
3710 pgmPhysInvalidatePageMapTLB(pVM);
3711
3712 /* Update range state. */
3713 pFirstMmio->RamRange.GCPhys = NIL_RTGCPHYS;
3714 pFirstMmio->RamRange.GCPhysLast = NIL_RTGCPHYS;
3715 pFirstMmio->fFlags &= ~(PGMREGMMIO2RANGE_F_OVERLAPPING | PGMREGMMIO2RANGE_F_MAPPED);
3716 }
3717 else
3718 {
3719 /*
3720 * Unlink the chunks related to the MMIO/MMIO2 region.
3721 */
3722 for (PPGMREGMMIO2RANGE pCurMmio = pFirstMmio; ; pCurMmio = pCurMmio->pNextR3)
3723 {
3724#ifdef VBOX_WITH_NATIVE_NEM
3725 if (VM_IS_NEM_ENABLED(pVM)) /* Notify NEM. */
3726 {
3727 uint8_t u2State = UINT8_MAX;
3728 rc = NEMR3NotifyPhysMmioExUnmap(pVM, pCurMmio->RamRange.GCPhys, pCurMmio->RamRange.cb, fNemFlags,
3729 NULL, pCurMmio->pvR3, &u2State, &pCurMmio->RamRange.uNemRange);
3730 AssertRCStmt(rc, rcRet = rc);
3731 if (u2State != UINT8_MAX)
3732 pgmPhysSetNemStateForPages(pCurMmio->RamRange.aPages, pCurMmio->RamRange.cb >> PAGE_SHIFT, u2State);
3733 }
3734#endif
3735 pgmR3PhysUnlinkRamRange(pVM, &pCurMmio->RamRange);
3736 pCurMmio->RamRange.GCPhys = NIL_RTGCPHYS;
3737 pCurMmio->RamRange.GCPhysLast = NIL_RTGCPHYS;
3738 pCurMmio->fFlags &= ~(PGMREGMMIO2RANGE_F_OVERLAPPING | PGMREGMMIO2RANGE_F_MAPPED);
3739 if (pCurMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3740 break;
3741 }
3742 }
3743
3744 /* Force a PGM pool flush as guest ram references have been changed. */
3745 /** @todo not entirely SMP safe; assuming for now the guest takes care
3746 * of this internally (not touch mapped mmio while changing the
3747 * mapping). */
3748 PVMCPU pVCpu = VMMGetCpu(pVM);
3749 pVCpu->pgm.s.fSyncFlags |= PGM_SYNC_CLEAR_PGM_POOL;
3750 VMCPU_FF_SET(pVCpu, VMCPU_FF_PGM_SYNC_CR3);
3751
3752 pgmPhysInvalidatePageMapTLB(pVM);
3753 pgmPhysInvalidRamRangeTlbs(pVM);
3754
3755 PGM_UNLOCK(pVM);
3756 return rcRet;
3757}
3758
3759
3760/**
3761 * Reduces the mapping size of a MMIO2 region.
3762 *
3763 * This is mainly for dealing with old saved states after changing the default
3764 * size of a mapping region. See PGMDevHlpMMIOExReduce and
3765 * PDMPCIDEV::pfnRegionLoadChangeHookR3.
3766 *
3767 * The region must not currently be mapped when making this call. The VM state
3768 * must be state restore or VM construction.
3769 *
3770 * @returns VBox status code.
3771 * @param pVM The cross context VM structure.
3772 * @param pDevIns The device instance owning the region.
3773 * @param hMmio2 The handle of the region to reduce.
3774 * @param cbRegion The new mapping size.
3775 */
3776VMMR3_INT_DECL(int) PGMR3PhysMmio2Reduce(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2, RTGCPHYS cbRegion)
3777{
3778 /*
3779 * Validate input
3780 */
3781 VM_ASSERT_EMT_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
3782 AssertPtrReturn(pDevIns, VERR_INVALID_PARAMETER);
3783 AssertReturn(hMmio2 != NIL_PGMMMIO2HANDLE, VERR_INVALID_HANDLE);
3784 AssertReturn(cbRegion >= X86_PAGE_SIZE, VERR_INVALID_PARAMETER);
3785 AssertReturn(!(cbRegion & X86_PAGE_OFFSET_MASK), VERR_UNSUPPORTED_ALIGNMENT);
3786 VMSTATE enmVmState = VMR3GetState(pVM);
3787 AssertLogRelMsgReturn( enmVmState == VMSTATE_CREATING
3788 || enmVmState == VMSTATE_LOADING,
3789 ("enmVmState=%d (%s)\n", enmVmState, VMR3GetStateName(enmVmState)),
3790 VERR_VM_INVALID_VM_STATE);
3791
3792 int rc = PGM_LOCK(pVM);
3793 AssertRCReturn(rc, rc);
3794
3795 PPGMREGMMIO2RANGE pFirstMmio = pgmR3PhysMmio2Find(pVM, pDevIns, UINT32_MAX, UINT32_MAX, hMmio2);
3796 if (pFirstMmio)
3797 {
3798 Assert(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_FIRST_CHUNK);
3799 if (!(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_MAPPED))
3800 {
3801 /*
3802 * NOTE! Current implementation does not support multiple ranges.
3803 * Implement when there is a real world need and thus a testcase.
3804 */
3805 AssertLogRelMsgStmt(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK,
3806 ("%s: %#x\n", pFirstMmio->RamRange.pszDesc, pFirstMmio->fFlags),
3807 rc = VERR_NOT_SUPPORTED);
3808 if (RT_SUCCESS(rc))
3809 {
3810 /*
3811 * Make the change.
3812 */
3813 Log(("PGMR3PhysMmio2Reduce: %s changes from %RGp bytes (%RGp) to %RGp bytes.\n",
3814 pFirstMmio->RamRange.pszDesc, pFirstMmio->RamRange.cb, pFirstMmio->cbReal, cbRegion));
3815
3816 AssertLogRelMsgStmt(cbRegion <= pFirstMmio->cbReal,
3817 ("%s: cbRegion=%#RGp cbReal=%#RGp\n", pFirstMmio->RamRange.pszDesc, cbRegion, pFirstMmio->cbReal),
3818 rc = VERR_OUT_OF_RANGE);
3819 if (RT_SUCCESS(rc))
3820 {
3821 pFirstMmio->RamRange.cb = cbRegion;
3822 }
3823 }
3824 }
3825 else
3826 rc = VERR_WRONG_ORDER;
3827 }
3828 else
3829 rc = VERR_NOT_FOUND;
3830
3831 PGM_UNLOCK(pVM);
3832 return rc;
3833}
3834
3835
3836/**
3837 * Validates @a hMmio2, making sure it belongs to @a pDevIns.
3838 *
3839 * @returns VBox status code.
3840 * @param pVM The cross context VM structure.
3841 * @param pDevIns The device which allegedly owns @a hMmio2.
3842 * @param hMmio2 The handle to validate.
3843 */
3844VMMR3_INT_DECL(int) PGMR3PhysMmio2ValidateHandle(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2)
3845{
3846 /*
3847 * Validate input
3848 */
3849 VM_ASSERT_EMT_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
3850 AssertPtrReturn(pDevIns, VERR_INVALID_POINTER);
3851
3852 /*
3853 * Just do this the simple way. No need for locking as this is only taken at
3854 */
3855 PGM_LOCK_VOID(pVM);
3856 PPGMREGMMIO2RANGE pFirstMmio = pgmR3PhysMmio2Find(pVM, pDevIns, UINT32_MAX, UINT32_MAX, hMmio2);
3857 PGM_UNLOCK(pVM);
3858 AssertReturn(pFirstMmio, VERR_INVALID_HANDLE);
3859 AssertReturn(pFirstMmio->fFlags & PGMREGMMIO2RANGE_F_FIRST_CHUNK, VERR_INVALID_HANDLE);
3860 return VINF_SUCCESS;
3861}
3862
3863
3864/**
3865 * Gets the mapping address of an MMIO2 region.
3866 *
3867 * @returns Mapping address, NIL_RTGCPHYS if not mapped or invalid handle.
3868 *
3869 * @param pVM The cross context VM structure.
3870 * @param pDevIns The device owning the MMIO2 handle.
3871 * @param hMmio2 The region handle.
3872 */
3873VMMR3_INT_DECL(RTGCPHYS) PGMR3PhysMmio2GetMappingAddress(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2)
3874{
3875 AssertPtrReturn(pDevIns, NIL_RTGCPHYS);
3876
3877 PPGMREGMMIO2RANGE pFirstRegMmio = pgmR3PhysMmio2Find(pVM, pDevIns, UINT32_MAX, UINT32_MAX, hMmio2);
3878 AssertReturn(pFirstRegMmio, NIL_RTGCPHYS);
3879
3880 if (pFirstRegMmio->fFlags & PGMREGMMIO2RANGE_F_MAPPED)
3881 return pFirstRegMmio->RamRange.GCPhys;
3882 return NIL_RTGCPHYS;
3883}
3884
3885
3886/**
3887 * Worker for PGMR3PhysMmio2QueryAndResetDirtyBitmap.
3888 *
3889 * Called holding the PGM lock.
3890 */
3891static int pgmR3PhysMmio2QueryAndResetDirtyBitmapLocked(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2,
3892 void *pvBitmap, size_t cbBitmap)
3893{
3894 /*
3895 * Continue validation.
3896 */
3897 PPGMREGMMIO2RANGE pFirstRegMmio = pgmR3PhysMmio2Find(pVM, pDevIns, UINT32_MAX, UINT32_MAX, hMmio2);
3898 AssertReturn(pFirstRegMmio, VERR_INVALID_HANDLE);
3899 AssertReturn( (pFirstRegMmio->fFlags & (PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES | PGMREGMMIO2RANGE_F_FIRST_CHUNK))
3900 == (PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES | PGMREGMMIO2RANGE_F_FIRST_CHUNK),
3901 VERR_INVALID_FUNCTION);
3902 AssertReturn(pDevIns == pFirstRegMmio->pDevInsR3, VERR_NOT_OWNER);
3903
3904 RTGCPHYS cbTotal = 0;
3905 uint16_t fTotalDirty = 0;
3906 for (PPGMREGMMIO2RANGE pCur = pFirstRegMmio;;)
3907 {
3908 cbTotal += pCur->RamRange.cb; /* Not using cbReal here, because NEM is not in on the creating, only the mapping. */
3909 fTotalDirty |= pCur->fFlags;
3910 if (pCur->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3911 break;
3912 pCur = pCur->pNextR3;
3913 AssertPtrReturn(pCur, VERR_INTERNAL_ERROR_5);
3914 AssertReturn( (pCur->fFlags & (PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES | PGMREGMMIO2RANGE_F_FIRST_CHUNK))
3915 == PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES,
3916 VERR_INTERNAL_ERROR_4);
3917 }
3918 size_t const cbTotalBitmap = RT_ALIGN_T(cbTotal, PAGE_SIZE * 64, RTGCPHYS) / PAGE_SIZE / 8;
3919
3920 if (cbBitmap)
3921 {
3922 AssertPtrReturn(pvBitmap, VERR_INVALID_POINTER);
3923 AssertReturn(RT_ALIGN_P(pvBitmap, sizeof(uint64_t)) == pvBitmap, VERR_INVALID_POINTER);
3924 AssertReturn(cbBitmap == cbTotalBitmap, VERR_INVALID_PARAMETER);
3925 }
3926
3927 /*
3928 * Do the work.
3929 */
3930 int rc = VINF_SUCCESS;
3931 if (pvBitmap)
3932 {
3933#ifdef VBOX_WITH_PGM_NEM_MODE
3934 if (pFirstRegMmio->pPhysHandlerR3 == NULL)
3935 {
3936 AssertReturn(VM_IS_NEM_ENABLED(pVM), VERR_INTERNAL_ERROR_4);
3937 uint8_t *pbBitmap = (uint8_t *)pvBitmap;
3938 for (PPGMREGMMIO2RANGE pCur = pFirstRegMmio; pCur; pCur = pCur->pNextR3)
3939 {
3940 size_t const cbBitmapChunk = pCur->RamRange.cb / PAGE_SIZE / 8;
3941 Assert((RTGCPHYS)cbBitmapChunk * PAGE_SIZE * 8 == pCur->RamRange.cb);
3942 int rc2 = NEMR3PhysMmio2QueryAndResetDirtyBitmap(pVM, pCur->RamRange.GCPhys, pCur->RamRange.cb,
3943 pCur->RamRange.uNemRange, pbBitmap, cbBitmapChunk);
3944 if (RT_FAILURE(rc2) && RT_SUCCESS(rc))
3945 rc = rc2;
3946 if (pCur->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3947 break;
3948 pbBitmap += pCur->RamRange.cb / PAGE_SIZE / 8;
3949 }
3950 }
3951 else
3952#endif
3953 if (fTotalDirty & PGMREGMMIO2RANGE_F_IS_DIRTY)
3954 {
3955 if ( (pFirstRegMmio->fFlags & (PGMREGMMIO2RANGE_F_MAPPED | PGMREGMMIO2RANGE_F_TRACKING_ENABLED))
3956 == (PGMREGMMIO2RANGE_F_MAPPED | PGMREGMMIO2RANGE_F_TRACKING_ENABLED))
3957 {
3958 /*
3959 * Reset each chunk, gathering dirty bits.
3960 */
3961 RT_BZERO(pvBitmap, cbBitmap); /* simpler for now. */
3962 uint32_t iPageNo = 0;
3963 for (PPGMREGMMIO2RANGE pCur = pFirstRegMmio; pCur; pCur = pCur->pNextR3)
3964 {
3965 if (pCur->fFlags & PGMREGMMIO2RANGE_F_IS_DIRTY)
3966 {
3967 int rc2 = pgmHandlerPhysicalResetMmio2WithBitmap(pVM, pCur->RamRange.GCPhys, pvBitmap, iPageNo);
3968 if (RT_FAILURE(rc2) && RT_SUCCESS(rc))
3969 rc = rc2;
3970 pCur->fFlags &= ~PGMREGMMIO2RANGE_F_IS_DIRTY;
3971 }
3972 if (pCur->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3973 break;
3974 iPageNo += pCur->RamRange.cb >> PAGE_SHIFT;
3975 }
3976 }
3977 else
3978 {
3979 /*
3980 * If not mapped or tracking is disabled, we return the
3981 * PGMREGMMIO2RANGE_F_IS_DIRTY status for all pages. We cannot
3982 * get more accurate data than that after unmapping or disabling.
3983 */
3984 RT_BZERO(pvBitmap, cbBitmap);
3985 uint32_t iPageNo = 0;
3986 for (PPGMREGMMIO2RANGE pCur = pFirstRegMmio; pCur; pCur = pCur->pNextR3)
3987 {
3988 if (pCur->fFlags & PGMREGMMIO2RANGE_F_IS_DIRTY)
3989 {
3990 ASMBitSetRange(pvBitmap, iPageNo, iPageNo + (pCur->RamRange.cb >> PAGE_SHIFT));
3991 pCur->fFlags &= ~PGMREGMMIO2RANGE_F_IS_DIRTY;
3992 }
3993 if (pCur->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
3994 break;
3995 iPageNo += pCur->RamRange.cb >> PAGE_SHIFT;
3996 }
3997 }
3998 }
3999 /*
4000 * No dirty chunks.
4001 */
4002 else
4003 RT_BZERO(pvBitmap, cbBitmap);
4004 }
4005 /*
4006 * No bitmap. Reset the region if tracking is currently enabled.
4007 */
4008 else if ( (pFirstRegMmio->fFlags & (PGMREGMMIO2RANGE_F_MAPPED | PGMREGMMIO2RANGE_F_TRACKING_ENABLED))
4009 == (PGMREGMMIO2RANGE_F_MAPPED | PGMREGMMIO2RANGE_F_TRACKING_ENABLED))
4010 {
4011#ifdef VBOX_WITH_PGM_NEM_MODE
4012 if (pFirstRegMmio->pPhysHandlerR3 == NULL)
4013 {
4014 AssertReturn(VM_IS_NEM_ENABLED(pVM), VERR_INTERNAL_ERROR_4);
4015 for (PPGMREGMMIO2RANGE pCur = pFirstRegMmio; pCur; pCur = pCur->pNextR3)
4016 {
4017 int rc2 = NEMR3PhysMmio2QueryAndResetDirtyBitmap(pVM, pCur->RamRange.GCPhys, pCur->RamRange.cb,
4018 pCur->RamRange.uNemRange, NULL, 0);
4019 if (RT_FAILURE(rc2) && RT_SUCCESS(rc))
4020 rc = rc2;
4021 if (pCur->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
4022 break;
4023 }
4024 }
4025 else
4026#endif
4027 {
4028 for (PPGMREGMMIO2RANGE pCur = pFirstRegMmio; pCur; pCur = pCur->pNextR3)
4029 {
4030 pCur->fFlags &= ~PGMREGMMIO2RANGE_F_IS_DIRTY;
4031 int rc2 = PGMHandlerPhysicalReset(pVM, pCur->RamRange.GCPhys);
4032 if (RT_FAILURE(rc2) && RT_SUCCESS(rc))
4033 rc = rc2;
4034 if (pCur->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
4035 break;
4036 }
4037 }
4038 }
4039
4040 return rc;
4041}
4042
4043
4044/**
4045 * Queries the dirty page bitmap and resets the monitoring.
4046 *
4047 * The PGMPHYS_MMIO2_FLAGS_TRACK_DIRTY_PAGES flag must be specified when
4048 * creating the range for this to work.
4049 *
4050 * @returns VBox status code.
4051 * @retval VERR_INVALID_FUNCTION if not created using
4052 * PGMPHYS_MMIO2_FLAGS_TRACK_DIRTY_PAGES.
4053 * @param pVM The cross context VM structure.
4054 * @param pDevIns The device owning the MMIO2 handle.
4055 * @param hMmio2 The region handle.
4056 * @param pvBitmap The output bitmap. Must be 8-byte aligned. Ignored
4057 * when @a cbBitmap is zero.
4058 * @param cbBitmap The size of the bitmap. Must be the size of the whole
4059 * MMIO2 range, rounded up to the nearest 8 bytes.
4060 * When zero only a reset is done.
4061 */
4062VMMR3_INT_DECL(int) PGMR3PhysMmio2QueryAndResetDirtyBitmap(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2,
4063 void *pvBitmap, size_t cbBitmap)
4064{
4065 /*
4066 * Do some basic validation before grapping the PGM lock and continuing.
4067 */
4068 AssertPtrReturn(pDevIns, VERR_INVALID_POINTER);
4069 AssertReturn(RT_ALIGN_Z(cbBitmap, sizeof(uint64_t)) == cbBitmap, VERR_INVALID_PARAMETER);
4070 int rc = PGM_LOCK(pVM);
4071 if (RT_SUCCESS(rc))
4072 {
4073 STAM_PROFILE_START(&pVM->pgm.s.StatMmio2QueryAndResetDirtyBitmap, a);
4074 rc = pgmR3PhysMmio2QueryAndResetDirtyBitmapLocked(pVM, pDevIns, hMmio2, pvBitmap, cbBitmap);
4075 STAM_PROFILE_STOP(&pVM->pgm.s.StatMmio2QueryAndResetDirtyBitmap, a);
4076 PGM_UNLOCK(pVM);
4077 }
4078 return rc;
4079}
4080
4081/**
4082 * Worker for PGMR3PhysMmio2ControlDirtyPageTracking
4083 *
4084 * Called owning the PGM lock.
4085 */
4086static int pgmR3PhysMmio2ControlDirtyPageTrackingLocked(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2, bool fEnabled)
4087{
4088 /*
4089 * Continue validation.
4090 */
4091 PPGMREGMMIO2RANGE pFirstRegMmio = pgmR3PhysMmio2Find(pVM, pDevIns, UINT32_MAX, UINT32_MAX, hMmio2);
4092 AssertReturn(pFirstRegMmio, VERR_INVALID_HANDLE);
4093 AssertReturn( (pFirstRegMmio->fFlags & (PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES | PGMREGMMIO2RANGE_F_FIRST_CHUNK))
4094 == (PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES | PGMREGMMIO2RANGE_F_FIRST_CHUNK)
4095 , VERR_INVALID_FUNCTION);
4096 AssertReturn(pDevIns == pFirstRegMmio->pDevInsR3, VERR_NOT_OWNER);
4097
4098#ifdef VBOX_WITH_PGM_NEM_MODE
4099 /*
4100 * This is a nop if NEM is responsible for doing the tracking, we simply
4101 * leave the tracking on all the time there.
4102 */
4103 if (pFirstRegMmio->pPhysHandlerR3 == NULL)
4104 {
4105 AssertReturn(VM_IS_NEM_ENABLED(pVM), VERR_INTERNAL_ERROR_4);
4106 return VINF_SUCCESS;
4107 }
4108#endif
4109
4110 /*
4111 * Anyting needing doing?
4112 */
4113 if (fEnabled != RT_BOOL(pFirstRegMmio->fFlags & PGMREGMMIO2RANGE_F_TRACKING_ENABLED))
4114 {
4115 LogFlowFunc(("fEnabled=%RTbool %s\n", fEnabled, pFirstRegMmio->RamRange.pszDesc));
4116
4117 /*
4118 * Update the PGMREGMMIO2RANGE_F_TRACKING_ENABLED flag.
4119 */
4120 for (PPGMREGMMIO2RANGE pCur = pFirstRegMmio;;)
4121 {
4122 if (fEnabled)
4123 pCur->fFlags |= PGMREGMMIO2RANGE_F_TRACKING_ENABLED;
4124 else
4125 pCur->fFlags &= ~PGMREGMMIO2RANGE_F_TRACKING_ENABLED;
4126 if (pCur->fFlags & PGMREGMMIO2RANGE_F_LAST_CHUNK)
4127 break;
4128 pCur = pCur->pNextR3;
4129 AssertPtrReturn(pCur, VERR_INTERNAL_ERROR_5);
4130 AssertReturn( (pCur->fFlags & (PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES | PGMREGMMIO2RANGE_F_FIRST_CHUNK))
4131 == PGMREGMMIO2RANGE_F_TRACK_DIRTY_PAGES
4132 , VERR_INTERNAL_ERROR_4);
4133 }
4134
4135 /*
4136 * Enable/disable handlers if currently mapped.
4137 *
4138 * We ignore status codes here as we've already changed the flags and
4139 * returning a failure status now would be confusing. Besides, the two
4140 * functions will continue past failures. As argued in the mapping code,
4141 * it's in the release log.
4142 */
4143 if (pFirstRegMmio->fFlags & PGMREGMMIO2RANGE_F_MAPPED)
4144 {
4145 if (fEnabled)
4146 pgmR3PhysMmio2EnableDirtyPageTracing(pVM, pFirstRegMmio);
4147 else
4148 pgmR3PhysMmio2DisableDirtyPageTracing(pVM, pFirstRegMmio);
4149 }
4150 }
4151 else
4152 LogFlowFunc(("fEnabled=%RTbool %s - no change\n", fEnabled, pFirstRegMmio->RamRange.pszDesc));
4153
4154 return VINF_SUCCESS;
4155}
4156
4157
4158/**
4159 * Controls the dirty page tracking for an MMIO2 range.
4160 *
4161 * @returns VBox status code.
4162 * @param pVM The cross context VM structure.
4163 * @param pDevIns The device owning the MMIO2 memory.
4164 * @param hMmio2 The handle of the region.
4165 * @param fEnabled The new tracking state.
4166 */
4167VMMR3_INT_DECL(int) PGMR3PhysMmio2ControlDirtyPageTracking(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2, bool fEnabled)
4168{
4169 /*
4170 * Do some basic validation before grapping the PGM lock and continuing.
4171 */
4172 AssertPtrReturn(pDevIns, VERR_INVALID_POINTER);
4173 int rc = PGM_LOCK(pVM);
4174 if (RT_SUCCESS(rc))
4175 {
4176 rc = pgmR3PhysMmio2ControlDirtyPageTrackingLocked(pVM, pDevIns, hMmio2, fEnabled);
4177 PGM_UNLOCK(pVM);
4178 }
4179 return rc;
4180}
4181
4182
4183/**
4184 * Changes the region number of an MMIO2 region.
4185 *
4186 * This is only for dealing with save state issues, nothing else.
4187 *
4188 * @return VBox status code.
4189 *
4190 * @param pVM The cross context VM structure.
4191 * @param pDevIns The device owning the MMIO2 memory.
4192 * @param hMmio2 The handle of the region.
4193 * @param iNewRegion The new region index.
4194 *
4195 * @thread EMT(0)
4196 * @sa @bugref{9359}
4197 */
4198VMMR3_INT_DECL(int) PGMR3PhysMmio2ChangeRegionNo(PVM pVM, PPDMDEVINS pDevIns, PGMMMIO2HANDLE hMmio2, uint32_t iNewRegion)
4199{
4200 /*
4201 * Validate input.
4202 */
4203 VM_ASSERT_EMT0_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
4204 VM_ASSERT_STATE_RETURN(pVM, VMSTATE_LOADING, VERR_VM_INVALID_VM_STATE);
4205 AssertPtrReturn(pDevIns, VERR_INVALID_PARAMETER);
4206 AssertReturn(hMmio2 != NIL_PGMMMIO2HANDLE, VERR_INVALID_HANDLE);
4207 AssertReturn(iNewRegion <= UINT8_MAX, VERR_INVALID_PARAMETER);
4208
4209 AssertReturn(pVM->enmVMState == VMSTATE_LOADING, VERR_INVALID_STATE);
4210
4211 int rc = PGM_LOCK(pVM);
4212 AssertRCReturn(rc, rc);
4213
4214 PPGMREGMMIO2RANGE pFirstRegMmio = pgmR3PhysMmio2Find(pVM, pDevIns, UINT32_MAX, UINT32_MAX, hMmio2);
4215 AssertReturnStmt(pFirstRegMmio, PGM_UNLOCK(pVM), VERR_NOT_FOUND);
4216 AssertReturnStmt(pgmR3PhysMmio2Find(pVM, pDevIns, pFirstRegMmio->iSubDev, iNewRegion, NIL_PGMMMIO2HANDLE) == NULL,
4217 PGM_UNLOCK(pVM), VERR_RESOURCE_IN_USE);
4218
4219 /*
4220 * Make the change.
4221 */
4222 pFirstRegMmio->iRegion = (uint8_t)iNewRegion;
4223
4224 PGM_UNLOCK(pVM);
4225 return VINF_SUCCESS;
4226}
4227
4228
4229
4230/*********************************************************************************************************************************
4231* ROM *
4232*********************************************************************************************************************************/
4233
4234/**
4235 * Worker for PGMR3PhysRomRegister.
4236 *
4237 * This is here to simplify lock management, i.e. the caller does all the
4238 * locking and we can simply return without needing to remember to unlock
4239 * anything first.
4240 *
4241 * @returns VBox status code.
4242 * @param pVM The cross context VM structure.
4243 * @param pDevIns The device instance owning the ROM.
4244 * @param GCPhys First physical address in the range.
4245 * Must be page aligned!
4246 * @param cb The size of the range (in bytes).
4247 * Must be page aligned!
4248 * @param pvBinary Pointer to the binary data backing the ROM image.
4249 * @param cbBinary The size of the binary data pvBinary points to.
4250 * This must be less or equal to @a cb.
4251 * @param fFlags Mask of flags. PGMPHYS_ROM_FLAGS_SHADOWED
4252 * and/or PGMPHYS_ROM_FLAGS_PERMANENT_BINARY.
4253 * @param pszDesc Pointer to description string. This must not be freed.
4254 */
4255static int pgmR3PhysRomRegisterLocked(PVM pVM, PPDMDEVINS pDevIns, RTGCPHYS GCPhys, RTGCPHYS cb,
4256 const void *pvBinary, uint32_t cbBinary, uint8_t fFlags, const char *pszDesc)
4257{
4258 /*
4259 * Validate input.
4260 */
4261 AssertPtrReturn(pDevIns, VERR_INVALID_PARAMETER);
4262 AssertReturn(RT_ALIGN_T(GCPhys, PAGE_SIZE, RTGCPHYS) == GCPhys, VERR_INVALID_PARAMETER);
4263 AssertReturn(RT_ALIGN_T(cb, PAGE_SIZE, RTGCPHYS) == cb, VERR_INVALID_PARAMETER);
4264 RTGCPHYS GCPhysLast = GCPhys + (cb - 1);
4265 AssertReturn(GCPhysLast > GCPhys, VERR_INVALID_PARAMETER);
4266 AssertPtrReturn(pvBinary, VERR_INVALID_PARAMETER);
4267 AssertPtrReturn(pszDesc, VERR_INVALID_POINTER);
4268 AssertReturn(!(fFlags & ~PGMPHYS_ROM_FLAGS_VALID_MASK), VERR_INVALID_PARAMETER);
4269 VM_ASSERT_STATE_RETURN(pVM, VMSTATE_CREATING, VERR_VM_INVALID_VM_STATE);
4270
4271 const uint32_t cPages = cb >> PAGE_SHIFT;
4272
4273 /*
4274 * Find the ROM location in the ROM list first.
4275 */
4276 PPGMROMRANGE pRomPrev = NULL;
4277 PPGMROMRANGE pRom = pVM->pgm.s.pRomRangesR3;
4278 while (pRom && GCPhysLast >= pRom->GCPhys)
4279 {
4280 if ( GCPhys <= pRom->GCPhysLast
4281 && GCPhysLast >= pRom->GCPhys)
4282 AssertLogRelMsgFailedReturn(("%RGp-%RGp (%s) conflicts with existing %RGp-%RGp (%s)\n",
4283 GCPhys, GCPhysLast, pszDesc,
4284 pRom->GCPhys, pRom->GCPhysLast, pRom->pszDesc),
4285 VERR_PGM_RAM_CONFLICT);
4286 /* next */
4287 pRomPrev = pRom;
4288 pRom = pRom->pNextR3;
4289 }
4290
4291 /*
4292 * Find the RAM location and check for conflicts.
4293 *
4294 * Conflict detection is a bit different than for RAM registration since a
4295 * ROM can be located within a RAM range. So, what we have to check for is
4296 * other memory types (other than RAM that is) and that we don't span more
4297 * than one RAM range (lazy).
4298 */
4299 bool fRamExists = false;
4300 PPGMRAMRANGE pRamPrev = NULL;
4301 PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3;
4302 while (pRam && GCPhysLast >= pRam->GCPhys)
4303 {
4304 if ( GCPhys <= pRam->GCPhysLast
4305 && GCPhysLast >= pRam->GCPhys)
4306 {
4307 /* completely within? */
4308 AssertLogRelMsgReturn( GCPhys >= pRam->GCPhys
4309 && GCPhysLast <= pRam->GCPhysLast,
4310 ("%RGp-%RGp (%s) falls partly outside %RGp-%RGp (%s)\n",
4311 GCPhys, GCPhysLast, pszDesc,
4312 pRam->GCPhys, pRam->GCPhysLast, pRam->pszDesc),
4313 VERR_PGM_RAM_CONFLICT);
4314 fRamExists = true;
4315 break;
4316 }
4317
4318 /* next */
4319 pRamPrev = pRam;
4320 pRam = pRam->pNextR3;
4321 }
4322 if (fRamExists)
4323 {
4324 PPGMPAGE pPage = &pRam->aPages[(GCPhys - pRam->GCPhys) >> PAGE_SHIFT];
4325 uint32_t cPagesLeft = cPages;
4326 while (cPagesLeft-- > 0)
4327 {
4328 AssertLogRelMsgReturn(PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_RAM,
4329 ("%RGp (%R[pgmpage]) isn't a RAM page - registering %RGp-%RGp (%s).\n",
4330 pRam->GCPhys + ((RTGCPHYS)(uintptr_t)(pPage - &pRam->aPages[0]) << PAGE_SHIFT),
4331 pPage, GCPhys, GCPhysLast, pszDesc), VERR_PGM_RAM_CONFLICT);
4332 Assert(PGM_PAGE_IS_ZERO(pPage) || PGM_IS_IN_NEM_MODE(pVM));
4333 pPage++;
4334 }
4335 }
4336
4337 /*
4338 * Update the base memory reservation if necessary.
4339 */
4340 uint32_t cExtraBaseCost = fRamExists ? 0 : cPages;
4341 if (fFlags & PGMPHYS_ROM_FLAGS_SHADOWED)
4342 cExtraBaseCost += cPages;
4343 if (cExtraBaseCost)
4344 {
4345 int rc = MMR3IncreaseBaseReservation(pVM, cExtraBaseCost);
4346 if (RT_FAILURE(rc))
4347 return rc;
4348 }
4349
4350#ifdef VBOX_WITH_NATIVE_NEM
4351 /*
4352 * Early NEM notification before we've made any changes or anything.
4353 */
4354 uint32_t const fNemNotify = (fRamExists ? NEM_NOTIFY_PHYS_ROM_F_REPLACE : 0)
4355 | (fFlags & PGMPHYS_ROM_FLAGS_SHADOWED ? NEM_NOTIFY_PHYS_ROM_F_SHADOW : 0);
4356 uint8_t u2NemState = UINT8_MAX;
4357 uint32_t uNemRange = 0;
4358 if (VM_IS_NEM_ENABLED(pVM))
4359 {
4360 int rc = NEMR3NotifyPhysRomRegisterEarly(pVM, GCPhys, cPages << PAGE_SHIFT,
4361 fRamExists ? PGM_RAMRANGE_CALC_PAGE_R3PTR(pRam, GCPhys) : NULL,
4362 fNemNotify, &u2NemState, fRamExists ? &pRam->uNemRange : &uNemRange);
4363 AssertLogRelRCReturn(rc, rc);
4364 }
4365#endif
4366
4367 /*
4368 * Allocate memory for the virgin copy of the RAM. In simplified memory mode,
4369 * we allocate memory for any ad-hoc RAM range and for shadow pages.
4370 */
4371 PGMMALLOCATEPAGESREQ pReq = NULL;
4372#ifdef VBOX_WITH_PGM_NEM_MODE
4373 void *pvRam = NULL;
4374 void *pvAlt = NULL;
4375 if (pVM->pgm.s.fNemMode)
4376 {
4377 if (!fRamExists)
4378 {
4379 int rc = SUPR3PageAlloc(cPages, 0, &pvRam);
4380 if (RT_FAILURE(rc))
4381 return rc;
4382 }
4383 if (fFlags & PGMPHYS_ROM_FLAGS_SHADOWED)
4384 {
4385 int rc = SUPR3PageAlloc(cPages, 0, &pvAlt);
4386 if (RT_FAILURE(rc))
4387 {
4388 if (pvRam)
4389 SUPR3PageFree(pvRam, cPages);
4390 return rc;
4391 }
4392 }
4393 }
4394 else
4395#endif
4396 {
4397 int rc = GMMR3AllocatePagesPrepare(pVM, &pReq, cPages, GMMACCOUNT_BASE);
4398 AssertRCReturn(rc, rc);
4399
4400 for (uint32_t iPage = 0; iPage < cPages; iPage++)
4401 {
4402 pReq->aPages[iPage].HCPhysGCPhys = GCPhys + (iPage << PAGE_SHIFT);
4403 pReq->aPages[iPage].fZeroed = false;
4404 pReq->aPages[iPage].idPage = NIL_GMM_PAGEID;
4405 pReq->aPages[iPage].idSharedPage = NIL_GMM_PAGEID;
4406 }
4407
4408 rc = GMMR3AllocatePagesPerform(pVM, pReq);
4409 if (RT_FAILURE(rc))
4410 {
4411 GMMR3AllocatePagesCleanup(pReq);
4412 return rc;
4413 }
4414 }
4415
4416 /*
4417 * Allocate the new ROM range and RAM range (if necessary).
4418 */
4419 PPGMROMRANGE pRomNew;
4420 int rc = MMHyperAlloc(pVM, RT_UOFFSETOF_DYN(PGMROMRANGE, aPages[cPages]), 0, MM_TAG_PGM_PHYS, (void **)&pRomNew);
4421 if (RT_SUCCESS(rc))
4422 {
4423 PPGMRAMRANGE pRamNew = NULL;
4424 if (!fRamExists)
4425 rc = MMHyperAlloc(pVM, RT_UOFFSETOF_DYN(PGMRAMRANGE, aPages[cPages]), sizeof(PGMPAGE), MM_TAG_PGM_PHYS, (void **)&pRamNew);
4426 if (RT_SUCCESS(rc))
4427 {
4428 /*
4429 * Initialize and insert the RAM range (if required).
4430 */
4431 uint32_t const idxFirstRamPage = fRamExists ? (GCPhys - pRam->GCPhys) >> PAGE_SHIFT : 0;
4432 PPGMROMPAGE pRomPage = &pRomNew->aPages[0];
4433 if (!fRamExists)
4434 {
4435 /* New RAM range. */
4436 pRamNew->pSelfR0 = MMHyperCCToR0(pVM, pRamNew);
4437 pRamNew->GCPhys = GCPhys;
4438 pRamNew->GCPhysLast = GCPhysLast;
4439 pRamNew->cb = cb;
4440 pRamNew->pszDesc = pszDesc;
4441 pRamNew->fFlags = PGM_RAM_RANGE_FLAGS_AD_HOC_ROM;
4442 pRamNew->pvR3 = NULL;
4443 pRamNew->paLSPages = NULL;
4444#ifdef VBOX_WITH_NATIVE_NEM
4445 pRamNew->uNemRange = uNemRange;
4446#endif
4447
4448 PPGMPAGE pRamPage = &pRamNew->aPages[idxFirstRamPage];
4449#ifdef VBOX_WITH_PGM_NEM_MODE
4450 if (pVM->pgm.s.fNemMode)
4451 {
4452 AssertPtr(pvRam); Assert(pReq == NULL);
4453 pRamNew->pvR3 = pvRam;
4454 for (uint32_t iPage = 0; iPage < cPages; iPage++, pRamPage++, pRomPage++)
4455 {
4456 PGM_PAGE_INIT(pRamPage, UINT64_C(0x0000fffffffff000), NIL_GMM_PAGEID,
4457 PGMPAGETYPE_ROM, PGM_PAGE_STATE_ALLOCATED);
4458 pRomPage->Virgin = *pRamPage;
4459 }
4460 }
4461 else
4462#endif
4463 for (uint32_t iPage = 0; iPage < cPages; iPage++, pRamPage++, pRomPage++)
4464 {
4465 PGM_PAGE_INIT(pRamPage,
4466 pReq->aPages[iPage].HCPhysGCPhys,
4467 pReq->aPages[iPage].idPage,
4468 PGMPAGETYPE_ROM,
4469 PGM_PAGE_STATE_ALLOCATED);
4470
4471 pRomPage->Virgin = *pRamPage;
4472 }
4473
4474 pVM->pgm.s.cAllPages += cPages;
4475 pVM->pgm.s.cPrivatePages += cPages;
4476 pgmR3PhysLinkRamRange(pVM, pRamNew, pRamPrev);
4477 }
4478 else
4479 {
4480 /* Existing RAM range. */
4481 PPGMPAGE pRamPage = &pRam->aPages[idxFirstRamPage];
4482#ifdef VBOX_WITH_PGM_NEM_MODE
4483 if (pVM->pgm.s.fNemMode)
4484 {
4485 Assert(pvRam == NULL); Assert(pReq == NULL);
4486 for (uint32_t iPage = 0; iPage < cPages; iPage++, pRamPage++, pRomPage++)
4487 {
4488 Assert(PGM_PAGE_GET_HCPHYS(pRamPage) == UINT64_C(0x0000fffffffff000));
4489 Assert(PGM_PAGE_GET_PAGEID(pRamPage) == NIL_GMM_PAGEID);
4490 Assert(PGM_PAGE_GET_STATE(pRamPage) == PGM_PAGE_STATE_ALLOCATED);
4491 PGM_PAGE_SET_TYPE(pVM, pRamPage, PGMPAGETYPE_ROM);
4492 PGM_PAGE_SET_STATE(pVM, pRamPage, PGM_PAGE_STATE_ALLOCATED);
4493 PGM_PAGE_SET_PDE_TYPE(pVM, pRamPage, PGM_PAGE_PDE_TYPE_DONTCARE);
4494 PGM_PAGE_SET_PTE_INDEX(pVM, pRamPage, 0);
4495 PGM_PAGE_SET_TRACKING(pVM, pRamPage, 0);
4496
4497 pRomPage->Virgin = *pRamPage;
4498 }
4499 }
4500 else
4501#endif
4502 {
4503 for (uint32_t iPage = 0; iPage < cPages; iPage++, pRamPage++, pRomPage++)
4504 {
4505 PGM_PAGE_SET_TYPE(pVM, pRamPage, PGMPAGETYPE_ROM);
4506 PGM_PAGE_SET_HCPHYS(pVM, pRamPage, pReq->aPages[iPage].HCPhysGCPhys);
4507 PGM_PAGE_SET_STATE(pVM, pRamPage, PGM_PAGE_STATE_ALLOCATED);
4508 PGM_PAGE_SET_PAGEID(pVM, pRamPage, pReq->aPages[iPage].idPage);
4509 PGM_PAGE_SET_PDE_TYPE(pVM, pRamPage, PGM_PAGE_PDE_TYPE_DONTCARE);
4510 PGM_PAGE_SET_PTE_INDEX(pVM, pRamPage, 0);
4511 PGM_PAGE_SET_TRACKING(pVM, pRamPage, 0);
4512
4513 pRomPage->Virgin = *pRamPage;
4514 }
4515 pVM->pgm.s.cZeroPages -= cPages;
4516 pVM->pgm.s.cPrivatePages += cPages;
4517 }
4518 pRamNew = pRam;
4519 }
4520
4521#ifdef VBOX_WITH_NATIVE_NEM
4522 /* Set the NEM state of the pages if needed. */
4523 if (u2NemState != UINT8_MAX)
4524 pgmPhysSetNemStateForPages(&pRamNew->aPages[idxFirstRamPage], cPages, u2NemState);
4525#endif
4526
4527 /* Flush physical page map TLB. */
4528 pgmPhysInvalidatePageMapTLB(pVM);
4529
4530 /*
4531 * Register the ROM access handler.
4532 */
4533 rc = PGMHandlerPhysicalRegister(pVM, GCPhys, GCPhysLast, pVM->pgm.s.hRomPhysHandlerType,
4534 pRomNew, MMHyperCCToR0(pVM, pRomNew), NIL_RTRCPTR, pszDesc);
4535 if (RT_SUCCESS(rc))
4536 {
4537 /*
4538 * Copy the image over to the virgin pages.
4539 * This must be done after linking in the RAM range.
4540 */
4541 size_t cbBinaryLeft = cbBinary;
4542 PPGMPAGE pRamPage = &pRamNew->aPages[idxFirstRamPage];
4543 for (uint32_t iPage = 0; iPage < cPages; iPage++, pRamPage++)
4544 {
4545 void *pvDstPage;
4546 rc = pgmPhysPageMap(pVM, pRamPage, GCPhys + (iPage << PAGE_SHIFT), &pvDstPage);
4547 if (RT_FAILURE(rc))
4548 {
4549 VMSetError(pVM, rc, RT_SRC_POS, "Failed to map virgin ROM page at %RGp", GCPhys);
4550 break;
4551 }
4552 if (cbBinaryLeft >= PAGE_SIZE)
4553 {
4554 memcpy(pvDstPage, (uint8_t const *)pvBinary + ((size_t)iPage << PAGE_SHIFT), PAGE_SIZE);
4555 cbBinaryLeft -= PAGE_SIZE;
4556 }
4557 else
4558 {
4559 ASMMemZeroPage(pvDstPage); /* (shouldn't be necessary, but can't hurt either) */
4560 if (cbBinaryLeft > 0)
4561 {
4562 memcpy(pvDstPage, (uint8_t const *)pvBinary + ((size_t)iPage << PAGE_SHIFT), cbBinaryLeft);
4563 cbBinaryLeft = 0;
4564 }
4565 }
4566 }
4567 if (RT_SUCCESS(rc))
4568 {
4569 /*
4570 * Initialize the ROM range.
4571 * Note that the Virgin member of the pages has already been initialized above.
4572 */
4573 pRomNew->GCPhys = GCPhys;
4574 pRomNew->GCPhysLast = GCPhysLast;
4575 pRomNew->cb = cb;
4576 pRomNew->fFlags = fFlags;
4577 pRomNew->idSavedState = UINT8_MAX;
4578 pRomNew->cbOriginal = cbBinary;
4579 pRomNew->pszDesc = pszDesc;
4580#ifdef VBOX_WITH_PGM_NEM_MODE
4581 pRomNew->pbR3Alternate = (uint8_t *)pvAlt;
4582#endif
4583 pRomNew->pvOriginal = fFlags & PGMPHYS_ROM_FLAGS_PERMANENT_BINARY
4584 ? pvBinary : RTMemDup(pvBinary, cbBinary);
4585 if (pRomNew->pvOriginal)
4586 {
4587 for (unsigned iPage = 0; iPage < cPages; iPage++)
4588 {
4589 PPGMROMPAGE pPage = &pRomNew->aPages[iPage];
4590 pPage->enmProt = PGMROMPROT_READ_ROM_WRITE_IGNORE;
4591#ifdef VBOX_WITH_PGM_NEM_MODE
4592 if (pVM->pgm.s.fNemMode)
4593 PGM_PAGE_INIT(&pPage->Shadow, UINT64_C(0x0000fffffffff000), NIL_GMM_PAGEID,
4594 PGMPAGETYPE_ROM_SHADOW, PGM_PAGE_STATE_ALLOCATED);
4595 else
4596#endif
4597 PGM_PAGE_INIT_ZERO(&pPage->Shadow, pVM, PGMPAGETYPE_ROM_SHADOW);
4598 }
4599
4600 /* update the page count stats for the shadow pages. */
4601 if (fFlags & PGMPHYS_ROM_FLAGS_SHADOWED)
4602 {
4603#ifdef VBOX_WITH_PGM_NEM_MODE
4604 if (pVM->pgm.s.fNemMode)
4605 pVM->pgm.s.cPrivatePages += cPages;
4606 else
4607#endif
4608 pVM->pgm.s.cZeroPages += cPages;
4609 pVM->pgm.s.cAllPages += cPages;
4610 }
4611
4612 /*
4613 * Insert the ROM range, tell REM and return successfully.
4614 */
4615 pRomNew->pNextR3 = pRom;
4616 pRomNew->pNextR0 = pRom ? MMHyperCCToR0(pVM, pRom) : NIL_RTR0PTR;
4617
4618 if (pRomPrev)
4619 {
4620 pRomPrev->pNextR3 = pRomNew;
4621 pRomPrev->pNextR0 = MMHyperCCToR0(pVM, pRomNew);
4622 }
4623 else
4624 {
4625 pVM->pgm.s.pRomRangesR3 = pRomNew;
4626 pVM->pgm.s.pRomRangesR0 = MMHyperCCToR0(pVM, pRomNew);
4627 }
4628
4629 pgmPhysInvalidatePageMapTLB(pVM);
4630#ifdef VBOX_WITH_PGM_NEM_MODE
4631 if (!pVM->pgm.s.fNemMode)
4632#endif
4633 GMMR3AllocatePagesCleanup(pReq);
4634
4635#ifdef VBOX_WITH_NATIVE_NEM
4636 /*
4637 * Notify NEM again.
4638 */
4639 if (VM_IS_NEM_ENABLED(pVM))
4640 {
4641 u2NemState = UINT8_MAX;
4642 rc = NEMR3NotifyPhysRomRegisterLate(pVM, GCPhys, cb, PGM_RAMRANGE_CALC_PAGE_R3PTR(pRamNew, GCPhys),
4643 fNemNotify, &u2NemState,
4644 fRamExists ? &pRam->uNemRange : &pRamNew->uNemRange);
4645 if (u2NemState != UINT8_MAX)
4646 pgmPhysSetNemStateForPages(&pRamNew->aPages[idxFirstRamPage], cPages, u2NemState);
4647 if (RT_SUCCESS(rc))
4648 return rc;
4649 }
4650 else
4651#endif
4652 return rc;
4653
4654 /*
4655 * bail out
4656 */
4657#ifdef VBOX_WITH_NATIVE_NEM
4658 /* unlink */
4659 if (pRomPrev)
4660 {
4661 pRomPrev->pNextR3 = pRom;
4662 pRomPrev->pNextR0 = pRom ? MMHyperCCToR0(pVM, pRom) : NIL_RTR0PTR;
4663 }
4664 else
4665 {
4666 pVM->pgm.s.pRomRangesR3 = pRom;
4667 pVM->pgm.s.pRomRangesR0 = pRom ? MMHyperCCToR0(pVM, pRom) : NIL_RTR0PTR;
4668 }
4669
4670 if (fFlags & PGMPHYS_ROM_FLAGS_SHADOWED)
4671 {
4672# ifdef VBOX_WITH_PGM_NEM_MODE
4673 if (pVM->pgm.s.fNemMode)
4674 pVM->pgm.s.cPrivatePages -= cPages;
4675 else
4676# endif
4677 pVM->pgm.s.cZeroPages -= cPages;
4678 pVM->pgm.s.cAllPages -= cPages;
4679 }
4680#endif
4681 }
4682 else
4683 rc = VERR_NO_MEMORY;
4684 }
4685
4686 int rc2 = PGMHandlerPhysicalDeregister(pVM, GCPhys);
4687 AssertRC(rc2);
4688 }
4689
4690 if (!fRamExists)
4691 {
4692 pgmR3PhysUnlinkRamRange2(pVM, pRamNew, pRamPrev);
4693 MMHyperFree(pVM, pRamNew);
4694 }
4695 else
4696 {
4697 PPGMPAGE pRamPage = &pRam->aPages[idxFirstRamPage];
4698#ifdef VBOX_WITH_PGM_NEM_MODE
4699 if (pVM->pgm.s.fNemMode)
4700 {
4701 Assert(pvRam == NULL); Assert(pReq == NULL);
4702 for (uint32_t iPage = 0; iPage < cPages; iPage++, pRamPage++, pRomPage++)
4703 {
4704 Assert(PGM_PAGE_GET_HCPHYS(pRamPage) == UINT64_C(0x0000fffffffff000));
4705 Assert(PGM_PAGE_GET_PAGEID(pRamPage) == NIL_GMM_PAGEID);
4706 Assert(PGM_PAGE_GET_STATE(pRamPage) == PGM_PAGE_STATE_ALLOCATED);
4707 PGM_PAGE_SET_TYPE(pVM, pRamPage, PGMPAGETYPE_RAM);
4708 PGM_PAGE_SET_STATE(pVM, pRamPage, PGM_PAGE_STATE_ALLOCATED);
4709 }
4710 }
4711 else
4712#endif
4713 {
4714 for (uint32_t iPage = 0; iPage < cPages; iPage++, pRamPage++)
4715 PGM_PAGE_INIT_ZERO(pRamPage, pVM, PGMPAGETYPE_RAM);
4716 pVM->pgm.s.cZeroPages += cPages;
4717 pVM->pgm.s.cPrivatePages -= cPages;
4718 }
4719 }
4720 }
4721 MMHyperFree(pVM, pRomNew);
4722 }
4723
4724 /** @todo Purge the mapping cache or something... */
4725#ifdef VBOX_WITH_PGM_NEM_MODE
4726 if (pVM->pgm.s.fNemMode)
4727 {
4728 Assert(!pReq);
4729 if (pvRam)
4730 SUPR3PageFree(pvRam, cPages);
4731 if (pvAlt)
4732 SUPR3PageFree(pvAlt, cPages);
4733 }
4734 else
4735#endif
4736 {
4737 GMMR3FreeAllocatedPages(pVM, pReq);
4738 GMMR3AllocatePagesCleanup(pReq);
4739 }
4740 return rc;
4741}
4742
4743
4744/**
4745 * Registers a ROM image.
4746 *
4747 * Shadowed ROM images requires double the amount of backing memory, so,
4748 * don't use that unless you have to. Shadowing of ROM images is process
4749 * where we can select where the reads go and where the writes go. On real
4750 * hardware the chipset provides means to configure this. We provide
4751 * PGMR3PhysProtectROM() for this purpose.
4752 *
4753 * A read-only copy of the ROM image will always be kept around while we
4754 * will allocate RAM pages for the changes on demand (unless all memory
4755 * is configured to be preallocated).
4756 *
4757 * @returns VBox status code.
4758 * @param pVM The cross context VM structure.
4759 * @param pDevIns The device instance owning the ROM.
4760 * @param GCPhys First physical address in the range.
4761 * Must be page aligned!
4762 * @param cb The size of the range (in bytes).
4763 * Must be page aligned!
4764 * @param pvBinary Pointer to the binary data backing the ROM image.
4765 * @param cbBinary The size of the binary data pvBinary points to.
4766 * This must be less or equal to @a cb.
4767 * @param fFlags Mask of flags, PGMPHYS_ROM_FLAGS_XXX.
4768 * @param pszDesc Pointer to description string. This must not be freed.
4769 *
4770 * @remark There is no way to remove the rom, automatically on device cleanup or
4771 * manually from the device yet. This isn't difficult in any way, it's
4772 * just not something we expect to be necessary for a while.
4773 */
4774VMMR3DECL(int) PGMR3PhysRomRegister(PVM pVM, PPDMDEVINS pDevIns, RTGCPHYS GCPhys, RTGCPHYS cb,
4775 const void *pvBinary, uint32_t cbBinary, uint8_t fFlags, const char *pszDesc)
4776{
4777 Log(("PGMR3PhysRomRegister: pDevIns=%p GCPhys=%RGp(-%RGp) cb=%RGp pvBinary=%p cbBinary=%#x fFlags=%#x pszDesc=%s\n",
4778 pDevIns, GCPhys, GCPhys + cb, cb, pvBinary, cbBinary, fFlags, pszDesc));
4779 PGM_LOCK_VOID(pVM);
4780 int rc = pgmR3PhysRomRegisterLocked(pVM, pDevIns, GCPhys, cb, pvBinary, cbBinary, fFlags, pszDesc);
4781 PGM_UNLOCK(pVM);
4782 return rc;
4783}
4784
4785
4786/**
4787 * Called by PGMR3MemSetup to reset the shadow, switch to the virgin, and verify
4788 * that the virgin part is untouched.
4789 *
4790 * This is done after the normal memory has been cleared.
4791 *
4792 * ASSUMES that the caller owns the PGM lock.
4793 *
4794 * @param pVM The cross context VM structure.
4795 */
4796int pgmR3PhysRomReset(PVM pVM)
4797{
4798 PGM_LOCK_ASSERT_OWNER(pVM);
4799 for (PPGMROMRANGE pRom = pVM->pgm.s.pRomRangesR3; pRom; pRom = pRom->pNextR3)
4800 {
4801 const uint32_t cPages = pRom->cb >> PAGE_SHIFT;
4802
4803 if (pRom->fFlags & PGMPHYS_ROM_FLAGS_SHADOWED)
4804 {
4805 /*
4806 * Reset the physical handler.
4807 */
4808 int rc = PGMR3PhysRomProtect(pVM, pRom->GCPhys, pRom->cb, PGMROMPROT_READ_ROM_WRITE_IGNORE);
4809 AssertRCReturn(rc, rc);
4810
4811 /*
4812 * What we do with the shadow pages depends on the memory
4813 * preallocation option. If not enabled, we'll just throw
4814 * out all the dirty pages and replace them by the zero page.
4815 */
4816#ifdef VBOX_WITH_PGM_NEM_MODE
4817 if (pVM->pgm.s.fNemMode)
4818 {
4819 /* Clear all the shadow pages (currently using alternate backing). */
4820 RT_BZERO(pRom->pbR3Alternate, pRom->cb);
4821 }
4822 else
4823#endif
4824 if (!pVM->pgm.s.fRamPreAlloc)
4825 {
4826 /* Free the dirty pages. */
4827 uint32_t cPendingPages = 0;
4828 PGMMFREEPAGESREQ pReq;
4829 rc = GMMR3FreePagesPrepare(pVM, &pReq, PGMPHYS_FREE_PAGE_BATCH_SIZE, GMMACCOUNT_BASE);
4830 AssertRCReturn(rc, rc);
4831
4832 for (uint32_t iPage = 0; iPage < cPages; iPage++)
4833 if ( !PGM_PAGE_IS_ZERO(&pRom->aPages[iPage].Shadow)
4834 && !PGM_PAGE_IS_BALLOONED(&pRom->aPages[iPage].Shadow))
4835 {
4836 Assert(PGM_PAGE_GET_STATE(&pRom->aPages[iPage].Shadow) == PGM_PAGE_STATE_ALLOCATED);
4837 rc = pgmPhysFreePage(pVM, pReq, &cPendingPages, &pRom->aPages[iPage].Shadow,
4838 pRom->GCPhys + (iPage << PAGE_SHIFT),
4839 (PGMPAGETYPE)PGM_PAGE_GET_TYPE(&pRom->aPages[iPage].Shadow));
4840 AssertLogRelRCReturn(rc, rc);
4841 }
4842
4843 if (cPendingPages)
4844 {
4845 rc = GMMR3FreePagesPerform(pVM, pReq, cPendingPages);
4846 AssertLogRelRCReturn(rc, rc);
4847 }
4848 GMMR3FreePagesCleanup(pReq);
4849 }
4850 else
4851 {
4852 /* clear all the shadow pages. */
4853 for (uint32_t iPage = 0; iPage < cPages; iPage++)
4854 {
4855 if (PGM_PAGE_IS_ZERO(&pRom->aPages[iPage].Shadow))
4856 continue;
4857 Assert(!PGM_PAGE_IS_BALLOONED(&pRom->aPages[iPage].Shadow));
4858 void *pvDstPage;
4859 const RTGCPHYS GCPhys = pRom->GCPhys + (iPage << PAGE_SHIFT);
4860 rc = pgmPhysPageMakeWritableAndMap(pVM, &pRom->aPages[iPage].Shadow, GCPhys, &pvDstPage);
4861 if (RT_FAILURE(rc))
4862 break;
4863 ASMMemZeroPage(pvDstPage);
4864 }
4865 AssertRCReturn(rc, rc);
4866 }
4867 }
4868
4869 /*
4870 * Restore the original ROM pages after a saved state load.
4871 * Also, in strict builds check that ROM pages remain unmodified.
4872 */
4873#ifndef VBOX_STRICT
4874 if (pVM->pgm.s.fRestoreRomPagesOnReset)
4875#endif
4876 {
4877 size_t cbSrcLeft = pRom->cbOriginal;
4878 uint8_t const *pbSrcPage = (uint8_t const *)pRom->pvOriginal;
4879 uint32_t cRestored = 0;
4880 for (uint32_t iPage = 0; iPage < cPages && cbSrcLeft > 0; iPage++, pbSrcPage += PAGE_SIZE)
4881 {
4882 const RTGCPHYS GCPhys = pRom->GCPhys + (iPage << PAGE_SHIFT);
4883 PPGMPAGE const pPage = pgmPhysGetPage(pVM, GCPhys);
4884 void const *pvDstPage = NULL;
4885 int rc = pgmPhysPageMapReadOnly(pVM, pPage, GCPhys, &pvDstPage);
4886 if (RT_FAILURE(rc))
4887 break;
4888
4889 if (memcmp(pvDstPage, pbSrcPage, RT_MIN(cbSrcLeft, PAGE_SIZE)))
4890 {
4891 if (pVM->pgm.s.fRestoreRomPagesOnReset)
4892 {
4893 void *pvDstPageW = NULL;
4894 rc = pgmPhysPageMap(pVM, pPage, GCPhys, &pvDstPageW);
4895 AssertLogRelRCReturn(rc, rc);
4896 memcpy(pvDstPageW, pbSrcPage, RT_MIN(cbSrcLeft, PAGE_SIZE));
4897 cRestored++;
4898 }
4899 else
4900 LogRel(("pgmR3PhysRomReset: %RGp: ROM page changed (%s)\n", GCPhys, pRom->pszDesc));
4901 }
4902 cbSrcLeft -= RT_MIN(cbSrcLeft, PAGE_SIZE);
4903 }
4904 if (cRestored > 0)
4905 LogRel(("PGM: ROM \"%s\": Reloaded %u of %u pages.\n", pRom->pszDesc, cRestored, cPages));
4906 }
4907 }
4908
4909 /* Clear the ROM restore flag now as we only need to do this once after
4910 loading saved state. */
4911 pVM->pgm.s.fRestoreRomPagesOnReset = false;
4912
4913 return VINF_SUCCESS;
4914}
4915
4916
4917/**
4918 * Called by PGMR3Term to free resources.
4919 *
4920 * ASSUMES that the caller owns the PGM lock.
4921 *
4922 * @param pVM The cross context VM structure.
4923 */
4924void pgmR3PhysRomTerm(PVM pVM)
4925{
4926 /*
4927 * Free the heap copy of the original bits.
4928 */
4929 for (PPGMROMRANGE pRom = pVM->pgm.s.pRomRangesR3; pRom; pRom = pRom->pNextR3)
4930 {
4931 if ( pRom->pvOriginal
4932 && !(pRom->fFlags & PGMPHYS_ROM_FLAGS_PERMANENT_BINARY))
4933 {
4934 RTMemFree((void *)pRom->pvOriginal);
4935 pRom->pvOriginal = NULL;
4936 }
4937 }
4938}
4939
4940
4941/**
4942 * Change the shadowing of a range of ROM pages.
4943 *
4944 * This is intended for implementing chipset specific memory registers
4945 * and will not be very strict about the input. It will silently ignore
4946 * any pages that are not the part of a shadowed ROM.
4947 *
4948 * @returns VBox status code.
4949 * @retval VINF_PGM_SYNC_CR3
4950 *
4951 * @param pVM The cross context VM structure.
4952 * @param GCPhys Where to start. Page aligned.
4953 * @param cb How much to change. Page aligned.
4954 * @param enmProt The new ROM protection.
4955 */
4956VMMR3DECL(int) PGMR3PhysRomProtect(PVM pVM, RTGCPHYS GCPhys, RTGCPHYS cb, PGMROMPROT enmProt)
4957{
4958 /*
4959 * Check input
4960 */
4961 if (!cb)
4962 return VINF_SUCCESS;
4963 AssertReturn(!(GCPhys & PAGE_OFFSET_MASK), VERR_INVALID_PARAMETER);
4964 AssertReturn(!(cb & PAGE_OFFSET_MASK), VERR_INVALID_PARAMETER);
4965 RTGCPHYS GCPhysLast = GCPhys + (cb - 1);
4966 AssertReturn(GCPhysLast > GCPhys, VERR_INVALID_PARAMETER);
4967 AssertReturn(enmProt >= PGMROMPROT_INVALID && enmProt <= PGMROMPROT_END, VERR_INVALID_PARAMETER);
4968
4969 /*
4970 * Process the request.
4971 */
4972 PGM_LOCK_VOID(pVM);
4973 int rc = VINF_SUCCESS;
4974 bool fFlushTLB = false;
4975 for (PPGMROMRANGE pRom = pVM->pgm.s.pRomRangesR3; pRom; pRom = pRom->pNextR3)
4976 {
4977 if ( GCPhys <= pRom->GCPhysLast
4978 && GCPhysLast >= pRom->GCPhys
4979 && (pRom->fFlags & PGMPHYS_ROM_FLAGS_SHADOWED))
4980 {
4981 /*
4982 * Iterate the relevant pages and make necessary the changes.
4983 */
4984#ifdef VBOX_WITH_NATIVE_NEM
4985 PPGMRAMRANGE const pRam = pgmPhysGetRange(pVM, GCPhys);
4986 AssertPtrReturn(pRam, VERR_INTERNAL_ERROR_3);
4987#endif
4988 bool fChanges = false;
4989 uint32_t const cPages = pRom->GCPhysLast <= GCPhysLast
4990 ? pRom->cb >> PAGE_SHIFT
4991 : (GCPhysLast - pRom->GCPhys + 1) >> PAGE_SHIFT;
4992 for (uint32_t iPage = (GCPhys - pRom->GCPhys) >> PAGE_SHIFT;
4993 iPage < cPages;
4994 iPage++)
4995 {
4996 PPGMROMPAGE pRomPage = &pRom->aPages[iPage];
4997 if (PGMROMPROT_IS_ROM(pRomPage->enmProt) != PGMROMPROT_IS_ROM(enmProt))
4998 {
4999 fChanges = true;
5000
5001 /* flush references to the page. */
5002 RTGCPHYS const GCPhysPage = pRom->GCPhys + (iPage << PAGE_SHIFT);
5003 PPGMPAGE pRamPage = pgmPhysGetPage(pVM, GCPhysPage);
5004 int rc2 = pgmPoolTrackUpdateGCPhys(pVM, GCPhysPage, pRamPage, true /*fFlushPTEs*/, &fFlushTLB);
5005 if (rc2 != VINF_SUCCESS && (rc == VINF_SUCCESS || RT_FAILURE(rc2)))
5006 rc = rc2;
5007#ifdef VBOX_WITH_NATIVE_NEM
5008 uint8_t u2State = PGM_PAGE_GET_NEM_STATE(pRamPage);
5009#endif
5010
5011 PPGMPAGE pOld = PGMROMPROT_IS_ROM(pRomPage->enmProt) ? &pRomPage->Virgin : &pRomPage->Shadow;
5012 PPGMPAGE pNew = PGMROMPROT_IS_ROM(pRomPage->enmProt) ? &pRomPage->Shadow : &pRomPage->Virgin;
5013
5014 *pOld = *pRamPage;
5015 *pRamPage = *pNew;
5016 /** @todo preserve the volatile flags (handlers) when these have been moved out of HCPhys! */
5017
5018#ifdef VBOX_WITH_NATIVE_NEM
5019# ifdef VBOX_WITH_PGM_NEM_MODE
5020 /* In simplified mode we have to switch the page data around too. */
5021 if (pVM->pgm.s.fNemMode)
5022 {
5023 uint8_t abPage[PAGE_SIZE];
5024 uint8_t * const pbRamPage = PGM_RAMRANGE_CALC_PAGE_R3PTR(pRam, GCPhysPage);
5025 memcpy(abPage, &pRom->pbR3Alternate[(size_t)iPage << PAGE_SHIFT], sizeof(abPage));
5026 memcpy(&pRom->pbR3Alternate[(size_t)iPage << PAGE_SHIFT], pbRamPage, sizeof(abPage));
5027 memcpy(pbRamPage, abPage, sizeof(abPage));
5028 }
5029# endif
5030 /* Tell NEM about the backing and protection change. */
5031 if (VM_IS_NEM_ENABLED(pVM))
5032 {
5033 PGMPAGETYPE enmType = (PGMPAGETYPE)PGM_PAGE_GET_TYPE(pNew);
5034 NEMHCNotifyPhysPageChanged(pVM, GCPhys, PGM_PAGE_GET_HCPHYS(pOld), PGM_PAGE_GET_HCPHYS(pNew),
5035 PGM_RAMRANGE_CALC_PAGE_R3PTR(pRam, GCPhysPage),
5036 pgmPhysPageCalcNemProtection(pRamPage, enmType), enmType, &u2State);
5037 PGM_PAGE_SET_NEM_STATE(pRamPage, u2State);
5038 }
5039#endif
5040 }
5041 pRomPage->enmProt = enmProt;
5042 }
5043
5044 /*
5045 * Reset the access handler if we made changes, no need
5046 * to optimize this.
5047 */
5048 if (fChanges)
5049 {
5050 int rc2 = PGMHandlerPhysicalReset(pVM, pRom->GCPhys);
5051 if (RT_FAILURE(rc2))
5052 {
5053 PGM_UNLOCK(pVM);
5054 AssertRC(rc);
5055 return rc2;
5056 }
5057 }
5058
5059 /* Advance - cb isn't updated. */
5060 GCPhys = pRom->GCPhys + (cPages << PAGE_SHIFT);
5061 }
5062 }
5063 PGM_UNLOCK(pVM);
5064 if (fFlushTLB)
5065 PGM_INVL_ALL_VCPU_TLBS(pVM);
5066
5067 return rc;
5068}
5069
5070
5071
5072/*********************************************************************************************************************************
5073* Ballooning *
5074*********************************************************************************************************************************/
5075
5076#if HC_ARCH_BITS == 64 && (defined(RT_OS_WINDOWS) || defined(RT_OS_SOLARIS) || defined(RT_OS_LINUX) || defined(RT_OS_FREEBSD))
5077
5078/**
5079 * Rendezvous callback used by PGMR3ChangeMemBalloon that changes the memory balloon size
5080 *
5081 * This is only called on one of the EMTs while the other ones are waiting for
5082 * it to complete this function.
5083 *
5084 * @returns VINF_SUCCESS (VBox strict status code).
5085 * @param pVM The cross context VM structure.
5086 * @param pVCpu The cross context virtual CPU structure of the calling EMT. Unused.
5087 * @param pvUser User parameter
5088 */
5089static DECLCALLBACK(VBOXSTRICTRC) pgmR3PhysChangeMemBalloonRendezvous(PVM pVM, PVMCPU pVCpu, void *pvUser)
5090{
5091 uintptr_t *paUser = (uintptr_t *)pvUser;
5092 bool fInflate = !!paUser[0];
5093 unsigned cPages = paUser[1];
5094 RTGCPHYS *paPhysPage = (RTGCPHYS *)paUser[2];
5095 uint32_t cPendingPages = 0;
5096 PGMMFREEPAGESREQ pReq;
5097 int rc;
5098
5099 Log(("pgmR3PhysChangeMemBalloonRendezvous: %s %x pages\n", (fInflate) ? "inflate" : "deflate", cPages));
5100 PGM_LOCK_VOID(pVM);
5101
5102 if (fInflate)
5103 {
5104 /* Flush the PGM pool cache as we might have stale references to pages that we just freed. */
5105 pgmR3PoolClearAllRendezvous(pVM, pVCpu, NULL);
5106
5107 /* Replace pages with ZERO pages. */
5108 rc = GMMR3FreePagesPrepare(pVM, &pReq, PGMPHYS_FREE_PAGE_BATCH_SIZE, GMMACCOUNT_BASE);
5109 if (RT_FAILURE(rc))
5110 {
5111 PGM_UNLOCK(pVM);
5112 AssertLogRelRC(rc);
5113 return rc;
5114 }
5115
5116 /* Iterate the pages. */
5117 for (unsigned i = 0; i < cPages; i++)
5118 {
5119 PPGMPAGE pPage = pgmPhysGetPage(pVM, paPhysPage[i]);
5120 if ( pPage == NULL
5121 || PGM_PAGE_GET_TYPE(pPage) != PGMPAGETYPE_RAM)
5122 {
5123 Log(("pgmR3PhysChangeMemBalloonRendezvous: invalid physical page %RGp pPage->u3Type=%d\n", paPhysPage[i], pPage ? PGM_PAGE_GET_TYPE(pPage) : 0));
5124 break;
5125 }
5126
5127 LogFlow(("balloon page: %RGp\n", paPhysPage[i]));
5128
5129 /* Flush the shadow PT if this page was previously used as a guest page table. */
5130 pgmPoolFlushPageByGCPhys(pVM, paPhysPage[i]);
5131
5132 rc = pgmPhysFreePage(pVM, pReq, &cPendingPages, pPage, paPhysPage[i], (PGMPAGETYPE)PGM_PAGE_GET_TYPE(pPage));
5133 if (RT_FAILURE(rc))
5134 {
5135 PGM_UNLOCK(pVM);
5136 AssertLogRelRC(rc);
5137 return rc;
5138 }
5139 Assert(PGM_PAGE_IS_ZERO(pPage));
5140 PGM_PAGE_SET_STATE(pVM, pPage, PGM_PAGE_STATE_BALLOONED);
5141 }
5142
5143 if (cPendingPages)
5144 {
5145 rc = GMMR3FreePagesPerform(pVM, pReq, cPendingPages);
5146 if (RT_FAILURE(rc))
5147 {
5148 PGM_UNLOCK(pVM);
5149 AssertLogRelRC(rc);
5150 return rc;
5151 }
5152 }
5153 GMMR3FreePagesCleanup(pReq);
5154 }
5155 else
5156 {
5157 /* Iterate the pages. */
5158 for (unsigned i = 0; i < cPages; i++)
5159 {
5160 PPGMPAGE pPage = pgmPhysGetPage(pVM, paPhysPage[i]);
5161 AssertBreak(pPage && PGM_PAGE_GET_TYPE(pPage) == PGMPAGETYPE_RAM);
5162
5163 LogFlow(("Free ballooned page: %RGp\n", paPhysPage[i]));
5164
5165 Assert(PGM_PAGE_IS_BALLOONED(pPage));
5166
5167 /* Change back to zero page. (NEM does not need to be informed.) */
5168 PGM_PAGE_SET_STATE(pVM, pPage, PGM_PAGE_STATE_ZERO);
5169 }
5170
5171 /* Note that we currently do not map any ballooned pages in our shadow page tables, so no need to flush the pgm pool. */
5172 }
5173
5174 /* Notify GMM about the balloon change. */
5175 rc = GMMR3BalloonedPages(pVM, (fInflate) ? GMMBALLOONACTION_INFLATE : GMMBALLOONACTION_DEFLATE, cPages);
5176 if (RT_SUCCESS(rc))
5177 {
5178 if (!fInflate)
5179 {
5180 Assert(pVM->pgm.s.cBalloonedPages >= cPages);
5181 pVM->pgm.s.cBalloonedPages -= cPages;
5182 }
5183 else
5184 pVM->pgm.s.cBalloonedPages += cPages;
5185 }
5186
5187 PGM_UNLOCK(pVM);
5188
5189 /* Flush the recompiler's TLB as well. */
5190 for (VMCPUID i = 0; i < pVM->cCpus; i++)
5191 CPUMSetChangedFlags(pVM->apCpusR3[i], CPUM_CHANGED_GLOBAL_TLB_FLUSH);
5192
5193 AssertLogRelRC(rc);
5194 return rc;
5195}
5196
5197
5198/**
5199 * Frees a range of ram pages, replacing them with ZERO pages; helper for PGMR3PhysFreeRamPages
5200 *
5201 * @returns VBox status code.
5202 * @param pVM The cross context VM structure.
5203 * @param fInflate Inflate or deflate memory balloon
5204 * @param cPages Number of pages to free
5205 * @param paPhysPage Array of guest physical addresses
5206 */
5207static DECLCALLBACK(void) pgmR3PhysChangeMemBalloonHelper(PVM pVM, bool fInflate, unsigned cPages, RTGCPHYS *paPhysPage)
5208{
5209 uintptr_t paUser[3];
5210
5211 paUser[0] = fInflate;
5212 paUser[1] = cPages;
5213 paUser[2] = (uintptr_t)paPhysPage;
5214 int rc = VMMR3EmtRendezvous(pVM, VMMEMTRENDEZVOUS_FLAGS_TYPE_ONCE, pgmR3PhysChangeMemBalloonRendezvous, (void *)paUser);
5215 AssertRC(rc);
5216
5217 /* Made a copy in PGMR3PhysFreeRamPages; free it here. */
5218 RTMemFree(paPhysPage);
5219}
5220
5221#endif /* 64-bit host && (Windows || Solaris || Linux || FreeBSD) */
5222
5223/**
5224 * Inflate or deflate a memory balloon
5225 *
5226 * @returns VBox status code.
5227 * @param pVM The cross context VM structure.
5228 * @param fInflate Inflate or deflate memory balloon
5229 * @param cPages Number of pages to free
5230 * @param paPhysPage Array of guest physical addresses
5231 */
5232VMMR3DECL(int) PGMR3PhysChangeMemBalloon(PVM pVM, bool fInflate, unsigned cPages, RTGCPHYS *paPhysPage)
5233{
5234 /* This must match GMMR0Init; currently we only support memory ballooning on all 64-bit hosts except Mac OS X */
5235#if HC_ARCH_BITS == 64 && (defined(RT_OS_WINDOWS) || defined(RT_OS_SOLARIS) || defined(RT_OS_LINUX) || defined(RT_OS_FREEBSD))
5236 int rc;
5237
5238 /* Older additions (ancient non-functioning balloon code) pass wrong physical addresses. */
5239 AssertReturn(!(paPhysPage[0] & 0xfff), VERR_INVALID_PARAMETER);
5240
5241 /* We own the IOM lock here and could cause a deadlock by waiting for another VCPU that is blocking on the IOM lock.
5242 * In the SMP case we post a request packet to postpone the job.
5243 */
5244 if (pVM->cCpus > 1)
5245 {
5246 unsigned cbPhysPage = cPages * sizeof(paPhysPage[0]);
5247 RTGCPHYS *paPhysPageCopy = (RTGCPHYS *)RTMemAlloc(cbPhysPage);
5248 AssertReturn(paPhysPageCopy, VERR_NO_MEMORY);
5249
5250 memcpy(paPhysPageCopy, paPhysPage, cbPhysPage);
5251
5252 rc = VMR3ReqCallNoWait(pVM, VMCPUID_ANY_QUEUE, (PFNRT)pgmR3PhysChangeMemBalloonHelper, 4, pVM, fInflate, cPages, paPhysPageCopy);
5253 AssertRC(rc);
5254 }
5255 else
5256 {
5257 uintptr_t paUser[3];
5258
5259 paUser[0] = fInflate;
5260 paUser[1] = cPages;
5261 paUser[2] = (uintptr_t)paPhysPage;
5262 rc = VMMR3EmtRendezvous(pVM, VMMEMTRENDEZVOUS_FLAGS_TYPE_ONCE, pgmR3PhysChangeMemBalloonRendezvous, (void *)paUser);
5263 AssertRC(rc);
5264 }
5265 return rc;
5266
5267#else
5268 NOREF(pVM); NOREF(fInflate); NOREF(cPages); NOREF(paPhysPage);
5269 return VERR_NOT_IMPLEMENTED;
5270#endif
5271}
5272
5273
5274/*********************************************************************************************************************************
5275* Write Monitoring *
5276*********************************************************************************************************************************/
5277
5278/**
5279 * Rendezvous callback used by PGMR3WriteProtectRAM that write protects all
5280 * physical RAM.
5281 *
5282 * This is only called on one of the EMTs while the other ones are waiting for
5283 * it to complete this function.
5284 *
5285 * @returns VINF_SUCCESS (VBox strict status code).
5286 * @param pVM The cross context VM structure.
5287 * @param pVCpu The cross context virtual CPU structure of the calling EMT. Unused.
5288 * @param pvUser User parameter, unused.
5289 */
5290static DECLCALLBACK(VBOXSTRICTRC) pgmR3PhysWriteProtectRAMRendezvous(PVM pVM, PVMCPU pVCpu, void *pvUser)
5291{
5292 int rc = VINF_SUCCESS;
5293 NOREF(pvUser); NOREF(pVCpu);
5294
5295 PGM_LOCK_VOID(pVM);
5296#ifdef PGMPOOL_WITH_OPTIMIZED_DIRTY_PT
5297 pgmPoolResetDirtyPages(pVM);
5298#endif
5299
5300 /** @todo pointless to write protect the physical page pointed to by RSP. */
5301
5302 for (PPGMRAMRANGE pRam = pVM->pgm.s.CTX_SUFF(pRamRangesX);
5303 pRam;
5304 pRam = pRam->CTX_SUFF(pNext))
5305 {
5306 uint32_t cPages = pRam->cb >> PAGE_SHIFT;
5307 for (uint32_t iPage = 0; iPage < cPages; iPage++)
5308 {
5309 PPGMPAGE pPage = &pRam->aPages[iPage];
5310 PGMPAGETYPE enmPageType = (PGMPAGETYPE)PGM_PAGE_GET_TYPE(pPage);
5311
5312 if ( RT_LIKELY(enmPageType == PGMPAGETYPE_RAM)
5313 || enmPageType == PGMPAGETYPE_MMIO2)
5314 {
5315 /*
5316 * A RAM page.
5317 */
5318 switch (PGM_PAGE_GET_STATE(pPage))
5319 {
5320 case PGM_PAGE_STATE_ALLOCATED:
5321 /** @todo Optimize this: Don't always re-enable write
5322 * monitoring if the page is known to be very busy. */
5323 if (PGM_PAGE_IS_WRITTEN_TO(pPage))
5324 PGM_PAGE_CLEAR_WRITTEN_TO(pVM, pPage);
5325
5326 pgmPhysPageWriteMonitor(pVM, pPage, pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT));
5327 break;
5328
5329 case PGM_PAGE_STATE_SHARED:
5330 AssertFailed();
5331 break;
5332
5333 case PGM_PAGE_STATE_WRITE_MONITORED: /* nothing to change. */
5334 default:
5335 break;
5336 }
5337 }
5338 }
5339 }
5340 pgmR3PoolWriteProtectPages(pVM);
5341 PGM_INVL_ALL_VCPU_TLBS(pVM);
5342 for (VMCPUID idCpu = 0; idCpu < pVM->cCpus; idCpu++)
5343 CPUMSetChangedFlags(pVM->apCpusR3[idCpu], CPUM_CHANGED_GLOBAL_TLB_FLUSH);
5344
5345 PGM_UNLOCK(pVM);
5346 return rc;
5347}
5348
5349/**
5350 * Protect all physical RAM to monitor writes
5351 *
5352 * @returns VBox status code.
5353 * @param pVM The cross context VM structure.
5354 */
5355VMMR3DECL(int) PGMR3PhysWriteProtectRAM(PVM pVM)
5356{
5357 VM_ASSERT_EMT_RETURN(pVM, VERR_VM_THREAD_NOT_EMT);
5358
5359 int rc = VMMR3EmtRendezvous(pVM, VMMEMTRENDEZVOUS_FLAGS_TYPE_ONCE, pgmR3PhysWriteProtectRAMRendezvous, NULL);
5360 AssertRC(rc);
5361 return rc;
5362}
5363
5364
5365/*********************************************************************************************************************************
5366* Stats. *
5367*********************************************************************************************************************************/
5368
5369/**
5370 * Query the amount of free memory inside VMMR0
5371 *
5372 * @returns VBox status code.
5373 * @param pUVM The user mode VM handle.
5374 * @param pcbAllocMem Where to return the amount of memory allocated
5375 * by VMs.
5376 * @param pcbFreeMem Where to return the amount of memory that is
5377 * allocated from the host but not currently used
5378 * by any VMs.
5379 * @param pcbBallonedMem Where to return the sum of memory that is
5380 * currently ballooned by the VMs.
5381 * @param pcbSharedMem Where to return the amount of memory that is
5382 * currently shared.
5383 */
5384VMMR3DECL(int) PGMR3QueryGlobalMemoryStats(PUVM pUVM, uint64_t *pcbAllocMem, uint64_t *pcbFreeMem,
5385 uint64_t *pcbBallonedMem, uint64_t *pcbSharedMem)
5386{
5387 UVM_ASSERT_VALID_EXT_RETURN(pUVM, VERR_INVALID_VM_HANDLE);
5388 VM_ASSERT_VALID_EXT_RETURN(pUVM->pVM, VERR_INVALID_VM_HANDLE);
5389
5390 uint64_t cAllocPages = 0;
5391 uint64_t cFreePages = 0;
5392 uint64_t cBalloonPages = 0;
5393 uint64_t cSharedPages = 0;
5394 if (!SUPR3IsDriverless())
5395 {
5396 int rc = GMMR3QueryHypervisorMemoryStats(pUVM->pVM, &cAllocPages, &cFreePages, &cBalloonPages, &cSharedPages);
5397 AssertRCReturn(rc, rc);
5398 }
5399
5400 if (pcbAllocMem)
5401 *pcbAllocMem = cAllocPages * _4K;
5402
5403 if (pcbFreeMem)
5404 *pcbFreeMem = cFreePages * _4K;
5405
5406 if (pcbBallonedMem)
5407 *pcbBallonedMem = cBalloonPages * _4K;
5408
5409 if (pcbSharedMem)
5410 *pcbSharedMem = cSharedPages * _4K;
5411
5412 Log(("PGMR3QueryVMMMemoryStats: all=%llx free=%llx ballooned=%llx shared=%llx\n",
5413 cAllocPages, cFreePages, cBalloonPages, cSharedPages));
5414 return VINF_SUCCESS;
5415}
5416
5417
5418/**
5419 * Query memory stats for the VM.
5420 *
5421 * @returns VBox status code.
5422 * @param pUVM The user mode VM handle.
5423 * @param pcbTotalMem Where to return total amount memory the VM may
5424 * possibly use.
5425 * @param pcbPrivateMem Where to return the amount of private memory
5426 * currently allocated.
5427 * @param pcbSharedMem Where to return the amount of actually shared
5428 * memory currently used by the VM.
5429 * @param pcbZeroMem Where to return the amount of memory backed by
5430 * zero pages.
5431 *
5432 * @remarks The total mem is normally larger than the sum of the three
5433 * components. There are two reasons for this, first the amount of
5434 * shared memory is what we're sure is shared instead of what could
5435 * possibly be shared with someone. Secondly, because the total may
5436 * include some pure MMIO pages that doesn't go into any of the three
5437 * sub-counts.
5438 *
5439 * @todo Why do we return reused shared pages instead of anything that could
5440 * potentially be shared? Doesn't this mean the first VM gets a much
5441 * lower number of shared pages?
5442 */
5443VMMR3DECL(int) PGMR3QueryMemoryStats(PUVM pUVM, uint64_t *pcbTotalMem, uint64_t *pcbPrivateMem,
5444 uint64_t *pcbSharedMem, uint64_t *pcbZeroMem)
5445{
5446 UVM_ASSERT_VALID_EXT_RETURN(pUVM, VERR_INVALID_VM_HANDLE);
5447 PVM pVM = pUVM->pVM;
5448 VM_ASSERT_VALID_EXT_RETURN(pVM, VERR_INVALID_VM_HANDLE);
5449
5450 if (pcbTotalMem)
5451 *pcbTotalMem = (uint64_t)pVM->pgm.s.cAllPages * PAGE_SIZE;
5452
5453 if (pcbPrivateMem)
5454 *pcbPrivateMem = (uint64_t)pVM->pgm.s.cPrivatePages * PAGE_SIZE;
5455
5456 if (pcbSharedMem)
5457 *pcbSharedMem = (uint64_t)pVM->pgm.s.cReusedSharedPages * PAGE_SIZE;
5458
5459 if (pcbZeroMem)
5460 *pcbZeroMem = (uint64_t)pVM->pgm.s.cZeroPages * PAGE_SIZE;
5461
5462 Log(("PGMR3QueryMemoryStats: all=%x private=%x reused=%x zero=%x\n", pVM->pgm.s.cAllPages, pVM->pgm.s.cPrivatePages, pVM->pgm.s.cReusedSharedPages, pVM->pgm.s.cZeroPages));
5463 return VINF_SUCCESS;
5464}
5465
5466
5467
5468/*********************************************************************************************************************************
5469* Chunk Mappings and Page Allocation *
5470*********************************************************************************************************************************/
5471
5472/**
5473 * Tree enumeration callback for dealing with age rollover.
5474 * It will perform a simple compression of the current age.
5475 */
5476static DECLCALLBACK(int) pgmR3PhysChunkAgeingRolloverCallback(PAVLU32NODECORE pNode, void *pvUser)
5477{
5478 /* Age compression - ASSUMES iNow == 4. */
5479 PPGMCHUNKR3MAP pChunk = (PPGMCHUNKR3MAP)pNode;
5480 if (pChunk->iLastUsed >= UINT32_C(0xffffff00))
5481 pChunk->iLastUsed = 3;
5482 else if (pChunk->iLastUsed >= UINT32_C(0xfffff000))
5483 pChunk->iLastUsed = 2;
5484 else if (pChunk->iLastUsed)
5485 pChunk->iLastUsed = 1;
5486 else /* iLastUsed = 0 */
5487 pChunk->iLastUsed = 4;
5488
5489 NOREF(pvUser);
5490 return 0;
5491}
5492
5493
5494/**
5495 * The structure passed in the pvUser argument of pgmR3PhysChunkUnmapCandidateCallback().
5496 */
5497typedef struct PGMR3PHYSCHUNKUNMAPCB
5498{
5499 PVM pVM; /**< Pointer to the VM. */
5500 PPGMCHUNKR3MAP pChunk; /**< The chunk to unmap. */
5501} PGMR3PHYSCHUNKUNMAPCB, *PPGMR3PHYSCHUNKUNMAPCB;
5502
5503
5504/**
5505 * Callback used to find the mapping that's been unused for
5506 * the longest time.
5507 */
5508static DECLCALLBACK(int) pgmR3PhysChunkUnmapCandidateCallback(PAVLU32NODECORE pNode, void *pvUser)
5509{
5510 PPGMCHUNKR3MAP pChunk = (PPGMCHUNKR3MAP)pNode;
5511 PPGMR3PHYSCHUNKUNMAPCB pArg = (PPGMR3PHYSCHUNKUNMAPCB)pvUser;
5512
5513 /*
5514 * Check for locks and compare when last used.
5515 */
5516 if (pChunk->cRefs)
5517 return 0;
5518 if (pChunk->cPermRefs)
5519 return 0;
5520 if ( pArg->pChunk
5521 && pChunk->iLastUsed >= pArg->pChunk->iLastUsed)
5522 return 0;
5523
5524 /*
5525 * Check that it's not in any of the TLBs.
5526 */
5527 PVM pVM = pArg->pVM;
5528 if ( pVM->pgm.s.ChunkR3Map.Tlb.aEntries[PGM_CHUNKR3MAPTLB_IDX(pChunk->Core.Key)].idChunk
5529 == pChunk->Core.Key)
5530 {
5531 pChunk = NULL;
5532 return 0;
5533 }
5534#ifdef VBOX_STRICT
5535 for (unsigned i = 0; i < RT_ELEMENTS(pVM->pgm.s.ChunkR3Map.Tlb.aEntries); i++)
5536 {
5537 Assert(pVM->pgm.s.ChunkR3Map.Tlb.aEntries[i].pChunk != pChunk);
5538 Assert(pVM->pgm.s.ChunkR3Map.Tlb.aEntries[i].idChunk != pChunk->Core.Key);
5539 }
5540#endif
5541
5542 for (unsigned i = 0; i < RT_ELEMENTS(pVM->pgm.s.PhysTlbR3.aEntries); i++)
5543 if (pVM->pgm.s.PhysTlbR3.aEntries[i].pMap == pChunk)
5544 return 0;
5545
5546 pArg->pChunk = pChunk;
5547 return 0;
5548}
5549
5550
5551/**
5552 * Finds a good candidate for unmapping when the ring-3 mapping cache is full.
5553 *
5554 * The candidate will not be part of any TLBs, so no need to flush
5555 * anything afterwards.
5556 *
5557 * @returns Chunk id.
5558 * @param pVM The cross context VM structure.
5559 */
5560static int32_t pgmR3PhysChunkFindUnmapCandidate(PVM pVM)
5561{
5562 PGM_LOCK_ASSERT_OWNER(pVM);
5563
5564 /*
5565 * Enumerate the age tree starting with the left most node.
5566 */
5567 STAM_PROFILE_START(&pVM->pgm.s.Stats.StatChunkFindCandidate, a);
5568 PGMR3PHYSCHUNKUNMAPCB Args;
5569 Args.pVM = pVM;
5570 Args.pChunk = NULL;
5571 RTAvlU32DoWithAll(&pVM->pgm.s.ChunkR3Map.pTree, true /*fFromLeft*/, pgmR3PhysChunkUnmapCandidateCallback, &Args);
5572 Assert(Args.pChunk);
5573 if (Args.pChunk)
5574 {
5575 Assert(Args.pChunk->cRefs == 0);
5576 Assert(Args.pChunk->cPermRefs == 0);
5577 STAM_PROFILE_STOP(&pVM->pgm.s.Stats.StatChunkFindCandidate, a);
5578 return Args.pChunk->Core.Key;
5579 }
5580
5581 STAM_PROFILE_STOP(&pVM->pgm.s.Stats.StatChunkFindCandidate, a);
5582 return INT32_MAX;
5583}
5584
5585
5586/**
5587 * Rendezvous callback used by pgmR3PhysUnmapChunk that unmaps a chunk
5588 *
5589 * This is only called on one of the EMTs while the other ones are waiting for
5590 * it to complete this function.
5591 *
5592 * @returns VINF_SUCCESS (VBox strict status code).
5593 * @param pVM The cross context VM structure.
5594 * @param pVCpu The cross context virtual CPU structure of the calling EMT. Unused.
5595 * @param pvUser User pointer. Unused
5596 *
5597 */
5598static DECLCALLBACK(VBOXSTRICTRC) pgmR3PhysUnmapChunkRendezvous(PVM pVM, PVMCPU pVCpu, void *pvUser)
5599{
5600 int rc = VINF_SUCCESS;
5601 PGM_LOCK_VOID(pVM);
5602 NOREF(pVCpu); NOREF(pvUser);
5603
5604 if (pVM->pgm.s.ChunkR3Map.c >= pVM->pgm.s.ChunkR3Map.cMax)
5605 {
5606 /* Flush the pgm pool cache; call the internal rendezvous handler as we're already in a rendezvous handler here. */
5607 /** @todo also not really efficient to unmap a chunk that contains PD
5608 * or PT pages. */
5609 pgmR3PoolClearAllRendezvous(pVM, pVM->apCpusR3[0], NULL /* no need to flush the REM TLB as we already did that above */);
5610
5611 /*
5612 * Request the ring-0 part to unmap a chunk to make space in the mapping cache.
5613 */
5614 GMMMAPUNMAPCHUNKREQ Req;
5615 Req.Hdr.u32Magic = SUPVMMR0REQHDR_MAGIC;
5616 Req.Hdr.cbReq = sizeof(Req);
5617 Req.pvR3 = NULL;
5618 Req.idChunkMap = NIL_GMM_CHUNKID;
5619 Req.idChunkUnmap = pgmR3PhysChunkFindUnmapCandidate(pVM);
5620 if (Req.idChunkUnmap != INT32_MAX)
5621 {
5622 STAM_PROFILE_START(&pVM->pgm.s.Stats.StatChunkUnmap, a);
5623 rc = VMMR3CallR0(pVM, VMMR0_DO_GMM_MAP_UNMAP_CHUNK, 0, &Req.Hdr);
5624 STAM_PROFILE_STOP(&pVM->pgm.s.Stats.StatChunkUnmap, a);
5625 if (RT_SUCCESS(rc))
5626 {
5627 /*
5628 * Remove the unmapped one.
5629 */
5630 PPGMCHUNKR3MAP pUnmappedChunk = (PPGMCHUNKR3MAP)RTAvlU32Remove(&pVM->pgm.s.ChunkR3Map.pTree, Req.idChunkUnmap);
5631 AssertRelease(pUnmappedChunk);
5632 AssertRelease(!pUnmappedChunk->cRefs);
5633 AssertRelease(!pUnmappedChunk->cPermRefs);
5634 pUnmappedChunk->pv = NULL;
5635 pUnmappedChunk->Core.Key = UINT32_MAX;
5636 MMR3HeapFree(pUnmappedChunk);
5637 pVM->pgm.s.ChunkR3Map.c--;
5638 pVM->pgm.s.cUnmappedChunks++;
5639
5640 /*
5641 * Flush dangling PGM pointers (R3 & R0 ptrs to GC physical addresses).
5642 */
5643 /** @todo We should not flush chunks which include cr3 mappings. */
5644 for (VMCPUID idCpu = 0; idCpu < pVM->cCpus; idCpu++)
5645 {
5646 PPGMCPU pPGM = &pVM->apCpusR3[idCpu]->pgm.s;
5647
5648 pPGM->pGst32BitPdR3 = NULL;
5649 pPGM->pGstPaePdptR3 = NULL;
5650 pPGM->pGstAmd64Pml4R3 = NULL;
5651 pPGM->pGstEptPml4R3 = NULL;
5652 pPGM->pGst32BitPdR0 = NIL_RTR0PTR;
5653 pPGM->pGstPaePdptR0 = NIL_RTR0PTR;
5654 pPGM->pGstAmd64Pml4R0 = NIL_RTR0PTR;
5655 pPGM->pGstEptPml4R0 = NIL_RTR0PTR;
5656 for (unsigned i = 0; i < RT_ELEMENTS(pPGM->apGstPaePDsR3); i++)
5657 {
5658 pPGM->apGstPaePDsR3[i] = NULL;
5659 pPGM->apGstPaePDsR0[i] = NIL_RTR0PTR;
5660 }
5661
5662 /* Flush REM TLBs. */
5663 CPUMSetChangedFlags(pVM->apCpusR3[idCpu], CPUM_CHANGED_GLOBAL_TLB_FLUSH);
5664 }
5665 }
5666 }
5667 }
5668 PGM_UNLOCK(pVM);
5669 return rc;
5670}
5671
5672/**
5673 * Unmap a chunk to free up virtual address space (request packet handler for pgmR3PhysChunkMap)
5674 *
5675 * @returns VBox status code.
5676 * @param pVM The cross context VM structure.
5677 */
5678static DECLCALLBACK(void) pgmR3PhysUnmapChunk(PVM pVM)
5679{
5680 int rc = VMMR3EmtRendezvous(pVM, VMMEMTRENDEZVOUS_FLAGS_TYPE_ONCE, pgmR3PhysUnmapChunkRendezvous, NULL);
5681 AssertRC(rc);
5682}
5683
5684
5685/**
5686 * Maps the given chunk into the ring-3 mapping cache.
5687 *
5688 * This will call ring-0.
5689 *
5690 * @returns VBox status code.
5691 * @param pVM The cross context VM structure.
5692 * @param idChunk The chunk in question.
5693 * @param ppChunk Where to store the chunk tracking structure.
5694 *
5695 * @remarks Called from within the PGM critical section.
5696 * @remarks Can be called from any thread!
5697 */
5698int pgmR3PhysChunkMap(PVM pVM, uint32_t idChunk, PPPGMCHUNKR3MAP ppChunk)
5699{
5700 int rc;
5701
5702 PGM_LOCK_ASSERT_OWNER(pVM);
5703
5704 /*
5705 * Move the chunk time forward.
5706 */
5707 pVM->pgm.s.ChunkR3Map.iNow++;
5708 if (pVM->pgm.s.ChunkR3Map.iNow == 0)
5709 {
5710 pVM->pgm.s.ChunkR3Map.iNow = 4;
5711 RTAvlU32DoWithAll(&pVM->pgm.s.ChunkR3Map.pTree, true /*fFromLeft*/, pgmR3PhysChunkAgeingRolloverCallback, NULL);
5712 }
5713
5714 /*
5715 * Allocate a new tracking structure first.
5716 */
5717 PPGMCHUNKR3MAP pChunk = (PPGMCHUNKR3MAP)MMR3HeapAllocZ(pVM, MM_TAG_PGM_CHUNK_MAPPING, sizeof(*pChunk));
5718 AssertReturn(pChunk, VERR_NO_MEMORY);
5719 pChunk->Core.Key = idChunk;
5720 pChunk->iLastUsed = pVM->pgm.s.ChunkR3Map.iNow;
5721
5722 /*
5723 * Request the ring-0 part to map the chunk in question.
5724 */
5725 GMMMAPUNMAPCHUNKREQ Req;
5726 Req.Hdr.u32Magic = SUPVMMR0REQHDR_MAGIC;
5727 Req.Hdr.cbReq = sizeof(Req);
5728 Req.pvR3 = NULL;
5729 Req.idChunkMap = idChunk;
5730 Req.idChunkUnmap = NIL_GMM_CHUNKID;
5731
5732 /* Must be callable from any thread, so can't use VMMR3CallR0. */
5733 STAM_PROFILE_START(&pVM->pgm.s.Stats.StatChunkMap, a);
5734 rc = SUPR3CallVMMR0Ex(VMCC_GET_VMR0_FOR_CALL(pVM), NIL_VMCPUID, VMMR0_DO_GMM_MAP_UNMAP_CHUNK, 0, &Req.Hdr);
5735 STAM_PROFILE_STOP(&pVM->pgm.s.Stats.StatChunkMap, a);
5736 if (RT_SUCCESS(rc))
5737 {
5738 pChunk->pv = Req.pvR3;
5739
5740 /*
5741 * If we're running out of virtual address space, then we should
5742 * unmap another chunk.
5743 *
5744 * Currently, an unmap operation requires that all other virtual CPUs
5745 * are idling and not by chance making use of the memory we're
5746 * unmapping. So, we create an async unmap operation here.
5747 *
5748 * Now, when creating or restoring a saved state this wont work very
5749 * well since we may want to restore all guest RAM + a little something.
5750 * So, we have to do the unmap synchronously. Fortunately for us
5751 * though, during these operations the other virtual CPUs are inactive
5752 * and it should be safe to do this.
5753 */
5754 /** @todo Eventually we should lock all memory when used and do
5755 * map+unmap as one kernel call without any rendezvous or
5756 * other precautions. */
5757 if (pVM->pgm.s.ChunkR3Map.c + 1 >= pVM->pgm.s.ChunkR3Map.cMax)
5758 {
5759 switch (VMR3GetState(pVM))
5760 {
5761 case VMSTATE_LOADING:
5762 case VMSTATE_SAVING:
5763 {
5764 PVMCPU pVCpu = VMMGetCpu(pVM);
5765 if ( pVCpu
5766 && pVM->pgm.s.cDeprecatedPageLocks == 0)
5767 {
5768 pgmR3PhysUnmapChunkRendezvous(pVM, pVCpu, NULL);
5769 break;
5770 }
5771 }
5772 RT_FALL_THRU();
5773 default:
5774 rc = VMR3ReqCallNoWait(pVM, VMCPUID_ANY_QUEUE, (PFNRT)pgmR3PhysUnmapChunk, 1, pVM);
5775 AssertRC(rc);
5776 break;
5777 }
5778 }
5779
5780 /*
5781 * Update the tree. We must do this after any unmapping to make sure
5782 * the chunk we're going to return isn't unmapped by accident.
5783 */
5784 AssertPtr(Req.pvR3);
5785 bool fRc = RTAvlU32Insert(&pVM->pgm.s.ChunkR3Map.pTree, &pChunk->Core);
5786 AssertRelease(fRc);
5787 pVM->pgm.s.ChunkR3Map.c++;
5788 pVM->pgm.s.cMappedChunks++;
5789 }
5790 else
5791 {
5792 /** @todo this may fail because of /proc/sys/vm/max_map_count, so we
5793 * should probably restrict ourselves on linux. */
5794 AssertRC(rc);
5795 MMR3HeapFree(pChunk);
5796 pChunk = NULL;
5797 }
5798
5799 *ppChunk = pChunk;
5800 return rc;
5801}
5802
5803
5804/**
5805 * Invalidates the TLB for the ring-3 mapping cache.
5806 *
5807 * @param pVM The cross context VM structure.
5808 */
5809VMMR3DECL(void) PGMR3PhysChunkInvalidateTLB(PVM pVM)
5810{
5811 PGM_LOCK_VOID(pVM);
5812 for (unsigned i = 0; i < RT_ELEMENTS(pVM->pgm.s.ChunkR3Map.Tlb.aEntries); i++)
5813 {
5814 pVM->pgm.s.ChunkR3Map.Tlb.aEntries[i].idChunk = NIL_GMM_CHUNKID;
5815 pVM->pgm.s.ChunkR3Map.Tlb.aEntries[i].pChunk = NULL;
5816 }
5817 /* The page map TLB references chunks, so invalidate that one too. */
5818 pgmPhysInvalidatePageMapTLB(pVM);
5819 PGM_UNLOCK(pVM);
5820}
5821
5822
5823/**
5824 * Response to VM_FF_PGM_NEED_HANDY_PAGES and helper for pgmPhysEnsureHandyPage.
5825 *
5826 * This function will also work the VM_FF_PGM_NO_MEMORY force action flag, to
5827 * signal and clear the out of memory condition. When called, this API is used
5828 * to try clear the condition when the user wants to resume.
5829 *
5830 * @returns The following VBox status codes.
5831 * @retval VINF_SUCCESS on success. FFs cleared.
5832 * @retval VINF_EM_NO_MEMORY if we're out of memory. The FF is not cleared in
5833 * this case and it gets accompanied by VM_FF_PGM_NO_MEMORY.
5834 *
5835 * @param pVM The cross context VM structure.
5836 *
5837 * @remarks The VINF_EM_NO_MEMORY status is for the benefit of the FF processing
5838 * in EM.cpp and shouldn't be propagated outside TRPM, HM, EM and
5839 * pgmPhysEnsureHandyPage. There is one exception to this in the \#PF
5840 * handler.
5841 */
5842VMMR3DECL(int) PGMR3PhysAllocateHandyPages(PVM pVM)
5843{
5844 PGM_LOCK_VOID(pVM);
5845
5846 /*
5847 * Allocate more pages, noting down the index of the first new page.
5848 */
5849 uint32_t iClear = pVM->pgm.s.cHandyPages;
5850 AssertMsgReturn(iClear <= RT_ELEMENTS(pVM->pgm.s.aHandyPages), ("%d", iClear), VERR_PGM_HANDY_PAGE_IPE);
5851 Log(("PGMR3PhysAllocateHandyPages: %d -> %d\n", iClear, RT_ELEMENTS(pVM->pgm.s.aHandyPages)));
5852 int rc = VMMR3CallR0(pVM, VMMR0_DO_PGM_ALLOCATE_HANDY_PAGES, 0, NULL);
5853 /** @todo we should split this up into an allocate and flush operation. sometimes you want to flush and not allocate more (which will trigger the vm account limit error) */
5854 if ( rc == VERR_GMM_HIT_VM_ACCOUNT_LIMIT
5855 && pVM->pgm.s.cHandyPages > 0)
5856 {
5857 /* Still handy pages left, so don't panic. */
5858 rc = VINF_SUCCESS;
5859 }
5860
5861 if (RT_SUCCESS(rc))
5862 {
5863 AssertMsg(rc == VINF_SUCCESS, ("%Rrc\n", rc));
5864 Assert(pVM->pgm.s.cHandyPages > 0);
5865#ifdef VBOX_STRICT
5866 uint32_t i;
5867 for (i = iClear; i < pVM->pgm.s.cHandyPages; i++)
5868 if ( pVM->pgm.s.aHandyPages[i].idPage == NIL_GMM_PAGEID
5869 || pVM->pgm.s.aHandyPages[i].idSharedPage != NIL_GMM_PAGEID
5870 || (pVM->pgm.s.aHandyPages[i].HCPhysGCPhys & PAGE_OFFSET_MASK))
5871 break;
5872 if (i != pVM->pgm.s.cHandyPages)
5873 {
5874 RTAssertMsg1Weak(NULL, __LINE__, __FILE__, __FUNCTION__);
5875 RTAssertMsg2Weak("i=%d iClear=%d cHandyPages=%d\n", i, iClear, pVM->pgm.s.cHandyPages);
5876 for (uint32_t j = iClear; j < pVM->pgm.s.cHandyPages; j++)
5877 RTAssertMsg2Add("%03d: idPage=%d HCPhysGCPhys=%RHp idSharedPage=%d%s\n", j,
5878 pVM->pgm.s.aHandyPages[j].idPage,
5879 pVM->pgm.s.aHandyPages[j].HCPhysGCPhys,
5880 pVM->pgm.s.aHandyPages[j].idSharedPage,
5881 j == i ? " <---" : "");
5882 RTAssertPanic();
5883 }
5884#endif
5885 }
5886 else
5887 {
5888 /*
5889 * We should never get here unless there is a genuine shortage of
5890 * memory (or some internal error). Flag the error so the VM can be
5891 * suspended ASAP and the user informed. If we're totally out of
5892 * handy pages we will return failure.
5893 */
5894 /* Report the failure. */
5895 LogRel(("PGM: Failed to procure handy pages; rc=%Rrc cHandyPages=%#x\n"
5896 " cAllPages=%#x cPrivatePages=%#x cSharedPages=%#x cZeroPages=%#x\n",
5897 rc, pVM->pgm.s.cHandyPages,
5898 pVM->pgm.s.cAllPages, pVM->pgm.s.cPrivatePages, pVM->pgm.s.cSharedPages, pVM->pgm.s.cZeroPages));
5899
5900 if ( rc != VERR_NO_MEMORY
5901 && rc != VERR_NO_PHYS_MEMORY
5902 && rc != VERR_LOCK_FAILED)
5903 for (uint32_t i = 0; i < RT_ELEMENTS(pVM->pgm.s.aHandyPages); i++)
5904 {
5905 LogRel(("PGM: aHandyPages[#%#04x] = {.HCPhysGCPhys=%RHp, .idPage=%#08x, .idSharedPage=%#08x}\n",
5906 i, pVM->pgm.s.aHandyPages[i].HCPhysGCPhys, pVM->pgm.s.aHandyPages[i].idPage,
5907 pVM->pgm.s.aHandyPages[i].idSharedPage));
5908 uint32_t const idPage = pVM->pgm.s.aHandyPages[i].idPage;
5909 if (idPage != NIL_GMM_PAGEID)
5910 {
5911 for (PPGMRAMRANGE pRam = pVM->pgm.s.pRamRangesXR3;
5912 pRam;
5913 pRam = pRam->pNextR3)
5914 {
5915 uint32_t const cPages = pRam->cb >> PAGE_SHIFT;
5916 for (uint32_t iPage = 0; iPage < cPages; iPage++)
5917 if (PGM_PAGE_GET_PAGEID(&pRam->aPages[iPage]) == idPage)
5918 LogRel(("PGM: Used by %RGp %R[pgmpage] (%s)\n",
5919 pRam->GCPhys + ((RTGCPHYS)iPage << PAGE_SHIFT), &pRam->aPages[iPage], pRam->pszDesc));
5920 }
5921 }
5922 }
5923
5924 if (rc == VERR_NO_MEMORY)
5925 {
5926 uint64_t cbHostRamAvail = 0;
5927 int rc2 = RTSystemQueryAvailableRam(&cbHostRamAvail);
5928 if (RT_SUCCESS(rc2))
5929 LogRel(("Host RAM: %RU64MB available\n", cbHostRamAvail / _1M));
5930 else
5931 LogRel(("Cannot determine the amount of available host memory\n"));
5932 }
5933
5934 /* Set the FFs and adjust rc. */
5935 VM_FF_SET(pVM, VM_FF_PGM_NEED_HANDY_PAGES);
5936 VM_FF_SET(pVM, VM_FF_PGM_NO_MEMORY);
5937 if ( rc == VERR_NO_MEMORY
5938 || rc == VERR_NO_PHYS_MEMORY
5939 || rc == VERR_LOCK_FAILED)
5940 rc = VINF_EM_NO_MEMORY;
5941 }
5942
5943 PGM_UNLOCK(pVM);
5944 return rc;
5945}
5946
5947
5948/*********************************************************************************************************************************
5949* Other Stuff *
5950*********************************************************************************************************************************/
5951
5952/**
5953 * Sets the Address Gate 20 state.
5954 *
5955 * @param pVCpu The cross context virtual CPU structure.
5956 * @param fEnable True if the gate should be enabled.
5957 * False if the gate should be disabled.
5958 */
5959VMMDECL(void) PGMR3PhysSetA20(PVMCPU pVCpu, bool fEnable)
5960{
5961 LogFlow(("PGMR3PhysSetA20 %d (was %d)\n", fEnable, pVCpu->pgm.s.fA20Enabled));
5962 if (pVCpu->pgm.s.fA20Enabled != fEnable)
5963 {
5964#ifdef VBOX_WITH_NESTED_HWVIRT_VMX
5965 PCCPUMCTX pCtx = CPUMQueryGuestCtxPtr(pVCpu);
5966 if ( CPUMIsGuestInVmxRootMode(pCtx)
5967 && !fEnable)
5968 {
5969 Log(("Cannot enter A20M mode while in VMX root mode\n"));
5970 return;
5971 }
5972#endif
5973 pVCpu->pgm.s.fA20Enabled = fEnable;
5974 pVCpu->pgm.s.GCPhysA20Mask = ~((RTGCPHYS)!fEnable << 20);
5975 if (VM_IS_NEM_ENABLED(pVCpu->CTX_SUFF(pVM)))
5976 NEMR3NotifySetA20(pVCpu, fEnable);
5977#ifdef PGM_WITH_A20
5978 VMCPU_FF_SET(pVCpu, VMCPU_FF_PGM_SYNC_CR3);
5979 pgmR3RefreshShadowModeAfterA20Change(pVCpu);
5980 HMFlushTlb(pVCpu);
5981#endif
5982 IEMTlbInvalidateAllPhysical(pVCpu);
5983 STAM_REL_COUNTER_INC(&pVCpu->pgm.s.cA20Changes);
5984 }
5985}
5986
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