ignore raw image support reported by the pixbuf loader
[geeqie.git] / src / filefilter.c
1 /*
2  * Geeqie
3  * (C) 2006 John Ellis
4  * Copyright (C) 2008 - 2010 The Geeqie Team
5  *
6  * Author: John Ellis
7  *
8  * This software is released under the GNU General Public License (GNU GPL).
9  * Please read the included file COPYING for more information.
10  * This software comes with no warranty of any kind, use at your own risk!
11  */
12
13
14 #include "main.h"
15 #include "filefilter.h"
16
17 #include "cache.h"
18 #include "misc.h"
19 #include "secure_save.h"
20 #include "thumb_standard.h"
21 #include "ui_fileops.h"
22 #include "rcfile.h"
23
24 /*
25  *-----------------------------------------------------------------------------
26  * file filtering
27  *-----------------------------------------------------------------------------
28  */
29
30 static GList *filter_list = NULL;
31 static GList *extension_list = NULL;
32 static GList *sidecar_ext_list = NULL;
33
34 static GList *file_class_extension_list[FILE_FORMAT_CLASSES];
35
36 static GList *file_writable_list = NULL; /* writable files */
37 static GList *file_sidecar_list = NULL; /* files with allowed sidecar */
38
39
40 static FilterEntry *filter_entry_new(const gchar *key, const gchar *description,
41                                      const gchar *extensions, FileFormatClass file_class, 
42                                      gboolean writable, gboolean allow_sidecar, gboolean enabled)
43 {
44         FilterEntry *fe;
45
46         fe = g_new0(FilterEntry, 1);
47         fe->key = g_strdup(key);
48         fe->description = g_strdup(description);
49         fe->extensions = g_strdup(extensions);
50         fe->enabled = enabled;
51         fe->file_class = file_class;
52         fe->writable = writable;
53         fe->allow_sidecar = allow_sidecar;
54
55         return fe;
56 }
57
58 static void filter_entry_free(FilterEntry *fe)
59 {
60         if (!fe) return;
61
62         g_free(fe->key);
63         g_free(fe->description);
64         g_free(fe->extensions);
65         g_free(fe);
66 }
67
68 GList *filter_get_list(void)
69 {
70         return filter_list;
71 }
72
73 void filter_remove_entry(FilterEntry *fe)
74 {
75         if (!g_list_find(filter_list, fe)) return;
76
77         filter_list = g_list_remove(filter_list, fe);
78         filter_entry_free(fe);
79 }
80
81 static FilterEntry *filter_get_by_key(const gchar *key)
82 {
83         GList *work;
84
85         if (!key) return NULL;
86
87         work = filter_list;
88         while (work)
89                 {
90                 FilterEntry *fe = work->data;
91                 work = work->next;
92
93                 if (strcmp(fe->key, key) == 0) return fe;
94                 }
95
96         return NULL;
97 }
98
99 static gboolean filter_key_exists(const gchar *key)
100 {
101         return (filter_get_by_key(key) != NULL);
102 }
103
104 void filter_add(const gchar *key, const gchar *description, const gchar *extensions, FileFormatClass file_class, gboolean writable, gboolean allow_sidecar, gboolean enabled)
105 {
106         filter_list = g_list_append(filter_list, filter_entry_new(key, description, extensions, file_class, writable, allow_sidecar, enabled));
107 }
108
109 void filter_add_unique(const gchar *description, const gchar *extensions, FileFormatClass file_class, gboolean writable, gboolean allow_sidecar, gboolean enabled)
110 {
111         gchar *key;
112         guint n;
113
114         key = g_strdup("user0");
115         n = 1;
116         while (filter_key_exists(key))
117                 {
118                 g_free(key);
119                 if (n > 999) return;
120                 key = g_strdup_printf("user%d", n);
121                 n++;
122                 }
123
124         filter_add(key, description, extensions, file_class, writable, allow_sidecar, enabled);
125         g_free(key);
126 }
127
128 static void filter_add_if_missing(const gchar *key, const gchar *description, const gchar *extensions, FileFormatClass file_class, gboolean writable, gboolean allow_sidecar, gboolean enabled)
129 {
130         GList *work;
131
132         if (!key) return;
133
134         work = filter_list;
135         while (work)
136                 {
137                 FilterEntry *fe = work->data;
138                 work = work->next;
139                 if (fe->key && strcmp(fe->key, key) == 0)
140                         {
141                         if (fe->file_class == FORMAT_CLASS_UNKNOWN)
142                                 fe->file_class = file_class;    /* for compatibility */
143                                 
144                         if (fe->writable && fe->allow_sidecar)
145                                 {
146                                 fe->writable = writable;
147                                 fe->allow_sidecar = allow_sidecar;
148                                 }
149                         return;
150                         }
151                 }
152
153         filter_add(key, description, extensions, file_class, writable, allow_sidecar, enabled);
154 }
155
156 void filter_reset(void)
157 {
158         GList *work;
159
160         work = filter_list;
161         while (work)
162                 {
163                 FilterEntry *fe = work->data;
164                 work = work->next;
165                 filter_entry_free(fe);
166                 }
167
168         g_list_free(filter_list);
169         filter_list = NULL;
170 }
171
172 void filter_add_defaults(void)
173 {
174         GSList *list, *work;
175
176         list = gdk_pixbuf_get_formats();
177         work = list;
178         while (work)
179                 {
180                 GdkPixbufFormat *format;
181                 gchar *name;
182                 gchar *desc;
183                 gchar **extensions;
184                 GString *filter = NULL;
185                 guint i;
186
187                 format = work->data;
188                 work = work->next;
189
190                 name = gdk_pixbuf_format_get_name(format);
191                 
192                 if (strcmp(name, "Digital camera RAW") == 0) 
193                         {
194                         DEBUG_1("Skipped '%s' from loader", name);
195                         g_free(name);
196                         continue;
197                         }
198                 
199                 desc = gdk_pixbuf_format_get_description(format);
200                 extensions = gdk_pixbuf_format_get_extensions(format);
201
202                 i = 0;
203                 while (extensions[i])
204                         {
205                         if (!filter)
206                                 {
207                                 filter = g_string_new(".");
208                                 filter = g_string_append(filter, extensions[i]);
209                                 }
210                         else
211                                 {
212                                 filter = g_string_append(filter, ";.");
213                                 filter = g_string_append(filter, extensions[i]);
214                                 }
215                         i++;
216                         }
217
218                 DEBUG_1("loader reported [%s] [%s] [%s]", name, desc, filter->str);
219
220                 filter_add_if_missing(name, desc, filter->str, FORMAT_CLASS_IMAGE, TRUE, FALSE, TRUE);
221
222                 g_free(name);
223                 g_free(desc);
224                 g_strfreev(extensions);
225                 g_string_free(filter, TRUE);
226                 }
227         g_slist_free(list);
228
229         /* add defaults even if gdk-pixbuf does not have them, but disabled */
230         filter_add_if_missing("jpeg", "JPEG group", ".jpg;.jpeg;.jpe", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
231         filter_add_if_missing("png", "Portable Network Graphic", ".png", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
232         filter_add_if_missing("tiff", "Tiff", ".tif;.tiff", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
233         filter_add_if_missing("pnm", "Packed Pixel formats", ".pbm;.pgm;.pnm;.ppm", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
234         filter_add_if_missing("gif", "Graphics Interchange Format", ".gif", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
235         filter_add_if_missing("xbm", "X bitmap", ".xbm", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
236         filter_add_if_missing("xpm", "X pixmap", ".xpm", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
237         filter_add_if_missing("bmp", "Bitmap", ".bmp", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
238         filter_add_if_missing("ico", "Icon file", ".ico;.cur", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
239         filter_add_if_missing("ras", "Raster", ".ras", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
240         filter_add_if_missing("svg", "Scalable Vector Graphics", ".svg", FORMAT_CLASS_IMAGE, TRUE, FALSE, FALSE);
241
242         /* non-image files that might be desirable to show */
243         filter_add_if_missing("xmp", "XMP sidecar", ".xmp", FORMAT_CLASS_META, TRUE, FALSE, TRUE);
244         filter_add_if_missing("gqv", GQ_APPNAME " image collection", GQ_COLLECTION_EXT, FORMAT_CLASS_META, FALSE, FALSE, TRUE);
245         filter_add_if_missing("ufraw", "UFRaw ID file", ".ufraw", FORMAT_CLASS_META, FALSE, FALSE, TRUE);
246
247         /* These are the raw camera formats with embedded jpeg/exif.
248          * (see format_raw.c and/or exiv2.cc)
249          */
250         filter_add_if_missing("arw", "Sony raw format", ".arw;.srf;.sr2", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
251         filter_add_if_missing("crw", "Canon raw format", ".crw;.cr2", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
252         filter_add_if_missing("kdc", "Kodak raw format", ".kdc;.dcr;.k25", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
253         filter_add_if_missing("raf", "Fujifilm raw format", ".raf", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
254         filter_add_if_missing("mef", "Mamiya raw format", ".mef;.mos", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
255         filter_add_if_missing("mrw", "Minolta raw format", ".mrw", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
256         filter_add_if_missing("nef", "Nikon raw format", ".nef", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
257         filter_add_if_missing("orf", "Olympus raw format", ".orf", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
258         filter_add_if_missing("pef", "Pentax or Samsung raw format", ".pef;.ptx", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
259         filter_add_if_missing("dng", "Adobe Digital Negative raw format", ".dng", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
260         filter_add_if_missing("x3f", "Sigma raw format", ".x3f", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
261         filter_add_if_missing("raw", "Panasonic raw format", ".raw", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
262         filter_add_if_missing("r3d", "Red raw format", ".r3d", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
263         filter_add_if_missing("3fr", "Hasselblad raw format", ".3fr", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
264         filter_add_if_missing("erf", "Epson raw format", ".erf", FORMAT_CLASS_RAWIMAGE, FALSE, TRUE, TRUE);
265 }
266
267 GList *filter_to_list(const gchar *extensions)
268 {
269         GList *list = NULL;
270         const gchar *p;
271
272         if (!extensions) return NULL;
273
274         p = extensions;
275         while (*p != '\0')
276                 {
277                 const gchar *b;
278                 gchar *ext;
279                 gint file_class = -1;
280                 guint l = 0;
281
282                 b = p;
283                 while (*p != '\0' && *p != ';')
284                         {
285                         p++;
286                         l++;
287                         }
288                 
289                 ext = g_strndup(b, l);
290                 
291                 if (g_ascii_strcasecmp(ext, "%image") == 0) file_class = FORMAT_CLASS_IMAGE;
292                 else if (g_ascii_strcasecmp(ext, "%raw") == 0) file_class = FORMAT_CLASS_RAWIMAGE;
293                 else if (g_ascii_strcasecmp(ext, "%meta") == 0) file_class = FORMAT_CLASS_META;
294                 else if (g_ascii_strcasecmp(ext, "%unknown") == 0) file_class = FORMAT_CLASS_UNKNOWN;
295                 
296                 if (file_class == -1) 
297                         {
298                         list = g_list_append(list, ext);
299                         }
300                 else
301                         {
302                         list = g_list_concat(list, string_list_copy(file_class_extension_list[file_class]));
303                         g_free(ext);
304                         }
305                         
306                 if (*p == ';') p++;
307                 }
308
309         return list;
310 }
311
312 void filter_rebuild(void)
313 {
314         GList *work;
315         guint i;
316
317         string_list_free(extension_list);
318         extension_list = NULL;
319
320         string_list_free(file_writable_list);
321         file_writable_list = NULL;
322
323         string_list_free(file_sidecar_list);
324         file_sidecar_list = NULL;
325
326         for (i = 0; i < FILE_FORMAT_CLASSES; i++)
327                 {
328                 string_list_free(file_class_extension_list[i]);
329                 file_class_extension_list[i] = NULL;
330                 }
331
332         work = filter_list;
333         while (work)
334                 {
335                 FilterEntry *fe;
336
337                 fe = work->data;
338                 work = work->next;
339
340                 if (fe->enabled)
341                         {
342                         GList *ext;
343
344                         ext = filter_to_list(fe->extensions);
345                         if (ext) extension_list = g_list_concat(extension_list, ext);
346
347                         if (fe->file_class < FILE_FORMAT_CLASSES)
348                                 {
349                                 ext = filter_to_list(fe->extensions);
350                                 if (ext) file_class_extension_list[fe->file_class] = g_list_concat(file_class_extension_list[fe->file_class], ext);
351                                 }
352                         else
353                                 {
354                                 log_printf("WARNING: invalid file class %d\n", fe->file_class);
355                                 }
356                                 
357                         if (fe->writable)
358                                 {
359                                 ext = filter_to_list(fe->extensions);
360                                 if (ext) file_writable_list = g_list_concat(file_writable_list, ext);
361                                 }
362
363                         if (fe->allow_sidecar)
364                                 {
365                                 ext = filter_to_list(fe->extensions);
366                                 if (ext) file_sidecar_list = g_list_concat(file_sidecar_list, ext);
367                                 }
368                         
369                         }
370                 }
371
372         sidecar_ext_parse(options->sidecar.ext); /* this must be updated after changed file extensions */
373 }
374
375 static gboolean filter_name_find(GList *filter, const gchar *name)
376 {
377         GList *work;
378         guint ln;
379
380         ln = strlen(name);
381         work = filter;
382         while (work)
383                 {
384                 gchar *filter = work->data;
385                 guint lf = strlen(filter);
386
387                 if (ln >= lf)
388                         {
389                         /* FIXME: utf8 */
390                         if (g_ascii_strncasecmp(name + ln - lf, filter, lf) == 0) return TRUE;
391                         }
392                 work = work->next;
393                 }
394
395         return FALSE;
396 }
397
398
399 gboolean filter_name_exists(const gchar *name)
400 {
401         if (!extension_list || options->file_filter.disable) return TRUE;
402
403         return filter_name_find(extension_list, name);
404 }
405
406 gboolean filter_file_class(const gchar *name, FileFormatClass file_class)
407 {
408         if (file_class >= FILE_FORMAT_CLASSES)
409                 {
410                 log_printf("WARNING: invalid file class %d\n", file_class);
411                 return FALSE;
412                 }
413
414         return filter_name_find(file_class_extension_list[file_class], name);
415 }
416
417 gboolean filter_name_is_writable(const gchar *name)
418 {
419         return filter_name_find(file_writable_list, name);
420 }
421
422 gboolean filter_name_allow_sidecar(const gchar *name)
423 {
424         return filter_name_find(file_sidecar_list, name);
425 }
426
427 void filter_write_list(GString *outstr, gint indent)
428 {
429         GList *work;
430
431         WRITE_NL(); WRITE_STRING("<filter>");
432         indent++;
433
434         work = filter_list;
435         while (work)
436                 {
437                 FilterEntry *fe = work->data;
438                 work = work->next;
439
440                 WRITE_NL(); WRITE_STRING("<file_type ");
441                 WRITE_CHAR(*fe, key);
442                 WRITE_BOOL(*fe, enabled);
443                 WRITE_CHAR(*fe, extensions);
444                 WRITE_CHAR(*fe, description);
445                 WRITE_UINT(*fe, file_class);
446                 WRITE_BOOL(*fe, writable);
447                 WRITE_BOOL(*fe, allow_sidecar);
448                 WRITE_STRING("/>");
449                 }
450         indent--;
451         WRITE_NL(); WRITE_STRING("</filter>");
452 }
453
454 void filter_load_file_type(const gchar **attribute_names, const gchar **attribute_values)
455 {
456         FilterEntry fe;
457         FilterEntry *old_fe;
458         memset(&fe, 0, sizeof(fe));
459         while (*attribute_names)
460                 {
461                 const gchar *option = *attribute_names++;
462                 const gchar *value = *attribute_values++;
463
464                 if (READ_CHAR(fe, key)) continue;
465                 if (READ_BOOL(fe, enabled)) continue;
466                 if (READ_CHAR(fe, extensions)) continue;
467                 if (READ_CHAR(fe, description)) continue;
468                 if (READ_UINT(fe, file_class)) continue;
469                 if (READ_BOOL(fe, writable)) continue;
470                 if (READ_BOOL(fe, allow_sidecar)) continue;
471
472                 log_printf("unknown attribute %s = %s\n", option, value);
473                 }
474         if (fe.file_class >= FILE_FORMAT_CLASSES) fe.file_class = FORMAT_CLASS_UNKNOWN;
475         
476         if (fe.key && fe.key[0] != 0)
477                 {
478                 old_fe = filter_get_by_key(fe.key);
479
480                 if (old_fe != NULL) filter_remove_entry(old_fe);
481                 filter_add(fe.key, fe.description, fe.extensions, fe.file_class, fe.writable, fe.allow_sidecar, fe.enabled);
482                 }
483         g_free(fe.key);
484         g_free(fe.extensions);
485         g_free(fe.description);
486 }
487
488
489 /*
490  *-----------------------------------------------------------------------------
491  * sidecar extension list
492  *-----------------------------------------------------------------------------
493  */
494
495 GList *sidecar_ext_get_list(void)
496 {
497         return sidecar_ext_list;
498 }
499
500 static void sidecar_ext_free_list(void)
501 {
502         GList *work;
503
504         work = sidecar_ext_list;
505         while (work)
506                 {
507                 gchar *ext = work->data;
508                 work = work->next;
509                 g_free(ext);
510                 }
511         g_list_free(sidecar_ext_list);
512         sidecar_ext_list = NULL;
513 }
514
515 void sidecar_ext_parse(const gchar *text)
516 {
517         sidecar_ext_free_list();
518         if (text == NULL) return;
519
520         sidecar_ext_list = filter_to_list(text);
521 }
522
523
524 /* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */