|  | /* | 
|  | * QEMU coroutine sleep | 
|  | * | 
|  | * Copyright IBM, Corp. 2011 | 
|  | * | 
|  | * Authors: | 
|  | *  Stefan Hajnoczi    <stefanha@linux.vnet.ibm.com> | 
|  | * | 
|  | * This work is licensed under the terms of the GNU LGPL, version 2 or later. | 
|  | * See the COPYING.LIB file in the top-level directory. | 
|  | * | 
|  | */ | 
|  |  | 
|  | #include "qemu/osdep.h" | 
|  | #include "qemu/coroutine_int.h" | 
|  | #include "qemu/timer.h" | 
|  | #include "block/aio.h" | 
|  |  | 
|  | static const char *qemu_co_sleep_ns__scheduled = "qemu_co_sleep_ns"; | 
|  |  | 
|  | void qemu_co_sleep_wake(QemuCoSleep *w) | 
|  | { | 
|  | Coroutine *co; | 
|  |  | 
|  | co = w->to_wake; | 
|  | w->to_wake = NULL; | 
|  | if (co) { | 
|  | /* Write of schedule protected by barrier write in aio_co_schedule */ | 
|  | const char *scheduled = qatomic_cmpxchg(&co->scheduled, | 
|  | qemu_co_sleep_ns__scheduled, NULL); | 
|  |  | 
|  | assert(scheduled == qemu_co_sleep_ns__scheduled); | 
|  | aio_co_wake(co); | 
|  | } | 
|  | } | 
|  |  | 
|  | static void co_sleep_cb(void *opaque) | 
|  | { | 
|  | QemuCoSleep *w = opaque; | 
|  | qemu_co_sleep_wake(w); | 
|  | } | 
|  |  | 
|  | void coroutine_fn qemu_co_sleep(QemuCoSleep *w) | 
|  | { | 
|  | Coroutine *co = qemu_coroutine_self(); | 
|  |  | 
|  | const char *scheduled = qatomic_cmpxchg(&co->scheduled, NULL, | 
|  | qemu_co_sleep_ns__scheduled); | 
|  | if (scheduled) { | 
|  | fprintf(stderr, | 
|  | "%s: Co-routine was already scheduled in '%s'\n", | 
|  | __func__, scheduled); | 
|  | abort(); | 
|  | } | 
|  |  | 
|  | w->to_wake = co; | 
|  | qemu_coroutine_yield(); | 
|  |  | 
|  | /* w->to_wake is cleared before resuming this coroutine.  */ | 
|  | assert(w->to_wake == NULL); | 
|  | } | 
|  |  | 
|  | void coroutine_fn qemu_co_sleep_ns_wakeable(QemuCoSleep *w, | 
|  | QEMUClockType type, int64_t ns) | 
|  | { | 
|  | AioContext *ctx = qemu_get_current_aio_context(); | 
|  | QEMUTimer ts; | 
|  |  | 
|  | aio_timer_init(ctx, &ts, type, SCALE_NS, co_sleep_cb, w); | 
|  | timer_mod(&ts, qemu_clock_get_ns(type) + ns); | 
|  |  | 
|  | /* | 
|  | * The timer will fire in the current AiOContext, so the callback | 
|  | * must happen after qemu_co_sleep yields and there is no race | 
|  | * between timer_mod and qemu_co_sleep. | 
|  | */ | 
|  | qemu_co_sleep(w); | 
|  | timer_del(&ts); | 
|  | } |