// // fiv-io-model.c: filesystem // // Copyright (c) 2021 - 2023, Přemysl Eric Janouch
// // Permission to use, copy, modify, and/or distribute this software for any // purpose with or without fee is hereby granted. // // THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES // WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF // MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY // SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES // WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION // OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN // CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. // #include "fiv-io.h" #include "fiv-io-model.h" #include "xdg.h" GType fiv_io_model_sort_get_type(void) { static gsize guard; if (g_once_init_enter(&guard)) { #define XX(name) {FIV_IO_MODEL_SORT_ ## name, \ "FIV_IO_MODEL_SORT_" #name, #name}, static const GEnumValue values[] = {FIV_IO_MODEL_SORTS(XX) {}}; #undef XX GType type = g_enum_register_static( g_intern_static_string("FivIoModelSort"), values); g_once_init_leave(&guard, type); } return guard; } // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - G_DEFINE_BOXED_TYPE(FivIoModelEntry, fiv_io_model_entry, fiv_io_model_entry_ref, fiv_io_model_entry_unref) FivIoModelEntry * fiv_io_model_entry_ref(FivIoModelEntry *self) { return g_rc_box_acquire(self); } void fiv_io_model_entry_unref(FivIoModelEntry *self) { g_rc_box_release(self); } static size_t entry_strsize(const char *string) { if (!string) return 0; return strlen(string) + 1; } static char * entry_strappend(char **p, const char *string, size_t size) { if (!string) return NULL; char *destination = memcpy(*p, string, size); *p += size; return destination; } // See model_load_attributes for a (superset of a) list of required attributes. static FivIoModelEntry * entry_new(GFile *file, GFileInfo *info) { gchar *uri = g_file_get_uri(file); const gchar *target_uri = g_file_info_get_attribute_string( info, G_FILE_ATTRIBUTE_STANDARD_TARGET_URI); const gchar *display_name = g_file_info_get_display_name(info); // TODO(p): Make it possible to use g_utf8_collate_key() instead, // which does not use natural sorting. gchar *parse_name = g_file_get_parse_name(file); gchar *collate_key = g_utf8_collate_key_for_filename(parse_name, -1); g_free(parse_name); // The entries are immutable. Packing them into the structure // should help memory usage as well as performance. size_t size_uri = entry_strsize(uri); size_t size_target_uri = entry_strsize(target_uri); size_t size_display_name = entry_strsize(display_name); size_t size_collate_key = entry_strsize(collate_key); FivIoModelEntry *entry = g_rc_box_alloc0(sizeof *entry + size_uri + size_target_uri + size_display_name + size_collate_key); gchar *p = (gchar *) entry + sizeof *entry; entry->uri = entry_strappend(&p, uri, size_uri); entry->target_uri = entry_strappend(&p, target_uri, size_target_uri); entry->display_name = entry_strappend(&p, display_name, size_display_name); entry->collate_key = entry_strappend(&p, collate_key, size_collate_key); entry->filesize = (guint64) g_file_info_get_size(info); GDateTime *mtime = g_file_info_get_modification_date_time(info); if (mtime) { entry->mtime_msec = g_date_time_to_unix(mtime) * 1000 + g_date_time_get_microsecond(mtime) / 1000; g_date_time_unref(mtime); } g_free(uri); g_free(collate_key); return entry; } // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - struct _FivIoModel { GObject parent_instance; GPatternSpec **supported_patterns; GFile *directory; ///< Currently loaded directory GFileMonitor *monitor; ///< "directory" monitoring GPtrArray *subdirs; ///< "directory" contents GPtrArray *files; ///< "directory" contents FivIoModelSort sort_field; ///< How to sort gboolean sort_descending; ///< Whether to sort in reverse gboolean filtering; ///< Only show non-hidden, supported }; G_DEFINE_TYPE(FivIoModel, fiv_io_model, G_TYPE_OBJECT) enum { PROP_FILTERING = 1, PROP_SORT_FIELD, PROP_SORT_DESCENDING, N_PROPERTIES }; static GParamSpec *model_properties[N_PROPERTIES]; enum { RELOADED, FILES_CHANGED, SUBDIRECTORIES_CHANGED, LAST_SIGNAL, }; // Globals are, sadly, the canonical way of storing signal numbers. static guint model_signals[LAST_SIGNAL]; // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - static GPtrArray * model_entry_array_new(void) { return g_ptr_array_new_with_free_func( (GDestroyNotify) fiv_io_model_entry_unref); } static gboolean model_supports(FivIoModel *self, const char *filename) { gchar *utf8 = g_filename_to_utf8(filename, -1, NULL, NULL, NULL); if (!utf8) return FALSE; gchar *lc = g_utf8_strdown(utf8, -1); gsize lc_length = strlen(lc); gchar *reversed = g_utf8_strreverse(lc, lc_length); g_free(utf8); // fnmatch() uses the /locale encoding/, and isn't present on Windows. // TODO(p): Consider using g_file_info_get_display_name() for direct UTF-8. gboolean result = FALSE; for (GPatternSpec **p = self->supported_patterns; *p; p++) if ((result = g_pattern_spec_match(*p, lc_length, lc, reversed))) break; g_free(lc); g_free(reversed); return result; } static inline int model_compare_entries(FivIoModel *self, const FivIoModelEntry *entry1, GFile *file1, const FivIoModelEntry *entry2, GFile *file2) { if (g_file_has_prefix(file1, file2)) return +1; if (g_file_has_prefix(file2, file1)) return -1; int result = 0; switch (self->sort_field) { case FIV_IO_MODEL_SORT_MTIME: result -= entry1->mtime_msec < entry2->mtime_msec; result += entry1->mtime_msec > entry2->mtime_msec; if (result != 0) break; // Fall-through case FIV_IO_MODEL_SORT_NAME: case FIV_IO_MODEL_SORT_COUNT: result = strcmp(entry1->collate_key, entry2->collate_key); } return self->sort_descending ? -result : +result; } static gint model_compare(gconstpointer a, gconstpointer b, gpointer user_data) { const FivIoModelEntry *entry1 = *(const FivIoModelEntry **) a; const FivIoModelEntry *entry2 = *(const FivIoModelEntry **) b; GFile *file1 = g_file_new_for_uri(entry1->uri); GFile *file2 = g_file_new_for_uri(entry2->uri); int result = model_compare_entries(user_data, entry1, file1, entry2, file2); g_object_unref(file1); g_object_unref(file2); return result; } static const char *model_load_attributes = G_FILE_ATTRIBUTE_STANDARD_TYPE "," G_FILE_ATTRIBUTE_STANDARD_NAME "," G_FILE_ATTRIBUTE_STANDARD_SIZE "," G_FILE_ATTRIBUTE_STANDARD_DISPLAY_NAME "," G_FILE_ATTRIBUTE_STANDARD_TARGET_URI "," G_FILE_ATTRIBUTE_STANDARD_IS_HIDDEN "," G_FILE_ATTRIBUTE_TIME_MODIFIED "," G_FILE_ATTRIBUTE_TIME_MODIFIED_USEC; static GPtrArray * model_decide_placement( FivIoModel *self, GFileInfo *info, GPtrArray *subdirs, GPtrArray *files) { if (self->filtering && g_file_info_get_is_hidden(info)) return NULL; if (g_file_info_get_file_type(info) == G_FILE_TYPE_DIRECTORY) return subdirs; if (!self->filtering || model_supports(self, g_file_info_get_name(info))) return files; return NULL; } static gboolean model_reload_to(FivIoModel *self, GFile *directory, GPtrArray *subdirs, GPtrArray *files, GError **error) { if (subdirs) g_ptr_array_set_size(subdirs, 0); if (files) g_ptr_array_set_size(files, 0); GFileEnumerator *enumerator = g_file_enumerate_children( directory, model_load_attributes, G_FILE_QUERY_INFO_NONE, NULL, error); if (!enumerator) return FALSE; GFileInfo *info = NULL; GFile *child = NULL; GError *e = NULL; while (TRUE) { if (!g_file_enumerator_iterate(enumerator, &info, &child, NULL, &e) && e) { g_warning("%s", e->message); g_clear_error(&e); continue; } if (!info) break; GPtrArray *target = model_decide_placement(self, info, subdirs, files); if (target) g_ptr_array_add(target, entry_new(child, info)); } g_object_unref(enumerator); if (subdirs) g_ptr_array_sort_with_data(subdirs, model_compare, self); if (files) g_ptr_array_sort_with_data(files, model_compare, self); return TRUE; } static gboolean model_reload(FivIoModel *self, GError **error) { // Note that this will clear all entries on failure. gboolean result = model_reload_to( self, self->directory, self->subdirs, self->files, error); g_signal_emit(self, model_signals[RELOADED], 0); return result; } static void model_resort(FivIoModel *self) { g_ptr_array_sort_with_data(self->subdirs, model_compare, self); g_ptr_array_sort_with_data(self->files, model_compare, self); g_signal_emit(self, model_signals[RELOADED], 0); } // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - static gint model_find(const GPtrArray *target, GFile *file, FivIoModelEntry **entry) { for (guint i = 0; i < target->len; i++) { FivIoModelEntry *e = target->pdata[i]; GFile *f = g_file_new_for_uri(e->uri); gboolean match = g_file_equal(f, file); g_object_unref(f); if (match) { *entry = e; return i; } } return -1; } enum monitor_event { MONITOR_NONE, MONITOR_CHANGING, MONITOR_RENAMING, MONITOR_REMOVING, MONITOR_ADDING }; static void monitor_apply(enum monitor_event event, GPtrArray *target, int index, FivIoModelEntry *new_entry) { // The file used to be filtered out but isn't anymore. // TODO(p): Handle the inverse transition as well. if (event == MONITOR_RENAMING && index < 0) event = MONITOR_ADDING; if (event == MONITOR_CHANGING) { g_assert(new_entry != NULL); fiv_io_model_entry_unref(target->pdata[index]); target->pdata[index] = fiv_io_model_entry_ref(new_entry); } if (event == MONITOR_REMOVING || event == MONITOR_RENAMING) g_ptr_array_remove_index(target, index); if (event == MONITOR_RENAMING || event == MONITOR_ADDING) { g_assert(new_entry != NULL); g_ptr_array_add(target, fiv_io_model_entry_ref(new_entry)); } } static void on_monitor_changed(G_GNUC_UNUSED GFileMonitor *monitor, GFile *file, GFile *other_file, GFileMonitorEvent event_type, gpointer user_data) { FivIoModel *self = user_data; FivIoModelEntry *old_entry = NULL; gint files_index = model_find(self->files, file, &old_entry); gint subdirs_index = model_find(self->subdirs, file, &old_entry); enum monitor_event action = MONITOR_NONE; GFile *new_entry_file = NULL; switch (event_type) { case G_FILE_MONITOR_EVENT_CHANGED: case G_FILE_MONITOR_EVENT_ATTRIBUTE_CHANGED: action = MONITOR_CHANGING; new_entry_file = file; break; case G_FILE_MONITOR_EVENT_RENAMED: action = MONITOR_RENAMING; new_entry_file = other_file; break; case G_FILE_MONITOR_EVENT_DELETED: case G_FILE_MONITOR_EVENT_MOVED_OUT: action = MONITOR_REMOVING; break; case G_FILE_MONITOR_EVENT_CREATED: case G_FILE_MONITOR_EVENT_MOVED_IN: action = MONITOR_ADDING; old_entry = NULL; new_entry_file = file; break; case G_FILE_MONITOR_EVENT_CHANGES_DONE_HINT: // TODO(p): Figure out if we can't make use of _CHANGES_DONE_HINT. case G_FILE_MONITOR_EVENT_PRE_UNMOUNT: case G_FILE_MONITOR_EVENT_UNMOUNTED: // TODO(p): Figure out how to handle _UNMOUNTED sensibly. case G_FILE_MONITOR_EVENT_MOVED: return; } FivIoModelEntry *new_entry = NULL; GPtrArray *new_target = NULL; if (new_entry_file) { GError *error = NULL; GFileInfo *info = g_file_query_info(new_entry_file, model_load_attributes, G_FILE_QUERY_INFO_NONE, NULL, &error); if (error) { g_debug("monitor: %s", error->message); g_error_free(error); goto run; } if ((new_target = model_decide_placement(self, info, self->subdirs, self->files))) new_entry = entry_new(new_entry_file, info); g_object_unref(info); if ((files_index != -1 && new_target == self->subdirs) || (subdirs_index != -1 && new_target == self->files)) { g_debug("monitor: ignoring transfer between files and subdirs"); goto out; } } run: // Keep a reference alive so that signal handlers see the new arrays. if (old_entry) fiv_io_model_entry_ref(old_entry); if (files_index != -1 || new_target == self->files) { monitor_apply(action, self->files, files_index, new_entry); g_signal_emit(self, model_signals[FILES_CHANGED], 0, old_entry, new_entry); } if (subdirs_index != -1 || new_target == self->subdirs) { monitor_apply(action, self->subdirs, subdirs_index, new_entry); g_signal_emit(self, model_signals[SUBDIRECTORIES_CHANGED], 0, old_entry, new_entry); } // NOTE: It would make sense to do // g_ptr_array_sort_with_data(self->{files,subdirs}, model_compare, self); // but then the iteration behaviour of fiv.c would differ from what's shown // in the browser. Perhaps we need to use an index-based, fully-synchronized // interface similar to GListModel::items-changed. if (old_entry) fiv_io_model_entry_unref(old_entry); out: if (new_entry) fiv_io_model_entry_unref(new_entry); } // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - // This would be more efficient iteratively, but it's not that important. static GFile * model_last_deep_subdirectory(FivIoModel *self, GFile *directory) { GFile *result = NULL; GPtrArray *subdirs = model_entry_array_new(); if (!model_reload_to(self, directory, subdirs, NULL, NULL)) goto out; if (subdirs->len) { FivIoModelEntry *entry = g_ptr_array_index(subdirs, subdirs->len - 1); GFile *last = g_file_new_for_uri(entry->uri); result = model_last_deep_subdirectory(self, last); g_object_unref(last); } else { result = g_object_ref(directory); } out: g_ptr_array_free(subdirs, TRUE); return result; } GFile * fiv_io_model_get_previous_directory(FivIoModel *self) { g_return_val_if_fail(FIV_IS_IO_MODEL(self), NULL); GFile *parent_directory = g_file_get_parent(self->directory); if (!parent_directory) return NULL; GFile *result = NULL; GPtrArray *subdirs = model_entry_array_new(); if (!model_reload_to(self, parent_directory, subdirs, NULL, NULL)) goto out; for (gsize i = 0; i < subdirs->len; i++) { FivIoModelEntry *entry = g_ptr_array_index(subdirs, i); GFile *file = g_file_new_for_uri(entry->uri); if (g_file_equal(file, self->directory)) { g_object_unref(file); break; } g_clear_object(&result); result = file; } if (result) { GFile *last = model_last_deep_subdirectory(self, result); g_object_unref(result); result = last; } else { result = g_object_ref(parent_directory); } out: g_object_unref(parent_directory); g_ptr_array_free(subdirs, TRUE); return result; } // This would be more efficient iteratively, but it's not that important. static GFile * model_next_directory_within_parents(FivIoModel *self, GFile *directory) { GFile *parent_directory = g_file_get_parent(directory); if (!parent_directory) return NULL; GFile *result = NULL; GPtrArray *subdirs = model_entry_array_new(); if (!model_reload_to(self, parent_directory, subdirs, NULL, NULL)) goto out; gboolean found_self = FALSE; for (gsize i = 0; i < subdirs->len; i++) { FivIoModelEntry *entry = g_ptr_array_index(subdirs, i); result = g_file_new_for_uri(entry->uri); if (found_self) goto out; found_self = g_file_equal(result, directory); g_clear_object(&result); } if (!result) result = model_next_directory_within_parents(self, parent_directory); out: g_object_unref(parent_directory); g_ptr_array_free(subdirs, TRUE); return result; } GFile * fiv_io_model_get_next_directory(FivIoModel *self) { g_return_val_if_fail(FIV_IS_IO_MODEL(self), NULL); if (self->subdirs->len) { FivIoModelEntry *entry = g_ptr_array_index(self->subdirs, 0); return g_file_new_for_uri(entry->uri); } return model_next_directory_within_parents(self, self->directory); } // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - static void fiv_io_model_finalize(GObject *gobject) { FivIoModel *self = FIV_IO_MODEL(gobject); for (GPatternSpec **p = self->supported_patterns; *p; p++) g_pattern_spec_free(*p); g_free(self->supported_patterns); g_clear_object(&self->directory); g_clear_object(&self->monitor); g_ptr_array_free(self->subdirs, TRUE); g_ptr_array_free(self->files, TRUE); G_OBJECT_CLASS(fiv_io_model_parent_class)->finalize(gobject); } static void fiv_io_model_get_property( GObject *object, guint property_id, GValue *value, GParamSpec *pspec) { FivIoModel *self = FIV_IO_MODEL(object); switch (property_id) { case PROP_FILTERING: g_value_set_boolean(value, self->filtering); break; case PROP_SORT_FIELD: g_value_set_enum(value, self->sort_field); break; case PROP_SORT_DESCENDING: g_value_set_boolean(value, self->sort_descending); break; default: G_OBJECT_WARN_INVALID_PROPERTY_ID(object, property_id, pspec); } } static void fiv_io_model_set_property( GObject *object, guint property_id, const GValue *value, GParamSpec *pspec) { FivIoModel *self = FIV_IO_MODEL(object); switch (property_id) { case PROP_FILTERING: if (self->filtering != g_value_get_boolean(value)) { self->filtering = !self->filtering; g_object_notify_by_pspec(object, model_properties[property_id]); (void) model_reload(self, NULL /* error */); } break; case PROP_SORT_FIELD: if ((int) self->sort_field != g_value_get_enum(value)) { self->sort_field = g_value_get_enum(value); g_object_notify_by_pspec(object, model_properties[property_id]); model_resort(self); } break; case PROP_SORT_DESCENDING: if (self->sort_descending != g_value_get_boolean(value)) { self->sort_descending = !self->sort_descending; g_object_notify_by_pspec(object, model_properties[property_id]); model_resort(self); } break; default: G_OBJECT_WARN_INVALID_PROPERTY_ID(object, property_id, pspec); } } static void fiv_io_model_class_init(FivIoModelClass *klass) { GObjectClass *object_class = G_OBJECT_CLASS(klass); object_class->get_property = fiv_io_model_get_property; object_class->set_property = fiv_io_model_set_property; object_class->finalize = fiv_io_model_finalize; model_properties[PROP_FILTERING] = g_param_spec_boolean( "filtering", "Filtering", "Only show non-hidden, supported entries", TRUE, G_PARAM_READWRITE); model_properties[PROP_SORT_FIELD] = g_param_spec_enum( "sort-field", "Sort field", "Sort order", FIV_TYPE_IO_MODEL_SORT, FIV_IO_MODEL_SORT_NAME, G_PARAM_READWRITE); model_properties[PROP_SORT_DESCENDING] = g_param_spec_boolean( "sort-descending", "Sort descending", "Use reverse sort order", FALSE, G_PARAM_READWRITE); g_object_class_install_properties( object_class, N_PROPERTIES, model_properties); // All entries might have changed. model_signals[RELOADED] = g_signal_new("reloaded", G_TYPE_FROM_CLASS(klass), 0, 0, NULL, NULL, NULL, G_TYPE_NONE, 0); model_signals[FILES_CHANGED] = g_signal_new("files-changed", G_TYPE_FROM_CLASS(klass), 0, 0, NULL, NULL, NULL, G_TYPE_NONE, 2, FIV_TYPE_IO_MODEL_ENTRY, FIV_TYPE_IO_MODEL_ENTRY); model_signals[SUBDIRECTORIES_CHANGED] = g_signal_new("subdirectories-changed", G_TYPE_FROM_CLASS(klass), 0, 0, NULL, NULL, NULL, G_TYPE_NONE, 2, FIV_TYPE_IO_MODEL_ENTRY, FIV_TYPE_IO_MODEL_ENTRY); } // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - static void fiv_io_model_init(FivIoModel *self) { self->filtering = TRUE; char **types = fiv_io_all_supported_media_types(); char **globs = extract_mime_globs((const char **) types); g_strfreev(types); gsize n = g_strv_length(globs); self->supported_patterns = g_malloc0_n(n + 1, sizeof *self->supported_patterns); while (n--) self->supported_patterns[n] = g_pattern_spec_new(globs[n]); g_strfreev(globs); self->files = model_entry_array_new(); self->subdirs = model_entry_array_new(); } gboolean fiv_io_model_open(FivIoModel *self, GFile *directory, GError **error) { g_return_val_if_fail(FIV_IS_IO_MODEL(self), FALSE); g_return_val_if_fail(G_IS_FILE(directory), FALSE); g_clear_object(&self->directory); g_clear_object(&self->monitor); self->directory = g_object_ref(directory); GError *e = NULL; if ((self->monitor = g_file_monitor_directory( directory, G_FILE_MONITOR_WATCH_MOVES, NULL, &e))) { g_signal_connect(self->monitor, "changed", G_CALLBACK(on_monitor_changed), self); } else { g_debug("directory monitoring failed: %s", e->message); g_error_free(e); } return model_reload(self, error); } GFile * fiv_io_model_get_location(FivIoModel *self) { g_return_val_if_fail(FIV_IS_IO_MODEL(self), NULL); return self->directory; } FivIoModelEntry *const * fiv_io_model_get_files(FivIoModel *self, gsize *len) { *len = self->files->len; return (FivIoModelEntry *const *) self->files->pdata; } FivIoModelEntry *const * fiv_io_model_get_subdirs(FivIoModel *self, gsize *len) { *len = self->subdirs->len; return (FivIoModelEntry *const *) self->subdirs->pdata; }