VirtualBox

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

Last change on this file since 69146 was 69111, checked in by vboxsync, 7 years ago

(C) year

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