Directory selector
authoryangxx <yangxx@04897980-b3bd-0310-b5e0-8ef037075253>
Thu, 9 Oct 2003 19:40:09 +0000 (19:40 +0000)
committeryangxx <yangxx@04897980-b3bd-0310-b5e0-8ef037075253>
Thu, 9 Oct 2003 19:40:09 +0000 (19:40 +0000)
git-svn-id: http://ltt.polymtl.ca/svn@294 04897980-b3bd-0310-b5e0-8ef037075253

ltt/branches/poly/include/lttv/gtkdirsel.h [new file with mode: 0644]
ltt/branches/poly/lttv/modules/gui/mainWin/src/Makefile.am
ltt/branches/poly/lttv/modules/gui/mainWin/src/callbacks.c
ltt/branches/poly/lttv/modules/gui/mainWin/src/gtkdirsel.c [new file with mode: 0644]

diff --git a/ltt/branches/poly/include/lttv/gtkdirsel.h b/ltt/branches/poly/include/lttv/gtkdirsel.h
new file mode 100644 (file)
index 0000000..6b9318d
--- /dev/null
@@ -0,0 +1,97 @@
+
+#ifndef __GTK_DIR_SEL_H__
+#define __GTK_DIR_SEL_H__
+
+
+#include <gdk/gdk.h>
+#include <gtk/gtkdialog.h>
+
+
+#ifdef __cplusplus
+extern "C" {
+#endif /* __cplusplus */
+
+
+#define GTK_TYPE_DIR_SELECTION            (gtk_dir_selection_get_type ())
+#define GTK_DIR_SELECTION(obj)            (G_TYPE_CHECK_INSTANCE_CAST ((obj), GTK_TYPE_DIR_SELECTION, GtkDirSelection))
+#define GTK_DIR_SELECTION_CLASS(klass)    (G_TYPE_CHECK_CLASS_CAST ((klass), GTK_TYPE_DIR_SELECTION, GtkDirSelectionClass))
+#define GTK_IS_DIR_SELECTION(obj)         (G_TYPE_CHECK_INSTANCE_TYPE ((obj), GTK_TYPE_DIR_SELECTION))
+#define GTK_IS_DIR_SELECTION_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), GTK_TYPE_DIR_SELECTION))
+#define GTK_DIR_SELECTION_GET_CLASS(obj)  (G_TYPE_INSTANCE_GET_CLASS ((obj), GTK_TYPE_DIR_SELECTION, GtkDirSelectionClass))
+
+
+typedef struct _GtkDirSelection       GtkDirSelection;
+typedef struct _GtkDirSelectionClass  GtkDirSelectionClass;
+
+struct _GtkDirSelection
+{
+  GtkDialog parent_instance;
+
+  GtkWidget *dir_list;
+  GtkWidget *file_list;
+  GtkWidget *selection_entry;
+  GtkWidget *selection_text;
+  GtkWidget *main_vbox;
+  GtkWidget *ok_button;
+  GtkWidget *cancel_button;
+  GtkWidget *help_button;
+  GtkWidget *history_pulldown;
+  GtkWidget *history_menu;
+  GList     *history_list;
+  GtkWidget *fileop_dialog;
+  GtkWidget *fileop_entry;
+  gchar     *fileop_file;
+  gpointer   cmpl_state;
+  
+  GtkWidget *fileop_c_dir;
+  GtkWidget *fileop_del_file;
+  GtkWidget *fileop_ren_file;
+  
+  GtkWidget *button_area;
+  GtkWidget *action_area;
+
+  GPtrArray *selected_names;
+  gchar     *last_selected;
+};
+
+struct _GtkDirSelectionClass
+{
+  GtkDialogClass parent_class;
+
+  /* Padding for future expansion */
+  void (*_gtk_reserved1) (void);
+  void (*_gtk_reserved2) (void);
+  void (*_gtk_reserved3) (void);
+  void (*_gtk_reserved4) (void);
+};
+
+
+GType      gtk_dir_selection_get_type            (void) G_GNUC_CONST;
+GtkWidget* gtk_dir_selection_new                 (const gchar      *title);
+void       gtk_dir_selection_set_filename        (GtkDirSelection *filesel,
+                                                  const gchar      *filename);
+/* This function returns the selected filename in the C runtime's
+ * multibyte string encoding, which may or may not be the same as that
+ * used by GDK (UTF-8). To convert to UTF-8, call g_filename_to_utf8().
+ * The returned string points to a statically allocated buffer and
+ * should be copied away.
+ */
+G_CONST_RETURN gchar* gtk_dir_selection_get_filename        (GtkDirSelection *filesel);
+
+void      gtk_dir_selection_complete             (GtkDirSelection *filesel,
+                                                  const gchar      *pattern);
+void       gtk_dir_selection_show_fileop_buttons (GtkDirSelection *filesel);
+void       gtk_dir_selection_hide_fileop_buttons (GtkDirSelection *filesel);
+
+gchar**    gtk_dir_selection_get_selections      (GtkDirSelection *filesel);
+gchar *    gtk_dir_selection_get_dir (GtkDirSelection *filesel);
+void       gtk_dir_selection_set_select_multiple (GtkDirSelection *filesel,
+                                                  gboolean          select_multiple);
+gboolean   gtk_dir_selection_get_select_multiple (GtkDirSelection *filesel);
+
+#ifdef __cplusplus
+}
+#endif /* __cplusplus */
+
+
+#endif /* __GTK_DIR_SEL_H__ */
index db8311113d715def61b825458abf80ae373225dc..d625d806b53644c510e38d2681267a79c5d68599 100644 (file)
@@ -23,7 +23,8 @@ libmainwin_la_SOURCES = \
        support.c \
        interface.c \
        callbacks.c \
-       gtkcustom.c
+       gtkcustom.c \
+       gtkdirsel.c
 
 noinst_HEADERS = \
        support.h \
index 4d6499c658d26aec172f4eda5001296ae91ee56c..5e292993573e8eb5f8e766f0294640e89b084fdb 100644 (file)
@@ -13,6 +13,7 @@
 #include <lttv/toolbar.h>
 #include <lttv/gtkTraceSet.h>
 #include <lttv/module.h>
+#include <lttv/gtkdirsel.h>
 
 #define PATH_LENGTH     256
 
@@ -608,13 +609,24 @@ void
 on_add_module_search_path_activate     (GtkMenuItem     *menuitem,
                                         gpointer         user_data)
 {
+  GtkDirSelection * fileSelector = (GtkDirSelection *)gtk_dir_selection_new("Select module path");
+  char * dir;
+  gint id;
+
   gchar  str[PATH_LENGTH];
   mainWindow * mwData = get_window_data_struct((GtkWidget*)menuitem);
-  g_printf("Add module search path\n");
-  str[0] = '\0';
-  get_label((GtkWindow*)mwData->MWindow, str, "Add module search path", "Please input a search path:");
-  if(strlen(str)){
-    lttv_module_path_add(str);
+
+  id = gtk_dialog_run(GTK_DIALOG(fileSelector));
+  switch(id){
+    case GTK_RESPONSE_ACCEPT:
+    case GTK_RESPONSE_OK:
+      dir = gtk_dir_selection_get_dir (fileSelector);
+      lttv_module_path_add(dir);
+    case GTK_RESPONSE_REJECT:
+    case GTK_RESPONSE_CANCEL:
+    default:
+      gtk_widget_destroy((GtkWidget*)fileSelector);
+      break;
   }
 }
 
diff --git a/ltt/branches/poly/lttv/modules/gui/mainWin/src/gtkdirsel.c b/ltt/branches/poly/lttv/modules/gui/mainWin/src/gtkdirsel.c
new file mode 100644 (file)
index 0000000..92a8ab9
--- /dev/null
@@ -0,0 +1,4045 @@
+
+#include "config.h"
+
+#include <stdio.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#ifdef HAVE_SYS_PARAM_H
+#include <sys/param.h>
+#endif
+#include <stdlib.h>
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+#include <string.h>
+#include <errno.h>
+#ifdef HAVE_PWD_H
+#include <pwd.h>
+#endif
+
+#include <glib.h>              /* Include early to get G_OS_WIN32 and
+                                * G_WITH_CYGWIN */
+
+#if defined(G_OS_WIN32) || defined(G_WITH_CYGWIN)
+#include <ctype.h>
+#define STRICT
+#include <windows.h>
+#undef STRICT
+#endif /* G_OS_WIN32 || G_WITH_CYGWIN */
+#ifdef G_OS_WIN32
+#include <winsock.h>           /* For gethostname */
+#endif
+
+#include "gdk/gdkkeysyms.h"
+#include <gtk/gtk.h>
+#include <lttv/gtkdirsel.h>
+
+#define _(A) A
+#define WANT_HPANED 1
+
+#ifdef G_OS_WIN32
+#include <direct.h>
+#include <io.h>
+#define mkdir(p,m) _mkdir(p)
+#ifndef S_ISDIR
+#define S_ISDIR(mode) ((mode)&_S_IFDIR)
+#endif
+#endif /* G_OS_WIN32 */
+
+#ifdef G_WITH_CYGWIN
+#include <sys/cygwin.h>                /* For cygwin_conv_to_posix_path */
+#endif
+
+#define DIR_LIST_WIDTH   180
+#define DIR_LIST_HEIGHT  180
+#define FILE_LIST_WIDTH  180
+#define FILE_LIST_HEIGHT 180
+
+/* The Hurd doesn't define either PATH_MAX or MAXPATHLEN, so we put this
+ * in here, since the rest of the code in the file does require some
+ * fixed maximum.
+ */
+#ifndef MAXPATHLEN
+#  ifdef PATH_MAX
+#    define MAXPATHLEN PATH_MAX
+#  else
+#    define MAXPATHLEN 2048
+#  endif
+#endif
+
+/* I've put this here so it doesn't get confused with the 
+ * file completion interface */
+typedef struct _HistoryCallbackArg HistoryCallbackArg;
+
+struct _HistoryCallbackArg
+{
+  gchar *directory;
+  GtkWidget *menu_item;
+};
+
+
+typedef struct _CompletionState    CompletionState;
+typedef struct _CompletionDir      CompletionDir;
+typedef struct _CompletionDirSent  CompletionDirSent;
+typedef struct _CompletionDirEntry CompletionDirEntry;
+typedef struct _CompletionUserDir  CompletionUserDir;
+typedef struct _PossibleCompletion PossibleCompletion;
+
+/* Non-external file completion decls and structures */
+
+/* A contant telling PRCS how many directories to cache.  Its actually
+ * kept in a list, so the geometry isn't important. */
+#define CMPL_DIRECTORY_CACHE_SIZE 10
+
+/* A constant used to determine whether a substring was an exact
+ * match by first_diff_index()
+ */
+#define PATTERN_MATCH -1
+#define CMPL_ERRNO_TOO_LONG ((1<<16)-1)
+#define CMPL_ERRNO_DID_NOT_CONVERT ((1<<16)-2)
+
+/* This structure contains all the useful information about a directory
+ * for the purposes of filename completion.  These structures are cached
+ * in the CompletionState struct.  CompletionDir's are reference counted.
+ */
+struct _CompletionDirSent
+{
+  ino_t inode;
+  time_t mtime;
+  dev_t device;
+
+  gint entry_count;
+  struct _CompletionDirEntry *entries;
+};
+
+struct _CompletionDir
+{
+  CompletionDirSent *sent;
+
+  gchar *fullname;
+  gint fullname_len;
+
+  struct _CompletionDir *cmpl_parent;
+  gint cmpl_index;
+  gchar *cmpl_text;
+};
+
+/* This structure contains pairs of directory entry names with a flag saying
+ * whether or not they are a valid directory.  NOTE: This information is used
+ * to provide the caller with information about whether to update its completions
+ * or try to open a file.  Since directories are cached by the directory mtime,
+ * a symlink which points to an invalid file (which will not be a directory),
+ * will not be reevaluated if that file is created, unless the containing
+ * directory is touched.  I consider this case to be worth ignoring (josh).
+ */
+struct _CompletionDirEntry
+{
+  gboolean is_dir;
+  gchar *entry_name;
+  gchar *sort_key;
+};
+
+struct _CompletionUserDir
+{
+  gchar *login;
+  gchar *homedir;
+};
+
+struct _PossibleCompletion
+{
+  /* accessible fields, all are accessed externally by functions
+   * declared above
+   */
+  gchar *text;
+  gint is_a_completion;
+  gboolean is_directory;
+
+  /* Private fields
+   */
+  gint text_alloc;
+};
+
+struct _CompletionState
+{
+  gint last_valid_char;
+  gchar *updated_text;
+  gint updated_text_len;
+  gint updated_text_alloc;
+  gboolean re_complete;
+
+  gchar *user_dir_name_buffer;
+  gint user_directories_len;
+
+  gchar *last_completion_text;
+
+  gint user_completion_index; /* if >= 0, currently completing ~user */
+
+  struct _CompletionDir *completion_dir; /* directory completing from */
+  struct _CompletionDir *active_completion_dir;
+
+  struct _PossibleCompletion the_completion;
+
+  struct _CompletionDir *reference_dir; /* initial directory */
+
+  GList* directory_storage;
+  GList* directory_sent_storage;
+
+  struct _CompletionUserDir *user_directories;
+};
+
+enum {
+  PROP_0,
+  PROP_SHOW_FILEOPS,
+  PROP_FILENAME,
+  PROP_SELECT_MULTIPLE
+};
+
+enum {
+  DIR_COLUMN
+};
+
+enum {
+  FILE_COLUMN
+};
+
+/* File completion functions which would be external, were they used
+ * outside of this file.
+ */
+
+static CompletionState*    cmpl_init_state        (void);
+static void                cmpl_free_state        (CompletionState *cmpl_state);
+static gint                cmpl_state_okay        (CompletionState* cmpl_state);
+static const gchar*        cmpl_strerror          (gint);
+
+static PossibleCompletion* cmpl_completion_matches(gchar           *text_to_complete,
+                                                  gchar          **remaining_text,
+                                                  CompletionState *cmpl_state);
+
+/* Returns a name for consideration, possibly a completion, this name
+ * will be invalid after the next call to cmpl_next_completion.
+ */
+static char*               cmpl_this_completion   (PossibleCompletion*);
+
+/* True if this completion matches the given text.  Otherwise, this
+ * output can be used to have a list of non-completions.
+ */
+static gint                cmpl_is_a_completion   (PossibleCompletion*);
+
+/* True if the completion is a directory
+ */
+static gboolean            cmpl_is_directory      (PossibleCompletion*);
+
+/* Obtains the next completion, or NULL
+ */
+static PossibleCompletion* cmpl_next_completion   (CompletionState*);
+
+/* Updating completions: the return value of cmpl_updated_text() will
+ * be text_to_complete completed as much as possible after the most
+ * recent call to cmpl_completion_matches.  For the present
+ * application, this is the suggested replacement for the user's input
+ * string.  You must CALL THIS AFTER ALL cmpl_text_completions have
+ * been received.
+ */
+static gchar*              cmpl_updated_text       (CompletionState* cmpl_state);
+
+/* After updating, to see if the completion was a directory, call
+ * this.  If it was, you should consider re-calling completion_matches.
+ */
+static gboolean            cmpl_updated_dir        (CompletionState* cmpl_state);
+
+/* Current location: if using file completion, return the current
+ * directory, from which file completion begins.  More specifically,
+ * the cwd concatenated with all exact completions up to the last
+ * directory delimiter('/').
+ */
+static gchar*              cmpl_reference_position (CompletionState* cmpl_state);
+
+/* backing up: if cmpl_completion_matches returns NULL, you may query
+ * the index of the last completable character into cmpl_updated_text.
+ */
+static gint                cmpl_last_valid_char    (CompletionState* cmpl_state);
+
+/* When the user selects a non-directory, call cmpl_completion_fullname
+ * to get the full name of the selected file.
+ */
+static const gchar*        cmpl_completion_fullname (const gchar*, CompletionState* cmpl_state);
+
+
+/* Directory operations. */
+static CompletionDir* open_ref_dir         (gchar* text_to_complete,
+                                           gchar** remaining_text,
+                                           CompletionState* cmpl_state);
+#if !defined(G_OS_WIN32) && !defined(G_WITH_CYGWIN)
+static gboolean       check_dir            (gchar *dir_name, 
+                                           struct stat *result, 
+                                           gboolean *stat_subdirs);
+#endif
+static CompletionDir* open_dir             (gchar* dir_name,
+                                           CompletionState* cmpl_state);
+#ifdef HAVE_PWD_H
+static CompletionDir* open_user_dir        (const gchar* text_to_complete,
+                                           CompletionState *cmpl_state);
+#endif
+static CompletionDir* open_relative_dir    (gchar* dir_name, CompletionDir* dir,
+                                           CompletionState *cmpl_state);
+static CompletionDirSent* open_new_dir     (gchar* dir_name, 
+                                           struct stat* sbuf,
+                                           gboolean stat_subdirs);
+static gint           correct_dir_fullname (CompletionDir* cmpl_dir);
+static gint           correct_parent       (CompletionDir* cmpl_dir,
+                                           struct stat *sbuf);
+#ifndef G_OS_WIN32
+static gchar*         find_parent_dir_fullname    (gchar* dirname);
+#endif
+static CompletionDir* attach_dir           (CompletionDirSent* sent,
+                                           gchar* dir_name,
+                                           CompletionState *cmpl_state);
+static void           free_dir_sent (CompletionDirSent* sent);
+static void           free_dir      (CompletionDir  *dir);
+static void           prune_memory_usage(CompletionState *cmpl_state);
+
+/* Completion operations */
+#ifdef HAVE_PWD_H
+static PossibleCompletion* attempt_homedir_completion(gchar* text_to_complete,
+                                                     CompletionState *cmpl_state);
+#endif
+static PossibleCompletion* attempt_dir_completion(CompletionState *cmpl_state);
+static CompletionDir* find_completion_dir(gchar* text_to_complete,
+                                         gchar** remaining_text,
+                                         CompletionState* cmpl_state);
+static PossibleCompletion* append_completion_text(gchar* text,
+                                                 CompletionState* cmpl_state);
+#ifdef HAVE_PWD_H
+static gint get_pwdb(CompletionState* cmpl_state);
+static gint compare_user_dir(const void* a, const void* b);
+#endif
+static gint first_diff_index(gchar* pat, gchar* text);
+static gint compare_cmpl_dir(const void* a, const void* b);
+static void update_cmpl(PossibleCompletion* poss,
+                       CompletionState* cmpl_state);
+
+static void gtk_dir_selection_class_init    (GtkDirSelectionClass *klass);
+static void gtk_dir_selection_set_property  (GObject         *object,
+                                             guint            prop_id,
+                                             const GValue    *value,
+                                             GParamSpec      *pspec);
+static void gtk_dir_selection_get_property  (GObject         *object,
+                                             guint            prop_id,
+                                             GValue          *value,
+                                             GParamSpec      *pspec);
+static void gtk_dir_selection_init          (GtkDirSelection      *filesel);
+static void gtk_dir_selection_finalize      (GObject               *object);
+static void gtk_dir_selection_destroy       (GtkObject             *object);
+static void gtk_dir_selection_map           (GtkWidget             *widget);
+static gint gtk_dir_selection_key_press     (GtkWidget             *widget,
+                                             GdkEventKey           *event,
+                                             gpointer               user_data);
+static gint gtk_dir_selection_insert_text   (GtkWidget             *widget,
+                                             const gchar           *new_text,
+                                             gint                   new_text_length,
+                                             gint                  *position,
+                                             gpointer               user_data);
+static void gtk_dir_selection_update_fileops (GtkDirSelection     *filesel);
+
+static void gtk_dir_selection_file_activate (GtkTreeView       *tree_view,
+                                             GtkTreePath       *path,
+                                             GtkTreeViewColumn *column,
+                                             gpointer           user_data);
+static void gtk_dir_selection_file_changed  (GtkTreeSelection  *selection,
+                                             gpointer           user_data);
+static void gtk_dir_selection_dir_activate  (GtkTreeView       *tree_view,
+                                             GtkTreePath       *path,
+                                             GtkTreeViewColumn *column,
+                                             gpointer           user_data);
+static void gtk_dir_selection_dir_changed  (GtkTreeSelection  *selection,
+                                             gpointer           user_data);
+static void gtk_dir_selection_populate      (GtkDirSelection      *fs,
+                                             gchar                 *rel_path,
+                                             gboolean               try_complete,
+                                             gboolean               reset_entry);
+static void gtk_dir_selection_abort         (GtkDirSelection      *fs);
+
+static void gtk_dir_selection_update_history_menu (GtkDirSelection       *fs,
+                                                   gchar                  *current_dir);
+
+static void gtk_dir_selection_create_dir  (GtkWidget *widget, gpointer data);
+static void gtk_dir_selection_delete_file (GtkWidget *widget, gpointer data);
+static void gtk_dir_selection_rename_file (GtkWidget *widget, gpointer data);
+
+static void free_selected_names (GPtrArray *names);
+
+#if !defined(G_OS_WIN32) && !defined(G_WITH_CYGWIN)
+#define compare_filenames(a, b) strcmp(a, b)
+#else
+#define compare_filenames(a, b) g_ascii_strcasecmp(a, b)
+#endif
+
+
+static GtkWindowClass *parent_class = NULL;
+
+/* Saves errno when something cmpl does fails. */
+static gint cmpl_errno;
+
+#ifdef G_WITH_CYGWIN
+/*
+ * Take the path currently in the file selection
+ * entry field and translate as necessary from
+ * a WIN32 style to CYGWIN32 style path.  For
+ * instance translate:
+ * x:\somepath\file.jpg
+ * to:
+ * /cygdrive/x/somepath/file.jpg
+ *
+ * Replace the path in the selection text field.
+ * Return a boolean value concerning whether a
+ * translation had to be made.
+ */
+static int
+translate_win32_path (GtkDirSelection *filesel)
+{
+  int updated = 0;
+  const gchar *path;
+  gchar newPath[MAX_PATH];
+
+  /*
+   * Retrieve the current path
+   */
+  path = gtk_entry_get_text (GTK_ENTRY (filesel->selection_entry));
+
+  cygwin_conv_to_posix_path (path, newPath);
+  updated = (strcmp (path, newPath) != 0);
+
+  if (updated)
+    gtk_entry_set_text (GTK_ENTRY (filesel->selection_entry), newPath);
+    
+  return updated;
+}
+#endif
+
+GType
+gtk_dir_selection_get_type (void)
+{
+  static GType file_selection_type = 0;
+
+  if (!file_selection_type)
+    {
+      static const GTypeInfo filesel_info =
+      {
+       sizeof (GtkDirSelectionClass),
+       NULL,           /* base_init */
+       NULL,           /* base_finalize */
+       (GClassInitFunc) gtk_dir_selection_class_init,
+       NULL,           /* class_finalize */
+       NULL,           /* class_data */
+       sizeof (GtkDirSelection),
+       0,              /* n_preallocs */
+       (GInstanceInitFunc) gtk_dir_selection_init,
+      };
+
+      file_selection_type =
+       g_type_register_static (GTK_TYPE_DIALOG, "GtkDirSelection",
+                               &filesel_info, 0);
+    }
+
+  return file_selection_type;
+}
+
+static void
+gtk_dir_selection_class_init (GtkDirSelectionClass *class)
+{
+  GObjectClass *gobject_class;
+  GtkObjectClass *object_class;
+  GtkWidgetClass *widget_class;
+
+  gobject_class = (GObjectClass*) class;
+  object_class = (GtkObjectClass*) class;
+  widget_class = (GtkWidgetClass*) class;
+
+  parent_class = g_type_class_peek_parent (class);
+
+  gobject_class->finalize = gtk_dir_selection_finalize;
+  gobject_class->set_property = gtk_dir_selection_set_property;
+  gobject_class->get_property = gtk_dir_selection_get_property;
+   
+  g_object_class_install_property (gobject_class,
+                                   PROP_FILENAME,
+                                   g_param_spec_string ("filename",
+                                                        _("Filename"),
+                                                        _("The currently selected filename"),
+                                                        NULL,
+                                                        G_PARAM_READABLE | G_PARAM_WRITABLE));
+  g_object_class_install_property (gobject_class,
+                                  PROP_SHOW_FILEOPS,
+                                  g_param_spec_boolean ("show_fileops",
+                                                        _("Show file operations"),
+                                                        _("Whether buttons for creating/manipulating files should be displayed"),
+                                                        FALSE,
+                                                        G_PARAM_READABLE |
+                                                        G_PARAM_WRITABLE));
+  g_object_class_install_property (gobject_class,
+                                  PROP_SELECT_MULTIPLE,
+                                  g_param_spec_boolean ("select_multiple",
+                                                        _("Select multiple"),
+                                                        _("Whether to allow multiple files to be selected"),
+                                                        FALSE,
+                                                        G_PARAM_READABLE |
+                                                        G_PARAM_WRITABLE));
+  object_class->destroy = gtk_dir_selection_destroy;
+  widget_class->map = gtk_dir_selection_map;
+}
+
+static void gtk_dir_selection_set_property (GObject         *object,
+                                            guint            prop_id,
+                                            const GValue    *value,
+                                            GParamSpec      *pspec)
+{
+  GtkDirSelection *filesel;
+
+  filesel = GTK_DIR_SELECTION (object);
+
+  switch (prop_id)
+    {
+    case PROP_FILENAME:
+      gtk_dir_selection_set_filename (filesel,
+                                       g_value_get_string (value));
+      break;
+    case PROP_SHOW_FILEOPS:
+      if (g_value_get_boolean (value))
+        gtk_dir_selection_show_fileop_buttons (filesel);
+      else
+        gtk_dir_selection_hide_fileop_buttons (filesel);
+      break;
+    case PROP_SELECT_MULTIPLE:
+      gtk_dir_selection_set_select_multiple (filesel, g_value_get_boolean (value));
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+    }
+}
+
+static void gtk_dir_selection_get_property (GObject         *object,
+                                            guint            prop_id,
+                                            GValue          *value,
+                                            GParamSpec      *pspec)
+{
+  GtkDirSelection *filesel;
+
+  filesel = GTK_DIR_SELECTION (object);
+
+  switch (prop_id)
+    {
+    case PROP_FILENAME:
+      g_value_set_string (value,
+                          gtk_dir_selection_get_filename(filesel));
+      break;
+
+    case PROP_SHOW_FILEOPS:
+      /* This is a little bit hacky, but doing otherwise would require
+       * adding a field to the object.
+       */
+      g_value_set_boolean (value, (filesel->fileop_c_dir && 
+                                  filesel->fileop_del_file &&
+                                  filesel->fileop_ren_file));
+      break;
+    case PROP_SELECT_MULTIPLE:
+      g_value_set_boolean (value, gtk_dir_selection_get_select_multiple (filesel));
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+    }
+}
+
+static gboolean
+grab_default (GtkWidget *widget)
+{
+  gtk_widget_grab_default (widget);
+  return FALSE;
+}
+     
+static void
+gtk_dir_selection_init (GtkDirSelection *filesel)
+{
+  GtkWidget *entry_vbox;
+  GtkWidget *label;
+  GtkWidget *list_hbox, *list_container;
+  GtkWidget *confirm_area;
+  GtkWidget *pulldown_hbox;
+  GtkWidget *scrolled_win;
+  GtkWidget *eventbox;
+  GtkWidget *spacer;
+  GtkDialog *dialog;
+
+  GtkListStore *model;
+  GtkTreeViewColumn *column;
+  
+  gtk_widget_push_composite_child ();
+
+  dialog = GTK_DIALOG (filesel);
+
+  filesel->cmpl_state = cmpl_init_state ();
+
+  /* The dialog-sized vertical box  */
+  filesel->main_vbox = dialog->vbox;
+  gtk_container_set_border_width (GTK_CONTAINER (filesel), 10);
+
+  /* The horizontal box containing create, rename etc. buttons */
+  filesel->button_area = gtk_hbutton_box_new ();
+  gtk_button_box_set_layout (GTK_BUTTON_BOX (filesel->button_area), GTK_BUTTONBOX_START);
+  gtk_box_set_spacing (GTK_BOX (filesel->button_area), 0);
+  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), filesel->button_area, 
+                     FALSE, FALSE, 0);
+  gtk_widget_show (filesel->button_area);
+  
+  gtk_dir_selection_show_fileop_buttons (filesel);
+
+  /* hbox for pulldown menu */
+  pulldown_hbox = gtk_hbox_new (TRUE, 5);
+  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), pulldown_hbox, FALSE, FALSE, 0);
+  gtk_widget_show (pulldown_hbox);
+  
+  /* Pulldown menu */
+  filesel->history_pulldown = gtk_option_menu_new ();
+  //  gtk_widget_show (filesel->history_pulldown);
+  //  gtk_box_pack_start (GTK_BOX (pulldown_hbox), filesel->history_pulldown, 
+  //                 FALSE, FALSE, 0);
+    
+  /*  The horizontal box containing the directory and file listboxes  */
+
+  spacer = gtk_hbox_new (FALSE, 0);
+  gtk_widget_set_size_request (spacer, -1, 5);
+  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), spacer, FALSE, FALSE, 0);
+  gtk_widget_show (spacer);
+  
+  list_hbox = gtk_hbox_new (FALSE, 5);
+  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), list_hbox, TRUE, TRUE, 0);
+  gtk_widget_show (list_hbox);
+  if (WANT_HPANED)
+    list_container = g_object_new (GTK_TYPE_HPANED,
+                                  "visible", TRUE,
+                                  "parent", list_hbox,
+                                  "border_width", 0,
+                                  NULL);
+  else
+    list_container = list_hbox;
+
+  spacer = gtk_hbox_new (FALSE, 0);
+  gtk_widget_set_size_request (spacer, -1, 5);
+  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), spacer, FALSE, FALSE, 0);  
+  gtk_widget_show (spacer);
+  
+  /* The directories list */
+
+  model = gtk_list_store_new (1, G_TYPE_STRING);
+  filesel->dir_list = gtk_tree_view_new_with_model (GTK_TREE_MODEL (model));
+  g_object_unref (model);
+
+  column = gtk_tree_view_column_new_with_attributes (_("Folders"),
+                                                    gtk_cell_renderer_text_new (),
+                                                    "text", DIR_COLUMN,
+                                                    NULL);
+  label = gtk_label_new_with_mnemonic (_("Fol_ders"));
+  gtk_label_set_mnemonic_widget (GTK_LABEL (label), filesel->dir_list);
+  gtk_widget_show (label);
+  gtk_tree_view_column_set_widget (column, label);
+  gtk_tree_view_column_set_sizing (column, GTK_TREE_VIEW_COLUMN_AUTOSIZE);
+  gtk_tree_view_append_column (GTK_TREE_VIEW (filesel->dir_list), column);
+
+  gtk_widget_set_size_request (filesel->dir_list,
+                              DIR_LIST_WIDTH, DIR_LIST_HEIGHT);
+  g_signal_connect (filesel->dir_list, "row_activated",
+                   G_CALLBACK (gtk_dir_selection_dir_activate), filesel);
+  g_signal_connect (gtk_tree_view_get_selection (GTK_TREE_VIEW (filesel->dir_list)), "changed",
+                   G_CALLBACK (gtk_dir_selection_dir_changed), filesel);
+
+  /*  gtk_clist_column_titles_passive (GTK_CLIST (filesel->dir_list)); */
+
+  scrolled_win = gtk_scrolled_window_new (NULL, NULL);
+  gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (scrolled_win), GTK_SHADOW_IN);  
+  gtk_container_add (GTK_CONTAINER (scrolled_win), filesel->dir_list);
+  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_win),
+                                 GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
+  gtk_container_set_border_width (GTK_CONTAINER (scrolled_win), 0);
+  if (GTK_IS_PANED (list_container))
+    gtk_paned_pack1 (GTK_PANED (list_container), scrolled_win, TRUE, TRUE);
+  else
+    gtk_container_add (GTK_CONTAINER (list_container), scrolled_win);
+  gtk_widget_show (filesel->dir_list);
+  gtk_widget_show (scrolled_win);
+
+  /* The files list */
+  model = gtk_list_store_new (1, G_TYPE_STRING);
+  filesel->file_list = gtk_tree_view_new_with_model (GTK_TREE_MODEL (model));
+  g_object_unref (model);
+
+  column = gtk_tree_view_column_new_with_attributes (_("Files"),
+                                                    gtk_cell_renderer_text_new (),
+                                                    "text", FILE_COLUMN,
+                                                    NULL);
+  label = gtk_label_new_with_mnemonic (_("_Files"));
+  gtk_label_set_mnemonic_widget (GTK_LABEL (label), filesel->file_list);
+  gtk_widget_show (label);
+  gtk_tree_view_column_set_widget (column, label);
+  gtk_tree_view_column_set_sizing (column, GTK_TREE_VIEW_COLUMN_AUTOSIZE);
+  gtk_tree_view_append_column (GTK_TREE_VIEW (filesel->file_list), column);
+
+  gtk_widget_set_size_request (filesel->file_list,
+                              FILE_LIST_WIDTH, FILE_LIST_HEIGHT);
+  g_signal_connect (filesel->file_list, "row_activated",
+                   G_CALLBACK (gtk_dir_selection_file_activate), filesel);
+  g_signal_connect (gtk_tree_view_get_selection (GTK_TREE_VIEW (filesel->file_list)), "changed",
+                   G_CALLBACK (gtk_dir_selection_file_changed), filesel);
+
+  /* gtk_clist_column_titles_passive (GTK_CLIST (filesel->file_list)); */
+
+  scrolled_win = gtk_scrolled_window_new (NULL, NULL);
+  gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (scrolled_win), GTK_SHADOW_IN);
+  gtk_container_add (GTK_CONTAINER (scrolled_win), filesel->file_list);
+  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_win),
+                                 GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
+  gtk_container_set_border_width (GTK_CONTAINER (scrolled_win), 0);
+  //  gtk_container_add (GTK_CONTAINER (list_container), scrolled_win);
+  //  gtk_widget_show (filesel->file_list);
+  //  gtk_widget_show (scrolled_win);
+
+  /* action area for packing buttons into. */
+  filesel->action_area = gtk_hbox_new (TRUE, 0);
+  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), filesel->action_area, 
+                     FALSE, FALSE, 0);
+  gtk_widget_show (filesel->action_area);
+  
+  /*  The OK/Cancel button area */
+  confirm_area = dialog->action_area;
+
+  /*  The Cancel button  */
+  filesel->cancel_button = gtk_dialog_add_button (dialog,
+                                                  GTK_STOCK_CANCEL,
+                                                  GTK_RESPONSE_CANCEL);
+  /*  The OK button  */
+  filesel->ok_button = gtk_dialog_add_button (dialog,
+                                              GTK_STOCK_OK,
+                                              GTK_RESPONSE_OK);
+  
+  gtk_widget_grab_default (filesel->ok_button);
+
+  /*  The selection entry widget  */
+  entry_vbox = gtk_vbox_new (FALSE, 2);
+  gtk_box_pack_end (GTK_BOX (filesel->main_vbox), entry_vbox, FALSE, FALSE, 2);
+  gtk_widget_show (entry_vbox);
+  
+  eventbox = gtk_event_box_new ();
+  filesel->selection_text = label = gtk_label_new ("");
+  gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);
+  gtk_container_add (GTK_CONTAINER (eventbox), label);
+  gtk_box_pack_start (GTK_BOX (entry_vbox), eventbox, FALSE, FALSE, 0);
+  gtk_widget_show (label);
+  gtk_widget_show (eventbox);
+
+  filesel->selection_entry = gtk_entry_new ();
+  g_signal_connect (filesel->selection_entry, "key_press_event",
+                   G_CALLBACK (gtk_dir_selection_key_press), filesel);
+  g_signal_connect (filesel->selection_entry, "insert_text",
+                   G_CALLBACK (gtk_dir_selection_insert_text), NULL);
+  g_signal_connect_swapped (filesel->selection_entry, "changed",
+                           G_CALLBACK (gtk_dir_selection_update_fileops), filesel);
+  g_signal_connect_swapped (filesel->selection_entry, "focus_in_event",
+                           G_CALLBACK (grab_default),
+                           filesel->ok_button);
+  g_signal_connect_swapped (filesel->selection_entry, "activate",
+                           G_CALLBACK (gtk_button_clicked),
+                           filesel->ok_button);
+  
+  gtk_box_pack_start (GTK_BOX (entry_vbox), filesel->selection_entry, TRUE, TRUE, 0);
+  gtk_widget_show (filesel->selection_entry);
+
+  gtk_label_set_mnemonic_widget (GTK_LABEL (filesel->selection_text),
+                                filesel->selection_entry);
+
+  if (!cmpl_state_okay (filesel->cmpl_state))
+    {
+      gchar err_buf[256];
+
+      g_snprintf (err_buf, sizeof (err_buf), _("Folder unreadable: %s"), cmpl_strerror (cmpl_errno));
+
+      gtk_label_set_text (GTK_LABEL (filesel->selection_text), err_buf);
+    }
+  else
+    {
+      gtk_dir_selection_populate (filesel, "", FALSE, TRUE);
+    }
+
+  gtk_widget_grab_focus (filesel->selection_entry);
+
+  gtk_widget_pop_composite_child ();
+}
+
+static gchar *
+uri_list_extract_first_uri (const gchar* uri_list)
+{
+  const gchar *p, *q;
+  
+  g_return_val_if_fail (uri_list != NULL, NULL);
+  
+  p = uri_list;
+  /* We don't actually try to validate the URI according to RFC
+   * 2396, or even check for allowed characters - we just ignore
+   * comments and trim whitespace off the ends.  We also
+   * allow LF delimination as well as the specified CRLF.
+   *
+   * We do allow comments like specified in RFC 2483.
+   */
+  while (p)
+    {
+      if (*p != '#')
+       {
+         while (g_ascii_isspace(*p))
+           p++;
+         
+         q = p;
+         while (*q && (*q != '\n') && (*q != '\r'))
+           q++;
+         
+         if (q > p)
+           {
+             q--;
+             while (q > p && g_ascii_isspace (*q))
+               q--;
+
+             if (q > p)
+               return g_strndup (p, q - p + 1);
+           }
+       }
+      p = strchr (p, '\n');
+      if (p)
+       p++;
+    }
+  return NULL;
+}
+
+static void
+dnd_really_drop  (GtkWidget *dialog, gint response_id, GtkDirSelection *fs)
+{
+  gchar *filename;
+  
+  if (response_id == GTK_RESPONSE_YES)
+    {
+      filename = g_object_get_data (G_OBJECT (dialog), "gtk-fs-dnd-filename");
+
+      gtk_dir_selection_set_filename (fs, filename);
+    }
+  
+  gtk_widget_destroy (dialog);
+}
+
+
+static void
+filenames_dropped (GtkWidget        *widget,
+                  GdkDragContext   *context,
+                  gint              x,
+                  gint              y,
+                  GtkSelectionData *selection_data,
+                  guint             info,
+                  guint             time)
+{
+  char *uri = NULL;
+  char *filename = NULL;
+  char *hostname;
+  char this_hostname[257];
+  int res;
+  GError *error = NULL;
+       
+  if (!selection_data->data)
+    return;
+
+  uri = uri_list_extract_first_uri ((char *)selection_data->data);
+  
+  if (!uri)
+    return;
+
+  filename = g_filename_from_uri (uri, &hostname, &error);
+  g_free (uri);
+  
+  if (!filename)
+    {
+      g_warning ("Error getting dropped filename: %s\n",
+                error->message);
+      g_error_free (error);
+      return;
+    }
+
+  res = gethostname (this_hostname, 256);
+  this_hostname[256] = 0;
+  
+  if ((hostname == NULL) ||
+      (res == 0 && strcmp (hostname, this_hostname) == 0) ||
+      (strcmp (hostname, "localhost") == 0))
+    gtk_dir_selection_set_filename (GTK_DIR_SELECTION (widget),
+                                    filename);
+  else
+    {
+      GtkWidget *dialog;
+      gchar *filename_utf8;
+
+      /* Conversion back to UTF-8 should always succeed for the result
+       * of g_filename_from_uri()
+       */
+      filename_utf8 = g_filename_to_utf8 (filename, -1, NULL, NULL, NULL);
+      g_assert (filename_utf8);
+      
+      dialog = gtk_message_dialog_new (GTK_WINDOW (widget),
+                                      GTK_DIALOG_DESTROY_WITH_PARENT,
+                                      GTK_MESSAGE_QUESTION,
+                                      GTK_BUTTONS_YES_NO,
+                                      _("The file \"%s\" resides on another machine (called %s) and may not be available to this program.\n"
+                                        "Are you sure that you want to select it?"), filename_utf8, hostname);
+      g_free (filename_utf8);
+
+      g_object_set_data_full (G_OBJECT (dialog), "gtk-fs-dnd-filename", g_strdup (filename), g_free);
+      
+      g_signal_connect_data (dialog, "response",
+                            (GCallback) dnd_really_drop, 
+                            widget, NULL, 0);
+      
+      gtk_widget_show (dialog);
+    }
+
+  g_free (hostname);
+  g_free (filename);
+}
+
+enum
+{
+  TARGET_URILIST,
+  TARGET_UTF8_STRING,
+  TARGET_STRING,
+  TARGET_TEXT,
+  TARGET_COMPOUND_TEXT
+};
+
+
+static void
+filenames_drag_get (GtkWidget        *widget,
+                   GdkDragContext   *context,
+                   GtkSelectionData *selection_data,
+                   guint             info,
+                   guint             time,
+                   GtkDirSelection *filesel)
+{
+  const gchar *file;
+  gchar *uri_list;
+  char hostname[256];
+  int res;
+  GError *error;
+
+  file = gtk_dir_selection_get_filename (filesel);
+
+  if (file)
+    {
+      if (info == TARGET_URILIST)
+       {
+         res = gethostname (hostname, 256);
+         
+         error = NULL;
+         uri_list = g_filename_to_uri (file, (!res)?hostname:NULL, &error);
+         if (!uri_list)
+           {
+             g_warning ("Error getting filename: %s\n",
+                        error->message);
+             g_error_free (error);
+             return;
+           }
+         
+         gtk_selection_data_set (selection_data,
+                                 selection_data->target, 8,
+                                 (void *)uri_list, strlen((char *)uri_list));
+         g_free (uri_list);
+       }
+      else
+       {
+         gchar *filename_utf8 = g_filename_to_utf8 (file, -1, NULL, NULL, NULL);
+         g_assert (filename_utf8);
+         gtk_selection_data_set_text (selection_data, filename_utf8, -1);
+         g_free (filename_utf8);
+       }
+    }
+}
+
+static void
+file_selection_setup_dnd (GtkDirSelection *filesel)
+{
+  GtkWidget *eventbox;
+  static const GtkTargetEntry drop_types[] = {
+    { "text/uri-list", 0, TARGET_URILIST}
+  };
+  static gint n_drop_types = sizeof(drop_types)/sizeof(drop_types[0]);
+  static const GtkTargetEntry drag_types[] = {
+    { "text/uri-list", 0, TARGET_URILIST},
+    { "UTF8_STRING", 0, TARGET_UTF8_STRING },
+    { "STRING", 0, 0 },
+    { "TEXT",   0, 0 }, 
+    { "COMPOUND_TEXT", 0, 0 }
+  };
+  static gint n_drag_types = sizeof(drag_types)/sizeof(drag_types[0]);
+
+  gtk_drag_dest_set (GTK_WIDGET (filesel),
+                    GTK_DEST_DEFAULT_ALL,
+                    drop_types, n_drop_types,
+                    GDK_ACTION_COPY);
+
+  g_signal_connect (filesel, "drag_data_received",
+                   G_CALLBACK (filenames_dropped), NULL);
+
+  eventbox = gtk_widget_get_parent (filesel->selection_text);
+  gtk_drag_source_set (eventbox,
+                      GDK_BUTTON1_MASK,
+                      drag_types, n_drag_types,
+                      GDK_ACTION_COPY);
+
+  g_signal_connect (eventbox, "drag_data_get",
+                   G_CALLBACK (filenames_drag_get), filesel);
+}
+
+GtkWidget*
+gtk_dir_selection_new (const gchar *title)
+{
+  GtkDirSelection *filesel;
+
+  filesel = g_object_new (GTK_TYPE_DIR_SELECTION, NULL);
+  gtk_window_set_title (GTK_WINDOW (filesel), title);
+  gtk_dialog_set_has_separator (GTK_DIALOG (filesel), FALSE);
+
+  file_selection_setup_dnd (filesel);
+  
+  return GTK_WIDGET (filesel);
+}
+
+void
+gtk_dir_selection_show_fileop_buttons (GtkDirSelection *filesel)
+{
+  g_return_if_fail (GTK_IS_DIR_SELECTION (filesel));
+    
+  /* delete, create directory, and rename */
+  if (!filesel->fileop_c_dir) 
+    {
+      filesel->fileop_c_dir = gtk_button_new_with_mnemonic (_("_New Folder"));
+      g_signal_connect (filesel->fileop_c_dir, "clicked",
+                       G_CALLBACK (gtk_dir_selection_create_dir),
+                       filesel);
+      //      gtk_box_pack_start (GTK_BOX (filesel->button_area), 
+      //                         filesel->fileop_c_dir, TRUE, TRUE, 0);
+      //      gtk_widget_show (filesel->fileop_c_dir);
+    }
+       
+  if (!filesel->fileop_del_file) 
+    {
+      filesel->fileop_del_file = gtk_button_new_with_mnemonic (_("De_lete File"));
+      g_signal_connect (filesel->fileop_del_file, "clicked",
+                       G_CALLBACK (gtk_dir_selection_delete_file),
+                       filesel);
+      //      gtk_box_pack_start (GTK_BOX (filesel->button_area), 
+      //                         filesel->fileop_del_file, TRUE, TRUE, 0);
+      //      gtk_widget_show (filesel->fileop_del_file);
+    }
+
+  if (!filesel->fileop_ren_file)
+    {
+      filesel->fileop_ren_file = gtk_button_new_with_mnemonic (_("_Rename File"));
+      g_signal_connect (filesel->fileop_ren_file, "clicked",
+                       G_CALLBACK (gtk_dir_selection_rename_file),
+                       filesel);
+      //      gtk_box_pack_start (GTK_BOX (filesel->button_area), 
+      //                         filesel->fileop_ren_file, TRUE, TRUE, 0);
+      //      gtk_widget_show (filesel->fileop_ren_file);
+    }
+  
+  gtk_dir_selection_update_fileops (filesel);
+  
+  g_object_notify (G_OBJECT (filesel), "show_fileops");
+}
+
+void       
+gtk_dir_selection_hide_fileop_buttons (GtkDirSelection *filesel)
+{
+  g_return_if_fail (GTK_IS_DIR_SELECTION (filesel));
+    
+  if (filesel->fileop_ren_file)
+    {
+      gtk_widget_destroy (filesel->fileop_ren_file);
+      filesel->fileop_ren_file = NULL;
+    }
+
+  if (filesel->fileop_del_file)
+    {
+      gtk_widget_destroy (filesel->fileop_del_file);
+      filesel->fileop_del_file = NULL;
+    }
+
+  if (filesel->fileop_c_dir)
+    {
+      gtk_widget_destroy (filesel->fileop_c_dir);
+      filesel->fileop_c_dir = NULL;
+    }
+  g_object_notify (G_OBJECT (filesel), "show_fileops");
+}
+
+
+
+/**
+ * gtk_dir_selection_set_filename:
+ * @filesel: a #GtkDirSelection.
+ * @filename:  a string to set as the default file name.
+ * 
+ * Sets a default path for the file requestor. If @filename includes a
+ * directory path, then the requestor will open with that path as its
+ * current working directory.
+ *
+ * The encoding of @filename is the on-disk encoding, which
+ * may not be UTF-8. See g_filename_from_utf8().
+ **/
+void
+gtk_dir_selection_set_filename (GtkDirSelection *filesel,
+                                const gchar      *filename)
+{
+  gchar *buf;
+  const char *name, *last_slash;
+  char *filename_utf8;
+
+  g_return_if_fail (GTK_IS_DIR_SELECTION (filesel));
+  g_return_if_fail (filename != NULL);
+
+  filename_utf8 = g_filename_to_utf8 (filename, -1, NULL, NULL, NULL);
+  g_return_if_fail (filename_utf8 != NULL);
+
+  last_slash = strrchr (filename_utf8, G_DIR_SEPARATOR);
+
+  if (!last_slash)
+    {
+      buf = g_strdup ("");
+      name = filename_utf8;
+    }
+  else
+    {
+      buf = g_strdup (filename_utf8);
+      buf[last_slash - filename_utf8 + 1] = 0;
+      name = last_slash + 1;
+    }
+
+  gtk_dir_selection_populate (filesel, buf, FALSE, TRUE);
+
+  if (filesel->selection_entry)
+    gtk_entry_set_text (GTK_ENTRY (filesel->selection_entry), name);
+  g_free (buf);
+  g_object_notify (G_OBJECT (filesel), "filename");
+
+  g_free (filename_utf8);
+}
+
+/**
+ * gtk_dir_selection_get_filename:
+ * @filesel: a #GtkDirSelection
+ * 
+ * This function returns the selected filename in the on-disk encoding
+ * (see g_filename_from_utf8()), which may or may not be the same as that
+ * used by GTK+ (UTF-8). To convert to UTF-8, call g_filename_to_utf8().
+ * The returned string points to a statically allocated buffer and
+ * should be copied if you plan to keep it around.
+ *
+ * If no file is selected then the selected directory path is returned.
+ * 
+ * Return value: currently-selected filename in the on-disk encoding.
+ **/
+G_CONST_RETURN gchar*
+gtk_dir_selection_get_filename (GtkDirSelection *filesel)
+{
+  static const gchar nothing[2] = "";
+  static gchar something[MAXPATHLEN*2];
+  char *sys_filename;
+  const char *text;
+
+  g_return_val_if_fail (GTK_IS_DIR_SELECTION (filesel), nothing);
+
+#ifdef G_WITH_CYGWIN
+  translate_win32_path (filesel);
+#endif
+  text = gtk_entry_get_text (GTK_ENTRY (filesel->selection_entry));
+  if (text)
+    {
+      sys_filename = g_filename_from_utf8 (cmpl_completion_fullname (text, filesel->cmpl_state), -1, NULL, NULL, NULL);
+      if (!sys_filename)
+       return nothing;
+      strncpy (something, sys_filename, sizeof (something));
+      g_free (sys_filename);
+      return something;
+    }
+
+  return nothing;
+}
+
+void
+gtk_dir_selection_complete (GtkDirSelection *filesel,
+                            const gchar      *pattern)
+{
+  g_return_if_fail (GTK_IS_DIR_SELECTION (filesel));
+  g_return_if_fail (pattern != NULL);
+
+  if (filesel->selection_entry)
+    gtk_entry_set_text (GTK_ENTRY (filesel->selection_entry), pattern);
+  gtk_dir_selection_populate (filesel, (gchar*) pattern, TRUE, TRUE);
+}
+
+static void
+gtk_dir_selection_destroy (GtkObject *object)
+{
+  GtkDirSelection *filesel;
+  GList *list;
+  HistoryCallbackArg *callback_arg;
+  
+  g_return_if_fail (GTK_IS_DIR_SELECTION (object));
+  
+  filesel = GTK_DIR_SELECTION (object);
+  
+  if (filesel->fileop_dialog)
+    {
+      gtk_widget_destroy (filesel->fileop_dialog);
+      filesel->fileop_dialog = NULL;
+    }
+  
+  if (filesel->history_list)
+    {
+      list = filesel->history_list;
+      while (list)
+       {
+         callback_arg = list->data;
+         g_free (callback_arg->directory);
+         g_free (callback_arg);
+         list = list->next;
+       }
+      g_list_free (filesel->history_list);
+      filesel->history_list = NULL;
+    }
+
+  if (filesel->cmpl_state)
+    {
+      cmpl_free_state (filesel->cmpl_state);
+      filesel->cmpl_state = NULL;
+    }
+  if (filesel->selected_names)
+    {
+      free_selected_names (filesel->selected_names);
+      filesel->selected_names = NULL;
+    } 
+
+  if (filesel->last_selected)
+    {
+      g_free (filesel->last_selected);
+      filesel->last_selected = NULL;
+    }
+
+  GTK_OBJECT_CLASS (parent_class)->destroy (object);
+}
+
+static void
+gtk_dir_selection_map (GtkWidget *widget)
+{
+  GtkDirSelection *filesel = GTK_DIR_SELECTION (widget);
+
+  /* Refresh the contents */
+  gtk_dir_selection_populate (filesel, "", FALSE, FALSE);
+  
+  GTK_WIDGET_CLASS (parent_class)->map (widget);
+}
+
+static void
+gtk_dir_selection_finalize (GObject *object)
+{
+  GtkDirSelection *filesel = GTK_DIR_SELECTION (object);
+
+  g_free (filesel->fileop_file);
+
+  G_OBJECT_CLASS (parent_class)->finalize (object);
+}
+
+/* Begin file operations callbacks */
+
+static void
+gtk_dir_selection_fileop_error (GtkDirSelection *fs,
+                                gchar            *error_message)
+{
+  GtkWidget *dialog;
+    
+  g_return_if_fail (error_message != NULL);
+
+  /* main dialog */
+  dialog = gtk_message_dialog_new (GTK_WINDOW (fs),
+                                  GTK_DIALOG_DESTROY_WITH_PARENT,
+                                  GTK_MESSAGE_ERROR,
+                                  GTK_BUTTONS_CLOSE,
+                                  "%s", error_message);
+
+  /* yes, we free it */
+  g_free (error_message);
+
+  gtk_window_set_modal (GTK_WINDOW (dialog), TRUE);
+  g_signal_connect_swapped (dialog, "response",
+                           G_CALLBACK (gtk_widget_destroy),
+                           dialog);
+
+  gtk_widget_show (dialog);
+}
+
+static void
+gtk_dir_selection_fileop_destroy (GtkWidget *widget,
+                                  gpointer   data)
+{
+  GtkDirSelection *fs = data;
+
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+  
+  fs->fileop_dialog = NULL;
+}
+
+static gboolean
+entry_is_empty (GtkEntry *entry)
+{
+  const gchar *text = gtk_entry_get_text (entry);
+  
+  return *text == '\0';
+}
+
+static void
+gtk_dir_selection_fileop_entry_changed (GtkEntry   *entry,
+                                        GtkWidget  *button)
+{
+  gtk_widget_set_sensitive (button, !entry_is_empty (entry));
+}
+
+static void
+gtk_dir_selection_create_dir_confirmed (GtkWidget *widget,
+                                        gpointer   data)
+{
+  GtkDirSelection *fs = data;
+  const gchar *dirname;
+  gchar *path;
+  gchar *full_path;
+  gchar *sys_full_path;
+  gchar *buf;
+  GError *error = NULL;
+  CompletionState *cmpl_state;
+  
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+
+  dirname = gtk_entry_get_text (GTK_ENTRY (fs->fileop_entry));
+  cmpl_state = (CompletionState*) fs->cmpl_state;
+  path = cmpl_reference_position (cmpl_state);
+  
+  full_path = g_strconcat (path, G_DIR_SEPARATOR_S, dirname, NULL);
+  sys_full_path = g_filename_from_utf8 (full_path, -1, NULL, NULL, &error);
+  if (error)
+    {
+      if (g_error_matches (error, G_CONVERT_ERROR, G_CONVERT_ERROR_ILLEGAL_SEQUENCE))
+       buf = g_strdup_printf (_("The folder name \"%s\" contains symbols that are not allowed in filenames"), dirname);
+      else
+       buf = g_strdup_printf (_("Error creating folder \"%s\": %s\n%s"), dirname, error->message,
+                              _("You probably used symbols not allowed in filenames."));
+      gtk_dir_selection_fileop_error (fs, buf);
+      g_error_free (error);
+      goto out;
+    }
+
+  if (mkdir (sys_full_path, 0755) < 0) 
+    {
+      buf = g_strdup_printf (_("Error creating folder \"%s\": %s\n"), dirname,
+                            g_strerror (errno));
+      gtk_dir_selection_fileop_error (fs, buf);
+    }
+
+ out:
+  g_free (full_path);
+  g_free (sys_full_path);
+  
+  gtk_widget_destroy (fs->fileop_dialog);
+  gtk_dir_selection_populate (fs, "", FALSE, FALSE);
+}
+  
+static void
+gtk_dir_selection_create_dir (GtkWidget *widget,
+                              gpointer   data)
+{
+  GtkDirSelection *fs = data;
+  GtkWidget *label;
+  GtkWidget *dialog;
+  GtkWidget *vbox;
+  GtkWidget *button;
+
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+
+  if (fs->fileop_dialog)
+    return;
+  
+  /* main dialog */
+  dialog = gtk_dialog_new ();
+  fs->fileop_dialog = dialog;
+  g_signal_connect (dialog, "destroy",
+                   G_CALLBACK (gtk_dir_selection_fileop_destroy),
+                   fs);
+  gtk_window_set_title (GTK_WINDOW (dialog), _("New Folder"));
+  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);
+  gtk_window_set_transient_for (GTK_WINDOW (dialog), GTK_WINDOW (fs));
+
+  /* If file dialog is grabbed, grab option dialog */
+  /* When option dialog is closed, file dialog will be grabbed again */
+  if (GTK_WINDOW (fs)->modal)
+      gtk_window_set_modal (GTK_WINDOW (dialog), TRUE);
+
+  vbox = gtk_vbox_new (FALSE, 0);
+  gtk_container_set_border_width (GTK_CONTAINER (vbox), 8);
+  gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox), vbox,
+                    FALSE, FALSE, 0);
+  gtk_widget_show( vbox);
+  
+  label = gtk_label_new_with_mnemonic (_("_Folder name:"));
+  gtk_misc_set_alignment(GTK_MISC (label), 0.0, 0.0);
+  gtk_box_pack_start (GTK_BOX (vbox), label, FALSE, FALSE, 5);
+  gtk_widget_show (label);
+
+  /*  The directory entry widget  */
+  fs->fileop_entry = gtk_entry_new ();
+  gtk_label_set_mnemonic_widget (GTK_LABEL (label), fs->fileop_entry);
+  gtk_box_pack_start (GTK_BOX (vbox), fs->fileop_entry, 
+                     TRUE, TRUE, 5);
+  GTK_WIDGET_SET_FLAGS (fs->fileop_entry, GTK_CAN_DEFAULT);
+  gtk_widget_show (fs->fileop_entry);
+  
+  /* buttons */
+  button = gtk_button_new_from_stock (GTK_STOCK_CANCEL);
+  g_signal_connect_swapped (button, "clicked",
+                           G_CALLBACK (gtk_widget_destroy),
+                           dialog);
+  gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->action_area),
+                    button, TRUE, TRUE, 0);
+  GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
+  gtk_widget_grab_default (button);
+  gtk_widget_show (button);
+
+  gtk_widget_grab_focus (fs->fileop_entry);
+
+  button = gtk_button_new_with_mnemonic (_("C_reate"));
+  gtk_widget_set_sensitive (button, FALSE);
+  g_signal_connect (button, "clicked",
+                   G_CALLBACK (gtk_dir_selection_create_dir_confirmed),
+                   fs);
+  g_signal_connect (fs->fileop_entry, "changed",
+                    G_CALLBACK (gtk_dir_selection_fileop_entry_changed),
+                   button);
+
+  gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->action_area),
+                    button, TRUE, TRUE, 0);
+  GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
+  gtk_widget_show (button);
+  
+  gtk_widget_show (dialog);
+}
+
+static void
+gtk_dir_selection_delete_dir_response (GtkDialog *dialog, 
+                                         gint       response_id,
+                                         gpointer   data)
+{
+  GtkDirSelection *fs = data;
+  CompletionState *cmpl_state;
+  gchar *path;
+  gchar *full_path;
+  gchar *sys_full_path;
+  GError *error = NULL;
+  gchar *buf;
+  
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+
+  if (response_id != GTK_RESPONSE_OK)
+    {
+      gtk_widget_destroy (GTK_WIDGET (dialog));
+      return;
+    }
+
+  cmpl_state = (CompletionState*) fs->cmpl_state;
+  path = cmpl_reference_position (cmpl_state);
+  
+  full_path = g_strconcat (path, G_DIR_SEPARATOR_S, fs->fileop_file, NULL);
+  sys_full_path = g_filename_from_utf8 (full_path, -1, NULL, NULL, &error);
+  if (error)
+    {
+      if (g_error_matches (error, G_CONVERT_ERROR, G_CONVERT_ERROR_ILLEGAL_SEQUENCE))
+       buf = g_strdup_printf (_("The filename \"%s\" contains symbols that are not allowed in filenames"),
+                              fs->fileop_file);
+      else
+       buf = g_strdup_printf (_("Error deleting file \"%s\": %s\n%s"),
+                              fs->fileop_file, error->message,
+                              _("It probably contains symbols not allowed in filenames."));
+      
+      gtk_dir_selection_fileop_error (fs, buf);
+      g_error_free (error);
+      goto out;
+    }
+
+  if (unlink (sys_full_path) < 0) 
+    {
+      buf = g_strdup_printf (_("Error deleting file \"%s\": %s"),
+                            fs->fileop_file, g_strerror (errno));
+      gtk_dir_selection_fileop_error (fs, buf);
+    }
+  
+ out:
+  g_free (full_path);
+  g_free (sys_full_path);
+  
+  gtk_widget_destroy (fs->fileop_dialog);
+  gtk_dir_selection_populate (fs, "", FALSE, TRUE);
+}
+
+static void
+gtk_dir_selection_delete_file (GtkWidget *widget,
+                               gpointer   data)
+{
+  GtkDirSelection *fs = data;
+  GtkWidget *dialog;
+  const gchar *filename;
+  
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+
+  if (fs->fileop_dialog)
+    return;
+
+#ifdef G_WITH_CYGWIN
+  translate_win32_path (fs);
+#endif
+
+  filename = gtk_entry_get_text (GTK_ENTRY (fs->selection_entry));
+  if (strlen (filename) < 1)
+    return;
+
+  g_free (fs->fileop_file);
+  fs->fileop_file = g_strdup (filename);
+  
+  /* main dialog */
+  fs->fileop_dialog = dialog = 
+    gtk_message_dialog_new (GTK_WINDOW (fs),
+                            GTK_WINDOW (fs)->modal ? GTK_DIALOG_MODAL : 0,
+                            GTK_MESSAGE_QUESTION,
+                            GTK_BUTTONS_NONE,
+                            _("Really delete file \"%s\" ?"), filename);
+
+  g_signal_connect (dialog, "destroy",
+                   G_CALLBACK (gtk_dir_selection_fileop_destroy),
+                   fs);
+  gtk_window_set_title (GTK_WINDOW (dialog), _("Delete File"));
+  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);
+  
+  /* buttons */
+  gtk_dialog_add_buttons (GTK_DIALOG (dialog),
+                          GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
+                          GTK_STOCK_DELETE, GTK_RESPONSE_OK,
+                          NULL);
+
+  gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_CANCEL);
+
+  g_signal_connect (dialog, "response",
+                    G_CALLBACK (gtk_dir_selection_delete_dir_response),
+                    fs);
+  
+  gtk_widget_show (dialog);
+}
+
+static void
+gtk_dir_selection_rename_dir_confirmed (GtkWidget *widget,
+                                         gpointer   data)
+{
+  GtkDirSelection *fs = data;
+  gchar *buf;
+  const gchar *file;
+  gchar *path;
+  gchar *new_filename;
+  gchar *old_filename;
+  gchar *sys_new_filename;
+  gchar *sys_old_filename;
+  CompletionState *cmpl_state;
+  GError *error = NULL;
+  
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+
+  file = gtk_entry_get_text (GTK_ENTRY (fs->fileop_entry));
+  cmpl_state = (CompletionState*) fs->cmpl_state;
+  path = cmpl_reference_position (cmpl_state);
+  
+  new_filename = g_strconcat (path, G_DIR_SEPARATOR_S, file, NULL);
+  old_filename = g_strconcat (path, G_DIR_SEPARATOR_S, fs->fileop_file, NULL);
+
+  sys_new_filename = g_filename_from_utf8 (new_filename, -1, NULL, NULL, &error);
+  if (error)
+    {
+      if (g_error_matches (error, G_CONVERT_ERROR, G_CONVERT_ERROR_ILLEGAL_SEQUENCE))
+       buf = g_strdup_printf (_("The file name \"%s\" contains symbols that are not allowed in filenames"), new_filename);
+      else
+       buf = g_strdup_printf (_("Error renaming file to \"%s\": %s\n%s"),
+                              new_filename, error->message,
+                              _("You probably used symbols not allowed in filenames."));
+      gtk_dir_selection_fileop_error (fs, buf);
+      g_error_free (error);
+      goto out1;
+    }
+
+  sys_old_filename = g_filename_from_utf8 (old_filename, -1, NULL, NULL, &error);
+  if (error)
+    {
+      if (g_error_matches (error, G_CONVERT_ERROR, G_CONVERT_ERROR_ILLEGAL_SEQUENCE))
+       buf = g_strdup_printf (_("The file name \"%s\" contains symbols that are not allowed in filenames"), old_filename);
+      else
+       buf = g_strdup_printf (_("Error renaming file \"%s\": %s\n%s"),
+                              old_filename, error->message,
+                              _("It probably contains symbols not allowed in filenames."));
+      gtk_dir_selection_fileop_error (fs, buf);
+      g_error_free (error);
+      goto out2;
+    }
+  
+  if (rename (sys_old_filename, sys_new_filename) < 0) 
+    {
+      buf = g_strdup_printf (_("Error renaming file \"%s\" to \"%s\": %s"),
+                            sys_old_filename, sys_new_filename,
+                            g_strerror (errno));
+      gtk_dir_selection_fileop_error (fs, buf);
+      goto out2;
+    }
+  
+  gtk_dir_selection_populate (fs, "", FALSE, FALSE);
+  gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), file);
+  
+ out2:
+  g_free (sys_old_filename);
+
+ out1:
+  g_free (new_filename);
+  g_free (old_filename);
+  g_free (sys_new_filename);
+  
+  gtk_widget_destroy (fs->fileop_dialog);
+}
+  
+static void
+gtk_dir_selection_rename_file (GtkWidget *widget,
+                               gpointer   data)
+{
+  GtkDirSelection *fs = data;
+  GtkWidget *label;
+  GtkWidget *dialog;
+  GtkWidget *vbox;
+  GtkWidget *button;
+  gchar *buf;
+  
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+
+  if (fs->fileop_dialog)
+         return;
+
+  g_free (fs->fileop_file);
+  fs->fileop_file = g_strdup (gtk_entry_get_text (GTK_ENTRY (fs->selection_entry)));
+  if (strlen (fs->fileop_file) < 1)
+    return;
+  
+  /* main dialog */
+  fs->fileop_dialog = dialog = gtk_dialog_new ();
+  g_signal_connect (dialog, "destroy",
+                   G_CALLBACK (gtk_dir_selection_fileop_destroy),
+                   fs);
+  gtk_window_set_title (GTK_WINDOW (dialog), _("Rename File"));
+  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);
+  gtk_window_set_transient_for (GTK_WINDOW (dialog), GTK_WINDOW (fs));
+
+  /* If file dialog is grabbed, grab option dialog */
+  /* When option dialog  closed, file dialog will be grabbed again */
+  if (GTK_WINDOW (fs)->modal)
+    gtk_window_set_modal (GTK_WINDOW (dialog), TRUE);
+  
+  vbox = gtk_vbox_new (FALSE, 0);
+  gtk_container_set_border_width (GTK_CONTAINER (vbox), 8);
+  gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox), vbox,
+                     FALSE, FALSE, 0);
+  gtk_widget_show(vbox);
+  
+  buf = g_strdup_printf (_("Rename file \"%s\" to:"), fs->fileop_file);
+  label = gtk_label_new (buf);
+  gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.0);
+  gtk_box_pack_start (GTK_BOX (vbox), label, FALSE, FALSE, 5);
+  gtk_widget_show (label);
+  g_free (buf);
+
+  /* New filename entry */
+  fs->fileop_entry = gtk_entry_new ();
+  gtk_box_pack_start (GTK_BOX (vbox), fs->fileop_entry, 
+                     TRUE, TRUE, 5);
+  GTK_WIDGET_SET_FLAGS (fs->fileop_entry, GTK_CAN_DEFAULT);
+  gtk_widget_show (fs->fileop_entry);
+  
+  gtk_entry_set_text (GTK_ENTRY (fs->fileop_entry), fs->fileop_file);
+  gtk_editable_select_region (GTK_EDITABLE (fs->fileop_entry),
+                             0, strlen (fs->fileop_file));
+
+  /* buttons */
+  button = gtk_button_new_from_stock (GTK_STOCK_CANCEL);
+  g_signal_connect_swapped (button, "clicked",
+                           G_CALLBACK (gtk_widget_destroy),
+                           dialog);
+  gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->action_area),
+                     button, TRUE, TRUE, 0);
+  GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
+  gtk_widget_grab_default (button);
+  gtk_widget_show (button);
+
+  gtk_widget_grab_focus (fs->fileop_entry);
+
+  button = gtk_button_new_with_mnemonic (_("_Rename"));
+  g_signal_connect (button, "clicked",
+                   G_CALLBACK (gtk_dir_selection_rename_dir_confirmed),
+                   fs);
+  g_signal_connect (fs->fileop_entry, "changed",
+                   G_CALLBACK (gtk_dir_selection_fileop_entry_changed),
+                   button);
+
+  gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->action_area),
+                     button, TRUE, TRUE, 0);
+  GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
+  gtk_widget_show (button);
+  
+  gtk_widget_show (dialog);
+}
+
+static gint
+gtk_dir_selection_insert_text (GtkWidget   *widget,
+                               const gchar *new_text,
+                               gint         new_text_length,
+                               gint        *position,
+                               gpointer     user_data)
+{
+  gchar *filename;
+
+  filename = g_filename_from_utf8 (new_text, new_text_length, NULL, NULL, NULL);
+
+  if (!filename)
+    {
+      gdk_display_beep (gtk_widget_get_display (widget));
+      g_signal_stop_emission_by_name (widget, "insert_text");
+      return FALSE;
+    }
+  
+  g_free (filename);
+  
+  return TRUE;
+}
+
+static void
+gtk_dir_selection_update_fileops (GtkDirSelection *fs)
+{
+  gboolean sensitive;
+
+  if (!fs->selection_entry)
+    return;
+
+  sensitive = !entry_is_empty (GTK_ENTRY (fs->selection_entry));
+
+  if (fs->fileop_del_file)
+    gtk_widget_set_sensitive (fs->fileop_del_file, sensitive);
+  
+  if (fs->fileop_ren_file)
+    gtk_widget_set_sensitive (fs->fileop_ren_file, sensitive);
+}
+
+static gint
+gtk_dir_selection_key_press (GtkWidget   *widget,
+                             GdkEventKey *event,
+                             gpointer     user_data)
+{
+  GtkDirSelection *fs;
+  char *text;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (event != NULL, FALSE);
+
+  if ((event->keyval == GDK_Tab || event->keyval == GDK_KP_Tab) &&
+      (event->state & gtk_accelerator_get_default_mod_mask ()) == 0)
+    {
+      fs = GTK_DIR_SELECTION (user_data);
+#ifdef G_WITH_CYGWIN
+      translate_win32_path (fs);
+#endif
+      text = g_strdup (gtk_entry_get_text (GTK_ENTRY (fs->selection_entry)));
+
+      gtk_dir_selection_populate (fs, text, TRUE, TRUE);
+
+      g_free (text);
+
+      return TRUE;
+    }
+
+  return FALSE;
+}
+
+static void
+gtk_dir_selection_history_callback (GtkWidget *widget,
+                                    gpointer   data)
+{
+  GtkDirSelection *fs = data;
+  HistoryCallbackArg *callback_arg;
+  GList *list;
+
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+
+  list = fs->history_list;
+  
+  while (list) {
+    callback_arg = list->data;
+    
+    if (callback_arg->menu_item == widget)
+      {
+       gtk_dir_selection_populate (fs, callback_arg->directory, FALSE, FALSE);
+       break;
+      }
+    
+    list = list->next;
+  }
+}
+
+static void 
+gtk_dir_selection_update_history_menu (GtkDirSelection *fs,
+                                       gchar            *current_directory)
+{
+  HistoryCallbackArg *callback_arg;
+  GtkWidget *menu_item;
+  GList *list;
+  gchar *current_dir;
+  gint dir_len;
+  gint i;
+  
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+  g_return_if_fail (current_directory != NULL);
+  
+  list = fs->history_list;
+
+  if (fs->history_menu) 
+    {
+      while (list) {
+       callback_arg = list->data;
+       g_free (callback_arg->directory);
+       g_free (callback_arg);
+       list = list->next;
+      }
+      g_list_free (fs->history_list);
+      fs->history_list = NULL;
+      
+      gtk_widget_destroy (fs->history_menu);
+    }
+  
+  fs->history_menu = gtk_menu_new ();
+
+  current_dir = g_strdup (current_directory);
+
+  dir_len = strlen (current_dir);
+
+  for (i = dir_len; i >= 0; i--)
+    {
+      /* the i == dir_len is to catch the full path for the first 
+       * entry. */
+      if ( (current_dir[i] == G_DIR_SEPARATOR) || (i == dir_len))
+       {
+         /* another small hack to catch the full path */
+         if (i != dir_len) 
+                 current_dir[i + 1] = '\0';
+#ifdef G_WITH_CYGWIN
+         if (!strcmp (current_dir, "//"))
+           continue;
+#endif
+         menu_item = gtk_menu_item_new_with_label (current_dir);
+         
+         callback_arg = g_new (HistoryCallbackArg, 1);
+         callback_arg->menu_item = menu_item;
+         
+         /* since the autocompletion gets confused if you don't 
+          * supply a trailing '/' on a dir entry, set the full
+          * (current) path to "" which just refreshes the filesel */
+         if (dir_len == i)
+           {
+             callback_arg->directory = g_strdup ("");
+           }
+         else
+           {
+             callback_arg->directory = g_strdup (current_dir);
+           }
+         
+         fs->history_list = g_list_append (fs->history_list, callback_arg);
+         
+         g_signal_connect (menu_item, "activate",
+                           G_CALLBACK (gtk_dir_selection_history_callback),
+                           fs);
+         gtk_menu_shell_append (GTK_MENU_SHELL (fs->history_menu), menu_item);
+         gtk_widget_show (menu_item);
+       }
+    }
+
+  gtk_option_menu_set_menu (GTK_OPTION_MENU (fs->history_pulldown), 
+                           fs->history_menu);
+  g_free (current_dir);
+}
+
+static gchar *
+get_real_filename (gchar    *filename,
+                   gboolean  free_old)
+{
+#ifdef G_WITH_CYGWIN
+  /* Check to see if the selection was a drive selector */
+  if (isalpha (filename[0]) && (filename[1] == ':'))
+    {
+      gchar temp_filename[MAX_PATH];
+      int len;
+
+      cygwin_conv_to_posix_path (filename, temp_filename);
+
+      /* we need trailing '/'. */
+      len = strlen (temp_filename);
+      if (len > 0 && temp_filename[len-1] != '/')
+        {
+          temp_filename[len]   = '/';
+          temp_filename[len+1] = '\0';
+        }
+      
+      if (free_old)
+       g_free (filename);
+
+      return g_strdup (temp_filename);
+    }
+#endif /* G_WITH_CYGWIN */
+  return filename;
+}
+
+static void
+gtk_dir_selection_file_activate (GtkTreeView       *tree_view,
+                                 GtkTreePath       *path,
+                                 GtkTreeViewColumn *column,
+                                 gpointer           user_data)
+{
+  GtkDirSelection *fs = GTK_DIR_SELECTION (user_data);
+  GtkTreeModel *model = gtk_tree_view_get_model (tree_view);
+  GtkTreeIter iter;  
+  gchar *filename;
+  
+  gtk_tree_model_get_iter (model, &iter, path);
+  gtk_tree_model_get (model, &iter, FILE_COLUMN, &filename, -1);
+  filename = get_real_filename (filename, TRUE);
+  gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename);
+  gtk_button_clicked (GTK_BUTTON (fs->ok_button));
+
+  g_free (filename);
+}
+
+static void
+gtk_dir_selection_dir_activate (GtkTreeView       *tree_view,
+                                GtkTreePath       *path,
+                                GtkTreeViewColumn *column,
+                                gpointer           user_data)
+{
+  GtkDirSelection *fs = GTK_DIR_SELECTION (user_data);
+  GtkTreeModel *model = gtk_tree_view_get_model (tree_view);
+  GtkTreeIter iter;
+  gchar *filename;
+
+  gtk_tree_model_get_iter (model, &iter, path);
+  gtk_tree_model_get (model, &iter, DIR_COLUMN, &filename, -1);
+  filename = get_real_filename (filename, TRUE);
+  gtk_dir_selection_populate (fs, filename, FALSE, FALSE);
+  g_free (filename);
+}
+
+#if defined(G_OS_WIN32) || defined(G_WITH_CYGWIN)
+
+static void
+win32_gtk_add_drives_to_dir_list (GtkListStore *model)
+{
+  gchar *textPtr;
+  gchar buffer[128];
+  char formatBuffer[128];
+  GtkTreeIter iter;
+
+  /* Get the drives string */
+  GetLogicalDriveStrings (sizeof (buffer), buffer);
+
+  /* Add the drives as necessary */
+  textPtr = buffer;
+  while (*textPtr != '\0')
+    {
+      /* Ignore floppies (?) */
+      if ((tolower (textPtr[0]) != 'a') && (tolower (textPtr[0]) != 'b'))
+       {
+         /* Build the actual displayable string */
+         g_snprintf (formatBuffer, sizeof (formatBuffer), "%c:\\", toupper (textPtr[0]));
+
+         /* Add to the list */
+         gtk_list_store_append (model, &iter);
+         gtk_list_store_set (model, &iter, DIR_COLUMN, formatBuffer, -1);
+       }
+      textPtr += (strlen (textPtr) + 1);
+    }
+}
+#endif
+
+static gchar *
+escape_underscores (const gchar *str)
+{
+  GString *result = g_string_new (NULL);
+  while (*str)
+    {
+      if (*str == '_')
+       g_string_append_c (result, '_');
+
+      g_string_append_c (result, *str);
+      str++;
+    }
+
+  return g_string_free (result, FALSE);
+}
+
+static void
+gtk_dir_selection_populate (GtkDirSelection *fs,
+                            gchar            *rel_path,
+                            gboolean          try_complete,
+                            gboolean          reset_entry)
+{
+  CompletionState *cmpl_state;
+  PossibleCompletion* poss;
+  GtkTreeIter iter;
+  GtkListStore *dir_model;
+  GtkListStore *file_model;
+  gchar* filename;
+  gchar* rem_path = rel_path;
+  gchar* sel_text;
+  gint did_recurse = FALSE;
+  gint possible_count = 0;
+  gint selection_index = -1;
+  
+  g_return_if_fail (GTK_IS_DIR_SELECTION (fs));
+
+  cmpl_state = (CompletionState*) fs->cmpl_state;
+  poss = cmpl_completion_matches (rel_path, &rem_path, cmpl_state);
+
+  if (!cmpl_state_okay (cmpl_state))
+    {
+      /* Something went wrong. */
+      gtk_dir_selection_abort (fs);
+      return;
+    }
+
+  g_assert (cmpl_state->reference_dir);
+
+  dir_model = GTK_LIST_STORE (gtk_tree_view_get_model (GTK_TREE_VIEW (fs->dir_list)));
+  file_model = GTK_LIST_STORE (gtk_tree_view_get_model (GTK_TREE_VIEW (fs->file_list)));
+
+  gtk_list_store_clear (dir_model);
+  gtk_list_store_clear (file_model);
+
+  /* Set the dir list to include ./ and ../ */
+  gtk_list_store_append (dir_model, &iter);
+  gtk_list_store_set (dir_model, &iter, DIR_COLUMN, "." G_DIR_SEPARATOR_S, -1);
+  gtk_list_store_append (dir_model, &iter);
+  gtk_list_store_set (dir_model, &iter, DIR_COLUMN, ".." G_DIR_SEPARATOR_S, -1);
+
+  while (poss)
+    {
+      if (cmpl_is_a_completion (poss))
+        {
+          possible_count += 1;
+
+          filename = cmpl_this_completion (poss);
+
+          if (cmpl_is_directory (poss))
+            {
+              if (strcmp (filename, "." G_DIR_SEPARATOR_S) != 0 &&
+                  strcmp (filename, ".." G_DIR_SEPARATOR_S) != 0)
+               {
+                 gtk_list_store_append (dir_model, &iter);
+                 gtk_list_store_set (dir_model, &iter, DIR_COLUMN, filename, -1);
+               }
+           }
+          else
+           {
+             gtk_list_store_append (file_model, &iter);
+             gtk_list_store_set (file_model, &iter, DIR_COLUMN, filename, -1);
+            }
+       }
+
+      poss = cmpl_next_completion (cmpl_state);
+    }
+
+#if defined(G_OS_WIN32) || defined(G_WITH_CYGWIN)
+  /* For Windows, add drives as potential selections */
+  win32_gtk_add_drives_to_dir_list (dir_model);
+#endif
+
+  /* File lists are set. */
+
+  g_assert (cmpl_state->reference_dir);
+
+  if (try_complete)
+    {
+
+      /* User is trying to complete filenames, so advance the user's input
+       * string to the updated_text, which is the common leading substring
+       * of all possible completions, and if its a directory attempt
+       * attempt completions in it. */
+
+      if (cmpl_updated_text (cmpl_state)[0])
+        {
+
+          if (cmpl_updated_dir (cmpl_state))
+            {
+             gchar* dir_name = g_strdup (cmpl_updated_text (cmpl_state));
+
+              did_recurse = TRUE;
+
+              gtk_dir_selection_populate (fs, dir_name, TRUE, TRUE);
+
+              g_free (dir_name);
+            }
+          else
+            {
+             if (fs->selection_entry)
+                     gtk_entry_set_text (GTK_ENTRY (fs->selection_entry),
+                                         cmpl_updated_text (cmpl_state));
+            }
+        }
+      else
+        {
+          selection_index = cmpl_last_valid_char (cmpl_state) -
+                            (strlen (rel_path) - strlen (rem_path));
+         if (fs->selection_entry)
+           gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), rem_path);
+        }
+    }
+  else if (reset_entry)
+    {
+      if (fs->selection_entry)
+       gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), "");
+    }
+
+  if (!did_recurse)
+    {
+      if (fs->selection_entry)
+       gtk_editable_set_position (GTK_EDITABLE (fs->selection_entry),
+                                  selection_index);
+
+      if (fs->selection_entry)
+       {
+         char *escaped = escape_underscores (cmpl_reference_position (cmpl_state));
+         sel_text = g_strconcat (_("_Selection: "), escaped, NULL);
+         g_free (escaped);
+
+         gtk_label_set_text_with_mnemonic (GTK_LABEL (fs->selection_text), sel_text);
+         g_free (sel_text);
+       }
+
+      if (fs->history_pulldown) 
+       {
+         gtk_dir_selection_update_history_menu (fs, cmpl_reference_position (cmpl_state));
+       }
+      
+    }
+}
+
+static void
+gtk_dir_selection_abort (GtkDirSelection *fs)
+{
+  gchar err_buf[256];
+
+  g_snprintf (err_buf, sizeof (err_buf), _("Folder unreadable: %s"), cmpl_strerror (cmpl_errno));
+
+  /*  BEEP gdk_beep();  */
+
+  if (fs->selection_entry)
+    gtk_label_set_text (GTK_LABEL (fs->selection_text), err_buf);
+}
+
+/**
+ * gtk_dir_selection_set_select_multiple:
+ * @filesel: a #GtkDirSelection
+ * @select_multiple: whether or not the user is allowed to select multiple
+ * files in the file list.
+ *
+ * Sets whether the user is allowed to select multiple files in the file list.
+ * Use gtk_dir_selection_get_selections () to get the list of selected files.
+ **/
+void
+gtk_dir_selection_set_select_multiple (GtkDirSelection *filesel,
+                                       gboolean          select_multiple)
+{
+  GtkTreeSelection *sel;
+  GtkSelectionMode mode;
+
+  g_return_if_fail (GTK_IS_DIR_SELECTION (filesel));
+
+  sel = gtk_tree_view_get_selection (GTK_TREE_VIEW (filesel->file_list));
+
+  mode = select_multiple ? GTK_SELECTION_MULTIPLE : GTK_SELECTION_SINGLE;
+
+  if (mode != gtk_tree_selection_get_mode (sel))
+    {
+      gtk_tree_selection_set_mode (sel, mode);
+
+      g_object_notify (G_OBJECT (filesel), "select-multiple");
+    }
+}
+
+/**
+ * gtk_dir_selection_get_select_multiple:
+ * @filesel: a #GtkDirSelection
+ *
+ * Determines whether or not the user is allowed to select multiple files in
+ * the file list. See gtk_dir_selection_set_select_multiple().
+ *
+ * Return value: %TRUE if the user is allowed to select multiple files in the
+ * file list
+ **/
+gboolean
+gtk_dir_selection_get_select_multiple (GtkDirSelection *filesel)
+{
+  GtkTreeSelection *sel;
+
+  g_return_val_if_fail (GTK_IS_DIR_SELECTION (filesel), FALSE);
+
+  sel = gtk_tree_view_get_selection (GTK_TREE_VIEW (filesel->file_list));
+  return (gtk_tree_selection_get_mode (sel) == GTK_SELECTION_MULTIPLE);
+}
+
+static void
+multiple_changed_foreach (GtkTreeModel *model,
+                         GtkTreePath  *path,
+                         GtkTreeIter  *iter,
+                         gpointer      data)
+{
+  GPtrArray *names = data;
+  gchar *filename;
+
+  gtk_tree_model_get (model, iter, FILE_COLUMN, &filename, -1);
+
+  g_ptr_array_add (names, filename);
+}
+
+static void
+free_selected_names (GPtrArray *names)
+{
+  gint i;
+
+  for (i = 0; i < names->len; i++)
+    g_free (g_ptr_array_index (names, i));
+
+  g_ptr_array_free (names, TRUE);
+}
+
+static void
+gtk_dir_selection_file_changed (GtkTreeSelection *selection,
+                                gpointer          user_data)
+{
+  GtkDirSelection *fs = GTK_DIR_SELECTION (user_data);
+  GPtrArray *new_names;
+  gchar *filename;
+  const gchar *entry;
+  gint index = -1;
+
+  new_names = g_ptr_array_sized_new (8);
+
+  gtk_tree_selection_selected_foreach (selection,
+                                      multiple_changed_foreach,
+                                      new_names);
+
+  /* nothing selected */
+  if (new_names->len == 0)
+    {
+      g_ptr_array_free (new_names, TRUE);
+
+      if (fs->selected_names != NULL)
+       {
+         free_selected_names (fs->selected_names);
+         fs->selected_names = NULL;
+       }
+
+      goto maybe_clear_entry;
+    }
+
+  if (new_names->len != 1)
+    {
+      GPtrArray *old_names = fs->selected_names;
+
+      if (old_names != NULL)
+       {
+         /* A common case is selecting a range of files from top to bottom,
+          * so quickly check for that to avoid looping over the entire list
+          */
+         if (compare_filenames (g_ptr_array_index (old_names, old_names->len - 1),
+                                g_ptr_array_index (new_names, new_names->len - 1)) != 0)
+           index = new_names->len - 1;
+         else
+           {
+             gint i = 0, j = 0, cmp;
+
+             /* do a quick diff, stopping at the first file not in the
+              * old list
+              */
+             while (i < old_names->len && j < new_names->len)
+               {
+                 cmp = compare_filenames (g_ptr_array_index (old_names, i),
+                                          g_ptr_array_index (new_names, j));
+                 if (cmp < 0)
+                   {
+                     i++;
+                   }
+                 else if (cmp == 0)
+                   {
+                     i++;
+                     j++;
+                   }
+                 else if (cmp > 0)
+                   {
+                     index = j;
+                     break;
+                   }
+               }
+
+             /* we ran off the end of the old list */
+             if (index == -1 && i < new_names->len)
+               index = j;
+           }
+       }
+      else
+       {
+         /* A phantom anchor still exists at the point where the last item
+          * was selected, which is used for subsequent range selections.
+          * So search up from there.
+          */
+         if (fs->last_selected &&
+             compare_filenames (fs->last_selected,
+                                g_ptr_array_index (new_names, 0)) == 0)
+           index = new_names->len - 1;
+         else
+           index = 0;
+       }
+    }
+  else
+    index = 0;
+
+  if (fs->selected_names != NULL)
+    free_selected_names (fs->selected_names);
+
+  fs->selected_names = new_names;
+
+  if (index != -1)
+    {
+      if (fs->last_selected != NULL)
+       g_free (fs->last_selected);
+
+      fs->last_selected = g_strdup (g_ptr_array_index (new_names, index));
+      filename = get_real_filename (fs->last_selected, FALSE);
+
+      gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename);
+
+      if (filename != fs->last_selected)
+       g_free (filename);
+      
+      return;
+    }
+  
+maybe_clear_entry:
+
+  entry = gtk_entry_get_text (GTK_ENTRY (fs->selection_entry));
+  if ((entry != NULL) && (fs->last_selected != NULL) &&
+      (compare_filenames (entry, fs->last_selected) == 0))
+    gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), "");
+}
+
+static void
+gtk_dir_selection_dir_changed (GtkTreeSelection *selection,
+                                gpointer          user_data)
+{
+  GtkDirSelection *fs = GTK_DIR_SELECTION (user_data);
+  GPtrArray *new_names;
+  gchar *filename;
+  const gchar *entry;
+  gint index = -1;
+
+  new_names = g_ptr_array_sized_new (8);
+
+  gtk_tree_selection_selected_foreach (selection,
+                                      multiple_changed_foreach,
+                                      new_names);
+
+  /* nothing selected */
+  if (new_names->len == 0)
+    {
+      g_ptr_array_free (new_names, TRUE);
+
+      if (fs->selected_names != NULL)
+       {
+         free_selected_names (fs->selected_names);
+         fs->selected_names = NULL;
+       }
+
+      goto maybe_clear_entry;
+    }
+
+  if (new_names->len != 1)
+    {
+      GPtrArray *old_names = fs->selected_names;
+
+      if (old_names != NULL)
+       {
+         /* A common case is selecting a range of files from top to bottom,
+          * so quickly check for that to avoid looping over the entire list
+          */
+         if (compare_filenames (g_ptr_array_index (old_names, old_names->len - 1),
+                                g_ptr_array_index (new_names, new_names->len - 1)) != 0)
+           index = new_names->len - 1;
+         else
+           {
+             gint i = 0, j = 0, cmp;
+
+             /* do a quick diff, stopping at the first file not in the
+              * old list
+              */
+             while (i < old_names->len && j < new_names->len)
+               {
+                 cmp = compare_filenames (g_ptr_array_index (old_names, i),
+                                          g_ptr_array_index (new_names, j));
+                 if (cmp < 0)
+                   {
+                     i++;
+                   }
+                 else if (cmp == 0)
+                   {
+                     i++;
+                     j++;
+                   }
+                 else if (cmp > 0)
+                   {
+                     index = j;
+                     break;
+                   }
+               }
+
+             /* we ran off the end of the old list */
+             if (index == -1 && i < new_names->len)
+               index = j;
+           }
+       }
+      else
+       {
+         /* A phantom anchor still exists at the point where the last item
+          * was selected, which is used for subsequent range selections.
+          * So search up from there.
+          */
+         if (fs->last_selected &&
+             compare_filenames (fs->last_selected,
+                                g_ptr_array_index (new_names, 0)) == 0)
+           index = new_names->len - 1;
+         else
+           index = 0;
+       }
+    }
+  else
+    index = 0;
+
+  if (fs->selected_names != NULL)
+    free_selected_names (fs->selected_names);
+
+  fs->selected_names = new_names;
+
+  if (index != -1)
+    {
+      gchar * err, str[256];
+      err = gtk_label_get_text (GTK_LABEL (fs->selection_text));
+      err += 11;  //pass over "Selection: "
+      sprintf(str,"%s\0",err);
+      
+      
+      if (fs->last_selected != NULL)
+       g_free (fs->last_selected);
+
+      fs->last_selected = g_strdup (g_ptr_array_index (new_names, index));
+      filename = get_real_filename (fs->last_selected, FALSE);
+      
+      strcat(str,"/");
+      strcat(str,filename);
+      str[strlen(str)-1] = '\0';
+
+      gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), str);
+
+      if (filename != fs->last_selected)
+       g_free (filename);
+      
+      return;
+    }
+  
+maybe_clear_entry:
+
+  entry = gtk_entry_get_text (GTK_ENTRY (fs->selection_entry));
+  if ((entry != NULL) && (fs->last_selected != NULL) &&
+      (compare_filenames (entry, fs->last_selected) == 0))
+    gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), "");
+}
+
+/**
+ * gtk_dir_selection_get_selections:
+ * @filesel: a #GtkDirSelection
+ *
+ * Retrieves the list of file selections the user has made in the dialog box.
+ * This function is intended for use when the user can select multiple files
+ * in the file list. The first file in the list is equivalent to what
+ * gtk_dir_selection_get_filename() would return.
+ *
+ * The filenames are in the encoding of g_filename_from_utf8(), which may or 
+ * may not be the same as that used by GTK+ (UTF-8). To convert to UTF-8, call
+ * g_filename_to_utf8() on each string.
+ *
+ * Return value: a newly-allocated %NULL-terminated array of strings. Use
+ * g_strfreev() to free it.
+ **/
+gchar **
+gtk_dir_selection_get_selections (GtkDirSelection *filesel)
+{
+  GPtrArray *names;
+  gchar **selections;
+  gchar *filename, *dirname;
+  gchar *current, *buf;
+  gint i, count;
+  gboolean unselected_entry;
+
+  g_return_val_if_fail (GTK_IS_DIR_SELECTION (filesel), NULL);
+
+  filename = g_strdup (gtk_dir_selection_get_filename (filesel));
+
+  if (strlen (filename) == 0)
+    {
+      g_free (filename);
+      return NULL;
+    }
+
+  names = filesel->selected_names;
+
+  if (names != NULL)
+    selections = g_new (gchar *, names->len + 2);
+  else
+    selections = g_new (gchar *, 2);
+
+  count = 0;
+  unselected_entry = TRUE;
+
+  if (names != NULL)
+    {
+      dirname = g_path_get_dirname (filename);
+
+      for (i = 0; i < names->len; i++)
+       {
+         buf = g_filename_from_utf8 (g_ptr_array_index (names, i), -1,
+                                     NULL, NULL, NULL);
+         current = g_build_filename (dirname, buf, NULL);
+         g_free (buf);
+
+         selections[count++] = current;
+
+         if (unselected_entry && compare_filenames (current, filename) == 0)
+           unselected_entry = FALSE;
+       }
+
+      g_free (dirname);
+    }
+
+  if (unselected_entry)
+    selections[count++] = filename;
+  else
+    g_free (filename);
+
+  selections[count] = NULL;
+
+  return selections;
+}
+
+/**********************************************************************/
+/*                       External Interface                          */
+/**********************************************************************/
+
+/* The four completion state selectors
+ */
+static gchar*
+cmpl_updated_text (CompletionState *cmpl_state)
+{
+  return cmpl_state->updated_text;
+}
+
+static gboolean
+cmpl_updated_dir (CompletionState *cmpl_state)
+{
+  return cmpl_state->re_complete;
+}
+
+static gchar*
+cmpl_reference_position (CompletionState *cmpl_state)
+{
+  return cmpl_state->reference_dir->fullname;
+}
+
+static gint
+cmpl_last_valid_char (CompletionState *cmpl_state)
+{
+  return cmpl_state->last_valid_char;
+}
+
+static const gchar*
+cmpl_completion_fullname (const gchar     *text,
+                         CompletionState *cmpl_state)
+{
+  static const char nothing[2] = "";
+
+  if (!cmpl_state_okay (cmpl_state))
+    {
+      return nothing;
+    }
+  else if (g_path_is_absolute (text))
+    {
+      strcpy (cmpl_state->updated_text, text);
+    }
+#ifdef HAVE_PWD_H
+  else if (text[0] == '~')
+    {
+      CompletionDir* dir;
+      char* slash;
+
+      dir = open_user_dir (text, cmpl_state);
+
+      if (!dir)
+       {
+         /* spencer says just return ~something, so
+          * for now just do it. */
+         strcpy (cmpl_state->updated_text, text);
+       }
+      else
+       {
+
+         strcpy (cmpl_state->updated_text, dir->fullname);
+
+         slash = strchr (text, G_DIR_SEPARATOR);
+
+         if (slash)
+           strcat (cmpl_state->updated_text, slash);
+       }
+    }
+#endif
+  else
+    {
+      strcpy (cmpl_state->updated_text, cmpl_state->reference_dir->fullname);
+      if (cmpl_state->updated_text[strlen (cmpl_state->updated_text) - 1] != G_DIR_SEPARATOR)
+       strcat (cmpl_state->updated_text, G_DIR_SEPARATOR_S);
+      strcat (cmpl_state->updated_text, text);
+    }
+
+  return cmpl_state->updated_text;
+}
+
+/* The three completion selectors
+ */
+static gchar*
+cmpl_this_completion (PossibleCompletion* pc)
+{
+  return pc->text;
+}
+
+static gboolean
+cmpl_is_directory (PossibleCompletion* pc)
+{
+  return pc->is_directory;
+}
+
+static gint
+cmpl_is_a_completion (PossibleCompletion* pc)
+{
+  return pc->is_a_completion;
+}
+
+/**********************************************************************/
+/*                      Construction, deletion                       */
+/**********************************************************************/
+
+static CompletionState*
+cmpl_init_state (void)
+{
+  gchar *sys_getcwd_buf;
+  gchar *utf8_cwd;
+  CompletionState *new_state;
+
+  new_state = g_new (CompletionState, 1);
+
+  /* g_get_current_dir() returns a string in the "system" charset */
+  sys_getcwd_buf = g_get_current_dir ();
+  utf8_cwd = g_filename_to_utf8 (sys_getcwd_buf, -1, NULL, NULL, NULL);
+  g_free (sys_getcwd_buf);
+
+tryagain:
+
+  new_state->reference_dir = NULL;
+  new_state->completion_dir = NULL;
+  new_state->active_completion_dir = NULL;
+  new_state->directory_storage = NULL;
+  new_state->directory_sent_storage = NULL;
+  new_state->last_valid_char = 0;
+  new_state->updated_text = g_new (gchar, MAXPATHLEN);
+  new_state->updated_text_alloc = MAXPATHLEN;
+  new_state->the_completion.text = g_new (gchar, MAXPATHLEN);
+  new_state->the_completion.text_alloc = MAXPATHLEN;
+  new_state->user_dir_name_buffer = NULL;
+  new_state->user_directories = NULL;
+
+  new_state->reference_dir = open_dir (utf8_cwd, new_state);
+
+  if (!new_state->reference_dir)
+    {
+      /* Directories changing from underneath us, grumble */
+      strcpy (utf8_cwd, G_DIR_SEPARATOR_S);
+      goto tryagain;
+    }
+
+  g_free (utf8_cwd);
+  return new_state;
+}
+
+static void
+cmpl_free_dir_list (GList* dp0)
+{
+  GList *dp = dp0;
+
+  while (dp)
+    {
+      free_dir (dp->data);
+      dp = dp->next;
+    }
+
+  g_list_free (dp0);
+}
+
+static void
+cmpl_free_dir_sent_list (GList* dp0)
+{
+  GList *dp = dp0;
+
+  while (dp)
+    {
+      free_dir_sent (dp->data);
+      dp = dp->next;
+    }
+
+  g_list_free (dp0);
+}
+
+static void
+cmpl_free_state (CompletionState* cmpl_state)
+{
+  g_return_if_fail (cmpl_state != NULL);
+
+  cmpl_free_dir_list (cmpl_state->directory_storage);
+  cmpl_free_dir_sent_list (cmpl_state->directory_sent_storage);
+
+  if (cmpl_state->user_dir_name_buffer)
+    g_free (cmpl_state->user_dir_name_buffer);
+  if (cmpl_state->user_directories)
+    g_free (cmpl_state->user_directories);
+  if (cmpl_state->the_completion.text)
+    g_free (cmpl_state->the_completion.text);
+  if (cmpl_state->updated_text)
+    g_free (cmpl_state->updated_text);
+
+  g_free (cmpl_state);
+}
+
+static void
+free_dir (CompletionDir* dir)
+{
+  g_free (dir->cmpl_text);
+  g_free (dir->fullname);
+  g_free (dir);
+}
+
+static void
+free_dir_sent (CompletionDirSent* sent)
+{
+  gint i;
+  for (i = 0; i < sent->entry_count; i++)
+    {
+      g_free (sent->entries[i].entry_name);
+      g_free (sent->entries[i].sort_key);
+    }
+  g_free (sent->entries);
+  g_free (sent);
+}
+
+static void
+prune_memory_usage (CompletionState *cmpl_state)
+{
+  GList* cdsl = cmpl_state->directory_sent_storage;
+  GList* cdl = cmpl_state->directory_storage;
+  GList* cdl0 = cdl;
+  gint len = 0;
+
+  for (; cdsl && len < CMPL_DIRECTORY_CACHE_SIZE; len += 1)
+    cdsl = cdsl->next;
+
+  if (cdsl)
+    {
+      cmpl_free_dir_sent_list (cdsl->next);
+      cdsl->next = NULL;
+    }
+
+  cmpl_state->directory_storage = NULL;
+  while (cdl)
+    {
+      if (cdl->data == cmpl_state->reference_dir)
+       cmpl_state->directory_storage = g_list_prepend (NULL, cdl->data);
+      else
+       free_dir (cdl->data);
+      cdl = cdl->next;
+    }
+
+  g_list_free (cdl0);
+}
+
+/**********************************************************************/
+/*                        The main entrances.                         */
+/**********************************************************************/
+
+static PossibleCompletion*
+cmpl_completion_matches (gchar           *text_to_complete,
+                        gchar          **remaining_text,
+                        CompletionState *cmpl_state)
+{
+  gchar* first_slash;
+  PossibleCompletion *poss;
+
+  prune_memory_usage (cmpl_state);
+
+  g_assert (text_to_complete != NULL);
+
+  cmpl_state->user_completion_index = -1;
+  cmpl_state->last_completion_text = text_to_complete;
+  cmpl_state->the_completion.text[0] = 0;
+  cmpl_state->last_valid_char = 0;
+  cmpl_state->updated_text_len = -1;
+  cmpl_state->updated_text[0] = 0;
+  cmpl_state->re_complete = FALSE;
+
+#ifdef HAVE_PWD_H
+  first_slash = strchr (text_to_complete, G_DIR_SEPARATOR);
+
+  if (text_to_complete[0] == '~' && !first_slash)
+    {
+      /* Text starts with ~ and there is no slash, show all the
+       * home directory completions.
+       */
+      poss = attempt_homedir_completion (text_to_complete, cmpl_state);
+
+      update_cmpl (poss, cmpl_state);
+
+      return poss;
+    }
+#endif
+  cmpl_state->reference_dir =
+    open_ref_dir (text_to_complete, remaining_text, cmpl_state);
+
+  if (!cmpl_state->reference_dir)
+    return NULL;
+
+  cmpl_state->completion_dir =
+    find_completion_dir (*remaining_text, remaining_text, cmpl_state);
+
+  cmpl_state->last_valid_char = *remaining_text - text_to_complete;
+
+  if (!cmpl_state->completion_dir)
+    return NULL;
+
+  cmpl_state->completion_dir->cmpl_index = -1;
+  cmpl_state->completion_dir->cmpl_parent = NULL;
+  cmpl_state->completion_dir->cmpl_text = g_strdup (*remaining_text);
+
+  cmpl_state->active_completion_dir = cmpl_state->completion_dir;
+
+  cmpl_state->reference_dir = cmpl_state->completion_dir;
+
+  poss = attempt_dir_completion (cmpl_state);
+
+  update_cmpl (poss, cmpl_state);
+
+  return poss;
+}
+
+static PossibleCompletion*
+cmpl_next_completion (CompletionState* cmpl_state)
+{
+  PossibleCompletion* poss = NULL;
+
+  cmpl_state->the_completion.text[0] = 0;
+
+#ifdef HAVE_PWD_H
+  if (cmpl_state->user_completion_index >= 0)
+    poss = attempt_homedir_completion (cmpl_state->last_completion_text, cmpl_state);
+  else
+    poss = attempt_dir_completion (cmpl_state);
+#else
+  poss = attempt_dir_completion (cmpl_state);
+#endif
+
+  update_cmpl (poss, cmpl_state);
+
+  return poss;
+}
+
+/**********************************************************************/
+/*                      Directory Operations                         */
+/**********************************************************************/
+
+/* Open the directory where completion will begin from, if possible. */
+static CompletionDir*
+open_ref_dir (gchar           *text_to_complete,
+             gchar          **remaining_text,
+             CompletionState *cmpl_state)
+{
+  gchar* first_slash;
+  CompletionDir *new_dir;
+
+  first_slash = strchr (text_to_complete, G_DIR_SEPARATOR);
+
+#ifdef G_WITH_CYGWIN
+  if (text_to_complete[0] == '/' && text_to_complete[1] == '/')
+    {
+      char root_dir[5];
+      g_snprintf (root_dir, sizeof (root_dir), "//%c", text_to_complete[2]);
+
+      new_dir = open_dir (root_dir, cmpl_state);
+
+      if (new_dir) {
+       *remaining_text = text_to_complete + 4;
+      }
+    }
+#else
+  if (FALSE)
+    ;
+#endif
+#ifdef HAVE_PWD_H
+  else if (text_to_complete[0] == '~')
+    {
+      new_dir = open_user_dir (text_to_complete, cmpl_state);
+
+      if (new_dir)
+       {
+         if (first_slash)
+           *remaining_text = first_slash + 1;
+         else
+           *remaining_text = text_to_complete + strlen (text_to_complete);
+       }
+      else
+       {
+         return NULL;
+       }
+    }
+#endif
+  else if (g_path_is_absolute (text_to_complete) || !cmpl_state->reference_dir)
+    {
+      gchar *tmp = g_strdup (text_to_complete);
+      gchar *p;
+
+      p = tmp;
+      while (*p && *p != '*' && *p != '?')
+       p++;
+
+      *p = '\0';
+      p = strrchr (tmp, G_DIR_SEPARATOR);
+      if (p)
+       {
+         if (p == tmp)
+           p++;
+      
+         *p = '\0';
+
+         new_dir = open_dir (tmp, cmpl_state);
+
+         if (new_dir)
+           *remaining_text = text_to_complete + 
+             ((p == tmp + 1) ? (p - tmp) : (p + 1 - tmp));
+       }
+      else
+       {
+         /* If no possible candidates, use the cwd */
+         gchar *sys_curdir = g_get_current_dir ();
+         gchar *utf8_curdir = g_filename_to_utf8 (sys_curdir, -1, NULL, NULL, NULL);
+
+         g_free (sys_curdir);
+
+         new_dir = open_dir (utf8_curdir, cmpl_state);
+
+         if (new_dir)
+           *remaining_text = text_to_complete;
+
+         g_free (utf8_curdir);
+       }
+
+      g_free (tmp);
+    }
+  else
+    {
+      *remaining_text = text_to_complete;
+
+      new_dir = open_dir (cmpl_state->reference_dir->fullname, cmpl_state);
+    }
+
+  if (new_dir)
+    {
+      new_dir->cmpl_index = -1;
+      new_dir->cmpl_parent = NULL;
+    }
+
+  return new_dir;
+}
+
+#ifdef HAVE_PWD_H
+
+/* open a directory by user name */
+static CompletionDir*
+open_user_dir (const gchar     *text_to_complete,
+              CompletionState *cmpl_state)
+{
+  CompletionDir *result;
+  gchar *first_slash;
+  gint cmp_len;
+
+  g_assert (text_to_complete && text_to_complete[0] == '~');
+
+  first_slash = strchr (text_to_complete, G_DIR_SEPARATOR);
+
+  if (first_slash)
+    cmp_len = first_slash - text_to_complete - 1;
+  else
+    cmp_len = strlen (text_to_complete + 1);
+
+  if (!cmp_len)
+    {
+      /* ~/ */
+      const gchar *homedir = g_get_home_dir ();
+      gchar *utf8_homedir = g_filename_to_utf8 (homedir, -1, NULL, NULL, NULL);
+
+      if (utf8_homedir)
+       result = open_dir (utf8_homedir, cmpl_state);
+      else
+       result = NULL;
+      
+      g_free (utf8_homedir);
+    }
+  else
+    {
+      /* ~user/ */
+      gchar* copy = g_new (char, cmp_len + 1);
+      gchar *utf8_dir;
+      struct passwd *pwd;
+
+      strncpy (copy, text_to_complete + 1, cmp_len);
+      copy[cmp_len] = 0;
+      pwd = getpwnam (copy);
+      g_free (copy);
+      if (!pwd)
+       {
+         cmpl_errno = errno;
+         return NULL;
+       }
+      utf8_dir = g_filename_to_utf8 (pwd->pw_dir, -1, NULL, NULL, NULL);
+      result = open_dir (utf8_dir, cmpl_state);
+      g_free (utf8_dir);
+    }
+  return result;
+}
+
+#endif
+
+/* open a directory relative the the current relative directory */
+static CompletionDir*
+open_relative_dir (gchar           *dir_name,
+                  CompletionDir   *dir,
+                  CompletionState *cmpl_state)
+{
+  CompletionDir *result;
+  GString *path;
+
+  path = g_string_sized_new (dir->fullname_len + strlen (dir_name) + 10);
+  g_string_assign (path, dir->fullname);
+
+  if (dir->fullname_len > 1
+      && path->str[dir->fullname_len - 1] != G_DIR_SEPARATOR)
+    g_string_append_c (path, G_DIR_SEPARATOR);
+  g_string_append (path, dir_name);
+
+  result = open_dir (path->str, cmpl_state);
+
+  g_string_free (path, TRUE);
+
+  return result;
+}
+
+/* after the cache lookup fails, really open a new directory */
+static CompletionDirSent*
+open_new_dir (gchar       *dir_name,
+             struct stat *sbuf,
+             gboolean     stat_subdirs)
+{
+  CompletionDirSent *sent;
+  GDir *directory;
+  const char *dirent;
+  GError *error = NULL;
+  gint entry_count = 0;
+  gint n_entries = 0;
+  gint i;
+  struct stat ent_sbuf;
+  GString *path;
+  gchar *sys_dir_name;
+
+  sent = g_new (CompletionDirSent, 1);
+  sent->mtime = sbuf->st_mtime;
+  sent->inode = sbuf->st_ino;
+  sent->device = sbuf->st_dev;
+
+  path = g_string_sized_new (2*MAXPATHLEN + 10);
+
+  sys_dir_name = g_filename_from_utf8 (dir_name, -1, NULL, NULL, NULL);
+  if (!sys_dir_name)
+    {
+      cmpl_errno = CMPL_ERRNO_DID_NOT_CONVERT;
+      return NULL;
+    }
+  
+  directory = g_dir_open (sys_dir_name, 0, &error);
+  if (!directory)
+    {
+      cmpl_errno = error->code; /* ??? */
+      g_free (sys_dir_name);
+      return NULL;
+    }
+
+  while ((dirent = g_dir_read_name (directory)) != NULL)
+    entry_count++;
+
+  entry_count += 2;            /* For ".",".." */
+
+  sent->entries = g_new (CompletionDirEntry, entry_count);
+  sent->entry_count = entry_count;
+
+  g_dir_rewind (directory);
+
+  for (i = 0; i < entry_count; i += 1)
+    {
+      GError *error = NULL;
+
+      if (i == 0)
+       dirent = ".";
+      else if (i == 1)
+       dirent = "..";
+      else
+       {
+         dirent = g_dir_read_name (directory);
+         if (!dirent)          /* Directory changed */
+           break;
+       }
+
+      sent->entries[n_entries].entry_name = g_filename_to_utf8 (dirent, -1, NULL, NULL, &error);
+      if (sent->entries[n_entries].entry_name == NULL
+         || !g_utf8_validate (sent->entries[n_entries].entry_name, -1, NULL))
+       {
+         gchar *escaped_str = g_strescape (dirent, NULL);
+         g_message (_("The filename \"%s\" couldn't be converted to UTF-8 "
+                      "(try setting the environment variable G_BROKEN_FILENAMES): %s"),
+                    escaped_str,
+                    error->message ? error->message : _("Invalid Utf-8"));
+         g_free (escaped_str);
+         g_clear_error (&error);
+         continue;
+       }
+      g_clear_error (&error);
+      
+      sent->entries[n_entries].sort_key = g_utf8_collate_key (sent->entries[n_entries].entry_name, -1);
+      
+      g_string_assign (path, sys_dir_name);
+      if (path->str[path->len-1] != G_DIR_SEPARATOR)
+       {
+         g_string_append_c (path, G_DIR_SEPARATOR);
+       }
+      g_string_append (path, dirent);
+
+      if (stat_subdirs)
+       {
+         /* Here we know path->str is a "system charset" string */
+         if (stat (path->str, &ent_sbuf) >= 0 && S_ISDIR (ent_sbuf.st_mode))
+           sent->entries[n_entries].is_dir = TRUE;
+         else
+           /* stat may fail, and we don't mind, since it could be a
+            * dangling symlink. */
+           sent->entries[n_entries].is_dir = FALSE;
+       }
+      else
+       sent->entries[n_entries].is_dir = 1;
+
+      n_entries++;
+    }
+  sent->entry_count = n_entries;
+  
+  g_free (sys_dir_name);
+  g_string_free (path, TRUE);
+  qsort (sent->entries, sent->entry_count, sizeof (CompletionDirEntry), compare_cmpl_dir);
+
+  g_dir_close (directory);
+
+  return sent;
+}
+
+#if !defined(G_OS_WIN32) && !defined(G_WITH_CYGWIN)
+
+static gboolean
+check_dir (gchar       *dir_name,
+          struct stat *result,
+          gboolean    *stat_subdirs)
+{
+  /* A list of directories that we know only contain other directories.
+   * Trying to stat every file in these directories would be very
+   * expensive.
+   */
+
+  static struct {
+    gchar *name;
+    gboolean present;
+    struct stat statbuf;
+  } no_stat_dirs[] = {
+    { "/afs", FALSE, { 0 } },
+    { "/net", FALSE, { 0 } }
+  };
+
+  static const gint n_no_stat_dirs = G_N_ELEMENTS (no_stat_dirs);
+  static gboolean initialized = FALSE;
+  gchar *sys_dir_name;
+  gint i;
+
+  if (!initialized)
+    {
+      initialized = TRUE;
+      for (i = 0; i < n_no_stat_dirs; i++)
+       {
+         if (stat (no_stat_dirs[i].name, &no_stat_dirs[i].statbuf) == 0)
+           no_stat_dirs[i].present = TRUE;
+       }
+    }
+
+  sys_dir_name = g_filename_from_utf8 (dir_name, -1, NULL, NULL, NULL);
+  if (!sys_dir_name)
+    {
+      cmpl_errno = CMPL_ERRNO_DID_NOT_CONVERT;
+      return FALSE;
+    }
+  
+  if (stat (sys_dir_name, result) < 0)
+    {
+      g_free (sys_dir_name);
+      cmpl_errno = errno;
+      return FALSE;
+    }
+  g_free (sys_dir_name);
+
+  *stat_subdirs = TRUE;
+  for (i = 0; i < n_no_stat_dirs; i++)
+    {
+      if (no_stat_dirs[i].present &&
+         (no_stat_dirs[i].statbuf.st_dev == result->st_dev) &&
+         (no_stat_dirs[i].statbuf.st_ino == result->st_ino))
+       {
+         *stat_subdirs = FALSE;
+         break;
+       }
+    }
+
+  return TRUE;
+}
+
+#endif
+
+/* open a directory by absolute pathname */
+static CompletionDir*
+open_dir (gchar           *dir_name,
+         CompletionState *cmpl_state)
+{
+  struct stat sbuf;
+  gboolean stat_subdirs;
+  CompletionDirSent *sent;
+  GList* cdsl;
+
+#if !defined(G_OS_WIN32) && !defined(G_WITH_CYGWIN)
+  if (!check_dir (dir_name, &sbuf, &stat_subdirs))
+    return NULL;
+
+  cdsl = cmpl_state->directory_sent_storage;
+
+  while (cdsl)
+    {
+      sent = cdsl->data;
+
+      if (sent->inode == sbuf.st_ino &&
+         sent->mtime == sbuf.st_mtime &&
+         sent->device == sbuf.st_dev)
+       return attach_dir (sent, dir_name, cmpl_state);
+
+      cdsl = cdsl->next;
+    }
+#else
+  stat_subdirs = TRUE;
+#endif
+
+  sent = open_new_dir (dir_name, &sbuf, stat_subdirs);
+
+  if (sent)
+    {
+      cmpl_state->directory_sent_storage =
+       g_list_prepend (cmpl_state->directory_sent_storage, sent);
+
+      return attach_dir (sent, dir_name, cmpl_state);
+    }
+
+  return NULL;
+}
+
+static CompletionDir*
+attach_dir (CompletionDirSent *sent,
+           gchar             *dir_name,
+           CompletionState   *cmpl_state)
+{
+  CompletionDir* new_dir;
+
+  new_dir = g_new (CompletionDir, 1);
+
+  cmpl_state->directory_storage =
+    g_list_prepend (cmpl_state->directory_storage, new_dir);
+
+  new_dir->sent = sent;
+  new_dir->fullname = g_strdup (dir_name);
+  new_dir->fullname_len = strlen (dir_name);
+  new_dir->cmpl_text = NULL;
+
+  return new_dir;
+}
+
+static gint
+correct_dir_fullname (CompletionDir* cmpl_dir)
+{
+  gint length = strlen (cmpl_dir->fullname);
+  gchar *first_slash = strchr (cmpl_dir->fullname, G_DIR_SEPARATOR);
+  gchar *sys_filename;
+  struct stat sbuf;
+
+  /* Does it end with /. (\.) ? */
+  if (length >= 2 &&
+      strcmp (cmpl_dir->fullname + length - 2, G_DIR_SEPARATOR_S ".") == 0)
+    {
+      /* Is it just the root directory (on a drive) ? */
+      if (cmpl_dir->fullname + length - 2 == first_slash)
+       {
+         cmpl_dir->fullname[length - 1] = 0;
+         cmpl_dir->fullname_len = length - 1;
+         return TRUE;
+       }
+      else
+       {
+         cmpl_dir->fullname[length - 2] = 0;
+       }
+    }
+
+  /* Ends with /./ (\.\)? */
+  else if (length >= 3 &&
+          strcmp (cmpl_dir->fullname + length - 3,
+                  G_DIR_SEPARATOR_S "." G_DIR_SEPARATOR_S) == 0)
+    cmpl_dir->fullname[length - 2] = 0;
+
+  /* Ends with /.. (\..) ? */
+  else if (length >= 3 &&
+          strcmp (cmpl_dir->fullname + length - 3,
+                  G_DIR_SEPARATOR_S "..") == 0)
+    {
+      /* Is it just /.. (X:\..)? */
+      if (cmpl_dir->fullname + length - 3 == first_slash)
+       {
+         cmpl_dir->fullname[length - 2] = 0;
+         cmpl_dir->fullname_len = length - 2;
+         return TRUE;
+       }
+
+      sys_filename = g_filename_from_utf8 (cmpl_dir->fullname, -1, NULL, NULL, NULL);
+      if (!sys_filename)
+       {
+         cmpl_errno = CMPL_ERRNO_DID_NOT_CONVERT;
+         return FALSE;
+       }
+      
+      if (stat (sys_filename, &sbuf) < 0)
+       {
+         g_free (sys_filename);
+         cmpl_errno = errno;
+         return FALSE;
+       }
+      g_free (sys_filename);
+
+      cmpl_dir->fullname[length - 3] = 0;
+
+      if (!correct_parent (cmpl_dir, &sbuf))
+       return FALSE;
+    }
+
+  /* Ends with /../ (\..\)? */
+  else if (length >= 4 &&
+          strcmp (cmpl_dir->fullname + length - 4,
+                  G_DIR_SEPARATOR_S ".." G_DIR_SEPARATOR_S) == 0)
+    {
+      /* Is it just /../ (X:\..\)? */
+      if (cmpl_dir->fullname + length - 4 == first_slash)
+       {
+         cmpl_dir->fullname[length - 3] = 0;
+         cmpl_dir->fullname_len = length - 3;
+         return TRUE;
+       }
+
+      sys_filename = g_filename_from_utf8 (cmpl_dir->fullname, -1, NULL, NULL, NULL);
+      if (!sys_filename)
+       {
+         cmpl_errno = CMPL_ERRNO_DID_NOT_CONVERT;
+         return FALSE;
+       }
+      
+      if (stat (sys_filename, &sbuf) < 0)
+       {
+         g_free (sys_filename);
+         cmpl_errno = errno;
+         return FALSE;
+       }
+      g_free (sys_filename);
+
+      cmpl_dir->fullname[length - 4] = 0;
+
+      if (!correct_parent (cmpl_dir, &sbuf))
+       return FALSE;
+    }
+
+  cmpl_dir->fullname_len = strlen (cmpl_dir->fullname);
+
+  return TRUE;
+}
+
+static gint
+correct_parent (CompletionDir *cmpl_dir,
+               struct stat   *sbuf)
+{
+  struct stat parbuf;
+  gchar *last_slash;
+  gchar *first_slash;
+  gchar *new_name;
+  gchar *sys_filename;
+  gchar c = 0;
+
+  last_slash = strrchr (cmpl_dir->fullname, G_DIR_SEPARATOR);
+  g_assert (last_slash);
+  first_slash = strchr (cmpl_dir->fullname, G_DIR_SEPARATOR);
+
+  /* Clever (?) way to check for top-level directory that works also on
+   * Win32, where there is a drive letter and colon prefixed...
+   */
+  if (last_slash != first_slash)
+    {
+      last_slash[0] = 0;
+    }
+  else
+    {
+      c = last_slash[1];
+      last_slash[1] = 0;
+    }
+
+  sys_filename = g_filename_from_utf8 (cmpl_dir->fullname, -1, NULL, NULL, NULL);
+  if (!sys_filename)
+    {
+      cmpl_errno = CMPL_ERRNO_DID_NOT_CONVERT;
+      if (!c)
+       last_slash[0] = G_DIR_SEPARATOR;
+      return FALSE;
+    }
+  
+  if (stat (sys_filename, &parbuf) < 0)
+    {
+      g_free (sys_filename);
+      cmpl_errno = errno;
+      if (!c)
+       last_slash[0] = G_DIR_SEPARATOR;
+      return FALSE;
+    }
+  g_free (sys_filename);
+
+#ifndef G_OS_WIN32             /* No inode numbers on Win32 */
+  if (parbuf.st_ino == sbuf->st_ino && parbuf.st_dev == sbuf->st_dev)
+    /* it wasn't a link */
+    return TRUE;
+
+  if (c)
+    last_slash[1] = c;
+  else
+    last_slash[0] = G_DIR_SEPARATOR;
+
+  /* it was a link, have to figure it out the hard way */
+
+  new_name = find_parent_dir_fullname (cmpl_dir->fullname);
+
+  if (!new_name)
+    return FALSE;
+
+  g_free (cmpl_dir->fullname);
+
+  cmpl_dir->fullname = new_name;
+#endif
+
+  return TRUE;
+}
+
+#ifndef G_OS_WIN32
+
+static gchar*
+find_parent_dir_fullname (gchar* dirname)
+{
+  gchar *sys_orig_dir;
+  gchar *result;
+  gchar *sys_cwd;
+  gchar *sys_dirname;
+
+  sys_orig_dir = g_get_current_dir ();
+  sys_dirname = g_filename_from_utf8 (dirname, -1, NULL, NULL, NULL);
+  if (!sys_dirname)
+    {
+      g_free (sys_orig_dir);
+      cmpl_errno = CMPL_ERRNO_DID_NOT_CONVERT;
+      return NULL;
+    }
+  
+  if (chdir (sys_dirname) != 0 || chdir ("..") != 0)
+    {
+      cmpl_errno = errno;
+      chdir (sys_orig_dir);
+      g_free (sys_dirname);
+      g_free (sys_orig_dir);
+      return NULL;
+    }
+  g_free (sys_dirname);
+
+  sys_cwd = g_get_current_dir ();
+  result = g_filename_to_utf8 (sys_cwd, -1, NULL, NULL, NULL);
+  g_free (sys_cwd);
+
+  if (chdir (sys_orig_dir) != 0)
+    {
+      cmpl_errno = errno;
+      g_free (sys_orig_dir);
+      return NULL;
+    }
+
+  g_free (sys_orig_dir);
+  return result;
+}
+
+#endif
+
+/**********************************************************************/
+/*                        Completion Operations                       */
+/**********************************************************************/
+
+#ifdef HAVE_PWD_H
+
+static PossibleCompletion*
+attempt_homedir_completion (gchar           *text_to_complete,
+                           CompletionState *cmpl_state)
+{
+  gint index, length;
+
+  if (!cmpl_state->user_dir_name_buffer &&
+      !get_pwdb (cmpl_state))
+    return NULL;
+  length = strlen (text_to_complete) - 1;
+
+  cmpl_state->user_completion_index += 1;
+
+  while (cmpl_state->user_completion_index < cmpl_state->user_directories_len)
+    {
+      index = first_diff_index (text_to_complete + 1,
+                               cmpl_state->user_directories
+                               [cmpl_state->user_completion_index].login);
+
+      switch (index)
+       {
+       case PATTERN_MATCH:
+         break;
+       default:
+         if (cmpl_state->last_valid_char < (index + 1))
+           cmpl_state->last_valid_char = index + 1;
+         cmpl_state->user_completion_index += 1;
+         continue;
+       }
+
+      cmpl_state->the_completion.is_a_completion = 1;
+      cmpl_state->the_completion.is_directory = TRUE;
+
+      append_completion_text ("~", cmpl_state);
+
+      append_completion_text (cmpl_state->
+                             user_directories[cmpl_state->user_completion_index].login,
+                             cmpl_state);
+
+      return append_completion_text (G_DIR_SEPARATOR_S, cmpl_state);
+    }
+
+  if (text_to_complete[1]
+      || cmpl_state->user_completion_index > cmpl_state->user_directories_len)
+    {
+      cmpl_state->user_completion_index = -1;
+      return NULL;
+    }
+  else
+    {
+      cmpl_state->user_completion_index += 1;
+      cmpl_state->the_completion.is_a_completion = 1;
+      cmpl_state->the_completion.is_directory = TRUE;
+
+      return append_completion_text ("~" G_DIR_SEPARATOR_S, cmpl_state);
+    }
+}
+
+#endif
+
+#if defined(G_OS_WIN32) || defined(G_WITH_CYGWIN)
+#define FOLD(c) (tolower(c))
+#else
+#define FOLD(c) (c)
+#endif
+
+/* returns the index (>= 0) of the first differing character,
+ * PATTERN_MATCH if the completion matches */
+static gint
+first_diff_index (gchar *pat,
+                 gchar *text)
+{
+  gint diff = 0;
+
+  while (*pat && *text && FOLD (*text) == FOLD (*pat))
+    {
+      pat += 1;
+      text += 1;
+      diff += 1;
+    }
+
+  if (*pat)
+    return diff;
+
+  return PATTERN_MATCH;
+}
+
+static PossibleCompletion*
+append_completion_text (gchar           *text,
+                       CompletionState *cmpl_state)
+{
+  gint len, i = 1;
+
+  if (!cmpl_state->the_completion.text)
+    return NULL;
+
+  len = strlen (text) + strlen (cmpl_state->the_completion.text) + 1;
+
+  if (cmpl_state->the_completion.text_alloc > len)
+    {
+      strcat (cmpl_state->the_completion.text, text);
+      return &cmpl_state->the_completion;
+    }
+
+  while (i < len)
+    i <<= 1;
+
+  cmpl_state->the_completion.text_alloc = i;
+
+  cmpl_state->the_completion.text = (gchar*) g_realloc (cmpl_state->the_completion.text, i);
+
+  if (!cmpl_state->the_completion.text)
+    return NULL;
+  else
+    {
+      strcat (cmpl_state->the_completion.text, text);
+      return &cmpl_state->the_completion;
+    }
+}
+
+static CompletionDir*
+find_completion_dir (gchar          *text_to_complete,
+                   gchar          **remaining_text,
+                   CompletionState *cmpl_state)
+{
+  gchar* first_slash = strchr (text_to_complete, G_DIR_SEPARATOR);
+  CompletionDir* dir = cmpl_state->reference_dir;
+  CompletionDir* next;
+  *remaining_text = text_to_complete;
+
+  while (first_slash)
+    {
+      gint len = first_slash - *remaining_text;
+      gint found = 0;
+      gchar *found_name = NULL;         /* Quiet gcc */
+      gint i;
+      gchar* pat_buf = g_new (gchar, len + 1);
+
+      strncpy (pat_buf, *remaining_text, len);
+      pat_buf[len] = 0;
+
+      for (i = 0; i < dir->sent->entry_count; i += 1)
+       {
+         if (dir->sent->entries[i].is_dir &&
+             _gtk_fnmatch (pat_buf, dir->sent->entries[i].entry_name))
+           {
+             if (found)
+               {
+                 g_free (pat_buf);
+                 return dir;
+               }
+             else
+               {
+                 found = 1;
+                 found_name = dir->sent->entries[i].entry_name;
+               }
+           }
+       }
+
+      if (!found)
+       {
+         /* Perhaps we are trying to open an automount directory */
+         found_name = pat_buf;
+       }
+
+      next = open_relative_dir (found_name, dir, cmpl_state);
+      
+      if (!next)
+       {
+         g_free (pat_buf);
+         return NULL;
+}
+      
+      next->cmpl_parent = dir;
+      
+      dir = next;
+      
+      if (!correct_dir_fullname (dir))
+       {
+         g_free (pat_buf);
+         return NULL;
+       }
+      
+      *remaining_text = first_slash + 1;
+      first_slash = strchr (*remaining_text, G_DIR_SEPARATOR);
+
+      g_free (pat_buf);
+    }
+
+  return dir;
+}
+
+static void
+update_cmpl (PossibleCompletion *poss,
+            CompletionState    *cmpl_state)
+{
+  gint cmpl_len;
+
+  if (!poss || !cmpl_is_a_completion (poss))
+    return;
+
+  cmpl_len = strlen (cmpl_this_completion (poss));
+
+  if (cmpl_state->updated_text_alloc < cmpl_len + 1)
+    {
+      cmpl_state->updated_text =
+       (gchar*)g_realloc (cmpl_state->updated_text,
+                          cmpl_state->updated_text_alloc);
+      cmpl_state->updated_text_alloc = 2*cmpl_len;
+    }
+
+  if (cmpl_state->updated_text_len < 0)
+    {
+      strcpy (cmpl_state->updated_text, cmpl_this_completion (poss));
+      cmpl_state->updated_text_len = cmpl_len;
+      cmpl_state->re_complete = cmpl_is_directory (poss);
+    }
+  else if (cmpl_state->updated_text_len == 0)
+    {
+      cmpl_state->re_complete = FALSE;
+    }
+  else
+    {
+      gint first_diff =
+       first_diff_index (cmpl_state->updated_text,
+                         cmpl_this_completion (poss));
+
+      cmpl_state->re_complete = FALSE;
+
+      if (first_diff == PATTERN_MATCH)
+       return;
+
+      if (first_diff > cmpl_state->updated_text_len)
+       strcpy (cmpl_state->updated_text, cmpl_this_completion (poss));
+
+      cmpl_state->updated_text_len = first_diff;
+      cmpl_state->updated_text[first_diff] = 0;
+    }
+}
+
+static PossibleCompletion*
+attempt_dir_completion (CompletionState *cmpl_state)
+{
+  gchar *pat_buf, *first_slash;
+  CompletionDir *dir = cmpl_state->active_completion_dir;
+
+  dir->cmpl_index += 1;
+
+  if (dir->cmpl_index == dir->sent->entry_count)
+    {
+      if (dir->cmpl_parent == NULL)
+       {
+         cmpl_state->active_completion_dir = NULL;
+
+         return NULL;
+       }
+      else
+       {
+         cmpl_state->active_completion_dir = dir->cmpl_parent;
+
+         return attempt_dir_completion (cmpl_state);
+       }
+    }
+
+  g_assert (dir->cmpl_text);
+
+  first_slash = strchr (dir->cmpl_text, G_DIR_SEPARATOR);
+
+  if (first_slash)
+    {
+      gint len = first_slash - dir->cmpl_text;
+
+      pat_buf = g_new (gchar, len + 1);
+      strncpy (pat_buf, dir->cmpl_text, len);
+      pat_buf[len] = 0;
+    }
+  else
+    {
+      gint len = strlen (dir->cmpl_text);
+
+      pat_buf = g_new (gchar, len + 2);
+      strcpy (pat_buf, dir->cmpl_text);
+      /* Don't append a * if the user entered one herself.
+       * This way one can complete *.h and don't get matches
+       * on any .help files, for instance.
+       */
+      if (strchr (pat_buf, '*') == NULL)
+       strcpy (pat_buf + len, "*");
+    }
+
+  if (first_slash)
+    {
+      if (dir->sent->entries[dir->cmpl_index].is_dir)
+       {
+         if (_gtk_fnmatch (pat_buf, dir->sent->entries[dir->cmpl_index].entry_name))
+           {
+             CompletionDir* new_dir;
+
+             new_dir = open_relative_dir (dir->sent->entries[dir->cmpl_index].entry_name,
+                                          dir, cmpl_state);
+
+             if (!new_dir)
+               {
+                 g_free (pat_buf);
+                 return NULL;
+               }
+
+             new_dir->cmpl_parent = dir;
+
+             new_dir->cmpl_index = -1;
+             new_dir->cmpl_text = g_strdup (first_slash + 1);
+
+             cmpl_state->active_completion_dir = new_dir;
+
+             g_free (pat_buf);
+             return attempt_dir_completion (cmpl_state);
+           }
+         else
+           {
+             g_free (pat_buf);
+             return attempt_dir_completion (cmpl_state);
+           }
+       }
+      else
+       {
+         g_free (pat_buf);
+         return attempt_dir_completion (cmpl_state);
+       }
+    }
+  else
+    {
+      if (dir->cmpl_parent != NULL)
+       {
+         append_completion_text (dir->fullname +
+                                 strlen (cmpl_state->completion_dir->fullname) + 1,
+                                 cmpl_state);
+         append_completion_text (G_DIR_SEPARATOR_S, cmpl_state);
+       }
+
+      append_completion_text (dir->sent->entries[dir->cmpl_index].entry_name, cmpl_state);
+
+      cmpl_state->the_completion.is_a_completion =
+       _gtk_fnmatch (pat_buf, dir->sent->entries[dir->cmpl_index].entry_name);
+
+      cmpl_state->the_completion.is_directory = dir->sent->entries[dir->cmpl_index].is_dir;
+      if (dir->sent->entries[dir->cmpl_index].is_dir)
+       append_completion_text (G_DIR_SEPARATOR_S, cmpl_state);
+
+      g_free (pat_buf);
+      return &cmpl_state->the_completion;
+    }
+}
+
+#ifdef HAVE_PWD_H
+
+static gint
+get_pwdb (CompletionState* cmpl_state)
+{
+  struct passwd *pwd_ptr;
+  gchar* buf_ptr;
+  gchar *utf8;
+  gint len = 0, i, count = 0;
+
+  if (cmpl_state->user_dir_name_buffer)
+    return TRUE;
+  setpwent ();
+
+  while ((pwd_ptr = getpwent ()) != NULL)
+    {
+      utf8 = g_filename_to_utf8 (pwd_ptr->pw_name, -1, NULL, NULL, NULL);
+      len += strlen (utf8);
+      g_free (utf8);
+      utf8 = g_filename_to_utf8 (pwd_ptr->pw_dir, -1, NULL, NULL, NULL);
+      len += strlen (utf8);
+      g_free (utf8);
+      len += 2;
+      count += 1;
+    }
+
+  setpwent ();
+
+  cmpl_state->user_dir_name_buffer = g_new (gchar, len);
+  cmpl_state->user_directories = g_new (CompletionUserDir, count);
+  cmpl_state->user_directories_len = count;
+
+  buf_ptr = cmpl_state->user_dir_name_buffer;
+
+  for (i = 0; i < count; i += 1)
+    {
+      pwd_ptr = getpwent ();
+      if (!pwd_ptr)
+       {
+         cmpl_errno = errno;
+         goto error;
+       }
+
+      utf8 = g_filename_to_utf8 (pwd_ptr->pw_name, -1, NULL, NULL, NULL);
+      strcpy (buf_ptr, utf8);
+      g_free (utf8);
+
+      cmpl_state->user_directories[i].login = buf_ptr;
+
+      buf_ptr += strlen (buf_ptr);
+      buf_ptr += 1;
+
+      utf8 = g_filename_to_utf8 (pwd_ptr->pw_dir, -1, NULL, NULL, NULL);
+      strcpy (buf_ptr, utf8);
+      g_free (utf8);
+
+      cmpl_state->user_directories[i].homedir = buf_ptr;
+
+      buf_ptr += strlen (buf_ptr);
+      buf_ptr += 1;
+    }
+
+  qsort (cmpl_state->user_directories,
+        cmpl_state->user_directories_len,
+        sizeof (CompletionUserDir),
+        compare_user_dir);
+
+  endpwent ();
+
+  return TRUE;
+
+error:
+
+  if (cmpl_state->user_dir_name_buffer)
+    g_free (cmpl_state->user_dir_name_buffer);
+  if (cmpl_state->user_directories)
+    g_free (cmpl_state->user_directories);
+
+  cmpl_state->user_dir_name_buffer = NULL;
+  cmpl_state->user_directories = NULL;
+
+  return FALSE;
+}
+
+static gint
+compare_user_dir (const void *a,
+                 const void *b)
+{
+  return strcmp ((((CompletionUserDir*)a))->login,
+                (((CompletionUserDir*)b))->login);
+}
+
+#endif
+
+static gint
+compare_cmpl_dir (const void *a,
+                 const void *b)
+{
+  
+  return strcmp (((CompletionDirEntry*)a)->sort_key,
+                (((CompletionDirEntry*)b))->sort_key);
+}
+
+static gint
+cmpl_state_okay (CompletionState* cmpl_state)
+{
+  return  cmpl_state && cmpl_state->reference_dir;
+}
+
+static const gchar*
+cmpl_strerror (gint err)
+{
+  if (err == CMPL_ERRNO_TOO_LONG)
+    return _("Name too long");
+  else if (err == CMPL_ERRNO_DID_NOT_CONVERT)
+    return _("Couldn't convert filename");
+  else
+    return g_strerror (err);
+}
+
+gchar *    gtk_dir_selection_get_dir (GtkDirSelection *filesel)
+{
+  return     gtk_entry_get_text (GTK_ENTRY (filesel->selection_entry));
+}
This page took 0.062826 seconds and 4 git commands to generate.