Add ability to get symbolic icon for content type
[platform/upstream/glib.git] / gio / glocalfileinfo.c
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
27 #ifdef HAVE_SYS_TIME_H
28 #include <sys/time.h>
29 #endif
30 #include <sys/types.h>
31 #include <sys/stat.h>
32 #include <string.h>
33 #ifdef HAVE_UNISTD_H
34 #include <unistd.h>
35 #endif
36 #include <fcntl.h>
37 #include <errno.h>
38 #ifdef HAVE_GRP_H
39 #include <grp.h>
40 #endif
41 #ifdef HAVE_PWD_H
42 #include <pwd.h>
43 #endif
44 #ifdef HAVE_SELINUX
45 #include <selinux/selinux.h>
46 #endif
47
48 #ifdef HAVE_XATTR
49
50 #if defined HAVE_SYS_XATTR_H
51   #include <sys/xattr.h>
52 #elif defined HAVE_ATTR_XATTR_H
53   #include <attr/xattr.h>
54 #else
55   #error "Neither <sys/xattr.h> nor <attr/xattr.h> is present but extended attribute support is enabled."
56 #endif /* defined HAVE_SYS_XATTR_H || HAVE_ATTR_XATTR_H */
57
58 #endif /* HAVE_XATTR */
59
60 #include <glib/gstdio.h>
61 #include <gfileattribute-priv.h>
62 #include <gfileinfo-priv.h>
63 #include <gvfs.h>
64
65 #include "glibintl.h"
66
67 #ifdef G_OS_WIN32
68 #include <windows.h>
69 #include <io.h>
70 #ifndef W_OK
71 #define W_OK 2
72 #endif
73 #ifndef R_OK
74 #define R_OK 4
75 #endif
76 #ifndef X_OK
77 #define X_OK 0 /* not really */
78 #endif
79 #ifndef S_ISREG
80 #define S_ISREG(m) (((m) & _S_IFMT) == _S_IFREG)
81 #endif
82 #ifndef S_ISDIR
83 #define S_ISDIR(m) (((m) & _S_IFMT) == _S_IFDIR)
84 #endif
85 #ifndef S_IXUSR
86 #define S_IXUSR _S_IEXEC
87 #endif
88 #endif
89
90 #include "glocalfileinfo.h"
91 #include "gioerror.h"
92 #include "gthemedicon.h"
93 #include "gcontenttypeprivate.h"
94
95
96 struct ThumbMD5Context {
97         guint32 buf[4];
98         guint32 bits[2];
99         unsigned char in[64];
100 };
101
102 #ifndef G_OS_WIN32
103
104 typedef struct {
105   char *user_name;
106   char *real_name;
107 } UidData;
108
109 G_LOCK_DEFINE_STATIC (uid_cache);
110 static GHashTable *uid_cache = NULL;
111
112 G_LOCK_DEFINE_STATIC (gid_cache);
113 static GHashTable *gid_cache = NULL;
114
115 #endif  /* !G_OS_WIN32 */
116
117 char *
118 _g_local_file_info_create_etag (GLocalFileStat *statbuf)
119 {
120   glong sec, usec;
121
122   sec = statbuf->st_mtime;
123 #if defined (HAVE_STRUCT_STAT_ST_MTIMENSEC)
124   usec = statbuf->st_mtimensec / 1000;
125 #elif defined (HAVE_STRUCT_STAT_ST_MTIM_TV_NSEC)
126   usec = statbuf->st_mtim.tv_nsec / 1000;
127 #else
128   usec = 0;
129 #endif
130
131   return g_strdup_printf ("%lu:%lu", sec, usec);
132 }
133
134 static char *
135 _g_local_file_info_create_file_id (GLocalFileStat *statbuf)
136 {
137   return g_strdup_printf ("l%" G_GUINT64_FORMAT ":%" G_GUINT64_FORMAT,
138                           (guint64) statbuf->st_dev, 
139                           (guint64) statbuf->st_ino);
140 }
141
142 static char *
143 _g_local_file_info_create_fs_id (GLocalFileStat *statbuf)
144 {
145   return g_strdup_printf ("l%" G_GUINT64_FORMAT,
146                           (guint64) statbuf->st_dev);
147 }
148
149
150 #ifdef S_ISLNK
151
152 static gchar *
153 read_link (const gchar *full_name)
154 {
155 #ifdef HAVE_READLINK
156   gchar *buffer;
157   guint size;
158   
159   size = 256;
160   buffer = g_malloc (size);
161   
162   while (1)
163     {
164       int read_size;
165       
166       read_size = readlink (full_name, buffer, size);
167       if (read_size < 0)
168         {
169           g_free (buffer);
170           return NULL;
171         }
172       if (read_size < size)
173         {
174           buffer[read_size] = 0;
175           return buffer;
176         }
177       size *= 2;
178       buffer = g_realloc (buffer, size);
179     }
180 #else
181   return NULL;
182 #endif
183 }
184
185 #endif  /* S_ISLNK */
186
187 #ifdef HAVE_SELINUX
188 /* Get the SELinux security context */
189 static void
190 get_selinux_context (const char            *path,
191                      GFileInfo             *info,
192                      GFileAttributeMatcher *attribute_matcher,
193                      gboolean               follow_symlinks)
194 {
195   char *context;
196
197   if (!_g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_SELINUX_CONTEXT))
198     return;
199   
200   if (is_selinux_enabled ())
201     {
202       if (follow_symlinks)
203         {
204           if (lgetfilecon_raw (path, &context) < 0)
205             return;
206         }
207       else
208         {
209           if (getfilecon_raw (path, &context) < 0)
210             return;
211         }
212
213       if (context)
214         {
215           _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_SELINUX_CONTEXT, context);
216           freecon (context);
217         }
218     }
219 }
220 #endif
221
222 #ifdef HAVE_XATTR
223
224 /* Wrappers to hide away differences between (Linux) getxattr/lgetxattr and
225  * (Mac) getxattr(..., XATTR_NOFOLLOW)
226  */
227 #ifdef HAVE_XATTR_NOFOLLOW
228 #define g_fgetxattr(fd,name,value,size)  fgetxattr(fd,name,value,size,0,0)
229 #define g_flistxattr(fd,name,size)       flistxattr(fd,name,size,0)
230 #define g_setxattr(path,name,value,size) setxattr(path,name,value,size,0,0)
231 #else
232 #define g_fgetxattr     fgetxattr
233 #define g_flistxattr    flistxattr
234 #define g_setxattr(path,name,value,size) setxattr(path,name,value,size,0)
235 #endif
236
237 static ssize_t
238 g_getxattr (const char *path, const char *name, void *value, size_t size,
239             gboolean follow_symlinks)
240 {
241 #ifdef HAVE_XATTR_NOFOLLOW
242   return getxattr (path, name, value, size, 0, follow_symlinks ? 0 : XATTR_NOFOLLOW);
243 #else
244   if (follow_symlinks)
245     return getxattr (path, name, value, size);
246   else
247     return lgetxattr (path, name, value, size);
248 #endif
249 }
250
251 static ssize_t
252 g_listxattr(const char *path, char *namebuf, size_t size,
253             gboolean follow_symlinks)
254 {
255 #ifdef HAVE_XATTR_NOFOLLOW
256   return listxattr (path, namebuf, size, follow_symlinks ? 0 : XATTR_NOFOLLOW);
257 #else
258   if (follow_symlinks)
259     return listxattr (path, namebuf, size);
260   else
261     return llistxattr (path, namebuf, size);
262 #endif
263 }
264
265 static gboolean
266 valid_char (char c)
267 {
268   return c >= 32 && c <= 126 && c != '\\';
269 }
270
271 static gboolean
272 name_is_valid (const char *str)
273 {
274   while (*str)
275     {
276       if (!valid_char (*str++))
277         return FALSE;
278     }
279   return TRUE;
280 }
281
282 static char *
283 hex_escape_string (const char *str, 
284                    gboolean   *free_return)
285 {
286   int num_invalid, i;
287   char *escaped_str, *p;
288   unsigned char c;
289   static char *hex_digits = "0123456789abcdef";
290   int len;
291
292   len = strlen (str);
293   
294   num_invalid = 0;
295   for (i = 0; i < len; i++)
296     {
297       if (!valid_char (str[i]))
298         num_invalid++;
299     }
300
301   if (num_invalid == 0)
302     {
303       *free_return = FALSE;
304       return (char *)str;
305     }
306
307   escaped_str = g_malloc (len + num_invalid*3 + 1);
308
309   p = escaped_str;
310   for (i = 0; i < len; i++)
311     {
312       if (valid_char (str[i]))
313         *p++ = str[i];
314       else
315         {
316           c = str[i];
317           *p++ = '\\';
318           *p++ = 'x';
319           *p++ = hex_digits[(c >> 4) & 0xf];
320           *p++ = hex_digits[c & 0xf];
321         }
322     }
323   *p = 0;
324
325   *free_return = TRUE;
326   return escaped_str;
327 }
328
329 static char *
330 hex_unescape_string (const char *str, 
331                      int        *out_len, 
332                      gboolean   *free_return)
333 {
334   int i;
335   char *unescaped_str, *p;
336   unsigned char c;
337   int len;
338
339   len = strlen (str);
340   
341   if (strchr (str, '\\') == NULL)
342     {
343       if (out_len)
344         *out_len = len;
345       *free_return = FALSE;
346       return (char *)str;
347     }
348   
349   unescaped_str = g_malloc (len + 1);
350
351   p = unescaped_str;
352   for (i = 0; i < len; i++)
353     {
354       if (str[i] == '\\' &&
355           str[i+1] == 'x' &&
356           len - i >= 4)
357         {
358           c =
359             (g_ascii_xdigit_value (str[i+2]) << 4) |
360             g_ascii_xdigit_value (str[i+3]);
361           *p++ = c;
362           i += 3;
363         }
364       else
365         *p++ = str[i];
366     }
367   *p++ = 0;
368
369   if (out_len)
370     *out_len = p - unescaped_str;
371   *free_return = TRUE;
372   return unescaped_str;
373 }
374
375 static void
376 escape_xattr (GFileInfo  *info,
377               const char *gio_attr, /* gio attribute name */
378               const char *value, /* Is zero terminated */
379               size_t      len /* not including zero termination */)
380 {
381   char *escaped_val;
382   gboolean free_escaped_val;
383   
384   escaped_val = hex_escape_string (value, &free_escaped_val);
385   
386   g_file_info_set_attribute_string (info, gio_attr, escaped_val);
387   
388   if (free_escaped_val)
389     g_free (escaped_val);
390 }
391
392 static void
393 get_one_xattr (const char *path,
394                GFileInfo  *info,
395                const char *gio_attr,
396                const char *xattr,
397                gboolean    follow_symlinks)
398 {
399   char value[64];
400   char *value_p;
401   ssize_t len;
402
403   len = g_getxattr (path, xattr, value, sizeof (value)-1, follow_symlinks);
404
405   value_p = NULL;
406   if (len >= 0)
407     value_p = value;
408   else if (len == -1 && errno == ERANGE)
409     {
410       len = g_getxattr (path, xattr, NULL, 0, follow_symlinks);
411
412       if (len < 0)
413         return;
414
415       value_p = g_malloc (len+1);
416
417       len = g_getxattr (path, xattr, value_p, len, follow_symlinks);
418
419       if (len < 0)
420         {
421           g_free (value_p);
422           return;
423         }
424     }
425   else
426     return;
427   
428   /* Null terminate */
429   value_p[len] = 0;
430
431   escape_xattr (info, gio_attr, value_p, len);
432   
433   if (value_p != value)
434     g_free (value_p);
435 }
436
437 #endif /* defined HAVE_XATTR */
438
439 static void
440 get_xattrs (const char            *path,
441             gboolean               user,
442             GFileInfo             *info,
443             GFileAttributeMatcher *matcher,
444             gboolean               follow_symlinks)
445 {
446 #ifdef HAVE_XATTR
447   gboolean all;
448   gsize list_size;
449   ssize_t list_res_size;
450   size_t len;
451   char *list;
452   const char *attr, *attr2;
453
454   if (user)
455     all = g_file_attribute_matcher_enumerate_namespace (matcher, "xattr");
456   else
457     all = g_file_attribute_matcher_enumerate_namespace (matcher, "xattr-sys");
458
459   if (all)
460     {
461       list_res_size = g_listxattr (path, NULL, 0, follow_symlinks);
462
463       if (list_res_size == -1 ||
464           list_res_size == 0)
465         return;
466
467       list_size = list_res_size;
468       list = g_malloc (list_size);
469
470     retry:
471       
472       list_res_size = g_listxattr (path, list, list_size, follow_symlinks);
473       
474       if (list_res_size == -1 && errno == ERANGE)
475         {
476           list_size = list_size * 2;
477           list = g_realloc (list, list_size);
478           goto retry;
479         }
480
481       if (list_res_size == -1)
482         return;
483
484       attr = list;
485       while (list_res_size > 0)
486         {
487           if ((user && g_str_has_prefix (attr, "user.")) ||
488               (!user && !g_str_has_prefix (attr, "user.")))
489             {
490               char *escaped_attr, *gio_attr;
491               gboolean free_escaped_attr;
492               
493               if (user)
494                 {
495                   escaped_attr = hex_escape_string (attr + 5, &free_escaped_attr);
496                   gio_attr = g_strconcat ("xattr::", escaped_attr, NULL);
497                 }
498               else
499                 {
500                   escaped_attr = hex_escape_string (attr, &free_escaped_attr);
501                   gio_attr = g_strconcat ("xattr-sys::", escaped_attr, NULL);
502                 }
503               
504               if (free_escaped_attr)
505                 g_free (escaped_attr);
506               
507               get_one_xattr (path, info, gio_attr, attr, follow_symlinks);
508
509               g_free (gio_attr);
510             }
511               
512           len = strlen (attr) + 1;
513           attr += len;
514           list_res_size -= len;
515         }
516
517       g_free (list);
518     }
519   else
520     {
521       while ((attr = g_file_attribute_matcher_enumerate_next (matcher)) != NULL)
522         {
523           char *unescaped_attribute, *a;
524           gboolean free_unescaped_attribute;
525
526           attr2 = strchr (attr, ':');
527           if (attr2)
528             {
529               attr2 += 2; /* Skip '::' */
530               unescaped_attribute = hex_unescape_string (attr2, NULL, &free_unescaped_attribute);
531               if (user)
532                 a = g_strconcat ("user.", unescaped_attribute, NULL);
533               else
534                 a = unescaped_attribute;
535               
536               get_one_xattr (path, info, attr, a, follow_symlinks);
537
538               if (user)
539                 g_free (a);
540               
541               if (free_unescaped_attribute)
542                 g_free (unescaped_attribute);
543             }
544         }
545     }
546 #endif /* defined HAVE_XATTR */
547 }
548
549 #ifdef HAVE_XATTR
550 static void
551 get_one_xattr_from_fd (int         fd,
552                        GFileInfo  *info,
553                        const char *gio_attr,
554                        const char *xattr)
555 {
556   char value[64];
557   char *value_p;
558   ssize_t len;
559
560   len = g_fgetxattr (fd, xattr, value, sizeof (value) - 1);
561
562   value_p = NULL;
563   if (len >= 0)
564     value_p = value;
565   else if (len == -1 && errno == ERANGE)
566     {
567       len = g_fgetxattr (fd, xattr, NULL, 0);
568
569       if (len < 0)
570         return;
571
572       value_p = g_malloc (len + 1);
573
574       len = g_fgetxattr (fd, xattr, value_p, len);
575
576       if (len < 0)
577         {
578           g_free (value_p);
579           return;
580         }
581     }
582   else
583     return;
584   
585   /* Null terminate */
586   value_p[len] = 0;
587
588   escape_xattr (info, gio_attr, value_p, len);
589   
590   if (value_p != value)
591     g_free (value_p);
592 }
593 #endif /* defined HAVE_XATTR */
594
595 static void
596 get_xattrs_from_fd (int                    fd,
597                     gboolean               user,
598                     GFileInfo             *info,
599                     GFileAttributeMatcher *matcher)
600 {
601 #ifdef HAVE_XATTR
602   gboolean all;
603   gsize list_size;
604   ssize_t list_res_size;
605   size_t len;
606   char *list;
607   const char *attr, *attr2;
608
609   if (user)
610     all = g_file_attribute_matcher_enumerate_namespace (matcher, "xattr");
611   else
612     all = g_file_attribute_matcher_enumerate_namespace (matcher, "xattr-sys");
613
614   if (all)
615     {
616       list_res_size = g_flistxattr (fd, NULL, 0);
617
618       if (list_res_size == -1 ||
619           list_res_size == 0)
620         return;
621
622       list_size = list_res_size;
623       list = g_malloc (list_size);
624
625     retry:
626       
627       list_res_size = g_flistxattr (fd, list, list_size);
628       
629       if (list_res_size == -1 && errno == ERANGE)
630         {
631           list_size = list_size * 2;
632           list = g_realloc (list, list_size);
633           goto retry;
634         }
635
636       if (list_res_size == -1)
637         return;
638
639       attr = list;
640       while (list_res_size > 0)
641         {
642           if ((user && g_str_has_prefix (attr, "user.")) ||
643               (!user && !g_str_has_prefix (attr, "user.")))
644             {
645               char *escaped_attr, *gio_attr;
646               gboolean free_escaped_attr;
647               
648               if (user)
649                 {
650                   escaped_attr = hex_escape_string (attr + 5, &free_escaped_attr);
651                   gio_attr = g_strconcat ("xattr::", escaped_attr, NULL);
652                 }
653               else
654                 {
655                   escaped_attr = hex_escape_string (attr, &free_escaped_attr);
656                   gio_attr = g_strconcat ("xattr-sys::", escaped_attr, NULL);
657                 }
658               
659               if (free_escaped_attr)
660                 g_free (escaped_attr);
661               
662               get_one_xattr_from_fd (fd, info, gio_attr, attr);
663             }
664           
665           len = strlen (attr) + 1;
666           attr += len;
667           list_res_size -= len;
668         }
669
670       g_free (list);
671     }
672   else
673     {
674       while ((attr = g_file_attribute_matcher_enumerate_next (matcher)) != NULL)
675         {
676           char *unescaped_attribute, *a;
677           gboolean free_unescaped_attribute;
678
679           attr2 = strchr (attr, ':');
680           if (attr2)
681             {
682               attr2++; /* Skip ':' */
683               unescaped_attribute = hex_unescape_string (attr2, NULL, &free_unescaped_attribute);
684               if (user)
685                 a = g_strconcat ("user.", unescaped_attribute, NULL);
686               else
687                 a = unescaped_attribute;
688               
689               get_one_xattr_from_fd (fd, info, attr, a);
690
691               if (user)
692                 g_free (a);
693               
694               if (free_unescaped_attribute)
695                 g_free (unescaped_attribute);
696             }
697         }
698     }
699 #endif /* defined HAVE_XATTR */
700 }
701
702 #ifdef HAVE_XATTR
703 static gboolean
704 set_xattr (char                       *filename,
705            const char                 *escaped_attribute,
706            const GFileAttributeValue  *attr_value,
707            GError                    **error)
708 {
709   char *attribute, *value;
710   gboolean free_attribute, free_value;
711   int val_len, res, errsv;
712   gboolean is_user;
713   char *a;
714
715   if (attr_value == NULL)
716     {
717       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
718                            _("Attribute value must be non-NULL"));
719       return FALSE;
720     }
721
722   if (attr_value->type != G_FILE_ATTRIBUTE_TYPE_STRING)
723     {
724       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
725                            _("Invalid attribute type (string expected)"));
726       return FALSE;
727     }
728
729   if (!name_is_valid (escaped_attribute))
730     {
731       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
732                            _("Invalid extended attribute name"));
733       return FALSE;
734     }
735
736   if (g_str_has_prefix (escaped_attribute, "xattr::"))
737     {
738       escaped_attribute += strlen ("xattr::");
739       is_user = TRUE;
740     }
741   else
742     {
743       g_warn_if_fail (g_str_has_prefix (escaped_attribute, "xattr-sys::"));
744       escaped_attribute += strlen ("xattr-sys::");
745       is_user = FALSE;
746     }
747   
748   attribute = hex_unescape_string (escaped_attribute, NULL, &free_attribute);
749   value = hex_unescape_string (attr_value->u.string, &val_len, &free_value);
750
751   if (is_user)
752     a = g_strconcat ("user.", attribute, NULL);
753   else
754     a = attribute;
755   
756   res = g_setxattr (filename, a, value, val_len);
757   errsv = errno;
758   
759   if (is_user)
760     g_free (a);
761   
762   if (free_attribute)
763     g_free (attribute);
764   
765   if (free_value)
766     g_free (value);
767
768   if (res == -1)
769     {
770       g_set_error (error, G_IO_ERROR,
771                    g_io_error_from_errno (errsv),
772                    _("Error setting extended attribute '%s': %s"),
773                    escaped_attribute, g_strerror (errsv));
774       return FALSE;
775     }
776   
777   return TRUE;
778 }
779
780 #endif
781
782
783 void
784 _g_local_file_info_get_parent_info (const char            *dir,
785                                     GFileAttributeMatcher *attribute_matcher,
786                                     GLocalParentFileInfo  *parent_info)
787 {
788   GStatBuf statbuf;
789   int res;
790
791   parent_info->extra_data = NULL;
792   parent_info->free_extra_data = NULL;
793   parent_info->writable = FALSE;
794   parent_info->is_sticky = FALSE;
795   parent_info->has_trash_dir = FALSE;
796   parent_info->device = 0;
797
798   if (_g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_RENAME) ||
799       _g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_DELETE) ||
800       _g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_TRASH) ||
801       _g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_UNIX_IS_MOUNTPOINT))
802     {
803       /* FIXME: Windows: The underlying _waccess() call in the C
804        * library is mostly pointless as it only looks at the READONLY
805        * FAT-style attribute of the file, it doesn't check the ACL at
806        * all.
807        */
808       parent_info->writable = (g_access (dir, W_OK) == 0);
809       
810       res = g_stat (dir, &statbuf);
811
812       /*
813        * The sticky bit (S_ISVTX) on a directory means that a file in that directory can be
814        * renamed or deleted only by the owner of the file, by the owner of the directory, and
815        * by a privileged process.
816        */
817       if (res == 0)
818         {
819 #ifdef S_ISVTX
820           parent_info->is_sticky = (statbuf.st_mode & S_ISVTX) != 0;
821 #else
822           parent_info->is_sticky = FALSE;
823 #endif
824           parent_info->owner = statbuf.st_uid;
825           parent_info->device = statbuf.st_dev;
826           /* No need to find trash dir if it's not writable anyway */
827           if (parent_info->writable &&
828               _g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_TRASH))
829             parent_info->has_trash_dir = _g_local_file_has_trash_dir (dir, statbuf.st_dev);
830         }
831     }
832 }
833
834 void
835 _g_local_file_info_free_parent_info (GLocalParentFileInfo *parent_info)
836 {
837   if (parent_info->extra_data &&
838       parent_info->free_extra_data)
839     parent_info->free_extra_data (parent_info->extra_data);
840 }
841
842 static void
843 get_access_rights (GFileAttributeMatcher *attribute_matcher,
844                    GFileInfo             *info,
845                    const gchar           *path,
846                    GLocalFileStat        *statbuf,
847                    GLocalParentFileInfo  *parent_info)
848 {
849   /* FIXME: Windows: The underlyin _waccess() is mostly pointless */
850   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
851                                             G_FILE_ATTRIBUTE_ID_ACCESS_CAN_READ))
852     _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_READ,
853                                              g_access (path, R_OK) == 0);
854   
855   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
856                                             G_FILE_ATTRIBUTE_ID_ACCESS_CAN_WRITE))
857     _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_WRITE,
858                                              g_access (path, W_OK) == 0);
859   
860   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
861                                             G_FILE_ATTRIBUTE_ID_ACCESS_CAN_EXECUTE))
862     _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_EXECUTE,
863                                              g_access (path, X_OK) == 0);
864
865
866   if (parent_info)
867     {
868       gboolean writable;
869
870       writable = FALSE;
871       if (parent_info->writable)
872         {
873           if (parent_info->is_sticky)
874             {
875 #ifndef G_OS_WIN32
876               uid_t uid = geteuid ();
877
878               if (uid == statbuf->st_uid ||
879                   uid == parent_info->owner ||
880                   uid == 0)
881 #endif
882                 writable = TRUE;
883             }
884           else
885             writable = TRUE;
886         }
887
888       if (_g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_RENAME))
889         _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_RENAME,
890                                                  writable);
891       
892       if (_g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_DELETE))
893         _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_DELETE,
894                                                  writable);
895
896       if (_g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_TRASH))
897         _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_ACCESS_CAN_TRASH,
898                                                  writable && parent_info->has_trash_dir);
899     }
900 }
901
902 static void
903 set_info_from_stat (GFileInfo             *info, 
904                     GLocalFileStat        *statbuf,
905                     GFileAttributeMatcher *attribute_matcher)
906 {
907   GFileType file_type;
908
909   file_type = G_FILE_TYPE_UNKNOWN;
910
911   if (S_ISREG (statbuf->st_mode))
912     file_type = G_FILE_TYPE_REGULAR;
913   else if (S_ISDIR (statbuf->st_mode))
914     file_type = G_FILE_TYPE_DIRECTORY;
915 #ifndef G_OS_WIN32
916   else if (S_ISCHR (statbuf->st_mode) ||
917            S_ISBLK (statbuf->st_mode) ||
918            S_ISFIFO (statbuf->st_mode)
919 #ifdef S_ISSOCK
920            || S_ISSOCK (statbuf->st_mode)
921 #endif
922            )
923     file_type = G_FILE_TYPE_SPECIAL;
924 #endif
925 #ifdef S_ISLNK
926   else if (S_ISLNK (statbuf->st_mode))
927     file_type = G_FILE_TYPE_SYMBOLIC_LINK;
928 #endif
929
930   g_file_info_set_file_type (info, file_type);
931   g_file_info_set_size (info, statbuf->st_size);
932
933   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_DEVICE, statbuf->st_dev);
934 #ifndef G_OS_WIN32
935   /* Pointless setting these on Windows even if they exist in the struct */
936   _g_file_info_set_attribute_uint64_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_INODE, statbuf->st_ino);
937   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_NLINK, statbuf->st_nlink);
938   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_UID, statbuf->st_uid);
939   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_GID, statbuf->st_gid);
940   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_RDEV, statbuf->st_rdev);
941 #endif
942   /* FIXME: st_mode is mostly pointless on Windows, too. Set the attribute or not? */
943   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_MODE, statbuf->st_mode);
944 #if defined (HAVE_STRUCT_STAT_ST_BLKSIZE)
945   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_BLOCK_SIZE, statbuf->st_blksize);
946 #endif
947 #if defined (HAVE_STRUCT_STAT_ST_BLOCKS)
948   _g_file_info_set_attribute_uint64_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_BLOCKS, statbuf->st_blocks);
949   _g_file_info_set_attribute_uint64_by_id (info, G_FILE_ATTRIBUTE_ID_STANDARD_ALLOCATED_SIZE,
950                                           statbuf->st_blocks * G_GUINT64_CONSTANT (512));
951 #endif
952   
953   _g_file_info_set_attribute_uint64_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_MODIFIED, statbuf->st_mtime);
954 #if defined (HAVE_STRUCT_STAT_ST_MTIMENSEC)
955   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_MODIFIED_USEC, statbuf->st_mtimensec / 1000);
956 #elif defined (HAVE_STRUCT_STAT_ST_MTIM_TV_NSEC)
957   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_MODIFIED_USEC, statbuf->st_mtim.tv_nsec / 1000);
958 #endif
959   
960   _g_file_info_set_attribute_uint64_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_ACCESS, statbuf->st_atime);
961 #if defined (HAVE_STRUCT_STAT_ST_ATIMENSEC)
962   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_ACCESS_USEC, statbuf->st_atimensec / 1000);
963 #elif defined (HAVE_STRUCT_STAT_ST_ATIM_TV_NSEC)
964   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_ACCESS_USEC, statbuf->st_atim.tv_nsec / 1000);
965 #endif
966   
967   _g_file_info_set_attribute_uint64_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_CHANGED, statbuf->st_ctime);
968 #if defined (HAVE_STRUCT_STAT_ST_CTIMENSEC)
969   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_CHANGED_USEC, statbuf->st_ctimensec / 1000);
970 #elif defined (HAVE_STRUCT_STAT_ST_CTIM_TV_NSEC)
971   _g_file_info_set_attribute_uint32_by_id (info, G_FILE_ATTRIBUTE_ID_TIME_CHANGED_USEC, statbuf->st_ctim.tv_nsec / 1000);
972 #endif
973
974   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
975                                             G_FILE_ATTRIBUTE_ID_ETAG_VALUE))
976     {
977       char *etag = _g_local_file_info_create_etag (statbuf);
978       _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_ETAG_VALUE, etag);
979       g_free (etag);
980     }
981
982   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
983                                             G_FILE_ATTRIBUTE_ID_ID_FILE))
984     {
985       char *id = _g_local_file_info_create_file_id (statbuf);
986       _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_ID_FILE, id);
987       g_free (id);
988     }
989
990   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
991                                             G_FILE_ATTRIBUTE_ID_ID_FILESYSTEM))
992     {
993       char *id = _g_local_file_info_create_fs_id (statbuf);
994       _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_ID_FILESYSTEM, id);
995       g_free (id);
996     }
997 }
998
999 #ifndef G_OS_WIN32
1000
1001 static char *
1002 make_valid_utf8 (const char *name)
1003 {
1004   GString *string;
1005   const gchar *remainder, *invalid;
1006   gint remaining_bytes, valid_bytes;
1007   
1008   string = NULL;
1009   remainder = name;
1010   remaining_bytes = strlen (name);
1011   
1012   while (remaining_bytes != 0) 
1013     {
1014       if (g_utf8_validate (remainder, remaining_bytes, &invalid)) 
1015         break;
1016       valid_bytes = invalid - remainder;
1017     
1018       if (string == NULL) 
1019         string = g_string_sized_new (remaining_bytes);
1020
1021       g_string_append_len (string, remainder, valid_bytes);
1022       /* append U+FFFD REPLACEMENT CHARACTER */
1023       g_string_append (string, "\357\277\275");
1024       
1025       remaining_bytes -= valid_bytes + 1;
1026       remainder = invalid + 1;
1027     }
1028   
1029   if (string == NULL)
1030     return g_strdup (name);
1031   
1032   g_string_append (string, remainder);
1033
1034   g_warn_if_fail (g_utf8_validate (string->str, -1, NULL));
1035   
1036   return g_string_free (string, FALSE);
1037 }
1038
1039 static char *
1040 convert_pwd_string_to_utf8 (char *pwd_str)
1041 {
1042   char *utf8_string;
1043   
1044   if (!g_utf8_validate (pwd_str, -1, NULL))
1045     {
1046       utf8_string = g_locale_to_utf8 (pwd_str, -1, NULL, NULL, NULL);
1047       if (utf8_string == NULL)
1048         utf8_string = make_valid_utf8 (pwd_str);
1049     }
1050   else 
1051     utf8_string = g_strdup (pwd_str);
1052   
1053   return utf8_string;
1054 }
1055
1056 static void
1057 uid_data_free (UidData *data)
1058 {
1059   g_free (data->user_name);
1060   g_free (data->real_name);
1061   g_free (data);
1062 }
1063
1064 /* called with lock held */
1065 static UidData *
1066 lookup_uid_data (uid_t uid)
1067 {
1068   UidData *data;
1069   char buffer[4096];
1070   struct passwd pwbuf;
1071   struct passwd *pwbufp;
1072   char *gecos, *comma;
1073   
1074   if (uid_cache == NULL)
1075     uid_cache = g_hash_table_new_full (NULL, NULL, NULL, (GDestroyNotify)uid_data_free);
1076
1077   data = g_hash_table_lookup (uid_cache, GINT_TO_POINTER (uid));
1078
1079   if (data)
1080     return data;
1081
1082   data = g_new0 (UidData, 1);
1083
1084 #if defined(HAVE_POSIX_GETPWUID_R)
1085   getpwuid_r (uid, &pwbuf, buffer, sizeof(buffer), &pwbufp);
1086 #elif defined(HAVE_NONPOSIX_GETPWUID_R)
1087   pwbufp = getpwuid_r (uid, &pwbuf, buffer, sizeof(buffer));
1088 #else
1089   pwbufp = getpwuid (uid);
1090 #endif
1091
1092   if (pwbufp != NULL)
1093     {
1094       if (pwbufp->pw_name != NULL && pwbufp->pw_name[0] != 0)
1095         data->user_name = convert_pwd_string_to_utf8 (pwbufp->pw_name);
1096
1097       gecos = pwbufp->pw_gecos;
1098
1099       if (gecos)
1100         {
1101           comma = strchr (gecos, ',');
1102           if (comma)
1103             *comma = 0;
1104           data->real_name = convert_pwd_string_to_utf8 (gecos);
1105         }
1106     }
1107
1108   /* Default fallbacks */
1109   if (data->real_name == NULL)
1110     {
1111       if (data->user_name != NULL)
1112         data->real_name = g_strdup (data->user_name);
1113       else
1114         data->real_name = g_strdup_printf ("user #%d", (int)uid);
1115     }
1116   
1117   if (data->user_name == NULL)
1118     data->user_name = g_strdup_printf ("%d", (int)uid);
1119   
1120   g_hash_table_replace (uid_cache, GINT_TO_POINTER (uid), data);
1121   
1122   return data;
1123 }
1124
1125 static char *
1126 get_username_from_uid (uid_t uid)
1127 {
1128   char *res;
1129   UidData *data;
1130   
1131   G_LOCK (uid_cache);
1132   data = lookup_uid_data (uid);
1133   res = g_strdup (data->user_name);  
1134   G_UNLOCK (uid_cache);
1135
1136   return res;
1137 }
1138
1139 static char *
1140 get_realname_from_uid (uid_t uid)
1141 {
1142   char *res;
1143   UidData *data;
1144   
1145   G_LOCK (uid_cache);
1146   data = lookup_uid_data (uid);
1147   res = g_strdup (data->real_name);  
1148   G_UNLOCK (uid_cache);
1149   
1150   return res;
1151 }
1152
1153 /* called with lock held */
1154 static char *
1155 lookup_gid_name (gid_t gid)
1156 {
1157   char *name;
1158   char buffer[4096];
1159   struct group gbuf;
1160   struct group *gbufp;
1161   
1162   if (gid_cache == NULL)
1163     gid_cache = g_hash_table_new_full (NULL, NULL, NULL, (GDestroyNotify)g_free);
1164
1165   name = g_hash_table_lookup (gid_cache, GINT_TO_POINTER (gid));
1166
1167   if (name)
1168     return name;
1169
1170 #if defined (HAVE_POSIX_GETGRGID_R)
1171   getgrgid_r (gid, &gbuf, buffer, sizeof(buffer), &gbufp);
1172 #elif defined (HAVE_NONPOSIX_GETGRGID_R)
1173   gbufp = getgrgid_r (gid, &gbuf, buffer, sizeof(buffer));
1174 #else
1175   gbufp = getgrgid (gid);
1176 #endif
1177
1178   if (gbufp != NULL &&
1179       gbufp->gr_name != NULL &&
1180       gbufp->gr_name[0] != 0)
1181     name = convert_pwd_string_to_utf8 (gbufp->gr_name);
1182   else
1183     name = g_strdup_printf("%d", (int)gid);
1184   
1185   g_hash_table_replace (gid_cache, GINT_TO_POINTER (gid), name);
1186   
1187   return name;
1188 }
1189
1190 static char *
1191 get_groupname_from_gid (gid_t gid)
1192 {
1193   char *res;
1194   char *name;
1195   
1196   G_LOCK (gid_cache);
1197   name = lookup_gid_name (gid);
1198   res = g_strdup (name);  
1199   G_UNLOCK (gid_cache);
1200   return res;
1201 }
1202
1203 #endif /* !G_OS_WIN32 */
1204
1205 static char *
1206 get_content_type (const char          *basename,
1207                   const char          *path,
1208                   GLocalFileStat      *statbuf,
1209                   gboolean             is_symlink,
1210                   gboolean             symlink_broken,
1211                   GFileQueryInfoFlags  flags,
1212                   gboolean             fast)
1213 {
1214   if (is_symlink &&
1215       (symlink_broken || (flags & G_FILE_QUERY_INFO_NOFOLLOW_SYMLINKS)))
1216     return g_strdup ("inode/symlink");
1217   else if (statbuf != NULL && S_ISDIR(statbuf->st_mode))
1218     return g_strdup ("inode/directory");
1219 #ifndef G_OS_WIN32
1220   else if (statbuf != NULL && S_ISCHR(statbuf->st_mode))
1221     return g_strdup ("inode/chardevice");
1222   else if (statbuf != NULL && S_ISBLK(statbuf->st_mode))
1223     return g_strdup ("inode/blockdevice");
1224   else if (statbuf != NULL && S_ISFIFO(statbuf->st_mode))
1225     return g_strdup ("inode/fifo");
1226 #endif
1227 #ifdef S_ISSOCK
1228   else if (statbuf != NULL && S_ISSOCK(statbuf->st_mode))
1229     return g_strdup ("inode/socket");
1230 #endif
1231   else
1232     {
1233       char *content_type;
1234       gboolean result_uncertain;
1235       
1236       content_type = g_content_type_guess (basename, NULL, 0, &result_uncertain);
1237       
1238 #ifndef G_OS_WIN32
1239       if (!fast && result_uncertain && path != NULL)
1240         {
1241           guchar sniff_buffer[4096];
1242           gsize sniff_length;
1243           int fd;
1244
1245           sniff_length = _g_unix_content_type_get_sniff_len ();
1246           if (sniff_length > 4096)
1247             sniff_length = 4096;
1248
1249 #ifdef O_NOATIME          
1250           fd = g_open (path, O_RDONLY | O_NOATIME, 0);
1251           if (fd < 0 && errno == EPERM)
1252 #endif
1253             fd = g_open (path, O_RDONLY, 0);
1254
1255           if (fd != -1)
1256             {
1257               ssize_t res;
1258               
1259               res = read (fd, sniff_buffer, sniff_length);
1260               close (fd);
1261               if (res >= 0)
1262                 {
1263                   g_free (content_type);
1264                   content_type = g_content_type_guess (basename, sniff_buffer, res, NULL);
1265                 }
1266             }
1267         }
1268 #endif
1269       
1270       return content_type;
1271     }
1272   
1273 }
1274
1275 static void
1276 get_thumbnail_attributes (const char *path,
1277                           GFileInfo  *info)
1278 {
1279   GChecksum *checksum;
1280   char *uri;
1281   char *filename;
1282   char *basename;
1283
1284   uri = g_filename_to_uri (path, NULL, NULL);
1285
1286   checksum = g_checksum_new (G_CHECKSUM_MD5);
1287   g_checksum_update (checksum, (const guchar *) uri, strlen (uri));
1288   
1289   g_free (uri);
1290
1291   basename = g_strconcat (g_checksum_get_string (checksum), ".png", NULL);
1292   g_checksum_free (checksum);
1293
1294   filename = g_build_filename (g_get_user_cache_dir (),
1295                                "thumbnails", "normal", basename,
1296                                NULL);
1297
1298   if (g_file_test (filename, G_FILE_TEST_IS_REGULAR))
1299     _g_file_info_set_attribute_byte_string_by_id (info, G_FILE_ATTRIBUTE_ID_THUMBNAIL_PATH, filename);
1300   else
1301     {
1302       g_free (filename);
1303       filename = g_build_filename (g_get_user_cache_dir (),
1304                                    "thumbnails", "fail",
1305                                    "gnome-thumbnail-factory",
1306                                    basename,
1307                                    NULL);
1308
1309       if (g_file_test (filename, G_FILE_TEST_IS_REGULAR))
1310         _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_THUMBNAILING_FAILED, TRUE);
1311     }
1312   g_free (basename);
1313   g_free (filename);
1314 }
1315
1316 #ifdef G_OS_WIN32
1317 static void
1318 win32_get_file_user_info (const gchar  *filename,
1319                           gchar       **group_name, 
1320                           gchar       **user_name, 
1321                           gchar       **real_name)
1322 {
1323   PSECURITY_DESCRIPTOR psd = NULL;
1324   DWORD sd_size = 0; /* first call calculates the size required */
1325   
1326   wchar_t *wfilename = g_utf8_to_utf16 (filename, -1, NULL, NULL, NULL);
1327   if ((GetFileSecurityW (wfilename, 
1328                         GROUP_SECURITY_INFORMATION | OWNER_SECURITY_INFORMATION,
1329                         NULL,
1330                         sd_size,
1331                         &sd_size) || (ERROR_INSUFFICIENT_BUFFER == GetLastError())) &&
1332      (psd = g_try_malloc (sd_size)) != NULL &&
1333      GetFileSecurityW (wfilename, 
1334                        GROUP_SECURITY_INFORMATION | OWNER_SECURITY_INFORMATION,
1335                        psd,
1336                        sd_size,
1337                        &sd_size))
1338     {
1339       PSID psid = 0;
1340       BOOL defaulted;
1341       SID_NAME_USE name_use = 0; /* don't care? */
1342       wchar_t *name = NULL;
1343       wchar_t *domain = NULL;
1344       DWORD name_len = 0;
1345       DWORD domain_len = 0;
1346       /* get the user name */
1347       do {
1348         if (!user_name)
1349           break;
1350         if (!GetSecurityDescriptorOwner (psd, &psid, &defaulted))
1351           break;
1352         if (!LookupAccountSidW (NULL, /* local machine */
1353                                 psid, 
1354                                 name, &name_len,
1355                                 domain, &domain_len, /* no domain info yet */
1356                                 &name_use)  && (ERROR_INSUFFICIENT_BUFFER != GetLastError()))
1357           break;
1358         name = g_try_malloc (name_len * sizeof (wchar_t));
1359         domain = g_try_malloc (domain_len * sizeof (wchar_t));
1360         if (name && domain &&
1361             LookupAccountSidW (NULL, /* local machine */
1362                                psid, 
1363                                name, &name_len,
1364                                domain, &domain_len, /* no domain info yet */
1365                                &name_use))
1366           {
1367             *user_name = g_utf16_to_utf8 (name, -1, NULL, NULL, NULL);
1368           }
1369         g_free (name);
1370         g_free (domain);
1371       } while (FALSE);
1372
1373       /* get the group name */
1374       do {
1375         if (!group_name)
1376           break;
1377         if (!GetSecurityDescriptorGroup (psd, &psid, &defaulted))
1378           break;
1379         if (!LookupAccountSidW (NULL, /* local machine */
1380                                 psid, 
1381                                 name, &name_len,
1382                                 domain, &domain_len, /* no domain info yet */
1383                                 &name_use)  && (ERROR_INSUFFICIENT_BUFFER != GetLastError()))
1384           break;
1385         name = g_try_malloc (name_len * sizeof (wchar_t));
1386         domain = g_try_malloc (domain_len * sizeof (wchar_t));
1387         if (name && domain &&
1388             LookupAccountSidW (NULL, /* local machine */
1389                                psid, 
1390                                name, &name_len,
1391                                domain, &domain_len, /* no domain info yet */
1392                                &name_use))
1393           {
1394             *group_name = g_utf16_to_utf8 (name, -1, NULL, NULL, NULL);
1395           }
1396         g_free (name);
1397         g_free (domain);
1398       } while (FALSE);
1399
1400       /* TODO: get real name */
1401
1402       g_free (psd);
1403     }
1404   g_free (wfilename);
1405 }
1406 #endif /* G_OS_WIN32 */
1407
1408 void
1409 _g_local_file_info_get_nostat (GFileInfo              *info,
1410                                const char             *basename,
1411                                const char             *path,
1412                                GFileAttributeMatcher  *attribute_matcher)
1413 {
1414   g_file_info_set_name (info, basename);
1415
1416   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1417                                             G_FILE_ATTRIBUTE_ID_STANDARD_DISPLAY_NAME))
1418     {
1419       char *display_name = g_filename_display_basename (path);
1420      
1421       /* look for U+FFFD REPLACEMENT CHARACTER */ 
1422       if (strstr (display_name, "\357\277\275") != NULL)
1423         {
1424           char *p = display_name;
1425           display_name = g_strconcat (display_name, _(" (invalid encoding)"), NULL);
1426           g_free (p);
1427         }
1428       g_file_info_set_display_name (info, display_name);
1429       g_free (display_name);
1430     }
1431   
1432   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1433                                             G_FILE_ATTRIBUTE_ID_STANDARD_EDIT_NAME))
1434     {
1435       char *edit_name = g_filename_display_basename (path);
1436       g_file_info_set_edit_name (info, edit_name);
1437       g_free (edit_name);
1438     }
1439
1440   
1441   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1442                                             G_FILE_ATTRIBUTE_ID_STANDARD_COPY_NAME))
1443     {
1444       char *copy_name = g_filename_to_utf8 (basename, -1, NULL, NULL, NULL);
1445       if (copy_name)
1446         _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_STANDARD_COPY_NAME, copy_name);
1447       g_free (copy_name);
1448     }
1449 }
1450
1451 static const char *
1452 get_icon_name (const char *path,
1453                gboolean    use_symbolic,
1454                gboolean   *with_fallbacks_out)
1455 {
1456   const char *name = NULL;
1457   gboolean with_fallbacks = TRUE;
1458
1459   if (strcmp (path, g_get_home_dir ()) == 0)
1460     {
1461       name = use_symbolic ? "user-home-symbolic" : "user-home";
1462       with_fallbacks = FALSE;
1463     }
1464   else if (strcmp (path, g_get_user_special_dir (G_USER_DIRECTORY_DESKTOP)) == 0)
1465     {
1466       name = use_symbolic ? "user-desktop-symbolic" : "user-desktop";
1467       with_fallbacks = FALSE;
1468     }
1469   else if (g_strcmp0 (path, g_get_user_special_dir (G_USER_DIRECTORY_DOCUMENTS)) == 0)
1470     {
1471       name = use_symbolic ? "folder-documents-symbolic" : "folder-documents";
1472     }
1473   else if (g_strcmp0 (path, g_get_user_special_dir (G_USER_DIRECTORY_DOWNLOAD)) == 0)
1474     {
1475       name = use_symbolic ? "folder-download-symbolic" : "folder-download";
1476     }
1477   else if (g_strcmp0 (path, g_get_user_special_dir (G_USER_DIRECTORY_MUSIC)) == 0)
1478     {
1479       name = use_symbolic ? "folder-music-symbolic" : "folder-music";
1480     }
1481   else if (g_strcmp0 (path, g_get_user_special_dir (G_USER_DIRECTORY_PICTURES)) == 0)
1482     {
1483       name = use_symbolic ? "folder-pictures-symbolic" : "folder-pictures";
1484     }
1485   else if (g_strcmp0 (path, g_get_user_special_dir (G_USER_DIRECTORY_PUBLIC_SHARE)) == 0)
1486     {
1487       name = use_symbolic ? "folder-publicshare-symbolic" : "folder-publicshare";
1488     }
1489   else if (g_strcmp0 (path, g_get_user_special_dir (G_USER_DIRECTORY_TEMPLATES)) == 0)
1490     {
1491       name = use_symbolic ? "folder-templates-symbolic" : "folder-templates";
1492     }
1493   else if (g_strcmp0 (path, g_get_user_special_dir (G_USER_DIRECTORY_VIDEOS)) == 0)
1494     {
1495       name = use_symbolic ? "folder-videos-symbolic" : "folder-videos";
1496     }
1497   else
1498     {
1499       name = NULL;
1500     }
1501
1502   if (with_fallbacks_out != NULL)
1503     *with_fallbacks_out = with_fallbacks;
1504
1505   return name;
1506 }
1507
1508 static GIcon *
1509 get_icon (const char *path,
1510           const char *content_type,
1511           gboolean    is_folder,
1512           gboolean    use_symbolic)
1513 {
1514   GIcon *icon = NULL;
1515   const char *icon_name;
1516   gboolean with_fallbacks;
1517
1518   icon_name = get_icon_name (path, use_symbolic, &with_fallbacks);
1519   if (icon_name != NULL)
1520     {
1521       if (with_fallbacks)
1522         icon = g_themed_icon_new_with_default_fallbacks (icon_name);
1523       else
1524         icon = g_themed_icon_new (icon_name);
1525     }
1526   else
1527     {
1528       if (use_symbolic)
1529         icon = g_content_type_get_symbolic_icon (content_type);
1530       else
1531         icon = g_content_type_get_icon (content_type);
1532
1533       if (G_IS_THEMED_ICON (icon) && is_folder)
1534         {
1535           g_themed_icon_append_name (G_THEMED_ICON (icon), use_symbolic ? "folder-symbolic" : "folder");
1536         }
1537     }
1538
1539   return icon;
1540 }
1541
1542 GFileInfo *
1543 _g_local_file_info_get (const char             *basename,
1544                         const char             *path,
1545                         GFileAttributeMatcher  *attribute_matcher,
1546                         GFileQueryInfoFlags     flags,
1547                         GLocalParentFileInfo   *parent_info,
1548                         GError                **error)
1549 {
1550   GFileInfo *info;
1551   GLocalFileStat statbuf;
1552 #ifdef S_ISLNK
1553   struct stat statbuf2;
1554 #endif
1555   int res;
1556   gboolean stat_ok;
1557   gboolean is_symlink, symlink_broken;
1558 #ifdef G_OS_WIN32
1559   DWORD dos_attributes;
1560 #endif
1561   char *symlink_target;
1562   GVfs *vfs;
1563   GVfsClass *class;
1564   guint64 device;
1565
1566   info = g_file_info_new ();
1567
1568   /* Make sure we don't set any unwanted attributes */
1569   g_file_info_set_attribute_mask (info, attribute_matcher);
1570   
1571   _g_local_file_info_get_nostat (info, basename, path, attribute_matcher);
1572
1573   if (attribute_matcher == NULL)
1574     {
1575       g_file_info_unset_attribute_mask (info);
1576       return info;
1577     }
1578
1579 #ifndef G_OS_WIN32
1580   res = g_lstat (path, &statbuf);
1581 #else
1582   {
1583     wchar_t *wpath = g_utf8_to_utf16 (path, -1, NULL, NULL, error);
1584     int len;
1585
1586     if (wpath == NULL)
1587       {
1588         g_object_unref (info);
1589         return NULL;
1590       }
1591
1592     len = wcslen (wpath);
1593     while (len > 0 && G_IS_DIR_SEPARATOR (wpath[len-1]))
1594       len--;
1595     if (len > 0 &&
1596         (!g_path_is_absolute (path) || len > g_path_skip_root (path) - path))
1597       wpath[len] = '\0';
1598
1599     res = _wstati64 (wpath, &statbuf);
1600     dos_attributes = GetFileAttributesW (wpath);
1601
1602     g_free (wpath);
1603   }
1604 #endif
1605
1606   if (res == -1)
1607     {
1608       int errsv = errno;
1609
1610       /* Don't bail out if we get Permission denied (SELinux?) */
1611       if (errsv != EACCES)
1612         {
1613           char *display_name = g_filename_display_name (path);
1614           g_object_unref (info);
1615           g_set_error (error, G_IO_ERROR,
1616                        g_io_error_from_errno (errsv),
1617                        _("Error when getting information for file '%s': %s"),
1618                        display_name, g_strerror (errsv));
1619           g_free (display_name);
1620           return NULL;
1621         }
1622     }
1623
1624   /* Even if stat() fails, try to get as much as other attributes possible */
1625   stat_ok = res != -1;
1626
1627   if (stat_ok)
1628     device = statbuf.st_dev;
1629   else
1630     device = 0;
1631
1632 #ifdef S_ISLNK
1633   is_symlink = stat_ok && S_ISLNK (statbuf.st_mode);
1634 #else
1635   is_symlink = FALSE;
1636 #endif
1637   symlink_broken = FALSE;
1638 #ifdef S_ISLNK
1639   if (is_symlink)
1640     {
1641       g_file_info_set_is_symlink (info, TRUE);
1642
1643       /* Unless NOFOLLOW was set we default to following symlinks */
1644       if (!(flags & G_FILE_QUERY_INFO_NOFOLLOW_SYMLINKS))
1645         {
1646           res = stat (path, &statbuf2);
1647
1648           /* Report broken links as symlinks */
1649           if (res != -1)
1650             {
1651               statbuf = statbuf2;
1652               stat_ok = TRUE;
1653             }
1654           else
1655             symlink_broken = TRUE;
1656         }
1657     }
1658 #endif
1659
1660   if (stat_ok)
1661     set_info_from_stat (info, &statbuf, attribute_matcher);
1662
1663 #ifndef G_OS_WIN32
1664   if (basename != NULL && basename[0] == '.')
1665     g_file_info_set_is_hidden (info, TRUE);
1666
1667   if (basename != NULL && basename[strlen (basename) -1] == '~' &&
1668       (stat_ok && S_ISREG (statbuf.st_mode)))
1669     _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_STANDARD_IS_BACKUP, TRUE);
1670 #else
1671   if (dos_attributes & FILE_ATTRIBUTE_HIDDEN)
1672     g_file_info_set_is_hidden (info, TRUE);
1673
1674   if (dos_attributes & FILE_ATTRIBUTE_ARCHIVE)
1675     _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_DOS_IS_ARCHIVE, TRUE);
1676
1677   if (dos_attributes & FILE_ATTRIBUTE_SYSTEM)
1678     _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_DOS_IS_SYSTEM, TRUE);
1679 #endif
1680
1681   symlink_target = NULL;
1682 #ifdef S_ISLNK
1683   if (is_symlink)
1684     {
1685       symlink_target = read_link (path);
1686       if (symlink_target &&
1687           _g_file_attribute_matcher_matches_id (attribute_matcher,
1688                                                 G_FILE_ATTRIBUTE_ID_STANDARD_SYMLINK_TARGET))
1689         g_file_info_set_symlink_target (info, symlink_target);
1690     }
1691 #endif
1692   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1693                                             G_FILE_ATTRIBUTE_ID_STANDARD_CONTENT_TYPE) ||
1694       _g_file_attribute_matcher_matches_id (attribute_matcher,
1695                                             G_FILE_ATTRIBUTE_ID_STANDARD_ICON) ||
1696       _g_file_attribute_matcher_matches_id (attribute_matcher,
1697                                             G_FILE_ATTRIBUTE_ID_STANDARD_SYMBOLIC_ICON))
1698     {
1699       char *content_type = get_content_type (basename, path, stat_ok ? &statbuf : NULL, is_symlink, symlink_broken, flags, FALSE);
1700
1701       if (content_type)
1702         {
1703           g_file_info_set_content_type (info, content_type);
1704
1705           if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1706                                                      G_FILE_ATTRIBUTE_ID_STANDARD_ICON)
1707                || _g_file_attribute_matcher_matches_id (attribute_matcher,
1708                                                         G_FILE_ATTRIBUTE_ID_STANDARD_SYMBOLIC_ICON))
1709             {
1710               GIcon *icon;
1711
1712               /* non symbolic icon */
1713               icon = get_icon (path, content_type, S_ISDIR (statbuf.st_mode), FALSE);
1714               if (icon != NULL)
1715                 {
1716                   g_file_info_set_icon (info, icon);
1717                   g_object_unref (icon);
1718                 }
1719
1720               /* symbolic icon */
1721               icon = get_icon (path, content_type, S_ISDIR (statbuf.st_mode), TRUE);
1722               if (icon != NULL)
1723                 {
1724                   g_file_info_set_symbolic_icon (info, icon);
1725                   g_object_unref (icon);
1726                 }
1727
1728             }
1729           
1730           g_free (content_type);
1731         }
1732     }
1733
1734   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1735                                             G_FILE_ATTRIBUTE_ID_STANDARD_FAST_CONTENT_TYPE))
1736     {
1737       char *content_type = get_content_type (basename, path, stat_ok ? &statbuf : NULL, is_symlink, symlink_broken, flags, TRUE);
1738       
1739       if (content_type)
1740         {
1741           _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_STANDARD_FAST_CONTENT_TYPE, content_type);
1742           g_free (content_type);
1743         }
1744     }
1745
1746   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1747                                             G_FILE_ATTRIBUTE_ID_OWNER_USER))
1748     {
1749       char *name = NULL;
1750       
1751 #ifdef G_OS_WIN32
1752       win32_get_file_user_info (path, NULL, &name, NULL);
1753 #else
1754       if (stat_ok)
1755         name = get_username_from_uid (statbuf.st_uid);
1756 #endif
1757       if (name)
1758         _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_OWNER_USER, name);
1759       g_free (name);
1760     }
1761
1762   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1763                                             G_FILE_ATTRIBUTE_ID_OWNER_USER_REAL))
1764     {
1765       char *name = NULL;
1766 #ifdef G_OS_WIN32
1767       win32_get_file_user_info (path, NULL, NULL, &name);
1768 #else
1769       if (stat_ok)
1770         name = get_realname_from_uid (statbuf.st_uid);
1771 #endif
1772       if (name)
1773         _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_OWNER_USER_REAL, name);
1774       g_free (name);
1775     }
1776   
1777   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1778                                             G_FILE_ATTRIBUTE_ID_OWNER_GROUP))
1779     {
1780       char *name = NULL;
1781 #ifdef G_OS_WIN32
1782       win32_get_file_user_info (path, &name, NULL, NULL);
1783 #else
1784       if (stat_ok)
1785         name = get_groupname_from_gid (statbuf.st_gid);
1786 #endif
1787       if (name)
1788         _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_OWNER_GROUP, name);
1789       g_free (name);
1790     }
1791
1792   if (stat_ok && parent_info && parent_info->device != 0 &&
1793       _g_file_attribute_matcher_matches_id (attribute_matcher, G_FILE_ATTRIBUTE_ID_UNIX_IS_MOUNTPOINT) &&
1794       statbuf.st_dev != parent_info->device) 
1795     _g_file_info_set_attribute_boolean_by_id (info, G_FILE_ATTRIBUTE_ID_UNIX_IS_MOUNTPOINT, TRUE);
1796   
1797   if (stat_ok)
1798     get_access_rights (attribute_matcher, info, path, &statbuf, parent_info);
1799   
1800 #ifdef HAVE_SELINUX
1801   get_selinux_context (path, info, attribute_matcher, (flags & G_FILE_QUERY_INFO_NOFOLLOW_SYMLINKS) == 0);
1802 #endif
1803   get_xattrs (path, TRUE, info, attribute_matcher, (flags & G_FILE_QUERY_INFO_NOFOLLOW_SYMLINKS) == 0);
1804   get_xattrs (path, FALSE, info, attribute_matcher, (flags & G_FILE_QUERY_INFO_NOFOLLOW_SYMLINKS) == 0);
1805
1806   if (_g_file_attribute_matcher_matches_id (attribute_matcher,
1807                                             G_FILE_ATTRIBUTE_ID_THUMBNAIL_PATH))
1808     get_thumbnail_attributes (path, info);
1809
1810   vfs = g_vfs_get_default ();
1811   class = G_VFS_GET_CLASS (vfs);
1812   if (class->local_file_add_info)
1813     {
1814       class->local_file_add_info (vfs,
1815                                   path,
1816                                   device,
1817                                   attribute_matcher,
1818                                   info,
1819                                   NULL,
1820                                   &parent_info->extra_data,
1821                                   &parent_info->free_extra_data);
1822     }
1823
1824   g_file_info_unset_attribute_mask (info);
1825
1826   g_free (symlink_target);
1827
1828   return info;
1829 }
1830
1831 GFileInfo *
1832 _g_local_file_info_get_from_fd (int         fd,
1833                                 const char *attributes,
1834                                 GError    **error)
1835 {
1836   GLocalFileStat stat_buf;
1837   GFileAttributeMatcher *matcher;
1838   GFileInfo *info;
1839   
1840 #ifdef G_OS_WIN32
1841 #define FSTAT _fstati64
1842 #else
1843 #define FSTAT fstat
1844 #endif
1845
1846   if (FSTAT (fd, &stat_buf) == -1)
1847     {
1848       int errsv = errno;
1849
1850       g_set_error (error, G_IO_ERROR,
1851                    g_io_error_from_errno (errsv),
1852                    _("Error when getting information for file descriptor: %s"),
1853                    g_strerror (errsv));
1854       return NULL;
1855     }
1856
1857   info = g_file_info_new ();
1858
1859   matcher = g_file_attribute_matcher_new (attributes);
1860
1861   /* Make sure we don't set any unwanted attributes */
1862   g_file_info_set_attribute_mask (info, matcher);
1863   
1864   set_info_from_stat (info, &stat_buf, matcher);
1865   
1866 #ifdef HAVE_SELINUX
1867   if (_g_file_attribute_matcher_matches_id (matcher, G_FILE_ATTRIBUTE_ID_SELINUX_CONTEXT) &&
1868       is_selinux_enabled ())
1869     {
1870       char *context;
1871       if (fgetfilecon_raw (fd, &context) >= 0)
1872         {
1873           _g_file_info_set_attribute_string_by_id (info, G_FILE_ATTRIBUTE_ID_SELINUX_CONTEXT, context);
1874           freecon (context);
1875         }
1876     }
1877 #endif
1878
1879   get_xattrs_from_fd (fd, TRUE, info, matcher);
1880   get_xattrs_from_fd (fd, FALSE, info, matcher);
1881   
1882   g_file_attribute_matcher_unref (matcher);
1883
1884   g_file_info_unset_attribute_mask (info);
1885   
1886   return info;
1887 }
1888
1889 static gboolean
1890 get_uint32 (const GFileAttributeValue  *value,
1891             guint32                    *val_out,
1892             GError                    **error)
1893 {
1894   if (value->type != G_FILE_ATTRIBUTE_TYPE_UINT32)
1895     {
1896       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
1897                            _("Invalid attribute type (uint32 expected)"));
1898       return FALSE;
1899     }
1900
1901   *val_out = value->u.uint32;
1902   
1903   return TRUE;
1904 }
1905
1906 #ifdef HAVE_UTIMES
1907 static gboolean
1908 get_uint64 (const GFileAttributeValue  *value,
1909             guint64                    *val_out,
1910             GError                    **error)
1911 {
1912   if (value->type != G_FILE_ATTRIBUTE_TYPE_UINT64)
1913     {
1914       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
1915                            _("Invalid attribute type (uint64 expected)"));
1916       return FALSE;
1917     }
1918
1919   *val_out = value->u.uint64;
1920   
1921   return TRUE;
1922 }
1923 #endif
1924
1925 #if defined(HAVE_SYMLINK)
1926 static gboolean
1927 get_byte_string (const GFileAttributeValue  *value,
1928                  const char                **val_out,
1929                  GError                    **error)
1930 {
1931   if (value->type != G_FILE_ATTRIBUTE_TYPE_BYTE_STRING)
1932     {
1933       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
1934                            _("Invalid attribute type (byte string expected)"));
1935       return FALSE;
1936     }
1937
1938   *val_out = value->u.string;
1939   
1940   return TRUE;
1941 }
1942 #endif
1943
1944 #ifdef HAVE_SELINUX
1945 static gboolean
1946 get_string (const GFileAttributeValue  *value,
1947             const char                **val_out,
1948             GError                    **error)
1949 {
1950   if (value->type != G_FILE_ATTRIBUTE_TYPE_STRING)
1951     {
1952       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
1953                            _("Invalid attribute type (byte string expected)"));
1954       return FALSE;
1955     }
1956
1957   *val_out = value->u.string;
1958   
1959   return TRUE;
1960 }
1961 #endif
1962
1963 static gboolean
1964 set_unix_mode (char                       *filename,
1965                GFileQueryInfoFlags         flags,
1966                const GFileAttributeValue  *value,
1967                GError                    **error)
1968 {
1969   guint32 val = 0;
1970   int res = 0;
1971   
1972   if (!get_uint32 (value, &val, error))
1973     return FALSE;
1974
1975 #ifdef HAVE_SYMLINK
1976   if (flags & G_FILE_QUERY_INFO_NOFOLLOW_SYMLINKS) {
1977 #ifdef HAVE_LCHMOD
1978     res = lchmod (filename, val);
1979 #else
1980     struct stat statbuf;
1981     /* Calling chmod on a symlink changes permissions on the symlink.
1982      * We don't want to do this, so we need to check for a symlink */
1983     res = g_lstat (filename, &statbuf);
1984     if (res == 0 && S_ISLNK (statbuf.st_mode))
1985       {
1986         g_set_error_literal (error, G_IO_ERROR,
1987                              G_IO_ERROR_NOT_SUPPORTED,
1988                              _("Cannot set permissions on symlinks"));
1989         return FALSE;
1990       }
1991     else if (res == 0)
1992       res = g_chmod (filename, val);
1993 #endif
1994   } else
1995 #endif
1996     res = g_chmod (filename, val);
1997
1998   if (res == -1)
1999     {
2000       int errsv = errno;
2001
2002       g_set_error (error, G_IO_ERROR,
2003                    g_io_error_from_errno (errsv),
2004                    _("Error setting permissions: %s"),
2005                    g_strerror (errsv));
2006       return FALSE;
2007     }
2008   return TRUE;
2009 }
2010
2011 #ifdef HAVE_CHOWN
2012 static gboolean
2013 set_unix_uid_gid (char                       *filename,
2014                   const GFileAttributeValue  *uid_value,
2015                   const GFileAttributeValue  *gid_value,
2016                   GFileQueryInfoFlags         flags,
2017                   GError                    **error)
2018 {
2019   int res;
2020   guint32 val = 0;
2021   uid_t uid;
2022   gid_t gid;
2023   
2024   if (uid_value)
2025     {
2026       if (!get_uint32 (uid_value, &val, error))
2027         return FALSE;
2028       uid = val;
2029     }
2030   else
2031     uid = -1;
2032   
2033   if (gid_value)
2034     {
2035       if (!get_uint32 (gid_value, &val, error))
2036         return FALSE;
2037       gid = val;
2038     }
2039   else
2040     gid = -1;
2041   
2042 #ifdef HAVE_LCHOWN
2043   if (flags & G_FILE_QUERY_INFO_NOFOLLOW_SYMLINKS)
2044     res = lchown (filename, uid, gid);
2045   else
2046 #endif
2047     res = chown (filename, uid, gid);
2048   
2049   if (res == -1)
2050     {
2051       int errsv = errno;
2052
2053       g_set_error (error, G_IO_ERROR,
2054                    g_io_error_from_errno (errsv),
2055                    _("Error setting owner: %s"),
2056                    g_strerror (errsv));
2057           return FALSE;
2058     }
2059   return TRUE;
2060 }
2061 #endif
2062
2063 #ifdef HAVE_SYMLINK
2064 static gboolean
2065 set_symlink (char                       *filename,
2066              const GFileAttributeValue  *value,
2067              GError                    **error)
2068 {
2069   const char *val;
2070   struct stat statbuf;
2071   
2072   if (!get_byte_string (value, &val, error))
2073     return FALSE;
2074   
2075   if (val == NULL)
2076     {
2077       g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
2078                            _("symlink must be non-NULL"));
2079       return FALSE;
2080     }
2081   
2082   if (g_lstat (filename, &statbuf))
2083     {
2084       int errsv = errno;
2085
2086       g_set_error (error, G_IO_ERROR,
2087                    g_io_error_from_errno (errsv),
2088                    _("Error setting symlink: %s"),
2089                    g_strerror (errsv));
2090       return FALSE;
2091     }
2092   
2093   if (!S_ISLNK (statbuf.st_mode))
2094     {
2095       g_set_error_literal (error, G_IO_ERROR,
2096                            G_IO_ERROR_NOT_SYMBOLIC_LINK,
2097                            _("Error setting symlink: file is not a symlink"));
2098       return FALSE;
2099     }
2100   
2101   if (g_unlink (filename))
2102     {
2103       int errsv = errno;
2104
2105       g_set_error (error, G_IO_ERROR,
2106                    g_io_error_from_errno (errsv),
2107                    _("Error setting symlink: %s"),
2108                    g_strerror (errsv));
2109       return FALSE;
2110     }
2111   
2112   if (symlink (filename, val) != 0)
2113     {
2114       int errsv = errno;
2115
2116       g_set_error (error, G_IO_ERROR,
2117                    g_io_error_from_errno (errsv),
2118                    _("Error setting symlink: %s"),
2119                    g_strerror (errsv));
2120       return FALSE;
2121     }
2122   
2123   return TRUE;
2124 }
2125 #endif
2126
2127 #ifdef HAVE_UTIMES
2128 static int
2129 lazy_stat (char        *filename, 
2130            struct stat *statbuf, 
2131            gboolean    *called_stat)
2132 {
2133   int res;
2134
2135   if (*called_stat)
2136     return 0;
2137   
2138   res = g_stat (filename, statbuf);
2139   
2140   if (res == 0)
2141     *called_stat = TRUE;
2142   
2143   return res;
2144 }
2145
2146
2147 static gboolean
2148 set_mtime_atime (char                       *filename,
2149                  const GFileAttributeValue  *mtime_value,
2150                  const GFileAttributeValue  *mtime_usec_value,
2151                  const GFileAttributeValue  *atime_value,
2152                  const GFileAttributeValue  *atime_usec_value,
2153                  GError                    **error)
2154 {
2155   int res;
2156   guint64 val = 0;
2157   guint32 val_usec = 0;
2158   struct stat statbuf;
2159   gboolean got_stat = FALSE;
2160   struct timeval times[2] = { {0, 0}, {0, 0} };
2161
2162   /* ATIME */
2163   if (atime_value)
2164     {
2165       if (!get_uint64 (atime_value, &val, error))
2166         return FALSE;
2167       times[0].tv_sec = val;
2168     }
2169   else
2170     {
2171       if (lazy_stat (filename, &statbuf, &got_stat) == 0)
2172         {
2173           times[0].tv_sec = statbuf.st_mtime;
2174 #if defined (HAVE_STRUCT_STAT_ST_ATIMENSEC)
2175           times[0].tv_usec = statbuf.st_atimensec / 1000;
2176 #elif defined (HAVE_STRUCT_STAT_ST_ATIM_TV_NSEC)
2177           times[0].tv_usec = statbuf.st_atim.tv_nsec / 1000;
2178 #endif
2179         }
2180     }
2181   
2182   if (atime_usec_value)
2183     {
2184       if (!get_uint32 (atime_usec_value, &val_usec, error))
2185         return FALSE;
2186       times[0].tv_usec = val_usec;
2187     }
2188
2189   /* MTIME */
2190   if (mtime_value)
2191     {
2192       if (!get_uint64 (mtime_value, &val, error))
2193         return FALSE;
2194       times[1].tv_sec = val;
2195     }
2196   else
2197     {
2198       if (lazy_stat (filename, &statbuf, &got_stat) == 0)
2199         {
2200           times[1].tv_sec = statbuf.st_mtime;
2201 #if defined (HAVE_STRUCT_STAT_ST_MTIMENSEC)
2202           times[1].tv_usec = statbuf.st_mtimensec / 1000;
2203 #elif defined (HAVE_STRUCT_STAT_ST_MTIM_TV_NSEC)
2204           times[1].tv_usec = statbuf.st_mtim.tv_nsec / 1000;
2205 #endif
2206         }
2207     }
2208   
2209   if (mtime_usec_value)
2210     {
2211       if (!get_uint32 (mtime_usec_value, &val_usec, error))
2212         return FALSE;
2213       times[1].tv_usec = val_usec;
2214     }
2215   
2216   res = utimes (filename, times);
2217   if (res == -1)
2218     {
2219       int errsv = errno;
2220
2221       g_set_error (error, G_IO_ERROR,
2222                    g_io_error_from_errno (errsv),
2223                    _("Error setting modification or access time: %s"),
2224                    g_strerror (errsv));
2225           return FALSE;
2226     }
2227   return TRUE;
2228 }
2229 #endif
2230
2231
2232 #ifdef HAVE_SELINUX
2233 static gboolean
2234 set_selinux_context (char                       *filename,
2235                  const GFileAttributeValue  *value,
2236                  GError                    **error)
2237 {
2238   const char *val;
2239
2240   if (!get_string (value, &val, error))
2241     return FALSE;
2242
2243   if (val == NULL)
2244   {
2245     g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
2246                          _("SELinux context must be non-NULL"));
2247     return FALSE;
2248   }
2249
2250   if (is_selinux_enabled ()) {
2251         security_context_t val_s;
2252         
2253         val_s = g_strdup (val);
2254         
2255         if (setfilecon_raw (filename, val_s) < 0)
2256         {
2257             int errsv = errno;
2258             
2259             g_set_error (error, G_IO_ERROR,
2260                          g_io_error_from_errno (errsv),
2261                         _("Error setting SELinux context: %s"),
2262                          g_strerror (errsv));
2263             return FALSE;
2264         }
2265         g_free (val_s);
2266   } else {
2267     g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_ARGUMENT,
2268                          _("SELinux is not enabled on this system"));
2269     return FALSE;
2270   }
2271                                                      
2272   return TRUE;
2273 }
2274 #endif 
2275
2276
2277 gboolean
2278 _g_local_file_info_set_attribute (char                 *filename,
2279                                   const char           *attribute,
2280                                   GFileAttributeType    type,
2281                                   gpointer              value_p,
2282                                   GFileQueryInfoFlags   flags,
2283                                   GCancellable         *cancellable,
2284                                   GError              **error)
2285 {
2286   GFileAttributeValue value = { 0 };
2287   GVfsClass *class;
2288   GVfs *vfs;
2289
2290   _g_file_attribute_value_set_from_pointer (&value, type, value_p, FALSE);
2291   
2292   if (strcmp (attribute, G_FILE_ATTRIBUTE_UNIX_MODE) == 0)
2293     return set_unix_mode (filename, flags, &value, error);
2294   
2295 #ifdef HAVE_CHOWN
2296   else if (strcmp (attribute, G_FILE_ATTRIBUTE_UNIX_UID) == 0)
2297     return set_unix_uid_gid (filename, &value, NULL, flags, error);
2298   else if (strcmp (attribute, G_FILE_ATTRIBUTE_UNIX_GID) == 0)
2299     return set_unix_uid_gid (filename, NULL, &value, flags, error);
2300 #endif
2301   
2302 #ifdef HAVE_SYMLINK
2303   else if (strcmp (attribute, G_FILE_ATTRIBUTE_STANDARD_SYMLINK_TARGET) == 0)
2304     return set_symlink (filename, &value, error);
2305 #endif
2306
2307 #ifdef HAVE_UTIMES
2308   else if (strcmp (attribute, G_FILE_ATTRIBUTE_TIME_MODIFIED) == 0)
2309     return set_mtime_atime (filename, &value, NULL, NULL, NULL, error);
2310   else if (strcmp (attribute, G_FILE_ATTRIBUTE_TIME_MODIFIED_USEC) == 0)
2311     return set_mtime_atime (filename, NULL, &value, NULL, NULL, error);
2312   else if (strcmp (attribute, G_FILE_ATTRIBUTE_TIME_ACCESS) == 0)
2313     return set_mtime_atime (filename, NULL, NULL, &value, NULL, error);
2314   else if (strcmp (attribute, G_FILE_ATTRIBUTE_TIME_ACCESS_USEC) == 0)
2315     return set_mtime_atime (filename, NULL, NULL, NULL, &value, error);
2316 #endif
2317
2318 #ifdef HAVE_XATTR
2319   else if (g_str_has_prefix (attribute, "xattr::"))
2320     return set_xattr (filename, attribute, &value, error);
2321   else if (g_str_has_prefix (attribute, "xattr-sys::"))
2322     return set_xattr (filename, attribute, &value, error);
2323 #endif
2324
2325 #ifdef HAVE_SELINUX 
2326   else if (strcmp (attribute, G_FILE_ATTRIBUTE_SELINUX_CONTEXT) == 0)
2327     return set_selinux_context (filename, &value, error);
2328 #endif
2329
2330   vfs = g_vfs_get_default ();
2331   class = G_VFS_GET_CLASS (vfs);
2332   if (class->local_file_set_attributes)
2333     {
2334       GFileInfo *info;
2335
2336       info = g_file_info_new ();
2337       g_file_info_set_attribute (info,
2338                                  attribute,
2339                                  type,
2340                                  value_p);
2341       if (!class->local_file_set_attributes (vfs, filename,
2342                                              info,
2343                                              flags, cancellable,
2344                                              error))
2345         {
2346           g_object_unref (info);
2347           return FALSE;
2348         }
2349
2350       if (g_file_info_get_attribute_status (info, attribute) == G_FILE_ATTRIBUTE_STATUS_SET)
2351         {
2352           g_object_unref (info);
2353           return TRUE;
2354         }
2355
2356       g_object_unref (info);
2357     }
2358
2359   g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_SUPPORTED,
2360                _("Setting attribute %s not supported"), attribute);
2361   return FALSE;
2362 }
2363
2364 gboolean
2365 _g_local_file_info_set_attributes  (char                 *filename,
2366                                     GFileInfo            *info,
2367                                     GFileQueryInfoFlags   flags,
2368                                     GCancellable         *cancellable,
2369                                     GError              **error)
2370 {
2371   GFileAttributeValue *value;
2372 #ifdef HAVE_CHOWN
2373   GFileAttributeValue *uid, *gid;
2374 #endif
2375 #ifdef HAVE_UTIMES
2376   GFileAttributeValue *mtime, *mtime_usec, *atime, *atime_usec;
2377 #endif
2378 #if defined (HAVE_CHOWN) || defined (HAVE_UTIMES)
2379   GFileAttributeStatus status;
2380 #endif
2381   gboolean res;
2382   GVfsClass *class;
2383   GVfs *vfs;
2384   
2385   /* Handles setting multiple specified data in a single set, and takes care
2386      of ordering restrictions when setting attributes */
2387
2388   res = TRUE;
2389
2390   /* Set symlink first, since this recreates the file */
2391 #ifdef HAVE_SYMLINK
2392   value = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_STANDARD_SYMLINK_TARGET);
2393   if (value)
2394     {
2395       if (!set_symlink (filename, value, error))
2396         {
2397           value->status = G_FILE_ATTRIBUTE_STATUS_ERROR_SETTING;
2398           res = FALSE;
2399           /* Don't set error multiple times */
2400           error = NULL;
2401         }
2402       else
2403         value->status = G_FILE_ATTRIBUTE_STATUS_SET;
2404         
2405     }
2406 #endif
2407
2408 #ifdef HAVE_CHOWN
2409   /* Group uid and gid setting into one call
2410    * Change ownership before permissions, since ownership changes can
2411      change permissions (e.g. setuid)
2412    */
2413   uid = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_UNIX_UID);
2414   gid = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_UNIX_GID);
2415   
2416   if (uid || gid)
2417     {
2418       if (!set_unix_uid_gid (filename, uid, gid, flags, error))
2419         {
2420           status = G_FILE_ATTRIBUTE_STATUS_ERROR_SETTING;
2421           res = FALSE;
2422           /* Don't set error multiple times */
2423           error = NULL;
2424         }
2425       else
2426         status = G_FILE_ATTRIBUTE_STATUS_SET;
2427       if (uid)
2428         uid->status = status;
2429       if (gid)
2430         gid->status = status;
2431     }
2432 #endif
2433   
2434   value = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_UNIX_MODE);
2435   if (value)
2436     {
2437       if (!set_unix_mode (filename, flags, value, error))
2438         {
2439           value->status = G_FILE_ATTRIBUTE_STATUS_ERROR_SETTING;
2440           res = FALSE;
2441           /* Don't set error multiple times */
2442           error = NULL;
2443         }
2444       else
2445         value->status = G_FILE_ATTRIBUTE_STATUS_SET;
2446         
2447     }
2448
2449 #ifdef HAVE_UTIMES
2450   /* Group all time settings into one call
2451    * Change times as the last thing to avoid it changing due to metadata changes
2452    */
2453   
2454   mtime = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_TIME_MODIFIED);
2455   mtime_usec = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_TIME_MODIFIED_USEC);
2456   atime = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_TIME_ACCESS);
2457   atime_usec = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_TIME_ACCESS_USEC);
2458
2459   if (mtime || mtime_usec || atime || atime_usec)
2460     {
2461       if (!set_mtime_atime (filename, mtime, mtime_usec, atime, atime_usec, error))
2462         {
2463           status = G_FILE_ATTRIBUTE_STATUS_ERROR_SETTING;
2464           res = FALSE;
2465           /* Don't set error multiple times */
2466           error = NULL;
2467         }
2468       else
2469         status = G_FILE_ATTRIBUTE_STATUS_SET;
2470       
2471       if (mtime)
2472         mtime->status = status;
2473       if (mtime_usec)
2474         mtime_usec->status = status;
2475       if (atime)
2476         atime->status = status;
2477       if (atime_usec)
2478         atime_usec->status = status;
2479     }
2480 #endif
2481
2482   /* xattrs are handled by default callback */
2483
2484
2485   /*  SELinux context */
2486 #ifdef HAVE_SELINUX 
2487   if (is_selinux_enabled ()) {
2488     value = _g_file_info_get_attribute_value (info, G_FILE_ATTRIBUTE_SELINUX_CONTEXT);
2489     if (value)
2490     {
2491       if (!set_selinux_context (filename, value, error))
2492         {
2493           value->status = G_FILE_ATTRIBUTE_STATUS_ERROR_SETTING;
2494           res = FALSE;
2495           /* Don't set error multiple times */
2496           error = NULL;
2497         }
2498       else
2499         value->status = G_FILE_ATTRIBUTE_STATUS_SET;
2500     }
2501   }
2502 #endif
2503
2504   vfs = g_vfs_get_default ();
2505   class = G_VFS_GET_CLASS (vfs);
2506   if (class->local_file_set_attributes)
2507     {
2508       if (!class->local_file_set_attributes (vfs, filename,
2509                                              info,
2510                                              flags, cancellable,
2511                                              error))
2512         {
2513           res = FALSE;
2514           /* Don't set error multiple times */
2515           error = NULL;
2516         }
2517     }
2518
2519   return res;
2520 }