1 /* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
2
3 /* GIO - GLib Input, Output and Streaming Library
4 *
5 * Copyright (C) 2006-2007 Red Hat, Inc.
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General
18 * Public License along with this library; if not, write to the
19 * Free Software Foundation, Inc., 59 Temple Place, Suite 330,
20 * Boston, MA 02111-1307, USA.
21 *
22 * Author: Alexander Larsson <alexl@redhat.com>
23 */
24
25 #include "config.h"
26 #include <sys/types.h>
27 #include <stdlib.h>
28 #include <string.h>
29 #include <stdio.h>
30 #include "gcontenttypeprivate.h"
31 #include "gthemedicon.h"
32 #include "gicon.h"
33 #include "gfile.h"
34 #include "gfileenumerator.h"
35 #include "gfileinfo.h"
36 #include "glibintl.h"
37
38 #include "gioalias.h"
39
40 /**
41 * SECTION:gcontenttype
42 * @short_description: Platform-specific content typing
43 * @include: gio/gio.h
44 *
45 * A content type is a platform specific string that defines the type
46 * of a file. On unix it is a mime type, on win32 it is an extension string
47 * like ".doc", ".txt" or a percieved string like "audio". Such strings
48 * can be looked up in the registry at HKEY_CLASSES_ROOT.
49 **/
50
51 #ifdef G_OS_WIN32
52
53 #include <windows.h>
54
55 static char *
get_registry_classes_key(const char * subdir,const wchar_t * key_name)56 get_registry_classes_key (const char *subdir,
57 const wchar_t *key_name)
58 {
59 wchar_t *wc_key;
60 HKEY reg_key = NULL;
61 DWORD key_type;
62 DWORD nbytes;
63 char *value_utf8;
64
65 value_utf8 = NULL;
66
67 nbytes = 0;
68 wc_key = g_utf8_to_utf16 (subdir, -1, NULL, NULL, NULL);
69 if (RegOpenKeyExW (HKEY_CLASSES_ROOT, wc_key, 0,
70 KEY_QUERY_VALUE, ®_key) == ERROR_SUCCESS &&
71 RegQueryValueExW (reg_key, key_name, 0,
72 &key_type, NULL, &nbytes) == ERROR_SUCCESS &&
73 (key_type == REG_SZ || key_type == REG_EXPAND_SZ))
74 {
75 wchar_t *wc_temp = g_new (wchar_t, (nbytes+1)/2 + 1);
76 RegQueryValueExW (reg_key, key_name, 0,
77 &key_type, (LPBYTE) wc_temp, &nbytes);
78 wc_temp[nbytes/2] = '\0';
79 if (key_type == REG_EXPAND_SZ)
80 {
81 wchar_t dummy[1];
82 int len = ExpandEnvironmentStringsW (wc_temp, dummy, 1);
83 if (len > 0)
84 {
85 wchar_t *wc_temp_expanded = g_new (wchar_t, len);
86 if (ExpandEnvironmentStringsW (wc_temp, wc_temp_expanded, len) == len)
87 value_utf8 = g_utf16_to_utf8 (wc_temp_expanded, -1, NULL, NULL, NULL);
88 g_free (wc_temp_expanded);
89 }
90 }
91 else
92 {
93 value_utf8 = g_utf16_to_utf8 (wc_temp, -1, NULL, NULL, NULL);
94 }
95 g_free (wc_temp);
96
97 }
98 g_free (wc_key);
99
100 if (reg_key != NULL)
101 RegCloseKey (reg_key);
102
103 return value_utf8;
104 }
105
106 gboolean
g_content_type_equals(const char * type1,const char * type2)107 g_content_type_equals (const char *type1,
108 const char *type2)
109 {
110 char *progid1, *progid2;
111 gboolean res;
112
113 g_return_val_if_fail (type1 != NULL, FALSE);
114 g_return_val_if_fail (type2 != NULL, FALSE);
115
116 if (g_ascii_strcasecmp (type1, type2) == 0)
117 return TRUE;
118
119 res = FALSE;
120 progid1 = get_registry_classes_key (type1, NULL);
121 progid2 = get_registry_classes_key (type2, NULL);
122 if (progid1 != NULL && progid2 != NULL &&
123 strcmp (progid1, progid2) == 0)
124 res = TRUE;
125 g_free (progid1);
126 g_free (progid2);
127
128 return res;
129 }
130
131 gboolean
g_content_type_is_a(const char * type,const char * supertype)132 g_content_type_is_a (const char *type,
133 const char *supertype)
134 {
135 gboolean res;
136 char *value_utf8;
137
138 g_return_val_if_fail (type != NULL, FALSE);
139 g_return_val_if_fail (supertype != NULL, FALSE);
140
141 if (g_content_type_equals (type, supertype))
142 return TRUE;
143
144 res = FALSE;
145 value_utf8 = get_registry_classes_key (type, L"PerceivedType");
146 if (value_utf8 && strcmp (value_utf8, supertype) == 0)
147 res = TRUE;
148 g_free (value_utf8);
149
150 return res;
151 }
152
153 gboolean
g_content_type_is_unknown(const char * type)154 g_content_type_is_unknown (const char *type)
155 {
156 g_return_val_if_fail (type != NULL, FALSE);
157
158 return strcmp ("*", type) == 0;
159 }
160
161 char *
g_content_type_get_description(const char * type)162 g_content_type_get_description (const char *type)
163 {
164 char *progid;
165 char *description;
166
167 g_return_val_if_fail (type != NULL, NULL);
168
169 progid = get_registry_classes_key (type, NULL);
170 if (progid)
171 {
172 description = get_registry_classes_key (progid, NULL);
173 g_free (progid);
174
175 if (description)
176 return description;
177 }
178
179 if (g_content_type_is_unknown (type))
180 return g_strdup (_("Unknown type"));
181 return g_strdup_printf (_("%s filetype"), type);
182 }
183
184 char *
g_content_type_get_mime_type(const char * type)185 g_content_type_get_mime_type (const char *type)
186 {
187 char *mime;
188
189 g_return_val_if_fail (type != NULL, NULL);
190
191 mime = get_registry_classes_key (type, L"Content Type");
192 if (mime)
193 return mime;
194 else if (g_content_type_is_unknown (type))
195 return g_strdup ("application/octet-stream");
196 else if (*type == '.')
197 return g_strdup_printf ("application/x-ext-%s", type+1);
198 /* TODO: Map "image" to "image/ *", etc? */
199
200 return g_strdup ("application/octet-stream");
201 }
202
203 G_LOCK_DEFINE_STATIC (_type_icons);
204 static GHashTable *_type_icons = NULL;
205
206 GIcon *
g_content_type_get_icon(const char * type)207 g_content_type_get_icon (const char *type)
208 {
209 GIcon *themed_icon;
210 char *name = NULL;
211
212 g_return_val_if_fail (type != NULL, NULL);
213
214 /* In the Registry icons are the default value of
215 HKEY_CLASSES_ROOT\<progid>\DefaultIcon with typical values like:
216 <type>: <value>
217 REG_EXPAND_SZ: %SystemRoot%\System32\Wscript.exe,3
218 REG_SZ: shimgvw.dll,3
219 */
220 G_LOCK (_type_icons);
221 if (!_type_icons)
222 _type_icons = g_hash_table_new (g_str_hash, g_str_equal);
223 name = g_hash_table_lookup (_type_icons, type);
224 if (!name && type[0] == '.')
225 {
226 /* double lookup by extension */
227 gchar *key = get_registry_classes_key (type, NULL);
228 if (!key)
229 key = g_strconcat (type+1, "file\\DefaultIcon", NULL);
230 else
231 {
232 gchar *key2 = g_strconcat (key, "\\DefaultIcon", NULL);
233 g_free (key);
234 key = key2;
235 }
236 name = get_registry_classes_key (key, NULL);
237 if (name && strcmp (name, "%1") == 0)
238 {
239 g_free (name);
240 name = NULL;
241 }
242 if (name)
243 g_hash_table_insert (_type_icons, g_strdup (type), g_strdup (name));
244 g_free (key);
245 }
246
247 /* icon-name similar to how it was with gtk-2-12 */
248 if (name)
249 {
250 themed_icon = g_themed_icon_new (name);
251 }
252 else
253 {
254 /* if not found an icon fall back to gtk-builtins */
255 name = strcmp (type, "inode/directory") == 0 ? "gtk-directory" :
256 g_content_type_can_be_executable (type) ? "gtk-execute" : "gtk-file";
257 g_hash_table_insert (_type_icons, g_strdup (type), g_strdup (name));
258 themed_icon = g_themed_icon_new_with_default_fallbacks (name);
259 }
260 G_UNLOCK (_type_icons);
261
262 return G_ICON (themed_icon);
263 }
264
265 gboolean
g_content_type_can_be_executable(const char * type)266 g_content_type_can_be_executable (const char *type)
267 {
268 g_return_val_if_fail (type != NULL, FALSE);
269
270 if (strcmp (type, ".exe") == 0 ||
271 strcmp (type, ".com") == 0 ||
272 strcmp (type, ".bat") == 0)
273 return TRUE;
274
275 /* TODO: Also look at PATHEXT, which lists the extensions for
276 * "scripts" in addition to those for true binary executables.
277 *
278 * (PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH for me
279 * right now, for instance). And in a sense, all associated file
280 * types are "executable" on Windows... You can just type foo.jpg as
281 * a command name in cmd.exe, and it will run the application
282 * associated with .jpg. Hard to say what this API actually means
283 * with "executable".
284 */
285
286 return FALSE;
287 }
288
289 static gboolean
looks_like_text(const guchar * data,gsize data_size)290 looks_like_text (const guchar *data,
291 gsize data_size)
292 {
293 gsize i;
294 guchar c;
295 for (i = 0; i < data_size; i++)
296 {
297 c = data[i];
298 if (g_ascii_iscntrl (c) && !g_ascii_isspace (c))
299 return FALSE;
300 }
301 return TRUE;
302 }
303
304 char *
g_content_type_from_mime_type(const char * mime_type)305 g_content_type_from_mime_type (const char *mime_type)
306 {
307 char *key, *content_type;
308
309 g_return_val_if_fail (mime_type != NULL, NULL);
310
311 key = g_strconcat ("MIME\\DataBase\\Content Type\\", mime_type, NULL);
312 content_type = get_registry_classes_key (key, L"Extension");
313 g_free (key);
314
315 return content_type;
316 }
317
318 char *
g_content_type_guess(const char * filename,const guchar * data,gsize data_size,gboolean * result_uncertain)319 g_content_type_guess (const char *filename,
320 const guchar *data,
321 gsize data_size,
322 gboolean *result_uncertain)
323 {
324 char *basename;
325 char *type;
326 char *dot;
327
328 type = NULL;
329
330 if (filename)
331 {
332 basename = g_path_get_basename (filename);
333 dot = strrchr (basename, '.');
334 if (dot)
335 type = g_strdup (dot);
336 g_free (basename);
337 }
338
339 if (type)
340 return type;
341
342 if (data && looks_like_text (data, data_size))
343 return g_strdup (".txt");
344
345 return g_strdup ("*");
346 }
347
348 GList *
g_content_types_get_registered(void)349 g_content_types_get_registered (void)
350 {
351 DWORD index;
352 wchar_t keyname[256];
353 DWORD key_len;
354 char *key_utf8;
355 GList *types;
356
357 types = NULL;
358 index = 0;
359 key_len = 256;
360 while (RegEnumKeyExW(HKEY_CLASSES_ROOT,
361 index,
362 keyname,
363 &key_len,
364 NULL,
365 NULL,
366 NULL,
367 NULL) == ERROR_SUCCESS)
368 {
369 key_utf8 = g_utf16_to_utf8 (keyname, -1, NULL, NULL, NULL);
370 if (key_utf8)
371 {
372 if (*key_utf8 == '.')
373 types = g_list_prepend (types, key_utf8);
374 else
375 g_free (key_utf8);
376 }
377 index++;
378 key_len = 256;
379 }
380
381 return g_list_reverse (types);
382 }
383
384 char **
g_content_type_guess_for_tree(GFile * root)385 g_content_type_guess_for_tree (GFile *root)
386 {
387 /* FIXME: implement */
388 return NULL;
389 }
390
391 #else /* !G_OS_WIN32 - Unix specific version */
392
393 #include <dirent.h>
394
395 #define XDG_PREFIX _gio_xdg
396 #include "xdgmime/xdgmime.h"
397
398 /* We lock this mutex whenever we modify global state in this module. */
399 G_LOCK_DEFINE_STATIC (gio_xdgmime);
400
401 gsize
_g_unix_content_type_get_sniff_len(void)402 _g_unix_content_type_get_sniff_len (void)
403 {
404 gsize size;
405
406 G_LOCK (gio_xdgmime);
407 size = xdg_mime_get_max_buffer_extents ();
408 G_UNLOCK (gio_xdgmime);
409
410 return size;
411 }
412
413 char *
_g_unix_content_type_unalias(const char * type)414 _g_unix_content_type_unalias (const char *type)
415 {
416 char *res;
417
418 G_LOCK (gio_xdgmime);
419 res = g_strdup (xdg_mime_unalias_mime_type (type));
420 G_UNLOCK (gio_xdgmime);
421
422 return res;
423 }
424
425 char **
_g_unix_content_type_get_parents(const char * type)426 _g_unix_content_type_get_parents (const char *type)
427 {
428 const char *umime;
429 char **parents;
430 GPtrArray *array;
431 int i;
432
433 array = g_ptr_array_new ();
434
435 G_LOCK (gio_xdgmime);
436
437 umime = xdg_mime_unalias_mime_type (type);
438
439 g_ptr_array_add (array, g_strdup (umime));
440
441 parents = xdg_mime_list_mime_parents (umime);
442 for (i = 0; parents && parents[i] != NULL; i++)
443 g_ptr_array_add (array, g_strdup (parents[i]));
444
445 free (parents);
446
447 G_UNLOCK (gio_xdgmime);
448
449 g_ptr_array_add (array, NULL);
450
451 return (char **)g_ptr_array_free (array, FALSE);
452 }
453
454 /**
455 * g_content_type_equals:
456 * @type1: a content type string.
457 * @type2: a content type string.
458 *
459 * Compares two content types for equality.
460 *
461 * Returns: %TRUE if the two strings are identical or equivalent,
462 * %FALSE otherwise.
463 **/
464 gboolean
g_content_type_equals(const char * type1,const char * type2)465 g_content_type_equals (const char *type1,
466 const char *type2)
467 {
468 gboolean res;
469
470 g_return_val_if_fail (type1 != NULL, FALSE);
471 g_return_val_if_fail (type2 != NULL, FALSE);
472
473 G_LOCK (gio_xdgmime);
474 res = xdg_mime_mime_type_equal (type1, type2);
475 G_UNLOCK (gio_xdgmime);
476
477 return res;
478 }
479
480 /**
481 * g_content_type_is_a:
482 * @type: a content type string.
483 * @supertype: a string.
484 *
485 * Determines if @type is a subset of @supertype.
486 *
487 * Returns: %TRUE if @type is a kind of @supertype,
488 * %FALSE otherwise.
489 **/
490 gboolean
g_content_type_is_a(const char * type,const char * supertype)491 g_content_type_is_a (const char *type,
492 const char *supertype)
493 {
494 gboolean res;
495
496 g_return_val_if_fail (type != NULL, FALSE);
497 g_return_val_if_fail (supertype != NULL, FALSE);
498
499 G_LOCK (gio_xdgmime);
500 res = xdg_mime_mime_type_subclass (type, supertype);
501 G_UNLOCK (gio_xdgmime);
502
503 return res;
504 }
505
506 /**
507 * g_content_type_is_unknown:
508 * @type: a content type string.
509 *
510 * Checks if the content type is the generic "unknown" type.
511 * On unix this is the "application/octet-stream" mimetype,
512 * while on win32 it is "*".
513 *
514 * Returns: %TRUE if the type is the unknown type.
515 **/
516 gboolean
g_content_type_is_unknown(const char * type)517 g_content_type_is_unknown (const char *type)
518 {
519 g_return_val_if_fail (type != NULL, FALSE);
520
521 return strcmp (XDG_MIME_TYPE_UNKNOWN, type) == 0;
522 }
523
524
525 typedef enum {
526 MIME_TAG_TYPE_OTHER,
527 MIME_TAG_TYPE_COMMENT
528 } MimeTagType;
529
530 typedef struct {
531 int current_type;
532 int current_lang_level;
533 int comment_lang_level;
534 char *comment;
535 } MimeParser;
536
537
538 static int
language_level(const char * lang)539 language_level (const char *lang)
540 {
541 const char * const *lang_list;
542 int i;
543
544 /* The returned list is sorted from most desirable to least
545 desirable and always contains the default locale "C". */
546 lang_list = g_get_language_names ();
547
548 for (i = 0; lang_list[i]; i++)
549 if (strcmp (lang_list[i], lang) == 0)
550 return 1000-i;
551
552 return 0;
553 }
554
555 static void
mime_info_start_element(GMarkupParseContext * context,const gchar * element_name,const gchar ** attribute_names,const gchar ** attribute_values,gpointer user_data,GError ** error)556 mime_info_start_element (GMarkupParseContext *context,
557 const gchar *element_name,
558 const gchar **attribute_names,
559 const gchar **attribute_values,
560 gpointer user_data,
561 GError **error)
562 {
563 int i;
564 const char *lang;
565 MimeParser *parser = user_data;
566
567 if (strcmp (element_name, "comment") == 0)
568 {
569 lang = "C";
570 for (i = 0; attribute_names[i]; i++)
571 if (strcmp (attribute_names[i], "xml:lang") == 0)
572 {
573 lang = attribute_values[i];
574 break;
575 }
576
577 parser->current_lang_level = language_level (lang);
578 parser->current_type = MIME_TAG_TYPE_COMMENT;
579 }
580 else
581 parser->current_type = MIME_TAG_TYPE_OTHER;
582
583 }
584
585 static void
mime_info_end_element(GMarkupParseContext * context,const gchar * element_name,gpointer user_data,GError ** error)586 mime_info_end_element (GMarkupParseContext *context,
587 const gchar *element_name,
588 gpointer user_data,
589 GError **error)
590 {
591 MimeParser *parser = user_data;
592
593 parser->current_type = MIME_TAG_TYPE_OTHER;
594 }
595
596 static void
mime_info_text(GMarkupParseContext * context,const gchar * text,gsize text_len,gpointer user_data,GError ** error)597 mime_info_text (GMarkupParseContext *context,
598 const gchar *text,
599 gsize text_len,
600 gpointer user_data,
601 GError **error)
602 {
603 MimeParser *parser = user_data;
604
605 if (parser->current_type == MIME_TAG_TYPE_COMMENT &&
606 parser->current_lang_level > parser->comment_lang_level)
607 {
608 g_free (parser->comment);
609 parser->comment = g_strndup (text, text_len);
610 parser->comment_lang_level = parser->current_lang_level;
611 }
612 }
613
614 static char *
load_comment_for_mime_helper(const char * dir,const char * basename)615 load_comment_for_mime_helper (const char *dir,
616 const char *basename)
617 {
618 GMarkupParseContext *context;
619 char *filename, *data;
620 gsize len;
621 gboolean res;
622 MimeParser parse_data = {0};
623 GMarkupParser parser = {
624 mime_info_start_element,
625 mime_info_end_element,
626 mime_info_text
627 };
628
629 filename = g_build_filename (dir, "mime", basename, NULL);
630
631 res = g_file_get_contents (filename, &data, &len, NULL);
632 g_free (filename);
633 if (!res)
634 return NULL;
635
636 context = g_markup_parse_context_new (&parser, 0, &parse_data, NULL);
637 res = g_markup_parse_context_parse (context, data, len, NULL);
638 g_free (data);
639 g_markup_parse_context_free (context);
640
641 if (!res)
642 return NULL;
643
644 return parse_data.comment;
645 }
646
647
648 static char *
load_comment_for_mime(const char * mimetype)649 load_comment_for_mime (const char *mimetype)
650 {
651 const char * const* dirs;
652 char *basename;
653 char *comment;
654 int i;
655
656 basename = g_strdup_printf ("%s.xml", mimetype);
657
658 comment = load_comment_for_mime_helper (g_get_user_data_dir (), basename);
659 if (comment)
660 {
661 g_free (basename);
662 return comment;
663 }
664
665 dirs = g_get_system_data_dirs ();
666
667 for (i = 0; dirs[i] != NULL; i++)
668 {
669 comment = load_comment_for_mime_helper (dirs[i], basename);
670 if (comment)
671 {
672 g_free (basename);
673 return comment;
674 }
675 }
676 g_free (basename);
677
678 return g_strdup_printf (_("%s type"), mimetype);
679 }
680
681 /**
682 * g_content_type_get_description:
683 * @type: a content type string.
684 *
685 * Gets the human readable description of the content type.
686 *
687 * Returns: a short description of the content type @type.
688 **/
689 char *
g_content_type_get_description(const char * type)690 g_content_type_get_description (const char *type)
691 {
692 static GHashTable *type_comment_cache = NULL;
693 char *comment;
694
695 g_return_val_if_fail (type != NULL, NULL);
696
697 G_LOCK (gio_xdgmime);
698 type = xdg_mime_unalias_mime_type (type);
699
700 if (type_comment_cache == NULL)
701 type_comment_cache = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_free);
702
703 comment = g_hash_table_lookup (type_comment_cache, type);
704 comment = g_strdup (comment);
705 G_UNLOCK (gio_xdgmime);
706
707 if (comment != NULL)
708 return comment;
709
710 comment = load_comment_for_mime (type);
711
712 G_LOCK (gio_xdgmime);
713 g_hash_table_insert (type_comment_cache,
714 g_strdup (type),
715 g_strdup (comment));
716 G_UNLOCK (gio_xdgmime);
717
718 return comment;
719 }
720
721 /**
722 * g_content_type_get_mime_type:
723 * @type: a content type string.
724 *
725 * Gets the mime-type for the content type. If one is registered
726 *
727 * Returns: the registered mime-type for the given @type, or NULL if unknown.
728 **/
729 char *
g_content_type_get_mime_type(const char * type)730 g_content_type_get_mime_type (const char *type)
731 {
732 g_return_val_if_fail (type != NULL, NULL);
733
734 return g_strdup (type);
735 }
736
737 /**
738 * g_content_type_get_icon:
739 * @type: a content type string.
740 *
741 * Gets the icon for a content type.
742 *
743 * Returns: #GIcon corresponding to the content type.
744 **/
745 GIcon *
g_content_type_get_icon(const char * type)746 g_content_type_get_icon (const char *type)
747 {
748 char *mimetype_icon, *generic_mimetype_icon, *q;
749 char *xdg_mimetype_icon, *legacy_mimetype_icon;
750 char *xdg_mimetype_generic_icon;
751 char *icon_names[4];
752 int n = 0;
753 const char *p;
754 GIcon *themed_icon;
755
756 g_return_val_if_fail (type != NULL, NULL);
757
758 G_LOCK (gio_xdgmime);
759 xdg_mimetype_icon = g_strdup (xdg_mime_get_icon (type));
760 xdg_mimetype_generic_icon = g_strdup (xdg_mime_get_generic_icon (type));
761 G_UNLOCK (gio_xdgmime);
762
763 mimetype_icon = g_strdup (type);
764
765 while ((q = strchr (mimetype_icon, '/')) != NULL)
766 *q = '-';
767
768 p = strchr (type, '/');
769 if (p == NULL)
770 p = type + strlen (type);
771
772 /* Not all icons have migrated to the new icon theme spec, look for old names too */
773 legacy_mimetype_icon = g_strconcat ("gnome-mime-", mimetype_icon, NULL);
774
775 generic_mimetype_icon = g_malloc (p - type + strlen ("-x-generic") + 1);
776 memcpy (generic_mimetype_icon, type, p - type);
777 memcpy (generic_mimetype_icon + (p - type), "-x-generic", strlen ("-x-generic"));
778 generic_mimetype_icon[(p - type) + strlen ("-x-generic")] = 0;
779
780 if (xdg_mimetype_icon)
781 icon_names[n++] = xdg_mimetype_icon;
782
783 icon_names[n++] = mimetype_icon;
784 icon_names[n++] = legacy_mimetype_icon;
785
786 if (xdg_mimetype_generic_icon)
787 icon_names[n++] = xdg_mimetype_generic_icon;
788
789 icon_names[n++] = generic_mimetype_icon;
790
791 themed_icon = g_themed_icon_new_from_names (icon_names, n);
792
793 g_free (xdg_mimetype_icon);
794 g_free (xdg_mimetype_generic_icon);
795 g_free (mimetype_icon);
796 g_free (legacy_mimetype_icon);
797 g_free (generic_mimetype_icon);
798
799 return themed_icon;
800 }
801
802 /**
803 * g_content_type_can_be_executable:
804 * @type: a content type string.
805 *
806 * Checks if a content type can be executable. Note that for instance
807 * things like text files can be executables (i.e. scripts and batch files).
808 *
809 * Returns: %TRUE if the file type corresponds to a type that
810 * can be executable, %FALSE otherwise.
811 **/
812 gboolean
g_content_type_can_be_executable(const char * type)813 g_content_type_can_be_executable (const char *type)
814 {
815 g_return_val_if_fail (type != NULL, FALSE);
816
817 if (g_content_type_is_a (type, "application/x-executable") ||
818 g_content_type_is_a (type, "text/plain"))
819 return TRUE;
820
821 return FALSE;
822 }
823
824 static gboolean
looks_like_text(const guchar * data,gsize data_size)825 looks_like_text (const guchar *data, gsize data_size)
826 {
827 gsize i;
828 char c;
829
830 for (i = 0; i < data_size; i++)
831 {
832 c = data[i];
833
834 if (g_ascii_iscntrl (c) &&
835 !g_ascii_isspace (c))
836 return FALSE;
837 }
838 return TRUE;
839 }
840
841 /**
842 * g_content_type_from_mime_type:
843 * @mime_type: a mime type string.
844 *
845 * Tries to find a content type based on the mime type name.
846 *
847 * Returns: Newly allocated string with content type or NULL when does not know.
848 *
849 * Since: 2.18
850 **/
851 char *
g_content_type_from_mime_type(const char * mime_type)852 g_content_type_from_mime_type (const char *mime_type)
853 {
854 char *umime;
855
856 g_return_val_if_fail (mime_type != NULL, NULL);
857
858 G_LOCK (gio_xdgmime);
859 /* mime type and content type are same on unixes */
860 umime = g_strdup (xdg_mime_unalias_mime_type (mime_type));
861 G_UNLOCK (gio_xdgmime);
862
863 return umime;
864 }
865
866 /**
867 * g_content_type_guess:
868 * @filename: a string, or %NULL
869 * @data: a stream of data, or %NULL
870 * @data_size: the size of @data
871 * @result_uncertain: a flag indicating the certainty of the result
872 *
873 * Guesses the content type based on example data. If the function is
874 * uncertain, @result_uncertain will be set to %TRUE. Either @filename
875 * or @data may be %NULL, in which case the guess will be based solely
876 * on the other argument.
877 *
878 * Returns: a string indicating a guessed content type for the
879 * given data.
880 **/
881 char *
g_content_type_guess(const char * filename,const guchar * data,gsize data_size,gboolean * result_uncertain)882 g_content_type_guess (const char *filename,
883 const guchar *data,
884 gsize data_size,
885 gboolean *result_uncertain)
886 {
887 char *basename;
888 const char *name_mimetypes[10], *sniffed_mimetype;
889 char *mimetype;
890 int i;
891 int n_name_mimetypes;
892 int sniffed_prio;
893
894 sniffed_prio = 0;
895 n_name_mimetypes = 0;
896 sniffed_mimetype = XDG_MIME_TYPE_UNKNOWN;
897
898 if (result_uncertain)
899 *result_uncertain = FALSE;
900
901 G_LOCK (gio_xdgmime);
902
903 if (filename)
904 {
905 i = strlen (filename);
906 if (filename[i - 1] == '/')
907 {
908 name_mimetypes[0] = "inode/directory";
909 name_mimetypes[1] = NULL;
910 n_name_mimetypes = 1;
911 if (result_uncertain)
912 *result_uncertain = TRUE;
913 }
914 else
915 {
916 basename = g_path_get_basename (filename);
917 n_name_mimetypes = xdg_mime_get_mime_types_from_file_name (basename, name_mimetypes, 10);
918 g_free (basename);
919 }
920 }
921
922 /* Got an extension match, and no conflicts. This is it. */
923 if (n_name_mimetypes == 1)
924 {
925 G_UNLOCK (gio_xdgmime);
926 return g_strdup (name_mimetypes[0]);
927 }
928
929 if (data)
930 {
931 sniffed_mimetype = xdg_mime_get_mime_type_for_data (data, data_size, &sniffed_prio);
932 if (sniffed_mimetype == XDG_MIME_TYPE_UNKNOWN &&
933 data &&
934 looks_like_text (data, data_size))
935 sniffed_mimetype = "text/plain";
936
937 /* For security reasons we don't ever want to sniff desktop files
938 * where we know the filename and it doesn't have a .desktop extension.
939 * This is because desktop files allow executing any application and
940 * we don't want to make it possible to hide them looking like something
941 * else.
942 */
943 if (filename != NULL &&
944 strcmp (sniffed_mimetype, "application/x-desktop") == 0)
945 sniffed_mimetype = "text/plain";
946 }
947
948 if (n_name_mimetypes == 0)
949 {
950 if (sniffed_mimetype == XDG_MIME_TYPE_UNKNOWN &&
951 result_uncertain)
952 *result_uncertain = TRUE;
953
954 mimetype = g_strdup (sniffed_mimetype);
955 }
956 else
957 {
958 mimetype = NULL;
959 if (sniffed_mimetype != XDG_MIME_TYPE_UNKNOWN)
960 {
961 if (sniffed_prio >= 80) /* High priority sniffing match, use that */
962 mimetype = g_strdup (sniffed_mimetype);
963 else
964 {
965 /* There are conflicts between the name matches and we have a sniffed
966 type, use that as a tie breaker. */
967
968 for (i = 0; i < n_name_mimetypes; i++)
969 {
970 if ( xdg_mime_mime_type_subclass (name_mimetypes[i], sniffed_mimetype))
971 {
972 /* This nametype match is derived from (or the same as) the sniffed type).
973 This is probably it. */
974 mimetype = g_strdup (name_mimetypes[i]);
975 break;
976 }
977 }
978 }
979 }
980
981 if (mimetype == NULL)
982 {
983 /* Conflicts, and sniffed type was no help or not there. Guess on the first one */
984 mimetype = g_strdup (name_mimetypes[0]);
985 if (result_uncertain)
986 *result_uncertain = TRUE;
987 }
988 }
989
990 G_UNLOCK (gio_xdgmime);
991
992 return mimetype;
993 }
994
995 static void
enumerate_mimetypes_subdir(const char * dir,const char * prefix,GHashTable * mimetypes)996 enumerate_mimetypes_subdir (const char *dir,
997 const char *prefix,
998 GHashTable *mimetypes)
999 {
1000 DIR *d;
1001 struct dirent *ent;
1002 char *mimetype;
1003
1004 d = opendir (dir);
1005 if (d)
1006 {
1007 while ((ent = readdir (d)) != NULL)
1008 {
1009 if (g_str_has_suffix (ent->d_name, ".xml"))
1010 {
1011 mimetype = g_strdup_printf ("%s/%.*s", prefix, (int) strlen (ent->d_name) - 4, ent->d_name);
1012 g_hash_table_replace (mimetypes, mimetype, NULL);
1013 }
1014 }
1015 closedir (d);
1016 }
1017 }
1018
1019 static void
enumerate_mimetypes_dir(const char * dir,GHashTable * mimetypes)1020 enumerate_mimetypes_dir (const char *dir,
1021 GHashTable *mimetypes)
1022 {
1023 DIR *d;
1024 struct dirent *ent;
1025 char *mimedir;
1026 char *name;
1027
1028 mimedir = g_build_filename (dir, "mime", NULL);
1029
1030 d = opendir (mimedir);
1031 if (d)
1032 {
1033 while ((ent = readdir (d)) != NULL)
1034 {
1035 if (strcmp (ent->d_name, "packages") != 0)
1036 {
1037 name = g_build_filename (mimedir, ent->d_name, NULL);
1038 if (g_file_test (name, G_FILE_TEST_IS_DIR))
1039 enumerate_mimetypes_subdir (name, ent->d_name, mimetypes);
1040 g_free (name);
1041 }
1042 }
1043 closedir (d);
1044 }
1045
1046 g_free (mimedir);
1047 }
1048
1049 /**
1050 * g_content_types_get_registered:
1051 *
1052 * Gets a list of strings containing all the registered content types
1053 * known to the system. The list and its data should be freed using
1054 * @g_list_foreach(list, g_free, NULL) and @g_list_free(list)
1055 * Returns: #GList of the registered content types.
1056 **/
1057 GList *
g_content_types_get_registered(void)1058 g_content_types_get_registered (void)
1059 {
1060 const char * const* dirs;
1061 GHashTable *mimetypes;
1062 GHashTableIter iter;
1063 gpointer key;
1064 int i;
1065 GList *l;
1066
1067 mimetypes = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
1068
1069 enumerate_mimetypes_dir (g_get_user_data_dir (), mimetypes);
1070 dirs = g_get_system_data_dirs ();
1071
1072 for (i = 0; dirs[i] != NULL; i++)
1073 enumerate_mimetypes_dir (dirs[i], mimetypes);
1074
1075 l = NULL;
1076 g_hash_table_iter_init (&iter, mimetypes);
1077 while (g_hash_table_iter_next (&iter, &key, NULL))
1078 {
1079 l = g_list_prepend (l, key);
1080 g_hash_table_iter_steal (&iter);
1081 }
1082
1083 g_hash_table_destroy (mimetypes);
1084
1085 return l;
1086 }
1087
1088
1089 /* tree magic data */
1090 static GList *tree_matches = NULL;
1091 static gboolean need_reload = FALSE;
1092
1093 G_LOCK_DEFINE_STATIC (gio_treemagic);
1094
1095 typedef struct
1096 {
1097 gchar *path;
1098 GFileType type;
1099 guint match_case : 1;
1100 guint executable : 1;
1101 guint non_empty : 1;
1102 guint on_disc : 1;
1103 gchar *mimetype;
1104 GList *matches;
1105 } TreeMatchlet;
1106
1107 typedef struct
1108 {
1109 gchar *contenttype;
1110 gint priority;
1111 GList *matches;
1112 } TreeMatch;
1113
1114
1115 static void
tree_matchlet_free(TreeMatchlet * matchlet)1116 tree_matchlet_free (TreeMatchlet *matchlet)
1117 {
1118 g_list_foreach (matchlet->matches, (GFunc)tree_matchlet_free, NULL);
1119 g_list_free (matchlet->matches);
1120 g_free (matchlet->path);
1121 g_free (matchlet->mimetype);
1122 g_slice_free (TreeMatchlet, matchlet);
1123 }
1124
1125 static void
tree_match_free(TreeMatch * match)1126 tree_match_free (TreeMatch *match)
1127 {
1128 g_list_foreach (match->matches, (GFunc)tree_matchlet_free, NULL);
1129 g_list_free (match->matches);
1130 g_free (match->contenttype);
1131 g_slice_free (TreeMatch, match);
1132 }
1133
1134 static TreeMatch *
parse_header(gchar * line)1135 parse_header (gchar *line)
1136 {
1137 gint len;
1138 gchar *s;
1139 TreeMatch *match;
1140
1141 len = strlen (line);
1142
1143 if (line[0] != '[' || line[len - 1] != ']')
1144 return NULL;
1145
1146 line[len - 1] = 0;
1147 s = strchr (line, ':');
1148
1149 match = g_slice_new0 (TreeMatch);
1150 match->priority = atoi (line + 1);
1151 match->contenttype = g_strdup (s + 1);
1152
1153 return match;
1154 }
1155
1156 static TreeMatchlet *
parse_match_line(gchar * line,gint * depth)1157 parse_match_line (gchar *line,
1158 gint *depth)
1159 {
1160 gchar *s, *p;
1161 TreeMatchlet *matchlet;
1162 gchar **parts;
1163 gint i;
1164
1165 matchlet = g_slice_new0 (TreeMatchlet);
1166
1167 if (line[0] == '>')
1168 {
1169 *depth = 0;
1170 s = line;
1171 }
1172 else
1173 {
1174 *depth = atoi (line);
1175 s = strchr (line, '>');
1176 }
1177 s += 2;
1178 p = strchr (s, '"');
1179 *p = 0;
1180
1181 matchlet->path = g_strdup (s);
1182 s = p + 1;
1183 parts = g_strsplit (s, ",", 0);
1184 if (strcmp (parts[0], "=file") == 0)
1185 matchlet->type = G_FILE_TYPE_REGULAR;
1186 else if (strcmp (parts[0], "=directory") == 0)
1187 matchlet->type = G_FILE_TYPE_DIRECTORY;
1188 else if (strcmp (parts[0], "=link") == 0)
1189 matchlet->type = G_FILE_TYPE_SYMBOLIC_LINK;
1190 else
1191 matchlet->type = G_FILE_TYPE_UNKNOWN;
1192 for (i = 1; parts[i]; i++)
1193 {
1194 if (strcmp (parts[i], "executable") == 0)
1195 matchlet->executable = 1;
1196 else if (strcmp (parts[i], "match-case") == 0)
1197 matchlet->match_case = 1;
1198 else if (strcmp (parts[i], "non-empty") == 0)
1199 matchlet->non_empty = 1;
1200 else if (strcmp (parts[i], "on-disc") == 0)
1201 matchlet->on_disc = 1;
1202 else
1203 matchlet->mimetype = g_strdup (parts[i]);
1204 }
1205
1206 g_strfreev (parts);
1207
1208 return matchlet;
1209 }
1210
1211 static gint
cmp_match(gconstpointer a,gconstpointer b)1212 cmp_match (gconstpointer a, gconstpointer b)
1213 {
1214 const TreeMatch *aa = (const TreeMatch *)a;
1215 const TreeMatch *bb = (const TreeMatch *)b;
1216
1217 return bb->priority - aa->priority;
1218 }
1219
1220 static void
insert_match(TreeMatch * match)1221 insert_match (TreeMatch *match)
1222 {
1223 tree_matches = g_list_insert_sorted (tree_matches, match, cmp_match);
1224 }
1225
1226 static void
insert_matchlet(TreeMatch * match,TreeMatchlet * matchlet,gint depth)1227 insert_matchlet (TreeMatch *match,
1228 TreeMatchlet *matchlet,
1229 gint depth)
1230 {
1231 if (depth == 0)
1232 match->matches = g_list_append (match->matches, matchlet);
1233 else
1234 {
1235 GList *last;
1236 TreeMatchlet *m;
1237
1238 last = g_list_last (match->matches);
1239 if (!last)
1240 {
1241 tree_matchlet_free (matchlet);
1242 g_warning ("can't insert tree matchlet at depth %d", depth);
1243 return;
1244 }
1245
1246 m = (TreeMatchlet *) last->data;
1247 while (--depth > 0)
1248 {
1249 last = g_list_last (m->matches);
1250 if (!last)
1251 {
1252 tree_matchlet_free (matchlet);
1253 g_warning ("can't insert tree matchlet at depth %d", depth);
1254 return;
1255 }
1256
1257 m = (TreeMatchlet *) last->data;
1258 }
1259 m->matches = g_list_append (m->matches, matchlet);
1260 }
1261 }
1262
1263 static void
read_tree_magic_from_directory(const gchar * prefix)1264 read_tree_magic_from_directory (const gchar *prefix)
1265 {
1266 gchar *filename;
1267 gchar *text;
1268 gsize len;
1269 gchar **lines;
1270 gint i;
1271 TreeMatch *match;
1272 TreeMatchlet *matchlet;
1273 gint depth;
1274
1275 filename = g_build_filename (prefix, "mime", "treemagic", NULL);
1276
1277 if (g_file_get_contents (filename, &text, &len, NULL))
1278 {
1279 if (strcmp (text, "MIME-TreeMagic") == 0)
1280 {
1281 lines = g_strsplit (text + strlen ("MIME-TreeMagic") + 2, "\n", 0);
1282 match = NULL;
1283 for (i = 0; lines[i] && lines[i][0]; i++)
1284 {
1285 if (lines[i][0] == '[')
1286 {
1287 match = parse_header (lines[i]);
1288 insert_match (match);
1289 }
1290 else
1291 {
1292 matchlet = parse_match_line (lines[i], &depth);
1293 insert_matchlet (match, matchlet, depth);
1294 }
1295 }
1296
1297 g_strfreev (lines);
1298 }
1299 else
1300 g_warning ("%s: header not found, skipping\n", filename);
1301
1302 g_free (text);
1303 }
1304
1305 g_free (filename);
1306 }
1307
1308
1309 static void
xdg_mime_reload(void * user_data)1310 xdg_mime_reload (void *user_data)
1311 {
1312 need_reload = TRUE;
1313 }
1314
1315 static void
tree_magic_shutdown(void)1316 tree_magic_shutdown (void)
1317 {
1318 g_list_foreach (tree_matches, (GFunc)tree_match_free, NULL);
1319 g_list_free (tree_matches);
1320 tree_matches = NULL;
1321 }
1322
1323 static void
tree_magic_init(void)1324 tree_magic_init (void)
1325 {
1326 static gboolean initialized = FALSE;
1327 const gchar *dir;
1328 const gchar * const * dirs;
1329 int i;
1330
1331 if (!initialized)
1332 {
1333 initialized = TRUE;
1334
1335 xdg_mime_register_reload_callback (xdg_mime_reload, NULL, NULL);
1336 need_reload = TRUE;
1337 }
1338
1339 if (need_reload)
1340 {
1341 need_reload = FALSE;
1342
1343 tree_magic_shutdown ();
1344
1345 dir = g_get_user_data_dir ();
1346 read_tree_magic_from_directory (dir);
1347 dirs = g_get_system_data_dirs ();
1348 for (i = 0; dirs[i]; i++)
1349 read_tree_magic_from_directory (dirs[i]);
1350 }
1351 }
1352
1353 /* a filtering enumerator */
1354
1355 typedef struct
1356 {
1357 gchar *path;
1358 gint depth;
1359 gboolean ignore_case;
1360 gchar **components;
1361 gchar **case_components;
1362 GFileEnumerator **enumerators;
1363 GFile **children;
1364 } Enumerator;
1365
1366 static gboolean
component_match(Enumerator * e,gint depth,const gchar * name)1367 component_match (Enumerator *e,
1368 gint depth,
1369 const gchar *name)
1370 {
1371 gchar *case_folded, *key;
1372 gboolean found;
1373
1374 if (strcmp (name, e->components[depth]) == 0)
1375 return TRUE;
1376
1377 if (!e->ignore_case)
1378 return FALSE;
1379
1380 case_folded = g_utf8_casefold (name, -1);
1381 key = g_utf8_collate_key (case_folded, -1);
1382
1383 found = strcmp (key, e->case_components[depth]) == 0;
1384
1385 g_free (case_folded);
1386 g_free (key);
1387
1388 return found;
1389 }
1390
1391 static GFile *
next_match_recurse(Enumerator * e,gint depth)1392 next_match_recurse (Enumerator *e,
1393 gint depth)
1394 {
1395 GFile *file;
1396 GFileInfo *info;
1397 const gchar *name;
1398
1399 while (TRUE)
1400 {
1401 if (e->enumerators[depth] == NULL)
1402 {
1403 if (depth > 0)
1404 {
1405 file = next_match_recurse (e, depth - 1);
1406 if (file)
1407 {
1408 e->children[depth] = file;
1409 e->enumerators[depth] = g_file_enumerate_children (file,
1410 G_FILE_ATTRIBUTE_STANDARD_NAME,
1411 G_FILE_QUERY_INFO_NONE,
1412 NULL,
1413 NULL);
1414 }
1415 }
1416 if (e->enumerators[depth] == NULL)
1417 return NULL;
1418 }
1419
1420 while ((info = g_file_enumerator_next_file (e->enumerators[depth], NULL, NULL)))
1421 {
1422 name = g_file_info_get_name (info);
1423 if (component_match (e, depth, name))
1424 {
1425 file = g_file_get_child (e->children[depth], name);
1426 g_object_unref (info);
1427 return file;
1428 }
1429 g_object_unref (info);
1430 }
1431
1432 g_object_unref (e->enumerators[depth]);
1433 e->enumerators[depth] = NULL;
1434 g_object_unref (e->children[depth]);
1435 e->children[depth] = NULL;
1436 }
1437 }
1438
1439 static GFile *
enumerator_next(Enumerator * e)1440 enumerator_next (Enumerator *e)
1441 {
1442 return next_match_recurse (e, e->depth - 1);
1443 }
1444
1445 static Enumerator *
enumerator_new(GFile * root,const char * path,gboolean ignore_case)1446 enumerator_new (GFile *root,
1447 const char *path,
1448 gboolean ignore_case)
1449 {
1450 Enumerator *e;
1451 gint i;
1452 gchar *case_folded;
1453
1454 e = g_new0 (Enumerator, 1);
1455 e->path = g_strdup (path);
1456 e->ignore_case = ignore_case;
1457
1458 e->components = g_strsplit (e->path, G_DIR_SEPARATOR_S, -1);
1459 e->depth = g_strv_length (e->components);
1460 if (e->ignore_case)
1461 {
1462 e->case_components = g_new0 (char *, e->depth + 1);
1463 for (i = 0; e->components[i]; i++)
1464 {
1465 case_folded = g_utf8_casefold (e->components[i], -1);
1466 e->case_components[i] = g_utf8_collate_key (case_folded, -1);
1467 g_free (case_folded);
1468 }
1469 }
1470
1471 e->children = g_new0 (GFile *, e->depth);
1472 e->children[0] = g_object_ref (root);
1473 e->enumerators = g_new0 (GFileEnumerator *, e->depth);
1474 e->enumerators[0] = g_file_enumerate_children (root,
1475 G_FILE_ATTRIBUTE_STANDARD_NAME,
1476 G_FILE_QUERY_INFO_NONE,
1477 NULL,
1478 NULL);
1479
1480 return e;
1481 }
1482
1483 static void
enumerator_free(Enumerator * e)1484 enumerator_free (Enumerator *e)
1485 {
1486 gint i;
1487
1488 for (i = 0; i < e->depth; i++)
1489 {
1490 if (e->enumerators[i])
1491 g_object_unref (e->enumerators[i]);
1492 if (e->children[i])
1493 g_object_unref (e->children[i]);
1494 }
1495
1496 g_free (e->enumerators);
1497 g_free (e->children);
1498 g_strfreev (e->components);
1499 if (e->case_components)
1500 g_strfreev (e->case_components);
1501 g_free (e->path);
1502 g_free (e);
1503 }
1504
1505 static gboolean
matchlet_match(TreeMatchlet * matchlet,GFile * root)1506 matchlet_match (TreeMatchlet *matchlet,
1507 GFile *root)
1508 {
1509 GFile *file;
1510 GFileInfo *info;
1511 gboolean result;
1512 const gchar *attrs;
1513 Enumerator *e;
1514 GList *l;
1515
1516 e = enumerator_new (root, matchlet->path, !matchlet->match_case);
1517
1518 do
1519 {
1520 file = enumerator_next (e);
1521 if (!file)
1522 {
1523 enumerator_free (e);
1524 return FALSE;
1525 }
1526
1527 if (matchlet->mimetype)
1528 attrs = G_FILE_ATTRIBUTE_STANDARD_TYPE ","
1529 G_FILE_ATTRIBUTE_ACCESS_CAN_EXECUTE ","
1530 G_FILE_ATTRIBUTE_STANDARD_CONTENT_TYPE;
1531 else
1532 attrs = G_FILE_ATTRIBUTE_STANDARD_TYPE ","
1533 G_FILE_ATTRIBUTE_ACCESS_CAN_EXECUTE;
1534 info = g_file_query_info (file,
1535 attrs,
1536 G_FILE_QUERY_INFO_NONE,
1537 NULL,
1538 NULL);
1539 if (info)
1540 {
1541 result = TRUE;
1542
1543 if (matchlet->type != G_FILE_TYPE_UNKNOWN &&
1544 g_file_info_get_file_type (info) != matchlet->type)
1545 result = FALSE;
1546
1547 if (matchlet->executable &&
1548 !g_file_info_get_attribute_boolean (info, G_FILE_ATTRIBUTE_ACCESS_CAN_EXECUTE))
1549 result = FALSE;
1550 }
1551 else
1552 result = FALSE;
1553
1554 if (result && matchlet->non_empty)
1555 {
1556 GFileEnumerator *child_enum;
1557 GFileInfo *child_info;
1558
1559 child_enum = g_file_enumerate_children (file,
1560 G_FILE_ATTRIBUTE_STANDARD_NAME,
1561 G_FILE_QUERY_INFO_NONE,
1562 NULL,
1563 NULL);
1564
1565 if (child_enum)
1566 {
1567 child_info = g_file_enumerator_next_file (child_enum, NULL, NULL);
1568 if (child_info)
1569 g_object_unref (child_info);
1570 else
1571 result = FALSE;
1572 g_object_unref (child_enum);
1573 }
1574 else
1575 result = FALSE;
1576 }
1577
1578 if (result && matchlet->mimetype)
1579 {
1580 if (strcmp (matchlet->mimetype, g_file_info_get_content_type (info)) != 0)
1581 result = FALSE;
1582 }
1583
1584 g_object_unref (info);
1585 g_object_unref (file);
1586 }
1587 while (!result);
1588
1589 enumerator_free (e);
1590
1591 if (!matchlet->matches)
1592 return TRUE;
1593
1594 for (l = matchlet->matches; l; l = l->next)
1595 {
1596 TreeMatchlet *submatchlet;
1597
1598 submatchlet = l->data;
1599 if (matchlet_match (submatchlet, root))
1600 return TRUE;
1601 }
1602
1603 return FALSE;
1604 }
1605
1606 static void
match_match(TreeMatch * match,GFile * root,GPtrArray * types)1607 match_match (TreeMatch *match,
1608 GFile *root,
1609 GPtrArray *types)
1610 {
1611 GList *l;
1612
1613 for (l = match->matches; l; l = l->next)
1614 {
1615 TreeMatchlet *matchlet = l->data;
1616 if (matchlet_match (matchlet, root))
1617 {
1618 g_ptr_array_add (types, g_strdup (match->contenttype));
1619 break;
1620 }
1621 }
1622 }
1623
1624 /**
1625 * g_content_type_guess_for_tree:
1626 * @root: the root of the tree to guess a type for
1627 *
1628 * Tries to guess the type of the tree with root @root, by
1629 * looking at the files it contains. The result is an array
1630 * of content types, with the best guess coming first.
1631 *
1632 * The types returned all have the form x-content/foo, e.g.
1633 * x-content/audio-cdda (for audio CDs) or x-content/image-dcf
1634 * (for a camera memory card). See the <ulink url="http://www.freedesktop.org/wiki/Specifications/shared-mime-info-spec">shared-mime-info</ulink>
1635 * specification for more on x-content types.
1636 *
1637 * This function is useful in the implementation of g_mount_guess_content_type().
1638 *
1639 * Returns: an %NULL-terminated array of zero or more content types, or %NULL.
1640 * Free with g_strfreev()
1641 *
1642 * Since: 2.18
1643 */
1644 char **
g_content_type_guess_for_tree(GFile * root)1645 g_content_type_guess_for_tree (GFile *root)
1646 {
1647 GPtrArray *types;
1648 GList *l;
1649
1650 types = g_ptr_array_new ();
1651
1652 G_LOCK (gio_treemagic);
1653
1654 tree_magic_init ();
1655 for (l = tree_matches; l; l = l->next)
1656 {
1657 TreeMatch *match = l->data;
1658 match_match (match, root, types);
1659 }
1660
1661 G_UNLOCK (gio_treemagic);
1662
1663 g_ptr_array_add (types, NULL);
1664
1665 return (char **)g_ptr_array_free (types, FALSE);
1666 }
1667
1668 #endif /* Unix version */
1669
1670 #define __G_CONTENT_TYPE_C__
1671 #include "gioaliasdef.c"
1672