gio/glocalfile.c

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