/*

  * Copyright (C) 2014  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>

 #ifdef WIN32

 #include <windows.h>

 #endif	/* WIN32 */

 #include <lua.h>

 #include <glib.h>

 #include <gio/gio.h>

 #include <gtk/gtk.h>

 #include <whelk/whelk.h>

 #include <plover/plover.h>

 #include <plover/package.h>

 #include <plover/packageset.h>

 #include <plover-gtk/transactionhelper.h>

 #include <plover-gtk/stockicons.h>

 LUALIB_API int luaopen_posix(lua_State *L);

 #define LOGO_NAME	"application-x-redhat-package-manager"

 gboolean install(PloverPackageSet *installed,const char *path)

 {

     gchar *s;

     const char *prefix,*unsatisfied;

     const char *filenames[2];

     GError *error=NULL;

     GSList *packages,*lnk;

     struct plover_vector *selected_packages;

     PloverPackage *package;

     PloverPackageSet *set;

     PloverRepository *upstream;

     PloverTransactionHelper *helper;

     helper=plover_transaction_helper_new(NULL);

     g_signal_connect(helper,"close",G_CALLBACK(gtk_main_quit),NULL);

     plover_transaction_helper_set_installed(helper,installed);

     if (plover_transaction_helper_get_error(helper,NULL))

     {

 	plover_transaction_helper_present(helper);

 	return TRUE;

     }

     filenames[0]=path;

     filenames[1]=NULL;

     upstream=plover_repository_new_from_files(filenames,&error);

     if (upstream)

 	plover_transaction_helper_set_upstream(helper,upstream);

     else

     {

 	plover_transaction_helper_set_error(helper,error,

 	  "Software installation failed");

 	g_clear_error(&error);

 	plover_transaction_helper_present(helper);

 	return TRUE;

     }

     prefix=plover_transaction_helper_get_prefix(helper,&error);

     if (error)

 	g_clear_error(&error);

     else

     {

 	s=g_strconcat(prefix?prefix:"","/var/log/open",NULL);

 	plover_log_open(s);

 	g_free(s);

     }

     set=plover_repository_get_package_set(upstream);

     packages=plover_package_set_get_packages(set);

     selected_packages=plover_vector_new();

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

     {

 	package=PLOVER_PACKAGE(lnk->data);

 	plover_vector_append(selected_packages,

 	  plover_package_get_name(package));

     }

     if (!plover_transaction_helper_install_packages(helper,selected_packages,

       &error))

     {

 	if (g_error_matches(error,PLOVER_GENERAL_ERROR,

 	  PLOVER_GENERAL_ERROR_NO_WORK))

 	{

 	    g_error_free(error);

 	    error=g_error_new_literal(PLOVER_GENERAL_ERROR,

 	      PLOVER_GENERAL_ERROR_NO_WORK,

 	      "All packages already installed");

 	    plover_transaction_helper_set_error(helper,error,

 	      "Software installation");

 	}

 	else if (g_error_matches(error,PLOVER_GENERAL_ERROR,

 	  PLOVER_GENERAL_ERROR_REQUIREMENTS_NOT_MET))

 	{

 	    g_error_free(error);

 	    unsatisfied=plover_transaction_helper_get_unsatisfied(helper);

 	    error=g_error_new(PLOVER_GENERAL_ERROR,

 	      PLOVER_GENERAL_ERROR_REQUIREMENTS_NOT_MET,

 	      "Software cannot be installed because the following requirements "

 	      "were not met:\n\n%s",unsatisfied);

 	    plover_transaction_helper_set_error(helper,error,

 	      "Software installation failed");

 	}

 	else

 	    plover_transaction_helper_set_error(helper,error,

 	      "Software installation failed");

 	g_error_free(error);

     }

     plover_vector_free(selected_packages);

     g_object_unref(upstream);

     plover_transaction_helper_present(helper);

     return TRUE;

 }

 static void install_icons(void)

 {

     GtkIconSet *icon_set;

     plover_icons_add_to_stock("mimetypes",LOGO_NAME);

     icon_set=gtk_icon_factory_lookup_default(LOGO_NAME);

     gtk_window_set_default_icon_name(LOGO_NAME);

 }

 int main(int argc,char **argv)

 {

     GError *err=0;

     gchar *install_path=NULL;

     PloverPackageSet *set;

 #if 0

     gsize len;

     gchar *s,*t,*contents;

     GSList *objects,*lnk;

 #endif

     GOptionEntry options[]={

 	{"install",0,0,G_OPTION_ARG_FILENAME,&install_path,

 	  "Install an RPM","path"},

 	{NULL}

     };

 #ifdef WIN32

     /*

      * plover-open is normally a GUI application, but rpm scripts may well

      * call console applications and it looks ugly if console windows keep

      * popping up. Avoid this by allocating our own console and hiding it.

      * Note:

      *	- If plover-open is a console application (typically for debugging),

      *    then skip this step.

      *  - Call ShowWindow twice to negate special handling on first call.

      */

     if (!GetConsoleWindow())

     {

 	AllocConsole();

 	ShowWindow(GetConsoleWindow(),SW_HIDE);

 	ShowWindow(GetConsoleWindow(),SW_HIDE);

     }

 #endif

     plover_exception_handler_init();

     razor_set_lua_loader("posix",(void (*)())luaopen_posix);

     razor_set_lua_loader("whelk",(void (*)())luaopen_whelk);

     if (!gtk_init_with_args(&argc,&argv,NULL,options,NULL,&err))

     {

 	g_printerr("%s\n",err->message);

 	exit(1);

     }

     install_icons();

 #if 0

     ui=gtk_builder_new();

     if (!g_file_get_contents("plover-open.ui",&contents,&len,&err) &&

       g_error_matches(err,G_FILE_ERROR,G_FILE_ERROR_NOENT))

     {

 #ifdef WIN32

 	t=g_win32_get_package_installation_directory_of_module(NULL);

 	s=g_build_filename(t,"share","plover","plover-open.ui",NULL);

 	g_free(t);

 #else

 	s=g_build_filename(PLOVER_DATADIR,"plover-open.ui",NULL);

 #endif

 	g_clear_error(&err);

 	(void)g_file_get_contents(s,&contents,&len,&err);

 	g_free(s);

     }

     if (!err)

     {

 	(void)gtk_builder_add_from_string(ui,contents,len,&err);

 	g_free(contents);

     }

     if (err)

     {

 	g_error("%s",err->message);

 	exit(0);

     }

     gtk_builder_connect_signals(ui,NULL);

 #endif

     set=plover_package_set_new();

     (void)plover_package_set_open(set,"",TRUE,NULL);

     if (install_path)

 	if (install(set,install_path))

 	    gtk_main();

     g_clear_object(&set);

 #if 0

     objects=gtk_builder_get_objects(ui);

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

 	if (GTK_IS_WIDGET(lnk->data) &&

 	  gtk_widget_is_toplevel(GTK_WIDGET(lnk->data)))

 	    gtk_widget_destroy(GTK_WIDGET(lnk->data));

     g_slist_free(objects);

     g_clear_object(&ui);

 #endif

     g_free(install_path);

     exit(0);

 }