From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([140.186.70.92]:39971) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RJRon-00030m-6g for qemu-devel@nongnu.org; Thu, 27 Oct 2011 11:24:34 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RJRog-0005UQ-LX for qemu-devel@nongnu.org; Thu, 27 Oct 2011 11:24:27 -0400 Received: from mtagate2.uk.ibm.com ([194.196.100.162]:54107) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RJRog-0005Dt-ET for qemu-devel@nongnu.org; Thu, 27 Oct 2011 11:24:26 -0400 Received: from d06nrmr1307.portsmouth.uk.ibm.com (d06nrmr1307.portsmouth.uk.ibm.com [9.149.38.129]) by mtagate2.uk.ibm.com (8.13.1/8.13.1) with ESMTP id p9RFN82F003073 for ; Thu, 27 Oct 2011 15:23:08 GMT Received: from d06av01.portsmouth.uk.ibm.com (d06av01.portsmouth.uk.ibm.com [9.149.37.212]) by d06nrmr1307.portsmouth.uk.ibm.com (8.13.8/8.13.8/NCO v10.0) with ESMTP id p9RFN8q22269266 for ; Thu, 27 Oct 2011 16:23:08 +0100 Received: from d06av01.portsmouth.uk.ibm.com (loopback [127.0.0.1]) by d06av01.portsmouth.uk.ibm.com (8.14.4/8.13.1/NCO v10.0 AVout) with ESMTP id p9RFN7W3012396 for ; Thu, 27 Oct 2011 09:23:07 -0600 From: Stefan Hajnoczi Date: Thu, 27 Oct 2011 16:22:48 +0100 Message-Id: <1319728975-6069-2-git-send-email-stefanha@linux.vnet.ibm.com> In-Reply-To: <1319728975-6069-1-git-send-email-stefanha@linux.vnet.ibm.com> References: <1319728975-6069-1-git-send-email-stefanha@linux.vnet.ibm.com> Subject: [Qemu-devel] [PATCH 1/8] coroutine: add co_sleep_ns() coroutine sleep function List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , To: qemu-devel@nongnu.org Cc: Kevin Wolf , Anthony Liguori , Marcelo Tosatti , Stefan Hajnoczi Signed-off-by: Stefan Hajnoczi --- Makefile.objs | 2 +- qemu-coroutine-sleep.c | 38 ++++++++++++++++++++++++++++++++++++++ qemu-coroutine.h | 6 ++++++ 3 files changed, 45 insertions(+), 1 deletions(-) create mode 100644 qemu-coroutine-sleep.c diff --git a/Makefile.objs b/Makefile.objs index 01587c8..c290fd3 100644 --- a/Makefile.objs +++ b/Makefile.objs @@ -12,7 +12,7 @@ oslib-obj-$(CONFIG_POSIX) += oslib-posix.o qemu-thread-posix.o ####################################################################### # coroutines -coroutine-obj-y = qemu-coroutine.o qemu-coroutine-lock.o +coroutine-obj-y = qemu-coroutine.o qemu-coroutine-lock.o qemu-coroutine-sleep.o ifeq ($(CONFIG_UCONTEXT_COROUTINE),y) coroutine-obj-$(CONFIG_POSIX) += coroutine-ucontext.o else diff --git a/qemu-coroutine-sleep.c b/qemu-coroutine-sleep.c new file mode 100644 index 0000000..fd65274 --- /dev/null +++ b/qemu-coroutine-sleep.c @@ -0,0 +1,38 @@ +/* + * QEMU coroutine sleep + * + * Copyright IBM, Corp. 2011 + * + * Authors: + * Stefan Hajnoczi + * + * 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-coroutine.h" +#include "qemu-timer.h" + +typedef struct CoSleepCB { + QEMUTimer *ts; + Coroutine *co; +} CoSleepCB; + +static void co_sleep_cb(void *opaque) +{ + CoSleepCB *sleep_cb = opaque; + + qemu_free_timer(sleep_cb->ts); + qemu_coroutine_enter(sleep_cb->co, NULL); +} + +void coroutine_fn co_sleep_ns(QEMUClock *clock, int64_t ns) +{ + CoSleepCB sleep_cb = { + .co = qemu_coroutine_self(), + }; + sleep_cb.ts = qemu_new_timer(clock, SCALE_NS, co_sleep_cb, &sleep_cb); + qemu_mod_timer(sleep_cb.ts, qemu_get_clock_ns(clock) + ns); + qemu_coroutine_yield(); +} diff --git a/qemu-coroutine.h b/qemu-coroutine.h index b8fc4f4..e824327 100644 --- a/qemu-coroutine.h +++ b/qemu-coroutine.h @@ -17,6 +17,7 @@ #include #include "qemu-queue.h" +#include "qemu-timer.h" /** * Coroutines are a mechanism for stack switching and can be used for @@ -188,4 +189,9 @@ void qemu_co_rwlock_wrlock(CoRwlock *lock); */ void qemu_co_rwlock_unlock(CoRwlock *lock); +/** + * Yield the coroutine for a given duration + */ +void coroutine_fn co_sleep_ns(QEMUClock *clock, int64_t ns); + #endif /* QEMU_COROUTINE_H */ -- 1.7.7