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