fpc/packages/base/libc/timeh.inc

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';