/* -*- Mode: C; c-file-style: "gnu"; tab-width: 8 -*- */

/* gtkpathbar.c

 * Copyright (C) 2004  Red Hat, Inc.,  Jonathan Blandford <jrb@gnome.org>

 *

 * 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., 59 Temple Place - Suite 330,

 * Boston, MA 02111-1307, USA.

 */

#include "config.h"

#include <string.h>

#include "gtkpathbar.h"

#include "gtktogglebutton.h"

#include "gtkalignment.h"

#include "gtkarrow.h"

#include "gtkdnd.h"

#include "gtkimage.h"

#include "gtkintl.h"

#include "gtkicontheme.h"

#include "gtkiconfactory.h"

#include "gtklabel.h"

#include "gtkhbox.h"

#include "gtkmain.h"

#include "gtkmarshalers.h"

#include "gtkalias.h"

enum {

  PATH_CLICKED,

  LAST_SIGNAL

};

typedef enum {

  NORMAL_BUTTON,

  ROOT_BUTTON,

  HOME_BUTTON,

  DESKTOP_BUTTON

} ButtonType;

#define BUTTON_DATA(x) ((ButtonData *)(x))

#define SCROLL_DELAY_FACTOR 5

static guint path_bar_signals [LAST_SIGNAL] = { 0 };

/* Icon size for if we can't get it from the theme */

#define FALLBACK_ICON_SIZE 16

typedef struct _ButtonData ButtonData;

struct _ButtonData

{

  GtkWidget *button;

  ButtonType type;

  char *dir_name;

  GFile *file;

  GtkWidget *image;

  GtkWidget *label;

  GCancellable *cancellable;

  guint ignore_changes : 1;

  guint file_is_hidden : 1;

};

/* This macro is used to check if a button can be used as a fake root.

 * All buttons in front of a fake root are automatically hidden when in a

 * directory below a fake root and replaced with the "<" arrow button.

 */

#define BUTTON_IS_FAKE_ROOT(button) ((button)->type == HOME_BUTTON)

G_DEFINE_TYPE (GtkPathBar, gtk_path_bar, GTK_TYPE_CONTAINER)

static void gtk_path_bar_finalize                 (GObject          *object);

static void gtk_path_bar_dispose                  (GObject          *object);

static void gtk_path_bar_realize                  (GtkWidget        *widget);

static void gtk_path_bar_unrealize                (GtkWidget        *widget);

static void gtk_path_bar_size_request             (GtkWidget        *widget,

						   GtkRequisition   *requisition);

static void gtk_path_bar_map                      (GtkWidget        *widget);

static void gtk_path_bar_unmap                    (GtkWidget        *widget);

static void gtk_path_bar_size_allocate            (GtkWidget        *widget,

						   GtkAllocation    *allocation);

static void gtk_path_bar_add                      (GtkContainer     *container,

						   GtkWidget        *widget);

static void gtk_path_bar_remove                   (GtkContainer     *container,

						   GtkWidget        *widget);

static void gtk_path_bar_forall                   (GtkContainer     *container,

						   gboolean          include_internals,

						   GtkCallback       callback,

						   gpointer          callback_data);

static gboolean gtk_path_bar_scroll               (GtkWidget        *widget,

						   GdkEventScroll   *event);

static void gtk_path_bar_scroll_up                (GtkPathBar       *path_bar);

static void gtk_path_bar_scroll_down              (GtkPathBar       *path_bar);

static void gtk_path_bar_stop_scrolling           (GtkPathBar       *path_bar);

static gboolean gtk_path_bar_slider_up_defocus    (GtkWidget        *widget,

						   GdkEventButton   *event,

						   GtkPathBar       *path_bar);

static gboolean gtk_path_bar_slider_down_defocus  (GtkWidget        *widget,

						   GdkEventButton   *event,

						   GtkPathBar       *path_bar);

static gboolean gtk_path_bar_slider_button_press  (GtkWidget        *widget,

						   GdkEventButton   *event,

						   GtkPathBar       *path_bar);

static gboolean gtk_path_bar_slider_button_release(GtkWidget        *widget,

						   GdkEventButton   *event,

						   GtkPathBar       *path_bar);

static void gtk_path_bar_grab_notify              (GtkWidget        *widget,

						   gboolean          was_grabbed);

static void gtk_path_bar_state_changed            (GtkWidget        *widget,

						   GtkStateType      previous_state);

static void gtk_path_bar_style_set                (GtkWidget        *widget,

						   GtkStyle         *previous_style);

static void gtk_path_bar_screen_changed           (GtkWidget        *widget,

						   GdkScreen        *previous_screen);

static void gtk_path_bar_check_icon_theme         (GtkPathBar       *path_bar);

static void gtk_path_bar_update_button_appearance (GtkPathBar       *path_bar,

						   ButtonData       *button_data,

						   gboolean          current_dir);

static void

on_slider_unmap (GtkWidget  *widget,

		 GtkPathBar *path_bar)

{

  if (path_bar->timer &&

      ((widget == path_bar->up_slider_button && path_bar->scrolling_up) ||

       (widget == path_bar->down_slider_button && path_bar->scrolling_down)))

    gtk_path_bar_stop_scrolling (path_bar);

}

static GtkWidget *

get_slider_button (GtkPathBar  *path_bar,

		   GtkArrowType arrow_type)

{

  GtkWidget *button;

  AtkObject *atk_obj;

  gtk_widget_push_composite_child ();

  button = gtk_button_new ();

  atk_obj = gtk_widget_get_accessible (button);

  if (arrow_type == GTK_ARROW_LEFT)

    atk_object_set_name (atk_obj, _("Up Path"));

  else

    atk_object_set_name (atk_obj, _("Down Path"));

  gtk_button_set_focus_on_click (GTK_BUTTON (button), FALSE);

  gtk_container_add (GTK_CONTAINER (button),

                     gtk_arrow_new (arrow_type, GTK_SHADOW_OUT));

  gtk_container_add (GTK_CONTAINER (path_bar), button);

  gtk_widget_show_all (button);

  g_signal_connect (G_OBJECT (button), "unmap",

		    G_CALLBACK (on_slider_unmap), path_bar);

  gtk_widget_pop_composite_child ();

  return button;

}

static void

gtk_path_bar_init (GtkPathBar *path_bar)

{

  gtk_widget_set_has_window (GTK_WIDGET (path_bar), FALSE);

  gtk_widget_set_redraw_on_allocate (GTK_WIDGET (path_bar), FALSE);

  path_bar->get_info_cancellable = NULL;

  path_bar->spacing = 0;

  path_bar->up_slider_button = get_slider_button (path_bar, GTK_ARROW_LEFT);

  path_bar->down_slider_button = get_slider_button (path_bar, GTK_ARROW_RIGHT);

  path_bar->icon_size = FALLBACK_ICON_SIZE;

  g_signal_connect_swapped (path_bar->up_slider_button, "clicked",

                            G_CALLBACK (gtk_path_bar_scroll_up), path_bar);

  g_signal_connect_swapped (path_bar->down_slider_button, "clicked",

                            G_CALLBACK (gtk_path_bar_scroll_down), path_bar);

  g_signal_connect (path_bar->up_slider_button, "focus-out-event",

                    G_CALLBACK (gtk_path_bar_slider_up_defocus), path_bar);

  g_signal_connect (path_bar->down_slider_button, "focus-out-event",

                    G_CALLBACK (gtk_path_bar_slider_down_defocus), path_bar);

  g_signal_connect (path_bar->up_slider_button, "button-press-event",

                    G_CALLBACK (gtk_path_bar_slider_button_press), path_bar);

  g_signal_connect (path_bar->up_slider_button, "button-release-event",

                    G_CALLBACK (gtk_path_bar_slider_button_release), path_bar);

  g_signal_connect (path_bar->down_slider_button, "button-press-event",

                    G_CALLBACK (gtk_path_bar_slider_button_press), path_bar);

  g_signal_connect (path_bar->down_slider_button, "button-release-event",

                    G_CALLBACK (gtk_path_bar_slider_button_release), path_bar);

}

static void

gtk_path_bar_class_init (GtkPathBarClass *path_bar_class)

{

  GObjectClass *gobject_class;

  GtkObjectClass *object_class;

  GtkWidgetClass *widget_class;

  GtkContainerClass *container_class;

  gobject_class = (GObjectClass *) path_bar_class;

  object_class = (GtkObjectClass *) path_bar_class;

  widget_class = (GtkWidgetClass *) path_bar_class;

  container_class = (GtkContainerClass *) path_bar_class;

  gobject_class->finalize = gtk_path_bar_finalize;

  gobject_class->dispose = gtk_path_bar_dispose;

  widget_class->size_request = gtk_path_bar_size_request;

  widget_class->realize = gtk_path_bar_realize;

  widget_class->unrealize = gtk_path_bar_unrealize;

  widget_class->map = gtk_path_bar_map;

  widget_class->unmap = gtk_path_bar_unmap;

  widget_class->size_allocate = gtk_path_bar_size_allocate;

  widget_class->style_set = gtk_path_bar_style_set;

  widget_class->screen_changed = gtk_path_bar_screen_changed;

  widget_class->grab_notify = gtk_path_bar_grab_notify;

  widget_class->state_changed = gtk_path_bar_state_changed;

  widget_class->scroll_event = gtk_path_bar_scroll;

  container_class->add = gtk_path_bar_add;

  container_class->forall = gtk_path_bar_forall;

  container_class->remove = gtk_path_bar_remove;

  /* FIXME: */

  /*  container_class->child_type = gtk_path_bar_child_type;*/

  path_bar_signals [PATH_CLICKED] =

    g_signal_new (I_("path-clicked"),

		  G_OBJECT_CLASS_TYPE (object_class),

		  G_SIGNAL_RUN_FIRST,

		  G_STRUCT_OFFSET (GtkPathBarClass, path_clicked),

		  NULL, NULL,

		  _gtk_marshal_VOID__POINTER_POINTER_BOOLEAN,

		  G_TYPE_NONE, 3,

		  G_TYPE_POINTER,

		  G_TYPE_POINTER,

		  G_TYPE_BOOLEAN);

}

static void

gtk_path_bar_finalize (GObject *object)

{

  GtkPathBar *path_bar;

  path_bar = GTK_PATH_BAR (object);

  gtk_path_bar_stop_scrolling (path_bar);

  g_list_free (path_bar->button_list);

  if (path_bar->root_file)

    g_object_unref (path_bar->root_file);

  if (path_bar->home_file)

    g_object_unref (path_bar->home_file);

  if (path_bar->desktop_file)

    g_object_unref (path_bar->desktop_file);

  if (path_bar->root_icon)

    g_object_unref (path_bar->root_icon);

  if (path_bar->home_icon)

    g_object_unref (path_bar->home_icon);

  if (path_bar->desktop_icon)

    g_object_unref (path_bar->desktop_icon);

  if (path_bar->file_system)

    g_object_unref (path_bar->file_system);

  G_OBJECT_CLASS (gtk_path_bar_parent_class)->finalize (object);

}

/* Removes the settings signal handler.  It's safe to call multiple times */

static void

remove_settings_signal (GtkPathBar *path_bar,

			GdkScreen  *screen)

{

  if (path_bar->settings_signal_id)

    {

      GtkSettings *settings;

      settings = gtk_settings_get_for_screen (screen);

      g_signal_handler_disconnect (settings,

				   path_bar->settings_signal_id);

      path_bar->settings_signal_id = 0;

    }

}

static void

gtk_path_bar_dispose (GObject *object)

{

  GtkPathBar *path_bar = GTK_PATH_BAR (object);

  remove_settings_signal (path_bar, gtk_widget_get_screen (GTK_WIDGET (object)));

  if (path_bar->get_info_cancellable)

    g_cancellable_cancel (path_bar->get_info_cancellable);

  path_bar->get_info_cancellable = NULL;

  G_OBJECT_CLASS (gtk_path_bar_parent_class)->dispose (object);

}

/* Size requisition:

 * 

 * Ideally, our size is determined by another widget, and we are just filling

 * available space.

 */

static void

gtk_path_bar_size_request (GtkWidget      *widget,

			   GtkRequisition *requisition)

{

  ButtonData *button_data;

  GtkPathBar *path_bar;

  GtkRequisition child_requisition;

  GList *list;

  path_bar = GTK_PATH_BAR (widget);

  requisition->width = 0;

  requisition->height = 0;

  for (list = path_bar->button_list; list; list = list->next)

    {

      button_data = BUTTON_DATA (list->data);

      gtk_widget_size_request (button_data->button, &child_requisition);

      if (button_data->type == NORMAL_BUTTON)

	/* Use 2*Height as button width because of ellipsized label.  */

	requisition->width = MAX (child_requisition.height * 2, requisition->width);

      else

	requisition->width = MAX (child_requisition.width, requisition->width);

      requisition->height = MAX (child_requisition.height, requisition->height);

    }

  /* Add space for slider, if we have more than one path */

  /* Theoretically, the slider could be bigger than the other button.  But we're

   * not going to worry about that now.

   */

  path_bar->slider_width = MIN(requisition->height * 2 / 3 + 5, requisition->height);

  if (path_bar->button_list && path_bar->button_list->next != NULL)

    requisition->width += (path_bar->spacing + path_bar->slider_width) * 2;

  gtk_widget_size_request (path_bar->up_slider_button, &child_requisition);

  gtk_widget_size_request (path_bar->down_slider_button, &child_requisition);

  requisition->width += GTK_CONTAINER (widget)->border_width * 2;

  requisition->height += GTK_CONTAINER (widget)->border_width * 2;

  widget->requisition = *requisition;

}

static void

gtk_path_bar_update_slider_buttons (GtkPathBar *path_bar)

{

  if (path_bar->button_list)

    {

      GtkWidget *button;

      button = BUTTON_DATA (path_bar->button_list->data)->button;

      if (gtk_widget_get_child_visible (button))

	{

	  gtk_path_bar_stop_scrolling (path_bar);

	  gtk_widget_set_sensitive (path_bar->down_slider_button, FALSE);

	}

      else

	gtk_widget_set_sensitive (path_bar->down_slider_button, TRUE);

      button = BUTTON_DATA (g_list_last (path_bar->button_list)->data)->button;

      if (gtk_widget_get_child_visible (button))

	{

	  gtk_path_bar_stop_scrolling (path_bar);

	  gtk_widget_set_sensitive (path_bar->up_slider_button, FALSE);

	}

      else

	gtk_widget_set_sensitive (path_bar->up_slider_button, TRUE);

    }

}

static void

gtk_path_bar_map (GtkWidget *widget)

{

  gdk_window_show (GTK_PATH_BAR (widget)->event_window);

  GTK_WIDGET_CLASS (gtk_path_bar_parent_class)->map (widget);

}

static void

gtk_path_bar_unmap (GtkWidget *widget)

{

  gtk_path_bar_stop_scrolling (GTK_PATH_BAR (widget));

  gdk_window_hide (GTK_PATH_BAR (widget)->event_window);

  GTK_WIDGET_CLASS (gtk_path_bar_parent_class)->unmap (widget);

}

static void

gtk_path_bar_realize (GtkWidget *widget)

{

  GtkPathBar *path_bar;

  GdkWindowAttr attributes;

  gint attributes_mask;

  gtk_widget_set_realized (widget, TRUE);

  path_bar = GTK_PATH_BAR (widget);

  widget->window = gtk_widget_get_parent_window (widget);

  g_object_ref (widget->window);

  attributes.window_type = GDK_WINDOW_CHILD;

  attributes.x = widget->allocation.x;

  attributes.y = widget->allocation.y;

  attributes.width = widget->allocation.width;

  attributes.height = widget->allocation.height;

  attributes.wclass = GDK_INPUT_ONLY;

  attributes.event_mask = gtk_widget_get_events (widget);

  attributes.event_mask |= GDK_SCROLL_MASK;

  attributes_mask = GDK_WA_X | GDK_WA_Y;

  path_bar->event_window = gdk_window_new (gtk_widget_get_parent_window (widget),

							&attributes, attributes_mask);

  gdk_window_set_user_data (path_bar->event_window, widget);

  widget->style = gtk_style_attach (widget->style, widget->window);

}

static void

gtk_path_bar_unrealize (GtkWidget *widget)

{

  GtkPathBar *path_bar;

  path_bar = GTK_PATH_BAR (widget);

  gdk_window_set_user_data (path_bar->event_window, NULL);

  gdk_window_destroy (path_bar->event_window);

  path_bar->event_window = NULL;

  GTK_WIDGET_CLASS (gtk_path_bar_parent_class)->unrealize (widget);

}

/* This is a tad complicated

 */

static void

gtk_path_bar_size_allocate (GtkWidget     *widget,

			    GtkAllocation *allocation)

{

  GtkWidget *child;

  GtkPathBar *path_bar = GTK_PATH_BAR (widget);

  GtkTextDirection direction;

  GtkAllocation child_allocation;

  GList *list, *first_button;

  gint width;

  gint allocation_width;

  gint border_width;

  gboolean need_sliders = FALSE;

  gint up_slider_offset = 0;

  widget->allocation = *allocation;

  if (gtk_widget_get_realized (widget))

    gdk_window_move_resize (path_bar->event_window,

			    allocation->x, allocation->y,

			    allocation->width, allocation->height);

  /* No path is set; we don't have to allocate anything. */

  if (path_bar->button_list == NULL)

    return;

  direction = gtk_widget_get_direction (widget);

  border_width = (gint) GTK_CONTAINER (path_bar)->border_width;

  allocation_width = allocation->width - 2 * border_width;

  /* First, we check to see if we need the scrollbars. */

  if (path_bar->fake_root)

    width = path_bar->spacing + path_bar->slider_width;

  else

      width = 0;

  for (list = path_bar->button_list; list; list = list->next)

    {

      child = BUTTON_DATA (list->data)->button;

      width += child->requisition.width + path_bar->spacing;

      if (list == path_bar->fake_root)

	break;

    }

  if (width <= allocation_width)

    {

      if (path_bar->fake_root)

	first_button = path_bar->fake_root;

      else

	first_button = g_list_last (path_bar->button_list);

    }

  else

    {

      gboolean reached_end = FALSE;

      gint slider_space = 2 * (path_bar->spacing + path_bar->slider_width);

      if (path_bar->first_scrolled_button)

	first_button = path_bar->first_scrolled_button;

      else

	first_button = path_bar->button_list;

      need_sliders = TRUE;

      /* To see how much space we have, and how many buttons we can display.

       * We start at the first button, count forward until hit the new

       * button, then count backwards.

       */

      /* Count down the path chain towards the end. */

      width = BUTTON_DATA (first_button->data)->button->requisition.width;

      list = first_button->prev;

      while (list && !reached_end)

	{

	  child = BUTTON_DATA (list->data)->button;

	  if (width + child->requisition.width +

	      path_bar->spacing + slider_space > allocation_width)

	    reached_end = TRUE;

	  else if (list == path_bar->fake_root)

	    break;

	  else

	    width += child->requisition.width + path_bar->spacing;

	  list = list->prev;

	}

      /* Finally, we walk up, seeing how many of the previous buttons we can

       * add */

      while (first_button->next && !reached_end)

	{

	  child = BUTTON_DATA (first_button->next->data)->button;

	  if (width + child->requisition.width + path_bar->spacing + slider_space > allocation_width)

	    {

	      reached_end = TRUE;

	    }

	  else

	    {

	      width += child->requisition.width + path_bar->spacing;

	      if (first_button == path_bar->fake_root)

		break;

	      first_button = first_button->next;

	    }

	}

    }

  /* Now, we allocate space to the buttons */

  child_allocation.y = allocation->y + border_width;

  child_allocation.height = MAX (1, (gint) allocation->height - border_width * 2);

  if (direction == GTK_TEXT_DIR_RTL)

    {

      child_allocation.x = allocation->x + allocation->width - border_width;

      if (need_sliders || path_bar->fake_root)

	{

	  child_allocation.x -= (path_bar->spacing + path_bar->slider_width);

	  up_slider_offset = allocation->width - border_width - path_bar->slider_width;

	}

    }

  else

    {

      child_allocation.x = allocation->x + border_width;

      if (need_sliders || path_bar->fake_root)

	{

	  up_slider_offset = border_width;

	  child_allocation.x += (path_bar->spacing + path_bar->slider_width);

	}

    }

  for (list = first_button; list; list = list->prev)

    {

      ButtonData *button_data;

      button_data = BUTTON_DATA (list->data);

      child = button_data->button;

      child_allocation.width = MIN (child->requisition.width,

				    allocation_width - (path_bar->spacing + path_bar->slider_width) * 2);

      if (direction == GTK_TEXT_DIR_RTL)

	child_allocation.x -= child_allocation.width;

      /* Check to see if we've don't have any more space to allocate buttons */

      if (need_sliders && direction == GTK_TEXT_DIR_RTL)

	{

	  if (child_allocation.x - path_bar->spacing - path_bar->slider_width < widget->allocation.x + border_width)

	    break;

	}

      else if (need_sliders && direction == GTK_TEXT_DIR_LTR)

	{

	  if (child_allocation.x + child_allocation.width + path_bar->spacing + path_bar->slider_width >

	      widget->allocation.x + border_width + allocation_width)

	    break;

	}

      if (child_allocation.width < child->requisition.width)

	{

	  if (!gtk_widget_get_has_tooltip (child))

	    gtk_widget_set_tooltip_text (child, button_data->dir_name);

	}

      else if (gtk_widget_get_has_tooltip (child))

	gtk_widget_set_tooltip_text (child, NULL);

      gtk_widget_set_child_visible (child, TRUE);

      gtk_widget_size_allocate (child, &child_allocation);

      if (direction == GTK_TEXT_DIR_RTL)

	child_allocation.x -= path_bar->spacing;

      else

	child_allocation.x += child_allocation.width + path_bar->spacing;

    }

  /* Now we go hide all the widgets that don't fit */

  while (list)

    {

      gtk_widget_set_child_visible (BUTTON_DATA (list->data)->button, FALSE);

      list = list->prev;

    }

  for (list = first_button->next; list; list = list->next)

    {

      gtk_widget_set_child_visible (BUTTON_DATA (list->data)->button, FALSE);

    }

  if (need_sliders || path_bar->fake_root)

    {

      child_allocation.width = path_bar->slider_width;

      child_allocation.x = up_slider_offset + allocation->x;

      gtk_widget_size_allocate (path_bar->up_slider_button, &child_allocation);

      gtk_widget_set_child_visible (path_bar->up_slider_button, TRUE);

      gtk_widget_show_all (path_bar->up_slider_button);

    }

  else

    gtk_widget_set_child_visible (path_bar->up_slider_button, FALSE);

  if (need_sliders)

    {

      child_allocation.width = path_bar->slider_width;

      if (direction == GTK_TEXT_DIR_RTL)

	child_allocation.x = border_width;

      else

	child_allocation.x = allocation->width - border_width - path_bar->slider_width;

      child_allocation.x += allocation->x;

      gtk_widget_size_allocate (path_bar->down_slider_button, &child_allocation);

      gtk_widget_set_child_visible (path_bar->down_slider_button, TRUE);

      gtk_widget_show_all (path_bar->down_slider_button);

      gtk_path_bar_update_slider_buttons (path_bar);

    }

  else

    gtk_widget_set_child_visible (path_bar->down_slider_button, FALSE);

}

static void

gtk_path_bar_style_set (GtkWidget *widget,

			GtkStyle  *previous_style)

{

  GTK_WIDGET_CLASS (gtk_path_bar_parent_class)->style_set (widget, previous_style);

  gtk_path_bar_check_icon_theme (GTK_PATH_BAR (widget));

}

static void

gtk_path_bar_screen_changed (GtkWidget *widget,

			     GdkScreen *previous_screen)

{

  if (GTK_WIDGET_CLASS (gtk_path_bar_parent_class)->screen_changed)

    GTK_WIDGET_CLASS (gtk_path_bar_parent_class)->screen_changed (widget, previous_screen);

  /* We might nave a new settings, so we remove the old one */

  if (previous_screen)

    remove_settings_signal (GTK_PATH_BAR (widget), previous_screen);

  gtk_path_bar_check_icon_theme (GTK_PATH_BAR (widget));

}

static gboolean

gtk_path_bar_scroll (GtkWidget      *widget,

		     GdkEventScroll *event)

{

  switch (event->direction)

    {

    case GDK_SCROLL_RIGHT:

    case GDK_SCROLL_DOWN:

      gtk_path_bar_scroll_down (GTK_PATH_BAR (widget));

      break;

    case GDK_SCROLL_LEFT:

    case GDK_SCROLL_UP:

      gtk_path_bar_scroll_up (GTK_PATH_BAR (widget));

      break;

    }

  return TRUE;

}

static void

gtk_path_bar_add (GtkContainer *container,

		  GtkWidget    *widget)

{

  gtk_widget_set_parent (widget, GTK_WIDGET (container));

}

static void

gtk_path_bar_remove_1 (GtkContainer *container,

		       GtkWidget    *widget)

{

  gboolean was_visible = gtk_widget_get_visible (widget);

  gtk_widget_unparent (widget);

  if (was_visible)

    gtk_widget_queue_resize (GTK_WIDGET (container));

}

static void

gtk_path_bar_remove (GtkContainer *container,

		     GtkWidget    *widget)

{

  GtkPathBar *path_bar;

  GList *children;

  path_bar = GTK_PATH_BAR (container);

  if (widget == path_bar->up_slider_button)

    {

      gtk_path_bar_remove_1 (container, widget);

      path_bar->up_slider_button = NULL;

      return;

    }

  if (widget == path_bar->down_slider_button)

    {

      gtk_path_bar_remove_1 (container, widget);

      path_bar->down_slider_button = NULL;

      return;

    }

  children = path_bar->button_list;

  while (children)

    {

      if (widget == BUTTON_DATA (children->data)->button)

	{

	  gtk_path_bar_remove_1 (container, widget);

	  path_bar->button_list = g_list_remove_link (path_bar->button_list, children);

	  g_list_free (children);

	  return;

	}

      children = children->next;

    }

}

static void

gtk_path_bar_forall (GtkContainer *container,

		     gboolean      include_internals,

		     GtkCallback   callback,

		     gpointer      callback_data)

{

  GtkPathBar *path_bar;

  GList *children;

  g_return_if_fail (callback != NULL);

  path_bar = GTK_PATH_BAR (container);

  children = path_bar->button_list;

  while (children)

    {

      GtkWidget *child;

      child = BUTTON_DATA (children->data)->button;

      children = children->next;

      (* callback) (child, callback_data);

    }

  if (path_bar->up_slider_button)

    (* callback) (path_bar->up_slider_button, callback_data);

  if (path_bar->down_slider_button)

    (* callback) (path_bar->down_slider_button, callback_data);

}

static void

gtk_path_bar_scroll_down (GtkPathBar *path_bar)

{

  GList *list;

  GList *down_button = NULL;

  gint space_available;

  if (path_bar->ignore_click)

    {

      path_bar->ignore_click = FALSE;

      return;   

    }

  if (gtk_widget_get_child_visible (BUTTON_DATA (path_bar->button_list->data)->button))

    {

      /* Return if the last button is already visible */

      return;

    }

  gtk_widget_queue_resize (GTK_WIDGET (path_bar));

  /* We find the button at the 'down' end that we have to make

   * visible */

  for (list = path_bar->button_list; list; list = list->next)

    {

      if (list->next && gtk_widget_get_child_visible (BUTTON_DATA (list->next->data)->button))

	{

	  down_button = list;

	  break;

	}

    }

  space_available = (GTK_WIDGET (path_bar)->allocation.width

		     - 2 * GTK_CONTAINER (path_bar)->border_width

		     - 2 * path_bar->spacing - 2 * path_bar->slider_width

		     - BUTTON_DATA (down_button->data)->button->allocation.width);

  path_bar->first_scrolled_button = down_button;

  /* We have space_available free space that's not being used.  

   * So we walk down from the end, adding buttons until we use all free space.

   */

  while (space_available > 0)

    {

      path_bar->first_scrolled_button = down_button;

      down_button = down_button->next;

      if (!down_button)

	break;

      space_available -= (BUTTON_DATA (down_button->data)->button->allocation.width

			  + path_bar->spacing);

    }

}

static void

gtk_path_bar_scroll_up (GtkPathBar *path_bar)

{

  GList *list;

  if (path_bar->ignore_click)

    {

      path_bar->ignore_click = FALSE;

      return;   

    }

  list = g_list_last (path_bar->button_list);

  if (gtk_widget_get_child_visible (BUTTON_DATA (list->data)->button))

    {

      /* Return if the first button is already visible */

      return;

    }

  gtk_widget_queue_resize (GTK_WIDGET (path_bar));

  for ( ; list; list = list->prev)

    {

      if (list->prev && gtk_widget_get_child_visible (BUTTON_DATA (list->prev->data)->button))

	{

	  if (list->prev == path_bar->fake_root)

	    path_bar->fake_root = NULL;

	  path_bar->first_scrolled_button = list;

	  return;

	}

    }

}

static gboolean

gtk_path_bar_scroll_timeout (GtkPathBar *path_bar)

{

  gboolean retval = FALSE;

  if (path_bar->timer)