Home | History | Annotate | Download | only in gio
      1 /* GIO - GLib Input, Output and Streaming Library
      2  *
      3  * Copyright (C) 2006-2007 Red Hat, Inc.
      4  *
      5  * This library is free software; you can redistribute it and/or
      6  * modify it under the terms of the GNU Lesser General Public
      7  * License as published by the Free Software Foundation; either
      8  * version 2 of the License, or (at your option) any later version.
      9  *
     10  * This library is distributed in the hope that it will be useful,
     11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
     12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
     13  * Lesser General Public License for more details.
     14  *
     15  * You should have received a copy of the GNU Lesser General
     16  * Public License along with this library; if not, write to the
     17  * Free Software Foundation, Inc., 59 Temple Place, Suite 330,
     18  * Boston, MA 02111-1307, USA.
     19  *
     20  * Author: Alexander Larsson <alexl (at) redhat.com>
     21  */
     22 
     23 #include "config.h"
     24 
     25 #include <sys/types.h>
     26 #include <sys/stat.h>
     27 #include <string.h>
     28 #include <errno.h>
     29 #include <fcntl.h>
     30 #ifdef HAVE_UNISTD_H
     31 #include <unistd.h>
     32 #endif
     33 
     34 #if HAVE_SYS_STATFS_H
     35 #include <sys/statfs.h>
     36 #endif
     37 #if HAVE_SYS_STATVFS_H
     38 #include <sys/statvfs.h>
     39 #endif
     40 #if HAVE_SYS_VFS_H
     41 #include <sys/vfs.h>
     42 #elif HAVE_SYS_MOUNT_H
     43 #if HAVE_SYS_PARAM_H
     44 #include <sys/param.h>
     45 #endif
     46 #include <sys/mount.h>
     47 #endif
     48 
     49 #ifndef O_BINARY
     50 #define O_BINARY 0
     51 #endif
     52 
     53 #if defined(HAVE_STATFS) && defined(HAVE_STATVFS)
     54 /* Some systems have both statfs and statvfs, pick the
     55    most "native" for these */
     56 # if !defined(HAVE_STRUCT_STATFS_F_BAVAIL)
     57    /* on solaris and irix, statfs doesn't even have the
     58       f_bavail field */
     59 #  define USE_STATVFS
     60 # else
     61   /* at least on linux, statfs is the actual syscall */
     62 #  define USE_STATFS
     63 # endif
     64 
     65 #elif defined(HAVE_STATFS)
     66 
     67 # define USE_STATFS
     68 
     69 #elif defined(HAVE_STATVFS)
     70 
     71 # define USE_STATVFS
     72 
     73 #endif
     74 
     75 #include "gfileattribute.h"
     76 #include "glocalfile.h"
     77 #include "glocalfileinfo.h"
     78 #include "glocalfileenumerator.h"
     79 #include "glocalfileinputstream.h"
     80 #include "glocalfileoutputstream.h"
     81 #include "glocaldirectorymonitor.h"
     82 #include "glocalfilemonitor.h"
     83 #include "gmountprivate.h"
     84 #include "gunixmounts.h"
     85 #include "gioerror.h"
     86 #include <glib/gstdio.h>
     87 #include "glibintl.h"
     88 
     89 #ifdef G_OS_WIN32
     90 #define _WIN32_WINNT 0x0500
     91 #include <windows.h>
     92 #include <io.h>
     93 #include <direct.h>
     94 
     95 #ifndef FILE_READ_ONLY_VOLUME
     96 #define FILE_READ_ONLY_VOLUME           0x00080000
     97 #endif
     98 
     99 #ifndef S_ISDIR
    100 #define S_ISDIR(m) (((m) & _S_IFMT) == _S_IFDIR)
    101 #endif
    102 #ifndef S_ISLNK
    103 #define S_ISLNK(m) (0)
    104 #endif
    105 #endif
    106 
    107 #include "gioalias.h"
    108 
    109 static void g_local_file_file_iface_init (GFileIface *iface);
    110 
    111 static GFileAttributeInfoList *local_writable_attributes = NULL;
    112 static GFileAttributeInfoList *local_writable_namespaces = NULL;
    113 
    114 struct _GLocalFile
    115 {
    116   GObject parent_instance;
    117 
    118   char *filename;
    119 };
    120 
    121 #define g_local_file_get_type _g_local_file_get_type
    122 G_DEFINE_TYPE_WITH_CODE (GLocalFile, g_local_file, G_TYPE_OBJECT,
    123 			 G_IMPLEMENT_INTERFACE (G_TYPE_FILE,
    124 						g_local_file_file_iface_init))
    125 
    126 static char *find_mountpoint_for (const char *file, dev_t dev);
    127 
    128 static void
    129 g_local_file_finalize (GObject *object)
    130 {
    131   GLocalFile *local;
    132 
    133   local = G_LOCAL_FILE (object);
    134 
    135   g_free (local->filename);
    136 
    137   G_OBJECT_CLASS (g_local_file_parent_class)->finalize (object);
    138 }
    139 
    140 static void
    141 g_local_file_class_init (GLocalFileClass *klass)
    142 {
    143   GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
    144   GFileAttributeInfoList *list;
    145 
    146   gobject_class->finalize = g_local_file_finalize;
    147 
    148   /* Set up attribute lists */
    149 
    150   /* Writable attributes: */
    151 
    152   list = g_file_attribute_info_list_new ();
    153 
    154   g_file_attribute_info_list_add (list,
    155 				  G_FILE_ATTRIBUTE_UNIX_MODE,
    156 				  G_FILE_ATTRIBUTE_TYPE_UINT32,
    157 				  G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
    158 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    159 
    160 #ifdef HAVE_CHOWN
    161   g_file_attribute_info_list_add (list,
    162 				  G_FILE_ATTRIBUTE_UNIX_UID,
    163 				  G_FILE_ATTRIBUTE_TYPE_UINT32,
    164 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    165   g_file_attribute_info_list_add (list,
    166 				  G_FILE_ATTRIBUTE_UNIX_GID,
    167 				  G_FILE_ATTRIBUTE_TYPE_UINT32,
    168 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    169 #endif
    170 
    171 #ifdef HAVE_SYMLINK
    172   g_file_attribute_info_list_add (list,
    173 				  G_FILE_ATTRIBUTE_STANDARD_SYMLINK_TARGET,
    174 				  G_FILE_ATTRIBUTE_TYPE_BYTE_STRING,
    175 				  0);
    176 #endif
    177 
    178 #ifdef HAVE_UTIMES
    179   g_file_attribute_info_list_add (list,
    180 				  G_FILE_ATTRIBUTE_TIME_MODIFIED,
    181 				  G_FILE_ATTRIBUTE_TYPE_UINT64,
    182 				  G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
    183 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    184   g_file_attribute_info_list_add (list,
    185 				  G_FILE_ATTRIBUTE_TIME_MODIFIED_USEC,
    186 				  G_FILE_ATTRIBUTE_TYPE_UINT32,
    187 				  G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
    188 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    189   /* When copying, the target file is accessed. Replicating
    190    * the source access time does not make sense in this case.
    191    */
    192   g_file_attribute_info_list_add (list,
    193 				  G_FILE_ATTRIBUTE_TIME_ACCESS,
    194 				  G_FILE_ATTRIBUTE_TYPE_UINT64,
    195 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    196   g_file_attribute_info_list_add (list,
    197 				  G_FILE_ATTRIBUTE_TIME_ACCESS_USEC,
    198 				  G_FILE_ATTRIBUTE_TYPE_UINT32,
    199 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    200 #endif
    201 
    202   local_writable_attributes = list;
    203 
    204   /* Writable namespaces: */
    205 
    206   list = g_file_attribute_info_list_new ();
    207 
    208 #ifdef HAVE_XATTR
    209   g_file_attribute_info_list_add (list,
    210 				  "xattr",
    211 				  G_FILE_ATTRIBUTE_TYPE_STRING,
    212 				  G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
    213 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    214   g_file_attribute_info_list_add (list,
    215 				  "xattr-sys",
    216 				  G_FILE_ATTRIBUTE_TYPE_STRING,
    217 				  G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
    218 #endif
    219 
    220   local_writable_namespaces = list;
    221 }
    222 
    223 static void
    224 g_local_file_init (GLocalFile *local)
    225 {
    226 }
    227 
    228 
    229 static char *
    230 canonicalize_filename (const char *filename)
    231 {
    232   char *canon, *start, *p, *q;
    233   char *cwd;
    234   int i;
    235 
    236   if (!g_path_is_absolute (filename))
    237     {
    238       cwd = g_get_current_dir ();
    239       canon = g_build_filename (cwd, filename, NULL);
    240       g_free (cwd);
    241     }
    242   else
    243     canon = g_strdup (filename);
    244 
    245   start = (char *)g_path_skip_root (canon);
    246 
    247   if (start == NULL)
    248     {
    249       /* This shouldn't really happen, as g_get_current_dir() should
    250 	 return an absolute pathname, but bug 573843 shows this is
    251 	 not always happening */
    252       g_free (canon);
    253       return g_build_filename (G_DIR_SEPARATOR_S, filename, NULL);
    254     }
    255 
    256   /* POSIX allows double slashes at the start to
    257    * mean something special (as does windows too).
    258    * So, "//" != "/", but more than two slashes
    259    * is treated as "/".
    260    */
    261   i = 0;
    262   for (p = start - 1;
    263        (p >= canon) &&
    264 	 G_IS_DIR_SEPARATOR (*p);
    265        p--)
    266     i++;
    267   if (i > 2)
    268     {
    269       i -= 1;
    270       start -= i;
    271       memmove (start, start+i, strlen (start+i)+1);
    272     }
    273 
    274   p = start;
    275   while (*p != 0)
    276     {
    277       if (p[0] == '.' && (p[1] == 0 || G_IS_DIR_SEPARATOR (p[1])))
    278 	{
    279 	  memmove (p, p+1, strlen (p+1)+1);
    280 	}
    281       else if (p[0] == '.' && p[1] == '.' && (p[2] == 0 || G_IS_DIR_SEPARATOR (p[2])))
    282 	{
    283 	  q = p + 2;
    284 	  /* Skip previous separator */
    285 	  p = p - 2;
    286 	  if (p < start)
    287 	    p = start;
    288 	  while (p > start && !G_IS_DIR_SEPARATOR (*p))
    289 	    p--;
    290 	  if (G_IS_DIR_SEPARATOR (*p))
    291 	    *p++ = G_DIR_SEPARATOR;
    292 	  memmove (p, q, strlen (q)+1);
    293 	}
    294       else
    295 	{
    296 	  /* Skip until next separator */
    297 	  while (*p != 0 && !G_IS_DIR_SEPARATOR (*p))
    298 	    p++;
    299 
    300 	  if (*p != 0)
    301 	    {
    302 	      /* Canonicalize one separator */
    303 	      *p++ = G_DIR_SEPARATOR;
    304 	    }
    305 	}
    306 
    307       /* Remove additional separators */
    308       q = p;
    309       while (*q && G_IS_DIR_SEPARATOR (*q))
    310 	q++;
    311 
    312       if (p != q)
    313 	memmove (p, q, strlen (q)+1);
    314     }
    315 
    316   /* Remove trailing slashes */
    317   if (p > start && G_IS_DIR_SEPARATOR (*(p-1)))
    318     *(p-1) = 0;
    319 
    320   return canon;
    321 }
    322 
    323 /**
    324  * _g_local_file_new:
    325  * @filename: filename of the file to create.
    326  *
    327  * Returns: new local #GFile.
    328  **/
    329 GFile *
    330 _g_local_file_new (const char *filename)
    331 {
    332   GLocalFile *local;
    333 
    334   local = g_object_new (G_TYPE_LOCAL_FILE, NULL);
    335   local->filename = canonicalize_filename (filename);
    336 
    337   return G_FILE (local);
    338 }
    339 
    340 static gboolean
    341 g_local_file_is_native (GFile *file)
    342 {
    343   return TRUE;
    344 }
    345 
    346 static gboolean
    347 g_local_file_has_uri_scheme (GFile      *file,
    348 			     const char *uri_scheme)
    349 {
    350   return g_ascii_strcasecmp (uri_scheme, "file") == 0;
    351 }
    352 
    353 static char *
    354 g_local_file_get_uri_scheme (GFile *file)
    355 {
    356   return g_strdup ("file");
    357 }
    358 
    359 static char *
    360 g_local_file_get_basename (GFile *file)
    361 {
    362   return g_path_get_basename (G_LOCAL_FILE (file)->filename);
    363 }
    364 
    365 static char *
    366 g_local_file_get_path (GFile *file)
    367 {
    368   return g_strdup (G_LOCAL_FILE (file)->filename);
    369 }
    370 
    371 static char *
    372 g_local_file_get_uri (GFile *file)
    373 {
    374   return g_filename_to_uri (G_LOCAL_FILE (file)->filename, NULL, NULL);
    375 }
    376 
    377 static gboolean
    378 get_filename_charset (const gchar **filename_charset)
    379 {
    380   const gchar **charsets;
    381   gboolean is_utf8;
    382 
    383   is_utf8 = g_get_filename_charsets (&charsets);
    384 
    385   if (filename_charset)
    386     *filename_charset = charsets[0];
    387 
    388   return is_utf8;
    389 }
    390 
    391 static gboolean
    392 name_is_valid_for_display (const char *string,
    393 			   gboolean    is_valid_utf8)
    394 {
    395   char c;
    396 
    397   if (!is_valid_utf8 &&
    398       !g_utf8_validate (string, -1, NULL))
    399     return FALSE;
    400 
    401   while ((c = *string++) != 0)
    402     {
    403       if (g_ascii_iscntrl (c))
    404 	return FALSE;
    405     }
    406 
    407   return TRUE;
    408 }
    409 
    410 static char *
    411 g_local_file_get_parse_name (GFile *file)
    412 {
    413   const char *filename;
    414   char *parse_name;
    415   const gchar *charset;
    416   char *utf8_filename;
    417   char *roundtripped_filename;
    418   gboolean free_utf8_filename;
    419   gboolean is_valid_utf8;
    420   char *escaped_path;
    421 
    422   filename = G_LOCAL_FILE (file)->filename;
    423   if (get_filename_charset (&charset))
    424     {
    425       utf8_filename = (char *)filename;
    426       free_utf8_filename = FALSE;
    427       is_valid_utf8 = FALSE; /* Can't guarantee this */
    428     }
    429   else
    430     {
    431       utf8_filename = g_convert (filename, -1,
    432 				 "UTF-8", charset, NULL, NULL, NULL);
    433       free_utf8_filename = TRUE;
    434       is_valid_utf8 = TRUE;
    435 
    436       if (utf8_filename != NULL)
    437 	{
    438 	  /* Make sure we can roundtrip: */
    439 	  roundtripped_filename = g_convert (utf8_filename, -1,
    440 					     charset, "UTF-8", NULL, NULL, NULL);
    441 
    442 	  if (roundtripped_filename == NULL ||
    443 	      strcmp (utf8_filename, roundtripped_filename) != 0)
    444 	    {
    445 	      g_free (utf8_filename);
    446 	      utf8_filename = NULL;
    447 	    }
    448 
    449 	  g_free (roundtripped_filename);
    450 	}
    451     }
    452 
    453   if (utf8_filename != NULL &&
    454       name_is_valid_for_display (utf8_filename, is_valid_utf8))
    455     {
    456       if (free_utf8_filename)
    457 	parse_name = utf8_filename;
    458       else
    459 	parse_name = g_strdup (utf8_filename);
    460     }
    461   else
    462     {
    463       escaped_path = g_uri_escape_string (filename,
    464 					  G_URI_RESERVED_CHARS_ALLOWED_IN_PATH_ELEMENT "/",
    465 					  TRUE);
    466       parse_name = g_strconcat ("file://",
    467 				(*escaped_path != '/') ? "/" : "",
    468 				escaped_path,
    469 				NULL);
    470 
    471       g_free (escaped_path);
    472 
    473       if (free_utf8_filename)
    474 	g_free (utf8_filename);
    475     }
    476 
    477   return parse_name;
    478 }
    479 
    480 static GFile *
    481 g_local_file_get_parent (GFile *file)
    482 {
    483   GLocalFile *local = G_LOCAL_FILE (file);
    484   const char *non_root;
    485   char *dirname;
    486   GFile *parent;
    487 
    488   /* Check for root */
    489   non_root = g_path_skip_root (local->filename);
    490   if (*non_root == 0)
    491     return NULL;
    492 
    493   dirname = g_path_get_dirname (local->filename);
    494   parent = _g_local_file_new (dirname);
    495   g_free (dirname);
    496   return parent;
    497 }
    498 
    499 static GFile *
    500 g_local_file_dup (GFile *file)
    501 {
    502   GLocalFile *local = G_LOCAL_FILE (file);
    503 
    504   return _g_local_file_new (local->filename);
    505 }
    506 
    507 static guint
    508 g_local_file_hash (GFile *file)
    509 {
    510   GLocalFile *local = G_LOCAL_FILE (file);
    511 
    512   return g_str_hash (local->filename);
    513 }
    514 
    515 static gboolean
    516 g_local_file_equal (GFile *file1,
    517 		    GFile *file2)
    518 {
    519   GLocalFile *local1 = G_LOCAL_FILE (file1);
    520   GLocalFile *local2 = G_LOCAL_FILE (file2);
    521 
    522   return g_str_equal (local1->filename, local2->filename);
    523 }
    524 
    525 static const char *
    526 match_prefix (const char *path,
    527               const char *prefix)
    528 {
    529   int prefix_len;
    530 
    531   prefix_len = strlen (prefix);
    532   if (strncmp (path, prefix, prefix_len) != 0)
    533     return NULL;
    534 
    535   /* Handle the case where prefix is the root, so that
    536    * the IS_DIR_SEPRARATOR check below works */
    537   if (prefix_len > 0 &&
    538       G_IS_DIR_SEPARATOR (prefix[prefix_len-1]))
    539     prefix_len--;
    540 
    541   return path + prefix_len;
    542 }
    543 
    544 static gboolean
    545 g_local_file_prefix_matches (GFile *parent,
    546 			     GFile *descendant)
    547 {
    548   GLocalFile *parent_local = G_LOCAL_FILE (parent);
    549   GLocalFile *descendant_local = G_LOCAL_FILE (descendant);
    550   const char *remainder;
    551 
    552   remainder = match_prefix (descendant_local->filename, parent_local->filename);
    553   if (remainder != NULL && G_IS_DIR_SEPARATOR (*remainder))
    554     return TRUE;
    555   return FALSE;
    556 }
    557 
    558 static char *
    559 g_local_file_get_relative_path (GFile *parent,
    560 				GFile *descendant)
    561 {
    562   GLocalFile *parent_local = G_LOCAL_FILE (parent);
    563   GLocalFile *descendant_local = G_LOCAL_FILE (descendant);
    564   const char *remainder;
    565 
    566   remainder = match_prefix (descendant_local->filename, parent_local->filename);
    567 
    568   if (remainder != NULL && G_IS_DIR_SEPARATOR (*remainder))
    569     return g_strdup (remainder + 1);
    570   return NULL;
    571 }
    572 
    573 static GFile *
    574 g_local_file_resolve_relative_path (GFile      *file,
    575 				    const char *relative_path)
    576 {
    577   GLocalFile *local = G_LOCAL_FILE (file);
    578   char *filename;
    579   GFile *child;
    580 
    581   if (g_path_is_absolute (relative_path))
    582     return _g_local_file_new (relative_path);
    583 
    584   filename = g_build_filename (local->filename, relative_path, NULL);
    585   child = _g_local_file_new (filename);
    586   g_free (filename);
    587 
    588   return child;
    589 }
    590 
    591 static GFileEnumerator *
    592 g_local_file_enumerate_children (GFile                *file,
    593 				 const char           *attributes,
    594 				 GFileQueryInfoFlags   flags,
    595 				 GCancellable         *cancellable,
    596 				 GError              **error)
    597 {
    598   GLocalFile *local = G_LOCAL_FILE (file);
    599   return _g_local_file_enumerator_new (local,
    600 				       attributes, flags,
    601 				       cancellable, error);
    602 }
    603 
    604 static GFile *
    605 g_local_file_get_child_for_display_name (GFile        *file,
    606 					 const char   *display_name,
    607 					 GError      **error)
    608 {
    609   GFile *new_file;
    610   char *basename;
    611 
    612   basename = g_filename_from_utf8 (display_name, -1, NULL, NULL, NULL);
    613   if (basename == NULL)
    614     {
    615       g_set_error (error, G_IO_ERROR,
    616 		   G_IO_ERROR_INVALID_FILENAME,
    617 		   _("Invalid filename %s"), display_name);
    618       return NULL;
    619     }
    620 
    621   new_file = g_file_get_child (file, basename);
    622   g_free (basename);
    623 
    624   return new_file;
    625 }
    626 
    627 #ifdef USE_STATFS
    628 static const char *
    629 get_fs_type (long f_type)
    630 {
    631   /* filesystem ids taken from linux manpage */
    632   switch (f_type)
    633     {
    634     case 0xadf5:
    635       return "adfs";
    636     case 0x5346414f:
    637       return "afs";
    638     case 0x0187:
    639       return "autofs";
    640     case 0xADFF:
    641       return "affs";
    642     case 0x42465331:
    643       return "befs";
    644     case 0x1BADFACE:
    645       return "bfs";
    646     case 0x9123683E:
    647       return "btrfs";
    648     case 0xFF534D42:
    649       return "cifs";
    650     case 0x73757245:
    651       return "coda";
    652     case 0x012FF7B7:
    653       return "coh";
    654     case 0x28cd3d45:
    655       return "cramfs";
    656     case 0x1373:
    657       return "devfs";
    658     case 0x00414A53:
    659       return "efs";
    660     case 0x137D:
    661       return "ext";
    662     case 0xEF51:
    663       return "ext2";
    664     case 0xEF53:
    665       return "ext3/ext4";
    666     case 0x4244:
    667       return "hfs";
    668     case 0xF995E849:
    669       return "hpfs";
    670     case 0x958458f6:
    671       return "hugetlbfs";
    672     case 0x9660:
    673       return "isofs";
    674     case 0x72b6:
    675       return "jffs2";
    676     case 0x3153464a:
    677       return "jfs";
    678     case 0x137F:
    679       return "minix";
    680     case 0x138F:
    681       return "minix2";
    682     case 0x2468:
    683       return "minix2";
    684     case 0x2478:
    685       return "minix22";
    686     case 0x4d44:
    687       return "msdos";
    688     case 0x564c:
    689       return "ncp";
    690     case 0x6969:
    691       return "nfs";
    692     case 0x5346544e:
    693       return "ntfs";
    694     case 0x9fa1:
    695       return "openprom";
    696     case 0x9fa0:
    697       return "proc";
    698     case 0x002f:
    699       return "qnx4";
    700     case 0x52654973:
    701       return "reiserfs";
    702     case 0x7275:
    703       return "romfs";
    704     case 0x517B:
    705       return "smb";
    706     case 0x73717368:
    707       return "squashfs";
    708     case 0x012FF7B6:
    709       return "sysv2";
    710     case 0x012FF7B5:
    711       return "sysv4";
    712     case 0x01021994:
    713       return "tmpfs";
    714     case 0x15013346:
    715       return "udf";
    716     case 0x00011954:
    717       return "ufs";
    718     case 0x9fa2:
    719       return "usbdevice";
    720     case 0xa501FCF5:
    721       return "vxfs";
    722     case 0x012FF7B4:
    723       return "xenix";
    724     case 0x58465342:
    725       return "xfs";
    726     case 0x012FD16D:
    727       return "xiafs";
    728     default:
    729       return NULL;
    730     }
    731 }
    732 #endif
    733 
    734 #ifndef G_OS_WIN32
    735 
    736 G_LOCK_DEFINE_STATIC(mount_info_hash);
    737 static GHashTable *mount_info_hash = NULL;
    738 static guint64 mount_info_hash_cache_time = 0;
    739 
    740 typedef enum {
    741   MOUNT_INFO_READONLY = 1<<0
    742 } MountInfo;
    743 
    744 static gboolean
    745 device_equal (gconstpointer v1,
    746               gconstpointer v2)
    747 {
    748   return *(dev_t *)v1 == *(dev_t *)v2;
    749 }
    750 
    751 static guint
    752 device_hash (gconstpointer v)
    753 {
    754   return (guint) *(dev_t *)v;
    755 }
    756 
    757 static void
    758 get_mount_info (GFileInfo             *fs_info,
    759 		const char            *path,
    760 		GFileAttributeMatcher *matcher)
    761 {
    762   struct stat buf;
    763   gboolean got_info;
    764   gpointer info_as_ptr;
    765   guint mount_info;
    766   char *mountpoint;
    767   dev_t *dev;
    768   GUnixMountEntry *mount;
    769   guint64 cache_time;
    770 
    771   if (g_lstat (path, &buf) != 0)
    772     return;
    773 
    774   G_LOCK (mount_info_hash);
    775 
    776   if (mount_info_hash == NULL)
    777     mount_info_hash = g_hash_table_new_full (device_hash, device_equal,
    778 					     g_free, NULL);
    779 
    780 
    781   if (g_unix_mounts_changed_since (mount_info_hash_cache_time))
    782     g_hash_table_remove_all (mount_info_hash);
    783 
    784   got_info = g_hash_table_lookup_extended (mount_info_hash,
    785 					   &buf.st_dev,
    786 					   NULL,
    787 					   &info_as_ptr);
    788 
    789   G_UNLOCK (mount_info_hash);
    790 
    791   mount_info = GPOINTER_TO_UINT (info_as_ptr);
    792 
    793   if (!got_info)
    794     {
    795       mount_info = 0;
    796 
    797       mountpoint = find_mountpoint_for (path, buf.st_dev);
    798       if (mountpoint == NULL)
    799 	mountpoint = g_strdup ("/");
    800 
    801       mount = g_unix_mount_at (mountpoint, &cache_time);
    802       if (mount)
    803 	{
    804 	  if (g_unix_mount_is_readonly (mount))
    805 	    mount_info |= MOUNT_INFO_READONLY;
    806 
    807 	  g_unix_mount_free (mount);
    808 	}
    809 
    810       g_free (mountpoint);
    811 
    812       dev = g_new0 (dev_t, 1);
    813       *dev = buf.st_dev;
    814 
    815       G_LOCK (mount_info_hash);
    816       mount_info_hash_cache_time = cache_time;
    817       g_hash_table_insert (mount_info_hash, dev, GUINT_TO_POINTER (mount_info));
    818       G_UNLOCK (mount_info_hash);
    819     }
    820 
    821   if (mount_info & MOUNT_INFO_READONLY)
    822     g_file_info_set_attribute_boolean (fs_info, G_FILE_ATTRIBUTE_FILESYSTEM_READONLY, TRUE);
    823 }
    824 
    825 #endif
    826 
    827 #ifdef G_OS_WIN32
    828 
    829 static gboolean
    830 is_xp_or_later (void)
    831 {
    832   static int result = -1;
    833 
    834   if (result == -1)
    835     {
    836 #ifndef _MSC_VER
    837       OSVERSIONINFOEX ver_info = {0};
    838       DWORDLONG cond_mask = 0;
    839       int op = VER_GREATER_EQUAL;
    840 
    841       ver_info.dwOSVersionInfoSize = sizeof ver_info;
    842       ver_info.dwMajorVersion = 5;
    843       ver_info.dwMinorVersion = 1;
    844 
    845       VER_SET_CONDITION (cond_mask, VER_MAJORVERSION, op);
    846       VER_SET_CONDITION (cond_mask, VER_MINORVERSION, op);
    847 
    848       result = VerifyVersionInfo (&ver_info,
    849 				  VER_MAJORVERSION | VER_MINORVERSION,
    850 				  cond_mask) != 0;
    851 #else
    852       result = ((DWORD)(LOBYTE (LOWORD (GetVersion ())))) >= 5;
    853 #endif
    854     }
    855 
    856   return result;
    857 }
    858 
    859 static wchar_t *
    860 get_volume_for_path (const char *path)
    861 {
    862   long len;
    863   wchar_t *wpath;
    864   wchar_t *result;
    865 
    866   wpath = g_utf8_to_utf16 (path, -1, NULL, NULL, NULL);
    867   result = g_new (wchar_t, MAX_PATH);
    868 
    869   if (!GetVolumePathNameW (wpath, result, MAX_PATH))
    870     {
    871       char *msg = g_win32_error_message (GetLastError ());
    872       g_critical ("GetVolumePathName failed: %s", msg);
    873       g_free (msg);
    874       g_free (result);
    875       g_free (wpath);
    876       return NULL;
    877     }
    878 
    879   len = wcslen (result);
    880   if (len > 0 && result[len-1] != L'\\')
    881     {
    882       result = g_renew (wchar_t, result, len + 2);
    883       result[len] = L'\\';
    884       result[len + 1] = 0;
    885     }
    886 
    887   g_free (wpath);
    888   return result;
    889 }
    890 
    891 static char *
    892 find_mountpoint_for (const char *file, dev_t dev)
    893 {
    894   wchar_t *wpath;
    895   char *utf8_path;
    896 
    897   wpath = get_volume_for_path (file);
    898   if (!wpath)
    899     return NULL;
    900 
    901   utf8_path = g_utf16_to_utf8 (wpath, -1, NULL, NULL, NULL);
    902 
    903   g_free (wpath);
    904   return utf8_path;
    905 }
    906 
    907 static void
    908 get_filesystem_readonly (GFileInfo  *info,
    909 			 const char *path)
    910 {
    911   wchar_t *rootdir;
    912 
    913   rootdir = get_volume_for_path (path);
    914 
    915   if (rootdir)
    916     {
    917       if (is_xp_or_later ())
    918         {
    919           DWORD flags;
    920           if (GetVolumeInformationW (rootdir, NULL, 0, NULL, NULL, &flags, NULL, 0))
    921 	    g_file_info_set_attribute_boolean (info, G_FILE_ATTRIBUTE_FILESYSTEM_READONLY,
    922 					       (flags & FILE_READ_ONLY_VOLUME) != 0);
    923         }
    924       else
    925         {
    926           if (GetDriveTypeW (rootdir) == DRIVE_CDROM)
    927 	    g_file_info_set_attribute_boolean (info, G_FILE_ATTRIBUTE_FILESYSTEM_READONLY, TRUE);
    928         }
    929     }
    930 
    931   g_free (rootdir);
    932 }
    933 
    934 #endif /* G_OS_WIN32 */
    935 
    936 static GFileInfo *
    937 g_local_file_query_filesystem_info (GFile         *file,
    938 				    const char    *attributes,
    939 				    GCancellable  *cancellable,
    940 				    GError       **error)
    941 {
    942   GLocalFile *local = G_LOCAL_FILE (file);
    943   GFileInfo *info;
    944   int statfs_result = 0;
    945   gboolean no_size;
    946 #ifndef G_OS_WIN32
    947   guint64 block_size;
    948   const char *fstype;
    949 #ifdef USE_STATFS
    950   struct statfs statfs_buffer;
    951 #elif defined(USE_STATVFS)
    952   struct statvfs statfs_buffer;
    953 #endif
    954 #endif
    955   GFileAttributeMatcher *attribute_matcher;
    956 
    957   no_size = FALSE;
    958 
    959 #ifdef USE_STATFS
    960 
    961 #if STATFS_ARGS == 2
    962   statfs_result = statfs (local->filename, &statfs_buffer);
    963 #elif STATFS_ARGS == 4
    964   statfs_result = statfs (local->filename, &statfs_buffer,
    965 			  sizeof (statfs_buffer), 0);
    966 #endif
    967   block_size = statfs_buffer.f_bsize;
    968 
    969   /* Many backends can't report free size (for instance the gvfs fuse
    970      backend for backend not supporting this), and set f_bfree to 0,
    971      but it can be 0 for real too. We treat the availible == 0 and
    972      free == 0 case as "both of these are invalid".
    973    */
    974 #ifndef G_OS_WIN32
    975   if (statfs_buffer.f_bavail == 0 && statfs_buffer.f_bfree == 0)
    976     no_size = TRUE;
    977 #endif
    978 
    979 #elif defined(USE_STATVFS)
    980   statfs_result = statvfs (local->filename, &statfs_buffer);
    981   block_size = statfs_buffer.f_frsize;
    982 #endif
    983 
    984   if (statfs_result == -1)
    985     {
    986       int errsv = errno;
    987 
    988       g_set_error (error, G_IO_ERROR,
    989 		   g_io_error_from_errno (errsv),
    990 		   _("Error getting filesystem info: %s"),
    991 		   g_strerror (errsv));
    992       return NULL;
    993     }
    994 
    995   info = g_file_info_new ();
    996 
    997   attribute_matcher = g_file_attribute_matcher_new (attributes);
    998 
    999   if (!no_size &&
   1000       g_file_attribute_matcher_matches (attribute_matcher,
   1001 					G_FILE_ATTRIBUTE_FILESYSTEM_FREE))
   1002     {
   1003 #ifdef G_OS_WIN32
   1004       gchar *localdir = g_path_get_dirname (local->filename);
   1005       wchar_t *wdirname = g_utf8_to_utf16 (localdir, -1, NULL, NULL, NULL);
   1006       ULARGE_INTEGER li;
   1007 
   1008       g_free (localdir);
   1009       if (GetDiskFreeSpaceExW (wdirname, &li, NULL, NULL))
   1010         g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_FREE, (guint64)li.QuadPart);
   1011       g_free (wdirname);
   1012 #else
   1013       g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_FREE, block_size * statfs_buffer.f_bavail);
   1014 #endif
   1015     }
   1016   if (!no_size &&
   1017       g_file_attribute_matcher_matches (attribute_matcher,
   1018 					G_FILE_ATTRIBUTE_FILESYSTEM_SIZE))
   1019     {
   1020 #ifdef G_OS_WIN32
   1021       gchar *localdir = g_path_get_dirname (local->filename);
   1022       wchar_t *wdirname = g_utf8_to_utf16 (localdir, -1, NULL, NULL, NULL);
   1023       ULARGE_INTEGER li;
   1024 
   1025       g_free (localdir);
   1026       if (GetDiskFreeSpaceExW (wdirname, NULL, &li, NULL))
   1027         g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_SIZE,  (guint64)li.QuadPart);
   1028       g_free (wdirname);
   1029 #else
   1030       g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_SIZE, block_size * statfs_buffer.f_blocks);
   1031 #endif
   1032     }
   1033 #ifdef USE_STATFS
   1034 #if defined(HAVE_STRUCT_STATFS_F_FSTYPENAME)
   1035   fstype = g_strdup(statfs_buffer.f_fstypename);
   1036 #else
   1037   fstype = get_fs_type (statfs_buffer.f_type);
   1038 #endif
   1039 
   1040 #elif defined(USE_STATVFS) && defined(HAVE_STRUCT_STATVFS_F_BASETYPE)
   1041   fstype = g_strdup(statfs_buffer.f_basetype);
   1042 #endif
   1043 
   1044 #ifndef G_OS_WIN32
   1045   if (fstype &&
   1046       g_file_attribute_matcher_matches (attribute_matcher,
   1047 					G_FILE_ATTRIBUTE_FILESYSTEM_TYPE))
   1048     g_file_info_set_attribute_string (info, G_FILE_ATTRIBUTE_FILESYSTEM_TYPE, fstype);
   1049 #endif
   1050 
   1051   if (g_file_attribute_matcher_matches (attribute_matcher,
   1052 					G_FILE_ATTRIBUTE_FILESYSTEM_READONLY))
   1053     {
   1054 #ifdef G_OS_WIN32
   1055       get_filesystem_readonly (info, local->filename);
   1056 #else
   1057       get_mount_info (info, local->filename, attribute_matcher);
   1058 #endif
   1059     }
   1060 
   1061   g_file_attribute_matcher_unref (attribute_matcher);
   1062 
   1063   return info;
   1064 }
   1065 
   1066 static GMount *
   1067 g_local_file_find_enclosing_mount (GFile         *file,
   1068                                    GCancellable  *cancellable,
   1069                                    GError       **error)
   1070 {
   1071   GLocalFile *local = G_LOCAL_FILE (file);
   1072   struct stat buf;
   1073   char *mountpoint;
   1074   GMount *mount;
   1075 
   1076   if (g_lstat (local->filename, &buf) != 0)
   1077     {
   1078       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NOT_FOUND,
   1079 		      /* Translators: This is an error message when trying to
   1080 		       * find the enclosing (user visible) mount of a file, but
   1081 		       * none exists. */
   1082 		      _("Containing mount does not exist"));
   1083       return NULL;
   1084     }
   1085 
   1086   mountpoint = find_mountpoint_for (local->filename, buf.st_dev);
   1087   if (mountpoint == NULL)
   1088     {
   1089       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NOT_FOUND,
   1090 		      /* Translators: This is an error message when trying to
   1091 		       * find the enclosing (user visible) mount of a file, but
   1092 		       * none exists. */
   1093 		      _("Containing mount does not exist"));
   1094       return NULL;
   1095     }
   1096 
   1097   mount = _g_mount_get_for_mount_path (mountpoint, cancellable);
   1098   g_free (mountpoint);
   1099   if (mount)
   1100     return mount;
   1101 
   1102   g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NOT_FOUND,
   1103 		  /* Translators: This is an error message when trying to find
   1104 		   * the enclosing (user visible) mount of a file, but none
   1105 		   * exists. */
   1106 		  _("Containing mount does not exist"));
   1107   return NULL;
   1108 }
   1109 
   1110 static GFile *
   1111 g_local_file_set_display_name (GFile         *file,
   1112 			       const char    *display_name,
   1113 			       GCancellable  *cancellable,
   1114 			       GError       **error)
   1115 {
   1116   GLocalFile *local, *new_local;
   1117   GFile *new_file, *parent;
   1118   struct stat statbuf;
   1119   int errsv;
   1120 
   1121   parent = g_file_get_parent (file);
   1122   if (parent == NULL)
   1123     {
   1124       g_set_error_literal (error, G_IO_ERROR,
   1125                            G_IO_ERROR_FAILED,
   1126                            _("Can't rename root directory"));
   1127       return NULL;
   1128     }
   1129 
   1130   new_file = g_file_get_child_for_display_name (parent, display_name, error);
   1131   g_object_unref (parent);
   1132 
   1133   if (new_file == NULL)
   1134     return NULL;
   1135   local = G_LOCAL_FILE (file);
   1136   new_local = G_LOCAL_FILE (new_file);
   1137 
   1138   if (g_lstat (new_local->filename, &statbuf) == -1)
   1139     {
   1140       errsv = errno;
   1141 
   1142       if (errsv != ENOENT)
   1143         {
   1144 	  g_set_error (error, G_IO_ERROR,
   1145 		       g_io_error_from_errno (errsv),
   1146 		       _("Error renaming file: %s"),
   1147 		       g_strerror (errsv));
   1148           return NULL;
   1149         }
   1150     }
   1151   else
   1152     {
   1153       g_set_error_literal (error, G_IO_ERROR,
   1154                            G_IO_ERROR_EXISTS,
   1155                            _("Can't rename file, filename already exist"));
   1156       return NULL;
   1157     }
   1158 
   1159   if (g_rename (local->filename, new_local->filename) == -1)
   1160     {
   1161       errsv = errno;
   1162 
   1163       if (errsv == EINVAL)
   1164 	/* We can't get a rename file into itself error herer,
   1165 	   so this must be an invalid filename, on e.g. FAT */
   1166 	g_set_error_literal (error, G_IO_ERROR,
   1167                              G_IO_ERROR_INVALID_FILENAME,
   1168                              _("Invalid filename"));
   1169       else
   1170 	g_set_error (error, G_IO_ERROR,
   1171 		     g_io_error_from_errno (errsv),
   1172 		     _("Error renaming file: %s"),
   1173 		     g_strerror (errsv));
   1174       g_object_unref (new_file);
   1175       return NULL;
   1176     }
   1177 
   1178   return new_file;
   1179 }
   1180 
   1181 static GFileInfo *
   1182 g_local_file_query_info (GFile                *file,
   1183 			 const char           *attributes,
   1184 			 GFileQueryInfoFlags   flags,
   1185 			 GCancellable         *cancellable,
   1186 			 GError              **error)
   1187 {
   1188   GLocalFile *local = G_LOCAL_FILE (file);
   1189   GFileInfo *info;
   1190   GFileAttributeMatcher *matcher;
   1191   char *basename, *dirname;
   1192   GLocalParentFileInfo parent_info;
   1193 
   1194   matcher = g_file_attribute_matcher_new (attributes);
   1195 
   1196   basename = g_path_get_basename (local->filename);
   1197 
   1198   dirname = g_path_get_dirname (local->filename);
   1199   _g_local_file_info_get_parent_info (dirname, matcher, &parent_info);
   1200   g_free (dirname);
   1201 
   1202   info = _g_local_file_info_get (basename, local->filename,
   1203 				 matcher, flags, &parent_info,
   1204 				 error);
   1205 
   1206   g_free (basename);
   1207 
   1208   g_file_attribute_matcher_unref (matcher);
   1209 
   1210   return info;
   1211 }
   1212 
   1213 static GFileAttributeInfoList *
   1214 g_local_file_query_settable_attributes (GFile         *file,
   1215 					GCancellable  *cancellable,
   1216 					GError       **error)
   1217 {
   1218   return g_file_attribute_info_list_ref (local_writable_attributes);
   1219 }
   1220 
   1221 static GFileAttributeInfoList *
   1222 g_local_file_query_writable_namespaces (GFile         *file,
   1223 					GCancellable  *cancellable,
   1224 					GError       **error)
   1225 {
   1226   return g_file_attribute_info_list_ref (local_writable_namespaces);
   1227 }
   1228 
   1229 static gboolean
   1230 g_local_file_set_attribute (GFile                *file,
   1231 			    const char           *attribute,
   1232 			    GFileAttributeType    type,
   1233 			    gpointer              value_p,
   1234 			    GFileQueryInfoFlags   flags,
   1235 			    GCancellable         *cancellable,
   1236 			    GError              **error)
   1237 {
   1238   GLocalFile *local = G_LOCAL_FILE (file);
   1239 
   1240   return _g_local_file_info_set_attribute (local->filename,
   1241 					   attribute,
   1242 					   type,
   1243 					   value_p,
   1244 					   flags,
   1245 					   cancellable,
   1246 					   error);
   1247 }
   1248 
   1249 static gboolean
   1250 g_local_file_set_attributes_from_info (GFile                *file,
   1251 				       GFileInfo            *info,
   1252 				       GFileQueryInfoFlags   flags,
   1253 				       GCancellable         *cancellable,
   1254 				       GError              **error)
   1255 {
   1256   GLocalFile *local = G_LOCAL_FILE (file);
   1257   int res, chained_res;
   1258   GFileIface *default_iface;
   1259 
   1260   res = _g_local_file_info_set_attributes (local->filename,
   1261 					   info, flags,
   1262 					   cancellable,
   1263 					   error);
   1264 
   1265   if (!res)
   1266     error = NULL; /* Don't write over error if further errors */
   1267 
   1268   default_iface = g_type_default_interface_peek (G_TYPE_FILE);
   1269 
   1270   chained_res = (default_iface->set_attributes_from_info) (file, info, flags, cancellable, error);
   1271 
   1272   return res && chained_res;
   1273 }
   1274 
   1275 static GFileInputStream *
   1276 g_local_file_read (GFile         *file,
   1277 		   GCancellable  *cancellable,
   1278 		   GError       **error)
   1279 {
   1280   GLocalFile *local = G_LOCAL_FILE (file);
   1281   int fd;
   1282   struct stat buf;
   1283 
   1284   fd = g_open (local->filename, O_RDONLY|O_BINARY, 0);
   1285   if (fd == -1)
   1286     {
   1287       int errsv = errno;
   1288 
   1289       g_set_error (error, G_IO_ERROR,
   1290 		   g_io_error_from_errno (errsv),
   1291 		   _("Error opening file: %s"),
   1292 		   g_strerror (errsv));
   1293       return NULL;
   1294     }
   1295 
   1296   if (fstat(fd, &buf) == 0 && S_ISDIR (buf.st_mode))
   1297     {
   1298       close (fd);
   1299       g_set_error_literal (error, G_IO_ERROR,
   1300                            G_IO_ERROR_IS_DIRECTORY,
   1301                            _("Can't open directory"));
   1302       return NULL;
   1303     }
   1304 
   1305   return _g_local_file_input_stream_new (fd);
   1306 }
   1307 
   1308 static GFileOutputStream *
   1309 g_local_file_append_to (GFile             *file,
   1310 			GFileCreateFlags   flags,
   1311 			GCancellable      *cancellable,
   1312 			GError           **error)
   1313 {
   1314   return _g_local_file_output_stream_append (G_LOCAL_FILE (file)->filename,
   1315 					     flags, cancellable, error);
   1316 }
   1317 
   1318 static GFileOutputStream *
   1319 g_local_file_create (GFile             *file,
   1320 		     GFileCreateFlags   flags,
   1321 		     GCancellable      *cancellable,
   1322 		     GError           **error)
   1323 {
   1324   return _g_local_file_output_stream_create (G_LOCAL_FILE (file)->filename,
   1325 					     flags, cancellable, error);
   1326 }
   1327 
   1328 static GFileOutputStream *
   1329 g_local_file_replace (GFile             *file,
   1330 		      const char        *etag,
   1331 		      gboolean           make_backup,
   1332 		      GFileCreateFlags   flags,
   1333 		      GCancellable      *cancellable,
   1334 		      GError           **error)
   1335 {
   1336   return _g_local_file_output_stream_replace (G_LOCAL_FILE (file)->filename,
   1337 					      etag, make_backup, flags,
   1338 					      cancellable, error);
   1339 }
   1340 
   1341 
   1342 static gboolean
   1343 g_local_file_delete (GFile         *file,
   1344 		     GCancellable  *cancellable,
   1345 		     GError       **error)
   1346 {
   1347   GLocalFile *local = G_LOCAL_FILE (file);
   1348 
   1349   if (g_remove (local->filename) == -1)
   1350     {
   1351       int errsv = errno;
   1352 
   1353       /* Posix allows EEXIST too, but the more sane error
   1354 	 is G_IO_ERROR_NOT_FOUND, and it's what nautilus
   1355 	 expects */
   1356       if (errsv == EEXIST)
   1357 	errsv = ENOTEMPTY;
   1358 
   1359       g_set_error (error, G_IO_ERROR,
   1360 		   g_io_error_from_errno (errsv),
   1361 		   _("Error removing file: %s"),
   1362 		   g_strerror (errsv));
   1363       return FALSE;
   1364     }
   1365 
   1366   return TRUE;
   1367 }
   1368 
   1369 static char *
   1370 strip_trailing_slashes (const char *path)
   1371 {
   1372   char *path_copy;
   1373   int len;
   1374 
   1375   path_copy = g_strdup (path);
   1376   len = strlen (path_copy);
   1377   while (len > 1 && path_copy[len-1] == '/')
   1378     path_copy[--len] = 0;
   1379 
   1380   return path_copy;
   1381  }
   1382 
   1383 static char *
   1384 expand_symlink (const char *link)
   1385 {
   1386   char *resolved, *canonical, *parent, *link2;
   1387   char symlink_value[4096];
   1388 #ifdef G_OS_WIN32
   1389 #else
   1390   ssize_t res;
   1391 #endif
   1392 
   1393 #ifdef G_OS_WIN32
   1394 #else
   1395   res = readlink (link, symlink_value, sizeof (symlink_value) - 1);
   1396 
   1397   if (res == -1)
   1398     return g_strdup (link);
   1399   symlink_value[res] = 0;
   1400 #endif
   1401 
   1402   if (g_path_is_absolute (symlink_value))
   1403     return canonicalize_filename (symlink_value);
   1404   else
   1405     {
   1406       link2 = strip_trailing_slashes (link);
   1407       parent = g_path_get_dirname (link2);
   1408       g_free (link2);
   1409 
   1410       resolved = g_build_filename (parent, symlink_value, NULL);
   1411       g_free (parent);
   1412 
   1413       canonical = canonicalize_filename (resolved);
   1414 
   1415       g_free (resolved);
   1416 
   1417       return canonical;
   1418     }
   1419 }
   1420 
   1421 static char *
   1422 get_parent (const char *path,
   1423             dev_t      *parent_dev)
   1424 {
   1425   char *parent, *tmp;
   1426   struct stat parent_stat;
   1427   int num_recursions;
   1428   char *path_copy;
   1429 
   1430   path_copy = strip_trailing_slashes (path);
   1431 
   1432   parent = g_path_get_dirname (path_copy);
   1433   if (strcmp (parent, ".") == 0 ||
   1434       strcmp (parent, path_copy) == 0)
   1435     {
   1436       g_free (parent);
   1437       g_free (path_copy);
   1438       return NULL;
   1439     }
   1440   g_free (path_copy);
   1441 
   1442   num_recursions = 0;
   1443   do {
   1444     if (g_lstat (parent, &parent_stat) != 0)
   1445       {
   1446 	g_free (parent);
   1447 	return NULL;
   1448       }
   1449 
   1450     if (S_ISLNK (parent_stat.st_mode))
   1451       {
   1452 	tmp = parent;
   1453 	parent = expand_symlink (parent);
   1454 	g_free (tmp);
   1455       }
   1456 
   1457     num_recursions++;
   1458     if (num_recursions > 12)
   1459       {
   1460 	g_free (parent);
   1461 	return NULL;
   1462       }
   1463   } while (S_ISLNK (parent_stat.st_mode));
   1464 
   1465   *parent_dev = parent_stat.st_dev;
   1466 
   1467   return parent;
   1468 }
   1469 
   1470 static char *
   1471 expand_all_symlinks (const char *path)
   1472 {
   1473   char *parent, *parent_expanded;
   1474   char *basename, *res;
   1475   dev_t parent_dev;
   1476 
   1477   parent = get_parent (path, &parent_dev);
   1478   if (parent)
   1479     {
   1480       parent_expanded = expand_all_symlinks (parent);
   1481       g_free (parent);
   1482       basename = g_path_get_basename (path);
   1483       res = g_build_filename (parent_expanded, basename, NULL);
   1484       g_free (basename);
   1485       g_free (parent_expanded);
   1486     }
   1487   else
   1488     res = g_strdup (path);
   1489 
   1490   return res;
   1491 }
   1492 
   1493 #ifndef G_OS_WIN32
   1494 
   1495 static char *
   1496 find_mountpoint_for (const char *file,
   1497                      dev_t       dev)
   1498 {
   1499   char *dir, *parent;
   1500   dev_t dir_dev, parent_dev;
   1501 
   1502   dir = g_strdup (file);
   1503   dir_dev = dev;
   1504 
   1505   while (1)
   1506     {
   1507       parent = get_parent (dir, &parent_dev);
   1508       if (parent == NULL)
   1509         return dir;
   1510 
   1511       if (parent_dev != dir_dev)
   1512         {
   1513           g_free (parent);
   1514           return dir;
   1515         }
   1516 
   1517       g_free (dir);
   1518       dir = parent;
   1519     }
   1520 }
   1521 
   1522 static char *
   1523 find_topdir_for (const char *file)
   1524 {
   1525   char *dir;
   1526   dev_t dir_dev;
   1527 
   1528   dir = get_parent (file, &dir_dev);
   1529   if (dir == NULL)
   1530     return NULL;
   1531 
   1532   return find_mountpoint_for (dir, dir_dev);
   1533 }
   1534 
   1535 static char *
   1536 get_unique_filename (const char *basename,
   1537                      int         id)
   1538 {
   1539   const char *dot;
   1540 
   1541   if (id == 1)
   1542     return g_strdup (basename);
   1543 
   1544   dot = strchr (basename, '.');
   1545   if (dot)
   1546     return g_strdup_printf ("%.*s.%d%s", (int)(dot - basename), basename, id, dot);
   1547   else
   1548     return g_strdup_printf ("%s.%d", basename, id);
   1549 }
   1550 
   1551 static gboolean
   1552 path_has_prefix (const char *path,
   1553                  const char *prefix)
   1554 {
   1555   int prefix_len;
   1556 
   1557   if (prefix == NULL)
   1558     return TRUE;
   1559 
   1560   prefix_len = strlen (prefix);
   1561 
   1562   if (strncmp (path, prefix, prefix_len) == 0 &&
   1563       (prefix_len == 0 || /* empty prefix always matches */
   1564        prefix[prefix_len - 1] == '/' || /* last char in prefix was a /, so it must be in path too */
   1565        path[prefix_len] == 0 ||
   1566        path[prefix_len] == '/'))
   1567     return TRUE;
   1568 
   1569   return FALSE;
   1570 }
   1571 
   1572 static char *
   1573 try_make_relative (const char *path,
   1574                    const char *base)
   1575 {
   1576   char *path2, *base2;
   1577   char *relative;
   1578 
   1579   path2 = expand_all_symlinks (path);
   1580   base2 = expand_all_symlinks (base);
   1581 
   1582   relative = NULL;
   1583   if (path_has_prefix (path2, base2))
   1584     {
   1585       relative = path2 + strlen (base2);
   1586       while (*relative == '/')
   1587 	relative ++;
   1588       relative = g_strdup (relative);
   1589     }
   1590   g_free (path2);
   1591   g_free (base2);
   1592 
   1593   if (relative)
   1594     return relative;
   1595 
   1596   /* Failed, use abs path */
   1597   return g_strdup (path);
   1598 }
   1599 
   1600 static char *
   1601 escape_trash_name (char *name)
   1602 {
   1603   GString *str;
   1604   const gchar hex[16] = "0123456789ABCDEF";
   1605 
   1606   str = g_string_new ("");
   1607 
   1608   while (*name != 0)
   1609     {
   1610       char c;
   1611 
   1612       c = *name++;
   1613 
   1614       if (g_ascii_isprint (c))
   1615 	g_string_append_c (str, c);
   1616       else
   1617 	{
   1618           g_string_append_c (str, '%');
   1619           g_string_append_c (str, hex[((guchar)c) >> 4]);
   1620           g_string_append_c (str, hex[((guchar)c) & 0xf]);
   1621 	}
   1622     }
   1623 
   1624   return g_string_free (str, FALSE);
   1625 }
   1626 
   1627 gboolean
   1628 _g_local_file_has_trash_dir (const char *dirname, dev_t dir_dev)
   1629 {
   1630   static gsize home_dev_set = 0;
   1631   static dev_t home_dev;
   1632   char *topdir, *globaldir, *trashdir, *tmpname;
   1633   uid_t uid;
   1634   char uid_str[32];
   1635   struct stat global_stat, trash_stat;
   1636   gboolean res;
   1637   int statres;
   1638 
   1639   if (g_once_init_enter (&home_dev_set))
   1640     {
   1641       struct stat home_stat;
   1642 
   1643       g_stat (g_get_home_dir (), &home_stat);
   1644       home_dev = home_stat.st_dev;
   1645       g_once_init_leave (&home_dev_set, 1);
   1646     }
   1647 
   1648   /* Assume we can trash to the home */
   1649   if (dir_dev == home_dev)
   1650     return TRUE;
   1651 
   1652   topdir = find_mountpoint_for (dirname, dir_dev);
   1653   if (topdir == NULL)
   1654     return FALSE;
   1655 
   1656   globaldir = g_build_filename (topdir, ".Trash", NULL);
   1657   statres = g_lstat (globaldir, &global_stat);
   1658  if (g_lstat (globaldir, &global_stat) == 0 &&
   1659       S_ISDIR (global_stat.st_mode) &&
   1660       (global_stat.st_mode & S_ISVTX) != 0)
   1661     {
   1662       /* got a toplevel sysadmin created dir, assume we
   1663        * can trash to it (we should be able to create a dir)
   1664        * This fails for the FAT case where the ownership of
   1665        * that dir would be wrong though..
   1666        */
   1667       g_free (globaldir);
   1668       g_free (topdir);
   1669       return TRUE;
   1670     }
   1671   g_free (globaldir);
   1672 
   1673   /* No global trash dir, or it failed the tests, fall back to $topdir/.Trash-$uid */
   1674   uid = geteuid ();
   1675   g_snprintf (uid_str, sizeof (uid_str), "%lu", (unsigned long) uid);
   1676 
   1677   tmpname = g_strdup_printf (".Trash-%s", uid_str);
   1678   trashdir = g_build_filename (topdir, tmpname, NULL);
   1679   g_free (tmpname);
   1680 
   1681   if (g_lstat (trashdir, &trash_stat) == 0)
   1682     {
   1683       g_free (topdir);
   1684       g_free (trashdir);
   1685       return
   1686 	S_ISDIR (trash_stat.st_mode) &&
   1687 	trash_stat.st_uid == uid;
   1688     }
   1689   g_free (trashdir);
   1690 
   1691   /* User specific trash didn't exist, can we create it? */
   1692   res = g_access (topdir, W_OK) == 0;
   1693 
   1694   g_free (topdir);
   1695 
   1696   return res;
   1697 }
   1698 
   1699 
   1700 static gboolean
   1701 g_local_file_trash (GFile         *file,
   1702 		    GCancellable  *cancellable,
   1703 		    GError       **error)
   1704 {
   1705   GLocalFile *local = G_LOCAL_FILE (file);
   1706   struct stat file_stat, home_stat;
   1707   const char *homedir;
   1708   char *trashdir, *topdir, *infodir, *filesdir;
   1709   char *basename, *trashname, *trashfile, *infoname, *infofile;
   1710   char *original_name, *original_name_escaped;
   1711   int i;
   1712   char *data;
   1713   gboolean is_homedir_trash;
   1714   char delete_time[32];
   1715   int fd;
   1716   struct stat trash_stat, global_stat;
   1717   char *dirname, *globaldir;
   1718 
   1719   if (g_lstat (local->filename, &file_stat) != 0)
   1720     {
   1721       int errsv = errno;
   1722 
   1723       g_set_error (error, G_IO_ERROR,
   1724 		   g_io_error_from_errno (errsv),
   1725 		   _("Error trashing file: %s"),
   1726 		   g_strerror (errsv));
   1727       return FALSE;
   1728     }
   1729 
   1730   homedir = g_get_home_dir ();
   1731   g_stat (homedir, &home_stat);
   1732 
   1733   is_homedir_trash = FALSE;
   1734   trashdir = NULL;
   1735   if (file_stat.st_dev == home_stat.st_dev)
   1736     {
   1737       is_homedir_trash = TRUE;
   1738       errno = 0;
   1739       trashdir = g_build_filename (g_get_user_data_dir (), "Trash", NULL);
   1740       if (g_mkdir_with_parents (trashdir, 0700) < 0)
   1741 	{
   1742           char *display_name;
   1743           int errsv = errno;
   1744 
   1745           display_name = g_filename_display_name (trashdir);
   1746           g_set_error (error, G_IO_ERROR,
   1747                        g_io_error_from_errno (errsv),
   1748                        _("Unable to create trash dir %s: %s"),
   1749                        display_name, g_strerror (errsv));
   1750           g_free (display_name);
   1751           g_free (trashdir);
   1752           return FALSE;
   1753 	}
   1754       topdir = g_strdup (g_get_user_data_dir ());
   1755     }
   1756   else
   1757     {
   1758       uid_t uid;
   1759       char uid_str[32];
   1760 
   1761       uid = geteuid ();
   1762       g_snprintf (uid_str, sizeof (uid_str), "%lu", (unsigned long)uid);
   1763 
   1764       topdir = find_topdir_for (local->filename);
   1765       if (topdir == NULL)
   1766 	{
   1767 	  g_set_error_literal (error, G_IO_ERROR,
   1768                                G_IO_ERROR_NOT_SUPPORTED,
   1769                                _("Unable to find toplevel directory for trash"));
   1770 	  return FALSE;
   1771 	}
   1772 
   1773       /* Try looking for global trash dir $topdir/.Trash/$uid */
   1774       globaldir = g_build_filename (topdir, ".Trash", NULL);
   1775       if (g_lstat (globaldir, &global_stat) == 0 &&
   1776 	  S_ISDIR (global_stat.st_mode) &&
   1777 	  (global_stat.st_mode & S_ISVTX) != 0)
   1778 	{
   1779 	  trashdir = g_build_filename (globaldir, uid_str, NULL);
   1780 
   1781 	  if (g_lstat (trashdir, &trash_stat) == 0)
   1782 	    {
   1783 	      if (!S_ISDIR (trash_stat.st_mode) ||
   1784 		  trash_stat.st_uid != uid)
   1785 		{
   1786 		  /* Not a directory or not owned by user, ignore */
   1787 		  g_free (trashdir);
   1788 		  trashdir = NULL;
   1789 		}
   1790 	    }
   1791 	  else if (g_mkdir (trashdir, 0700) == -1)
   1792 	    {
   1793 	      g_free (trashdir);
   1794 	      trashdir = NULL;
   1795 	    }
   1796 	}
   1797       g_free (globaldir);
   1798 
   1799       if (trashdir == NULL)
   1800 	{
   1801 	  gboolean tried_create;
   1802 
   1803 	  /* No global trash dir, or it failed the tests, fall back to $topdir/.Trash-$uid */
   1804 	  dirname = g_strdup_printf (".Trash-%s", uid_str);
   1805 	  trashdir = g_build_filename (topdir, dirname, NULL);
   1806 	  g_free (dirname);
   1807 
   1808 	  tried_create = FALSE;
   1809 
   1810 	retry:
   1811 	  if (g_lstat (trashdir, &trash_stat) == 0)
   1812 	    {
   1813 	      if (!S_ISDIR (trash_stat.st_mode) ||
   1814 		  trash_stat.st_uid != uid)
   1815 		{
   1816 		  /* Remove the failed directory */
   1817 		  if (tried_create)
   1818 		    g_remove (trashdir);
   1819 
   1820 		  /* Not a directory or not owned by user, ignore */
   1821 		  g_free (trashdir);
   1822 		  trashdir = NULL;
   1823 		}
   1824 	    }
   1825 	  else
   1826 	    {
   1827 	      if (!tried_create &&
   1828 		  g_mkdir (trashdir, 0700) != -1)
   1829 		{
   1830 		  /* Ensure that the created dir has the right uid etc.
   1831 		     This might fail on e.g. a FAT dir */
   1832 		  tried_create = TRUE;
   1833 		  goto retry;
   1834 		}
   1835 	      else
   1836 		{
   1837 		  g_free (trashdir);
   1838 		  trashdir = NULL;
   1839 		}
   1840 	    }
   1841 	}
   1842 
   1843       if (trashdir == NULL)
   1844 	{
   1845 	  g_free (topdir);
   1846 	  g_set_error_literal (error, G_IO_ERROR,
   1847                                G_IO_ERROR_NOT_SUPPORTED,
   1848                                _("Unable to find or create trash directory"));
   1849 	  return FALSE;
   1850 	}
   1851     }
   1852 
   1853   /* Trashdir points to the trash dir with the "info" and "files" subdirectories */
   1854 
   1855   infodir = g_build_filename (trashdir, "info", NULL);
   1856   filesdir = g_build_filename (trashdir, "files", NULL);
   1857   g_free (trashdir);
   1858 
   1859   /* Make sure we have the subdirectories */
   1860   if ((g_mkdir (infodir, 0700) == -1 && errno != EEXIST) ||
   1861       (g_mkdir (filesdir, 0700) == -1 && errno != EEXIST))
   1862     {
   1863       g_free (topdir);
   1864       g_free (infodir);
   1865       g_free (filesdir);
   1866       g_set_error_literal (error, G_IO_ERROR,
   1867                            G_IO_ERROR_NOT_SUPPORTED,
   1868                            _("Unable to find or create trash directory"));
   1869       return FALSE;
   1870     }
   1871 
   1872   basename = g_path_get_basename (local->filename);
   1873   i = 1;
   1874   trashname = NULL;
   1875   infofile = NULL;
   1876   do {
   1877     g_free (trashname);
   1878     g_free (infofile);
   1879 
   1880     trashname = get_unique_filename (basename, i++);
   1881     infoname = g_strconcat (trashname, ".trashinfo", NULL);
   1882     infofile = g_build_filename (infodir, infoname, NULL);
   1883     g_free (infoname);
   1884 
   1885     fd = open (infofile, O_CREAT | O_EXCL, 0666);
   1886   } while (fd == -1 && errno == EEXIST);
   1887 
   1888   g_free (basename);
   1889   g_free (infodir);
   1890 
   1891   if (fd == -1)
   1892     {
   1893       int errsv = errno;
   1894 
   1895       g_free (filesdir);
   1896       g_free (topdir);
   1897       g_free (trashname);
   1898       g_free (infofile);
   1899 
   1900       g_set_error (error, G_IO_ERROR,
   1901 		   g_io_error_from_errno (errsv),
   1902 		   _("Unable to create trashing info file: %s"),
   1903 		   g_strerror (errsv));
   1904       return FALSE;
   1905     }
   1906 
   1907   close (fd);
   1908 
   1909   /* TODO: Maybe we should verify that you can delete the file from the trash
   1910      before moving it? OTOH, that is hard, as it needs a recursive scan */
   1911 
   1912   trashfile = g_build_filename (filesdir, trashname, NULL);
   1913 
   1914   g_free (filesdir);
   1915 
   1916   if (g_rename (local->filename, trashfile) == -1)
   1917     {
   1918       int errsv = errno;
   1919 
   1920       g_free (topdir);
   1921       g_free (trashname);
   1922       g_free (infofile);
   1923       g_free (trashfile);
   1924 
   1925       if (errsv == EXDEV)
   1926 	/* The trash dir was actually on another fs anyway!?
   1927 	   This can happen when the same device is mounted multiple
   1928 	   times, or with bind mounts of the same fs. */
   1929 	g_set_error (error, G_IO_ERROR,
   1930 		     G_IO_ERROR_NOT_SUPPORTED,
   1931 		     _("Unable to trash file: %s"),
   1932 		     g_strerror (errsv));
   1933       else
   1934 	g_set_error (error, G_IO_ERROR,
   1935 		     g_io_error_from_errno (errsv),
   1936 		     _("Unable to trash file: %s"),
   1937 		     g_strerror (errsv));
   1938       return FALSE;
   1939     }
   1940 
   1941   g_free (trashfile);
   1942 
   1943   /* TODO: Do we need to update mtime/atime here after the move? */
   1944 
   1945   /* Use absolute names for homedir */
   1946   if (is_homedir_trash)
   1947     original_name = g_strdup (local->filename);
   1948   else
   1949     original_name = try_make_relative (local->filename, topdir);
   1950   original_name_escaped = escape_trash_name (original_name);
   1951 
   1952   g_free (original_name);
   1953   g_free (topdir);
   1954 
   1955   {
   1956     time_t t;
   1957     struct tm now;
   1958     t = time (NULL);
   1959     localtime_r (&t, &now);
   1960     delete_time[0] = 0;
   1961     strftime(delete_time, sizeof (delete_time), "%Y-%m-%dT%H:%M:%S", &now);
   1962   }
   1963 
   1964   data = g_strdup_printf ("[Trash Info]\nPath=%s\nDeletionDate=%s\n",
   1965 			  original_name_escaped, delete_time);
   1966 
   1967   g_file_set_contents (infofile, data, -1, NULL);
   1968   g_free (infofile);
   1969   g_free (data);
   1970 
   1971   g_free (original_name_escaped);
   1972   g_free (trashname);
   1973 
   1974   return TRUE;
   1975 }
   1976 #else /* G_OS_WIN32 */
   1977 gboolean
   1978 _g_local_file_has_trash_dir (const char *dirname, dev_t dir_dev)
   1979 {
   1980   return FALSE;			/* XXX ??? */
   1981 }
   1982 
   1983 static gboolean
   1984 g_local_file_trash (GFile         *file,
   1985 		    GCancellable  *cancellable,
   1986 		    GError       **error)
   1987 {
   1988   GLocalFile *local = G_LOCAL_FILE (file);
   1989   SHFILEOPSTRUCTW op = {0};
   1990   gboolean success;
   1991   wchar_t *wfilename;
   1992   long len;
   1993 
   1994   wfilename = g_utf8_to_utf16 (local->filename, -1, NULL, &len, NULL);
   1995   /* SHFILEOPSTRUCT.pFrom is double-zero-terminated */
   1996   wfilename = g_renew (wchar_t, wfilename, len + 2);
   1997   wfilename[len + 1] = 0;
   1998 
   1999   op.wFunc = FO_DELETE;
   2000   op.pFrom = wfilename;
   2001   op.fFlags = FOF_ALLOWUNDO;
   2002 
   2003   success = SHFileOperationW (&op) == 0;
   2004 
   2005   if (success && op.fAnyOperationsAborted)
   2006     {
   2007       if (cancellable && !g_cancellable_is_cancelled (cancellable))
   2008 	g_cancellable_cancel (cancellable);
   2009       g_set_error (error, G_IO_ERROR,
   2010 		   G_IO_ERROR_CANCELLED,
   2011 		   _("Unable to trash file: %s"),
   2012 		   _("Operation was cancelled"));
   2013       success = FALSE;
   2014     }
   2015   else if (!success)
   2016     g_set_error (error, G_IO_ERROR,
   2017 		 G_IO_ERROR_FAILED,
   2018 		 _("Unable to trash file: %s"),
   2019 		 _("internal error"));
   2020 
   2021   g_free (wfilename);
   2022   return success;
   2023 }
   2024 #endif /* G_OS_WIN32 */
   2025 
   2026 static gboolean
   2027 g_local_file_make_directory (GFile         *file,
   2028 			     GCancellable  *cancellable,
   2029 			     GError       **error)
   2030 {
   2031   GLocalFile *local = G_LOCAL_FILE (file);
   2032 
   2033   if (g_mkdir (local->filename, 0777) == -1)
   2034     {
   2035       int errsv = errno;
   2036 
   2037       if (errsv == EINVAL)
   2038 	/* This must be an invalid filename, on e.g. FAT */
   2039 	g_set_error_literal (error, G_IO_ERROR,
   2040                              G_IO_ERROR_INVALID_FILENAME,
   2041                              _("Invalid filename"));
   2042       else
   2043 	g_set_error (error, G_IO_ERROR,
   2044 		     g_io_error_from_errno (errsv),
   2045 		     _("Error creating directory: %s"),
   2046 		     g_strerror (errsv));
   2047       return FALSE;
   2048     }
   2049 
   2050   return TRUE;
   2051 }
   2052 
   2053 static gboolean
   2054 g_local_file_make_symbolic_link (GFile         *file,
   2055 				 const char    *symlink_value,
   2056 				 GCancellable  *cancellable,
   2057 				 GError       **error)
   2058 {
   2059 #ifdef HAVE_SYMLINK
   2060   GLocalFile *local = G_LOCAL_FILE (file);
   2061 
   2062   if (symlink (symlink_value, local->filename) == -1)
   2063     {
   2064       int errsv = errno;
   2065 
   2066       if (errsv == EINVAL)
   2067 	/* This must be an invalid filename, on e.g. FAT */
   2068 	g_set_error_literal (error, G_IO_ERROR,
   2069                              G_IO_ERROR_INVALID_FILENAME,
   2070                              _("Invalid filename"));
   2071       else
   2072 	g_set_error (error, G_IO_ERROR,
   2073 		     g_io_error_from_errno (errsv),
   2074 		     _("Error making symbolic link: %s"),
   2075 		     g_strerror (errsv));
   2076       return FALSE;
   2077     }
   2078   return TRUE;
   2079 #else
   2080   g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, "Symlinks not supported");
   2081   return FALSE;
   2082 #endif
   2083 }
   2084 
   2085 
   2086 static gboolean
   2087 g_local_file_copy (GFile                  *source,
   2088 		   GFile                  *destination,
   2089 		   GFileCopyFlags          flags,
   2090 		   GCancellable           *cancellable,
   2091 		   GFileProgressCallback   progress_callback,
   2092 		   gpointer                progress_callback_data,
   2093 		   GError                **error)
   2094 {
   2095   /* Fall back to default copy */
   2096   g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, "Copy not supported");
   2097   return FALSE;
   2098 }
   2099 
   2100 static gboolean
   2101 g_local_file_move (GFile                  *source,
   2102 		   GFile                  *destination,
   2103 		   GFileCopyFlags          flags,
   2104 		   GCancellable           *cancellable,
   2105 		   GFileProgressCallback   progress_callback,
   2106 		   gpointer                progress_callback_data,
   2107 		   GError                **error)
   2108 {
   2109   GLocalFile *local_source, *local_destination;
   2110   struct stat statbuf;
   2111   gboolean destination_exist, source_is_dir;
   2112   char *backup_name;
   2113   int res;
   2114   off_t source_size;
   2115 
   2116   if (!G_IS_LOCAL_FILE (source) ||
   2117       !G_IS_LOCAL_FILE (destination))
   2118     {
   2119       /* Fall back to default move */
   2120       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, "Move not supported");
   2121       return FALSE;
   2122     }
   2123 
   2124   local_source = G_LOCAL_FILE (source);
   2125   local_destination = G_LOCAL_FILE (destination);
   2126 
   2127   res = g_lstat (local_source->filename, &statbuf);
   2128   if (res == -1)
   2129     {
   2130       int errsv = errno;
   2131 
   2132       g_set_error (error, G_IO_ERROR,
   2133 		   g_io_error_from_errno (errsv),
   2134 		   _("Error moving file: %s"),
   2135 		   g_strerror (errsv));
   2136       return FALSE;
   2137     }
   2138 
   2139   source_is_dir = S_ISDIR (statbuf.st_mode);
   2140   source_size = statbuf.st_size;
   2141 
   2142   destination_exist = FALSE;
   2143   res = g_lstat (local_destination->filename, &statbuf);
   2144   if (res == 0)
   2145     {
   2146       destination_exist = TRUE; /* Target file exists */
   2147 
   2148       if (flags & G_FILE_COPY_OVERWRITE)
   2149 	{
   2150 	  /* Always fail on dirs, even with overwrite */
   2151 	  if (S_ISDIR (statbuf.st_mode))
   2152 	    {
   2153 	      if (source_is_dir)
   2154 		g_set_error_literal (error,
   2155                                      G_IO_ERROR,
   2156                                      G_IO_ERROR_WOULD_MERGE,
   2157                                      _("Can't move directory over directory"));
   2158               else
   2159 		g_set_error_literal (error,
   2160                                      G_IO_ERROR,
   2161                                      G_IO_ERROR_IS_DIRECTORY,
   2162                                      _("Can't copy over directory"));
   2163 	      return FALSE;
   2164 	    }
   2165 	}
   2166       else
   2167 	{
   2168 	  g_set_error_literal (error,
   2169                                G_IO_ERROR,
   2170                                G_IO_ERROR_EXISTS,
   2171                                _("Target file exists"));
   2172 	  return FALSE;
   2173 	}
   2174     }
   2175 
   2176   if (flags & G_FILE_COPY_BACKUP && destination_exist)
   2177     {
   2178       backup_name = g_strconcat (local_destination->filename, "~", NULL);
   2179       if (g_rename (local_destination->filename, backup_name) == -1)
   2180 	{
   2181       	  g_set_error_literal (error,
   2182                                G_IO_ERROR,
   2183                                G_IO_ERROR_CANT_CREATE_BACKUP,
   2184                                _("Backup file creation failed"));
   2185 	  g_free (backup_name);
   2186 	  return FALSE;
   2187 	}
   2188       g_free (backup_name);
   2189       destination_exist = FALSE; /* It did, but no more */
   2190     }
   2191 
   2192   if (source_is_dir && destination_exist && (flags & G_FILE_COPY_OVERWRITE))
   2193     {
   2194       /* Source is a dir, destination exists (and is not a dir, because that would have failed
   2195 	 earlier), and we're overwriting. Manually remove the target so we can do the rename. */
   2196       res = g_unlink (local_destination->filename);
   2197       if (res == -1)
   2198 	{
   2199           int errsv = errno;
   2200 
   2201 	  g_set_error (error, G_IO_ERROR,
   2202 		       g_io_error_from_errno (errsv),
   2203 		       _("Error removing target file: %s"),
   2204 		       g_strerror (errsv));
   2205 	  return FALSE;
   2206 	}
   2207     }
   2208 
   2209   if (g_rename (local_source->filename, local_destination->filename) == -1)
   2210     {
   2211       int errsv = errno;
   2212 
   2213       if (errsv == EXDEV)
   2214 	/* This will cause the fallback code to run */
   2215 	g_set_error_literal (error, G_IO_ERROR,
   2216                              G_IO_ERROR_NOT_SUPPORTED,
   2217                              _("Move between mounts not supported"));
   2218       else if (errsv == EINVAL)
   2219 	/* This must be an invalid filename, on e.g. FAT, or
   2220 	   we're trying to move the file into itself...
   2221 	   We return invalid filename for both... */
   2222 	g_set_error_literal (error, G_IO_ERROR,
   2223                              G_IO_ERROR_INVALID_FILENAME,
   2224                              _("Invalid filename"));
   2225       else
   2226 	g_set_error (error, G_IO_ERROR,
   2227 		     g_io_error_from_errno (errsv),
   2228 		     _("Error moving file: %s"),
   2229 		     g_strerror (errsv));
   2230       return FALSE;
   2231     }
   2232 
   2233   /* Make sure we send full copied size */
   2234   if (progress_callback)
   2235     progress_callback (source_size, source_size, progress_callback_data);
   2236 
   2237   return TRUE;
   2238 }
   2239 
   2240 static GFileMonitor*
   2241 g_local_file_monitor_dir (GFile             *file,
   2242 			  GFileMonitorFlags  flags,
   2243 			  GCancellable      *cancellable,
   2244 			  GError           **error)
   2245 {
   2246   GLocalFile* local_file = G_LOCAL_FILE(file);
   2247   return _g_local_directory_monitor_new (local_file->filename, flags, error);
   2248 }
   2249 
   2250 static GFileMonitor*
   2251 g_local_file_monitor_file (GFile             *file,
   2252 			   GFileMonitorFlags  flags,
   2253 			   GCancellable      *cancellable,
   2254 			   GError           **error)
   2255 {
   2256   GLocalFile* local_file = G_LOCAL_FILE(file);
   2257   return _g_local_file_monitor_new (local_file->filename, flags, error);
   2258 }
   2259 
   2260 static void
   2261 g_local_file_file_iface_init (GFileIface *iface)
   2262 {
   2263   iface->dup = g_local_file_dup;
   2264   iface->hash = g_local_file_hash;
   2265   iface->equal = g_local_file_equal;
   2266   iface->is_native = g_local_file_is_native;
   2267   iface->has_uri_scheme = g_local_file_has_uri_scheme;
   2268   iface->get_uri_scheme = g_local_file_get_uri_scheme;
   2269   iface->get_basename = g_local_file_get_basename;
   2270   iface->get_path = g_local_file_get_path;
   2271   iface->get_uri = g_local_file_get_uri;
   2272   iface->get_parse_name = g_local_file_get_parse_name;
   2273   iface->get_parent = g_local_file_get_parent;
   2274   iface->prefix_matches = g_local_file_prefix_matches;
   2275   iface->get_relative_path = g_local_file_get_relative_path;
   2276   iface->resolve_relative_path = g_local_file_resolve_relative_path;
   2277   iface->get_child_for_display_name = g_local_file_get_child_for_display_name;
   2278   iface->set_display_name = g_local_file_set_display_name;
   2279   iface->enumerate_children = g_local_file_enumerate_children;
   2280   iface->query_info = g_local_file_query_info;
   2281   iface->query_filesystem_info = g_local_file_query_filesystem_info;
   2282   iface->find_enclosing_mount = g_local_file_find_enclosing_mount;
   2283   iface->query_settable_attributes = g_local_file_query_settable_attributes;
   2284   iface->query_writable_namespaces = g_local_file_query_writable_namespaces;
   2285   iface->set_attribute = g_local_file_set_attribute;
   2286   iface->set_attributes_from_info = g_local_file_set_attributes_from_info;
   2287   iface->read_fn = g_local_file_read;
   2288   iface->append_to = g_local_file_append_to;
   2289   iface->create = g_local_file_create;
   2290   iface->replace = g_local_file_replace;
   2291   iface->delete_file = g_local_file_delete;
   2292   iface->trash = g_local_file_trash;
   2293   iface->make_directory = g_local_file_make_directory;
   2294   iface->make_symbolic_link = g_local_file_make_symbolic_link;
   2295   iface->copy = g_local_file_copy;
   2296   iface->move = g_local_file_move;
   2297   iface->monitor_dir = g_local_file_monitor_dir;
   2298   iface->monitor_file = g_local_file_monitor_file;
   2299 }
   2300