mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-05-31 07:22:44 +02:00
38 lines
854 B
PHP
38 lines
854 B
PHP
|
|
type
|
|
Poutmp = ^outmp;
|
|
outmp = record
|
|
out_line : array[0..7] of char;
|
|
out_name : array[0..7] of char;
|
|
out_time : int32_t;
|
|
end;
|
|
|
|
whoent = record
|
|
we_utmp: outmp;
|
|
we_idle: Integer;
|
|
end;
|
|
|
|
Pwhod = ^whod;
|
|
whod = record
|
|
wd_vers : char;
|
|
wd_type : char;
|
|
wd_pad : array[0..1] of char;
|
|
wd_sendtime : longint;
|
|
wd_recvtime : longint;
|
|
wd_hostname : array[0..31] of char;
|
|
wd_loadav : array[0..2] of longint;
|
|
wd_boottime : longint;
|
|
wd_we: packed array[0..(1024 div SizeOf(whoent))-1] of whoent;
|
|
end;
|
|
|
|
|
|
const
|
|
WHODVERSION = 1;
|
|
WHODTYPE_STATUS = 1;
|
|
|
|
{ ---------------------------------------------------------------------
|
|
Borland compatibility types
|
|
---------------------------------------------------------------------}
|
|
|
|
// Type
|