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