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