ttimeh.inc 3.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485
  1. type
  2. Pclock_t = ^clock_t;
  3. clock_t = __clock_t;
  4. Ptime_t = ^time_t;
  5. time_t = __time_t;
  6. Pclockid_t = ^clockid_t;
  7. clockid_t = __clockid_t;
  8. Ptimer_t = ^timer_t;
  9. timer_t = __timer_t;
  10. type
  11. Ptm = ^tm;
  12. tm = record
  13. tm_sec : longint;
  14. tm_min : longint;
  15. tm_hour : longint;
  16. tm_mday : longint;
  17. tm_mon : longint;
  18. tm_year : longint;
  19. tm_wday : longint;
  20. tm_yday : longint;
  21. tm_isdst : longint;
  22. tm_gmtoff : longint;
  23. tm_zone : Pchar;
  24. __tm_gmtoff : longint;
  25. __tm_zone : Pchar;
  26. end;
  27. Pitimerspec = ^itimerspec;
  28. itimerspec = record
  29. it_interval : timespec;
  30. it_value : timespec;
  31. end;
  32. var
  33. getdate_err : longint;cvar;external;
  34. function getdate(__string:Pchar):Ptm;cdecl;external clib name 'getdate';
  35. function getdate_r(__string:Pchar; __resbufp:Ptm):longint;cdecl;external clib name 'getdate_r';
  36. { ---------------------------------------------------------------------
  37. Borland compatibility types
  38. ---------------------------------------------------------------------}
  39. Type
  40. TTime_T = Time_t;
  41. TCLOCKID_T = CLOCKID_T;
  42. TUnixTime = tm;
  43. PUnixTime = ^TUnixTime;
  44. TITimerSpec = itimerspec;
  45. function __time(var __timer : ttime_t):time_t;cdecl;external clib name 'time';
  46. function mktime(var __tp:tm):time_t;cdecl;external clib name 'mktime';
  47. function strftime(__s:Pchar; __maxsize:size_t; __format:Pchar; var __tp:tm):size_t;cdecl;external clib name 'strftime';
  48. function strptime(__s:Pchar; __fmt:Pchar; var __tp: tm):Pchar;cdecl;external clib name 'strptime';
  49. function gmtime(var __timer : ttime_t):Ptm;cdecl;external clib name 'gmtime';
  50. function localtime(var __timer : ttime_t):Ptm;cdecl;external clib name 'localtime';
  51. function gmtime_r(var __timer : ttime_t; var __tp:tm):Ptm;cdecl;external clib name 'gmtime_r';
  52. function localtime_r(var __timer : ttime_t; var __tp: tm):Ptm;cdecl;external clib name 'localtime_r';
  53. function asctime(var __tp: tm):Pchar;cdecl;external clib name 'asctime';
  54. function ctime(var __timer : ttime_t):Pchar;cdecl;external clib name 'ctime';
  55. function asctime_r(var __tp:tm; __buf:Pchar):Pchar;cdecl;external clib name 'asctime_r';
  56. function ctime_r(var __timer : ttime_t; __buf:Pchar):Pchar;cdecl;external clib name 'ctime_r';
  57. function stime(var __when : ttime_t):longint;cdecl;external clib name 'stime';
  58. function timegm(var __tp:tm):time_t;cdecl;external clib name 'timegm';
  59. function timelocal(var __tp: tm):time_t;cdecl;external clib name 'timelocal';
  60. function nanosleep(var __requested_time : ttimespec; var __remaining : ttimespec):longint;cdecl;external clib name 'nanosleep';
  61. function clock_getres(var __clock_id:clockid_t; __res : ttimespec):longint;cdecl;external clib name 'clock_getres';
  62. function clock_gettime(var __clock_id:clockid_t; __tp : ttimespec):longint;cdecl;external clib name 'clock_gettime';
  63. function clock_settime(var __clock_id:clockid_t; __tp : ttimespec):longint;cdecl;external clib name 'clock_settime';
  64. function clock_nanosleep(var __clock_id:clockid_t; __flags:longint; __req : ttimespec; var __rem : ttimespec):longint;cdecl;external clib name 'clock_nanosleep';
  65. function clock_getcpuclockid(__pid:pid_t; var __clock_id: tclockid_t):longint;cdecl;external clib name 'clock_getcpuclockid';
  66. function timer_create(__clock_id:clockid_t; var __ev :tsigevent; var __timerid:timer_t):longint;cdecl;external clib name 'timer_create';
  67. function timer_settime(__timerid:timer_t; __flags:longint; const __value: titimerspec; var __ovalue:titimerspec):longint;cdecl;external clib name 'timer_settime';
  68. function timer_gettime(__timerid:timer_t; var __value: titimerspec):longint;cdecl;external clib name 'timer_gettime';