]> de.git.xonotic.org Git - xonotic/netradiant.git/blobdiff - radiant/gtkfilesel.c
eol style
[xonotic/netradiant.git] / radiant / gtkfilesel.c
index 58fde0bb5bb7732c2b7cb09b0a71d64d91340595..aacc3b99bae97b2d63a192aa170d353806f0e2fc 100644 (file)
-/*\r
-Copyright (C) 1999-2007 id Software, Inc. and contributors.\r
-For a list of contributors, see the accompanying CONTRIBUTORS file.\r
-\r
-This file is part of GtkRadiant.\r
-\r
-GtkRadiant is free software; you can redistribute it and/or modify\r
-it under the terms of the GNU General Public License as published by\r
-the Free Software Foundation; either version 2 of the License, or\r
-(at your option) any later version.\r
-\r
-GtkRadiant is distributed in the hope that it will be useful,\r
-but WITHOUT ANY WARRANTY; without even the implied warranty of\r
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
-GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License\r
-along with GtkRadiant; if not, write to the Free Software\r
-Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA\r
-*/\r
-\r
-/* GTK - The GIMP Toolkit\r
- * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald\r
- *\r
- * This library is free software; you can redistribute it and/or\r
- * modify it under the terms of the GNU Library General Public\r
- * License as published by the Free Software Foundation; either\r
- * version 2 of the License, or (at your option) any later version.\r
- *\r
- * This library is distributed in the hope that it will be useful,\r
- * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU\r
- * Library General Public License for more details.\r
- *\r
- * You should have received a copy of the GNU Library General Public\r
- * License along with this library; if not, write to the\r
- * Free Software Foundation, Inc., 59 Temple Place - Suite 330,\r
- * Boston, MA 02111-1307, USA.\r
- */\r
-\r
-/*\r
- * Modified by the GTK+ Team and others 1997-1999.  See the AUTHORS\r
- * file for a list of people on the GTK+ Team.  See the ChangeLog\r
- * files for a list of changes.  These files are distributed with\r
- * GTK+ at ftp://ftp.gtk.org/pub/gtk/. \r
- */\r
-\r
-\r
-// leo FIXME: if we keep this file then we'll need to ask permission to the author, this is LGPL\r
-// This file is from the Advanced File Selector widget \r
-// by Michael Torrie  <torriem@byu.edu>\r
-// http://students.cs.byu.edu/~torriem/gtk/\r
-\r
-#include <stdio.h>\r
-#include <sys/types.h>\r
-#include <sys/stat.h>\r
-#include <sys/param.h>\r
-#include <dirent.h>\r
-#include <stdlib.h>\r
-#include <unistd.h>\r
-#include <string.h>\r
-#include <errno.h>\r
-#include <pwd.h>\r
-#include "fnmatch.h"\r
-\r
-// leo: added "gtk/"\r
-#include "gdk/gdkkeysyms.h"\r
-#include "gtk/gtkbutton.h"\r
-#include "gtk/gtkentry.h"\r
-#include "gtkfilesel.h"\r
-#include "gtk/gtkhbox.h"\r
-#include "gtk/gtkhbbox.h"\r
-#include "gtk/gtklabel.h"\r
-#include "gtk/gtklist.h"\r
-#include "gtk/gtklistitem.h"\r
-#include "gtk/gtkmain.h"\r
-#include "gtk/gtkscrolledwindow.h"\r
-#include "gtk/gtksignal.h"\r
-#include "gtk/gtkvbox.h"\r
-#include "gtk/gtkmenu.h"\r
-#include "gtk/gtkmenuitem.h"\r
-#include "gtk/gtkoptionmenu.h"\r
-#include "gtk/gtkclist.h"\r
-#include "gtk/gtkdialog.h"\r
-#include "gtk/gtkcombo.h"\r
-#include "gtk/gtkframe.h"\r
-\r
-// leo: disable NLS\r
-//#include "gtk/gtkintl.h"\r
-#define _(String) (String)\r
-\r
-#define DIR_LIST_WIDTH   180\r
-#define DIR_LIST_HEIGHT  180\r
-#define FILE_LIST_WIDTH  180\r
-#define FILE_LIST_HEIGHT 180\r
-\r
-/* I've put this here so it doesn't get confused with the \r
- * file completion interface */\r
-typedef struct _HistoryCallbackArg HistoryCallbackArg;\r
-\r
-struct _HistoryCallbackArg\r
-{\r
-  gchar *directory;\r
-  GtkWidget *menu_item;\r
-};\r
-\r
-\r
-typedef struct _CompletionState    CompletionState;\r
-typedef struct _CompletionDir      CompletionDir;\r
-typedef struct _CompletionDirSent  CompletionDirSent;\r
-typedef struct _CompletionDirEntry CompletionDirEntry;\r
-typedef struct _CompletionUserDir  CompletionUserDir;\r
-typedef struct _PossibleCompletion PossibleCompletion;\r
-\r
-/* Non-external file completion decls and structures */\r
-\r
-/* A contant telling PRCS how many directories to cache.  Its actually\r
- * kept in a list, so the geometry isn't important. */\r
-#define CMPL_DIRECTORY_CACHE_SIZE 10\r
-\r
-/* A constant used to determine whether a substring was an exact\r
- * match by first_diff_index()\r
- */\r
-#define PATTERN_MATCH -1\r
-/* The arguments used by all fnmatch() calls below\r
- */\r
-#define FNMATCH_FLAGS (FNM_PATHNAME | FNM_PERIOD)\r
-\r
-#define CMPL_ERRNO_TOO_LONG ((1<<16)-1)\r
-\r
-/* This structure contains all the useful information about a directory\r
- * for the purposes of filename completion.  These structures are cached\r
- * in the CompletionState struct.  CompletionDir's are reference counted.\r
- */\r
-struct _CompletionDirSent\r
-{\r
-  ino_t inode;\r
-  time_t mtime;\r
-  dev_t device;\r
-\r
-  gint entry_count;\r
-  gchar *name_buffer; /* memory segment containing names of all entries */\r
-\r
-  struct _CompletionDirEntry *entries;\r
-};\r
-\r
-struct _CompletionDir\r
-{\r
-  CompletionDirSent *sent;\r
-\r
-  gchar *fullname;\r
-  gint fullname_len;\r
-\r
-  struct _CompletionDir *cmpl_parent;\r
-  gint cmpl_index;\r
-  gchar *cmpl_text;\r
-};\r
-\r
-/* This structure contains pairs of directory entry names with a flag saying\r
- * whether or not they are a valid directory.  NOTE: This information is used\r
- * to provide the caller with information about whether to update its completions\r
- * or try to open a file.  Since directories are cached by the directory mtime,\r
- * a symlink which points to an invalid file (which will not be a directory),\r
- * will not be reevaluated if that file is created, unless the containing\r
- * directory is touched.  I consider this case to be worth ignoring (josh).\r
- */\r
-struct _CompletionDirEntry\r
-{\r
-  gint is_dir;\r
-  gchar *entry_name;\r
-};\r
-\r
-struct _CompletionUserDir\r
-{\r
-  gchar *login;\r
-  gchar *homedir;\r
-};\r
-\r
-struct _PossibleCompletion\r
-{\r
-  /* accessible fields, all are accessed externally by functions\r
-   * declared above\r
-   */\r
-  gchar *text;\r
-  gint is_a_completion;\r
-  gint is_directory;\r
-\r
-  gint file_size;\r
-  gint file_time;\r
-  gint uid;\r
-  gint gid;\r
-  /* Private fields\r
-   */\r
-  gint text_alloc;\r
-};\r
-\r
-struct _CompletionState\r
-{\r
-  gint last_valid_char;\r
-  gchar *updated_text;\r
-  gint updated_text_len;\r
-  gint updated_text_alloc;\r
-  gint re_complete;\r
-\r
-  gchar *user_dir_name_buffer;\r
-  gint user_directories_len;\r
-\r
-  gchar *last_completion_text;\r
-\r
-  gint user_completion_index; /* if >= 0, currently completing ~user */\r
-\r
-  struct _CompletionDir *completion_dir; /* directory completing from */\r
-  struct _CompletionDir *active_completion_dir;\r
-\r
-  struct _PossibleCompletion the_completion;\r
-\r
-  struct _CompletionDir *reference_dir; /* initial directory */\r
-\r
-  GList* directory_storage;\r
-  GList* directory_sent_storage;\r
-\r
-  struct _CompletionUserDir *user_directories;\r
-};\r
-\r
-\r
-/* File completion functions which would be external, were they used\r
- * outside of this file.\r
- */\r
-\r
-static CompletionState*    cmpl_init_state        (void);\r
-static void                cmpl_free_state        (CompletionState *cmpl_state);\r
-static gint                cmpl_state_okay        (CompletionState* cmpl_state);\r
-static gchar*              cmpl_strerror          (gint);\r
-\r
-static PossibleCompletion* cmpl_completion_matches(gchar           *text_to_complete,\r
-                                                  gchar          **remaining_text,\r
-                                                  CompletionState *cmpl_state);\r
-\r
-/* Returns a name for consideration, possibly a completion, this name\r
- * will be invalid after the next call to cmpl_next_completion.\r
- */\r
-static char*               cmpl_this_completion   (PossibleCompletion*);\r
-\r
-/* True if this completion matches the given text.  Otherwise, this\r
- * output can be used to have a list of non-completions.\r
- */\r
-static gint                cmpl_is_a_completion   (PossibleCompletion*);\r
-\r
-/* True if the completion is a directory\r
- */\r
-static gint                cmpl_is_directory      (PossibleCompletion*);\r
-\r
-/* Obtains the next completion, or NULL\r
- */\r
-static PossibleCompletion* cmpl_next_completion   (CompletionState*);\r
-\r
-/* Updating completions: the return value of cmpl_updated_text() will\r
- * be text_to_complete completed as much as possible after the most\r
- * recent call to cmpl_completion_matches.  For the present\r
- * application, this is the suggested replacement for the user's input\r
- * string.  You must CALL THIS AFTER ALL cmpl_text_completions have\r
- * been received.\r
- */\r
-static gchar*              cmpl_updated_text       (CompletionState* cmpl_state);\r
-\r
-/* After updating, to see if the completion was a directory, call\r
- * this.  If it was, you should consider re-calling completion_matches.\r
- */\r
-static gint                cmpl_updated_dir        (CompletionState* cmpl_state);\r
-\r
-/* Current location: if using file completion, return the current\r
- * directory, from which file completion begins.  More specifically,\r
- * the cwd concatenated with all exact completions up to the last\r
- * directory delimiter('/').\r
- */\r
-static gchar*              cmpl_reference_position (CompletionState* cmpl_state);\r
-\r
-/* backing up: if cmpl_completion_matches returns NULL, you may query\r
- * the index of the last completable character into cmpl_updated_text.\r
- */\r
-static gint                cmpl_last_valid_char    (CompletionState* cmpl_state);\r
-\r
-/* When the user selects a non-directory, call cmpl_completion_fullname\r
- * to get the full name of the selected file.\r
- */\r
-static gchar*              cmpl_completion_fullname (gchar*, CompletionState* cmpl_state);\r
-\r
-\r
-/* Directory operations. */\r
-static CompletionDir* open_ref_dir         (gchar* text_to_complete,\r
-                                           gchar** remaining_text,\r
-                                           CompletionState* cmpl_state);\r
-static gboolean       check_dir            (gchar *dir_name, \r
-                                           struct stat *result, \r
-                                           gboolean *stat_subdirs);\r
-static CompletionDir* open_dir             (gchar* dir_name,\r
-                                           CompletionState* cmpl_state);\r
-static CompletionDir* open_user_dir        (gchar* text_to_complete,\r
-                                           CompletionState *cmpl_state);\r
-static CompletionDir* open_relative_dir    (gchar* dir_name, CompletionDir* dir,\r
-                                           CompletionState *cmpl_state);\r
-static CompletionDirSent* open_new_dir     (gchar* dir_name, \r
-                                           struct stat* sbuf,\r
-                                           gboolean stat_subdirs);\r
-static gint           correct_dir_fullname (CompletionDir* cmpl_dir);\r
-static gint           correct_parent       (CompletionDir* cmpl_dir,\r
-                                           struct stat *sbuf);\r
-static gchar*         find_parent_dir_fullname    (gchar* dirname);\r
-static CompletionDir* attach_dir           (CompletionDirSent* sent,\r
-                                           gchar* dir_name,\r
-                                           CompletionState *cmpl_state);\r
-static void           free_dir_sent (CompletionDirSent* sent);\r
-static void           free_dir      (CompletionDir  *dir);\r
-static void           prune_memory_usage(CompletionState *cmpl_state);\r
-\r
-/* Completion operations */\r
-static PossibleCompletion* attempt_homedir_completion(gchar* text_to_complete,\r
-                                                     CompletionState *cmpl_state);\r
-static PossibleCompletion* attempt_file_completion(CompletionState *cmpl_state);\r
-static CompletionDir* find_completion_dir(gchar* text_to_complete,\r
-                                         gchar** remaining_text,\r
-                                         CompletionState* cmpl_state);\r
-static PossibleCompletion* append_completion_text(gchar* text,\r
-                                                 CompletionState* cmpl_state);\r
-static gint get_pwdb(CompletionState* cmpl_state);\r
-static gint first_diff_index(gchar* pat, gchar* text);\r
-static gint compare_user_dir(const void* a, const void* b);\r
-static gint compare_cmpl_dir(const void* a, const void* b);\r
-static void update_cmpl(PossibleCompletion* poss,\r
-                       CompletionState* cmpl_state);\r
-\r
-static void gtk_file_selection_class_init    (GtkFileSelectionClass *klass);\r
-static void gtk_file_selection_init          (GtkFileSelection      *filesel);\r
-static void gtk_file_selection_destroy       (GtkObject             *object);\r
-static gint gtk_file_selection_key_press     (GtkWidget             *widget,\r
-                                             GdkEventKey           *event,\r
-                                             gpointer               user_data);\r
-\r
-static void gtk_file_selection_file_button (GtkWidget *widget,\r
-                                           gint row, \r
-                                           gint column, \r
-                                           GdkEventButton *bevent,\r
-                                           gpointer user_data);\r
-\r
-static void gtk_file_selection_dir_button (GtkWidget *widget,\r
-                                          gint row,\r
-                                          gint column,\r
-                                          GdkEventButton *bevent,\r
-                                          gpointer data);\r
-\r
-static void gtk_file_selection_undir_button (GtkWidget *widget,\r
-                                            gint row,\r
-                                            gint column,\r
-                                            GdkEventButton *bevent,\r
-                                            gpointer data);\r
-\r
-static void gtk_file_selection_populate      (GtkFileSelection      *fs,\r
-                                             gchar                 *rel_path,\r
-                                             gint                   try_complete);\r
-static void gtk_file_selection_abort         (GtkFileSelection      *fs);\r
-\r
-static void gtk_file_selection_update_history_menu (GtkFileSelection       *fs,\r
-                                                   gchar                  *current_dir);\r
-\r
-static void gtk_file_selection_create_dir (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_delete_file (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_rename_file (GtkWidget *widget, gpointer data);\r
-\r
-static gboolean gtk_file_selection_history_combo_callback (GtkWidget *widget, GdkEventKey *event, gpointer data);\r
-static gboolean gtk_file_selection_history_combo_list_key_handler(GtkWidget *widget,\r
-                                                                                                                                                                                       GdkEventKey *event,\r
-                                                                                                                                                                                       gpointer user_data);\r
-static gboolean gtk_file_selection_history_combo_list_callback (GtkWidget *thelist,\r
-                                                                                                                                                                                       GdkEventButton *event,\r
-                                                                                                                                                                                       gpointer user_data);\r
-static void gtk_file_selection_mask_entry_callback (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_create_dir (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_delete_file (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_rename_file (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_home_button (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_up_button (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_prev_button (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_next_button (GtkWidget *widget, gpointer data);\r
-static void gtk_file_selection_refresh_button (GtkWidget *widget, gpointer data);\r
-\r
-static gint gtk_file_selection_match_char (gchar, gchar *mask);\r
-static gint gtk_file_selection_match_mask (gchar *,gchar *);\r
-\r
-\r
-static GtkWindowClass *parent_class = NULL;\r
-\r
-/* Saves errno when something cmpl does fails. */\r
-static gint cmpl_errno;\r
-\r
-/* General notes:\r
- * Make prev and next inactive if their respective *\r
- *   histories are empty.\r
- * Add facilities for handling hidden files and    *\r
- * directories                                     *\r
- * Add an api to access the mask, and hidden files *\r
- * check box?  (prob not in 1.2.x series)          *\r
- */\r
-\r
-/* Routine for applying mask to filenames         *\r
- *   Need to be optimized to minimize recursion   *\r
- *     help the for loop by looking for the next  *\r
- *     instance of the mask character following   *\r
- *     the '*'.  ei *.c -- look for '.'           *\r
- *     Also, swap all *? pairs (-> ?*), as that   *\r
- *     will make it possible to look ahead (?     *\r
- *     makes it very nondeterministic as in *?.c  *\r
- *     which really is ?*.c                       *\r
- *   Allow multiply masks, separted by commas     *\r
- *   Allow more flexible [] handling (ie [a-zA-Z] *\r
- *                                                *\r
- */\r
-static gint gtk_file_selection_match_char (gchar text, gchar *mask){\r
-  gchar *maskc;\r
-  gint x;\r
-  gint s;\r
-       \r
-  if (mask[0] == '[')\r
-    {\r
-      if (!strchr (mask,']')) return 0;\r
-      maskc = g_strdup(mask + 1); /* get the portion of mask inside []*/\r
-               \r
-      (*(strchr (maskc,']'))) = 0;\r
-      s = strlen ((char *)maskc);\r
-\r
-      for (x = 0; x < s; x++){\r
-       if (text == maskc[x])\r
-         {\r
-           g_free (maskc);\r
-           return s + 2;\r
-         }\r
-      }\r
-      g_free (maskc);\r
-      return 0;\r
-    }\r
-\r
-  if (mask[0] == '?') return 1;\r
-  if (mask[0] == text) return 1;\r
-\r
-  return 0;\r
-}\r
-\r
-\r
-static gint gtk_file_selection_match_mask (gchar *text, gchar *mask){\r
-\r
-  int mc;\r
-  int tc;\r
-\r
-  tc = 0; mc = 0;\r
-       \r
-  if (mask[0] == 0 && text[0] == 0) return 1;\r
-       \r
-  if (mask[0] == '*')\r
-    {\r
-      for (tc = 0; tc <= strlen(text); tc++)\r
-       {\r
-         if (gtk_file_selection_match_mask (text + tc, mask + 1))\r
-           return 1;\r
-       }\r
-      return 0;\r
-    }\r
-  mc = gtk_file_selection_match_char (text[0], mask);\r
-\r
-  if(mc)\r
-    return gtk_file_selection_match_mask (text + 1, mask + mc);\r
-  else\r
-    return 0;\r
-}\r
-\r
-GtkType\r
-gtk_file_selection_get_type (void)\r
-{\r
-  static GtkType file_selection_type = 0;\r
-\r
-  if (!file_selection_type)\r
-    {\r
-      static const GtkTypeInfo filesel_info =\r
-      {\r
-       "GtkFileSelection",\r
-       sizeof (GtkFileSelection),\r
-       sizeof (GtkFileSelectionClass),\r
-       (GtkClassInitFunc) gtk_file_selection_class_init,\r
-       (GtkObjectInitFunc) gtk_file_selection_init,\r
-       /* reserved_1 */ NULL,\r
-       /* reserved_2 */ NULL,\r
-        (GtkClassInitFunc) NULL,\r
-      };\r
-\r
-      file_selection_type = gtk_type_unique (GTK_TYPE_WINDOW, &filesel_info);\r
-    }\r
-\r
-  return file_selection_type;\r
-}\r
-\r
-static void\r
-gtk_file_selection_class_init (GtkFileSelectionClass *class)\r
-{\r
-  GtkObjectClass *object_class;\r
-\r
-  object_class = (GtkObjectClass*) class;\r
-\r
-  parent_class = gtk_type_class (GTK_TYPE_WINDOW);\r
-\r
-  object_class->destroy = gtk_file_selection_destroy;\r
-}\r
-\r
-static void\r
-gtk_file_selection_init (GtkFileSelection *filesel)\r
-{\r
-  GtkWidget *entry_vbox;\r
-  GtkWidget *label;\r
-  GtkWidget *list_hbox;\r
-  GtkWidget *confirm_area;\r
-  GtkWidget *vbox;\r
-  GtkWidget *hbox;\r
-  GtkWidget *pulldown_hbox;\r
-  GtkWidget *scrolled_win;\r
-  GtkWidget *mask_label;\r
-  GtkWidget *bigframe;\r
-  GtkWidget *label_lookingin;\r
-  GtkWidget *up_button;\r
-  GtkWidget *home_button;\r
-  GtkWidget *prev_button;\r
-  GtkWidget *next_button;\r
-  GtkWidget *refresh_button;\r
-\r
-  char *dir_title [2];\r
-  char *file_title [2];\r
-  \r
-  filesel->cmpl_state = cmpl_init_state ();\r
-\r
-  filesel->mask=NULL;\r
-  filesel->prev_history=NULL;\r
-  filesel->next_history=NULL;\r
-  filesel->saved_entry=NULL;\r
-\r
-  /* The dialog-sized vertical box  */\r
-  filesel->main_vbox = gtk_vbox_new (FALSE, 10);\r
-  gtk_container_set_border_width (GTK_CONTAINER (filesel), 10);\r
-  gtk_container_add (GTK_CONTAINER (filesel), filesel->main_vbox);\r
-  gtk_widget_show (filesel->main_vbox);\r
-\r
-  /* The horizontal box containing create, rename etc. buttons */\r
-  filesel->button_area = gtk_hbutton_box_new ();\r
-  gtk_button_box_set_layout(GTK_BUTTON_BOX(filesel->button_area), GTK_BUTTONBOX_START);\r
-  gtk_button_box_set_spacing(GTK_BUTTON_BOX(filesel->button_area), 0);\r
-  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), filesel->button_area, \r
-                     FALSE, FALSE, 0);\r
-  gtk_widget_show (filesel->button_area);\r
-  \r
-  gtk_file_selection_show_fileop_buttons(filesel);\r
-\r
-  /* hbox for pulldown menu */\r
-  pulldown_hbox = gtk_hbox_new (FALSE, 5);\r
-  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), pulldown_hbox, FALSE, FALSE, 0);\r
-  gtk_widget_show (pulldown_hbox);\r
-  \r
-  /* The combo box that replaces the pulldown menu */\r
-  label_lookingin = gtk_label_new (_("Looking in:"));\r
-  gtk_widget_show (label_lookingin);\r
-  gtk_box_pack_start (GTK_BOX (pulldown_hbox), label_lookingin, FALSE, FALSE, 0);\r
-\r
-  filesel->history_combo = gtk_combo_new();\r
-  gtk_widget_show(filesel->history_combo);\r
-  gtk_combo_set_value_in_list(GTK_COMBO(filesel->history_combo),FALSE,FALSE);\r
-  gtk_box_pack_start (GTK_BOX(pulldown_hbox),filesel->history_combo,\r
-                               TRUE,TRUE, 0);\r
-  gtk_signal_connect(GTK_OBJECT(((GtkCombo *)filesel->history_combo)->entry),"key-press-event",                                    \r
-                    (GtkSignalFunc) gtk_file_selection_history_combo_callback,\r
-                    (gpointer) filesel);\r
-\r
-  gtk_signal_connect(GTK_OBJECT(((GtkCombo *)filesel->history_combo)->list),"button-press-event",\r
-                    (GtkSignalFunc) gtk_file_selection_history_combo_list_callback,\r
-                    (gpointer) filesel);\r
-\r
-  gtk_signal_connect(GTK_OBJECT(((GtkCombo *)filesel->history_combo)->list),"key-press-event",\r
-                    (GtkSignalFunc) gtk_file_selection_history_combo_list_key_handler,\r
-                    (gpointer) filesel);\r
-\r
-  /*  frame to put the following hbox in  */\r
-  bigframe = gtk_frame_new (NULL);\r
-  gtk_widget_show (bigframe);\r
-  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), bigframe, TRUE, TRUE, 0);\r
-\r
-  /*  The horizontal box containing the directory and file listboxes  */\r
-  list_hbox = gtk_hbox_new (FALSE, 5);\r
-  gtk_container_add (GTK_CONTAINER(bigframe), list_hbox);\r
-  gtk_container_set_border_width (GTK_CONTAINER (list_hbox), 5);\r
-  gtk_widget_show (list_hbox);\r
-\r
-  /* vbox to put the buttons and directory listing in  */\r
-  vbox = gtk_vbox_new (FALSE, 0);\r
-  gtk_widget_show (vbox);\r
-  gtk_box_pack_start (GTK_BOX (list_hbox), vbox, FALSE, FALSE, 0);\r
-\r
-  hbox = gtk_hbox_new (FALSE, 0);\r
-  gtk_widget_show (hbox);\r
-  gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);\r
-\r
-  home_button = gtk_button_new_with_label (_("Home"));\r
-  gtk_widget_show (home_button);\r
-  gtk_signal_connect (GTK_OBJECT (home_button), "clicked",\r
-                     (GtkSignalFunc) gtk_file_selection_home_button,\r
-                     (gpointer) filesel);\r
-  gtk_box_pack_start (GTK_BOX (hbox), home_button, TRUE,TRUE, 0);\r
-\r
-  prev_button = gtk_button_new_with_label (_("Prev"));\r
-  gtk_signal_connect (GTK_OBJECT (prev_button), "clicked",\r
-                     (GtkSignalFunc) gtk_file_selection_prev_button,\r
-                     (gpointer) filesel);\r
-  gtk_widget_show (prev_button);\r
-  gtk_box_pack_start (GTK_BOX (hbox), prev_button, TRUE,TRUE, 0);\r
-\r
-  up_button = gtk_button_new_with_label (_("Up"));\r
-  gtk_signal_connect (GTK_OBJECT (up_button), "clicked",\r
-                     (GtkSignalFunc) gtk_file_selection_up_button,\r
-                     (gpointer) filesel);\r
-  gtk_widget_show (up_button);\r
-  gtk_box_pack_start (GTK_BOX (hbox), up_button, TRUE,TRUE, 0);\r
-\r
-  next_button = gtk_button_new_with_label (_("Next"));\r
-  gtk_widget_show (next_button);\r
-  gtk_signal_connect (GTK_OBJECT (next_button), "clicked",\r
-                     (GtkSignalFunc) gtk_file_selection_next_button,\r
-                     (gpointer) filesel);\r
-  gtk_box_pack_start (GTK_BOX (hbox), next_button, TRUE,TRUE, 0);\r
-\r
-  refresh_button = gtk_button_new_with_label (_("Refresh"));\r
-  gtk_widget_show (refresh_button);\r
-  gtk_signal_connect (GTK_OBJECT (refresh_button), "clicked",\r
-                     (GtkSignalFunc) gtk_file_selection_refresh_button,\r
-                     (gpointer) filesel);\r
-  gtk_box_pack_start (GTK_BOX (hbox), refresh_button, TRUE, TRUE, 0);\r
-\r
-  /* The directories clist */\r
-  dir_title[0] = _("Directories");\r
-  dir_title[1] = NULL;\r
-  filesel->dir_list = gtk_clist_new_with_titles (1, (gchar**) dir_title);\r
-  gtk_widget_set_usize (filesel->dir_list, DIR_LIST_WIDTH, DIR_LIST_HEIGHT);\r
-  gtk_signal_connect (GTK_OBJECT (filesel->dir_list), "select_row",\r
-                     (GtkSignalFunc) gtk_file_selection_dir_button,\r
-                     (gpointer) filesel);\r
-  gtk_signal_connect (GTK_OBJECT (filesel->dir_list), "unselect_row",\r
-                     (GtkSignalFunc) gtk_file_selection_undir_button,\r
-                     (gpointer) filesel);\r
-  gtk_clist_column_titles_passive (GTK_CLIST (filesel->dir_list));\r
-\r
-  scrolled_win = gtk_scrolled_window_new (NULL, NULL);\r
-  gtk_container_add (GTK_CONTAINER (scrolled_win), filesel->dir_list);\r
-  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_win),\r
-                                 GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);\r
-  gtk_box_pack_start (GTK_BOX (vbox), scrolled_win, TRUE,TRUE, 5);\r
-  gtk_widget_show (filesel->dir_list);\r
-  gtk_widget_show (scrolled_win);\r
-\r
-  /* vbox area for mask entry and files clist  */\r
-  vbox = gtk_vbox_new (FALSE, 0);\r
-  gtk_widget_show (vbox);\r
-  gtk_box_pack_start (GTK_BOX (list_hbox), vbox, TRUE, TRUE, 0);\r
-\r
-  hbox = gtk_hbox_new (FALSE, 5);\r
-  gtk_widget_show (hbox);\r
-  gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);\r
-\r
-  mask_label = gtk_label_new (_("Mask:"));\r
-  gtk_widget_show (mask_label);\r
-  gtk_box_pack_start (GTK_BOX (hbox), mask_label, FALSE, FALSE, 0);\r
-\r
-  filesel->mask_entry = gtk_entry_new ();\r
-  gtk_widget_show (filesel->mask_entry);\r
-  gtk_signal_connect(GTK_OBJECT(filesel->mask_entry),"activate",\r
-                    (GtkSignalFunc) gtk_file_selection_mask_entry_callback,\r
-                    (gpointer) filesel);\r
-  gtk_box_pack_start (GTK_BOX (hbox),filesel->mask_entry, TRUE, TRUE, 0);\r
-\r
-\r
-  /* The files clist */\r
-  file_title[0] = _("Files");\r
-  file_title[1] = NULL;\r
-  filesel->file_list = gtk_clist_new_with_titles (1, (gchar**) file_title);\r
-  gtk_widget_set_usize (filesel->file_list, FILE_LIST_WIDTH, FILE_LIST_HEIGHT);\r
-  gtk_signal_connect (GTK_OBJECT (filesel->file_list), "select_row",\r
-                     (GtkSignalFunc) gtk_file_selection_file_button, \r
-                     (gpointer) filesel);\r
-  gtk_clist_column_titles_passive (GTK_CLIST (filesel->file_list));\r
-\r
-  scrolled_win = gtk_scrolled_window_new (NULL, NULL);\r
-  gtk_container_add (GTK_CONTAINER (scrolled_win), filesel->file_list);\r
-  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_win),\r
-                                 GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);\r
-  gtk_box_pack_start (GTK_BOX (vbox), scrolled_win, TRUE, TRUE, 5);\r
-  gtk_widget_show (filesel->file_list);\r
-  gtk_widget_show (scrolled_win);\r
-\r
-  /* action area for packing buttons into. */\r
-  filesel->action_area = gtk_hbox_new (TRUE, 0);\r
-  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), filesel->action_area, \r
-                     FALSE, FALSE, 0);\r
-  gtk_widget_show (filesel->action_area);\r
-  \r
-  /*  The OK/Cancel button area */\r
-  confirm_area = gtk_hbutton_box_new ();\r
-  gtk_button_box_set_layout(GTK_BUTTON_BOX(confirm_area), GTK_BUTTONBOX_END);\r
-  gtk_button_box_set_spacing(GTK_BUTTON_BOX(confirm_area), 5);\r
-  gtk_box_pack_end (GTK_BOX (filesel->main_vbox), confirm_area, FALSE, FALSE, 0);\r
-  gtk_widget_show (confirm_area);\r
-\r
-  /*  The OK button  */\r
-  filesel->ok_button = gtk_button_new_with_label (_("OK"));\r
-  GTK_WIDGET_SET_FLAGS (filesel->ok_button, GTK_CAN_DEFAULT);\r
-  gtk_box_pack_start (GTK_BOX (confirm_area), filesel->ok_button, TRUE, TRUE, 0);\r
-  gtk_widget_grab_default (filesel->ok_button);\r
-  gtk_widget_show (filesel->ok_button);\r
-\r
-  /*  The Cancel button  */\r
-  filesel->cancel_button = gtk_button_new_with_label (_("Cancel"));\r
-  GTK_WIDGET_SET_FLAGS (filesel->cancel_button, GTK_CAN_DEFAULT);\r
-  gtk_box_pack_start (GTK_BOX (confirm_area), filesel->cancel_button, TRUE, TRUE, 0);\r
-  gtk_widget_show (filesel->cancel_button);\r
-\r
-  /*  The selection entry widget  */\r
-  entry_vbox = gtk_vbox_new (FALSE, 2);\r
-  gtk_box_pack_end (GTK_BOX (filesel->main_vbox), entry_vbox, FALSE, FALSE, 0);\r
-  gtk_widget_show (entry_vbox);\r
-\r
-  filesel->selection_text = label = gtk_label_new ("");\r
-  gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);\r
-  gtk_box_pack_start (GTK_BOX (entry_vbox), label, FALSE, FALSE, 0);\r
-  gtk_widget_show (label);\r
-\r
-  filesel->selection_entry = gtk_entry_new ();\r
-  gtk_signal_connect (GTK_OBJECT (filesel->selection_entry), "key_press_event",\r
-                     (GtkSignalFunc) gtk_file_selection_key_press, filesel);\r
-  gtk_signal_connect_object (GTK_OBJECT (filesel->selection_entry), "focus_in_event",\r
-                            (GtkSignalFunc) gtk_widget_grab_default,\r
-                            GTK_OBJECT (filesel->ok_button));\r
-  gtk_signal_connect_object (GTK_OBJECT (filesel->selection_entry), "activate",\r
-                             (GtkSignalFunc) gtk_button_clicked,\r
-                             GTK_OBJECT (filesel->ok_button));\r
-  gtk_box_pack_start (GTK_BOX (entry_vbox), filesel->selection_entry, TRUE, TRUE, 0);\r
-  gtk_widget_show (filesel->selection_entry);\r
-\r
-  if (!cmpl_state_okay (filesel->cmpl_state))\r
-    {\r
-      gchar err_buf[256];\r
-\r
-      sprintf (err_buf, _("Directory unreadable: %s"), cmpl_strerror (cmpl_errno));\r
-\r
-      gtk_label_set_text (GTK_LABEL (filesel->selection_text), err_buf);\r
-    }\r
-  else\r
-    {\r
-      gtk_file_selection_populate (filesel, "", FALSE);\r
-    }\r
-\r
-  gtk_widget_grab_focus (filesel->selection_entry);\r
-}\r
-\r
-GtkWidget*\r
-gtk_file_selection_new (const gchar *title)\r
-{\r
-  GtkFileSelection *filesel;\r
-\r
-  filesel = gtk_type_new (GTK_TYPE_FILE_SELECTION);\r
-  gtk_window_set_title (GTK_WINDOW (filesel), title);\r
-\r
-  return GTK_WIDGET (filesel);\r
-}\r
-\r
-void\r
-gtk_file_selection_show_fileop_buttons (GtkFileSelection *filesel)\r
-{\r
-  g_return_if_fail (filesel != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (filesel));\r
-    \r
-  /* delete, create directory, and rename */\r
-  if (!filesel->fileop_c_dir) \r
-    {\r
-      filesel->fileop_c_dir = gtk_button_new_with_label (_("Create Dir"));\r
-      gtk_signal_connect (GTK_OBJECT (filesel->fileop_c_dir), "clicked",\r
-                         (GtkSignalFunc) gtk_file_selection_create_dir, \r
-                         (gpointer) filesel);\r
-      gtk_box_pack_start (GTK_BOX (filesel->button_area), \r
-                         filesel->fileop_c_dir, TRUE, TRUE, 0);\r
-      gtk_widget_show (filesel->fileop_c_dir);\r
-    }\r
-       \r
-  if (!filesel->fileop_del_file) \r
-    {\r
-      filesel->fileop_del_file = gtk_button_new_with_label (_("Delete File"));\r
-      gtk_signal_connect (GTK_OBJECT (filesel->fileop_del_file), "clicked",\r
-                         (GtkSignalFunc) gtk_file_selection_delete_file, \r
-                         (gpointer) filesel);\r
-      gtk_box_pack_start (GTK_BOX (filesel->button_area), \r
-                         filesel->fileop_del_file, TRUE, TRUE, 0);\r
-      gtk_widget_show (filesel->fileop_del_file);\r
-    }\r
-\r
-  if (!filesel->fileop_ren_file)\r
-    {\r
-      filesel->fileop_ren_file = gtk_button_new_with_label (_("Rename File"));\r
-      gtk_signal_connect (GTK_OBJECT (filesel->fileop_ren_file), "clicked",\r
-                         (GtkSignalFunc) gtk_file_selection_rename_file, \r
-                         (gpointer) filesel);\r
-      gtk_box_pack_start (GTK_BOX (filesel->button_area), \r
-                         filesel->fileop_ren_file, TRUE, TRUE, 0);\r
-      gtk_widget_show (filesel->fileop_ren_file);\r
-    }\r
-\r
-  gtk_widget_queue_resize(GTK_WIDGET(filesel));\r
-}\r
-\r
-void       \r
-gtk_file_selection_hide_fileop_buttons (GtkFileSelection *filesel)\r
-{\r
-  g_return_if_fail (filesel != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (filesel));\r
-    \r
-  if (filesel->fileop_ren_file) \r
-    {\r
-      gtk_widget_destroy (filesel->fileop_ren_file);\r
-      filesel->fileop_ren_file = NULL;\r
-    }\r
-\r
-  if (filesel->fileop_del_file)\r
-    {\r
-      gtk_widget_destroy (filesel->fileop_del_file);\r
-      filesel->fileop_del_file = NULL;\r
-    }\r
-\r
-  if (filesel->fileop_c_dir)\r
-    {\r
-      gtk_widget_destroy (filesel->fileop_c_dir);\r
-      filesel->fileop_c_dir = NULL;\r
-    }\r
-}\r
-\r
-\r
-\r
-void\r
-gtk_file_selection_set_filename (GtkFileSelection *filesel,\r
-                                const gchar      *filename)\r
-{\r
-  char  buf[MAXPATHLEN];\r
-  const char *name, *last_slash;\r
-\r
-  g_return_if_fail (filesel != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (filesel));\r
-  g_return_if_fail (filename != NULL);\r
-\r
-  last_slash = strrchr (filename, '/');\r
-\r
-  if (!last_slash)\r
-    {\r
-      buf[0] = 0;\r
-      name = filename;\r
-    }\r
-  else\r
-    {\r
-      gint len = MIN (MAXPATHLEN - 1, last_slash - filename + 1);\r
-\r
-      strncpy (buf, filename, len);\r
-      buf[len] = 0;\r
-\r
-      name = last_slash + 1;\r
-    }\r
-\r
-  gtk_file_selection_populate (filesel, buf, FALSE);\r
-\r
-  if (filesel->selection_entry)\r
-    gtk_entry_set_text (GTK_ENTRY (filesel->selection_entry), name);\r
-}\r
-\r
-gchar*\r
-gtk_file_selection_get_filename (GtkFileSelection *filesel)\r
-{\r
-  static char nothing[2] = "";\r
-  char *text;\r
-  char *filename;\r
-\r
-  g_return_val_if_fail (filesel != NULL, nothing);\r
-  g_return_val_if_fail (GTK_IS_FILE_SELECTION (filesel), nothing);\r
-\r
-  text = gtk_entry_get_text (GTK_ENTRY (filesel->selection_entry));\r
-  if (text)\r
-    {\r
-      filename = cmpl_completion_fullname (text, filesel->cmpl_state);\r
-      return filename;\r
-    }\r
-\r
-  return nothing;\r
-}\r
-\r
-void\r
-gtk_file_selection_complete (GtkFileSelection *filesel,\r
-                            const gchar      *pattern)\r
-{\r
-  gchar *new_pattern;\r
-  gint x;\r
-       \r
-  g_return_if_fail (filesel != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (filesel));\r
-  g_return_if_fail (pattern != NULL);\r
-\r
-  if (filesel->selection_entry)\r
-    gtk_entry_set_text (GTK_ENTRY (filesel->selection_entry), pattern);\r
-       \r
-  if(strchr(pattern,'*') || strchr(pattern,'?'))\r
-    {\r
-      for(x=strlen(pattern);x>=0;x--)\r
-       {\r
-         if(pattern[x]=='/') break;\r
-       }\r
-      gtk_entry_set_text(GTK_ENTRY(filesel->mask_entry),g_strdup(pattern+x+1));\r
-      \r
-      if(filesel->mask) g_free(filesel->mask);\r
-      \r
-      filesel->mask=g_strdup(pattern+x+1);\r
-      new_pattern=g_strdup(pattern);\r
-      new_pattern[x+1]=0;\r
-      gtk_file_selection_populate (filesel, (gchar*) new_pattern, TRUE);\r
-      g_free(new_pattern);\r
-    }\r
-  else\r
-    {\r
-      gtk_file_selection_populate (filesel, (gchar*) pattern, TRUE);\r
-    }\r
-}\r
-\r
-static void\r
-gtk_file_selection_destroy (GtkObject *object)\r
-{\r
-  GtkFileSelection *filesel;\r
-  GList *list;\r
-\r
-  g_return_if_fail (object != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (object));\r
-\r
-  filesel = GTK_FILE_SELECTION (object);\r
-  \r
-  if (filesel->fileop_dialog)\r
-    gtk_widget_destroy (filesel->fileop_dialog);\r
-  \r
-  if (filesel->next_history)\r
-    {\r
-      list = filesel->next_history;\r
-      while (list)\r
-       {\r
-         g_free (list->data);\r
-         list = list->next;\r
-       }\r
-    }\r
-  g_list_free (filesel->next_history);\r
-  filesel->next_history = NULL;\r
-\r
-  if (filesel->prev_history)\r
-    {\r
-      list = filesel->prev_history;\r
-      while (list)\r
-       {\r
-         g_free (list->data);\r
-         list = list->next;\r
-       }\r
-    }\r
-  g_list_free (filesel->prev_history);\r
-  filesel->prev_history = NULL;\r
-\r
-  if (filesel->mask)\r
-    {\r
-      g_free (filesel->mask);\r
-      filesel->mask = NULL;\r
-    }\r
-  \r
-  cmpl_free_state (filesel->cmpl_state);\r
-  filesel->cmpl_state = NULL;\r
-\r
-  if (GTK_OBJECT_CLASS (parent_class)->destroy)\r
-    (* GTK_OBJECT_CLASS (parent_class)->destroy) (object);\r
-}\r
-\r
-/* Begin file operations callbacks */\r
-\r
-static void\r
-gtk_file_selection_fileop_error (GtkFileSelection *fs, gchar *error_message)\r
-{\r
-  GtkWidget *label;\r
-  GtkWidget *vbox;\r
-  GtkWidget *button;\r
-  GtkWidget *dialog;\r
-  \r
-  g_return_if_fail (error_message != NULL);\r
-  \r
-  /* main dialog */\r
-  dialog = gtk_dialog_new ();\r
-  /*\r
-  gtk_signal_connect (GTK_OBJECT (dialog), "destroy",\r
-                     (GtkSignalFunc) gtk_file_selection_fileop_destroy, \r
-                     (gpointer) fs);\r
-  */\r
-  gtk_window_set_title (GTK_WINDOW (dialog), _("Error"));\r
-  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);\r
-  \r
-  /* If file dialog is grabbed, make this dialog modal too */\r
-  /* When error dialog is closed, file dialog will be grabbed again */\r
-  if (GTK_WINDOW(fs)->modal)\r
-      gtk_window_set_modal (GTK_WINDOW(dialog), TRUE);\r
-\r
-  vbox = gtk_vbox_new(FALSE, 0);\r
-  gtk_container_set_border_width(GTK_CONTAINER(vbox), 8);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), vbox,\r
-                    FALSE, FALSE, 0);\r
-  gtk_widget_show(vbox);\r
-\r
-  label = gtk_label_new(error_message);\r
-  gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.0);\r
-  gtk_box_pack_start(GTK_BOX(vbox), label, FALSE, FALSE, 5);\r
-  gtk_widget_show(label);\r
-\r
-  /* yes, we free it */\r
-  g_free (error_message);\r
-  \r
-  /* close button */\r
-  button = gtk_button_new_with_label (_("Close"));\r
-  gtk_signal_connect_object (GTK_OBJECT (button), "clicked",\r
-                            (GtkSignalFunc) gtk_widget_destroy, \r
-                            (gpointer) dialog);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area),\r
-                    button, TRUE, TRUE, 0);\r
-  GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);\r
-  gtk_widget_grab_default(button);\r
-  gtk_widget_show (button);\r
-\r
-  gtk_widget_show (dialog);\r
-}\r
-\r
-static void\r
-gtk_file_selection_fileop_destroy (GtkWidget *widget, gpointer data)\r
-{\r
-  GtkFileSelection *fs = data;\r
-\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-  \r
-  fs->fileop_dialog = NULL;\r
-}\r
-\r
-\r
-static void\r
-gtk_file_selection_create_dir_confirmed (GtkWidget *widget, gpointer data)\r
-{\r
-  GtkFileSelection *fs = data;\r
-  gchar *dirname;\r
-  gchar *path;\r
-  gchar *full_path;\r
-  gchar *buf;\r
-  CompletionState *cmpl_state;\r
-  \r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  dirname = gtk_entry_get_text (GTK_ENTRY (fs->fileop_entry));\r
-  cmpl_state = (CompletionState*) fs->cmpl_state;\r
-  path = cmpl_reference_position (cmpl_state);\r
-  \r
-  full_path = g_strconcat (path, "/", dirname, NULL);\r
-  if ( (mkdir (full_path, 0755) < 0) ) \r
-    {\r
-      buf = g_strconcat ("Error creating directory \"", dirname, "\":  ", \r
-                        g_strerror(errno), NULL);\r
-      gtk_file_selection_fileop_error (fs, buf);\r
-    }\r
-  g_free (full_path);\r
-  \r
-  gtk_widget_destroy (fs->fileop_dialog);\r
-  gtk_file_selection_populate (fs, "", FALSE);\r
-}\r
-  \r
-static void\r
-gtk_file_selection_create_dir (GtkWidget *widget, gpointer data)\r
-{\r
-  GtkFileSelection *fs = data;\r
-  GtkWidget *label;\r
-  GtkWidget *dialog;\r
-  GtkWidget *vbox;\r
-  GtkWidget *button;\r
-\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  if (fs->fileop_dialog)\r
-         return;\r
-  \r
-  /* main dialog */\r
-  fs->fileop_dialog = dialog = gtk_dialog_new ();\r
-  gtk_signal_connect (GTK_OBJECT (dialog), "destroy",\r
-                     (GtkSignalFunc) gtk_file_selection_fileop_destroy, \r
-                     (gpointer) fs);\r
-  gtk_window_set_title (GTK_WINDOW (dialog), _("Create Directory"));\r
-  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);\r
-\r
-  /* If file dialog is grabbed, grab option dialog */\r
-  /* When option dialog is closed, file dialog will be grabbed again */\r
-  if (GTK_WINDOW(fs)->modal)\r
-      gtk_window_set_modal (GTK_WINDOW(dialog), TRUE);\r
-\r
-  vbox = gtk_vbox_new(FALSE, 0);\r
-  gtk_container_set_border_width(GTK_CONTAINER(vbox), 8);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), vbox,\r
-                    FALSE, FALSE, 0);\r
-  gtk_widget_show(vbox);\r
-  \r
-  label = gtk_label_new(_("Directory name:"));\r
-  gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.0);\r
-  gtk_box_pack_start(GTK_BOX(vbox), label, FALSE, FALSE, 5);\r
-  gtk_widget_show(label);\r
-\r
-  /*  The directory entry widget  */\r
-  fs->fileop_entry = gtk_entry_new ();\r
-  gtk_box_pack_start (GTK_BOX (vbox), fs->fileop_entry, \r
-                     TRUE, TRUE, 5);\r
-  GTK_WIDGET_SET_FLAGS(fs->fileop_entry, GTK_CAN_DEFAULT);\r
-  gtk_widget_show (fs->fileop_entry);\r
-  \r
-  /* buttons */\r
-  button = gtk_button_new_with_label (_("Create"));\r
-  gtk_signal_connect (GTK_OBJECT (button), "clicked",\r
-                     (GtkSignalFunc) gtk_file_selection_create_dir_confirmed, \r
-                     (gpointer) fs);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area),\r
-                    button, TRUE, TRUE, 0);\r
-  GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);\r
-  gtk_widget_show(button);\r
-  \r
-  button = gtk_button_new_with_label (_("Cancel"));\r
-  gtk_signal_connect_object (GTK_OBJECT (button), "clicked",\r
-                            (GtkSignalFunc) gtk_widget_destroy, \r
-                            (gpointer) dialog);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area),\r
-                    button, TRUE, TRUE, 0);\r
-  GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);\r
-  gtk_widget_grab_default(button);\r
-  gtk_widget_show (button);\r
-\r
-  gtk_widget_show (dialog);\r
-}\r
-\r
-static void\r
-gtk_file_selection_delete_file_confirmed (GtkWidget *widget, gpointer data)\r
-{\r
-  GtkFileSelection *fs = data;\r
-  CompletionState *cmpl_state;\r
-  gchar *path;\r
-  gchar *full_path;\r
-  gchar *buf;\r
-  \r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  cmpl_state = (CompletionState*) fs->cmpl_state;\r
-  path = cmpl_reference_position (cmpl_state);\r
-  \r
-  full_path = g_strconcat (path, "/", fs->fileop_file, NULL);\r
-  if ( (unlink (full_path) < 0) ) \r
-    {\r
-      buf = g_strconcat ("Error deleting file \"", fs->fileop_file, "\":  ", \r
-                        g_strerror(errno), NULL);\r
-      gtk_file_selection_fileop_error (fs, buf);\r
-    }\r
-  g_free (full_path);\r
-  \r
-  gtk_widget_destroy (fs->fileop_dialog);\r
-  gtk_file_selection_populate (fs, "", FALSE);\r
-}\r
-\r
-static void\r
-gtk_file_selection_delete_file (GtkWidget *widget, gpointer data)\r
-{\r
-  GtkFileSelection *fs = data;\r
-  GtkWidget *label;\r
-  GtkWidget *vbox;\r
-  GtkWidget *button;\r
-  GtkWidget *dialog;\r
-  gchar *filename;\r
-  gchar *buf;\r
-  \r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  if (fs->fileop_dialog)\r
-         return;\r
-\r
-  filename = gtk_entry_get_text (GTK_ENTRY (fs->selection_entry));\r
-  if (strlen(filename) < 1)\r
-         return;\r
-\r
-  fs->fileop_file = filename;\r
-  \r
-  /* main dialog */\r
-  fs->fileop_dialog = dialog = gtk_dialog_new ();\r
-  gtk_signal_connect (GTK_OBJECT (dialog), "destroy",\r
-                     (GtkSignalFunc) gtk_file_selection_fileop_destroy, \r
-                     (gpointer) fs);\r
-  gtk_window_set_title (GTK_WINDOW (dialog), _("Delete File"));\r
-  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);\r
-\r
-  /* If file dialog is grabbed, grab option dialog */\r
-  /* When option dialog is closed, file dialog will be grabbed again */\r
-  if (GTK_WINDOW(fs)->modal)\r
-      gtk_window_set_modal (GTK_WINDOW(dialog), TRUE);\r
-  \r
-  vbox = gtk_vbox_new(FALSE, 0);\r
-  gtk_container_set_border_width(GTK_CONTAINER(vbox), 8);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), vbox,\r
-                    FALSE, FALSE, 0);\r
-  gtk_widget_show(vbox);\r
-\r
-  buf = g_strconcat ("Really delete file \"", filename, "\" ?", NULL);\r
-  label = gtk_label_new(buf);\r
-  gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.0);\r
-  gtk_box_pack_start(GTK_BOX(vbox), label, FALSE, FALSE, 5);\r
-  gtk_widget_show(label);\r
-  g_free(buf);\r
-  \r
-  /* buttons */\r
-  button = gtk_button_new_with_label (_("Delete"));\r
-  gtk_signal_connect (GTK_OBJECT (button), "clicked",\r
-                     (GtkSignalFunc) gtk_file_selection_delete_file_confirmed, \r
-                     (gpointer) fs);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area),\r
-                    button, TRUE, TRUE, 0);\r
-  GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);\r
-  gtk_widget_show(button);\r
-  \r
-  button = gtk_button_new_with_label (_("Cancel"));\r
-  gtk_signal_connect_object (GTK_OBJECT (button), "clicked",\r
-                            (GtkSignalFunc) gtk_widget_destroy, \r
-                            (gpointer) dialog);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area),\r
-                    button, TRUE, TRUE, 0);\r
-  GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);\r
-  gtk_widget_grab_default(button);\r
-  gtk_widget_show (button);\r
-\r
-  gtk_widget_show (dialog);\r
-\r
-}\r
-\r
-static void\r
-gtk_file_selection_rename_file_confirmed (GtkWidget *widget, gpointer data)\r
-{\r
-  GtkFileSelection *fs = data;\r
-  gchar *buf;\r
-  gchar *file;\r
-  gchar *path;\r
-  gchar *new_filename;\r
-  gchar *old_filename;\r
-  CompletionState *cmpl_state;\r
-  \r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  file = gtk_entry_get_text (GTK_ENTRY (fs->fileop_entry));\r
-  cmpl_state = (CompletionState*) fs->cmpl_state;\r
-  path = cmpl_reference_position (cmpl_state);\r
-  \r
-  new_filename = g_strconcat (path, "/", file, NULL);\r
-  old_filename = g_strconcat (path, "/", fs->fileop_file, NULL);\r
-\r
-  if ( (rename (old_filename, new_filename)) < 0) \r
-    {\r
-      buf = g_strconcat ("Error renaming file \"", file, "\":  ", \r
-                        g_strerror(errno), NULL);\r
-      gtk_file_selection_fileop_error (fs, buf);\r
-    }\r
-  g_free (new_filename);\r
-  g_free (old_filename);\r
-  \r
-  gtk_widget_destroy (fs->fileop_dialog);\r
-  gtk_file_selection_populate (fs, "", FALSE);\r
-}\r
-  \r
-static void\r
-gtk_file_selection_rename_file (GtkWidget *widget, gpointer data)\r
-{\r
-  GtkFileSelection *fs = data;\r
-  GtkWidget *label;\r
-  GtkWidget *dialog;\r
-  GtkWidget *vbox;\r
-  GtkWidget *button;\r
-  gchar *buf;\r
-  \r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  if (fs->fileop_dialog)\r
-         return;\r
-\r
-  fs->fileop_file = gtk_entry_get_text (GTK_ENTRY (fs->selection_entry));\r
-  if (strlen(fs->fileop_file) < 1)\r
-         return;\r
-  \r
-  /* main dialog */\r
-  fs->fileop_dialog = dialog = gtk_dialog_new ();\r
-  gtk_signal_connect (GTK_OBJECT (dialog), "destroy",\r
-                     (GtkSignalFunc) gtk_file_selection_fileop_destroy, \r
-                     (gpointer) fs);\r
-  gtk_window_set_title (GTK_WINDOW (dialog), _("Rename File"));\r
-  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);\r
-\r
-  /* If file dialog is grabbed, grab option dialog */\r
-  /* When option dialog  closed, file dialog will be grabbed again */\r
-  if (GTK_WINDOW(fs)->modal)\r
-    gtk_window_set_modal (GTK_WINDOW(dialog), TRUE);\r
-  \r
-  vbox = gtk_vbox_new(FALSE, 0);\r
-  gtk_container_set_border_width (GTK_CONTAINER(vbox), 8);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), vbox,\r
-                    FALSE, FALSE, 0);\r
-  gtk_widget_show(vbox);\r
-  \r
-  buf = g_strconcat ("Rename file \"", fs->fileop_file, "\" to:", NULL);\r
-  label = gtk_label_new(buf);\r
-  gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.0);\r
-  gtk_box_pack_start(GTK_BOX(vbox), label, FALSE, FALSE, 5);\r
-  gtk_widget_show(label);\r
-  g_free(buf);\r
-\r
-  /* New filename entry */\r
-  fs->fileop_entry = gtk_entry_new ();\r
-  gtk_box_pack_start (GTK_BOX (vbox), fs->fileop_entry, \r
-                     TRUE, TRUE, 5);\r
-  GTK_WIDGET_SET_FLAGS(fs->fileop_entry, GTK_CAN_DEFAULT);\r
-  gtk_widget_show (fs->fileop_entry);\r
-  \r
-  gtk_entry_set_text (GTK_ENTRY (fs->fileop_entry), fs->fileop_file);\r
-  gtk_editable_select_region (GTK_EDITABLE (fs->fileop_entry),\r
-                             0, strlen (fs->fileop_file));\r
-\r
-  /* buttons */\r
-  button = gtk_button_new_with_label (_("Rename"));\r
-  gtk_signal_connect (GTK_OBJECT (button), "clicked",\r
-                     (GtkSignalFunc) gtk_file_selection_rename_file_confirmed, \r
-                     (gpointer) fs);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area),\r
-                    button, TRUE, TRUE, 0);\r
-  GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);\r
-  gtk_widget_show(button);\r
-  \r
-  button = gtk_button_new_with_label (_("Cancel"));\r
-  gtk_signal_connect_object (GTK_OBJECT (button), "clicked",\r
-                            (GtkSignalFunc) gtk_widget_destroy, \r
-                            (gpointer) dialog);\r
-  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area),\r
-                    button, TRUE, TRUE, 0);\r
-  GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT);\r
-  gtk_widget_grab_default(button);\r
-  gtk_widget_show (button);\r
-\r
-  gtk_widget_show (dialog);\r
-}\r
-\r
-\r
-static gint\r
-gtk_file_selection_key_press (GtkWidget   *widget,\r
-                             GdkEventKey *event,\r
-                             gpointer     user_data)\r
-{\r
-  GtkFileSelection *fs;\r
-  char *text;\r
-\r
-  g_return_val_if_fail (widget != NULL, FALSE);\r
-  g_return_val_if_fail (event != NULL, FALSE);\r
-\r
-  fs = GTK_FILE_SELECTION (user_data);\r
-\r
-  if (event->keyval == GDK_Tab)\r
-    {\r
-      text = gtk_entry_get_text (GTK_ENTRY (fs->selection_entry));\r
-\r
-      text = g_strdup (text);\r
-\r
-      gtk_file_selection_populate (fs, text, TRUE);\r
-\r
-      g_free (text);\r
-\r
-      gtk_signal_emit_stop_by_name (GTK_OBJECT (widget), "key_press_event");\r
-\r
-      return TRUE;\r
-    }\r
-  if (fs->saved_entry)\r
-    {\r
-      gtk_clist_unselect_all ((GtkCList *) (fs->dir_list));\r
-      gtk_entry_set_text(GTK_ENTRY(fs->selection_entry),fs->saved_entry);\r
-      g_free (fs->saved_entry);\r
-      fs->saved_entry = NULL;\r
-    }\r
-\r
-\r
-  return FALSE;\r
-}\r
-\r
-static void\r
-gtk_file_selection_home_button (GtkWidget *widget, gpointer data){\r
-  GList *list;\r
-       \r
-  GtkFileSelection *fs=data;\r
-\r
-  list = fs->next_history;\r
-  if (list)\r
-    {\r
-      g_free (list->data);\r
-      list = list->next;\r
-    }\r
-  g_list_free (fs->next_history);\r
-  fs->next_history = NULL;\r
-               \r
-  gtk_file_selection_populate (fs,"~/",FALSE);\r
-}\r
-\r
-static void\r
-gtk_file_selection_up_button (GtkWidget *widget, gpointer data){\r
-  GtkFileSelection *fs = data;\r
-  GList *list;\r
-\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  list = fs->next_history;\r
-  if (list)\r
-    {\r
-      g_free (list->data);\r
-      list = list->next;\r
-    }\r
-  g_list_free (fs->next_history);\r
-  fs->next_history = NULL;\r
-\r
-  gtk_file_selection_populate (fs, "../", FALSE); /*change directories. */\r
-               \r
-}\r
-\r
-static void\r
-gtk_file_selection_prev_button (GtkWidget *widget, gpointer data){\r
-  GtkFileSelection *fs = data;\r
-  GList *list;\r
-  GList *first;\r
-  gchar *path;\r
-\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  list = fs->prev_history;\r
-\r
-  if (list && g_list_length(list) > 1)\r
-    {\r
-      first = list;            /* get first element */\r
-      list = list->next;       /* pop off current directory */\r
-\r
-      list->prev = NULL;       /* make this the new head. */\r
-       \r
-      fs->prev_history = list; /* update prev_history list */\r
-      fs->next_history = g_list_prepend(fs->next_history,first->data); /* put it on next_history */\r
-       \r
-      first->next = NULL;      /* orphan the old first node */\r
-      g_list_free (first);     /* free the node (data is now in use by next_history) */\r
-\r
-\r
-       \r
-      path = g_malloc(strlen(list->data)+4); /* plenty of space */\r
-      strcpy(path,list->data);               /* get the 2nd path in the history */\r
-      strcat(path,"/");                      /* append a '/' */\r
-      gtk_file_selection_populate (fs, path, FALSE); /* change directories. */\r
-      g_free (path);\r
-    }\r
-}      \r
-\r
-static void\r
-gtk_file_selection_next_button (GtkWidget *widget, gpointer data){\r
-  GtkFileSelection *fs = data;\r
-  GList *list;\r
-  GList *first;\r
-  gchar *path;\r
-\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  list = fs->next_history;\r
-\r
-  if (list && g_list_length(list) > 0)\r
-    {\r
-      first = list;            /*get first element*/\r
-      list = list->next;       /*pop off current directory*/\r
-      \r
-      if (list)\r
-       list->prev = NULL;\r
-      \r
-      fs->next_history = list;                       /*update prev_history list*/\r
-       \r
-      path = g_malloc(strlen(first->data)+4);        /*plenty of space*/\r
-      strcpy(path,first->data);\r
-      strcat(path,"/");                              /*append a /   */\r
-      gtk_file_selection_populate (fs, path, FALSE); /*change directories.*/\r
-      g_free(path);\r
-       \r
-      first->next = NULL;     /* orphan the old first node */\r
-      g_list_free (first);    /* free the node (data is now in use by next_history) */\r
-      \r
-    }\r
-}      \r
-\r
-void static\r
-gtk_file_selection_refresh_button (GtkWidget *widget, gpointer data){\r
-  GtkFileSelection *fs = data;\r
-\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  gtk_file_selection_populate (fs,"",FALSE);\r
-}\r
-\r
-static void\r
-gtk_file_selection_mask_entry_callback (GtkWidget *widget, gpointer data){\r
-  GtkFileSelection *fs = data;\r
-\r
-  if(fs->mask)\r
-    g_free (fs->mask);\r
-               \r
-  fs->mask = g_strdup(gtk_entry_get_text (GTK_ENTRY(fs->mask_entry)));\r
-       \r
-  if (strlen(fs->mask) == 0)\r
-    {\r
-      g_free (fs->mask);\r
-      fs->mask = NULL;\r
-    }\r
-       \r
-  gtk_file_selection_refresh_button (widget,data);\r
-}\r
-\r
-static gboolean gtk_file_selection_history_combo_list_key_handler(GtkWidget *widget,\r
-                                                                 GdkEventKey *event,\r
-                                                                 gpointer user_data)\r
-{\r
-  /*\r
-  g_print("Key pressed! \n");\r
-  */\r
-       \r
-  return TRUE;\r
-}\r
-\r
-static gboolean gtk_file_selection_history_combo_list_callback (GtkWidget *thelist,\r
-                                                               GdkEventButton *event,\r
-                                                               gpointer user_data)\r
-{\r
-\r
-  GtkFileSelection *fs = user_data;\r
-  GList *list;\r
-  gchar *path;\r
-               \r
-  list = fs->next_history;\r
-  if(list)\r
-    {\r
-      g_free (list->data);\r
-      list = list->next;\r
-    }\r
-  g_list_free (fs->next_history);\r
-  fs->next_history = NULL;\r
-                       \r
-  path = g_malloc(strlen(gtk_entry_get_text(GTK_ENTRY (((GtkCombo *)fs->history_combo)->entry)))+4);\r
-  strcpy (path,gtk_entry_get_text(GTK_ENTRY( ((GtkCombo *)fs->history_combo)->entry)));\r
-  strcat (path,"/");\r
-       \r
-  gtk_file_selection_populate (fs,path,TRUE);\r
-       \r
-  g_free (path);\r
-\r
-  return TRUE;\r
-}\r
-\r
-static gboolean\r
-gtk_file_selection_history_combo_callback (GtkWidget *widget, GdkEventKey *event, gpointer data)\r
-{\r
-  GtkEntry *entry=(GtkEntry *)widget;\r
-  GtkFileSelection *fs=data;\r
-  GList *list;\r
-  gchar *path;\r
-       \r
-  g_return_val_if_fail (fs != NULL,FALSE);\r
-  g_return_val_if_fail (GTK_IS_FILE_SELECTION (fs),FALSE);\r
-       \r
-\r
-  if (event->keyval == GDK_Return)\r
-    {\r
-      list = fs->next_history;\r
-      if (list)\r
-       {\r
-         g_free (list->data);\r
-         list = list->next;\r
-       }\r
-      g_list_free (fs->next_history);\r
-      fs->next_history = NULL;\r
-      \r
-      path = g_malloc(strlen(gtk_entry_get_text(entry))+4);\r
-      strcpy (path,gtk_entry_get_text(entry));\r
-      strcat (path,"/");\r
-      gtk_file_selection_populate (fs,path,TRUE);\r
-      g_free (path);\r
-      gtk_signal_emit_stop_by_name (GTK_OBJECT (widget), "key_press_event");\r
-      return TRUE;\r
-    }\r
-  else\r
-    {\r
-      return FALSE;\r
-    }\r
-\r
-}\r
-\r
-static void\r
-gtk_file_selection_update_history_menu (GtkFileSelection *fs,\r
-                                       gchar *current_directory)\r
-{\r
-  gchar *current_dir;\r
-\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-  g_return_if_fail (current_directory != NULL);\r
-  \r
-  current_dir = g_strdup (current_directory);\r
-\r
-  if(fs->prev_history)\r
-    {\r
-      if (strcmp((fs->prev_history)->data,current_dir))\r
-       { /*if this item isn't on the top of the list */\r
-         fs->prev_history = g_list_prepend(fs->prev_history,g_strdup(current_dir));\r
-       }\r
-    } else {\r
-      fs->prev_history = g_list_prepend(fs->prev_history,g_strdup(current_dir));\r
-    }\r
-  \r
-  gtk_combo_set_popdown_strings (GTK_COMBO (fs->history_combo),fs->prev_history);\r
-  \r
-  g_free (current_dir);\r
-}\r
-\r
-static void\r
-gtk_file_selection_file_button (GtkWidget *widget,\r
-                              gint row, \r
-                              gint column, \r
-                              GdkEventButton *bevent,\r
-                              gpointer user_data)\r
-{\r
-  GtkFileSelection *fs = NULL;\r
-  gchar *filename, *temp = NULL;\r
-  \r
-  g_return_if_fail (GTK_IS_CLIST (widget));\r
-\r
-  fs = user_data;\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-  \r
-  gtk_clist_get_text (GTK_CLIST (fs->file_list), row, 0, &temp);\r
-  filename = g_strdup (temp);\r
-\r
-  if (filename)\r
-    {\r
-      if (bevent)\r
-       switch (bevent->type)\r
-         {\r
-         case GDK_2BUTTON_PRESS:\r
-           gtk_button_clicked (GTK_BUTTON (fs->ok_button));\r
-           break;\r
-           \r
-         default:\r
-           gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename);\r
-           break;\r
-         }\r
-      else\r
-       gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename);\r
-      \r
-      g_free (filename);\r
-    }\r
-}\r
-\r
-static void\r
-gtk_file_selection_dir_button (GtkWidget *widget,\r
-                              gint row, \r
-                              gint column, \r
-                              GdkEventButton *bevent,\r
-                              gpointer user_data)\r
-{\r
-  GList *list;\r
-  GtkFileSelection *fs = NULL;\r
-  gchar *filename, *temp = NULL;\r
-\r
-  g_return_if_fail (GTK_IS_CLIST (widget));\r
-\r
-  fs = GTK_FILE_SELECTION (user_data);\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  gtk_clist_get_text (GTK_CLIST (fs->dir_list), row, 0, &temp);\r
-  filename = g_strdup (temp);\r
-\r
-  if (filename)\r
-    {\r
-      if (bevent)\r
-       switch (bevent->type)\r
-         {\r
-         case GDK_2BUTTON_PRESS:\r
-           list = fs->next_history;\r
-           if (list)\r
-             {\r
-               g_free (list->data);\r
-               list = list->next;\r
-             }\r
-           g_list_free (fs->next_history);\r
-           fs->next_history = NULL;\r
-       \r
-           gtk_file_selection_populate (fs, filename, FALSE);\r
-           gtk_entry_set_text(GTK_ENTRY(fs->selection_entry),fs->saved_entry);\r
-           g_free (fs->saved_entry);\r
-           fs->saved_entry = NULL;\r
-           break;\r
-           \r
-         default:\r
-           /* here we need to add the "filename" to the beginning of what's already\r
-              in the entry.  Save what's in the entry, then restore it on the double click\r
-           */\r
-           if (fs->saved_entry) g_free (fs->saved_entry);\r
-           fs->saved_entry=g_strdup(gtk_entry_get_text(GTK_ENTRY (fs->selection_entry)));\r
-       \r
-           temp=g_strconcat(filename,fs->saved_entry,NULL);\r
-           gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), temp);\r
-           g_free (temp);\r
-       \r
-           break;\r
-         }\r
-      else\r
-       gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename);\r
-      \r
-      g_free (filename);\r
-    }\r
-}\r
-\r
-static void\r
-gtk_file_selection_undir_button (GtkWidget *widget,\r
-                              gint row,\r
-                              gint column,\r
-                              GdkEventButton *bevent,\r
-                              gpointer user_data)\r
-{\r
-  GtkFileSelection *fs = NULL;\r
-  gchar *filename, *temp = NULL;\r
-\r
-  g_return_if_fail (GTK_IS_CLIST (widget));\r
-\r
-  fs = GTK_FILE_SELECTION (user_data);\r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-\r
-  gtk_clist_get_text (GTK_CLIST (fs->dir_list), row, 0, &temp);\r
-  filename = g_strdup (temp);\r
-\r
-  if (filename)\r
-    {\r
-      if (bevent)\r
-       switch (bevent->type)\r
-         {\r
-         default:\r
-           /* here we need to add the "filename" to the beginning of what's already\r
-              in the entry.  Save what's in the entry, then restore it on the double click\r
-           */\r
-           if (fs->saved_entry)\r
-             {\r
-               gtk_entry_set_text (GTK_ENTRY (fs->selection_entry),fs->saved_entry);\r
-               g_free (fs->saved_entry);\r
-               fs->saved_entry = NULL;\r
-             }\r
-           break;\r
-         }\r
-      else\r
-       gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename); //?????\r
-\r
-      g_free (filename);\r
-    }\r
-}\r
-\r
-static void\r
-gtk_file_selection_populate (GtkFileSelection *fs,\r
-                            gchar            *rel_path,\r
-                            gint              try_complete)\r
-{\r
-  CompletionState *cmpl_state;\r
-  PossibleCompletion* poss;\r
-  gchar* filename;\r
-  gint row;\r
-  gchar* rem_path = rel_path;\r
-  gchar* sel_text;\r
-  gchar* text[2];\r
-  gint did_recurse = FALSE;\r
-  gint possible_count = 0;\r
-  gint selection_index = -1;\r
-  gint file_list_width;\r
-  gint dir_list_width;\r
-  \r
-  g_return_if_fail (fs != NULL);\r
-  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));\r
-  \r
-  cmpl_state = (CompletionState*) fs->cmpl_state;\r
-  poss = cmpl_completion_matches (rel_path, &rem_path, cmpl_state);\r
-\r
-  if (!cmpl_state_okay (cmpl_state))\r
-    {\r
-      /* Something went wrong. */\r
-      gtk_file_selection_abort (fs);\r
-      return;\r
-    }\r
-\r
-  g_assert (cmpl_state->reference_dir);\r
-\r
-  gtk_clist_freeze (GTK_CLIST (fs->dir_list));\r
-  gtk_clist_clear (GTK_CLIST (fs->dir_list));\r
-  gtk_clist_freeze (GTK_CLIST (fs->file_list));\r
-  gtk_clist_clear (GTK_CLIST (fs->file_list));\r
-\r
-  /* Set the dir_list to include ./ and ../ */\r
-  text[1] = NULL;\r
-  text[0] = "./";\r
-  row = gtk_clist_append (GTK_CLIST (fs->dir_list), text);\r
-\r
-  text[0] = "../";\r
-  row = gtk_clist_append (GTK_CLIST (fs->dir_list), text);\r
-\r
-  /*reset the max widths of the lists*/\r
-  dir_list_width = gdk_string_width(fs->dir_list->style->font,"../");\r
-  gtk_clist_set_column_width(GTK_CLIST(fs->dir_list),0,dir_list_width);\r
-  file_list_width = 1;\r
-  gtk_clist_set_column_width(GTK_CLIST(fs->file_list),0,file_list_width);\r
-\r
-  while (poss)\r
-    {\r
-      if (cmpl_is_a_completion (poss))\r
-       {\r
-         possible_count += 1;\r
-         \r
-         filename = cmpl_this_completion (poss);\r
-\r
-         text[0] = filename;\r
-         \r
-         if (cmpl_is_directory (poss))\r
-           {\r
-             if (strcmp (filename, "./") != 0 &&\r
-                 strcmp (filename, "../") != 0)\r
-               {\r
-                 int width = gdk_string_width(fs->dir_list->style->font,\r
-                                              filename);\r
-                 row = gtk_clist_append (GTK_CLIST (fs->dir_list), text);\r
-                 if(width > dir_list_width)\r
-                   {\r
-                     dir_list_width = width;\r
-                     gtk_clist_set_column_width(GTK_CLIST(fs->dir_list),0,\r
-                                                width);\r
-                   }\r
-               }\r
-           }\r
-         else\r
-           {\r
-             if(fs->mask)\r
-               {\r
-                 if (gtk_file_selection_match_mask(filename,fs->mask))\r
-                   {\r
-                     int width = gdk_string_width(fs->file_list->style->font,\r
-                                                  filename);\r
-                     row = gtk_clist_append (GTK_CLIST (fs->file_list), text);\r
-                     if(width > file_list_width)\r
-                       {\r
-                         file_list_width = width;\r
-                         gtk_clist_set_column_width(GTK_CLIST(fs->file_list),0,\r
-                                                    width);\r
-                       }\r
-                   }\r
-               }\r
-             else\r
-               {\r
-                 int width = gdk_string_width(fs->file_list->style->font,\r
-                                              filename);\r
-                 row = gtk_clist_append (GTK_CLIST (fs->file_list), text);\r
-                 if(width > file_list_width)\r
-                   {\r
-                     file_list_width = width;\r
-                     gtk_clist_set_column_width(GTK_CLIST(fs->file_list),0,\r
-                                                width);\r
-                   }\r
-               }\r
-           }\r
-       }\r
-\r
-      poss = cmpl_next_completion (cmpl_state);\r
-    }\r
-\r
-  gtk_clist_thaw (GTK_CLIST (fs->dir_list));\r
-  gtk_clist_thaw (GTK_CLIST (fs->file_list));\r
-\r
-  /* File lists are set. */\r
-\r
-  g_assert (cmpl_state->reference_dir);\r
-\r
-  if (try_complete)\r
-    {\r
-\r
-      /* User is trying to complete filenames, so advance the user's input\r
-       * string to the updated_text, which is the common leading substring\r
-       * of all possible completions, and if its a directory attempt\r
-       * attempt completions in it. */\r
-\r
-      if (cmpl_updated_text (cmpl_state)[0])\r
-        {\r
-\r
-          if (cmpl_updated_dir (cmpl_state))\r
-            {\r
-             gchar* dir_name = g_strdup (cmpl_updated_text (cmpl_state));\r
-\r
-              did_recurse = TRUE;\r
-\r
-              gtk_file_selection_populate (fs, dir_name, TRUE);\r
-\r
-              g_free (dir_name);\r
-            }\r
-          else\r
-            {\r
-             if (fs->selection_entry)\r
-                     gtk_entry_set_text (GTK_ENTRY (fs->selection_entry),\r
-                                         cmpl_updated_text (cmpl_state));\r
-            }\r
-        }\r
-      else\r
-        {\r
-          selection_index = cmpl_last_valid_char (cmpl_state) -\r
-                            (strlen (rel_path) - strlen (rem_path));\r
-         if (fs->selection_entry)\r
-           gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), rem_path);\r
-        }\r
-    }\r
-  else\r
-    {\r
-      if (fs->selection_entry)\r
-      /* Here we need to take the old filename and keep it!*/\r
-       /*gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), "");*/\r
-       ;\r
-    }\r
-\r
-  if (!did_recurse)\r
-    {\r
-      if (fs->selection_entry)\r
-       gtk_entry_set_position (GTK_ENTRY (fs->selection_entry), selection_index);\r
-\r
-      if (fs->selection_entry)\r
-       {\r
-         sel_text = g_strconcat (_("Selection: "),\r
-                                 cmpl_reference_position (cmpl_state),\r
-                                 NULL);\r
-\r
-         gtk_label_set_text (GTK_LABEL (fs->selection_text), sel_text);\r
-         g_free (sel_text);\r
-       }\r
-\r
-  gtk_file_selection_update_history_menu (fs, cmpl_reference_position (cmpl_state));\r
-\r
-    }\r
-}\r
-\r
-static void\r
-gtk_file_selection_abort (GtkFileSelection *fs)\r
-{\r
-  gchar err_buf[256];\r
-\r
-  sprintf (err_buf, _("Directory unreadable: %s"), cmpl_strerror (cmpl_errno));\r
-\r
-  /*  BEEP gdk_beep();  */\r
-\r
-  if (fs->selection_entry)\r
-    gtk_label_set_text (GTK_LABEL (fs->selection_text), err_buf);\r
-}\r
-\r
-/**********************************************************************/\r
-/*                       External Interface                          */\r
-/**********************************************************************/\r
-\r
-/* The four completion state selectors\r
- */\r
-static gchar*\r
-cmpl_updated_text (CompletionState* cmpl_state)\r
-{\r
-  return cmpl_state->updated_text;\r
-}\r
-\r
-static gint\r
-cmpl_updated_dir (CompletionState* cmpl_state)\r
-{\r
-  return cmpl_state->re_complete;\r
-}\r
-\r
-static gchar*\r
-cmpl_reference_position (CompletionState* cmpl_state)\r
-{\r
-  return cmpl_state->reference_dir->fullname;\r
-}\r
-\r
-static gint\r
-cmpl_last_valid_char (CompletionState* cmpl_state)\r
-{\r
-  return cmpl_state->last_valid_char;\r
-}\r
-\r
-static gchar*\r
-cmpl_completion_fullname (gchar* text, CompletionState* cmpl_state)\r
-{\r
-  static char nothing[2] = "";\r
-\r
-  if (!cmpl_state_okay (cmpl_state))\r
-    {\r
-      return nothing;\r
-    }\r
-  else if (text[0] == '/')\r
-    {\r
-      strcpy (cmpl_state->updated_text, text);\r
-    }\r
-  else if (text[0] == '~')\r
-    {\r
-      CompletionDir* dir;\r
-      char* slash;\r
-\r
-      dir = open_user_dir (text, cmpl_state);\r
-\r
-      if (!dir)\r
-       {\r
-         /* spencer says just return ~something, so\r
-          * for now just do it. */\r
-         strcpy (cmpl_state->updated_text, text);\r
-       }\r
-      else\r
-       {\r
-\r
-         strcpy (cmpl_state->updated_text, dir->fullname);\r
-\r
-         slash = strchr (text, '/');\r
-\r
-         if (slash)\r
-           strcat (cmpl_state->updated_text, slash);\r
-       }\r
-    }\r
-  else\r
-    {\r
-      strcpy (cmpl_state->updated_text, cmpl_state->reference_dir->fullname);\r
-      if (strcmp (cmpl_state->reference_dir->fullname, "/") != 0)\r
-       strcat (cmpl_state->updated_text, "/");\r
-      strcat (cmpl_state->updated_text, text);\r
-    }\r
-\r
-  return cmpl_state->updated_text;\r
-}\r
-\r
-/* The three completion selectors\r
- */\r
-static gchar*\r
-cmpl_this_completion (PossibleCompletion* pc)\r
-{\r
-  return pc->text;\r
-}\r
-\r
-static gint\r
-cmpl_is_directory (PossibleCompletion* pc)\r
-{\r
-  return pc->is_directory;\r
-}\r
-\r
-static gint\r
-cmpl_is_a_completion (PossibleCompletion* pc)\r
-{\r
-  return pc->is_a_completion;\r
-}\r
-\r
-/**********************************************************************/\r
-/*                      Construction, deletion                       */\r
-/**********************************************************************/\r
-\r
-static CompletionState*\r
-cmpl_init_state (void)\r
-{\r
-  gchar getcwd_buf[2*MAXPATHLEN];\r
-  CompletionState *new_state;\r
-\r
-  new_state = g_new (CompletionState, 1);\r
-\r
-  /* We don't use getcwd() on SUNOS, because, it does a popen("pwd")\r
-   * and, if that wasn't bad enough, hangs in doing so.\r
-   */\r
-#if defined(sun) && !defined(__SVR4)\r
-  if (!getwd (getcwd_buf))\r
-#else    \r
-  if (!getcwd (getcwd_buf, MAXPATHLEN))\r
-#endif    \r
-    {\r
-      /* Oh joy, we can't get the current directory. Um..., we should have\r
-       * a root directory, right? Right? (Probably not portable to non-Unix)\r
-       */\r
-      strcpy (getcwd_buf, "/");\r
-    }\r
-\r
-tryagain:\r
-\r
-  new_state->reference_dir = NULL;\r
-  new_state->completion_dir = NULL;\r
-  new_state->active_completion_dir = NULL;\r
-  new_state->directory_storage = NULL;\r
-  new_state->directory_sent_storage = NULL;\r
-  new_state->last_valid_char = 0;\r
-  new_state->updated_text = g_new (gchar, MAXPATHLEN);\r
-  new_state->updated_text_alloc = MAXPATHLEN;\r
-  new_state->the_completion.text = g_new (gchar, MAXPATHLEN);\r
-  new_state->the_completion.text_alloc = MAXPATHLEN;\r
-  new_state->user_dir_name_buffer = NULL;\r
-  new_state->user_directories = NULL;\r
-\r
-  new_state->reference_dir =  open_dir (getcwd_buf, new_state);\r
-\r
-  if (!new_state->reference_dir)\r
-    {\r
-      /* Directories changing from underneath us, grumble */\r
-      strcpy (getcwd_buf, "/");\r
-      goto tryagain;\r
-    }\r
-\r
-  return new_state;\r
-}\r
-\r
-static void\r
-cmpl_free_dir_list(GList* dp0)\r
-{\r
-  GList *dp = dp0;\r
-\r
-  while (dp) {\r
-    free_dir (dp->data);\r
-    dp = dp->next;\r
-  }\r
-\r
-  g_list_free(dp0);\r
-}\r
-\r
-static void\r
-cmpl_free_dir_sent_list(GList* dp0)\r
-{\r
-  GList *dp = dp0;\r
-\r
-  while (dp) {\r
-    free_dir_sent (dp->data);\r
-    dp = dp->next;\r
-  }\r
-\r
-  g_list_free(dp0);\r
-}\r
-\r
-static void\r
-cmpl_free_state (CompletionState* cmpl_state)\r
-{\r
-  cmpl_free_dir_list (cmpl_state->directory_storage);\r
-  cmpl_free_dir_sent_list (cmpl_state->directory_sent_storage);\r
-\r
-  if (cmpl_state->user_dir_name_buffer)\r
-    g_free (cmpl_state->user_dir_name_buffer);\r
-  if (cmpl_state->user_directories)\r
-    g_free (cmpl_state->user_directories);\r
-  if (cmpl_state->the_completion.text)\r
-    g_free (cmpl_state->the_completion.text);\r
-  if (cmpl_state->updated_text)\r
-    g_free (cmpl_state->updated_text);\r
-\r
-  g_free (cmpl_state);\r
-}\r
-\r
-static void\r
-free_dir(CompletionDir* dir)\r
-{\r
-  g_free(dir->fullname);\r
-  g_free(dir);\r
-}\r
-\r
-static void\r
-free_dir_sent(CompletionDirSent* sent)\r
-{\r
-  g_free(sent->name_buffer);\r
-  g_free(sent->entries);\r
-  g_free(sent);\r
-}\r
-\r
-static void\r
-prune_memory_usage(CompletionState *cmpl_state)\r
-{\r
-  GList* cdsl = cmpl_state->directory_sent_storage;\r
-  GList* cdl = cmpl_state->directory_storage;\r
-  GList* cdl0 = cdl;\r
-  gint len = 0;\r
-\r
-  for(; cdsl && len < CMPL_DIRECTORY_CACHE_SIZE; len += 1)\r
-    cdsl = cdsl->next;\r
-\r
-  if (cdsl) {\r
-    cmpl_free_dir_sent_list(cdsl->next);\r
-    cdsl->next = NULL;\r
-  }\r
-\r
-  cmpl_state->directory_storage = NULL;\r
-  while (cdl) {\r
-    if (cdl->data == cmpl_state->reference_dir)\r
-      cmpl_state->directory_storage = g_list_prepend(NULL, cdl->data);\r
-    else\r
-      free_dir (cdl->data);\r
-    cdl = cdl->next;\r
-  }\r
-\r
-  g_list_free(cdl0);\r
-}\r
-\r
-/**********************************************************************/\r
-/*                        The main entrances.                         */\r
-/**********************************************************************/\r
-\r
-static PossibleCompletion*\r
-cmpl_completion_matches (gchar* text_to_complete,\r
-                        gchar** remaining_text,\r
-                        CompletionState* cmpl_state)\r
-{\r
-  gchar* first_slash;\r
-  PossibleCompletion *poss;\r
-\r
-  prune_memory_usage(cmpl_state);\r
-\r
-  g_assert (text_to_complete != NULL);\r
-\r
-  cmpl_state->user_completion_index = -1;\r
-  cmpl_state->last_completion_text = text_to_complete;\r
-  cmpl_state->the_completion.text[0] = 0;\r
-  cmpl_state->last_valid_char = 0;\r
-  cmpl_state->updated_text_len = -1;\r
-  cmpl_state->updated_text[0] = 0;\r
-  cmpl_state->re_complete = FALSE;\r
-\r
-  first_slash = strchr (text_to_complete, '/');\r
-\r
-  if (text_to_complete[0] == '~' && !first_slash)\r
-    {\r
-      /* Text starts with ~ and there is no slash, show all the\r
-       * home directory completions.\r
-       */\r
-      poss = attempt_homedir_completion (text_to_complete, cmpl_state);\r
-\r
-      update_cmpl(poss, cmpl_state);\r
-\r
-      return poss;\r
-    }\r
-\r
-  cmpl_state->reference_dir =\r
-    open_ref_dir (text_to_complete, remaining_text, cmpl_state);\r
-\r
-  if(!cmpl_state->reference_dir)\r
-    return NULL;\r
-\r
-  cmpl_state->completion_dir =\r
-    find_completion_dir (*remaining_text, remaining_text, cmpl_state);\r
-\r
-  cmpl_state->last_valid_char = *remaining_text - text_to_complete;\r
-\r
-  if(!cmpl_state->completion_dir)\r
-    return NULL;\r
-\r
-  cmpl_state->completion_dir->cmpl_index = -1;\r
-  cmpl_state->completion_dir->cmpl_parent = NULL;\r
-  cmpl_state->completion_dir->cmpl_text = *remaining_text;\r
-\r
-  cmpl_state->active_completion_dir = cmpl_state->completion_dir;\r
-\r
-  cmpl_state->reference_dir = cmpl_state->completion_dir;\r
-\r
-  poss = attempt_file_completion(cmpl_state);\r
-\r
-  update_cmpl(poss, cmpl_state);\r
-\r
-  return poss;\r
-}\r
-\r
-static PossibleCompletion*\r
-cmpl_next_completion (CompletionState* cmpl_state)\r
-{\r
-  PossibleCompletion* poss = NULL;\r
-\r
-  cmpl_state->the_completion.text[0] = 0;\r
-\r
-  if(cmpl_state->user_completion_index >= 0)\r
-    poss = attempt_homedir_completion(cmpl_state->last_completion_text, cmpl_state);\r
-  else\r
-    poss = attempt_file_completion(cmpl_state);\r
-\r
-  update_cmpl(poss, cmpl_state);\r
-\r
-  return poss;\r
-}\r
-\r
-/**********************************************************************/\r
-/*                      Directory Operations                         */\r
-/**********************************************************************/\r
-\r
-/* Open the directory where completion will begin from, if possible. */\r
-static CompletionDir*\r
-open_ref_dir(gchar* text_to_complete,\r
-            gchar** remaining_text,\r
-            CompletionState* cmpl_state)\r
-{\r
-  gchar* first_slash;\r
-  CompletionDir *new_dir;\r
-\r
-  first_slash = strchr(text_to_complete, '/');\r
-\r
-  if (text_to_complete[0] == '~')\r
-    {\r
-      new_dir = open_user_dir(text_to_complete, cmpl_state);\r
-\r
-      if(new_dir)\r
-       {\r
-         if(first_slash)\r
-           *remaining_text = first_slash + 1;\r
-         else\r
-           *remaining_text = text_to_complete + strlen(text_to_complete);\r
-       }\r
-      else\r
-       {\r
-         return NULL;\r
-       }\r
-    }\r
-  else if (text_to_complete[0] == '/' || !cmpl_state->reference_dir)\r
-    {\r
-      gchar *tmp = g_strdup(text_to_complete);\r
-      gchar *p;\r
-\r
-      p = tmp;\r
-      while (*p && *p != '*' && *p != '?')\r
-       p++;\r
-\r
-      *p = '\0';\r
-      p = strrchr(tmp, '/');\r
-      if (p)\r
-       {\r
-         if (p == tmp)\r
-           p++;\r
-      \r
-         *p = '\0';\r
-\r
-         new_dir = open_dir(tmp, cmpl_state);\r
-\r
-         if(new_dir)\r
-           *remaining_text = text_to_complete + \r
-             ((p == tmp + 1) ? (p - tmp) : (p + 1 - tmp));\r
-       }\r
-      else\r
-       {\r
-         /* If no possible candidates, use the cwd */\r
-         gchar *curdir = g_get_current_dir ();\r
-         \r
-         new_dir = open_dir(curdir, cmpl_state);\r
-\r
-         if (new_dir)\r
-           *remaining_text = text_to_complete;\r
-\r
-         g_free (curdir);\r
-       }\r
-\r
-      g_free (tmp);\r
-    }\r
-  else\r
-    {\r
-      *remaining_text = text_to_complete;\r
-\r
-      new_dir = open_dir(cmpl_state->reference_dir->fullname, cmpl_state);\r
-    }\r
-\r
-  if(new_dir)\r
-    {\r
-      new_dir->cmpl_index = -1;\r
-      new_dir->cmpl_parent = NULL;\r
-    }\r
-\r
-  return new_dir;\r
-}\r
-\r
-/* open a directory by user name */\r
-static CompletionDir*\r
-open_user_dir(gchar* text_to_complete,\r
-             CompletionState *cmpl_state)\r
-{\r
-  gchar *first_slash;\r
-  gint cmp_len;\r
-\r
-  g_assert(text_to_complete && text_to_complete[0] == '~');\r
-\r
-  first_slash = strchr(text_to_complete, '/');\r
-\r
-  if (first_slash)\r
-    cmp_len = first_slash - text_to_complete - 1;\r
-  else\r
-    cmp_len = strlen(text_to_complete + 1);\r
-\r
-  if(!cmp_len)\r
-    {\r
-      /* ~/ */\r
-      gchar *homedir = g_get_home_dir ();\r
-\r
-      if (homedir)\r
-       return open_dir(homedir, cmpl_state);\r
-      else\r
-       return NULL;\r
-    }\r
-  else\r
-    {\r
-      /* ~user/ */\r
-      char* copy = g_new(char, cmp_len + 1);\r
-      struct passwd *pwd;\r
-      strncpy(copy, text_to_complete + 1, cmp_len);\r
-      copy[cmp_len] = 0;\r
-      pwd = getpwnam(copy);\r
-      g_free(copy);\r
-      if (!pwd)\r
-       {\r
-         cmpl_errno = errno;\r
-         return NULL;\r
-       }\r
-\r
-      return open_dir(pwd->pw_dir, cmpl_state);\r
-    }\r
-}\r
-\r
-/* open a directory relative the the current relative directory */\r
-static CompletionDir*\r
-open_relative_dir(gchar* dir_name,\r
-                 CompletionDir* dir,\r
-                 CompletionState *cmpl_state)\r
-{\r
-  gchar path_buf[2*MAXPATHLEN];\r
-\r
-  if(dir->fullname_len + strlen(dir_name) + 2 >= MAXPATHLEN)\r
-    {\r
-      cmpl_errno = CMPL_ERRNO_TOO_LONG;\r
-      return NULL;\r
-    }\r
-\r
-  strcpy(path_buf, dir->fullname);\r
-\r
-  if(dir->fullname_len > 1)\r
-    {\r
-      path_buf[dir->fullname_len] = '/';\r
-      strcpy(path_buf + dir->fullname_len + 1, dir_name);\r
-    }\r
-  else\r
-    {\r
-      strcpy(path_buf + dir->fullname_len, dir_name);\r
-    }\r
-\r
-  return open_dir(path_buf, cmpl_state);\r
-}\r
-\r
-/* after the cache lookup fails, really open a new directory */\r
-static CompletionDirSent*\r
-open_new_dir(gchar* dir_name, struct stat* sbuf, gboolean stat_subdirs)\r
-{\r
-  CompletionDirSent* sent;\r
-  DIR* directory;\r
-  gchar *buffer_ptr;\r
-  struct dirent *dirent_ptr;\r
-  gint buffer_size = 0;\r
-  gint entry_count = 0;\r
-  gint i;\r
-  struct stat ent_sbuf;\r
-  char path_buf[MAXPATHLEN*2];\r
-  gint path_buf_len;\r
-\r
-  sent = g_new(CompletionDirSent, 1);\r
-  sent->mtime = sbuf->st_mtime;\r
-  sent->inode = sbuf->st_ino;\r
-  sent->device = sbuf->st_dev;\r
-\r
-  path_buf_len = strlen(dir_name);\r
-\r
-  if (path_buf_len > MAXPATHLEN)\r
-    {\r
-      cmpl_errno = CMPL_ERRNO_TOO_LONG;\r
-      return NULL;\r
-    }\r
-\r
-  strcpy(path_buf, dir_name);\r
-\r
-  directory = opendir(dir_name);\r
-\r
-  if(!directory)\r
-    {\r
-      cmpl_errno = errno;\r
-      return NULL;\r
-    }\r
-\r
-  while((dirent_ptr = readdir(directory)) != NULL)\r
-    {\r
-      int entry_len = strlen(dirent_ptr->d_name);\r
-      buffer_size += entry_len + 1;\r
-      entry_count += 1;\r
-\r
-      if(path_buf_len + entry_len + 2 >= MAXPATHLEN)\r
-       {\r
-         cmpl_errno = CMPL_ERRNO_TOO_LONG;\r
-         closedir(directory);\r
-         return NULL;\r
-       }\r
-    }\r
-\r
-  sent->name_buffer = g_new(gchar, buffer_size);\r
-  sent->entries = g_new(CompletionDirEntry, entry_count);\r
-  sent->entry_count = entry_count;\r
-\r
-  buffer_ptr = sent->name_buffer;\r
-\r
-  rewinddir(directory);\r
-\r
-  for(i = 0; i < entry_count; i += 1)\r
-    {\r
-      dirent_ptr = readdir(directory);\r
-\r
-      if(!dirent_ptr)\r
-       {\r
-         cmpl_errno = errno;\r
-         closedir(directory);\r
-         return NULL;\r
-       }\r
-\r
-      strcpy(buffer_ptr, dirent_ptr->d_name);\r
-      sent->entries[i].entry_name = buffer_ptr;\r
-      buffer_ptr += strlen(dirent_ptr->d_name);\r
-      *buffer_ptr = 0;\r
-      buffer_ptr += 1;\r
-\r
-      path_buf[path_buf_len] = '/';\r
-      strcpy(path_buf + path_buf_len + 1, dirent_ptr->d_name);\r
-\r
-      if (stat_subdirs)\r
-       {\r
-         if(stat(path_buf, &ent_sbuf) >= 0 && S_ISDIR(ent_sbuf.st_mode))\r
-           sent->entries[i].is_dir = 1;\r
-         else\r
-           /* stat may fail, and we don't mind, since it could be a\r
-            * dangling symlink. */\r
-           sent->entries[i].is_dir = 0;\r
-       }\r
-      else\r
-       sent->entries[i].is_dir = 1;\r
-    }\r
-\r
-  qsort(sent->entries, sent->entry_count, sizeof(CompletionDirEntry), compare_cmpl_dir);\r
-\r
-  closedir(directory);\r
-\r
-  return sent;\r
-}\r
-\r
-static gboolean\r
-check_dir(gchar *dir_name, struct stat *result, gboolean *stat_subdirs)\r
-{\r
-  /* A list of directories that we know only contain other directories.\r
-   * Trying to stat every file in these directories would be very\r
-   * expensive.\r
-   */\r
-\r
-  static struct {\r
-    gchar *name;\r
-    gboolean present;\r
-    struct stat statbuf;\r
-  } no_stat_dirs[] = {\r
-    { "/afs", FALSE, { 0 } },\r
-    { "/net", FALSE, { 0 } }\r
-  };\r
-\r
-  static const gint n_no_stat_dirs = sizeof(no_stat_dirs) / sizeof(no_stat_dirs[0]);\r
-  static gboolean initialized = FALSE;\r
-\r
-  gint i;\r
-\r
-  if (!initialized)\r
-    {\r
-      initialized = TRUE;\r
-      for (i = 0; i < n_no_stat_dirs; i++)\r
-       {\r
-         if (stat (no_stat_dirs[i].name, &no_stat_dirs[i].statbuf) == 0)\r
-           no_stat_dirs[i].present = TRUE;\r
-       }\r
-    }\r
-\r
-  if(stat(dir_name, result) < 0)\r
-    {\r
-      cmpl_errno = errno;\r
-      return FALSE;\r
-    }\r
-\r
-  *stat_subdirs = TRUE;\r
-  for (i=0; i<n_no_stat_dirs; i++)\r
-    {\r
-      if (no_stat_dirs[i].present &&\r
-         (no_stat_dirs[i].statbuf.st_dev == result->st_dev) &&\r
-         (no_stat_dirs[i].statbuf.st_ino == result->st_ino))\r
-       {\r
-         *stat_subdirs = FALSE;\r
-         break;\r
-       }\r
-    }\r
-\r
-  return TRUE;\r
-}\r
-\r
-/* open a directory by absolute pathname */\r
-static CompletionDir*\r
-open_dir(gchar* dir_name, CompletionState* cmpl_state)\r
-{\r
-  struct stat sbuf;\r
-  gboolean stat_subdirs;\r
-  CompletionDirSent *sent;\r
-  GList* cdsl;\r
-\r
-  if (!check_dir (dir_name, &sbuf, &stat_subdirs))\r
-    return NULL;\r
-\r
-  cdsl = cmpl_state->directory_sent_storage;\r
-\r
-  while (cdsl)\r
-    {\r
-      sent = cdsl->data;\r
-\r
-      if(sent->inode == sbuf.st_ino &&\r
-        sent->mtime == sbuf.st_mtime &&\r
-        sent->device == sbuf.st_dev)\r
-       return attach_dir(sent, dir_name, cmpl_state);\r
-\r
-      cdsl = cdsl->next;\r
-    }\r
-\r
-  sent = open_new_dir(dir_name, &sbuf, stat_subdirs);\r
-\r
-  if (sent) {\r
-    cmpl_state->directory_sent_storage =\r
-      g_list_prepend(cmpl_state->directory_sent_storage, sent);\r
-\r
-    return attach_dir(sent, dir_name, cmpl_state);\r
-  }\r
-\r
-  return NULL;\r
-}\r
-\r
-static CompletionDir*\r
-attach_dir(CompletionDirSent* sent, gchar* dir_name, CompletionState *cmpl_state)\r
-{\r
-  CompletionDir* new_dir;\r
-\r
-  new_dir = g_new(CompletionDir, 1);\r
-\r
-  cmpl_state->directory_storage =\r
-    g_list_prepend(cmpl_state->directory_storage, new_dir);\r
-\r
-  new_dir->sent = sent;\r
-  new_dir->fullname = g_strdup(dir_name);\r
-  new_dir->fullname_len = strlen(dir_name);\r
-\r
-  return new_dir;\r
-}\r
-\r
-static gint\r
-correct_dir_fullname(CompletionDir* cmpl_dir)\r
-{\r
-  gint length = strlen(cmpl_dir->fullname);\r
-  struct stat sbuf;\r
-\r
-  if (strcmp(cmpl_dir->fullname + length - 2, "/.") == 0)\r
-    {\r
-      if (length == 2) \r
-       {\r
-         strcpy(cmpl_dir->fullname, "/");\r
-         cmpl_dir->fullname_len = 1;\r
-         return TRUE;\r
-       } else {\r
-         cmpl_dir->fullname[length - 2] = 0;\r
-       }\r
-    }\r
-  else if (strcmp(cmpl_dir->fullname + length - 3, "/./") == 0)\r
-    cmpl_dir->fullname[length - 2] = 0;\r
-  else if (strcmp(cmpl_dir->fullname + length - 3, "/..") == 0)\r
-    {\r
-      if(length == 3)\r
-       {\r
-         strcpy(cmpl_dir->fullname, "/");\r
-         cmpl_dir->fullname_len = 1;\r
-         return TRUE;\r
-       }\r
-\r
-      if(stat(cmpl_dir->fullname, &sbuf) < 0)\r
-       {\r
-         cmpl_errno = errno;\r
-         return FALSE;\r
-       }\r
-\r
-      cmpl_dir->fullname[length - 2] = 0;\r
-\r
-      if(!correct_parent(cmpl_dir, &sbuf))\r
-       return FALSE;\r
-    }\r
-  else if (strcmp(cmpl_dir->fullname + length - 4, "/../") == 0)\r
-    {\r
-      if(length == 4)\r
-       {\r
-         strcpy(cmpl_dir->fullname, "/");\r
-         cmpl_dir->fullname_len = 1;\r
-         return TRUE;\r
-       }\r
-\r
-      if(stat(cmpl_dir->fullname, &sbuf) < 0)\r
-       {\r
-         cmpl_errno = errno;\r
-         return FALSE;\r
-       }\r
-\r
-      cmpl_dir->fullname[length - 3] = 0;\r
-\r
-      if(!correct_parent(cmpl_dir, &sbuf))\r
-       return FALSE;\r
-    }\r
-\r
-  cmpl_dir->fullname_len = strlen(cmpl_dir->fullname);\r
-\r
-  return TRUE;\r
-}\r
-\r
-static gint\r
-correct_parent(CompletionDir* cmpl_dir, struct stat *sbuf)\r
-{\r
-  struct stat parbuf;\r
-  gchar *last_slash;\r
-  gchar *new_name;\r
-  gchar c = 0;\r
-\r
-  last_slash = strrchr(cmpl_dir->fullname, '/');\r
-\r
-  g_assert(last_slash);\r
-\r
-  if(last_slash != cmpl_dir->fullname)\r
-    { /* last_slash[0] = 0; */ }\r
-  else\r
-    {\r
-      c = last_slash[1];\r
-      last_slash[1] = 0;\r
-    }\r
-\r
-  if (stat(cmpl_dir->fullname, &parbuf) < 0)\r
-    {\r
-      cmpl_errno = errno;\r
-      return FALSE;\r
-    }\r
-\r
-  if (parbuf.st_ino == sbuf->st_ino && parbuf.st_dev == sbuf->st_dev)\r
-    /* it wasn't a link */\r
-    return TRUE;\r
-\r
-  if(c)\r
-    last_slash[1] = c;\r
-  /* else\r
-    last_slash[0] = '/'; */\r
-\r
-  /* it was a link, have to figure it out the hard way */\r
-\r
-  new_name = find_parent_dir_fullname(cmpl_dir->fullname);\r
-\r
-  if (!new_name)\r
-    return FALSE;\r
-\r
-  g_free(cmpl_dir->fullname);\r
-\r
-  cmpl_dir->fullname = new_name;\r
-\r
-  return TRUE;\r
-}\r
-\r
-static gchar*\r
-find_parent_dir_fullname(gchar* dirname)\r
-{\r
-  gchar buffer[MAXPATHLEN];\r
-  gchar buffer2[MAXPATHLEN];\r
-\r
-#if defined(sun) && !defined(__SVR4)\r
-  if(!getwd(buffer))\r
-#else\r
-  if(!getcwd(buffer, MAXPATHLEN))\r
-#endif    \r
-    {\r
-      cmpl_errno = errno;\r
-      return NULL;\r
-    }\r
-\r
-  if(chdir(dirname) != 0 || chdir("..") != 0)\r
-    {\r
-      cmpl_errno = errno;\r
-      return NULL;\r
-    }\r
-\r
-#if defined(sun) && !defined(__SVR4)\r
-  if(!getwd(buffer2))\r
-#else\r
-  if(!getcwd(buffer2, MAXPATHLEN))\r
-#endif\r
-    {\r
-      chdir(buffer);\r
-      cmpl_errno = errno;\r
-\r
-      return NULL;\r
-    }\r
-\r
-  if(chdir(buffer) != 0)\r
-    {\r
-      cmpl_errno = errno;\r
-      return NULL;\r
-    }\r
-\r
-  return g_strdup(buffer2);\r
-}\r
-\r
-/**********************************************************************/\r
-/*                        Completion Operations                       */\r
-/**********************************************************************/\r
-\r
-static PossibleCompletion*\r
-attempt_homedir_completion(gchar* text_to_complete,\r
-                          CompletionState *cmpl_state)\r
-{\r
-  gint index, length;\r
-\r
-  if (!cmpl_state->user_dir_name_buffer &&\r
-      !get_pwdb(cmpl_state))\r
-    return NULL;\r
-  length = strlen(text_to_complete) - 1;\r
-\r
-  cmpl_state->user_completion_index += 1;\r
-\r
-  while(cmpl_state->user_completion_index < cmpl_state->user_directories_len)\r
-    {\r
-      index = first_diff_index(text_to_complete + 1,\r
-                              cmpl_state->user_directories\r
-                              [cmpl_state->user_completion_index].login);\r
-\r
-      switch(index)\r
-       {\r
-       case PATTERN_MATCH:\r
-         break;\r
-       default:\r
-         if(cmpl_state->last_valid_char < (index + 1))\r
-           cmpl_state->last_valid_char = index + 1;\r
-         cmpl_state->user_completion_index += 1;\r
-         continue;\r
-       }\r
-\r
-      cmpl_state->the_completion.is_a_completion = 1;\r
-      cmpl_state->the_completion.is_directory = 1;\r
-\r
-      append_completion_text("~", cmpl_state);\r
-\r
-      append_completion_text(cmpl_state->\r
-                             user_directories[cmpl_state->user_completion_index].login,\r
-                            cmpl_state);\r
-\r
-      return append_completion_text("/", cmpl_state);\r
-    }\r
-\r
-  if(text_to_complete[1] ||\r
-     cmpl_state->user_completion_index > cmpl_state->user_directories_len)\r
-    {\r
-      cmpl_state->user_completion_index = -1;\r
-      return NULL;\r
-    }\r
-  else\r
-    {\r
-      cmpl_state->user_completion_index += 1;\r
-      cmpl_state->the_completion.is_a_completion = 1;\r
-      cmpl_state->the_completion.is_directory = 1;\r
-\r
-      return append_completion_text("~/", cmpl_state);\r
-    }\r
-}\r
-\r
-/* returns the index (>= 0) of the first differing character,\r
- * PATTERN_MATCH if the completion matches */\r
-static gint\r
-first_diff_index(gchar* pat, gchar* text)\r
-{\r
-  gint diff = 0;\r
-\r
-  while(*pat && *text && *text == *pat)\r
-    {\r
-      pat += 1;\r
-      text += 1;\r
-      diff += 1;\r
-    }\r
-\r
-  if(*pat)\r
-    return diff;\r
-\r
-  return PATTERN_MATCH;\r
-}\r
-\r
-static PossibleCompletion*\r
-append_completion_text(gchar* text, CompletionState* cmpl_state)\r
-{\r
-  gint len, i = 1;\r
-\r
-  if(!cmpl_state->the_completion.text)\r
-    return NULL;\r
-\r
-  len = strlen(text) + strlen(cmpl_state->the_completion.text) + 1;\r
-\r
-  if(cmpl_state->the_completion.text_alloc > len)\r
-    {\r
-      strcat(cmpl_state->the_completion.text, text);\r
-      return &cmpl_state->the_completion;\r
-    }\r
-\r
-  while(i < len) { i <<= 1; }\r
-\r
-  cmpl_state->the_completion.text_alloc = i;\r
-\r
-  cmpl_state->the_completion.text = (gchar*)g_realloc(cmpl_state->the_completion.text, i);\r
-\r
-  if(!cmpl_state->the_completion.text)\r
-    return NULL;\r
-  else\r
-    {\r
-      strcat(cmpl_state->the_completion.text, text);\r
-      return &cmpl_state->the_completion;\r
-    }\r
-}\r
-\r
-static CompletionDir*\r
-find_completion_dir(gchar* text_to_complete,\r
-                   gchar** remaining_text,\r
-                   CompletionState* cmpl_state)\r
-{\r
-  gchar* first_slash = strchr(text_to_complete, '/');\r
-  CompletionDir* dir = cmpl_state->reference_dir;\r
-  CompletionDir* next;\r
-  *remaining_text = text_to_complete;\r
-\r
-  while(first_slash)\r
-    {\r
-      gint len = first_slash - *remaining_text;\r
-      gint found = 0;\r
-      gchar *found_name = NULL;         /* Quiet gcc */\r
-      gint i;\r
-      gchar* pat_buf = g_new (gchar, len + 1);\r
-\r
-      strncpy(pat_buf, *remaining_text, len);\r
-      pat_buf[len] = 0;\r
-\r
-      for(i = 0; i < dir->sent->entry_count; i += 1)\r
-       {\r
-         if(dir->sent->entries[i].is_dir &&\r
-            fnmatch(pat_buf, dir->sent->entries[i].entry_name,\r
-                    FNMATCH_FLAGS)!= FNM_NOMATCH)\r
-           {\r
-             if(found)\r
-               {\r
-                 g_free (pat_buf);\r
-                 return dir;\r
-               }\r
-             else\r
-               {\r
-                 found = 1;\r
-                 found_name = dir->sent->entries[i].entry_name;\r
-               }\r
-           }\r
-       }\r
-\r
-      if (!found)\r
-       {\r
-         /* Perhaps we are trying to open an automount directory */\r
-         found_name = pat_buf;\r
-       }\r
-\r
-      next = open_relative_dir(found_name, dir, cmpl_state);\r
-      \r
-      if(!next)\r
-       {\r
-         g_free (pat_buf);\r
-         return NULL;\r
-       }\r
-      \r
-      next->cmpl_parent = dir;\r
-      \r
-      dir = next;\r
-      \r
-      if(!correct_dir_fullname(dir))\r
-       {\r
-         g_free(pat_buf);\r
-         return NULL;\r
-       }\r
-      \r
-      *remaining_text = first_slash + 1;\r
-      first_slash = strchr(*remaining_text, '/');\r
-\r
-      g_free (pat_buf);\r
-    }\r
-\r
-  return dir;\r
-}\r
-\r
-static void\r
-update_cmpl(PossibleCompletion* poss, CompletionState* cmpl_state)\r
-{\r
-  gint cmpl_len;\r
-\r
-  if(!poss || !cmpl_is_a_completion(poss))\r
-    return;\r
-\r
-  cmpl_len = strlen(cmpl_this_completion(poss));\r
-\r
-  if(cmpl_state->updated_text_alloc < cmpl_len + 1)\r
-    {\r
-      cmpl_state->updated_text =\r
-       (gchar*)g_realloc(cmpl_state->updated_text,\r
-                         cmpl_state->updated_text_alloc);\r
-      cmpl_state->updated_text_alloc = 2*cmpl_len;\r
-    }\r
-\r
-  if(cmpl_state->updated_text_len < 0)\r
-    {\r
-      strcpy(cmpl_state->updated_text, cmpl_this_completion(poss));\r
-      cmpl_state->updated_text_len = cmpl_len;\r
-      cmpl_state->re_complete = cmpl_is_directory(poss);\r
-    }\r
-  else if(cmpl_state->updated_text_len == 0)\r
-    {\r
-      cmpl_state->re_complete = FALSE;\r
-    }\r
-  else\r
-    {\r
-      gint first_diff =\r
-       first_diff_index(cmpl_state->updated_text,\r
-                        cmpl_this_completion(poss));\r
-\r
-      cmpl_state->re_complete = FALSE;\r
-\r
-      if(first_diff == PATTERN_MATCH)\r
-       return;\r
-\r
-      if(first_diff > cmpl_state->updated_text_len)\r
-       strcpy(cmpl_state->updated_text, cmpl_this_completion(poss));\r
-\r
-      cmpl_state->updated_text_len = first_diff;\r
-      cmpl_state->updated_text[first_diff] = 0;\r
-    }\r
-}\r
-\r
-static PossibleCompletion*\r
-attempt_file_completion(CompletionState *cmpl_state)\r
-{\r
-  gchar *pat_buf, *first_slash;\r
-  CompletionDir *dir = cmpl_state->active_completion_dir;\r
-\r
-  dir->cmpl_index += 1;\r
-\r
-  if(dir->cmpl_index == dir->sent->entry_count)\r
-    {\r
-      if(dir->cmpl_parent == NULL)\r
-       {\r
-         cmpl_state->active_completion_dir = NULL;\r
-\r
-         return NULL;\r
-       }\r
-      else\r
-       {\r
-         cmpl_state->active_completion_dir = dir->cmpl_parent;\r
-\r
-         return attempt_file_completion(cmpl_state);\r
-       }\r
-    }\r
-\r
-  g_assert(dir->cmpl_text);\r
-\r
-  first_slash = strchr(dir->cmpl_text, '/');\r
-\r
-  if(first_slash)\r
-    {\r
-      gint len = first_slash - dir->cmpl_text;\r
-\r
-      pat_buf = g_new (gchar, len + 1);\r
-      strncpy(pat_buf, dir->cmpl_text, len);\r
-      pat_buf[len] = 0;\r
-    }\r
-  else\r
-    {\r
-      gint len = strlen(dir->cmpl_text);\r
-\r
-      pat_buf = g_new (gchar, len + 2);\r
-      strcpy(pat_buf, dir->cmpl_text);\r
-      strcpy(pat_buf + len, "*");\r
-    }\r
-\r
-  if(first_slash)\r
-    {\r
-      if(dir->sent->entries[dir->cmpl_index].is_dir)\r
-       {\r
-         if(fnmatch(pat_buf, dir->sent->entries[dir->cmpl_index].entry_name,\r
-                    FNMATCH_FLAGS) != FNM_NOMATCH)\r
-           {\r
-             CompletionDir* new_dir;\r
-\r
-             new_dir = open_relative_dir(dir->sent->entries[dir->cmpl_index].entry_name,\r
-                                         dir, cmpl_state);\r
-\r
-             if(!new_dir)\r
-               {\r
-                 g_free (pat_buf);\r
-                 return NULL;\r
-               }\r
-\r
-             new_dir->cmpl_parent = dir;\r
-\r
-             new_dir->cmpl_index = -1;\r
-             new_dir->cmpl_text = first_slash + 1;\r
-\r
-             cmpl_state->active_completion_dir = new_dir;\r
-\r
-             g_free (pat_buf);\r
-             return attempt_file_completion(cmpl_state);\r
-           }\r
-         else\r
-           {\r
-             g_free (pat_buf);\r
-             return attempt_file_completion(cmpl_state);\r
-           }\r
-       }\r
-      else\r
-       {\r
-         g_free (pat_buf);\r
-         return attempt_file_completion(cmpl_state);\r
-       }\r
-    }\r
-  else\r
-    {\r
-      if(dir->cmpl_parent != NULL)\r
-       {\r
-         append_completion_text(dir->fullname +\r
-                                strlen(cmpl_state->completion_dir->fullname) + 1,\r
-                                cmpl_state);\r
-         append_completion_text("/", cmpl_state);\r
-       }\r
-\r
-      append_completion_text(dir->sent->entries[dir->cmpl_index].entry_name, cmpl_state);\r
-\r
-      cmpl_state->the_completion.is_a_completion =\r
-       (fnmatch(pat_buf, dir->sent->entries[dir->cmpl_index].entry_name,\r
-                FNMATCH_FLAGS) != FNM_NOMATCH);\r
-\r
-      cmpl_state->the_completion.is_directory = dir->sent->entries[dir->cmpl_index].is_dir;\r
-      if(dir->sent->entries[dir->cmpl_index].is_dir)\r
-       append_completion_text("/", cmpl_state);\r
-\r
-      g_free (pat_buf);\r
-      return &cmpl_state->the_completion;\r
-    }\r
-}\r
-\r
-\r
-static gint\r
-get_pwdb(CompletionState* cmpl_state)\r
-{\r
-  struct passwd *pwd_ptr;\r
-  gchar* buf_ptr;\r
-  gint len = 0, i, count = 0;\r
-\r
-  if(cmpl_state->user_dir_name_buffer)\r
-    return TRUE;\r
-  setpwent ();\r
-\r
-  while ((pwd_ptr = getpwent()) != NULL)\r
-    {\r
-      len += strlen(pwd_ptr->pw_name);\r
-      len += strlen(pwd_ptr->pw_dir);\r
-      len += 2;\r
-      count += 1;\r
-    }\r
-\r
-  setpwent ();\r
-\r
-  cmpl_state->user_dir_name_buffer = g_new(gchar, len);\r
-  cmpl_state->user_directories = g_new(CompletionUserDir, count);\r
-  cmpl_state->user_directories_len = count;\r
-\r
-  buf_ptr = cmpl_state->user_dir_name_buffer;\r
-\r
-  for(i = 0; i < count; i += 1)\r
-    {\r
-      pwd_ptr = getpwent();\r
-      if(!pwd_ptr)\r
-       {\r
-         cmpl_errno = errno;\r
-         goto error;\r
-       }\r
-\r
-      strcpy(buf_ptr, pwd_ptr->pw_name);\r
-      cmpl_state->user_directories[i].login = buf_ptr;\r
-      buf_ptr += strlen(buf_ptr);\r
-      buf_ptr += 1;\r
-      strcpy(buf_ptr, pwd_ptr->pw_dir);\r
-      cmpl_state->user_directories[i].homedir = buf_ptr;\r
-      buf_ptr += strlen(buf_ptr);\r
-      buf_ptr += 1;\r
-    }\r
-\r
-  qsort(cmpl_state->user_directories,\r
-       cmpl_state->user_directories_len,\r
-       sizeof(CompletionUserDir),\r
-       compare_user_dir);\r
-\r
-  endpwent();\r
-\r
-  return TRUE;\r
-\r
-error:\r
-\r
-  if(cmpl_state->user_dir_name_buffer)\r
-    g_free(cmpl_state->user_dir_name_buffer);\r
-  if(cmpl_state->user_directories)\r
-    g_free(cmpl_state->user_directories);\r
-\r
-  cmpl_state->user_dir_name_buffer = NULL;\r
-  cmpl_state->user_directories = NULL;\r
-\r
-  return FALSE;\r
-}\r
-\r
-static gint\r
-compare_user_dir(const void* a, const void* b)\r
-{\r
-  return strcmp((((CompletionUserDir*)a))->login,\r
-               (((CompletionUserDir*)b))->login);\r
-}\r
-\r
-static gint\r
-compare_cmpl_dir(const void* a, const void* b)\r
-{\r
-  return strcmp((((CompletionDirEntry*)a))->entry_name,\r
-               (((CompletionDirEntry*)b))->entry_name);\r
-}\r
-\r
-static gint\r
-cmpl_state_okay(CompletionState* cmpl_state)\r
-{\r
-  return  cmpl_state && cmpl_state->reference_dir;\r
-}\r
-\r
-static gchar*\r
-cmpl_strerror(gint err)\r
-{\r
-  if(err == CMPL_ERRNO_TOO_LONG)\r
-    return "Name too long";\r
-  else\r
-    return g_strerror (err);\r
-}\r
-\r
-\r
-/* Testing area */\r
-#ifdef TORRIE_DEBUG\r
-\r
-/* Get the selected filename and print it to the console */\r
-void file_ok_sel( GtkWidget        *w,\r
-                  GtkFileSelection *fs )\r
-{\r
-    g_print ("%s\n", gtk_file_selection_get_filename (GTK_FILE_SELECTION (fs)));\r
-}\r
-\r
-void destroy( GtkWidget *widget,\r
-              gpointer   data )\r
-{\r
-    gtk_main_quit ();\r
-}\r
-\r
-int main( int   argc,\r
-          char *argv[] )\r
-{\r
-    GtkWidget *filew;\r
-\r
-    gtk_init (&argc, &argv);\r
-\r
-    /* Create a new file selection widget */\r
-    filew = gtk_file_selection_new ("Michael's Glorious File Selector");\r
-//    gtk_file_selection_complete(GTK_FILE_SELECTION(filew),"bob");\r
-\r
-               \r
-    gtk_signal_connect (GTK_OBJECT (filew), "destroy",\r
-                       (GtkSignalFunc) destroy, &filew);\r
-    /* Connect the ok_button to file_ok_sel function */\r
-    gtk_signal_connect (GTK_OBJECT (GTK_FILE_SELECTION (filew)->ok_button),\r
-                       "clicked", (GtkSignalFunc) file_ok_sel, filew );\r
-\r
-    /* Connect the cancel_button to destroy the widget */\r
-    gtk_signal_connect_object (GTK_OBJECT (GTK_FILE_SELECTION\r
-                                            (filew)->cancel_button),\r
-                              "clicked", (GtkSignalFunc) gtk_widget_destroy,\r
-                              GTK_OBJECT (filew));\r
-\r
-\r
-    gtk_widget_show(filew);\r
-\r
-/*\r
-    g_print("%d",gtk_file_selection_match_mask("mask.c","m*.c"));\r
-    g_print("%d",gtk_file_selection_match_mask("mask.c","m???.c"));\r
-               g_print("%d",gtk_file_selection_match_mask("mask.c","m??*.c"));\r
-               g_print("%d",gtk_file_selection_match_mask("mask.cout","m*.c"));\r
-               g_print("%d",gtk_file_selection_match_mask("mask.cout","m*.c???"));\r
-               g_print("%d",gtk_file_selection_match_mask("mask.cout","m*.c*"));\r
-               g_print("%d",gtk_file_selection_match_mask("mask.cout","n*.c???"));\r
-               g_print("%d",gtk_file_selection_match_mask("mask.c","[mn]*"));\r
-               g_print("%d",gtk_file_selection_match_mask("COPYING","*.xpm"));\r
-*/     \r
-    gtk_main ();\r
-\r
-    return 0;\r
-}\r
-/* example-end */\r
-#endif\r
+/*
+Copyright (C) 1999-2007 id Software, Inc. and contributors.
+For a list of contributors, see the accompanying CONTRIBUTORS file.
+
+This file is part of GtkRadiant.
+
+GtkRadiant is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+GtkRadiant is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with GtkRadiant; if not, write to the Free Software
+Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+/* GTK - The GIMP Toolkit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-1999.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+
+// leo FIXME: if we keep this file then we'll need to ask permission to the author, this is LGPL
+// This file is from the Advanced File Selector widget 
+// by Michael Torrie  <torriem@byu.edu>
+// http://students.cs.byu.edu/~torriem/gtk/
+
+#include <stdio.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/param.h>
+#include <dirent.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+#include <errno.h>
+#include <pwd.h>
+#include "fnmatch.h"
+
+// leo: added "gtk/"
+#include "gdk/gdkkeysyms.h"
+#include "gtk/gtkbutton.h"
+#include "gtk/gtkentry.h"
+#include "gtkfilesel.h"
+#include "gtk/gtkhbox.h"
+#include "gtk/gtkhbbox.h"
+#include "gtk/gtklabel.h"
+#include "gtk/gtklist.h"
+#include "gtk/gtklistitem.h"
+#include "gtk/gtkmain.h"
+#include "gtk/gtkscrolledwindow.h"
+#include "gtk/gtksignal.h"
+#include "gtk/gtkvbox.h"
+#include "gtk/gtkmenu.h"
+#include "gtk/gtkmenuitem.h"
+#include "gtk/gtkoptionmenu.h"
+#include "gtk/gtkclist.h"
+#include "gtk/gtkdialog.h"
+#include "gtk/gtkcombo.h"
+#include "gtk/gtkframe.h"
+
+// leo: disable NLS
+//#include "gtk/gtkintl.h"
+#define _(String) (String)
+
+#define DIR_LIST_WIDTH   180
+#define DIR_LIST_HEIGHT  180
+#define FILE_LIST_WIDTH  180
+#define FILE_LIST_HEIGHT 180
+
+/* 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
+/* The arguments used by all fnmatch() calls below
+ */
+#define FNMATCH_FLAGS (FNM_PATHNAME | FNM_PERIOD)
+
+#define CMPL_ERRNO_TOO_LONG ((1<<16)-1)
+
+/* 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;
+  gchar *name_buffer; /* memory segment containing names of all entries */
+
+  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
+{
+  gint is_dir;
+  gchar *entry_name;
+};
+
+struct _CompletionUserDir
+{
+  gchar *login;
+  gchar *homedir;
+};
+
+struct _PossibleCompletion
+{
+  /* accessible fields, all are accessed externally by functions
+   * declared above
+   */
+  gchar *text;
+  gint is_a_completion;
+  gint is_directory;
+
+  gint file_size;
+  gint file_time;
+  gint uid;
+  gint gid;
+  /* Private fields
+   */
+  gint text_alloc;
+};
+
+struct _CompletionState
+{
+  gint last_valid_char;
+  gchar *updated_text;
+  gint updated_text_len;
+  gint updated_text_alloc;
+  gint 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;
+};
+
+
+/* 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 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 gint                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 gint                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 gchar*              cmpl_completion_fullname (gchar*, CompletionState* cmpl_state);
+
+
+/* Directory operations. */
+static CompletionDir* open_ref_dir         (gchar* text_to_complete,
+                                           gchar** remaining_text,
+                                           CompletionState* cmpl_state);
+static gboolean       check_dir            (gchar *dir_name, 
+                                           struct stat *result, 
+                                           gboolean *stat_subdirs);
+static CompletionDir* open_dir             (gchar* dir_name,
+                                           CompletionState* cmpl_state);
+static CompletionDir* open_user_dir        (gchar* text_to_complete,
+                                           CompletionState *cmpl_state);
+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);
+static gchar*         find_parent_dir_fullname    (gchar* dirname);
+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 */
+static PossibleCompletion* attempt_homedir_completion(gchar* text_to_complete,
+                                                     CompletionState *cmpl_state);
+static PossibleCompletion* attempt_file_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);
+static gint get_pwdb(CompletionState* cmpl_state);
+static gint first_diff_index(gchar* pat, gchar* text);
+static gint compare_user_dir(const void* a, const void* b);
+static gint compare_cmpl_dir(const void* a, const void* b);
+static void update_cmpl(PossibleCompletion* poss,
+                       CompletionState* cmpl_state);
+
+static void gtk_file_selection_class_init    (GtkFileSelectionClass *klass);
+static void gtk_file_selection_init          (GtkFileSelection      *filesel);
+static void gtk_file_selection_destroy       (GtkObject             *object);
+static gint gtk_file_selection_key_press     (GtkWidget             *widget,
+                                             GdkEventKey           *event,
+                                             gpointer               user_data);
+
+static void gtk_file_selection_file_button (GtkWidget *widget,
+                                           gint row, 
+                                           gint column, 
+                                           GdkEventButton *bevent,
+                                           gpointer user_data);
+
+static void gtk_file_selection_dir_button (GtkWidget *widget,
+                                          gint row,
+                                          gint column,
+                                          GdkEventButton *bevent,
+                                          gpointer data);
+
+static void gtk_file_selection_undir_button (GtkWidget *widget,
+                                            gint row,
+                                            gint column,
+                                            GdkEventButton *bevent,
+                                            gpointer data);
+
+static void gtk_file_selection_populate      (GtkFileSelection      *fs,
+                                             gchar                 *rel_path,
+                                             gint                   try_complete);
+static void gtk_file_selection_abort         (GtkFileSelection      *fs);
+
+static void gtk_file_selection_update_history_menu (GtkFileSelection       *fs,
+                                                   gchar                  *current_dir);
+
+static void gtk_file_selection_create_dir (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_delete_file (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_rename_file (GtkWidget *widget, gpointer data);
+
+static gboolean gtk_file_selection_history_combo_callback (GtkWidget *widget, GdkEventKey *event, gpointer data);
+static gboolean gtk_file_selection_history_combo_list_key_handler(GtkWidget *widget,
+                                                                                                                                                                                       GdkEventKey *event,
+                                                                                                                                                                                       gpointer user_data);
+static gboolean gtk_file_selection_history_combo_list_callback (GtkWidget *thelist,
+                                                                                                                                                                                       GdkEventButton *event,
+                                                                                                                                                                                       gpointer user_data);
+static void gtk_file_selection_mask_entry_callback (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_create_dir (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_delete_file (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_rename_file (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_home_button (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_up_button (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_prev_button (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_next_button (GtkWidget *widget, gpointer data);
+static void gtk_file_selection_refresh_button (GtkWidget *widget, gpointer data);
+
+static gint gtk_file_selection_match_char (gchar, gchar *mask);
+static gint gtk_file_selection_match_mask (gchar *,gchar *);
+
+
+static GtkWindowClass *parent_class = NULL;
+
+/* Saves errno when something cmpl does fails. */
+static gint cmpl_errno;
+
+/* General notes:
+ * Make prev and next inactive if their respective *
+ *   histories are empty.
+ * Add facilities for handling hidden files and    *
+ * directories                                     *
+ * Add an api to access the mask, and hidden files *
+ * check box?  (prob not in 1.2.x series)          *
+ */
+
+/* Routine for applying mask to filenames         *
+ *   Need to be optimized to minimize recursion   *
+ *     help the for loop by looking for the next  *
+ *     instance of the mask character following   *
+ *     the '*'.  ei *.c -- look for '.'           *
+ *     Also, swap all *? pairs (-> ?*), as that   *
+ *     will make it possible to look ahead (?     *
+ *     makes it very nondeterministic as in *?.c  *
+ *     which really is ?*.c                       *
+ *   Allow multiply masks, separted by commas     *
+ *   Allow more flexible [] handling (ie [a-zA-Z] *
+ *                                                *
+ */
+static gint gtk_file_selection_match_char (gchar text, gchar *mask){
+  gchar *maskc;
+  gint x;
+  gint s;
+       
+  if (mask[0] == '[')
+    {
+      if (!strchr (mask,']')) return 0;
+      maskc = g_strdup(mask + 1); /* get the portion of mask inside []*/
+               
+      (*(strchr (maskc,']'))) = 0;
+      s = strlen ((char *)maskc);
+
+      for (x = 0; x < s; x++){
+       if (text == maskc[x])
+         {
+           g_free (maskc);
+           return s + 2;
+         }
+      }
+      g_free (maskc);
+      return 0;
+    }
+
+  if (mask[0] == '?') return 1;
+  if (mask[0] == text) return 1;
+
+  return 0;
+}
+
+
+static gint gtk_file_selection_match_mask (gchar *text, gchar *mask){
+
+  int mc;
+  int tc;
+
+  tc = 0; mc = 0;
+       
+  if (mask[0] == 0 && text[0] == 0) return 1;
+       
+  if (mask[0] == '*')
+    {
+      for (tc = 0; tc <= strlen(text); tc++)
+       {
+         if (gtk_file_selection_match_mask (text + tc, mask + 1))
+           return 1;
+       }
+      return 0;
+    }
+  mc = gtk_file_selection_match_char (text[0], mask);
+
+  if(mc)
+    return gtk_file_selection_match_mask (text + 1, mask + mc);
+  else
+    return 0;
+}
+
+GtkType
+gtk_file_selection_get_type (void)
+{
+  static GtkType file_selection_type = 0;
+
+  if (!file_selection_type)
+    {
+      static const GtkTypeInfo filesel_info =
+      {
+       "GtkFileSelection",
+       sizeof (GtkFileSelection),
+       sizeof (GtkFileSelectionClass),
+       (GtkClassInitFunc) gtk_file_selection_class_init,
+       (GtkObjectInitFunc) gtk_file_selection_init,
+       /* reserved_1 */ NULL,
+       /* reserved_2 */ NULL,
+        (GtkClassInitFunc) NULL,
+      };
+
+      file_selection_type = gtk_type_unique (GTK_TYPE_WINDOW, &filesel_info);
+    }
+
+  return file_selection_type;
+}
+
+static void
+gtk_file_selection_class_init (GtkFileSelectionClass *class)
+{
+  GtkObjectClass *object_class;
+
+  object_class = (GtkObjectClass*) class;
+
+  parent_class = gtk_type_class (GTK_TYPE_WINDOW);
+
+  object_class->destroy = gtk_file_selection_destroy;
+}
+
+static void
+gtk_file_selection_init (GtkFileSelection *filesel)
+{
+  GtkWidget *entry_vbox;
+  GtkWidget *label;
+  GtkWidget *list_hbox;
+  GtkWidget *confirm_area;
+  GtkWidget *vbox;
+  GtkWidget *hbox;
+  GtkWidget *pulldown_hbox;
+  GtkWidget *scrolled_win;
+  GtkWidget *mask_label;
+  GtkWidget *bigframe;
+  GtkWidget *label_lookingin;
+  GtkWidget *up_button;
+  GtkWidget *home_button;
+  GtkWidget *prev_button;
+  GtkWidget *next_button;
+  GtkWidget *refresh_button;
+
+  char *dir_title [2];
+  char *file_title [2];
+  
+  filesel->cmpl_state = cmpl_init_state ();
+
+  filesel->mask=NULL;
+  filesel->prev_history=NULL;
+  filesel->next_history=NULL;
+  filesel->saved_entry=NULL;
+
+  /* The dialog-sized vertical box  */
+  filesel->main_vbox = gtk_vbox_new (FALSE, 10);
+  gtk_container_set_border_width (GTK_CONTAINER (filesel), 10);
+  gtk_container_add (GTK_CONTAINER (filesel), filesel->main_vbox);
+  gtk_widget_show (filesel->main_vbox);
+
+  /* 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_button_box_set_spacing(GTK_BUTTON_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_file_selection_show_fileop_buttons(filesel);
+
+  /* hbox for pulldown menu */
+  pulldown_hbox = gtk_hbox_new (FALSE, 5);
+  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), pulldown_hbox, FALSE, FALSE, 0);
+  gtk_widget_show (pulldown_hbox);
+  
+  /* The combo box that replaces the pulldown menu */
+  label_lookingin = gtk_label_new (_("Looking in:"));
+  gtk_widget_show (label_lookingin);
+  gtk_box_pack_start (GTK_BOX (pulldown_hbox), label_lookingin, FALSE, FALSE, 0);
+
+  filesel->history_combo = gtk_combo_new();
+  gtk_widget_show(filesel->history_combo);
+  gtk_combo_set_value_in_list(GTK_COMBO(filesel->history_combo),FALSE,FALSE);
+  gtk_box_pack_start (GTK_BOX(pulldown_hbox),filesel->history_combo,
+                               TRUE,TRUE, 0);
+  gtk_signal_connect(GTK_OBJECT(((GtkCombo *)filesel->history_combo)->entry),"key-press-event",                                    
+                    (GtkSignalFunc) gtk_file_selection_history_combo_callback,
+                    (gpointer) filesel);
+
+  gtk_signal_connect(GTK_OBJECT(((GtkCombo *)filesel->history_combo)->list),"button-press-event",
+                    (GtkSignalFunc) gtk_file_selection_history_combo_list_callback,
+                    (gpointer) filesel);
+
+  gtk_signal_connect(GTK_OBJECT(((GtkCombo *)filesel->history_combo)->list),"key-press-event",
+                    (GtkSignalFunc) gtk_file_selection_history_combo_list_key_handler,
+                    (gpointer) filesel);
+
+  /*  frame to put the following hbox in  */
+  bigframe = gtk_frame_new (NULL);
+  gtk_widget_show (bigframe);
+  gtk_box_pack_start (GTK_BOX (filesel->main_vbox), bigframe, TRUE, TRUE, 0);
+
+  /*  The horizontal box containing the directory and file listboxes  */
+  list_hbox = gtk_hbox_new (FALSE, 5);
+  gtk_container_add (GTK_CONTAINER(bigframe), list_hbox);
+  gtk_container_set_border_width (GTK_CONTAINER (list_hbox), 5);
+  gtk_widget_show (list_hbox);
+
+  /* vbox to put the buttons and directory listing in  */
+  vbox = gtk_vbox_new (FALSE, 0);
+  gtk_widget_show (vbox);
+  gtk_box_pack_start (GTK_BOX (list_hbox), vbox, FALSE, FALSE, 0);
+
+  hbox = gtk_hbox_new (FALSE, 0);
+  gtk_widget_show (hbox);
+  gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
+
+  home_button = gtk_button_new_with_label (_("Home"));
+  gtk_widget_show (home_button);
+  gtk_signal_connect (GTK_OBJECT (home_button), "clicked",
+                     (GtkSignalFunc) gtk_file_selection_home_button,
+                     (gpointer) filesel);
+  gtk_box_pack_start (GTK_BOX (hbox), home_button, TRUE,TRUE, 0);
+
+  prev_button = gtk_button_new_with_label (_("Prev"));
+  gtk_signal_connect (GTK_OBJECT (prev_button), "clicked",
+                     (GtkSignalFunc) gtk_file_selection_prev_button,
+                     (gpointer) filesel);
+  gtk_widget_show (prev_button);
+  gtk_box_pack_start (GTK_BOX (hbox), prev_button, TRUE,TRUE, 0);
+
+  up_button = gtk_button_new_with_label (_("Up"));
+  gtk_signal_connect (GTK_OBJECT (up_button), "clicked",
+                     (GtkSignalFunc) gtk_file_selection_up_button,
+                     (gpointer) filesel);
+  gtk_widget_show (up_button);
+  gtk_box_pack_start (GTK_BOX (hbox), up_button, TRUE,TRUE, 0);
+
+  next_button = gtk_button_new_with_label (_("Next"));
+  gtk_widget_show (next_button);
+  gtk_signal_connect (GTK_OBJECT (next_button), "clicked",
+                     (GtkSignalFunc) gtk_file_selection_next_button,
+                     (gpointer) filesel);
+  gtk_box_pack_start (GTK_BOX (hbox), next_button, TRUE,TRUE, 0);
+
+  refresh_button = gtk_button_new_with_label (_("Refresh"));
+  gtk_widget_show (refresh_button);
+  gtk_signal_connect (GTK_OBJECT (refresh_button), "clicked",
+                     (GtkSignalFunc) gtk_file_selection_refresh_button,
+                     (gpointer) filesel);
+  gtk_box_pack_start (GTK_BOX (hbox), refresh_button, TRUE, TRUE, 0);
+
+  /* The directories clist */
+  dir_title[0] = _("Directories");
+  dir_title[1] = NULL;
+  filesel->dir_list = gtk_clist_new_with_titles (1, (gchar**) dir_title);
+  gtk_widget_set_usize (filesel->dir_list, DIR_LIST_WIDTH, DIR_LIST_HEIGHT);
+  gtk_signal_connect (GTK_OBJECT (filesel->dir_list), "select_row",
+                     (GtkSignalFunc) gtk_file_selection_dir_button,
+                     (gpointer) filesel);
+  gtk_signal_connect (GTK_OBJECT (filesel->dir_list), "unselect_row",
+                     (GtkSignalFunc) gtk_file_selection_undir_button,
+                     (gpointer) filesel);
+  gtk_clist_column_titles_passive (GTK_CLIST (filesel->dir_list));
+
+  scrolled_win = gtk_scrolled_window_new (NULL, NULL);
+  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_box_pack_start (GTK_BOX (vbox), scrolled_win, TRUE,TRUE, 5);
+  gtk_widget_show (filesel->dir_list);
+  gtk_widget_show (scrolled_win);
+
+  /* vbox area for mask entry and files clist  */
+  vbox = gtk_vbox_new (FALSE, 0);
+  gtk_widget_show (vbox);
+  gtk_box_pack_start (GTK_BOX (list_hbox), vbox, TRUE, TRUE, 0);
+
+  hbox = gtk_hbox_new (FALSE, 5);
+  gtk_widget_show (hbox);
+  gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
+
+  mask_label = gtk_label_new (_("Mask:"));
+  gtk_widget_show (mask_label);
+  gtk_box_pack_start (GTK_BOX (hbox), mask_label, FALSE, FALSE, 0);
+
+  filesel->mask_entry = gtk_entry_new ();
+  gtk_widget_show (filesel->mask_entry);
+  gtk_signal_connect(GTK_OBJECT(filesel->mask_entry),"activate",
+                    (GtkSignalFunc) gtk_file_selection_mask_entry_callback,
+                    (gpointer) filesel);
+  gtk_box_pack_start (GTK_BOX (hbox),filesel->mask_entry, TRUE, TRUE, 0);
+
+
+  /* The files clist */
+  file_title[0] = _("Files");
+  file_title[1] = NULL;
+  filesel->file_list = gtk_clist_new_with_titles (1, (gchar**) file_title);
+  gtk_widget_set_usize (filesel->file_list, FILE_LIST_WIDTH, FILE_LIST_HEIGHT);
+  gtk_signal_connect (GTK_OBJECT (filesel->file_list), "select_row",
+                     (GtkSignalFunc) gtk_file_selection_file_button, 
+                     (gpointer) filesel);
+  gtk_clist_column_titles_passive (GTK_CLIST (filesel->file_list));
+
+  scrolled_win = gtk_scrolled_window_new (NULL, NULL);
+  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_box_pack_start (GTK_BOX (vbox), scrolled_win, TRUE, TRUE, 5);
+  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 = gtk_hbutton_box_new ();
+  gtk_button_box_set_layout(GTK_BUTTON_BOX(confirm_area), GTK_BUTTONBOX_END);
+  gtk_button_box_set_spacing(GTK_BUTTON_BOX(confirm_area), 5);
+  gtk_box_pack_end (GTK_BOX (filesel->main_vbox), confirm_area, FALSE, FALSE, 0);
+  gtk_widget_show (confirm_area);
+
+  /*  The OK button  */
+  filesel->ok_button = gtk_button_new_with_label (_("OK"));
+  GTK_WIDGET_SET_FLAGS (filesel->ok_button, GTK_CAN_DEFAULT);
+  gtk_box_pack_start (GTK_BOX (confirm_area), filesel->ok_button, TRUE, TRUE, 0);
+  gtk_widget_grab_default (filesel->ok_button);
+  gtk_widget_show (filesel->ok_button);
+
+  /*  The Cancel button  */
+  filesel->cancel_button = gtk_button_new_with_label (_("Cancel"));
+  GTK_WIDGET_SET_FLAGS (filesel->cancel_button, GTK_CAN_DEFAULT);
+  gtk_box_pack_start (GTK_BOX (confirm_area), filesel->cancel_button, TRUE, TRUE, 0);
+  gtk_widget_show (filesel->cancel_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, 0);
+  gtk_widget_show (entry_vbox);
+
+  filesel->selection_text = label = gtk_label_new ("");
+  gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);
+  gtk_box_pack_start (GTK_BOX (entry_vbox), label, FALSE, FALSE, 0);
+  gtk_widget_show (label);
+
+  filesel->selection_entry = gtk_entry_new ();
+  gtk_signal_connect (GTK_OBJECT (filesel->selection_entry), "key_press_event",
+                     (GtkSignalFunc) gtk_file_selection_key_press, filesel);
+  gtk_signal_connect_object (GTK_OBJECT (filesel->selection_entry), "focus_in_event",
+                            (GtkSignalFunc) gtk_widget_grab_default,
+                            GTK_OBJECT (filesel->ok_button));
+  gtk_signal_connect_object (GTK_OBJECT (filesel->selection_entry), "activate",
+                             (GtkSignalFunc) gtk_button_clicked,
+                             GTK_OBJECT (filesel->ok_button));
+  gtk_box_pack_start (GTK_BOX (entry_vbox), filesel->selection_entry, TRUE, TRUE, 0);
+  gtk_widget_show (filesel->selection_entry);
+
+  if (!cmpl_state_okay (filesel->cmpl_state))
+    {
+      gchar err_buf[256];
+
+      sprintf (err_buf, _("Directory unreadable: %s"), cmpl_strerror (cmpl_errno));
+
+      gtk_label_set_text (GTK_LABEL (filesel->selection_text), err_buf);
+    }
+  else
+    {
+      gtk_file_selection_populate (filesel, "", FALSE);
+    }
+
+  gtk_widget_grab_focus (filesel->selection_entry);
+}
+
+GtkWidget*
+gtk_file_selection_new (const gchar *title)
+{
+  GtkFileSelection *filesel;
+
+  filesel = gtk_type_new (GTK_TYPE_FILE_SELECTION);
+  gtk_window_set_title (GTK_WINDOW (filesel), title);
+
+  return GTK_WIDGET (filesel);
+}
+
+void
+gtk_file_selection_show_fileop_buttons (GtkFileSelection *filesel)
+{
+  g_return_if_fail (filesel != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (filesel));
+    
+  /* delete, create directory, and rename */
+  if (!filesel->fileop_c_dir) 
+    {
+      filesel->fileop_c_dir = gtk_button_new_with_label (_("Create Dir"));
+      gtk_signal_connect (GTK_OBJECT (filesel->fileop_c_dir), "clicked",
+                         (GtkSignalFunc) gtk_file_selection_create_dir, 
+                         (gpointer) 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_label (_("Delete File"));
+      gtk_signal_connect (GTK_OBJECT (filesel->fileop_del_file), "clicked",
+                         (GtkSignalFunc) gtk_file_selection_delete_file, 
+                         (gpointer) 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_label (_("Rename File"));
+      gtk_signal_connect (GTK_OBJECT (filesel->fileop_ren_file), "clicked",
+                         (GtkSignalFunc) gtk_file_selection_rename_file, 
+                         (gpointer) 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_widget_queue_resize(GTK_WIDGET(filesel));
+}
+
+void       
+gtk_file_selection_hide_fileop_buttons (GtkFileSelection *filesel)
+{
+  g_return_if_fail (filesel != NULL);
+  g_return_if_fail (GTK_IS_FILE_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;
+    }
+}
+
+
+
+void
+gtk_file_selection_set_filename (GtkFileSelection *filesel,
+                                const gchar      *filename)
+{
+  char  buf[MAXPATHLEN];
+  const char *name, *last_slash;
+
+  g_return_if_fail (filesel != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (filesel));
+  g_return_if_fail (filename != NULL);
+
+  last_slash = strrchr (filename, '/');
+
+  if (!last_slash)
+    {
+      buf[0] = 0;
+      name = filename;
+    }
+  else
+    {
+      gint len = MIN (MAXPATHLEN - 1, last_slash - filename + 1);
+
+      strncpy (buf, filename, len);
+      buf[len] = 0;
+
+      name = last_slash + 1;
+    }
+
+  gtk_file_selection_populate (filesel, buf, FALSE);
+
+  if (filesel->selection_entry)
+    gtk_entry_set_text (GTK_ENTRY (filesel->selection_entry), name);
+}
+
+gchar*
+gtk_file_selection_get_filename (GtkFileSelection *filesel)
+{
+  static char nothing[2] = "";
+  char *text;
+  char *filename;
+
+  g_return_val_if_fail (filesel != NULL, nothing);
+  g_return_val_if_fail (GTK_IS_FILE_SELECTION (filesel), nothing);
+
+  text = gtk_entry_get_text (GTK_ENTRY (filesel->selection_entry));
+  if (text)
+    {
+      filename = cmpl_completion_fullname (text, filesel->cmpl_state);
+      return filename;
+    }
+
+  return nothing;
+}
+
+void
+gtk_file_selection_complete (GtkFileSelection *filesel,
+                            const gchar      *pattern)
+{
+  gchar *new_pattern;
+  gint x;
+       
+  g_return_if_fail (filesel != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (filesel));
+  g_return_if_fail (pattern != NULL);
+
+  if (filesel->selection_entry)
+    gtk_entry_set_text (GTK_ENTRY (filesel->selection_entry), pattern);
+       
+  if(strchr(pattern,'*') || strchr(pattern,'?'))
+    {
+      for(x=strlen(pattern);x>=0;x--)
+       {
+         if(pattern[x]=='/') break;
+       }
+      gtk_entry_set_text(GTK_ENTRY(filesel->mask_entry),g_strdup(pattern+x+1));
+      
+      if(filesel->mask) g_free(filesel->mask);
+      
+      filesel->mask=g_strdup(pattern+x+1);
+      new_pattern=g_strdup(pattern);
+      new_pattern[x+1]=0;
+      gtk_file_selection_populate (filesel, (gchar*) new_pattern, TRUE);
+      g_free(new_pattern);
+    }
+  else
+    {
+      gtk_file_selection_populate (filesel, (gchar*) pattern, TRUE);
+    }
+}
+
+static void
+gtk_file_selection_destroy (GtkObject *object)
+{
+  GtkFileSelection *filesel;
+  GList *list;
+
+  g_return_if_fail (object != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (object));
+
+  filesel = GTK_FILE_SELECTION (object);
+  
+  if (filesel->fileop_dialog)
+    gtk_widget_destroy (filesel->fileop_dialog);
+  
+  if (filesel->next_history)
+    {
+      list = filesel->next_history;
+      while (list)
+       {
+         g_free (list->data);
+         list = list->next;
+       }
+    }
+  g_list_free (filesel->next_history);
+  filesel->next_history = NULL;
+
+  if (filesel->prev_history)
+    {
+      list = filesel->prev_history;
+      while (list)
+       {
+         g_free (list->data);
+         list = list->next;
+       }
+    }
+  g_list_free (filesel->prev_history);
+  filesel->prev_history = NULL;
+
+  if (filesel->mask)
+    {
+      g_free (filesel->mask);
+      filesel->mask = NULL;
+    }
+  
+  cmpl_free_state (filesel->cmpl_state);
+  filesel->cmpl_state = NULL;
+
+  if (GTK_OBJECT_CLASS (parent_class)->destroy)
+    (* GTK_OBJECT_CLASS (parent_class)->destroy) (object);
+}
+
+/* Begin file operations callbacks */
+
+static void
+gtk_file_selection_fileop_error (GtkFileSelection *fs, gchar *error_message)
+{
+  GtkWidget *label;
+  GtkWidget *vbox;
+  GtkWidget *button;
+  GtkWidget *dialog;
+  
+  g_return_if_fail (error_message != NULL);
+  
+  /* main dialog */
+  dialog = gtk_dialog_new ();
+  /*
+  gtk_signal_connect (GTK_OBJECT (dialog), "destroy",
+                     (GtkSignalFunc) gtk_file_selection_fileop_destroy, 
+                     (gpointer) fs);
+  */
+  gtk_window_set_title (GTK_WINDOW (dialog), _("Error"));
+  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);
+  
+  /* If file dialog is grabbed, make this dialog modal too */
+  /* When error 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(error_message);
+  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);
+
+  /* yes, we free it */
+  g_free (error_message);
+  
+  /* close button */
+  button = gtk_button_new_with_label (_("Close"));
+  gtk_signal_connect_object (GTK_OBJECT (button), "clicked",
+                            (GtkSignalFunc) gtk_widget_destroy, 
+                            (gpointer) 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_show (dialog);
+}
+
+static void
+gtk_file_selection_fileop_destroy (GtkWidget *widget, gpointer data)
+{
+  GtkFileSelection *fs = data;
+
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+  
+  fs->fileop_dialog = NULL;
+}
+
+
+static void
+gtk_file_selection_create_dir_confirmed (GtkWidget *widget, gpointer data)
+{
+  GtkFileSelection *fs = data;
+  gchar *dirname;
+  gchar *path;
+  gchar *full_path;
+  gchar *buf;
+  CompletionState *cmpl_state;
+  
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_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, "/", dirname, NULL);
+  if ( (mkdir (full_path, 0755) < 0) ) 
+    {
+      buf = g_strconcat ("Error creating directory \"", dirname, "\":  ", 
+                        g_strerror(errno), NULL);
+      gtk_file_selection_fileop_error (fs, buf);
+    }
+  g_free (full_path);
+  
+  gtk_widget_destroy (fs->fileop_dialog);
+  gtk_file_selection_populate (fs, "", FALSE);
+}
+  
+static void
+gtk_file_selection_create_dir (GtkWidget *widget, gpointer data)
+{
+  GtkFileSelection *fs = data;
+  GtkWidget *label;
+  GtkWidget *dialog;
+  GtkWidget *vbox;
+  GtkWidget *button;
+
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  if (fs->fileop_dialog)
+         return;
+  
+  /* main dialog */
+  fs->fileop_dialog = dialog = gtk_dialog_new ();
+  gtk_signal_connect (GTK_OBJECT (dialog), "destroy",
+                     (GtkSignalFunc) gtk_file_selection_fileop_destroy, 
+                     (gpointer) fs);
+  gtk_window_set_title (GTK_WINDOW (dialog), _("Create Directory"));
+  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);
+
+  /* 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(_("Directory 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_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_with_label (_("Create"));
+  gtk_signal_connect (GTK_OBJECT (button), "clicked",
+                     (GtkSignalFunc) gtk_file_selection_create_dir_confirmed, 
+                     (gpointer) fs);
+  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);
+  
+  button = gtk_button_new_with_label (_("Cancel"));
+  gtk_signal_connect_object (GTK_OBJECT (button), "clicked",
+                            (GtkSignalFunc) gtk_widget_destroy, 
+                            (gpointer) 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_show (dialog);
+}
+
+static void
+gtk_file_selection_delete_file_confirmed (GtkWidget *widget, gpointer data)
+{
+  GtkFileSelection *fs = data;
+  CompletionState *cmpl_state;
+  gchar *path;
+  gchar *full_path;
+  gchar *buf;
+  
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  cmpl_state = (CompletionState*) fs->cmpl_state;
+  path = cmpl_reference_position (cmpl_state);
+  
+  full_path = g_strconcat (path, "/", fs->fileop_file, NULL);
+  if ( (unlink (full_path) < 0) ) 
+    {
+      buf = g_strconcat ("Error deleting file \"", fs->fileop_file, "\":  ", 
+                        g_strerror(errno), NULL);
+      gtk_file_selection_fileop_error (fs, buf);
+    }
+  g_free (full_path);
+  
+  gtk_widget_destroy (fs->fileop_dialog);
+  gtk_file_selection_populate (fs, "", FALSE);
+}
+
+static void
+gtk_file_selection_delete_file (GtkWidget *widget, gpointer data)
+{
+  GtkFileSelection *fs = data;
+  GtkWidget *label;
+  GtkWidget *vbox;
+  GtkWidget *button;
+  GtkWidget *dialog;
+  gchar *filename;
+  gchar *buf;
+  
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  if (fs->fileop_dialog)
+         return;
+
+  filename = gtk_entry_get_text (GTK_ENTRY (fs->selection_entry));
+  if (strlen(filename) < 1)
+         return;
+
+  fs->fileop_file = filename;
+  
+  /* main dialog */
+  fs->fileop_dialog = dialog = gtk_dialog_new ();
+  gtk_signal_connect (GTK_OBJECT (dialog), "destroy",
+                     (GtkSignalFunc) gtk_file_selection_fileop_destroy, 
+                     (gpointer) fs);
+  gtk_window_set_title (GTK_WINDOW (dialog), _("Delete File"));
+  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);
+
+  /* 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);
+
+  buf = g_strconcat ("Really delete file \"", filename, "\" ?", NULL);
+  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);
+  
+  /* buttons */
+  button = gtk_button_new_with_label (_("Delete"));
+  gtk_signal_connect (GTK_OBJECT (button), "clicked",
+                     (GtkSignalFunc) gtk_file_selection_delete_file_confirmed, 
+                     (gpointer) fs);
+  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);
+  
+  button = gtk_button_new_with_label (_("Cancel"));
+  gtk_signal_connect_object (GTK_OBJECT (button), "clicked",
+                            (GtkSignalFunc) gtk_widget_destroy, 
+                            (gpointer) 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_show (dialog);
+
+}
+
+static void
+gtk_file_selection_rename_file_confirmed (GtkWidget *widget, gpointer data)
+{
+  GtkFileSelection *fs = data;
+  gchar *buf;
+  gchar *file;
+  gchar *path;
+  gchar *new_filename;
+  gchar *old_filename;
+  CompletionState *cmpl_state;
+  
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_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, "/", file, NULL);
+  old_filename = g_strconcat (path, "/", fs->fileop_file, NULL);
+
+  if ( (rename (old_filename, new_filename)) < 0) 
+    {
+      buf = g_strconcat ("Error renaming file \"", file, "\":  ", 
+                        g_strerror(errno), NULL);
+      gtk_file_selection_fileop_error (fs, buf);
+    }
+  g_free (new_filename);
+  g_free (old_filename);
+  
+  gtk_widget_destroy (fs->fileop_dialog);
+  gtk_file_selection_populate (fs, "", FALSE);
+}
+  
+static void
+gtk_file_selection_rename_file (GtkWidget *widget, gpointer data)
+{
+  GtkFileSelection *fs = data;
+  GtkWidget *label;
+  GtkWidget *dialog;
+  GtkWidget *vbox;
+  GtkWidget *button;
+  gchar *buf;
+  
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  if (fs->fileop_dialog)
+         return;
+
+  fs->fileop_file = 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 ();
+  gtk_signal_connect (GTK_OBJECT (dialog), "destroy",
+                     (GtkSignalFunc) gtk_file_selection_fileop_destroy, 
+                     (gpointer) fs);
+  gtk_window_set_title (GTK_WINDOW (dialog), _("Rename File"));
+  gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_MOUSE);
+
+  /* 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_strconcat ("Rename file \"", fs->fileop_file, "\" to:", NULL);
+  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_with_label (_("Rename"));
+  gtk_signal_connect (GTK_OBJECT (button), "clicked",
+                     (GtkSignalFunc) gtk_file_selection_rename_file_confirmed, 
+                     (gpointer) fs);
+  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);
+  
+  button = gtk_button_new_with_label (_("Cancel"));
+  gtk_signal_connect_object (GTK_OBJECT (button), "clicked",
+                            (GtkSignalFunc) gtk_widget_destroy, 
+                            (gpointer) 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_show (dialog);
+}
+
+
+static gint
+gtk_file_selection_key_press (GtkWidget   *widget,
+                             GdkEventKey *event,
+                             gpointer     user_data)
+{
+  GtkFileSelection *fs;
+  char *text;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (event != NULL, FALSE);
+
+  fs = GTK_FILE_SELECTION (user_data);
+
+  if (event->keyval == GDK_Tab)
+    {
+      text = gtk_entry_get_text (GTK_ENTRY (fs->selection_entry));
+
+      text = g_strdup (text);
+
+      gtk_file_selection_populate (fs, text, TRUE);
+
+      g_free (text);
+
+      gtk_signal_emit_stop_by_name (GTK_OBJECT (widget), "key_press_event");
+
+      return TRUE;
+    }
+  if (fs->saved_entry)
+    {
+      gtk_clist_unselect_all ((GtkCList *) (fs->dir_list));
+      gtk_entry_set_text(GTK_ENTRY(fs->selection_entry),fs->saved_entry);
+      g_free (fs->saved_entry);
+      fs->saved_entry = NULL;
+    }
+
+
+  return FALSE;
+}
+
+static void
+gtk_file_selection_home_button (GtkWidget *widget, gpointer data){
+  GList *list;
+       
+  GtkFileSelection *fs=data;
+
+  list = fs->next_history;
+  if (list)
+    {
+      g_free (list->data);
+      list = list->next;
+    }
+  g_list_free (fs->next_history);
+  fs->next_history = NULL;
+               
+  gtk_file_selection_populate (fs,"~/",FALSE);
+}
+
+static void
+gtk_file_selection_up_button (GtkWidget *widget, gpointer data){
+  GtkFileSelection *fs = data;
+  GList *list;
+
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  list = fs->next_history;
+  if (list)
+    {
+      g_free (list->data);
+      list = list->next;
+    }
+  g_list_free (fs->next_history);
+  fs->next_history = NULL;
+
+  gtk_file_selection_populate (fs, "../", FALSE); /*change directories. */
+               
+}
+
+static void
+gtk_file_selection_prev_button (GtkWidget *widget, gpointer data){
+  GtkFileSelection *fs = data;
+  GList *list;
+  GList *first;
+  gchar *path;
+
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  list = fs->prev_history;
+
+  if (list && g_list_length(list) > 1)
+    {
+      first = list;            /* get first element */
+      list = list->next;       /* pop off current directory */
+
+      list->prev = NULL;       /* make this the new head. */
+       
+      fs->prev_history = list; /* update prev_history list */
+      fs->next_history = g_list_prepend(fs->next_history,first->data); /* put it on next_history */
+       
+      first->next = NULL;      /* orphan the old first node */
+      g_list_free (first);     /* free the node (data is now in use by next_history) */
+
+
+       
+      path = g_malloc(strlen(list->data)+4); /* plenty of space */
+      strcpy(path,list->data);               /* get the 2nd path in the history */
+      strcat(path,"/");                      /* append a '/' */
+      gtk_file_selection_populate (fs, path, FALSE); /* change directories. */
+      g_free (path);
+    }
+}      
+
+static void
+gtk_file_selection_next_button (GtkWidget *widget, gpointer data){
+  GtkFileSelection *fs = data;
+  GList *list;
+  GList *first;
+  gchar *path;
+
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  list = fs->next_history;
+
+  if (list && g_list_length(list) > 0)
+    {
+      first = list;            /*get first element*/
+      list = list->next;       /*pop off current directory*/
+      
+      if (list)
+       list->prev = NULL;
+      
+      fs->next_history = list;                       /*update prev_history list*/
+       
+      path = g_malloc(strlen(first->data)+4);        /*plenty of space*/
+      strcpy(path,first->data);
+      strcat(path,"/");                              /*append a /   */
+      gtk_file_selection_populate (fs, path, FALSE); /*change directories.*/
+      g_free(path);
+       
+      first->next = NULL;     /* orphan the old first node */
+      g_list_free (first);    /* free the node (data is now in use by next_history) */
+      
+    }
+}      
+
+void static
+gtk_file_selection_refresh_button (GtkWidget *widget, gpointer data){
+  GtkFileSelection *fs = data;
+
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  gtk_file_selection_populate (fs,"",FALSE);
+}
+
+static void
+gtk_file_selection_mask_entry_callback (GtkWidget *widget, gpointer data){
+  GtkFileSelection *fs = data;
+
+  if(fs->mask)
+    g_free (fs->mask);
+               
+  fs->mask = g_strdup(gtk_entry_get_text (GTK_ENTRY(fs->mask_entry)));
+       
+  if (strlen(fs->mask) == 0)
+    {
+      g_free (fs->mask);
+      fs->mask = NULL;
+    }
+       
+  gtk_file_selection_refresh_button (widget,data);
+}
+
+static gboolean gtk_file_selection_history_combo_list_key_handler(GtkWidget *widget,
+                                                                 GdkEventKey *event,
+                                                                 gpointer user_data)
+{
+  /*
+  g_print("Key pressed! \n");
+  */
+       
+  return TRUE;
+}
+
+static gboolean gtk_file_selection_history_combo_list_callback (GtkWidget *thelist,
+                                                               GdkEventButton *event,
+                                                               gpointer user_data)
+{
+
+  GtkFileSelection *fs = user_data;
+  GList *list;
+  gchar *path;
+               
+  list = fs->next_history;
+  if(list)
+    {
+      g_free (list->data);
+      list = list->next;
+    }
+  g_list_free (fs->next_history);
+  fs->next_history = NULL;
+                       
+  path = g_malloc(strlen(gtk_entry_get_text(GTK_ENTRY (((GtkCombo *)fs->history_combo)->entry)))+4);
+  strcpy (path,gtk_entry_get_text(GTK_ENTRY( ((GtkCombo *)fs->history_combo)->entry)));
+  strcat (path,"/");
+       
+  gtk_file_selection_populate (fs,path,TRUE);
+       
+  g_free (path);
+
+  return TRUE;
+}
+
+static gboolean
+gtk_file_selection_history_combo_callback (GtkWidget *widget, GdkEventKey *event, gpointer data)
+{
+  GtkEntry *entry=(GtkEntry *)widget;
+  GtkFileSelection *fs=data;
+  GList *list;
+  gchar *path;
+       
+  g_return_val_if_fail (fs != NULL,FALSE);
+  g_return_val_if_fail (GTK_IS_FILE_SELECTION (fs),FALSE);
+       
+
+  if (event->keyval == GDK_Return)
+    {
+      list = fs->next_history;
+      if (list)
+       {
+         g_free (list->data);
+         list = list->next;
+       }
+      g_list_free (fs->next_history);
+      fs->next_history = NULL;
+      
+      path = g_malloc(strlen(gtk_entry_get_text(entry))+4);
+      strcpy (path,gtk_entry_get_text(entry));
+      strcat (path,"/");
+      gtk_file_selection_populate (fs,path,TRUE);
+      g_free (path);
+      gtk_signal_emit_stop_by_name (GTK_OBJECT (widget), "key_press_event");
+      return TRUE;
+    }
+  else
+    {
+      return FALSE;
+    }
+
+}
+
+static void
+gtk_file_selection_update_history_menu (GtkFileSelection *fs,
+                                       gchar *current_directory)
+{
+  gchar *current_dir;
+
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+  g_return_if_fail (current_directory != NULL);
+  
+  current_dir = g_strdup (current_directory);
+
+  if(fs->prev_history)
+    {
+      if (strcmp((fs->prev_history)->data,current_dir))
+       { /*if this item isn't on the top of the list */
+         fs->prev_history = g_list_prepend(fs->prev_history,g_strdup(current_dir));
+       }
+    } else {
+      fs->prev_history = g_list_prepend(fs->prev_history,g_strdup(current_dir));
+    }
+  
+  gtk_combo_set_popdown_strings (GTK_COMBO (fs->history_combo),fs->prev_history);
+  
+  g_free (current_dir);
+}
+
+static void
+gtk_file_selection_file_button (GtkWidget *widget,
+                              gint row, 
+                              gint column, 
+                              GdkEventButton *bevent,
+                              gpointer user_data)
+{
+  GtkFileSelection *fs = NULL;
+  gchar *filename, *temp = NULL;
+  
+  g_return_if_fail (GTK_IS_CLIST (widget));
+
+  fs = user_data;
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+  
+  gtk_clist_get_text (GTK_CLIST (fs->file_list), row, 0, &temp);
+  filename = g_strdup (temp);
+
+  if (filename)
+    {
+      if (bevent)
+       switch (bevent->type)
+         {
+         case GDK_2BUTTON_PRESS:
+           gtk_button_clicked (GTK_BUTTON (fs->ok_button));
+           break;
+           
+         default:
+           gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename);
+           break;
+         }
+      else
+       gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename);
+      
+      g_free (filename);
+    }
+}
+
+static void
+gtk_file_selection_dir_button (GtkWidget *widget,
+                              gint row, 
+                              gint column, 
+                              GdkEventButton *bevent,
+                              gpointer user_data)
+{
+  GList *list;
+  GtkFileSelection *fs = NULL;
+  gchar *filename, *temp = NULL;
+
+  g_return_if_fail (GTK_IS_CLIST (widget));
+
+  fs = GTK_FILE_SELECTION (user_data);
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  gtk_clist_get_text (GTK_CLIST (fs->dir_list), row, 0, &temp);
+  filename = g_strdup (temp);
+
+  if (filename)
+    {
+      if (bevent)
+       switch (bevent->type)
+         {
+         case GDK_2BUTTON_PRESS:
+           list = fs->next_history;
+           if (list)
+             {
+               g_free (list->data);
+               list = list->next;
+             }
+           g_list_free (fs->next_history);
+           fs->next_history = NULL;
+       
+           gtk_file_selection_populate (fs, filename, FALSE);
+           gtk_entry_set_text(GTK_ENTRY(fs->selection_entry),fs->saved_entry);
+           g_free (fs->saved_entry);
+           fs->saved_entry = NULL;
+           break;
+           
+         default:
+           /* here we need to add the "filename" to the beginning of what's already
+              in the entry.  Save what's in the entry, then restore it on the double click
+           */
+           if (fs->saved_entry) g_free (fs->saved_entry);
+           fs->saved_entry=g_strdup(gtk_entry_get_text(GTK_ENTRY (fs->selection_entry)));
+       
+           temp=g_strconcat(filename,fs->saved_entry,NULL);
+           gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), temp);
+           g_free (temp);
+       
+           break;
+         }
+      else
+       gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename);
+      
+      g_free (filename);
+    }
+}
+
+static void
+gtk_file_selection_undir_button (GtkWidget *widget,
+                              gint row,
+                              gint column,
+                              GdkEventButton *bevent,
+                              gpointer user_data)
+{
+  GtkFileSelection *fs = NULL;
+  gchar *filename, *temp = NULL;
+
+  g_return_if_fail (GTK_IS_CLIST (widget));
+
+  fs = GTK_FILE_SELECTION (user_data);
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_SELECTION (fs));
+
+  gtk_clist_get_text (GTK_CLIST (fs->dir_list), row, 0, &temp);
+  filename = g_strdup (temp);
+
+  if (filename)
+    {
+      if (bevent)
+       switch (bevent->type)
+         {
+         default:
+           /* here we need to add the "filename" to the beginning of what's already
+              in the entry.  Save what's in the entry, then restore it on the double click
+           */
+           if (fs->saved_entry)
+             {
+               gtk_entry_set_text (GTK_ENTRY (fs->selection_entry),fs->saved_entry);
+               g_free (fs->saved_entry);
+               fs->saved_entry = NULL;
+             }
+           break;
+         }
+      else
+       gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), filename); //?????
+
+      g_free (filename);
+    }
+}
+
+static void
+gtk_file_selection_populate (GtkFileSelection *fs,
+                            gchar            *rel_path,
+                            gint              try_complete)
+{
+  CompletionState *cmpl_state;
+  PossibleCompletion* poss;
+  gchar* filename;
+  gint row;
+  gchar* rem_path = rel_path;
+  gchar* sel_text;
+  gchar* text[2];
+  gint did_recurse = FALSE;
+  gint possible_count = 0;
+  gint selection_index = -1;
+  gint file_list_width;
+  gint dir_list_width;
+  
+  g_return_if_fail (fs != NULL);
+  g_return_if_fail (GTK_IS_FILE_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_file_selection_abort (fs);
+      return;
+    }
+
+  g_assert (cmpl_state->reference_dir);
+
+  gtk_clist_freeze (GTK_CLIST (fs->dir_list));
+  gtk_clist_clear (GTK_CLIST (fs->dir_list));
+  gtk_clist_freeze (GTK_CLIST (fs->file_list));
+  gtk_clist_clear (GTK_CLIST (fs->file_list));
+
+  /* Set the dir_list to include ./ and ../ */
+  text[1] = NULL;
+  text[0] = "./";
+  row = gtk_clist_append (GTK_CLIST (fs->dir_list), text);
+
+  text[0] = "../";
+  row = gtk_clist_append (GTK_CLIST (fs->dir_list), text);
+
+  /*reset the max widths of the lists*/
+  dir_list_width = gdk_string_width(fs->dir_list->style->font,"../");
+  gtk_clist_set_column_width(GTK_CLIST(fs->dir_list),0,dir_list_width);
+  file_list_width = 1;
+  gtk_clist_set_column_width(GTK_CLIST(fs->file_list),0,file_list_width);
+
+  while (poss)
+    {
+      if (cmpl_is_a_completion (poss))
+       {
+         possible_count += 1;
+         
+         filename = cmpl_this_completion (poss);
+
+         text[0] = filename;
+         
+         if (cmpl_is_directory (poss))
+           {
+             if (strcmp (filename, "./") != 0 &&
+                 strcmp (filename, "../") != 0)
+               {
+                 int width = gdk_string_width(fs->dir_list->style->font,
+                                              filename);
+                 row = gtk_clist_append (GTK_CLIST (fs->dir_list), text);
+                 if(width > dir_list_width)
+                   {
+                     dir_list_width = width;
+                     gtk_clist_set_column_width(GTK_CLIST(fs->dir_list),0,
+                                                width);
+                   }
+               }
+           }
+         else
+           {
+             if(fs->mask)
+               {
+                 if (gtk_file_selection_match_mask(filename,fs->mask))
+                   {
+                     int width = gdk_string_width(fs->file_list->style->font,
+                                                  filename);
+                     row = gtk_clist_append (GTK_CLIST (fs->file_list), text);
+                     if(width > file_list_width)
+                       {
+                         file_list_width = width;
+                         gtk_clist_set_column_width(GTK_CLIST(fs->file_list),0,
+                                                    width);
+                       }
+                   }
+               }
+             else
+               {
+                 int width = gdk_string_width(fs->file_list->style->font,
+                                              filename);
+                 row = gtk_clist_append (GTK_CLIST (fs->file_list), text);
+                 if(width > file_list_width)
+                   {
+                     file_list_width = width;
+                     gtk_clist_set_column_width(GTK_CLIST(fs->file_list),0,
+                                                width);
+                   }
+               }
+           }
+       }
+
+      poss = cmpl_next_completion (cmpl_state);
+    }
+
+  gtk_clist_thaw (GTK_CLIST (fs->dir_list));
+  gtk_clist_thaw (GTK_CLIST (fs->file_list));
+
+  /* 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_file_selection_populate (fs, dir_name, 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 (fs->selection_entry)
+      /* Here we need to take the old filename and keep it!*/
+       /*gtk_entry_set_text (GTK_ENTRY (fs->selection_entry), "");*/
+       ;
+    }
+
+  if (!did_recurse)
+    {
+      if (fs->selection_entry)
+       gtk_entry_set_position (GTK_ENTRY (fs->selection_entry), selection_index);
+
+      if (fs->selection_entry)
+       {
+         sel_text = g_strconcat (_("Selection: "),
+                                 cmpl_reference_position (cmpl_state),
+                                 NULL);
+
+         gtk_label_set_text (GTK_LABEL (fs->selection_text), sel_text);
+         g_free (sel_text);
+       }
+
+  gtk_file_selection_update_history_menu (fs, cmpl_reference_position (cmpl_state));
+
+    }
+}
+
+static void
+gtk_file_selection_abort (GtkFileSelection *fs)
+{
+  gchar err_buf[256];
+
+  sprintf (err_buf, _("Directory unreadable: %s"), cmpl_strerror (cmpl_errno));
+
+  /*  BEEP gdk_beep();  */
+
+  if (fs->selection_entry)
+    gtk_label_set_text (GTK_LABEL (fs->selection_text), err_buf);
+}
+
+/**********************************************************************/
+/*                       External Interface                          */
+/**********************************************************************/
+
+/* The four completion state selectors
+ */
+static gchar*
+cmpl_updated_text (CompletionState* cmpl_state)
+{
+  return cmpl_state->updated_text;
+}
+
+static gint
+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 gchar*
+cmpl_completion_fullname (gchar* text, CompletionState* cmpl_state)
+{
+  static char nothing[2] = "";
+
+  if (!cmpl_state_okay (cmpl_state))
+    {
+      return nothing;
+    }
+  else if (text[0] == '/')
+    {
+      strcpy (cmpl_state->updated_text, text);
+    }
+  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, '/');
+
+         if (slash)
+           strcat (cmpl_state->updated_text, slash);
+       }
+    }
+  else
+    {
+      strcpy (cmpl_state->updated_text, cmpl_state->reference_dir->fullname);
+      if (strcmp (cmpl_state->reference_dir->fullname, "/") != 0)
+       strcat (cmpl_state->updated_text, "/");
+      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 gint
+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 getcwd_buf[2*MAXPATHLEN];
+  CompletionState *new_state;
+
+  new_state = g_new (CompletionState, 1);
+
+  /* We don't use getcwd() on SUNOS, because, it does a popen("pwd")
+   * and, if that wasn't bad enough, hangs in doing so.
+   */
+#if defined(sun) && !defined(__SVR4)
+  if (!getwd (getcwd_buf))
+#else    
+  if (!getcwd (getcwd_buf, MAXPATHLEN))
+#endif    
+    {
+      /* Oh joy, we can't get the current directory. Um..., we should have
+       * a root directory, right? Right? (Probably not portable to non-Unix)
+       */
+      strcpy (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 (getcwd_buf, new_state);
+
+  if (!new_state->reference_dir)
+    {
+      /* Directories changing from underneath us, grumble */
+      strcpy (getcwd_buf, "/");
+      goto tryagain;
+    }
+
+  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)
+{
+  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->fullname);
+  g_free(dir);
+}
+
+static void
+free_dir_sent(CompletionDirSent* sent)
+{
+  g_free(sent->name_buffer);
+  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;
+
+  first_slash = strchr (text_to_complete, '/');
+
+  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;
+    }
+
+  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 = *remaining_text;
+
+  cmpl_state->active_completion_dir = cmpl_state->completion_dir;
+
+  cmpl_state->reference_dir = cmpl_state->completion_dir;
+
+  poss = attempt_file_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;
+
+  if(cmpl_state->user_completion_index >= 0)
+    poss = attempt_homedir_completion(cmpl_state->last_completion_text, cmpl_state);
+  else
+    poss = attempt_file_completion(cmpl_state);
+
+  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, '/');
+
+  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;
+       }
+    }
+  else if (text_to_complete[0] == '/' || !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, '/');
+      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 *curdir = g_get_current_dir ();
+         
+         new_dir = open_dir(curdir, cmpl_state);
+
+         if (new_dir)
+           *remaining_text = text_to_complete;
+
+         g_free (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;
+}
+
+/* open a directory by user name */
+static CompletionDir*
+open_user_dir(gchar* text_to_complete,
+             CompletionState *cmpl_state)
+{
+  gchar *first_slash;
+  gint cmp_len;
+
+  g_assert(text_to_complete && text_to_complete[0] == '~');
+
+  first_slash = strchr(text_to_complete, '/');
+
+  if (first_slash)
+    cmp_len = first_slash - text_to_complete - 1;
+  else
+    cmp_len = strlen(text_to_complete + 1);
+
+  if(!cmp_len)
+    {
+      /* ~/ */
+      gchar *homedir = g_get_home_dir ();
+
+      if (homedir)
+       return open_dir(homedir, cmpl_state);
+      else
+       return NULL;
+    }
+  else
+    {
+      /* ~user/ */
+      char* copy = g_new(char, cmp_len + 1);
+      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;
+       }
+
+      return open_dir(pwd->pw_dir, cmpl_state);
+    }
+}
+
+/* open a directory relative the the current relative directory */
+static CompletionDir*
+open_relative_dir(gchar* dir_name,
+                 CompletionDir* dir,
+                 CompletionState *cmpl_state)
+{
+  gchar path_buf[2*MAXPATHLEN];
+
+  if(dir->fullname_len + strlen(dir_name) + 2 >= MAXPATHLEN)
+    {
+      cmpl_errno = CMPL_ERRNO_TOO_LONG;
+      return NULL;
+    }
+
+  strcpy(path_buf, dir->fullname);
+
+  if(dir->fullname_len > 1)
+    {
+      path_buf[dir->fullname_len] = '/';
+      strcpy(path_buf + dir->fullname_len + 1, dir_name);
+    }
+  else
+    {
+      strcpy(path_buf + dir->fullname_len, dir_name);
+    }
+
+  return open_dir(path_buf, cmpl_state);
+}
+
+/* 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;
+  DIR* directory;
+  gchar *buffer_ptr;
+  struct dirent *dirent_ptr;
+  gint buffer_size = 0;
+  gint entry_count = 0;
+  gint i;
+  struct stat ent_sbuf;
+  char path_buf[MAXPATHLEN*2];
+  gint path_buf_len;
+
+  sent = g_new(CompletionDirSent, 1);
+  sent->mtime = sbuf->st_mtime;
+  sent->inode = sbuf->st_ino;
+  sent->device = sbuf->st_dev;
+
+  path_buf_len = strlen(dir_name);
+
+  if (path_buf_len > MAXPATHLEN)
+    {
+      cmpl_errno = CMPL_ERRNO_TOO_LONG;
+      return NULL;
+    }
+
+  strcpy(path_buf, dir_name);
+
+  directory = opendir(dir_name);
+
+  if(!directory)
+    {
+      cmpl_errno = errno;
+      return NULL;
+    }
+
+  while((dirent_ptr = readdir(directory)) != NULL)
+    {
+      int entry_len = strlen(dirent_ptr->d_name);
+      buffer_size += entry_len + 1;
+      entry_count += 1;
+
+      if(path_buf_len + entry_len + 2 >= MAXPATHLEN)
+       {
+         cmpl_errno = CMPL_ERRNO_TOO_LONG;
+         closedir(directory);
+         return NULL;
+       }
+    }
+
+  sent->name_buffer = g_new(gchar, buffer_size);
+  sent->entries = g_new(CompletionDirEntry, entry_count);
+  sent->entry_count = entry_count;
+
+  buffer_ptr = sent->name_buffer;
+
+  rewinddir(directory);
+
+  for(i = 0; i < entry_count; i += 1)
+    {
+      dirent_ptr = readdir(directory);
+
+      if(!dirent_ptr)
+       {
+         cmpl_errno = errno;
+         closedir(directory);
+         return NULL;
+       }
+
+      strcpy(buffer_ptr, dirent_ptr->d_name);
+      sent->entries[i].entry_name = buffer_ptr;
+      buffer_ptr += strlen(dirent_ptr->d_name);
+      *buffer_ptr = 0;
+      buffer_ptr += 1;
+
+      path_buf[path_buf_len] = '/';
+      strcpy(path_buf + path_buf_len + 1, dirent_ptr->d_name);
+
+      if (stat_subdirs)
+       {
+         if(stat(path_buf, &ent_sbuf) >= 0 && S_ISDIR(ent_sbuf.st_mode))
+           sent->entries[i].is_dir = 1;
+         else
+           /* stat may fail, and we don't mind, since it could be a
+            * dangling symlink. */
+           sent->entries[i].is_dir = 0;
+       }
+      else
+       sent->entries[i].is_dir = 1;
+    }
+
+  qsort(sent->entries, sent->entry_count, sizeof(CompletionDirEntry), compare_cmpl_dir);
+
+  closedir(directory);
+
+  return sent;
+}
+
+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 = sizeof(no_stat_dirs) / sizeof(no_stat_dirs[0]);
+  static gboolean initialized = FALSE;
+
+  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;
+       }
+    }
+
+  if(stat(dir_name, result) < 0)
+    {
+      cmpl_errno = errno;
+      return FALSE;
+    }
+
+  *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;
+}
+
+/* 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 (!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;
+    }
+
+  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);
+
+  return new_dir;
+}
+
+static gint
+correct_dir_fullname(CompletionDir* cmpl_dir)
+{
+  gint length = strlen(cmpl_dir->fullname);
+  struct stat sbuf;
+
+  if (strcmp(cmpl_dir->fullname + length - 2, "/.") == 0)
+    {
+      if (length == 2) 
+       {
+         strcpy(cmpl_dir->fullname, "/");
+         cmpl_dir->fullname_len = 1;
+         return TRUE;
+       } else {
+         cmpl_dir->fullname[length - 2] = 0;
+       }
+    }
+  else if (strcmp(cmpl_dir->fullname + length - 3, "/./") == 0)
+    cmpl_dir->fullname[length - 2] = 0;
+  else if (strcmp(cmpl_dir->fullname + length - 3, "/..") == 0)
+    {
+      if(length == 3)
+       {
+         strcpy(cmpl_dir->fullname, "/");
+         cmpl_dir->fullname_len = 1;
+         return TRUE;
+       }
+
+      if(stat(cmpl_dir->fullname, &sbuf) < 0)
+       {
+         cmpl_errno = errno;
+         return FALSE;
+       }
+
+      cmpl_dir->fullname[length - 2] = 0;
+
+      if(!correct_parent(cmpl_dir, &sbuf))
+       return FALSE;
+    }
+  else if (strcmp(cmpl_dir->fullname + length - 4, "/../") == 0)
+    {
+      if(length == 4)
+       {
+         strcpy(cmpl_dir->fullname, "/");
+         cmpl_dir->fullname_len = 1;
+         return TRUE;
+       }
+
+      if(stat(cmpl_dir->fullname, &sbuf) < 0)
+       {
+         cmpl_errno = errno;
+         return FALSE;
+       }
+
+      cmpl_dir->fullname[length - 3] = 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 *new_name;
+  gchar c = 0;
+
+  last_slash = strrchr(cmpl_dir->fullname, '/');
+
+  g_assert(last_slash);
+
+  if(last_slash != cmpl_dir->fullname)
+    { /* last_slash[0] = 0; */ }
+  else
+    {
+      c = last_slash[1];
+      last_slash[1] = 0;
+    }
+
+  if (stat(cmpl_dir->fullname, &parbuf) < 0)
+    {
+      cmpl_errno = errno;
+      return FALSE;
+    }
+
+  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] = '/'; */
+
+  /* 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;
+
+  return TRUE;
+}
+
+static gchar*
+find_parent_dir_fullname(gchar* dirname)
+{
+  gchar buffer[MAXPATHLEN];
+  gchar buffer2[MAXPATHLEN];
+
+#if defined(sun) && !defined(__SVR4)
+  if(!getwd(buffer))
+#else
+  if(!getcwd(buffer, MAXPATHLEN))
+#endif    
+    {
+      cmpl_errno = errno;
+      return NULL;
+    }
+
+  if(chdir(dirname) != 0 || chdir("..") != 0)
+    {
+      cmpl_errno = errno;
+      return NULL;
+    }
+
+#if defined(sun) && !defined(__SVR4)
+  if(!getwd(buffer2))
+#else
+  if(!getcwd(buffer2, MAXPATHLEN))
+#endif
+    {
+      chdir(buffer);
+      cmpl_errno = errno;
+
+      return NULL;
+    }
+
+  if(chdir(buffer) != 0)
+    {
+      cmpl_errno = errno;
+      return NULL;
+    }
+
+  return g_strdup(buffer2);
+}
+
+/**********************************************************************/
+/*                        Completion Operations                       */
+/**********************************************************************/
+
+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 = 1;
+
+      append_completion_text("~", cmpl_state);
+
+      append_completion_text(cmpl_state->
+                             user_directories[cmpl_state->user_completion_index].login,
+                            cmpl_state);
+
+      return append_completion_text("/", 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 = 1;
+
+      return append_completion_text("~/", cmpl_state);
+    }
+}
+
+/* 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 && *text == *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, '/');
+  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 &&
+            fnmatch(pat_buf, dir->sent->entries[i].entry_name,
+                    FNMATCH_FLAGS)!= FNM_NOMATCH)
+           {
+             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_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_file_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_file_completion(cmpl_state);
+       }
+    }
+
+  g_assert(dir->cmpl_text);
+
+  first_slash = strchr(dir->cmpl_text, '/');
+
+  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);
+      strcpy(pat_buf + len, "*");
+    }
+
+  if(first_slash)
+    {
+      if(dir->sent->entries[dir->cmpl_index].is_dir)
+       {
+         if(fnmatch(pat_buf, dir->sent->entries[dir->cmpl_index].entry_name,
+                    FNMATCH_FLAGS) != FNM_NOMATCH)
+           {
+             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 = first_slash + 1;
+
+             cmpl_state->active_completion_dir = new_dir;
+
+             g_free (pat_buf);
+             return attempt_file_completion(cmpl_state);
+           }
+         else
+           {
+             g_free (pat_buf);
+             return attempt_file_completion(cmpl_state);
+           }
+       }
+      else
+       {
+         g_free (pat_buf);
+         return attempt_file_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("/", cmpl_state);
+       }
+
+      append_completion_text(dir->sent->entries[dir->cmpl_index].entry_name, cmpl_state);
+
+      cmpl_state->the_completion.is_a_completion =
+       (fnmatch(pat_buf, dir->sent->entries[dir->cmpl_index].entry_name,
+                FNMATCH_FLAGS) != FNM_NOMATCH);
+
+      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("/", cmpl_state);
+
+      g_free (pat_buf);
+      return &cmpl_state->the_completion;
+    }
+}
+
+
+static gint
+get_pwdb(CompletionState* cmpl_state)
+{
+  struct passwd *pwd_ptr;
+  gchar* buf_ptr;
+  gint len = 0, i, count = 0;
+
+  if(cmpl_state->user_dir_name_buffer)
+    return TRUE;
+  setpwent ();
+
+  while ((pwd_ptr = getpwent()) != NULL)
+    {
+      len += strlen(pwd_ptr->pw_name);
+      len += strlen(pwd_ptr->pw_dir);
+      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;
+       }
+
+      strcpy(buf_ptr, pwd_ptr->pw_name);
+      cmpl_state->user_directories[i].login = buf_ptr;
+      buf_ptr += strlen(buf_ptr);
+      buf_ptr += 1;
+      strcpy(buf_ptr, pwd_ptr->pw_dir);
+      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);
+}
+
+static gint
+compare_cmpl_dir(const void* a, const void* b)
+{
+  return strcmp((((CompletionDirEntry*)a))->entry_name,
+               (((CompletionDirEntry*)b))->entry_name);
+}
+
+static gint
+cmpl_state_okay(CompletionState* cmpl_state)
+{
+  return  cmpl_state && cmpl_state->reference_dir;
+}
+
+static gchar*
+cmpl_strerror(gint err)
+{
+  if(err == CMPL_ERRNO_TOO_LONG)
+    return "Name too long";
+  else
+    return g_strerror (err);
+}
+
+
+/* Testing area */
+#ifdef TORRIE_DEBUG
+
+/* Get the selected filename and print it to the console */
+void file_ok_sel( GtkWidget        *w,
+                  GtkFileSelection *fs )
+{
+    g_print ("%s\n", gtk_file_selection_get_filename (GTK_FILE_SELECTION (fs)));
+}
+
+void destroy( GtkWidget *widget,
+              gpointer   data )
+{
+    gtk_main_quit ();
+}
+
+int main( int   argc,
+          char *argv[] )
+{
+    GtkWidget *filew;
+
+    gtk_init (&argc, &argv);
+
+    /* Create a new file selection widget */
+    filew = gtk_file_selection_new ("Michael's Glorious File Selector");
+//    gtk_file_selection_complete(GTK_FILE_SELECTION(filew),"bob");
+
+               
+    gtk_signal_connect (GTK_OBJECT (filew), "destroy",
+                       (GtkSignalFunc) destroy, &filew);
+    /* Connect the ok_button to file_ok_sel function */
+    gtk_signal_connect (GTK_OBJECT (GTK_FILE_SELECTION (filew)->ok_button),
+                       "clicked", (GtkSignalFunc) file_ok_sel, filew );
+
+    /* Connect the cancel_button to destroy the widget */
+    gtk_signal_connect_object (GTK_OBJECT (GTK_FILE_SELECTION
+                                            (filew)->cancel_button),
+                              "clicked", (GtkSignalFunc) gtk_widget_destroy,
+                              GTK_OBJECT (filew));
+
+
+    gtk_widget_show(filew);
+
+/*
+    g_print("%d",gtk_file_selection_match_mask("mask.c","m*.c"));
+    g_print("%d",gtk_file_selection_match_mask("mask.c","m???.c"));
+               g_print("%d",gtk_file_selection_match_mask("mask.c","m??*.c"));
+               g_print("%d",gtk_file_selection_match_mask("mask.cout","m*.c"));
+               g_print("%d",gtk_file_selection_match_mask("mask.cout","m*.c???"));
+               g_print("%d",gtk_file_selection_match_mask("mask.cout","m*.c*"));
+               g_print("%d",gtk_file_selection_match_mask("mask.cout","n*.c???"));
+               g_print("%d",gtk_file_selection_match_mask("mask.c","[mn]*"));
+               g_print("%d",gtk_file_selection_match_mask("COPYING","*.xpm"));
+*/     
+    gtk_main ();
+
+    return 0;
+}
+/* example-end */
+#endif