/* Must be called with clocks_lock */
static void
update_clock_cache (ClockCache * cache)
{
GstClockTime roundtrip_limit = 0, minimum_update_interval = 0;
GList *l, *busses = NULL;
GST_OBJECT_LOCK (cache->clock);
g_list_free_full (GST_NET_CLIENT_INTERNAL_CLOCK (cache->clock)->busses,
(GDestroyNotify) gst_object_unref);
for (l = cache->clocks; l; l = l->next) {
GstNetClientClock *clock = l->data;
if (clock->priv->bus)
busses = g_list_prepend (busses, gst_object_ref (clock->priv->bus));
if (roundtrip_limit == 0)
roundtrip_limit = clock->priv->roundtrip_limit;
else
roundtrip_limit = MAX (roundtrip_limit, clock->priv->roundtrip_limit);
if (minimum_update_interval == 0)
minimum_update_interval = clock->priv->minimum_update_interval;
else
minimum_update_interval =
MIN (minimum_update_interval, clock->priv->minimum_update_interval);
}
GST_NET_CLIENT_INTERNAL_CLOCK (cache->clock)->busses = busses;
GST_NET_CLIENT_INTERNAL_CLOCK (cache->clock)->roundtrip_limit =
roundtrip_limit;
GST_NET_CLIENT_INTERNAL_CLOCK (cache->clock)->minimum_update_interval =
minimum_update_interval;
GST_OBJECT_UNLOCK (cache->clock);
}
static void
gst_net_client_internal_clock_set_property (GObject * object, guint prop_id,
const GValue * value, GParamSpec * pspec)
{
GstNetClientInternalClock *self = GST_NET_CLIENT_INTERNAL_CLOCK (object);
switch (prop_id) {
case PROP_ADDRESS:
GST_OBJECT_LOCK (self);
g_free (self->address);
self->address = g_value_dup_string (value);
if (self->address == NULL)
self->address = g_strdup (DEFAULT_ADDRESS);
GST_OBJECT_UNLOCK (self);
break;
case PROP_PORT:
GST_OBJECT_LOCK (self);
self->port = g_value_get_int (value);
GST_OBJECT_UNLOCK (self);
break;
case PROP_IS_NTP:
GST_OBJECT_LOCK (self);
self->is_ntp = g_value_get_boolean (value);
GST_OBJECT_UNLOCK (self);
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
break;
}
}
static void
gst_net_client_internal_clock_finalize (GObject * object)
{
GstNetClientInternalClock *self = GST_NET_CLIENT_INTERNAL_CLOCK (object);
if (self->thread) {
gst_net_client_internal_clock_stop (self);
}
g_free (self->address);
self->address = NULL;
if (self->servaddr != NULL) {
g_object_unref (self->servaddr);
self->servaddr = NULL;
}
if (self->socket != NULL) {
if (!g_socket_close (self->socket, NULL))
GST_ERROR_OBJECT (self, "Failed to close socket");
g_object_unref (self->socket);
self->socket = NULL;
}
g_warn_if_fail (self->busses == NULL);
G_OBJECT_CLASS (gst_net_client_internal_clock_parent_class)->finalize
(object);
}
static void
gst_net_client_clock_constructed (GObject * object)
{
GstNetClientClock *self = GST_NET_CLIENT_CLOCK (object);
GstClock *internal_clock;
GList *l;
ClockCache *cache = NULL;
G_OBJECT_CLASS (gst_net_client_clock_parent_class)->constructed (object);
G_LOCK (clocks_lock);
for (l = clocks; l; l = l->next) {
ClockCache *tmp = l->data;
GstNetClientInternalClock *internal_clock =
GST_NET_CLIENT_INTERNAL_CLOCK (tmp->clock);
if (strcmp (internal_clock->address, self->priv->address) == 0 &&
internal_clock->port == self->priv->port) {
cache = tmp;
if (cache->remove_id) {
gst_clock_id_unschedule (cache->remove_id);
cache->remove_id = NULL;
}
break;
}
}
if (!cache) {
cache = g_new0 (ClockCache, 1);
cache->clock =
g_object_new (GST_TYPE_NET_CLIENT_INTERNAL_CLOCK, "address",
self->priv->address, "port", self->priv->port, "is-ntp",
self->priv->is_ntp, NULL);
clocks = g_list_prepend (clocks, cache);
/* Not actually leaked but is cached for a while before being disposed,
* see gst_net_client_clock_finalize, so pretend it is to not confuse
* tests. */
GST_OBJECT_FLAG_SET (cache->clock, GST_OBJECT_FLAG_MAY_BE_LEAKED);
}
cache->clocks = g_list_prepend (cache->clocks, self);
GST_OBJECT_LOCK (cache->clock);
if (gst_clock_is_synced (cache->clock))
gst_clock_set_synced (GST_CLOCK (self), TRUE);
self->priv->synced_id =
g_signal_connect (cache->clock, "synced",
G_CALLBACK (gst_net_client_clock_synced_cb), self);
GST_OBJECT_UNLOCK (cache->clock);
G_UNLOCK (clocks_lock);
self->priv->internal_clock = internal_clock = cache->clock;
/* all systems go, cap'n */
}
static void
gst_net_client_internal_clock_constructed (GObject * object)
{
GstNetClientInternalClock *self = GST_NET_CLIENT_INTERNAL_CLOCK (object);
G_OBJECT_CLASS (gst_net_client_internal_clock_parent_class)->constructed
(object);
if (!gst_net_client_internal_clock_start (self)) {
g_warning ("failed to start clock '%s'", GST_OBJECT_NAME (self));
}
/* all systems go, cap'n */
}
static void
gst_net_client_clock_constructed (GObject * object)
{
GstNetClientClock *self = GST_NET_CLIENT_CLOCK (object);
GstClock *internal_clock;
GstClockTime internal;
GList *l;
ClockCache *cache = NULL;
G_OBJECT_CLASS (gst_net_client_clock_parent_class)->constructed (object);
G_LOCK (clocks_lock);
for (l = clocks; l; l = l->next) {
ClockCache *tmp = l->data;
GstNetClientInternalClock *internal_clock =
GST_NET_CLIENT_INTERNAL_CLOCK (tmp->clock);
if (strcmp (internal_clock->address, self->priv->address) == 0 &&
internal_clock->port == self->priv->port) {
cache = tmp;
if (cache->remove_id) {
gst_clock_id_unschedule (cache->remove_id);
cache->remove_id = NULL;
}
break;
}
}
if (!cache) {
cache = g_new0 (ClockCache, 1);
cache->clock =
g_object_new (GST_TYPE_NET_CLIENT_INTERNAL_CLOCK, "address",
self->priv->address, "port", self->priv->port, "is-ntp",
self->priv->is_ntp, NULL);
clocks = g_list_prepend (clocks, cache);
}
cache->clocks = g_list_prepend (cache->clocks, self);
GST_OBJECT_LOCK (cache->clock);
if (gst_clock_is_synced (cache->clock))
gst_clock_set_synced (GST_CLOCK (self), TRUE);
self->priv->synced_id =
g_signal_connect (cache->clock, "synced",
G_CALLBACK (gst_net_client_clock_synced_cb), self);
GST_OBJECT_UNLOCK (cache->clock);
G_UNLOCK (clocks_lock);
self->priv->internal_clock = internal_clock = cache->clock;
/* gst_clock_get_time() values are guaranteed to be increasing. because no one
* has called get_time on this clock yet we are free to adjust to any value
* without worrying about worrying about MAX() issues with the clock's
* internal time.
*/
/* update our internal time so get_time() give something around base_time.
assume that the rate is 1 in the beginning. */
internal = gst_clock_get_internal_time (internal_clock);
gst_clock_set_calibration (internal_clock, internal,
self->priv->base_time, 1, 1);
{
GstClockTime now = gst_clock_get_time (internal_clock);
if (GST_CLOCK_DIFF (now, self->priv->base_time) > 0 ||
GST_CLOCK_DIFF (now, self->priv->base_time + GST_SECOND) < 0) {
g_warning ("unable to set the base time, expect sync problems!");
}
}
/* all systems go, cap'n */
}
