coroutine-gthread.c 5.31 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
/*
 * GThread coroutine initialization code
 *
 * Copyright (C) 2006  Anthony Liguori <anthony@codemonkey.ws>
 * Copyright (C) 2011  Aneesh Kumar K.V <aneesh.kumar@linux.vnet.ibm.com>
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.0 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
 */

#include <glib.h>
#include "qemu-common.h"
23
#include "block/coroutine_int.h"
24 25 26 27 28

typedef struct {
    Coroutine base;
    GThread *thread;
    bool runnable;
29
    bool free_on_thread_exit;
30 31 32
    CoroutineAction action;
} CoroutineGThread;

33 34
static CompatGMutex coroutine_lock;
static CompatGCond coroutine_cond;
35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81

/* GLib 2.31 and beyond deprecated various parts of the thread API,
 * but the new interfaces are not available in older GLib versions
 * so we have to cope with both.
 */
#if GLIB_CHECK_VERSION(2, 31, 0)
/* Awkwardly, the GPrivate API doesn't provide a way to update the
 * GDestroyNotify handler for the coroutine key dynamically. So instead
 * we track whether or not the CoroutineGThread should be freed on
 * thread exit / coroutine key update using the free_on_thread_exit
 * field.
 */
static void coroutine_destroy_notify(gpointer data)
{
    CoroutineGThread *co = data;
    if (co && co->free_on_thread_exit) {
        g_free(co);
    }
}

static GPrivate coroutine_key = G_PRIVATE_INIT(coroutine_destroy_notify);

static inline CoroutineGThread *get_coroutine_key(void)
{
    return g_private_get(&coroutine_key);
}

static inline void set_coroutine_key(CoroutineGThread *co,
                                     bool free_on_thread_exit)
{
    /* Unlike g_static_private_set() this does not call the GDestroyNotify
     * if the previous value of the key was NULL. Fortunately we only need
     * the GDestroyNotify in the non-NULL key case.
     */
    co->free_on_thread_exit = free_on_thread_exit;
    g_private_replace(&coroutine_key, co);
}

static inline GThread *create_thread(GThreadFunc func, gpointer data)
{
    return g_thread_new("coroutine", func, data);
}

#else

/* Handle older GLib versions */

82 83
static GStaticPrivate coroutine_key = G_STATIC_PRIVATE_INIT;

84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104
static inline CoroutineGThread *get_coroutine_key(void)
{
    return g_static_private_get(&coroutine_key);
}

static inline void set_coroutine_key(CoroutineGThread *co,
                                     bool free_on_thread_exit)
{
    g_static_private_set(&coroutine_key, co,
                         free_on_thread_exit ? (GDestroyNotify)g_free : NULL);
}

static inline GThread *create_thread(GThreadFunc func, gpointer data)
{
    return g_thread_create_full(func, data, 0, TRUE, TRUE,
                                G_THREAD_PRIORITY_NORMAL, NULL);
}

#endif


105 106
static void __attribute__((constructor)) coroutine_init(void)
{
107
#if !GLIB_CHECK_VERSION(2, 31, 0)
108
    if (!g_thread_supported()) {
109 110
        g_thread_init(NULL);
    }
111
#endif
112 113 114 115 116
}

static void coroutine_wait_runnable_locked(CoroutineGThread *co)
{
    while (!co->runnable) {
117
        g_cond_wait(&coroutine_cond, &coroutine_lock);
118 119 120 121 122
    }
}

static void coroutine_wait_runnable(CoroutineGThread *co)
{
123
    g_mutex_lock(&coroutine_lock);
124
    coroutine_wait_runnable_locked(co);
125
    g_mutex_unlock(&coroutine_lock);
126 127 128 129 130 131
}

static gpointer coroutine_thread(gpointer opaque)
{
    CoroutineGThread *co = opaque;

132
    set_coroutine_key(co, false);
133 134 135 136 137 138 139 140 141 142
    coroutine_wait_runnable(co);
    co->base.entry(co->base.entry_arg);
    qemu_coroutine_switch(&co->base, co->base.caller, COROUTINE_TERMINATE);
    return NULL;
}

Coroutine *qemu_coroutine_new(void)
{
    CoroutineGThread *co;

143
    co = g_malloc0(sizeof(*co));
144
    co->thread = create_thread(coroutine_thread, co);
145
    if (!co->thread) {
146
        g_free(co);
147 148 149 150 151 152 153 154 155 156
        return NULL;
    }
    return &co->base;
}

void qemu_coroutine_delete(Coroutine *co_)
{
    CoroutineGThread *co = DO_UPCAST(CoroutineGThread, base, co_);

    g_thread_join(co->thread);
157
    g_free(co);
158 159 160 161 162 163 164 165 166
}

CoroutineAction qemu_coroutine_switch(Coroutine *from_,
                                      Coroutine *to_,
                                      CoroutineAction action)
{
    CoroutineGThread *from = DO_UPCAST(CoroutineGThread, base, from_);
    CoroutineGThread *to = DO_UPCAST(CoroutineGThread, base, to_);

167
    g_mutex_lock(&coroutine_lock);
168 169 170 171
    from->runnable = false;
    from->action = action;
    to->runnable = true;
    to->action = action;
172
    g_cond_broadcast(&coroutine_cond);
173 174 175 176

    if (action != COROUTINE_TERMINATE) {
        coroutine_wait_runnable_locked(from);
    }
177
    g_mutex_unlock(&coroutine_lock);
178 179 180 181 182
    return from->action;
}

Coroutine *qemu_coroutine_self(void)
{
183
    CoroutineGThread *co = get_coroutine_key();
184
    if (!co) {
185
        co = g_malloc0(sizeof(*co));
186
        co->runnable = true;
187
        set_coroutine_key(co, true);
188 189 190 191 192 193 194
    }

    return &co->base;
}

bool qemu_in_coroutine(void)
{
195
    CoroutineGThread *co = get_coroutine_key();
196 197 198

    return co && co->base.caller;
}