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