2 * Precise timer routines using Mach timing
4 * Copyright (c) 2003-2004, Dan Villiom Podlaski Christiansen
6 * Permission is hereby granted, free of charge, to any person
7 * obtaining a copy of this software and associated documentation
8 * files (the "Software"), to deal in the Software without
9 * restriction, including without limitation the rights to use, copy,
10 * modify, merge, publish, distribute, sublicense, and/or sell copies
11 * of the Software, and to permit persons to whom the Software is
12 * furnished to do so, subject to the following conditions:
14 * The above copyright notice and this permission notice shall be
15 * included in all copies or substantial portions of the Software.
23 #include <mach/mach_time.h>
29 /* global variables */
30 static double timebase_ratio
;
32 const char timer_name
[] = "Darwin accurate";
36 /* the core sleep function, uses floats and is used in MPlayer G2 */
37 static float sleep_accurate(float time_frame
)
39 uint64_t deadline
= time_frame
/ timebase_ratio
+ mach_absolute_time();
41 mach_wait_until(deadline
);
43 return (mach_absolute_time() - deadline
) * timebase_ratio
;
46 /* wrapper for MPlayer G1 */
47 int usec_sleep(int usec_delay
)
49 return sleep_accurate(usec_delay
/ 1e6
) * 1e6
;
53 /* current time in microseconds */
54 unsigned int GetTimer(void)
56 return (unsigned int)(uint64_t)(mach_absolute_time() * timebase_ratio
* 1e6
);
59 /* current time in milliseconds */
60 unsigned int GetTimerMS(void)
62 return (unsigned int)(uint64_t)(mach_absolute_time() * timebase_ratio
* 1e3
);
65 /* initialize timer, must be called at least once at start */
68 struct mach_timebase_info timebase
;
70 mach_timebase_info(&timebase
);
71 timebase_ratio
= (double)timebase
.numer
/ (double)timebase
.denom
84 for (i
= 0; i
< c
; i
++) {
85 const int delay
= rand() / (RAND_MAX
/ 1e5
);
88 r
= usec_sleep(delay
);
90 r
= sleep_accurate(delay
/ 1e6
) * 1e6
;
92 j
= (GetTimer() - j
) - delay
;
93 printf("sleep time:%8i %5i (%i)\n", delay
, j
, j
- r
);
96 fprintf(stderr
, "average error:\t%lli\n", t
/ c
);