source3/modules/vfs_fruit.c

   1 /*
   2  * OS X and Netatalk interoperability VFS module for Samba-3.x
   3  *
   4  * Copyright (C) Ralph Boehme, 2013, 2014
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 3 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include "includes.h"
  21 #include "MacExtensions.h"
  22 #include "smbd/smbd.h"
  23 #include "system/filesys.h"
  24 #include "lib/util/time.h"
  25 #include "../lib/crypto/md5.h"
  26 #include "system/shmem.h"
  27 #include "locking/proto.h"
  28 #include "smbd/globals.h"
  29 #include "messages.h"
  30 #include "libcli/security/security.h"
  31 #include "../libcli/smb/smb2_create_ctx.h"
  32 #include "lib/util/sys_rw.h"
  33 #include "lib/util/tevent_ntstatus.h"
  34
  35 /*
  36  * Enhanced OS X and Netatalk compatibility
  37  * ========================================
  38  *
  39  * This modules takes advantage of vfs_streams_xattr and
  40  * vfs_catia. VFS modules vfs_fruit and vfs_streams_xattr must be
  41  * loaded in the correct order:
  42  *
  43  *   vfs modules = catia fruit streams_xattr
  44  *
  45  * The module intercepts the OS X special streams "AFP_AfpInfo" and
  46  * "AFP_Resource" and handles them in a special way. All other named
  47  * streams are deferred to vfs_streams_xattr.
  48  *
  49  * The OS X client maps all NTFS illegal characters to the Unicode
  50  * private range. This module optionally stores the charcters using
  51  * their native ASCII encoding using vfs_catia. If you're not enabling
  52  * this feature, you can skip catia from vfs modules.
  53  *
  54  * Finally, open modes are optionally checked against Netatalk AFP
  55  * share modes.
  56  *
  57  * The "AFP_AfpInfo" named stream is a binary blob containing OS X
  58  * extended metadata for files and directories. This module optionally
  59  * reads and stores this metadata in a way compatible with Netatalk 3
  60  * which stores the metadata in an EA "org.netatalk.metadata". Cf
  61  * source3/include/MacExtensions.h for a description of the binary
  62  * blobs content.
  63  *
  64  * The "AFP_Resource" named stream may be arbitrarily large, thus it
  65  * can't be stored in an xattr on most filesystem. ZFS on Solaris is
  66  * the only available filesystem where xattrs can be of any size and
  67  * the OS supports using the file APIs for xattrs.
  68  *
  69  * The AFP_Resource stream is stored in an AppleDouble file prepending
  70  * "._" to the filename. On Solaris with ZFS the stream is optionally
  71  * stored in an EA "org.netatalk.resource".
  72  *
  73  *
  74  * Extended Attributes
  75  * ===================
  76  *
  77  * The OS X SMB client sends xattrs as ADS too. For xattr interop with
  78  * other protocols you may want to adjust the xattr names the VFS
  79  * module vfs_streams_xattr uses for storing ADS's. This defaults to
  80  * user.DosStream.ADS_NAME:$DATA and can be changed by specifying
  81  * these module parameters:
  82  *
  83  *   streams_xattr:prefix = user.
  84  *   streams_xattr:store_stream_type = false
  85  *
  86  *
  87  * TODO
  88  * ====
  89  *
  90  * - log diagnostic if any needed VFS module is not loaded
  91  *   (eg with lp_vfs_objects())
  92  * - add tests
  93  */
  94
  95 static int vfs_fruit_debug_level = DBGC_VFS;
  96
  97 #undef DBGC_CLASS
  98 #define DBGC_CLASS vfs_fruit_debug_level
  99
 100 #define FRUIT_PARAM_TYPE_NAME "fruit"
 101 #define ADOUBLE_NAME_PREFIX "._"
 102
 103 #define NETATALK_META_XATTR "org.netatalk.Metadata"
 104 #define NETATALK_RSRC_XATTR "org.netatalk.ResourceFork"
 105
 106 #if defined(HAVE_ATTROPEN)
 107 #define AFPINFO_EA_NETATALK NETATALK_META_XATTR
 108 #define AFPRESOURCE_EA_NETATALK NETATALK_RSRC_XATTR
 109 #else
 110 #define AFPINFO_EA_NETATALK "user." NETATALK_META_XATTR
 111 #define AFPRESOURCE_EA_NETATALK "user." NETATALK_RSRC_XATTR
 112 #endif
 113
 114 enum apple_fork {APPLE_FORK_DATA, APPLE_FORK_RSRC};
 115
 116 enum fruit_rsrc {FRUIT_RSRC_STREAM, FRUIT_RSRC_ADFILE, FRUIT_RSRC_XATTR};
 117 enum fruit_meta {FRUIT_META_STREAM, FRUIT_META_NETATALK};
 118 enum fruit_locking {FRUIT_LOCKING_NETATALK, FRUIT_LOCKING_NONE};
 119 enum fruit_encoding {FRUIT_ENC_NATIVE, FRUIT_ENC_PRIVATE};
 120
 121 struct fruit_config_data {
 122         enum fruit_rsrc rsrc;
 123         enum fruit_meta meta;
 124         enum fruit_locking locking;
 125         enum fruit_encoding encoding;
 126         bool use_aapl;          /* config from smb.conf */
 127         bool nego_aapl;         /* client negotiated AAPL */
 128         bool use_copyfile;
 129         bool readdir_attr_enabled;
 130         bool unix_info_enabled;
 131         bool copyfile_enabled;
 132         bool veto_appledouble;
 133         bool posix_rename;
 134
 135         /*
 136          * Additional options, all enabled by default,
 137          * possibly useful for analyzing performance. The associated
 138          * operations with each of them may be expensive, so having
 139          * the chance to disable them individually gives a chance
 140          * tweaking the setup for the particular usecase.
 141          */
 142         bool readdir_attr_rsize;
 143         bool readdir_attr_finder_info;
 144         bool readdir_attr_max_access;
 145 };
 146
 147 static const struct enum_list fruit_rsrc[] = {
 148         {FRUIT_RSRC_STREAM, "stream"}, /* pass on to vfs_streams_xattr */
 149         {FRUIT_RSRC_ADFILE, "file"}, /* ._ AppleDouble file */
 150         {FRUIT_RSRC_XATTR, "xattr"}, /* Netatalk compatible xattr (ZFS only) */
 151         { -1, NULL}
 152 };
 153
 154 static const struct enum_list fruit_meta[] = {
 155         {FRUIT_META_STREAM, "stream"}, /* pass on to vfs_streams_xattr */
 156         {FRUIT_META_NETATALK, "netatalk"}, /* Netatalk compatible xattr */
 157         { -1, NULL}
 158 };
 159
 160 static const struct enum_list fruit_locking[] = {
 161         {FRUIT_LOCKING_NETATALK, "netatalk"}, /* synchronize locks with Netatalk */
 162         {FRUIT_LOCKING_NONE, "none"},
 163         { -1, NULL}
 164 };
 165
 166 static const struct enum_list fruit_encoding[] = {
 167         {FRUIT_ENC_NATIVE, "native"}, /* map unicode private chars to ASCII */
 168         {FRUIT_ENC_PRIVATE, "private"}, /* keep unicode private chars */
 169         { -1, NULL}
 170 };
 171
 172 /*****************************************************************************
 173  * Defines, functions and data structures that deal with AppleDouble
 174  *****************************************************************************/
 175
 176 /*
 177  * There are two AppleDouble blobs we deal with:
 178  *
 179  * - ADOUBLE_META - AppleDouble blob used by Netatalk for storing
 180  *   metadata in an xattr
 181  *
 182  * - ADOUBLE_RSRC - AppleDouble blob used by OS X and Netatalk in
 183  *   ._ files
 184  */
 185 typedef enum {ADOUBLE_META, ADOUBLE_RSRC} adouble_type_t;
 186
 187 /* Version info */
 188 #define AD_VERSION2     0x00020000
 189 #define AD_VERSION      AD_VERSION2
 190
 191 /*
 192  * AppleDouble entry IDs.
 193  */
 194 #define ADEID_DFORK         1
 195 #define ADEID_RFORK         2
 196 #define ADEID_NAME          3
 197 #define ADEID_COMMENT       4
 198 #define ADEID_ICONBW        5
 199 #define ADEID_ICONCOL       6
 200 #define ADEID_FILEI         7
 201 #define ADEID_FILEDATESI    8
 202 #define ADEID_FINDERI       9
 203 #define ADEID_MACFILEI      10
 204 #define ADEID_PRODOSFILEI   11
 205 #define ADEID_MSDOSFILEI    12
 206 #define ADEID_SHORTNAME     13
 207 #define ADEID_AFPFILEI      14
 208 #define ADEID_DID           15
 209
 210 /* Private Netatalk entries */
 211 #define ADEID_PRIVDEV       16
 212 #define ADEID_PRIVINO       17
 213 #define ADEID_PRIVSYN       18
 214 #define ADEID_PRIVID        19
 215 #define ADEID_MAX           (ADEID_PRIVID + 1)
 216
 217 /*
 218  * These are the real ids for the private entries,
 219  * as stored in the adouble file
 220  */
 221 #define AD_DEV              0x80444556
 222 #define AD_INO              0x80494E4F
 223 #define AD_SYN              0x8053594E
 224 #define AD_ID               0x8053567E
 225
 226 /* Number of actually used entries */
 227 #define ADEID_NUM_XATTR      8
 228 #define ADEID_NUM_DOT_UND    2
 229 #define ADEID_NUM_RSRC_XATTR 1
 230
 231 /* AppleDouble magic */
 232 #define AD_APPLESINGLE_MAGIC 0x00051600
 233 #define AD_APPLEDOUBLE_MAGIC 0x00051607
 234 #define AD_MAGIC             AD_APPLEDOUBLE_MAGIC
 235
 236 /* Sizes of relevant entry bits */
 237 #define ADEDLEN_MAGIC       4
 238 #define ADEDLEN_VERSION     4
 239 #define ADEDLEN_FILLER      16
 240 #define AD_FILLER_TAG       "Netatalk        " /* should be 16 bytes */
 241 #define ADEDLEN_NENTRIES    2
 242 #define AD_HEADER_LEN       (ADEDLEN_MAGIC + ADEDLEN_VERSION + \
 243                              ADEDLEN_FILLER + ADEDLEN_NENTRIES) /* 26 */
 244 #define AD_ENTRY_LEN_EID    4
 245 #define AD_ENTRY_LEN_OFF    4
 246 #define AD_ENTRY_LEN_LEN    4
 247 #define AD_ENTRY_LEN (AD_ENTRY_LEN_EID + AD_ENTRY_LEN_OFF + AD_ENTRY_LEN_LEN)
 248
 249 /* Field widths */
 250 #define ADEDLEN_NAME            255
 251 #define ADEDLEN_COMMENT         200
 252 #define ADEDLEN_FILEI           16
 253 #define ADEDLEN_FINDERI         32
 254 #define ADEDLEN_FILEDATESI      16
 255 #define ADEDLEN_SHORTNAME       12 /* length up to 8.3 */
 256 #define ADEDLEN_AFPFILEI        4
 257 #define ADEDLEN_MACFILEI        4
 258 #define ADEDLEN_PRODOSFILEI     8
 259 #define ADEDLEN_MSDOSFILEI      2
 260 #define ADEDLEN_DID             4
 261 #define ADEDLEN_PRIVDEV         8
 262 #define ADEDLEN_PRIVINO         8
 263 #define ADEDLEN_PRIVSYN         8
 264 #define ADEDLEN_PRIVID          4
 265
 266 /* Offsets */
 267 #define ADEDOFF_MAGIC         0
 268 #define ADEDOFF_VERSION       (ADEDOFF_MAGIC + ADEDLEN_MAGIC)
 269 #define ADEDOFF_FILLER        (ADEDOFF_VERSION + ADEDLEN_VERSION)
 270 #define ADEDOFF_NENTRIES      (ADEDOFF_FILLER + ADEDLEN_FILLER)
 271
 272 #define ADEDOFF_FINDERI_XATTR    (AD_HEADER_LEN + \
 273                                   (ADEID_NUM_XATTR * AD_ENTRY_LEN))
 274 #define ADEDOFF_COMMENT_XATTR    (ADEDOFF_FINDERI_XATTR    + ADEDLEN_FINDERI)
 275 #define ADEDOFF_FILEDATESI_XATTR (ADEDOFF_COMMENT_XATTR    + ADEDLEN_COMMENT)
 276 #define ADEDOFF_AFPFILEI_XATTR   (ADEDOFF_FILEDATESI_XATTR + \
 277                                   ADEDLEN_FILEDATESI)
 278 #define ADEDOFF_PRIVDEV_XATTR    (ADEDOFF_AFPFILEI_XATTR   + ADEDLEN_AFPFILEI)
 279 #define ADEDOFF_PRIVINO_XATTR    (ADEDOFF_PRIVDEV_XATTR    + ADEDLEN_PRIVDEV)
 280 #define ADEDOFF_PRIVSYN_XATTR    (ADEDOFF_PRIVINO_XATTR    + ADEDLEN_PRIVINO)
 281 #define ADEDOFF_PRIVID_XATTR     (ADEDOFF_PRIVSYN_XATTR    + ADEDLEN_PRIVSYN)
 282
 283 #define ADEDOFF_FINDERI_DOT_UND  (AD_HEADER_LEN + \
 284                                   (ADEID_NUM_DOT_UND * AD_ENTRY_LEN))
 285 #define ADEDOFF_RFORK_DOT_UND    (ADEDOFF_FINDERI_DOT_UND + ADEDLEN_FINDERI)
 286
 287 #define AD_DATASZ_XATTR (AD_HEADER_LEN + \
 288                          (ADEID_NUM_XATTR * AD_ENTRY_LEN) + \
 289                          ADEDLEN_FINDERI + ADEDLEN_COMMENT + \
 290                          ADEDLEN_FILEDATESI + ADEDLEN_AFPFILEI + \
 291                          ADEDLEN_PRIVDEV + ADEDLEN_PRIVINO + \
 292                          ADEDLEN_PRIVSYN + ADEDLEN_PRIVID)
 293
 294 #if AD_DATASZ_XATTR != 402
 295 #error bad size for AD_DATASZ_XATTR
 296 #endif
 297
 298 #define AD_DATASZ_DOT_UND (AD_HEADER_LEN + \
 299                            (ADEID_NUM_DOT_UND * AD_ENTRY_LEN) + \
 300                            ADEDLEN_FINDERI)
 301 #if AD_DATASZ_DOT_UND != 82
 302 #error bad size for AD_DATASZ_DOT_UND
 303 #endif
 304
 305 /*
 306  * Sharemode locks fcntl() offsets
 307  */
 308 #if _FILE_OFFSET_BITS == 64 || defined(HAVE_LARGEFILE)
 309 #define AD_FILELOCK_BASE (UINT64_C(0x7FFFFFFFFFFFFFFF) - 9)
 310 #else
 311 #define AD_FILELOCK_BASE (UINT32_C(0x7FFFFFFF) - 9)
 312 #endif
 313 #define BYTELOCK_MAX (AD_FILELOCK_BASE - 1)
 314
 315 #define AD_FILELOCK_OPEN_WR        (AD_FILELOCK_BASE + 0)
 316 #define AD_FILELOCK_OPEN_RD        (AD_FILELOCK_BASE + 1)
 317 #define AD_FILELOCK_RSRC_OPEN_WR   (AD_FILELOCK_BASE + 2)
 318 #define AD_FILELOCK_RSRC_OPEN_RD   (AD_FILELOCK_BASE + 3)
 319 #define AD_FILELOCK_DENY_WR        (AD_FILELOCK_BASE + 4)
 320 #define AD_FILELOCK_DENY_RD        (AD_FILELOCK_BASE + 5)
 321 #define AD_FILELOCK_RSRC_DENY_WR   (AD_FILELOCK_BASE + 6)
 322 #define AD_FILELOCK_RSRC_DENY_RD   (AD_FILELOCK_BASE + 7)
 323 #define AD_FILELOCK_OPEN_NONE      (AD_FILELOCK_BASE + 8)
 324 #define AD_FILELOCK_RSRC_OPEN_NONE (AD_FILELOCK_BASE + 9)
 325
 326 /* Time stuff we overload the bits a little */
 327 #define AD_DATE_CREATE         0
 328 #define AD_DATE_MODIFY         4
 329 #define AD_DATE_BACKUP         8
 330 #define AD_DATE_ACCESS        12
 331 #define AD_DATE_MASK          (AD_DATE_CREATE | AD_DATE_MODIFY | \
 332                                AD_DATE_BACKUP | AD_DATE_ACCESS)
 333 #define AD_DATE_UNIX          (1 << 10)
 334 #define AD_DATE_START         0x80000000
 335 #define AD_DATE_DELTA         946684800
 336 #define AD_DATE_FROM_UNIX(x)  (htonl((x) - AD_DATE_DELTA))
 337 #define AD_DATE_TO_UNIX(x)    (ntohl(x) + AD_DATE_DELTA)
 338
 339 /* Accessor macros */
 340 #define ad_getentrylen(ad,eid)     ((ad)->ad_eid[(eid)].ade_len)
 341 #define ad_getentryoff(ad,eid)     ((ad)->ad_eid[(eid)].ade_off)
 342 #define ad_setentrylen(ad,eid,len) ((ad)->ad_eid[(eid)].ade_len = (len))
 343 #define ad_setentryoff(ad,eid,off) ((ad)->ad_eid[(eid)].ade_off = (off))
 344
 345 struct ad_entry {
 346         size_t ade_off;
 347         size_t ade_len;
 348 };
 349
 350 struct adouble {
 351         vfs_handle_struct        *ad_handle;
 352         files_struct             *ad_fsp;
 353         adouble_type_t            ad_type;
 354         uint32_t                  ad_magic;
 355         uint32_t                  ad_version;
 356         struct ad_entry           ad_eid[ADEID_MAX];
 357         char                     *ad_data;
 358 };
 359
 360 struct ad_entry_order {
 361         uint32_t id, offset, len;
 362 };
 363
 364 /* Netatalk AppleDouble metadata xattr */
 365 static const
 366 struct ad_entry_order entry_order_meta_xattr[ADEID_NUM_XATTR + 1] = {
 367         {ADEID_FINDERI,    ADEDOFF_FINDERI_XATTR,    ADEDLEN_FINDERI},
 368         {ADEID_COMMENT,    ADEDOFF_COMMENT_XATTR,    0},
 369         {ADEID_FILEDATESI, ADEDOFF_FILEDATESI_XATTR, ADEDLEN_FILEDATESI},
 370         {ADEID_AFPFILEI,   ADEDOFF_AFPFILEI_XATTR,   ADEDLEN_AFPFILEI},
 371         {ADEID_PRIVDEV,    ADEDOFF_PRIVDEV_XATTR,    0},
 372         {ADEID_PRIVINO,    ADEDOFF_PRIVINO_XATTR,    0},
 373         {ADEID_PRIVSYN,    ADEDOFF_PRIVSYN_XATTR,    0},
 374         {ADEID_PRIVID,     ADEDOFF_PRIVID_XATTR,     0},
 375         {0, 0, 0}
 376 };
 377
 378 /* AppleDouble resource fork file (the ones prefixed by "._") */
 379 static const
 380 struct ad_entry_order entry_order_dot_und[ADEID_NUM_DOT_UND + 1] = {
 381         {ADEID_FINDERI,    ADEDOFF_FINDERI_DOT_UND,  ADEDLEN_FINDERI},
 382         {ADEID_RFORK,      ADEDOFF_RFORK_DOT_UND,    0},
 383         {0, 0, 0}
 384 };
 385
 386 /*
 387  * Fake AppleDouble entry oder for resource fork xattr.  The xattr
 388  * isn't an AppleDouble file, it simply contains the resource data,
 389  * but in order to be able to use some API calls like ad_getentryoff()
 390  * we build a fake/helper struct adouble with this entry order struct.
 391  */
 392 static const
 393 struct ad_entry_order entry_order_rsrc_xattr[ADEID_NUM_RSRC_XATTR + 1] = {
 394         {ADEID_RFORK, 0, 0},
 395         {0, 0, 0}
 396 };
 397
 398 /* Conversion from enumerated id to on-disk AppleDouble id */
 399 #define AD_EID_DISK(a) (set_eid[a])
 400 static const uint32_t set_eid[] = {
 401         0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15,
 402         AD_DEV, AD_INO, AD_SYN, AD_ID
 403 };
 404
 405 /*
 406  * Forward declarations
 407  */
 408 static struct adouble *ad_init(TALLOC_CTX *ctx, vfs_handle_struct *handle,
 409                                adouble_type_t type, files_struct *fsp);
 410 static int ad_write(struct adouble *ad, const char *path);
 411 static int adouble_path(TALLOC_CTX *ctx, const char *path_in, char **path_out);
 412
 413 /**
 414  * Return a pointer to an AppleDouble entry
 415  *
 416  * Returns NULL if the entry is not present
 417  **/
 418 static char *ad_get_entry(const struct adouble *ad, int eid)
 419 {
 420         off_t off = ad_getentryoff(ad, eid);
 421         size_t len = ad_getentrylen(ad, eid);
 422
 423         if (off == 0 || len == 0) {
 424                 return NULL;
 425         }
 426
 427         return ad->ad_data + off;
 428 }
 429
 430 /**
 431  * Get a date
 432  **/
 433 static int ad_getdate(const struct adouble *ad,
 434                       unsigned int dateoff,
 435                       uint32_t *date)
 436 {
 437         bool xlate = (dateoff & AD_DATE_UNIX);
 438         char *p = NULL;
 439
 440         dateoff &= AD_DATE_MASK;
 441         p = ad_get_entry(ad, ADEID_FILEDATESI);
 442         if (p == NULL) {
 443                 return -1;
 444         }
 445
 446         if (dateoff > AD_DATE_ACCESS) {
 447             return -1;
 448         }
 449
 450         memcpy(date, p + dateoff, sizeof(uint32_t));
 451
 452         if (xlate) {
 453                 *date = AD_DATE_TO_UNIX(*date);
 454         }
 455         return 0;
 456 }
 457
 458 /**
 459  * Set a date
 460  **/
 461 static int ad_setdate(struct adouble *ad, unsigned int dateoff, uint32_t date)
 462 {
 463         bool xlate = (dateoff & AD_DATE_UNIX);
 464         char *p = NULL;
 465
 466         p = ad_get_entry(ad, ADEID_FILEDATESI);
 467         if (p == NULL) {
 468                 return -1;
 469         }
 470
 471         dateoff &= AD_DATE_MASK;
 472         if (xlate) {
 473                 date = AD_DATE_FROM_UNIX(date);
 474         }
 475
 476         if (dateoff > AD_DATE_ACCESS) {
 477                 return -1;
 478         }
 479
 480         memcpy(p + dateoff, &date, sizeof(date));
 481
 482         return 0;
 483 }
 484
 485
 486 /**
 487  * Map on-disk AppleDouble id to enumerated id
 488  **/
 489 static uint32_t get_eid(uint32_t eid)
 490 {
 491         if (eid <= 15) {
 492                 return eid;
 493         }
 494
 495         switch (eid) {
 496         case AD_DEV:
 497                 return ADEID_PRIVDEV;
 498         case AD_INO:
 499                 return ADEID_PRIVINO;
 500         case AD_SYN:
 501                 return ADEID_PRIVSYN;
 502         case AD_ID:
 503                 return ADEID_PRIVID;
 504         default:
 505                 break;
 506         }
 507
 508         return 0;
 509 }
 510
 511 /**
 512  * Pack AppleDouble structure into data buffer
 513  **/
 514 static bool ad_pack(struct adouble *ad)
 515 {
 516         uint32_t       eid;
 517         uint16_t       nent;
 518         uint32_t       bufsize;
 519         uint32_t       offset = 0;
 520
 521         bufsize = talloc_get_size(ad->ad_data);
 522
 523         if (offset + ADEDLEN_MAGIC < offset ||
 524                         offset + ADEDLEN_MAGIC >= bufsize) {
 525                 return false;
 526         }
 527         RSIVAL(ad->ad_data, offset, ad->ad_magic);
 528         offset += ADEDLEN_MAGIC;
 529
 530         if (offset + ADEDLEN_VERSION < offset ||
 531                         offset + ADEDLEN_VERSION >= bufsize) {
 532                 return false;
 533         }
 534         RSIVAL(ad->ad_data, offset, ad->ad_version);
 535         offset += ADEDLEN_VERSION;
 536
 537         if (offset + ADEDLEN_FILLER < offset ||
 538                         offset + ADEDLEN_FILLER >= bufsize) {
 539                 return false;
 540         }
 541         if (ad->ad_type == ADOUBLE_RSRC) {
 542                 memcpy(ad->ad_data + offset, AD_FILLER_TAG, ADEDLEN_FILLER);
 543         }
 544         offset += ADEDLEN_FILLER;
 545
 546         if (offset + ADEDLEN_NENTRIES < offset ||
 547                         offset + ADEDLEN_NENTRIES >= bufsize) {
 548                 return false;
 549         }
 550         offset += ADEDLEN_NENTRIES;
 551
 552         for (eid = 0, nent = 0; eid < ADEID_MAX; eid++) {
 553                 if (ad->ad_eid[eid].ade_off == 0) {
 554                         /*
 555                          * ade_off is also used as indicator whether a
 556                          * specific entry is used or not
 557                          */
 558                         continue;
 559                 }
 560
 561                 if (offset + AD_ENTRY_LEN_EID < offset ||
 562                                 offset + AD_ENTRY_LEN_EID >= bufsize) {
 563                         return false;
 564                 }
 565                 RSIVAL(ad->ad_data, offset, AD_EID_DISK(eid));
 566                 offset += AD_ENTRY_LEN_EID;
 567
 568                 if (offset + AD_ENTRY_LEN_OFF < offset ||
 569                                 offset + AD_ENTRY_LEN_OFF >= bufsize) {
 570                         return false;
 571                 }
 572                 RSIVAL(ad->ad_data, offset, ad->ad_eid[eid].ade_off);
 573                 offset += AD_ENTRY_LEN_OFF;
 574
 575                 if (offset + AD_ENTRY_LEN_LEN < offset ||
 576                                 offset + AD_ENTRY_LEN_LEN >= bufsize) {
 577                         return false;
 578                 }
 579                 RSIVAL(ad->ad_data, offset, ad->ad_eid[eid].ade_len);
 580                 offset += AD_ENTRY_LEN_LEN;
 581
 582                 nent++;
 583         }
 584
 585         if (ADEDOFF_NENTRIES + 2 >= bufsize) {
 586                 return false;
 587         }
 588         RSSVAL(ad->ad_data, ADEDOFF_NENTRIES, nent);
 589
 590         return true;
 591 }
 592
 593 /**
 594  * Unpack an AppleDouble blob into a struct adoble
 595  **/
 596 static bool ad_unpack(struct adouble *ad, const size_t nentries,
 597                       size_t filesize)
 598 {
 599         size_t bufsize = talloc_get_size(ad->ad_data);
 600         size_t adentries, i;
 601         uint32_t eid, len, off;
 602
 603         /*
 604          * The size of the buffer ad->ad_data is checked when read, so
 605          * we wouldn't have to check our own offsets, a few extra
 606          * checks won't hurt though. We have to check the offsets we
 607          * read from the buffer anyway.
 608          */
 609
 610         if (bufsize < (AD_HEADER_LEN + (AD_ENTRY_LEN * nentries))) {
 611                 DEBUG(1, ("bad size\n"));
 612                 return false;
 613         }
 614
 615         ad->ad_magic = RIVAL(ad->ad_data, 0);
 616         ad->ad_version = RIVAL(ad->ad_data, ADEDOFF_VERSION);
 617         if ((ad->ad_magic != AD_MAGIC) || (ad->ad_version != AD_VERSION)) {
 618                 DEBUG(1, ("wrong magic or version\n"));
 619                 return false;
 620         }
 621
 622         adentries = RSVAL(ad->ad_data, ADEDOFF_NENTRIES);
 623         if (adentries != nentries) {
 624                 DEBUG(1, ("invalid number of entries: %zu\n",
 625                           adentries));
 626                 return false;
 627         }
 628
 629         /* now, read in the entry bits */
 630         for (i = 0; i < adentries; i++) {
 631                 eid = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN));
 632                 eid = get_eid(eid);
 633                 off = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN) + 4);
 634                 len = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN) + 8);
 635
 636                 if (!eid || eid > ADEID_MAX) {
 637                         DEBUG(1, ("bogus eid %d\n", eid));
 638                         return false;
 639                 }
 640
 641                 /*
 642                  * All entries other than the resource fork are
 643                  * expected to be read into the ad_data buffer, so
 644                  * ensure the specified offset is within that bound
 645                  */
 646                 if ((off > bufsize) && (eid != ADEID_RFORK)) {
 647                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 648                                   eid, off, len));
 649                         return false;
 650                 }
 651
 652                 /*
 653                  * All entries besides FinderInfo and resource fork
 654                  * must fit into the buffer. FinderInfo is special as
 655                  * it may be larger then the default 32 bytes (if it
 656                  * contains marshalled xattrs), but we will fixup that
 657                  * in ad_convert(). And the resource fork is never
 658                  * accessed directly by the ad_data buf (also see
 659                  * comment above) anyway.
 660                  */
 661                 if ((eid != ADEID_RFORK) &&
 662                     (eid != ADEID_FINDERI) &&
 663                     ((off + len) > bufsize)) {
 664                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 665                                   eid, off, len));
 666                         return false;
 667                 }
 668
 669                 /*
 670                  * That would be obviously broken
 671                  */
 672                 if (off > filesize) {
 673                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 674                                   eid, off, len));
 675                         return false;
 676                 }
 677
 678                 /*
 679                  * Check for any entry that has its end beyond the
 680                  * filesize.
 681                  */
 682                 if (off + len < off) {
 683                         DEBUG(1, ("offset wrap in eid %d: off: %" PRIu32
 684                                   ", len: %" PRIu32 "\n",
 685                                   eid, off, len));
 686                         return false;
 687
 688                 }
 689                 if (off + len > filesize) {
 690                         /*
 691                          * If this is the resource fork entry, we fix
 692                          * up the length, for any other entry we bail
 693                          * out.
 694                          */
 695                         if (eid != ADEID_RFORK) {
 696                                 DEBUG(1, ("bogus eid %d: off: %" PRIu32
 697                                           ", len: %" PRIu32 "\n",
 698                                           eid, off, len));
 699                                 return false;
 700                         }
 701
 702                         /*
 703                          * Fixup the resource fork entry by limiting
 704                          * the size to entryoffset - filesize.
 705                          */
 706                         len = filesize - off;
 707                         DEBUG(1, ("Limiting ADEID_RFORK: off: %" PRIu32
 708                                   ", len: %" PRIu32 "\n", off, len));
 709                 }
 710
 711                 ad->ad_eid[eid].ade_off = off;
 712                 ad->ad_eid[eid].ade_len = len;
 713         }
 714
 715         return true;
 716 }
 717
 718 /**
 719  * Convert from Apple's ._ file to Netatalk
 720  *
 721  * Apple's AppleDouble may contain a FinderInfo entry longer then 32
 722  * bytes containing packed xattrs. Netatalk can't deal with that, so
 723  * we simply discard the packed xattrs.
 724  *
 725  * @return -1 in case an error occurred, 0 if no conversion was done, 1
 726  * otherwise
 727  **/
 728 static int ad_convert(struct adouble *ad, int fd)
 729 {
 730         int rc = 0;
 731         char *map = MAP_FAILED;
 732         size_t origlen;
 733
 734         origlen = ad_getentryoff(ad, ADEID_RFORK) +
 735                 ad_getentrylen(ad, ADEID_RFORK);
 736
 737         /* FIXME: direct use of mmap(), vfs_aio_fork does it too */
 738         map = mmap(NULL, origlen, PROT_READ|PROT_WRITE, MAP_SHARED, fd, 0);
 739         if (map == MAP_FAILED) {
 740                 DEBUG(2, ("mmap AppleDouble: %s\n", strerror(errno)));
 741                 rc = -1;
 742                 goto exit;
 743         }
 744
 745         if (ad_getentrylen(ad, ADEID_RFORK) > 0) {
 746                 memmove(map + ad_getentryoff(ad, ADEID_FINDERI) + ADEDLEN_FINDERI,
 747                         map + ad_getentryoff(ad, ADEID_RFORK),
 748                         ad_getentrylen(ad, ADEID_RFORK));
 749         }
 750
 751         ad_setentrylen(ad, ADEID_FINDERI, ADEDLEN_FINDERI);
 752         ad_setentryoff(ad, ADEID_RFORK,
 753                        ad_getentryoff(ad, ADEID_FINDERI) + ADEDLEN_FINDERI);
 754
 755         /*
 756          * FIXME: direct ftruncate(), but we don't have a fsp for the
 757          * VFS call
 758          */
 759         rc = ftruncate(fd, ad_getentryoff(ad, ADEID_RFORK)
 760                        + ad_getentrylen(ad, ADEID_RFORK));
 761
 762 exit:
 763         if (map != MAP_FAILED) {
 764                 munmap(map, origlen);
 765         }
 766         return rc;
 767 }
 768
 769 /**
 770  * Read and parse Netatalk AppleDouble metadata xattr
 771  **/
 772 static ssize_t ad_header_read_meta(struct adouble *ad, const char *path)
 773 {
 774         int      rc = 0;
 775         ssize_t  ealen;
 776         bool     ok;
 777
 778         DEBUG(10, ("reading meta xattr for %s\n", path));
 779
 780         ealen = SMB_VFS_GETXATTR(ad->ad_handle->conn, path,
 781                                  AFPINFO_EA_NETATALK, ad->ad_data,
 782                                  AD_DATASZ_XATTR);
 783         if (ealen == -1) {
 784                 switch (errno) {
 785                 case ENOATTR:
 786                 case ENOENT:
 787                         if (errno == ENOATTR) {
 788                                 errno = ENOENT;
 789                         }
 790                         rc = -1;
 791                         goto exit;
 792                 default:
 793                         DEBUG(2, ("error reading meta xattr: %s\n",
 794                                   strerror(errno)));
 795                         rc = -1;
 796                         goto exit;
 797                 }
 798         }
 799         if (ealen != AD_DATASZ_XATTR) {
 800                 DEBUG(2, ("bad size %zd\n", ealen));
 801                 errno = EINVAL;
 802                 rc = -1;
 803                 goto exit;
 804         }
 805
 806         /* Now parse entries */
 807         ok = ad_unpack(ad, ADEID_NUM_XATTR, AD_DATASZ_XATTR);
 808         if (!ok) {
 809                 DEBUG(2, ("invalid AppleDouble metadata xattr\n"));
 810                 errno = EINVAL;
 811                 rc = -1;
 812                 goto exit;
 813         }
 814
 815         if (!ad_getentryoff(ad, ADEID_FINDERI)
 816             || !ad_getentryoff(ad, ADEID_COMMENT)
 817             || !ad_getentryoff(ad, ADEID_FILEDATESI)
 818             || !ad_getentryoff(ad, ADEID_AFPFILEI)
 819             || !ad_getentryoff(ad, ADEID_PRIVDEV)
 820             || !ad_getentryoff(ad, ADEID_PRIVINO)
 821             || !ad_getentryoff(ad, ADEID_PRIVSYN)
 822             || !ad_getentryoff(ad, ADEID_PRIVID)) {
 823                 DEBUG(2, ("invalid AppleDouble metadata xattr\n"));
 824                 errno = EINVAL;
 825                 rc = -1;
 826                 goto exit;
 827         }
 828
 829 exit:
 830         DEBUG(10, ("reading meta xattr for %s, rc: %d\n", path, rc));
 831
 832         if (rc != 0) {
 833                 ealen = -1;
 834                 if (errno == EINVAL) {
 835                         become_root();
 836                         removexattr(path, AFPINFO_EA_NETATALK);
 837                         unbecome_root();
 838                         errno = ENOENT;
 839                 }
 840         }
 841         return ealen;
 842 }
 843
 844 /**
 845  * Read and parse resource fork, either ._ AppleDouble file or xattr
 846  **/
 847 static ssize_t ad_header_read_rsrc(struct adouble *ad, const char *path)
 848 {
 849         struct fruit_config_data *config = NULL;
 850         int fd = -1;
 851         int rc = 0;
 852         ssize_t len;
 853         char *adpath = NULL;
 854         bool opened = false;
 855         int mode;
 856         struct adouble *meta_ad = NULL;
 857         SMB_STRUCT_STAT sbuf;
 858         bool ok;
 859         int saved_errno = 0;
 860
 861         SMB_VFS_HANDLE_GET_DATA(ad->ad_handle, config,
 862                                 struct fruit_config_data, return -1);
 863
 864         /* Try rw first so we can use the fd in ad_convert() */
 865         mode = O_RDWR;
 866
 867         if (ad->ad_fsp && ad->ad_fsp->fh && (ad->ad_fsp->fh->fd != -1)) {
 868                 fd = ad->ad_fsp->fh->fd;
 869         } else {
 870                 if (config->rsrc == FRUIT_RSRC_XATTR) {
 871                         adpath = talloc_strdup(talloc_tos(), path);
 872                 } else {
 873                         rc = adouble_path(talloc_tos(), path, &adpath);
 874                         if (rc != 0) {
 875                                 goto exit;
 876                         }
 877                 }
 878
 879         retry:
 880                 if (config->rsrc == FRUIT_RSRC_XATTR) {
 881 #ifndef HAVE_ATTROPEN
 882                         errno = ENOSYS;
 883                         rc = -1;
 884                         goto exit;
 885 #else
 886                         /* FIXME: direct Solaris xattr syscall */
 887                         fd = attropen(adpath, AFPRESOURCE_EA_NETATALK,
 888                                       mode, 0);
 889 #endif
 890                 } else {
 891                         /* FIXME: direct open(), don't have an fsp */
 892                         fd = open(adpath, mode);
 893                 }
 894
 895                 if (fd == -1) {
 896                         switch (errno) {
 897                         case EROFS:
 898                         case EACCES:
 899                                 if (mode == O_RDWR) {
 900                                         mode = O_RDONLY;
 901                                         goto retry;
 902                                 }
 903                                 /* fall through ... */
 904                         default:
 905                                 DEBUG(2, ("open AppleDouble: %s, %s\n",
 906                                           adpath, strerror(errno)));
 907                                 rc = -1;
 908                                 goto exit;
 909                         }
 910                 }
 911                 opened = true;
 912         }
 913
 914         if (config->rsrc == FRUIT_RSRC_XATTR) {
 915                 /* FIXME: direct sys_fstat(), don't have an fsp */
 916                 rc = sys_fstat(
 917                         fd, &sbuf,
 918                         lp_fake_directory_create_times(
 919                                 SNUM(ad->ad_handle->conn)));
 920                 if (rc != 0) {
 921                         goto exit;
 922                 }
 923                 len = sbuf.st_ex_size;
 924                 ad_setentrylen(ad, ADEID_RFORK, len);
 925         } else {
 926                 /* FIXME: direct sys_pread(), don't have an fsp */
 927                 len = sys_pread(fd, ad->ad_data, AD_DATASZ_DOT_UND, 0);
 928                 if (len != AD_DATASZ_DOT_UND) {
 929                         DEBUG(2, ("%s: bad size: %zd\n",
 930                                   strerror(errno), len));
 931                         rc = -1;
 932                         goto exit;
 933                 }
 934
 935                 /* FIXME: direct sys_fstat(), we don't have an fsp */
 936                 rc = sys_fstat(fd, &sbuf,
 937                                lp_fake_directory_create_times(
 938                                        SNUM(ad->ad_handle->conn)));
 939                 if (rc != 0) {
 940                         goto exit;
 941                 }
 942
 943                 /* Now parse entries */
 944                 ok = ad_unpack(ad, ADEID_NUM_DOT_UND, sbuf.st_ex_size);
 945                 if (!ok) {
 946                         DEBUG(1, ("invalid AppleDouble resource %s\n", path));
 947                         errno = EINVAL;
 948                         rc = -1;
 949                         goto exit;
 950                 }
 951
 952                 if ((ad_getentryoff(ad, ADEID_FINDERI)
 953                      != ADEDOFF_FINDERI_DOT_UND)
 954                     || (ad_getentrylen(ad, ADEID_FINDERI)
 955                         < ADEDLEN_FINDERI)
 956                     || (ad_getentryoff(ad, ADEID_RFORK)
 957                         < ADEDOFF_RFORK_DOT_UND)) {
 958                         DEBUG(2, ("invalid AppleDouble resource %s\n", path));
 959                         errno = EINVAL;
 960                         rc = -1;
 961                         goto exit;
 962                 }
 963
 964                 if ((mode == O_RDWR)
 965                     && (ad_getentrylen(ad, ADEID_FINDERI) > ADEDLEN_FINDERI)) {
 966                         char *p_ad = NULL;
 967                         char *p_meta_ad = NULL;
 968
 969                         rc = ad_convert(ad, fd);
 970                         if (rc != 0) {
 971                                 rc = -1;
 972                                 goto exit;
 973                         }
 974                         /*
 975                          * Can't use ad_write() because we might not have a fsp
 976                          */
 977                         ok = ad_pack(ad);
 978                         if (!ok) {
 979                                 rc = -1;
 980                                 goto exit;
 981                         }
 982                         /* FIXME: direct sys_pwrite(), don't have an fsp */
 983                         len = sys_pwrite(fd, ad->ad_data,
 984                                          AD_DATASZ_DOT_UND, 0);
 985                         if (len != AD_DATASZ_DOT_UND) {
 986                                 DEBUG(2, ("%s: bad size: %zd\n", adpath, len));
 987                                 rc = -1;
 988                                 goto exit;
 989                         }
 990
 991                         meta_ad = ad_init(talloc_tos(), ad->ad_handle,
 992                                           ADOUBLE_META, NULL);
 993                         if (meta_ad == NULL) {
 994                                 rc = -1;
 995                                 goto exit;
 996                         }
 997
 998                         p_ad = ad_get_entry(ad, ADEID_FINDERI);
 999                         if (p_ad == NULL) {
1000                                 rc = -1;
1001                                 goto exit;
1002                         }
1003                         p_meta_ad = ad_get_entry(meta_ad, ADEID_FINDERI);
1004                         if (p_meta_ad == NULL) {
1005                                 rc = -1;
1006                                 goto exit;
1007                         }
1008
1009                         memcpy(p_meta_ad, p_ad, ADEDLEN_FINDERI);
1010
1011                         rc = ad_write(meta_ad, path);
1012                         if (rc != 0) {
1013                                 rc = -1;
1014                                 goto exit;
1015                         }
1016                 }
1017         }
1018
1019         DEBUG(10, ("opened AppleDouble: %s\n", path));
1020
1021 exit:
1022         if (rc != 0) {
1023                 saved_errno = errno;
1024                 len = -1;
1025         }
1026         if (opened && fd != -1) {
1027                 close(fd);
1028         }
1029         TALLOC_FREE(adpath);
1030         TALLOC_FREE(meta_ad);
1031         if (rc != 0) {
1032                 errno = saved_errno;
1033         }
1034         return len;
1035 }
1036
1037 /**
1038  * Read and unpack an AppleDouble metadata xattr or resource
1039  **/
1040 static ssize_t ad_read(struct adouble *ad, const char *path)
1041 {
1042         switch (ad->ad_type) {
1043         case ADOUBLE_META:
1044                 return ad_header_read_meta(ad, path);
1045         case ADOUBLE_RSRC:
1046                 return ad_header_read_rsrc(ad, path);
1047         default:
1048                 return -1;
1049         }
1050 }
1051
1052 /**
1053  * Allocate a struct adouble without initialiing it
1054  *
1055  * The struct is either hang of the fsp extension context or if fsp is
1056  * NULL from ctx.
1057  *
1058  * @param[in] ctx        talloc context
1059  * @param[in] handle     vfs handle
1060  * @param[in] type       type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1061
1062  * @param[in] fsp        if not NULL (for stream IO), the adouble handle is
1063  *                       added as an fsp extension
1064  *
1065  * @return               adouble handle
1066  **/
1067 static struct adouble *ad_alloc(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1068                                 adouble_type_t type, files_struct *fsp)
1069 {
1070         int rc = 0;
1071         size_t adsize = 0;
1072         struct adouble *ad;
1073         struct fruit_config_data *config;
1074
1075         SMB_VFS_HANDLE_GET_DATA(handle, config,
1076                                 struct fruit_config_data, return NULL);
1077
1078         switch (type) {
1079         case ADOUBLE_META:
1080                 adsize = AD_DATASZ_XATTR;
1081                 break;
1082         case ADOUBLE_RSRC:
1083                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
1084                         adsize = AD_DATASZ_DOT_UND;
1085                 }
1086                 break;
1087         default:
1088                 return NULL;
1089         }
1090
1091         if (!fsp) {
1092                 ad = talloc_zero(ctx, struct adouble);
1093                 if (ad == NULL) {
1094                         rc = -1;
1095                         goto exit;
1096                 }
1097                 if (adsize) {
1098                         ad->ad_data = talloc_zero_array(ad, char, adsize);
1099                 }
1100         } else {
1101                 ad = (struct adouble *)VFS_ADD_FSP_EXTENSION(handle, fsp,
1102                                                              struct adouble,
1103                                                              NULL);
1104                 if (ad == NULL) {
1105                         rc = -1;
1106                         goto exit;
1107                 }
1108                 if (adsize) {
1109                         ad->ad_data = talloc_zero_array(
1110                                 VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
1111                                 char, adsize);
1112                 }
1113                 ad->ad_fsp = fsp;
1114         }
1115
1116         if (adsize && ad->ad_data == NULL) {
1117                 rc = -1;
1118                 goto exit;
1119         }
1120         ad->ad_handle = handle;
1121         ad->ad_type = type;
1122         ad->ad_magic = AD_MAGIC;
1123         ad->ad_version = AD_VERSION;
1124
1125 exit:
1126         if (rc != 0) {
1127                 TALLOC_FREE(ad);
1128         }
1129         return ad;
1130 }
1131
1132 /**
1133  * Allocate and initialize a new struct adouble
1134  *
1135  * @param[in] ctx        talloc context
1136  * @param[in] handle     vfs handle
1137  * @param[in] type       type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1138  * @param[in] fsp        file handle, may be NULL for a type of e_ad_meta
1139  *
1140  * @return               adouble handle, initialized
1141  **/
1142 static struct adouble *ad_init(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1143                                adouble_type_t type, files_struct *fsp)
1144 {
1145         int rc = 0;
1146         const struct ad_entry_order  *eid;
1147         struct adouble *ad = NULL;
1148         struct fruit_config_data *config;
1149         time_t t = time(NULL);
1150
1151         SMB_VFS_HANDLE_GET_DATA(handle, config,
1152                                 struct fruit_config_data, return NULL);
1153
1154         switch (type) {
1155         case ADOUBLE_META:
1156                 eid = entry_order_meta_xattr;
1157                 break;
1158         case ADOUBLE_RSRC:
1159                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
1160                         eid = entry_order_dot_und;
1161                 } else {
1162                         eid = entry_order_rsrc_xattr;
1163                 }
1164                 break;
1165         default:
1166                 return NULL;
1167         }
1168
1169         ad = ad_alloc(ctx, handle, type, fsp);
1170         if (ad == NULL) {
1171                 return NULL;
1172         }
1173
1174         while (eid->id) {
1175                 ad->ad_eid[eid->id].ade_off = eid->offset;
1176                 ad->ad_eid[eid->id].ade_len = eid->len;
1177                 eid++;
1178         }
1179
1180         /* put something sane in the date fields */
1181         ad_setdate(ad, AD_DATE_CREATE | AD_DATE_UNIX, t);
1182         ad_setdate(ad, AD_DATE_MODIFY | AD_DATE_UNIX, t);
1183         ad_setdate(ad, AD_DATE_ACCESS | AD_DATE_UNIX, t);
1184         ad_setdate(ad, AD_DATE_BACKUP, htonl(AD_DATE_START));
1185
1186         if (rc != 0) {
1187                 TALLOC_FREE(ad);
1188         }
1189         return ad;
1190 }
1191
1192 /**
1193  * Return AppleDouble data for a file
1194  *
1195  * @param[in] ctx      talloc context
1196  * @param[in] handle   vfs handle
1197  * @param[in] path     pathname to file or directory
1198  * @param[in] type     type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1199  *
1200  * @return             talloced struct adouble or NULL on error
1201  **/
1202 static struct adouble *ad_get(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1203                               const char *path, adouble_type_t type)
1204 {
1205         int rc = 0;
1206         ssize_t len;
1207         struct adouble *ad = NULL;
1208
1209         DEBUG(10, ("ad_get(%s) called for %s\n",
1210                    type == ADOUBLE_META ? "meta" : "rsrc", path));
1211
1212         ad = ad_alloc(ctx, handle, type, NULL);
1213         if (ad == NULL) {
1214                 rc = -1;
1215                 goto exit;
1216         }
1217
1218         len = ad_read(ad, path);
1219         if (len == -1) {
1220                 DEBUG(10, ("error reading AppleDouble for %s\n", path));
1221                 rc = -1;
1222                 goto exit;
1223         }
1224
1225 exit:
1226         DEBUG(10, ("ad_get(%s) for %s returning %d\n",
1227                   type == ADOUBLE_META ? "meta" : "rsrc", path, rc));
1228
1229         if (rc != 0) {
1230                 TALLOC_FREE(ad);
1231         }
1232         return ad;
1233 }
1234
1235 /**
1236  * Set AppleDouble metadata on a file or directory
1237  *
1238  * @param[in] ad      adouble handle
1239
1240  * @param[in] path    pathname to file or directory, may be NULL for a
1241  *                    resource fork
1242  *
1243  * @return            status code, 0 means success
1244  **/
1245 static int ad_write(struct adouble *ad, const char *path)
1246 {
1247         int rc = 0;
1248         ssize_t len;
1249         bool ok;
1250
1251         ok = ad_pack(ad);
1252         if (!ok) {
1253                 return -1;
1254         }
1255
1256         switch (ad->ad_type) {
1257         case ADOUBLE_META:
1258                 rc = SMB_VFS_SETXATTR(ad->ad_handle->conn, path,
1259                                       AFPINFO_EA_NETATALK, ad->ad_data,
1260                                       AD_DATASZ_XATTR, 0);
1261                 break;
1262         case ADOUBLE_RSRC:
1263                 if ((ad->ad_fsp == NULL)
1264                     || (ad->ad_fsp->fh == NULL)
1265                     || (ad->ad_fsp->fh->fd == -1)) {
1266                         rc = -1;
1267                         goto exit;
1268                 }
1269                 /* FIXME: direct sys_pwrite(), don't have an fsp */
1270                 len = sys_pwrite(ad->ad_fsp->fh->fd, ad->ad_data,
1271                                  talloc_get_size(ad->ad_data), 0);
1272                 if (len != talloc_get_size(ad->ad_data)) {
1273                         DEBUG(1, ("short write on %s: %zd",
1274                                   fsp_str_dbg(ad->ad_fsp), len));
1275                         rc = -1;
1276                         goto exit;
1277                 }
1278                 break;
1279         default:
1280                 return -1;
1281         }
1282 exit:
1283         return rc;
1284 }
1285
1286 /*****************************************************************************
1287  * Helper functions
1288  *****************************************************************************/
1289
1290 static bool is_afpinfo_stream(const struct smb_filename *smb_fname)
1291 {
1292         if (strncasecmp_m(smb_fname->stream_name,
1293                           AFPINFO_STREAM_NAME,
1294                           strlen(AFPINFO_STREAM_NAME)) == 0) {
1295                 return true;
1296         }
1297         return false;
1298 }
1299
1300 static bool is_afpresource_stream(const struct smb_filename *smb_fname)
1301 {
1302         if (strncasecmp_m(smb_fname->stream_name,
1303                           AFPRESOURCE_STREAM_NAME,
1304                           strlen(AFPRESOURCE_STREAM_NAME)) == 0) {
1305                 return true;
1306         }
1307         return false;
1308 }
1309
1310 /**
1311  * Test whether stream is an Apple stream, not used atm
1312  **/
1313 #if 0
1314 static bool is_apple_stream(const struct smb_filename *smb_fname)
1315 {
1316         if (is_afpinfo_stream(smb_fname)) {
1317                 return true;
1318         }
1319         if (is_afpresource_stream(smb_fname)) {
1320                 return true;
1321         }
1322         return false;
1323 }
1324 #endif
1325
1326 /**
1327  * Initialize config struct from our smb.conf config parameters
1328  **/
1329 static int init_fruit_config(vfs_handle_struct *handle)
1330 {
1331         struct fruit_config_data *config;
1332         int enumval;
1333
1334         config = talloc_zero(handle->conn, struct fruit_config_data);
1335         if (!config) {
1336                 DEBUG(1, ("talloc_zero() failed\n"));
1337                 errno = ENOMEM;
1338                 return -1;
1339         }
1340
1341         /*
1342          * Versions up to Samba 4.5.x had a spelling bug in the
1343          * fruit:resource option calling lp_parm_enum with
1344          * "res*s*ource" (ie two s).
1345          *
1346          * In Samba 4.6 we accept both the wrong and the correct
1347          * spelling, in Samba 4.7 the bad spelling will be removed.
1348          */
1349         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1350                                "ressource", fruit_rsrc, FRUIT_RSRC_ADFILE);
1351         if (enumval == -1) {
1352                 DEBUG(1, ("value for %s: resource type unknown\n",
1353                           FRUIT_PARAM_TYPE_NAME));
1354                 return -1;
1355         }
1356         config->rsrc = (enum fruit_rsrc)enumval;
1357
1358         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1359                                "resource", fruit_rsrc, enumval);
1360         if (enumval == -1) {
1361                 DEBUG(1, ("value for %s: resource type unknown\n",
1362                           FRUIT_PARAM_TYPE_NAME));
1363                 return -1;
1364         }
1365         config->rsrc = (enum fruit_rsrc)enumval;
1366
1367         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1368                                "metadata", fruit_meta, FRUIT_META_NETATALK);
1369         if (enumval == -1) {
1370                 DEBUG(1, ("value for %s: metadata type unknown\n",
1371                           FRUIT_PARAM_TYPE_NAME));
1372                 return -1;
1373         }
1374         config->meta = (enum fruit_meta)enumval;
1375
1376         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1377                                "locking", fruit_locking, FRUIT_LOCKING_NONE);
1378         if (enumval == -1) {
1379                 DEBUG(1, ("value for %s: locking type unknown\n",
1380                           FRUIT_PARAM_TYPE_NAME));
1381                 return -1;
1382         }
1383         config->locking = (enum fruit_locking)enumval;
1384
1385         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1386                                "encoding", fruit_encoding, FRUIT_ENC_PRIVATE);
1387         if (enumval == -1) {
1388                 DEBUG(1, ("value for %s: encoding type unknown\n",
1389                           FRUIT_PARAM_TYPE_NAME));
1390                 return -1;
1391         }
1392         config->encoding = (enum fruit_encoding)enumval;
1393
1394         config->veto_appledouble = lp_parm_bool(
1395                 SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1396                 "veto_appledouble", true);
1397
1398         config->use_aapl = lp_parm_bool(
1399                 -1, FRUIT_PARAM_TYPE_NAME, "aapl", true);
1400
1401         config->unix_info_enabled = lp_parm_bool(
1402                 -1, FRUIT_PARAM_TYPE_NAME, "nfs_aces", true);
1403
1404         config->use_copyfile = lp_parm_bool(-1, FRUIT_PARAM_TYPE_NAME,
1405                                            "copyfile", false);
1406
1407         config->posix_rename = lp_parm_bool(
1408                 SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME, "posix_rename", true);
1409
1410         config->readdir_attr_rsize = lp_parm_bool(
1411                 SNUM(handle->conn), "readdir_attr", "aapl_rsize", true);
1412
1413         config->readdir_attr_finder_info = lp_parm_bool(
1414                 SNUM(handle->conn), "readdir_attr", "aapl_finder_info", true);
1415
1416         config->readdir_attr_max_access = lp_parm_bool(
1417                 SNUM(handle->conn), "readdir_attr", "aapl_max_access", true);
1418
1419         SMB_VFS_HANDLE_SET_DATA(handle, config,
1420                                 NULL, struct fruit_config_data,
1421                                 return -1);
1422
1423         return 0;
1424 }
1425
1426 /**
1427  * Prepend "._" to a basename
1428  **/
1429 static int adouble_path(TALLOC_CTX *ctx, const char *path_in, char **path_out)
1430 {
1431         char *parent;
1432         const char *base;
1433
1434         if (!parent_dirname(ctx, path_in, &parent, &base)) {
1435                 return -1;
1436         }
1437
1438         *path_out = talloc_asprintf(ctx, "%s/._%s", parent, base);
1439         if (*path_out == NULL) {
1440                 return -1;
1441         }
1442
1443         return 0;
1444 }
1445
1446 /**
1447  * Allocate and initialize an AfpInfo struct
1448  **/
1449 static AfpInfo *afpinfo_new(TALLOC_CTX *ctx)
1450 {
1451         AfpInfo *ai = talloc_zero(ctx, AfpInfo);
1452         if (ai == NULL) {
1453                 return NULL;
1454         }
1455         ai->afpi_Signature = AFP_Signature;
1456         ai->afpi_Version = AFP_Version;
1457         ai->afpi_BackupTime = AD_DATE_START;
1458         return ai;
1459 }
1460
1461 /**
1462  * Pack an AfpInfo struct into a buffer
1463  *
1464  * Buffer size must be at least AFP_INFO_SIZE
1465  * Returns size of packed buffer
1466  **/
1467 static ssize_t afpinfo_pack(const AfpInfo *ai, char *buf)
1468 {
1469         memset(buf, 0, AFP_INFO_SIZE);
1470
1471         RSIVAL(buf, 0, ai->afpi_Signature);
1472         RSIVAL(buf, 4, ai->afpi_Version);
1473         RSIVAL(buf, 12, ai->afpi_BackupTime);
1474         memcpy(buf + 16, ai->afpi_FinderInfo, sizeof(ai->afpi_FinderInfo));
1475
1476         return AFP_INFO_SIZE;
1477 }
1478
1479 /**
1480  * Unpack a buffer into a AfpInfo structure
1481  *
1482  * Buffer size must be at least AFP_INFO_SIZE
1483  * Returns allocated AfpInfo struct
1484  **/
1485 static AfpInfo *afpinfo_unpack(TALLOC_CTX *ctx, const void *data)
1486 {
1487         AfpInfo *ai = talloc_zero(ctx, AfpInfo);
1488         if (ai == NULL) {
1489                 return NULL;
1490         }
1491
1492         ai->afpi_Signature = RIVAL(data, 0);
1493         ai->afpi_Version = RIVAL(data, 4);
1494         ai->afpi_BackupTime = RIVAL(data, 12);
1495         memcpy(ai->afpi_FinderInfo, (const char *)data + 16,
1496                sizeof(ai->afpi_FinderInfo));
1497
1498         if (ai->afpi_Signature != AFP_Signature
1499             || ai->afpi_Version != AFP_Version) {
1500                 DEBUG(1, ("Bad AfpInfo signature or version\n"));
1501                 TALLOC_FREE(ai);
1502         }
1503
1504         return ai;
1505 }
1506
1507 /**
1508  * Fake an inode number from the md5 hash of the (xattr) name
1509  **/
1510 static SMB_INO_T fruit_inode(const SMB_STRUCT_STAT *sbuf, const char *sname)
1511 {
1512         MD5_CTX ctx;
1513         unsigned char hash[16];
1514         SMB_INO_T result;
1515         char *upper_sname;
1516
1517         upper_sname = talloc_strdup_upper(talloc_tos(), sname);
1518         SMB_ASSERT(upper_sname != NULL);
1519
1520         MD5Init(&ctx);
1521         MD5Update(&ctx, (const unsigned char *)&(sbuf->st_ex_dev),
1522                   sizeof(sbuf->st_ex_dev));
1523         MD5Update(&ctx, (const unsigned char *)&(sbuf->st_ex_ino),
1524                   sizeof(sbuf->st_ex_ino));
1525         MD5Update(&ctx, (unsigned char *)upper_sname,
1526                   talloc_get_size(upper_sname)-1);
1527         MD5Final(hash, &ctx);
1528
1529         TALLOC_FREE(upper_sname);
1530
1531         /* Hopefully all the variation is in the lower 4 (or 8) bytes! */
1532         memcpy(&result, hash, sizeof(result));
1533
1534         DEBUG(10, ("fruit_inode \"%s\": ino=0x%llu\n",
1535                    sname, (unsigned long long)result));
1536
1537         return result;
1538 }
1539
1540 /**
1541  * Ensure ad_fsp is still valid
1542  **/
1543 static bool fruit_fsp_recheck(struct adouble *ad, files_struct *fsp)
1544 {
1545         if (ad->ad_fsp == fsp) {
1546                 return true;
1547         }
1548         ad->ad_fsp = fsp;
1549
1550         return true;
1551 }
1552
1553 static bool add_fruit_stream(TALLOC_CTX *mem_ctx, unsigned int *num_streams,
1554                              struct stream_struct **streams,
1555                              const char *name, off_t size,
1556                              off_t alloc_size)
1557 {
1558         struct stream_struct *tmp;
1559
1560         tmp = talloc_realloc(mem_ctx, *streams, struct stream_struct,
1561                              (*num_streams)+1);
1562         if (tmp == NULL) {
1563                 return false;
1564         }
1565
1566         tmp[*num_streams].name = talloc_asprintf(tmp, "%s:$DATA", name);
1567         if (tmp[*num_streams].name == NULL) {
1568                 return false;
1569         }
1570
1571         tmp[*num_streams].size = size;
1572         tmp[*num_streams].alloc_size = alloc_size;
1573
1574         *streams = tmp;
1575         *num_streams += 1;
1576         return true;
1577 }
1578
1579 static bool filter_empty_rsrc_stream(unsigned int *num_streams,
1580                                      struct stream_struct **streams)
1581 {
1582         struct stream_struct *tmp = *streams;
1583         unsigned int i;
1584
1585         if (*num_streams == 0) {
1586                 return true;
1587         }
1588
1589         for (i = 0; i < *num_streams; i++) {
1590                 if (strequal_m(tmp[i].name, AFPRESOURCE_STREAM)) {
1591                         break;
1592                 }
1593         }
1594
1595         if (i == *num_streams) {
1596                 return true;
1597         }
1598
1599         if (tmp[i].size > 0) {
1600                 return true;
1601         }
1602
1603         TALLOC_FREE(tmp[i].name);
1604         if (*num_streams - 1 > i) {
1605                 memmove(&tmp[i], &tmp[i+1],
1606                         (*num_streams - i - 1) * sizeof(struct stream_struct));
1607         }
1608
1609         *num_streams -= 1;
1610         return true;
1611 }
1612
1613 static bool del_fruit_stream(TALLOC_CTX *mem_ctx, unsigned int *num_streams,
1614                              struct stream_struct **streams,
1615                              const char *name)
1616 {
1617         struct stream_struct *tmp = *streams;
1618         unsigned int i;
1619
1620         if (*num_streams == 0) {
1621                 return true;
1622         }
1623
1624         for (i = 0; i < *num_streams; i++) {
1625                 if (strequal_m(tmp[i].name, name)) {
1626                         break;
1627                 }
1628         }
1629
1630         if (i == *num_streams) {
1631                 return true;
1632         }
1633
1634         TALLOC_FREE(tmp[i].name);
1635         if (*num_streams - 1 > i) {
1636                 memmove(&tmp[i], &tmp[i+1],
1637                         (*num_streams - i - 1) * sizeof(struct stream_struct));
1638         }
1639
1640         *num_streams -= 1;
1641         return true;
1642 }
1643
1644 static bool ad_empty_finderinfo(const struct adouble *ad)
1645 {
1646         int cmp;
1647         char emptybuf[ADEDLEN_FINDERI] = {0};
1648         char *fi = NULL;
1649
1650         fi = ad_get_entry(ad, ADEID_FINDERI);
1651         if (fi == NULL) {
1652                 DBG_ERR("Missing FinderInfo in struct adouble [%p]\n", ad);
1653                 return false;
1654         }
1655
1656         cmp = memcmp(emptybuf, fi, ADEDLEN_FINDERI);
1657         return (cmp == 0);
1658 }
1659
1660 static bool ai_empty_finderinfo(const AfpInfo *ai)
1661 {
1662         int cmp;
1663         char emptybuf[ADEDLEN_FINDERI] = {0};
1664
1665         cmp = memcmp(emptybuf, &ai->afpi_FinderInfo[0], ADEDLEN_FINDERI);
1666         return (cmp == 0);
1667 }
1668
1669 /**
1670  * Update btime with btime from Netatalk
1671  **/
1672 static void update_btime(vfs_handle_struct *handle,
1673                          struct smb_filename *smb_fname)
1674 {
1675         uint32_t t;
1676         struct timespec creation_time = {0};
1677         struct adouble *ad;
1678         struct fruit_config_data *config = NULL;
1679
1680         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
1681                                 return);
1682
1683         switch (config->meta) {
1684         case FRUIT_META_STREAM:
1685                 return;
1686         case FRUIT_META_NETATALK:
1687                 /* Handled below */
1688                 break;
1689         default:
1690                 DBG_ERR("Unexpected meta config [%d]\n", config->meta);
1691                 return;
1692         }
1693
1694         ad = ad_get(talloc_tos(), handle, smb_fname->base_name, ADOUBLE_META);
1695         if (ad == NULL) {
1696                 return;
1697         }
1698         if (ad_getdate(ad, AD_DATE_UNIX | AD_DATE_CREATE, &t) != 0) {
1699                 TALLOC_FREE(ad);
1700                 return;
1701         }
1702         TALLOC_FREE(ad);
1703
1704         creation_time.tv_sec = convert_uint32_t_to_time_t(t);
1705         update_stat_ex_create_time(&smb_fname->st, creation_time);
1706
1707         return;
1708 }
1709
1710 /**
1711  * Map an access mask to a Netatalk single byte byte range lock
1712  **/
1713 static off_t access_to_netatalk_brl(enum apple_fork fork_type,
1714                                     uint32_t access_mask)
1715 {
1716         off_t offset;
1717
1718         switch (access_mask) {
1719         case FILE_READ_DATA:
1720                 offset = AD_FILELOCK_OPEN_RD;
1721                 break;
1722
1723         case FILE_WRITE_DATA:
1724         case FILE_APPEND_DATA:
1725                 offset = AD_FILELOCK_OPEN_WR;
1726                 break;
1727
1728         default:
1729                 offset = AD_FILELOCK_OPEN_NONE;
1730                 break;
1731         }
1732
1733         if (fork_type == APPLE_FORK_RSRC) {
1734                 if (offset == AD_FILELOCK_OPEN_NONE) {
1735                         offset = AD_FILELOCK_RSRC_OPEN_NONE;
1736                 } else {
1737                         offset += 2;
1738                 }
1739         }
1740
1741         return offset;
1742 }
1743
1744 /**
1745  * Map a deny mode to a Netatalk brl
1746  **/
1747 static off_t denymode_to_netatalk_brl(enum apple_fork fork_type,
1748                                       uint32_t deny_mode)
1749 {
1750         off_t offset;
1751
1752         switch (deny_mode) {
1753         case DENY_READ:
1754                 offset = AD_FILELOCK_DENY_RD;
1755                 break;
1756
1757         case DENY_WRITE:
1758                 offset = AD_FILELOCK_DENY_WR;
1759                 break;
1760
1761         default:
1762                 smb_panic("denymode_to_netatalk_brl: bad deny mode\n");
1763         }
1764
1765         if (fork_type == APPLE_FORK_RSRC) {
1766                 offset += 2;
1767         }
1768
1769         return offset;
1770 }
1771
1772 /**
1773  * Call fcntl() with an exclusive F_GETLK request in order to
1774  * determine if there's an exisiting shared lock
1775  *
1776  * @return true if the requested lock was found or any error occurred
1777  *         false if the lock was not found
1778  **/
1779 static bool test_netatalk_lock(files_struct *fsp, off_t in_offset)
1780 {
1781         bool result;
1782         off_t offset = in_offset;
1783         off_t len = 1;
1784         int type = F_WRLCK;
1785         pid_t pid;
1786
1787         result = SMB_VFS_GETLOCK(fsp, &offset, &len, &type, &pid);
1788         if (result == false) {
1789                 return true;
1790         }
1791
1792         if (type != F_UNLCK) {
1793                 return true;
1794         }
1795
1796         return false;
1797 }
1798
1799 static NTSTATUS fruit_check_access(vfs_handle_struct *handle,
1800                                    files_struct *fsp,
1801                                    uint32_t access_mask,
1802                                    uint32_t deny_mode)
1803 {
1804         NTSTATUS status = NT_STATUS_OK;
1805         struct byte_range_lock *br_lck = NULL;
1806         bool open_for_reading, open_for_writing, deny_read, deny_write;
1807         off_t off;
1808
1809         /* FIXME: hardcoded data fork, add resource fork */
1810         enum apple_fork fork_type = APPLE_FORK_DATA;
1811
1812         DEBUG(10, ("fruit_check_access: %s, am: %s/%s, dm: %s/%s\n",
1813                   fsp_str_dbg(fsp),
1814                   access_mask & FILE_READ_DATA ? "READ" :"-",
1815                   access_mask & FILE_WRITE_DATA ? "WRITE" : "-",
1816                   deny_mode & DENY_READ ? "DENY_READ" : "-",
1817                   deny_mode & DENY_WRITE ? "DENY_WRITE" : "-"));
1818
1819         /*
1820          * Check read access and deny read mode
1821          */
1822         if ((access_mask & FILE_READ_DATA) || (deny_mode & DENY_READ)) {
1823                 /* Check access */
1824                 open_for_reading = test_netatalk_lock(
1825                         fsp, access_to_netatalk_brl(fork_type, FILE_READ_DATA));
1826
1827                 deny_read = test_netatalk_lock(
1828                         fsp, denymode_to_netatalk_brl(fork_type, DENY_READ));
1829
1830                 DEBUG(10, ("read: %s, deny_write: %s\n",
1831                           open_for_reading == true ? "yes" : "no",
1832                           deny_read == true ? "yes" : "no"));
1833
1834                 if (((access_mask & FILE_READ_DATA) && deny_read)
1835                     || ((deny_mode & DENY_READ) && open_for_reading)) {
1836                         return NT_STATUS_SHARING_VIOLATION;
1837                 }
1838
1839                 /* Set locks */
1840                 if (access_mask & FILE_READ_DATA) {
1841                         off = access_to_netatalk_brl(fork_type, FILE_READ_DATA);
1842                         br_lck = do_lock(
1843                                 handle->conn->sconn->msg_ctx, fsp,
1844                                 fsp->op->global->open_persistent_id, 1, off,
1845                                 READ_LOCK, POSIX_LOCK, false,
1846                                 &status, NULL);
1847
1848                         if (!NT_STATUS_IS_OK(status))  {
1849                                 return status;
1850                         }
1851                         TALLOC_FREE(br_lck);
1852                 }
1853
1854                 if (deny_mode & DENY_READ) {
1855                         off = denymode_to_netatalk_brl(fork_type, DENY_READ);
1856                         br_lck = do_lock(
1857                                 handle->conn->sconn->msg_ctx, fsp,
1858                                 fsp->op->global->open_persistent_id, 1, off,
1859                                 READ_LOCK, POSIX_LOCK, false,
1860                                 &status, NULL);
1861
1862                         if (!NT_STATUS_IS_OK(status)) {
1863                                 return status;
1864                         }
1865                         TALLOC_FREE(br_lck);
1866                 }
1867         }
1868
1869         /*
1870          * Check write access and deny write mode
1871          */
1872         if ((access_mask & FILE_WRITE_DATA) || (deny_mode & DENY_WRITE)) {
1873                 /* Check access */
1874                 open_for_writing = test_netatalk_lock(
1875                         fsp, access_to_netatalk_brl(fork_type, FILE_WRITE_DATA));
1876
1877                 deny_write = test_netatalk_lock(
1878                         fsp, denymode_to_netatalk_brl(fork_type, DENY_WRITE));
1879
1880                 DEBUG(10, ("write: %s, deny_write: %s\n",
1881                           open_for_writing == true ? "yes" : "no",
1882                           deny_write == true ? "yes" : "no"));
1883
1884                 if (((access_mask & FILE_WRITE_DATA) && deny_write)
1885                     || ((deny_mode & DENY_WRITE) && open_for_writing)) {
1886                         return NT_STATUS_SHARING_VIOLATION;
1887                 }
1888
1889                 /* Set locks */
1890                 if (access_mask & FILE_WRITE_DATA) {
1891                         off = access_to_netatalk_brl(fork_type, FILE_WRITE_DATA);
1892                         br_lck = do_lock(
1893                                 handle->conn->sconn->msg_ctx, fsp,
1894                                 fsp->op->global->open_persistent_id, 1, off,
1895                                 READ_LOCK, POSIX_LOCK, false,
1896                                 &status, NULL);
1897
1898                         if (!NT_STATUS_IS_OK(status)) {
1899                                 return status;
1900                         }
1901                         TALLOC_FREE(br_lck);
1902
1903                 }
1904                 if (deny_mode & DENY_WRITE) {
1905                         off = denymode_to_netatalk_brl(fork_type, DENY_WRITE);
1906                         br_lck = do_lock(
1907                                 handle->conn->sconn->msg_ctx, fsp,
1908                                 fsp->op->global->open_persistent_id, 1, off,
1909                                 READ_LOCK, POSIX_LOCK, false,
1910                                 &status, NULL);
1911
1912                         if (!NT_STATUS_IS_OK(status)) {
1913                                 return status;
1914                         }
1915                         TALLOC_FREE(br_lck);
1916                 }
1917         }
1918
1919         TALLOC_FREE(br_lck);
1920
1921         return status;
1922 }
1923
1924 static NTSTATUS check_aapl(vfs_handle_struct *handle,
1925                            struct smb_request *req,
1926                            const struct smb2_create_blobs *in_context_blobs,
1927                            struct smb2_create_blobs *out_context_blobs)
1928 {
1929         struct fruit_config_data *config;
1930         NTSTATUS status;
1931         struct smb2_create_blob *aapl = NULL;
1932         uint32_t cmd;
1933         bool ok;
1934         uint8_t p[16];
1935         DATA_BLOB blob = data_blob_talloc(req, NULL, 0);
1936         uint64_t req_bitmap, client_caps;
1937         uint64_t server_caps = SMB2_CRTCTX_AAPL_UNIX_BASED;
1938         smb_ucs2_t *model;
1939         size_t modellen;
1940
1941         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
1942                                 return NT_STATUS_UNSUCCESSFUL);
1943
1944         if (!config->use_aapl
1945             || in_context_blobs == NULL
1946             || out_context_blobs == NULL) {
1947                 return NT_STATUS_OK;
1948         }
1949
1950         aapl = smb2_create_blob_find(in_context_blobs,
1951                                      SMB2_CREATE_TAG_AAPL);
1952         if (aapl == NULL) {
1953                 return NT_STATUS_OK;
1954         }
1955
1956         if (aapl->data.length != 24) {
1957                 DEBUG(1, ("unexpected AAPL ctxt length: %ju\n",
1958                           (uintmax_t)aapl->data.length));
1959                 return NT_STATUS_INVALID_PARAMETER;
1960         }
1961
1962         cmd = IVAL(aapl->data.data, 0);
1963         if (cmd != SMB2_CRTCTX_AAPL_SERVER_QUERY) {
1964                 DEBUG(1, ("unsupported AAPL cmd: %d\n", cmd));
1965                 return NT_STATUS_INVALID_PARAMETER;
1966         }
1967
1968         req_bitmap = BVAL(aapl->data.data, 8);
1969         client_caps = BVAL(aapl->data.data, 16);
1970
1971         SIVAL(p, 0, SMB2_CRTCTX_AAPL_SERVER_QUERY);
1972         SIVAL(p, 4, 0);
1973         SBVAL(p, 8, req_bitmap);
1974         ok = data_blob_append(req, &blob, p, 16);
1975         if (!ok) {
1976                 return NT_STATUS_UNSUCCESSFUL;
1977         }
1978
1979         if (req_bitmap & SMB2_CRTCTX_AAPL_SERVER_CAPS) {
1980                 if ((client_caps & SMB2_CRTCTX_AAPL_SUPPORTS_READ_DIR_ATTR) &&
1981                     (handle->conn->tcon->compat->fs_capabilities & FILE_NAMED_STREAMS)) {
1982                         server_caps |= SMB2_CRTCTX_AAPL_SUPPORTS_READ_DIR_ATTR;
1983                         config->readdir_attr_enabled = true;
1984                 }
1985
1986                 if (config->use_copyfile) {
1987                         server_caps |= SMB2_CRTCTX_AAPL_SUPPORTS_OSX_COPYFILE;
1988                         config->copyfile_enabled = true;
1989                 }
1990
1991                 /*
1992                  * The client doesn't set the flag, so we can't check
1993                  * for it and just set it unconditionally
1994                  */
1995                 if (config->unix_info_enabled) {
1996                         server_caps |= SMB2_CRTCTX_AAPL_SUPPORTS_NFS_ACE;
1997                 }
1998
1999                 SBVAL(p, 0, server_caps);
2000                 ok = data_blob_append(req, &blob, p, 8);
2001                 if (!ok) {
2002                         return NT_STATUS_UNSUCCESSFUL;
2003                 }
2004         }
2005
2006         if (req_bitmap & SMB2_CRTCTX_AAPL_VOLUME_CAPS) {
2007                 SBVAL(p, 0,
2008                       lp_case_sensitive(SNUM(handle->conn->tcon->compat)) ?
2009                       SMB2_CRTCTX_AAPL_CASE_SENSITIVE : 0);
2010                 ok = data_blob_append(req, &blob, p, 8);
2011                 if (!ok) {
2012                         return NT_STATUS_UNSUCCESSFUL;
2013                 }
2014         }
2015
2016         if (req_bitmap & SMB2_CRTCTX_AAPL_MODEL_INFO) {
2017                 ok = convert_string_talloc(req,
2018                                            CH_UNIX, CH_UTF16LE,
2019                                            "Samba", strlen("Samba"),
2020                                            &model, &modellen);
2021                 if (!ok) {
2022                         return NT_STATUS_UNSUCCESSFUL;
2023                 }
2024
2025                 SIVAL(p, 0, 0);
2026                 SIVAL(p + 4, 0, modellen);
2027                 ok = data_blob_append(req, &blob, p, 8);
2028                 if (!ok) {
2029                         talloc_free(model);
2030                         return NT_STATUS_UNSUCCESSFUL;
2031                 }
2032
2033                 ok = data_blob_append(req, &blob, model, modellen);
2034                 talloc_free(model);
2035                 if (!ok) {
2036                         return NT_STATUS_UNSUCCESSFUL;
2037                 }
2038         }
2039
2040         status = smb2_create_blob_add(out_context_blobs,
2041                                       out_context_blobs,
2042                                       SMB2_CREATE_TAG_AAPL,
2043                                       blob);
2044         if (NT_STATUS_IS_OK(status)) {
2045                 config->nego_aapl = true;
2046         }
2047
2048         return status;
2049 }
2050
2051 static bool readdir_attr_meta_finderi_stream(
2052         struct vfs_handle_struct *handle,
2053         const struct smb_filename *smb_fname,
2054         AfpInfo *ai)
2055 {
2056         struct smb_filename *stream_name = NULL;
2057         files_struct *fsp = NULL;
2058         ssize_t nread;
2059         NTSTATUS status;
2060         int ret;
2061         bool ok;
2062         uint8_t buf[AFP_INFO_SIZE];
2063
2064         stream_name = synthetic_smb_fname(talloc_tos(),
2065                                           smb_fname->base_name,
2066                                           AFPINFO_STREAM_NAME,
2067                                           NULL, smb_fname->flags);
2068         if (stream_name == NULL) {
2069                 return false;
2070         }
2071
2072         ret = SMB_VFS_STAT(handle->conn, stream_name);
2073         if (ret != 0) {
2074                 return false;
2075         }
2076
2077         status = SMB_VFS_CREATE_FILE(
2078                 handle->conn,                           /* conn */
2079                 NULL,                                   /* req */
2080                 0,                                      /* root_dir_fid */
2081                 stream_name,                            /* fname */
2082                 FILE_READ_DATA,                         /* access_mask */
2083                 (FILE_SHARE_READ | FILE_SHARE_WRITE |   /* share_access */
2084                         FILE_SHARE_DELETE),
2085                 FILE_OPEN,                              /* create_disposition*/
2086                 0,                                      /* create_options */
2087                 0,                                      /* file_attributes */
2088                 INTERNAL_OPEN_ONLY,                     /* oplock_request */
2089                 NULL,                                   /* lease */
2090                 0,                                      /* allocation_size */
2091                 0,                                      /* private_flags */
2092                 NULL,                                   /* sd */
2093                 NULL,                                   /* ea_list */
2094                 &fsp,                                   /* result */
2095                 NULL,                                   /* pinfo */
2096                 NULL, NULL);                            /* create context */
2097
2098         TALLOC_FREE(stream_name);
2099
2100         if (!NT_STATUS_IS_OK(status)) {
2101                 return false;
2102         }
2103
2104         nread = SMB_VFS_PREAD(fsp, &buf[0], AFP_INFO_SIZE, 0);
2105         if (nread != AFP_INFO_SIZE) {
2106                 DBG_ERR("short read [%s] [%zd/%d]\n",
2107                         smb_fname_str_dbg(stream_name), nread, AFP_INFO_SIZE);
2108                 ok = false;
2109                 goto fail;
2110         }
2111
2112         memcpy(&ai->afpi_FinderInfo[0], &buf[AFP_OFF_FinderInfo],
2113                AFP_FinderSize);
2114
2115         ok = true;
2116
2117 fail:
2118         if (fsp != NULL) {
2119                 close_file(NULL, fsp, NORMAL_CLOSE);
2120         }
2121
2122         return ok;
2123 }
2124
2125 static bool readdir_attr_meta_finderi_netatalk(
2126         struct vfs_handle_struct *handle,
2127         const struct smb_filename *smb_fname,
2128         AfpInfo *ai)
2129 {
2130         struct adouble *ad = NULL;
2131         char *p = NULL;
2132
2133         ad = ad_get(talloc_tos(), handle, smb_fname->base_name, ADOUBLE_META);
2134         if (ad == NULL) {
2135                 return false;
2136         }
2137
2138         p = ad_get_entry(ad, ADEID_FINDERI);
2139         if (p == NULL) {
2140                 DBG_ERR("No ADEID_FINDERI for [%s]\n", smb_fname->base_name);
2141                 TALLOC_FREE(ad);
2142                 return false;
2143         }
2144
2145         memcpy(&ai->afpi_FinderInfo[0], p, AFP_FinderSize);
2146         TALLOC_FREE(ad);
2147         return true;
2148 }
2149
2150 static bool readdir_attr_meta_finderi(struct vfs_handle_struct *handle,
2151                                       const struct smb_filename *smb_fname,
2152                                       struct readdir_attr_data *attr_data)
2153 {
2154         struct fruit_config_data *config = NULL;
2155         uint32_t date_added;
2156         AfpInfo ai = {0};
2157         bool ok;
2158
2159         SMB_VFS_HANDLE_GET_DATA(handle, config,
2160                                 struct fruit_config_data,
2161                                 return false);
2162
2163         switch (config->meta) {
2164         case FRUIT_META_NETATALK:
2165                 ok = readdir_attr_meta_finderi_netatalk(
2166                         handle, smb_fname, &ai);
2167                 break;
2168
2169         case FRUIT_META_STREAM:
2170                 ok = readdir_attr_meta_finderi_stream(
2171                         handle, smb_fname, &ai);
2172                 break;
2173
2174         default:
2175                 DBG_ERR("Unexpected meta config [%d]\n", config->meta);
2176                 return false;
2177         }
2178
2179         if (!ok) {
2180                 /* Don't bother with errors, it's likely ENOENT */
2181                 return true;
2182         }
2183
2184         if (S_ISREG(smb_fname->st.st_ex_mode)) {
2185                 /* finder_type */
2186                 memcpy(&attr_data->attr_data.aapl.finder_info[0],
2187                        &ai.afpi_FinderInfo[0], 4);
2188
2189                 /* finder_creator */
2190                 memcpy(&attr_data->attr_data.aapl.finder_info[0] + 4,
2191                        &ai.afpi_FinderInfo[4], 4);
2192         }
2193
2194         /* finder_flags */
2195         memcpy(&attr_data->attr_data.aapl.finder_info[0] + 8,
2196                &ai.afpi_FinderInfo[8], 2);
2197
2198         /* finder_ext_flags */
2199         memcpy(&attr_data->attr_data.aapl.finder_info[0] + 10,
2200                &ai.afpi_FinderInfo[24], 2);
2201
2202         /* creation date */
2203         date_added = convert_time_t_to_uint32_t(
2204                 smb_fname->st.st_ex_btime.tv_sec - AD_DATE_DELTA);
2205
2206         RSIVAL(&attr_data->attr_data.aapl.finder_info[0], 12, date_added);
2207
2208         return true;
2209 }
2210
2211 static uint64_t readdir_attr_rfork_size_adouble(
2212         struct vfs_handle_struct *handle,
2213         const struct smb_filename *smb_fname)
2214 {
2215         struct adouble *ad = NULL;
2216         uint64_t rfork_size;
2217
2218         ad = ad_get(talloc_tos(), handle, smb_fname->base_name,
2219                     ADOUBLE_RSRC);
2220         if (ad == NULL) {
2221                 return 0;
2222         }
2223
2224         rfork_size = ad_getentrylen(ad, ADEID_RFORK);
2225         TALLOC_FREE(ad);
2226
2227         return rfork_size;
2228 }
2229
2230 static uint64_t readdir_attr_rfork_size_stream(
2231         struct vfs_handle_struct *handle,
2232         const struct smb_filename *smb_fname)
2233 {
2234         struct smb_filename *stream_name = NULL;
2235         int ret;
2236         uint64_t rfork_size;
2237
2238         stream_name = synthetic_smb_fname(talloc_tos(),
2239                                           smb_fname->base_name,
2240                                           AFPRESOURCE_STREAM_NAME,
2241                                           NULL, 0);
2242         if (stream_name == NULL) {
2243                 return 0;
2244         }
2245
2246         ret = SMB_VFS_STAT(handle->conn, stream_name);
2247         if (ret != 0) {
2248                 TALLOC_FREE(stream_name);
2249                 return 0;
2250         }
2251
2252         rfork_size = stream_name->st.st_ex_size;
2253         TALLOC_FREE(stream_name);
2254
2255         return rfork_size;
2256 }
2257
2258 static uint64_t readdir_attr_rfork_size(struct vfs_handle_struct *handle,
2259                                         const struct smb_filename *smb_fname)
2260 {
2261         struct fruit_config_data *config = NULL;
2262         uint64_t rfork_size;
2263
2264         SMB_VFS_HANDLE_GET_DATA(handle, config,
2265                                 struct fruit_config_data,
2266                                 return 0);
2267
2268         switch (config->rsrc) {
2269         case FRUIT_RSRC_ADFILE:
2270         case FRUIT_RSRC_XATTR:
2271                 rfork_size = readdir_attr_rfork_size_adouble(handle,
2272                                                              smb_fname);
2273                 break;
2274
2275         case FRUIT_META_STREAM:
2276                 rfork_size = readdir_attr_rfork_size_stream(handle,
2277                                                             smb_fname);
2278                 break;
2279
2280         default:
2281                 DBG_ERR("Unexpected rsrc config [%d]\n", config->rsrc);
2282                 rfork_size = 0;
2283                 break;
2284         }
2285
2286         return rfork_size;
2287 }
2288
2289 static NTSTATUS readdir_attr_macmeta(struct vfs_handle_struct *handle,
2290                                      const struct smb_filename *smb_fname,
2291                                      struct readdir_attr_data *attr_data)
2292 {
2293         NTSTATUS status = NT_STATUS_OK;
2294         struct fruit_config_data *config = NULL;
2295         bool ok;
2296
2297         SMB_VFS_HANDLE_GET_DATA(handle, config,
2298                                 struct fruit_config_data,
2299                                 return NT_STATUS_UNSUCCESSFUL);
2300
2301
2302         /* Ensure we return a default value in the creation_date field */
2303         RSIVAL(&attr_data->attr_data.aapl.finder_info, 12, AD_DATE_START);
2304
2305         /*
2306          * Resource fork length
2307          */
2308
2309         if (config->readdir_attr_rsize) {
2310                 uint64_t rfork_size;
2311
2312                 rfork_size = readdir_attr_rfork_size(handle, smb_fname);
2313                 attr_data->attr_data.aapl.rfork_size = rfork_size;
2314         }
2315
2316         /*
2317          * FinderInfo
2318          */
2319
2320         if (config->readdir_attr_finder_info) {
2321                 ok = readdir_attr_meta_finderi(handle, smb_fname, attr_data);
2322                 if (!ok) {
2323                         status = NT_STATUS_INTERNAL_ERROR;
2324                 }
2325         }
2326
2327         return status;
2328 }
2329
2330 /* Search MS NFS style ACE with UNIX mode */
2331 static NTSTATUS check_ms_nfs(vfs_handle_struct *handle,
2332                              files_struct *fsp,
2333                              const struct security_descriptor *psd,
2334                              mode_t *pmode,
2335                              bool *pdo_chmod)
2336 {
2337         uint32_t i;
2338         struct fruit_config_data *config = NULL;
2339
2340         *pdo_chmod = false;
2341
2342         SMB_VFS_HANDLE_GET_DATA(handle, config,
2343                                 struct fruit_config_data,
2344                                 return NT_STATUS_UNSUCCESSFUL);
2345
2346         if (psd->dacl == NULL || !config->unix_info_enabled) {
2347                 return NT_STATUS_OK;
2348         }
2349
2350         for (i = 0; i < psd->dacl->num_aces; i++) {
2351                 if (dom_sid_compare_domain(
2352                             &global_sid_Unix_NFS_Mode,
2353                             &psd->dacl->aces[i].trustee) == 0) {
2354                         *pmode = (mode_t)psd->dacl->aces[i].trustee.sub_auths[2];
2355                         *pmode &= (S_IRWXU | S_IRWXG | S_IRWXO);
2356                         *pdo_chmod = true;
2357
2358                         DEBUG(10, ("MS NFS chmod request %s, %04o\n",
2359                                    fsp_str_dbg(fsp), (unsigned)(*pmode)));
2360                         break;
2361                 }
2362         }
2363
2364         return NT_STATUS_OK;
2365 }
2366
2367 /****************************************************************************
2368  * VFS ops
2369  ****************************************************************************/
2370
2371 static int fruit_connect(vfs_handle_struct *handle,
2372                          const char *service,
2373                          const char *user)
2374 {
2375         int rc;
2376         char *list = NULL, *newlist = NULL;
2377         struct fruit_config_data *config;
2378
2379         DEBUG(10, ("fruit_connect\n"));
2380
2381         rc = SMB_VFS_NEXT_CONNECT(handle, service, user);
2382         if (rc < 0) {
2383                 return rc;
2384         }
2385
2386         rc = init_fruit_config(handle);
2387         if (rc != 0) {
2388                 return rc;
2389         }
2390
2391         SMB_VFS_HANDLE_GET_DATA(handle, config,
2392                                 struct fruit_config_data, return -1);
2393
2394         if (config->veto_appledouble) {
2395                 list = lp_veto_files(talloc_tos(), SNUM(handle->conn));
2396
2397                 if (list) {
2398                         if (strstr(list, "/" ADOUBLE_NAME_PREFIX "*/") == NULL) {
2399                                 newlist = talloc_asprintf(
2400                                         list,
2401                                         "%s/" ADOUBLE_NAME_PREFIX "*/",
2402                                         list);
2403                                 lp_do_parameter(SNUM(handle->conn),
2404                                                 "veto files",
2405                                                 newlist);
2406                         }
2407                 } else {
2408                         lp_do_parameter(SNUM(handle->conn),
2409                                         "veto files",
2410                                         "/" ADOUBLE_NAME_PREFIX "*/");
2411                 }
2412
2413                 TALLOC_FREE(list);
2414         }
2415
2416         if (config->encoding == FRUIT_ENC_NATIVE) {
2417                 lp_do_parameter(
2418                         SNUM(handle->conn),
2419                         "catia:mappings",
2420                         "0x01:0xf001,0x02:0xf002,0x03:0xf003,0x04:0xf004,"
2421                         "0x05:0xf005,0x06:0xf006,0x07:0xf007,0x08:0xf008,"
2422                         "0x09:0xf009,0x0a:0xf00a,0x0b:0xf00b,0x0c:0xf00c,"
2423                         "0x0d:0xf00d,0x0e:0xf00e,0x0f:0xf00f,0x10:0xf010,"
2424                         "0x11:0xf011,0x12:0xf012,0x13:0xf013,0x14:0xf014,"
2425                         "0x15:0xf015,0x16:0xf016,0x17:0xf017,0x18:0xf018,"
2426                         "0x19:0xf019,0x1a:0xf01a,0x1b:0xf01b,0x1c:0xf01c,"
2427                         "0x1d:0xf01d,0x1e:0xf01e,0x1f:0xf01f,"
2428                         "0x22:0xf020,0x2a:0xf021,0x3a:0xf022,0x3c:0xf023,"
2429                         "0x3e:0xf024,0x3f:0xf025,0x5c:0xf026,0x7c:0xf027,"
2430                         "0x0d:0xf00d");
2431         }
2432
2433         return rc;
2434 }
2435
2436 static int fruit_open_meta_stream(vfs_handle_struct *handle,
2437                                   struct smb_filename *smb_fname,
2438                                   files_struct *fsp,
2439                                   int flags,
2440                                   mode_t mode)
2441 {
2442         AfpInfo *ai = NULL;
2443         char afpinfo_buf[AFP_INFO_SIZE];
2444         ssize_t len, written;
2445         int hostfd = -1;
2446         int rc = -1;
2447
2448         hostfd = SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2449         if (hostfd == -1) {
2450                 return -1;
2451         }
2452
2453         if (!(flags & (O_CREAT | O_TRUNC))) {
2454                 return hostfd;
2455         }
2456
2457         ai = afpinfo_new(talloc_tos());
2458         if (ai == NULL) {
2459                 rc = -1;
2460                 goto fail;
2461         }
2462
2463         len = afpinfo_pack(ai, afpinfo_buf);
2464         if (len != AFP_INFO_SIZE) {
2465                 rc = -1;
2466                 goto fail;
2467         }
2468
2469         /* Set fd, needed in SMB_VFS_NEXT_PWRITE() */
2470         fsp->fh->fd = hostfd;
2471
2472         written = SMB_VFS_NEXT_PWRITE(handle, fsp, afpinfo_buf,
2473                                       AFP_INFO_SIZE, 0);
2474         fsp->fh->fd = -1;
2475         if (written != AFP_INFO_SIZE) {
2476                 DBG_ERR("bad write [%zd/%d]\n", written, AFP_INFO_SIZE);
2477                 rc = -1;
2478                 goto fail;
2479         }
2480
2481         rc = 0;
2482
2483 fail:
2484         DBG_DEBUG("rc=%d, fd=%d\n", rc, hostfd);
2485
2486         if (rc != 0) {
2487                 int saved_errno = errno;
2488                 if (hostfd >= 0) {
2489                         fsp->fh->fd = hostfd;
2490                         SMB_VFS_NEXT_CLOSE(handle, fsp);
2491                 }
2492                 hostfd = -1;
2493                 errno = saved_errno;
2494         }
2495         return hostfd;
2496 }
2497
2498 static int fruit_open_meta_netatalk(vfs_handle_struct *handle,
2499                                     struct smb_filename *smb_fname,
2500                                     files_struct *fsp,
2501                                     int flags,
2502                                     mode_t mode)
2503 {
2504         int rc = 0;
2505         struct smb_filename *smb_fname_base = NULL;
2506         int baseflags;
2507         int hostfd = -1;
2508         struct adouble *ad = NULL;
2509
2510         /* Create an smb_filename with stream_name == NULL. */
2511         smb_fname_base = synthetic_smb_fname(talloc_tos(),
2512                                         smb_fname->base_name,
2513                                         NULL,
2514                                         NULL,
2515                                         smb_fname->flags);
2516
2517         if (smb_fname_base == NULL) {
2518                 errno = ENOMEM;
2519                 rc = -1;
2520                 goto exit;
2521         }
2522
2523         /*
2524          * We use baseflags to turn off nasty side-effects when opening the
2525          * underlying file.
2526          */
2527         baseflags = flags;
2528         baseflags &= ~O_TRUNC;
2529         baseflags &= ~O_EXCL;
2530         baseflags &= ~O_CREAT;
2531
2532         hostfd = SMB_VFS_OPEN(handle->conn, smb_fname_base, fsp,
2533                               baseflags, mode);
2534
2535         /*
2536          * It is legit to open a stream on a directory, but the base
2537          * fd has to be read-only.
2538          */
2539         if ((hostfd == -1) && (errno == EISDIR)) {
2540                 baseflags &= ~O_ACCMODE;
2541                 baseflags |= O_RDONLY;
2542                 hostfd = SMB_VFS_OPEN(handle->conn, smb_fname_base, fsp,
2543                                       baseflags, mode);
2544         }
2545
2546         TALLOC_FREE(smb_fname_base);
2547
2548         if (hostfd == -1) {
2549                 rc = -1;
2550                 goto exit;
2551         }
2552
2553         if (flags & (O_CREAT | O_TRUNC)) {
2554                 /*
2555                  * The attribute does not exist or needs to be truncated,
2556                  * create an AppleDouble EA
2557                  */
2558                 ad = ad_init(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2559                              handle, ADOUBLE_META, fsp);
2560                 if (ad == NULL) {
2561                         rc = -1;
2562                         goto exit;
2563                 }
2564
2565                 rc = ad_write(ad, smb_fname->base_name);
2566                 if (rc != 0) {
2567                         rc = -1;
2568                         goto exit;
2569                 }
2570         } else {
2571                 ad = ad_alloc(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2572                               handle, ADOUBLE_META, fsp);
2573                 if (ad == NULL) {
2574                         rc = -1;
2575                         goto exit;
2576                 }
2577                 if (ad_read(ad, smb_fname->base_name) == -1) {
2578                         rc = -1;
2579                         goto exit;
2580                 }
2581         }
2582
2583 exit:
2584         DEBUG(10, ("fruit_open meta rc=%d, fd=%d\n", rc, hostfd));
2585         if (rc != 0) {
2586                 int saved_errno = errno;
2587                 if (hostfd >= 0) {
2588                         /*
2589                          * BUGBUGBUG -- we would need to call
2590                          * fd_close_posix here, but we don't have a
2591                          * full fsp yet
2592                          */
2593                         fsp->fh->fd = hostfd;
2594                         SMB_VFS_CLOSE(fsp);
2595                 }
2596                 hostfd = -1;
2597                 errno = saved_errno;
2598         }
2599         return hostfd;
2600 }
2601
2602 static int fruit_open_meta(vfs_handle_struct *handle,
2603                            struct smb_filename *smb_fname,
2604                            files_struct *fsp, int flags, mode_t mode)
2605 {
2606         int rc;
2607         struct fruit_config_data *config = NULL;
2608
2609         DBG_DEBUG("path [%s]\n", smb_fname_str_dbg(smb_fname));
2610
2611         SMB_VFS_HANDLE_GET_DATA(handle, config,
2612                                 struct fruit_config_data, return -1);
2613
2614         switch (config->meta) {
2615         case FRUIT_META_STREAM:
2616                 rc = fruit_open_meta_stream(handle, smb_fname,
2617                                             fsp, flags, mode);
2618                 break;
2619
2620         case FRUIT_META_NETATALK:
2621                 rc = fruit_open_meta_netatalk(handle, smb_fname,
2622                                               fsp, flags, mode);
2623                 break;
2624
2625         default:
2626                 DBG_ERR("Unexpected meta config [%d]\n", config->meta);
2627                 return -1;
2628         }
2629
2630         DBG_DEBUG("path [%s] rc [%d]\n", smb_fname_str_dbg(smb_fname), rc);
2631         return rc;
2632 }
2633
2634 static int fruit_open_rsrc_adouble(vfs_handle_struct *handle,
2635                                    struct smb_filename *smb_fname,
2636                                    files_struct *fsp,
2637                                    int flags,
2638                                    mode_t mode)
2639 {
2640         int rc = 0;
2641         struct adouble *ad = NULL;
2642         struct smb_filename *smb_fname_base = NULL;
2643         char *adpath = NULL;
2644         int hostfd = -1;
2645
2646         if (!(flags & O_CREAT) && !VALID_STAT(smb_fname->st)) {
2647                 rc = SMB_VFS_NEXT_STAT(handle, smb_fname);
2648                 if (rc != 0) {
2649                         rc = -1;
2650                         goto exit;
2651                 }
2652         }
2653
2654         if (VALID_STAT(smb_fname->st) && S_ISDIR(smb_fname->st.st_ex_mode)) {
2655                 /* sorry, but directories don't habe a resource fork */
2656                 rc = -1;
2657                 goto exit;
2658         }
2659
2660         rc = adouble_path(talloc_tos(), smb_fname->base_name, &adpath);
2661         if (rc != 0) {
2662                 goto exit;
2663         }
2664
2665         /* Create an smb_filename with stream_name == NULL. */
2666         smb_fname_base = synthetic_smb_fname(talloc_tos(),
2667                                         adpath,
2668                                         NULL,
2669                                         NULL,
2670                                         smb_fname->flags);
2671         if (smb_fname_base == NULL) {
2672                 errno = ENOMEM;
2673                 rc = -1;
2674                 goto exit;
2675         }
2676
2677         /* Sanitize flags */
2678         if (flags & O_WRONLY) {
2679                 /* We always need read access for the metadata header too */
2680                 flags &= ~O_WRONLY;
2681                 flags |= O_RDWR;
2682         }
2683
2684         hostfd = SMB_VFS_OPEN(handle->conn, smb_fname_base, fsp,
2685                               flags, mode);
2686         if (hostfd == -1) {
2687                 rc = -1;
2688                 goto exit;
2689         }
2690
2691         /* REVIEW: we need this in ad_write() */
2692         fsp->fh->fd = hostfd;
2693
2694         if (flags & (O_CREAT | O_TRUNC)) {
2695                 ad = ad_init(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2696                              handle, ADOUBLE_RSRC, fsp);
2697                 if (ad == NULL) {
2698                         rc = -1;
2699                         goto exit;
2700                 }
2701                 rc = ad_write(ad, smb_fname->base_name);
2702                 if (rc != 0) {
2703                         rc = -1;
2704                         goto exit;
2705                 }
2706         } else {
2707                 ad = ad_alloc(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2708                               handle, ADOUBLE_RSRC, fsp);
2709                 if (ad == NULL) {
2710                         rc = -1;
2711                         goto exit;
2712                 }
2713                 if (ad_read(ad, smb_fname->base_name) == -1) {
2714                         rc = -1;
2715                         goto exit;
2716                 }
2717         }
2718
2719 exit:
2720
2721         TALLOC_FREE(adpath);
2722         TALLOC_FREE(smb_fname_base);
2723
2724         DEBUG(10, ("fruit_open resource fork: rc=%d, fd=%d\n", rc, hostfd));
2725         if (rc != 0) {
2726                 int saved_errno = errno;
2727                 if (hostfd >= 0) {
2728                         /*
2729                          * BUGBUGBUG -- we would need to call
2730                          * fd_close_posix here, but we don't have a
2731                          * full fsp yet
2732                          */
2733                         fsp->fh->fd = hostfd;
2734                         SMB_VFS_CLOSE(fsp);
2735                 }
2736                 hostfd = -1;
2737                 errno = saved_errno;
2738         }
2739         return hostfd;
2740 }
2741
2742 static int fruit_open_rsrc_xattr(vfs_handle_struct *handle,
2743                                  struct smb_filename *smb_fname,
2744                                  files_struct *fsp,
2745                                  int flags,
2746                                  mode_t mode)
2747 {
2748 #ifdef HAVE_ATTROPEN
2749         int fd = -1;
2750         struct adouble *ad = NULL;
2751
2752         ad = ad_init(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2753                      handle, ADOUBLE_RSRC, fsp);
2754         if (ad == NULL) {
2755                 return -1;
2756         }
2757
2758         fd = attropen(smb_fname->base_name,
2759                           AFPRESOURCE_EA_NETATALK, flags, mode);
2760         if (fd == -1) {
2761                 return -1;
2762         }
2763
2764         return fd;
2765
2766 #else
2767         errno = ENOSYS;
2768         return -1;
2769 #endif
2770 }
2771
2772 static int fruit_open_rsrc(vfs_handle_struct *handle,
2773                            struct smb_filename *smb_fname,
2774                            files_struct *fsp, int flags, mode_t mode)
2775 {
2776         int fd;
2777         struct fruit_config_data *config = NULL;
2778
2779         DBG_DEBUG("Path [%s]\n", smb_fname_str_dbg(smb_fname));
2780
2781         SMB_VFS_HANDLE_GET_DATA(handle, config,
2782                                 struct fruit_config_data, return -1);
2783
2784         switch (config->rsrc) {
2785         case FRUIT_RSRC_STREAM:
2786                 fd = SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2787                 break;
2788
2789         case FRUIT_RSRC_ADFILE:
2790                 fd = fruit_open_rsrc_adouble(handle, smb_fname,
2791                                              fsp, flags, mode);
2792                 break;
2793
2794         case FRUIT_RSRC_XATTR:
2795                 fd = fruit_open_rsrc_xattr(handle, smb_fname,
2796                                            fsp, flags, mode);
2797                 break;
2798
2799         default:
2800                 DBG_ERR("Unexpected rsrc config [%d]\n", config->rsrc);
2801                 return -1;
2802         }
2803
2804         DBG_DEBUG("Path [%s] fd [%d]\n", smb_fname_str_dbg(smb_fname), fd);
2805         return fd;
2806 }
2807
2808 static int fruit_open(vfs_handle_struct *handle,
2809                       struct smb_filename *smb_fname,
2810                       files_struct *fsp, int flags, mode_t mode)
2811 {
2812         DEBUG(10, ("fruit_open called for %s\n",
2813                    smb_fname_str_dbg(smb_fname)));
2814
2815         if (!is_ntfs_stream_smb_fname(smb_fname)) {
2816                 return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2817         }
2818
2819         if (is_afpinfo_stream(smb_fname)) {
2820                 return fruit_open_meta(handle, smb_fname, fsp, flags, mode);
2821         } else if (is_afpresource_stream(smb_fname)) {
2822                 return fruit_open_rsrc(handle, smb_fname, fsp, flags, mode);
2823         }
2824
2825         return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2826 }
2827
2828 static int fruit_rename(struct vfs_handle_struct *handle,
2829                         const struct smb_filename *smb_fname_src,
2830                         const struct smb_filename *smb_fname_dst)
2831 {
2832         int rc = -1;
2833         char *src_adouble_path = NULL;
2834         char *dst_adouble_path = NULL;
2835         struct fruit_config_data *config = NULL;
2836         struct smb_filename *src_adp_smb_fname = NULL;
2837         struct smb_filename *dst_adp_smb_fname = NULL;
2838
2839         SMB_VFS_HANDLE_GET_DATA(handle, config,
2840                                 struct fruit_config_data, return -1);
2841
2842         if (!VALID_STAT(smb_fname_src->st)) {
2843                 DBG_ERR("Need valid stat for [%s]\n",
2844                         smb_fname_str_dbg(smb_fname_src));
2845                 return -1;
2846         }
2847
2848         rc = SMB_VFS_NEXT_RENAME(handle, smb_fname_src, smb_fname_dst);
2849         if (rc != 0) {
2850                 return -1;
2851         }
2852
2853         if ((config->rsrc != FRUIT_RSRC_ADFILE) ||
2854             (!S_ISREG(smb_fname_src->st.st_ex_mode)))
2855         {
2856                 return 0;
2857         }
2858
2859         rc = adouble_path(talloc_tos(), smb_fname_src->base_name,
2860                           &src_adouble_path);
2861         if (rc != 0) {
2862                 goto done;
2863         }
2864         src_adp_smb_fname = synthetic_smb_fname(talloc_tos(),
2865                                                 src_adouble_path,
2866                                                 NULL, NULL,
2867                                                 smb_fname_src->flags);
2868         TALLOC_FREE(src_adouble_path);
2869         if (src_adp_smb_fname == NULL) {
2870                 rc = -1;
2871                 goto done;
2872         }
2873
2874         rc = adouble_path(talloc_tos(), smb_fname_dst->base_name,
2875                           &dst_adouble_path);
2876         if (rc != 0) {
2877                 goto done;
2878         }
2879         dst_adp_smb_fname = synthetic_smb_fname(talloc_tos(),
2880                                                 dst_adouble_path,
2881                                                 NULL, NULL,
2882                                                 smb_fname_dst->flags);
2883         TALLOC_FREE(dst_adouble_path);
2884         if (dst_adp_smb_fname == NULL) {
2885                 rc = -1;
2886                 goto done;
2887         }
2888
2889         DBG_DEBUG("%s -> %s\n",
2890                   smb_fname_str_dbg(src_adp_smb_fname),
2891                   smb_fname_str_dbg(dst_adp_smb_fname));
2892
2893         rc = SMB_VFS_NEXT_RENAME(handle, src_adp_smb_fname, dst_adp_smb_fname);
2894         if (errno == ENOENT) {
2895                 rc = 0;
2896         }
2897
2898 done:
2899         TALLOC_FREE(src_adp_smb_fname);
2900         TALLOC_FREE(dst_adp_smb_fname);
2901         return rc;
2902 }
2903
2904 static int fruit_unlink_meta_stream(vfs_handle_struct *handle,
2905                                     const struct smb_filename *smb_fname)
2906 {
2907         return SMB_VFS_NEXT_UNLINK(handle, smb_fname);
2908 }
2909
2910 static int fruit_unlink_meta_netatalk(vfs_handle_struct *handle,
2911                                       const struct smb_filename *smb_fname)
2912 {
2913         return SMB_VFS_REMOVEXATTR(handle->conn,
2914                                    smb_fname->base_name,
2915                                    AFPINFO_EA_NETATALK);
2916 }
2917
2918 static int fruit_unlink_meta(vfs_handle_struct *handle,
2919                              const struct smb_filename *smb_fname)
2920 {
2921         struct fruit_config_data *config = NULL;
2922         int rc;
2923
2924         SMB_VFS_HANDLE_GET_DATA(handle, config,
2925                                 struct fruit_config_data, return -1);
2926
2927         switch (config->meta) {
2928         case FRUIT_META_STREAM:
2929                 rc = fruit_unlink_meta_stream(handle, smb_fname);
2930                 break;
2931
2932         case FRUIT_META_NETATALK:
2933                 rc = fruit_unlink_meta_netatalk(handle, smb_fname);
2934                 break;
2935
2936         default:
2937                 DBG_ERR("Unsupported meta config [%d]\n", config->meta);
2938                 return -1;
2939         }
2940
2941         return rc;
2942 }
2943
2944 static int fruit_unlink_rsrc_stream(vfs_handle_struct *handle,
2945                                     const struct smb_filename *smb_fname,
2946                                     bool force_unlink)
2947 {
2948         int ret;
2949
2950         if (!force_unlink) {
2951                 struct smb_filename *smb_fname_cp = NULL;
2952                 off_t size;
2953
2954                 smb_fname_cp = cp_smb_filename(talloc_tos(), smb_fname);
2955                 if (smb_fname_cp == NULL) {
2956                         return -1;
2957                 }
2958
2959                 /*
2960                  * 0 byte resource fork streams are not listed by
2961                  * vfs_streaminfo, as a result stream cleanup/deletion of file
2962                  * deletion doesn't remove the resourcefork stream.
2963                  */
2964
2965                 ret = SMB_VFS_NEXT_STAT(handle, smb_fname_cp);
2966                 if (ret != 0) {
2967                         TALLOC_FREE(smb_fname_cp);
2968                         DBG_ERR("stat [%s] failed [%s]\n",
2969                                 smb_fname_str_dbg(smb_fname_cp), strerror(errno));
2970                         return -1;
2971                 }
2972
2973                 size = smb_fname_cp->st.st_ex_size;
2974                 TALLOC_FREE(smb_fname_cp);
2975
2976                 if (size > 0) {
2977                         /* OS X ignores resource fork stream delete requests */
2978                         return 0;
2979                 }
2980         }
2981
2982         ret = SMB_VFS_NEXT_UNLINK(handle, smb_fname);
2983         if ((ret != 0) && (errno == ENOENT) && force_unlink) {
2984                 ret = 0;
2985         }
2986
2987         return ret;
2988 }
2989
2990 static int fruit_unlink_rsrc_adouble(vfs_handle_struct *handle,
2991                                      const struct smb_filename *smb_fname,
2992                                      bool force_unlink)
2993 {
2994         int rc;
2995         char *adp = NULL;
2996         struct adouble *ad = NULL;
2997         struct smb_filename *adp_smb_fname = NULL;
2998
2999         if (!force_unlink) {
3000                 ad = ad_get(talloc_tos(), handle, smb_fname->base_name,
3001                             ADOUBLE_RSRC);
3002                 if (ad == NULL) {
3003                         errno = ENOENT;
3004                         return -1;
3005                 }
3006
3007
3008                 /*
3009                  * 0 byte resource fork streams are not listed by
3010                  * vfs_streaminfo, as a result stream cleanup/deletion of file
3011                  * deletion doesn't remove the resourcefork stream.
3012                  */
3013
3014                 if (ad_getentrylen(ad, ADEID_RFORK) > 0) {
3015                         /* OS X ignores resource fork stream delete requests */
3016                         TALLOC_FREE(ad);
3017                         return 0;
3018                 }
3019
3020                 TALLOC_FREE(ad);
3021         }
3022
3023         rc = adouble_path(talloc_tos(), smb_fname->base_name, &adp);
3024         if (rc != 0) {
3025                 return -1;
3026         }
3027
3028         adp_smb_fname = synthetic_smb_fname(talloc_tos(), adp,
3029                                             NULL, NULL,
3030                                             smb_fname->flags);
3031         TALLOC_FREE(adp);
3032         if (adp_smb_fname == NULL) {
3033                 return -1;
3034         }
3035
3036         rc = SMB_VFS_NEXT_UNLINK(handle, adp_smb_fname);
3037         TALLOC_FREE(adp_smb_fname);
3038         if ((rc != 0) && (errno == ENOENT) && force_unlink) {
3039                 rc = 0;
3040         }
3041
3042         return rc;
3043 }
3044
3045 static int fruit_unlink_rsrc_xattr(vfs_handle_struct *handle,
3046                                    const struct smb_filename *smb_fname,
3047                                    bool force_unlink)
3048 {
3049         /*
3050          * OS X ignores resource fork stream delete requests, so nothing to do
3051          * here. Removing the file will remove the xattr anyway, so we don't
3052          * have to take care of removing 0 byte resource forks that could be
3053          * left behind.
3054          */
3055         return 0;
3056 }
3057
3058 static int fruit_unlink_rsrc(vfs_handle_struct *handle,
3059                              const struct smb_filename *smb_fname,
3060                              bool force_unlink)
3061 {
3062         struct fruit_config_data *config = NULL;
3063         int rc;
3064
3065         SMB_VFS_HANDLE_GET_DATA(handle, config,
3066                                 struct fruit_config_data, return -1);
3067
3068         switch (config->rsrc) {
3069         case FRUIT_RSRC_STREAM:
3070                 rc = fruit_unlink_rsrc_stream(handle, smb_fname, force_unlink);
3071                 break;
3072
3073         case FRUIT_RSRC_ADFILE:
3074                 rc = fruit_unlink_rsrc_adouble(handle, smb_fname, force_unlink);
3075                 break;
3076
3077         case FRUIT_RSRC_XATTR:
3078                 rc = fruit_unlink_rsrc_xattr(handle, smb_fname, force_unlink);
3079                 break;
3080
3081         default:
3082                 DBG_ERR("Unsupported rsrc config [%d]\n", config->rsrc);
3083                 return -1;
3084         }
3085
3086         return rc;
3087 }
3088
3089 static int fruit_unlink(vfs_handle_struct *handle,
3090                         const struct smb_filename *smb_fname)
3091 {
3092         int rc;
3093         struct fruit_config_data *config = NULL;
3094         struct smb_filename *rsrc_smb_fname = NULL;
3095
3096         SMB_VFS_HANDLE_GET_DATA(handle, config,
3097                                 struct fruit_config_data, return -1);
3098
3099         if (is_afpinfo_stream(smb_fname)) {
3100                 return fruit_unlink_meta(handle, smb_fname);
3101         } else if (is_afpresource_stream(smb_fname)) {
3102                 return fruit_unlink_rsrc(handle, smb_fname, false);
3103         } if (is_ntfs_stream_smb_fname(smb_fname)) {
3104                 return SMB_VFS_NEXT_UNLINK(handle, smb_fname);
3105         }
3106
3107         /*
3108          * A request to delete the base file. Because 0 byte resource
3109          * fork streams are not listed by fruit_streaminfo,
3110          * delete_all_streams() can't remove 0 byte resource fork
3111          * streams, so we have to cleanup this here.
3112          */
3113         rsrc_smb_fname = synthetic_smb_fname(talloc_tos(),
3114                                              smb_fname->base_name,
3115                                              AFPRESOURCE_STREAM_NAME,
3116                                              NULL,
3117                                              smb_fname->flags);
3118         if (rsrc_smb_fname == NULL) {
3119                 return -1;
3120         }
3121
3122         rc = fruit_unlink_rsrc(handle, rsrc_smb_fname, true);
3123         if ((rc != 0) && (errno != ENOENT)) {
3124                 DBG_ERR("Forced unlink of [%s] failed [%s]\n",
3125                         smb_fname_str_dbg(rsrc_smb_fname), strerror(errno));
3126                 TALLOC_FREE(rsrc_smb_fname);
3127                 return -1;
3128         }
3129         TALLOC_FREE(rsrc_smb_fname);
3130
3131         return SMB_VFS_NEXT_UNLINK(handle, smb_fname);
3132 }
3133
3134 static int fruit_chmod(vfs_handle_struct *handle,
3135                        const struct smb_filename *smb_fname,
3136                        mode_t mode)
3137 {
3138         int rc = -1;
3139         char *adp = NULL;
3140         struct fruit_config_data *config = NULL;
3141         const char *path = smb_fname->base_name;
3142         struct smb_filename *smb_fname_adp = NULL;
3143
3144         rc = SMB_VFS_NEXT_CHMOD(handle, smb_fname, mode);
3145         if (rc != 0) {
3146                 return rc;
3147         }
3148
3149         SMB_VFS_HANDLE_GET_DATA(handle, config,
3150                                 struct fruit_config_data, return -1);
3151
3152         if (config->rsrc != FRUIT_RSRC_ADFILE) {
3153                 return 0;
3154         }
3155
3156         if (!VALID_STAT(smb_fname->st)) {
3157                 return 0;
3158         }
3159
3160         if (!S_ISREG(smb_fname->st.st_ex_mode)) {
3161                 return 0;
3162         }
3163
3164         rc = adouble_path(talloc_tos(), path, &adp);
3165         if (rc != 0) {
3166                 return -1;
3167         }
3168
3169         DEBUG(10, ("fruit_chmod: %s\n", adp));
3170
3171         smb_fname_adp = synthetic_smb_fname(talloc_tos(),
3172                                         adp,
3173                                         NULL,
3174                                         NULL,
3175                                         smb_fname->flags);
3176         if (smb_fname_adp == NULL) {
3177                 TALLOC_FREE(adp);
3178                 errno = ENOMEM;
3179                 return -1;
3180         }
3181
3182         rc = SMB_VFS_NEXT_CHMOD(handle, smb_fname_adp, mode);
3183         if (errno == ENOENT) {
3184                 rc = 0;
3185         }
3186
3187         TALLOC_FREE(smb_fname_adp);
3188         TALLOC_FREE(adp);
3189         return rc;
3190 }
3191
3192 static int fruit_chown(vfs_handle_struct *handle,
3193                        const struct smb_filename *smb_fname,
3194                        uid_t uid,
3195                        gid_t gid)
3196 {
3197         int rc = -1;
3198         char *adp = NULL;
3199         struct fruit_config_data *config = NULL;
3200         struct smb_filename *adp_smb_fname = NULL;
3201
3202         rc = SMB_VFS_NEXT_CHOWN(handle, smb_fname, uid, gid);
3203         if (rc != 0) {
3204                 return rc;
3205         }
3206
3207         SMB_VFS_HANDLE_GET_DATA(handle, config,
3208                                 struct fruit_config_data, return -1);
3209
3210         if (config->rsrc != FRUIT_RSRC_ADFILE) {
3211                 return 0;
3212         }
3213
3214         if (!VALID_STAT(smb_fname->st)) {
3215                 return 0;
3216         }
3217
3218         if (!S_ISREG(smb_fname->st.st_ex_mode)) {
3219                 return 0;
3220         }
3221
3222         rc = adouble_path(talloc_tos(), smb_fname->base_name, &adp);
3223         if (rc != 0) {
3224                 goto done;
3225         }
3226
3227         DEBUG(10, ("fruit_chown: %s\n", adp));
3228
3229         adp_smb_fname = synthetic_smb_fname(talloc_tos(),
3230                                         adp,
3231                                         NULL,
3232                                         NULL,
3233                                         smb_fname->flags);
3234         if (adp_smb_fname == NULL) {
3235                 errno = ENOMEM;
3236                 rc = -1;
3237                 goto done;
3238         }
3239
3240         rc = SMB_VFS_NEXT_CHOWN(handle, adp_smb_fname, uid, gid);
3241         if (errno == ENOENT) {
3242                 rc = 0;
3243         }
3244
3245  done:
3246         TALLOC_FREE(adp);
3247         TALLOC_FREE(adp_smb_fname);
3248         return rc;
3249 }
3250
3251 static int fruit_rmdir(struct vfs_handle_struct *handle,
3252                         const struct smb_filename *smb_fname)
3253 {
3254         DIR *dh = NULL;
3255         struct dirent *de;
3256         struct fruit_config_data *config;
3257
3258         SMB_VFS_HANDLE_GET_DATA(handle, config,
3259                                 struct fruit_config_data, return -1);
3260
3261         if (config->rsrc != FRUIT_RSRC_ADFILE) {
3262                 goto exit_rmdir;
3263         }
3264
3265         /*
3266          * Due to there is no way to change bDeleteVetoFiles variable
3267          * from this module, need to clean up ourselves
3268          */
3269
3270         dh = SMB_VFS_OPENDIR(handle->conn, smb_fname, NULL, 0);
3271         if (dh == NULL) {
3272                 goto exit_rmdir;
3273         }
3274
3275         while ((de = SMB_VFS_READDIR(handle->conn, dh, NULL)) != NULL) {
3276                 int match;
3277                 struct adouble *ad = NULL;
3278                 char *p = NULL;
3279                 struct smb_filename *ad_smb_fname = NULL;
3280                 int ret;
3281
3282                 match = strncmp(de->d_name,
3283                                 ADOUBLE_NAME_PREFIX,
3284                                 strlen(ADOUBLE_NAME_PREFIX));
3285                 if (match != 0) {
3286                         continue;
3287                 }
3288
3289                 p = talloc_asprintf(talloc_tos(), "%s/%s",
3290                                     smb_fname->base_name, de->d_name);
3291                 if (p == NULL) {
3292                         DBG_ERR("talloc_asprintf failed\n");
3293                         return -1;
3294                 }
3295
3296                 /*
3297                  * Check whether it's a valid AppleDouble file, if
3298                  * yes, delete it, ignore it otherwise.
3299                  */
3300                 ad = ad_get(talloc_tos(), handle, p, ADOUBLE_RSRC);
3301                 if (ad == NULL) {
3302                         TALLOC_FREE(p);
3303                         continue;
3304                 }
3305                 TALLOC_FREE(ad);
3306
3307                 ad_smb_fname = synthetic_smb_fname(talloc_tos(), p,
3308                                                     NULL, NULL,
3309                                                     smb_fname->flags);
3310                 TALLOC_FREE(p);
3311                 if (ad_smb_fname == NULL) {
3312                         DBG_ERR("synthetic_smb_fname failed\n");
3313                         return -1;
3314                 }
3315
3316                 ret = SMB_VFS_NEXT_UNLINK(handle, ad_smb_fname);
3317                 TALLOC_FREE(ad_smb_fname);
3318                 if (ret != 0) {
3319                         DBG_ERR("Deleting [%s] failed\n",
3320                                 smb_fname_str_dbg(ad_smb_fname));
3321                 }
3322         }
3323
3324 exit_rmdir:
3325         if (dh) {
3326                 closedir(dh);
3327         }
3328         return SMB_VFS_NEXT_RMDIR(handle, smb_fname);
3329 }
3330
3331 static ssize_t fruit_pread(vfs_handle_struct *handle,
3332                            files_struct *fsp, void *data,
3333                            size_t n, off_t offset)
3334 {
3335         int rc = 0;
3336         struct adouble *ad = (struct adouble *)VFS_FETCH_FSP_EXTENSION(
3337                 handle, fsp);
3338         struct fruit_config_data *config = NULL;
3339         AfpInfo *ai = NULL;
3340         ssize_t len = -1;
3341         char *name = NULL;
3342         char *tmp_base_name = NULL;
3343         NTSTATUS status;
3344         size_t to_return = n;
3345
3346         DEBUG(10, ("fruit_pread: offset=%d, size=%d\n", (int)offset, (int)n));
3347
3348         if (!fsp->base_fsp) {
3349                 return SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
3350         }
3351
3352         SMB_VFS_HANDLE_GET_DATA(handle, config,
3353                                 struct fruit_config_data, return -1);
3354
3355         /* fsp_name is not converted with vfs_catia */
3356         tmp_base_name = fsp->base_fsp->fsp_name->base_name;
3357         status = SMB_VFS_TRANSLATE_NAME(handle->conn,
3358                                         fsp->base_fsp->fsp_name->base_name,
3359                                         vfs_translate_to_unix,
3360                                         talloc_tos(), &name);
3361         if (NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
3362                 name = talloc_strdup(talloc_tos(), tmp_base_name);
3363                 if (name == NULL) {
3364                         rc = -1;
3365                         goto exit;
3366                 }
3367         } else if (!NT_STATUS_IS_OK(status)) {
3368                 errno = map_errno_from_nt_status(status);
3369                 rc = -1;
3370                 goto exit;
3371         }
3372         fsp->base_fsp->fsp_name->base_name = name;
3373
3374         if (is_afpinfo_stream(fsp->fsp_name)) {
3375                 /*
3376                  * OS X has a off-by-1 error in the offset calculation, so we're
3377                  * bug compatible here. It won't hurt, as any relevant real
3378                  * world read requests from the AFP_AfpInfo stream will be
3379                  * offset=0 n=60. offset is ignored anyway, see below.
3380                  */
3381                 if ((offset < 0) || (offset >= AFP_INFO_SIZE + 1)) {
3382                         len = 0;
3383                         rc = 0;
3384                         goto exit;
3385                 }
3386
3387                 to_return = MIN(n, AFP_INFO_SIZE);
3388
3389                 /* Yes, macOS always reads from offset 0 */
3390                 offset = 0;
3391         }
3392
3393         if (ad == NULL) {
3394                 len = SMB_VFS_NEXT_PREAD(handle, fsp, data, to_return, offset);
3395                 if (len == -1) {
3396                         rc = -1;
3397                         goto exit;
3398                 }
3399                 goto exit;
3400         }
3401
3402         if (!fruit_fsp_recheck(ad, fsp)) {
3403                 rc = -1;
3404                 goto exit;
3405         }
3406
3407         if (ad->ad_type == ADOUBLE_META) {
3408                 char afpinfo_buf[AFP_INFO_SIZE];
3409                 char *p = NULL;
3410
3411                 ai = afpinfo_new(talloc_tos());
3412                 if (ai == NULL) {
3413                         rc = -1;
3414                         goto exit;
3415                 }
3416
3417                 len = ad_read(ad, fsp->base_fsp->fsp_name->base_name);
3418                 if (len == -1) {
3419                         rc = -1;
3420                         goto exit;
3421                 }
3422
3423                 p = ad_get_entry(ad, ADEID_FINDERI);
3424                 if (p == NULL) {
3425                         DBG_ERR("No ADEID_FINDERI for [%s]\n",
3426                                 fsp->fsp_name->base_name);
3427                         rc = -1;
3428                         goto exit;
3429                 }
3430
3431                 memcpy(&ai->afpi_FinderInfo[0], p, ADEDLEN_FINDERI);
3432
3433                 len = afpinfo_pack(ai, afpinfo_buf);
3434                 if (len != AFP_INFO_SIZE) {
3435                         rc = -1;
3436                         goto exit;
3437                 }
3438
3439                 /*
3440                  * OS X ignores offset when reading from AFP_AfpInfo stream!
3441                  */
3442                 memcpy(data, afpinfo_buf, to_return);
3443                 len = to_return;
3444         } else {
3445                 len = SMB_VFS_NEXT_PREAD(
3446                         handle, fsp, data, n,
3447                         offset + ad_getentryoff(ad, ADEID_RFORK));
3448                 if (len == -1) {
3449                         rc = -1;
3450                         goto exit;
3451                 }
3452         }
3453 exit:
3454         fsp->base_fsp->fsp_name->base_name = tmp_base_name;
3455         TALLOC_FREE(name);
3456         TALLOC_FREE(ai);
3457         if (rc != 0) {
3458                 len = -1;
3459         }
3460         DEBUG(10, ("fruit_pread: rc=%d, len=%zd\n", rc, len));
3461         return len;
3462 }
3463
3464 static ssize_t fruit_pwrite(vfs_handle_struct *handle,
3465                             files_struct *fsp, const void *data,
3466                             size_t n, off_t offset)
3467 {
3468         int rc = 0;
3469         struct adouble *ad = (struct adouble *)VFS_FETCH_FSP_EXTENSION(
3470                 handle, fsp);
3471         struct fruit_config_data *config = NULL;
3472         AfpInfo *ai = NULL;
3473         ssize_t len;
3474         char *name = NULL;
3475         char *tmp_base_name = NULL;
3476         NTSTATUS status;
3477
3478         DEBUG(10, ("fruit_pwrite: offset=%d, size=%d\n", (int)offset, (int)n));
3479
3480         if (!fsp->base_fsp) {
3481                 return SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
3482         }
3483
3484         SMB_VFS_HANDLE_GET_DATA(handle, config,
3485                                 struct fruit_config_data, return -1);
3486
3487         tmp_base_name = fsp->base_fsp->fsp_name->base_name;
3488         status = SMB_VFS_TRANSLATE_NAME(handle->conn,
3489                                         fsp->base_fsp->fsp_name->base_name,
3490                                         vfs_translate_to_unix,
3491                                         talloc_tos(), &name);
3492         if (NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
3493                 name = talloc_strdup(talloc_tos(), tmp_base_name);
3494                 if (name == NULL) {
3495                         rc = -1;
3496                         goto exit;
3497                 }
3498         } else if (!NT_STATUS_IS_OK(status)) {
3499                 errno = map_errno_from_nt_status(status);
3500                 rc = -1;
3501                 goto exit;
3502         }
3503         fsp->base_fsp->fsp_name->base_name = name;
3504
3505         if (is_afpinfo_stream(fsp->fsp_name)) {
3506                 /*
3507                  * Writing an all 0 blob to the metadata stream
3508                  * results in the stream being removed on a macOS
3509                  * server. This ensures we behave the same and it
3510                  * verified by the "delete AFP_AfpInfo by writing all
3511                  * 0" test.
3512                  */
3513                 if (n != AFP_INFO_SIZE || offset != 0) {
3514                         DEBUG(1, ("unexpected offset=%jd or size=%jd\n",
3515                                   (intmax_t)offset, (intmax_t)n));
3516                         rc = -1;
3517                         goto exit;
3518                 }
3519                 ai = afpinfo_unpack(talloc_tos(), data);
3520                 if (ai == NULL) {
3521                         rc = -1;
3522                         goto exit;
3523                 }
3524
3525                 if (ai_empty_finderinfo(ai)) {
3526                         switch (config->meta) {
3527                         case FRUIT_META_STREAM:
3528                                 rc = SMB_VFS_UNLINK(handle->conn, fsp->fsp_name);
3529                                 break;
3530
3531                         case FRUIT_META_NETATALK:
3532                                 rc = SMB_VFS_REMOVEXATTR(
3533                                         handle->conn,
3534                                         fsp->fsp_name->base_name,
3535                                         AFPINFO_EA_NETATALK);
3536                                 break;
3537
3538                         default:
3539                                 DBG_ERR("Unexpected meta config [%d]\n",
3540                                         config->meta);
3541                                 rc = -1;
3542                                 goto exit;
3543                         }
3544
3545                         if (rc != 0 && errno != ENOENT && errno != ENOATTR) {
3546                                 DBG_WARNING("Can't delete metadata for %s: %s\n",
3547                                             fsp->fsp_name->base_name, strerror(errno));
3548                                 goto exit;
3549                         }
3550
3551                         rc = 0;
3552                         goto exit;
3553                 }
3554         }
3555
3556         if (ad == NULL) {
3557                 len = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
3558                 if (len != n) {
3559                         rc = -1;
3560                         goto exit;
3561                 }
3562                 goto exit;
3563         }
3564
3565         if (!fruit_fsp_recheck(ad, fsp)) {
3566                 rc = -1;
3567                 goto exit;
3568         }
3569
3570         if (ad->ad_type == ADOUBLE_META) {
3571                 char *p = NULL;
3572
3573                 p = ad_get_entry(ad, ADEID_FINDERI);
3574                 if (p == NULL) {
3575                         DBG_ERR("No ADEID_FINDERI for [%s]\n",
3576                                 fsp->fsp_name->base_name);
3577                         rc = -1;
3578                         goto exit;
3579                 }
3580
3581                 memcpy(p, &ai->afpi_FinderInfo[0], ADEDLEN_FINDERI);
3582                 rc = ad_write(ad, name);
3583         } else {
3584                 len = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n,
3585                                    offset + ad_getentryoff(ad, ADEID_RFORK));
3586                 if (len != n) {
3587                         rc = -1;
3588                         goto exit;
3589                 }
3590
3591                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
3592                         rc = ad_read(ad, name);
3593                         if (rc == -1) {
3594                                 goto exit;
3595                         }
3596                         rc = 0;
3597
3598                         if ((len + offset) > ad_getentrylen(ad, ADEID_RFORK)) {
3599                                 ad_setentrylen(ad, ADEID_RFORK, len + offset);
3600                                 rc = ad_write(ad, name);
3601                         }
3602                 }
3603         }
3604
3605 exit:
3606         fsp->base_fsp->fsp_name->base_name = tmp_base_name;
3607         TALLOC_FREE(name);
3608         TALLOC_FREE(ai);
3609         if (rc != 0) {
3610                 return -1;
3611         }
3612         return n;
3613 }
3614
3615 /**
3616  * Helper to stat/lstat the base file of an smb_fname.
3617  */
3618 static int fruit_stat_base(vfs_handle_struct *handle,
3619                            struct smb_filename *smb_fname,
3620                            bool follow_links)
3621 {
3622         char *tmp_stream_name;
3623         int rc;
3624
3625         tmp_stream_name = smb_fname->stream_name;
3626         smb_fname->stream_name = NULL;
3627         if (follow_links) {
3628                 rc = SMB_VFS_NEXT_STAT(handle, smb_fname);
3629         } else {
3630                 rc = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
3631         }
3632         smb_fname->stream_name = tmp_stream_name;
3633         return rc;
3634 }
3635
3636 static int fruit_stat_meta_stream(vfs_handle_struct *handle,
3637                                   struct smb_filename *smb_fname,
3638                                   bool follow_links)
3639 {
3640         int ret;
3641
3642         if (follow_links) {
3643                 ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
3644         } else {
3645                 ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
3646         }
3647
3648         return ret;
3649 }
3650
3651 static int fruit_stat_meta_netatalk(vfs_handle_struct *handle,
3652                                     struct smb_filename *smb_fname,
3653                                     bool follow_links)
3654 {
3655         struct adouble *ad = NULL;
3656
3657         ad = ad_get(talloc_tos(), handle, smb_fname->base_name, ADOUBLE_META);
3658         if (ad == NULL) {
3659                 DBG_INFO("fruit_stat_meta %s: %s\n",
3660                          smb_fname_str_dbg(smb_fname), strerror(errno));
3661                 errno = ENOENT;
3662                 return -1;
3663         }
3664         TALLOC_FREE(ad);
3665
3666         /* Populate the stat struct with info from the base file. */
3667         if (fruit_stat_base(handle, smb_fname, follow_links) == -1) {
3668                 return -1;
3669         }
3670         smb_fname->st.st_ex_size = AFP_INFO_SIZE;
3671         smb_fname->st.st_ex_ino = fruit_inode(&smb_fname->st,
3672                                               smb_fname->stream_name);
3673         return 0;
3674 }
3675
3676 static int fruit_stat_meta(vfs_handle_struct *handle,
3677                            struct smb_filename *smb_fname,
3678                            bool follow_links)
3679 {
3680         struct fruit_config_data *config = NULL;
3681         int ret;
3682
3683         SMB_VFS_HANDLE_GET_DATA(handle, config,
3684                                 struct fruit_config_data, return -1);
3685
3686         switch (config->meta) {
3687         case FRUIT_META_STREAM:
3688                 ret = fruit_stat_meta_stream(handle, smb_fname, follow_links);
3689                 break;
3690
3691         case FRUIT_META_NETATALK:
3692                 ret = fruit_stat_meta_netatalk(handle, smb_fname, follow_links);
3693                 break;
3694
3695         default:
3696                 DBG_ERR("Unexpected meta config [%d]\n", config->meta);
3697                 return -1;
3698         }
3699
3700         return ret;
3701 }
3702
3703 static int fruit_stat_rsrc_netatalk(vfs_handle_struct *handle,
3704                                     struct smb_filename *smb_fname,
3705                                     bool follow_links)
3706 {
3707         struct adouble *ad = NULL;
3708         int ret;
3709
3710         ad = ad_get(talloc_tos(), handle, smb_fname->base_name, ADOUBLE_RSRC);
3711         if (ad == NULL) {
3712                 errno = ENOENT;
3713                 return -1;
3714         }
3715
3716         /* Populate the stat struct with info from the base file. */
3717         ret = fruit_stat_base(handle, smb_fname, follow_links);
3718         if (ret != 0) {
3719                 TALLOC_FREE(ad);
3720                 return -1;
3721         }
3722
3723         smb_fname->st.st_ex_size = ad_getentrylen(ad, ADEID_RFORK);
3724         smb_fname->st.st_ex_ino = fruit_inode(&smb_fname->st,
3725                                               smb_fname->stream_name);
3726         TALLOC_FREE(ad);
3727         return 0;
3728 }
3729
3730 static int fruit_stat_rsrc_stream(vfs_handle_struct *handle,
3731                                   struct smb_filename *smb_fname,
3732                                   bool follow_links)
3733 {
3734         int ret;
3735
3736         if (follow_links) {
3737                 ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
3738         } else {
3739                 ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
3740         }
3741
3742         return ret;
3743 }
3744
3745 static int fruit_stat_rsrc_xattr(vfs_handle_struct *handle,
3746                                  struct smb_filename *smb_fname,
3747                                  bool follow_links)
3748 {
3749 #ifdef HAVE_ATTROPEN
3750         int ret;
3751         int fd = -1;
3752
3753         /* Populate the stat struct with info from the base file. */
3754         ret = fruit_stat_base(handle, smb_fname, follow_links);
3755         if (ret != 0) {
3756                 return -1;
3757         }
3758
3759         fd = attropen(smb_fname->base_name,
3760                       AFPRESOURCE_EA_NETATALK,
3761                       O_RDONLY);
3762         if (fd == -1) {
3763                 return 0;
3764         }
3765
3766         ret = sys_fstat(fd, &smb_fname->st, false);
3767         if (ret != 0) {
3768                 close(fd);
3769                 DBG_ERR("fstat [%s:%s] failed\n", smb_fname->base_name,
3770                         AFPRESOURCE_EA_NETATALK);
3771                 return -1;
3772         }
3773         close(fd);
3774         fd = -1;
3775
3776         smb_fname->st.st_ex_ino = fruit_inode(&smb_fname->st,
3777                                               smb_fname->stream_name);
3778
3779         return ret;
3780
3781 #else
3782         errno = ENOSYS;
3783         return -1;
3784 #endif
3785 }
3786
3787 static int fruit_stat_rsrc(vfs_handle_struct *handle,
3788                            struct smb_filename *smb_fname,
3789                            bool follow_links)
3790 {
3791         struct fruit_config_data *config = NULL;
3792         int ret;
3793
3794         DBG_DEBUG("Path [%s]\n", smb_fname_str_dbg(smb_fname));
3795
3796         SMB_VFS_HANDLE_GET_DATA(handle, config,
3797                                 struct fruit_config_data, return -1);
3798
3799         switch (config->rsrc) {
3800         case FRUIT_RSRC_STREAM:
3801                 ret = fruit_stat_rsrc_stream(handle, smb_fname, follow_links);
3802                 break;
3803
3804         case FRUIT_RSRC_XATTR:
3805                 ret = fruit_stat_rsrc_xattr(handle, smb_fname, follow_links);
3806                 break;
3807
3808         case FRUIT_RSRC_ADFILE:
3809                 ret = fruit_stat_rsrc_netatalk(handle, smb_fname, follow_links);
3810                 break;
3811
3812         default:
3813                 DBG_ERR("Unexpected rsrc config [%d]\n", config->rsrc);
3814                 return -1;
3815         }
3816
3817         return ret;
3818 }
3819
3820 static int fruit_stat(vfs_handle_struct *handle,
3821                       struct smb_filename *smb_fname)
3822 {
3823         int rc = -1;
3824
3825         DEBUG(10, ("fruit_stat called for %s\n",
3826                    smb_fname_str_dbg(smb_fname)));
3827
3828         if (!is_ntfs_stream_smb_fname(smb_fname)
3829             || is_ntfs_default_stream_smb_fname(smb_fname)) {
3830                 rc = SMB_VFS_NEXT_STAT(handle, smb_fname);
3831                 if (rc == 0) {
3832                         update_btime(handle, smb_fname);
3833                 }
3834                 return rc;
3835         }
3836
3837         /*
3838          * Note if lp_posix_paths() is true, we can never
3839          * get here as is_ntfs_stream_smb_fname() is
3840          * always false. So we never need worry about
3841          * not following links here.
3842          */
3843
3844         if (is_afpinfo_stream(smb_fname)) {
3845                 rc = fruit_stat_meta(handle, smb_fname, true);
3846         } else if (is_afpresource_stream(smb_fname)) {
3847                 rc = fruit_stat_rsrc(handle, smb_fname, true);
3848         } else {
3849                 return SMB_VFS_NEXT_STAT(handle, smb_fname);
3850         }
3851
3852         if (rc == 0) {
3853                 update_btime(handle, smb_fname);
3854                 smb_fname->st.st_ex_mode &= ~S_IFMT;
3855                 smb_fname->st.st_ex_mode |= S_IFREG;
3856                 smb_fname->st.st_ex_blocks =
3857                         smb_fname->st.st_ex_size / STAT_ST_BLOCKSIZE + 1;
3858         }
3859         return rc;
3860 }
3861
3862 static int fruit_lstat(vfs_handle_struct *handle,
3863                        struct smb_filename *smb_fname)
3864 {
3865         int rc = -1;
3866
3867         DEBUG(10, ("fruit_lstat called for %s\n",
3868                    smb_fname_str_dbg(smb_fname)));
3869
3870         if (!is_ntfs_stream_smb_fname(smb_fname)
3871             || is_ntfs_default_stream_smb_fname(smb_fname)) {
3872                 rc = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
3873                 if (rc == 0) {
3874                         update_btime(handle, smb_fname);
3875                 }
3876                 return rc;
3877         }
3878
3879         if (is_afpinfo_stream(smb_fname)) {
3880                 rc = fruit_stat_meta(handle, smb_fname, false);
3881         } else if (is_afpresource_stream(smb_fname)) {
3882                 rc = fruit_stat_rsrc(handle, smb_fname, false);
3883         } else {
3884                 return SMB_VFS_NEXT_LSTAT(handle, smb_fname);
3885         }
3886
3887         if (rc == 0) {
3888                 update_btime(handle, smb_fname);
3889                 smb_fname->st.st_ex_mode &= ~S_IFMT;
3890                 smb_fname->st.st_ex_mode |= S_IFREG;
3891                 smb_fname->st.st_ex_blocks =
3892                         smb_fname->st.st_ex_size / STAT_ST_BLOCKSIZE + 1;
3893         }
3894         return rc;
3895 }
3896
3897 static int fruit_fstat_meta(vfs_handle_struct *handle,
3898                             files_struct *fsp,
3899                             SMB_STRUCT_STAT *sbuf)
3900 {
3901         DEBUG(10, ("fruit_fstat_meta called for %s\n",
3902                    smb_fname_str_dbg(fsp->base_fsp->fsp_name)));
3903
3904         /* Populate the stat struct with info from the base file. */
3905         if (fruit_stat_base(handle, fsp->base_fsp->fsp_name, false) == -1) {
3906                 return -1;
3907         }
3908         *sbuf = fsp->base_fsp->fsp_name->st;
3909         sbuf->st_ex_size = AFP_INFO_SIZE;
3910         sbuf->st_ex_ino = fruit_inode(sbuf, fsp->fsp_name->stream_name);
3911
3912         return 0;
3913 }
3914
3915 static int fruit_fstat_rsrc(vfs_handle_struct *handle, files_struct *fsp,
3916                             SMB_STRUCT_STAT *sbuf)
3917 {
3918         struct fruit_config_data *config;
3919         struct adouble *ad = (struct adouble *)VFS_FETCH_FSP_EXTENSION(
3920                 handle, fsp);
3921
3922         DEBUG(10, ("fruit_fstat_rsrc called for %s\n",
3923                    smb_fname_str_dbg(fsp->base_fsp->fsp_name)));
3924
3925         SMB_VFS_HANDLE_GET_DATA(handle, config,
3926                                 struct fruit_config_data, return -1);
3927
3928         if (config->rsrc == FRUIT_RSRC_STREAM) {
3929                 return SMB_VFS_NEXT_FSTAT(handle, fsp, sbuf);
3930         }
3931
3932         /* Populate the stat struct with info from the base file. */
3933         if (fruit_stat_base(handle, fsp->base_fsp->fsp_name, false) == -1) {
3934                 return -1;
3935         }
3936         *sbuf = fsp->base_fsp->fsp_name->st;
3937         sbuf->st_ex_size = ad_getentrylen(ad, ADEID_RFORK);
3938         sbuf->st_ex_ino = fruit_inode(sbuf, fsp->fsp_name->stream_name);
3939
3940         DEBUG(10, ("fruit_fstat_rsrc %s, size: %zd\n",
3941                    smb_fname_str_dbg(fsp->fsp_name),
3942                    (ssize_t)sbuf->st_ex_size));
3943
3944         return 0;
3945 }
3946
3947 static int fruit_fstat(vfs_handle_struct *handle, files_struct *fsp,
3948                        SMB_STRUCT_STAT *sbuf)
3949 {
3950         int rc;
3951         char *name = NULL;
3952         char *tmp_base_name = NULL;
3953         NTSTATUS status;
3954         struct adouble *ad = (struct adouble *)
3955                 VFS_FETCH_FSP_EXTENSION(handle, fsp);
3956
3957         DEBUG(10, ("fruit_fstat called for %s\n",
3958                    smb_fname_str_dbg(fsp->fsp_name)));
3959
3960         if (fsp->base_fsp) {
3961                 tmp_base_name = fsp->base_fsp->fsp_name->base_name;
3962                 /* fsp_name is not converted with vfs_catia */
3963                 status = SMB_VFS_TRANSLATE_NAME(
3964                         handle->conn,
3965                         fsp->base_fsp->fsp_name->base_name,
3966                         vfs_translate_to_unix,
3967                         talloc_tos(), &name);
3968
3969                 if (NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
3970                         name = talloc_strdup(talloc_tos(), tmp_base_name);
3971                         if (name == NULL) {
3972                                 rc = -1;
3973                                 goto exit;
3974                         }
3975                 } else if (!NT_STATUS_IS_OK(status)) {
3976                         errno = map_errno_from_nt_status(status);
3977                         rc = -1;
3978                         goto exit;
3979                 }
3980                 fsp->base_fsp->fsp_name->base_name = name;
3981         }
3982
3983         if (ad == NULL || fsp->base_fsp == NULL) {
3984                 rc = SMB_VFS_NEXT_FSTAT(handle, fsp, sbuf);
3985                 goto exit;
3986         }
3987
3988         if (!fruit_fsp_recheck(ad, fsp)) {
3989                 rc = -1;
3990                 goto exit;
3991         }
3992
3993         switch (ad->ad_type) {
3994         case ADOUBLE_META:
3995                 rc = fruit_fstat_meta(handle, fsp, sbuf);
3996                 break;
3997         case ADOUBLE_RSRC:
3998                 rc = fruit_fstat_rsrc(handle, fsp, sbuf);
3999                 break;
4000         default:
4001                 DEBUG(10, ("fruit_fstat %s: bad type\n",
4002                            smb_fname_str_dbg(fsp->fsp_name)));
4003                 rc = -1;
4004                 goto exit;
4005         }
4006
4007         if (rc == 0) {
4008                 sbuf->st_ex_mode &= ~S_IFMT;
4009                 sbuf->st_ex_mode |= S_IFREG;
4010                 sbuf->st_ex_blocks = sbuf->st_ex_size / STAT_ST_BLOCKSIZE + 1;
4011         }
4012
4013 exit:
4014         DEBUG(10, ("fruit_fstat %s, size: %zd\n",
4015                    smb_fname_str_dbg(fsp->fsp_name),
4016                    (ssize_t)sbuf->st_ex_size));
4017         if (tmp_base_name) {
4018                 fsp->base_fsp->fsp_name->base_name = tmp_base_name;
4019         }
4020         TALLOC_FREE(name);
4021         return rc;
4022 }
4023
4024 static NTSTATUS fruit_streaminfo_meta_stream(
4025         vfs_handle_struct *handle,
4026         struct files_struct *fsp,
4027         const struct smb_filename *smb_fname,
4028         TALLOC_CTX *mem_ctx,
4029         unsigned int *pnum_streams,
4030         struct stream_struct **pstreams)
4031 {
4032         return NT_STATUS_OK;
4033 }
4034
4035 static NTSTATUS fruit_streaminfo_meta_netatalk(
4036         vfs_handle_struct *handle,
4037         struct files_struct *fsp,
4038         const struct smb_filename *smb_fname,
4039         TALLOC_CTX *mem_ctx,
4040         unsigned int *pnum_streams,
4041         struct stream_struct **pstreams)
4042 {
4043         struct adouble *ad = NULL;
4044         bool is_fi_empty;
4045         bool ok;
4046
4047         /* Remove the Netatalk xattr from the list */
4048         ok = del_fruit_stream(mem_ctx, pnum_streams, pstreams,
4049                               ":" NETATALK_META_XATTR ":$DATA");
4050         if (!ok) {
4051                 return NT_STATUS_NO_MEMORY;
4052         }
4053
4054         ad = ad_get(talloc_tos(), handle,
4055                     smb_fname->base_name, ADOUBLE_META);
4056         if (ad == NULL) {
4057                 return NT_STATUS_OK;
4058         }
4059
4060         is_fi_empty = ad_empty_finderinfo(ad);
4061         TALLOC_FREE(ad);
4062
4063         if (is_fi_empty) {
4064                 return NT_STATUS_OK;
4065         }
4066
4067         ok = add_fruit_stream(mem_ctx, pnum_streams, pstreams,
4068                               AFPINFO_STREAM_NAME, AFP_INFO_SIZE,
4069                               smb_roundup(handle->conn, AFP_INFO_SIZE));
4070         if (!ok) {
4071                 return NT_STATUS_NO_MEMORY;
4072         }
4073
4074         return NT_STATUS_OK;
4075 }
4076
4077 static NTSTATUS fruit_streaminfo_meta(vfs_handle_struct *handle,
4078                                       struct files_struct *fsp,
4079                                       const struct smb_filename *smb_fname,
4080                                       TALLOC_CTX *mem_ctx,
4081                                       unsigned int *pnum_streams,
4082                                       struct stream_struct **pstreams)
4083 {
4084         struct fruit_config_data *config = NULL;
4085         NTSTATUS status;
4086
4087         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
4088                                 return NT_STATUS_INTERNAL_ERROR);
4089
4090         switch (config->meta) {
4091         case FRUIT_META_NETATALK:
4092                 status = fruit_streaminfo_meta_netatalk(handle, fsp, smb_fname,
4093                                                         mem_ctx, pnum_streams,
4094                                                         pstreams);
4095                 break;
4096
4097         case FRUIT_META_STREAM:
4098                 status = fruit_streaminfo_meta_stream(handle, fsp, smb_fname,
4099                                                       mem_ctx, pnum_streams,
4100                                                       pstreams);
4101                 break;
4102
4103         default:
4104                 return NT_STATUS_INTERNAL_ERROR;
4105         }
4106
4107         return status;
4108 }
4109
4110 static NTSTATUS fruit_streaminfo_rsrc_stream(
4111         vfs_handle_struct *handle,
4112         struct files_struct *fsp,
4113         const struct smb_filename *smb_fname,
4114         TALLOC_CTX *mem_ctx,
4115         unsigned int *pnum_streams,
4116         struct stream_struct **pstreams)
4117 {
4118         bool ok;
4119
4120         ok = filter_empty_rsrc_stream(pnum_streams, pstreams);
4121         if (!ok) {
4122                 DBG_ERR("Filtering resource stream failed\n");
4123                 return NT_STATUS_INTERNAL_ERROR;
4124         }
4125         return NT_STATUS_OK;
4126 }
4127
4128 static NTSTATUS fruit_streaminfo_rsrc_xattr(
4129         vfs_handle_struct *handle,
4130         struct files_struct *fsp,
4131         const struct smb_filename *smb_fname,
4132         TALLOC_CTX *mem_ctx,
4133         unsigned int *pnum_streams,
4134         struct stream_struct **pstreams)
4135 {
4136         bool ok;
4137
4138         ok = filter_empty_rsrc_stream(pnum_streams, pstreams);
4139         if (!ok) {
4140                 DBG_ERR("Filtering resource stream failed\n");
4141                 return NT_STATUS_INTERNAL_ERROR;
4142         }
4143         return NT_STATUS_OK;
4144 }
4145
4146 static NTSTATUS fruit_streaminfo_rsrc_adouble(
4147         vfs_handle_struct *handle,
4148         struct files_struct *fsp,
4149         const struct smb_filename *smb_fname,
4150         TALLOC_CTX *mem_ctx,
4151         unsigned int *pnum_streams,
4152         struct stream_struct **pstreams)
4153 {
4154         struct stream_struct *stream = *pstreams;
4155         unsigned int num_streams = *pnum_streams;
4156         struct adouble *ad = NULL;
4157         bool ok;
4158         size_t rlen;
4159         int i;
4160
4161         /*
4162          * Check if there's a AFPRESOURCE_STREAM from the VFS streams backend
4163          * and if yes, remove it from the list
4164          */
4165         for (i = 0; i < num_streams; i++) {
4166                 if (strequal_m(stream[i].name, AFPRESOURCE_STREAM)) {
4167                         break;
4168                 }
4169         }
4170
4171         if (i < num_streams) {
4172                 DBG_WARNING("Unexpected AFPRESOURCE_STREAM on [%s]\n",
4173                             smb_fname_str_dbg(smb_fname));
4174
4175                 ok = del_fruit_stream(mem_ctx, pnum_streams, pstreams,
4176                                       AFPRESOURCE_STREAM);
4177                 if (!ok) {
4178                         return NT_STATUS_INTERNAL_ERROR;
4179                 }
4180         }
4181
4182         ad = ad_get(talloc_tos(), handle, smb_fname->base_name,
4183                     ADOUBLE_RSRC);
4184         if (ad == NULL) {
4185                 return NT_STATUS_OK;
4186         }
4187
4188         rlen = ad_getentrylen(ad, ADEID_RFORK);
4189         TALLOC_FREE(ad);
4190
4191         if (rlen == 0) {
4192                 return NT_STATUS_OK;
4193         }
4194
4195         ok = add_fruit_stream(mem_ctx, pnum_streams, pstreams,
4196                               AFPRESOURCE_STREAM_NAME, rlen,
4197                               smb_roundup(handle->conn, rlen));
4198         if (!ok) {
4199                 return NT_STATUS_NO_MEMORY;
4200         }
4201
4202         return NT_STATUS_OK;
4203 }
4204
4205 static NTSTATUS fruit_streaminfo_rsrc(vfs_handle_struct *handle,
4206                                       struct files_struct *fsp,
4207                                       const struct smb_filename *smb_fname,
4208                                       TALLOC_CTX *mem_ctx,
4209                                       unsigned int *pnum_streams,
4210                                       struct stream_struct **pstreams)
4211 {
4212         struct fruit_config_data *config = NULL;
4213         NTSTATUS status;
4214
4215         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
4216                                 return NT_STATUS_INTERNAL_ERROR);
4217
4218         switch (config->rsrc) {
4219         case FRUIT_RSRC_STREAM:
4220                 status = fruit_streaminfo_rsrc_stream(handle, fsp, smb_fname,
4221                                                       mem_ctx, pnum_streams,
4222                                                       pstreams);
4223                 break;
4224
4225         case FRUIT_RSRC_XATTR:
4226                 status = fruit_streaminfo_rsrc_xattr(handle, fsp, smb_fname,
4227                                                      mem_ctx, pnum_streams,
4228                                                      pstreams);
4229                 break;
4230
4231         case FRUIT_RSRC_ADFILE:
4232                 status = fruit_streaminfo_rsrc_adouble(handle, fsp, smb_fname,
4233                                                        mem_ctx, pnum_streams,
4234                                                        pstreams);
4235                 break;
4236
4237         default:
4238                 return NT_STATUS_INTERNAL_ERROR;
4239         }
4240
4241         return status;
4242 }
4243
4244 static NTSTATUS fruit_streaminfo(vfs_handle_struct *handle,
4245                                  struct files_struct *fsp,
4246                                  const struct smb_filename *smb_fname,
4247                                  TALLOC_CTX *mem_ctx,
4248                                  unsigned int *pnum_streams,
4249                                  struct stream_struct **pstreams)
4250 {
4251         struct fruit_config_data *config = NULL;
4252         NTSTATUS status;
4253
4254         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
4255                                 return NT_STATUS_UNSUCCESSFUL);
4256
4257         DBG_DEBUG("Path [%s]\n", smb_fname_str_dbg(smb_fname));
4258
4259         status = SMB_VFS_NEXT_STREAMINFO(handle, fsp, smb_fname, mem_ctx,
4260                                          pnum_streams, pstreams);
4261         if (!NT_STATUS_IS_OK(status)) {
4262                 return status;
4263         }
4264
4265         status = fruit_streaminfo_meta(handle, fsp, smb_fname,
4266                                        mem_ctx, pnum_streams, pstreams);
4267         if (!NT_STATUS_IS_OK(status)) {
4268                 return status;
4269         }
4270
4271         status = fruit_streaminfo_rsrc(handle, fsp, smb_fname,
4272                                        mem_ctx, pnum_streams, pstreams);
4273         if (!NT_STATUS_IS_OK(status)) {
4274                 return status;
4275         }
4276
4277         return NT_STATUS_OK;
4278 }
4279
4280 static int fruit_ntimes(vfs_handle_struct *handle,
4281                         const struct smb_filename *smb_fname,
4282                         struct smb_file_time *ft)
4283 {
4284         int rc = 0;
4285         struct adouble *ad = NULL;
4286         struct fruit_config_data *config = NULL;
4287
4288         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
4289                                 return -1);
4290
4291         if ((config->meta != FRUIT_META_NETATALK) ||
4292             null_timespec(ft->create_time))
4293         {
4294                 return SMB_VFS_NEXT_NTIMES(handle, smb_fname, ft);
4295         }
4296
4297         DEBUG(10,("set btime for %s to %s\n", smb_fname_str_dbg(smb_fname),
4298                  time_to_asc(convert_timespec_to_time_t(ft->create_time))));
4299
4300         ad = ad_get(talloc_tos(), handle, smb_fname->base_name, ADOUBLE_META);
4301         if (ad == NULL) {
4302                 goto exit;
4303         }
4304
4305         ad_setdate(ad, AD_DATE_CREATE | AD_DATE_UNIX,
4306                    convert_time_t_to_uint32_t(ft->create_time.tv_sec));
4307
4308         rc = ad_write(ad, smb_fname->base_name);
4309
4310 exit:
4311
4312         TALLOC_FREE(ad);
4313         if (rc != 0) {
4314                 DEBUG(1, ("fruit_ntimes: %s\n", smb_fname_str_dbg(smb_fname)));
4315                 return -1;
4316         }
4317         return SMB_VFS_NEXT_NTIMES(handle, smb_fname, ft);
4318 }
4319
4320 static int fruit_fallocate(struct vfs_handle_struct *handle,
4321                            struct files_struct *fsp,
4322                            uint32_t mode,
4323                            off_t offset,
4324                            off_t len)
4325 {
4326         struct adouble *ad =
4327                 (struct adouble *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4328
4329         if (ad == NULL) {
4330                 return SMB_VFS_NEXT_FALLOCATE(handle, fsp, mode, offset, len);
4331         }
4332
4333         if (!fruit_fsp_recheck(ad, fsp)) {
4334                 return -1;
4335         }
4336
4337         /* Let the pwrite code path handle it. */
4338         errno = ENOSYS;
4339         return -1;
4340 }
4341
4342 static int fruit_ftruncate_rsrc_xattr(struct vfs_handle_struct *handle,
4343                                       struct files_struct *fsp,
4344                                       off_t offset)
4345 {
4346         if (offset == 0) {
4347                 return SMB_VFS_FREMOVEXATTR(fsp, AFPRESOURCE_EA_NETATALK);
4348         }
4349
4350 #ifdef HAVE_ATTROPEN
4351         return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, offset);
4352 #endif
4353         return 0;
4354 }
4355
4356 static int fruit_ftruncate_rsrc_adouble(struct vfs_handle_struct *handle,
4357                                         struct files_struct *fsp,
4358                                         off_t offset)
4359 {
4360         int rc;
4361         struct adouble *ad =
4362                 (struct adouble *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4363         off_t ad_off = ad_getentryoff(ad, ADEID_RFORK);
4364
4365         if (!fruit_fsp_recheck(ad, fsp)) {
4366                 return -1;
4367         }
4368
4369         rc = SMB_VFS_NEXT_FTRUNCATE(handle, fsp, offset + ad_off);
4370         if (rc != 0) {
4371                 return -1;
4372         }
4373
4374         ad_setentrylen(ad, ADEID_RFORK, offset);
4375
4376         rc = ad_write(ad, NULL);
4377         if (rc != 0) {
4378                 DBG_ERR("ad_write [%s] failed [%s]\n",
4379                         fsp_str_dbg(fsp), strerror(errno));
4380                 return -1;
4381         }
4382
4383         DBG_DEBUG("Path [%s] offset [%jd]\n",
4384                   fsp_str_dbg(fsp), (intmax_t)offset);
4385
4386         return 0;
4387 }
4388
4389 static int fruit_ftruncate_rsrc_stream(struct vfs_handle_struct *handle,
4390                                        struct files_struct *fsp,
4391                                        off_t offset)
4392 {
4393         if (offset == 0) {
4394                 return SMB_VFS_NEXT_UNLINK(handle, fsp->fsp_name);
4395         }
4396
4397         return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, offset);
4398 }
4399
4400 static int fruit_ftruncate_rsrc(struct vfs_handle_struct *handle,
4401                                 struct files_struct *fsp,
4402                                 off_t offset)
4403 {
4404         int ret;
4405         struct fruit_config_data *config;
4406
4407         SMB_VFS_HANDLE_GET_DATA(handle, config,
4408                                 struct fruit_config_data, return -1);
4409
4410         switch (config->rsrc) {
4411         case FRUIT_RSRC_XATTR:
4412                 ret = fruit_ftruncate_rsrc_xattr(handle, fsp, offset);
4413                 break;
4414
4415         case FRUIT_RSRC_ADFILE:
4416                 ret = fruit_ftruncate_rsrc_adouble(handle, fsp, offset);
4417                 break;
4418
4419         case FRUIT_RSRC_STREAM:
4420                 ret = fruit_ftruncate_rsrc_stream(handle, fsp, offset);
4421                 break;
4422
4423         default:
4424                 DBG_ERR("Unexpected rsrc config [%d]\n", config->rsrc);
4425                 return -1;
4426         }
4427
4428
4429         return ret;
4430 }
4431
4432 static int fruit_ftruncate(struct vfs_handle_struct *handle,
4433                            struct files_struct *fsp,
4434                            off_t offset)
4435 {
4436         DBG_DEBUG("fruit_ftruncate called for file %s offset %.0f\n",
4437                    fsp_str_dbg(fsp), (double)offset);
4438
4439         if (is_afpinfo_stream(fsp->fsp_name)) {
4440                 if (offset > 60) {
4441                         DBG_WARNING("ftruncate %s to %jd",
4442                                     fsp_str_dbg(fsp), (intmax_t)offset);
4443                         /* OS X returns NT_STATUS_ALLOTTED_SPACE_EXCEEDED  */
4444                         errno = EOVERFLOW;
4445                         return -1;
4446                 }
4447
4448                 DBG_WARNING("ignoring ftruncate %s to %jd",
4449                             fsp_str_dbg(fsp), (intmax_t)offset);
4450                 /* OS X returns success but does nothing  */
4451                 return 0;
4452         }
4453
4454         if (is_afpresource_stream(fsp->fsp_name)) {
4455                 return fruit_ftruncate_rsrc(handle, fsp, offset);
4456         }
4457
4458         return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, offset);
4459 }
4460
4461 static NTSTATUS fruit_create_file(vfs_handle_struct *handle,
4462                                   struct smb_request *req,
4463                                   uint16_t root_dir_fid,
4464                                   struct smb_filename *smb_fname,
4465                                   uint32_t access_mask,
4466                                   uint32_t share_access,
4467                                   uint32_t create_disposition,
4468                                   uint32_t create_options,
4469                                   uint32_t file_attributes,
4470                                   uint32_t oplock_request,
4471                                   struct smb2_lease *lease,
4472                                   uint64_t allocation_size,
4473                                   uint32_t private_flags,
4474                                   struct security_descriptor *sd,
4475                                   struct ea_list *ea_list,
4476                                   files_struct **result,
4477                                   int *pinfo,
4478                                   const struct smb2_create_blobs *in_context_blobs,
4479                                   struct smb2_create_blobs *out_context_blobs)
4480 {
4481         NTSTATUS status;
4482         struct fruit_config_data *config = NULL;
4483         files_struct *fsp = NULL;
4484
4485         status = check_aapl(handle, req, in_context_blobs, out_context_blobs);
4486         if (!NT_STATUS_IS_OK(status)) {
4487                 goto fail;
4488         }
4489
4490         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
4491                                 return NT_STATUS_UNSUCCESSFUL);
4492
4493         status = SMB_VFS_NEXT_CREATE_FILE(
4494                 handle, req, root_dir_fid, smb_fname,
4495                 access_mask, share_access,
4496                 create_disposition, create_options,
4497                 file_attributes, oplock_request,
4498                 lease,
4499                 allocation_size, private_flags,
4500                 sd, ea_list, result,
4501                 pinfo, in_context_blobs, out_context_blobs);
4502         if (!NT_STATUS_IS_OK(status)) {
4503                 return status;
4504         }
4505
4506         fsp = *result;
4507
4508         if (config->nego_aapl) {
4509                 if (config->copyfile_enabled) {
4510                         /*
4511                          * Set a flag in the fsp. Gets used in
4512                          * copychunk to check whether the special
4513                          * Apple copyfile semantics for copychunk
4514                          * should be allowed in a copychunk request
4515                          * with a count of 0.
4516                          */
4517                         fsp->aapl_copyfile_supported = true;
4518                 }
4519
4520                 if (config->posix_rename && fsp->is_directory) {
4521                         /*
4522                          * Enable POSIX directory rename behaviour
4523                          */
4524                         fsp->posix_flags |= FSP_POSIX_FLAGS_RENAME;
4525                 }
4526         }
4527
4528         /*
4529          * If this is a plain open for existing files, opening an 0
4530          * byte size resource fork MUST fail with
4531          * NT_STATUS_OBJECT_NAME_NOT_FOUND.
4532          *
4533          * Cf the vfs_fruit torture tests in test_rfork_create().
4534          */
4535         if (is_afpresource_stream(fsp->fsp_name) &&
4536             create_disposition == FILE_OPEN)
4537         {
4538                 if (fsp->fsp_name->st.st_ex_size == 0) {
4539                         status = NT_STATUS_OBJECT_NAME_NOT_FOUND;
4540                         goto fail;
4541                 }
4542         }
4543
4544         if (is_ntfs_stream_smb_fname(smb_fname)
4545             || fsp->is_directory) {
4546                 return status;
4547         }
4548
4549         if (config->locking == FRUIT_LOCKING_NETATALK) {
4550                 status = fruit_check_access(
4551                         handle, *result,
4552                         access_mask,
4553                         map_share_mode_to_deny_mode(share_access, 0));
4554                 if (!NT_STATUS_IS_OK(status)) {
4555                         goto fail;
4556                 }
4557         }
4558
4559         return status;
4560
4561 fail:
4562         DEBUG(10, ("fruit_create_file: %s\n", nt_errstr(status)));
4563
4564         if (fsp) {
4565                 close_file(req, fsp, ERROR_CLOSE);
4566                 *result = fsp = NULL;
4567         }
4568
4569         return status;
4570 }
4571
4572 static NTSTATUS fruit_readdir_attr(struct vfs_handle_struct *handle,
4573                                    const struct smb_filename *fname,
4574                                    TALLOC_CTX *mem_ctx,
4575                                    struct readdir_attr_data **pattr_data)
4576 {
4577         struct fruit_config_data *config = NULL;
4578         struct readdir_attr_data *attr_data;
4579         NTSTATUS status;
4580
4581         SMB_VFS_HANDLE_GET_DATA(handle, config,
4582                                 struct fruit_config_data,
4583                                 return NT_STATUS_UNSUCCESSFUL);
4584
4585         if (!config->nego_aapl) {
4586                 return SMB_VFS_NEXT_READDIR_ATTR(handle, fname, mem_ctx, pattr_data);
4587         }
4588
4589         DEBUG(10, ("fruit_readdir_attr %s\n", fname->base_name));
4590
4591         *pattr_data = talloc_zero(mem_ctx, struct readdir_attr_data);
4592         if (*pattr_data == NULL) {
4593                 return NT_STATUS_UNSUCCESSFUL;
4594         }
4595         attr_data = *pattr_data;
4596         attr_data->type = RDATTR_AAPL;
4597
4598         /*
4599          * Mac metadata: compressed FinderInfo, resource fork length
4600          * and creation date
4601          */
4602         status = readdir_attr_macmeta(handle, fname, attr_data);
4603         if (!NT_STATUS_IS_OK(status)) {
4604                 /*
4605                  * Error handling is tricky: if we return failure from
4606                  * this function, the corresponding directory entry
4607                  * will to be passed to the client, so we really just
4608                  * want to error out on fatal errors.
4609                  */
4610                 if  (!NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED)) {
4611                         goto fail;
4612                 }
4613         }
4614
4615         /*
4616          * UNIX mode
4617          */
4618         if (config->unix_info_enabled) {
4619                 attr_data->attr_data.aapl.unix_mode = fname->st.st_ex_mode;
4620         }
4621
4622         /*
4623          * max_access
4624          */
4625         if (!config->readdir_attr_max_access) {
4626                 attr_data->attr_data.aapl.max_access = FILE_GENERIC_ALL;
4627         } else {
4628                 status = smbd_calculate_access_mask(
4629                         handle->conn,
4630                         fname,
4631                         false,
4632                         SEC_FLAG_MAXIMUM_ALLOWED,
4633                         &attr_data->attr_data.aapl.max_access);
4634                 if (!NT_STATUS_IS_OK(status)) {
4635                         goto fail;
4636                 }
4637         }
4638
4639         return NT_STATUS_OK;
4640
4641 fail:
4642         DEBUG(1, ("fruit_readdir_attr %s, error: %s\n",
4643                   fname->base_name, nt_errstr(status)));
4644         TALLOC_FREE(*pattr_data);
4645         return status;
4646 }
4647
4648 static NTSTATUS fruit_fget_nt_acl(vfs_handle_struct *handle,
4649                                   files_struct *fsp,
4650                                   uint32_t security_info,
4651                                   TALLOC_CTX *mem_ctx,
4652                                   struct security_descriptor **ppdesc)
4653 {
4654         NTSTATUS status;
4655         struct security_ace ace;
4656         struct dom_sid sid;
4657         struct fruit_config_data *config;
4658
4659         SMB_VFS_HANDLE_GET_DATA(handle, config,
4660                                 struct fruit_config_data,
4661                                 return NT_STATUS_UNSUCCESSFUL);
4662
4663         status = SMB_VFS_NEXT_FGET_NT_ACL(handle, fsp, security_info,
4664                                           mem_ctx, ppdesc);
4665         if (!NT_STATUS_IS_OK(status)) {
4666                 return status;
4667         }
4668
4669         /*
4670          * Add MS NFS style ACEs with uid, gid and mode
4671          */
4672         if (!config->unix_info_enabled) {
4673                 return NT_STATUS_OK;
4674         }
4675
4676         /* MS NFS style mode */
4677         sid_compose(&sid, &global_sid_Unix_NFS_Mode, fsp->fsp_name->st.st_ex_mode);
4678         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
4679         status = security_descriptor_dacl_add(*ppdesc, &ace);
4680         if (!NT_STATUS_IS_OK(status)) {
4681                 DEBUG(1,("failed to add MS NFS style ACE\n"));
4682                 return status;
4683         }
4684
4685         /* MS NFS style uid */
4686         sid_compose(&sid, &global_sid_Unix_NFS_Users, fsp->fsp_name->st.st_ex_uid);
4687         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
4688         status = security_descriptor_dacl_add(*ppdesc, &ace);
4689         if (!NT_STATUS_IS_OK(status)) {
4690                 DEBUG(1,("failed to add MS NFS style ACE\n"));
4691                 return status;
4692         }
4693
4694         /* MS NFS style gid */
4695         sid_compose(&sid, &global_sid_Unix_NFS_Groups, fsp->fsp_name->st.st_ex_gid);
4696         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
4697         status = security_descriptor_dacl_add(*ppdesc, &ace);
4698         if (!NT_STATUS_IS_OK(status)) {
4699                 DEBUG(1,("failed to add MS NFS style ACE\n"));
4700                 return status;
4701         }
4702
4703         return NT_STATUS_OK;
4704 }
4705
4706 static NTSTATUS fruit_fset_nt_acl(vfs_handle_struct *handle,
4707                                   files_struct *fsp,
4708                                   uint32_t security_info_sent,
4709                                   const struct security_descriptor *psd)
4710 {
4711         NTSTATUS status;
4712         bool do_chmod;
4713         mode_t ms_nfs_mode = 0;
4714         int result;
4715
4716         DBG_DEBUG("fruit_fset_nt_acl: %s\n", fsp_str_dbg(fsp));
4717
4718         status = check_ms_nfs(handle, fsp, psd, &ms_nfs_mode, &do_chmod);
4719         if (!NT_STATUS_IS_OK(status)) {
4720                 DEBUG(1, ("fruit_fset_nt_acl: check_ms_nfs failed%s\n", fsp_str_dbg(fsp)));
4721                 return status;
4722         }
4723
4724         status = SMB_VFS_NEXT_FSET_NT_ACL(handle, fsp, security_info_sent, psd);
4725         if (!NT_STATUS_IS_OK(status)) {
4726                 DEBUG(1, ("fruit_fset_nt_acl: SMB_VFS_NEXT_FSET_NT_ACL failed%s\n", fsp_str_dbg(fsp)));
4727                 return status;
4728         }
4729
4730         if (do_chmod) {
4731                 if (fsp->fh->fd != -1) {
4732                         result = SMB_VFS_FCHMOD(fsp, ms_nfs_mode);
4733                 } else {
4734                         result = SMB_VFS_CHMOD(fsp->conn,
4735                                                fsp->fsp_name,
4736                                                ms_nfs_mode);
4737                 }
4738
4739                 if (result != 0) {
4740                         DEBUG(1, ("chmod: %s, result: %d, %04o error %s\n", fsp_str_dbg(fsp),
4741                                   result, (unsigned)ms_nfs_mode,
4742                                   strerror(errno)));
4743                         status = map_nt_error_from_unix(errno);
4744                         return status;
4745                 }
4746         }
4747
4748         return NT_STATUS_OK;
4749 }
4750
4751 struct fruit_copy_chunk_state {
4752         struct vfs_handle_struct *handle;
4753         off_t copied;
4754         struct files_struct *src_fsp;
4755         struct files_struct *dst_fsp;
4756         bool is_copyfile;
4757 };
4758
4759 static void fruit_copy_chunk_done(struct tevent_req *subreq);
4760 static struct tevent_req *fruit_copy_chunk_send(struct vfs_handle_struct *handle,
4761                                                 TALLOC_CTX *mem_ctx,
4762                                                 struct tevent_context *ev,
4763                                                 struct files_struct *src_fsp,
4764                                                 off_t src_off,
4765                                                 struct files_struct *dest_fsp,
4766                                                 off_t dest_off,
4767                                                 off_t num)
4768 {
4769         struct tevent_req *req, *subreq;
4770         struct fruit_copy_chunk_state *fruit_copy_chunk_state;
4771         NTSTATUS status;
4772         struct fruit_config_data *config;
4773         off_t to_copy = num;
4774
4775         DEBUG(10,("soff: %ju, doff: %ju, len: %ju\n",
4776                   (uintmax_t)src_off, (uintmax_t)dest_off, (uintmax_t)num));
4777
4778         SMB_VFS_HANDLE_GET_DATA(handle, config,
4779                                 struct fruit_config_data,
4780                                 return NULL);
4781
4782         req = tevent_req_create(mem_ctx, &fruit_copy_chunk_state,
4783                                 struct fruit_copy_chunk_state);
4784         if (req == NULL) {
4785                 return NULL;
4786         }
4787         fruit_copy_chunk_state->handle = handle;
4788         fruit_copy_chunk_state->src_fsp = src_fsp;
4789         fruit_copy_chunk_state->dst_fsp = dest_fsp;
4790
4791         /*
4792          * Check if this a OS X copyfile style copychunk request with
4793          * a requested chunk count of 0 that was translated to a
4794          * copy_chunk_send VFS call overloading the parameters src_off
4795          * = dest_off = num = 0.
4796          */
4797         if ((src_off == 0) && (dest_off == 0) && (num == 0) &&
4798             src_fsp->aapl_copyfile_supported &&
4799             dest_fsp->aapl_copyfile_supported)
4800         {
4801                 status = vfs_stat_fsp(src_fsp);
4802                 if (tevent_req_nterror(req, status)) {
4803                         return tevent_req_post(req, ev);
4804                 }
4805
4806                 to_copy = src_fsp->fsp_name->st.st_ex_size;
4807                 fruit_copy_chunk_state->is_copyfile = true;
4808         }
4809
4810         subreq = SMB_VFS_NEXT_COPY_CHUNK_SEND(handle,
4811                                               mem_ctx,
4812                                               ev,
4813                                               src_fsp,
4814                                               src_off,
4815                                               dest_fsp,
4816                                               dest_off,
4817                                               to_copy);
4818         if (tevent_req_nomem(subreq, req)) {
4819                 return tevent_req_post(req, ev);
4820         }
4821
4822         tevent_req_set_callback(subreq, fruit_copy_chunk_done, req);
4823         return req;
4824 }
4825
4826 static void fruit_copy_chunk_done(struct tevent_req *subreq)
4827 {
4828         struct tevent_req *req = tevent_req_callback_data(
4829                 subreq, struct tevent_req);
4830         struct fruit_copy_chunk_state *state = tevent_req_data(
4831                 req, struct fruit_copy_chunk_state);
4832         NTSTATUS status;
4833         unsigned int num_streams = 0;
4834         struct stream_struct *streams = NULL;
4835         unsigned int i;
4836         struct smb_filename *src_fname_tmp = NULL;
4837         struct smb_filename *dst_fname_tmp = NULL;
4838
4839         status = SMB_VFS_NEXT_COPY_CHUNK_RECV(state->handle,
4840                                               subreq,
4841                                               &state->copied);
4842         TALLOC_FREE(subreq);
4843         if (tevent_req_nterror(req, status)) {
4844                 return;
4845         }
4846
4847         if (!state->is_copyfile) {
4848                 tevent_req_done(req);
4849                 return;
4850         }
4851
4852         /*
4853          * Now copy all remaining streams. We know the share supports
4854          * streams, because we're in vfs_fruit. We don't do this async
4855          * because streams are few and small.
4856          */
4857         status = vfs_streaminfo(state->handle->conn, state->src_fsp,
4858                                 state->src_fsp->fsp_name,
4859                                 req, &num_streams, &streams);
4860         if (tevent_req_nterror(req, status)) {
4861                 return;
4862         }
4863
4864         if (num_streams == 1) {
4865                 /* There is always one stream, ::$DATA. */
4866                 tevent_req_done(req);
4867                 return;
4868         }
4869
4870         for (i = 0; i < num_streams; i++) {
4871                 DEBUG(10, ("%s: stream: '%s'/%zu\n",
4872                           __func__, streams[i].name, (size_t)streams[i].size));
4873
4874                 src_fname_tmp = synthetic_smb_fname(
4875                         req,
4876                         state->src_fsp->fsp_name->base_name,
4877                         streams[i].name,
4878                         NULL,
4879                         state->src_fsp->fsp_name->flags);
4880                 if (tevent_req_nomem(src_fname_tmp, req)) {
4881                         return;
4882                 }
4883
4884                 if (is_ntfs_default_stream_smb_fname(src_fname_tmp)) {
4885                         TALLOC_FREE(src_fname_tmp);
4886                         continue;
4887                 }
4888
4889                 dst_fname_tmp = synthetic_smb_fname(
4890                         req,
4891                         state->dst_fsp->fsp_name->base_name,
4892                         streams[i].name,
4893                         NULL,
4894                         state->dst_fsp->fsp_name->flags);
4895                 if (tevent_req_nomem(dst_fname_tmp, req)) {
4896                         TALLOC_FREE(src_fname_tmp);
4897                         return;
4898                 }
4899
4900                 status = copy_file(req,
4901                                    state->handle->conn,
4902                                    src_fname_tmp,
4903                                    dst_fname_tmp,
4904                                    OPENX_FILE_CREATE_IF_NOT_EXIST,
4905                                    0, false);
4906                 if (!NT_STATUS_IS_OK(status)) {
4907                         DEBUG(1, ("%s: copy %s to %s failed: %s\n", __func__,
4908                                   smb_fname_str_dbg(src_fname_tmp),
4909                                   smb_fname_str_dbg(dst_fname_tmp),
4910                                   nt_errstr(status)));
4911                         TALLOC_FREE(src_fname_tmp);
4912                         TALLOC_FREE(dst_fname_tmp);
4913                         tevent_req_nterror(req, status);
4914                         return;
4915                 }
4916
4917                 TALLOC_FREE(src_fname_tmp);
4918                 TALLOC_FREE(dst_fname_tmp);
4919         }
4920
4921         TALLOC_FREE(streams);
4922         TALLOC_FREE(src_fname_tmp);
4923         TALLOC_FREE(dst_fname_tmp);
4924         tevent_req_done(req);
4925 }
4926
4927 static NTSTATUS fruit_copy_chunk_recv(struct vfs_handle_struct *handle,
4928                                       struct tevent_req *req,
4929                                       off_t *copied)
4930 {
4931         struct fruit_copy_chunk_state *fruit_copy_chunk_state = tevent_req_data(
4932                 req, struct fruit_copy_chunk_state);
4933         NTSTATUS status;
4934
4935         if (tevent_req_is_nterror(req, &status)) {
4936                 DEBUG(1, ("server side copy chunk failed: %s\n",
4937                           nt_errstr(status)));
4938                 *copied = 0;
4939                 tevent_req_received(req);
4940                 return status;
4941         }
4942
4943         *copied = fruit_copy_chunk_state->copied;
4944         tevent_req_received(req);
4945
4946         return NT_STATUS_OK;
4947 }
4948
4949 static struct vfs_fn_pointers vfs_fruit_fns = {
4950         .connect_fn = fruit_connect,
4951
4952         /* File operations */
4953         .chmod_fn = fruit_chmod,
4954         .chown_fn = fruit_chown,
4955         .unlink_fn = fruit_unlink,
4956         .rename_fn = fruit_rename,
4957         .rmdir_fn = fruit_rmdir,
4958         .open_fn = fruit_open,
4959         .pread_fn = fruit_pread,
4960         .pwrite_fn = fruit_pwrite,
4961         .stat_fn = fruit_stat,
4962         .lstat_fn = fruit_lstat,
4963         .fstat_fn = fruit_fstat,
4964         .streaminfo_fn = fruit_streaminfo,
4965         .ntimes_fn = fruit_ntimes,
4966         .ftruncate_fn = fruit_ftruncate,
4967         .fallocate_fn = fruit_fallocate,
4968         .create_file_fn = fruit_create_file,
4969         .readdir_attr_fn = fruit_readdir_attr,
4970         .copy_chunk_send_fn = fruit_copy_chunk_send,
4971         .copy_chunk_recv_fn = fruit_copy_chunk_recv,
4972
4973         /* NT ACL operations */
4974         .fget_nt_acl_fn = fruit_fget_nt_acl,
4975         .fset_nt_acl_fn = fruit_fset_nt_acl,
4976 };
4977
4978 NTSTATUS vfs_fruit_init(void);
4979 NTSTATUS vfs_fruit_init(void)
4980 {
4981         NTSTATUS ret = smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "fruit",
4982                                         &vfs_fruit_fns);
4983         if (!NT_STATUS_IS_OK(ret)) {
4984                 return ret;
4985         }
4986
4987         vfs_fruit_debug_level = debug_add_class("fruit");
4988         if (vfs_fruit_debug_level == -1) {
4989                 vfs_fruit_debug_level = DBGC_VFS;
4990                 DEBUG(0, ("%s: Couldn't register custom debugging class!\n",
4991                           "vfs_fruit_init"));
4992         } else {
4993                 DEBUG(10, ("%s: Debug class number of '%s': %d\n",
4994                            "vfs_fruit_init","fruit",vfs_fruit_debug_level));
4995         }
4996
4997         return ret;
4998 }