2 * GLIB Compatibility Functions
4 * Copyright IBM, Corp. 2013
7 * Anthony Liguori <aliguori@us.ibm.com>
8 * Michael Tokarev <mjt@tls.msk.ru>
9 * Paolo Bonzini <pbonzini@redhat.com>
11 * This work is licensed under the terms of the GNU GPL, version 2 or later.
12 * See the COPYING file in the top-level directory.
16 #ifndef QEMU_GLIB_COMPAT_H
17 #define QEMU_GLIB_COMPAT_H
21 /* GLIB version compatibility flags */
22 #if !GLIB_CHECK_VERSION(2, 26, 0)
23 #define G_TIME_SPAN_SECOND (G_GINT64_CONSTANT(1000000))
26 #if !GLIB_CHECK_VERSION(2, 28, 0)
27 static inline gint64 qemu_g_get_monotonic_time(void)
29 /* g_get_monotonic_time() is best-effort so we can use the wall clock as a
34 g_get_current_time(&time);
36 return time.tv_sec * G_TIME_SPAN_SECOND + time.tv_usec;
38 /* work around distro backports of this interface */
39 #define g_get_monotonic_time() qemu_g_get_monotonic_time()
44 * g_poll has a problem on Windows when using
45 * timeouts < 10ms, so use wrapper.
47 #define g_poll(fds, nfds, timeout) g_poll_fixed(fds, nfds, timeout)
48 gint g_poll_fixed(GPollFD *fds, guint nfds, gint timeout);
51 #if !GLIB_CHECK_VERSION(2, 30, 0)
52 /* Not a 100% compatible implementation, but good enough for most
53 * cases. Placeholders are only supported at the end of the
55 static inline gchar *qemu_g_dir_make_tmp(gchar const *tmpl, GError **error)
57 gchar *path = g_build_filename(g_get_tmp_dir(), tmpl ?: ".XXXXXX", NULL);
59 if (mkdtemp(path) != NULL) {
62 /* Error occurred, clean up. */
63 g_set_error(error, G_FILE_ERROR, g_file_error_from_errno(errno),
68 #define g_dir_make_tmp(tmpl, error) qemu_g_dir_make_tmp(tmpl, error)
69 #endif /* glib 2.30 */
71 #if !GLIB_CHECK_VERSION(2, 31, 0)
72 /* before glib-2.31, GMutex and GCond was dynamic-only (there was a separate
73 * GStaticMutex, but it didn't work with condition variables).
75 * Our implementation uses GOnce to fake a static implementation that does
76 * not require separate initialization.
77 * We need to rename the types to avoid passing our CompatGMutex/CompatGCond
78 * by mistake to a function that expects GMutex/GCond. However, for ease
79 * of use we keep the GLib function names. GLib uses macros for the
80 * implementation, we use inline functions instead and undefine the macros.
83 typedef struct CompatGMutex {
87 typedef struct CompatGCond {
91 static inline gpointer do_g_mutex_new(gpointer unused)
93 return (gpointer) g_mutex_new();
96 static inline void g_mutex_init(CompatGMutex *mutex)
98 mutex->once = (GOnce) G_ONCE_INIT;
101 static inline void g_mutex_clear(CompatGMutex *mutex)
103 g_assert(mutex->once.status != G_ONCE_STATUS_PROGRESS);
104 if (mutex->once.retval) {
105 g_mutex_free((GMutex *) mutex->once.retval);
107 mutex->once = (GOnce) G_ONCE_INIT;
110 static inline void (g_mutex_lock)(CompatGMutex *mutex)
112 g_once(&mutex->once, do_g_mutex_new, NULL);
113 g_mutex_lock((GMutex *) mutex->once.retval);
117 static inline gboolean (g_mutex_trylock)(CompatGMutex *mutex)
119 g_once(&mutex->once, do_g_mutex_new, NULL);
120 return g_mutex_trylock((GMutex *) mutex->once.retval);
122 #undef g_mutex_trylock
125 static inline void (g_mutex_unlock)(CompatGMutex *mutex)
127 g_mutex_unlock((GMutex *) mutex->once.retval);
129 #undef g_mutex_unlock
131 static inline gpointer do_g_cond_new(gpointer unused)
133 return (gpointer) g_cond_new();
136 static inline void g_cond_init(CompatGCond *cond)
138 cond->once = (GOnce) G_ONCE_INIT;
141 static inline void g_cond_clear(CompatGCond *cond)
143 g_assert(cond->once.status != G_ONCE_STATUS_PROGRESS);
144 if (cond->once.retval) {
145 g_cond_free((GCond *) cond->once.retval);
147 cond->once = (GOnce) G_ONCE_INIT;
150 static inline void (g_cond_wait)(CompatGCond *cond, CompatGMutex *mutex)
152 g_assert(mutex->once.status != G_ONCE_STATUS_PROGRESS);
153 g_once(&cond->once, do_g_cond_new, NULL);
154 g_cond_wait((GCond *) cond->once.retval, (GMutex *) mutex->once.retval);
158 static inline void (g_cond_broadcast)(CompatGCond *cond)
160 g_once(&cond->once, do_g_cond_new, NULL);
161 g_cond_broadcast((GCond *) cond->once.retval);
163 #undef g_cond_broadcast
165 static inline void (g_cond_signal)(CompatGCond *cond)
167 g_once(&cond->once, do_g_cond_new, NULL);
168 g_cond_signal((GCond *) cond->once.retval);
172 static inline gboolean (g_cond_timed_wait)(CompatGCond *cond,
176 g_assert(mutex->once.status != G_ONCE_STATUS_PROGRESS);
177 g_once(&cond->once, do_g_cond_new, NULL);
178 return g_cond_timed_wait((GCond *) cond->once.retval,
179 (GMutex *) mutex->once.retval, time);
181 #undef g_cond_timed_wait
183 /* This is not a macro, because it didn't exist until 2.32. */
184 static inline gboolean g_cond_wait_until(CompatGCond *cond, CompatGMutex *mutex,
189 /* Convert from monotonic to CLOCK_REALTIME. */
190 end_time -= g_get_monotonic_time();
191 g_get_current_time(&time);
192 end_time += time.tv_sec * G_TIME_SPAN_SECOND + time.tv_usec;
194 time.tv_sec = end_time / G_TIME_SPAN_SECOND;
195 time.tv_usec = end_time % G_TIME_SPAN_SECOND;
196 return g_cond_timed_wait(cond, mutex, &time);
199 /* before 2.31 there was no g_thread_new() */
200 static inline GThread *g_thread_new(const char *name,
201 GThreadFunc func, gpointer data)
203 GThread *thread = g_thread_create(func, data, TRUE, NULL);
205 g_error("creating thread");
210 #define CompatGMutex GMutex
211 #define CompatGCond GCond
212 #endif /* glib 2.31 */
214 #if !GLIB_CHECK_VERSION(2, 32, 0)
215 /* Beware, function returns gboolean since 2.39.2, see GLib commit 9101915 */
216 static inline void g_hash_table_add(GHashTable *hash_table, gpointer key)
218 g_hash_table_replace(hash_table, key, key);
222 #ifndef g_assert_true
223 #define g_assert_true(expr) \
225 if (G_LIKELY(expr)) { \
227 g_assertion_message(G_LOG_DOMAIN, __FILE__, __LINE__, G_STRFUNC, \
228 "'" #expr "' should be TRUE"); \
233 #ifndef g_assert_false
234 #define g_assert_false(expr) \
236 if (G_LIKELY(!(expr))) { \
238 g_assertion_message(G_LOG_DOMAIN, __FILE__, __LINE__, G_STRFUNC, \
239 "'" #expr "' should be FALSE"); \
244 #ifndef g_assert_null
245 #define g_assert_null(expr) \
247 if (G_LIKELY((expr) == NULL)) { \
249 g_assertion_message(G_LOG_DOMAIN, __FILE__, __LINE__, G_STRFUNC, \
250 "'" #expr "' should be NULL"); \
255 #ifndef g_assert_nonnull
256 #define g_assert_nonnull(expr) \
258 if (G_LIKELY((expr) != NULL)) { \
260 g_assertion_message(G_LOG_DOMAIN, __FILE__, __LINE__, G_STRFUNC, \
261 "'" #expr "' should not be NULL"); \
266 #ifndef g_assert_cmpmem
267 #define g_assert_cmpmem(m1, l1, m2, l2) \
269 gconstpointer __m1 = m1, __m2 = m2; \
270 int __l1 = l1, __l2 = l2; \
271 if (__l1 != __l2) { \
272 g_assertion_message_cmpnum( \
273 G_LOG_DOMAIN, __FILE__, __LINE__, G_STRFUNC, \
274 #l1 " (len(" #m1 ")) == " #l2 " (len(" #m2 "))", __l1, "==", \
276 } else if (memcmp(__m1, __m2, __l1) != 0) { \
277 g_assertion_message(G_LOG_DOMAIN, __FILE__, __LINE__, G_STRFUNC, \
278 "assertion failed (" #m1 " == " #m2 ")"); \
283 #if !GLIB_CHECK_VERSION(2, 28, 0)
284 static inline void g_list_free_full(GList *list, GDestroyNotify free_func)
288 for (l = list; l; l = l->next) {
295 static inline void g_slist_free_full(GSList *list, GDestroyNotify free_func)
299 for (l = list; l; l = l->next) {