/packages/libc/src/prwhodh.inc

 1
 2type
 3   Poutmp = ^outmp;
 4   outmp = record
 5        out_line : array[0..7] of char;
 6        out_name : array[0..7] of char;
 7        out_time : int32_t;
 8     end;
 9
10  whoent =  record
11    we_utmp: outmp;
12    we_idle: Integer;
13  end;
14
15   Pwhod = ^whod;
16   whod = record
17        wd_vers : char;
18        wd_type : char;
19        wd_pad : array[0..1] of char;
20        wd_sendtime : longint;
21        wd_recvtime : longint;
22        wd_hostname : array[0..31] of char;
23        wd_loadav : array[0..2] of longint;
24        wd_boottime : longint;
25        wd_we: packed array[0..(1024 div SizeOf(whoent))-1] of whoent;
26     end;
27
28
29const
30   WHODVERSION = 1;
31   WHODTYPE_STATUS = 1;
32
33{ ---------------------------------------------------------------------
34    Borland compatibility types
35  ---------------------------------------------------------------------}
36
37// Type