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