2 * PROJECT: ReactOS kernel-mode tests
3 * LICENSE: LGPLv2.1+ - See COPYING.LIB in the top level directory
4 * PURPOSE: Test driver for CcPinMappedData function
5 * PROGRAMMER: Pierre Schweitzer <pierre@reactos.org>
13 #define IOCTL_START_TEST 1
14 #define IOCTL_FINISH_TEST 2
16 typedef struct _TEST_FCB
18 FSRTL_ADVANCED_FCB_HEADER Header
;
19 SECTION_OBJECT_POINTERS SectionObjectPointers
;
20 FAST_MUTEX HeaderMutex
;
21 } TEST_FCB
, *PTEST_FCB
;
23 typedef struct _TEST_CONTEXT
28 } TEST_CONTEXT
, *PTEST_CONTEXT
;
30 static ULONG TestTestId
= -1;
31 static PFILE_OBJECT TestFileObject
;
32 static PDEVICE_OBJECT TestDeviceObject
;
33 static KMT_IRP_HANDLER TestIrpHandler
;
34 static KMT_MESSAGE_HANDLER TestMessageHandler
;
38 _In_ PDRIVER_OBJECT DriverObject
,
39 _In_ PCUNICODE_STRING RegistryPath
,
40 _Out_ PCWSTR
*DeviceName
,
43 NTSTATUS Status
= STATUS_SUCCESS
;
47 UNREFERENCED_PARAMETER(RegistryPath
);
49 *DeviceName
= L
"CcPinMappedData";
50 *Flags
= TESTENTRY_NO_EXCLUSIVE_DEVICE
|
51 TESTENTRY_BUFFERED_IO_DEVICE
|
52 TESTENTRY_NO_READONLY_DEVICE
;
54 KmtRegisterIrpHandler(IRP_MJ_READ
, NULL
, TestIrpHandler
);
55 KmtRegisterMessageHandler(0, NULL
, TestMessageHandler
);
63 _In_ PDRIVER_OBJECT DriverObject
)
102 static CACHE_MANAGER_CALLBACKS Callbacks
= {
104 ReleaseFromLazyWrite
,
106 ReleaseFromReadAhead
,
109 static CC_FILE_SIZES FileSizes
= {
110 RTL_CONSTANT_LARGE_INTEGER((LONGLONG
)0x4000), // .AllocationSize
111 RTL_CONSTANT_LARGE_INTEGER((LONGLONG
)0x4000), // .FileSize
112 RTL_CONSTANT_LARGE_INTEGER((LONGLONG
)0x4000) // .ValidDataLength
117 MapAndLockUserBuffer(
119 _In_ ULONG BufferLength
)
123 if (Irp
->MdlAddress
== NULL
)
125 Mdl
= IoAllocateMdl(Irp
->UserBuffer
, BufferLength
, FALSE
, FALSE
, Irp
);
133 MmProbeAndLockPages(Mdl
, Irp
->RequestorMode
, IoWriteAccess
);
135 _SEH2_EXCEPT(EXCEPTION_EXECUTE_HANDLER
)
138 Irp
->MdlAddress
= NULL
;
139 _SEH2_YIELD(return NULL
);
144 return MmGetSystemAddressForMdlSafe(Irp
->MdlAddress
, NormalPagePriority
);
150 PinInAnotherThread(IN PVOID Context
)
155 LARGE_INTEGER Offset
;
156 PTEST_CONTEXT TestContext
;
158 ok(TestFileObject
!= NULL
, "Called in invalid context!\n");
159 ok_eq_ulong(TestTestId
, 4);
161 TestContext
= Context
;
162 ok(TestContext
!= NULL
, "Called in invalid context!\n");
163 ok(TestContext
->Bcb
!= NULL
, "Called in invalid context!\n");
164 ok(TestContext
->Buffer
!= NULL
, "Called in invalid context!\n");
165 ok(TestContext
->Length
!= 0, "Called in invalid context!\n");
171 Ret
= CcMapData(TestFileObject
, &Offset
, TestContext
->Length
, MAP_WAIT
, &Bcb
, (PVOID
*)&Buffer
);
172 KmtEndSeh(STATUS_SUCCESS
);
174 if (!skip(Ret
== TRUE
, "CcMapData failed\n"))
176 ok(Bcb
!= TestContext
->Bcb
, "Returned same BCB!\n");
177 ok_eq_pointer(Buffer
, TestContext
->Buffer
);
183 Ret
= CcPinMappedData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, 0, &PinBcb
);
184 KmtEndSeh(STATUS_SUCCESS
);
186 if (!skip(Ret
== TRUE
, "CcPinMappedData failed\n"))
188 ok(Bcb
!= PinBcb
, "Returned same BCB!\n");
189 ok_eq_pointer(PinBcb
, TestContext
->Bcb
);
201 PinInAnotherThreadExclusive(IN PVOID Context
)
206 LARGE_INTEGER Offset
;
207 PTEST_CONTEXT TestContext
;
209 ok(TestFileObject
!= NULL
, "Called in invalid context!\n");
210 ok_eq_ulong(TestTestId
, 2);
212 TestContext
= Context
;
213 ok(TestContext
!= NULL
, "Called in invalid context!\n");
214 ok(TestContext
->Bcb
!= NULL
, "Called in invalid context!\n");
215 ok(TestContext
->Buffer
!= NULL
, "Called in invalid context!\n");
216 ok(TestContext
->Length
!= 0, "Called in invalid context!\n");
222 Ret
= CcMapData(TestFileObject
, &Offset
, TestContext
->Length
, MAP_WAIT
, &Bcb
, (PVOID
*)&Buffer
);
223 KmtEndSeh(STATUS_SUCCESS
);
225 if (!skip(Ret
== TRUE
, "CcMapData failed\n"))
227 ok(Bcb
!= TestContext
->Bcb
, "Returned same BCB!\n");
228 ok_eq_pointer(Buffer
, TestContext
->Buffer
);
234 Ret
= CcPinMappedData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, PIN_EXCLUSIVE
, &PinBcb
);
235 KmtEndSeh(STATUS_SUCCESS
);
237 if (!skip(Ret
== FALSE
, "CcPinMappedData succeed\n"))
239 ok_eq_pointer(PinBcb
, Bcb
);
245 Ret
= CcPinMappedData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, 0, &PinBcb
);
246 KmtEndSeh(STATUS_SUCCESS
);
248 if (!skip(Ret
== FALSE
, "CcPinMappedData succeed\n"))
250 ok_eq_pointer(PinBcb
, Bcb
);
270 PDEVICE_OBJECT DeviceObject
)
272 PVOID Bcb
, PinBcb
, NewBcb
;
276 LARGE_INTEGER Offset
;
278 ok_eq_pointer(TestFileObject
, NULL
);
279 ok_eq_pointer(TestDeviceObject
, NULL
);
280 ok_eq_ulong(TestTestId
, -1);
282 TestDeviceObject
= DeviceObject
;
284 TestFileObject
= IoCreateStreamFileObject(NULL
, DeviceObject
);
285 if (!skip(TestFileObject
!= NULL
, "Failed to allocate FO\n"))
287 Fcb
= ExAllocatePool(NonPagedPool
, sizeof(TEST_FCB
));
288 if (!skip(Fcb
!= NULL
, "ExAllocatePool failed\n"))
290 RtlZeroMemory(Fcb
, sizeof(TEST_FCB
));
291 ExInitializeFastMutex(&Fcb
->HeaderMutex
);
292 FsRtlSetupAdvancedHeader(&Fcb
->Header
, &Fcb
->HeaderMutex
);
294 TestFileObject
->FsContext
= Fcb
;
295 TestFileObject
->SectionObjectPointer
= &Fcb
->SectionObjectPointers
;
298 CcInitializeCacheMap(TestFileObject
, &FileSizes
, TRUE
, &Callbacks
, NULL
);
299 KmtEndSeh(STATUS_SUCCESS
);
301 if (!skip(CcIsFileCached(TestFileObject
) == TRUE
, "CcInitializeCacheMap failed\n"))
308 Ret
= CcMapData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, MAP_WAIT
, &Bcb
, (PVOID
*)&Buffer
);
309 KmtEndSeh(STATUS_SUCCESS
);
311 if (!skip(Ret
== TRUE
, "CcMapData failed\n"))
315 ok_eq_ulong(Buffer
[0x3000 / sizeof(ULONG
)], 0xDEADBABE);
318 Ret
= CcPinMappedData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, PIN_WAIT
, &PinBcb
);
319 KmtEndSeh(STATUS_SUCCESS
);
321 if (!skip(Ret
== TRUE
, "CcPinMappedData failed\n"))
323 ok(Bcb
!= PinBcb
, "Returned same BCB!\n");
324 ok(*(PUSHORT
)PinBcb
== 0x2FD, "Not a BCB: %x\n", *(PUSHORT
)PinBcb
);
326 /* Previous BCB isn't valid anymore! */
333 else if (TestId
== 1)
338 Ret
= CcPinRead(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, PIN_WAIT
, &PinBcb
, (PVOID
*)&Buffer
);
339 KmtEndSeh(STATUS_SUCCESS
);
341 if (!skip(Ret
== TRUE
, "CcPinRead failed\n"))
343 ok(*(PUSHORT
)PinBcb
== 0x2FD, "Not a BCB: %x\n", *(PUSHORT
)PinBcb
);
344 ok_eq_ulong(Buffer
[0x3000 / sizeof(ULONG
)], 0xDEADBABE);
348 Ret
= CcMapData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, MAP_WAIT
, &Bcb
, (PVOID
*)&Buffer
);
349 KmtEndSeh(STATUS_SUCCESS
);
351 if (!skip(Ret
== TRUE
, "CcMapData failed\n"))
353 ok(Bcb
!= PinBcb
, "Returned same BCB!\n");
358 Ret
= CcPinMappedData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, PIN_WAIT
, &NewBcb
);
359 KmtEndSeh(STATUS_SUCCESS
);
361 if (!skip(Ret
== TRUE
, "CcPinMappedData failed\n"))
363 ok(Bcb
!= NewBcb
, "Returned same BCB!\n");
364 ok_eq_pointer(NewBcb
, PinBcb
);
365 ok(*(PUSHORT
)NewBcb
== 0x2FD, "Not a BCB: %x\n", *(PUSHORT
)NewBcb
);
367 /* Previous BCB isn't valid anymore! */
377 else if (TestId
== 2)
379 PTEST_CONTEXT TestContext
;
381 TestContext
= ExAllocatePool(NonPagedPool
, sizeof(TEST_CONTEXT
));
382 if (!skip(TestContext
!= NULL
, "ExAllocatePool failed\n"))
387 Ret
= CcPinRead(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, PIN_WAIT
| PIN_EXCLUSIVE
, &TestContext
->Bcb
, (PVOID
*)&TestContext
->Buffer
);
388 KmtEndSeh(STATUS_SUCCESS
);
390 if (!skip(Ret
== TRUE
, "CcPinRead failed\n"))
392 PKTHREAD ThreadHandle
;
394 ok(*(PUSHORT
)TestContext
->Bcb
== 0x2FD, "Not a BCB: %x\n", *(PUSHORT
)TestContext
->Bcb
);
395 ok_eq_ulong(TestContext
->Buffer
[0x3000 / sizeof(ULONG
)], 0xDEADBABE);
397 TestContext
->Length
= FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
;
398 ThreadHandle
= KmtStartThread(PinInAnotherThreadExclusive
, TestContext
);
399 KmtFinishThread(ThreadHandle
, NULL
);
401 CcUnpinData(TestContext
->Bcb
);
404 ExFreePool(TestContext
);
407 else if (TestId
== 3)
412 Ret
= CcMapData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, MAP_WAIT
, &Bcb
, (PVOID
*)&Buffer
);
413 KmtEndSeh(STATUS_SUCCESS
);
415 if (!skip(Ret
== TRUE
, "CcMapData failed\n"))
419 ok_eq_ulong(Buffer
[0x3000 / sizeof(ULONG
)], 0xDEADBABE);
422 Ret
= CcPinMappedData(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, PIN_IF_BCB
, &PinBcb
);
423 KmtEndSeh(STATUS_SUCCESS
);
425 if (!skip(Ret
== FALSE
, "CcPinMappedData succeed\n"))
427 ok_eq_pointer(Bcb
, PinBcb
);
437 else if (TestId
== 4)
439 PTEST_CONTEXT TestContext
;
441 TestContext
= ExAllocatePool(NonPagedPool
, sizeof(TEST_CONTEXT
));
442 if (!skip(TestContext
!= NULL
, "ExAllocatePool failed\n"))
447 Ret
= CcPinRead(TestFileObject
, &Offset
, FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
, PIN_WAIT
, &TestContext
->Bcb
, (PVOID
*)&TestContext
->Buffer
);
448 KmtEndSeh(STATUS_SUCCESS
);
450 if (!skip(Ret
== TRUE
, "CcPinRead failed\n"))
452 PKTHREAD ThreadHandle
;
454 ok(*(PUSHORT
)TestContext
->Bcb
== 0x2FD, "Not a BCB: %x\n", *(PUSHORT
)TestContext
->Bcb
);
455 ok_eq_ulong(TestContext
->Buffer
[0x3000 / sizeof(ULONG
)], 0xDEADBABE);
457 TestContext
->Length
= FileSizes
.FileSize
.QuadPart
- Offset
.QuadPart
;
458 ThreadHandle
= KmtStartThread(PinInAnotherThread
, TestContext
);
459 KmtFinishThread(ThreadHandle
, NULL
);
461 CcUnpinData(TestContext
->Bcb
);
464 ExFreePool(TestContext
);
477 PDEVICE_OBJECT DeviceObject
)
479 LARGE_INTEGER Zero
= RTL_CONSTANT_LARGE_INTEGER(0LL);
480 CACHE_UNINITIALIZE_EVENT CacheUninitEvent
;
482 ok_eq_pointer(TestDeviceObject
, DeviceObject
);
483 ok_eq_ulong(TestTestId
, TestId
);
485 if (!skip(TestFileObject
!= NULL
, "No test FO\n"))
487 if (CcIsFileCached(TestFileObject
))
489 KeInitializeEvent(&CacheUninitEvent
.Event
, NotificationEvent
, FALSE
);
490 CcUninitializeCacheMap(TestFileObject
, &Zero
, &CacheUninitEvent
);
491 KeWaitForSingleObject(&CacheUninitEvent
.Event
, Executive
, KernelMode
, FALSE
, NULL
);
494 if (TestFileObject
->FsContext
!= NULL
)
496 ExFreePool(TestFileObject
->FsContext
);
497 TestFileObject
->FsContext
= NULL
;
498 TestFileObject
->SectionObjectPointer
= NULL
;
501 ObDereferenceObject(TestFileObject
);
504 TestFileObject
= NULL
;
505 TestDeviceObject
= NULL
;
513 _In_ PDEVICE_OBJECT DeviceObject
,
514 _In_ ULONG ControlCode
,
515 _In_opt_ PVOID Buffer
,
516 _In_ SIZE_T InLength
,
517 _Inout_ PSIZE_T OutLength
)
519 NTSTATUS Status
= STATUS_SUCCESS
;
521 FsRtlEnterFileSystem();
525 case IOCTL_START_TEST
:
526 ok_eq_ulong((ULONG
)InLength
, sizeof(ULONG
));
527 PerformTest(*(PULONG
)Buffer
, DeviceObject
);
530 case IOCTL_FINISH_TEST
:
531 ok_eq_ulong((ULONG
)InLength
, sizeof(ULONG
));
532 CleanupTest(*(PULONG
)Buffer
, DeviceObject
);
536 Status
= STATUS_NOT_IMPLEMENTED
;
540 FsRtlExitFileSystem();
548 _In_ PDEVICE_OBJECT DeviceObject
,
550 _In_ PIO_STACK_LOCATION IoStack
)
556 DPRINT("IRP %x/%x\n", IoStack
->MajorFunction
, IoStack
->MinorFunction
);
557 ASSERT(IoStack
->MajorFunction
== IRP_MJ_READ
);
559 FsRtlEnterFileSystem();
561 Status
= STATUS_NOT_SUPPORTED
;
562 Irp
->IoStatus
.Information
= 0;
564 if (IoStack
->MajorFunction
== IRP_MJ_READ
)
569 LARGE_INTEGER Offset
;
571 Offset
= IoStack
->Parameters
.Read
.ByteOffset
;
572 Length
= IoStack
->Parameters
.Read
.Length
;
574 ok_eq_pointer(DeviceObject
, TestDeviceObject
);
575 ok_eq_pointer(IoStack
->FileObject
, TestFileObject
);
577 ok(FlagOn(Irp
->Flags
, IRP_NOCACHE
), "Not coming from Cc\n");
580 ok((Offset
.QuadPart
% PAGE_SIZE
== 0 || Offset
.QuadPart
== 0), "Offset is not aligned: %I64i\n", Offset
.QuadPart
);
581 ok(Length
% PAGE_SIZE
== 0, "Length is not aligned: %I64i\n", Length
);
583 ok(Irp
->AssociatedIrp
.SystemBuffer
== NULL
, "A SystemBuffer was allocated!\n");
584 Buffer
= MapAndLockUserBuffer(Irp
, Length
);
585 ok(Buffer
!= NULL
, "Null pointer!\n");
586 RtlFillMemory(Buffer
, Length
, 0xBA);
588 Status
= STATUS_SUCCESS
;
589 if (Offset
.QuadPart
<= 0x3000 && Offset
.QuadPart
+ Length
> 0x3000)
591 *(PULONG
)((ULONG_PTR
)Buffer
+ (ULONG_PTR
)(0x3000 - Offset
.QuadPart
)) = 0xDEADBABE;
594 Mdl
= Irp
->MdlAddress
;
595 ok(Mdl
!= NULL
, "Null pointer for MDL!\n");
596 ok((Mdl
->MdlFlags
& MDL_PAGES_LOCKED
) != 0, "MDL not locked\n");
597 ok((Mdl
->MdlFlags
& MDL_SOURCE_IS_NONPAGED_POOL
) == 0, "MDL from non paged\n");
598 ok((Mdl
->MdlFlags
& MDL_IO_PAGE_READ
) != 0, "Non paging IO\n");
599 ok((Irp
->Flags
& IRP_PAGING_IO
) != 0, "Non paging IO\n");
601 Irp
->IoStatus
.Information
= Length
;
604 if (Status
== STATUS_PENDING
)
606 IoMarkIrpPending(Irp
);
607 IoCompleteRequest(Irp
, IO_NO_INCREMENT
);
608 Status
= STATUS_PENDING
;
612 Irp
->IoStatus
.Status
= Status
;
613 IoCompleteRequest(Irp
, IO_NO_INCREMENT
);
616 FsRtlExitFileSystem();