/*
 * text.c
 *
 * Copyright (C) 2002 Sun Microsystems, Inc.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Library General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 *
 * This library 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
 * Library General Public License for more details.
 *
 * You should have received a copy of the GNU Library General Public
 * License along with this library; if not, write to the
 * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
 * Boston, MA 02110-1301, USA.
 *
 * Authors: Glynn Foster <glynn.foster@sun.com>
 */

#include "config.h"

#include "zenity.h"
#include "util.h"

#ifdef HAVE_WEBKITGTK
#include <webkit/webkit.h>
#endif

static ZenityTextData	*zen_text_data;

static void zenity_text_dialog_response (GtkWidget *widget, int response, gpointer data);
static void zenity_text_toggle_button (GtkToggleButton *button, gpointer data);

#ifdef HAVE_WEBKITGTK
static void
zenity_configure_webkit (WebKitWebView *web_view)
{
  WebKitWebSettings *settings;
  settings = webkit_web_view_get_settings(web_view);
  g_object_set(G_OBJECT(settings), "enable-scripts",     FALSE, NULL);
  g_object_set(G_OBJECT(settings), "auto-load-images",   TRUE, NULL);
  g_object_set(G_OBJECT(settings), "auto-resize-window", TRUE, NULL);
  g_object_set(G_OBJECT(settings), "auto-shrink-images", TRUE, NULL);
  /*
    Stick to the defaults
    "cursive-font-family"      gchar*                : Read / Write / Construct
    "default-encoding"         gchar*                : Read / Write / Construct
    "default-font-family"      gchar*                : Read / Write / Construct
    "default-font-size"        gint                  : Read / Write / Construct
    "default-monospace-font-size" gint               : Read / Write / Construct
    "editing-behavior"         WebKitEditingBehavior : Read / Write / Construct
  */
  g_object_set(G_OBJECT(settings), "enable-caret-browsing",       FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-default-context-menu", FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-developer-extras",     FALSE, NULL);
  /* unexisting property? g_object_set(G_OBJECT(settings), "enable-dns-prefetching",      FALSE, NULL);*/
  g_object_set(G_OBJECT(settings), "enable-dom-paste",            FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-file-access-from-file-uris", FALSE, NULL);
  /* unexisting property? g_object_set(G_OBJECT(settings), "enable-frame-flattening",     FALSE, NULL);*/
  /* unexisting property? g_object_set(G_OBJECT(settings), "enable-fullscreen",           FALSE, NULL);*/
  g_object_set(G_OBJECT(settings), "enable-html5-database",       FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-html5-local-storage",  FALSE, NULL);
  /* unexisting property? g_object_set(G_OBJECT(settings), "enable-hyperlink-auditing",   FALSE, NULL);*/
  g_object_set(G_OBJECT(settings), "enable-java-applet",          FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-offline-web-application-cache", FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-page-cache",           FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-plugins",              FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-private-browsing",     TRUE, NULL);
  g_object_set(G_OBJECT(settings), "enable-scripts",              FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-site-specific-quirks", FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-spatial-navigation",   FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-spell-checking",       FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-universal-access-from-file-uris", FALSE, NULL);
  g_object_set(G_OBJECT(settings), "enable-xss-auditor",          TRUE, NULL);
  /*
    Stick to defaults
    "enforce-96-dpi"           gboolean              : Read / Write / Construct
    "fantasy-font-family"      gchar*                : Read / Write / Construct
  */
  g_object_set(G_OBJECT(settings), "javascript-can-access-clipboard",           FALSE, NULL);
  g_object_set(G_OBJECT(settings), "javascript-can-open-windows-automatically", FALSE, NULL);
  g_object_set(G_OBJECT(settings), "javascript-can-open-windows-automatically", FALSE, NULL);
  /*
    Stick to defaults
    "minimum-font-size"        gint                  : Read / Write / Construct
    "minimum-logical-font-size" gint                 : Read / Write / Construct
    "monospace-font-family"    gchar*                : Read / Write / Construct
    "print-backgrounds"        gboolean              : Read / Write / Construct
    "resizable-text-areas"     gboolean              : Read / Write / Construct
    "sans-serif-font-family"   gchar*                : Read / Write / Construct
    "serif-font-family"        gchar*                : Read / Write / Construct
    "spell-checking-languages" gchar*                : Read / Write / Construct
  */
  g_object_set(G_OBJECT(settings), "tab-key-cycles-through-elements", FALSE, NULL);
  g_object_set(G_OBJECT(settings), "user-agent",
               "Zenity with WebKit (KHTML, like Gecko) support", NULL);
  /*
    Stick to defaults
    "user-stylesheet-uri"      gchar*                : Read / Write / Construct
    "zoom-step"                gfloat                : Read / Write / Construct
  */
}

static gboolean
zenity_text_webview_decision_request (WebKitWebView             *webkitwebview,
                                      WebKitWebFrame            *frame,
                                      WebKitNetworkRequest      *request,
                                      WebKitWebNavigationAction *navigation_action,
                                      WebKitWebPolicyDecision   *policy_decision,
                                      gpointer                   user_data)
{
  webkit_web_policy_decision_ignore (policy_decision);
  return TRUE;
}

static void
zenity_text_webview_load_finished (WebKitWebView  *webkitwebview,
                                   WebKitWebFrame *frame,
                                   gpointer        user_data)
{
  g_signal_connect (G_OBJECT (webkitwebview), "navigation-policy-decision-requested",
                    G_CALLBACK (zenity_text_webview_decision_request), NULL);
}

#endif

static gboolean
zenity_text_handle_stdin (GIOChannel  *channel,
                          GIOCondition condition,
                          gpointer     data)
{
  static GtkTextBuffer *buffer;
  gchar buf[1024];

  gsize len;

  buffer = GTK_TEXT_BUFFER (data);

  if ((condition & G_IO_IN) || (condition & (G_IO_IN | G_IO_HUP))) {
    GError *error = NULL;
    gint status;

    while (channel->is_readable != TRUE)
      ;

    do {
      status = g_io_channel_read_chars (channel, buf, 1024, &len, &error);

      while (gtk_events_pending ())
        gtk_main_iteration ();

    } while (status == G_IO_STATUS_AGAIN);

    if (status != G_IO_STATUS_NORMAL) {
      if (error) {
        g_warning ("zenity_text_handle_stdin () : %s", error->message);
        g_error_free (error);
        error = NULL;
      }
      return FALSE;
    }

    if (len > 0) {
      GtkTextIter end;
      gchar *utftext; 
      gsize localelen; 
      gsize utflen;

      gtk_text_buffer_get_end_iter (buffer, &end);

      if (!g_utf8_validate (buf, len, NULL)) {
        utftext = g_convert_with_fallback (buf, len, "UTF-8", "ISO-8859-1", NULL, &localelen, &utflen, NULL);
        gtk_text_buffer_insert (buffer, &end, utftext, utflen);
        g_free (utftext);
      } else {
        gtk_text_buffer_insert (buffer, &end, buf, len);
      }
    }
  }

  return TRUE;
}

static void
zenity_text_fill_entries_from_stdin (GtkTextBuffer *text_buffer)
{
  GIOChannel *channel; 

  channel = g_io_channel_unix_new (0);
  g_io_channel_set_encoding (channel, NULL, NULL);
  g_io_channel_set_flags (channel, G_IO_FLAG_NONBLOCK, NULL);
  g_io_add_watch (channel, G_IO_IN | G_IO_HUP, zenity_text_handle_stdin, text_buffer);
}

void
zenity_text (ZenityData *data, ZenityTextData *text_data)
{
  GtkBuilder *builder;
  GtkWidget *dialog;
  GtkWidget *ok_button;
  GtkWidget *checkbox;
  GtkWidget *cancel_button;

  GObject *text_view;
  GtkTextBuffer *text_buffer;

#ifdef HAVE_WEBKITGTK
  GtkWidget *web_kit;
  GtkWidget *scrolled_window;
  GtkTextIter start_iter, end_iter;
  gchar *content;
#endif
  zen_text_data = text_data;
  builder = zenity_util_load_ui_file ("zenity_text_dialog",
  				      "textbuffer1", NULL);
	
  if (builder == NULL) {
    data->exit_code = zenity_util_return_exit_code (ZENITY_ERROR);
    return;
  }
	
  gtk_builder_connect_signals (builder, NULL);
	  
  dialog = GTK_WIDGET (gtk_builder_get_object (builder, "zenity_text_dialog"));

  ok_button = GTK_WIDGET (gtk_builder_get_object (builder, "zenity_text_close_button"));
  cancel_button = GTK_WIDGET (gtk_builder_get_object (builder, "zenity_text_cancel_button"));
  checkbox = GTK_WIDGET (gtk_builder_get_object (builder, "zenity_text_checkbox"));

  g_signal_connect (G_OBJECT (dialog), "response",
                    G_CALLBACK (zenity_text_dialog_response), data);
	
  if (data->dialog_title)
    gtk_window_set_title (GTK_WINDOW (dialog), data->dialog_title);

  zenity_util_set_window_icon (dialog, data->window_icon, ZENITY_IMAGE_FULLPATH ("zenity-text.png"));

  gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_CLOSE);

  text_buffer = gtk_text_buffer_new (NULL);
  text_view = gtk_builder_get_object (builder, "zenity_text_view");
  gtk_text_view_set_buffer (GTK_TEXT_VIEW (text_view), text_buffer);
  gtk_text_view_set_editable (GTK_TEXT_VIEW(text_view), text_data->editable);

  if (text_data->no_wrap)
    gtk_text_view_set_wrap_mode (GTK_TEXT_VIEW(text_view), GTK_WRAP_NONE);

  if (text_data->font) {
      PangoFontDescription *fontDesc = pango_font_description_from_string (text_data->font);
      gtk_widget_modify_font (GTK_WIDGET(text_view), fontDesc);
  }

  if (text_data->uri)
    zenity_util_fill_file_buffer (text_buffer, text_data->uri);
  else
    zenity_text_fill_entries_from_stdin (GTK_TEXT_BUFFER (text_buffer));

  if (text_data->editable)
    zen_text_data->buffer = text_buffer;

  if (data->ok_label) { 
    gtk_button_set_label (GTK_BUTTON (ok_button), data->ok_label);
    gtk_button_set_image (GTK_BUTTON (ok_button),
                          gtk_image_new_from_stock (GTK_STOCK_OK, GTK_ICON_SIZE_BUTTON));
  }

  if (data->cancel_label) {
    gtk_button_set_label (GTK_BUTTON (cancel_button), data->cancel_label);
    gtk_button_set_image (GTK_BUTTON (cancel_button), 
                          gtk_image_new_from_stock (GTK_STOCK_CANCEL, GTK_ICON_SIZE_BUTTON));
  }

  if (text_data->checkbox) {
    gtk_widget_set_visible (GTK_WIDGET (checkbox), TRUE);
    gtk_widget_set_sensitive (GTK_WIDGET (ok_button), FALSE);
    gtk_button_set_label (GTK_BUTTON (checkbox), text_data->checkbox);

    g_signal_connect (G_OBJECT (checkbox), "toggled",
                      G_CALLBACK (zenity_text_toggle_button), ok_button);
  }

  if (data->width > -1 || data->height > -1)
    gtk_window_set_default_size (GTK_WINDOW (dialog), data->width, data->height);
  else
    gtk_window_set_default_size (GTK_WINDOW (dialog), 300, 400); 

#ifdef HAVE_WEBKITGTK
  if(text_data->html) {
    web_kit = webkit_web_view_new();
    scrolled_window = GTK_WIDGET (gtk_builder_get_object (builder, "zenity_text_scrolled_window"));

    zenity_configure_webkit (WEBKIT_WEB_VIEW (web_kit));

    if (text_data->url)
    {
      if (!(g_str_has_prefix (text_data->url, "http://") || g_str_has_prefix (text_data->url, "https://"))) 
        text_data->url = g_strdup_printf ("http://%s", text_data->url);
      

      webkit_web_view_load_uri (WEBKIT_WEB_VIEW (web_kit), text_data->url);
    }
    else
    {
      gtk_text_buffer_get_start_iter (text_buffer, &start_iter);
      gtk_text_buffer_get_end_iter (text_buffer, &end_iter);
      content = gtk_text_buffer_get_text (text_buffer, &start_iter, &end_iter, TRUE);
      webkit_web_view_load_string (WEBKIT_WEB_VIEW(web_kit), content, "text/html", "UTF-8", NULL);
      g_free (content);
    }

    // We don't want user to click on links and navigate to another page.
    // So, when page finish load, we block requests.

    g_signal_connect (G_OBJECT (web_kit), "document-load-finished",
                      G_CALLBACK (zenity_text_webview_load_finished), NULL); 

    gtk_widget_destroy (GTK_WIDGET (text_view));
    gtk_container_add (GTK_CONTAINER(scrolled_window), web_kit);
    gtk_widget_show (GTK_WIDGET (web_kit));
  }
#endif
  zenity_util_show_dialog (dialog);

  g_object_unref (builder);

  if(data->timeout_delay > 0) {
    g_timeout_add_seconds (data->timeout_delay, (GSourceFunc) zenity_util_timeout_handle, dialog);
  }

  gtk_main ();
}

static void
zenity_text_toggle_button (GtkToggleButton *button, gpointer data)
{
  GtkWidget *ok_button = (GtkWidget *)data;
  gtk_widget_set_sensitive (GTK_WIDGET(ok_button), gtk_toggle_button_get_active(button));
}

static void
zenity_text_dialog_response (GtkWidget *widget, int response, gpointer data)
{
  ZenityData *zen_data = data;

  switch (response) {
    case GTK_RESPONSE_CLOSE:
      if (zen_text_data->editable) {
        GtkTextIter start, end;
        gchar *text;
        gtk_text_buffer_get_bounds (zen_text_data->buffer, &start, &end);
        text = gtk_text_buffer_get_text (zen_text_data->buffer, &start, &end, 0);
        g_print ("%s", text);
        g_free (text);
      }
      zen_data->exit_code = zenity_util_return_exit_code (ZENITY_OK);
      break;

    default:
      /* Esc dialog */
      zenity_util_exit_code_with_data(ZENITY_ESC, zen_data);
      break;
  }
  gtk_main_quit ();
}