4 #include "qemu-common.h"
5 #include "qemu/notify.h"
6 #include "qemu/host-utils.h"
7 #include "sysemu/cpus.h"
9 #define NANOSECONDS_PER_SECOND 1000000000LL
13 #define SCALE_MS 1000000
20 * The following clock types are available:
22 * @QEMU_CLOCK_REALTIME: Real time clock
24 * The real time clock should be used only for stuff which does not
25 * change the virtual machine state, as it is run even if the virtual
26 * machine is stopped. The real time clock has a frequency of 1000
29 * @QEMU_CLOCK_VIRTUAL: virtual clock
31 * The virtual clock is only run during the emulation. It is stopped
32 * when the virtual machine is stopped. Virtual timers use a high
33 * precision clock, usually cpu cycles (use ticks_per_sec).
35 * @QEMU_CLOCK_HOST: host clock
37 * The host clock should be use for device models that emulate accurate
38 * real time sources. It will continue to run when the virtual machine
39 * is suspended, and it will reflect system time changes the host may
40 * undergo (e.g. due to NTP). The host clock has the same precision as
43 * @QEMU_CLOCK_VIRTUAL_RT: realtime clock used for icount warp
45 * Outside icount mode, this clock is the same as @QEMU_CLOCK_VIRTUAL.
46 * In icount mode, this clock counts nanoseconds while the virtual
47 * machine is running. It is used to increase @QEMU_CLOCK_VIRTUAL
48 * while the CPUs are sleeping and thus not executing instructions.
52 QEMU_CLOCK_REALTIME
= 0,
53 QEMU_CLOCK_VIRTUAL
= 1,
55 QEMU_CLOCK_VIRTUAL_RT
= 3,
59 typedef struct QEMUTimerList QEMUTimerList
;
61 struct QEMUTimerListGroup
{
62 QEMUTimerList
*tl
[QEMU_CLOCK_MAX
];
65 typedef void QEMUTimerCB(void *opaque
);
66 typedef void QEMUTimerListNotifyCB(void *opaque
);
69 int64_t expire_time
; /* in nanoseconds */
70 QEMUTimerList
*timer_list
;
77 extern QEMUTimerListGroup main_loop_tlg
;
85 * @type: the clock type
87 * Get the nanosecond value of a clock with
90 * Returns: the clock value in nanoseconds
92 int64_t qemu_clock_get_ns(QEMUClockType type
);
96 * @type: the clock type
98 * Get the millisecond value of a clock with
101 * Returns: the clock value in milliseconds
103 static inline int64_t qemu_clock_get_ms(QEMUClockType type
)
105 return qemu_clock_get_ns(type
) / SCALE_MS
;
110 * @type: the clock type
112 * Get the microsecond value of a clock with
115 * Returns: the clock value in microseconds
117 static inline int64_t qemu_clock_get_us(QEMUClockType type
)
119 return qemu_clock_get_ns(type
) / SCALE_US
;
123 * qemu_clock_has_timers:
124 * @type: the clock type
126 * Determines whether a clock's default timer list
127 * has timers attached
129 * Note that this function should not be used when other threads also access
130 * the timer list. The return value may be outdated by the time it is acted
133 * Returns: true if the clock's default timer list
134 * has timers attached
136 bool qemu_clock_has_timers(QEMUClockType type
);
139 * qemu_clock_expired:
140 * @type: the clock type
142 * Determines whether a clock's default timer list
143 * has an expired clock.
145 * Returns: true if the clock's default timer list has
148 bool qemu_clock_expired(QEMUClockType type
);
151 * qemu_clock_use_for_deadline:
152 * @type: the clock type
154 * Determine whether a clock should be used for deadline
155 * calculations. Some clocks, for instance vm_clock with
156 * use_icount set, do not count in nanoseconds. Such clocks
157 * are not used for deadline calculations, and are presumed
158 * to interrupt any poll using qemu_notify/aio_notify
161 * Returns: true if the clock runs in nanoseconds and
162 * should be used for a deadline.
164 bool qemu_clock_use_for_deadline(QEMUClockType type
);
167 * qemu_clock_deadline_ns_all:
168 * @type: the clock type
170 * Calculate the deadline across all timer lists associated
171 * with a clock (as opposed to just the default one)
172 * in nanoseconds, or -1 if no timer is set to expire.
174 * Returns: time until expiry in nanoseconds or -1
176 int64_t qemu_clock_deadline_ns_all(QEMUClockType type
);
179 * qemu_clock_get_main_loop_timerlist:
180 * @type: the clock type
182 * Return the default timer list assocatiated with a clock.
184 * Returns: the default timer list
186 QEMUTimerList
*qemu_clock_get_main_loop_timerlist(QEMUClockType type
);
190 * @type: the clock type
192 * Call the notifier callback connected with the default timer
193 * list linked to the clock, or qemu_notify() if none.
195 void qemu_clock_notify(QEMUClockType type
);
199 * @type: the clock type
200 * @enabled: true to enable, false to disable
202 * Enable or disable a clock
203 * Disabling the clock will wait for related timerlists to stop
204 * executing qemu_run_timers. Thus, this functions should not
205 * be used from the callback of a timer that is based on @clock.
206 * Doing so would cause a deadlock.
208 * Caller should hold BQL.
210 void qemu_clock_enable(QEMUClockType type
, bool enabled
);
213 * qemu_start_warp_timer:
215 * Starts a timer for virtual clock update
217 void qemu_start_warp_timer(void);
220 * qemu_clock_register_reset_notifier:
221 * @type: the clock type
222 * @notifier: the notifier function
224 * Register a notifier function to call when the clock
225 * concerned is reset.
227 void qemu_clock_register_reset_notifier(QEMUClockType type
,
231 * qemu_clock_unregister_reset_notifier:
232 * @type: the clock type
233 * @notifier: the notifier function
235 * Unregister a notifier function to call when the clock
236 * concerned is reset.
238 void qemu_clock_unregister_reset_notifier(QEMUClockType type
,
242 * qemu_clock_run_timers:
243 * @type: clock on which to operate
245 * Run all the timers associated with the default timer list
248 * Returns: true if any timer ran.
250 bool qemu_clock_run_timers(QEMUClockType type
);
253 * qemu_clock_run_all_timers:
255 * Run all the timers associated with the default timer list
258 * Returns: true if any timer ran.
260 bool qemu_clock_run_all_timers(void);
268 * @type: the clock type to associate with the timerlist
269 * @cb: the callback to call on notification
270 * @opaque: the opaque pointer to pass to the callback
272 * Create a new timerlist associated with the clock of
275 * Returns: a pointer to the QEMUTimerList created
277 QEMUTimerList
*timerlist_new(QEMUClockType type
,
278 QEMUTimerListNotifyCB
*cb
, void *opaque
);
282 * @timer_list: the timer list to free
284 * Frees a timer_list. It must have no active timers.
286 void timerlist_free(QEMUTimerList
*timer_list
);
289 * timerlist_has_timers:
290 * @timer_list: the timer list to operate on
292 * Determine whether a timer list has active timers
294 * Note that this function should not be used when other threads also access
295 * the timer list. The return value may be outdated by the time it is acted
298 * Returns: true if the timer list has timers.
300 bool timerlist_has_timers(QEMUTimerList
*timer_list
);
304 * @timer_list: the timer list to operate on
306 * Determine whether a timer list has any timers which
309 * Returns: true if the timer list has timers which
312 bool timerlist_expired(QEMUTimerList
*timer_list
);
315 * timerlist_deadline_ns:
316 * @timer_list: the timer list to operate on
318 * Determine the deadline for a timer_list, i.e.
319 * the number of nanoseconds until the first timer
320 * expires. Return -1 if there are no timers.
322 * Returns: the number of nanoseconds until the earliest
323 * timer expires -1 if none
325 int64_t timerlist_deadline_ns(QEMUTimerList
*timer_list
);
328 * timerlist_get_clock:
329 * @timer_list: the timer list to operate on
331 * Determine the clock type associated with a timer list.
333 * Returns: the clock type associated with the
336 QEMUClockType
timerlist_get_clock(QEMUTimerList
*timer_list
);
339 * timerlist_run_timers:
340 * @timer_list: the timer list to use
342 * Call all expired timers associated with the timer list.
344 * Returns: true if any timer expired
346 bool timerlist_run_timers(QEMUTimerList
*timer_list
);
350 * @timer_list: the timer list to use
352 * call the notifier callback associated with the timer list.
354 void timerlist_notify(QEMUTimerList
*timer_list
);
361 * timerlistgroup_init:
362 * @tlg: the timer list group
363 * @cb: the callback to call when a notify is required
364 * @opaque: the opaque pointer to be passed to the callback.
366 * Initialise a timer list group. This must already be
367 * allocated in memory and zeroed. The notifier callback is
368 * called whenever a clock in the timer list group is
369 * reenabled or whenever a timer associated with any timer
370 * list is modified. If @cb is specified as null, qemu_notify()
373 void timerlistgroup_init(QEMUTimerListGroup
*tlg
,
374 QEMUTimerListNotifyCB
*cb
, void *opaque
);
377 * timerlistgroup_deinit:
378 * @tlg: the timer list group
380 * Deinitialise a timer list group. This must already be
381 * initialised. Note the memory is not freed.
383 void timerlistgroup_deinit(QEMUTimerListGroup
*tlg
);
386 * timerlistgroup_run_timers:
387 * @tlg: the timer list group
389 * Run the timers associated with a timer list group.
390 * This will run timers on multiple clocks.
392 * Returns: true if any timer callback ran
394 bool timerlistgroup_run_timers(QEMUTimerListGroup
*tlg
);
397 * timerlistgroup_deadline_ns:
398 * @tlg: the timer list group
400 * Determine the deadline of the soonest timer to
401 * expire associated with any timer list linked to
402 * the timer list group. Only clocks suitable for
403 * deadline calculation are included.
405 * Returns: the deadline in nanoseconds or -1 if no
406 * timers are to expire.
408 int64_t timerlistgroup_deadline_ns(QEMUTimerListGroup
*tlg
);
416 * @ts: the timer to be initialised
417 * @timer_list: the timer list to attach the timer to
418 * @scale: the scale value for the timer
419 * @cb: the callback to be called when the timer expires
420 * @opaque: the opaque pointer to be passed to the callback
422 * Initialise a new timer and associate it with @timer_list.
423 * The caller is responsible for allocating the memory.
425 * You need not call an explicit deinit call. Simply make
426 * sure it is not on a list with timer_del.
428 void timer_init_tl(QEMUTimer
*ts
,
429 QEMUTimerList
*timer_list
, int scale
,
430 QEMUTimerCB
*cb
, void *opaque
);
434 * @type: the clock to associate with the timer
435 * @scale: the scale value for the timer
436 * @cb: the callback to call when the timer expires
437 * @opaque: the opaque pointer to pass to the callback
439 * Initialize a timer with the given scale on the default timer list
440 * associated with the clock.
442 * You need not call an explicit deinit call. Simply make
443 * sure it is not on a list with timer_del.
445 static inline void timer_init(QEMUTimer
*ts
, QEMUClockType type
, int scale
,
446 QEMUTimerCB
*cb
, void *opaque
)
448 timer_init_tl(ts
, main_loop_tlg
.tl
[type
], scale
, cb
, opaque
);
453 * @type: the clock to associate with the timer
454 * @cb: the callback to call when the timer expires
455 * @opaque: the opaque pointer to pass to the callback
457 * Initialize a timer with nanosecond scale on the default timer list
458 * associated with the clock.
460 * You need not call an explicit deinit call. Simply make
461 * sure it is not on a list with timer_del.
463 static inline void timer_init_ns(QEMUTimer
*ts
, QEMUClockType type
,
464 QEMUTimerCB
*cb
, void *opaque
)
466 timer_init(ts
, type
, SCALE_NS
, cb
, opaque
);
471 * @type: the clock to associate with the timer
472 * @cb: the callback to call when the timer expires
473 * @opaque: the opaque pointer to pass to the callback
475 * Initialize a timer with microsecond scale on the default timer list
476 * associated with the clock.
478 * You need not call an explicit deinit call. Simply make
479 * sure it is not on a list with timer_del.
481 static inline void timer_init_us(QEMUTimer
*ts
, QEMUClockType type
,
482 QEMUTimerCB
*cb
, void *opaque
)
484 timer_init(ts
, type
, SCALE_US
, cb
, opaque
);
489 * @type: the clock to associate with the timer
490 * @cb: the callback to call when the timer expires
491 * @opaque: the opaque pointer to pass to the callback
493 * Initialize a timer with millisecond scale on the default timer list
494 * associated with the clock.
496 * You need not call an explicit deinit call. Simply make
497 * sure it is not on a list with timer_del.
499 static inline void timer_init_ms(QEMUTimer
*ts
, QEMUClockType type
,
500 QEMUTimerCB
*cb
, void *opaque
)
502 timer_init(ts
, type
, SCALE_MS
, cb
, opaque
);
507 * @timer_list: the timer list to attach the timer to
508 * @scale: the scale value for the timer
509 * @cb: the callback to be called when the timer expires
510 * @opaque: the opaque pointer to be passed to the callback
512 * Creeate a new timer and associate it with @timer_list.
513 * The memory is allocated by the function.
515 * This is not the preferred interface unless you know you
516 * are going to call timer_free. Use timer_init instead.
518 * Returns: a pointer to the timer
520 static inline QEMUTimer
*timer_new_tl(QEMUTimerList
*timer_list
,
525 QEMUTimer
*ts
= g_malloc0(sizeof(QEMUTimer
));
526 timer_init_tl(ts
, timer_list
, scale
, cb
, opaque
);
532 * @type: the clock type to use
533 * @scale: the scale value for the timer
534 * @cb: the callback to be called when the timer expires
535 * @opaque: the opaque pointer to be passed to the callback
537 * Creeate a new timer and associate it with the default
538 * timer list for the clock type @type.
540 * Returns: a pointer to the timer
542 static inline QEMUTimer
*timer_new(QEMUClockType type
, int scale
,
543 QEMUTimerCB
*cb
, void *opaque
)
545 return timer_new_tl(main_loop_tlg
.tl
[type
], scale
, cb
, opaque
);
550 * @clock: the clock to associate with the timer
551 * @callback: the callback to call when the timer expires
552 * @opaque: the opaque pointer to pass to the callback
554 * Create a new timer with nanosecond scale on the default timer list
555 * associated with the clock.
557 * Returns: a pointer to the newly created timer
559 static inline QEMUTimer
*timer_new_ns(QEMUClockType type
, QEMUTimerCB
*cb
,
562 return timer_new(type
, SCALE_NS
, cb
, opaque
);
567 * @clock: the clock to associate with the timer
568 * @callback: the callback to call when the timer expires
569 * @opaque: the opaque pointer to pass to the callback
571 * Create a new timer with microsecond scale on the default timer list
572 * associated with the clock.
574 * Returns: a pointer to the newly created timer
576 static inline QEMUTimer
*timer_new_us(QEMUClockType type
, QEMUTimerCB
*cb
,
579 return timer_new(type
, SCALE_US
, cb
, opaque
);
584 * @clock: the clock to associate with the timer
585 * @callback: the callback to call when the timer expires
586 * @opaque: the opaque pointer to pass to the callback
588 * Create a new timer with millisecond scale on the default timer list
589 * associated with the clock.
591 * Returns: a pointer to the newly created timer
593 static inline QEMUTimer
*timer_new_ms(QEMUClockType type
, QEMUTimerCB
*cb
,
596 return timer_new(type
, SCALE_MS
, cb
, opaque
);
601 * @ts: the timer to be de-initialised
603 * Deassociate the timer from any timerlist. You should
604 * call timer_del before. After this call, any further
605 * timer_del call cannot cause dangling pointer accesses
606 * even if the previously used timerlist is freed.
608 void timer_deinit(QEMUTimer
*ts
);
614 * Free a timer (it must not be on the active list)
616 void timer_free(QEMUTimer
*ts
);
622 * Delete a timer from the active list.
624 * This function is thread-safe but the timer and its timer list must not be
625 * freed while this function is running.
627 void timer_del(QEMUTimer
*ts
);
632 * @expire_time: the expiry time in nanoseconds
634 * Modify a timer to expire at @expire_time
636 * This function is thread-safe but the timer and its timer list must not be
637 * freed while this function is running.
639 void timer_mod_ns(QEMUTimer
*ts
, int64_t expire_time
);
642 * timer_mod_anticipate_ns:
644 * @expire_time: the expiry time in nanoseconds
646 * Modify a timer to expire at @expire_time or the current time,
647 * whichever comes earlier.
649 * This function is thread-safe but the timer and its timer list must not be
650 * freed while this function is running.
652 void timer_mod_anticipate_ns(QEMUTimer
*ts
, int64_t expire_time
);
657 * @expire_time: the expire time in the units associated with the timer
659 * Modify a timer to expiry at @expire_time, taking into
660 * account the scale associated with the timer.
662 * This function is thread-safe but the timer and its timer list must not be
663 * freed while this function is running.
665 void timer_mod(QEMUTimer
*ts
, int64_t expire_timer
);
668 * timer_mod_anticipate:
670 * @expire_time: the expiry time in nanoseconds
672 * Modify a timer to expire at @expire_time or the current time, whichever
673 * comes earlier, taking into account the scale associated with the timer.
675 * This function is thread-safe but the timer and its timer list must not be
676 * freed while this function is running.
678 void timer_mod_anticipate(QEMUTimer
*ts
, int64_t expire_time
);
684 * Determines whether a timer is pending (i.e. is on the
685 * active list of timers, whether or not it has not yet expired).
687 * Returns: true if the timer is pending
689 bool timer_pending(QEMUTimer
*ts
);
695 * Determines whether a timer has expired.
697 * Returns: true if the timer has expired
699 bool timer_expired(QEMUTimer
*timer_head
, int64_t current_time
);
702 * timer_expire_time_ns:
705 * Determine the expiry time of a timer
707 * Returns: the expiry time in nanoseconds
709 uint64_t timer_expire_time_ns(QEMUTimer
*ts
);
716 * Read a timer @ts from a file @f
718 void timer_get(QEMUFile
*f
, QEMUTimer
*ts
);
725 void timer_put(QEMUFile
*f
, QEMUTimer
*ts
);
728 * General utility functions
732 * qemu_timeout_ns_to_ms:
733 * @ns: nanosecond timeout value
735 * Convert a nanosecond timeout value (or -1) to
736 * a millisecond value (or -1), always rounding up.
738 * Returns: millisecond timeout value
740 int qemu_timeout_ns_to_ms(int64_t ns
);
744 * @fds: Array of file descriptors
745 * @nfds: number of file descriptors
746 * @timeout: timeout in nanoseconds
748 * Perform a poll like g_poll but with a timeout in nanoseconds.
749 * See g_poll documentation for further details.
751 * Returns: number of fds ready
753 int qemu_poll_ns(GPollFD
*fds
, guint nfds
, int64_t timeout
);
756 * qemu_soonest_timeout:
757 * @timeout1: first timeout in nanoseconds (or -1 for infinite)
758 * @timeout2: second timeout in nanoseconds (or -1 for infinite)
760 * Calculates the soonest of two timeout values. -1 means infinite, which
761 * is later than any other value.
763 * Returns: soonest timeout value in nanoseconds (or -1 for infinite)
765 static inline int64_t qemu_soonest_timeout(int64_t timeout1
, int64_t timeout2
)
767 /* we can abuse the fact that -1 (which means infinite) is a maximal
768 * value when cast to unsigned. As this is disgusting, it's kept in
769 * one inline function.
771 return ((uint64_t) timeout1
< (uint64_t) timeout2
) ? timeout1
: timeout2
;
777 * Initialise the clock & timer infrastructure
779 void init_clocks(void);
781 int64_t cpu_get_ticks(void);
782 /* Caller must hold BQL */
783 void cpu_enable_ticks(void);
784 /* Caller must hold BQL */
785 void cpu_disable_ticks(void);
787 static inline int64_t get_max_clock_jump(void)
789 /* This should be small enough to prevent excessive interrupts from being
790 * generated by the RTC on clock jumps, but large enough to avoid frequent
791 * unnecessary resets in idle VMs.
793 return 60 * NANOSECONDS_PER_SECOND
;
797 * Low level clock functions
800 /* real time host monotonic timer */
801 static inline int64_t get_clock_realtime(void)
805 gettimeofday(&tv
, NULL
);
806 return tv
.tv_sec
* 1000000000LL + (tv
.tv_usec
* 1000);
809 /* Warning: don't insert tracepoints into these functions, they are
810 also used by simpletrace backend and tracepoints would cause
811 an infinite recursion! */
813 extern int64_t clock_freq
;
815 static inline int64_t get_clock(void)
818 QueryPerformanceCounter(&ti
);
819 return muldiv64(ti
.QuadPart
, NANOSECONDS_PER_SECOND
, clock_freq
);
824 extern int use_rt_clock
;
826 static inline int64_t get_clock(void)
828 #ifdef CLOCK_MONOTONIC
831 clock_gettime(CLOCK_MONOTONIC
, &ts
);
832 return ts
.tv_sec
* 1000000000LL + ts
.tv_nsec
;
836 /* XXX: using gettimeofday leads to problems if the date
837 changes, so it should be avoided. */
838 return get_clock_realtime();
844 int64_t cpu_get_icount_raw(void);
845 int64_t cpu_get_icount(void);
846 int64_t cpu_get_clock(void);
847 int64_t cpu_icount_to_ns(int64_t icount
);
849 /*******************************************/
850 /* host CPU ticks (if available) */
852 #if defined(_ARCH_PPC)
854 static inline int64_t cpu_get_host_ticks(void)
858 /* This reads timebase in one 64bit go and includes Cell workaround from:
859 http://ozlabs.org/pipermail/linuxppc-dev/2006-October/027052.html
861 __asm__
__volatile__ ("mftb %0\n\t"
866 /* http://ozlabs.org/pipermail/linuxppc-dev/1999-October/003889.html */
868 __asm__
__volatile__ ("mfspr %1,269\n\t" /* mftbu */
869 "mfspr %L0,268\n\t" /* mftb */
870 "mfspr %0,269\n\t" /* mftbu */
873 : "=r" (retval
), "=r" (junk
));
878 #elif defined(__i386__)
880 static inline int64_t cpu_get_host_ticks(void)
883 asm volatile ("rdtsc" : "=A" (val
));
887 #elif defined(__x86_64__)
889 static inline int64_t cpu_get_host_ticks(void)
893 asm volatile("rdtsc" : "=a" (low
), "=d" (high
));
900 #elif defined(__hppa__)
902 static inline int64_t cpu_get_host_ticks(void)
905 asm volatile ("mfctl %%cr16, %0" : "=r"(val
));
909 #elif defined(__ia64)
911 static inline int64_t cpu_get_host_ticks(void)
914 asm volatile ("mov %0 = ar.itc" : "=r"(val
) :: "memory");
918 #elif defined(__s390__)
920 static inline int64_t cpu_get_host_ticks(void)
923 asm volatile("stck 0(%1)" : "=m" (val
) : "a" (&val
) : "cc");
927 #elif defined(__sparc__)
929 static inline int64_t cpu_get_host_ticks (void)
933 asm volatile("rd %%tick,%0" : "=r"(rval
));
936 /* We need an %o or %g register for this. For recent enough gcc
937 there is an "h" constraint for that. Don't bother with that. */
945 asm volatile("rd %%tick,%%g1; srlx %%g1,32,%0; mov %%g1,%1"
946 : "=r"(rval
.i32
.high
), "=r"(rval
.i32
.low
) : : "g1");
951 #elif defined(__mips__) && \
952 ((defined(__mips_isa_rev) && __mips_isa_rev >= 2) || defined(__linux__))
954 * binutils wants to use rdhwr only on mips32r2
955 * but as linux kernel emulate it, it's fine
959 #define MIPS_RDHWR(rd, value) { \
960 __asm__ __volatile__ (".set push\n\t" \
961 ".set mips32r2\n\t" \
962 "rdhwr %0, "rd"\n\t" \
967 static inline int64_t cpu_get_host_ticks(void)
969 /* On kernels >= 2.6.25 rdhwr <reg>, $2 and $3 are emulated */
971 static uint32_t cyc_per_count
= 0;
973 if (!cyc_per_count
) {
974 MIPS_RDHWR("$3", cyc_per_count
);
977 MIPS_RDHWR("$2", count
);
978 return (int64_t)(count
* cyc_per_count
);
981 #elif defined(__alpha__)
983 static inline int64_t cpu_get_host_ticks(void)
988 asm volatile("rpcc %0" : "=r"(cc
));
995 /* The host CPU doesn't have an easily accessible cycle counter.
996 Just return a monotonically increasing value. This will be
997 totally wrong, but hopefully better than nothing. */
998 static inline int64_t cpu_get_host_ticks (void)
1000 static int64_t ticks
= 0;
1005 #ifdef CONFIG_PROFILER
1006 static inline int64_t profile_getclock(void)
1011 extern int64_t tcg_time
;
1012 extern int64_t dev_time
;