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