9730d3af6177ec69df59cae18af923249a7602bd
[sfrench/samba-autobuild/.git] / source3 / modules / gpfs.c
1 /*
2  *  Unix SMB/CIFS implementation.
3  *  Provide a connection to GPFS specific features
4  *  Copyright (C) Volker Lendecke 2005
5  *
6  *  This program is free software; you can redistribute it and/or modify
7  *  it under the terms of the GNU General Public License as published by
8  *  the Free Software Foundation; either version 3 of the License, or
9  *  (at your option) any later version.
10  *
11  *  This program is distributed in the hope that it will be useful,
12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *  GNU General Public License for more details.
15  *
16  *  You should have received a copy of the GNU General Public License
17  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
18  */
19
20 #include "includes.h"
21 #include "system/filesys.h"
22 #include "smbd/smbd.h"
23
24 #include <fcntl.h>
25 #include "libcli/security/security.h"
26 #include "gpfs_fcntl.h"
27 #include "gpfs_gpl.h"
28 #include "vfs_gpfs.h"
29
30 static int (*gpfs_set_share_fn)(int fd, unsigned int allow, unsigned int deny);
31 static int (*gpfs_set_lease_fn)(int fd, unsigned int leaseType);
32 static int (*gpfs_getacl_fn)(char *pathname, int flags, void *acl);
33 static int (*gpfs_putacl_fn)(char *pathname, int flags, void *acl);
34 static int (*gpfs_get_realfilename_path_fn)(char *pathname, char *filenamep,
35                                             int *buflen);
36 static int (*gpfs_set_winattrs_path_fn)(char *pathname, int flags, struct gpfs_winattr *attrs);
37 static int (*gpfs_get_winattrs_path_fn)(char *pathname, struct gpfs_winattr *attrs);
38 static int (*gpfs_get_winattrs_fn)(int fd, struct gpfs_winattr *attrs);
39 static int (*gpfs_prealloc_fn)(int fd, gpfs_off64_t startOffset, gpfs_off64_t bytesToPrealloc);
40 static int (*gpfs_ftruncate_fn)(int fd, gpfs_off64_t length);
41 static int (*gpfs_lib_init_fn)(int flags);
42 static int (*gpfs_quotactl_fn)(char *pathname, int cmd, int id, void *bufferP);
43 static int (*gpfs_fcntl_fn)(gpfs_file_t fileDesc, void *fcntlArgP);
44 static int (*gpfs_getfilesetid_fn)(char *pathname, char *name, int *idP);
45
46 bool set_gpfs_sharemode(files_struct *fsp, uint32 access_mask,
47                         uint32 share_access)
48 {
49         unsigned int allow = GPFS_SHARE_NONE;
50         unsigned int deny = GPFS_DENY_NONE;
51         int result;
52
53         if (gpfs_set_share_fn == NULL) {
54                 return False;
55         }
56
57         if ((fsp == NULL) || (fsp->fh == NULL) || (fsp->fh->fd < 0)) {
58                 /* No real file, don't disturb */
59                 return True;
60         }
61
62         allow |= (access_mask & (FILE_WRITE_DATA|FILE_APPEND_DATA|
63                                  DELETE_ACCESS)) ? GPFS_SHARE_WRITE : 0;
64         allow |= (access_mask & (FILE_READ_DATA|FILE_EXECUTE)) ?
65                 GPFS_SHARE_READ : 0;
66
67         if (allow == GPFS_SHARE_NONE) {
68                 DEBUG(10, ("special case am=no_access:%x\n",access_mask));
69         }
70         else {  
71                 deny |= (share_access & FILE_SHARE_WRITE) ?
72                         0 : GPFS_DENY_WRITE;
73                 deny |= (share_access & (FILE_SHARE_READ)) ?
74                         0 : GPFS_DENY_READ;
75         }
76         DEBUG(10, ("am=%x, allow=%d, sa=%x, deny=%d\n",
77                    access_mask, allow, share_access, deny));
78
79         result = gpfs_set_share_fn(fsp->fh->fd, allow, deny);
80         if (result != 0) {
81                 if (errno == ENOSYS) {
82                         DEBUG(5, ("VFS module vfs_gpfs loaded, but no gpfs "
83                                   "support has been compiled into Samba. Allowing access\n"));
84                         return True;
85                 } else {
86                         DEBUG(10, ("gpfs_set_share failed: %s\n",
87                                    strerror(errno)));
88                 }
89         }
90
91         return (result == 0);
92 }
93
94 int set_gpfs_lease(int fd, int leasetype)
95 {
96         int gpfs_type = GPFS_LEASE_NONE;
97
98         if (gpfs_set_lease_fn == NULL) {
99                 errno = EINVAL;
100                 return -1;
101         }
102
103         if (leasetype == F_RDLCK) {
104                 gpfs_type = GPFS_LEASE_READ;
105         }
106         if (leasetype == F_WRLCK) {
107                 gpfs_type = GPFS_LEASE_WRITE;
108         }
109
110         /* we unconditionally set CAP_LEASE, rather than looking for
111            -1/EACCES as there is a bug in some versions of
112            libgpfs_gpl.so which results in a leaked fd on /dev/ss0
113            each time we try this with the wrong capabilities set
114         */
115         linux_set_lease_capability();
116         return gpfs_set_lease_fn(fd, gpfs_type);
117 }
118
119 int smbd_gpfs_getacl(char *pathname, int flags, void *acl)
120 {
121         if (gpfs_getacl_fn == NULL) {
122                 errno = ENOSYS;
123                 return -1;
124         }
125
126         return gpfs_getacl_fn(pathname, flags, acl);
127 }
128
129 int smbd_gpfs_putacl(char *pathname, int flags, void *acl)
130 {
131         if (gpfs_putacl_fn == NULL) {
132                 errno = ENOSYS;
133                 return -1;
134         }
135
136         return gpfs_putacl_fn(pathname, flags, acl);
137 }
138
139 int smbd_gpfs_ftruncate(int fd, gpfs_off64_t length)
140 {
141         if (gpfs_ftruncate_fn == NULL) {
142                 errno = ENOSYS;
143                 return -1;
144         }
145
146         return gpfs_ftruncate_fn(fd, length);
147 }
148
149 int smbd_gpfs_get_realfilename_path(char *pathname, char *filenamep,
150                                     int *buflen)
151 {
152         if (gpfs_get_realfilename_path_fn == NULL) {
153                 errno = ENOSYS;
154                 return -1;
155         }
156
157         return gpfs_get_realfilename_path_fn(pathname, filenamep, buflen);
158 }
159
160 int get_gpfs_winattrs(char *pathname,struct gpfs_winattr *attrs)
161 {
162
163         if (gpfs_get_winattrs_path_fn == NULL) {
164                 errno = ENOSYS;
165                 return -1;
166         }
167         DEBUG(10, ("gpfs_get_winattrs_path:open call %s\n",pathname));
168         return gpfs_get_winattrs_path_fn(pathname, attrs);
169 }
170
171 int smbd_fget_gpfs_winattrs(int fd, struct gpfs_winattr *attrs)
172 {
173
174         if (gpfs_get_winattrs_fn == NULL) {
175                 errno = ENOSYS;
176                 return -1;
177         }
178         DEBUG(10, ("gpfs_get_winattrs_path:open call %d\n", fd));
179         return gpfs_get_winattrs_fn(fd, attrs);
180 }
181
182 int smbd_gpfs_prealloc(int fd, gpfs_off64_t start, gpfs_off64_t bytes)
183 {
184         if (gpfs_prealloc_fn == NULL) {
185                 errno = ENOSYS;
186                 return -1;
187         }
188
189         return gpfs_prealloc_fn(fd, start, bytes);
190 }
191
192 int set_gpfs_winattrs(char *pathname,int flags,struct gpfs_winattr *attrs)
193 {
194         if (gpfs_set_winattrs_path_fn == NULL) {
195                 errno = ENOSYS;
196                 return -1;
197         }
198
199         DEBUG(10, ("gpfs_set_winattrs_path:open call %s\n",pathname));
200         return gpfs_set_winattrs_path_fn(pathname,flags, attrs);
201 }
202
203 int get_gpfs_quota(const char *pathname, int type, int id,
204                    struct gpfs_quotaInfo *qi)
205 {
206         int ret;
207
208         if (!gpfs_quotactl_fn) {
209                 errno = ENOSYS;
210                 return -1;
211         }
212
213         ZERO_STRUCTP(qi);
214         ret = gpfs_quotactl_fn(discard_const_p(char, pathname),
215                                GPFS_QCMD(Q_GETQUOTA, type), id, qi);
216
217         if (ret) {
218                 if (errno == GPFS_E_NO_QUOTA_INST) {
219                         DEBUG(10, ("Quotas disabled on GPFS filesystem.\n"));
220                 } else {
221                         DEBUG(0, ("Get quota failed, type %d, id, %d, "
222                                   "errno %d.\n", type, id, errno));
223                 }
224
225                 return ret;
226         }
227
228         DEBUG(10, ("quota type %d, id %d, blk u:%lld h:%lld s:%lld gt:%u\n",
229                    type, id, qi->blockUsage, qi->blockHardLimit,
230                    qi->blockSoftLimit, qi->blockGraceTime));
231
232         return ret;
233 }
234
235 int get_gpfs_fset_id(const char *pathname, int *fset_id)
236 {
237         int err, fd, errno_fcntl;
238
239         struct {
240                 gpfsFcntlHeader_t hdr;
241                 gpfsGetFilesetName_t fsn;
242         } arg;
243
244         if (!gpfs_fcntl_fn || !gpfs_getfilesetid_fn) {
245                 errno = ENOSYS;
246                 return -1;
247         }
248
249         arg.hdr.totalLength = sizeof(arg);
250         arg.hdr.fcntlVersion = GPFS_FCNTL_CURRENT_VERSION;
251         arg.hdr.fcntlReserved = 0;
252         arg.fsn.structLen = sizeof(arg.fsn);
253         arg.fsn.structType = GPFS_FCNTL_GET_FILESETNAME;
254
255         fd = open(pathname, O_RDONLY);
256         if (fd == -1) {
257                 DEBUG(1, ("Could not open %s: %s\n",
258                           pathname, strerror(errno)));
259                 return fd;
260         }
261
262         err = gpfs_fcntl_fn(fd, &arg);
263         errno_fcntl = errno;
264         close(fd);
265
266         if (err) {
267                 errno = errno_fcntl;
268                 DEBUG(1, ("GPFS_FCNTL_GET_FILESETNAME for %s failed: %s\n",
269                           pathname, strerror(errno)));
270                 return err;
271         }
272
273         err = gpfs_getfilesetid_fn(discard_const_p(char, pathname),
274                                    arg.fsn.buffer, fset_id);
275         if (err) {
276                 DEBUG(1, ("gpfs_getfilesetid for %s failed: %s\n",
277                           pathname, strerror(errno)));
278         }
279         return err;
280 }
281
282 void smbd_gpfs_lib_init()
283 {
284         if (gpfs_lib_init_fn) {
285                 int rc = gpfs_lib_init_fn(0);
286                 DEBUG(10, ("gpfs_lib_init() finished with rc %d "
287                            "and errno %d\n", rc, errno));
288         } else {
289                 DEBUG(10, ("libgpfs lacks gpfs_lib_init\n"));
290         }
291 }
292
293 static bool init_gpfs_function_lib(void *plibhandle_pointer,
294                                    const char *libname,
295                                    void *pfn_pointer, const char *fn_name)
296 {
297         bool did_open_here = false;
298         void **libhandle_pointer = (void **)plibhandle_pointer;
299         void **fn_pointer = (void **)pfn_pointer;
300
301         DEBUG(10, ("trying to load name %s from %s\n",
302                    fn_name, libname));
303
304         if (*libhandle_pointer == NULL) {
305                 *libhandle_pointer = dlopen(libname, RTLD_LAZY);
306                 did_open_here = true;
307         }
308         if (*libhandle_pointer == NULL) {
309                 DEBUG(10, ("Could not open lib %s\n", libname));
310                 return false;
311         }
312
313         *fn_pointer = dlsym(*libhandle_pointer, fn_name);
314         if (*fn_pointer == NULL) {
315                 DEBUG(10, ("Did not find symbol %s in lib %s\n",
316                            fn_name, libname));
317                 if (did_open_here) {
318                         dlclose(*libhandle_pointer);
319                         *libhandle_pointer = NULL;
320                 }
321                 return false;
322         }
323
324         return true;
325 }
326
327 static bool init_gpfs_function(void *fn_pointer, const char *fn_name)
328 {
329         static void *libgpfs_handle = NULL;
330         static void *libgpfs_gpl_handle = NULL;
331
332         if (init_gpfs_function_lib(&libgpfs_handle, "libgpfs.so",
333                                    fn_pointer, fn_name)) {
334                 return true;
335         }
336         if (init_gpfs_function_lib(&libgpfs_gpl_handle, "libgpfs_gpl.so",
337                                    fn_pointer, fn_name)) {
338                 return true;
339         }
340         return false;
341 }
342
343 void init_gpfs(void)
344 {
345         init_gpfs_function(&gpfs_set_share_fn, "gpfs_set_share");
346         init_gpfs_function(&gpfs_set_lease_fn, "gpfs_set_lease");
347         init_gpfs_function(&gpfs_getacl_fn, "gpfs_getacl");
348         init_gpfs_function(&gpfs_putacl_fn, "gpfs_putacl");
349         init_gpfs_function(&gpfs_get_realfilename_path_fn,
350                            "gpfs_get_realfilename_path");
351         init_gpfs_function(&gpfs_get_winattrs_path_fn,"gpfs_get_winattrs_path");
352         init_gpfs_function(&gpfs_set_winattrs_path_fn,"gpfs_set_winattrs_path");
353         init_gpfs_function(&gpfs_get_winattrs_fn,"gpfs_get_winattrs");
354         init_gpfs_function(&gpfs_prealloc_fn, "gpfs_prealloc");
355         init_gpfs_function(&gpfs_ftruncate_fn, "gpfs_ftruncate");
356         init_gpfs_function(&gpfs_lib_init_fn,"gpfs_lib_init");
357         init_gpfs_function(&gpfs_quotactl_fn, "gpfs_quotactl");
358         init_gpfs_function(&gpfs_fcntl_fn, "gpfs_fcntl");
359         init_gpfs_function(&gpfs_getfilesetid_fn, "gpfs_getfilesetid");
360
361         return;
362 }