/* Gnome-Streamer
 * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Library General Public
 * License as published by the Free Software Foundation; either
 * version 2 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
 * Library General Public License for more details.
 *
 * You should have received a copy of the GNU Library General Public
 * License along with this library; if not, write to the
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 */


#include <gst/gstobject.h>
#include <gst/gstbin.h>


/* Object signals and args */
enum {
  PARENT_SET,
  LAST_SIGNAL
};

enum {
  ARG_0,
  /* FILL ME */
};


static void gst_object_class_init(GstObjectClass *klass);
static void gst_object_init(GstObject *object);


static GtkObjectClass *parent_class = NULL;
static guint gst_object_signals[LAST_SIGNAL] = { 0 };

GtkType gst_object_get_type(void) {
  static GtkType object_type = 0;

  if (!object_type) {
    static const GtkTypeInfo object_info = {
      "GstObject",
      sizeof(GstObject),
      sizeof(GstObjectClass),
      (GtkClassInitFunc)gst_object_class_init,
      (GtkObjectInitFunc)gst_object_init,
      (GtkArgSetFunc)NULL,
      (GtkArgGetFunc)NULL,
      (GtkClassInitFunc)NULL,
    };
    object_type = gtk_type_unique(gtk_object_get_type(),&object_info);
  }
  return object_type;
}

static void gst_object_class_init(GstObjectClass *klass) {
  GtkObjectClass *gtkobject_class;

  gtkobject_class = (GtkObjectClass*)klass;

  parent_class = gtk_type_class(gtk_object_get_type());

  gst_object_signals[PARENT_SET] =
    gtk_signal_new("parent_set",GTK_RUN_LAST,gtkobject_class->type,
                   GTK_SIGNAL_OFFSET(GstObjectClass,parent_set),
                   gtk_marshal_NONE__POINTER,GTK_TYPE_NONE,1,
                   GTK_TYPE_POINTER);
  gtk_object_class_add_signals(gtkobject_class,gst_object_signals,LAST_SIGNAL);
}

static void gst_object_init(GstObject *object) {
  object->lock = g_mutex_new();
#ifdef HAVE_ATOMIC_H
  atomic_set(&(object->refcount),1);
#else
  object->refcount++;
#endif
  object->parent = NULL;
}

/**
 * gst_object_new:
 *
 * Create a new object with
 *
 * Returns: new object
 */
GstObject *gst_object_new() {
  return GST_OBJECT(gtk_type_new(gst_object_get_type()));
}

/**
 * gst_object_set_parent:
 * @object: GstObject to set parent of
 * @parent: new parent of object
 *
 * Set the parent of the object.  The object's reference count is
 * incremented.
 */
void gst_object_set_parent(GstObject *object,GstObject *parent) {
  g_return_if_fail(object != NULL);
  g_return_if_fail(GST_IS_OBJECT(object));
  g_return_if_fail(object->parent == NULL);
  g_return_if_fail(parent != NULL);
  g_return_if_fail(GST_IS_OBJECT(parent));
  g_return_if_fail(object != parent);

  gst_object_ref(object);
  gst_object_sink(object);
  object->parent = parent;

  gtk_signal_emit(GTK_OBJECT(object),gst_object_signals[PARENT_SET],parent);
}

/**
 * gst_object_get_parent:
 * @object: GstObject to get parent of
 *
 * Return the parent of the object.
 *
 * Returns: parent of the object
 */
GstObject *gst_object_get_parent(GstObject *object) {
  g_return_if_fail(object != NULL);
  g_return_if_fail(GST_IS_OBJECT(object));

  return object->parent;
}

/**
 * gst_object_unparent:
 * @object: GstObject to unparent
 *
 * Clear the parent of the object, removing the associated reference.
 */
void gst_object_unparent(GstObject *object) {
  g_return_if_fail(object != NULL);
  g_return_if_fail(GST_IS_OBJECT(object));
  if (object->parent == NULL)
    return;

  object->parent = NULL;
  gst_object_unref(object);
}

#ifndef gst_object_ref
void gst_object_ref (GstObject *object) {
  g_return_if_fail(object != NULL);
  g_return_if_fail(GST_IS_OBJECT(object));

#ifdef HAVE_ATOMIC_H
  g_return_if_fail(atomic_read(&(object->refcount)) > 0);
  atomic_inc(&(object->refcount))
#else
  g_return_if_fail(object->refcount > 0);
  GST_LOCK(object);
  object->refcount++;
  GST_UNLOCK(object);
#endif
}
#endif /* gst_object_ref */

#ifndef gst_object_unref
void gst_object_unref (GstObject *object) {
  int reftest;

  g_return_if_fail(object != NULL);
  g_return_if_fail(GST_IS_OBJECT(object));

#ifdef HAVE_ATOMIC_H
  g_return_if_fail(atomic_read(&(object->refcount)) > 0);
  reftest = atomic_dec_and_test(&(object->refcount))
#else
  g_return_if_fail(object->refcount > 0);
  GST_LOCK(object);
  object->refcount--;
  reftest = (object->refcount == 0);
  GST_UNLOCK(object);
#endif

  /* if we ended up with the refcount at zero */
  if (reftest) {
    /* get the count to 1 for gtk_object_destroy() */
#ifdef HAVE_ATOMIC_H
    atomic_set(&(object->refcount),1);
#else
    object->refcount = 1;
#endif
    /* destroy it */
    gtk_object_destroy(GTK_OBJECT(object));
    /* drop the refcount back to zero */
#ifdef HAVE_ATOMIC_H
    atomic_set(&(object->refcount),0);
#else
    object->refcount = 0;
#endif
    /* finalize the object */
    // FIXME this is an evil hack that should be killed
// FIXMEFIXMEFIXMEFIXME
//    gtk_object_finalize(GTK_OBJECT(object));
  }
}
#endif /* gst_object_unref */

#ifndef gst_object_sink
void gst_object_sink(GstObject *object) {
  g_return_if_fail(object != NULL);
  g_return_if_fail(GST_IS_OBJECT(object));

  if (GTK_OBJECT_FLOATING(object)) {
    GTK_OBJECT_UNSET_FLAGS(object, GTK_FLOATING);
    gst_object_unref(object);
  }
}
#endif /* gst_object_sink */