/* GIO - GLib Input, Output and Streaming Library * * Copyright (C) 2006-2007 Red Hat, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General * Public License along with this library; if not, write to the * Free Software Foundation, Inc., 59 Temple Place, Suite 330, * Boston, MA 02111-1307, USA. * * Author: Alexander Larsson */ #include #include #include #include #include #include #include #if HAVE_SYS_STATFS_H #include #endif #if HAVE_SYS_STATVFS_H #include #endif #if HAVE_SYS_VFS_H #include #elif HAVE_SYS_MOUNT_H #if HAVE_SYS_PARAM_H #include #endif #include #endif #if defined(HAVE_STATFS) && defined(HAVE_STATVFS) /* Some systems have both statfs and statvfs, pick the most "native" for these */ # if defined(sun) && defined(__SVR4) /* on solaris, statfs doesn't even have the f_bavail field */ # define USE_STATVFS # else /* at least on linux, statfs is the actual syscall */ # define USE_STATFS # endif #elif defined(HAVE_STATFS) # define USE_STATFS #elif defined(HAVE_STATVFS) # define USE_STATVFS #endif #include "glocalfile.h" #include "glocalfileinfo.h" #include "glocalfileenumerator.h" #include "glocalfileinputstream.h" #include "glocalfileoutputstream.h" #include "glocaldirectorymonitor.h" #include "glocalfilemonitor.h" #include "gvolumeprivate.h" #include #include "glibintl.h" #include "gioalias.h" static void g_local_file_file_iface_init (GFileIface *iface); static GFileAttributeInfoList *local_writable_attributes = NULL; static GFileAttributeInfoList *local_writable_namespaces = NULL; struct _GLocalFile { GObject parent_instance; char *filename; }; G_DEFINE_TYPE_WITH_CODE (GLocalFile, g_local_file, G_TYPE_OBJECT, G_IMPLEMENT_INTERFACE (G_TYPE_FILE, g_local_file_file_iface_init)) static char * find_mountpoint_for (const char *file, dev_t dev); static void g_local_file_finalize (GObject *object) { GLocalFile *local; local = G_LOCAL_FILE (object); g_free (local->filename); if (G_OBJECT_CLASS (g_local_file_parent_class)->finalize) (*G_OBJECT_CLASS (g_local_file_parent_class)->finalize) (object); } static void g_local_file_class_init (GLocalFileClass *klass) { GObjectClass *gobject_class = G_OBJECT_CLASS (klass); GFileAttributeInfoList *list; gobject_class->finalize = g_local_file_finalize; /* Set up attribute lists */ /* Writable attributes: */ list = g_file_attribute_info_list_new (); g_file_attribute_info_list_add (list, G_FILE_ATTRIBUTE_UNIX_MODE, G_FILE_ATTRIBUTE_TYPE_UINT32, G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); #ifdef HAVE_CHOWN g_file_attribute_info_list_add (list, G_FILE_ATTRIBUTE_UNIX_UID, G_FILE_ATTRIBUTE_TYPE_UINT32, G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); g_file_attribute_info_list_add (list, G_FILE_ATTRIBUTE_UNIX_GID, G_FILE_ATTRIBUTE_TYPE_UINT32, G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); #endif #ifdef HAVE_SYMLINK g_file_attribute_info_list_add (list, G_FILE_ATTRIBUTE_STD_SYMLINK_TARGET, G_FILE_ATTRIBUTE_TYPE_BYTE_STRING, 0); #endif #ifdef HAVE_UTIMES g_file_attribute_info_list_add (list, G_FILE_ATTRIBUTE_TIME_MODIFIED, G_FILE_ATTRIBUTE_TYPE_UINT64, G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); g_file_attribute_info_list_add (list, G_FILE_ATTRIBUTE_TIME_MODIFIED_USEC, G_FILE_ATTRIBUTE_TYPE_UINT32, G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); g_file_attribute_info_list_add (list, G_FILE_ATTRIBUTE_TIME_ACCESS, G_FILE_ATTRIBUTE_TYPE_UINT64, G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); g_file_attribute_info_list_add (list, G_FILE_ATTRIBUTE_TIME_ACCESS_USEC, G_FILE_ATTRIBUTE_TYPE_UINT32, G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); #endif local_writable_attributes = list; /* Writable namespaces: */ list = g_file_attribute_info_list_new (); #ifdef HAVE_XATTR g_file_attribute_info_list_add (list, "xattr", G_FILE_ATTRIBUTE_TYPE_STRING, G_FILE_ATTRIBUTE_FLAGS_COPY_WITH_FILE | G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); g_file_attribute_info_list_add (list, "xattr_sys", G_FILE_ATTRIBUTE_TYPE_STRING, G_FILE_ATTRIBUTE_FLAGS_COPY_WHEN_MOVED); #endif local_writable_namespaces = list; } static void g_local_file_init (GLocalFile *local) { } static char * canonicalize_filename (const char *filename) { char *canon, *start, *p, *q; char *cwd; if (!g_path_is_absolute (filename)) { cwd = g_get_current_dir (); canon = g_build_filename (cwd, filename, NULL); g_free (cwd); } else canon = g_strdup (filename); start = (char *)g_path_skip_root (canon); p = start; while (*p != 0) { if (p[0] == '.' && (p[1] == 0 || G_IS_DIR_SEPARATOR (p[1]))) { memmove (p, p+1, strlen (p+1)+1); } else if (p[0] == '.' && p[1] == '.' && (p[2] == 0 || G_IS_DIR_SEPARATOR (p[2]))) { q = p + 2; /* Skip previous separator */ p = p - 2; if (p < start) p = start; while (p > start && !G_IS_DIR_SEPARATOR (*p)) p--; if (G_IS_DIR_SEPARATOR (*p)) *p++ = G_DIR_SEPARATOR; memmove (p, q, strlen (q)+1); } else { /* Skip until next separator */ while (*p != 0 && !G_IS_DIR_SEPARATOR (*p)) p++; if (*p != 0) { /* Canonicalize one separator */ *p++ = G_DIR_SEPARATOR; } } /* Remove additional separators */ q = p; while (*q && G_IS_DIR_SEPARATOR (*q)) q++; if (p != q) memmove (p, q, strlen (q)+1); } /* Remove trailing slashes */ if (p > start && G_IS_DIR_SEPARATOR (*(p-1))) *(p-1) = 0; return canon; } /** * g_local_file_new: * @filename: filename of the file to create. * * Returns: new local #GFile. **/ GFile * g_local_file_new (const char *filename) { GLocalFile *local; local = g_object_new (G_TYPE_LOCAL_FILE, NULL); local->filename = canonicalize_filename (filename); return G_FILE (local); } static gboolean g_local_file_is_native (GFile *file) { return TRUE; } static gboolean g_local_file_has_uri_scheme (GFile *file, const char *uri_scheme) { return g_ascii_strcasecmp (uri_scheme, "file") == 0; } static char * g_local_file_get_uri_scheme (GFile *file) { return g_strdup ("file"); } static char * g_local_file_get_basename (GFile *file) { return g_path_get_basename (G_LOCAL_FILE (file)->filename); } static char * g_local_file_get_path (GFile *file) { return g_strdup (G_LOCAL_FILE (file)->filename); } static char * g_local_file_get_uri (GFile *file) { return g_filename_to_uri (G_LOCAL_FILE (file)->filename, NULL, NULL); } static gboolean get_filename_charset (const gchar **filename_charset) { const gchar **charsets; gboolean is_utf8; is_utf8 = g_get_filename_charsets (&charsets); if (filename_charset) *filename_charset = charsets[0]; return is_utf8; } static gboolean name_is_valid_for_display (const char *string, gboolean is_valid_utf8) { char c; if (!is_valid_utf8 && !g_utf8_validate (string, -1, NULL)) return FALSE; while ((c = *string++) != 0) { if (g_ascii_iscntrl(c)) return FALSE; } return TRUE; } static char * g_local_file_get_parse_name (GFile *file) { const char *filename; char *parse_name; const gchar *charset; char *utf8_filename; char *roundtripped_filename; gboolean free_utf8_filename; gboolean is_valid_utf8; filename = G_LOCAL_FILE (file)->filename; if (get_filename_charset (&charset)) { utf8_filename = (char *)filename; free_utf8_filename = FALSE; is_valid_utf8 = FALSE; /* Can't guarantee this */ } else { utf8_filename = g_convert (filename, -1, "UTF-8", charset, NULL, NULL, NULL); free_utf8_filename = TRUE; is_valid_utf8 = TRUE; if (utf8_filename != NULL) { /* Make sure we can roundtrip: */ roundtripped_filename = g_convert (utf8_filename, -1, charset, "UTF-8", NULL, NULL, NULL); if (roundtripped_filename == NULL || strcmp (utf8_filename, roundtripped_filename) != 0) { g_free (utf8_filename); utf8_filename = NULL; } } } if (utf8_filename != NULL && name_is_valid_for_display (utf8_filename, is_valid_utf8)) { if (free_utf8_filename) parse_name = utf8_filename; else parse_name = g_strdup (utf8_filename); } else { parse_name = g_filename_to_uri (filename, NULL, NULL); if (free_utf8_filename) g_free (utf8_filename); } return parse_name; } static GFile * g_local_file_get_parent (GFile *file) { GLocalFile *local = G_LOCAL_FILE (file); const char *non_root; char *dirname; GFile *parent; /* Check for root */ non_root = g_path_skip_root (local->filename); if (*non_root == 0) return NULL; dirname = g_path_get_dirname (local->filename); parent = g_local_file_new (dirname); g_free (dirname); return parent; } static GFile * g_local_file_dup (GFile *file) { GLocalFile *local = G_LOCAL_FILE (file); return g_local_file_new (local->filename); } static guint g_local_file_hash (GFile *file) { GLocalFile *local = G_LOCAL_FILE (file); return g_str_hash (local->filename); } static gboolean g_local_file_equal (GFile *file1, GFile *file2) { GLocalFile *local1 = G_LOCAL_FILE (file1); GLocalFile *local2 = G_LOCAL_FILE (file2); return g_str_equal (local1->filename, local2->filename); } static const char * match_prefix (const char *path, const char *prefix) { int prefix_len; prefix_len = strlen (prefix); if (strncmp (path, prefix, prefix_len) != 0) return NULL; return path + prefix_len; } static gboolean g_local_file_contains_file (GFile *parent, GFile *descendant) { GLocalFile *parent_local = G_LOCAL_FILE (parent); GLocalFile *descendant_local = G_LOCAL_FILE (descendant); const char *remainder; remainder = match_prefix (descendant_local->filename, parent_local->filename); if (remainder != NULL && G_IS_DIR_SEPARATOR (*remainder)) return TRUE; return FALSE; } static char * g_local_file_get_relative_path (GFile *parent, GFile *descendant) { GLocalFile *parent_local = G_LOCAL_FILE (parent); GLocalFile *descendant_local = G_LOCAL_FILE (descendant); const char *remainder; remainder = match_prefix (descendant_local->filename, parent_local->filename); if (remainder != NULL && G_IS_DIR_SEPARATOR (*remainder)) return g_strdup (remainder + 1); return NULL; } static GFile * g_local_file_resolve_relative_path (GFile *file, const char *relative_path) { GLocalFile *local = G_LOCAL_FILE (file); char *filename; GFile *child; if (g_path_is_absolute (relative_path)) return g_local_file_new (relative_path); filename = g_build_filename (local->filename, relative_path, NULL); child = g_local_file_new (filename); g_free (filename); return child; } static GFileEnumerator * g_local_file_enumerate_children (GFile *file, const char *attributes, GFileQueryInfoFlags flags, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); return g_local_file_enumerator_new (local->filename, attributes, flags, cancellable, error); } static GFile * g_local_file_get_child_for_display_name (GFile *file, const char *display_name, GError **error) { GFile *parent, *new_file; char *basename; basename = g_filename_from_utf8 (display_name, -1, NULL, NULL, NULL); if (basename == NULL) { g_set_error (error, G_IO_ERROR, G_IO_ERROR_INVALID_FILENAME, _("Invalid filename %s"), display_name); return NULL; } parent = g_file_get_parent (file); new_file = g_file_get_child (file, basename); g_object_unref (parent); g_free (basename); return new_file; } #ifdef USE_STATFS static const char * get_fs_type (long f_type) { /* filesystem ids taken from linux manpage */ switch (f_type) { case 0xadf5: return "adfs"; case 0xADFF: return "affs"; case 0x42465331: return "befs"; case 0x1BADFACE: return "bfs"; case 0xFF534D42: return "cifs"; case 0x73757245: return "coda"; case 0x012FF7B7: return "coh"; case 0x28cd3d45: return "cramfs"; case 0x1373: return "devfs"; case 0x00414A53: return "efs"; case 0x137D: return "ext"; case 0xEF51: return "ext2"; case 0xEF53: return "ext3"; case 0x4244: return "hfs"; case 0xF995E849: return "hpfs"; case 0x958458f6: return "hugetlbfs"; case 0x9660: return "isofs"; case 0x72b6: return "jffs2"; case 0x3153464a: return "jfs"; case 0x137F: return "minix"; case 0x138F: return "minix2"; case 0x2468: return "minix2"; case 0x2478: return "minix22"; case 0x4d44: return "msdos"; case 0x564c: return "ncp"; case 0x6969: return "nfs"; case 0x5346544e: return "ntfs"; case 0x9fa1: return "openprom"; case 0x9fa0: return "proc"; case 0x002f: return "qnx4"; case 0x52654973: return "reiserfs"; case 0x7275: return "romfs"; case 0x517B: return "smb"; case 0x012FF7B6: return "sysv2"; case 0x012FF7B5: return "sysv4"; case 0x01021994: return "tmpfs"; case 0x15013346: return "udf"; case 0x00011954: return "ufs"; case 0x9fa2: return "usbdevice"; case 0xa501FCF5: return "vxfs"; case 0x012FF7B4: return "xenix"; case 0x58465342: return "xfs"; case 0x012FD16D: return "xiafs"; default: return NULL; } } #endif G_LOCK_DEFINE_STATIC(mount_info_hash); static GHashTable *mount_info_hash = NULL; guint64 mount_info_hash_cache_time = 0; typedef enum { MOUNT_INFO_READONLY = 1<<0 } MountInfo; static gboolean device_equal (gconstpointer v1, gconstpointer v2) { return *(dev_t *)v1 == * (dev_t *)v2; } static guint device_hash (gconstpointer v) { return (guint) *(dev_t *)v; } static void get_mount_info (GFileInfo *fs_info, const char *path, GFileAttributeMatcher *matcher) { struct stat buf; gboolean got_info; gpointer info_as_ptr; guint mount_info; char *mountpoint; dev_t *dev; GUnixMount *mount; guint64 cache_time; if (lstat (path, &buf) != 0) return; G_LOCK (mount_info_hash); if (mount_info_hash == NULL) mount_info_hash = g_hash_table_new_full (device_hash, device_equal, g_free, NULL); if (g_unix_mounts_changed_since (mount_info_hash_cache_time)) g_hash_table_remove_all (mount_info_hash); got_info = g_hash_table_lookup_extended (mount_info_hash, &buf.st_dev, NULL, &info_as_ptr); G_UNLOCK (mount_info_hash); mount_info = GPOINTER_TO_UINT (info_as_ptr); if (!got_info) { mount_info = 0; mountpoint = find_mountpoint_for (path, buf.st_dev); if (mountpoint == NULL) mountpoint = "/"; mount = g_get_unix_mount_at (mountpoint, &cache_time); if (mount) { if (g_unix_mount_is_readonly (mount)) mount_info |= MOUNT_INFO_READONLY; g_unix_mount_free (mount); } dev = g_new0 (dev_t, 1); *dev = buf.st_dev; G_LOCK (mount_info_hash); mount_info_hash_cache_time = cache_time; g_hash_table_insert (mount_info_hash, dev, GUINT_TO_POINTER (mount_info)); G_UNLOCK (mount_info_hash); } if (mount_info & MOUNT_INFO_READONLY) g_file_info_set_attribute_boolean (fs_info, G_FILE_ATTRIBUTE_FS_READONLY, TRUE); } static GFileInfo * g_local_file_query_filesystem_info (GFile *file, const char *attributes, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); GFileInfo *info; int statfs_result; gboolean no_size; guint64 block_size; #ifdef USE_STATFS struct statfs statfs_buffer; const char *fstype; #elif defined(USE_STATVFS) struct statvfs statfs_buffer; #endif GFileAttributeMatcher *attribute_matcher; no_size = FALSE; #ifdef USE_STATFS #if STATFS_ARGS == 2 statfs_result = statfs (local->filename, &statfs_buffer); #elif STATFS_ARGS == 4 statfs_result = statfs (local->filename, &statfs_buffer, sizeof (statfs_buffer), 0); #endif block_size = statfs_buffer.f_bsize; #if defined(__linux__) /* ncpfs does not know the amount of available and free space * * assuming ncpfs is linux specific, if you are on a non-linux platform * where ncpfs is available, please file a bug about it on bugzilla.gnome.org */ if (statfs_buffer.f_bavail == 0 && statfs_buffer.f_bfree == 0 && /* linux/ncp_fs.h: NCP_SUPER_MAGIC == 0x564c */ statfs_buffer.f_type == 0x564c) no_size = TRUE; #endif #elif defined(USE_STATVFS) statfs_result = statvfs (local->filename, &statfs_buffer); block_size = statfs_buffer.f_frsize; #endif if (statfs_result == -1) { g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errno), _("Error getting filesystem info: %s"), g_strerror (errno)); return NULL; } info = g_file_info_new (); attribute_matcher = g_file_attribute_matcher_new (attributes); if (g_file_attribute_matcher_matches (attribute_matcher, G_FILE_ATTRIBUTE_FS_FREE)) g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FS_FREE, block_size * statfs_buffer.f_bavail); if (g_file_attribute_matcher_matches (attribute_matcher, G_FILE_ATTRIBUTE_FS_SIZE)) g_file_info_set_attribute_uint64 (info, G_FILE_ATTRIBUTE_FS_SIZE, block_size * statfs_buffer.f_blocks); #ifdef USE_STATFS fstype = get_fs_type (statfs_buffer.f_type); if (fstype && g_file_attribute_matcher_matches (attribute_matcher, G_FILE_ATTRIBUTE_FS_TYPE)) g_file_info_set_attribute_string (info, G_FILE_ATTRIBUTE_FS_TYPE, fstype); #endif if (g_file_attribute_matcher_matches (attribute_matcher, G_FILE_ATTRIBUTE_FS_READONLY)) { get_mount_info (info, local->filename, attribute_matcher); } g_file_attribute_matcher_unref (attribute_matcher); return info; } static GVolume * g_local_file_find_enclosing_volume (GFile *file, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); struct stat buf; char *mountpoint; GVolume *volume; if (lstat (local->filename, &buf) != 0) { g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_FOUND, _("Containing volume does not exist")); return NULL; } mountpoint = find_mountpoint_for (local->filename, buf.st_dev); if (mountpoint == NULL) { g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_FOUND, _("Containing volume does not exist")); return NULL; } volume = g_volume_get_for_mount_path (mountpoint); g_free (mountpoint); if (volume) return volume; g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_FOUND, _("Containing volume does not exist")); return NULL; } static GFile * g_local_file_set_display_name (GFile *file, const char *display_name, GCancellable *cancellable, GError **error) { GLocalFile *local, *new_local; GFile *new_file, *parent; struct stat statbuf; int errsv; parent = g_file_get_parent (file); if (parent == NULL) { g_set_error (error, G_IO_ERROR, G_IO_ERROR_FAILED, _("Can't rename root directory")); return NULL; } new_file = g_file_get_child_for_display_name (parent, display_name, error); g_object_unref (parent); if (new_file == NULL) return NULL; local = G_LOCAL_FILE (file); new_local = G_LOCAL_FILE (new_file); if (!(g_lstat (new_local->filename, &statbuf) == -1 && errno == ENOENT)) { g_set_error (error, G_IO_ERROR, G_IO_ERROR_EXISTS, _("Can't rename file, filename already exist")); return NULL; } if (rename (local->filename, new_local->filename) == -1) { errsv = errno; if (errsv == EINVAL) /* We can't get a rename file into itself error herer, so this must be an invalid filename, on e.g. FAT */ g_set_error (error, G_IO_ERROR, G_IO_ERROR_INVALID_FILENAME, _("Invalid filename")); else g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errsv), _("Error renaming file: %s"), g_strerror (errsv)); g_object_unref (new_file); return NULL; } return new_file; } static GFileInfo * g_local_file_query_info (GFile *file, const char *attributes, GFileQueryInfoFlags flags, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); GFileInfo *info; GFileAttributeMatcher *matcher; char *basename, *dirname; GLocalParentFileInfo parent_info; matcher = g_file_attribute_matcher_new (attributes); basename = g_path_get_basename (local->filename); dirname = g_path_get_dirname (local->filename); _g_local_file_info_get_parent_info (dirname, matcher, &parent_info); g_free (dirname); info = _g_local_file_info_get (basename, local->filename, matcher, flags, &parent_info, error); g_free (basename); g_file_attribute_matcher_unref (matcher); return info; } static GFileAttributeInfoList * g_local_file_query_settable_attributes (GFile *file, GCancellable *cancellable, GError **error) { return g_file_attribute_info_list_ref (local_writable_attributes); } static GFileAttributeInfoList * g_local_file_query_writable_namespaces (GFile *file, GCancellable *cancellable, GError **error) { return g_file_attribute_info_list_ref (local_writable_namespaces); } static gboolean g_local_file_set_attribute (GFile *file, const char *attribute, const GFileAttributeValue *value, GFileQueryInfoFlags flags, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); return _g_local_file_info_set_attribute (local->filename, attribute, value, flags, cancellable, error); } static gboolean g_local_file_set_attributes_from_info (GFile *file, GFileInfo *info, GFileQueryInfoFlags flags, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); int res, chained_res; GFileIface* default_iface; res = _g_local_file_info_set_attributes (local->filename, info, flags, cancellable, error); if (!res) error = NULL; /* Don't write over error if further errors */ default_iface = g_type_default_interface_peek (G_TYPE_FILE); chained_res = (default_iface->set_attributes_from_info) (file, info, flags, cancellable, error); return res && chained_res; } static GFileInputStream * g_local_file_read (GFile *file, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); int fd; struct stat buf; fd = g_open (local->filename, O_RDONLY, 0); if (fd == -1) { g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errno), _("Error opening file: %s"), g_strerror (errno)); return NULL; } if (fstat(fd, &buf) == 0 && S_ISDIR (buf.st_mode)) { close (fd); g_set_error (error, G_IO_ERROR, G_IO_ERROR_IS_DIRECTORY, _("Can't open directory")); return NULL; } return g_local_file_input_stream_new (fd); } static GFileOutputStream * g_local_file_append_to (GFile *file, GFileCreateFlags flags, GCancellable *cancellable, GError **error) { return g_local_file_output_stream_append (G_LOCAL_FILE (file)->filename, flags, cancellable, error); } static GFileOutputStream * g_local_file_create (GFile *file, GFileCreateFlags flags, GCancellable *cancellable, GError **error) { return g_local_file_output_stream_create (G_LOCAL_FILE (file)->filename, flags, cancellable, error); } static GFileOutputStream * g_local_file_replace (GFile *file, const char *etag, gboolean make_backup, GFileCreateFlags flags, GCancellable *cancellable, GError **error) { return g_local_file_output_stream_replace (G_LOCAL_FILE (file)->filename, etag, make_backup, flags, cancellable, error); } static gboolean g_local_file_delete (GFile *file, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); if (g_remove (local->filename) == -1) { g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errno), _("Error removing file: %s"), g_strerror (errno)); return FALSE; } return TRUE; } static char * strip_trailing_slashes (const char *path) { char *path_copy; int len; path_copy = g_strdup (path); len = strlen (path_copy); while (len > 1 && path_copy[len-1] == '/') path_copy[--len] = 0; return path_copy; } static char * expand_symlink (const char *link) { char *resolved, *canonical, *parent, *link2; char symlink_value[4096]; ssize_t res; res = readlink (link, symlink_value, sizeof (symlink_value) - 1); if (res == -1) return g_strdup (link); symlink_value[res] = 0; if (g_path_is_absolute (symlink_value)) return canonicalize_filename (symlink_value); else { link2 = strip_trailing_slashes (link); parent = g_path_get_dirname (link2); g_free (link2); resolved = g_build_filename (parent, symlink_value, NULL); g_free (parent); canonical = canonicalize_filename (resolved); g_free (resolved); return canonical; } } static char * get_parent (const char *path, dev_t *parent_dev) { char *parent, *tmp; struct stat parent_stat; int num_recursions; char *path_copy; path_copy = strip_trailing_slashes (path); parent = g_path_get_dirname (path_copy); if (strcmp (parent, ".") == 0 || strcmp (parent, path_copy) == 0) { g_free (path_copy); return NULL; } g_free (path_copy); num_recursions = 0; do { if (g_lstat (parent, &parent_stat) != 0) { g_free (parent); return NULL; } if (S_ISLNK (parent_stat.st_mode)) { tmp = parent; parent = expand_symlink (parent); g_free (tmp); } num_recursions++; if (num_recursions > 12) { g_free (parent); return NULL; } } while (S_ISLNK (parent_stat.st_mode)); *parent_dev = parent_stat.st_dev; return parent; } static char * expand_all_symlinks (const char *path) { char *parent, *parent_expanded; char *basename, *res; dev_t parent_dev; parent = get_parent (path, &parent_dev); if (parent) { parent_expanded = expand_all_symlinks (parent); g_free (parent); basename = g_path_get_basename (path); res = g_build_filename (parent_expanded, basename, NULL); g_free (basename); g_free (parent_expanded); } else res = g_strdup (path); return res; } static char * find_mountpoint_for (const char *file, dev_t dev) { char *dir, *parent; dev_t dir_dev, parent_dev; dir = g_strdup (file); dir_dev = dev; while (1) { parent = get_parent (dir, &parent_dev); if (parent == NULL) return dir; if (parent_dev != dir_dev) { g_free (parent); return dir; } g_free (dir); dir = parent; } } static char * find_topdir_for (const char *file) { char *dir; dev_t dir_dev; dir = get_parent (file, &dir_dev); if (dir == NULL) return NULL; return find_mountpoint_for (dir, dir_dev); } static char * get_unique_filename (const char *basename, int id) { const char *dot; if (id == 1) return g_strdup (basename); dot = strchr (basename, '.'); if (dot) return g_strdup_printf ("%.*s.%d%s", dot - basename, basename, id, dot); else return g_strdup_printf ("%s.%d", basename, id); } static gboolean path_has_prefix (const char *path, const char *prefix) { int prefix_len; if (prefix == NULL) return TRUE; prefix_len = strlen (prefix); if (strncmp (path, prefix, prefix_len) == 0 && (prefix_len == 0 || /* empty prefix always matches */ prefix[prefix_len - 1] == '/' || /* last char in prefix was a /, so it must be in path too */ path[prefix_len] == 0 || path[prefix_len] == '/')) return TRUE; return FALSE; } static char * try_make_relative (const char *path, const char *base) { char *path2, *base2; char *relative; path2 = expand_all_symlinks (path); base2 = expand_all_symlinks (base); relative = NULL; if (path_has_prefix (path2, base2)) { relative = path2 + strlen (base2); while (*relative == '/') relative ++; relative = g_strdup (relative); } g_free (path2); g_free (base2); if (relative) return relative; /* Failed, use abs path */ return g_strdup (path); } static char * escape_trash_name (char *name) { GString *str; const gchar hex[16] = "0123456789ABCDEF"; str = g_string_new (""); while (*name != 0) { char c; c = *name++; if (g_ascii_isprint (c)) g_string_append_c (str, c); else { g_string_append_c (str, '%'); g_string_append_c (str, hex[((guchar)c) >> 4]); g_string_append_c (str, hex[((guchar)c) & 0xf]); } } return g_string_free (str, FALSE); } static gboolean g_local_file_trash (GFile *file, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); struct stat file_stat, home_stat, trash_stat, global_stat; const char *homedir; char *dirname; char *trashdir, *globaldir, *topdir, *infodir, *filesdir; char *basename, *trashname, *trashfile, *infoname, *infofile; char *original_name, *original_name_escaped; uid_t uid; char uid_str[32]; int i; char *data; gboolean is_homedir_trash; time_t t; struct tm now; char delete_time[32]; int fd; if (g_lstat (local->filename, &file_stat) != 0) { g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errno), _("Error trashing file: %s"), g_strerror (errno)); return FALSE; } homedir = g_get_home_dir (); g_stat (homedir, &home_stat); is_homedir_trash = FALSE; trashdir = NULL; if (file_stat.st_dev == home_stat.st_dev) { is_homedir_trash = TRUE; errno = 0; trashdir = g_build_filename (g_get_user_data_dir (), "Trash", NULL); if (g_mkdir_with_parents (trashdir, 0700) < 0) { char *display_name; int err; err = errno; display_name = g_filename_display_name (trashdir); g_set_error (error, G_IO_ERROR, g_io_error_from_errno (err), _("Unable to create trash dir %s: %s"), display_name, g_strerror (err)); g_free (display_name); g_free (trashdir); return FALSE; } topdir = g_strdup (g_get_user_data_dir ()); } else { uid = geteuid (); g_snprintf (uid_str, sizeof (uid_str), "%lu", (unsigned long)uid); topdir = find_topdir_for (local->filename); if (topdir == NULL) { g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, _("Unable to find toplevel directory for trash")); return FALSE; } /* Try looking for global trash dir $topdir/.Trash/$uid */ globaldir = g_build_filename (topdir, ".Trash", NULL); if (g_lstat (globaldir, &global_stat) == 0 && S_ISDIR (global_stat.st_mode) && (global_stat.st_mode & S_ISVTX) != 0) { trashdir = g_build_filename (globaldir, uid_str, NULL); if (g_lstat (trashdir, &trash_stat) == 0) { if (!S_ISDIR (trash_stat.st_mode) || trash_stat.st_uid != uid) { /* Not a directory or not owned by user, ignore */ g_free (trashdir); trashdir = NULL; } } else if (g_mkdir (trashdir, 0700) == -1) { g_free (trashdir); trashdir = NULL; } } g_free (globaldir); if (trashdir == NULL) { /* No global trash dir, or it failed the tests, fall back to $topdir/.Trash-$uid */ dirname = g_strdup_printf (".Trash-%s", uid_str); trashdir = g_build_filename (topdir, dirname, NULL); g_free (dirname); if (g_lstat (trashdir, &trash_stat) == 0) { if (!S_ISDIR (trash_stat.st_mode) || trash_stat.st_uid != uid) { /* Not a directory or not owned by user, ignore */ g_free (trashdir); trashdir = NULL; } } else if (g_mkdir (trashdir, 0700) == -1) { g_free (trashdir); trashdir = NULL; } } if (trashdir == NULL) { g_free (topdir); g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, _("Unable to find or create trash directory")); return FALSE; } } /* Trashdir points to the trash dir with the "info" and "files" subdirectories */ infodir = g_build_filename (trashdir, "info", NULL); filesdir = g_build_filename (trashdir, "files", NULL); g_free (trashdir); /* Make sure we have the subdirectories */ if ((g_mkdir (infodir, 0700) == -1 && errno != EEXIST) || (g_mkdir (filesdir, 0700) == -1 && errno != EEXIST)) { g_free (topdir); g_free (infodir); g_free (filesdir); g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, _("Unable to find or create trash directory")); return FALSE; } basename = g_path_get_basename (local->filename); i = 1; trashname = NULL; infofile = NULL; do { g_free (trashname); g_free (infofile); trashname = get_unique_filename (basename, i++); infoname = g_strconcat (trashname, ".trashinfo", NULL); infofile = g_build_filename (infodir, infoname, NULL); g_free (infoname); fd = open (infofile, O_CREAT | O_EXCL, 0666); } while (fd == -1 && errno == EEXIST); g_free (basename); g_free (infodir); if (fd == -1) { g_free (filesdir); g_free (topdir); g_free (trashname); g_free (infofile); g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errno), _("Unable to create trashed file: %s"), g_strerror (errno)); return FALSE; } close (fd); /* TODO: Maybe we should verify that you can delete the file from the trash before moving it? OTOH, that is hard, as it needs a recursive scan */ trashfile = g_build_filename (filesdir, trashname, NULL); g_free (filesdir); if (g_rename (local->filename, trashfile) == -1) { g_free (topdir); g_free (trashname); g_free (infofile); g_free (trashfile); g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errno), _("Unable to trash file: %s"), g_strerror (errno)); return FALSE; } g_free (trashfile); /* TODO: Do we need to update mtime/atime here after the move? */ /* Use absolute names for homedir */ if (is_homedir_trash) original_name = g_strdup (local->filename); else original_name = try_make_relative (local->filename, topdir); original_name_escaped = escape_trash_name (original_name); g_free (original_name); g_free (topdir); t = time (NULL); localtime_r (&t, &now); delete_time[0] = 0; strftime(delete_time, sizeof (delete_time), "%Y-%m-%dT%H:%M:%S", &now); data = g_strdup_printf ("[Trash Info]\nPath=%s\nDeletionDate=%s\n", original_name_escaped, delete_time); g_file_set_contents (infofile, data, -1, NULL); g_free (infofile); g_free (data); g_free (original_name_escaped); g_free (trashname); return TRUE; } static gboolean g_local_file_make_directory (GFile *file, GCancellable *cancellable, GError **error) { GLocalFile *local = G_LOCAL_FILE (file); if (g_mkdir (local->filename, 0755) == -1) { int errsv = errno; if (errsv == EINVAL) /* This must be an invalid filename, on e.g. FAT */ g_set_error (error, G_IO_ERROR, G_IO_ERROR_INVALID_FILENAME, _("Invalid filename")); else g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errsv), _("Error removing file: %s"), g_strerror (errsv)); return FALSE; } return TRUE; } static gboolean g_local_file_make_symbolic_link (GFile *file, const char *symlink_value, GCancellable *cancellable, GError **error) { #ifdef HAVE_SYMLINK GLocalFile *local = G_LOCAL_FILE (file); if (symlink (symlink_value, local->filename) == -1) { int errsv = errno; if (errsv == EINVAL) /* This must be an invalid filename, on e.g. FAT */ g_set_error (error, G_IO_ERROR, G_IO_ERROR_INVALID_FILENAME, _("Invalid filename")); else g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errsv), _("Error making symbolic link: %s"), g_strerror (errsv)); return FALSE; } return TRUE; #else g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, "Symlinks not supported"); return FALSE; #endif } static gboolean g_local_file_copy (GFile *source, GFile *destination, GFileCopyFlags flags, GCancellable *cancellable, GFileProgressCallback progress_callback, gpointer progress_callback_data, GError **error) { /* Fall back to default copy */ g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED, "Copy not supported"); return FALSE; } static gboolean g_local_file_move (GFile *source, GFile *destination, GFileCopyFlags flags, GCancellable *cancellable, GFileProgressCallback progress_callback, gpointer progress_callback_data, GError **error) { GLocalFile *local_source = G_LOCAL_FILE (source); GLocalFile *local_destination = G_LOCAL_FILE (destination); struct stat statbuf; gboolean destination_exist, source_is_dir; char *backup_name; int res; res = g_lstat (local_source->filename, &statbuf); if (res == -1) { g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errno), _("Error moving file: %s"), g_strerror (errno)); return FALSE; } else source_is_dir = S_ISDIR (statbuf.st_mode); destination_exist = FALSE; res = g_lstat (local_destination->filename, &statbuf); if (res == 0) { destination_exist = TRUE; /* Target file exists */ if (flags & G_FILE_COPY_OVERWRITE) { /* Always fail on dirs, even with overwrite */ if (S_ISDIR (statbuf.st_mode)) { g_set_error (error, G_IO_ERROR, G_IO_ERROR_WOULD_MERGE, _("Can't move directory over directory")); return FALSE; } } else { g_set_error (error, G_IO_ERROR, G_IO_ERROR_EXISTS, _("Target file already exists")); return FALSE; } } if (flags & G_FILE_COPY_BACKUP && destination_exist) { backup_name = g_strconcat (local_destination->filename, "~", NULL); if (rename (local_destination->filename, backup_name) == -1) { g_set_error (error, G_IO_ERROR, G_IO_ERROR_CANT_CREATE_BACKUP, _("Backup file creation failed")); g_free (backup_name); return FALSE; } g_free (backup_name); destination_exist = FALSE; /* It did, but no more */ } if (source_is_dir && destination_exist && (flags & G_FILE_COPY_OVERWRITE)) { /* Source is a dir, destination exists (and is not a dir, because that would have failed earlier), and we're overwriting. Manually remove the target so we can do the rename. */ res = unlink (local_destination->filename); if (res == -1) { g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errno), _("Error removing target file: %s"), g_strerror (errno)); return FALSE; } } if (rename (local_source->filename, local_destination->filename) == -1) { int errsv = errno; if (errsv == EXDEV) goto fallback; if (errsv == EINVAL) /* This must be an invalid filename, on e.g. FAT, or we're trying to move the file into itself... We return invalid filename for both... */ g_set_error (error, G_IO_ERROR, G_IO_ERROR_INVALID_FILENAME, _("Invalid filename")); else g_set_error (error, G_IO_ERROR, g_io_error_from_errno (errsv), _("Error moving file: %s"), g_strerror (errsv)); return FALSE; } return TRUE; fallback: if (!g_file_copy (source, destination, G_FILE_COPY_OVERWRITE | G_FILE_COPY_ALL_METADATA, cancellable, progress_callback, progress_callback_data, error)) return FALSE; return g_file_delete (source, cancellable, error); } static GDirectoryMonitor* g_local_file_monitor_dir (GFile* file, GFileMonitorFlags flags, GCancellable *cancellable) { GLocalFile* local_file = G_LOCAL_FILE(file); return g_local_directory_monitor_new (local_file->filename, flags); } static GFileMonitor* g_local_file_monitor_file (GFile* file, GFileMonitorFlags flags, GCancellable *cancellable) { GLocalFile* local_file = G_LOCAL_FILE(file); return g_local_file_monitor_new (local_file->filename, flags); } static void g_local_file_file_iface_init (GFileIface *iface) { iface->dup = g_local_file_dup; iface->hash = g_local_file_hash; iface->equal = g_local_file_equal; iface->is_native = g_local_file_is_native; iface->has_uri_scheme = g_local_file_has_uri_scheme; iface->get_uri_scheme = g_local_file_get_uri_scheme; iface->get_basename = g_local_file_get_basename; iface->get_path = g_local_file_get_path; iface->get_uri = g_local_file_get_uri; iface->get_parse_name = g_local_file_get_parse_name; iface->get_parent = g_local_file_get_parent; iface->contains_file = g_local_file_contains_file; iface->get_relative_path = g_local_file_get_relative_path; iface->resolve_relative_path = g_local_file_resolve_relative_path; iface->get_child_for_display_name = g_local_file_get_child_for_display_name; iface->set_display_name = g_local_file_set_display_name; iface->enumerate_children = g_local_file_enumerate_children; iface->query_info = g_local_file_query_info; iface->query_filesystem_info = g_local_file_query_filesystem_info; iface->find_enclosing_volume = g_local_file_find_enclosing_volume; iface->query_settable_attributes = g_local_file_query_settable_attributes; iface->query_writable_namespaces = g_local_file_query_writable_namespaces; iface->set_attribute = g_local_file_set_attribute; iface->set_attributes_from_info = g_local_file_set_attributes_from_info; iface->read = g_local_file_read; iface->append_to = g_local_file_append_to; iface->create = g_local_file_create; iface->replace = g_local_file_replace; iface->delete_file = g_local_file_delete; iface->trash = g_local_file_trash; iface->make_directory = g_local_file_make_directory; iface->make_symbolic_link = g_local_file_make_symbolic_link; iface->copy = g_local_file_copy; iface->move = g_local_file_move; iface->monitor_dir = g_local_file_monitor_dir; iface->monitor_file = g_local_file_monitor_file; }