607 lines
16 KiB
C
607 lines
16 KiB
C
|
#include "brian.h"
|
|||
|
|
|||
|
typedef struct _ASYNC_WRITE {
|
|||
|
|
|||
|
USHORT FileIndex;
|
|||
|
BOOLEAN UseEvent;
|
|||
|
PIO_APC_ROUTINE ApcRoutine;
|
|||
|
PVOID ApcContext;
|
|||
|
PUSHORT BufferIndexPtr;
|
|||
|
USHORT BufferIndex;
|
|||
|
ULONG Length;
|
|||
|
PLARGE_INTEGER ByteOffsetPtr;
|
|||
|
LARGE_INTEGER ByteOffset;
|
|||
|
PULONG KeyPtr;
|
|||
|
ULONG Key;
|
|||
|
BOOLEAN DisplayParms;
|
|||
|
BOOLEAN VerboseResults;
|
|||
|
USHORT AsyncIndex;
|
|||
|
|
|||
|
} ASYNC_WRITE, *PASYNC_WRITE;
|
|||
|
|
|||
|
#define USE_EVENT_DEFAULT TRUE
|
|||
|
#define APC_ROUTINE_DEFAULT NULL
|
|||
|
#define APC_CONTEXT_DEFAULT NULL
|
|||
|
#define WRITE_LENGTH_DEFAULT 100L
|
|||
|
#define DISPLAY_PARMS_DEFAULT FALSE
|
|||
|
#define VERBOSE_RESULTS_DEFAULT FALSE
|
|||
|
|
|||
|
VOID
|
|||
|
FullWrite(
|
|||
|
IN OUT PASYNC_WRITE AsyncWrite
|
|||
|
);
|
|||
|
|
|||
|
|
|||
|
VOID
|
|||
|
InputWrite(
|
|||
|
IN PCHAR ParamBuffer
|
|||
|
)
|
|||
|
{
|
|||
|
ULONG FileIndex;
|
|||
|
BOOLEAN UseEvent;
|
|||
|
PIO_APC_ROUTINE ApcRoutine;
|
|||
|
PVOID ApcContext;
|
|||
|
PUSHORT BufferIndexPtr;
|
|||
|
USHORT BufferIndex;
|
|||
|
ULONG Length;
|
|||
|
PLARGE_INTEGER ByteOffsetPtr;
|
|||
|
LARGE_INTEGER ByteOffset;
|
|||
|
PULONG KeyPtr;
|
|||
|
ULONG Key;
|
|||
|
BOOLEAN DisplayParms;
|
|||
|
BOOLEAN VerboseResults;
|
|||
|
USHORT AsyncIndex;
|
|||
|
|
|||
|
ULONG TempIndex;
|
|||
|
BOOLEAN ParamReceived;
|
|||
|
BOOLEAN LastInput;
|
|||
|
BOOLEAN BufferReceived;
|
|||
|
|
|||
|
//
|
|||
|
// Set the defaults.
|
|||
|
//
|
|||
|
|
|||
|
UseEvent = USE_EVENT_DEFAULT;
|
|||
|
ApcRoutine = APC_ROUTINE_DEFAULT;
|
|||
|
ApcContext = APC_CONTEXT_DEFAULT;
|
|||
|
BufferIndexPtr = NULL;
|
|||
|
BufferIndex = 0;
|
|||
|
Length = WRITE_LENGTH_DEFAULT;
|
|||
|
ByteOffsetPtr = NULL;
|
|||
|
ByteOffset = RtlConvertUlongToLargeInteger( 0L );
|
|||
|
KeyPtr = NULL;
|
|||
|
Key = 0;
|
|||
|
DisplayParms = DISPLAY_PARMS_DEFAULT;
|
|||
|
VerboseResults = VERBOSE_RESULTS_DEFAULT;
|
|||
|
AsyncIndex = 0;
|
|||
|
|
|||
|
BufferReceived = FALSE;
|
|||
|
ParamReceived = FALSE;
|
|||
|
LastInput = TRUE;
|
|||
|
|
|||
|
//
|
|||
|
// While there is more input, analyze the parameter and update the
|
|||
|
// query flags.
|
|||
|
//
|
|||
|
|
|||
|
while (TRUE) {
|
|||
|
|
|||
|
ULONG DummyCount;
|
|||
|
|
|||
|
//
|
|||
|
// Swallow leading white spaces.
|
|||
|
//
|
|||
|
ParamBuffer = SwallowWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
if (*ParamBuffer) {
|
|||
|
|
|||
|
//
|
|||
|
// If the next parameter is legal then check the paramter value.
|
|||
|
// Update the parameter value.
|
|||
|
//
|
|||
|
if ((*ParamBuffer == '-'
|
|||
|
|| *ParamBuffer == '/')
|
|||
|
&& (ParamBuffer++, *ParamBuffer != '\0')) {
|
|||
|
|
|||
|
//
|
|||
|
// Switch on the next character.
|
|||
|
//
|
|||
|
|
|||
|
switch (*ParamBuffer) {
|
|||
|
|
|||
|
//
|
|||
|
// Update the buffer index.
|
|||
|
//
|
|||
|
case 'b' :
|
|||
|
case 'B' :
|
|||
|
|
|||
|
//
|
|||
|
// Move to the next character, as long as there
|
|||
|
// are no white spaces continue analyzing letters.
|
|||
|
// On the first bad letter, skip to the next
|
|||
|
// parameter.
|
|||
|
//
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
TempIndex = AsciiToInteger( ParamBuffer );
|
|||
|
BufferIndex = (USHORT) TempIndex;
|
|||
|
BufferIndexPtr = &BufferIndex;
|
|||
|
|
|||
|
ParamBuffer = SwallowNonWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
BufferReceived = TRUE;
|
|||
|
break;
|
|||
|
|
|||
|
//
|
|||
|
// Update the byte count.
|
|||
|
//
|
|||
|
|
|||
|
case 'l' :
|
|||
|
case 'L' :
|
|||
|
|
|||
|
//
|
|||
|
// Move to the next character, as long as there
|
|||
|
// are no white spaces continue analyzing letters.
|
|||
|
// On the first bad letter, skip to the next
|
|||
|
// parameter.
|
|||
|
//
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
Length = AsciiToInteger( ParamBuffer );
|
|||
|
|
|||
|
ParamBuffer = SwallowNonWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
//
|
|||
|
// Update the file handle index.
|
|||
|
//
|
|||
|
|
|||
|
case 'i' :
|
|||
|
case 'I' :
|
|||
|
|
|||
|
//
|
|||
|
// Move to the next character, as long as there
|
|||
|
// are no white spaces continue analyzing letters.
|
|||
|
// On the first bad letter, skip to the next
|
|||
|
// parameter.
|
|||
|
//
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
FileIndex = AsciiToInteger( ParamBuffer );
|
|||
|
|
|||
|
ParamBuffer = SwallowNonWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
ParamReceived = TRUE;
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
//
|
|||
|
// Update the key value.
|
|||
|
//
|
|||
|
|
|||
|
case 'k' :
|
|||
|
case 'K' :
|
|||
|
|
|||
|
//
|
|||
|
// Move to the next character, as long as there
|
|||
|
// are no white spaces continue analyzing letters.
|
|||
|
// On the first bad letter, skip to the next
|
|||
|
// parameter.
|
|||
|
//
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
Key = AsciiToInteger( ParamBuffer );
|
|||
|
KeyPtr = &Key;
|
|||
|
|
|||
|
ParamBuffer = SwallowNonWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
//
|
|||
|
// Update the offset of the transfer.
|
|||
|
//
|
|||
|
|
|||
|
case 'o' :
|
|||
|
case 'O' :
|
|||
|
|
|||
|
//
|
|||
|
// Move to the next character, as long as there
|
|||
|
// are no white spaces continue analyzing letters.
|
|||
|
// On the first bad letter, skip to the next
|
|||
|
// parameter.
|
|||
|
//
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
ByteOffset.QuadPart = AsciiToLargeInteger( ParamBuffer );
|
|||
|
ByteOffsetPtr = &ByteOffset;
|
|||
|
|
|||
|
ParamBuffer = SwallowNonWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
//
|
|||
|
// Check whether we should use an event to signal
|
|||
|
// completion.
|
|||
|
//
|
|||
|
|
|||
|
case 'e' :
|
|||
|
case 'E' :
|
|||
|
|
|||
|
//
|
|||
|
// Legal values for use event are T/t or F/f.
|
|||
|
//
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
if (*ParamBuffer == 'T'
|
|||
|
|| *ParamBuffer == 't') {
|
|||
|
|
|||
|
UseEvent = TRUE;
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
} else if (*ParamBuffer == 'F'
|
|||
|
|| *ParamBuffer == 'f') {
|
|||
|
|
|||
|
UseEvent = FALSE;
|
|||
|
ParamBuffer++;
|
|||
|
}
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
case 'v' :
|
|||
|
case 'V' :
|
|||
|
|
|||
|
//
|
|||
|
// Legal values for params are T/t or F/f.
|
|||
|
//
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
if( *ParamBuffer == 'T'
|
|||
|
|| *ParamBuffer == 't' ) {
|
|||
|
|
|||
|
VerboseResults = TRUE;
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
} else if( *ParamBuffer == 'F'
|
|||
|
|| *ParamBuffer == 'f' ) {
|
|||
|
|
|||
|
VerboseResults = FALSE;
|
|||
|
ParamBuffer++;
|
|||
|
|
|||
|
}
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
case 'y' :
|
|||
|
case 'Y' :
|
|||
|
|
|||
|
//
|
|||
|
// Set the display parms flag and jump over this
|
|||
|
// character.
|
|||
|
//
|
|||
|
DisplayParms = TRUE;
|
|||
|
ParamBuffer = SwallowNonWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
case 'z' :
|
|||
|
case 'Z' :
|
|||
|
|
|||
|
//
|
|||
|
// Set flag for more input and jump over this char.
|
|||
|
//
|
|||
|
LastInput = FALSE;
|
|||
|
ParamBuffer = SwallowNonWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
default :
|
|||
|
|
|||
|
//
|
|||
|
// Swallow to the next white space and continue the
|
|||
|
// loop.
|
|||
|
//
|
|||
|
ParamBuffer = SwallowNonWhite( ParamBuffer, &DummyCount );
|
|||
|
|
|||
|
}
|
|||
|
|
|||
|
}
|
|||
|
|
|||
|
//
|
|||
|
// Else the text is invalid, skip the entire block.
|
|||
|
//
|
|||
|
//
|
|||
|
|
|||
|
//
|
|||
|
// Else if there is no input then exit.
|
|||
|
//
|
|||
|
} else if( LastInput ) {
|
|||
|
|
|||
|
break;
|
|||
|
|
|||
|
//
|
|||
|
// Else try to write another line for open parameters.
|
|||
|
//
|
|||
|
} else {
|
|||
|
|
|||
|
|
|||
|
|
|||
|
}
|
|||
|
|
|||
|
}
|
|||
|
|
|||
|
//
|
|||
|
// If no parameters were received then display the syntax message.
|
|||
|
//
|
|||
|
if (!ParamReceived && !BufferReceived) {
|
|||
|
|
|||
|
printf( "\n Usage: wr [options]* -i<index> [options]*\n" );
|
|||
|
printf( "\n Options:" );
|
|||
|
printf( "\n -i<digits> File index" );
|
|||
|
printf( "\n -l<digits> Write length" );
|
|||
|
printf( "\n -b<digits> Buffer index" );
|
|||
|
printf( "\n -k<digits> Locked bytes key value" );
|
|||
|
printf( "\n -o<digits> Start offset to write" );
|
|||
|
printf( "\n -e[t|f] Use event on completion" );
|
|||
|
printf( "\n -v[t|f] Verbose results" );
|
|||
|
printf( "\n -y Display parameters to query" );
|
|||
|
printf( "\n -z Additional input line" );
|
|||
|
printf( "\n\n" );
|
|||
|
|
|||
|
//
|
|||
|
// Else call our write routine.
|
|||
|
//
|
|||
|
|
|||
|
} else {
|
|||
|
|
|||
|
NTSTATUS Status;
|
|||
|
SIZE_T RegionSize;
|
|||
|
ULONG TempIndex;
|
|||
|
|
|||
|
PASYNC_WRITE AsyncWrite;
|
|||
|
|
|||
|
HANDLE ThreadHandle;
|
|||
|
ULONG ThreadId;
|
|||
|
|
|||
|
RegionSize = sizeof( ASYNC_WRITE );
|
|||
|
|
|||
|
Status = AllocateBuffer( 0, &RegionSize, &TempIndex );
|
|||
|
AsyncIndex = (USHORT) TempIndex;
|
|||
|
|
|||
|
if (!NT_SUCCESS( Status )) {
|
|||
|
|
|||
|
printf("\n\tInputWrite: Unable to allocate async structure" );
|
|||
|
|
|||
|
} else {
|
|||
|
|
|||
|
AsyncWrite = (PASYNC_WRITE) Buffers[AsyncIndex].Buffer;
|
|||
|
|
|||
|
AsyncWrite->FileIndex = (USHORT) FileIndex;
|
|||
|
AsyncWrite->UseEvent = UseEvent;
|
|||
|
AsyncWrite->ApcRoutine = ApcRoutine;
|
|||
|
AsyncWrite->ApcContext = ApcContext;
|
|||
|
AsyncWrite->BufferIndex = BufferIndex;
|
|||
|
AsyncWrite->BufferIndexPtr = BufferIndexPtr
|
|||
|
? &AsyncWrite->BufferIndex
|
|||
|
: BufferIndexPtr;
|
|||
|
AsyncWrite->Length = Length;
|
|||
|
AsyncWrite->ByteOffset = ByteOffset;
|
|||
|
AsyncWrite->ByteOffsetPtr = ByteOffsetPtr
|
|||
|
? &AsyncWrite->ByteOffset
|
|||
|
: ByteOffsetPtr;
|
|||
|
AsyncWrite->Key = Key;
|
|||
|
AsyncWrite->KeyPtr = KeyPtr
|
|||
|
? &AsyncWrite->Key
|
|||
|
: KeyPtr;
|
|||
|
AsyncWrite->DisplayParms = DisplayParms;
|
|||
|
AsyncWrite->VerboseResults = VerboseResults;
|
|||
|
AsyncWrite->AsyncIndex = AsyncIndex;
|
|||
|
|
|||
|
if (!SynchronousCmds) {
|
|||
|
ThreadHandle = CreateThread( NULL,
|
|||
|
0,
|
|||
|
FullWrite,
|
|||
|
AsyncWrite,
|
|||
|
0,
|
|||
|
&ThreadId );
|
|||
|
|
|||
|
if (ThreadHandle == 0) {
|
|||
|
|
|||
|
printf( "\nInputWrite: Spawning thread fails -> %d\n", GetLastError() );
|
|||
|
return;
|
|||
|
}
|
|||
|
} else {
|
|||
|
|
|||
|
FullWrite( AsyncWrite );
|
|||
|
}
|
|||
|
}
|
|||
|
}
|
|||
|
return;
|
|||
|
}
|
|||
|
|
|||
|
|
|||
|
VOID
|
|||
|
FullWrite(
|
|||
|
IN OUT PASYNC_WRITE AsyncWrite
|
|||
|
)
|
|||
|
{
|
|||
|
NTSTATUS Status;
|
|||
|
IO_STATUS_BLOCK Iosb;
|
|||
|
|
|||
|
HANDLE ThisEvent;
|
|||
|
USHORT ThisEventIndex;
|
|||
|
USHORT ThisBufferIndex;
|
|||
|
|
|||
|
BOOLEAN UnwindWriteBuffer = FALSE;
|
|||
|
BOOLEAN UnwindEvent = FALSE;
|
|||
|
|
|||
|
Status = STATUS_SUCCESS;
|
|||
|
|
|||
|
if (AsyncWrite->DisplayParms) {
|
|||
|
|
|||
|
bprint "\nWrite Parameters" );
|
|||
|
bprint "\n File Handle Index -> %d", AsyncWrite->FileIndex );
|
|||
|
bprint "\n UseEvent -> %d", AsyncWrite->UseEvent );
|
|||
|
bprint "\n ApcRoutine -> %08lx", AsyncWrite->ApcRoutine );
|
|||
|
bprint "\n ApcContext -> %08lx", AsyncWrite->ApcContext );
|
|||
|
bprint "\n Buffer Index Ptr -> %08lx", AsyncWrite->BufferIndexPtr );
|
|||
|
if (AsyncWrite->BufferIndexPtr) {
|
|||
|
|
|||
|
bprint "\n BufferIndex value -> %04x", AsyncWrite->BufferIndex );
|
|||
|
}
|
|||
|
|
|||
|
bprint "\n Length -> %08lx", AsyncWrite->Length );
|
|||
|
|
|||
|
bprint "\n Byte Offset -> %08lx", AsyncWrite->ByteOffsetPtr );
|
|||
|
if ( AsyncWrite->ByteOffsetPtr ) {
|
|||
|
|
|||
|
bprint "\n Byte Offset High -> %08lx", AsyncWrite->ByteOffset.HighPart );
|
|||
|
bprint "\n Byte Offset Low -> %08lx", AsyncWrite->ByteOffset.LowPart );
|
|||
|
}
|
|||
|
|
|||
|
bprint "\n Key Ptr -> %08lx", AsyncWrite->KeyPtr );
|
|||
|
|
|||
|
if (AsyncWrite->KeyPtr) {
|
|||
|
|
|||
|
bprint "\n Key -> %ul", AsyncWrite->Key );
|
|||
|
}
|
|||
|
|
|||
|
bprint "\n\n" );
|
|||
|
}
|
|||
|
|
|||
|
try {
|
|||
|
|
|||
|
SIZE_T ThisLength;
|
|||
|
|
|||
|
//
|
|||
|
// If we need a buffer, allocate it now.
|
|||
|
//
|
|||
|
|
|||
|
if (AsyncWrite->BufferIndexPtr == NULL) {
|
|||
|
|
|||
|
ULONG TempIndex;
|
|||
|
|
|||
|
ThisLength = AsyncWrite->Length;
|
|||
|
|
|||
|
Status = AllocateBuffer( 0L, &ThisLength, &TempIndex );
|
|||
|
|
|||
|
ThisBufferIndex = (USHORT) TempIndex;
|
|||
|
|
|||
|
if (!NT_SUCCESS( Status )) {
|
|||
|
|
|||
|
bprint "\n\tFullWrite: Unable to allocate a Write buffer" );
|
|||
|
try_return( Status );
|
|||
|
}
|
|||
|
|
|||
|
bprint "\n\tFullWrite: Writeing into buffer -> %04x", ThisBufferIndex );
|
|||
|
|
|||
|
UnwindWriteBuffer = TRUE;
|
|||
|
|
|||
|
} else {
|
|||
|
|
|||
|
ThisBufferIndex = AsyncWrite->BufferIndex;
|
|||
|
}
|
|||
|
|
|||
|
//
|
|||
|
// Check that the buffer index is valid.
|
|||
|
//
|
|||
|
|
|||
|
if (ThisBufferIndex >= MAX_BUFFERS) {
|
|||
|
|
|||
|
bprint "\n\tFullWrite: The Write buffer index is invalid" );
|
|||
|
try_return( Status = STATUS_INVALID_HANDLE );
|
|||
|
}
|
|||
|
|
|||
|
//
|
|||
|
// Check that the file index is valid.
|
|||
|
//
|
|||
|
|
|||
|
if (AsyncWrite->FileIndex >= MAX_HANDLES) {
|
|||
|
|
|||
|
bprint "\n\tFullWrite: The file index is invalid" );
|
|||
|
try_return( Status = STATUS_INVALID_HANDLE );
|
|||
|
}
|
|||
|
|
|||
|
//
|
|||
|
// If we need an event, allocate and set it now.
|
|||
|
//
|
|||
|
|
|||
|
if (AsyncWrite->UseEvent == TRUE) {
|
|||
|
|
|||
|
Status = ObtainEvent( &ThisEventIndex );
|
|||
|
|
|||
|
if (!NT_SUCCESS( Status )) {
|
|||
|
|
|||
|
bprint "\n\tFullWrite: Unable to allocate an event" );
|
|||
|
try_return( Status );
|
|||
|
}
|
|||
|
|
|||
|
UnwindEvent = TRUE;
|
|||
|
ThisEvent = Events[ThisEventIndex].Handle;
|
|||
|
|
|||
|
} else {
|
|||
|
|
|||
|
ThisEvent = 0;
|
|||
|
}
|
|||
|
|
|||
|
//
|
|||
|
// Call the write routine.
|
|||
|
//
|
|||
|
|
|||
|
Status = NtWriteFile( Handles[AsyncWrite->FileIndex].Handle,
|
|||
|
ThisEvent,
|
|||
|
AsyncWrite->ApcRoutine,
|
|||
|
AsyncWrite->ApcContext,
|
|||
|
&Iosb,
|
|||
|
Buffers[ThisBufferIndex].Buffer,
|
|||
|
AsyncWrite->Length,
|
|||
|
AsyncWrite->ByteOffsetPtr,
|
|||
|
AsyncWrite->KeyPtr );
|
|||
|
|
|||
|
UnwindWriteBuffer = FALSE;
|
|||
|
|
|||
|
if (AsyncWrite->VerboseResults) {
|
|||
|
|
|||
|
bprint "\nWriteFIle: Status -> %08lx", Status );
|
|||
|
|
|||
|
if (AsyncWrite->UseEvent && NT_SUCCESS( Status )) {
|
|||
|
|
|||
|
if ((Status = NtWaitForSingleObject( ThisEvent,
|
|||
|
FALSE,
|
|||
|
NULL )) != STATUS_SUCCESS) {
|
|||
|
|
|||
|
bprint "\n\tWriteFile: Wait for event failed -> %08lx", Status );
|
|||
|
bprint "\n" );
|
|||
|
try_return( Status );
|
|||
|
}
|
|||
|
}
|
|||
|
|
|||
|
if (NT_SUCCESS( Status )) {
|
|||
|
|
|||
|
bprint "\n Iosb.Information -> %08lx", Iosb.Information );
|
|||
|
bprint "\n Iosb.Status -> %08lx", Iosb.Status );
|
|||
|
}
|
|||
|
bprint "\n" );
|
|||
|
}
|
|||
|
|
|||
|
try_return( Status );
|
|||
|
|
|||
|
try_exit: NOTHING;
|
|||
|
} finally {
|
|||
|
|
|||
|
if (UnwindWriteBuffer) {
|
|||
|
|
|||
|
DeallocateBuffer( ThisBufferIndex );
|
|||
|
}
|
|||
|
|
|||
|
if (UnwindEvent) {
|
|||
|
|
|||
|
FreeEvent( ThisEventIndex );
|
|||
|
}
|
|||
|
|
|||
|
DeallocateBuffer( AsyncWrite->AsyncIndex );
|
|||
|
}
|
|||
|
|
|||
|
NtTerminateThread( 0, STATUS_SUCCESS );
|
|||
|
}
|