Unit tcpip

Classes

EProtocolBusy - @\\\0000000401*) (*@/// EProtocolBusy=class(ETcpIpError)
EProtocolError - @\\\0000000301*) (*@/// EProtocolError=class(ETcpIpError)
ESocketError - @/// ESocketError=class(ETcpIpError)
T_Attachment - @\\\0000000C14*) (*@/// T_Attachment = class(TObject)
T_Finger - @\\\0000002901*) { Finger client and demon // RFC 1288 } (*@/// T_Finger = class(T_TcpIp)
T_Fingerd -
T_FTP - @\\\0000000C01*) (*@/// T_FTP = class(T_TcpIp) // RFC 959
T_HTTP - @\\\0000000503*) { HTTP and FTP - the file transfer protocols } (*@/// T_HTTP = class(T_TcpIp) // RFC 1945 (V1.
T_lpr - @\\\0000000111*) (*@/// T_lpr = class(T_TcpIp) // RFC 1179
T_Mail - @\\\0000001001*) (*@/// T_Mail = class(T_MailNews) // RFC 822
T_MailNews - @\\\0000002301*) { Mail and News text components } (*@/// T_MailNews = class(TComponent)
T_Mime - @\\\0000000D01*) (*@/// T_Mime = class(TComponent) // RFC 1521
T_News - @\\\0000000601*) (*@/// T_News = class(T_MailNews) // RFC 850
T_NNTP - @\\\0000001701*) (*@/// T_NNTP = class(T_TcpIp) // RFC 977
T_Pop3 - @\\\0000001001*) (*@/// T_Pop3 = class(T_TcpIp) // RFC 1725
T_RCommon - @\\\0000000103*) (*@/// T_RCommon = class(T_TcpIp)
T_RExec - @\\\0000000103*) (*@/// T_RExec = class(T_RCommon)
T_Rsh - @\\\0000000113*) (*@/// T_Rsh = class(T_RCommon)
T_SMTP - @\\\0000000103*) { The Mail and News protocols } (*@/// T_SMTP = class(T_TcpIp) // RFC 821
T_TcpIp - The base component } (*@/// T_TcpIp = class(TComponent)
T_Time - @\\\0000003501*) { Time, RExec, LPR - the most useful UNIX services } (*@/// T_Time = class(T_TcpIp) // RFC 868

Functions

Register - the current job number

@\\\0000000306*) (*@\\\0000000501*) (*@/// procedure Register;

Types

TDataTransferProc
TFingerInfo
TFingerRequest
TFTPActionCompleteProc
TTraceLevel
TTraceProc
t_encoding
t_filedata
t_filetype
t_ftp_mode
t_lpr_types
t_socket_state
t_timemode

Constants

uwm_socketevent

Variables

lpr_count


Functions


procedure Register;

the current job number

@\\\0000000306*) (*@\\\0000000501*) (*@/// procedure Register;


Types


TDataTransferProc = procedure (Sender:TObject; mode: t_ftp_mode; bytes: integer) of object

TFingerInfo = record
hostname : string;
address : longint;
request : string;
end;
@/// TFingerInfo=record
TFingerRequest=procedure (Sender:TObject; FingerInfo:TFingerInfo) of object
@\\\0000000203
TFTPActionCompleteProc = procedure (Sender:TObject; mode: t_ftp_mode) of object

TTraceLevel    = (tt_proto_sent, tt_proto_get, tt_socket);

TTraceProc = procedure (const s:string; level:TTraceLevel) of object
@\\\0000000201
t_encoding     = (ec_base64, ec_quotedprintable, ec_none);

t_filedata = record
filetype : t_filetype;
size : integer;
name : string;
datetime : TDateTime;
end;
@/// t_filedata=record ... end;
t_filetype     = (ft_none, ft_dir, ft_file, ft_link);

t_ftp_mode     = (tftp_download,tftp_upload,tftp_getdir);

t_lpr_types    = (lp_plain, lp_ascii, lp_dvi, lp_plot, lp_ditroff, lp_ps,
                    lp_pr, lp_fortran, lp_troff, lp_raster, lp_cif);

t_socket_state = (invalid,valid,connected,state_unknown);
@\\\
t_timemode     = (tzUTC,tzLocal);

Constants

uwm_socketevent = wm_user+$100

@\\\0000000A01

Variables

lpr_count : integer

my magic message number