Fix the environment handling. (#504829, Cosimo Cecchi)
[platform/upstream/glib.git] / gio / gdesktopappinfo.c
1 /* GIO - GLib Input, Output and Streaming Library
2  * 
3  * Copyright (C) 2006-2007 Red Hat, Inc.
4  * Copyright © 2007 Ryan Lortie
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General
17  * Public License along with this library; if not, write to the
18  * Free Software Foundation, Inc., 59 Temple Place, Suite 330,
19  * Boston, MA 02111-1307, USA.
20  *
21  * Author: Alexander Larsson <alexl@redhat.com>
22  */
23
24 #include <config.h>
25
26 #include <errno.h>
27 #include <string.h>
28 #include <unistd.h>
29 #include <sys/wait.h>
30
31 #include "gcontenttypeprivate.h"
32 #include "gdesktopappinfo.h"
33 #include "gioerror.h"
34 #include "gthemedicon.h"
35 #include "gfileicon.h"
36 #include <glib/gstdio.h>
37 #include "glibintl.h"
38
39 #include "gioalias.h"
40
41 /**
42  * SECTION:gdesktopappinfo
43  * @short_description: Application information from desktop files
44  * @include: gio/gdesktopappinfo.h 
45  * 
46  * #GDesktopAppInfo is an implementation of #GAppInfo based on
47  * desktop files.
48  *
49  **/
50
51 #define DEFAULT_APPLICATIONS_GROUP  "Default Applications" 
52 #define MIME_CACHE_GROUP            "MIME Cache"
53
54 static void g_desktop_app_info_iface_init (GAppInfoIface *iface);
55
56 static GList *get_all_desktop_entries_for_mime_type (const char *base_mime_type);
57 static void mime_info_cache_reload (const char *dir);
58
59 struct _GDesktopAppInfo
60 {
61   GObject parent_instance;
62
63   char *desktop_id;
64   char *filename;
65
66   char *name;
67   /* FIXME: what about GenericName ? */
68   char *comment;
69   char *icon_name;
70   GIcon *icon;
71   char **only_show_in;
72   char **not_show_in;
73   char *try_exec;
74   char *exec;
75   char *binary;
76   char *path;
77
78   guint nodisplay       : 1;
79   guint hidden          : 1;
80   guint terminal        : 1;
81   guint startup_notify  : 1;
82   /* FIXME: what about StartupWMClass ? */
83 };
84
85 G_DEFINE_TYPE_WITH_CODE (GDesktopAppInfo, g_desktop_app_info, G_TYPE_OBJECT,
86                          G_IMPLEMENT_INTERFACE (G_TYPE_APP_INFO,
87                                                 g_desktop_app_info_iface_init))
88
89 static gpointer
90 search_path_init (gpointer data)
91 {
92   char **args = NULL;
93   const char * const *data_dirs;
94   const char *user_data_dir;
95   int i, length, j;
96
97   data_dirs = g_get_system_data_dirs ();
98   length = g_strv_length ((char **) data_dirs);
99   
100   args = g_new (char *, length + 2);
101   
102   j = 0;
103   user_data_dir = g_get_user_data_dir ();
104   args[j++] = g_build_filename (user_data_dir, "applications", NULL);
105   for (i = 0; i < length; i++)
106     args[j++] = g_build_filename (data_dirs[i],
107                                   "applications", NULL);
108   args[j++] = NULL;
109   
110   return args;
111 }
112   
113 static const char * const *
114 get_applications_search_path (void)
115 {
116   static GOnce once_init = G_ONCE_INIT;
117   return g_once (&once_init, search_path_init, NULL);
118 }
119
120 static void
121 g_desktop_app_info_finalize (GObject *object)
122 {
123   GDesktopAppInfo *info;
124
125   info = G_DESKTOP_APP_INFO (object);
126
127   g_free (info->desktop_id);
128   g_free (info->filename);
129   g_free (info->name);
130   g_free (info->comment);
131   g_free (info->icon_name);
132   if (info->icon)
133     g_object_unref (info->icon);
134   g_strfreev (info->only_show_in);
135   g_strfreev (info->not_show_in);
136   g_free (info->try_exec);
137   g_free (info->exec);
138   g_free (info->binary);
139   g_free (info->path);
140   
141   G_OBJECT_CLASS (g_desktop_app_info_parent_class)->finalize (object);
142 }
143
144 static void
145 g_desktop_app_info_class_init (GDesktopAppInfoClass *klass)
146 {
147   GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
148   
149   gobject_class->finalize = g_desktop_app_info_finalize;
150 }
151
152 static void
153 g_desktop_app_info_init (GDesktopAppInfo *local)
154 {
155 }
156
157 /**
158  * g_desktop_app_info_new_from_filename:
159  * @filename: a string containing a file name.
160  * 
161  * Creates a new #GDesktopAppInfo.
162  *
163  * Returns: a new #GDesktopAppInfo or %NULL on error.
164  **/
165 GDesktopAppInfo *
166 g_desktop_app_info_new_from_filename (const char *filename)
167 {
168   GDesktopAppInfo *info;
169   GKeyFile *key_file;
170   char *start_group;
171   char *type;
172   char *try_exec;
173   
174   key_file = g_key_file_new ();
175   
176   if (!g_key_file_load_from_file (key_file,
177                                   filename,
178                                   G_KEY_FILE_NONE,
179                                   NULL))
180     return NULL;
181
182   start_group = g_key_file_get_start_group (key_file);
183   if (start_group == NULL || strcmp (start_group, G_KEY_FILE_DESKTOP_GROUP) != 0)
184     {
185       g_free (start_group);
186       return NULL;
187     }
188   g_free (start_group);
189
190   type = g_key_file_get_string (key_file,
191                                 G_KEY_FILE_DESKTOP_GROUP,
192                                 G_KEY_FILE_DESKTOP_KEY_TYPE,
193                                 NULL);
194   if (type == NULL || strcmp (type, G_KEY_FILE_DESKTOP_TYPE_APPLICATION) != 0)
195     {
196       g_free (type);
197       return NULL;
198     }
199   g_free (type);
200
201   try_exec = g_key_file_get_string (key_file,
202                                     G_KEY_FILE_DESKTOP_GROUP,
203                                     G_KEY_FILE_DESKTOP_KEY_TRY_EXEC,
204                                     NULL);
205   if (try_exec)
206     {
207       char *t;
208       t = g_find_program_in_path (try_exec);
209       if (t == NULL)
210         {
211           g_free (try_exec);
212           return NULL;
213         }
214       g_free (t);
215     }
216
217   info = g_object_new (G_TYPE_DESKTOP_APP_INFO, NULL);
218   info->filename = g_strdup (filename);
219
220   info->name = g_key_file_get_locale_string (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_NAME, NULL, NULL);
221   info->comment = g_key_file_get_locale_string (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_COMMENT, NULL, NULL);
222   info->nodisplay = g_key_file_get_boolean (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_NO_DISPLAY, NULL) != FALSE;
223   info->icon_name =  g_key_file_get_locale_string (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_ICON, NULL, NULL);
224   info->only_show_in = g_key_file_get_string_list (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_ONLY_SHOW_IN, NULL, NULL);
225   info->not_show_in = g_key_file_get_string_list (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_NOT_SHOW_IN, NULL, NULL);
226   info->try_exec = try_exec;
227   info->exec = g_key_file_get_string (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_EXEC, NULL);
228   info->path = g_key_file_get_string (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_PATH, NULL);
229   info->terminal = g_key_file_get_boolean (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_TERMINAL, NULL) != FALSE;
230   info->startup_notify = g_key_file_get_boolean (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_STARTUP_NOTIFY, NULL) != FALSE;
231   info->hidden = g_key_file_get_boolean (key_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_HIDDEN, NULL) != FALSE;
232
233   info->icon = NULL;
234   if (info->icon_name)
235     {
236       if (g_path_is_absolute (info->icon_name))
237         {
238           GFile *file;
239           
240           file = g_file_new_for_path (info->icon_name);
241           info->icon = g_file_icon_new (file);
242           g_object_unref (file);
243         }
244       else
245         info->icon = g_themed_icon_new (info->icon_name);
246     }
247   
248   if (info->exec)
249     {
250       char *p, *start;
251
252       p = info->exec;
253       while (*p == ' ')
254         p++;
255       start = p;
256       while (*p != ' ' && *p != 0)
257         p++;
258       
259       info->binary = g_strndup (start, p - start);
260     }
261   
262   return info;
263 }
264
265 /**
266  * g_desktop_app_info_new:
267  * @desktop_id: the desktop file id
268  * 
269  * Creates a new #GDesktopAppInfo.
270  * 
271  * Returns: a new #GDesktopAppInfo, or %NULL if no desktop file with that id
272  **/
273 GDesktopAppInfo *
274 g_desktop_app_info_new (const char *desktop_id)
275 {
276   GDesktopAppInfo *appinfo;
277   const char * const *dirs;
278   int i;
279
280   dirs = get_applications_search_path ();
281
282   for (i = 0; dirs[i] != NULL; i++)
283     {
284       char *basename;
285       char *filename;
286       char *p;
287
288       filename = g_build_filename (dirs[i], desktop_id, NULL);
289       appinfo = g_desktop_app_info_new_from_filename (filename);
290       g_free (filename);
291       if (appinfo != NULL)
292         {
293           goto found;
294         }
295
296       basename = g_strdup (desktop_id);
297       p = basename;
298       while ((p = strchr (p, '-')) != NULL)
299         {
300           *p = '/';
301           
302           filename = g_build_filename (dirs[i], basename, NULL);
303           appinfo = g_desktop_app_info_new_from_filename (filename);
304           g_free (filename);
305           if (appinfo != NULL)
306             {
307               g_free (basename);
308               goto found;
309             }
310           *p = '-';
311           p++;
312         }
313     }
314   
315   return NULL;
316
317  found:
318   appinfo->desktop_id = g_strdup (desktop_id);
319
320   if (g_desktop_app_info_get_is_hidden (appinfo))
321     {
322       g_object_unref (appinfo);
323       appinfo = NULL;
324     }
325   
326   return appinfo;
327 }
328
329 static GAppInfo *
330 g_desktop_app_info_dup (GAppInfo *appinfo)
331 {
332   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
333   GDesktopAppInfo *new_info;
334   
335   new_info = g_object_new (G_TYPE_DESKTOP_APP_INFO, NULL);
336
337   new_info->filename = g_strdup (info->filename);
338   new_info->desktop_id = g_strdup (info->desktop_id);
339   
340   new_info->name = g_strdup (info->name);
341   new_info->comment = g_strdup (info->comment);
342   new_info->nodisplay = info->nodisplay;
343   new_info->icon_name = g_strdup (info->icon_name);
344   new_info->icon = g_object_ref (info->icon);
345   new_info->only_show_in = g_strdupv (info->only_show_in);
346   new_info->not_show_in = g_strdupv (info->not_show_in);
347   new_info->try_exec = g_strdup (info->try_exec);
348   new_info->exec = g_strdup (info->exec);
349   new_info->binary = g_strdup (info->binary);
350   new_info->path = g_strdup (info->path);
351   new_info->hidden = info->hidden;
352   new_info->terminal = info->terminal;
353   new_info->startup_notify = info->startup_notify;
354   
355   return G_APP_INFO (new_info);
356 }
357
358 static gboolean
359 g_desktop_app_info_equal (GAppInfo *appinfo1,
360                           GAppInfo *appinfo2)
361 {
362   GDesktopAppInfo *info1 = G_DESKTOP_APP_INFO (appinfo1);
363   GDesktopAppInfo *info2 = G_DESKTOP_APP_INFO (appinfo2);
364
365   if (info1->desktop_id == NULL ||
366       info2->desktop_id == NULL)
367     return FALSE;
368
369   return strcmp (info1->desktop_id, info2->desktop_id) == 0;
370 }
371
372 static const char *
373 g_desktop_app_info_get_id (GAppInfo *appinfo)
374 {
375   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
376
377   return info->desktop_id;
378 }
379
380 static const char *
381 g_desktop_app_info_get_name (GAppInfo *appinfo)
382 {
383   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
384
385   if (info->name == NULL)
386     return _("Unnamed");
387   return info->name;
388 }
389
390 /**
391  * g_desktop_app_info_get_is_hidden:
392  * @info: a #GDesktopAppInfo.
393  *
394  * A desktop file is hidden if the Hidden key in it is
395  * set to True.
396  *
397  * Returns: %TRUE if hidden, %FALSE otherwise. 
398  **/
399 gboolean
400 g_desktop_app_info_get_is_hidden (GDesktopAppInfo *info)
401 {
402   return info->hidden;
403 }
404
405 static const char *
406 g_desktop_app_info_get_description (GAppInfo *appinfo)
407 {
408   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
409   
410   return info->comment;
411 }
412
413 static const char *
414 g_desktop_app_info_get_executable (GAppInfo *appinfo)
415 {
416   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
417   
418   return info->binary;
419 }
420
421 static GIcon *
422 g_desktop_app_info_get_icon (GAppInfo *appinfo)
423 {
424   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
425
426   return info->icon;
427 }
428
429 static char *
430 expand_macro_single (char macro, GFile *file)
431 {
432   char *result = NULL;
433   char *uri, *path;
434
435   path = g_file_get_path (file);
436   uri = g_file_get_uri (file);
437   
438   switch (macro)
439     {
440     case 'u':
441     case 'U':   
442       result = g_shell_quote (uri);
443       break;
444     case 'f':
445     case 'F':
446       if (path)
447         result = g_shell_quote (path);
448       break;
449     case 'd':
450     case 'D':
451       if (path)
452         result = g_shell_quote (g_path_get_dirname (path));
453       break;
454     case 'n':
455     case 'N':
456       if (path)
457         result = g_shell_quote (g_path_get_basename (path));
458       break;
459     }
460
461   g_free (path);
462   g_free (uri);
463   
464   return result;
465 }
466
467 static void
468 expand_macro (char              macro, 
469               GString          *exec, 
470               GDesktopAppInfo  *info, 
471               GList           **file_list)
472 {
473   GList *files = *file_list;
474   char *expanded;
475   
476   g_return_if_fail (exec != NULL);
477   
478   switch (macro)
479     {
480     case 'u':
481     case 'f':
482     case 'd':
483     case 'n':
484       if (files)
485         {
486           expanded = expand_macro_single (macro, files->data);
487           if (expanded)
488             {
489               g_string_append (exec, expanded);
490               g_free (expanded);
491             }
492           files = files->next;
493         }
494
495       break;
496
497     case 'U':   
498     case 'F':
499     case 'D':
500     case 'N':
501       while (files)
502         {
503           expanded = expand_macro_single (macro, files->data);
504           if (expanded)
505             {
506               g_string_append (exec, expanded);
507               g_free (expanded);
508             }
509           
510           files = files->next;
511           
512           if (files != NULL && expanded)
513             g_string_append_c (exec, ' ');
514         }
515
516       break;
517
518     case 'i':
519       if (info->icon_name)
520         {
521           g_string_append (exec, "--icon ");
522           g_string_append (exec, info->icon_name);
523         }
524       break;
525
526     case 'c':
527       if (info->name) 
528         g_string_append (exec, info->name);
529       break;
530
531     case 'k':
532       if (info->filename) 
533         g_string_append (exec, info->filename);
534       break;
535
536     case 'm': /* deprecated */
537       break;
538
539     case '%':
540       g_string_append_c (exec, '%');
541       break;
542     }
543   
544   *file_list = files;
545 }
546
547 static gboolean
548 expand_application_parameters (GDesktopAppInfo   *info,
549                                GList            **files,
550                                int               *argc,
551                                char            ***argv,
552                                GError           **error)
553 {
554   GList *file_list = *files;
555   const char *p = info->exec;
556   GString *expanded_exec = g_string_new (NULL);
557   gboolean res;
558   
559   if (info->exec == NULL)
560     {
561       g_set_error (error, G_IO_ERROR, G_IO_ERROR_FAILED,
562                    _("Desktop file didn't specify Exec field"));
563       return FALSE;
564     }
565   
566   while (*p)
567     {
568       if (p[0] == '%' && p[1] != '\0')
569         {
570           expand_macro (p[1], expanded_exec, info, files);
571           p++;
572         }
573       else
574         g_string_append_c (expanded_exec, *p);
575       
576       p++;
577     }
578   
579   /* No file substitutions */
580   if (file_list == *files && file_list != NULL)
581     {
582       /* If there is no macro default to %f. This is also what KDE does */
583       g_string_append_c (expanded_exec, ' ');
584       expand_macro ('f', expanded_exec, info, files);
585     }
586   
587   res = g_shell_parse_argv (expanded_exec->str, argc, argv, error);
588   g_string_free (expanded_exec, TRUE);
589   return res;
590 }
591
592 static gboolean
593 prepend_terminal_to_vector (int    *argc,
594                             char ***argv)
595 {
596 #ifndef G_OS_WIN32
597   char **real_argv;
598   int real_argc;
599   int i, j;
600   char **term_argv = NULL;
601   int term_argc = 0;
602   char *check;
603   char **the_argv;
604   
605   g_return_val_if_fail (argc != NULL, FALSE);
606   g_return_val_if_fail (argv != NULL, FALSE);
607         
608   /* sanity */
609   if(*argv == NULL)
610     *argc = 0;
611   
612   the_argv = *argv;
613
614   /* compute size if not given */
615   if (*argc < 0)
616     {
617       for (i = 0; the_argv[i] != NULL; i++)
618         ;
619       *argc = i;
620     }
621   
622   term_argc = 2;
623   term_argv = g_new0 (char *, 3);
624
625   check = g_find_program_in_path ("gnome-terminal");
626   if (check != NULL)
627     {
628       term_argv[0] = check;
629       /* Note that gnome-terminal takes -x and
630        * as -e in gnome-terminal is broken we use that. */
631       term_argv[1] = g_strdup ("-x");
632     }
633   else
634     {
635       if (check == NULL)
636         check = g_find_program_in_path ("nxterm");
637       if (check == NULL)
638         check = g_find_program_in_path ("color-xterm");
639       if (check == NULL)
640         check = g_find_program_in_path ("rxvt");
641       if (check == NULL)
642         check = g_find_program_in_path ("xterm");
643       if (check == NULL)
644         check = g_find_program_in_path ("dtterm");
645       if (check == NULL)
646         {
647           check = g_strdup ("xterm");
648           g_warning ("couldn't find a terminal, falling back to xterm");
649         }
650       term_argv[0] = check;
651       term_argv[1] = g_strdup ("-e");
652     }
653
654   real_argc = term_argc + *argc;
655   real_argv = g_new (char *, real_argc + 1);
656   
657   for (i = 0; i < term_argc; i++)
658     real_argv[i] = term_argv[i];
659   
660   for (j = 0; j < *argc; j++, i++)
661     real_argv[i] = (char *)the_argv[j];
662   
663   real_argv[i] = NULL;
664   
665   g_free (*argv);
666   *argv = real_argv;
667   *argc = real_argc;
668   
669   /* we use g_free here as we sucked all the inner strings
670    * out from it into real_argv */
671   g_free (term_argv);
672   return TRUE;
673 #else
674   return FALSE;
675 #endif /* G_OS_WIN32 */
676 }
677
678 /* '=' is the new '\0'.
679  * DO NOT CALL unless at least one string ends with '='
680  */
681 static gboolean
682 is_env (const char *a,
683         const char *b)
684 {
685   while (*a == *b)
686   {
687     if (*a == 0 || *b == 0)
688       return FALSE;
689     
690     if (*a == '=')
691       return TRUE;
692
693     a++;
694     b++;
695   }
696
697   return FALSE;
698 }
699
700 /* free with g_strfreev */
701 static char **
702 replace_env_var (char       **old_environ,
703                  const char  *env_var,
704                  const char  *new_value)
705 {
706   int length, new_length;
707   int index, new_index;
708   char **new_environ;
709   int i, new_i;
710
711   /* do two things at once:
712    *  - discover the length of the environment ('length')
713    *  - find the location (if any) of the env var ('index')
714    */
715   index = -1;
716   for (length = 0; old_environ[length]; length++)
717     {
718       /* if we already have it in our environment, replace */
719       if (is_env (old_environ[length], env_var))
720         index = length;
721     }
722
723   
724   /* no current env var, no desired env value.
725    * this is easy :)
726    */
727   if (new_value == NULL && index == -1)
728     return old_environ;
729
730   /* in all cases now, we will be using a modified environment.
731    * determine its length and allocated it.
732    * 
733    * after this block:
734    *   new_index   = location to insert, if any
735    *   new_length  = length of the new array
736    *   new_environ = the pointer array for the new environment
737    */
738   
739   if (new_value == NULL && index >= 0)
740     {
741       /* in this case, we will be removing an entry */
742       new_length = length - 1;
743       new_index = -1;
744     }
745   else if (new_value != NULL && index < 0)
746     {
747       /* in this case, we will be adding an entry to the end */
748       new_length = length + 1;
749       new_index = length;
750     }
751   else
752     /* in this case, we will be replacing the existing entry */
753     {
754       new_length = length;
755       new_index = index;
756     }
757
758   new_environ = g_malloc (sizeof (char *) * (new_length + 1));
759   new_environ[new_length] = NULL;
760
761   /* now we do the copying.
762    * for each entry in the new environment, we decide what to do
763    */
764   
765   i = 0;
766   for (new_i = 0; new_i < new_length; new_i++)
767     {
768       if (new_i == new_index)
769         {
770           /* insert our new item */
771           new_environ[new_i] = g_strconcat (env_var,
772                                             "=",
773                                             new_value,
774                                             NULL);
775           
776           /* if we had an old entry, skip it now */
777           if (index >= 0)
778             i++;
779         }
780       else
781         {
782           /* if this is the old DESKTOP_STARTUP_ID, skip it */
783           if (i == index)
784             i++;
785           
786           /* copy an old item */
787           new_environ[new_i] = g_strdup (old_environ[i]);
788           i++;
789         }
790     }
791
792   g_strfreev (old_environ);
793   
794   return new_environ;
795 }
796
797 static GList *
798 dup_list_segment (GList *start,
799                   GList *end)
800 {
801   GList *res;
802
803   res = NULL;
804   while (start != NULL && start != end)
805     {
806       res = g_list_prepend (res, start->data);
807       start = start->next;
808     }
809
810   return g_list_reverse (res);
811 }
812
813 #ifdef HAVE__NSGETENVIRON
814 #define environ (*_NSGetEnviron())
815 #elif !defined(G_OS_WIN32)
816
817 /* According to the Single Unix Specification, environ is not in 
818  *  * any system header, although unistd.h often declares it.
819  *   */
820 extern char **environ;
821 #endif
822
823 static gboolean
824 g_desktop_app_info_launch (GAppInfo           *appinfo,
825                            GList              *files,
826                            GAppLaunchContext  *launch_context,
827                            GError            **error)
828 {
829   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
830   gboolean completed = FALSE;
831   GList *old_files;
832   GList *launched_files;
833   char **envp;
834   char **argv;
835   int argc;
836   char *display;
837   char *sn_id;
838
839   g_return_val_if_fail (appinfo != NULL, FALSE);
840
841   argv = NULL;
842   envp = NULL;
843       
844   do 
845     {
846       old_files = files;
847       if (!expand_application_parameters (info, &files,
848                                           &argc, &argv, error))
849         goto out;
850       
851       if (info->terminal && !prepend_terminal_to_vector (&argc, &argv))
852         {
853           g_set_error (error, G_IO_ERROR, G_IO_ERROR_FAILED,
854                        _("Unable to find terminal required for application"));
855           goto out;
856         }
857
858       sn_id = NULL;
859       if (launch_context)
860         {
861           launched_files = dup_list_segment (old_files, files);
862           
863           display = g_app_launch_context_get_display (launch_context,
864                                                       appinfo,
865                                                       launched_files);
866
867           sn_id = NULL;
868           if (info->startup_notify)
869             sn_id = g_app_launch_context_get_startup_notify_id (launch_context,
870                                                                 appinfo,
871                                                                 launched_files);
872           
873           if (display || sn_id)
874             {
875 #ifdef G_OS_WIN32
876               /* FIXME */
877               envp = g_new0 (char *, 1);
878 #else
879               envp = g_strdupv (environ);
880 #endif
881               
882               if (display)
883                 envp = replace_env_var (envp,
884                                         "DISPLAY",
885                                         display);
886               
887               if (sn_id)
888                 envp = replace_env_var (envp,
889                                         "DESKTOP_STARTUP_ID",
890                                         sn_id);
891             }
892
893           g_free (display);
894           
895           g_list_free (launched_files);
896         }
897       
898       if (!g_spawn_async (info->path,  /* working directory */
899                           argv,
900                           envp,
901                           G_SPAWN_SEARCH_PATH /* flags */,
902                           NULL /* child_setup */,
903                           NULL /* data */,
904                           NULL /* child_pid */,
905                           error))
906         {
907           if (sn_id)
908             {
909               g_app_launch_context_launch_failed (launch_context, sn_id);
910               g_free (sn_id);
911             }
912           goto out;
913         }
914
915       
916       g_free (sn_id);
917       
918       g_strfreev (envp);
919       g_strfreev (argv);
920       envp = NULL;
921       argv = NULL;
922     }
923   while (files != NULL);
924
925   completed = TRUE;
926
927  out:
928   g_strfreev (argv);
929   g_strfreev (envp);
930
931   return completed;
932 }
933
934 static gboolean
935 g_desktop_app_info_supports_uris (GAppInfo *appinfo)
936 {
937   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
938  
939   return info->exec && 
940     ((strstr (info->exec, "%u") != NULL) ||
941      (strstr (info->exec, "%U") != NULL));
942 }
943
944 static gboolean
945 g_desktop_app_info_launch_uris (GAppInfo           *appinfo,
946                                 GList              *uris,
947                                 GAppLaunchContext  *launch_context,
948                                 GError            **error)
949 {
950   GList *files;
951   GFile *file;
952   gboolean res;
953
954   files = NULL;
955   while (uris)
956     {
957       file = g_file_new_for_uri (uris->data);
958       if (file == NULL)
959         g_warning ("Invalid uri passed to g_desktop_app_info_launch_uris");
960       
961       if (file)
962         files = g_list_prepend (files, file);
963     }
964   
965   files = g_list_reverse (files);
966   
967   res = g_desktop_app_info_launch (appinfo, files, launch_context, error);
968   
969   g_list_foreach  (files, (GFunc)g_object_unref, NULL);
970   g_list_free (files);
971   
972   return res;
973 }
974
975 static gboolean
976 g_desktop_app_info_should_show (GAppInfo   *appinfo,
977                                 const char *desktop_env)
978 {
979   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
980   gboolean found;
981   int i;
982
983   if (info->nodisplay)
984     return FALSE;
985
986   if (info->only_show_in)
987     {
988       if (desktop_env == NULL)
989         return FALSE;
990       
991       found = FALSE;
992       for (i = 0; info->only_show_in[i] != NULL; i++)
993         {
994           if (strcmp (info->only_show_in[i], desktop_env) == 0)
995             {
996               found = TRUE;
997               break;
998             }
999         }
1000       if (!found)
1001         return FALSE;
1002     }
1003
1004   if (info->not_show_in && desktop_env)
1005     {
1006       for (i = 0; info->not_show_in[i] != NULL; i++)
1007         {
1008           if (strcmp (info->not_show_in[i], desktop_env) == 0)
1009             return FALSE;
1010         }
1011     }
1012   
1013   return TRUE;
1014 }
1015
1016 typedef enum {
1017   APP_DIR,
1018   MIMETYPE_DIR
1019 } DirType;
1020
1021 static char *
1022 ensure_dir (DirType   type,
1023             GError  **error)
1024 {
1025   char *path, *display_name;
1026   int err;
1027
1028   if (type == APP_DIR)
1029     path = g_build_filename (g_get_user_data_dir (), "applications", NULL);
1030   else
1031     path = g_build_filename (g_get_user_data_dir (), "mime", "packages", NULL);
1032
1033   errno = 0;
1034   if (g_mkdir_with_parents (path, 0700) == 0)
1035     return path;
1036
1037   err = errno;
1038   display_name = g_filename_display_name (path);
1039   if (type == APP_DIR)
1040     g_set_error (error, G_IO_ERROR, g_io_error_from_errno (err),
1041                  _("Can't create user application configuration folder %s: %s"),
1042                  display_name, g_strerror (err));
1043   else
1044     g_set_error (error, G_IO_ERROR, g_io_error_from_errno (err),
1045                  _("Can't create user MIME configuration folder %s: %s"),
1046                  display_name, g_strerror (err));
1047
1048   g_free (display_name);
1049   g_free (path);
1050
1051   return NULL;
1052 }
1053
1054 static gboolean
1055 update_default_list (const char  *desktop_id, 
1056                      const char  *content_type, 
1057                      gboolean     add, 
1058                      GError     **error)
1059 {
1060   char *dirname, *filename;
1061   GKeyFile *key_file;
1062   gboolean load_succeeded, res;
1063   char **old_list;
1064   char **list;
1065   gsize length, data_size;
1066   char *data;
1067   int i, j;
1068
1069   dirname = ensure_dir (APP_DIR, error);
1070   if (!dirname)
1071     return FALSE;
1072
1073   filename = g_build_filename (dirname, "defaults.list", NULL);
1074   g_free (dirname);
1075
1076   key_file = g_key_file_new ();
1077   load_succeeded = g_key_file_load_from_file (key_file, filename, G_KEY_FILE_NONE, NULL);
1078   if (!load_succeeded || !g_key_file_has_group (key_file, DEFAULT_APPLICATIONS_GROUP))
1079     {
1080       g_key_file_free (key_file);
1081       key_file = g_key_file_new ();
1082     }
1083
1084   length = 0;
1085   old_list = g_key_file_get_string_list (key_file, DEFAULT_APPLICATIONS_GROUP,
1086                                          content_type, &length, NULL);
1087
1088   list = g_new (char *, 1 + length + 1);
1089
1090   i = 0;
1091   if (add)
1092     list[i++] = g_strdup (desktop_id);
1093   if (old_list)
1094     {
1095       for (j = 0; old_list[j] != NULL; j++)
1096         {
1097           if (strcmp (old_list[j], desktop_id) != 0)
1098             list[i++] = g_strdup (old_list[j]);
1099         }
1100     }
1101   list[i] = NULL;
1102   
1103   g_strfreev (old_list);
1104
1105   g_key_file_set_string_list (key_file,
1106                               DEFAULT_APPLICATIONS_GROUP,
1107                               content_type,
1108                               (const char * const *)list, i);
1109
1110   g_strfreev (list);
1111   
1112   data = g_key_file_to_data (key_file, &data_size, error);
1113   g_key_file_free (key_file);
1114   
1115   res = g_file_set_contents (filename, data, data_size, error);
1116
1117   mime_info_cache_reload (NULL);
1118                           
1119   g_free (filename);
1120   g_free (data);
1121   
1122   return res;
1123 }
1124
1125 static gboolean
1126 g_desktop_app_info_set_as_default_for_type (GAppInfo    *appinfo,
1127                                             const char  *content_type,
1128                                             GError     **error)
1129 {
1130   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
1131
1132   if (!g_app_info_add_supports_type (appinfo, content_type, error))
1133     return FALSE;
1134   
1135   return update_default_list (info->desktop_id, content_type, TRUE, error);
1136 }
1137
1138 static void
1139 update_program_done (GPid     pid,
1140                      gint     status,
1141                      gpointer data)
1142 {
1143   /* Did the application exit correctly */
1144   if (WIFEXITED (status) &&
1145       WEXITSTATUS (status) == 0)
1146     {
1147       /* Here we could clean out any caches in use */
1148     }
1149 }
1150
1151 static void
1152 run_update_command (char *command,
1153                     char *subdir)
1154 {
1155         char *argv[3] = {
1156                 NULL,
1157                 NULL,
1158                 NULL,
1159         };
1160         GPid pid = 0;
1161         GError *error = NULL;
1162
1163         argv[0] = command;
1164         argv[1] = g_build_filename (g_get_user_data_dir (), subdir, NULL);
1165
1166         if (g_spawn_async ("/", argv,
1167                            NULL,       /* envp */
1168                            G_SPAWN_SEARCH_PATH |
1169                            G_SPAWN_STDOUT_TO_DEV_NULL |
1170                            G_SPAWN_STDERR_TO_DEV_NULL |
1171                            G_SPAWN_DO_NOT_REAP_CHILD,
1172                            NULL, NULL, /* No setup function */
1173                            &pid,
1174                            NULL)) 
1175           g_child_watch_add (pid, update_program_done, NULL);
1176         else
1177           {
1178             /* If we get an error at this point, it's quite likely the user doesn't
1179              * have an installed copy of either 'update-mime-database' or
1180              * 'update-desktop-database'.  I don't think we want to popup an error
1181              * dialog at this point, so we just do a g_warning to give the user a
1182              * chance of debugging it.
1183              */
1184             g_warning ("%s", error->message);
1185           }
1186         
1187         g_free (argv[1]);
1188 }
1189
1190 static gboolean
1191 g_desktop_app_info_set_as_default_for_extension (GAppInfo    *appinfo,
1192                                                  const char  *extension,
1193                                                  GError     **error)
1194 {
1195   char *filename, *basename, *mimetype;
1196   char *dirname;
1197   gboolean res;
1198
1199   dirname = ensure_dir (MIMETYPE_DIR, error);
1200   if (!dirname)
1201     return FALSE;
1202   
1203   basename = g_strdup_printf ("user-extension-%s.xml", extension);
1204   filename = g_build_filename (dirname, basename, NULL);
1205   g_free (basename);
1206   g_free (dirname);
1207
1208   mimetype = g_strdup_printf ("application/x-extension-%s", extension);
1209   
1210   if (!g_file_test (filename, G_FILE_TEST_EXISTS)) 
1211     {
1212       char *contents;
1213
1214       contents =
1215         g_strdup_printf ("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
1216                          "<mime-info xmlns=\"http://www.freedesktop.org/standards/shared-mime-info\">\n"
1217                          " <mime-type type=\"%s\">\n"
1218                          "  <comment>%s document</comment>\n"
1219                          "  <glob pattern=\"*.%s\"/>\n"
1220                          " </mime-type>\n"
1221                          "</mime-info>\n", mimetype, extension, extension);
1222
1223       g_file_set_contents (filename, contents, -1, NULL);
1224       g_free (contents);
1225
1226       run_update_command ("update-mime-database", "mime");
1227     }
1228   g_free (filename);
1229   
1230   res = g_desktop_app_info_set_as_default_for_type (appinfo,
1231                                                     mimetype,
1232                                                     error);
1233
1234   g_free (mimetype);
1235   
1236   return res;
1237 }
1238
1239 static gboolean
1240 g_desktop_app_info_add_supports_type (GAppInfo    *appinfo,
1241                                       const char  *content_type,
1242                                       GError     **error)
1243 {
1244   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
1245   GKeyFile *keyfile;
1246   char *new_mimetypes, *old_mimetypes, *content;
1247   char *dirname;
1248   char *filename;
1249
1250   keyfile = g_key_file_new ();
1251   if (!g_key_file_load_from_file (keyfile, info->filename,
1252                                   G_KEY_FILE_KEEP_COMMENTS |
1253                                   G_KEY_FILE_KEEP_TRANSLATIONS, error))
1254     {
1255       g_key_file_free (keyfile);
1256       return FALSE;
1257     }
1258
1259   old_mimetypes = g_key_file_get_string (keyfile, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_MIME_TYPE, NULL);
1260   new_mimetypes = g_strconcat (content_type, ";", old_mimetypes, NULL);
1261   g_key_file_set_string (keyfile, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_MIME_TYPE, new_mimetypes);
1262   g_free (old_mimetypes);
1263   g_free (new_mimetypes);
1264
1265   content = g_key_file_to_data (keyfile, NULL, NULL);
1266   g_key_file_free (keyfile);
1267
1268   dirname = ensure_dir (APP_DIR, error);
1269   if (!dirname)
1270     {
1271       g_free (content);
1272       return FALSE;
1273     }
1274   
1275   filename = g_build_filename (dirname, info->desktop_id, NULL);
1276   g_free (dirname);
1277   
1278   if (!g_file_set_contents (filename, content, -1, error))
1279     {
1280       g_free (filename);
1281       g_free (content);
1282       return FALSE;
1283     }
1284   g_free (filename);
1285   g_free (content);
1286
1287   run_update_command ("update-desktop-database", "applications");
1288   return TRUE;
1289 }
1290
1291 static gboolean
1292 g_desktop_app_info_can_remove_supports_type (GAppInfo *appinfo)
1293 {
1294   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
1295   char *user_dirname;
1296   
1297   user_dirname = g_build_filename (g_get_user_data_dir (), "applications", NULL);
1298   return g_str_has_prefix (info->filename, user_dirname);
1299 }
1300
1301 static gboolean
1302 g_desktop_app_info_remove_supports_type (GAppInfo    *appinfo,
1303                                          const char  *content_type,
1304                                          GError     **error)
1305 {
1306   GDesktopAppInfo *info = G_DESKTOP_APP_INFO (appinfo);
1307   GKeyFile *keyfile;
1308   char *new_mimetypes, *old_mimetypes, *content;
1309   char *found;
1310   char *filename;
1311   char *dirname;
1312
1313   keyfile = g_key_file_new ();
1314   if (!g_key_file_load_from_file (keyfile, info->filename,
1315                                   G_KEY_FILE_KEEP_COMMENTS |
1316                                   G_KEY_FILE_KEEP_TRANSLATIONS, error))
1317     {
1318       g_key_file_free (keyfile);
1319       return FALSE;
1320     }
1321
1322   old_mimetypes = g_key_file_get_string (keyfile, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_MIME_TYPE, NULL);
1323   new_mimetypes = g_strdup (old_mimetypes);
1324   found = NULL;
1325   if (new_mimetypes)
1326     found = strstr (new_mimetypes, content_type);
1327   if (found && *(found + strlen (content_type)) == ';')
1328     {
1329       char *rest = found + strlen (content_type) + 1;
1330       memmove (found, rest, strlen (rest) + 1);
1331     }
1332   g_key_file_set_string (keyfile, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_MIME_TYPE, new_mimetypes);
1333   g_free (old_mimetypes);
1334   g_free (new_mimetypes);
1335
1336   content = g_key_file_to_data (keyfile, NULL, NULL);
1337   g_key_file_free (keyfile);
1338
1339   dirname = ensure_dir (APP_DIR, error);
1340   if (!dirname)
1341     {
1342       g_free (content);
1343       return FALSE;
1344     }
1345   
1346   filename = g_build_filename (dirname, info->desktop_id, NULL);
1347   g_free (dirname);
1348   if (!g_file_set_contents (filename, content, -1, error))
1349     {
1350       g_free (filename);
1351       g_free (content);
1352       return FALSE;
1353     }
1354   g_free (filename);
1355   g_free (content);
1356
1357   run_update_command ("update-desktop-database", "applications");
1358
1359   return update_default_list (info->desktop_id, content_type, FALSE, error);
1360 }
1361
1362 /**
1363  * g_app_info_create_from_commandline:
1364  * @commandline: the commandline to use
1365  * @application_name: the application name, or %NULL to use @commandline
1366  * @flags: flags that can specify details of the created #GAppInfo
1367  * @error: a #GError location to store the error occuring, %NULL to ignore.
1368  *
1369  * Creates a new #GAppInfo from the given information.
1370  *
1371  * Returns: new #GAppInfo for given command.
1372  **/
1373 GAppInfo *
1374 g_app_info_create_from_commandline (const char           *commandline,
1375                                     const char           *application_name,
1376                                     GAppInfoCreateFlags   flags,
1377                                     GError              **error)
1378 {
1379   GKeyFile *key_file;
1380   char *dirname;
1381   char **split;
1382   char *basename, *exec, *filename, *comment;
1383   char *data, *desktop_id;
1384   gsize data_size;
1385   int fd;
1386   GDesktopAppInfo *info;
1387   gboolean res;
1388
1389   dirname = ensure_dir (APP_DIR, error);
1390   if (!dirname)
1391     return NULL;
1392   
1393   key_file = g_key_file_new ();
1394
1395   g_key_file_set_string (key_file, G_KEY_FILE_DESKTOP_GROUP,
1396                          "Encoding", "UTF-8");
1397   g_key_file_set_string (key_file, G_KEY_FILE_DESKTOP_GROUP,
1398                          G_KEY_FILE_DESKTOP_KEY_VERSION, "1.0");
1399   g_key_file_set_string (key_file, G_KEY_FILE_DESKTOP_GROUP,
1400                          G_KEY_FILE_DESKTOP_KEY_TYPE,
1401                          G_KEY_FILE_DESKTOP_TYPE_APPLICATION);
1402   if (flags & G_APP_INFO_CREATE_NEEDS_TERMINAL) 
1403     g_key_file_set_boolean (key_file, G_KEY_FILE_DESKTOP_GROUP,
1404                             G_KEY_FILE_DESKTOP_KEY_TERMINAL, TRUE);
1405
1406   exec = g_strconcat (commandline, " %f", NULL);
1407   g_key_file_set_string (key_file, G_KEY_FILE_DESKTOP_GROUP,
1408                          G_KEY_FILE_DESKTOP_KEY_EXEC, exec);
1409   g_free (exec);
1410
1411   /* FIXME: this should be more robust. Maybe g_shell_parse_argv and use argv[0] */
1412   split = g_strsplit (commandline, " ", 2);
1413   basename = g_path_get_basename (split[0]);
1414   g_strfreev (split);
1415   g_key_file_set_string (key_file, G_KEY_FILE_DESKTOP_GROUP,
1416                          G_KEY_FILE_DESKTOP_KEY_NAME, application_name?application_name:basename);
1417
1418   comment = g_strdup_printf (_("Custom definition for %s"), basename);
1419   g_key_file_set_string (key_file, G_KEY_FILE_DESKTOP_GROUP,
1420                          G_KEY_FILE_DESKTOP_KEY_COMMENT, comment);
1421   g_free (comment);
1422   
1423   g_key_file_set_boolean (key_file, G_KEY_FILE_DESKTOP_GROUP,
1424                           G_KEY_FILE_DESKTOP_KEY_NO_DISPLAY, TRUE);
1425
1426   data = g_key_file_to_data (key_file, &data_size, NULL);
1427   g_key_file_free (key_file);
1428
1429   desktop_id = g_strdup_printf ("userapp-%s-XXXXXX.desktop", basename);
1430   g_free (basename);
1431   filename = g_build_filename (dirname, desktop_id, NULL);
1432   g_free (desktop_id);
1433   g_free (dirname);
1434   
1435   fd = g_mkstemp (filename);
1436   if (fd == -1)
1437     {
1438       char *display_name;
1439
1440       display_name = g_filename_display_name (filename);
1441       g_set_error (error, G_IO_ERROR, G_IO_ERROR_FAILED,
1442                    _("Can't create user desktop file %s"), display_name);
1443       g_free (display_name);
1444       g_free (filename);
1445       g_free (data);
1446       return NULL;
1447     }
1448
1449   desktop_id = g_path_get_basename (filename);
1450
1451   close (fd);
1452   
1453   res = g_file_set_contents (filename, data, data_size, error);
1454   if (!res)
1455     {
1456       g_free (desktop_id);
1457       g_free (filename);
1458       return NULL;
1459     }
1460
1461   run_update_command ("update-desktop-database", "applications");
1462   
1463   info = g_desktop_app_info_new_from_filename (filename);
1464   g_free (filename);
1465   if (info == NULL) 
1466     g_set_error (error, G_IO_ERROR, G_IO_ERROR_FAILED,
1467                  _("Can't load just created desktop file"));
1468   else
1469     info->desktop_id = g_strdup (desktop_id);
1470     
1471   g_free (desktop_id);
1472   
1473   return G_APP_INFO (info);
1474 }
1475
1476
1477 static void
1478 g_desktop_app_info_iface_init (GAppInfoIface *iface)
1479 {
1480   iface->dup = g_desktop_app_info_dup;
1481   iface->equal = g_desktop_app_info_equal;
1482   iface->get_id = g_desktop_app_info_get_id;
1483   iface->get_name = g_desktop_app_info_get_name;
1484   iface->get_description = g_desktop_app_info_get_description;
1485   iface->get_executable = g_desktop_app_info_get_executable;
1486   iface->get_icon = g_desktop_app_info_get_icon;
1487   iface->launch = g_desktop_app_info_launch;
1488   iface->supports_uris = g_desktop_app_info_supports_uris;
1489   iface->launch_uris = g_desktop_app_info_launch_uris;
1490   iface->should_show = g_desktop_app_info_should_show;
1491   iface->set_as_default_for_type = g_desktop_app_info_set_as_default_for_type;
1492   iface->set_as_default_for_extension = g_desktop_app_info_set_as_default_for_extension;
1493   iface->add_supports_type = g_desktop_app_info_add_supports_type;
1494   iface->can_remove_supports_type = g_desktop_app_info_can_remove_supports_type;
1495   iface->remove_supports_type = g_desktop_app_info_remove_supports_type;
1496 }
1497
1498 static gboolean
1499 app_info_in_list (GAppInfo *info, 
1500                   GList    *list)
1501 {
1502   while (list != NULL)
1503     {
1504       if (g_app_info_equal (info, list->data))
1505         return TRUE;
1506       list = list->next;
1507     }
1508   return FALSE;
1509 }
1510
1511
1512 /**
1513  * g_app_info_get_all_for_type:
1514  * @content_type: the content type to find a #GAppInfo for
1515  * 
1516  * Gets a list of all #GAppInfo s for a given content type.
1517  *
1518  * Returns: #GList of #GAppInfo s for given @content_type.
1519  **/
1520 GList *
1521 g_app_info_get_all_for_type (const char *content_type)
1522 {
1523   GList *desktop_entries, *l;
1524   GList *infos;
1525   GDesktopAppInfo *info;
1526   
1527   desktop_entries = get_all_desktop_entries_for_mime_type (content_type);
1528
1529   infos = NULL;
1530   for (l = desktop_entries; l != NULL; l = l->next)
1531     {
1532       char *desktop_entry = l->data;
1533
1534       info = g_desktop_app_info_new (desktop_entry);
1535       if (info)
1536         {
1537           if (app_info_in_list (G_APP_INFO (info), infos))
1538             g_object_unref (info);
1539           else
1540             infos = g_list_prepend (infos, info);
1541         }
1542       g_free (desktop_entry);
1543     }
1544
1545   g_list_free (desktop_entries);
1546   
1547   return g_list_reverse (infos);
1548 }
1549
1550
1551 /**
1552  * g_app_info_get_default_for_type:
1553  * @content_type: the content type to find a #GAppInfo for
1554  * @must_support_uris: if %TRUE, the #GAppInfo is expected to
1555  *     support URIs
1556  * 
1557  * Gets the #GAppInfo that correspond to a given content type.
1558  *
1559  * Returns: #GAppInfo for given @content_type.
1560  **/
1561 GAppInfo *
1562 g_app_info_get_default_for_type (const char *content_type,
1563                                  gboolean    must_support_uris)
1564 {
1565   GList *desktop_entries, *l;
1566   GAppInfo *info;
1567   
1568   desktop_entries = get_all_desktop_entries_for_mime_type (content_type);
1569
1570   info = NULL;
1571   for (l = desktop_entries; l != NULL; l = l->next)
1572     {
1573       char *desktop_entry = l->data;
1574
1575       info = (GAppInfo *)g_desktop_app_info_new (desktop_entry);
1576       if (info)
1577         {
1578           if (must_support_uris && !g_app_info_supports_uris (info))
1579             {
1580               g_object_unref (info);
1581               info = NULL;
1582             }
1583           else
1584             break;
1585         }
1586     }
1587   
1588   g_list_foreach  (desktop_entries, (GFunc)g_free, NULL);
1589   g_list_free (desktop_entries);
1590   
1591   return info;
1592 }
1593
1594
1595 /**
1596  * g_app_info_get_default_for_uri_scheme:
1597  * @uri_scheme: a string containing a URI scheme.
1598  *
1599  * Gets the default application for launching applications 
1600  * using this URI scheme.
1601  *
1602  * TODO: This is currently unimplemented.
1603  * 
1604  * Returns: %NULL.
1605  **/
1606 GAppInfo *
1607 g_app_info_get_default_for_uri_scheme (const char *uri_scheme)
1608 {
1609   /* TODO: Implement this using giomodules, reading the gconf settings
1610    * in /desktop/gnome/url-handlers
1611    */
1612   return NULL;
1613 }
1614
1615
1616 static void
1617 get_apps_from_dir (GHashTable *apps, 
1618                    const char *dirname, 
1619                    const char *prefix)
1620 {
1621   GDir *dir;
1622   const char *basename;
1623   char *filename, *subprefix, *desktop_id;
1624   gboolean hidden;
1625   GDesktopAppInfo *appinfo;
1626   
1627   dir = g_dir_open (dirname, 0, NULL);
1628   if (dir)
1629     {
1630       while ((basename = g_dir_read_name (dir)) != NULL)
1631         {
1632           filename = g_build_filename (dirname, basename, NULL);
1633           if (g_str_has_suffix (basename, ".desktop"))
1634             {
1635               desktop_id = g_strconcat (prefix, basename, NULL);
1636
1637               /* Use _extended so we catch NULLs too (hidden) */
1638               if (!g_hash_table_lookup_extended (apps, desktop_id, NULL, NULL))
1639                 {
1640                   appinfo = g_desktop_app_info_new_from_filename (filename);
1641
1642                   /* Don't return apps that don't take arguments */
1643                   if (appinfo &&
1644                       (g_desktop_app_info_get_is_hidden (appinfo) ||
1645                        (appinfo->exec && 
1646                         strstr (appinfo->exec,"%U") == NULL &&
1647                         strstr (appinfo->exec,"%u") == NULL &&
1648                         strstr (appinfo->exec,"%f") == NULL &&
1649                         strstr (appinfo->exec,"%F") == NULL)))
1650                     {
1651                       g_object_unref (appinfo);
1652                       appinfo = NULL;
1653                       hidden = TRUE;
1654                     }
1655                                       
1656                   if (appinfo != NULL || hidden)
1657                     {
1658                       g_hash_table_insert (apps, g_strdup (desktop_id), appinfo);
1659
1660                       if (appinfo)
1661                         {
1662                           /* Reuse instead of strdup here */
1663                           appinfo->desktop_id = desktop_id;
1664                           desktop_id = NULL;
1665                         }
1666                     }
1667                 }
1668               g_free (desktop_id);
1669             }
1670           else
1671             {
1672               if (g_file_test (filename, G_FILE_TEST_IS_DIR))
1673                 {
1674                   subprefix = g_strconcat (prefix, basename, "-", NULL);
1675                   get_apps_from_dir (apps, filename, subprefix);
1676                   g_free (subprefix);
1677                 }
1678             }
1679           g_free (filename);
1680         }
1681       g_dir_close (dir);
1682     }
1683 }
1684
1685
1686 /**
1687  * g_app_info_get_all:
1688  *
1689  * Gets a list of all of the applications currently registered on this system.
1690  * 
1691  * Returns: a newly allocated #GList of references to #GAppInfo<!---->s.
1692  **/
1693 GList *
1694 g_app_info_get_all (void)
1695 {
1696   const char * const *dirs;
1697   GHashTable *apps;
1698   GHashTableIter iter;
1699   gpointer value;
1700   int i;
1701   GList *infos;
1702
1703   dirs = get_applications_search_path ();
1704
1705   apps = g_hash_table_new_full (g_str_hash, g_str_equal,
1706                                 g_free, NULL);
1707
1708   
1709   for (i = 0; dirs[i] != NULL; i++)
1710     get_apps_from_dir (apps, dirs[i], "");
1711
1712
1713   infos = NULL;
1714   g_hash_table_iter_init (&iter, apps);
1715   while (g_hash_table_iter_next (&iter, NULL, &value))
1716     infos = g_list_prepend (infos, value);
1717
1718   g_hash_table_destroy (apps);
1719
1720   return g_list_reverse (infos);
1721 }
1722
1723 /* Cacheing of mimeinfo.cache and defaults.list files */
1724
1725 typedef struct {
1726   char *path;
1727   GHashTable *mime_info_cache_map;
1728   GHashTable *defaults_list_map;
1729   time_t mime_info_cache_timestamp;
1730   time_t defaults_list_timestamp;
1731 } MimeInfoCacheDir;
1732
1733 typedef struct {
1734   GList *dirs;                       /* mimeinfo.cache and defaults.list */
1735   GHashTable *global_defaults_cache; /* global results of defaults.list lookup and validation */
1736   time_t last_stat_time;
1737   guint should_ping_mime_monitor : 1;
1738 } MimeInfoCache;
1739
1740 static MimeInfoCache *mime_info_cache = NULL;
1741 G_LOCK_DEFINE_STATIC (mime_info_cache);
1742
1743 static void mime_info_cache_dir_add_desktop_entries (MimeInfoCacheDir  *dir,
1744                                                      const char        *mime_type,
1745                                                      char             **new_desktop_file_ids);
1746
1747 static MimeInfoCache * mime_info_cache_new (void);
1748
1749 static void
1750 destroy_info_cache_value (gpointer  key, 
1751                           GList    *value, 
1752                           gpointer  data)
1753 {
1754   g_list_foreach (value, (GFunc)g_free, NULL);
1755   g_list_free (value);
1756 }
1757
1758 static void
1759 destroy_info_cache_map (GHashTable *info_cache_map)
1760 {
1761   g_hash_table_foreach (info_cache_map, (GHFunc)destroy_info_cache_value, NULL);
1762   g_hash_table_destroy (info_cache_map);
1763 }
1764
1765 static gboolean
1766 mime_info_cache_dir_out_of_date (MimeInfoCacheDir *dir,
1767                                  const char       *cache_file,
1768                                  time_t           *timestamp)
1769 {
1770   struct stat buf;
1771   char *filename;
1772   
1773   filename = g_build_filename (dir->path, cache_file, NULL);
1774   
1775   if (g_stat (filename, &buf) < 0)
1776     {
1777       g_free (filename);
1778       return TRUE;
1779     }
1780   g_free (filename);
1781
1782   if (buf.st_mtime != *timestamp) 
1783     return TRUE;
1784   
1785   return FALSE;
1786 }
1787
1788 /* Call with lock held */
1789 static gboolean
1790 remove_all (gpointer  key,
1791             gpointer  value,
1792             gpointer  user_data)
1793 {
1794   return TRUE;
1795 }
1796
1797
1798 static void
1799 mime_info_cache_blow_global_cache (void)
1800 {
1801   g_hash_table_foreach_remove (mime_info_cache->global_defaults_cache,
1802                                remove_all, NULL);
1803 }
1804
1805 static void
1806 mime_info_cache_dir_init (MimeInfoCacheDir *dir)
1807 {
1808   GError *load_error;
1809   GKeyFile *key_file;
1810   gchar *filename, **mime_types;
1811   int i;
1812   struct stat buf;
1813   
1814   load_error = NULL;
1815   mime_types = NULL;
1816   
1817   if (dir->mime_info_cache_map != NULL &&
1818       !mime_info_cache_dir_out_of_date (dir, "mimeinfo.cache",
1819                                         &dir->mime_info_cache_timestamp))
1820     return;
1821   
1822   if (dir->mime_info_cache_map != NULL)
1823     destroy_info_cache_map (dir->mime_info_cache_map);
1824   
1825   dir->mime_info_cache_map = g_hash_table_new_full (g_str_hash, g_str_equal,
1826                                                     (GDestroyNotify) g_free,
1827                                                     NULL);
1828   
1829   key_file = g_key_file_new ();
1830   
1831   filename = g_build_filename (dir->path, "mimeinfo.cache", NULL);
1832   
1833   if (g_stat (filename, &buf) < 0)
1834     goto error;
1835   
1836   if (dir->mime_info_cache_timestamp > 0) 
1837     mime_info_cache->should_ping_mime_monitor = TRUE;
1838   
1839   dir->mime_info_cache_timestamp = buf.st_mtime;
1840   
1841   g_key_file_load_from_file (key_file, filename, G_KEY_FILE_NONE, &load_error);
1842   
1843   g_free (filename);
1844   filename = NULL;
1845   
1846   if (load_error != NULL)
1847     goto error;
1848   
1849   mime_types = g_key_file_get_keys (key_file, MIME_CACHE_GROUP,
1850                                     NULL, &load_error);
1851   
1852   if (load_error != NULL)
1853     goto error;
1854   
1855   for (i = 0; mime_types[i] != NULL; i++)
1856     {
1857       gchar **desktop_file_ids;
1858       char *unaliased_type;
1859       desktop_file_ids = g_key_file_get_string_list (key_file,
1860                                                      MIME_CACHE_GROUP,
1861                                                      mime_types[i],
1862                                                      NULL,
1863                                                      NULL);
1864       
1865       if (desktop_file_ids == NULL)
1866         continue;
1867
1868       unaliased_type = _g_unix_content_type_unalias (mime_types[i]);
1869       mime_info_cache_dir_add_desktop_entries (dir,
1870                                                unaliased_type,
1871                                                desktop_file_ids);
1872       g_free (unaliased_type);
1873     
1874       g_strfreev (desktop_file_ids);
1875     }
1876   
1877   g_strfreev (mime_types);
1878   g_key_file_free (key_file);
1879   
1880   return;
1881  error:
1882   g_free (filename);
1883   g_key_file_free (key_file);
1884   
1885   if (mime_types != NULL)
1886     g_strfreev (mime_types);
1887   
1888   if (load_error)
1889     g_error_free (load_error);
1890 }
1891
1892 static void
1893 mime_info_cache_dir_init_defaults_list (MimeInfoCacheDir *dir)
1894 {
1895   GKeyFile *key_file;
1896   GError *load_error;
1897   gchar *filename, **mime_types;
1898   char *unaliased_type;
1899   char **desktop_file_ids;
1900   int i;
1901   struct stat buf;
1902
1903   load_error = NULL;
1904   mime_types = NULL;
1905
1906   if (dir->defaults_list_map != NULL &&
1907       !mime_info_cache_dir_out_of_date (dir, "defaults.list",
1908                                         &dir->defaults_list_timestamp))
1909     return;
1910   
1911   if (dir->defaults_list_map != NULL)
1912     g_hash_table_destroy (dir->defaults_list_map);
1913
1914   dir->defaults_list_map = g_hash_table_new_full (g_str_hash, g_str_equal,
1915                                                   g_free, (GDestroyNotify)g_strfreev);
1916
1917   key_file = g_key_file_new ();
1918   
1919   filename = g_build_filename (dir->path, "defaults.list", NULL);
1920   if (g_stat (filename, &buf) < 0)
1921     goto error;
1922
1923   if (dir->defaults_list_timestamp > 0) 
1924     mime_info_cache->should_ping_mime_monitor = TRUE;
1925
1926   dir->defaults_list_timestamp = buf.st_mtime;
1927
1928   g_key_file_load_from_file (key_file, filename, G_KEY_FILE_NONE, &load_error);
1929   g_free (filename);
1930   filename = NULL;
1931
1932   if (load_error != NULL)
1933     goto error;
1934
1935   mime_types = g_key_file_get_keys (key_file, DEFAULT_APPLICATIONS_GROUP,
1936                                     NULL, &load_error);
1937
1938   if (load_error != NULL)
1939     goto error;
1940
1941   for (i = 0; mime_types[i] != NULL; i++)
1942     {
1943       desktop_file_ids = g_key_file_get_string_list (key_file,
1944                                                      DEFAULT_APPLICATIONS_GROUP,
1945                                                      mime_types[i],
1946                                                      NULL,
1947                                                      NULL);
1948       if (desktop_file_ids == NULL)
1949         continue;
1950
1951       unaliased_type = _g_unix_content_type_unalias (mime_types[i]);
1952       g_hash_table_replace (dir->defaults_list_map,
1953                             unaliased_type,
1954                             desktop_file_ids);
1955     }
1956
1957   g_strfreev (mime_types);
1958   g_key_file_free (key_file);
1959   
1960   return;
1961  error:
1962   g_free (filename);
1963   g_key_file_free (key_file);
1964   
1965   if (mime_types != NULL)
1966     g_strfreev (mime_types);
1967   
1968   if (load_error)
1969     g_error_free (load_error);
1970 }
1971
1972 static MimeInfoCacheDir *
1973 mime_info_cache_dir_new (const char *path)
1974 {
1975   MimeInfoCacheDir *dir;
1976
1977   dir = g_new0 (MimeInfoCacheDir, 1);
1978   dir->path = g_strdup (path);
1979   
1980   return dir;
1981 }
1982
1983 static void
1984 mime_info_cache_dir_free (MimeInfoCacheDir *dir)
1985 {
1986   if (dir == NULL)
1987     return;
1988   
1989   if (dir->mime_info_cache_map != NULL)
1990     {
1991       destroy_info_cache_map (dir->mime_info_cache_map);
1992       dir->mime_info_cache_map = NULL;
1993       
1994   }
1995   
1996   if (dir->defaults_list_map != NULL)
1997     {
1998       g_hash_table_destroy (dir->defaults_list_map);
1999       dir->defaults_list_map = NULL;
2000     }
2001   
2002   g_free (dir);
2003 }
2004
2005 static void
2006 mime_info_cache_dir_add_desktop_entries (MimeInfoCacheDir  *dir,
2007                                          const char        *mime_type,
2008                                          char             **new_desktop_file_ids)
2009 {
2010   GList *desktop_file_ids;
2011   int i;
2012   
2013   desktop_file_ids = g_hash_table_lookup (dir->mime_info_cache_map,
2014                                           mime_type);
2015   
2016   for (i = 0; new_desktop_file_ids[i] != NULL; i++)
2017     {
2018       if (!g_list_find (desktop_file_ids, new_desktop_file_ids[i]))
2019         desktop_file_ids = g_list_append (desktop_file_ids,
2020                                           g_strdup (new_desktop_file_ids[i]));
2021     }
2022   
2023   g_hash_table_insert (dir->mime_info_cache_map, g_strdup (mime_type), desktop_file_ids);
2024 }
2025
2026 static void
2027 mime_info_cache_init_dir_lists (void)
2028 {
2029   const char * const *dirs;
2030   int i;
2031   
2032   mime_info_cache = mime_info_cache_new ();
2033   
2034   dirs = get_applications_search_path ();
2035   
2036   for (i = 0; dirs[i] != NULL; i++)
2037     {
2038       MimeInfoCacheDir *dir;
2039       
2040       dir = mime_info_cache_dir_new (dirs[i]);
2041       
2042       if (dir != NULL)
2043         {
2044           mime_info_cache_dir_init (dir);
2045           mime_info_cache_dir_init_defaults_list (dir);
2046           
2047           mime_info_cache->dirs = g_list_append (mime_info_cache->dirs, dir);
2048         }
2049     }
2050 }
2051
2052 static void
2053 mime_info_cache_update_dir_lists (void)
2054 {
2055   GList *tmp;
2056   
2057   tmp = mime_info_cache->dirs;
2058   
2059   while (tmp != NULL)
2060     {
2061       MimeInfoCacheDir *dir = (MimeInfoCacheDir *) tmp->data;
2062
2063       /* No need to do this if we had file monitors... */
2064       mime_info_cache_blow_global_cache ();
2065       mime_info_cache_dir_init (dir);
2066       mime_info_cache_dir_init_defaults_list (dir);
2067       
2068       tmp = tmp->next;
2069     }
2070 }
2071
2072 static void
2073 mime_info_cache_init (void)
2074 {
2075         G_LOCK (mime_info_cache);
2076         if (mime_info_cache == NULL)
2077           mime_info_cache_init_dir_lists ();
2078         else
2079           {
2080             time_t now;
2081             
2082             time (&now);
2083             if (now >= mime_info_cache->last_stat_time + 10)
2084               {
2085                 mime_info_cache_update_dir_lists ();
2086                 mime_info_cache->last_stat_time = now;
2087               }
2088           }
2089
2090         if (mime_info_cache->should_ping_mime_monitor)
2091           {
2092             /* g_idle_add (emit_mime_changed, NULL); */
2093             mime_info_cache->should_ping_mime_monitor = FALSE;
2094           }
2095         
2096         G_UNLOCK (mime_info_cache);
2097 }
2098
2099 static MimeInfoCache *
2100 mime_info_cache_new (void)
2101 {
2102   MimeInfoCache *cache;
2103   
2104   cache = g_new0 (MimeInfoCache, 1);
2105   
2106   cache->global_defaults_cache = g_hash_table_new_full (g_str_hash, g_str_equal,
2107                                                         (GDestroyNotify) g_free,
2108                                                         (GDestroyNotify) g_free);
2109   return cache;
2110 }
2111
2112 static void
2113 mime_info_cache_free (MimeInfoCache *cache)
2114 {
2115   if (cache == NULL)
2116     return;
2117   
2118   g_list_foreach (cache->dirs,
2119                   (GFunc) mime_info_cache_dir_free,
2120                   NULL);
2121   g_list_free (cache->dirs);
2122   g_hash_table_destroy (cache->global_defaults_cache);
2123   g_free (cache);
2124 }
2125
2126 /**
2127  * mime_info_cache_reload:
2128  * @dir: directory path which needs reloading.
2129  * 
2130  * Reload the mime information for the @dir.
2131  */
2132 static void
2133 mime_info_cache_reload (const char *dir)
2134 {
2135   /* FIXME: just reload the dir that needs reloading,
2136    * don't blow the whole cache
2137    */
2138   if (mime_info_cache != NULL)
2139     {
2140       G_LOCK (mime_info_cache);
2141       mime_info_cache_free (mime_info_cache);
2142       mime_info_cache = NULL;
2143       G_UNLOCK (mime_info_cache);
2144     }
2145 }
2146
2147 static GList *
2148 append_desktop_entry (GList      *list, 
2149                       const char *desktop_entry)
2150 {
2151   /* Add if not already in list, and valid */
2152   if (!g_list_find_custom (list, desktop_entry, (GCompareFunc) strcmp))
2153     list = g_list_prepend (list, g_strdup (desktop_entry));
2154   
2155   return list;
2156 }
2157
2158 /**
2159  * get_all_desktop_entries_for_mime_type:
2160  * @mime_type: a mime type.
2161  *
2162  * Returns all the desktop ids for @mime_type. The desktop files
2163  * are listed in an order so that default applications are listed before
2164  * non-default ones, and handlers for inherited mimetypes are listed
2165  * after the base ones.
2166  *
2167  * Return value: a #GList containing the desktop ids which claim
2168  *    to handle @mime_type.
2169  */
2170 static GList *
2171 get_all_desktop_entries_for_mime_type (const char *base_mime_type)
2172 {
2173   GList *desktop_entries, *list, *dir_list, *tmp;
2174   MimeInfoCacheDir *dir;
2175   char *mime_type;
2176   char **mime_types;
2177   char **default_entries;
2178   int i,j;
2179   
2180   mime_info_cache_init ();
2181
2182   mime_types = _g_unix_content_type_get_parents (base_mime_type);
2183   G_LOCK (mime_info_cache);
2184   
2185   desktop_entries = NULL;
2186   for (i = 0; mime_types[i] != NULL; i++)
2187     {
2188       mime_type = mime_types[i];
2189
2190       /* Go through all apps listed as defaults */
2191       for (dir_list = mime_info_cache->dirs;
2192            dir_list != NULL;
2193            dir_list = dir_list->next)
2194         {
2195           dir = dir_list->data;
2196           default_entries = g_hash_table_lookup (dir->defaults_list_map, mime_type);
2197           for (j = 0; default_entries != NULL && default_entries[j] != NULL; j++)
2198             desktop_entries = append_desktop_entry (desktop_entries, default_entries[j]);
2199         }
2200
2201       /* Go through all entries that support the mimetype */
2202       for (dir_list = mime_info_cache->dirs;
2203            dir_list != NULL;
2204            dir_list = dir_list->next) 
2205         {
2206           dir = dir_list->data;
2207         
2208           list = g_hash_table_lookup (dir->mime_info_cache_map, mime_type);
2209           for (tmp = list; tmp != NULL; tmp = tmp->next)
2210             desktop_entries = append_desktop_entry (desktop_entries, tmp->data);
2211         }
2212     }
2213   
2214   G_UNLOCK (mime_info_cache);
2215
2216   g_strfreev (mime_types);
2217   
2218   desktop_entries = g_list_reverse (desktop_entries);
2219   
2220   return desktop_entries;
2221 }
2222
2223 #define __G_DESKTOP_APP_INFO_C__
2224 #include "gioaliasdef.c"