/*
- * 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"
#include "ui_fileops.h"
#include "ui_misc.h"
#include "utilops.h"
+#include "filefilter.h"
+#include "layout_util.h"
+#include "rcfile.h"
typedef enum {
MK_NONE,
MK_COMMENT
} MetadataKey;
+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 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);
+
+
+/*
+ *-------------------------------------------------------------------
+ * long-term cache - keep keywords from whole dir in memory
+ *-------------------------------------------------------------------
+ */
+
+/* fd->cached metadata list of lists
+ each particular list contains key as a first entry, then the values
+*/
+
+static void metadata_cache_update(FileData *fd, const gchar *key, const GList *values)
+{
+ 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 - 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;
+ }
+
+ /* 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 const GList *metadata_cache_get(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 */
+ 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))
+ {
+ 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)
+ {
+ g_source_remove(metadata_write_idle_id);
+ metadata_write_idle_id = 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);
+ }
+}
+
+
+gboolean metadata_write_queue_remove(FileData *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_REREAD);
+
+ file_data_unref(fd);
+
+ layout_util_status_update_write_all();
+ return TRUE;
+}
+
+gboolean metadata_write_queue_remove_list(GList *list)
+{
+ GList *work;
+ gboolean ret = TRUE;
+
+ work = list;
+ while (work)
+ {
+ FileData *fd = work->data;
+ work = work->next;
+ ret = ret && metadata_write_queue_remove(fd);
+ }
+ 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 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 */
+
+ to_approve = g_list_prepend(to_approve, file_data_ref(fd));
+ }
+
+ 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(FALSE, NULL, NULL);
+ metadata_write_idle_id = 0;
+ return FALSE;
+}
+
+gboolean metadata_write_perform(FileData *fd)
+{
+ gboolean success;
+ ExifData *exif;
+
+ 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);
+ if (!exif) return FALSE;
+
+ 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;
+}
+
+gint metadata_queue_length(void)
+{
+ return g_list_length(metadata_write_queue);
+}
+
+static gboolean metadata_check_key(const gchar *keys[], const gchar *key)
+{
+ const gchar **k = keys;
+
+ while (*k)
+ {
+ 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;
+
+ g_hash_table_remove(fd->modified_xmp, key);
+
+ if (g_hash_table_size(fd->modified_xmp) == 0)
+ {
+ metadata_write_queue_remove(fd);
+ }
+ else
+ {
+ /* reread the metadata to restore the original value */
+ file_data_increment_version(fd);
+ file_data_send_notification(fd, NOTIFY_REREAD);
+ }
+ return TRUE;
+}
+
+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), 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;
+}
+
+gboolean metadata_write_string(FileData *fd, const gchar *key, const char *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);
+}
/*
*-------------------------------------------------------------------
*-------------------------------------------------------------------
*/
-static gint metadata_file_write(gchar *path, GList *keywords, const gchar *comment)
+static gboolean metadata_file_write(gchar *path, const GList *keywords, const gchar *comment)
{
SecureSaveInfo *ssi;
return (secure_close(ssi) == 0);
}
-static gint metadata_legacy_write(FileData *fd, GList *keywords, const gchar *comment)
+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, keywords, comment);
+ 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];
if (*ptr == '[' && key != MK_COMMENT)
{
gchar *keystr = ++ptr;
-
+
key = MK_NONE;
while (*ptr != ']' && *ptr != '\n' && *ptr != '\0') ptr++;
-
+
if (*ptr == ']')
{
*ptr = '\0';
}
continue;
}
-
- switch(key)
+
+ switch (key)
{
case MK_NONE:
break;
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)
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);
return g_list_reverse(newlist);
}
-#define COMMENT_KEY "Xmp.dc.description"
-#define KEYWORD_KEY "Xmp.dc.subject"
-
-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);
-}
-
-static gint metadata_xmp_write(FileData *fd, GList *keywords, const gchar *comment)
-{
- gint success;
- gint write_comment = (comment && comment[0]);
- ExifData *exif;
- ExifItem *item;
-
- exif = exif_read_fd(fd);
- if (!exif) return FALSE;
-
- item = exif_get_item(exif, COMMENT_KEY);
- if (item && !write_comment)
+ if (format == METADATA_PLAIN && strcmp(key, KEYWORD_KEY) == 0)
{
- exif_item_delete(exif, item);
- item = NULL;
+ metadata_cache_update(fd, key, list);
}
- if (!item && write_comment) item = exif_add_item(exif, COMMENT_KEY);
- if (item) exif_item_set_string(item, comment);
+ return list;
+}
- while ((item = exif_get_item(exif, KEYWORD_KEY)))
+gchar *metadata_read_string(FileData *fd, const gchar *key, MetadataFormat format)
+{
+ GList *string_list = metadata_read_list(fd, key, format);
+ if (string_list)
{
- exif_item_delete(exif, item);
+ gchar *str = string_list->data;
+ string_list->data = NULL;
+ string_list_free(string_list);
+ return str;
}
+ return NULL;
+}
- if (keywords)
+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;
+}
+
+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;
+ min = g_ascii_strtod(endptr + 1, &endptr);
+ if (*endptr == ',')
+ sec = g_ascii_strtod(endptr + 1, &endptr);
+ else
+ sec = 0.0;
- item = exif_add_item(exif, KEYWORD_KEY);
- work = keywords;
- while (work)
+ if (*endptr == 'S' || *endptr == 'W' || *endptr == 'N' || *endptr == 'E')
{
- exif_item_set_string(item, (gchar *) work->data);
- work = work->next;
+ coord = deg + min /60.0 + sec / 3600.0;
+ ok = TRUE;
+ if (*endptr == 'S' || *endptr == 'W') coord = -coord;
}
}
- success = exif_write(exif);
-
- exif_free_fd(fd, exif);
+ if (!ok)
+ {
+ coord = fallback;
+ log_printf("unable to parse GPS coordinate '%s'\n", string);
+ }
- return success;
+ g_free(string);
+ return coord;
}
-gint metadata_write(FileData *fd, GList *keywords, const gchar *comment)
+gdouble metadata_read_GPS_direction(FileData *fd, const gchar *key, gdouble fallback)
{
- if (!fd) return FALSE;
+ gchar *endptr;
+ gdouble deg;
+ gboolean ok = FALSE;
+ gchar *string = metadata_read_string(fd, key, METADATA_PLAIN);
+ if (!string) return fallback;
- if (options->save_metadata_in_image_file &&
- metadata_xmp_write(fd, keywords, comment))
+ DEBUG_3("GPS_direction: %s\n", string);
+ deg = g_ascii_strtod(string, &endptr);
+
+ /* Expected text string is of the format e.g.:
+ * 18000/100
+ */
+ if (*endptr == '/')
{
- metadata_legacy_delete(fd);
- return TRUE;
+ deg = deg/100;
+ ok = TRUE;
}
- return metadata_legacy_write(fd, keywords, comment);
-}
+ if (!ok)
+ {
+ deg = fallback;
+ log_printf("unable to parse GPS direction '%s: %f'\n", string, deg);
+ }
-gint metadata_read(FileData *fd, GList **keywords, gchar **comment)
-{
- GList *keywords_xmp = NULL;
- GList *keywords_legacy = NULL;
- gchar *comment_xmp = NULL;
- gchar *comment_legacy = NULL;
- gint result_xmp, result_legacy;
+ g_free(string);
- if (!fd) return FALSE;
+ return deg;
+}
- result_xmp = metadata_xmp_read(fd, &keywords_xmp, &comment_xmp);
- result_legacy = metadata_legacy_read(fd, &keywords_legacy, &comment_legacy);
+gboolean metadata_append_string(FileData *fd, const gchar *key, const char *value)
+{
+ gchar *str = metadata_read_string(fd, key, METADATA_PLAIN);
- if (!result_xmp && !result_legacy)
+ if (!str)
{
- return FALSE;
+ return metadata_write_string(fd, key, value);
}
-
- if (keywords)
+ else
{
- if (result_xmp && result_legacy)
- *keywords = g_list_concat(keywords_xmp, keywords_legacy);
- else
- *keywords = result_xmp ? keywords_xmp : keywords_legacy;
-
- *keywords = remove_duplicate_strings_from_list(*keywords);
+ 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;
}
+}
+
+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
+ ref = "E";
+ else if (g_strcmp0(key, "Xmp.exif.GPSLatitude") == 0)
+ if (value < 0)
+ ref = "S";
+ else
+ ref = "N";
else
{
- if (result_xmp) string_list_free(keywords_xmp);
- if (result_legacy) string_list_free(keywords_legacy);
+ log_printf("unknown GPS parameter key '%s'\n", key);
+ ok = FALSE;
}
-
- if (comment)
+ if (ok)
{
- if (result_xmp && result_legacy && comment_xmp && comment_legacy && *comment_xmp && *comment_legacy)
- *comment = g_strdup_printf("%s\n%s", comment_xmp, comment_legacy);
- else
- *comment = result_xmp ? comment_xmp : comment_legacy;
+ coordinate = g_strdup_printf("%i,%lf,%s", deg, min, ref);
+ metadata_write_string(fd, key, coordinate );
+ g_free(coordinate);
}
- 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;
-
- 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);
+
+ equal = (strcmp(haystack_casefold, string_casefold) == 0);
+ g_free(haystack_casefold);
- if (key) keywords = g_list_append(keywords, g_strdup(key));
+ 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')
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);
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_mark(GtkTreeModel *keyword_tree, GtkTreeIter *iter)
+{
+ gchar *mark_str;
+
+ gtk_tree_model_get(keyword_tree, iter, KEYWORD_COLUMN_MARK, &mark_str, -1);
+ return mark_str;
+}
+
+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 gboolean keyword_revert_hidden_in_cb(GtkTreeModel *model, GtkTreePath *path, GtkTreeIter *iter, gpointer data)
+{
+ if (keyword_is_hidden_in(GTK_TREE_MODEL(keyword_tree), iter, data))
+ {
+ keyword_show_in(GTK_TREE_STORE(model), iter, data);
+ }
+ return FALSE;
+}
+
+void keyword_revert_hidden_in(GtkTreeStore *keyword_tree, gpointer id)
+{
+ gtk_tree_model_foreach(GTK_TREE_MODEL(keyword_tree), keyword_revert_hidden_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;
+ gchar *mark_str;
+
+ WRITE_NL(); WRITE_STRING("<keyword ");
+ name = keyword_get_name(keyword_tree, &iter);
+ write_char_option(outstr, indent, "name", name);
+ g_free(name);
+ write_bool_option(outstr, indent, "kw", keyword_get_is_keyword(keyword_tree, &iter));
+ mark_str = keyword_get_mark(keyword_tree, &iter);
+ if (mark_str && mark_str[0])
+ {
+ write_char_option(outstr, indent, "mark", mark_str);
+ }
+
+ if (gtk_tree_model_iter_children(keyword_tree, &children, &iter))
+ {
+ WRITE_STRING(">");
+ indent++;
+ keyword_tree_node_write_config(keyword_tree, &children, outstr, indent);
+ indent--;
+ WRITE_NL(); WRITE_STRING("</keyword>");
+ }
+ 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("<keyword_tree>");
+ 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("</keyword_tree>");
+}
+
+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;
+ gchar *mark_str = NULL;
+
+ 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;
+ if (READ_CHAR_FULL("mark", mark_str)) 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);
+
+ if (mark_str)
+ {
+ meta_data_connect_mark_with_keyword(GTK_TREE_MODEL(keyword_tree),
+ &iter, (gint)atoi(mark_str) - 1);
+ }
+
+ g_free(name);
+ return gtk_tree_iter_copy(&iter);
+ }
+ g_free(name);
+ return NULL;
+}
+
/* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */