X-Git-Url: http://geeqie.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmetadata.c;h=26d835007f12102338df7915df13cf85125285b4;hb=7d42ca045284da44b249b42564421163c5969aab;hp=8ffec59b8c3312a1afcf1bf7c181d4ae9f5286eb;hpb=cbbd4a8733202ca3e436365eee667d551ea9c24a;p=geeqie.git diff --git a/src/metadata.c b/src/metadata.c index 8ffec59b..26d83500 100644 --- a/src/metadata.c +++ b/src/metadata.c @@ -1,16 +1,24 @@ /* - * Geeqie - * (C) 2004 John Ellis - * Copyright (C) 2008 The Geeqie Team + * Copyright (C) 2004 John Ellis + * Copyright (C) 2008 - 2016 The Geeqie Team * - * Author: John Ellis, Laurent Monin + * Authors: John Ellis, Laurent Monin * - * This software is released under the GNU General Public License (GNU GPL). - * Please read the included file COPYING for more information. - * This software comes with no warranty of any kind, use at your own risk! + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program 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 General Public License for more details. + * + * You should have received a copy of the GNU General Public License along + * with this program; if not, write to the Free Software Foundation, Inc., + * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. */ - #include "main.h" #include "metadata.h" @@ -23,6 +31,8 @@ #include "ui_misc.h" #include "utilops.h" #include "filefilter.h" +#include "layout_util.h" +#include "rcfile.h" typedef enum { MK_NONE, @@ -30,106 +40,170 @@ typedef enum { MK_COMMENT } MetadataKey; -#define COMMENT_KEY "Xmp.dc.description" -#define KEYWORD_KEY "Xmp.dc.subject" +static const gchar *group_keys[] = { /* tags that will be written to all files in a group, options->metadata.sync_grouped_files */ + "Xmp.dc.title", + "Xmp.photoshop.Urgency", + "Xmp.photoshop.Category", + "Xmp.photoshop.SupplementalCategory", + "Xmp.dc.subject", + "Xmp.iptc.Location", + "Xmp.photoshop.Instruction", + "Xmp.photoshop.DateCreated", + "Xmp.dc.creator", + "Xmp.photoshop.AuthorsPosition", + "Xmp.photoshop.City", + "Xmp.photoshop.State", + "Xmp.iptc.CountryCode", + "Xmp.photoshop.Country", + "Xmp.photoshop.TransmissionReference", + "Xmp.photoshop.Headline", + "Xmp.photoshop.Credit", + "Xmp.photoshop.Source", + "Xmp.dc.rights", + "Xmp.dc.description", + "Xmp.photoshop.CaptionWriter", + NULL}; static gboolean metadata_write_queue_idle_cb(gpointer data); -static gint metadata_legacy_write(FileData *fd); -static gint metadata_legacy_delete(FileData *fd); - - - -gboolean metadata_can_write_directly(FileData *fd) -{ - return (filter_file_class(fd->extension, FORMAT_CLASS_IMAGE)); -/* FIXME: detect what exiv2 really supports */ -} - -gboolean metadata_can_write_sidecar(FileData *fd) -{ - return (filter_file_class(fd->extension, FORMAT_CLASS_RAWIMAGE)); -/* FIXME: detect what exiv2 really supports */ -} +static gboolean metadata_legacy_write(FileData *fd); +static void metadata_legacy_delete(FileData *fd, const gchar *except); +static gboolean metadata_file_read(gchar *path, GList **keywords, gchar **comment); /* *------------------------------------------------------------------- - * write queue + * long-term cache - keep keywords from whole dir in memory *------------------------------------------------------------------- */ -static GList *metadata_write_queue = NULL; -static gint metadata_write_idle_id = -1; +/* fd->cached metadata list of lists + each particular list contains key as a first entry, then the values +*/ -static FileData *metadata_xmp_sidecar_fd(FileData *fd) +static void metadata_cache_update(FileData *fd, const gchar *key, const GList *values) { GList *work; - gchar *base, *new_name; - FileData *ret; - - if (!metadata_can_write_sidecar(fd)) return NULL; - - - if (fd->parent) fd = fd->parent; - - if (filter_file_class(fd->extension, FORMAT_CLASS_META)) - return file_data_ref(fd); - - work = fd->sidecar_files; + + work = fd->cached_metadata; while (work) { - FileData *sfd = work->data; + GList *entry = work->data; + gchar *entry_key = entry->data; + + if (strcmp(entry_key, key) == 0) + { + /* key found - just replace values */ + GList *old_values = entry->next; + entry->next = NULL; + old_values->prev = NULL; + string_list_free(old_values); + work->data = g_list_append(entry, string_list_copy(values)); + DEBUG_1("updated %s %s\n", key, fd->path); + return; + } work = work->next; - if (filter_file_class(sfd->extension, FORMAT_CLASS_META)) - return file_data_ref(sfd); - } - - /* sidecar does not exist yet */ - base = remove_extension_from_path(fd->path); - new_name = g_strconcat(base, ".xmp", NULL); - g_free(base); - ret = file_data_new_simple(new_name); - g_free(new_name); - return ret; + } + + /* key not found - prepend new entry */ + fd->cached_metadata = g_list_prepend(fd->cached_metadata, + g_list_prepend(string_list_copy(values), g_strdup(key))); + DEBUG_1("added %s %s\n", key, fd->path); + } -static FileData *metadata_xmp_main_fd(FileData *fd) +static const GList *metadata_cache_get(FileData *fd, const gchar *key) { - if (filter_file_class(fd->extension, FORMAT_CLASS_META) && !g_list_find(metadata_write_queue, fd)) + GList *work; + + work = fd->cached_metadata; + while (work) { - /* fd is a sidecar, we have to find the original file */ - - GList *work = metadata_write_queue; - while (work) + GList *entry = work->data; + gchar *entry_key = entry->data; + + if (strcmp(entry_key, key) == 0) { - FileData *ofd = work->data; - FileData *osfd = metadata_xmp_sidecar_fd(ofd); - work = work->next; - file_data_unref(osfd); - if (fd == osfd) - { - return ofd; /* this is the main file */ - } + /* key found */ + DEBUG_1("found %s %s\n", key, fd->path); + return entry; } + work = work->next; } return NULL; + DEBUG_1("not found %s %s\n", key, fd->path); +} + +static void metadata_cache_remove(FileData *fd, const gchar *key) +{ + GList *work; + + work = fd->cached_metadata; + while (work) + { + GList *entry = work->data; + gchar *entry_key = entry->data; + + if (strcmp(entry_key, key) == 0) + { + /* key found */ + string_list_free(entry); + fd->cached_metadata = g_list_delete_link(fd->cached_metadata, work); + DEBUG_1("removed %s %s\n", key, fd->path); + return; + } + work = work->next; + } + DEBUG_1("not removed %s %s\n", key, fd->path); +} + +void metadata_cache_free(FileData *fd) +{ + GList *work; + if (fd->cached_metadata) DEBUG_1("freed %s\n", fd->path); + + work = fd->cached_metadata; + while (work) + { + GList *entry = work->data; + string_list_free(entry); + + work = work->next; + } + g_list_free(fd->cached_metadata); + fd->cached_metadata = NULL; } + + + + +/* + *------------------------------------------------------------------- + * write queue + *------------------------------------------------------------------- + */ + +static GList *metadata_write_queue = NULL; +static guint metadata_write_idle_id = 0; /* event source id */ + static void metadata_write_queue_add(FileData *fd) { - if (g_list_find(metadata_write_queue, fd)) return; - - metadata_write_queue = g_list_prepend(metadata_write_queue, fd); - file_data_ref(fd); + if (!g_list_find(metadata_write_queue, fd)) + { + metadata_write_queue = g_list_prepend(metadata_write_queue, fd); + file_data_ref(fd); + + layout_util_status_update_write_all(); + } - if (metadata_write_idle_id != -1) + if (metadata_write_idle_id) { g_source_remove(metadata_write_idle_id); - metadata_write_idle_id = -1; + metadata_write_idle_id = 0; } - - if (options->metadata.confirm_timeout > 0) + + if (options->metadata.confirm_after_timeout) { metadata_write_idle_id = g_timeout_add(options->metadata.confirm_timeout * 1000, metadata_write_queue_idle_cb, NULL); } @@ -138,19 +212,17 @@ static void metadata_write_queue_add(FileData *fd) gboolean metadata_write_queue_remove(FileData *fd) { - FileData *main_fd = metadata_xmp_main_fd(fd); - - if (main_fd) fd = main_fd; - g_hash_table_destroy(fd->modified_xmp); fd->modified_xmp = NULL; metadata_write_queue = g_list_remove(metadata_write_queue, fd); - + file_data_increment_version(fd); - file_data_send_notification(fd, NOTIFY_TYPE_REREAD); + file_data_send_notification(fd, NOTIFY_REREAD); file_data_unref(fd); + + layout_util_status_update_write_all(); return TRUE; } @@ -158,7 +230,7 @@ gboolean metadata_write_queue_remove_list(GList *list) { GList *work; gboolean ret = TRUE; - + work = list; while (work) { @@ -169,101 +241,185 @@ gboolean metadata_write_queue_remove_list(GList *list) return ret; } +void metadata_notify_cb(FileData *fd, NotifyType type, gpointer data) +{ + if (type & (NOTIFY_REREAD | NOTIFY_CHANGE)) + { + metadata_cache_free(fd); + + if (g_list_find(metadata_write_queue, fd)) + { + DEBUG_1("Notify metadata: %s %04x", fd->path, type); + if (!isname(fd->path)) + { + /* ignore deleted files */ + metadata_write_queue_remove(fd); + } + } + } +} -gboolean metadata_write_queue_confirm() +gboolean metadata_write_queue_confirm(gboolean force_dialog, FileUtilDoneFunc done_func, gpointer done_data) { GList *work; GList *to_approve = NULL; - + work = metadata_write_queue; while (work) { FileData *fd = work->data; work = work->next; - + + if (!isname(fd->path)) + { + /* ignore deleted files */ + metadata_write_queue_remove(fd); + continue; + } + if (fd->change) continue; /* another operation in progress, skip this file for now */ - - FileData *to_approve_fd = metadata_xmp_sidecar_fd(fd); - - if (!to_approve_fd) to_approve_fd = file_data_ref(fd); /* this is not a sidecar */ - to_approve = g_list_prepend(to_approve, to_approve_fd); + to_approve = g_list_prepend(to_approve, file_data_ref(fd)); } - file_util_write_metadata(NULL, to_approve, NULL); - - filelist_free(to_approve); - + file_util_write_metadata(NULL, to_approve, NULL, force_dialog, done_func, done_data); + return (metadata_write_queue != NULL); } static gboolean metadata_write_queue_idle_cb(gpointer data) { - metadata_write_queue_confirm(); - metadata_write_idle_id = -1; + metadata_write_queue_confirm(FALSE, NULL, NULL); + metadata_write_idle_id = 0; return FALSE; } - -gboolean metadata_write_exif(FileData *fd, FileData *sfd) +gboolean metadata_write_perform(FileData *fd) { gboolean success; ExifData *exif; - - /* we can either use cached metadata which have fd->modified_xmp already applied + + g_assert(fd->change); + + if (fd->change->dest && + strcmp(registered_extension_from_path(fd->change->dest), GQ_CACHE_EXT_METADATA) == 0) + { + success = metadata_legacy_write(fd); + if (success) metadata_legacy_delete(fd, fd->change->dest); + return success; + } + + /* write via exiv2 */ + /* we can either use cached metadata which have fd->modified_xmp already applied or read metadata from file and apply fd->modified_xmp metadata are read also if the file was modified meanwhile */ - exif = exif_read_fd(fd); + exif = exif_read_fd(fd); if (!exif) return FALSE; - success = sfd ? exif_write_sidecar(exif, sfd->path) : exif_write(exif); /* write modified metadata */ + + success = (fd->change->dest) ? exif_write_sidecar(exif, fd->change->dest) : exif_write(exif); /* write modified metadata */ exif_free_fd(fd, exif); + + if (fd->change->dest) + /* this will create a FileData for the sidecar and link it to the main file + (we can't wait until the sidecar is discovered by directory scanning because + exif_read_fd is called before that and it would read the main file only and + store the metadata in the cache) + FIXME: this does not catch new sidecars created by independent external programs + */ + file_data_unref(file_data_new_group(fd->change->dest)); + + if (success) metadata_legacy_delete(fd, fd->change->dest); return success; } -gboolean metadata_write_perform(FileData *fd) +gint metadata_queue_length(void) +{ + return g_list_length(metadata_write_queue); +} + +static gboolean metadata_check_key(const gchar *keys[], const gchar *key) { - FileData *sfd = NULL; - FileData *main_fd = metadata_xmp_main_fd(fd); + const gchar **k = keys; - if (main_fd) + while (*k) { - sfd = fd; - fd = main_fd; + if (strcmp(key, *k) == 0) return TRUE; + k++; } + return FALSE; +} + +gboolean metadata_write_revert(FileData *fd, const gchar *key) +{ + if (!fd->modified_xmp) return FALSE; - if (options->metadata.save_in_image_file && - metadata_write_exif(fd, sfd)) + g_hash_table_remove(fd->modified_xmp, key); + + if (g_hash_table_size(fd->modified_xmp) == 0) { - metadata_legacy_delete(fd); - if (sfd) metadata_legacy_delete(sfd); + metadata_write_queue_remove(fd); } else { - metadata_legacy_write(fd); + /* reread the metadata to restore the original value */ + file_data_increment_version(fd); + file_data_send_notification(fd, NOTIFY_REREAD); } return TRUE; } -gint metadata_write_list(FileData *fd, const gchar *key, GList *values) +gboolean metadata_write_list(FileData *fd, const gchar *key, const GList *values) { if (!fd->modified_xmp) { fd->modified_xmp = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, (GDestroyNotify)string_list_free); } - g_hash_table_insert(fd->modified_xmp, g_strdup(key), values); + g_hash_table_insert(fd->modified_xmp, g_strdup(key), string_list_copy((GList *)values)); + + metadata_cache_remove(fd, key); + if (fd->exif) { exif_update_metadata(fd->exif, key, values); } metadata_write_queue_add(fd); + file_data_increment_version(fd); + file_data_send_notification(fd, NOTIFY_METADATA); + + if (options->metadata.sync_grouped_files && metadata_check_key(group_keys, key)) + { + GList *work = fd->sidecar_files; + + while (work) + { + FileData *sfd = work->data; + work = work->next; + + if (filter_file_class(sfd->extension, FORMAT_CLASS_META)) continue; + + metadata_write_list(sfd, key, values); + } + } + + return TRUE; } - -gint metadata_write_string(FileData *fd, const gchar *key, const char *value) + +gboolean metadata_write_string(FileData *fd, const gchar *key, const char *value) { - return metadata_write_list(fd, key, g_list_append(NULL, g_strdup(value))); + GList *list = g_list_append(NULL, g_strdup(value)); + gboolean ret = metadata_write_list(fd, key, list); + string_list_free(list); + return ret; } +gboolean metadata_write_int(FileData *fd, const gchar *key, guint64 value) +{ + gchar string[50]; + + g_snprintf(string, sizeof(string), "%llu", (unsigned long long) value); + return metadata_write_string(fd, key, string); +} /* *------------------------------------------------------------------- @@ -271,12 +427,9 @@ gint metadata_write_string(FileData *fd, const gchar *key, const char *value) *------------------------------------------------------------------- */ -static gint metadata_file_write(gchar *path, GHashTable *modified_xmp) +static gboolean metadata_file_write(gchar *path, const GList *keywords, const gchar *comment) { SecureSaveInfo *ssi; - GList *keywords = g_hash_table_lookup(modified_xmp, KEYWORD_KEY); - GList *comment_l = g_hash_table_lookup(modified_xmp, COMMENT_KEY); - gchar *comment = comment_l ? comment_l->data : NULL; ssi = secure_open(path); if (!ssi) return FALSE; @@ -301,55 +454,44 @@ static gint metadata_file_write(gchar *path, GHashTable *modified_xmp) return (secure_close(ssi) == 0); } -static gint metadata_legacy_write(FileData *fd) +static gboolean metadata_legacy_write(FileData *fd) { - gchar *metadata_path; - gint success = FALSE; + gboolean success = FALSE; + gchar *metadata_pathl; + gpointer keywords; + gpointer comment_l; + gboolean have_keywords; + gboolean have_comment; + const gchar *comment; + GList *orig_keywords = NULL; + gchar *orig_comment = NULL; - /* If an existing metadata file exists, we will try writing to - * it's location regardless of the user's preference. - */ - metadata_path = cache_find_location(CACHE_TYPE_METADATA, fd->path); - if (metadata_path && !access_file(metadata_path, W_OK)) - { - g_free(metadata_path); - metadata_path = NULL; - } + g_assert(fd->change && fd->change->dest); - if (!metadata_path) - { - gchar *metadata_dir; - mode_t mode = 0755; + DEBUG_1("Saving comment: %s", fd->change->dest); - metadata_dir = cache_get_location(CACHE_TYPE_METADATA, fd->path, FALSE, &mode); - if (recursive_mkdir_if_not_exists(metadata_dir, mode)) - { - gchar *filename = g_strconcat(fd->name, GQ_CACHE_EXT_METADATA, NULL); - - metadata_path = g_build_filename(metadata_dir, filename, NULL); - g_free(filename); - } - g_free(metadata_dir); - } + if (!fd->modified_xmp) return TRUE; - if (metadata_path) - { - gchar *metadata_pathl; + metadata_pathl = path_from_utf8(fd->change->dest); - DEBUG_1("Saving comment: %s", metadata_path); + have_keywords = g_hash_table_lookup_extended(fd->modified_xmp, KEYWORD_KEY, NULL, &keywords); + have_comment = g_hash_table_lookup_extended(fd->modified_xmp, COMMENT_KEY, NULL, &comment_l); + comment = (have_comment && comment_l) ? ((GList *)comment_l)->data : NULL; - metadata_pathl = path_from_utf8(metadata_path); + if (!have_keywords || !have_comment) metadata_file_read(metadata_pathl, &orig_keywords, &orig_comment); - success = metadata_file_write(metadata_pathl, fd->modified_xmp); + success = metadata_file_write(metadata_pathl, + have_keywords ? (GList *)keywords : orig_keywords, + have_comment ? comment : orig_comment); - g_free(metadata_pathl); - g_free(metadata_path); - } + g_free(metadata_pathl); + g_free(orig_comment); + string_list_free(orig_keywords); return success; } -static gint metadata_file_read(gchar *path, GList **keywords, gchar **comment) +static gboolean metadata_file_read(gchar *path, GList **keywords, gchar **comment) { FILE *f; gchar s_buf[1024]; @@ -368,10 +510,10 @@ static gint metadata_file_read(gchar *path, GList **keywords, gchar **comment) if (*ptr == '[' && key != MK_COMMENT) { gchar *keystr = ++ptr; - + key = MK_NONE; while (*ptr != ']' && *ptr != '\n' && *ptr != '\0') ptr++; - + if (*ptr == ']') { *ptr = '\0'; @@ -382,8 +524,8 @@ static gint metadata_file_read(gchar *path, GList **keywords, gchar **comment) } continue; } - - switch(key) + + switch (key) { case MK_NONE: break; @@ -405,10 +547,18 @@ static gint metadata_file_read(gchar *path, GList **keywords, gchar **comment) break; } } - + fclose(f); - *keywords = g_list_reverse(list); + if (keywords) + { + *keywords = g_list_reverse(list); + } + else + { + string_list_free(list); + } + if (comment_build) { if (comment) @@ -435,31 +585,41 @@ static gint metadata_file_read(gchar *path, GList **keywords, gchar **comment) return TRUE; } -static gint metadata_legacy_delete(FileData *fd) +static void metadata_legacy_delete(FileData *fd, const gchar *except) { gchar *metadata_path; gchar *metadata_pathl; - gint success = FALSE; - if (!fd) return FALSE; + if (!fd) return; metadata_path = cache_find_location(CACHE_TYPE_METADATA, fd->path); - if (!metadata_path) return FALSE; - - metadata_pathl = path_from_utf8(metadata_path); - - success = !unlink(metadata_pathl); - - g_free(metadata_pathl); - g_free(metadata_path); + if (metadata_path && (!except || strcmp(metadata_path, except) != 0)) + { + metadata_pathl = path_from_utf8(metadata_path); + unlink(metadata_pathl); + g_free(metadata_pathl); + g_free(metadata_path); + } - return success; +#ifdef HAVE_EXIV2 + /* without exiv2: do not delete xmp metadata because we are not able to convert it, + just ignore it */ + metadata_path = cache_find_location(CACHE_TYPE_XMP_METADATA, fd->path); + if (metadata_path && (!except || strcmp(metadata_path, except) != 0)) + { + metadata_pathl = path_from_utf8(metadata_path); + unlink(metadata_pathl); + g_free(metadata_pathl); + g_free(metadata_path); + } +#endif } -static gint metadata_legacy_read(FileData *fd, GList **keywords, gchar **comment) +static gboolean metadata_legacy_read(FileData *fd, GList **keywords, gchar **comment) { gchar *metadata_path; gchar *metadata_pathl; - gint success = FALSE; + gboolean success = FALSE; + if (!fd) return FALSE; metadata_path = cache_find_location(CACHE_TYPE_METADATA, fd->path); @@ -499,244 +659,311 @@ static GList *remove_duplicate_strings_from_list(GList *list) return g_list_reverse(newlist); } - -static gint metadata_xmp_read(FileData *fd, GList **keywords, gchar **comment) +GList *metadata_read_list(FileData *fd, const gchar *key, MetadataFormat format) { ExifData *exif; + GList *list = NULL; + const GList *cache_entry; + if (!fd) return NULL; - exif = exif_read_fd(fd); - if (!exif) return FALSE; - - if (comment) + /* unwritten data overide everything */ + if (fd->modified_xmp && format == METADATA_PLAIN) { - gchar *text; - ExifItem *item = exif_get_item(exif, COMMENT_KEY); + list = g_hash_table_lookup(fd->modified_xmp, key); + if (list) return string_list_copy(list); + } + - text = exif_item_get_string(item, 0); - *comment = utf8_validate_or_convert(text); - g_free(text); + if (format == METADATA_PLAIN && strcmp(key, KEYWORD_KEY) == 0 + && (cache_entry = metadata_cache_get(fd, key))) + { + return string_list_copy(cache_entry->next); } - if (keywords) + /* + Legacy metadata file is the primary source if it exists. + Merging the lists does not make much sense, because the existence of + legacy metadata file indicates that the other metadata sources are not + writable and thus it would not be possible to delete the keywords + that comes from the image file. + */ + if (strcmp(key, KEYWORD_KEY) == 0) { - ExifItem *item; - guint i; - - *keywords = NULL; - item = exif_get_item(exif, KEYWORD_KEY); - for (i = 0; i < exif_item_get_elements(item); i++) - { - gchar *kw = exif_item_get_string(item, i); - gchar *utf8_kw; - - if (!kw) break; - - utf8_kw = utf8_validate_or_convert(kw); - *keywords = g_list_append(*keywords, (gpointer) utf8_kw); - g_free(kw); - } - - /* FIXME: - * Exiv2 handles Iptc keywords as multiple entries with the - * same key, thus exif_get_item returns only the first keyword - * and the only way to get all keywords is to iterate through - * the item list. - */ - for (item = exif_get_first_item(exif); - item; - item = exif_get_next_item(exif)) - { - guint tag; - - tag = exif_item_get_tag_id(item); - if (tag == 0x0019) + if (metadata_legacy_read(fd, &list, NULL)) + { + if (format == METADATA_PLAIN) { - gchar *tag_name = exif_item_get_tag_name(item); - - if (strcmp(tag_name, "Iptc.Application2.Keywords") == 0) - { - gchar *kw; - gchar *utf8_kw; - - kw = exif_item_get_data_as_text(item); - if (!kw) continue; - - utf8_kw = utf8_validate_or_convert(kw); - *keywords = g_list_append(*keywords, (gpointer) utf8_kw); - g_free(kw); - } - g_free(tag_name); + metadata_cache_update(fd, key, list); } + return list; } } + else if (strcmp(key, COMMENT_KEY) == 0) + { + gchar *comment = NULL; + if (metadata_legacy_read(fd, NULL, &comment)) return g_list_append(NULL, comment); + } + else if (strncmp(key, "file.", 5) == 0) + { + return g_list_append(NULL, metadata_file_info(fd, key, format)); + } + exif = exif_read_fd(fd); /* this is cached, thus inexpensive */ + if (!exif) return NULL; + list = exif_get_metadata(exif, key, format); exif_free_fd(fd, exif); - return (comment && *comment) || (keywords && *keywords); + if (format == METADATA_PLAIN && strcmp(key, KEYWORD_KEY) == 0) + { + metadata_cache_update(fd, key, list); + } + + return list; } -gint metadata_write(FileData *fd, GList *keywords, const gchar *comment) +gchar *metadata_read_string(FileData *fd, const gchar *key, MetadataFormat format) { - gint success = TRUE; - gint write_comment = (comment && comment[0]); + GList *string_list = metadata_read_list(fd, key, format); + if (string_list) + { + gchar *str = string_list->data; + string_list->data = NULL; + string_list_free(string_list); + return str; + } + return NULL; +} - if (!fd) return FALSE; +guint64 metadata_read_int(FileData *fd, const gchar *key, guint64 fallback) +{ + guint64 ret; + gchar *endptr; + gchar *string = metadata_read_string(fd, key, METADATA_PLAIN); + if (!string) return fallback; + + ret = g_ascii_strtoull(string, &endptr, 10); + if (string == endptr) ret = fallback; + g_free(string); + return ret; +} - if (write_comment) success = success && metadata_write_string(fd, COMMENT_KEY, comment); - if (keywords) success = success && metadata_write_list(fd, KEYWORD_KEY, string_list_copy(keywords)); - - if (options->metadata.sync_grouped_files) +gdouble metadata_read_GPS_coord(FileData *fd, const gchar *key, gdouble fallback) +{ + gdouble coord; + gchar *endptr; + gdouble deg, min, sec; + gboolean ok = FALSE; + gchar *string = metadata_read_string(fd, key, METADATA_PLAIN); + if (!string) return fallback; + + deg = g_ascii_strtod(string, &endptr); + if (*endptr == ',') { - GList *work = fd->sidecar_files; - - while (work) - { - FileData *sfd = work->data; - work = work->next; - - if (filter_file_class(sfd->extension, FORMAT_CLASS_META)) continue; + min = g_ascii_strtod(endptr + 1, &endptr); + if (*endptr == ',') + sec = g_ascii_strtod(endptr + 1, &endptr); + else + sec = 0.0; - if (write_comment) success = success && metadata_write_string(sfd, COMMENT_KEY, comment); - if (keywords) success = success && metadata_write_list(sfd, KEYWORD_KEY, string_list_copy(keywords)); + + if (*endptr == 'S' || *endptr == 'W' || *endptr == 'N' || *endptr == 'E') + { + coord = deg + min /60.0 + sec / 3600.0; + ok = TRUE; + if (*endptr == 'S' || *endptr == 'W') coord = -coord; } } - return success; + if (!ok) + { + coord = fallback; + log_printf("unable to parse GPS coordinate '%s'\n", string); + } + + g_free(string); + return coord; } -gint metadata_read(FileData *fd, GList **keywords, gchar **comment) +gdouble metadata_read_GPS_direction(FileData *fd, const gchar *key, gdouble fallback) { - GList *keywords_xmp = NULL; - GList *keywords_legacy = NULL; - gchar *comment_xmp = NULL; - gchar *comment_legacy = NULL; - gint result_xmp, result_legacy; - - if (!fd) return FALSE; + gchar *endptr; + gdouble deg; + gboolean ok = FALSE; + gchar *string = metadata_read_string(fd, key, METADATA_PLAIN); + if (!string) return fallback; - result_xmp = metadata_xmp_read(fd, &keywords_xmp, &comment_xmp); - result_legacy = metadata_legacy_read(fd, &keywords_legacy, &comment_legacy); + DEBUG_3("GPS_direction: %s\n", string); + deg = g_ascii_strtod(string, &endptr); - if (!result_xmp && !result_legacy) + /* Expected text string is of the format e.g.: + * 18000/100 + */ + if (*endptr == '/') { - return FALSE; + deg = deg/100; + ok = TRUE; } - if (keywords) + if (!ok) { - if (result_xmp && result_legacy) - *keywords = g_list_concat(keywords_xmp, keywords_legacy); - else - *keywords = result_xmp ? keywords_xmp : keywords_legacy; + deg = fallback; + log_printf("unable to parse GPS direction '%s: %f'\n", string, deg); + } + + g_free(string); + + return deg; +} + +gboolean metadata_append_string(FileData *fd, const gchar *key, const char *value) +{ + gchar *str = metadata_read_string(fd, key, METADATA_PLAIN); - *keywords = remove_duplicate_strings_from_list(*keywords); + if (!str) + { + return metadata_write_string(fd, key, value); } else { - if (result_xmp) string_list_free(keywords_xmp); - if (result_legacy) string_list_free(keywords_legacy); + gchar *new_string = g_strconcat(str, value, NULL); + gboolean ret = metadata_write_string(fd, key, new_string); + g_free(str); + g_free(new_string); + return ret; } +} - - if (comment) - { - if (result_xmp && result_legacy && comment_xmp && comment_legacy && *comment_xmp && *comment_legacy) - *comment = g_strdup_printf("%s\n%s", comment_xmp, comment_legacy); +gboolean metadata_write_GPS_coord(FileData *fd, const gchar *key, gdouble value) +{ + gint deg; + gdouble min; + gdouble param; + char *coordinate; + char *ref; + gboolean ok = TRUE; + + param = value; + if (param < 0) + param = -param; + deg = param; + min = (param * 60) - (deg * 60); + if (g_strcmp0(key, "Xmp.exif.GPSLongitude") == 0) + if (value < 0) + ref = "W"; else - *comment = result_xmp ? comment_xmp : comment_legacy; + ref = "E"; + else if (g_strcmp0(key, "Xmp.exif.GPSLatitude") == 0) + if (value < 0) + ref = "S"; + else + ref = "N"; + else + { + log_printf("unknown GPS parameter key '%s'\n", key); + ok = FALSE; } - if (result_xmp && (!comment || *comment != comment_xmp)) g_free(comment_xmp); - if (result_legacy && (!comment || *comment != comment_legacy)) g_free(comment_legacy); - - // return FALSE in the following cases: - // - only looking for a comment and didn't find one - // - only looking for keywords and didn't find any - // - looking for either a comment or keywords, but found nothing - if ((!keywords && comment && !*comment) || - (!comment && keywords && !*keywords) || - ( comment && !*comment && keywords && !*keywords)) - return FALSE; + if (ok) + { + coordinate = g_strdup_printf("%i,%lf,%s", deg, min, ref); + metadata_write_string(fd, key, coordinate ); + g_free(coordinate); + } - return TRUE; + return ok; } -void metadata_set(FileData *fd, GList *new_keywords, gchar *new_comment, gboolean append) +gboolean metadata_append_list(FileData *fd, const gchar *key, const GList *values) { - gchar *comment = NULL; - GList *keywords = NULL; - GList *keywords_list = NULL; + GList *list = metadata_read_list(fd, key, METADATA_PLAIN); - metadata_read(fd, &keywords, &comment); - - if (new_comment) + if (!list) { - if (append && comment && *comment) - { - gchar *tmp = comment; - - comment = g_strconcat(tmp, new_comment, NULL); - g_free(tmp); - } - else - { - g_free(comment); - comment = g_strdup(new_comment); - } + return metadata_write_list(fd, key, values); } - - if (new_keywords) + else { - if (append && keywords && g_list_length(keywords) > 0) - { - GList *work; + gboolean ret; + list = g_list_concat(list, string_list_copy(values)); + list = remove_duplicate_strings_from_list(list); - work = new_keywords; - while (work) - { - gchar *key; - GList *p; + ret = metadata_write_list(fd, key, list); + string_list_free(list); + return ret; + } +} - key = work->data; - work = work->next; +/** + * \see find_string_in_list + */ +gchar *find_string_in_list_utf8nocase(GList *list, const gchar *string) +{ + gchar *string_casefold = g_utf8_casefold(string, -1); - p = keywords; - while (p && key) - { - gchar *needle = p->data; - p = p->next; + while (list) + { + gchar *haystack = list->data; - if (strcmp(needle, key) == 0) key = NULL; - } + if (haystack) + { + gboolean equal; + gchar *haystack_casefold = g_utf8_casefold(haystack, -1); - if (key) keywords = g_list_append(keywords, g_strdup(key)); + equal = (strcmp(haystack_casefold, string_casefold) == 0); + g_free(haystack_casefold); + + if (equal) + { + g_free(string_casefold); + return haystack; } - keywords_list = keywords; - } - else - { - keywords_list = new_keywords; } + + list = list->next; } - - metadata_write(fd, keywords_list, comment); - string_list_free(keywords); - g_free(comment); + g_free(string_casefold); + return NULL; } -gboolean find_string_in_list(GList *list, const gchar *string) +/** + * \see find_string_in_list + */ +gchar *find_string_in_list_utf8case(GList *list, const gchar *string) { while (list) { gchar *haystack = list->data; - if (haystack && string && strcmp(haystack, string) == 0) return TRUE; + if (haystack && strcmp(haystack, string) == 0) + return haystack; list = list->next; - } + } // while (list) - return FALSE; + return NULL; +} // gchar *find_string_in_list_utf... + +/** + * \brief Find a existent string in a list. + * + * This is a switch between find_string_in_list_utf8case and + * find_string_in_list_utf8nocase to search with or without case for the + * existence of a string. + * + * \param list The list to search in + * \param string The string to search for + * \return The string or NULL + * + * \see find_string_in_list_utf8case + * \see find_string_in_list_utf8nocase + */ +gchar *find_string_in_list(GList *list, const gchar *string) +{ + if (options->metadata.keywords_case_sensitive) + return find_string_in_list_utf8case(list, string); + else + return find_string_in_list_utf8nocase(list, string); } #define KEYWORDS_SEPARATOR(c) ((c) == ',' || (c) == ';' || (c) == '\n' || (c) == '\r' || (c) == '\b') @@ -768,7 +995,7 @@ GList *string_to_keywords_list(const gchar *text) gchar *keyword = g_strndup(begin, l); /* only add if not already in the list */ - if (find_string_in_list(list, keyword) == FALSE) + if (!find_string_in_list(list, keyword)) list = g_list_append(list, keyword); else g_free(keyword); @@ -778,4 +1005,811 @@ GList *string_to_keywords_list(const gchar *text) return list; } +/* + * keywords to marks + */ + + +gboolean meta_data_get_keyword_mark(FileData *fd, gint n, gpointer data) +{ + /* FIXME: do not use global keyword_tree */ + GList *path = data; + GList *keywords; + gboolean found = FALSE; + keywords = metadata_read_list(fd, KEYWORD_KEY, METADATA_PLAIN); + if (keywords) + { + GtkTreeIter iter; + if (keyword_tree_get_iter(GTK_TREE_MODEL(keyword_tree), &iter, path) && + keyword_tree_is_set(GTK_TREE_MODEL(keyword_tree), &iter, keywords)) + found = TRUE; + + } + return found; +} + +gboolean meta_data_set_keyword_mark(FileData *fd, gint n, gboolean value, gpointer data) +{ + GList *path = data; + GList *keywords = NULL; + GtkTreeIter iter; + + if (!keyword_tree_get_iter(GTK_TREE_MODEL(keyword_tree), &iter, path)) return FALSE; + + keywords = metadata_read_list(fd, KEYWORD_KEY, METADATA_PLAIN); + + if (!!keyword_tree_is_set(GTK_TREE_MODEL(keyword_tree), &iter, keywords) != !!value) + { + if (value) + { + keyword_tree_set(GTK_TREE_MODEL(keyword_tree), &iter, &keywords); + } + else + { + keyword_tree_reset(GTK_TREE_MODEL(keyword_tree), &iter, &keywords); + } + metadata_write_list(fd, KEYWORD_KEY, keywords); + } + + string_list_free(keywords); + return TRUE; +} + + + +void meta_data_connect_mark_with_keyword(GtkTreeModel *keyword_tree, GtkTreeIter *kw_iter, gint mark) +{ + + FileDataGetMarkFunc get_mark_func; + FileDataSetMarkFunc set_mark_func; + gpointer mark_func_data; + + gint i; + + for (i = 0; i < FILEDATA_MARKS_SIZE; i++) + { + file_data_get_registered_mark_func(i, &get_mark_func, &set_mark_func, &mark_func_data); + if (get_mark_func == meta_data_get_keyword_mark) + { + GtkTreeIter old_kw_iter; + GList *old_path = mark_func_data; + + if (keyword_tree_get_iter(keyword_tree, &old_kw_iter, old_path) && + (i == mark || /* release any previous connection of given mark */ + keyword_compare(keyword_tree, &old_kw_iter, kw_iter) == 0)) /* or given keyword */ + { + file_data_register_mark_func(i, NULL, NULL, NULL, NULL); + gtk_tree_store_set(GTK_TREE_STORE(keyword_tree), &old_kw_iter, KEYWORD_COLUMN_MARK, "", -1); + } + } + } + + + if (mark >= 0 && mark < FILEDATA_MARKS_SIZE) + { + GList *path; + gchar *mark_str; + path = keyword_tree_get_path(keyword_tree, kw_iter); + file_data_register_mark_func(mark, meta_data_get_keyword_mark, meta_data_set_keyword_mark, path, (GDestroyNotify)string_list_free); + + mark_str = g_strdup_printf("%d", mark + 1); + gtk_tree_store_set(GTK_TREE_STORE(keyword_tree), kw_iter, KEYWORD_COLUMN_MARK, mark_str, -1); + g_free(mark_str); + } +} + + +/* + *------------------------------------------------------------------- + * keyword tree + *------------------------------------------------------------------- + */ + + + +GtkTreeStore *keyword_tree; + +gchar *keyword_get_name(GtkTreeModel *keyword_tree, GtkTreeIter *iter) +{ + gchar *name; + gtk_tree_model_get(keyword_tree, iter, KEYWORD_COLUMN_NAME, &name, -1); + return name; +} + +gchar *keyword_get_casefold(GtkTreeModel *keyword_tree, GtkTreeIter *iter) +{ + gchar *casefold; + gtk_tree_model_get(keyword_tree, iter, KEYWORD_COLUMN_CASEFOLD, &casefold, -1); + return casefold; +} + +gboolean keyword_get_is_keyword(GtkTreeModel *keyword_tree, GtkTreeIter *iter) +{ + gboolean is_keyword; + gtk_tree_model_get(keyword_tree, iter, KEYWORD_COLUMN_IS_KEYWORD, &is_keyword, -1); + return is_keyword; +} + +void keyword_set(GtkTreeStore *keyword_tree, GtkTreeIter *iter, const gchar *name, gboolean is_keyword) +{ + gchar *casefold = g_utf8_casefold(name, -1); + gtk_tree_store_set(keyword_tree, iter, KEYWORD_COLUMN_MARK, "", + KEYWORD_COLUMN_NAME, name, + KEYWORD_COLUMN_CASEFOLD, casefold, + KEYWORD_COLUMN_IS_KEYWORD, is_keyword, -1); + g_free(casefold); +} + +gboolean keyword_compare(GtkTreeModel *keyword_tree, GtkTreeIter *a, GtkTreeIter *b) +{ + GtkTreePath *pa = gtk_tree_model_get_path(keyword_tree, a); + GtkTreePath *pb = gtk_tree_model_get_path(keyword_tree, b); + gint ret = gtk_tree_path_compare(pa, pb); + gtk_tree_path_free(pa); + gtk_tree_path_free(pb); + return ret; +} + +gboolean keyword_same_parent(GtkTreeModel *keyword_tree, GtkTreeIter *a, GtkTreeIter *b) +{ + GtkTreeIter parent_a; + GtkTreeIter parent_b; + + gboolean valid_pa = gtk_tree_model_iter_parent(keyword_tree, &parent_a, a); + gboolean valid_pb = gtk_tree_model_iter_parent(keyword_tree, &parent_b, b); + + if (valid_pa && valid_pb) + { + return keyword_compare(keyword_tree, &parent_a, &parent_b) == 0; + } + else + { + return (!valid_pa && !valid_pb); /* both are toplevel */ + } +} + +gboolean keyword_exists(GtkTreeModel *keyword_tree, GtkTreeIter *parent_ptr, GtkTreeIter *sibling, const gchar *name, gboolean exclude_sibling, GtkTreeIter *result) +{ + GtkTreeIter parent; + GtkTreeIter iter; + gboolean toplevel = FALSE; + gboolean ret; + gchar *casefold; + + if (parent_ptr) + { + parent = *parent_ptr; + } + else if (sibling) + { + toplevel = !gtk_tree_model_iter_parent(keyword_tree, &parent, sibling); + } + else + { + toplevel = TRUE; + } + + if (!gtk_tree_model_iter_children(GTK_TREE_MODEL(keyword_tree), &iter, toplevel ? NULL : &parent)) return FALSE; + + casefold = g_utf8_casefold(name, -1); + ret = FALSE; + + while (TRUE) + { + if (!(exclude_sibling && sibling && keyword_compare(keyword_tree, &iter, sibling) == 0)) + { + if (options->metadata.keywords_case_sensitive) + { + gchar *iter_name = keyword_get_name(keyword_tree, &iter); + ret = strcmp(name, iter_name) == 0; + g_free(iter_name); + } + else + { + gchar *iter_casefold = keyword_get_casefold(keyword_tree, &iter); + ret = strcmp(casefold, iter_casefold) == 0; + g_free(iter_casefold); + } // if (options->metadata.tags_cas... + } + if (ret) + { + if (result) *result = iter; + break; + } + if (!gtk_tree_model_iter_next(keyword_tree, &iter)) break; + } + g_free(casefold); + return ret; +} + + +void keyword_copy(GtkTreeStore *keyword_tree, GtkTreeIter *to, GtkTreeIter *from) +{ + + gchar *mark, *name, *casefold; + gboolean is_keyword; + + /* do not copy KEYWORD_COLUMN_HIDE_IN, it fully shows the new subtree */ + gtk_tree_model_get(GTK_TREE_MODEL(keyword_tree), from, KEYWORD_COLUMN_MARK, &mark, + KEYWORD_COLUMN_NAME, &name, + KEYWORD_COLUMN_CASEFOLD, &casefold, + KEYWORD_COLUMN_IS_KEYWORD, &is_keyword, -1); + + gtk_tree_store_set(keyword_tree, to, KEYWORD_COLUMN_MARK, mark, + KEYWORD_COLUMN_NAME, name, + KEYWORD_COLUMN_CASEFOLD, casefold, + KEYWORD_COLUMN_IS_KEYWORD, is_keyword, -1); + g_free(mark); + g_free(name); + g_free(casefold); +} + +void keyword_copy_recursive(GtkTreeStore *keyword_tree, GtkTreeIter *to, GtkTreeIter *from) +{ + GtkTreeIter from_child; + + keyword_copy(keyword_tree, to, from); + + if (!gtk_tree_model_iter_children(GTK_TREE_MODEL(keyword_tree), &from_child, from)) return; + + while (TRUE) + { + GtkTreeIter to_child; + gtk_tree_store_append(keyword_tree, &to_child, to); + keyword_copy_recursive(keyword_tree, &to_child, &from_child); + if (!gtk_tree_model_iter_next(GTK_TREE_MODEL(keyword_tree), &from_child)) return; + } +} + +void keyword_move_recursive(GtkTreeStore *keyword_tree, GtkTreeIter *to, GtkTreeIter *from) +{ + keyword_copy_recursive(keyword_tree, to, from); + keyword_delete(keyword_tree, from); +} + +GList *keyword_tree_get_path(GtkTreeModel *keyword_tree, GtkTreeIter *iter_ptr) +{ + GList *path = NULL; + GtkTreeIter iter = *iter_ptr; + + while (TRUE) + { + GtkTreeIter parent; + path = g_list_prepend(path, keyword_get_name(keyword_tree, &iter)); + if (!gtk_tree_model_iter_parent(keyword_tree, &parent, &iter)) break; + iter = parent; + } + return path; +} + +gboolean keyword_tree_get_iter(GtkTreeModel *keyword_tree, GtkTreeIter *iter_ptr, GList *path) +{ + GtkTreeIter iter; + + if (!gtk_tree_model_get_iter_first(keyword_tree, &iter)) return FALSE; + + while (TRUE) + { + GtkTreeIter children; + while (TRUE) + { + gchar *name = keyword_get_name(keyword_tree, &iter); + if (strcmp(name, path->data) == 0) break; + g_free(name); + if (!gtk_tree_model_iter_next(keyword_tree, &iter)) return FALSE; + } + path = path->next; + if (!path) + { + *iter_ptr = iter; + return TRUE; + } + + if (!gtk_tree_model_iter_children(keyword_tree, &children, &iter)) return FALSE; + iter = children; + } +} + + +static gboolean keyword_tree_is_set_casefold(GtkTreeModel *keyword_tree, GtkTreeIter iter, GList *casefold_list) +{ + if (!casefold_list) return FALSE; + + if (!keyword_get_is_keyword(keyword_tree, &iter)) + { + /* for the purpose of expanding and hiding, a helper is set if it has any children set */ + GtkTreeIter child; + if (!gtk_tree_model_iter_children(keyword_tree, &child, &iter)) + return FALSE; /* this should happen only on empty helpers */ + + while (TRUE) + { + if (keyword_tree_is_set_casefold(keyword_tree, child, casefold_list)) return TRUE; + if (!gtk_tree_model_iter_next(keyword_tree, &child)) return FALSE; + } + } + + while (TRUE) + { + GtkTreeIter parent; + + if (keyword_get_is_keyword(keyword_tree, &iter)) + { + GList *work = casefold_list; + gboolean found = FALSE; + gchar *iter_casefold = keyword_get_casefold(keyword_tree, &iter); + while (work) + { + const gchar *casefold = work->data; + work = work->next; + + if (strcmp(iter_casefold, casefold) == 0) + { + found = TRUE; + break; + } + } + g_free(iter_casefold); + if (!found) return FALSE; + } + + if (!gtk_tree_model_iter_parent(keyword_tree, &parent, &iter)) return TRUE; + iter = parent; + } +} + +static gboolean keyword_tree_is_set_casefull(GtkTreeModel *keyword_tree, GtkTreeIter iter, GList *kw_list) +{ + if (!kw_list) return FALSE; + + if (!keyword_get_is_keyword(keyword_tree, &iter)) + { + /* for the purpose of expanding and hiding, a helper is set if it has any children set */ + GtkTreeIter child; + if (!gtk_tree_model_iter_children(keyword_tree, &child, &iter)) + return FALSE; /* this should happen only on empty helpers */ + + while (TRUE) + { + if (keyword_tree_is_set_casefull(keyword_tree, child, kw_list)) return TRUE; + if (!gtk_tree_model_iter_next(keyword_tree, &child)) return FALSE; + } + } + + while (TRUE) + { + GtkTreeIter parent; + + if (keyword_get_is_keyword(keyword_tree, &iter)) + { + GList *work = kw_list; + gboolean found = FALSE; + gchar *iter_name = keyword_get_name(keyword_tree, &iter); + while (work) + { + const gchar *name = work->data; + work = work->next; + + if (strcmp(iter_name, name) == 0) + { + found = TRUE; + break; + } + } + g_free(iter_name); + if (!found) return FALSE; + } + + if (!gtk_tree_model_iter_parent(keyword_tree, &parent, &iter)) return TRUE; + iter = parent; + } +} + +gboolean keyword_tree_is_set(GtkTreeModel *keyword_tree, GtkTreeIter *iter, GList *kw_list) +{ + gboolean ret; + GList *casefold_list = NULL; + GList *work; + + if (options->metadata.keywords_case_sensitive) + { + ret = keyword_tree_is_set_casefull(keyword_tree, *iter, kw_list); + } + else + { + work = kw_list; + while (work) + { + const gchar *kw = work->data; + work = work->next; + + casefold_list = g_list_prepend(casefold_list, g_utf8_casefold(kw, -1)); + } + + ret = keyword_tree_is_set_casefold(keyword_tree, *iter, casefold_list); + + string_list_free(casefold_list); + } + + return ret; +} + +void keyword_tree_set(GtkTreeModel *keyword_tree, GtkTreeIter *iter_ptr, GList **kw_list) +{ + GtkTreeIter iter = *iter_ptr; + while (TRUE) + { + GtkTreeIter parent; + + if (keyword_get_is_keyword(keyword_tree, &iter)) + { + gchar *name = keyword_get_name(keyword_tree, &iter); + if (!find_string_in_list(*kw_list, name)) + { + *kw_list = g_list_append(*kw_list, name); + } + else + { + g_free(name); + } + } + + if (!gtk_tree_model_iter_parent(keyword_tree, &parent, &iter)) return; + iter = parent; + } +} + +GList *keyword_tree_get(GtkTreeModel *keyword_tree, GtkTreeIter *iter_ptr) +{ + GtkTreeIter iter = *iter_ptr; + GList *kw_list = NULL; + + while (TRUE) + { + GtkTreeIter parent; + + if (keyword_get_is_keyword(keyword_tree, &iter)) + { + gchar *name = keyword_get_name(keyword_tree, &iter); + kw_list = g_list_append(kw_list, name); + } + + if (!gtk_tree_model_iter_parent(keyword_tree, &parent, &iter)) return kw_list; + iter = parent; + } +} // GList *keyword_tree_get(GtkTre... + +static void keyword_tree_reset1(GtkTreeModel *keyword_tree, GtkTreeIter *iter, GList **kw_list) +{ + gchar *found; + gchar *name; + if (!keyword_get_is_keyword(keyword_tree, iter)) return; + + name = keyword_get_name(keyword_tree, iter); + found = find_string_in_list(*kw_list, name); + + if (found) + { + *kw_list = g_list_remove(*kw_list, found); + g_free(found); + } + g_free(name); +} + +static void keyword_tree_reset_recursive(GtkTreeModel *keyword_tree, GtkTreeIter *iter, GList **kw_list) +{ + GtkTreeIter child; + keyword_tree_reset1(keyword_tree, iter, kw_list); + + if (!gtk_tree_model_iter_children(keyword_tree, &child, iter)) return; + + while (TRUE) + { + keyword_tree_reset_recursive(keyword_tree, &child, kw_list); + if (!gtk_tree_model_iter_next(keyword_tree, &child)) return; + } +} + +static gboolean keyword_tree_check_empty_children(GtkTreeModel *keyword_tree, GtkTreeIter *parent, GList *kw_list) +{ + GtkTreeIter iter; + + if (!gtk_tree_model_iter_children(keyword_tree, &iter, parent)) + return TRUE; /* this should happen only on empty helpers */ + + while (TRUE) + { + if (keyword_tree_is_set(keyword_tree, &iter, kw_list)) return FALSE; + if (!gtk_tree_model_iter_next(keyword_tree, &iter)) return TRUE; + } +} + +void keyword_tree_reset(GtkTreeModel *keyword_tree, GtkTreeIter *iter_ptr, GList **kw_list) +{ + GtkTreeIter iter = *iter_ptr; + GtkTreeIter parent; + keyword_tree_reset_recursive(keyword_tree, &iter, kw_list); + + if (!gtk_tree_model_iter_parent(keyword_tree, &parent, &iter)) return; + iter = parent; + + while (keyword_tree_check_empty_children(keyword_tree, &iter, *kw_list)) + { + GtkTreeIter parent; + keyword_tree_reset1(keyword_tree, &iter, kw_list); + if (!gtk_tree_model_iter_parent(keyword_tree, &parent, &iter)) return; + iter = parent; + } +} + +void keyword_delete(GtkTreeStore *keyword_tree, GtkTreeIter *iter_ptr) +{ + GList *list; + GtkTreeIter child; + while (gtk_tree_model_iter_children(GTK_TREE_MODEL(keyword_tree), &child, iter_ptr)) + { + keyword_delete(keyword_tree, &child); + } + + meta_data_connect_mark_with_keyword(GTK_TREE_MODEL(keyword_tree), iter_ptr, -1); + + gtk_tree_model_get(GTK_TREE_MODEL(keyword_tree), iter_ptr, KEYWORD_COLUMN_HIDE_IN, &list, -1); + g_list_free(list); + + gtk_tree_store_remove(keyword_tree, iter_ptr); +} + + +void keyword_hide_in(GtkTreeStore *keyword_tree, GtkTreeIter *iter, gpointer id) +{ + GList *list; + gtk_tree_model_get(GTK_TREE_MODEL(keyword_tree), iter, KEYWORD_COLUMN_HIDE_IN, &list, -1); + if (!g_list_find(list, id)) + { + list = g_list_prepend(list, id); + gtk_tree_store_set(keyword_tree, iter, KEYWORD_COLUMN_HIDE_IN, list, -1); + } +} + +void keyword_show_in(GtkTreeStore *keyword_tree, GtkTreeIter *iter, gpointer id) +{ + GList *list; + gtk_tree_model_get(GTK_TREE_MODEL(keyword_tree), iter, KEYWORD_COLUMN_HIDE_IN, &list, -1); + list = g_list_remove(list, id); + gtk_tree_store_set(keyword_tree, iter, KEYWORD_COLUMN_HIDE_IN, list, -1); +} + +gboolean keyword_is_hidden_in(GtkTreeModel *keyword_tree, GtkTreeIter *iter, gpointer id) +{ + GList *list; + gtk_tree_model_get(keyword_tree, iter, KEYWORD_COLUMN_HIDE_IN, &list, -1); + return !!g_list_find(list, id); +} + +static gboolean keyword_show_all_in_cb(GtkTreeModel *model, GtkTreePath *path, GtkTreeIter *iter, gpointer data) +{ + keyword_show_in(GTK_TREE_STORE(model), iter, data); + return FALSE; +} + +void keyword_show_all_in(GtkTreeStore *keyword_tree, gpointer id) +{ + gtk_tree_model_foreach(GTK_TREE_MODEL(keyword_tree), keyword_show_all_in_cb, id); +} + +static void keyword_hide_unset_in_recursive(GtkTreeStore *keyword_tree, GtkTreeIter *iter_ptr, gpointer id, GList *keywords) +{ + GtkTreeIter iter = *iter_ptr; + while (TRUE) + { + if (!keyword_tree_is_set(GTK_TREE_MODEL(keyword_tree), &iter, keywords)) + { + keyword_hide_in(keyword_tree, &iter, id); + /* no need to check children of hidden node */ + } + else + { + GtkTreeIter child; + if (gtk_tree_model_iter_children(GTK_TREE_MODEL(keyword_tree), &child, &iter)) + { + keyword_hide_unset_in_recursive(keyword_tree, &child, id, keywords); + } + } + if (!gtk_tree_model_iter_next(GTK_TREE_MODEL(keyword_tree), &iter)) return; + } +} + +void keyword_hide_unset_in(GtkTreeStore *keyword_tree, gpointer id, GList *keywords) +{ + GtkTreeIter iter; + if (!gtk_tree_model_get_iter_first(GTK_TREE_MODEL(keyword_tree), &iter)) return; + keyword_hide_unset_in_recursive(keyword_tree, &iter, id, keywords); +} + +static gboolean keyword_show_set_in_cb(GtkTreeModel *model, GtkTreePath *path, GtkTreeIter *iter_ptr, gpointer data) +{ + GtkTreeIter iter = *iter_ptr; + GList *keywords = data; + gpointer id = keywords->data; + keywords = keywords->next; /* hack */ + if (keyword_tree_is_set(model, &iter, keywords)) + { + while (TRUE) + { + GtkTreeIter parent; + keyword_show_in(GTK_TREE_STORE(model), &iter, id); + if (!gtk_tree_model_iter_parent(GTK_TREE_MODEL(keyword_tree), &parent, &iter)) break; + iter = parent; + } + } + return FALSE; +} + +void keyword_show_set_in(GtkTreeStore *keyword_tree, gpointer id, GList *keywords) +{ + /* hack: pass id to keyword_hide_unset_in_cb in the list */ + keywords = g_list_prepend(keywords, id); + gtk_tree_model_foreach(GTK_TREE_MODEL(keyword_tree), keyword_show_set_in_cb, keywords); + keywords = g_list_delete_link(keywords, keywords); +} + + +void keyword_tree_new(void) +{ + if (keyword_tree) return; + + keyword_tree = gtk_tree_store_new(KEYWORD_COLUMN_COUNT, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_BOOLEAN, G_TYPE_POINTER); +} + +static GtkTreeIter keyword_tree_default_append(GtkTreeStore *keyword_tree, GtkTreeIter *parent, const gchar *name, gboolean is_keyword) +{ + GtkTreeIter iter; + gtk_tree_store_append(keyword_tree, &iter, parent); + keyword_set(keyword_tree, &iter, name, is_keyword); + return iter; +} + +void keyword_tree_new_default(void) +{ + GtkTreeIter i1, i2; + + if (!keyword_tree) keyword_tree_new(); + + i1 = keyword_tree_default_append(keyword_tree, NULL, _("People"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Family"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Free time"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Children"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Sport"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Culture"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Festival"), TRUE); + i1 = keyword_tree_default_append(keyword_tree, NULL, _("Nature"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Animal"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Bird"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Insect"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Pets"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Wildlife"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Zoo"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Plant"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Tree"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Flower"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Water"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("River"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Lake"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Sea"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Landscape"), TRUE); + i1 = keyword_tree_default_append(keyword_tree, NULL, _("Art"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Statue"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Painting"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Historic"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Modern"), TRUE); + i1 = keyword_tree_default_append(keyword_tree, NULL, _("City"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Park"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Street"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Square"), TRUE); + i1 = keyword_tree_default_append(keyword_tree, NULL, _("Architecture"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Buildings"), FALSE); + keyword_tree_default_append(keyword_tree, &i2, _("House"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Cathedral"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Palace"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Castle"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Bridge"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Interior"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Historic"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Modern"), TRUE); + i1 = keyword_tree_default_append(keyword_tree, NULL, _("Places"), FALSE); + i1 = keyword_tree_default_append(keyword_tree, NULL, _("Conditions"), FALSE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Night"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Lights"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Reflections"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Sun"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Weather"), FALSE); + keyword_tree_default_append(keyword_tree, &i2, _("Fog"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Rain"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Clouds"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Snow"), TRUE); + keyword_tree_default_append(keyword_tree, &i2, _("Sunny weather"), TRUE); + i1 = keyword_tree_default_append(keyword_tree, NULL, _("Photo"), FALSE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Edited"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Detail"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Macro"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Portrait"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Black and White"), TRUE); + i2 = keyword_tree_default_append(keyword_tree, &i1, _("Perspective"), TRUE); +} + + +static void keyword_tree_node_write_config(GtkTreeModel *keyword_tree, GtkTreeIter *iter_ptr, GString *outstr, gint indent) +{ + GtkTreeIter iter = *iter_ptr; + while (TRUE) + { + GtkTreeIter children; + gchar *name; + + WRITE_NL(); WRITE_STRING(""); + indent++; + keyword_tree_node_write_config(keyword_tree, &children, outstr, indent); + indent--; + WRITE_NL(); WRITE_STRING(""); + } + else + { + WRITE_STRING("/>"); + } + if (!gtk_tree_model_iter_next(keyword_tree, &iter)) return; + } +} + +void keyword_tree_write_config(GString *outstr, gint indent) +{ + GtkTreeIter iter; + WRITE_NL(); WRITE_STRING(""); + indent++; + + if (keyword_tree && gtk_tree_model_get_iter_first(GTK_TREE_MODEL(keyword_tree), &iter)) + { + keyword_tree_node_write_config(GTK_TREE_MODEL(keyword_tree), &iter, outstr, indent); + } + indent--; + WRITE_NL(); WRITE_STRING(""); +} + +GtkTreeIter *keyword_add_from_config(GtkTreeStore *keyword_tree, GtkTreeIter *parent, const gchar **attribute_names, const gchar **attribute_values) +{ + gchar *name = NULL; + gboolean is_kw = TRUE; + + while (*attribute_names) + { + const gchar *option = *attribute_names++; + const gchar *value = *attribute_values++; + + if (READ_CHAR_FULL("name", name)) continue; + if (READ_BOOL_FULL("kw", is_kw)) continue; + + log_printf("unknown attribute %s = %s\n", option, value); + } + if (name && name[0]) + { + GtkTreeIter iter; + /* re-use existing keyword if any */ + if (!keyword_exists(GTK_TREE_MODEL(keyword_tree), parent, NULL, name, FALSE, &iter)) + { + gtk_tree_store_append(keyword_tree, &iter, parent); + } + keyword_set(keyword_tree, &iter, name, is_kw); + g_free(name); + return gtk_tree_iter_copy(&iter); + } + g_free(name); + return NULL; +} + /* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */