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