able/windows-nt
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity
windows-nt/Source/XPSP1/NT/base/ntos/fsrtl/tmcb.c

507 lines
13 KiB
C
Raw Normal View History

Add source files
2020-09-26 03:20:57 -05:00
/*++
Copyright (c) 1989 Microsoft Corporation
Module Name:
TMcbSup.c
Abstract:
This module tests the Pinball Map Control Block support routines
Author:
Gary Kimura [GaryKi] 5-Feb-1990
Revision History:
--*/
#include <stdio.h>
#include <string.h>
#include "PbProcs.h"
VOID
PbDumpMcb (
IN PMCB Mcb
);
#ifndef SIMULATOR
ULONG IoInitIncludeDevices;
#endif // SIMULATOR
BOOLEAN McbTest();
int
main(
int argc,
char *argv[]
)
{
extern ULONG IoInitIncludeDevices;
VOID KiSystemStartup();
DbgPrint("sizeof(MCB) = %d\n", sizeof(MCB));
IoInitIncludeDevices = 0; // IOINIT_FATFS |
// IOINIT_PINBALLFS |
// IOINIT_DDFS;
TestFunction = McbTest;
KiSystemStartup();
return( 0 );
}
BOOLEAN
McbTest()
{
BOOLEAN TestAddEntry();
BOOLEAN TestRemoveEntry();
BOOLEAN TestLookupEntry();
BOOLEAN TestGetEntry();
BOOLEAN TestLookupLastEntry();
if (!TestAddEntry()) {
return FALSE;
}
if (!TestRemoveEntry()) {
return FALSE;
}
if (!TestLookupEntry()) {
return FALSE;
}
if (!TestGetEntry()) {
return FALSE;
}
if (!TestLookupLastEntry()) {
return FALSE;
}
return TRUE;
}
BOOLEAN
TestAddEntry()
{
MCB Mcb;
ULONG i;
ULONG Vbn,Lbn,Length;
DbgPrint("\n\n\n>>>> Test PbAddMcbEntry <<<<\n");
//
// Build the following runs
//
// [0-9|10-19][20-29] [40-49]
//
PbInitializeMcb(Mcb, NonPagedPool);
DbgPrint("\nTest 0:|--NewRun--|\n");
if (!PbAddMcbEntry(Mcb, 0, 1000, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest --LastRun--|--NewRun--|\n");
if (!PbAddMcbEntry(Mcb, 10, 1010, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest --LastRun--||--NewRun--|\n");
if (!PbAddMcbEntry(Mcb, 20, 2020, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest --LastRun--| hole |--NewRun--|\n");
if (!PbAddMcbEntry(Mcb, 40, 1040, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest over writing an existing run\n");
if (PbAddMcbEntry(Mcb, 40, 1190, 5)) {DbgPrint("Error\n");return FALSE;}
if (PbAddMcbEntry(Mcb, 25, 1190, 10)) {DbgPrint("Error\n");return FALSE;}
if (PbAddMcbEntry(Mcb, 15, 1190, 10)) {DbgPrint("Error\n");return FALSE;}
PbUninitializeMcb(Mcb);
//
// Build the following runs
//
// [0-9] [30-39][40-49|50-59|60-64] [70-79][80-84] [90-99]
//
PbInitializeMcb(Mcb, NonPagedPool);
DbgPrint("\nTest 0: hole |--NewRun--|\n");
if (!PbAddMcbEntry(Mcb, 90, 1090, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest 0: hole |--NewRun--| hole |--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 50, 1050, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest --PreviousRun--| hole |--NewRun--| hole |--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 70, 1070, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest --PreviousRun--|--NewRun--| hole |--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 60, 1060, 5)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest --PreviousRun--||--NewRun--| hole |--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 80, 1180, 5)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest 0:|--NewRun--| hole |--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 0, 1000, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest --PreviousRun--| hole |--NewRun--|--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 40, 1040, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest --PreviousRun--| hole |--NewRun--||--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 30, 1130, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
PbUninitializeMcb(Mcb);
//
// Build the following runs
//
// [0-9|10-19|20-29][30-39][40-49|50-59|60-69|70-79][80-89|90-99]
//
PbInitializeMcb(Mcb, NonPagedPool);
if (!PbAddMcbEntry(Mcb, 90, 1090, 10)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest 0: hole |--NewRun--|--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 80, 1080, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest 0: hole |--NewRun--||--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 70, 1170, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
if (!PbAddMcbEntry(Mcb, 50, 1150, 10)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest --PreviousRun--|--NewRun--|--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 60, 1160, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
if (!PbAddMcbEntry(Mcb, 30, 1030, 10)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest --PreviousRun--||--NewRun--|--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 40, 1140, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
if (!PbAddMcbEntry(Mcb, 10, 1110, 10)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest --PreviousRun--|--NewRun--||--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 20, 1120, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest 0:|--NewRun--|--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 0, 1100, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
PbUninitializeMcb(Mcb);
//
// Build the following runs
//
// [0-69][80-79|80-89|90-99]
//
PbInitializeMcb(Mcb, NonPagedPool);
if (!PbAddMcbEntry(Mcb, 90, 1090, 10)) {DbgPrint("Error\n");return FALSE;}
if (!PbAddMcbEntry(Mcb, 70, 1070, 10)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest --PreviousRun--||--NewRun--||--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 80, 1010, 10)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
DbgPrint("\nTest 0:|--NewRun--||--FollowingRun--\n");
if (!PbAddMcbEntry(Mcb, 0, 1100, 70)) {DbgPrint("Error\n");return FALSE;}
PbDumpMcb( Mcb );
PbUninitializeMcb(Mcb);
return TRUE;
}
BOOLEAN
TestRemoveEntry()
{
MCB Mcb;
ULONG i;
ULONG Vbn,Lbn,Length;
DbgPrint("\n\n\n>>>> Test PbRemoveMcbEntry <<<<\n");
PbInitializeMcb(Mcb, NonPagedPool);
if (!PbAddMcbEntry(Mcb, 0, 1000, 100)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest --Previous--| Hole\n");
PbRemoveMcbEntry(Mcb, 90, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest --Previous--| Hole |--Following--\n");
PbRemoveMcbEntry(Mcb, 50, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest --Previous--| Hole |--Hole--\n");
PbRemoveMcbEntry(Mcb, 40, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest --hole--| Hole |--Following--\n");
PbRemoveMcbEntry(Mcb, 60, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest --hole--| Hole\n");
PbRemoveMcbEntry(Mcb, 70, 20);
PbDumpMcb( Mcb );
DbgPrint("\nTest 0: Hole |--Following--\n");
PbRemoveMcbEntry(Mcb, 0, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest over remove\n");
PbRemoveMcbEntry(Mcb, 0, 100);
PbDumpMcb( Mcb );
PbUninitializeMcb(Mcb);
PbInitializeMcb(Mcb, NonPagedPool);
if (!PbAddMcbEntry(Mcb, 0, 1000, 100)) {DbgPrint("Error\n");return FALSE;}
PbRemoveMcbEntry(Mcb, 10, 10);
DbgPrint("\nTest 0: Hole |--Hole--\n");
PbRemoveMcbEntry(Mcb, 0, 10);
PbDumpMcb( Mcb );
PbRemoveMcbEntry(Mcb, 30, 10);
DbgPrint("\nTest --Hole--| Hole |--Hole--\n");
PbRemoveMcbEntry(Mcb, 20, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest over remove\n");
PbRemoveMcbEntry(Mcb, 0, 100);
PbDumpMcb( Mcb );
PbUninitializeMcb(Mcb);
PbInitializeMcb(Mcb, NonPagedPool);
if (!PbAddMcbEntry(Mcb, 0, 1000, 100)){DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest 0: Hole\n");
PbRemoveMcbEntry(Mcb, 0, 100);
PbDumpMcb( Mcb );
if (!PbAddMcbEntry(Mcb, 0, 1000, 30)) {DbgPrint("Error\n");return FALSE;}
if (!PbAddMcbEntry(Mcb, 30, 1130, 30)) {DbgPrint("Error\n");return FALSE;}
if (!PbAddMcbEntry(Mcb, 60, 1060, 30)) {DbgPrint("Error\n");return FALSE;}
if (!PbAddMcbEntry(Mcb, 90, 1190, 10)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest --Previous--| Hole |--Index--||--Following--\n");
PbRemoveMcbEntry(Mcb, 30, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest --Hole--| Hole |--Index--||--Following--\n");
PbRemoveMcbEntry(Mcb, 40, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest --Previous--||--Index--| Hole |--Following--\n");
PbRemoveMcbEntry(Mcb, 80, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest --Previous--||--Index--| Hole |--Hole--\n");
PbRemoveMcbEntry(Mcb, 70, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest 0:|--Index--| Hole |--Index--||--Following--\n");
PbRemoveMcbEntry(Mcb, 10, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest over remove\n");
PbRemoveMcbEntry(Mcb, 0, 100);
PbDumpMcb( Mcb );
if (!PbAddMcbEntry(Mcb, 0, 1000, 30)) {DbgPrint("Error\n");return FALSE;}
if (!PbAddMcbEntry(Mcb, 30, 1130, 30)) {DbgPrint("Error\n");return FALSE;}
if (!PbAddMcbEntry(Mcb, 60, 1060, 30)) {DbgPrint("Error\n");return FALSE;}
if (!PbAddMcbEntry(Mcb, 90, 1190, 10)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest --Previous--||--Index--| Hole |--Index--||--Following--\n");
PbRemoveMcbEntry(Mcb, 40, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest 0:|--Index--| Hole |--Following--\n");
PbRemoveMcbEntry(Mcb, 20, 10);
PbDumpMcb( Mcb );
DbgPrint("\nTest --Previous--||--Index--| Hole\n");
PbRemoveMcbEntry(Mcb, 80, 20);
PbDumpMcb( Mcb );
DbgPrint("\nTest over remove\n");
PbRemoveMcbEntry(Mcb, 0, 100);
PbDumpMcb( Mcb );
if (!PbAddMcbEntry(Mcb, 0, 1000, 100)){DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest 0:--Index--| Hole\n");
PbRemoveMcbEntry(Mcb, 50, 50);
PbDumpMcb( Mcb );
DbgPrint("\nTest over remove\n");
PbRemoveMcbEntry(Mcb, 0, 100);
PbDumpMcb( Mcb );
if (!PbAddMcbEntry(Mcb, 0, 1000, 50)) {DbgPrint("Error\n");return FALSE;}
if (!PbAddMcbEntry(Mcb, 50, 1150, 50)) {DbgPrint("Error\n");return FALSE;}
DbgPrint("\nTest 0: hole |--Index--||--Following--\n");
PbRemoveMcbEntry(Mcb, 0, 20);
PbDumpMcb( Mcb );
PbUninitializeMcb(Mcb);
return TRUE;
}
BOOLEAN
TestLookupEntry()
{
MCB Mcb;
ULONG i;
ULONG Vbn,Lbn,Length;
DbgPrint("\n\n\n>>>> Test PbLookupMcbEntry <<<<\n");
PbInitializeMcb(Mcb, NonPagedPool);
for (i = 0; i < 100; i += 30) {
if (!PbAddMcbEntry(Mcb, i, 1000+i, 10))
{DbgPrint("Add1Error\n");return FALSE;}
}
for (i = 10; i < 100; i += 30) {
if (!PbAddMcbEntry(Mcb, i, 1100+i, 10))
{DbgPrint("Add2Error\n");return FALSE;}
}
PbDumpMcb( Mcb );
for (i = 0; i < 100; i += 30) {
if (!PbLookupMcbEntry(Mcb,i,&Lbn,&Length))
{DbgPrint("Lookup1Error %d\n", i);return FALSE;}
if ((Lbn != 1000+i) || (Length != 10))
{DbgPrint("Result1Error %d, %d, %d\n", i, Lbn, Length);return FALSE;}
if (!PbLookupMcbEntry(Mcb,i+5,&Lbn,&Length))
{DbgPrint("Lookup2Error %d\n", i);return FALSE;}
if ((Lbn != 1000+i+5) || (Length != 5))
{DbgPrint("Result2Error %d, %d, %d\n", i, Lbn, Length);return FALSE;}
}
for (i = 20; i < 100; i += 30) {
if (!PbLookupMcbEntry(Mcb,i,&Lbn,&Length))
{DbgPrint("Lookup3Error %d\n", i);return FALSE;}
if ((Lbn != 0) || (Length != 10))
{DbgPrint("Result3Error %d, %d, %d\n", i, Lbn, Length);return FALSE;}
if (!PbLookupMcbEntry(Mcb,i+5,&Lbn,&Length))
{DbgPrint("Lookup4Error %d\n", i);return FALSE;}
if ((Lbn != 0) || (Length != 5)) {
DbgPrint("Result4Error %d", i+5);
DbgPrint(", %08lx", Lbn);
DbgPrint(", %08lx\n", Length);
return FALSE;
}
}
PbUninitializeMcb(Mcb);
return TRUE;
}
BOOLEAN
TestGetEntry()
{
MCB Mcb;
ULONG i;
ULONG Vbn,Lbn,Length;
DbgPrint("\n\n\n>>>> TestPbNumberOfRunsInMcb <<<<\n");
PbInitializeMcb(Mcb, NonPagedPool);
for (i = 0; i < 100; i += 30) {
if (!PbAddMcbEntry(Mcb, i, 1000+i, 10))
{DbgPrint("Add1Error\n");return FALSE;}
}
for (i = 10; i < 100; i += 30) {
if (!PbAddMcbEntry(Mcb, i, 1100+i, 10))
{DbgPrint("Add2Error\n");return FALSE;}
}
PbDumpMcb( Mcb );
i = PbNumberOfRunsInMcb(Mcb);
if (i != 10) {DbgPrint("Error\n");return FALSE;}
for (i = 0; i < 10; i += 1) {
if (!PbGetNextMcbEntry(Mcb,i,&Vbn,&Lbn,&Length))
{DbgPrint("Error\n");return FALSE;}
DbgPrint("%d", i);
DbgPrint(", %ld", Vbn);
DbgPrint(", %ld", Lbn);
DbgPrint(", %ld\n", Length);
}
PbUninitializeMcb(Mcb);
return TRUE;
}
BOOLEAN
TestLookupLastEntry()
{
MCB Mcb;
ULONG i;
ULONG Vbn,Lbn,Length;
DbgPrint("\n\n\n>>>> Test PbLookupLastMcbEntry <<<<\n");
PbInitializeMcb(Mcb, NonPagedPool);
if (!PbAddMcbEntry(Mcb, 0, 1000, 100)) {DbgPrint("Error\n");return FALSE;}
if (!PbLookupLastMcbEntry(Mcb, &Vbn, &Lbn)) {DbgPrint("Error\n");return FALSE;}
if ((Vbn != 99) && (Lbn != 1099)) {DbgPrint("Lookup Error\n");return FALSE;}
PbUninitializeMcb(Mcb);
return TRUE;
}
Reference in a new issue Copy permalink