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 }