/*

 * Copyright (C) 2010  J. Ali Harlow <ali@juiblex.co.uk>

 *

 * 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 of the License, 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 "config.h"

#include <stdlib.h>

#include <string.h>

#include <gtk/gtk.h>

#include <plover/plover.h>

#include <plover/package.h>

#include <plover/packageset.h>

#include <plover/yumrepository.h>

#include <plover-gtk/packagestore.h>

#include <plover-gtk/packagefilestore.h>

#include "app-manager.h"

GtkTreeView *view=NULL;

PloverPackage *active=NULL;

gboolean view_files=FALSE;

void package_present(PloverPackage *package)

{

    gchar *s,*prefix,*prefix_path;

    const char *text,*t;

    char *multiple_prefixes="multiple";

    GError *tmp_err=NULL;

    GSList *sets,*repositories,*lnk;

    GtkWidget *w;

    GtkTextBuffer *buf;

    GtkTreeModel *model;

    struct comps *comps;

    PloverPackageSet *set;

    PloverPackageFileStore *store;

    PloverRepository *repository;

    buf=GTK_TEXT_BUFFER(gtk_builder_get_object(ui,"description"));

    if (package)

    {

	s=g_strdup(plover_package_get_description(package));

	g_strdelimit(s,"\t\n",' ');

    }

    else

    {

	model=gtk_tree_view_get_model(view);

	while(model &&

	  (GTK_IS_TREE_MODEL_FILTER(model) || GTK_IS_TREE_MODEL_SORT(model)))

	{

	    if (GTK_IS_TREE_MODEL_FILTER(model))

		model=

		  gtk_tree_model_filter_get_model(GTK_TREE_MODEL_FILTER(model));

	    else

		model=gtk_tree_model_sort_get_model(GTK_TREE_MODEL_SORT(model));

	}

	repositories=NULL;

	prefix=NULL;

	if (model && PLOVER_IS_PACKAGE_STORE(model))

	{

	    sets=plover_package_store_get_sets(PLOVER_PACKAGE_STORE(model));

	    for(lnk=sets;lnk;lnk=lnk->next)

	    {

		set=lnk->data;

		repository=plover_package_set_get_repository(set);

		if (repository && !g_slist_find(repositories,repository))

		    repositories=g_slist_prepend(repositories,repository);

		t=plover_package_set_guess_prefix(set,tmp_err?NULL:&tmp_err);

		if (!t)

		    continue;

		if (!prefix)

		    prefix=g_strdup(t);

		else if (prefix!=multiple_prefixes && strcmp(prefix,t))

		{

		    g_free(prefix);

		    prefix=multiple_prefixes;

		}

	    }

	    if (prefix==multiple_prefixes)

		s=g_strdup("Multiple install prefixes");

	    else if (repositories)

	    {

		if (prefix!=multiple_prefixes)

		    g_free(prefix);

		prefix=NULL;

		for(lnk=repositories;lnk;lnk=lnk->next)

		{

		    repository=lnk->data;

		    if (PLOVER_IS_YUM_REPOSITORY(repository))

		    {

			comps=plover_yum_repository_get_comps(

			  PLOVER_YUM_REPOSITORY(repository),NULL);

			t=plover_comps_get_default_prefix(comps);

			if (!prefix)

			    prefix=g_strdup(t);

			else if (prefix!=multiple_prefixes && strcmp(prefix,t))

			{

			    g_free(prefix);

			    prefix=multiple_prefixes;

			}

		    }

		}

		if (prefix==multiple_prefixes)

		    s=g_strdup("Repositories intended to be installed to "

		      "multiple destinations");

		else if (prefix)

		{

		    prefix_path=razor_path_from_uri(prefix,NULL);

		    s=g_strdup_printf("Repository intended to be installed to: "

		      "%s",prefix_path?prefix_path:prefix);

		    g_free(prefix_path);

		}

		else

		    s=g_strdup("Repository with no default "

		      "install destination");

	    }

	    else if (prefix)

	    {

		prefix_path=razor_path_from_uri(prefix,NULL);

		s=g_strdup_printf("Installed in: %s",

		  prefix_path?prefix_path:prefix);

		g_free(prefix_path);

	    }

	    else if (sets)

		s=g_strdup("No common installation destination found");

	    else

		s=g_strdup("Empty package store");

	    if (prefix!=multiple_prefixes)

		g_free(prefix);

	    g_slist_free(repositories);

	    g_clear_error(&tmp_err);

	}

	else if (model)

	    s=g_strdup_printf("Unsupported package list container (%s)",

	      G_OBJECT_TYPE_NAME(model));

	else

	    s=g_strdup("No Package list container");

    }

    gtk_text_buffer_set_text(buf,s,-1);

    g_free(s);

    w=GTK_WIDGET(gtk_builder_get_object(ui,"PackageDetails"));

    if (!package)

    {

	gtk_widget_hide(w);

	w=GTK_WIDGET(gtk_builder_get_object(ui,"FilesScrolledWindow"));

	gtk_widget_hide(w);

	w=GTK_WIDGET(gtk_builder_get_object(ui,"DescriptionScrolledWindow"));

	gtk_widget_show(w);

    }

    else

    {

	if (view_files)

	    gtk_widget_hide(w);

	else

	{

	    gtk_widget_show(w);

	    w=GTK_WIDGET(gtk_builder_get_object(ui,"HomepageBox"));

	    text=plover_package_get_URL(package);

	    if (!*text)

		gtk_widget_hide(w);

	    else

	    {

		gtk_widget_show(w);

		w=GTK_WIDGET(gtk_builder_get_object(ui,"Homepage"));

		gtk_link_button_set_uri(GTK_LINK_BUTTON(w),text);

		t=strstr(text,"://");

		if (t)

		    t+=3;

		if (t)

		    s=g_strndup(t,strcspn(t,"/"));

		else

		    s=g_strdup(text);

		gtk_button_set_label(GTK_BUTTON(w),s);

		g_free(s);

	    }

	    w=GTK_WIDGET(gtk_builder_get_object(ui,"Architecture"));

	    gtk_label_set_text(GTK_LABEL(w),plover_package_get_arch(package));

	    w=GTK_WIDGET(gtk_builder_get_object(ui,"License"));

	    gtk_label_set_text(GTK_LABEL(w),

	      plover_package_get_license(package));

	}

	w=GTK_WIDGET(gtk_builder_get_object(ui,"FilesScrolledWindow"));

	if (view_files)

	    gtk_widget_show(w);

	else

	    gtk_widget_hide(w);

	w=GTK_WIDGET(gtk_builder_get_object(ui,"DescriptionScrolledWindow"));

	if (view_files)

	{

	    gtk_widget_hide(w);

	    w=GTK_WIDGET(gtk_builder_get_object(ui,"Files"));

	    store=plover_package_file_store_new_from_package(package);

	    gtk_tree_view_set_model(GTK_TREE_VIEW(w),GTK_TREE_MODEL(store));

	    g_object_unref(store);

	}

	else

	{

	    gtk_widget_show(w);

	    /* Without this, Gtk+ 2.18.6 just truncates long license tags */

	    w=GTK_WIDGET(gtk_builder_get_object(ui,"DetailsScrolledWindow"));

	    gtk_widget_queue_resize(w);

	}

    }

}

void package_filelist_present(PloverPackage *package)

{

}

static void package_selection_changed(GtkTreeSelection *selection)

{

    GtkTreeIter iter;

    GtkTreeView *view;

    GtkTreeModel *model;

    if (active)

	g_object_unref(active);

    if (gtk_tree_selection_get_selected(selection,NULL,&iter))

    {

	view=gtk_tree_selection_get_tree_view(selection);

	model=gtk_tree_view_get_model(view);

	gtk_tree_model_get(model,&iter,PLOVER_PACKAGE_STORE_OBJ_COLUMN,&active,

	  -1);

    }

    else

	active=NULL;

    package_present(active);

}

static void package_activated(GtkTreeView *view,GtkTreePath *path,

  GtkTreeViewColumn *column,gpointer data)

{

    GtkTreeIter iter;

    GtkTreeModel *model=gtk_tree_view_get_model(view);

    PloverPackage *package;

    if (gtk_tree_model_get_iter(model,&iter,path))

    {

	gtk_tree_model_get(model,&iter,PLOVER_PACKAGE_STORE_OBJ_COLUMN,&package,

	  -1);

	package_filelist_present(package);

    }

}

static void package_inserted(GtkTreeModel *tree_model,GtkTreePath *path,

  GtkTreeIter *iter,gpointer data)

{

    gchar *s;

    s=gtk_tree_path_to_string(path);

    g_message("package_inserted(%s): %sactive package",

      s,active?"":"no ");

    g_free(s);

    if (!active)

	package_present(NULL);

}

static void package_deleted(GtkTreeModel *tree_model,GtkTreePath *path,

  gpointer data)

{

    /*

     * If the deleted package was the active one, then selection-changed

     * will be emitted which will handle that case.

     */

    gchar *s;

    s=gtk_tree_path_to_string(path);

    g_message("package_deleted(%s): %sactive package",s,active?"":"no ");

    g_free(s);

    if (!active)

	package_present(NULL);

}

static void package_cell_data_func(GtkTreeViewColumn *column,

  GtkCellRenderer *cell,GtkTreeModel *model,GtkTreeIter *iter,gpointer data)

{

    gchar *markup;

    gchar *summary,*name,*version;

    g_return_if_fail(GTK_IS_TREE_MODEL(model));

    gtk_tree_model_get(model,iter,PLOVER_PACKAGE_STORE_SUMMARY_COLUMN,&summary,

      PLOVER_PACKAGE_STORE_NAME_COLUMN,&name,

      PLOVER_PACKAGE_STORE_VERSION_COLUMN,&version,-1);

    markup=g_markup_printf_escaped("<b>%s</b>\n%s %s",summary,name,version);

    g_free(summary);

    g_free(name);

    g_free(version);

    g_object_set(cell,"markup",markup,NULL);

    g_free(markup);

}

void set_package_model(GtkTreeModel *model)

{

    GtkWidget *w;

    GtkTreeModel *old_model;

    GtkTreeViewColumn *column;

    GtkCellRenderer *renderer;

    GtkTreeSelection *selection;

    if (view)

    {

	old_model=gtk_tree_view_get_model(view);

	if (old_model)

	{

	    g_signal_handlers_disconnect_by_func(old_model,

	      G_CALLBACK(package_inserted),NULL);

	    g_signal_handlers_disconnect_by_func(old_model,

	      G_CALLBACK(package_deleted),NULL);

	}

    }

    if (!view)

    {

	w=GTK_WIDGET(gtk_builder_get_object(ui,"Packages"));

	if (w)

	{

	    view=GTK_TREE_VIEW(w);

#if 0

	    column=gtk_tree_view_column_new_with_attributes("Icon",

	      gtk_cell_renderer_pixbuf_new(),"pixbuf",

	      PLOVER_PACKAGE_FILE_STORE_ICON_COLUMN,NULL);

	    gtk_tree_view_append_column(GTK_TREE_VIEW(w),column);

#endif

	    column=gtk_tree_view_column_new();

	    gtk_tree_view_column_set_title(column,"Summary");

	    renderer=gtk_cell_renderer_text_new();

	    gtk_tree_view_column_pack_start(column,renderer,FALSE);

	    gtk_tree_view_column_set_cell_data_func(column,renderer,

	      package_cell_data_func,NULL,NULL);

	    gtk_tree_view_append_column(view,column);

	    gtk_widget_show_all(w);

	    gtk_tree_view_set_headers_visible(view,FALSE);

	    w=GTK_WIDGET(gtk_builder_get_object(ui,"SearchEntry"));

	    gtk_tree_view_set_search_entry(view,GTK_ENTRY(w));

	    selection=gtk_tree_view_get_selection(view);

	    g_signal_connect(selection,"changed",

	      G_CALLBACK(package_selection_changed),NULL);

	    g_signal_connect(view,"row-activated",G_CALLBACK(package_activated),

	      NULL);

	}

	else

	    g_warning("Packages: no such widget in UI");

	w=GTK_WIDGET(gtk_builder_get_object(ui,"Files"));

	if (w)

	{

	    column=gtk_tree_view_column_new_with_attributes("Name",

	      gtk_cell_renderer_text_new(),"text",

	      PLOVER_PACKAGE_FILE_STORE_NAME_COLUMN,NULL);

	    gtk_tree_view_append_column(GTK_TREE_VIEW(w),column);

	    gtk_tree_view_set_headers_visible(GTK_TREE_VIEW(w),FALSE);

	    gtk_widget_show_all(w);

	}

	else

	    g_warning("Files: no such widget in UI");

    }

    if (view)

    {

	g_warning("set_package_model: Calling gtk_tree_view_set_model()");

	gtk_tree_view_set_model(view,model);

	g_warning("set_package_model: gtk_tree_view_set_model() returns");

	gtk_tree_view_set_search_column(view,

	  PLOVER_PACKAGE_STORE_NAME_COLUMN);

	if (model)

	{

	    g_signal_connect(model,"row-inserted",G_CALLBACK(package_inserted),

	      NULL);

	    g_signal_connect(model,"row-deleted",G_CALLBACK(package_deleted),

	      NULL);

	}

    }

    package_present(NULL);

}

PloverPackage *get_active_package(void)

{

    return active;

}

G_MODULE_EXPORT void

  on_view_files_toggled(GtkCheckMenuItem *menuitem,gpointer data)

{

    view_files=gtk_check_menu_item_get_active(menuitem);

    package_present(active);

}

G_MODULE_EXPORT void

  on_view_details_toggled(GtkCheckMenuItem *menuitem,gpointer data)

{

}