diff --git a/gst/gstsystemclock.c b/gst/gstsystemclock.c
index 2a74fed494067beb20c36b2dc734bb19389a782b..2c71489cfa2bbd20b19847e900bebc10c56b8d23 100644 (file)
--- a/gst/gstsystemclock.c
+++ b/gst/gstsystemclock.c
#include "gstsystemclock.h"
#include "gstenumtypes.h"
#include "gstpoll.h"
+#include "gstutils.h"
+#include "glib-compat-private.h"
#include <errno.h>
+#ifdef G_OS_WIN32
+# define WIN32_LEAN_AND_MEAN /* prevents from including too many things */
+# include <windows.h> /* QueryPerformance* stuff */
+# undef WIN32_LEAN_AND_MEAN
+# define EWOULDBLOCK EAGAIN /* This is just to placate gcc */
+#endif /* G_OS_WIN32 */
+
+#define GET_ENTRY_STATUS(e) ((GstClockReturn) g_atomic_int_get(&GST_CLOCK_ENTRY_STATUS(e)))
+#define SET_ENTRY_STATUS(e,val) (g_atomic_int_set(&GST_CLOCK_ENTRY_STATUS(e),(val)))
+#define CAS_ENTRY_STATUS(e,old,val) (G_ATOMIC_INT_COMPARE_AND_EXCHANGE(\
+ (&GST_CLOCK_ENTRY_STATUS(e)), (old), (val)))
+
/* Define this to get some extra debug about jitter from each clock_wait */
#undef WAIT_DEBUGGING
GstPoll *timer;
gint wakeup_count; /* the number of entries with a pending wakeup */
gboolean async_wakeup; /* if the wakeup was because of a async list change */
+
+#ifdef G_OS_WIN32
+ LARGE_INTEGER start;
+ LARGE_INTEGER frequency;
+#endif /* G_OS_WIN32 */
};
#define GST_SYSTEM_CLOCK_GET_PRIVATE(obj) \
/* the one instance of the systemclock */
static GstClock *_the_system_clock = NULL;
-static void gst_system_clock_class_init (GstSystemClockClass * klass);
-static void gst_system_clock_init (GstSystemClock * clock);
static void gst_system_clock_dispose (GObject * object);
static void gst_system_clock_set_property (GObject * object, guint prop_id,
const GValue * value, GParamSpec * pspec);
g_object_class_install_property (gobject_class, PROP_CLOCK_TYPE,
g_param_spec_enum ("clock-type", "Clock type",
"The type of underlying clock implementation used",
- GST_TYPE_CLOCK_TYPE, DEFAULT_CLOCK_TYPE, G_PARAM_READWRITE));
+ GST_TYPE_CLOCK_TYPE, DEFAULT_CLOCK_TYPE,
+ G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
gstclock_class->get_internal_time = gst_system_clock_get_internal_time;
gstclock_class->get_resolution = gst_system_clock_get_resolution;
clock->priv->clock_type = DEFAULT_CLOCK_TYPE;
clock->priv->timer = gst_poll_new_timer ();
+#ifdef G_OS_WIN32
+ QueryPerformanceFrequency (&clock->priv->frequency);
+ /* can be 0 if the hardware does not have hardware support */
+ if (clock->priv->frequency.QuadPart != 0)
+ /* we take a base time so that time starts from 0 to ease debugging */
+ QueryPerformanceCounter (&clock->priv->start);
+#endif /* G_OS_WIN32 */
+
#if 0
/* Uncomment this to start the async clock thread straight away */
GST_OBJECT_LOCK (clock);
GstClockEntry *entry = (GstClockEntry *) entries->data;
GST_CAT_DEBUG (GST_CAT_CLOCK, "unscheduling entry %p", entry);
- entry->status = GST_CLOCK_UNSCHEDULED;
+ SET_ENTRY_STATUS (entry, GST_CLOCK_UNSCHEDULED);
}
- g_list_free (clock->entries);
- clock->entries = NULL;
GST_CLOCK_BROADCAST (clock);
gst_system_clock_add_wakeup (sysclock);
GST_OBJECT_UNLOCK (clock);
sysclock->thread = NULL;
GST_CAT_DEBUG (GST_CAT_CLOCK, "joined thread");
+ g_list_foreach (clock->entries, (GFunc) gst_clock_id_unref, NULL);
+ g_list_free (clock->entries);
+ clock->entries = NULL;
+
gst_poll_free (sysclock->priv->timer);
G_OBJECT_CLASS (parent_class)->dispose (object);
switch (prop_id) {
case PROP_CLOCK_TYPE:
- sysclock->priv->clock_type = g_value_get_enum (value);
+ sysclock->priv->clock_type = (GstClockType) g_value_get_enum (value);
GST_CAT_DEBUG (GST_CAT_CLOCK, "clock-type set to %d",
sysclock->priv->clock_type);
break;
* clock will be increased so you need to unref the clock after
* usage.
*
- * Returns: the default clock.
+ * Returns: (transfer full): the default clock.
*
* MT safe.
*/
if (sysclock->priv->wakeup_count == 0) {
GST_CAT_DEBUG (GST_CAT_CLOCK, "writing control");
while (!gst_poll_write_control (sysclock->priv->timer)) {
- g_warning
- ("gstsystemclock: write control failed in wakeup_async, trying again : %d:%s\n",
- errno, g_strerror (errno));
+ if (errno == EAGAIN || errno == EWOULDBLOCK || errno == EINTR) {
+ g_warning
+ ("gstsystemclock: write control failed in wakeup_async, trying again: %d:%s\n",
+ errno, g_strerror (errno));
+ } else {
+ g_critical
+ ("gstsystemclock: write control failed in wakeup_async: %d:%s\n",
+ errno, g_strerror (errno));
+ return;
+ }
}
}
sysclock->priv->wakeup_count++;
/* pick the next entry */
entry = clock->entries->data;
- /* if it was unscheduled, just move on to the next entry */
- if (entry->status == GST_CLOCK_UNSCHEDULED) {
- GST_CAT_DEBUG (GST_CAT_CLOCK, "entry %p was unscheduled", entry);
- goto next_entry;
- }
+ GST_OBJECT_UNLOCK (clock);
requested = entry->time;
gst_system_clock_id_wait_jitter_unlocked (clock, (GstClockID) entry,
NULL, FALSE);
+ GST_OBJECT_LOCK (clock);
+
switch (res) {
case GST_CLOCK_UNSCHEDULED:
/* entry was unscheduled, move to the next */
/* we set the entry back to the OK state. This is needed so that the
* _unschedule() code can see if an entry is currently being waited
* on (when its state is BUSY). */
- entry->status = GST_CLOCK_OK;
+ SET_ENTRY_STATUS (entry, GST_CLOCK_OK);
continue;
default:
GST_CAT_DEBUG (GST_CAT_CLOCK,
static GstClockTime
gst_system_clock_get_internal_time (GstClock * clock)
{
-#ifdef HAVE_POSIX_TIMERS
+#ifdef G_OS_WIN32
GstSystemClock *sysclock = GST_SYSTEM_CLOCK_CAST (clock);
- clockid_t ptype;
- struct timespec ts;
- ptype = clock_type_to_posix_id (sysclock->priv->clock_type);
+ if (sysclock->priv->frequency.QuadPart != 0) {
+ LARGE_INTEGER now;
- if (G_UNLIKELY (clock_gettime (ptype, &ts)))
- return GST_CLOCK_TIME_NONE;
+ /* we prefer the highly accurate performance counters on windows */
+ QueryPerformanceCounter (&now);
- return GST_TIMESPEC_TO_TIME (ts);
+ return gst_util_uint64_scale (now.QuadPart - sysclock->priv->start.QuadPart,
+ GST_SECOND, sysclock->priv->frequency.QuadPart);
+ } else
+#endif /* G_OS_WIN32 */
+#if !defined HAVE_POSIX_TIMERS
+ {
+ GTimeVal timeval;
+
+ g_get_current_time (&timeval);
+
+ return GST_TIMEVAL_TO_TIME (timeval);
+ }
#else
- GTimeVal timeval;
+ {
+ GstSystemClock *sysclock = GST_SYSTEM_CLOCK_CAST (clock);
+ clockid_t ptype;
+ struct timespec ts;
- g_get_current_time (&timeval);
+ ptype = clock_type_to_posix_id (sysclock->priv->clock_type);
- return GST_TIMEVAL_TO_TIME (timeval);
+ if (G_UNLIKELY (clock_gettime (ptype, &ts)))
+ return GST_CLOCK_TIME_NONE;
+
+ return GST_TIMESPEC_TO_TIME (ts);
+ }
#endif
}
static guint64
gst_system_clock_get_resolution (GstClock * clock)
{
-#ifdef HAVE_POSIX_TIMERS
+#ifdef G_OS_WIN32
GstSystemClock *sysclock = GST_SYSTEM_CLOCK_CAST (clock);
- clockid_t ptype;
- struct timespec ts;
- ptype = clock_type_to_posix_id (sysclock->priv->clock_type);
+ if (sysclock->priv->frequency.QuadPart != 0) {
+ return GST_SECOND / sysclock->priv->frequency.QuadPart;
+ } else
+#endif /* G_OS_WIN32 */
+#ifdef HAVE_POSIX_TIMERS
+ {
+ GstSystemClock *sysclock = GST_SYSTEM_CLOCK_CAST (clock);
+ clockid_t ptype;
+ struct timespec ts;
+
+ ptype = clock_type_to_posix_id (sysclock->priv->clock_type);
- if (G_UNLIKELY (clock_getres (ptype, &ts)))
- return GST_CLOCK_TIME_NONE;
+ if (G_UNLIKELY (clock_getres (ptype, &ts)))
+ return GST_CLOCK_TIME_NONE;
- return GST_TIMESPEC_TO_TIME (ts);
+ return GST_TIMESPEC_TO_TIME (ts);
+ }
#else
- return 1 * GST_USECOND;
+ {
+ return 1 * GST_USECOND;
+ }
#endif
}
/* synchronously wait on the given GstClockEntry.
*
- * We do this by blocking on the global clock GCond variable with
- * the requested time as a timeout. This allows us to unblock the
- * entry by signaling the GCond variable.
+ * We do this by blocking on the global GstPoll timer with
+ * the requested timeout. This allows us to unblock the
+ * entry by writing on the control fd.
*
- * Note that signaling the global GCond unlocks all waiting entries. So
+ * Note that writing the global GstPoll unlocks all waiting entries. So
* we need to check if an unlocked entry has changed when it unlocks.
*
* Entries that arrive too late are simply not waited on and a
* GST_CLOCK_EARLY result is returned.
*
- * should be called with LOCK held.
- *
* MT safe.
*/
static GstClockReturn
GstClockEntry * entry, GstClockTimeDiff * jitter, gboolean restart)
{
GstSystemClock *sysclock = GST_SYSTEM_CLOCK_CAST (clock);
- GstClockTime entryt, real, now;
+ GstClockTime entryt, now;
GstClockTimeDiff diff;
+ GstClockReturn status;
+
+ if (G_UNLIKELY (GET_ENTRY_STATUS (entry) == GST_CLOCK_UNSCHEDULED))
+ return GST_CLOCK_UNSCHEDULED;
/* need to call the overridden method because we want to sync against the time
* of the clock, whatever the subclass uses as a clock. */
- real = GST_CLOCK_GET_CLASS (clock)->get_internal_time (clock);
- now = gst_clock_adjust_unlocked (clock, real);
+ now = gst_clock_get_time (clock);
/* get the time of the entry */
entryt = GST_CLOCK_ENTRY_TIME (entry);
- if (jitter) {
- *jitter = GST_CLOCK_DIFF (entryt, now);
- }
/* the diff of the entry with the clock is the amount of time we have to
* wait */
- diff = entryt - now;
+ diff = GST_CLOCK_DIFF (now, entryt);
+ if (G_LIKELY (jitter))
+ *jitter = -diff;
GST_CAT_DEBUG (GST_CAT_CLOCK, "entry %p"
" time %" GST_TIME_FORMAT
" now %" GST_TIME_FORMAT
- " real %" GST_TIME_FORMAT
" diff (time-now) %" G_GINT64_FORMAT,
- entry,
- GST_TIME_ARGS (entryt), GST_TIME_ARGS (now), GST_TIME_ARGS (real), diff);
+ entry, GST_TIME_ARGS (entryt), GST_TIME_ARGS (now), diff);
- if (diff > 0) {
+ if (G_LIKELY (diff > 0)) {
#ifdef WAIT_DEBUGGING
GstClockTime final;
#endif
- while (entry->status != GST_CLOCK_UNSCHEDULED) {
+ while (TRUE) {
gint pollret;
- /* mark the entry as busy */
- entry->status = GST_CLOCK_BUSY;
- GST_OBJECT_UNLOCK (clock);
+ do {
+ status = GET_ENTRY_STATUS (entry);
+
+ /* stop when we are unscheduled */
+ if (G_UNLIKELY (status == GST_CLOCK_UNSCHEDULED))
+ goto done;
+
+ /* mark the entry as busy but watch out for intermediate unscheduled
+ * statuses */
+ } while (G_UNLIKELY (!CAS_ENTRY_STATUS (entry, status, GST_CLOCK_BUSY)));
- /* now wait on the entry, it either times out or the fd is written. */
+ /* now wait on the entry, it either times out or the fd is written. The
+ * status of the entry is only BUSY around the poll. */
pollret = gst_poll_wait (sysclock->priv->timer, diff);
- /* another thread can read the fd before we get the lock */
- GST_OBJECT_LOCK (clock);
- if (entry->status == GST_CLOCK_UNSCHEDULED) {
- GST_CAT_DEBUG (GST_CAT_CLOCK, "entry %p unlocked", entry);
- gst_system_clock_remove_wakeup (sysclock);
+ /* get the new status, mark as DONE. We do this so that the unschedule
+ * function knows when we left the poll and doesn't need to wakeup the
+ * poll anymore. */
+ do {
+ status = GET_ENTRY_STATUS (entry);
+ /* we were unscheduled, exit immediately */
+ if (G_UNLIKELY (status == GST_CLOCK_UNSCHEDULED))
+ break;
+ } while (G_UNLIKELY (!CAS_ENTRY_STATUS (entry, status, GST_CLOCK_DONE)));
+
+ GST_CAT_DEBUG (GST_CAT_CLOCK, "entry %p unlocked, status %d, ret %d",
+ entry, status, pollret);
+
+ if (G_UNLIKELY (status == GST_CLOCK_UNSCHEDULED)) {
+ /* try to clean up The unschedule function managed to set the status to
+ * unscheduled. We now take the lock and mark the entry as unscheduled.
+ * This makes sure that the unschedule function doesn't perform a
+ * wakeup anymore. If the unschedule function has a change to perform
+ * the wakeup before us, we clean up here */
+ GST_OBJECT_LOCK (sysclock);
+ entry->unscheduled = TRUE;
+ if (entry->woken_up) {
+ gst_system_clock_remove_wakeup (sysclock);
+ }
+ GST_OBJECT_UNLOCK (sysclock);
+ goto done;
} else {
- if (pollret != 0) {
+ if (G_UNLIKELY (pollret != 0)) {
/* some other id got unlocked */
if (!restart) {
/* this can happen if the entry got unlocked because of an async
* entry was added to the head of the async queue. */
GST_CAT_DEBUG (GST_CAT_CLOCK, "wakeup waiting for entry %p", entry);
- break;
+ goto done;
}
- /* mark ourselves as EARLY, we release the lock and we could be
- * unscheduled ourselves but we don't want the unscheduling thread
- * to write on the control socket (it does that when an entry has a
- * BUSY status). */
- entry->status = GST_CLOCK_EARLY;
-
/* wait till all the entries got woken up */
+ GST_OBJECT_LOCK (sysclock);
gst_system_clock_wait_wakeup (sysclock);
-
- /* we released the lock in the wait, recheck our status, we don't need
- * to remove the wakeup count because we marked the entry as EARLY
- * before releasing the object lock. */
- if (entry->status == GST_CLOCK_UNSCHEDULED) {
- GST_CAT_DEBUG (GST_CAT_CLOCK, "entry %p got unscheduled", entry);
- break;
- }
+ GST_OBJECT_UNLOCK (sysclock);
GST_CAT_DEBUG (GST_CAT_CLOCK, "entry %p needs to be restarted",
entry);
/* reschedule if gst_poll_wait returned early or we have to reschedule after
* an unlock*/
- real = GST_CLOCK_GET_CLASS (clock)->get_internal_time (clock);
- now = gst_clock_adjust_unlocked (clock, real);
- diff = entryt - now;
+ now = gst_clock_get_time (clock);
+ diff = GST_CLOCK_DIFF (now, entryt);
if (diff <= 0) {
/* timeout, this is fine, we can report success now */
- entry->status = GST_CLOCK_OK;
+ status = GST_CLOCK_OK;
+ SET_ENTRY_STATUS (entry, status);
GST_CAT_DEBUG (GST_CAT_CLOCK,
"entry %p finished, diff %" G_GINT64_FORMAT, entry, diff);
(final - target),
((double) (GstClockTimeDiff) (final - target)) / GST_SECOND);
#endif
- break;
+ goto done;
} else {
GST_CAT_DEBUG (GST_CAT_CLOCK,
"entry %p restart, diff %" G_GINT64_FORMAT, entry, diff);
}
}
}
- } else if (diff == 0) {
- entry->status = GST_CLOCK_OK;
} else {
- entry->status = GST_CLOCK_EARLY;
+ /* we are right on time or too late */
+ if (G_UNLIKELY (diff == 0))
+ status = GST_CLOCK_OK;
+ else
+ status = GST_CLOCK_EARLY;
+
+ SET_ENTRY_STATUS (entry, status);
}
- return entry->status;
+done:
+ return status;
}
static GstClockReturn
gst_system_clock_id_wait_jitter (GstClock * clock, GstClockEntry * entry,
GstClockTimeDiff * jitter)
{
- GstClockReturn ret;
-
- GST_OBJECT_LOCK (clock);
- if (G_UNLIKELY (entry->status == GST_CLOCK_UNSCHEDULED))
- goto was_unscheduled;
-
- ret = gst_system_clock_id_wait_jitter_unlocked (clock, entry, jitter, TRUE);
- GST_OBJECT_UNLOCK (clock);
-
- return ret;
-
- /* ERRORS */
-was_unscheduled:
- {
- GST_OBJECT_UNLOCK (clock);
- return GST_CLOCK_UNSCHEDULED;
- }
+ return gst_system_clock_id_wait_jitter_unlocked (clock, entry, jitter, TRUE);
}
/* Start the async clock thread. Must be called with the object lock
if (G_LIKELY (clock->thread != NULL))
return TRUE; /* Thread already running. Nothing to do */
+#if !GLIB_CHECK_VERSION (2, 31, 0)
clock->thread = g_thread_create ((GThreadFunc) gst_system_clock_async_thread,
clock, TRUE, &error);
+#else
+ clock->thread = g_thread_try_new ("GstSystemClock",
+ (GThreadFunc) gst_system_clock_async_thread, clock, &error);
+#endif
+
if (G_UNLIKELY (error))
goto no_thread;
if (G_UNLIKELY (!gst_system_clock_start_async (sysclock)))
goto thread_error;
- if (G_UNLIKELY (entry->status == GST_CLOCK_UNSCHEDULED))
+ if (G_UNLIKELY (GET_ENTRY_STATUS (entry) == GST_CLOCK_UNSCHEDULED))
goto was_unscheduled;
if (clock->entries)
* front, else the thread is just waiting for another entry and
* will get to this entry automatically. */
if (clock->entries->data == entry) {
- GST_CAT_DEBUG (GST_CAT_CLOCK, "async entry added to head");
+ GST_CAT_DEBUG (GST_CAT_CLOCK, "async entry added to head %p", head);
if (head == NULL) {
/* the list was empty before, signal the cond so that the async thread can
* start taking a look at the queue */
GST_CAT_DEBUG (GST_CAT_CLOCK, "first entry, sending signal");
GST_CLOCK_BROADCAST (clock);
} else {
- if (head->status == GST_CLOCK_BUSY) {
+ GstClockReturn status;
+
+ status = GET_ENTRY_STATUS (head);
+ GST_CAT_DEBUG (GST_CAT_CLOCK, "head entry %p status %d", head, status);
+
+ if (status == GST_CLOCK_BUSY) {
+ GST_CAT_DEBUG (GST_CAT_CLOCK, "head entry is busy");
/* the async thread was waiting for an entry, unlock the wait so that it
* looks at the new head entry instead, we only need to do this once */
if (!sysclock->priv->async_wakeup) {
gst_system_clock_id_unschedule (GstClock * clock, GstClockEntry * entry)
{
GstSystemClock *sysclock;
+ GstClockReturn status;
sysclock = GST_SYSTEM_CLOCK_CAST (clock);
GST_CAT_DEBUG (GST_CAT_CLOCK, "unscheduling entry %p", entry);
GST_OBJECT_LOCK (clock);
- if (entry->status == GST_CLOCK_BUSY) {
+ /* change the entry status to unscheduled */
+ do {
+ status = GET_ENTRY_STATUS (entry);
+ } while (G_UNLIKELY (!CAS_ENTRY_STATUS (entry, status,
+ GST_CLOCK_UNSCHEDULED)));
+
+ if (G_LIKELY (status == GST_CLOCK_BUSY)) {
/* the entry was being busy, wake up all entries so that they recheck their
* status. We cannot wake up just one entry because allocating such a
* datastructure for each entry would be too heavy and unlocking an entry
* is usually done when shutting down or some other exceptional case. */
GST_CAT_DEBUG (GST_CAT_CLOCK, "entry was BUSY, doing wakeup");
- gst_system_clock_add_wakeup (sysclock);
+ if (!entry->unscheduled && !entry->woken_up) {
+ gst_system_clock_add_wakeup (sysclock);
+ entry->woken_up = TRUE;
+ }
}
- /* when it leaves the poll, it'll detect the unscheduled */
- entry->status = GST_CLOCK_UNSCHEDULED;
GST_OBJECT_UNLOCK (clock);
}