Difference between revisions of "TShell"
From Ultibo.org
(Created page with "Return to Unit Shell __TOC__ === Description === ---- ''To be documented'' === Class definitions === ---- <div class="toccolours mw-collapsible mw-collap...") |
|||
Line 967: | Line 967: | ||
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;"> | <div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;"> | ||
<pre style="border: 0; padding-bottom:0px;">function TShell.CommandIndex(AIndex:Integer; const ACommand:String):String;</pre> | <pre style="border: 0; padding-bottom:0px;">function TShell.CommandIndex(AIndex:Integer; const ACommand:String):String;</pre> | ||
− | <div style="font-size: 14px; padding-left: 12px;">'''Description:''' | + | <div style="font-size: 14px; padding-left: 12px;">'''Description:''' Return the command line parameter specified by Index (0 is the command name, 1 is the first parameter etc)</div> |
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;"> | <div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;"> | ||
{| class="wikitable" style="font-size: 14px; background: white;" | {| class="wikitable" style="font-size: 14px; background: white;" | ||
|- | |- | ||
! Note | ! Note | ||
− | | | + | | None documented |
|- | |- | ||
|} | |} |
Revision as of 04:02, 29 May 2018
Return to Unit Shell
Description
To be documented
Class definitions
TShell = class(TListObject)
public
| |
constructor Create;
|
|
destructor Destroy; override;
|
|
private
| |
FManager:TShellManager;
|
|
FAuthenticator:TAuthenticator;
|
|
FLock:TCriticalSectionHandle;
|
|
FSessions:TLinkedList;
|
|
FCommands:TLinkedList;
|
|
FBanner:String;
|
|
FPrompt:String;
|
|
FError:String;
|
|
FName:String;
|
|
FHash:LongWord;
|
|
FFlags:LongWord;
|
|
procedure SetAuthenticator(AAuthenticator:TAuthenticator);
|
|
function GetBanner:String;
|
|
procedure SetBanner(const ABanner:String);
|
|
function GetPrompt:String;
|
|
procedure SetPrompt(const APrompt:String);
|
|
function GetError:String;
|
|
procedure SetError(const AError:String);
|
|
function GetName:String;
|
|
procedure SetName(const AName:String);
|
|
procedure SetFlags(AFlags:LongWord);
|
|
protected
| |
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
public
| |
property Manager:TShellManager read FManager;
|
|
property Authenticator:TAuthenticator read FAuthenticator write SetAuthenticator;
|
|
property Banner:String read GetBanner write SetBanner;
|
|
property Prompt:String read GetPrompt write SetPrompt;
|
|
property Error:String read GetError write SetError;
|
|
property Name:String read GetName write SetName;
|
|
property Hash:LongWord read FHash;
|
|
property Flags:LongWord read FFlags write SetFlags;
|
|
function DoClear(ASession:TShellSession):Boolean; virtual;
|
|
function DoBanner(ASession:TShellSession):Boolean; virtual;
|
|
function DoPrompt(ASession:TShellSession):Boolean; virtual;
|
|
function DoError(ASession:TShellSession):Boolean; virtual;
|
|
function DoInput(ASession:TShellSession; var AInput:String):Boolean; virtual;
|
|
function DoOutput(ASession:TShellSession; const AOutput:String):Boolean; virtual;
|
|
function DoOutputEx(ASession:TShellSession; const AOutput:String; AReturn:Boolean):Boolean; virtual;
|
|
function DoGetSize(ASession:TShellSession; var ARows,ACols:LongWord):Boolean; virtual;
|
|
function DoSetSize(ASession:TShellSession; ARows,ACols:LongWord):Boolean; virtual;
|
|
function DoGetCursor(ASession:TShellSession; var ARow,ACol:LongWord):Boolean; virtual;
|
|
function DoSetCursor(ASession:TShellSession; ARow,ACol:LongWord):Boolean; virtual;
|
|
function DoGetColors(ASession:TShellSession; var AForecolor,ABackcolor:LongWord):Boolean; virtual;
|
|
function DoSetColors(ASession:TShellSession; AForecolor,ABackcolor:LongWord):Boolean; virtual;
|
|
function DoGetCoordinates(ASession:TShellSession; var ARow,ACol:LongWord):Boolean; virtual;
|
|
function DoSetCoordinates(ASession:TShellSession; ARow,ACol:LongWord):Boolean; virtual;
|
|
function DoGetCursorMode(ASession:TShellSession; var AMode:LongWord):Boolean; virtual;
|
|
function DoSetCursorMode(ASession:TShellSession; AMode:LongWord):Boolean; virtual;
|
|
function DoGetCursorShape(ASession:TShellSession; var AShape:LongWord):Boolean; virtual;
|
|
function DoSetCursorShape(ASession:TShellSession; AShape:LongWord):Boolean; virtual;
|
|
function GetSession(APrevious:TShellSession; ALock,AUnlock:Boolean):TShellSession;
|
|
function FindSession(AIdentifier:LongWord):TShellSession;
|
|
function CreateSession(AIdentifier:LongWord):TShellSession;
|
|
function DestroySession(ASession:TShellSession):Boolean;
|
|
function RegisterSession(ASession:TShellSession):Boolean;
|
|
function DeregisterSession(ASession:TShellSession):Boolean;
|
|
function GetCommand(APrevious:TShellCommand; ALock,AUnlock:Boolean):TShellCommand;
|
|
function FindCommand(const AName:String):TShellCommand;
|
|
function DefaultCommand:TShellCommand;
|
|
function RegisterCommand(ACommand:TShellCommand):Boolean;
|
|
function DeregisterCommand(ACommand:TShellCommand):Boolean;
|
|
function MatchCommand(const ACommand:String; var AName:String; var AParameters:TStrings; var AContinue:Boolean):TShellCommand; virtual;
|
|
function CompleteCommand(ASession:TShellSession; const ACommand:String; var AError:Boolean):String; virtual;
|
|
function ProcessCommand(ASession:TShellSession; const ACommand:String):Boolean; virtual;
|
|
function CommandName(const ACommand:String):String;
|
|
function CommandSplit(const ACommand:String):TStrings;
|
|
function CommandJoin(AParameters:TStrings):String;
|
|
function CommandParse(const ACommand:String; var AName:String; var AParameters:TStrings):Boolean;
|
|
function CommandConcat(const AName:String; AParameters:TStrings):String;
|
|
function CommandIndex(AIndex:Integer; const ACommand:String):String;
|
|
function ParameterIndex(AIndex:Integer; AParameters:TStrings):String;
|
|
function ParameterValue(const AParameter:String; AParameters:TStrings):String;
|
|
function ParameterExists(const AParameter:String; AParameters:TStrings):Boolean;
|
|
function ParameterValueEx(const AParameter:String; AParameters:TStrings; APlus,AMinus:Boolean):String;
|
|
function ParameterExistsEx(const AParameter:String; AParameters:TStrings; APlus,AMinus:Boolean):Boolean;
|
|
function AddOutput(var AOutput:String; ACol:LongWord; const AValue:String):Boolean;
|
Function declarations
constructor TShell.Create;
Description: To be documented
Note | None documented |
---|
destructor TShell.Destroy;
Description: To be documented
Note | None documented |
---|
procedure TShell.SetAuthenticator(AAuthenticator:TAuthenticator);
Description: To be documented
Note | None documented |
---|
function TShell.GetBanner:String;
Description: To be documented
Note | None documented |
---|
procedure TShell.SetBanner(const ABanner:String);
Description: To be documented
Note | None documented |
---|
function TShell.GetPrompt:String;
Description: To be documented
Note | None documented |
---|
procedure TShell.SetPrompt(const APrompt:String);
Description: To be documented
Note | None documented |
---|
function TShell.GetError:String;
Description: To be documented
Note | None documented |
---|
procedure TShell.SetError(const AError:String);
Description: To be documented
Note | None documented |
---|
function TShell.GetName:String;
Description: To be documented
Note | None documented |
---|
procedure TShell.SetName(const AName:String);
Description: To be documented
Note | None documented |
---|
procedure TShell.SetFlags(AFlags:LongWord);
Description: To be documented
Note | None documented |
---|
function TShell.AcquireLock:Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.ReleaseLock:Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoClear(ASession:TShellSession):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoBanner(ASession:TShellSession):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoPrompt(ASession:TShellSession):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoError(ASession:TShellSession):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoInput(ASession:TShellSession; var AInput:String):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoOutput(ASession:TShellSession; const AOutput:String):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoOutputEx(ASession:TShellSession; const AOutput:String; AReturn:Boolean):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoGetSize(ASession:TShellSession; var ARows,ACols:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoSetSize(ASession:TShellSession; ARows,ACols:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoGetCursor(ASession:TShellSession; var ARow,ACol:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoSetCursor(ASession:TShellSession; ARow,ACol:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoGetColors(ASession:TShellSession; var AForecolor,ABackcolor:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoSetColors(ASession:TShellSession; AForecolor,ABackcolor:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoGetCoordinates(ASession:TShellSession; var ARow,ACol:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoSetCoordinates(ASession:TShellSession; ARow,ACol:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoGetCursorMode(ASession:TShellSession; var AMode:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoSetCursorMode(ASession:TShellSession; AMode:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoGetCursorShape(ASession:TShellSession; var AShape:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DoSetCursorShape(ASession:TShellSession; AShape:LongWord):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.GetSession(APrevious:TShellSession; ALock,AUnlock:Boolean):TShellSession;
Description: To be documented
Note | None documented |
---|
function TShell.FindSession(AIdentifier:LongWord):TShellSession;
Description: To be documented
Note | None documented |
---|
function TShell.CreateSession(AIdentifier:LongWord):TShellSession;
Description: To be documented
Note | None documented |
---|
function TShell.DestroySession(ASession:TShellSession):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.RegisterSession(ASession:TShellSession):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DeregisterSession(ASession:TShellSession):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.GetCommand(APrevious:TShellCommand; ALock,AUnlock:Boolean):TShellCommand;
Description: To be documented
Note | None documented |
---|
function TShell.FindCommand(const AName:String):TShellCommand;
Description: To be documented
Note | None documented |
---|
function TShell.DefaultCommand:TShellCommand;
Description: To be documented
Note | None documented |
---|
function TShell.RegisterCommand(ACommand:TShellCommand):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.DeregisterCommand(ACommand:TShellCommand):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.MatchCommand(const ACommand:String; var AName:String; var AParameters:TStrings; var AContinue:Boolean):TShellCommand;
Description: Check the supplied command against registered commands, if matched return command as result
Command | The command to match |
---|---|
Name | The actual command name matched (May be an alias of the returned command) |
Parameters | The parameters parsed from the command line |
Continue | Returns true if more than one command matches and matching should be retried with more input |
function TShell.CompleteCommand(ASession:TShellSession; const ACommand:String; var AError:Boolean):String;
Description: Attempt to complete the supplied command by matching an existing command and performing command completion
Command | The command to complete |
---|---|
Error | Returns true if there was on error in the supplied command |
function TShell.ProcessCommand(ASession:TShellSession; const ACommand:String):Boolean;
Description: Process the supplied command against the registered commands
Command | The command to process |
---|
function TShell.CommandName(const ACommand:String):String;
Description: Extract the command name from the command line
Note | None documented |
---|
function TShell.CommandSplit(const ACommand:String):TStrings;
Description: Split the command line into individual parameters
Note | Allows for quoted parameters which include spaces |
---|
function TShell.CommandJoin(AParameters:TStrings):String;
Description: Join the individual parameters into a command line
Note | Allows for quoted parameters which include spaces |
---|
function TShell.CommandParse(const ACommand:String; var AName:String; var AParameters:TStrings):Boolean;
Description: Parse the command line into the command name and parameters
Note | None documented |
---|
function TShell.CommandConcat(const AName:String; AParameters:TStrings):String;
Description: Concatenate the command name and parameters into a command line
Note | None documented |
---|
function TShell.CommandIndex(AIndex:Integer; const ACommand:String):String;
Description: Return the command line parameter specified by Index (0 is the command name, 1 is the first parameter etc)
Note | None documented |
---|
function TShell.ParameterIndex(AIndex:Integer; AParameters:TStrings):String;
Description: Return the command line parameter specified by Index (0 is the first parameter, 1 is the second etc)
Note | None documented |
---|
function TShell.ParameterValue(const AParameter:String; AParameters:TStrings):String;
Description: To be documented
Note | None documented |
---|
function TShell.ParameterExists(const AParameter:String; AParameters:TStrings):Boolean;
Description: To be documented
Note | None documented |
---|
function TShell.ParameterValueEx(const AParameter:String; AParameters:TStrings; APlus,AMinus:Boolean):String;
Description: Return the value of the command line parameter specified by Parameter
Note | Allows for parameters prefixed with Slash (/), Plus (+) or Minus (-) |
---|
function TShell.ParameterExistsEx(const AParameter:String; AParameters:TStrings; APlus,AMinus:Boolean):Boolean;
Description: Check for the existence of the command line parameter specified by Parameter
Note | Allows for parameters prefixed with Slash (/), Plus (+) or Minus (-) |
---|
function TShell.AddOutput(var AOutput:String; ACol:LongWord; const AValue:String):Boolean;
Description: To be documented
Note | None documented |
---|
Return to Unit Reference