reactos/rostests/apitests/ntdll/RtlReAllocateHeap.c
Thomas Faber 0f3e91c5f7 [NTDLL_APITEST]
- Add a test for heap user values and flags when using RtlReAllocateHeap in-place
CORE-11196

svn path=/trunk/; revision=71278
2016-05-08 08:03:50 +00:00

192 lines
6.6 KiB
C

/*
* PROJECT: ReactOS api tests
* LICENSE: LGPLv2.1+ - See COPYING.LIB in the top level directory
* PURPOSE: Test for RtlReAllocateHeap
* PROGRAMMERS: Thomas Faber <thomas.faber@reactos.org>
*/
#include <apitest.h>
#include <ndk/rtlfuncs.h>
static
BOOLEAN
CheckBuffer(
PVOID Buffer,
SIZE_T Size,
UCHAR Value)
{
PUCHAR Array = Buffer;
SIZE_T i;
for (i = 0; i < Size; i++)
if (Array[i] != Value)
{
trace("Expected %x, found %x at offset %lu\n", Value, Array[i], (ULONG)i);
return FALSE;
}
return TRUE;
}
static
BOOLEAN
ReAllocBuffer(
PUCHAR *Buffer,
SIZE_T Size,
SIZE_T *OldSizePtr,
PCSTR Action)
{
PUCHAR NewBuffer;
SIZE_T OldSize = *OldSizePtr;
RtlFillMemory(*Buffer, OldSize, 0x7a);
NewBuffer = RtlReAllocateHeap(RtlGetProcessHeap(),
HEAP_ZERO_MEMORY,
*Buffer,
Size);
if (!NewBuffer)
{
skip("RtlReAllocateHeap failed for size %lu (%s)\n", Size, Action);
return FALSE;
}
*Buffer = NewBuffer;
ok_hex(RtlSizeHeap(RtlGetProcessHeap(), 0, NewBuffer), Size);
if (OldSize < Size)
{
ok(CheckBuffer(NewBuffer, OldSize, 0x7a), "CheckBuffer failed at size 0x%lx -> 0x%lx\n", OldSize, Size);
ok(CheckBuffer(NewBuffer + OldSize, Size - OldSize, 0), "HEAP_ZERO_MEMORY not respected for 0x%lx -> 0x%lx\n", OldSize, Size);
}
else
{
ok(CheckBuffer(NewBuffer, Size, 0x7a), "CheckBuffer failed at size 0x%lx -> 0x%lx\n", OldSize, Size);
}
*OldSizePtr = Size;
return TRUE;
}
START_TEST(RtlReAllocateHeap)
{
PUCHAR Buffer = NULL;
SIZE_T OldSize = 0;
SIZE_T Size;
BOOLEAN Continue = TRUE;
BOOLEAN Success;
PVOID UserValue;
ULONG UserFlags;
PVOID Buffer2;
OldSize = 0x100;
Buffer = RtlReAllocateHeap(RtlGetProcessHeap(),
HEAP_ZERO_MEMORY,
NULL,
OldSize);
ok(Buffer == NULL, "RtlReAllocateHeap succeeded for NULL\n");
if (Buffer)
RtlFreeHeap(RtlGetProcessHeap(), 0, Buffer);
Buffer = RtlAllocateHeap(RtlGetProcessHeap(),
HEAP_ZERO_MEMORY,
OldSize);
if (!Buffer)
{
skip("RtlAllocateHeap failed for size %lu\n", OldSize);
return;
}
ok(CheckBuffer(Buffer, OldSize, 0), "HEAP_ZERO_MEMORY not respected for 0x%lx\n", OldSize);
for (Size = 0x78000; Size < 0x90000 && Continue; Size += 0x100)
{
Continue = ReAllocBuffer(&Buffer, Size, &OldSize, "growing");
}
/* and back again */
for (Size -= 0x100; Size >= 0x78000 && Continue; Size -= 0x100)
{
Continue = ReAllocBuffer(&Buffer, Size, &OldSize, "shrinking");
}
RtlFreeHeap(RtlGetProcessHeap(), 0, Buffer);
/* Now make sure user flags/values get preserved */
OldSize = 0x100;
Buffer = RtlAllocateHeap(RtlGetProcessHeap(),
HEAP_ZERO_MEMORY | HEAP_SETTABLE_USER_VALUE | HEAP_SETTABLE_USER_FLAG2,
OldSize);
if (!Buffer)
{
skip("RtlAllocateHeap failed for size %lu\n", OldSize);
return;
}
UserValue = InvalidPointer;
UserFlags = 0x55555555;
Success = RtlGetUserInfoHeap(RtlGetProcessHeap(),
0,
Buffer,
&UserValue,
&UserFlags);
ok(Success == TRUE, "RtlGetUserInfoHeap returned %u\n", Success);
ok(UserValue == NULL, "UserValue = %p\n", UserValue);
ok(UserFlags == HEAP_SETTABLE_USER_FLAG2, "UserFlags = %lx\n", UserFlags);
Success = RtlSetUserFlagsHeap(RtlGetProcessHeap(),
0,
Buffer,
HEAP_SETTABLE_USER_FLAG1 | HEAP_SETTABLE_USER_FLAG2,
HEAP_SETTABLE_USER_FLAG3);
ok(Success == TRUE, "RtlSetUserFlagsHeap returned %u\n", Success);
Success = RtlSetUserValueHeap(RtlGetProcessHeap(),
0,
Buffer,
&UserValue);
ok(Success == TRUE, "RtlSetUserValueHeap returned %u\n", Success);
UserValue = InvalidPointer;
UserFlags = 0x55555555;
Success = RtlGetUserInfoHeap(RtlGetProcessHeap(),
0,
Buffer,
&UserValue,
&UserFlags);
ok(Success == TRUE, "RtlGetUserInfoHeap returned %u\n", Success);
ok(UserValue == &UserValue, "UserValue = %p, expected %p\n", UserValue, &UserValue);
ok(UserFlags == HEAP_SETTABLE_USER_FLAG3, "UserFlags = %lx\n", UserFlags);
/* shrink (preserves flags) */
Buffer2 = RtlReAllocateHeap(RtlGetProcessHeap(),
HEAP_REALLOC_IN_PLACE_ONLY | HEAP_SETTABLE_USER_FLAG2,
Buffer,
OldSize / 2);
ok(Buffer2 == Buffer, "New Buffer is %p, expected %p\n", Buffer2, Buffer);
if (Buffer2) Buffer = Buffer2;
UserValue = InvalidPointer;
UserFlags = 0x55555555;
Success = RtlGetUserInfoHeap(RtlGetProcessHeap(),
0,
Buffer,
&UserValue,
&UserFlags);
ok(Success == TRUE, "RtlGetUserInfoHeap returned %u\n", Success);
ok(UserValue == &UserValue, "UserValue = %p, expected %p\n", UserValue, &UserValue);
ok(UserFlags == HEAP_SETTABLE_USER_FLAG3, "UserFlags = %lx\n", UserFlags);
/* grow (overwrites flags) */
Buffer2 = RtlReAllocateHeap(RtlGetProcessHeap(),
HEAP_REALLOC_IN_PLACE_ONLY | HEAP_SETTABLE_USER_FLAG1,
Buffer,
OldSize / 4 * 3);
ok(Buffer2 == Buffer, "New Buffer is %p, expected %p\n", Buffer2, Buffer);
if (Buffer2) Buffer = Buffer2;
UserValue = InvalidPointer;
UserFlags = 0x55555555;
Success = RtlGetUserInfoHeap(RtlGetProcessHeap(),
0,
Buffer,
&UserValue,
&UserFlags);
ok(Success == TRUE, "RtlGetUserInfoHeap returned %u\n", Success);
ok(UserValue == &UserValue, "UserValue = %p, expected %p\n", UserValue, &UserValue);
ok(UserFlags == HEAP_SETTABLE_USER_FLAG1, "UserFlags = %lx\n", UserFlags);
RtlFreeHeap(RtlGetProcessHeap(), 0, Buffer);
}