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