/*
 * Copyright (C) 2013 Igalia S.L.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2, or (at your option)
 * any later version.
 *
 * This program 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 General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
 */

#include <string.h>

#include "text.h"
#include "utils.h"

typedef struct {
  GtkWidget     *view;
  GtkTreeStore  *store;
  GtkWidget     *type_value;
  GtkWidget     *lang_value;
  GtkWidget     *abbr_value;
  GtkWidget     *id_value;
  GtkWidget     *title_value;
  GtkTextBuffer *text_buffer;
} PgdTaggedStructDemo;


static void
pgd_taggedstruct_free (PgdTaggedStructDemo *demo)
{
  if (!demo)
    return;

  if (demo->store)
    {
      g_object_unref (demo->store);
      demo->store = NULL;
    }

  g_free (demo);
}


static void
populate_store_aux (GtkTreeStore *store, GtkTreeIter *parent, PopplerStructureElementIter *iter)
{
  do
    {
      PopplerStructureElementIter *child = poppler_structure_element_iter_get_child (iter);
      PopplerStructureElement *element = poppler_structure_element_iter_get_element (iter);
      GEnumClass *enum_class = G_ENUM_CLASS (g_type_class_ref (POPPLER_TYPE_STRUCTURE_ELEMENT_KIND));
      GEnumValue *enum_value = g_enum_get_value (enum_class, poppler_structure_element_get_kind (element));
      GtkTreeIter pos;

      gtk_tree_store_append (store, &pos, parent);
      gtk_tree_store_set (store, &pos, 0, enum_value->value_nick, 1, element, -1);

      if (child)
        {
          populate_store_aux (store, &pos, child);
          poppler_structure_element_iter_free (child);
        }
    }
  while (poppler_structure_element_iter_next (iter));
}


static GtkTreeStore *
populate_store (PopplerStructureElementIter *iter)
{
  GtkTreeStore *store = gtk_tree_store_new (2, G_TYPE_STRING, G_TYPE_POINTER);

  if (iter)
    {
      populate_store_aux (store, NULL, iter);
    }
  else
    {
      GtkTreeIter pos;

      gtk_tree_store_append (store, &pos, NULL);
      gtk_tree_store_set (store, &pos, 0, "<b>Not a Tagged-PDF</b>", 1, NULL, -1);
    }

  return store;
}


/*static void
pgd_row_activated (GtkTreeView *tree_view, GtkTreePath *path, GtkTreeViewColumn *column, PgdTaggedStructDemo *demo)
{*/
static void
pgd_selection_changed (GtkTreeSelection *selection, PgdTaggedStructDemo *demo)
{
  GtkTreeModel *model;
  PopplerStructureElement *element;
  GtkTreeIter iter;
  gpointer elementptr;

  if (!gtk_tree_selection_get_selected (selection, &model, &iter))
    return;

  gtk_tree_model_get (model, &iter, 1, &elementptr, -1);
  element = POPPLER_STRUCTURE_ELEMENT (elementptr);

  gtk_label_set_text (GTK_LABEL (demo->id_value),
                      poppler_structure_element_get_id (element));
  gtk_label_set_text (GTK_LABEL (demo->title_value),
                      poppler_structure_element_get_title (element));
  gtk_label_set_text (GTK_LABEL (demo->lang_value),
                      poppler_structure_element_get_language (element));
  gtk_label_set_text (GTK_LABEL (demo->abbr_value),
                      poppler_structure_element_get_abbreviation (element));
  gtk_text_buffer_set_text (demo->text_buffer, "", -1);

  if (poppler_structure_element_is_content (element))
    {
      const gchar *text = poppler_structure_element_get_text (element, FALSE);

      if (text)
        gtk_text_buffer_set_text (demo->text_buffer, text, -1);
      gtk_label_set_text (GTK_LABEL (demo->type_value), "Content");
    }
  else
    {
      if (poppler_structure_element_is_inline (element))
        gtk_label_set_text (GTK_LABEL (demo->type_value), "Inline");
      else if (poppler_structure_element_is_block (element))
        gtk_label_set_text (GTK_LABEL (demo->type_value), "Block");
      else
        gtk_label_set_text (GTK_LABEL (demo->type_value), "Structure");
    }
}


GtkWidget *
pgd_taggedstruct_create_widget (PopplerDocument *document)
{
  PopplerStructureElementIter *iter;
  PgdTaggedStructDemo *demo;
  GtkCellRenderer *renderer;
  GtkTreeSelection *selection;
  GtkWidget *hbox;
  GtkWidget *vbox;
  GtkWidget *grid;
  GtkWidget *scroll;
  GtkWidget *w;
  gint row;

  demo = g_new0 (PgdTaggedStructDemo, 1);

  iter = poppler_structure_element_iter_new (document);
  demo->store = populate_store (iter);
  poppler_structure_element_iter_free (iter);

  demo->view = gtk_tree_view_new_with_model (GTK_TREE_MODEL (demo->store));

  renderer = gtk_cell_renderer_text_new ();
  gtk_tree_view_insert_column_with_attributes (GTK_TREE_VIEW (demo->view),
                                               0, "Type",
                                               renderer,
                                               "markup", 0,
                                               NULL);
  g_object_set (G_OBJECT (gtk_tree_view_get_column (GTK_TREE_VIEW (demo->view), 0)),
                "expand", TRUE, NULL);

  gtk_tree_view_expand_all (GTK_TREE_VIEW (demo->view));
  gtk_tree_view_set_show_expanders (GTK_TREE_VIEW (demo->view), TRUE);
  gtk_tree_view_set_headers_visible (GTK_TREE_VIEW (demo->view), TRUE);
  gtk_tree_view_set_headers_clickable (GTK_TREE_VIEW (demo->view), FALSE);
  gtk_tree_view_set_activate_on_single_click (GTK_TREE_VIEW (demo->view), TRUE);

  hbox = gtk_box_new (GTK_ORIENTATION_HORIZONTAL, 6);
  scroll = gtk_scrolled_window_new (NULL, NULL);
  gtk_container_add (GTK_CONTAINER (scroll), demo->view);
  gtk_widget_show (demo->view);
  gtk_box_pack_start (GTK_BOX (hbox), scroll, TRUE, TRUE, 0);
  gtk_widget_show (scroll);

  row = 0;
  grid = gtk_grid_new ();
  gtk_container_set_border_width (GTK_CONTAINER (grid), 12);
  gtk_grid_set_row_homogeneous (GTK_GRID (grid), FALSE);
  gtk_grid_set_column_spacing (GTK_GRID (grid), 6);
  gtk_grid_set_row_spacing (GTK_GRID (grid), 6);
  pgd_table_add_property_with_value_widget (GTK_GRID (grid), "<b>Type:</b>", &demo->type_value, NULL, &row);
  pgd_table_add_property_with_value_widget (GTK_GRID (grid), "<b>ID:</b>", &demo->id_value, NULL, &row);
  pgd_table_add_property_with_value_widget (GTK_GRID (grid), "<b>Title:</b>", &demo->title_value, NULL, &row);
  pgd_table_add_property_with_value_widget (GTK_GRID (grid), "<b>Language:</b>", &demo->lang_value, NULL, &row);
  pgd_table_add_property_with_value_widget (GTK_GRID (grid), "<b>Abbreviation:</b>", &demo->abbr_value, NULL, &row);

  vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 6);
  gtk_box_pack_start (GTK_BOX (vbox), grid, FALSE, FALSE, 0);
  gtk_widget_show (grid);

  scroll = gtk_scrolled_window_new (NULL, NULL);
  gtk_container_set_border_width (GTK_CONTAINER (scroll), 12);
  gtk_box_pack_end (GTK_BOX (vbox), scroll, TRUE, TRUE, 0);
  gtk_widget_show (scroll);

  gtk_container_add (GTK_CONTAINER (scroll), (w = gtk_text_view_new ()));
  gtk_widget_show (w);

  demo->text_buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (w));
  gtk_text_view_set_wrap_mode (GTK_TEXT_VIEW (w), GTK_WRAP_WORD_CHAR);
  gtk_text_view_set_editable (GTK_TEXT_VIEW (w), FALSE);
  gtk_text_buffer_set_text (demo->text_buffer, "", -1);
  gtk_widget_show (w);

  selection = gtk_tree_view_get_selection (GTK_TREE_VIEW (demo->view));
  g_signal_connect (selection, "changed",
                    G_CALLBACK (pgd_selection_changed),
                    demo);

  gtk_box_pack_end (GTK_BOX (hbox), vbox, TRUE, TRUE, 0);
  gtk_widget_show (vbox);

  g_object_weak_ref (G_OBJECT (hbox),
                     (GWeakNotify) pgd_taggedstruct_free,
                     demo);

  gtk_widget_show (hbox);
  return hbox;
}