VirtualBox

source: vbox/trunk/src/VBox/VMM/testcase/tstMMHyperHeap.cpp@ 60307

Last change on this file since 60307 was 57358, checked in by vboxsync, 9 years ago

*: scm cleanup run.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Id Revision
File size: 8.0 KB
Line 
1/* $Id: tstMMHyperHeap.cpp 57358 2015-08-14 15:16:38Z vboxsync $ */
2/** @file
3 * MM Hypervisor Heap testcase.
4 */
5
6/*
7 * Copyright (C) 2006-2015 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#include <VBox/vmm/mm.h>
23#include <VBox/vmm/stam.h>
24#include <VBox/vmm/vm.h>
25#include <VBox/vmm/uvm.h>
26#include <VBox/sup.h>
27#include <VBox/param.h>
28#include <VBox/err.h>
29
30#include <VBox/log.h>
31#include <iprt/initterm.h>
32#include <iprt/mem.h>
33#include <iprt/assert.h>
34#include <iprt/stream.h>
35#include <iprt/string.h>
36
37/* does not work for more CPUs as SUPR3LowAlloc() would refuse to allocate more pages */
38#define NUM_CPUS 16
39
40
41/**
42 * Entry point.
43 */
44extern "C" DECLEXPORT(int) TrustedMain(int argc, char **argv, char **envp)
45{
46
47 /*
48 * Init runtime.
49 */
50 RTR3InitExe(argc, &argv, 0);
51
52 /*
53 * Create empty VM structure and call MMR3Init().
54 */
55 PVM pVM;
56 RTR0PTR pvR0;
57 SUPPAGE aPages[RT_ALIGN_Z(sizeof(*pVM) + NUM_CPUS * sizeof(VMCPU), PAGE_SIZE) >> PAGE_SHIFT];
58 int rc = SUPR3Init(NULL);
59 if (RT_SUCCESS(rc))
60 rc = SUPR3LowAlloc(RT_ELEMENTS(aPages), (void **)&pVM, &pvR0, &aPages[0]);
61 if (RT_FAILURE(rc))
62 {
63 RTPrintf("Fatal error: SUP Failure! rc=%Rrc\n", rc);
64 return 1;
65 }
66 memset(pVM, 0, sizeof(*pVM)); /* wtf? */
67 pVM->paVMPagesR3 = aPages;
68 pVM->pVMR0 = pvR0;
69
70 static UVM s_UVM;
71 PUVM pUVM = &s_UVM;
72 pUVM->pVM = pVM;
73 pVM->pUVM = pUVM;
74
75 pVM->cCpus = NUM_CPUS;
76 pVM->cbSelf = RT_UOFFSETOF(VM, aCpus[pVM->cCpus]);
77
78 rc = STAMR3InitUVM(pUVM);
79 if (RT_FAILURE(rc))
80 {
81 RTPrintf("FAILURE: STAMR3Init failed. rc=%Rrc\n", rc);
82 return 1;
83 }
84
85 rc = MMR3InitUVM(pUVM);
86 if (RT_FAILURE(rc))
87 {
88 RTPrintf("FAILURE: STAMR3Init failed. rc=%Rrc\n", rc);
89 return 1;
90 }
91
92 rc = CFGMR3Init(pVM, NULL, NULL);
93 if (RT_FAILURE(rc))
94 {
95 RTPrintf("FAILURE: CFGMR3Init failed. rc=%Rrc\n", rc);
96 return 1;
97 }
98
99 rc = MMR3Init(pVM);
100 if (RT_FAILURE(rc))
101 {
102 RTPrintf("Fatal error: MMR3Init failed! rc=%Rrc\n", rc);
103 return 1;
104 }
105
106 /*
107 * Try allocate.
108 */
109 static struct
110 {
111 size_t cb;
112 unsigned uAlignment;
113 void *pvAlloc;
114 unsigned iFreeOrder;
115 } aOps[] =
116 {
117 { 16, 0, NULL, 0 },
118 { 16, 4, NULL, 1 },
119 { 16, 8, NULL, 2 },
120 { 16, 16, NULL, 5 },
121 { 16, 32, NULL, 4 },
122 { 32, 0, NULL, 3 },
123 { 31, 0, NULL, 6 },
124 { 1024, 0, NULL, 8 },
125 { 1024, 32, NULL, 10 },
126 { 1024, 32, NULL, 12 },
127 { PAGE_SIZE, PAGE_SIZE, NULL, 13 },
128 { 1024, 32, NULL, 9 },
129 { PAGE_SIZE, 32, NULL, 11 },
130 { PAGE_SIZE, PAGE_SIZE, NULL, 14 },
131 { 16, 0, NULL, 15 },
132 { 9, 0, NULL, 7 },
133 { 16, 0, NULL, 7 },
134 { 36, 0, NULL, 7 },
135 { 16, 0, NULL, 7 },
136 { 12344, 0, NULL, 7 },
137 { 50, 0, NULL, 7 },
138 { 16, 0, NULL, 7 },
139 };
140 unsigned i;
141#ifdef DEBUG
142 MMHyperHeapDump(pVM);
143#endif
144 size_t cbBefore = MMHyperHeapGetFreeSize(pVM);
145 static char szFill[] = "01234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
146
147 /* allocate */
148 for (i = 0; i < RT_ELEMENTS(aOps); i++)
149 {
150 rc = MMHyperAlloc(pVM, aOps[i].cb, aOps[i].uAlignment, MM_TAG_VM, &aOps[i].pvAlloc);
151 if (RT_FAILURE(rc))
152 {
153 RTPrintf("Failure: MMHyperAlloc(, %#x, %#x,) -> %d i=%d\n", aOps[i].cb, aOps[i].uAlignment, rc, i);
154 return 1;
155 }
156 memset(aOps[i].pvAlloc, szFill[i], aOps[i].cb);
157 if (RT_ALIGN_P(aOps[i].pvAlloc, (aOps[i].uAlignment ? aOps[i].uAlignment : 8)) != aOps[i].pvAlloc)
158 {
159 RTPrintf("Failure: MMHyperAlloc(, %#x, %#x,) -> %p, invalid alignment!\n", aOps[i].cb, aOps[i].uAlignment, aOps[i].pvAlloc);
160 return 1;
161 }
162 }
163
164 /* free and allocate the same node again. */
165 for (i = 0; i < RT_ELEMENTS(aOps); i++)
166 {
167 if ( !aOps[i].pvAlloc
168 || aOps[i].uAlignment == PAGE_SIZE)
169 continue;
170 //size_t cbBeforeSub = MMHyperHeapGetFreeSize(pVM);
171 rc = MMHyperFree(pVM, aOps[i].pvAlloc);
172 if (RT_FAILURE(rc))
173 {
174 RTPrintf("Failure: MMHyperFree(, %p,) -> %d i=%d\n", aOps[i].pvAlloc, rc, i);
175 return 1;
176 }
177 //RTPrintf("debug: i=%d cbBeforeSub=%d now=%d\n", i, cbBeforeSub, MMHyperHeapGetFreeSize(pVM));
178 void *pv;
179 rc = MMHyperAlloc(pVM, aOps[i].cb, aOps[i].uAlignment, MM_TAG_VM_REQ, &pv);
180 if (RT_FAILURE(rc))
181 {
182 RTPrintf("Failure: MMHyperAlloc(, %#x, %#x,) -> %d i=%d\n", aOps[i].cb, aOps[i].uAlignment, rc, i);
183 return 1;
184 }
185 if (pv != aOps[i].pvAlloc)
186 {
187 RTPrintf("Failure: Free+Alloc returned different address. new=%p old=%p i=%d (doesn't work with delayed free)\n", pv, aOps[i].pvAlloc, i);
188 //return 1;
189 }
190 aOps[i].pvAlloc = pv;
191 #if 0 /* won't work :/ */
192 size_t cbAfterSub = MMHyperHeapGetFreeSize(pVM);
193 if (cbBeforeSub != cbAfterSub)
194 {
195 RTPrintf("Failure: cbBeforeSub=%d cbAfterSub=%d. i=%d\n", cbBeforeSub, cbAfterSub, i);
196 return 1;
197 }
198 #endif
199 }
200
201 /* free it in a specific order. */
202 int cFreed = 0;
203 for (i = 0; i < RT_ELEMENTS(aOps); i++)
204 {
205 unsigned j;
206 for (j = 0; j < RT_ELEMENTS(aOps); j++)
207 {
208 if ( aOps[j].iFreeOrder != i
209 || !aOps[j].pvAlloc)
210 continue;
211 RTPrintf("j=%d i=%d free=%d cb=%d pv=%p\n", j, i, MMHyperHeapGetFreeSize(pVM), aOps[j].cb, aOps[j].pvAlloc);
212 if (aOps[j].uAlignment == PAGE_SIZE)
213 cbBefore -= aOps[j].cb;
214 else
215 {
216 rc = MMHyperFree(pVM, aOps[j].pvAlloc);
217 if (RT_FAILURE(rc))
218 {
219 RTPrintf("Failure: MMHyperFree(, %p,) -> %d j=%d i=%d\n", aOps[j].pvAlloc, rc, i, j);
220 return 1;
221 }
222 }
223 aOps[j].pvAlloc = NULL;
224 cFreed++;
225 }
226 }
227 Assert(cFreed == RT_ELEMENTS(aOps));
228 RTPrintf("i=done free=%d\n", MMHyperHeapGetFreeSize(pVM));
229
230 /* check that we're back at the right amount of free memory. */
231 size_t cbAfter = MMHyperHeapGetFreeSize(pVM);
232 if (cbBefore != cbAfter)
233 {
234 RTPrintf("Warning: Either we've split out an alignment chunk at the start, or we've got\n"
235 " an alloc/free accounting bug: cbBefore=%d cbAfter=%d\n", cbBefore, cbAfter);
236#ifdef DEBUG
237 MMHyperHeapDump(pVM);
238#endif
239 }
240
241 RTPrintf("tstMMHyperHeap: Success\n");
242#ifdef LOG_ENABLED
243 RTLogFlush(NULL);
244#endif
245 return 0;
246}
247
248
249#if !defined(VBOX_WITH_HARDENING) || !defined(RT_OS_WINDOWS)
250/**
251 * Main entry point.
252 */
253int main(int argc, char **argv, char **envp)
254{
255 return TrustedMain(argc, argv, envp);
256}
257#endif
258
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