blob: 9c5eae24d8ba8a2a6c69636ea6271626c1a378ce (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
type
Pclock_t = ^clock_t;
clock_t = __clock_t;
Ptime_t = ^time_t;
time_t = __time_t;
Pclockid_t = ^clockid_t;
clockid_t = __clockid_t;
Ptimer_t = ^timer_t;
timer_t = __timer_t;
type
Ptm = ^tm;
tm = record
tm_sec : longint;
tm_min : longint;
tm_hour : longint;
tm_mday : longint;
tm_mon : longint;
tm_year : longint;
tm_wday : longint;
tm_yday : longint;
tm_isdst : longint;
case boolean of
false : (tm_gmtoff : longint;tm_zone : Pchar);
true : (__tm_gmtoff : longint;__tm_zone : Pchar);
end;
Pitimerspec = ^itimerspec;
itimerspec = record
it_interval : timespec;
it_value : timespec;
end;
var
getdate_err : longint;cvar;external;
function clock:clock_t;cdecl;external clib name 'clock';
function __time(__timer:Ptime_t):time_t;cdecl;external clib name 'time';
function difftime(__time1:time_t; __time0:time_t):double;cdecl;external clib name 'difftime';
function mktime(__tp:Ptm):time_t;cdecl;external clib name 'mktime';
function strftime(__s:Pchar; __maxsize:size_t; __format:Pchar; __tp:Ptm):size_t;cdecl;external clib name 'strftime';
function strptime(__s:Pchar; __fmt:Pchar; __tp:Ptm):Pchar;cdecl;external clib name 'strptime';
function gmtime(__timer:Ptime_t):Ptm;cdecl;external clib name 'gmtime';
function localtime(__timer:Ptime_t):Ptm;cdecl;external clib name 'localtime';
function gmtime_r(__timer:Ptime_t; __tp:Ptm):Ptm;cdecl;external clib name 'gmtime_r';
function localtime_r(__timer:Ptime_t; __tp:Ptm):Ptm;cdecl;external clib name 'localtime_r';
function asctime(__tp:Ptm):Pchar;cdecl;external clib name 'asctime';
function ctime(__timer:Ptime_t):Pchar;cdecl;external clib name 'ctime';
function asctime_r(__tp:Ptm; __buf:Pchar):Pchar;cdecl;external clib name 'asctime_r';
function ctime_r(__timer:Ptime_t; __buf:Pchar):Pchar;cdecl;external clib name 'ctime_r';
procedure tzset;cdecl;external clib name 'tzset';
function stime(__when:Ptime_t):longint;cdecl;external clib name 'stime';
function timelocal(__tp:Ptm):time_t;cdecl;external clib name 'timelocal';
function dysize(__year:longint):longint;cdecl;external clib name 'dysize';
function nanosleep(__requested_time:Ptimespec; __remaining:Ptimespec):longint;cdecl;external clib name 'nanosleep';
function clock_getres(__clock_id:clockid_t; __res:Ptimespec):longint;cdecl;external clib name 'clock_getres';
function clock_gettime(__clock_id:clockid_t; __tp:Ptimespec):longint;cdecl;external clib name 'clock_gettime';
function clock_settime(__clock_id:clockid_t; __tp:Ptimespec):longint;cdecl;external clib name 'clock_settime';
function clock_nanosleep(__clock_id:clockid_t; __flags:longint; __req:Ptimespec; __rem:Ptimespec):longint;cdecl;external clib name 'clock_nanosleep';
function clock_getcpuclockid(__pid:pid_t; __clock_id:Pclockid_t):longint;cdecl;external clib name 'clock_getcpuclockid';
function timer_create(__clock_id:clockid_t; __evp:Psigevent; __timerid:Ptimer_t):longint;cdecl;external clib name 'timer_create';
function timer_delete(__timerid:timer_t):longint;cdecl;external clib name 'timer_delete';
function timer_settime(__timerid:timer_t; __flags:longint; __value:Pitimerspec; __ovalue:Pitimerspec):longint;cdecl;external clib name 'timer_settime';
function timer_gettime(__timerid:timer_t; __value:Pitimerspec):longint;cdecl;external clib name 'timer_gettime';
function timer_getoverrun(__timerid:timer_t):longint;cdecl;external clib name 'timer_getoverrun';
function getdate(__string:Pchar):Ptm;cdecl;external clib name 'getdate';
function getdate_r(__string:Pchar; __resbufp:Ptm):longint;cdecl;external clib name 'getdate_r';
{ ---------------------------------------------------------------------
Borland compatibility types
---------------------------------------------------------------------}
Type
TTime_T = Time_t;
TCLOCKID_T = CLOCKID_T;
TUnixTime = tm;
PUnixTime = ^TUnixTime;
TITimerSpec = itimerspec;
function __time(var __timer : ttime_t):time_t;cdecl;external clib name 'time';
function mktime(var __tp:tm):time_t;cdecl;external clib name 'mktime';
function strftime(__s:Pchar; __maxsize:size_t; __format:Pchar; var __tp:tm):size_t;cdecl;external clib name 'strftime';
function strptime(__s:Pchar; __fmt:Pchar; var __tp: tm):Pchar;cdecl;external clib name 'strptime';
function gmtime(var __timer : ttime_t):Ptm;cdecl;external clib name 'gmtime';
function localtime(var __timer : ttime_t):Ptm;cdecl;external clib name 'localtime';
function gmtime_r(var __timer : ttime_t; var __tp:tm):Ptm;cdecl;external clib name 'gmtime_r';
function localtime_r(var __timer : ttime_t; var __tp: tm):Ptm;cdecl;external clib name 'localtime_r';
function asctime(var __tp: tm):Pchar;cdecl;external clib name 'asctime';
function ctime(var __timer : ttime_t):Pchar;cdecl;external clib name 'ctime';
function asctime_r(var __tp:tm; __buf:Pchar):Pchar;cdecl;external clib name 'asctime_r';
function ctime_r(var __timer : ttime_t; __buf:Pchar):Pchar;cdecl;external clib name 'ctime_r';
function stime(var __when : ttime_t):longint;cdecl;external clib name 'stime';
function timegm(var __tp:tm):time_t;cdecl;external clib name 'timegm';
function timelocal(var __tp: tm):time_t;cdecl;external clib name 'timelocal';
function nanosleep(var __requested_time : ttimespec; var __remaining : ttimespec):longint;cdecl;external clib name 'nanosleep';
function clock_getres(var __clock_id:clockid_t; __res : ttimespec):longint;cdecl;external clib name 'clock_getres';
function clock_gettime(var __clock_id:clockid_t; __tp : ttimespec):longint;cdecl;external clib name 'clock_gettime';
function clock_settime(var __clock_id:clockid_t; __tp : ttimespec):longint;cdecl;external clib name 'clock_settime';
function clock_nanosleep(var __clock_id:clockid_t; __flags:longint; __req : ttimespec; var __rem : ttimespec):longint;cdecl;external clib name 'clock_nanosleep';
function clock_getcpuclockid(__pid:pid_t; var __clock_id: tclockid_t):longint;cdecl;external clib name 'clock_getcpuclockid';
function timer_create(__clock_id:clockid_t; var __ev :tsigevent; var __timerid:timer_t):longint;cdecl;external clib name 'timer_create';
function timer_settime(__timerid:timer_t; __flags:longint; const __value: titimerspec; var __ovalue:titimerspec):longint;cdecl;external clib name 'timer_settime';
function timer_gettime(__timerid:timer_t; var __value: titimerspec):longint;cdecl;external clib name 'timer_gettime';
|
