gio/glocalfile.c

   1 /* GIO - GLib Input, Output and Streaming Library
   2  *
   3  * Copyright (C) 2006-2007 Red Hat, Inc.
   4  *
   5  * SPDX-License-Identifier: LGPL-2.1-or-later
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General
  18  * Public License along with this library; if not, see <http://www.gnu.org/licenses/>.
  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 #if G_OS_UNIX
  31 #include <dirent.h>
  32 #include <unistd.h>
  33 #endif
  34
  35 #if HAVE_SYS_STATFS_H
  36 #include <sys/statfs.h>
  37 #endif
  38 #if HAVE_SYS_STATVFS_H
  39 #include <sys/statvfs.h>
  40 #endif
  41 #if HAVE_SYS_VFS_H
  42 #include <sys/vfs.h>
  43 #elif HAVE_SYS_MOUNT_H
  44 #if HAVE_SYS_PARAM_H
  45 #include <sys/param.h>
  46 #endif
  47 #include <sys/mount.h>
  48 #endif
  49
  50 #ifndef O_BINARY
  51 #define O_BINARY 0
  52 #endif
  53
  54 #ifndef O_CLOEXEC
  55 #define O_CLOEXEC 0
  56 #endif
  57
  58 #include "gfileattribute.h"
  59 #include "glocalfile.h"
  60 #include "glocalfileinfo.h"
  61 #include "glocalfileenumerator.h"
  62 #include "glocalfileinputstream.h"
  63 #include "glocalfileoutputstream.h"
  64 #include "glocalfileiostream.h"
  65 #include "glocalfilemonitor.h"
  66 #include "gmountprivate.h"
  67 #include "gunixmounts.h"
  68 #include "gioerror.h"
  69 #include <glib/gstdio.h>
  70 #include <glib/gstdioprivate.h>
  71 #include "glibintl.h"
  72 #ifdef G_OS_UNIX
  73 #include "glib-unix.h"
  74 #include "gportalsupport.h"
  75 #include "gtrashportal.h"
  76 #endif
  77
  78 #include "glib-private.h"
  79
  80 #ifdef G_OS_WIN32
  81 #include <windows.h>
  82 #include <io.h>
  83 #include <direct.h>
  84
  85 #ifndef FILE_READ_ONLY_VOLUME
  86 #define FILE_READ_ONLY_VOLUME           0x00080000
  87 #endif
  88
  89 #ifndef S_ISREG
  90 #define S_ISREG(m) (((m) & _S_IFMT) == _S_IFREG)
  91 #endif
  92 #ifndef S_ISDIR
  93 #define S_ISDIR(m) (((m) & _S_IFMT) == _S_IFDIR)
  94 #endif
  95 #ifndef S_ISLNK
  96 #define S_ISLNK(m) (0)
  97 #endif
  98
  99 #ifndef ECANCELED
 100 #define ECANCELED 105
 101 #endif
 102 #endif
 103
 104
 105 static void g_local_file_file_iface_init (GFileIface *iface);
 106
 107 static GFileAttributeInfoList *local_writable_attributes = NULL;
 108 static GFileAttributeInfoList *local_writable_namespaces = NULL;
 109
 110 struct _GLocalFile
 111 {
 112   GObject parent_instance;
 113
 114   char *filename;
 115 };
 116
 117 #define g_local_file_get_type _g_local_file_get_type
 118 G_DEFINE_TYPE_WITH_CODE (GLocalFile, g_local_file, G_TYPE_OBJECT,
 119                          G_IMPLEMENT_INTERFACE (G_TYPE_FILE,
 120                                                 g_local_file_file_iface_init))
 121
 122 static char *find_mountpoint_for (const char *file, dev_t dev, gboolean resolve_basename_symlink);
 123
 124 #ifndef G_OS_WIN32
 125 static gboolean is_remote_fs_type (const gchar *fsname);
 126 #endif
 127
 128 static void
 129 g_local_file_finalize (GObject *object)
 130 {
 131   GLocalFile *local;
 132
 133   local = G_LOCAL_FILE (object);
 134
 135   g_free (local->filename);
 136
 137   G_OBJECT_CLASS (g_local_file_parent_class)->finalize (object);
 138 }
 139
 140 static void
 141 g_local_file_class_init (GLocalFileClass *klass)
 142 {
 143   GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
 144   GFileAttributeInfoList *list;
 145
 146   gobject_class->finalize = g_local_file_finalize;
 147
 148   /* Set up attribute lists */
 149
 150   /* Writable attributes: */
 151
 152   list = g_file_attribute_info_list_new ();
 153
 154   g_file_attribute_info_list_add (list,
 155                                   G_FILE_ATTRIBUTE_UNIX_MODE,
 156                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 157                                   G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
 158                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 159
 160 #ifdef G_OS_UNIX
 161   g_file_attribute_info_list_add (list,
 162                                   G_FILE_ATTRIBUTE_UNIX_UID,
 163                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 164                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 165   g_file_attribute_info_list_add (list,
 166                                   G_FILE_ATTRIBUTE_UNIX_GID,
 167                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 168                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 169 #endif
 170
 171 #ifdef HAVE_SYMLINK
 172   g_file_attribute_info_list_add (list,
 173                                   G_FILE_ATTRIBUTE_STANDARD_SYMLINK_TARGET,
 174                                   G_FILE_ATTRIBUTE_TYPE_BYTE_STRING,
 175                                   0);
 176 #endif
 177
 178 #if defined(HAVE_UTIMES) || defined(HAVE_UTIMENSAT)
 179   g_file_attribute_info_list_add (list,
 180                                   G_FILE_ATTRIBUTE_TIME_MODIFIED,
 181                                   G_FILE_ATTRIBUTE_TYPE_UINT64,
 182                                   G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
 183                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 184   g_file_attribute_info_list_add (list,
 185                                   G_FILE_ATTRIBUTE_TIME_MODIFIED_USEC,
 186                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 187                                   G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
 188                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 189   /* When copying, the target file is accessed. Replicating
 190    * the source access time does not make sense in this case.
 191    */
 192   g_file_attribute_info_list_add (list,
 193                                   G_FILE_ATTRIBUTE_TIME_ACCESS,
 194                                   G_FILE_ATTRIBUTE_TYPE_UINT64,
 195                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 196   g_file_attribute_info_list_add (list,
 197                                   G_FILE_ATTRIBUTE_TIME_ACCESS_USEC,
 198                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 199                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 200 #endif  /* HAVE_UTIMES || HAVE_UTIMENSAT */
 201
 202 #ifdef HAVE_UTIMENSAT
 203   g_file_attribute_info_list_add (list,
 204                                   G_FILE_ATTRIBUTE_TIME_MODIFIED_NSEC,
 205                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 206                                   G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
 207                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 208   g_file_attribute_info_list_add (list,
 209                                   G_FILE_ATTRIBUTE_TIME_ACCESS_NSEC,
 210                                   G_FILE_ATTRIBUTE_TYPE_UINT32,
 211                                   G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
 212 #endif
 213
 214   local_writable_attributes = list;
 215 }
 216
 217 static void
 218 g_local_file_init (GLocalFile *local)
 219 {
 220 }
 221
 222 const char *
 223 _g_local_file_get_filename (GLocalFile *file)
 224 {
 225   return file->filename;
 226 }
 227
 228 GFile *
 229 _g_local_file_new (const char *filename)
 230 {
 231   GLocalFile *local;
 232
 233   local = g_object_new (G_TYPE_LOCAL_FILE, NULL);
 234   local->filename = g_canonicalize_filename (filename, NULL);
 235
 236   return G_FILE (local);
 237 }
 238
 239 /*< internal >
 240  * g_local_file_new_from_dirname_and_basename:
 241  * @dirname: an absolute, canonical directory name
 242  * @basename: the name of a child inside @dirname
 243  *
 244  * Creates a #GFile from @dirname and @basename.
 245  *
 246  * This is more efficient than pasting the fields together for yourself
 247  * and creating a #GFile from the result, and also more efficient than
 248  * creating a #GFile for the dirname and using g_file_get_child().
 249  *
 250  * @dirname must be canonical, as per GLocalFile's opinion of what
 251  * canonical means.  This means that you should only pass strings that
 252  * were returned by _g_local_file_get_filename().
 253  *
 254  * Returns: a #GFile
 255  */
 256 GFile *
 257 g_local_file_new_from_dirname_and_basename (const gchar *dirname,
 258                                             const gchar *basename)
 259 {
 260   GLocalFile *local;
 261
 262   g_return_val_if_fail (dirname != NULL, NULL);
 263   g_return_val_if_fail (basename && basename[0] && !strchr (basename, '/'), NULL);
 264
 265   local = g_object_new (G_TYPE_LOCAL_FILE, NULL);
 266   local->filename = g_build_filename (dirname, basename, NULL);
 267
 268   return G_FILE (local);
 269 }
 270
 271 static gboolean
 272 g_local_file_is_native (GFile *file)
 273 {
 274   return TRUE;
 275 }
 276
 277 static gboolean
 278 g_local_file_has_uri_scheme (GFile      *file,
 279                              const char *uri_scheme)
 280 {
 281   return g_ascii_strcasecmp (uri_scheme, "file") == 0;
 282 }
 283
 284 static char *
 285 g_local_file_get_uri_scheme (GFile *file)
 286 {
 287   return g_strdup ("file");
 288 }
 289
 290 static char *
 291 g_local_file_get_basename (GFile *file)
 292 {
 293   return g_path_get_basename (G_LOCAL_FILE (file)->filename);
 294 }
 295
 296 static char *
 297 g_local_file_get_path (GFile *file)
 298 {
 299   return g_strdup (G_LOCAL_FILE (file)->filename);
 300 }
 301
 302 static char *
 303 g_local_file_get_uri (GFile *file)
 304 {
 305   return g_filename_to_uri (G_LOCAL_FILE (file)->filename, NULL, NULL);
 306 }
 307
 308 static gboolean
 309 get_filename_charset (const gchar **filename_charset)
 310 {
 311   const gchar **charsets;
 312   gboolean is_utf8;
 313
 314   is_utf8 = g_get_filename_charsets (&charsets);
 315
 316   if (filename_charset)
 317     *filename_charset = charsets[0];
 318
 319   return is_utf8;
 320 }
 321
 322 static gboolean
 323 name_is_valid_for_display (const char *string,
 324                            gboolean    is_valid_utf8)
 325 {
 326   char c;
 327
 328   if (!is_valid_utf8 &&
 329       !g_utf8_validate (string, -1, NULL))
 330     return FALSE;
 331
 332   while ((c = *string++) != 0)
 333     {
 334       if (g_ascii_iscntrl (c))
 335         return FALSE;
 336     }
 337
 338   return TRUE;
 339 }
 340
 341 static char *
 342 g_local_file_get_parse_name (GFile *file)
 343 {
 344   const char *filename;
 345   char *parse_name;
 346   const gchar *charset;
 347   char *utf8_filename;
 348   char *roundtripped_filename;
 349   gboolean free_utf8_filename;
 350   gboolean is_valid_utf8;
 351   char *escaped_path;
 352
 353   filename = G_LOCAL_FILE (file)->filename;
 354   if (get_filename_charset (&charset))
 355     {
 356       utf8_filename = (char *)filename;
 357       free_utf8_filename = FALSE;
 358       is_valid_utf8 = FALSE; /* Can't guarantee this */
 359     }
 360   else
 361     {
 362       utf8_filename = g_convert (filename, -1,
 363                                  "UTF-8", charset, NULL, NULL, NULL);
 364       free_utf8_filename = TRUE;
 365       is_valid_utf8 = TRUE;
 366
 367       if (utf8_filename != NULL)
 368         {
 369           /* Make sure we can roundtrip: */
 370           roundtripped_filename = g_convert (utf8_filename, -1,
 371                                              charset, "UTF-8", NULL, NULL, NULL);
 372
 373           if (roundtripped_filename == NULL ||
 374               strcmp (filename, roundtripped_filename) != 0)
 375             {
 376               g_free (utf8_filename);
 377               utf8_filename = NULL;
 378             }
 379
 380           g_free (roundtripped_filename);
 381         }
 382     }
 383
 384   if (utf8_filename != NULL &&
 385       name_is_valid_for_display (utf8_filename, is_valid_utf8))
 386     {
 387       if (free_utf8_filename)
 388         parse_name = utf8_filename;
 389       else
 390         parse_name = g_strdup (utf8_filename);
 391     }
 392   else
 393     {
 394 #ifdef G_OS_WIN32
 395       char *dup_filename, *p, *backslash;
 396
 397       /* Turn backslashes into forward slashes like
 398        * g_filename_to_uri() would do (but we can't use that because
 399        * it doesn't output IRIs).
 400        */
 401       dup_filename = g_strdup (filename);
 402       filename = p = dup_filename;
 403
 404       while ((backslash = strchr (p, '\\')) != NULL)
 405         {
 406           *backslash = '/';
 407           p = backslash + 1;
 408         }
 409 #endif
 410
 411       escaped_path = g_uri_escape_string (filename,
 412                                           G_URI_RESERVED_CHARS_ALLOWED_IN_PATH_ELEMENT "/",
 413                                           TRUE);
 414       parse_name = g_strconcat ("file://",
 415                                 (*escaped_path != '/') ? "/" : "",
 416                                 escaped_path,
 417                                 NULL);
 418
 419       g_free (escaped_path);
 420 #ifdef G_OS_WIN32
 421       g_free (dup_filename);
 422 #endif
 423       if (free_utf8_filename)
 424         g_free (utf8_filename);
 425     }
 426
 427   return parse_name;
 428 }
 429
 430 static GFile *
 431 g_local_file_get_parent (GFile *file)
 432 {
 433   GLocalFile *local = G_LOCAL_FILE (file);
 434   const char *non_root;
 435   char *dirname;
 436   GFile *parent;
 437
 438   /* Check for root; local->filename is guaranteed to be absolute, so
 439    * g_path_skip_root() should never return NULL. */
 440   non_root = g_path_skip_root (local->filename);
 441   g_assert (non_root != NULL);
 442
 443   if (*non_root == 0)
 444     return NULL;
 445
 446   dirname = g_path_get_dirname (local->filename);
 447   parent = _g_local_file_new (dirname);
 448   g_free (dirname);
 449   return parent;
 450 }
 451
 452 static GFile *
 453 g_local_file_dup (GFile *file)
 454 {
 455   GLocalFile *local = G_LOCAL_FILE (file);
 456
 457   return _g_local_file_new (local->filename);
 458 }
 459
 460 static guint
 461 g_local_file_hash (GFile *file)
 462 {
 463   GLocalFile *local = G_LOCAL_FILE (file);
 464
 465   return g_str_hash (local->filename);
 466 }
 467
 468 static gboolean
 469 g_local_file_equal (GFile *file1,
 470                     GFile *file2)
 471 {
 472   GLocalFile *local1 = G_LOCAL_FILE (file1);
 473   GLocalFile *local2 = G_LOCAL_FILE (file2);
 474
 475   return g_str_equal (local1->filename, local2->filename);
 476 }
 477
 478 static const char *
 479 match_prefix (const char *path,
 480               const char *prefix)
 481 {
 482   int prefix_len;
 483
 484   prefix_len = strlen (prefix);
 485   if (strncmp (path, prefix, prefix_len) != 0)
 486     return NULL;
 487
 488   /* Handle the case where prefix is the root, so that
 489    * the IS_DIR_SEPRARATOR check below works */
 490   if (prefix_len > 0 &&
 491       G_IS_DIR_SEPARATOR (prefix[prefix_len-1]))
 492     prefix_len--;
 493
 494   return path + prefix_len;
 495 }
 496
 497 static gboolean
 498 g_local_file_prefix_matches (GFile *parent,
 499                              GFile *descendant)
 500 {
 501   GLocalFile *parent_local = G_LOCAL_FILE (parent);
 502   GLocalFile *descendant_local = G_LOCAL_FILE (descendant);
 503   const char *remainder;
 504
 505   remainder = match_prefix (descendant_local->filename, parent_local->filename);
 506   if (remainder != NULL && G_IS_DIR_SEPARATOR (*remainder))
 507     return TRUE;
 508   return FALSE;
 509 }
 510
 511 static char *
 512 g_local_file_get_relative_path (GFile *parent,
 513                                 GFile *descendant)
 514 {
 515   GLocalFile *parent_local = G_LOCAL_FILE (parent);
 516   GLocalFile *descendant_local = G_LOCAL_FILE (descendant);
 517   const char *remainder;
 518
 519   remainder = match_prefix (descendant_local->filename, parent_local->filename);
 520
 521   if (remainder != NULL && G_IS_DIR_SEPARATOR (*remainder))
 522     return g_strdup (remainder + 1);
 523   return NULL;
 524 }
 525
 526 static GFile *
 527 g_local_file_resolve_relative_path (GFile      *file,
 528                                     const char *relative_path)
 529 {
 530   GLocalFile *local = G_LOCAL_FILE (file);
 531   char *filename;
 532   GFile *child;
 533
 534   if (g_path_is_absolute (relative_path))
 535     return _g_local_file_new (relative_path);
 536
 537   filename = g_build_filename (local->filename, relative_path, NULL);
 538   child = _g_local_file_new (filename);
 539   g_free (filename);
 540
 541   return child;
 542 }
 543
 544 static GFileEnumerator *
 545 g_local_file_enumerate_children (GFile                *file,
 546                                  const char           *attributes,
 547                                  GFileQueryInfoFlags   flags,
 548                                  GCancellable         *cancellable,
 549                                  GError              **error)
 550 {
 551   GLocalFile *local = G_LOCAL_FILE (file);
 552   return _g_local_file_enumerator_new (local,
 553                                        attributes, flags,
 554                                        cancellable, error);
 555 }
 556
 557 static GFile *
 558 g_local_file_get_child_for_display_name (GFile        *file,
 559                                          const char   *display_name,
 560                                          GError      **error)
 561 {
 562   GFile *new_file;
 563   char *basename;
 564
 565   basename = g_filename_from_utf8 (display_name, -1, NULL, NULL, NULL);
 566   if (basename == NULL)
 567     {
 568       g_set_error (error, G_IO_ERROR,
 569                    G_IO_ERROR_INVALID_FILENAME,
 570                    _("Invalid filename %s"), display_name);
 571       return NULL;
 572     }
 573
 574   new_file = g_file_get_child (file, basename);
 575   g_free (basename);
 576
 577   return new_file;
 578 }
 579
 580 #if defined(USE_STATFS) && !defined(HAVE_STRUCT_STATFS_F_FSTYPENAME)
 581 static const char *
 582 get_fs_type (long f_type)
 583 {
 584   /* filesystem ids taken from linux manpage */
 585   switch (f_type)
 586     {
 587     case 0xadf5:
 588       return "adfs";
 589     case 0x5346414f:
 590       return "afs";
 591     case 0x0187:
 592       return "autofs";
 593     case 0xADFF:
 594       return "affs";
 595     case 0x62646576:
 596       return "bdevfs";
 597     case 0x42465331:
 598       return "befs";
 599     case 0x1BADFACE:
 600       return "bfs";
 601     case 0x42494e4d:
 602       return "binfmt_misc";
 603     case 0x9123683E:
 604       return "btrfs";
 605     case 0x73727279:
 606       return "btrfs_test_fs";
 607     case 0x27e0eb:
 608       return "cgroup";
 609     case 0x63677270:
 610       return "cgroup2";
 611     case 0xFF534D42:
 612       return "cifs";
 613     case 0x73757245:
 614       return "coda";
 615     case 0x012FF7B7:
 616       return "coh";
 617     case 0x62656570:
 618       return "configfs";
 619     case 0x28cd3d45:
 620       return "cramfs";
 621     case 0x64626720:
 622       return "debugfs";
 623     case 0x1373:
 624       return "devfs";
 625     case 0x1cd1:
 626       return "devpts";
 627     case 0xf15f:
 628       return "ecryptfs";
 629     case 0xde5e81e4:
 630       return "efivarfs";
 631     case 0x00414A53:
 632       return "efs";
 633     case 0x2011BAB0UL:
 634       return "exfat";
 635     case 0x137D:
 636       return "ext";
 637     case 0xEF51:
 638       return "ext2";
 639     case 0xEF53:
 640       return "ext3/ext4";
 641     case 0xF2F52010:
 642       return "f2fs";
 643     case 0x65735546:
 644       return "fuse";
 645     case 0x65735543:
 646       return "fusectl";
 647     case 0xBAD1DEA:
 648       return "futexfs";
 649     case 0x4244:
 650       return "hfs";
 651     case 0x00c0ffee:
 652       return "hostfs";
 653     case 0xF995E849:
 654       return "hpfs";
 655     case 0x958458f6:
 656       return "hugetlbfs";
 657     case 0x9660:
 658       return "isofs";
 659     case 0x72b6:
 660       return "jffs2";
 661     case 0x3153464a:
 662       return "jfs";
 663     case 0x137F:
 664       return "minix";
 665     case 0x138F:
 666       return "minix2";
 667     case 0x2468:
 668       return "minix2";
 669     case 0x2478:
 670       return "minix22";
 671     case 0x4d5a:
 672       return "minix3";
 673     case 0x19800202:
 674       return "mqueue";
 675     case 0x4d44:
 676       return "msdos";
 677     case 0x564c:
 678       return "ncp";
 679     case 0x6969:
 680       return "nfs";
 681     case 0x3434:
 682       return "nilfs";
 683     case 0x6e736673:
 684       return "nsfs";
 685     case 0x5346544e:
 686       return "ntfs";
 687     case 0x7461636f:
 688       return "ocfs2";
 689     case 0x9fa1:
 690       return "openprom";
 691     case 0x794c7630:
 692       return "overlay";
 693     case 0x50495045:
 694       return "pipefs";
 695     case 0x9fa0:
 696       return "proc";
 697     case 0x6165676C:
 698       return "pstore";
 699     case 0x002f:
 700       return "qnx4";
 701     case 0x68191122:
 702       return "qnx6";
 703     case 0x858458f6:
 704       return "ramfs";
 705     case 0x52654973:
 706       return "reiserfs";
 707     case 0x7275:
 708       return "romfs";
 709     case 0x67596969:
 710       return "rpc_pipefs";
 711     case 0x73636673:
 712       return "securityfs";
 713     case 0xf97cff8c:
 714       return "selinuxfs";
 715     case 0x43415d53:
 716       return "smackfs";
 717     case 0x517B:
 718       return "smb";
 719     case 0xfe534d42:
 720       return "smb2";
 721     case 0x534F434B:
 722       return "sockfs";
 723     case 0x73717368:
 724       return "squashfs";
 725     case 0x62656572:
 726       return "sysfs";
 727     case 0x012FF7B6:
 728       return "sysv2";
 729     case 0x012FF7B5:
 730       return "sysv4";
 731     case 0x01021994:
 732       return "tmpfs";
 733     case 0x74726163:
 734       return "tracefs";
 735     case 0x15013346:
 736       return "udf";
 737     case 0x00011954:
 738       return "ufs";
 739     case 0x9fa2:
 740       return "usbdevice";
 741     case 0x01021997:
 742       return "v9fs";
 743     case 0xa501FCF5:
 744       return "vxfs";
 745     case 0xabba1974:
 746       return "xenfs";
 747     case 0x012FF7B4:
 748       return "xenix";
 749     case 0x58465342:
 750       return "xfs";
 751     case 0x012FD16D:
 752       return "xiafs";
 753     case 0x52345362:
 754       return "reiser4";
 755     default:
 756       return NULL;
 757     }
 758 }
 759 #endif
 760
 761 #ifndef G_OS_WIN32
 762
 763 G_LOCK_DEFINE_STATIC(mount_info_hash);
 764 static GHashTable *mount_info_hash = NULL;
 765 static guint64 mount_info_hash_cache_time = 0;
 766
 767 typedef enum {
 768   MOUNT_INFO_READONLY = 1<<0
 769 } MountInfo;
 770
 771 static gboolean
 772 device_equal (gconstpointer v1,
 773               gconstpointer v2)
 774 {
 775   return *(dev_t *)v1 == *(dev_t *)v2;
 776 }
 777
 778 static guint
 779 device_hash (gconstpointer v)
 780 {
 781   return (guint) *(dev_t *)v;
 782 }
 783
 784 static void
 785 get_mount_info (GFileInfo             *fs_info,
 786                 const char            *path,
 787                 GFileAttributeMatcher *matcher)
 788 {
 789   GStatBuf buf;
 790   gboolean got_info;
 791   gpointer info_as_ptr;
 792   guint mount_info;
 793   char *mountpoint;
 794   dev_t *dev;
 795   GUnixMountEntry *mount;
 796   guint64 cache_time;
 797   gboolean is_remote = FALSE;
 798
 799   if (g_lstat (path, &buf) != 0)
 800     return;
 801
 802   G_LOCK (mount_info_hash);
 803
 804   if (mount_info_hash == NULL)
 805     mount_info_hash = g_hash_table_new_full (device_hash, device_equal,
 806                                              g_free, NULL);
 807
 808
 809   if (g_unix_mounts_changed_since (mount_info_hash_cache_time))
 810     g_hash_table_remove_all (mount_info_hash);
 811
 812   got_info = g_hash_table_lookup_extended (mount_info_hash,
 813                                            &buf.st_dev,
 814                                            NULL,
 815                                            &info_as_ptr);
 816
 817   G_UNLOCK (mount_info_hash);
 818
 819   mount_info = GPOINTER_TO_UINT (info_as_ptr);
 820
 821   if (!got_info)
 822     {
 823       mount_info = 0;
 824
 825       mountpoint = find_mountpoint_for (path, buf.st_dev, FALSE);
 826       if (mountpoint == NULL)
 827         mountpoint = g_strdup ("/");
 828
 829       mount = g_unix_mount_at (mountpoint, &cache_time);
 830       if (mount)
 831         {
 832           if (g_unix_mount_is_readonly (mount))
 833             mount_info |= MOUNT_INFO_READONLY;
 834           if (is_remote_fs_type (g_unix_mount_get_fs_type (mount)))
 835             is_remote = TRUE;
 836
 837           g_unix_mount_free (mount);
 838         }
 839
 840       g_free (mountpoint);
 841
 842       dev = g_new0 (dev_t, 1);
 843       *dev = buf.st_dev;
 844
 845       G_LOCK (mount_info_hash);
 846       mount_info_hash_cache_time = cache_time;
 847       g_hash_table_insert (mount_info_hash, dev, GUINT_TO_POINTER (mount_info));
 848       G_UNLOCK (mount_info_hash);
 849     }
 850
 851   if (g_file_attribute_matcher_matches (matcher,
 852                                         G_FILE_ATTRIBUTE_FILESYSTEM_READONLY))
 853     g_file_info_set_attribute_boolean (fs_info, G_FILE_ATTRIBUTE_FILESYSTEM_READONLY,
 854                                        (mount_info & MOUNT_INFO_READONLY));
 855
 856   if (g_file_attribute_matcher_matches (matcher,
 857                                         G_FILE_ATTRIBUTE_FILESYSTEM_REMOTE))
 858     g_file_info_set_attribute_boolean (fs_info, G_FILE_ATTRIBUTE_FILESYSTEM_REMOTE, is_remote);
 859 }
 860
 861 #endif
 862
 863 #ifdef G_OS_WIN32
 864
 865 static wchar_t *
 866 get_volume_for_path (const char *path)
 867 {
 868   long len;
 869   wchar_t *wpath;
 870   wchar_t *result;
 871
 872   wpath = g_utf8_to_utf16 (path, -1, NULL, NULL, NULL);
 873   result = g_new (wchar_t, MAX_PATH);
 874
 875   if (!GetVolumePathNameW (wpath, result, MAX_PATH))
 876     {
 877       char *msg = g_win32_error_message (GetLastError ());
 878       g_critical ("GetVolumePathName failed: %s", msg);
 879       g_free (msg);
 880       g_free (result);
 881       g_free (wpath);
 882       return NULL;
 883     }
 884
 885   len = wcslen (result);
 886   if (len > 0 && result[len-1] != L'\\')
 887     {
 888       result = g_renew (wchar_t, result, len + 2);
 889       result[len] = L'\\';
 890       result[len + 1] = 0;
 891     }
 892
 893   g_free (wpath);
 894   return result;
 895 }
 896
 897 static char *
 898 find_mountpoint_for (const char *file, dev_t dev, gboolean resolve_basename_symlink)
 899 {
 900   wchar_t *wpath;
 901   char *utf8_path;
 902
 903   wpath = get_volume_for_path (file);
 904   if (!wpath)
 905     return NULL;
 906
 907   utf8_path = g_utf16_to_utf8 (wpath, -1, NULL, NULL, NULL);
 908
 909   g_free (wpath);
 910   return utf8_path;
 911 }
 912
 913 static void
 914 get_filesystem_readonly (GFileInfo  *info,
 915                          const char *path)
 916 {
 917   wchar_t *rootdir;
 918
 919   rootdir = get_volume_for_path (path);
 920
 921   if (rootdir)
 922     {
 923       DWORD flags;
 924       if (GetVolumeInformationW (rootdir, NULL, 0, NULL, NULL, &flags, NULL, 0))
 925         g_file_info_set_attribute_boolean (info, G_FILE_ATTRIBUTE_FILESYSTEM_READONLY,
 926                                            (flags & FILE_READ_ONLY_VOLUME) != 0);
 927     }
 928
 929   g_free (rootdir);
 930 }
 931
 932 #endif /* G_OS_WIN32 */
 933
 934 #pragma GCC diagnostic push
 935 #pragma GCC diagnostic ignored "-Wformat-nonliteral"
 936 static void
 937 g_set_io_error (GError      **error,
 938                 const gchar  *msg,
 939                 GFile        *file,
 940                 gint          errsv)
 941 {
 942   GLocalFile *local = G_LOCAL_FILE (file);
 943   gchar *display_name;
 944
 945   display_name = g_filename_display_name (local->filename);
 946   g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errsv),
 947                msg, display_name, g_strerror (errsv));
 948   g_free (display_name);
 949 }
 950 #pragma GCC diagnostic pop
 951
 952 static GFileInfo *
 953 g_local_file_query_filesystem_info (GFile         *file,
 954                                     const char    *attributes,
 955                                     GCancellable  *cancellable,
 956                                     GError       **error)
 957 {
 958   GLocalFile *local = G_LOCAL_FILE (file);
 959   GFileInfo *info;
 960   int statfs_result = 0;
 961   gboolean no_size;
 962 #ifndef G_OS_WIN32
 963   const char *fstype;
 964 #ifdef USE_STATFS
 965   guint64 block_size;
 966   struct statfs statfs_buffer;
 967 #elif defined(USE_STATVFS)
 968   guint64 block_size;
 969   struct statvfs statfs_buffer;
 970 #endif /* USE_STATFS */
 971 #endif /* G_OS_WIN32 */
 972   GFileAttributeMatcher *attribute_matcher;
 973
 974   no_size = FALSE;
 975
 976 #ifdef USE_STATFS
 977
 978 #if STATFS_ARGS == 2
 979   statfs_result = statfs (local->filename, &statfs_buffer);
 980 #elif STATFS_ARGS == 4
 981   statfs_result = statfs (local->filename, &statfs_buffer,
 982                           sizeof (statfs_buffer), 0);
 983 #endif /* STATFS_ARGS == 2 */
 984   block_size = statfs_buffer.f_bsize;
 985
 986   /* Many backends can't report free size (for instance the gvfs fuse
 987    * backend for backend not supporting this), and set f_bfree to 0,
 988    *  but it can be 0 for real too. We treat the available == 0 and
 989    * free == 0 case as "both of these are invalid", but only on file systems
 990    * which are known to not support this (otherwise we can omit metadata for
 991    * systems which are legitimately full). */
 992 #if defined(__linux__)
 993   if (statfs_result == 0 &&
 994       statfs_buffer.f_bavail == 0 && statfs_buffer.f_bfree == 0 &&
 995       (/* linux/ncp_fs.h: NCP_SUPER_MAGIC == 0x564c */
 996        statfs_buffer.f_type == 0x564c ||
 997        /* man statfs: FUSE_SUPER_MAGIC == 0x65735546 */
 998        statfs_buffer.f_type == 0x65735546))
 999     no_size = TRUE;
1000 #endif  /* __linux__ */
1001
1002 #elif defined(USE_STATVFS)
1003   statfs_result = statvfs (local->filename, &statfs_buffer);
1004   block_size = statfs_buffer.f_frsize;
1005 #endif /* USE_STATFS */
1006
1007   if (statfs_result == -1)
1008     {
1009       int errsv = errno;
1010
1011       g_set_io_error (error,
1012                       _("Error getting filesystem info for %s: %s"),
1013                       file, errsv);
1014       return NULL;
1015     }
1016
1017   info = g_file_info_new ();
1018
1019   attribute_matcher = g_file_attribute_matcher_new (attributes);
1020
1021   if (!no_size &&
1022       g_file_attribute_matcher_matches (attribute_matcher,
1023                                         G_FILE_ATTRIBUTE_FILESYSTEM_FREE))
1024     {
1025 #ifdef G_OS_WIN32
1026       gchar *localdir = g_path_get_dirname (local->filename);
1027       wchar_t *wdirname = g_utf8_to_utf16 (localdir, -1, NULL, NULL, NULL);
1028       ULARGE_INTEGER li;
1029
1030       g_free (localdir);
1031       if (GetDiskFreeSpaceExW (wdirname, &li, NULL, NULL))
1032         g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_FREE, (guint64)li.QuadPart);
1033       g_free (wdirname);
1034 #else
1035 #if defined(USE_STATFS) || defined(USE_STATVFS)
1036       g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_FREE, block_size * statfs_buffer.f_bavail);
1037 #endif
1038 #endif
1039     }
1040   if (!no_size &&
1041       g_file_attribute_matcher_matches (attribute_matcher,
1042                                         G_FILE_ATTRIBUTE_FILESYSTEM_SIZE))
1043     {
1044 #ifdef G_OS_WIN32
1045       gchar *localdir = g_path_get_dirname (local->filename);
1046       wchar_t *wdirname = g_utf8_to_utf16 (localdir, -1, NULL, NULL, NULL);
1047       ULARGE_INTEGER li;
1048
1049       g_free (localdir);
1050       if (GetDiskFreeSpaceExW (wdirname, NULL, &li, NULL))
1051         g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_SIZE,  (guint64)li.QuadPart);
1052       g_free (wdirname);
1053 #else
1054 #if defined(USE_STATFS) || defined(USE_STATVFS)
1055       g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_SIZE, block_size * statfs_buffer.f_blocks);
1056 #endif
1057 #endif /* G_OS_WIN32 */
1058     }
1059
1060   if (!no_size &&
1061       g_file_attribute_matcher_matches (attribute_matcher,
1062                                         G_FILE_ATTRIBUTE_FILESYSTEM_USED))
1063     {
1064 #ifdef G_OS_WIN32
1065       gchar *localdir = g_path_get_dirname (local->filename);
1066       wchar_t *wdirname = g_utf8_to_utf16 (localdir, -1, NULL, NULL, NULL);
1067       ULARGE_INTEGER li_free;
1068       ULARGE_INTEGER li_total;
1069
1070       g_free (localdir);
1071       if (GetDiskFreeSpaceExW (wdirname, &li_free, &li_total, NULL))
1072         g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_USED,  (guint64)li_total.QuadPart - (guint64)li_free.QuadPart);
1073       g_free (wdirname);
1074 #else
1075       g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FILESYSTEM_USED, block_size * (statfs_buffer.f_blocks - statfs_buffer.f_bfree));
1076 #endif /* G_OS_WIN32 */
1077     }
1078
1079 #ifndef G_OS_WIN32
1080 #ifdef USE_STATFS
1081 #if defined(HAVE_STRUCT_STATFS_F_FSTYPENAME)
1082   fstype = statfs_buffer.f_fstypename;
1083 #else
1084   fstype = get_fs_type (statfs_buffer.f_type);
1085 #endif
1086
1087 #elif defined(USE_STATVFS)
1088 #if defined(HAVE_STRUCT_STATVFS_F_FSTYPENAME)
1089   fstype = statfs_buffer.f_fstypename;
1090 #elif defined(HAVE_STRUCT_STATVFS_F_BASETYPE)
1091   fstype = statfs_buffer.f_basetype;
1092 #elif defined(HAVE_STRUCT_STATVFS_F_TYPE)
1093   fstype = get_fs_type (statfs_buffer.f_type);
1094 #else
1095   fstype = NULL;
1096 #endif
1097 #endif /* USE_STATFS */
1098
1099   if (fstype &&
1100       g_file_attribute_matcher_matches (attribute_matcher,
1101                                         G_FILE_ATTRIBUTE_FILESYSTEM_TYPE))
1102     g_file_info_set_attribute_string (info, G_FILE_ATTRIBUTE_FILESYSTEM_TYPE, fstype);
1103 #endif /* G_OS_WIN32 */
1104
1105   if (g_file_attribute_matcher_matches (attribute_matcher,
1106                                         G_FILE_ATTRIBUTE_FILESYSTEM_READONLY) ||
1107       g_file_attribute_matcher_matches (attribute_matcher,
1108                                         G_FILE_ATTRIBUTE_FILESYSTEM_REMOTE))
1109     {
1110 #ifdef G_OS_WIN32
1111       get_filesystem_readonly (info, local->filename);
1112 #else
1113       get_mount_info (info, local->filename, attribute_matcher);
1114 #endif /* G_OS_WIN32 */
1115     }
1116
1117   g_file_attribute_matcher_unref (attribute_matcher);
1118
1119   return info;
1120 }
1121
1122 static GMount *
1123 g_local_file_find_enclosing_mount (GFile         *file,
1124                                    GCancellable  *cancellable,
1125                                    GError       **error)
1126 {
1127   GLocalFile *local = G_LOCAL_FILE (file);
1128   GStatBuf buf;
1129   char *mountpoint;
1130   GMount *mount;
1131
1132   if (g_lstat (local->filename, &buf) != 0)
1133     goto error;
1134
1135   mountpoint = find_mountpoint_for (local->filename, buf.st_dev, FALSE);
1136   if (mountpoint == NULL)
1137     goto error;
1138
1139   mount = _g_mount_get_for_mount_path (mountpoint, cancellable);
1140   g_free (mountpoint);
1141   if (mount)
1142     return mount;
1143
1144 error:
1145   g_set_io_error (error,
1146                   /* Translators: This is an error message when trying to find
1147                    * the enclosing (user visible) mount of a file, but none
1148                    * exists.
1149                    */
1150                   _("Containing mount for file %s not found"),
1151                   file, 0);
1152
1153   return NULL;
1154 }
1155
1156 static GFile *
1157 g_local_file_set_display_name (GFile         *file,
1158                                const char    *display_name,
1159                                GCancellable  *cancellable,
1160                                GError       **error)
1161 {
1162   GLocalFile *local, *new_local;
1163   GFile *new_file, *parent;
1164   GStatBuf statbuf;
1165   GVfsClass *class;
1166   GVfs *vfs;
1167   int errsv;
1168
1169   parent = g_file_get_parent (file);
1170   if (parent == NULL)
1171     {
1172       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_FAILED,
1173                            _("Can’t rename root directory"));
1174       return NULL;
1175     }
1176
1177   new_file = g_file_get_child_for_display_name (parent, display_name, error);
1178   g_object_unref (parent);
1179
1180   if (new_file == NULL)
1181     return NULL;
1182   local = G_LOCAL_FILE (file);
1183   new_local = G_LOCAL_FILE (new_file);
1184
1185   if (g_lstat (new_local->filename, &statbuf) == -1)
1186     {
1187       errsv = errno;
1188
1189       if (errsv != ENOENT)
1190         {
1191           g_set_io_error (error, _("Error renaming file %s: %s"), new_file, errsv);
1192           return NULL;
1193         }
1194     }
1195   else
1196     {
1197       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_EXISTS,
1198                            _("Can’t rename file, filename already exists"));
1199       return NULL;
1200     }
1201
1202   if (g_rename (local->filename, new_local->filename) == -1)
1203     {
1204       errsv = errno;
1205
1206       if (errsv == EINVAL)
1207         /* We can't get a rename file into itself error here,
1208          * so this must be an invalid filename, on e.g. FAT
1209          */
1210         g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_FILENAME,
1211                              _("Invalid filename"));
1212       else
1213         g_set_io_error (error,
1214                         _("Error renaming file %s: %s"),
1215                         file, errsv);
1216       g_object_unref (new_file);
1217       return NULL;
1218     }
1219
1220   vfs = g_vfs_get_default ();
1221   class = G_VFS_GET_CLASS (vfs);
1222   if (class->local_file_moved)
1223     class->local_file_moved (vfs, local->filename, new_local->filename);
1224
1225   return new_file;
1226 }
1227
1228 static GFileInfo *
1229 g_local_file_query_info (GFile                *file,
1230                          const char           *attributes,
1231                          GFileQueryInfoFlags   flags,
1232                          GCancellable         *cancellable,
1233                          GError              **error)
1234 {
1235   GLocalFile *local = G_LOCAL_FILE (file);
1236   GFileInfo *info;
1237   GFileAttributeMatcher *matcher;
1238   char *basename, *dirname;
1239   GLocalParentFileInfo parent_info;
1240
1241   matcher = g_file_attribute_matcher_new (attributes);
1242
1243   basename = g_path_get_basename (local->filename);
1244
1245   dirname = g_path_get_dirname (local->filename);
1246   _g_local_file_info_get_parent_info (dirname, matcher, &parent_info);
1247   g_free (dirname);
1248
1249   info = _g_local_file_info_get (basename, local->filename,
1250                                  matcher, flags, &parent_info,
1251                                  error);
1252
1253
1254   _g_local_file_info_free_parent_info (&parent_info);
1255   g_free (basename);
1256
1257   g_file_attribute_matcher_unref (matcher);
1258
1259   return info;
1260 }
1261
1262 static GFileAttributeInfoList *
1263 g_local_file_query_settable_attributes (GFile         *file,
1264                                         GCancellable  *cancellable,
1265                                         GError       **error)
1266 {
1267   return g_file_attribute_info_list_ref (local_writable_attributes);
1268 }
1269
1270 static GFileAttributeInfoList *
1271 g_local_file_query_writable_namespaces (GFile         *file,
1272                                         GCancellable  *cancellable,
1273                                         GError       **error)
1274 {
1275   GFileAttributeInfoList *list;
1276   GVfsClass *class;
1277   GVfs *vfs;
1278
1279   if (g_once_init_enter_pointer (&local_writable_namespaces))
1280     {
1281       /* Writable namespaces: */
1282
1283       list = g_file_attribute_info_list_new ();
1284
1285 #ifdef HAVE_XATTR
1286       g_file_attribute_info_list_add (list,
1287                                       "xattr",
1288                                       G_FILE_ATTRIBUTE_TYPE_STRING,
1289                                       G_FILE_ATTRIBUTE_INFO_COPY_WITH_FILE |
1290                                       G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
1291       g_file_attribute_info_list_add (list,
1292                                       "xattr-sys",
1293                                       G_FILE_ATTRIBUTE_TYPE_STRING,
1294                                       G_FILE_ATTRIBUTE_INFO_COPY_WHEN_MOVED);
1295 #endif
1296
1297       vfs = g_vfs_get_default ();
1298       class = G_VFS_GET_CLASS (vfs);
1299       if (class->add_writable_namespaces)
1300         class->add_writable_namespaces (vfs, list);
1301
1302       g_once_init_leave_pointer (&local_writable_namespaces, list);
1303     }
1304   list = (GFileAttributeInfoList *)local_writable_namespaces;
1305
1306   return g_file_attribute_info_list_ref (list);
1307 }
1308
1309 static gboolean
1310 g_local_file_set_attribute (GFile                *file,
1311                             const char           *attribute,
1312                             GFileAttributeType    type,
1313                             gpointer              value_p,
1314                             GFileQueryInfoFlags   flags,
1315                             GCancellable         *cancellable,
1316                             GError              **error)
1317 {
1318   GLocalFile *local = G_LOCAL_FILE (file);
1319
1320   return _g_local_file_info_set_attribute (local->filename,
1321                                            attribute,
1322                                            type,
1323                                            value_p,
1324                                            flags,
1325                                            cancellable,
1326                                            error);
1327 }
1328
1329 static gboolean
1330 g_local_file_set_attributes_from_info (GFile                *file,
1331                                        GFileInfo            *info,
1332                                        GFileQueryInfoFlags   flags,
1333                                        GCancellable         *cancellable,
1334                                        GError              **error)
1335 {
1336   GLocalFile *local = G_LOCAL_FILE (file);
1337   int res, chained_res;
1338   GFileIface *default_iface;
1339
1340   res = _g_local_file_info_set_attributes (local->filename,
1341                                            info, flags,
1342                                            cancellable,
1343                                            error);
1344
1345   if (!res)
1346     error = NULL; /* Don't write over error if further errors */
1347
1348   default_iface = g_type_default_interface_peek (G_TYPE_FILE);
1349
1350   chained_res = (default_iface->set_attributes_from_info) (file, info, flags, cancellable, error);
1351
1352   return res && chained_res;
1353 }
1354
1355 static GFileInputStream *
1356 g_local_file_read (GFile         *file,
1357                    GCancellable  *cancellable,
1358                    GError       **error)
1359 {
1360   GLocalFile *local = G_LOCAL_FILE (file);
1361   int fd, ret;
1362   GLocalFileStat buf;
1363
1364   fd = g_open (local->filename, O_RDONLY | O_BINARY | O_CLOEXEC, 0);
1365   if (fd == -1)
1366     {
1367       int errsv = errno;
1368
1369 #ifdef G_OS_WIN32
1370       if (errsv == EACCES)
1371         {
1372           /* Exploit the fact that on W32 the glib filename encoding is UTF8 */
1373           ret = GLIB_PRIVATE_CALL (g_win32_stat_utf8) (local->filename, &buf);
1374           if (ret == 0 && S_ISDIR (buf.st_mode))
1375             errsv = EISDIR;
1376         }
1377 #endif
1378       g_set_io_error (error,
1379                       _("Error opening file %s: %s"),
1380                       file, errsv);
1381       return NULL;
1382     }
1383
1384   ret = g_local_file_fstat (fd, G_LOCAL_FILE_STAT_FIELD_TYPE, G_LOCAL_FILE_STAT_FIELD_ALL, &buf);
1385
1386   if (ret == 0 && S_ISDIR (_g_stat_mode (&buf)))
1387     {
1388       (void) g_close (fd, NULL);
1389       g_set_io_error (error,
1390                       _("Error opening file %s: %s"),
1391                       file, EISDIR);
1392       return NULL;
1393     }
1394
1395   return _g_local_file_input_stream_new (fd);
1396 }
1397
1398 static GFileOutputStream *
1399 g_local_file_append_to (GFile             *file,
1400                         GFileCreateFlags   flags,
1401                         GCancellable      *cancellable,
1402                         GError           **error)
1403 {
1404   return _g_local_file_output_stream_append (G_LOCAL_FILE (file)->filename,
1405                                              flags, cancellable, error);
1406 }
1407
1408 static GFileOutputStream *
1409 g_local_file_create (GFile             *file,
1410                      GFileCreateFlags   flags,
1411                      GCancellable      *cancellable,
1412                      GError           **error)
1413 {
1414   return _g_local_file_output_stream_create (G_LOCAL_FILE (file)->filename,
1415                                              FALSE, flags, NULL,
1416                                              cancellable, error);
1417 }
1418
1419 static GFileOutputStream *
1420 g_local_file_replace (GFile             *file,
1421                       const char        *etag,
1422                       gboolean           make_backup,
1423                       GFileCreateFlags   flags,
1424                       GCancellable      *cancellable,
1425                       GError           **error)
1426 {
1427   return _g_local_file_output_stream_replace (G_LOCAL_FILE (file)->filename,
1428                                               FALSE,
1429                                               etag, make_backup, flags, NULL,
1430                                               cancellable, error);
1431 }
1432
1433 static GFileIOStream *
1434 g_local_file_open_readwrite (GFile                      *file,
1435                              GCancellable               *cancellable,
1436                              GError                    **error)
1437 {
1438   GFileOutputStream *output;
1439   GFileIOStream *res;
1440
1441   output = _g_local_file_output_stream_open (G_LOCAL_FILE (file)->filename,
1442                                              TRUE,
1443                                              cancellable, error);
1444   if (output == NULL)
1445     return NULL;
1446
1447   res = _g_local_file_io_stream_new (G_LOCAL_FILE_OUTPUT_STREAM (output));
1448   g_object_unref (output);
1449   return res;
1450 }
1451
1452 static GFileIOStream *
1453 g_local_file_create_readwrite (GFile                      *file,
1454                                GFileCreateFlags            flags,
1455                                GCancellable               *cancellable,
1456                                GError                    **error)
1457 {
1458   GFileOutputStream *output;
1459   GFileIOStream *res;
1460
1461   output = _g_local_file_output_stream_create (G_LOCAL_FILE (file)->filename,
1462                                                TRUE, flags, NULL,
1463                                                cancellable, error);
1464   if (output == NULL)
1465     return NULL;
1466
1467   res = _g_local_file_io_stream_new (G_LOCAL_FILE_OUTPUT_STREAM (output));
1468   g_object_unref (output);
1469   return res;
1470 }
1471
1472 static GFileIOStream *
1473 g_local_file_replace_readwrite (GFile                      *file,
1474                                 const char                 *etag,
1475                                 gboolean                    make_backup,
1476                                 GFileCreateFlags            flags,
1477                                 GCancellable               *cancellable,
1478                                 GError                    **error)
1479 {
1480   GFileOutputStream *output;
1481   GFileIOStream *res;
1482
1483   output = _g_local_file_output_stream_replace (G_LOCAL_FILE (file)->filename,
1484                                                 TRUE,
1485                                                 etag, make_backup, flags, NULL,
1486                                                 cancellable, error);
1487   if (output == NULL)
1488     return NULL;
1489
1490   res = _g_local_file_io_stream_new (G_LOCAL_FILE_OUTPUT_STREAM (output));
1491   g_object_unref (output);
1492   return res;
1493 }
1494
1495 static gboolean
1496 g_local_file_delete (GFile         *file,
1497                      GCancellable  *cancellable,
1498                      GError       **error)
1499 {
1500   GLocalFile *local = G_LOCAL_FILE (file);
1501   GVfsClass *class;
1502   GVfs *vfs;
1503
1504   if (g_remove (local->filename) == -1)
1505     {
1506       int errsv = errno;
1507
1508       /* Posix allows EEXIST too, but the clearer error
1509          is G_IO_ERROR_NOT_FOUND, and it's what nautilus
1510          expects */
1511       if (errsv == EEXIST)
1512         errsv = ENOTEMPTY;
1513
1514       g_set_io_error (error,
1515                       _("Error removing file %s: %s"),
1516                       file, errsv);
1517       return FALSE;
1518     }
1519
1520   vfs = g_vfs_get_default ();
1521   class = G_VFS_GET_CLASS (vfs);
1522   if (class->local_file_removed)
1523     class->local_file_removed (vfs, local->filename);
1524
1525   return TRUE;
1526 }
1527
1528 #ifndef G_OS_WIN32
1529
1530 static char *
1531 strip_trailing_slashes (const char *path)
1532 {
1533   char *path_copy;
1534   int len;
1535
1536   path_copy = g_strdup (path);
1537   len = strlen (path_copy);
1538   while (len > 1 && path_copy[len-1] == '/')
1539     path_copy[--len] = 0;
1540
1541   return path_copy;
1542  }
1543
1544 static char *
1545 expand_symlink (const char *link)
1546 {
1547   char *resolved, *canonical, *parent, *link2;
1548   char symlink_value[4096];
1549 #ifdef G_OS_WIN32
1550 #else
1551   gssize res;
1552 #endif
1553
1554 #ifdef G_OS_WIN32
1555 #else
1556   res = readlink (link, symlink_value, sizeof (symlink_value) - 1);
1557
1558   if (res == -1)
1559     return g_strdup (link);
1560   symlink_value[res] = 0;
1561 #endif
1562
1563   if (g_path_is_absolute (symlink_value))
1564     return g_canonicalize_filename (symlink_value, NULL);
1565   else
1566     {
1567       link2 = strip_trailing_slashes (link);
1568       parent = g_path_get_dirname (link2);
1569       g_free (link2);
1570
1571       resolved = g_build_filename (parent, symlink_value, NULL);
1572       g_free (parent);
1573
1574       canonical = g_canonicalize_filename (resolved, NULL);
1575
1576       g_free (resolved);
1577
1578       return canonical;
1579     }
1580 }
1581
1582 static char *
1583 expand_symlinks (const char *path,
1584                  dev_t      *dev)
1585 {
1586   char *tmp, *target;
1587   GStatBuf target_stat;
1588   int num_recursions;
1589
1590   target = g_strdup (path);
1591
1592   num_recursions = 0;
1593   do
1594     {
1595       if (g_lstat (target, &target_stat) != 0)
1596         {
1597           g_free (target);
1598           return NULL;
1599         }
1600
1601       if (S_ISLNK (target_stat.st_mode))
1602         {
1603           tmp = target;
1604           target = expand_symlink (target);
1605           g_free (tmp);
1606         }
1607
1608       num_recursions++;
1609
1610 #ifdef MAXSYMLINKS
1611       if (num_recursions > MAXSYMLINKS)
1612 #else
1613       /* 40 is used in kernel sources currently:
1614        * https://github.com/torvalds/linux/include/linux/namei.h
1615        */
1616       if (num_recursions > 40)
1617 #endif
1618         {
1619           g_free (target);
1620           return NULL;
1621         }
1622     }
1623   while (S_ISLNK (target_stat.st_mode));
1624
1625   if (dev)
1626     *dev = target_stat.st_dev;
1627
1628   return target;
1629 }
1630
1631 static char *
1632 get_parent (const char *path,
1633             dev_t      *parent_dev)
1634 {
1635   char *parent, *res;
1636   char *path_copy;
1637
1638   path_copy = strip_trailing_slashes (path);
1639
1640   parent = g_path_get_dirname (path_copy);
1641   if (strcmp (parent, ".") == 0)
1642     {
1643       g_free (parent);
1644       g_free (path_copy);
1645       return NULL;
1646     }
1647   g_free (path_copy);
1648
1649   res = expand_symlinks (parent, parent_dev);
1650   g_free (parent);
1651
1652   return res;
1653 }
1654
1655 static char *
1656 expand_all_symlinks (const char *path)
1657 {
1658   char *parent, *parent_expanded;
1659   char *basename, *res;
1660   dev_t parent_dev;
1661
1662   parent = get_parent (path, &parent_dev);
1663   if (parent == NULL)
1664     return NULL;
1665
1666   if (g_strcmp0 (parent, "/") != 0)
1667     {
1668       parent_expanded = expand_all_symlinks (parent);
1669       basename = g_path_get_basename (path);
1670       res = g_build_filename (parent_expanded, basename, NULL);
1671       g_free (basename);
1672       g_free (parent_expanded);
1673     }
1674   else
1675     res = g_strdup (path);
1676
1677   g_free (parent);
1678
1679   return res;
1680 }
1681
1682 static char *
1683 find_mountpoint_for (const char *file,
1684                      dev_t       dev,
1685                      gboolean    resolve_basename_symlink)
1686 {
1687   char *dir, *parent;
1688   dev_t dir_dev, parent_dev;
1689
1690   if (resolve_basename_symlink)
1691     {
1692       dir = expand_symlinks (file, NULL);
1693       if (dir == NULL)
1694         return NULL;
1695     }
1696   else
1697     dir = g_strdup (file);
1698
1699   dir_dev = dev;
1700
1701   while (g_strcmp0 (dir, "/") != 0)
1702     {
1703       parent = get_parent (dir, &parent_dev);
1704       if (parent == NULL)
1705         {
1706           g_free (dir);
1707           return NULL;
1708         }
1709
1710       if (parent_dev != dir_dev)
1711         {
1712           g_free (parent);
1713           return dir;
1714         }
1715
1716       g_free (dir);
1717       dir = parent;
1718     }
1719
1720   return dir;
1721 }
1722
1723 char *
1724 _g_local_file_find_topdir_for (const char *file)
1725 {
1726   char *dir;
1727   char *mountpoint = NULL;
1728   dev_t dir_dev;
1729
1730   dir = get_parent (file, &dir_dev);
1731   if (dir == NULL)
1732     return NULL;
1733
1734   mountpoint = find_mountpoint_for (dir, dir_dev, TRUE);
1735   g_free (dir);
1736
1737   return mountpoint;
1738 }
1739
1740 static char *
1741 get_unique_filename (const char *basename,
1742                      int         id)
1743 {
1744   const char *dot;
1745
1746   if (id == 1)
1747     return g_strdup (basename);
1748
1749   dot = strchr (basename, '.');
1750   if (dot)
1751     return g_strdup_printf ("%.*s.%d%s", (int)(dot - basename), basename, id, dot);
1752   else
1753     return g_strdup_printf ("%s.%d", basename, id);
1754 }
1755
1756 static gboolean
1757 path_has_prefix (const char *path,
1758                  const char *prefix)
1759 {
1760   int prefix_len;
1761
1762   if (prefix == NULL)
1763     return TRUE;
1764
1765   prefix_len = strlen (prefix);
1766
1767   if (strncmp (path, prefix, prefix_len) == 0 &&
1768       (prefix_len == 0 || /* empty prefix always matches */
1769        prefix[prefix_len - 1] == '/' || /* last char in prefix was a /, so it must be in path too */
1770        path[prefix_len] == 0 ||
1771        path[prefix_len] == '/'))
1772     return TRUE;
1773
1774   return FALSE;
1775 }
1776
1777 static char *
1778 try_make_relative (const char *path,
1779                    const char *base)
1780 {
1781   char *path2, *base2;
1782   char *relative;
1783
1784   path2 = expand_all_symlinks (path);
1785   base2 = expand_all_symlinks (base);
1786
1787   relative = NULL;
1788   if (path2 != NULL && base2 != NULL && path_has_prefix (path2, base2))
1789     {
1790       relative = path2 + strlen (base2);
1791       while (*relative == '/')
1792         relative ++;
1793       relative = g_strdup (relative);
1794     }
1795   g_free (path2);
1796   g_free (base2);
1797
1798   if (relative)
1799     return relative;
1800
1801   /* Failed, use abs path */
1802   return g_strdup (path);
1803 }
1804
1805 static gboolean
1806 ignore_trash_mount (GUnixMountEntry *mount)
1807 {
1808   GUnixMountPoint *mount_point = NULL;
1809   const gchar *mount_options;
1810   gboolean retval = TRUE;
1811
1812   if (g_unix_mount_is_system_internal (mount))
1813     return TRUE;
1814
1815   mount_options = g_unix_mount_get_options (mount);
1816   if (mount_options == NULL)
1817     {
1818       mount_point = g_unix_mount_point_at (g_unix_mount_get_mount_path (mount),
1819                                            NULL);
1820       if (mount_point != NULL)
1821         mount_options = g_unix_mount_point_get_options (mount_point);
1822     }
1823
1824   if (mount_options == NULL ||
1825       strstr (mount_options, "x-gvfs-notrash") == NULL)
1826     retval = FALSE;
1827
1828   g_clear_pointer (&mount_point, g_unix_mount_point_free);
1829
1830   return retval;
1831 }
1832
1833 static gboolean
1834 ignore_trash_path (const gchar *topdir)
1835 {
1836   GUnixMountEntry *mount;
1837   gboolean retval = TRUE;
1838
1839   mount = g_unix_mount_at (topdir, NULL);
1840   if (mount == NULL)
1841     goto out;
1842
1843   retval = ignore_trash_mount (mount);
1844
1845  out:
1846   g_clear_pointer (&mount, g_unix_mount_free);
1847
1848   return retval;
1849 }
1850
1851 gboolean
1852 _g_local_file_has_trash_dir (const char *dirname, dev_t dir_dev)
1853 {
1854   static gsize home_dev_set = 0;
1855   static dev_t home_dev;
1856   static gboolean home_dev_valid = FALSE;
1857   char *topdir, *globaldir, *trashdir, *tmpname;
1858   uid_t uid;
1859   char uid_str[32];
1860   GStatBuf global_stat, trash_stat;
1861   gboolean res;
1862
1863   if (g_once_init_enter (&home_dev_set))
1864     {
1865       GStatBuf home_stat;
1866
1867       if (g_stat (g_get_home_dir (), &home_stat) == 0)
1868         {
1869           home_dev = home_stat.st_dev;
1870           home_dev_valid = TRUE;
1871         }
1872       else
1873         {
1874           home_dev_valid = FALSE;
1875         }
1876
1877       g_once_init_leave (&home_dev_set, 1);
1878     }
1879
1880   /* Assume we can trash to the home */
1881   if (!home_dev_valid)
1882     return FALSE;
1883   else if (dir_dev == home_dev)
1884     return TRUE;
1885
1886   topdir = find_mountpoint_for (dirname, dir_dev, TRUE);
1887   if (topdir == NULL)
1888     return FALSE;
1889
1890   if (ignore_trash_path (topdir))
1891     {
1892       g_free (topdir);
1893
1894       return FALSE;
1895     }
1896
1897   globaldir = g_build_filename (topdir, ".Trash", NULL);
1898   if (g_lstat (globaldir, &global_stat) == 0 &&
1899       S_ISDIR (global_stat.st_mode) &&
1900       (global_stat.st_mode & S_ISVTX) != 0)
1901     {
1902       /* got a toplevel sysadmin created dir, assume we
1903        * can trash to it (we should be able to create a dir)
1904        * This fails for the FAT case where the ownership of
1905        * that dir would be wrong though..
1906        */
1907       g_free (globaldir);
1908       g_free (topdir);
1909       return TRUE;
1910     }
1911   g_free (globaldir);
1912
1913   /* No global trash dir, or it failed the tests, fall back to $topdir/.Trash-$uid */
1914   uid = geteuid ();
1915   g_snprintf (uid_str, sizeof (uid_str), "%lu", (unsigned long) uid);
1916
1917   tmpname = g_strdup_printf (".Trash-%s", uid_str);
1918   trashdir = g_build_filename (topdir, tmpname, NULL);
1919   g_free (tmpname);
1920
1921   if (g_lstat (trashdir, &trash_stat) == 0)
1922     {
1923       g_free (topdir);
1924       g_free (trashdir);
1925       return S_ISDIR (trash_stat.st_mode) &&
1926              trash_stat.st_uid == uid;
1927     }
1928   g_free (trashdir);
1929
1930   /* User specific trash didn't exist, can we create it? */
1931   res = g_access (topdir, W_OK) == 0;
1932   g_free (topdir);
1933
1934   return res;
1935 }
1936
1937 #ifndef G_OS_WIN32
1938 gboolean
1939 _g_local_file_is_lost_found_dir (const char *path, dev_t path_dev)
1940 {
1941   gboolean ret = FALSE;
1942   gchar *mount_dir = NULL;
1943   size_t mount_dir_len;
1944   GStatBuf statbuf;
1945
1946   if (!g_str_has_suffix (path, "/lost+found"))
1947     goto out;
1948
1949   mount_dir = find_mountpoint_for (path, path_dev, FALSE);
1950   if (mount_dir == NULL)
1951     goto out;
1952
1953   mount_dir_len = strlen (mount_dir);
1954   /* We special-case rootfs ('/') since it's the only case where
1955    * mount_dir ends in '/'
1956    */
1957   if (mount_dir_len == 1)
1958     mount_dir_len--;
1959   if (mount_dir_len + strlen ("/lost+found") != strlen (path))
1960     goto out;
1961
1962   if (g_lstat (path, &statbuf) != 0)
1963     goto out;
1964
1965   if (!(S_ISDIR (statbuf.st_mode) &&
1966         statbuf.st_uid == 0 &&
1967         statbuf.st_gid == 0))
1968     goto out;
1969
1970   ret = TRUE;
1971
1972  out:
1973   g_free (mount_dir);
1974   return ret;
1975 }
1976 #endif
1977
1978 static gboolean
1979 g_local_file_trash (GFile         *file,
1980                     GCancellable  *cancellable,
1981                     GError       **error)
1982 {
1983   GLocalFile *local = G_LOCAL_FILE (file);
1984   GStatBuf file_stat, home_stat;
1985   const char *homedir;
1986   char *trashdir, *topdir, *infodir, *filesdir;
1987   char *basename, *trashname, *trashfile, *infoname, *infofile;
1988   char *original_name, *original_name_escaped;
1989   int i;
1990   char *data;
1991   char *path;
1992   gboolean is_homedir_trash;
1993   char *delete_time = NULL;
1994   int fd;
1995   GStatBuf trash_stat, global_stat;
1996   char *dirname, *globaldir;
1997   GVfsClass *class;
1998   GVfs *vfs;
1999   int errsv;
2000
2001   if (glib_should_use_portal ())
2002     return g_trash_portal_trash_file (file, error);
2003
2004   if (g_lstat (local->filename, &file_stat) != 0)
2005     {
2006       errsv = errno;
2007
2008       g_set_io_error (error,
2009                       _("Error trashing file %s: %s"),
2010                       file, errsv);
2011       return FALSE;
2012     }
2013
2014   homedir = g_get_home_dir ();
2015   if (g_stat (homedir, &home_stat) != 0)
2016     {
2017       errsv = errno;
2018
2019       g_set_io_error (error,
2020                       _("Error trashing file %s: %s"),
2021                       file, errsv);
2022       return FALSE;
2023     }
2024
2025   is_homedir_trash = FALSE;
2026   trashdir = NULL;
2027
2028   /* On overlayfs, a file's st_dev will be different to the home directory's.
2029    * We still want to create our trash directory under the home directory, so
2030    * instead we should stat the directory that the file we're deleting is in as
2031    * this will have the same st_dev.
2032    */
2033   if (!S_ISDIR (file_stat.st_mode))
2034     {
2035       path = g_path_get_dirname (local->filename);
2036       /* If the parent is a symlink to a different device then it might have
2037        * st_dev equal to the home directory's, in which case we will end up
2038        * trying to rename across a filesystem boundary, which doesn't work. So
2039        * we use g_stat here instead of g_lstat, to know where the symlink
2040        * points to. */
2041       if (g_stat (path, &file_stat))
2042         {
2043           errsv = errno;
2044           g_free (path);
2045
2046           g_set_io_error (error,
2047                           _("Error trashing file %s: %s"),
2048                           file, errsv);
2049           return FALSE;
2050         }
2051       g_free (path);
2052     }
2053
2054   if (file_stat.st_dev == home_stat.st_dev)
2055     {
2056       is_homedir_trash = TRUE;
2057       errno = 0;
2058       trashdir = g_build_filename (g_get_user_data_dir (), "Trash", NULL);
2059       if (g_mkdir_with_parents (trashdir, 0700) < 0)
2060         {
2061           char *display_name;
2062           errsv = errno;
2063
2064           display_name = g_filename_display_name (trashdir);
2065           g_set_error (error, G_IO_ERROR,
2066                        g_io_error_from_errno (errsv),
2067                        _("Unable to create trash directory %s: %s"),
2068                        display_name, g_strerror (errsv));
2069           g_free (display_name);
2070           g_free (trashdir);
2071           return FALSE;
2072         }
2073       topdir = g_strdup (g_get_user_data_dir ());
2074     }
2075   else
2076     {
2077       uid_t uid;
2078       char uid_str[32];
2079       gboolean success = FALSE;
2080
2081       uid = geteuid ();
2082       g_snprintf (uid_str, sizeof (uid_str), "%lu", (unsigned long)uid);
2083
2084       topdir = _g_local_file_find_topdir_for (local->filename);
2085       if (topdir == NULL)
2086         {
2087           g_set_io_error (error,
2088                           _("Unable to find toplevel directory to trash %s"),
2089                           file, ENOTSUP);
2090           return FALSE;
2091         }
2092
2093       if (ignore_trash_path (topdir))
2094         {
2095           g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED,
2096                        _("Trashing on system internal mounts is not supported"));
2097           g_free (topdir);
2098
2099           return FALSE;
2100         }
2101
2102       /* Try looking for global trash dir $topdir/.Trash/$uid */
2103       globaldir = g_build_filename (topdir, ".Trash", NULL);
2104       if (g_lstat (globaldir, &global_stat) == 0 &&
2105           S_ISDIR (global_stat.st_mode) &&
2106           (global_stat.st_mode & S_ISVTX) != 0)
2107         {
2108           trashdir = g_build_filename (globaldir, uid_str, NULL);
2109           success = TRUE;
2110
2111           if (g_lstat (trashdir, &trash_stat) == 0)
2112             {
2113               if (!S_ISDIR (trash_stat.st_mode) ||
2114                   trash_stat.st_uid != uid)
2115                 {
2116                   /* Not a directory or not owned by user, ignore */
2117                   g_free (trashdir);
2118                   trashdir = NULL;
2119                   success = FALSE;
2120                 }
2121             }
2122           else if (g_mkdir (trashdir, 0700) == -1)
2123             {
2124               g_free (trashdir);
2125               trashdir = NULL;
2126               success = FALSE;
2127             }
2128         }
2129       g_free (globaldir);
2130
2131       if (trashdir == NULL)
2132         {
2133           gboolean tried_create;
2134
2135           /* No global trash dir, or it failed the tests, fall back to $topdir/.Trash-$uid */
2136           dirname = g_strdup_printf (".Trash-%s", uid_str);
2137           trashdir = g_build_filename (topdir, dirname, NULL);
2138           success = TRUE;
2139           g_free (dirname);
2140
2141           tried_create = FALSE;
2142
2143         retry:
2144           if (g_lstat (trashdir, &trash_stat) == 0)
2145             {
2146               if (!S_ISDIR (trash_stat.st_mode) ||
2147                   trash_stat.st_uid != uid)
2148                 {
2149                   /* Remove the failed directory */
2150                   if (tried_create)
2151                     g_remove (trashdir);
2152
2153                   /* Not a directory or not owned by user, ignore */
2154                   success = FALSE;
2155                 }
2156             }
2157           else
2158             {
2159               if (!tried_create &&
2160                   g_mkdir (trashdir, 0700) != -1)
2161                 {
2162                   /* Ensure that the created dir has the right uid etc.
2163                      This might fail on e.g. a FAT dir */
2164                   tried_create = TRUE;
2165                   goto retry;
2166                 }
2167               else
2168                 {
2169                   success = FALSE;
2170                 }
2171             }
2172         }
2173
2174       if (!success)
2175         {
2176           gchar *trashdir_display_name = NULL, *file_display_name = NULL;
2177
2178           trashdir_display_name = g_filename_display_name (trashdir);
2179           file_display_name = g_filename_display_name (local->filename);
2180           g_set_error (error, G_IO_ERROR,
2181                        G_IO_ERROR_NOT_SUPPORTED,
2182                        _("Unable to find or create trash directory %s to trash %s"),
2183                        trashdir_display_name, file_display_name);
2184
2185           g_free (trashdir_display_name);
2186           g_free (file_display_name);
2187
2188           g_free (topdir);
2189           g_free (trashdir);
2190
2191           return FALSE;
2192         }
2193     }
2194
2195   /* Trashdir points to the trash dir with the "info" and "files" subdirectories */
2196
2197   infodir = g_build_filename (trashdir, "info", NULL);
2198   filesdir = g_build_filename (trashdir, "files", NULL);
2199
2200   /* Make sure we have the subdirectories */
2201   if ((g_mkdir (infodir, 0700) == -1 && errno != EEXIST) ||
2202       (g_mkdir (filesdir, 0700) == -1 && errno != EEXIST))
2203     {
2204       gchar *trashdir_display_name = NULL, *file_display_name = NULL;
2205
2206       trashdir_display_name = g_filename_display_name (trashdir);
2207       file_display_name = g_filename_display_name (local->filename);
2208       g_set_error (error, G_IO_ERROR,
2209                    G_IO_ERROR_NOT_SUPPORTED,
2210                    _("Unable to find or create trash directory %s to trash %s"),
2211                    trashdir_display_name, file_display_name);
2212
2213       g_free (trashdir_display_name);
2214       g_free (file_display_name);
2215
2216       g_free (topdir);
2217       g_free (trashdir);
2218       g_free (infodir);
2219       g_free (filesdir);
2220
2221       return FALSE;
2222     }
2223
2224   g_free (trashdir);
2225
2226   basename = g_path_get_basename (local->filename);
2227   i = 1;
2228   trashname = NULL;
2229   infofile = NULL;
2230   do {
2231     g_free (trashname);
2232     g_free (infofile);
2233
2234     trashname = get_unique_filename (basename, i++);
2235     infoname = g_strconcat (trashname, ".trashinfo", NULL);
2236     infofile = g_build_filename (infodir, infoname, NULL);
2237     g_free (infoname);
2238
2239     fd = g_open (infofile, O_CREAT | O_EXCL | O_CLOEXEC, 0666);
2240     errsv = errno;
2241   } while (fd == -1 && errsv == EEXIST);
2242
2243   g_free (basename);
2244   g_free (infodir);
2245
2246   if (fd == -1)
2247     {
2248       g_free (filesdir);
2249       g_free (topdir);
2250       g_free (trashname);
2251       g_free (infofile);
2252
2253       g_set_io_error (error,
2254                       _("Unable to create trashing info file for %s: %s"),
2255                       file, errsv);
2256       return FALSE;
2257     }
2258
2259   (void) g_close (fd, NULL);
2260
2261   /* Write the full content of the info file before trashing to make
2262    * sure someone doesn't read an empty file.  See #749314
2263    */
2264
2265   /* Use absolute names for homedir */
2266   if (is_homedir_trash)
2267     original_name = g_strdup (local->filename);
2268   else
2269     original_name = try_make_relative (local->filename, topdir);
2270   original_name_escaped = g_uri_escape_string (original_name, "/", FALSE);
2271
2272   g_free (original_name);
2273   g_free (topdir);
2274
2275   {
2276     GDateTime *now = g_date_time_new_now_local ();
2277     if (now != NULL)
2278       delete_time = g_date_time_format (now, "%Y-%m-%dT%H:%M:%S");
2279     else
2280       delete_time = g_strdup ("9999-12-31T23:59:59");
2281     g_date_time_unref (now);
2282   }
2283
2284   data = g_strdup_printf ("[Trash Info]\nPath=%s\nDeletionDate=%s\n",
2285                           original_name_escaped, delete_time);
2286   g_free (delete_time);
2287   g_clear_pointer (&original_name_escaped, g_free);
2288
2289   if (!g_file_set_contents_full (infofile, data, -1,
2290                             G_FILE_SET_CONTENTS_CONSISTENT | G_FILE_SET_CONTENTS_ONLY_EXISTING,
2291                             0600, error))
2292     {
2293       g_unlink (infofile);
2294
2295       g_free (data);
2296       g_free (filesdir);
2297       g_free (trashname);
2298       g_free (infofile);
2299
2300       return FALSE;
2301     }
2302
2303   g_clear_pointer (&data, g_free);
2304
2305   /* TODO: Maybe we should verify that you can delete the file from the trash
2306    * before moving it? OTOH, that is hard, as it needs a recursive scan
2307    */
2308
2309   trashfile = g_build_filename (filesdir, trashname, NULL);
2310
2311   g_free (filesdir);
2312
2313   if (g_rename (local->filename, trashfile) == -1)
2314     {
2315       errsv = errno;
2316
2317       g_unlink (infofile);
2318
2319       g_free (trashname);
2320       g_free (infofile);
2321       g_free (trashfile);
2322
2323       if (errsv == EXDEV)
2324         /* The trash dir was actually on another fs anyway!?
2325          * This can happen when the same device is mounted multiple
2326          * times, or with bind mounts of the same fs.
2327          */
2328         g_set_io_error (error,
2329                         _("Unable to trash file %s across filesystem boundaries"),
2330                         file, ENOTSUP);
2331       else
2332         g_set_io_error (error,
2333                         _("Unable to trash file %s: %s"),
2334                         file, errsv);
2335       return FALSE;
2336     }
2337
2338   vfs = g_vfs_get_default ();
2339   class = G_VFS_GET_CLASS (vfs);
2340   if (class->local_file_moved)
2341     class->local_file_moved (vfs, local->filename, trashfile);
2342
2343   g_free (trashfile);
2344
2345   /* TODO: Do we need to update mtime/atime here after the move? */
2346
2347   g_free (infofile);
2348   g_free (trashname);
2349
2350   return TRUE;
2351 }
2352 #else /* G_OS_WIN32 */
2353 gboolean
2354 _g_local_file_has_trash_dir (const char *dirname, dev_t dir_dev)
2355 {
2356   return FALSE;                 /* XXX ??? */
2357 }
2358
2359 static gboolean
2360 g_local_file_trash (GFile         *file,
2361                     GCancellable  *cancellable,
2362                     GError       **error)
2363 {
2364   GLocalFile *local = G_LOCAL_FILE (file);
2365   SHFILEOPSTRUCTW op = {0};
2366   gboolean success;
2367   wchar_t *wfilename;
2368   long len;
2369
2370   wfilename = g_utf8_to_utf16 (local->filename, -1, NULL, &len, NULL);
2371   /* SHFILEOPSTRUCT.pFrom is double-zero-terminated */
2372   wfilename = g_renew (wchar_t, wfilename, len + 2);
2373   wfilename[len + 1] = 0;
2374
2375   op.wFunc = FO_DELETE;
2376   op.pFrom = wfilename;
2377   op.fFlags = FOF_ALLOWUNDO;
2378
2379   success = SHFileOperationW (&op) == 0;
2380
2381   if (success && op.fAnyOperationsAborted)
2382     {
2383       if (cancellable && !g_cancellable_is_cancelled (cancellable))
2384         g_cancellable_cancel (cancellable);
2385       g_set_io_error (error,
2386                       _("Unable to trash file %s: %s"),
2387                       file, ECANCELED);
2388       success = FALSE;
2389     }
2390   else if (!success)
2391     g_set_io_error (error,
2392                     _("Unable to trash file %s"),
2393                     file, 0);
2394
2395   g_free (wfilename);
2396   return success;
2397 }
2398 #endif /* G_OS_WIN32 */
2399
2400 static gboolean
2401 g_local_file_make_directory (GFile         *file,
2402                              GCancellable  *cancellable,
2403                              GError       **error)
2404 {
2405   GLocalFile *local = G_LOCAL_FILE (file);
2406
2407   if (g_mkdir (local->filename, 0777) == -1)
2408     {
2409       int errsv = errno;
2410
2411       if (errsv == EINVAL)
2412         /* This must be an invalid filename, on e.g. FAT */
2413         g_set_error_literal (error, G_IO_ERROR,
2414                              G_IO_ERROR_INVALID_FILENAME,
2415                              _("Invalid filename"));
2416       else
2417         g_set_io_error (error,
2418                         _("Error creating directory %s: %s"),
2419                         file, errsv);
2420       return FALSE;
2421     }
2422
2423   return TRUE;
2424 }
2425
2426 #ifdef HAVE_SYMLINK
2427 static gboolean
2428 g_local_file_make_symbolic_link (GFile         *file,
2429                                  const char    *symlink_value,
2430                                  GCancellable  *cancellable,
2431                                  GError       **error)
2432 {
2433   GLocalFile *local = G_LOCAL_FILE (file);
2434
2435   if (symlink (symlink_value, local->filename) == -1)
2436     {
2437       int errsv = errno;
2438
2439       if (errsv == EINVAL)
2440         /* This must be an invalid filename, on e.g. FAT */
2441         g_set_error_literal (error, G_IO_ERROR,
2442                              G_IO_ERROR_INVALID_FILENAME,
2443                              _("Invalid filename"));
2444       else if (errsv == EPERM)
2445         g_set_error (error, G_IO_ERROR,
2446                      G_IO_ERROR_NOT_SUPPORTED,
2447                      _("Filesystem does not support symbolic links"));
2448       else
2449         g_set_io_error (error,
2450                         _("Error making symbolic link %s: %s"),
2451                         file, errsv);
2452       return FALSE;
2453     }
2454   return TRUE;
2455 }
2456 #endif
2457
2458 static gboolean
2459 g_local_file_move (GFile                  *source,
2460                    GFile                  *destination,
2461                    GFileCopyFlags          flags,
2462                    GCancellable           *cancellable,
2463                    GFileProgressCallback   progress_callback,
2464                    gpointer                progress_callback_data,
2465                    GError                **error)
2466 {
2467   GLocalFile *local_source, *local_destination;
2468   GStatBuf statbuf;
2469   gboolean destination_exist, source_is_dir;
2470   char *backup_name;
2471   int res;
2472   off_t source_size;
2473   GVfsClass *class;
2474   GVfs *vfs;
2475
2476   if (!G_IS_LOCAL_FILE (source) ||
2477       !G_IS_LOCAL_FILE (destination))
2478     {
2479       /* Fall back to default move */
2480       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, "Move not supported");
2481       return FALSE;
2482     }
2483
2484   local_source = G_LOCAL_FILE (source);
2485   local_destination = G_LOCAL_FILE (destination);
2486
2487   res = g_lstat (local_source->filename, &statbuf);
2488   if (res == -1)
2489     {
2490       int errsv = errno;
2491
2492       g_set_io_error (error,
2493                       _("Error moving file %s: %s"),
2494                       source, errsv);
2495       return FALSE;
2496     }
2497
2498   source_is_dir = S_ISDIR (statbuf.st_mode);
2499   source_size = statbuf.st_size;
2500
2501   destination_exist = FALSE;
2502   res = g_lstat (local_destination->filename, &statbuf);
2503   if (res == 0)
2504     {
2505       destination_exist = TRUE; /* Target file exists */
2506
2507       if (flags & G_FILE_COPY_OVERWRITE)
2508         {
2509           /* Always fail on dirs, even with overwrite */
2510           if (S_ISDIR (statbuf.st_mode))
2511             {
2512               if (source_is_dir)
2513                 g_set_error_literal (error,
2514                                      G_IO_ERROR,
2515                                      G_IO_ERROR_WOULD_MERGE,
2516                                      _("Can’t move directory over directory"));
2517               else
2518                 g_set_error_literal (error,
2519                                      G_IO_ERROR,
2520                                      G_IO_ERROR_IS_DIRECTORY,
2521                                      _("Can’t copy over directory"));
2522               return FALSE;
2523             }
2524         }
2525       else
2526         {
2527           g_set_io_error (error,
2528                           _("Error moving file %s: %s"),
2529                           source, EEXIST);
2530           return FALSE;
2531         }
2532     }
2533
2534   if (flags & G_FILE_COPY_BACKUP && destination_exist)
2535     {
2536       backup_name = g_strconcat (local_destination->filename, "~", NULL);
2537       if (g_rename (local_destination->filename, backup_name) == -1)
2538         {
2539           g_set_error_literal (error,
2540                                G_IO_ERROR,
2541                                G_IO_ERROR_CANT_CREATE_BACKUP,
2542                                _("Backup file creation failed"));
2543           g_free (backup_name);
2544           return FALSE;
2545         }
2546       g_free (backup_name);
2547       destination_exist = FALSE; /* It did, but no more */
2548     }
2549
2550   if (source_is_dir && destination_exist && (flags & G_FILE_COPY_OVERWRITE))
2551     {
2552       /* Source is a dir, destination exists (and is not a dir, because that would have failed
2553          earlier), and we're overwriting. Manually remove the target so we can do the rename. */
2554       res = g_unlink (local_destination->filename);
2555       if (res == -1)
2556         {
2557           int errsv = errno;
2558
2559           g_set_error (error, G_IO_ERROR,
2560                        g_io_error_from_errno (errsv),
2561                        _("Error removing target file: %s"),
2562                        g_strerror (errsv));
2563           return FALSE;
2564         }
2565     }
2566
2567   if (g_rename (local_source->filename, local_destination->filename) == -1)
2568     {
2569       int errsv = errno;
2570
2571       if (errsv == EXDEV)
2572         /* This will cause the fallback code to run */
2573         g_set_error_literal (error, G_IO_ERROR,
2574                              G_IO_ERROR_NOT_SUPPORTED,
2575                              _("Move between mounts not supported"));
2576       else if (errsv == EINVAL)
2577         /* This must be an invalid filename, on e.g. FAT, or
2578            we're trying to move the file into itself...
2579            We return invalid filename for both... */
2580         g_set_error_literal (error, G_IO_ERROR,
2581                              G_IO_ERROR_INVALID_FILENAME,
2582                              _("Invalid filename"));
2583       else
2584         g_set_io_error (error,
2585                         _("Error moving file %s: %s"),
2586                         source, errsv);
2587       return FALSE;
2588     }
2589
2590   vfs = g_vfs_get_default ();
2591   class = G_VFS_GET_CLASS (vfs);
2592   if (class->local_file_moved)
2593     class->local_file_moved (vfs, local_source->filename, local_destination->filename);
2594
2595   /* Make sure we send full copied size */
2596   if (progress_callback)
2597     progress_callback (source_size, source_size, progress_callback_data);
2598
2599   return TRUE;
2600 }
2601
2602 #ifdef G_OS_WIN32
2603
2604 gboolean
2605 g_local_file_is_nfs_home (const gchar *filename)
2606 {
2607   return FALSE;
2608 }
2609
2610 #else
2611
2612 static gboolean
2613 is_remote_fs_type (const gchar *fsname)
2614 {
2615   if (fsname != NULL)
2616     {
2617       if (strcmp (fsname, "nfs") == 0)
2618         return TRUE;
2619       if (strcmp (fsname, "nfs4") == 0)
2620         return TRUE;
2621       if (strcmp (fsname, "cifs") == 0)
2622         return TRUE;
2623       if (strcmp (fsname, "smb") == 0)
2624         return TRUE;
2625       if (strcmp (fsname, "smb2") == 0)
2626         return TRUE;
2627       if (strcmp (fsname, "fuse.sshfs") == 0)
2628         return TRUE;
2629     }
2630
2631   return FALSE;
2632 }
2633
2634 gboolean
2635 g_local_file_is_nfs_home (const gchar *filename)
2636 {
2637   static gboolean remote_home = FALSE;
2638   static gsize initialized;
2639   const gchar *home;
2640
2641   home = g_get_home_dir ();
2642   if (path_has_prefix (filename, home))
2643     {
2644       if (g_once_init_enter (&initialized))
2645         {
2646           GFile *file;
2647           GFileInfo *info;
2648           const gchar *fs_type = NULL;
2649
2650           file = _g_local_file_new (home);
2651           info = g_local_file_query_filesystem_info (file, G_FILE_ATTRIBUTE_FILESYSTEM_TYPE, NULL, NULL);
2652           if (info != NULL)
2653             fs_type = g_file_info_get_attribute_string (info, G_FILE_ATTRIBUTE_FILESYSTEM_TYPE);
2654           if (g_strcmp0 (fs_type, "nfs") == 0 || g_strcmp0 (fs_type, "nfs4") == 0)
2655             remote_home = TRUE;
2656           g_clear_object (&info);
2657           g_object_unref (file);
2658
2659           g_once_init_leave (&initialized, TRUE);
2660         }
2661       return remote_home;
2662     }
2663
2664   return FALSE;
2665 }
2666 #endif /* !G_OS_WIN32 */
2667
2668 static GFileMonitor*
2669 g_local_file_monitor_dir (GFile             *file,
2670                           GFileMonitorFlags  flags,
2671                           GCancellable      *cancellable,
2672                           GError           **error)
2673 {
2674   GLocalFile *local_file = G_LOCAL_FILE (file);
2675
2676   return g_local_file_monitor_new_for_path (local_file->filename, TRUE, flags, error);
2677 }
2678
2679 static GFileMonitor*
2680 g_local_file_monitor_file (GFile             *file,
2681                            GFileMonitorFlags  flags,
2682                            GCancellable      *cancellable,
2683                            GError           **error)
2684 {
2685   GLocalFile *local_file = G_LOCAL_FILE (file);
2686
2687   return g_local_file_monitor_new_for_path (local_file->filename, FALSE, flags, error);
2688 }
2689
2690 /* Here is the GLocalFile implementation of g_file_measure_disk_usage().
2691  *
2692  * If available, we use fopenat() in preference to filenames for
2693  * efficiency and safety reasons.  We know that fopenat() is available
2694  * based on if AT_FDCWD is defined.  POSIX guarantees that this will be
2695  * defined as a macro.
2696  *
2697  * We use a linked list of stack-allocated GSList nodes in order to be
2698  * able to reconstruct the filename for error messages.  We actually
2699  * pass the filename to operate on through the top node of the list.
2700  *
2701  * In case we're using openat(), this top filename will be a basename
2702  * which should be opened in the directory which has also had its fd
2703  * passed along.  If we're not using openat() then it will be a full
2704  * absolute filename.
2705  */
2706
2707 static gboolean
2708 g_local_file_measure_size_error (GFileMeasureFlags   flags,
2709                                  gint                saved_errno,
2710                                  GSList             *name,
2711                                  GError            **error)
2712 {
2713   /* Only report an error if we were at the toplevel or if the caller
2714    * requested reporting of all errors.
2715    */
2716   if ((name->next == NULL) || (flags & G_FILE_MEASURE_REPORT_ANY_ERROR))
2717     {
2718       GString *filename;
2719       GSList *node;
2720
2721       /* Skip some work if there is no error return */
2722       if (!error)
2723         return FALSE;
2724
2725 #ifdef AT_FDCWD
2726       /* If using openat() we need to rebuild the filename for the message */
2727       filename = g_string_new (name->data);
2728       for (node = name->next; node; node = node->next)
2729         {
2730           gchar *utf8;
2731
2732           g_string_prepend_c (filename, G_DIR_SEPARATOR);
2733           utf8 = g_filename_display_name (node->data);
2734           g_string_prepend (filename, utf8);
2735           g_free (utf8);
2736         }
2737 #else
2738       {
2739         gchar *utf8;
2740
2741         /* Otherwise, we already have it, so just use it. */
2742         node = name;
2743         filename = g_string_new (NULL);
2744         utf8 = g_filename_display_name (node->data);
2745         g_string_append (filename, utf8);
2746         g_free (utf8);
2747       }
2748 #endif
2749
2750       g_set_error (error, G_IO_ERROR, g_io_error_from_errno (saved_errno),
2751                    _("Could not determine the disk usage of %s: %s"),
2752                    filename->str, g_strerror (saved_errno));
2753
2754       g_string_free (filename, TRUE);
2755
2756       return FALSE;
2757     }
2758
2759   else
2760     /* We're not reporting this error... */
2761     return TRUE;
2762 }
2763
2764 typedef struct
2765 {
2766   GFileMeasureFlags  flags;
2767   dev_t              contained_on;
2768   GCancellable      *cancellable;
2769
2770   GFileMeasureProgressCallback progress_callback;
2771   gpointer                     progress_data;
2772
2773   guint64 disk_usage;
2774   guint64 num_dirs;
2775   guint64 num_files;
2776
2777   guint64 last_progress_report;
2778 } MeasureState;
2779
2780 static gboolean
2781 g_local_file_measure_size_of_contents (gint           fd,
2782                                        GSList        *dir_name,
2783                                        MeasureState  *state,
2784                                        GError       **error);
2785
2786 /*
2787  * _g_stat_is_size_usable:
2788  * @buf: a #GLocalFileStat.
2789  *
2790  * Checks if the file type is such that the `st_size` field of `struct stat` is
2791  * well-defined by POSIX.
2792  * (see https://pubs.opengroup.org/onlinepubs/009696799/basedefs/sys/stat.h.html)
2793  *
2794  * This behaviour is aligned with `du` from GNU Coreutils 9.2+
2795  * (see https://lists.gnu.org/archive/html/bug-coreutils/2023-03/msg00007.html)
2796  * and makes apparent size sums well-defined; formerly, they depended on the
2797  * implementation, and could differ across filesystems.
2798  *
2799  * Returns: %TRUE if the size field is well-defined, %FALSE otherwise.
2800  **/
2801 inline static gboolean
2802 _g_stat_is_size_usable (const GLocalFileStat *buf)
2803 {
2804 #ifndef HAVE_STATX
2805   /* Memory objects are defined by POSIX, but are not supported by statx nor Windows */
2806 #ifdef S_TYPEISSHM
2807   if (S_TYPEISSHM (buf))
2808     return TRUE;
2809 #endif
2810 #ifdef S_TYPEISTMO
2811   if (S_TYPEISTMO (buf))
2812     return TRUE;
2813 #endif
2814 #endif
2815
2816   return S_ISREG (_g_stat_mode (buf)) || S_ISLNK (_g_stat_mode (buf));
2817 }
2818
2819 static gboolean
2820 g_local_file_measure_size_of_file (gint           parent_fd,
2821                                    GSList        *name,
2822                                    MeasureState  *state,
2823                                    GError       **error)
2824 {
2825   GLocalFileStat buf;
2826
2827   if (g_cancellable_set_error_if_cancelled (state->cancellable, error))
2828     return FALSE;
2829
2830 #if defined (AT_FDCWD)
2831   if (g_local_file_fstatat (parent_fd, name->data, AT_SYMLINK_NOFOLLOW,
2832                             G_LOCAL_FILE_STAT_FIELD_BASIC_STATS,
2833                             G_LOCAL_FILE_STAT_FIELD_ALL & (~G_LOCAL_FILE_STAT_FIELD_ATIME),
2834                             &buf) != 0)
2835     {
2836       int errsv = errno;
2837       return g_local_file_measure_size_error (state->flags, errsv, name, error);
2838     }
2839 #elif defined (HAVE_LSTAT) || !defined (G_OS_WIN32)
2840   if (g_lstat (name->data, &buf) != 0)
2841     {
2842       int errsv = errno;
2843       return g_local_file_measure_size_error (state->flags, errsv, name, error);
2844     }
2845 #else /* !AT_FDCWD && !HAVE_LSTAT && G_OS_WIN32 */
2846   if (GLIB_PRIVATE_CALL (g_win32_lstat_utf8) (name->data, &buf) != 0)
2847     {
2848       int errsv = errno;
2849       return g_local_file_measure_size_error (state->flags, errsv, name, error);
2850     }
2851 #endif
2852
2853   if (name->next)
2854     {
2855       /* If not at the toplevel, check for a device boundary. */
2856
2857       if (state->flags & G_FILE_MEASURE_NO_XDEV)
2858         if (state->contained_on != _g_stat_dev (&buf))
2859           return TRUE;
2860     }
2861   else
2862     {
2863       /* If, however, this is the toplevel, set the device number so
2864        * that recursive invocations can compare against it.
2865        */
2866       state->contained_on = _g_stat_dev (&buf);
2867     }
2868
2869 #if defined (G_OS_WIN32)
2870   if (~state->flags & G_FILE_MEASURE_APPARENT_SIZE)
2871     state->disk_usage += buf.allocated_size;
2872   else
2873 #elif defined (HAVE_STRUCT_STAT_ST_BLOCKS)
2874   if (~state->flags & G_FILE_MEASURE_APPARENT_SIZE)
2875     state->disk_usage += _g_stat_blocks (&buf) * G_GUINT64_CONSTANT (512);
2876   else
2877 #endif
2878   if (_g_stat_is_size_usable (&buf))
2879     state->disk_usage += _g_stat_size (&buf);
2880
2881   if (S_ISDIR (_g_stat_mode (&buf)))
2882     state->num_dirs++;
2883   else
2884     state->num_files++;
2885
2886   if (state->progress_callback)
2887     {
2888       /* We could attempt to do some cleverness here in order to avoid
2889        * calling clock_gettime() so much, but we're doing stats and opens
2890        * all over the place already...
2891        */
2892       if (state->last_progress_report)
2893         {
2894           guint64 now;
2895
2896           now = g_get_monotonic_time ();
2897
2898           if (state->last_progress_report + 200 * G_TIME_SPAN_MILLISECOND < now)
2899             {
2900               (* state->progress_callback) (TRUE,
2901                                             state->disk_usage, state->num_dirs, state->num_files,
2902                                             state->progress_data);
2903               state->last_progress_report = now;
2904             }
2905         }
2906       else
2907         {
2908           /* We must do an initial report to inform that more reports
2909            * will be coming.
2910            */
2911           (* state->progress_callback) (TRUE, 0, 0, 0, state->progress_data);
2912           state->last_progress_report = g_get_monotonic_time ();
2913         }
2914     }
2915
2916   if (S_ISDIR (_g_stat_mode (&buf)))
2917     {
2918       int dir_fd = -1;
2919 #ifdef AT_FDCWD
2920       int errsv;
2921 #endif
2922
2923       if (g_cancellable_set_error_if_cancelled (state->cancellable, error))
2924         return FALSE;
2925
2926 #ifdef AT_FDCWD
2927 #ifdef HAVE_OPEN_O_DIRECTORY
2928       dir_fd = openat (parent_fd, name->data, O_RDONLY | O_DIRECTORY | O_CLOEXEC);
2929 #else
2930       dir_fd = openat (parent_fd, name->data, O_RDONLY | O_CLOEXEC);
2931 #endif
2932       errsv = errno;
2933       if (dir_fd < 0)
2934         return g_local_file_measure_size_error (state->flags, errsv, name, error);
2935 #endif
2936
2937       if (!g_local_file_measure_size_of_contents (dir_fd, name, state, error))
2938         return FALSE;
2939     }
2940
2941   return TRUE;
2942 }
2943
2944 static gboolean
2945 g_local_file_measure_size_of_contents (gint           fd,
2946                                        GSList        *dir_name,
2947                                        MeasureState  *state,
2948                                        GError       **error)
2949 {
2950   gboolean success = TRUE;
2951   const gchar *name;
2952   GDir *dir;
2953   gint saved_errno;
2954
2955 #ifdef AT_FDCWD
2956   {
2957     /* If this fails, we want to preserve the errno from fdopendir() */
2958     DIR *dirp;
2959     dirp = fdopendir (fd);
2960     saved_errno = errno;
2961     dir = dirp ? GLIB_PRIVATE_CALL(g_dir_new_from_dirp) (dirp) : NULL;
2962     g_assert ((dirp == NULL) == (dir == NULL));
2963   }
2964 #else
2965   dir = GLIB_PRIVATE_CALL(g_dir_open_with_errno) (dir_name->data, 0);
2966   saved_errno = errno;
2967 #endif
2968
2969   if (dir == NULL)
2970     {
2971 #ifdef AT_FDCWD
2972       close (fd);
2973 #endif
2974
2975       return g_local_file_measure_size_error (state->flags, saved_errno, dir_name, error);
2976     }
2977
2978   while (success && (name = g_dir_read_name (dir)))
2979     {
2980       GSList node;
2981
2982       node.next = dir_name;
2983 #ifdef AT_FDCWD
2984       node.data = (gchar *) name;
2985 #else
2986       node.data = g_build_filename (dir_name->data, name, NULL);
2987 #endif
2988
2989       success = g_local_file_measure_size_of_file (fd, &node, state, error);
2990
2991 #ifndef AT_FDCWD
2992       g_free (node.data);
2993 #endif
2994     }
2995
2996   g_dir_close (dir);
2997
2998   return success;
2999 }
3000
3001 static gboolean
3002 g_local_file_measure_disk_usage (GFile                         *file,
3003                                  GFileMeasureFlags              flags,
3004                                  GCancellable                  *cancellable,
3005                                  GFileMeasureProgressCallback   progress_callback,
3006                                  gpointer                       progress_data,
3007                                  guint64                       *disk_usage,
3008                                  guint64                       *num_dirs,
3009                                  guint64                       *num_files,
3010                                  GError                       **error)
3011 {
3012   GLocalFile *local_file = G_LOCAL_FILE (file);
3013   MeasureState state = { 0, };
3014   gint root_fd = -1;
3015   GSList node;
3016
3017   state.flags = flags;
3018   state.cancellable = cancellable;
3019   state.progress_callback = progress_callback;
3020   state.progress_data = progress_data;
3021
3022 #ifdef AT_FDCWD
3023   root_fd = AT_FDCWD;
3024 #endif
3025
3026   node.data = local_file->filename;
3027   node.next = NULL;
3028
3029   if (!g_local_file_measure_size_of_file (root_fd, &node, &state, error))
3030     return FALSE;
3031
3032   if (disk_usage)
3033     *disk_usage = state.disk_usage;
3034
3035   if (num_dirs)
3036     *num_dirs = state.num_dirs;
3037
3038   if (num_files)
3039     *num_files = state.num_files;
3040
3041   return TRUE;
3042 }
3043
3044 static void
3045 g_local_file_file_iface_init (GFileIface *iface)
3046 {
3047   iface->dup = g_local_file_dup;
3048   iface->hash = g_local_file_hash;
3049   iface->equal = g_local_file_equal;
3050   iface->is_native = g_local_file_is_native;
3051   iface->has_uri_scheme = g_local_file_has_uri_scheme;
3052   iface->get_uri_scheme = g_local_file_get_uri_scheme;
3053   iface->get_basename = g_local_file_get_basename;
3054   iface->get_path = g_local_file_get_path;
3055   iface->get_uri = g_local_file_get_uri;
3056   iface->get_parse_name = g_local_file_get_parse_name;
3057   iface->get_parent = g_local_file_get_parent;
3058   iface->prefix_matches = g_local_file_prefix_matches;
3059   iface->get_relative_path = g_local_file_get_relative_path;
3060   iface->resolve_relative_path = g_local_file_resolve_relative_path;
3061   iface->get_child_for_display_name = g_local_file_get_child_for_display_name;
3062   iface->set_display_name = g_local_file_set_display_name;
3063   iface->enumerate_children = g_local_file_enumerate_children;
3064   iface->query_info = g_local_file_query_info;
3065   iface->query_filesystem_info = g_local_file_query_filesystem_info;
3066   iface->find_enclosing_mount = g_local_file_find_enclosing_mount;
3067   iface->query_settable_attributes = g_local_file_query_settable_attributes;
3068   iface->query_writable_namespaces = g_local_file_query_writable_namespaces;
3069   iface->set_attribute = g_local_file_set_attribute;
3070   iface->set_attributes_from_info = g_local_file_set_attributes_from_info;
3071   iface->read_fn = g_local_file_read;
3072   iface->append_to = g_local_file_append_to;
3073   iface->create = g_local_file_create;
3074   iface->replace = g_local_file_replace;
3075   iface->open_readwrite = g_local_file_open_readwrite;
3076   iface->create_readwrite = g_local_file_create_readwrite;
3077   iface->replace_readwrite = g_local_file_replace_readwrite;
3078   iface->delete_file = g_local_file_delete;
3079   iface->trash = g_local_file_trash;
3080   iface->make_directory = g_local_file_make_directory;
3081 #ifdef HAVE_SYMLINK
3082   iface->make_symbolic_link = g_local_file_make_symbolic_link;
3083 #endif
3084   iface->move = g_local_file_move;
3085   iface->monitor_dir = g_local_file_monitor_dir;
3086   iface->monitor_file = g_local_file_monitor_file;
3087   iface->measure_disk_usage = g_local_file_measure_disk_usage;
3088
3089   iface->supports_thread_contexts = TRUE;
3090 }