/* Pickers and Launchers
 * #Keywords: GtkColorDialog, GtkFontDialog, GtkFileDialog, GtkPrintDialog, GtkFileLauncher, GtkUriLauncher
 *
 * The dialogs are mainly intended for use in preference dialogs.
 * They allow to select colors, fonts and files. There is also a
 * print dialog.
 *
 * The launchers let you open files or URIs in applications that
 * can handle them.
 */

#include <gtk/gtk.h>

static GtkWidget *app_picker;
static GtkWidget *open_folder_button;
static GtkWidget *print_button;

static void
set_file (GFile    *file,
          gpointer  data)
{
  GFileInfo *info;
  char *name;

  if (!file)
    {
      gtk_widget_set_sensitive (app_picker, FALSE);
      g_object_set_data (G_OBJECT (app_picker), "file", NULL);
      gtk_widget_set_sensitive (open_folder_button, FALSE);
      g_object_set_data (G_OBJECT (open_folder_button), "file", NULL);
      return;
    }

  name = g_file_get_basename (file);
  gtk_label_set_label (GTK_LABEL (data), name);
  g_free (name);

  gtk_widget_set_sensitive (app_picker, TRUE);
  g_object_set_data_full (G_OBJECT (app_picker), "file", g_object_ref (file), g_object_unref);
  gtk_widget_set_sensitive (open_folder_button, TRUE);
  g_object_set_data_full (G_OBJECT (open_folder_button), "file", g_object_ref (file), g_object_unref);

  info = g_file_query_info (file, "standard::content-type",
                            G_FILE_QUERY_INFO_NONE,
                            NULL,
                            NULL);
  if (strcmp (g_file_info_get_content_type (info), "application/pdf") == 0)
    {
      gtk_widget_set_sensitive (print_button, TRUE);
      g_object_set_data_full (G_OBJECT (print_button), "file", g_object_ref (file), g_object_unref);
    }
}

static void
file_opened (GObject *source,
             GAsyncResult *result,
             void *data)
{
  GFile *file;
  GError *error = NULL;

  file = gtk_file_dialog_open_finish (GTK_FILE_DIALOG (source), result, &error);

  if (!file)
    {
      g_print ("%s\n", error->message);
      g_error_free (error);
      gtk_widget_set_sensitive (app_picker, FALSE);
      g_object_set_data (G_OBJECT (app_picker), "file", NULL);
      gtk_widget_set_sensitive (print_button, FALSE);
      g_object_set_data (G_OBJECT (print_button), "file", NULL);
    }

  set_file (file, data);
}

static void
abort_mission (gpointer data)
{
  GCancellable *cancellable = data;

  g_cancellable_cancel (cancellable);
  g_object_unref (cancellable);
}

static void
open_file (GtkButton *picker,
           GtkLabel  *label)
{
  GtkWindow *parent = GTK_WINDOW (gtk_widget_get_root (GTK_WIDGET (picker)));
  GtkFileDialog *dialog;
  GCancellable *cancellable;

  dialog = gtk_file_dialog_new ();

  cancellable = g_cancellable_new ();

  g_timeout_add_seconds_once (20,
                              abort_mission,
                              g_object_ref (cancellable));

  gtk_file_dialog_open (dialog, parent, cancellable, file_opened, label);

  g_object_unref (cancellable);
  g_object_unref (dialog);
}

static void
open_app_done (GObject      *source,
               GAsyncResult *result,
               gpointer      data)
{
  GtkFileLauncher *launcher = GTK_FILE_LAUNCHER (source);
  GError *error = NULL;

  if (!gtk_file_launcher_launch_finish (launcher, result, &error))
    {
      g_print ("%s\n", error->message);
      g_error_free (error);
    }
}

static void
open_app (GtkButton *picker)
{
  GtkWindow *parent = GTK_WINDOW (gtk_widget_get_root (GTK_WIDGET (picker)));
  GtkFileLauncher *launcher;
  GFile *file;

  file = G_FILE (g_object_get_data (G_OBJECT (picker), "file"));
  launcher = gtk_file_launcher_new (file);

  gtk_file_launcher_launch (launcher, parent, NULL, open_app_done, NULL);

  g_object_unref (launcher);
}

static void
open_folder_done (GObject      *source,
                  GAsyncResult *result,
                  gpointer      data)
{
  GtkFileLauncher *launcher = GTK_FILE_LAUNCHER (source);
  GError *error = NULL;

  if (!gtk_file_launcher_open_containing_folder_finish (launcher, result, &error))
    {
      g_print ("%s\n", error->message);
      g_error_free (error);
    }
}

static void
open_folder (GtkButton *picker)
{
  GtkWindow *parent = GTK_WINDOW (gtk_widget_get_root (GTK_WIDGET (picker)));
  GtkFileLauncher *launcher;
  GFile *file;

  file = G_FILE (g_object_get_data (G_OBJECT (picker), "file"));
  launcher = gtk_file_launcher_new (file);

  gtk_file_launcher_open_containing_folder (launcher, parent, NULL, open_folder_done, NULL);

  g_object_unref (launcher);
}

static void
print_file_done (GObject      *source,
                 GAsyncResult *result,
                 gpointer      data)
{
  GtkPrintDialog *dialog = GTK_PRINT_DIALOG (source);
  GError *error = NULL;
  GCancellable *cancellable;
  unsigned int id;

  cancellable = g_task_get_cancellable (G_TASK (result));
  id = GPOINTER_TO_UINT (g_object_get_data (G_OBJECT (cancellable), "timeout"));
  if (id)
    g_source_remove (id);

  if (!gtk_print_dialog_print_file_finish (dialog, result, &error))
    {
      g_print ("%s\n", error->message);
      g_error_free (error);
    }
}

static void
print_file (GtkButton *picker)
{
  GtkWindow *parent = GTK_WINDOW (gtk_widget_get_root (GTK_WIDGET (picker)));
  GtkPrintDialog *dialog;
  GCancellable *cancellable;
  GFile *file;
  unsigned int id;

  file = G_FILE (g_object_get_data (G_OBJECT (picker), "file"));
  dialog = gtk_print_dialog_new ();

  cancellable = g_cancellable_new ();

  id = g_timeout_add_seconds_once (20,
                                   abort_mission,
                                   g_object_ref (cancellable));
  g_object_set_data (G_OBJECT (cancellable), "timeout", GUINT_TO_POINTER (id));

  gtk_print_dialog_print_file (dialog, parent, NULL, file, cancellable, print_file_done, NULL);

  g_object_unref (cancellable);
  g_object_unref (dialog);
}

static void
open_uri_done (GObject      *source,
               GAsyncResult *result,
               gpointer      data)
{
  GtkUriLauncher *launcher = GTK_URI_LAUNCHER (source);
  GError *error = NULL;

  if (!gtk_uri_launcher_launch_finish (launcher, result, &error))
    {
      g_print ("%s\n", error->message);
      g_error_free (error);
    }
}

static void
launch_uri (GtkButton *picker)
{
  GtkWindow *parent = GTK_WINDOW (gtk_widget_get_root (GTK_WIDGET (picker)));
  GtkUriLauncher *launcher;

  launcher = gtk_uri_launcher_new ("http://www.gtk.org");

  gtk_uri_launcher_launch (launcher, parent, NULL, open_uri_done, NULL);

  g_object_unref (launcher);
}

static gboolean
on_drop (GtkDropTarget *target,
         const GValue  *value,
         double         x,
         double         y,
         gpointer       data)
{
  if (G_VALUE_HOLDS (value, G_TYPE_FILE))
    {
      set_file (g_value_get_object (value), data);
      return TRUE;
    }

  return FALSE;
}

static void
on_language_changed (GtkDropDown *drop_down,
                     GParamSpec  *pspec,
                     gpointer     data)
{
  GtkFontDialog *font_dialog = GTK_FONT_DIALOG (data);
  GtkStringObject *selected_obj;
  const char *selected_text;
  PangoLanguage *lang = NULL;

  selected_obj = GTK_STRING_OBJECT (gtk_drop_down_get_selected_item (drop_down));
  if (!selected_obj)
    return;

  selected_text = gtk_string_object_get_string (selected_obj);

  if (g_strcmp0 (selected_text, "No Language") == 0)
    {
      lang = NULL;
    }
  else if (g_strcmp0 (selected_text, "Current") == 0)
    {
      lang = gtk_get_default_language ();
    }
  else if (g_strcmp0 (selected_text, "English") == 0)
    lang = pango_language_from_string ("en");
  else if (g_strcmp0 (selected_text, "Arabic") == 0)
    lang = pango_language_from_string ("ar");
  else if (g_strcmp0 (selected_text, "Hindi") == 0)
    lang = pango_language_from_string ("hi");
  else if (g_strcmp0 (selected_text, "Thai") == 0)
    lang = pango_language_from_string ("th");
  else if (g_strcmp0 (selected_text, "Vietnamese") == 0)
    lang = pango_language_from_string ("vi");

  gtk_font_dialog_set_language (font_dialog, lang);
}
 
GtkWidget *
do_pickers (GtkWidget *do_widget)
{
  static GtkWidget *window = NULL;
  GtkWidget *table, *label, *picker, *button;
  GtkDropTarget *drop_target;

  if (!window)
  {
    GtkFontDialog *font_dialog;
    GtkWidget *lang_dropdown;
    GtkWidget *font_hbox;
    const char *languages[] = { "No Language", "Current", "English", "Arabic", "Hindi", "Thai", "Vietnamese", NULL };
    
    window = gtk_window_new ();
    gtk_window_set_display (GTK_WINDOW (window),
                            gtk_widget_get_display (do_widget));
    gtk_window_set_title (GTK_WINDOW (window), "Pickers and Launchers");
    g_object_add_weak_pointer (G_OBJECT (window), (gpointer *)&window);

    table = gtk_grid_new ();
    gtk_widget_set_margin_start (table, 20);
    gtk_widget_set_margin_end (table, 20);
    gtk_widget_set_margin_top (table, 20);
    gtk_widget_set_margin_bottom (table, 20);
    gtk_grid_set_row_spacing (GTK_GRID (table), 6);
    gtk_grid_set_column_spacing (GTK_GRID (table), 6);
    gtk_window_set_child (GTK_WINDOW (window), table);

    label = gtk_label_new_with_mnemonic ("_Color:");
    gtk_widget_set_halign (label, GTK_ALIGN_START);
    gtk_widget_set_valign (label, GTK_ALIGN_CENTER);
    gtk_widget_set_hexpand (label, TRUE);
    gtk_grid_attach (GTK_GRID (table), label, 0, 0, 1, 1);

    picker = gtk_color_dialog_button_new (gtk_color_dialog_new ());
    gtk_label_set_mnemonic_widget (GTK_LABEL (label), picker);
    gtk_grid_attach (GTK_GRID (table), picker, 1, 0, 1, 1);

    label = gtk_label_new_with_mnemonic ("_Font:");
    gtk_widget_set_halign (label, GTK_ALIGN_START);
    gtk_widget_set_valign (label, GTK_ALIGN_CENTER);
    gtk_widget_set_hexpand (label, TRUE);
    gtk_grid_attach (GTK_GRID (table), label, 0, 1, 1, 1);

    font_dialog = gtk_font_dialog_new ();
    picker = gtk_font_dialog_button_new (font_dialog);
    gtk_label_set_mnemonic_widget (GTK_LABEL (label), picker);
    
    lang_dropdown = gtk_drop_down_new_from_strings (languages);
    gtk_drop_down_set_selected (GTK_DROP_DOWN (lang_dropdown), 0);
    g_signal_connect (lang_dropdown, "notify::selected", G_CALLBACK (on_language_changed), font_dialog);
    
    font_hbox = gtk_box_new (GTK_ORIENTATION_HORIZONTAL, 6);
    gtk_box_append (GTK_BOX (font_hbox), picker);
    gtk_box_append (GTK_BOX (font_hbox), lang_dropdown);

    gtk_grid_attach (GTK_GRID (table), font_hbox, 1, 1, 1, 1);

    label = gtk_label_new_with_mnemonic ("_File:");
    gtk_widget_set_halign (label, GTK_ALIGN_START);
    gtk_widget_set_valign (label, GTK_ALIGN_CENTER);
    gtk_widget_set_hexpand (label, TRUE);
    gtk_grid_attach (GTK_GRID (table), label, 0, 2, 1, 1);

    picker = gtk_box_new (GTK_ORIENTATION_HORIZONTAL, 6);
    button = gtk_button_new_from_icon_name ("document-open-symbolic");
    gtk_label_set_mnemonic_widget (GTK_LABEL (label), button);
    gtk_accessible_update_property (GTK_ACCESSIBLE (button),
                                    GTK_ACCESSIBLE_PROPERTY_LABEL, "Select File",
                                    GTK_ACCESSIBLE_PROPERTY_HAS_POPUP, TRUE,
                                    -1);

    label = gtk_label_new ("None");

    drop_target = gtk_drop_target_new (G_TYPE_FILE, GDK_ACTION_COPY);
    g_signal_connect (drop_target, "drop", G_CALLBACK (on_drop), label);
    gtk_widget_add_controller (button, GTK_EVENT_CONTROLLER (drop_target));

    gtk_label_set_xalign (GTK_LABEL (label), 0.);
    gtk_label_set_ellipsize (GTK_LABEL (label), PANGO_ELLIPSIZE_MIDDLE);
    gtk_widget_set_hexpand (label, TRUE);
    g_signal_connect (button, "clicked", G_CALLBACK (open_file), label);
    gtk_box_append (GTK_BOX (picker), label);
    gtk_box_append (GTK_BOX (picker), button);
    app_picker = gtk_button_new_from_icon_name ("system-run-symbolic");
    gtk_widget_set_halign (app_picker, GTK_ALIGN_END);
    gtk_accessible_update_property (GTK_ACCESSIBLE (app_picker),
                                    GTK_ACCESSIBLE_PROPERTY_LABEL, "Open File",
                                    GTK_ACCESSIBLE_PROPERTY_HAS_POPUP, TRUE,
                                    -1);
    gtk_widget_set_sensitive (app_picker, FALSE);
    g_signal_connect (app_picker, "clicked", G_CALLBACK (open_app), NULL);
    gtk_box_append (GTK_BOX (picker), app_picker);
    open_folder_button = gtk_button_new_from_icon_name ("folder-symbolic");
    gtk_widget_set_halign (open_folder_button, GTK_ALIGN_END);
    gtk_accessible_update_property (GTK_ACCESSIBLE (open_folder_button),
                                    GTK_ACCESSIBLE_PROPERTY_LABEL, "Open in Folder",
                                    GTK_ACCESSIBLE_PROPERTY_HAS_POPUP, TRUE,
                                    -1);
    gtk_widget_set_sensitive (open_folder_button, FALSE);
    g_signal_connect (open_folder_button, "clicked", G_CALLBACK (open_folder), NULL);
    gtk_box_append (GTK_BOX (picker), open_folder_button);

    print_button = gtk_button_new_from_icon_name ("printer-symbolic");
    gtk_widget_set_tooltip_text (print_button, "Print File");
    gtk_widget_set_sensitive (print_button, FALSE);
    gtk_accessible_update_property (GTK_ACCESSIBLE (print_button),
                                    GTK_ACCESSIBLE_PROPERTY_LABEL, "Print File",
                                    GTK_ACCESSIBLE_PROPERTY_HAS_POPUP, TRUE,
                                    -1);
    g_signal_connect (print_button, "clicked", G_CALLBACK (print_file), NULL);
    gtk_box_append (GTK_BOX (picker), print_button);

    gtk_grid_attach (GTK_GRID (table), picker, 1, 2, 1, 1);

    label = gtk_label_new_with_mnemonic ("_URI:");
    gtk_widget_set_halign (label, GTK_ALIGN_START);
    gtk_widget_set_valign (label, GTK_ALIGN_CENTER);
    gtk_widget_set_hexpand (label, TRUE);
    gtk_grid_attach (GTK_GRID (table), label, 0, 3, 1, 1);

    picker = gtk_button_new_with_label ("www.gtk.org");
    gtk_label_set_mnemonic_widget (GTK_LABEL (label), picker);
    gtk_accessible_update_property (GTK_ACCESSIBLE (picker),
                                    GTK_ACCESSIBLE_PROPERTY_LABEL, "Open www.gtk.org",
                                    GTK_ACCESSIBLE_PROPERTY_HAS_POPUP, TRUE,
                                    -1);
    g_signal_connect (picker, "clicked", G_CALLBACK (launch_uri), NULL);
    gtk_grid_attach (GTK_GRID (table), picker, 1, 3, 1, 1);
  }

  if (!gtk_widget_get_visible (window))
    gtk_window_present (GTK_WINDOW (window));
  else
    gtk_window_destroy (GTK_WINDOW (window));

  return window;
}