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->fh->fd, 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->fh->fd, 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->fh->fd, 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->fh->fd);
 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->fh->fd, 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->fh->fd, &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->fh->fd, &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         status = vfs_gpfs_get_file_id(&iattr, &file_id);
1823         if (!NT_STATUS_IS_OK(status)) {
1824                 return status;
1825         }
1826
1827         ts = gpfs_timestruc64_to_timespec(iattr.ia_createtime);
1828
1829         *dosmode |= vfs_gpfs_winattrs_to_dosmode(iattr.ia_winflags);
1830         update_stat_ex_create_time(&fsp->fsp_name->st, ts);
1831         update_stat_ex_file_id(&fsp->fsp_name->st, file_id);
1832
1833         return NT_STATUS_OK;
1834 }
1835
1836 static NTSTATUS vfs_gpfs_set_dos_attributes(struct vfs_handle_struct *handle,
1837                                            const struct smb_filename *smb_fname,
1838                                            uint32_t dosmode)
1839 {
1840         struct gpfs_config_data *config;
1841         struct gpfs_winattr attrs = { };
1842         int ret;
1843
1844         SMB_VFS_HANDLE_GET_DATA(handle, config,
1845                                 struct gpfs_config_data,
1846                                 return NT_STATUS_INTERNAL_ERROR);
1847
1848         if (!config->winattr) {
1849                 return SMB_VFS_NEXT_SET_DOS_ATTRIBUTES(handle,
1850                                                        smb_fname, dosmode);
1851         }
1852
1853         attrs.winAttrs = vfs_gpfs_dosmode_to_winattrs(dosmode);
1854         ret = gpfswrap_set_winattrs_path(smb_fname->base_name,
1855                                          GPFS_WINATTR_SET_ATTRS, &attrs);
1856
1857         if (ret == -1 && errno == ENOSYS) {
1858                 return SMB_VFS_NEXT_SET_DOS_ATTRIBUTES(handle,
1859                                                        smb_fname, dosmode);
1860         }
1861
1862         if (ret == -1) {
1863                 DBG_WARNING("Setting winattrs failed for %s: %s\n",
1864                             smb_fname->base_name, strerror(errno));
1865                 return map_nt_error_from_unix(errno);
1866         }
1867
1868         return NT_STATUS_OK;
1869 }
1870
1871 static NTSTATUS vfs_gpfs_fset_dos_attributes(struct vfs_handle_struct *handle,
1872                                              struct files_struct *fsp,
1873                                              uint32_t dosmode)
1874 {
1875         struct gpfs_config_data *config;
1876         struct gpfs_winattr attrs = { };
1877         int ret;
1878
1879         SMB_VFS_HANDLE_GET_DATA(handle, config,
1880                                 struct gpfs_config_data,
1881                                 return NT_STATUS_INTERNAL_ERROR);
1882
1883         if (!config->winattr) {
1884                 return SMB_VFS_NEXT_FSET_DOS_ATTRIBUTES(handle, fsp, dosmode);
1885         }
1886
1887         attrs.winAttrs = vfs_gpfs_dosmode_to_winattrs(dosmode);
1888         ret = gpfswrap_set_winattrs(fsp->fh->fd,
1889                                     GPFS_WINATTR_SET_ATTRS, &attrs);
1890
1891         if (ret == -1 && errno == ENOSYS) {
1892                 return SMB_VFS_NEXT_FSET_DOS_ATTRIBUTES(handle, fsp, dosmode);
1893         }
1894
1895         if (ret == -1) {
1896                 DBG_WARNING("Setting winattrs failed for %s: %s\n",
1897                             fsp->fsp_name->base_name, strerror(errno));
1898                 return map_nt_error_from_unix(errno);
1899         }
1900
1901         return NT_STATUS_OK;
1902 }
1903
1904 static int stat_with_capability(struct vfs_handle_struct *handle,
1905                                 struct smb_filename *smb_fname, int flag)
1906 {
1907 #if defined(HAVE_FSTATAT)
1908         int fd = -1;
1909         bool ok;
1910         struct smb_filename *dir_name = NULL;
1911         struct smb_filename *rel_name = NULL;
1912         struct stat st;
1913         int ret = -1;
1914
1915         ok = parent_smb_fname(talloc_tos(),
1916                               smb_fname,
1917                               &dir_name,
1918                               &rel_name);
1919         if (!ok) {
1920                 errno = ENOMEM;
1921                 return -1;
1922         }
1923
1924         fd = open(dir_name->base_name, O_RDONLY, 0);
1925         if (fd == -1) {
1926                 TALLOC_FREE(dir_name);
1927                 return -1;
1928         }
1929
1930         set_effective_capability(DAC_OVERRIDE_CAPABILITY);
1931         ret = fstatat(fd, rel_name->base_name, &st, flag);
1932         drop_effective_capability(DAC_OVERRIDE_CAPABILITY);
1933
1934         TALLOC_FREE(dir_name);
1935         close(fd);
1936
1937         if (ret == 0) {
1938                 init_stat_ex_from_stat(
1939                         &smb_fname->st, &st,
1940                         lp_fake_directory_create_times(SNUM(handle->conn)));
1941         }
1942
1943         return ret;
1944 #else
1945         return -1;
1946 #endif
1947 }
1948
1949 static int vfs_gpfs_stat(struct vfs_handle_struct *handle,
1950                          struct smb_filename *smb_fname)
1951 {
1952         int ret;
1953         struct gpfs_config_data *config;
1954
1955         SMB_VFS_HANDLE_GET_DATA(handle, config,
1956                                 struct gpfs_config_data,
1957                                 return -1);
1958
1959         ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
1960         if (ret == -1 && errno == EACCES) {
1961                 DEBUG(10, ("Trying stat with capability for %s\n",
1962                            smb_fname->base_name));
1963                 ret = stat_with_capability(handle, smb_fname, 0);
1964         }
1965         return ret;
1966 }
1967
1968 static int vfs_gpfs_lstat(struct vfs_handle_struct *handle,
1969                           struct smb_filename *smb_fname)
1970 {
1971         int ret;
1972         struct gpfs_config_data *config;
1973
1974         SMB_VFS_HANDLE_GET_DATA(handle, config,
1975                                 struct gpfs_config_data,
1976                                 return -1);
1977
1978         ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
1979         if (ret == -1 && errno == EACCES) {
1980                 DEBUG(10, ("Trying lstat with capability for %s\n",
1981                            smb_fname->base_name));
1982                 ret = stat_with_capability(handle, smb_fname,
1983                                            AT_SYMLINK_NOFOLLOW);
1984         }
1985         return ret;
1986 }
1987
1988 static void timespec_to_gpfs_time(struct timespec ts, gpfs_timestruc_t *gt,
1989                                   int idx, int *flags)
1990 {
1991         if (!is_omit_timespec(&ts)) {
1992                 *flags |= 1 << idx;
1993                 gt[idx].tv_sec = ts.tv_sec;
1994                 gt[idx].tv_nsec = ts.tv_nsec;
1995                 DEBUG(10, ("Setting GPFS time %d, flags 0x%x\n", idx, *flags));
1996         }
1997 }
1998
1999 static int smbd_gpfs_set_times_path(char *path, struct smb_file_time *ft)
2000 {
2001         gpfs_timestruc_t gpfs_times[4];
2002         int flags = 0;
2003         int rc;
2004
2005         ZERO_ARRAY(gpfs_times);
2006         timespec_to_gpfs_time(ft->atime, gpfs_times, 0, &flags);
2007         timespec_to_gpfs_time(ft->mtime, gpfs_times, 1, &flags);
2008         /* No good mapping from LastChangeTime to ctime, not storing */
2009         timespec_to_gpfs_time(ft->create_time, gpfs_times, 3, &flags);
2010
2011         if (!flags) {
2012                 DEBUG(10, ("nothing to do, return to avoid EINVAL\n"));
2013                 return 0;
2014         }
2015
2016         rc = gpfswrap_set_times_path(path, flags, gpfs_times);
2017
2018         if (rc != 0 && errno != ENOSYS) {
2019                 DEBUG(1,("gpfs_set_times() returned with error %s\n",
2020                         strerror(errno)));
2021         }
2022
2023         return rc;
2024 }
2025
2026 static int vfs_gpfs_ntimes(struct vfs_handle_struct *handle,
2027                         const struct smb_filename *smb_fname,
2028                         struct smb_file_time *ft)
2029 {
2030
2031         struct gpfs_winattr attrs;
2032         int ret;
2033         struct gpfs_config_data *config;
2034
2035         SMB_VFS_HANDLE_GET_DATA(handle, config,
2036                                 struct gpfs_config_data,
2037                                 return -1);
2038
2039         /* Try to use gpfs_set_times if it is enabled and available */
2040         if (config->settimes) {
2041                 ret = smbd_gpfs_set_times_path(smb_fname->base_name, ft);
2042
2043                 if (ret == 0 || (ret == -1 && errno != ENOSYS)) {
2044                         return ret;
2045                 }
2046         }
2047
2048         DEBUG(10,("gpfs_set_times() not available or disabled, "
2049                   "use ntimes and winattr\n"));
2050
2051         ret = SMB_VFS_NEXT_NTIMES(handle, smb_fname, ft);
2052         if(ret == -1){
2053                 /* don't complain if access was denied */
2054                 if (errno != EPERM && errno != EACCES) {
2055                         DEBUG(1,("vfs_gpfs_ntimes: SMB_VFS_NEXT_NTIMES failed:"
2056                                  "%s", strerror(errno)));
2057                 }
2058                 return -1;
2059         }
2060
2061         if (is_omit_timespec(&ft->create_time)){
2062                 DEBUG(10,("vfs_gpfs_ntimes:Create Time is NULL\n"));
2063                 return 0;
2064         }
2065
2066         if (!config->winattr) {
2067                 return 0;
2068         }
2069
2070         attrs.winAttrs = 0;
2071         attrs.creationTime.tv_sec = ft->create_time.tv_sec;
2072         attrs.creationTime.tv_nsec = ft->create_time.tv_nsec;
2073
2074         ret = gpfswrap_set_winattrs_path(smb_fname->base_name,
2075                                          GPFS_WINATTR_SET_CREATION_TIME,
2076                                          &attrs);
2077         if(ret == -1 && errno != ENOSYS){
2078                 DEBUG(1,("vfs_gpfs_ntimes: set GPFS ntimes failed %d\n",ret));
2079                 return -1;
2080         }
2081         return 0;
2082
2083 }
2084
2085 static int vfs_gpfs_fallocate(struct vfs_handle_struct *handle,
2086                               struct files_struct *fsp, uint32_t mode,
2087                               off_t offset, off_t len)
2088 {
2089         if (mode == (VFS_FALLOCATE_FL_PUNCH_HOLE|VFS_FALLOCATE_FL_KEEP_SIZE) &&
2090             !fsp->fsp_flags.is_sparse &&
2091             lp_strict_allocate(SNUM(fsp->conn))) {
2092                 /*
2093                  * This is from a ZERO_DATA request on a non-sparse
2094                  * file. GPFS does not support FL_KEEP_SIZE and thus
2095                  * cannot fill the whole again in the subsequent
2096                  * fallocate(FL_KEEP_SIZE). Deny this FL_PUNCH_HOLE
2097                  * call to not end up with a hole in a non-sparse
2098                  * file.
2099                  */
2100                 errno = ENOTSUP;
2101                 return -1;
2102         }
2103
2104         return SMB_VFS_NEXT_FALLOCATE(handle, fsp, mode, offset, len);
2105 }
2106
2107 static int vfs_gpfs_ftruncate(vfs_handle_struct *handle, files_struct *fsp,
2108                                 off_t len)
2109 {
2110         int result;
2111         struct gpfs_config_data *config;
2112
2113         SMB_VFS_HANDLE_GET_DATA(handle, config,
2114                                 struct gpfs_config_data,
2115                                 return -1);
2116
2117         if (!config->ftruncate) {
2118                 return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, len);
2119         }
2120
2121         result = gpfswrap_ftruncate(fsp->fh->fd, len);
2122         if ((result == -1) && (errno == ENOSYS)) {
2123                 return SMB_VFS_NEXT_FTRUNCATE(handle, fsp, len);
2124         }
2125         return result;
2126 }
2127
2128 static bool vfs_gpfs_is_offline(struct vfs_handle_struct *handle,
2129                                 const struct smb_filename *fname,
2130                                 SMB_STRUCT_STAT *sbuf)
2131 {
2132         struct gpfs_winattr attrs;
2133         struct gpfs_config_data *config;
2134         int ret;
2135
2136         SMB_VFS_HANDLE_GET_DATA(handle, config,
2137                                 struct gpfs_config_data,
2138                                 return false);
2139
2140         if (!config->winattr) {
2141                 return false;
2142         }
2143
2144         ret = gpfswrap_get_winattrs_path(fname->base_name, &attrs);
2145         if (ret == -1) {
2146                 return false;
2147         }
2148
2149         if ((attrs.winAttrs & GPFS_WINATTR_OFFLINE) != 0) {
2150                 DBG_DEBUG("%s is offline\n", fname->base_name);
2151                 return true;
2152         }
2153
2154         DBG_DEBUG("%s is online\n", fname->base_name);
2155         return false;
2156 }
2157
2158 static bool vfs_gpfs_fsp_is_offline(struct vfs_handle_struct *handle,
2159                                     struct files_struct *fsp)
2160 {
2161         struct gpfs_fsp_extension *ext;
2162
2163         ext = VFS_FETCH_FSP_EXTENSION(handle, fsp);
2164         if (ext == NULL) {
2165                 /*
2166                  * Something bad happened, always ask.
2167                  */
2168                 return vfs_gpfs_is_offline(handle, fsp->fsp_name,
2169                                            &fsp->fsp_name->st);
2170         }
2171
2172         if (ext->offline) {
2173                 /*
2174                  * As long as it's offline, ask.
2175                  */
2176                 ext->offline = vfs_gpfs_is_offline(handle, fsp->fsp_name,
2177                                                    &fsp->fsp_name->st);
2178         }
2179
2180         return ext->offline;
2181 }
2182
2183 static bool vfs_gpfs_aio_force(struct vfs_handle_struct *handle,
2184                                struct files_struct *fsp)
2185 {
2186         return vfs_gpfs_fsp_is_offline(handle, fsp);
2187 }
2188
2189 static ssize_t vfs_gpfs_sendfile(vfs_handle_struct *handle, int tofd,
2190                                  files_struct *fsp, const DATA_BLOB *hdr,
2191                                  off_t offset, size_t n)
2192 {
2193         if (vfs_gpfs_fsp_is_offline(handle, fsp)) {
2194                 errno = ENOSYS;
2195                 return -1;
2196         }
2197         return SMB_VFS_NEXT_SENDFILE(handle, tofd, fsp, hdr, offset, n);
2198 }
2199
2200 static int vfs_gpfs_connect(struct vfs_handle_struct *handle,
2201                             const char *service, const char *user)
2202 {
2203         struct gpfs_config_data *config;
2204         int ret;
2205         bool check_fstype;
2206
2207         gpfswrap_lib_init(0);
2208
2209         config = talloc_zero(handle->conn, struct gpfs_config_data);
2210         if (!config) {
2211                 DEBUG(0, ("talloc_zero() failed\n"));
2212                 errno = ENOMEM;
2213                 return -1;
2214         }
2215
2216         ret = SMB_VFS_NEXT_CONNECT(handle, service, user);
2217         if (ret < 0) {
2218                 TALLOC_FREE(config);
2219                 return ret;
2220         }
2221
2222         check_fstype = lp_parm_bool(SNUM(handle->conn), "gpfs",
2223                                     "check_fstype", true);
2224
2225         if (check_fstype && !IS_IPC(handle->conn)) {
2226                 const char *connectpath = handle->conn->connectpath;
2227                 struct statfs buf = { 0 };
2228
2229                 ret = statfs(connectpath, &buf);
2230                 if (ret != 0) {
2231                         DBG_ERR("statfs failed for share %s at path %s: %s\n",
2232                                 service, connectpath, strerror(errno));
2233                         TALLOC_FREE(config);
2234                         return ret;
2235                 }
2236
2237                 if (buf.f_type != GPFS_SUPER_MAGIC) {
2238                         DBG_ERR("SMB share %s, path %s not in GPFS file system."
2239                                 " statfs magic: 0x%jx\n",
2240                                 service,
2241                                 connectpath,
2242                                 (uintmax_t)buf.f_type);
2243                         errno = EINVAL;
2244                         TALLOC_FREE(config);
2245                         return -1;
2246                 }
2247         }
2248
2249         ret = smbacl4_get_vfs_params(handle->conn, &config->nfs4_params);
2250         if (ret < 0) {
2251                 TALLOC_FREE(config);
2252                 return ret;
2253         }
2254
2255         config->sharemodes = lp_parm_bool(SNUM(handle->conn), "gpfs",
2256                                         "sharemodes", true);
2257
2258         config->leases = lp_parm_bool(SNUM(handle->conn), "gpfs",
2259                                         "leases", true);
2260
2261         config->hsm = lp_parm_bool(SNUM(handle->conn), "gpfs",
2262                                    "hsm", false);
2263
2264         config->syncio = lp_parm_bool(SNUM(handle->conn), "gpfs",
2265                                       "syncio", false);
2266
2267         config->winattr = lp_parm_bool(SNUM(handle->conn), "gpfs",
2268                                        "winattr", false);
2269
2270         config->ftruncate = lp_parm_bool(SNUM(handle->conn), "gpfs",
2271                                          "ftruncate", true);
2272
2273         config->getrealfilename = lp_parm_bool(SNUM(handle->conn), "gpfs",
2274                                                "getrealfilename", true);
2275
2276         config->dfreequota = lp_parm_bool(SNUM(handle->conn), "gpfs",
2277                                           "dfreequota", false);
2278
2279         config->acl = lp_parm_bool(SNUM(handle->conn), "gpfs", "acl", true);
2280
2281         config->settimes = lp_parm_bool(SNUM(handle->conn), "gpfs",
2282                                         "settimes", true);
2283         config->recalls = lp_parm_bool(SNUM(handle->conn), "gpfs",
2284                                        "recalls", true);
2285
2286         SMB_VFS_HANDLE_SET_DATA(handle, config,
2287                                 NULL, struct gpfs_config_data,
2288                                 return -1);
2289
2290         if (config->leases) {
2291                 /*
2292                  * GPFS lease code is based on kernel oplock code
2293                  * so make sure it is turned on
2294                  */
2295                 if (!lp_kernel_oplocks(SNUM(handle->conn))) {
2296                         DEBUG(5, ("Enabling kernel oplocks for "
2297                                   "gpfs:leases to work\n"));
2298                         lp_do_parameter(SNUM(handle->conn), "kernel oplocks",
2299                                         "true");
2300                 }
2301
2302                 /*
2303                  * as the kernel does not properly support Level II oplocks
2304                  * and GPFS leases code is based on kernel infrastructure, we
2305                  * need to turn off Level II oplocks if gpfs:leases is enabled
2306                  */
2307                 if (lp_level2_oplocks(SNUM(handle->conn))) {
2308                         DEBUG(5, ("gpfs:leases are enabled, disabling "
2309                                   "Level II oplocks\n"));
2310                         lp_do_parameter(SNUM(handle->conn), "level2 oplocks",
2311                                         "false");
2312                 }
2313         }
2314
2315         /*
2316          * Unless we have an async implementation of get_dos_attributes turn
2317          * this off.
2318          */
2319         lp_do_parameter(SNUM(handle->conn), "smbd async dosmode", "false");
2320
2321         return 0;
2322 }
2323
2324 static int get_gpfs_quota(const char *pathname, int type, int id,
2325                           struct gpfs_quotaInfo *qi)
2326 {
2327         int ret;
2328
2329         ret = gpfswrap_quotactl(pathname, GPFS_QCMD(Q_GETQUOTA, type), id, qi);
2330
2331         if (ret) {
2332                 if (errno == GPFS_E_NO_QUOTA_INST) {
2333                         DEBUG(10, ("Quotas disabled on GPFS filesystem.\n"));
2334                 } else if (errno != ENOSYS) {
2335                         DEBUG(0, ("Get quota failed, type %d, id, %d, "
2336                                   "errno %d.\n", type, id, errno));
2337                 }
2338
2339                 return ret;
2340         }
2341
2342         DEBUG(10, ("quota type %d, id %d, blk u:%lld h:%lld s:%lld gt:%u\n",
2343                    type, id, qi->blockUsage, qi->blockHardLimit,
2344                    qi->blockSoftLimit, qi->blockGraceTime));
2345
2346         return ret;
2347 }
2348
2349 static void vfs_gpfs_disk_free_quota(struct gpfs_quotaInfo qi, time_t cur_time,
2350                                      uint64_t *dfree, uint64_t *dsize)
2351 {
2352         uint64_t usage, limit;
2353
2354         /*
2355          * The quota reporting is done in units of 1024 byte blocks, but
2356          * sys_fsusage uses units of 512 byte blocks, adjust the block number
2357          * accordingly. Also filter possibly negative usage counts from gpfs.
2358          */
2359         usage = qi.blockUsage < 0 ? 0 : (uint64_t)qi.blockUsage * 2;
2360         limit = (uint64_t)qi.blockHardLimit * 2;
2361
2362         /*
2363          * When the grace time for the exceeded soft block quota has been
2364          * exceeded, the soft block quota becomes an additional hard limit.
2365          */
2366         if (qi.blockSoftLimit &&
2367             qi.blockGraceTime && cur_time > qi.blockGraceTime) {
2368                 /* report disk as full */
2369                 *dfree = 0;
2370                 *dsize = MIN(*dsize, usage);
2371         }
2372
2373         if (!qi.blockHardLimit)
2374                 return;
2375
2376         if (usage >= limit) {
2377                 /* report disk as full */
2378                 *dfree = 0;
2379                 *dsize = MIN(*dsize, usage);
2380
2381         } else {
2382                 /* limit has not been reached, determine "free space" */
2383                 *dfree = MIN(*dfree, limit - usage);
2384                 *dsize = MIN(*dsize, limit);
2385         }
2386 }
2387
2388 static uint64_t vfs_gpfs_disk_free(vfs_handle_struct *handle,
2389                                 const struct smb_filename *smb_fname,
2390                                 uint64_t *bsize,
2391                                 uint64_t *dfree,
2392                                 uint64_t *dsize)
2393 {
2394         struct security_unix_token *utok;
2395         struct gpfs_quotaInfo qi_user = { 0 }, qi_group = { 0 };
2396         struct gpfs_config_data *config;
2397         int err;
2398         time_t cur_time;
2399
2400         SMB_VFS_HANDLE_GET_DATA(handle, config, struct gpfs_config_data,
2401                                 return (uint64_t)-1);
2402         if (!config->dfreequota) {
2403                 return SMB_VFS_NEXT_DISK_FREE(handle, smb_fname,
2404                                               bsize, dfree, dsize);
2405         }
2406
2407         err = sys_fsusage(smb_fname->base_name, dfree, dsize);
2408         if (err) {
2409                 DEBUG (0, ("Could not get fs usage, errno %d\n", errno));
2410                 return SMB_VFS_NEXT_DISK_FREE(handle, smb_fname,
2411                                               bsize, dfree, dsize);
2412         }
2413
2414         /* sys_fsusage returns units of 512 bytes */
2415         *bsize = 512;
2416
2417         DEBUG(10, ("fs dfree %llu, dsize %llu\n",
2418                    (unsigned long long)*dfree, (unsigned long long)*dsize));
2419
2420         utok = handle->conn->session_info->unix_token;
2421
2422         err = get_gpfs_quota(smb_fname->base_name,
2423                         GPFS_USRQUOTA, utok->uid, &qi_user);
2424         if (err) {
2425                 return SMB_VFS_NEXT_DISK_FREE(handle, smb_fname,
2426                                               bsize, dfree, dsize);
2427         }
2428
2429         /*
2430          * If new files created under this folder get this folder's
2431          * GID, then available space is governed by the quota of the
2432          * folder's GID, not the primary group of the creating user.
2433          */
2434         if (VALID_STAT(smb_fname->st) &&
2435             S_ISDIR(smb_fname->st.st_ex_mode) &&
2436             smb_fname->st.st_ex_mode & S_ISGID) {
2437                 become_root();
2438                 err = get_gpfs_quota(smb_fname->base_name, GPFS_GRPQUOTA,
2439                                      smb_fname->st.st_ex_gid, &qi_group);
2440                 unbecome_root();
2441
2442         } else {
2443                 err = get_gpfs_quota(smb_fname->base_name, GPFS_GRPQUOTA,
2444                                      utok->gid, &qi_group);
2445         }
2446
2447         if (err) {
2448                 return SMB_VFS_NEXT_DISK_FREE(handle, smb_fname,
2449                                               bsize, dfree, dsize);
2450         }
2451
2452         cur_time = time(NULL);
2453
2454         /* Adjust free space and size according to quota limits. */
2455         vfs_gpfs_disk_free_quota(qi_user, cur_time, dfree, dsize);
2456         vfs_gpfs_disk_free_quota(qi_group, cur_time, dfree, dsize);
2457
2458         return *dfree / 2;
2459 }
2460
2461 static int vfs_gpfs_get_quota(vfs_handle_struct *handle,
2462                                 const struct smb_filename *smb_fname,
2463                                 enum SMB_QUOTA_TYPE qtype,
2464                                 unid_t id,
2465                                 SMB_DISK_QUOTA *dq)
2466 {
2467         switch(qtype) {
2468                 /*
2469                  * User/group quota are being used for disk-free
2470                  * determination, which in this module is done directly
2471                  * by the disk-free function. It's important that this
2472                  * module does not return wrong quota values by mistake,
2473                  * which would modify the correct values set by disk-free.
2474                  * User/group quota are also being used for processing
2475                  * NT_TRANSACT_GET_USER_QUOTA in smb1 protocol, which is
2476                  * currently not supported by this module.
2477                  */
2478                 case SMB_USER_QUOTA_TYPE:
2479                 case SMB_GROUP_QUOTA_TYPE:
2480                         errno = ENOSYS;
2481                         return -1;
2482                 default:
2483                         return SMB_VFS_NEXT_GET_QUOTA(handle, smb_fname,
2484                                         qtype, id, dq);
2485         }
2486 }
2487
2488 static uint32_t vfs_gpfs_capabilities(struct vfs_handle_struct *handle,
2489                                       enum timestamp_set_resolution *p_ts_res)
2490 {
2491         struct gpfs_config_data *config;
2492         uint32_t next;
2493
2494         next = SMB_VFS_NEXT_FS_CAPABILITIES(handle, p_ts_res);
2495
2496         SMB_VFS_HANDLE_GET_DATA(handle, config,
2497                                 struct gpfs_config_data,
2498                                 return next);
2499
2500         if (config->hsm) {
2501                 next |= FILE_SUPPORTS_REMOTE_STORAGE;
2502         }
2503         return next;
2504 }
2505
2506 static int vfs_gpfs_open(struct vfs_handle_struct *handle,
2507                          struct smb_filename *smb_fname, files_struct *fsp,
2508                          int flags, mode_t mode)
2509 {
2510         struct gpfs_config_data *config;
2511         int ret;
2512         struct gpfs_fsp_extension *ext;
2513
2514         SMB_VFS_HANDLE_GET_DATA(handle, config,
2515                                 struct gpfs_config_data,
2516                                 return -1);
2517
2518         if (config->hsm && !config->recalls &&
2519             vfs_gpfs_fsp_is_offline(handle, fsp)) {
2520                 DEBUG(10, ("Refusing access to offline file %s\n",
2521                            fsp_str_dbg(fsp)));
2522                 errno = EACCES;
2523                 return -1;
2524         }
2525
2526         if (config->syncio) {
2527                 flags |= O_SYNC;
2528         }
2529
2530         ext = VFS_ADD_FSP_EXTENSION(handle, fsp, struct gpfs_fsp_extension,
2531                                     NULL);
2532         if (ext == NULL) {
2533                 errno = ENOMEM;
2534                 return -1;
2535         }
2536
2537         /*
2538          * Assume the file is offline until gpfs tells us it's online.
2539          */
2540         *ext = (struct gpfs_fsp_extension) { .offline = true };
2541
2542         ret = SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
2543         if (ret == -1) {
2544                 VFS_REMOVE_FSP_EXTENSION(handle, fsp);
2545         }
2546         return ret;
2547 }
2548
2549 static ssize_t vfs_gpfs_pread(vfs_handle_struct *handle, files_struct *fsp,
2550                               void *data, size_t n, off_t offset)
2551 {
2552         ssize_t ret;
2553         bool was_offline;
2554
2555         was_offline = vfs_gpfs_fsp_is_offline(handle, fsp);
2556
2557         ret = SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
2558
2559         if ((ret != -1) && was_offline) {
2560                 notify_fname(handle->conn, NOTIFY_ACTION_MODIFIED,
2561                              FILE_NOTIFY_CHANGE_ATTRIBUTES,
2562                              fsp->fsp_name->base_name);
2563         }
2564
2565         return ret;
2566 }
2567
2568 struct vfs_gpfs_pread_state {
2569         struct files_struct *fsp;
2570         ssize_t ret;
2571         bool was_offline;
2572         struct vfs_aio_state vfs_aio_state;
2573 };
2574
2575 static void vfs_gpfs_pread_done(struct tevent_req *subreq);
2576
2577 static struct tevent_req *vfs_gpfs_pread_send(struct vfs_handle_struct *handle,
2578                                               TALLOC_CTX *mem_ctx,
2579                                               struct tevent_context *ev,
2580                                               struct files_struct *fsp,
2581                                               void *data, size_t n,
2582                                               off_t offset)
2583 {
2584         struct tevent_req *req, *subreq;
2585         struct vfs_gpfs_pread_state *state;
2586
2587         req = tevent_req_create(mem_ctx, &state, struct vfs_gpfs_pread_state);
2588         if (req == NULL) {
2589                 return NULL;
2590         }
2591         state->was_offline = vfs_gpfs_fsp_is_offline(handle, fsp);
2592         state->fsp = fsp;
2593         subreq = SMB_VFS_NEXT_PREAD_SEND(state, ev, handle, fsp, data,
2594                                          n, offset);
2595         if (tevent_req_nomem(subreq, req)) {
2596                 return tevent_req_post(req, ev);
2597         }
2598         tevent_req_set_callback(subreq, vfs_gpfs_pread_done, req);
2599         return req;
2600 }
2601
2602 static void vfs_gpfs_pread_done(struct tevent_req *subreq)
2603 {
2604         struct tevent_req *req = tevent_req_callback_data(
2605                 subreq, struct tevent_req);
2606         struct vfs_gpfs_pread_state *state = tevent_req_data(
2607                 req, struct vfs_gpfs_pread_state);
2608
2609         state->ret = SMB_VFS_PREAD_RECV(subreq, &state->vfs_aio_state);
2610         TALLOC_FREE(subreq);
2611         tevent_req_done(req);
2612 }
2613
2614 static ssize_t vfs_gpfs_pread_recv(struct tevent_req *req,
2615                                    struct vfs_aio_state *vfs_aio_state)
2616 {
2617         struct vfs_gpfs_pread_state *state = tevent_req_data(
2618                 req, struct vfs_gpfs_pread_state);
2619         struct files_struct *fsp = state->fsp;
2620
2621         if (tevent_req_is_unix_error(req, &vfs_aio_state->error)) {
2622                 return -1;
2623         }
2624         *vfs_aio_state = state->vfs_aio_state;
2625
2626         if ((state->ret != -1) && state->was_offline) {
2627                 DEBUG(10, ("sending notify\n"));
2628                 notify_fname(fsp->conn, NOTIFY_ACTION_MODIFIED,
2629                              FILE_NOTIFY_CHANGE_ATTRIBUTES,
2630                              fsp->fsp_name->base_name);
2631         }
2632
2633         return state->ret;
2634 }
2635
2636 static ssize_t vfs_gpfs_pwrite(vfs_handle_struct *handle, files_struct *fsp,
2637                                const void *data, size_t n, off_t offset)
2638 {
2639         ssize_t ret;
2640         bool was_offline;
2641
2642         was_offline = vfs_gpfs_fsp_is_offline(handle, fsp);
2643
2644         ret = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
2645
2646         if ((ret != -1) && was_offline) {
2647                 notify_fname(handle->conn, NOTIFY_ACTION_MODIFIED,
2648                              FILE_NOTIFY_CHANGE_ATTRIBUTES,
2649                              fsp->fsp_name->base_name);
2650         }
2651
2652         return ret;
2653 }
2654
2655 struct vfs_gpfs_pwrite_state {
2656         struct files_struct *fsp;
2657         ssize_t ret;
2658         bool was_offline;
2659         struct vfs_aio_state vfs_aio_state;
2660 };
2661
2662 static void vfs_gpfs_pwrite_done(struct tevent_req *subreq);
2663
2664 static struct tevent_req *vfs_gpfs_pwrite_send(
2665         struct vfs_handle_struct *handle,
2666         TALLOC_CTX *mem_ctx,
2667         struct tevent_context *ev,
2668         struct files_struct *fsp,
2669         const void *data, size_t n,
2670         off_t offset)
2671 {
2672         struct tevent_req *req, *subreq;
2673         struct vfs_gpfs_pwrite_state *state;
2674
2675         req = tevent_req_create(mem_ctx, &state, struct vfs_gpfs_pwrite_state);
2676         if (req == NULL) {
2677                 return NULL;
2678         }
2679         state->was_offline = vfs_gpfs_fsp_is_offline(handle, fsp);
2680         state->fsp = fsp;
2681         subreq = SMB_VFS_NEXT_PWRITE_SEND(state, ev, handle, fsp, data,
2682                                          n, offset);
2683         if (tevent_req_nomem(subreq, req)) {
2684                 return tevent_req_post(req, ev);
2685         }
2686         tevent_req_set_callback(subreq, vfs_gpfs_pwrite_done, req);
2687         return req;
2688 }
2689
2690 static void vfs_gpfs_pwrite_done(struct tevent_req *subreq)
2691 {
2692         struct tevent_req *req = tevent_req_callback_data(
2693                 subreq, struct tevent_req);
2694         struct vfs_gpfs_pwrite_state *state = tevent_req_data(
2695                 req, struct vfs_gpfs_pwrite_state);
2696
2697         state->ret = SMB_VFS_PWRITE_RECV(subreq, &state->vfs_aio_state);
2698         TALLOC_FREE(subreq);
2699         tevent_req_done(req);
2700 }
2701
2702 static ssize_t vfs_gpfs_pwrite_recv(struct tevent_req *req,
2703                                     struct vfs_aio_state *vfs_aio_state)
2704 {
2705         struct vfs_gpfs_pwrite_state *state = tevent_req_data(
2706                 req, struct vfs_gpfs_pwrite_state);
2707         struct files_struct *fsp = state->fsp;
2708
2709         if (tevent_req_is_unix_error(req, &vfs_aio_state->error)) {
2710                 return -1;
2711         }
2712         *vfs_aio_state = state->vfs_aio_state;
2713
2714         if ((state->ret != -1) && state->was_offline) {
2715                 DEBUG(10, ("sending notify\n"));
2716                 notify_fname(fsp->conn, NOTIFY_ACTION_MODIFIED,
2717                              FILE_NOTIFY_CHANGE_ATTRIBUTES,
2718                              fsp->fsp_name->base_name);
2719         }
2720
2721         return state->ret;
2722 }
2723
2724
2725 static struct vfs_fn_pointers vfs_gpfs_fns = {
2726         .connect_fn = vfs_gpfs_connect,
2727         .disk_free_fn = vfs_gpfs_disk_free,
2728         .get_quota_fn = vfs_gpfs_get_quota,
2729         .fs_capabilities_fn = vfs_gpfs_capabilities,
2730         .kernel_flock_fn = vfs_gpfs_kernel_flock,
2731         .linux_setlease_fn = vfs_gpfs_setlease,
2732         .get_real_filename_fn = vfs_gpfs_get_real_filename,
2733         .get_dos_attributes_fn = vfs_gpfs_get_dos_attributes,
2734         .get_dos_attributes_send_fn = vfs_not_implemented_get_dos_attributes_send,
2735         .get_dos_attributes_recv_fn = vfs_not_implemented_get_dos_attributes_recv,
2736         .fget_dos_attributes_fn = vfs_gpfs_fget_dos_attributes,
2737         .set_dos_attributes_fn = vfs_gpfs_set_dos_attributes,
2738         .fset_dos_attributes_fn = vfs_gpfs_fset_dos_attributes,
2739         .fget_nt_acl_fn = gpfsacl_fget_nt_acl,
2740         .get_nt_acl_at_fn = gpfsacl_get_nt_acl_at,
2741         .fset_nt_acl_fn = gpfsacl_fset_nt_acl,
2742         .sys_acl_get_file_fn = gpfsacl_sys_acl_get_file,
2743         .sys_acl_get_fd_fn = gpfsacl_sys_acl_get_fd,
2744         .sys_acl_blob_get_file_fn = gpfsacl_sys_acl_blob_get_file,
2745         .sys_acl_blob_get_fd_fn = gpfsacl_sys_acl_blob_get_fd,
2746         .sys_acl_set_file_fn = gpfsacl_sys_acl_set_file,
2747         .sys_acl_set_fd_fn = gpfsacl_sys_acl_set_fd,
2748         .sys_acl_delete_def_file_fn = gpfsacl_sys_acl_delete_def_file,
2749         .chmod_fn = vfs_gpfs_chmod,
2750         .fchmod_fn = vfs_gpfs_fchmod,
2751         .close_fn = vfs_gpfs_close,
2752         .stat_fn = vfs_gpfs_stat,
2753         .lstat_fn = vfs_gpfs_lstat,
2754         .ntimes_fn = vfs_gpfs_ntimes,
2755         .aio_force_fn = vfs_gpfs_aio_force,
2756         .sendfile_fn = vfs_gpfs_sendfile,
2757         .fallocate_fn = vfs_gpfs_fallocate,
2758         .open_fn = vfs_gpfs_open,
2759         .pread_fn = vfs_gpfs_pread,
2760         .pread_send_fn = vfs_gpfs_pread_send,
2761         .pread_recv_fn = vfs_gpfs_pread_recv,
2762         .pwrite_fn = vfs_gpfs_pwrite,
2763         .pwrite_send_fn = vfs_gpfs_pwrite_send,
2764         .pwrite_recv_fn = vfs_gpfs_pwrite_recv,
2765         .ftruncate_fn = vfs_gpfs_ftruncate
2766 };
2767
2768 static_decl_vfs;
2769 NTSTATUS vfs_gpfs_init(TALLOC_CTX *ctx)
2770 {
2771         int ret;
2772
2773         ret = gpfswrap_init();
2774         if (ret != 0) {
2775                 DEBUG(1, ("Could not initialize GPFS library wrapper\n"));
2776         }
2777
2778         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "gpfs",
2779                                 &vfs_gpfs_fns);
2780 }