#include <gtk/gtk.h>

#include <gdk-pixbuf/gdk-pixbuf.h>

#include <ccss/ccss.h>

GtkWidget *window, *container, *theme, *css_scroll, *css;

GdkPixbuf *pixbuf;

ccss_stylesheet_t	*stylesheet;

/* ================================================================ */

/* Our little hierarchy */

typedef enum _CopperClasses {

  CC_FRAME,

  CC_CORNER,

  CC_TOPLEFT,

  CC_TOPRIGHT,

  CC_BOTTOMLEFT,

  CC_BOTTOMRIGHT,

  CC_EDGE,

  CC_TOP,

  CC_RIGHT,

  CC_BOTTOM,

  CC_LEFT,

  CC_TITLEBAR,

  CC_BUTTON,

  CC_LEFTBUTTON,

  CC_MENU,

  CC_RIGHTBUTTON,

  CC_MINIMIZE,

  CC_MAXIMIZE,

  CC_CLOSE,

  CC_TITLE,

  CC_LAST

} CopperClasses;

char *names[] =

  {

    "frame",

    "corner", "topleft", "topright", "bottomleft", "bottomright",

    "edge", "top", "right", "bottom", "left",

    "titlebar",

    "button", "leftbutton", "menu",

    "rightbutton", "minimize", "maximize", "close",

    "title",

    "last"

  };

CopperClasses parents[] =

  {

    CC_LAST,

    CC_FRAME, CC_CORNER, CC_CORNER, CC_CORNER, CC_CORNER,

    CC_FRAME, CC_EDGE, CC_EDGE, CC_EDGE, CC_EDGE,

    CC_FRAME,

    CC_TITLEBAR, CC_BUTTON, CC_LEFTBUTTON,

    CC_BUTTON, CC_RIGHTBUTTON, CC_RIGHTBUTTON, CC_RIGHTBUTTON,

    CC_TITLEBAR,

    CC_LAST

  };

typedef struct

{

  ccss_node_t basic;

  CopperClasses copper_class;

} CopperNode;

CopperNode copper_nodes[CC_LAST];

static char const*

get_type (ccss_node_t const *self)

{

  g_warning ("It's %s", self->type_name);

  return self->type_name;

}

static ptrdiff_t

get_instance (ccss_node_t const *self)

{

  return self->instance;

}

static char const*

get_style (ccss_node_t const *self) {

  return self->inline_style;

}

static ccss_node_t*

get_container (ccss_node_t const *self)

{

  CopperClasses candidate = parents[((CopperNode*)self)->copper_class];

  if (candidate==CC_LAST)

    return NULL;

  else

    /* or should we allocate a new one? */

    return (ccss_node_t*) &(copper_nodes[candidate]);

}

static ccss_node_class_t copper_node_class = {

  .get_type               = (ccss_node_get_type_f) get_type,

  .get_instance           = (ccss_node_get_instance_f) get_instance,

  .get_style              = (ccss_node_get_style_f) get_style,

  .get_container          = (ccss_node_get_container_f) get_container

};

static void

initialise_classes (void)

{

  int i;

  for (i=0; i<CC_LAST; i++)

    {

      ccss_node_init ((ccss_node_t*) &copper_nodes[i], &copper_node_class);

      copper_nodes[i].basic.type_name = names[i];

      copper_nodes[i].basic.instance = 0;

      copper_nodes[i].basic.inline_style = NULL;

      copper_nodes[i].copper_class = i;

    }

}

/* ================================================================ */

static gint

expose_event (GtkWidget *widget, GdkEventExpose *event, gpointer data)

{

  /*

  int w, h;

  int titlebar_width=0, titlebar_height=0;

  ccss_style_t *style = ccss_stylesheet_query (stylesheet,

					       (ccss_node_t*) &copper_nodes[CC_FRAME]);

  cairo_t *cr = gdk_cairo_create (widget->window);

  gtk_window_get_size (GTK_WINDOW (window), &w, &h);

  g_warning ("Yes.\n");

  ccss_cairo_style_draw_rectangle (style, cr, 0, 0, 100, 100);

  cairo_destroy (cr);

#if 0

  gtk_layout_move (GTK_LAYOUT (container), css_scroll, 50, 50);

  gtk_widget_set_size_request (css_scroll,

			       w-100,

			       h-100);

#endif

  */

  return TRUE;

}

static char *

url (GSList const	*args,

     void		*user_data)

{

  char *cwd;

  char *path;

  char *uri;

  char *filename = NULL;

  g_return_val_if_fail (args && args->data, NULL);

  filename = (char*) args->data;

  if (strcmp (filename, "metacity:icon.png")==0)

    {

      /* this is magic */

      filename = "gtk-edit.png";

    }

  cwd = g_get_current_dir ();

  path = g_build_filename (cwd, filename, NULL);

  g_free (cwd), cwd = NULL;

  uri = g_strdup_printf ("file://%s", path);

  g_free (path), path = NULL;

  return uri;

}

static char *

named (GSList const *args, void *user_data)

{

  char *name = NULL;

  if (!name)

    /* fall back to black */

    return g_strdup("#00000000");

  name = args->data;

  g_warning ("Looking up named colour %s", name);

  /* stub: magenta for everything */

  return g_strdup("#FF00FFFF");

}

static ccss_function_t const _functions[] = 

{

  { "url",	url,	NULL },

  { "named",    named,  NULL },

  { NULL }

};

int

main (int argc, char **argv)

{   

  ccss_grammar_t		*grammar;

  ccss_style_t		*style;

  GtkTextBuffer *buffer;

  GtkTextTagTable *tag_table;

  char *contents;

  GError *error = NULL;

  gtk_init (&argc, &argv);

  initialise_classes ();

  grammar = ccss_grammar_create_css ();

  ccss_grammar_add_functions (grammar, _functions);

  stylesheet = ccss_grammar_create_stylesheet_from_file (grammar,

							 "colours.css",

							 NULL);

  g_file_get_contents ("exampleXX.css", &contents, NULL, NULL);

  window = gtk_window_new (GTK_WINDOW_TOPLEVEL);

  gtk_window_set_title (GTK_WINDOW (window), "Copper");

  gtk_widget_set_app_paintable (window, TRUE);

  /*

  container = gtk_layout_new (NULL, NULL);

  gtk_widget_set_app_paintable (container, TRUE);

  tag_table = gtk_text_tag_table_new ();

  buffer = gtk_text_buffer_new (tag_table);

  gtk_text_buffer_set_text (buffer, contents, -1);

  css = gtk_text_view_new_with_buffer (buffer);

  css_scroll = gtk_scrolled_window_new (NULL, NULL);

  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (css_scroll),

				  GTK_POLICY_ALWAYS, GTK_POLICY_ALWAYS);

  gtk_container_add (GTK_CONTAINER (css_scroll), css);

  gtk_layout_put (GTK_LAYOUT (container), css_scroll, 150, 150);

  gtk_container_add (GTK_CONTAINER (window), container);

  */

  gtk_widget_show_all (window);

  g_signal_connect (G_OBJECT (container), "expose_event", G_CALLBACK (expose_event), NULL);

  g_signal_connect (G_OBJECT (window), "delete_event", G_CALLBACK (gtk_main_quit), NULL);

  gtk_main ();

  return 0;

}