qemu-timer.h

   1 #ifndef QEMU_TIMER_H
   2 #define QEMU_TIMER_H
   3
   4 #include "qemu-common.h"
   5 #include <time.h>
   6 #include <sys/time.h>
   7
   8 #ifdef _WIN32
   9 #include <windows.h>
  10 #include <mmsystem.h>
  11 #endif
  12
  13 /* timers */
  14
  15 #define SCALE_MS 1000000
  16 #define SCALE_US 1000
  17 #define SCALE_NS 1
  18
  19 typedef struct QEMUClock QEMUClock;
  20 typedef void QEMUTimerCB(void *opaque);
  21
  22 /* The real time clock should be used only for stuff which does not
  23    change the virtual machine state, as it is run even if the virtual
  24    machine is stopped. The real time clock has a frequency of 1000
  25    Hz. */
  26 extern QEMUClock *rt_clock;
  27
  28 /* The virtual clock is only run during the emulation. It is stopped
  29    when the virtual machine is stopped. Virtual timers use a high
  30    precision clock, usually cpu cycles (use ticks_per_sec). */
  31 extern QEMUClock *vm_clock;
  32
  33 /* The host clock should be use for device models that emulate accurate
  34    real time sources. It will continue to run when the virtual machine
  35    is suspended, and it will reflect system time changes the host may
  36    undergo (e.g. due to NTP). The host clock has the same precision as
  37    the virtual clock. */
  38 extern QEMUClock *host_clock;
  39
  40 int64_t qemu_get_clock_ns(QEMUClock *clock);
  41 void qemu_clock_enable(QEMUClock *clock, int enabled);
  42 void qemu_clock_warp(QEMUClock *clock);
  43
  44 QEMUTimer *qemu_new_timer(QEMUClock *clock, int scale,
  45                           QEMUTimerCB *cb, void *opaque);
  46 void qemu_free_timer(QEMUTimer *ts);
  47 void qemu_del_timer(QEMUTimer *ts);
  48 void qemu_mod_timer(QEMUTimer *ts, int64_t expire_time);
  49 int qemu_timer_pending(QEMUTimer *ts);
  50 int qemu_timer_expired(QEMUTimer *timer_head, int64_t current_time);
  51
  52 void qemu_run_all_timers(void);
  53 int qemu_alarm_pending(void);
  54 int64_t qemu_next_icount_deadline(void);
  55 void configure_alarms(char const *opt);
  56 void configure_icount(const char *option);
  57 int qemu_calculate_timeout(void);
  58 void init_clocks(void);
  59 int init_timer_alarm(void);
  60 void quit_timers(void);
  61
  62 int64_t cpu_get_ticks(void);
  63 void cpu_enable_ticks(void);
  64 void cpu_disable_ticks(void);
  65
  66 static inline QEMUTimer *qemu_new_timer_ns(QEMUClock *clock, QEMUTimerCB *cb,
  67                                            void *opaque)
  68 {
  69     return qemu_new_timer(clock, SCALE_NS, cb, opaque);
  70 }
  71
  72 static inline QEMUTimer *qemu_new_timer_ms(QEMUClock *clock, QEMUTimerCB *cb,
  73                                            void *opaque)
  74 {
  75     return qemu_new_timer(clock, SCALE_MS, cb, opaque);
  76 }
  77
  78 static inline int64_t qemu_get_clock_ms(QEMUClock *clock)
  79 {
  80     return qemu_get_clock_ns(clock) / SCALE_MS;
  81 }
  82
  83 static inline int64_t get_ticks_per_sec(void)
  84 {
  85     return 1000000000LL;
  86 }
  87
  88 /* real time host monotonic timer */
  89 static inline int64_t get_clock_realtime(void)
  90 {
  91     struct timeval tv;
  92
  93     gettimeofday(&tv, NULL);
  94     return tv.tv_sec * 1000000000LL + (tv.tv_usec * 1000);
  95 }
  96
  97 /* Warning: don't insert tracepoints into these functions, they are
  98    also used by simpletrace backend and tracepoints would cause
  99    an infinite recursion! */
 100 #ifdef _WIN32
 101 extern int64_t clock_freq;
 102
 103 static inline int64_t get_clock(void)
 104 {
 105     LARGE_INTEGER ti;
 106     QueryPerformanceCounter(&ti);
 107     return muldiv64(ti.QuadPart, get_ticks_per_sec(), clock_freq);
 108 }
 109
 110 #else
 111
 112 extern int use_rt_clock;
 113
 114 static inline int64_t get_clock(void)
 115 {
 116 #if defined(__linux__) || (defined(__FreeBSD__) && __FreeBSD_version >= 500000) \
 117     || defined(__DragonFly__) || defined(__FreeBSD_kernel__)
 118     if (use_rt_clock) {
 119         struct timespec ts;
 120         clock_gettime(CLOCK_MONOTONIC, &ts);
 121         return ts.tv_sec * 1000000000LL + ts.tv_nsec;
 122     } else
 123 #endif
 124     {
 125         /* XXX: using gettimeofday leads to problems if the date
 126            changes, so it should be avoided. */
 127         return get_clock_realtime();
 128     }
 129 }
 130 #endif
 131
 132 void qemu_get_timer(QEMUFile *f, QEMUTimer *ts);
 133 void qemu_put_timer(QEMUFile *f, QEMUTimer *ts);
 134
 135 /* ptimer.c */
 136 typedef struct ptimer_state ptimer_state;
 137 typedef void (*ptimer_cb)(void *opaque);
 138
 139 ptimer_state *ptimer_init(QEMUBH *bh);
 140 void ptimer_set_period(ptimer_state *s, int64_t period);
 141 void ptimer_set_freq(ptimer_state *s, uint32_t freq);
 142 void ptimer_set_limit(ptimer_state *s, uint64_t limit, int reload);
 143 uint64_t ptimer_get_count(ptimer_state *s);
 144 void ptimer_set_count(ptimer_state *s, uint64_t count);
 145 void ptimer_run(ptimer_state *s, int oneshot);
 146 void ptimer_stop(ptimer_state *s);
 147 void qemu_put_ptimer(QEMUFile *f, ptimer_state *s);
 148 void qemu_get_ptimer(QEMUFile *f, ptimer_state *s);
 149
 150 /* icount */
 151 int64_t qemu_icount_round(int64_t count);
 152 extern int64_t qemu_icount;
 153 extern int use_icount;
 154 extern int icount_time_shift;
 155 extern int64_t qemu_icount_bias;
 156 int64_t cpu_get_icount(void);
 157
 158 /*******************************************/
 159 /* host CPU ticks (if available) */
 160
 161 #if defined(_ARCH_PPC)
 162
 163 static inline int64_t cpu_get_real_ticks(void)
 164 {
 165     int64_t retval;
 166 #ifdef _ARCH_PPC64
 167     /* This reads timebase in one 64bit go and includes Cell workaround from:
 168        http://ozlabs.org/pipermail/linuxppc-dev/2006-October/027052.html
 169     */
 170     __asm__ __volatile__ ("mftb    %0\n\t"
 171                           "cmpwi   %0,0\n\t"
 172                           "beq-    $-8"
 173                           : "=r" (retval));
 174 #else
 175     /* http://ozlabs.org/pipermail/linuxppc-dev/1999-October/003889.html */
 176     unsigned long junk;
 177     __asm__ __volatile__ ("mfspr   %1,269\n\t"  /* mftbu */
 178                           "mfspr   %L0,268\n\t" /* mftb */
 179                           "mfspr   %0,269\n\t"  /* mftbu */
 180                           "cmpw    %0,%1\n\t"
 181                           "bne     $-16"
 182                           : "=r" (retval), "=r" (junk));
 183 #endif
 184     return retval;
 185 }
 186
 187 #elif defined(__i386__)
 188
 189 static inline int64_t cpu_get_real_ticks(void)
 190 {
 191     int64_t val;
 192     asm volatile ("rdtsc" : "=A" (val));
 193     return val;
 194 }
 195
 196 #elif defined(__x86_64__)
 197
 198 static inline int64_t cpu_get_real_ticks(void)
 199 {
 200     uint32_t low,high;
 201     int64_t val;
 202     asm volatile("rdtsc" : "=a" (low), "=d" (high));
 203     val = high;
 204     val <<= 32;
 205     val |= low;
 206     return val;
 207 }
 208
 209 #elif defined(__hppa__)
 210
 211 static inline int64_t cpu_get_real_ticks(void)
 212 {
 213     int val;
 214     asm volatile ("mfctl %%cr16, %0" : "=r"(val));
 215     return val;
 216 }
 217
 218 #elif defined(__ia64)
 219
 220 static inline int64_t cpu_get_real_ticks(void)
 221 {
 222     int64_t val;
 223     asm volatile ("mov %0 = ar.itc" : "=r"(val) :: "memory");
 224     return val;
 225 }
 226
 227 #elif defined(__s390__)
 228
 229 static inline int64_t cpu_get_real_ticks(void)
 230 {
 231     int64_t val;
 232     asm volatile("stck 0(%1)" : "=m" (val) : "a" (&val) : "cc");
 233     return val;
 234 }
 235
 236 #elif defined(__sparc_v8plus__) || defined(__sparc_v8plusa__) || defined(__sparc_v9__)
 237
 238 static inline int64_t cpu_get_real_ticks (void)
 239 {
 240 #if defined(_LP64)
 241     uint64_t        rval;
 242     asm volatile("rd %%tick,%0" : "=r"(rval));
 243     return rval;
 244 #else
 245     union {
 246         uint64_t i64;
 247         struct {
 248             uint32_t high;
 249             uint32_t low;
 250         }       i32;
 251     } rval;
 252     asm volatile("rd %%tick,%1; srlx %1,32,%0"
 253                  : "=r"(rval.i32.high), "=r"(rval.i32.low));
 254     return rval.i64;
 255 #endif
 256 }
 257
 258 #elif defined(__mips__) && \
 259     ((defined(__mips_isa_rev) && __mips_isa_rev >= 2) || defined(__linux__))
 260 /*
 261  * binutils wants to use rdhwr only on mips32r2
 262  * but as linux kernel emulate it, it's fine
 263  * to use it.
 264  *
 265  */
 266 #define MIPS_RDHWR(rd, value) {                         \
 267         __asm__ __volatile__ (".set   push\n\t"         \
 268                               ".set mips32r2\n\t"       \
 269                               "rdhwr  %0, "rd"\n\t"     \
 270                               ".set   pop"              \
 271                               : "=r" (value));          \
 272     }
 273
 274 static inline int64_t cpu_get_real_ticks(void)
 275 {
 276     /* On kernels >= 2.6.25 rdhwr <reg>, $2 and $3 are emulated */
 277     uint32_t count;
 278     static uint32_t cyc_per_count = 0;
 279
 280     if (!cyc_per_count) {
 281         MIPS_RDHWR("$3", cyc_per_count);
 282     }
 283
 284     MIPS_RDHWR("$2", count);
 285     return (int64_t)(count * cyc_per_count);
 286 }
 287
 288 #elif defined(__alpha__)
 289
 290 static inline int64_t cpu_get_real_ticks(void)
 291 {
 292     uint64_t cc;
 293     uint32_t cur, ofs;
 294
 295     asm volatile("rpcc %0" : "=r"(cc));
 296     cur = cc;
 297     ofs = cc >> 32;
 298     return cur - ofs;
 299 }
 300
 301 #else
 302 /* The host CPU doesn't have an easily accessible cycle counter.
 303    Just return a monotonically increasing value.  This will be
 304    totally wrong, but hopefully better than nothing.  */
 305 static inline int64_t cpu_get_real_ticks (void)
 306 {
 307     static int64_t ticks = 0;
 308     return ticks++;
 309 }
 310 #endif
 311
 312 #ifdef NEED_CPU_H
 313 /* Deterministic execution requires that IO only be performed on the last
 314    instruction of a TB so that interrupts take effect immediately.  */
 315 static inline int can_do_io(CPUState *env)
 316 {
 317     if (!use_icount)
 318         return 1;
 319
 320     /* If not executing code then assume we are ok.  */
 321     if (!env->current_tb)
 322         return 1;
 323
 324     return env->can_do_io != 0;
 325 }
 326 #endif
 327
 328 #ifdef CONFIG_PROFILER
 329 static inline int64_t profile_getclock(void)
 330 {
 331     return cpu_get_real_ticks();
 332 }
 333
 334 extern int64_t qemu_time, qemu_time_start;
 335 extern int64_t tlb_flush_time;
 336 extern int64_t dev_time;
 337 #endif
 338
 339 #endif