mirror of https://github.com/tongzx/nt5src
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
2312 lines
45 KiB
2312 lines
45 KiB
/*++
|
|
|
|
Copyright (c) 1990 Microsoft Corporation
|
|
|
|
Module Name:
|
|
|
|
Argument
|
|
|
|
Abstract:
|
|
|
|
Argument processing for the MODE utility.
|
|
|
|
The functions in this file:
|
|
|
|
1.- Parse the MODE command line.
|
|
2.- Perform some basic argument validation.
|
|
3.- Make a request packet that will be eventually routed to a
|
|
device handler.
|
|
|
|
|
|
Author:
|
|
|
|
Ramon Juan San Andres (ramonsa) 26-Jun-1991
|
|
|
|
Notes:
|
|
|
|
Due to the complexity of the MODE command line, and the fact that
|
|
we have to support both the DOS5 syntax (tagged parameters) and
|
|
the old DOS syntax (positional parameters), MODE does not use
|
|
the standard ULIB argument parsing. MODE does its own parsing
|
|
instead.
|
|
|
|
The mode command-line can take any of the following forms:
|
|
|
|
MODE [/?]
|
|
|
|
MODE [device] [/STATUS]
|
|
|
|
MODE device cp PREPARE=string
|
|
|
|
MODE device cp REFRESH
|
|
|
|
MODE device cp SELECT=codepage
|
|
|
|
MODE device cp [/STATUS]
|
|
|
|
MODE LPTn[:] [c][,l][,r]]
|
|
|
|
MODE LPTn[:] [COLS=c] [LINES=l] [RETRY=r]
|
|
|
|
MODE LPTn[:]=COMm[:]
|
|
|
|
MODE COMm[:] [b[,p[,d[,s[,r]]]]]
|
|
|
|
MODE COMm[:] [BAUD=b] [PARITY=p] [DATA=d] [STOP=s] [RETRY=r]
|
|
[to=on|off] [xon=on|off] [odsr=on|off] [octs=on|off]
|
|
|
|
MODE [c[,l]]
|
|
|
|
MODE CON[:] [COLS=c] [LINES=l]
|
|
|
|
MODE CON[:] [RATE=r DELAY=d]
|
|
|
|
|
|
where:
|
|
|
|
|
|
device := LPTn[:] | COMm[:] | CON[:]
|
|
cp := CP | CODEPAGE
|
|
|
|
|
|
|
|
The argument parsing of MODE does a syntax-directed translation of
|
|
the command line into a request packet. The translation is based on
|
|
the following language. Note that some terminal symbols (in uppercase)
|
|
might be language dependent.
|
|
|
|
|
|
mode := MODE { statusline | lptline | comline | conline | videoline }
|
|
|
|
statusline := /STA*
|
|
|
|
lptline := lptdev { lptredir | lptsetold | lptsetnew | lptcp | lptstatus }
|
|
lptred := =comdev
|
|
lptset := { n[,n][,c] | [COLS=n] [LINES=n] [RETRY=c] }
|
|
lptcp := cpstuff
|
|
lptstatus := { /STA* | }
|
|
|
|
comline := comdev { comset | comstatus }
|
|
comset := { n[,c[,n[,f[,c]]]] | [BAUD=n] [PARITY=c] [DATA=n] [STOP=f] [RETRY=c] }
|
|
[to=on|off] [xon=on|off] [odsr=on|off] [octs=on|off]
|
|
comstatus := { /STA* | }
|
|
|
|
conline := condev { conrc | contyp | concp | constatus }
|
|
conrc := [COLS=n] [LINES=n]
|
|
contyp := RATE=n DELAY=n
|
|
concp := cpstuff
|
|
constatus := { /STA* | }
|
|
|
|
videoline := n[,n]
|
|
|
|
cpstuff := cp { prepare | refresh | select | cpstatus}
|
|
cp := CP | CODEPAGE
|
|
prepare := PREPARE=*
|
|
refresh := REFRESH
|
|
select := SELECT=n
|
|
cpstatus := { /STA* | }
|
|
|
|
comdev := COMn[:]
|
|
lptdev := LPTn[:]
|
|
condev := CON[:]
|
|
|
|
n := Integer number
|
|
f := floating point number
|
|
c := character
|
|
|
|
|
|
|
|
The functions in this file parse the language shown above. Most of
|
|
the functions have names that correspond to non-terminal symbols in
|
|
the language.
|
|
|
|
|
|
There are 3 main functions used for reading the command line:
|
|
|
|
Match() - This function matches a pattern against whatever
|
|
is in the command line at the current position.
|
|
|
|
Note that this does not advance our current position
|
|
within the command line.
|
|
|
|
If the pattern has a magic character, then the
|
|
variables MatchBegin and MatchEnd delimit the
|
|
substring of the command line that matched that
|
|
magic character.
|
|
|
|
|
|
Advance() - This functions advances our current position within
|
|
the command line. The amount by which the position
|
|
is advanced is determined by the the last Match().
|
|
|
|
|
|
EndOfInput()- Returns TRUE if the command line has been consumed.
|
|
|
|
|
|
|
|
e.g. If the command line has the string "MODE COM1: 1200"
|
|
|
|
This is what the following sequence would do
|
|
|
|
Match( "*" ); // TRUE (matches "MODE")
|
|
Advance();
|
|
|
|
//
|
|
// Note that Match() does not advance our position
|
|
//
|
|
MATCH( "LPT" ); // FALSE (no match)
|
|
MATCH( "COM#" ); // TRUE (matches "COM" )
|
|
//
|
|
// At this point, MatchBegin and MatchEnd delimit the
|
|
// substring "1"
|
|
//
|
|
MATCH( "FOO" ); // FALSE (no match)
|
|
|
|
MATCH( "C*" ); // TRUE (matches "COM1:");
|
|
//
|
|
// At this point, MatchBegin and MatchEnd delimit the
|
|
// substring "OM1:"
|
|
//
|
|
Advance();
|
|
|
|
Match( "#" ); // TRUE (matches "1200");
|
|
Advance();
|
|
|
|
EndOfInput(); // TRUE
|
|
|
|
|
|
|
|
Revision History:
|
|
|
|
|
|
--*/
|
|
|
|
|
|
#include "mode.hxx"
|
|
#include "common.hxx"
|
|
#include "lpt.hxx"
|
|
#include "com.hxx"
|
|
#include "cons.hxx"
|
|
|
|
|
|
extern "C" {
|
|
|
|
#include <ctype.h>
|
|
#include <string.h>
|
|
|
|
}
|
|
|
|
|
|
//
|
|
//Static data
|
|
//
|
|
PWSTRING CmdLine; // The command line
|
|
CHNUM CharIndex; // Index of current character
|
|
CHNUM AdvanceIndex; // Index of next parameter
|
|
CHNUM ParmIndex; // Index of current parameter
|
|
CHNUM MatchBegin; // First index of match
|
|
CHNUM MatchEnd; // Last index of match
|
|
|
|
//
|
|
// Patterns.
|
|
//
|
|
// Most patterns contain terminal symbols. Certain characters in a
|
|
// pattern have a magic meaning:
|
|
//
|
|
// '*' Matches everything up to the end of the parameter (parameters are
|
|
// delimited by blank space).
|
|
//
|
|
// '#' Matches a sequence of digits
|
|
//
|
|
// '@' Matches a single character
|
|
//
|
|
// '[' Starts an optional sequence. If the first character in the
|
|
// the sequence matches, then all the sequence should match. If
|
|
// the first character in the sequence does not match, then the
|
|
// sequence is skipped.
|
|
//
|
|
// ']' End of optional sequence
|
|
//
|
|
//
|
|
|
|
|
|
//
|
|
// Prototypoes
|
|
//
|
|
|
|
PREQUEST_HEADER
|
|
LptLine (
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
LptRedir (
|
|
IN ULONG DeviceNumber
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
LptSet (
|
|
IN ULONG DeviceNumber
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
LptCp (
|
|
IN ULONG DeviceNumber
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
ComLine (
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
ComSet (
|
|
IN ULONG DeviceNumber
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
ConLine (
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
ConRc (
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
ConTyp (
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
ConCp (
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
VideoLine (
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
CpStuff (
|
|
IN DEVICE_TTYPE DeviceType,
|
|
IN ULONG DeviceNumber
|
|
);
|
|
|
|
BOOLEAN
|
|
AllocateResource(
|
|
);
|
|
|
|
VOID
|
|
DeallocateResource(
|
|
);
|
|
|
|
BOOLEAN
|
|
Match(
|
|
IN PCSTR Pattern
|
|
);
|
|
|
|
BOOLEAN
|
|
Match(
|
|
IN PCWSTRING Pattern
|
|
);
|
|
|
|
VOID
|
|
Advance(
|
|
);
|
|
|
|
BOOLEAN
|
|
EndOfInput(
|
|
);
|
|
|
|
PREQUEST_HEADER
|
|
MakeRequest(
|
|
IN DEVICE_TTYPE DeviceType,
|
|
IN LONG DeviceNumber,
|
|
IN REQUEST_TYPE RequestType,
|
|
IN ULONG Size
|
|
);
|
|
|
|
ULONG
|
|
GetNumber(
|
|
);
|
|
|
|
|
|
|
|
|
|
INLINE
|
|
BOOLEAN
|
|
EndOfInput(
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Finds out if we are at the end of the command line.
|
|
|
|
Arguments:
|
|
|
|
None
|
|
|
|
Return Value:
|
|
|
|
BOOLEAN - TRUE if at the end of input, FALSE otherwise
|
|
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
return (CharIndex >= CmdLine->QueryChCount());
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
GetRequest(
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Parses the command line and makes a device request.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
PREQUEST_HEADER Request = NULL;
|
|
DSTRING Switches;
|
|
|
|
//
|
|
// Allocate strings (i.e. patterns ) from the resource
|
|
//
|
|
|
|
//
|
|
// Get the command line and parse it
|
|
//
|
|
if (Switches.Initialize("/-") &&
|
|
AllocateResource() &&
|
|
CmdLine->Initialize( GetCommandLine() )) {
|
|
|
|
//
|
|
// Before anything else, we look for a help switch somewhere
|
|
// in the command line. This kind of stinks, but this is how
|
|
// MODE works under DOS, se let's be compatible...
|
|
//
|
|
CharIndex = 0;
|
|
|
|
while ( TRUE ) {
|
|
|
|
//
|
|
// Look for a switch
|
|
//
|
|
CharIndex = CmdLine->Strcspn( &Switches, CharIndex );
|
|
|
|
if ( CharIndex != INVALID_CHNUM ) {
|
|
|
|
//
|
|
// There is a switch, see if it is the help switch
|
|
//
|
|
CharIndex++;
|
|
|
|
if ( Match( "?" )) {
|
|
|
|
//
|
|
// This is a help switch, Display help
|
|
//
|
|
DisplayMessageAndExit( MODE_MESSAGE_HELP, NULL, EXIT_SUCCESS );
|
|
|
|
}
|
|
} else {
|
|
break;
|
|
}
|
|
}
|
|
|
|
//
|
|
// No help requested, now we can parse the command line. First we
|
|
// initialize our indeces.
|
|
//
|
|
ParmIndex = 0;
|
|
CharIndex = 0;
|
|
AdvanceIndex = 0;
|
|
|
|
//
|
|
// Match the program name
|
|
//
|
|
Advance();
|
|
|
|
Match( "*" );
|
|
Advance();
|
|
|
|
//
|
|
// If there are no parameters, or the only parameter is the
|
|
// status switch, then this is a request for the status of
|
|
// all devices.
|
|
//
|
|
if ( EndOfInput() ) {
|
|
|
|
Request = MakeRequest( DEVICE_TYPE_ALL,
|
|
ALL_DEVICES,
|
|
REQUEST_TYPE_STATUS,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
} else if ( Match( "/STA*" ) ) {
|
|
|
|
Advance();
|
|
|
|
if ( !EndOfInput() ) {
|
|
|
|
ParseError();
|
|
}
|
|
|
|
Request = MakeRequest( DEVICE_TYPE_ALL,
|
|
ALL_DEVICES,
|
|
REQUEST_TYPE_STATUS,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
|
|
} else if ( Match( "LPT#[:]" ) ) {
|
|
|
|
//
|
|
// lptline
|
|
//
|
|
Request = LptLine();
|
|
|
|
} else if ( Match( "COM#[:]" ) ) {
|
|
|
|
//
|
|
// comline
|
|
//
|
|
Request = ComLine();
|
|
|
|
} else if ( Match( "CON[:]" ) ) {
|
|
|
|
//
|
|
// conline
|
|
//
|
|
Request = ConLine();
|
|
|
|
} else if ( Match( "#" ) ) {
|
|
|
|
//
|
|
// videoline
|
|
//
|
|
Request = VideoLine();
|
|
|
|
} else {
|
|
|
|
//
|
|
// Parse error
|
|
//
|
|
ParseError();
|
|
}
|
|
|
|
} else {
|
|
|
|
DisplayMessageAndExit( MODE_ERROR_NO_MEMORY, NULL, (ULONG)EXIT_ERROR );
|
|
|
|
}
|
|
|
|
//
|
|
// Deallocate strings from resource
|
|
//
|
|
DeallocateResource();
|
|
|
|
//
|
|
// Return the request
|
|
//
|
|
return Request;
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
LptLine (
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the lptline non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
PREQUEST_HEADER Request;
|
|
ULONG DeviceNumber;
|
|
|
|
//
|
|
// Note that at this point we have matched the lpt device.
|
|
// Get the device number;
|
|
//
|
|
DeviceNumber = GetNumber();
|
|
|
|
Advance();
|
|
|
|
if ( EndOfInput() ) {
|
|
|
|
//
|
|
// End redirection
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_LPT,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_LPT_ENDREDIR,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
} else if ( Match( "/STA*" ) ) {
|
|
|
|
//
|
|
// Status request
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_LPT,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_STATUS,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
} else if ( Match ( "=" ) ) {
|
|
|
|
//
|
|
// lptredir
|
|
//
|
|
Request = LptRedir( DeviceNumber );
|
|
|
|
} else if ( Match( "#" ) || Match( "COLS=#" ) ||
|
|
Match( "LINES=#" ) || Match( "RETRY=@" ) ) {
|
|
|
|
//
|
|
// lptset
|
|
//
|
|
Request = LptSet( DeviceNumber );
|
|
|
|
} else if ( Match( "CP" ) || Match( "CODEPAGE" ) ) {
|
|
|
|
//
|
|
// lptcp
|
|
//
|
|
Request = LptCp( DeviceNumber );
|
|
|
|
} else {
|
|
|
|
//
|
|
// Error
|
|
//
|
|
ParseError();
|
|
|
|
}
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
LptRedir (
|
|
IN ULONG DeviceNumber
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the lptredir non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
DeviceNumber - Supplies the device number
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
PREQUEST_HEADER Request;
|
|
PLPT_REQUEST LptRequest;
|
|
ULONG ComDevice;
|
|
|
|
Advance();
|
|
|
|
//
|
|
// Can only redirect to COM devices
|
|
//
|
|
if ( Match( "COM#[:]" ) ) {
|
|
|
|
ComDevice = GetNumber();
|
|
|
|
Request = MakeRequest( DEVICE_TYPE_LPT,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_LPT_REDIRECT,
|
|
sizeof(LPT_REQUEST ) );
|
|
|
|
LptRequest = (PLPT_REQUEST)Request;
|
|
|
|
LptRequest->Data.Redirect.DeviceType = DEVICE_TYPE_COM;
|
|
LptRequest->Data.Redirect.DeviceNumber = ComDevice;
|
|
|
|
} else {
|
|
|
|
//
|
|
// Error
|
|
//
|
|
ParseError();
|
|
|
|
}
|
|
|
|
return Request;
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
LptSet (
|
|
IN ULONG DeviceNumber
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the lptset non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
DeviceNumber - Supplies the device number
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
PREQUEST_HEADER Request;
|
|
PLPT_REQUEST LptRequest;
|
|
BOOLEAN SetCols = FALSE;
|
|
BOOLEAN SetLines = FALSE;
|
|
BOOLEAN SetRetry = FALSE;
|
|
ULONG Cols;
|
|
ULONG Lines;
|
|
WCHAR Retry;
|
|
|
|
|
|
if ( Match( "#" ) ) {
|
|
|
|
//
|
|
// Old syntax, where parameter are positional and comma-delimited.
|
|
//
|
|
// We will use the following automata for parsing the input
|
|
// (eoi = end of input)
|
|
//
|
|
//
|
|
// eoi
|
|
// [Cols]------------->[End]
|
|
// | ^
|
|
// |, |eoi
|
|
// v |
|
|
// [X]-----------+
|
|
// | ^
|
|
// | # |eoi
|
|
// +-->[Lines]--+
|
|
// | | ^
|
|
// | |, |
|
|
// |<----+ |
|
|
// | |
|
|
// |, |eoi
|
|
// | |
|
|
// v |
|
|
// [Y]-----------+
|
|
// | ^
|
|
// | @ |eoi
|
|
// +-->[Retry]--+
|
|
//
|
|
//
|
|
|
|
Cols = GetNumber();
|
|
SetCols = TRUE;
|
|
Advance();
|
|
|
|
//
|
|
// X:
|
|
//
|
|
if ( !Match( "," ) ) {
|
|
goto Eoi;
|
|
}
|
|
Advance();
|
|
|
|
if ( Match( "#" ) ) {
|
|
|
|
// n
|
|
// Lines
|
|
//
|
|
Lines = GetNumber();
|
|
SetLines = TRUE;
|
|
Advance();
|
|
}
|
|
|
|
//
|
|
// Y:
|
|
//
|
|
if ( !Match ( "," ) ) {
|
|
goto Eoi;
|
|
}
|
|
|
|
if ( Match( "@" ) ) {
|
|
|
|
//
|
|
// Retry
|
|
//
|
|
Retry = CmdLine->QueryChAt( MatchBegin );
|
|
SetRetry = TRUE;
|
|
Advance();
|
|
}
|
|
|
|
Eoi:
|
|
if ( !EndOfInput() ) {
|
|
|
|
//
|
|
// Error
|
|
//
|
|
ParseError();
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
//
|
|
// New syntax, where parameters are tagged. The language assumes
|
|
// that all parameters are optional (as long as there is at least
|
|
// one present). If some is required, it is up to the Device
|
|
// handler to complain latter on.
|
|
//
|
|
|
|
while ( !EndOfInput() ) {
|
|
|
|
if ( Match( "COLS=#" ) ) {
|
|
//
|
|
// COLS=
|
|
//
|
|
Cols = GetNumber();
|
|
SetCols = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "LINES=#" ) ) {
|
|
//
|
|
// LINES=
|
|
//
|
|
Lines = GetNumber();
|
|
SetLines = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "RETRY=@" ) ) {
|
|
//
|
|
// RETRY=
|
|
//
|
|
Retry = CmdLine->QueryChAt( MatchBegin );
|
|
SetRetry = TRUE;
|
|
Advance();
|
|
|
|
} else {
|
|
|
|
ParseError();
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
|
|
//
|
|
// Now that we parsed all the parameters, we make the request
|
|
// packet.
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_LPT,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_LPT_SETUP,
|
|
sizeof(LPT_REQUEST ) );
|
|
|
|
LptRequest = (PLPT_REQUEST)Request;
|
|
|
|
LptRequest->Data.Setup.SetCol = SetCols;
|
|
LptRequest->Data.Setup.SetLines = SetLines;
|
|
LptRequest->Data.Setup.SetRetry = SetRetry;
|
|
LptRequest->Data.Setup.Col = Cols;
|
|
LptRequest->Data.Setup.Lines = Lines;
|
|
LptRequest->Data.Setup.Retry = Retry;
|
|
|
|
return Request;
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
LptCp (
|
|
IN ULONG DeviceNumber
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the lptcp non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
DeviceNumber - Supplies the device number
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
//
|
|
// Since this is the same for LPT and CON, we use the same
|
|
// function to handle both.
|
|
//
|
|
return CpStuff( DEVICE_TYPE_LPT, DeviceNumber );
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
ComLine (
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the comline non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
PREQUEST_HEADER Request;
|
|
ULONG DeviceNumber;
|
|
|
|
//
|
|
// Note that we have already matched the COM device.
|
|
// Get the device number;
|
|
//
|
|
DeviceNumber = GetNumber();
|
|
|
|
Advance();
|
|
|
|
if ( Match( "/STA*" ) || EndOfInput() ) {
|
|
|
|
//
|
|
// Status request
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_COM,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_STATUS,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
|
|
} else {
|
|
|
|
//
|
|
// comset
|
|
//
|
|
Request = ComSet( DeviceNumber );
|
|
|
|
}
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
ComSet (
|
|
IN ULONG DeviceNumber
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the comset non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
DeviceNumber - Supplies the device number
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
PREQUEST_HEADER Request;
|
|
PCOM_REQUEST ComRequest;
|
|
|
|
|
|
BOOLEAN SetBaud = FALSE;
|
|
BOOLEAN SetDataBits = FALSE;
|
|
BOOLEAN SetStopBits = FALSE;
|
|
BOOLEAN SetParity = FALSE;
|
|
BOOLEAN SetRetry = FALSE;
|
|
BOOLEAN SetTimeOut = FALSE;
|
|
BOOLEAN SetXon = FALSE;
|
|
BOOLEAN SetOdsr = FALSE;
|
|
BOOLEAN SetIdsr = FALSE;
|
|
BOOLEAN SetOcts = FALSE;
|
|
BOOLEAN SetDtrControl = FALSE;
|
|
BOOLEAN SetRtsControl = FALSE;
|
|
|
|
ULONG Baud;
|
|
ULONG DataBits;
|
|
STOPBITS StopBits;
|
|
PARITY Parity;
|
|
WCHAR Retry;
|
|
BOOLEAN TimeOut;
|
|
BOOLEAN Xon;
|
|
BOOLEAN Odsr;
|
|
BOOLEAN Idsr;
|
|
BOOLEAN Octs;
|
|
DTR_CONTROL DtrControl;
|
|
RTS_CONTROL RtsControl;
|
|
|
|
|
|
if ( Match( "#" ) ) {
|
|
|
|
//
|
|
// Old syntax, where parameter are positional and comma-delimited.
|
|
//
|
|
// We will use the following automata for parsing the input
|
|
// (eoi = end of input):
|
|
//
|
|
// eoi
|
|
// [Baud]------------->[End]
|
|
// | ^
|
|
// |, |eoi
|
|
// v |
|
|
// [a]-----------+
|
|
// | ^
|
|
// | @ |eoi
|
|
// +-->[Parity]-+
|
|
// | | ^
|
|
// | |, |
|
|
// |<----+ |
|
|
// | |
|
|
// |, |eoi
|
|
// | |
|
|
// v |
|
|
// [b]-----------+
|
|
// | ^
|
|
// | # |eoi
|
|
// +-->[Data]---+
|
|
// | | ^
|
|
// | |, |
|
|
// |<----+ |
|
|
// | |
|
|
// |, |eoi
|
|
// v |
|
|
// [c]-----------+
|
|
// | ^
|
|
// | # |eoi
|
|
// +-->[Stop]---+
|
|
//
|
|
|
|
//
|
|
// Assume xon=off
|
|
//
|
|
|
|
SetXon = TRUE;
|
|
SetOdsr = TRUE;
|
|
SetOcts = TRUE;
|
|
SetDtrControl = TRUE;
|
|
SetRtsControl = TRUE;
|
|
Xon = FALSE;
|
|
Odsr = FALSE;
|
|
Octs = FALSE;
|
|
DtrControl = DTR_ENABLE;
|
|
RtsControl = RTS_ENABLE;
|
|
|
|
Baud = ConvertBaudRate( GetNumber() );
|
|
SetBaud = TRUE;
|
|
Advance();
|
|
|
|
//
|
|
// A:
|
|
//
|
|
if ( !Match( "," ) ) {
|
|
goto Eoi;
|
|
}
|
|
Advance();
|
|
|
|
if ( !Match( "," ) && Match( "@" ) ) {
|
|
|
|
//
|
|
// Parity
|
|
//
|
|
Parity = ConvertParity( CmdLine->QueryChAt( MatchBegin ) );
|
|
SetParity = TRUE;
|
|
Advance();
|
|
}
|
|
|
|
//
|
|
// B:
|
|
//
|
|
if ( !Match( "," )) {
|
|
goto Eoi;
|
|
}
|
|
Advance();
|
|
|
|
if ( Match( "#" )) {
|
|
|
|
//
|
|
// Data bits
|
|
//
|
|
DataBits = ConvertDataBits( GetNumber() );
|
|
SetDataBits = TRUE;
|
|
Advance();
|
|
}
|
|
|
|
//
|
|
// C:
|
|
//
|
|
if ( !Match( "," )) {
|
|
goto Eoi;
|
|
}
|
|
Advance();
|
|
|
|
if ( Match( "1.5" ) ) {
|
|
StopBits = COMM_STOPBITS_15;
|
|
SetStopBits = TRUE;
|
|
Advance();
|
|
} else if ( Match( "#" ) ) {
|
|
StopBits = ConvertStopBits( GetNumber() );
|
|
SetStopBits = TRUE;
|
|
Advance();
|
|
}
|
|
|
|
if (!Match( "," )) {
|
|
goto Eoi;
|
|
}
|
|
|
|
Advance();
|
|
|
|
if ( Match( "x" )) {
|
|
|
|
//
|
|
// XON=ON
|
|
//
|
|
SetXon = TRUE;
|
|
SetOdsr = TRUE;
|
|
SetOcts = TRUE;
|
|
SetDtrControl = TRUE;
|
|
SetRtsControl = TRUE;
|
|
Xon = TRUE;
|
|
Odsr = FALSE;
|
|
Octs = FALSE;
|
|
DtrControl = DTR_ENABLE;
|
|
RtsControl = RTS_ENABLE;
|
|
Advance();
|
|
|
|
} else if ( Match( "p" )) {
|
|
|
|
//
|
|
// Permanent retry - Hardware handshaking
|
|
//
|
|
|
|
SetXon = TRUE;
|
|
SetOdsr = TRUE;
|
|
SetOcts = TRUE;
|
|
SetDtrControl = TRUE;
|
|
SetRtsControl = TRUE;
|
|
Xon = FALSE;
|
|
Odsr = TRUE;
|
|
Octs = TRUE;
|
|
DtrControl = DTR_HANDSHAKE;
|
|
RtsControl = RTS_HANDSHAKE;
|
|
Advance();
|
|
|
|
} else {
|
|
|
|
//
|
|
// XON=OFF
|
|
//
|
|
SetXon = TRUE;
|
|
SetOdsr = TRUE;
|
|
SetOcts = TRUE;
|
|
SetDtrControl = TRUE;
|
|
SetRtsControl = TRUE;
|
|
Xon = FALSE;
|
|
Odsr = FALSE;
|
|
Octs = FALSE;
|
|
DtrControl = DTR_ENABLE;
|
|
RtsControl = RTS_ENABLE;
|
|
}
|
|
|
|
Eoi:
|
|
if ( !EndOfInput() ) {
|
|
|
|
//
|
|
// Error
|
|
//
|
|
ParseError();
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
//
|
|
// New syntax, where parameters are tagged. The language assumes
|
|
// that all parameters are optional (as long as there is at least
|
|
// one present). If some is required, it is up to the Device
|
|
// handler to complain latter on.
|
|
//
|
|
|
|
|
|
while ( !EndOfInput() ) {
|
|
|
|
if ( Match( "BAUD=#" ) ) {
|
|
//
|
|
// BAUD=
|
|
//
|
|
Baud = ConvertBaudRate( GetNumber() );
|
|
SetBaud = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "PARITY=@" ) ) {
|
|
//
|
|
// PARITY=
|
|
//
|
|
Parity = ConvertParity( CmdLine->QueryChAt( MatchBegin ) );
|
|
SetParity = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "DATA=#" ) ) {
|
|
//
|
|
// DATA=
|
|
//
|
|
DataBits = ConvertDataBits( GetNumber() );
|
|
SetDataBits = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "STOP=1.5" ) ) {
|
|
//
|
|
// STOP=1.5
|
|
//
|
|
StopBits = COMM_STOPBITS_15;
|
|
SetStopBits = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "STOP=#" ) ) {
|
|
//
|
|
// STOP=
|
|
//
|
|
StopBits = ConvertStopBits( GetNumber() );
|
|
SetStopBits = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "RETRY=@" ) ) {
|
|
//
|
|
// RETRY=
|
|
//
|
|
Retry = ConvertRetry( CmdLine->QueryChAt( MatchBegin ) );
|
|
SetRetry = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "TO=ON" ) ) {
|
|
//
|
|
// TO=ON
|
|
//
|
|
SetTimeOut = TRUE;
|
|
TimeOut = FALSE; // FALSE means finite timeout
|
|
Advance();
|
|
|
|
} else if ( Match( "TO=OFF" ) ) {
|
|
//
|
|
// TO=OFF
|
|
//
|
|
SetTimeOut = TRUE;
|
|
TimeOut = TRUE; // TRUE means infinite timeout
|
|
Advance();
|
|
|
|
} else if ( Match( "XON=ON" ) ) {
|
|
//
|
|
// XON=ON
|
|
//
|
|
SetXon = TRUE;
|
|
Xon = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "XON=OFF" ) ) {
|
|
//
|
|
// XON=OFF
|
|
//
|
|
SetXon = TRUE;
|
|
Xon = FALSE;
|
|
Advance();
|
|
|
|
} else if ( Match( "ODSR=ON" ) ) {
|
|
//
|
|
// ODSR=ON
|
|
//
|
|
SetOdsr = TRUE;
|
|
Odsr = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "ODSR=OFF" ) ) {
|
|
//
|
|
// ODSR=OFF
|
|
//
|
|
SetOdsr = TRUE;
|
|
Odsr = FALSE;
|
|
Advance();
|
|
|
|
} else if ( Match( "IDSR=ON" ) ) {
|
|
//
|
|
// IDSR=ON
|
|
//
|
|
SetIdsr = TRUE;
|
|
Idsr = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "IDSR=OFF" ) ) {
|
|
//
|
|
// IDSR=OFF
|
|
//
|
|
SetIdsr = TRUE;
|
|
Idsr = FALSE;
|
|
Advance();
|
|
|
|
} else if ( Match( "OCTS=ON" ) ) {
|
|
//
|
|
// OCS=ON
|
|
//
|
|
SetOcts = TRUE;
|
|
Octs = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "OCTS=OFF" ) ) {
|
|
//
|
|
// OCS=OFF
|
|
//
|
|
SetOcts = TRUE;
|
|
Octs = FALSE;
|
|
Advance();
|
|
|
|
} else if ( Match( "DTR=*" ) ) {
|
|
//
|
|
// DTR=
|
|
//
|
|
DtrControl = ConvertDtrControl( CmdLine, MatchBegin, MatchEnd ) ;
|
|
SetDtrControl = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "RTS=*" ) ) {
|
|
//
|
|
// RTS=
|
|
//
|
|
RtsControl = ConvertRtsControl( CmdLine, MatchBegin, MatchEnd ) ;
|
|
SetRtsControl = TRUE;
|
|
Advance();
|
|
|
|
} else {
|
|
|
|
ParseError();
|
|
}
|
|
}
|
|
}
|
|
|
|
//
|
|
// Now that parsing is done, we can make the request packet.
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_COM,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_COM_SET,
|
|
sizeof(COM_REQUEST ) );
|
|
|
|
ComRequest = (PCOM_REQUEST)Request;
|
|
|
|
ComRequest->Data.Set.SetBaud = SetBaud;
|
|
ComRequest->Data.Set.SetDataBits = SetDataBits;
|
|
ComRequest->Data.Set.SetStopBits = SetStopBits;
|
|
ComRequest->Data.Set.SetParity = SetParity;
|
|
ComRequest->Data.Set.SetRetry = SetRetry;
|
|
ComRequest->Data.Set.SetTimeOut = SetTimeOut;
|
|
ComRequest->Data.Set.SetXon = SetXon;
|
|
ComRequest->Data.Set.SetOdsr = SetOdsr;
|
|
ComRequest->Data.Set.SetIdsr = SetIdsr;
|
|
ComRequest->Data.Set.SetOcts = SetOcts;
|
|
ComRequest->Data.Set.SetDtrControl = SetDtrControl;
|
|
ComRequest->Data.Set.SetRtsControl = SetRtsControl;
|
|
|
|
|
|
ComRequest->Data.Set.Baud = Baud;
|
|
ComRequest->Data.Set.DataBits = DataBits;
|
|
ComRequest->Data.Set.StopBits = StopBits;
|
|
ComRequest->Data.Set.Parity = Parity;
|
|
ComRequest->Data.Set.Retry = Retry;
|
|
ComRequest->Data.Set.TimeOut = TimeOut;
|
|
ComRequest->Data.Set.Xon = Xon;
|
|
ComRequest->Data.Set.Odsr = Odsr;
|
|
ComRequest->Data.Set.Idsr = Idsr;
|
|
ComRequest->Data.Set.Octs = Octs;
|
|
ComRequest->Data.Set.DtrControl = DtrControl;
|
|
ComRequest->Data.Set.RtsControl = RtsControl;
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
ConLine (
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing ConLine
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
PREQUEST_HEADER Request;
|
|
|
|
Advance();
|
|
|
|
if ( Match( "/STA*" ) || EndOfInput() ) {
|
|
|
|
//
|
|
// Status request
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_CON,
|
|
0,
|
|
REQUEST_TYPE_STATUS,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
|
|
} else if ( Match( "COLS=#" ) || Match( "LINES=#" ) ) {
|
|
|
|
//
|
|
// conrc
|
|
//
|
|
Request = ConRc();
|
|
|
|
} else if ( Match( "RATE=#" ) || Match( "DELAY=#" ) ) {
|
|
|
|
//
|
|
// contyp
|
|
//
|
|
Request = ConTyp();
|
|
|
|
} else if ( Match( "CP" ) || Match( "CODEPAGE" ) ) {
|
|
|
|
//
|
|
// concp
|
|
//
|
|
Request = ConCp();
|
|
|
|
} else {
|
|
|
|
//
|
|
// Error
|
|
//
|
|
ParseError();
|
|
|
|
}
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
ConRc (
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the conrc non-terminal
|
|
|
|
Arguments:
|
|
|
|
None
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
PREQUEST_HEADER Request;
|
|
PCON_REQUEST ConRequest;
|
|
|
|
BOOLEAN SetCol = FALSE;
|
|
BOOLEAN SetLines = FALSE;
|
|
|
|
ULONG Col;
|
|
ULONG Lines;
|
|
|
|
while ( !EndOfInput() ) {
|
|
|
|
if ( Match( "LINES=#" )) {
|
|
//
|
|
// LINES=
|
|
//
|
|
Lines = GetNumber();
|
|
SetLines = TRUE;
|
|
Advance();
|
|
|
|
} else if ( Match( "COLS=#" )) {
|
|
//
|
|
// COLS=
|
|
//
|
|
Col = GetNumber();
|
|
SetCol = TRUE;
|
|
Advance();
|
|
|
|
} else {
|
|
|
|
ParseError();
|
|
}
|
|
}
|
|
|
|
//
|
|
// We are done parsing, we make the request packet.
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_CON,
|
|
0,
|
|
REQUEST_TYPE_CON_SET_ROWCOL,
|
|
sizeof(CON_REQUEST ) );
|
|
|
|
ConRequest = (PCON_REQUEST)Request;
|
|
|
|
ConRequest->Data.RowCol.SetCol = SetCol;
|
|
ConRequest->Data.RowCol.SetLines = SetLines;
|
|
ConRequest->Data.RowCol.Col = Col;
|
|
ConRequest->Data.RowCol.Lines = Lines;
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
ConTyp (
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the contyp non-terminal
|
|
|
|
Arguments:
|
|
|
|
None
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
PREQUEST_HEADER Request;
|
|
PCON_REQUEST ConRequest;
|
|
|
|
BOOLEAN SetRate = FALSE;
|
|
BOOLEAN SetDelay = FALSE;
|
|
|
|
ULONG Rate;
|
|
ULONG Delay;
|
|
|
|
|
|
//
|
|
// RATE=
|
|
//
|
|
if ( Match( "RATE=#" )) {
|
|
Rate = GetNumber();
|
|
SetRate = TRUE;
|
|
Advance();
|
|
}
|
|
|
|
//
|
|
// DELAY=
|
|
//
|
|
if ( Match( "DELAY=#" )) {
|
|
Delay = GetNumber();
|
|
SetDelay = TRUE;
|
|
Advance();
|
|
}
|
|
|
|
if ( !EndOfInput() ) {
|
|
//
|
|
// Error
|
|
//
|
|
ParseError();
|
|
}
|
|
|
|
//
|
|
// We are don parsing, we make the request packet.
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_CON,
|
|
0,
|
|
REQUEST_TYPE_CON_SET_TYPEMATIC,
|
|
sizeof(CON_REQUEST ) );
|
|
|
|
ConRequest = (PCON_REQUEST)Request;
|
|
|
|
ConRequest->Data.Typematic.SetRate = SetRate;
|
|
ConRequest->Data.Typematic.SetDelay = SetDelay;
|
|
ConRequest->Data.Typematic.Rate = Rate;
|
|
ConRequest->Data.Typematic.Delay = Delay;
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
ConCp (
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the concp non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
None
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
return CpStuff( DEVICE_TYPE_CON, 0 );
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
VideoLine (
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the videoline non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
PREQUEST_HEADER Request;
|
|
PCON_REQUEST ConRequest;
|
|
|
|
BOOLEAN SetCol = FALSE;
|
|
BOOLEAN SetLines = FALSE;
|
|
|
|
ULONG Col;
|
|
ULONG Lines;
|
|
|
|
//
|
|
// This is in the old syntax, where parameter are positional
|
|
// and comma-delimited.
|
|
//
|
|
// We will use the following automata for parsing the input
|
|
// (eoi = end of input):
|
|
//
|
|
// eoi
|
|
// [Cols]--------->[End]
|
|
// | ^
|
|
// |, |
|
|
// v |
|
|
// [ ] |
|
|
// | |
|
|
// |# |
|
|
// | |
|
|
// v eoi |
|
|
// [Lines]-----+
|
|
//
|
|
|
|
|
|
if ( Match( "#" )) {
|
|
//
|
|
// Cols
|
|
//
|
|
Col = GetNumber();
|
|
SetCol = TRUE;
|
|
Advance();
|
|
}
|
|
|
|
if ( Match( "," ) ) {
|
|
|
|
Advance();
|
|
|
|
if ( Match( "#" )) {
|
|
|
|
Lines = GetNumber();
|
|
SetLines = TRUE;
|
|
Advance();
|
|
|
|
} else {
|
|
|
|
ParseError();
|
|
|
|
}
|
|
}
|
|
|
|
if ( !EndOfInput() ) {
|
|
//
|
|
// Error
|
|
//
|
|
ParseError();
|
|
}
|
|
|
|
|
|
//
|
|
// We are done parsing, make the request packet
|
|
//
|
|
Request = MakeRequest( DEVICE_TYPE_CON,
|
|
0,
|
|
REQUEST_TYPE_CON_SET_ROWCOL,
|
|
sizeof(CON_REQUEST ) );
|
|
|
|
ConRequest = (PCON_REQUEST)Request;
|
|
|
|
ConRequest->Data.RowCol.SetCol = SetCol;
|
|
ConRequest->Data.RowCol.SetLines = SetLines;
|
|
ConRequest->Data.RowCol.Col = Col;
|
|
ConRequest->Data.RowCol.Lines = Lines;
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
CpStuff (
|
|
IN DEVICE_TTYPE DeviceType,
|
|
IN ULONG DeviceNumber
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Takes care of parsing the cpstuff non-terminal symbol
|
|
|
|
Arguments:
|
|
|
|
DeviceType - Supplies device type
|
|
DeviceNumber - Supplies device number
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
PREQUEST_HEADER Request;
|
|
PCON_REQUEST ConRequest;
|
|
|
|
Advance();
|
|
|
|
if ( Match( "PREPARE=*" ) ) {
|
|
|
|
//
|
|
//
|
|
// PREPARE=
|
|
//
|
|
// This is a No-Op
|
|
//
|
|
Request = MakeRequest( DeviceType,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_CODEPAGE_PREPARE,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
} else if ( Match( "SELECT=#" ) ) {
|
|
|
|
//
|
|
//
|
|
// SELECT=
|
|
//
|
|
// Note that this relies on the fact that codepage requests
|
|
// are identical for all devices.
|
|
//
|
|
|
|
Request = MakeRequest( DeviceType,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_CODEPAGE_SELECT,
|
|
sizeof( CON_REQUEST ) );
|
|
|
|
ConRequest = (PCON_REQUEST)Request;
|
|
|
|
ConRequest->Data.CpSelect.Codepage = GetNumber();
|
|
|
|
} else if ( Match( "/STA*" ) || EndOfInput() ) {
|
|
|
|
//
|
|
// /STATUS
|
|
//
|
|
Request = MakeRequest( DeviceType,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_CODEPAGE_STATUS,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
} else if ( Match( "REFRESH" ) ) {
|
|
|
|
//
|
|
//
|
|
// REFRESH
|
|
//
|
|
// This is a No-Op
|
|
//
|
|
Request = MakeRequest( DeviceType,
|
|
DeviceNumber,
|
|
REQUEST_TYPE_CODEPAGE_REFRESH,
|
|
sizeof( REQUEST_HEADER ) );
|
|
|
|
} else {
|
|
|
|
ParseError();
|
|
|
|
}
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
BOOLEAN
|
|
AllocateResource(
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Allocate strings from the resource
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
None
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
CmdLine = NEW DSTRING;
|
|
|
|
return (NULL == CmdLine) ? FALSE : TRUE;
|
|
|
|
}
|
|
|
|
VOID
|
|
DeallocateResource(
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Deallocate strings from the resource
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
None
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
DELETE( CmdLine );
|
|
|
|
}
|
|
|
|
BOOLEAN
|
|
Match(
|
|
IN PCSTR Pattern
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
This function matches a pattern against whatever
|
|
is in the command line at the current position.
|
|
|
|
Note that this does not advance our current position
|
|
within the command line.
|
|
|
|
If the pattern has a magic character, then the
|
|
variables MatchBegin and MatchEnd delimit the
|
|
substring of the command line that matched that
|
|
magic character.
|
|
|
|
Arguments:
|
|
|
|
Pattern - Supplies pointer to the pattern to match
|
|
|
|
Return Value:
|
|
|
|
BOOLEAN - TRUE if the pattern matched, FALSE otherwise
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
DSTRING PatternString;
|
|
BOOLEAN StatusOk;
|
|
|
|
StatusOk = PatternString.Initialize( Pattern );
|
|
|
|
DebugAssert( StatusOk );
|
|
|
|
if ( StatusOk ) {
|
|
|
|
return Match( &PatternString );
|
|
|
|
} else {
|
|
|
|
DisplayMessageAndExit( MODE_ERROR_NO_MEMORY, NULL, (ULONG)EXIT_ERROR );
|
|
|
|
}
|
|
//NOTREACHED
|
|
return StatusOk;
|
|
}
|
|
|
|
BOOLEAN
|
|
Match(
|
|
IN PCWSTRING Pattern
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
This function matches a pattern against whatever
|
|
is in the command line at the current position.
|
|
|
|
Note that this does not advance our current position
|
|
within the command line.
|
|
|
|
If the pattern has a magic character, then the
|
|
variables MatchBegin and MatchEnd delimit the
|
|
substring of the command line that matched that
|
|
magic character.
|
|
|
|
Arguments:
|
|
|
|
Pattern - Supplies pointer to the pattern to match
|
|
|
|
Return Value:
|
|
|
|
BOOLEAN - TRUE if the pattern matched, FALSE otherwise
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
CHNUM CmdIndex; // Index within command line
|
|
CHNUM PatternIndex; // Index within pattern
|
|
WCHAR PatternChar; // Character in pattern
|
|
WCHAR CmdChar; // Character in command line;
|
|
|
|
DebugPtrAssert( Pattern );
|
|
|
|
CmdIndex = CharIndex;
|
|
PatternIndex = 0;
|
|
|
|
while ( (PatternChar = Pattern->QueryChAt( PatternIndex )) != INVALID_CHAR ) {
|
|
|
|
switch ( PatternChar ) {
|
|
|
|
case '#':
|
|
|
|
//
|
|
// Match a number
|
|
//
|
|
MatchBegin = CmdIndex;
|
|
MatchEnd = MatchBegin;
|
|
|
|
//
|
|
// Get all consecutive digits
|
|
//
|
|
while ( ((CmdChar = CmdLine->QueryChAt( MatchEnd )) != INVALID_CHAR) &&
|
|
isdigit( (char)CmdChar ) ) {
|
|
MatchEnd++;
|
|
}
|
|
MatchEnd--;
|
|
|
|
if ( MatchBegin > MatchEnd ) {
|
|
//
|
|
// No number
|
|
//
|
|
return FALSE;
|
|
}
|
|
|
|
CmdIndex = MatchEnd + 1;
|
|
PatternIndex++;
|
|
|
|
break;
|
|
|
|
|
|
case '@':
|
|
|
|
//
|
|
// Match one character
|
|
//
|
|
if ( CmdIndex >= CmdLine->QueryChCount() ) {
|
|
return FALSE;
|
|
}
|
|
|
|
MatchBegin = MatchEnd = CmdIndex;
|
|
CmdIndex++;
|
|
PatternIndex++;
|
|
|
|
break;
|
|
|
|
|
|
case '*':
|
|
|
|
//
|
|
// Match everything up to next blank (or end of input)
|
|
//
|
|
MatchBegin = CmdIndex;
|
|
MatchEnd = MatchBegin;
|
|
|
|
while ( ( (CmdChar = CmdLine->QueryChAt( MatchEnd )) != INVALID_CHAR ) &&
|
|
( CmdChar != (WCHAR)' ' ) ) {
|
|
|
|
MatchEnd++;
|
|
}
|
|
MatchEnd--;
|
|
|
|
CmdIndex = MatchEnd+1;
|
|
PatternIndex++;
|
|
|
|
break;
|
|
|
|
case '[':
|
|
|
|
//
|
|
// Optional sequence
|
|
//
|
|
PatternIndex++;
|
|
|
|
PatternChar = Pattern->QueryChAt( PatternIndex );
|
|
CmdChar = CmdLine->QueryChAt( CmdIndex );
|
|
|
|
//
|
|
// If the first charcter in the input does not match the
|
|
// first character in the optional sequence, we just
|
|
// skip the optional sequence.
|
|
//
|
|
if ( ( CmdChar == INVALID_CHAR ) ||
|
|
( CmdChar == ' ') ||
|
|
( towupper(CmdChar) != towupper(PatternChar) ) ) {
|
|
|
|
while ( PatternChar != ']' ) {
|
|
PatternIndex++;
|
|
PatternChar = Pattern->QueryChAt( PatternIndex );
|
|
}
|
|
PatternIndex++;
|
|
|
|
} else {
|
|
|
|
//
|
|
// Since the first character in the sequence matched, now
|
|
// everything must match.
|
|
//
|
|
while ( PatternChar != ']' ) {
|
|
|
|
if ( towupper(PatternChar) != towupper(CmdChar) ) {
|
|
return FALSE;
|
|
}
|
|
CmdIndex++;
|
|
PatternIndex++;
|
|
CmdChar = CmdLine->QueryChAt( CmdIndex );
|
|
PatternChar = Pattern->QueryChAt( PatternIndex );
|
|
}
|
|
|
|
PatternIndex++;
|
|
}
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
//
|
|
// Both characters must match
|
|
//
|
|
CmdChar = CmdLine->QueryChAt( CmdIndex );
|
|
|
|
if ( ( CmdChar == INVALID_CHAR ) ||
|
|
( towupper(CmdChar) != towupper(PatternChar) ) ) {
|
|
|
|
return FALSE;
|
|
|
|
}
|
|
|
|
CmdIndex++;
|
|
PatternIndex++;
|
|
|
|
break;
|
|
|
|
}
|
|
}
|
|
|
|
AdvanceIndex = CmdIndex;
|
|
|
|
return TRUE;
|
|
|
|
}
|
|
|
|
VOID
|
|
Advance(
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Advances our pointers to the beginning of the next lexeme
|
|
|
|
Arguments:
|
|
|
|
None
|
|
|
|
Return Value:
|
|
|
|
None
|
|
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
CharIndex = AdvanceIndex;
|
|
|
|
//
|
|
// Skip blank space
|
|
//
|
|
if ( CmdLine->QueryChAt( CharIndex ) == ' ' ) {
|
|
|
|
while ( CmdLine->QueryChAt( CharIndex ) == ' ' ) {
|
|
|
|
CharIndex++;
|
|
}
|
|
|
|
ParmIndex = CharIndex;
|
|
|
|
}
|
|
}
|
|
|
|
VOID
|
|
ParseError(
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Display Invalid parameter error message and exits
|
|
|
|
Arguments:
|
|
|
|
None
|
|
|
|
Return Value:
|
|
|
|
None
|
|
|
|
|
|
--*/
|
|
|
|
{
|
|
DSTRING Parameter;
|
|
CHNUM ParmEnd;
|
|
|
|
//
|
|
// Look for end of parameter
|
|
//
|
|
ParmEnd = CmdLine->Strchr( ' ', ParmIndex );
|
|
|
|
|
|
Parameter.Initialize( CmdLine,
|
|
ParmIndex,
|
|
(ParmEnd == INVALID_CHNUM) ? TO_END : ParmEnd - ParmIndex );
|
|
|
|
DisplayMessageAndExit( MODE_ERROR_INVALID_PARAMETER,
|
|
&Parameter,
|
|
(ULONG)EXIT_ERROR );
|
|
|
|
}
|
|
|
|
PREQUEST_HEADER
|
|
MakeRequest(
|
|
IN DEVICE_TTYPE DeviceType,
|
|
IN LONG DeviceNumber,
|
|
IN REQUEST_TYPE RequestType,
|
|
IN ULONG Size
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Makes a request and initializes its header.
|
|
|
|
Arguments:
|
|
|
|
DeviceType - Supplies the type of device
|
|
DeviceNumber - Supplies the device number
|
|
RequestType - Supplies the type of request
|
|
Size - Supplies size of the request packet
|
|
|
|
Return Value:
|
|
|
|
Pointer to the device request.
|
|
|
|
Notes:
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
PREQUEST_HEADER Request;
|
|
|
|
DebugAssert( Size >= sizeof( REQUEST_HEADER )) ;
|
|
|
|
Request = (PREQUEST_HEADER)MALLOC( (unsigned int)Size );
|
|
|
|
DebugPtrAssert( Request );
|
|
|
|
if ( !Request ) {
|
|
DisplayMessageAndExit( MODE_ERROR_NO_MEMORY, NULL, (ULONG)EXIT_ERROR );
|
|
}
|
|
|
|
Request->DeviceType = DeviceType;
|
|
Request->DeviceNumber = DeviceNumber;
|
|
Request->DeviceName = NULL;
|
|
Request->RequestType = RequestType;
|
|
|
|
return Request;
|
|
|
|
}
|
|
|
|
ULONG
|
|
GetNumber(
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Converts the substring delimited by MatchBegin and MatchEnd into
|
|
a number.
|
|
|
|
Arguments:
|
|
|
|
None
|
|
|
|
Return Value:
|
|
|
|
ULONG - The matched string converted to a number
|
|
|
|
|
|
--*/
|
|
|
|
{
|
|
LONG Number;
|
|
|
|
|
|
DebugAssert( MatchEnd >= MatchBegin );
|
|
|
|
if ( !CmdLine->QueryNumber( &Number, MatchBegin, (MatchEnd-MatchBegin)+1 ) ) {
|
|
ParseError();
|
|
}
|
|
|
|
return (ULONG)Number;
|
|
|
|
}
|