PageRenderTime 14ms CodeModel.GetById 10ms app.highlight 3ms RepoModel.GetById 0ms app.codeStats 0ms

/packages/libc/src/prwhodh.inc

https://github.com/slibre/freepascal
Unknown | 37 lines | 30 code | 7 blank | 0 comment | 0 complexity | 170f78ebbbb00697f24daa5c1282940e MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
 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