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 #include "lib/util/tevent_unix.h"
  35 #include "offload_token.h"
  36 #include "string_replace.h"
  37
  38 /*
  39  * Enhanced OS X and Netatalk compatibility
  40  * ========================================
  41  *
  42  * This modules takes advantage of vfs_streams_xattr and
  43  * vfs_catia. VFS modules vfs_fruit and vfs_streams_xattr must be
  44  * loaded in the correct order:
  45  *
  46  *   vfs modules = catia fruit streams_xattr
  47  *
  48  * The module intercepts the OS X special streams "AFP_AfpInfo" and
  49  * "AFP_Resource" and handles them in a special way. All other named
  50  * streams are deferred to vfs_streams_xattr.
  51  *
  52  * The OS X client maps all NTFS illegal characters to the Unicode
  53  * private range. This module optionally stores the charcters using
  54  * their native ASCII encoding using vfs_catia. If you're not enabling
  55  * this feature, you can skip catia from vfs modules.
  56  *
  57  * Finally, open modes are optionally checked against Netatalk AFP
  58  * share modes.
  59  *
  60  * The "AFP_AfpInfo" named stream is a binary blob containing OS X
  61  * extended metadata for files and directories. This module optionally
  62  * reads and stores this metadata in a way compatible with Netatalk 3
  63  * which stores the metadata in an EA "org.netatalk.metadata". Cf
  64  * source3/include/MacExtensions.h for a description of the binary
  65  * blobs content.
  66  *
  67  * The "AFP_Resource" named stream may be arbitrarily large, thus it
  68  * can't be stored in an xattr on most filesystem. ZFS on Solaris is
  69  * the only available filesystem where xattrs can be of any size and
  70  * the OS supports using the file APIs for xattrs.
  71  *
  72  * The AFP_Resource stream is stored in an AppleDouble file prepending
  73  * "._" to the filename. On Solaris with ZFS the stream is optionally
  74  * stored in an EA "org.netatalk.resource".
  75  *
  76  *
  77  * Extended Attributes
  78  * ===================
  79  *
  80  * The OS X SMB client sends xattrs as ADS too. For xattr interop with
  81  * other protocols you may want to adjust the xattr names the VFS
  82  * module vfs_streams_xattr uses for storing ADS's. This defaults to
  83  * user.DosStream.ADS_NAME:$DATA and can be changed by specifying
  84  * these module parameters:
  85  *
  86  *   streams_xattr:prefix = user.
  87  *   streams_xattr:store_stream_type = false
  88  *
  89  *
  90  * TODO
  91  * ====
  92  *
  93  * - log diagnostic if any needed VFS module is not loaded
  94  *   (eg with lp_vfs_objects())
  95  * - add tests
  96  */
  97
  98 static int vfs_fruit_debug_level = DBGC_VFS;
  99
 100 static struct global_fruit_config {
 101         bool nego_aapl; /* client negotiated AAPL */
 102
 103 } global_fruit_config;
 104
 105 #undef DBGC_CLASS
 106 #define DBGC_CLASS vfs_fruit_debug_level
 107
 108 #define FRUIT_PARAM_TYPE_NAME "fruit"
 109 #define ADOUBLE_NAME_PREFIX "._"
 110
 111 #define NETATALK_META_XATTR "org.netatalk.Metadata"
 112 #define NETATALK_RSRC_XATTR "org.netatalk.ResourceFork"
 113
 114 #if defined(HAVE_ATTROPEN)
 115 #define AFPINFO_EA_NETATALK NETATALK_META_XATTR
 116 #define AFPRESOURCE_EA_NETATALK NETATALK_RSRC_XATTR
 117 #else
 118 #define AFPINFO_EA_NETATALK "user." NETATALK_META_XATTR
 119 #define AFPRESOURCE_EA_NETATALK "user." NETATALK_RSRC_XATTR
 120 #endif
 121
 122 enum apple_fork {APPLE_FORK_DATA, APPLE_FORK_RSRC};
 123
 124 enum fruit_rsrc {FRUIT_RSRC_STREAM, FRUIT_RSRC_ADFILE, FRUIT_RSRC_XATTR};
 125 enum fruit_meta {FRUIT_META_STREAM, FRUIT_META_NETATALK};
 126 enum fruit_locking {FRUIT_LOCKING_NETATALK, FRUIT_LOCKING_NONE};
 127 enum fruit_encoding {FRUIT_ENC_NATIVE, FRUIT_ENC_PRIVATE};
 128
 129 struct fruit_config_data {
 130         enum fruit_rsrc rsrc;
 131         enum fruit_meta meta;
 132         enum fruit_locking locking;
 133         enum fruit_encoding encoding;
 134         bool use_aapl;          /* config from smb.conf */
 135         bool use_copyfile;
 136         bool readdir_attr_enabled;
 137         bool unix_info_enabled;
 138         bool copyfile_enabled;
 139         bool veto_appledouble;
 140         bool posix_rename;
 141         bool aapl_zero_file_id;
 142         const char *model;
 143         bool time_machine;
 144         off_t time_machine_max_size;
 145
 146         /*
 147          * Additional options, all enabled by default,
 148          * possibly useful for analyzing performance. The associated
 149          * operations with each of them may be expensive, so having
 150          * the chance to disable them individually gives a chance
 151          * tweaking the setup for the particular usecase.
 152          */
 153         bool readdir_attr_rsize;
 154         bool readdir_attr_finder_info;
 155         bool readdir_attr_max_access;
 156 };
 157
 158 static const struct enum_list fruit_rsrc[] = {
 159         {FRUIT_RSRC_STREAM, "stream"}, /* pass on to vfs_streams_xattr */
 160         {FRUIT_RSRC_ADFILE, "file"}, /* ._ AppleDouble file */
 161         {FRUIT_RSRC_XATTR, "xattr"}, /* Netatalk compatible xattr (ZFS only) */
 162         { -1, NULL}
 163 };
 164
 165 static const struct enum_list fruit_meta[] = {
 166         {FRUIT_META_STREAM, "stream"}, /* pass on to vfs_streams_xattr */
 167         {FRUIT_META_NETATALK, "netatalk"}, /* Netatalk compatible xattr */
 168         { -1, NULL}
 169 };
 170
 171 static const struct enum_list fruit_locking[] = {
 172         {FRUIT_LOCKING_NETATALK, "netatalk"}, /* synchronize locks with Netatalk */
 173         {FRUIT_LOCKING_NONE, "none"},
 174         { -1, NULL}
 175 };
 176
 177 static const struct enum_list fruit_encoding[] = {
 178         {FRUIT_ENC_NATIVE, "native"}, /* map unicode private chars to ASCII */
 179         {FRUIT_ENC_PRIVATE, "private"}, /* keep unicode private chars */
 180         { -1, NULL}
 181 };
 182
 183 static const char *fruit_catia_maps =
 184         "0x01:0xf001,0x02:0xf002,0x03:0xf003,0x04:0xf004,"
 185         "0x05:0xf005,0x06:0xf006,0x07:0xf007,0x08:0xf008,"
 186         "0x09:0xf009,0x0a:0xf00a,0x0b:0xf00b,0x0c:0xf00c,"
 187         "0x0d:0xf00d,0x0e:0xf00e,0x0f:0xf00f,0x10:0xf010,"
 188         "0x11:0xf011,0x12:0xf012,0x13:0xf013,0x14:0xf014,"
 189         "0x15:0xf015,0x16:0xf016,0x17:0xf017,0x18:0xf018,"
 190         "0x19:0xf019,0x1a:0xf01a,0x1b:0xf01b,0x1c:0xf01c,"
 191         "0x1d:0xf01d,0x1e:0xf01e,0x1f:0xf01f,"
 192         "0x22:0xf020,0x2a:0xf021,0x3a:0xf022,0x3c:0xf023,"
 193         "0x3e:0xf024,0x3f:0xf025,0x5c:0xf026,0x7c:0xf027,"
 194         "0x0d:0xf00d";
 195
 196 /*****************************************************************************
 197  * Defines, functions and data structures that deal with AppleDouble
 198  *****************************************************************************/
 199
 200 /*
 201  * There are two AppleDouble blobs we deal with:
 202  *
 203  * - ADOUBLE_META - AppleDouble blob used by Netatalk for storing
 204  *   metadata in an xattr
 205  *
 206  * - ADOUBLE_RSRC - AppleDouble blob used by OS X and Netatalk in
 207  *   ._ files
 208  */
 209 typedef enum {ADOUBLE_META, ADOUBLE_RSRC} adouble_type_t;
 210
 211 /* Version info */
 212 #define AD_VERSION2     0x00020000
 213 #define AD_VERSION      AD_VERSION2
 214
 215 /*
 216  * AppleDouble entry IDs.
 217  */
 218 #define ADEID_DFORK         1
 219 #define ADEID_RFORK         2
 220 #define ADEID_NAME          3
 221 #define ADEID_COMMENT       4
 222 #define ADEID_ICONBW        5
 223 #define ADEID_ICONCOL       6
 224 #define ADEID_FILEI         7
 225 #define ADEID_FILEDATESI    8
 226 #define ADEID_FINDERI       9
 227 #define ADEID_MACFILEI      10
 228 #define ADEID_PRODOSFILEI   11
 229 #define ADEID_MSDOSFILEI    12
 230 #define ADEID_SHORTNAME     13
 231 #define ADEID_AFPFILEI      14
 232 #define ADEID_DID           15
 233
 234 /* Private Netatalk entries */
 235 #define ADEID_PRIVDEV       16
 236 #define ADEID_PRIVINO       17
 237 #define ADEID_PRIVSYN       18
 238 #define ADEID_PRIVID        19
 239 #define ADEID_MAX           (ADEID_PRIVID + 1)
 240
 241 /*
 242  * These are the real ids for the private entries,
 243  * as stored in the adouble file
 244  */
 245 #define AD_DEV              0x80444556
 246 #define AD_INO              0x80494E4F
 247 #define AD_SYN              0x8053594E
 248 #define AD_ID               0x8053567E
 249
 250 /* Number of actually used entries */
 251 #define ADEID_NUM_XATTR      8
 252 #define ADEID_NUM_DOT_UND    2
 253 #define ADEID_NUM_RSRC_XATTR 1
 254
 255 /* AppleDouble magic */
 256 #define AD_APPLESINGLE_MAGIC 0x00051600
 257 #define AD_APPLEDOUBLE_MAGIC 0x00051607
 258 #define AD_MAGIC             AD_APPLEDOUBLE_MAGIC
 259
 260 /* Sizes of relevant entry bits */
 261 #define ADEDLEN_MAGIC       4
 262 #define ADEDLEN_VERSION     4
 263 #define ADEDLEN_FILLER      16
 264 #define AD_FILLER_TAG       "Netatalk        " /* should be 16 bytes */
 265 #define ADEDLEN_NENTRIES    2
 266 #define AD_HEADER_LEN       (ADEDLEN_MAGIC + ADEDLEN_VERSION + \
 267                              ADEDLEN_FILLER + ADEDLEN_NENTRIES) /* 26 */
 268 #define AD_ENTRY_LEN_EID    4
 269 #define AD_ENTRY_LEN_OFF    4
 270 #define AD_ENTRY_LEN_LEN    4
 271 #define AD_ENTRY_LEN (AD_ENTRY_LEN_EID + AD_ENTRY_LEN_OFF + AD_ENTRY_LEN_LEN)
 272
 273 /* Field widths */
 274 #define ADEDLEN_NAME            255
 275 #define ADEDLEN_COMMENT         200
 276 #define ADEDLEN_FILEI           16
 277 #define ADEDLEN_FINDERI         32
 278 #define ADEDLEN_FILEDATESI      16
 279 #define ADEDLEN_SHORTNAME       12 /* length up to 8.3 */
 280 #define ADEDLEN_AFPFILEI        4
 281 #define ADEDLEN_MACFILEI        4
 282 #define ADEDLEN_PRODOSFILEI     8
 283 #define ADEDLEN_MSDOSFILEI      2
 284 #define ADEDLEN_DID             4
 285 #define ADEDLEN_PRIVDEV         8
 286 #define ADEDLEN_PRIVINO         8
 287 #define ADEDLEN_PRIVSYN         8
 288 #define ADEDLEN_PRIVID          4
 289
 290 /* Offsets */
 291 #define ADEDOFF_MAGIC         0
 292 #define ADEDOFF_VERSION       (ADEDOFF_MAGIC + ADEDLEN_MAGIC)
 293 #define ADEDOFF_FILLER        (ADEDOFF_VERSION + ADEDLEN_VERSION)
 294 #define ADEDOFF_NENTRIES      (ADEDOFF_FILLER + ADEDLEN_FILLER)
 295
 296 #define ADEDOFF_FINDERI_XATTR    (AD_HEADER_LEN + \
 297                                   (ADEID_NUM_XATTR * AD_ENTRY_LEN))
 298 #define ADEDOFF_COMMENT_XATTR    (ADEDOFF_FINDERI_XATTR    + ADEDLEN_FINDERI)
 299 #define ADEDOFF_FILEDATESI_XATTR (ADEDOFF_COMMENT_XATTR    + ADEDLEN_COMMENT)
 300 #define ADEDOFF_AFPFILEI_XATTR   (ADEDOFF_FILEDATESI_XATTR + \
 301                                   ADEDLEN_FILEDATESI)
 302 #define ADEDOFF_PRIVDEV_XATTR    (ADEDOFF_AFPFILEI_XATTR   + ADEDLEN_AFPFILEI)
 303 #define ADEDOFF_PRIVINO_XATTR    (ADEDOFF_PRIVDEV_XATTR    + ADEDLEN_PRIVDEV)
 304 #define ADEDOFF_PRIVSYN_XATTR    (ADEDOFF_PRIVINO_XATTR    + ADEDLEN_PRIVINO)
 305 #define ADEDOFF_PRIVID_XATTR     (ADEDOFF_PRIVSYN_XATTR    + ADEDLEN_PRIVSYN)
 306
 307 #define ADEDOFF_FINDERI_DOT_UND  (AD_HEADER_LEN + \
 308                                   (ADEID_NUM_DOT_UND * AD_ENTRY_LEN))
 309 #define ADEDOFF_RFORK_DOT_UND    (ADEDOFF_FINDERI_DOT_UND + ADEDLEN_FINDERI)
 310
 311 #define AD_DATASZ_XATTR (AD_HEADER_LEN + \
 312                          (ADEID_NUM_XATTR * AD_ENTRY_LEN) + \
 313                          ADEDLEN_FINDERI + ADEDLEN_COMMENT + \
 314                          ADEDLEN_FILEDATESI + ADEDLEN_AFPFILEI + \
 315                          ADEDLEN_PRIVDEV + ADEDLEN_PRIVINO + \
 316                          ADEDLEN_PRIVSYN + ADEDLEN_PRIVID)
 317
 318 #if AD_DATASZ_XATTR != 402
 319 #error bad size for AD_DATASZ_XATTR
 320 #endif
 321
 322 #define AD_DATASZ_DOT_UND (AD_HEADER_LEN + \
 323                            (ADEID_NUM_DOT_UND * AD_ENTRY_LEN) + \
 324                            ADEDLEN_FINDERI)
 325 #if AD_DATASZ_DOT_UND != 82
 326 #error bad size for AD_DATASZ_DOT_UND
 327 #endif
 328
 329 /*
 330  * Sharemode locks fcntl() offsets
 331  */
 332 #if _FILE_OFFSET_BITS == 64 || defined(HAVE_LARGEFILE)
 333 #define AD_FILELOCK_BASE (UINT64_C(0x7FFFFFFFFFFFFFFF) - 9)
 334 #else
 335 #define AD_FILELOCK_BASE (UINT32_C(0x7FFFFFFF) - 9)
 336 #endif
 337 #define BYTELOCK_MAX (AD_FILELOCK_BASE - 1)
 338
 339 #define AD_FILELOCK_OPEN_WR        (AD_FILELOCK_BASE + 0)
 340 #define AD_FILELOCK_OPEN_RD        (AD_FILELOCK_BASE + 1)
 341 #define AD_FILELOCK_RSRC_OPEN_WR   (AD_FILELOCK_BASE + 2)
 342 #define AD_FILELOCK_RSRC_OPEN_RD   (AD_FILELOCK_BASE + 3)
 343 #define AD_FILELOCK_DENY_WR        (AD_FILELOCK_BASE + 4)
 344 #define AD_FILELOCK_DENY_RD        (AD_FILELOCK_BASE + 5)
 345 #define AD_FILELOCK_RSRC_DENY_WR   (AD_FILELOCK_BASE + 6)
 346 #define AD_FILELOCK_RSRC_DENY_RD   (AD_FILELOCK_BASE + 7)
 347 #define AD_FILELOCK_OPEN_NONE      (AD_FILELOCK_BASE + 8)
 348 #define AD_FILELOCK_RSRC_OPEN_NONE (AD_FILELOCK_BASE + 9)
 349
 350 /* Time stuff we overload the bits a little */
 351 #define AD_DATE_CREATE         0
 352 #define AD_DATE_MODIFY         4
 353 #define AD_DATE_BACKUP         8
 354 #define AD_DATE_ACCESS        12
 355 #define AD_DATE_MASK          (AD_DATE_CREATE | AD_DATE_MODIFY | \
 356                                AD_DATE_BACKUP | AD_DATE_ACCESS)
 357 #define AD_DATE_UNIX          (1 << 10)
 358 #define AD_DATE_START         0x80000000
 359 #define AD_DATE_DELTA         946684800
 360 #define AD_DATE_FROM_UNIX(x)  (htonl((x) - AD_DATE_DELTA))
 361 #define AD_DATE_TO_UNIX(x)    (ntohl(x) + AD_DATE_DELTA)
 362
 363 #define AD_XATTR_HDR_MAGIC    0x41545452 /* 'ATTR' */
 364 #define AD_XATTR_MAX_ENTRIES  1024 /* Some arbitrarily enforced limit */
 365 #define AD_XATTR_HDR_SIZE     36
 366 #define AD_XATTR_MAX_HDR_SIZE 65536
 367
 368 /* Accessor macros */
 369 #define ad_getentrylen(ad,eid)     ((ad)->ad_eid[(eid)].ade_len)
 370 #define ad_getentryoff(ad,eid)     ((ad)->ad_eid[(eid)].ade_off)
 371 #define ad_setentrylen(ad,eid,len) ((ad)->ad_eid[(eid)].ade_len = (len))
 372 #define ad_setentryoff(ad,eid,off) ((ad)->ad_eid[(eid)].ade_off = (off))
 373
 374 /*
 375  * Both struct ad_xattr_header and struct ad_xattr_entry describe the in memory
 376  * representation as well as the on-disk format.
 377  *
 378  * The ad_xattr_header follows the FinderInfo data in the FinderInfo entry if
 379  * the length of the FinderInfo entry is larger then 32 bytes. It is then
 380  * preceeded with 2 bytes padding.
 381  *
 382  * Cf: https://opensource.apple.com/source/xnu/xnu-4570.1.46/bsd/vfs/vfs_xattr.c
 383  */
 384
 385 struct ad_xattr_header {
 386         uint32_t adx_magic;        /* ATTR_HDR_MAGIC */
 387         uint32_t adx_debug_tag;    /* for debugging == file id of owning file */
 388         uint32_t adx_total_size;   /* file offset of end of attribute header + entries + data */
 389         uint32_t adx_data_start;   /* file offset to attribute data area */
 390         uint32_t adx_data_length;  /* length of attribute data area */
 391         uint32_t adx_reserved[3];
 392         uint16_t adx_flags;
 393         uint16_t adx_num_attrs;
 394 };
 395
 396 /* On-disk entries are aligned on 4 byte boundaries */
 397 struct ad_xattr_entry {
 398         uint32_t adx_offset;    /* file offset to data */
 399         uint32_t adx_length;    /* size of attribute data */
 400         uint16_t adx_flags;
 401         uint8_t  adx_namelen;   /* included the NULL terminator */
 402         char    *adx_name;      /* NULL-terminated UTF-8 name */
 403 };
 404
 405 struct ad_entry {
 406         size_t ade_off;
 407         size_t ade_len;
 408 };
 409
 410 struct adouble {
 411         vfs_handle_struct        *ad_handle;
 412         int                       ad_fd;
 413         bool                      ad_opened;
 414         adouble_type_t            ad_type;
 415         uint32_t                  ad_magic;
 416         uint32_t                  ad_version;
 417         struct ad_entry           ad_eid[ADEID_MAX];
 418         char                     *ad_data;
 419         struct ad_xattr_header    adx_header;
 420         struct ad_xattr_entry    *adx_entries;
 421 };
 422
 423 struct ad_entry_order {
 424         uint32_t id, offset, len;
 425 };
 426
 427 /* Netatalk AppleDouble metadata xattr */
 428 static const
 429 struct ad_entry_order entry_order_meta_xattr[ADEID_NUM_XATTR + 1] = {
 430         {ADEID_FINDERI,    ADEDOFF_FINDERI_XATTR,    ADEDLEN_FINDERI},
 431         {ADEID_COMMENT,    ADEDOFF_COMMENT_XATTR,    0},
 432         {ADEID_FILEDATESI, ADEDOFF_FILEDATESI_XATTR, ADEDLEN_FILEDATESI},
 433         {ADEID_AFPFILEI,   ADEDOFF_AFPFILEI_XATTR,   ADEDLEN_AFPFILEI},
 434         {ADEID_PRIVDEV,    ADEDOFF_PRIVDEV_XATTR,    0},
 435         {ADEID_PRIVINO,    ADEDOFF_PRIVINO_XATTR,    0},
 436         {ADEID_PRIVSYN,    ADEDOFF_PRIVSYN_XATTR,    0},
 437         {ADEID_PRIVID,     ADEDOFF_PRIVID_XATTR,     0},
 438         {0, 0, 0}
 439 };
 440
 441 /* AppleDouble resource fork file (the ones prefixed by "._") */
 442 static const
 443 struct ad_entry_order entry_order_dot_und[ADEID_NUM_DOT_UND + 1] = {
 444         {ADEID_FINDERI,    ADEDOFF_FINDERI_DOT_UND,  ADEDLEN_FINDERI},
 445         {ADEID_RFORK,      ADEDOFF_RFORK_DOT_UND,    0},
 446         {0, 0, 0}
 447 };
 448
 449 /*
 450  * Fake AppleDouble entry oder for resource fork xattr.  The xattr
 451  * isn't an AppleDouble file, it simply contains the resource data,
 452  * but in order to be able to use some API calls like ad_getentryoff()
 453  * we build a fake/helper struct adouble with this entry order struct.
 454  */
 455 static const
 456 struct ad_entry_order entry_order_rsrc_xattr[ADEID_NUM_RSRC_XATTR + 1] = {
 457         {ADEID_RFORK, 0, 0},
 458         {0, 0, 0}
 459 };
 460
 461 /* Conversion from enumerated id to on-disk AppleDouble id */
 462 #define AD_EID_DISK(a) (set_eid[a])
 463 static const uint32_t set_eid[] = {
 464         0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15,
 465         AD_DEV, AD_INO, AD_SYN, AD_ID
 466 };
 467
 468 struct fio {
 469         /* tcon config handle */
 470         struct fruit_config_data *config;
 471
 472         /* Denote stream type, meta or rsrc */
 473         adouble_type_t type;
 474 };
 475
 476 /*
 477  * Forward declarations
 478  */
 479 static struct adouble *ad_init(TALLOC_CTX *ctx, vfs_handle_struct *handle,
 480                                adouble_type_t type);
 481 static int ad_set(struct adouble *ad, const struct smb_filename *smb_fname);
 482 static int ad_fset(struct adouble *ad, files_struct *fsp);
 483 static int adouble_path(TALLOC_CTX *ctx,
 484                         const struct smb_filename *smb_fname__in,
 485                         struct smb_filename **ppsmb_fname_out);
 486 static AfpInfo *afpinfo_new(TALLOC_CTX *ctx);
 487 static ssize_t afpinfo_pack(const AfpInfo *ai, char *buf);
 488 static AfpInfo *afpinfo_unpack(TALLOC_CTX *ctx, const void *data);
 489
 490
 491 /**
 492  * Return a pointer to an AppleDouble entry
 493  *
 494  * Returns NULL if the entry is not present
 495  **/
 496 static char *ad_get_entry(const struct adouble *ad, int eid)
 497 {
 498         off_t off = ad_getentryoff(ad, eid);
 499         size_t len = ad_getentrylen(ad, eid);
 500
 501         if (off == 0 || len == 0) {
 502                 return NULL;
 503         }
 504
 505         return ad->ad_data + off;
 506 }
 507
 508 /**
 509  * Get a date
 510  **/
 511 static int ad_getdate(const struct adouble *ad,
 512                       unsigned int dateoff,
 513                       uint32_t *date)
 514 {
 515         bool xlate = (dateoff & AD_DATE_UNIX);
 516         char *p = NULL;
 517
 518         dateoff &= AD_DATE_MASK;
 519         p = ad_get_entry(ad, ADEID_FILEDATESI);
 520         if (p == NULL) {
 521                 return -1;
 522         }
 523
 524         if (dateoff > AD_DATE_ACCESS) {
 525             return -1;
 526         }
 527
 528         memcpy(date, p + dateoff, sizeof(uint32_t));
 529
 530         if (xlate) {
 531                 *date = AD_DATE_TO_UNIX(*date);
 532         }
 533         return 0;
 534 }
 535
 536 /**
 537  * Set a date
 538  **/
 539 static int ad_setdate(struct adouble *ad, unsigned int dateoff, uint32_t date)
 540 {
 541         bool xlate = (dateoff & AD_DATE_UNIX);
 542         char *p = NULL;
 543
 544         p = ad_get_entry(ad, ADEID_FILEDATESI);
 545         if (p == NULL) {
 546                 return -1;
 547         }
 548
 549         dateoff &= AD_DATE_MASK;
 550         if (xlate) {
 551                 date = AD_DATE_FROM_UNIX(date);
 552         }
 553
 554         if (dateoff > AD_DATE_ACCESS) {
 555                 return -1;
 556         }
 557
 558         memcpy(p + dateoff, &date, sizeof(date));
 559
 560         return 0;
 561 }
 562
 563
 564 /**
 565  * Map on-disk AppleDouble id to enumerated id
 566  **/
 567 static uint32_t get_eid(uint32_t eid)
 568 {
 569         if (eid <= 15) {
 570                 return eid;
 571         }
 572
 573         switch (eid) {
 574         case AD_DEV:
 575                 return ADEID_PRIVDEV;
 576         case AD_INO:
 577                 return ADEID_PRIVINO;
 578         case AD_SYN:
 579                 return ADEID_PRIVSYN;
 580         case AD_ID:
 581                 return ADEID_PRIVID;
 582         default:
 583                 break;
 584         }
 585
 586         return 0;
 587 }
 588
 589 /**
 590  * Pack AppleDouble structure into data buffer
 591  **/
 592 static bool ad_pack(struct adouble *ad)
 593 {
 594         uint32_t       eid;
 595         uint16_t       nent;
 596         uint32_t       bufsize;
 597         uint32_t       offset = 0;
 598
 599         bufsize = talloc_get_size(ad->ad_data);
 600         if (bufsize < AD_DATASZ_DOT_UND) {
 601                 DBG_ERR("bad buffer size [0x%" PRIx32 "]\n", bufsize);
 602                 return false;
 603         }
 604
 605         if (offset + ADEDLEN_MAGIC < offset ||
 606                         offset + ADEDLEN_MAGIC >= bufsize) {
 607                 return false;
 608         }
 609         RSIVAL(ad->ad_data, offset, ad->ad_magic);
 610         offset += ADEDLEN_MAGIC;
 611
 612         if (offset + ADEDLEN_VERSION < offset ||
 613                         offset + ADEDLEN_VERSION >= bufsize) {
 614                 return false;
 615         }
 616         RSIVAL(ad->ad_data, offset, ad->ad_version);
 617         offset += ADEDLEN_VERSION;
 618
 619         if (offset + ADEDLEN_FILLER < offset ||
 620                         offset + ADEDLEN_FILLER >= bufsize) {
 621                 return false;
 622         }
 623         if (ad->ad_type == ADOUBLE_RSRC) {
 624                 memcpy(ad->ad_data + offset, AD_FILLER_TAG, ADEDLEN_FILLER);
 625         }
 626         offset += ADEDLEN_FILLER;
 627
 628         if (offset + ADEDLEN_NENTRIES < offset ||
 629                         offset + ADEDLEN_NENTRIES >= bufsize) {
 630                 return false;
 631         }
 632         offset += ADEDLEN_NENTRIES;
 633
 634         for (eid = 0, nent = 0; eid < ADEID_MAX; eid++) {
 635                 if (ad->ad_eid[eid].ade_off == 0) {
 636                         /*
 637                          * ade_off is also used as indicator whether a
 638                          * specific entry is used or not
 639                          */
 640                         continue;
 641                 }
 642
 643                 if (offset + AD_ENTRY_LEN_EID < offset ||
 644                                 offset + AD_ENTRY_LEN_EID >= bufsize) {
 645                         return false;
 646                 }
 647                 RSIVAL(ad->ad_data, offset, AD_EID_DISK(eid));
 648                 offset += AD_ENTRY_LEN_EID;
 649
 650                 if (offset + AD_ENTRY_LEN_OFF < offset ||
 651                                 offset + AD_ENTRY_LEN_OFF >= bufsize) {
 652                         return false;
 653                 }
 654                 RSIVAL(ad->ad_data, offset, ad->ad_eid[eid].ade_off);
 655                 offset += AD_ENTRY_LEN_OFF;
 656
 657                 if (offset + AD_ENTRY_LEN_LEN < offset ||
 658                                 offset + AD_ENTRY_LEN_LEN >= bufsize) {
 659                         return false;
 660                 }
 661                 RSIVAL(ad->ad_data, offset, ad->ad_eid[eid].ade_len);
 662                 offset += AD_ENTRY_LEN_LEN;
 663
 664                 nent++;
 665         }
 666
 667         if (ADEDOFF_NENTRIES + 2 >= bufsize) {
 668                 return false;
 669         }
 670         RSSVAL(ad->ad_data, ADEDOFF_NENTRIES, nent);
 671
 672         return true;
 673 }
 674
 675 static bool ad_unpack_xattrs(struct adouble *ad)
 676 {
 677         struct ad_xattr_header *h = &ad->adx_header;
 678         const char *p = ad->ad_data;
 679         uint32_t hoff;
 680         uint32_t i;
 681
 682         if (ad_getentrylen(ad, ADEID_FINDERI) <= ADEDLEN_FINDERI) {
 683                 return true;
 684         }
 685
 686         /* 2 bytes padding */
 687         hoff = ad_getentryoff(ad, ADEID_FINDERI) + ADEDLEN_FINDERI + 2;
 688
 689         h->adx_magic       = RIVAL(p, hoff + 0);
 690         h->adx_debug_tag   = RIVAL(p, hoff + 4); /* Not used -> not checked */
 691         h->adx_total_size  = RIVAL(p, hoff + 8);
 692         h->adx_data_start  = RIVAL(p, hoff + 12);
 693         h->adx_data_length = RIVAL(p, hoff + 16);
 694         h->adx_flags       = RSVAL(p, hoff + 32); /* Not used -> not checked */
 695         h->adx_num_attrs   = RSVAL(p, hoff + 34);
 696
 697         if (h->adx_magic != AD_XATTR_HDR_MAGIC) {
 698                 DBG_ERR("Bad magic: 0x%" PRIx32 "\n", h->adx_magic);
 699                 return false;
 700         }
 701
 702         if (h->adx_total_size > ad_getentryoff(ad, ADEID_RFORK)) {
 703                 DBG_ERR("Bad total size: 0x%" PRIx32 "\n", h->adx_total_size);
 704                 return false;
 705         }
 706         if (h->adx_total_size > AD_XATTR_MAX_HDR_SIZE) {
 707                 DBG_ERR("Bad total size: 0x%" PRIx32 "\n", h->adx_total_size);
 708                 return false;
 709         }
 710
 711         if (h->adx_data_start < (hoff + AD_XATTR_HDR_SIZE)) {
 712                 DBG_ERR("Bad start: 0x%" PRIx32 "\n", h->adx_data_start);
 713                 return false;
 714         }
 715
 716         if ((h->adx_data_start + h->adx_data_length) < h->adx_data_start) {
 717                 DBG_ERR("Bad length: %" PRIu32 "\n", h->adx_data_length);
 718                 return false;
 719         }
 720         if ((h->adx_data_start + h->adx_data_length) >
 721             ad->adx_header.adx_total_size)
 722         {
 723                 DBG_ERR("Bad length: %" PRIu32 "\n", h->adx_data_length);
 724                 return false;
 725         }
 726
 727         if (h->adx_num_attrs > AD_XATTR_MAX_ENTRIES) {
 728                 DBG_ERR("Bad num xattrs: %" PRIu16 "\n", h->adx_num_attrs);
 729                 return false;
 730         }
 731
 732         if (h->adx_num_attrs == 0) {
 733                 return true;
 734         }
 735
 736         ad->adx_entries = talloc_zero_array(
 737                 ad, struct ad_xattr_entry, h->adx_num_attrs);
 738         if (ad->adx_entries == NULL) {
 739                 return false;
 740         }
 741
 742         hoff += AD_XATTR_HDR_SIZE;
 743
 744         for (i = 0; i < h->adx_num_attrs; i++) {
 745                 struct ad_xattr_entry *e = &ad->adx_entries[i];
 746
 747                 hoff = (hoff + 3) & ~3;
 748
 749                 e->adx_offset  = RIVAL(p, hoff + 0);
 750                 e->adx_length  = RIVAL(p, hoff + 4);
 751                 e->adx_flags   = RSVAL(p, hoff + 8);
 752                 e->adx_namelen = *(p + hoff + 10);
 753
 754                 if (e->adx_offset >= ad->adx_header.adx_total_size) {
 755                         DBG_ERR("Bad adx_offset: %" PRIx32 "\n",
 756                                 e->adx_offset);
 757                         return false;
 758                 }
 759
 760                 if ((e->adx_offset + e->adx_length) < e->adx_offset) {
 761                         DBG_ERR("Bad adx_length: %" PRIx32 "\n",
 762                                 e->adx_length);
 763                         return false;
 764                 }
 765
 766                 if ((e->adx_offset + e->adx_length) >
 767                     ad->adx_header.adx_total_size)
 768                 {
 769                         DBG_ERR("Bad adx_length: %" PRIx32 "\n",
 770                                 e->adx_length);
 771                         return false;
 772                 }
 773
 774                 if (e->adx_namelen == 0) {
 775                         DBG_ERR("Bad adx_namelen: %" PRIx32 "\n",
 776                                 e->adx_namelen);
 777                         return false;
 778                 }
 779                 if ((hoff + 11 + e->adx_namelen) < hoff + 11) {
 780                         DBG_ERR("Bad adx_namelen: %" PRIx32 "\n",
 781                                 e->adx_namelen);
 782                         return false;
 783                 }
 784                 if ((hoff + 11 + e->adx_namelen) >
 785                     ad->adx_header.adx_data_start)
 786                 {
 787                         DBG_ERR("Bad adx_namelen: %" PRIx32 "\n",
 788                                 e->adx_namelen);
 789                         return false;
 790                 }
 791
 792                 e->adx_name = talloc_strndup(ad->adx_entries,
 793                                              p + hoff + 11,
 794                                              e->adx_namelen);
 795                 if (e->adx_name == NULL) {
 796                         return false;
 797                 }
 798
 799                 DBG_DEBUG("xattr [%s] offset [0x%x] size [0x%x]\n",
 800                           e->adx_name, e->adx_offset, e->adx_length);
 801                 dump_data(10, (uint8_t *)(ad->ad_data + e->adx_offset),
 802                           e->adx_length);
 803
 804                 hoff += 11 + e->adx_namelen;
 805         }
 806
 807         return true;
 808 }
 809
 810 /**
 811  * Unpack an AppleDouble blob into a struct adoble
 812  **/
 813 static bool ad_unpack(struct adouble *ad, const size_t nentries,
 814                       size_t filesize)
 815 {
 816         size_t bufsize = talloc_get_size(ad->ad_data);
 817         size_t adentries, i;
 818         uint32_t eid, len, off;
 819         bool ok;
 820
 821         /*
 822          * The size of the buffer ad->ad_data is checked when read, so
 823          * we wouldn't have to check our own offsets, a few extra
 824          * checks won't hurt though. We have to check the offsets we
 825          * read from the buffer anyway.
 826          */
 827
 828         if (bufsize < (AD_HEADER_LEN + (AD_ENTRY_LEN * nentries))) {
 829                 DEBUG(1, ("bad size\n"));
 830                 return false;
 831         }
 832
 833         ad->ad_magic = RIVAL(ad->ad_data, 0);
 834         ad->ad_version = RIVAL(ad->ad_data, ADEDOFF_VERSION);
 835         if ((ad->ad_magic != AD_MAGIC) || (ad->ad_version != AD_VERSION)) {
 836                 DEBUG(1, ("wrong magic or version\n"));
 837                 return false;
 838         }
 839
 840         adentries = RSVAL(ad->ad_data, ADEDOFF_NENTRIES);
 841         if (adentries != nentries) {
 842                 DEBUG(1, ("invalid number of entries: %zu\n",
 843                           adentries));
 844                 return false;
 845         }
 846
 847         /* now, read in the entry bits */
 848         for (i = 0; i < adentries; i++) {
 849                 eid = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN));
 850                 eid = get_eid(eid);
 851                 off = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN) + 4);
 852                 len = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN) + 8);
 853
 854                 if (!eid || eid >= ADEID_MAX) {
 855                         DEBUG(1, ("bogus eid %d\n", eid));
 856                         return false;
 857                 }
 858
 859                 /*
 860                  * All entries other than the resource fork are
 861                  * expected to be read into the ad_data buffer, so
 862                  * ensure the specified offset is within that bound
 863                  */
 864                 if ((off > bufsize) && (eid != ADEID_RFORK)) {
 865                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 866                                   eid, off, len));
 867                         return false;
 868                 }
 869
 870                 /*
 871                  * All entries besides FinderInfo and resource fork
 872                  * must fit into the buffer. FinderInfo is special as
 873                  * it may be larger then the default 32 bytes (if it
 874                  * contains marshalled xattrs), but we will fixup that
 875                  * in ad_convert(). And the resource fork is never
 876                  * accessed directly by the ad_data buf (also see
 877                  * comment above) anyway.
 878                  */
 879                 if ((eid != ADEID_RFORK) &&
 880                     (eid != ADEID_FINDERI) &&
 881                     ((off + len) > bufsize)) {
 882                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 883                                   eid, off, len));
 884                         return false;
 885                 }
 886
 887                 /*
 888                  * That would be obviously broken
 889                  */
 890                 if (off > filesize) {
 891                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 892                                   eid, off, len));
 893                         return false;
 894                 }
 895
 896                 /*
 897                  * Check for any entry that has its end beyond the
 898                  * filesize.
 899                  */
 900                 if (off + len < off) {
 901                         DEBUG(1, ("offset wrap in eid %d: off: %" PRIu32
 902                                   ", len: %" PRIu32 "\n",
 903                                   eid, off, len));
 904                         return false;
 905
 906                 }
 907                 if (off + len > filesize) {
 908                         /*
 909                          * If this is the resource fork entry, we fix
 910                          * up the length, for any other entry we bail
 911                          * out.
 912                          */
 913                         if (eid != ADEID_RFORK) {
 914                                 DEBUG(1, ("bogus eid %d: off: %" PRIu32
 915                                           ", len: %" PRIu32 "\n",
 916                                           eid, off, len));
 917                                 return false;
 918                         }
 919
 920                         /*
 921                          * Fixup the resource fork entry by limiting
 922                          * the size to entryoffset - filesize.
 923                          */
 924                         len = filesize - off;
 925                         DEBUG(1, ("Limiting ADEID_RFORK: off: %" PRIu32
 926                                   ", len: %" PRIu32 "\n", off, len));
 927                 }
 928
 929                 ad->ad_eid[eid].ade_off = off;
 930                 ad->ad_eid[eid].ade_len = len;
 931         }
 932
 933         ok = ad_unpack_xattrs(ad);
 934         if (!ok) {
 935                 return false;
 936         }
 937
 938         return true;
 939 }
 940
 941 static bool ad_convert_xattr(struct adouble *ad,
 942                              const struct smb_filename *smb_fname,
 943                              char *map)
 944 {
 945         static struct char_mappings **string_replace_cmaps = NULL;
 946         uint16_t i;
 947         int saved_errno = 0;
 948         NTSTATUS status;
 949
 950         if (ad->adx_header.adx_num_attrs == 0) {
 951                 return true;
 952         }
 953
 954         if (string_replace_cmaps == NULL) {
 955                 const char **mappings = NULL;
 956
 957                 mappings = str_list_make_v3_const(
 958                         talloc_tos(), fruit_catia_maps, NULL);
 959                 if (mappings == NULL) {
 960                         return false;
 961                 }
 962                 string_replace_cmaps = string_replace_init_map(mappings);
 963                 TALLOC_FREE(mappings);
 964         }
 965
 966         for (i = 0; i < ad->adx_header.adx_num_attrs; i++) {
 967                 struct ad_xattr_entry *e = &ad->adx_entries[i];
 968                 char *mapped_name = NULL;
 969                 char *tmp = NULL;
 970                 struct smb_filename *stream_name = NULL;
 971                 files_struct *fsp = NULL;
 972                 ssize_t nwritten;
 973
 974                 status = string_replace_allocate(ad->ad_handle->conn,
 975                                                  e->adx_name,
 976                                                  string_replace_cmaps,
 977                                                  talloc_tos(),
 978                                                  &mapped_name,
 979                                                  vfs_translate_to_windows);
 980                 if (!NT_STATUS_IS_OK(status) &&
 981                     !NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED))
 982                 {
 983                         DBG_ERR("string_replace_allocate failed\n");
 984                         return -1;
 985                 }
 986
 987                 tmp = mapped_name;
 988                 mapped_name = talloc_asprintf(talloc_tos(), ":%s", tmp);
 989                 TALLOC_FREE(tmp);
 990                 if (mapped_name == NULL) {
 991                         return -1;
 992                 }
 993
 994                 stream_name = synthetic_smb_fname(talloc_tos(),
 995                                                   smb_fname->base_name,
 996                                                   mapped_name,
 997                                                   NULL,
 998                                                   smb_fname->flags);
 999                 TALLOC_FREE(mapped_name);
1000                 if (stream_name == NULL) {
1001                         DBG_ERR("synthetic_smb_fname failed\n");
1002                         return -1;
1003                 }
1004
1005                 DBG_DEBUG("stream_name: %s\n", smb_fname_str_dbg(stream_name));
1006
1007                 status = SMB_VFS_CREATE_FILE(
1008                         ad->ad_handle->conn,            /* conn */
1009                         NULL,                           /* req */
1010                         0,                              /* root_dir_fid */
1011                         stream_name,                    /* fname */
1012                         FILE_GENERIC_WRITE,             /* access_mask */
1013                         FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
1014                         FILE_OPEN_IF,                   /* create_disposition */
1015                         0,                              /* create_options */
1016                         0,                              /* file_attributes */
1017                         INTERNAL_OPEN_ONLY,             /* oplock_request */
1018                         NULL,                           /* lease */
1019                         0,                              /* allocation_size */
1020                         0,                              /* private_flags */
1021                         NULL,                           /* sd */
1022                         NULL,                           /* ea_list */
1023                         &fsp,                           /* result */
1024                         NULL,                           /* psbuf */
1025                         NULL, NULL);                    /* create context */
1026                 TALLOC_FREE(stream_name);
1027                 if (!NT_STATUS_IS_OK(status)) {
1028                         DBG_ERR("SMB_VFS_CREATE_FILE failed\n");
1029                         return -1;
1030                 }
1031
1032                 nwritten = SMB_VFS_PWRITE(fsp,
1033                                           map + e->adx_offset,
1034                                           e->adx_length,
1035                                           0);
1036                 if (nwritten == -1) {
1037                         DBG_ERR("SMB_VFS_PWRITE failed\n");
1038                         saved_errno = errno;
1039                         close_file(NULL, fsp, ERROR_CLOSE);
1040                         errno = saved_errno;
1041                         return -1;
1042                 }
1043
1044                 status = close_file(NULL, fsp, NORMAL_CLOSE);
1045                 if (!NT_STATUS_IS_OK(status)) {
1046                         return -1;
1047                 }
1048                 fsp = NULL;
1049         }
1050
1051         return true;
1052 }
1053
1054 /**
1055  * Convert from Apple's ._ file to Netatalk
1056  *
1057  * Apple's AppleDouble may contain a FinderInfo entry longer then 32
1058  * bytes containing packed xattrs. Netatalk can't deal with that, so
1059  * we simply discard the packed xattrs.
1060  *
1061  * @return -1 in case an error occurred, 0 if no conversion was done, 1
1062  * otherwise
1063  **/
1064 static int ad_convert(struct adouble *ad,
1065                       const struct smb_filename *smb_fname,
1066                       int fd)
1067 {
1068         int rc = 0;
1069         char *map = MAP_FAILED;
1070         size_t origlen;
1071         bool ok;
1072
1073         origlen = ad_getentryoff(ad, ADEID_RFORK) +
1074                 ad_getentrylen(ad, ADEID_RFORK);
1075
1076         /* FIXME: direct use of mmap(), vfs_aio_fork does it too */
1077         map = mmap(NULL, origlen, PROT_READ|PROT_WRITE, MAP_SHARED, fd, 0);
1078         if (map == MAP_FAILED) {
1079                 DEBUG(2, ("mmap AppleDouble: %s\n", strerror(errno)));
1080                 rc = -1;
1081                 goto exit;
1082         }
1083
1084         ok = ad_convert_xattr(ad, smb_fname, map);
1085         if (!ok) {
1086                 munmap(map, origlen);
1087                 return -1;
1088         }
1089
1090         if (ad_getentrylen(ad, ADEID_RFORK) > 0) {
1091                 memmove(map + ad_getentryoff(ad, ADEID_FINDERI) + ADEDLEN_FINDERI,
1092                         map + ad_getentryoff(ad, ADEID_RFORK),
1093                         ad_getentrylen(ad, ADEID_RFORK));
1094         }
1095
1096         ad_setentrylen(ad, ADEID_FINDERI, ADEDLEN_FINDERI);
1097         ad_setentryoff(ad, ADEID_RFORK,
1098                        ad_getentryoff(ad, ADEID_FINDERI) + ADEDLEN_FINDERI);
1099
1100         /*
1101          * FIXME: direct ftruncate(), but we don't have a fsp for the
1102          * VFS call
1103          */
1104         rc = ftruncate(fd, ad_getentryoff(ad, ADEID_RFORK)
1105                        + ad_getentrylen(ad, ADEID_RFORK));
1106
1107 exit:
1108         if (map != MAP_FAILED) {
1109                 munmap(map, origlen);
1110         }
1111         return rc;
1112 }
1113
1114 /**
1115  * Read and parse Netatalk AppleDouble metadata xattr
1116  **/
1117 static ssize_t ad_read_meta(struct adouble *ad,
1118                                 const struct smb_filename *smb_fname)
1119 {
1120         int      rc = 0;
1121         ssize_t  ealen;
1122         bool     ok;
1123
1124         DEBUG(10, ("reading meta xattr for %s\n", smb_fname->base_name));
1125
1126         ealen = SMB_VFS_GETXATTR(ad->ad_handle->conn, smb_fname,
1127                                  AFPINFO_EA_NETATALK, ad->ad_data,
1128                                  AD_DATASZ_XATTR);
1129         if (ealen == -1) {
1130                 switch (errno) {
1131                 case ENOATTR:
1132                 case ENOENT:
1133                         if (errno == ENOATTR) {
1134                                 errno = ENOENT;
1135                         }
1136                         rc = -1;
1137                         goto exit;
1138                 default:
1139                         DEBUG(2, ("error reading meta xattr: %s\n",
1140                                   strerror(errno)));
1141                         rc = -1;
1142                         goto exit;
1143                 }
1144         }
1145         if (ealen != AD_DATASZ_XATTR) {
1146                 DEBUG(2, ("bad size %zd\n", ealen));
1147                 errno = EINVAL;
1148                 rc = -1;
1149                 goto exit;
1150         }
1151
1152         /* Now parse entries */
1153         ok = ad_unpack(ad, ADEID_NUM_XATTR, AD_DATASZ_XATTR);
1154         if (!ok) {
1155                 DEBUG(2, ("invalid AppleDouble metadata xattr\n"));
1156                 errno = EINVAL;
1157                 rc = -1;
1158                 goto exit;
1159         }
1160
1161         if (!ad_getentryoff(ad, ADEID_FINDERI)
1162             || !ad_getentryoff(ad, ADEID_COMMENT)
1163             || !ad_getentryoff(ad, ADEID_FILEDATESI)
1164             || !ad_getentryoff(ad, ADEID_AFPFILEI)
1165             || !ad_getentryoff(ad, ADEID_PRIVDEV)
1166             || !ad_getentryoff(ad, ADEID_PRIVINO)
1167             || !ad_getentryoff(ad, ADEID_PRIVSYN)
1168             || !ad_getentryoff(ad, ADEID_PRIVID)) {
1169                 DEBUG(2, ("invalid AppleDouble metadata xattr\n"));
1170                 errno = EINVAL;
1171                 rc = -1;
1172                 goto exit;
1173         }
1174
1175 exit:
1176         DEBUG(10, ("reading meta xattr for %s, rc: %d\n",
1177                 smb_fname->base_name, rc));
1178
1179         if (rc != 0) {
1180                 ealen = -1;
1181                 if (errno == EINVAL) {
1182                         become_root();
1183                         removexattr(smb_fname->base_name, AFPINFO_EA_NETATALK);
1184                         unbecome_root();
1185                         errno = ENOENT;
1186                 }
1187         }
1188         return ealen;
1189 }
1190
1191 static int ad_open_rsrc_xattr(const struct smb_filename *smb_fname,
1192                                 int flags,
1193                                 mode_t mode)
1194 {
1195 #ifdef HAVE_ATTROPEN
1196         /* FIXME: direct Solaris xattr syscall */
1197         return attropen(smb_fname->base_name,
1198                         AFPRESOURCE_EA_NETATALK, flags, mode);
1199 #else
1200         errno = ENOSYS;
1201         return -1;
1202 #endif
1203 }
1204
1205 static int ad_open_rsrc_adouble(const struct smb_filename *smb_fname,
1206                                 int flags,
1207                                 mode_t mode)
1208 {
1209         int ret;
1210         int fd;
1211         struct smb_filename *adp_smb_fname = NULL;
1212
1213         ret = adouble_path(talloc_tos(), smb_fname, &adp_smb_fname);
1214         if (ret != 0) {
1215                 return -1;
1216         }
1217
1218         fd = open(adp_smb_fname->base_name, flags, mode);
1219         TALLOC_FREE(adp_smb_fname);
1220
1221         return fd;
1222 }
1223
1224 static int ad_open_rsrc(vfs_handle_struct *handle,
1225                         const struct smb_filename *smb_fname,
1226                         int flags,
1227                         mode_t mode)
1228 {
1229         struct fruit_config_data *config = NULL;
1230         int fd;
1231
1232         SMB_VFS_HANDLE_GET_DATA(handle, config,
1233                                 struct fruit_config_data, return -1);
1234
1235         if (config->rsrc == FRUIT_RSRC_XATTR) {
1236                 fd = ad_open_rsrc_xattr(smb_fname, flags, mode);
1237         } else {
1238                 fd = ad_open_rsrc_adouble(smb_fname, flags, mode);
1239         }
1240
1241         return fd;
1242 }
1243
1244 /*
1245  * Here's the deal: for ADOUBLE_META we can do without an fd as we can issue
1246  * path based xattr calls. For ADOUBLE_RSRC however we need a full-fledged fd
1247  * for file IO on the ._ file.
1248  */
1249 static int ad_open(vfs_handle_struct *handle,
1250                    struct adouble *ad,
1251                    files_struct *fsp,
1252                    const struct smb_filename *smb_fname,
1253                    int flags,
1254                    mode_t mode)
1255 {
1256         int fd;
1257
1258         DBG_DEBUG("Path [%s] type [%s]\n", smb_fname->base_name,
1259                   ad->ad_type == ADOUBLE_META ? "meta" : "rsrc");
1260
1261         if (ad->ad_type == ADOUBLE_META) {
1262                 return 0;
1263         }
1264
1265         if ((fsp != NULL) && (fsp->fh != NULL) && (fsp->fh->fd != -1)) {
1266                 ad->ad_fd = fsp->fh->fd;
1267                 ad->ad_opened = false;
1268                 return 0;
1269         }
1270
1271         fd = ad_open_rsrc(handle, smb_fname, flags, mode);
1272         if (fd == -1) {
1273                 return -1;
1274         }
1275         ad->ad_opened = true;
1276         ad->ad_fd = fd;
1277
1278         DBG_DEBUG("Path [%s] type [%s] fd [%d]\n",
1279                   smb_fname->base_name,
1280                   ad->ad_type == ADOUBLE_META ? "meta" : "rsrc", fd);
1281
1282         return 0;
1283 }
1284
1285 static ssize_t ad_read_rsrc_xattr(struct adouble *ad)
1286 {
1287         int ret;
1288         SMB_STRUCT_STAT st;
1289
1290         /* FIXME: direct sys_fstat(), don't have an fsp */
1291         ret = sys_fstat(ad->ad_fd, &st,
1292                         lp_fake_directory_create_times(
1293                                 SNUM(ad->ad_handle->conn)));
1294         if (ret != 0) {
1295                 return -1;
1296         }
1297
1298         ad_setentrylen(ad, ADEID_RFORK, st.st_ex_size);
1299         return st.st_ex_size;
1300 }
1301
1302 static ssize_t ad_read_rsrc_adouble(struct adouble *ad,
1303                                 const struct smb_filename *smb_fname)
1304 {
1305         SMB_STRUCT_STAT sbuf;
1306         char *p_ad = NULL;
1307         AfpInfo *ai = NULL;
1308         DATA_BLOB aiblob;
1309         struct smb_filename *stream_name = NULL;
1310         files_struct *fsp = NULL;
1311         ssize_t len;
1312         size_t size;
1313         ssize_t nwritten;
1314         NTSTATUS status;
1315         int saved_errno = 0;
1316         int ret;
1317         bool ok;
1318
1319         ret = sys_fstat(ad->ad_fd, &sbuf, lp_fake_directory_create_times(
1320                                 SNUM(ad->ad_handle->conn)));
1321         if (ret != 0) {
1322                 return -1;
1323         }
1324
1325         /*
1326          * AppleDouble file header content and size, two cases:
1327          *
1328          * - without xattrs it is exactly AD_DATASZ_DOT_UND (82) bytes large
1329          * - with embedded xattrs it can be larger, up to AD_XATTR_MAX_HDR_SIZE
1330          *
1331          * Read as much as we can up to AD_XATTR_MAX_HDR_SIZE.
1332          */
1333         size = sbuf.st_ex_size;
1334         if (size > talloc_array_length(ad->ad_data)) {
1335                 if (size > AD_XATTR_MAX_HDR_SIZE) {
1336                         size = AD_XATTR_MAX_HDR_SIZE;
1337                 }
1338                 p_ad = talloc_realloc(ad, ad->ad_data, char, size);
1339                 if (p_ad == NULL) {
1340                         return -1;
1341                 }
1342                 ad->ad_data = p_ad;
1343         }
1344
1345         len = sys_pread(ad->ad_fd, ad->ad_data,
1346                         talloc_array_length(ad->ad_data), 0);
1347         if (len != talloc_array_length(ad->ad_data)) {
1348                 DBG_NOTICE("%s %s: bad size: %zd\n",
1349                            smb_fname->base_name, strerror(errno), len);
1350                 return -1;
1351         }
1352
1353         /* Now parse entries */
1354         ok = ad_unpack(ad, ADEID_NUM_DOT_UND, sbuf.st_ex_size);
1355         if (!ok) {
1356                 DBG_ERR("invalid AppleDouble resource %s\n",
1357                         smb_fname->base_name);
1358                 errno = EINVAL;
1359                 return -1;
1360         }
1361
1362         if ((ad_getentryoff(ad, ADEID_FINDERI) != ADEDOFF_FINDERI_DOT_UND)
1363             || (ad_getentrylen(ad, ADEID_FINDERI) < ADEDLEN_FINDERI)
1364             || (ad_getentryoff(ad, ADEID_RFORK) < ADEDOFF_RFORK_DOT_UND)) {
1365                 DBG_ERR("invalid AppleDouble resource %s\n",
1366                         smb_fname->base_name);
1367                 errno = EINVAL;
1368                 return -1;
1369         }
1370
1371         if (ad_getentrylen(ad, ADEID_FINDERI) == ADEDLEN_FINDERI) {
1372                 return len;
1373         }
1374
1375         /*
1376          * Try to fixup AppleDouble files created by OS X with xattrs
1377          * appended to the ADEID_FINDERI entry. We simply remove the
1378          * xattrs blob, this means any fancy xattr that was stored
1379          * there is lost.
1380          */
1381
1382         ret = ad_convert(ad, smb_fname, ad->ad_fd);
1383         if (ret != 0) {
1384                 DBG_WARNING("Failed to convert [%s]\n", smb_fname->base_name);
1385                 return len;
1386         }
1387
1388         ok = ad_pack(ad);
1389         if (!ok) {
1390                 DBG_WARNING("ad_pack [%s] failed\n", smb_fname->base_name);
1391                 return -1;
1392         }
1393
1394         len = sys_pwrite(ad->ad_fd, ad->ad_data, AD_DATASZ_DOT_UND, 0);
1395         if (len != AD_DATASZ_DOT_UND) {
1396                 DBG_ERR("%s: bad size: %zd\n", smb_fname->base_name, len);
1397                 return -1;
1398         }
1399
1400         p_ad = ad_get_entry(ad, ADEID_FINDERI);
1401         if (p_ad == NULL) {
1402                 return -1;
1403         }
1404
1405         ai = afpinfo_new(talloc_tos());
1406         if (ai == NULL) {
1407                 return -1;
1408         }
1409
1410         memcpy(ai->afpi_FinderInfo, p_ad, ADEDLEN_FINDERI);
1411
1412         aiblob = data_blob_talloc(talloc_tos(), NULL, AFP_INFO_SIZE);
1413         if (aiblob.data == NULL) {
1414                 TALLOC_FREE(ai);
1415                 return -1;
1416         }
1417
1418         size = afpinfo_pack(ai, (char *)aiblob.data);
1419         TALLOC_FREE(ai);
1420         if (size != AFP_INFO_SIZE) {
1421                 return -1;
1422         }
1423
1424         stream_name = synthetic_smb_fname(talloc_tos(),
1425                                           smb_fname->base_name,
1426                                           AFPINFO_STREAM,
1427                                           NULL,
1428                                           smb_fname->flags);
1429         if (stream_name == NULL) {
1430                 data_blob_free(&aiblob);
1431                 DBG_ERR("synthetic_smb_fname failed\n");
1432                 return -1;
1433         }
1434
1435         DBG_DEBUG("stream_name: %s\n", smb_fname_str_dbg(stream_name));
1436
1437         status = SMB_VFS_CREATE_FILE(
1438                 ad->ad_handle->conn,            /* conn */
1439                 NULL,                           /* req */
1440                 0,                              /* root_dir_fid */
1441                 stream_name,                    /* fname */
1442                 FILE_GENERIC_WRITE,             /* access_mask */
1443                 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
1444                 FILE_OPEN_IF,                   /* create_disposition */
1445                 0,                              /* create_options */
1446                 0,                              /* file_attributes */
1447                 INTERNAL_OPEN_ONLY,             /* oplock_request */
1448                 NULL,                           /* lease */
1449                 0,                              /* allocation_size */
1450                 0,                              /* private_flags */
1451                 NULL,                           /* sd */
1452                 NULL,                           /* ea_list */
1453                 &fsp,                           /* result */
1454                 NULL,                           /* psbuf */
1455                 NULL, NULL);                    /* create context */
1456         TALLOC_FREE(stream_name);
1457         if (!NT_STATUS_IS_OK(status)) {
1458                 DBG_ERR("SMB_VFS_CREATE_FILE failed\n");
1459                 return -1;
1460         }
1461
1462         nwritten = SMB_VFS_PWRITE(fsp,
1463                                   aiblob.data,
1464                                   aiblob.length,
1465                                   0);
1466         if (nwritten == -1) {
1467                 DBG_ERR("SMB_VFS_PWRITE failed\n");
1468                 saved_errno = errno;
1469                 close_file(NULL, fsp, ERROR_CLOSE);
1470                 errno = saved_errno;
1471                 return -1;
1472         }
1473
1474         status = close_file(NULL, fsp, NORMAL_CLOSE);
1475         if (!NT_STATUS_IS_OK(status)) {
1476                 return -1;
1477         }
1478         fsp = NULL;
1479
1480         return len;
1481 }
1482
1483 /**
1484  * Read and parse resource fork, either ._ AppleDouble file or xattr
1485  **/
1486 static ssize_t ad_read_rsrc(struct adouble *ad,
1487                         const struct smb_filename *smb_fname)
1488 {
1489         struct fruit_config_data *config = NULL;
1490         ssize_t len;
1491
1492         SMB_VFS_HANDLE_GET_DATA(ad->ad_handle, config,
1493                                 struct fruit_config_data, return -1);
1494
1495         if (config->rsrc == FRUIT_RSRC_XATTR) {
1496                 len = ad_read_rsrc_xattr(ad);
1497         } else {
1498                 len = ad_read_rsrc_adouble(ad, smb_fname);
1499         }
1500
1501         return len;
1502 }
1503
1504 /**
1505  * Read and unpack an AppleDouble metadata xattr or resource
1506  **/
1507 static ssize_t ad_read(struct adouble *ad, const struct smb_filename *smb_fname)
1508 {
1509         switch (ad->ad_type) {
1510         case ADOUBLE_META:
1511                 return ad_read_meta(ad, smb_fname);
1512         case ADOUBLE_RSRC:
1513                 return ad_read_rsrc(ad, smb_fname);
1514         default:
1515                 return -1;
1516         }
1517 }
1518
1519 static int adouble_destructor(struct adouble *ad)
1520 {
1521         if ((ad->ad_fd != -1) && ad->ad_opened) {
1522                 close(ad->ad_fd);
1523                 ad->ad_fd = -1;
1524         }
1525         return 0;
1526 }
1527
1528 /**
1529  * Allocate a struct adouble without initialiing it
1530  *
1531  * The struct is either hang of the fsp extension context or if fsp is
1532  * NULL from ctx.
1533  *
1534  * @param[in] ctx        talloc context
1535  * @param[in] handle     vfs handle
1536  * @param[in] type       type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1537  *
1538  * @return               adouble handle
1539  **/
1540 static struct adouble *ad_alloc(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1541                                 adouble_type_t type)
1542 {
1543         int rc = 0;
1544         size_t adsize = 0;
1545         struct adouble *ad;
1546         struct fruit_config_data *config;
1547
1548         SMB_VFS_HANDLE_GET_DATA(handle, config,
1549                                 struct fruit_config_data, return NULL);
1550
1551         switch (type) {
1552         case ADOUBLE_META:
1553                 adsize = AD_DATASZ_XATTR;
1554                 break;
1555         case ADOUBLE_RSRC:
1556                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
1557                         adsize = AD_DATASZ_DOT_UND;
1558                 }
1559                 break;
1560         default:
1561                 return NULL;
1562         }
1563
1564         ad = talloc_zero(ctx, struct adouble);
1565         if (ad == NULL) {
1566                 rc = -1;
1567                 goto exit;
1568         }
1569
1570         if (adsize) {
1571                 ad->ad_data = talloc_zero_array(ad, char, adsize);
1572                 if (ad->ad_data == NULL) {
1573                         rc = -1;
1574                         goto exit;
1575                 }
1576         }
1577
1578         ad->ad_handle = handle;
1579         ad->ad_type = type;
1580         ad->ad_magic = AD_MAGIC;
1581         ad->ad_version = AD_VERSION;
1582         ad->ad_fd = -1;
1583
1584         talloc_set_destructor(ad, adouble_destructor);
1585
1586 exit:
1587         if (rc != 0) {
1588                 TALLOC_FREE(ad);
1589         }
1590         return ad;
1591 }
1592
1593 /**
1594  * Allocate and initialize a new struct adouble
1595  *
1596  * @param[in] ctx        talloc context
1597  * @param[in] handle     vfs handle
1598  * @param[in] type       type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1599  *
1600  * @return               adouble handle, initialized
1601  **/
1602 static struct adouble *ad_init(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1603                                adouble_type_t type)
1604 {
1605         int rc = 0;
1606         const struct ad_entry_order  *eid;
1607         struct adouble *ad = NULL;
1608         struct fruit_config_data *config;
1609         time_t t = time(NULL);
1610
1611         SMB_VFS_HANDLE_GET_DATA(handle, config,
1612                                 struct fruit_config_data, return NULL);
1613
1614         switch (type) {
1615         case ADOUBLE_META:
1616                 eid = entry_order_meta_xattr;
1617                 break;
1618         case ADOUBLE_RSRC:
1619                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
1620                         eid = entry_order_dot_und;
1621                 } else {
1622                         eid = entry_order_rsrc_xattr;
1623                 }
1624                 break;
1625         default:
1626                 return NULL;
1627         }
1628
1629         ad = ad_alloc(ctx, handle, type);
1630         if (ad == NULL) {
1631                 return NULL;
1632         }
1633
1634         while (eid->id) {
1635                 ad->ad_eid[eid->id].ade_off = eid->offset;
1636                 ad->ad_eid[eid->id].ade_len = eid->len;
1637                 eid++;
1638         }
1639
1640         /* put something sane in the date fields */
1641         ad_setdate(ad, AD_DATE_CREATE | AD_DATE_UNIX, t);
1642         ad_setdate(ad, AD_DATE_MODIFY | AD_DATE_UNIX, t);
1643         ad_setdate(ad, AD_DATE_ACCESS | AD_DATE_UNIX, t);
1644         ad_setdate(ad, AD_DATE_BACKUP, htonl(AD_DATE_START));
1645
1646         if (rc != 0) {
1647                 TALLOC_FREE(ad);
1648         }
1649         return ad;
1650 }
1651
1652 static struct adouble *ad_get_internal(TALLOC_CTX *ctx,
1653                                        vfs_handle_struct *handle,
1654                                        files_struct *fsp,
1655                                        const struct smb_filename *smb_fname,
1656                                        adouble_type_t type)
1657 {
1658         int rc = 0;
1659         ssize_t len;
1660         struct adouble *ad = NULL;
1661         int mode;
1662
1663         if (fsp != NULL) {
1664                 smb_fname = fsp->base_fsp->fsp_name;
1665         }
1666
1667         DEBUG(10, ("ad_get(%s) called for %s\n",
1668                    type == ADOUBLE_META ? "meta" : "rsrc",
1669                    smb_fname->base_name));
1670
1671         ad = ad_alloc(ctx, handle, type);
1672         if (ad == NULL) {
1673                 rc = -1;
1674                 goto exit;
1675         }
1676
1677         /* Try rw first so we can use the fd in ad_convert() */
1678         mode = O_RDWR;
1679
1680         rc = ad_open(handle, ad, fsp, smb_fname, mode, 0);
1681         if (rc == -1 && ((errno == EROFS) || (errno == EACCES))) {
1682                 mode = O_RDONLY;
1683                 rc = ad_open(handle, ad, fsp, smb_fname, mode, 0);
1684         }
1685         if (rc == -1) {
1686                 DBG_DEBUG("ad_open [%s] error [%s]\n",
1687                           smb_fname->base_name, strerror(errno));
1688                 goto exit;
1689
1690         }
1691
1692         len = ad_read(ad, smb_fname);
1693         if (len == -1) {
1694                 DEBUG(10, ("error reading AppleDouble for %s\n",
1695                         smb_fname->base_name));
1696                 rc = -1;
1697                 goto exit;
1698         }
1699
1700 exit:
1701         DEBUG(10, ("ad_get(%s) for %s returning %d\n",
1702                   type == ADOUBLE_META ? "meta" : "rsrc",
1703                   smb_fname->base_name, rc));
1704
1705         if (rc != 0) {
1706                 TALLOC_FREE(ad);
1707         }
1708         return ad;
1709 }
1710
1711 /**
1712  * Return AppleDouble data for a file
1713  *
1714  * @param[in] ctx      talloc context
1715  * @param[in] handle   vfs handle
1716  * @param[in] smb_fname pathname to file or directory
1717  * @param[in] type     type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1718  *
1719  * @return             talloced struct adouble or NULL on error
1720  **/
1721 static struct adouble *ad_get(TALLOC_CTX *ctx,
1722                               vfs_handle_struct *handle,
1723                               const struct smb_filename *smb_fname,
1724                               adouble_type_t type)
1725 {
1726         return ad_get_internal(ctx, handle, NULL, smb_fname, type);
1727 }
1728
1729 /**
1730  * Return AppleDouble data for a file
1731  *
1732  * @param[in] ctx      talloc context
1733  * @param[in] handle   vfs handle
1734  * @param[in] fsp      fsp to use for IO
1735  * @param[in] type     type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1736  *
1737  * @return             talloced struct adouble or NULL on error
1738  **/
1739 static struct adouble *ad_fget(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1740                                files_struct *fsp, adouble_type_t type)
1741 {
1742         return ad_get_internal(ctx, handle, fsp, NULL, type);
1743 }
1744
1745 /**
1746  * Set AppleDouble metadata on a file or directory
1747  *
1748  * @param[in] ad      adouble handle
1749  *
1750  * @param[in] smb_fname    pathname to file or directory
1751  *
1752  * @return            status code, 0 means success
1753  **/
1754 static int ad_set(struct adouble *ad, const struct smb_filename *smb_fname)
1755 {
1756         bool ok;
1757         int ret;
1758
1759         DBG_DEBUG("Path [%s]\n", smb_fname->base_name);
1760
1761         if (ad->ad_type != ADOUBLE_META) {
1762                 DBG_ERR("ad_set on [%s] used with ADOUBLE_RSRC\n",
1763                         smb_fname->base_name);
1764                 return -1;
1765         }
1766
1767         ok = ad_pack(ad);
1768         if (!ok) {
1769                 return -1;
1770         }
1771
1772         ret = SMB_VFS_SETXATTR(ad->ad_handle->conn,
1773                                smb_fname,
1774                                AFPINFO_EA_NETATALK,
1775                                ad->ad_data,
1776                                AD_DATASZ_XATTR, 0);
1777
1778         DBG_DEBUG("Path [%s] ret [%d]\n", smb_fname->base_name, ret);
1779
1780         return ret;
1781 }
1782
1783 /**
1784  * Set AppleDouble metadata on a file or directory
1785  *
1786  * @param[in] ad      adouble handle
1787  * @param[in] fsp     file handle
1788  *
1789  * @return            status code, 0 means success
1790  **/
1791 static int ad_fset(struct adouble *ad, files_struct *fsp)
1792 {
1793         int rc = -1;
1794         ssize_t len;
1795         bool ok;
1796
1797         DBG_DEBUG("Path [%s]\n", fsp_str_dbg(fsp));
1798
1799         if ((fsp == NULL)
1800             || (fsp->fh == NULL)
1801             || (fsp->fh->fd == -1))
1802         {
1803                 smb_panic("bad fsp");
1804         }
1805
1806         ok = ad_pack(ad);
1807         if (!ok) {
1808                 return -1;
1809         }
1810
1811         switch (ad->ad_type) {
1812         case ADOUBLE_META:
1813                 rc = SMB_VFS_NEXT_SETXATTR(ad->ad_handle,
1814                                            fsp->fsp_name,
1815                                            AFPINFO_EA_NETATALK,
1816                                            ad->ad_data,
1817                                            AD_DATASZ_XATTR, 0);
1818                 break;
1819
1820         case ADOUBLE_RSRC:
1821                 len = SMB_VFS_NEXT_PWRITE(ad->ad_handle,
1822                                           fsp,
1823                                           ad->ad_data,
1824                                           AD_DATASZ_DOT_UND,
1825                                           0);
1826                 if (len != AD_DATASZ_DOT_UND) {
1827                         DBG_ERR("short write on %s: %zd", fsp_str_dbg(fsp), len);
1828                         return -1;
1829                 }
1830                 rc = 0;
1831                 break;
1832
1833         default:
1834                 return -1;
1835         }
1836
1837         DBG_DEBUG("Path [%s] rc [%d]\n", fsp_str_dbg(fsp), rc);
1838
1839         return rc;
1840 }
1841
1842 /*****************************************************************************
1843  * Helper functions
1844  *****************************************************************************/
1845
1846 static bool is_afpinfo_stream(const struct smb_filename *smb_fname)
1847 {
1848         if (strncasecmp_m(smb_fname->stream_name,
1849                           AFPINFO_STREAM_NAME,
1850                           strlen(AFPINFO_STREAM_NAME)) == 0) {
1851                 return true;
1852         }
1853         return false;
1854 }
1855
1856 static bool is_afpresource_stream(const struct smb_filename *smb_fname)
1857 {
1858         if (strncasecmp_m(smb_fname->stream_name,
1859                           AFPRESOURCE_STREAM_NAME,
1860                           strlen(AFPRESOURCE_STREAM_NAME)) == 0) {
1861                 return true;
1862         }
1863         return false;
1864 }
1865
1866 /**
1867  * Test whether stream is an Apple stream, not used atm
1868  **/
1869 #if 0
1870 static bool is_apple_stream(const struct smb_filename *smb_fname)
1871 {
1872         if (is_afpinfo_stream(smb_fname)) {
1873                 return true;
1874         }
1875         if (is_afpresource_stream(smb_fname)) {
1876                 return true;
1877         }
1878         return false;
1879 }
1880 #endif
1881
1882 /**
1883  * Initialize config struct from our smb.conf config parameters
1884  **/
1885 static int init_fruit_config(vfs_handle_struct *handle)
1886 {
1887         struct fruit_config_data *config;
1888         int enumval;
1889         const char *tm_size_str = NULL;
1890
1891         config = talloc_zero(handle->conn, struct fruit_config_data);
1892         if (!config) {
1893                 DEBUG(1, ("talloc_zero() failed\n"));
1894                 errno = ENOMEM;
1895                 return -1;
1896         }
1897
1898         /*
1899          * Versions up to Samba 4.5.x had a spelling bug in the
1900          * fruit:resource option calling lp_parm_enum with
1901          * "res*s*ource" (ie two s).
1902          *
1903          * In Samba 4.6 we accept both the wrong and the correct
1904          * spelling, in Samba 4.7 the bad spelling will be removed.
1905          */
1906         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1907                                "ressource", fruit_rsrc, FRUIT_RSRC_ADFILE);
1908         if (enumval == -1) {
1909                 DEBUG(1, ("value for %s: resource type unknown\n",
1910                           FRUIT_PARAM_TYPE_NAME));
1911                 return -1;
1912         }
1913         config->rsrc = (enum fruit_rsrc)enumval;
1914
1915         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1916                                "resource", fruit_rsrc, enumval);
1917         if (enumval == -1) {
1918                 DEBUG(1, ("value for %s: resource type unknown\n",
1919                           FRUIT_PARAM_TYPE_NAME));
1920                 return -1;
1921         }
1922         config->rsrc = (enum fruit_rsrc)enumval;
1923
1924         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1925                                "metadata", fruit_meta, FRUIT_META_NETATALK);
1926         if (enumval == -1) {
1927                 DEBUG(1, ("value for %s: metadata type unknown\n",
1928                           FRUIT_PARAM_TYPE_NAME));
1929                 return -1;
1930         }
1931         config->meta = (enum fruit_meta)enumval;
1932
1933         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1934                                "locking", fruit_locking, FRUIT_LOCKING_NONE);
1935         if (enumval == -1) {
1936                 DEBUG(1, ("value for %s: locking type unknown\n",
1937                           FRUIT_PARAM_TYPE_NAME));
1938                 return -1;
1939         }
1940         config->locking = (enum fruit_locking)enumval;
1941
1942         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1943                                "encoding", fruit_encoding, FRUIT_ENC_PRIVATE);
1944         if (enumval == -1) {
1945                 DEBUG(1, ("value for %s: encoding type unknown\n",
1946                           FRUIT_PARAM_TYPE_NAME));
1947                 return -1;
1948         }
1949         config->encoding = (enum fruit_encoding)enumval;
1950
1951         if (config->rsrc == FRUIT_RSRC_ADFILE) {
1952                 config->veto_appledouble = lp_parm_bool(SNUM(handle->conn),
1953                                                         FRUIT_PARAM_TYPE_NAME,
1954                                                         "veto_appledouble",
1955                                                         true);
1956         }
1957
1958         config->use_aapl = lp_parm_bool(
1959                 -1, FRUIT_PARAM_TYPE_NAME, "aapl", true);
1960
1961         config->time_machine = lp_parm_bool(
1962                 SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME, "time machine", false);
1963
1964         config->unix_info_enabled = lp_parm_bool(
1965                 -1, FRUIT_PARAM_TYPE_NAME, "nfs_aces", true);
1966
1967         config->use_copyfile = lp_parm_bool(-1, FRUIT_PARAM_TYPE_NAME,
1968                                            "copyfile", false);
1969
1970         config->posix_rename = lp_parm_bool(
1971                 SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME, "posix_rename", true);
1972
1973         config->aapl_zero_file_id =
1974             lp_parm_bool(-1, FRUIT_PARAM_TYPE_NAME, "zero_file_id", true);
1975
1976         config->readdir_attr_rsize = lp_parm_bool(
1977                 SNUM(handle->conn), "readdir_attr", "aapl_rsize", true);
1978
1979         config->readdir_attr_finder_info = lp_parm_bool(
1980                 SNUM(handle->conn), "readdir_attr", "aapl_finder_info", true);
1981
1982         config->readdir_attr_max_access = lp_parm_bool(
1983                 SNUM(handle->conn), "readdir_attr", "aapl_max_access", true);
1984
1985         config->model = lp_parm_const_string(
1986                 -1, FRUIT_PARAM_TYPE_NAME, "model", "MacSamba");
1987
1988         tm_size_str = lp_parm_const_string(
1989                 SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1990                 "time machine max size", NULL);
1991         if (tm_size_str != NULL) {
1992                 config->time_machine_max_size = conv_str_size(tm_size_str);
1993         }
1994
1995         SMB_VFS_HANDLE_SET_DATA(handle, config,
1996                                 NULL, struct fruit_config_data,
1997                                 return -1);
1998
1999         return 0;
2000 }
2001
2002 /**
2003  * Prepend "._" to a basename
2004  * Return a new struct smb_filename with stream_name == NULL.
2005  **/
2006 static int adouble_path(TALLOC_CTX *ctx,
2007                         const struct smb_filename *smb_fname_in,
2008                         struct smb_filename **pp_smb_fname_out)
2009 {
2010         char *parent;
2011         const char *base;
2012         struct smb_filename *smb_fname = cp_smb_filename(ctx,
2013                                                 smb_fname_in);
2014
2015         if (smb_fname == NULL) {
2016                 return -1;
2017         }
2018
2019         /* We need streamname to be NULL */
2020         TALLOC_FREE(smb_fname->stream_name);
2021
2022         /* And we're replacing base_name. */
2023         TALLOC_FREE(smb_fname->base_name);
2024
2025         if (!parent_dirname(smb_fname, smb_fname_in->base_name,
2026                                 &parent, &base)) {
2027                 TALLOC_FREE(smb_fname);
2028                 return -1;
2029         }
2030
2031         smb_fname->base_name = talloc_asprintf(smb_fname,
2032                                         "%s/._%s", parent, base);
2033         if (smb_fname->base_name == NULL) {
2034                 TALLOC_FREE(smb_fname);
2035                 return -1;
2036         }
2037
2038         *pp_smb_fname_out = smb_fname;
2039
2040         return 0;
2041 }
2042
2043 /**
2044  * Allocate and initialize an AfpInfo struct
2045  **/
2046 static AfpInfo *afpinfo_new(TALLOC_CTX *ctx)
2047 {
2048         AfpInfo *ai = talloc_zero(ctx, AfpInfo);
2049         if (ai == NULL) {
2050                 return NULL;
2051         }
2052         ai->afpi_Signature = AFP_Signature;
2053         ai->afpi_Version = AFP_Version;
2054         ai->afpi_BackupTime = AD_DATE_START;
2055         return ai;
2056 }
2057
2058 /**
2059  * Pack an AfpInfo struct into a buffer
2060  *
2061  * Buffer size must be at least AFP_INFO_SIZE
2062  * Returns size of packed buffer
2063  **/
2064 static ssize_t afpinfo_pack(const AfpInfo *ai, char *buf)
2065 {
2066         memset(buf, 0, AFP_INFO_SIZE);
2067
2068         RSIVAL(buf, 0, ai->afpi_Signature);
2069         RSIVAL(buf, 4, ai->afpi_Version);
2070         RSIVAL(buf, 12, ai->afpi_BackupTime);
2071         memcpy(buf + 16, ai->afpi_FinderInfo, sizeof(ai->afpi_FinderInfo));
2072
2073         return AFP_INFO_SIZE;
2074 }
2075
2076 /**
2077  * Unpack a buffer into a AfpInfo structure
2078  *
2079  * Buffer size must be at least AFP_INFO_SIZE
2080  * Returns allocated AfpInfo struct
2081  **/
2082 static AfpInfo *afpinfo_unpack(TALLOC_CTX *ctx, const void *data)
2083 {
2084         AfpInfo *ai = talloc_zero(ctx, AfpInfo);
2085         if (ai == NULL) {
2086                 return NULL;
2087         }
2088
2089         ai->afpi_Signature = RIVAL(data, 0);
2090         ai->afpi_Version = RIVAL(data, 4);
2091         ai->afpi_BackupTime = RIVAL(data, 12);
2092         memcpy(ai->afpi_FinderInfo, (const char *)data + 16,
2093                sizeof(ai->afpi_FinderInfo));
2094
2095         if (ai->afpi_Signature != AFP_Signature
2096             || ai->afpi_Version != AFP_Version) {
2097                 DEBUG(1, ("Bad AfpInfo signature or version\n"));
2098                 TALLOC_FREE(ai);
2099         }
2100
2101         return ai;
2102 }
2103
2104 /**
2105  * Fake an inode number from the md5 hash of the (xattr) name
2106  **/
2107 static SMB_INO_T fruit_inode(const SMB_STRUCT_STAT *sbuf, const char *sname)
2108 {
2109         MD5_CTX ctx;
2110         unsigned char hash[16];
2111         SMB_INO_T result;
2112         char *upper_sname;
2113
2114         upper_sname = talloc_strdup_upper(talloc_tos(), sname);
2115         SMB_ASSERT(upper_sname != NULL);
2116
2117         MD5Init(&ctx);
2118         MD5Update(&ctx, (const unsigned char *)&(sbuf->st_ex_dev),
2119                   sizeof(sbuf->st_ex_dev));
2120         MD5Update(&ctx, (const unsigned char *)&(sbuf->st_ex_ino),
2121                   sizeof(sbuf->st_ex_ino));
2122         MD5Update(&ctx, (unsigned char *)upper_sname,
2123                   talloc_get_size(upper_sname)-1);
2124         MD5Final(hash, &ctx);
2125
2126         TALLOC_FREE(upper_sname);
2127
2128         /* Hopefully all the variation is in the lower 4 (or 8) bytes! */
2129         memcpy(&result, hash, sizeof(result));
2130
2131         DEBUG(10, ("fruit_inode \"%s\": ino=0x%llu\n",
2132                    sname, (unsigned long long)result));
2133
2134         return result;
2135 }
2136
2137 static bool add_fruit_stream(TALLOC_CTX *mem_ctx, unsigned int *num_streams,
2138                              struct stream_struct **streams,
2139                              const char *name, off_t size,
2140                              off_t alloc_size)
2141 {
2142         struct stream_struct *tmp;
2143
2144         tmp = talloc_realloc(mem_ctx, *streams, struct stream_struct,
2145                              (*num_streams)+1);
2146         if (tmp == NULL) {
2147                 return false;
2148         }
2149
2150         tmp[*num_streams].name = talloc_asprintf(tmp, "%s:$DATA", name);
2151         if (tmp[*num_streams].name == NULL) {
2152                 return false;
2153         }
2154
2155         tmp[*num_streams].size = size;
2156         tmp[*num_streams].alloc_size = alloc_size;
2157
2158         *streams = tmp;
2159         *num_streams += 1;
2160         return true;
2161 }
2162
2163 static bool filter_empty_rsrc_stream(unsigned int *num_streams,
2164                                      struct stream_struct **streams)
2165 {
2166         struct stream_struct *tmp = *streams;
2167         unsigned int i;
2168
2169         if (*num_streams == 0) {
2170                 return true;
2171         }
2172
2173         for (i = 0; i < *num_streams; i++) {
2174                 if (strequal_m(tmp[i].name, AFPRESOURCE_STREAM)) {
2175                         break;
2176                 }
2177         }
2178
2179         if (i == *num_streams) {
2180                 return true;
2181         }
2182
2183         if (tmp[i].size > 0) {
2184                 return true;
2185         }
2186
2187         TALLOC_FREE(tmp[i].name);
2188         if (*num_streams - 1 > i) {
2189                 memmove(&tmp[i], &tmp[i+1],
2190                         (*num_streams - i - 1) * sizeof(struct stream_struct));
2191         }
2192
2193         *num_streams -= 1;
2194         return true;
2195 }
2196
2197 static bool del_fruit_stream(TALLOC_CTX *mem_ctx, unsigned int *num_streams,
2198                              struct stream_struct **streams,
2199                              const char *name)
2200 {
2201         struct stream_struct *tmp = *streams;
2202         unsigned int i;
2203
2204         if (*num_streams == 0) {
2205                 return true;
2206         }
2207
2208         for (i = 0; i < *num_streams; i++) {
2209                 if (strequal_m(tmp[i].name, name)) {
2210                         break;
2211                 }
2212         }
2213
2214         if (i == *num_streams) {
2215                 return true;
2216         }
2217
2218         TALLOC_FREE(tmp[i].name);
2219         if (*num_streams - 1 > i) {
2220                 memmove(&tmp[i], &tmp[i+1],
2221                         (*num_streams - i - 1) * sizeof(struct stream_struct));
2222         }
2223
2224         *num_streams -= 1;
2225         return true;
2226 }
2227
2228 static bool ad_empty_finderinfo(const struct adouble *ad)
2229 {
2230         int cmp;
2231         char emptybuf[ADEDLEN_FINDERI] = {0};
2232         char *fi = NULL;
2233
2234         fi = ad_get_entry(ad, ADEID_FINDERI);
2235         if (fi == NULL) {
2236                 DBG_ERR("Missing FinderInfo in struct adouble [%p]\n", ad);
2237                 return false;
2238         }
2239
2240         cmp = memcmp(emptybuf, fi, ADEDLEN_FINDERI);
2241         return (cmp == 0);
2242 }
2243
2244 static bool ai_empty_finderinfo(const AfpInfo *ai)
2245 {
2246         int cmp;
2247         char emptybuf[ADEDLEN_FINDERI] = {0};
2248
2249         cmp = memcmp(emptybuf, &ai->afpi_FinderInfo[0], ADEDLEN_FINDERI);
2250         return (cmp == 0);
2251 }
2252
2253 /**
2254  * Update btime with btime from Netatalk
2255  **/
2256 static void update_btime(vfs_handle_struct *handle,
2257                          struct smb_filename *smb_fname)
2258 {
2259         uint32_t t;
2260         struct timespec creation_time = {0};
2261         struct adouble *ad;
2262         struct fruit_config_data *config = NULL;
2263
2264         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
2265                                 return);
2266
2267         switch (config->meta) {
2268         case FRUIT_META_STREAM:
2269                 return;
2270         case FRUIT_META_NETATALK:
2271                 /* Handled below */
2272                 break;
2273         default:
2274                 DBG_ERR("Unexpected meta config [%d]\n", config->meta);
2275                 return;
2276         }
2277
2278         ad = ad_get(talloc_tos(), handle, smb_fname, ADOUBLE_META);
2279         if (ad == NULL) {
2280                 return;
2281         }
2282         if (ad_getdate(ad, AD_DATE_UNIX | AD_DATE_CREATE, &t) != 0) {
2283                 TALLOC_FREE(ad);
2284                 return;
2285         }
2286         TALLOC_FREE(ad);
2287
2288         creation_time.tv_sec = convert_uint32_t_to_time_t(t);
2289         update_stat_ex_create_time(&smb_fname->st, creation_time);
2290
2291         return;
2292 }
2293
2294 /**
2295  * Map an access mask to a Netatalk single byte byte range lock
2296  **/
2297 static off_t access_to_netatalk_brl(enum apple_fork fork_type,
2298                                     uint32_t access_mask)
2299 {
2300         off_t offset;
2301
2302         switch (access_mask) {
2303         case FILE_READ_DATA:
2304                 offset = AD_FILELOCK_OPEN_RD;
2305                 break;
2306
2307         case FILE_WRITE_DATA:
2308         case FILE_APPEND_DATA:
2309                 offset = AD_FILELOCK_OPEN_WR;
2310                 break;
2311
2312         default:
2313                 offset = AD_FILELOCK_OPEN_NONE;
2314                 break;
2315         }
2316
2317         if (fork_type == APPLE_FORK_RSRC) {
2318                 if (offset == AD_FILELOCK_OPEN_NONE) {
2319                         offset = AD_FILELOCK_RSRC_OPEN_NONE;
2320                 } else {
2321                         offset += 2;
2322                 }
2323         }
2324
2325         return offset;
2326 }
2327
2328 /**
2329  * Map a deny mode to a Netatalk brl
2330  **/
2331 static off_t denymode_to_netatalk_brl(enum apple_fork fork_type,
2332                                       uint32_t deny_mode)
2333 {
2334         off_t offset;
2335
2336         switch (deny_mode) {
2337         case DENY_READ:
2338                 offset = AD_FILELOCK_DENY_RD;
2339                 break;
2340
2341         case DENY_WRITE:
2342                 offset = AD_FILELOCK_DENY_WR;
2343                 break;
2344
2345         default:
2346                 smb_panic("denymode_to_netatalk_brl: bad deny mode\n");
2347         }
2348
2349         if (fork_type == APPLE_FORK_RSRC) {
2350                 offset += 2;
2351         }
2352
2353         return offset;
2354 }
2355
2356 /**
2357  * Call fcntl() with an exclusive F_GETLK request in order to
2358  * determine if there's an exisiting shared lock
2359  *
2360  * @return true if the requested lock was found or any error occurred
2361  *         false if the lock was not found
2362  **/
2363 static bool test_netatalk_lock(files_struct *fsp, off_t in_offset)
2364 {
2365         bool result;
2366         off_t offset = in_offset;
2367         off_t len = 1;
2368         int type = F_WRLCK;
2369         pid_t pid;
2370
2371         result = SMB_VFS_GETLOCK(fsp, &offset, &len, &type, &pid);
2372         if (result == false) {
2373                 return true;
2374         }
2375
2376         if (type != F_UNLCK) {
2377                 return true;
2378         }
2379
2380         return false;
2381 }
2382
2383 static NTSTATUS fruit_check_access(vfs_handle_struct *handle,
2384                                    files_struct *fsp,
2385                                    uint32_t access_mask,
2386                                    uint32_t deny_mode)
2387 {
2388         NTSTATUS status = NT_STATUS_OK;
2389         struct byte_range_lock *br_lck = NULL;
2390         bool open_for_reading, open_for_writing, deny_read, deny_write;
2391         off_t off;
2392         bool have_read = false;
2393         int flags;
2394
2395         /* FIXME: hardcoded data fork, add resource fork */
2396         enum apple_fork fork_type = APPLE_FORK_DATA;
2397
2398         DEBUG(10, ("fruit_check_access: %s, am: %s/%s, dm: %s/%s\n",
2399                   fsp_str_dbg(fsp),
2400                   access_mask & FILE_READ_DATA ? "READ" :"-",
2401                   access_mask & FILE_WRITE_DATA ? "WRITE" : "-",
2402                   deny_mode & DENY_READ ? "DENY_READ" : "-",
2403                   deny_mode & DENY_WRITE ? "DENY_WRITE" : "-"));
2404
2405         if (fsp->fh->fd == -1) {
2406                 return NT_STATUS_OK;
2407         }
2408
2409         flags = fcntl(fsp->fh->fd, F_GETFL);
2410         if (flags == -1) {
2411                 DBG_ERR("fcntl get flags [%s] fd [%d] failed [%s]\n",
2412                         fsp_str_dbg(fsp), fsp->fh->fd, strerror(errno));
2413                 return map_nt_error_from_unix(errno);
2414         }
2415
2416         if (flags & (O_RDONLY|O_RDWR)) {
2417                 /*
2418                  * Applying fcntl read locks requires an fd opened for
2419                  * reading. This means we won't be applying locks for
2420                  * files openend write-only, but what can we do...
2421                  */
2422                 have_read = true;
2423         }
2424
2425         /*
2426          * Check read access and deny read mode
2427          */
2428         if ((access_mask & FILE_READ_DATA) || (deny_mode & DENY_READ)) {
2429                 /* Check access */
2430                 open_for_reading = test_netatalk_lock(
2431                         fsp, access_to_netatalk_brl(fork_type, FILE_READ_DATA));
2432
2433                 deny_read = test_netatalk_lock(
2434                         fsp, denymode_to_netatalk_brl(fork_type, DENY_READ));
2435
2436                 DEBUG(10, ("read: %s, deny_write: %s\n",
2437                           open_for_reading == true ? "yes" : "no",
2438                           deny_read == true ? "yes" : "no"));
2439
2440                 if (((access_mask & FILE_READ_DATA) && deny_read)
2441                     || ((deny_mode & DENY_READ) && open_for_reading)) {
2442                         return NT_STATUS_SHARING_VIOLATION;
2443                 }
2444
2445                 /* Set locks */
2446                 if ((access_mask & FILE_READ_DATA) && have_read) {
2447                         off = access_to_netatalk_brl(fork_type, FILE_READ_DATA);
2448                         br_lck = do_lock(
2449                                 handle->conn->sconn->msg_ctx, fsp,
2450                                 fsp->op->global->open_persistent_id, 1, off,
2451                                 READ_LOCK, POSIX_LOCK, false,
2452                                 &status, NULL);
2453
2454                         if (!NT_STATUS_IS_OK(status))  {
2455                                 return status;
2456                         }
2457                         TALLOC_FREE(br_lck);
2458                 }
2459
2460                 if ((deny_mode & DENY_READ) && have_read) {
2461                         off = denymode_to_netatalk_brl(fork_type, DENY_READ);
2462                         br_lck = do_lock(
2463                                 handle->conn->sconn->msg_ctx, fsp,
2464                                 fsp->op->global->open_persistent_id, 1, off,
2465                                 READ_LOCK, POSIX_LOCK, false,
2466                                 &status, NULL);
2467
2468                         if (!NT_STATUS_IS_OK(status)) {
2469                                 return status;
2470                         }
2471                         TALLOC_FREE(br_lck);
2472                 }
2473         }
2474
2475         /*
2476          * Check write access and deny write mode
2477          */
2478         if ((access_mask & FILE_WRITE_DATA) || (deny_mode & DENY_WRITE)) {
2479                 /* Check access */
2480                 open_for_writing = test_netatalk_lock(
2481                         fsp, access_to_netatalk_brl(fork_type, FILE_WRITE_DATA));
2482
2483                 deny_write = test_netatalk_lock(
2484                         fsp, denymode_to_netatalk_brl(fork_type, DENY_WRITE));
2485
2486                 DEBUG(10, ("write: %s, deny_write: %s\n",
2487                           open_for_writing == true ? "yes" : "no",
2488                           deny_write == true ? "yes" : "no"));
2489
2490                 if (((access_mask & FILE_WRITE_DATA) && deny_write)
2491                     || ((deny_mode & DENY_WRITE) && open_for_writing)) {
2492                         return NT_STATUS_SHARING_VIOLATION;
2493                 }
2494
2495                 /* Set locks */
2496                 if ((access_mask & FILE_WRITE_DATA) && have_read) {
2497                         off = access_to_netatalk_brl(fork_type, FILE_WRITE_DATA);
2498                         br_lck = do_lock(
2499                                 handle->conn->sconn->msg_ctx, fsp,
2500                                 fsp->op->global->open_persistent_id, 1, off,
2501                                 READ_LOCK, POSIX_LOCK, false,
2502                                 &status, NULL);
2503
2504                         if (!NT_STATUS_IS_OK(status)) {
2505                                 return status;
2506                         }
2507                         TALLOC_FREE(br_lck);
2508
2509                 }
2510                 if ((deny_mode & DENY_WRITE) && have_read) {
2511                         off = denymode_to_netatalk_brl(fork_type, DENY_WRITE);
2512                         br_lck = do_lock(
2513                                 handle->conn->sconn->msg_ctx, fsp,
2514                                 fsp->op->global->open_persistent_id, 1, off,
2515                                 READ_LOCK, POSIX_LOCK, false,
2516                                 &status, NULL);
2517
2518                         if (!NT_STATUS_IS_OK(status)) {
2519                                 return status;
2520                         }
2521                         TALLOC_FREE(br_lck);
2522                 }
2523         }
2524
2525         TALLOC_FREE(br_lck);
2526
2527         return status;
2528 }
2529
2530 static NTSTATUS check_aapl(vfs_handle_struct *handle,
2531                            struct smb_request *req,
2532                            const struct smb2_create_blobs *in_context_blobs,
2533                            struct smb2_create_blobs *out_context_blobs)
2534 {
2535         struct fruit_config_data *config;
2536         NTSTATUS status;
2537         struct smb2_create_blob *aapl = NULL;
2538         uint32_t cmd;
2539         bool ok;
2540         uint8_t p[16];
2541         DATA_BLOB blob = data_blob_talloc(req, NULL, 0);
2542         uint64_t req_bitmap, client_caps;
2543         uint64_t server_caps = SMB2_CRTCTX_AAPL_UNIX_BASED;
2544         smb_ucs2_t *model;
2545         size_t modellen;
2546
2547         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
2548                                 return NT_STATUS_UNSUCCESSFUL);
2549
2550         if (!config->use_aapl
2551             || in_context_blobs == NULL
2552             || out_context_blobs == NULL) {
2553                 return NT_STATUS_OK;
2554         }
2555
2556         aapl = smb2_create_blob_find(in_context_blobs,
2557                                      SMB2_CREATE_TAG_AAPL);
2558         if (aapl == NULL) {
2559                 return NT_STATUS_OK;
2560         }
2561
2562         if (aapl->data.length != 24) {
2563                 DEBUG(1, ("unexpected AAPL ctxt length: %ju\n",
2564                           (uintmax_t)aapl->data.length));
2565                 return NT_STATUS_INVALID_PARAMETER;
2566         }
2567
2568         cmd = IVAL(aapl->data.data, 0);
2569         if (cmd != SMB2_CRTCTX_AAPL_SERVER_QUERY) {
2570                 DEBUG(1, ("unsupported AAPL cmd: %d\n", cmd));
2571                 return NT_STATUS_INVALID_PARAMETER;
2572         }
2573
2574         req_bitmap = BVAL(aapl->data.data, 8);
2575         client_caps = BVAL(aapl->data.data, 16);
2576
2577         SIVAL(p, 0, SMB2_CRTCTX_AAPL_SERVER_QUERY);
2578         SIVAL(p, 4, 0);
2579         SBVAL(p, 8, req_bitmap);
2580         ok = data_blob_append(req, &blob, p, 16);
2581         if (!ok) {
2582                 return NT_STATUS_UNSUCCESSFUL;
2583         }
2584
2585         if (req_bitmap & SMB2_CRTCTX_AAPL_SERVER_CAPS) {
2586                 if ((client_caps & SMB2_CRTCTX_AAPL_SUPPORTS_READ_DIR_ATTR) &&
2587                     (handle->conn->tcon->compat->fs_capabilities & FILE_NAMED_STREAMS)) {
2588                         server_caps |= SMB2_CRTCTX_AAPL_SUPPORTS_READ_DIR_ATTR;
2589                         config->readdir_attr_enabled = true;
2590                 }
2591
2592                 if (config->use_copyfile) {
2593                         server_caps |= SMB2_CRTCTX_AAPL_SUPPORTS_OSX_COPYFILE;
2594                         config->copyfile_enabled = true;
2595                 }
2596
2597                 /*
2598                  * The client doesn't set the flag, so we can't check
2599                  * for it and just set it unconditionally
2600                  */
2601                 if (config->unix_info_enabled) {
2602                         server_caps |= SMB2_CRTCTX_AAPL_SUPPORTS_NFS_ACE;
2603                 }
2604
2605                 SBVAL(p, 0, server_caps);
2606                 ok = data_blob_append(req, &blob, p, 8);
2607                 if (!ok) {
2608                         return NT_STATUS_UNSUCCESSFUL;
2609                 }
2610         }
2611
2612         if (req_bitmap & SMB2_CRTCTX_AAPL_VOLUME_CAPS) {
2613                 int val = lp_case_sensitive(SNUM(handle->conn->tcon->compat));
2614                 uint64_t caps = 0;
2615
2616                 switch (val) {
2617                 case Auto:
2618                         break;
2619
2620                 case True:
2621                         caps |= SMB2_CRTCTX_AAPL_CASE_SENSITIVE;
2622                         break;
2623
2624                 default:
2625                         break;
2626                 }
2627
2628                 if (config->time_machine) {
2629                         caps |= SMB2_CRTCTX_AAPL_FULL_SYNC;
2630                 }
2631
2632                 SBVAL(p, 0, caps);
2633
2634                 ok = data_blob_append(req, &blob, p, 8);
2635                 if (!ok) {
2636                         return NT_STATUS_UNSUCCESSFUL;
2637                 }
2638         }
2639
2640         if (req_bitmap & SMB2_CRTCTX_AAPL_MODEL_INFO) {
2641                 ok = convert_string_talloc(req,
2642                                            CH_UNIX, CH_UTF16LE,
2643                                            config->model, strlen(config->model),
2644                                            &model, &modellen);
2645                 if (!ok) {
2646                         return NT_STATUS_UNSUCCESSFUL;
2647                 }
2648
2649                 SIVAL(p, 0, 0);
2650                 SIVAL(p + 4, 0, modellen);
2651                 ok = data_blob_append(req, &blob, p, 8);
2652                 if (!ok) {
2653                         talloc_free(model);
2654                         return NT_STATUS_UNSUCCESSFUL;
2655                 }
2656
2657                 ok = data_blob_append(req, &blob, model, modellen);
2658                 talloc_free(model);
2659                 if (!ok) {
2660                         return NT_STATUS_UNSUCCESSFUL;
2661                 }
2662         }
2663
2664         status = smb2_create_blob_add(out_context_blobs,
2665                                       out_context_blobs,
2666                                       SMB2_CREATE_TAG_AAPL,
2667                                       blob);
2668         if (NT_STATUS_IS_OK(status)) {
2669                 global_fruit_config.nego_aapl = true;
2670                 if (config->aapl_zero_file_id) {
2671                         aapl_force_zero_file_id(handle->conn->sconn);
2672                 }
2673         }
2674
2675         return status;
2676 }
2677
2678 static bool readdir_attr_meta_finderi_stream(
2679         struct vfs_handle_struct *handle,
2680         const struct smb_filename *smb_fname,
2681         AfpInfo *ai)
2682 {
2683         struct smb_filename *stream_name = NULL;
2684         files_struct *fsp = NULL;
2685         ssize_t nread;
2686         NTSTATUS status;
2687         int ret;
2688         bool ok;
2689         uint8_t buf[AFP_INFO_SIZE];
2690
2691         stream_name = synthetic_smb_fname(talloc_tos(),
2692                                           smb_fname->base_name,
2693                                           AFPINFO_STREAM_NAME,
2694                                           NULL, smb_fname->flags);
2695         if (stream_name == NULL) {
2696                 return false;
2697         }
2698
2699         ret = SMB_VFS_STAT(handle->conn, stream_name);
2700         if (ret != 0) {
2701                 return false;
2702         }
2703
2704         status = SMB_VFS_CREATE_FILE(
2705                 handle->conn,                           /* conn */
2706                 NULL,                                   /* req */
2707                 0,                                      /* root_dir_fid */
2708                 stream_name,                            /* fname */
2709                 FILE_READ_DATA,                         /* access_mask */
2710                 (FILE_SHARE_READ | FILE_SHARE_WRITE |   /* share_access */
2711                         FILE_SHARE_DELETE),
2712                 FILE_OPEN,                              /* create_disposition*/
2713                 0,                                      /* create_options */
2714                 0,                                      /* file_attributes */
2715                 INTERNAL_OPEN_ONLY,                     /* oplock_request */
2716                 NULL,                                   /* lease */
2717                 0,                                      /* allocation_size */
2718                 0,                                      /* private_flags */
2719                 NULL,                                   /* sd */
2720                 NULL,                                   /* ea_list */
2721                 &fsp,                                   /* result */
2722                 NULL,                                   /* pinfo */
2723                 NULL, NULL);                            /* create context */
2724
2725         TALLOC_FREE(stream_name);
2726
2727         if (!NT_STATUS_IS_OK(status)) {
2728                 return false;
2729         }
2730
2731         nread = SMB_VFS_PREAD(fsp, &buf[0], AFP_INFO_SIZE, 0);
2732         if (nread != AFP_INFO_SIZE) {
2733                 DBG_ERR("short read [%s] [%zd/%d]\n",
2734                         smb_fname_str_dbg(stream_name), nread, AFP_INFO_SIZE);
2735                 ok = false;
2736                 goto fail;
2737         }
2738
2739         memcpy(&ai->afpi_FinderInfo[0], &buf[AFP_OFF_FinderInfo],
2740                AFP_FinderSize);
2741
2742         ok = true;
2743
2744 fail:
2745         if (fsp != NULL) {
2746                 close_file(NULL, fsp, NORMAL_CLOSE);
2747         }
2748
2749         return ok;
2750 }
2751
2752 static bool readdir_attr_meta_finderi_netatalk(
2753         struct vfs_handle_struct *handle,
2754         const struct smb_filename *smb_fname,
2755         AfpInfo *ai)
2756 {
2757         struct adouble *ad = NULL;
2758         char *p = NULL;
2759
2760         ad = ad_get(talloc_tos(), handle, smb_fname, ADOUBLE_META);
2761         if (ad == NULL) {
2762                 return false;
2763         }
2764
2765         p = ad_get_entry(ad, ADEID_FINDERI);
2766         if (p == NULL) {
2767                 DBG_ERR("No ADEID_FINDERI for [%s]\n", smb_fname->base_name);
2768                 TALLOC_FREE(ad);
2769                 return false;
2770         }
2771
2772         memcpy(&ai->afpi_FinderInfo[0], p, AFP_FinderSize);
2773         TALLOC_FREE(ad);
2774         return true;
2775 }
2776
2777 static bool readdir_attr_meta_finderi(struct vfs_handle_struct *handle,
2778                                       const struct smb_filename *smb_fname,
2779                                       struct readdir_attr_data *attr_data)
2780 {
2781         struct fruit_config_data *config = NULL;
2782         uint32_t date_added;
2783         AfpInfo ai = {0};
2784         bool ok;
2785
2786         SMB_VFS_HANDLE_GET_DATA(handle, config,
2787                                 struct fruit_config_data,
2788                                 return false);
2789
2790         switch (config->meta) {
2791         case FRUIT_META_NETATALK:
2792                 ok = readdir_attr_meta_finderi_netatalk(
2793                         handle, smb_fname, &ai);
2794                 break;
2795
2796         case FRUIT_META_STREAM:
2797                 ok = readdir_attr_meta_finderi_stream(
2798                         handle, smb_fname, &ai);
2799                 break;
2800
2801         default:
2802                 DBG_ERR("Unexpected meta config [%d]\n", config->meta);
2803                 return false;
2804         }
2805
2806         if (!ok) {
2807                 /* Don't bother with errors, it's likely ENOENT */
2808                 return true;
2809         }
2810
2811         if (S_ISREG(smb_fname->st.st_ex_mode)) {
2812                 /* finder_type */
2813                 memcpy(&attr_data->attr_data.aapl.finder_info[0],
2814                        &ai.afpi_FinderInfo[0], 4);
2815
2816                 /* finder_creator */
2817                 memcpy(&attr_data->attr_data.aapl.finder_info[0] + 4,
2818                        &ai.afpi_FinderInfo[4], 4);
2819         }
2820
2821         /* finder_flags */
2822         memcpy(&attr_data->attr_data.aapl.finder_info[0] + 8,
2823                &ai.afpi_FinderInfo[8], 2);
2824
2825         /* finder_ext_flags */
2826         memcpy(&attr_data->attr_data.aapl.finder_info[0] + 10,
2827                &ai.afpi_FinderInfo[24], 2);
2828
2829         /* creation date */
2830         date_added = convert_time_t_to_uint32_t(
2831                 smb_fname->st.st_ex_btime.tv_sec - AD_DATE_DELTA);
2832
2833         RSIVAL(&attr_data->attr_data.aapl.finder_info[0], 12, date_added);
2834
2835         return true;
2836 }
2837
2838 static uint64_t readdir_attr_rfork_size_adouble(
2839         struct vfs_handle_struct *handle,
2840         const struct smb_filename *smb_fname)
2841 {
2842         struct adouble *ad = NULL;
2843         uint64_t rfork_size;
2844
2845         ad = ad_get(talloc_tos(), handle, smb_fname,
2846                     ADOUBLE_RSRC);
2847         if (ad == NULL) {
2848                 return 0;
2849         }
2850
2851         rfork_size = ad_getentrylen(ad, ADEID_RFORK);
2852         TALLOC_FREE(ad);
2853
2854         return rfork_size;
2855 }
2856
2857 static uint64_t readdir_attr_rfork_size_stream(
2858         struct vfs_handle_struct *handle,
2859         const struct smb_filename *smb_fname)
2860 {
2861         struct smb_filename *stream_name = NULL;
2862         int ret;
2863         uint64_t rfork_size;
2864
2865         stream_name = synthetic_smb_fname(talloc_tos(),
2866                                           smb_fname->base_name,
2867                                           AFPRESOURCE_STREAM_NAME,
2868                                           NULL, 0);
2869         if (stream_name == NULL) {
2870                 return 0;
2871         }
2872
2873         ret = SMB_VFS_STAT(handle->conn, stream_name);
2874         if (ret != 0) {
2875                 TALLOC_FREE(stream_name);
2876                 return 0;
2877         }
2878
2879         rfork_size = stream_name->st.st_ex_size;
2880         TALLOC_FREE(stream_name);
2881
2882         return rfork_size;
2883 }
2884
2885 static uint64_t readdir_attr_rfork_size(struct vfs_handle_struct *handle,
2886                                         const struct smb_filename *smb_fname)
2887 {
2888         struct fruit_config_data *config = NULL;
2889         uint64_t rfork_size;
2890
2891         SMB_VFS_HANDLE_GET_DATA(handle, config,
2892                                 struct fruit_config_data,
2893                                 return 0);
2894
2895         switch (config->rsrc) {
2896         case FRUIT_RSRC_ADFILE:
2897         case FRUIT_RSRC_XATTR:
2898                 rfork_size = readdir_attr_rfork_size_adouble(handle,
2899                                                              smb_fname);
2900                 break;
2901
2902         case FRUIT_META_STREAM:
2903                 rfork_size = readdir_attr_rfork_size_stream(handle,
2904                                                             smb_fname);
2905                 break;
2906
2907         default:
2908                 DBG_ERR("Unexpected rsrc config [%d]\n", config->rsrc);
2909                 rfork_size = 0;
2910                 break;
2911         }
2912
2913         return rfork_size;
2914 }
2915
2916 static NTSTATUS readdir_attr_macmeta(struct vfs_handle_struct *handle,
2917                                      const struct smb_filename *smb_fname,
2918                                      struct readdir_attr_data *attr_data)
2919 {
2920         NTSTATUS status = NT_STATUS_OK;
2921         struct fruit_config_data *config = NULL;
2922         bool ok;
2923
2924         SMB_VFS_HANDLE_GET_DATA(handle, config,
2925                                 struct fruit_config_data,
2926                                 return NT_STATUS_UNSUCCESSFUL);
2927
2928
2929         /* Ensure we return a default value in the creation_date field */
2930         RSIVAL(&attr_data->attr_data.aapl.finder_info, 12, AD_DATE_START);
2931
2932         /*
2933          * Resource fork length
2934          */
2935
2936         if (config->readdir_attr_rsize) {
2937                 uint64_t rfork_size;
2938
2939                 rfork_size = readdir_attr_rfork_size(handle, smb_fname);
2940                 attr_data->attr_data.aapl.rfork_size = rfork_size;
2941         }
2942
2943         /*
2944          * FinderInfo
2945          */
2946
2947         if (config->readdir_attr_finder_info) {
2948                 ok = readdir_attr_meta_finderi(handle, smb_fname, attr_data);
2949                 if (!ok) {
2950                         status = NT_STATUS_INTERNAL_ERROR;
2951                 }
2952         }
2953
2954         return status;
2955 }
2956
2957 static NTSTATUS remove_virtual_nfs_aces(struct security_descriptor *psd)
2958 {
2959         NTSTATUS status;
2960         uint32_t i;
2961
2962         if (psd->dacl == NULL) {
2963                 return NT_STATUS_OK;
2964         }
2965
2966         for (i = 0; i < psd->dacl->num_aces; i++) {
2967                 /* MS NFS style mode/uid/gid */
2968                 int cmp = dom_sid_compare_domain(
2969                                 &global_sid_Unix_NFS,
2970                                 &psd->dacl->aces[i].trustee);
2971                 if (cmp != 0) {
2972                         /* Normal ACE entry. */
2973                         continue;
2974                 }
2975
2976                 /*
2977                  * security_descriptor_dacl_del()
2978                  * *must* return NT_STATUS_OK as we know
2979                  * we have something to remove.
2980                  */
2981
2982                 status = security_descriptor_dacl_del(psd,
2983                                 &psd->dacl->aces[i].trustee);
2984                 if (!NT_STATUS_IS_OK(status)) {
2985                         DBG_WARNING("failed to remove MS NFS style ACE: %s\n",
2986                                 nt_errstr(status));
2987                         return status;
2988                 }
2989
2990                 /*
2991                  * security_descriptor_dacl_del() may delete more
2992                  * then one entry subsequent to this one if the
2993                  * SID matches, but we only need to ensure that
2994                  * we stay looking at the same element in the array.
2995                  */
2996                 i--;
2997         }
2998         return NT_STATUS_OK;
2999 }
3000
3001 /* Search MS NFS style ACE with UNIX mode */
3002 static NTSTATUS check_ms_nfs(vfs_handle_struct *handle,
3003                              files_struct *fsp,
3004                              struct security_descriptor *psd,
3005                              mode_t *pmode,
3006                              bool *pdo_chmod)
3007 {
3008         uint32_t i;
3009         struct fruit_config_data *config = NULL;
3010
3011         *pdo_chmod = false;
3012
3013         SMB_VFS_HANDLE_GET_DATA(handle, config,
3014                                 struct fruit_config_data,
3015                                 return NT_STATUS_UNSUCCESSFUL);
3016
3017         if (!global_fruit_config.nego_aapl) {
3018                 return NT_STATUS_OK;
3019         }
3020         if (psd->dacl == NULL || !config->unix_info_enabled) {
3021                 return NT_STATUS_OK;
3022         }
3023
3024         for (i = 0; i < psd->dacl->num_aces; i++) {
3025                 if (dom_sid_compare_domain(
3026                             &global_sid_Unix_NFS_Mode,
3027                             &psd->dacl->aces[i].trustee) == 0) {
3028                         *pmode = (mode_t)psd->dacl->aces[i].trustee.sub_auths[2];
3029                         *pmode &= (S_IRWXU | S_IRWXG | S_IRWXO);
3030                         *pdo_chmod = true;
3031
3032                         DEBUG(10, ("MS NFS chmod request %s, %04o\n",
3033                                    fsp_str_dbg(fsp), (unsigned)(*pmode)));
3034                         break;
3035                 }
3036         }
3037
3038         /*
3039          * Remove any incoming virtual ACE entries generated by
3040          * fruit_fget_nt_acl().
3041          */
3042
3043         return remove_virtual_nfs_aces(psd);
3044 }
3045
3046 /****************************************************************************
3047  * VFS ops
3048  ****************************************************************************/
3049
3050 static int fruit_connect(vfs_handle_struct *handle,
3051                          const char *service,
3052                          const char *user)
3053 {
3054         int rc;
3055         char *list = NULL, *newlist = NULL;
3056         struct fruit_config_data *config;
3057
3058         DEBUG(10, ("fruit_connect\n"));
3059
3060         rc = SMB_VFS_NEXT_CONNECT(handle, service, user);
3061         if (rc < 0) {
3062                 return rc;
3063         }
3064
3065         rc = init_fruit_config(handle);
3066         if (rc != 0) {
3067                 return rc;
3068         }
3069
3070         SMB_VFS_HANDLE_GET_DATA(handle, config,
3071                                 struct fruit_config_data, return -1);
3072
3073         if (config->veto_appledouble) {
3074                 list = lp_veto_files(talloc_tos(), SNUM(handle->conn));
3075
3076                 if (list) {
3077                         if (strstr(list, "/" ADOUBLE_NAME_PREFIX "*/") == NULL) {
3078                                 newlist = talloc_asprintf(
3079                                         list,
3080                                         "%s/" ADOUBLE_NAME_PREFIX "*/",
3081                                         list);
3082                                 lp_do_parameter(SNUM(handle->conn),
3083                                                 "veto files",
3084                                                 newlist);
3085                         }
3086                 } else {
3087                         lp_do_parameter(SNUM(handle->conn),
3088                                         "veto files",
3089                                         "/" ADOUBLE_NAME_PREFIX "*/");
3090                 }
3091
3092                 TALLOC_FREE(list);
3093         }
3094
3095         if (config->encoding == FRUIT_ENC_NATIVE) {
3096                 lp_do_parameter(SNUM(handle->conn),
3097                                 "catia:mappings",
3098                                 fruit_catia_maps);
3099         }
3100
3101         if (config->time_machine) {
3102                 DBG_NOTICE("Enabling durable handles for Time Machine "
3103                            "support on [%s]\n", service);
3104                 lp_do_parameter(SNUM(handle->conn), "durable handles", "yes");
3105                 lp_do_parameter(SNUM(handle->conn), "kernel oplocks", "no");
3106                 lp_do_parameter(SNUM(handle->conn), "kernel share modes", "no");
3107                 if (!lp_strict_sync(SNUM(handle->conn))) {
3108                         DBG_WARNING("Time Machine without strict sync is not "
3109                                     "recommended!\n");
3110                 }
3111                 lp_do_parameter(SNUM(handle->conn), "posix locking", "no");
3112         }
3113
3114         return rc;
3115 }
3116
3117 static int fruit_open_meta_stream(vfs_handle_struct *handle,
3118                                   struct smb_filename *smb_fname,
3119                                   files_struct *fsp,
3120                                   int flags,
3121                                   mode_t mode)
3122 {
3123         AfpInfo *ai = NULL;
3124         char afpinfo_buf[AFP_INFO_SIZE];
3125         ssize_t len, written;
3126         int hostfd = -1;
3127         int rc = -1;
3128
3129         hostfd = SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
3130         if (hostfd == -1) {
3131                 return -1;
3132         }
3133
3134         if (!(flags & (O_CREAT | O_TRUNC))) {
3135                 return hostfd;
3136         }
3137
3138         ai = afpinfo_new(talloc_tos());
3139         if (ai == NULL) {
3140                 rc = -1;
3141                 goto fail;
3142         }
3143
3144         len = afpinfo_pack(ai, afpinfo_buf);
3145         if (len != AFP_INFO_SIZE) {
3146                 rc = -1;
3147                 goto fail;
3148         }
3149
3150         /* Set fd, needed in SMB_VFS_NEXT_PWRITE() */
3151         fsp->fh->fd = hostfd;
3152
3153         written = SMB_VFS_NEXT_PWRITE(handle, fsp, afpinfo_buf,
3154                                       AFP_INFO_SIZE, 0);
3155         fsp->fh->fd = -1;
3156         if (written != AFP_INFO_SIZE) {
3157                 DBG_ERR("bad write [%zd/%d]\n", written, AFP_INFO_SIZE);
3158                 rc = -1;
3159                 goto fail;
3160         }
3161
3162         rc = 0;
3163
3164 fail:
3165         DBG_DEBUG("rc=%d, fd=%d\n", rc, hostfd);
3166
3167         if (rc != 0) {
3168                 int saved_errno = errno;
3169                 if (hostfd >= 0) {
3170                         fsp->fh->fd = hostfd;
3171                         SMB_VFS_NEXT_CLOSE(handle, fsp);
3172                 }
3173                 hostfd = -1;
3174                 errno = saved_errno;
3175         }
3176         return hostfd;
3177 }
3178
3179 static int fruit_open_meta_netatalk(vfs_handle_struct *handle,
3180                                     struct smb_filename *smb_fname,
3181                                     files_struct *fsp,
3182                                     int flags,
3183                                     mode_t mode)
3184 {
3185         int rc;
3186         int fakefd = -1;
3187         struct adouble *ad = NULL;
3188         int fds[2];
3189
3190         DBG_DEBUG("Path [%s]\n", smb_fname_str_dbg(smb_fname));
3191
3192         /*
3193          * Return a valid fd, but ensure any attempt to use it returns an error
3194          * (EPIPE). All operations on the smb_fname or the fsp will use path
3195          * based syscalls.
3196          */
3197         rc = pipe(fds);
3198         if (rc != 0) {
3199                 goto exit;
3200         }
3201         fakefd = fds[0];
3202         close(fds[1]);
3203
3204         if (flags & (O_CREAT | O_TRUNC)) {
3205                 /*
3206                  * The attribute does not exist or needs to be truncated,
3207                  * create an AppleDouble EA
3208                  */
3209                 ad = ad_init(fsp, handle, ADOUBLE_META);
3210                 if (ad == NULL) {
3211                         rc = -1;
3212                         goto exit;
3213                 }
3214
3215                 rc = ad_set(ad, fsp->fsp_name);
3216                 if (rc != 0) {
3217                         rc = -1;
3218                         goto exit;
3219                 }
3220
3221                 TALLOC_FREE(ad);
3222         }
3223
3224 exit:
3225         DEBUG(10, ("fruit_open meta rc=%d, fd=%d\n", rc, fakefd));
3226         if (rc != 0) {
3227                 int saved_errno = errno;
3228                 if (fakefd >= 0) {
3229                         close(fakefd);
3230                 }
3231                 fakefd = -1;
3232                 errno = saved_errno;
3233         }
3234         return fakefd;
3235 }
3236
3237 static int fruit_open_meta(vfs_handle_struct *handle,
3238                            struct smb_filename *smb_fname,
3239                            files_struct *fsp, int flags, mode_t mode)
3240 {
3241         int fd;
3242         struct fruit_config_data *config = NULL;
3243         struct fio *fio = NULL;
3244
3245         DBG_DEBUG("path [%s]\n", smb_fname_str_dbg(smb_fname));
3246
3247         SMB_VFS_HANDLE_GET_DATA(handle, config,
3248                                 struct fruit_config_data, return -1);
3249
3250         switch (config->meta) {
3251         case FRUIT_META_STREAM:
3252                 fd = fruit_open_meta_stream(handle, smb_fname,
3253                                             fsp, flags, mode);
3254                 break;
3255
3256         case FRUIT_META_NETATALK:
3257                 fd = fruit_open_meta_netatalk(handle, smb_fname,
3258                                               fsp, flags, mode);
3259                 break;
3260
3261         default:
3262                 DBG_ERR("Unexpected meta config [%d]\n", config->meta);
3263                 return -1;
3264         }
3265
3266         DBG_DEBUG("path [%s] fd [%d]\n", smb_fname_str_dbg(smb_fname), fd);
3267
3268         if (fd == -1) {
3269                 return -1;
3270         }
3271
3272         fio = VFS_ADD_FSP_EXTENSION(handle, fsp, struct fio, NULL);
3273         fio->type = ADOUBLE_META;
3274         fio->config = config;
3275
3276         return fd;
3277 }
3278
3279 static int fruit_open_rsrc_adouble(vfs_handle_struct *handle,
3280                                    struct smb_filename *smb_fname,
3281                                    files_struct *fsp,
3282                                    int flags,
3283                                    mode_t mode)
3284 {
3285         int rc = 0;
3286         struct adouble *ad = NULL;
3287         struct smb_filename *smb_fname_base = NULL;
3288         struct fruit_config_data *config = NULL;
3289         int hostfd = -1;
3290
3291         SMB_VFS_HANDLE_GET_DATA(handle, config,
3292                                 struct fruit_config_data, return -1);
3293
3294         if ((!(flags & O_CREAT)) &&
3295             S_ISDIR(fsp->base_fsp->fsp_name->st.st_ex_mode))
3296         {
3297                 /* sorry, but directories don't habe a resource fork */
3298                 rc = -1;
3299                 goto exit;
3300         }
3301
3302         rc = adouble_path(talloc_tos(), smb_fname, &smb_fname_base);
3303         if (rc != 0) {
3304                 goto exit;
3305         }
3306
3307         /* Sanitize flags */
3308         if (flags & O_WRONLY) {
3309                 /* We always need read access for the metadata header too */
3310                 flags &= ~O_WRONLY;
3311                 flags |= O_RDWR;
3312         }
3313
3314         hostfd = SMB_VFS_NEXT_OPEN(handle, smb_fname_base, fsp,
3315                                    flags, mode);
3316         if (hostfd == -1) {
3317                 rc = -1;
3318                 goto exit;
3319         }
3320
3321         if (flags & (O_CREAT | O_TRUNC)) {
3322                 ad = ad_init(fsp, handle, ADOUBLE_RSRC);
3323                 if (ad == NULL) {
3324                         rc = -1;
3325                         goto exit;
3326                 }
3327
3328                 fsp->fh->fd = hostfd;
3329
3330                 rc = ad_fset(ad, fsp);
3331                 fsp->fh->fd = -1;
3332                 if (rc != 0) {
3333                         rc = -1;
3334                         goto exit;
3335                 }
3336                 TALLOC_FREE(ad);
3337         }
3338
3339 exit:
3340
3341         TALLOC_FREE(smb_fname_base);
3342
3343         DEBUG(10, ("fruit_open resource fork: rc=%d, fd=%d\n", rc, hostfd));
3344         if (rc != 0) {
3345                 int saved_errno = errno;
3346                 if (hostfd >= 0) {
3347                         /*
3348                          * BUGBUGBUG -- we would need to call
3349                          * fd_close_posix here, but we don't have a
3350                          * full fsp yet
3351                          */
3352                         fsp->fh->fd = hostfd;
3353                         SMB_VFS_CLOSE(fsp);
3354                 }
3355                 hostfd = -1;
3356                 errno = saved_errno;
3357         }
3358         return hostfd;
3359 }
3360
3361 static int fruit_open_rsrc_xattr(vfs_handle_struct *handle,
3362                                  struct smb_filename *smb_fname,
3363                                  files_struct *fsp,
3364                                  int flags,
3365                                  mode_t mode)
3366 {
3367 #ifdef HAVE_ATTROPEN
3368         int fd = -1;
3369
3370         fd = attropen(smb_fname->base_name,
3371                       AFPRESOURCE_EA_NETATALK,
3372                       flags,
3373                       mode);
3374         if (fd == -1) {
3375                 return -1;
3376         }
3377
3378         return fd;
3379
3380 #else
3381         errno = ENOSYS;
3382         return -1;
3383 #endif
3384 }
3385
3386 static int fruit_open_rsrc(vfs_handle_struct *handle,
3387                            struct smb_filename *smb_fname,
3388                            files_struct *fsp, int flags, mode_t mode)
3389 {
3390         int fd;
3391         struct fruit_config_data *config = NULL;
3392         struct fio *fio = NULL;
3393
3394         DBG_DEBUG("Path [%s]\n", smb_fname_str_dbg(smb_fname));
3395
3396         SMB_VFS_HANDLE_GET_DATA(handle, config,
3397                                 struct fruit_config_data, return -1);
3398
3399         if (((flags & O_ACCMODE) == O_RDONLY)
3400             && (flags & O_CREAT)
3401             && !VALID_STAT(fsp->fsp_name->st))
3402         {
3403                 /*
3404                  * This means the stream doesn't exist. macOS SMB server fails
3405                  * this with NT_STATUS_OBJECT_NAME_NOT_FOUND, so must we. Cf bug
3406                  * 12565 and the test for this combination in
3407                  * test_rfork_create().
3408                  */
3409                 errno = ENOENT;
3410                 return -1;
3411         }
3412
3413         switch (config->rsrc) {
3414         case FRUIT_RSRC_STREAM:
3415                 fd = SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
3416                 break;
3417
3418         case FRUIT_RSRC_ADFILE:
3419                 fd = fruit_open_rsrc_adouble(handle, smb_fname,
3420                                              fsp, flags, mode);
3421                 break;
3422
3423         case FRUIT_RSRC_XATTR:
3424                 fd = fruit_open_rsrc_xattr(handle, smb_fname,
3425                                            fsp, flags, mode);
3426                 break;
3427
3428         default:
3429                 DBG_ERR("Unexpected rsrc config [%d]\n", config->rsrc);
3430                 return -1;
3431         }
3432
3433         DBG_DEBUG("Path [%s] fd [%d]\n", smb_fname_str_dbg(smb_fname), fd);
3434
3435         if (fd == -1) {
3436                 return -1;
3437         }
3438
3439         fio = VFS_ADD_FSP_EXTENSION(handle, fsp, struct fio, NULL);
3440         fio->type = ADOUBLE_RSRC;
3441         fio->config = config;
3442
3443         return fd;
3444 }
3445
3446 static int fruit_open(vfs_handle_struct *handle,
3447                       struct smb_filename *smb_fname,
3448                       files_struct *fsp, int flags, mode_t mode)
3449 {
3450         int fd;
3451
3452         DBG_DEBUG("Path [%s]\n", smb_fname_str_dbg(smb_fname));
3453
3454         if (!is_ntfs_stream_smb_fname(smb_fname)) {
3455                 return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
3456         }
3457
3458         if (is_afpinfo_stream(smb_fname)) {
3459                 fd = fruit_open_meta(handle, smb_fname, fsp, flags, mode);
3460         } else if (is_afpresource_stream(smb_fname)) {
3461                 fd = fruit_open_rsrc(handle, smb_fname, fsp, flags, mode);
3462         } else {
3463                 fd = SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
3464         }
3465
3466         DBG_DEBUG("Path [%s] fd [%d]\n", smb_fname_str_dbg(smb_fname), fd);
3467
3468         return fd;
3469 }
3470
3471 static int fruit_rename(struct vfs_handle_struct *handle,
3472                         const struct smb_filename *smb_fname_src,
3473                         const struct smb_filename *smb_fname_dst)
3474 {
3475         int rc = -1;
3476         struct fruit_config_data *config = NULL;
3477         struct smb_filename *src_adp_smb_fname = NULL;
3478         struct smb_filename *dst_adp_smb_fname = NULL;
3479
3480         SMB_VFS_HANDLE_GET_DATA(handle, config,
3481                                 struct fruit_config_data, return -1);
3482
3483         if (!VALID_STAT(smb_fname_src->st)) {
3484                 DBG_ERR("Need valid stat for [%s]\n",
3485                         smb_fname_str_dbg(smb_fname_src));
3486                 return -1;
3487         }
3488
3489         rc = SMB_VFS_NEXT_RENAME(handle, smb_fname_src, smb_fname_dst);
3490         if (rc != 0) {
3491                 return -1;
3492         }
3493
3494         if ((config->rsrc != FRUIT_RSRC_ADFILE) ||
3495             (!S_ISREG(smb_fname_src->st.st_ex_mode)))
3496         {
3497                 return 0;
3498         }
3499
3500         rc = adouble_path(talloc_tos(), smb_fname_src, &src_adp_smb_fname);
3501         if (rc != 0) {
3502                 goto done;
3503         }
3504
3505         rc = adouble_path(talloc_tos(), smb_fname_dst, &dst_adp_smb_fname);
3506         if (rc != 0) {
3507                 goto done;
3508         }
3509
3510         DBG_DEBUG("%s -> %s\n",
3511                   smb_fname_str_dbg(src_adp_smb_fname),
3512                   smb_fname_str_dbg(dst_adp_smb_fname));
3513
3514         rc = SMB_VFS_NEXT_RENAME(handle, src_adp_smb_fname, dst_adp_smb_fname);
3515         if (errno == ENOENT) {
3516                 rc = 0;
3517         }
3518
3519 done:
3520         TALLOC_FREE(src_adp_smb_fname);
3521         TALLOC_FREE(dst_adp_smb_fname);
3522         return rc;
3523 }
3524
3525 static int fruit_unlink_meta_stream(vfs_handle_struct *handle,
3526                                     const struct smb_filename *smb_fname)
3527 {
3528         return SMB_VFS_NEXT_UNLINK(handle, smb_fname);
3529 }
3530
3531 static int fruit_unlink_meta_netatalk(vfs_handle_struct *handle,
3532                                       const struct smb_filename *smb_fname)
3533 {
3534         return SMB_VFS_REMOVEXATTR(handle->conn,
3535                                    smb_fname,
3536                                    AFPINFO_EA_NETATALK);
3537 }
3538
3539 static int fruit_unlink_meta(vfs_handle_struct *handle,
3540                              const struct smb_filename *smb_fname)
3541 {
3542         struct fruit_config_data *config = NULL;
3543         int rc;
3544
3545         SMB_VFS_HANDLE_GET_DATA(handle, config,
3546                                 struct fruit_config_data, return -1);
3547
3548         switch (config->meta) {
3549         case FRUIT_META_STREAM:
3550                 rc = fruit_unlink_meta_stream(handle, smb_fname);
3551                 break;
3552
3553         case FRUIT_META_NETATALK:
3554                 rc = fruit_unlink_meta_netatalk(handle, smb_fname);
3555                 break;
3556
3557         default:
3558                 DBG_ERR("Unsupported meta config [%d]\n", config->meta);
3559                 return -1;
3560         }
3561
3562         return rc;
3563 }
3564
3565 static int fruit_unlink_rsrc_stream(vfs_handle_struct *handle,
3566                                     const struct smb_filename *smb_fname,
3567                                     bool force_unlink)
3568 {
3569         int ret;
3570
3571         if (!force_unlink) {
3572                 struct smb_filename *smb_fname_cp = NULL;
3573                 off_t size;
3574
3575                 smb_fname_cp = cp_smb_filename(talloc_tos(), smb_fname);
3576                 if (smb_fname_cp == NULL) {
3577                         return -1;
3578                 }
3579
3580                 /*
3581                  * 0 byte resource fork streams are not listed by
3582                  * vfs_streaminfo, as a result stream cleanup/deletion of file
3583                  * deletion doesn't remove the resourcefork stream.
3584                  */
3585
3586                 ret = SMB_VFS_NEXT_STAT(handle, smb_fname_cp);
3587                 if (ret != 0) {
3588                         TALLOC_FREE(smb_fname_cp);
3589                         DBG_ERR("stat [%s] failed [%s]\n",
3590                                 smb_fname_str_dbg(smb_fname_cp), strerror(errno));
3591                         return -1;
3592                 }
3593
3594                 size = smb_fname_cp->st.st_ex_size;
3595                 TALLOC_FREE(smb_fname_cp);
3596
3597                 if (size > 0) {
3598                         /* OS X ignores resource fork stream delete requests */
3599                         return 0;
3600                 }
3601         }
3602
3603         ret = SMB_VFS_NEXT_UNLINK(handle, smb_fname);
3604         if ((ret != 0) && (errno == ENOENT) && force_unlink) {
3605                 ret = 0;
3606         }
3607
3608         return ret;
3609 }
3610
3611 static int fruit_unlink_rsrc_adouble(vfs_handle_struct *handle,
3612                                      const struct smb_filename *smb_fname,
3613                                      bool force_unlink)
3614 {
3615         int rc;
3616         struct adouble *ad = NULL;
3617         struct smb_filename *adp_smb_fname = NULL;
3618
3619         if (!force_unlink) {
3620                 ad = ad_get(talloc_tos(), handle, smb_fname,
3621                             ADOUBLE_RSRC);
3622                 if (ad == NULL) {
3623                         errno = ENOENT;
3624                         return -1;
3625                 }
3626
3627
3628                 /*
3629                  * 0 byte resource fork streams are not listed by
3630                  * vfs_streaminfo, as a result stream cleanup/deletion of file
3631                  * deletion doesn't remove the resourcefork stream.
3632                  */
3633
3634                 if (ad_getentrylen(ad, ADEID_RFORK) > 0) {
3635                         /* OS X ignores resource fork stream delete requests */
3636                         TALLOC_FREE(ad);
3637                         return 0;
3638                 }
3639
3640                 TALLOC_FREE(ad);
3641         }
3642
3643         rc = adouble_path(talloc_tos(), smb_fname, &adp_smb_fname);
3644         if (rc != 0) {
3645                 return -1;
3646         }
3647
3648         rc = SMB_VFS_NEXT_UNLINK(handle, adp_smb_fname);
3649         TALLOC_FREE(adp_smb_fname);
3650         if ((rc != 0) && (errno == ENOENT) && force_unlink) {
3651                 rc = 0;
3652         }
3653
3654         return rc;
3655 }
3656
3657 static int fruit_unlink_rsrc_xattr(vfs_handle_struct *handle,
3658                                    const struct smb_filename *smb_fname,
3659                                    bool force_unlink)
3660 {
3661         /*
3662          * OS X ignores resource fork stream delete requests, so nothing to do
3663          * here. Removing the file will remove the xattr anyway, so we don't
3664          * have to take care of removing 0 byte resource forks that could be
3665          * left behind.
3666          */
3667         return 0;
3668 }
3669
3670 static int fruit_unlink_rsrc(vfs_handle_struct *handle,
3671                              const struct smb_filename *smb_fname,
3672                              bool force_unlink)
3673 {
3674         struct fruit_config_data *config = NULL;
3675         int rc;
3676
3677         SMB_VFS_HANDLE_GET_DATA(handle, config,
3678                                 struct fruit_config_data, return -1);
3679
3680         switch (config->rsrc) {
3681         case FRUIT_RSRC_STREAM:
3682                 rc = fruit_unlink_rsrc_stream(handle, smb_fname, force_unlink);
3683                 break;
3684
3685         case FRUIT_RSRC_ADFILE:
3686                 rc = fruit_unlink_rsrc_adouble(handle, smb_fname, force_unlink);
3687                 break;
3688
3689         case FRUIT_RSRC_XATTR:
3690                 rc = fruit_unlink_rsrc_xattr(handle, smb_fname, force_unlink);
3691                 break;
3692
3693         default:
3694                 DBG_ERR("Unsupported rsrc config [%d]\n", config->rsrc);
3695                 return -1;
3696         }
3697
3698         return rc;
3699 }
3700
3701 static int fruit_unlink(vfs_handle_struct *handle,
3702                         const struct smb_filename *smb_fname)
3703 {
3704         int rc;
3705         struct fruit_config_data *config = NULL;
3706         struct smb_filename *rsrc_smb_fname = NULL;
3707
3708         SMB_VFS_HANDLE_GET_DATA(handle, config,
3709                                 struct fruit_config_data, return -1);
3710
3711         if (is_afpinfo_stream(smb_fname)) {
3712                 return fruit_unlink_meta(handle, smb_fname);
3713         } else if (is_afpresource_stream(smb_fname)) {
3714                 return fruit_unlink_rsrc(handle, smb_fname, false);
3715         } if (is_ntfs_stream_smb_fname(smb_fname)) {
3716                 return SMB_VFS_NEXT_UNLINK(handle, smb_fname);
3717         }
3718
3719         /*
3720          * A request to delete the base file. Because 0 byte resource
3721          * fork streams are not listed by fruit_streaminfo,
3722          * delete_all_streams() can't remove 0 byte resource fork
3723          * streams, so we have to cleanup this here.
3724          */
3725         rsrc_smb_fname = synthetic_smb_fname(talloc_tos(),
3726                                              smb_fname->base_name,
3727                                              AFPRESOURCE_STREAM_NAME,
3728                                              NULL,
3729                                              smb_fname->flags);
3730         if (rsrc_smb_fname == NULL) {
3731                 return -1;
3732         }
3733
3734         rc = fruit_unlink_rsrc(handle, rsrc_smb_fname, true);
3735         if ((rc != 0) && (errno != ENOENT)) {
3736                 DBG_ERR("Forced unlink of [%s] failed [%s]\n",
3737                         smb_fname_str_dbg(rsrc_smb_fname), strerror(errno));
3738                 TALLOC_FREE(rsrc_smb_fname);
3739                 return -1;
3740         }
3741         TALLOC_FREE(rsrc_smb_fname);
3742
3743         return SMB_VFS_NEXT_UNLINK(handle, smb_fname);
3744 }
3745
3746 static int fruit_chmod(vfs_handle_struct *handle,
3747                        const struct smb_filename *smb_fname,
3748                        mode_t mode)
3749 {
3750         int rc = -1;
3751         struct fruit_config_data *config = NULL;
3752         struct smb_filename *smb_fname_adp = NULL;
3753
3754         rc = SMB_VFS_NEXT_CHMOD(handle, smb_fname, mode);
3755         if (rc != 0) {
3756                 return rc;
3757         }
3758
3759         SMB_VFS_HANDLE_GET_DATA(handle, config,
3760                                 struct fruit_config_data, return -1);
3761
3762         if (config->rsrc != FRUIT_RSRC_ADFILE) {
3763                 return 0;
3764         }
3765
3766         if (!VALID_STAT(smb_fname->st)) {
3767                 return 0;
3768         }
3769
3770         if (!S_ISREG(smb_fname->st.st_ex_mode)) {
3771                 return 0;
3772         }
3773
3774         rc = adouble_path(talloc_tos(), smb_fname, &smb_fname_adp);
3775         if (rc != 0) {
3776                 return -1;
3777         }
3778
3779         DEBUG(10, ("fruit_chmod: %s\n", smb_fname_adp->base_name));
3780
3781         rc = SMB_VFS_NEXT_CHMOD(handle, smb_fname_adp, mode);
3782         if (errno == ENOENT) {
3783                 rc = 0;
3784         }
3785
3786         TALLOC_FREE(smb_fname_adp);
3787         return rc;
3788 }
3789
3790 static int fruit_chown(vfs_handle_struct *handle,
3791                        const struct smb_filename *smb_fname,
3792                        uid_t uid,
3793                        gid_t gid)
3794 {
3795         int rc = -1;
3796         struct fruit_config_data *config = NULL;
3797         struct smb_filename *adp_smb_fname = NULL;
3798
3799         rc = SMB_VFS_NEXT_CHOWN(handle, smb_fname, uid, gid);
3800         if (rc != 0) {
3801                 return rc;
3802         }
3803
3804         SMB_VFS_HANDLE_GET_DATA(handle, config,
3805                                 struct fruit_config_data, return -1);
3806
3807         if (config->rsrc != FRUIT_RSRC_ADFILE) {
3808                 return 0;
3809         }
3810
3811         if (!VALID_STAT(smb_fname->st)) {
3812                 return 0;
3813         }
3814
3815         if (!S_ISREG(smb_fname->st.st_ex_mode)) {
3816                 return 0;
3817         }
3818
3819         rc = adouble_path(talloc_tos(), smb_fname, &adp_smb_fname);
3820         if (rc != 0) {
3821                 goto done;
3822         }
3823
3824         DEBUG(10, ("fruit_chown: %s\n", adp_smb_fname->base_name));
3825
3826         rc = SMB_VFS_NEXT_CHOWN(handle, adp_smb_fname, uid, gid);
3827         if (errno == ENOENT) {
3828                 rc = 0;
3829         }
3830
3831  done:
3832         TALLOC_FREE(adp_smb_fname);
3833         return rc;
3834 }
3835
3836 static int fruit_rmdir(struct vfs_handle_struct *handle,
3837                         const struct smb_filename *smb_fname)
3838 {
3839         DIR *dh = NULL;
3840         struct dirent *de;
3841         struct fruit_config_data *config;
3842
3843         SMB_VFS_HANDLE_GET_DATA(handle, config,
3844                                 struct fruit_config_data, return -1);
3845
3846         if (config->rsrc != FRUIT_RSRC_ADFILE) {
3847                 goto exit_rmdir;
3848         }
3849
3850         /*
3851          * Due to there is no way to change bDeleteVetoFiles variable
3852          * from this module, need to clean up ourselves
3853          */
3854
3855         dh = SMB_VFS_OPENDIR(handle->conn, smb_fname, NULL, 0);
3856         if (dh == NULL) {
3857                 goto exit_rmdir;
3858         }
3859
3860         while ((de = SMB_VFS_READDIR(handle->conn, dh, NULL)) != NULL) {
3861                 int match;
3862                 struct adouble *ad = NULL;
3863                 char *p = NULL;
3864                 struct smb_filename *ad_smb_fname = NULL;
3865                 int ret;
3866
3867                 match = strncmp(de->d_name,
3868                                 ADOUBLE_NAME_PREFIX,
3869                                 strlen(ADOUBLE_NAME_PREFIX));
3870                 if (match != 0) {
3871                         continue;
3872                 }
3873
3874                 p = talloc_asprintf(talloc_tos(), "%s/%s",
3875                                     smb_fname->base_name, de->d_name);
3876                 if (p == NULL) {
3877                         DBG_ERR("talloc_asprintf failed\n");
3878                         return -1;
3879                 }
3880
3881                 ad_smb_fname = synthetic_smb_fname(talloc_tos(), p,
3882                                                     NULL, NULL,
3883                                                     smb_fname->flags);
3884                 TALLOC_FREE(p);
3885                 if (ad_smb_fname == NULL) {
3886                         DBG_ERR("synthetic_smb_fname failed\n");
3887                         return -1;
3888                 }
3889
3890                 /*
3891                  * Check whether it's a valid AppleDouble file, if
3892                  * yes, delete it, ignore it otherwise.
3893                  */
3894                 ad = ad_get(talloc_tos(), handle, ad_smb_fname, ADOUBLE_RSRC);
3895                 if (ad == NULL) {
3896                         TALLOC_FREE(ad_smb_fname);
3897                         TALLOC_FREE(p);
3898                         continue;
3899                 }
3900                 TALLOC_FREE(ad);
3901
3902                 ret = SMB_VFS_NEXT_UNLINK(handle, ad_smb_fname);
3903                 if (ret != 0) {
3904                         DBG_ERR("Deleting [%s] failed\n",
3905                                 smb_fname_str_dbg(ad_smb_fname));
3906                 }
3907                 TALLOC_FREE(ad_smb_fname);
3908         }
3909
3910 exit_rmdir:
3911         if (dh) {
3912                 SMB_VFS_CLOSEDIR(handle->conn, dh);
3913         }
3914         return SMB_VFS_NEXT_RMDIR(handle, smb_fname);
3915 }
3916
3917 static ssize_t fruit_pread_meta_stream(vfs_handle_struct *handle,
3918                                        files_struct *fsp, void *data,
3919                                        size_t n, off_t offset)
3920 {
3921         ssize_t nread;
3922         int ret;
3923
3924         nread = SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
3925
3926         if (nread == n) {
3927                 return nread;
3928         }
3929
3930         DBG_ERR("Removing [%s] after short read [%zd]\n",
3931                 fsp_str_dbg(fsp), nread);
3932
3933         ret = SMB_VFS_NEXT_UNLINK(handle, fsp->fsp_name);
3934         if (ret != 0) {
3935                 DBG_ERR("Removing [%s] failed\n", fsp_str_dbg(fsp));
3936                 return -1;
3937         }
3938
3939         errno = EINVAL;
3940         return -1;
3941 }
3942
3943 static ssize_t fruit_pread_meta_adouble(vfs_handle_struct *handle,
3944                                         files_struct *fsp, void *data,
3945                                         size_t n, off_t offset)
3946 {
3947         AfpInfo *ai = NULL;
3948         struct adouble *ad = NULL;
3949         char afpinfo_buf[AFP_INFO_SIZE];
3950         char *p = NULL;
3951         ssize_t nread;
3952
3953         ai = afpinfo_new(talloc_tos());
3954         if (ai == NULL) {
3955                 return -1;
3956         }
3957
3958         ad = ad_fget(talloc_tos(), handle, fsp, ADOUBLE_META);
3959         if (ad == NULL) {
3960                 nread = -1;
3961                 goto fail;
3962         }
3963
3964         p = ad_get_entry(ad, ADEID_FINDERI);
3965         if (p == NULL) {
3966                 DBG_ERR("No ADEID_FINDERI for [%s]\n", fsp_str_dbg(fsp));
3967                 nread = -1;
3968                 goto fail;
3969         }
3970
3971         memcpy(&ai->afpi_FinderInfo[0], p, ADEDLEN_FINDERI);
3972
3973         nread = afpinfo_pack(ai, afpinfo_buf);
3974         if (nread != AFP_INFO_SIZE) {
3975                 nread = -1;
3976                 goto fail;
3977         }
3978
3979         memcpy(data, afpinfo_buf, n);
3980         nread = n;
3981
3982 fail:
3983         TALLOC_FREE(ai);
3984         return nread;
3985 }
3986
3987 static ssize_t fruit_pread_meta(vfs_handle_struct *handle,
3988                                 files_struct *fsp, void *data,
3989                                 size_t n, off_t offset)
3990 {
3991         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
3992         ssize_t nread;
3993         ssize_t to_return;
3994
3995         /*
3996          * OS X has a off-by-1 error in the offset calculation, so we're
3997          * bug compatible here. It won't hurt, as any relevant real
3998          * world read requests from the AFP_AfpInfo stream will be
3999          * offset=0 n=60. offset is ignored anyway, see below.
4000          */
4001         if ((offset < 0) || (offset >= AFP_INFO_SIZE + 1)) {
4002                 return 0;
4003         }
4004
4005         /* Yes, macOS always reads from offset 0 */
4006         offset = 0;
4007         to_return = MIN(n, AFP_INFO_SIZE);
4008
4009         switch (fio->config->meta) {
4010         case FRUIT_META_STREAM:
4011                 nread = fruit_pread_meta_stream(handle, fsp, data,
4012                                                 to_return, offset);
4013                 break;
4014
4015         case FRUIT_META_NETATALK:
4016                 nread = fruit_pread_meta_adouble(handle, fsp, data,
4017                                                  to_return, offset);
4018                 break;
4019
4020         default:
4021                 DBG_ERR("Unexpected meta config [%d]\n", fio->config->meta);
4022                 return -1;
4023         }
4024
4025         return nread;
4026 }
4027
4028 static ssize_t fruit_pread_rsrc_stream(vfs_handle_struct *handle,
4029                                        files_struct *fsp, void *data,
4030                                        size_t n, off_t offset)
4031 {
4032         return SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
4033 }
4034
4035 static ssize_t fruit_pread_rsrc_xattr(vfs_handle_struct *handle,
4036                                       files_struct *fsp, void *data,
4037                                       size_t n, off_t offset)
4038 {
4039         return SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
4040 }
4041
4042 static ssize_t fruit_pread_rsrc_adouble(vfs_handle_struct *handle,
4043                                         files_struct *fsp, void *data,
4044                                         size_t n, off_t offset)
4045 {
4046         struct adouble *ad = NULL;
4047         ssize_t nread;
4048
4049         ad = ad_fget(talloc_tos(), handle, fsp, ADOUBLE_RSRC);
4050         if (ad == NULL) {
4051                 return -1;
4052         }
4053
4054         nread = SMB_VFS_NEXT_PREAD(handle, fsp, data, n,
4055                                    offset + ad_getentryoff(ad, ADEID_RFORK));
4056
4057         TALLOC_FREE(ad);
4058         return nread;
4059 }
4060
4061 static ssize_t fruit_pread_rsrc(vfs_handle_struct *handle,
4062                                 files_struct *fsp, void *data,
4063                                 size_t n, off_t offset)
4064 {
4065         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4066         ssize_t nread;
4067
4068         switch (fio->config->rsrc) {
4069         case FRUIT_RSRC_STREAM:
4070                 nread = fruit_pread_rsrc_stream(handle, fsp, data, n, offset);
4071                 break;
4072
4073         case FRUIT_RSRC_ADFILE:
4074                 nread = fruit_pread_rsrc_adouble(handle, fsp, data, n, offset);
4075                 break;
4076
4077         case FRUIT_RSRC_XATTR:
4078                 nread = fruit_pread_rsrc_xattr(handle, fsp, data, n, offset);
4079                 break;
4080
4081         default:
4082                 DBG_ERR("Unexpected rsrc config [%d]\n", fio->config->rsrc);
4083                 return -1;
4084         }
4085
4086         return nread;
4087 }
4088
4089 static ssize_t fruit_pread(vfs_handle_struct *handle,
4090                            files_struct *fsp, void *data,
4091                            size_t n, off_t offset)
4092 {
4093         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4094         ssize_t nread;
4095
4096         DBG_DEBUG("Path [%s] offset=%"PRIdMAX", size=%zd\n",
4097                   fsp_str_dbg(fsp), (intmax_t)offset, n);
4098
4099         if (fio == NULL) {
4100                 return SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
4101         }
4102
4103         if (fio->type == ADOUBLE_META) {
4104                 nread = fruit_pread_meta(handle, fsp, data, n, offset);
4105         } else {
4106                 nread = fruit_pread_rsrc(handle, fsp, data, n, offset);
4107         }
4108
4109         DBG_DEBUG("Path [%s] nread [%zd]\n", fsp_str_dbg(fsp), nread);
4110         return nread;
4111 }
4112
4113 static bool fruit_must_handle_aio_stream(struct fio *fio)
4114 {
4115         if (fio == NULL) {
4116                 return false;
4117         };
4118
4119         if ((fio->type == ADOUBLE_META) &&
4120             (fio->config->meta == FRUIT_META_NETATALK))
4121         {
4122                 return true;
4123         }
4124
4125         if ((fio->type == ADOUBLE_RSRC) &&
4126             (fio->config->rsrc == FRUIT_RSRC_ADFILE))
4127         {
4128                 return true;
4129         }
4130
4131         return false;
4132 }
4133
4134 struct fruit_pread_state {
4135         ssize_t nread;
4136         struct vfs_aio_state vfs_aio_state;
4137 };
4138
4139 static void fruit_pread_done(struct tevent_req *subreq);
4140
4141 static struct tevent_req *fruit_pread_send(
4142         struct vfs_handle_struct *handle,
4143         TALLOC_CTX *mem_ctx,
4144         struct tevent_context *ev,
4145         struct files_struct *fsp,
4146         void *data,
4147         size_t n, off_t offset)
4148 {
4149         struct tevent_req *req = NULL;
4150         struct tevent_req *subreq = NULL;
4151         struct fruit_pread_state *state = NULL;
4152         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4153
4154         req = tevent_req_create(mem_ctx, &state,
4155                                 struct fruit_pread_state);
4156         if (req == NULL) {
4157                 return NULL;
4158         }
4159
4160         if (fruit_must_handle_aio_stream(fio)) {
4161                 state->nread = SMB_VFS_PREAD(fsp, data, n, offset);
4162                 if (state->nread != n) {
4163                         if (state->nread != -1) {
4164                                 errno = EIO;
4165                         }
4166                         tevent_req_error(req, errno);
4167                         return tevent_req_post(req, ev);
4168                 }
4169                 tevent_req_done(req);
4170                 return tevent_req_post(req, ev);
4171         }
4172
4173         subreq = SMB_VFS_NEXT_PREAD_SEND(state, ev, handle, fsp,
4174                                          data, n, offset);
4175         if (tevent_req_nomem(req, subreq)) {
4176                 return tevent_req_post(req, ev);
4177         }
4178         tevent_req_set_callback(subreq, fruit_pread_done, req);
4179         return req;
4180 }
4181
4182 static void fruit_pread_done(struct tevent_req *subreq)
4183 {
4184         struct tevent_req *req = tevent_req_callback_data(
4185                 subreq, struct tevent_req);
4186         struct fruit_pread_state *state = tevent_req_data(
4187                 req, struct fruit_pread_state);
4188
4189         state->nread = SMB_VFS_PREAD_RECV(subreq, &state->vfs_aio_state);
4190         TALLOC_FREE(subreq);
4191
4192         if (tevent_req_error(req, state->vfs_aio_state.error)) {
4193                 return;
4194         }
4195         tevent_req_done(req);
4196 }
4197
4198 static ssize_t fruit_pread_recv(struct tevent_req *req,
4199                                         struct vfs_aio_state *vfs_aio_state)
4200 {
4201         struct fruit_pread_state *state = tevent_req_data(
4202                 req, struct fruit_pread_state);
4203
4204         if (tevent_req_is_unix_error(req, &vfs_aio_state->error)) {
4205                 return -1;
4206         }
4207
4208         *vfs_aio_state = state->vfs_aio_state;
4209         return state->nread;
4210 }
4211
4212 static ssize_t fruit_pwrite_meta_stream(vfs_handle_struct *handle,
4213                                         files_struct *fsp, const void *data,
4214                                         size_t n, off_t offset)
4215 {
4216         AfpInfo *ai = NULL;
4217         size_t nwritten;
4218         bool ok;
4219
4220         ai = afpinfo_unpack(talloc_tos(), data);
4221         if (ai == NULL) {
4222                 return -1;
4223         }
4224
4225         nwritten = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
4226         if (nwritten != n) {
4227                 return -1;
4228         }
4229
4230         if (!ai_empty_finderinfo(ai)) {
4231                 return n;
4232         }
4233
4234         ok = set_delete_on_close(
4235                         fsp,
4236                         true,
4237                         handle->conn->session_info->security_token,
4238                         handle->conn->session_info->unix_token);
4239         if (!ok) {
4240                 DBG_ERR("set_delete_on_close on [%s] failed\n",
4241                         fsp_str_dbg(fsp));
4242                 return -1;
4243         }
4244
4245         return n;
4246 }
4247
4248 static ssize_t fruit_pwrite_meta_netatalk(vfs_handle_struct *handle,
4249                                           files_struct *fsp, const void *data,
4250                                           size_t n, off_t offset)
4251 {
4252         struct adouble *ad = NULL;
4253         AfpInfo *ai = NULL;
4254         char *p = NULL;
4255         int ret;
4256         bool ok;
4257
4258         ai = afpinfo_unpack(talloc_tos(), data);
4259         if (ai == NULL) {
4260                 return -1;
4261         }
4262
4263         ad = ad_fget(talloc_tos(), handle, fsp, ADOUBLE_META);
4264         if (ad == NULL) {
4265                 ad = ad_init(talloc_tos(), handle, ADOUBLE_META);
4266                 if (ad == NULL) {
4267                         return -1;
4268                 }
4269         }
4270         p = ad_get_entry(ad, ADEID_FINDERI);
4271         if (p == NULL) {
4272                 DBG_ERR("No ADEID_FINDERI for [%s]\n", fsp_str_dbg(fsp));
4273                 TALLOC_FREE(ad);
4274                 return -1;
4275         }
4276
4277         memcpy(p, &ai->afpi_FinderInfo[0], ADEDLEN_FINDERI);
4278
4279         ret = ad_fset(ad, fsp);
4280         if (ret != 0) {
4281                 DBG_ERR("ad_pwrite [%s] failed\n", fsp_str_dbg(fsp));
4282                 TALLOC_FREE(ad);
4283                 return -1;
4284         }
4285
4286         TALLOC_FREE(ad);
4287
4288         if (!ai_empty_finderinfo(ai)) {
4289                 return n;
4290         }
4291
4292         ok = set_delete_on_close(
4293                 fsp,
4294                 true,
4295                 handle->conn->session_info->security_token,
4296                 handle->conn->session_info->unix_token);
4297         if (!ok) {
4298                 DBG_ERR("set_delete_on_close on [%s] failed\n",
4299                         fsp_str_dbg(fsp));
4300                 return -1;
4301         }
4302
4303         return n;
4304 }
4305
4306 static ssize_t fruit_pwrite_meta(vfs_handle_struct *handle,
4307                                  files_struct *fsp, const void *data,
4308                                  size_t n, off_t offset)
4309 {
4310         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4311         ssize_t nwritten;
4312
4313         /*
4314          * Writing an all 0 blob to the metadata stream
4315          * results in the stream being removed on a macOS
4316          * server. This ensures we behave the same and it
4317          * verified by the "delete AFP_AfpInfo by writing all
4318          * 0" test.
4319          */
4320         if (n != AFP_INFO_SIZE || offset != 0) {
4321                 DBG_ERR("unexpected offset=%jd or size=%jd\n",
4322                         (intmax_t)offset, (intmax_t)n);
4323                 return -1;
4324         }
4325
4326         switch (fio->config->meta) {
4327         case FRUIT_META_STREAM:
4328                 nwritten = fruit_pwrite_meta_stream(handle, fsp, data,
4329                                                     n, offset);
4330                 break;
4331
4332         case FRUIT_META_NETATALK:
4333                 nwritten = fruit_pwrite_meta_netatalk(handle, fsp, data,
4334                                                       n, offset);
4335                 break;
4336
4337         default:
4338                 DBG_ERR("Unexpected meta config [%d]\n", fio->config->meta);
4339                 return -1;
4340         }
4341
4342         return nwritten;
4343 }
4344
4345 static ssize_t fruit_pwrite_rsrc_stream(vfs_handle_struct *handle,
4346                                         files_struct *fsp, const void *data,
4347                                         size_t n, off_t offset)
4348 {
4349         return SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
4350 }
4351
4352 static ssize_t fruit_pwrite_rsrc_xattr(vfs_handle_struct *handle,
4353                                        files_struct *fsp, const void *data,
4354                                        size_t n, off_t offset)
4355 {
4356         return SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
4357 }
4358
4359 static ssize_t fruit_pwrite_rsrc_adouble(vfs_handle_struct *handle,
4360                                          files_struct *fsp, const void *data,
4361                                          size_t n, off_t offset)
4362 {
4363         struct adouble *ad = NULL;
4364         ssize_t nwritten;
4365         int ret;
4366
4367         ad = ad_fget(talloc_tos(), handle, fsp, ADOUBLE_RSRC);
4368         if (ad == NULL) {
4369                 DBG_ERR("ad_get [%s] failed\n", fsp_str_dbg(fsp));
4370                 return -1;
4371         }
4372
4373         nwritten = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n,
4374                                        offset + ad_getentryoff(ad, ADEID_RFORK));
4375         if (nwritten != n) {
4376                 DBG_ERR("Short write on [%s] [%zd/%zd]\n",
4377                         fsp_str_dbg(fsp), nwritten, n);
4378                 TALLOC_FREE(ad);
4379                 return -1;
4380         }
4381
4382         if ((n + offset) > ad_getentrylen(ad, ADEID_RFORK)) {
4383                 ad_setentrylen(ad, ADEID_RFORK, n + offset);
4384                 ret = ad_fset(ad, fsp);
4385                 if (ret != 0) {
4386                         DBG_ERR("ad_pwrite [%s] failed\n", fsp_str_dbg(fsp));
4387                         TALLOC_FREE(ad);
4388                         return -1;
4389                 }
4390         }
4391
4392         TALLOC_FREE(ad);
4393         return n;
4394 }
4395
4396 static ssize_t fruit_pwrite_rsrc(vfs_handle_struct *handle,
4397                                  files_struct *fsp, const void *data,
4398                                  size_t n, off_t offset)
4399 {
4400         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4401         ssize_t nwritten;
4402
4403         switch (fio->config->rsrc) {
4404         case FRUIT_RSRC_STREAM:
4405                 nwritten = fruit_pwrite_rsrc_stream(handle, fsp, data, n, offset);
4406                 break;
4407
4408         case FRUIT_RSRC_ADFILE:
4409                 nwritten = fruit_pwrite_rsrc_adouble(handle, fsp, data, n, offset);
4410                 break;
4411
4412         case FRUIT_RSRC_XATTR:
4413                 nwritten = fruit_pwrite_rsrc_xattr(handle, fsp, data, n, offset);
4414                 break;
4415
4416         default:
4417                 DBG_ERR("Unexpected rsrc config [%d]\n", fio->config->rsrc);
4418                 return -1;
4419         }
4420
4421         return nwritten;
4422 }
4423
4424 static ssize_t fruit_pwrite(vfs_handle_struct *handle,
4425                             files_struct *fsp, const void *data,
4426                             size_t n, off_t offset)
4427 {
4428         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4429         ssize_t nwritten;
4430
4431         DBG_DEBUG("Path [%s] offset=%"PRIdMAX", size=%zd\n",
4432                   fsp_str_dbg(fsp), (intmax_t)offset, n);
4433
4434         if (fio == NULL) {
4435                 return SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
4436         }
4437
4438         if (fio->type == ADOUBLE_META) {
4439                 nwritten = fruit_pwrite_meta(handle, fsp, data, n, offset);
4440         } else {
4441                 nwritten = fruit_pwrite_rsrc(handle, fsp, data, n, offset);
4442         }
4443
4444         DBG_DEBUG("Path [%s] nwritten=%zd\n", fsp_str_dbg(fsp), nwritten);
4445         return nwritten;
4446 }
4447
4448 struct fruit_pwrite_state {
4449         ssize_t nwritten;
4450         struct vfs_aio_state vfs_aio_state;
4451 };
4452
4453 static void fruit_pwrite_done(struct tevent_req *subreq);
4454
4455 static struct tevent_req *fruit_pwrite_send(
4456         struct vfs_handle_struct *handle,
4457         TALLOC_CTX *mem_ctx,
4458         struct tevent_context *ev,
4459         struct files_struct *fsp,
4460         const void *data,
4461         size_t n, off_t offset)
4462 {
4463         struct tevent_req *req = NULL;
4464         struct tevent_req *subreq = NULL;
4465         struct fruit_pwrite_state *state = NULL;
4466         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4467
4468         req = tevent_req_create(mem_ctx, &state,
4469                                 struct fruit_pwrite_state);
4470         if (req == NULL) {
4471                 return NULL;
4472         }
4473
4474         if (fruit_must_handle_aio_stream(fio)) {
4475                 state->nwritten = SMB_VFS_PWRITE(fsp, data, n, offset);
4476                 if (state->nwritten != n) {
4477                         if (state->nwritten != -1) {
4478                                 errno = EIO;
4479                         }
4480                         tevent_req_error(req, errno);
4481                         return tevent_req_post(req, ev);
4482                 }
4483                 tevent_req_done(req);
4484                 return tevent_req_post(req, ev);
4485         }
4486
4487         subreq = SMB_VFS_NEXT_PWRITE_SEND(state, ev, handle, fsp,
4488                                           data, n, offset);
4489         if (tevent_req_nomem(req, subreq)) {
4490                 return tevent_req_post(req, ev);
4491         }
4492         tevent_req_set_callback(subreq, fruit_pwrite_done, req);
4493         return req;
4494 }
4495
4496 static void fruit_pwrite_done(struct tevent_req *subreq)
4497 {
4498         struct tevent_req *req = tevent_req_callback_data(
4499                 subreq, struct tevent_req);
4500         struct fruit_pwrite_state *state = tevent_req_data(
4501                 req, struct fruit_pwrite_state);
4502
4503         state->nwritten = SMB_VFS_PWRITE_RECV(subreq, &state->vfs_aio_state);
4504         TALLOC_FREE(subreq);
4505
4506         if (tevent_req_error(req, state->vfs_aio_state.error)) {
4507                 return;
4508         }
4509         tevent_req_done(req);
4510 }
4511
4512 static ssize_t fruit_pwrite_recv(struct tevent_req *req,
4513                                          struct vfs_aio_state *vfs_aio_state)
4514 {
4515         struct fruit_pwrite_state *state = tevent_req_data(
4516                 req, struct fruit_pwrite_state);
4517
4518         if (tevent_req_is_unix_error(req, &vfs_aio_state->error)) {
4519                 return -1;
4520         }
4521
4522         *vfs_aio_state = state->vfs_aio_state;
4523         return state->nwritten;
4524 }
4525
4526 /**
4527  * Helper to stat/lstat the base file of an smb_fname.
4528  */
4529 static int fruit_stat_base(vfs_handle_struct *handle,
4530                            struct smb_filename *smb_fname,
4531                            bool follow_links)
4532 {
4533         char *tmp_stream_name;
4534         int rc;
4535
4536         tmp_stream_name = smb_fname->stream_name;
4537         smb_fname->stream_name = NULL;
4538         if (follow_links) {
4539                 rc = SMB_VFS_NEXT_STAT(handle, smb_fname);
4540         } else {
4541                 rc = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
4542         }
4543         smb_fname->stream_name = tmp_stream_name;
4544         return rc;
4545 }
4546
4547 static int fruit_stat_meta_stream(vfs_handle_struct *handle,
4548                                   struct smb_filename *smb_fname,
4549                                   bool follow_links)
4550 {
4551         int ret;
4552
4553         if (follow_links) {
4554                 ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
4555         } else {
4556                 ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
4557         }
4558
4559         return ret;
4560 }
4561
4562 static int fruit_stat_meta_netatalk(vfs_handle_struct *handle,
4563                                     struct smb_filename *smb_fname,
4564                                     bool follow_links)
4565 {
4566         struct adouble *ad = NULL;
4567
4568         ad = ad_get(talloc_tos(), handle, smb_fname, ADOUBLE_META);
4569         if (ad == NULL) {
4570                 DBG_INFO("fruit_stat_meta %s: %s\n",
4571                          smb_fname_str_dbg(smb_fname), strerror(errno));
4572                 errno = ENOENT;
4573                 return -1;
4574         }
4575         TALLOC_FREE(ad);
4576
4577         /* Populate the stat struct with info from the base file. */
4578         if (fruit_stat_base(handle, smb_fname, follow_links) == -1) {
4579                 return -1;
4580         }
4581         smb_fname->st.st_ex_size = AFP_INFO_SIZE;
4582         smb_fname->st.st_ex_ino = fruit_inode(&smb_fname->st,
4583                                               smb_fname->stream_name);
4584         return 0;
4585 }
4586
4587 static int fruit_stat_meta(vfs_handle_struct *handle,
4588                            struct smb_filename *smb_fname,
4589                            bool follow_links)
4590 {
4591         struct fruit_config_data *config = NULL;
4592         int ret;
4593
4594         SMB_VFS_HANDLE_GET_DATA(handle, config,
4595                                 struct fruit_config_data, return -1);
4596
4597         switch (config->meta) {
4598         case FRUIT_META_STREAM:
4599                 ret = fruit_stat_meta_stream(handle, smb_fname, follow_links);
4600                 break;
4601
4602         case FRUIT_META_NETATALK:
4603                 ret = fruit_stat_meta_netatalk(handle, smb_fname, follow_links);
4604                 break;
4605
4606         default:
4607                 DBG_ERR("Unexpected meta config [%d]\n", config->meta);
4608                 return -1;
4609         }
4610
4611         return ret;
4612 }
4613
4614 static int fruit_stat_rsrc_netatalk(vfs_handle_struct *handle,
4615                                     struct smb_filename *smb_fname,
4616                                     bool follow_links)
4617 {
4618         struct adouble *ad = NULL;
4619         int ret;
4620
4621         ad = ad_get(talloc_tos(), handle, smb_fname, ADOUBLE_RSRC);
4622         if (ad == NULL) {
4623                 errno = ENOENT;
4624                 return -1;
4625         }
4626
4627         /* Populate the stat struct with info from the base file. */
4628         ret = fruit_stat_base(handle, smb_fname, follow_links);
4629         if (ret != 0) {
4630                 TALLOC_FREE(ad);
4631                 return -1;
4632         }
4633
4634         smb_fname->st.st_ex_size = ad_getentrylen(ad, ADEID_RFORK);
4635         smb_fname->st.st_ex_ino = fruit_inode(&smb_fname->st,
4636                                               smb_fname->stream_name);
4637         TALLOC_FREE(ad);
4638         return 0;
4639 }
4640
4641 static int fruit_stat_rsrc_stream(vfs_handle_struct *handle,
4642                                   struct smb_filename *smb_fname,
4643                                   bool follow_links)
4644 {
4645         int ret;
4646
4647         if (follow_links) {
4648                 ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
4649         } else {
4650                 ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
4651         }
4652
4653         return ret;
4654 }
4655
4656 static int fruit_stat_rsrc_xattr(vfs_handle_struct *handle,
4657                                  struct smb_filename *smb_fname,
4658                                  bool follow_links)
4659 {
4660 #ifdef HAVE_ATTROPEN
4661         int ret;
4662         int fd = -1;
4663
4664         /* Populate the stat struct with info from the base file. */
4665         ret = fruit_stat_base(handle, smb_fname, follow_links);
4666         if (ret != 0) {
4667                 return -1;
4668         }
4669
4670         fd = attropen(smb_fname->base_name,
4671                       AFPRESOURCE_EA_NETATALK,
4672                       O_RDONLY);
4673         if (fd == -1) {
4674                 return 0;
4675         }
4676
4677         ret = sys_fstat(fd, &smb_fname->st, false);
4678         if (ret != 0) {
4679                 close(fd);
4680                 DBG_ERR("fstat [%s:%s] failed\n", smb_fname->base_name,
4681                         AFPRESOURCE_EA_NETATALK);
4682                 return -1;
4683         }
4684         close(fd);
4685         fd = -1;
4686
4687         smb_fname->st.st_ex_ino = fruit_inode(&smb_fname->st,
4688                                               smb_fname->stream_name);
4689
4690         return ret;
4691
4692 #else
4693         errno = ENOSYS;
4694         return -1;
4695 #endif
4696 }
4697
4698 static int fruit_stat_rsrc(vfs_handle_struct *handle,
4699                            struct smb_filename *smb_fname,
4700                            bool follow_links)
4701 {
4702         struct fruit_config_data *config = NULL;
4703         int ret;
4704
4705         DBG_DEBUG("Path [%s]\n", smb_fname_str_dbg(smb_fname));
4706
4707         SMB_VFS_HANDLE_GET_DATA(handle, config,
4708                                 struct fruit_config_data, return -1);
4709
4710         switch (config->rsrc) {
4711         case FRUIT_RSRC_STREAM:
4712                 ret = fruit_stat_rsrc_stream(handle, smb_fname, follow_links);
4713                 break;
4714
4715         case FRUIT_RSRC_XATTR:
4716                 ret = fruit_stat_rsrc_xattr(handle, smb_fname, follow_links);
4717                 break;
4718
4719         case FRUIT_RSRC_ADFILE:
4720                 ret = fruit_stat_rsrc_netatalk(handle, smb_fname, follow_links);
4721                 break;
4722
4723         default:
4724                 DBG_ERR("Unexpected rsrc config [%d]\n", config->rsrc);
4725                 return -1;
4726         }
4727
4728         return ret;
4729 }
4730
4731 static int fruit_stat(vfs_handle_struct *handle,
4732                       struct smb_filename *smb_fname)
4733 {
4734         int rc = -1;
4735
4736         DEBUG(10, ("fruit_stat called for %s\n",
4737                    smb_fname_str_dbg(smb_fname)));
4738
4739         if (!is_ntfs_stream_smb_fname(smb_fname)
4740             || is_ntfs_default_stream_smb_fname(smb_fname)) {
4741                 rc = SMB_VFS_NEXT_STAT(handle, smb_fname);
4742                 if (rc == 0) {
4743                         update_btime(handle, smb_fname);
4744                 }
4745                 return rc;
4746         }
4747
4748         /*
4749          * Note if lp_posix_paths() is true, we can never
4750          * get here as is_ntfs_stream_smb_fname() is
4751          * always false. So we never need worry about
4752          * not following links here.
4753          */
4754
4755         if (is_afpinfo_stream(smb_fname)) {
4756                 rc = fruit_stat_meta(handle, smb_fname, true);
4757         } else if (is_afpresource_stream(smb_fname)) {
4758                 rc = fruit_stat_rsrc(handle, smb_fname, true);
4759         } else {
4760                 return SMB_VFS_NEXT_STAT(handle, smb_fname);
4761         }
4762
4763         if (rc == 0) {
4764                 update_btime(handle, smb_fname);
4765                 smb_fname->st.st_ex_mode &= ~S_IFMT;
4766                 smb_fname->st.st_ex_mode |= S_IFREG;
4767                 smb_fname->st.st_ex_blocks =
4768                         smb_fname->st.st_ex_size / STAT_ST_BLOCKSIZE + 1;
4769         }
4770         return rc;
4771 }
4772
4773 static int fruit_lstat(vfs_handle_struct *handle,
4774                        struct smb_filename *smb_fname)
4775 {
4776         int rc = -1;
4777
4778         DEBUG(10, ("fruit_lstat called for %s\n",
4779                    smb_fname_str_dbg(smb_fname)));
4780
4781         if (!is_ntfs_stream_smb_fname(smb_fname)
4782             || is_ntfs_default_stream_smb_fname(smb_fname)) {
4783                 rc = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
4784                 if (rc == 0) {
4785                         update_btime(handle, smb_fname);
4786                 }
4787                 return rc;
4788         }
4789
4790         if (is_afpinfo_stream(smb_fname)) {
4791                 rc = fruit_stat_meta(handle, smb_fname, false);
4792         } else if (is_afpresource_stream(smb_fname)) {
4793                 rc = fruit_stat_rsrc(handle, smb_fname, false);
4794         } else {
4795                 return SMB_VFS_NEXT_LSTAT(handle, smb_fname);
4796         }
4797
4798         if (rc == 0) {
4799                 update_btime(handle, smb_fname);
4800                 smb_fname->st.st_ex_mode &= ~S_IFMT;
4801                 smb_fname->st.st_ex_mode |= S_IFREG;
4802                 smb_fname->st.st_ex_blocks =
4803                         smb_fname->st.st_ex_size / STAT_ST_BLOCKSIZE + 1;
4804         }
4805         return rc;
4806 }
4807
4808 static int fruit_fstat_meta_stream(vfs_handle_struct *handle,
4809                                    files_struct *fsp,
4810                                    SMB_STRUCT_STAT *sbuf)
4811 {
4812         return SMB_VFS_NEXT_FSTAT(handle, fsp, sbuf);
4813 }
4814
4815 static int fruit_fstat_meta_netatalk(vfs_handle_struct *handle,
4816                                      files_struct *fsp,
4817                                      SMB_STRUCT_STAT *sbuf)
4818 {
4819         int ret;
4820
4821         ret = fruit_stat_base(handle, fsp->base_fsp->fsp_name, false);
4822         if (ret != 0) {
4823                 return -1;
4824         }
4825
4826         *sbuf = fsp->base_fsp->fsp_name->st;
4827         sbuf->st_ex_size = AFP_INFO_SIZE;
4828         sbuf->st_ex_ino = fruit_inode(sbuf, fsp->fsp_name->stream_name);
4829
4830         return 0;
4831 }
4832
4833 static int fruit_fstat_meta(vfs_handle_struct *handle,
4834                             files_struct *fsp,
4835                             SMB_STRUCT_STAT *sbuf,
4836                             struct fio *fio)
4837 {
4838         int ret;
4839
4840         DBG_DEBUG("Path [%s]\n", fsp_str_dbg(fsp));
4841
4842         switch (fio->config->meta) {
4843         case FRUIT_META_STREAM:
4844                 ret = fruit_fstat_meta_stream(handle, fsp, sbuf);
4845                 break;
4846
4847         case FRUIT_META_NETATALK:
4848                 ret = fruit_fstat_meta_netatalk(handle, fsp, sbuf);
4849                 break;
4850
4851         default:
4852                 DBG_ERR("Unexpected meta config [%d]\n", fio->config->meta);
4853                 return -1;
4854         }
4855
4856         DBG_DEBUG("Path [%s] ret [%d]\n", fsp_str_dbg(fsp), ret);
4857         return ret;
4858 }
4859
4860 static int fruit_fstat_rsrc_xattr(vfs_handle_struct *handle,
4861                                   files_struct *fsp,
4862                                   SMB_STRUCT_STAT *sbuf)
4863 {
4864         return SMB_VFS_NEXT_FSTAT(handle, fsp, sbuf);
4865 }
4866
4867 static int fruit_fstat_rsrc_stream(vfs_handle_struct *handle,
4868                                    files_struct *fsp,
4869                                    SMB_STRUCT_STAT *sbuf)
4870 {
4871         return SMB_VFS_NEXT_FSTAT(handle, fsp, sbuf);
4872 }
4873
4874 static int fruit_fstat_rsrc_adouble(vfs_handle_struct *handle,
4875                                     files_struct *fsp,
4876                                     SMB_STRUCT_STAT *sbuf)
4877 {
4878         struct adouble *ad = NULL;
4879         int ret;
4880
4881         /* Populate the stat struct with info from the base file. */
4882         ret = fruit_stat_base(handle, fsp->base_fsp->fsp_name, false);
4883         if (ret == -1) {
4884                 return -1;
4885         }
4886
4887         ad = ad_get(talloc_tos(), handle,
4888                     fsp->base_fsp->fsp_name,
4889                     ADOUBLE_RSRC);
4890         if (ad == NULL) {
4891                 DBG_ERR("ad_get [%s] failed [%s]\n",
4892                         fsp_str_dbg(fsp), strerror(errno));
4893                 return -1;
4894         }
4895
4896         *sbuf = fsp->base_fsp->fsp_name->st;
4897         sbuf->st_ex_size = ad_getentrylen(ad, ADEID_RFORK);
4898         sbuf->st_ex_ino = fruit_inode(sbuf, fsp->fsp_name->stream_name);
4899
4900         TALLOC_FREE(ad);
4901         return 0;
4902 }
4903
4904 static int fruit_fstat_rsrc(vfs_handle_struct *handle, files_struct *fsp,
4905                             SMB_STRUCT_STAT *sbuf, struct fio *fio)
4906 {
4907         int ret;
4908
4909         switch (fio->config->rsrc) {
4910         case FRUIT_RSRC_STREAM:
4911                 ret = fruit_fstat_rsrc_stream(handle, fsp, sbuf);
4912                 break;
4913
4914         case FRUIT_RSRC_ADFILE:
4915                 ret = fruit_fstat_rsrc_adouble(handle, fsp, sbuf);
4916                 break;
4917
4918         case FRUIT_RSRC_XATTR:
4919                 ret = fruit_fstat_rsrc_xattr(handle, fsp, sbuf);
4920                 break;
4921
4922         default:
4923                 DBG_ERR("Unexpected rsrc config [%d]\n", fio->config->rsrc);
4924                 return -1;
4925         }
4926
4927         return ret;
4928 }
4929
4930 static int fruit_fstat(vfs_handle_struct *handle, files_struct *fsp,
4931                        SMB_STRUCT_STAT *sbuf)
4932 {
4933         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
4934         int rc;
4935
4936         if (fio == NULL) {
4937                 return SMB_VFS_NEXT_FSTAT(handle, fsp, sbuf);
4938         }
4939
4940         DBG_DEBUG("Path [%s]\n", fsp_str_dbg(fsp));
4941
4942         if (fio->type == ADOUBLE_META) {
4943                 rc = fruit_fstat_meta(handle, fsp, sbuf, fio);
4944         } else {
4945                 rc = fruit_fstat_rsrc(handle, fsp, sbuf, fio);
4946         }
4947
4948         if (rc == 0) {
4949                 sbuf->st_ex_mode &= ~S_IFMT;
4950                 sbuf->st_ex_mode |= S_IFREG;
4951                 sbuf->st_ex_blocks = sbuf->st_ex_size / STAT_ST_BLOCKSIZE + 1;
4952         }
4953
4954         DBG_DEBUG("Path [%s] rc [%d] size [%"PRIdMAX"]\n",
4955                   fsp_str_dbg(fsp), rc, (intmax_t)sbuf->st_ex_size);
4956         return rc;
4957 }
4958
4959 static NTSTATUS delete_invalid_meta_stream(
4960         vfs_handle_struct *handle,
4961         const struct smb_filename *smb_fname,
4962         TALLOC_CTX *mem_ctx,
4963         unsigned int *pnum_streams,
4964         struct stream_struct **pstreams)
4965 {
4966         struct smb_filename *sname = NULL;
4967         int ret;
4968         bool ok;
4969
4970         ok = del_fruit_stream(mem_ctx, pnum_streams, pstreams, AFPINFO_STREAM);
4971         if (!ok) {
4972                 return NT_STATUS_INTERNAL_ERROR;
4973         }
4974
4975         sname = synthetic_smb_fname(talloc_tos(),
4976                                     smb_fname->base_name,
4977                                     AFPINFO_STREAM_NAME,
4978                                     NULL, 0);
4979         if (sname == NULL) {
4980                 return NT_STATUS_NO_MEMORY;
4981         }
4982
4983         ret = SMB_VFS_NEXT_UNLINK(handle, sname);
4984         TALLOC_FREE(sname);
4985         if (ret != 0) {
4986                 DBG_ERR("Removing [%s] failed\n", smb_fname_str_dbg(sname));
4987                 return map_nt_error_from_unix(errno);
4988         }
4989
4990         return NT_STATUS_OK;
4991 }
4992
4993 static NTSTATUS fruit_streaminfo_meta_stream(
4994         vfs_handle_struct *handle,
4995         struct files_struct *fsp,
4996         const struct smb_filename *smb_fname,
4997         TALLOC_CTX *mem_ctx,
4998         unsigned int *pnum_streams,
4999         struct stream_struct **pstreams)
5000 {
5001         struct stream_struct *stream = *pstreams;
5002         unsigned int num_streams = *pnum_streams;
5003         struct smb_filename *sname = NULL;
5004         char *full_name = NULL;
5005         uint32_t name_hash;
5006         struct share_mode_lock *lck = NULL;
5007         struct file_id id = {0};
5008         bool delete_on_close_set;
5009         int i;
5010         int ret;
5011         NTSTATUS status;
5012         bool ok;
5013
5014         for (i = 0; i < num_streams; i++) {
5015                 if (strequal_m(stream[i].name, AFPINFO_STREAM)) {
5016                         break;
5017                 }
5018         }
5019
5020         if (i == num_streams) {
5021                 return NT_STATUS_OK;
5022         }
5023
5024         if (stream[i].size != AFP_INFO_SIZE) {
5025                 DBG_ERR("Removing invalid AFPINFO_STREAM size [%jd] from [%s]\n",
5026                         (intmax_t)stream[i].size, smb_fname_str_dbg(smb_fname));
5027
5028                 return delete_invalid_meta_stream(handle, smb_fname, mem_ctx,
5029                                                   pnum_streams, pstreams);
5030         }
5031
5032         /*
5033          * Now check if there's a delete-on-close pending on the stream. If so,
5034          * hide the stream. This behaviour was verified against a macOS 10.12
5035          * SMB server.
5036          */
5037
5038         sname = synthetic_smb_fname(talloc_tos(),
5039                                     smb_fname->base_name,
5040                                     AFPINFO_STREAM_NAME,
5041                                     NULL, 0);
5042         if (sname == NULL) {
5043                 status = NT_STATUS_NO_MEMORY;
5044                 goto out;
5045         }
5046
5047         ret = SMB_VFS_NEXT_STAT(handle, sname);
5048         if (ret != 0) {
5049                 status = map_nt_error_from_unix(errno);
5050                 goto out;
5051         }
5052
5053         id = SMB_VFS_NEXT_FILE_ID_CREATE(handle, &sname->st);
5054
5055         lck = get_existing_share_mode_lock(talloc_tos(), id);
5056         if (lck == NULL) {
5057                 status = NT_STATUS_OK;
5058                 goto out;
5059         }
5060
5061         full_name = talloc_asprintf(talloc_tos(),
5062                                     "%s%s",
5063                                     sname->base_name,
5064                                     AFPINFO_STREAM);
5065         if (full_name == NULL) {
5066                 status = NT_STATUS_NO_MEMORY;
5067                 goto out;
5068         }
5069
5070         status = file_name_hash(handle->conn, full_name, &name_hash);
5071         if (!NT_STATUS_IS_OK(status)) {
5072                 goto out;
5073         }
5074
5075         delete_on_close_set = is_delete_on_close_set(lck, name_hash);
5076         if (delete_on_close_set) {
5077                 ok = del_fruit_stream(mem_ctx,
5078                                       pnum_streams,
5079                                       pstreams,
5080                                       AFPINFO_STREAM);
5081                 if (!ok) {
5082                         status = NT_STATUS_INTERNAL_ERROR;
5083                         goto out;
5084                 }
5085         }
5086
5087         status  = NT_STATUS_OK;
5088
5089 out:
5090         TALLOC_FREE(sname);
5091         TALLOC_FREE(lck);
5092         TALLOC_FREE(full_name);
5093         return status;
5094 }
5095
5096 static NTSTATUS fruit_streaminfo_meta_netatalk(
5097         vfs_handle_struct *handle,
5098         struct files_struct *fsp,
5099         const struct smb_filename *smb_fname,
5100         TALLOC_CTX *mem_ctx,
5101         unsigned int *pnum_streams,
5102         struct stream_struct **pstreams)
5103 {
5104         struct stream_struct *stream = *pstreams;
5105         unsigned int num_streams = *pnum_streams;
5106         struct adouble *ad = NULL;
5107         bool is_fi_empty;
5108         int i;
5109         bool ok;
5110
5111         /* Remove the Netatalk xattr from the list */
5112         ok = del_fruit_stream(mem_ctx, pnum_streams, pstreams,
5113                               ":" NETATALK_META_XATTR ":$DATA");
5114         if (!ok) {
5115                 return NT_STATUS_NO_MEMORY;
5116         }
5117
5118         /*
5119          * Check if there's a AFPINFO_STREAM from the VFS streams
5120          * backend and if yes, remove it from the list
5121          */
5122         for (i = 0; i < num_streams; i++) {
5123                 if (strequal_m(stream[i].name, AFPINFO_STREAM)) {
5124                         break;
5125                 }
5126         }
5127
5128         if (i < num_streams) {
5129                 DBG_WARNING("Unexpected AFPINFO_STREAM on [%s]\n",
5130                             smb_fname_str_dbg(smb_fname));
5131
5132                 ok = del_fruit_stream(mem_ctx, pnum_streams, pstreams,
5133                                       AFPINFO_STREAM);
5134                 if (!ok) {
5135                         return NT_STATUS_INTERNAL_ERROR;
5136                 }
5137         }
5138
5139         ad = ad_get(talloc_tos(), handle, smb_fname, ADOUBLE_META);
5140         if (ad == NULL) {
5141                 return NT_STATUS_OK;
5142         }
5143
5144         is_fi_empty = ad_empty_finderinfo(ad);
5145         TALLOC_FREE(ad);
5146
5147         if (is_fi_empty) {
5148                 return NT_STATUS_OK;
5149         }
5150
5151         ok = add_fruit_stream(mem_ctx, pnum_streams, pstreams,
5152                               AFPINFO_STREAM_NAME, AFP_INFO_SIZE,
5153                               smb_roundup(handle->conn, AFP_INFO_SIZE));
5154         if (!ok) {
5155                 return NT_STATUS_NO_MEMORY;
5156         }
5157
5158         return NT_STATUS_OK;
5159 }
5160
5161 static NTSTATUS fruit_streaminfo_meta(vfs_handle_struct *handle,
5162                                       struct files_struct *fsp,
5163                                       const struct smb_filename *smb_fname,
5164                                       TALLOC_CTX *mem_ctx,
5165                                       unsigned int *pnum_streams,
5166                                       struct stream_struct **pstreams)
5167 {
5168         struct fruit_config_data *config = NULL;
5169         NTSTATUS status;
5170
5171         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
5172                                 return NT_STATUS_INTERNAL_ERROR);
5173
5174         switch (config->meta) {
5175         case FRUIT_META_NETATALK:
5176                 status = fruit_streaminfo_meta_netatalk(handle, fsp, smb_fname,
5177                                                         mem_ctx, pnum_streams,
5178                                                         pstreams);
5179                 break;
5180
5181         case FRUIT_META_STREAM:
5182                 status = fruit_streaminfo_meta_stream(handle, fsp, smb_fname,
5183                                                       mem_ctx, pnum_streams,
5184                                                       pstreams);
5185                 break;
5186
5187         default:
5188                 return NT_STATUS_INTERNAL_ERROR;
5189         }
5190
5191         return status;
5192 }
5193
5194 static NTSTATUS fruit_streaminfo_rsrc_stream(
5195         vfs_handle_struct *handle,
5196         struct files_struct *fsp,
5197         const struct smb_filename *smb_fname,
5198         TALLOC_CTX *mem_ctx,
5199         unsigned int *pnum_streams,
5200         struct stream_struct **pstreams)
5201 {
5202         bool ok;
5203
5204         ok = filter_empty_rsrc_stream(pnum_streams, pstreams);
5205         if (!ok) {
5206                 DBG_ERR("Filtering resource stream failed\n");
5207                 return NT_STATUS_INTERNAL_ERROR;
5208         }
5209         return NT_STATUS_OK;
5210 }
5211
5212 static NTSTATUS fruit_streaminfo_rsrc_xattr(
5213         vfs_handle_struct *handle,
5214         struct files_struct *fsp,
5215         const struct smb_filename *smb_fname,
5216         TALLOC_CTX *mem_ctx,
5217         unsigned int *pnum_streams,
5218         struct stream_struct **pstreams)
5219 {
5220         bool ok;
5221
5222         ok = filter_empty_rsrc_stream(pnum_streams, pstreams);
5223         if (!ok) {
5224                 DBG_ERR("Filtering resource stream failed\n");
5225                 return NT_STATUS_INTERNAL_ERROR;
5226         }
5227         return NT_STATUS_OK;
5228 }
5229
5230 static NTSTATUS fruit_streaminfo_rsrc_adouble(
5231         vfs_handle_struct *handle,
5232         struct files_struct *fsp,
5233         const struct smb_filename *smb_fname,
5234         TALLOC_CTX *mem_ctx,
5235         unsigned int *pnum_streams,
5236         struct stream_struct **pstreams)
5237 {
5238         struct stream_struct *stream = *pstreams;
5239         unsigned int num_streams = *pnum_streams;
5240         struct adouble *ad = NULL;
5241         bool ok;
5242         size_t rlen;
5243         int i;
5244
5245         /*
5246          * Check if there's a AFPRESOURCE_STREAM from the VFS streams backend
5247          * and if yes, remove it from the list
5248          */
5249         for (i = 0; i < num_streams; i++) {
5250                 if (strequal_m(stream[i].name, AFPRESOURCE_STREAM)) {
5251                         break;
5252                 }
5253         }
5254
5255         if (i < num_streams) {
5256                 DBG_WARNING("Unexpected AFPRESOURCE_STREAM on [%s]\n",
5257                             smb_fname_str_dbg(smb_fname));
5258
5259                 ok = del_fruit_stream(mem_ctx, pnum_streams, pstreams,
5260                                       AFPRESOURCE_STREAM);
5261                 if (!ok) {
5262                         return NT_STATUS_INTERNAL_ERROR;
5263                 }
5264         }
5265
5266         ad = ad_get(talloc_tos(), handle, smb_fname, ADOUBLE_RSRC);
5267         if (ad == NULL) {
5268                 return NT_STATUS_OK;
5269         }
5270
5271         rlen = ad_getentrylen(ad, ADEID_RFORK);
5272         TALLOC_FREE(ad);
5273
5274         if (rlen == 0) {
5275                 return NT_STATUS_OK;
5276         }
5277
5278         ok = add_fruit_stream(mem_ctx, pnum_streams, pstreams,
5279                               AFPRESOURCE_STREAM_NAME, rlen,
5280                               smb_roundup(handle->conn, rlen));
5281         if (!ok) {
5282                 return NT_STATUS_NO_MEMORY;
5283         }
5284
5285         return NT_STATUS_OK;
5286 }
5287
5288 static NTSTATUS fruit_streaminfo_rsrc(vfs_handle_struct *handle,
5289                                       struct files_struct *fsp,
5290                                       const struct smb_filename *smb_fname,
5291                                       TALLOC_CTX *mem_ctx,
5292                                       unsigned int *pnum_streams,
5293                                       struct stream_struct **pstreams)
5294 {
5295         struct fruit_config_data *config = NULL;
5296         NTSTATUS status;
5297
5298         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
5299                                 return NT_STATUS_INTERNAL_ERROR);
5300
5301         switch (config->rsrc) {
5302         case FRUIT_RSRC_STREAM:
5303                 status = fruit_streaminfo_rsrc_stream(handle, fsp, smb_fname,
5304                                                       mem_ctx, pnum_streams,
5305                                                       pstreams);
5306                 break;
5307
5308         case FRUIT_RSRC_XATTR:
5309                 status = fruit_streaminfo_rsrc_xattr(handle, fsp, smb_fname,
5310                                                      mem_ctx, pnum_streams,
5311                                                      pstreams);
5312                 break;
5313
5314         case FRUIT_RSRC_ADFILE:
5315                 status = fruit_streaminfo_rsrc_adouble(handle, fsp, smb_fname,
5316                                                        mem_ctx, pnum_streams,
5317                                                        pstreams);
5318                 break;
5319
5320         default:
5321                 return NT_STATUS_INTERNAL_ERROR;
5322         }
5323
5324         return status;
5325 }
5326
5327 static NTSTATUS fruit_streaminfo(vfs_handle_struct *handle,
5328                                  struct files_struct *fsp,
5329                                  const struct smb_filename *smb_fname,
5330                                  TALLOC_CTX *mem_ctx,
5331                                  unsigned int *pnum_streams,
5332                                  struct stream_struct **pstreams)
5333 {
5334         struct fruit_config_data *config = NULL;
5335         NTSTATUS status;
5336
5337         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
5338                                 return NT_STATUS_UNSUCCESSFUL);
5339
5340         DBG_DEBUG("Path [%s]\n", smb_fname_str_dbg(smb_fname));
5341
5342         status = SMB_VFS_NEXT_STREAMINFO(handle, fsp, smb_fname, mem_ctx,
5343                                          pnum_streams, pstreams);
5344         if (!NT_STATUS_IS_OK(status)) {
5345                 return status;
5346         }
5347
5348         status = fruit_streaminfo_meta(handle, fsp, smb_fname,
5349                                        mem_ctx, pnum_streams, pstreams);
5350         if (!NT_STATUS_IS_OK(status)) {
5351                 return status;
5352         }
5353
5354         status = fruit_streaminfo_rsrc(handle, fsp, smb_fname,
5355                                        mem_ctx, pnum_streams, pstreams);
5356         if (!NT_STATUS_IS_OK(status)) {
5357                 return status;
5358         }
5359
5360         return NT_STATUS_OK;
5361 }
5362
5363 static int fruit_ntimes(vfs_handle_struct *handle,
5364                         const struct smb_filename *smb_fname,
5365                         struct smb_file_time *ft)
5366 {
5367         int rc = 0;
5368         struct adouble *ad = NULL;
5369         struct fruit_config_data *config = NULL;
5370
5371         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
5372                                 return -1);
5373
5374         if ((config->meta != FRUIT_META_NETATALK) ||
5375             null_timespec(ft->create_time))
5376         {
5377                 return SMB_VFS_NEXT_NTIMES(handle, smb_fname, ft);
5378         }
5379
5380         DEBUG(10,("set btime for %s to %s\n", smb_fname_str_dbg(smb_fname),
5381                  time_to_asc(convert_timespec_to_time_t(ft->create_time))));
5382
5383         ad = ad_get(talloc_tos(), handle, smb_fname, ADOUBLE_META);
5384         if (ad == NULL) {
5385                 goto exit;
5386         }
5387
5388         ad_setdate(ad, AD_DATE_CREATE | AD_DATE_UNIX,
5389                    convert_time_t_to_uint32_t(ft->create_time.tv_sec));
5390
5391         rc = ad_set(ad, smb_fname);
5392
5393 exit:
5394
5395         TALLOC_FREE(ad);
5396         if (rc != 0) {
5397                 DEBUG(1, ("fruit_ntimes: %s\n", smb_fname_str_dbg(smb_fname)));
5398                 return -1;
5399         }
5400         return SMB_VFS_NEXT_NTIMES(handle, smb_fname, ft);
5401 }
5402
5403 static int fruit_fallocate(struct vfs_handle_struct *handle,
5404                            struct files_struct *fsp,
5405                            uint32_t mode,
5406                            off_t offset,
5407                            off_t len)
5408 {
5409         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
5410
5411         if (fio == NULL) {
5412                 return SMB_VFS_NEXT_FALLOCATE(handle, fsp, mode, offset, len);
5413         }
5414
5415         /* Let the pwrite code path handle it. */
5416         errno = ENOSYS;
5417         return -1;
5418 }
5419
5420 static int fruit_ftruncate_rsrc_xattr(struct vfs_handle_struct *handle,
5421                                       struct files_struct *fsp,
5422                                       off_t offset)
5423 {
5424         if (offset == 0) {
5425                 return SMB_VFS_FREMOVEXATTR(fsp, AFPRESOURCE_EA_NETATALK);
5426         }
5427
5428 #ifdef HAVE_ATTROPEN
5429         return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, offset);
5430 #endif
5431         return 0;
5432 }
5433
5434 static int fruit_ftruncate_rsrc_adouble(struct vfs_handle_struct *handle,
5435                                         struct files_struct *fsp,
5436                                         off_t offset)
5437 {
5438         int rc;
5439         struct adouble *ad = NULL;
5440         off_t ad_off;
5441
5442         ad = ad_fget(talloc_tos(), handle, fsp, ADOUBLE_RSRC);
5443         if (ad == NULL) {
5444                 DBG_DEBUG("ad_get [%s] failed [%s]\n",
5445                           fsp_str_dbg(fsp), strerror(errno));
5446                 return -1;
5447         }
5448
5449         ad_off = ad_getentryoff(ad, ADEID_RFORK);
5450
5451         rc = ftruncate(fsp->fh->fd, offset + ad_off);
5452         if (rc != 0) {
5453                 TALLOC_FREE(ad);
5454                 return -1;
5455         }
5456
5457         ad_setentrylen(ad, ADEID_RFORK, offset);
5458
5459         rc = ad_fset(ad, fsp);
5460         if (rc != 0) {
5461                 DBG_ERR("ad_fset [%s] failed [%s]\n",
5462                         fsp_str_dbg(fsp), strerror(errno));
5463                 TALLOC_FREE(ad);
5464                 return -1;
5465         }
5466
5467         TALLOC_FREE(ad);
5468         return 0;
5469 }
5470
5471 static int fruit_ftruncate_rsrc_stream(struct vfs_handle_struct *handle,
5472                                        struct files_struct *fsp,
5473                                        off_t offset)
5474 {
5475         if (offset == 0) {
5476                 return SMB_VFS_NEXT_UNLINK(handle, fsp->fsp_name);
5477         }
5478
5479         return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, offset);
5480 }
5481
5482 static int fruit_ftruncate_rsrc(struct vfs_handle_struct *handle,
5483                                 struct files_struct *fsp,
5484                                 off_t offset)
5485 {
5486         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
5487         int ret;
5488
5489         switch (fio->config->rsrc) {
5490         case FRUIT_RSRC_XATTR:
5491                 ret = fruit_ftruncate_rsrc_xattr(handle, fsp, offset);
5492                 break;
5493
5494         case FRUIT_RSRC_ADFILE:
5495                 ret = fruit_ftruncate_rsrc_adouble(handle, fsp, offset);
5496                 break;
5497
5498         case FRUIT_RSRC_STREAM:
5499                 ret = fruit_ftruncate_rsrc_stream(handle, fsp, offset);
5500                 break;
5501
5502         default:
5503                 DBG_ERR("Unexpected rsrc config [%d]\n", fio->config->rsrc);
5504                 return -1;
5505         }
5506
5507
5508         return ret;
5509 }
5510
5511 static int fruit_ftruncate_meta(struct vfs_handle_struct *handle,
5512                                 struct files_struct *fsp,
5513                                 off_t offset)
5514 {
5515         if (offset > 60) {
5516                 DBG_WARNING("ftruncate %s to %jd",
5517                             fsp_str_dbg(fsp), (intmax_t)offset);
5518                 /* OS X returns NT_STATUS_ALLOTTED_SPACE_EXCEEDED  */
5519                 errno = EOVERFLOW;
5520                 return -1;
5521         }
5522
5523         /* OS X returns success but does nothing  */
5524         DBG_INFO("ignoring ftruncate %s to %jd\n",
5525                  fsp_str_dbg(fsp), (intmax_t)offset);
5526         return 0;
5527 }
5528
5529 static int fruit_ftruncate(struct vfs_handle_struct *handle,
5530                            struct files_struct *fsp,
5531                            off_t offset)
5532 {
5533         struct fio *fio = (struct fio *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
5534         int ret;
5535
5536         DBG_DEBUG("Path [%s] offset [%"PRIdMAX"]\n", fsp_str_dbg(fsp),
5537                   (intmax_t)offset);
5538
5539         if (fio == NULL) {
5540                 return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, offset);
5541         }
5542
5543         if (fio->type == ADOUBLE_META) {
5544                 ret = fruit_ftruncate_meta(handle, fsp, offset);
5545         } else {
5546                 ret = fruit_ftruncate_rsrc(handle, fsp, offset);
5547         }
5548
5549         DBG_DEBUG("Path [%s] result [%d]\n", fsp_str_dbg(fsp), ret);
5550         return ret;
5551 }
5552
5553 static NTSTATUS fruit_create_file(vfs_handle_struct *handle,
5554                                   struct smb_request *req,
5555                                   uint16_t root_dir_fid,
5556                                   struct smb_filename *smb_fname,
5557                                   uint32_t access_mask,
5558                                   uint32_t share_access,
5559                                   uint32_t create_disposition,
5560                                   uint32_t create_options,
5561                                   uint32_t file_attributes,
5562                                   uint32_t oplock_request,
5563                                   struct smb2_lease *lease,
5564                                   uint64_t allocation_size,
5565                                   uint32_t private_flags,
5566                                   struct security_descriptor *sd,
5567                                   struct ea_list *ea_list,
5568                                   files_struct **result,
5569                                   int *pinfo,
5570                                   const struct smb2_create_blobs *in_context_blobs,
5571                                   struct smb2_create_blobs *out_context_blobs)
5572 {
5573         NTSTATUS status;
5574         struct fruit_config_data *config = NULL;
5575         files_struct *fsp = NULL;
5576
5577         status = check_aapl(handle, req, in_context_blobs, out_context_blobs);
5578         if (!NT_STATUS_IS_OK(status)) {
5579                 goto fail;
5580         }
5581
5582         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
5583                                 return NT_STATUS_UNSUCCESSFUL);
5584
5585         status = SMB_VFS_NEXT_CREATE_FILE(
5586                 handle, req, root_dir_fid, smb_fname,
5587                 access_mask, share_access,
5588                 create_disposition, create_options,
5589                 file_attributes, oplock_request,
5590                 lease,
5591                 allocation_size, private_flags,
5592                 sd, ea_list, result,
5593                 pinfo, in_context_blobs, out_context_blobs);
5594         if (!NT_STATUS_IS_OK(status)) {
5595                 return status;
5596         }
5597
5598         fsp = *result;
5599
5600         if (global_fruit_config.nego_aapl) {
5601                 if (config->posix_rename && fsp->is_directory) {
5602                         /*
5603                          * Enable POSIX directory rename behaviour
5604                          */
5605                         fsp->posix_flags |= FSP_POSIX_FLAGS_RENAME;
5606                 }
5607         }
5608
5609         /*
5610          * If this is a plain open for existing files, opening an 0
5611          * byte size resource fork MUST fail with
5612          * NT_STATUS_OBJECT_NAME_NOT_FOUND.
5613          *
5614          * Cf the vfs_fruit torture tests in test_rfork_create().
5615          */
5616         if (is_afpresource_stream(fsp->fsp_name) &&
5617             create_disposition == FILE_OPEN)
5618         {
5619                 if (fsp->fsp_name->st.st_ex_size == 0) {
5620                         status = NT_STATUS_OBJECT_NAME_NOT_FOUND;
5621                         goto fail;
5622                 }
5623         }
5624
5625         if (is_ntfs_stream_smb_fname(smb_fname)
5626             || fsp->is_directory) {
5627                 return status;
5628         }
5629
5630         if (config->locking == FRUIT_LOCKING_NETATALK) {
5631                 status = fruit_check_access(
5632                         handle, *result,
5633                         access_mask,
5634                         map_share_mode_to_deny_mode(share_access, 0));
5635                 if (!NT_STATUS_IS_OK(status)) {
5636                         goto fail;
5637                 }
5638         }
5639
5640         return status;
5641
5642 fail:
5643         DEBUG(10, ("fruit_create_file: %s\n", nt_errstr(status)));
5644
5645         if (fsp) {
5646                 close_file(req, fsp, ERROR_CLOSE);
5647                 *result = fsp = NULL;
5648         }
5649
5650         return status;
5651 }
5652
5653 static NTSTATUS fruit_readdir_attr(struct vfs_handle_struct *handle,
5654                                    const struct smb_filename *fname,
5655                                    TALLOC_CTX *mem_ctx,
5656                                    struct readdir_attr_data **pattr_data)
5657 {
5658         struct fruit_config_data *config = NULL;
5659         struct readdir_attr_data *attr_data;
5660         NTSTATUS status;
5661
5662         SMB_VFS_HANDLE_GET_DATA(handle, config,
5663                                 struct fruit_config_data,
5664                                 return NT_STATUS_UNSUCCESSFUL);
5665
5666         if (!global_fruit_config.nego_aapl) {
5667                 return SMB_VFS_NEXT_READDIR_ATTR(handle, fname, mem_ctx, pattr_data);
5668         }
5669
5670         DEBUG(10, ("fruit_readdir_attr %s\n", fname->base_name));
5671
5672         *pattr_data = talloc_zero(mem_ctx, struct readdir_attr_data);
5673         if (*pattr_data == NULL) {
5674                 return NT_STATUS_UNSUCCESSFUL;
5675         }
5676         attr_data = *pattr_data;
5677         attr_data->type = RDATTR_AAPL;
5678
5679         /*
5680          * Mac metadata: compressed FinderInfo, resource fork length
5681          * and creation date
5682          */
5683         status = readdir_attr_macmeta(handle, fname, attr_data);
5684         if (!NT_STATUS_IS_OK(status)) {
5685                 /*
5686                  * Error handling is tricky: if we return failure from
5687                  * this function, the corresponding directory entry
5688                  * will to be passed to the client, so we really just
5689                  * want to error out on fatal errors.
5690                  */
5691                 if  (!NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED)) {
5692                         goto fail;
5693                 }
5694         }
5695
5696         /*
5697          * UNIX mode
5698          */
5699         if (config->unix_info_enabled) {
5700                 attr_data->attr_data.aapl.unix_mode = fname->st.st_ex_mode;
5701         }
5702
5703         /*
5704          * max_access
5705          */
5706         if (!config->readdir_attr_max_access) {
5707                 attr_data->attr_data.aapl.max_access = FILE_GENERIC_ALL;
5708         } else {
5709                 status = smbd_calculate_access_mask(
5710                         handle->conn,
5711                         fname,
5712                         false,
5713                         SEC_FLAG_MAXIMUM_ALLOWED,
5714                         &attr_data->attr_data.aapl.max_access);
5715                 if (!NT_STATUS_IS_OK(status)) {
5716                         goto fail;
5717                 }
5718         }
5719
5720         return NT_STATUS_OK;
5721
5722 fail:
5723         DEBUG(1, ("fruit_readdir_attr %s, error: %s\n",
5724                   fname->base_name, nt_errstr(status)));
5725         TALLOC_FREE(*pattr_data);
5726         return status;
5727 }
5728
5729 static NTSTATUS fruit_fget_nt_acl(vfs_handle_struct *handle,
5730                                   files_struct *fsp,
5731                                   uint32_t security_info,
5732                                   TALLOC_CTX *mem_ctx,
5733                                   struct security_descriptor **ppdesc)
5734 {
5735         NTSTATUS status;
5736         struct security_ace ace;
5737         struct dom_sid sid;
5738         struct fruit_config_data *config;
5739
5740         SMB_VFS_HANDLE_GET_DATA(handle, config,
5741                                 struct fruit_config_data,
5742                                 return NT_STATUS_UNSUCCESSFUL);
5743
5744         status = SMB_VFS_NEXT_FGET_NT_ACL(handle, fsp, security_info,
5745                                           mem_ctx, ppdesc);
5746         if (!NT_STATUS_IS_OK(status)) {
5747                 return status;
5748         }
5749
5750         /*
5751          * Add MS NFS style ACEs with uid, gid and mode
5752          */
5753         if (!global_fruit_config.nego_aapl) {
5754                 return NT_STATUS_OK;
5755         }
5756         if (!config->unix_info_enabled) {
5757                 return NT_STATUS_OK;
5758         }
5759
5760         /* First remove any existing ACE's with NFS style mode/uid/gid SIDs. */
5761         status = remove_virtual_nfs_aces(*ppdesc);
5762         if (!NT_STATUS_IS_OK(status)) {
5763                 DBG_WARNING("failed to remove MS NFS style ACEs\n");
5764                 return status;
5765         }
5766
5767         /* MS NFS style mode */
5768         sid_compose(&sid, &global_sid_Unix_NFS_Mode, fsp->fsp_name->st.st_ex_mode);
5769         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
5770         status = security_descriptor_dacl_add(*ppdesc, &ace);
5771         if (!NT_STATUS_IS_OK(status)) {
5772                 DEBUG(1,("failed to add MS NFS style ACE\n"));
5773                 return status;
5774         }
5775
5776         /* MS NFS style uid */
5777         sid_compose(&sid, &global_sid_Unix_NFS_Users, fsp->fsp_name->st.st_ex_uid);
5778         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
5779         status = security_descriptor_dacl_add(*ppdesc, &ace);
5780         if (!NT_STATUS_IS_OK(status)) {
5781                 DEBUG(1,("failed to add MS NFS style ACE\n"));
5782                 return status;
5783         }
5784
5785         /* MS NFS style gid */
5786         sid_compose(&sid, &global_sid_Unix_NFS_Groups, fsp->fsp_name->st.st_ex_gid);
5787         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
5788         status = security_descriptor_dacl_add(*ppdesc, &ace);
5789         if (!NT_STATUS_IS_OK(status)) {
5790                 DEBUG(1,("failed to add MS NFS style ACE\n"));
5791                 return status;
5792         }
5793
5794         return NT_STATUS_OK;
5795 }
5796
5797 static NTSTATUS fruit_fset_nt_acl(vfs_handle_struct *handle,
5798                                   files_struct *fsp,
5799                                   uint32_t security_info_sent,
5800                                   const struct security_descriptor *orig_psd)
5801 {
5802         NTSTATUS status;
5803         bool do_chmod;
5804         mode_t ms_nfs_mode = 0;
5805         int result;
5806         struct security_descriptor *psd = NULL;
5807         uint32_t orig_num_aces = 0;
5808
5809         if (orig_psd->dacl != NULL) {
5810                 orig_num_aces = orig_psd->dacl->num_aces;
5811         }
5812
5813         psd = security_descriptor_copy(talloc_tos(), orig_psd);
5814         if (psd == NULL) {
5815                 return NT_STATUS_NO_MEMORY;
5816         }
5817
5818         DBG_DEBUG("fruit_fset_nt_acl: %s\n", fsp_str_dbg(fsp));
5819
5820         status = check_ms_nfs(handle, fsp, psd, &ms_nfs_mode, &do_chmod);
5821         if (!NT_STATUS_IS_OK(status)) {
5822                 DEBUG(1, ("fruit_fset_nt_acl: check_ms_nfs failed%s\n", fsp_str_dbg(fsp)));
5823                 TALLOC_FREE(psd);
5824                 return status;
5825         }
5826
5827         /*
5828          * If only ms_nfs ACE entries were sent, ensure we set the DACL
5829          * sent/present flags correctly now we've removed them.
5830          */
5831
5832         if (orig_num_aces != 0) {
5833                 /*
5834                  * Are there any ACE's left ?
5835                  */
5836                 if (psd->dacl->num_aces == 0) {
5837                         /* No - clear the DACL sent/present flags. */
5838                         security_info_sent &= ~SECINFO_DACL;
5839                         psd->type &= ~SEC_DESC_DACL_PRESENT;
5840                 }
5841         }
5842
5843         status = SMB_VFS_NEXT_FSET_NT_ACL(handle, fsp, security_info_sent, psd);
5844         if (!NT_STATUS_IS_OK(status)) {
5845                 DEBUG(1, ("fruit_fset_nt_acl: SMB_VFS_NEXT_FSET_NT_ACL failed%s\n", fsp_str_dbg(fsp)));
5846                 TALLOC_FREE(psd);
5847                 return status;
5848         }
5849
5850         if (do_chmod) {
5851                 if (fsp->fh->fd != -1) {
5852                         result = SMB_VFS_FCHMOD(fsp, ms_nfs_mode);
5853                 } else {
5854                         result = SMB_VFS_CHMOD(fsp->conn,
5855                                                fsp->fsp_name,
5856                                                ms_nfs_mode);
5857                 }
5858
5859                 if (result != 0) {
5860                         DEBUG(1, ("chmod: %s, result: %d, %04o error %s\n", fsp_str_dbg(fsp),
5861                                   result, (unsigned)ms_nfs_mode,
5862                                   strerror(errno)));
5863                         status = map_nt_error_from_unix(errno);
5864                         TALLOC_FREE(psd);
5865                         return status;
5866                 }
5867         }
5868
5869         TALLOC_FREE(psd);
5870         return NT_STATUS_OK;
5871 }
5872
5873 static struct vfs_offload_ctx *fruit_offload_ctx;
5874
5875 struct fruit_offload_read_state {
5876         struct vfs_handle_struct *handle;
5877         struct tevent_context *ev;
5878         files_struct *fsp;
5879         uint32_t fsctl;
5880         DATA_BLOB token;
5881 };
5882
5883 static void fruit_offload_read_done(struct tevent_req *subreq);
5884
5885 static struct tevent_req *fruit_offload_read_send(
5886         TALLOC_CTX *mem_ctx,
5887         struct tevent_context *ev,
5888         struct vfs_handle_struct *handle,
5889         files_struct *fsp,
5890         uint32_t fsctl,
5891         uint32_t ttl,
5892         off_t offset,
5893         size_t to_copy)
5894 {
5895         struct tevent_req *req = NULL;
5896         struct tevent_req *subreq = NULL;
5897         struct fruit_offload_read_state *state = NULL;
5898
5899         req = tevent_req_create(mem_ctx, &state,
5900                                 struct fruit_offload_read_state);
5901         if (req == NULL) {
5902                 return NULL;
5903         }
5904         *state = (struct fruit_offload_read_state) {
5905                 .handle = handle,
5906                 .ev = ev,
5907                 .fsp = fsp,
5908                 .fsctl = fsctl,
5909         };
5910
5911         subreq = SMB_VFS_NEXT_OFFLOAD_READ_SEND(mem_ctx, ev, handle, fsp,
5912                                                 fsctl, ttl, offset, to_copy);
5913         if (tevent_req_nomem(subreq, req)) {
5914                 return tevent_req_post(req, ev);
5915         }
5916         tevent_req_set_callback(subreq, fruit_offload_read_done, req);
5917         return req;
5918 }
5919
5920 static void fruit_offload_read_done(struct tevent_req *subreq)
5921 {
5922         struct tevent_req *req = tevent_req_callback_data(
5923                 subreq, struct tevent_req);
5924         struct fruit_offload_read_state *state = tevent_req_data(
5925                 req, struct fruit_offload_read_state);
5926         NTSTATUS status;
5927
5928         status = SMB_VFS_NEXT_OFFLOAD_READ_RECV(subreq,
5929                                                 state->handle,
5930                                                 state,
5931                                                 &state->token);
5932         TALLOC_FREE(subreq);
5933         if (tevent_req_nterror(req, status)) {
5934                 return;
5935         }
5936
5937         if (state->fsctl != FSCTL_SRV_REQUEST_RESUME_KEY) {
5938                 tevent_req_done(req);
5939                 return;
5940         }
5941
5942         status = vfs_offload_token_ctx_init(state->fsp->conn->sconn->client,
5943                                             &fruit_offload_ctx);
5944         if (tevent_req_nterror(req, status)) {
5945                 return;
5946         }
5947
5948         status = vfs_offload_token_db_store_fsp(fruit_offload_ctx,
5949                                                 state->fsp,
5950                                                 &state->token);
5951         if (tevent_req_nterror(req, status)) {
5952                 return;
5953         }
5954
5955         tevent_req_done(req);
5956         return;
5957 }
5958
5959 static NTSTATUS fruit_offload_read_recv(struct tevent_req *req,
5960                                         struct vfs_handle_struct *handle,
5961                                         TALLOC_CTX *mem_ctx,
5962                                         DATA_BLOB *token)
5963 {
5964         struct fruit_offload_read_state *state = tevent_req_data(
5965                 req, struct fruit_offload_read_state);
5966         NTSTATUS status;
5967
5968         if (tevent_req_is_nterror(req, &status)) {
5969                 tevent_req_received(req);
5970                 return status;
5971         }
5972
5973         token->length = state->token.length;
5974         token->data = talloc_move(mem_ctx, &state->token.data);
5975
5976         tevent_req_received(req);
5977         return NT_STATUS_OK;
5978 }
5979
5980 struct fruit_offload_write_state {
5981         struct vfs_handle_struct *handle;
5982         off_t copied;
5983         struct files_struct *src_fsp;
5984         struct files_struct *dst_fsp;
5985         bool is_copyfile;
5986 };
5987
5988 static void fruit_offload_write_done(struct tevent_req *subreq);
5989 static struct tevent_req *fruit_offload_write_send(struct vfs_handle_struct *handle,
5990                                                 TALLOC_CTX *mem_ctx,
5991                                                 struct tevent_context *ev,
5992                                                 uint32_t fsctl,
5993                                                 DATA_BLOB *token,
5994                                                 off_t transfer_offset,
5995                                                 struct files_struct *dest_fsp,
5996                                                 off_t dest_off,
5997                                                 off_t num)
5998 {
5999         struct tevent_req *req, *subreq;
6000         struct fruit_offload_write_state *state;
6001         NTSTATUS status;
6002         struct fruit_config_data *config;
6003         off_t src_off = transfer_offset;
6004         files_struct *src_fsp = NULL;
6005         off_t to_copy = num;
6006         bool copyfile_enabled = false;
6007
6008         DEBUG(10,("soff: %ju, doff: %ju, len: %ju\n",
6009                   (uintmax_t)src_off, (uintmax_t)dest_off, (uintmax_t)num));
6010
6011         SMB_VFS_HANDLE_GET_DATA(handle, config,
6012                                 struct fruit_config_data,
6013                                 return NULL);
6014
6015         req = tevent_req_create(mem_ctx, &state,
6016                                 struct fruit_offload_write_state);
6017         if (req == NULL) {
6018                 return NULL;
6019         }
6020         state->handle = handle;
6021         state->dst_fsp = dest_fsp;
6022
6023         switch (fsctl) {
6024         case FSCTL_SRV_COPYCHUNK:
6025         case FSCTL_SRV_COPYCHUNK_WRITE:
6026                 copyfile_enabled = config->copyfile_enabled;
6027                 break;
6028         default:
6029                 break;
6030         }
6031
6032         /*
6033          * Check if this a OS X copyfile style copychunk request with
6034          * a requested chunk count of 0 that was translated to a
6035          * offload_write_send VFS call overloading the parameters src_off
6036          * = dest_off = num = 0.
6037          */
6038         if (copyfile_enabled && num == 0 && src_off == 0 && dest_off == 0) {
6039                 status = vfs_offload_token_db_fetch_fsp(
6040                         fruit_offload_ctx, token, &src_fsp);
6041                 if (tevent_req_nterror(req, status)) {
6042                         return tevent_req_post(req, ev);
6043                 }
6044                 state->src_fsp = src_fsp;
6045
6046                 status = vfs_stat_fsp(src_fsp);
6047                 if (tevent_req_nterror(req, status)) {
6048                         return tevent_req_post(req, ev);
6049                 }
6050
6051                 to_copy = src_fsp->fsp_name->st.st_ex_size;
6052                 state->is_copyfile = true;
6053         }
6054
6055         subreq = SMB_VFS_NEXT_OFFLOAD_WRITE_SEND(handle,
6056                                               mem_ctx,
6057                                               ev,
6058                                               fsctl,
6059                                               token,
6060                                               transfer_offset,
6061                                               dest_fsp,
6062                                               dest_off,
6063                                               to_copy);
6064         if (tevent_req_nomem(subreq, req)) {
6065                 return tevent_req_post(req, ev);
6066         }
6067
6068         tevent_req_set_callback(subreq, fruit_offload_write_done, req);
6069         return req;
6070 }
6071
6072 static void fruit_offload_write_done(struct tevent_req *subreq)
6073 {
6074         struct tevent_req *req = tevent_req_callback_data(
6075                 subreq, struct tevent_req);
6076         struct fruit_offload_write_state *state = tevent_req_data(
6077                 req, struct fruit_offload_write_state);
6078         NTSTATUS status;
6079         unsigned int num_streams = 0;
6080         struct stream_struct *streams = NULL;
6081         unsigned int i;
6082         struct smb_filename *src_fname_tmp = NULL;
6083         struct smb_filename *dst_fname_tmp = NULL;
6084
6085         status = SMB_VFS_NEXT_OFFLOAD_WRITE_RECV(state->handle,
6086                                               subreq,
6087                                               &state->copied);
6088         TALLOC_FREE(subreq);
6089         if (tevent_req_nterror(req, status)) {
6090                 return;
6091         }
6092
6093         if (!state->is_copyfile) {
6094                 tevent_req_done(req);
6095                 return;
6096         }
6097
6098         /*
6099          * Now copy all remaining streams. We know the share supports
6100          * streams, because we're in vfs_fruit. We don't do this async
6101          * because streams are few and small.
6102          */
6103         status = vfs_streaminfo(state->handle->conn, state->src_fsp,
6104                                 state->src_fsp->fsp_name,
6105                                 req, &num_streams, &streams);
6106         if (tevent_req_nterror(req, status)) {
6107                 return;
6108         }
6109
6110         if (num_streams == 1) {
6111                 /* There is always one stream, ::$DATA. */
6112                 tevent_req_done(req);
6113                 return;
6114         }
6115
6116         for (i = 0; i < num_streams; i++) {
6117                 DEBUG(10, ("%s: stream: '%s'/%zu\n",
6118                           __func__, streams[i].name, (size_t)streams[i].size));
6119
6120                 src_fname_tmp = synthetic_smb_fname(
6121                         req,
6122                         state->src_fsp->fsp_name->base_name,
6123                         streams[i].name,
6124                         NULL,
6125                         state->src_fsp->fsp_name->flags);
6126                 if (tevent_req_nomem(src_fname_tmp, req)) {
6127                         return;
6128                 }
6129
6130                 if (is_ntfs_default_stream_smb_fname(src_fname_tmp)) {
6131                         TALLOC_FREE(src_fname_tmp);
6132                         continue;
6133                 }
6134
6135                 dst_fname_tmp = synthetic_smb_fname(
6136                         req,
6137                         state->dst_fsp->fsp_name->base_name,
6138                         streams[i].name,
6139                         NULL,
6140                         state->dst_fsp->fsp_name->flags);
6141                 if (tevent_req_nomem(dst_fname_tmp, req)) {
6142                         TALLOC_FREE(src_fname_tmp);
6143                         return;
6144                 }
6145
6146                 status = copy_file(req,
6147                                    state->handle->conn,
6148                                    src_fname_tmp,
6149                                    dst_fname_tmp,
6150                                    OPENX_FILE_CREATE_IF_NOT_EXIST,
6151                                    0, false);
6152                 if (!NT_STATUS_IS_OK(status)) {
6153                         DEBUG(1, ("%s: copy %s to %s failed: %s\n", __func__,
6154                                   smb_fname_str_dbg(src_fname_tmp),
6155                                   smb_fname_str_dbg(dst_fname_tmp),
6156                                   nt_errstr(status)));
6157                         TALLOC_FREE(src_fname_tmp);
6158                         TALLOC_FREE(dst_fname_tmp);
6159                         tevent_req_nterror(req, status);
6160                         return;
6161                 }
6162
6163                 TALLOC_FREE(src_fname_tmp);
6164                 TALLOC_FREE(dst_fname_tmp);
6165         }
6166
6167         TALLOC_FREE(streams);
6168         TALLOC_FREE(src_fname_tmp);
6169         TALLOC_FREE(dst_fname_tmp);
6170         tevent_req_done(req);
6171 }
6172
6173 static NTSTATUS fruit_offload_write_recv(struct vfs_handle_struct *handle,
6174                                       struct tevent_req *req,
6175                                       off_t *copied)
6176 {
6177         struct fruit_offload_write_state *state = tevent_req_data(
6178                 req, struct fruit_offload_write_state);
6179         NTSTATUS status;
6180
6181         if (tevent_req_is_nterror(req, &status)) {
6182                 DEBUG(1, ("server side copy chunk failed: %s\n",
6183                           nt_errstr(status)));
6184                 *copied = 0;
6185                 tevent_req_received(req);
6186                 return status;
6187         }
6188
6189         *copied = state->copied;
6190         tevent_req_received(req);
6191
6192         return NT_STATUS_OK;
6193 }
6194
6195 static char *fruit_get_bandsize_line(char **lines, int numlines)
6196 {
6197         static regex_t re;
6198         static bool re_initialized = false;
6199         int i;
6200         int ret;
6201
6202         if (!re_initialized) {
6203                 ret = regcomp(&re, "^[[:blank:]]*<key>band-size</key>$", 0);
6204                 if (ret != 0) {
6205                         return NULL;
6206                 }
6207                 re_initialized = true;
6208         }
6209
6210         for (i = 0; i < numlines; i++) {
6211                 regmatch_t matches[1];
6212
6213                 ret = regexec(&re, lines[i], 1, matches, 0);
6214                 if (ret == 0) {
6215                         /*
6216                          * Check if the match was on the last line, sa we want
6217                          * the subsequent line.
6218                          */
6219                         if (i + 1 == numlines) {
6220                                 return NULL;
6221                         }
6222                         return lines[i + 1];
6223                 }
6224                 if (ret != REG_NOMATCH) {
6225                         return NULL;
6226                 }
6227         }
6228
6229         return NULL;
6230 }
6231
6232 static bool fruit_get_bandsize_from_line(char *line, size_t *_band_size)
6233 {
6234         static regex_t re;
6235         static bool re_initialized = false;
6236         regmatch_t matches[2];
6237         uint64_t band_size;
6238         int ret;
6239         bool ok;
6240
6241         if (!re_initialized) {
6242                 ret = regcomp(&re,
6243                               "^[[:blank:]]*"
6244                               "<integer>\\([[:digit:]]*\\)</integer>$",
6245                               0);
6246                 if (ret != 0) {
6247                         return false;
6248                 }
6249                 re_initialized = true;
6250         }
6251
6252         ret = regexec(&re, line, 2, matches, 0);
6253         if (ret != 0) {
6254                 DBG_ERR("regex failed [%s]\n", line);
6255                 return false;
6256         }
6257
6258         line[matches[1].rm_eo] = '\0';
6259
6260         ok = conv_str_u64(&line[matches[1].rm_so], &band_size);
6261         if (!ok) {
6262                 return false;
6263         }
6264         *_band_size = (size_t)band_size;
6265         return true;
6266 }
6267
6268 /*
6269  * This reads and parses an Info.plist from a TM sparsebundle looking for the
6270  * "band-size" key and value.
6271  */
6272 static bool fruit_get_bandsize(vfs_handle_struct *handle,
6273                                const char *dir,
6274                                size_t *band_size)
6275 {
6276 #define INFO_PLIST_MAX_SIZE 64*1024
6277         char *plist = NULL;
6278         struct smb_filename *smb_fname = NULL;
6279         files_struct *fsp = NULL;
6280         uint8_t *file_data = NULL;
6281         char **lines = NULL;
6282         char *band_size_line = NULL;
6283         size_t plist_file_size;
6284         ssize_t nread;
6285         int numlines;
6286         int ret;
6287         bool ok = false;
6288         NTSTATUS status;
6289
6290         plist = talloc_asprintf(talloc_tos(),
6291                                 "%s/%s/Info.plist",
6292                                 handle->conn->connectpath,
6293                                 dir);
6294         if (plist == NULL) {
6295                 ok = false;
6296                 goto out;
6297         }
6298
6299         smb_fname = synthetic_smb_fname(talloc_tos(), plist, NULL, NULL, 0);
6300         if (smb_fname == NULL) {
6301                 ok = false;
6302                 goto out;
6303         }
6304
6305         ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
6306         if (ret != 0) {
6307                 DBG_INFO("Ignoring Sparsebundle without Info.plist [%s]\n", dir);
6308                 ok = true;
6309                 goto out;
6310         }
6311
6312         plist_file_size = smb_fname->st.st_ex_size;
6313
6314         if (plist_file_size > INFO_PLIST_MAX_SIZE) {
6315                 DBG_INFO("%s is too large, ignoring\n", plist);
6316                 ok = true;
6317                 goto out;
6318         }
6319
6320         status = SMB_VFS_NEXT_CREATE_FILE(
6321                 handle,                         /* conn */
6322                 NULL,                           /* req */
6323                 0,                              /* root_dir_fid */
6324                 smb_fname,                      /* fname */
6325                 FILE_GENERIC_READ,              /* access_mask */
6326                 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
6327                 FILE_OPEN,                      /* create_disposition */
6328                 0,                              /* create_options */
6329                 0,                              /* file_attributes */
6330                 INTERNAL_OPEN_ONLY,             /* oplock_request */
6331                 NULL,                           /* lease */
6332                 0,                              /* allocation_size */
6333                 0,                              /* private_flags */
6334                 NULL,                           /* sd */
6335                 NULL,                           /* ea_list */
6336                 &fsp,                           /* result */
6337                 NULL,                           /* psbuf */
6338                 NULL, NULL);                    /* create context */
6339         if (!NT_STATUS_IS_OK(status)) {
6340                 DBG_INFO("Opening [%s] failed [%s]\n",
6341                          smb_fname_str_dbg(smb_fname), nt_errstr(status));
6342                 ok = false;
6343                 goto out;
6344         }
6345
6346         file_data = talloc_array(talloc_tos(), uint8_t, plist_file_size);
6347         if (file_data == NULL) {
6348                 ok = false;
6349                 goto out;
6350         }
6351
6352         nread = SMB_VFS_NEXT_PREAD(handle, fsp, file_data, plist_file_size, 0);
6353         if (nread != plist_file_size) {
6354                 DBG_ERR("Short read on [%s]: %zu/%zd\n",
6355                         fsp_str_dbg(fsp), nread, plist_file_size);
6356                 ok = false;
6357                 goto out;
6358
6359         }
6360
6361         status = close_file(NULL, fsp, NORMAL_CLOSE);
6362         fsp = NULL;
6363         if (!NT_STATUS_IS_OK(status)) {
6364                 DBG_ERR("close_file failed: %s\n", nt_errstr(status));
6365                 ok = false;
6366                 goto out;
6367         }
6368
6369         lines = file_lines_parse((char *)file_data,
6370                                  plist_file_size,
6371                                  &numlines,
6372                                  talloc_tos());
6373         if (lines == NULL) {
6374                 ok = false;
6375                 goto out;
6376         }
6377
6378         band_size_line = fruit_get_bandsize_line(lines, numlines);
6379         if (band_size_line == NULL) {
6380                 DBG_ERR("Didn't find band-size key in [%s]\n",
6381                         smb_fname_str_dbg(smb_fname));
6382                 ok = false;
6383                 goto out;
6384         }
6385
6386         ok = fruit_get_bandsize_from_line(band_size_line, band_size);
6387         if (!ok) {
6388                 DBG_ERR("fruit_get_bandsize_from_line failed\n");
6389                 goto out;
6390         }
6391
6392         DBG_DEBUG("Parsed band-size [%zu] for [%s]\n", *band_size, plist);
6393
6394 out:
6395         if (fsp != NULL) {
6396                 status = close_file(NULL, fsp, NORMAL_CLOSE);
6397                 if (!NT_STATUS_IS_OK(status)) {
6398                         DBG_ERR("close_file failed: %s\n", nt_errstr(status));
6399                 }
6400                 fsp = NULL;
6401         }
6402         TALLOC_FREE(plist);
6403         TALLOC_FREE(smb_fname);
6404         TALLOC_FREE(file_data);
6405         TALLOC_FREE(lines);
6406         return ok;
6407 }
6408
6409 struct fruit_disk_free_state {
6410         off_t total_size;
6411 };
6412
6413 static bool fruit_get_num_bands(vfs_handle_struct *handle,
6414                                 char *bundle,
6415                                 size_t *_nbands)
6416 {
6417         char *path = NULL;
6418         struct smb_filename *bands_dir = NULL;
6419         DIR *d = NULL;
6420         struct dirent *e = NULL;
6421         size_t nbands;
6422         int ret;
6423
6424         path = talloc_asprintf(talloc_tos(),
6425                                "%s/%s/bands",
6426                                handle->conn->connectpath,
6427                                bundle);
6428         if (path == NULL) {
6429                 return false;
6430         }
6431
6432         bands_dir = synthetic_smb_fname(talloc_tos(),
6433                                         path,
6434                                         NULL,
6435                                         NULL,
6436                                         0);
6437         TALLOC_FREE(path);
6438         if (bands_dir == NULL) {
6439                 return false;
6440         }
6441
6442         d = SMB_VFS_NEXT_OPENDIR(handle, bands_dir, NULL, 0);
6443         if (d == NULL) {
6444                 TALLOC_FREE(bands_dir);
6445                 return false;
6446         }
6447
6448         nbands = 0;
6449
6450         for (e = SMB_VFS_NEXT_READDIR(handle, d, NULL);
6451              e != NULL;
6452              e = SMB_VFS_NEXT_READDIR(handle, d, NULL))
6453         {
6454                 if (ISDOT(e->d_name) || ISDOTDOT(e->d_name)) {
6455                         continue;
6456                 }
6457                 nbands++;
6458         }
6459
6460         ret = SMB_VFS_NEXT_CLOSEDIR(handle, d);
6461         if (ret != 0) {
6462                 TALLOC_FREE(bands_dir);
6463                 return false;
6464         }
6465
6466         DBG_DEBUG("%zu bands in [%s]\n", nbands, smb_fname_str_dbg(bands_dir));
6467
6468         TALLOC_FREE(bands_dir);
6469
6470         *_nbands = nbands;
6471         return true;
6472 }
6473
6474 static bool fruit_tmsize_do_dirent(vfs_handle_struct *handle,
6475                                    struct fruit_disk_free_state *state,
6476                                    struct dirent *e)
6477 {
6478         bool ok;
6479         char *p = NULL;
6480         size_t sparsebundle_strlen = strlen("sparsebundle");
6481         size_t bandsize = 0;
6482         size_t nbands;
6483         off_t tm_size;
6484
6485         p = strstr(e->d_name, "sparsebundle");
6486         if (p == NULL) {
6487                 return true;
6488         }
6489
6490         if (p[sparsebundle_strlen] != '\0') {
6491                 return true;
6492         }
6493
6494         DBG_DEBUG("Processing sparsebundle [%s]\n", e->d_name);
6495
6496         ok = fruit_get_bandsize(handle, e->d_name, &bandsize);
6497         if (!ok) {
6498                 /*
6499                  * Beware of race conditions: this may be an uninitialized
6500                  * Info.plist that a client is just creating. We don't want let
6501                  * this to trigger complete failure.
6502                  */
6503                 DBG_ERR("Processing sparsebundle [%s] failed\n", e->d_name);
6504                 return true;
6505         }
6506
6507         ok = fruit_get_num_bands(handle, e->d_name, &nbands);
6508         if (!ok) {
6509                 /*
6510                  * Beware of race conditions: this may be a backup sparsebundle
6511                  * in an early stage lacking a bands subdirectory. We don't want
6512                  * let this to trigger complete failure.
6513                  */
6514                 DBG_ERR("Processing sparsebundle [%s] failed\n", e->d_name);
6515                 return true;
6516         }
6517
6518         tm_size = bandsize * nbands;
6519         if (tm_size > UINT64_MAX) {
6520                 DBG_ERR("tmsize overflow: bandsize [%zu] nbands [%zu]\n",
6521                         bandsize, nbands);
6522                 return false;
6523         }
6524
6525         if (state->total_size + tm_size < state->total_size) {
6526                 DBG_ERR("tmsize overflow: bandsize [%zu] nbands [%zu]\n",
6527                         bandsize, nbands);
6528                 return false;
6529         }
6530
6531         state->total_size += tm_size;
6532
6533         DBG_DEBUG("[%s] tm_size [%jd] total_size [%jd]\n",
6534                   e->d_name, (intmax_t)tm_size, (intmax_t)state->total_size);
6535
6536         return true;
6537 }
6538
6539 /**
6540  * Calculate used size of a TimeMachine volume
6541  *
6542  * This assumes that the volume is used only for TimeMachine.
6543  *
6544  * - readdir(basedir of share), then
6545  * - for every element that matches regex "^\(.*\)\.sparsebundle$" :
6546  * - parse "\1.sparsebundle/Info.plist" and read the band-size XML key
6547  * - count band files in "\1.sparsebundle/bands/"
6548  * - calculate used size of all bands: band_count * band_size
6549  **/
6550 static uint64_t fruit_disk_free(vfs_handle_struct *handle,
6551                                 const struct smb_filename *smb_fname,
6552                                 uint64_t *_bsize,
6553                                 uint64_t *_dfree,
6554                                 uint64_t *_dsize)
6555 {
6556         struct fruit_config_data *config = NULL;
6557         struct fruit_disk_free_state state = {0};
6558         DIR *d = NULL;
6559         struct dirent *e = NULL;
6560         uint64_t dfree;
6561         uint64_t dsize;
6562         int ret;
6563         bool ok;
6564
6565         SMB_VFS_HANDLE_GET_DATA(handle, config,
6566                                 struct fruit_config_data,
6567                                 return UINT64_MAX);
6568
6569         if (!config->time_machine ||
6570             config->time_machine_max_size == 0)
6571         {
6572                 return SMB_VFS_NEXT_DISK_FREE(handle,
6573                                               smb_fname,
6574                                               _bsize,
6575                                               _dfree,
6576                                               _dsize);
6577         }
6578
6579         d = SMB_VFS_NEXT_OPENDIR(handle, smb_fname, NULL, 0);
6580         if (d == NULL) {
6581                 return UINT64_MAX;
6582         }
6583
6584         for (e = SMB_VFS_NEXT_READDIR(handle, d, NULL);
6585              e != NULL;
6586              e = SMB_VFS_NEXT_READDIR(handle, d, NULL))
6587         {
6588                 ok = fruit_tmsize_do_dirent(handle, &state, e);
6589                 if (!ok) {
6590                         SMB_VFS_NEXT_CLOSEDIR(handle, d);
6591                         return UINT64_MAX;
6592                 }
6593         }
6594
6595         ret = SMB_VFS_NEXT_CLOSEDIR(handle, d);
6596         if (ret != 0) {
6597                 return UINT64_MAX;
6598         }
6599
6600         dsize = config->time_machine_max_size / 512;
6601         dfree = dsize - (state.total_size / 512);
6602         if (dfree > dsize) {
6603                 dfree = 0;
6604         }
6605
6606         *_bsize = 512;
6607         *_dsize = dsize;
6608         *_dfree = dfree;
6609         return dfree / 2;
6610 }
6611
6612 static struct vfs_fn_pointers vfs_fruit_fns = {
6613         .connect_fn = fruit_connect,
6614         .disk_free_fn = fruit_disk_free,
6615
6616         /* File operations */
6617         .chmod_fn = fruit_chmod,
6618         .chown_fn = fruit_chown,
6619         .unlink_fn = fruit_unlink,
6620         .rename_fn = fruit_rename,
6621         .rmdir_fn = fruit_rmdir,
6622         .open_fn = fruit_open,
6623         .pread_fn = fruit_pread,
6624         .pwrite_fn = fruit_pwrite,
6625         .pread_send_fn = fruit_pread_send,
6626         .pread_recv_fn = fruit_pread_recv,
6627         .pwrite_send_fn = fruit_pwrite_send,
6628         .pwrite_recv_fn = fruit_pwrite_recv,
6629         .stat_fn = fruit_stat,
6630         .lstat_fn = fruit_lstat,
6631         .fstat_fn = fruit_fstat,
6632         .streaminfo_fn = fruit_streaminfo,
6633         .ntimes_fn = fruit_ntimes,
6634         .ftruncate_fn = fruit_ftruncate,
6635         .fallocate_fn = fruit_fallocate,
6636         .create_file_fn = fruit_create_file,
6637         .readdir_attr_fn = fruit_readdir_attr,
6638         .offload_read_send_fn = fruit_offload_read_send,
6639         .offload_read_recv_fn = fruit_offload_read_recv,
6640         .offload_write_send_fn = fruit_offload_write_send,
6641         .offload_write_recv_fn = fruit_offload_write_recv,
6642
6643         /* NT ACL operations */
6644         .fget_nt_acl_fn = fruit_fget_nt_acl,
6645         .fset_nt_acl_fn = fruit_fset_nt_acl,
6646 };
6647
6648 static_decl_vfs;
6649 NTSTATUS vfs_fruit_init(TALLOC_CTX *ctx)
6650 {
6651         NTSTATUS ret = smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "fruit",
6652                                         &vfs_fruit_fns);
6653         if (!NT_STATUS_IS_OK(ret)) {
6654                 return ret;
6655         }
6656
6657         vfs_fruit_debug_level = debug_add_class("fruit");
6658         if (vfs_fruit_debug_level == -1) {
6659                 vfs_fruit_debug_level = DBGC_VFS;
6660                 DEBUG(0, ("%s: Couldn't register custom debugging class!\n",
6661                           "vfs_fruit_init"));
6662         } else {
6663                 DEBUG(10, ("%s: Debug class number of '%s': %d\n",
6664                            "vfs_fruit_init","fruit",vfs_fruit_debug_level));
6665         }
6666
6667         return ret;
6668 }