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 #if defined(HAVE_STATFS) && defined(HAVE_STATVFS)
  50 /* Some systems have both statfs and statvfs, pick the
  51    most "native" for these */
  52 # if defined(sun) && defined(__SVR4)
  53    /* on solaris, statfs doesn't even have the
  54       f_bavail field */
  55 #  define USE_STATVFS
  56 # else
  57   /* at least on linux, statfs is the actual syscall */
  58 #  define USE_STATFS
  59 # endif
  60
  61 #elif defined(HAVE_STATFS)
  62
  63 # define USE_STATFS
  64
  65 #elif defined(HAVE_STATVFS)
  66
  67 # define USE_STATVFS
  68
  69 #endif
  70
  71 #include "glocalfile.h"
  72 #include "glocalfileinfo.h"
  73 #include "glocalfileenumerator.h"
  74 #include "glocalfileinputstream.h"
  75 #include "glocalfileoutputstream.h"
  76 #include "glocaldirectorymonitor.h"
  77 #include "glocalfilemonitor.h"
  78 #include "gvolumeprivate.h"
  79 #include <glib/gstdio.h>
  80 #include "glibintl.h"
  81
  82 #ifdef G_OS_WIN32
  83 #include <windows.h>
  84 #include <io.h>
  85 #include <direct.h>
  86
  87 #ifndef S_ISDIR
  88 #define S_ISDIR(m) (((m) & _S_IFMT) == _S_IFDIR)
  89 #endif
  90 #ifndef S_ISLNK
  91 #define S_ISLNK(m) (0)
  92 #endif
  93 #endif
  94
  95 #include "gioalias.h"
  96
  97 static void g_local_file_file_iface_init (GFileIface       *iface);
  98
  99 static GFileAttributeInfoList *local_writable_attributes = NULL;
 100 static GFileAttributeInfoList *local_writable_namespaces = NULL;
 101
 102 struct _GLocalFile
 103 {
 104   GObject parent_instance;
 105
 106   char *filename;
 107 };
 108
 109 #define g_local_file_get_type _g_local_file_get_type
 110 G_DEFINE_TYPE_WITH_CODE (GLocalFile, g_local_file, G_TYPE_OBJECT,
 111                          G_IMPLEMENT_INTERFACE (G_TYPE_FILE,
 112                                                 g_local_file_file_iface_init))
 113
 114 static char * find_mountpoint_for (const char *file, dev_t dev);
 115
 116 static void
 117 g_local_file_finalize (GObject *object)
 118 {
 119   GLocalFile *local;
 120
 121   local = G_LOCAL_FILE (object);
 122
 123   g_free (local->filename);
 124
 125   if (G_OBJECT_CLASS (g_local_file_parent_class)->finalize)
 126     (*G_OBJECT_CLASS (g_local_file_parent_class)->finalize) (object);
 127 }
 128
 129 static void
 130 g_local_file_class_init (GLocalFileClass *klass)
 131 {
 132   GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
 133   GFileAttributeInfoList *list;
 134
 135   gobject_class->finalize = g_local_file_finalize;
 136
 137   /* Set up attribute lists */
 138
 139   /* Writable attributes: */
 140
 141   list = g_file_attribute_info_list_new ();
 142
 143   g_file_attribute_info_list_add (list,
 144                                   G_FILE_ATTRIBUTE_UNIX_MODE,
 145                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 146                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 147
 148 #ifdef HAVE_CHOWN
 149   g_file_attribute_info_list_add (list,
 150                                   G_FILE_ATTRIBUTE_UNIX_UID,
 151                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 152                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 153   g_file_attribute_info_list_add (list,
 154                                   G_FILE_ATTRIBUTE_UNIX_GID,
 155                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 156                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 157 #endif
 158
 159 #ifdef HAVE_SYMLINK
 160   g_file_attribute_info_list_add (list,
 161                                   G_FILE_ATTRIBUTE_STD_SYMLINK_TARGET,
 162                                   G_FILE_ATTRIBUTE_TYPE_BYTE_STRING,
 163                                   0);
 164 #endif
 165
 166 #ifdef HAVE_UTIMES
 167   g_file_attribute_info_list_add (list,
 168                                   G_FILE_ATTRIBUTE_TIME_MODIFIED,
 169                                   G_FILE_ATTRIBUTE_TYPE_UINT64,
 170                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 171   g_file_attribute_info_list_add (list,
 172                                   G_FILE_ATTRIBUTE_TIME_MODIFIED_USEC,
 173                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 174                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 175   g_file_attribute_info_list_add (list,
 176                                   G_FILE_ATTRIBUTE_TIME_ACCESS,
 177                                   G_FILE_ATTRIBUTE_TYPE_UINT64,
 178                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 179   g_file_attribute_info_list_add (list,
 180                                   G_FILE_ATTRIBUTE_TIME_ACCESS_USEC,
 181                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 182                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 183 #endif
 184
 185   local_writable_attributes = list;
 186
 187   /* Writable namespaces: */
 188
 189   list = g_file_attribute_info_list_new ();
 190
 191 #ifdef HAVE_XATTR
 192   g_file_attribute_info_list_add (list,
 193                                   "xattr",
 194                                   G_FILE_ATTRIBUTE_TYPE_STRING,
 195                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WITH_FILE |
 196                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 197   g_file_attribute_info_list_add (list,
 198                                   "xattr_sys",
 199                                   G_FILE_ATTRIBUTE_TYPE_STRING,
 200                                   G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED);
 201 #endif
 202
 203   local_writable_namespaces = 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
 218   if (!g_path_is_absolute (filename))
 219     {
 220       cwd = g_get_current_dir ();
 221       canon = g_build_filename (cwd, filename, NULL);
 222       g_free (cwd);
 223     }
 224   else
 225     canon = g_strdup (filename);
 226
 227   start = (char *)g_path_skip_root (canon);
 228
 229   p = start;
 230   while (*p != 0)
 231     {
 232       if (p[0] == '.' && (p[1] == 0 || G_IS_DIR_SEPARATOR (p[1])))
 233         {
 234           memmove (p, p+1, strlen (p+1)+1);
 235         }
 236       else if (p[0] == '.' && p[1] == '.' && (p[2] == 0 || G_IS_DIR_SEPARATOR (p[2])))
 237         {
 238           q = p + 2;
 239           /* Skip previous separator */
 240           p = p - 2;
 241           if (p < start)
 242             p = start;
 243           while (p > start && !G_IS_DIR_SEPARATOR (*p))
 244             p--;
 245           if (G_IS_DIR_SEPARATOR (*p))
 246             *p++ = G_DIR_SEPARATOR;
 247           memmove (p, q, strlen (q)+1);
 248         }
 249       else
 250         {
 251           /* Skip until next separator */
 252           while (*p != 0 && !G_IS_DIR_SEPARATOR (*p))
 253             p++;
 254
 255           if (*p != 0)
 256             {
 257               /* Canonicalize one separator */
 258               *p++ = G_DIR_SEPARATOR;
 259             }
 260         }
 261
 262       /* Remove additional separators */
 263       q = p;
 264       while (*q && G_IS_DIR_SEPARATOR (*q))
 265         q++;
 266
 267       if (p != q)
 268         memmove (p, q, strlen (q)+1);
 269     }
 270
 271   /* Remove trailing slashes */
 272   if (p > start && G_IS_DIR_SEPARATOR (*(p-1)))
 273     *(p-1) = 0;
 274
 275   return canon;
 276 }
 277
 278 /**
 279  * _g_local_file_new:
 280  * @filename: filename of the file to create.
 281  *
 282  * Returns: new local #GFile.
 283  **/
 284 GFile *
 285 _g_local_file_new (const char *filename)
 286 {
 287   GLocalFile *local;
 288
 289   local = g_object_new (G_TYPE_LOCAL_FILE, NULL);
 290   local->filename = canonicalize_filename (filename);
 291
 292   return G_FILE (local);
 293 }
 294
 295 static gboolean
 296 g_local_file_is_native (GFile *file)
 297 {
 298   return TRUE;
 299 }
 300
 301 static gboolean
 302 g_local_file_has_uri_scheme (GFile      *file,
 303                              const char *uri_scheme)
 304 {
 305   return g_ascii_strcasecmp (uri_scheme, "file") == 0;
 306 }
 307
 308 static char *
 309 g_local_file_get_uri_scheme (GFile *file)
 310 {
 311   return g_strdup ("file");
 312 }
 313
 314 static char *
 315 g_local_file_get_basename (GFile *file)
 316 {
 317   return g_path_get_basename (G_LOCAL_FILE (file)->filename);
 318 }
 319
 320 static char *
 321 g_local_file_get_path (GFile *file)
 322 {
 323   return g_strdup (G_LOCAL_FILE (file)->filename);
 324 }
 325
 326 static char *
 327 g_local_file_get_uri (GFile *file)
 328 {
 329   return g_filename_to_uri (G_LOCAL_FILE (file)->filename, NULL, NULL);
 330 }
 331
 332 static gboolean
 333 get_filename_charset (const gchar **filename_charset)
 334 {
 335   const gchar **charsets;
 336   gboolean is_utf8;
 337
 338   is_utf8 = g_get_filename_charsets (&charsets);
 339
 340   if (filename_charset)
 341     *filename_charset = charsets[0];
 342
 343   return is_utf8;
 344 }
 345
 346 static gboolean
 347 name_is_valid_for_display (const char *string,
 348                            gboolean    is_valid_utf8)
 349 {
 350   char c;
 351
 352   if (!is_valid_utf8 &&
 353       !g_utf8_validate (string, -1, NULL))
 354     return FALSE;
 355
 356   while ((c = *string++) != 0)
 357     {
 358       if (g_ascii_iscntrl(c))
 359         return FALSE;
 360     }
 361
 362   return TRUE;
 363 }
 364
 365 static char *
 366 g_local_file_get_parse_name (GFile *file)
 367 {
 368   const char *filename;
 369   char *parse_name;
 370   const gchar *charset;
 371   char *utf8_filename;
 372   char *roundtripped_filename;
 373   gboolean free_utf8_filename;
 374   gboolean is_valid_utf8;
 375
 376   filename = G_LOCAL_FILE (file)->filename;
 377   if (get_filename_charset (&charset))
 378     {
 379       utf8_filename = (char *)filename;
 380       free_utf8_filename = FALSE;
 381       is_valid_utf8 = FALSE; /* Can't guarantee this */
 382     }
 383   else
 384     {
 385       utf8_filename = g_convert (filename, -1,
 386                                  "UTF-8", charset, NULL, NULL, NULL);
 387       free_utf8_filename = TRUE;
 388       is_valid_utf8 = TRUE;
 389
 390       if (utf8_filename != NULL)
 391         {
 392           /* Make sure we can roundtrip: */
 393           roundtripped_filename = g_convert (utf8_filename, -1,
 394                                              charset, "UTF-8", NULL, NULL, NULL);
 395
 396           if (roundtripped_filename == NULL ||
 397               strcmp (utf8_filename, roundtripped_filename) != 0)
 398             {
 399               g_free (utf8_filename);
 400               utf8_filename = NULL;
 401             }
 402         }
 403     }
 404
 405
 406   if (utf8_filename != NULL &&
 407       name_is_valid_for_display (utf8_filename, is_valid_utf8))
 408     {
 409       if (free_utf8_filename)
 410         parse_name = utf8_filename;
 411       else
 412         parse_name = g_strdup (utf8_filename);
 413     }
 414   else
 415     {
 416       parse_name = g_filename_to_uri (filename, NULL, NULL);
 417       if (free_utf8_filename)
 418         g_free (utf8_filename);
 419     }
 420
 421   return parse_name;
 422 }
 423
 424 static GFile *
 425 g_local_file_get_parent (GFile *file)
 426 {
 427   GLocalFile *local = G_LOCAL_FILE (file);
 428   const char *non_root;
 429   char *dirname;
 430   GFile *parent;
 431
 432   /* Check for root */
 433   non_root = g_path_skip_root (local->filename);
 434   if (*non_root == 0)
 435     return NULL;
 436
 437   dirname = g_path_get_dirname (local->filename);
 438   parent = _g_local_file_new (dirname);
 439   g_free (dirname);
 440   return parent;
 441 }
 442
 443 static GFile *
 444 g_local_file_dup (GFile *file)
 445 {
 446   GLocalFile *local = G_LOCAL_FILE (file);
 447
 448   return _g_local_file_new (local->filename);
 449 }
 450
 451 static guint
 452 g_local_file_hash (GFile *file)
 453 {
 454   GLocalFile *local = G_LOCAL_FILE (file);
 455
 456   return g_str_hash (local->filename);
 457 }
 458
 459 static gboolean
 460 g_local_file_equal (GFile *file1,
 461                     GFile *file2)
 462 {
 463   GLocalFile *local1 = G_LOCAL_FILE (file1);
 464   GLocalFile *local2 = G_LOCAL_FILE (file2);
 465
 466   return g_str_equal (local1->filename, local2->filename);
 467 }
 468
 469 static const char *
 470 match_prefix (const char *path,
 471               const char *prefix)
 472 {
 473   int prefix_len;
 474
 475   prefix_len = strlen (prefix);
 476   if (strncmp (path, prefix, prefix_len) != 0)
 477     return NULL;
 478   return path + prefix_len;
 479 }
 480
 481 static gboolean
 482 g_local_file_contains_file (GFile *parent,
 483                             GFile *descendant)
 484 {
 485   GLocalFile *parent_local = G_LOCAL_FILE (parent);
 486   GLocalFile *descendant_local = G_LOCAL_FILE (descendant);
 487   const char *remainder;
 488
 489   remainder = match_prefix (descendant_local->filename, parent_local->filename);
 490   if (remainder != NULL && G_IS_DIR_SEPARATOR (*remainder))
 491     return TRUE;
 492   return FALSE;
 493 }
 494
 495 static char *
 496 g_local_file_get_relative_path (GFile *parent,
 497                                 GFile *descendant)
 498 {
 499   GLocalFile *parent_local = G_LOCAL_FILE (parent);
 500   GLocalFile *descendant_local = G_LOCAL_FILE (descendant);
 501   const char *remainder;
 502
 503   remainder = match_prefix (descendant_local->filename, parent_local->filename);
 504
 505   if (remainder != NULL && G_IS_DIR_SEPARATOR (*remainder))
 506     return g_strdup (remainder + 1);
 507   return NULL;
 508 }
 509
 510 static GFile *
 511 g_local_file_resolve_relative_path (GFile      *file,
 512                                     const char *relative_path)
 513 {
 514   GLocalFile *local = G_LOCAL_FILE (file);
 515   char *filename;
 516   GFile *child;
 517
 518   if (g_path_is_absolute (relative_path))
 519     return _g_local_file_new (relative_path);
 520
 521   filename = g_build_filename (local->filename, relative_path, NULL);
 522   child = _g_local_file_new (filename);
 523   g_free (filename);
 524
 525   return child;
 526 }
 527
 528 static GFileEnumerator *
 529 g_local_file_enumerate_children (GFile                *file,
 530                                  const char           *attributes,
 531                                  GFileQueryInfoFlags   flags,
 532                                  GCancellable         *cancellable,
 533                                  GError              **error)
 534 {
 535   GLocalFile *local = G_LOCAL_FILE (file);
 536   return _g_local_file_enumerator_new (local->filename,
 537                                        attributes, flags,
 538                                        cancellable, error);
 539 }
 540
 541 static GFile *
 542 g_local_file_get_child_for_display_name (GFile        *file,
 543                                          const char   *display_name,
 544                                          GError      **error)
 545 {
 546   GFile *parent, *new_file;
 547   char *basename;
 548
 549   basename = g_filename_from_utf8 (display_name, -1, NULL, NULL, NULL);
 550   if (basename == NULL)
 551     {
 552       g_set_error (error, G_IO_ERROR,
 553                    G_IO_ERROR_INVALID_FILENAME,
 554                    _("Invalid filename %s"), display_name);
 555       return NULL;
 556     }
 557
 558   parent = g_file_get_parent (file);
 559   new_file = g_file_get_child (file, basename);
 560   g_object_unref (parent);
 561   g_free (basename);
 562
 563   return new_file;
 564 }
 565
 566 #ifdef USE_STATFS
 567 static const char *
 568 get_fs_type (long f_type)
 569 {
 570
 571   /* filesystem ids taken from linux manpage */
 572   switch (f_type)
 573     {
 574     case 0xadf5:
 575       return "adfs";
 576     case 0xADFF:
 577       return "affs";
 578     case 0x42465331:
 579       return "befs";
 580     case 0x1BADFACE:
 581       return "bfs";
 582     case 0xFF534D42:
 583       return "cifs";
 584     case 0x73757245:
 585       return "coda";
 586     case 0x012FF7B7:
 587       return "coh";
 588     case 0x28cd3d45:
 589       return "cramfs";
 590     case 0x1373:
 591       return "devfs";
 592     case 0x00414A53:
 593       return "efs";
 594     case 0x137D:
 595       return "ext";
 596     case 0xEF51:
 597       return "ext2";
 598     case 0xEF53:
 599       return "ext3";
 600     case 0x4244:
 601       return "hfs";
 602     case 0xF995E849:
 603       return "hpfs";
 604     case 0x958458f6:
 605       return "hugetlbfs";
 606     case 0x9660:
 607       return "isofs";
 608     case 0x72b6:
 609       return "jffs2";
 610     case 0x3153464a:
 611       return "jfs";
 612     case 0x137F:
 613       return "minix";
 614     case 0x138F:
 615       return "minix2";
 616     case 0x2468:
 617       return "minix2";
 618     case 0x2478:
 619       return "minix22";
 620     case 0x4d44:
 621       return "msdos";
 622     case 0x564c:
 623       return "ncp";
 624     case 0x6969:
 625       return "nfs";
 626     case 0x5346544e:
 627       return "ntfs";
 628     case 0x9fa1:
 629       return "openprom";
 630     case 0x9fa0:
 631       return "proc";
 632     case 0x002f:
 633       return "qnx4";
 634     case 0x52654973:
 635       return "reiserfs";
 636     case 0x7275:
 637       return "romfs";
 638     case 0x517B:
 639       return "smb";
 640     case 0x012FF7B6:
 641       return "sysv2";
 642     case 0x012FF7B5:
 643       return "sysv4";
 644     case 0x01021994:
 645       return "tmpfs";
 646     case 0x15013346:
 647       return "udf";
 648     case 0x00011954:
 649       return "ufs";
 650     case 0x9fa2:
 651       return "usbdevice";
 652     case 0xa501FCF5:
 653       return "vxfs";
 654     case 0x012FF7B4:
 655       return "xenix";
 656     case 0x58465342:
 657       return "xfs";
 658     case 0x012FD16D:
 659       return "xiafs";
 660     default:
 661       return NULL;
 662     }
 663 }
 664 #endif
 665
 666 G_LOCK_DEFINE_STATIC(mount_info_hash);
 667 static GHashTable *mount_info_hash = NULL;
 668 guint64 mount_info_hash_cache_time = 0;
 669
 670 typedef enum {
 671   MOUNT_INFO_READONLY = 1<<0
 672 } MountInfo;
 673
 674 static gboolean
 675 device_equal (gconstpointer v1,
 676               gconstpointer v2)
 677 {
 678   return *(dev_t *)v1 == * (dev_t *)v2;
 679 }
 680
 681 static guint
 682 device_hash (gconstpointer v)
 683 {
 684   return (guint) *(dev_t *)v;
 685 }
 686
 687 static void
 688 get_mount_info (GFileInfo             *fs_info,
 689                 const char            *path,
 690                 GFileAttributeMatcher *matcher)
 691 {
 692   struct stat buf;
 693   gboolean got_info;
 694   gpointer info_as_ptr;
 695   guint mount_info;
 696   char *mountpoint;
 697   dev_t *dev;
 698   GUnixMount *mount;
 699   guint64 cache_time;
 700
 701   if (g_lstat (path, &buf) != 0)
 702     return;
 703
 704   G_LOCK (mount_info_hash);
 705
 706   if (mount_info_hash == NULL)
 707     mount_info_hash = g_hash_table_new_full (device_hash, device_equal,
 708                                              g_free, NULL);
 709
 710
 711   if (g_unix_mounts_changed_since (mount_info_hash_cache_time))
 712     g_hash_table_remove_all (mount_info_hash);
 713
 714   got_info = g_hash_table_lookup_extended (mount_info_hash,
 715                                            &buf.st_dev,
 716                                            NULL,
 717                                            &info_as_ptr);
 718
 719   G_UNLOCK (mount_info_hash);
 720
 721   mount_info = GPOINTER_TO_UINT (info_as_ptr);
 722
 723   if (!got_info)
 724     {
 725       mount_info = 0;
 726
 727       mountpoint = find_mountpoint_for (path, buf.st_dev);
 728       if (mountpoint == NULL)
 729         mountpoint = "/";
 730
 731       mount = g_get_unix_mount_at (mountpoint, &cache_time);
 732       if (mount)
 733         {
 734           if (g_unix_mount_is_readonly (mount))
 735             mount_info |= MOUNT_INFO_READONLY;
 736
 737           g_unix_mount_free (mount);
 738         }
 739
 740       dev = g_new0 (dev_t, 1);
 741       *dev = buf.st_dev;
 742
 743       G_LOCK (mount_info_hash);
 744       mount_info_hash_cache_time = cache_time;
 745       g_hash_table_insert (mount_info_hash, dev, GUINT_TO_POINTER (mount_info));
 746       G_UNLOCK (mount_info_hash);
 747     }
 748
 749   if (mount_info & MOUNT_INFO_READONLY)
 750     g_file_info_set_attribute_boolean (fs_info, G_FILE_ATTRIBUTE_FS_READONLY, TRUE);
 751 }
 752
 753 static GFileInfo *
 754 g_local_file_query_filesystem_info (GFile         *file,
 755                                     const char    *attributes,
 756                                     GCancellable  *cancellable,
 757                                     GError       **error)
 758 {
 759   GLocalFile *local = G_LOCAL_FILE (file);
 760   GFileInfo *info;
 761   int statfs_result;
 762   gboolean no_size;
 763   guint64 block_size;
 764 #ifdef USE_STATFS
 765   struct statfs statfs_buffer;
 766   const char *fstype;
 767 #elif defined(USE_STATVFS)
 768   struct statvfs statfs_buffer;
 769 #endif
 770   GFileAttributeMatcher *attribute_matcher;
 771
 772   no_size = FALSE;
 773
 774 #ifdef USE_STATFS
 775
 776 #if STATFS_ARGS == 2
 777   statfs_result = statfs (local->filename, &statfs_buffer);
 778 #elif STATFS_ARGS == 4
 779   statfs_result = statfs (local->filename, &statfs_buffer,
 780                           sizeof (statfs_buffer), 0);
 781 #endif
 782   block_size = statfs_buffer.f_bsize;
 783
 784 #if defined(__linux__)
 785   /* ncpfs does not know the amount of available and free space *
 786    * assuming ncpfs is linux specific, if you are on a non-linux platform
 787    * where ncpfs is available, please file a bug about it on bugzilla.gnome.org
 788    */
 789   if (statfs_buffer.f_bavail == 0 && statfs_buffer.f_bfree == 0 &&
 790       /* linux/ncp_fs.h: NCP_SUPER_MAGIC == 0x564c */
 791       statfs_buffer.f_type == 0x564c)
 792     no_size = TRUE;
 793 #endif
 794
 795 #elif defined(USE_STATVFS)
 796   statfs_result = statvfs (local->filename, &statfs_buffer);
 797   block_size = statfs_buffer.f_frsize;
 798 #endif
 799
 800   if (statfs_result == -1)
 801     {
 802       g_set_error (error, G_IO_ERROR,
 803                    g_io_error_from_errno (errno),
 804                    _("Error getting filesystem info: %s"),
 805                    g_strerror (errno));
 806       return NULL;
 807     }
 808
 809   info = g_file_info_new ();
 810
 811   attribute_matcher = g_file_attribute_matcher_new (attributes);
 812
 813   if (g_file_attribute_matcher_matches (attribute_matcher,
 814                                         G_FILE_ATTRIBUTE_FS_FREE))
 815     {
 816 #ifdef G_OS_WIN32
 817       gchar *localdir = g_path_get_dirname (local->filename);
 818       wchar_t *wdirname = g_utf8_to_utf16 (localdir, -1, NULL, NULL, NULL);
 819       ULARGE_INTEGER li;
 820
 821       g_free (localdir);
 822       if (GetDiskFreeSpaceExW (wdirname, &li, NULL, NULL))
 823         g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FS_FREE, (guint64)li.QuadPart);
 824       g_free (wdirname);
 825 #else
 826       g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FS_FREE, block_size * statfs_buffer.f_bavail);
 827 #endif
 828     }
 829   if (g_file_attribute_matcher_matches (attribute_matcher,
 830                                         G_FILE_ATTRIBUTE_FS_SIZE))
 831     {
 832 #ifdef G_OS_WIN32
 833       gchar *localdir = g_path_get_dirname (local->filename);
 834       wchar_t *wdirname = g_utf8_to_utf16 (localdir, -1, NULL, NULL, NULL);
 835       ULARGE_INTEGER li;
 836
 837       g_free (localdir);
 838       if (GetDiskFreeSpaceExW (wdirname, NULL, &li, NULL))
 839         g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FS_SIZE,  (guint64)li.QuadPart);
 840       g_free (wdirname);
 841 #else
 842       g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FS_SIZE, block_size * statfs_buffer.f_blocks);
 843 #endif
 844     }
 845 #ifdef USE_STATFS
 846   fstype = get_fs_type (statfs_buffer.f_type);
 847   if (fstype &&
 848       g_file_attribute_matcher_matches (attribute_matcher,
 849                                         G_FILE_ATTRIBUTE_FS_TYPE))
 850     g_file_info_set_attribute_string (info, G_FILE_ATTRIBUTE_FS_TYPE, fstype);
 851 #endif
 852
 853   if (g_file_attribute_matcher_matches (attribute_matcher,
 854                                         G_FILE_ATTRIBUTE_FS_READONLY))
 855     {
 856 #ifdef G_OS_WIN32
 857       /* need to implement with *unix_mount* */
 858 #else
 859       get_mount_info (info, local->filename, attribute_matcher);
 860 #endif
 861     }
 862
 863   g_file_attribute_matcher_unref (attribute_matcher);
 864
 865   return info;
 866 }
 867
 868 static GVolume *
 869 g_local_file_find_enclosing_volume (GFile         *file,
 870                                     GCancellable  *cancellable,
 871                                     GError       **error)
 872 {
 873   GLocalFile *local = G_LOCAL_FILE (file);
 874   struct stat buf;
 875   char *mountpoint;
 876   GVolume *volume;
 877
 878   if (g_lstat (local->filename, &buf) != 0)
 879     {
 880       g_set_error (error, G_IO_ERROR,
 881                    G_IO_ERROR_NOT_FOUND,
 882                    _("Containing volume does not exist"));
 883       return NULL;
 884     }
 885
 886   mountpoint = find_mountpoint_for (local->filename, buf.st_dev);
 887   if (mountpoint == NULL)
 888     {
 889       g_set_error (error, G_IO_ERROR,
 890                    G_IO_ERROR_NOT_FOUND,
 891                    _("Containing volume does not exist"));
 892       return NULL;
 893     }
 894
 895   volume = _g_volume_get_for_mount_path (mountpoint);
 896   g_free (mountpoint);
 897   if (volume)
 898     return volume;
 899
 900   g_set_error (error, G_IO_ERROR,
 901                G_IO_ERROR_NOT_FOUND,
 902                _("Containing volume does not exist"));
 903   return NULL;
 904 }
 905
 906 static GFile *
 907 g_local_file_set_display_name (GFile         *file,
 908                                const char    *display_name,
 909                                GCancellable  *cancellable,
 910                                GError       **error)
 911 {
 912   GLocalFile *local, *new_local;
 913   GFile *new_file, *parent;
 914   struct stat statbuf;
 915   int errsv;
 916
 917   parent = g_file_get_parent (file);
 918   if (parent == NULL)
 919     {
 920       g_set_error (error, G_IO_ERROR,
 921                    G_IO_ERROR_FAILED,
 922                    _("Can't rename root directory"));
 923       return NULL;
 924     }
 925
 926   new_file = g_file_get_child_for_display_name  (parent, display_name, error);
 927   g_object_unref (parent);
 928
 929   if (new_file == NULL)
 930     return NULL;
 931
 932   local = G_LOCAL_FILE (file);
 933   new_local = G_LOCAL_FILE (new_file);
 934
 935   if (!(g_lstat (new_local->filename, &statbuf) == -1 &&
 936         errno == ENOENT))
 937     {
 938       g_set_error (error, G_IO_ERROR,
 939                    G_IO_ERROR_EXISTS,
 940                    _("Can't rename file, filename already exist"));
 941       return NULL;
 942     }
 943
 944   if (rename (local->filename, new_local->filename) == -1)
 945     {
 946       errsv = errno;
 947
 948       if (errsv == EINVAL)
 949         /* We can't get a rename file into itself error herer,
 950            so this must be an invalid filename, on e.g. FAT */
 951         g_set_error (error, G_IO_ERROR,
 952                      G_IO_ERROR_INVALID_FILENAME,
 953                      _("Invalid filename"));
 954       else
 955         g_set_error (error, G_IO_ERROR,
 956                      g_io_error_from_errno (errsv),
 957                      _("Error renaming file: %s"),
 958                      g_strerror (errsv));
 959       g_object_unref (new_file);
 960       return NULL;
 961     }
 962
 963   return new_file;
 964 }
 965
 966 static GFileInfo *
 967 g_local_file_query_info (GFile                *file,
 968                          const char           *attributes,
 969                          GFileQueryInfoFlags   flags,
 970                          GCancellable         *cancellable,
 971                          GError              **error)
 972 {
 973   GLocalFile *local = G_LOCAL_FILE (file);
 974   GFileInfo *info;
 975   GFileAttributeMatcher *matcher;
 976   char *basename, *dirname;
 977   GLocalParentFileInfo parent_info;
 978
 979   matcher = g_file_attribute_matcher_new (attributes);
 980
 981   basename = g_path_get_basename (local->filename);
 982
 983   dirname = g_path_get_dirname (local->filename);
 984   _g_local_file_info_get_parent_info (dirname, matcher, &parent_info);
 985   g_free (dirname);
 986
 987   info = _g_local_file_info_get (basename, local->filename,
 988                                  matcher, flags, &parent_info,
 989                                  error);
 990
 991   g_free (basename);
 992
 993   g_file_attribute_matcher_unref (matcher);
 994
 995   return info;
 996 }
 997
 998 static GFileAttributeInfoList *
 999 g_local_file_query_settable_attributes (GFile         *file,
1000                                         GCancellable  *cancellable,
1001                                         GError       **error)
1002 {
1003   return g_file_attribute_info_list_ref (local_writable_attributes);
1004 }
1005
1006 static GFileAttributeInfoList *
1007 g_local_file_query_writable_namespaces (GFile         *file,
1008                                         GCancellable  *cancellable,
1009                                         GError       **error)
1010 {
1011   return g_file_attribute_info_list_ref (local_writable_namespaces);
1012 }
1013
1014 static gboolean
1015 g_local_file_set_attribute (GFile                      *file,
1016                             const char                 *attribute,
1017                             const GFileAttributeValue  *value,
1018                             GFileQueryInfoFlags         flags,
1019                             GCancellable               *cancellable,
1020                             GError                    **error)
1021 {
1022   GLocalFile *local = G_LOCAL_FILE (file);
1023
1024   return _g_local_file_info_set_attribute (local->filename,
1025                                            attribute,
1026                                            value,
1027                                            flags,
1028                                            cancellable,
1029                                            error);
1030 }
1031
1032 static gboolean
1033 g_local_file_set_attributes_from_info (GFile                *file,
1034                                        GFileInfo            *info,
1035                                        GFileQueryInfoFlags   flags,
1036                                        GCancellable         *cancellable,
1037                                        GError              **error)
1038 {
1039   GLocalFile *local = G_LOCAL_FILE (file);
1040   int res, chained_res;
1041   GFileIface* default_iface;
1042
1043   res = _g_local_file_info_set_attributes (local->filename,
1044                                            info, flags,
1045                                            cancellable,
1046                                            error);
1047
1048   if (!res)
1049     error = NULL; /* Don't write over error if further errors */
1050
1051   default_iface = g_type_default_interface_peek (G_TYPE_FILE);
1052
1053   chained_res = (default_iface->set_attributes_from_info) (file, info, flags, cancellable, error);
1054
1055   return res && chained_res;
1056 }
1057
1058 static GFileInputStream *
1059 g_local_file_read (GFile         *file,
1060                    GCancellable  *cancellable,
1061                    GError       **error)
1062 {
1063   GLocalFile *local = G_LOCAL_FILE (file);
1064   int fd;
1065   struct stat buf;
1066
1067   fd = g_open (local->filename, O_RDONLY, 0);
1068   if (fd == -1)
1069     {
1070       g_set_error (error, G_IO_ERROR,
1071                    g_io_error_from_errno (errno),
1072                    _("Error opening file: %s"),
1073                    g_strerror (errno));
1074       return NULL;
1075     }
1076
1077   if (fstat(fd, &buf) == 0 && S_ISDIR (buf.st_mode))
1078     {
1079       close (fd);
1080       g_set_error (error, G_IO_ERROR,
1081                    G_IO_ERROR_IS_DIRECTORY,
1082                    _("Can't open directory"));
1083       return NULL;
1084     }
1085
1086   return _g_local_file_input_stream_new (fd);
1087 }
1088
1089 static GFileOutputStream *
1090 g_local_file_append_to (GFile             *file,
1091                         GFileCreateFlags   flags,
1092                         GCancellable      *cancellable,
1093                         GError           **error)
1094 {
1095   return _g_local_file_output_stream_append (G_LOCAL_FILE (file)->filename,
1096                                              flags, cancellable, error);
1097 }
1098
1099 static GFileOutputStream *
1100 g_local_file_create (GFile             *file,
1101                      GFileCreateFlags   flags,
1102                      GCancellable      *cancellable,
1103                      GError           **error)
1104 {
1105   return _g_local_file_output_stream_create (G_LOCAL_FILE (file)->filename,
1106                                              flags, cancellable, error);
1107 }
1108
1109 static GFileOutputStream *
1110 g_local_file_replace (GFile             *file,
1111                       const char        *etag,
1112                       gboolean           make_backup,
1113                       GFileCreateFlags   flags,
1114                       GCancellable      *cancellable,
1115                       GError           **error)
1116 {
1117   return _g_local_file_output_stream_replace (G_LOCAL_FILE (file)->filename,
1118                                               etag, make_backup, flags,
1119                                               cancellable, error);
1120 }
1121
1122
1123 static gboolean
1124 g_local_file_delete (GFile         *file,
1125                      GCancellable  *cancellable,
1126                      GError       **error)
1127 {
1128   GLocalFile *local = G_LOCAL_FILE (file);
1129
1130   if (g_remove (local->filename) == -1)
1131     {
1132       g_set_error (error, G_IO_ERROR,
1133                    g_io_error_from_errno (errno),
1134                    _("Error removing file: %s"),
1135                    g_strerror (errno));
1136       return FALSE;
1137     }
1138
1139   return TRUE;
1140 }
1141
1142 static char *
1143 strip_trailing_slashes (const char *path)
1144 {
1145   char *path_copy;
1146   int len;
1147
1148   path_copy = g_strdup (path);
1149   len = strlen (path_copy);
1150   while (len > 1 && path_copy[len-1] == '/')
1151     path_copy[--len] = 0;
1152
1153   return path_copy;
1154  }
1155
1156 static char *
1157 expand_symlink (const char *link)
1158 {
1159   char *resolved, *canonical, *parent, *link2;
1160   char symlink_value[4096];
1161 #ifdef G_OS_WIN32
1162 #else
1163   ssize_t res;
1164 #endif
1165
1166 #ifdef G_OS_WIN32
1167 #else
1168   res = readlink (link, symlink_value, sizeof (symlink_value) - 1);
1169
1170   if (res == -1)
1171     return g_strdup (link);
1172   symlink_value[res] = 0;
1173 #endif
1174
1175   if (g_path_is_absolute (symlink_value))
1176     return canonicalize_filename (symlink_value);
1177   else
1178     {
1179       link2 = strip_trailing_slashes (link);
1180       parent = g_path_get_dirname (link2);
1181       g_free (link2);
1182
1183       resolved = g_build_filename (parent, symlink_value, NULL);
1184       g_free (parent);
1185
1186       canonical = canonicalize_filename (resolved);
1187
1188       g_free (resolved);
1189
1190       return canonical;
1191     }
1192 }
1193
1194 static char *
1195 get_parent (const char *path,
1196             dev_t      *parent_dev)
1197 {
1198   char *parent, *tmp;
1199   struct stat parent_stat;
1200   int num_recursions;
1201   char *path_copy;
1202
1203   path_copy = strip_trailing_slashes (path);
1204
1205   parent = g_path_get_dirname (path_copy);
1206   if (strcmp (parent, ".") == 0 ||
1207       strcmp (parent, path_copy) == 0)
1208     {
1209       g_free (path_copy);
1210       return NULL;
1211     }
1212   g_free (path_copy);
1213
1214   num_recursions = 0;
1215   do {
1216     if (g_lstat (parent, &parent_stat) != 0)
1217       {
1218         g_free (parent);
1219         return NULL;
1220       }
1221
1222     if (S_ISLNK (parent_stat.st_mode))
1223       {
1224         tmp = parent;
1225         parent = expand_symlink (parent);
1226         g_free (tmp);
1227       }
1228
1229     num_recursions++;
1230     if (num_recursions > 12)
1231       {
1232         g_free (parent);
1233         return NULL;
1234       }
1235   } while (S_ISLNK (parent_stat.st_mode));
1236
1237   *parent_dev = parent_stat.st_dev;
1238
1239   return parent;
1240 }
1241
1242 static char *
1243 expand_all_symlinks (const char *path)
1244 {
1245   char *parent, *parent_expanded;
1246   char *basename, *res;
1247   dev_t parent_dev;
1248
1249   parent = get_parent (path, &parent_dev);
1250   if (parent)
1251     {
1252       parent_expanded = expand_all_symlinks (parent);
1253       g_free (parent);
1254       basename = g_path_get_basename (path);
1255       res = g_build_filename (parent_expanded, basename, NULL);
1256       g_free (basename);
1257       g_free (parent_expanded);
1258     }
1259   else
1260     res = g_strdup (path);
1261
1262   return res;
1263 }
1264
1265 static char *
1266 find_mountpoint_for (const char *file,
1267                      dev_t       dev)
1268 {
1269   char *dir, *parent;
1270   dev_t dir_dev, parent_dev;
1271
1272   dir = g_strdup (file);
1273   dir_dev = dev;
1274
1275   while (1)
1276     {
1277       parent = get_parent (dir, &parent_dev);
1278       if (parent == NULL)
1279         return dir;
1280
1281       if (parent_dev != dir_dev)
1282         {
1283           g_free (parent);
1284           return dir;
1285         }
1286
1287       g_free (dir);
1288       dir = parent;
1289     }
1290 }
1291
1292 static char *
1293 find_topdir_for (const char *file)
1294 {
1295   char *dir;
1296   dev_t dir_dev;
1297
1298   dir = get_parent (file, &dir_dev);
1299   if (dir == NULL)
1300     return NULL;
1301
1302   return find_mountpoint_for (dir, dir_dev);
1303 }
1304
1305 static char *
1306 get_unique_filename (const char *basename,
1307                      int         id)
1308 {
1309   const char *dot;
1310
1311   if (id == 1)
1312     return g_strdup (basename);
1313
1314   dot = strchr (basename, '.');
1315   if (dot)
1316     return g_strdup_printf ("%.*s.%d%s", dot - basename, basename, id, dot);
1317   else
1318     return g_strdup_printf ("%s.%d", basename, id);
1319 }
1320
1321 static gboolean
1322 path_has_prefix (const char *path,
1323                  const char *prefix)
1324 {
1325   int prefix_len;
1326
1327   if (prefix == NULL)
1328     return TRUE;
1329
1330   prefix_len = strlen (prefix);
1331
1332   if (strncmp (path, prefix, prefix_len) == 0 &&
1333       (prefix_len == 0 || /* empty prefix always matches */
1334        prefix[prefix_len - 1] == '/' || /* last char in prefix was a /, so it must be in path too */
1335        path[prefix_len] == 0 ||
1336        path[prefix_len] == '/'))
1337     return TRUE;
1338
1339   return FALSE;
1340 }
1341
1342 static char *
1343 try_make_relative (const char *path,
1344                    const char *base)
1345 {
1346   char *path2, *base2;
1347   char *relative;
1348
1349   path2 = expand_all_symlinks (path);
1350   base2 = expand_all_symlinks (base);
1351
1352   relative = NULL;
1353   if (path_has_prefix (path2, base2))
1354     {
1355       relative = path2 + strlen (base2);
1356       while (*relative == '/')
1357         relative ++;
1358       relative = g_strdup (relative);
1359     }
1360   g_free (path2);
1361   g_free (base2);
1362
1363   if (relative)
1364     return relative;
1365
1366   /* Failed, use abs path */
1367   return g_strdup (path);
1368 }
1369
1370 static char *
1371 escape_trash_name (char *name)
1372 {
1373   GString *str;
1374   const gchar hex[16] = "0123456789ABCDEF";
1375
1376   str = g_string_new ("");
1377
1378   while (*name != 0)
1379     {
1380       char c;
1381
1382       c = *name++;
1383
1384       if (g_ascii_isprint (c))
1385         g_string_append_c (str, c);
1386       else
1387         {
1388           g_string_append_c (str, '%');
1389           g_string_append_c (str, hex[((guchar)c) >> 4]);
1390           g_string_append_c (str, hex[((guchar)c) & 0xf]);
1391         }
1392     }
1393
1394   return g_string_free (str, FALSE);
1395 }
1396
1397 static gboolean
1398 g_local_file_trash (GFile         *file,
1399                     GCancellable  *cancellable,
1400                     GError       **error)
1401 {
1402   GLocalFile *local = G_LOCAL_FILE (file);
1403   struct stat file_stat, home_stat, trash_stat, global_stat;
1404   const char *homedir;
1405   char *dirname;
1406   char *trashdir, *globaldir, *topdir, *infodir, *filesdir;
1407   char *basename, *trashname, *trashfile, *infoname, *infofile;
1408   char *original_name, *original_name_escaped;
1409   int i;
1410   char *data;
1411   gboolean is_homedir_trash;
1412   char delete_time[32];
1413   int fd;
1414
1415   if (g_lstat (local->filename, &file_stat) != 0)
1416     {
1417       g_set_error (error, G_IO_ERROR,
1418                    g_io_error_from_errno (errno),
1419                    _("Error trashing file: %s"),
1420                    g_strerror (errno));
1421       return FALSE;
1422     }
1423
1424   homedir = g_get_home_dir ();
1425   g_stat (homedir, &home_stat);
1426
1427   is_homedir_trash = FALSE;
1428   trashdir = NULL;
1429   if (file_stat.st_dev == home_stat.st_dev)
1430     {
1431       is_homedir_trash = TRUE;
1432       errno = 0;
1433       trashdir = g_build_filename (g_get_user_data_dir (), "Trash", NULL);
1434       if (g_mkdir_with_parents (trashdir, 0700) < 0)
1435         {
1436           char *display_name;
1437           int err;
1438
1439           err = errno;
1440           display_name = g_filename_display_name (trashdir);
1441           g_set_error (error, G_IO_ERROR,
1442                        g_io_error_from_errno (err),
1443                        _("Unable to create trash dir %s: %s"),
1444                        display_name, g_strerror (err));
1445           g_free (display_name);
1446           g_free (trashdir);
1447           return FALSE;
1448         }
1449       topdir = g_strdup (g_get_user_data_dir ());
1450     }
1451   else
1452     {
1453 #ifdef G_OS_WIN32
1454       g_warning ("Recycle bin not implemented");
1455 #else
1456       uid_t uid;
1457       char uid_str[32];
1458
1459       uid = geteuid ();
1460       g_snprintf (uid_str, sizeof (uid_str), "%lu", (unsigned long)uid);
1461
1462       topdir = find_topdir_for (local->filename);
1463       if (topdir == NULL)
1464         {
1465           g_set_error (error, G_IO_ERROR,
1466                        G_IO_ERROR_NOT_SUPPORTED,
1467                        _("Unable to find toplevel directory for trash"));
1468           return FALSE;
1469         }
1470
1471       /* Try looking for global trash dir $topdir/.Trash/$uid */
1472       globaldir = g_build_filename (topdir, ".Trash", NULL);
1473       if (g_lstat (globaldir, &global_stat) == 0 &&
1474           S_ISDIR (global_stat.st_mode) &&
1475           (global_stat.st_mode & S_ISVTX) != 0)
1476         {
1477           trashdir = g_build_filename (globaldir, uid_str, NULL);
1478
1479           if (g_lstat (trashdir, &trash_stat) == 0)
1480             {
1481               if (!S_ISDIR (trash_stat.st_mode) ||
1482                   trash_stat.st_uid != uid)
1483                 {
1484                   /* Not a directory or not owned by user, ignore */
1485                   g_free (trashdir);
1486                   trashdir = NULL;
1487                 }
1488             }
1489           else if (g_mkdir (trashdir, 0700) == -1)
1490             {
1491               g_free (trashdir);
1492               trashdir = NULL;
1493             }
1494         }
1495       g_free (globaldir);
1496
1497       if (trashdir == NULL)
1498         {
1499           /* No global trash dir, or it failed the tests, fall back to $topdir/.Trash-$uid */
1500           dirname = g_strdup_printf (".Trash-%s", uid_str);
1501           trashdir = g_build_filename (topdir, dirname, NULL);
1502           g_free (dirname);
1503
1504           if (g_lstat (trashdir, &trash_stat) == 0)
1505             {
1506               if (!S_ISDIR (trash_stat.st_mode) ||
1507                   trash_stat.st_uid != uid)
1508                 {
1509                   /* Not a directory or not owned by user, ignore */
1510                   g_free (trashdir);
1511                   trashdir = NULL;
1512                 }
1513             }
1514           else if (g_mkdir (trashdir, 0700) == -1)
1515             {
1516               g_free (trashdir);
1517               trashdir = NULL;
1518             }
1519         }
1520 #endif
1521
1522       if (trashdir == NULL)
1523         {
1524           g_free (topdir);
1525           g_set_error (error, G_IO_ERROR,
1526                        G_IO_ERROR_NOT_SUPPORTED,
1527                        _("Unable to find or create trash directory"));
1528           return FALSE;
1529         }
1530     }
1531
1532   /* Trashdir points to the trash dir with the "info" and "files" subdirectories */
1533
1534   infodir = g_build_filename (trashdir, "info", NULL);
1535   filesdir = g_build_filename (trashdir, "files", NULL);
1536   g_free (trashdir);
1537
1538   /* Make sure we have the subdirectories */
1539   if ((g_mkdir (infodir, 0700) == -1 && errno != EEXIST) ||
1540       (g_mkdir (filesdir, 0700) == -1 && errno != EEXIST))
1541     {
1542       g_free (topdir);
1543       g_free (infodir);
1544       g_free (filesdir);
1545       g_set_error (error, G_IO_ERROR,
1546                    G_IO_ERROR_NOT_SUPPORTED,
1547                    _("Unable to find or create trash directory"));
1548       return FALSE;
1549     }
1550
1551   basename = g_path_get_basename (local->filename);
1552   i = 1;
1553   trashname = NULL;
1554   infofile = NULL;
1555   do {
1556     g_free (trashname);
1557     g_free (infofile);
1558
1559     trashname = get_unique_filename (basename, i++);
1560     infoname = g_strconcat (trashname, ".trashinfo", NULL);
1561     infofile = g_build_filename (infodir, infoname, NULL);
1562     g_free (infoname);
1563
1564     fd = open (infofile, O_CREAT | O_EXCL, 0666);
1565   } while (fd == -1 && errno == EEXIST);
1566
1567   g_free (basename);
1568   g_free (infodir);
1569
1570   if (fd == -1)
1571     {
1572       g_free (filesdir);
1573       g_free (topdir);
1574       g_free (trashname);
1575       g_free (infofile);
1576
1577       g_set_error (error, G_IO_ERROR,
1578                    g_io_error_from_errno (errno),
1579                    _("Unable to create trashed file: %s"),
1580                    g_strerror (errno));
1581       return FALSE;
1582     }
1583
1584   close (fd);
1585
1586   /* TODO: Maybe we should verify that you can delete the file from the trash
1587      before moving it? OTOH, that is hard, as it needs a recursive scan */
1588
1589   trashfile = g_build_filename (filesdir, trashname, NULL);
1590
1591   g_free (filesdir);
1592
1593   if (g_rename (local->filename, trashfile) == -1)
1594     {
1595       g_free (topdir);
1596       g_free (trashname);
1597       g_free (infofile);
1598       g_free (trashfile);
1599
1600       g_set_error (error, G_IO_ERROR,
1601                    g_io_error_from_errno (errno),
1602                    _("Unable to trash file: %s"),
1603                    g_strerror (errno));
1604       return FALSE;
1605     }
1606
1607   g_free (trashfile);
1608
1609   /* TODO: Do we need to update mtime/atime here after the move? */
1610
1611   /* Use absolute names for homedir */
1612   if (is_homedir_trash)
1613     original_name = g_strdup (local->filename);
1614   else
1615     original_name = try_make_relative (local->filename, topdir);
1616   original_name_escaped = escape_trash_name (original_name);
1617
1618   g_free (original_name);
1619   g_free (topdir);
1620
1621 #ifdef G_OS_WIN32
1622   {
1623     GTimeVal now;
1624     g_get_current_time (&now);
1625     strncpy (delete_time, g_time_val_to_iso8601 (&now), sizeof (delete_time));
1626   }
1627 #else
1628   {
1629     time_t t;
1630     struct tm now;
1631     t = time (NULL);
1632     localtime_r (&t, &now);
1633     delete_time[0] = 0;
1634     strftime(delete_time, sizeof (delete_time), "%Y-%m-%dT%H:%M:%S", &now);
1635   }
1636 #endif
1637
1638   data = g_strdup_printf ("[Trash Info]\nPath=%s\nDeletionDate=%s\n",
1639                           original_name_escaped, delete_time);
1640
1641   g_file_set_contents (infofile, data, -1, NULL);
1642   g_free (infofile);
1643   g_free (data);
1644
1645   g_free (original_name_escaped);
1646   g_free (trashname);
1647
1648   return TRUE;
1649 }
1650
1651 static gboolean
1652 g_local_file_make_directory (GFile         *file,
1653                              GCancellable  *cancellable,
1654                              GError       **error)
1655 {
1656   GLocalFile *local = G_LOCAL_FILE (file);
1657
1658   if (g_mkdir (local->filename, 0755) == -1)
1659     {
1660       int errsv = errno;
1661
1662       if (errsv == EINVAL)
1663         /* This must be an invalid filename, on e.g. FAT */
1664         g_set_error (error, G_IO_ERROR,
1665                      G_IO_ERROR_INVALID_FILENAME,
1666                      _("Invalid filename"));
1667       else
1668         g_set_error (error, G_IO_ERROR,
1669                      g_io_error_from_errno (errsv),
1670                      _("Error removing file: %s"),
1671                      g_strerror (errsv));
1672       return FALSE;
1673     }
1674
1675   return TRUE;
1676 }
1677
1678 static gboolean
1679 g_local_file_make_symbolic_link (GFile         *file,
1680                                  const char    *symlink_value,
1681                                  GCancellable  *cancellable,
1682                                  GError       **error)
1683 {
1684 #ifdef HAVE_SYMLINK
1685   GLocalFile *local = G_LOCAL_FILE (file);
1686
1687   if (symlink (symlink_value, local->filename) == -1)
1688     {
1689       int errsv = errno;
1690
1691       if (errsv == EINVAL)
1692         /* This must be an invalid filename, on e.g. FAT */
1693         g_set_error (error, G_IO_ERROR,
1694                      G_IO_ERROR_INVALID_FILENAME,
1695                      _("Invalid filename"));
1696       else
1697         g_set_error (error, G_IO_ERROR,
1698                      g_io_error_from_errno (errsv),
1699                      _("Error making symbolic link: %s"),
1700                      g_strerror (errsv));
1701       return FALSE;
1702     }
1703   return TRUE;
1704 #else
1705   g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, "Symlinks not supported");
1706   return FALSE;
1707 #endif
1708 }
1709
1710
1711 static gboolean
1712 g_local_file_copy (GFile                  *source,
1713                    GFile                  *destination,
1714                    GFileCopyFlags          flags,
1715                    GCancellable           *cancellable,
1716                    GFileProgressCallback   progress_callback,
1717                    gpointer                progress_callback_data,
1718                    GError                **error)
1719 {
1720   /* Fall back to default copy */
1721   g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, "Copy not supported");
1722   return FALSE;
1723 }
1724
1725 static gboolean
1726 g_local_file_move (GFile                  *source,
1727                    GFile                  *destination,
1728                    GFileCopyFlags          flags,
1729                    GCancellable           *cancellable,
1730                    GFileProgressCallback   progress_callback,
1731                    gpointer                progress_callback_data,
1732                    GError                **error)
1733 {
1734   GLocalFile *local_source = G_LOCAL_FILE (source);
1735   GLocalFile *local_destination = G_LOCAL_FILE (destination);
1736   struct stat statbuf;
1737   gboolean destination_exist, source_is_dir;
1738   char *backup_name;
1739   int res;
1740
1741   res = g_lstat (local_source->filename, &statbuf);
1742   if (res == -1)
1743     {
1744       g_set_error (error, G_IO_ERROR,
1745                    g_io_error_from_errno (errno),
1746                    _("Error moving file: %s"),
1747                    g_strerror (errno));
1748       return FALSE;
1749     }
1750   else
1751     source_is_dir = S_ISDIR (statbuf.st_mode);
1752
1753   destination_exist = FALSE;
1754   res = g_lstat (local_destination->filename, &statbuf);
1755   if (res == 0)
1756     {
1757       destination_exist = TRUE; /* Target file exists */
1758
1759       if (flags & G_FILE_COPY_OVERWRITE)
1760         {
1761           /* Always fail on dirs, even with overwrite */
1762           if (S_ISDIR (statbuf.st_mode))
1763             {
1764               g_set_error (error,
1765                            G_IO_ERROR,
1766                            G_IO_ERROR_WOULD_MERGE,
1767                            _("Can't move directory over directory"));
1768               return FALSE;
1769             }
1770         }
1771       else
1772         {
1773           g_set_error (error,
1774                        G_IO_ERROR,
1775                        G_IO_ERROR_EXISTS,
1776                        _("Target file already exists"));
1777           return FALSE;
1778         }
1779     }
1780
1781   if (flags & G_FILE_COPY_BACKUP && destination_exist)
1782     {
1783       backup_name = g_strconcat (local_destination->filename, "~", NULL);
1784       if (rename (local_destination->filename, backup_name) == -1)
1785         {
1786           g_set_error (error,
1787                        G_IO_ERROR,
1788                        G_IO_ERROR_CANT_CREATE_BACKUP,
1789                        _("Backup file creation failed"));
1790           g_free (backup_name);
1791           return FALSE;
1792         }
1793       g_free (backup_name);
1794       destination_exist = FALSE; /* It did, but no more */
1795     }
1796
1797   if (source_is_dir && destination_exist && (flags & G_FILE_COPY_OVERWRITE))
1798     {
1799       /* Source is a dir, destination exists (and is not a dir, because that would have failed
1800          earlier), and we're overwriting. Manually remove the target so we can do the rename. */
1801       res = unlink (local_destination->filename);
1802       if (res == -1)
1803         {
1804           g_set_error (error, G_IO_ERROR,
1805                        g_io_error_from_errno (errno),
1806                        _("Error removing target file: %s"),
1807                        g_strerror (errno));
1808           return FALSE;
1809         }
1810     }
1811
1812   if (rename (local_source->filename, local_destination->filename) == -1)
1813     {
1814       int errsv = errno;
1815
1816       if (errsv == EXDEV)
1817         /* This will cause the fallback code to run */
1818         g_set_error (error, G_IO_ERROR,
1819                      G_IO_ERROR_NOT_SUPPORTED,
1820                      _("Move between mounts not supported"));
1821       else if (errsv == EINVAL)
1822         /* This must be an invalid filename, on e.g. FAT, or
1823            we're trying to move the file into itself...
1824            We return invalid filename for both... */
1825         g_set_error (error, G_IO_ERROR,
1826                      G_IO_ERROR_INVALID_FILENAME,
1827                      _("Invalid filename"));
1828       else
1829         g_set_error (error, G_IO_ERROR,
1830                      g_io_error_from_errno (errsv),
1831                      _("Error moving file: %s"),
1832                      g_strerror (errsv));
1833       return FALSE;
1834
1835     }
1836   return TRUE;
1837 }
1838
1839 static GDirectoryMonitor*
1840 g_local_file_monitor_dir (GFile             *file,
1841                           GFileMonitorFlags  flags,
1842                           GCancellable      *cancellable)
1843 {
1844   GLocalFile* local_file = G_LOCAL_FILE(file);
1845   return _g_local_directory_monitor_new (local_file->filename, flags);
1846 }
1847
1848 static GFileMonitor*
1849 g_local_file_monitor_file (GFile             *file,
1850                            GFileMonitorFlags  flags,
1851                            GCancellable      *cancellable)
1852 {
1853   GLocalFile* local_file = G_LOCAL_FILE(file);
1854   return _g_local_file_monitor_new (local_file->filename, flags);
1855 }
1856
1857 static void
1858 g_local_file_file_iface_init (GFileIface *iface)
1859 {
1860   iface->dup = g_local_file_dup;
1861   iface->hash = g_local_file_hash;
1862   iface->equal = g_local_file_equal;
1863   iface->is_native = g_local_file_is_native;
1864   iface->has_uri_scheme = g_local_file_has_uri_scheme;
1865   iface->get_uri_scheme = g_local_file_get_uri_scheme;
1866   iface->get_basename = g_local_file_get_basename;
1867   iface->get_path = g_local_file_get_path;
1868   iface->get_uri = g_local_file_get_uri;
1869   iface->get_parse_name = g_local_file_get_parse_name;
1870   iface->get_parent = g_local_file_get_parent;
1871   iface->contains_file = g_local_file_contains_file;
1872   iface->get_relative_path = g_local_file_get_relative_path;
1873   iface->resolve_relative_path = g_local_file_resolve_relative_path;
1874   iface->get_child_for_display_name = g_local_file_get_child_for_display_name;
1875   iface->set_display_name = g_local_file_set_display_name;
1876   iface->enumerate_children = g_local_file_enumerate_children;
1877   iface->query_info = g_local_file_query_info;
1878   iface->query_filesystem_info = g_local_file_query_filesystem_info;
1879   iface->find_enclosing_volume = g_local_file_find_enclosing_volume;
1880   iface->query_settable_attributes = g_local_file_query_settable_attributes;
1881   iface->query_writable_namespaces = g_local_file_query_writable_namespaces;
1882   iface->set_attribute = g_local_file_set_attribute;
1883   iface->set_attributes_from_info = g_local_file_set_attributes_from_info;
1884   iface->read_fn = g_local_file_read;
1885   iface->append_to = g_local_file_append_to;
1886   iface->create = g_local_file_create;
1887   iface->replace = g_local_file_replace;
1888   iface->delete_file = g_local_file_delete;
1889   iface->trash = g_local_file_trash;
1890   iface->make_directory = g_local_file_make_directory;
1891   iface->make_symbolic_link = g_local_file_make_symbolic_link;
1892   iface->copy = g_local_file_copy;
1893   iface->move = g_local_file_move;
1894   iface->monitor_dir = g_local_file_monitor_dir;
1895   iface->monitor_file = g_local_file_monitor_file;
1896 }