/**
* Release all locks and free the allocated memory.
*
* @param pVM The cross context VM structure.
* @thread The Emulation Thread.
*/
void mmR3PagePoolTerm(PVM pVM)
{
if (pVM->mm.s.pPagePoolR3)
{
/*
* Unlock all memory held by subpools and free the memory.
* (The MM Heap will free the memory used for internal stuff.)
*/
Assert(!pVM->mm.s.pPagePoolR3->fLow);
PMMPAGESUBPOOL pSubPool = pVM->mm.s.pPagePoolR3->pHead;
while (pSubPool)
{
int rc = SUPR3PageFreeEx(pSubPool->pvPages, pSubPool->cPages);
AssertMsgRC(rc, ("SUPR3PageFreeEx(%p) failed with rc=%Rrc\n", pSubPool->pvPages, rc));
pSubPool->pvPages = NULL;
/* next */
pSubPool = pSubPool->pNext;
}
pVM->mm.s.pPagePoolR3 = NULL;
#ifndef VBOX_WITH_2X_4GB_ADDR_SPACE
pVM->mm.s.pPagePoolR0 = NIL_RTR0PTR;
#endif
}
if (pVM->mm.s.pPagePoolLowR3)
{
/*
* Free the memory.
*/
Assert(pVM->mm.s.pPagePoolLowR3->fLow);
PMMPAGESUBPOOL pSubPool = pVM->mm.s.pPagePoolLowR3->pHead;
while (pSubPool)
{
int rc = SUPR3LowFree(pSubPool->pvPages, pSubPool->cPages);
AssertMsgRC(rc, ("SUPR3LowFree(%p) failed with rc=%d\n", pSubPool->pvPages, rc));
pSubPool->pvPages = NULL;
/* next */
pSubPool = pSubPool->pNext;
}
pVM->mm.s.pPagePoolLowR3 = NULL;
#ifndef VBOX_WITH_2X_4GB_ADDR_SPACE
pVM->mm.s.pPagePoolLowR0 = NIL_RTR0PTR;
#endif
}
}
int main(int argc, char **argv)
{
int rc;
int rcRet = 0;
RTR3InitExe(argc, &argv, 0);
RTPrintf("tstLow: TESTING...\n");
rc = SUPR3Init(NULL);
if (RT_SUCCESS(rc))
{
/*
* Allocate a bit of contiguous memory.
*/
SUPPAGE aPages0[128];
void *pvPages0 = (void *)0x77777777;
memset(&aPages0[0], 0x8f, sizeof(aPages0));
rc = SUPR3LowAlloc(RT_ELEMENTS(aPages0), &pvPages0, NULL, aPages0);
if (RT_SUCCESS(rc))
{
/* check that the pages are below 4GB and valid. */
for (unsigned iPage = 0; iPage < RT_ELEMENTS(aPages0); iPage++)
{
RTPrintf("%-4d: Phys=%RHp Reserved=%p\n", iPage, aPages0[iPage].Phys, aPages0[iPage].uReserved);
if (aPages0[iPage].uReserved != 0)
{
rcRet++;
RTPrintf("tstLow: error: aPages0[%d].uReserved=%#x expected 0!\n", iPage, aPages0[iPage].uReserved);
}
if ( aPages0[iPage].Phys >= _4G
|| (aPages0[iPage].Phys & PAGE_OFFSET_MASK))
{
rcRet++;
RTPrintf("tstLow: error: aPages0[%d].Phys=%RHp!\n", iPage, aPages0[iPage].Phys);
}
}
if (!rcRet)
{
for (unsigned iPage = 0; iPage < RT_ELEMENTS(aPages0); iPage++)
memset((char *)pvPages0 + iPage * PAGE_SIZE, iPage, PAGE_SIZE);
for (unsigned iPage = 0; iPage < RT_ELEMENTS(aPages0); iPage++)
for (uint8_t *pu8 = (uint8_t *)pvPages0 + iPage * PAGE_SIZE, *pu8End = pu8 + PAGE_SIZE; pu8 < pu8End; pu8++)
if (*pu8 != (uint8_t)iPage)
{
RTPrintf("tstLow: error: invalid page content %02x != %02x. iPage=%u off=%#x\n",
*pu8, (uint8_t)iPage, iPage, (uintptr_t)pu8 & PAGE_OFFSET_MASK);
rcRet++;
}
}
SUPR3LowFree(pvPages0, RT_ELEMENTS(aPages0));
}
else
{
RTPrintf("SUPR3LowAlloc(%d,,) failed -> rc=%Rrc\n", RT_ELEMENTS(aPages0), rc);
rcRet++;
}
/*
* Allocate odd amounts in from 1 to 127.
*/
for (unsigned cPages = 1; cPages <= 127; cPages++)
{
SUPPAGE aPages1[128];
void *pvPages1 = (void *)0x77777777;
memset(&aPages1[0], 0x8f, sizeof(aPages1));
rc = SUPR3LowAlloc(cPages, &pvPages1, NULL, aPages1);
if (RT_SUCCESS(rc))
{
/* check that the pages are below 4GB and valid. */
for (unsigned iPage = 0; iPage < cPages; iPage++)
{
RTPrintf("%-4d::%-4d: Phys=%RHp Reserved=%p\n", cPages, iPage, aPages1[iPage].Phys, aPages1[iPage].uReserved);
if (aPages1[iPage].uReserved != 0)
{
rcRet++;
RTPrintf("tstLow: error: aPages1[%d].uReserved=%#x expected 0!\n", iPage, aPages1[iPage].uReserved);
}
if ( aPages1[iPage].Phys >= _4G
|| (aPages1[iPage].Phys & PAGE_OFFSET_MASK))
{
rcRet++;
RTPrintf("tstLow: error: aPages1[%d].Phys=%RHp!\n", iPage, aPages1[iPage].Phys);
}
}
if (!rcRet)
{
for (unsigned iPage = 0; iPage < cPages; iPage++)
memset((char *)pvPages1 + iPage * PAGE_SIZE, iPage, PAGE_SIZE);
for (unsigned iPage = 0; iPage < cPages; iPage++)
for (uint8_t *pu8 = (uint8_t *)pvPages1 + iPage * PAGE_SIZE, *pu8End = pu8 + PAGE_SIZE; pu8 < pu8End; pu8++)
if (*pu8 != (uint8_t)iPage)
{
RTPrintf("tstLow: error: invalid page content %02x != %02x. iPage=%p off=%#x\n",
*pu8, (uint8_t)iPage, iPage, (uintptr_t)pu8 & PAGE_OFFSET_MASK);
rcRet++;
}
}
SUPR3LowFree(pvPages1, cPages);
}
else
{
RTPrintf("SUPR3LowAlloc(%d,,) failed -> rc=%Rrc\n", cPages, rc);
rcRet++;
}
}
}
else
{
RTPrintf("SUPR3Init -> rc=%Rrc\n", rc);
rcRet++;
}
return rcRet;
}