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