SSH w Delphi

Witam:)

Chodzi mi po głowie napisanie programu do komunikacji
z konsolą linuksową po SSh coś na wzór Putty.exe
czy jest to możliwe w delphi 7 ?
Jeżeli tak bardzo proszę o przybliżenie tematu.

Synapse

A czy jakieś bardziej szczególowe informacje?

http://synapse.ararat.cz/files/synahelp.zip

Class TTelnetSend
Description Hierarchy Fields Methods Properties 

Unit
tlntsend

Declaration
type TTelnetSend = class(TSynaClient)

Description
Class with implementation of Telnet/SSH script client.


Note: Are you missing properties for specify server address and port? Look to parent TSynaClient too!

Hierarchy
TObject 
TSynaClient 
TTelnetSend
Overview
Methods
 constructor Create; 
 destructor Destroy; override; 
 function Login: Boolean; 
 function SSHLogin: Boolean; 
 procedure Logout; 
 procedure Send(const Value: string); 
 function WaitFor(const Value: string): Boolean; 
 function RecvTerminated(const Terminator: string): string; 
 function RecvString: string; 

Properties
 property Sock: TTCPBlockSocket read FSock; 
 property SessionLog: string read FSessionLog write FSessionLog; 
 property TermType: string read FTermType write FTermType; 

Description
Methods
 constructor Create; 
  destructor Destroy; override; 
  function Login: Boolean; 

Connects to Telnet server.

 function SSHLogin: Boolean; 

Connects to SSH2 server and login by Username and Password properties. 

You must use some of SSL plugins with SSH support. For exammple CryptLib.

 procedure Logout; 

Logout from telnet server.

 procedure Send(const Value: string); 

Send this data to telnet server.

 function WaitFor(const Value: string): Boolean; 

Reading data from telnet server until Value is readed. If it is not readed until timeout, result is False. Otherwise result is True.

 function RecvTerminated(const Terminator: string): string; 

Read data terminated by terminator from telnet server.

 function RecvString: string; 

Read string from telnet server.

Properties
 property Sock: TTCPBlockSocket read FSock; 

Socket object used for TCP/IP operation. Good for seting OnStatus hook, etc.

 property SessionLog: string read FSessionLog write FSessionLog; 

all readed datas in this session (from connect) is stored in this large string.

 property TermType: string read FTermType write FTermType; 

Terminal type indentification. By default is 'SYNAPSE'.