source3/modules/vfs_gpfs.c

   1 /*
   2  *  Unix SMB/CIFS implementation.
   3  *  Samba VFS module for GPFS filesystem
   4  *  Copyright (C) Christian Ambach <cambach1@de.ibm.com> 2006
   5  *  Copyright (C) Christof Schmitt 2015
   6  *  Major code contributions by Chetan Shringarpure <chetan.sh@in.ibm.com>
   7  *                           and Gomati Mohanan <gomati.mohanan@in.ibm.com>
   8  *
   9  *  This program is free software; you can redistribute it and/or modify
  10  *  it under the terms of the GNU General Public License as published by
  11  *  the Free Software Foundation; either version 3 of the License, or
  12  *  (at your option) any later version.
  13  *
  14  *  This program is distributed in the hope that it will be useful,
  15  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *  GNU General Public License for more details.
  18  *
  19  *  You should have received a copy of the GNU General Public License
  20  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
  21  */
  22
  23 #include "includes.h"
  24 #include "smbd/smbd.h"
  25 #include "include/smbprofile.h"
  26 #include "modules/non_posix_acls.h"
  27 #include "libcli/security/security.h"
  28 #include "nfs4_acls.h"
  29 #include "system/filesys.h"
  30 #include "auth.h"
  31 #include "lib/util/tevent_unix.h"
  32 #include "lib/util/gpfswrap.h"
  33
  34 #include <gnutls/gnutls.h>
  35 #include <gnutls/crypto.h>
  36 #include "lib/crypto/gnutls_helpers.h"
  37
  38 #undef DBGC_CLASS
  39 #define DBGC_CLASS DBGC_VFS
  40
  41 #ifndef GPFS_GETACL_NATIVE
  42 #define GPFS_GETACL_NATIVE 0x00000004
  43 #endif
  44
  45 struct gpfs_config_data {
  46         struct smbacl4_vfs_params nfs4_params;
  47         bool sharemodes;
  48         bool leases;
  49         bool hsm;
  50         bool syncio;
  51         bool winattr;
  52         bool ftruncate;
  53         bool getrealfilename;
  54         bool dfreequota;
  55         bool acl;
  56         bool settimes;
  57         bool recalls;
  58         struct {
  59                 bool gpfs_fstat_x;
  60         } pathref_ok;
  61 };
  62
  63 struct gpfs_fsp_extension {
  64         bool offline;
  65 };
  66
  67 static inline unsigned int gpfs_acl_flags(gpfs_acl_t *gacl)
  68 {
  69         if (gacl->acl_level == GPFS_ACL_LEVEL_V4FLAGS) {
  70                 return gacl->v4Level1.acl_flags;
  71         }
  72         return 0;
  73 }
  74
  75 static inline gpfs_ace_v4_t *gpfs_ace_ptr(gpfs_acl_t *gacl, unsigned int i)
  76 {
  77         if (gacl->acl_level == GPFS_ACL_LEVEL_V4FLAGS) {
  78                 return &gacl->v4Level1.ace_v4[i];
  79         }
  80         return &gacl->ace_v4[i];
  81 }
  82
  83 static unsigned int vfs_gpfs_access_mask_to_allow(uint32_t access_mask)
  84 {
  85         unsigned int allow = GPFS_SHARE_NONE;
  86
  87         if (access_mask & (FILE_WRITE_DATA|FILE_APPEND_DATA)) {
  88                 allow |= GPFS_SHARE_WRITE;
  89         }
  90         if (access_mask & (FILE_READ_DATA|FILE_EXECUTE)) {
  91                 allow |= GPFS_SHARE_READ;
  92         }
  93
  94         return allow;
  95 }
  96
  97 static unsigned int vfs_gpfs_share_access_to_deny(uint32_t share_access)
  98 {
  99         unsigned int deny = GPFS_DENY_NONE;
 100
 101         if (!(share_access & FILE_SHARE_WRITE)) {
 102                 deny |= GPFS_DENY_WRITE;
 103         }
 104         if (!(share_access & FILE_SHARE_READ)) {
 105                 deny |= GPFS_DENY_READ;
 106         }
 107
 108         /*
 109          * GPFS_DENY_DELETE can only be set together with either
 110          * GPFS_DENY_WRITE or GPFS_DENY_READ.
 111          */
 112         if ((deny & (GPFS_DENY_WRITE|GPFS_DENY_READ)) &&
 113             !(share_access & FILE_SHARE_DELETE)) {
 114                 deny |= GPFS_DENY_DELETE;
 115         }
 116
 117         return deny;
 118 }
 119
 120 static int set_gpfs_sharemode(files_struct *fsp, uint32_t access_mask,
 121                               uint32_t share_access)
 122 {
 123         unsigned int allow = GPFS_SHARE_NONE;
 124         unsigned int deny = GPFS_DENY_NONE;
 125         int result;
 126
 127         if (access_mask == 0) {
 128                 DBG_DEBUG("Clearing file system share mode.\n");
 129         } else {
 130                 allow = vfs_gpfs_access_mask_to_allow(access_mask);
 131                 deny = vfs_gpfs_share_access_to_deny(share_access);
 132         }
 133         DBG_DEBUG("access_mask=0x%x, allow=0x%x, share_access=0x%x, "
 134                   "deny=0x%x\n", access_mask, allow, share_access, deny);
 135
 136         result = gpfswrap_set_share(fsp_get_io_fd(fsp), allow, deny);
 137         if (result == 0) {
 138                 return 0;
 139         }
 140
 141         if (errno == EACCES) {
 142                 DBG_NOTICE("GPFS share mode denied for %s/%s.\n",
 143                            fsp->conn->connectpath,
 144                            fsp->fsp_name->base_name);
 145         } else if (errno == EPERM) {
 146                 DBG_ERR("Samba requested GPFS sharemode for %s/%s, but the "
 147                         "GPFS file system is not configured accordingly. "
 148                         "Configure file system with mmchfs -D nfs4 or "
 149                         "set gpfs:sharemodes=no in Samba.\n",
 150                         fsp->conn->connectpath,
 151                         fsp->fsp_name->base_name);
 152         } else {
 153                 DBG_ERR("gpfs_set_share failed: %s\n", strerror(errno));
 154         }
 155
 156         return result;
 157 }
 158
 159 static int vfs_gpfs_filesystem_sharemode(vfs_handle_struct *handle,
 160                                          files_struct *fsp,
 161                                          uint32_t share_access,
 162                                          uint32_t access_mask)
 163 {
 164
 165         struct gpfs_config_data *config;
 166         int ret = 0;
 167
 168         SMB_VFS_HANDLE_GET_DATA(handle, config,
 169                                 struct gpfs_config_data,
 170                                 return -1);
 171
 172         if(!config->sharemodes) {
 173                 return 0;
 174         }
 175
 176         /*
 177          * A named stream fsp will have the basefile open in the fsp
 178          * fd, so lacking a distinct fd for the stream we have to skip
 179          * set_gpfs_sharemode for stream.
 180          */
 181         if (fsp_is_alternate_stream(fsp)) {
 182                 DBG_NOTICE("Not requesting GPFS sharemode on stream: %s/%s\n",
 183                            fsp->conn->connectpath,
 184                            fsp_str_dbg(fsp));
 185                 return 0;
 186         }
 187
 188         ret = set_gpfs_sharemode(fsp, access_mask, share_access);
 189
 190         return ret;
 191 }
 192
 193 static int vfs_gpfs_close(vfs_handle_struct *handle, files_struct *fsp)
 194 {
 195
 196         struct gpfs_config_data *config;
 197
 198         SMB_VFS_HANDLE_GET_DATA(handle, config,
 199                                 struct gpfs_config_data,
 200                                 return -1);
 201
 202         if (config->sharemodes &&
 203             (fsp->fsp_flags.kernel_share_modes_taken))
 204         {
 205                 /*
 206                  * Always clear GPFS sharemode in case the actual
 207                  * close gets deferred due to outstanding POSIX locks
 208                  * (see fd_close_posix)
 209                  */
 210                 int ret = gpfswrap_set_share(fsp_get_io_fd(fsp), 0, 0);
 211                 if (ret != 0) {
 212                         DBG_ERR("Clearing GPFS sharemode on close failed for "
 213                                 " %s/%s: %s\n",
 214                                 fsp->conn->connectpath,
 215                                 fsp->fsp_name->base_name,
 216                                 strerror(errno));
 217                 }
 218         }
 219
 220         return SMB_VFS_NEXT_CLOSE(handle, fsp);
 221 }
 222
 223 #ifdef HAVE_KERNEL_OPLOCKS_LINUX
 224 static int lease_type_to_gpfs(int leasetype)
 225 {
 226         if (leasetype == F_RDLCK) {
 227                 return GPFS_LEASE_READ;
 228         }
 229
 230         if (leasetype == F_WRLCK) {
 231                 return GPFS_LEASE_WRITE;
 232         }
 233
 234         return GPFS_LEASE_NONE;
 235 }
 236
 237 static int vfs_gpfs_setlease(vfs_handle_struct *handle,
 238                              files_struct *fsp,
 239                              int leasetype)
 240 {
 241         struct gpfs_config_data *config;
 242         int ret=0;
 243
 244         START_PROFILE(syscall_linux_setlease);
 245
 246         SMB_VFS_HANDLE_GET_DATA(handle, config,
 247                                 struct gpfs_config_data,
 248                                 return -1);
 249
 250         ret = linux_set_lease_sighandler(fsp_get_io_fd(fsp));
 251         if (ret == -1) {
 252                 goto failure;
 253         }
 254
 255         if (config->leases) {
 256                 int gpfs_lease_type = lease_type_to_gpfs(leasetype);
 257                 int saved_errno = 0;
 258
 259                 /*
 260                  * Ensure the lease owner is root to allow
 261                  * correct delivery of lease-break signals.
 262                  */
 263                 become_root();
 264                 ret = gpfswrap_set_lease(fsp_get_io_fd(fsp), gpfs_lease_type);
 265                 if (ret < 0) {
 266                         saved_errno = errno;
 267                 }
 268                 unbecome_root();
 269
 270                 if (saved_errno != 0) {
 271                         errno = saved_errno;
 272                 }
 273         }
 274
 275 failure:
 276         END_PROFILE(syscall_linux_setlease);
 277
 278         return ret;
 279 }
 280
 281 #else /* HAVE_KERNEL_OPLOCKS_LINUX */
 282
 283 static int vfs_gpfs_setlease(vfs_handle_struct *handle,
 284                                 files_struct *fsp,
 285                                 int leasetype)
 286 {
 287         return ENOSYS;
 288 }
 289 #endif /* HAVE_KERNEL_OPLOCKS_LINUX */
 290
 291 static NTSTATUS vfs_gpfs_get_real_filename(struct vfs_handle_struct *handle,
 292                                            const struct smb_filename *path,
 293                                            const char *name,
 294                                            TALLOC_CTX *mem_ctx,
 295                                            char **found_name)
 296 {
 297         int result;
 298         char *full_path = NULL;
 299         char *to_free = NULL;
 300         char real_pathname[PATH_MAX+1], tmpbuf[PATH_MAX];
 301         size_t full_path_len;
 302         int buflen;
 303         bool mangled;
 304         struct gpfs_config_data *config;
 305
 306         SMB_VFS_HANDLE_GET_DATA(handle, config,
 307                                 struct gpfs_config_data,
 308                                 return NT_STATUS_INTERNAL_ERROR);
 309
 310         if (!config->getrealfilename) {
 311                 return SMB_VFS_NEXT_GET_REAL_FILENAME(handle, path, name,
 312                                                       mem_ctx, found_name);
 313         }
 314
 315         mangled = mangle_is_mangled(name, handle->conn->params);
 316         if (mangled) {
 317                 return SMB_VFS_NEXT_GET_REAL_FILENAME(handle, path, name,
 318                                                       mem_ctx, found_name);
 319         }
 320
 321         full_path_len = full_path_tos(path->base_name, name,
 322                                       tmpbuf, sizeof(tmpbuf),
 323                                       &full_path, &to_free);
 324         if (full_path_len == -1) {
 325                 return NT_STATUS_NO_MEMORY;
 326         }
 327
 328         buflen = sizeof(real_pathname) - 1;
 329
 330         result = gpfswrap_get_realfilename_path(full_path, real_pathname,
 331                                                 &buflen);
 332
 333         TALLOC_FREE(to_free);
 334
 335         if ((result == -1) && (errno == ENOSYS)) {
 336                 return SMB_VFS_NEXT_GET_REAL_FILENAME(
 337                         handle, path, name, mem_ctx, found_name);
 338         }
 339
 340         if (result == -1) {
 341                 DEBUG(10, ("smbd_gpfs_get_realfilename_path returned %s\n",
 342                            strerror(errno)));
 343                 return map_nt_error_from_unix(errno);
 344         }
 345
 346         /*
 347          * GPFS does not necessarily null-terminate the returned path
 348          * but instead returns the buffer length in buflen.
 349          */
 350
 351         if (buflen < sizeof(real_pathname)) {
 352                 real_pathname[buflen] = '\0';
 353         } else {
 354                 real_pathname[sizeof(real_pathname)-1] = '\0';
 355         }
 356
 357         DEBUG(10, ("smbd_gpfs_get_realfilename_path: %s/%s -> %s\n",
 358                    path->base_name, name, real_pathname));
 359
 360         name = strrchr_m(real_pathname, '/');
 361         if (name == NULL) {
 362                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
 363         }
 364
 365         *found_name = talloc_strdup(mem_ctx, name+1);
 366         if (*found_name == NULL) {
 367                 return NT_STATUS_NO_MEMORY;
 368         }
 369
 370         return NT_STATUS_OK;
 371 }
 372
 373 static void sd2gpfs_control(uint16_t control, struct gpfs_acl *gacl)
 374 {
 375         unsigned int gpfs_aclflags = 0;
 376         control &= SEC_DESC_DACL_PROTECTED | SEC_DESC_SACL_PROTECTED |
 377                 SEC_DESC_DACL_AUTO_INHERITED | SEC_DESC_SACL_AUTO_INHERITED |
 378                 SEC_DESC_DACL_DEFAULTED | SEC_DESC_SACL_DEFAULTED |
 379                 SEC_DESC_DACL_PRESENT | SEC_DESC_SACL_PRESENT;
 380         gpfs_aclflags = control << 8;
 381         if (!(control & SEC_DESC_DACL_PRESENT))
 382                 gpfs_aclflags |= ACL4_FLAG_NULL_DACL;
 383         if (!(control & SEC_DESC_SACL_PRESENT))
 384                 gpfs_aclflags |= ACL4_FLAG_NULL_SACL;
 385         gacl->acl_level = GPFS_ACL_LEVEL_V4FLAGS;
 386         gacl->v4Level1.acl_flags = gpfs_aclflags;
 387 }
 388
 389 static uint16_t gpfs2sd_control(unsigned int gpfs_aclflags)
 390 {
 391         uint16_t control = gpfs_aclflags >> 8;
 392         control &= SEC_DESC_DACL_PROTECTED | SEC_DESC_SACL_PROTECTED |
 393                 SEC_DESC_DACL_AUTO_INHERITED | SEC_DESC_SACL_AUTO_INHERITED |
 394                 SEC_DESC_DACL_DEFAULTED | SEC_DESC_SACL_DEFAULTED |
 395                 SEC_DESC_DACL_PRESENT | SEC_DESC_SACL_PRESENT;
 396         control |= SEC_DESC_SELF_RELATIVE;
 397         return control;
 398 }
 399
 400 static void gpfs_dumpacl(int level, struct gpfs_acl *gacl)
 401 {
 402         gpfs_aclCount_t i;
 403         if (gacl==NULL)
 404         {
 405                 DEBUG(0, ("gpfs acl is NULL\n"));
 406                 return;
 407         }
 408
 409         DEBUG(level, ("len: %d, level: %d, version: %d, nace: %d, "
 410                       "control: %x\n",
 411                       gacl->acl_len, gacl->acl_level, gacl->acl_version,
 412                       gacl->acl_nace, gpfs_acl_flags(gacl)));
 413
 414         for(i=0; i<gacl->acl_nace; i++)
 415         {
 416                 struct gpfs_ace_v4 *gace = gpfs_ace_ptr(gacl, i);
 417                 DEBUG(level, ("\tace[%d]: type:%d, flags:0x%x, mask:0x%x, "
 418                               "iflags:0x%x, who:%u\n",
 419                               i, gace->aceType, gace->aceFlags, gace->aceMask,
 420                               gace->aceIFlags, gace->aceWho));
 421         }
 422 }
 423
 424 static int gpfs_getacl_with_capability(const char *fname, int flags, void *buf)
 425 {
 426         int ret, saved_errno;
 427
 428         set_effective_capability(DAC_OVERRIDE_CAPABILITY);
 429
 430         ret = gpfswrap_getacl(fname, flags, buf);
 431         saved_errno = errno;
 432
 433         drop_effective_capability(DAC_OVERRIDE_CAPABILITY);
 434
 435         errno = saved_errno;
 436         return ret;
 437 }
 438
 439 /*
 440  * get the ACL from GPFS, allocated on the specified mem_ctx
 441  * internally retries when initial buffer was too small
 442  *
 443  * caller needs to cast result to either
 444  * raw = yes: struct gpfs_opaque_acl
 445  * raw = no: struct gpfs_acl
 446  *
 447  */
 448 static void *vfs_gpfs_getacl(TALLOC_CTX *mem_ctx,
 449                          const char *fname,
 450                          const bool raw,
 451                          const gpfs_aclType_t type)
 452 {
 453
 454         void *aclbuf;
 455         size_t size = 512;
 456         int ret, flags;
 457         unsigned int *len;
 458         size_t struct_size;
 459         bool use_capability = false;
 460
 461 again:
 462
 463         aclbuf = talloc_zero_size(mem_ctx, size);
 464         if (aclbuf == NULL) {
 465                 errno = ENOMEM;
 466                 return NULL;
 467         }
 468
 469         if (raw) {
 470                 struct gpfs_opaque_acl *buf = (struct gpfs_opaque_acl *) aclbuf;
 471                 buf->acl_type = type;
 472                 flags = GPFS_GETACL_NATIVE;
 473                 len = (unsigned int *) &(buf->acl_buffer_len);
 474                 struct_size = sizeof(struct gpfs_opaque_acl);
 475         } else {
 476                 struct gpfs_acl *buf = (struct gpfs_acl *) aclbuf;
 477                 buf->acl_type = type;
 478                 buf->acl_level = GPFS_ACL_LEVEL_V4FLAGS;
 479                 flags = GPFS_GETACL_STRUCT;
 480                 len = &(buf->acl_len);
 481                 /* reserve space for control flags in gpfs 3.5 and beyond */
 482                 struct_size = sizeof(struct gpfs_acl) + sizeof(unsigned int);
 483         }
 484
 485         /* set the length of the buffer as input value */
 486         *len = size;
 487
 488         if (use_capability) {
 489                 ret = gpfs_getacl_with_capability(fname, flags, aclbuf);
 490         } else {
 491                 ret = gpfswrap_getacl(fname, flags, aclbuf);
 492                 if ((ret != 0) && (errno == EACCES)) {
 493                         DBG_DEBUG("Retry with DAC capability for %s\n", fname);
 494                         use_capability = true;
 495                         ret = gpfs_getacl_with_capability(fname, flags, aclbuf);
 496                 }
 497         }
 498
 499         if ((ret != 0) && (errno == ENOSPC)) {
 500                 /*
 501                  * get the size needed to accommodate the complete buffer
 502                  *
 503                  * the value returned only applies to the ACL blob in the
 504                  * struct so make sure to also have headroom for the first
 505                  * struct members by adding room for the complete struct
 506                  * (might be a few bytes too much then)
 507                  */
 508                 size = *len + struct_size;
 509                 talloc_free(aclbuf);
 510                 DEBUG(10, ("Increasing ACL buffer size to %zu\n", size));
 511                 goto again;
 512         }
 513
 514         if (ret != 0) {
 515                 DEBUG(5, ("smbd_gpfs_getacl failed with %s\n",
 516                           strerror(errno)));
 517                 talloc_free(aclbuf);
 518                 return NULL;
 519         }
 520
 521         return aclbuf;
 522 }
 523
 524 /* Tries to get nfs4 acls and returns SMB ACL allocated.
 525  * On failure returns 1 if it got non-NFSv4 ACL to prompt
 526  * retry with POSIX ACL checks.
 527  * On failure returns -1 if there is system (GPFS) error, check errno.
 528  * Returns 0 on success
 529  */
 530 static int gpfs_get_nfs4_acl(TALLOC_CTX *mem_ctx, const char *fname,
 531                              struct SMB4ACL_T **ppacl)
 532 {
 533         gpfs_aclCount_t i;
 534         struct gpfs_acl *gacl = NULL;
 535         DEBUG(10, ("gpfs_get_nfs4_acl invoked for %s\n", fname));
 536
 537         /* Get the ACL */
 538         gacl = (struct gpfs_acl*) vfs_gpfs_getacl(talloc_tos(), fname,
 539                                                   false, 0);
 540         if (gacl == NULL) {
 541                 DEBUG(9, ("gpfs_getacl failed for %s with %s\n",
 542                            fname, strerror(errno)));
 543                 if (errno == ENODATA) {
 544                         /*
 545                          * GPFS returns ENODATA for snapshot
 546                          * directories. Retry with POSIX ACLs check.
 547                          */
 548                         return 1;
 549                 }
 550
 551                 return -1;
 552         }
 553
 554         if (gacl->acl_type != GPFS_ACL_TYPE_NFS4) {
 555                 DEBUG(10, ("Got non-nfsv4 acl\n"));
 556                 /* Retry with POSIX ACLs check */
 557                 talloc_free(gacl);
 558                 return 1;
 559         }
 560
 561         *ppacl = smb_create_smb4acl(mem_ctx);
 562
 563         if (gacl->acl_level == GPFS_ACL_LEVEL_V4FLAGS) {
 564                 uint16_t control = gpfs2sd_control(gpfs_acl_flags(gacl));
 565                 smbacl4_set_controlflags(*ppacl, control);
 566         }
 567
 568         DEBUG(10, ("len: %d, level: %d, version: %d, nace: %d, control: %x\n",
 569                    gacl->acl_len, gacl->acl_level, gacl->acl_version,
 570                    gacl->acl_nace, gpfs_acl_flags(gacl)));
 571
 572         for (i=0; i<gacl->acl_nace; i++) {
 573                 struct gpfs_ace_v4 *gace = gpfs_ace_ptr(gacl, i);
 574                 SMB_ACE4PROP_T smbace = { 0 };
 575                 DEBUG(10, ("type: %d, iflags: %x, flags: %x, mask: %x, "
 576                            "who: %d\n", gace->aceType, gace->aceIFlags,
 577                            gace->aceFlags, gace->aceMask, gace->aceWho));
 578
 579                 if (gace->aceIFlags & ACE4_IFLAG_SPECIAL_ID) {
 580                         smbace.flags |= SMB_ACE4_ID_SPECIAL;
 581                         switch (gace->aceWho) {
 582                         case ACE4_SPECIAL_OWNER:
 583                                 smbace.who.special_id = SMB_ACE4_WHO_OWNER;
 584                                 break;
 585                         case ACE4_SPECIAL_GROUP:
 586                                 smbace.who.special_id = SMB_ACE4_WHO_GROUP;
 587                                 break;
 588                         case ACE4_SPECIAL_EVERYONE:
 589                                 smbace.who.special_id = SMB_ACE4_WHO_EVERYONE;
 590                                 break;
 591                         default:
 592                                 DEBUG(8, ("invalid special gpfs id %d "
 593                                           "ignored\n", gace->aceWho));
 594                                 continue; /* don't add it */
 595                         }
 596                 } else {
 597                         if (gace->aceFlags & ACE4_FLAG_GROUP_ID)
 598                                 smbace.who.gid = gace->aceWho;
 599                         else
 600                                 smbace.who.uid = gace->aceWho;
 601                 }
 602
 603                 /* remove redundant deny entries */
 604                 if (i > 0 && gace->aceType == SMB_ACE4_ACCESS_DENIED_ACE_TYPE) {
 605                         struct gpfs_ace_v4 *prev = gpfs_ace_ptr(gacl, i - 1);
 606                         if (prev->aceType == SMB_ACE4_ACCESS_ALLOWED_ACE_TYPE &&
 607                             prev->aceFlags == gace->aceFlags &&
 608                             prev->aceIFlags == gace->aceIFlags &&
 609                             (gace->aceMask & prev->aceMask) == 0 &&
 610                             gace->aceWho == prev->aceWho) {
 611                                 /* it's redundant - skip it */
 612                                 continue;
 613                         }
 614                 }
 615
 616                 smbace.aceType = gace->aceType;
 617                 smbace.aceFlags = gace->aceFlags;
 618                 smbace.aceMask = gace->aceMask;
 619                 smb_add_ace4(*ppacl, &smbace);
 620         }
 621
 622         talloc_free(gacl);
 623
 624         return 0;
 625 }
 626
 627 static NTSTATUS gpfsacl_fget_nt_acl(vfs_handle_struct *handle,
 628         files_struct *fsp, uint32_t security_info,
 629         TALLOC_CTX *mem_ctx,
 630         struct security_descriptor **ppdesc)
 631 {
 632         struct SMB4ACL_T *pacl = NULL;
 633         int     result;
 634         struct gpfs_config_data *config;
 635         TALLOC_CTX *frame = talloc_stackframe();
 636         NTSTATUS status;
 637
 638         *ppdesc = NULL;
 639
 640         SMB_VFS_HANDLE_GET_DATA(handle, config,
 641                                 struct gpfs_config_data,
 642                                 return NT_STATUS_INTERNAL_ERROR);
 643
 644         if (!config->acl) {
 645                 status = SMB_VFS_NEXT_FGET_NT_ACL(handle, fsp, security_info,
 646                                                   mem_ctx, ppdesc);
 647                 TALLOC_FREE(frame);
 648                 return status;
 649         }
 650
 651         result = gpfs_get_nfs4_acl(frame, fsp->fsp_name->base_name, &pacl);
 652
 653         if (result == 0) {
 654                 status = smb_fget_nt_acl_nfs4(fsp, &config->nfs4_params,
 655                                               security_info,
 656                                               mem_ctx, ppdesc, pacl);
 657                 TALLOC_FREE(frame);
 658                 return status;
 659         }
 660
 661         if (result > 0) {
 662                 DEBUG(10, ("retrying with posix acl...\n"));
 663                 status = posix_fget_nt_acl(fsp, security_info,
 664                                            mem_ctx, ppdesc);
 665                 TALLOC_FREE(frame);
 666                 return status;
 667         }
 668
 669         TALLOC_FREE(frame);
 670
 671         /* GPFS ACL was not read, something wrong happened, error code is set in errno */
 672         return map_nt_error_from_unix(errno);
 673 }
 674
 675 static bool vfs_gpfs_nfs4_ace_to_gpfs_ace(SMB_ACE4PROP_T *nfs4_ace,
 676                                           struct gpfs_ace_v4 *gace,
 677                                           uid_t owner_uid)
 678 {
 679         gace->aceType = nfs4_ace->aceType;
 680         gace->aceFlags = nfs4_ace->aceFlags;
 681         gace->aceMask = nfs4_ace->aceMask;
 682
 683         if (nfs4_ace->flags & SMB_ACE4_ID_SPECIAL) {
 684                 switch(nfs4_ace->who.special_id) {
 685                 case SMB_ACE4_WHO_EVERYONE:
 686                         gace->aceIFlags = ACE4_IFLAG_SPECIAL_ID;
 687                         gace->aceWho = ACE4_SPECIAL_EVERYONE;
 688                         break;
 689                 case SMB_ACE4_WHO_OWNER:
 690                         /*
 691                          * With GPFS it is not possible to deny ACL or
 692                          * attribute access to the owner. Setting an
 693                          * ACL with such an entry is not possible.
 694                          * Denying ACL or attribute access for the
 695                          * owner through a named ACL entry can be
 696                          * stored in an ACL, it is just not effective.
 697                          *
 698                          * Map this case to a named entry to allow at
 699                          * least setting this ACL, which will be
 700                          * enforced by the smbd permission check. Do
 701                          * not do this for an inheriting OWNER entry,
 702                          * as this represents a CREATOR OWNER ACE. The
 703                          * remaining limitation is that CREATOR OWNER
 704                          * cannot deny ACL or attribute access.
 705                          */
 706                         if (!nfs_ace_is_inherit(nfs4_ace) &&
 707                             nfs4_ace->aceType ==
 708                                         SMB_ACE4_ACCESS_DENIED_ACE_TYPE &&
 709                             nfs4_ace->aceMask & (SMB_ACE4_READ_ATTRIBUTES|
 710                                                  SMB_ACE4_WRITE_ATTRIBUTES|
 711                                                  SMB_ACE4_READ_ACL|
 712                                                  SMB_ACE4_WRITE_ACL)) {
 713                                 gace->aceIFlags = 0;
 714                                 gace->aceWho = owner_uid;
 715                         } else {
 716                                 gace->aceIFlags = ACE4_IFLAG_SPECIAL_ID;
 717                                 gace->aceWho = ACE4_SPECIAL_OWNER;
 718                         }
 719                         break;
 720                 case SMB_ACE4_WHO_GROUP:
 721                         gace->aceIFlags = ACE4_IFLAG_SPECIAL_ID;
 722                         gace->aceWho = ACE4_SPECIAL_GROUP;
 723                         break;
 724                 default:
 725                         DBG_WARNING("Unsupported special_id %d\n",
 726                                     nfs4_ace->who.special_id);
 727                         return false;
 728                 }
 729
 730                 return true;
 731         }
 732
 733         gace->aceIFlags = 0;
 734         gace->aceWho = (nfs4_ace->aceFlags & SMB_ACE4_IDENTIFIER_GROUP) ?
 735                 nfs4_ace->who.gid : nfs4_ace->who.uid;
 736
 737         return true;
 738 }
 739
 740 static struct gpfs_acl *vfs_gpfs_smbacl2gpfsacl(TALLOC_CTX *mem_ctx,
 741                                                 files_struct *fsp,
 742                                                 struct SMB4ACL_T *smbacl,
 743                                                 bool controlflags)
 744 {
 745         struct gpfs_acl *gacl;
 746         gpfs_aclLen_t gacl_len;
 747         struct SMB4ACE_T *smbace;
 748
 749         gacl_len = offsetof(gpfs_acl_t, ace_v4) + sizeof(unsigned int)
 750                 + smb_get_naces(smbacl) * sizeof(gpfs_ace_v4_t);
 751
 752         gacl = (struct gpfs_acl *)TALLOC_SIZE(mem_ctx, gacl_len);
 753         if (gacl == NULL) {
 754                 DEBUG(0, ("talloc failed\n"));
 755                 errno = ENOMEM;
 756                 return NULL;
 757         }
 758
 759         gacl->acl_level = GPFS_ACL_LEVEL_BASE;
 760         gacl->acl_version = GPFS_ACL_VERSION_NFS4;
 761         gacl->acl_type = GPFS_ACL_TYPE_NFS4;
 762         gacl->acl_nace = 0; /* change later... */
 763
 764         if (controlflags) {
 765                 gacl->acl_level = GPFS_ACL_LEVEL_V4FLAGS;
 766                 sd2gpfs_control(smbacl4_get_controlflags(smbacl), gacl);
 767         }
 768
 769         for (smbace=smb_first_ace4(smbacl); smbace!=NULL; smbace = smb_next_ace4(smbace)) {
 770                 struct gpfs_ace_v4 *gace = gpfs_ace_ptr(gacl, gacl->acl_nace);
 771                 SMB_ACE4PROP_T  *aceprop = smb_get_ace4(smbace);
 772                 bool add_ace;
 773
 774                 add_ace = vfs_gpfs_nfs4_ace_to_gpfs_ace(aceprop, gace,
 775                                                         fsp->fsp_name->st.st_ex_uid);
 776                 if (!add_ace) {
 777                         continue;
 778                 }
 779
 780                 gacl->acl_nace++;
 781         }
 782         gacl->acl_len = (char *)gpfs_ace_ptr(gacl, gacl->acl_nace)
 783                 - (char *)gacl;
 784         return gacl;
 785 }
 786
 787 static bool gpfsacl_process_smbacl(vfs_handle_struct *handle,
 788                                    files_struct *fsp,
 789                                    struct SMB4ACL_T *smbacl)
 790 {
 791         int ret;
 792         struct gpfs_acl *gacl;
 793         TALLOC_CTX *mem_ctx = talloc_tos();
 794
 795         gacl = vfs_gpfs_smbacl2gpfsacl(mem_ctx, fsp, smbacl, true);
 796         if (gacl == NULL) { /* out of memory */
 797                 return False;
 798         }
 799         ret = gpfswrap_putacl(fsp->fsp_name->base_name,
 800                               GPFS_PUTACL_STRUCT | GPFS_ACL_SAMBA, gacl);
 801
 802         if ((ret != 0) && (errno == EINVAL)) {
 803                 DEBUG(10, ("Retry without nfs41 control flags\n"));
 804                 talloc_free(gacl);
 805                 gacl = vfs_gpfs_smbacl2gpfsacl(mem_ctx, fsp, smbacl, false);
 806                 if (gacl == NULL) { /* out of memory */
 807                         return False;
 808                 }
 809                 ret = gpfswrap_putacl(fsp->fsp_name->base_name,
 810                                       GPFS_PUTACL_STRUCT | GPFS_ACL_SAMBA,
 811                                       gacl);
 812         }
 813
 814         if (ret != 0) {
 815                 DEBUG(8, ("gpfs_putacl failed with %s\n", strerror(errno)));
 816                 gpfs_dumpacl(8, gacl);
 817                 return False;
 818         }
 819
 820         DEBUG(10, ("gpfs_putacl succeeded\n"));
 821         return True;
 822 }
 823
 824 static NTSTATUS gpfsacl_set_nt_acl_internal(vfs_handle_struct *handle, files_struct *fsp, uint32_t security_info_sent, const struct security_descriptor *psd)
 825 {
 826         struct gpfs_acl *acl;
 827         NTSTATUS result = NT_STATUS_ACCESS_DENIED;
 828
 829         acl = (struct gpfs_acl*) vfs_gpfs_getacl(talloc_tos(),
 830                                                  fsp->fsp_name->base_name,
 831                                                  false, 0);
 832         if (acl == NULL) {
 833                 return map_nt_error_from_unix(errno);
 834         }
 835
 836         if (acl->acl_version == GPFS_ACL_VERSION_NFS4) {
 837                 struct gpfs_config_data *config;
 838
 839                 if (lp_parm_bool(fsp->conn->params->service, "gpfs",
 840                                  "refuse_dacl_protected", false)
 841                     && (psd->type&SEC_DESC_DACL_PROTECTED)) {
 842                         DEBUG(2, ("Rejecting unsupported ACL with DACL_PROTECTED bit set\n"));
 843                         talloc_free(acl);
 844                         return NT_STATUS_NOT_SUPPORTED;
 845                 }
 846
 847                 SMB_VFS_HANDLE_GET_DATA(handle, config,
 848                                         struct gpfs_config_data,
 849                                         return NT_STATUS_INTERNAL_ERROR);
 850
 851                 result = smb_set_nt_acl_nfs4(handle,
 852                         fsp, &config->nfs4_params, security_info_sent, psd,
 853                         gpfsacl_process_smbacl);
 854         } else { /* assume POSIX ACL - by default... */
 855                 result = set_nt_acl(fsp, security_info_sent, psd);
 856         }
 857
 858         talloc_free(acl);
 859         return result;
 860 }
 861
 862 static NTSTATUS gpfsacl_fset_nt_acl(vfs_handle_struct *handle, files_struct *fsp, uint32_t security_info_sent, const struct security_descriptor *psd)
 863 {
 864         struct gpfs_config_data *config;
 865
 866         SMB_VFS_HANDLE_GET_DATA(handle, config,
 867                                 struct gpfs_config_data,
 868                                 return NT_STATUS_INTERNAL_ERROR);
 869
 870         if (!config->acl) {
 871                 return SMB_VFS_NEXT_FSET_NT_ACL(handle, fsp, security_info_sent, psd);
 872         }
 873
 874         return gpfsacl_set_nt_acl_internal(handle, fsp, security_info_sent, psd);
 875 }
 876
 877 static SMB_ACL_T gpfs2smb_acl(const struct gpfs_acl *pacl, TALLOC_CTX *mem_ctx)
 878 {
 879         SMB_ACL_T result;
 880         gpfs_aclCount_t i;
 881
 882         result = sys_acl_init(mem_ctx);
 883         if (result == NULL) {
 884                 errno = ENOMEM;
 885                 return NULL;
 886         }
 887
 888         result->count = pacl->acl_nace;
 889         result->acl = talloc_realloc(result, result->acl, struct smb_acl_entry,
 890                                      result->count);
 891         if (result->acl == NULL) {
 892                 TALLOC_FREE(result);
 893                 errno = ENOMEM;
 894                 return NULL;
 895         }
 896
 897         for (i=0; i<pacl->acl_nace; i++) {
 898                 struct smb_acl_entry *ace = &result->acl[i];
 899                 const struct gpfs_ace_v1 *g_ace = &pacl->ace_v1[i];
 900
 901                 DEBUG(10, ("Converting type %d id %lu perm %x\n",
 902                            (int)g_ace->ace_type, (unsigned long)g_ace->ace_who,
 903                            (int)g_ace->ace_perm));
 904
 905                 switch (g_ace->ace_type) {
 906                 case GPFS_ACL_USER:
 907                         ace->a_type = SMB_ACL_USER;
 908                         ace->info.user.uid = (uid_t)g_ace->ace_who;
 909                         break;
 910                 case GPFS_ACL_USER_OBJ:
 911                         ace->a_type = SMB_ACL_USER_OBJ;
 912                         break;
 913                 case GPFS_ACL_GROUP:
 914                         ace->a_type = SMB_ACL_GROUP;
 915                         ace->info.group.gid = (gid_t)g_ace->ace_who;
 916                         break;
 917                 case GPFS_ACL_GROUP_OBJ:
 918                         ace->a_type = SMB_ACL_GROUP_OBJ;
 919                         break;
 920                 case GPFS_ACL_OTHER:
 921                         ace->a_type = SMB_ACL_OTHER;
 922                         break;
 923                 case GPFS_ACL_MASK:
 924                         ace->a_type = SMB_ACL_MASK;
 925                         break;
 926                 default:
 927                         DEBUG(10, ("Got invalid ace_type: %d\n",
 928                                    g_ace->ace_type));
 929                         TALLOC_FREE(result);
 930                         errno = EINVAL;
 931                         return NULL;
 932                 }
 933
 934                 ace->a_perm = 0;
 935                 ace->a_perm |= (g_ace->ace_perm & ACL_PERM_READ) ?
 936                         SMB_ACL_READ : 0;
 937                 ace->a_perm |= (g_ace->ace_perm & ACL_PERM_WRITE) ?
 938                         SMB_ACL_WRITE : 0;
 939                 ace->a_perm |= (g_ace->ace_perm & ACL_PERM_EXECUTE) ?
 940                         SMB_ACL_EXECUTE : 0;
 941
 942                 DEBUGADD(10, ("Converted to %d perm %x\n",
 943                               ace->a_type, ace->a_perm));
 944         }
 945
 946         return result;
 947 }
 948
 949 static SMB_ACL_T gpfsacl_get_posix_acl(const char *path, gpfs_aclType_t type,
 950                                        TALLOC_CTX *mem_ctx)
 951 {
 952         struct gpfs_acl *pacl;
 953         SMB_ACL_T result = NULL;
 954
 955         pacl = vfs_gpfs_getacl(talloc_tos(), path, false, type);
 956
 957         if (pacl == NULL) {
 958                 DEBUG(10, ("vfs_gpfs_getacl failed for %s with %s\n",
 959                            path, strerror(errno)));
 960                 if (errno == 0) {
 961                         errno = EINVAL;
 962                 }
 963                 goto done;
 964         }
 965
 966         if (pacl->acl_version != GPFS_ACL_VERSION_POSIX) {
 967                 DEBUG(10, ("Got acl version %d, expected %d\n",
 968                            pacl->acl_version, GPFS_ACL_VERSION_POSIX));
 969                 errno = EINVAL;
 970                 goto done;
 971         }
 972
 973         DEBUG(10, ("len: %d, level: %d, version: %d, nace: %d\n",
 974                    pacl->acl_len, pacl->acl_level, pacl->acl_version,
 975                    pacl->acl_nace));
 976
 977         result = gpfs2smb_acl(pacl, mem_ctx);
 978         if (result != NULL) {
 979                 errno = 0;
 980         }
 981
 982  done:
 983
 984         if (pacl != NULL) {
 985                 talloc_free(pacl);
 986         }
 987         if (errno != 0) {
 988                 TALLOC_FREE(result);
 989         }
 990         return result;
 991 }
 992
 993 static SMB_ACL_T gpfsacl_sys_acl_get_fd(vfs_handle_struct *handle,
 994                                         files_struct *fsp,
 995                                         SMB_ACL_TYPE_T type,
 996                                         TALLOC_CTX *mem_ctx)
 997 {
 998         gpfs_aclType_t gpfs_type;
 999         struct gpfs_config_data *config;
1000
1001         SMB_VFS_HANDLE_GET_DATA(handle, config,
1002                                 struct gpfs_config_data,
1003                                 return NULL);
1004
1005         if (!config->acl) {
1006                 return SMB_VFS_NEXT_SYS_ACL_GET_FD(handle, fsp, type, mem_ctx);
1007         }
1008
1009         switch(type) {
1010         case SMB_ACL_TYPE_ACCESS:
1011                 gpfs_type = GPFS_ACL_TYPE_ACCESS;
1012                 break;
1013         case SMB_ACL_TYPE_DEFAULT:
1014                 gpfs_type = GPFS_ACL_TYPE_DEFAULT;
1015                 break;
1016         default:
1017                 DEBUG(0, ("Got invalid type: %d\n", type));
1018                 smb_panic("exiting");
1019         }
1020         return gpfsacl_get_posix_acl(fsp->fsp_name->base_name,
1021                                      gpfs_type, mem_ctx);
1022 }
1023
1024 static int gpfsacl_sys_acl_blob_get_fd(vfs_handle_struct *handle,
1025                                       files_struct *fsp,
1026                                       TALLOC_CTX *mem_ctx,
1027                                       char **blob_description,
1028                                       DATA_BLOB *blob)
1029 {
1030         struct gpfs_config_data *config;
1031         struct gpfs_opaque_acl *acl = NULL;
1032         DATA_BLOB aclblob;
1033         int result;
1034
1035         SMB_VFS_HANDLE_GET_DATA(handle, config,
1036                                 struct gpfs_config_data,
1037                                 return -1);
1038
1039         if (!config->acl) {
1040                 return SMB_VFS_NEXT_SYS_ACL_BLOB_GET_FD(handle, fsp, mem_ctx,
1041                                                         blob_description, blob);
1042         }
1043
1044         errno = 0;
1045         acl = (struct gpfs_opaque_acl *) vfs_gpfs_getacl(mem_ctx,
1046                                                 fsp->fsp_name->base_name,
1047                                                 true,
1048                                                 GPFS_ACL_TYPE_NFS4);
1049
1050         if (errno) {
1051                 DEBUG(5, ("vfs_gpfs_getacl finished with errno %d: %s\n",
1052                                         errno, strerror(errno)));
1053
1054                 /* EINVAL means POSIX ACL, bail out on other cases */
1055                 if (errno != EINVAL) {
1056                         return -1;
1057                 }
1058         }
1059
1060         if (acl != NULL) {
1061                 /*
1062                  * file has NFSv4 ACL
1063                  *
1064                  * we only need the actual ACL blob here
1065                  * acl_version will always be NFS4 because we asked
1066                  * for NFS4
1067                  * acl_type is only used for POSIX ACLs
1068                  */
1069                 aclblob.data = (uint8_t*) acl->acl_var_data;
1070                 aclblob.length = acl->acl_buffer_len;
1071
1072                 *blob_description = talloc_strdup(mem_ctx, "gpfs_nfs4_acl");
1073                 if (!*blob_description) {
1074                         talloc_free(acl);
1075                         errno = ENOMEM;
1076                         return -1;
1077                 }
1078
1079                 result = non_posix_sys_acl_blob_get_fd_helper(handle, fsp,
1080                                                               aclblob, mem_ctx,
1081                                                               blob);
1082
1083                 talloc_free(acl);
1084                 return result;
1085         }
1086
1087         /* fall back to POSIX ACL */
1088         return posix_sys_acl_blob_get_fd(handle, fsp, mem_ctx,
1089                                          blob_description, blob);
1090 }
1091
1092 static struct gpfs_acl *smb2gpfs_acl(const SMB_ACL_T pacl,
1093                                      SMB_ACL_TYPE_T type)
1094 {
1095         gpfs_aclLen_t len;
1096         struct gpfs_acl *result;
1097         int i;
1098
1099         DEBUG(10, ("smb2gpfs_acl: Got ACL with %d entries\n", pacl->count));
1100
1101         len = offsetof(gpfs_acl_t, ace_v1) + (pacl->count) *
1102                 sizeof(gpfs_ace_v1_t);
1103
1104         result = (struct gpfs_acl *)SMB_MALLOC(len);
1105         if (result == NULL) {
1106                 errno = ENOMEM;
1107                 return result;
1108         }
1109
1110         result->acl_len = len;
1111         result->acl_level = 0;
1112         result->acl_version = GPFS_ACL_VERSION_POSIX;
1113         result->acl_type = (type == SMB_ACL_TYPE_DEFAULT) ?
1114                 GPFS_ACL_TYPE_DEFAULT : GPFS_ACL_TYPE_ACCESS;
1115         result->acl_nace = pacl->count;
1116
1117         for (i=0; i<pacl->count; i++) {
1118                 const struct smb_acl_entry *ace = &pacl->acl[i];
1119                 struct gpfs_ace_v1 *g_ace = &result->ace_v1[i];
1120
1121                 DEBUG(10, ("Converting type %d perm %x\n",
1122                            (int)ace->a_type, (int)ace->a_perm));
1123
1124                 g_ace->ace_perm = 0;
1125
1126                 switch(ace->a_type) {
1127                 case SMB_ACL_USER:
1128                         g_ace->ace_type = GPFS_ACL_USER;
1129                         g_ace->ace_who = (gpfs_uid_t)ace->info.user.uid;
1130                         break;
1131                 case SMB_ACL_USER_OBJ:
1132                         g_ace->ace_type = GPFS_ACL_USER_OBJ;
1133                         g_ace->ace_perm |= ACL_PERM_CONTROL;
1134                         g_ace->ace_who = 0;
1135                         break;
1136                 case SMB_ACL_GROUP:
1137                         g_ace->ace_type = GPFS_ACL_GROUP;
1138                         g_ace->ace_who = (gpfs_uid_t)ace->info.group.gid;
1139                         break;
1140                 case SMB_ACL_GROUP_OBJ:
1141                         g_ace->ace_type = GPFS_ACL_GROUP_OBJ;
1142                         g_ace->ace_who = 0;
1143                         break;
1144                 case SMB_ACL_MASK:
1145                         g_ace->ace_type = GPFS_ACL_MASK;
1146                         g_ace->ace_perm = 0x8f;
1147                         g_ace->ace_who = 0;
1148                         break;
1149                 case SMB_ACL_OTHER:
1150                         g_ace->ace_type = GPFS_ACL_OTHER;
1151                         g_ace->ace_who = 0;
1152                         break;
1153                 default:
1154                         DEBUG(10, ("Got invalid ace_type: %d\n", ace->a_type));
1155                         errno = EINVAL;
1156                         SAFE_FREE(result);
1157                         return NULL;
1158                 }
1159
1160                 g_ace->ace_perm |= (ace->a_perm & SMB_ACL_READ) ?
1161                         ACL_PERM_READ : 0;
1162                 g_ace->ace_perm |= (ace->a_perm & SMB_ACL_WRITE) ?
1163                         ACL_PERM_WRITE : 0;
1164                 g_ace->ace_perm |= (ace->a_perm & SMB_ACL_EXECUTE) ?
1165                         ACL_PERM_EXECUTE : 0;
1166
1167                 DEBUGADD(10, ("Converted to %d id %d perm %x\n",
1168                               g_ace->ace_type, g_ace->ace_who, g_ace->ace_perm));
1169         }
1170
1171         return result;
1172 }
1173
1174 static int gpfsacl_sys_acl_set_fd(vfs_handle_struct *handle,
1175                                   files_struct *fsp,
1176                                   SMB_ACL_TYPE_T type,
1177                                   SMB_ACL_T theacl)
1178 {
1179         struct gpfs_config_data *config;
1180         struct gpfs_acl *gpfs_acl = NULL;
1181         int result;
1182
1183         SMB_VFS_HANDLE_GET_DATA(handle, config,
1184                                 struct gpfs_config_data,
1185                                 return -1);
1186
1187         if (!config->acl) {
1188                 return SMB_VFS_NEXT_SYS_ACL_SET_FD(handle, fsp, type, theacl);
1189         }
1190
1191         gpfs_acl = smb2gpfs_acl(theacl, type);
1192         if (gpfs_acl == NULL) {
1193                 return -1;
1194         }
1195
1196         /*
1197          * This is no longer a handle based call.
1198          */
1199         result = gpfswrap_putacl(fsp->fsp_name->base_name,
1200                                  GPFS_PUTACL_STRUCT|GPFS_ACL_SAMBA,
1201                                  gpfs_acl);
1202         SAFE_FREE(gpfs_acl);
1203         return result;
1204 }
1205
1206 static int gpfsacl_sys_acl_delete_def_fd(vfs_handle_struct *handle,
1207                                 files_struct *fsp)
1208 {
1209         struct gpfs_config_data *config;
1210
1211         SMB_VFS_HANDLE_GET_DATA(handle, config,
1212                                 struct gpfs_config_data,
1213                                 return -1);
1214
1215         if (!config->acl) {
1216                 return SMB_VFS_NEXT_SYS_ACL_DELETE_DEF_FD(handle, fsp);
1217         }
1218
1219         errno = ENOTSUP;
1220         return -1;
1221 }
1222
1223
1224 /*
1225  * Assumed: mode bits are shiftable and standard
1226  * Output: the new aceMask field for an smb nfs4 ace
1227  */
1228 static uint32_t gpfsacl_mask_filter(uint32_t aceType, uint32_t aceMask, uint32_t rwx)
1229 {
1230         const uint32_t posix_nfs4map[3] = {
1231                 SMB_ACE4_EXECUTE, /* execute */
1232                 SMB_ACE4_WRITE_DATA | SMB_ACE4_APPEND_DATA, /* write; GPFS specific */
1233                 SMB_ACE4_READ_DATA /* read */
1234         };
1235         int     i;
1236         uint32_t        posix_mask = 0x01;
1237         uint32_t        posix_bit;
1238         uint32_t        nfs4_bits;
1239
1240         for(i=0; i<3; i++) {
1241                 nfs4_bits = posix_nfs4map[i];
1242                 posix_bit = rwx & posix_mask;
1243
1244                 if (aceType==SMB_ACE4_ACCESS_ALLOWED_ACE_TYPE) {
1245                         if (posix_bit)
1246                                 aceMask |= nfs4_bits;
1247                         else
1248                                 aceMask &= ~nfs4_bits;
1249                 } else {
1250                         /* add deny bits when suitable */
1251                         if (!posix_bit)
1252                                 aceMask |= nfs4_bits;
1253                         else
1254                                 aceMask &= ~nfs4_bits;
1255                 } /* other ace types are unexpected */
1256
1257                 posix_mask <<= 1;
1258         }
1259
1260         return aceMask;
1261 }
1262
1263 static int gpfsacl_emu_chmod(vfs_handle_struct *handle,
1264                              const struct smb_filename *fname, mode_t mode)
1265 {
1266         char *path = fname->base_name;
1267         struct SMB4ACL_T *pacl = NULL;
1268         int     result;
1269         bool    haveAllowEntry[SMB_ACE4_WHO_EVERYONE + 1] = {False, False, False, False};
1270         int     i;
1271         files_struct fake_fsp = { 0 }; /* TODO: rationalize parametrization */
1272         struct SMB4ACE_T *smbace;
1273         TALLOC_CTX *frame = talloc_stackframe();
1274
1275         DEBUG(10, ("gpfsacl_emu_chmod invoked for %s mode %o\n", path, mode));
1276
1277         result = gpfs_get_nfs4_acl(frame, path, &pacl);
1278         if (result) {
1279                 TALLOC_FREE(frame);
1280                 return result;
1281         }
1282
1283         if (mode & ~(S_IRWXU | S_IRWXG | S_IRWXO)) {
1284                 DEBUG(2, ("WARNING: cutting extra mode bits %o on %s\n", mode, path));
1285         }
1286
1287         for (smbace=smb_first_ace4(pacl); smbace!=NULL; smbace = smb_next_ace4(smbace)) {
1288                 SMB_ACE4PROP_T  *ace = smb_get_ace4(smbace);
1289                 uint32_t        specid = ace->who.special_id;
1290
1291                 if (ace->flags&SMB_ACE4_ID_SPECIAL &&
1292                     ace->aceType<=SMB_ACE4_ACCESS_DENIED_ACE_TYPE &&
1293                     specid <= SMB_ACE4_WHO_EVERYONE) {
1294
1295                         uint32_t newMask;
1296
1297                         if (ace->aceType==SMB_ACE4_ACCESS_ALLOWED_ACE_TYPE)
1298                                 haveAllowEntry[specid] = True;
1299
1300                         /* mode >> 6 for @owner, mode >> 3 for @group,
1301                          * mode >> 0 for @everyone */
1302                         newMask = gpfsacl_mask_filter(ace->aceType, ace->aceMask,
1303                                                       mode >> ((SMB_ACE4_WHO_EVERYONE - specid) * 3));
1304                         if (ace->aceMask!=newMask) {
1305                                 DEBUG(10, ("ace changed for %s (%o -> %o) id=%d\n",
1306                                            path, ace->aceMask, newMask, specid));
1307                         }
1308                         ace->aceMask = newMask;
1309                 }
1310         }
1311
1312         /* make sure we have at least ALLOW entries
1313          * for all the 3 special ids (@EVERYONE, @OWNER, @GROUP)
1314          * - if necessary
1315          */
1316         for(i = SMB_ACE4_WHO_OWNER; i<=SMB_ACE4_WHO_EVERYONE; i++) {
1317                 SMB_ACE4PROP_T ace = { 0 };
1318
1319                 if (haveAllowEntry[i]==True)
1320                         continue;
1321
1322                 ace.aceType = SMB_ACE4_ACCESS_ALLOWED_ACE_TYPE;
1323                 ace.flags |= SMB_ACE4_ID_SPECIAL;
1324                 ace.who.special_id = i;
1325
1326                 if (i==SMB_ACE4_WHO_GROUP) /* not sure it's necessary... */
1327                         ace.aceFlags |= SMB_ACE4_IDENTIFIER_GROUP;
1328
1329                 ace.aceMask = gpfsacl_mask_filter(ace.aceType, ace.aceMask,
1330                                                   mode >> ((SMB_ACE4_WHO_EVERYONE - i) * 3));
1331
1332                 /* don't add unnecessary aces */
1333                 if (!ace.aceMask)
1334                         continue;
1335
1336                 /* we add it to the END - as windows expects allow aces */
1337                 smb_add_ace4(pacl, &ace);
1338                 DEBUG(10, ("Added ALLOW ace for %s, mode=%o, id=%d, aceMask=%x\n",
1339                            path, mode, i, ace.aceMask));
1340         }
1341
1342         /* don't add complementary DENY ACEs here */
1343         fake_fsp.fsp_name = synthetic_smb_fname(frame,
1344                                                 path,
1345                                                 NULL,
1346                                                 NULL,
1347                                                 fname->twrp,
1348                                                 0);
1349         if (fake_fsp.fsp_name == NULL) {
1350                 errno = ENOMEM;
1351                 TALLOC_FREE(frame);
1352                 return -1;
1353         }
1354         /* put the acl */
1355         if (gpfsacl_process_smbacl(handle, &fake_fsp, pacl) == False) {
1356                 TALLOC_FREE(frame);
1357                 return -1;
1358         }
1359
1360         TALLOC_FREE(frame);
1361         return 0; /* ok for [f]chmod */
1362 }
1363
1364 static int vfs_gpfs_fchmod(vfs_handle_struct *handle, files_struct *fsp, mode_t mode)
1365 {
1366                  SMB_STRUCT_STAT st;
1367                  int rc;
1368
1369                  if (SMB_VFS_NEXT_FSTAT(handle, fsp, &st) != 0) {
1370                          return -1;
1371                  }
1372
1373                  /* avoid chmod() if possible, to preserve acls */
1374                  if ((st.st_ex_mode & ~S_IFMT) == mode) {
1375                          return 0;
1376                  }
1377
1378                  rc = gpfsacl_emu_chmod(handle, fsp->fsp_name,
1379                                         mode);
1380                  if (rc == 1)
1381                          return SMB_VFS_NEXT_FCHMOD(handle, fsp, mode);
1382                  return rc;
1383 }
1384
1385 static uint32_t vfs_gpfs_winattrs_to_dosmode(unsigned int winattrs)
1386 {
1387         uint32_t dosmode = 0;
1388
1389         if (winattrs & GPFS_WINATTR_ARCHIVE){
1390                 dosmode |= FILE_ATTRIBUTE_ARCHIVE;
1391         }
1392         if (winattrs & GPFS_WINATTR_HIDDEN){
1393                 dosmode |= FILE_ATTRIBUTE_HIDDEN;
1394         }
1395         if (winattrs & GPFS_WINATTR_SYSTEM){
1396                 dosmode |= FILE_ATTRIBUTE_SYSTEM;
1397         }
1398         if (winattrs & GPFS_WINATTR_READONLY){
1399                 dosmode |= FILE_ATTRIBUTE_READONLY;
1400         }
1401         if (winattrs & GPFS_WINATTR_SPARSE_FILE) {
1402                 dosmode |= FILE_ATTRIBUTE_SPARSE;
1403         }
1404         if (winattrs & GPFS_WINATTR_OFFLINE) {
1405                 dosmode |= FILE_ATTRIBUTE_OFFLINE;
1406         }
1407
1408         return dosmode;
1409 }
1410
1411 static unsigned int vfs_gpfs_dosmode_to_winattrs(uint32_t dosmode)
1412 {
1413         unsigned int winattrs = 0;
1414
1415         if (dosmode & FILE_ATTRIBUTE_ARCHIVE){
1416                 winattrs |= GPFS_WINATTR_ARCHIVE;
1417         }
1418         if (dosmode & FILE_ATTRIBUTE_HIDDEN){
1419                 winattrs |= GPFS_WINATTR_HIDDEN;
1420         }
1421         if (dosmode & FILE_ATTRIBUTE_SYSTEM){
1422                 winattrs |= GPFS_WINATTR_SYSTEM;
1423         }
1424         if (dosmode & FILE_ATTRIBUTE_READONLY){
1425                 winattrs |= GPFS_WINATTR_READONLY;
1426         }
1427         if (dosmode & FILE_ATTRIBUTE_SPARSE) {
1428                 winattrs |= GPFS_WINATTR_SPARSE_FILE;
1429         }
1430         if (dosmode & FILE_ATTRIBUTE_OFFLINE) {
1431                 winattrs |= GPFS_WINATTR_OFFLINE;
1432         }
1433
1434         return winattrs;
1435 }
1436
1437 static NTSTATUS vfs_gpfs_get_file_id(struct gpfs_iattr64 *iattr,
1438                                      uint64_t *fileid)
1439 {
1440         uint8_t input[sizeof(gpfs_ino64_t) +
1441                       sizeof(gpfs_gen64_t) +
1442                       sizeof(gpfs_snapid64_t)];
1443         uint8_t digest[gnutls_hash_get_len(GNUTLS_DIG_SHA1)];
1444         int rc;
1445
1446         DBG_DEBUG("ia_inode 0x%llx, ia_gen 0x%llx, ia_modsnapid 0x%llx\n",
1447                   iattr->ia_inode, iattr->ia_gen, iattr->ia_modsnapid);
1448
1449         SBVAL(input,
1450               0, iattr->ia_inode);
1451         SBVAL(input,
1452               sizeof(gpfs_ino64_t), iattr->ia_gen);
1453         SBVAL(input,
1454               sizeof(gpfs_ino64_t) + sizeof(gpfs_gen64_t), iattr->ia_modsnapid);
1455
1456         GNUTLS_FIPS140_SET_LAX_MODE();
1457         rc = gnutls_hash_fast(GNUTLS_DIG_SHA1, input, sizeof(input), &digest);
1458         GNUTLS_FIPS140_SET_STRICT_MODE();
1459
1460         if (rc != 0) {
1461                 return gnutls_error_to_ntstatus(rc,
1462                                                 NT_STATUS_HASH_NOT_SUPPORTED);
1463         }
1464
1465         memcpy(fileid, &digest, sizeof(*fileid));
1466         DBG_DEBUG("file_id 0x%" PRIx64 "\n", *fileid);
1467
1468         return NT_STATUS_OK;
1469 }
1470
1471 static struct timespec gpfs_timestruc64_to_timespec(struct gpfs_timestruc64 g)
1472 {
1473         return (struct timespec) { .tv_sec = g.tv_sec, .tv_nsec = g.tv_nsec };
1474 }
1475
1476 static NTSTATUS vfs_gpfs_fget_dos_attributes(struct vfs_handle_struct *handle,
1477                                              struct files_struct *fsp,
1478                                              uint32_t *dosmode)
1479 {
1480         struct gpfs_config_data *config;
1481         int fd = fsp_get_pathref_fd(fsp);
1482         char buf[PATH_MAX];
1483         const char *p = NULL;
1484         struct gpfs_iattr64 iattr = { };
1485         unsigned int litemask = 0;
1486         struct timespec ts;
1487         uint64_t file_id;
1488         NTSTATUS status;
1489         int ret;
1490
1491         SMB_VFS_HANDLE_GET_DATA(handle, config,
1492                                 struct gpfs_config_data,
1493                                 return NT_STATUS_INTERNAL_ERROR);
1494
1495         if (!config->winattr) {
1496                 return SMB_VFS_NEXT_FGET_DOS_ATTRIBUTES(handle, fsp, dosmode);
1497         }
1498
1499         if (fsp->fsp_flags.is_pathref && !config->pathref_ok.gpfs_fstat_x) {
1500                 if (fsp->fsp_flags.have_proc_fds) {
1501                         p = sys_proc_fd_path(fd, buf, sizeof(buf));
1502                         if (p == NULL) {
1503                                 return NT_STATUS_NO_MEMORY;
1504                         }
1505                 } else {
1506                         p = fsp->fsp_name->base_name;
1507                 }
1508         }
1509
1510         if (p != NULL) {
1511                 ret = gpfswrap_stat_x(p, &litemask, &iattr, sizeof(iattr));
1512         } else {
1513                 ret = gpfswrap_fstat_x(fd, &litemask, &iattr, sizeof(iattr));
1514         }
1515         if (ret == -1 && errno == ENOSYS) {
1516                 return SMB_VFS_NEXT_FGET_DOS_ATTRIBUTES(handle, fsp, dosmode);
1517         }
1518
1519         if (ret == -1 && errno == EACCES) {
1520                 int saved_errno = 0;
1521
1522                 /*
1523                  * According to MS-FSA 2.1.5.1.2.1 "Algorithm to Check Access to
1524                  * an Existing File" FILE_LIST_DIRECTORY on a directory implies
1525                  * FILE_READ_ATTRIBUTES for directory entries. Being able to
1526                  * open a file implies FILE_LIST_DIRECTORY.
1527                  */
1528
1529                 set_effective_capability(DAC_OVERRIDE_CAPABILITY);
1530
1531                 if (p != NULL) {
1532                         ret = gpfswrap_stat_x(p,
1533                                               &litemask,
1534                                               &iattr,
1535                                               sizeof(iattr));
1536                 } else {
1537                         ret = gpfswrap_fstat_x(fd,
1538                                                &litemask,
1539                                                &iattr,
1540                                                sizeof(iattr));
1541                 }
1542                 if (ret == -1) {
1543                         saved_errno = errno;
1544                 }
1545
1546                 drop_effective_capability(DAC_OVERRIDE_CAPABILITY);
1547
1548                 if (saved_errno != 0) {
1549                         errno = saved_errno;
1550                 }
1551         }
1552
1553         if (ret == -1) {
1554                 DBG_WARNING("Getting winattrs failed for %s: %s\n",
1555                             fsp->fsp_name->base_name, strerror(errno));
1556                 return map_nt_error_from_unix(errno);
1557         }
1558
1559         ZERO_STRUCT(file_id);
1560         status = vfs_gpfs_get_file_id(&iattr, &file_id);
1561         if (!NT_STATUS_IS_OK(status)) {
1562                 return status;
1563         }
1564
1565         ts = gpfs_timestruc64_to_timespec(iattr.ia_createtime);
1566
1567         *dosmode |= vfs_gpfs_winattrs_to_dosmode(iattr.ia_winflags);
1568         update_stat_ex_create_time(&fsp->fsp_name->st, ts);
1569         update_stat_ex_file_id(&fsp->fsp_name->st, file_id);
1570
1571         return NT_STATUS_OK;
1572 }
1573
1574 static NTSTATUS vfs_gpfs_fset_dos_attributes(struct vfs_handle_struct *handle,
1575                                              struct files_struct *fsp,
1576                                              uint32_t dosmode)
1577 {
1578         struct gpfs_config_data *config;
1579         struct gpfs_winattr attrs = { };
1580         int ret;
1581
1582         SMB_VFS_HANDLE_GET_DATA(handle, config,
1583                                 struct gpfs_config_data,
1584                                 return NT_STATUS_INTERNAL_ERROR);
1585
1586         if (!config->winattr) {
1587                 return SMB_VFS_NEXT_FSET_DOS_ATTRIBUTES(handle, fsp, dosmode);
1588         }
1589
1590         attrs.winAttrs = vfs_gpfs_dosmode_to_winattrs(dosmode);
1591
1592         if (!fsp->fsp_flags.is_pathref) {
1593                 ret = gpfswrap_set_winattrs(fsp_get_io_fd(fsp),
1594                                             GPFS_WINATTR_SET_ATTRS, &attrs);
1595                 if (ret == -1) {
1596                         DBG_WARNING("Setting winattrs failed for %s: %s\n",
1597                                     fsp_str_dbg(fsp), strerror(errno));
1598                         return map_nt_error_from_unix(errno);
1599                 }
1600                 return NT_STATUS_OK;
1601         }
1602
1603         if (fsp->fsp_flags.have_proc_fds) {
1604                 int fd = fsp_get_pathref_fd(fsp);
1605                 const char *p = NULL;
1606                 char buf[PATH_MAX];
1607
1608                 p = sys_proc_fd_path(fd, buf, sizeof(buf));
1609                 if (p == NULL) {
1610                         return NT_STATUS_NO_MEMORY;
1611                 }
1612
1613                 ret = gpfswrap_set_winattrs_path(p,
1614                                                  GPFS_WINATTR_SET_ATTRS,
1615                                                  &attrs);
1616                 if (ret == -1) {
1617                         DBG_WARNING("Setting winattrs failed for [%s][%s]: %s\n",
1618                                     p, fsp_str_dbg(fsp), strerror(errno));
1619                         return map_nt_error_from_unix(errno);
1620                 }
1621                 return NT_STATUS_OK;
1622         }
1623
1624         /*
1625          * This is no longer a handle based call.
1626          */
1627         ret = gpfswrap_set_winattrs_path(fsp->fsp_name->base_name,
1628                                          GPFS_WINATTR_SET_ATTRS,
1629                                          &attrs);
1630         if (ret == -1) {
1631                 DBG_WARNING("Setting winattrs failed for [%s]: %s\n",
1632                             fsp_str_dbg(fsp), strerror(errno));
1633                 return map_nt_error_from_unix(errno);
1634         }
1635
1636         return NT_STATUS_OK;
1637 }
1638
1639 static int stat_with_capability(struct vfs_handle_struct *handle,
1640                                 struct smb_filename *smb_fname, int flag)
1641 {
1642         int fd = -1;
1643         NTSTATUS status;
1644         struct smb_filename *dir_name = NULL;
1645         struct smb_filename *rel_name = NULL;
1646         struct stat st;
1647         int ret = -1;
1648
1649         status = SMB_VFS_PARENT_PATHNAME(handle->conn,
1650                                          talloc_tos(),
1651                                          smb_fname,
1652                                          &dir_name,
1653                                          &rel_name);
1654         if (!NT_STATUS_IS_OK(status)) {
1655                 errno = map_errno_from_nt_status(status);
1656                 return -1;
1657         }
1658
1659         fd = open(dir_name->base_name, O_RDONLY, 0);
1660         if (fd == -1) {
1661                 TALLOC_FREE(dir_name);
1662                 return -1;
1663         }
1664
1665         set_effective_capability(DAC_OVERRIDE_CAPABILITY);
1666         ret = fstatat(fd, rel_name->base_name, &st, flag);
1667         drop_effective_capability(DAC_OVERRIDE_CAPABILITY);
1668
1669         TALLOC_FREE(dir_name);
1670         close(fd);
1671
1672         if (ret == 0) {
1673                 init_stat_ex_from_stat(
1674                         &smb_fname->st, &st,
1675                         lp_fake_directory_create_times(SNUM(handle->conn)));
1676         }
1677
1678         return ret;
1679 }
1680
1681 static int vfs_gpfs_stat(struct vfs_handle_struct *handle,
1682                          struct smb_filename *smb_fname)
1683 {
1684         int ret;
1685
1686         ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
1687         if (ret == -1 && errno == EACCES) {
1688                 DEBUG(10, ("Trying stat with capability for %s\n",
1689                            smb_fname->base_name));
1690                 ret = stat_with_capability(handle, smb_fname, 0);
1691         }
1692         return ret;
1693 }
1694
1695 static int vfs_gpfs_lstat(struct vfs_handle_struct *handle,
1696                           struct smb_filename *smb_fname)
1697 {
1698         int ret;
1699
1700         ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
1701         if (ret == -1 && errno == EACCES) {
1702                 DEBUG(10, ("Trying lstat with capability for %s\n",
1703                            smb_fname->base_name));
1704                 ret = stat_with_capability(handle, smb_fname,
1705                                            AT_SYMLINK_NOFOLLOW);
1706         }
1707         return ret;
1708 }
1709
1710 static void timespec_to_gpfs_time(struct timespec ts, gpfs_timestruc_t *gt,
1711                                   int idx, int *flags)
1712 {
1713         if (!is_omit_timespec(&ts)) {
1714                 *flags |= 1 << idx;
1715                 gt[idx].tv_sec = ts.tv_sec;
1716                 gt[idx].tv_nsec = ts.tv_nsec;
1717                 DEBUG(10, ("Setting GPFS time %d, flags 0x%x\n", idx, *flags));
1718         }
1719 }
1720
1721 static int smbd_gpfs_set_times(struct files_struct *fsp,
1722                                struct smb_file_time *ft)
1723 {
1724         gpfs_timestruc_t gpfs_times[4];
1725         int flags = 0;
1726         int rc;
1727
1728         ZERO_ARRAY(gpfs_times);
1729         timespec_to_gpfs_time(ft->atime, gpfs_times, 0, &flags);
1730         timespec_to_gpfs_time(ft->mtime, gpfs_times, 1, &flags);
1731         /* No good mapping from LastChangeTime to ctime, not storing */
1732         timespec_to_gpfs_time(ft->create_time, gpfs_times, 3, &flags);
1733
1734         if (!flags) {
1735                 DBG_DEBUG("nothing to do, return to avoid EINVAL\n");
1736                 return 0;
1737         }
1738
1739         if (!fsp->fsp_flags.is_pathref) {
1740                 rc = gpfswrap_set_times(fsp_get_io_fd(fsp), flags, gpfs_times);
1741                 if (rc != 0) {
1742                         DBG_WARNING("gpfs_set_times(%s) failed: %s\n",
1743                                     fsp_str_dbg(fsp), strerror(errno));
1744                 }
1745                 return rc;
1746         }
1747
1748
1749         if (fsp->fsp_flags.have_proc_fds) {
1750                 int fd = fsp_get_pathref_fd(fsp);
1751                 const char *p = NULL;
1752                 char buf[PATH_MAX];
1753
1754                 p = sys_proc_fd_path(fd, buf, sizeof(buf));
1755                 if (p == NULL) {
1756                         return -1;
1757                 }
1758
1759                 rc = gpfswrap_set_times_path(buf, flags, gpfs_times);
1760                 if (rc != 0) {
1761                         DBG_WARNING("gpfs_set_times_path(%s,%s) failed: %s\n",
1762                                     fsp_str_dbg(fsp), p, strerror(errno));
1763                 }
1764                 return rc;
1765         }
1766
1767         /*
1768          * This is no longer a handle based call.
1769          */
1770
1771         rc = gpfswrap_set_times_path(fsp->fsp_name->base_name,
1772                                      flags,
1773                                      gpfs_times);
1774         if (rc != 0) {
1775                 DBG_WARNING("gpfs_set_times_path(%s) failed: %s\n",
1776                             fsp_str_dbg(fsp), strerror(errno));
1777         }
1778         return rc;
1779 }
1780
1781 static int vfs_gpfs_fntimes(struct vfs_handle_struct *handle,
1782                 files_struct *fsp,
1783                 struct smb_file_time *ft)
1784 {
1785
1786         struct gpfs_winattr attrs;
1787         int ret;
1788         struct gpfs_config_data *config;
1789
1790         SMB_VFS_HANDLE_GET_DATA(handle,
1791                                 config,
1792                                 struct gpfs_config_data,
1793                                 return -1);
1794
1795         /* Try to use gpfs_set_times if it is enabled and available */
1796         if (config->settimes) {
1797                 return smbd_gpfs_set_times(fsp, ft);
1798         }
1799
1800         DBG_DEBUG("gpfs_set_times() not available or disabled, "
1801                   "use ntimes and winattr\n");
1802
1803         ret = SMB_VFS_NEXT_FNTIMES(handle, fsp, ft);
1804         if (ret == -1) {
1805                 /* don't complain if access was denied */
1806                 if (errno != EPERM && errno != EACCES) {
1807                         DBG_WARNING("SMB_VFS_NEXT_FNTIMES failed: %s",
1808                                     strerror(errno));
1809                 }
1810                 return -1;
1811         }
1812
1813         if (is_omit_timespec(&ft->create_time)) {
1814                 DBG_DEBUG("Create Time is NULL\n");
1815                 return 0;
1816         }
1817
1818         if (!config->winattr) {
1819                 return 0;
1820         }
1821
1822         attrs.winAttrs = 0;
1823         attrs.creationTime.tv_sec = ft->create_time.tv_sec;
1824         attrs.creationTime.tv_nsec = ft->create_time.tv_nsec;
1825
1826         if (!fsp->fsp_flags.is_pathref) {
1827                 ret = gpfswrap_set_winattrs(fsp_get_io_fd(fsp),
1828                                             GPFS_WINATTR_SET_CREATION_TIME,
1829                                             &attrs);
1830                 if (ret == -1 && errno != ENOSYS) {
1831                         DBG_WARNING("Set GPFS ntimes failed %d\n", ret);
1832                         return -1;
1833                 }
1834                 return ret;
1835         }
1836
1837         if (fsp->fsp_flags.have_proc_fds) {
1838                 int fd = fsp_get_pathref_fd(fsp);
1839                 const char *p = NULL;
1840                 char buf[PATH_MAX];
1841
1842                 p = sys_proc_fd_path(fd, buf, sizeof(buf));
1843                 if (p == NULL) {
1844                         return -1;
1845                 }
1846
1847                 ret = gpfswrap_set_winattrs_path(p,
1848                                                  GPFS_WINATTR_SET_CREATION_TIME,
1849                                                  &attrs);
1850                 if (ret == -1 && errno != ENOSYS) {
1851                         DBG_WARNING("Set GPFS ntimes failed %d\n", ret);
1852                         return -1;
1853                 }
1854                 return ret;
1855         }
1856
1857         /*
1858          * This is no longer a handle based call.
1859          */
1860         ret = gpfswrap_set_winattrs_path(fsp->fsp_name->base_name,
1861                                          GPFS_WINATTR_SET_CREATION_TIME,
1862                                          &attrs);
1863         if (ret == -1 && errno != ENOSYS) {
1864                 DBG_WARNING("Set GPFS ntimes failed %d\n", ret);
1865                 return -1;
1866         }
1867
1868         return 0;
1869 }
1870
1871 static int vfs_gpfs_fallocate(struct vfs_handle_struct *handle,
1872                               struct files_struct *fsp, uint32_t mode,
1873                               off_t offset, off_t len)
1874 {
1875         if (mode == (VFS_FALLOCATE_FL_PUNCH_HOLE|VFS_FALLOCATE_FL_KEEP_SIZE) &&
1876             !fsp->fsp_flags.is_sparse &&
1877             lp_strict_allocate(SNUM(fsp->conn))) {
1878                 /*
1879                  * This is from a ZERO_DATA request on a non-sparse
1880                  * file. GPFS does not support FL_KEEP_SIZE and thus
1881                  * cannot fill the whole again in the subsequent
1882                  * fallocate(FL_KEEP_SIZE). Deny this FL_PUNCH_HOLE
1883                  * call to not end up with a hole in a non-sparse
1884                  * file.
1885                  */
1886                 errno = ENOTSUP;
1887                 return -1;
1888         }
1889
1890         return SMB_VFS_NEXT_FALLOCATE(handle, fsp, mode, offset, len);
1891 }
1892
1893 static int vfs_gpfs_ftruncate(vfs_handle_struct *handle, files_struct *fsp,
1894                                 off_t len)
1895 {
1896         int result;
1897         struct gpfs_config_data *config;
1898
1899         SMB_VFS_HANDLE_GET_DATA(handle, config,
1900                                 struct gpfs_config_data,
1901                                 return -1);
1902
1903         if (!config->ftruncate) {
1904                 return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, len);
1905         }
1906
1907         result = gpfswrap_ftruncate(fsp_get_io_fd(fsp), len);
1908         if ((result == -1) && (errno == ENOSYS)) {
1909                 return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, len);
1910         }
1911         return result;
1912 }
1913
1914 static bool vfs_gpfs_is_offline(struct vfs_handle_struct *handle,
1915                                 const struct smb_filename *fname,
1916                                 SMB_STRUCT_STAT *sbuf)
1917 {
1918         struct gpfs_winattr attrs;
1919         struct gpfs_config_data *config;
1920         int ret;
1921
1922         SMB_VFS_HANDLE_GET_DATA(handle, config,
1923                                 struct gpfs_config_data,
1924                                 return false);
1925
1926         if (!config->winattr) {
1927                 return false;
1928         }
1929
1930         ret = gpfswrap_get_winattrs_path(fname->base_name, &attrs);
1931         if (ret == -1) {
1932                 return false;
1933         }
1934
1935         if ((attrs.winAttrs & GPFS_WINATTR_OFFLINE) != 0) {
1936                 DBG_DEBUG("%s is offline\n", fname->base_name);
1937                 return true;
1938         }
1939
1940         DBG_DEBUG("%s is online\n", fname->base_name);
1941         return false;
1942 }
1943
1944 static bool vfs_gpfs_fsp_is_offline(struct vfs_handle_struct *handle,
1945                                     struct files_struct *fsp)
1946 {
1947         struct gpfs_fsp_extension *ext;
1948
1949         ext = VFS_FETCH_FSP_EXTENSION(handle, fsp);
1950         if (ext == NULL) {
1951                 /*
1952                  * Something bad happened, always ask.
1953                  */
1954                 return vfs_gpfs_is_offline(handle, fsp->fsp_name,
1955                                            &fsp->fsp_name->st);
1956         }
1957
1958         if (ext->offline) {
1959                 /*
1960                  * As long as it's offline, ask.
1961                  */
1962                 ext->offline = vfs_gpfs_is_offline(handle, fsp->fsp_name,
1963                                                    &fsp->fsp_name->st);
1964         }
1965
1966         return ext->offline;
1967 }
1968
1969 static bool vfs_gpfs_aio_force(struct vfs_handle_struct *handle,
1970                                struct files_struct *fsp)
1971 {
1972         return vfs_gpfs_fsp_is_offline(handle, fsp);
1973 }
1974
1975 static ssize_t vfs_gpfs_sendfile(vfs_handle_struct *handle, int tofd,
1976                                  files_struct *fsp, const DATA_BLOB *hdr,
1977                                  off_t offset, size_t n)
1978 {
1979         if (vfs_gpfs_fsp_is_offline(handle, fsp)) {
1980                 errno = ENOSYS;
1981                 return -1;
1982         }
1983         return SMB_VFS_NEXT_SENDFILE(handle, tofd, fsp, hdr, offset, n);
1984 }
1985
1986 #ifdef O_PATH
1987 static int vfs_gpfs_check_pathref_fstat_x(struct gpfs_config_data *config,
1988                                           struct connection_struct *conn)
1989 {
1990         struct gpfs_iattr64 iattr = {0};
1991         unsigned int litemask = 0;
1992         int saved_errno;
1993         int fd;
1994         int ret;
1995
1996         fd = open(conn->connectpath, O_PATH);
1997         if (fd == -1) {
1998                 DBG_ERR("openat() of share with O_PATH failed: %s\n",
1999                         strerror(errno));
2000                 return -1;
2001         }
2002
2003         ret = gpfswrap_fstat_x(fd, &litemask, &iattr, sizeof(iattr));
2004         if (ret == 0) {
2005                 close(fd);
2006                 config->pathref_ok.gpfs_fstat_x = true;
2007                 return 0;
2008         }
2009
2010         saved_errno = errno;
2011         ret = close(fd);
2012         if (ret != 0) {
2013                 DBG_ERR("close failed: %s\n", strerror(errno));
2014                 return -1;
2015         }
2016
2017         if (saved_errno != EBADF) {
2018                 DBG_ERR("gpfswrap_fstat_x() of O_PATH handle failed: %s\n",
2019                         strerror(saved_errno));
2020                 return -1;
2021         }
2022
2023         return 0;
2024 }
2025 #endif
2026
2027 static int vfs_gpfs_check_pathref(struct gpfs_config_data *config,
2028                                   struct connection_struct *conn)
2029 {
2030 #ifndef O_PATH
2031         /*
2032          * This code path leaves all struct gpfs_config_data.pathref_ok members
2033          * initialized to false.
2034          */
2035         return 0;
2036 #else
2037         int ret;
2038
2039         ret = vfs_gpfs_check_pathref_fstat_x(config, conn);
2040         if (ret != 0) {
2041                 return -1;
2042         }
2043
2044         return 0;
2045 #endif
2046 }
2047
2048 static int vfs_gpfs_connect(struct vfs_handle_struct *handle,
2049                             const char *service, const char *user)
2050 {
2051         struct gpfs_config_data *config;
2052         int ret;
2053         bool check_fstype;
2054
2055         ret = SMB_VFS_NEXT_CONNECT(handle, service, user);
2056         if (ret < 0) {
2057                 return ret;
2058         }
2059
2060         if (IS_IPC(handle->conn)) {
2061                 return 0;
2062         }
2063
2064         gpfswrap_lib_init(0);
2065
2066         config = talloc_zero(handle->conn, struct gpfs_config_data);
2067         if (!config) {
2068                 DEBUG(0, ("talloc_zero() failed\n"));
2069                 errno = ENOMEM;
2070                 return -1;
2071         }
2072
2073         check_fstype = lp_parm_bool(SNUM(handle->conn), "gpfs",
2074                                     "check_fstype", true);
2075
2076         if (check_fstype) {
2077                 const char *connectpath = handle->conn->connectpath;
2078                 struct statfs buf = { 0 };
2079
2080                 ret = statfs(connectpath, &buf);
2081                 if (ret != 0) {
2082                         DBG_ERR("statfs failed for share %s at path %s: %s\n",
2083                                 service, connectpath, strerror(errno));
2084                         TALLOC_FREE(config);
2085                         return ret;
2086                 }
2087
2088                 if (buf.f_type != GPFS_SUPER_MAGIC) {
2089                         DBG_ERR("SMB share %s, path %s not in GPFS file system."
2090                                 " statfs magic: 0x%jx\n",
2091                                 service,
2092                                 connectpath,
2093                                 (uintmax_t)buf.f_type);
2094                         errno = EINVAL;
2095                         TALLOC_FREE(config);
2096                         return -1;
2097                 }
2098         }
2099
2100         ret = smbacl4_get_vfs_params(handle->conn, &config->nfs4_params);
2101         if (ret < 0) {
2102                 TALLOC_FREE(config);
2103                 return ret;
2104         }
2105
2106         config->sharemodes = lp_parm_bool(SNUM(handle->conn), "gpfs",
2107                                         "sharemodes", true);
2108
2109         config->leases = lp_parm_bool(SNUM(handle->conn), "gpfs",
2110                                         "leases", true);
2111
2112         config->hsm = lp_parm_bool(SNUM(handle->conn), "gpfs",
2113                                    "hsm", false);
2114
2115         config->syncio = lp_parm_bool(SNUM(handle->conn), "gpfs",
2116                                       "syncio", false);
2117
2118         config->winattr = lp_parm_bool(SNUM(handle->conn), "gpfs",
2119                                        "winattr", false);
2120
2121         config->ftruncate = lp_parm_bool(SNUM(handle->conn), "gpfs",
2122                                          "ftruncate", true);
2123
2124         config->getrealfilename = lp_parm_bool(SNUM(handle->conn), "gpfs",
2125                                                "getrealfilename", true);
2126
2127         config->dfreequota = lp_parm_bool(SNUM(handle->conn), "gpfs",
2128                                           "dfreequota", false);
2129
2130         config->acl = lp_parm_bool(SNUM(handle->conn), "gpfs", "acl", true);
2131
2132         config->settimes = lp_parm_bool(SNUM(handle->conn), "gpfs",
2133                                         "settimes", true);
2134         config->recalls = lp_parm_bool(SNUM(handle->conn), "gpfs",
2135                                        "recalls", true);
2136
2137         ret = vfs_gpfs_check_pathref(config, handle->conn);
2138         if (ret != 0) {
2139                 DBG_ERR("vfs_gpfs_check_pathref() on [%s] failed\n",
2140                         handle->conn->connectpath);
2141                 TALLOC_FREE(config);
2142                 return -1;
2143         }
2144
2145         SMB_VFS_HANDLE_SET_DATA(handle, config,
2146                                 NULL, struct gpfs_config_data,
2147                                 return -1);
2148
2149         if (config->leases) {
2150                 /*
2151                  * GPFS lease code is based on kernel oplock code
2152                  * so make sure it is turned on
2153                  */
2154                 if (!lp_kernel_oplocks(SNUM(handle->conn))) {
2155                         DEBUG(5, ("Enabling kernel oplocks for "
2156                                   "gpfs:leases to work\n"));
2157                         lp_do_parameter(SNUM(handle->conn), "kernel oplocks",
2158                                         "true");
2159                 }
2160
2161                 /*
2162                  * as the kernel does not properly support Level II oplocks
2163                  * and GPFS leases code is based on kernel infrastructure, we
2164                  * need to turn off Level II oplocks if gpfs:leases is enabled
2165                  */
2166                 if (lp_level2_oplocks(SNUM(handle->conn))) {
2167                         DEBUG(5, ("gpfs:leases are enabled, disabling "
2168                                   "Level II oplocks\n"));
2169                         lp_do_parameter(SNUM(handle->conn), "level2 oplocks",
2170                                         "false");
2171                 }
2172         }
2173
2174         /*
2175          * Unless we have an async implementation of get_dos_attributes turn
2176          * this off.
2177          */
2178         lp_do_parameter(SNUM(handle->conn), "smbd async dosmode", "false");
2179
2180         return 0;
2181 }
2182
2183 static int get_gpfs_quota(const char *pathname, int type, int id,
2184                           struct gpfs_quotaInfo *qi)
2185 {
2186         int ret;
2187
2188         ret = gpfswrap_quotactl(pathname, GPFS_QCMD(Q_GETQUOTA, type), id, qi);
2189
2190         if (ret) {
2191                 if (errno == GPFS_E_NO_QUOTA_INST) {
2192                         DEBUG(10, ("Quotas disabled on GPFS filesystem.\n"));
2193                 } else if (errno != ENOSYS) {
2194                         DEBUG(0, ("Get quota failed, type %d, id, %d, "
2195                                   "errno %d.\n", type, id, errno));
2196                 }
2197
2198                 return ret;
2199         }
2200
2201         DEBUG(10, ("quota type %d, id %d, blk u:%lld h:%lld s:%lld gt:%u\n",
2202                    type, id, qi->blockUsage, qi->blockHardLimit,
2203                    qi->blockSoftLimit, qi->blockGraceTime));
2204
2205         return ret;
2206 }
2207
2208 static void vfs_gpfs_disk_free_quota(struct gpfs_quotaInfo qi, time_t cur_time,
2209                                      uint64_t *dfree, uint64_t *dsize)
2210 {
2211         uint64_t usage, limit;
2212
2213         /*
2214          * The quota reporting is done in units of 1024 byte blocks, but
2215          * sys_fsusage uses units of 512 byte blocks, adjust the block number
2216          * accordingly. Also filter possibly negative usage counts from gpfs.
2217          */
2218         usage = qi.blockUsage < 0 ? 0 : (uint64_t)qi.blockUsage * 2;
2219         limit = (uint64_t)qi.blockHardLimit * 2;
2220
2221         /*
2222          * When the grace time for the exceeded soft block quota has been
2223          * exceeded, the soft block quota becomes an additional hard limit.
2224          */
2225         if (qi.blockSoftLimit &&
2226             qi.blockGraceTime && cur_time > qi.blockGraceTime) {
2227                 /* report disk as full */
2228                 *dfree = 0;
2229                 *dsize = MIN(*dsize, usage);
2230         }
2231
2232         if (!qi.blockHardLimit)
2233                 return;
2234
2235         if (usage >= limit) {
2236                 /* report disk as full */
2237                 *dfree = 0;
2238                 *dsize = MIN(*dsize, usage);
2239
2240         } else {
2241                 /* limit has not been reached, determine "free space" */
2242                 *dfree = MIN(*dfree, limit - usage);
2243                 *dsize = MIN(*dsize, limit);
2244         }
2245 }
2246
2247 static uint64_t vfs_gpfs_disk_free(vfs_handle_struct *handle,
2248                                 const struct smb_filename *smb_fname,
2249                                 uint64_t *bsize,
2250                                 uint64_t *dfree,
2251                                 uint64_t *dsize)
2252 {
2253         struct security_unix_token *utok;
2254         struct gpfs_quotaInfo qi_user = { 0 }, qi_group = { 0 };
2255         struct gpfs_config_data *config;
2256         int err;
2257         time_t cur_time;
2258
2259         SMB_VFS_HANDLE_GET_DATA(handle, config, struct gpfs_config_data,
2260                                 return (uint64_t)-1);
2261         if (!config->dfreequota) {
2262                 return SMB_VFS_NEXT_DISK_FREE(handle, smb_fname,
2263                                               bsize, dfree, dsize);
2264         }
2265
2266         err = sys_fsusage(smb_fname->base_name, dfree, dsize);
2267         if (err) {
2268                 DEBUG (0, ("Could not get fs usage, errno %d\n", errno));
2269                 return SMB_VFS_NEXT_DISK_FREE(handle, smb_fname,
2270                                               bsize, dfree, dsize);
2271         }
2272
2273         /* sys_fsusage returns units of 512 bytes */
2274         *bsize = 512;
2275
2276         DEBUG(10, ("fs dfree %llu, dsize %llu\n",
2277                    (unsigned long long)*dfree, (unsigned long long)*dsize));
2278
2279         utok = handle->conn->session_info->unix_token;
2280
2281         err = get_gpfs_quota(smb_fname->base_name,
2282                         GPFS_USRQUOTA, utok->uid, &qi_user);
2283         if (err) {
2284                 return SMB_VFS_NEXT_DISK_FREE(handle, smb_fname,
2285                                               bsize, dfree, dsize);
2286         }
2287
2288         /*
2289          * If new files created under this folder get this folder's
2290          * GID, then available space is governed by the quota of the
2291          * folder's GID, not the primary group of the creating user.
2292          */
2293         if (VALID_STAT(smb_fname->st) &&
2294             S_ISDIR(smb_fname->st.st_ex_mode) &&
2295             smb_fname->st.st_ex_mode & S_ISGID) {
2296                 become_root();
2297                 err = get_gpfs_quota(smb_fname->base_name, GPFS_GRPQUOTA,
2298                                      smb_fname->st.st_ex_gid, &qi_group);
2299                 unbecome_root();
2300
2301         } else {
2302                 err = get_gpfs_quota(smb_fname->base_name, GPFS_GRPQUOTA,
2303                                      utok->gid, &qi_group);
2304         }
2305
2306         if (err) {
2307                 return SMB_VFS_NEXT_DISK_FREE(handle, smb_fname,
2308                                               bsize, dfree, dsize);
2309         }
2310
2311         cur_time = time(NULL);
2312
2313         /* Adjust free space and size according to quota limits. */
2314         vfs_gpfs_disk_free_quota(qi_user, cur_time, dfree, dsize);
2315         vfs_gpfs_disk_free_quota(qi_group, cur_time, dfree, dsize);
2316
2317         return *dfree / 2;
2318 }
2319
2320 static int vfs_gpfs_get_quota(vfs_handle_struct *handle,
2321                                 const struct smb_filename *smb_fname,
2322                                 enum SMB_QUOTA_TYPE qtype,
2323                                 unid_t id,
2324                                 SMB_DISK_QUOTA *dq)
2325 {
2326         switch(qtype) {
2327                 /*
2328                  * User/group quota are being used for disk-free
2329                  * determination, which in this module is done directly
2330                  * by the disk-free function. It's important that this
2331                  * module does not return wrong quota values by mistake,
2332                  * which would modify the correct values set by disk-free.
2333                  * User/group quota are also being used for processing
2334                  * NT_TRANSACT_GET_USER_QUOTA in smb1 protocol, which is
2335                  * currently not supported by this module.
2336                  */
2337                 case SMB_USER_QUOTA_TYPE:
2338                 case SMB_GROUP_QUOTA_TYPE:
2339                         errno = ENOSYS;
2340                         return -1;
2341                 default:
2342                         return SMB_VFS_NEXT_GET_QUOTA(handle, smb_fname,
2343                                         qtype, id, dq);
2344         }
2345 }
2346
2347 static uint32_t vfs_gpfs_capabilities(struct vfs_handle_struct *handle,
2348                                       enum timestamp_set_resolution *p_ts_res)
2349 {
2350         struct gpfs_config_data *config;
2351         uint32_t next;
2352
2353         next = SMB_VFS_NEXT_FS_CAPABILITIES(handle, p_ts_res);
2354
2355         SMB_VFS_HANDLE_GET_DATA(handle, config,
2356                                 struct gpfs_config_data,
2357                                 return next);
2358
2359         if (config->hsm) {
2360                 next |= FILE_SUPPORTS_REMOTE_STORAGE;
2361         }
2362         return next;
2363 }
2364
2365 static int vfs_gpfs_openat(struct vfs_handle_struct *handle,
2366                            const struct files_struct *dirfsp,
2367                            const struct smb_filename *smb_fname,
2368                            files_struct *fsp,
2369                            int flags,
2370                            mode_t mode)
2371 {
2372         struct gpfs_config_data *config = NULL;
2373         struct gpfs_fsp_extension *ext = NULL;
2374         int ret;
2375
2376         SMB_VFS_HANDLE_GET_DATA(handle, config,
2377                                 struct gpfs_config_data,
2378                                 return -1);
2379
2380         if (config->hsm && !config->recalls &&
2381             vfs_gpfs_fsp_is_offline(handle, fsp))
2382         {
2383                 DBG_DEBUG("Refusing access to offline file %s\n",
2384                           fsp_str_dbg(fsp));
2385                 errno = EACCES;
2386                 return -1;
2387         }
2388
2389         if (config->syncio) {
2390                 flags |= O_SYNC;
2391         }
2392
2393         ext = VFS_ADD_FSP_EXTENSION(handle, fsp, struct gpfs_fsp_extension,
2394                                     NULL);
2395         if (ext == NULL) {
2396                 errno = ENOMEM;
2397                 return -1;
2398         }
2399
2400         /*
2401          * Assume the file is offline until gpfs tells us it's online.
2402          */
2403         *ext = (struct gpfs_fsp_extension) { .offline = true };
2404
2405         ret = SMB_VFS_NEXT_OPENAT(handle, dirfsp, smb_fname, fsp, flags, mode);
2406         if (ret == -1) {
2407                 VFS_REMOVE_FSP_EXTENSION(handle, fsp);
2408         }
2409         return ret;
2410 }
2411
2412 static ssize_t vfs_gpfs_pread(vfs_handle_struct *handle, files_struct *fsp,
2413                               void *data, size_t n, off_t offset)
2414 {
2415         ssize_t ret;
2416         bool was_offline;
2417
2418         was_offline = vfs_gpfs_fsp_is_offline(handle, fsp);
2419
2420         ret = SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
2421
2422         if ((ret != -1) && was_offline) {
2423                 notify_fname(handle->conn, NOTIFY_ACTION_MODIFIED,
2424                              FILE_NOTIFY_CHANGE_ATTRIBUTES,
2425                              fsp->fsp_name->base_name);
2426         }
2427
2428         return ret;
2429 }
2430
2431 struct vfs_gpfs_pread_state {
2432         struct files_struct *fsp;
2433         ssize_t ret;
2434         bool was_offline;
2435         struct vfs_aio_state vfs_aio_state;
2436 };
2437
2438 static void vfs_gpfs_pread_done(struct tevent_req *subreq);
2439
2440 static struct tevent_req *vfs_gpfs_pread_send(struct vfs_handle_struct *handle,
2441                                               TALLOC_CTX *mem_ctx,
2442                                               struct tevent_context *ev,
2443                                               struct files_struct *fsp,
2444                                               void *data, size_t n,
2445                                               off_t offset)
2446 {
2447         struct tevent_req *req, *subreq;
2448         struct vfs_gpfs_pread_state *state;
2449
2450         req = tevent_req_create(mem_ctx, &state, struct vfs_gpfs_pread_state);
2451         if (req == NULL) {
2452                 return NULL;
2453         }
2454         state->was_offline = vfs_gpfs_fsp_is_offline(handle, fsp);
2455         state->fsp = fsp;
2456         subreq = SMB_VFS_NEXT_PREAD_SEND(state, ev, handle, fsp, data,
2457                                          n, offset);
2458         if (tevent_req_nomem(subreq, req)) {
2459                 return tevent_req_post(req, ev);
2460         }
2461         tevent_req_set_callback(subreq, vfs_gpfs_pread_done, req);
2462         return req;
2463 }
2464
2465 static void vfs_gpfs_pread_done(struct tevent_req *subreq)
2466 {
2467         struct tevent_req *req = tevent_req_callback_data(
2468                 subreq, struct tevent_req);
2469         struct vfs_gpfs_pread_state *state = tevent_req_data(
2470                 req, struct vfs_gpfs_pread_state);
2471
2472         state->ret = SMB_VFS_PREAD_RECV(subreq, &state->vfs_aio_state);
2473         TALLOC_FREE(subreq);
2474         tevent_req_done(req);
2475 }
2476
2477 static ssize_t vfs_gpfs_pread_recv(struct tevent_req *req,
2478                                    struct vfs_aio_state *vfs_aio_state)
2479 {
2480         struct vfs_gpfs_pread_state *state = tevent_req_data(
2481                 req, struct vfs_gpfs_pread_state);
2482         struct files_struct *fsp = state->fsp;
2483
2484         if (tevent_req_is_unix_error(req, &vfs_aio_state->error)) {
2485                 return -1;
2486         }
2487         *vfs_aio_state = state->vfs_aio_state;
2488
2489         if ((state->ret != -1) && state->was_offline) {
2490                 DEBUG(10, ("sending notify\n"));
2491                 notify_fname(fsp->conn, NOTIFY_ACTION_MODIFIED,
2492                              FILE_NOTIFY_CHANGE_ATTRIBUTES,
2493                              fsp->fsp_name->base_name);
2494         }
2495
2496         return state->ret;
2497 }
2498
2499 static ssize_t vfs_gpfs_pwrite(vfs_handle_struct *handle, files_struct *fsp,
2500                                const void *data, size_t n, off_t offset)
2501 {
2502         ssize_t ret;
2503         bool was_offline;
2504
2505         was_offline = vfs_gpfs_fsp_is_offline(handle, fsp);
2506
2507         ret = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
2508
2509         if ((ret != -1) && was_offline) {
2510                 notify_fname(handle->conn, NOTIFY_ACTION_MODIFIED,
2511                              FILE_NOTIFY_CHANGE_ATTRIBUTES,
2512                              fsp->fsp_name->base_name);
2513         }
2514
2515         return ret;
2516 }
2517
2518 struct vfs_gpfs_pwrite_state {
2519         struct files_struct *fsp;
2520         ssize_t ret;
2521         bool was_offline;
2522         struct vfs_aio_state vfs_aio_state;
2523 };
2524
2525 static void vfs_gpfs_pwrite_done(struct tevent_req *subreq);
2526
2527 static struct tevent_req *vfs_gpfs_pwrite_send(
2528         struct vfs_handle_struct *handle,
2529         TALLOC_CTX *mem_ctx,
2530         struct tevent_context *ev,
2531         struct files_struct *fsp,
2532         const void *data, size_t n,
2533         off_t offset)
2534 {
2535         struct tevent_req *req, *subreq;
2536         struct vfs_gpfs_pwrite_state *state;
2537
2538         req = tevent_req_create(mem_ctx, &state, struct vfs_gpfs_pwrite_state);
2539         if (req == NULL) {
2540                 return NULL;
2541         }
2542         state->was_offline = vfs_gpfs_fsp_is_offline(handle, fsp);
2543         state->fsp = fsp;
2544         subreq = SMB_VFS_NEXT_PWRITE_SEND(state, ev, handle, fsp, data,
2545                                          n, offset);
2546         if (tevent_req_nomem(subreq, req)) {
2547                 return tevent_req_post(req, ev);
2548         }
2549         tevent_req_set_callback(subreq, vfs_gpfs_pwrite_done, req);
2550         return req;
2551 }
2552
2553 static void vfs_gpfs_pwrite_done(struct tevent_req *subreq)
2554 {
2555         struct tevent_req *req = tevent_req_callback_data(
2556                 subreq, struct tevent_req);
2557         struct vfs_gpfs_pwrite_state *state = tevent_req_data(
2558                 req, struct vfs_gpfs_pwrite_state);
2559
2560         state->ret = SMB_VFS_PWRITE_RECV(subreq, &state->vfs_aio_state);
2561         TALLOC_FREE(subreq);
2562         tevent_req_done(req);
2563 }
2564
2565 static ssize_t vfs_gpfs_pwrite_recv(struct tevent_req *req,
2566                                     struct vfs_aio_state *vfs_aio_state)
2567 {
2568         struct vfs_gpfs_pwrite_state *state = tevent_req_data(
2569                 req, struct vfs_gpfs_pwrite_state);
2570         struct files_struct *fsp = state->fsp;
2571
2572         if (tevent_req_is_unix_error(req, &vfs_aio_state->error)) {
2573                 return -1;
2574         }
2575         *vfs_aio_state = state->vfs_aio_state;
2576
2577         if ((state->ret != -1) && state->was_offline) {
2578                 DEBUG(10, ("sending notify\n"));
2579                 notify_fname(fsp->conn, NOTIFY_ACTION_MODIFIED,
2580                              FILE_NOTIFY_CHANGE_ATTRIBUTES,
2581                              fsp->fsp_name->base_name);
2582         }
2583
2584         return state->ret;
2585 }
2586
2587
2588 static struct vfs_fn_pointers vfs_gpfs_fns = {
2589         .connect_fn = vfs_gpfs_connect,
2590         .disk_free_fn = vfs_gpfs_disk_free,
2591         .get_quota_fn = vfs_gpfs_get_quota,
2592         .fs_capabilities_fn = vfs_gpfs_capabilities,
2593         .filesystem_sharemode_fn = vfs_gpfs_filesystem_sharemode,
2594         .linux_setlease_fn = vfs_gpfs_setlease,
2595         .get_real_filename_fn = vfs_gpfs_get_real_filename,
2596         .get_dos_attributes_send_fn = vfs_not_implemented_get_dos_attributes_send,
2597         .get_dos_attributes_recv_fn = vfs_not_implemented_get_dos_attributes_recv,
2598         .fget_dos_attributes_fn = vfs_gpfs_fget_dos_attributes,
2599         .fset_dos_attributes_fn = vfs_gpfs_fset_dos_attributes,
2600         .fget_nt_acl_fn = gpfsacl_fget_nt_acl,
2601         .fset_nt_acl_fn = gpfsacl_fset_nt_acl,
2602         .sys_acl_get_fd_fn = gpfsacl_sys_acl_get_fd,
2603         .sys_acl_blob_get_fd_fn = gpfsacl_sys_acl_blob_get_fd,
2604         .sys_acl_set_fd_fn = gpfsacl_sys_acl_set_fd,
2605         .sys_acl_delete_def_fd_fn = gpfsacl_sys_acl_delete_def_fd,
2606         .fchmod_fn = vfs_gpfs_fchmod,
2607         .close_fn = vfs_gpfs_close,
2608         .stat_fn = vfs_gpfs_stat,
2609         .lstat_fn = vfs_gpfs_lstat,
2610         .fntimes_fn = vfs_gpfs_fntimes,
2611         .aio_force_fn = vfs_gpfs_aio_force,
2612         .sendfile_fn = vfs_gpfs_sendfile,
2613         .fallocate_fn = vfs_gpfs_fallocate,
2614         .openat_fn = vfs_gpfs_openat,
2615         .pread_fn = vfs_gpfs_pread,
2616         .pread_send_fn = vfs_gpfs_pread_send,
2617         .pread_recv_fn = vfs_gpfs_pread_recv,
2618         .pwrite_fn = vfs_gpfs_pwrite,
2619         .pwrite_send_fn = vfs_gpfs_pwrite_send,
2620         .pwrite_recv_fn = vfs_gpfs_pwrite_recv,
2621         .ftruncate_fn = vfs_gpfs_ftruncate
2622 };
2623
2624 static_decl_vfs;
2625 NTSTATUS vfs_gpfs_init(TALLOC_CTX *ctx)
2626 {
2627         int ret;
2628
2629         ret = gpfswrap_init();
2630         if (ret != 0) {
2631                 DEBUG(1, ("Could not initialize GPFS library wrapper\n"));
2632         }
2633
2634         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "gpfs",
2635                                 &vfs_gpfs_fns);
2636 }