#include <glib.h>
#include <glib/gstdio.h>
#include <glib-object.h>
#include <stdarg.h>
#include <gladeui/glade-tsort.h>
#include <gladeui/glade-app.h>

typedef struct
{
  GList *nodes;
  GList *edges;
  gchar **orig_nodes;
} TsortData;

static void
tsort_data_free (gpointer udata)
{
  TsortData *data = udata;
  g_list_free (data->nodes);
  _node_edge_list_free (data->edges);
  g_free (data);
}

static void
test_tsort_order (gconstpointer userdata)
{
  TsortData *data = (gpointer) userdata;
  gchar **orig_nodes = data->orig_nodes;
  GList *nodes, *l;
  
  nodes = _glade_tsort (&data->nodes, &data->edges);

  for (l = nodes; l && *orig_nodes; l = g_list_next (l), orig_nodes++)
    g_assert_cmpstr (l->data, ==, *orig_nodes);

  /* make sure all items where tested */
  g_assert (l == NULL && *orig_nodes == NULL);

  g_list_free (nodes);
}

static void
add_tsort_test_real (const gchar *path, gchar *nodes[], gchar *edges[][2])
{
  TsortData *data = g_new0(TsortData, 1);
  gint i;

  /* insert sorted alphabetically */
  for (i = 0; nodes[i]; i++)
    data->nodes = g_list_insert_sorted (data->nodes, nodes[i], (GCompareFunc)g_strcmp0);

  for (i = 0; edges[i][0]; i++)
    data->edges = _node_edge_prepend (data->edges, edges[i][0], edges[i][1]);

  data->orig_nodes = nodes;

  g_test_add_data_func_full (path, data, test_tsort_order, tsort_data_free);
}

#define add_tsort_test(nodes, edges) add_tsort_test_real ("/Tsort/"#nodes, nodes, edges)

static void
test_toplevel_order (gconstpointer userdata)
{
  gchar **data = (gpointer) userdata;
  gchar *project_path = *data;
  gchar **names = &data[1];
  GladeProject *project;
  GList *toplevels, *l;
  gchar *temp_path;
  const gchar *xml_data;
  gsize xml_size;
  GBytes *xml;

  g_assert (g_close (g_file_open_tmp ("glade-toplevel-order-XXXXXX.glade", &temp_path, NULL), NULL));

  /* Dump contents to a temp file */
  g_assert ((xml = g_resources_lookup_data (project_path, 0, NULL)));
  xml_data = g_bytes_get_data (xml, &xml_size);
  g_assert (g_file_set_contents (temp_path, xml_data, xml_size, NULL));
  g_bytes_unref (xml);

  /* Load project */
  g_assert ((project = glade_project_load (temp_path)));

  /* And save it, order should be the same */
  g_assert (glade_project_save (project, temp_path, NULL));
  g_object_unref (project);

  /* Reload saved project */
  g_assert ((project = glade_project_load (temp_path)));

  g_unlink (temp_path);

  /* And get toplevels to check order */
  g_assert ((toplevels = glade_project_toplevels (project)));

  for (l = toplevels; l && names; l = g_list_next (l), names++)
    {
      GladeWidget *toplevel;
      g_assert ((toplevel = glade_widget_get_from_gobject (l->data)));
      g_assert_cmpstr (glade_widget_get_name (toplevel), ==, *names);
    }

  /* make sure all items where tested */
  g_assert (!l && !*names);
  
  g_list_free (toplevels);
  g_object_unref (project);
  g_free (temp_path);
}

#define add_project_test(data) g_test_add_data_func_full ("/ToplevelOrder/"#data, data, test_toplevel_order, NULL);
#define RESOURCE_PATH "/org/gnome/glade/tests/toplevel-order"
/* _glade_tsort() test cases */

/* the array must be properly ordered, since it will be used to test order */
static gchar *tsort_test[] = {"bbb", "ccc", "aaa", NULL };

static gchar *tsort_test_edges[][2] = { {"ccc","aaa"}, { NULL, NULL} };

/* GladeProject toplevel order test */
static gchar *order_test[] = {RESOURCE_PATH"/toplevel_order_test.glade",
  "bbb", "ccc", "aaa", NULL};

static gchar *order_test2[] = {RESOURCE_PATH"/toplevel_order_test2.glade",
  "aa", "bbb", "ccc", "aaa", "ddd", NULL };

static gchar *order_test3[] = {RESOURCE_PATH"/toplevel_order_test3.glade",
  "aaa", "ccc", "bbb", NULL };

/* toplevels with circular dependencies get ordered alphabetically at the end */
static gchar *order_test4[] = {RESOURCE_PATH"/toplevel_order_test4.glade",
  "aa", "bbb", "cc", "ddd", "aaa", "ccc", NULL };

/* children dependency */
static gchar *order_test5[] = {RESOURCE_PATH"/toplevel_order_test5.glade",
  "xaction", "awindow", NULL };

/* Commonly used widgets with dependencies */
static gchar *order_test6[] = {RESOURCE_PATH"/toplevel_order_test6.glade",
  "ziconfactory", "label_a", "label_b", "asizegroup", "label_c", "xaction",
  "xactiongroup", "anotherwindow", "xentrybuffer", "xliststore", "treeview",
  "zaccelgroup", "awindow", NULL };

int
main (int argc, char *argv[])
{
  gtk_test_init (&argc, &argv, NULL);

  glade_init ();
  glade_app_get ();

  add_tsort_test (tsort_test, tsort_test_edges);
  
  add_project_test (order_test);
  add_project_test (order_test2);
  add_project_test (order_test3);
  add_project_test (order_test4);
  add_project_test (order_test5);
  add_project_test (order_test6);
  
  return g_test_run ();
}