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/sys_rw.h"
  33
  34 /*
  35  * Enhanced OS X and Netatalk compatibility
  36  * ========================================
  37  *
  38  * This modules takes advantage of vfs_streams_xattr and
  39  * vfs_catia. VFS modules vfs_fruit and vfs_streams_xattr must be
  40  * loaded in the correct order:
  41  *
  42  *   vfs modules = catia fruit streams_xattr
  43  *
  44  * The module intercepts the OS X special streams "AFP_AfpInfo" and
  45  * "AFP_Resource" and handles them in a special way. All other named
  46  * streams are deferred to vfs_streams_xattr.
  47  *
  48  * The OS X client maps all NTFS illegal characters to the Unicode
  49  * private range. This module optionally stores the charcters using
  50  * their native ASCII encoding using vfs_catia. If you're not enabling
  51  * this feature, you can skip catia from vfs modules.
  52  *
  53  * Finally, open modes are optionally checked against Netatalk AFP
  54  * share modes.
  55  *
  56  * The "AFP_AfpInfo" named stream is a binary blob containing OS X
  57  * extended metadata for files and directories. This module optionally
  58  * reads and stores this metadata in a way compatible with Netatalk 3
  59  * which stores the metadata in an EA "org.netatalk.metadata". Cf
  60  * source3/include/MacExtensions.h for a description of the binary
  61  * blobs content.
  62  *
  63  * The "AFP_Resource" named stream may be arbitrarily large, thus it
  64  * can't be stored in an xattr on most filesystem. ZFS on Solaris is
  65  * the only available filesystem where xattrs can be of any size and
  66  * the OS supports using the file APIs for xattrs.
  67  *
  68  * The AFP_Resource stream is stored in an AppleDouble file prepending
  69  * "._" to the filename. On Solaris with ZFS the stream is optionally
  70  * stored in an EA "org.netatalk.ressource".
  71  *
  72  *
  73  * Extended Attributes
  74  * ===================
  75  *
  76  * The OS X SMB client sends xattrs as ADS too. For xattr interop with
  77  * other protocols you may want to adjust the xattr names the VFS
  78  * module vfs_streams_xattr uses for storing ADS's. This defaults to
  79  * user.DosStream.ADS_NAME:$DATA and can be changed by specifying
  80  * these module parameters:
  81  *
  82  *   streams_xattr:prefix = user.
  83  *   streams_xattr:store_stream_type = false
  84  *
  85  *
  86  * TODO
  87  * ====
  88  *
  89  * - log diagnostic if any needed VFS module is not loaded
  90  *   (eg with lp_vfs_objects())
  91  * - add tests
  92  */
  93
  94 static int vfs_fruit_debug_level = DBGC_VFS;
  95
  96 #undef DBGC_CLASS
  97 #define DBGC_CLASS vfs_fruit_debug_level
  98
  99 #define FRUIT_PARAM_TYPE_NAME "fruit"
 100 #define ADOUBLE_NAME_PREFIX "._"
 101
 102 /*
 103  * REVIEW:
 104  * This is hokey, but what else can we do?
 105  */
 106 #if defined(HAVE_ATTROPEN) || defined(FREEBSD)
 107 #define AFPINFO_EA_NETATALK "org.netatalk.Metadata"
 108 #define AFPRESOURCE_EA_NETATALK "org.netatalk.ResourceFork"
 109 #else
 110 #define AFPINFO_EA_NETATALK "user.org.netatalk.Metadata"
 111 #define AFPRESOURCE_EA_NETATALK "user.org.netatalk.ResourceFork"
 112 #endif
 113
 114 enum apple_fork {APPLE_FORK_DATA, APPLE_FORK_RSRC};
 115
 116 enum fruit_rsrc {FRUIT_RSRC_STREAM, FRUIT_RSRC_ADFILE, FRUIT_RSRC_XATTR};
 117 enum fruit_meta {FRUIT_META_STREAM, FRUIT_META_NETATALK};
 118 enum fruit_locking {FRUIT_LOCKING_NETATALK, FRUIT_LOCKING_NONE};
 119 enum fruit_encoding {FRUIT_ENC_NATIVE, FRUIT_ENC_PRIVATE};
 120
 121 struct fruit_config_data {
 122         enum fruit_rsrc rsrc;
 123         enum fruit_meta meta;
 124         enum fruit_locking locking;
 125         enum fruit_encoding encoding;
 126         bool use_aapl;
 127         bool readdir_attr_enabled;
 128         bool unix_info_enabled;
 129
 130         /*
 131          * Additional undocumented options, all enabled by default,
 132          * possibly useful for analyzing performance. The associated
 133          * operations with each of them may be expensive, so having
 134          * the chance to disable them individually gives a chance
 135          * tweaking the setup for the particular usecase.
 136          */
 137         bool readdir_attr_rsize;
 138         bool readdir_attr_finder_info;
 139         bool readdir_attr_max_access;
 140 };
 141
 142 static const struct enum_list fruit_rsrc[] = {
 143         {FRUIT_RSRC_STREAM, "stream"}, /* pass on to vfs_streams_xattr */
 144         {FRUIT_RSRC_ADFILE, "file"}, /* ._ AppleDouble file */
 145         {FRUIT_RSRC_XATTR, "xattr"}, /* Netatalk compatible xattr (ZFS only) */
 146         { -1, NULL}
 147 };
 148
 149 static const struct enum_list fruit_meta[] = {
 150         {FRUIT_META_STREAM, "stream"}, /* pass on to vfs_streams_xattr */
 151         {FRUIT_META_NETATALK, "netatalk"}, /* Netatalk compatible xattr */
 152         { -1, NULL}
 153 };
 154
 155 static const struct enum_list fruit_locking[] = {
 156         {FRUIT_LOCKING_NETATALK, "netatalk"}, /* synchronize locks with Netatalk */
 157         {FRUIT_LOCKING_NONE, "none"},
 158         { -1, NULL}
 159 };
 160
 161 static const struct enum_list fruit_encoding[] = {
 162         {FRUIT_ENC_NATIVE, "native"}, /* map unicode private chars to ASCII */
 163         {FRUIT_ENC_PRIVATE, "private"}, /* keep unicode private chars */
 164         { -1, NULL}
 165 };
 166
 167 /*****************************************************************************
 168  * Defines, functions and data structures that deal with AppleDouble
 169  *****************************************************************************/
 170
 171 /*
 172  * There are two AppleDouble blobs we deal with:
 173  *
 174  * - ADOUBLE_META - AppleDouble blob used by Netatalk for storing
 175  *   metadata in an xattr
 176  *
 177  * - ADOUBLE_RSRC - AppleDouble blob used by OS X and Netatalk in
 178  *   ._ files
 179  */
 180 typedef enum {ADOUBLE_META, ADOUBLE_RSRC} adouble_type_t;
 181
 182 /* Version info */
 183 #define AD_VERSION2     0x00020000
 184 #define AD_VERSION      AD_VERSION2
 185
 186 /*
 187  * AppleDouble entry IDs.
 188  */
 189 #define ADEID_DFORK         1
 190 #define ADEID_RFORK         2
 191 #define ADEID_NAME          3
 192 #define ADEID_COMMENT       4
 193 #define ADEID_ICONBW        5
 194 #define ADEID_ICONCOL       6
 195 #define ADEID_FILEI         7
 196 #define ADEID_FILEDATESI    8
 197 #define ADEID_FINDERI       9
 198 #define ADEID_MACFILEI      10
 199 #define ADEID_PRODOSFILEI   11
 200 #define ADEID_MSDOSFILEI    12
 201 #define ADEID_SHORTNAME     13
 202 #define ADEID_AFPFILEI      14
 203 #define ADEID_DID           15
 204
 205 /* Private Netatalk entries */
 206 #define ADEID_PRIVDEV       16
 207 #define ADEID_PRIVINO       17
 208 #define ADEID_PRIVSYN       18
 209 #define ADEID_PRIVID        19
 210 #define ADEID_MAX           (ADEID_PRIVID + 1)
 211
 212 /*
 213  * These are the real ids for the private entries,
 214  * as stored in the adouble file
 215  */
 216 #define AD_DEV              0x80444556
 217 #define AD_INO              0x80494E4F
 218 #define AD_SYN              0x8053594E
 219 #define AD_ID               0x8053567E
 220
 221 /* Number of actually used entries */
 222 #define ADEID_NUM_XATTR      8
 223 #define ADEID_NUM_DOT_UND    2
 224 #define ADEID_NUM_RSRC_XATTR 1
 225
 226 /* AppleDouble magic */
 227 #define AD_APPLESINGLE_MAGIC 0x00051600
 228 #define AD_APPLEDOUBLE_MAGIC 0x00051607
 229 #define AD_MAGIC             AD_APPLEDOUBLE_MAGIC
 230
 231 /* Sizes of relevant entry bits */
 232 #define ADEDLEN_MAGIC       4
 233 #define ADEDLEN_VERSION     4
 234 #define ADEDLEN_FILLER      16
 235 #define AD_FILLER_TAG       "Netatalk        " /* should be 16 bytes */
 236 #define ADEDLEN_NENTRIES    2
 237 #define AD_HEADER_LEN       (ADEDLEN_MAGIC + ADEDLEN_VERSION + \
 238                              ADEDLEN_FILLER + ADEDLEN_NENTRIES) /* 26 */
 239 #define AD_ENTRY_LEN_EID    4
 240 #define AD_ENTRY_LEN_OFF    4
 241 #define AD_ENTRY_LEN_LEN    4
 242 #define AD_ENTRY_LEN (AD_ENTRY_LEN_EID + AD_ENTRY_LEN_OFF + AD_ENTRY_LEN_LEN)
 243
 244 /* Field widths */
 245 #define ADEDLEN_NAME            255
 246 #define ADEDLEN_COMMENT         200
 247 #define ADEDLEN_FILEI           16
 248 #define ADEDLEN_FINDERI         32
 249 #define ADEDLEN_FILEDATESI      16
 250 #define ADEDLEN_SHORTNAME       12 /* length up to 8.3 */
 251 #define ADEDLEN_AFPFILEI        4
 252 #define ADEDLEN_MACFILEI        4
 253 #define ADEDLEN_PRODOSFILEI     8
 254 #define ADEDLEN_MSDOSFILEI      2
 255 #define ADEDLEN_DID             4
 256 #define ADEDLEN_PRIVDEV         8
 257 #define ADEDLEN_PRIVINO         8
 258 #define ADEDLEN_PRIVSYN         8
 259 #define ADEDLEN_PRIVID          4
 260
 261 /* Offsets */
 262 #define ADEDOFF_MAGIC         0
 263 #define ADEDOFF_VERSION       (ADEDOFF_MAGIC + ADEDLEN_MAGIC)
 264 #define ADEDOFF_FILLER        (ADEDOFF_VERSION + ADEDLEN_VERSION)
 265 #define ADEDOFF_NENTRIES      (ADEDOFF_FILLER + ADEDLEN_FILLER)
 266
 267 #define ADEDOFF_FINDERI_XATTR    (AD_HEADER_LEN + \
 268                                   (ADEID_NUM_XATTR * AD_ENTRY_LEN))
 269 #define ADEDOFF_COMMENT_XATTR    (ADEDOFF_FINDERI_XATTR    + ADEDLEN_FINDERI)
 270 #define ADEDOFF_FILEDATESI_XATTR (ADEDOFF_COMMENT_XATTR    + ADEDLEN_COMMENT)
 271 #define ADEDOFF_AFPFILEI_XATTR   (ADEDOFF_FILEDATESI_XATTR + \
 272                                   ADEDLEN_FILEDATESI)
 273 #define ADEDOFF_PRIVDEV_XATTR    (ADEDOFF_AFPFILEI_XATTR   + ADEDLEN_AFPFILEI)
 274 #define ADEDOFF_PRIVINO_XATTR    (ADEDOFF_PRIVDEV_XATTR    + ADEDLEN_PRIVDEV)
 275 #define ADEDOFF_PRIVSYN_XATTR    (ADEDOFF_PRIVINO_XATTR    + ADEDLEN_PRIVINO)
 276 #define ADEDOFF_PRIVID_XATTR     (ADEDOFF_PRIVSYN_XATTR    + ADEDLEN_PRIVSYN)
 277
 278 #define ADEDOFF_FINDERI_DOT_UND  (AD_HEADER_LEN + \
 279                                   (ADEID_NUM_DOT_UND * AD_ENTRY_LEN))
 280 #define ADEDOFF_RFORK_DOT_UND    (ADEDOFF_FINDERI_DOT_UND + ADEDLEN_FINDERI)
 281
 282 #define AD_DATASZ_XATTR (AD_HEADER_LEN + \
 283                          (ADEID_NUM_XATTR * AD_ENTRY_LEN) + \
 284                          ADEDLEN_FINDERI + ADEDLEN_COMMENT + \
 285                          ADEDLEN_FILEDATESI + ADEDLEN_AFPFILEI + \
 286                          ADEDLEN_PRIVDEV + ADEDLEN_PRIVINO + \
 287                          ADEDLEN_PRIVSYN + ADEDLEN_PRIVID)
 288
 289 #if AD_DATASZ_XATTR != 402
 290 #error bad size for AD_DATASZ_XATTR
 291 #endif
 292
 293 #define AD_DATASZ_DOT_UND (AD_HEADER_LEN + \
 294                            (ADEID_NUM_DOT_UND * AD_ENTRY_LEN) + \
 295                            ADEDLEN_FINDERI)
 296 #if AD_DATASZ_DOT_UND != 82
 297 #error bad size for AD_DATASZ_DOT_UND
 298 #endif
 299
 300 /*
 301  * Sharemode locks fcntl() offsets
 302  */
 303 #if _FILE_OFFSET_BITS == 64 || defined(HAVE_LARGEFILE)
 304 #define AD_FILELOCK_BASE (UINT64_C(0x7FFFFFFFFFFFFFFF) - 9)
 305 #else
 306 #define AD_FILELOCK_BASE (UINT32_C(0x7FFFFFFF) - 9)
 307 #endif
 308 #define BYTELOCK_MAX (AD_FILELOCK_BASE - 1)
 309
 310 #define AD_FILELOCK_OPEN_WR        (AD_FILELOCK_BASE + 0)
 311 #define AD_FILELOCK_OPEN_RD        (AD_FILELOCK_BASE + 1)
 312 #define AD_FILELOCK_RSRC_OPEN_WR   (AD_FILELOCK_BASE + 2)
 313 #define AD_FILELOCK_RSRC_OPEN_RD   (AD_FILELOCK_BASE + 3)
 314 #define AD_FILELOCK_DENY_WR        (AD_FILELOCK_BASE + 4)
 315 #define AD_FILELOCK_DENY_RD        (AD_FILELOCK_BASE + 5)
 316 #define AD_FILELOCK_RSRC_DENY_WR   (AD_FILELOCK_BASE + 6)
 317 #define AD_FILELOCK_RSRC_DENY_RD   (AD_FILELOCK_BASE + 7)
 318 #define AD_FILELOCK_OPEN_NONE      (AD_FILELOCK_BASE + 8)
 319 #define AD_FILELOCK_RSRC_OPEN_NONE (AD_FILELOCK_BASE + 9)
 320
 321 /* Time stuff we overload the bits a little */
 322 #define AD_DATE_CREATE         0
 323 #define AD_DATE_MODIFY         4
 324 #define AD_DATE_BACKUP         8
 325 #define AD_DATE_ACCESS        12
 326 #define AD_DATE_MASK          (AD_DATE_CREATE | AD_DATE_MODIFY | \
 327                                AD_DATE_BACKUP | AD_DATE_ACCESS)
 328 #define AD_DATE_UNIX          (1 << 10)
 329 #define AD_DATE_START         0x80000000
 330 #define AD_DATE_DELTA         946684800
 331 #define AD_DATE_FROM_UNIX(x)  (htonl((x) - AD_DATE_DELTA))
 332 #define AD_DATE_TO_UNIX(x)    (ntohl(x) + AD_DATE_DELTA)
 333
 334 /* Accessor macros */
 335 #define ad_getentrylen(ad,eid)     ((ad)->ad_eid[(eid)].ade_len)
 336 #define ad_getentryoff(ad,eid)     ((ad)->ad_eid[(eid)].ade_off)
 337 #define ad_setentrylen(ad,eid,len) ((ad)->ad_eid[(eid)].ade_len = (len))
 338 #define ad_setentryoff(ad,eid,off) ((ad)->ad_eid[(eid)].ade_off = (off))
 339 #define ad_entry(ad,eid)           ((ad)->ad_data + ad_getentryoff((ad),(eid)))
 340
 341 struct ad_entry {
 342         size_t ade_off;
 343         size_t ade_len;
 344 };
 345
 346 struct adouble {
 347         vfs_handle_struct        *ad_handle;
 348         files_struct             *ad_fsp;
 349         adouble_type_t            ad_type;
 350         uint32_t                  ad_magic;
 351         uint32_t                  ad_version;
 352         struct ad_entry           ad_eid[ADEID_MAX];
 353         char                     *ad_data;
 354 };
 355
 356 struct ad_entry_order {
 357         uint32_t id, offset, len;
 358 };
 359
 360 /* Netatalk AppleDouble metadata xattr */
 361 static const
 362 struct ad_entry_order entry_order_meta_xattr[ADEID_NUM_XATTR + 1] = {
 363         {ADEID_FINDERI,    ADEDOFF_FINDERI_XATTR,    ADEDLEN_FINDERI},
 364         {ADEID_COMMENT,    ADEDOFF_COMMENT_XATTR,    0},
 365         {ADEID_FILEDATESI, ADEDOFF_FILEDATESI_XATTR, ADEDLEN_FILEDATESI},
 366         {ADEID_AFPFILEI,   ADEDOFF_AFPFILEI_XATTR,   ADEDLEN_AFPFILEI},
 367         {ADEID_PRIVDEV,    ADEDOFF_PRIVDEV_XATTR,    0},
 368         {ADEID_PRIVINO,    ADEDOFF_PRIVINO_XATTR,    0},
 369         {ADEID_PRIVSYN,    ADEDOFF_PRIVSYN_XATTR,    0},
 370         {ADEID_PRIVID,     ADEDOFF_PRIVID_XATTR,     0},
 371         {0, 0, 0}
 372 };
 373
 374 /* AppleDouble ressource fork file (the ones prefixed by "._") */
 375 static const
 376 struct ad_entry_order entry_order_dot_und[ADEID_NUM_DOT_UND + 1] = {
 377         {ADEID_FINDERI,    ADEDOFF_FINDERI_DOT_UND,  ADEDLEN_FINDERI},
 378         {ADEID_RFORK,      ADEDOFF_RFORK_DOT_UND,    0},
 379         {0, 0, 0}
 380 };
 381
 382 /*
 383  * Fake AppleDouble entry oder for ressource fork xattr.  The xattr
 384  * isn't an AppleDouble file, it simply contains the ressource data,
 385  * but in order to be able to use some API calls like ad_getentryoff()
 386  * we build a fake/helper struct adouble with this entry order struct.
 387  */
 388 static const
 389 struct ad_entry_order entry_order_rsrc_xattr[ADEID_NUM_RSRC_XATTR + 1] = {
 390         {ADEID_RFORK, 0, 0},
 391         {0, 0, 0}
 392 };
 393
 394 /* Conversion from enumerated id to on-disk AppleDouble id */
 395 #define AD_EID_DISK(a) (set_eid[a])
 396 static const uint32_t set_eid[] = {
 397         0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15,
 398         AD_DEV, AD_INO, AD_SYN, AD_ID
 399 };
 400
 401 /*
 402  * Forward declarations
 403  */
 404 static struct adouble *ad_init(TALLOC_CTX *ctx, vfs_handle_struct *handle,
 405                                adouble_type_t type, files_struct *fsp);
 406 static int ad_write(struct adouble *ad, const char *path);
 407 static int adouble_path(TALLOC_CTX *ctx, const char *path_in, char **path_out);
 408
 409 /**
 410  * Get a date
 411  **/
 412 static int ad_getdate(const struct adouble *ad,
 413                       unsigned int dateoff,
 414                       uint32_t *date)
 415 {
 416         bool xlate = (dateoff & AD_DATE_UNIX);
 417
 418         dateoff &= AD_DATE_MASK;
 419         if (!ad_getentryoff(ad, ADEID_FILEDATESI)) {
 420                 return -1;
 421         }
 422
 423         if (dateoff > AD_DATE_ACCESS) {
 424             return -1;
 425         }
 426         memcpy(date,
 427                ad_entry(ad, ADEID_FILEDATESI) + dateoff,
 428                sizeof(uint32_t));
 429
 430         if (xlate) {
 431                 *date = AD_DATE_TO_UNIX(*date);
 432         }
 433         return 0;
 434 }
 435
 436 /**
 437  * Set a date
 438  **/
 439 static int ad_setdate(struct adouble *ad, unsigned int dateoff, uint32_t date)
 440 {
 441         bool xlate = (dateoff & AD_DATE_UNIX);
 442
 443         if (!ad_getentryoff(ad, ADEID_FILEDATESI)) {
 444                 return 0;
 445         }
 446
 447         dateoff &= AD_DATE_MASK;
 448         if (xlate) {
 449                 date = AD_DATE_FROM_UNIX(date);
 450         }
 451
 452         if (dateoff > AD_DATE_ACCESS) {
 453                 return -1;
 454         }
 455
 456         memcpy(ad_entry(ad, ADEID_FILEDATESI) + dateoff, &date, sizeof(date));
 457
 458         return 0;
 459 }
 460
 461
 462 /**
 463  * Map on-disk AppleDouble id to enumerated id
 464  **/
 465 static uint32_t get_eid(uint32_t eid)
 466 {
 467         if (eid <= 15) {
 468                 return eid;
 469         }
 470
 471         switch (eid) {
 472         case AD_DEV:
 473                 return ADEID_PRIVDEV;
 474         case AD_INO:
 475                 return ADEID_PRIVINO;
 476         case AD_SYN:
 477                 return ADEID_PRIVSYN;
 478         case AD_ID:
 479                 return ADEID_PRIVID;
 480         default:
 481                 break;
 482         }
 483
 484         return 0;
 485 }
 486
 487 /**
 488  * Pack AppleDouble structure into data buffer
 489  **/
 490 static bool ad_pack(struct adouble *ad)
 491 {
 492         uint32_t       eid;
 493         uint16_t       nent;
 494         uint32_t       bufsize;
 495         uint32_t       offset = 0;
 496
 497         bufsize = talloc_get_size(ad->ad_data);
 498
 499         if (offset + ADEDLEN_MAGIC < offset ||
 500                         offset + ADEDLEN_MAGIC >= bufsize) {
 501                 return false;
 502         }
 503         RSIVAL(ad->ad_data, offset, ad->ad_magic);
 504         offset += ADEDLEN_MAGIC;
 505
 506         if (offset + ADEDLEN_VERSION < offset ||
 507                         offset + ADEDLEN_VERSION >= bufsize) {
 508                 return false;
 509         }
 510         RSIVAL(ad->ad_data, offset, ad->ad_version);
 511         offset += ADEDLEN_VERSION;
 512
 513         if (offset + ADEDLEN_FILLER < offset ||
 514                         offset + ADEDLEN_FILLER >= bufsize) {
 515                 return false;
 516         }
 517         if (ad->ad_type == ADOUBLE_RSRC) {
 518                 memcpy(ad->ad_data + offset, AD_FILLER_TAG, ADEDLEN_FILLER);
 519         }
 520         offset += ADEDLEN_FILLER;
 521
 522         if (offset + ADEDLEN_NENTRIES < offset ||
 523                         offset + ADEDLEN_NENTRIES >= bufsize) {
 524                 return false;
 525         }
 526         offset += ADEDLEN_NENTRIES;
 527
 528         for (eid = 0, nent = 0; eid < ADEID_MAX; eid++) {
 529                 if (ad->ad_eid[eid].ade_off == 0) {
 530                         /*
 531                          * ade_off is also used as indicator whether a
 532                          * specific entry is used or not
 533                          */
 534                         continue;
 535                 }
 536
 537                 if (offset + AD_ENTRY_LEN_EID < offset ||
 538                                 offset + AD_ENTRY_LEN_EID >= bufsize) {
 539                         return false;
 540                 }
 541                 RSIVAL(ad->ad_data, offset, AD_EID_DISK(eid));
 542                 offset += AD_ENTRY_LEN_EID;
 543
 544                 if (offset + AD_ENTRY_LEN_OFF < offset ||
 545                                 offset + AD_ENTRY_LEN_OFF >= bufsize) {
 546                         return false;
 547                 }
 548                 RSIVAL(ad->ad_data, offset, ad->ad_eid[eid].ade_off);
 549                 offset += AD_ENTRY_LEN_OFF;
 550
 551                 if (offset + AD_ENTRY_LEN_LEN < offset ||
 552                                 offset + AD_ENTRY_LEN_LEN >= bufsize) {
 553                         return false;
 554                 }
 555                 RSIVAL(ad->ad_data, offset, ad->ad_eid[eid].ade_len);
 556                 offset += AD_ENTRY_LEN_LEN;
 557
 558                 nent++;
 559         }
 560
 561         if (ADEDOFF_NENTRIES + 2 >= bufsize) {
 562                 return false;
 563         }
 564         RSSVAL(ad->ad_data, ADEDOFF_NENTRIES, nent);
 565
 566         return 0;
 567 }
 568
 569 /**
 570  * Unpack an AppleDouble blob into a struct adoble
 571  **/
 572 static bool ad_unpack(struct adouble *ad, const int nentries, size_t filesize)
 573 {
 574         size_t bufsize = talloc_get_size(ad->ad_data);
 575         int adentries, i;
 576         uint32_t eid, len, off;
 577
 578         /*
 579          * The size of the buffer ad->ad_data is checked when read, so
 580          * we wouldn't have to check our own offsets, a few extra
 581          * checks won't hurt though. We have to check the offsets we
 582          * read from the buffer anyway.
 583          */
 584
 585         if (bufsize < (AD_HEADER_LEN + (AD_ENTRY_LEN * nentries))) {
 586                 DEBUG(1, ("bad size\n"));
 587                 return false;
 588         }
 589
 590         ad->ad_magic = RIVAL(ad->ad_data, 0);
 591         ad->ad_version = RIVAL(ad->ad_data, ADEDOFF_VERSION);
 592         if ((ad->ad_magic != AD_MAGIC) || (ad->ad_version != AD_VERSION)) {
 593                 DEBUG(1, ("wrong magic or version\n"));
 594                 return false;
 595         }
 596
 597         adentries = RSVAL(ad->ad_data, ADEDOFF_NENTRIES);
 598         if (adentries != nentries) {
 599                 DEBUG(1, ("invalid number of entries: %d\n", adentries));
 600                 return false;
 601         }
 602
 603         /* now, read in the entry bits */
 604         for (i = 0; i < adentries; i++) {
 605                 eid = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN));
 606                 eid = get_eid(eid);
 607                 off = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN) + 4);
 608                 len = RIVAL(ad->ad_data, AD_HEADER_LEN + (i * AD_ENTRY_LEN) + 8);
 609
 610                 if (!eid || eid > ADEID_MAX) {
 611                         DEBUG(1, ("bogus eid %d\n", eid));
 612                         return false;
 613                 }
 614
 615                 /*
 616                  * All entries other than the resource fork are
 617                  * expected to be read into the ad_data buffer, so
 618                  * ensure the specified offset is within that bound
 619                  */
 620                 if ((off > bufsize) && (eid != ADEID_RFORK)) {
 621                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 622                                   eid, off, len));
 623                         return false;
 624                 }
 625
 626                 /*
 627                  * All entries besides FinderInfo and resource fork
 628                  * must fit into the buffer. FinderInfo is special as
 629                  * it may be larger then the default 32 bytes (if it
 630                  * contains marshalled xattrs), but we will fixup that
 631                  * in ad_convert(). And the resource fork is never
 632                  * accessed directly by the ad_data buf (also see
 633                  * comment above) anyway.
 634                  */
 635                 if ((eid != ADEID_RFORK) &&
 636                     (eid != ADEID_FINDERI) &&
 637                     ((off + len) > bufsize)) {
 638                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 639                                   eid, off, len));
 640                         return false;
 641                 }
 642
 643                 /*
 644                  * That would be obviously broken
 645                  */
 646                 if (off > filesize) {
 647                         DEBUG(1, ("bogus eid %d: off: %" PRIu32 ", len: %" PRIu32 "\n",
 648                                   eid, off, len));
 649                         return false;
 650                 }
 651
 652                 /*
 653                  * Check for any entry that has its end beyond the
 654                  * filesize.
 655                  */
 656                 if (off + len < off) {
 657                         DEBUG(1, ("offset wrap in eid %d: off: %" PRIu32
 658                                   ", len: %" PRIu32 "\n",
 659                                   eid, off, len));
 660                         return false;
 661
 662                 }
 663                 if (off + len > filesize) {
 664                         /*
 665                          * If this is the resource fork entry, we fix
 666                          * up the length, for any other entry we bail
 667                          * out.
 668                          */
 669                         if (eid != ADEID_RFORK) {
 670                                 DEBUG(1, ("bogus eid %d: off: %" PRIu32
 671                                           ", len: %" PRIu32 "\n",
 672                                           eid, off, len));
 673                                 return false;
 674                         }
 675
 676                         /*
 677                          * Fixup the resource fork entry by limiting
 678                          * the size to entryoffset - filesize.
 679                          */
 680                         len = filesize - off;
 681                         DEBUG(1, ("Limiting ADEID_RFORK: off: %" PRIu32
 682                                   ", len: %" PRIu32 "\n", off, len));
 683                 }
 684
 685                 ad->ad_eid[eid].ade_off = off;
 686                 ad->ad_eid[eid].ade_len = len;
 687         }
 688
 689         return true;
 690 }
 691
 692 /**
 693  * Convert from Apple's ._ file to Netatalk
 694  *
 695  * Apple's AppleDouble may contain a FinderInfo entry longer then 32
 696  * bytes containing packed xattrs. Netatalk can't deal with that, so
 697  * we simply discard the packed xattrs.
 698  *
 699  * @return -1 in case an error occured, 0 if no conversion was done, 1
 700  * otherwise
 701  **/
 702 static int ad_convert(struct adouble *ad, int fd)
 703 {
 704         int rc = 0;
 705         char *map = MAP_FAILED;
 706         size_t origlen;
 707
 708         origlen = ad_getentryoff(ad, ADEID_RFORK) +
 709                 ad_getentrylen(ad, ADEID_RFORK);
 710
 711         /* FIXME: direct use of mmap(), vfs_aio_fork does it too */
 712         map = mmap(NULL, origlen, PROT_READ|PROT_WRITE, MAP_SHARED, fd, 0);
 713         if (map == MAP_FAILED) {
 714                 DEBUG(2, ("mmap AppleDouble: %s\n", strerror(errno)));
 715                 rc = -1;
 716                 goto exit;
 717         }
 718
 719         if (ad_getentrylen(ad, ADEID_RFORK) > 0) {
 720                 memmove(map + ad_getentryoff(ad, ADEID_FINDERI) + ADEDLEN_FINDERI,
 721                         map + ad_getentryoff(ad, ADEID_RFORK),
 722                         ad_getentrylen(ad, ADEID_RFORK));
 723         }
 724
 725         ad_setentrylen(ad, ADEID_FINDERI, ADEDLEN_FINDERI);
 726         ad_setentryoff(ad, ADEID_RFORK,
 727                        ad_getentryoff(ad, ADEID_FINDERI) + ADEDLEN_FINDERI);
 728
 729         /*
 730          * FIXME: direct ftruncate(), but we don't have a fsp for the
 731          * VFS call
 732          */
 733         rc = ftruncate(fd, ad_getentryoff(ad, ADEID_RFORK)
 734                        + ad_getentrylen(ad, ADEID_RFORK));
 735
 736 exit:
 737         if (map != MAP_FAILED) {
 738                 munmap(map, origlen);
 739         }
 740         return rc;
 741 }
 742
 743 /**
 744  * Read and parse Netatalk AppleDouble metadata xattr
 745  **/
 746 static ssize_t ad_header_read_meta(struct adouble *ad, const char *path)
 747 {
 748         int      rc = 0;
 749         ssize_t  ealen;
 750         bool     ok;
 751
 752         DEBUG(10, ("reading meta xattr for %s\n", path));
 753
 754         ealen = SMB_VFS_GETXATTR(ad->ad_handle->conn, path,
 755                                  AFPINFO_EA_NETATALK, ad->ad_data,
 756                                  AD_DATASZ_XATTR);
 757         if (ealen == -1) {
 758                 switch (errno) {
 759                 case ENOATTR:
 760                 case ENOENT:
 761                         if (errno == ENOATTR) {
 762                                 errno = ENOENT;
 763                         }
 764                         rc = -1;
 765                         goto exit;
 766                 default:
 767                         DEBUG(2, ("error reading meta xattr: %s\n",
 768                                   strerror(errno)));
 769                         rc = -1;
 770                         goto exit;
 771                 }
 772         }
 773         if (ealen != AD_DATASZ_XATTR) {
 774                 DEBUG(2, ("bad size %zd\n", ealen));
 775                 errno = EINVAL;
 776                 rc = -1;
 777                 goto exit;
 778         }
 779
 780         /* Now parse entries */
 781         ok = ad_unpack(ad, ADEID_NUM_XATTR, AD_DATASZ_XATTR);
 782         if (!ok) {
 783                 DEBUG(2, ("invalid AppleDouble metadata xattr\n"));
 784                 errno = EINVAL;
 785                 rc = -1;
 786                 goto exit;
 787         }
 788
 789         if (!ad_getentryoff(ad, ADEID_FINDERI)
 790             || !ad_getentryoff(ad, ADEID_COMMENT)
 791             || !ad_getentryoff(ad, ADEID_FILEDATESI)
 792             || !ad_getentryoff(ad, ADEID_AFPFILEI)
 793             || !ad_getentryoff(ad, ADEID_PRIVDEV)
 794             || !ad_getentryoff(ad, ADEID_PRIVINO)
 795             || !ad_getentryoff(ad, ADEID_PRIVSYN)
 796             || !ad_getentryoff(ad, ADEID_PRIVID)) {
 797                 DEBUG(2, ("invalid AppleDouble metadata xattr\n"));
 798                 errno = EINVAL;
 799                 rc = -1;
 800                 goto exit;
 801         }
 802
 803 exit:
 804         DEBUG(10, ("reading meta xattr for %s, rc: %d\n", path, rc));
 805
 806         if (rc != 0) {
 807                 ealen = -1;
 808                 if (errno == EINVAL) {
 809                         become_root();
 810                         removexattr(path, AFPINFO_EA_NETATALK);
 811                         unbecome_root();
 812                         errno = ENOENT;
 813                 }
 814         }
 815         return ealen;
 816 }
 817
 818 /**
 819  * Read and parse resource fork, either ._ AppleDouble file or xattr
 820  **/
 821 static ssize_t ad_header_read_rsrc(struct adouble *ad, const char *path)
 822 {
 823         struct fruit_config_data *config = NULL;
 824         int fd = -1;
 825         int rc = 0;
 826         ssize_t len;
 827         char *adpath = NULL;
 828         bool opened = false;
 829         int mode;
 830         struct adouble *meta_ad = NULL;
 831         SMB_STRUCT_STAT sbuf;
 832         bool ok;
 833         int saved_errno = 0;
 834
 835         SMB_VFS_HANDLE_GET_DATA(ad->ad_handle, config,
 836                                 struct fruit_config_data, return -1);
 837
 838         /* Try rw first so we can use the fd in ad_convert() */
 839         mode = O_RDWR;
 840
 841         if (ad->ad_fsp && ad->ad_fsp->fh && (ad->ad_fsp->fh->fd != -1)) {
 842                 fd = ad->ad_fsp->fh->fd;
 843         } else {
 844                 if (config->rsrc == FRUIT_RSRC_XATTR) {
 845                         adpath = talloc_strdup(talloc_tos(), path);
 846                 } else {
 847                         rc = adouble_path(talloc_tos(), path, &adpath);
 848                         if (rc != 0) {
 849                                 goto exit;
 850                         }
 851                 }
 852
 853         retry:
 854                 if (config->rsrc == FRUIT_RSRC_XATTR) {
 855 #ifndef HAVE_ATTROPEN
 856                         errno = ENOSYS;
 857                         rc = -1;
 858                         goto exit;
 859 #else
 860                         /* FIXME: direct Solaris xattr syscall */
 861                         fd = attropen(adpath, AFPRESOURCE_EA_NETATALK,
 862                                       mode, 0);
 863 #endif
 864                 } else {
 865                         /* FIXME: direct open(), don't have an fsp */
 866                         fd = open(adpath, mode);
 867                 }
 868
 869                 if (fd == -1) {
 870                         switch (errno) {
 871                         case EROFS:
 872                         case EACCES:
 873                                 if (mode == O_RDWR) {
 874                                         mode = O_RDONLY;
 875                                         goto retry;
 876                                 }
 877                                 /* fall through ... */
 878                         default:
 879                                 DEBUG(2, ("open AppleDouble: %s, %s\n",
 880                                           adpath, strerror(errno)));
 881                                 rc = -1;
 882                                 goto exit;
 883                         }
 884                 }
 885                 opened = true;
 886         }
 887
 888         if (config->rsrc == FRUIT_RSRC_XATTR) {
 889                 /* FIXME: direct sys_fstat(), don't have an fsp */
 890                 rc = sys_fstat(
 891                         fd, &sbuf,
 892                         lp_fake_directory_create_times(
 893                                 SNUM(ad->ad_handle->conn)));
 894                 if (rc != 0) {
 895                         goto exit;
 896                 }
 897                 len = sbuf.st_ex_size;
 898                 ad_setentrylen(ad, ADEID_RFORK, len);
 899         } else {
 900                 /* FIXME: direct sys_pread(), don't have an fsp */
 901                 len = sys_pread(fd, ad->ad_data, AD_DATASZ_DOT_UND, 0);
 902                 if (len != AD_DATASZ_DOT_UND) {
 903                         DEBUG(2, ("%s: bad size: %zd\n",
 904                                   strerror(errno), len));
 905                         rc = -1;
 906                         goto exit;
 907                 }
 908
 909                 /* FIXME: direct sys_fstat(), we don't have an fsp */
 910                 rc = sys_fstat(fd, &sbuf,
 911                                lp_fake_directory_create_times(
 912                                        SNUM(ad->ad_handle->conn)));
 913                 if (rc != 0) {
 914                         goto exit;
 915                 }
 916
 917                 /* Now parse entries */
 918                 ok = ad_unpack(ad, ADEID_NUM_DOT_UND, sbuf.st_ex_size);
 919                 if (!ok) {
 920                         DEBUG(1, ("invalid AppleDouble ressource %s\n", path));
 921                         errno = EINVAL;
 922                         rc = -1;
 923                         goto exit;
 924                 }
 925
 926                 if ((ad_getentryoff(ad, ADEID_FINDERI)
 927                      != ADEDOFF_FINDERI_DOT_UND)
 928                     || (ad_getentrylen(ad, ADEID_FINDERI)
 929                         < ADEDLEN_FINDERI)
 930                     || (ad_getentryoff(ad, ADEID_RFORK)
 931                         < ADEDOFF_RFORK_DOT_UND)) {
 932                         DEBUG(2, ("invalid AppleDouble ressource %s\n", path));
 933                         errno = EINVAL;
 934                         rc = -1;
 935                         goto exit;
 936                 }
 937
 938                 if ((mode == O_RDWR)
 939                     && (ad_getentrylen(ad, ADEID_FINDERI) > ADEDLEN_FINDERI)) {
 940                         rc = ad_convert(ad, fd);
 941                         if (rc != 0) {
 942                                 rc = -1;
 943                                 goto exit;
 944                         }
 945                         /*
 946                          * Can't use ad_write() because we might not have a fsp
 947                          */
 948                         rc = ad_pack(ad);
 949                         if (rc != 0) {
 950                                 goto exit;
 951                         }
 952                         /* FIXME: direct sys_pwrite(), don't have an fsp */
 953                         len = sys_pwrite(fd, ad->ad_data,
 954                                          AD_DATASZ_DOT_UND, 0);
 955                         if (len != AD_DATASZ_DOT_UND) {
 956                                 DEBUG(2, ("%s: bad size: %zd\n", adpath, len));
 957                                 rc = -1;
 958                                 goto exit;
 959                         }
 960
 961                         meta_ad = ad_init(talloc_tos(), ad->ad_handle,
 962                                           ADOUBLE_META, NULL);
 963                         if (meta_ad == NULL) {
 964                                 rc = -1;
 965                                 goto exit;
 966                         }
 967
 968                         memcpy(ad_entry(meta_ad, ADEID_FINDERI),
 969                                ad_entry(ad, ADEID_FINDERI),
 970                                ADEDLEN_FINDERI);
 971
 972                         rc = ad_write(meta_ad, path);
 973                         if (rc != 0) {
 974                                 rc = -1;
 975                                 goto exit;
 976                         }
 977                 }
 978         }
 979
 980         DEBUG(10, ("opened AppleDouble: %s\n", path));
 981
 982 exit:
 983         if (rc != 0) {
 984                 saved_errno = errno;
 985                 len = -1;
 986         }
 987         if (opened && fd != -1) {
 988                 close(fd);
 989         }
 990         TALLOC_FREE(adpath);
 991         TALLOC_FREE(meta_ad);
 992         if (rc != 0) {
 993                 errno = saved_errno;
 994         }
 995         return len;
 996 }
 997
 998 /**
 999  * Read and unpack an AppleDouble metadata xattr or resource
1000  **/
1001 static ssize_t ad_read(struct adouble *ad, const char *path)
1002 {
1003         switch (ad->ad_type) {
1004         case ADOUBLE_META:
1005                 return ad_header_read_meta(ad, path);
1006         case ADOUBLE_RSRC:
1007                 return ad_header_read_rsrc(ad, path);
1008         default:
1009                 return -1;
1010         }
1011 }
1012
1013 /**
1014  * Allocate a struct adouble without initialiing it
1015  *
1016  * The struct is either hang of the fsp extension context or if fsp is
1017  * NULL from ctx.
1018  *
1019  * @param[in] ctx        talloc context
1020  * @param[in] handle     vfs handle
1021  * @param[in] type       type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1022
1023  * @param[in] fsp        if not NULL (for stream IO), the adouble handle is
1024  *                       added as an fsp extension
1025  *
1026  * @return               adouble handle
1027  **/
1028 static struct adouble *ad_alloc(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1029                                 adouble_type_t type, files_struct *fsp)
1030 {
1031         int rc = 0;
1032         size_t adsize = 0;
1033         struct adouble *ad;
1034         struct fruit_config_data *config;
1035
1036         SMB_VFS_HANDLE_GET_DATA(handle, config,
1037                                 struct fruit_config_data, return NULL);
1038
1039         switch (type) {
1040         case ADOUBLE_META:
1041                 adsize = AD_DATASZ_XATTR;
1042                 break;
1043         case ADOUBLE_RSRC:
1044                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
1045                         adsize = AD_DATASZ_DOT_UND;
1046                 }
1047                 break;
1048         default:
1049                 return NULL;
1050         }
1051
1052         if (!fsp) {
1053                 ad = talloc_zero(ctx, struct adouble);
1054                 if (ad == NULL) {
1055                         rc = -1;
1056                         goto exit;
1057                 }
1058                 if (adsize) {
1059                         ad->ad_data = talloc_zero_array(ad, char, adsize);
1060                 }
1061         } else {
1062                 ad = (struct adouble *)VFS_ADD_FSP_EXTENSION(handle, fsp,
1063                                                              struct adouble,
1064                                                              NULL);
1065                 if (ad == NULL) {
1066                         rc = -1;
1067                         goto exit;
1068                 }
1069                 if (adsize) {
1070                         ad->ad_data = talloc_zero_array(
1071                                 VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
1072                                 char, adsize);
1073                 }
1074                 ad->ad_fsp = fsp;
1075         }
1076
1077         if (adsize && ad->ad_data == NULL) {
1078                 rc = -1;
1079                 goto exit;
1080         }
1081         ad->ad_handle = handle;
1082         ad->ad_type = type;
1083         ad->ad_magic = AD_MAGIC;
1084         ad->ad_version = AD_VERSION;
1085
1086 exit:
1087         if (rc != 0) {
1088                 TALLOC_FREE(ad);
1089         }
1090         return ad;
1091 }
1092
1093 /**
1094  * Allocate and initialize a new struct adouble
1095  *
1096  * @param[in] ctx        talloc context
1097  * @param[in] handle     vfs handle
1098  * @param[in] type       type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1099  * @param[in] fsp        file handle, may be NULL for a type of e_ad_meta
1100  *
1101  * @return               adouble handle, initialized
1102  **/
1103 static struct adouble *ad_init(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1104                                adouble_type_t type, files_struct *fsp)
1105 {
1106         int rc = 0;
1107         const struct ad_entry_order  *eid;
1108         struct adouble *ad = NULL;
1109         struct fruit_config_data *config;
1110         time_t t = time(NULL);
1111
1112         SMB_VFS_HANDLE_GET_DATA(handle, config,
1113                                 struct fruit_config_data, return NULL);
1114
1115         switch (type) {
1116         case ADOUBLE_META:
1117                 eid = entry_order_meta_xattr;
1118                 break;
1119         case ADOUBLE_RSRC:
1120                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
1121                         eid = entry_order_dot_und;
1122                 } else {
1123                         eid = entry_order_rsrc_xattr;
1124                 }
1125                 break;
1126         default:
1127                 return NULL;
1128         }
1129
1130         ad = ad_alloc(ctx, handle, type, fsp);
1131         if (ad == NULL) {
1132                 return NULL;
1133         }
1134
1135         while (eid->id) {
1136                 ad->ad_eid[eid->id].ade_off = eid->offset;
1137                 ad->ad_eid[eid->id].ade_len = eid->len;
1138                 eid++;
1139         }
1140
1141         /* put something sane in the date fields */
1142         ad_setdate(ad, AD_DATE_CREATE | AD_DATE_UNIX, t);
1143         ad_setdate(ad, AD_DATE_MODIFY | AD_DATE_UNIX, t);
1144         ad_setdate(ad, AD_DATE_ACCESS | AD_DATE_UNIX, t);
1145         ad_setdate(ad, AD_DATE_BACKUP, htonl(AD_DATE_START));
1146
1147         if (rc != 0) {
1148                 TALLOC_FREE(ad);
1149         }
1150         return ad;
1151 }
1152
1153 /**
1154  * Return AppleDouble data for a file
1155  *
1156  * @param[in] ctx      talloc context
1157  * @param[in] handle   vfs handle
1158  * @param[in] path     pathname to file or directory
1159  * @param[in] type     type of AppleDouble, ADOUBLE_META or ADOUBLE_RSRC
1160  *
1161  * @return             talloced struct adouble or NULL on error
1162  **/
1163 static struct adouble *ad_get(TALLOC_CTX *ctx, vfs_handle_struct *handle,
1164                               const char *path, adouble_type_t type)
1165 {
1166         int rc = 0;
1167         ssize_t len;
1168         struct adouble *ad = NULL;
1169
1170         DEBUG(10, ("ad_get(%s) called for %s\n",
1171                    type == ADOUBLE_META ? "meta" : "rsrc", path));
1172
1173         ad = ad_alloc(ctx, handle, type, NULL);
1174         if (ad == NULL) {
1175                 rc = -1;
1176                 goto exit;
1177         }
1178
1179         len = ad_read(ad, path);
1180         if (len == -1) {
1181                 DEBUG(10, ("error reading AppleDouble for %s\n", path));
1182                 rc = -1;
1183                 goto exit;
1184         }
1185
1186 exit:
1187         DEBUG(10, ("ad_get(%s) for %s returning %d\n",
1188                   type == ADOUBLE_META ? "meta" : "rsrc", path, rc));
1189
1190         if (rc != 0) {
1191                 TALLOC_FREE(ad);
1192         }
1193         return ad;
1194 }
1195
1196 /**
1197  * Set AppleDouble metadata on a file or directory
1198  *
1199  * @param[in] ad      adouble handle
1200
1201  * @param[in] path    pathname to file or directory, may be NULL for a
1202  *                    resource fork
1203  *
1204  * @return            status code, 0 means success
1205  **/
1206 static int ad_write(struct adouble *ad, const char *path)
1207 {
1208         int rc = 0;
1209         ssize_t len;
1210
1211         rc = ad_pack(ad);
1212         if (rc != 0) {
1213                 goto exit;
1214         }
1215
1216         switch (ad->ad_type) {
1217         case ADOUBLE_META:
1218                 rc = SMB_VFS_SETXATTR(ad->ad_handle->conn, path,
1219                                       AFPINFO_EA_NETATALK, ad->ad_data,
1220                                       AD_DATASZ_XATTR, 0);
1221                 break;
1222         case ADOUBLE_RSRC:
1223                 if ((ad->ad_fsp == NULL)
1224                     || (ad->ad_fsp->fh == NULL)
1225                     || (ad->ad_fsp->fh->fd == -1)) {
1226                         rc = -1;
1227                         goto exit;
1228                 }
1229                 /* FIXME: direct sys_pwrite(), don't have an fsp */
1230                 len = sys_pwrite(ad->ad_fsp->fh->fd, ad->ad_data,
1231                                  talloc_get_size(ad->ad_data), 0);
1232                 if (len != talloc_get_size(ad->ad_data)) {
1233                         DEBUG(1, ("short write on %s: %zd",
1234                                   fsp_str_dbg(ad->ad_fsp), len));
1235                         rc = -1;
1236                         goto exit;
1237                 }
1238                 break;
1239         default:
1240                 return -1;
1241         }
1242 exit:
1243         return rc;
1244 }
1245
1246 /*****************************************************************************
1247  * Helper functions
1248  *****************************************************************************/
1249
1250 static bool is_afpinfo_stream(const struct smb_filename *smb_fname)
1251 {
1252         if (strncasecmp_m(smb_fname->stream_name,
1253                           AFPINFO_STREAM_NAME,
1254                           strlen(AFPINFO_STREAM_NAME)) == 0) {
1255                 return true;
1256         }
1257         return false;
1258 }
1259
1260 static bool is_afpresource_stream(const struct smb_filename *smb_fname)
1261 {
1262         if (strncasecmp_m(smb_fname->stream_name,
1263                           AFPRESOURCE_STREAM_NAME,
1264                           strlen(AFPRESOURCE_STREAM_NAME)) == 0) {
1265                 return true;
1266         }
1267         return false;
1268 }
1269
1270 /**
1271  * Test whether stream is an Apple stream, not used atm
1272  **/
1273 #if 0
1274 static bool is_apple_stream(const struct smb_filename *smb_fname)
1275 {
1276         if (is_afpinfo_stream(smb_fname)) {
1277                 return true;
1278         }
1279         if (is_afpresource_stream(smb_fname)) {
1280                 return true;
1281         }
1282         return false;
1283 }
1284 #endif
1285
1286 /**
1287  * Initialize config struct from our smb.conf config parameters
1288  **/
1289 static int init_fruit_config(vfs_handle_struct *handle)
1290 {
1291         struct fruit_config_data *config;
1292         int enumval;
1293
1294         config = talloc_zero(handle->conn, struct fruit_config_data);
1295         if (!config) {
1296                 DEBUG(1, ("talloc_zero() failed\n"));
1297                 errno = ENOMEM;
1298                 return -1;
1299         }
1300
1301         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1302                                "ressource", fruit_rsrc, FRUIT_RSRC_ADFILE);
1303         if (enumval == -1) {
1304                 DEBUG(1, ("value for %s: ressource type unknown\n",
1305                           FRUIT_PARAM_TYPE_NAME));
1306                 return -1;
1307         }
1308         config->rsrc = (enum fruit_rsrc)enumval;
1309
1310         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1311                                "metadata", fruit_meta, FRUIT_META_NETATALK);
1312         if (enumval == -1) {
1313                 DEBUG(1, ("value for %s: metadata type unknown\n",
1314                           FRUIT_PARAM_TYPE_NAME));
1315                 return -1;
1316         }
1317         config->meta = (enum fruit_meta)enumval;
1318
1319         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1320                                "locking", fruit_locking, FRUIT_LOCKING_NONE);
1321         if (enumval == -1) {
1322                 DEBUG(1, ("value for %s: locking type unknown\n",
1323                           FRUIT_PARAM_TYPE_NAME));
1324                 return -1;
1325         }
1326         config->locking = (enum fruit_locking)enumval;
1327
1328         enumval = lp_parm_enum(SNUM(handle->conn), FRUIT_PARAM_TYPE_NAME,
1329                                "encoding", fruit_encoding, FRUIT_ENC_PRIVATE);
1330         if (enumval == -1) {
1331                 DEBUG(1, ("value for %s: encoding type unknown\n",
1332                           FRUIT_PARAM_TYPE_NAME));
1333                 return -1;
1334         }
1335         config->encoding = (enum fruit_encoding)enumval;
1336
1337         if (lp_parm_bool(-1, FRUIT_PARAM_TYPE_NAME, "aapl", true)) {
1338                 config->use_aapl = true;
1339         }
1340
1341         if (lp_parm_bool(SNUM(handle->conn),
1342                          "readdir_attr", "aapl_rsize", true)) {
1343                 config->readdir_attr_rsize = true;
1344         }
1345
1346         if (lp_parm_bool(SNUM(handle->conn),
1347                          "readdir_attr", "aapl_finder_info", true)) {
1348                 config->readdir_attr_finder_info = true;
1349         }
1350
1351         if (lp_parm_bool(SNUM(handle->conn),
1352                          "readdir_attr", "aapl_max_access", true)) {
1353                 config->readdir_attr_max_access = true;
1354         }
1355
1356         SMB_VFS_HANDLE_SET_DATA(handle, config,
1357                                 NULL, struct fruit_config_data,
1358                                 return -1);
1359
1360         return 0;
1361 }
1362
1363 /**
1364  * Prepend "._" to a basename
1365  **/
1366 static int adouble_path(TALLOC_CTX *ctx, const char *path_in, char **path_out)
1367 {
1368         char *parent;
1369         const char *base;
1370
1371         if (!parent_dirname(ctx, path_in, &parent, &base)) {
1372                 return -1;
1373         }
1374
1375         *path_out = talloc_asprintf(ctx, "%s/._%s", parent, base);
1376         if (*path_out == NULL) {
1377                 return -1;
1378         }
1379
1380         return 0;
1381 }
1382
1383 /**
1384  * Allocate and initialize an AfpInfo struct
1385  **/
1386 static AfpInfo *afpinfo_new(TALLOC_CTX *ctx)
1387 {
1388         AfpInfo *ai = talloc_zero(ctx, AfpInfo);
1389         if (ai == NULL) {
1390                 return NULL;
1391         }
1392         ai->afpi_Signature = AFP_Signature;
1393         ai->afpi_Version = AFP_Version;
1394         ai->afpi_BackupTime = AD_DATE_START;
1395         return ai;
1396 }
1397
1398 /**
1399  * Pack an AfpInfo struct into a buffer
1400  *
1401  * Buffer size must be at least AFP_INFO_SIZE
1402  * Returns size of packed buffer
1403  **/
1404 static ssize_t afpinfo_pack(const AfpInfo *ai, char *buf)
1405 {
1406         memset(buf, 0, AFP_INFO_SIZE);
1407
1408         RSIVAL(buf, 0, ai->afpi_Signature);
1409         RSIVAL(buf, 4, ai->afpi_Version);
1410         RSIVAL(buf, 12, ai->afpi_BackupTime);
1411         memcpy(buf + 16, ai->afpi_FinderInfo, sizeof(ai->afpi_FinderInfo));
1412
1413         return AFP_INFO_SIZE;
1414 }
1415
1416 /**
1417  * Unpack a buffer into a AfpInfo structure
1418  *
1419  * Buffer size must be at least AFP_INFO_SIZE
1420  * Returns allocated AfpInfo struct
1421  **/
1422 static AfpInfo *afpinfo_unpack(TALLOC_CTX *ctx, const void *data)
1423 {
1424         AfpInfo *ai = talloc_zero(ctx, AfpInfo);
1425         if (ai == NULL) {
1426                 return NULL;
1427         }
1428
1429         ai->afpi_Signature = RIVAL(data, 0);
1430         ai->afpi_Version = RIVAL(data, 4);
1431         ai->afpi_BackupTime = RIVAL(data, 12);
1432         memcpy(ai->afpi_FinderInfo, (const char *)data + 16,
1433                sizeof(ai->afpi_FinderInfo));
1434
1435         if (ai->afpi_Signature != AFP_Signature
1436             || ai->afpi_Version != AFP_Version) {
1437                 DEBUG(1, ("Bad AfpInfo signature or version\n"));
1438                 TALLOC_FREE(ai);
1439         }
1440
1441         return ai;
1442 }
1443
1444 /**
1445  * Fake an inode number from the md5 hash of the (xattr) name
1446  **/
1447 static SMB_INO_T fruit_inode(const SMB_STRUCT_STAT *sbuf, const char *sname)
1448 {
1449         MD5_CTX ctx;
1450         unsigned char hash[16];
1451         SMB_INO_T result;
1452         char *upper_sname;
1453
1454         upper_sname = talloc_strdup_upper(talloc_tos(), sname);
1455         SMB_ASSERT(upper_sname != NULL);
1456
1457         MD5Init(&ctx);
1458         MD5Update(&ctx, (const unsigned char *)&(sbuf->st_ex_dev),
1459                   sizeof(sbuf->st_ex_dev));
1460         MD5Update(&ctx, (const unsigned char *)&(sbuf->st_ex_ino),
1461                   sizeof(sbuf->st_ex_ino));
1462         MD5Update(&ctx, (unsigned char *)upper_sname,
1463                   talloc_get_size(upper_sname)-1);
1464         MD5Final(hash, &ctx);
1465
1466         TALLOC_FREE(upper_sname);
1467
1468         /* Hopefully all the variation is in the lower 4 (or 8) bytes! */
1469         memcpy(&result, hash, sizeof(result));
1470
1471         DEBUG(10, ("fruit_inode \"%s\": ino=0x%llu\n",
1472                    sname, (unsigned long long)result));
1473
1474         return result;
1475 }
1476
1477 /**
1478  * Ensure ad_fsp is still valid
1479  **/
1480 static bool fruit_fsp_recheck(struct adouble *ad, files_struct *fsp)
1481 {
1482         if (ad->ad_fsp == fsp) {
1483                 return true;
1484         }
1485         ad->ad_fsp = fsp;
1486
1487         return true;
1488 }
1489
1490 static bool add_fruit_stream(TALLOC_CTX *mem_ctx, unsigned int *num_streams,
1491                              struct stream_struct **streams,
1492                              const char *name, off_t size,
1493                              off_t alloc_size)
1494 {
1495         struct stream_struct *tmp;
1496
1497         tmp = talloc_realloc(mem_ctx, *streams, struct stream_struct,
1498                              (*num_streams)+1);
1499         if (tmp == NULL) {
1500                 return false;
1501         }
1502
1503         tmp[*num_streams].name = talloc_asprintf(tmp, "%s:$DATA", name);
1504         if (tmp[*num_streams].name == NULL) {
1505                 return false;
1506         }
1507
1508         tmp[*num_streams].size = size;
1509         tmp[*num_streams].alloc_size = alloc_size;
1510
1511         *streams = tmp;
1512         *num_streams += 1;
1513         return true;
1514 }
1515
1516 static bool empty_finderinfo(const struct adouble *ad)
1517 {
1518
1519         char emptybuf[ADEDLEN_FINDERI] = {0};
1520         if (memcmp(emptybuf,
1521                    ad_entry(ad, ADEID_FINDERI),
1522                    ADEDLEN_FINDERI) == 0) {
1523                 return true;
1524         }
1525         return false;
1526 }
1527
1528 /**
1529  * Update btime with btime from Netatalk
1530  **/
1531 static void update_btime(vfs_handle_struct *handle,
1532                          struct smb_filename *smb_fname)
1533 {
1534         uint32_t t;
1535         struct timespec creation_time = {0};
1536         struct adouble *ad;
1537
1538         ad = ad_get(talloc_tos(), handle, smb_fname->base_name, ADOUBLE_META);
1539         if (ad == NULL) {
1540                 return;
1541         }
1542         if (ad_getdate(ad, AD_DATE_UNIX | AD_DATE_CREATE, &t) != 0) {
1543                 TALLOC_FREE(ad);
1544                 return;
1545         }
1546         TALLOC_FREE(ad);
1547
1548         creation_time.tv_sec = convert_uint32_t_to_time_t(t);
1549         update_stat_ex_create_time(&smb_fname->st, creation_time);
1550
1551         return;
1552 }
1553
1554 /**
1555  * Map an access mask to a Netatalk single byte byte range lock
1556  **/
1557 static off_t access_to_netatalk_brl(enum apple_fork fork_type,
1558                                     uint32_t access_mask)
1559 {
1560         off_t offset;
1561
1562         switch (access_mask) {
1563         case FILE_READ_DATA:
1564                 offset = AD_FILELOCK_OPEN_RD;
1565                 break;
1566
1567         case FILE_WRITE_DATA:
1568         case FILE_APPEND_DATA:
1569                 offset = AD_FILELOCK_OPEN_WR;
1570                 break;
1571
1572         default:
1573                 offset = AD_FILELOCK_OPEN_NONE;
1574                 break;
1575         }
1576
1577         if (fork_type == APPLE_FORK_RSRC) {
1578                 if (offset == AD_FILELOCK_OPEN_NONE) {
1579                         offset = AD_FILELOCK_RSRC_OPEN_NONE;
1580                 } else {
1581                         offset += 2;
1582                 }
1583         }
1584
1585         return offset;
1586 }
1587
1588 /**
1589  * Map a deny mode to a Netatalk brl
1590  **/
1591 static off_t denymode_to_netatalk_brl(enum apple_fork fork_type,
1592                                       uint32_t deny_mode)
1593 {
1594         off_t offset;
1595
1596         switch (deny_mode) {
1597         case DENY_READ:
1598                 offset = AD_FILELOCK_DENY_RD;
1599                 break;
1600
1601         case DENY_WRITE:
1602                 offset = AD_FILELOCK_DENY_WR;
1603                 break;
1604
1605         default:
1606                 smb_panic("denymode_to_netatalk_brl: bad deny mode\n");
1607         }
1608
1609         if (fork_type == APPLE_FORK_RSRC) {
1610                 offset += 2;
1611         }
1612
1613         return offset;
1614 }
1615
1616 /**
1617  * Call fcntl() with an exclusive F_GETLK request in order to
1618  * determine if there's an exisiting shared lock
1619  *
1620  * @return true if the requested lock was found or any error occured
1621  *         false if the lock was not found
1622  **/
1623 static bool test_netatalk_lock(files_struct *fsp, off_t in_offset)
1624 {
1625         bool result;
1626         off_t offset = in_offset;
1627         off_t len = 1;
1628         int type = F_WRLCK;
1629         pid_t pid;
1630
1631         result = SMB_VFS_GETLOCK(fsp, &offset, &len, &type, &pid);
1632         if (result == false) {
1633                 return true;
1634         }
1635
1636         if (type != F_UNLCK) {
1637                 return true;
1638         }
1639
1640         return false;
1641 }
1642
1643 static NTSTATUS fruit_check_access(vfs_handle_struct *handle,
1644                                    files_struct *fsp,
1645                                    uint32_t access_mask,
1646                                    uint32_t deny_mode)
1647 {
1648         NTSTATUS status = NT_STATUS_OK;
1649         struct byte_range_lock *br_lck = NULL;
1650         bool open_for_reading, open_for_writing, deny_read, deny_write;
1651         off_t off;
1652
1653         /* FIXME: hardcoded data fork, add resource fork */
1654         enum apple_fork fork_type = APPLE_FORK_DATA;
1655
1656         DEBUG(10, ("fruit_check_access: %s, am: %s/%s, dm: %s/%s\n",
1657                   fsp_str_dbg(fsp),
1658                   access_mask & FILE_READ_DATA ? "READ" :"-",
1659                   access_mask & FILE_WRITE_DATA ? "WRITE" : "-",
1660                   deny_mode & DENY_READ ? "DENY_READ" : "-",
1661                   deny_mode & DENY_WRITE ? "DENY_WRITE" : "-"));
1662
1663         /*
1664          * Check read access and deny read mode
1665          */
1666         if ((access_mask & FILE_READ_DATA) || (deny_mode & DENY_READ)) {
1667                 /* Check access */
1668                 open_for_reading = test_netatalk_lock(
1669                         fsp, access_to_netatalk_brl(fork_type, FILE_READ_DATA));
1670
1671                 deny_read = test_netatalk_lock(
1672                         fsp, denymode_to_netatalk_brl(fork_type, DENY_READ));
1673
1674                 DEBUG(10, ("read: %s, deny_write: %s\n",
1675                           open_for_reading == true ? "yes" : "no",
1676                           deny_read == true ? "yes" : "no"));
1677
1678                 if (((access_mask & FILE_READ_DATA) && deny_read)
1679                     || ((deny_mode & DENY_READ) && open_for_reading)) {
1680                         return NT_STATUS_SHARING_VIOLATION;
1681                 }
1682
1683                 /* Set locks */
1684                 if (access_mask & FILE_READ_DATA) {
1685                         off = access_to_netatalk_brl(fork_type, FILE_READ_DATA);
1686                         br_lck = do_lock(
1687                                 handle->conn->sconn->msg_ctx, fsp,
1688                                 fsp->op->global->open_persistent_id, 1, off,
1689                                 READ_LOCK, POSIX_LOCK, false,
1690                                 &status, NULL);
1691
1692                         if (!NT_STATUS_IS_OK(status))  {
1693                                 return status;
1694                         }
1695                         TALLOC_FREE(br_lck);
1696                 }
1697
1698                 if (deny_mode & DENY_READ) {
1699                         off = denymode_to_netatalk_brl(fork_type, DENY_READ);
1700                         br_lck = do_lock(
1701                                 handle->conn->sconn->msg_ctx, fsp,
1702                                 fsp->op->global->open_persistent_id, 1, off,
1703                                 READ_LOCK, POSIX_LOCK, false,
1704                                 &status, NULL);
1705
1706                         if (!NT_STATUS_IS_OK(status)) {
1707                                 return status;
1708                         }
1709                         TALLOC_FREE(br_lck);
1710                 }
1711         }
1712
1713         /*
1714          * Check write access and deny write mode
1715          */
1716         if ((access_mask & FILE_WRITE_DATA) || (deny_mode & DENY_WRITE)) {
1717                 /* Check access */
1718                 open_for_writing = test_netatalk_lock(
1719                         fsp, access_to_netatalk_brl(fork_type, FILE_WRITE_DATA));
1720
1721                 deny_write = test_netatalk_lock(
1722                         fsp, denymode_to_netatalk_brl(fork_type, DENY_WRITE));
1723
1724                 DEBUG(10, ("write: %s, deny_write: %s\n",
1725                           open_for_writing == true ? "yes" : "no",
1726                           deny_write == true ? "yes" : "no"));
1727
1728                 if (((access_mask & FILE_WRITE_DATA) && deny_write)
1729                     || ((deny_mode & DENY_WRITE) && open_for_writing)) {
1730                         return NT_STATUS_SHARING_VIOLATION;
1731                 }
1732
1733                 /* Set locks */
1734                 if (access_mask & FILE_WRITE_DATA) {
1735                         off = access_to_netatalk_brl(fork_type, FILE_WRITE_DATA);
1736                         br_lck = do_lock(
1737                                 handle->conn->sconn->msg_ctx, fsp,
1738                                 fsp->op->global->open_persistent_id, 1, off,
1739                                 READ_LOCK, POSIX_LOCK, false,
1740                                 &status, NULL);
1741
1742                         if (!NT_STATUS_IS_OK(status)) {
1743                                 return status;
1744                         }
1745                         TALLOC_FREE(br_lck);
1746
1747                 }
1748                 if (deny_mode & DENY_WRITE) {
1749                         off = denymode_to_netatalk_brl(fork_type, DENY_WRITE);
1750                         br_lck = do_lock(
1751                                 handle->conn->sconn->msg_ctx, fsp,
1752                                 fsp->op->global->open_persistent_id, 1, off,
1753                                 READ_LOCK, POSIX_LOCK, false,
1754                                 &status, NULL);
1755
1756                         if (!NT_STATUS_IS_OK(status)) {
1757                                 return status;
1758                         }
1759                         TALLOC_FREE(br_lck);
1760                 }
1761         }
1762
1763         TALLOC_FREE(br_lck);
1764
1765         return status;
1766 }
1767
1768 static NTSTATUS check_aapl(vfs_handle_struct *handle,
1769                            struct smb_request *req,
1770                            const struct smb2_create_blobs *in_context_blobs,
1771                            struct smb2_create_blobs *out_context_blobs)
1772 {
1773         struct fruit_config_data *config;
1774         NTSTATUS status;
1775         struct smb2_create_blob *aapl = NULL;
1776         uint32_t cmd;
1777         bool ok;
1778         uint8_t p[16];
1779         DATA_BLOB blob = data_blob_talloc(req, NULL, 0);
1780         uint64_t req_bitmap, client_caps;
1781         uint64_t server_caps = SMB2_CRTCTX_AAPL_UNIX_BASED;
1782         smb_ucs2_t *model;
1783         size_t modellen;
1784
1785         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
1786                                 return NT_STATUS_UNSUCCESSFUL);
1787
1788         if (!config->use_aapl
1789             || in_context_blobs == NULL
1790             || out_context_blobs == NULL) {
1791                 return NT_STATUS_OK;
1792         }
1793
1794         aapl = smb2_create_blob_find(in_context_blobs,
1795                                      SMB2_CREATE_TAG_AAPL);
1796         if (aapl == NULL) {
1797                 return NT_STATUS_OK;
1798         }
1799
1800         if (aapl->data.length != 24) {
1801                 DEBUG(1, ("unexpected AAPL ctxt legnth: %ju\n",
1802                           (uintmax_t)aapl->data.length));
1803                 return NT_STATUS_INVALID_PARAMETER;
1804         }
1805
1806         cmd = IVAL(aapl->data.data, 0);
1807         if (cmd != SMB2_CRTCTX_AAPL_SERVER_QUERY) {
1808                 DEBUG(1, ("unsupported AAPL cmd: %d\n", cmd));
1809                 return NT_STATUS_INVALID_PARAMETER;
1810         }
1811
1812         req_bitmap = BVAL(aapl->data.data, 8);
1813         client_caps = BVAL(aapl->data.data, 16);
1814
1815         SIVAL(p, 0, SMB2_CRTCTX_AAPL_SERVER_QUERY);
1816         SIVAL(p, 4, 0);
1817         SBVAL(p, 8, req_bitmap);
1818         ok = data_blob_append(req, &blob, p, 16);
1819         if (!ok) {
1820                 return NT_STATUS_UNSUCCESSFUL;
1821         }
1822
1823         if (req_bitmap & SMB2_CRTCTX_AAPL_SERVER_CAPS) {
1824                 if ((client_caps & SMB2_CRTCTX_AAPL_SUPPORTS_READ_DIR_ATTR) &&
1825                     (handle->conn->tcon->compat->fs_capabilities & FILE_NAMED_STREAMS)) {
1826                         server_caps |= SMB2_CRTCTX_AAPL_SUPPORTS_READ_DIR_ATTR;
1827                         config->readdir_attr_enabled = true;
1828                 }
1829
1830                 /*
1831                  * The client doesn't set the flag, so we can't check
1832                  * for it and just set it unconditionally
1833                  */
1834                 server_caps |= SMB2_CRTCTX_AAPL_SUPPORTS_NFS_ACE;
1835                 config->unix_info_enabled = true;
1836
1837                 SBVAL(p, 0, server_caps);
1838                 ok = data_blob_append(req, &blob, p, 8);
1839                 if (!ok) {
1840                         return NT_STATUS_UNSUCCESSFUL;
1841                 }
1842         }
1843
1844         if (req_bitmap & SMB2_CRTCTX_AAPL_VOLUME_CAPS) {
1845                 SBVAL(p, 0,
1846                       lp_case_sensitive(SNUM(handle->conn->tcon->compat)) ?
1847                       SMB2_CRTCTX_AAPL_CASE_SENSITIVE : 0);
1848                 ok = data_blob_append(req, &blob, p, 8);
1849                 if (!ok) {
1850                         return NT_STATUS_UNSUCCESSFUL;
1851                 }
1852         }
1853
1854         if (req_bitmap & SMB2_CRTCTX_AAPL_MODEL_INFO) {
1855                 ok = convert_string_talloc(req,
1856                                            CH_UNIX, CH_UTF16LE,
1857                                            "Samba", strlen("Samba"),
1858                                            &model, &modellen);
1859                 if (!ok) {
1860                         return NT_STATUS_UNSUCCESSFUL;
1861                 }
1862
1863                 SIVAL(p, 0, 0);
1864                 SIVAL(p + 4, 0, modellen);
1865                 ok = data_blob_append(req, &blob, p, 8);
1866                 if (!ok) {
1867                         talloc_free(model);
1868                         return NT_STATUS_UNSUCCESSFUL;
1869                 }
1870
1871                 ok = data_blob_append(req, &blob, model, modellen);
1872                 talloc_free(model);
1873                 if (!ok) {
1874                         return NT_STATUS_UNSUCCESSFUL;
1875                 }
1876         }
1877
1878         status = smb2_create_blob_add(out_context_blobs,
1879                                       out_context_blobs,
1880                                       SMB2_CREATE_TAG_AAPL,
1881                                       blob);
1882
1883         return status;
1884 }
1885
1886 static NTSTATUS readdir_attr_macmeta(struct vfs_handle_struct *handle,
1887                                      const struct smb_filename *smb_fname,
1888                                      struct readdir_attr_data *attr_data)
1889 {
1890         NTSTATUS status = NT_STATUS_OK;
1891         uint32_t date_added;
1892         struct adouble *ad = NULL;
1893         struct fruit_config_data *config = NULL;
1894
1895         SMB_VFS_HANDLE_GET_DATA(handle, config,
1896                                 struct fruit_config_data,
1897                                 return NT_STATUS_UNSUCCESSFUL);
1898
1899
1900         /* Ensure we return a default value in the creation_date field */
1901         RSIVAL(&attr_data->attr_data.aapl.finder_info, 12, AD_DATE_START);
1902
1903         /*
1904          * Resource fork length
1905          */
1906
1907         if (config->readdir_attr_rsize) {
1908                 ad = ad_get(talloc_tos(), handle, smb_fname->base_name,
1909                             ADOUBLE_RSRC);
1910                 if (ad) {
1911                         attr_data->attr_data.aapl.rfork_size = ad_getentrylen(
1912                                 ad, ADEID_RFORK);
1913                         TALLOC_FREE(ad);
1914                 }
1915         }
1916
1917         /*
1918          * FinderInfo
1919          */
1920
1921         if (config->readdir_attr_finder_info) {
1922                 ad = ad_get(talloc_tos(), handle, smb_fname->base_name,
1923                             ADOUBLE_META);
1924                 if (ad) {
1925                         if (S_ISREG(smb_fname->st.st_ex_mode)) {
1926                                 /* finder_type */
1927                                 memcpy(&attr_data->attr_data.aapl.finder_info[0],
1928                                        ad_entry(ad, ADEID_FINDERI), 4);
1929
1930                                 /* finder_creator */
1931                                 memcpy(&attr_data->attr_data.aapl.finder_info[0] + 4,
1932                                        ad_entry(ad, ADEID_FINDERI) + 4, 4);
1933                         }
1934
1935                         /* finder_flags */
1936                         memcpy(&attr_data->attr_data.aapl.finder_info[0] + 8,
1937                                ad_entry(ad, ADEID_FINDERI) + 8, 2);
1938
1939                         /* finder_ext_flags */
1940                         memcpy(&attr_data->attr_data.aapl.finder_info[0] + 10,
1941                                ad_entry(ad, ADEID_FINDERI) + 24, 2);
1942
1943                         /* creation date */
1944                         date_added = convert_time_t_to_uint32_t(
1945                                 smb_fname->st.st_ex_btime.tv_sec - AD_DATE_DELTA);
1946                         RSIVAL(&attr_data->attr_data.aapl.finder_info[0], 12, date_added);
1947
1948                         TALLOC_FREE(ad);
1949                 }
1950         }
1951
1952         TALLOC_FREE(ad);
1953         return status;
1954 }
1955
1956 /* Search MS NFS style ACE with UNIX mode */
1957 static NTSTATUS check_ms_nfs(vfs_handle_struct *handle,
1958                              files_struct *fsp,
1959                              const struct security_descriptor *psd,
1960                              mode_t *pmode,
1961                              bool *pdo_chmod)
1962 {
1963         int i;
1964         struct fruit_config_data *config = NULL;
1965
1966         *pdo_chmod = false;
1967
1968         SMB_VFS_HANDLE_GET_DATA(handle, config,
1969                                 struct fruit_config_data,
1970                                 return NT_STATUS_UNSUCCESSFUL);
1971
1972         if (psd->dacl == NULL || !config->unix_info_enabled) {
1973                 return NT_STATUS_OK;
1974         }
1975
1976         for (i = 0; i < psd->dacl->num_aces; i++) {
1977                 if (dom_sid_compare_domain(
1978                             &global_sid_Unix_NFS_Mode,
1979                             &psd->dacl->aces[i].trustee) == 0) {
1980                         *pmode = (mode_t)psd->dacl->aces[i].trustee.sub_auths[2];
1981                         *pmode &= (S_IRWXU | S_IRWXG | S_IRWXO);
1982                         *pdo_chmod = true;
1983
1984                         DEBUG(10, ("MS NFS chmod request %s, %04o\n",
1985                                    fsp_str_dbg(fsp), *pmode));
1986                         break;
1987                 }
1988         }
1989
1990         return NT_STATUS_OK;
1991 }
1992
1993 /****************************************************************************
1994  * VFS ops
1995  ****************************************************************************/
1996
1997 static int fruit_connect(vfs_handle_struct *handle,
1998                          const char *service,
1999                          const char *user)
2000 {
2001         int rc;
2002         char *list = NULL, *newlist = NULL;
2003         struct fruit_config_data *config;
2004
2005         DEBUG(10, ("fruit_connect\n"));
2006
2007         rc = SMB_VFS_NEXT_CONNECT(handle, service, user);
2008         if (rc < 0) {
2009                 return rc;
2010         }
2011
2012         list = lp_veto_files(talloc_tos(), SNUM(handle->conn));
2013
2014         if (list) {
2015                 if (strstr(list, "/" ADOUBLE_NAME_PREFIX "*/") == NULL) {
2016                         newlist = talloc_asprintf(
2017                                 list,
2018                                 "%s/" ADOUBLE_NAME_PREFIX "*/",
2019                                 list);
2020                         lp_do_parameter(SNUM(handle->conn),
2021                                         "veto files",
2022                                         newlist);
2023                 }
2024         } else {
2025                 lp_do_parameter(SNUM(handle->conn),
2026                                 "veto files",
2027                                 "/" ADOUBLE_NAME_PREFIX "*/");
2028         }
2029
2030         TALLOC_FREE(list);
2031
2032         rc = init_fruit_config(handle);
2033         if (rc != 0) {
2034                 return rc;
2035         }
2036
2037         SMB_VFS_HANDLE_GET_DATA(handle, config,
2038                                 struct fruit_config_data, return -1);
2039
2040         if (config->encoding == FRUIT_ENC_NATIVE) {
2041                 lp_do_parameter(
2042                         SNUM(handle->conn),
2043                         "catia:mappings",
2044                         "0x22:0xf020,0x2a:0xf021,0x3a:0xf022,0x3c:0xf023,"
2045                         "0x3e:0xf024,0x3f:0xf025,0x5c:0xf026,0x7c:0xf027,"
2046                         "0x0d:0xf00d");
2047         }
2048
2049         return rc;
2050 }
2051
2052 static int fruit_open_meta(vfs_handle_struct *handle,
2053                            struct smb_filename *smb_fname,
2054                            files_struct *fsp, int flags, mode_t mode)
2055 {
2056         int rc = 0;
2057         struct fruit_config_data *config = NULL;
2058         struct smb_filename *smb_fname_base = NULL;
2059         int baseflags;
2060         int hostfd = -1;
2061         struct adouble *ad = NULL;
2062
2063         DEBUG(10, ("fruit_open_meta for %s\n", smb_fname_str_dbg(smb_fname)));
2064
2065         SMB_VFS_HANDLE_GET_DATA(handle, config,
2066                                 struct fruit_config_data, return -1);
2067
2068         if (config->meta == FRUIT_META_STREAM) {
2069                 return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2070         }
2071
2072         /* Create an smb_filename with stream_name == NULL. */
2073         smb_fname_base = synthetic_smb_fname(talloc_tos(),
2074                                              smb_fname->base_name, NULL, NULL);
2075
2076         if (smb_fname_base == NULL) {
2077                 errno = ENOMEM;
2078                 rc = -1;
2079                 goto exit;
2080         }
2081
2082         /*
2083          * We use baseflags to turn off nasty side-effects when opening the
2084          * underlying file.
2085          */
2086         baseflags = flags;
2087         baseflags &= ~O_TRUNC;
2088         baseflags &= ~O_EXCL;
2089         baseflags &= ~O_CREAT;
2090
2091         hostfd = SMB_VFS_OPEN(handle->conn, smb_fname_base, fsp,
2092                               baseflags, mode);
2093
2094         /*
2095          * It is legit to open a stream on a directory, but the base
2096          * fd has to be read-only.
2097          */
2098         if ((hostfd == -1) && (errno == EISDIR)) {
2099                 baseflags &= ~O_ACCMODE;
2100                 baseflags |= O_RDONLY;
2101                 hostfd = SMB_VFS_OPEN(handle->conn, smb_fname_base, fsp,
2102                                       baseflags, mode);
2103         }
2104
2105         TALLOC_FREE(smb_fname_base);
2106
2107         if (hostfd == -1) {
2108                 rc = -1;
2109                 goto exit;
2110         }
2111
2112         if (flags & (O_CREAT | O_TRUNC)) {
2113                 /*
2114                  * The attribute does not exist or needs to be truncated,
2115                  * create an AppleDouble EA
2116                  */
2117                 ad = ad_init(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2118                              handle, ADOUBLE_META, fsp);
2119                 if (ad == NULL) {
2120                         rc = -1;
2121                         goto exit;
2122                 }
2123
2124                 rc = ad_write(ad, smb_fname->base_name);
2125                 if (rc != 0) {
2126                         rc = -1;
2127                         goto exit;
2128                 }
2129         } else {
2130                 ad = ad_alloc(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2131                               handle, ADOUBLE_META, fsp);
2132                 if (ad == NULL) {
2133                         rc = -1;
2134                         goto exit;
2135                 }
2136                 if (ad_read(ad, smb_fname->base_name) == -1) {
2137                         rc = -1;
2138                         goto exit;
2139                 }
2140         }
2141
2142 exit:
2143         DEBUG(10, ("fruit_open meta rc=%d, fd=%d\n", rc, hostfd));
2144         if (rc != 0) {
2145                 int saved_errno = errno;
2146                 if (hostfd >= 0) {
2147                         /*
2148                          * BUGBUGBUG -- we would need to call
2149                          * fd_close_posix here, but we don't have a
2150                          * full fsp yet
2151                          */
2152                         fsp->fh->fd = hostfd;
2153                         SMB_VFS_CLOSE(fsp);
2154                 }
2155                 hostfd = -1;
2156                 errno = saved_errno;
2157         }
2158         return hostfd;
2159 }
2160
2161 static int fruit_open_rsrc(vfs_handle_struct *handle,
2162                            struct smb_filename *smb_fname,
2163                            files_struct *fsp, int flags, mode_t mode)
2164 {
2165         int rc = 0;
2166         struct fruit_config_data *config = NULL;
2167         struct adouble *ad = NULL;
2168         struct smb_filename *smb_fname_base = NULL;
2169         char *adpath = NULL;
2170         int hostfd = -1;
2171
2172         DEBUG(10, ("fruit_open_rsrc for %s\n", smb_fname_str_dbg(smb_fname)));
2173
2174         SMB_VFS_HANDLE_GET_DATA(handle, config,
2175                                 struct fruit_config_data, return -1);
2176
2177         switch (config->rsrc) {
2178         case FRUIT_RSRC_STREAM:
2179                 return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2180         case FRUIT_RSRC_XATTR:
2181 #ifdef HAVE_ATTROPEN
2182                 hostfd = attropen(smb_fname->base_name,
2183                                   AFPRESOURCE_EA_NETATALK, flags, mode);
2184                 if (hostfd == -1) {
2185                         return -1;
2186                 }
2187                 ad = ad_init(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2188                              handle, ADOUBLE_RSRC, fsp);
2189                 if (ad == NULL) {
2190                         rc = -1;
2191                         goto exit;
2192                 }
2193                 goto exit;
2194 #else
2195                 errno = ENOTSUP;
2196                 return -1;
2197 #endif
2198         default:
2199                 break;
2200         }
2201
2202         if (!(flags & O_CREAT) && !VALID_STAT(smb_fname->st)) {
2203                 rc = SMB_VFS_NEXT_STAT(handle, smb_fname);
2204                 if (rc != 0) {
2205                         rc = -1;
2206                         goto exit;
2207                 }
2208         }
2209
2210         if (VALID_STAT(smb_fname->st) && S_ISDIR(smb_fname->st.st_ex_mode)) {
2211                 /* sorry, but directories don't habe a resource fork */
2212                 rc = -1;
2213                 goto exit;
2214         }
2215
2216         rc = adouble_path(talloc_tos(), smb_fname->base_name, &adpath);
2217         if (rc != 0) {
2218                 goto exit;
2219         }
2220
2221         /* Create an smb_filename with stream_name == NULL. */
2222         smb_fname_base = synthetic_smb_fname(talloc_tos(),
2223                                              adpath, NULL, NULL);
2224         if (smb_fname_base == NULL) {
2225                 errno = ENOMEM;
2226                 rc = -1;
2227                 goto exit;
2228         }
2229
2230         /* Sanitize flags */
2231         if (flags & O_WRONLY) {
2232                 /* We always need read access for the metadata header too */
2233                 flags &= ~O_WRONLY;
2234                 flags |= O_RDWR;
2235         }
2236
2237         hostfd = SMB_VFS_OPEN(handle->conn, smb_fname_base, fsp,
2238                               flags, mode);
2239         if (hostfd == -1) {
2240                 rc = -1;
2241                 goto exit;
2242         }
2243
2244         /* REVIEW: we need this in ad_write() */
2245         fsp->fh->fd = hostfd;
2246
2247         if (flags & (O_CREAT | O_TRUNC)) {
2248                 ad = ad_init(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2249                              handle, ADOUBLE_RSRC, fsp);
2250                 if (ad == NULL) {
2251                         rc = -1;
2252                         goto exit;
2253                 }
2254                 rc = ad_write(ad, smb_fname->base_name);
2255                 if (rc != 0) {
2256                         rc = -1;
2257                         goto exit;
2258                 }
2259         } else {
2260                 ad = ad_alloc(VFS_MEMCTX_FSP_EXTENSION(handle, fsp),
2261                               handle, ADOUBLE_RSRC, fsp);
2262                 if (ad == NULL) {
2263                         rc = -1;
2264                         goto exit;
2265                 }
2266                 if (ad_read(ad, smb_fname->base_name) == -1) {
2267                         rc = -1;
2268                         goto exit;
2269                 }
2270         }
2271
2272 exit:
2273
2274         TALLOC_FREE(adpath);
2275         TALLOC_FREE(smb_fname_base);
2276
2277         DEBUG(10, ("fruit_open resource fork: rc=%d, fd=%d\n", rc, hostfd));
2278         if (rc != 0) {
2279                 int saved_errno = errno;
2280                 if (hostfd >= 0) {
2281                         /*
2282                          * BUGBUGBUG -- we would need to call
2283                          * fd_close_posix here, but we don't have a
2284                          * full fsp yet
2285                          */
2286                         fsp->fh->fd = hostfd;
2287                         SMB_VFS_CLOSE(fsp);
2288                 }
2289                 hostfd = -1;
2290                 errno = saved_errno;
2291         }
2292         return hostfd;
2293 }
2294
2295 static int fruit_open(vfs_handle_struct *handle,
2296                       struct smb_filename *smb_fname,
2297                       files_struct *fsp, int flags, mode_t mode)
2298 {
2299         DEBUG(10, ("fruit_open called for %s\n",
2300                    smb_fname_str_dbg(smb_fname)));
2301
2302         if (!is_ntfs_stream_smb_fname(smb_fname)) {
2303                 return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2304         }
2305
2306         if (is_afpinfo_stream(smb_fname)) {
2307                 return fruit_open_meta(handle, smb_fname, fsp, flags, mode);
2308         } else if (is_afpresource_stream(smb_fname)) {
2309                 return fruit_open_rsrc(handle, smb_fname, fsp, flags, mode);
2310         }
2311
2312         return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2313 }
2314
2315 static int fruit_rename(struct vfs_handle_struct *handle,
2316                         const struct smb_filename *smb_fname_src,
2317                         const struct smb_filename *smb_fname_dst)
2318 {
2319         int rc = -1;
2320         char *src_adouble_path = NULL;
2321         char *dst_adouble_path = NULL;
2322         struct fruit_config_data *config = NULL;
2323
2324         rc = SMB_VFS_NEXT_RENAME(handle, smb_fname_src, smb_fname_dst);
2325
2326         if (!VALID_STAT(smb_fname_src->st)
2327             || !S_ISREG(smb_fname_src->st.st_ex_mode)) {
2328                 return rc;
2329         }
2330
2331         SMB_VFS_HANDLE_GET_DATA(handle, config,
2332                                 struct fruit_config_data, return -1);
2333
2334         if (config->rsrc == FRUIT_RSRC_XATTR) {
2335                 return rc;
2336         }
2337
2338         rc = adouble_path(talloc_tos(), smb_fname_src->base_name,
2339                           &src_adouble_path);
2340         if (rc != 0) {
2341                 goto done;
2342         }
2343         rc = adouble_path(talloc_tos(), smb_fname_dst->base_name,
2344                           &dst_adouble_path);
2345         if (rc != 0) {
2346                 goto done;
2347         }
2348
2349         DEBUG(10, ("fruit_rename: %s -> %s\n",
2350                    src_adouble_path, dst_adouble_path));
2351
2352         rc = rename(src_adouble_path, dst_adouble_path);
2353         if (errno == ENOENT) {
2354                 rc = 0;
2355         }
2356
2357         TALLOC_FREE(src_adouble_path);
2358         TALLOC_FREE(dst_adouble_path);
2359
2360 done:
2361         return rc;
2362 }
2363
2364 static int fruit_unlink(vfs_handle_struct *handle,
2365                         const struct smb_filename *smb_fname)
2366 {
2367         int rc = -1;
2368         struct fruit_config_data *config = NULL;
2369         char *adp = NULL;
2370
2371         if (!is_ntfs_stream_smb_fname(smb_fname)) {
2372                 return SMB_VFS_NEXT_UNLINK(handle, smb_fname);
2373         }
2374
2375         SMB_VFS_HANDLE_GET_DATA(handle, config,
2376                                 struct fruit_config_data, return -1);
2377
2378         if (is_afpinfo_stream(smb_fname)) {
2379                 if (config->meta == FRUIT_META_STREAM) {
2380                         rc = SMB_VFS_NEXT_UNLINK(handle, smb_fname);
2381                 } else {
2382                         rc = SMB_VFS_REMOVEXATTR(handle->conn,
2383                                                  smb_fname->base_name,
2384                                                  AFPINFO_EA_NETATALK);
2385                 }
2386         } else if (is_afpresource_stream(smb_fname)) {
2387                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
2388                         rc = adouble_path(talloc_tos(),
2389                                           smb_fname->base_name, &adp);
2390                         if (rc != 0) {
2391                                 return -1;
2392                         }
2393                         /* FIXME: direct unlink(), missing smb_fname */
2394                         rc = unlink(adp);
2395                         if ((rc == -1) && (errno == ENOENT)) {
2396                                 rc = 0;
2397                         }
2398                 } else {
2399                         rc = SMB_VFS_REMOVEXATTR(handle->conn,
2400                                      smb_fname->base_name,
2401                                      AFPRESOURCE_EA_NETATALK);
2402                 }
2403         } else {
2404                 rc = SMB_VFS_NEXT_UNLINK(handle, smb_fname);
2405         }
2406
2407         TALLOC_FREE(adp);
2408         return rc;
2409 }
2410
2411 static int fruit_chmod(vfs_handle_struct *handle,
2412                        const char *path,
2413                        mode_t mode)
2414 {
2415         int rc = -1;
2416         char *adp = NULL;
2417         struct fruit_config_data *config = NULL;
2418         SMB_STRUCT_STAT sb;
2419
2420         rc = SMB_VFS_NEXT_CHMOD(handle, path, mode);
2421         if (rc != 0) {
2422                 return rc;
2423         }
2424
2425         SMB_VFS_HANDLE_GET_DATA(handle, config,
2426                                 struct fruit_config_data, return -1);
2427
2428         if (config->rsrc == FRUIT_RSRC_XATTR) {
2429                 return 0;
2430         }
2431
2432         /* FIXME: direct sys_lstat(), missing smb_fname */
2433         rc = sys_lstat(path, &sb, false);
2434         if (rc != 0 || !S_ISREG(sb.st_ex_mode)) {
2435                 return rc;
2436         }
2437
2438         rc = adouble_path(talloc_tos(), path, &adp);
2439         if (rc != 0) {
2440                 return -1;
2441         }
2442
2443         DEBUG(10, ("fruit_chmod: %s\n", adp));
2444
2445         rc = SMB_VFS_NEXT_CHMOD(handle, adp, mode);
2446         if (errno == ENOENT) {
2447                 rc = 0;
2448         }
2449
2450         TALLOC_FREE(adp);
2451         return rc;
2452 }
2453
2454 static int fruit_chown(vfs_handle_struct *handle,
2455                        const char *path,
2456                        uid_t uid,
2457                        gid_t gid)
2458 {
2459         int rc = -1;
2460         char *adp = NULL;
2461         struct fruit_config_data *config = NULL;
2462         SMB_STRUCT_STAT sb;
2463
2464         rc = SMB_VFS_NEXT_CHOWN(handle, path, uid, gid);
2465         if (rc != 0) {
2466                 return rc;
2467         }
2468
2469         SMB_VFS_HANDLE_GET_DATA(handle, config,
2470                                 struct fruit_config_data, return -1);
2471
2472         if (config->rsrc == FRUIT_RSRC_XATTR) {
2473                 return rc;
2474         }
2475
2476         /* FIXME: direct sys_lstat(), missing smb_fname */
2477         rc = sys_lstat(path, &sb, false);
2478         if (rc != 0 || !S_ISREG(sb.st_ex_mode)) {
2479                 return rc;
2480         }
2481
2482         rc = adouble_path(talloc_tos(), path, &adp);
2483         if (rc != 0) {
2484                 goto done;
2485         }
2486
2487         DEBUG(10, ("fruit_chown: %s\n", adp));
2488
2489         rc = SMB_VFS_NEXT_CHOWN(handle, adp, uid, gid);
2490         if (errno == ENOENT) {
2491                 rc = 0;
2492         }
2493
2494  done:
2495         TALLOC_FREE(adp);
2496         return rc;
2497 }
2498
2499 static int fruit_rmdir(struct vfs_handle_struct *handle, const char *path)
2500 {
2501         DIR *dh = NULL;
2502         struct dirent *de;
2503         struct fruit_config_data *config;
2504
2505         SMB_VFS_HANDLE_GET_DATA(handle, config,
2506                                 struct fruit_config_data, return -1);
2507
2508         if (!handle->conn->cwd || !path || (config->rsrc == FRUIT_RSRC_XATTR)) {
2509                 goto exit_rmdir;
2510         }
2511
2512         /*
2513          * Due to there is no way to change bDeleteVetoFiles variable
2514          * from this module, need to clean up ourselves
2515          */
2516         dh = opendir(path);
2517         if (dh == NULL) {
2518                 goto exit_rmdir;
2519         }
2520
2521         while ((de = readdir(dh)) != NULL) {
2522                 if ((strncmp(de->d_name,
2523                              ADOUBLE_NAME_PREFIX,
2524                              strlen(ADOUBLE_NAME_PREFIX))) == 0) {
2525                         char *p = talloc_asprintf(talloc_tos(),
2526                                                   "%s/%s",
2527                                                   path, de->d_name);
2528                         if (p == NULL) {
2529                                 goto exit_rmdir;
2530                         }
2531                         DEBUG(10, ("fruit_rmdir: delete %s\n", p));
2532                         (void)unlink(p);
2533                         TALLOC_FREE(p);
2534                 }
2535         }
2536
2537 exit_rmdir:
2538         if (dh) {
2539                 closedir(dh);
2540         }
2541         return SMB_VFS_NEXT_RMDIR(handle, path);
2542 }
2543
2544 static ssize_t fruit_pread(vfs_handle_struct *handle,
2545                            files_struct *fsp, void *data,
2546                            size_t n, off_t offset)
2547 {
2548         int rc = 0;
2549         struct adouble *ad = (struct adouble *)VFS_FETCH_FSP_EXTENSION(
2550                 handle, fsp);
2551         struct fruit_config_data *config = NULL;
2552         AfpInfo *ai = NULL;
2553         ssize_t len;
2554         char *name = NULL;
2555         char *tmp_base_name = NULL;
2556         NTSTATUS status;
2557
2558         DEBUG(10, ("fruit_pread: offset=%d, size=%d\n", (int)offset, (int)n));
2559
2560         if (!fsp->base_fsp) {
2561                 return SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
2562         }
2563
2564         SMB_VFS_HANDLE_GET_DATA(handle, config,
2565                                 struct fruit_config_data, return -1);
2566
2567         /* fsp_name is not converted with vfs_catia */
2568         tmp_base_name = fsp->base_fsp->fsp_name->base_name;
2569         status = SMB_VFS_TRANSLATE_NAME(handle->conn,
2570                                         fsp->base_fsp->fsp_name->base_name,
2571                                         vfs_translate_to_unix,
2572                                         talloc_tos(), &name);
2573         if (NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
2574                 name = talloc_strdup(talloc_tos(), tmp_base_name);
2575                 if (name == NULL) {
2576                         rc = -1;
2577                         goto exit;
2578                 }
2579         } else if (!NT_STATUS_IS_OK(status)) {
2580                 errno = map_errno_from_nt_status(status);
2581                 rc = -1;
2582                 goto exit;
2583         }
2584         fsp->base_fsp->fsp_name->base_name = name;
2585
2586         if (ad == NULL) {
2587                 len = SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
2588                 if (len == -1) {
2589                         rc = -1;
2590                         goto exit;
2591                 }
2592                 goto exit;
2593         }
2594
2595         if (!fruit_fsp_recheck(ad, fsp)) {
2596                 rc = -1;
2597                 goto exit;
2598         }
2599
2600         if (ad->ad_type == ADOUBLE_META) {
2601                 ai = afpinfo_new(talloc_tos());
2602                 if (ai == NULL) {
2603                         rc = -1;
2604                         goto exit;
2605                 }
2606
2607                 len = ad_read(ad, fsp->base_fsp->fsp_name->base_name);
2608                 if (len == -1) {
2609                         rc = -1;
2610                         goto exit;
2611                 }
2612
2613                 memcpy(&ai->afpi_FinderInfo[0],
2614                        ad_entry(ad, ADEID_FINDERI),
2615                        ADEDLEN_FINDERI);
2616                 len = afpinfo_pack(ai, data);
2617                 if (len != AFP_INFO_SIZE) {
2618                         rc = -1;
2619                         goto exit;
2620                 }
2621         } else {
2622                 len = SMB_VFS_NEXT_PREAD(
2623                         handle, fsp, data, n,
2624                         offset + ad_getentryoff(ad, ADEID_RFORK));
2625                 if (len == -1) {
2626                         rc = -1;
2627                         goto exit;
2628                 }
2629         }
2630 exit:
2631         fsp->base_fsp->fsp_name->base_name = tmp_base_name;
2632         TALLOC_FREE(name);
2633         TALLOC_FREE(ai);
2634         if (rc != 0) {
2635                 len = -1;
2636         }
2637         DEBUG(10, ("fruit_pread: rc=%d, len=%zd\n", rc, len));
2638         return len;
2639 }
2640
2641 static ssize_t fruit_pwrite(vfs_handle_struct *handle,
2642                             files_struct *fsp, const void *data,
2643                             size_t n, off_t offset)
2644 {
2645         int rc = 0;
2646         struct adouble *ad = (struct adouble *)VFS_FETCH_FSP_EXTENSION(
2647                 handle, fsp);
2648         struct fruit_config_data *config = NULL;
2649         AfpInfo *ai = NULL;
2650         ssize_t len;
2651         char *name = NULL;
2652         char *tmp_base_name = NULL;
2653         NTSTATUS status;
2654
2655         DEBUG(10, ("fruit_pwrite: offset=%d, size=%d\n", (int)offset, (int)n));
2656
2657         if (!fsp->base_fsp) {
2658                 return SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
2659         }
2660
2661         SMB_VFS_HANDLE_GET_DATA(handle, config,
2662                                 struct fruit_config_data, return -1);
2663
2664         tmp_base_name = fsp->base_fsp->fsp_name->base_name;
2665         status = SMB_VFS_TRANSLATE_NAME(handle->conn,
2666                                         fsp->base_fsp->fsp_name->base_name,
2667                                         vfs_translate_to_unix,
2668                                         talloc_tos(), &name);
2669         if (NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
2670                 name = talloc_strdup(talloc_tos(), tmp_base_name);
2671                 if (name == NULL) {
2672                         rc = -1;
2673                         goto exit;
2674                 }
2675         } else if (!NT_STATUS_IS_OK(status)) {
2676                 errno = map_errno_from_nt_status(status);
2677                 rc = -1;
2678                 goto exit;
2679         }
2680         fsp->base_fsp->fsp_name->base_name = name;
2681
2682         if (ad == NULL) {
2683                 len = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
2684                 if (len != n) {
2685                         rc = -1;
2686                         goto exit;
2687                 }
2688                 goto exit;
2689         }
2690
2691         if (!fruit_fsp_recheck(ad, fsp)) {
2692                 rc = -1;
2693                 goto exit;
2694         }
2695
2696         if (ad->ad_type == ADOUBLE_META) {
2697                 if (n != AFP_INFO_SIZE || offset != 0) {
2698                         DEBUG(1, ("unexpected offset=%jd or size=%jd\n",
2699                                   (intmax_t)offset, (intmax_t)n));
2700                         rc = -1;
2701                         goto exit;
2702                 }
2703                 ai = afpinfo_unpack(talloc_tos(), data);
2704                 if (ai == NULL) {
2705                         rc = -1;
2706                         goto exit;
2707                 }
2708                 memcpy(ad_entry(ad, ADEID_FINDERI),
2709                        &ai->afpi_FinderInfo[0], ADEDLEN_FINDERI);
2710                 rc = ad_write(ad, name);
2711         } else {
2712                 len = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n,
2713                                    offset + ad_getentryoff(ad, ADEID_RFORK));
2714                 if (len != n) {
2715                         rc = -1;
2716                         goto exit;
2717                 }
2718
2719                 if (config->rsrc == FRUIT_RSRC_ADFILE) {
2720                         rc = ad_read(ad, name);
2721                         if (rc == -1) {
2722                                 goto exit;
2723                         }
2724                         rc = 0;
2725
2726                         if ((len + offset) > ad_getentrylen(ad, ADEID_RFORK)) {
2727                                 ad_setentrylen(ad, ADEID_RFORK, len + offset);
2728                                 rc = ad_write(ad, name);
2729                         }
2730                 }
2731         }
2732
2733 exit:
2734         fsp->base_fsp->fsp_name->base_name = tmp_base_name;
2735         TALLOC_FREE(name);
2736         TALLOC_FREE(ai);
2737         if (rc != 0) {
2738                 return -1;
2739         }
2740         return n;
2741 }
2742
2743 /**
2744  * Helper to stat/lstat the base file of an smb_fname.
2745  */
2746 static int fruit_stat_base(vfs_handle_struct *handle,
2747                            struct smb_filename *smb_fname,
2748                            bool follow_links)
2749 {
2750         char *tmp_stream_name;
2751         int rc;
2752
2753         tmp_stream_name = smb_fname->stream_name;
2754         smb_fname->stream_name = NULL;
2755         if (follow_links) {
2756                 rc = SMB_VFS_NEXT_STAT(handle, smb_fname);
2757         } else {
2758                 rc = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
2759         }
2760         smb_fname->stream_name = tmp_stream_name;
2761         return rc;
2762 }
2763
2764 static int fruit_stat_meta(vfs_handle_struct *handle,
2765                            struct smb_filename *smb_fname,
2766                            bool follow_links)
2767 {
2768         /* Populate the stat struct with info from the base file. */
2769         if (fruit_stat_base(handle, smb_fname, follow_links) == -1) {
2770                 return -1;
2771         }
2772         smb_fname->st.st_ex_size = AFP_INFO_SIZE;
2773         smb_fname->st.st_ex_ino = fruit_inode(&smb_fname->st,
2774                                               smb_fname->stream_name);
2775         return 0;
2776 }
2777
2778 static int fruit_stat_rsrc(vfs_handle_struct *handle,
2779                            struct smb_filename *smb_fname,
2780                            bool follow_links)
2781
2782 {
2783         struct adouble *ad = NULL;
2784
2785         DEBUG(10, ("fruit_stat_rsrc called for %s\n",
2786                    smb_fname_str_dbg(smb_fname)));
2787
2788         ad = ad_get(talloc_tos(), handle, smb_fname->base_name, ADOUBLE_RSRC);
2789         if (ad == NULL) {
2790                 errno = ENOENT;
2791                 return -1;
2792         }
2793
2794         /* Populate the stat struct with info from the base file. */
2795         if (fruit_stat_base(handle, smb_fname, follow_links) == -1) {
2796                 TALLOC_FREE(ad);
2797                 return -1;
2798         }
2799
2800         smb_fname->st.st_ex_size = ad_getentrylen(ad, ADEID_RFORK);
2801         smb_fname->st.st_ex_ino = fruit_inode(&smb_fname->st,
2802                                               smb_fname->stream_name);
2803         TALLOC_FREE(ad);
2804         return 0;
2805 }
2806
2807 static int fruit_stat(vfs_handle_struct *handle,
2808                       struct smb_filename *smb_fname)
2809 {
2810         int rc = -1;
2811
2812         DEBUG(10, ("fruit_stat called for %s\n",
2813                    smb_fname_str_dbg(smb_fname)));
2814
2815         if (!is_ntfs_stream_smb_fname(smb_fname)
2816             || is_ntfs_default_stream_smb_fname(smb_fname)) {
2817                 rc = SMB_VFS_NEXT_STAT(handle, smb_fname);
2818                 if (rc == 0) {
2819                         update_btime(handle, smb_fname);
2820                 }
2821                 return rc;
2822         }
2823
2824         /*
2825          * Note if lp_posix_paths() is true, we can never
2826          * get here as is_ntfs_stream_smb_fname() is
2827          * always false. So we never need worry about
2828          * not following links here.
2829          */
2830
2831         if (is_afpinfo_stream(smb_fname)) {
2832                 rc = fruit_stat_meta(handle, smb_fname, true);
2833         } else if (is_afpresource_stream(smb_fname)) {
2834                 rc = fruit_stat_rsrc(handle, smb_fname, true);
2835         } else {
2836                 return SMB_VFS_NEXT_STAT(handle, smb_fname);
2837         }
2838
2839         if (rc == 0) {
2840                 update_btime(handle, smb_fname);
2841                 smb_fname->st.st_ex_mode &= ~S_IFMT;
2842                 smb_fname->st.st_ex_mode |= S_IFREG;
2843                 smb_fname->st.st_ex_blocks =
2844                         smb_fname->st.st_ex_size / STAT_ST_BLOCKSIZE + 1;
2845         }
2846         return rc;
2847 }
2848
2849 static int fruit_lstat(vfs_handle_struct *handle,
2850                        struct smb_filename *smb_fname)
2851 {
2852         int rc = -1;
2853
2854         DEBUG(10, ("fruit_lstat called for %s\n",
2855                    smb_fname_str_dbg(smb_fname)));
2856
2857         if (!is_ntfs_stream_smb_fname(smb_fname)
2858             || is_ntfs_default_stream_smb_fname(smb_fname)) {
2859                 rc = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
2860                 if (rc == 0) {
2861                         update_btime(handle, smb_fname);
2862                 }
2863                 return rc;
2864         }
2865
2866         if (is_afpinfo_stream(smb_fname)) {
2867                 rc = fruit_stat_meta(handle, smb_fname, false);
2868         } else if (is_afpresource_stream(smb_fname)) {
2869                 rc = fruit_stat_rsrc(handle, smb_fname, false);
2870         } else {
2871                 return SMB_VFS_NEXT_LSTAT(handle, smb_fname);
2872         }
2873
2874         if (rc == 0) {
2875                 update_btime(handle, smb_fname);
2876                 smb_fname->st.st_ex_mode &= ~S_IFMT;
2877                 smb_fname->st.st_ex_mode |= S_IFREG;
2878                 smb_fname->st.st_ex_blocks =
2879                         smb_fname->st.st_ex_size / STAT_ST_BLOCKSIZE + 1;
2880         }
2881         return rc;
2882 }
2883
2884 static int fruit_fstat_meta(vfs_handle_struct *handle,
2885                             files_struct *fsp,
2886                             SMB_STRUCT_STAT *sbuf)
2887 {
2888         DEBUG(10, ("fruit_fstat_meta called for %s\n",
2889                    smb_fname_str_dbg(fsp->base_fsp->fsp_name)));
2890
2891         /* Populate the stat struct with info from the base file. */
2892         if (fruit_stat_base(handle, fsp->base_fsp->fsp_name, false) == -1) {
2893                 return -1;
2894         }
2895         *sbuf = fsp->base_fsp->fsp_name->st;
2896         sbuf->st_ex_size = AFP_INFO_SIZE;
2897         sbuf->st_ex_ino = fruit_inode(sbuf, fsp->fsp_name->stream_name);
2898
2899         return 0;
2900 }
2901
2902 static int fruit_fstat_rsrc(vfs_handle_struct *handle, files_struct *fsp,
2903                             SMB_STRUCT_STAT *sbuf)
2904 {
2905         struct fruit_config_data *config;
2906         struct adouble *ad = (struct adouble *)VFS_FETCH_FSP_EXTENSION(
2907                 handle, fsp);
2908
2909         DEBUG(10, ("fruit_fstat_rsrc called for %s\n",
2910                    smb_fname_str_dbg(fsp->base_fsp->fsp_name)));
2911
2912         SMB_VFS_HANDLE_GET_DATA(handle, config,
2913                                 struct fruit_config_data, return -1);
2914
2915         if (config->rsrc == FRUIT_RSRC_STREAM) {
2916                 return SMB_VFS_NEXT_FSTAT(handle, fsp, sbuf);
2917         }
2918
2919         /* Populate the stat struct with info from the base file. */
2920         if (fruit_stat_base(handle, fsp->base_fsp->fsp_name, false) == -1) {
2921                 return -1;
2922         }
2923         *sbuf = fsp->base_fsp->fsp_name->st;
2924         sbuf->st_ex_size = ad_getentrylen(ad, ADEID_RFORK);
2925         sbuf->st_ex_ino = fruit_inode(sbuf, fsp->fsp_name->stream_name);
2926
2927         DEBUG(10, ("fruit_fstat_rsrc %s, size: %zd\n",
2928                    smb_fname_str_dbg(fsp->fsp_name),
2929                    (ssize_t)sbuf->st_ex_size));
2930
2931         return 0;
2932 }
2933
2934 static int fruit_fstat(vfs_handle_struct *handle, files_struct *fsp,
2935                        SMB_STRUCT_STAT *sbuf)
2936 {
2937         int rc;
2938         char *name = NULL;
2939         char *tmp_base_name = NULL;
2940         NTSTATUS status;
2941         struct adouble *ad = (struct adouble *)
2942                 VFS_FETCH_FSP_EXTENSION(handle, fsp);
2943
2944         DEBUG(10, ("fruit_fstat called for %s\n",
2945                    smb_fname_str_dbg(fsp->fsp_name)));
2946
2947         if (fsp->base_fsp) {
2948                 tmp_base_name = fsp->base_fsp->fsp_name->base_name;
2949                 /* fsp_name is not converted with vfs_catia */
2950                 status = SMB_VFS_TRANSLATE_NAME(
2951                         handle->conn,
2952                         fsp->base_fsp->fsp_name->base_name,
2953                         vfs_translate_to_unix,
2954                         talloc_tos(), &name);
2955
2956                 if (NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
2957                         name = talloc_strdup(talloc_tos(), tmp_base_name);
2958                         if (name == NULL) {
2959                                 rc = -1;
2960                                 goto exit;
2961                         }
2962                 } else if (!NT_STATUS_IS_OK(status)) {
2963                         errno = map_errno_from_nt_status(status);
2964                         rc = -1;
2965                         goto exit;
2966                 }
2967                 fsp->base_fsp->fsp_name->base_name = name;
2968         }
2969
2970         if (ad == NULL || fsp->base_fsp == NULL) {
2971                 rc = SMB_VFS_NEXT_FSTAT(handle, fsp, sbuf);
2972                 goto exit;
2973         }
2974
2975         if (!fruit_fsp_recheck(ad, fsp)) {
2976                 rc = -1;
2977                 goto exit;
2978         }
2979
2980         switch (ad->ad_type) {
2981         case ADOUBLE_META:
2982                 rc = fruit_fstat_meta(handle, fsp, sbuf);
2983                 break;
2984         case ADOUBLE_RSRC:
2985                 rc = fruit_fstat_rsrc(handle, fsp, sbuf);
2986                 break;
2987         default:
2988                 DEBUG(10, ("fruit_fstat %s: bad type\n",
2989                            smb_fname_str_dbg(fsp->fsp_name)));
2990                 rc = -1;
2991                 goto exit;
2992         }
2993
2994         if (rc == 0) {
2995                 sbuf->st_ex_mode &= ~S_IFMT;
2996                 sbuf->st_ex_mode |= S_IFREG;
2997                 sbuf->st_ex_blocks = sbuf->st_ex_size / STAT_ST_BLOCKSIZE + 1;
2998         }
2999
3000 exit:
3001         DEBUG(10, ("fruit_fstat %s, size: %zd\n",
3002                    smb_fname_str_dbg(fsp->fsp_name),
3003                    (ssize_t)sbuf->st_ex_size));
3004         if (tmp_base_name) {
3005                 fsp->base_fsp->fsp_name->base_name = tmp_base_name;
3006         }
3007         TALLOC_FREE(name);
3008         return rc;
3009 }
3010
3011 static NTSTATUS fruit_streaminfo(vfs_handle_struct *handle,
3012                                  struct files_struct *fsp,
3013                                  const char *fname,
3014                                  TALLOC_CTX *mem_ctx,
3015                                  unsigned int *pnum_streams,
3016                                  struct stream_struct **pstreams)
3017 {
3018         struct fruit_config_data *config = NULL;
3019         struct smb_filename *smb_fname = NULL;
3020         struct adouble *ad = NULL;
3021
3022         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
3023                                 return NT_STATUS_UNSUCCESSFUL);
3024         DEBUG(10, ("fruit_streaminfo called for %s\n", fname));
3025
3026         smb_fname = synthetic_smb_fname(talloc_tos(), fname, NULL, NULL);
3027         if (smb_fname == NULL) {
3028                 return NT_STATUS_NO_MEMORY;
3029         }
3030
3031         if (config->meta == FRUIT_META_NETATALK) {
3032                 ad = ad_get(talloc_tos(), handle,
3033                             smb_fname->base_name, ADOUBLE_META);
3034                 if (ad && !empty_finderinfo(ad)) {
3035                         if (!add_fruit_stream(
3036                                     mem_ctx, pnum_streams, pstreams,
3037                                     AFPINFO_STREAM_NAME, AFP_INFO_SIZE,
3038                                     smb_roundup(handle->conn,
3039                                                 AFP_INFO_SIZE))) {
3040                                 TALLOC_FREE(ad);
3041                                 TALLOC_FREE(smb_fname);
3042                                 return NT_STATUS_NO_MEMORY;
3043                         }
3044                 }
3045                 TALLOC_FREE(ad);
3046         }
3047
3048         if (config->rsrc != FRUIT_RSRC_STREAM) {
3049                 ad = ad_get(talloc_tos(), handle, smb_fname->base_name,
3050                             ADOUBLE_RSRC);
3051                 if (ad) {
3052                         if (!add_fruit_stream(
3053                                     mem_ctx, pnum_streams, pstreams,
3054                                     AFPRESOURCE_STREAM_NAME,
3055                                     ad_getentrylen(ad, ADEID_RFORK),
3056                                     smb_roundup(handle->conn,
3057                                                 ad_getentrylen(
3058                                                         ad, ADEID_RFORK)))) {
3059                                 TALLOC_FREE(ad);
3060                                 TALLOC_FREE(smb_fname);
3061                                 return NT_STATUS_NO_MEMORY;
3062                         }
3063                 }
3064                 TALLOC_FREE(ad);
3065         }
3066
3067         TALLOC_FREE(smb_fname);
3068
3069         return SMB_VFS_NEXT_STREAMINFO(handle, fsp, fname, mem_ctx,
3070                                        pnum_streams, pstreams);
3071 }
3072
3073 static int fruit_ntimes(vfs_handle_struct *handle,
3074                         const struct smb_filename *smb_fname,
3075                         struct smb_file_time *ft)
3076 {
3077         int rc = 0;
3078         struct adouble *ad = NULL;
3079
3080         if (null_timespec(ft->create_time)) {
3081                 goto exit;
3082         }
3083
3084         DEBUG(10,("set btime for %s to %s\n", smb_fname_str_dbg(smb_fname),
3085                  time_to_asc(convert_timespec_to_time_t(ft->create_time))));
3086
3087         ad = ad_get(talloc_tos(), handle, smb_fname->base_name, ADOUBLE_META);
3088         if (ad == NULL) {
3089                 goto exit;
3090         }
3091
3092         ad_setdate(ad, AD_DATE_CREATE | AD_DATE_UNIX,
3093                    convert_time_t_to_uint32_t(ft->create_time.tv_sec));
3094
3095         rc = ad_write(ad, smb_fname->base_name);
3096
3097 exit:
3098
3099         TALLOC_FREE(ad);
3100         if (rc != 0) {
3101                 DEBUG(1, ("fruit_ntimes: %s\n", smb_fname_str_dbg(smb_fname)));
3102                 return -1;
3103         }
3104         return SMB_VFS_NEXT_NTIMES(handle, smb_fname, ft);
3105 }
3106
3107 static int fruit_fallocate(struct vfs_handle_struct *handle,
3108                            struct files_struct *fsp,
3109                            uint32_t mode,
3110                            off_t offset,
3111                            off_t len)
3112 {
3113         struct adouble *ad =
3114                 (struct adouble *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
3115
3116         if (ad == NULL) {
3117                 return SMB_VFS_NEXT_FALLOCATE(handle, fsp, mode, offset, len);
3118         }
3119
3120         if (!fruit_fsp_recheck(ad, fsp)) {
3121                 return -1;
3122         }
3123
3124         /* Let the pwrite code path handle it. */
3125         errno = ENOSYS;
3126         return -1;
3127 }
3128
3129 static int fruit_ftruncate(struct vfs_handle_struct *handle,
3130                            struct files_struct *fsp,
3131                            off_t offset)
3132 {
3133         int rc = 0;
3134         struct adouble *ad =
3135                 (struct adouble *)VFS_FETCH_FSP_EXTENSION(handle, fsp);
3136         struct fruit_config_data *config;
3137
3138         DEBUG(10, ("streams_xattr_ftruncate called for file %s offset %.0f\n",
3139                    fsp_str_dbg(fsp), (double)offset));
3140
3141         if (ad == NULL) {
3142                 return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, offset);
3143         }
3144
3145         if (!fruit_fsp_recheck(ad, fsp)) {
3146                 return -1;
3147         }
3148
3149         SMB_VFS_HANDLE_GET_DATA(handle, config,
3150                                 struct fruit_config_data, return -1);
3151
3152         switch (ad->ad_type) {
3153         case ADOUBLE_META:
3154                 /*
3155                  * As this request hasn't been seen in the wild,
3156                  * the only sensible use I can imagine is the client
3157                  * truncating the stream to 0 bytes size.
3158                  * We simply remove the metadata on such a request.
3159                  */
3160                 if (offset == 0) {
3161                         rc = SMB_VFS_FREMOVEXATTR(fsp,
3162                                                   AFPRESOURCE_EA_NETATALK);
3163                 }
3164                 break;
3165         case ADOUBLE_RSRC:
3166                 if (config->rsrc == FRUIT_RSRC_XATTR && offset == 0) {
3167                         rc = SMB_VFS_FREMOVEXATTR(fsp,
3168                                                   AFPRESOURCE_EA_NETATALK);
3169                 } else {
3170                         rc = SMB_VFS_NEXT_FTRUNCATE(
3171                                 handle, fsp,
3172                                 offset + ad_getentryoff(ad, ADEID_RFORK));
3173                         if (rc != 0) {
3174                                 return -1;
3175                         }
3176                         ad_setentrylen(ad, ADEID_RFORK, offset);
3177                         rc = ad_write(ad, NULL);
3178                         if (rc != 0) {
3179                                 return -1;
3180                         }
3181                 }
3182                 break;
3183         default:
3184                 return -1;
3185         }
3186
3187         return rc;
3188 }
3189
3190 static NTSTATUS fruit_create_file(vfs_handle_struct *handle,
3191                                   struct smb_request *req,
3192                                   uint16_t root_dir_fid,
3193                                   struct smb_filename *smb_fname,
3194                                   uint32_t access_mask,
3195                                   uint32_t share_access,
3196                                   uint32_t create_disposition,
3197                                   uint32_t create_options,
3198                                   uint32_t file_attributes,
3199                                   uint32_t oplock_request,
3200                                   struct smb2_lease *lease,
3201                                   uint64_t allocation_size,
3202                                   uint32_t private_flags,
3203                                   struct security_descriptor *sd,
3204                                   struct ea_list *ea_list,
3205                                   files_struct **result,
3206                                   int *pinfo,
3207                                   const struct smb2_create_blobs *in_context_blobs,
3208                                   struct smb2_create_blobs *out_context_blobs)
3209 {
3210         NTSTATUS status;
3211         struct fruit_config_data *config = NULL;
3212
3213         status = check_aapl(handle, req, in_context_blobs, out_context_blobs);
3214         if (!NT_STATUS_IS_OK(status)) {
3215                 return status;
3216         }
3217
3218         SMB_VFS_HANDLE_GET_DATA(handle, config, struct fruit_config_data,
3219                                 return NT_STATUS_UNSUCCESSFUL);
3220
3221         status = SMB_VFS_NEXT_CREATE_FILE(
3222                 handle, req, root_dir_fid, smb_fname,
3223                 access_mask, share_access,
3224                 create_disposition, create_options,
3225                 file_attributes, oplock_request,
3226                 lease,
3227                 allocation_size, private_flags,
3228                 sd, ea_list, result,
3229                 pinfo, in_context_blobs, out_context_blobs);
3230         if (!NT_STATUS_IS_OK(status)) {
3231                 return status;
3232         }
3233
3234         if (is_ntfs_stream_smb_fname(smb_fname)
3235             || (*result == NULL)
3236             || ((*result)->is_directory)) {
3237                 return status;
3238         }
3239
3240         if (config->locking == FRUIT_LOCKING_NETATALK) {
3241                 status = fruit_check_access(
3242                         handle, *result,
3243                         access_mask,
3244                         map_share_mode_to_deny_mode(share_access, 0));
3245                 if (!NT_STATUS_IS_OK(status)) {
3246                         goto fail;
3247                 }
3248         }
3249
3250         return status;
3251
3252 fail:
3253         DEBUG(1, ("fruit_create_file: %s\n", nt_errstr(status)));
3254
3255         if (*result) {
3256                 close_file(req, *result, ERROR_CLOSE);
3257                 *result = NULL;
3258         }
3259
3260         return status;
3261 }
3262
3263 static NTSTATUS fruit_readdir_attr(struct vfs_handle_struct *handle,
3264                                    const struct smb_filename *fname,
3265                                    TALLOC_CTX *mem_ctx,
3266                                    struct readdir_attr_data **pattr_data)
3267 {
3268         struct fruit_config_data *config = NULL;
3269         struct readdir_attr_data *attr_data;
3270         NTSTATUS status;
3271
3272         SMB_VFS_HANDLE_GET_DATA(handle, config,
3273                                 struct fruit_config_data,
3274                                 return NT_STATUS_UNSUCCESSFUL);
3275
3276         if (!config->use_aapl) {
3277                 return SMB_VFS_NEXT_READDIR_ATTR(handle, fname, mem_ctx, pattr_data);
3278         }
3279
3280         DEBUG(10, ("fruit_readdir_attr %s\n", fname->base_name));
3281
3282         *pattr_data = talloc_zero(mem_ctx, struct readdir_attr_data);
3283         if (*pattr_data == NULL) {
3284                 return NT_STATUS_UNSUCCESSFUL;
3285         }
3286         attr_data = *pattr_data;
3287         attr_data->type = RDATTR_AAPL;
3288
3289         /*
3290          * Mac metadata: compressed FinderInfo, resource fork length
3291          * and creation date
3292          */
3293         status = readdir_attr_macmeta(handle, fname, attr_data);
3294         if (!NT_STATUS_IS_OK(status)) {
3295                 /*
3296                  * Error handling is tricky: if we return failure from
3297                  * this function, the corresponding directory entry
3298                  * will to be passed to the client, so we really just
3299                  * want to error out on fatal errors.
3300                  */
3301                 if  (!NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED)) {
3302                         goto fail;
3303                 }
3304         }
3305
3306         /*
3307          * UNIX mode
3308          */
3309         if (config->unix_info_enabled) {
3310                 attr_data->attr_data.aapl.unix_mode = fname->st.st_ex_mode;
3311         }
3312
3313         /*
3314          * max_access
3315          */
3316         if (!config->readdir_attr_max_access) {
3317                 attr_data->attr_data.aapl.max_access = FILE_GENERIC_ALL;
3318         } else {
3319                 status = smbd_calculate_access_mask(
3320                         handle->conn,
3321                         fname,
3322                         false,
3323                         SEC_FLAG_MAXIMUM_ALLOWED,
3324                         &attr_data->attr_data.aapl.max_access);
3325                 if (!NT_STATUS_IS_OK(status)) {
3326                         goto fail;
3327                 }
3328         }
3329
3330         return NT_STATUS_OK;
3331
3332 fail:
3333         DEBUG(1, ("fruit_readdir_attr %s, error: %s\n",
3334                   fname->base_name, nt_errstr(status)));
3335         TALLOC_FREE(*pattr_data);
3336         return status;
3337 }
3338
3339 static NTSTATUS fruit_fget_nt_acl(vfs_handle_struct *handle,
3340                                   files_struct *fsp,
3341                                   uint32 security_info,
3342                                   TALLOC_CTX *mem_ctx,
3343                                   struct security_descriptor **ppdesc)
3344 {
3345         NTSTATUS status;
3346         struct security_ace ace;
3347         struct dom_sid sid;
3348         struct fruit_config_data *config;
3349
3350         SMB_VFS_HANDLE_GET_DATA(handle, config,
3351                                 struct fruit_config_data,
3352                                 return NT_STATUS_UNSUCCESSFUL);
3353
3354         status = SMB_VFS_NEXT_FGET_NT_ACL(handle, fsp, security_info,
3355                                           mem_ctx, ppdesc);
3356         if (!NT_STATUS_IS_OK(status)) {
3357                 return status;
3358         }
3359
3360         /*
3361          * Add MS NFS style ACEs with uid, gid and mode
3362          */
3363         if (!config->unix_info_enabled) {
3364                 return NT_STATUS_OK;
3365         }
3366
3367         /* MS NFS style mode */
3368         sid_compose(&sid, &global_sid_Unix_NFS_Mode, fsp->fsp_name->st.st_ex_mode);
3369         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
3370         status = security_descriptor_dacl_add(*ppdesc, &ace);
3371         if (!NT_STATUS_IS_OK(status)) {
3372                 DEBUG(1,("failed to add MS NFS style ACE\n"));
3373                 return status;
3374         }
3375
3376         /* MS NFS style uid */
3377         sid_compose(&sid, &global_sid_Unix_NFS_Users, fsp->fsp_name->st.st_ex_uid);
3378         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
3379         status = security_descriptor_dacl_add(*ppdesc, &ace);
3380         if (!NT_STATUS_IS_OK(status)) {
3381                 DEBUG(1,("failed to add MS NFS style ACE\n"));
3382                 return status;
3383         }
3384
3385         /* MS NFS style gid */
3386         sid_compose(&sid, &global_sid_Unix_NFS_Groups, fsp->fsp_name->st.st_ex_gid);
3387         init_sec_ace(&ace, &sid, SEC_ACE_TYPE_ACCESS_DENIED, 0, 0);
3388         status = security_descriptor_dacl_add(*ppdesc, &ace);
3389         if (!NT_STATUS_IS_OK(status)) {
3390                 DEBUG(1,("failed to add MS NFS style ACE\n"));
3391                 return status;
3392         }
3393
3394         return NT_STATUS_OK;
3395 }
3396
3397 static NTSTATUS fruit_fset_nt_acl(vfs_handle_struct *handle,
3398                                   files_struct *fsp,
3399                                   uint32 security_info_sent,
3400                                   const struct security_descriptor *psd)
3401 {
3402         NTSTATUS status;
3403         bool do_chmod;
3404         mode_t ms_nfs_mode;
3405         int result;
3406
3407         DEBUG(1, ("fruit_fset_nt_acl: %s\n", fsp_str_dbg(fsp)));
3408
3409         status = check_ms_nfs(handle, fsp, psd, &ms_nfs_mode, &do_chmod);
3410         if (!NT_STATUS_IS_OK(status)) {
3411                 DEBUG(1, ("fruit_fset_nt_acl: check_ms_nfs failed%s\n", fsp_str_dbg(fsp)));
3412                 return status;
3413         }
3414
3415         status = SMB_VFS_NEXT_FSET_NT_ACL(handle, fsp, security_info_sent, psd);
3416         if (!NT_STATUS_IS_OK(status)) {
3417                 DEBUG(1, ("fruit_fset_nt_acl: SMB_VFS_NEXT_FSET_NT_ACL failed%s\n", fsp_str_dbg(fsp)));
3418                 return status;
3419         }
3420
3421         if (do_chmod) {
3422                 if (fsp->fh->fd != -1) {
3423                         DEBUG(1, ("fchmod: %s\n", fsp_str_dbg(fsp)));
3424                         result = SMB_VFS_FCHMOD(fsp, ms_nfs_mode);
3425                 } else {
3426                         DEBUG(1, ("chmod: %s\n", fsp_str_dbg(fsp)));
3427                         result = SMB_VFS_CHMOD(fsp->conn,
3428                                                fsp->fsp_name->base_name,
3429                                                ms_nfs_mode);
3430                 }
3431
3432                 if (result != 0) {
3433                         DEBUG(1, ("chmod: %s, result: %d, %04o error %s\n", fsp_str_dbg(fsp),
3434                                   result, ms_nfs_mode, strerror(errno)));
3435                         status = map_nt_error_from_unix(errno);
3436                         return status;
3437                 }
3438         }
3439
3440         return NT_STATUS_OK;
3441 }
3442
3443 static struct vfs_fn_pointers vfs_fruit_fns = {
3444         .connect_fn = fruit_connect,
3445
3446         /* File operations */
3447         .chmod_fn = fruit_chmod,
3448         .chown_fn = fruit_chown,
3449         .unlink_fn = fruit_unlink,
3450         .rename_fn = fruit_rename,
3451         .rmdir_fn = fruit_rmdir,
3452         .open_fn = fruit_open,
3453         .pread_fn = fruit_pread,
3454         .pwrite_fn = fruit_pwrite,
3455         .stat_fn = fruit_stat,
3456         .lstat_fn = fruit_lstat,
3457         .fstat_fn = fruit_fstat,
3458         .streaminfo_fn = fruit_streaminfo,
3459         .ntimes_fn = fruit_ntimes,
3460         .ftruncate_fn = fruit_ftruncate,
3461         .fallocate_fn = fruit_fallocate,
3462         .create_file_fn = fruit_create_file,
3463         .readdir_attr_fn = fruit_readdir_attr,
3464
3465         /* NT ACL operations */
3466         .fget_nt_acl_fn = fruit_fget_nt_acl,
3467         .fset_nt_acl_fn = fruit_fset_nt_acl,
3468 };
3469
3470 NTSTATUS vfs_fruit_init(void);
3471 NTSTATUS vfs_fruit_init(void)
3472 {
3473         NTSTATUS ret = smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "fruit",
3474                                         &vfs_fruit_fns);
3475         if (!NT_STATUS_IS_OK(ret)) {
3476                 return ret;
3477         }
3478
3479         vfs_fruit_debug_level = debug_add_class("fruit");
3480         if (vfs_fruit_debug_level == -1) {
3481                 vfs_fruit_debug_level = DBGC_VFS;
3482                 DEBUG(0, ("%s: Couldn't register custom debugging class!\n",
3483                           "vfs_fruit_init"));
3484         } else {
3485                 DEBUG(10, ("%s: Debug class number of '%s': %d\n",
3486                            "vfs_fruit_init","fruit",vfs_fruit_debug_level));
3487         }
3488
3489         return ret;
3490 }